./0000755000175000017500000000000013065216206011124 5ustar norbertnorbert./asymptote-2.41/0000755000175000017500000000000013065216207013534 5ustar norbertnorbert./asymptote-2.41/application.h0000644000175000017500000002160613064427076016224 0ustar norbertnorbert/***** * application.h * Andy Hammerlindl 2005/05/20 * * An application is a matching of arguments in a call expression to formal * parameters of a function. Since the language allows default arguments, * keyword arguments, rest arguments, and anything else we think of, this * is not a simple mapping. *****/ #ifndef APPLICATION_H #define APPLICATION_H #include "common.h" #include "types.h" #include "coenv.h" #include "exp.h" // Defined in runtime.in: namespace run { void pushDefault(vm::stack *Stack); } using absyntax::arglist; using absyntax::varinit; using absyntax::arrayinit; using absyntax::tempExp; // This is mid-way between trans and absyntax. namespace trans { typedef Int score; typedef mem::vector score_vector; // This is used during the translation of arguments to store temporary // expressions for arguments that need to be translated for side-effects at a // certain point but used later on. The invariant maintained is that if the // vector has n elements, then the side-effects for the first n arguments have // been translated. Null is pushed onto the vector to indicate that the // expression was evaluated directly onto the stack, without the use of a // temporary. typedef mem::vector temp_vector; struct arg : public gc { types::ty *t; arg(types::ty *t) : t(t) {} virtual ~arg() {} virtual void trans(coenv &e, temp_vector &) = 0; }; struct varinitArg : public arg { varinit *v; varinitArg(varinit *v, types::ty *t) : arg(t), v(v) {} virtual void trans(coenv &e, temp_vector &) { // Open signatures can match overloaded variables, but there is no way to // translate the result, so report an error. if (t->kind == types::ty_overloaded) { em.error(v->getPos()); em << "overloaded argument in function call"; } else v->transToType(e, t); } }; // Pushes a default argument token on the stack as a placeholder for the // argument. struct defaultArg : public arg { defaultArg(types::ty *t) : arg(t) {} virtual void trans(coenv &e, temp_vector &) { //e.c.encode(inst::builtin, run::pushDefault); e.c.encode(inst::push_default); } }; // Handles translation of all the arguments matched to the rest formal. // NOTE: This code duplicates a lot of arrayinit. struct restArg : public gc { mem::list inits; arg *rest; public: restArg() : rest(0) {} virtual ~restArg() {} // Encodes the instructions to make an array from size elements on the stack. static void transMaker(coenv &e, Int size, bool rest); void trans(coenv &e, temp_vector &temps); void add(arg *init) { inits.push_back(init); } void addRest(arg *init) { rest=init; } }; // This class generates sequenced args, args whose side-effects occur in order // according to their index, regardless of the order they are called. This is // used to ensure left-to-right order of evaluation of keyword arguments, even // if they are given out of the order specified in the declaration. class sequencer { struct sequencedArg : public varinitArg { sequencer &parent; size_t i; sequencedArg(varinit *v, types::ty *t, sequencer &parent, size_t i) : varinitArg(v, t), parent(parent), i(i) {} void trans(coenv &e, temp_vector &temps) { parent.trans(e, i, temps); } }; typedef mem::vector sa_vector; sa_vector args; // Makes a temporary for the next argument in the sequence. void alias(coenv &e, temp_vector &temps) { size_t n=temps.size(); assert(n < args.size()); sequencedArg *sa=args[n]; assert(sa); temps.push_back(new tempExp(e, sa->v, sa->t)); } // Get in a state to translate the i-th argument, aliasing any arguments that // occur before it in the sequence. void advance(coenv &e, size_t i, temp_vector &temps) { while (temps.size() < i) alias(e,temps); } void trans(coenv &e, size_t i, temp_vector &temps) { if (i < temps.size()) { // Already translated, use the alias. assert(temps[i]); temps[i]->trans(e); } else { // Alias earlier args if necessary. advance(e, i, temps); // Translate using the base method. args[i]->varinitArg::trans(e,temps); // Push null to indicate the argument has been translated. temps.push_back(0); } } public: arg *addArg(varinit *v, types::ty *t, size_t i) { if (args.size() <= i) args.resize(i+1); return args[i]=new sequencedArg(v, t, *this, i); } }; class application : public gc { types::signature *sig; types::function *t; // Sequencer to ensure given arguments are evaluated in the proper order. // Use of this sequencer means that transArgs can only be called once. sequencer seq; typedef mem::vector arg_vector; arg_vector args; restArg *rest; // Target formal to match with arguments to be packed into the rest array. types::formal rf; // During the matching of arguments to an application, this stores the index // of the first unmatched formal. size_t index; // To resolve which is the best application in case of multiple matches of // overloaded functions, a score is kept for every source argument matched, // and an application with higher-scoring matches is chosen. score_vector scores; void initRest(); application(types::signature *sig) : sig(sig), t(0), args(sig->formals.size()), rest(0), rf(0), index(0) { assert(sig); initRest(); } application(types::function *t) : sig(t->getSignature()), t(t), args(sig->formals.size()), rest(0), rf(0), index(0) { assert(sig); initRest(); } types::formal &getTarget() { return sig->getFormal(index); } // Move the index forward one, then keep going until we're at an unmatched // argument. void advanceIndex() { do { ++index; } while (index < args.size() && args[index]!=0); } // Finds the first unmatched formal of the given name, returning the index. // The rest formal is not tested. This function returns FAIL if no formals // match. Int find(symbol name); // Match the formal at index to its default argument (if it has one). bool matchDefault(); // Match the argument to the formal indexed by spot. bool matchAtSpot(size_t spot, env &e, types::formal &source, varinit *a, size_t evalIndex); // Match the argument to be packed into the rest array, if possible. bool matchArgumentToRest(env &e, types::formal& source, varinit *a, size_t evalIndex); // Matches the argument to a formal in the target signature (possibly causing // other formals in the target to be matched to default values), and updates // the matchpoint accordingly. bool matchArgument(env &e, types::formal& source, varinit *a, size_t evalIndex); // Match an argument bound to a name, as in f(index=7). bool matchNamedArgument(env &e, types::formal& source, varinit *a, size_t evalIndex); // After all source formals have been matched, checks if the match is // complete (filling in final default values if necessary). bool complete(); // Match a rest argument in the calling expression. bool matchRest(env &e, types::formal& f, varinit *a, size_t evalIndex); // Match the argument represented in signature to the target signature. On // success, all of the arguments in args will be properly set up. bool matchSignature(env &e, types::signature *source, arglist &al); // Match a signature which is open, meaning that any sequence of arguments is // matched. bool matchOpen(env &e, signature *source, arglist &al); friend class maximizer; public: // Attempt to build an application given the target signature and the source // signature (representing the given arguments). Return 0 if they cannot be // matched. static application *match(env &e, types::function *t, types::signature *source, arglist &al); // Translate the arguments so they appear in order on the stack in // preparation for a call. void transArgs(coenv &e); types::function *getType() { return t; } // This returns true in the special case that the arguments matched without // casting or packing into the rest formal. bool exact(); // The next best thing (score-wise) to an exact match. This returns true if // there are two arguments, one of which is cast and one is matched exactly // and neither are packed into the rest argument. bool halfExact(); }; typedef mem::list app_list; // Given an overloaded list of types, determines which type to call. If none // are applicable, returns an empty vector, if there is ambiguity, several will // be returned. app_list multimatch(env &e, types::overloaded *o, types::signature *source, arglist &al); } // namespace trans #endif ./asymptote-2.41/entry.h0000644000175000017500000003471313064427076015065 0ustar norbertnorbert/***** * entry.h * Andy Hammerlindl 2002/08/29 * * All variables, built-in functions and user-defined functions reside * within the same namespace. To keep track of all these, a table of * "entries" is used. *****/ #ifndef ENTRY_H #define ENTRY_H #include #include "common.h" #include "frame.h" #include "table.h" #include "types.h" #include "modifier.h" using sym::symbol; using types::ty; using types::signature; // Forward declaration. namespace types { class record; } using types::record; namespace trans { // An entry is associated to a name in the (variable or type) environment, and // has permission based on the enclosing records where it was defined or // imported. class entry : public gc { struct pr { permission perm; record *r; pr(permission perm, record *r) : perm(perm), r(r) {} // Returns true if the permission allows access in this context. bool check(action act, coder &c); // Reports an error if permission is not allowed. void report(action act, position pos, coder &c); }; mem::list perms; void addPerm(permission perm, record *r) { // Only store restrictive permissions. if (perm != PUBLIC && r) perms.push_back(pr(perm,r)); } // The record where the variable or type is defined, or 0 if the entry is // not a field. record *where; // The location (file and line number) where the entry was defined. position pos; public: entry(record *where, position pos) : where(where), pos(pos) {} entry(permission perm, record *r, record *where, position pos) : where(where), pos(pos) { addPerm(perm, r); } // (Non-destructively) merges two entries, appending permission lists. // The 'where' member is taken from the second entry. entry(entry &e1, entry &e2); // Create an entry with one more permission in the list. entry(entry &base, permission perm, record *r); bool checkPerm(action act, coder &c); void reportPerm(action act, position pos, coder &c); record *whereDefined() { return where; } position getPos() { return pos; } }; class varEntry : public entry { ty *t; access *location; public: varEntry(ty *t, access *location, record *where, position pos) : entry(where, pos), t(t), location(location) {} varEntry(ty *t, access *location, permission perm, record *r, record *where, position pos) : entry(perm, r, where, pos), t(t), location(location) {} // (Non-destructively) merges two varEntries, creating a qualified varEntry. varEntry(varEntry &qv, varEntry &v); ty *getType() { return t; } signature *getSignature() { return t->getSignature(); } access *getLocation() { return location; } frame *getLevel(); // Encodes the access, but also checks permissions. void encode(action act, position pos, coder &c); void encode(action act, position pos, coder &c, frame *top); }; varEntry *qualifyVarEntry(varEntry *qv, varEntry *v); // As looked-up types can be allocated in a new expression, we need to know // what frame they should be allocated on. Type entries store this extra // information along with the type. class tyEntry : public entry { public: ty *t; varEntry *v; // NOTE: Name isn't very descriptive. tyEntry(ty *t, varEntry *v, record *where, position pos) : entry(where, pos), t(t), v(v) {} tyEntry(tyEntry *base, permission perm, record *r) : entry(*base, perm, r), t(base->t), v(base->v) {} // Records need a varEntry that refers back to the qualifier qv; i.e. in // the last new of the code // struct A { // struct B {} // } // A a=new A; // unravel a; // new B; // we need to put a's frame on the stack before allocating an instance of B. // NOTE: A possible optimization could be to only qualify the varEntry if // the type is a record, as other types don't use the varEntry. private: tyEntry(tyEntry *base, varEntry *qv) : entry(*base, *qv), t(base->t), v(qualifyVarEntry(qv, base->v)) {} public: // Since the constructor can only be used when qv is non-null it is private // for safety reasons, and we provide this method instead. friend tyEntry *qualifyTyEntry(varEntry *qv, tyEntry *ent); }; inline tyEntry *qualifyTyEntry(varEntry *qv, tyEntry *ent) { return qv ? new tyEntry(ent, qv) : ent; } // The type environment. class tenv : public sym::table { bool add(symbol dest, names_t::value_type &x, varEntry *qualifier, coder &c); public: // Add the entries in one environment to another, if qualifier is // non-null, it is a record and the source environment is its types. The // coder is used to see which entries are accessible and should be added. void add(tenv& source, varEntry *qualifier, coder &c); // Adds entries of the name src in source as the name dest, returning true if // any were added. bool add(symbol src, symbol dest, tenv& source, varEntry *qualifier, coder &c); }; #if 0 //{{{ /* This version of venv is provided for compiling on systems which do not * have some form of STL hash table. It will eventually be removed. * See the hash version below for documentation on the functions. */ /*NOHASH*/ class venv : public sym::table { /*NOHASH*/ public: /*NOHASH*/ venv() {} /*NOHASH*/ /*NOHASH*/ struct file_env_tag {}; /*NOHASH*/ venv(file_env_tag) {} /*NOHASH*/ /*NOHASH*/ void add(venv& source, varEntry *qualifier, coder &c); /*NOHASH*/ /*NOHASH*/ bool add(symbol src, symbol dest, /*NOHASH*/ venv& source, varEntry *qualifier, coder &c); /*NOHASH*/ /*NOHASH*/ varEntry *lookByType(symbol name, ty *t); /*NOHASH*/ /*NOHASH*/ varEntry *lookBySignature(symbol name, signature *sig) { /*NOHASH*/ // This optimization is not implemented for the NOHASH version. /*NOHASH*/ return 0; /*NOHASH*/ } /*NOHASH*/ /*NOHASH*/ ty *getType(symbol name); /*NOHASH*/ /*NOHASH*/ friend std::ostream& operator<< (std::ostream& out, /*NOHASH*/ const venv& ve); /*NOHASH*/ /*NOHASH*/ void list(record *module=0); /*NOHASH*/ }; //}}} #else // For speed reasons, many asserts are only tested when DEBUG_CACHE is set. #ifdef DEBUG_CACHE #define DEBUG_CACHE_ASSERT(x) assert(x) #else #define DEBUG_CACHE_ASSERT(x) (void)(x) #endif // The hash table which is at the core of the variable environment venv. class core_venv : public gc { public: // The cells of the table struct cell { symbol name; varEntry *ent; bool empty() const { return name == 0; } bool isATomb() const { DEBUG_CACHE_ASSERT(!empty()); return ent == 0; } bool filled() const { return !empty() and !isATomb(); } bool matches(symbol name, const ty *t) { DEBUG_CACHE_ASSERT(name.special()); DEBUG_CACHE_ASSERT(t); if (this->name != name) return false; if (!this->ent) return false; return equivalent(this->ent->getType(), t); } bool matches(symbol name, const signature *sig) { DEBUG_CACHE_ASSERT(!name.special()); if (this->name != name) return false; if (!this->ent) return false; return equivalent(this->ent->getSignature(), sig); } void storeNew(symbol name, varEntry *ent) { DEBUG_CACHE_ASSERT(empty() || isATomb()); this->name = name; this->ent = ent; } varEntry *replaceWith(symbol name, varEntry *ent) { this->name = name; varEntry *old = this->ent; this->ent = ent; return old; } void remove() { this->ent = 0; } }; private: size_t capacity; size_t size; size_t mask; cell *table; void initTable(size_t capacity); void resize(); cell& cellByIndex(size_t i); const cell& cellByIndex(size_t i) const; varEntry *storeNew(cell& cell, symbol name, varEntry *ent); varEntry *storeNonSpecialAfterTomb(size_t tombIndex, symbol name, varEntry *ent); varEntry *storeSpecialAfterTomb(size_t tombIndex, symbol name, varEntry *ent); public: core_venv(size_t capacity) { initTable(capacity); } bool empty() const { return size == 0; } void clear(); void confirm_size(); // Store an entry into the table. If this shadows a previous entry, the old // entry is returned, otherwise 0 is returned. varEntry *storeNonSpecial(symbol name, varEntry *ent); varEntry *storeSpecial(symbol name, varEntry *ent); varEntry *store(symbol name, varEntry *ent); // Lookup an entry in the table. varEntry *lookupNonSpecial(symbol name, const signature *sig); varEntry *lookupSpecial(symbol name, const ty *t); varEntry *lookup(symbol name, const ty *t); // Remove an entry from the table. void removeNonSpecial(symbol name, const signature *sig); void removeSpecial(symbol name, const ty *t); void remove(symbol name, const ty *t); // Features for iterating over the entire table. class const_iterator { const core_venv& core; size_t index; public: const_iterator(const core_venv& core, size_t index) : core(core), index(index) {} const cell& operator * () const { return core.cellByIndex(index); } const cell* operator -> () const { return &core.cellByIndex(index); } const_iterator& operator ++ () { // Advance to the next filled cell, or stop at the end of the array. do { ++index; } while (!(*this)->filled() && index < core.capacity); DEBUG_CACHE_ASSERT((*this)->filled() || (*this) == core.end()); return *this; } friend bool operator == (const const_iterator& a, const const_iterator& b) { // For speed, we don't compare the hashtables. return a.index == b.index; } friend bool operator != (const const_iterator& a, const const_iterator& b) { // For speed, we don't compare the hashtables. return a.index != b.index; } }; const_iterator begin() const { size_t index = 0; while (index < capacity && !cellByIndex(index).filled()) ++index; return const_iterator(*this, index); } const_iterator end() const { return const_iterator(*this, capacity); } }; // venv implemented with a hash table. class venv { // A hash table used to quickly look up a variable once its name and type are // known. Includes all scopes. core_venv core; // Record of added variables in the order they were added. struct addition { symbol name; ty *t; varEntry *shadowed; addition(symbol name, ty *t, varEntry *shadowed) : name(name), t(t), shadowed(shadowed) {} }; typedef mem::stack addstack; addstack additions; // A scope can be recorded by the size of the addition stack at the time the // scope began. typedef mem::stack scopestack; scopestack scopesizes; struct namehash { size_t operator()(const symbol name) const { return name.hash(); } }; struct nameeq { bool operator()(const symbol s, const symbol t) const { return s==t; } }; struct namevalue { size_t maxFormals; ty *t; namevalue() : maxFormals(0), t(0) {} void addType(ty *s); void replaceType(ty *new_t, ty *old_t); #if DEBUG_CACHE void popType(ty *tnew); #else void popType(); #endif }; // A dictionary indexed solely on the name, storing for each name the // current (possibly overloaded) type of the name. // The hash table implementation is slightly faster than the std::map binary // tree implementation, so we use it if we can. #ifdef NOHASH typedef mem::map namemap; #else typedef mem::unordered_map namemap; #endif namemap names; // A sanity check. For a given name, it checks that the type stored in the // names hash table exactly matches with all of the entries of that name // stored in the full hash table. void checkName(symbol name); void listValues(symbol name, record *module); // Helper function for endScope. void remove(const addition& a); // These are roughly the size the hashtables will be after loading the // builtin functions and plain module. static const size_t fileCoreSize=1 << 13; static const size_t fileNamesSize=1000; // The number of scopes begun (but not yet ended) when the venv was empty. size_t empty_scopes; public: venv() : core(1 << 2), empty_scopes(0) {} // Most file level modules automatically import plain, so allocate hashtables // big enough to hold it in advance. struct file_env_tag {}; venv(file_env_tag) : core(fileCoreSize), #ifndef NOHASH names(fileNamesSize), #endif empty_scopes(0) {} // Add a new variable definition. void enter(symbol name, varEntry *v); // Add the entries in one environment to another, if qualifier is // non-null, it is a record and entries of the source environment are its // fields. The coder is necessary to check which variables are accessible and // should be added. void add(venv& source, varEntry *qualifier, coder &c); // Add all unshadowed variables from source of the name src as variables // named dest. Returns true if at least one was added. bool add(symbol src, symbol dest, venv& source, varEntry *qualifier, coder &c); // Look for a function that exactly matches the type given. varEntry *lookByType(symbol name, ty *t) { return core.lookup(name, t); } // An optimization heuristic. Try to guess the signature of a variable and // look it up. This is allowed to return 0 even if the appropriate variable // exists. If it returns a varEntry from an overloaded number of choices, // the returned function must be the one which would be called with // arguments given by sig, and its signature must be equivalent to sig. // For instance, in // int f(int a, int b); // int f(int a, int b, int c = 1); // f(a,b); // looking up the signature of 'f' with arguments (int, int) must return 0 // as there is an ambiguity. The maxFormals field is used to ensure we // avoid such ambiguities. varEntry *lookBySignature(symbol name, signature *sig); // Get the (possibly overloaded) type of all variables associated to a // particular name. ty *getType(symbol name); void beginScope(); void endScope(); // Merges the top-level scope with the level immediately underneath it. void collapseScope(); // Prints a list of the variables to the standard output. void list(record *module=0); // Adds to l, all names prefixed by start. void completions(mem::list& l, string start); }; #endif } // namespace trans #endif //ENTRY_H ./asymptote-2.41/getopt.h0000644000175000017500000001477213064427076015231 0ustar norbertnorbert/* Declarations for getopt. Copyright (C) 1989-1994, 1996-1999, 2001 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. */ #ifndef _GETOPT_H #ifndef __need_getopt # define _GETOPT_H 1 #endif /* If __GNU_LIBRARY__ is not already defined, either we are being used standalone, or this is the first header included in the source file. If we are being used with glibc, we need to include , but that does not exist if we are standalone. So: if __GNU_LIBRARY__ is not defined, include , which will pull in for us if it's from glibc. (Why ctype.h? It's guaranteed to exist and it doesn't flood the namespace with stuff the way some other headers do.) */ #if !defined __GNU_LIBRARY__ # include #endif #ifdef __cplusplus extern "C" { #endif /* For communication from `getopt' to the caller. When `getopt' finds an option that takes an argument, the argument value is returned here. Also, when `ordering' is RETURN_IN_ORDER, each non-option ARGV-element is returned here. */ extern char *optarg; /* Index in ARGV of the next element to be scanned. This is used for communication to and from the caller and for communication between successive calls to `getopt'. On entry to `getopt', zero means this is the first call; initialize. When `getopt' returns -1, this is the index of the first of the non-option elements that the caller should itself scan. Otherwise, `optind' communicates from one call to the next how much of ARGV has been scanned so far. */ extern int optind; /* Callers store zero here to inhibit the error message `getopt' prints for unrecognized options. */ extern int opterr; /* Set to an option character which was unrecognized. */ extern int optopt; #ifndef __need_getopt /* Describe the long-named options requested by the application. The LONG_OPTIONS argument to getopt_long or getopt_long_only is a vector of `struct option' terminated by an element containing a name which is zero. The field `has_arg' is: no_argument (or 0) if the option does not take an argument, required_argument (or 1) if the option requires an argument, optional_argument (or 2) if the option takes an optional argument. If the field `flag' is not NULL, it points to a variable that is set to the value given in the field `val' when the option is found, but left unchanged if the option is not found. To have a long-named option do something other than set an `int' to a compiled-in constant, such as set a value from `optarg', set the option's `flag' field to zero and its `val' field to a nonzero value (the equivalent single-letter option character, if there is one). For long options that have a zero `flag' field, `getopt' returns the contents of the `val' field. */ struct option { # if (defined __STDC__ && __STDC__) || defined __cplusplus const char *name; # else char *name; # endif /* has_arg can't be an enum because some compilers complain about type mismatches in all the code that assumes it is an int. */ int has_arg; int *flag; int val; }; /* Names for the values of the `has_arg' field of `struct option'. */ # define no_argument 0 # define required_argument 1 # define optional_argument 2 #endif /* need getopt */ /* Get definitions and prototypes for functions to process the arguments in ARGV (ARGC of them, minus the program name) for options given in OPTS. Return the option character from OPTS just read. Return -1 when there are no more options. For unrecognized options, or options missing arguments, `optopt' is set to the option letter, and '?' is returned. The OPTS string is a list of characters which are recognized option letters, optionally followed by colons, specifying that that letter takes an argument, to be placed in `optarg'. If a letter in OPTS is followed by two colons, its argument is optional. This behavior is specific to the GNU `getopt'. The argument `--' causes premature termination of argument scanning, explicitly telling `getopt' that there are no more options. If OPTS begins with `--', then non-option arguments are treated as arguments to the option '\0'. This behavior is specific to the GNU `getopt'. */ #if (defined __STDC__ && __STDC__) || defined __cplusplus # ifdef __GNU_LIBRARY__ /* Many other libraries have conflicting prototypes for getopt, with differences in the consts, in stdlib.h. To avoid compilation errors, only prototype getopt for the GNU C library. */ extern int getopt (int __argc, char *const *__argv, const char *__shortopts); # else /* not __GNU_LIBRARY__ */ /* extern int getopt (); */ # endif /* __GNU_LIBRARY__ */ # ifndef __need_getopt extern int getopt_long (int __argc, char *const *__argv, const char *__shortopts, const struct option *__longopts, int *__longind); extern int getopt_long_only (int __argc, char *const *__argv, const char *__shortopts, const struct option *__longopts, int *__longind); /* Internal only. Users should not call this directly. */ extern int _getopt_internal (int __argc, char *const *__argv, const char *__shortopts, const struct option *__longopts, int *__longind, int __long_only); # endif #else /* not __STDC__ */ extern int getopt (); # ifndef __need_getopt extern int getopt_long (); extern int getopt_long_only (); extern int _getopt_internal (); # endif #endif /* __STDC__ */ #ifdef __cplusplus } #endif /* Make sure we later can get all the definitions and declarations. */ #undef __need_getopt #endif /* getopt.h */ ./asymptote-2.41/runsystem.in0000644000175000017500000001175213064427076016152 0ustar norbertnorbert/***** * runsystem.in * * Runtime functions for system operations. * *****/ callable* => voidFunction() callableBp* => breakpointFunction() runnable* => primCode() #include "process.h" #include "stack.h" #include "locate.h" using namespace camp; using namespace settings; using vm::bpinfo; using vm::bplist; using vm::getPos; using vm::Default; using vm::nullfunc; using vm::item; using absyntax::runnable; typedef callable callableBp; namespace run { extern string emptystring; } function *voidFunction() { return new function(primVoid()); } function *breakpointFunction() { return new function(primString(),primString(),primInt(),primInt(), primCode()); } void clear(string file, Int line, bool warn=false) { bpinfo bp(file,line); for(mem::list::iterator p=bplist.begin(); p != bplist.end(); ++p) { if(*p == bp) { cout << "cleared breakpoint at " << file << ": " << line << endl; bplist.remove(bp); return; } } if(warn) cout << "No such breakpoint at " << file << ": " << line << endl; } namespace run { void breakpoint(stack *Stack, runnable *r) { callable *atBreakpointFunction=processData().atBreakpointFunction; if(atBreakpointFunction && !nullfunc::instance()->compare(atBreakpointFunction)) { position curPos=getPos(); Stack->push(curPos.filename()); Stack->push((Int) curPos.Line()); Stack->push((Int) curPos.Column()); Stack->push(r ? r : vm::Default); atBreakpointFunction->call(Stack); // returns a string } else Stack->push(""); } } string convertname(string name, const string& format) { if(name.empty()) return buildname(outname(),format,""); name=outpath(name); return format.empty() ? name : format+":"+name; } namespace run { void purge(Int divisor=0) { #ifdef USEGC if(divisor > 0) GC_set_free_space_divisor((GC_word) divisor); GC_gcollect(); #endif } void updateFunction(stack *Stack) { callable *atUpdateFunction=processData().atUpdateFunction; if(atUpdateFunction && !nullfunc::instance()->compare(atUpdateFunction)) atUpdateFunction->call(Stack); } void exitFunction(stack *Stack) { callable *atExitFunction=processData().atExitFunction; if(atExitFunction && !nullfunc::instance()->compare(atExitFunction)) atExitFunction->call(Stack); } } // Autogenerated routines: string outname() { return outname(); } void atupdate(callable *f) { processData().atUpdateFunction=f; } callable *atupdate() { return processData().atUpdateFunction; } void atexit(callable *f) { processData().atExitFunction=f; } callable *atexit() { return processData().atExitFunction; } void atbreakpoint(callableBp *f) { processData().atBreakpointFunction=f; } void breakpoint(runnable *s=NULL) { breakpoint(Stack,s); } string locatefile(string file) { return locateFile(file); } void stop(string file, Int line, runnable *s=NULL) { file=locateFile(file); clear(file,line); cout << "setting breakpoint at " << file << ": " << line << endl; bplist.push_back(bpinfo(file,line,s)); } void breakpoints() { for(mem::list::iterator p=bplist.begin(); p != bplist.end(); ++p) cout << p->f.name() << ": " << p->f.line() << endl; } void clear(string file, Int line) { file=locateFile(file); clear(file,line,true); } void clear() { bplist.clear(); } void warn(string s) { Warn(s); } void nowarn(string s) { noWarn(s); } void warning(string s, string t, bool position=false) { if(settings::warn(s)) { em.warning(position ? getPos() : nullPos,s); em << t; } } // Strip directory from string string stripdirectory(string *s) { return stripDir(*s); } // Strip directory from string string stripfile(string *s) { return stripFile(*s); } // Strip file extension from string string stripextension(string *s) { return stripExt(*s); } // Call ImageMagick convert. Int convert(string args=emptystring, string file=emptystring, string format=emptystring) { string name=convertname(file,format); mem::vector cmd; cmd.push_back(getSetting("convert")); push_split(cmd,args); cmd.push_back(name); bool quiet=verbose <= 1; char *oldPath=NULL; string dir=stripFile(outname()); if(!dir.empty()) { oldPath=getPath(); setPath(dir.c_str()); } Int ret=System(cmd,quiet ? 1 : 0,true,"convert", "your ImageMagick convert utility"); if(oldPath != NULL) setPath(oldPath); if(ret == 0 && verbose > 0) cout << "Wrote " << (file.empty() ? name : file) << endl; return ret; } // Call ImageMagick animate. Int animate(string args=emptystring, string file=emptystring, string format=emptystring) { #ifndef __MSDOS__ string name=convertname(file,format); if(view()) { mem::vector cmd; cmd.push_back(getSetting("animate")); push_split(cmd,args); cmd.push_back(name); return System(cmd,0,false,"animate","your animated GIF viewer"); } #endif return 0; } void purge(Int divisor=0) { purge(divisor); } ./asymptote-2.41/runpath.in0000644000175000017500000002026013064427076015554 0ustar norbertnorbert/***** * runpicture.in * * Runtime functions for picture operations. * *****/ pen => primPen() pair => primPair() path => primPath() transform => primTransform() realarray* => realArray() realarray2* => realArray2() patharray* => pathArray() penarray* => penArray() #include "path.h" #include "arrayop.h" #include "predicates.h" using namespace camp; using namespace vm; typedef array realarray; typedef array realarray2; typedef array patharray; using types::realArray; using types::realArray2; using types::pathArray; Int windingnumber(array *p, camp::pair z) { size_t size=checkArray(p); Int count=0; for(size_t i=0; i < size; i++) count += read(p,i)->windingnumber(z); return count; } // Autogenerated routines: path :nullPath() { return nullpath; } bool ==(path a, path b) { return a == b; } bool !=(path a, path b) { return !(a == b); } pair point(path p, Int t) { return p.point((Int) t); } pair point(path p, real t) { return p.point(t); } pair precontrol(path p, Int t) { return p.precontrol((Int) t); } pair precontrol(path p, real t) { return p.precontrol(t); } pair postcontrol(path p, Int t) { return p.postcontrol((Int) t); } pair postcontrol(path p, real t) { return p.postcontrol(t); } pair dir(path p, Int t, Int sign=0, bool normalize=true) { return p.dir(t,sign,normalize); } pair dir(path p, real t, bool normalize=true) { return p.dir(t,normalize); } pair accel(path p, Int t, Int sign=0) { return p.accel(t,sign); } pair accel(path p, real t) { return p.accel(t); } real radius(path p, real t) { pair v=p.dir(t,false); pair a=p.accel(t); real d=dot(a,v); real v2=v.abs2(); real a2=a.abs2(); real denom=v2*a2-d*d; real r=v2*sqrt(v2); return denom > 0 ? r/sqrt(denom) : 0.0; } path reverse(path p) { return p.reverse(); } path subpath(path p, Int a, Int b) { return p.subpath((Int) a, (Int) b); } path subpath(path p, real a, real b) { return p.subpath(a,b); } path nurb(pair z0, pair z1, pair z2, pair z3, real w0, real w1, real w2, real w3, Int m) { return nurb(z0,z1,z2,z3,w0,w1,w2,w3,m); } Int length(path p) { return p.length(); } bool cyclic(path p) { return p.cyclic(); } bool straight(path p, Int t) { return p.straight(t); } path unstraighten(path p) { return p.unstraighten(); } bool piecewisestraight(path p) { return p.piecewisestraight(); } real arclength(path p) { return p.arclength(); } real arctime(path p, real L) { return p.arctime(L); } real dirtime(path p, pair z) { return p.directiontime(z); } realarray* intersect(path p, path q, real fuzz=-1) { bool exact=fuzz <= 0.0; if(fuzz < 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(q.max()),length(q.min()))); std::vector S,T; real s,t; if(intersections(s,t,S,T,p,q,fuzz,true,exact)) { array *V=new array(2); (*V)[0]=s; (*V)[1]=t; return V; } return new array(0); } realarray2* intersections(path p, path q, real fuzz=-1) { bool exact=fuzz <= 0.0; if(fuzz < 0.0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(q.max()),length(q.min()))); real s,t; std::vector S,T; intersections(s,t,S,T,p,q,fuzz,false,true); size_t n=S.size(); if(n == 0 && !exact) { if(intersections(s,t,S,T,p,q,fuzz,true,false)) { array *V=new array(1); array *Vi=new array(2); (*V)[0]=Vi; (*Vi)[0]=s; (*Vi)[1]=t; return V; } } array *V=new array(n); for(size_t i=0; i < n; ++i) { array *Vi=new array(2); (*V)[i]=Vi; (*Vi)[0]=S[i]; (*Vi)[1]=T[i]; } stable_sort(V->begin(),V->end(),run::compare2()); return V; } realarray* intersections(path p, explicit pair a, explicit pair b, real fuzz=-1) { if(fuzz < 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(a),length(b))); std::vector S; intersections(S,p,a,b,fuzz); sort(S.begin(),S.end()); size_t n=S.size(); array *V=new array(n); for(size_t i=0; i < n; ++i) (*V)[i]=S[i]; return V; } // Return the intersection point of the extensions of the line segments // PQ and pq. pair extension(pair P, pair Q, pair p, pair q) { pair ac=P-Q; pair bd=q-p; real det=ac.getx()*bd.gety()-ac.gety()*bd.getx(); if(det == 0) return pair(infinity,infinity); return P+((p.getx()-P.getx())*bd.gety()-(p.gety()-P.gety())*bd.getx())*ac/det; } Int size(path p) { return p.size(); } path &(path p, path q) { return camp::concat(p,q); } pair min(explicit path p) { return p.min(); } pair max(explicit path p) { return p.max(); } Int size(patharray *p) { size_t size=checkArray(p); Int count=0; for (size_t i = 0; i < size; i++) count += read(p,i)->size(); return count; } pair min(patharray *p) { size_t size=checkArray(p); if(size == 0) error(nopoints); path *g = p->read(0); pair z = g->min(); double minx = z.getx(), miny = z.gety(); for (size_t i = 1; i < size; ++i) { path *g = p->read(i); pair z = g->min(); double x = z.getx(), y = z.gety(); if (x < minx) minx = x; if (y < miny) miny = y; } return pair(minx, miny); } pair max(patharray *p) { size_t size=checkArray(p); if(size == 0) error(nopoints); path *g = p->read(0); pair z = g->max(); double maxx = z.getx(), maxy = z.gety(); for (size_t i = 1; i < size; ++i) { path *g = p->read(i); pair z = g->max(); double x = z.getx(), y = z.gety(); if (x > maxx) maxx = x; if (y > maxy) maxy = y; } return pair(maxx, maxy); } pair minAfterTransform(transform t, patharray *p) { size_t size=checkArray(p); if(size == 0) error(nopoints); path g = p->read(0)->transformed(t); pair z = g.min(); double minx = z.getx(), miny = z.gety(); for (size_t i = 1; i < size; ++i) { path g = p->read(i)->transformed(t); pair z = g.min(); double x = z.getx(), y = z.gety(); if (x < minx) minx = x; if (y < miny) miny = y; } return pair(minx, miny); } pair maxAfterTransform(transform t, patharray *p) { size_t size=checkArray(p); if(size == 0) error(nopoints); path g = p->read(0)->transformed(t); pair z = g.max(); double maxx = z.getx(), maxy = z.gety(); for (size_t i = 1; i < size; ++i) { path g = p->read(i)->transformed(t); pair z = g.max(); double x = z.getx(), y = z.gety(); if (x > maxx) maxx = x; if (y > maxy) maxy = y; } return pair(maxx, maxy); } realarray *mintimes(path p) { array *V=new array(2); pair z=p.mintimes(); (*V)[0]=z.getx(); (*V)[1]=z.gety(); return V; } realarray *maxtimes(path p) { array *V=new array(2); pair z=p.maxtimes(); (*V)[0]=z.getx(); (*V)[1]=z.gety(); return V; } real relativedistance(real theta, real phi, real t, bool atleast) { return camp::velocity(theta,phi,tension(t,atleast)); } Int windingnumber(patharray *p, pair z) { return windingnumber(p,z); } bool inside(explicit patharray *g, pair z, pen fillrule=CURRENTPEN) { return fillrule.inside(windingnumber(g,z)); } bool inside(path g, pair z, pen fillrule=CURRENTPEN) { return fillrule.inside(g.windingnumber(z)); } // Return a positive (negative) value if a--b--c--cycle is oriented // counterclockwise (clockwise) or zero if all three points are colinear. // Equivalently, return a positive (negative) value if c lies to the // left (right) of the line through a and b or zero if c lies on this line. // The value returned is the determinant // |a.x a.y 1| // |b.x b.y 1| // |c.x c.y 1| // real orient(pair a, pair b, pair c) { return orient2d(a,b,c); } // Return a positive (negative) value if d lies inside (outside) // the circle passing through the counterclockwise-oriented points a,b,c // or zero if d lies on this circle. // The value returned is the determinant // |a.x a.y a.x^2+a.y^2 1| // |b.x b.y b.x^2+b.y^2 1| // |c.x c.y c.x^2+c.y^2 1| // |d.x d.y d.x^2+d.y^2 1| real incircle(pair a, pair b, pair c, pair d) { return incircle(a.getx(),a.gety(),b.getx(),b.gety(),c.getx(),c.gety(), d.getx(),d.gety()); } ./asymptote-2.41/revision.cc0000644000175000017500000000003513064427203015676 0ustar norbertnorbertconst char *REVISION="2.41"; ./asymptote-2.41/GUI/0000755000175000017500000000000013064427331014161 5ustar norbertnorbert./asymptote-2.41/GUI/xasyActions.py0000755000175000017500000003370513064427076017061 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasyActions implements the possible actions and their inverses # for the undo/redo stack in xasy # # Author: Orest Shardt # Created: July 23, 2007 # ########################################################################### import math import sys import UndoRedoStack import xasy2asy if sys.version_info >= (3, 0): from tkinter import * else: from Tkinter import * class translationAction(UndoRedoStack.action): def __init__(self,owner,itemList,indexList,translation): self.translation = translation self.owner = owner self.itemList = itemList self.indexList = indexList UndoRedoStack.action.__init__(self,self.transF,self.unTransF) def transF(self): mag = self.owner.magnification for i in range(len(self.itemList)): for index in self.indexList[i]: self.owner.translateSomething(-1,(self.translation[0]/mag,self.translation[1]/mag),self.itemList[i],index) if index==None: index = 0 try: self.owner.mainCanvas.move(self.itemList[i].imageList[index].IDTag,self.translation[0]*mag,-self.translation[1]*mag) except: self.owner.mainCanvas.move(self.itemList[i].IDTag,self.translation[0]*mag,-self.translation[1]*mag) self.owner.updateSelection() self.owner.updateCanvasSize() def unTransF(self): mag = self.owner.magnification for i in range(len(self.itemList)): for index in self.indexList[i]: self.owner.translateSomething(-1,(-self.translation[0]/mag,-self.translation[1]/mag),self.itemList[i],index) try: self.owner.mainCanvas.move(self.itemList[i].imageList[index].IDTag,-self.translation[0]*mag,self.translation[1]*mag) except: self.owner.mainCanvas.move(self.itemList[i].IDTag,-self.translation[0]*mag,self.translation[1]*mag) self.owner.updateSelection() self.owner.updateCanvasSize() def __str__(self): return "Translation of "+str(self.itemList)+str(self.indexList)+" by "+str(self.translation) class rotationAction(UndoRedoStack.action): def __init__(self,owner,itemList,indexList,angle,origin): self.owner = owner self.itemList = itemList self.indexList = indexList self.angle = angle self.origin = origin UndoRedoStack.action.__init__(self,self.rotF,self.unRotF) def rotF(self): for i in range(len(self.itemList)): for index in self.indexList[i]: self.owner.rotateSomething(-1,self.angle,self.origin,self.itemList[i],index) for item in self.itemList: item.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(item) self.owner.updateSelection() self.owner.updateCanvasSize() def unRotF(self): for i in range(len(self.itemList)): for index in self.indexList[i]: self.owner.rotateSomething(-1,-self.angle,self.origin,self.itemList[i],index) for item in self.itemList: item.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(item) self.owner.updateSelection() self.owner.updateCanvasSize() def __str__(self): return "Rotation of "+str(self.itemList)+str(self.indexList)+" by "+"%.3f"%(self.angle*180.0/math.pi)+" about "+str(self.origin) class addLabelAction(UndoRedoStack.action): def __init__(self,owner,label): self.owner = owner self.label = label UndoRedoStack.action.__init__(self,self.addF,self.unAddF) def addF(self): self.owner.addItemToFile(self.label) self.label.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(self.label) def unAddF(self): self.label.removeFromCanvas() del self.owner.fileItems[-1] self.owner.propList.delete(0) self.owner.clearSelection() def __str__(self): return "Addition of a label" class deleteLabelAction(UndoRedoStack.action): def __init__(self,owner,label,index): self.owner = owner self.label = label self.index = index UndoRedoStack.action.__init__(self,self.delF,self.unDelF) def delF(self): self.owner.fileItems[self.index].removeFromCanvas() self.owner.propList.delete(len(self.owner.fileItems)-self.index-1) del self.owner.fileItems[self.index] def unDelF(self): self.owner.fileItems.insert(self.index,self.label) self.owner.fileItems[self.index].drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.propList.insert(len(self.owner.fileItems)-self.index-1,self.owner.describeItem(self.label)) self.owner.bindItemEvents(self.label) def __str__(self): return "Deletion of a label" class editLabelTextAction(UndoRedoStack.action): def __init__(self,owner,label,newText,oldText): self.owner = owner self.label = label self.newText = newText self.oldText = oldText UndoRedoStack.action.__init__(self,self.modT,self.unModT) def modT(self): self.label.label.setText(self.newText) self.label.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(self.label) def unModT(self): self.label.label.setText(self.oldText) self.label.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(self.label) def __str__(self): return "Editing a label's text" class editLabelPenAction(UndoRedoStack.action): def __init__(self,owner,oldPen,newPen,index): self.owner = owner self.newPen = newPen self.oldPen = oldPen self.index = index UndoRedoStack.action.__init__(self,self.editF,self.unEditF) def editF(self): self.owner.fileItems[self.index].removeFromCanvas() self.owner.fileItems[self.index].label.pen = self.newPen self.owner.fileItems[self.index].drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(self.owner.fileItems[self.index]) def unEditF(self): self.owner.fileItems[self.index].removeFromCanvas() self.owner.fileItems[self.index].label.pen = self.oldPen self.owner.fileItems[self.index].drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(self.owner.fileItems[self.index]) def __str__(self): return "Changing a label's pen" class addScriptAction(UndoRedoStack.action): def __init__(self,owner,script): self.owner = owner self.script = script UndoRedoStack.action.__init__(self,self.addF,self.unAddF) def addF(self): self.owner.addItemToFile(self.script) self.script.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(self.script) def unAddF(self): self.script.removeFromCanvas() del self.owner.fileItems[-1] self.owner.propList.delete(0) self.owner.clearSelection() def __str__(self): return "Addition of a script" class deleteScriptAction(UndoRedoStack.action): def __init__(self,owner,script,index): self.owner = owner self.script = script self.index = index UndoRedoStack.action.__init__(self,self.delF,self.unDelF) def delF(self): self.owner.fileItems[self.index].removeFromCanvas() self.owner.propList.delete(len(self.owner.fileItems)-self.index-1) del self.owner.fileItems[self.index] def unDelF(self): self.owner.fileItems.insert(self.index,self.script) self.owner.fileItems[self.index].drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.propList.insert(len(self.owner.fileItems)-self.index-1,self.owner.describeItem(self.script)) self.owner.bindItemEvents(self.script) def __str__(self): return "Deletion of a script" class deleteScriptItemAction(UndoRedoStack.action): def __init__(self,owner,script,indices,oldTransforms): self.owner = owner self.script = script self.indices = indices[:] UndoRedoStack.action.__init__(self,self.delI,self.unDelI) def delI(self): for index in self.indices: self.script.transform[index].deleted = True self.owner.mainCanvas.delete(self.script.imageList[index].IDTag) def unDelI(self): for i in range(len(self.indices)): index = self.indices[i] self.script.transform[index].deleted = False bbox = self.script.imageList[index].originalImage.bbox self.script.imageList[index].IDTag = self.owner.mainCanvas.create_image(bbox[0],-bbox[3],anchor=NW,tags=("image"),image=self.script.imageList[index].itk) self.owner.bindEvents(self.script.imageList[index].IDTag) self.owner.resetStacking() def __str__(self): return "Deletion of item "+str(self.indices)+" in "+str(self.script) class editScriptAction(UndoRedoStack.action): def __init__(self,owner,script,newText,oldText): self.owner = owner self.script = script self.newText = newText self.oldText = oldText UndoRedoStack.action.__init__(self,self.modS,self.unModS) def modS(self): self.script.setScript(self.newText) self.script.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(self.script) def unModS(self): self.script.setScript(self.oldText) self.script.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) self.owner.bindItemEvents(self.script) def __str__(self): return "Modification of a script" class clearItemTransformsAction(UndoRedoStack.action): def __init__(self,owner,item,oldTransforms): self.owner = owner self.item = item self.oldTransforms = oldTransforms UndoRedoStack.action.__init__(self,self.clearF,self.unClearF) def clearF(self): for i in range(len(self.oldTransforms)): self.item.transform[i] = xasy2asy.identity() self.item.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) def unClearF(self): for i in range(len(self.oldTransforms)): self.item.transform[i] = self.oldTransforms[i] self.item.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification) def __str__(self): return "Clear the transforms of "+str(self.item)+" from "+str(self.oldTransforms) class itemRaiseAction(UndoRedoStack.action): def __init__(self,owner,items,oldPositions): self.owner = owner self.items = items[:] self.oldPositions = oldPositions[:] UndoRedoStack.action.__init__(self,self.raiseI,self.unRaiseI) def raiseI(self): for item in self.items: self.owner.raiseSomething(item) def unRaiseI(self): length = len(self.owner.fileItems) indices = self.oldPositions[:] indices = [length-i-1 for i in indices] indices.reverse() for index in indices: for i in range(index): self.owner.raiseSomething(self.owner.fileItems[length-index-1]) def __str__(self): return "Raise items "+str(self.items)+" from positions "+str(self.oldPositions) class itemLowerAction(UndoRedoStack.action): def __init__(self,owner,items,oldPositions): self.owner = owner self.items = items[:] self.oldPositions = oldPositions[:] UndoRedoStack.action.__init__(self,self.lowerI,self.unLowerI) def lowerI(self): for item in self.items: self.owner.lowerSomething(item) def unLowerI(self): indices = self.oldPositions[:] indices.reverse() for index in indices: for i in range(index): self.owner.lowerSomething(self.owner.fileItems[index]) def __str__(self): return "Lower items "+str(self.items)+" from positions "+str(self.oldPositions) class addDrawnItemAction(UndoRedoStack.action): def __init__(self,owner,item): self.owner = owner self.item = item UndoRedoStack.action.__init__(self,self.drawF,self.unDrawF) def drawF(self): self.owner.addItemToFile(self.item) self.item.drawOnCanvas(self.owner.mainCanvas,self.owner.magnification,forceAddition=True) self.owner.bindItemEvents(self.item) def unDrawF(self): self.item.removeFromCanvas(self.owner.mainCanvas) del self.owner.fileItems[-1] self.owner.propList.delete(0) self.owner.clearSelection() def __str__(self): return "Drawing of an item" class deleteDrawnItemAction(UndoRedoStack.action): def __init__(self,owner,item,index): self.owner = owner self.item = item self.index = index UndoRedoStack.action.__init__(self,self.delF,self.unDelF) def delF(self): self.owner.fileItems[self.index].removeFromCanvas(self.owner.mainCanvas) self.owner.propList.delete(len(self.owner.fileItems)-self.index-1) del self.owner.fileItems[self.index] def unDelF(self): self.owner.fileItems.insert(self.index,self.item) self.owner.fileItems[self.index].drawOnCanvas(self.owner.mainCanvas,self.owner.magnification,forceAddition=True) self.owner.propList.insert(len(self.owner.fileItems)-self.index-1,self.owner.describeItem(self.item)) self.owner.bindItemEvents(self.item) def __str__(self): return "Deletion of a drawn item" class editDrawnItemAction(UndoRedoStack.action): def __init__(self,owner,oldItem,newItem,index): self.owner = owner self.oldItem = oldItem self.newItem = newItem self.index = index UndoRedoStack.action.__init__(self,self.editF,self.unEditF) def editF(self): self.owner.fileItems[self.index].removeFromCanvas(self.owner.mainCanvas) self.owner.fileItems[self.index].path = self.newItem.path self.owner.fileItems[self.index].pen = self.newItem.pen self.owner.fileItems[self.index].transform = self.newItem.transform self.owner.fileItems[self.index].IDTag = self.newItem.IDTag self.owner.fileItems[self.index].drawOnCanvas(self.owner.mainCanvas,self.owner.magnification,forceAddition=True) self.owner.bindItemEvents(self.owner.fileItems[self.index]) def unEditF(self): self.owner.fileItems[self.index].removeFromCanvas(self.owner.mainCanvas) self.owner.fileItems[self.index].path = self.oldItem.path self.owner.fileItems[self.index].pen = self.oldItem.pen self.owner.fileItems[self.index].transform = self.oldItem.transform self.owner.fileItems[self.index].IDTag = self.oldItem.IDTag self.owner.fileItems[self.index].drawOnCanvas(self.owner.mainCanvas,self.owner.magnification,forceAddition=True) self.owner.bindItemEvents(self.owner.fileItems[self.index]) def __str__(self): return "Modification of a drawn item" ./asymptote-2.41/GUI/xasyExample.asy0000644000175000017500000000324613064427076017212 0ustar norbertnorbertinitXasyMode(); // This file was generated by xasy. It may be edited manually, however, a strict // syntax must be followed. It is advised that manually scripted items be added // in the form of a script either by using xasy or by mimicking the format of an // xasy-generated script item. // Please consult the documentation or the examples provided for details. xformStack.add(indexedTransform(0,(0, 0, 1, 0, 0, 1)), indexedTransform(1,(0, 0, 1, 0, 0, 1)), indexedTransform(2,(0, 0, 1, 0, 0, 1)), indexedTransform(3,(0, 0, 1, 0, 0, 1)), indexedTransform(4,(0, 0, 1, 0, 0, 1)), indexedTransform(5,(0, 0, 1, 0, 0, 1)), indexedTransform(6,(0, 0, 1, 0, 0, 1)), indexedTransform(7,(0, 0, 1, 0, 0, 1)), indexedTransform(8,(0, 0, 1, 0, 0, 1)), indexedTransform(9,(0, 0, 1, 0, 0, 1)), indexedTransform(10,(0, 0, 1, 0, 0, 1)), indexedTransform(11,(0, 0, 1, 0, 0, 1)), indexedTransform(12,(0, 0, 1, 0, 0, 1))); startScript(); { size(0,150); pen colour1=red; pen colour2=green; pair z0=(0,0); pair z1=(-1,0); pair z2=(1,0); real r=1.5; guide c1=circle(z1,r); guide c2=circle(z2,r); fill(c1,colour1); fill(c2,colour2); picture intersection; fill(intersection,c1,colour1+colour2); clip(intersection,c2); add(intersection); draw(c1); draw(c2); label("$A$",z1); label("$B$",z2); pair z=(0,-2); real m=3; margin BigMargin=Margin(0,m*dot(unit(z1-z),unit(z0-z))); draw(Label("$A\cap B$",0),conj(z)--z0,Arrow,BigMargin); draw(Label("$A\cup B$",0),z--z0,Arrow,BigMargin); draw(z--z1,Arrow,Margin(0,m)); draw(z--z2,Arrow,Margin(0,m)); } endScript(); xformStack.push((-28.0, 7.0, 1, 0, 0, 1)); label(Label("A Venn Diagram",(-79.0, 91.0),rgb(0,0,0)+0.5,align=SE)); // This is the end of the file exitXasyMode(); ./asymptote-2.41/GUI/xasyOptions.py0000755000175000017500000000624313064427076017111 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasyOptions provides a mechanism for storing and restoring a user's # preferences. # # # Author: Orest Shardt # Created: June 29, 2007 # ########################################################################### import pickle import sys,os import errno defaultOptions = { 'asyPath':'asy', 'showDebug':False, 'showGrid':False, 'gridX':10, 'gridY':10, 'gridColor':'#eeeeee', 'showAxes':True, 'axisX':10, 'axisY':10, 'axesColor':'#cccccc', 'tickColor':'#eeeeee', 'defPenOptions':'', 'defPenColor':'#000000', 'defPenWidth':1.0, 'externalEditor':'' } if sys.platform[:3] == "win": defaultOptions['externalEditor'] = "%PROGRAMFILES%\Windows NT\Accessories\wordpad.exe" else: defaultOptions['externalEditor'] = "emacs" options = defaultOptions.copy() def settingsFileLocation(): folder = "" try: folder = os.path.expanduser("~/.asy/") except: pass return os.path.normcase(os.path.join(folder,"xasy.conf")) def setAsyPathFromWindowsRegistry(): try: import _winreg as registry #test both registry locations try: key = registry.OpenKey(registry.HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\App Paths\\Asymptote") options['asyPath'] = registry.QueryValueEx(key,"Path")[0]+"\\asy.exe" registry.CloseKey(key) except: key = registry.OpenKey(registry.HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\Uninstall\\Asymptote") options['asyPath'] = registry.QueryValueEx(key,"InstallLocation")[0]+"\\asy.exe" registry.CloseKey(key) except: #looks like asy is not installed or this isn't Windows pass def setDefaults(): global options options = defaultOptions.copy() if sys.platform[:3] == 'win': #for windows, wince, win32, etc setAsyPathFromWindowsRegistry() save() def load(): global options fileName = settingsFileLocation() if not os.path.exists(fileName): #make folder thedir = os.path.dirname(fileName) if not os.path.exists(thedir): try: os.makedirs(thedir) except: raise Exception("Could not create configuration folder") if not os.path.isdir(thedir): raise Exception("Configuration folder path does not point to a folder") setDefaults() try: f = open(fileName,"rb") newOptions = pickle.load(f) for key in options.keys(): if type(newOptions[key]) != type(options[key]): raise Exception("Bad type for entry in xasy settings") options = newOptions except: setDefaults() def save(): global options fileName = settingsFileLocation() try: f = open(fileName,"wb") pickle.dump(options,f) f.close() except: raise Exception("Error saving preferences") load() if __name__=='__main__': print (settingsFileLocation()) print ("Current content") load() print ("Setting defaults") setDefaults() save() load() options['showAxes'] = options['showGrid'] = False save() print ("Set to False") load() options['showAxes'] = options['showGrid'] = True save() print ("Set to True") load() print (options) ./asymptote-2.41/GUI/xasyOptionsDialog.py0000755000175000017500000002145013064427076020226 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasyOptionsDialog implements a dialog window to allow users to edit # their preferences and specify program options # # # Author: Orest Shardt # Created: June 29, 2007 # ########################################################################### import os import sys import xasyOptions import xasyColorPicker if sys.version_info >= (3, 0): from tkinter import * from tkinter import simpledialog, messagebox, filedialog else: # python2 from Tkinter import * import tkSimpleDialog as simpledialog import tkMessageBox as messagebox import tkFileDialog as filedialog # import tkColorChooser as colorchooser class xasyOptionsDlg(simpledialog.Dialog): """A dialog to interact with users about their preferred settings""" def __init__(self,master=None): simpledialog.Dialog.__init__(self,master,"xasy Options") def body(self,master): optFrame = Frame(master) optFrame.grid(row=0,column=0,sticky=N+S+E+W) asyGrp = LabelFrame(optFrame,text="Asymptote",padx=5,pady=5) asyGrp.grid(row=0,column=0,sticky=E+W) asyGrp.rowconfigure(0,weight=1) asyGrp.rowconfigure(1,weight=1) asyGrp.columnconfigure(0,weight=1) asyGrp.columnconfigure(0,weight=2) Label(asyGrp,text="Command").grid(row=0,column=0,sticky=W) self.ap = Entry(asyGrp) self.ap.insert(END,xasyOptions.options['asyPath']) self.ap.grid(row=0,column=1,sticky=E+W) Button(asyGrp,text="...",command=self.findAsyPath).grid(row=0,column=2,sticky=E+W) self.showDebug = BooleanVar() self.showDebug.set(xasyOptions.options['showDebug']) self.sd = Checkbutton(asyGrp,text="Show debugging info in console",var=self.showDebug) self.sd.grid(row=1,column=0,columnspan=2,sticky=W) editGrp = LabelFrame(optFrame,text="External Editor",padx=5,pady=5) editGrp.grid(row=1,column=0,sticky=E+W) editGrp.rowconfigure(0,weight=1) editGrp.rowconfigure(1,weight=1) editGrp.columnconfigure(0,weight=1) editGrp.columnconfigure(0,weight=2) Label(editGrp,text="Program").grid(row=0,column=0,sticky=W) self.ee = Entry(editGrp) self.ee.insert(END,xasyOptions.options['externalEditor']) self.ee.grid(row=0,column=1,sticky=E+W) Button(editGrp,text="...",command=self.findEEPath).grid(row=0,column=2,sticky=E+W) penGrp = LabelFrame(optFrame,text="Default Pen",padx=5,pady=5) penGrp.grid(row=2,column=0,sticky=E+W) penGrp.rowconfigure(0,weight=1) penGrp.rowconfigure(1,weight=1) penGrp.rowconfigure(2,weight=1) penGrp.columnconfigure(1,weight=1) Label(penGrp,text="Color").grid(row=0,column=0,sticky=E) self.pc = xasyOptions.options['defPenColor'] Button(penGrp,text="Change",command=self.changePenColor).grid(row=0,column=1,sticky=W) Label(penGrp,text="Width").grid(row=1,column=0,sticky=E) self.pw = Entry(penGrp) self.pw.insert(END,str(xasyOptions.options['defPenWidth'])) self.pw.grid(row=1,column=1,sticky=E+W) Label(penGrp,text="Options").grid(row=2,column=0,sticky=E) self.po = Entry(penGrp) self.po.insert(END,xasyOptions.options['defPenOptions']) self.po.grid(row=2,column=1,sticky=E+W) dispGrp = LabelFrame(optFrame,text="Display Options",padx=5,pady=5) dispGrp.grid(row=3,column=0,sticky=E+W) dispGrp.rowconfigure(0,weight=1) dispGrp.rowconfigure(1,weight=1) dispGrp.rowconfigure(2,weight=1) dispGrp.rowconfigure(3,weight=1) dispGrp.columnconfigure(0,weight=1) dispGrp.columnconfigure(1,weight=1) dispGrp.columnconfigure(2,weight=1) self.showAxes = BooleanVar() self.showAxes.set(xasyOptions.options['showAxes']) self.sa = Checkbutton(dispGrp,text="Show Axes",var=self.showAxes) self.sa.grid(row=0,column=0,sticky=W) self.ac = xasyOptions.options['axesColor'] Button(dispGrp,text="Color...",command=self.changeAxesColor).grid(row=1,column=0) Label(dispGrp,text="x").grid(row=0,column=1,padx=5,sticky=E) self.axs = Entry(dispGrp,width=6) self.axs.insert(END,xasyOptions.options['axisX']) self.axs.grid(row=0,column=2,sticky=W+E) Label(dispGrp,text="y").grid(row=1,column=1,padx=5,sticky=E) self.ays = Entry(dispGrp,width=6) self.ays.insert(END,xasyOptions.options['axisY']) self.ays.grid(row=1,column=2,sticky=W+E) self.showGrid = BooleanVar() self.showGrid.set(xasyOptions.options['showGrid']) self.sg = Checkbutton(dispGrp,text="Show Grid",var=self.showGrid) self.sg.grid(row=4,column=0,sticky=W) self.gc = xasyOptions.options['gridColor'] Button(dispGrp,text="Color...",command=self.changeGridColor).grid(row=3,column=0) Label(dispGrp,text="x").grid(row=2,column=1,padx=5,sticky=E) self.gxs = Entry(dispGrp,width=6) self.gxs.insert(END,xasyOptions.options['gridX']) self.gxs.grid(row=2,column=2,sticky=W+E) Label(dispGrp,text="y").grid(row=3,column=1,padx=5,sticky=E) self.gys = Entry(dispGrp,width=6) self.gys.insert(END,xasyOptions.options['gridY']) self.gys.grid(row=3,column=2,sticky=W+E) def findEEPath(self): if sys.platform[:3] == 'win': #for windows, wince, win32, etc file=filedialog.askopenfile(filetypes=[("Programs","*.exe"),("All files","*")],title="Choose External Editor",parent=self) else: file=filedialog.askopenfile(filetypes=[("All files","*")],title="Choose External Editor",parent=self) if file != None: name = os.path.abspath(file.name) file.close() self.ee.delete(0,END) self.ee.insert(END,name) self.validate() def findAsyPath(self): if sys.platform[:3] == 'win': #for windows, wince, win32, etc file=filedialog.askopenfile(filetypes=[("Programs","*.exe"),("All files","*")],title="Find Asymptote Executable",parent=self) else: file=filedialog.askopenfile(filetypes=[("All files","*")],title="Find Asymptote Executable",parent=self) if file != None: name = os.path.abspath(file.name) file.close() self.ap.delete(0,END) self.ap.insert(END,name) self.validate() def getAColor(self,color): result = xasyColorPicker.xasyColorDlg(self).getColor(xasyColorPicker.makeRGBfromTkColor(color)) return xasyColorPicker.RGB255hex(xasyColorPicker.RGBreal255(result)) def changeAxesColor(self): self.ac = self.getAColor(self.ac) def changeGridColor(self): self.gc = self.getAColor(self.gc) def changePenColor(self): self.pc = self.getAColor(self.pc) def apply(self): xasyOptions.options['externalEditor'] = self.ee.get() xasyOptions.options['asyPath'] = self.ap.get() xasyOptions.options['showDebug'] = bool(self.showDebug.get()) xasyOptions.options['defPenColor'] = self.pc xasyOptions.options['defPenWidth'] = float(self.pw.get()) xasyOptions.options['defPenOptions'] = self.po.get() xasyOptions.options['showAxes'] = bool(self.showAxes.get()) xasyOptions.options['axesColor'] = self.ac xasyOptions.options['tickColor'] = self.ac xasyOptions.options['axisX'] = int(self.axs.get()) xasyOptions.options['axisY'] = int(self.ays.get()) xasyOptions.options['showGrid'] = bool(self.showGrid.get()) xasyOptions.options['gridColor'] = self.gc xasyOptions.options['gridX'] = int(self.gxs.get()) xasyOptions.options['gridY'] = int(self.gys.get()) xasyOptions.save() def validateAColor(self,color): hexdigits = '0123456789abcdef' if len(self.pc) != 7 or self.pc[0] != '#' or sum([1 for a in self.pc[1:] if a in hexdigits]) != 6: return False else: return True def validate(self): """Validate the data entered into the dialog""" #validate the color hexdigits = '0123456789abcdef' if not self.validateAColor(self.pc): messagebox.showerror("xasy Options","Invalid pen color.\r\n"+self.pc,parent=self) return False #validate the width try: test = float(self.pw.get()) except: messagebox.showerror("xasy Options","Pen width must be a number.",parent=self) return False #validate the options #nothing to do #validate the axis spacing try: test = int(self.axs.get()) test = int(self.ays.get()) except: messagebox.showerror("xasy Options","Axes' x- and y-spacing must be numbers.",parent=self) return False #validate the grid spacing try: test = int(self.gxs.get()) test = int(self.gys.get()) except: messagebox.showerror("xasy Options","Grid's x- and y-spacing must be numbers.",parent=self) return False if not self.validateAColor(self.ac): messagebox.showerror("xasy Options","Invalid axis color.\r\n"+self.ac,parent=self) return False if not self.validateAColor(self.gc): messagebox.showerror("xasy Options","Invalid grid color.\r\n"+self.gc,parent=self) return False return True if __name__ == '__main__': root = Tk() xasyOptions.load() d = xasyOptionsDlg(root) print (d.result) ./asymptote-2.41/GUI/CubicBezier.py0000755000175000017500000000725013064427076016736 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # Convert a Bezier curve to a polyline # # Once Tk supports "RawCurves" this will not be needed. # # # Author: Orest Shardt # Created: June 29, 2007 # ########################################################################### import math def norm(vector): """Return the norm of a vector""" return math.sqrt(vector[0]**2+vector[1]**2) def splitLine(end0,end1,t): """Split a line at the distance t, with t in (0,1)""" return (end0[0]+t*(end1[0]-end0[0]),end0[1]+t*(end1[1]-end0[1])) def splitBezier(node0,control0,control1,node1,t): """Find the nodes and control points for the segments of a Bezier curve split at t""" a = splitLine(node0,control0,t) b = splitLine(control0,control1,t) c = splitLine(control1,node1,t) d = splitLine(a,b,t) e = splitLine(b,c,t) f = splitLine(d,e,t)#this is the point on the curve at t return ([node0,a,d,f],[f,e,c,node1]) def BezierWidth(node0,control0,control1,node1): """Compute the distance of the control points from the node-node axis""" deltax = node1[0] - node0[0] deltay = node1[1] - node0[1] length = norm((deltax,deltay)) if length == 0: y1 = control0[1]-node0[1] y2 = control1[1]-node0[1] else: cosine = deltax/length sine = deltay/length y1 = cosine*(control0[1]-node0[1])-sine*(control0[0]-node0[0]) y2 = cosine*(control1[1]-node0[1])-sine*(control1[0]-node0[0]) if y1*y2 >= 0: #same sign return max(abs(y1),abs(y2)) else: #opposite sign return abs(y1)+abs(y2) #If the above algorithm fails, this one will work, but it is far from elegant #def computeIntermediates(steps,node0,control0,control1,node1): #pointList = [] #for a in range(0,100,100/steps)+[100]: #t = a/100.0 #t1 = 1-t #x = node0[0]*t1**3+3*control0[0]*t*t1**2+3*control1[0]*t**2*t1+node1[0]*t**3 #y = node0[1]*t1**3+3*control0[1]*t*t1**2+3*control1[1]*t**2*t1+node1[1]*t**3 #pointList.append((x,y)) #return pointList #def makeBezier(steps,node0,control0,control1,node1): #if len(node0)!=2 or len(control0)!=2 or len(control1)!=2 or len(node1)!=2: #return -1 #else: #return [node0]+computeIntermediates(steps,node0,control0,control1,node1)+[node1] def makeBezierIntermediates(node0,control0,control1,node1,epsilon): """Find the points, excluding node0, to be used as the line segment endpoints""" if(BezierWidth(node0,control0,control1,node1) <= epsilon): return [node1] else: splitUp = splitBezier(node0,control0,control1,node1,0.5) return makeBezierIntermediates(*splitUp[0]+[epsilon])+makeBezierIntermediates(*splitUp[1]+[epsilon]) def makeBezier(node0,control0,control1,node1,epsilon=1): """Return the vertices to be used in the polyline representation of a Bezier curve""" return [node0]+makeBezierIntermediates(node0,control0,control1,node1,epsilon) if __name__ == '__main__': pointList = makeBezier((-80,0),(-150,40),(150,120),(80,0),0.5) from timeit import Timer t = Timer('makeBezier((-80,0),(-40,-40),(40,120),(80,0),1)','from __main__ import makeBezier') print (pointList) print (len(pointList)) iterations = 1000 time = t.timeit(iterations) print ("{:d} iterations took {:f} seconds ({:f} ms for each).".format(iterations,time,1000.0*time/iterations)) points = [] for point in pointList: points.append(point[0]) points.append(-point[1]) if sys.version_info >= (3, 0): from tkinter import * else: from Tkinter import * root = Tk() canv = Canvas(root,scrollregion=(-100,-100,100,100)) canv.pack() canv.create_line(points) for point in pointList: canv.create_oval(point[0],-point[1],point[0],-point[1],fill='red',outline='red') root.mainloop() ./asymptote-2.41/GUI/xasyColorPicker.py0000755000175000017500000001615713064427076017677 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasyColorPicker implements a dialog that allows a user to choose a color # from those already defined in Asymptote or a custom RGB color. # # # Author: Orest Shardt # Created: June 29, 2007 # ############################################################################ import sys if sys.version_info >= (3, 0): from tkinter import * from tkinter import colorchooser else: from Tkinter import * import tkColorChooser as colorchooser asyColors = { "black":(0,0,0), "white":(1,1,1), "gray":(0.5,0.5,0.5), "red":(1,0,0), "green":(0,1,0), "blue":(0,0,1), "cmyk":(1,1,1), "Cyan":(0,1,1), "Magenta":(1,0,1), "Yellow":(1,1,0), "Black":(0,0,0), "cyan":(0,1,1), "magenta":(1,0,1), "yellow":(1,1,0), "palered":(1,0.75,0.75), "palegreen":(0.75,1,0.75), "paleblue":(0.75,0.75,1), "palecyan":(0.75,1,1), "palemagenta":(1,0.75,1), "paleyellow":(1,1,0.75), "palegray":(0.95,0.95,0.95), "lightred":(1,0.5,0.5), "lightgreen":(0.5,1,0.5), "lightblue":(0.5,0.5,1), "lightcyan":(0.5,1,1), "lightmagenta":(1,0.5,1), "lightyellow":(1,1,0.5), "lightgray":(0.9,0.9,0.9), "mediumred":(1,0.25,0.25), "mediumgreen":(0.25,1,0.25), "mediumblue":(0.25,0.25,1), "mediumcyan":(0.25,1,1), "mediummagenta":(1,0.25,1), "mediumyellow":(1,1,0.25), "mediumgray":(0.75,0.75,0.75), "heavyred":(0.75,0,0), "heavygreen":(0,0.75,0), "heavyblue":(0,0,0.75), "heavycyan":(0,0.75,0.75), "heavymagenta":(0.75,0,0.75), "lightolive":(0.75,0.75,0), "heavygray":(0.25,0.25,0.25), "deepred":(0.5,0,0), "deepgreen":(0,0.5,0), "deepblue":(0,0,0.5), "deepcyan":(0,0.5,0.5), "deepmagenta":(0.5,0,0.5), "olive":(0.5,0.5,0), "deepgray":(0.1,0.1,0.1), "darkred":(0.25,0,0), "darkgreen":(0,0.25,0), "darkblue":(0,0,0.25), "darkcyan":(0,0.25,0.25), "darkmagenta":(0.25,0,0.25), "darkolive":(0.25,0.25,0), "darkgray":(0.05,0.05,0.05), "orange":(1,0.5,0), "fuchsia":(1,0,0.5), "chartreuse":(0.5,1,0), "springgreen":(0,1,0.5), "purple":(0.5,0,1), "royalblue":(0,0.5,1) } colorLayout = [['palered', 'lightred', 'mediumred', 'red', 'heavyred', 'deepred', 'darkred', 'palegreen', 'lightgreen', 'mediumgreen', 'green', 'heavygreen', 'deepgreen', 'darkgreen', 'paleblue', 'lightblue', 'mediumblue', 'blue', 'heavyblue', 'deepblue', 'darkblue'], ['palecyan', 'lightcyan', 'heavycyan', 'deepcyan', 'darkcyan', 'palemagenta', 'lightmagenta', 'mediummagenta', 'magenta', 'heavymagenta', 'deepmagenta', 'darkmagenta', 'yellow', 'lightyellow', 'mediumyellow', 'yellow', 'lightolive', 'olive', 'darkolive', 'palegray', 'lightgray', 'mediumgray', 'gray', 'heavygray', 'deepgray', 'darkgray'], ['black', 'white', 'orange', 'fuchsia', 'chartreuse', 'springgreen', 'purple', 'royalblue', 'Cyan', 'Magenta', 'Yellow', 'Black']] def makeRGBfromTkColor(tkColor): """Convert a Tk color of the form #rrggbb to an asy rgb color""" r = int('0x'+tkColor[1:3],16) g = int('0x'+tkColor[3:5],16) b = int('0x'+tkColor[5:7],16) r /= 255.0 g /= 255.0 b /= 255.0 return (r,g,b) def RGBreal255(rgb): """Convert an RGB color from 0-1 to 0-255""" return [min(int(256*a),255) for a in rgb] def RGB255hex(rgb): """Make a color in the form #rrggbb in hex from r,g,b in 0-255""" return "#{}".format("".join(["{:02x}".format(a) for a in rgb])) class xasyColorDlg(Toplevel): """A dialog for choosing an asymptote color. It displays the usual asy presets and allows custom rgb colors""" def __init__(self,master=None,color=(0,0,0)): Toplevel.__init__(self,master,width=500,height=500) self.resizable(False,False) self.parent = master self.title("Color Picker") self.transient(master) self.focus_set() self.wait_visibility() self.grab_set() self.color = self.oldColor = color cwidth = 120 rheight = 20 self.pframe=Frame(self,bd=0) self.pframe.rowconfigure(0,weight=1) self.pframe.columnconfigure(0,weight=1) Label(self.pframe,text="Color Presets").grid(row=0,column=0) self.colScroll = Scrollbar(self.pframe,orient=VERTICAL) self.colorList = Canvas(self.pframe, width=cwidth*len(colorLayout), scrollregion=(0,0,20+cwidth*len(colorLayout),20+rheight*max([len(i) for i in colorLayout])),yscrollcommand=self.colScroll.set,relief=FLAT) self.colScroll.config(command=self.colorList.yview) self.colScroll.grid(row=1,column=1,sticky=N+S) self.colorList.grid(row=1,column=0,sticky=W) ccount = 0 for column in colorLayout: rcount = 0 for name in column: self.colorList.create_rectangle(10+cwidth*ccount,10+rheight*rcount,cwidth*ccount+25,rheight*rcount+25,tags=(name,"preset"),fill=RGB255hex(RGBreal255(asyColors[name]))) self.colorList.create_text(cwidth*ccount+30,10+rheight*rcount,text=name,anchor=NW,tags=(name,"preset"),fill="black",activefill=RGB255hex(RGBreal255(asyColors[name]))) rcount += 1 ccount += 1 self.colorList.tag_bind("preset","",self.setColorEvt) Button(self,text="Custom color...",command=self.getCustom).grid(row=2,column=0,sticky=W,padx=5,pady=5) self.colDisp = Canvas(self,width=200,height=20,background=RGB255hex(RGBreal255(self.color)),relief=SUNKEN, bd=3) self.colDisp.grid(row=2,column=1,columnspan=2) self.rowconfigure(3,minsize=10) self.columnconfigure(0,weight=1) self.columnconfigure(1,weight=1) self.columnconfigure(2,weight=1) Button(self,text="OK",default=ACTIVE,command=self.destroy).grid(row=4,column=1,sticky=E+W,padx=5,pady=5) Button(self,text="Cancel",command=self.cancel).grid(row=4,column=2,sticky=E+W,padx=5,pady=5) self.pframe.grid(row=1,column=0,columnspan=3,padx=10,pady=10) self.bind("",self.closeUp) self.setColor(color) def closeUp(self,event): """Close the dialog forcibly""" self.destroy() def getCustom(self): """Request a custom RGB color using a colorchooser""" result=colorchooser.askcolor(initialcolor=RGB255hex(RGBreal255(self.color)),title="Custom Color",parent=self) if result != (None,None): self.setColor((result[0][0]/255.0,result[0][1]/255.0,result[0][2]/255.0)) def cancel(self): """Respond to the user pressing cancel""" self.color = self.oldColor self.destroy() def setColor(self,color): """Save the color and update the color display""" self.color = color self.colDisp.configure(background=RGB255hex(RGBreal255(self.color))) def setColorEvt(self,event): """Respond to the user clicking a color from the palette""" self.setColor(asyColors[self.colorList.gettags(CURRENT)[0]]) def getColor(self,initialColor=(0,0,0)): """Use this method to prompt for a color. It returns the new color or the old color if the user cancelled the operation. e.g: print (xasyColorDlg(Tk()).getColor((1,1,0))) """ self.setColor(initialColor) self.oldColor = initialColor self.wait_window(self) return self.color if __name__ == '__main__': root = Tk() Button(root,text="Pick Color",command=lambda:xasyColorDlg(root).getColor()).pack() root.mainloop() ./asymptote-2.41/GUI/xasyFile.py0000755000175000017500000002266013064427076016336 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasyFile implements the loading, parsing, and saving of an xasy file. # # # Author: Orest Shardt # Created: June 29, 2007 # ############################################################################ from string import * from xasy2asy import * import re class xasyParseError(Exception): """A parsing error""" pass class xasyFileError(Exception): """An i/o error or other error not related to parsing""" pass def parseFile(inFile): """Parse a file returning a list of xasyItems""" lines = inFile.read() lines = lines.splitlines() #lines = [line for line in lines.splitlines() if not line.startswith("//")] result = [] if lines[0] != "initXasyMode();": raise xasyFileError("Invalid file format: First line must be \"initXasyMode();\"") lines.pop(0) lineCount = 2 lineNum = len(lines) while lineNum > 0: line = lines[0] lines.pop(0) if not line.isspace() and len(line)>0: try: #print ("Line {:d}: {:s}".format(lineCount,line)) lineResult = parseLine(line.strip(),lines) except: raise xasyParseError("Parsing error: line {:d} in {:s}\n{:s}".format(lineCount,inFile.name,line)) if lineResult != None: result.append(lineResult) #print ("\tproduced: {:s}".format(str(lineResult))) lineCount += lineNum-len(lines) lineNum = len(lines) return result transformPrefix = "xformStack" scriptPrefix = "startScript(); {" scriptSuffix = "} endScript();" def extractScript(lines): """Find the code belonging to a script item""" theScript = "" line = lines.pop(0) level = 1 while level > 0: check = line.lstrip() while check.endswith(scriptSuffix): level -= 1 line = line[:len(line)-len(scriptSuffix)] check = line.lstrip() if check.startswith(scriptPrefix): level += 1 theScript += line + "\n" if level > 0: line = lines.pop(0) global pendingTransformsD ts = pendingTransformsD[:] pendingTransformsD = [] return xasyScript(None,script=theScript,transforms=ts[:]) pendingTransforms = [] pendingTransformsD = [] def addTransform(index,t,active=1): """Place a transform in the list of transforms, expanding the list as needed""" while len(pendingTransformsD) < index+1: pendingTransformsD.append(identity()) deleted = int(active==0) pendingTransformsD[index]=asyTransform(t,deleted) def parseIndexedTransforms(args): """Parse a list of indexedTransforms, adding them to the current list of transforms""" global pendingTransformsD pendingTransformsD = [] args = args.replace("indexedTransform","") false = 0 tList = [eval(a) for a in ")?(".join(args.split("),(")).split("?")] for a in tList: addTransform(*a) def parseTransformExpression(line): """Parse statements related to the xformStack Syntax: xformStack.push(transform) e.g.: xformStack.push((0,0,1,0,0,1)); //the identity xformStack.add(indexedTransform(index,transform)[,...]) e.g.: xformStack.add(indexedTransform(1,(0,0,1,0,0,1)); """ global pendingTransforms stackCmd = line[len(transformPrefix)+1:line.find("(")] if line[-2:] != ");": raise xasyParseError("Invalid syntax") args = line[line.find("(")+1:-2] if stackCmd == "push": t = asyTransform(eval(args)) pendingTransforms.append(t) elif stackCmd == "add": parseIndexedTransforms(args) else: raise xasyParseError("Invalid transform stack command.") return None def parseLabel(line): """Parse an asy Label statement, returning an xasyText item""" if not (line.startswith("Label(") and line.endswith(",align=SE)")): raise xasyParseError("Invalid syntax") args = line[6:-1] loc2 = args.rfind(",align=SE") loc1 = args.rfind(",",0,loc2-1) loc = args.rfind(",(",0,loc1-1) if loc < 2: raise xasyParseError("Invalid syntax") text = args[1:loc-1] location = eval(args[loc+1:args.find("),",loc)+1]) pen = args[loc:loc2] pen = pen[pen.find(",")+1:] pen = pen[pen.find(",")+1:] pen = pen[pen.find(",")+1:] global pendingTransforms return xasyText(text,location,parsePen(pen),pendingTransforms.pop()) def parseLabelCommand(line): """Parse a label command returning an xasyText object Syntax: label(Label(text,location,pen,align=SE)); e.g.: label(Label("Hello world!",(0,0),rgb(0,0,0)+0.5,align=SE)); """ if line[-2:] != ");": raise xasyParseError("Invalid syntax") arguments = line[6:-2] return parseLabel(arguments) def parseDrawCommand(line): """Parse a draw command returning an xasyShape object Syntax: draw(path,pen); e.g.: draw((0,0)..controls(0.33,0.33)and(0.66,0.66)..(1,1),rgb(1,0,1)+1.5); """ if line[-2:] != ");": raise xasyParseError("Invalid syntax") args = line[5:-2] loc = args.rfind(",rgb") path = args[:loc] pen = args[loc+1:] global pendingTransforms return xasyShape(parsePathExpression(path),parsePen(pen),pendingTransforms.pop()) def parseFillCommand(line): """Parse a fill command returning an xasyFilledShape object Syntax: fill(cyclic path,pen); e.g.: fill((0,0)..controls(0.33,0.33)and(0.66,0.66)..(1,1)..controls(0.66,0)and(0.33,0)..cycle,rgb(1,0,1)+1.5); """ if line[-2:] != ");": raise xasyParseError("Invalid syntax") args = line[5:-2] loc = args.rfind(",rgb") path = args[:loc] pen = args[loc+1:] global pendingTransforms return xasyFilledShape(parsePathExpression(path),parsePen(pen),pendingTransforms.pop()) def parsePen(pen): """Parse a pen expression returning an asyPen Syntax: color+width[+options] e.g.: rgb(0,0,0)+1.5+evenodd e.g.: rgb(0,1,0)+1.23 """ try: tokens = pen.split("+") color = eval(tokens[0][3:]) width = float(tokens[1]) if len(tokens)>2: options = "+".join(tokens[2:]) else: options = "" return asyPen(color,width,options) except: raise xasyParseError("Invalid pen") def parsePathExpression(expr): """Parse an asy path returning an asyPath()""" result = asyPath() expr = "".join(expr.split()) #print (expr) if expr.find("controls") != -1: #parse a path with control points tokens = expr.split("..") nodes = [a for a in tokens if not a.startswith("controls")] for a in range(len(nodes)): if nodes[a] != "cycle": nodes[a] = eval(nodes[a]) controls = [[eval(b) for b in a.replace("controls", "").split("and")] for a in tokens if a.startswith("controls")] result.initFromControls(nodes, controls) else: #parse a path without control points tokens = re.split(r"(::|--|\.\.)",expr) linkSet = re.findall("::|--|\.\.",expr) nodeSet = [a for a in tokens if not re.match(r"::|--|\.\.",a)] #print (nodeSet) for a in range(len(nodeSet)): if nodeSet[a] != "cycle": nodeSet[a] = eval(nodeSet[a]) #print (nodeSet) result.initFromNodeList(nodeSet, linkSet) return result def takeUntilSemicolon(line,lines): """Read and concatenate lines until the collected lines end with a semicolon""" data = line while not data.endswith(";"): newline = lines.pop(0) data += newline return data def parseLine(line,lines): """Parse a line of the file""" if len(line)==0 or line.isspace() or line.startswith("//"): return None elif line.startswith(scriptPrefix): return extractScript(lines) elif line.startswith(transformPrefix): return parseTransformExpression(takeUntilSemicolon(line,lines)) elif line.startswith("label("): return parseLabelCommand(takeUntilSemicolon(line,lines)) elif line.startswith("draw("): return parseDrawCommand(takeUntilSemicolon(line,lines)) elif line.startswith("fill("): return parseFillCommand(takeUntilSemicolon(line,lines)) elif line.startswith("exitXasyMode();"): return None raise Exception("Could not parse the line") fileHeader = """initXasyMode(); // This file was generated by xasy. It may be edited manually, however, a strict // syntax must be followed. It is advised that manually scripted items be added // in the form of a script either by using xasy or by mimicking the format of an // xasy-generated script item. // Please consult the documentation or the examples provided for details. """ fileFooter = """// This is the end of the file exitXasyMode(); """ def saveFile(file,xasyItems): """Write a list of xasyItems to a file""" file.write(fileHeader) for item in xasyItems: file.write(item.getCode()+"\n\n") file.write(fileFooter) if __name__ == '__main__': root = Tk() try: name = raw_input("enter file name (\"../../xasyTest.asy\"):") if name == '': name = "../../xasyTest.asy" f = open(name,"rt") except: print ("Could not open file.") asy.quit() sys.exit(1) fileItems = [] try: fileItems = parseFile(f) res = [str(a) for a in fileItems] print ("----------------------------------") print ("Objects in {:s}".format(f.name)) print ("----------------------------------") for a in res: print (a) print ("----------------------------------") print ("successful parse") f.close() except: f.close() print ("parse failed") raise print ("making a file") f = open("testfile.asy","wt") saveFile(f,fileItems) f.close() root.configure(width=500,height=500) root.title("Results") canv = Canvas(root,width=500,height=500) canv.pack() for i in fileItems[1].imageList: canv.create_image(250+i.bbox[0],250-i.bbox[3],anchor = NW, image=i.image) Button(root,image=i.image).pack(side=LEFT) root.mainloop() ./asymptote-2.41/GUI/xasyGUIIcons.py0000755000175000017500000001146413064427076017077 0ustar norbertnorbert#!/usr/bin/env python ################################################################## # This file stores the icons used by the xasy GUI # # About images and base64 # # Suppose you have image.gif and want to create a base64 # string. This can be accomplished using: # # import base64 # base64.encodestring(open("image.gif","rb").read()) # # The resulting output, including the enclosing single quotes, # is the base64 encoding of the image and can be used in the # dictionary below. # # # Suppose you have a base64 string, b64str, and want to create # an image. This can be accomplished using: # # import base64 # open("image.gif","w").write(base64.decodestring(b64str)) # # # Author: Orest Shardt # Created: June 29, 2007 # ################################################################## import base64 import os #toolbar icon image data in base64 eliminates need to worry about files #these are the base64 encodings of the content of the directory xasy3Imgs iconB64 = { 'lower': 'R0lGODlhGAAYAPEBAAAAAP///8zMzAAAACH5BAEAAAIALAAAAAAYABgAAAItlI+py+0Po5yUgosz\nrrybK2giqADed6LHKCZm+p7xx2Zuqsqr95KcJpv9cJUCADs=\n', 'rotate': 'R0lGODlhGAAYAPAAAAAAAAAAACH5BAEAAAEALAAAAAAYABgAAAI7jI8JkO231mux1mkistL1zX0Q\ng2Fi6aGmurKp+8KKrJB0Zt+nzOQw6XPZgqjczuQ7eohKEDKoUYWIgQIAOw==\n', 'raise': 'R0lGODlhGAAYAPEBAAAAAP///8zMzAAAACH5BAEAAAIALAAAAAAYABgAAAIwlI+pywgND3ixzVvZ\nNDSn3nlKKH7fhaZmObKtk8Yh6dKlLcfC5vZ1jvIJh8SikVUAADs=\n', 'fillPoly': 'R0lGODlhGAAYAPEAAAAAAIOBgwAAAAAAACH5BAEAAAIALAAAAAAYABgAAAJGlI+py+0PEYgNBDCp\nDPxqY3UcRoViRzrmKWbLyqIMHI9vHbsbfuoHjfOBcrlbT0ATIo+gldKpMD1lL8vUo5oqS9vS5wsp\nAAA7\n', 'move': 'R0lGODlhGAAYAIABAAAAAP///yH5BAEAAAEALAAAAAAYABgAAAI4jI+py+0I3gNUNhqtwlVD7m3h\nkoVdUJ4MaKTYysVymbDoYcM4Tmv9eAO2cp6YEKUavY5BpvMZKgAAOw==\n', 'drawBezi': 'R0lGODlhGAAYAPEBAAAAAP///6usrQAAACH5BAEAAAIALAAAAAAYABgAAAI6lI+py+0AnYRUKhox\nsFvUFDXdM4LWUaKnEaorhqSX1noPmMquWJukzpr0YitRcfE5oobFpPIJjUoZBQA7\n', 'vertiMove': 'R0lGODlhGAAYAIABAAAAAP///yH5BAEAAAEALAAAAAAYABgAAAIsjI+py+0I3gNUNhqtwlVD7m3h\nko2QmZRooKKt+Y5xOFtc7dwrtrLd3gsKTQUAOw==\n', 'horizMove': 'R0lGODlhGAAYAIABAAAAAP///yH5BAEAAAEALAAAAAAYABgAAAIljI+py+0Po5y02oshAGu/7Skg\n143mSYpgGTYt8mbyTNf2jedWAQA7\n', 'fillEllip': 'R0lGODlhGAAYAPECAAAAAIOBg////6usrSH5BAEAAAMALAAAAAAYABgAAAJAnI+py+0PowS0gkmD\n3qE6wIXctYDi2SkmepLGyrYHHIcuXW93Lr+86BrgakHfrzjjIRGVFgVjWUqm1Kr1ijUUAAA7\n', 'text': 'R0lGODlhGAAYAIABAAAAAP///yH5BAEAAAEALAAAAAAYABgAAAI+jI+py+0Po5x0AgSu1SZvHnhS\nBnpio5Ukt2Idm3bysYrnddLwy+czH0rhFDkbTigj6UzKl68CjUqn1Ko1UAAAOw==\n', 'drawPoly': 'R0lGODlhGAAYAPAAAAAAAAAAACH5BAEAAAEALAAAAAAYABgAAAI4jI+py+0PEYhtgkmlzgFL/4DJ\nFULiVi4ns66smrUxrMj1fdqHR+60kfPdgCwLzbWTIU1LE+cJKQAAOw==\n', 'drawLines': 'R0lGODlhGAAYAPEBAAAAAP///6usrQAAACH5BAEAAAIALAAAAAAYABgAAAI3lI+py+0AnYRAPmoZ\njvlwX3Vh8j2XUIIWNXoZS3ZoO8soSK+4fRuYnQPyFEHhcHecFV+ppDNRAAA7\n', 'drawShape': 'R0lGODlhGAAYAPAAAAAAAAAAACH5BAEAAAEALAAAAAAYABgAAAI5jI+pywffIjQzIrCwdXnTplmh\nMoKmKIHVeZXp5cFcPH+0HbjbqKN17OoxgrTeKiOkPHjH3fIGjS4KADs=\n', 'drawEllip': 'R0lGODlhGAAYAPEBAAAAAP///6usrQAAACH5BAEAAAIALAAAAAAYABgAAAIylI+py+0PowS0gklX\ndRd29XmgdIQh+Z1TSSJpyxpqZMLqzOB4sgsbmKFZgrCi8YhMNgoAOw==\n', 'select': 'R0lGODlhGAAYAPIDAAAAAICAgMDAwP///6usrQAAAAAAAAAAACH5BAEAAAQALAAAAAAYABgAAANH\nSLrc/mvA6YCkGIiLIQhb54Gh2HwkZxKo4KoiSpam7L6rfdNZ4M+C3I+0Ush8wSLKCFIyPsnisyld\nAD7VabR6DWSt37BYmgAAOw==\n', 'fillShape': 'R0lGODlhGAAYAPEAAAAAAIOBgwAAAAAAACH5BAEAAAIALAAAAAAYABgAAAJHlI+pywff4gsUxgSo\nrhflzXXCB4YXWQIiCqpnubnLw8KyU8Omket77wvcgD4ZUTcMIj3KlOLYejY1N8/R0qChaCIrtgsO\nRwoAOw==\n', 'asy': 'R0lGODlhGAAYAIABAP8AAAAAACH5BAEKAAEALAIAAwAUABIAAAImjI+py+0AHINy0ZouNjBurmGd\nt40fFT4j2aydGqaBq8jvxH46UwAAOw==\n' } def createGIF(key): """Create a gif file from the data in the iconB64 list of icons""" if key not in iconB64.keys(): print ("Error: {:s} not found in icon list.".format(key)) print ("Available icons:",iconB64.keys()) else: print ("Generating {:s}.gif".format(key)) open("{:s}.gif".format(key),"w").write(base64.decodestring(iconB64[key])) def createGIFs(): """Create the files for all the icons in iconB64""" for name in iconB64.keys(): createGIF(name) def createStrFromGif(gifFile): """Create the base64 representation of a file""" return base64.encodestring(gifFile.read()) if __name__=='__main__': print ("Testing the xasyGUIIcons module.") print ("Generating all the GIFs:") createGIFs() print ("Checking consistency of all icons in iconB64") allpassed = True for icon in iconB64.keys(): print ("Checking {:s}".format(icon)) if createStrFromGif(open("{:s}.gif".format(icon),"rb")) == iconB64[icon]: print ("\tPassed.") else: print ("\tFailed.") allpassed= False if allpassed: print ("All files succeeded.") s = raw_input("Delete generated files? (y/n)") if s == "y": for name in iconB64.keys(): print ("Deleting {:s}.gif".format(name)) os.unlink(name+".gif") print ("\tdone") print ("Done") ./asymptote-2.41/GUI/xasyMainWin.py0000755000175000017500000021062513064427076017021 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasyMainWin implements the functionality of the GUI. It depends on # xasy2asy for its interaction with Asymptote. # # # Author: Orest Shardt # Created: June 29, 2007 # ########################################################################### import os import sys from string import * import subprocess import math import copy if sys.version_info >= (3, 0): # python3 from tkinter import * from tkinter import filedialog, messagebox, simpledialog else: # python2 # from Tkinter import * import tkFileDialog as filedialog import tkMessageBox as messagebox import tkSimpleDialog as simpledialog import threading import time from xasyVersion import xasyVersion import xasyCodeEditor from xasy2asy import * import xasyFile import xasyOptions import xasyOptionsDialog import CubicBezier from xasyBezierEditor import xasyBezierEditor from xasyGUIIcons import iconB64 from xasyColorPicker import * from UndoRedoStack import * from xasyActions import * import string try: from PIL import ImageTk from PIL import Image PILAvailable = True except: PILAvailable = False class xasyMainWin: def __init__(self,master,file=None,magnification=1.0): self.opLock = threading.Lock() self.parent = master self.magnification = magnification self.previousZoom = self.magnification self.magList = [0.1,0.25,1.0/3,0.5,1,2,3,4,5,10] self.bindGlobalEvents() self.createWidgets() self.resetGUI() site="" if not PILAvailable: messagebox.showerror("Failed Dependencies","An error occurred loading the required PIL library. Please install Pillow from http://pypi.python.org/pypi/Pillow") self.parent.destroy() sys.exit(1) if file != None: self.loadFile(file) self.parent.after(100,self.tickHandler) def testOrAcquireLock(self): val = self.opLock.acquire(False) if val: self.closeDisplayLock() return val def acquireLock(self): self.closeDisplayLock() self.opLock.acquire() def releaseLock(self): self.opLock.release() self.openDisplayLock() def tickHandler(self): self.tickCount += 1 self.mainCanvas.itemconfigure("outlineBox",dashoffset=self.tickCount%9) self.parent.after(100,self.tickHandler) def closeDisplayLock(self): self.status.config(text="Busy") self.parent.update_idletasks() def openDisplayLock(self): self.status.config(text="Ready") def bindGlobalEvents(self): #global bindings self.parent.bind_all("",lambda q:self.editUndoCmd())# z -> no shift self.parent.bind_all("",lambda q:self.editRedoCmd())# Z -> with shift self.parent.bind_all("",lambda q:self.fileOpenCmd()) self.parent.bind_all("",lambda q:self.fileNewCmd()) self.parent.bind_all("",lambda q:self.fileSaveCmd()) self.parent.bind_all("",lambda q:self.fileExitCmd()) self.parent.bind_all("",lambda q:self.helpHelpCmd()) def unbindGlobalEvents(self): #global bindings self.parent.unbind("") self.parent.unbind("") self.parent.unbind("") self.parent.unbind("") self.parent.unbind("") self.parent.unbind("") self.parent.unbind("") def createWidgets(self): #first some configuration self.parent.geometry("800x600") self.parent.title("Xasy") self.parent.resizable(True,True) #try to capture the closing of the window #find a better way to do this since the widgets may #already be destroyed when this is called self.parent.protocol("WM_DELETE_WINDOW",self.canQuit) #the main menu self.mainMenu = Menu(self.parent) self.parent.config(menu=self.mainMenu) #the file menu self.fileMenu = Menu(self.mainMenu,tearoff=0) self.fileMenu.add_command(label="New",command=self.fileNewCmd,accelerator="Ctrl+N",underline=0) self.fileMenu.add_command(label="Open",command=self.fileOpenCmd,accelerator="Ctrl+O",underline=0) self.fileMenu.add_separator() self.fileMenu.add_command(label="Save",command=self.fileSaveCmd,accelerator="Ctrl+S",underline=0) self.fileMenu.add_command(label="Save As",command=self.fileSaveAsCmd,underline=5) self.fileMenu.add_separator() #an export menu self.exportMenu = Menu(self.fileMenu,tearoff=0) self.exportMenu.add_command(label="EPS...",command=self.exportEPS,underline=0) self.exportMenu.add_command(label="PDF...",command=self.exportPDF,underline=0) self.exportMenu.add_command(label="GIF...",command=self.exportGIF,underline=0) self.exportMenu.add_command(label="PNG...",command=self.exportPNG,underline=1) self.exportMenu.add_command(label="SVG...",command=self.exportSVG,underline=0) self.fileMenu.add_cascade(label="Export",menu=self.exportMenu,underline=1) self.fileMenu.add_separator() self.fileMenu.add_command(label="Quit",command=self.fileExitCmd,accelerator="Ctrl+Q",underline=0) self.mainMenu.add_cascade(label="File",menu=self.fileMenu,underline=0) #the edit menu self.editMenu = Menu(self.mainMenu,tearoff=0) self.editMenu.add_command(label="Undo",command=self.editUndoCmd,accelerator="Ctrl+Z",underline=0) self.editMenu.add_command(label="Redo",command=self.editRedoCmd,accelerator="Shift+Ctrl+Z",underline=0) self.mainMenu.add_cascade(label="Edit",menu=self.editMenu,underline=0) #the tools menu self.toolsMenu = Menu(self.mainMenu,tearoff=0) self.mainMenu.add_cascade(label="Tools",menu=self.toolsMenu,underline=0) #the options menu self.optionsMenu = Menu(self.toolsMenu,tearoff=0) self.toolsMenu.add_cascade(label="Options",menu=self.optionsMenu,underline=0) self.optionsMenu.add_command(label="Edit...",command=self.editOptions,underline=0) self.optionsMenu.add_command(label="Reset defaults",command=self.resetOptions,underline=6) #the help menu self.helpMenu = Menu(self.mainMenu,tearoff=0) self.helpMenu.add_command(label="Help",command=self.helpHelpCmd,state=DISABLED,accelerator="F1",underline=0) self.helpMenu.add_command(label="Asymptote Documentation",command=self.helpAsyDocCmd,underline=10) self.helpMenu.add_separator() self.helpMenu.add_command(label="About xasy",command=self.helpAboutCmd,underline=0) self.mainMenu.add_cascade(label="Help",menu=self.helpMenu,underline=0) #status bar self.statusBar = Frame(self.parent,relief=FLAT) self.magVal = DoubleVar() self.magVal.set(round(100*self.magnification,1)) self.magVal.trace('w',self.zoomViewCmd) zoomList = self.magList if self.magnification not in zoomList: zoomList.append(self.magnification) zoomList.sort() zoomList = [round(100*i,1) for i in zoomList] self.zoomMenu = OptionMenu(self.statusBar,self.magVal,*zoomList) self.zoomMenu.pack(side=RIGHT) Label(self.statusBar,text="Zoom:",anchor=E,width=7).pack(side=RIGHT) self.coords = Label(self.statusBar,text="(0,0)",relief=SUNKEN,anchor=W) self.coords.pack(side=RIGHT,anchor=S) self.status = Label(self.statusBar,text="Ready",relief=SUNKEN,anchor=W) self.status.pack(side=RIGHT,fill=X,expand=1,anchor=SW) self.statusBar.pack(side=BOTTOM,fill=X) #toolbar for transformation, drawing, and adjustment commands self.toolBar = Frame(self.parent,relief=FLAT,borderwidth=3) #let's load some images self.toolIcons = {} for x in iconB64.keys(): self.toolIcons[x] = PhotoImage(data=iconB64[x]) self.transformLbl = Label(self.toolBar,text="",anchor=W) self.transformLbl.grid(row=0,column=0,columnspan=2,sticky=W) self.toolSelectButton = Button(self.toolBar,command=self.toolSelectCmd,image=self.toolIcons["select"]) self.toolSelectButton.grid(row=1,column=0,sticky=N+S+E+W) self.toolMoveButton = Button(self.toolBar,command=self.toolMoveCmd,image=self.toolIcons["move"]) self.toolMoveButton.grid(row=2,column=0,sticky=N+S+E+W) self.toolRotateButton = Button(self.toolBar,command=self.toolRotateCmd,image=self.toolIcons["rotate"]) self.toolRotateButton.grid(row=2,column=1,sticky=N+S+E+W) self.toolVertiMoveButton = Button(self.toolBar,command=self.toolVertiMoveCmd,image=self.toolIcons["vertiMove"]) self.toolVertiMoveButton.grid(row=3,column=0,sticky=N+S+E+W) self.toolHorizMoveButton = Button(self.toolBar,command=self.toolHorizMoveCmd,image=self.toolIcons["horizMove"]) self.toolHorizMoveButton.grid(row=3,column=1,sticky=N+S+E+W) self.drawLbl = Label(self.toolBar,text="",anchor=W) self.drawLbl.grid(row=4,column=0,columnspan=2,sticky=W) self.toolDrawLinesButton = Button(self.toolBar,command=self.toolDrawLinesCmd,image=self.toolIcons["drawLines"]) self.toolDrawLinesButton.grid(row=5,column=0,sticky=N+S+E+W) self.toolDrawBeziButton = Button(self.toolBar,command=self.toolDrawBeziCmd,image=self.toolIcons["drawBezi"]) self.toolDrawBeziButton.grid(row=5,column=1,sticky=N+S+E+W) self.toolDrawPolyButton = Button(self.toolBar,command=self.toolDrawPolyCmd,image=self.toolIcons["drawPoly"]) self.toolDrawPolyButton.grid(row=6,column=0,sticky=N+S+E+W) self.toolFillPolyButton = Button(self.toolBar,command=self.toolFillPolyCmd,image=self.toolIcons["fillPoly"]) self.toolFillPolyButton.grid(row=6,column=1,sticky=N+S+E+W) self.toolDrawEllipButton = Button(self.toolBar,command=self.toolDrawEllipCmd,image=self.toolIcons["drawEllip"],state=DISABLED,relief=FLAT) #self.toolDrawEllipButton.grid(row=7,column=0,sticky=N+S+E+W) self.toolFillEllipButton = Button(self.toolBar,command=self.toolFillEllipCmd,image=self.toolIcons["fillEllip"],state=DISABLED,relief=FLAT) #self.toolFillEllipButton.grid(row=7,column=1,sticky=N+S+E+W) self.toolDrawShapeButton = Button(self.toolBar,command=self.toolDrawShapeCmd,image=self.toolIcons["drawShape"]) self.toolDrawShapeButton.grid(row=8,column=0,sticky=N+S+E+W) self.toolFillShapeButton = Button(self.toolBar,command=self.toolFillShapeCmd,image=self.toolIcons["fillShape"]) self.toolFillShapeButton.grid(row=8,column=1,sticky=N+S+E+W) self.toolTextButton = Button(self.toolBar,command=self.toolTextCmd,image=self.toolIcons["text"]) self.toolTextButton.grid(row=9,column=0,sticky=N+S+E+W) self.toolAsyButton = Button(self.toolBar,command=self.toolAsyCmd,image=self.toolIcons["asy"]) self.toolAsyButton.grid(row=9,column=1,sticky=N+S+E+W) self.adjLbl = Label(self.toolBar,text="",anchor=W) self.adjLbl.grid(row=10,column=0,columnspan=2,sticky=W) self.toolRaiseButton = Button(self.toolBar,command=self.toolRaiseCmd,image=self.toolIcons["raise"]) self.toolRaiseButton.grid(row=11,column=0,sticky=N+S+E+W) self.toolLowerButton = Button(self.toolBar,command=self.toolLowerCmd,image=self.toolIcons["lower"]) self.toolLowerButton.grid(row=11,column=1,sticky=N+S+E+W) self.toolBar.pack(side=LEFT,anchor=NW) #documentation for the tool bar buttons self.toolDocs = { self.toolSelectButton : "Click an item to select it. Control-Click will select/deselect additional items. Use mouse scroller (or Up/Down keys) to raise/lower highlighted items.", self.toolMoveButton : "Drag a selected item.", self.toolHorizMoveButton : "Drag a selected item. Only horizontal translation will be applied.", self.toolVertiMoveButton : "Drag a selected item. Only vertical translation will be applied.", self.toolRotateButton : "Drag a selected item to rotate it.", self.toolDrawLinesButton : "Click to draw line segments. Double click to place last point.", self.toolDrawBeziButton : "Click to place points. Double click to place last point.", self.toolDrawPolyButton : "Click to place vertices. Double click to place last point.", self.toolFillPolyButton : "Click to place vertices. Double click to place last point.", self.toolDrawEllipButton : "(UNIMPLEMENTED)Click to place center. Move mouse to achieve correct shape and double click.", self.toolFillEllipButton : "(UNIMPLEMENTED)Click to place center. Move mouse to achieve correct shape and double click.", self.toolDrawShapeButton : "Click to place points. Double click to place last point.", self.toolFillShapeButton : "Click to place points. Double click to place last point.", self.toolTextButton : "Click location of top left label position and enter text in dialog.", self.toolRaiseButton : "Raise selected items to top.", self.toolLowerButton : "Lower selected items to bottom.", self.toolAsyButton : "Insert/Edit Asymptote code." } #Current pen settings self.optionsBar = Frame(self.parent,height=100,relief=FLAT,borderwidth=3) self.penDisp = Canvas(self.optionsBar,width=100,height=25,bg="white",relief=SUNKEN,borderwidth=3) self.penDisp.grid(row=0,column=0,padx=3,pady=3) self.penDisp.create_line(10,25,30,10,60,20,80,10,smooth=True,tags="penDisp") self.penDisp.create_text(100,30,text="x1",tags="penMag",anchor=SE,font=("times","8")) self.penColButton = Button(self.optionsBar,text="Color...",width=5,command=self.setPenColCmd,relief=FLAT) self.penColButton.grid(row=0,column=1,padx=3,pady=3) Label(self.optionsBar,text="Width",anchor=E).grid(row=0,column=2) self.penWidthEntry = Entry(self.optionsBar,width=5) self.penWidthEntry.bind("",self.penWidthChanged) self.penWidthEntry.bind("",self.applyPenWidthEvt) self.penWidthEntry.bind("",self.applyPenWidthEvt) self.penWidthEntry.grid(row=0,column=3) Label(self.optionsBar,text="Options",anchor=E).grid(row=0,column=4) self.penOptEntry = Entry(self.optionsBar) self.penOptEntry.bind("",self.applyPenOptEvt) self.penOptEntry.bind("",self.applyPenOptEvt) self.penOptEntry.grid(row=0,column=5) self.optionsBar.pack(side=BOTTOM,anchor=NW) #a paned window for the canvas and propert explorer self.windowPane = PanedWindow(self.parent) #a property explorer self.propFrame = Frame(self.parent) self.propFrame.rowconfigure(1,weight=1) self.propFrame.columnconfigure(0,weight=1) Label(self.propFrame,text="Item List").grid(row=0,column=0,columnspan=2) self.itemScroll = Scrollbar(self.propFrame,orient=VERTICAL) self.propList = Listbox(self.propFrame, yscrollcommand=self.itemScroll.set) self.itemScroll.config(command=self.propList.yview) self.itemScroll.grid(row=1,column=1,sticky=N+S) self.propList.grid(row=1,column=0,sticky=N+S+E+W) self.propList.bind("",self.propSelect) self.propList.bind("",self.itemPropMenuPopup) #the canvas's frame self.canvFrame = Frame(self.parent,relief=FLAT,borderwidth=0) self.canvFrame.rowconfigure(0,weight=1) self.canvFrame.columnconfigure(0,weight=1) self.canvVScroll = Scrollbar(self.canvFrame,orient=VERTICAL) self.canvHScroll = Scrollbar(self.canvFrame,orient=HORIZONTAL) self.canvHScroll.grid(row=1,column=0,sticky=E+W) self.canvVScroll.grid(row=0,column=1,sticky=N+S) #add the frames to the window pane self.windowPane.pack(side=RIGHT,fill=BOTH,expand=True) self.windowPane.add(self.canvFrame) self.windowPane.add(self.propFrame) self.windowPane.paneconfigure(self.propFrame,minsize=50,sticky=N+S+E+W) self.windowPane.bind("",self.togglePaneEvt) #the highly important canvas! self.mainCanvas = Canvas(self.canvFrame,relief=SUNKEN,background="white",borderwidth=3, highlightthickness=0,closeenough=1.0,yscrollcommand=self.canvVScroll.set, xscrollcommand=self.canvHScroll.set) self.mainCanvas.grid(row=0,column=0,sticky=N+S+E+W) self.canvVScroll.config(command=self.mainCanvas.yview) self.canvHScroll.config(command=self.mainCanvas.xview) self.mainCanvas.bind("",self.canvMotion) self.mainCanvas.bind("",self.canvLeftDown) self.mainCanvas.bind("",self.endDraw) self.mainCanvas.bind("",self.canvLeftUp) self.mainCanvas.bind("",self.canvDrag) self.mainCanvas.bind("",self.canvEnter) self.mainCanvas.bind("",self.canvLeave) self.mainCanvas.bind("",self.itemDelete) #self.mainCanvas.bind("",self.canvRightDown) #self.mainCanvas.bind("",self.canvRightUp) self.mainCanvas.bind("",self.itemRaise) self.mainCanvas.bind("",self.itemLower) self.mainCanvas.bind("",self.itemRaise) self.mainCanvas.bind("",self.itemLower) self.mainCanvas.bind("",self.configEvt) def foregroundPenColor(self,hex): hex = hex[1:] rgb = max(hex[0:2], hex[2:4], hex[4:6]) if(rgb >= "80"): return "black" else: return "white" def resetGUI(self): #set up the main window self.filename = None self.fileToOpen = None self.retitle() #set up the paned window self.paneVisible = True #setup the pen entries self.pendingPenWidthChange = None self.pendingPenOptChange = None #load one-time configs xasyOptions.load() self.tkPenColor = xasyOptions.options['defPenColor'] self.penColor = makeRGBfromTkColor(self.tkPenColor) self.penColButton.config(activebackground=self.tkPenColor, activeforeground=self.foregroundPenColor(self.tkPenColor)) self.penWidth = xasyOptions.options['defPenWidth'] self.penWidthEntry.select_range(0,END) self.penWidthEntry.delete(0,END) self.penWidthEntry.insert(END,str(self.penWidth)) self.penOptions = xasyOptions.options['defPenOptions'] self.penOptEntry.select_range(0,END) self.penOptEntry.delete(0,END) self.penOptEntry.insert(END,str(self.penOptions)) self.showCurrentPen() #load modifiable configs self.applyOptions() #set up editing self.editor = None #set up drawing self.pathInProgress = asyPath() self.currentIDTag = -1 self.inDrawingMode = False self.freeMouseDown = True self.dragSelecting = False self.itemsBeingRotated = [] self.inRotatingMode = False #set up the toolbar try: self.updateSelectedButton(self.toolSelectButton) except: self.selectedButton = self.toolSelectButton self.updateSelectedButton(self.toolSelectButton) #set up the canvas self.mainCanvas.delete(ALL) self.mainCanvas.create_rectangle(0,0,0,0,tags="outlineBox",width=0,outline="#801111",dash=(3,6)) self.backColor = "white" #in future, load this from an options file. Or, should this really be an option? self.mainCanvas.configure(background=self.backColor) #set up the xasy item list self.fileItems = [] self.propList.delete(0,END) self.updateCanvasSize() #setup timer self.tickCount = 0 #setup undo/redo! self.undoRedoStack = actionStack() self.amDragging = False def retitle(self): if self.filename == None: self.parent.title("Xasy - New File") else: name = os.path.abspath(self.filename) name = os.path.basename(name) self.parent.title("Xasy - %s"%name) def applyOptions(self): self.gridcolor = xasyOptions.options['gridColor'] self.tickcolor = xasyOptions.options['tickColor'] self.axiscolor = xasyOptions.options['axesColor'] self.gridVisible = xasyOptions.options['showGrid'] self.gridxspace = xasyOptions.options['gridX'] self.gridyspace = xasyOptions.options['gridY'] self.axesVisible = xasyOptions.options['showAxes'] self.axisxspace = xasyOptions.options['axisX'] self.axisyspace = xasyOptions.options['axisY'] self.updateCanvasSize() #test the asyProcess startQuickAsy() if not quickAsyRunning(): if messagebox.askyesno("Xasy Error","Asymptote could not be executed.\r\nTry to find Asymptote automatically?"): xasyOptions.setAsyPathFromWindowsRegistry() xasyOptions.save() startQuickAsy() while not quickAsyRunning(): if messagebox.askyesno("Xasy Error","Asymptote could not be executed.\r\nEdit settings?"): xasyOptionsDialog.xasyOptionsDlg(self.parent) xasyOptions.save() startQuickAsy() else: self.parent.destroy() sys.exit(1) def drawGrid(self): self.mainCanvas.delete("grid") if not self.gridVisible: return left,top,right,bottom = [int(float(a)) for a in self.mainCanvas.cget("scrollregion").split()] gridyspace = int(self.magnification*self.gridyspace) gridxspace = int(self.magnification*self.gridxspace) if gridxspace >= 3 and gridyspace >= 3: for i in range(0,right,gridxspace): self.mainCanvas.create_line(i,top,i,bottom,tags=("grid","vertical"),fill=self.gridcolor) for i in range(-gridxspace,left,-gridxspace): self.mainCanvas.create_line(i,top,i,bottom,tags=("grid","vertical"),fill=self.gridcolor) for i in range(-gridyspace,top,-gridyspace): self.mainCanvas.create_line(left,i,right,i,tags=("grid","horizontal"),fill=self.gridcolor) for i in range(0,bottom,gridyspace): self.mainCanvas.create_line(left,i,right,i,tags=("grid","horizontal"),fill=self.gridcolor) self.mainCanvas.tag_lower("grid") def drawAxes(self): self.mainCanvas.delete("axes") if not self.axesVisible: return left,top,right,bottom = [int(float(a)) for a in self.mainCanvas.cget("scrollregion").split()] self.mainCanvas.create_line(0,top,0,bottom,tags=("axes","yaxis"),fill=self.axiscolor) self.mainCanvas.create_line(left,0,right,0,tags=("axes","xaxis"),fill=self.axiscolor) axisxspace = int(self.magnification*self.axisxspace) axisyspace = int(self.magnification*self.axisyspace) if axisxspace >= 3 and axisyspace >= 3: for i in range(axisxspace,right,axisxspace): self.mainCanvas.create_line(i,-5,i,5,tags=("axes","xaxis-ticks"),fill=self.tickcolor) for i in range(-axisxspace,left,-axisxspace): self.mainCanvas.create_line(i,-5,i,5,tags=("axes","xaxis-ticks"),fill=self.tickcolor) for i in range(-axisyspace,top,-axisyspace): self.mainCanvas.create_line(-5,i,5,i,tags=("axes","yaxis-ticks"),fill=self.tickcolor) for i in range(axisyspace,bottom,axisyspace): self.mainCanvas.create_line(-5,i,5,i,tags=("axes","yaxis-ticks"),fill=self.tickcolor) self.mainCanvas.tag_lower("axes") def updateCanvasSize(self,left=-200,top=-200,right=200,bottom=200): self.parent.update_idletasks() bbox = self.mainCanvas.bbox("drawn || image || node || precontrol || postcontrol") if bbox == None: bbox = (0,0,0,0) #(topleft, bottomright) left = min(bbox[0],left) top = min(bbox[1],top) right = max(bbox[2],right) bottom = max(bbox[3],bottom) w,h = self.mainCanvas.winfo_width(),self.mainCanvas.winfo_height() if right-left < w: extraw = w-(right-left) right += extraw//2 left -= extraw//2 if bottom-top < h: extrah = h-(bottom-top) bottom += extrah//2 top -= extrah//2 self.mainCanvas.config(scrollregion=(left,top,right,bottom)) #self.mainCanvas.xview(MOVETO,float(split(self.mainCanvas["scrollregion"])[0])) #self.mainCanvas.yview(MOVETO,float(split(self.mainCanvas["scrollregion"])[1])) #self.mainCanvas.xview(MOVETO,(left+right)/2) #self.mainCanvas.yview(MOVETO,(top+bottom)/2) self.drawAxes() self.drawGrid() def bindEvents(self,tagorID): if tagorID == None: return self.mainCanvas.tag_bind(tagorID,"",self.itemToggleSelect) self.mainCanvas.tag_bind(tagorID,"",self.itemSelect) self.mainCanvas.tag_bind(tagorID,"",self.itemMouseUp) self.mainCanvas.tag_bind(tagorID,"",self.itemEditEvt) self.mainCanvas.tag_bind(tagorID,"",self.itemDrag) self.mainCanvas.tag_bind(tagorID,"",self.itemDelete) self.mainCanvas.tag_bind(tagorID,"",self.itemHighlight) self.mainCanvas.tag_bind(tagorID,"",self.itemCanvasMenuPopup) def bindItemEvents(self,item): if item == None: return if isinstance(item,xasyScript) or isinstance(item,xasyText): for image in item.imageList: self.bindEvents(image.IDTag) else: self.bindEvents(item.IDTag) def canQuit(self,force=False): #print ("Quitting") if not force and not self.testOrAcquireLock(): return try: self.releaseLock() except: pass if self.undoRedoStack.changesMade(): result = messagebox._show("xasy","File has been modified.\nSave changes?",icon=messagebox.QUESTION,type=messagebox.YESNOCANCEL) if str(result) == messagebox.CANCEL: return elif result == messagebox.YES: self.fileSaveCmd() try: os.rmdir(getAsyTempDir()) except: pass stopQuickAsy() self.parent.destroy() def openFile(self,name): if(not self.testOrAcquireLock()): return self.releaseLock() #release the lock for loadFile self.resetGUI() self.loadFile(name) def loadFile(self,name): self.status.config(text="Loading "+name) self.filename = os.path.abspath(name) startQuickAsy() self.retitle() try: try: f = open(self.filename,'rt') except: if self.filename[-4:] == ".asy": raise else: f = open(self.filename+".asy",'rt') self.filename += ".asy" self.retitle() self.fileItems = xasyFile.parseFile(f) f.close() except IOError: messagebox.showerror("File Opening Failed.","File could not be opened.") self.fileItems = [] except: self.fileItems = [] self.autoMakeScript = True if self.autoMakeScript or messagebox.askyesno("Error Opening File", "File was not recognized as an xasy file.\nLoad as a script item?"): try: item = xasyScript(self.mainCanvas) f.seek(0) item.setScript(f.read()) self.addItemToFile(item) except: messagebox.showerror("File Opening Failed.","Could not load as a script item.") self.fileItems = [] self.populateCanvasWithItems() self.populatePropertyList() self.updateCanvasSize() def populateCanvasWithItems(self): if(not self.testOrAcquireLock()): return self.mainCanvas.delete("drawn || image") self.itemCount = 0 for item in self.fileItems: item.drawOnCanvas(self.mainCanvas,self.magnification,forceAddition=True) self.bindItemEvents(item) self.releaseLock() def propListCountItem(self,item): plist = self.propList.get(0,END) count = 1 for text in plist: if text.startswith(item): count += 1 return count def describeItem(self,item): if isinstance(item,xasyScript): return "Code Module "+str(self.propListCountItem("Code Module")) elif isinstance(item,xasyText): return "Text Label "+str(self.propListCountItem("Text Label")) elif isinstance(item,xasyFilledShape): return "Filled Shape "+str(self.propListCountItem("Filled Shape")) elif isinstance(item,xasyShape): return "Outline "+str(self.propListCountItem("Outline")) else: return "If this happened, the program is corrupt!" def populatePropertyList(self): self.propList.delete(0,END) for item in self.fileItems: self.propList.insert(0,self.describeItem(item)) def saveFile(self,name): if(not self.testOrAcquireLock()): return f = open(name,"wt") xasyFile.saveFile(f,self.fileItems) f.close() self.undoRedoStack.setCommitLevel() self.retitle() self.releaseLock() #menu commands def fileNewCmd(self): if(not self.testOrAcquireLock()): return self.releaseLock() #print ("Create New File") if self.undoRedoStack.changesMade(): result = messagebox._show("xasy","File has been modified.\nSave changes?",icon=messagebox.QUESTION,type=messagebox.YESNOCANCEL) if str(result) == messagebox.CANCEL: return elif result == messagebox.YES: self.fileSaveCmd() self.resetGUI() def fileOpenCmd(self): if(not self.testOrAcquireLock()): return self.releaseLock() #print ("Open a file") if self.undoRedoStack.changesMade(): result = messagebox._show("xasy","File has been modified.\nSave changes?",icon=messagebox.QUESTION,type=messagebox.YESNOCANCEL) if str(result) == messagebox.CANCEL: return elif result == messagebox.YES: self.fileSaveCmd() filename=filedialog.askopenfilename(filetypes=[("asy files","*.asy"),("All files","*")],title="Open File",parent=self.parent) if type(filename) != type((0,)) and filename != None and filename != '': self.filename = filename self.openFile(self.filename) def fileSaveCmd(self): #print ("Save current file") if(not self.testOrAcquireLock()): return self.releaseLock() if self.filename == None: filename=filedialog.asksaveasfilename(defaultextension=".asy",filetypes=[("asy files","*.asy")],initialfile="newDrawing.asy",parent=self.parent,title="Save File") if type(filename) != type((0,)) and filename != None and filename != '': self.filename = filename if self.filename != None: self.saveFile(self.filename) def fileSaveAsCmd(self): if(not self.testOrAcquireLock()): return self.releaseLock() #print ("Save current file as") filename=filedialog.asksaveasfilename(defaultextension=".asy",filetypes=[("asy files","*.asy")],initialfile="newDrawing.asy",parent=self.parent,title="Save File") if type(filename) != type((0,)) and filename != None and filename != '': self.filename = filename self.saveFile(self.filename) #export the file def exportEPS(self): self.exportFile(self.filename,"eps") def exportPDF(self): self.exportFile(self.filename,"pdf") def exportGIF(self): self.exportFile(self.filename,"gif") def exportPNG(self): self.exportFile(self.filename,"png") def exportSVG(self): self.exportFile(self.filename,"svg") def exportFile(self,inFile, outFormat): if(not self.testOrAcquireLock()): return self.releaseLock() if inFile == None: if messagebox.askyesno("xasy","File has not been saved.\nSave?"): self.fileSaveAsCmd() inFile = self.filename else: return elif self.undoRedoStack.changesMade(): choice = messagebox._show("xasy","File has been modified.\nOnly saved changes can be exported.\nDo you want to save changes?",icon=messagebox.QUESTION,type=messagebox.YESNOCANCEL) choice = str(choice) if choice != messagebox.YES: return else: self.fileSaveCmd() name = os.path.splitext(os.path.basename(self.filename))[0]+'.'+outFormat outfilename = filedialog.asksaveasfilename(defaultextension = '.'+outFormat,filetypes=[(outFormat+" files","*."+outFormat)],initialfile=name,parent=self.parent,title="Choose output file") if type(outfilename)==type((0,)) or not outfilename or outfilename == '': return fullname = os.path.abspath(outfilename) outName = os.path.basename(outfilename) command=[xasyOptions.options['asyPath'],"-f"+outFormat,"-o"+fullname,inFile] saver = subprocess.Popen(command,stdin=PIPE,stdout=PIPE,stderr=PIPE) saver.wait() if saver.returncode != 0: messagebox.showerror("Export Error","Export Error:\n"+saver.stdout.read()+saver.stderr.read()) self.status.config(text="Error exporting file") else: self.status.config(text="File exported successfully") def fileExitCmd(self): #print ("Exit xasy") self.canQuit() def editUndoCmd(self): if not self.editor == None: return if(not self.testOrAcquireLock()): return self.undoOperation() self.releaseLock() def editRedoCmd(self): if not self.editor == None: return if(not self.testOrAcquireLock()): return self.redoOperation() self.releaseLock() def helpHelpCmd(self): print ("Get help on xasy") def helpAsyDocCmd(self): #print ("Open documentation about Asymptote") asyExecute("help;\n") def helpAboutCmd(self): messagebox.showinfo("About xasy","A graphical interface for Asymptote "+xasyVersion) def updateSelectedButton(self,newB): if(not self.testOrAcquireLock()): return self.releaseLock() #disable switching modes during an incomplete drawing operation if self.inDrawingMode: return self.selectedButton.config(relief = RAISED) if newB == self.toolSelectButton or self.selectedButton == self.toolSelectButton: self.mainCanvas.delete("highlightBox") if self.editor != None: self.editor.endEdit() if self.editor.modified: self.undoRedoStack.add(editDrawnItemAction(self,self.itemBeingEdited,copy.deepcopy(self.editor.shape),self.fileItems.index(self.editor.shape))) if newB not in (self.toolSelectButton,self.toolMoveButton,self.toolHorizMoveButton,self.toolVertiMoveButton,self.toolRotateButton): self.clearSelection() self.selectedButton = newB self.selectedButton.config(relief = SUNKEN) self.status.config(text=self.toolDocs[newB]) #toolbar commands def toolSelectCmd(self): self.updateSelectedButton(self.toolSelectButton) def toolMoveCmd(self): self.updateSelectedButton(self.toolMoveButton) def toolRotateCmd(self): self.updateSelectedButton(self.toolRotateButton) def toolVertiMoveCmd(self): self.updateSelectedButton(self.toolVertiMoveButton) def toolHorizMoveCmd(self): self.updateSelectedButton(self.toolHorizMoveButton) def toolDrawLinesCmd(self): self.updateSelectedButton(self.toolDrawLinesButton) def toolDrawBeziCmd(self): self.updateSelectedButton(self.toolDrawBeziButton) def toolDrawPolyCmd(self): self.updateSelectedButton(self.toolDrawPolyButton) def toolFillPolyCmd(self): self.updateSelectedButton(self.toolFillPolyButton) def toolDrawEllipCmd(self): self.updateSelectedButton(self.toolDrawEllipButton) def toolFillEllipCmd(self): self.updateSelectedButton(self.toolFillEllipButton) def toolDrawShapeCmd(self): self.updateSelectedButton(self.toolDrawShapeButton) def toolFillShapeCmd(self): self.updateSelectedButton(self.toolFillShapeButton) def toolTextCmd(self): self.updateSelectedButton(self.toolTextButton) def toolAsyCmd(self): # ignore the command if we are too busy to process it if not self.testOrAcquireLock(): return self.updateSelectedButton(self.toolSelectButton) self.clearSelection() self.clearHighlight() self.unbindGlobalEvents() try: self.getNewText("// enter your code here") except Exception as e: messagebox.showerror('xasy Error',e.message) else: self.addItemToFile(xasyScript(self.mainCanvas)) text = self.newText self.undoRedoStack.add(addScriptAction(self,self.fileItems[-1])) self.fileItems[-1].setScript(text) self.fileItems[-1].drawOnCanvas(self.mainCanvas,self.magnification) self.bindItemEvents(self.fileItems[-1]) self.bindGlobalEvents() self.releaseLock() def toolRaiseCmd(self): if(not self.testOrAcquireLock()): return self.releaseLock() if not self.inDrawingMode and self.editor == None: itemList = [] indexList = [] for ID in self.mainCanvas.find_withtag("selectedItem"): item = self.findItem(ID) if item not in itemList: itemList.append(item) indexList.append(self.fileItems.index(item)) self.raiseSomething(item) self.undoRedoStack.add(itemRaiseAction(self,itemList,indexList)) def toolLowerCmd(self): if(not self.testOrAcquireLock()): return self.releaseLock() if not self.inDrawingMode and self.editor == None: itemList = [] indexList = [] for ID in self.mainCanvas.find_withtag("selectedItem"): item = self.findItem(ID) if item not in itemList: itemList.append(item) indexList.append(self.fileItems.index(item)) self.lowerSomething(item) self.undoRedoStack.add(itemLowerAction(self,itemList,indexList)) def itemRaise(self,event): self.mainCanvas.tag_raise(CURRENT) def itemLower(self,event): self.mainCanvas.tag_lower(CURRENT) #options bar commands def setPenColCmd(self): if not self.testOrAcquireLock(): return old = self.penColor self.penColor = xasyColorDlg(self.parent).getColor(self.penColor) if self.penColor != old: self.tkPenColor = RGB255hex(RGBreal255(self.penColor)) self.penColButton.config(activebackground=self.tkPenColor, activeforeground=self.foregroundPenColor(self.tkPenColor)) self.showCurrentPen() self.releaseLock() def clearSelection(self): self.hideSelectionBox() self.mainCanvas.dtag("selectedItem","selectedItem") def hideSelectionBox(self): self.mainCanvas.itemconfigure("outlineBox",width=1,outline=self.backColor) self.mainCanvas.tag_lower("outlineBox") self.mainCanvas.coords("outlineBox",self.mainCanvas.bbox(ALL)) def showSelectionBox(self): self.mainCanvas.itemconfigure("outlineBox",width=2,outline="#801111") self.mainCanvas.tag_raise("outlineBox") def setSelection(self,what): self.mainCanvas.addtag_withtag("selectedItem",what) self.updateSelection() if self.selectedButton == self.toolSelectButton and len(self.mainCanvas.find_withtag("selectedItem")) > 0: self.updateSelectedButton(self.toolMoveButton) def unSelect(self,what): self.mainCanvas.dtag(what,"selectedItem") self.updateSelection() def updateSelection(self): self.clearHighlight() theBbox = self.mainCanvas.bbox("selectedItem") if theBbox != None: theBbox = (theBbox[0]-2,theBbox[1]-2,theBbox[2]+2,theBbox[3]+2) self.mainCanvas.coords("outlineBox",theBbox) self.showSelectionBox() else: self.clearSelection() #event handlers def updateZoom(self): self.zoomMenu.config(state=DISABLED) self.magnification = self.magVal.get()/100.0 if self.magnification != self.previousZoom: self.populateCanvasWithItems() self.updateCanvasSize() self.updateSelection() self.drawAxes() self.drawGrid() self.previousZoom = self.magnification self.zoomMenu.config(state=NORMAL) def zoomViewCmd(self,*args): magnification = self.magVal.get()/100.0 self.updateZoom(); def selectItem(self,item): self.clearSelection() if isinstance(item,xasyScript) or isinstance(item,xasyText): for image in item.imageList: self.setSelection(image.IDTag) else: self.setSelection(item.IDTag) def propSelect(self,event): items = [int(a) for a in self.propList.curselection()] if len(items)>0: try: self.selectItem(self.fileItems[len(self.fileItems)-items[0]-1]) except: raise def findItem(self,ID): for item in self.fileItems: if isinstance(item,xasyScript) or isinstance(item,xasyText): for image in item.imageList: if image.IDTag == ID: return item else: if item.IDTag == ID: return item raise Exception("Illegal operation: Item with matching ID could not be found.") def findItemImageIndex(self,item,ID): count = 0 for image in item.imageList: if image.IDTag == ID: return count else: count += 1 raise Exception("Illegal operation: Image with matching ID could not be found.") return None def raiseSomething(self,item,force=False): if self.fileItems[-1] != item or force: index = len(self.fileItems)-self.fileItems.index(item)-1 text = self.propList.get(index) self.propList.delete(index) self.propList.insert(0,text) for i in range(self.fileItems.index(item),len(self.fileItems)-1): self.fileItems[i] = self.fileItems[i+1] self.fileItems[-1] = item if isinstance(item,xasyScript) or isinstance(item,xasyText): for im in item.imageList: if im.IDTag != None: self.mainCanvas.tag_raise(im.IDTag) else: if item.IDTag != None: self.mainCanvas.tag_raise(item.IDTag) def lowerSomething(self,item): if self.fileItems[0] != item: index = len(self.fileItems)-self.fileItems.index(item)-1 text = self.propList.get(index) self.propList.delete(index) self.propList.insert(END,text) indices = range(self.fileItems.index(item)) indices.reverse() for i in indices: self.fileItems[i+1] = self.fileItems[i] self.fileItems[0] = item if isinstance(item,xasyScript) or isinstance(item,xasyText): item.imageList.reverse() for im in item.imageList: if im.IDTag != None: self.mainCanvas.tag_lower(im.IDTag) item.imageList.reverse() else: if item.IDTag != None: self.mainCanvas.tag_lower(item.IDTag) self.mainCanvas.tag_lower("axes || grid") def translateSomething(self,ID,translation,specificItem=None,specificIndex=None): transform = asyTransform((translation[0],translation[1],1,0,0,1)) if ID == -1: item = specificItem else: item = self.findItem(ID) if isinstance(item,xasyText) or isinstance(item,xasyScript): if ID == -1: index = specificIndex else: index = self.findItemImageIndex(item,ID) try: original = item.transform[index] except: original = identity() item.transform[index] = transform*original bbox = item.imageList[index].originalImage.bbox item.imageList[index].originalImage.bbox = bbox[0]+translation[0],bbox[1]+translation[1],bbox[2]+translation[0],bbox[3]+translation[1] else: item.transform = [transform*item.transform[0]] def makeRotationMatrix(self,theta,origin): rotMat = (math.cos(theta),-math.sin(theta),math.sin(theta),math.cos(theta)) shift = asyTransform((0,0,1-rotMat[0],-rotMat[1],-rotMat[2],1-rotMat[3]))*origin return asyTransform((shift[0],shift[1],rotMat[0],rotMat[1],rotMat[2],rotMat[3])) def rotateSomething(self,ID,theta,origin,specificItem=None,specificIndex=None): #print ("Rotating by {} around {}".format(theta*180.0/math.pi,origin)) rotMat = self.makeRotationMatrix(theta,(origin[0]/self.magnification,origin[1]/self.magnification)) #print (rotMat) if ID == -1: item = specificItem else: item = self.findItem(ID) if isinstance(item,xasyText) or isinstance(item,xasyScript): #transform the image if ID == -1: index = specificIndex else: index = self.findItemImageIndex(item,ID) try: original = item.transform[index] except: original = identity() oldBbox = item.imageList[index].originalImage.bbox oldBbox = (oldBbox[0],-oldBbox[1],oldBbox[2],-oldBbox[3]) item.transform[index] = rotMat*item.transform[index] item.transform[index] = rotMat*original item.imageList[index].originalImage.theta += theta item.imageList[index].image = item.imageList[index].originalImage.rotate(item.imageList[index].originalImage.theta*180.0/math.pi,expand=True,resample=Image.BICUBIC) item.imageList[index].itk = ImageTk.PhotoImage(item.imageList[index].image) self.mainCanvas.itemconfigure(ID,image=item.imageList[index].itk) #the image has been rotated in place #now, compensate for any resizing and shift to the correct location # # p0 --- p1 p1 # | | ---> / \ # p2 --- p3 p0 p3 # \ / # p2 # rotMat2 = self.makeRotationMatrix(item.imageList[index].originalImage.theta,origin) p0 = rotMat2*(oldBbox[0],-oldBbox[3])#switch to usual coordinates p1 = rotMat2*(oldBbox[2],-oldBbox[3]) p2 = rotMat2*(oldBbox[0],-oldBbox[1]) p3 = rotMat2*(oldBbox[2],-oldBbox[1]) newTopLeft = (min(p0[0],p1[0],p2[0],p3[0]),-max(p0[1],p1[1],p2[1],p3[1]))#switch back to screen coords shift = (newTopLeft[0]-oldBbox[0],newTopLeft[1]-oldBbox[3]) #print (theta*180.0/math.pi,origin,oldBbox,newTopLeft,shift) #print (item.imageList[index].originalImage.size) #print (item.imageList[index].image.size) #print self.mainCanvas.coords(ID,oldBbox[0]+shift[0],oldBbox[3]+shift[1]) else: #transform each point of the object xform = rotMat*item.transform[0] item.transform = [identity()] for i in range(len(item.path.nodeSet)): if item.path.nodeSet[i] != 'cycle': item.path.nodeSet[i] = xform*item.path.nodeSet[i] for i in range(len(item.path.controlSet)): item.path.controlSet[i][0] = xform*item.path.controlSet[i][0] item.path.controlSet[i][1] = xform*item.path.controlSet[i][1] item.drawOnCanvas(self.mainCanvas,self.magnification) def deleteItem(self,item): if isinstance(item,xasyScript) or isinstance(item,xasyText): if isinstance(item,xasyScript): self.undoRedoStack.add(deleteScriptAction(self,item,self.fileItems.index(item))) else: self.undoRedoStack.add(deleteLabelAction(self,item,self.fileItems.index(item))) for image in item.imageList: self.mainCanvas.delete(image.IDTag) else: if isinstance(item,xasyDrawnItem): self.undoRedoStack.add(deleteDrawnItemAction(self,item,self.fileItems.index(item))) self.mainCanvas.delete(item.IDTag) self.fileItems.remove(item) self.populatePropertyList() self.clearSelection() def deleteSomething(self,ID): self.clearSelection() self.clearHighlight() if self.editor != None: self.editor.endEdit() if self.editor.modified: self.undoRedoStack.add(editDrawnItemAction(self,self.itemBeingEdited,copy.deepcopy(self.editor.shape),self.fileItems.index(self.editor.shape))) item = self.findItem(ID) #save an event on the undoredo stack if isinstance(item,xasyScript): index = self.findItemImageIndex(item,ID) item.transform[index].deleted = True else: if isinstance(item,xasyText): self.undoRedoStack.add(deleteLabelAction(self,item,self.fileItems.index(item))) elif isinstance(item,xasyDrawnItem): self.undoRedoStack.add(deleteDrawnItemAction(self,item,self.fileItems.index(item))) self.fileItems.remove(item) self.mainCanvas.delete(ID) self.populatePropertyList() def scriptEditThread(self,oldText): try: self.newText = xasyCodeEditor.getText(oldText) except: self.newText = -1 def getNewText(self,oldText): editThread = threading.Thread(target=self.scriptEditThread,args=(oldText,)) editThread.start() while editThread.isAlive(): time.sleep(0.05) self.parent.update() editThread.join() if type(self.newText)==type(-1): self.newText = '' raise Exception('Error launching external editor. Please check xasy options.') def itemEdit(self,item): # are we too busy? if not self.testOrAcquireLock(): return self.updateSelectedButton(self.toolSelectButton) if isinstance(item,xasyScript): self.unbindGlobalEvents() oldText = item.script try: self.getNewText(oldText) except Exception as e: messagebox.showerror('xasy Error',e.message) else: if self.newText != oldText: self.undoRedoStack.add(editScriptAction(self,item,self.newText,oldText)) item.setScript(self.newText) item.drawOnCanvas(self.mainCanvas,self.magnification) self.bindItemEvents(item) self.bindGlobalEvents() elif isinstance(item,xasyText): theText = simpledialog.askstring(title="Xasy - Text",prompt="Enter text to display:",initialvalue=item.label.text,parent=self.parent) if theText != None and theText != "": self.undoRedoStack.add(editLabelTextAction(self,item,theText,item.label.text)) item.label.text = theText item.drawOnCanvas(self.mainCanvas,self.magnification) self.bindItemEvents(item) elif isinstance(item,xasyShape): self.clearSelection() self.clearHighlight() self.itemBeingEdited = copy.deepcopy(item) self.editor = xasyBezierEditor(self,item,self.mainCanvas) self.updateSelection() self.releaseLock() def itemEditEvt(self,event): if not self.inDrawingMode: ID = self.mainCanvas.find_withtag(CURRENT)[0] item = self.findItem(ID) self.itemEdit(item) def itemDrag(self,event): x0,y0 = self.mainCanvas.canvasx(event.x),self.mainCanvas.canvasy(event.y) x = x0/self.magnification y = y0/self.magnification if self.selectedButton not in [self.toolMoveButton,self.toolVertiMoveButton,self.toolHorizMoveButton]: return if "selectedItem" in self.mainCanvas.gettags(CURRENT): self.amDragging = True for ID in self.mainCanvas.find_withtag("selectedItem"): transform = identity() if self.selectedButton == self.toolMoveButton: translation = (x0-self.dragStartx,-(y0-self.dragStarty)) elif self.selectedButton == self.toolVertiMoveButton: translation = (0,-(y0-self.dragStarty)) elif self.selectedButton == self.toolHorizMoveButton: translation = (x0-self.dragStartx,0) self.translateSomething(ID,(translation[0]/self.magnification,translation[1]/self.magnification)) self.mainCanvas.move(ID,translation[0],-translation[1]) self.updateSelection() self.updateCanvasSize() self.distanceDragged = (self.distanceDragged[0]+translation[0],self.distanceDragged[1]-translation[1]) self.dragStartx,self.dragStarty = x0,y0 def itemMouseUp(self,event): self.freeMouseDown = True if self.amDragging: IDList = self.mainCanvas.find_withtag("selectedItem") itemList = [] indexList = [] for ID in IDList: item = self.findItem(ID) if item not in itemList: itemList.append(item) try: indexList.append([self.findItemImageIndex(item,ID)]) except: indexList.append([None]) else: indexList[itemList.index(item)].append(self.findItemImageIndex(item,ID)) self.undoRedoStack.add(translationAction(self,itemList,indexList,(self.distanceDragged[0],-self.distanceDragged[1]))) self.amDragging = False def itemSelect(self,event): x0,y0 = self.mainCanvas.canvasx(event.x),self.mainCanvas.canvasy(event.y) x = x0/self.magnification y = y0/self.magnification self.dragStartx,self.dragStarty = x0,y0 self.distanceDragged = (0,0) if self.selectedButton in [self.toolSelectButton,self.toolMoveButton,self.toolVertiMoveButton,self.toolHorizMoveButton,self.toolRotateButton]: self.freeMouseDown = False if self.selectedButton == self.toolSelectButton or (len(self.mainCanvas.find_withtag("selectedItem"))<=1 and self.selectedButton in [self.toolMoveButton,self.toolVertiMoveButton,self.toolHorizMoveButton,self.toolRotateButton]): self.clearSelection() self.setSelection(CURRENT) def itemToggleSelect(self,event): #print ("control click") x0,y0 = self.mainCanvas.canvasx(event.x),self.mainCanvas.canvasy(event.y) x = x0/self.magnification y = y0/self.magnification if self.selectedButton in [self.toolSelectButton,self.toolMoveButton,self.toolVertiMoveButton,self.toolHorizMoveButton,self.toolRotateButton]: self.freeMouseDown = False self.dragStartx,self.dragStarty = x0,y0 if "selectedItem" in self.mainCanvas.gettags(CURRENT): self.unSelect(CURRENT) else: self.setSelection(CURRENT) def itemDelete(self,event): if(not self.testOrAcquireLock()): return itemList = [] self.undoRedoStack.add(endActionGroup) for ID in self.mainCanvas.find_withtag("selectedItem"): item = self.findItem(ID) if isinstance(item,xasyScript): index = self.findItemImageIndex(item,ID) if item not in itemList: itemList.append([item,[index],[item.transform[index]]]) else: x = None for i in itemList: if i[0] == item: x = i x[1].append(index) x[2].append(item.transform[index]) self.deleteSomething(ID) for entry in itemList: self.undoRedoStack.add(deleteScriptItemAction(self,entry[0],entry[1],entry[2])) self.undoRedoStack.add(beginActionGroup) self.clearSelection() self.releaseLock() def itemMotion(self,event): pass def itemHighlight(self,event): if self.selectedButton in [self.toolSelectButton] and self.editor == None: box = self.mainCanvas.bbox(CURRENT) box = (box[0]-2,box[1]-2,box[2]+2,box[3]+2) if len(self.mainCanvas.find_withtag("highlightBox"))==0: self.mainCanvas.create_rectangle(box,tags="highlightBox",width=2,outline="red") else: self.mainCanvas.tag_raise("highlightBox") self.mainCanvas.coords("highlightBox",*box) self.mainCanvas.tag_bind("highlightBox","",self.itemUnHighlight) def itemUnHighlight(self,event): self.clearHighlight() def clearHighlight(self): self.mainCanvas.delete("highlightBox") def itemLeftDown(self,event): pass def itemLeftUp(self,event): pass def itemRightDown(self,event): pass def itemRightUp(self,event): pass def canvMotion(self,event): self.coords.config( text="(%.3f,%.3f)"%(self.mainCanvas.canvasx(event.x)/self.magnification,-self.mainCanvas.canvasy(event.y)/self.magnification) ) def addItemToFile(self,item): self.fileItems.append(item) self.propList.insert(0,self.describeItem(item)) self.updateCanvasSize() def startDraw(self,event): # don't start if we can't finish if not self.testOrAcquireLock() and not self.inDrawingMode: return x0,y0 = self.mainCanvas.canvasx(event.x),self.mainCanvas.canvasy(event.y) x = x0/self.magnification y = y0/self.magnification #self.mainCanvas.create_oval(x,y,x,y,width=5) if self.selectedButton == self.toolDrawEllipButton: pass elif self.selectedButton == self.toolFillEllipButton: pass elif self.selectedButton == self.toolTextButton: theText = simpledialog.askstring(title="Xasy - Text",prompt="Enter text to display:",initialvalue="",parent=self.parent) if theText != None and theText != "": theItem = xasyText(theText,(x,-y),asyPen(self.penColor,self.penWidth,self.penOptions)) theItem.drawOnCanvas(self.mainCanvas,self.magnification) self.bindItemEvents(theItem) self.addItemToFile(theItem) self.undoRedoStack.add(addLabelAction(self,theItem)) self.releaseLock() self.updateSelectedButton(self.toolSelectButton) elif self.selectedButton in [self.toolDrawLinesButton,self.toolDrawBeziButton,self.toolDrawPolyButton,self.toolDrawShapeButton,self.toolFillPolyButton,self.toolFillShapeButton]: self.inDrawingMode = True try: if len(self.itemBeingDrawn.path.nodeSet) == 0: raise Exception else: if self.selectedButton in [self.toolDrawLinesButton,self.toolDrawPolyButton,self.toolFillPolyButton]: self.itemBeingDrawn.appendPoint((x,-y),'--') else:#drawBezi,drawShape,fillShape self.itemBeingDrawn.appendPoint((x,-y),'..') except: path = asyPath() if self.selectedButton == self.toolDrawLinesButton: path.initFromNodeList([(x,-y),(x,-y)],['--']) elif self.selectedButton == self.toolDrawBeziButton: path.initFromNodeList([(x,-y),(x,-y)],['..']) elif self.selectedButton == self.toolDrawPolyButton or self.selectedButton == self.toolFillPolyButton: path.initFromNodeList([(x,-y),(x,-y),'cycle'],['--','--']) elif self.selectedButton == self.toolDrawShapeButton or self.selectedButton == self.toolFillShapeButton: path.initFromNodeList([(x,-y),(x,-y),'cycle'],['..','..']) if self.selectedButton in [self.toolDrawLinesButton,self.toolDrawBeziButton,self.toolDrawPolyButton,self.toolDrawShapeButton]: self.itemBeingDrawn = xasyShape(path,pen=asyPen(self.penColor,self.penWidth,self.penOptions)) else: if self.penOptions.find("fillrule") != -1 or self.penOptions.find("evenodd") != -1 or self.penOptions.find("zerowinding") != -1: options = self.penOptions else: options = "evenodd" self.itemBeingDrawn = xasyFilledShape(path,pen=asyPen(self.penColor,self.penWidth,options)) self.itemBeingDrawn.drawOnCanvas(self.mainCanvas,self.magnification) self.bindItemEvents(self.itemBeingDrawn) self.mainCanvas.bind("",self.extendDraw) def extendDraw(self,event): x0,y0 = self.mainCanvas.canvasx(event.x),self.mainCanvas.canvasy(event.y) x = x0/self.magnification y = y0/self.magnification tags = self.mainCanvas.gettags("itemBeingDrawn") self.itemBeingDrawn.setLastPoint((x,-y)) self.itemBeingDrawn.drawOnCanvas(self.mainCanvas,self.magnification) self.canvMotion(event) def endDraw(self,event): if not self.inDrawingMode or self.itemBeingDrawn == None: return x0,y0 = self.mainCanvas.canvasx(event.x),self.mainCanvas.canvasy(event.y) x = x0/self.magnification y = y0/self.magnification #if self.selectedButton in [self.toolDrawLinesButton,self.toolDrawPolyButton,self.toolFillPolyButton]: #self.itemBeingDrawn.appendPoint((x,-y),'--') #else: #self.itemBeingDrawn.appendPoint((x,-y),'..') #only needed for certain key bindings when startDraw is triggered right before an endDraw #e.g.: single click: startDraw, double click: endDraw self.itemBeingDrawn.removeLastPoint() self.itemBeingDrawn.setLastPoint((x,-y)) self.itemBeingDrawn.drawOnCanvas(self.mainCanvas,self.magnification) self.addItemToFile(self.itemBeingDrawn) self.undoRedoStack.add(addDrawnItemAction(self,self.itemBeingDrawn)) self.itemBeingDrawn = None self.mainCanvas.dtag("itemBeingDrawn","itemBeingDrawn") self.mainCanvas.bind("",self.canvMotion) self.inDrawingMode = False self.releaseLock() def canvLeftDown(self,event): #print ("Left Mouse Down") self.selectDragStart = (self.mainCanvas.canvasx(event.x),self.mainCanvas.canvasy(event.y)) theBbox = self.mainCanvas.bbox("selectedItem") if theBbox != None: self.selectBboxMidpoint = (theBbox[0]+theBbox[2])/2.0,-(theBbox[1]+theBbox[3])/2.0 if self.freeMouseDown and self.editor != None: self.editor.endEdit() if self.editor.modified: self.undoRedoStack.add(editDrawnItemAction(self,self.itemBeingEdited,copy.deepcopy(self.editor.shape),self.fileItems.index(self.editor.shape))) self.editor = None elif self.selectedButton in (self.toolSelectButton,self.toolMoveButton,self.toolVertiMoveButton,self.toolHorizMoveButton,self.toolRotateButton): if self.freeMouseDown: self.clearSelection() self.dragSelecting = False else: self.startDraw(event) def canvLeftUp(self,event): #print ("Left Mouse Up") # if we're busy, ignore it if not self.testOrAcquireLock(): return self.freeMouseDown = True if self.inRotatingMode: for item in self.itemsBeingRotated: item.drawOnCanvas(self.mainCanvas,self.magnification) self.bindItemEvents(item) self.updateSelection() self.itemsBeingRotated = [] self.inRotatingMode = False if self.dragSelecting: self.hideSelectionBox() self.dragSelecting = False self.mainCanvas.addtag_enclosed("enclosed",self.selectDragStart[0],self.selectDragStart[1],self.mainCanvas.canvasx(event.x),self.mainCanvas.canvasy(event.y)) for item in self.mainCanvas.find_withtag("enclosed"): tags = self.mainCanvas.gettags(item) if "drawn" not in tags and "image" not in tags: self.mainCanvas.dtag(item,"enclosed") self.mainCanvas.addtag_withtag("selectedItem","enclosed") self.mainCanvas.dtag("enclosed","enclosed") if self.selectedButton == self.toolSelectButton and len(self.mainCanvas.find_withtag("selectedItem")) > 0: self.updateSelectedButton(self.toolMoveButton) self.updateSelection() self.releaseLock() def canvDrag(self,event): x0,y0 = self.mainCanvas.canvasx(event.x),self.mainCanvas.canvasy(event.y) x = x0/self.magnification y = y0/self.magnification if self.selectedButton == self.toolSelectButton and self.editor == None: self.mainCanvas.coords("outlineBox",self.selectDragStart[0],self.selectDragStart[1],x0,y0) self.showSelectionBox() self.dragSelecting = True elif self.selectedButton == self.toolRotateButton and self.editor == None: bbox = self.mainCanvas.bbox("selectedItem") if bbox != None: p1 = self.selectDragStart[0]-self.selectBboxMidpoint[0],-self.selectDragStart[1]-self.selectBboxMidpoint[1] mp1 = math.sqrt(p1[0]**2+p1[1]**2) p2 = x0-self.selectBboxMidpoint[0],-y0-self.selectBboxMidpoint[1] mp2 = math.sqrt(p2[0]**2+p2[1]**2) if mp1 != 0: t1 = math.acos(p1[0]/mp1) if p1[1] < 0: t1 *= -1 else: t1 = 0 if mp2 != 0: t2 = math.acos(p2[0]/mp2) if p2[1] < 0: t2 *= -1 else: t2 = 0 theta = t2-t1 self.selectDragStart = x0,y0 self.itemsBeingRotated = [] for ID in self.mainCanvas.find_withtag("selectedItem"): self.rotateSomething(ID,theta,self.selectBboxMidpoint) item = self.findItem(ID) if not item in self.itemsBeingRotated: self.itemsBeingRotated.append(item) self.updateSelection() self.updateCanvasSize() if not self.inRotatingMode: self.currentRotationAngle = theta IDList = self.mainCanvas.find_withtag("selectedItem") itemList = [] indexList = [] for ID in IDList: item = self.findItem(ID) if item not in itemList: itemList.append(item) try: indexList.append([self.findItemImageIndex(item,ID)]) except: indexList.append([None]) else: indexList[itemList.index(item)].append(self.findItemImageIndex(item,ID)) self.undoRedoStack.add(rotationAction(self,itemList,indexList,self.currentRotationAngle,self.selectBboxMidpoint)) self.inRotatingMode = True else: self.currentRotationAngle += theta self.undoRedoStack.undoStack[-1].angle = self.currentRotationAngle def canvEnter(self,event): self.freeMouseDown = True event.widget.focus_set() def canvLeave(self,event): self.freeMouseDown = False def canvRightDown(self,event): pass #print ("Right Mouse Down") def canvRightUp(self,event): pass #print ("Right Mouse Up") def configEvt(self,event): self.updateCanvasSize() self.sizePane() def sizePane(self): width = self.windowPane.winfo_width()-10 cwidth = min(int(0.87*self.windowPane.winfo_width()),width-75) if self.paneVisible: self.windowPane.paneconfigure(self.canvFrame,minsize=cwidth) else: self.windowPane.paneconfigure(self.canvFrame,minsize=width) self.windowPane.paneconfigure(self.propFrame,minsize=75) def togglePaneEvt(self,event): self.paneVisible = not self.paneVisible self.sizePane() def popupDelete(self): self.deleteItem(self.itemPopupMenu.item) def popupEdit(self): self.itemEdit(self.itemPopupMenu.item) def popupViewCode(self): messagebox.showinfo("Item Code",self.itemPopupMenu.item.getCode()) def popupClearTransform(self): self.undoRedoStack.add(clearItemTransformsAction(self,self.itemPopupMenu.item,copy.deepcopy(self.itemPopupMenu.item.transform))) if isinstance(self.itemPopupMenu.item,xasyScript) or isinstance(self.itemPopupMenu.item,xasyText): for i in range(len(self.itemPopupMenu.item.transform)): self.itemPopupMenu.item.transform[i] = identity() else: self.itemPopupMenu.item.transform = [identity()] self.popupRedrawItem() def popupRedrawItem(self): if not self.testOrAcquireLock(): return self.clearSelection() self.clearHighlight() self.itemPopupMenu.item.drawOnCanvas(self.mainCanvas,self.magnification) self.bindItemEvents(self.itemPopupMenu.item) self.updateCanvasSize() self.releaseLock() def hidePopupMenu(self): try: self.itemPopupMenu.unpost() except: pass def itemMenuPopup(self,parent,item,x,y): self.hidePopupMenu() self.itemPopupMenu = Menu(parent,tearoff=False) self.itemPopupMenu.add_command(label="Edit",command=self.popupEdit) self.itemPopupMenu.add_command(label="Clear Transforms",command=self.popupClearTransform) self.itemPopupMenu.add_command(label="Redraw",command=self.popupRedrawItem) self.itemPopupMenu.add_command(label="View code",command=self.popupViewCode) self.itemPopupMenu.add_separator() self.itemPopupMenu.add_command(label="Delete",command=self.popupDelete) self.itemPopupMenu.item = item #self.itemPopupMenu.bind("",lambda a:self.itemPopupMenu.unpost()) #self.itemPopupMenu.bind("",lambda a:self.itemPopupMenu.unpost()) self.itemPopupMenu.post(x,y) def itemPropMenuPopup(self,event): try: item = self.fileItems[len(self.fileItems)-int(self.propList.curselection()[0])-1] self.itemMenuPopup(self.propList,item,event.x_root,event.y_root) except: pass def itemCanvasMenuPopup(self,event): if self.selectedButton in (self.toolSelectButton,self.toolMoveButton,self.toolVertiMoveButton,self.toolHorizMoveButton,self.toolRotateButton): try: item = self.findItem(self.mainCanvas.find_withtag(CURRENT)[0]) except: item = None if item != None: self.itemMenuPopup(self.mainCanvas,item,event.x_root,event.y_root) def editOptions(self): if(not self.testOrAcquireLock()): return self.releaseLock() xasyOptionsDialog.xasyOptionsDlg(self.parent) self.applyOptions() def resetOptions(self): xasyOptions.setDefaults() self.applyOptions() def applyPenWidth(self): self.pendingPenWidthChange = None if self.validatePenWidth(): old = self.penWidth self.penWidth = float(self.penWidthEntry.get()) if old != self.penWidth: self.showCurrentPen() def validatePenWidth(self): text = self.penWidthEntry.get() try: width = float(text) if width <= 0: return False else: return True except: return False def showCurrentPen(self): mag = 1 width = self.penWidth while width > 10: width /= 2 mag *= 2 self.penDisp.itemconfigure("penDisp",width=width,fill=self.tkPenColor) self.penDisp.itemconfigure("penMag",text="x%d"%mag) #apply the new pen to any selected items IDs = self.mainCanvas.find_withtag("selectedItem") madeAChange = False for ID in IDs: item = self.findItem(ID) if not isinstance(item,xasyScript): if not madeAChange: self.undoRedoStack.add(endActionGroup) madeAChange = True if isinstance(item,xasyText): temp = item.label.pen item.label.pen = asyPen(self.penColor,self.penWidth,self.penOptions) item.drawOnCanvas(self.mainCanvas,self.magnification) self.bindItemEvents(item) self.setSelection(item.imageList[0].IDTag) self.undoRedoStack.add(editLabelPenAction(self,temp,asyPen(self.penColor,self.penWidth,self.penOptions),self.fileItems.index(item))) else: temp = copy.deepcopy(item) item.pen = asyPen(self.penColor,self.penWidth,self.penOptions) item.drawOnCanvas(self.mainCanvas,self.magnification) self.undoRedoStack.add(editDrawnItemAction(self,temp,copy.deepcopy(item),self.fileItems.index(item))) if madeAChange: self.undoRedoStack.add(beginActionGroup) def applyPenWidthEvt(self,event): if not self.testOrAcquireLock(): return self.applyPenWidth() self.releaseLock() def penWidthChanged(self,event): if self.pendingPenWidthChange is not None: self.penWidthEntry.after_cancel(self.pendingPenWidthChange) self.pendingPenWidthChange = self.penWidthEntry.after(1000,self.applyPenWidth) def applyPenOptEvt(self,event): if not self.testOrAcquireLock(): return self.applyPenOpt() self.releaseLock() def validatePenOpt(self): try: penTest = asyPen(self.penColor,self.penWidth,self.penOptEntry.get()) return True except: self.penOptEntry.select_range(0,END) self.penOptEntry.delete(0,END) self.penOptEntry.insert(END,"Invalid Pen Options") self.penOptEntry.after(5000,self.clearInvalidOptEntry) self.penOptions = "" return False def clearInvalidOptEntry(self): self.penOptEntry.select_range(0,END) self.penOptEntry.delete(0,END) def applyPenOpt(self): if self.validatePenOpt(): old = self.penOptions self.penOptions = self.penOptEntry.get() if old != self.penOptions: self.showCurrentPen() def undoOperation(self): self.undoRedoStack.undo() def redoOperation(self): self.undoRedoStack.redo() def resetStacking(self): for item in self.fileItems: self.raiseSomething(item,force=True) ./asymptote-2.41/GUI/xasy.py0000755000175000017500000000162213064427076015531 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasy implements a graphical interface for Asymptote. # # # Author: Orest Shardt # Created: June 29, 2007 # ############################################################################ import getopt,sys,signal import xasyMainWin if sys.version_info >= (3, 0): from tkinter import * else: from Tkinter import * signal.signal(signal.SIGINT,signal.SIG_IGN) root = Tk() mag = 1.0 try: opts,args = getopt.getopt(sys.argv[1:],"x:") if(len(opts)>=1): mag = float(opts[0][1]) except: print ("Invalid arguments.") print ("Usage: xasy.py [-x magnification] [filename]") sys.exit(1) if(mag <= 0.0): print ("Magnification must be positive.") sys.exit(1) if(len(args)>=1): app = xasyMainWin.xasyMainWin(root,args[0],mag) else: app = xasyMainWin.xasyMainWin(root,magnification=mag) root.mainloop() ./asymptote-2.41/GUI/xasy2asy.py0000755000175000017500000006222113064427076016332 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasy2asy provides a Python interface to Asymptote # # # Author: Orest Shardt # Created: June 29, 2007 # ########################################################################### import sys,os,signal,threading from subprocess import * from string import * import xasyOptions from tempfile import mkdtemp if sys.version_info >= (3, 0): from tkinter import * import queue else: from Tkinter import * import Queue as queue # PIL support is now mandatory due to rotations try: from PIL import ImageTk from PIL import Image except: pass import CubicBezier quickAsyFailed = True global AsyTempDir console=None def startQuickAsy(): global quickAsy global quickAsyFailed global AsyTempDir global fout,fin if quickAsyRunning(): return try: fout.close() quickAsy.wait() except: pass try: quickAsyFailed = False if os.name == "nt": AsyTempDir=mkdtemp(prefix="asy_", dir="./") else: AsyTempDir=mkdtemp(prefix="asy_")+os.sep if sys.platform[:3] == 'win': quickAsy=Popen([xasyOptions.options['asyPath'],"-noV","-multiline","-q", "-o"+AsyTempDir,"-inpipe=0","-outpipe=2"],stdin=PIPE, stderr=PIPE,universal_newlines=True) fout=quickAsy.stdin fin=quickAsy.stderr else: (rx,wx) = os.pipe() (ra,wa) = os.pipe() if sys.version_info >= (3, 4): os.set_inheritable(rx, True) os.set_inheritable(wx, True) os.set_inheritable(ra, True) os.set_inheritable(wa, True) quickAsy=Popen([xasyOptions.options['asyPath'],"-noV","-multiline","-q", "-o"+AsyTempDir,"-inpipe="+str(rx),"-outpipe="+str(wa)], close_fds=False) fout=os.fdopen(wx,'w') fin=os.fdopen(ra,'r') if quickAsy.returncode != None: quickAsyFailed = True except: quickAsyFailed = True def stopQuickAsy(): if quickAsyRunning(): fout.write("exit;\n"); def getAsyTempDir(): return AsyTempDir def quickAsyRunning(): if quickAsyFailed or quickAsy.returncode != None: return False else: return True def asyExecute(command): if not quickAsyRunning(): startQuickAsy() fout.write(command) def closeConsole(event): global console console = None def consoleOutput(line): global console global ctl if console == None: ctl=Toplevel() ctl.title("Asymptote Console") ctl.bind("",closeConsole) yscrollbar=Scrollbar(ctl) yscrollbar.pack(side=RIGHT,fill=Y) console=Text(ctl,yscrollcommand=yscrollbar.set) console.pack() yscrollbar.config(command=console.yview) console.insert(END,line) ctl.lift() class asyTransform: """A python implementation of an asy transform""" def __init__(self,initTuple,delete=False): """Initialize the transform with a 6 entry tuple""" if type(initTuple) == type((0,)) and len(initTuple) == 6: self.t = initTuple self.x,self.y,self.xx,self.xy,self.yx,self.yy = initTuple self.deleted = delete else: raise Exception("Illegal initializer for asyTransform") def getCode(self): """Obtain the asy code that represents this transform""" if self.deleted: return str(self.t) + ", false" else: return str(self.t) def scale(self,s): return asyTransform((0,0,s,0,0,s))*self def __str__(self): """Equivalent functionality to getCode(). It allows the expression str(asyTransform) to be meaningful.""" return self.getCode() def __mul__(self,other): """Define multiplication of transforms as composition.""" if type(other)==type((0,)): if len(other) == 6: return self*asyTransform(other) elif len(other) == 2: return ((self.t[0]+self.t[2]*other[0]+self.t[3]*other[1]),(self.t[1]+self.t[4]*other[0]+self.t[5]*other[1])) else: raise Exception("Illegal multiplier of {:s}".format(str(type(other)))) elif isinstance(other,asyTransform): result = asyTransform((0,0,0,0,0,0)) result.x = self.x+self.xx*other.x+self.xy*other.y result.y = self.y+self.yx*other.x+self.yy*other.y result.xx = self.xx*other.xx+self.xy*other.yx result.xy = self.xx*other.xy+self.xy*other.yy result.yx = self.yx*other.xx+self.yy*other.yx result.yy = self.yx*other.xy+self.yy*other.yy result.t = (result.x,result.y,result.xx,result.xy,result.yx,result.yy) return result else: raise Exception("Illegal multiplier of {:s}".format(str(type(other)))) def identity(): return asyTransform((0,0,1,0,0,1)) class asyObj: """A base class for asy objects: an item represented by asymptote code.""" def __init__(self): """Initialize the object""" self.asyCode = "" def updateCode(self,mag=1.0): """Update the object's code: should be overriden.""" pass def getCode(self): """Return the code describing the object""" self.updateCode() return self.asyCode class asyPen(asyObj): """A python wrapper for an asymptote pen""" def __init__(self,color=(0,0,0),width=0.5,options=""): """Initialize the pen""" asyObj.__init__(self) self.options=options self.width=width self.setColor(color) self.updateCode() if options != "": self.computeColor() def updateCode(self,mag=1.0): """Generate the pen's code""" self.asyCode = "rgb({:g},{:g},{:g})+{:s}".format(self.color[0], self.color[1], self.color[2],str(self.width)) if len(self.options) > 0: self.asyCode += "+"+self.options def setWidth(self,newWidth): """Set the pen's width""" self.width=newWidth self.updateCode() def setColor(self,color): """Set the pen's color""" if type(color) == type((1,)) and len(color) == 3: self.color = color else: self.color = "(0,0,0)" self.updateCode() def computeColor(self): """Find out the color of an arbitrary asymptote pen.""" fout.write("pen p="+self.getCode()+';\n') fout.write("file fout=output(mode='pipe');\n") fout.write("write(fout,colorspace(p),newl);\n") fout.write("write(fout,colors(p));\n") fout.write("flush(fout);\n") fout.flush() colorspace = fin.readline() if colorspace.find("cmyk") != -1: lines = fin.readline()+fin.readline()+fin.readline()+fin.readline() parts = lines.split() c,m,y,k = eval(parts[0]),eval(parts[1]),eval(parts[2]),eval(parts[3]) k = 1-k r,g,b = ((1-c)*k,(1-m)*k,(1-y)*k) elif colorspace.find("rgb") != -1: lines = fin.readline()+fin.readline()+fin.readline() parts = lines.split() r,g,b = eval(parts[0]),eval(parts[1]),eval(parts[2]) elif colorspace.find("gray") != -1: lines = fin.readline() parts = lines.split() r = g = b = eval(parts[0]) self.color = (r,g,b) def tkColor(self): """Return the tk version of the pen's color""" self.computeColor() return '#{}'.format("".join(["{:02x}".format(min(int(256*a),255)) for a in self.color])) class asyPath(asyObj): """A python wrapper for an asymptote path""" def __init__(self): """Initialize the path to be an empty path: a path with no nodes, control points, or links.""" asyObj.__init__(self) self.nodeSet = [] self.linkSet = [] self.controlSet = [] self.computed = False def initFromNodeList(self,nodeSet,linkSet): """Initialize the path from a set of nodes and link types, "--", "..", or "::" """ if len(nodeSet)>0: self.nodeSet = nodeSet[:] self.linkSet = linkSet[:] self.computed = False def initFromControls(self,nodeSet,controlSet): """Initialize the path from nodes and control points""" self.controlSet = controlSet[:] self.nodeSet = nodeSet[:] self.computed = True def makeNodeStr(self,node): """Represent a node as a string""" if node == 'cycle': return node else: return "("+str(node[0])+","+str(node[1])+")" def updateCode(self,mag=1.0): """Generate the code describing the path""" if not self.computed: count = 0 #this string concatenation could be optimised self.asyCode = self.makeNodeStr(self.nodeSet[0]) for node in self.nodeSet[1:]: self.asyCode += self.linkSet[count]+self.makeNodeStr(node) count += 1 else: count = 0 #this string concatenation could be optimised self.asyCode = self.makeNodeStr(self.nodeSet[0]) for node in self.nodeSet[1:]: self.asyCode += "..controls" self.asyCode += self.makeNodeStr(self.controlSet[count][0]) self.asyCode += "and" self.asyCode += self.makeNodeStr(self.controlSet[count][1]) self.asyCode += ".." + self.makeNodeStr(node) + "\n" count += 1 def getNode(self,index): """Return the requested node""" return self.nodeSet[index] def getLink(self,index): """Return the requested link""" return self.linkSet[index] def setNode(self,index,newNode): """Set a node to a new position""" self.nodeSet[index] = newNode def moveNode(self,index,offset): """Translate a node""" if self.nodeSet[index] != "cycle": self.nodeSet[index] = (self.nodeSet[index][0]+offset[0],self.nodeSet[1]+offset[1]) def setLink(self,index,ltype): """Change the specified link""" self.linkSet[index] = ltype def addNode(self,point,ltype): """Add a node to the end of a path""" self.nodeSet.append(point) if len(self.nodeSet) != 1: self.linkSet.append(ltype) if self.computed: self.computeControls() def insertNode(self,index,point,ltype=".."): """Insert a node, and its corresponding link, at the given index""" self.nodeSet.insert(index,point) self.linkSet.insert(index,ltype) if self.computed: self.computeControls() def setControl(self,index,position): """Set a control point to a new position""" self.controlSet[index] = position def moveControl(self,index,offset): """Translate a control point""" self.controlSet[index] = (self.controlSet[index][0]+offset[0],self.controlSet[index][1]+offset[1]) def computeControls(self): """Evaluate the code of the path to obtain its control points""" fout.write("file fout=output(mode='pipe');\n") fout.write("path p="+self.getCode()+';\n') fout.write("write(fout,length(p),newl);\n") fout.write("write(fout,unstraighten(p),endl);\n") fout.flush() lengthStr = fin.readline() pathSegments = eval(lengthStr.split()[-1]) pathStrLines = [] for i in range(pathSegments+1): line=fin.readline() line=line.replace("\n","") pathStrLines.append(line) oneLiner = "".join(pathStrLines).replace(" ", "") splitList = oneLiner.split("..") nodes = [a for a in splitList if a.find("controls")==-1] self.nodeSet = [] for a in nodes: if a == 'cycle': self.nodeSet.append(a) else: self.nodeSet.append(eval(a)) controls = [a.replace("controls","").split("and") for a in splitList if a.find("controls") != -1] self.controlSet = [[eval(a[0]),eval(a[1])] for a in controls] self.computed = True class asyLabel(asyObj): """A python wrapper for an asy label""" def __init__(self,text="",location=(0,0),pen=asyPen()): """Initialize the label with the given test, location, and pen""" asyObj.__init__(self) self.text = text self.location = location self.pen = pen def updateCode(self,mag=1.0): """Generate the code describing the label""" self.asyCode = "Label(\""+self.text+"\","+str((self.location[0],self.location[1]))+","+self.pen.getCode()+",align=SE)" def setText(self,text): """Set the label's text""" self.text = text self.updateCode() def setPen(self,pen): """Set the label's pen""" self.pen = pen self.updateCode() def moveTo(self,newl): """Translate the label's location""" self.location = newl class asyImage: """A structure containing an image and its format, bbox, and IDTag""" def __init__(self,image,format,bbox): self.image = image self.format = format self.bbox = bbox self.IDTag = None class xasyItem: """A base class for items in the xasy GUI""" def __init__(self,canvas=None): """Initialize the item to an empty item""" self.transform = [identity()] self.asyCode = "" self.imageList = [] self.IDTag = None self.asyfied = False self.onCanvas = canvas def updateCode(self,mag=1.0): """Update the item's code: to be overriden""" pass def getCode(self): """Return the code describing the item""" self.updateCode() return self.asyCode def handleImageReception(self,file,format,bbox,count): """Receive an image from an asy deconstruction. It replaces the default in asyProcess.""" image = Image.open(file) self.imageList.append(asyImage(image,format,bbox)) if self.onCanvas != None: self.imageList[-1].itk = ImageTk.PhotoImage(image) self.imageList[-1].originalImage = image.copy() self.imageList[-1].originalImage.theta = 0.0 self.imageList[-1].originalImage.bbox = bbox if count >= len(self.transform) or self.transform[count].deleted == False: self.imageList[-1].IDTag = self.onCanvas.create_image(bbox[0],-bbox[3],anchor=NW,tags=("image"),image=self.imageList[-1].itk) self.onCanvas.update() def asyfy(self,mag=1.0): self.removeFromCanvas() self.imageList = [] self.imageHandleQueue = queue.Queue() worker = threading.Thread(target=self.asyfyThread,args=(mag,)) worker.start() item = self.imageHandleQueue.get() if console != None: console.delete(1.0,END) while item != (None,) and item[0] != "ERROR": if(item[0] == "OUTPUT"): consoleOutput(item[1]) else: self.handleImageReception(*item) try: os.remove(item[0]) except: pass item = self.imageHandleQueue.get() #self.imageHandleQueue.task_done() worker.join() def asyfyThread(self,mag=1.0): """Convert the item to a list of images by deconstructing this item's code""" fout.write("reset;\n") fout.write("initXasyMode();\n") fout.write("atexit(null);\n") for line in self.getCode().splitlines(): fout.write(line+"\n"); fout.write("deconstruct({:f});\n".format(mag)) fout.flush() maxargs = int(fin.readline().split()[0]) boxes=[] batch=0 n=0 text = fin.readline() # template=AsyTempDir+"%d_%d.%s" fileformat = "png" def render(): for i in range(len(boxes)): l,b,r,t = [float(a) for a in boxes[i].split()] name="{:s}{:d}_{:d}.{:s}".format(AsyTempDir,batch,i+1,fileformat) self.imageHandleQueue.put((name,fileformat,(l,b,r,t),i)) while text != "Done\n" and text != "Error\n": boxes.append(text) text = fin.readline() n += 1 if n >= maxargs: render() boxes=[] batch += 1 n=0 if text == "Error\n": self.imageHandleQueue.put(("ERROR",fin.readline())) else: render() self.imageHandleQueue.put((None,)) self.asyfied = True def drawOnCanvas(self,canvas,mag,forceAddition=False): pass def removeFromCanvas(self): pass class xasyDrawnItem(xasyItem): """A base class for GUI items was drawn by the user. It combines a path, a pen, and a transform.""" def __init__(self,path,pen = asyPen(),transform = identity()): """Initialize the item with a path, pen, and transform""" xasyItem.__init__(self) self.path = path self.pen = pen self.transform = [transform] def appendPoint(self,point,link=None): """Append a point to the path. If the path is cyclic, add this point before the 'cycle' node.""" if self.path.nodeSet[-1] == 'cycle': self.path.nodeSet[-1] = point self.path.nodeSet.append('cycle') else: self.path.nodeSet.append(point) self.path.computed = False if len(self.path.nodeSet) > 1 and link != None: self.path.linkSet.append(link) def clearTransform(self): """Reset the item's transform""" self.transform = [identity()] def removeLastPoint(self): """Remove the last point in the path. If the path is cyclic, remove the node before the 'cycle' node.""" if self.path.nodeSet[-1] == 'cycle': del self.path.nodeSet[-2] else: del self.path.nodeSet[-1] del self.path.linkSet[-1] self.path.computed = False def setLastPoint(self,point): """Modify the last point in the path. If the path is cyclic, modify the node before the 'cycle' node.""" if self.path.nodeSet[-1] == 'cycle': self.path.nodeSet[-2] = point else: self.path.nodeSet[-1] = point self.path.computed = False class xasyShape(xasyDrawnItem): """An outlined shape drawn on the GUI""" def __init__(self,path,pen=asyPen(),transform=identity()): """Initialize the shape with a path, pen, and transform""" xasyDrawnItem.__init__(self,path,pen,transform) def updateCode(self,mag=1.0): """Generate the code to describe this shape""" self.asyCode = "xformStack.push("+self.transform[0].getCode()+");\n" self.asyCode += "draw("+self.path.getCode()+","+self.pen.getCode()+");" def removeFromCanvas(self,canvas): """Remove the shape's depiction from a tk canvas""" if self.IDTag != None: canvas.delete(self.IDTag) def drawOnCanvas(self,canvas,mag,asyFy=False,forceAddition=False): """Add this shape to a tk canvas""" if not asyFy: if self.IDTag == None or forceAddition: #add ourselves to the canvas self.path.computeControls() self.IDTag = canvas.create_line(0,0,0,0,tags=("drawn","xasyShape"),fill=self.pen.tkColor(),width=self.pen.width*mag) self.drawOnCanvas(canvas,mag) else: self.path.computeControls() pointSet = [] previousNode = self.path.nodeSet[0] nodeCount = 0 if len(self.path.nodeSet) == 0: pointSet = [0,0,0,0] elif len(self.path.nodeSet) == 1: if self.path.nodeSet[-1] != 'cycle': p = self.transform[0]*(self.path.nodeSet[0][0],self.path.nodeSet[0][1]) pointSet = [p[0],-p[1],p[0],-p[1],p[0],-p[1]] else: pointSet = [0,0,0,0] else: for node in self.path.nodeSet[1:]: if node == 'cycle': node = self.path.nodeSet[0] transform = self.transform[0].scale(mag) points = CubicBezier.makeBezier(transform*previousNode,transform*self.path.controlSet[nodeCount][0],transform*self.path.controlSet[nodeCount][1],transform*node) for point in points: pointSet += [point[0],-point[1]] nodeCount += 1 previousNode = node canvas.coords(self.IDTag,*pointSet) canvas.itemconfigure(self.IDTag,fill=self.pen.tkColor(),width=self.pen.width*mag) else: #first asyfy then add an image list pass def __str__(self): """Create a string describing this shape""" return "xasyShape code:{:s}".format("\n\t".join(self.getCode().splitlines())) class xasyFilledShape(xasyShape): """A filled shape drawn on the GUI""" def __init__(self,path,pen=asyPen(),transform=identity()): """Initialize this shape with a path, pen, and transform""" if path.nodeSet[-1] != 'cycle': raise Exception("Filled paths must be cyclic") xasyShape.__init__(self,path,pen,transform) def updateCode(self,mag=1.0): """Generate the code describing this shape""" self.asyCode = "xformStack.push("+self.transform[0].getCode()+");\n" self.asyCode += "fill("+self.path.getCode()+","+self.pen.getCode()+");" def removeFromCanvas(self,canvas): """Remove this shape's depiction from a tk canvas""" if self.IDTag != None: canvas.delete(self.IDTag) def drawOnCanvas(self,canvas,mag,asyFy=False,forceAddition=False): """Add this shape to a tk canvas""" if not asyFy: if self.IDTag == None or forceAddition: #add ourselves to the canvas self.path.computeControls() self.IDTag = canvas.create_polygon(0,0,0,0,0,0,tags=("drawn","xasyFilledShape"),fill=self.pen.tkColor(),outline=self.pen.tkColor(),width=1*mag) self.drawOnCanvas(canvas,mag) else: self.path.computeControls() pointSet = [] previousNode = self.path.nodeSet[0] nodeCount = 0 if len(self.path.nodeSet) == 0: pointSet = [0,0,0,0,0,0] elif len(self.path.nodeSet) == 1: if self.path.nodeSet[-1] != 'cycle': p = self.transform[0]*(self.path.nodeSet[0][0],self.path.nodeSet[0][1]) pointSet = [p[0],-p[1],p[0],-p[1],p[0],-p[1]] else: pointSet = [0,0,0,0,0,0] elif len(self.path.nodeSet) == 2: if self.path.nodeSet[-1] != 'cycle': p = self.transform[0].scale(mag)*(self.path.nodeSet[0][0],self.path.nodeSet[0][1]) p2 = self.transform[0].scale(mag)*(self.path.nodeSet[1][0],self.path.nodeSet[1][1]) pointSet = [p[0],-p[1],p2[0],-p2[1],p[0],-p[1]] else: pointSet = [0,0,0,0,0,0] else: for node in self.path.nodeSet[1:]: if node == 'cycle': node = self.path.nodeSet[0] transform = self.transform[0].scale(mag) points = CubicBezier.makeBezier(transform*previousNode,transform*self.path.controlSet[nodeCount][0],transform*self.path.controlSet[nodeCount][1],transform*node) for point in points: pointSet += [point[0],-point[1]] nodeCount += 1 previousNode = node canvas.coords(self.IDTag,*pointSet) canvas.itemconfigure(self.IDTag,fill=self.pen.tkColor(),outline=self.pen.tkColor(),width=1*mag) else: #first asyfy then add an image list pass def __str__(self): """Return a string describing this shape""" return "xasyFilledShape code:{:s}".format("\n\t".join(self.getCode().splitlines())) class xasyText(xasyItem): """Text created by the GUI""" def __init__(self,text,location,pen=asyPen(),transform=identity()): """Initialize this item with text, a location, pen, and transform""" xasyItem.__init__(self) self.label=asyLabel(text,location,pen) self.transform = [transform] self.onCanvas = None def updateCode(self,mag=1.0): """Generate the code describing this object""" self.asyCode = "xformStack.push("+self.transform[0].getCode()+");\n" self.asyCode += "label("+self.label.getCode()+");" def removeFromCanvas(self): """Removes the label's images from a tk canvas""" if self.onCanvas == None: return for image in self.imageList: if image.IDTag != None: self.onCanvas.delete(image.IDTag) def drawOnCanvas(self,canvas,mag,asyFy=True,forceAddition=False): """Adds the label's images to a tk canvas""" if self.onCanvas == None: self.onCanvas = canvas elif self.onCanvas != canvas: raise Exception("Error: item cannot be added to more than one canvas") self.asyfy(mag) def __str__(self): return "xasyText code:{:s}".format("\n\t".join(self.getCode().splitlines())) class xasyScript(xasyItem): """A set of images create from asymptote code. It is always deconstructed.""" def __init__(self,canvas,script="",transforms=[]): """Initialize this script item""" xasyItem.__init__(self,canvas) self.transform = transforms[:] self.script = script def clearTransform(self): """Reset the transforms for each of the deconstructed images""" self.transform = [identity() for im in self.imageList] def updateCode(self,mag=1.0): """Generate the code describing this script""" self.asyCode = ""; if len(self.transform) > 0: self.asyCode = "xformStack.add(" isFirst = True count = 0 for xform in self.transform: if not isFirst: self.asyCode+=",\n" self.asyCode += "indexedTransform({:d},{:s})".format(count,str(xform)) isFirst = False count += 1 self.asyCode += ");\n" self.asyCode += "startScript(); {\n" self.asyCode += self.script.replace("\t"," ") self.asyCode = self.asyCode.rstrip() self.asyCode += "\n} endScript();\n" def setScript(self,script): """Sets the content of the script item.""" self.script = script self.updateCode() def removeFromCanvas(self): """Removes the script's images from a tk canvas""" if self.onCanvas == None: return for image in self.imageList: if image.IDTag != None: self.onCanvas.delete(image.IDTag) def asyfy(self,mag): """Generate the list of images described by this object and adjust the length of the transform list.""" xasyItem.asyfy(self,mag) while len(self.imageList) > len(self.transform): self.transform.append(identity()) while len(self.imageList) < len(self.transform): self.transform.pop() self.updateCode() def drawOnCanvas(self,canvas,mag,asyFy=True,forceAddition=False): """Adds the script's images to a tk canvas""" if self.onCanvas == None: self.onCanvas = canvas elif self.onCanvas != canvas: raise Exception("Error: item cannot be added to more than one canvas") self.asyfy(mag) def __str__(self): """Return a string describing this script""" retVal = "xasyScript\n\tTransforms:\n" for xform in self.transform: retVal += "\t"+str(xform)+"\n" retVal += "\tCode Ommitted" return retVal if __name__=='__main__': root = Tk() t=xasyText("test",(0,0)) t.asyfy() ./asymptote-2.41/GUI/UndoRedoStack.py0000755000175000017500000000567413064427076017265 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # UndoRedoStack implements the usual undo/redo capabilities of a GUI # # Author: Orest Shardt # Created: July 23, 2007 # ########################################################################### class action: def __init__(self,act,inv): self.act = act self.inv = inv def undo(self): #print ("Undo:",self) self.inv() def redo(self): #print ("Redo:",self) self.act() def __str__(self): return "A generic action" class beginActionGroup: pass class endActionGroup: pass class actionStack: def __init__(self): self.clear() def add(self,action): self.undoStack.append(action) #print ("Added",action) self.redoStack = [] def undo(self): if len(self.undoStack) > 0: op = self.undoStack.pop() if op is beginActionGroup: level = 1 self.redoStack.append(endActionGroup) while level > 0: op=self.undoStack.pop() if op is endActionGroup: level -= 1 self.redoStack.append(beginActionGroup) elif op is beginActionGroup: level += 1 self.redoStack.append(endActionGroup) else: op.undo() self.redoStack.append(op) elif op is endActionGroup: raise Exception("endActionGroup without previous beginActionGroup") else: self.redoStack.append(op) op.undo() #print ("undid",op) else: pass #print ("nothing to undo") def redo(self): if len(self.redoStack) > 0: op = self.redoStack.pop() if op is beginActionGroup: level = 1 self.undoStack.append(endActionGroup) while level > 0: op = self.redoStack.pop() if op is endActionGroup: level -= 1 self.undoStack.append(beginActionGroup) elif op is beginActionGroup: level += 1 self.undoStack.append(endActionGroup) else: op.redo() self.undoStack.append(op) elif op is endActionGroup: raise Exception("endActionGroup without previous beginActionGroup") else: self.undoStack.append(op) op.redo() #print ("redid",op) else: pass #print ("nothing to redo") def setCommitLevel(self): self.commitLevel = len(self.undoStack) def changesMade(self): if len(self.undoStack) != self.commitLevel: return True else: return False def clear(self): self.redoStack = [] self.undoStack = [] self.commitLevel = 0 if __name__=='__main__': import sys def opq(): print ("action1") def unopq(): print ("inverse1") q = action(opq,unopq) w = action(lambda:sys.stdout.write("action2\n"),lambda:sys.stdout.write("inverse2\n")) e = action(lambda:sys.stdout.write("action3\n"),lambda:sys.stdout.write("inverse3\n")) s = actionStack() s.add(q) s.add(w) s.add(e) ./asymptote-2.41/GUI/xasyBezierEditor.py0000755000175000017500000002020213064427076020034 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasyBezierEditor implements the ability to graphically edit the location # of the nodes and control points of a bezier curve. # # # Author: Orest Shardt # Created: June 29, 2007 # ########################################################################### import math import sys from CubicBezier import * import xasy2asy if sys.version_info >= (3, 0): from tkinter import * else: from Tkinter import * class node: def __init__(self,precontrol,node,postcontrol,uid,isTied = True): self.node = node self.precontrol = precontrol self.postcontrol = postcontrol self.isTied = isTied self.uid = uid self.nodeID = self.precontrolID = self.prelineID = self.postcontrolID = self.postlineID = None def shiftNode(self,delta): self.node = (self.node[0]+delta[0],self.node[1]+delta[1]) if self.precontrol != None: self.precontrol = (self.precontrol[0]+delta[0],self.precontrol[1]+delta[1]) if self.postcontrol != None: self.postcontrol = (self.postcontrol[0]+delta[0],self.postcontrol[1]+delta[1]) def shiftPrecontrol(self,delta): self.precontrol = (self.precontrol[0]+delta[0],self.precontrol[1]+delta[1]) if self.isTied and self.postcontrol != None: self.rotatePostControl(self.precontrol) def shiftPostcontrol(self,delta): self.postcontrol = (self.postcontrol[0]+delta[0],self.postcontrol[1]+delta[1]) if self.isTied and self.precontrol != None: self.rotatePrecontrol(self.postcontrol) def rotatePrecontrol(self,after): vx,vy = after[0]-self.node[0],after[1]-self.node[1] l = norm((vx,vy)) if l == 0: return m = norm((self.precontrol[0]-self.node[0],self.precontrol[1]-self.node[1])) vx = -m*vx/l vy = -m*vy/l self.precontrol = self.node[0]+vx,self.node[1]+vy def rotatePostControl(self,after): vx,vy = after[0]-self.node[0],after[1]-self.node[1] l = norm((vx,vy)) if l == 0: return m = norm((self.postcontrol[0]-self.node[0],self.postcontrol[1]-self.node[1])) vx = -m*vx/l vy = -m*vy/l self.postcontrol = self.node[0]+vx,self.node[1]+vy def draw(self,canvas): width = 3 if self.precontrol != None: if self.prelineID == None: self.prelineID = canvas.create_line(self.precontrol[0],-self.precontrol[1],self.node[0],-self.node[1],tags=("preline",self.uid)) else: canvas.coords(self.prelineID,self.precontrol[0],-self.precontrol[1],self.node[0],-self.node[1]) if self.precontrolID == None: self.precontrolID = canvas.create_oval(self.precontrol[0]-width,-self.precontrol[1]-width,self.precontrol[0]+width,-self.precontrol[1]+width, fill="red",outline="black",tags=("precontrol",self.uid)) else: canvas.coords(self.precontrolID,self.precontrol[0]-width,-self.precontrol[1]-width,self.precontrol[0]+width,-self.precontrol[1]+width) if self.postcontrol != None: if self.postlineID == None: self.postlineID = canvas.create_line(self.postcontrol[0],-self.postcontrol[1],self.node[0],-self.node[1],tags=("postline",self.uid)) else: canvas.coords(self.postlineID,self.postcontrol[0],-self.postcontrol[1],self.node[0],-self.node[1]) if self.postcontrolID == None: self.postcontrolID = canvas.create_oval(self.postcontrol[0]-width,-self.postcontrol[1]-width,self.postcontrol[0]+width,-self.postcontrol[1]+width, fill="red",outline="black",tags=("postcontrol",self.uid)) else: canvas.coords(self.postcontrolID,self.postcontrol[0]-width,-self.postcontrol[1]-width,self.postcontrol[0]+width,-self.postcontrol[1]+width) if self.isTied: color = "blue" else: color = "green" if self.nodeID == None: self.nodeID = canvas.create_oval(self.node[0]-width,-self.node[1]-width,self.node[0]+width,-self.node[1]+width, fill=color,outline="black",tags=("node",self.uid)) else: canvas.coords(self.nodeID,self.node[0]-width,-self.node[1]-width,self.node[0]+width,-self.node[1]+width) canvas.itemconfigure(self.nodeID,fill=color) class xasyBezierEditor: def __init__(self,parent,shape,canvas): self.parent = parent self.shape = shape self.transform = self.shape.transform[0] self.path = self.shape.path self.canvas = canvas self.modified = False self.path.computeControls() isCyclic = self.path.nodeSet[-1] == 'cycle' segments = len(self.path.controlSet) self.nodeList = [] for i in range(segments): if i == 0: node0 = self.transform*self.path.nodeSet[i] control = self.transform*self.path.controlSet[i][0] self.nodeList.append(node(None,node0,control,len(self.nodeList))) else: node0 = self.transform*self.path.nodeSet[i] precontrol = self.transform*self.path.controlSet[i-1][1] postcontrol = self.transform*self.path.controlSet[i][0] self.nodeList.append(node(precontrol,node0,postcontrol,len(self.nodeList))) if not isCyclic: node0 = self.transform*self.path.nodeSet[-1] precontrol = self.transform*self.path.controlSet[-1][1] self.nodeList.append(node(precontrol,node0,None,len(self.nodeList))) else: self.nodeList[0].precontrol = self.transform*self.path.controlSet[-1][1] self.showControls() self.bindNodeEvents() self.bindControlEvents() def showControls(self): for n in self.nodeList: n.draw(self.canvas) self.bindNodeEvents() self.bindControlEvents() self.parent.updateCanvasSize() def bindNodeEvents(self): self.canvas.tag_bind("node","",self.nodeDrag) self.canvas.tag_bind("node","",self.buttonDown) self.canvas.tag_bind("node","",self.toggleNode) def unbindNodeEvents(self): self.canvas.tag_unbind("node","") self.canvas.tag_unbind("node","") self.canvas.tag_unbind("node","") def bindControlEvents(self): self.canvas.tag_bind("precontrol || postcontrol","",self.controlDrag) self.canvas.tag_bind("precontrol || postcontrol","",self.buttonDown) def unbindControlEvents(self): self.canvas.tag_unbind("precontrol || postcontrol","") self.canvas.tag_unbind("precontrol || postcontrol","") def buttonDown(self,event): self.parent.freeMouseDown = False self.startx,self.starty = event.x,event.y def toggleNode(self,event): self.parent.freeMouseDown = False tags = self.canvas.gettags(CURRENT) obj = tags[0] uid = int(tags[1]) self.nodeList[uid].isTied = not self.nodeList[uid].isTied self.showControls() def nodeDrag(self,event): self.parent.freeMouseDown = False deltax = event.x-self.startx deltay = event.y-self.starty tags = self.canvas.gettags(CURRENT) obj = tags[0] uid = int(tags[1]) self.nodeList[uid].shiftNode((deltax,-deltay)) self.startx,self.starty = event.x,event.y self.applyChanges() self.showControls() self.shape.drawOnCanvas(self.canvas,self.parent.magnification) def controlDrag(self,event): self.parent.freeMouseDown = False deltax = event.x-self.startx deltay = event.y-self.starty tags = self.canvas.gettags(CURRENT) obj = tags[0] uid = int(tags[1]) if obj == "precontrol": self.nodeList[uid].shiftPrecontrol((deltax,-deltay)) elif obj == "postcontrol": self.nodeList[uid].shiftPostcontrol((deltax,-deltay)) self.startx,self.starty = event.x,event.y self.applyChanges() self.showControls() self.shape.drawOnCanvas(self.canvas,self.parent.magnification) def applyChanges(self): self.modified = True self.shape.transform[0] = xasy2asy.asyTransform((0,0,1,0,0,1)) for i in range(len(self.nodeList)): self.path.nodeSet[i] = self.nodeList[i].node if self.nodeList[i].postcontrol != None: self.path.controlSet[i][0] = self.nodeList[i].postcontrol if self.nodeList[i].precontrol != None: self.path.controlSet[i-1][1] = self.nodeList[i].precontrol def endEdit(self): self.unbindNodeEvents() self.unbindControlEvents() self.canvas.delete("node || precontrol || postcontrol || preline || postline") ./asymptote-2.41/GUI/xasyCodeEditor.py0000755000175000017500000000230513064427076017472 0ustar norbertnorbert#!/usr/bin/env python ########################################################################### # # xasyCodeEditor implements a simple text editor for Asymptote scripts in # xasy. # # # Author: Orest Shardt # Created: June 29, 2007 # ############################################################################ from subprocess import call from tempfile import mkstemp from os import remove from os import fdopen from os import path import xasyOptions def getText(text=""): """Launch the external editor""" temp = mkstemp() tempf = fdopen(temp[0],"w") tempf.write(text) tempf.close() try: cmdpath,cmd = path.split(path.expandvars(xasyOptions.options['externalEditor'])) split_cmd = cmd.split() cmdpart = [path.join(cmdpath,split_cmd[0])] argpart = split_cmd[1:]+[temp[1]] arglist = cmdpart+argpart call(arglist) except Exception as e: raise Exception('Error launching external editor.') try: tempf = open(temp[1],"r") text = tempf.read() tempf.close() remove(temp[1]) except Exception as e: raise Exception('Error reading from external editor.') return text if __name__ == '__main__': #run a test print (getText("Here is some text to edit")) ./asymptote-2.41/runhistory.cc0000644000175000017500000001773513064427126016311 0ustar norbertnorbert/***** Autogenerated from runhistory.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runhistory.in" /***** * runhistory.in * * Runtime functions for history operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 12 "runhistory.in" #include "array.h" #include "mathop.h" #include "builtin.h" using namespace camp; using namespace settings; using namespace vm; using namespace run; typedef array stringarray; using types::stringArray; #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) #include #include struct historyState { bool store; HISTORY_STATE state; }; typedef mem::map historyMap_t; historyMap_t historyMap; static HISTORY_STATE history_save; // Store a deep copy of the current readline history in dest. void store_history(HISTORY_STATE *dest) { HISTORY_STATE *src=history_get_history_state(); if(src) { *dest=*src; for(Int i=0; i < src->length; ++i) dest->entries[i]=src->entries[i]; free(src); } } stringarray* get_history(Int n) { int N=intcast(n); if(N <= 0) N=history_length; else N=Min(N,history_length); array *a=new array((size_t) N); int offset=history_length-N+1; for(int i=0; i < N; ++i) { HIST_ENTRY *last=history_get(offset+i); string s=last ? last->line : ""; (*a)[i]=s; } return a; } string historyfilename(const string &name) { return historyname+"_"+name; } #endif namespace run { extern string emptystring; #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) void init_readline(bool tabcompletion) { rl_bind_key('\t',tabcompletion ? rl_complete : rl_insert); } #endif void cleanup() { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) store_history(&history_save); int nlines=intcast(getSetting("historylines")); for(historyMap_t::iterator h=historyMap.begin(); h != historyMap.end(); ++h) { history_set_history_state(&h->second.state); if(h->second.store) { stifle_history(nlines); write_history(historyfilename(h->first).c_str()); unstifle_history(); } } history_set_history_state(&history_save); #endif #ifdef HAVE_LIBGSL trans::GSLrngFree(); #endif } } // Autogenerated routines: #ifndef NOSYM #include "runhistory.symbols.h" #endif namespace run { // Return the last n lines of the history named name. #line 109 "runhistory.in" // stringarray* history(string name, Int n=1); void gen_runhistory0(stack *Stack) { Int n=vm::pop(Stack,1); string name=vm::pop(Stack); #line 110 "runhistory.in" #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) bool newhistory=historyMap.find(name) == historyMap.end(); string filename; if(newhistory) { filename=historyfilename(name); std::ifstream exists(filename.c_str()); if(!exists) {Stack->push(new array(0)); return;} } store_history(&history_save); HISTORY_STATE& history=historyMap[name].state; history_set_history_state(&history); if(newhistory) read_history(filename.c_str()); array *a=get_history(n); store_history(&history); history_set_history_state(&history_save); {Stack->push(a); return;} #else unused(&n); {Stack->push(new array(0)); return;} #endif } // Return the last n lines of the interactive history. #line 142 "runhistory.in" // stringarray* history(Int n=0); void gen_runhistory1(stack *Stack) { Int n=vm::pop(Stack,0); #line 143 "runhistory.in" #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) {Stack->push(get_history(n)); return;} #else unused(&n); {Stack->push(new array(0)); return;} #endif } // Prompt for a string using prompt, the GNU readline library, and a // local history named name. #line 154 "runhistory.in" // string readline(string prompt=emptystring, string name=emptystring, bool tabcompletion=false); void gen_runhistory2(stack *Stack) { bool tabcompletion=vm::pop(Stack,false); string name=vm::pop(Stack,emptystring); string prompt=vm::pop(Stack,emptystring); #line 156 "runhistory.in" if(!(isatty(STDIN_FILENO) || getSetting("inpipe") >= 0)) {Stack->push(emptystring); return;} #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) init_readline(tabcompletion); store_history(&history_save); bool newhistory=historyMap.find(name) == historyMap.end(); historyState& h=historyMap[name]; HISTORY_STATE& history=h.state; history_set_history_state(&history); if(newhistory) read_history(historyfilename(name).c_str()); static char *line=NULL; /* Return the memory to the free pool if the buffer has already been allocated. */ if(line) { free(line); line=NULL; } /* Get a line from the user. */ line=readline(prompt.c_str()); if(!line) cout << endl; history_set_history_state(&history_save); {Stack->push(line ? string(line) : emptystring); return;} #else cout << prompt; string s; getline(cin,s); unused(&tabcompletion); // Avoid unused variable warning message. {Stack->push(s); return;} #endif } // Save a string in a local history named name. // If store=true, store the local history in the file historyfilename(name). #line 198 "runhistory.in" // void saveline(string name, string value, bool store=true); void gen_runhistory3(stack *Stack) { bool store=vm::pop(Stack,true); string value=vm::pop(Stack); string name=vm::pop(Stack); #line 199 "runhistory.in" #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) store_history(&history_save); bool newhistory=historyMap.find(name) == historyMap.end(); historyState& h=historyMap[name]; h.store=store; HISTORY_STATE& history=h.state; history_set_history_state(&history); if(newhistory) read_history(historyfilename(name).c_str()); if(value != "") { add_history(value.c_str()); if(store) { std::ofstream hout(historyfilename(name).c_str(),std::ios::app); hout << value << endl; } } store_history(&history); history_set_history_state(&history_save); #else unused(&store); #endif } } // namespace run namespace trans { void gen_runhistory_venv(venv &ve) { #line 108 "runhistory.in" addFunc(ve, run::gen_runhistory0, stringArray(), SYM(history), formal(primString() , SYM(name), false, false), formal(primInt(), SYM(n), true, false)); #line 141 "runhistory.in" addFunc(ve, run::gen_runhistory1, stringArray(), SYM(history), formal(primInt(), SYM(n), true, false)); #line 152 "runhistory.in" addFunc(ve, run::gen_runhistory2, primString() , SYM(readline), formal(primString() , SYM(prompt), true, false), formal(primString() , SYM(name), true, false), formal(primBoolean(), SYM(tabcompletion), true, false)); #line 196 "runhistory.in" addFunc(ve, run::gen_runhistory3, primVoid(), SYM(saveline), formal(primString() , SYM(name), false, false), formal(primString() , SYM(value), false, false), formal(primBoolean(), SYM(store), true, false)); } } // namespace trans ./asymptote-2.41/runpicture.in0000644000175000017500000004651313064427076016304 0ustar norbertnorbert/***** * runpicture.in * * Runtime functions for picture operations. * *****/ pen => primPen() pair => primPair() triple => primTriple() path => primPath() path3 => primPath3() picture* => primPicture() Intarray* => IntArray() Intarray2* => IntArray2() realarray* => realArray() realarray2* => realArray2() patharray* => pathArray() penarray* => penArray() penarray2* => penArray2() pairarray* => pairArray() pairarray2* => pairArray2() triplearray* => tripleArray() triplearray2* => tripleArray2() transform => primTransform() callableTransform* => transformFunction() callablePen* => penFunction() #include "picture.h" #include "drawelement.h" #include "path.h" #include "array.h" #include "arrayop.h" #include "drawpath.h" #include "drawfill.h" #include "drawclipbegin.h" #include "drawclipend.h" #include "drawgsave.h" #include "drawgrestore.h" #include "drawgroup.h" #include "drawverbatim.h" #include "drawlabel.h" #include "drawlayer.h" #include "drawimage.h" #include "drawpath3.h" #include "drawsurface.h" using namespace camp; using namespace settings; using namespace vm; typedef array Intarray; typedef array Intarray2; typedef array realarray; typedef array realarray2; typedef array pairarray; typedef array pairarray2; typedef array triplearray; typedef array triplearray2; typedef array patharray; typedef array penarray; typedef array penarray2; typedef callable callableTransform; typedef callable callablePen; using types::IntArray; using types::IntArray2; using types::realArray; using types::realArray2; using types::pairArray; using types::pairArray2; using types::tripleArray; using types::tripleArray2; using types::pathArray; using types::penArray; using types::penArray2; function *transformFunction() { return new function(primTransform()); } function *penFunction() { return new function(primPen(),primInt(),primInt()); } // Ignore unclosed begingroups but not spurious endgroups. const char *nobegin="endgroup without matching begingroup"; array *emptyarray=new array(0); array *nop(array *a) { return a; } triple Zero; // Autogenerated routines: picture* :newPicture() { return new picture(); } bool empty(picture *f) { return f->null(); } void erase(picture *f) { f->nodes.clear(); } pair min(picture *f) { return f->bounds().Min(); } pair max(picture *f) { return f->bounds().Max(); } pair size(picture *f) { bbox b=f->bounds(); return b.Max()-b.Min(); } void _draw(picture *f, path g, pen p) { f->append(new drawPath(g,p)); } void fill(picture *f, patharray *g, pen p=CURRENTPEN, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawFill(*copyarray(g),false,p)); } void latticeshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, penarray2 *p, transform t=identity, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawLatticeShade(*copyarray(g),stroke,fillrule,*copyarray(p), t)); } void axialshade(picture *f, patharray *g, bool stroke=false, pen pena, pair a, bool extenda=true, pen penb, pair b, bool extendb=true, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawAxialShade(*copyarray(g),stroke,pena,a,extenda,penb,b, extendb)); } void radialshade(picture *f, patharray *g, bool stroke=false, pen pena, pair a, real ra, bool extenda=true, pen penb, pair b, real rb, bool extendb=true, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawRadialShade(*copyarray(g),stroke,pena,a,ra,extenda, penb,b,rb,extendb)); } void gouraudshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, penarray *p, pairarray *z, Intarray *edges, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; checkArrays(p,z); checkArrays(z,edges); f->append(new drawGouraudShade(*copyarray(g),stroke,fillrule,*copyarray(p), *copyarray(z),*copyarray(edges))); } void gouraudshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, penarray *p, Intarray *edges, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; size_t n=checkArrays(p,edges); size_t m=checkArray(g); array *z=new array(n); Int k=0; Int in=(Int) n; for(size_t j=0; j < m; ++j) { path *P=read(g,j); assert(P); Int stop=Min(P->size(),in-k); mem::vector& nodes=P->Nodes(); for(Int i=0; i < stop; ++i) (*z)[k++]=nodes[i].point; } checkArrays(p,z); f->append(new drawGouraudShade(*copyarray(g),stroke,fillrule,*copyarray(p), *z,*copyarray(edges))); } void tensorshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, penarray2 *p, patharray *b=NULL, pairarray2 *z=emptyarray, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; array *(*copyarray2)(array *a)=copy ? copyArray2: nop; if(b == NULL) b=g; size_t n=checkArrays(p,b); size_t nz=checkArray(z); if(nz != 0) checkEqual(nz,n); f->append(new drawTensorShade(*copyarray(g),stroke,fillrule,*copyarray2(p), *copyarray(b),*copyarray2(z))); } void functionshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, string shader=emptystring, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawFunctionShade(*copyarray(g),stroke,fillrule,shader)); } // Clip a picture to a superpath using the given fill rule. // Subsequent additions to the picture will not be affected by the clipping. void clip(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; drawClipBegin *begin=new drawClipBegin(*copyarray(g),stroke,fillrule,true); f->enclose(begin,new drawClipEnd(true,begin)); } void beginclip(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, bool copy=true) { array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawClipBegin(*copyarray(g),stroke,fillrule,false)); } void endclip(picture *f) { f->append(new drawClipEnd(false)); } void gsave(picture *f) { f->append(new drawGsave()); } void grestore(picture *f) { f->append(new drawGrestore()); } void begingroup(picture *f) { f->append(new drawBegin()); } void endgroup(picture *f) { f->append(new drawEnd()); } void _begingroup3(picture *f, string name, real compression, real granularity, bool closed, bool tessellate, bool dobreak, bool nobreak, triple center, Int interaction) { f->append(new drawBegin3(name,compression,granularity, closed,tessellate,dobreak,nobreak, center,(Interaction) intcast(interaction))); } void endgroup3(picture *f) { f->append(new drawEnd3()); } void add(picture *dest, picture *src) { dest->add(*src); } void prepend(picture *dest, picture *src) { dest->prepend(*src); } void postscript(picture *f, string s) { f->append(new drawVerbatim(PostScript,s)); } void tex(picture *f, string s) { f->append(new drawVerbatim(TeX,s)); } void postscript(picture *f, string s, pair min, pair max) { f->append(new drawVerbatim(PostScript,s,min,max)); } void tex(picture *f, string s, pair min, pair max) { f->append(new drawVerbatim(TeX,s,min,max)); } void texpreamble(string s) { string t=s+"\n"; processDataStruct &pd=processData(); pd.TeXpipepreamble.push_back(t); pd.TeXpreamble.push_back(t); } void deletepreamble() { if(getSetting("inlinetex")) { unlink(buildname(outname(),"pre").c_str()); } } void _labelpath(picture *f, string s, string size, path g, string justify, pair offset, pen p) { f->append(new drawLabelPath(s,size,g,justify,offset,p)); } void texreset() { processDataStruct &pd=processData(); pd.TeXpipepreamble.clear(); pd.TeXpreamble.clear(); pd.tex.pipeclose(); } void layer(picture *f) { f->append(new drawLayer()); } void newpage(picture *f) { f->append(new drawNewPage()); } void _image(picture *f, realarray2 *data, pair initial, pair final, penarray *palette=NULL, transform t=identity, bool copy=true, bool antialias=false) { array *(*copyarray)(array *a)=copy ? copyArray: nop; array *(*copyarray2)(array *a)=copy ? copyArray2: nop; f->append(new drawPaletteImage(*copyarray2(data),*copyarray(palette), t*matrix(initial,final),antialias)); } void _image(picture *f, penarray2 *data, pair initial, pair final, transform t=identity, bool copy=true, bool antialias=false) { array *(*copyarray2)(array *a)=copy ? copyArray2: nop; f->append(new drawNoPaletteImage(*copyarray2(data),t*matrix(initial,final), antialias)); } void _image(picture *f, callablePen *F, Int width, Int height, pair initial, pair final, transform t=identity, bool antialias=false) { f->append(new drawFunctionImage(Stack,F,width,height, t*matrix(initial,final),antialias)); } string nativeformat() { return nativeformat(); } bool latex() { return latex(getSetting("tex")); } bool pdf() { return pdf(getSetting("tex")); } void shipout(string prefix=emptystring, picture *f, picture *preamble=NULL, string format=emptystring, bool wait=false, bool view=true, callableTransform *xform) { if(prefix.empty()) prefix=outname(); picture *result=new picture; unsigned level=0; picture::nodelist::iterator p; // If null is given as an xform, just use the identity transformation. bool xformIsNull = xform == nullfunc::instance(); for(p = f->nodes.begin(); p != f->nodes.end(); ++p) { if (!xformIsNull) xform->call(Stack); transform t=xformIsNull ? camp::identity : pop(Stack); static transform Zero=transform(0.0,0.0,0.0,0.0,0.0,0.0); bool Delete=(t == Zero); picture *group=new picture; assert(*p); if((*p)->endgroup()) error(nobegin); if((*p)->begingroup()) { ++level; while(p != f->nodes.end() && level) { if(!Delete) { drawElement *e=t.isIdentity() ? *p : (*p)->transformed(t); group->append(e); } ++p; if(p == f->nodes.end()) break; assert(*p); if((*p)->begingroup()) ++level; if((*p)->endgroup()) { if(level) --level; else error(nobegin); } } } if(p == f->nodes.end()) break; assert(*p); if(!Delete) { drawElement *e=t.isIdentity() ? *p : (*p)->transformed(t); group->append(e); result->add(*group); } } result->shipout(preamble,prefix,format,0.0,wait,view); } void shipout3(string prefix, picture *f, string format=emptystring, real width, real height, real angle, real zoom, triple m, triple M, pair shift, realarray2 *t, realarray *background, triplearray *lights, realarray2 *diffuse, realarray2 *ambient, realarray2 *specular, bool viewportlighting, bool view=true) { size_t n=checkArrays(lights,diffuse); checkEqual(n,checkArray(ambient)); checkEqual(n,checkArray(specular)); real *T,*Background,*Diffuse,*Ambient,*Specular; triple *Lights; copyArray2C(T,t,true,4); copyArrayC(Background,background); copyArrayC(Lights,lights); copyArray2C(Diffuse,diffuse,false,4,UseGC); copyArray2C(Ambient,ambient,false,4,UseGC); copyArray2C(Specular,specular,false,4,UseGC); f->shipout3(prefix,format,width,height,angle,zoom,m,M,shift,T,Background,n, Lights,Diffuse,Ambient,Specular,viewportlighting,view); delete[] Background; delete[] T; } void shipout3(string prefix, picture *f) { f->shipout3(prefix); } void deconstruct(picture *f, picture *preamble=NULL, real magnification=1, callableTransform *xform) { unsigned level=0; unsigned n=0; string prefix=outname(); const string xformat="png"; static long arg_max=sysconf(_SC_ARG_MAX); const unsigned maxargs=::min(arg_max/(prefix.size()+xformat.size()+25ul), 256ul); openpipeout(); fprintf(pipeout,"%d\n",maxargs); fflush(pipeout); string preformat=nativeformat(); const string Done="Done"; const string Error="Error"; mem::vector cmd; // Enforce ghostscript limitations. magnification=::max(magnification,0.0001); real res=::min(::max(magnification*72.0,2.0),8192.0); const char *converter=NULL, *hint=NULL; if(magnification > 0.0) { mem::list nameStack; string outname; unsigned arg=0; unsigned batch=0; for(picture::nodelist::iterator p=f->nodes.begin();;) { if(p == f->nodes.end()) break; if(arg == 0) { cmd.clear(); ostringstream buf; buf << batch << "_"; outname=buildname(prefix+buf.str()+"%d",xformat,""); converter="gs"; hint="Ghostscript"; cmd.push_back(getSetting(converter)); cmd.push_back("-q"); cmd.push_back("-dNOPAUSE"); cmd.push_back("-dBATCH"); cmd.push_back("-P"); cmd.push_back("-sDEVICE=pngalpha"); cmd.push_back("-dEPSCrop"); if(safe) cmd.push_back("-dSAFER"); cmd.push_back("-r"+String(res)+"x"+String(res)); cmd.push_back("-sOutputFile="+outname); } picture *group=new picture; xform->call(Stack); transform t=pop(Stack); assert(*p); if((*p)->endgroup()) { fprintf(pipeout,"%s\n",Error.c_str()); fflush(pipeout); error(nobegin); } if((*p)->begingroup()) { ++level; while(p != f->nodes.end() && level) { drawElement *e=t.isIdentity() ? *p : (*p)->transformed(t); group->append(e); ++p; if(p == f->nodes.end()) break; assert(*p); if((*p)->begingroup()) ++level; if((*p)->endgroup()) { if(level) --level; else { fprintf(pipeout,"%s\n",Error.c_str()); fflush(pipeout); error(nobegin); } } } } if(p != f->nodes.end()) { assert(*p); drawElement *e=t.isIdentity() ? *p : (*p)->transformed(t); group->append(e); bbox b; ostringstream buf; buf << prefix << "_" << n; group->shipout(preamble,buf.str(),preformat,magnification,false,false); string Preformat=group->Transparency() ? "pdf" : preformat; string name=buildname(buf.str(),Preformat); nameStack.push_back(name); cmd.push_back(name); b=group->bounds(); b *= magnification; const char *oldlocale=setlocale(LC_NUMERIC,NULL); bool override=oldlocale && strcmp(oldlocale,"C") != 0; if(override) { oldlocale=StrdupNoGC(oldlocale); setlocale(LC_NUMERIC,"C"); } fprintf(pipeout,"%g %g %g %g\n",b.left,b.right,b.bottom,b.top); if(override) { setlocale(LC_NUMERIC,oldlocale); delete[] oldlocale; } fflush(pipeout); ++n; ++p; ++arg; } if(p == f->nodes.end() || arg >= maxargs) { arg=0; ++batch; fflush(pipeout); int status=System(cmd,0,true,converter,hint); if(status) { fprintf(pipeout,"%s\n",Error.c_str()); fflush(pipeout); error("deconstruct failed"); } } } if(!getSetting("keep")) { for(mem::list::iterator p=nameStack.begin(); p != nameStack.end(); ++p) unlink(p->c_str()); } fprintf(pipeout,"%s\n",Done.c_str()); fflush(pipeout); } } // Three-dimensional picture and surface operations // Bezier curve void _draw(picture *f, path3 g, triple center=Zero, pen p, Int interaction=0) { if(g.size() > 0) f->append(new drawPath3(g,center,p,(Interaction) intcast(interaction))); } // Bezier patch void draw(picture *f, triplearray2 *P, triple center, bool straight, penarray *p, real opacity, real shininess, real PRCshininess, penarray *colors, Int interaction, bool prc=true) { f->append(new drawBezierPatch(*P,center,straight,*p,opacity,shininess, PRCshininess,*colors, (Interaction) intcast(interaction),prc)); } // Bezier triangle void drawbeziertriangle(picture *f, triplearray2 *P, triple center, bool straight, penarray *p, real opacity, real shininess, real PRCshininess, penarray *colors, Int interaction, bool prc=true) { f->append(new drawBezierTriangle(*P,center,straight,*p,opacity,shininess, PRCshininess,*colors, (Interaction) intcast(interaction),prc)); } // General NURBS curve void draw(picture *f, triplearray *P, realarray *knot, realarray *weights=emptyarray, pen p) { f->append(new drawNurbsPath3(*P,knot,weights,p)); } // General NURBS surface void draw(picture *f, triplearray2 *P, realarray *uknot, realarray *vknot, realarray2 *weights=emptyarray, penarray *p, real opacity, real shininess, real PRCshininess, penarray *colors) { f->append(new drawNurbs(*P,uknot,vknot,weights,*p,opacity,shininess, PRCshininess,*colors)); } // PRC unit sphere void drawPRCsphere(picture *f, realarray2 *t, bool half=false, penarray *p, real opacity, real shininess, Int type) { f->append(new drawSphere(*t,half,*p,opacity,shininess,intcast(type))); } // PRC unit cylinder void drawPRCcylinder(picture *f, realarray2 *t, penarray *p, real opacity, real shininess) { f->append(new drawCylinder(*t,*p,opacity,shininess)); } // PRC unit disk void drawPRCdisk(picture *f, realarray2 *t, penarray *p, real opacity, real shininess) { f->append(new drawDisk(*t,*p,opacity,shininess)); } // General PRC tube void drawPRCtube(picture *f, path3 center, path3 g, penarray *p, real opacity, real shininess) { f->append(new drawTube(center,g,*p,opacity,shininess)); } // Draw pixel void drawpixel(picture *f, triple v, pen p, real width=1.0) { f->append(new drawPixel(v,p,width)); } // Draw triangles void draw(picture *f, triplearray *v, Intarray2 *vi, triplearray *n, Intarray2 *ni, penarray *p, real opacity, real shininess, real PRCshininess, penarray *c=emptyarray, Intarray2 *ci=emptyarray) { f->append(new drawTriangles(*v,*vi,*n,*ni,*p,opacity,shininess,PRCshininess, *c,*ci)); } triple min3(picture *f) { return f->bounds3().Min(); } triple max3(picture *f) { return f->bounds3().Max(); } triple size3(picture *f) { bbox3 b=f->bounds3(); return b.Max()-b.Min(); } pair minratio(picture *f) { return f->ratio(::min); } pair maxratio(picture *f) { return f->ratio(::max); } bool is3D(picture *f) { return f->have3D(); } ./asymptote-2.41/dec.h0000644000175000017500000003674513064427076014466 0ustar norbertnorbert/***** * dec.h * Andy Hammerlindl 2002/8/29 * * Represents the abstract syntax tree for declatations in the language. * Also included is abstract syntax for types as they are most often * used with declarations. *****/ #ifndef DEC_H #define DEC_H #include "symbol.h" #include "absyn.h" #include "name.h" #include "varinit.h" #include "modifier.h" namespace trans { class coenv; class genv; class protoenv; class varEntry; class access; } namespace types { class ty; struct formal; struct signature; struct function; } namespace vm { struct lambda; } namespace absyntax { using trans::genv; using trans::coenv; using trans::protoenv; using trans::varEntry; using trans::access; using sym::symbol; class vardec; class ty : public absyn { public: ty(position pos) : absyn(pos) {} virtual void prettyprint(ostream &out, Int indent) = 0; // If we introduced a new type, automatically add corresponding functions for // that type. virtual void addOps(coenv &, record *) {} // Returns the internal representation of the type. This method can // be called by exp::getType which does not report errors, so tacit is // needed to silence errors in this case. virtual types::ty *trans(coenv &e, bool tacit = false) = 0; virtual trans::tyEntry *transAsTyEntry(coenv &e, record *where); }; class nameTy : public ty { name *id; public: nameTy(position pos, name *id) : ty(pos), id(id) {} nameTy(name *id) : ty(id->getPos()), id(id) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e, bool tacit = false); trans::tyEntry *transAsTyEntry(coenv &e, record *where); }; class dimensions : public absyn { size_t depth; public: dimensions(position pos) : absyn(pos), depth(1) {} void prettyprint(ostream &out, Int indent); void increase() { depth++; } size_t size() { return depth; } types::array *truetype(types::ty *base); }; class arrayTy : public ty { ty *cell; dimensions *dims; public: arrayTy(position pos, ty *cell, dimensions *dims) : ty(pos), cell(cell), dims(dims) {} arrayTy(name *id, dimensions *dims) : ty(dims->getPos()), cell(new nameTy(id)), dims(dims) {} void prettyprint(ostream &out, Int indent); void addOps(coenv &e, record *r); types::ty *trans(coenv &e, bool tacit = false); }; // Similar to varEntryExp, this helper class always translates to the same fixed // type. class tyEntryTy : public ty { trans::tyEntry *ent; public: tyEntryTy(position pos, trans::tyEntry *ent) : ty(pos), ent(ent) {} tyEntryTy(position pos, types::ty *t); void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e, bool tacit = false); trans::tyEntry *transAsTyEntry(coenv &, record *) { return ent; } }; // Runnable is anything that can be executed by the program, including // any declaration or statement. class runnable : public absyn { public: runnable(position pos) : absyn(pos) {} virtual void prettyprint(ostream &out, Int indent) = 0; void markTrans(coenv &e) { markPos(e); trans(e); } /* Translates the stm or dec as if it were in a function definition. */ virtual void trans(coenv &e) { transAsField(e, 0); } /* This can be overridden, to specify a special way of translating the code * when it is run at the top of the interactive prompt. */ virtual void interactiveTrans(coenv &e) { trans(e); } void markTransAsField(coenv &e, record *r) { markPos(e); transAsField(e,r); } /* Translate the runnable as in the lowest lexical scope of a record * definition. If it is simply a statement, it will be added to the * record's initializer. A declaration, however, will also have to * add a new type or field to the record. */ virtual void transAsField(coenv &e, record *) = 0; virtual vm::lambda *transAsCodelet(coenv &e); // For functions that return a value, we must guarantee that they end // with a return statement. This checks for that condition. virtual bool returns() { return false; } // Returns true if it is syntatically allowable to modify this // runnable by a PUBLIC or PRIVATE modifier. virtual bool allowPermissions() { return false; } }; class block : public runnable { public: mem::list stms; // If the runnables should be interpreted in their own scope. bool scope; protected: void prettystms(ostream &out, Int indent); public: block(position pos, bool scope=true) : runnable(pos), scope(scope) {} // To ensure list deallocates properly. virtual ~block() {} void add(runnable *r) { stms.push_back(r); } void prettyprint(ostream &out, Int indent); void trans(coenv &e); void transAsField(coenv &e, record *r); void transAsRecordBody(coenv &e, record *r); types::record *transAsFile(genv& ge, symbol id); // If the block can be interpreted as a single vardec, return that vardec // (otherwise 0). vardec *asVardec(); // A block is guaranteed to return iff one of the runnables is guaranteed to // return. // This is conservative in that // // int f(int x) // { // if (x==1) return 0; // if (x!=1) return 1; // } // // is not guaranteed to return. bool returns(); }; class modifierList : public absyn { mem::list perms; mem::list mods; public: modifierList(position pos) : absyn(pos) {} virtual ~modifierList() {} void prettyprint(ostream &out, Int indent); void add(trans::permission p) { perms.push_back(p); } void add(trans::modifier m) { mods.push_back(m); } /* True if a static or dynamic modifier is present. */ bool staticSet(); /* Says if the modifiers indicate static or dynamic. Prints error if * there are duplicates. */ trans::modifier getModifier(); /* Says if it is declared public, private, or read-only (default). * Prints error if there are duplicates. */ trans::permission getPermission(); }; // Modifiers of static or dynamic can change the way declarations and // statements are encoded. class modifiedRunnable : public runnable { modifierList *mods; runnable *body; public: modifiedRunnable(position pos, modifierList *mods, runnable *body) : runnable(pos), mods(mods), body(body) {} modifiedRunnable(position pos, trans::permission perm, runnable *body) : runnable(pos), mods(new modifierList(pos)), body(body) { mods->add(perm); } void prettyprint(ostream &out, Int indent); void transAsField(coenv &e, record *r); bool returns() { return body->returns(); } }; class decidstart : public absyn { protected: symbol id; dimensions *dims; public: decidstart(position pos, symbol id, dimensions *dims = 0) : absyn(pos), id(id), dims(dims) {} virtual void prettyprint(ostream &out, Int indent); virtual types::ty *getType(types::ty *base, coenv &, bool = false); virtual trans::tyEntry *getTyEntry(trans::tyEntry *base, coenv &e, record *where); // If a new type is formed by adding dimensions (or a function signature) // after the id, this will add the standard functions for that new type. virtual void addOps(types::ty *base, coenv &e, record *r); virtual symbol getName() { return id; } }; // Forward declaration. class formals; class fundecidstart : public decidstart { formals *params; public: fundecidstart(position pos, symbol id, dimensions *dims = 0, formals *params = 0) : decidstart(pos, id, dims), params(params) {} void prettyprint(ostream &out, Int indent); types::ty *getType(types::ty *base, coenv &e, bool tacit = false); trans::tyEntry *getTyEntry(trans::tyEntry *base, coenv &e, record *where); void addOps(types::ty *base, coenv &e, record *r); }; class decid : public absyn { decidstart *start; varinit *init; // Returns the default initializer for the type. access *defaultInit(coenv &e, types::ty *t); public: decid(position pos, decidstart *start, varinit *init = 0) : absyn(pos), start(start), init(init) {} virtual void prettyprint(ostream &out, Int indent); virtual void transAsField(coenv &e, record *r, types::ty *base); // Translate, but add the names in as types rather than variables. virtual void transAsTypedefField(coenv &e, trans::tyEntry *base, record *r); decidstart *getStart() { return start; } }; class decidlist : public absyn { mem::list decs; public: decidlist(position pos) : absyn(pos) {} virtual ~decidlist() {} void add(decid *p) { decs.push_back(p); } virtual void prettyprint(ostream &out, Int indent); virtual void transAsField(coenv &e, record *r, types::ty *base); // Translate, but add the names in as types rather than variables. virtual void transAsTypedefField(coenv &e, trans::tyEntry *base, record *r); // If the list consists of a single entry, return it. decid *singleEntry() { if (decs.size() == 1) return decs.front(); else return 0; } }; class dec : public runnable { public: dec(position pos) : runnable(pos) {} void prettyprint(ostream &out, Int indent); // Declarations can be public or private. bool allowPermissions() { return true; } }; void createVar(position pos, coenv &e, record *r, symbol id, types::ty *t, varinit *init); class vardec : public dec { ty *base; decidlist *decs; public: vardec(position pos, ty *base, decidlist *decs) : dec(pos), base(base), decs(decs) {} vardec(position pos, ty *base, decid *di) : dec(pos), base(base), decs(new decidlist(pos)) { decs->add(di); } void prettyprint(ostream &out, Int indent); void transAsField(coenv &e, record *r) { base->addOps(e, r); decs->transAsField(e, r, base->trans(e)); } // Translate, but add the names in as types rather than variables. virtual void transAsTypedefField(coenv &e, record *r); // If the vardec encodes a single declaration, return the name of that // declaration (otherwise nullsym). symbol singleName(); // If the vardec encodes a single declaration, return the type of that // declaration (otherwise 0). types::ty *singleGetType(coenv& e); }; struct idpair : public absyn { symbol src; // The name of the module to access. symbol dest; // What to call it in the local environment. bool valid; // If it parsed properly. idpair(position pos, symbol id) : absyn(pos), src(id), dest(id), valid(true) {} idpair(position pos, symbol src, symbol as, symbol dest) : absyn(pos), src(src), dest(dest), valid(as==symbol::trans("as")) {} idpair(position pos, string src, symbol as, symbol dest) : absyn(pos), src(symbol::trans(src)), dest(dest), valid(as==symbol::trans("as")) {} void checkValidity() { if (!valid) { em.error(getPos()); em << "expected 'as'"; } } void prettyprint(ostream &out, Int indent); // Translates as: access src as dest; void transAsAccess(coenv &e, record *r); // Translates as: from _ unravel src as dest; // where _ is the qualifier record with source as its fields and types. void transAsUnravel(coenv &e, record *r, protoenv &source, varEntry *qualifier); }; struct idpairlist : public gc { mem::list base; void add(idpair *x) { base.push_back(x); } void prettyprint(ostream &out, Int indent); void transAsAccess(coenv &e, record *r); void transAsUnravel(coenv &e, record *r, protoenv &source, varEntry *qualifier); }; extern idpairlist * const WILDCARD; class accessdec : public dec { idpairlist *base; public: accessdec(position pos, idpairlist *base) : dec(pos), base(base) {} void prettyprint(ostream &out, Int indent); void transAsField(coenv &e, record *r) { base->transAsAccess(e,r); } }; // Abstract base class for // from _ access _; (fromaccessdec) // and // from _ unravel _; (unraveldec) class fromdec : public dec { protected: struct qualifier { // The varEntry holds the location and the type of the highest framed // structure that can be put on the stack. The record holds the actual type // of the qualifier. // For example: // struct A { // struct B { // static int x; // } // } // A a=new A; // from a.B unravel x; // // Here, v->getType() will yield A and v->getLocation() will yield the // location of the the variable a, but the record type t will be B. record *t; varEntry *v; qualifier(record *t, varEntry *v) : t(t), v(v) {} }; // Return the qualifier from which the fields are taken. If t==0, it is // assumed that an error occurred and was reported. virtual qualifier getQualifier(coenv &e, record *r) = 0; idpairlist *fields; public: fromdec(position pos, idpairlist *fields) : dec(pos), fields(fields) {} void prettyprint(ostream &out, Int indent); void transAsField(coenv &e, record *r); }; // An unravel declaration dumps fields and types of a record into the local // scope. class unraveldec : public fromdec { name *id; qualifier getQualifier(coenv &e, record *); public: unraveldec(position pos, name *id, idpairlist *fields) : fromdec(pos, fields), id(id) {} void prettyprint(ostream &out, Int indent); }; // A fromaccess declaration dumps fields and types of a module into the local // scope. It does not add the module as a variable in the local scope. class fromaccessdec : public fromdec { symbol id; qualifier getQualifier(coenv &e, record *r); public: fromaccessdec(position pos, symbol id, idpairlist *fields) : fromdec(pos, fields), id(id) {} void prettyprint(ostream &out, Int indent); }; // An import declaration dumps fields and types of a module into the local // scope. It also adds the module as a variable in the local scope. class importdec : public dec { block base; public: importdec(position pos, idpair *id) : dec(pos), base(pos, false) { idpairlist *i=new idpairlist; i->add(id); base.add(new accessdec(pos, i)); base.add(new unraveldec(pos, new simpleName(pos, id->dest), WILDCARD)); } void trans(coenv &e) { base.trans(e); } void transAsField(coenv &e, record *r) { base.transAsField(e, r); } void prettyprint(ostream &out, Int indent); }; // Parses the file given, and translates the resulting runnables as if they // occurred at this place in the code. class includedec : public dec { string filename; public: includedec(position pos, string filename) : dec(pos), filename(filename) {} includedec(position pos, symbol id) : dec(pos), filename(id) {} void prettyprint(ostream &out, Int indent); void loadFailed(coenv &e); void transAsField(coenv &e, record *r); }; // Types defined from others in typedef. class typedec : public dec { vardec *body; public: typedec(position pos, vardec *body) : dec(pos), body(body) {} void prettyprint(ostream &out, Int indent); void transAsField(coenv &e, record *r) { body->transAsTypedefField(e,r); } }; // A struct declaration. class recorddec : public dec { symbol id; block *body; void transRecordInitializer(coenv &e, record *parent); void addPostRecordEnvironment(coenv &e, record *r, record *parent); public: recorddec(position pos, symbol id, block *body) : dec(pos), id(id), body(body) {} virtual ~recorddec() {} void prettyprint(ostream &out, Int indent); void transAsField(coenv &e, record *parent); }; // Returns a runnable that facilitates the autoplain feature. runnable *autoplainRunnable(); void addVar(coenv &e, record *r, varEntry *v, symbol id); } // namespace absyntax #endif ./asymptote-2.41/runpair.h0000644000175000017500000000045313064427126015372 0ustar norbertnorbert/***** Autogenerated from runpair.in; changes will be overwritten *****/ #ifndef runpair_H #define runpair_H namespace run { void pairZero(vm::stack *); void realRealToPair(vm::stack *); void pairNegate(vm::stack *); void pairXPart(vm::stack *); void pairYPart(vm::stack *); } #endif // runpair_H ./asymptote-2.41/runpath.h0000644000175000017500000000026113064427126015370 0ustar norbertnorbert/***** Autogenerated from runpath.in; changes will be overwritten *****/ #ifndef runpath_H #define runpath_H namespace run { void nullPath(vm::stack *); } #endif // runpath_H ./asymptote-2.41/program.h0000644000175000017500000000500213064427076015360 0ustar norbertnorbert/***** * program.h * Tom Prince * * The list of instructions used by the virtual machine. *****/ #ifndef PROGRAM_H #define PROGRAM_H #include // for ptrdiff_t #include "common.h" #include "inst.h" using std::ptrdiff_t; namespace vm { struct inst; class program : public gc { public: class label; program(); void encode(inst i); label begin(); label end(); inst &back(); void pop_back(); private: friend class label; typedef mem::vector code_t; code_t code; inst& operator[](size_t); }; class program::label { public: // interface label() : where(0), code() {} public: //interface label& operator++(); label& operator--(); bool defined() const; bool operator==(const label& right) const; bool operator!=(const label& right) const; inst& operator*() const; inst* operator->() const; friend ptrdiff_t offset(const label& left, const label& right); private: label (size_t where, program* code) : where(where), code(code) {} size_t where; program* code; friend class program; }; // Prints one instruction (including arguments). void printInst(std::ostream& out, const program::label& code, const program::label& base); // Prints code until a ret opcode is printed. void print(std::ostream& out, program *base); // Inline forwarding functions for vm::program inline program::program() : code() {} inline program::label program::end() { return label(code.size(), this); } inline program::label program::begin() { return label(0, this); } inline inst& program::back() { return code.back(); } inline void program::pop_back() { return code.pop_back(); } inline void program::encode(inst i) { code.push_back(i); } inline inst& program::operator[](size_t n) { return code[n]; } inline program::label& program::label::operator++() { ++where; return *this; } inline program::label& program::label::operator--() { --where; return *this; } inline bool program::label::defined() const { return (code != 0); } inline bool program::label::operator==(const label& right) const { return (code == right.code) && (where == right.where); } inline bool program::label::operator!=(const label& right) const { return !(*this == right); } inline inst& program::label::operator*() const { return (*code)[where]; } inline inst* program::label::operator->() const { return &**this; } inline ptrdiff_t offset(const program::label& left, const program::label& right) { return right.where - left.where; } } // namespace vm #endif // PROGRAM_H ./asymptote-2.41/errortest.asy0000644000175000017500000001537713064427076016327 0ustar norbertnorbert/***** * errortest.asy * Andy Hammerlindl 2003/08/08 * * This struct attempts to trigger every error message reportable by the * compiler to ensure that errors are being reported properly. *****/ // name.cc { // line 33 x.y = 5; } { // line 50 int x = z; } { // line 67 x = 5; } { // line 84 - unreachable } { // line 95 x y1; x y2(); x y3(int); int y4(x); struct m { x y1; x y2(); x y3(int); int y4(x); } } { // line 130 int x; x.y = 4; } { // line 156 struct m { int x,y; } m.u.v = 5; } { // line 186 struct m { int x,y; } int x = m.z; } { // line 217 struct m { int x,y; } m.z = 5; } { // line 249 - unreachable } { // line 272 - not testable without typedef } { // line 283 struct m { int x,y; } m.u v; struct mm { m.u v; } } // exp.h { // line 109 5 = 4; } { // line 136 int f, f(); f; struct m { int f, f(); } m.f; } // exp.cc { // line 40 int x = {}; int y = {4, 5, 6}; } { // line 110 int f(), f(int); f.m = 5; } { // line 122 int x; x.m = 5; } { // line 147 struct point { int x,y; } point p; int x = p.z; } { // line 157 struct point { int x, y; } point p; p.z; } { // line 163 struct point { int f(), f(int); } point p; p.f; } { // line 204 struct point { int x, y; } point p; p.z = 5; } { // line 229 - unreachable } { // lines 261 and 275 - wait for subscript to be fully implemented. } { // line 515 void f(int), f(int, int); f(); f("Hello?"); } { // line 520 - not yet testable (need int->float casting or the like) } { // line 525 void f(int); f(); } { // line 649 struct point { int x,y; } point p; p = +p; } { // line 1359 int x, f(); (true) ? x : f; } { // line 1359 int a, a(), b, b(); (true) ? a : b; } { // line 1581 int x, f(); x = f; } { // line 1586 int a, a(), b, b(); a = b; } // newexp.cc { // line 34 int f() = new int () { int x = 5; }; } { // line 64 int x = new int; } { // line 72 struct a { struct b { } } new a.b; } // stm.cc { // line 86 5; } { // line 246 break; } { // line 261 continue; } { // line 282 void f() { return 17; } } { // line 288 int f() { return; } } // dec.cc { // line 378 int f() { int x = 5; } int g() { if (true) return 7; } } // env.h { // line 99 struct m {} struct m {} } { // line 109 int f() { return 1; } int f() { return 2; } int x = 1; int x = 2; struct m { int f() { return 1; } int f() { return 2; } int x = 1; int x = 2; } } // env.cc { // line 107 - currently unreachable as no built-ins are currently used // in records. } { // line 140 // Assuming there is a built-in function void abort(string): void f(string); abort = f; } { // line 168 - currently unreachable as no built-in functions are // currently used in records. } { // line 222 int x = "Hello"; } // Test permissions. { struct A { private int x=4; restricted int y=5; private void f() {} restricted void g() {} } A a; a.x; a.x = 4; a.x += 5; a.y = 6; a.y += 7; a.f; a.f(); a.f = new void() {}; a.g = new void() {}; } { struct A { private int x=4; private void f() {} } A a; from a unravel x; from a unravel f; } { struct A { restricted int y=5; restricted void g() {} } A a; from a unravel y,g; y = 6; y += 7; g = new void() {}; } { struct A { private typedef int T; } A.T x; A.T x=4; int y=2; A.T x=y; A.T x=17+3*y; } { struct A { private typedef int T; } from A unravel T; } { struct A { private typedef int T; } A a; a.T x; a.T x=4; int y=2; a.T x=y; a.T x=17+3*y; } { struct A { private typedef int T; } A a; from a unravel T; } // Read-only settings // Ensure that the safe and globalwrite options can't be modified inside the // code. { access settings; settings.safe=false; settings.safe=true; settings.globalwrite=false; settings.globalwrite=true; } { from settings access safe, globalwrite; safe=false; safe=true; globalwrite=false; globalwrite=true; } { from settings access safe as x, globalwrite as y; x=false; x=true; y=false; y=true; } { import settings; settings.safe=false; settings.safe=true; settings.globalwrite=false; settings.globalwrite=true; safe=false; safe=true; globalwrite=false; globalwrite=true; } // Test cases where var is used outside of type inference. { var x; } { var f() { return 4; } } { (var)3; var x = (var)3; int y = (var)3; } { var[] b = new var[] { 1, 2, 3}; var[] b = new int[] { 1, 2, 3}; var[] c = {1, 2, 3}; new var[] { 4, 5, 6}; int[] d = new var[] { 4, 5, 6}; new var; } { int f(var x = 3) { return 0; } } { int f, f(); var g = f; } { struct A { int f, f(); } var g = A.f; A a; var h = a.f; } { int x; for (var i : x) ; } { int x, x(); for (var i : x) ; } { int x, x(); int[] x = {2,3,4}; for (var i : x) ; } { int[] temp={0}; int[] v={0}; temp[v]= v; } // Keyword and rest errors. { int f(string s="" ... int[] a); f(1,2,3 ... new int[] {4,5,6}, "hi"); f(1,2,3 ... new int[] {4,5,6} ... new int[] {7,8,9}); f(... new int[] {4,5,6}, "hi"); f(... new int[] {4,5,6} ... new int[] {7,8,9}); } { int f(... int[] x, int y); int g(... int[] x, int y) { return 7; } int f(string s ... int[] x, int y); int g(string s ... int[] x, int y) { return 7; } int f(int keyword x, int y); int g(int keyword x, int y) { return 7; } int f(int keyword x, int y, string z); int g(int keyword x, int y, string z) { return 7; } int f(real t, int keyword x, int y); int g(real t, int keyword x, int y) { return 7; } int f(real t, int keyword x, int y, string z); int g(real t, int keyword x, int y, string z) { return 7; } } { int f(int notkeyword x); int g(int notkeyword x) { return 7; } int f(real w, int notkeyword x); int g(real w, int notkeyword x) { return 7; } int f(real w, int keyword y, int notkeyword x); int g(real w, int keyword y, int notkeyword x) { return 7; } int f(real w, int notkeyword y, int keyword x); int g(real w, int notkeyword y, int keyword x) { return 7; } int f(int notkeyword x, int y, string z); int g(int notkeyword x, int y, string z) { return 7; } int f(int notkeyword x, int y); int g(int notkeyword x, int y) { return 7; } int f(int notkeyword x, int y, string z); int g(int notkeyword x, int y, string z) { return 7; } int f(real t, int notkeyword x, int y); int g(real t, int notkeyword x, int y) { return 7; } int f(real t, int notkeyword x, int y, string z); int g(real t, int notkeyword x, int y, string z) { return 7; } } ./asymptote-2.41/TODO0000644000175000017500000000232113064427076014231 0ustar norbertnorbertAndy: add keyword-only arguments Andy: Arbitrary depth copying of arrays. Andy: Investigate bbox error in uofa-talk Shadowing slide Andy: change label in coder to a class not an Int Andy: look at label alignment in rotvenn Andy: possible optimizations: eliminate frame copying in picture.add(picture pic, ...) varpush+popcall --> varcall? fieldpush+popcall --> fieldcall? overloaded::simplify copies straight guide which references a subset of a pair vector. Is it cheaper to import a bltin module than to call base_venv again? varpush+pop --> no op varsave+pop --> one op closure+pushfunc+varsave+pop --> savefunc stack::popWithoutReturningValue look at position information saved in program, maybe save separately formal::addOps calls trans only hash first 3 or 4 args of signature rm transToType from varinitArg::trans change camp.y to flag arglists with named args Andy: testing in errortest.asy for packing versus casting, default argument ambiguities, and whatever else you can think of Andy: operator tuple, to let people define their own tuples Andy: Decide if we should change vm::error to em in application.cc John or Andy: Add unit test for AddOps. ./asymptote-2.41/doc/0000755000175000017500000000000013064427331014302 5ustar norbertnorbert./asymptote-2.41/doc/latexmkrc0000644000175000017500000000021613064427076016224 0ustar norbertnorbertsub asy {return system("asy '$_[0]'");} add_cus_dep("asy","eps",0,"asy"); add_cus_dep("asy","pdf",0,"asy"); add_cus_dep("asy","tex",0,"asy"); ./asymptote-2.41/doc/png/0000755000175000017500000000000013064427331015066 5ustar norbertnorbert./asymptote-2.41/doc/png/Makefile.in0000644000175000017500000000267513064427076017153 0ustar norbertnorbertASYFILES = $(notdir $(filter-out $(wildcard ../latexusage-*.asy),$(wildcard ../*.asy))) SOURCE = ../asymptote.texi ../version.texi ../options ASY = ../asy -dir ../base -config "" -render=0 docdir = $(DESTDIR)@docdir@ infodir = $(DESTDIR)@infodir@ datarootdir = @datarootdir@ INSTALL = @INSTALL@ all: html info %.png: ../%.asy cd .. && $(ASY) -f png -o png/ $(notdir $<) latexusage.png: ../latexusage.eps gs -q -dNOPAUSE -dBATCH -sDEVICE=pngalpha -dEPSCrop -dSAFER -r72x72 \ -sOutputFile=latexusage.png ../latexusage.eps index.html: $(SOURCE) $(ASYFILES:.asy=.png) latexusage.png makeinfo --html ../asymptote -o . asymptote.info: $(SOURCE) makeinfo --no-warn --no-split ../asymptote info: $(SOURCE) $(ASYFILES:.asy=.png) latexusage.png makeinfo --no-split ../asymptote ../options: cd .. && $(MAKE) options html: index.html clean: FORCE -rm -f *.png *.html asymptote.info* texput.aux texput.log distclean: FORCE clean -rm -f Makefile install: asymptote.info ${INSTALL} -d -m 755 $(infodir)/asymptote ${INSTALL} -p -m 644 asymptote.info $(infodir)/asymptote -if test -z "$(DESTDIR)"; then \ install-info --infodir=$(infodir) asymptote.info; \ fi install-all: all install ${INSTALL} -p -m 644 *.png $(infodir)/asymptote uninstall: -install-info --remove --infodir=$(infodir) asymptote.info -cd $(infodir)/asymptote && rm -f asymptote.info *.png -rmdir $(infodir)/asymptote FORCE: Makefile: Makefile.in cd ../..; config.status ./asymptote-2.41/doc/legend.asy0000644000175000017500000000063213064427076016265 0ustar norbertnorbertimport graph; size(8cm,6cm,IgnoreAspect); typedef real realfcn(real); realfcn F(real p) { return new real(real x) {return sin(p*x);}; }; for(int i=1; i < 5; ++i) draw(graph(F(i*pi),0,1),Pen(i), "$\sin("+(i == 1 ? "" : (string) i)+"\pi x)$"); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks(trailingzero)); attach(legend(2),(point(S).x,truepoint(S).y),10S,UnFill); ./asymptote-2.41/doc/asymptote.texi0000644000175000017500000135042713064427076017244 0ustar norbertnorbert\input texinfo @c -*-texinfo-*- @setfilename asymptote.info @settitle Asymptote: the Vector Graphics Language @include version.texi @finalout @copying This file documents @code{Asymptote}, version @value{VERSION}. @url{http://asymptote.sourceforge.net} Copyright @copyright{} 2004-16 Andy Hammerlindl, John Bowman, and Tom Prince. @quotation Permission is granted to copy, distribute and/or modify this document under the terms of the @acronym{GNU} Lesser General Public License (see the file LICENSE in the top-level source directory). @end quotation @end copying @dircategory Languages @direntry * asymptote: (asymptote/asymptote). Vector graphics language. @end direntry @titlepage @title Asymptote: the Vector Graphics Language @subtitle For version @value{VERSION} @sp 1 @center @image{logo} @page @vskip 0pt plus 1filll @insertcopying @end titlepage @c So the toc is printed at the start. @contents @ifnottex @node Top, Description, (dir), (dir) @top Asymptote @insertcopying @end ifnottex @menu * Description:: What is @code{Asymptote}? * Installation:: Downloading and installing * Tutorial:: Getting started * Drawing commands:: Four primitive graphics commands * Bezier curves:: Path connectors and direction specifiers * Programming:: The @code{Asymptote} vector graphics language * LaTeX usage:: Embedding @code{Asymptote} commands within @code{LaTeX} * Base modules:: Base modules shipped with @code{Asymptote} * Options:: Command-line options * Interactive mode:: Typing @code{Asymptote} commands interactively * GUI:: Graphical user interface * PostScript to Asymptote:: @code{Asymptote} backend to @code{pstoedit} * Help:: Where to get help and submit bug reports * Debugger:: Squish those bugs! * Credits:: Contributions and acknowledgments * Index:: General index @detailmenu --- The Detailed Node Listing --- Installation * UNIX binary distributions:: Prebuilt @code{UNIX} binaries * MacOS X binary distributions:: Prebuilt @code{MacOS X} binaries * Microsoft Windows:: Prebuilt @code{Microsoft Windows} binary * Configuring:: Configuring @code{Asymptote} for your system * Search paths:: Where @code{Asymptote} looks for your files * Compiling from UNIX source:: Building @code{Asymptote} from scratch * Editing modes:: Convenient @code{emacs} and @code{vim} modes * Git:: Getting the latest development source * Uninstall:: Goodbye, @code{Asymptote}! Tutorial * Drawing in batch mode:: Run @code{Asymptote} on a text file * Drawing in interactive mode:: Running @code{Asymptote} interactively * Figure size:: Specifying the figure size * Labels:: Adding @code{LaTeX} labels * Paths:: Drawing lines and curves Drawing commands * draw:: Draw a path on a picture or frame * fill:: Fill a cyclic path on a picture or frame * clip:: Clip a picture or frame to a cyclic path * label:: Label a point on a picture Programming * Data types:: void, bool, int, real, pair, triple, string * Paths and guides:: Bezier curves * Pens:: Colors, line types, line widths, font sizes * Transforms:: Affine transforms * Frames and pictures:: Canvases for immediate and deferred drawing * Files:: Reading and writing your data * Variable initializers:: Initialize your variables * Structures:: Organize your data * Operators:: Arithmetic and logical operators * Implicit scaling:: Avoiding those ugly *s * Functions:: Traditional and high-order functions * Arrays:: Dynamic vectors * Casts:: Implicit and explicit casts * Import:: Importing external @code{Asymptote} modules * Static:: Where to allocate your variable? Operators * Arithmetic & logical:: Basic mathematical operators * Self & prefix operators:: Increment and decrement * User-defined operators:: Overloading operators Functions * Default arguments:: Default values can appear anywhere * Named arguments:: Assigning function arguments by keyword * Rest arguments:: Functions with a variable number of arguments * Mathematical functions:: Standard libm functions Arrays * Slices:: Python-style array slices Base modules * plain:: Default @code{Asymptote} base file * simplex:: Linear programming: simplex method * math:: Extend @code{Asymptote}'s math capabilities * interpolate:: Interpolation routines * geometry:: Geometry routines * trembling:: Wavy lines * stats:: Statistics routines and histograms * patterns:: Custom fill and draw patterns * markers:: Custom path marker routines * tree:: Dynamic binary search tree * binarytree:: Binary tree drawing module * drawtree:: Tree drawing module * syzygy:: Syzygy and braid drawing module * feynman:: Feynman diagrams * roundedpath:: Round the sharp corners of paths * animation:: Embedded @acronym{PDF} and @acronym{MPEG} movies * embed:: Embedding movies, sounds, and 3D objects * slide:: Making presentations with @code{Asymptote} * MetaPost:: @code{MetaPost} compatibility routines * unicode:: Accept @code{unicode} (UTF-8) characters * latin1:: Accept @code{ISO 8859-1} characters * babel:: Interface to @code{LaTeX} @code{babel} package * labelpath:: Drawing curved labels * labelpath3:: Drawing curved labels in 3D * annotate:: Annotate your @acronym{PDF} files * CAD:: 2D CAD pen and measurement functions (DIN 15) * graph:: 2D linear & logarithmic graphs * palette:: Color density images and palettes * three:: 3D vector graphics * obj:: 3D obj files * graph3:: 3D linear & logarithmic graphs * grid3:: 3D grids * solids:: 3D solid geometry * tube:: 3D rotation minimizing tubes * flowchart:: Flowchart drawing routines * contour:: Contour lines * contour3:: Contour surfaces * smoothcontour3:: Smooth implicit surfaces * slopefield:: Slope fields * ode:: Ordinary differential equations Graphical User Interface * GUI installation:: Installing @code{xasy} * GUI usage:: Using @code{xasy} to edit objects @end detailmenu @end menu @node Description, Installation, Top, Top @chapter Description @cindex description @code{Asymptote} is a powerful descriptive vector graphics language that provides a mathematical coordinate-based framework for technical drawing. Labels and equations are typeset with @code{LaTeX}, for overall document consistency, yielding the same high-quality level of typesetting that @code{LaTeX} provides for scientific text. By default it produces @code{PostScript} output, but it can also generate any format that the @code{ImageMagick} package can produce. A major advantage of @code{Asymptote} over other graphics packages is that it is a high-level programming language, as opposed to just a graphics program: it can therefore exploit the best features of the script (command-driven) and graphical-user-interface (@acronym{GUI}) methods for producing figures. The rudimentary @acronym{GUI} @code{xasy} included with the package allows one to move script-generated objects around. To make @code{Asymptote} accessible to the average user, this @acronym{GUI} is currently being developed into a full-fledged interface that can generate objects directly. However, the script portion of the language is now ready for general use by users who are willing to learn a few simple @code{Asymptote} graphics commands (@pxref{Drawing commands}). @code{Asymptote} is mathematically oriented (e.g.@ one can use complex multiplication to rotate a vector) and uses @code{LaTeX} to do the typesetting of labels. This is an important feature for scientific applications. It was inspired by an earlier drawing program (with a weaker syntax and capabilities) called @code{MetaPost}. The @code{Asymptote} vector graphics language provides: @itemize @bullet @item a standard for typesetting mathematical figures, just as @TeX{}/@code{LaTeX} is the de-facto standard for typesetting equations. @item @code{LaTeX} typesetting of labels, for overall document consistency; @item the ability to generate and embed 3D vector @acronym{PRC} graphics within @acronym{PDF} files; @item a natural coordinate-based framework for technical drawing, inspired by @code{MetaPost}, with a much cleaner, powerful C++-like programming syntax; @item compilation of figures into virtual machine code for speed, without sacrificing portability; @item the power of a script-based language coupled to the convenience of a @acronym{GUI}; @item customization using its own C++-like graphics programming language; @item sensible defaults for graphical features, with the ability to override; @item a high-level mathematically oriented interface to the @code{PostScript} language for vector graphics, including affine transforms and complex variables; @item functions that can create new (anonymous) functions; @item deferred drawing that uses the simplex method to solve overall size constraint issues between fixed-sized objects (labels and arrowheads) and objects that should scale with figure size; @end itemize Many of the features of @code{Asymptote} are written in the @code{Asymptote} language itself. While the stock version of @code{Asymptote} is designed for mathematics typesetting needs, one can write @code{Asymptote} modules that tailor it to specific applications. A scientific graphing module has already been written (@pxref{graph}). Examples of @code{Asymptote} code and output, including animations, are available at @quotation @url{http://asymptote.sourceforge.net/gallery/} @end quotation @noindent Clicking on an example file name in this manual, like @code{@uref{http://asymptote.sourceforge.net/gallery/Pythagoras.pdf,,Pythagoras}}, will display the @acronym{PDF} output, whereas clicking on its @code{@uref{http://asymptote.sourceforge.net/gallery/Pythagoras.asy,,.asy}} extension will show the corresponding @code{Asymptote} code in a separate window. Links to many external resources, including an excellent user-written @code{Asymptote} tutorial can be found at @quotation @url{http://asymptote.sourceforge.net/links.html} @end quotation @cindex reference @cindex quick reference A quick reference card for @code{Asymptote} is available at @quotation @url{http://asymptote.sourceforge.net/asyRefCard.pdf} @end quotation @node Installation, Tutorial, Description, Top @chapter Installation @cindex installation @menu * UNIX binary distributions:: Prebuilt @code{UNIX} binaries * MacOS X binary distributions:: Prebuilt @code{MacOS X} binaries * Microsoft Windows:: Prebuilt @code{Microsoft Windows} binary * Configuring:: Configuring @code{Asymptote} for your system * Search paths:: Where @code{Asymptote} looks for your files * Compiling from UNIX source:: Building @code{Asymptote} from scratch * Editing modes:: Convenient @code{emacs} and @code{vim} modes * Git:: Getting the latest development source * Uninstall:: Goodbye, @code{Asymptote}! @end menu After following the instructions for your specific distribution, please see also @ref{Configuring}. @noindent We recommend subscribing to new release announcements at @quotation @url{http://sourceforge.net/projects/asymptote} @end quotation @noindent Users may also wish to monitor the @code{Asymptote} forum: @quotation @url{http://sourceforge.net/p/asymptote/discussion/409349} @end quotation @noindent @node UNIX binary distributions, MacOS X binary distributions, Installation, Installation @section UNIX binary distributions @cindex UNIX binary distributions @cindex @acronym{RPM} @cindex @code{tgz} We release both @code{tgz} and @acronym{RPM} binary distributions of @code{Asymptote}. The root user can install the @code{Linux i386} @code{tgz} distribution of version @code{x.xx} of @code{Asymptote} with the commands: @verbatim tar -C / -zxf asymptote-x.xx.i386.tgz texhash @end verbatim @noindent The @code{texhash} command, which installs LaTeX style files, is optional. The executable file will be @code{/usr/local/bin/asy}) and example code will be installed by default in @code{@value{Datadir}/doc/asymptote/examples}. @noindent @cindex Fedora Fedora users can easily install the most recent version of @code{Asymptote} with the command @verbatim dnf --enablerepo=rawhide install asymptote @end verbatim @cindex Debian @noindent To install the latest version of @code{Asymptote} on a Debian-based distribution (e.g.@ Ubuntu, Mepis, Linspire) follow the instructions for compiling from @code{UNIX} source (@pxref{Compiling from UNIX source}). Alternatively, Debian users can install one of Hubert Chan's prebuilt @code{Asymptote} binaries from @quotation @url{http://ftp.debian.org/debian/pool/main/a/asymptote} @end quotation @node MacOS X binary distributions, Microsoft Windows, UNIX binary distributions, Installation @section MacOS X binary distributions @cindex @code{MacOS X} binary distributions @code{MacOS X} users can either compile the @code{UNIX} source code (@pxref{Compiling from UNIX source}) or install the @code{Asymptote} binary available at @url{http://www.macports.org/} @noindent Note that many @code{MacOS X} (and FreeBSD) systems lack the @acronym{GNU} @code{readline} library. For full interactive functionality, @acronym{GNU} @code{readline} version 4.3 or later must be installed. @node Microsoft Windows, Configuring, MacOS X binary distributions, Installation @section Microsoft Windows @cindex Microsoft Windows Users of the @code{Microsoft Windows} operating system can install the self-extracting @code{Asymptote} executable @code{asymptote-x.xx-setup.exe}, where @code{x.xx} denotes the latest version. A working @TeX{} implementation (such as the one available at @url{http://www.miktex.org}) will be required to typeset labels. You will also need to install @code{GPL Ghostscript} version 9.14 or later from @url{http://downloads.ghostscript.com/public}. To view the default @code{PostScript} output, you can install the program @code{gsview} available from @url{http://www.cs.wisc.edu/~ghost/gsview/}. @cindex @code{psview} @anchor{psview} A better (and free) @code{PostScript} viewer available at @url{http://psview.sourceforge.net/} (which in particular works properly in interactive mode) unfortunately currently requires some manual configuration. Specifically, if version @code{x.xx} of @code{psview} is extracted to the directory @code{c:\Program Files} one needs to put @verbatim import settings; psviewer="c:\Program Files\psview-x.xx\psv.exe"; @end verbatim @noindent in the optional @code{Asymptote} configuration file; @pxref{configuration file}). The @code{ImageMagick} package from @url{http://www.imagemagick.org/script/binary-releases.php} @noindent is required to support output formats other than @acronym{EPS}, @acronym{PDF}, @acronym{SVG}, and @acronym{PNG} (@pxref{convert}). The @code{Python 2} interpreter from @url{http://www.python.org} is only required if you wish to try out the graphical user interface (@pxref{GUI}). @noindent Example code will be installed by default in the @code{examples} subdirectory of the installation directory (by default, @code{C:\Program Files\Asymptote}). @node Configuring, Search paths, Microsoft Windows, Installation @section Configuring @cindex configuring @cindex @code{-V} @cindex @code{psviewer} @cindex @code{pdfviewer} @cindex @code{gs} In interactive mode, or when given the @code{-V} option (the default when running @code{Asymptote} on a single file under @code{MSDOS}), @code{Asymptote} will automatically invoke the @code{PostScript} viewer @code{gv} (under @code{UNIX}) or @code{gsview} (under @code{MSDOS} to display graphical output. These defaults may be overridden with the configuration variable @code{psviewer}. The @code{PostScript} viewer should be capable of automatically redrawing whenever the output file is updated. The default @code{UNIX} @code{PostScript} viewer @code{gv} supports this (via a @code{SIGHUP} signal). Version @code{gv-3.6.3} or later (from @url{http://ftp.gnu.org/gnu/gv/}) is required for interactive mode to work properly. Users of @code{ggv} will need to enable @code{Watch file} under @code{Edit/Postscript Viewer Preferences}. Users of @code{gsview} will need to enable @code{Options/Auto Redisplay} (however, under @code{MSDOS} it is still necessary to click on the @code{gsview} window; under @code{UNIX} one must manually redisplay by pressing the @code{r} key). A better (and free) multiplatform alternative to @code{gsview} is @code{psview} (@pxref{psview}). @cindex @code{settings} @cindex configuration file Configuration variables are most easily set as @code{Asymptote} variables in an optional configuration file @code{config.asy} @pxref{configuration file}). Here are the default values of several important configuration variables under @code{UNIX}: @noindent @verbatim import settings; psviewer="gv"; pdfviewer="acroread"; gs="gs"; @end verbatim @noindent @cindex @code{cmd} Under @code{MSDOS}, the (installation-dependent) default values of these configuration variables are determined automatically from the @code{Microsoft Windows} registry. Viewer settings (such as @code{psviewer} and @code{pdfviewer}) can be set to the string @code{cmd} to request the application normally associated with the corresponding file type. For @acronym{PDF} format output, the @code{gs} setting specifies the location of the @code{PostScript}-to-@acronym{PDF} processor @code{Ghostscript}, available from @url{http://downloads.ghostscript.com/public}. The setting @code{pdfviewer} specifies the location of the @acronym{PDF} viewer. On @code{UNIX} systems, to support automatic document reloading in @code{Adobe Reader}, we recommend copying the file @code{reload.js} from the @code{Asymptote} system directory (by default, @code{@value{Datadir}/asymptote} under @code{UNIX} to @code{~/.adobe/Acrobat/x.x/JavaScripts/}, where @code{x.x} represents the appropriate @code{Adobe Reader} version number. The automatic document reload feature must then be explicitly enabled by putting @verbatim import settings; pdfreload=true; pdfreloadOptions="-tempFile"; @end verbatim @noindent in the @code{Asymptote} configuration file. This reload feature is not useful under @code{MSDOS} since the document cannot be updated anyway on that operating system until it is first closed by @code{Adobe Reader}. The configuration variable @code{dir} can be used to adjust the search path (@pxref{Search paths}). @cindex @code{papertype} @cindex @code{paperwidth} @cindex @code{paperheight} @cindex @code{letter} @cindex @code{a4} By default, @code{Asymptote} attempts to center the figure on the page, assuming that the paper type is @code{letter}. The default paper type may be changed to @code{a4} with the configuration variable @code{papertype}. Alignment to other paper sizes can be obtained by setting the configuration variables @code{paperwidth} and @code{paperheight}. @cindex @code{config} @cindex @code{texpath} @cindex @code{texcommand} @cindex @code{dvips} @cindex @code{dvisvgm} @cindex @code{libgs} @cindex @code{convert} @cindex @code{display} @cindex @code{animate} @cindex @code{ImageMagick} The following configuration variables normally do not require adjustment: @verbatim config texpath texcommand dvips dvisvgm libgs convert display animate @end verbatim @noindent Warnings (such as "unbounded" and "offaxis") may be enabled or disabled with the functions @verbatim warn(string s); nowarn(string s); @end verbatim @noindent or by directly modifying the string array @code{settings.suppress}, which lists all disabled warnings. @cindex command-line options Configuration variables may also be set or overwritten with a command-line option: @verbatim asy -psviewer=gsview -V venn @end verbatim @cindex environment variables Alternatively, system environment versions of the above configuration variables may be set in the conventional way. The corresponding environment variable name is obtained by converting the configuration variable name to upper case and prepending @code{ASYMPTOTE_}: for example, to set the environment variable @verbatim ASYMPTOTE_PSVIEWER="C:\Program Files\Ghostgum\gsview\gsview32.exe"; @end verbatim @noindent under @code{Microsoft Windows XP}: @enumerate @item Click on the @code{Start} button; @item Right-click on @code{My Computer}; @item Choose @code{View system information}; @item Click the @code{Advanced} tab; @item Click the @code{Environment Variables} button. @end enumerate @node Search paths, Compiling from UNIX source, Configuring, Installation @section Search paths @cindex search paths In looking for @code{Asymptote} system files, @code{asy} will search the following paths, in the order listed: @enumerate @item The current directory; @item @cindex @code{dir} A list of one or more directories specified by the configuration variable @code{dir} or environment variable @code{ASYMPTOTE_DIR} (separated by @code{:} under UNIX and @code{;} under @code{MSDOS}); @item @cindex @code{.asy} The directory specified by the environment variable @code{ASYMPTOTE_HOME}; if this variable is not set, the directory @code{.asy} in the user's home directory (@code{%USERPROFILE%\.asy} under @code{MSDOS}) is used; @item The @code{Asymptote} system directory (by default, @code{@value{Datadir}/asymptote} under @code{UNIX} and @code{C:\Program Files\Asymptote} under @code{MSDOS}). @end enumerate @node Compiling from UNIX source, Editing modes, Search paths, Installation @section Compiling from UNIX source @cindex Compiling from UNIX source To compile and install a @code{UNIX} executable from the source release @code{asymptote-x.xx.src.tgz} in the subdirectory @code{x.xx} under @url{http://sourceforge.net/projects/asymptote/files/} execute the commands: @verbatim gunzip asymptote-x.xx.src.tgz tar -xf asymptote-x.xx.src.tar cd asymptote-x.xx @end verbatim By default the system version of the Boehm garbage collector will be used; if it is old we recommend first putting @url{http://hboehm.info/gc/gc_source/gc-7.4.2.tar.gz} @url{http://www.ivmaisoft.com/_bin/atomic_ops/libatomic_ops-7.4.2.tar.gz} in the @code{Asymptote} source directory. On @code{UNIX} platforms (other than @code{MacOS X}), we recommend using version @code{3.0.0} of the @code{freeglut} library. To compile @code{freeglut}, download @quotation @url{http://prdownloads.sourceforge.net/freeglut/freeglut-3.0.0.tar.gz} @end quotation @noindent and type (as the root user): @verbatim gunzip freeglut-3.0.0.tar.gz tar -xf freeglut-3.0.0.tar cd freeglut-3.0.0 ./configure --prefix=/usr cmake . make make install cd .. @end verbatim @noindent Then compile @code{Asymptote} with the commands @verbatim ./configure make all make install @end verbatim @noindent Be sure to use @acronym{GNU} @code{make} (on non-@acronym{GNU} systems this command may be called @code{gmake}). To build the documentation, you may need to install the @code{texinfo-tex} package. If you get errors from a broken @code{texinfo} or @code{pdftex} installation, simply put @quotation @url{http://asymptote.sourceforge.net/asymptote.pdf} @end quotation @noindent in the directory @code{doc} and repeat the command @code{make all}. @noindent For a (default) system-wide installation, the last command should be done as the root user. To install without root privileges, change the @code{./configure} command to @verbatim ./configure --prefix=$HOME/asymptote @end verbatim One can disable use of the Boehm garbage collector by configuring with @code{./configure --disable-gc}. For a list of other configuration options, say @code{./configure --help}. For example, one can tell configure to look for header files and libraries in nonstandard locations: @verbatim ./configure CXXFLAGS=-I/opt/local/include LDFLAGS=-L/opt/local/lib @end verbatim If you are compiling @code{Asymptote} with @code{gcc}, you will need a relatively recent version (e.g.@ 3.4.4 or later). For full interactive functionality, you will need version 4.3 or later of the @acronym{GNU} @code{readline} library. The file @code{gcc3.3.2curses.patch} in the @code{patches} directory can be used to patch the broken curses.h header file (or a local copy thereof in the current directory) on some @code{AIX} and @code{IRIX} systems. @cindex @code{FFTW} @cindex @code{GSL} The @code{FFTW} library is only required if you want @code{Asymptote} to be able to take Fourier transforms of data (say, to compute an audio power spectrum). The @code{GSL} library is only required if you require the special functions that it supports. If you don't want to install @code{Asymptote} system wide, just make sure the compiled binary @code{asy} and @acronym{GUI} script @code{xasy} are in your path and set the configuration variable @code{dir} to point to the directory @code{base} (in the top level directory of the @code{Asymptote} source code). @node Editing modes, Git, Compiling from UNIX source, Installation @section Editing modes @cindex Editing modes @cindex @code{emacs} @cindex @code{asy-mode} @cindex @code{lasy-mode} Users of @code{emacs} can edit @code{Asymptote} code with the mode @code{asy-mode}, after enabling it by putting the following lines in their @code{.emacs} initialization file, replacing @code{ASYDIR} with the location of the @code{Asymptote} system directory (by default, @code{@value{Datadir}/asymptote} or @code{C:\Program Files\Asymptote} under @code{MSDOS}): @verbatim (add-to-list 'load-path "ASYDIR") (autoload 'asy-mode "asy-mode.el" "Asymptote major mode." t) (autoload 'lasy-mode "asy-mode.el" "hybrid Asymptote/Latex major mode." t) (autoload 'asy-insinuate-latex "asy-mode.el" "Asymptote insinuate LaTeX." t) (add-to-list 'auto-mode-alist '("\\.asy$" . asy-mode)) @end verbatim @noindent Particularly useful key bindings in this mode are @code{C-c C-c}, which compiles and displays the current buffer, and the key binding @code{C-c ?}, which shows the available function prototypes for the command at the cursor. For full functionality you should also install the Apache Software Foundation package @code{two-mode-mode}: @quotation @url{http://www.dedasys.com/freesoftware/files/two-mode-mode.el} @end quotation @noindent Once installed, you can use the hybrid mode @code{lasy-mode} to edit a LaTeX file containing embedded @code{Asymptote} code (@pxref{LaTeX usage}). This mode can be enabled within @code{latex-mode} with the key sequence @code{M-x lasy-mode }. On @code{UNIX} systems, additional keywords will be generated from all @code{asy} files in the space-separated list of directories specified by the environment variable @code{ASYMPTOTE_SITEDIR}. Further documentation of @code{asy-mode} is available within @code{emacs} by pressing the sequence keys @code{C-h f asy-mode }. @cindex @code{vim} @cindex @code{asy.vim} Fans of @code{vim} can customize @code{vim} for @code{Asymptote} with @noindent @code{cp @value{Datadir}/asymptote/asy.vim ~/.vim/syntax/asy.vim} @noindent and add the following to their @code{~/.vimrc} file: @verbatim augroup filetypedetect au BufNewFile,BufRead *.asy setf asy augroup END filetype plugin on @end verbatim If any of these directories or files don't exist, just create them. To set @code{vim} up to run the current asymptote script using @code{:make} just add to @code{~/.vim/ftplugin/asy.vim}: @verbatim setlocal makeprg=asy\ % setlocal errorformat=%f:\ %l.%c:\ %m @end verbatim @cindex @code{KDE editor} @cindex @code{Kate} @cindex @code{asymptote.xml} Syntax highlighting support for the @acronym{KDE} editor @code{Kate} can be enabled by running @code{asy-kate.sh} in the @code{@value{Datadir}/asymptote} directory and putting the generated @code{asymptote.xml} file in @code{~/.kde/share/apps/katepart/syntax/}. @node Git, Uninstall, Editing modes, Installation @section Git @cindex git The following commands are needed to install the latest development version of @code{Asymptote} using @code{git}: @verbatim git clone http://github.com/vectorgraphics/asymptote cd asymptote ./autogen.sh ./configure make all make install @end verbatim @noindent To compile without optimization, use the command @code{make CFLAGS=-g}. @node Uninstall, , Git, Installation @section Uninstall @cindex uninstall To uninstall a @code{Linux i386} binary distribution, use the commands @verbatim tar -zxvf asymptote-x.xx.i386.tgz | xargs --replace=% rm /% texhash @end verbatim @noindent To uninstall all @code{Asymptote} files installed from a source distribution, use the command @verbatim make uninstall @end verbatim @node Tutorial, Drawing commands, Installation, Top @chapter Tutorial @cindex tutorial @menu * Drawing in batch mode:: Run @code{Asymptote} on a text file * Drawing in interactive mode:: Running @code{Asymptote} interactively * Figure size:: Specifying the figure size * Labels:: Adding @code{LaTeX} labels * Paths:: Drawing lines and curves @end menu A concise introduction to @code{Asymptote} is given here. For a more thorough introduction, see the excellent @code{Asymptote} tutorial written by Charles Staats: @url{http://math.uchicago.edu/~cstaats/Charles_Staats_III/Notes_and_papers_files/asymptote_tutorial.pdf} Another @code{Asymptote} tutorial is available as a wiki, with images rendered by an online Asymptote engine: @url{http://www.artofproblemsolving.com/wiki/?title=Asymptote_(Vector_Graphics_Language)} @node Drawing in batch mode, Drawing in interactive mode, Tutorial, Tutorial @section Drawing in batch mode @cindex batch mode To draw a line from coordinate (0,0) to coordinate (100,100), create a text file @code{test.asy} containing @verbatiminclude diagonal.asy @noindent Then execute the command @verbatim asy -V test @end verbatim @noindent Alternatively, @code{MSDOS} users can drag and drop @code{test.asy} onto the Desktop @code{asy} icon (or make @code{Asymptote} the default application for the extension @code{asy}). @noindent @cindex @code{-V} This method, known as @emph{batch mode}, outputs a @code{PostScript} file @code{test.eps}. If you prefer @acronym{PDF} output, use the command line @verbatim asy -V -f pdf test @end verbatim In either case, the @code{-V} option opens up a viewer window so you can immediately view the result: @sp 1 @center @image{diagonal} @cindex @code{bp} @noindent Here, the @code{--} connector joins the two points @code{(0,0)} and @code{(100,100)} with a line segment. @node Drawing in interactive mode, Figure size, Drawing in batch mode, Tutorial @section Drawing in interactive mode @cindex interactive mode Another method is @emph{interactive mode}, where @code{Asymptote} reads individual commands as they are entered by the user. To try this out, enter @code{Asymptote}'s interactive mode by clicking on the @code{Asymptote} icon or typing the command @code{asy}. Then type @verbatim draw((0,0)--(100,100)); @end verbatim @noindent followed by @code{Enter}, to obtain the above image. @cindex tab completion @cindex arrow keys @cindex erase @cindex quit @noindent At this point you can type further @code{draw} commands, which will be added to the displayed figure, @code{erase} to clear the canvas, @verbatim input test; @end verbatim @noindent to execute all of the commands contained in the file @code{test.asy}, or @code{quit} to exit interactive mode. You can use the arrow keys in interactive mode to edit previous lines. The tab key will automatically complete unambiguous words; otherwise, hitting tab again will show the possible choices. Further commands specific to interactive mode are described in @ref{Interactive mode}. @node Figure size, Labels, Drawing in interactive mode, Tutorial @section Figure size @cindex @code{size} @cindex @code{pair} In @code{Asymptote}, coordinates like @code{(0,0)} and @code{(100,100)}, called @emph{pairs}, are expressed in @code{PostScript} "big points" (1 @code{bp} = 1/72 @code{inch}) and the default line width is @code{0.5bp}. However, it is often inconvenient to work directly in @code{PostScript} coordinates. The next example produces identical output to the previous example, by scaling the line @code{(0,0)--(1,1)} to fit a rectangle of width @code{100.5 bp} and height @code{100.5 bp} (the extra @code{0.5bp} accounts for the line width): @verbatim size(100.5,100.5); draw((0,0)--(1,1)); @end verbatim @sp 1 @center @image{diagonal} @cindex @code{inches} @cindex @code{cm} @cindex @code{mm} @cindex @code{pt} One can also specify the size in @code{pt} (1 @code{pt} = 1/72.27 @code{inch}), @code{cm}, @code{mm}, or @code{inches}. Two nonzero size arguments (or a single size argument) restrict the size in both directions, preserving the aspect ratio. If 0 is given as a size argument, no restriction is made in that direction; the overall scaling will be determined by the other direction (@pxref{size}): @verbatiminclude bigdiagonal.asy @sp 1 @center @image{bigdiagonal} @cindex @code{cycle} To connect several points and create a cyclic path, use the @code{cycle} keyword: @verbatiminclude square.asy @sp 1 @center @image{square} @noindent For convenience, the path @code{(0,0)--(1,0)--(1,1)--(0,1)--cycle} may be replaced with the predefined variable @code{unitsquare}, or equivalently, @code{box((0,0),(1,1))}. @cindex user coordinates @cindex @code{unitsize} To make the user coordinates represent multiples of exactly @code{1cm}: @verbatim unitsize(1cm); draw(unitsquare); @end verbatim @noindent @node Labels, Paths, Figure size, Tutorial @section Labels @cindex @code{label} Adding labels is easy in @code{Asymptote}; one specifies the label as a double-quoted @code{LaTeX} string, a coordinate, and an optional alignment direction: @verbatiminclude labelsquare.asy @sp 1 @center @image{labelsquare} @cindex compass directions @cindex @code{N} @cindex @code{E} @cindex @code{W} @cindex @code{S} @code{Asymptote} uses the standard compass directions @code{E=(1,0)}, @code{N=(0,1)}, @code{NE=unit(N+E)}, and @code{ENE=unit(E+NE)}, etc., which along with the directions @code{up}, @code{down}, @code{right}, and @code{left} are defined as pairs in the @code{Asymptote} base module @code{plain} (a user who has a local variable named @code{E} may access the compass direction @code{E} by prefixing it with the name of the module where it is defined: @code{plain.E}). @node Paths, , Labels, Tutorial @section Paths @cindex @code{path} This example draws a path that approximates a quarter circle, terminated with an arrowhead: @verbatiminclude quartercircle.asy @sp 1 @center @image{quartercircle} @noindent Here the directions @code{up} and @code{left} in braces specify the incoming and outgoing directions at the points @code{(1,0)} and @code{(0,1)}, respectively. In general, a path is specified as a list of points (or other paths) interconnected with @cindex @code{cycle} @cindex @code{--} @cindex @code{..} @code{--}, which denotes a straight line segment, or @code{..}, which denotes a cubic spline (@pxref{Bezier curves}). @cindex @code{unitcircle} @anchor{unitcircle} @cindex @code{unitcircle} Specifying a final @code{..cycle} creates a cyclic path that connects smoothly back to the initial node, as in this approximation (accurate to within 0.06%) of a unit circle: @verbatim path unitcircle=E..N..W..S..cycle; @end verbatim @cindex @code{PostScript} subpath @cindex @code{^^} @cindex @code{path[]} @cindex superpath @noindent An @code{Asymptote} path, being connected, is equivalent to a @code{Postscript subpath}. The @code{^^} binary operator, which requests that the pen be moved (without drawing or affecting endpoint curvatures) from the final point of the left-hand path to the initial point of the right-hand path, may be used to group several @code{Asymptote} paths into a @code{path[]} array (equivalent to a @code{PostScript} path): @verbatiminclude superpath.asy @sp 1 @center @image{superpath} @cindex evenodd @noindent The @code{PostScript} even-odd fill rule here specifies that only the region bounded between the two unit circles is filled (@pxref{fillrule}). In this example, the same effect can be achieved by using the default zero winding number fill rule, if one is careful to alternate the orientation of the paths: @verbatim filldraw(unitcircle^^reverse(g),yellow,black); @end verbatim @cindex @code{unitbox} The @code{^^} operator is used by the @code{box(triple, triple)} function in the module @code{three.asy} to construct the edges of a cube @code{unitbox} without retracing steps (@pxref{three}): @verbatiminclude cube.asy @sp 1 @center @image{cube} See section @ref{graph} (or the online @code{Asymptote} @uref{http://asymptote.sourceforge.net/gallery,,gallery} and external links posted at @url{http://asymptote.sourceforge.net}) for further examples, including two-dimensional and interactive three-dimensional scientific graphs. Additional examples have been posted by Philippe Ivaldi at @url{http://www.piprime.fr/asymptote}. @node Drawing commands, Bezier curves, Tutorial, Top @chapter Drawing commands @cindex drawing commands All of @code{Asymptote}'s graphical capabilities are based on four primitive commands. The three @code{PostScript} drawing commands @code{draw}, @code{fill}, and @code{clip} add objects to a picture in the order in which they are executed, with the most recently drawn object appearing on top. The labeling command @code{label} can be used to add text labels and external @acronym{EPS} images, which will appear on top of the @code{PostScript} objects (since this is normally what one wants), but again in the relative order in which they were executed. After drawing objects on a picture, the picture can be output with the @code{shipout} function (@pxref{shipout}). @cindex @code{layer} If you wish to draw @code{PostScript} objects on top of labels (or verbatim @code{tex} commands; @pxref{tex}), the @code{layer} command may be used to start a new @code{PostScript/LaTeX} layer: @verbatim void layer(picture pic=currentpicture); @end verbatim The @code{layer} function gives one full control over the order in which objects are drawn. Layers are drawn sequentially, with the most recent layer appearing on top. Within each layer, labels, images, and verbatim @code{tex} commands are always drawn after the @code{PostScript} objects in that layer. While some of these drawing commands take many options, they all have sensible default values (for example, the picture argument defaults to currentpicture). @cindex legend @cindex @code{draw} @cindex @code{arrow} @menu * draw:: Draw a path on a picture or frame * fill:: Fill a cyclic path on a picture or frame * clip:: Clip a picture or frame to a cyclic path * label:: Label a point on a picture @end menu @node draw, fill, Drawing commands, Drawing commands @section draw @cindex @code{draw} @verbatim void draw(picture pic=currentpicture, Label L="", path g, align align=NoAlign, pen p=currentpen, arrowbar arrow=None, arrowbar bar=None, margin margin=NoMargin, Label legend="", marker marker=nomarker); @end verbatim Draw the path @code{g} on the picture @code{pic} using pen @code{p} for drawing, with optional drawing attributes (Label @code{L}, explicit label alignment @code{align}, arrows and bars @code{arrow} and @code{bar}, margins @code{margin}, legend, and markers @code{marker}). Only one parameter, the path, is required. For convenience, the arguments @code{arrow} and @code{bar} may be specified in either order. The argument @code{legend} is a Label to use in constructing an optional legend entry. @cindex @code{None} @cindex @code{BeginBar} @cindex @code{EndBar} @cindex @code{Bar} @cindex @code{Bars} @cindex @code{barsize} Bars are useful for indicating dimensions. The possible values of @code{bar} are @code{None}, @code{BeginBar}, @code{EndBar} (or equivalently @code{Bar}), and @code{Bars} (which draws a bar at both ends of the path). Each of these bar specifiers (except for @code{None}) will accept an optional real argument that denotes the length of the bar in @code{PostScript} coordinates. The default bar length is @code{barsize(pen)}. @cindex arrows @anchor{arrows} @cindex @code{None} @cindex @code{Blank} @cindex @code{BeginArrow} @cindex @code{MidArrow} @cindex @code{EndArrow} @cindex @code{Arrow} @cindex @code{Arrows} @cindex @code{FillDraw} @cindex @code{Fill} @cindex @code{Draw} @cindex @code{NoFill} @cindex @code{UnFill} @cindex @code{BeginArcArrow} @cindex @code{MidArcArrow} @cindex @code{EndArcArrow} @cindex @code{ArcArrow} @cindex @code{ArcArrows} @cindex @code{DefaultHead} @cindex @code{SimpleHead} @cindex @code{HookHead} @cindex @code{TeXHead} The possible values of @code{arrow} are @code{None}, @code{Blank} (which draws no arrows or path), @code{BeginArrow}, @code{MidArrow}, @code{EndArrow} (or equivalently @code{Arrow}), and @code{Arrows} (which draws an arrow at both ends of the path). All of the arrow specifiers except for @code{None} and @code{Blank} may be given the optional arguments arrowhead @code{arrowhead} (one of the predefined arrowhead styles @code{DefaultHead}, @code{SimpleHead}, @code{HookHead}, @code{TeXHead}), real @code{size} (arrowhead size in @code{PostScript} coordinates), real @code{angle} (arrowhead angle in degrees), filltype @code{filltype} (one of @code{FillDraw}, @code{Fill}, @code{NoFill}, @code{UnFill}, @code{Draw}) and (except for @code{MidArrow} and @code{Arrows}) a real @code{position} (in the sense of @code{point(path p, real t)}) along the path where the tip of the arrow should be placed. The default arrowhead size when drawn with a pen @code{p} is @code{arrowsize(p)}. There are also arrow versions with slightly modified default values of @code{size} and @code{angle} suitable for curved arrows: @code{BeginArcArrow}, @code{EndArcArrow} (or equivalently @code{ArcArrow}), @code{MidArcArrow}, and @code{ArcArrows}. @cindex @code{NoMargin} @cindex @code{BeginMargin} @cindex @code{EndMargin} @cindex @code{Margin} @cindex @code{Margins} @cindex @code{BeginPenMargin} @cindex @code{EndPenMargin} @cindex @code{PenMargin} @cindex @code{PenMargins} @cindex @code{BeginDotMargin} @cindex @code{EndDotMargin} @cindex @code{DotMargin} @cindex @code{DotMargins} @cindex @code{Margin} @cindex @code{TrueMargin} Margins can be used to shrink the visible portion of a path by @code{labelmargin(p)} to avoid overlap with other drawn objects. Typical values of @code{margin} are @code{NoMargin}, @code{BeginMargin}, @code{EndMargin} (or equivalently @code{Margin}), and @code{Margins} (which leaves a margin at both ends of the path). One may use @code{Margin(real begin, real end)} to specify the size of the beginning and ending margin, respectively, in multiples of the units @code{labelmargin(p)} used for aligning labels. Alternatively, @code{BeginPenMargin}, @code{EndPenMargin} (or equivalently @code{PenMargin}), @code{PenMargins}, @code{PenMargin(real begin, real end)} specify a margin in units of the pen line width, taking account of the pen line width when drawing the path or arrow. For example, use @code{DotMargin}, an abbreviation for @code{PenMargin(-0.5*dotfactor,0.5*dotfactor)}, to draw from the usual beginning point just up to the boundary of an end dot of width @code{dotfactor*linewidth(p)}. The qualifiers @code{BeginDotMargin}, @code{EndDotMargin}, and @code{DotMargins} work similarly. The qualifier @code{TrueMargin(real begin, real end)} allows one to specify a margin directly in @code{PostScript} units, independent of the pen line width. The use of arrows, bars, and margins is illustrated by the examples @code{@uref{http://asymptote.sourceforge.net/gallery/Pythagoras.pdf,,Pythagoras}@uref{http://asymptote.sourceforge.net/gallery/Pythagoras.asy,,.asy}}, @code{@uref{http://asymptote.sourceforge.net/gallery/sqrtx01.pdf,,sqrtx01}@uref{http://asymptote.sourceforge.net/gallery/sqrtx01.asy,,.asy}}, and @code{@uref{http://asymptote.sourceforge.net/gallery/triads.pdf,,triads}@uref{http://asymptote.sourceforge.net/gallery/triads.asy,,.asy}}. The legend for a picture @code{pic} can be fit and aligned to a frame with the routine: @cindex @code{legend} @verbatim frame legend(picture pic=currentpicture, int perline=1, real xmargin=legendmargin, real ymargin=xmargin, real linelength=legendlinelength, real hskip=legendhskip, real vskip=legendvskip, real maxwidth=0, real maxheight=0, bool hstretch=false, bool vstretch=false, pen p=currentpen); @end verbatim @noindent Here @code{xmargin} and @code{ymargin} specify the surrounding @math{x} and @math{y} margins, @code{perline} specifies the number of entries per line (default 1; 0 means choose this number automatically), @code{linelength} specifies the length of the path lines, @code{hskip} and @code{vskip} specify the line skip (as a multiple of the legend entry size), @code{maxwidth} and @code{maxheight} specify optional upper limits on the width and height of the resulting legend (0 means unlimited), @code{hstretch} and @code{vstretch} allow the legend to stretch horizontally or vertically, and @code{p} specifies the pen used to draw the bounding box. The legend frame can then be added and aligned about a point on a picture @code{dest} using @code{add} or @code{attach} (@pxref{add about}). @cindex @code{dot} To draw a dot, simply draw a path containing a single point. The @code{dot} command defined in the module @code{plain} draws a dot having a diameter equal to an explicit pen line width or the default line width magnified by @code{dotfactor} (6 by default), using the specified filltype (@pxref{filltype}): @verbatim void dot(picture pic=currentpicture, pair z, pen p=currentpen, filltype filltype=Fill); void dot(picture pic=currentpicture, Label L, pair z, align align=NoAlign, string format=defaultformat, pen p=currentpen, filltype filltype=Fill); void dot(picture pic=currentpicture, Label[] L=new Label[], pair[] z, align align=NoAlign, string format=defaultformat, pen p=currentpen, filltype filltype=Fill) void dot(picture pic=currentpicture, Label L, pen p=currentpen, filltype filltype=Fill); @end verbatim @cindex @code{Label} If the variable @code{Label} is given as the @code{Label} argument to the second routine, the @code{format} argument will be used to format a string based on the dot location (here @code{defaultformat} is @code{"$%.4g$"}). The third routine draws a dot at every point of a pair array @code{z}. One can also draw a dot at every node of a path: @verbatim void dot(picture pic=currentpicture, Label[] L=new Label[], path g, align align=RightSide, string format=defaultformat, pen p=currentpen, filltype filltype=Fill); @end verbatim See @ref{pathmarkers} and @ref{markers} for more general methods for marking path nodes. To draw a fixed-sized object (in @code{PostScript} coordinates) about the user coordinate @code{origin}, use the routine @cindex @code{draw} @verbatim void draw(pair origin, picture pic=currentpicture, Label L="", path g, align align=NoAlign, pen p=currentpen, arrowbar arrow=None, arrowbar bar=None, margin margin=NoMargin, Label legend="", marker marker=nomarker); @end verbatim @cindex @code{fill} @node fill, clip, draw, Drawing commands @section fill @cindex @code{fill} @verbatim void fill(picture pic=currentpicture, path g, pen p=currentpen); @end verbatim Fill the interior region bounded by the cyclic path @code{g} on the picture @code{pic}, using the pen @code{p}. @cindex @code{filldraw} There is also a convenient @code{filldraw} command, which fills the path and then draws in the boundary. One can specify separate pens for each operation: @verbatim void filldraw(picture pic=currentpicture, path g, pen fillpen=currentpen, pen drawpen=currentpen); @end verbatim @cindex @code{fill} This fixed-size version of @code{fill} allows one to fill an object described in @code{PostScript} coordinates about the user coordinate @code{origin}: @verbatim void fill(pair origin, picture pic=currentpicture, path g, pen p=currentpen); @end verbatim @noindent This is just a convenient abbreviation for the commands: @verbatim picture opic; fill(opic,g,p); add(pic,opic,origin); @end verbatim The routine @cindex @code{filloutside} @verbatim void filloutside(picture pic=currentpicture, path g, pen p=currentpen); @end verbatim @noindent fills the region exterior to the path @code{g}, out to the current boundary of picture @code{pic}. @anchor{gradient shading} @cindex gradient shading @cindex shading @cindex @code{latticeshade} Lattice gradient shading varying smoothly over a two-dimensional array of pens @code{p}, using fill rule @code{fillrule}, can be produced with @verbatim void latticeshade(picture pic=currentpicture, path g, bool stroke=false, pen fillrule=currentpen, pen[][] p) @end verbatim @cindex @code{stroke} If @code{stroke=true}, the region filled is the same as the region that would be drawn by @code{draw(pic,g,fillrule+zerowinding)}; in this case the path @code{g} need not be cyclic. The pens in @code{p} must belong to the same color space. One can use the functions @code{rgb(pen)} or @code{cmyk(pen)} to promote pens to a higher color space, as illustrated in the example file @code{@uref{http://asymptote.sourceforge.net/gallery/latticeshading.pdf,,latticeshading}@uref{http://asymptote.sourceforge.net/gallery/latticeshading.asy,,.asy}}. @cindex @code{axialshade} Axial gradient shading varying smoothly from @code{pena} to @code{penb} in the direction of the line segment @code{a--b} can be achieved with @verbatim void axialshade(picture pic=currentpicture, path g, bool stroke=false, pen pena, pair a, bool extenda=true, pen penb, pair b, bool extendb=true); @end verbatim @noindent The boolean parameters @code{extenda} and @code{extendb} indicate whether the shading should extend beyond the axis endpoints @code{a} and @code{b}. @cindex @code{radialshade} Radial gradient shading varying smoothly from @code{pena} on the circle with center @code{a} and radius @code{ra} to @code{penb} on the circle with center @code{b} and radius @code{rb} is similar: @verbatim void radialshade(picture pic=currentpicture, path g, bool stroke=false, pen pena, pair a, real ra, bool extenda=true, pen penb, pair b, real rb, bool extendb=true); @end verbatim @noindent The boolean parameters @code{extenda} and @code{extendb} indicate whether the shading should extend beyond the radii @code{a} and @code{b}. Illustrations of radial shading are provided in the example files @code{@uref{http://asymptote.sourceforge.net/gallery/shade.pdf,,shade}@uref{http://asymptote.sourceforge.net/gallery/shade.asy,,.asy}}, @code{@uref{http://asymptote.sourceforge.net/gallery/ring.pdf,,ring}@uref{http://asymptote.sourceforge.net/gallery/ring.asy,,.asy}}, and @code{@uref{http://asymptote.sourceforge.net/gallery/shadestroke.pdf,,shadestroke}@uref{http://asymptote.sourceforge.net/gallery/shadestroke.asy,,.asy}}. @cindex @code{gouraudshade} Gouraud shading using fill rule @code{fillrule} and the vertex colors in the pen array @code{p} on a triangular lattice defined by the vertices @code{z} and edge flags @code{edges} is implemented with @verbatim void gouraudshade(picture pic=currentpicture, path g, bool stroke=false, pen fillrule=currentpen, pen[] p, pair[] z, int[] edges); void gouraudshade(picture pic=currentpicture, path g, bool stroke=false, pen fillrule=currentpen, pen[] p, int[] edges); @end verbatim @noindent In the second form, the elements of @code{z} are taken to be successive nodes of path @code{g}. The pens in @code{p} must belong to the same color space. Illustrations of Gouraud shading are provided in the example file @code{@uref{http://asymptote.sourceforge.net/gallery/Gouraud.pdf,,Gouraud}@uref{http://asymptote.sourceforge.net/gallery/Gouraud.asy,,.asy}}. The edge flags used in Gouraud shading are documented here: @quotation @url{http://partners.adobe.com/public/developer/en/ps/sdk/TN5600.SmoothShading.pdf}. @end quotation @cindex Coons shading @cindex tensor product shading @cindex @code{tensorshade} Tensor product shading using fill rule @code{fillrule} on patches bounded by the @math{n} cyclic paths of length 4 in path array @code{b}, using the vertex colors specified in the @math{n \times 4} pen array @code{p} and internal control points in the @math{n \times 4} array @code{z}, is implemented with @verbatim void tensorshade(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, pen[][] p, path[] b=g, pair[][] z=new pair[][]); @end verbatim @noindent If the array @code{z} is empty, Coons shading, in which the color control points are calculated automatically, is used. The pens in @code{p} must belong to the same color space. A simpler interface for the case of a single patch (@math{n=1}) is also available: @verbatim void tensorshade(picture pic=currentpicture, path g, bool stroke=false, pen fillrule=currentpen, pen[] p, path b=g, pair[] z=new pair[]); @end verbatim One can also smoothly shade the regions between consecutive paths of a sequence using a given array of pens: @verbatim void draw(picture pic=currentpicture, pen fillrule=currentpen, path[] g, pen[] p); @end verbatim @noindent Illustrations of tensor product and Coons shading are provided in the example files @code{@uref{http://asymptote.sourceforge.net/gallery/tensor.pdf,,tensor}@uref{http://asymptote.sourceforge.net/gallery/tensor.asy,,.asy}}, @code{@uref{http://asymptote.sourceforge.net/gallery/Coons.pdf,,Coons}@uref{http://asymptote.sourceforge.net/gallery/Coons.asy,,.asy}}, @code{@uref{http://asymptote.sourceforge.net/gallery/BezierSurface.pdf,,BezierSurface}@uref{http://asymptote.sourceforge.net/gallery/BezierSurface.asy,,.asy}}, and @code{@uref{http://asymptote.sourceforge.net/gallery/rainbow.pdf,,rainbow}@uref{http://asymptote.sourceforge.net/gallery/rainbow.asy,,.asy}}. @cindex Function shading @cindex function shading @cindex @code{functionshade} More general shading possibilities are available using @TeX{} engines that produce PDF output (@pxref{texengines}): the routine @verbatim void functionshade(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, string shader); @end verbatim @noindent shades on picture @code{pic} the interior of path @code{g} according to fill rule @code{fillrule} using the @code{PostScript} calculator routine specified by the string @code{shader}; this routine takes 2 arguments, each in [0,1], and returns @code{colors(fillrule).length} color components. Function shading is illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/functionshading.pdf,,functionshading}@uref{http://asymptote.sourceforge.net/gallery/functionshading.asy,,.asy}}. @cindex unfill The following routine uses @code{evenodd} clipping together with the @code{^^} operator to unfill a region: @verbatim void unfill(picture pic=currentpicture, path g); @end verbatim @node clip, label, fill, Drawing commands @section clip @cindex @code{clip} @cindex @code{stroke} @verbatim void clip(picture pic=currentpicture, path g, stroke=false, pen fillrule=currentpen); @end verbatim Clip the current contents of picture @code{pic} to the region bounded by the path @code{g}, using fill rule @code{fillrule} (@pxref{fillrule}). If @code{stroke=true}, the clipped portion is the same as the region that would be drawn with @code{draw(pic,g,fillrule+zerowinding)}; in this case the path @code{g} need not be cyclic. For an illustration of picture clipping, see the first example in @ref{LaTeX usage}. @node label, , clip, Drawing commands @section label @cindex @code{label} @verbatim void label(picture pic=currentpicture, Label L, pair position, align align=NoAlign, pen p=currentpen, filltype filltype=NoFill) @end verbatim Draw Label @code{L} on picture @code{pic} using pen @code{p}. If @code{align} is @code{NoAlign}, the label will be centered at user coordinate @code{position}; otherwise it will be aligned in the direction of @code{align} and displaced from @code{position} by the @code{PostScript} offset @code{align*labelmargin(p)}. @cindex @code{Align} The constant @code{Align} can be used to align the bottom-left corner of the label at @code{position}. @cindex @code{nullpen} @cindex @code{Label} @anchor{Label} The Label @code{L} can either be a string or the structure obtained by calling one of the functions @verbatim Label Label(string s="", pair position, align align=NoAlign, pen p=nullpen, embed embed=Rotate, filltype filltype=NoFill); Label Label(string s="", align align=NoAlign, pen p=nullpen, embed embed=Rotate, filltype filltype=NoFill); Label Label(Label L, pair position, align align=NoAlign, pen p=nullpen, embed embed=L.embed, filltype filltype=NoFill); Label Label(Label L, align align=NoAlign, pen p=nullpen, embed embed=L.embed, filltype filltype=NoFill); @end verbatim The text of a Label can be scaled, slanted, rotated, or shifted by multiplying it on the left by an affine transform (@pxref{Transforms}). For example, @code{rotate(45)*xscale(2)*L} first scales @code{L} in the @math{x} direction and then rotates it counterclockwise by 45 degrees. The final position of a Label can also be shifted by a @code{PostScript} coordinate translation: @code{shift(10,0)*L}. An explicit pen specified within the Label overrides other pen arguments. The @code{embed} argument determines how the Label should transform with the embedding picture: @table @code @item Shift @cindex @code{Shift} only shift with embedding picture; @item Rotate @cindex @code{Rotate} only shift and rotate with embedding picture (default); @item Rotate(pair z) @cindex @code{Rotate(pair z)} rotate with (picture-transformed) vector @code{z}. @item Slant @cindex @code{Slant} only shift, rotate, slant, and reflect with embedding picture; @item Scale @cindex @code{Scale} shift, rotate, slant, reflect, and scale with embedding picture. @end table To add a label to a path, use @verbatim void label(picture pic=currentpicture, Label L, path g, align align=NoAlign, pen p=currentpen, filltype filltype=NoFill); @end verbatim @cindex @code{Relative} By default the label will be positioned at the midpoint of the path. An alternative label position (in the sense of @code{point(path p, real t)}) may be specified as a real value for @code{position} in constructing the Label. The position @code{Relative(real)} specifies a location relative to the total arclength of the path. These convenient abbreviations are predefined: @cindex @code{BeginPoint} @cindex @code{MidPoint} @cindex @code{EndPoint} @verbatim position BeginPoint=Relative(0); position MidPoint=Relative(0.5); position EndPoint=Relative(1); @end verbatim @cindex @code{Relative} @cindex @code{LeftSide} @cindex @code{Center} @cindex @code{RightSide} Path labels are aligned in the direction @code{align}, which may be specified as an absolute compass direction (pair) or a direction @code{Relative(pair)} measured relative to a north axis in the local direction of the path. For convenience @code{LeftSide}, @code{Center}, and @code{RightSide} are defined as @code{Relative(W)}, @code{Relative((0,0))}, and @code{Relative(E)}, respectively. Multiplying @code{LeftSide} and @code{RightSide} on the left by a real scaling factor will move the label further away from or closer to the path. A label with a fixed-size arrow of length @code{arrowlength} pointing to @code{b} from direction @code{dir} can be produced with the routine @cindex @code{arrow} @verbatim void arrow(picture pic=currentpicture, Label L="", pair b, pair dir, real length=arrowlength, align align=NoAlign, pen p=currentpen, arrowbar arrow=Arrow, margin margin=EndMargin); @end verbatim If no alignment is specified (either in the Label or as an explicit argument), the optional Label will be aligned in the direction @code{dir}, using margin @code{margin}. @cindex including images @cindex @code{graphic} @cindex @acronym{EPS} The function @code{string graphic(string name, string options="")} returns a string that can be used to include an encapsulated @code{PostScript} (@acronym{EPS}) file. Here, @code{name} is the name of the file to include and @code{options} is a string containing a comma-separated list of optional bounding box (@code{bb=llx lly urx ury}), width (@code{width=value}), height (@code{height=value}), rotation (@code{angle=value}), scaling (@code{scale=factor}), clipping (@code{clip=bool}), and draft mode (@code{draft=bool}) parameters. The @code{layer()} function can be used to force future objects to be drawn on top of the included image: @verbatim label(graphic("file.eps","width=1cm"),(0,0),NE); layer(); @end verbatim @cindex @code{baseline} The @code{string baseline(string s, string template="\strut")} function can be used to enlarge the bounding box of labels to match a given template, so that their baselines will be typeset on a horizontal line. See @code{@uref{http://asymptote.sourceforge.net/gallery/Pythagoras.pdf,,Pythagoras}@uref{http://asymptote.sourceforge.net/gallery/Pythagoras.asy,,.asy}} for an example. One can prevent labels from overwriting one another with the @code{overwrite} pen attribute (@pxref{overwrite}). The structure @code{object} defined in @code{plain_Label.asy} allows Labels and frames to be treated in a uniform manner. A group of objects may be packed together into single frame with the routine @cindex @code{pack} @verbatim frame pack(pair align=2S ... object inset[]); @end verbatim @noindent To draw or fill a box (or ellipse or other path) around a Label and return the bounding object, use one of the routines @verbatim object draw(picture pic=currentpicture, Label L, envelope e, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true); object draw(picture pic=currentpicture, Label L, envelope e, pair position, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true); @end verbatim @noindent Here @code{envelope} is a boundary-drawing routine such as @code{box}, @code{roundbox}, or @code{ellipse} defined in @code{plain_boxes.asy} (@pxref{envelope}). @cindex @code{texpath} The function @code{path[] texpath(Label L)} returns the path array that @TeX{} would fill to draw the Label @code{L}. @cindex @code{minipage} The @code{string minipage(string s, width=100pt)} function can be used to format string @code{s} into a paragraph of width @code{width}. This example uses @code{minipage}, @code{clip}, and @code{graphic} to produce a CD label: @sp 1 @center @image{CDlabel} @verbatiminclude CDlabel.asy @node Bezier curves, Programming, Drawing commands, Top @chapter Bezier curves @cindex Bezier curves @cindex direction specifier Each interior node of a cubic spline may be given a direction prefix or suffix @code{@{dir@}}: the direction of the pair @code{dir} specifies the direction of the incoming or outgoing tangent, respectively, to the curve at that node. Exterior nodes may be given direction specifiers only on their interior side. A cubic spline between the node @math{z_0}, with postcontrol point @math{c_0}, and the node @math{z_1}, with precontrol point @math{c_1}, is computed as the Bezier curve @sp 1 @center @image{bezier,,,(1-t)^3*z_0+3t(1-t)^2*c_0+3t^2(1-t)*c_1+t^3*z_1 for 0 <=t <= 1.} As illustrated in the diagram below, the third-order midpoint (@math{m_5}) constructed from two endpoints @math{z_0} and @math{z_1} and two control points @math{c_0} and @math{c_1}, is the point corresponding to @math{t=1/2} on the Bezier curve formed by the quadruple (@math{z_0}, @math{c_0}, @math{c_1}, @math{z_1}). This allows one to recursively construct the desired curve, by using the newly extracted third-order midpoint as an endpoint and the respective second- and first-order midpoints as control points: @sp 1 @center @image{bezier2} Here @math{m_0}, @math{m_1} and @math{m_2} are the first-order midpoints, @math{m_3} and @math{m_4} are the second-order midpoints, and @math{m_5} is the third-order midpoint. The curve is then constructed by recursively applying the algorithm to (@math{z_0}, @math{m_0}, @math{m_3}, @math{m_5}) and (@math{m_5}, @math{m_4}, @math{m_2}, @math{z_1}). In fact, an analogous property holds for points located at any fraction @math{t} in @math{[0,1]} of each segment, not just for midpoints (@math{t=1/2}). The Bezier curve constructed in this manner has the following properties: @itemize @bullet @item It is entirely contained in the convex hull of the given four points. @item It starts heading from the first endpoint to the first control point and finishes heading from the second control point to the second endpoint. @end itemize @cindex @code{controls} The user can specify explicit control points between two nodes like this: @verbatim draw((0,0)..controls (0,100) and (100,100)..(100,0)); @end verbatim However, it is usually more convenient to just use the @code{..} operator, which tells @code{Asymptote} to choose its own control points using the algorithms described in Donald Knuth's monograph, The MetaFontbook, Chapter 14. The user can still customize the guide (or path) by specifying direction, tension, and curl values. The higher the tension, the straighter the curve is, and the more it approximates a straight line. @cindex @code{tension} @cindex @code{and} @cindex @code{atleast} One can change the spline tension from its default value of 1 to any real value greater than or equal to 0.75 (cf. John D. Hobby, Discrete and Computational Geometry 1, 1986): @verbatim draw((100,0)..tension 2 ..(100,100)..(0,100)); draw((100,0)..tension 3 and 2 ..(100,100)..(0,100)); draw((100,0)..tension atleast 2 ..(100,100)..(0,100)); @end verbatim In these examples there is a space between @code{2} and @code{..}. This is needed as @code{2.} is interpreted as a numerical constant. @cindex @code{curl} The curl parameter specifies the curvature at the endpoints of a path (0 means straight; the default value of 1 means approximately circular): @verbatim draw((100,0){curl 0}..(100,100)..{curl 0}(0,100)); @end verbatim @cindex @code{MetaPost ...@ } @cindex @code{::} The @code{MetaPost ...} path connector, which requests, when possible, an inflection-free curve confined to a triangle defined by the endpoints and directions, is implemented in @code{Asymptote} as the convenient abbreviation @code{::} for @code{..tension atleast 1 ..} (the ellipsis @code{...} is used in @code{Asymptote} to indicate a variable number of arguments; @pxref{Rest arguments}). For example, compare @verbatiminclude dots.asy @sp 1 @center @image{dots} @noindent with @verbatiminclude colons.asy @sp 1 @center @image{colons} @cindex @code{---} @cindex @code{&} The @code{---} connector is an abbreviation for @code{..tension atleast infinity..} and the @code{&} connector concatenates two paths, after first stripping off the last node of the first path (which normally should coincide with the first node of the second path). @node Programming, LaTeX usage, Bezier curves, Top @chapter Programming @cindex programming @menu * Data types:: void, bool, int, real, pair, triple, string * Paths and guides:: Bezier curves * Pens:: Colors, line types, line widths, font sizes * Transforms:: Affine transforms * Frames and pictures:: Canvases for immediate and deferred drawing * Files:: Reading and writing your data * Variable initializers:: Initialize your variables * Structures:: Organize your data * Operators:: Arithmetic and logical operators * Implicit scaling:: Avoiding those ugly *s * Functions:: Traditional and high-order functions * Arrays:: Dynamic vectors * Casts:: Implicit and explicit casts * Import:: Importing external @code{Asymptote} modules * Static:: Where to allocate your variable? @end menu Here is a short introductory example to the @code{Asymptote} programming language that highlights the similarity of its control structures with those of C, C++, and Java: @cindex declaration @cindex assignment @cindex conditional @cindex loop @cindex @code{if} @cindex @code{else} @cindex @code{for} @verbatim // This is a comment. // Declaration: Declare x to be a real variable; real x; // Assignment: Assign the real variable x the value 1. x=1.0; // Conditional: Test if x equals 1 or not. if(x == 1.0) { write("x equals 1.0"); } else { write("x is not equal to 1.0"); } // Loop: iterate 10 times for(int i=0; i < 10; ++i) { write(i); } @end verbatim @cindex @code{while} @cindex @code{do} @cindex @code{break} @cindex @code{continue} @code{Asymptote} supports @code{while}, @code{do}, @code{break}, and @code{continue} statements just as in C/C++. It also supports the Java-style shorthand for iterating over all elements of an array: @cindex array iteration @anchor{array iteration} @verbatim // Iterate over an array int[] array={1,1,2,3,5}; for(int k : array) { write(k); } @end verbatim @noindent In addition, it supports many features beyond the ones found in those languages. @node Data types, Paths and guides, Programming, Programming @section Data types @cindex data types @code{Asymptote} supports the following data types (in addition to user-defined types): @table @code @item void @cindex @code{void} The void type is used only by functions that take or return no arguments. @item bool @cindex @code{bool} a boolean type that can only take on the values @code{true} or @code{false}. For example: @verbatim bool b=true; @end verbatim @noindent defines a boolean variable @code{b} and initializes it to the value @code{true}. If no initializer is given: @verbatim bool b; @end verbatim @noindent the value @code{false} is assumed. @item bool3 @cindex @code{bool3} an extended boolean type that can take on the values @code{true}, @code{default}, or @code{false}. A bool3 type can be cast to or from a bool. The default initializer for bool3 is @code{default}. @item int @cindex @code{int} @cindex @code{intMin} @cindex @code{intMax} an integer type; if no initializer is given, the implicit value @code{0} is assumed. The minimum allowed value of an integer is @code{intMin} and the maximum value is @code{intMax}. @item real @cindex @code{real} @cindex @code{realMin} @cindex @code{realMax} @cindex @code{realEpsilon} @cindex @code{realDigits} @cindex @code{mask} @cindex @code{inf} @cindex @code{nan} @cindex @code{isnan} a real number; this should be set to the highest-precision native floating-point type on the architecture. The implicit initializer for reals is @code{0.0}. Real numbers have precision @code{realEpsilon}, with @code{realDigits} significant digits. The smallest positive real number is @code{realMin} and the largest positive real number is @code{realMax}. The variables @code{inf} and @code{nan}, along with the function @code{bool isnan(real x)} are useful when floating-point exceptions are masked with the @code{-mask} command-line option (the default in interactive mode). @item pair @cindex @code{pair} complex number, that is, an ordered pair of real components @code{(x,y)}. The real and imaginary parts of a pair @code{z} can read as @code{z.x} and @code{z.y}. We say that @code{x} and @code{y} are virtual members of the data element pair; they cannot be directly modified, however. The implicit initializer for pairs is @code{(0.0,0.0)}. There are a number of ways to take the complex conjugate of a pair: @example pair z=(3,4); z=(z.x,-z.y); z=z.x-I*z.y; z=conj(z); @end example Here @code{I} is the pair @code{(0,1)}. A number of built-in functions are defined for pairs: @table @code @item pair conj(pair z) @cindex @code{conj} returns the conjugate of @code{z}; @item real length(pair z) @cindex @code{length} @cindex @code{abs} returns the complex modulus @code{|z|} of its argument @code{z}. For example, @example pair z=(3,4); length(z); @end example returns the result 5. A synonym for @code{length(pair)} is @code{abs(pair)}; @item real angle(pair z, bool warn=true) @cindex @code{angle} returns the angle of @code{z} in radians in the interval [-@code{pi},@code{pi}] or @code{0} if @code{warn} is @code{false} and @code{z=(0,0)} (rather than producing an error); @item real degrees(pair z, bool warn=true) @cindex @code{degrees} returns the angle of @code{z} in degrees in the interval [0,360) or @code{0} if @code{warn} is @code{false} and @code{z=(0,0)} (rather than producing an error); @item pair unit(pair z) @cindex @code{unit} returns a unit vector in the direction of the pair @code{z}; @item pair expi(real angle) @cindex @code{expi} returns a unit vector in the direction @code{angle} measured in radians; @item pair dir(real degrees) @cindex @code{dir} returns a unit vector in the direction @code{degrees} measured in degrees; @item real xpart(pair z) @cindex @code{xpart} returns @code{z.x}; @item real ypart(pair z) @cindex @code{ypart} returns @code{z.y}; @item pair realmult(pair z, pair w) @cindex @code{realmult} returns the element-by-element product @code{(z.x*w.x,z.y*w.y)}; @item real dot(explicit pair z, explicit pair w) @cindex @code{dot} returns the dot product @code{z.x*w.x+z.y*w.y}; @item real cross(explicit pair z, explicit pair w) @cindex @code{cross} returns the 2D scalar product @code{z.x*w.y-z.y*w.x}; @cindex @code{orient} @item real orient(pair a, pair b, pair c); returns a positive (negative) value if @code{a--b--c--cycle} is oriented counterclockwise (clockwise) or zero if all three points are colinear. Equivalently, a positive (negative) value is returned if @code{c} lies to the left (right) of the line through @code{a} and @code{b} or zero if @code{c} lies on this line. The value returned can be expressed in terms of the 2D scalar cross product as @code{cross(a-c,b-c)}, which is the determinant @verbatim |a.x a.y 1| |b.x b.y 1| |c.x c.y 1| @end verbatim @cindex @code{incircle} @item real incircle(pair a, pair b, pair c, pair d); returns a positive (negative) value if @code{d} lies inside (outside) the circle passing through the counterclockwise-oriented points @code{a,b,c} or zero if @code{d} lies on the this circle. The value returned is the determinant @verbatim |a.x a.y a.x^2+a.y^2 1| |b.x b.y b.x^2+b.y^2 1| |c.x c.y c.x^2+c.y^2 1| |d.x d.y d.x^2+d.y^2 1| @end verbatim @item pair minbound(pair z, pair w) @cindex @code{minbound} returns @code{(min(z.x,w.x),min(z.y,w.y))}; @item pair maxbound(pair z, pair w) @cindex @code{maxbound} returns @code{(max(z.x,w.x),max(z.y,w.y))}. @end table @item triple @cindex @code{triple} an ordered triple of real components @code{(x,y,z)} used for three-dimensional drawings. The respective components of a triple @code{v} can read as @code{v.x}, @code{v.y}, and @code{v.z}. The implicit initializer for triples is @code{(0.0,0.0,0.0)}. Here are the built-in functions for triples: @table @code @item real length(triple v) @cindex @code{length} returns the length @code{|v|} of the vector @code{v}. A synonym for @code{length(triple)} is @code{abs(triple)}; @item real polar(triple v, bool warn=true) @cindex @code{polar} returns the colatitude of @code{v} measured from the @math{z} axis in radians or @code{0} if @code{warn} is @code{false} and @code{v=O} (rather than producing an error); @item real azimuth(triple v, bool warn=true) @cindex @code{azimuth} returns the longitude of @code{v} measured from the @math{x} axis in radians or @code{0} if @code{warn} is @code{false} and @code{v.x=v.y=0} (rather than producing an error); @item real colatitude(triple v, bool warn=true) @cindex @code{colatitude} returns the colatitude of @code{v} measured from the @math{z} axis in degrees or @code{0} if @code{warn} is @code{false} and @code{v=O} (rather than producing an error); @item real latitude(triple v, bool warn=true) @cindex @code{latitude} returns the latitude of @code{v} measured from the @math{xy} plane in degrees or @code{0} if @code{warn} is @code{false} and @code{v=O} (rather than producing an error); @item real longitude(triple v, bool warn=true) @cindex @code{longitude} returns the longitude of @code{v} measured from the @math{x} axis in degrees or @code{0} if @code{warn} is @code{false} and @code{v.x=v.y=0} (rather than producing an error); @item triple unit(triple v) @cindex @code{unit} returns a unit triple in the direction of the triple @code{v}; @item triple expi(real polar, real azimuth) @cindex @code{expi} returns a unit triple in the direction @code{(polar,azimuth)} measured in radians; @item triple dir(real colatitude, real longitude) @cindex @code{dir} returns a unit triple in the direction @code{(colatitude,longitude)} measured in degrees; @item real xpart(triple v) @cindex @code{xpart} returns @code{v.x}; @item real ypart(triple v) @cindex @code{ypart} returns @code{v.y}; @item real zpart(triple v) @cindex @code{zpart} returns @code{v.z}; @item real dot(triple u, triple v) @cindex @code{dot} returns the dot product @code{u.x*v.x+u.y*v.y+u.z*v.z}; @item triple cross(triple u, triple v) @cindex @code{cross} returns the cross product @code{(u.y*v.z-u.z*v.y,u.z*v.x-u.x*v.z,u.x*v.y-v.x*u.y)}; @item triple minbound(triple u, triple v) @cindex @code{minbound} returns @code{(min(u.x,v.x),min(u.y,v.y),min(u.z,v.z))}; @item triple maxbound(triple u, triple v) @cindex @code{maxbound} returns @code{(max(u.x,v.x),max(u.y,v.y),max(u.z,v.z)}). @end table @item string @cindex @code{string} @cindex @TeX{} string a character string, implemented using the STL @code{string} class. Strings delimited by double quotes (@code{"}) are subject to the following mappings to allow the use of double quotes in @TeX{} (e.g.@ for using the @code{babel} package, @pxref{babel}): @itemize @bullet @item \" maps to " @item \\ maps to \\ @end itemize @cindex @code{C} string Strings delimited by single quotes (@code{'}) have the same mappings as character strings in ANSI @code{C}: @itemize @bullet @item \' maps to ' @item \" maps to " @item \? maps to ? @item \\ maps to backslash @item \a maps to alert @item \b maps to backspace @item \f maps to form feed @item \n maps to newline @item \r maps to carriage return @item \t maps to tab @item \v maps to vertical tab @item \0-\377 map to corresponding octal byte @item \x0-\xFF map to corresponding hexadecimal byte @end itemize The implicit initializer for strings is the empty string @code{""}. Strings may be concatenated with the @code{+} operator. In the following string functions, position @code{0} denotes the start of the string: @table @code @cindex @code{length} @item int length(string s) returns the length of the string @code{s}; @cindex @code{find} @item int find(string s, string t, int pos=0) returns the position of the first occurrence of string @code{t} in string @code{s} at or after position @code{pos}, or -1 if @code{t} is not a substring of @code{s}; @cindex @code{rfind} @item int rfind(string s, string t, int pos=-1) returns the position of the last occurrence of string @code{t} in string @code{s} at or before position @code{pos} (if @code{pos}=-1, at the end of the string @code{s}), or -1 if @code{t} is not a substring of @code{s}; @cindex @code{insert} @item string insert(string s, int pos, string t) returns the string formed by inserting string @code{t} at position @code{pos} in @code{s}; @cindex @code{erase} @item string erase(string s, int pos, int n) returns the string formed by erasing the string of length @code{n} (if @code{n}=-1, to the end of the string @code{s}) at position @code{pos} in @code{s}; @cindex @code{substr} @item string substr(string s, int pos, int n=-1) returns the substring of @code{s} starting at position @code{pos} and of length @code{n} (if @code{n}=-1, until the end of the string @code{s}); @cindex @code{reverse} @item string reverse(string s) returns the string formed by reversing string @code{s}; @item string replace(string s, string before, string after) @cindex @code{replace} returns a string with all occurrences of the string @code{before} in the string @code{s} changed to the string @code{after}; @item string replace(string s, string[][] table) returns a string constructed by translating in string @code{s} all occurrences of the string @code{before} in an array @code{table} of string pairs @{@code{before},@code{after}@} to the corresponding string @code{after}; @cindex @code{split} @item string[] split(string s, string delimiter="") returns an array of strings obtained by splitting @code{s} into substrings delimited by @code{delimiter} (an empty delimiter signifies a space, but with duplicate delimiters discarded); @anchor{format} @item string format(string s, int n, string locale="") @cindex @code{format} returns a string containing @code{n} formatted according to the C-style format string @code{s} using locale @code{locale} (or the current locale if an empty string is specified), following the behaviour of the C function @code{fprintf}), except that only one data field is allowed. @item string format(string s=defaultformat, string s=defaultseparator, real x, string locale="") returns a string containing @code{x} formatted according to the C-style format string @code{s} using locale @code{locale} (or the current locale if an empty string is specified), following the behaviour of the C function @code{fprintf}), except that only one data field is allowed, trailing zeros are removed by default (unless @code{#} is specified), and (if the format string specifies math mode) @TeX{} is used to typeset scientific notation using the @code{defaultseparator="\!\times\!";}; @cindex @code{hex} @cindex @code{hexidecimal} @item int hex(string s); casts a hexidecimal string @code{s} to an integer; @cindex @code{ascii} @cindex @code{ascii} @item int ascii(string s); returns the ASCII code for the first character of string @code{s}; @cindex @code{string} @item string string(real x, int digits=realDigits) casts @code{x} to a string using precision @code{digits} and the C locale; @cindex @code{locale} @item string locale(string s="") sets the locale to the given string, if nonempty, and returns the current locale; @item string time(string format="%a %b %d %T %Z %Y") @cindex @code{time} @cindex @code{date} @cindex @code{strftime} returns the current time formatted by the ANSI C routine @code{strftime} according to the string @code{format} using the current locale. Thus @verbatim time(); time("%a %b %d %H:%M:%S %Z %Y"); @end verbatim @noindent are equivalent ways of returning the current time in the default format used by the @code{UNIX} @code{date} command; @cindex @code{seconds} @cindex @code{strptime} @item int seconds(string t="", string format="") returns the time measured in seconds after the Epoch (Thu Jan 01 00:00:00 UTC 1970) as determined by the ANSI C routine @code{strptime} according to the string @code{format} using the current locale, or the current time if @code{t} is the empty string. Note that the @code{"%Z"} extension to the POSIX @code{strptime} specification is ignored by the current GNU C Library. If an error occurs, the value -1 is returned. Here are some examples: @verbatim seconds("Mar 02 11:12:36 AM PST 2007","%b %d %r PST %Y"); seconds(time("%b %d %r %z %Y"),"%b %d %r %z %Y"); seconds(time("%b %d %r %Z %Y"),"%b %d %r "+time("%Z")+" %Y"); 1+(seconds()-seconds("Jan 1","%b %d"))/(24*60*60); @end verbatim The last example returns today's ordinal date, measured from the beginning of the year. @cindex @code{time} @cindex @code{strftime} @item string time(int seconds, string format="%a %b %d %T %Z %Y") returns the time corresponding to @code{seconds} seconds after the Epoch (Thu Jan 01 00:00:00 UTC 1970) formatted by the ANSI C routine @code{strftime} according to the string @code{format} using the current locale. For example, to return the date corresponding to 24 hours ago: @verbatim time(seconds()-24*60*60); @end verbatim @cindex @code{system} @item int system(string s) @item int system(string[] s) if the setting @code{safe} is false, call the arbitrary system command @code{s}; @cindex @code{asy} @item void asy(string format, bool overwrite=false ... string[] s) conditionally process each file name in array @code{s} in a new environment, using format @code{format}, overwriting the output file only if @code{overwrite} is true; @cindex @code{abort} @item void abort(string s="") aborts execution (with a non-zero return code in batch mode); if string @code{s} is nonempty, a diagnostic message constructed from the source file, line number, and @code{s} is printed; @cindex @code{assert} @item void assert(bool b, string s="") aborts execution with an error message constructed from @code{s} if @code{b=false}; @cindex @code{exit} @item void exit() exits (with a zero error return code in batch mode); @cindex @code{sleep} @item void sleep(int seconds) pauses for the given number of seconds; @cindex @code{usleep} @item void usleep(int microseconds) pauses for the given number of microseconds; @cindex @code{beep} @item void beep() produces a beep on the console; @end table @cindex @code{typedef} @end table As in C/C++, complicated types may be abbreviated with @code{typedef} (see the example in @ref{Functions}). @node Paths and guides, Pens, Data types, Programming @section Paths and guides @table @code @item path @cindex @code{path} a cubic spline resolved into a fixed path. The implicit initializer for paths is @code{nullpath}. @cindex @code{circle} @anchor{circle} For example, the routine @code{circle(pair c, real r)}, which returns a Bezier curve approximating a circle of radius @code{r} centered on @code{c}, is based on @code{unitcircle} (@pxref{unitcircle}): @verbatim path circle(pair c, real r) { return shift(c)*scale(r)*unitcircle; } @end verbatim If high accuracy is needed, a true circle may be produced with the routine @code{Circle} defined in the module @code{@uref{http://asymptote.sourceforge.net/gallery/graph.pdf,,graph}@uref{http://asymptote.sourceforge.net/gallery/graph.asy,,.asy}}: @cindex @code{Circle} @verbatim import graph; path Circle(pair c, real r, int n=nCircle); @end verbatim A circular arc consistent with @code{circle} centered on @code{c} with radius @code{r} from @code{angle1} to @code{angle2} degrees, drawing counterclockwise if @code{angle2 >= angle1}, can be constructed with @cindex @code{arc} @verbatim path arc(pair c, real r, real angle1, real angle2); @end verbatim One may also specify the direction explicitly: @verbatim path arc(pair c, real r, real angle1, real angle2, bool direction); @end verbatim Here the direction can be specified as CCW (counter-clockwise) or CW (clockwise). For convenience, an arc centered at @code{c} from pair @code{z1} to @code{z2} (assuming @code{|z2-c|=|z1-c|}) in the may also be constructed with @verbatim path arc(pair c, explicit pair z1, explicit pair z2, bool direction=CCW) @end verbatim If high accuracy is needed, true arcs may be produced with routines in the module @code{@uref{http://asymptote.sourceforge.net/gallery/graph.pdf,,graph}@uref{http://asymptote.sourceforge.net/gallery/graph.asy,,.asy}} that produce Bezier curves with @code{n} control points: @cindex @code{Arc} @verbatim import graph; path Arc(pair c, real r, real angle1, real angle2, bool direction, int n=nCircle); path Arc(pair c, real r, real angle1, real angle2, int n=nCircle); path Arc(pair c, explicit pair z1, explicit pair z2, bool direction=CCW, int n=nCircle); @end verbatim An ellipse can be drawn with the routine @cindex @code{ellipse} @verbatim path ellipse(pair c, real a, real b) { return shift(c)*scale(a,b)*unitcircle; } @end verbatim A brace can be constructed between pairs @code{a} and @code{b} with @cindex @code{brace} @verbatim path brace(pair a, pair b, real amplitude=bracedefaultratio*length(b-a)); @end verbatim This example illustrates the use of all five guide connectors discussed in @ref{Tutorial} and @ref{Bezier curves}: @verbatiminclude join.asy @sp 1 @center @image{join} Here are some useful functions for paths: @table @code @cindex @code{length} @item int length(path p); This is the number of (linear or cubic) segments in path @code{p}. If @code{p} is cyclic, this is the same as the number of nodes in @code{p}. @cindex @code{size} @item int size(path p); This is the number of nodes in the path @code{p}. If @code{p} is cyclic, this is the same as @code{length(p)}. @cindex @code{cyclic} @item bool cyclic(path p); returns @code{true} iff path @code{p} is cyclic. @cindex @code{straight} @item bool straight(path p, int i); returns @code{true} iff the segment of path @code{p} between node @code{i} and node @code{i+1} is straight. @cindex @code{piecewisestraight} @item bool piecewisestraight(path p) returns @code{true} iff the path @code{p} is piecewise straight. @cindex @code{point} @item pair point(path p, int t); If @code{p} is cyclic, return the coordinates of node @code{t} mod @code{length(p)}. Otherwise, return the coordinates of node @code{t}, unless @code{t} < 0 (in which case @code{point(0)} is returned) or @code{t} > @code{length(p)} (in which case @code{point(length(p))} is returned). @item pair point(path p, real t); This returns the coordinates of the point between node @code{floor(t)} and @code{floor(t)+1} corresponding to the cubic spline parameter @code{t-floor(t)} (@pxref{Bezier curves}). If @code{t} lies outside the range [0,@code{length(p)}], it is first reduced modulo @code{length(p)} in the case where @code{p} is cyclic or else converted to the corresponding endpoint of @code{p}. @cindex @code{dir} @item pair dir(path p, int t, int sign=0, bool normalize=true); If @code{sign < 0}, return the direction (as a pair) of the incoming tangent to path @code{p} at node @code{t}; if @code{sign > 0}, return the direction of the outgoing tangent. If @code{sign=0}, the mean of these two directions is returned. @item pair dir(path p, real t, bool normalize=true); returns the direction of the tangent to path @code{p} at the point between node @code{floor(t)} and @code{floor(t)+1} corresponding to the cubic spline parameter @code{t-floor(t)} (@pxref{Bezier curves}). @item pair dir(path p) returns dir(p,length(p)). @item pair dir(path p, path q) returns unit(dir(p)+dir(q)). @cindex @code{accel} @item pair accel(path p, int t, int sign=0); If @code{sign < 0}, return the acceleration of the incoming path @code{p} at node @code{t}; if @code{sign > 0}, return the acceleration of the outgoing path. If @code{sign=0}, the mean of these two accelerations is returned. @cindex @code{accel} @item pair accel(path p, real t); returns the acceleration of the path @code{p} at the point @code{t}. @cindex @code{radius} @item real radius(path p, real t); returns the radius of curvature of the path @code{p} at the point @code{t}. @cindex @code{precontrol} @item pair precontrol(path p, int t); returns the precontrol point of @code{p} at node @code{t}. @item pair precontrol(path p, real t); returns the effective precontrol point of @code{p} at parameter @code{t}. @cindex @code{postcontrol} @item pair postcontrol(path p, int t); returns the postcontrol point of @code{p} at node @code{t}. @item pair postcontrol(path p, real t); returns the effective postcontrol point of @code{p} at parameter @code{t}. @cindex @code{arclength} @item real arclength(path p); returns the length (in user coordinates) of the piecewise linear or cubic curve that path @code{p} represents. @cindex @code{arctime} @item real arctime(path p, real L); returns the path "time", a real number between 0 and the length of the path in the sense of @code{point(path p, real t)}, at which the cumulative arclength (measured from the beginning of the path) equals @code{L}. @cindex @code{arcpoint} @item real arcpoint(path p, real L); returns @code{point(p,arctime(p,L))}. @cindex @code{dirtime} @item real dirtime(path p, pair z); returns the first "time", a real number between 0 and the length of the path in the sense of @code{point(path, real)}, at which the tangent to the path has the direction of pair @code{z}, or -1 if this never happens. @cindex @code{reltime} @item real reltime(path p, real l); returns the time on path @code{p} at the relative fraction @code{l} of its arclength. @cindex @code{relpoint} @item pair relpoint(path p, real l); returns the point on path @code{p} at the relative fraction @code{l} of its arclength. @cindex @code{midpoint} @item pair midpoint(path p); returns the point on path @code{p} at half of its arclength. @cindex @code{reverse} @item path reverse(path p); returns a path running backwards along @code{p}. @cindex @code{subpath} @item path subpath(path p, int a, int b); returns the subpath of @code{p} running from node @code{a} to node @code{b}. If @code{a} < @code{b}, the direction of the subpath is reversed. @item path subpath(path p, real a, real b); returns the subpath of @code{p} running from path time @code{a} to path time @code{b}, in the sense of @code{point(path, real)}. If @code{a} < @code{b}, the direction of the subpath is reversed. @cindex @code{intersect} @item real[] intersect(path p, path q, real fuzz=-1); If @code{p} and @code{q} have at least one intersection point, return a real array of length 2 containing the times representing the respective path times along @code{p} and @code{q}, in the sense of @code{point(path, real)}, for one such intersection point (as chosen by the algorithm described on page 137 of @code{The MetaFontbook}). The computations are performed to the absolute error specified by @code{fuzz}, or if @code{fuzz < 0}, to machine precision. If the paths do not intersect, return a real array of length 0. @cindex @code{intersections} @item real[][] intersections(path p, path q, real fuzz=-1); Return all (unless there are infinitely many) intersection times of paths @code{p} and @code{q} as a sorted array of real arrays of length 2 (@pxref{sort}). The computations are performed to the absolute error specified by @code{fuzz}, or if @code{fuzz < 0}, to machine precision. @cindex @code{intersections} @item real[] intersections(path p, explicit pair a, explicit pair b, real fuzz=-1); Return all (unless there are infinitely many) intersection times of path @code{p} with the (infinite) line through points @code{a} and @code{b} as a sorted array. The intersections returned are guaranteed to be correct to within the absolute error specified by @code{fuzz}, or if @code{fuzz < 0}, to machine precision. @cindex @code{times} @item real[] times(path p, real x) returns all intersection times of path @code{p} with the vertical line through @code{(x,0)}. @cindex @code{times} @item real[] times(path p, explicit pair z) returns all intersection times of path @code{p} with the horizontal line through @code{(0,z.y)}. @cindex @code{mintimes} @item real[] mintimes(path p) returns an array of length 2 containing times at which path @code{p} reaches its minimal horizontal and vertical extents, respectively. @cindex @code{maxtimes} @item real[] maxtimes(path p) returns an array of length 2 containing times at which path @code{p} reaches its maximal horizontal and vertical extents, respectively. @cindex @code{intersectionpoint} @item pair intersectionpoint(path p, path q, real fuzz=-1); returns the intersection point @code{point(p,intersect(p,q,fuzz)[0])}. @cindex @code{intersectionpoints} @item pair[] intersectionpoints(path p, path q, real fuzz=-1); returns an array containing all intersection points of the paths @code{p} and @code{q}. @anchor{extension} @cindex @code{whatever} @cindex @code{extension} @item pair extension(pair P, pair Q, pair p, pair q); returns the intersection point of the extensions of the line segments @code{P--Q} and @code{p--q}, or if the lines are parallel, @code{(infinity,infinity)}. @cindex @code{cut} @cindex @code{slice} @item slice cut(path p, path knife, int n); returns the portions of path @code{p} before and after the @code{n}th intersection of @code{p} with path @code{knife} as a structure @code{slice} (if no intersection exist is found, the entire path is considered to be `before' the intersection): @verbatim struct slice { path before,after; } @end verbatim The argument @code{n} is treated as modulo the number of intersections. @cindex @code{firstcut} @cindex @code{slice} @item slice firstcut(path p, path knife); equivalent to @code{cut(p,knife,0);} @cindex @code{MetaPost cutbefore} Note that @code{firstcut.after} plays the role of the @code{MetaPost cutbefore} command. @cindex @code{lastcut} @item slice lastcut(path p, path knife); equivalent to @code{cut(p,knife,-1);} @cindex @code{MetaPost cutafter} Note that @code{lastcut.before} plays the role of the @code{MetaPost cutafter} command. @cindex @code{buildcycle} @item path buildcycle(... path[] p); This returns the path surrounding a region bounded by a list of two or more consecutively intersecting paths, following the behaviour of the @code{MetaPost buildcycle} command. @cindex @code{min} @item pair min(path p); returns the pair (left,bottom) for the path bounding box of path @code{p}. @cindex @code{max} @item pair max(path p); returns the pair (right,top) for the path bounding box of path @code{p}. @cindex @code{windingnumber} @cindex @code{undefined} @item int windingnumber(path p, pair z); returns the winding number of the cyclic path @code{p} relative to the point @code{z}. The winding number is positive if the path encircles @code{z} in the counterclockwise direction. If @code{z} lies on @code{p} the constant @code{undefined} (defined to be the largest odd integer) is returned. @cindex @code{interior} @item bool interior(int windingnumber, pen fillrule) returns true if @code{windingnumber} corresponds to an interior point according to @code{fillrule}. @cindex @code{inside} @item bool inside(path p, pair z, pen fillrule=currentpen); returns @code{true} iff the point @code{z} lies inside or on the edge of the region bounded by the cyclic path @code{p} according to the fill rule @code{fillrule} (@pxref{fillrule}). @cindex @code{inside} @item int inside(path p, path q, pen fillrule=currentpen); returns @code{1} if the cyclic path @code{p} strictly contains @code{q} according to the fill rule @code{fillrule} (@pxref{fillrule}), @code{-1} if the cyclic path @code{q} strictly contains @code{p}, and @code{0} otherwise. @cindex @code{inside} @item pair inside(path p, pen fillrule=currentpen); returns an arbitrary point strictly inside a cyclic path @code{p} according to the fill rule @code{fillrule} (@pxref{fillrule}). @cindex @code{strokepath} @item path[] strokepath(path g, pen p=currentpen); returns the path array that @code{PostScript} would fill in drawing path @code{g} with pen @code{p}. @end table @item guide @cindex @code{guide} an unresolved cubic spline (list of cubic-spline nodes and control points). The implicit initializer for a guide is @code{nullpath}; this is useful for building up a guide within a loop. A guide is similar to a path except that the computation of the cubic spline is deferred until drawing time (when it is resolved into a path); this allows two guides with free endpoint conditions to be joined together smoothly. The solid curve in the following example is built up incrementally as a guide, but only resolved at drawing time; the dashed curve is incrementally resolved at each iteration, before the entire set of nodes (shown in red) is known: @verbatiminclude mexicanhat.asy @sp 1 @center @image{mexicanhat} We point out an efficiency distinction in the use of guides and paths: @verbatim guide g; for(int i=0; i < 10; ++i) g=g--(i,i); path p=g; @end verbatim @noindent runs in linear time, whereas @verbatim path p; for(int i=0; i < 10; ++i) p=p--(i,i); @end verbatim @noindent runs in quadratic time, as the entire path up to that point is copied at each step of the iteration. The following routines can be used to examine the individual elements of a guide without actually resolving the guide to a fixed path (except for internal cycles, which are resolved): @table @code @cindex @code{size} @item int size(guide g); Analogous to @code{size(path p)}. @cindex @code{length} @item int length(guide g); Analogous to @code{length(path p)}. @cindex @code{cyclic} @item bool cyclic(path p); Analogous to @code{cyclic(path p)}. @cindex @code{point} @item pair point(guide g, int t); Analogous to @code{point(path p, int t)}. @cindex @code{reverse} @item guide reverse(guide g); Analogous to @code{reverse(path p)}. If @code{g} is cyclic and also contains a secondary cycle, it is first solved to a path, then reversed. If @code{g} is not cyclic but contains an internal cycle, only the internal cycle is solved before reversal. If there are no internal cycles, the guide is reversed but not solved to a path. @cindex @code{dirSpecifier} @item pair[] dirSpecifier(guide g, int i); This returns a pair array of length 2 containing the outgoing (in element 0) and incoming (in element 1) direction specifiers (or @code{(0,0)} if none specified) for the segment of guide @code{g} between nodes @code{i} and @code{i+1}. @cindex @code{controlSpecifier} @item pair[] controlSpecifier(guide g, int i); If the segment of guide @code{g} between nodes @code{i} and @code{i+1} has explicit outgoing and incoming control points, they are returned as elements 0 and 1, respectively, of a two-element array. Otherwise, an empty array is returned. @cindex @code{tensionSpecifier} @item tensionSpecifier tensionSpecifier(guide g, int i); This returns the tension specifier for the segment of guide @code{g} between nodes @code{i} and @code{i+1}. The individual components of the @code{tensionSpecifier} type can be accessed as the virtual members @code{in}, @code{out}, and @code{atLeast}. @cindex @code{curlSpecifier} @item real[] curlSpecifier(guide g); This returns an array containing the initial curl specifier (in element 0) and final curl specifier (in element 1) for guide @code{g}. @end table As a technical detail we note that a direction specifier given to @code{nullpath} modifies the node on the other side: the guides @verbatim a..{up}nullpath..b; c..nullpath{up}..d; e..{up}nullpath{down}..f; @end verbatim are respectively equivalent to @verbatim a..nullpath..{up}b; c{up}..nullpath..d; e{down}..nullpath..{up}f; @end verbatim @end table @node Pens, Transforms, Paths and guides, Programming @section Pens @cindex @code{pen} @cindex @code{currentpen} @cindex @code{MetaPost pickup} In @code{Asymptote}, pens provide a context for the four basic drawing commands (@pxref{Drawing commands}). They are used to specify the following drawing attributes: color, line type, line width, line cap, line join, fill rule, text alignment, font, font size, pattern, overwrite mode, and calligraphic transforms on the pen nib. The default pen used by the drawing routines is called @code{currentpen}. This provides the same functionality as the @code{MetaPost} command @code{pickup}. The implicit initializer for pens is @code{defaultpen}. @cindex @code{+} @cindex @code{*} Pens may be added together with the nonassociative binary operator @code{+}. This will add the colors of the two pens. All other non-default attributes of the rightmost pen will override those of the leftmost pen. Thus, one can obtain a yellow dashed pen by saying @code{dashed+red+green} or @code{red+green+dashed} or @code{red+dashed+green}. The binary operator @code{*} can be used to scale the color of a pen by a real number, until it saturates with one or more color components equal to 1. @itemize @bullet @item Colors are specified using one of the following colorspaces: @cindex color @table @code @item pen gray(real g); @cindex @code{gray} @cindex grayscale This produces a grayscale color, where the intensity @code{g} lies in the interval [0,1], with 0.0 denoting black and 1.0 denoting white. @item pen rgb(real r, real g, real b); @cindex @code{rgb} This produces an @acronym{RGB} color, where each of the red, green, and blue intensities @code{r}, @code{g}, @code{b}, lies in the interval [0,1]. @item pen cmyk(real c, real m, real y, real k); @cindex @code{cmyk} This produces a @acronym{CMYK} color, where each of the cyan, magenta, yellow, and black intensities @code{c}, @code{m}, @code{y}, @code{k}, lies in the interval [0,1]. @item pen invisible; @cindex @code{invisible} This special pen writes in invisible ink, but adjusts the bounding box as if something had been drawn (like the @code{\phantom} command in @TeX{}). The function @code{bool invisible(pen)} can be used to test whether a pen is invisible. @end table @cindex @code{defaultpen} The default color is @code{black}; this may be changed with the routine @code{defaultpen(pen)}. The function @code{colorspace(pen p)} returns the colorspace of pen @code{p} as a string (@code{"gray"}, @code{"rgb"}, @code{"cmyk"}, or @code{""}). @cindex @code{colors} The function @code{real[] colors(pen)} returns the color components of a pen. The functions @code{pen gray(pen)}, @code{pen rgb(pen)}, and @code{pen cmyk(pen)} return new pens obtained by converting their arguments to the respective color spaces. @cindex @code{colorless} The function @code{colorless(pen=currentpen)} returns a copy of its argument with the color attributes stripped (to avoid color mixing). A 6-character RGB hexidecimal string can be converted to a pen with the routine @cindex @code{rgb} @cindex @code{hexidecimal} @verbatim pen rgb(string s); @end verbatim @noindent A pen can be converted to a hexidecimal string with @cindex @code{hex} @item string hex(pen p); Various shades and mixtures of the grayscale primary colors @code{black} and @code{white}, @acronym{RGB} primary colors @code{red}, @code{green}, and @code{blue}, and @acronym{RGB} secondary colors @code{cyan}, @code{magenta}, and @code{yellow} are defined as named colors, along with the @acronym{CMYK} primary colors @code{Cyan}, @code{Magenta}, @code{Yellow}, and @code{Black}, in the module @code{plain}: @sp 1 @center @image{colors} The standard 140 @acronym{RGB} @code{X11} colors can be imported with the command @verbatim import x11colors; @end verbatim and the standard 68 @acronym{CMYK} @TeX{} colors can be imported with the command @verbatim import texcolors; @end verbatim Note that there is some overlap between these two standards and the definitions of some colors (e.g.@ @code{Green}) actually disagree. @code{Asymptote} also comes with a @code{asycolors.sty} @code{LaTeX} package that defines to @code{LaTeX} @acronym{CMYK} versions of @code{Asymptote}'s predefined colors, so that they can be used directly within @code{LaTeX} strings. Normally, such colors are passed to @code{LaTeX} via a pen argument; however, to change the color of only a portion of a string, say for a slide presentation, (@pxref{slide}) it may be desirable to specify the color directly to @code{LaTeX}. This file can be passed to @code{LaTeX} with the @code{Asymptote} command @verbatim usepackage("asycolors"); @end verbatim The structure @code{hsv} defined in @code{plain_pens.asy} may be used to convert between @acronym{HSV} and @acronym{RGB} spaces, where the hue @code{h} is an angle in @math{[0,360)} and the saturation @code{s} and value @code{v} lie in @code{[0,1]}: @verbatim pen p=hsv(180,0.5,0.75); write(p); // ([default], red=0.375, green=0.75, blue=0.75) hsv q=p; write(q.h,q.s,q.v); // 180 0.5 0.75 @end verbatim @item Line types are specified with the function @code{pen linetype(real[] a, real offset=0, bool scale=true, bool adjust=true)}, @cindex @code{solid} @cindex @code{dashed} @cindex @code{dotted} @cindex @code{longdashed} @cindex @code{dashdotted} @cindex @code{longdashdotted} where @code{a} is an array of real array numbers. The optional parameter @code{offset} specifies where in the pattern to begin. The first number specifies how far (if @code{scale} is @code{true}, in units of the pen line width; otherwise in @code{PostScript} units) to draw with the pen on, the second number specifies how far to draw with the pen off, and so on. If @code{adjust} is @code{true}, these spacings are automatically adjusted by @code{Asymptote} to fit the arclength of the path. Here are the predefined line types: @verbatim pen solid=linetype(new real[]); pen dotted=linetype(new real[] {0,4}); pen dashed=linetype(new real[] {8,8}); pen longdashed=linetype(new real[] {24,8}); pen dashdotted=linetype(new real[] {8,8,0,8}); pen longdashdotted=linetype(new real[] {24,8,0,8}); pen Dotted(pen p=currentpen) {return linetype(new real[] {0,3})+2*linewidth(p);} pen Dotted=Dotted(); @end verbatim @sp 1 @center @image{linetype} @cindex @code{defaultpen} The default line type is @code{solid}; this may be changed with @code{defaultpen(pen)}. @cindex @code{linetype} @cindex @code{offset} @cindex @code{scale} @cindex @code{adjust} The line type of a pen can be determined with the functions @code{real[] linetype(pen p=currentpen)}, @code{real offset(pen p)}, @code{bool scale(pen p)}, and @code{bool adjust(pen p)}. @cindex @code{linewidth} @cindex @code{defaultpen} @item The pen line width is specified in @code{PostScript} units with @code{pen linewidth(real)}. The default line width is 0.5 bp; this value may be changed with @code{defaultpen(pen)}. The line width of a pen is returned by @code{real linewidth(pen p=currentpen)}. For convenience, in the module @code{plain_pens} we define @verbatim void defaultpen(real w) {defaultpen(linewidth(w));} pen operator +(pen p, real w) {return p+linewidth(w);} pen operator +(real w, pen p) {return linewidth(w)+p;} @end verbatim so that one may set the line width like this: @verbatim defaultpen(2); pen p=red+0.5; @end verbatim @cindex @code{linecap} @cindex @code{squarecap} @cindex @code{roundcap} @cindex @code{extendcap} @cindex @code{defaultpen} @item A pen with a specific @code{PostScript} line cap is returned on calling @code{linecap} with an integer argument: @verbatim pen squarecap=linecap(0); pen roundcap=linecap(1); pen extendcap=linecap(2); @end verbatim @noindent The default line cap, @code{roundcap}, may be changed with @code{defaultpen(pen)}. The line cap of a pen is returned by @code{int linecap(pen p=currentpen)}. @cindex @code{linejoin} @cindex @code{miterjoin} @cindex @code{roundjoin} @cindex @code{beveljoin} @item A pen with a specific @code{PostScript} join style is returned on calling @code{linejoin} with an integer argument: @verbatim pen miterjoin=linejoin(0); pen roundjoin=linejoin(1); pen beveljoin=linejoin(2); @end verbatim @noindent The default join style, @code{roundjoin}, may be changed with @code{defaultpen(pen)}.The join style of a pen is returned by @code{int linejoin(pen p=currentpen)}. @cindex @code{miterlimit} @item A pen with a specific @code{PostScript} miter limit is returned by calling @code{miterlimit(real)}. The default miterlimit, @code{10.0}, may be changed with @code{defaultpen(pen)}. The miter limit of a pen is returned by @code{real miterlimit(pen p=currentpen)}. @cindex @code{fillrule} @cindex @code{zerowinding} @cindex @code{evenodd} @anchor{fillrule} @item A pen with a specific @code{PostScript} fill rule is returned on calling @code{fillrule} with an integer argument: @verbatim pen zerowinding=fillrule(0); pen evenodd=fillrule(1); @end verbatim @noindent The fill rule, which identifies the algorithm used to determine the insideness of a path or array of paths, only affects the @code{clip}, @code{fill}, and @code{inside} functions. For the @code{zerowinding} fill rule, a point @code{z} is outside the region bounded by a path if the number of upward intersections of the path with the horizontal line @code{z--z+infinity} minus the number of downward intersections is zero. For the @code{evenodd} fill rule, @code{z} is considered to be outside the region if the total number of such intersections is even. The default fill rule, @code{zerowinding}, may be changed with @code{defaultpen(pen)}. The fill rule of a pen is returned by @code{int fillrule(pen p=currentpen)}. @cindex @code{nobasealign} @cindex @code{basealign} @anchor{basealign} @item A pen with a specific text alignment setting is returned on calling @code{basealign} with an integer argument: @verbatim pen nobasealign=basealign(0); pen basealign=basealign(1); @end verbatim @noindent The default setting, @code{nobasealign},which may be changed with @code{defaultpen(pen)}, causes the label alignment routines to use the full label bounding box for alignment. In contrast, @code{basealign} requests that the @TeX{} baseline be respected. The base align setting of a pen is returned by @code{int basealigin(pen p=currentpen)}. @cindex @code{fontsize} @cindex @code{lineskip} @cindex @code{defaultpen} @cindex @code{type1cm} @item The font size is specified in @TeX{} points (1 pt = 1/72.27 inches) with the function @code{pen fontsize(real size, real lineskip=1.2*size)}. The default font size, 12pt, may be changed with @code{defaultpen(pen)}. Nonstandard font sizes may require inserting @verbatim import fontsize; @end verbatim at the beginning of the file (this requires the @code{type1cm} package available from @quotation @url{http://mirror.ctan.org/macros/latex/contrib/type1cm/} @end quotation and included in recent @code{LaTeX} distributions). The font size and line skip of a pen can be examined with the routines @code{real fontsize(pen p=currentpen)} and @code{real lineskip(pen p=currentpen)}, respectively. @cindex @code{font} @cindex @code{LaTeX fonts} @cindex @code{NFSS} @cindex @code{font command} @item A pen using a specific @code{LaTeX} @code{NFSS} font is returned by calling the function @code{pen font(string encoding, string family, string series, string shape)}. The default setting, @code{font("OT1","cmr","m","n")}, corresponds to 12pt Computer Modern Roman; this may be changed with @code{defaultpen(pen)}. The font setting of a pen is returned by @code{string font(pen p=currentpen)}. Support for standardized international characters is provided by the @code{unicode} package (@pxref{unicode}). @cindex @code{TeX fonts} Alternatively, one may select a fixed-size @TeX{} font (on which @code{fontsize} has no effect) like @code{"cmr12"} (12pt Computer Modern Roman) or @code{"pcrr"} (Courier) using the function @code{pen font(string name)}. An optional size argument can also be given to scale the font to the requested size: @code{pen font(string name, real size)}. @cindex @code{fontcommand} A nonstandard font command can be generated with @code{pen fontcommand(string)}. @cindex @code{PostScript fonts} A convenient interface to the following standard @code{PostScript} fonts is also provided: @verbatim pen AvantGarde(string series="m", string shape="n"); pen Bookman(string series="m", string shape="n"); pen Courier(string series="m", string shape="n"); pen Helvetica(string series="m", string shape="n"); pen NewCenturySchoolBook(string series="m", string shape="n"); pen Palatino(string series="m", string shape="n"); pen TimesRoman(string series="m", string shape="n"); pen ZapfChancery(string series="m", string shape="n"); pen Symbol(string series="m", string shape="n"); pen ZapfDingbats(string series="m", string shape="n"); @end verbatim @anchor{transparency} @cindex transparency @cindex @code{opacity} @item The transparency of a pen can be changed with the command: @verbatim pen opacity(real opacity=1, string blend="Compatible"); @end verbatim The opacity can be varied from @code{0} (fully transparent) to the default value of @code{1} (opaque), and @code{blend} specifies one of the following foreground--background blending operations: @verbatim "Compatible","Normal","Multiply","Screen","Overlay","SoftLight", "HardLight","ColorDodge","ColorBurn","Darken","Lighten","Difference", "Exclusion","Hue","Saturation","Color","Luminosity", @end verbatim as described in @url{http://partners.adobe.com/public/developer/en/pdf/PDFReference16.pdf}. Since @code{PostScript} does not support transparency, this feature is only effective with the @code{-f pdf} output format option; other formats can be produced from the resulting @acronym{PDF} file with the @code{ImageMagick} @code{convert} program. Labels are always drawn with an @code{opacity} of 1. A simple example of transparent filling is provided in the example file @code{@uref{http://asymptote.sourceforge.net/gallery/transparency.pdf,,transparency}@uref{http://asymptote.sourceforge.net/gallery/transparency.asy,,.asy}}. @cindex patterns @cindex tilings @item @code{PostScript} commands within a @code{picture} may be used to create a tiling pattern, identified by the string @code{name}, for @code{fill} and @code{draw} operations by adding it to the global @code{PostScript} frame @code{currentpatterns}, with optional left-bottom margin @code{lb} and right-top margin @code{rt}. @verbatim import patterns; void add(string name, picture pic, pair lb=0, pair rt=0); @end verbatim To @code{fill} or @code{draw} using pattern @code{name}, use the pen @code{pattern("name")}. For example, rectangular tilings can be constructed using the routines @code{picture tile(real Hx=5mm, real Hy=0, pen p=currentpen, filltype filltype=NoFill)}, @code{picture checker(real Hx=5mm, real Hy=0, pen p=currentpen)}, and @code{picture brick(real Hx=5mm, real Hy=0, pen p=currentpen)} defined in @code{@uref{http://asymptote.sourceforge.net/gallery/patterns.pdf,,patterns}@uref{http://asymptote.sourceforge.net/gallery/patterns.asy,,.asy}}: @cindex grid @cindex tile @cindex checker @cindex brick @verbatiminclude tile.asy @sp 1 @center @image{tile} @cindex hatch @cindex crosshatch Hatch patterns can be generated with the routines @code{picture hatch(real H=5mm, pair dir=NE, pen p=currentpen)}, @code{picture crosshatch(real H=5mm, pen p=currentpen)}: @verbatiminclude hatch.asy @sp 1 @center @image{hatch} You may need to turn off aliasing in your @code{PostScript} viewer for patterns to appear correctly. Custom patterns can easily be constructed, following the examples in @code{@uref{http://asymptote.sourceforge.net/gallery/patterns.pdf,,patterns}@uref{http://asymptote.sourceforge.net/gallery/patterns.asy,,.asy}}. The tiled pattern can even incorporate shading (@pxref{gradient shading}), as illustrated in this example (not included in the manual because not all printers support @code{PostScript} 3): @verbatiminclude shadedtiling.asy @anchor{makepen} @cindex @code{makepen} @item One can specify a custom pen nib as an arbitrary polygonal path with @code{pen makepen(path)}; this path represents the mark to be drawn for paths containing a single point. This pen nib path can be recovered from a pen with @code{path nib(pen)}. Unlike in @code{MetaPost}, the path need not be convex: @verbatiminclude makepen.asy @sp 1 @center @image{makepen} The value @code{nullpath} represents a circular pen nib (the default); an elliptical pen can be achieved simply by multiplying the pen by a transform: @code{yscale(2)*currentpen}. @anchor{overwrite} @cindex @code{overwrite} @item One can prevent labels from overwriting one another by using the pen attribute @code{overwrite}, which takes a single argument: @table @code @cindex @code{Allow} @cindex @code{defaultpen} @item Allow Allow labels to overwrite one another. This is the default behaviour (unless overridden with @code{defaultpen(pen)}. @cindex @code{Suppress} @item Suppress Suppress, with a warning, each label that would overwrite another label. @cindex @code{SuppressQuiet} @item SuppressQuiet Suppress, without warning, each label that would overwrite another label. @cindex @code{Move} @item Move Move a label that would overwrite another out of the way and issue a warning. As this adjustment is during the final output phase (in @code{PostScript} coordinates) it could result in a larger figure than requested. @cindex @code{MoveQuiet} @item MoveQuiet Move a label that would overwrite another out of the way, without warning. As this adjustment is during the final output phase (in @code{PostScript} coordinates) it could result in a larger figure than requested. @end table @end itemize @cindex @code{defaultpen} @cindex @code{resetdefaultpen} The routine @code{defaultpen()} returns the current default pen attributes. Calling the routine @code{resetdefaultpen()} resets all pen default attributes to their initial values. @node Transforms, Frames and pictures, Pens, Programming @section Transforms @cindex @code{transform} @code{Asymptote} makes extensive use of affine transforms. A pair @code{(x,y)} is transformed by the transform @code{t=(t.x,t.y,t.xx,t.xy,t.yx,t.yy)} to @code{(x',y')}, where @verbatim x' = t.x + t.xx * x + t.xy * y y' = t.y + t.yx * x + t.yy * y @end verbatim @noindent This is equivalent to the @code{PostScript} transformation @code{[t.xx t.yx t.xy t.yy t.x t.y]}. Transforms can be applied to pairs, guides, paths, pens, strings, transforms, frames, and pictures by multiplication (via the binary operator @code{*}) on the left (@pxref{circle} for an example). @cindex @code{inverse} Transforms can be composed with one another and inverted with the function @code{transform inverse(transform t)}; they can also be raised to any integer power with the @code{^} operator. The built-in transforms are: @table @code @item transform identity(); @cindex @code{identity} the identity transform; @item transform shift(pair z); @cindex @code{shift} translates by the pair @code{z}; @item transform shift(real x, real y); @cindex @code{shift} translates by the pair @code{(x,y)}; @item transform xscale(real x); @cindex @code{xscale} scales by @code{x} in the @math{x} direction; @item transform yscale(real y); @cindex @code{yscale} scales by @code{y} in the @math{y} direction; @item transform scale(real s); @cindex @code{scale} scale by @code{s} in both @math{x} and @math{y} directions; @item transform scale(real x, real y); @cindex @code{scale} scale by @code{x} in the @math{x} direction and by @code{y} in the @math{y} direction; @item transform slant(real s); @cindex @code{slant} maps @code{(x,y)} --> @code{(x+s*y,y)}; @item transform rotate(real angle, pair z=(0,0)); rotates by @code{angle} in degrees about @code{z}; @item transform reflect(pair a, pair b); @cindex @code{reflect} reflects about the line @code{a--b}. @end table @cindex @code{shift} @cindex @code{shiftless} The implicit initializer for transforms is @code{identity()}. The routines @code{shift(transform t)} and @code{shiftless(transform t)} return the transforms @code{(t.x,t.y,0,0,0,0)} and @code{(0,0,t.xx,t.xy,t.yx,t.yy)} respectively. @node Frames and pictures, Files, Transforms, Programming @section Frames and pictures @table @code @item frame @cindex @code{frame} @cindex @code{newframe} @cindex @code{empty} @cindex @code{erase} @cindex @code{min} @cindex @code{max} Frames are canvases for drawing in @code{PostScript} coordinates. While working with frames directly is occasionally necessary for constructing deferred drawing routines, pictures are usually more convenient to work with. The implicit initializer for frames is @code{newframe}. The function @code{bool empty(frame f)} returns @code{true} only if the frame @code{f} is empty. A frame may be erased with the @code{erase(frame)} routine. The functions @code{pair min(frame)} and @code{pair max(frame)} return the (left,bottom) and (right,top) coordinates of the frame bounding box, respectively. The contents of frame @code{src} may be appended to frame @code{dest} with the command @verbatim void add(frame dest, frame src); @end verbatim or prepended with @verbatim void prepend(frame dest, frame src); @end verbatim A frame obtained by aligning frame @code{f} in the direction @code{align}, in a manner analogous to the @code{align} argument of @code{label} (@pxref{label}), is returned by @verbatim frame align(frame f, pair align); @end verbatim @cindex @code{box} @cindex @code{ellipse} @anchor{envelope} @cindex @code{envelope} To draw or fill a box or ellipse around a label or frame and return the boundary as a path, use one of the predefined @code{envelope} routines @verbatim path box(frame f, Label L="", real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true); path roundbox(frame f, Label L="", real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true); path ellipse(frame f, Label L="", real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true); @end verbatim @item picture @cindex @code{picture} Pictures are high-level structures (@pxref{Structures}) defined in the module @code{plain} that provide canvases for drawing in user coordinates. The default picture is called @code{currentpicture}. A new picture can be created like this: @verbatim picture pic; @end verbatim @noindent Anonymous pictures can be made by the expression @code{new picture}. The @code{size} routine specifies the dimensions of the desired picture: @anchor{size} @cindex @code{size} @verbatim void size(picture pic=currentpicture, real x, real y=x, bool keepAspect=Aspect); @end verbatim If the @code{x} and @code{y} sizes are both 0, user coordinates will be interpreted as @code{PostScript} coordinates. In this case, the transform mapping @code{pic} to the final output frame is @code{identity()}. If exactly one of @code{x} or @code{y} is 0, no size restriction is imposed in that direction; it will be scaled the same as the other direction. @cindex @code{keepAspect} @cindex @code{Aspect} If @code{keepAspect} is set to @code{Aspect} or @code{true}, the picture will be scaled with its aspect ratio preserved such that the final width is no more than @code{x} and the final height is no more than @code{y}. @cindex @code{keepAspect} @cindex @code{IgnoreAspect} If @code{keepAspect} is set to @code{IgnoreAspect} or @code{false}, the picture will be scaled in both directions so that the final width is @code{x} and the height is @code{y}. To make the user coordinates of picture @code{pic} represent multiples of @code{x} units in the @math{x} direction and @code{y} units in the @math{y} direction, use @anchor{unitsize} @cindex @code{unitsize} @verbatim void unitsize(picture pic=currentpicture, real x, real y=x); @end verbatim When nonzero, these @code{x} and @code{y} values override the corresponding size parameters of picture @code{pic}. The routine @cindex @code{size} @verbatim void size(picture pic=currentpicture, real xsize, real ysize, pair min, pair max); @end verbatim forces the final picture scaling to map the user coordinates @code{box(min,max)} to a region of width @code{xsize} and height @code{ysize} (when these parameters are nonzero). Alternatively, calling the routine @cindex @code{fixedscaling} @verbatim transform fixedscaling(picture pic=currentpicture, pair min, pair max, pen p=nullpen, bool warn=false); @end verbatim will cause picture @code{pic} to use a fixed scaling to map user coordinates in @code{box(min,max)} to the (already specified) picture size, taking account of the width of pen @code{p}. A warning will be issued if the final picture exceeds the specified size. A picture @code{pic} can be fit to a frame and output to a file @code{prefix}.@code{format} using image format @code{format} by calling the @code{shipout} function: @anchor{shipout} @cindex @code{shipout} @cindex @code{outprefix} @verbatim void shipout(string prefix=defaultfilename, picture pic=currentpicture, orientation orientation=orientation, string format="", bool wait=false, bool view=true, string options="", string script="", light light=currentlight, projection P=currentprojection) @end verbatim @noindent The default output format, @code{PostScript}, may be changed with the @code{-f} or @code{-tex} command-line options. The @code{options}, @code{script}, and @code{projection} parameters are only relevant for 3D pictures. If @code{defaultfilename} is an empty string, the prefix @code{outprefix()} will be used. A @code{shipout()} command is added implicitly at file exit if no previous @code{shipout} commands have been executed. @cindex @code{orientation} @cindex @code{Portrait} @cindex @code{Landscape} @cindex @code{UpsideDown} The default page orientation is @code{Portrait}; this may be modified by changing the variable @code{orientation}. To output in landscape mode, simply set the variable @code{orientation=Landscape} or issue the command @verbatim shipout(Landscape); @end verbatim @cindex @code{Seascape} To rotate the page by @math{-90} degrees, use the orientation @code{Seascape}. @cindex @code{UpsideDown} The orientation @code{UpsideDown} rotates the page by 180 degrees. @cindex subpictures @cindex @code{fit} A picture @code{pic} can be explicitly fit to a frame by calling @verbatim frame pic.fit(real xsize=pic.xsize, real ysize=pic.ysize, bool keepAspect=pic.keepAspect); @end verbatim The default size and aspect ratio settings are those given to the @code{size} command (which default to @code{0}, @code{0}, and @code{true}, respectively). @cindex @code{calculateTransform} The transformation that would currently be used to fit a picture @code{pic} to a frame is returned by the member function @code{pic.calculateTransform()}. In certain cases (e.g.@ 2D graphs) where only an approximate size estimate for @code{pic} is available, the picture fitting routine @verbatim frame pic.scale(real xsize=this.xsize, real ysize=this.ysize, bool keepAspect=this.keepAspect); @end verbatim (which scales the resulting frame, including labels and fixed-size objects) will enforce perfect compliance with the requested size specification, but should not normally be required. @cindex @code{box} To draw a bounding box with margins around a picture, fit the picture to a frame using the function @verbatim frame bbox(picture pic=currentpicture, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill); @end verbatim @anchor{filltype} Here @code{filltype} specifies one of the following fill types: @table @code @cindex @code{FillDraw} @item FillDraw Fill the interior and draw the boundary. @item FillDraw(real xmargin=0, real ymargin=xmargin, pen fillpen=nullpen, @code{pen drawpen=nullpen)} @cindex @code{nullpen} If @code{fillpen} is @code{nullpen}, fill with the drawing pen; otherwise fill with pen @code{fillpen}. If @code{drawpen} is @code{nullpen}, draw the boundary with @code{fillpen}; otherwise with @code{drawpen}. An optional margin of @code{xmargin} and @code{ymargin} can be specified. @cindex @code{Fill} @item Fill Fill the interior. @cindex @code{nullpen} @item Fill(real xmargin=0, real ymargin=xmargin, pen p=nullpen) If @code{p} is @code{nullpen}, fill with the drawing pen; otherwise fill with pen @code{p}. An optional margin of @code{xmargin} and @code{ymargin} can be specified. @cindex @code{NoFill} @item NoFill Do not fill. @item Draw Draw only the boundary. @cindex @code{Draw} @item Draw(real xmargin=0, real ymargin=xmargin, pen p=nullpen) If @code{p} is @code{nullpen}, draw the boundary with the drawing pen; otherwise draw with pen @code{p}. An optional margin of @code{xmargin} and @code{ymargin} can be specified. @cindex @code{UnFill} @item UnFill Clip the region. @cindex @code{UnFill} @item UnFill(real xmargin=0, real ymargin=xmargin) Clip the region and surrounding margins @code{xmargin} and @code{ymargin}. @cindex @code{RadialShade} @item RadialShade(pen penc, pen penr) Fill varying radially from @code{penc} at the center of the bounding box to @code{penr} at the edge. @cindex @code{RadialShadeDraw} @item RadialShadeDraw(real xmargin=0, real ymargin=xmargin, pen penc, @code{pen penr, pen drawpen=nullpen)} Fill with RadialShade and draw the boundary. @end table @cindex bounding box @cindex background color For example, to draw a bounding box around a picture with a 0.25 cm margin and output the resulting frame, use the command: @verbatim shipout(bbox(0.25cm)); @end verbatim A @code{picture} may be fit to a frame with the background color pen @code{p}, using the function @code{bbox(p,Fill)}. The functions @verbatim pair min(picture pic, user=false); pair max(picture pic, user=false); pair size(picture pic, user=false); @end verbatim calculate the bounds that picture @code{pic} would have if it were currently fit to a frame using its default size specification. If @code{user} is @code{false} the returned value is in @code{PostScript} coordinates, otherwise it is in user coordinates. The function @verbatim pair point(picture pic=currentpicture, pair dir, bool user=true); @end verbatim is a convenient way of determining the point on the bounding box of @code{pic} in the direction @code{dir} relative to its center, ignoring the contributions from fixed-size objects (such as labels and arrowheads). If @code{user} is @code{true} the returned value is in user coordinates, otherwise it is in @code{PostScript} coordinates. The function @verbatim pair truepoint(picture pic=currentpicture, pair dir, bool user=true); @end verbatim is identical to @code{point}, except that it also accounts for fixed-size objects, using the scaling transform that picture @code{pic} would have if currently fit to a frame using its default size specification. If @code{user} is @code{true} the returned value is in user coordinates, otherwise it is in @code{PostScript} coordinates. @anchor{add} Sometimes it is useful to draw objects on separate pictures and add one picture to another using the @code{add} function: @cindex @code{add} @verbatim void add(picture src, bool group=true, filltype filltype=NoFill, bool above=true); void add(picture dest, picture src, bool group=true, filltype filltype=NoFill, bool above=true); @end verbatim @noindent The first example adds @code{src} to @code{currentpicture}; the second one adds @code{src} to @code{dest}. The @code{group} option specifies whether or not the graphical user interface @code{@uref{http://asymptote.sourceforge.net/gallery/.pdf,,}@uref{http://asymptote.sourceforge.net/gallery/.asy,,.asy}} should treat all of the elements of @code{src} as a single entity (@pxref{GUI}), @code{filltype} requests optional background filling or clipping, and @code{above} specifies whether to add @code{src} above or below existing objects. There are also routines to add a picture or frame @code{src} specified in postscript coordinates to another picture @code{dest} (or @code{currentpicture}) about the user coordinate @code{position}: @anchor{add about} @cindex @code{add} @cindex picture alignment @verbatim void add(picture src, pair position, bool group=true, filltype filltype=NoFill, bool above=true); void add(picture dest, picture src, pair position, bool group=true, filltype filltype=NoFill, bool above=true); void add(picture dest=currentpicture, frame src, pair position=0, bool group=true, filltype filltype=NoFill, bool above=true); void add(picture dest=currentpicture, frame src, pair position, pair align, bool group=true, filltype filltype=NoFill, bool above=true); @end verbatim The optional @code{align} argument in the last form specifies a direction to use for aligning the frame, in a manner analogous to the @code{align} argument of @code{label} (@pxref{label}). However, one key difference is that when @code{align} is not specified, labels are centered, whereas frames and pictures are aligned so that their origin is at @code{position}. Illustrations of frame alignment can be found in the examples @ref{errorbars} and @ref{image}. If you want to align three or more subpictures, group them two at a time: @verbatiminclude subpictures.asy @sp 1 @center @image{subpictures} Alternatively, one can use @code{attach} to automatically increase the size of picture @code{dest} to accommodate adding a frame @code{src} about the user coordinate @code{position}: @cindex @code{attach} @verbatim void attach(picture dest=currentpicture, frame src, pair position=0, bool group=true, filltype filltype=NoFill, bool above=true); void attach(picture dest=currentpicture, frame src, pair position, pair align, bool group=true, filltype filltype=NoFill, bool above=true); @end verbatim @cindex @code{erase} To erase the contents of a picture (but not the size specification), use the function @verbatim void erase(picture pic=currentpicture); @end verbatim @cindex @code{save} To save a snapshot of @code{currentpicture}, @code{currentpen}, and @code{currentprojection}, use the function @code{save()}. @cindex @code{restore} To restore a snapshot of @code{currentpicture}, @code{currentpen}, and @code{currentprojection}, use the function @code{restore()}. Many further examples of picture and frame operations are provided in the base module @code{plain}. @cindex verbatim @cindex @code{postscript} It is possible to insert verbatim @code{PostScript} commands in a picture with one of the routines @verbatim void postscript(picture pic=currentpicture, string s); void postscript(picture pic=currentpicture, string s, pair min, pair max) @end verbatim Here @code{min} and @code{max} can be used to specify explicit bounds associated with the resulting @code{PostScript} code. @anchor{tex} @cindex @code{tex} Verbatim @TeX{} commands can be inserted in the intermediate @code{LaTeX} output file with one of the functions @verbatim void tex(picture pic=currentpicture, string s); void tex(picture pic=currentpicture, string s, pair min, pair max) @end verbatim Here @code{min} and @code{max} can be used to specify explicit bounds associated with the resulting @TeX{} code. To issue a global @TeX{} command (such as a @TeX{} macro definition) in the @TeX{} preamble (valid for the remainder of the top-level module) use: @cindex @code{texpreamble} @verbatim void texpreamble(string s); @end verbatim The @TeX{} environment can be reset to its initial state, clearing all macro definitions, with the function @cindex @code{texreset} @verbatim void texreset(); @end verbatim @cindex @code{usepackage} The routine @verbatim void usepackage(string s, string options=""); @end verbatim provides a convenient abbreviation for @verbatim texpreamble("\usepackage["+options+"]{"+s+"}"); @end verbatim @noindent that can be used for importing @code{LaTeX} packages. @end table @node Files, Variable initializers, Frames and pictures, Programming @section Files @cindex @code{file} @code{Asymptote} can read and write text files (including comma-separated value) files and portable @acronym{XDR} (External Data Representation) binary files. @cindex @code{input} An input file must first be opened with @verbatim input(string name="", bool check=true, string comment="#", string mode=""); @end verbatim reading is then done by assignment: @cindex open @cindex @code{input} @cindex reading @verbatim file fin=input("test.txt"); real a=fin; @end verbatim @cindex comment character @cindex @code{error} If the optional boolean argument @code{check} is @code{false}, no check will be made that the file exists. If the file does not exist or is not readable, the function @code{bool error(file)} will return @code{true}. The first character of the string @code{comment} specifies a comment character. If this character is encountered in a data file, the remainder of the line is ignored. When reading strings, a comment character followed immediately by another comment character is treated as a single literal comment character. @anchor{cd} @cindex @code{cd} @cindex directory One can change the current working directory for read operations to the contents of the string @code{s} with the function @code{string cd(string s)}, which returns the new working directory. If @code{string s} is empty, the path is reset to the value it had at program startup. @cindex @code{getc} When reading pairs, the enclosing parenthesis are optional. Strings are also read by assignment, by reading characters up to but not including a newline. In addition, @code{Asymptote} provides the function @code{string getc(file)} to read the next character (treating the comment character as an ordinary character) and return it as a string. @cindex @code{output} @cindex @code{update} @cindex append A file named @code{name} can be open for output with @verbatim file output(string name="", bool update=false, string comment="#", string mode=""); @end verbatim @noindent If @code{update=false}, any existing data in the file will be erased and only write operations can be used on the file. If @code{update=true}, any existing data will be preserved, the position will be set to the end-of-file, and both reading and writing operations will be enabled. For security reasons, writing to files in directories other than the current directory is allowed only if the @code{-globalwrite} (or @code{-nosafe}) command-line option is specified. @cindex @code{mktemp} The function @code{string mktemp(string s)} may be used to create and return the name of a unique temporary file in the current directory based on the string @code{s}. @cindex @code{stdin} @cindex @code{stdout} There are two special files: @code{stdin}, which reads from the keyboard, and @code{stdout}, which writes to the terminal. The implicit initializer for files is @code{null}. Data of a built-in type @code{T} can be written to an output file by calling one of the functions @cindex @code{write} @verbatim write(string s="", T x, suffix suffix=endl ... T[]); write(file file, string s="", T x, suffix suffix=none ... T[]); write(file file=stdout, string s="", explicit T[] x ... T[][]); write(file file=stdout, T[][]); write(file file=stdout, T[][][]); write(suffix suffix=endl); write(file file, suffix suffix=none); @end verbatim @cindex @code{none} @cindex @code{flush} @cindex @code{endl} @cindex @code{newl} @cindex @code{DOSendl} @cindex @code{DOSnewl} @cindex @code{tab} @cindex @code{comma} If @code{file} is not specified, @code{stdout} is used and terminated by default with a newline. If specified, the optional identifying string @code{s} is written before the data @code{x}. An arbitrary number of data values may be listed when writing scalars or one-dimensional arrays. The @code{suffix} may be one of the following: @code{none} (do nothing), @code{flush} (output buffered data), @code{endl} (terminate with a newline and flush), @code{newl} (terminate with a newline), @code{DOSendl} (terminate with a DOS newline and flush), @code{DOSnewl} (terminate with a DOS newline), @code{tab} (terminate with a tab), or @code{comma} (terminate with a comma). Here are some simple examples of data output: @verbatim file fout=output("test.txt"); write(fout,1); // Writes "1" write(fout); // Writes a new line write(fout,"List: ",1,2,3); // Writes "List: 1 2 3" @end verbatim @noindent @cindex binary format @cindex single precision @cindex double precision @cindex @code{singlereal} @cindex @code{singleint} @cindex @code{signedint} @cindex @code{mode} @cindex @code{binary} @cindex @code{xdr} A file may be opened with @code{mode="xdr"}, to read or write double precision (64-bit) reals and single precision (32-bit) integers in Sun Microsystem's @acronym{XDR} (External Data Representation) portable binary format (available on all @code{UNIX} platforms). Alternatively, a file may also be opened with @code{mode="binary"} to read or write double precision reals and single precision integers in the native (nonportable) machine binary format. The virtual member functions @code{file singlereal(bool b=true)} and @code{file singleint(bool b=true)} be used to change the precision of real and integer I/O operations, respectively, for an @acronym{XDR} or binary file @code{f}. Similarly, the function @code{file signedint(bool b=true)} can be used to modify the signedness of integer reads and writes for an @acronym{XDR} or binary file @code{f}. @cindex @code{name} @cindex @code{mode} @cindex @code{singlereal} @cindex @code{singleint} @cindex @code{signedint} The virtual members @code{name}, @code{mode}, @code{singlereal}, @code{singleint}, and @code{signedint} may be used to query the respective parameters for a given file. @cindex @code{eof} @cindex @code{eol} @cindex @code{error} @cindex @code{flush} @cindex @code{clear} @cindex @code{precision} @cindex @code{seek} @cindex @code{tell} @cindex rewind @cindex @code{seekeof} One can test a file for end-of-file with the boolean function @code{eof(file)}, end-of-line with @code{eol(file)}, and for I/O errors with @code{error(file)}. One can flush the output buffers with @code{flush(file)}, clear a previous I/O error with @code{clear(file)}, and close the file with @code{close(file)}. The function @code{int precision(file file=stdout, int digits=0)} sets the number of digits of output precision for @code{file} to @code{digits}, provided @code{digits} is nonzero, and returns the previous precision setting. The function @code{int tell(file)} returns the current position in a file relative to the beginning. The routine @code{seek(file file, int pos)} can be used to change this position, where a negative value for the position @code{pos} is interpreted as relative to the end-of-file. For example, one can rewind a file @code{file} with the command @code{seek(file,0)} and position to the final character in the file with @code{seek(file,-1)}. The command @code{seekeof(file)} sets the position to the end of the file. @cindex @code{scroll} @anchor{scroll} Assigning @code{settings.scroll=n} for a positive integer @code{n} requests a pause after every @code{n} output lines to @code{stdout}. One may then press @code{Enter} to continue to the next @code{n} output lines, @code{s} followed by @code{Enter} to scroll without further interruption, or @code{q} followed by @code{Enter} to quit the current output operation. If @code{n} is negative, the output scrolls a page at a time (i.e. by one less than the current number of display lines). The default value, @code{settings.scroll=0}, specifies continuous scrolling. The routines @cindex @code{getstring} @cindex @code{getreal} @cindex @code{getpair} @cindex @code{gettriple} @verbatim string getstring(string name="", string default="", string prompt="", bool store=true); int getint(string name="", int default=0, string prompt="", bool store=true); real getreal(string name="", real default=0, string prompt="", bool store=true); pair getpair(string name="", pair default=0, string prompt="", bool store=true); triple gettriple(string name="", triple default=(0,0,0), string prompt="", bool store=true); @end verbatim @noindent defined in the module @code{plain} may be used to prompt for a value from @code{stdin} using the @acronym{GNU} @code{readline} library. If @code{store=true}, the history of values for @code{name} is stored in the file @code{".asy_history_"+name} (@pxref{history}). The most recent value in the history will be used to provide a default value for subsequent runs. The default value (initially @code{default}) is displayed after @code{prompt}. These functions are based on the internal routines @cindex @code{readline} @cindex @code{saveline} @verbatim string readline(string prompt="", string name="", bool tabcompletion=false); void saveline(string name, string value, bool store=true); @end verbatim Here, @code{readline} prompts the user with the default value formatted according to @code{prompt}, while @code{saveline} is used to save the string @code{value} in a local history named @code{name}, optionally storing the local history in a file @code{".asy_history_"+name}. @cindex @code{history} The routine @code{history(string name, int n=1)} can be used to look up the @code{n} most recent values (or all values up to @code{historylines} if @code{n=0}) entered for string @code{name}. The routine @code{history(int n=0)} returns the interactive history. For example, @verbatim write(output("transcript.asy"),history()); @end verbatim @noindent outputs the interactive history to the file @code{@uref{http://asymptote.sourceforge.net/gallery/transcript.pdf,,transcript}@uref{http://asymptote.sourceforge.net/gallery/transcript.asy,,.asy}}. @cindex @code{delete} The function @code{int delete(string s)} deletes the file named by the string @code{s}. Unless the @code{-globalwrite} (or @code{-nosafe}) option is enabled, the file must reside in the current directory. @cindex @code{rename} The function @code{int rename(string from, string to)} may be used to rename file @code{from} to file @code{to}. Unless the @code{-globalwrite} (or @code{-nosafe}) option is enabled, this operation is restricted to the current directory. @cindex @code{convert} @cindex @code{animate} The functions @verbatim int convert(string args="", string file="", string format=""); int animate(string args="", string file="", string format=""); @end verbatim @noindent call the @code{ImageMagick} commands @code{convert} and @code{animate}, respectively, with the arguments @code{args} and the file name constructed from the strings @code{file} and @code{format}. @node Variable initializers, Structures, Files, Programming @section Variable initializers @cindex variable initializers @cindex @code{operator init} @cindex initializers A variable can be assigned a value when it is declared, as in @code{int x=3;} where the variable @code{x} is assigned the value @code{3}. As well as literal constants such as @code{3}, arbitary expressions can be used as initializers, as in @code{real x=2*sin(pi/2);}. A variable is not added to the namespace until after the initializer is evaluated, so for example, in @verbatim int x=2; int x=5*x; @end verbatim @noindent the @code{x} in the initializer on the second line refers to the variable @code{x} declared on the first line. The second line, then, declares a variable @code{x} shadowing the original @code{x} and initializes it to the value @code{10}. Variables of most types can be declared without an explicit initializer and they will be initialized by the default initializer of that type: @itemize @item Variables of the numeric types @code{int}, @code{real}, and @code{pair} are all initialized to zero; variables of type @code{triple} are initialized to @code{O=(0,0,0)}. @item @code{boolean} variables are initialized to @code{false}. @item @code{string} variables are initialized to the empty string. @item @code{transform} variables are initialized to the identity transformation. @item @code{path} and @code{guide} variables are initialized to @code{nullpath}. @item @code{pen} variables are initialized to the default pen. @item @code{frame} and @code{picture} variables are initialized to empty frames and pictures, respectively. @item @code{file} variables are initialized to @code{null}. @end itemize The default initializers for user-defined array, structure, and function types are explained in their respective sections. Some types, such as @code{code}, do not have default initializers. When a variable of such a type is introduced, the user must initialize it by explicitly giving it a value. The default initializer for any type @code{T} can be redeclared by defining the function @code{T operator init()}. For instance, @code{int} variables are usually initialized to zero, but in @verbatim int operator init() { return 3; } int y; @end verbatim @noindent the variable @code{y} is initialized to @code{3}. This example was given for illustrative purposes; redeclaring the initializers of built-in types is not recommended. Typically, @code{operator init} is used to define sensible defaults for user-defined types. @cindex @code{var} The special type @code{var} may be used to infer the type of a variable from its initializer. If the initializer is an expression of a unique type, then the variable will be defined with that type. For instance, @verbatim var x=5; var y=4.3; var reddash=red+dashed; @end verbatim @noindent is equivalent to @verbatim int x=5; real y=4.3; pen reddash=red+dashed; @end verbatim @code{var} may also be used with the extended @code{for} loop syntax. @verbatim int[] a = {1,2,3}; for (var x : a) write(x); @end verbatim @node Structures, Operators, Variable initializers, Programming @section Structures @cindex @code{struct} @cindex structures @cindex @code{public} @cindex @code{restricted} @cindex @code{private} @cindex @code{this} @cindex @code{new} @cindex @code{null} Users may also define their own data types as structures, along with user-defined operators, much as in C++. By default, structure members are @code{public} (may be read and modified anywhere in the code), but may be optionally declared @code{restricted} (readable anywhere but writeable only inside the structure where they are defined) or @code{private} (readable and writable only inside the structure). In a structure definition, the keyword @code{this} can be used as an expression to refer to the enclosing structure. Any code at the top-level scope within the structure is executed on initialization. Variables hold references to structures. That is, in the example: @verbatim struct T { int x; } T foo; T bar=foo; bar.x=5; @end verbatim The variable @code{foo} holds a reference to an instance of the structure @code{T}. When @code{bar} is assigned the value of @code{foo}, it too now holds a reference to the same instance as @code{foo} does. The assignment @code{bar.x=5} changes the value of the field @code{x} in that instance, so that @code{foo.x} will also be equal to @code{5}. The expression @code{new T} creates a new instance of the structure @code{T} and returns a reference to that instance. In creating the new instance, any code in the body of the record definition is executed. For example: @verbatim int Tcount=0; struct T { int x; ++Tcount; } T foo=new T; T foo; @end verbatim @noindent Here, @code{new T} produces a new instance of the class, which causes @code{Tcount} to be incremented, tracking the number of instances produced. The declarations @code{T foo=new T} and @code{T foo} are equivalent: the second form implicitly creates a new instance of @code{T}. That is, after the definition of a structure @code{T}, a variable of type @code{T} is initialized to a new instance (@code{new T}) by default. During the definition of the structure, however, variables of type @code{T} are initialized to @code{null} by default. This special behaviour is to avoid infinite recursion of creating new instances in code such as @verbatim struct tree { int value; tree left; tree right; } @end verbatim The expression @code{null} can be cast to any structure type to yield a null reference, a reference that does not actually refer to any instance of the structure. Trying to use a field of a null reference will cause an error. @cindex alias @cindex @code{==} @cindex @code{!=} The function @code{bool alias(T,T)} checks to see if two structure references refer to the same instance of the structure (or both to @code{null}). In example at the beginning of this section, @code{alias(foo,bar)} would return true, but @code{alias(foo,new T)} would return false, as @code{new T} creates a new instance of the structure @code{T}. The boolean operators @code{==} and @code{!=} are by default equivalent to @code{alias} and @code{!alias} respectively, but may be overwritten for a particular type (for example, to do a deep comparison). Here is a simple example that illustrates the use of structures: @verbatim struct S { real a=1; real f(real a) {return a+this.a;} } S s; // Initializes s with new S; write(s.f(2)); // Outputs 3 S operator + (S s1, S s2) { S result; result.a=s1.a+s2.a; return result; } write((s+s).f(0)); // Outputs 2 @end verbatim @cindex constructors It is often convenient to have functions that construct new instances of a structure. Say we have a @code{Person} structure: @verbatim struct Person { string firstname; string lastname; } Person joe; joe.firstname="Joe"; joe.lastname="Jones"; @end verbatim @noindent Creating a new Person is a chore; it takes three lines to create a new instance and to initialize its fields (that's still considerably less effort than creating a new person in real life, though). We can reduce the work by defining a constructor function @code{Person(string,string)}: @verbatim struct Person { string firstname; string lastname; static Person Person(string firstname, string lastname) { Person p=new Person; p.firstname=firstname; p.lastname=lastname; return p; } } Person joe=Person.Person("Joe", "Jones"); @end verbatim While it is now easier than before to create a new instance, we still have to refer to the constructor by the qualified name @code{Person.Person}. If we add the line @verbatim from Person unravel Person; @end verbatim @noindent immediately after the structure definition, then the constructor can be used without qualification: @code{Person joe=Person("Joe", "Jones");}. The constructor is now easy to use, but it is quite a hassle to define. If you write a lot of constructors, you will find that you are repeating a lot of code in each of them. Fortunately, your friendly neighbourhood Asymptote developers have devised a way to automate much of the process. @cindex @code{operator init} If, in the body of a structure, Asymptote encounters the definition of a function of the form @code{void operator init(@var{args})}, it implicitly defines a constructor function of the arguments @code{@var{args}} that uses the @code{void operator init} function to initialize a new instance of the structure. That is, it essentially defines the following constructor (assuming the structure is called @code{Foo}): @example static Foo Foo(@var{args}) @{ Foo instance=new Foo; instance.operator init(@var{args}); return instance; @} @end example This constructor is also implicitly copied to the enclosing scope after the end of the structure definition, so that it can used subsequently without qualifying it by the structure name. Our @code{Person} example can thus be implemented as: @verbatim struct Person { string firstname; string lastname; void operator init(string firstname, string lastname) { this.firstname=firstname; this.lastname=lastname; } } Person joe=Person("Joe", "Jones"); @end verbatim The use of @code{operator init} to implicitly define constructors should not be confused with its use to define default values for variables (@pxref{Variable initializers}). Indeed, in the first case, the return type of the @code{operator init} must be @code{void} while in the second, it must be the (non-@code{void}) type of the variable. @cindex @code{cputime} The function @code{cputime()} returns a structure @code{cputime} with cumulative @acronym{CPU} times broken down into the fields @code{parent.user}, @code{parent.system}, @code{child.user}, and @code{child.system}. For convenience, the incremental fields @code{change.user} and @code{change.system} indicate the change in the corresponding total parent and child @acronym{CPU} times since the last call to @code{cputime()}. The function @verbatim void write(file file=stdout, string s="", cputime c, string format=cputimeformat, suffix suffix=none); @end verbatim @noindent displays the incremental user cputime followed by ``u'', the incremental system cputime followed by ``s'', the total user cputime followed by ``U'', and the total system cputime followed by ``S''. @cindex inheritance @cindex virtual functions Much like in C++, casting (@pxref{Casts}) provides for an elegant implementation of structure inheritance, including virtual functions: @verbatim struct parent { real x; void operator init(int x) {this.x=x;} void virtual(int) {write(0);} void f() {virtual(1);} } void write(parent p) {write(p.x);} struct child { parent parent; real y=3; void operator init(int x) {parent.operator init(x);} void virtual(int x) {write(x);} parent.virtual=virtual; void f()=parent.f; } parent operator cast(child child) {return child.parent;} parent p=parent(1); child c=child(2); write(c); // Outputs 2; p.f(); // Outputs 0; c.f(); // Outputs 1; write(c.parent.x); // Outputs 2; write(c.y); // Outputs 3; @end verbatim For further examples of structures, see @code{Legend} and @code{picture} in the @code{Asymptote} base module @code{plain}. @node Operators, Implicit scaling, Structures, Programming @section Operators @cindex operators @menu * Arithmetic & logical:: Basic mathematical operators * Self & prefix operators:: Increment and decrement * User-defined operators:: Overloading operators @end menu @node Arithmetic & logical, Self & prefix operators, Operators, Operators @subsection Arithmetic & logical operators @cindex arithmetic operators @cindex binary operators @cindex boolean operators @cindex logical operators @cindex @code{quotient} @code{Asymptote} uses the standard binary arithmetic operators. However, when one integer is divided by another, both arguments are converted to real values before dividing and a real quotient is returned (since this is typically what is intended; otherwise one can use the function @code{int quotient(int x, int y)}, which returns greatest integer less than or equal to @code{x/y}). In all other cases both operands are promoted to the same type, which will also be the type of the result: @table @code @cindex @code{+} @item + addition @cindex @code{-} @item - subtractiona @cindex @code{*} @item * multiplication @cindex @code{/} @item / division @cindex integer division @cindex @code{#} @item # integer division; equivalent to @code{quotient(x,y)}. Noting that the @code{Python3} community adopted our comment symbol (@code{//}) for integer division, we decided to reciprocate and use their comment symbol for integer division in @code{Asymptote}! @cindex @code{%} @item % modulo; the result always has the same sign as the divisor. In particular, this makes @code{q*(p # q)+p % q == p} for all integers @code{p} and nonzero integers @code{q}. @cindex @code{^} @item ^ @cindex @code{**} power; if the exponent (second argument) is an int, recursive multiplication is used; otherwise, logarithms and exponentials are used (@code{**} is a synonym for @code{^}). @end table The usual boolean operators are also defined: @table @code @cindex @code{==} @item == equals @cindex @code{!=} @item != not equals @cindex @code{<} @item < less than @cindex @code{<=} @item <= less than or equals @cindex @code{>=} @item >= greater than or equals @cindex @code{>} @item > greater than @cindex @code{&&} @item && and (with conditional evaluation of right-hand argument) @cindex @code{&} @item & and @cindex @code{||} @item || or (with conditional evaluation of right-hand argument) @cindex @code{|} @item | or @cindex @code{^} @item ^ xor @cindex @code{!} @item ! not @end table @code{Asymptote} also supports the C-like conditional syntax: @cindex @code{:} @cindex @code{?} @cindex conditional @verbatim bool positive=(pi > 0) ? true : false; @end verbatim @cindex @code{interp} The function @code{T interp(T a, T b, real t)} returns @code{(1-t)*a+t*b} for nonintegral built-in arithmetic types @code{T}. If @code{a} and @code{b} are pens, they are first promoted to the same color space. @cindex @code{AND} @cindex @code{OR} @cindex @code{XOR} @cindex @code{NOT} @cindex @code{CLZ} @cindex @code{CTZ} @code{Asymptote} also defines bitwise functions @code{int AND(int,int)}, @code{int OR(int,int)}, @code{int XOR(int,int)}, @code{int NOT(int)}, @code{int CLZ(int)} (count leading zeros), and @code{int CTZ(int)} (count trailing zeros). @node Self & prefix operators, User-defined operators, Arithmetic & logical, Operators @subsection Self & prefix operators @cindex self operators @cindex prefix operators @cindex @code{+=} @cindex @code{-=} @cindex @code{*=} @cindex @code{/=} @cindex @code{%=} @cindex @code{^=} @cindex @code{++} @cindex @code{--} As in C, each of the arithmetic operators @code{+}, @code{-}, @code{*}, @code{/}, @code{#}, @code{%}, and @code{^} can be used as a self operator. The prefix operators @code{++} (increment by one) and @code{--} (decrement by one) are also defined. For example, @verbatim int i=1; i += 2; int j=++i; @end verbatim @noindent is equivalent to the code @verbatim int i=1; i=i+2; int j=i=i+1; @end verbatim @cindex postfix operators However, postfix operators like @code{i++} and @code{i--} are not defined (because of the inherent ambiguities that would arise with the @code{--} path-joining operator). In the rare instances where @code{i++} and @code{i--} are really needed, one can substitute the expressions @code{(++i-1)} and @code{(--i+1)}, respectively. @node User-defined operators, , Self & prefix operators, Operators @subsection User-defined operators @cindex user-defined operators @cindex @code{operator} The following symbols may be used with @code{operator} to define or redefine operators on structures and built-in types: @verbatim - + * / % ^ ! < > == != <= >= & | ^^ .. :: -- --- ++ << >> $ $$ @ @@ @end verbatim @noindent The operators on the second line have precedence one higher than the boolean operators @code{<}, @code{>}, @code{<=}, and @code{>=}. Guide operators like @code{..} may be overloaded, say, to write a user function that produces a new guide from a given guide: @verbatim guide dots(... guide[] g)=operator ..; guide operator ..(... guide[] g) { guide G; if(g.length > 0) { write(g[0]); G=g[0]; } for(int i=1; i < g.length; ++i) { write(g[i]); write(); G=dots(G,g[i]); } return G; } guide g=(0,0){up}..{SW}(100,100){NE}..{curl 3}(50,50)..(10,10); write("g=",g); @end verbatim @node Implicit scaling, Functions, Operators, Programming @section Implicit scaling @cindex implicit scaling If a numeric literal is in front of certain types of expressions, then the two are multiplied: @verbatim int x=2; real y=2.0; real cm=72/2.540005; write(3x); write(2.5x); write(3y); write(-1.602e-19 y); write(0.5(x,y)); write(2x^2); write(3x+2y); write(3(x+2y)); write(3sin(x)); write(3(sin(x))^2); write(10cm); @end verbatim This produces the output @verbatim 6 5 6 -3.204e-19 (1,1) 8 10 18 2.72789228047704 2.48046543129542 283.464008929116 @end verbatim @node Functions, Arrays, Implicit scaling, Programming @section Functions @cindex functions @menu * Default arguments:: Default values can appear anywhere * Named arguments:: Assigning function arguments by keyword * Rest arguments:: Functions with a variable number of arguments * Mathematical functions:: Standard libm functions @end menu @code{Asymptote} functions are treated as variables with a signature (non-function variables have null signatures). Variables with the same name are allowed, so long as they have distinct signatures. Functions arguments are passed by value. To pass an argument by reference, simply enclose it in a structure (@pxref{Structures}). Here are some significant features of @code{Asymptote} functions: @enumerate @item Variables with signatures (functions) and without signatures (nonfunction variables) are distinct: @verbatim int x, x(); x=5; x=new int() {return 17;}; x=x(); // calls x() and puts the result, 17, in the scalar x @end verbatim @item Traditional function definitions are allowed: @verbatim int sqr(int x) { return x*x; } sqr=null; // but the function is still just a variable. @end verbatim @item Casting can be used to resolve ambiguities: @verbatim int a, a(), b, b(); // Valid: creates four variables. a=b; // Invalid: assignment is ambiguous. a=(int) b; // Valid: resolves ambiguity. (int) (a=b); // Valid: resolves ambiguity. (int) a=b; // Invalid: cast expressions cannot be L-values. int c(); c=a; // Valid: only one possible assignment. @end verbatim @item Anonymous (so-called "high-order") functions are also allowed: @cindex @code{typedef} @verbatim typedef int intop(int); intop adder(int m) { return new int(int n) {return m+n;}; } intop addby7=adder(7); write(addby7(1)); // Writes 8. @end verbatim @item @cindex overloading functions One may redefine a function @code{f}, even for calls to @code{f} in previously declared functions, by assigning another (anonymous or named) function to it. However, if @code{f} is overloaded by a new function definition, previous calls will still access the original version of @code{f}, as illustrated in this example: @verbatim void f() { write("hi"); } void g() { f(); } g(); // writes "hi" f=new void() {write("bye");}; g(); // writes "bye" void f() {write("overloaded");}; f(); // writes "overloaded" g(); // writes "bye" @end verbatim @cindex function declarations @item Anonymous functions can be used to redefine a function variable that has been declared (and implicitly initialized to the null function) but not yet explicitly defined: @verbatim void f(bool b); void g(bool b) { if(b) f(b); else write(b); } f=new void(bool b) { write(b); g(false); }; g(true); // Writes true, then writes false. @end verbatim @end enumerate @code{Asymptote} is the only language we know of that treats functions as variables, but allows overloading by distinguishing variables based on their signatures. @cindex @code{libsigsegv} @cindex stack overflow @anchor{stack overflow} @cindex recursion @cindex stack overflow Functions are allowed to call themselves recursively. As in C++, infinite nested recursion will generate a stack overflow (reported as a segmentation fault, unless a fully working version of the @acronym{GNU} library @code{libsigsegv} (e.g.@ 2.4 or later) is installed at configuration time). @node Default arguments, Named arguments, Functions, Functions @subsection Default arguments @cindex default arguments @cindex arguments @code{Asymptote} supports a more flexible mechanism for default function arguments than C++: they may appear anywhere in the function prototype. Because certain data types are implicitly cast to more sophisticated types (@pxref{Casts}) one can often avoid ambiguities by ordering function arguments from the simplest to the most complicated. For example, given @verbatim real f(int a=1, real b=0) {return a+b;} @end verbatim @noindent then @code{f(1)} returns 1.0, but @code{f(1.0)} returns 2.0. The value of a default argument is determined by evaluating the given @code{Asymptote} expression in the scope where the called function is defined. @node Named arguments, Rest arguments, Default arguments, Functions @subsection Named arguments @cindex keywords @cindex named arguments It is sometimes difficult to remember the order in which arguments appear in a function declaration. Named (keyword) arguments make calling functions with multiple arguments easier. Unlike in the C and C++ languages, an assignment in a function argument is interpreted as an assignment to a parameter of the same name in the function signature, @emph{not within the local scope}. The command-line option @code{-d} may be used to check @code{Asymptote} code for cases where a named argument may be mistaken for a local assignment. When matching arguments to signatures, first all of the keywords are matched, then the arguments without names are matched against the unmatched formals as usual. For example, @verbatim int f(int x, int y) { return 10x+y; } write(f(4,x=3)); @end verbatim @noindent outputs 34, as @code{x} is already matched when we try to match the unnamed argument @code{4}, so it gets matched to the next item, @code{y}. For the rare occasions where it is desirable to assign a value to local variable within a function argument (generally @emph{not} a good programming practice), simply enclose the assignment in parentheses. For example, given the definition of @code{f} in the previous example, @verbatim int x; write(f(4,(x=3))); @end verbatim @noindent is equivalent to the statements @verbatim int x; x=3; write(f(4,3)); @end verbatim @noindent and outputs 43. @cindex @code{keyword} @cindex keyword-only Parameters can be specified as ``keyword-only'' by putting @code{keyword} immediately before the parameter name, as in @code{int f(int keyword x)} or @code{int f(int keyword x=77)}. This forces the caller of the function to use a named argument to give a value for this parameter. That is, @code{f(x=42)} is legal, but @code{f(25)} is not. Keyword-only parameters must be listed after normal parameters in a function definition. As a technical detail, we point out that, since variables of the same name but different signatures are allowed in the same scope, the code @verbatim int f(int x, int x()) { return x+x(); } int seven() {return 7;} @end verbatim @noindent is legal in @code{Asymptote}, with @code{f(2,seven)} returning 9. A named argument matches the first unmatched formal of the same name, so @code{f(x=2,x=seven)} is an equivalent call, but @code{f(x=seven,2)} is not, as the first argument is matched to the first formal, and @code{int ()} cannot be implicitly cast to @code{int}. Default arguments do not affect which formal a named argument is matched to, so if @code{f} were defined as @verbatim int f(int x=3, int x()) { return x+x(); } @end verbatim @noindent then @code{f(x=seven)} would be illegal, even though @code{f(seven)} obviously would be allowed. @node Rest arguments, Mathematical functions, Named arguments, Functions @subsection Rest arguments @cindex rest arguments Rest arguments allow one to write functions that take a variable number of arguments: @verbatim // This function sums its arguments. int sum(... int[] nums) { int total=0; for(int i=0; i < nums.length; ++i) total += nums[i]; return total; } sum(1,2,3,4); // returns 10 sum(); // returns 0 // This function subtracts subsequent arguments from the first. int subtract(int start ... int[] subs) { for(int i=0; i < subs.length; ++i) start -= subs[i]; return start; } subtract(10,1,2); // returns 7 subtract(10); // returns 10 subtract(); // illegal @end verbatim @cindex packing Putting an argument into a rest array is called @emph{packing}. One can give an explicit list of arguments for the rest argument, so @code{subtract} could alternatively be implemented as @verbatim int subtract(int start ... int[] subs) { return start - sum(... subs); } @end verbatim One can even combine normal arguments with rest arguments: @verbatim sum(1,2,3 ... new int[] {4,5,6}); // returns 21 @end verbatim @noindent @cindex unpacking This builds a new six-element array that is passed to @code{sum} as @code{nums}. The opposite operation, @emph{unpacking}, is not allowed: @verbatim subtract(... new int[] {10, 1, 2}); @end verbatim @noindent is illegal, as the start formal is not matched. If no arguments are packed, then a zero-length array (as opposed to @code{null}) is bound to the rest parameter. Note that default arguments are ignored for rest formals and the rest argument is not bound to a keyword. In some cases, keyword-only parameters are helpful to avoid arguments intended for the rest parameter to be assigned to other parameters. For example, here the use of @code{keyword} is to avoid @code{pnorm(1.0,2.0,0.3)} matching @code{1.0} to @code{p}. @verbatim real pnorm(real keyword p=2.0 ... real[] v) { return sum(v^p)^(1/p); } @end verbatim The overloading resolution in @code{Asymptote} is similar to the function matching rules used in C++. Every argument match is given a score. Exact matches score better than matches with casting, and matches with formals (regardless of casting) score better than packing an argument into the rest array. A candidate is maximal if all of the arguments score as well in it as with any other candidate. If there is one unique maximal candidate, it is chosen; otherwise, there is an ambiguity error. @verbatim int f(path g); int f(guide g); f((0,0)--(100,100)); // matches the second; the argument is a guide int g(int x, real y); int g(real x, int x); g(3,4); // ambiguous; the first candidate is better for the first argument, // but the second candidate is better for the second argument int h(... int[] rest); int h(real x ... int[] rest); h(1,2); // the second definition matches, even though there is a cast, // because casting is preferred over packing int i(int x ... int[] rest); int i(real x, real y ... int[] rest); i(3,4); // ambiguous; the first candidate is better for the first argument, // but the second candidate is better for the second one @end verbatim @node Mathematical functions, , Rest arguments, Functions @subsection Mathematical functions @cindex mathematical functions @cindex functions @cindex @code{libm} routines @cindex @code{sin} @cindex @code{cos} @cindex @code{tan} @cindex @code{asin} @cindex @code{acos} @cindex @code{atan} @cindex @code{exp} @cindex @code{log} @cindex @code{pow10} @cindex @code{log10} @cindex @code{sinh} @cindex @code{cosh} @cindex @code{tanh} @cindex @code{asinh} @cindex @code{acosh} @cindex @code{atanh} @cindex @code{sqrt} @cindex @code{cbrt} @cindex @code{fabs} @cindex @code{expm1} @cindex @code{log1p} @cindex @code{identity} @cindex @code{J} @cindex @code{Y} @cindex @code{gamma} @cindex @code{erf} @cindex @code{erfc} @cindex @code{atan2} @cindex @code{hypot} @cindex @code{fmod} @cindex @code{remainder} @code{Asymptote} has built-in versions of the standard @code{libm} mathematical real(real) functions @code{sin}, @code{cos}, @code{tan}, @code{asin}, @code{acos}, @code{atan}, @code{exp}, @code{log}, @code{pow10}, @code{log10}, @code{sinh}, @code{cosh}, @code{tanh}, @code{asinh}, @code{acosh}, @code{atanh}, @code{sqrt}, @code{cbrt}, @code{fabs}, @code{expm1}, @code{log1p}, as well as the identity function @code{identity}. @code{Asymptote} also defines the order @code{n} Bessel functions of the first kind @code{Jn(int n, real)} and second kind @code{Yn(int n, real)}, as well as the gamma function @code{gamma}, the error function @code{erf}, and the complementary error function @code{erfc}. The standard real(real, real) functions @code{atan2}, @code{hypot}, @code{fmod}, @code{remainder} are also included. @cindex @code{degrees} @cindex @code{radians} @cindex @code{Degrees} The functions @code{degrees(real radians)} and @code{radians(real degrees)} can be used to convert between radians and degrees. The function @code{Degrees(real radians)} returns the angle in degrees in the interval [0,360). @cindex @code{Sin} @cindex @code{Cos} @cindex @code{Tan} @cindex @code{aSin} @cindex @code{aCos} @cindex @code{aTan} For convenience, @code{Asymptote} defines variants @code{Sin}, @code{Cos}, @code{Tan}, @code{aSin}, @code{aCos}, and @code{aTan} of the standard trigonometric functions that use degrees rather than radians. We also define complex versions of the @code{sqrt}, @code{sin}, @code{cos}, @code{exp}, @code{log}, and @code{gamma} functions. @cindex @code{floor} @cindex @code{ceil} @cindex @code{round} @cindex @code{sgn} The functions @code{floor}, @code{ceil}, and @code{round} differ from their usual definitions in that they all return an int value rather than a real (since that is normally what one wants). The functions @code{Floor}, @code{Ceil}, and @code{Round} are respectively similar, except that if the result cannot be converted to a valid int, they return @code{intMax} for positive arguments and @code{intMin} for negative arguments, rather than generating an integer overflow. We also define a function @code{sgn}, which returns the sign of its real argument as an integer (-1, 0, or 1). @cindex @code{abs} There is an @code{abs(int)} function, as well as an @code{abs(real)} function (equivalent to @code{fabs(real)}), an @code{abs(pair)} function (equivalent to @code{length(pair)}). @cindex @code{srand} @cindex @code{rand} @cindex @code{randMax} @cindex @code{unitrand} @cindex @code{Gaussrand} @cindex @code{histogram} @cindex @code{factorial} @cindex @code{choose} Random numbers can be seeded with @code{srand(int)} and generated with the @code{int rand()} function, which returns a random integer between 0 and the integer @code{randMax}. The @code{unitrand()} function returns a random number uniformly distributed in the interval [0,1]. A Gaussian random number generator @code{Gaussrand} and a collection of statistics routines, including @code{histogram}, are provided in the base file @code{@uref{http://asymptote.sourceforge.net/gallery/stats.pdf,,stats}@uref{http://asymptote.sourceforge.net/gallery/stats.asy,,.asy}}. The functions @code{factorial(int n)}, which returns @math{n!}, and @code{choose(int n, int k)}, which returns @math{n!/(k!(n-k)!)}, are also defined. @cindex @acronym{GNU} Scientific Library @cindex @code{gsl} @cindex Airy @cindex Bessel @cindex Legendre @cindex elliptic functions @cindex exponential integral @cindex trigonometric integrals @cindex Riemann zeta function @cindex @code{Ai} @cindex @code{Bi} @cindex @code{Ai_deriv} @cindex @code{Bi_deriv} @cindex @code{zero_Ai} @cindex @code{zero_Bi} @cindex @code{zero_Ai_deriv} @cindex @code{zero_Bi_deriv} @cindex @code{J} @cindex @code{Y} @cindex @code{I} @cindex @code{K} @cindex @code{i_scaled} @cindex @code{k_scaled} @cindex @code{zero_J} @cindex @code{F} @cindex @code{E} @cindex @code{P} @cindex @code{sncndn} @cindex @code{Ei} @cindex @code{Si} @cindex @code{Ci} @cindex @code{Pl} @cindex @code{zeta} When configured with the @acronym{GNU} Scientific Library (GSL), available from @url{http://www.gnu.org/software/gsl/}, @code{Asymptote} contains an internal module @code{gsl} that defines the airy functions @code{Ai(real)}, @code{Bi(real)}, @code{Ai_deriv(real)}, @code{Bi_deriv(real)}, @code{zero_Ai(int)}, @code{zero_Bi(int)}, @code{zero_Ai_deriv(int)}, @code{zero_Bi_deriv(int)}, the Bessel functions @code{I(int, real)}, @code{K(int, real)}, @code{j(int, real)}, @code{y(int, real)}, @code{i_scaled(int, real)}, @code{k_scaled(int, real)}, @code{J(real, real)}, @code{Y(real, real)}, @code{I(real, real)}, @code{K(real, real)}, @code{zero_J(real, int)}, the elliptic functions @code{F(real, real)}, @code{E(real, real)}, and @code{P(real, real)}, the Jacobi elliptic functions @code{real[] sncndn(real,real)}, the exponential/trigonometric integrals @code{Ei}, @code{Si}, and @code{Ci}, the Legendre polynomials @code{Pl(int, real)}, and the Riemann zeta function @code{zeta(real)}. For example, to compute the sine integral @code{Si} of 1.0: @verbatim import gsl; write(Si(1.0)); @end verbatim @code{Asymptote} also provides a few general purpose numerical routines: @table @code @cindex @code{newton} @item @code{real newton(int iterations=100, real f(real), real fprime(real), real x, bool verbose=false);} Use Newton-Raphson iteration to solve for a root of a real-valued differentiable function @code{f}, given its derivative @code{fprime} and an initial guess @code{x}. Diagnostics for each iteration are printed if @code{verbose=true}. If the iteration fails after the maximum allowed number of loops (@code{iterations}), @code{realMax} is returned. @cindex @code{newton} @item @code{real newton(int iterations=100, real f(real), real fprime(real), real x1, real x2, bool verbose=false);} Use bracketed Newton-Raphson bisection to solve for a root of a real-valued differentiable function @code{f} within an interval [@code{x1},@code{x2}] (on which the endpoint values of @code{f} have opposite signs), given its derivative @code{fprime}. Diagnostics for each iteration are printed if @code{verbose=true}. If the iteration fails after the maximum allowed number of loops (@code{iterations}), @code{realMax} is returned. @cindex @code{simpson} @item @code{real simpson(real f(real), real a, real b, real acc=realEpsilon, real dxmax=b-a)} returns the integral of @code{f} from @code{a} to @code{b} using adaptive Simpson integration. @end table @node Arrays, Casts, Functions, Programming @section Arrays @cindex arrays @menu * Slices:: Python-style array slices @end menu Appending @code{[]} to a built-in or user-defined type yields an array. The array element @code{i} of an array @code{A} can be accessed as @code{A[i]}. By default, attempts to access or assign to an array element using a negative index generates an error. Reading an array element with an index beyond the length of the array also generates an error; however, assignment to an element beyond the length of the array causes the array to be resized to accommodate the new element. One can also index an array @code{A} with an integer array @code{B}: the array @code{A[B]} is formed by indexing array @code{A} with successive elements of array @code{B}. A convenient Java-style shorthand exists for iterating over all elements of an array; see @ref{array iteration}. The declaration @verbatim real[] A; @end verbatim @noindent initializes @code{A} to be an empty (zero-length) array. Empty arrays should be distinguished from null arrays. If we say @verbatim real[] A=null; @end verbatim @noindent then @code{A} cannot be dereferenced at all (null arrays have no length and cannot be read from or assigned to). Arrays can be explicitly initialized like this: @verbatim real[] A={0,1,2}; @end verbatim Array assignment in @code{Asymptote} does a shallow copy: only the pointer is copied (if one copy if modified, the other will be too). The @code{copy} function listed below provides a deep copy of an array. @cindex @code{length} @cindex @code{cyclic} @cindex @code{keys} @cindex @code{push} @cindex @code{append} @cindex @code{pop} @cindex @code{insert} @cindex @code{delete} @cindex @code{initialized} Every array @code{A} of type @code{T[]} has the virtual members @itemize @item @code{int length}, @item @code{int cyclic}, @item @code{int[] keys}, @item @code{T push(T x)}, @item @code{void append(T[] a)}, @item @code{T pop()}, @item @code{void insert(int i ... T[] x)}, @item @code{void delete(int i, int j=i)}, @item @code{void delete()}, and @item @code{bool initialized(int n)}. @end itemize The member @code{A.length} evaluates to the length of the array. Setting @code{A.cyclic=true} signifies that array indices should be reduced modulo the current array length. Reading from or writing to a nonempty cyclic array never leads to out-of-bounds errors or array resizing. The member @code{A.keys} evaluates to an array of integers containing the indices of initialized entries in the array in ascending order. Hence, for an array of length @code{n} with all entries initialized, @code{A.keys} evaluates to @code{@{0,1,...,n-1@}}. A new keys array is produced each time @code{A.keys} is evaluated. The functions @code{A.push} and @code{A.append} append their arguments onto the end of the array, while @code{A.insert(int i ... T[] x)} inserts @code{x} into the array at index @code{i}. For convenience @code{A.push} returns the pushed item. The function @code{A.pop()} pops and returns the last element, while @code{A.delete(int i, int j=i)} deletes elements with indices in the range [@code{i},@code{j}], shifting the position of all higher-indexed elements down. If no arguments are given, @code{A.delete()} provides a convenient way of deleting all elements of @code{A}. The routine @code{A.initialized(int n)} can be used to examine whether the element at index @code{n} is initialized. Like all @code{Asymptote} functions, @code{push}, @code{append}, @code{pop}, @code{insert}, @code{delete}, and @code{initialized} can be "pulled off" of the array and used on their own. For example, @verbatim int[] A={1}; A.push(2); // A now contains {1,2}. A.append(A); // A now contains {1,2,1,2}. int f(int)=A.push; f(3); // A now contains {1,2,1,2,3}. int g()=A.pop; write(g()); // Outputs 3. A.delete(0); // A now contains {2,1,2}. A.delete(0,1); // A now contains {2}. A.insert(1,3); // A now contains {2,3}. A.insert(1 ... A); // A now contains {2,2,3,3} A.insert(2,4,5); // A now contains {2,2,4,5,3,3}. @end verbatim The @code{[]} suffix can also appear after the variable name; this is sometimes convenient for declaring a list of variables and arrays of the same type: @verbatim real a,A[]; @end verbatim @noindent This declares @code{a} to be @code{real} and implicitly declares @code{A} to be of type @code{real[]}. In the following list of built-in array functions, @code{T} represents a generic type. Note that the internal functions @code{alias}, @code{array}, @code{copy}, @code{concat}, @code{sequence}, @code{map}, and @code{transpose}, which depend on type @code{T[]}, are defined only after the first declaration of a variable of type @code{T[]}. @table @code @cindex @code{new} @item new T[] returns a new empty array of type @code{T[]}; @cindex @code{new} @item new T[] @{list@} returns a new array of type @code{T[]} initialized with @code{list} (a comma delimited list of elements). @item new T[n] returns a new array of @code{n} elements of type @code{T[]}. These @code{n} array elements are not initialized unless they are arrays themselves (in which case they are each initialized to empty arrays). @cindex @code{array} @item T[] array(int n, T value, int depth=intMax) returns an array consisting of @code{n} copies of @code{value}. If @code{value} is itself an array, a deep copy of @code{value} is made for each entry. If @code{depth} is specified, this deep copying only recurses to the specified number of levels. @cindex @code{sequence} @item int[] sequence(int n) if @code{n >= 1} returns the array @code{@{0,1,...,n-1@}} (otherwise returns a null array); @item int[] sequence(int n, int m) if @code{m >= n} returns an array @code{@{n,n+1,...,m@}} (otherwise returns a null array); @item T[] sequence(T f(int), int n) if @code{n >= 1} returns the sequence @code{@{f_i :i=0,1,...n-1@}} given a function @code{T f(int)} and integer @code{int n} (otherwise returns a null array); @cindex @code{map} @item T[] map(T f(T), T[] a) returns the array obtained by applying the function @code{f} to each element of the array @code{a}. This is equivalent to @code{sequence(new T(int i) @{return f(a[i]);@},a.length)}. @cindex @code{reverse} @item int[] reverse(int n) if @code{n >= 1} returns the array @code{@{n-1,n-2,...,0@}} (otherwise returns a null array); @cindex @code{complement} @item int[] complement(int[] a, int n) returns the complement of the integer array @code{a} in @code{@{0,1,2,...,n-1@}}, so that @code{b[complement(a,b.length)]} yields the complement of @code{b[a]}. @cindex @code{uniform} @item real[] uniform(real a, real b, int n) if @code{n >= 1} returns a uniform partition of @code{[a,b]} into @code{n} subintervals (otherwise returns a null array); @cindex @code{find} @item int find(bool[], int n=1) returns the index of the @code{n}th @code{true} value or -1 if not found. If @code{n} is negative, search backwards from the end of the array for the @code{-n}th value; @cindex @code{search} @item int search(T[] a, T key) For built-in ordered types @code{T}, searches a sorted array @code{a} of @code{n} elements for k, returning the index @code{i} if @code{a[i] <= key < a[i+1]}, @code{-1} if @code{key} is less than all elements of @code{a}, or @code{n-1} if @code{key} is greater than or equal to the last element of @code{a}. @cindex @code{search} @item int search(T[] a, T key, bool less(T i, T j)) searches an array @code{a} sorted in ascending order such that element @code{i} precedes element @code{j} if @code{less(i,j)} is true; @cindex @code{copy} @item T[] copy(T[] a) returns a deep copy of the array @code{a}; @cindex @code{concat} @item T[] concat(... T[][] a) returns a new array formed by concatenating the given one-dimensional arrays given as arguments; @cindex @code{alias} @item bool alias(T[] a, T[] b) returns @code{true} if the arrays @code{a} and @code{b} are identical; @cindex @code{sort} @item T[] sort(T[] a) For built-in ordered types @code{T}, returns a copy of @code{a} sorted in ascending order; @cindex @code{sort} @anchor{sort} @item T[][] sort(T[][] a) For built-in ordered types @code{T}, returns a copy of @code{a} with the rows sorted by the first column, breaking ties with successively higher columns. For example: @verbatim string[][] a={{"bob","9"},{"alice","5"},{"pete","7"}, {"alice","4"}}; // Row sort (by column 0, using column 1 to break ties): write(sort(a)); @end verbatim produces @verbatim alice 4 alice 5 bob 9 pete 7 @end verbatim @cindex @code{sort} @item T[] sort(T[] a, bool less(T i, T j)) returns a copy of @code{a} stably sorted in ascending order such that element @code{i} precedes element @code{j} if @code{less(i,j)} is true. @cindex @code{transpose} @item T[][] transpose(T[][] a) returns the transpose of @code{a}. @cindex @code{transpose} @item T[][][] transpose(T[][][] a, int[] perm) returns the 3D transpose of @code{a} obtained by applying the permutation @code{perm} of @code{new int[]@{0,1,2@}} to the indices of each entry. @cindex @code{sum} @item T sum(T[] a) For arithmetic types @code{T}, returns the sum of @code{a}. In the case where @code{T} is @code{bool}, the number of true elements in @code{a} is returned. @cindex @code{min} @item T min(T[] a) @item T min(T[][] a) @item T min(T[][][] a) For built-in ordered types @code{T}, returns the minimum element of @code{a}. @cindex @code{max} @item T max(T[] a) @item T max(T[][] a) @item T max(T[][][] a) For built-in ordered types @code{T}, returns the maximum element of @code{a}. @cindex @code{min} @item T[] min(T[] a, T[] b) For built-in ordered types @code{T}, and arrays @code{a} and @code{b} of the same length, returns an array composed of the minimum of the corresponding elements of @code{a} and @code{b}. @cindex @code{max} @item T[] max(T[] a, T[] b) For built-in ordered types @code{T}, and arrays @code{a} and @code{b} of the same length, returns an array composed of the maximum of the corresponding elements of @code{a} and @code{b}. @cindex @code{pairs} @item pair[] pairs(real[] x, real[] y); For arrays @code{x} and @code{y} of the same length, returns the pair array @code{sequence(new pair(int i) @{return (x[i],y[i]);@},x.length)}. @cindex @code{fft} @item pair[] fft(pair[] a, int sign=1) returns the unnormalized Fast Fourier Transform of @code{a} (if the optional @code{FFTW} package is installed), using the given @code{sign}. Here is a simple example: @verbatim int n=4; pair[] f=sequence(n); write(f); pair[] g=fft(f,-1); write(); write(g); f=fft(g,1); write(); write(f/n); @end verbatim @cindex @code{dot} @item real dot(real[] a, real[] b) returns the dot product of the vectors @code{a} and @code{b}. @cindex @code{dot} @item pair dot(pair[] a, pair[] b) returns the complex dot product @code{sum(a*conj(b))} of the vectors @code{a} and @code{b}. @anchor{tridiagonal} @cindex @code{tridiagonal} @item real[] tridiagonal(real[] a, real[] b, real[] c, real[] f); Solve the periodic tridiagonal problem @math{L@code{x}=@code{f}} and return the solution @code{x}, where @code{f} is an @math{n} vector and @math{L} is the @math{n \times n} matrix @verbatim [ b[0] c[0] a[0] ] [ a[1] b[1] c[1] ] [ a[2] b[2] c[2] ] [ ... ] [ c[n-1] a[n-1] b[n-1] ] @end verbatim For Dirichlet boundary conditions (denoted here by @code{u[-1]} and @code{u[n]}), replace @code{f[0]} by @code{f[0]-a[0]u[-1]} and @code{f[n-1]-c[n-1]u[n]}; then set @code{a[0]=c[n-1]=0}. @cindex @code{solve} @item real[] solve(real[][] a, real[] b, bool warn=true) Solve the linear equation @math{@code{a}x=@code{b}} by LU decomposition and return the solution @math{x}, where @code{a} is an @math{n \times n} matrix and @code{b} is an array of length @math{n}. For example: @verbatim import math; real[][] a={{1,-2,3,0},{4,-5,6,2},{-7,-8,10,5},{1,50,1,-2}}; real[] b={7,19,33,3}; real[] x=solve(a,b); write(a); write(); write(b); write(); write(x); write(); write(a*x); @end verbatim If @code{a} is a singular matrix and @code{warn} is @code{false}, return an empty array. If the matrix @code{a} is tridiagonal, the routine @code{tridiagonal} provides a more efficient algorithm (@pxref{tridiagonal}). @anchor{solve} @cindex @code{solve} @item real[][] solve(real[][] a, real[][] b, bool warn=true) Solve the linear equation @math{@code{a}x=@code{b}} and return the solution @math{x}, where @code{a} is an @math{n \times n} matrix and @code{b} is an @math{n \times m} matrix. If @code{a} is a singular matrix and @code{warn} is @code{false}, return an empty matrix. @cindex @code{identity} @item real[][] identity(int n); returns the @math{n \times n} identity matrix. @cindex @code{diagonal} @item real[][] diagonal(... real[] a) returns the diagonal matrix with diagonal entries given by a. @cindex @code{inverse} @item real[][] inverse(real[][] a) returns the inverse of a square matrix @code{a}. @cindex @code{quadraticroots} @item @code{real[] quadraticroots(real a, real b, real c);} This numerically robust solver returns the real roots of the quadratic equation @math{ax^2+bx+c=0}, in ascending order. Multiple roots are listed separately. @cindex @code{quadraticroots} @item @code{pair[] quadraticroots(explicit pair a, explicit pair b, explicit pair c);} This numerically robust solver returns the complex roots of the quadratic equation @math{ax^2+bx+c=0}. @cindex @code{cubicroots} @item @code{real[] cubicroots(real a, real b, real c, real d);} This numerically robust solver returns the real roots of the cubic equation @math{ax^3+bx^2+cx+d=0}. Multiple roots are listed separately. @end table @cindex vectorization @code{Asymptote} includes a full set of vectorized array instructions for arithmetic (including self) and logical operations. These element-by-element instructions are implemented in C++ code for speed. Given @verbatim real[] a={1,2}; real[] b={3,2}; @end verbatim @noindent then @code{a == b} and @code{a >= 2} both evaluate to the vector @code{@{false, true@}}. @cindex @code{all} To test whether all components of @code{a} and @code{b} agree, use the boolean function @code{all(a == b)}. One can also use conditionals like @code{(a >= 2) ? a : b}, which returns the array @code{@{3,2@}}, or @code{write((a >= 2) ? a : null}, which returns the array @code{@{2@}}. All of the standard built-in @code{libm} functions of signature @code{real(real)} also take a real array as an argument, effectively like an implicit call to @code{map}. As with other built-in types, arrays of the basic data types can be read in by assignment. In this example, the code @verbatim file fin=input("test.txt"); real[] A=fin; @end verbatim @cindex @code{eof} @cindex @code{eol} @cindex @code{line} @cindex line mode @noindent reads real values into @code{A} until the end-of-file is reached (or an I/O error occurs). The virtual members @code{dimension}, @code{line}, @code{csv}, @code{word}, and @code{read} of a file are useful for reading arrays. @cindex @code{line} For example, if line mode is set with @code{file line(bool b=true)}, then reading will stop once the end of the line is reached instead: @verbatim file fin=input("test.txt"); real[] A=fin.line(); @end verbatim @cindex reading string arrays @cindex @code{word} @cindex white-space string delimiter mode Since string reads by default read up to the end of line anyway, line mode normally has no effect on string array reads. However, there is a white-space delimiter mode for reading strings, @code{file word(bool b=true)}, which causes string reads to respect white-space delimiters, instead of the default end-of-line delimiter: @verbatim file fin=input("test.txt").line().word(); real[] A=fin; @end verbatim @cindex @code{csv} @cindex comma-separated-value mode Another useful mode is comma-separated-value mode, @code{file csv(bool b=true)}, which causes reads to respect comma delimiters: @verbatim file fin=csv(input("test.txt")); real[] A=fin; @end verbatim @cindex @code{dimension} To restrict the number of values read, use the @code{file dimension(int)} function: @verbatim file fin=input("test.txt"); real[] A=dimension(fin,10); @end verbatim This reads 10 values into A, unless end-of-file (or end-of-line in line mode) occurs first. Attempting to read beyond the end of the file will produce a runtime error message. Specifying a value of 0 for the integer limit is equivalent to the previous example of reading until end-of-file (or end-of-line in line mode) is encountered. Two- and three-dimensional arrays of the basic data types can be read in like this: @verbatim file fin=input("test.txt"); real[][] A=fin.dimension(2,3); real[][][] B=fin.dimension(2,3,4); @end verbatim @noindent @cindex @code{read} Sometimes the array dimensions are stored with the data as integer fields at the beginning of an array. Such 1, 2, or 3 dimensional arrays can be read in with the virtual member functions @code{read(1)}, @code{read(2)}, or @code{read(3)}, respectively: @verbatim file fin=input("test.txt"); real[] A=fin.read(1); real[][] B=fin.read(2); real[][][] C=fin.read(3); @end verbatim @cindex @code{write} One, two, and three-dimensional arrays of the basic data types can be output with the functions @code{write(file,T[])}, @code{write(file,T[][])}, @code{write(file,T[][][])}, respectively. @node Slices, , Arrays, Arrays @subsection Slices @cindex slices Asymptote allows a section of an array to be addressed as a slice using a Python-like syntax. If @code{A} is an array, the expression @code{A[m:n]} returns a new array consisting of the elements of @code{A} with indices from @code{m} up to but not including @code{n}. For example, @verbatim int[] x={0,1,2,3,4,5,6,7,8,9}; int[] y=x[2:6]; // y={2,3,4,5}; int[] z=x[5:10]; // z={5,6,7,8,9}; @end verbatim If the left index is omitted, it is taken be @code{0}. If the right index is omitted it is taken to be the length of the array. If both are omitted, the slice then goes from the start of the array to the end, producing a non-cyclic deep copy of the array. For example: @verbatim int[] x={0,1,2,3,4,5,6,7,8,9}; int[] y=x[:4]; // y={0,1,2,3} int[] z=x[5:]; // z={5,6,7,8,9} int[] w=x[:]; // w={0,1,2,3,4,5,6,7,8,9}, distinct from array x. @end verbatim If A is a non-cyclic array, it is illegal to use negative values for either of the indices. If the indices exceed the length of the array, however, they are politely truncated to that length. For cyclic arrays, the slice @code{A[m:n]} still consists of the cells with indices in the set [@code{m},@code{n}), but now negative values and values beyond the length of the array are allowed. The indices simply wrap around. For example: @verbatim int[] x={0,1,2,3,4,5,6,7,8,9}; x.cyclic=true; int[] y=x[8:15]; // y={8,9,0,1,2,3,4}. int[] z=x[-5:5]; // z={5,6,7,8,9,0,1,2,3,4} int[] w=x[-3:17]; // w={7,8,9,0,1,2,3,4,5,6,7,8,9,0,1,2,3,4,5,6} @end verbatim Notice that with cyclic arrays, it is possible to include the same element of the original array multiple times within a slice. Regardless of the original array, arrays produced by slices are always non-cyclic. If the left and right indices of a slice are the same, the result is an empty array. If the array being sliced is empty, the result is an empty array. Any slice with a left index greater than its right index will yield an error. Slices can also be assigned to, changing the value of the original array. If the array being assigned to the slice has a different length than the slice itself, elements will be inserted or removed from the array to accommodate it. For instance: @verbatim string[] toppings={"mayo", "salt", "ham", "lettuce"}; toppings[0:2]=new string[] {"mustard", "pepper"}; // Now toppings={"mustard", "pepper", "ham", "lettuce"} toppings[2:3]=new string[] {"turkey", "bacon" }; // Now toppings={"mustard", "pepper", "turkey", "bacon", "lettuce"} toppings[0:3]=new string[] {"tomato"}; // Now toppings={"tomato", "bacon", "lettuce"} @end verbatim If an array is assigned to a slice of itself, a copy of the original array is assigned to the slice. That is, code such as @code{x[m:n]=x} is equivalent to @code{x[m:n]=copy(x)}. One can use the shorthand @code{x[m:m]=y} to insert the contents of the array @code{y} into the array @code{x} starting at the location just before @code{x[m]}. For a cyclic array, a slice is bridging if it addresses cells up to the end of the array and then continues on to address cells at the start of the array. For instance, if @code{A} is a cyclic array of length 10, @code{A[8:12]}, @code{A[-3:1]}, and @code{A[5:25]} are bridging slices whereas @code{A[3:7]}, @code{A[7:10]}, @code{A[-3:0]} and @code{A[103:107]} are not. Bridging slices can only be assigned to if the number of elements in the slice is exactly equal to the number of elements we are assigning to it. Otherwise, there is no clear way to decide which of the new entries should be @code{A[0]} and an error is reported. Non-bridging slices may be assigned an array of any length. For a cyclic array @code{A} an expression of the form @code{A[A.length:A.length]} is equivalent to the expression @code{A[0:0]} and so assigning to this slice will insert values at the start of the array. @code{A.append()} can be used to insert values at the end of the array. It is illegal to assign to a slice of a cyclic array that repeats any of the cells. @node Casts, Import, Arrays, Programming @section Casts @cindex casts @cindex implicit casts @cindex @code{explicit} @code{Asymptote} implicitly casts @code{int} to @code{real}, @code{int} to @code{pair}, @code{real} to @code{pair}, @code{pair} to @code{path}, @code{pair} to @code{guide}, @code{path} to @code{guide}, @code{guide} to @code{path}, @code{real} to @code{pen}, @code{pair[]} to @code{guide[]}, @code{pair[]} to @code{path[]}, @code{path} to @code{path[]}, and @code{guide} to @code{path[]}, along with various three-dimensional casts defined in @code{@uref{http://asymptote.sourceforge.net/gallery/three.pdf,,three}@uref{http://asymptote.sourceforge.net/gallery/three.asy,,.asy}}. Implicit casts are automatically attempted on assignment and when trying to match function calls with possible function signatures. Implicit casting can be inhibited by declaring individual arguments @code{explicit} in the function signature, say to avoid an ambiguous function call in the following example, which outputs 0: @verbatim int f(pair a) {return 0;} int f(explicit real x) {return 1;} write(f(0)); @end verbatim @cindex explicit casts Other conversions, say @code{real} to @code{int} or @code{real} to @code{string}, require an explicit cast: @verbatim int i=(int) 2.5; string s=(string) 2.5; real[] a={2.5,-3.5}; int[] b=(int []) a; write(stdout,b); // Outputs 2,-3 @end verbatim In situations where casting from a string to a type @code{T} fails, an uninitialized variable is returned; this condition can be detected with the function @code{bool initialized(T);} @verbatim int i=(int) "2.5"; assert(initialized(i),"Invalid cast."); real x=(real) "2.5a"; assert(initialized(x),"Invalid cast."); @end verbatim @cindex @code{operator cast} Casting to user-defined types is also possible using @code{operator cast}: @verbatim struct rpair { real radius; real angle; } pair operator cast(rpair x) { return (x.radius*cos(x.angle),x.radius*sin(x.angle)); } rpair x; x.radius=1; x.angle=pi/6; write(x); // Outputs (0.866025403784439,0.5) @end verbatim One must use care when defining new cast operators. Suppose that in some code one wants all integers to represent multiples of 100. To convert them to reals, one would first want to multiply them by 100. However, the straightforward implementation @verbatim real operator cast(int x) {return x*100;} @end verbatim @noindent is equivalent to an infinite recursion, since the result @code{x*100} needs itself to be cast from an integer to a real. Instead, we want to use the standard conversion of int to real: @verbatim real convert(int x) {return x*100;} real operator cast(int x)=convert; @end verbatim @cindex @code{operator ecast} Explicit casts are implemented similarly, with @code{operator ecast}. @node Import, Static, Casts, Programming @section Import @cindex @code{access} While @code{Asymptote} provides many features by default, some applications require specialized features contained in external @code{Asymptote} modules. For instance, the lines @verbatim access graph; graph.axes(); @end verbatim @noindent draw @math{x} and @math{y} axes on a two-dimensional graph. Here, the command looks up the module under the name @code{graph} in a global dictionary of modules and puts it in a new variable named @code{graph}. The module is a structure, and we can refer to its fields as we usually would with a structure. @cindex @code{from} Often, one wants to use module functions without having to specify the module name. The code @verbatim from graph access axes; @end verbatim @noindent adds the @code{axes} field of @code{graph} into the local name space, so that subsequently, one can just write @code{axes()}. If the given name is overloaded, all types and variables of that name are added. To add more than one name, just use a comma-separated list: @verbatim from graph access axes, xaxis, yaxis; @end verbatim @noindent Wild card notation can be used to add all non-private fields and types of a module to the local name space: @verbatim from graph access *; @end verbatim @cindex @code{unravel} Similarly, one can add the non-private fields and types of a structure to the local environment with the @code{unravel} keyword: @verbatim struct matrix { real a,b,c,d; } real det(matrix m) { unravel m; return a*d-b*c; } @end verbatim Alternatively, one can unravel selective fields: @verbatim real det(matrix m) { from m unravel a,b,c as C,d; return a*d-b*C; } @end verbatim @cindex @code{import} The command @verbatim import graph; @end verbatim is a convenient abbreviation for the commands @verbatim access graph; unravel graph; @end verbatim That is, @code{import graph} first loads a module into a structure called @code{graph} and then adds its non-private fields and types to the local environment. This way, if a member variable (or function) is overwritten with a local variable (or function of the same signature), the original one can still be accessed by qualifying it with the module name. Wild card importing will work fine in most cases, but one does not usually know all of the internal types and variables of a module, which can also change as the module writer adds or changes features of the module. As such, it is prudent to add @code{import} commands at the start of an @code{Asymptote} file, so that imported names won't shadow locally defined functions. Still, imported names may shadow other imported names, depending on the order in which they were imported, and imported functions may cause overloading resolution problems if they have the same name as local functions defined later. @cindex @code{as} To rename modules or fields when adding them to the local environment, use @code{as}: @verbatim access graph as graph2d; from graph access xaxis as xline, yaxis as yline; @end verbatim The command @verbatim import graph as graph2d; @end verbatim is a convenient abbreviation for the commands @verbatim access graph as graph2d; unravel graph2d; @end verbatim Except for a few built-in modules, such as @code{settings}, all modules are implemented as @code{Asymptote} files. When looking up a module that has not yet been loaded, @code{Asymptote} searches the standard search paths (@pxref{Search paths}) for the matching file. The file corresponding to that name is read and the code within it is interpreted as the body of a structure defining the module. If the file name contains nonalphanumeric characters, enclose it with quotation marks: @noindent @code{access "@value{Datadir}/asymptote/graph.asy" as graph;} @noindent @code{from "@value{Datadir}/asymptote/graph.asy" access axes;} @noindent @code{import "@value{Datadir}/asymptote/graph.asy" as graph;} It is an error if modules import themselves (or each other in a cycle). The module name to be imported must be known at compile time. @cindex runtime imports @cindex @code{eval} However, you can import an @code{Asymptote} module determined by the string @code{s} at runtime like this: @verbatim eval("import "+s,true); @end verbatim @cindex @code{asy} To conditionally execute an array of asy files, use @verbatim void asy(string format, bool overwrite ... string[] s); @end verbatim The file will only be processed, using output format @code{format}, if overwrite is @code{true} or the output file is missing. One can evaluate an @code{Asymptote} expression (without any return value, however) contained in the string @code{s} with: @cindex @code{eval} @verbatim void eval(string s, bool embedded=false); @end verbatim It is not necessary to terminate the string @code{s} with a semicolon. If @code{embedded} is @code{true}, the string will be evaluated at the top level of the current environment. If @code{embedded} is @code{false} (the default), the string will be evaluated in an independent environment, sharing the same @code{settings} module (@pxref{settings}). @cindex @code{quote} One can evaluate arbitrary @code{Asymptote} code (which may contain unescaped quotation marks) with the command @verbatim void eval(code s, bool embedded=false); @end verbatim Here @code{code} is a special type used with @code{quote @{@}} to enclose @code{Asymptote code} like this: @verbatim real a=1; code s=quote { write(a); }; eval(s,true); // Outputs 1 @end verbatim @cindex @code{include} To include the contents of an existing file @code{graph} verbatim (as if the contents of the file were inserted at that point), use one of the forms: @verbatim include graph; @end verbatim @noindent @code{include "@value{Datadir}/asymptote/graph.asy";} To list all global functions and variables defined in a module named by the contents of the string @code{s}, use the function @verbatim void list(string s, bool imports=false); @end verbatim @noindent Imported global functions and variables are also listed if @code{imports} is @code{true}. @node Static, , Import, Programming @section Static @cindex @code{static} Static qualifiers allocate the memory address of a variable in a higher enclosing level. For a function body, the variable is allocated in the block where the function is defined; so in the code @verbatim struct s { int count() { static int c=0; ++c; return c; } } @end verbatim @noindent there is one instance of the variable @code{c} for each object @code{s} (as opposed to each call of @code{count}). Similarly, in @verbatim int factorial(int n) { int helper(int k) { static int x=1; x *= k; return k == 1 ? x : helper(k-1); } return helper(n); } @end verbatim @noindent there is one instance of @code{x} for every call to @code{factorial} (and not for every call to @code{helper}), so this is a correct, but ugly, implementation of factorial. Similarly, a static variable declared within a structure is allocated in the block where the structure is defined. Thus, @verbatim struct A { struct B { static pair z; } } @end verbatim @noindent creates one object @code{z} for each object of type @code{A} created. In this example, @verbatim int pow(int n, int k) { struct A { static int x=1; void helper() { x *= n; } } for(int i=0; i < k; ++i) { A a; a.helper(); } return A.x; } @end verbatim @noindent there is one instance of @code{x} for each call to @code{pow}, so this is an ugly implementation of exponentiation. Loop constructs allocate a new frame in every iteration. This is so that higher-order functions can refer to variables of a specific iteration of a loop: @verbatim void f(); for(int i=0; i < 10; ++i) { int x=i; if(x==5) { f=new void () { write(x); } } } f(); @end verbatim Here, every iteration of the loop has its own variable @code{x}, so @code{f()} will write @code{5}. If a variable in a loop is declared static, it will be allocated where the enclosing function or structure was defined (just as if it were declared static outside of the loop). For instance, in: @verbatim void f() { static int x; for(int i=0; i < 10; ++i) { static int y; } } @end verbatim @noindent both @code{x} and @code{y} will be allocated in the same place, which is also where @code{f} is also allocated. Statements may also be declared static, in which case they are run at the place where the enclosing function or structure is defined. Declarations or statements not enclosed in a function or structure definition are already at the top level, so static modifiers are meaningless. A warning is given in such a case. Since structures can have static fields, it is not always clear for a qualified name whether the qualifier is a variable or a type. For instance, in: @verbatim struct A { static int x; } pair A; int y=A.x; @end verbatim @noindent does the @code{A} in @code{A.x} refer to the structure or to the pair variable. It is the convention in Asymptote that, if there is a non-function variable with the same name as the qualifier, the qualifier refers to that variable, and not to the type. This is regardless of what fields the variable actually possesses. @node LaTeX usage, Base modules, Programming, Top @chapter @code{LaTeX} usage @cindex @code{LaTeX} usage @cindex @code{asymptote.sty} @code{Asymptote} comes with a convenient @code{LaTeX} style file @code{asymptote.sty} (v1.33 or later required) that makes @code{LaTeX} @code{Asymptote}-aware. Entering @code{Asymptote} code directly into the @code{LaTeX} source file, at the point where it is needed, keeps figures organized and avoids the need to invent new file names for each figure. Simply add the line @code{\usepackage@{asymptote@}} at the beginning of your file and enclose your @code{Asymptote} code within a @code{\begin@{asy@}...\end@{asy@}} environment. As with the @code{LaTeX} @code{comment} environment, the @code{\end@{asy@}} command must appear on a line by itself, with no trailing commands/comments. A blank line is not allowed after @code{\begin@{asy@}}. The sample @code{LaTeX} file below, named @code{latexusage.tex}, can be run as follows: @verbatim latex latexusage asy latexusage-*.asy latex latexusage @end verbatim @noindent or @verbatim pdflatex latexusage asy latexusage-*.asy pdflatex latexusage @end verbatim @noindent To switch between using inline Asymptote code with @code{latex} and @code{pdflatex} you may first need to remove the files @code{latexusage-*.tex}. @cindex @code{latexmk} @cindex @code{perl} An even better method for processing a @code{LaTeX} file with embedded @code{Asymptote} code is to use the @code{latexmk} utility from @quotation @url{http://mirror.ctan.org/support/latexmk/} @end quotation @noindent after putting the contents of @url{http://sourceforge.net/p/asymptote/code/HEAD/tree/trunk/asymptote/doc/latexmkrc} @noindent in a file @code{latexmkrc} in the same directory. The command @verbatim latexmk -pdf latexusage @end verbatim @noindent will then call @code{Asymptote} automatically, recompiling only the figures that have changed. Since each figure is compiled in a separate system process, this method also tends to use less memory. To store the figures in a separate directory named @code{asy}, one can define @verbatim \def\asydir{asy} @end verbatim in @code{latexusage.tex} and put the contents of @url{http://sourceforge.net/p/asymptote/code/HEAD/tree/trunk/asymptote/doc/latexmkrc_asydir} in a file @code{latexmkrc} in the same directory. @noindent External @code{Asymptote} code in @code{@uref{http://asymptote.sourceforge.net/gallery/filename.pdf,,filename}@uref{http://asymptote.sourceforge.net/gallery/filename.asy,,.asy}} should be included with @cindex @code{asyinclude} @verbatim \asyinclude[]{} @end verbatim @noindent so that @code{latexmk} will recognize when the code is changed. Note that @code{latemk} requires @code{perl}, available from @url{http://www.perl.org/}. @cindex @code{width} @cindex @code{height} @cindex @code{keepAspect} @cindex @code{viewportwidth} @cindex @code{viewportheight} @cindex @code{attach} @cindex @code{inline} One can specify @code{width}, @code{height}, @code{keepAspect}, @code{viewportwidth}, @code{viewportheight}, @code{attach}, and @code{inline}. @code{keyval}-style options to the @code{asy} and @code{asyinclude} environments. Three-dimensional @acronym{PRC} files may either be embedded within the page (the default) or attached as annotated (but printable) attachments, using the @code{attach} option and the @code{attachfile2} (or older @code{attachfile}) @code{LaTeX} package. The @code{inline} option generates inline @code{LaTeX} code instead of @acronym{EPS} or @acronym{PDF} files. This makes 2D LaTeX symbols visible to the @code{\begin@{asy@}...\end@{asy@}} environment. In this mode, Asymptote correctly aligns 2D LaTeX symbols defined outside of @code{\begin@{asy@}...\end@{asy@}}, but treats their size as zero; an optional second string can be given to @code{Label} to provide an estimate of the unknown label size. Note that if the @code{latex} @TeX{} engine is used with the @code{inline} option, labels might not show up in @acronym{DVI} viewers that cannot handle raw @code{PostScript} code. One can use @code{dvips}/@code{dvipdf} to produce @code{PostScript}/@acronym{PDF} output (we recommend using the modified version of @code{dvipdf} in the @code{Asymptote} patches directory, which accepts the @code{dvips -z} hyperdvi option). Here now is @code{latexusage.tex}: @verbatiminclude latexusage.tex @page @image{latexusage,,25cm} @node Base modules, Options, LaTeX usage, Top @chapter Base modules @cindex base modules @code{Asymptote} currently ships with the following base modules: @menu * plain:: Default @code{Asymptote} base file * simplex:: Linear programming: simplex method * math:: Extend @code{Asymptote}'s math capabilities * interpolate:: Interpolation routines * geometry:: Geometry routines * trembling:: Wavy lines * stats:: Statistics routines and histograms * patterns:: Custom fill and draw patterns * markers:: Custom path marker routines * tree:: Dynamic binary search tree * binarytree:: Binary tree drawing module * drawtree:: Tree drawing module * syzygy:: Syzygy and braid drawing module * feynman:: Feynman diagrams * roundedpath:: Round the sharp corners of paths * animation:: Embedded @acronym{PDF} and @acronym{MPEG} movies * embed:: Embedding movies, sounds, and 3D objects * slide:: Making presentations with @code{Asymptote} * MetaPost:: @code{MetaPost} compatibility routines * unicode:: Accept @code{unicode} (UTF-8) characters * latin1:: Accept @code{ISO 8859-1} characters * babel:: Interface to @code{LaTeX} @code{babel} package * labelpath:: Drawing curved labels * labelpath3:: Drawing curved labels in 3D * annotate:: Annotate your @acronym{PDF} files * CAD:: 2D CAD pen and measurement functions (DIN 15) * graph:: 2D linear & logarithmic graphs * palette:: Color density images and palettes * three:: 3D vector graphics * obj:: 3D obj files * graph3:: 3D linear & logarithmic graphs * grid3:: 3D grids * solids:: 3D solid geometry * tube:: 3D rotation minimizing tubes * flowchart:: Flowchart drawing routines * contour:: Contour lines * contour3:: Contour surfaces * smoothcontour3:: Smooth implicit surfaces * slopefield:: Slope fields * ode:: Ordinary differential equations @end menu @node plain, simplex, Base modules, Base modules @section @code{plain} @cindex @code{plain} This is the default @code{Asymptote} base file, which defines key parts of the drawing language (such as the @code{picture} structure). By default, an implicit @code{private import plain;} occurs before translating a file and before the first command given in interactive mode. This also applies when translating files for module definitions (except when translating @code{plain}, of course). This means that the types and functions defined in @code{plain} are accessible in almost all @code{Asymptote} code. Use the @code{-noautoplain} command-line option to disable this feature. @node simplex, math, plain, Base modules @section @code{simplex} @cindex @code{simplex} @cindex @code{deferred drawing} This package solves the two-variable linear programming problem using the simplex method. It is used by the module @code{plain} for automatic sizing of pictures. @node math, interpolate, simplex, Base modules @section @code{math} @cindex @code{math} This package extends @code{Asymptote}'s mathematical capabilities with useful functions such as @table @code @cindex @code{drawline} @item void drawline(picture pic=currentpicture, pair P, pair Q, pen p=currentpen); draw the visible portion of the (infinite) line going through @code{P} and @code{Q}, without altering the size of picture @code{pic}, using pen @code{p}. @cindex @code{intersect} @item real intersect(triple P, triple Q, triple n, triple Z); returns the intersection time of the extension of the line segment @code{PQ} with the plane perpendicular to @code{n} and passing through @code{Z}. @cindex @code{intersectionpoint} @item triple intersectionpoint(triple n0, triple P0, triple n1, triple P1); Return any point on the intersection of the two planes with normals @code{n0} and @code{n1} passing through points @code{P0} and @code{P1}, respectively. If the planes are parallel, return @code{(infinity,infinity,infinity)}. @cindex @code{quarticroots} @item pair[] quarticroots(real a, real b, real c, real d, real e); returns the four complex roots of the quartic equation @math{ax^4+bx^3+cx^2+dx+e=0}. @cindex @code{fft} @item pair[][] fft(pair[][] a, int sign=1) returns the two-dimensional Fourier transform of a using the given @code{sign}. @cindex @code{time} @item real time(path g, real x, int n=0) returns the @code{n}th intersection time of path @code{g} with the vertical line through x. @cindex @code{time} @item real time(path g, explicit pair z, int n=0) returns the @code{n}th intersection time of path @code{g} with the horizontal line through @code{(0,z.y)}. @cindex @code{value} @item real value(path g, real x, int n=0) returns the @code{n}th @code{y} value of @code{g} at @code{x}. @cindex @code{value} @item real value(path g, explicit pair z, int n=0) returns the @code{n}th @code{x} value of @code{g} at @code{y=z.y}. @cindex @code{slope} @item real slope(path g, real x, int n=0) returns the @code{n}th slope of @code{g} at @code{x}. @cindex @code{slope} @item real slope(path g, explicit pair z, int n=0) returns the @code{n}th slope of @code{g} at @code{y=z.y}. @cindex @code{segment} int[][] segment(bool[] b) returns the indices of consecutive true-element segments of bool[] @code{b}. @cindex @code{partialsum} @item real[] partialsum(real[] a) returns the partial sums of a real array @code{a}. @cindex @code{partialsum} @item real[] partialsum(real[] a, real[] dx) returns the partial @code{dx}-weighted sums of a real array @code{a}. @cindex @code{increasing} @item bool increasing(real[] a, bool strict=false) returns, if @code{strict=false}, whether @code{i > j} implies @code{a[i] >= a[j]}, or if @code{strict=true}, whether @code{i > j} implies implies @code{a[i] > a[j]}. @cindex @code{unique} @item int unique(real[] a, real x) if the sorted array @code{a} does not contain @code{x}, insert it sequentially, returning the index of @code{x} in the resulting array. @cindex @code{lexorder} @item bool lexorder(pair a, pair b) returns the strict lexicographical partial order of @code{a} and @code{b}. @cindex @code{lexorder} @item bool lexorder(triple a, triple b) returns the strict lexicographical partial order of @code{a} and @code{b}. @end table @node interpolate, geometry, math, Base modules @section @code{interpolate} @cindex @code{interpolate} This module implements Lagrange, Hermite, and standard cubic spline interpolation in @code{Asymptote}, as illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/interpolate1.pdf,,interpolate1}@uref{http://asymptote.sourceforge.net/gallery/interpolate1.asy,,.asy}}. @node geometry, trembling, interpolate, Base modules @section @code{geometry} @cindex @code{geometry} @cindex @code{triangle} @cindex @code{perpendicular} This module, written by Philippe Ivaldi, provides an extensive set of geometry routines, including @code{perpendicular} symbols and a @code{triangle} structure. Link to the documentation for the @code{geometry} module are posted here: @url{http://asymptote.sourceforge.net/links.html}, including an extensive set of examples, @url{http://www.piprime.fr/files/asymptote/geometry/}, and an index: @quotation @url{http://www.piprime.fr/files/asymptote/geometry/modules/geometry.asy.index.type.html} @end quotation @node trembling, stats, geometry, Base modules @section @code{trembling} @cindex @code{trembling} This module, written by Philippe Ivaldi and illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/floatingdisk.pdf,,floatingdisk}@uref{http://asymptote.sourceforge.net/gallery/floatingdisk.asy,,.asy}}, allows one to draw wavy lines, as if drawn by hand. @node stats, patterns, trembling, Base modules @section @code{stats} @cindex @code{stats} @cindex @code{leastsquares} This package implements a Gaussian random number generator and a collection of statistics routines, including @code{histogram} and @code{leastsquares}. @node patterns, markers, stats, Base modules @section @code{patterns} @cindex @code{patterns} This package implements @code{Postscript} tiling patterns and includes several convenient pattern generation routines. @node markers, tree, patterns, Base modules @section @code{markers} @cindex @code{markers} This package implements specialized routines for marking paths and angles. The principal mark routine provided by this package is @verbatim markroutine markinterval(int n=1, frame f, bool rotated=false); @end verbatim @noindent which centers @code{n} copies of frame @code{f} within uniformly space intervals in arclength along the path, optionally rotated by the angle of the local tangent. The @code{marker} (@pxref{marker}) routine can be used to construct new markers from these predefined frames: @cindex @code{stickframe} @verbatim frame stickframe(int n=1, real size=0, pair space=0, real angle=0, pair offset=0, pen p=currentpen); @end verbatim @cindex @code{circlebarframe} @verbatim frame circlebarframe(int n=1, real barsize=0, real radius=0,real angle=0, pair offset=0, pen p=currentpen, filltype filltype=NoFill, bool above=false); @end verbatim @cindex @code{crossframe} @verbatim frame crossframe(int n=3, real size=0, pair space=0, real angle=0, pair offset=0, pen p=currentpen); @end verbatim @cindex @code{tildeframe} @verbatim frame tildeframe(int n=1, real size=0, pair space=0, real angle=0, pair offset=0, pen p=currentpen); @end verbatim For convenience, this module also constructs the markers @code{StickIntervalMarker}, @code{CrossIntervalMarker}, @code{CircleBarIntervalMarker}, and @code{TildeIntervalMarker} from the above frames. The example @code{@uref{http://asymptote.sourceforge.net/gallery/markers1.pdf,,markers1}@uref{http://asymptote.sourceforge.net/gallery/markers1.asy,,.asy}} illustrates the use of these markers: @sp 1 @center @image{markers1} This package also provides a routine for marking an angle @math{AOB}: @cindex @code{markangle} @verbatim void markangle(picture pic=currentpicture, Label L="", int n=1, real radius=0, real space=0, pair A, pair O, pair B, arrowbar arrow=None, pen p=currentpen, margin margin=NoMargin, marker marker=nomarker); @end verbatim @noindent as illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/markers2.pdf,,markers2}@uref{http://asymptote.sourceforge.net/gallery/markers2.asy,,.asy}}. @sp 1 @center @image{markers2} @node tree, binarytree, markers, Base modules @section @code{tree} @cindex @code{tree} This package implements an example of a dynamic binary search tree. @node binarytree, drawtree, tree, Base modules @section @code{binarytree} @cindex @code{binarytree} This module can be used to draw an arbitrary binary tree and includes an input routine for the special case of a binary search tree, as illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/binarytreetest.pdf,,binarytreetest}@uref{http://asymptote.sourceforge.net/gallery/binarytreetest.asy,,.asy}}: @verbatiminclude binarytreetest.asy @sp 1 @center @image{binarytreetest} @node drawtree, syzygy, binarytree, Base modules @section @code{drawtree} @cindex @code{drawtree} This is a simple tree drawing module used by the example @code{@uref{http://asymptote.sourceforge.net/gallery/treetest.pdf,,treetest}@uref{http://asymptote.sourceforge.net/gallery/treetest.asy,,.asy}}. @node syzygy, feynman, drawtree, Base modules @section @code{syzygy} @cindex @code{syzygy} This module automates the drawing of braids, relations, and syzygies, along with the corresponding equations, as illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/knots.pdf,,knots}@uref{http://asymptote.sourceforge.net/gallery/knots.asy,,.asy}}. @node feynman, roundedpath, syzygy, Base modules @section @code{feynman} @cindex @code{feynman} This package, contributed by Martin Wiebusch, is useful for drawing Feynman diagrams, as illustrated by the examples @code{@uref{http://asymptote.sourceforge.net/gallery/eetomumu.pdf,,eetomumu}@uref{http://asymptote.sourceforge.net/gallery/eetomumu.asy,,.asy}} and @code{@uref{http://asymptote.sourceforge.net/gallery/fermi.pdf,,fermi}@uref{http://asymptote.sourceforge.net/gallery/fermi.asy,,.asy}}. @node roundedpath, animation, feynman, Base modules @section @code{roundedpath} @cindex @code{roundedpath} This package, contributed by Stefan Knorr, is useful for rounding the sharp corners of paths, as illustrated in the example file @code{@uref{http://asymptote.sourceforge.net/gallery/roundpath.pdf,,roundpath}@uref{http://asymptote.sourceforge.net/gallery/roundpath.asy,,.asy}}. @node animation, embed, roundedpath, Base modules @section @code{animation} @cindex @code{animation} @cindex @code{convert} @cindex animation @cindex @code{ImageMagick} This module allows one to generate animations, as illustrated by the files @code{@uref{http://asymptote.sourceforge.net/gallery/animations/wheel.pdf,,wheel}@uref{http://asymptote.sourceforge.net/gallery/animations/wheel.asy,,.asy}}, @code{@uref{http://asymptote.sourceforge.net/gallery/animations/wavepacket.pdf,,wavepacket}@uref{http://asymptote.sourceforge.net/gallery/animations/wavepacket.asy,,.asy}}, and @code{@uref{http://asymptote.sourceforge.net/gallery/animations/cube.pdf,,cube}@uref{http://asymptote.sourceforge.net/gallery/animations/cube.asy,,.asy}} in the @code{animations} subdirectory of the examples directory. These animations use the @code{ImageMagick} @code{convert} program to merge multiple images into a @acronym{GIF} or @acronym{MPEG} movie. @cindex @code{animate} @anchor{animate} The related @code{animate} module, derived from the @code{animation} module, generates higher-quality portable clickable @acronym{PDF} movies, with optional controls. This requires installing the package @quotation @url{http://mirror.ctan.org/macros/latex/contrib/animate/animate.sty} @noindent @end quotation @noindent (version 2007/11/30 or later) in a new directory @code{animate} in the local @code{LaTeX} directory (for example, in @code{/usr/local/share/texmf/tex/latex/animate}). On @code{UNIX} systems, one must then execute the command @code{texhash}. The example @code{@uref{http://asymptote.sourceforge.net/gallery/animations/pdfmovie.pdf,,pdfmovie}@uref{http://asymptote.sourceforge.net/gallery/animations/pdfmovie.asy,,.asy}} in the @code{animations} directory, along with the slide presentations @code{@uref{http://asymptote.sourceforge.net/gallery/animations/slidemovies.pdf,,slidemovies}@uref{http://asymptote.sourceforge.net/gallery/animations/slidemovies.asy,,.asy}} and @code{@uref{http://asymptote.sourceforge.net/gallery/intro.pdf,,intro}@uref{http://asymptote.sourceforge.net/gallery/intro.asy,,.asy}}, illustrate the use of embedded @acronym{PDF} movies. The examples @code{inlinemovie.tex} and @code{inlinemovie3.tex} show how to generate and embed @acronym{PDF} movies directly within a @code{LaTeX} file (@pxref{LaTeX usage}). The member function @verbatim string pdf(fit fit=NoBox, real delay=animationdelay, string options="", bool keep=settings.keep, bool multipage=true); @end verbatim @noindent of the @code{animate} structure accepts any of the @code{animate.sty} options, as described here: @quotation @url{http://mirror.ctan.org/macros/latex/contrib/animate/doc/animate.pdf} @end quotation @node embed, slide, animation, Base modules @section @code{embed} @cindex @code{embed} This module provides an interface to the @code{LaTeX} package (included with @code{MikTeX}) @quotation @url{http://mirror.ctan.org/macros/latex/contrib/media9} @end quotation @noindent for embedding movies, sounds, and 3D objects into a @acronym{PDF} document. @cindex @code{external} A more portable method for embedding movie files, which should work on any platform and does not require the @code{media9} package, is provided by using the @code{external} module instead of @code{embed}. Examples of the above two interfaces is provided in the file @code{@uref{http://asymptote.sourceforge.net/gallery/animations/embeddedmovie.pdf,,embeddedmovie}@uref{http://asymptote.sourceforge.net/gallery/animations/embeddedmovie.asy,,.asy}} and @code{@uref{http://asymptote.sourceforge.net/gallery/animations/externalmovie.pdf,,externalmovie}@uref{http://asymptote.sourceforge.net/gallery/animations/externalmovie.asy,,.asy}} in the @code{animations} subdirectory of the examples directory. For a higher quality embedded movie generated directly by @code{Asymptote}, use the @code{animate} module along with the @code{animate.sty} package to embed a portable @acronym{PDF} animation (@pxref{animate}). @cindex @code{U3D} An example of embedding @code{U3D} code is provided in the file @code{@uref{http://asymptote.sourceforge.net/gallery/animations/embeddedu3d.pdf,,embeddedu3d}@uref{http://asymptote.sourceforge.net/gallery/animations/embeddedu3d.asy,,.asy}}. @node slide, MetaPost, embed, Base modules @section @code{slide} @cindex @code{slide} This package provides a simple yet high-quality facility for making presentation slides, including portable embedded @acronym{PDF} animations (see the file @code{@uref{http://asymptote.sourceforge.net/gallery/animations/slidemovies.pdf,,slidemovies}@uref{http://asymptote.sourceforge.net/gallery/animations/slidemovies.asy,,.asy}}). A simple example is provided in the file @code{@uref{http://asymptote.sourceforge.net/gallery/animations/slidedemo.pdf,,slidedemo}@uref{http://asymptote.sourceforge.net/gallery/animations/slidedemo.asy,,.asy}}. @node MetaPost, unicode, slide, Base modules @section @code{MetaPost} @cindex @code{MetaPost} This package provides some useful routines to help @code{MetaPost} users migrate old @code{MetaPost} code to @code{Asymptote}. Further contributions here are welcome. @cindex @code{implicit linear solver} @cindex @code{MetaPost whatever} @cindex @code{extension} Unlike @code{MetaPost}, @code{Asymptote} does not implicitly solve linear equations and therefore does not have the notion of a @code{whatever} unknown. The routine @code{extension} (@pxref{extension}) provides a useful replacement for a common use of @code{whatever}: finding the intersection point of the lines through @code{P}, @code{Q} and @code{p}, @code{q}. For less common occurrences of @code{whatever}, one can use the built-in explicit linear equation solver @code{solve} instead. @node unicode, latin1, MetaPost, Base modules @section @code{unicode} @cindex @code{unicode} @cindex international characters Import this package at the beginning of the file to instruct @code{LaTeX} to accept @code{unicode} (UTF-8) standardized international characters. @noindent @cindex Cyrillic @cindex Russian To use Cyrillic fonts, you will need to change the font encoding: @verbatim import unicode; texpreamble("\usepackage{mathtext}\usepackage[russian]{babel}"); defaultpen(font("T2A","cmr","m","n")); @end verbatim @noindent @cindex Chinese @cindex Japanese @cindex Korean @cindex CJK Support for Chinese, Japanese, and Korean fonts is provided by the CJK package: @quotation @url{http://mirror.ctan.org/languages/chinese/CJK/} @end quotation @noindent The following commands enable the CJK song family (within a label, you can also temporarily switch to another family, say kai, by prepending @code{"\CJKfamily@{kai@}"} to the label string): @verbatim texpreamble("\usepackage{CJK} \AtBeginDocument{\begin{CJK*}{GBK}{song}} \AtEndDocument{\clearpage\end{CJK*}}"); @end verbatim @node latin1, babel, unicode, Base modules @section @code{latin1} @cindex @code{latin1} If you don't have @code{LaTeX} support for @code{unicode} installed, you can enable support for Western European languages (ISO 8859-1) by importing the module @code{latin1}. This module can be used as a template for providing support for other ISO 8859 alphabets. @node babel, labelpath, latin1, Base modules @section @code{babel} @cindex @code{babel} This module implements the @code{LaTeX} @code{babel} package in @code{Asymptote}. For example: @verbatim import babel; babel("german"); @end verbatim @node labelpath, labelpath3, babel, Base modules @section @code{labelpath} @cindex @code{labelpath} This module uses the @code{PSTricks} @code{pstextpath} macro to fit labels along a path (properly kerned, as illustrated in the example file @code{@uref{http://asymptote.sourceforge.net/gallery/curvedlabel.pdf,,curvedlabel}@uref{http://asymptote.sourceforge.net/gallery/curvedlabel.asy,,.asy}}), using the command @verbatim void labelpath(picture pic=currentpicture, Label L, path g, string justify=Centered, pen p=currentpen); @end verbatim @noindent Here @code{justify} is one of @code{LeftJustified}, @code{Centered}, or @code{RightJustified}. The @math{x} component of a shift transform applied to the Label is interpreted as a shift along the curve, whereas the @math{y} component is interpreted as a shift away from the curve. All other Label transforms are ignored. This package requires the @code{latex} tex engine and inherits the limitations of the @code{PSTricks} @code{\pstextpath} macro. @node labelpath3, annotate, labelpath, Base modules @section @code{labelpath3} @cindex @code{labelpath3} This module, contributed by Jens Schwaiger, implements a 3D version of @code{labelpath} that does not require the @code{PSTricks} package. An example is provided in @code{@uref{http://asymptote.sourceforge.net/gallery/curvedlabel3.pdf,,curvedlabel3}@uref{http://asymptote.sourceforge.net/gallery/curvedlabel3.asy,,.asy}}. @node annotate, CAD, labelpath3, Base modules @section @code{annotate} @cindex @code{annotate} This module supports @acronym{PDF} annotations for viewing with @code{Adobe Reader}, via the function @verbatim void annotate(picture pic=currentpicture, string title, string text, pair position); @end verbatim @noindent Annotations are illustrated in the example file @code{@uref{http://asymptote.sourceforge.net/gallery/annotation.pdf,,annotation}@uref{http://asymptote.sourceforge.net/gallery/annotation.asy,,.asy}}. Currently, annotations are only implemented for the @code{latex} (default) and @code{tex} @TeX{} engines. @node CAD, graph, annotate, Base modules @section @code{CAD} @cindex @code{CAD} This package, contributed by Mark Henning, provides basic pen definitions and measurement functions for simple 2D CAD drawings according to DIN 15. It is documented separately, in the file @code{CAD.pdf}. @node graph, palette, CAD, Base modules @section @code{graph} @cindex @code{graph} @cindex 2D graphs This package implements two-dimensional linear and logarithmic graphs, including automatic scale and tick selection (with the ability to override manually). A graph is a @code{guide} (that can be drawn with the draw command, with an optional legend) constructed with one of the following routines: @itemize @item @verbatim guide graph(picture pic=currentpicture, real f(real), real a, real b, int n=ngraph, real T(real)=identity, interpolate join=operator --); guide[] graph(picture pic=currentpicture, real f(real), real a, real b, int n=ngraph, real T(real)=identity, bool3 cond(real), interpolate join=operator --); @end verbatim Returns a graph using the scaling information for picture @code{pic} (@pxref{automatic scaling}) of the function @code{f} on the interval [@code{T}(@code{a}),@code{T}(@code{b})], sampling at @code{n} points evenly spaced in [@code{a},@code{b}], optionally restricted by the bool3 function @code{cond} on [@code{a},@code{b}]. If @code{cond} is: @itemize @bullet @item @code{true}, the point is added to the existing guide; @item @code{default}, the point is added to a new guide; @item @code{false}, the point is omitted and a new guide is begun. @end itemize The points are connected using the interpolation specified by @code{join}: @itemize @bullet @cindex @code{operator --} @cindex @code{Straight} @item @code{operator --} (linear interpolation; the abbreviation @code{Straight} is also accepted); @cindex @code{operator ..} @cindex @code{Spline} @item @code{operator ..} (piecewise Bezier cubic spline interpolation; the abbreviation @code{Spline} is also accepted); @cindex @code{Hermite} @cindex @code{notaknot} @cindex @code{natural} @cindex @code{periodic} @cindex @code{clamped} @cindex @code{monotonic} @cindex @code{Hermite(splinetype splinetype} @item @code{Hermite} (standard cubic spline interpolation using boundary condition @code{notaknot}, @code{natural}, @code{periodic}, @code{clamped(real slopea, real slopeb)}), or @code{monotonic}. The abbreviation @code{Hermite} is equivalent to @code{Hermite(notaknot)} for nonperiodic data and @code{Hermite(periodic)} for periodic data). @end itemize @item @verbatim guide graph(picture pic=currentpicture, real x(real), real y(real), real a, real b, int n=ngraph, real T(real)=identity, interpolate join=operator --); guide[] graph(picture pic=currentpicture, real x(real), real y(real), real a, real b, int n=ngraph, real T(real)=identity, bool3 cond(real), interpolate join=operator --); @end verbatim Returns a graph using the scaling information for picture @code{pic} of the parametrized function (@code{x}(@math{t}),@code{y}(@math{t})) for @math{t} in the interval [@code{T}(@code{a}),@code{T}(@code{b})], sampling at @code{n} points evenly spaced in [@code{a},@code{b}], optionally restricted by the bool3 function @code{cond} on [@code{a},@code{b}], using the given interpolation type. @item @verbatim guide graph(picture pic=currentpicture, pair z(real), real a, real b, int n=ngraph, real T(real)=identity, interpolate join=operator --); guide[] graph(picture pic=currentpicture, pair z(real), real a, real b, int n=ngraph, real T(real)=identity, bool3 cond(real), interpolate join=operator --); @end verbatim Returns a graph using the scaling information for picture @code{pic} of the parametrized function @code{z}(@math{t}) for @math{t} in the interval [@code{T}(@code{a}),@code{T}(@code{b})], sampling at @code{n} points evenly spaced in [@code{a},@code{b}], optionally restricted by the bool3 function @code{cond} on [@code{a},@code{b}], using the given interpolation type. @item @verbatim guide graph(picture pic=currentpicture, pair[] z, interpolate join=operator --); guide[] graph(picture pic=currentpicture, pair[] z, bool3[] cond, interpolate join=operator --); @end verbatim Returns a graph using the scaling information for picture @code{pic} of the elements of the array @code{z}, optionally restricted to those indices for which the elements of the boolean array @code{cond} are @code{true}, using the given interpolation type. @item @verbatim guide graph(picture pic=currentpicture, real[] x, real[] y, interpolate join=operator --); guide[] graph(picture pic=currentpicture, real[] x, real[] y, bool3[] cond, interpolate join=operator --); @end verbatim Returns a graph using the scaling information for picture @code{pic} of the elements of the arrays (@code{x},@code{y}), optionally restricted to those indices for which the elements of the boolean array @code{cond} are @code{true}, using the given interpolation type. @item @cindex @code{polargraph} @verbatim guide polargraph(picture pic=currentpicture, real f(real), real a, real b, int n=ngraph, interpolate join=operator --); @end verbatim Returns a polar-coordinate graph using the scaling information for picture @code{pic} of the function @code{f} on the interval [@code{a},@code{b}], sampling at @code{n} evenly spaced points, with the given interpolation type. @item @verbatim guide polargraph(picture pic=currentpicture, real[] r, real[] theta, interpolate join=operator--); @end verbatim Returns a polar-coordinate graph using the scaling information for picture @code{pic} of the elements of the arrays (@code{r},@code{theta}), using the given interpolation type. @end itemize @verbatim @end verbatim An axis can be drawn on a picture with one of the following commands: @itemize @item @verbatim void xaxis(picture pic=currentpicture, Label L="", axis axis=YZero, real xmin=-infinity, real xmax=infinity, pen p=currentpen, ticks ticks=NoTicks, arrowbar arrow=None, bool above=false); @end verbatim Draw an @math{x} axis on picture @code{pic} from @math{x}=@code{xmin} to @math{x}=@code{xmax} using pen @code{p}, optionally labelling it with Label @code{L}. The relative label location along the axis (a real number from [0,1]) defaults to 1 (@pxref{Label}), so that the label is drawn at the end of the axis. An infinite value of @code{xmin} or @code{xmax} specifies that the corresponding axis limit will be automatically determined from the picture limits. The optional @code{arrow} argument takes the same values as in the @code{draw} command (@pxref{arrows}). The axis is drawn before any existing objects in @code{pic} unless @code{above=true}. The axis placement is determined by one of the following @code{axis} types: @table @code @cindex @code{YZero} @item YZero(bool extend=true) Request an @math{x} axis at @math{y}=0 (or @math{y}=1 on a logarithmic axis) extending to the full dimensions of the picture, unless @code{extend}=false. @cindex @code{YEquals} @item YEquals(real Y, bool extend=true) Request an @math{x} axis at @math{y}=@code{Y} extending to the full dimensions of the picture, unless @code{extend}=false. @cindex @code{Bottom} @item Bottom(bool extend=false) Request a bottom axis. @cindex @code{Top} @item Top(bool extend=false) Request a top axis. @cindex @code{BottomTop} @item BottomTop(bool extend=false) Request a bottom and top axis. @end table @cindex custom axis types Custom axis types can be created by following the examples in the module @code{graph.asy}. One can easily override the default values for the standard axis types: @verbatim import graph; YZero=new axis(bool extend=true) { return new void(picture pic, axisT axis) { real y=pic.scale.x.scale.logarithmic ? 1 : 0; axis.value=I*pic.scale.y.T(y); axis.position=1; axis.side=right; axis.align=2.5E; axis.value2=Infinity; axis.extend=extend; }; }; YZero=YZero(); @end verbatim @anchor{ticks} @cindex @code{ticks} @cindex @code{NoTicks} @cindex @code{LeftTicks} @cindex @code{RightTicks} @cindex @code{Ticks} The default tick option is @code{NoTicks}. The options @code{LeftTicks}, @code{RightTicks}, or @code{Ticks} can be used to draw ticks on the left, right, or both sides of the path, relative to the direction in which the path is drawn. These tick routines accept a number of optional arguments: @verbatim ticks LeftTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, tickmodifier modify=None, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen); @end verbatim If any of these parameters are omitted, reasonable defaults will be chosen: @table @code @item Label format @cindex @code{defaultformat} @cindex @code{trailingzero} override the default tick label format (@code{defaultformat}, initially "$%.4g$"), rotation, pen, and alignment (for example, @code{LeftSide}, @code{Center}, or @code{RightSide}) relative to the axis. To enable @code{LaTeX} math mode fonts, the format string should begin and end with @code{$} @pxref{format}. If the format string is @code{trailingzero}, trailing zeros will be added to the tick labels; if the format string is @code{"%"}, the tick label will be suppressed; @item ticklabel is a function @code{string(real x)} returning the label (by default, format(format.s,x)) for each major tick value @code{x}; @item bool beginlabel include the first label; @item bool endlabel include the last label; @item int N when automatic scaling is enabled (the default; @pxref{automatic scaling}), divide a linear axis evenly into this many intervals, separated by major ticks; for a logarithmic axis, this is the number of decades between labelled ticks; @item int n divide each interval into this many subintervals, separated by minor ticks; @item real Step the tick value spacing between major ticks (if @code{N}=@code{0}); @item real step the tick value spacing between minor ticks (if @code{n}=@code{0}); @item bool begin include the first major tick; @item bool end include the last major tick; @item tickmodifier modify; an optional function that takes and returns a @code{tickvalue} structure having real[] members @code{major} and @code{minor} consisting of the tick values (to allow modification of the automatically generated tick values); @item real Size the size of the major ticks (in @code{PostScript} coordinates); @item real size the size of the minor ticks (in @code{PostScript} coordinates); @item bool extend; extend the ticks between two axes (useful for drawing a grid on the graph); @item pen pTick an optional pen used to draw the major ticks; @item pen ptick an optional pen used to draw the minor ticks. @end table @cindex @code{OmitTick} @cindex @code{OmitTickInterval} @cindex @code{OmitTickIntervals} For convenience, the predefined tickmodifiers @code{OmitTick(... real[] x)}, @code{OmitTickInterval(real a, real b)}, and @code{OmitTickIntervals(real[] a, real[] b)} can be used to remove specific auto-generated ticks and their labels. The @code{OmitFormat(string s=defaultformat ... real[] x)} ticklabel can be used to remove specific tick labels but not the corresponding ticks. The tickmodifier @code{NoZero} is an abbreviation for @code{OmitTick(0)} and the ticklabel @code{NoZeroFormat} is an abbrevation for @code{OmitFormat(0)}. @cindex custom tick locations @cindex @code{LeftTicks} @cindex @code{RightTicks} @cindex @code{Ticks} It is also possible to specify custom tick locations with @code{LeftTicks}, @code{RightTicks}, and @code{Ticks} by passing explicit real arrays @code{Ticks} and (optionally) @code{ticks} containing the locations of the major and minor ticks, respectively: @verbatim ticks LeftTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, real[] Ticks, real[] ticks=new real[], real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) @end verbatim @item @verbatim void yaxis(picture pic=currentpicture, Label L="", axis axis=XZero, real ymin=-infinity, real ymax=infinity, pen p=currentpen, ticks ticks=NoTicks, arrowbar arrow=None, bool above=false, bool autorotate=true); @end verbatim Draw a @math{y} axis on picture @code{pic} from @math{y}=@code{ymin} to @math{y}=@code{ymax} using pen @code{p}, optionally labelling it with a Label @code{L} that is autorotated unless @code{autorotate=false}. The relative location of the label (a real number from [0,1]) defaults to 1 (@pxref{Label}). An infinite value of @code{ymin} or @code{ymax} specifies that the corresponding axis limit will be automatically determined from the picture limits. The optional @code{arrow} argument takes the same values as in the @code{draw} command (@pxref{arrows}). The axis is drawn before any existing objects in @code{pic} unless @code{above=true}. The tick type is specified by @code{ticks} and the axis placement is determined by one of the following @code{axis} types: @table @code @cindex @code{XZero} @item XZero(bool extend=true) Request a @math{y} axis at @math{x}=0 (or @math{x}=1 on a logarithmic axis) extending to the full dimensions of the picture, unless @code{extend}=false. @cindex @code{XEquals} @item XEquals(real X, bool extend=true) Request a @math{y} axis at @math{x}=@code{X} extending to the full dimensions of the picture, unless @code{extend}=false. @cindex @code{Left} @item Left(bool extend=false) Request a left axis. @cindex @code{Right} @item Right(bool extend=false) Request a right axis. @cindex @code{LeftRight} @item LeftRight(bool extend=false) Request a left and right axis. @end table @item @cindex @code{xequals} @cindex @code{yequals} For convenience, the functions @verbatim void xequals(picture pic=currentpicture, Label L="", real x, bool extend=false, real ymin=-infinity, real ymax=infinity, pen p=currentpen, ticks ticks=NoTicks, bool above=true, arrowbar arrow=None); @end verbatim and @verbatim void yequals(picture pic=currentpicture, Label L="", real y, bool extend=false, real xmin=-infinity, real xmax=infinity, pen p=currentpen, ticks ticks=NoTicks, bool above=true, arrowbar arrow=None); @end verbatim can be respectively used to call @code{yaxis} and @code{xaxis} with the appropriate axis types @code{XEquals(x,extend)} and @code{YEquals(y,extend)}. This is the recommended way of drawing vertical or horizontal lines and axes at arbitrary locations. @item @verbatim void axes(picture pic=currentpicture, Label xlabel="", Label ylabel="", bool extend=true, pair min=(-infinity,-infinity), pair max=(infinity,infinity), pen p=currentpen, arrowbar arrow=None, bool above=false); @end verbatim This convenience routine draws both @math{x} and @math{y} axes on picture @code{pic} from @code{min} to @code{max}, with optional labels @code{xlabel} and @code{ylabel} and any arrows specified by @code{arrow}. The axes are drawn on top of existing objects in @code{pic} only if @code{above=true}. @item @verbatim void axis(picture pic=currentpicture, Label L="", path g, pen p=currentpen, ticks ticks, ticklocate locate, arrowbar arrow=None, int[] divisor=new int[], bool above=false, bool opposite=false); @end verbatim This routine can be used to draw on picture @code{pic} a general axis based on an arbitrary path @code{g}, using pen @code{p}. One can optionally label the axis with Label @code{L} and add an arrow @code{arrow}. The tick type is given by @code{ticks}. The optional integer array @code{divisor} specifies what tick divisors to try in the attempt to produce uncrowded tick labels. A @code{true} value for the flag @code{opposite} identifies an unlabelled secondary axis (typically drawn opposite a primary axis). The axis is drawn before any existing objects in @code{pic} unless @code{above=true}. The tick locator @code{ticklocate} is constructed by the routine @verbatim ticklocate ticklocate(real a, real b, autoscaleT S=defaultS, real tickmin=-infinity, real tickmax=infinity, real time(real)=null, pair dir(real)=zero); @end verbatim @noindent where @code{a} and @code{b} specify the respective tick values at @code{point(g,0)} and @code{point(g,length(g))}, @code{S} specifies the autoscaling transformation, the function @code{real time(real v)} returns the time corresponding to the value @code{v}, and @code{pair dir(real t)} returns the absolute tick direction as a function of @code{t} (zero means draw the tick perpendicular to the axis). @item These routines are useful for manually putting ticks and labels on axes (if the variable @code{Label} is given as the @code{Label} argument, the @code{format} argument will be used to format a string based on the tick location): @cindex xtick @cindex ytick @cindex labelx @cindex labely @cindex tick @cindex Label @verbatim void xtick(picture pic=currentpicture, Label L="", explicit pair z, pair dir=N, string format="", real size=Ticksize, pen p=currentpen); void xtick(picture pic=currentpicture, Label L="", real x, pair dir=N, string format="", real size=Ticksize, pen p=currentpen); void ytick(picture pic=currentpicture, Label L="", explicit pair z, pair dir=E, string format="", real size=Ticksize, pen p=currentpen); void ytick(picture pic=currentpicture, Label L="", real y, pair dir=E, string format="", real size=Ticksize, pen p=currentpen); void tick(picture pic=currentpicture, pair z, pair dir, real size=Ticksize, pen p=currentpen); void labelx(picture pic=currentpicture, Label L="", explicit pair z, align align=S, string format="", pen p=currentpen); void labelx(picture pic=currentpicture, Label L="", real x, align align=S, string format="", pen p=currentpen); void labelx(picture pic=currentpicture, Label L, string format="", explicit pen p=currentpen); void labely(picture pic=currentpicture, Label L="", explicit pair z, align align=W, string format="", pen p=currentpen); void labely(picture pic=currentpicture, Label L="", real y, align align=W, string format="", pen p=currentpen); void labely(picture pic=currentpicture, Label L, string format="", explicit pen p=currentpen); @end verbatim @end itemize Here are some simple examples of two-dimensional graphs: @enumerate @cindex textbook graph @item This example draws a textbook-style graph of @math{y=} exp@math{(x)}, with the @math{y} axis starting at @math{y=0}: @verbatiminclude exp.asy @sp 1 @center @image{exp} @item The next example draws a scientific-style graph with a legend. The position of the legend can be adjusted either explicitly or by using the graphical user interface @code{@uref{http://asymptote.sourceforge.net/gallery/.pdf,,}@uref{http://asymptote.sourceforge.net/gallery/.asy,,.asy}} (@pxref{GUI}). If an @code{UnFill(real xmargin=0, real ymargin=xmargin)} or @code{Fill(pen)} option is specified to @code{add}, the legend will obscure any underlying objects. Here we illustrate how to clip the portion of the picture covered by a label: @cindex scientific graph @verbatiminclude lineargraph0.asy @sp 1 @center @image{lineargraph0} @cindex @code{attach} To specify a fixed size for the graph proper, use @code{attach}: @verbatiminclude lineargraph.asy @cindex @code{legend} A legend can have multiple entries per line: @verbatiminclude legend.asy @sp 1 @center @image{legend} @item This example draws a graph of one array versus another (both of the same size) using custom tick locations and a smaller font size for the tick labels on the @math{y} axis. @verbatiminclude datagraph.asy @sp 1 @center @image{datagraph} @item This example shows how to graph columns of data read from a file. @verbatiminclude filegraph.asy @sp 1 @center @image{filegraph} @cindex @code{polygon} @cindex @code{cross} @cindex @code{errorbars} @cindex @code{marker} @cindex @code{marknodes} @cindex @code{markuniform} @cindex @code{mark} @cindex path markers @anchor{pathmarkers} @item The next example draws two graphs of an array of coordinate pairs, using frame alignment and data markers. In the left-hand graph, the markers, constructed with @verbatim marker marker(path g, markroutine markroutine=marknodes, pen p=currentpen, filltype filltype=NoFill, bool above=true); @end verbatim using the path @code{unitcircle} (@pxref{filltype}), are drawn below each node. Any frame can be converted to a marker, using @anchor{marker} @verbatim marker marker(frame f, markroutine markroutine=marknodes, bool above=true); @end verbatim In the right-hand graph, the unit @math{n}-sided regular polygon @code{polygon(int n)} and the unit @math{n}-point cyclic cross @code{cross(int n, bool round=true, real r=0)} (where @code{r} is an optional ``inner'' radius) are used to build a custom marker frame. @anchor{markuniform} Here @code{markuniform(bool centered=false, int n, bool rotated=false)} adds this frame at @code{n} uniformly spaced points along the arclength of the path, optionally rotated by the angle of the local tangent to the path (if centered is true, the frames will be centered within @code{n} evenly spaced arclength intervals). Alternatively, one can use markroutine @code{marknodes} to request that the marks be placed at each Bezier node of the path, or markroutine @code{markuniform(pair z(real t), real a, real b, int n)} to place marks at points @code{z(t)} for n evenly spaced values of @code{t} in @code{[a,b]}. These markers are predefined: @verbatim marker[] Mark={ marker(scale(circlescale)*unitcircle), marker(polygon(3)),marker(polygon(4)), marker(polygon(5)),marker(invert*polygon(3)), marker(cross(4)),marker(cross(6)) }; marker[] MarkFill={ marker(scale(circlescale)*unitcircle,Fill),marker(polygon(3),Fill), marker(polygon(4),Fill),marker(polygon(5),Fill), marker(invert*polygon(3),Fill) }; @end verbatim The example also illustrates the @code{errorbar} routines: @verbatim void errorbars(picture pic=currentpicture, pair[] z, pair[] dp, pair[] dm={}, bool[] cond={}, pen p=currentpen, real size=0); void errorbars(picture pic=currentpicture, real[] x, real[] y, real[] dpx, real[] dpy, real[] dmx={}, real[] dmy={}, bool[] cond={}, pen p=currentpen, real size=0); @end verbatim @noindent Here, the positive and negative extents of the error are given by the absolute values of the elements of the pair array @code{dp} and the optional pair array @code{dm}. If @code{dm} is not specified, the positive and negative extents of the error are assumed to be equal. @anchor{errorbars} @cindex error bars @verbatiminclude errorbars.asy @sp 1 @center @image{errorbars} @cindex custom mark routine @item A custom mark routine can be also be specified: @verbatiminclude graphmarkers.asy @sp 1 @center @image{graphmarkers} @item This example shows how to label an axis with arbitrary strings. @verbatiminclude monthaxis.asy @sp 1 @center @image{monthaxis} @item The next example draws a graph of a parametrized curve. @cindex parametrized curve @cindex cropping graphs @cindex @code{xlimits} @cindex @code{ylimits} @cindex @code{limits} @cindex @code{crop} The calls to @verbatim xlimits(picture pic=currentpicture, real min=-infinity, real max=infinity, bool crop=NoCrop); @end verbatim @noindent and the analogous function @code{ylimits} can be uncommented to set the respective axes limits for picture @code{pic} to the specified @code{min} and @code{max} values. Alternatively, the function @verbatim void limits(picture pic=currentpicture, pair min, pair max, bool crop=NoCrop); @end verbatim can be used to limit the axes to the box having opposite vertices at the given pairs). Existing objects in picture @code{pic} will be cropped to lie within the given limits if @code{crop}=@code{Crop}. The function @code{crop(picture pic)} can be used to crop a graph to the current graph limits. @verbatiminclude parametricgraph.asy @sp 1 @center @image{parametricgraph} @cindex scaled graph The next example illustrates how one can extract a common axis scaling factor. @verbatiminclude scaledgraph.asy @sp 1 @center @image{scaledgraph} @anchor{automatic scaling} @cindex automatic scaling @cindex @code{scale} @cindex @code{Linear} @cindex @code{Log} @cindex automatic scaling Axis scaling can be requested and/or automatic selection of the axis limits can be inhibited with one of these @code{scale} routines: @verbatim void scale(picture pic=currentpicture, scaleT x, scaleT y); void scale(picture pic=currentpicture, bool xautoscale=true, bool yautoscale=xautoscale, bool zautoscale=yautoscale); @end verbatim This sets the scalings for picture @code{pic}. The @code{graph} routines accept an optional @code{picture} argument for determining the appropriate scalings to use; if none is given, it uses those set for @code{currentpicture}. Two frequently used scaling routines @code{Linear} and @code{Log} are predefined in @code{graph}. All picture coordinates (including those in paths and those given to the @code{label} and @code{limits} functions) are always treated as linear (post-scaled) coordinates. Use @cindex @code{Scale} @verbatim pair Scale(picture pic=currentpicture, pair z); @end verbatim to convert a graph coordinate into a scaled picture coordinate. The @math{x} and @math{y} components can be individually scaled using the analogous routines @verbatim real ScaleX(picture pic=currentpicture, real x); real ScaleY(picture pic=currentpicture, real y); @end verbatim The predefined scaling routines can be given two optional boolean arguments: @code{automin=false} and @code{automax=automin}. These default to @code{false} but can be respectively set to @code{true} to enable automatic selection of "nice" axis minimum and maximum values. The @code{Linear} scaling can also take as optional final arguments a multiplicative scaling factor and intercept (e.g.@ for a depth axis, @code{Linear(-1)} requests axis reversal). @cindex logarithmic graph @cindex log-log graph For example, to draw a log/log graph of a function, use @code{scale(Log,Log)}: @verbatiminclude loggraph.asy @sp 1 @center @image{loggraph} @cindex grid By extending the ticks, one can easily produce a logarithmic grid: @verbatiminclude loggrid.asy @sp 1 @center @image{loggrid} One can also specify custom tick locations and formats for logarithmic axes: @verbatiminclude logticks.asy @sp 1 @center @image{logticks} @cindex @code{log2} graph It is easy to draw logarithmic graphs with respect to other bases: @verbatiminclude log2graph.asy @sp 1 @center @image{log2graph} @cindex broken axis Here is an example of "broken" linear @math{x} and logarithmic @math{y} axes that omit the segments [3,8] and [100,1000], respectively. In the case of a logarithmic axis, the break endpoints are automatically rounded to the nearest integral power of the base. @verbatiminclude brokenaxis.asy @sp 1 @center @image{brokenaxis} @cindex secondary axis @cindex @code{secondaryX} @cindex @code{secondaryY} @item @code{Asymptote} can draw secondary axes with the routines @verbatim picture secondaryX(picture primary=currentpicture, void f(picture)); picture secondaryY(picture primary=currentpicture, void f(picture)); @end verbatim In this example, @code{secondaryY} is used to draw a secondary linear @math{y} axis against a primary logarithmic @math{y} axis: @verbatiminclude Bode.asy @sp 1 @center @image{Bode} A secondary logarithmic @math{y} axis can be drawn like this: @verbatiminclude secondaryaxis.asy @sp 1 @center @image{secondaryaxis} @item Here is a histogram example, which uses the @code{stats} module. @cindex @code{axis} @verbatiminclude histogram.asy @sp 1 @center @image{histogram} @item Here is an example of reading column data in from a file and a least-squares fit, using the @code{stats} module. @cindex @code{leastsquares} @verbatiminclude leastsquares.asy @sp 1 @center @image{leastsquares} @item Here is an example that illustrates the general @code{axis} routine. @cindex @code{axis} @verbatiminclude generalaxis.asy @sp 1 @center @image{generalaxis} @item To draw a vector field of @code{n} arrows evenly spaced along the arclength of a path, use the routine @cindex @code{vectorfield} @verbatim picture vectorfield(path vector(real), path g, int n, bool truesize=false, pen p=currentpen, arrowbar arrow=Arrow); @end verbatim as illustrated in this simple example of a flow field: @verbatiminclude flow.asy @sp 1 @center @image{flow} @item To draw a vector field of @code{nx}@math{\times}@code{ny} arrows in @code{box(a,b)}, use the routine @cindex @code{vectorfield} @verbatim picture vectorfield(path vector(pair), pair a, pair b, int nx=nmesh, int ny=nx, bool truesize=false, real maxlength=truesize ? 0 : maxlength(a,b,nx,ny), bool cond(pair z)=null, pen p=currentpen, arrowbar arrow=Arrow, margin margin=PenMargin) @end verbatim as illustrated in this example: @verbatiminclude vectorfield.asy @sp 1 @center @image{vectorfield} @item The following scientific graphs, which illustrate many features of @code{Asymptote}'s graphics routines, were generated from the examples @code{@uref{http://asymptote.sourceforge.net/gallery/2D graphs/diatom.pdf,,diatom}@uref{http://asymptote.sourceforge.net/gallery/2D graphs/diatom.asy,,.asy}} and @code{@uref{http://asymptote.sourceforge.net/gallery/2D graphs/westnile.pdf,,westnile}@uref{http://asymptote.sourceforge.net/gallery/2D graphs/westnile.asy,,.asy}}, using the comma-separated data in @code{@uref{http://asymptote.sourceforge.net/gallery/2D graphs/diatom.csv,,diatom.csv}} and @code{@uref{http://asymptote.sourceforge.net/gallery/2D graphs/westnile.csv,,westnile.csv}}. @page @sp 1 @center @image{diatom} @sp 1 @center @image{westnile,,7.5cm} @end enumerate @page @node palette, three, graph, Base modules @section @code{palette} @anchor{images} @cindex images @code{Asymptote} can also generate color density images and palettes. The following palettes are predefined in @code{palette.asy}: @table @code @cindex @code{Grayscale} @item pen[] Grayscale(int NColors=256) a grayscale palette; @cindex @code{Rainbow} @item pen[] Rainbow(int NColors=32766) a rainbow spectrum; @cindex @code{BWRainbow} @item pen[] BWRainbow(int NColors=32761) a rainbow spectrum tapering off to black/white at the ends; @cindex @code{BWRainbow2} @item pen[] BWRainbow2(int NColors=32761) a double rainbow palette tapering off to black/white at the ends, with a linearly scaled intensity. @cindex @code{Wheel} @item pen[] Wheel(int NColors=32766) a full color wheel palette; @cindex @code{Gradient} @item pen[] Gradient(int NColors=256 ... pen[] p) a palette varying linearly over the specified array of pens, using NColors in each interpolation interval; @end table The function @code{cmyk(pen[] Palette)} may be used to convert any of these palettes to the @acronym{CMYK} colorspace. A color density plot using palette @code{palette} can be generated from a function @code{f}(@math{x},@math{y}) and added to a picture @code{pic}: @cindex @code{image} @verbatim bounds image(picture pic=currentpicture, real f(real, real), range range=Full, pair initial, pair final, int nx=ngraph, int ny=nx, pen[] palette, bool antialias=false) @end verbatim The function @code{f} will be sampled at @code{nx} and @code{ny} evenly spaced points over a rectangle defined by the points @code{initial} and @code{final}, respecting the current graphical scaling of @code{pic}. The color space is scaled according to the @math{z} axis scaling (@pxref{automatic scaling}). A bounds structure for the function values is returned: @verbatim struct bounds { real min; real max; // Possible tick intervals: int[] divisor; } @end verbatim @noindent This information can be used for generating an optional palette bar. The palette color space corresponds to a range of values specified by the argument @code{range}, which can be @code{Full}, @code{Automatic}, or an explicit range @code{Range(real min, real max)}. Here @code{Full} specifies a range varying from the minimum to maximum values of the function over the sampling interval, while @code{Automatic} selects "nice" limits. The example @code{@uref{http://asymptote.sourceforge.net/gallery/2D graphs/imagecontour.pdf,,imagecontour}@uref{http://asymptote.sourceforge.net/gallery/2D graphs/imagecontour.asy,,.asy}} illustrates how level sets (contour lines) can be drawn on a color density plot (@pxref{contour}). A color density plot can also be generated from an explicit real[][] array @code{data}: @cindex @code{image} @verbatim bounds image(picture pic=currentpicture, real[][] f, range range=Full, pair initial, pair final, pen[] palette, bool transpose=(initial.x < final.x && initial.y < final.y), bool copy=true, bool antialias=false); @end verbatim @noindent If the initial point is to the left and below the final point, by default the array indices are interpreted according to the Cartesian convention (first index: @math{x}, second index: @math{y}) rather than the usual matrix convention (first index: @math{-y}, second index: @math{x}). To construct an image from an array of irregularly spaced points and an array of values @code{f} at these points, use one of the routines @verbatim bounds image(picture pic=currentpicture, pair[] z, real[] f, range range=Full, pen[] palette) bounds image(picture pic=currentpicture, real[] x, real[] y, real[] f, range range=Full, pen[] palette) @end verbatim An optionally labelled palette bar may be generated with the routine @verbatim void palette(picture pic=currentpicture, Label L="", bounds bounds, pair initial, pair final, axis axis=Right, pen[] palette, pen p=currentpen, paletteticks ticks=PaletteTicks, bool copy=true, bool antialias=false); @end verbatim The color space of @code{palette} is taken to be over bounds @code{bounds} with scaling given by the @math{z} scaling of @code{pic}. The palette orientation is specified by @code{axis}, which may be one of @code{Right}, @code{Left}, @code{Top}, or @code{Bottom}. The bar is drawn over the rectangle from @code{initial} to @code{final}. The argument @code{paletteticks} is a special tick type (@pxref{ticks}) that takes the following arguments: @verbatim paletteticks PaletteTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, pen pTick=nullpen, pen ptick=nullpen); @end verbatim The image and palette bar can be fit to a frame and added and optionally aligned to a picture at the desired location: @anchor{image} @verbatiminclude image.asy @sp 1 @center @image{image} Here is an example that uses logarithmic scaling of the function values: @anchor{logimage} @verbatiminclude logimage.asy @sp 1 @center @image{logimage} One can also draw an image directly from a two-dimensional pen array or a function @code{pen f(int, int)}: @verbatim void image(picture pic=currentpicture, pen[][] data, pair initial, pair final, bool transpose=(initial.x < final.x && initial.y < final.y), bool copy=true, bool antialias=false); void image(picture pic=currentpicture, pen f(int, int), int width, int height, pair initial, pair final, bool transpose=(initial.x < final.x && initial.y < final.y), bool antialias=false); @end verbatim @noindent as illustrated in the following examples: @anchor{penimage} @verbatiminclude penimage.asy @sp 1 @center @image{penimage} @anchor{penfunctionimage} @verbatiminclude penfunctionimage.asy @sp 1 @center @image{penfunctionimage} For convenience, the module @code{palette} also defines functions that may be used to construct a pen array from a given function and palette: @verbatim pen[] palette(real[] f, pen[] palette); pen[][] palette(real[][] f, pen[] palette); @end verbatim @node three, obj, palette, Base modules @section @code{three} @cindex @code{three} @cindex @code{guide3} @cindex @code{path3} @cindex @code{cycle} @cindex @code{curl} @cindex @code{tension} @cindex @code{controls} This module fully extends the notion of guides and paths in @code{Asymptote} to three dimensions. It introduces the new types guide3, path3, and surface. Guides in three dimensions are specified with the same syntax as in two dimensions except that triples @code{(x,y,z)} are used in place of pairs @code{(x,y)} for the nodes and direction specifiers. This generalization of John Hobby's spline algorithm is shape-invariant under three-dimensional rotation, scaling, and shifting, and reduces in the planar case to the two-dimensional algorithm used in @code{Asymptote}, @code{MetaPost}, and @code{MetaFont} [cf.@ J. C. Bowman, Proceedings in Applied Mathematics and Mechanics, 7:1, 2010021-2010022 (2007)]. For example, a unit circle in the @math{XY} plane may be filled and drawn like this: @verbatiminclude unitcircle3.asy @sp 1 @center @image{unitcircle3} @noindent and then distorted into a saddle: @verbatiminclude saddle.asy @sp 1 @center @image{saddle} @noindent Module @code{three} provides constructors for converting two-dimensional paths to three-dimensional ones, and vice-versa: @cindex @code{path3} @cindex @code{path} @verbatim path3 path3(path p, triple plane(pair)=XYplane); path path(path3 p, pair P(triple)=xypart); @end verbatim @cindex @code{surface} @cindex @code{render} @cindex @code{defaultrender} A Bezier surface, the natural two-dimensional generalization of Bezier curves, is defined in @code{three_surface.asy} as a structure containing an array of Bezier patches. Surfaces may drawn with one of the routines @verbatim void draw(picture pic=currentpicture, surface s, int nu=1, int nv=1, material surfacepen=currentpen, pen meshpen=nullpen, light light=currentlight, light meshlight=nolight, string name="", render render=defaultrender); void draw(picture pic=currentpicture, surface s, int nu=1, int nv=1, material[] surfacepen, pen meshpen, light light=currentlight, light meshlight=nolight, string name="", render render=defaultrender); void draw(picture pic=currentpicture, surface s, int nu=1, int nv=1, material[] surfacepen, pen[] meshpen=nullpens, light light=currentlight, light meshlight=nolight, string name="", render render=defaultrender); @end verbatim The parameters @code{nu} and @code{nv} specify the number of subdivisions for drawing optional mesh lines for each Bezier patch. The optional @code{name} parameter is used as a prefix for naming the surface patches in the @acronym{PRC} model tree. Here material is a structure defined in @code{three_light.asy}: @verbatim struct material { pen[] p; // diffusepen,ambientpen,emissivepen,specularpen real opacity; real shininess; ... } @end verbatim @noindent These material properties are used to implement @code{OpenGL}-style lighting, based on the Phong-Blinn specular model. Sample Bezier surfaces are contained in the example files @code{@uref{http://asymptote.sourceforge.net/gallery/BezierSurface.pdf,,BezierSurface}@uref{http://asymptote.sourceforge.net/gallery/BezierSurface.asy,,.asy}}, @code{@uref{http://asymptote.sourceforge.net/gallery/teapot.pdf,,teapot}@uref{http://asymptote.sourceforge.net/gallery/teapot.asy,,.asy}}, and @code{@uref{http://asymptote.sourceforge.net/gallery/parametricsurface.pdf,,parametricsurface}@uref{http://asymptote.sourceforge.net/gallery/parametricsurface.asy,,.asy}}. The structure @code{render} contains specialized rendering options documented at the beginning of module @code{@uref{http://asymptote.sourceforge.net/gallery/three.pdf,,three}@uref{http://asymptote.sourceforge.net/gallery/three.asy,,.asy}}. @cindex patch-dependent colors @cindex vertex-dependent colors The examples @code{@uref{http://asymptote.sourceforge.net/gallery/3D graphs/elevation.pdf,,elevation}@uref{http://asymptote.sourceforge.net/gallery/3D graphs/elevation.asy,,.asy}} and @code{@uref{http://asymptote.sourceforge.net/gallery/sphericalharmonic.pdf,,sphericalharmonic}@uref{http://asymptote.sourceforge.net/gallery/sphericalharmonic.asy,,.asy}} illustrate how to draw a surface with patch-dependent colors. The examples @code{@uref{http://asymptote.sourceforge.net/gallery/vertexshading.pdf,,vertexshading}@uref{http://asymptote.sourceforge.net/gallery/vertexshading.asy,,.asy}} and @code{@uref{http://asymptote.sourceforge.net/gallery/3D graphs/smoothelevation.pdf,,smoothelevation}@uref{http://asymptote.sourceforge.net/gallery/3D graphs/smoothelevation.asy,,.asy}} illustrate vertex-dependent colors, which is supported for both @code{Asymptote}'s native @code{OpenGL} renderer and two-dimensional projections. Since the @acronym{PRC} output format does not currently support vertex shading of Bezier surfaces, @acronym{PRC} patches are shaded with the mean of the four vertex colors. @cindex @code{surface} @cindex @code{planar} @cindex @code{Bezier patch} @cindex @code{Bezier triangle} A surface can be constructed from a cyclic @code{path3} with the constructor @verbatim surface surface(path3 external, triple[] internal=new triple[], pen[] colors=new pen[], bool3 planar=default); @end verbatim @noindent and then filled: @verbatim draw(surface(unitsquare3,new triple[] {X,Y,Z,O}),red); draw(surface(O--X{Y}..Y{-X}--cycle,new triple[] {Z}),red); draw(surface(path3(polygon(5))),red,nolight); draw(surface(unitcircle3),red,nolight); draw(surface(unitcircle3,new pen[] {red,green,blue,black}),nolight); @end verbatim @noindent The first example draws a Bezier patch and the second example draws a Bezier triangle. The third and fourth examples are planar surfaces. The last example constructs a patch with vertex-specific colors. A three-dimensional planar surface in the plane @code{plane} can be constructed from a two-dimensional cyclic path @code{g} with the constructor @cindex @code{surface} @verbatim surface surface(path p, triple plane(pair)=XYplane); @end verbatim @noindent and then filled: @verbatim draw(surface((0,0)--E+2N--2E--E+N..0.2E..cycle),red); @end verbatim @noindent @cindex @code{bezulate} Planar Bezier surfaces patches are constructed using Orest Shardt's @code{bezulate} routine, which decomposes (possibly nonsimply connected) regions bounded (according to the @code{zerowinding} fill rule) by simple cyclic paths (intersecting only at the endpoints) into subregions bounded by cyclic paths of length @code{4} or less. A more efficient routine also exists for drawing tessellations composed of many 3D triangles, with specified vertices, and optional normals or vertex colors: @cindex @code{draw} @cindex @code{triangles} @cindex @code{tessellation} @verbatim void draw(picture pic=currentpicture, triple[] v, int[][] vi, triple[] n={}, int[][] ni={}, material m=currentpen, pen[] p={}, int[][] pi={}, light light=currentlight); @end verbatim Here, the triple array @code{v} lists the distinct vertices, while the array @code{vi} lists integer arrays of length 3 containing the indices of @code{v} corresponding to the vertices of each triangle. Similarly, the arguments @code{n} and @code{ni} contain optional normal data and @code{p} and @code{pi} contain optional pen vertex data. An example of this tessellation facility is given in @code{@uref{http://asymptote.sourceforge.net/gallery/triangles.pdf,,triangles}@uref{http://asymptote.sourceforge.net/gallery/triangles.asy,,.asy}}. @cindex @code{thin} @cindex @code{thick} @cindex @code{tube} Arbitrary thick three-dimensional curves and line caps (which the @code{OpenGL} standard does not require implementations to provide) are constructed with @verbatim tube tube(path3 p, real width, render render=defaultrender); @end verbatim @noindent this returns a tube structure representing a tube of diameter @code{width} centered approximately on @code{g}. The tube structure consists of a surface @code{s} and the actual tube center, path3 @code{center}. Drawing thick lines as tubes can be slow to render, especially with the @code{Adobe Reader} renderer. The setting @code{thick=false} can be used to disable this feature and force all lines to be drawn with @code{linewidth(0)} (one pixel wide, regardless of the resolution). By default, mesh and contour lines in three-dimensions are always drawn thin, unless an explicit line width is given in the pen parameter or the setting @code{thin} is set to @code{false}. The pens @code{thin()} and @code{thick()} defined in @code{plain_pens.asy} can also be used to override these defaults for specific draw commands. @noindent There are four choices for viewing 3D @code{Asymptote} output: @enumerate @cindex @code{OpenGL} @cindex @code{render} @cindex @code{outformat} @cindex @code{multisample} @item Use the native @code{Asymptote} adaptive @code{OpenGL}-based renderer (with the command-line option @code{-V} and the default settings @code{outformat=""} and @code{render=-1}). If you encounter warnings from your graphics card driver, try specifying @code{-glOptions=-indirect} on the command line. On @code{UNIX} systems with graphics support for multisampling, the sample width can be controlled with the setting @code{multisample}. An initial screen position can be specified with the pair setting @code{position}, where negative values are interpreted as relative to the corresponding maximum screen dimension. The default settings @cindex mouse bindings @verbatim import settings; leftbutton=new string[] {"rotate","zoom","shift","pan"}; middlebutton=new string[] {"menu"}; rightbutton=new string[] {"zoom/menu","rotateX","rotateY","rotateZ"}; wheelup=new string[] {"zoomin"}; wheeldown=new string[] {"zoomout"}; @end verbatim bind the mouse buttons as follows: @itemize @item Left: rotate @item Shift Left: zoom @item Ctrl Left: shift viewport @item Alt Left: pan @item Middle: menu (must be unmodified; ignores Shift, Ctrl, and Alt) @item Wheel Up: zoom in @item Wheel Down: zoom out @item Right: zoom/menu (must be unmodified) @item Right double click: menu @item Shift Right: rotate about the X axis @item Ctrl Right: rotate about the Y axis @item Alt Right: rotate about the Z axis @end itemize The keyboard shortcuts are: @cindex keyboard bindings: @itemize @item h: home @item f: toggle fitscreen @item x: spin about the X axis @item y: spin about the Y axis @item z: spin about the Z axis @item s: stop spinning @item m: rendering mode (solid/mesh/patch) @item e: export @item c: show camera parameters @item p: play animation @item r: reverse animation @item : step animation @item +: expand @item =: expand @item >: expand @item -: shrink @item _: shrink @item <: shrink @item q: exit @item Ctrl-q: exit @end itemize @cindex @code{antialias} @cindex @code{maxviewport} @cindex @code{maxtile} @cindex @code{glOptions} @cindex @code{iconic} @cindex @code{black stripes} @item Render the scene to a specified rasterized format @code{outformat} at the resolution of @code{n} pixels per @code{bp}, as specified by the setting @code{render=n}. A negative value of @code{n} is interpreted as @code{|2n|} for @acronym{EPS} and @acronym{PDF} formats and @code{|n|} for other formats. The default value of @code{render} is -1. By default, the scene is internally rendered at twice the specified resolution; this can be disabled by setting @code{antialias=1}. High resolution rendering is done by tiling the image. If your graphics card allows it, the rendering can be made more efficient by increasing the maximum tile size @code{maxtile} to your screen dimensions (indicated by @code{maxtile=(0,0)}. If your video card generates unwanted black stripes in the output, try setting the horizontal and vertical components of @code{maxtiles} to something less than your screen dimensions. The tile size is also limited by the setting @code{maxviewport}, which restricts the maximum width and height of the viewport. On @code{UNIX} systems some graphics drivers support batch mode (@code{-noV}) rendering in an iconified window; this can be enabled with the setting @code{iconify=true}. Some (broken) @code{UNIX} graphics drivers may require the command line setting @code{-glOptions=-indirect}, which requests (slower) indirect rendering. @cindex @code{prc} @cindex @code{views} @item Embed the 3D @acronym{PRC} format in a @acronym{PDF} file and view the resulting @acronym{PDF} file with version @code{9.0} or later of @code{Adobe Reader}. In addition to the default @code{settings.prc=true}, this requires @code{settings.outformat="pdf"}, which can be specified by the command line option @code{-f pdf}, put in the @code{Asymptote} configuration file (@pxref{configuration file}), or specified in the script before @code{@uref{http://asymptote.sourceforge.net/gallery/three.pdf,,three}@uref{http://asymptote.sourceforge.net/gallery/three.asy,,.asy}} (or @code{@uref{http://asymptote.sourceforge.net/gallery/graph3.pdf,,graph3}@uref{http://asymptote.sourceforge.net/gallery/graph3.asy,,.asy}}) is imported. The @code{media9} LaTeX package is also required (@pxref{embed}). The example @code{@uref{http://asymptote.sourceforge.net/gallery/pdb.pdf,,pdb}@uref{http://asymptote.sourceforge.net/gallery/pdb.asy,,.asy}} illustrates how one can generate a list of predefined views (see @code{100d.views}). A stationary preview image with a resolution of @code{n} pixels per @code{bp} can be embedded with the setting @code{render=n}; this allows the file to be viewed with other @code{PDF} viewers. Alternatively, the file @code{externalprc.tex} illustrates how the resulting @acronym{PRC} and rendered image files can be extracted and processed in a separate @code{LaTeX} file. However, see @ref{LaTeX usage} for an easier way to embed three-dimensional @code{Asymptote} pictures within @code{LaTeX}. For specialized applications where only the raw @acronym{PRC} file is required, specify @code{settings.outformat="prc"}. The open-source @acronym{PRC} specification is available from @url{http://livedocs.adobe.com/acrobat_sdk/9/Acrobat9_HTMLHelp/API_References/PRCReference/PRC_Format_Specification/}. @item Project the scene to a two-dimensional vector (@acronym{EPS} or @acronym{PDF}) format with @code{render=0}. Only limited hidden surface removal facilities are currently available with this approach (@pxref{PostScript3D}). @end enumerate @cindex @code{double deferred drawing} Automatic picture sizing in three dimensions is accomplished with double deferred drawing. The maximal desired dimensions of the scene in each of the three dimensions can optionally be specified with the routine @cindex @code{size3} @verbatim void size3(picture pic=currentpicture, real x, real y=x, real z=y, bool keepAspect=pic.keepAspect); @end verbatim @noindent @cindex margins @cindex @code{viewportmargin} @cindex @code{viewportsize} The resulting simplex linear programming problem is then solved to produce a 3D version of a frame (actually implemented as a 3D picture). The result is then fit with another application of deferred drawing to the viewport dimensions corresponding to the usual two-dimensional picture @code{size} parameters. The global pair @code{viewportmargin} may be used to add horizontal and vertical margins to the viewport dimensions. Alternatively, a minimum @code{viewportsize} may be specified. A 3D picture @code{pic} can be explicitly fit to a 3D frame by calling @cindex @code{fit3} @verbatim frame pic.fit3(projection P=currentprojection); @end verbatim @noindent and then added to picture @code{dest} about @code{position} with @cindex @code{add} @verbatim void add(picture dest=currentpicture, frame src, triple position=(0,0,0)); @end verbatim @cindex @code{O} @cindex @code{X} @cindex @code{Y} @cindex @code{Z} @cindex @code{unitcircle} For convenience, the @code{three} module defines @code{O=(0,0,0)}, @code{X=(1,0,0)}, @code{Y=(0,1,0)}, and @code{Z=(0,0,1)}, along with a unitcircle in the XY plane: @verbatim path3 unitcircle3=X..Y..-X..-Y..cycle; @end verbatim @cindex @code{circle} A general (approximate) circle can be drawn perpendicular to the direction @code{normal} with the routine @verbatim path3 circle(triple c, real r, triple normal=Z); @end verbatim @cindex @code{arc} A circular arc centered at @code{c} with radius @code{r} from @code{c+r*dir(theta1,phi1)} to @code{c+r*dir(theta2,phi2)}, drawing counterclockwise relative to the normal vector @code{cross(dir(theta1,phi1),dir(theta2,phi2))} if @code{theta2 > theta1} or if @code{theta2 == theta1} and @code{phi2 >= phi1}, can be constructed with @verbatim path3 arc(triple c, real r, real theta1, real phi1, real theta2, real phi2, triple normal=O); @end verbatim The normal must be explicitly specified if @code{c} and the endpoints are colinear. If @code{r} < 0, the complementary arc of radius @code{|r|} is constructed. For convenience, an arc centered at @code{c} from triple @code{v1} to @code{v2} (assuming @code{|v2-c|=|v1-c|}) in the direction CCW (counter-clockwise) or CW (clockwise) may also be constructed with @verbatim path3 arc(triple c, triple v1, triple v2, triple normal=O, bool direction=CCW); @end verbatim @noindent When high accuracy is needed, the routines @code{Circle} and @code{Arc} defined in @code{graph3} may be used instead. See @ref{GaussianSurface} for an example of a three-dimensional circular arc. @cindex @code{plane} The representation @code{O--O+u--O+u+v--O+v--cycle} of the plane passing through point @code{O} with normal @code{cross(u,v)} is returned by @verbatim path3 plane(triple u, triple v, triple O=O); @end verbatim A three-dimensional box with opposite vertices at triples @code{v1} and @code{v2} may be drawn with the function @cindex @code{box} @verbatim path3[] box(triple v1, triple v2); @end verbatim @noindent For example, a unit box is predefined as @cindex @code{box} @cindex @code{unitbox} @verbatim path3[] unitbox=box(O,(1,1,1)); @end verbatim @code{Asymptote} also provides optimized definitions for the three-dimensional paths @code{unitsquare3} and @code{unitcircle3}, along with the surfaces @code{unitdisk}, @code{unitplane}, @code{unitcube}, @code{unitcylinder}, @code{unitcone}, @code{unitsolidcone}, @code{unitfrustum(real t1, real t2)}, @code{unitsphere}, and @code{unithemisphere}. @noindent These projections to two dimensions are predefined: @table @code @item oblique @item oblique(real angle) @cindex @code{oblique} @cindex @code{obliqueZ} The point @code{(x,y,z)} is projected to @code{(x-0.5z,y-0.5z)}. If an optional real argument is given, the negative @math{z} axis is drawn at this angle in degrees. The projection @code{obliqueZ} is a synonym for @code{oblique}. @item obliqueX @item obliqueX(real angle) @cindex @code{obliqueX} The point @code{(x,y,z)} is projected to @code{(y-0.5x,z-0.5x)}. If an optional real argument is given, the negative @math{x} axis is drawn at this angle in degrees. @item obliqueY @item obliqueY(real angle) @cindex @code{obliqueY} The point @code{(x,y,z)} is projected to @code{(x+0.5y,z+0.5y)}. If an optional real argument is given, the positive @math{y} axis is drawn at this angle in degrees. @cindex @code{orthographic} @cindex @code{up} @cindex @code{target} @cindex @code{showtarget} @cindex @code{center} @item orthographic(triple camera, triple up=Z, triple target=O, @*@ @ @ @ @ @ @ @ @ @ @ @ @ real zoom=1, pair viewportshift=0, bool showtarget=true, @*@ @ @ @ @ @ @ @ @ @ @ @ @ bool center=false) This projects from three to two dimensions using the view as seen at a point infinitely far away in the direction @code{unit(camera)}, orienting the camera so that, if possible, the vector @code{up} points upwards. Parallel lines are projected to parallel lines. The bounding volume is expanded to include @code{target} if @code{showtarget=true}. If @code{center=true}, the target will be adjusted to the center of the bounding volume. @item orthographic(real x, real y, real z, triple up=Z, triple target=O, @*@ @ @ @ @ @ @ @ @ @ @ @ @ real zoom=1, pair viewportshift=0, bool showtarget=true, @*@ @ @ @ @ @ @ @ @ @ @ @ @ bool center=false) This is equivalent to @verbatim orthographic((x,y,z),up,target,zoom,viewportshift,showtarget,center) @end verbatim The routine @cindex @code{camera} @verbatim triple camera(real alpha, real beta); @end verbatim can be used to compute the camera position with the @math{x} axis below the horizontal at angle @code{alpha}, the @math{y} axis below the horizontal at angle @code{beta}, and the @math{z} axis up. @cindex @code{autoadjust} @item perspective(triple camera, triple up=Z, triple target=O, @*@ @ @ @ @ @ @ @ @ @ @ @ real zoom=1, real angle=0, pair viewportshift=0, @*@ @ @ @ @ @ @ @ @ @ @ @ bool showtarget=true, bool autoadjust=true, @*@ @ @ @ @ @ @ @ @ @ @ @ bool center=autoadjust) @cindex @code{perspective} @cindex @code{NURBS} This projects from three to two dimensions, taking account of perspective, as seen from the location @code{camera} looking at @code{target}, orienting the camera so that, if possible, the vector @code{up} points upwards. If @code{render=0}, projection of three-dimensional cubic Bezier splines is implemented by approximating a two-dimensional nonuniform rational B-spline (@acronym{NURBS}) with a two-dimensional Bezier curve containing additional nodes and control points. If @code{autoadjust=true}, the camera will automatically be adjusted to lie outside the bounding volume for all possible interactive rotations about @code{target}. If @code{center=true}, the target will be adjusted to the center of the bounding volume. @item perspective(real x, real y, real z, triple up=Z, triple target=O, @*@ @ @ @ @ @ @ @ @ @ @ @ real zoom=1, real angle=0, pair viewportshift=0, @*@ @ @ @ @ @ @ @ @ @ @ @ bool showtarget=true, bool autoadjust=true, @*@ @ @ @ @ @ @ @ @ @ @ @ bool center=autoadjust) This is equivalent to @verbatim perspective((x,y,z),up,target,zoom,angle,viewportshift,showtarget, autoadjust,center) @end verbatim @end table @cindex @code{currentprojection} @noindent The default projection, @code{currentprojection}, is initially set to @code{perspective(5,4,2)}. @cindex @code{LeftView} @cindex @code{RightView} @cindex @code{FrontView} @cindex @code{BackView} @cindex @code{BottomView} @cindex @code{TopView} We also define standard orthographic views used in technical drawing: @verbatim projection LeftView=orthographic(-X,showtarget=true); projection RightView=orthographic(X,showtarget=true); projection FrontView=orthographic(-Y,showtarget=true); projection BackView=orthographic(Y,showtarget=true); projection BottomView=orthographic(-Z,showtarget=true); projection TopView=orthographic(Z,showtarget=true); @end verbatim @noindent The function @cindex @code{addViews} @verbatim void addViews(picture dest=currentpicture, picture src, projection[][] views=SixViewsUS, bool group=true, filltype filltype=NoFill); @end verbatim @noindent adds to picture @code{dest} an array of views of picture @code{src} using the layout projection[][] @code{views}. The default layout @code{SixViewsUS} aligns the projection @code{FrontView} below @code{TopView} and above @code{BottomView}, to the right of @code{LeftView} and left of @code{RightView} and @code{BackView}. The predefined layouts are: @cindex @code{ThreeViewsUS} @cindex @code{SixViewsUS} @cindex @code{ThreeViewsFR} @cindex @code{SixViewsFR} @cindex @code{ThreeViews} @cindex @code{SixViews} @verbatim projection[][] ThreeViewsUS={{TopView}, {FrontView,RightView}}; projection[][] SixViewsUS={{null,TopView}, {LeftView,FrontView,RightView,BackView}, {null,BottomView}}; projection[][] ThreeViewsFR={{RightView,FrontView}, {null,TopView}}; projection[][] SixViewsFR={{null,BottomView}, {RightView,FrontView,LeftView,BackView}, {null,TopView}}; projection[][] ThreeViews={{FrontView,TopView,RightView}}; projection[][] SixViews={{FrontView,TopView,RightView}, {BackView,BottomView,LeftView}}; @end verbatim A triple or path3 can be projected to a pair or path, with @code{project(triple, projection P=currentprojection)} or @code{project(path3, projection P=currentprojection)}. It is occasionally useful to be able to invert a projection, sending a pair @code{z} onto the plane perpendicular to @code{normal} and passing through @code{point}: @cindex @code{invert} @verbatim triple invert(pair z, triple normal, triple point, projection P=currentprojection); @end verbatim @noindent A pair @code{z} on the projection plane can be inverted to a triple with the routine @verbatim triple invert(pair z, projection P=currentprojection); @end verbatim @noindent A pair direction @code{dir} on the projection plane can be inverted to a triple direction relative to a point @code{v} with the routine @verbatim triple invert(pair dir, triple v, projection P=currentprojection). @end verbatim @cindex @code{transform3} @cindex @code{identity4} Three-dimensional objects may be transformed with one of the following built-in transform3 types (the identity transformation is @code{identity4}): @table @code @item shift(triple v) @cindex @code{shift} translates by the triple @code{v}; @item xscale3(real x) @cindex @code{xscale3} scales by @code{x} in the @math{x} direction; @item yscale3(real y) @cindex @code{yscale3} scales by @code{y} in the @math{y} direction; @item zscale3(real z) @cindex @code{zscale3} scales by @code{z} in the @math{z} direction; @item scale3(real s) @cindex @code{scale3} scales by @code{s} in the @math{x}, @math{y}, and @math{z} directions; @item scale(real x, real y, real z) @cindex @code{scale} scales by @code{x} in the @math{x} direction, by @code{y} in the @math{y} direction, and by @code{z} in the @math{z} direction; @cindex @code{rotate} @item rotate(real angle, triple v) rotates by @code{angle} in degrees about an axis @code{v} through the origin; @item rotate(real angle, triple u, triple v) rotates by @code{angle} in degrees about the axis @code{u--v}; @item reflect(triple u, triple v, triple w) reflects about the plane through @code{u}, @code{v}, and @code{w}. @cindex @code{XY} @end table When not multiplied on the left by a transform3, three-dimensional @TeX{} Labels are drawn as Bezier surfaces directly on the projection plane: @cindex @code{label} @verbatim void label(picture pic=currentpicture, Label L, triple position, align align=NoAlign, pen p=currentpen, light light=nolight, string name="", render render=defaultrender, interaction interaction= settings.autobillboard ? Billboard : Embedded) @end verbatim @noindent @cindex @code{Billboard} @cindex @code{Embedded} The optional @code{name} parameter is used as a prefix for naming the label patches in the @acronym{PRC} model tree. The default interaction is @code{Billboard}, which means that labels are rotated interactively so that they always face the camera. The interaction @code{Embedded} means that the label interacts as a normal @code{3D} surface, as illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/billboard.pdf,,billboard}@uref{http://asymptote.sourceforge.net/gallery/billboard.asy,,.asy}}. @cindex @code{transform} @cindex @code{XY} @cindex @code{YZ} @cindex @code{ZX} @cindex @code{YX} @cindex @code{ZY} @cindex @code{ZX} Alternatively, a label can be transformed from the @code{XY} plane by an explicit transform3 or mapped to a specified two-dimensional plane with the predefined transform3 types @code{XY}, @code{YZ}, @code{ZX}, @code{YX}, @code{ZY}, @code{ZX}. There are also modified versions of these transforms that take an optional argument @code{projection P=currentprojection} that rotate and/or flip the label so that it is more readable from the initial viewpoint. @cindex @code{planeproject} A transform3 that projects in the direction @code{dir} onto the plane with normal @code{n} through point @code{O} is returned by @verbatim transform3 planeproject(triple n, triple O=O, triple dir=n); @end verbatim @noindent One can use @cindex @code{normal} @verbatim triple normal(path3 p); @end verbatim @noindent to find the unit normal vector to a planar three-dimensional path @code{p}. As illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/planeproject.pdf,,planeproject}@uref{http://asymptote.sourceforge.net/gallery/planeproject.asy,,.asy}}, a transform3 that projects in the direction @code{dir} onto the plane defined by a planar path @code{p} is returned by @verbatim transform3 planeproject(path3 p, triple dir=normal(p)); @end verbatim The functions @cindex @code{extrude} @verbatim surface extrude(path p, triple axis=Z); surface extrude(Label L, triple axis=Z); @end verbatim @noindent return the surface obtained by extruding path @code{p} or Label @code{L} along @code{axis}. @cindex @code{length} @cindex @code{size} @cindex @code{point} @cindex @code{dir} @cindex @code{accel} @cindex @code{radius} @cindex @code{precontrol} @cindex @code{postcontrol} @cindex @code{arclength} @cindex @code{arctime} @cindex @code{reverse} @cindex @code{subpath} @cindex @code{intersect} @cindex @code{intersections} @cindex @code{intersectionpoint} @cindex @code{intersectionpoints} @cindex @code{min} @cindex @code{max} @cindex @code{cyclic} @cindex @code{straight} Three-dimensional versions of the path functions @code{length}, @code{size}, @code{point}, @code{dir}, @code{accel}, @code{radius}, @code{precontrol}, @code{postcontrol}, @code{arclength}, @code{arctime}, @code{reverse}, @code{subpath}, @code{intersect}, @code{intersections}, @code{intersectionpoint}, @code{intersectionpoints}, @code{min}, @code{max}, @code{cyclic}, and @code{straight} are also defined. The routine @cindex @code{intersections} @verbatim real[] intersect(path3 p, surface s, real fuzz=-1); @end verbatim @noindent returns a real array of length 3 containing the intersection times, if any, of a path @code{p} with a surface @code{s}. The routine @verbatim real[][] intersections(path3 p, surface s, real fuzz=-1); @end verbatim @noindent returns all (unless there are infinitely many) intersection times of a path @code{p} with a surface @code{s} as a sorted array of real arrays of length 3, and @cindex @code{intersectionpoints} @verbatim triple[] intersectionpoints(path3 p, surface s, real fuzz=-1); @end verbatim @noindent returns the corresponding intersection points. Here, the computations are performed to the absolute error specified by @code{fuzz}, or if @code{fuzz < 0}, to machine precision. The routine @cindex @code{orient} @verbatim real orient(triple a, triple b, triple c, triple d); @end verbatim @noindent is a numerically robust computation of @code{dot(cross(a-d,b-d),c-d)}, which is the determinant @verbatim |a.x a.y a.z 1| |b.x b.y b.z 1| |c.x c.y c.z 1| |d.x d.y d.z 1| @end verbatim The routine @cindex @code{insphere} @verbatim real insphere(triple a, triple b, triple c, triple d, triple e); @end verbatim @noindent returns a positive (negative) value if @code{e} lies inside (outside) the sphere passing through points @code{a,b,c,d} oriented so that @code{dot(cross(a-d,b-d),c-d)} is positive, or zero if all five points are cospherical. The value returned is the determinant @verbatim |a.x a.y a.z a.x^2+a.y^2+a.z^2 1| |b.x b.y b.z b.x^2+b.y^2+b.z^2 1| |c.x c.y c.z c.x^2+c.y^2+c.z^2 1| |d.x d.y d.z d.x^2+d.y^2+d.z^2 1| |e.x e.y e.z e.x^2+e.y^2+e.z^2 1| @end verbatim Here is an example showing all five guide3 connectors: @verbatiminclude join3.asy @sp 1 @center @image{join3} @cindex @code{BeginBar3} @cindex @code{EndBar3} @cindex @code{Bar3} @cindex @code{Bars3} @cindex @code{BeginArrow3} @cindex @code{MidArrow3} @cindex @code{EndArrow3} @cindex @code{Arrow3} @cindex @code{Arrows3} @cindex @code{BeginArcArrow3} @cindex @code{MidArcArrow3} @cindex @code{EndArcArrow3} @cindex @code{ArcArrow3} @cindex @code{ArcArrows3} @cindex @code{DefaultHead3} @cindex @code{HookHead3} @cindex @code{TeXHead3} Three-dimensional versions of bars or arrows can be drawn with one of the specifiers @code{None}, @code{Blank}, @code{BeginBar3}, @code{EndBar3} (or equivalently @code{Bar3}), @code{Bars3}, @code{BeginArrow3}, @code{MidArrow3}, @code{EndArrow3} (or equivalently @code{Arrow3}), @code{Arrows3}, @code{BeginArcArrow3}, @code{EndArcArrow3} (or equivalently @code{ArcArrow3}), @code{MidArcArrow3}, and @code{ArcArrows3}. Three-dimensional bars accept the optional arguments @code{(real size=0, triple dir=O)}. If @code{size=O}, the default bar length is used; if @code{dir=O}, the bar is drawn perpendicular to the path and the initial viewing direction. The predefined three-dimensional arrowhead styles are @code{DefaultHead3}, @code{HookHead3}, @code{TeXHead3}. Versions of the two-dimensional arrowheads lifted to three-dimensional space and aligned according to the initial viewpoint (or an optionally specified @code{normal} vector) are also defined: @code{DefaultHead2(triple normal=O)}, @code{HookHead2(triple normal=O)}, @code{TeXHead2(triple normal=O)}. These are illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/arrows3.pdf,,arrows3}@uref{http://asymptote.sourceforge.net/gallery/arrows3.asy,,.asy}}. @cindex @code{NoMargin3} @cindex @code{BeginMargin3} @cindex @code{EndMargin3} @cindex @code{Margin3} @cindex @code{Margins3} @cindex @code{BeginPenMargin2} @cindex @code{EndPenMargin2} @cindex @code{PenMargin2} @cindex @code{PenMargins2} @cindex @code{BeginPenMargin3} @cindex @code{EndPenMargin3} @cindex @code{PenMargin3} @cindex @code{PenMargins3} @cindex @code{BeginDotMargin3} @cindex @code{EndDotMargin3} @cindex @code{DotMargin3} @cindex @code{DotMargins3} @cindex @code{Margin3} @cindex @code{TrueMargin3} Module @code{three} also defines the three-dimensional margins @code{NoMargin3}, @code{BeginMargin3}, @code{EndMargin3}, @code{Margin3}, @code{Margins3}, @code{BeginPenMargin2}, @code{EndPenMargin2}, @code{PenMargin2}, @code{PenMargins2}, @code{BeginPenMargin3}, @code{EndPenMargin3}, @code{PenMargin3}, @code{PenMargins3}, @code{BeginDotMargin3}, @code{EndDotMargin3}, @code{DotMargin3}, @code{DotMargins3}, @code{Margin3}, and @code{TrueMargin3}. @cindex @code{pixel} The routine @verbatim void pixel(picture pic=currentpicture, triple v, pen p=currentpen, real width=1); @end verbatim @noindent can be used to draw on picture @code{pic} a pixel of width @code{width} at position @code{v} using pen @code{p}. Further three-dimensional examples are provided in the files @code{@uref{http://asymptote.sourceforge.net/gallery/near_earth.pdf,,near_earth}@uref{http://asymptote.sourceforge.net/gallery/near_earth.asy,,.asy}}, @code{@uref{http://asymptote.sourceforge.net/gallery/conicurv.pdf,,conicurv}@uref{http://asymptote.sourceforge.net/gallery/conicurv.asy,,.asy}}, and (in the @code{animations} subdirectory) @code{@uref{http://asymptote.sourceforge.net/gallery/cube.pdf,,cube}@uref{http://asymptote.sourceforge.net/gallery/cube.asy,,.asy}}. @anchor{PostScript3D} @cindex 3D @code{PostScript} Limited support for projected vector graphics (effectively three-dimensional nonrendered @code{PostScript}) is available with the setting @code{render=0}. This currently only works for piecewise planar surfaces, such as those produced by the parametric @code{surface} routines in the @code{graph3} module. Surfaces produced by the @code{solids} package will also be properly rendered if the parameter @code{nslices} is sufficiently large. @cindex hidden surface removal @cindex @code{face} In the module @code{bsp}, hidden surface removal of planar pictures is implemented using a binary space partition and picture clipping. A planar path is first converted to a structure @code{face} derived from @code{picture}. A @code{face} may be given to a two-dimensional drawing routine in place of any @code{picture} argument. An array of such faces may then be drawn, removing hidden surfaces: @verbatim void add(picture pic=currentpicture, face[] faces, projection P=currentprojection); @end verbatim Labels may be projected to two dimensions, using projection @code{P}, onto the plane passing through point @code{O} with normal @code{cross(u,v)} by multiplying it on the left by the transform @verbatim transform transform(triple u, triple v, triple O=O, projection P=currentprojection); @end verbatim Here is an example that shows how a binary space partition may be used to draw a two-dimensional vector graphics projection of three orthogonal intersecting planes: @verbatiminclude planes.asy @sp 1 @center @image{planes} @node obj, graph3, three, Base modules @section @code{obj} @cindex @code{obj} This module allows one to construct surfaces from simple obj files, as illustrated in the example files @code{@uref{http://asymptote.sourceforge.net/gallery/galleon.pdf,,galleon}@uref{http://asymptote.sourceforge.net/gallery/galleon.asy,,.asy}} and @code{@uref{http://asymptote.sourceforge.net/gallery/triceratops.pdf,,triceratops}@uref{http://asymptote.sourceforge.net/gallery/triceratops.asy,,.asy}}. @node graph3, grid3, obj, Base modules @section @code{graph3} @cindex @code{graph3} @cindex 3D graphs This module implements three-dimensional versions of the functions in @code{graph.asy}. @cindex @code{xaxis3} @cindex @code{yaxis3} @cindex @code{zaxis3} @noindent To draw an @math{x} axis in three dimensions, use the routine @verbatim void xaxis3(picture pic=currentpicture, Label L="", axis axis=YZZero, real xmin=-infinity, real xmax=infinity, pen p=currentpen, ticks3 ticks=NoTicks3, arrowbar3 arrow=None, bool above=false); @end verbatim @noindent Analogous routines @code{yaxis} and @code{zaxis} can be used to draw @math{y} and @math{z} axes in three dimensions. There is also a routine for drawing all three axis: @verbatim void axes3(picture pic=currentpicture, Label xlabel="", Label ylabel="", Label zlabel="", bool extend=false, triple min=(-infinity,-infinity,-infinity), triple max=(infinity,infinity,infinity), pen p=currentpen, arrowbar3 arrow=None); @end verbatim @cindex @code{YZEquals} @cindex @code{XZEquals} @cindex @code{XYEquals} @cindex @code{YZZero} @cindex @code{XZZero} @cindex @code{XYZero} @cindex @code{Bounds} @noindent The predefined three-dimensional axis types are @verbatim axis YZEquals(real y, real z, triple align=O, bool extend=false); axis XZEquals(real x, real z, triple align=O, bool extend=false); axis XYEquals(real x, real y, triple align=O, bool extend=false); axis YZZero(triple align=O, bool extend=false); axis XZZero(triple align=O, bool extend=false); axis XYZero(triple align=O, bool extend=false); axis Bounds(int type=Both, int type2=Both, triple align=O, bool extend=false); @end verbatim @noindent The optional @code{align} parameter to these routines can be used to specify the default axis and tick label alignments. The @code{Bounds} axis accepts two type parameters, each of which must be one of @code{Min}, @code{Max}, or @code{Both}. These parameters specify which of the four possible three-dimensional bounding box edges should be drawn. @cindex @code{NoTicks3} @cindex @code{InTicks} @cindex @code{OutTicks} @cindex @code{InOutTicks} The three-dimensional tick options are @code{NoTicks3}, @code{InTicks}, @code{OutTicks}, and @code{InOutTicks}. These specify the tick directions for the @code{Bounds} axis type; other axis types inherit the direction that would be used for the @code{Bounds(Min,Min)} axis. Here is an example of a helix and bounding box axes with ticks and axis labels, using orthographic projection: @verbatiminclude helix.asy @sp 1 @center @image{helix} The next example illustrates three-dimensional @math{x}, @math{y}, and @math{z} axes, without autoscaling of the axis limits: @cindex @code{axis} @verbatiminclude axis3.asy @sp 1 @center @image{axis3} One can also place ticks along a general three-dimensional axis: @cindex @code{axis} @verbatiminclude generalaxis3.asy @sp 1 @center @image{generalaxis3} @cindex @code{surface} @cindex @code{Spline} @cindex parametric surface Surface plots of matrices and functions over the region @code{box(a,b)} in the @math{XY} plane are also implemented: @verbatim surface surface(real[][] f, pair a, pair b, bool[][] cond={}); surface surface(real[][] f, pair a, pair b, splinetype xsplinetype, splinetype ysplinetype=xsplinetype, bool[][] cond={}); surface surface(real[][] f, real[] x, real[] y, splinetype xsplinetype=null, splinetype ysplinetype=xsplinetype, bool[][] cond={}) surface surface(triple[][] f, bool[][] cond={}); surface surface(real f(pair z), pair a, pair b, int nx=nmesh, int ny=nx, bool cond(pair z)=null); surface surface(real f(pair z), pair a, pair b, int nx=nmesh, int ny=nx, splinetype xsplinetype, splinetype ysplinetype=xsplinetype, bool cond(pair z)=null); surface surface(triple f(pair z), real[] u, real[] v, splinetype[] usplinetype, splinetype[] vsplinetype=Spline, bool cond(pair z)=null); surface surface(triple f(pair z), pair a, pair b, int nu=nmesh, int nv=nu, bool cond(pair z)=null); surface surface(triple f(pair z), pair a, pair b, int nu=nmesh, int nv=nu, splinetype[] usplinetype, splinetype[] vsplinetype=Spline, bool cond(pair z)=null); @end verbatim @noindent The final two versions draw parametric surfaces for a function @math{f(u,v)} over the parameter space @code{box(a,b)}, as illustrated in the example @code{@uref{http://asymptote.sourceforge.net/gallery/parametricsurface.pdf,,parametricsurface}@uref{http://asymptote.sourceforge.net/gallery/parametricsurface.asy,,.asy}}. An optional splinetype @code{Spline} may be specified. The boolean array or function @code{cond} can be used to control which surface mesh cells are actually drawn (by default all mesh cells over @code{box(a,b)} are drawn). Surface lighting is illustrated in the example files @code{@uref{http://asymptote.sourceforge.net/gallery/parametricsurface.pdf,,parametricsurface}@uref{http://asymptote.sourceforge.net/gallery/parametricsurface.asy,,.asy}} and @code{@uref{http://asymptote.sourceforge.net/gallery/3D graphs/sinc.pdf,,sinc}@uref{http://asymptote.sourceforge.net/gallery/3D graphs/sinc.asy,,.asy}}. Lighting can be disabled by setting @code{light=nolight}, as in this example of a Gaussian surface: @anchor{GaussianSurface} @verbatiminclude GaussianSurface.asy @sp 1 @center @image{GaussianSurface} @noindent A mesh can be drawn without surface filling by specifying @code{nullpen} for the surfacepen. A vector field of @code{nu}@math{\times}@code{nv} arrows on a parametric surface @code{f} over @code{box(a,b)} can be drawn with the routine @cindex @code{vectorfield3} @verbatim picture vectorfield(path3 vector(pair v), triple f(pair z), pair a, pair b, int nu=nmesh, int nv=nu, bool truesize=false, real maxlength=truesize ? 0 : maxlength(f,a,b,nu,nv), bool cond(pair z)=null, pen p=currentpen, arrowbar3 arrow=Arrow3, margin3 margin=PenMargin3) @end verbatim as illustrated in the examples @code{@uref{http://asymptote.sourceforge.net/gallery/3D graphs/vectorfield3.pdf,,vectorfield3}@uref{http://asymptote.sourceforge.net/gallery/3D graphs/vectorfield3.asy,,.asy}} and @code{@uref{http://asymptote.sourceforge.net/gallery/vectorfieldsphere.pdf,,vectorfieldsphere}@uref{http://asymptote.sourceforge.net/gallery/vectorfieldsphere.asy,,.asy}}. @node grid3, solids, graph3, Base modules @section @code{grid3} @cindex @code{grid3} @cindex 3D grids This module, contributed by Philippe Ivaldi, can be used for drawing 3D grids. Here is an example (further examples can be found in @code{grid3.asy} and at @url{http://www.piprime.fr/files/asymptote/grid3/}): @verbatiminclude grid3xyz.asy @sp 1 @center @image{grid3xyz} @node solids, tube, grid3, Base modules @section @code{solids} @cindex @code{solids} This solid geometry package defines a structure @code{revolution} that can be used to fill and draw surfaces of revolution. The following example uses it to display the outline of a circular cylinder of radius 1 with axis @code{O--1.5unit(Y+Z)} with perspective projection: @verbatiminclude cylinderskeleton.asy @sp 1 @center @image{cylinderskeleton} Further illustrations are provided in the example files @code{@uref{http://asymptote.sourceforge.net/gallery/cylinder.pdf,,cylinder}@uref{http://asymptote.sourceforge.net/gallery/cylinder.asy,,.asy}}, @code{@uref{http://asymptote.sourceforge.net/gallery/cones.pdf,,cones}@uref{http://asymptote.sourceforge.net/gallery/cones.asy,,.asy}}, @code{@uref{http://asymptote.sourceforge.net/gallery/hyperboloid.pdf,,hyperboloid}@uref{http://asymptote.sourceforge.net/gallery/hyperboloid.asy,,.asy}}, and @code{@uref{http://asymptote.sourceforge.net/gallery/torus.pdf,,torus}@uref{http://asymptote.sourceforge.net/gallery/torus.asy,,.asy}}. The structure @code{skeleton} contains the three-dimensional wireframe used to visualize a volume of revolution: @verbatim struct skeleton { struct curve { path3[] front; path3[] back; } // transverse skeleton (perpendicular to axis of revolution) curve transverse; // longitudinal skeleton (parallel to axis of revolution) curve longitudinal; } @end verbatim @node tube, flowchart, solids, Base modules @section @code{tube} @cindex @code{tube} This package extends the @code{tube} surfaces constructed in @code{@uref{http://asymptote.sourceforge.net/gallery/three_arrows.pdf,,three_arrows}@uref{http://asymptote.sourceforge.net/gallery/three_arrows.asy,,.asy}} to arbitrary cross sections, colors, and spine transformations. The routine @verbatim surface tube(path3 g, coloredpath section, transform T(real)=new transform(real t) {return identity();}, real corner=1, real relstep=0); @end verbatim @noindent draws a tube along @code{g} with cross section @code{section}, after applying the transformation @code{T(t)} at @code{relpoint(g,t)}. The parameter @code{corner} controls the number of elementary tubes at the angular points of @code{g}. A nonzero value of @code{relstep} specifies a fixed relative time step (in the sense of @code{relpoint(g,t)}) to use in constructing elementary tubes along @code{g}. The type @code{coloredpath} is a generalization of @code{path} to which a @code{path} can be cast: @cindex @code{coloredpath} @verbatim struct coloredpath { path p; pen[] pens(real); int colortype=coloredSegments; } @end verbatim @noindent @cindex @code{coloredSegments} @cindex @code{coloredNodes} Here @code{p} defines the cross section and the method @code{pens(real t)} returns an array of pens (interpreted as a cyclic array) used for shading the tube patches at @code{relpoint(g,t)}. If @code{colortype=coloredSegments}, the tube patches are filled as if each segment of the section was colored with the pen returned by @code{pens(t)}, whereas if @code{colortype=coloredNodes}, the tube components are vertex shaded as if the nodes of the section were colored. A @code{coloredpath} can be constructed with one of the routines: @verbatim coloredpath coloredpath(path p, pen[] pens(real), int colortype=coloredSegments); coloredpath coloredpath(path p, pen[] pens=new pen[] {currentpen}, int colortype=coloredSegments); coloredpath coloredpath(path p, pen pen(real)); @end verbatim @noindent In the second case, the pens are independent of the relative time. In the third case, the array of pens contains only one pen, which depends of the relative time. The casting of @code{path} to @code{coloredpath} allows the use of a @code{path} instead of a @code{coloredpath}; in this case the shading behaviour is the default shading behavior for a surface. An example of @code{tube} is provided in the file @code{@uref{http://asymptote.sourceforge.net/gallery/trefoilknot.pdf,,trefoilknot}@uref{http://asymptote.sourceforge.net/gallery/trefoilknot.asy,,.asy}}. Further examples can be found at @url{http://www.piprime.fr/files/asymptote/tube/}. @node flowchart, contour, tube, Base modules @section @code{flowchart} @cindex @code{flowchart} This package provides routines for drawing flowcharts. The primary structure is a @code{block}, which represents a single block on the flowchart. The following eight functions return a position on the appropriate edge of the block, given picture transform @code{t}: @verbatim pair block.top(transform t=identity()); pair block.left(transform t=identity()); pair block.right(transform t=identity()); pair block.bottom(transform t=identity()); pair block.topleft(transform t=identity()); pair block.topright(transform t=identity()); pair block.bottomleft(transform t=identity()); pair block.bottomright(transform t=identity()); @end verbatim @cindex @code{block.top} @cindex @code{block.left} @cindex @code{block.right} @cindex @code{block.bottom} @cindex @code{block.topleft} @cindex @code{block.topright} @cindex @code{block.bottomleft} @cindex @code{block.bottomright} @noindent To obtain an arbitrary position along the boundary of the block in user coordinates, use: @verbatim pair block.position(real x, transform t=identity()); @end verbatim @cindex @code{block.position} @noindent @cindex @code{block.center} The center of the block in user coordinates is stored in @code{block.center} and the block size in @code{PostScript} coordinates is given by @code{block.size}. @noindent A frame containing the block is returned by @verbatim frame block.draw(pen p=currentpen); @end verbatim @cindex @code{block.draw} The following block generation routines accept a Label, string, or frame for their object argument: @table @dfn @item rectangular block with an optional header (and padding @code{dx} around header and body): @cindex @code{rectangle} @verbatim block rectangle(object header, object body, pair center=(0,0), pen headerpen=mediumgray, pen bodypen=invisible, pen drawpen=currentpen, real dx=3, real minheaderwidth=minblockwidth, real minheaderheight=minblockwidth, real minbodywidth=minblockheight, real minbodyheight=minblockheight); block rectangle(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real dx=3, real minwidth=minblockwidth, real minheight=minblockheight); @end verbatim @item parallelogram block: @cindex @code{parallelogram} @verbatim block parallelogram(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real dx=3, real slope=2, real minwidth=minblockwidth, real minheight=minblockheight); @end verbatim @item diamond-shaped block: @cindex @code{diamond} @verbatim block diamond(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real ds=5, real dw=1, real height=20, real minwidth=minblockwidth, real minheight=minblockheight); @end verbatim @item circular block: @cindex @code{circle} @verbatim block circle(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real dr=3, real mindiameter=mincirclediameter); @end verbatim @item rectangular block with rounded corners: @cindex @code{roundrectangle} @verbatim block roundrectangle(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real ds=5, real dw=0, real minwidth=minblockwidth, real minheight=minblockheight); @end verbatim @item rectangular block with beveled edges: @cindex @code{bevel} @verbatim block bevel(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real dh=5, real dw=5, real minwidth=minblockwidth, real minheight=minblockheight); @end verbatim @end table To draw paths joining the pairs in @code{point} with right-angled lines, use the routine: @cindex @code{path} @cindex @code{Horizontal} @cindex @code{Vertical} @verbatim path path(pair point[] ... flowdir dir[]); @end verbatim @noindent The entries in @code{dir} identify whether successive segments between the pairs specified by @code{point} should be drawn in the @code{Horizontal} or @code{Vertical} direction. Here is a simple flowchart example (see also the example @code{@uref{http://asymptote.sourceforge.net/gallery/controlsystem.pdf,,controlsystem}@uref{http://asymptote.sourceforge.net/gallery/controlsystem.asy,,.asy}}): @verbatiminclude flowchartdemo.asy @sp 1 @center @image{flowchartdemo} @node contour, contour3, flowchart, Base modules @section @code{contour} @cindex @code{contour} This package draws contour lines. To construct contours corresponding to the values in a real array @code{c} for a function @code{f} on @code{box(a,b)}, use the routine @verbatim guide[][] contour(real f(real, real), pair a, pair b, real[] c, int nx=ngraph, int ny=nx, interpolate join=operator --, int subsample=1); @end verbatim @noindent The integers @code{nx} and @code{ny} define the resolution. The default resolution, @code{ngraph x ngraph} (here @code{ngraph} defaults to @code{100}) can be increased for greater accuracy. The default interpolation operator is @code{operator --} (linear). Spline interpolation (@code{operator ..}) may produce smoother contours but it can also lead to overshooting. The @code{subsample} parameter indicates the number of interior points that should be used to sample contours within each @code{1 x 1} box; the default value of @code{1} is usually sufficient. To construct contours for an array of data values on a uniform two-dimensional lattice on @code{box(a,b)}, use @verbatim guide[][] contour(real[][] f, pair a, pair b, real[] c, interpolate join=operator --, int subsample=1); @end verbatim To construct contours for an array of data values on a nonoverlapping regular mesh specified by the two-dimensional array @code{z}, @verbatim guide[][] contour(pair[][] z, real[][] f, real[] c, interpolate join=operator --, int subsample=1); @end verbatim @noindent To construct contours for an array of values @code{f} specified at irregularly positioned points @code{z}, use the routine @verbatim guide[][] contour(pair[] z, real[] f, real[] c, interpolate join=operator --); @end verbatim @noindent The contours themselves can be drawn with one of the routines @verbatim void draw(picture pic=currentpicture, Label[] L=new Label[], guide[][] g, pen p=currentpen); void draw(picture pic=currentpicture, Label[] L=new Label[], guide[][] g, pen[] p); @end verbatim The following simple example draws the contour at value @code{1} for the function @math{z=x^2+y^2}, which is a unit circle: @verbatiminclude onecontour.asy @sp 1 @center @image{onecontour} The next example draws and labels multiple contours for the function @math{z=x^2-y^2} with the resolution @code{100 x 100}, using a dashed pen for negative contours and a solid pen for positive (and zero) contours: @verbatiminclude multicontour.asy @sp 1 @center @image{multicontour} The next example illustrates how contour lines can be drawn on color density images: @verbatiminclude imagecontour.asy @sp 1 @center @image{imagecontour} Finally, here is an example that illustrates the construction of contours from irregularly spaced data: @verbatiminclude irregularcontour.asy @sp 1 @center @image{irregularcontour} In the above example, the contours of irregularly spaced data are constructed by first creating a triangular mesh from an array @code{z} of pairs: @cindex @code{triangulate} @verbatim int[][] triangulate(pair[] z); @end verbatim @verbatiminclude triangulate.asy @sp 1 @center @image{triangulate} The example @code{@uref{http://asymptote.sourceforge.net/gallery/2D graphs/Gouraudcontour.pdf,,Gouraudcontour}@uref{http://asymptote.sourceforge.net/gallery/2D graphs/Gouraudcontour.asy,,.asy}} illustrates how to produce color density images over such irregular triangular meshes. @code{Asymptote} uses a robust version of Paul Bourke's Delaunay triangulation algorithm based on the public-domain exact arithmetic predicates written by Jonathan Shewchuk. @node contour3, smoothcontour3, contour, Base modules @section @code{contour3} @cindex @code{contour3} This package draws surfaces described as the null space of real-valued functions of @math{(x,y,z)} or @code{real[][][]} matrices. Its usage is illustrated in the example file @code{@uref{http://asymptote.sourceforge.net/gallery/3D graphs/magnetic.pdf,,magnetic}@uref{http://asymptote.sourceforge.net/gallery/3D graphs/magnetic.asy,,.asy}}. @node smoothcontour3, slopefield, contour3, Base modules @section @code{smoothcontour3} @cindex @code{smoothcontour3} This module, written by Charles Staats, draws implicitly defined surfaces with smooth appearance. The purpose of this module is similar to that of @code{contour3}: given a real-valued function @math{f(x,y,z)}, construct the surface described by the equation @math{f(x,y,z) = 0}. The @code{smoothcontour3} module generally produces nicer results than @code{contour3}, but takes longer to compile. Additionally, the algorithm assumes that the function and the surface are both smooth; if they are not, then @code{contour3} may be a better choice. To construct the null surface of a function @code{f(triple)} or @code{ff(real,real,real)} over @code{box(a,b)}, use the routine @cindex @code{implicitsurface} @verbatim surface implicitsurface(real f(triple)=null, real ff(real,real,real)=null, triple a, triple b, int n=nmesh, bool keyword overlapedges=false, int keyword nx=n, int keyword ny=n, int keyword nz=n, int keyword maxdepth=8, bool usetriangles=true); @end verbatim @noindent The optional parameter @code{overlapedges} attempts to compensate for an artifact that can cause the renderer to ``see through'' the boundary between patches. Although it defaults to @code{false}, it should usually be set to @code{true}. The example @code{@uref{http://asymptote.sourceforge.net/gallery/genustwo.pdf,,genustwo}@uref{http://asymptote.sourceforge.net/gallery/genustwo.asy,,.asy}} illustrates the use of this function. Additional examples, together with a more in-depth explanation of the module's usage and pitfalls, are available at @url{https://github.com/charlesstaats/smoothcontour3}. @node slopefield, ode, smoothcontour3, Base modules @section @code{slopefield} @cindex @code{slopefield} To draw a slope field for the differential equation @math{dy/dx=f(x,y)} (or @math{dy/dx=f(x)}), use: @verbatim picture slopefield(real f(real,real), pair a, pair b, int nx=nmesh, int ny=nx, real tickfactor=0.5, pen p=currentpen, arrowbar arrow=None); @end verbatim @noindent Here, the points @code{a} and @code{b} are the lower left and upper right corners of the rectangle in which the slope field is to be drawn, @code{nx} and @code{ny} are the respective number of ticks in the @math{x} and @math{y} directions, @code{tickfactor} is the fraction of the minimum cell dimension to use for drawing ticks, and @code{p} is the pen to use for drawing the slope fields. The return value is a picture that can be added to @code{currentpicture} via the @code{add(picture)} command. The function @cindex @code{curve} @verbatim path curve(pair c, real f(real,real), pair a, pair b); @end verbatim @noindent takes a point (@code{c}) and a slope field-defining function @code{f} and returns, as a path, the curve passing through that point. The points @code{a} and @code{b} represent the rectangular boundaries over which the curve is interpolated. Both @code{slopefield} and @code{curve} alternatively accept a function @code{real f(real)} that depends on @math{x} only, as seen in this example: @verbatiminclude slopefield1.asy @sp 1 @center @image{slopefield1} @node ode, , slopefield, Base modules @section @code{ode} @cindex @code{ode} The @code{ode} module, illustrated in the example @code{@uref{https://raw.githubusercontent.com/vectorgraphics/asymptote/HEAD/examples/odetest.asy,,odetest.asy}}, implements a number of explicit numerical integration schemes for ordinary differential equations. @node Options, Interactive mode, Base modules, Top @chapter Command-line options @cindex options @cindex command-line options Type @code{asy -h} to see the full list of command-line options supported by @code{Asymptote}: @verbatiminclude options All boolean options can be negated by prepending @code{no} to the option name. If no arguments are given, @code{Asymptote} runs in interactive mode (@pxref{Interactive mode}). In this case, the default output file is @code{out.eps}. If @code{-} is given as the file argument, @code{Asymptote} reads from standard input. If multiple files are specified, they are treated as separate @code{Asymptote} runs. @cindex @code{autoimport} If the string @code{autoimport} is nonempty, a module with this name is automatically imported for each run as the final step in loading module @code{plain}. @anchor{configuration file} @cindex configuration file @cindex @code{ASYMPTOTE_CONFIG} @cindex @code{config} @cindex @code{settings} @anchor{settings} Default option values may be entered as @code{Asymptote} code in a configuration file named @code{config.asy} (or the file specified by the environment variable @code{ASYMPTOTE_CONFIG} or @code{-config} option). @code{Asymptote} will look for this file in its usual search path (@pxref{Search paths}). Typically the configuration file is placed in the @code{.asy} directory in the user's home directory (@code{%USERPROFILE%\.asy} under @code{MSDOS}). Configuration variables are accessed using the long form of the option names: @verbatim import settings; outformat="pdf"; batchView=false; interactiveView=true; batchMask=false; interactiveMask=true; @end verbatim Command-line options override these defaults. Most configuration variables may also be changed at runtime. @cindex @code{dvipsOptions} @cindex @code{hyperrefOptions} @cindex @code{convertOptions} @cindex @code{gsOptions} @cindex @code{psviewerOptions} @cindex @code{pdfviewerOptions} @cindex @code{pdfreloadOptions} @cindex @code{glOptions} @cindex @code{dvisvgmOptions} The advanced configuration variables @code{dvipsOptions}, @code{hyperrefOptions}, @code{convertOptions}, @code{gsOptions}, @code{psviewerOptions}, @code{pdfviewerOptions}, @code{pdfreloadOptions}, @code{glOptions}, and @code{dvisvgmOptions} allow specialized options to be passed as a string to the respective applications or libraries. The default value of @code{hyperrefOptions} is @code{setpagesize=false,unicode,pdfborder=0 0 0}. If you insert @verbatim import plain; settings.autoplain=true; @end verbatim @noindent at the beginning of the configuration file, it can contain arbitrary @code{Asymptote} code. @cindex @code{convert} @cindex @code{output} @cindex @code{format} @cindex @code{ImageMagick} @cindex @code{render} @cindex @code{antialias} @cindex @code{size} @cindex @code{latex} @cindex @code{tex} @cindex @code{pdflatex} @cindex @code{xelatex} @cindex @code{context} @cindex @code{luatex} @cindex @code{lualatex} @cindex @code{EPS} @cindex @code{PDF} @anchor{texengines} @anchor{convert} The default output format is @acronym{EPS} for the (default) @code{latex} and @code{tex} tex engine and @acronym{PDF} for the @code{pdflatex}, @code{xelatex}, @code{context}, @code{luatex}, and @code{lualatex} tex engines. Alternative output formats may be produced using the @code{-f} option (or @code{outformat} setting). @cindex @code{SVG} @cindex @code{dvisvgm} @cindex @code{libgs} To produce @acronym{SVG} output, you will need @code{dvisvgm} (version 1.5.3 or later) from @url{http://dvisvgm.sourceforge.net} and must use the @code{latex} or @code{tex} tex engine. You might need to adjust the configuration variable @code{libgs} to point to the location of your @code{Ghostscript} library @code{libgs.so} (or to an empty string, depending on how @code{dvisvgm} was configured). @code{Asymptote} can also produce any output format supported by the @code{ImageMagick} @code{convert} program (version 6.3.5 or later recommended; an @code{Invalid Parameter} error message indicates that the @code{MSDOS} utility @code{convert} is being used instead of the one that comes with @code{ImageMagick}). The optional setting @code{-render n} requests an output resolution of @code{n} pixels per @code{bp}. Antialiasing is controlled by the parameter @code{antialias}, which by default specifies a sampling width of 2 pixels. To give other options to @code{convert}, use the @code{convertOptions} setting or call convert manually. This example emulates how @code{Asymptote} produces antialiased @code{tiff} output at one pixel per @code{bp}: @verbatim asy -o - venn | convert -alpha Off -density 144x144 -geometry 50%x eps:- venn.tiff @end verbatim @cindex @code{nosafe} @cindex @code{safe} @cindex @code{system} If the option @code{-nosafe} is given, @code{Asymptote} runs in unsafe mode. This enables the @code{int system(string s)} and @code{int system(string[] s)} calls, allowing one to execute arbitrary shell commands. The default mode, @code{-safe}, disables this call. @cindex offset @cindex @code{aligndir} A @code{PostScript} offset may be specified as a pair (in @code{bp} units) with the @code{-O} option: @verbatim asy -O 0,0 file @end verbatim @noindent The default offset is zero. The pair @code{aligndir} specifies an optional direction on the boundary of the page (mapped to the rectangle [-1,1]@math{\times}[-1,1]) to which the picture should be aligned; the default value @code{(0,0)} species center alignment. @cindex @code{-c} The @code{-c} (@code{command}) option may be used to execute arbitrary @code{Asymptote} code on the command line as a string. It is not necessary to terminate the string with a semicolon. Multiple @code{-c} options are executed in the order they are given. For example @verbatim asy -c 2+2 -c "sin(1)" -c "size(100); draw(unitsquare)" @end verbatim @noindent produces the output @verbatim 4 0.841470984807897 @end verbatim @noindent and draws a unitsquare of size @code{100}. @cindex @code{-u} The @code{-u} (@code{user}) option may be used to specify arbitrary @code{Asymptote} settings on the command line as a string. It is not necessary to terminate the string with a semicolon. Multiple @code{-u} options are executed in the order they are given. Command-line code like @code{-u x=sqrt(2)} can be executed within a module like this: @verbatim real x; usersetting(); write(x); @end verbatim @cindex @code{-l} When the @code{-l} (@code{listvariables}) option is used with file arguments, only global functions and variables defined in the specified file(s) are listed. Additional debugging output is produced with each additional @code{-v} option: @table @code @item -v Display top-level module and final output file names. @item -vv Also display imported and included module names and final @code{LaTeX} and @code{dvips} processing information. @item -vvv Also output @code{LaTeX} bidirectional pipe diagnostics. @item -vvvv Also output knot guide solver diagnostics. @item -vvvvv Also output @code{Asymptote} traceback diagnostics. @end table @node Interactive mode, GUI, Options, Top @chapter Interactive mode @cindex interactive mode Interactive mode is entered by executing the command @code{asy} with no file arguments. When the @code{-multiline} option is disabled (the default), each line must be a complete @code{Asymptote} statement (unless explicitly continued by a final backslash character @code{\}); it is not necessary to terminate input lines with a semicolon. If one assigns @code{settings.multiline=true}, interactive code can be entered over multiple lines; in this mode, the automatic termination of interactive input lines by a semicolon is inhibited. Multiline mode is useful for cutting and pasting @code{Asymptote} code directly into the interactive input buffer. @cindex @code{%} Interactive mode can be conveniently used as a calculator: expressions entered at the interactive prompt (for which a corresponding @code{write} function exists) are automatically evaluated and written to @code{stdout}. If the expression is non-writable, its type signature will be printed out instead. In either case, the expression can be referred to using the symbol @code{%} in the next line input at the prompt. For example: @verbatim > 2+3 5 > %*4 20 > 1/% 0.05 > sin(%) 0.0499791692706783 > currentpicture > %.size(200,0) > @end verbatim @cindex @code{operator answer} The @code{%} symbol, when used as a variable, is shorthand for the identifier @code{operator answer}, which is set by the prompt after each written expression evaluation. The following special commands are supported only in interactive mode and must be entered immediately after the prompt: @table @code @cindex @code{help} @item help view the manual; @item erase erase @code{currentpicture}; @cindex @code{input} @item reset reset the @code{Asymptote} environment to its initial state, except for changes to the settings module (@pxref{settings}), the current directory (@pxref{cd}), and breakpoints (@pxref{Debugger}); @cindex @code{input} @item input FILE does an interactive reset, followed by the command @code{include FILE}. If the file name @code{FILE} contains nonalphanumeric characters, enclose it with quotation marks. A trailing semi-colon followed by optional @code{Asymptote} commands may be entered on the same line. @cindex @code{quit} @cindex @code{exit} @cindex @code{history} @anchor{history} @item quit exit interactive mode (@code{exit} is a synonym; the abbreviation @code{q} is also accepted unless there exists a top-level variable named @code{q}). @cindex @code{historylines} A history of the most recent 1000 (this number can be changed with the @code{historylines} configuration variable) previous commands will be retained in the file @code{.asy/history} in the user's home directory (unless the command-line option @code{-localhistory} was specified, in which case the history will be stored in the file @code{.asy_history} in the current directory). @end table Typing @code{ctrl-C} interrupts the execution of @code{Asymptote} code and returns control to the interactive prompt. Interactive mode is implemented with the @acronym{GNU} @code{readline} library, with command history and auto-completion. To customize the key bindings, see: @url{http://cnswww.cns.cwru.edu/php/chet/readline/readline.html} @cindex @code{Python} usage The file @code{asymptote.py} in the @code{Asymptote} system directory provides an alternative way of entering @code{Asymptote} commands interactively, coupled with the full power of @code{Python}. Copy this file to your @code{Python path} and then execute from within @code{Python} the commands @verbatim from asymptote import * g=asy() g.size(200) g.draw("unitcircle") g.send("draw(unitsquare)") g.fill("unitsquare, blue") g.clip("unitcircle") g.label("\"$O$\", (0,0), SW") @end verbatim @node GUI, PostScript to Asymptote, Interactive mode, Top @chapter Graphical User Interface @cindex graphical user interface @cindex @acronym{GUI} @cindex mouse @cindex wheel mouse @cindex @code{Button-1} @cindex @code{Button-2} @cindex @code{xasy} @menu * GUI installation:: Installing @code{xasy} * GUI usage:: Using @code{xasy} to edit objects @end menu In the event that adjustments to the final figure are required, the preliminary Graphical User Interface (@acronym{GUI}) @code{xasy} included with @code{Asymptote} allows you to move graphical objects and draw new ones. The modified figure can then be saved as a normal @code{Asymptote} file. @node GUI installation, GUI usage, GUI, GUI @section GUI installation @cindex GUI installation As @code{xasy} is written in the interactive scripting language @code{Python/TK}, it requires @code{Python} (@url{http://www.python.org}), the @code{Pillow} fork of the @code{Python Imaging Library},and the @code{tkinter} package (included with @code{Python} under @code{Microsoft Windows}). @code{Fedora Linux} users can either install @code{tkinter} and @code{Pillow} with the commands @verbatim dnf install tkinter dnf install tk-devel dnf install python-pillow-tk @end verbatim @noindent or manually install the @code{tkinter}, @code{tix}, @code{tk}, and @code{tk-devel} packages. Pictures are deconstructed into the @acronym{PNG} image format, which supports full alpha channel transparency. Under @code{Microsoft Windows}, this requires @code{Python 2.7.4} or later and version @code{3.1.0} of the @code{Pillow} fork of the @code{Python Imaging Library}, available from @quotation @url{http://pypi.python.org/pypi/Pillow} @end quotation @node GUI usage, , GUI installation, GUI @section GUI usage @cindex GUI usage @cindex @code{deconstruct} A wheel mouse is convenient for raising and lowering objects within @code{xasy}, to expose the object to be moved. If a wheel mouse is not available, mouse @code{Button-2} can be used to repeatedly lower an object instead. When run from the command line, @code{xasy} accepts a command line option @code{-x n}, which sets the initial magnification to @code{n}. Deconstruction of compound objects (such as arrows) can be prevented by enclosing them within the commands @verbatim void begingroup(picture pic=currentpicture); void endgroup(picture pic=currentpicture); @end verbatim By default, the elements of a picture or frame will be grouped together on adding them to a picture. However, the elements of a frame added to another frame are not grouped together by default: their elements will be individually deconstructed (@pxref{add}). @node PostScript to Asymptote, Help, GUI, Top @chapter @code{PostScript} to @code{Asymptote} @cindex @code{pstoedit} The excellent @code{PostScript} editor @code{pstoedit} (version 3.50 or later; available from @url{http://sourceforge.net/projects/pstoedit/}) includes an @code{Asymptote} backend. Unlike virtually all other @code{pstoedit} backends, this driver includes native clipping, even-odd fill rule, @code{PostScript} subpath, and full image support. Here is an example: @noindent @code{asy -V @value{Datadir}/doc/asymptote/examples/venn.asy} @noindent @verbatim pstoedit -f asy venn.eps test.asy asy -V test @end verbatim @noindent If the line widths aren't quite correct, try giving @code{pstoedit} the @code{-dis} option. If the fonts aren't typeset correctly, try giving @code{pstoedit} the @code{-dt} option. @node Help, Debugger, PostScript to Asymptote, Top @chapter Help @cindex help @cindex forum A list of frequently asked questions (@acronym{FAQ}) is maintained at @quotation @url{http://asymptote.sourceforge.net/FAQ} @end quotation @noindent Questions on installing and using @code{Asymptote} that are not addressed in the @acronym{FAQ} should be sent to the @code{Asymptote} forum: @quotation @url{http://sourceforge.net/p/asymptote/discussion/409349} @end quotation @noindent Including an example that illustrates what you are trying to do will help you get useful feedback. @code{LaTeX} problems can often be diagnosed with the @code{-vv} or @code{-vvv} command-line options. Contributions in the form of patches or @code{Asymptote} modules can be posted here: @quotation @url{http://sourceforge.net/p/asymptote/patches} @end quotation @noindent To receive announcements of upcoming releases, please subscribe to @code{Asymptote} at @quotation @url{http://freecode.com/projects/asy} @end quotation @cindex bug reports @noindent If you find a bug in @code{Asymptote}, please check (if possible) whether the bug is still present in the latest @code{git} developmental code (@pxref{Git}) before submitting a bug report. New bugs can be reported at @quotation @url{https://github.com/vectorgraphics/asymptote/issues} @end quotation @noindent To see if the bug has already been fixed, check bugs with Status @code{Closed} and recent lines in @quotation @url{http://asymptote.sourceforge.net/ChangeLog} @end quotation @noindent @cindex stack overflow @cindex segmentation fault @cindex @code{libsigsegv} @code{Asymptote} can be configured with the optional @acronym{GNU} library @code{libsigsegv}, available from @url{http://libsigsegv.sourceforge.net}, which allows one to distinguish user-generated @code{Asymptote} stack overflows (@pxref{stack overflow}) from true segmentation faults (due to internal C++ programming errors; please submit the @code{Asymptote} code that generates such segmentation faults along with your bug report). @node Debugger, Credits, Help, Top @chapter Debugger @cindex debugger Asymptote now includes a line-based (as opposed to code-based) debugger that can assist the user in following flow control. To set a break point in file @code{file} at line @code{line}, use the command @cindex @code{stop} @verbatim void stop(string file, int line, code s=quote{}); @end verbatim @noindent The optional argument @code{s} may be used to conditionally set the variable @code{ignore} in @code{plain_debugger.asy} to @code{true}. For example, the first 10 instances of this breakpoint will be ignored (the variable @code{int count=0} is defined in @code{plain_debugger.asy}): @verbatim stop("test",2,quote{ignore=(++count <= 10);}); @end verbatim To set a break point in file @code{file} at the first line containing the string @code{text}, use @verbatim void stop(string file, string text, code s=quote{}); @end verbatim @noindent To list all breakpoints, use: @cindex @code{breakpoints} @verbatim void breakpoints(); @end verbatim @noindent To clear a breakpoint, use: @cindex @code{clear} @verbatim void clear(string file, int line); @end verbatim @noindent To clear all breakpoints, use: @verbatim void clear(); @end verbatim The following commands may be entered at the debugging prompt: @table @code @cindex @code{help} @item @code{h} help; @cindex @code{continue} @item @code{c} continue execution; @cindex @code{inst} @item @code{i} step to the next instruction; @cindex @code{step} @item @code{s} step to the next executable line; @cindex @code{next} @item @code{n} step to the next executable line in the current file; @cindex @code{file} @item @code{f} step to the next file; @cindex @code{return} @item @code{r} return to the file associated with the most recent breakpoint; @cindex @code{trace} @item @code{t} toggle tracing (@code{-vvvvv}) mode; @cindex @code{quit} @item @code{q} quit debugging and end execution; @cindex @code{exit} @item @code{x} exit the debugger and run to completion. @end table @noindent Arbitrary @code{Asymptote} code may also be entered at the debugging prompt; however, since the debugger is implemented with @code{eval}, currently only top-level (global) variables can be displayed or modified. The debugging prompt may be entered manually with the call @verbatim void breakpoint(code s=quote{}); @end verbatim @node Credits, Index, Debugger, Top @chapter Acknowledgments @cindex acknowledgments Financial support for the development of @code{Asymptote} was generously provided by the Natural Sciences and Engineering Research Council of Canada, the Pacific Institute for Mathematical Sciences, and the University of Alberta Faculty of Science. We also would like to acknowledge the previous work of John D. Hobby, author of the program @code{MetaPost} that inspired the development of @code{Asymptote}, and Donald E. Knuth, author of @TeX{} and @code{MetaFont} (on which @code{MetaPost} is based). The authors of @code{Asymptote} are Andy Hammerlindl, John Bowman, and Tom Prince. Sean Healy designed the @code{Asymptote} logo. Other contributors include Orest Shardt, Jesse Frohlich, Michail Vidiassov, Charles Staats, Philippe Ivaldi, Olivier Guib@'e, Radoslav Marinov, Jeff Samuelson, Chris Savage, Jacques Pienaar, Mark Henning, Steve Melenchuk, Martin Wiebusch, and Stefan Knorr. @node Index, , Credits, Top @unnumbered Index @printindex cp @bye @c LocalWords: randMax Gaussrand asy cindex indices resized LaTeX TK latin au @c LocalWords: latexusage tex bbox PostScript subdirectory gcc emacs ASYDIR @c LocalWords: documentclass usepackage subpath shipout sqrt xN Mx bw AcroRd @c LocalWords: xscale xaxis yaxis BeginBar GIF postprocessing fpu de rpair xy @c LocalWords: ImageMagick cd asymptote Hy 0pt 1filll 's 3D 2D 'asy @c LocalWords: startup natively xasy tkinter VxN yingyang currentpicture toc @c LocalWords: MetaPost MetaFont Hammerlindl Healy texinfo autoload setq setf @c LocalWords: printindex setfilename settitle dircategory direntry titlepage @c LocalWords: vskip filll insertcopying ifnottex detailmenu alist augroup PQ @c LocalWords: bool behaviour facto zxf login Debian dev filetypedetect @c LocalWords: FFTW bp readline gv eps args Boehm gc evenoddoverlap png joe @c LocalWords: boolean initializer expi dir xpart ypart STL substring rfind @c LocalWords: pos substr strftime typedef pxref unitcircle yscale Bezier iff @c LocalWords: postcontrol precontrol atleast nullpath arclength arctime rgb @c LocalWords: dirtime currentpen colorspaces grayscale cmyk defaultpen x cx @c LocalWords: linetype longdashed dashdotted longdashdotted linewidth y XP @c LocalWords: fontsize defaultfilename keepAspect IgnoreAspect ise flushleft @c LocalWords: src dest XDR txt getc fout stdin stdout endl eof js prc ni @c LocalWords: Microsystem's eol exponentials postfix sayhi th Ubuntu @c LocalWords: sqr intop addby libm asin acos atan sinh tanh asinh acosh cbrt @c LocalWords: atanh fabs hypot fmod ceil srand dereferenced alice pete sqrtx @c LocalWords: eval fft csv runtime nonalphanumeric labely LeftTicks NoTicks @c LocalWords: RightTicks BottomTop LeftRight Ticksize UTF BufNewFile BufRead @c LocalWords: ticksize subintervals xlimits filetype plugin setlocal makeprg @c LocalWords: ylimits uncommented automin automax cp uninstall reals ecast @c LocalWords: scaleT unicode RightSide yx yy NoAlign legendmargin opic CCW @c LocalWords: arrowbar LeftSide EndBar BeginArrow lly feynman isi showtarget @c LocalWords: EndArrow BeginArcArrow EndArcArrow ArcArrow ArcArrows NoFill @c LocalWords: filldraw fillpen drawpen errorformat bigsquare bezier darkblue @c LocalWords: quartercircle darkgreen lightblue urx ury texpreamble sgn texi @c LocalWords: lineargraph datagraph vertices parametricgraph uncomment ggv @c LocalWords: loggraph generalaxis texhash arrowsize arrowangle arrowlength @c LocalWords: SuppressQuiet MoveQuiet LIBREADLINE config MacOS prebuilt @c LocalWords: ghostview gsview SIGHUP PDF acroread xpdf cutbefore strptime @c LocalWords: libsigsegv intersectionpoint dotfactor vv firstcut pq logticks @c LocalWords: Unisys dvips vvv vvvv vvvvv traceback lastcut cutafter infodir @c LocalWords: zxvf xargs cond polargraph xmin xmax plabel YZero labelling ln @c LocalWords: ymin ymax XZero xequals tickmin tickmax unlabelled se pq pena @c LocalWords: yequals Nobre Barbarosie Schwaiger nearearth conicurv Wiebusch @c LocalWords: unfill posterSize ngraph interpolatetype ctrl dt pic getint Ai @c LocalWords: NNE jxf linecap linejoin unitsquare shadedtiling ei nomarker @c LocalWords: westnile minipage ra penb paletteticks drawline nV FillDraw uv @c LocalWords: susceptibleM flushright secondaryX secondaryY secondaryaxis tt @c LocalWords: titlelabel columnlabel rb xtick ytick labelx XEquals YEquals @c LocalWords: treetest eetomumu fermi backend pstoedit drawtree xFF MSDOS gz @c LocalWords: vimrc CFLAGS verbatiminclude online noindent bezier superpath @c LocalWords: evenodd squarecap roundcap extendcap miterjoin roundjoin NFSS @c LocalWords: beveljoin fillrule zerowinding insideness lineskip cmr pcrr Hx @c LocalWords: AvantGarde Bookman Helvetica NewCenturySchoolBook minbound pdf @c LocalWords: Palatino TimesRoman ZapfChancery ZapfDingbats german basealign @c LocalWords: nondeconstructed backends usr venn labelsquare nobasealign dp @c LocalWords: NoMargin BeginMargin EndMargin BeginPenMargin EndPenMargin dm @c LocalWords: PenMargin PenMargins TrueMargin labelmargin errorbars errorbar @c LocalWords: dpx dpy dmx dmy barsize arrowsize BeginDotMargin DotMargin acc @c LocalWords: EndDotMargin DotMargins NColors BWRainbow colorspace labelled @c LocalWords: PaletteTicks defaultformat leastsquares bjam fprintf endgroup @c LocalWords: begingroup xmargin ymargin pbox box ellipse wget exe Gouraud @c LocalWords: multithreaded newframe init emph nums concat xline yline zpart @c LocalWords: colatitude zscale cosh nullpen MetaFontbook cyclicflag FreeBSD @c LocalWords: nodeps Ghostgum beginlabel endlabel pTick ptick loggrid SAS dy @c LocalWords: currentprojection latticeshading subpictures colinear unitcube @c LocalWords: Autoscaling solveQuadratic MidArrow MidArcArrow Prebuilt url @c LocalWords: pdftex comment getstring getstringprefix getreal defaultS hsv @c LocalWords: ticklocate autoscaleT autoscaling vectorfield autolimits dvi @c LocalWords: zlimits inline dvipdf hyperdvi autoconf gui zerowindingoverlap @c LocalWords: prepended intMax quadraticroots cubicroots filltype prepend dx @c LocalWords: ticklabel popup UnFill markroutine marknodes markuniform erf @c LocalWords: intersectpoint cyrillic mathtext russian brokenaxis Datadir ds @c LocalWords: resetdefaultpen latticeshade axialshade radialshade erfc det @c LocalWords: gouraudshade unescaped nmesh surfacepen getpair MikTeX dw YZ @c LocalWords: meshpen localhistory axisT roundedpath unitsize aSin accel pre @c LocalWords: fontcommand makepen aCos aTan Knorr roundpath BeginPoint nView @c LocalWords: MidPoint EndPoint nmask antialiasing autoplain batchMask libgc @c LocalWords: batchView clearGUI ignoreGUI interactiveMask interactiveView @c LocalWords: listvariables outformat parseonly prepending psviewer nCircle @c LocalWords: pdfviewer papertype tabcompletion noautoplain plugins Teixeira @c LocalWords: embeddedmovie historylines RadialShade penc penr CJK tgz GPL @c LocalWords: legendlinelength legendskip USERPROFILE LDFLAGS currentlight @c LocalWords: subsampled sinc kai AtBeginDocument GBK clearpage lasy texpath @c LocalWords: AtEndDocument zaxis maxbound truepoint paperwidth paperheight @c LocalWords: GSL deriv texcolors fixedscaling UpsideDown texreset slidedemo @c LocalWords: subitem newslide realMin realMax realEpsilon realDigits gsl dh @c LocalWords: obliqueX asycolors monthaxis xautoscale yautoscale zautoscale @c LocalWords: obliqueZ obliqueY cylinderskeleton block llcorner dr py nx CPU @c LocalWords: loc topleft topright bottomleft bottomright flowrectangle UTC @c LocalWords: chartblock flowdiamond flowcircle xlabel BezierSurface el xyz @c LocalWords: flowroundrectangle flowbevel flowpath drawflow blocks ny cpu @c LocalWords: multipleView usersetting mediumgray flowchartdemo ylabel nv xf @c LocalWords: zlabel slopefields cputime roundrectangle slopefield libgccpp @c LocalWords: tickfactor USERNAME writeable imagecontour logimage Dumoulin's @c LocalWords: NoCrop parametricsurface realmult SoftLight HardLight interp @c LocalWords: ColorDodge ColorBurn Ivaldi buildcycle autorotate mexicanhat @c LocalWords: Gouraudcontour pdflatex preconfigured perline linelength hskip @c LocalWords: penimage filloutside legendhskip legendvskip maxwidth CDlabel @c LocalWords: tensorshade MPEG framepoint nonfunction Radoslav Marinov Mepis @c LocalWords: Pienaar Melenchuk finalout Linspire Dpkg sudo dpkg dtx Tcount @c LocalWords: windingnumber clickable pdfmovie dfn du animationdelay fprime @c LocalWords: slidemovies ifdraft embeddedu externalmovie headerpen bodypen @c LocalWords: GaussianSurface multiline binarytree tridiagonal portably AIX @c LocalWords: binarytreetest Henning subsample breakpoint locator wireframe @c LocalWords: labelpath intersectionpoints PSTricks pstextpath curvedlabel @c LocalWords: LeftJustified RightJustified tickmodifier gunzip gmake IRIX dv @c LocalWords: texcommand RET SITEDIR filegraph pathmarkers POSIX binput AOB @c LocalWords: nonportable markinterval stickframe circlebarframe tix @c LocalWords: crossframe tildeframe markangle StickIntervalMarker gswin expm @c LocalWords: CrossIntervalMarker CircleBarIntervalMarker Ghostscript syzygy @c LocalWords: TildeIntervalMarker autoimport calculateTransform bitwise tk @c LocalWords: headersize bodysize minheaderwidth minheaderheight minwidth ZX @c LocalWords: minbodywidth minbodyheight minheight mindiameter reltime PNG @c LocalWords: relpoint Syzygy syzygies seekeof splinetype notaknot slopea ZY @c LocalWords: slopeb nonperiodic circlescale MarkFill ScaleX ScaleY xformat @c LocalWords: onecontour multicontour irregularcontour dvipsOptions saveline @c LocalWords: dirSpecifier controlSpecifier tensionSpecifier atleastflag bsp @c LocalWords: curlSpecifier cputimeformat initializers arbitary redeclaring @c LocalWords: firstname lastname multdiagonal Raphson OmitTick OmitFormat sp @c LocalWords: NoZero NoZeroFormat abbrevation gsOptions namespace redeclared @c LocalWords: atLeast intMin globalwrite quarticroots deconsruct substrings @c LocalWords: usleep currentpatterns trailingzero Orest Shardt DefaultHead @c LocalWords: SimpleHead HookHead TeXHead multipage NURBS inlinemovie dxmax @c LocalWords: simpson NoBox truesize autoscale shadestroke recurses mintimes @c LocalWords: nonoverlapping texengine maxtimes maxheight pdb TEXMFCONFIG Jn @c LocalWords: piecewisestraight unitrand graphmarkers antialias nolight newl @c LocalWords: Delaunay Shewchuk convertOptions APPDATA pdfreload tempFile Yn @c LocalWords: pdfreloadOptions deferred OpenGL Phong Blinn renderer unitbox @c LocalWords: bezulate Shardt's rasterized viewport unitdisk unitplane devel @c LocalWords: unitcylinder unitcone solidcone unitfrustum unitsphere nslices @c LocalWords: DPostScript YZZero externalprc nonrendered nosafe KDE @c LocalWords: unithemisphere versa XYplane xypart unitsolidcone YZEquals xml @c LocalWords: XZEquals XYEquals XZZero XYZero InTicks OutTicks InOutTicks @c LocalWords: fitscreen planeproject strokepath meshlight nullpens arrowdir @c LocalWords: diffusepen ambientpen emissivepen specularpen arrowbarb keyval @c LocalWords: hstretch vstretch roundbox nonconvex miterlimit basealigin cmd @c LocalWords: maxviewport maxtile antialiased sphericalharmonic attachfile @c LocalWords: vertexshading smoothelevation glOptions iconified iconify kate @c LocalWords: psviewerOptions pdfviewerOptions viewportmargin asyattach SVG @c LocalWords: multisampling autogen multisample coloredpath relstep flowdir @c LocalWords: colortype coloredSegments coloredNodes trefoilknot scaledgraph @c LocalWords: minblockwidth minblockheight mincirclediameter nonassociative @c LocalWords: nonintegral gettriple enablerepo hexidecimal XeLaTeX xelatex @c LocalWords: dvipdfmx autoadjust viewportsize viewportwidth viewportheight @c LocalWords: subregions nonsimply functionshade shader floatingdisk TopView @c LocalWords: functionshading maxlength LeftView odetest RadialShadeDraw CLZ @c LocalWords: vectorfieldsphere RightView FrontView BackView BottomView CTZ @c LocalWords: addViews outprefix addAllViews xsplinetype ysplinetype rotateX @c LocalWords: usplinetype vsplinetype leftbutton middlebutton rightbutton @c LocalWords: rotateY rotateZ wheelup zoomin wheeldown zoomout TeXLive pnorm @c LocalWords: viewportshift signedint signedness psview multiplatform nowarn @c LocalWords: singlereal singleint writeoverloaded dvisvg reddash lexorder @c LocalWords: bigdiagonal autobillboard dvisvgm maxtiles hyperrefOptions xdr @c LocalWords: setpagesize pdfborder controlsystem OmitTickInterval SixViews @c LocalWords: OmitTickIntervals tickmodifiers autorotated SixViewsUS latexmk @c LocalWords: ThreeViewsUS ThreeViewsFR SixViewsFR ThreeViews partialsum @c LocalWords: defaultrender Vidiassov latexmkrc mktemp DOSendl DOSnewl perl @c LocalWords: filename asyinclude latemk penfunctionimage Affine decrement @c LocalWords: affine Redisplay redisplay isnan radians defaultseparator Jens @c LocalWords: ascii piecewise arcpoint spacings tilings sncndn resizing @c LocalWords: differentiable vectorization vectorized asydir normals quartic @c LocalWords: wavepacket kerned parametrized specular hyperboloid Bourke's @c LocalWords: Michail 0pt 1filll 's 3D latin1 labelpath3 2D graph3 @c LocalWords: grid3 contour3 i386 psv a4 gsview32 freeglut 'load ' @c LocalWords: 'asy 'lasy 'auto 5bp 1cm sqrtx01 4g extenda extendb @c LocalWords: bb llx 2S 100pt 3t bezier2 bool3 x0 angle1 angle2 z1 @c LocalWords: z2 before' struct X11 x11colors type1cm 12pt OT1 5mm @c LocalWords: cmr12 x' y' xsize ysize 25cm s1 s2 neighbourhood u'' @c LocalWords: s'' 3x 5x 3y 602e 2x 2y 3sin 10cm 204e addby7 10x Ai @c LocalWords: only'' pow10 log10 expm1 log1p atan2 0pt 1filll 's ' @c LocalWords: x1 x2 graph2d attachfile2 n0 P0 n1 P1 markers1 3D 2D @c LocalWords: interpolate1 markers2 inlinemovie3 media9 U3D T2A 5E @c LocalWords: embeddedu3d curvedlabel3 value2 tickvalue inner'' 2N @c LocalWords: lineargraph0 scalings log2 log2graph 5cm BWRainbow2 @c LocalWords: guide3 path3 unitcircle3 2E 2n noV 100d PostScript3D @c LocalWords: size3 fit3 theta1 phi1 theta2 phi2 v1 v2 unitsquare3 @c LocalWords: t1 t2 5z 5y transform3 identity4 xscale3 yscale3 0pt @c LocalWords: zscale3 scale3 join3 BeginBar3 EndBar3 Bar3 Bars3 's @c LocalWords: BeginArrow3 MidArrow3 EndArrow3 Arrow3 Arrows3 axes3 @c LocalWords: BeginArcArrow3 MidArcArrow3 EndArcArrow3 ArcArrow3 ' @c LocalWords: ArcArrows3 DefaultHead3 HookHead3 TeXHead3 HookHead2 @c LocalWords: DefaultHead2 TeXHead2 arrows3 NoMargin3 BeginMargin3 @c LocalWords: EndMargin3 Margin3 Margins3 BeginPenMargin2 xaxis3 ' @c LocalWords: EndPenMargin2 PenMargin2 PenMargins2 BeginPenMargin3 @c LocalWords: EndPenMargin3 PenMargin3 PenMargins3 BeginDotMargin3 @c LocalWords: EndDotMargin3 DotMargin3 DotMargins3 TrueMargin3 3D @c LocalWords: yaxis3 zaxis3 ticks3 NoTicks3 arrowbar3 type2 axis3 @c LocalWords: generalaxis3 vectorfield3 margin3 grid3xyz 5unit 2D @c LocalWords: slopefield1 144x144 1filll 'load 'asy 'lasy 'auto 4g @c LocalWords: libgs 'load 'asy 'lasy 'auto 5bp 1cm 2S 100pt 3t 5mm @c LocalWords: bracedefaultratio incircle 12pt 25cm 3x 5x 3y 602e ' @c LocalWords: 2x 2y 3sin 10cm 204e 10x Ai 5E offaxis 'load 'lasy ' @c LocalWords: 5cm 2N 2E 2n 100d 5z 5y 5unit dvisvgmOptions 144x144 @c LocalWords: 4g texengines coplanar 0pt 1filll 's 3D 2D 'load 5bp @c LocalWords: insphere cospherical 5unit luatex lualatex 'asy 1cm @c LocalWords: 'lasy 'auto 4g 2S 100pt 3t 12pt 5mm 25cm 3x 5x 3y 2x @c LocalWords: 602e 2y 3sin 10cm 204e 10x Ai Ai Ai Ai Ai Ai Ai Ai ' @c LocalWords: unnormalized 5E 5cm 2N 2E 2n 100d 5z 5y 0pt 1filll ' @c LocalWords: 5unit 144x144 aligndir smoothcontour3 's 3D 2D cmake @c LocalWords: 'load 'asy 'lasy 'auto 5bp 1cm 4g 2S 100pt 3t nan 3x @c LocalWords: 12pt 5mm 25cm 5x 3y 602e 2x 2y 3sin 10cm 204e 10x Ai @c LocalWords: Ai Ai Ai Ai Ai Ai Ai 5E 5cm 2N 2E 2n 100d 5z 5y nz @c LocalWords: 5unit Staats implicitsurface overlapedges maxdepth @c LocalWords: through'' genustwo 144x144 0pt 1filll 's 3D 2D 'load @c LocalWords: 'asy 'lasy 'auto 5bp 1cm 4g 2S 100pt 3t 12pt 5mm 3x @c LocalWords: 25cm 5x 3y 602e 2x 2y 3sin 10cm 204e 10x Ai Ai Ai Ai @c LocalWords: Ai Ai Ai Ai 5E 5cm 2N 2E 2n 100d 5z 5y 5unit 144x144 @c LocalWords: Frohlich ./asymptote-2.41/doc/bezier2.asy0000644000175000017500000000064013064427076016370 0ustar norbertnorbertimport beziercurve; pair midpoint(pair a, pair b) {return interp(a,b,0.5);} pair m0=midpoint(z0,c0); pair m1=midpoint(c0,c1); pair m2=midpoint(c1,z1); draw(m0--m1--m2,dashed); dot("$m_0$",m0,NW,red); dot("$m_1$",m1,N,red); dot("$m_2$",m2,red); pair m3=midpoint(m0,m1); pair m4=midpoint(m1,m2); pair m5=midpoint(m3,m4); draw(m3--m4,dashed); dot("$m_3$",m3,NW,red); dot("$m_4$",m4,NE,red); dot("$m_5$",m5,N,red); ./asymptote-2.41/doc/grid3xyz.asy0000644000175000017500000000065213064427076016614 0ustar norbertnorbertimport grid3; size(8cm,0,IgnoreAspect); currentprojection=orthographic(0.5,1,0.5); scale(Linear, Linear, Log); limits((-2,-2,1),(0,2,100)); grid3(XYZgrid); xaxis3(Label("$x$",position=EndPoint,align=S),Bounds(Min,Min), OutTicks()); yaxis3(Label("$y$",position=EndPoint,align=S),Bounds(Min,Min),OutTicks()); zaxis3(Label("$z$",position=EndPoint,align=(-1,0.5)),Bounds(Min,Min), OutTicks(beginlabel=false)); ./asymptote-2.41/doc/monthaxis.asy0000644000175000017500000000056613064427076017047 0ustar norbertnorbertimport graph; size(400,150,IgnoreAspect); real[] x=sequence(12); real[] y=sin(2pi*x/12); scale(false); string[] month={"Jan","Feb","Mar","Apr","May","Jun", "Jul","Aug","Sep","Oct","Nov","Dec"}; draw(graph(x,y),red,MarkFill[0]); xaxis(BottomTop,LeftTicks(new string(real x) { return month[round(x % 12)];})); yaxis("$y$",LeftRight,RightTicks(4)); ./asymptote-2.41/doc/flow.asy0000644000175000017500000000113413064427076015774 0ustar norbertnorbertimport graph; defaultpen(1.0); size(0,150,IgnoreAspect); real arrowsize=4mm; real arrowlength=2arrowsize; typedef path vector(real); // Return a vector interpolated linearly between a and b. vector vector(pair a, pair b) { return new path(real x) { return (0,0)--arrowlength*interp(a,b,x); }; } real f(real x) {return 1/x;} real epsilon=0.5; path g=graph(f,epsilon,1/epsilon); int n=3; draw(g); xaxis("$x$"); yaxis("$y$"); add(vectorfield(vector(W,W),g,n,true)); add(vectorfield(vector(NE,NW),(0,0)--(point(E).x,0),n,true)); add(vectorfield(vector(NE,NE),(0,0)--(0,point(N).y),n,true)); ./asymptote-2.41/doc/histogram.asy0000644000175000017500000000067113064427076017027 0ustar norbertnorbertimport graph; import stats; size(400,200,IgnoreAspect); int n=10000; real[] a=new real[n]; for(int i=0; i < n; ++i) a[i]=Gaussrand(); draw(graph(Gaussian,min(a),max(a)),blue); // Optionally calculate "optimal" number of bins a la Shimazaki and Shinomoto. int N=bins(a); histogram(a,min(a),max(a),N,normalize=true,low=0,lightred,black,bars=false); xaxis("$x$",BottomTop,LeftTicks); yaxis("$dP/dx$",LeftRight,RightTicks(trailingzero)); ./asymptote-2.41/doc/helix.asy0000644000175000017500000000064713064427076016146 0ustar norbertnorbertimport graph3; size(0,200); size3(200,IgnoreAspect); currentprojection=orthographic(4,6,3); real x(real t) {return cos(2pi*t);} real y(real t) {return sin(2pi*t);} real z(real t) {return t;} path3 p=graph(x,y,z,0,2.7,operator ..); draw(p,Arrow3); scale(true); xaxis3(XZ()*"$x$",Bounds,red,InTicks(Label,2,2)); yaxis3(YZ()*"$y$",Bounds,red,InTicks(beginlabel=false,Label,2,2)); zaxis3(XZ()*"$z$",Bounds,red,InTicks); ./asymptote-2.41/doc/penfunctionimage.asy0000644000175000017500000000076213064427076020366 0ustar norbertnorbertimport palette; size(200); real fracpart(real x) {return (x-floor(x));} pair pws(pair z) { pair w=(z+exp(pi*I/5)/0.9)/(1+z/0.9*exp(-pi*I/5)); return exp(w)*(w^3-0.5*I); } int N=512; pair a=(-1,-1); pair b=(0.5,0.5); real dx=(b-a).x/N; real dy=(b-a).y/N; pen f(int u, int v) { pair z=a+(u*dx,v*dy); pair w=pws(z); real phase=degrees(w,warn=false); real modulus=w == 0 ? 0: fracpart(log(abs(w))); return hsv(phase,1,sqrt(modulus)); } image(f,N,N,(0,0),(300,300),antialias=true); ./asymptote-2.41/doc/filegraph.dat0000644000175000017500000000003213064427076016736 0ustar norbertnorbert# x y 50 0 100 0.5 125 2 ./asymptote-2.41/doc/colo-asy.tex0000644000175000017500000001037413064427076016565 0ustar norbertnorbert%D \module %D [ file=colo-asy, %D version=2009.05.20, %D title=\CONTEXT\ Color Macros, %D subtitle=\asymptote\ Colors, %D author=\asymptote\ developers, %D date=\currentdate, %D copyright={put something here}] %C %C any copyright notice may go here % call with \setupcolor[asy] \definecolor [cyan] [c=1.00,m=0.00,y=0.00,k=0.00] \definecolor [magenta] [c=0.00,m=1.00,y=0.00,k=0.00] \definecolor [yellow] [c=0.00,m=0.00,y=1.00,k=0.00] \definecolor [black] [c=0.00,m=0.00,y=0.00,k=1.00] \definecolor [white] [c=0.00,m=0.00,y=0.00,k=0.00] \definecolor [gray] [c=0.00,m=0.00,y=0.00,k=0.50] \definecolor [red] [c=0.00,m=1.00,y=1.00,k=0.00] \definecolor [green] [c=1.00,m=0.00,y=1.00,k=0.00] \definecolor [blue] [c=1.00,m=1.00,y=0.00,k=0.00] \definecolor [palered] [c=0.00,m=0.25,y=0.25,k=0.00] \definecolor [palegreen] [c=0.25,m=0.00,y=0.25,k=0.00] \definecolor [paleblue] [c=0.25,m=0.25,y=0.00,k=0.00] \definecolor [palecyan] [c=0.25,m=0.00,y=0.00,k=0.00] \definecolor [palemagenta] [c=0.00,m=0.25,y=0.00,k=0.00] \definecolor [paleyellow] [c=0.00,m=0.00,y=0.25,k=0.00] \definecolor [palegray] [c=0.00,m=0.00,y=0.00,k=0.05] \definecolor [lightred] [c=0.00,m=0.50,y=0.50,k=0.00] \definecolor [lightgreen] [c=0.50,m=0.00,y=0.50,k=0.00] \definecolor [lightblue] [c=0.50,m=0.50,y=0.00,k=0.00] \definecolor [lightcyan] [c=0.50,m=0.00,y=0.00,k=0.00] \definecolor [lightmagenta] [c=0.00,m=0.50,y=0.00,k=0.00] \definecolor [lightyellow] [c=0.00,m=0.00,y=0.50,k=0.00] \definecolor [lightgray] [c=0.00,m=0.00,y=0.00,k=0.10] \definecolor [mediumred] [c=0.00,m=0.75,y=0.75,k=0.00] \definecolor [mediumgreen] [c=0.75,m=0.00,y=0.75,k=0.00] \definecolor [mediumblue] [c=0.75,m=0.75,y=0.00,k=0.00] \definecolor [mediumcyan] [c=0.75,m=0.00,y=0.00,k=0.00] \definecolor [mediummagenta] [c=0.00,m=0.75,y=0.00,k=0.00] \definecolor [mediumyellow] [c=0.00,m=0.00,y=0.75,k=0.00] \definecolor [mediumgray] [c=0.00,m=0.00,y=0.00,k=0.25] \definecolor [heavyred] [c=0.00,m=1.00,y=1.00,k=0.25] \definecolor [heavygreen] [c=1.00,m=0.00,y=1.00,k=0.25] \definecolor [heavyblue] [c=1.00,m=1.00,y=0.00,k=0.25] \definecolor [heavycyan] [c=1.00,m=0.00,y=0.00,k=0.25] \definecolor [heavymagenta] [c=0.00,m=1.00,y=0.00,k=0.25] \definecolor [lightolive] [c=0.00,m=0.00,y=1.00,k=0.25] \definecolor [heavygray] [c=0.00,m=0.00,y=0.00,k=0.75] \definecolor [deepred] [c=0.00,m=1.00,y=1.00,k=0.50] \definecolor [deepgreen] [c=1.00,m=0.00,y=1.00,k=0.50] \definecolor [deepblue] [c=1.00,m=1.00,y=0.00,k=0.50] \definecolor [deepcyan] [c=1.00,m=0.00,y=0.00,k=0.50] \definecolor [deepmagenta] [c=0.00,m=1.00,y=0.00,k=0.50] \definecolor [olive] [c=0.00,m=0.00,y=1.00,k=0.50] \definecolor [deepgray] [c=0.00,m=0.00,y=0.00,k=0.90] \definecolor [darkred] [c=0.00,m=1.00,y=1.00,k=0.75] \definecolor [darkgreen] [c=1.00,m=0.00,y=1.00,k=0.75] \definecolor [darkblue] [c=1.00,m=1.00,y=0.00,k=0.75] \definecolor [darkcyan] [c=1.00,m=0.00,y=0.00,k=0.75] \definecolor [darkmagenta] [c=0.00,m=1.00,y=0.00,k=0.75] \definecolor [darkolive] [c=0.00,m=0.00,y=1.00,k=0.75] \definecolor [darkgray] [c=0.00,m=0.00,y=0.00,k=0.95] \definecolor [orange] [c=0.00,m=0.50,y=1.00,k=0.00] \definecolor [fuchsia] [c=0.00,m=1.00,y=0.50,k=0.00] \definecolor [chartreuse] [c=0.50,m=0.00,y=1.00,k=0.00] \definecolor [springgreen] [c=1.00,m=0.00,y=0.50,k=0.00] \definecolor [purple] [c=0.50,m=1.00,y=0.00,k=0.00] \definecolor [royalblue] [c=1.00,m=0.50,y=0.00,k=0.00] \definecolor [salmon] [c=0.00,m=0.50,y=0.50,k=0.00] \definecolor [brown] [c=0.00,m=1.00,y=1.00,k=0.50] \definecolor [darkbrown] [c=0.00,m=1.00,y=1.00,k=0.75] \definecolor [pink] [c=0.00,m=0.25,y=0.00,k=0.00] \definecolor [palegrey] [c=0.00,m=0.00,y=0.00,k=0.05] \definecolor [lightgrey] [c=0.00,m=0.00,y=0.00,k=0.10] \definecolor [mediumgrey] [c=0.00,m=0.00,y=0.00,k=0.25] \definecolor [grey] [c=0.00,m=0.00,y=0.00,k=0.50] \definecolor [heavygrey] [c=0.00,m=0.00,y=0.00,k=0.50] \definecolor [deepgrey] [c=0.00,m=0.00,y=0.00,k=0.90] \definecolor [darkgrey] [c=0.00,m=0.00,y=0.00,k=0.95] ./asymptote-2.41/doc/asymptote.sty0000644000175000017500000002316313064427212017073 0ustar norbertnorbert%% %% This is file `asymptote.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% asy-latex.dtx (with options: `pkg') %% ____________________________ %% The ASYMPTOTE package %% %% (C) 2003 Tom Prince %% (C) 2003-2016 John Bowman %% (C) 2010 Will Robertson %% %% Adapted from comment.sty %% %% Licence: GPL2+ %% \ProvidesPackage{asymptote} [2016/11/26 v1.33 Asymptote style file for LaTeX] \def\Asymptote{{\tt Asymptote}} \InputIfFileExists{\jobname.pre}{}{} \newbox\ASYbox \newdimen\ASYdimen \newcounter{asy} \newwrite\AsyStream \newwrite\AsyPreStream \newif\ifASYinline \newif\ifASYattach \newif\ifASYkeepAspect \ASYkeepAspecttrue \RequirePackage{keyval} \RequirePackage{ifthen} \RequirePackage{color,graphicx} \IfFileExists{ifpdf.sty}{ \RequirePackage{ifpdf} }{ \expandafter\newif\csname ifpdf\endcsname \ifx\pdfoutput\@undefined\else \ifcase\pdfoutput\else \pdftrue \fi \fi } \IfFileExists{ifxetex.sty}{ \RequirePackage{ifxetex} }{ \expandafter\newif\csname ifxetex\endcsname \ifx\XeTeXversion\@undefined\else \xetextrue \fi } \IfFileExists{catchfile.sty}{ \RequirePackage{catchfile} }{ \newcommand\CatchFileDef[3]{% \begingroup \everyeof{% \ENDCATCHFILEMARKER \noexpand }% \long\def\@tempa####1\ENDCATCHFILEMARKER{% \endgroup \def##1{####1}% }% ##3% \expandafter\@tempa\@@input ##2\relax } } \newif\if@asy@attachfile@loaded \AtBeginDocument{% \@ifpackageloaded{attachfile2}{\@asy@attachfile@loadedtrue}{}% \let\asy@check@attachfile\asy@check@attachfile@loaded } \newcommand\asy@check@attachfile@loaded{% \if@asy@attachfile@loaded\else \PackageError{asymptote}{You must load the attachfile2 package}{^^J% You have requested the [attach] option for some or all of your^^J% Asymptote graphics, which requires the attachfile2 package.^^J% Please load it in the document preamble.^^J% }% \fi } \newcommand\asy@check@attachfile{% \AtBeginDocument{\asy@check@attachfile@loaded}% \let\asy@check@attachfile\@empty } \def\csarg#1#2{\expandafter#1\csname#2\endcsname} \DeclareOption{inline}{% \ASYinlinetrue } \DeclareOption{attach}{% \asy@check@attachfile \ASYattachtrue } \ProcessOptions* \def\asylatexdir{} \def\asydir{} \def\ASYasydir{} \def\ASYprefix{} \newif\ifASYPDF \ifxetex \ASYPDFtrue \usepackage{everypage} \else \ifpdf \ASYPDFtrue \fi \fi \ifASYPDF \def\AsyExtension{pdf} \else \def\AsyExtension{eps} \fi \def\unquoteJobname#1"#2"#3\relax{% \def\rawJobname{#1}% \ifx\rawJobname\empty \def\rawJobname{#2}% \fi } \expandafter\unquoteJobname\jobname""\relax \def\fixstar#1*#2\relax{% \def\argtwo{#2}% \ifx\argtwo\empty \gdef\Jobname{#1}% \else \fixstar#1-#2\relax \fi } \expandafter\fixstar\rawJobname*\relax \def\Ginclude@eps#1{% \message{<#1>}% \bgroup \def\@tempa{!}% \dimen@\Gin@req@width \dimen@ii.1bp\relax \divide\dimen@\dimen@ii \@tempdima\Gin@req@height \divide\@tempdima\dimen@ii \special{PSfile=#1\space llx=\Gin@llx\space lly=\Gin@lly\space urx=\Gin@urx\space ury=\Gin@ury\space \ifx\Gin@scalex\@tempa\else rwi=\number\dimen@\space\fi \ifx\Gin@scaley\@tempa\else rhi=\number\@tempdima\space\fi \ifGin@clip clip\fi}% \egroup } \immediate\openout\AsyPreStream=\jobname.pre\relax \AtEndDocument{\immediate\closeout\AsyPreStream} \def\WriteAsyLine#1{% \immediate\write\AsyStream{\detokenize{#1}}% } \def\globalASYdefs{} \def\WriteGlobalAsyLine#1{% \expandafter\g@addto@macro \expandafter\globalASYdefs \expandafter{\detokenize{#1^^J}}% } \def\ProcessAsymptote#1{% \begingroup \def\CurrentAsymptote{#1}% \let\do\@makeother \dospecials \@makeother\^^L% and whatever other special cases \catcode`\ =10 \endlinechar`\^^M \catcode`\^^M=12 \xAsymptote } \begingroup \catcode`\^^M=12 \endlinechar=-1\relax% \gdef\xAsymptote{% \expandafter\ProcessAsymptoteLine% } \gdef\ProcessAsymptoteLine#1^^M{% \def\@tempa{#1}% {% \escapechar=-1\relax% \xdef\@tempb{\string\\end\string\{\CurrentAsymptote\string\}}% }% \ifx\@tempa\@tempb% \edef\next{\endgroup\noexpand\end{\CurrentAsymptote}}% \else% \ThisAsymptote{#1}% \let\next\ProcessAsymptoteLine% \fi% \next% } \endgroup \def\asy@init{ \def\ASYlatexdir{} \ifx\asylatexdir\empty\else \def\ASYlatexdir{\asylatexdir/}% \fi \ifx\asydir\empty\else \def\ASYasydir{\asydir/}% \fi \def\ASYprefix{\ASYlatexdir\ASYasydir}% } \newcommand\asy[1][]{% \stepcounter{asy}% \setkeys{ASYkeys}{#1}% \ifASYattach \ASYinlinefalse \fi \asy@init \immediate\write\AsyPreStream{% \noexpand\InputIfFileExists{% \ASYprefix\noexpand\jobname-\the\c@asy.pre}{}{}% } \asy@write@graphic@header \let\ThisAsymptote\WriteAsyLine \ProcessAsymptote{asy}% } \def\endasy{% \asy@finalise@stream \asy@input@graphic } \def\asy@write@graphic@header{% \immediate\openout\AsyStream=\ASYasydir\jobname-\the\c@asy.asy\relax \gdef\AsyFile{\ASYprefix\Jobname-\the\c@asy}% \immediate\write\AsyStream{% if(!settings.multipleView) settings.batchView=false;^^J% \ifxetex settings.tex="xelatex";^^J% \else\ifASYPDF settings.tex="pdflatex";^^J% \fi\fi \ifASYinline settings.inlinetex=true;^^J% deletepreamble();^^J% \fi defaultfilename="\Jobname-\the\c@asy";^^J% if(settings.render < 0) settings.render=4;^^J% settings.outformat="";^^J% \ifASYattach settings.inlineimage=false;^^J% settings.embed=false;^^J% settings.toolbar=true;^^J% \else settings.inlineimage=true;^^J% settings.embed=true;^^J% settings.toolbar=false;^^J% viewportmargin=(2,2);^^J% \fi \globalASYdefs }% } \def\asy@expand@keepAspect{% \ifASYkeepAspect keepAspect=true% \else keepAspect=false% \fi% } \def\asy@finalise@stream{% \ifx\ASYwidth\@empty \ifx\ASYheight\@empty % write nothing! \else \immediate\write\AsyStream{size(0,\ASYheight,\asy@expand@keepAspect);}% \fi \else \ifx\ASYheight\@empty \immediate\write\AsyStream{size(\ASYwidth,0,\asy@expand@keepAspect);}% \else \immediate\write\AsyStream{size(\ASYwidth,\ASYheight,\asy@expand@keepAspect);}% \fi \fi \ifx\ASYviewportwidth\@empty \ifx\ASYviewportheight\@empty % write nothing! \else \immediate\write\AsyStream{viewportsize=(0,\ASYviewportheight);}% \fi \else \ifx\ASYviewportheight\@empty \immediate\write\AsyStream{viewportsize=(\ASYviewportwidth,0);}% \else \immediate\write\AsyStream{% viewportsize=(\ASYviewportwidth,\ASYviewportheight);}% \fi \fi \immediate\closeout\AsyStream } \def\asy@input@graphic{% \ifASYinline \IfFileExists{"\AsyFile.tex"}{% \catcode`:=12\relax \@@input"\AsyFile.tex"\relax }{% \PackageWarning{asymptote}{file `\AsyFile.tex' not found}% }% \else \IfFileExists{"\AsyFile.\AsyExtension"}{% \ifASYattach \ifASYPDF \IfFileExists{"\AsyFile+0.pdf"}{% \setbox\ASYbox=\hbox{\includegraphics[hiresbb]{"\AsyFile+0".pdf}}% }{% \setbox\ASYbox=\hbox{\includegraphics[hiresbb]{"\AsyFile".pdf}}% }% \else \setbox\ASYbox=\hbox{\includegraphics[hiresbb]{"\AsyFile.eps"}}% \fi \textattachfile{\AsyFile.\AsyExtension}{\phantom{\copy\ASYbox}}% \vskip-\ht\ASYbox \indent \box\ASYbox \else \ifASYPDF \includegraphics[hiresbb]{"\AsyFile".pdf}% \else \includegraphics[hiresbb]{"\AsyFile.eps"}% \fi \fi }{% \IfFileExists{"\AsyFile.tex"}{% \catcode`:=12 \@@input"\AsyFile.tex"\relax }{% \PackageWarning{asymptote}{% file `\AsyFile.\AsyExtension' not found% }% }% }% \fi } \def\asydef{% \let\ThisAsymptote\WriteGlobalAsyLine \ProcessAsymptote{asydef}% } \newcommand\asyinclude[2][]{% \begingroup \stepcounter{asy}% \setkeys{ASYkeys}{#1}% \ifASYattach \ASYinlinefalse \fi \asy@init \immediate\write\AsyPreStream{% \noexpand\InputIfFileExists{% \ASYprefix\noexpand\jobname-\the\c@asy.pre}{}{}% }% \asy@write@graphic@header \IfFileExists{#2.asy}{% \CatchFileDef\@tempa{#2.asy}{% \let\do\@makeother \dospecials \endlinechar=10\relax }% }{% \IfFileExists{#2}{% \CatchFileDef\@tempa{#2}{% \let\do\@makeother \dospecials \endlinechar=10\relax }% }{% \PackageWarning{asymptote}{file #2 not found}% \def\@tempa{}% }% }% \immediate\write\AsyStream{\unexpanded\expandafter{\@tempa}}% \asy@finalise@stream \asy@input@graphic \endgroup } \newcommand{\ASYanimategraphics}[5][]{% \IfFileExists{_#3.pdf}{% \animategraphics[{#1}]{#2}{_#3}{#4}{#5}% }{}% } \newcommand\asysetup[1]{\setkeys{ASYkeys}{#1}} \define@key{ASYkeys}{dir}{% \def\asydir{#1}% } \def\ASYwidth{} \define@key{ASYkeys}{width}{% \edef\ASYwidth{\the\dimexpr#1\relax}% } \def\ASYheight{} \define@key{ASYkeys}{height}{% \edef\ASYheight{\the\dimexpr#1\relax}% } \define@key{ASYkeys}{keepAspect}[true]{% \ifthenelse{\equal{#1}{true}} {\ASYkeepAspecttrue} {\ASYkeepAspectfalse}% } \def\ASYviewportwidth{} \define@key{ASYkeys}{viewportwidth}{% \edef\ASYviewportwidth{\the\dimexpr#1\relax}% } \def\ASYviewportheight{} \define@key{ASYkeys}{viewportheight}{% \edef\ASYviewportheight{\the\dimexpr#1\relax}% } \define@key{ASYkeys}{inline}[true]{% \ifthenelse{\equal{#1}{true}} {\ASYinlinetrue} {\ASYinlinefalse}% } \define@key{ASYkeys}{attach}[true]{% \ifthenelse{\equal{#1}{true}} {\ASYattachtrue} {\ASYattachfalse}% } ./asymptote-2.41/doc/CAD.tex0000644000175000017500000002372413064427076015431 0ustar norbertnorbert\documentclass{ltxguide} \usepackage{graphicx} \begin{document} \title{Asymptote package CAD.asy\footnote{This document describes version 1.0.}} \author{Mark Henning, Germany\thanks{URL: http://www.markhenning.de}} \date{29 September 2006} \maketitle \tableofcontents \section{Introduction} The package {\tt CAD.asy} provides basic pen definitions and measurement functions for simple 2D CAD drawings according to DIN 15. \section{Important rules for using this package} If a function is declared like this: % \begin{verbatim} void foo(int nParam1, string strParam2) \end{verbatim} % You may call it \verb\foo(0, 'abc');\ or \verb\foo(nParam1=0, strParam2='abc');\. The definitions of the functions in this package may change in future version: the order of the parameters may be changed, new parameters may be inserted. Therefore it is \emph{strongly recommended} always calling the functions \verb\foo(nParam1=0, strParam2='abc');\. \section{Usage} To use the capabilities of the package, import it: % \begin{verbatim} import CAD; \end{verbatim} % All functions are encapsulated in the structure \verb\sCAD\. As the pen definitions may differ depending on the size of your drawing, you have to initialize the structure before drawing: \begin{verbatim} static sCAD Create(int nLineGroup = 1) \end{verbatim} % The parameter \verb\nLineGroup\ depends on the size of your drawing. It specifies the line group to define the pens and thus the width used for the lines. The parameter has to be within the range $[0;3]$. The larger the value, the thicker the lines. Code example: % \begin{quote}\begin{verbatim} sCAD cad = sCAD.Create(); \end{verbatim}\end{quote} The created variable \verb\cad\ then provides the most important pens. Available pens are: % \begin{itemize} \item The pens of group A: \begin{itemize} \item\verb\pA\ \item\verb\pVisibleEdge\ \item\verb\pVisibleContour\ \item\verb\pUsableWindingLength\ \item\verb\pSystemLine\ \item\verb\pDiagramCurve\ \item\verb\pSurfaceStructure\ \end{itemize} \item The pens of group B: \begin{itemize} \item\verb\pB\ \item\verb\pLightEdge\ \item\verb\pMeasureLine\ \item\verb\pMeasureHelpLine\ \item\verb\pMeasureLineBound\ \item\verb\pReferenceLine\ \item\verb\pHatch\ \item\verb\pWindingGround\ \item\verb\pDiagonalCross\ \item\verb\pBendLine\ \item\verb\pProjectionLine\ \item\verb\pGrid\ \end{itemize} \item The pens of group C: \begin{itemize} \item\verb\pC\ \item\verb\pFreehand\ \end{itemize} \item The pens of group E: \begin{itemize} \item\verb\pE\ \item\verb\pSurfaceTreatmentAllowed\ \end{itemize} \item The pens of group F: \begin{itemize} \item\verb\pF\ \item\verb\pInvisibleEdge\ \item\verb\pInvisibleContour\ \end{itemize} \item The pens of group G: \begin{itemize} \item\verb\pG\ \item\verb\pMiddleLine\ \item\verb\pSymmetryLine\ \item\verb\pPartialCircle\ \item\verb\pCircularHole\ \item\verb\pDivisionPlane\ \item\verb\pTransferLine\ \end{itemize} \item The pens of group J: \begin{itemize} \item\verb\pJ\ \item\verb\pCuttingPlane\ \item\verb\pSurfaceTreatmentRequested\ \end{itemize} \item The pens of group K: \begin{itemize} \item\verb\pK\ \item\verb\pContourBeforeDeformation\ \item\verb\pAdjacentPartContour\ \item\verb\pEndShapeRawMaterial\ \item\verb\pContourEligibleType\ \item\verb\pPartInFrontOfCuttingPlane\ \end{itemize} \end{itemize} % All pens of one group are the same. So there is no difference between the pen \verb\pA\ and the pen \verb\pVisibleEdge\. You may use the short names or the descriptive ones. The list of groups is not complete. I had no idea how to implement the pens of group D. For me, group H seems to be obsolete, and there is no group I contained in DIN 15. In the case I did something wrong translating the German names into English, the source file also contains the original German names of each pen. Whenever a drawing function does not allow you to select the pen, the right pen is selected automatically. \begin{verbatim} void MeasureLine(picture pic = currentpicture, Label L, pair pFrom, pair pTo, real dblLeft = 0, real dblRight = 0, real dblRelPosition = 0.5, bool bSmallBound = false) \end{verbatim} % This is the basic function to draw labeled straight measurement lines. \verb\pic\ denotes the picture the line has to be drawn into, \verb\L\ is the label of the line. The pairs \verb\pFrom\ and \verb\pTo\ are the start and the end point of the distance to measure, respectively. Note, that these two points do \emph{not} refer to the start and end point of the line, as it may be longer than the measured distance. The line is extended on its left side (= the part of the line 'before' the start point) by the distance \verb\dblLeft\. On its right side (= the part of the line 'behind' the end point) it is extended by the distance \verb\dblRight\. \verb\dblLeft\ and \verb\dblRight\ must be $\leq 0$. If only one of both values is zero, it is set to the value of the other one, because according to DIN 15 it is not allowed to draw a measurement line asymmetrically. The position of the arrows indicating begin and end of the distance depends on \verb\dblLeft\ and \verb\dblRight\. If both values are 0, the measurement arrows are drawn within the measurement distance. Otherwise they are drawn outside. The parameter \verb\dblRelPosition\ refers to the relative position of the label between the start and end point. This means: The value 0 positions the label at the start point, 0.5 refers to the center between the start and the end point. Finally, the value 1 will position the label at the end point. If \verb\dblLeft\ or \verb\dblRight\ are nonzero, you may position the label at the left side of the start point ($< 0$) or at the right side of the start point ($> 1$). Usually, there is enough space to draw the measurement arrows. If you wish to use small circles instead of the arrows, set \verb\bSmallBound\ to \verb\true\. \begin{verbatim} real GetMeasurementBoundSize(bool bSmallBound = false) \end{verbatim} % Returns the size of the arrow or the small bound circle used for measurement lines. \begin{verbatim} guide GetMeasurementBound(bool bSmallBound = false) \end{verbatim} % Returns the correctly scaled guide of the arrow or the small bound circle used for measurement lines. \begin{verbatim} void MeasureParallel(picture pic = currentpicture, Label L, pair pFrom, pair pTo, real dblDistance, // Variables from MeasureLine real dblLeft = 0, real dblRight = 0, real dblRelPosition = 0.5, bool bSmallBound = false) \end{verbatim} % Usually, measurement lines are placed outside the drawing with reference lines to the measured distance. \verb\pFrom\ and \verb\pTo\ denote the points of the drawing marking the begin and the end of the distance to measure, and not the begin and the end of the measurement line as in the case of the function \verb\MeasureLine\. The measurement line is placed \verb\dblDistance\ away from the distance to measure. If you would be at \verb\pFrom\ and look into the direction \verb\pTo\, it is placed on the left for positive values of \verb\dblDistance\. For negative values, it is positioned on the right. For the meaning of the other parameters see the function \verb\MeasureLine\. \begin{verbatim} guide MakeFreehand(pair pFrom, pair pTo, real dblRelDivisionLength = 12.5, real dblRelDistortion = 2.5, bool bIncludeTo = true) \end{verbatim} % To draw a line between two points, which is not straight, but more like a freehand line, use this function. The pairs \verb\pFrom\ and \verb\pTo\ denote start and end point, respectively. \verb\dblRelDivisionLength\ is the length of the parts, the line is subdivided into. \verb\dblRelDistortion\ is the amount of distortion. Both sizes are given relative to the width of a freehand line. If \verb\bIncludeTo\ is \verb\true\, the point \verb\pTo\ is added to the path. Otherwise it is not. This may be useful for converting a guide containing more than two points to a freehand line. \section{Example} \begin{figure} \includegraphics{CAD1} \caption{Example showing the measurement capabilities and a small freehand line.\label{fig:example1}} \end{figure} To produce figure \ref{fig:example1}, use this code: \begin{quote} \begin{verbatim} import CAD; sCAD cad = sCAD.Create(); // Freehand line draw(g = cad.MakeFreehand(pFrom = (3, -1)*cm, (6, -1)*cm), p = cad.pFreehand); // Standard measurement lines draw(g = box((0, 0)*cm, (1, 1)*cm), p = cad.pVisibleEdge); cad.MeasureParallel(L = "$\sqrt{2}$", pFrom = (0, 1)*cm, pTo = (1, 0)*cm, dblDistance = -15mm); // Label inside, shifted to the right; arrows outside draw(g = box((2, 0)*cm, (3, 1)*cm), p = cad.pVisibleEdge); cad.MeasureParallel(L = "1", pFrom = (2, 1)*cm, pTo = (3, 1)*cm, dblDistance = 5mm, dblLeft = 5mm, dblRelPosition = 0.75); // Label and arrows outside draw(g = box((5, 0)*cm, (5.5, 1)*cm), p = cad.pVisibleEdge); cad.MeasureParallel(L = "0.5", pFrom = (5, 1)*cm, pTo = (5.5, 1)*cm, dblDistance = 5mm, dblLeft = 10mm, dblRelPosition = -1); // Small bounds, asymmetric measurement line draw(g = box((7, 0)*cm, (7.5, 1)*cm), p = cad.pVisibleEdge); cad.MeasureParallel(L = "0.5", pFrom = (7, 1)*cm, pTo = (7.5, 1)*cm, dblDistance = 5mm, dblLeft = 2*cad.GetMeasurementBoundSize( bSmallBound = true), dblRight = 10mm, dblRelPosition = 2, bSmallBound = true); \end{verbatim} \end{quote} \end{document} ./asymptote-2.41/doc/ocg.sty0000644000175000017500000000665113064427076015631 0ustar norbertnorbert%% Copyright (C) 2007 by Michael Ritzert %% Spurious spaces removed by John Bowman [2009/06/01]. %% Global macros to find the number of a PDF OCG object from its LaTeX %% reference contributed by Paul Gaborit [2012/09/13]. \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{ocg}[2012/09/13] \RequirePackage{ifpdf} \ifpdf \else \PackageWarningNoLine{ocg}{% Loading aborted, because pdfTeX is not running in PDF mode% }% \expandafter\endinput \fi \DeclareOption*{}\ProcessOptions*\relax %allow anything as option for the moment %testing for correct pdfTeX version %TODO: find out minimum required version! \ifnum\pdftexversion<120 \PackageError{ocg}{% pdfeTeX, version >= 1.20, required% }{% Install a newer version!% }% \fi % Next OCG id -- TODO: autogenerate. but keep possibility to reopen an OCG. \newcount\@ocg@num\@ocg@num=0 \gdef\@ocg@layersnames{} % called from the aux file \def\@ocg@makeknown#1#2#3{% #1: OCG name, #2: OC id, #3: on/off \@ifundefined{OCG#2}{% \message{OCG#2} \expandafter\gdef\csname OCG#2\endcsname{#1}% \immediate\pdfobj{<< /Type /OCG /Name (#1) >>}% new ocg \xdef\@ocg@curocg{\the\pdflastobj\space 0 R}% reference to id \expandafter\xdef\csname OCGpdfobj#2\endcsname{\@ocg@curocg} \xdef\@ocg@ocgs{\@ocg@ocgs\space\@ocg@curocg}% list of all OCGs in "first defined" order \ifnum#3=1 %on \xdef\@ocg@ocgson{\@ocg@ocgson\space\@ocg@curocg}% list of all default-on OCGs \else% \xdef\@ocg@ocgsoff{\@ocg@ocgsoff\space\@ocg@curocg}% list of all default-off OCGs \fi% \xdef\@ocg@layersnames{% \@ocg@layersnames\space/OC#2\space\@ocg@curocg% name-to-id mapping }% }{% \message{OCG#2 reopened} % layer reopened } } \AtBeginDocument{% % the auxfile has been read if available. register the OCGs in the page resources. \@ocg@addresource \let\@ocg@makeknown\@gobble } % set page resources to include the layers defined in the aux file \def\@ocg@addresource{% \immediate\pdfobj{<<\@ocg@layersnames\space>>}% \xdef\@ocg@namesobj{\the\pdflastobj\space 0 R}% % append to pageresources \begingroup \edef\x{\endgroup \pdfpageresources{% \the\pdfpageresources /Properties \@ocg@namesobj% }% }% \x } \newcount\@ocg@@ocgs \pdfobj reserveobjnum \@ocg@@ocgs=\pdflastobj \newcount\@ocg@@layersconfig \pdfobj reserveobjnum \@ocg@@layersconfig=\pdflastobj \pdfcatalog{% /OCProperties << /OCGs \the\@ocg@@ocgs\space0 R\space /D \the\@ocg@@layersconfig\space0 R\space >>% } \def\@ocg@ocgs{} \def\@ocg@ocgson{} \def\@ocg@ocgsoff{} \AtEndDocument{% \immediate\pdfobj useobjnum \@ocg@@ocgs {% [\@ocg@ocgs\space]% }% \immediate\pdfobj useobjnum \@ocg@@layersconfig {% << /Order [\@ocg@ocgs\space] /ON [\@ocg@ocgson\space] /OFF [\@ocg@ocgsoff\space] >>% }% }% % schedule a OCG for creation on the next pdflatex run (via the auxfile) \def\@ocg@newocg#1#2#3{% #1:name, #2:num, #3:on \if@filesw% \immediate\write\@auxout{% \string\@ocg@makeknown{#1}{#2}{#3}% }% \fi% } % TODO: Are nested OCGs allowed? \newenvironment{ocg}[3]{% \@ocg@newocg{#1}{#2}{#3}% \gdef\@ocg@curnum{#2}% \pdfliteral{/OC /OC\@ocg@curnum\space BDC}% \message{/OC\@ocg@curnum}% \ignorespaces }{% \pdfliteral{EMC}% %\unskip% %\endgroup% \ignorespacesafterend } ./asymptote-2.41/doc/logimage.asy0000644000175000017500000000074013064427076016613 0ustar norbertnorbertimport graph; import palette; size(10cm,10cm,IgnoreAspect); real f(real x, real y) { return 0.9*pow10(2*sin(x/5+2*y^0.25)) + 0.1*(1+cos(10*log(y))); } scale(Linear,Log,Log); pen[] Palette=BWRainbow(); bounds range=image(f,Automatic,(0,1),(100,100),nx=200,Palette); xaxis("$x$",BottomTop,LeftTicks,above=true); yaxis("$y$",LeftRight,RightTicks,above=true); palette("$f(x,y)$",range,(0,200),(100,250),Top,Palette, PaletteTicks(ptick=linewidth(0.5*linewidth()))); ./asymptote-2.41/doc/vectorfield.asy0000644000175000017500000000022313064427076017331 0ustar norbertnorbertimport graph; size(100); pair a=(0,0); pair b=(2pi,2pi); path vector(pair z) {return (0,0)--(sin(z.x),cos(z.y));} add(vectorfield(vector,a,b)); ./asymptote-2.41/doc/parametricgraph.asy0000644000175000017500000000036013064427076020176 0ustar norbertnorbertimport graph; size(0,200); real x(real t) {return cos(2pi*t);} real y(real t) {return sin(2pi*t);} draw(graph(x,y,0,1)); //limits((0,-1),(1,0),Crop); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks(trailingzero)); ./asymptote-2.41/doc/colons.asy0000644000175000017500000000006113064427076016320 0ustar norbertnorbertdraw((0,0){up}::(100,25){right}::(200,0){down}); ./asymptote-2.41/doc/generalaxis3.asy0000644000175000017500000000057013064427076017415 0ustar norbertnorbertimport graph3; size(0,100); path3 g=yscale3(2)*unitcircle3; currentprojection=perspective(10,10,10); axis(Label("C",position=0,align=15X),g,InTicks(endlabel=false,8,end=false), ticklocate(0,360,new real(real v) { path3 h=O--max(abs(max(g)),abs(min(g)))*dir(90,v); return intersect(g,h)[0];}, new triple(real t) {return cross(dir(g,t),Z);})); ./asymptote-2.41/doc/westnile.csv0000644000175000017500000001116713064427076016665 0ustar norbertnorbertsm0,0.001(T14) 0.0,0.9973 0.1,0.9973 0.2,0.9972 0.3,0.9972 0.4,0.9971 0.5,0.9971 0.6,0.9970 0.7,0.9970 0.8,0.9969 0.9,0.9968 1.0,0.9968 1.1,0.9967 1.2,0.9966 1.3,0.9966 1.4,0.9965 1.5,0.9964 1.6,0.9963 1.7,0.9963 1.8,0.9962 1.9,0.9961 2.0,0.9960 2.1,0.9959 2.2,0.9958 2.3,0.9957 2.4,0.9957 2.5,0.9956 2.6,0.9955 2.7,0.9954 2.8,0.9952 2.9,0.9951 3.0,0.9950 3.1,0.9949 3.2,0.9948 3.3,0.9947 3.4,0.9945 3.5,0.9944 3.6,0.9943 3.7,0.9941 3.8,0.9940 3.9,0.9939 4.0,0.9937 4.1,0.9936 4.2,0.9934 4.3,0.9932 4.4,0.9931 4.5,0.9929 4.6,0.9927 4.7,0.9926 4.8,0.9924 4.9,0.9922 5.0,0.9920 5.1,0.9918 5.2,0.9916 5.3,0.9914 5.4,0.9912 5.5,0.9909 5.6,0.9907 5.7,0.9905 5.8,0.9902 5.9,0.9900 6.0,0.9897 6.1,0.9895 6.2,0.9892 6.3,0.9889 6.4,0.9887 6.5,0.9884 6.6,0.9881 6.7,0.9878 6.8,0.9875 6.9,0.9872 7.0,0.9868 7.1,0.9865 7.2,0.9861 7.3,0.9858 7.4,0.9854 7.5,0.9851 7.6,0.9847 7.7,0.9843 7.8,0.9839 7.9,0.9835 8.0,0.9831 8.1,0.9826 8.2,0.9822 8.3,0.9818 8.4,0.9813 8.5,0.9808 8.6,0.9803 8.7,0.9798 8.8,0.9793 8.9,0.9788 9.0,0.9783 9.1,0.9777 9.2,0.9772 9.3,0.9766 9.4,0.9760 9.5,0.9754 9.6,0.9748 9.7,0.9742 9.8,0.9735 9.9,0.9729 10.0,0.9722 10.1,0.9715 10.2,0.9708 10.3,0.9701 10.4,0.9694 10.5,0.9686 10.6,0.9679 10.7,0.9671 10.8,0.9663 10.9,0.9654 11.0,0.9646 11.1,0.9637 11.2,0.9629 11.3,0.9620 11.4,0.9611 11.5,0.9601 11.6,0.9592 11.7,0.9582 11.8,0.9572 11.9,0.9562 12.0,0.9551 12.1,0.9541 12.2,0.9530 12.3,0.9519 12.4,0.9507 12.5,0.9496 12.6,0.9484 12.7,0.9472 12.8,0.9460 12.9,0.9447 13.0,0.9434 13.1,0.9421 13.2,0.9408 13.3,0.9394 13.4,0.9380 13.5,0.9366 13.6,0.9352 13.7,0.9337 13.8,0.9322 13.9,0.9307 14.0,0.9291 14.1,0.9275 14.2,0.9259 14.3,0.9243 14.4,0.9226 14.5,0.9209 14.6,0.9191 14.7,0.9174 14.8,0.9156 14.9,0.9137 15.0,0.9118 15.1,0.9099 15.2,0.9080 15.3,0.9060 15.4,0.9041 15.5,0.9020 15.6,0.8999 15.7,0.8978 15.8,0.8956 15.9,0.8934 16.0,0.8912 16.1,0.8889 16.2,0.8866 16.3,0.8843 16.4,0.8819 16.5,0.8795 16.6,0.8770 16.7,0.8745 16.8,0.8720 16.9,0.8694 17.0,0.8668 17.1,0.8641 17.2,0.8614 17.3,0.8587 17.4,0.8559 17.5,0.8531 17.6,0.8502 17.7,0.8473 17.8,0.8444 17.9,0.8414 18.0,0.8383 18.1,0.8353 18.2,0.8323 18.3,0.8291 18.4,0.8259 18.5,0.8227 18.6,0.8194 18.7,0.8160 18.8,0.8127 18.9,0.8092 19.0,0.8058 19.1,0.8022 19.2,0.7987 19.3,0.7951 19.4,0.7914 19.5,0.7878 19.6,0.7840 19.7,0.7803 19.8,0.7764 19.9,0.7726 20.0,0.7687 20.1,0.7647 20.2,0.7607 20.3,0.7567 20.4,0.7526 20.5,0.7485 20.6,0.7443 20.7,0.7401 20.8,0.7359 20.9,0.7316 21.0,0.7272 21.1,0.7229 21.2,0.7185 21.3,0.7140 21.4,0.7096 21.5,0.7050 21.6,0.7005 21.7,0.6959 21.8,0.6912 21.9,0.6866 22.0,0.6819 22.1,0.6771 22.2,0.6723 22.3,0.6675 22.4,0.6627 22.5,0.6578 22.6,0.6530 22.7,0.6480 22.8,0.6430 22.9,0.6380 23.0,0.6330 23.1,0.6280 23.2,0.6229 23.3,0.6178 23.4,0.6126 23.5,0.6075 23.6,0.6023 23.7,0.5971 23.8,0.5918 23.9,0.5866 24.0,0.5813 24.1,0.5760 24.2,0.5706 24.3,0.5653 24.4,0.5600 24.5,0.5547 24.6,0.5493 24.7,0.5440 24.8,0.5385 24.9,0.5332 25.0,0.5278 25.1,0.5224 25.2,0.5170 25.3,0.5115 25.4,0.5061 25.5,0.5007 25.6,0.4952 25.7,0.4898 25.8,0.4844 25.9,0.4789 26.0,0.4735 26.1,0.4681 26.2,0.4627 26.3,0.4572 26.4,0.4518 26.5,0.4464 26.6,0.4410 26.7,0.4356 26.8,0.4303 26.9,0.4249 27.0,0.4194 27.1,0.4143 27.2,0.4089 27.3,0.4036 27.4,0.3983 27.5,0.3931 27.6,0.3878 27.7,0.3826 27.8,0.3774 27.9,0.3724 28.0,0.3672 28.1,0.3621 28.2,0.3571 28.3,0.3520 28.4,0.3470 28.5,0.3420 28.6,0.3370 28.7,0.3320 28.8,0.3271 28.9,0.3223 29.0,0.3174 29.1,0.3126 29.2,0.3078 29.3,0.3031 29.4,0.2983 29.5,0.2936 29.6,0.2890 29.7,0.2845 29.8,0.2801 29.9,0.2756 30.0,0.2711 30.1,0.2667 30.2,0.2623 30.3,0.2580 30.4,0.2537 30.5,0.2495 30.6,0.2453 30.7,0.2411 30.8,0.2370 30.9,0.2329 31.0,0.2289 31.1,0.2250 31.2,0.2210 31.3,0.2171 31.4,0.2133 31.5,0.2095 31.6,0.2057 31.7,0.2019 31.8,0.1983 31.9,0.1947 32.0,0.1912 32.1,0.1876 32.2,0.1842 32.3,0.1807 32.4,0.1773 32.5,0.1740 32.6,0.1707 32.7,0.1674 32.8,0.1642 32.9,0.1611 33.0,0.1580 33.1,0.1549 33.2,0.1520 33.3,0.1490 33.4,0.1461 33.5,0.1432 33.6,0.1404 33.7,0.1376 33.8,0.1348 33.9,0.1321 34.0,0.1294 34.1,0.1268 34.2,0.1242 34.3,0.1217 34.4,0.1193 34.5,0.1168 34.6,0.1144 34.7,0.1120 34.8,0.1097 34.9,0.1074 35.0,0.1052 35.1,0.1029 35.2,0.1008 35.3,0.0987 35.4,0.0966 35.5,0.0946 35.6,0.0925 35.7,0.0905 35.8,0.0886 35.9,0.0867 36.0,0.0848 36.1,0.0830 36.2,0.0812 36.3,0.0794 36.4,0.0777 36.5,0.0760 36.6,0.0743 36.7,0.0727 36.8,0.0711 36.9,0.0696 37.0,0.0680 37.1,0.0665 37.2,0.0651 37.3,0.0636 37.4,0.0622 37.5,0.0608 37.6,0.0595 37.7,0.0581 37.8,0.0568 37.9,0.0555 38.0,0.0543 38.1,0.0531 38.2,0.0519 38.3,0.0507 38.4,0.0495 38.5,0.0484 38.6,0.0473 38.7,0.0462 38.8,0.0452 38.9,0.0441 39.0,0.0431 39.1,0.0421 39.2,0.0412 39.3,0.0402 39.4,0.0393 39.5,0.0384 39.6,0.0375 39.7,0.0366 39.8,0.0358 39.9,0.0350 40.0,0.0342 ./asymptote-2.41/doc/latexmkrc_asydir0000644000175000017500000000022613064427076017600 0ustar norbertnorbertsub asy {return system("asy -o asy/ '$_[0]'");} add_cus_dep("asy","eps",0,"asy"); add_cus_dep("asy","pdf",0,"asy"); add_cus_dep("asy","tex",0,"asy"); ./asymptote-2.41/doc/hatch.asy0000644000175000017500000000042713064427076016120 0ustar norbertnorbertsize(0,100); import patterns; add("hatch",hatch()); add("hatchback",hatch(NW)); add("crosshatch",crosshatch(3mm)); real s=1.25; filldraw(unitsquare,pattern("hatch")); filldraw(shift(s,0)*unitsquare,pattern("hatchback")); filldraw(shift(2s,0)*unitsquare,pattern("crosshatch")); ./asymptote-2.41/doc/shadedtiling.asy0000644000175000017500000000040013064427076017457 0ustar norbertnorbertsize(0,100); import patterns; real d=4mm; picture tiling; path square=scale(d)*unitsquare; axialshade(tiling,square,white,(0,0),black,(d,d)); fill(tiling,shift(d,d)*square,blue); add("shadedtiling",tiling); filldraw(unitcircle,pattern("shadedtiling")); ./asymptote-2.41/doc/flowchartdemo.asy0000644000175000017500000000153613064427076017671 0ustar norbertnorbertsize(0,300); import flowchart; block block1=rectangle(Label("Example",magenta), pack(Label("Start:",heavygreen),"",Label("$A:=0$",blue), "$B:=1$"),(-0.5,3),palegreen,paleblue,red); block block2=diamond(Label("Choice?",blue),(0,2),palegreen,red); block block3=roundrectangle("Do something",(-1,1)); block block4=bevel("Don't do something",(1,1)); block block5=circle("End",(0,0)); draw(block1); draw(block2); draw(block3); draw(block4); draw(block5); add(new void(picture pic, transform t) { blockconnector operator --=blockconnector(pic,t); // draw(pic,block1.right(t)--block2.top(t)); block1--Right--Down--Arrow--block2; block2--Label("Yes",0.5,NW)--Left--Down--Arrow--block3; block2--Right--Label("No",0.5,NE)--Down--Arrow--block4; block4--Down--Left--Arrow--block5; block3--Down--Right--Arrow--block5; }); ./asymptote-2.41/doc/asyRefCard.tex0000644000175000017500000004712313064427076017064 0ustar norbertnorbert% Reference Card for Asymptote % Copyright (c) 2011 John C. Bowman. May be freely distributed. % Thanks to Stephen Gildea for the multicolumn macro package % and Joseph H. Silverman for the C Reference card. %**start of header \newcount\columnsperpage \overfullrule=0pt % This file can be printed with 1, 2, or 3 columns per page (see below). % [For 2 or 3 columns, you'll need 6 and 8 point fonts.] % Specify how many you want here. Nothing else needs to be changed. \columnsperpage=2 % This reference card is distributed in the hope that it will be useful, % but WITHOUT ANY WARRANTY; without even the implied warranty of % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. % This file is intended to be processed by plain TeX (TeX82). % % The final reference card has six columns, three on each side. % This file can be used to produce it in any of three ways: % 1 column per page % produces six separate pages, each of which needs to be reduced to 80%. % This gives the best resolution. % 2 columns per page % produces three already-reduced pages. % You will still need to cut and paste. % 3 columns per page % produces two pages which must be printed sideways to make a % ready-to-use 8.5 x 11 inch reference card. % For this you need a dvi device driver that can print sideways. % Which mode to use is controlled by setting \columnsperpage above. % % (reference card macros due to Stephen Gildea) % \def\versionnumber{1.1} % Version of this reference card \def\year{2014} \def\month{May} \def\version{\month\ \year\ v\versionnumber} \def\shortcopyrightnotice{\vskip .5ex plus 2 fill \centerline{\small \copyright\ \year\ John C. Bowman Permissions on back. v\versionnumber}} \def\copyrightnotice{ \vskip 1ex plus 100 fill\begingroup\small \centerline{\version. Copyright \copyright\ \year\ John C. Bowman} Permission is granted to make and distribute copies of this card, with or without modifications, provided the copyright notice and this permission notice are preserved on all copies. \endgroup} % make \bye not \outer so that the \def\bye in the \else clause below % can be scanned without complaint. \def\bye{\par\vfill\supereject\end} \newdimen\intercolumnskip \newbox\columna \newbox\columnb \def\ncolumns{\the\columnsperpage} \message{[\ncolumns\space column\if 1\ncolumns\else s\fi\space per page]} \def\scaledmag#1{ scaled \magstep #1} % This multi-way format was designed by Stephen Gildea % October 1986. \if 1\ncolumns \hsize 4in \vsize 10in \voffset -.7in \font\titlefont=\fontname\tenbf \scaledmag3 \font\headingfont=\fontname\tenbf \scaledmag2 \font\headingfonttt=\fontname\tentt \scaledmag2 \font\smallfont=\fontname\sevenrm \font\smallsy=\fontname\sevensy \footline{\hss\folio} \def\makefootline{\baselineskip10pt\hsize6.5in\line{\the\footline}} \else \hsize 3.2in \vsize 7.95in \hoffset -.75in \voffset -.745in \font\titlefont=cmbx10 \scaledmag2 \font\headingfont=cmbx10 \scaledmag1 \font\headingfonttt=cmtt10 \scaledmag1 \font\smallfont=cmr6 \font\smallsy=cmsy6 \font\eightrm=cmr8 \font\eightbf=cmbx8 \font\eightit=cmti8 \font\eighttt=cmtt8 \font\eightsy=cmsy8 \font\eightsl=cmsl8 \font\eighti=cmmi8 \font\eightex=cmex10 at 8pt \textfont0=\eightrm \textfont1=\eighti \textfont2=\eightsy \textfont3=\eightex \def\rm{\fam0 \eightrm} \def\bf{\eightbf} \def\it{\eightit} \def\tt{\eighttt} \def\sl{\eightsl} \normalbaselineskip=.8\normalbaselineskip \normallineskip=.8\normallineskip \normallineskiplimit=.8\normallineskiplimit \normalbaselines\rm %make definitions take effect \if 2\ncolumns \let\maxcolumn=b \footline{\hss\rm\folio\hss} \def\makefootline{\vskip 2in \hsize=6.86in\line{\the\footline}} \else \if 3\ncolumns \let\maxcolumn=c \nopagenumbers \else \errhelp{You must set \columnsperpage equal to 1, 2, or 3.} \errmessage{Illegal number of columns per page} \fi\fi \intercolumnskip=.46in \def\abc{a} \output={% % This next line is useful when designing the layout. %\immediate\write16{Column \folio\abc\space starts with \firstmark} \if \maxcolumn\abc \multicolumnformat \global\def\abc{a} \else\if a\abc \global\setbox\columna\columnbox \global\def\abc{b} %% in case we never use \columnb (two-column mode) \global\setbox\columnb\hbox to -\intercolumnskip{} \else \global\setbox\columnb\columnbox \global\def\abc{c}\fi\fi} \def\multicolumnformat{\shipout\vbox{\makeheadline \hbox{\box\columna\hskip\intercolumnskip \box\columnb\hskip\intercolumnskip\columnbox} \makefootline}\advancepageno} \def\columnbox{\leftline{\pagebody}} \def\bye{\par\vfill\supereject \if a\abc \else\null\vfill\eject\fi \if a\abc \else\null\vfill\eject\fi \end} \fi % we won't be using math mode much, so redefine some of the characters % we might want to talk about \catcode`\^=12 %\catcode`\_=12 \catcode`\~=12 \chardef\\=`\\ \chardef\{=`\{ \chardef\}=`\} \chardef\underscore=`\_ \hyphenation{} \parindent 0pt \parskip .85ex plus .35ex minus .5ex \def\small{\smallfont\textfont2=\smallsy\baselineskip=.8\baselineskip} \outer\def\newcolumn{\vfill\eject} \outer\def\title#1{{\titlefont\centerline{#1}}\vskip 1ex plus .5ex} \outer\def\section#1{\par\filbreak \vskip .5ex minus .1ex {\headingfont #1}\mark{#1}% \vskip .3ex minus .1ex} \outer\def\librarysection#1#2{\par\filbreak \vskip .5ex minus .1ex {\headingfont #1}\quad{\headingfonttt<#2>}\mark{#1}% \vskip .3ex minus .1ex} \newdimen\keyindent \def\beginindentedkeys{\keyindent=1em} \def\endindentedkeys{\keyindent=0em} \def\begindoubleindentedkeys{\keyindent=2em} \def\enddoubleindentedkeys{\keyindent=1em} \endindentedkeys \def\paralign{\vskip\parskip\halign} \def\<#1>{$\langle${\rm #1}$\rangle$} \def\kbd#1{{\tt#1}\null} %\null so not an abbrev even if period follows \def\beginexample{\par\vskip1\jot \hrule width.5\hsize \vskip1\jot \begingroup\parindent=2em \obeylines\obeyspaces\parskip0pt\tt} {\obeyspaces\global\let =\ } \def\endexample{\endgroup} \def\Example{\qquad{\sl Example\/}.\enspace\ignorespaces} \def\key#1#2{\leavevmode\hbox to \hsize{\vtop {\hsize=.75\hsize\rightskip=1em \hskip\keyindent\relax#1}\kbd{#2}\hfil}} \newbox\metaxbox \setbox\metaxbox\hbox{\kbd{M-x }} \newdimen\metaxwidth \metaxwidth=\wd\metaxbox \def\metax#1#2{\leavevmode\hbox to \hsize{\hbox to .75\hsize {\hskip\keyindent\relax#1\hfil}% \hskip -\metaxwidth minus 1fil \kbd{#2}\hfil}} \def\threecol#1#2#3{\hskip\keyindent\relax#1\hfil&\kbd{#2}\quad &\kbd{#3}\quad\cr} % Define Italic Names \def\makedef#1 {% \expandafter\edef\csname#1\endcsname{\hbox{\it#1\/}}} \makedef array \makedef arg \makedef const \makedef dim \makedef expr \makedef filename \makedef f \makedef format \makedef member \makedef name \makedef statement \makedef statements \makedef string \makedef type \makedef value \makedef var %**end of header \title{Asymptote Reference Card} \section{Program structure/functions} \halign{\tt#\hfil&\qquad#\hfil\cr import "\filename"&import module\cr import "\filename" as name&import filename as module name\cr include "\filename"&include verbatim text from file\cr \type\ \f(\type,\dots);&optional function declaration\cr \type\ \name;&variable declaration\cr \type\ \f(\type\ \arg,\dots) \{&function definition\cr \quad\statements\cr \quad return \value;\cr \}\cr } \section{Data types/declarations} \key{boolean (true or false)}{bool} \key{tri-state boolean (true, default, or false)}{bool3} \key{integer}{int} \key{float (double precision)}{real} \key{ordered pair (complex number)}{pair} \key{character string}{string} \key{fixed piecewise cubic Bezier spline}{path} \key{unresolved piecewise cubic Bezier spline}{guide} \key{color, line type/width/cap, font, fill rule}{pen} \key{label with position, alignment, pen attributes}{Label} \key{drawing canvas}{picture} \key{affine transform}{transform} \key{constant (unchanging) value}{const} \key{allocate in higher scope}{static} \key{no value}{void} \key{inhibit implicit argument casting}{explicit} \key{structure}{struct} \key{create name by data type}{typedef \type\ \name} \section{3D data types (import three;)} \key{ordered triple}{triple} \key{3D path}{path3} \key{3D guide}{guide3} \key{3D affine transform}{transform3} \section{Constants} \key{exponential form}{6.02e23} \key{\TeX\ string constant}{"abc\dots de"} \key{\TeX\ strings: special characters}{\\\\, \\"} \key{C strings: constant}{'abc\dots de'} \key{C strings: special characters}{\\\\, \\" \\' \\?} \key{C strings: newline, cr, tab, backspace}{\\n \\r \\t \\b} \key{C strings: octal, hexadecimal bytes}{\\0-\\377 \\x0-\\xFF} \section{Operators} \key{arithmetic operations}{+ - * /} \key{modulus (remainder)}{\%} \key{comparisons}{== != > >= < <=} \key{not}{!} \key{and or (conditional evaluation of RHS)}{\&\& ||} \key{and or xor}{\& | ^} \key{cast expression to type}{(\type) \expr} \key{increment decrement prefix operators}{++ --} \key{assignment operators}{+= -= *= /= \%=} \key{conditional expression}{\expr$_1$\ {?}\ \expr$_2$\ {:}\ \expr$_3$} \key{structure member operator}{\name.\member} \key{expression evaluation separator}{,} \section{Flow control} \key{statement terminator}{;} \key{block delimeters}{\{\quad\}} \key{comment delimeters}{/*\quad*/} \key{comment to end of line delimiter}{//} \key{exit from \kbd{while}/\kbd{do}/\kbd{for}}{break;} \key{next iteration of \kbd{while}/\kbd{do}/\kbd{for}}{continue;} \key{return value from function}{return \expr;} \key{terminate execution}{exit();} \key{abort execution with error message}{abort(string);} \metax{{\bf Flow constructions} ({\tt if/while/for/do})\hidewidth}{} \beginexample if(\expr)\ \statement else if(\expr)\ \statement else \statement \endexample \beginexample while(\expr) \quad\statement \endexample \beginexample for(\expr$_1$; \expr$_2$; \expr$_3$) \quad\statement \endexample \beginexample for(\type var : \array) \quad\statement \endexample \beginexample do \statement \quad while(\expr); \endexample \section{Arrays} \key{array}{\type[]\ \name;} \key{array element i}{\name[i]} \key{array indexed by elements of int array {\tt A}}{\name[A]} \key{anonymous array}{new \type[\dim]} \key{array containing {\tt n} deep copies of {\tt x}}{array(n,x)} \key{length}{\name.length} \key{cyclic flag}{\name.cyclic} \key{pop element {\tt x}}{\name.pop()} \key{push element {\tt x}}{\name.push(x)} \key{append array {\tt a}}{\name.append(a)} \key{insert rest arguments at index {\tt i}}{\name.insert(i,\dots)} \key{delete element at index {\tt i}}{\name.delete(i)} \key{delete elements with indices in [{\tt i},{\tt j}]}{\name.delete(i,j)} \key{delete all elements}{\name.delete()} \key{test whether element n is initialized}{\name.initialized(n)} \key{array of indices of initialized elements}{\name.keys} \key{complement of int array in {\tt \{0,\dots,n-1\}}}{complement(a,n)} \key{deep copy of array {\tt a}}{copy(a)} \key{array {\tt \{0,1,\dots,n-1\}}}{sequence(n)} \key{array {\tt \{n,n+1,\dots,m\}}}{sequence(n,m)} \key{array {\tt \{n-1,n-2,\dots,0\}}}{reverse(n)} \key{array {\tt \{f(0),f(1),\dots,f(n-1)\}}}{sequence(f,n)} \key{array obtained by applying {\tt f} to array {\tt a}}{map(f,a)} \key{uniform partition of [{\tt a},{\tt b}] into n intervals}{uniform(a,b,n)} \key{concat specified 1D arrays}{concat(a,b,\dots)} \key{return sorted array}{sort(a)} \key{return array sorted using ordering {\tt less}}{sort(a,{\tt less})} \key{search sorted array {\tt a} for key}{search(a,key)} \key{index of first true value of bool array {\tt a}}{find(a)} \key{index of nth true value of bool array {\tt a}}{find(a,n)} \section{Initialization} \key{initialize variable}{\type\ \name=\value;} \key{initialize array}{\type[]\ \name=\{\dots\};} \section{path connectors} \key{straight segment}{--} \key{Bezi\'er segment with implicit control points}{..} \key{Bezi\'er segment with explicit control points}{..controls c0 and c1..} \key{concatenate}{\&} \key{lift pen}{^^} \key{..tension atleast 1..}{::} \key{..tension atleast infinity..}{---} \section{Labels} \key{implicit cast of string {\tt s} to Label}{s} \key{Label {\tt s} with relative position and alignment}{Label(s,real,pair)} \key{Label {\tt s} with absolute position and alignment}{Label(s,pair,pair)} \key{Label {\tt s} with specified pen}{Label(s,pen)} \section{draw commands} \key{draw path with current pen}{draw(path)} \key{draw path with pen}{draw(path,pen)} \key{draw labeled path}{draw(Label,path)} \key{draw arrow with pen}{draw(path,pen,Arrow)} \key{draw path on picture}{draw(picture,path)} \key{draw visible portion of line through two pairs}{drawline(pair,pair)} \section{fill commands} \key{fill path with current pen}{fill(path)} \key{fill path with pen}{fill(path,pen)} \key{fill path on picture}{fill(picture,path)} \section{label commands} \key{label a pair with optional alignment z}{label(Label,pair,{\tt z})} \key{label a path with optional alignment z}{label(Label,path,{\tt z})} \key{add label to picture}{label(picture,Label)} \section{clip commands} \key{clip to path}{clip(path)} \key{clip to path with fill rule}{clip(path,pen)} \key{clip picture to path}{clip(picture,path)} \section{pens} \key{Grayscale pen from value in [0,1]}{gray(g)} \key{RGB pen from values in [0,1]}{rgb(r,g,b)} \key{CMYK pen from values in [0,1]}{cmyk(r,g,b)} \key{RGB pen from heximdecimal string]}{rgb(string)} \key{heximdecimal string from rgb pen]}{hex(pen)} \key{hsv pen from values in [0,1]}{hsv(h,s,v)} \key{invisible pen}{invisible} \key{default pen}{defaultpen} \key{current pen}{currentpen} \key{solid pen}{solid} \key{dotted pen}{dotted} \key{wide dotted current pen}{Dotted} \key{wide dotted pen}{Dotted(pen)} \key{dashed pen}{dashed} \key{long dashed pen}{longdashed} \key{dash dotted pen}{dashdotted} \key{long dash dotted pen}{longdashdotted} \key{PostScript butt line cap}{squarecap} \key{PostScript round line cap}{roundcap} \key{PostScript projecting square line cap}{extendcap} \key{miter join}{miterjoin} \key{round join}{roundjoin} \key{bevel join}{beveljoin} \key{pen with miter limit}{miterlimit(real)} \key{zero-winding fill rule}{zerowinding} \key{even-odd fill rule}{evenodd} \key{align to character bounding box (default)}{nobasealign} \key{align to \TeX\ baseline}{basealign} \key{pen with font size (pt)}{fontsize(real)} \key{LaTeX pen from encoding,family,series,shape}{font(strings)} \key{\TeX\ pen}{font(string)} \key{scaled \TeX\ pen}{font(string,real)} \key{PostScript font from strings}{Courier(series,shape)} \key{pen with opacity in [0,1]}{opacity(real)} \key{construct pen nib from polygonal path}{makepen(path)} \key{pen mixing operator}{+} \section{path operations} \key{number of segments in path {\tt p}}{length(p)} \key{number of nodes in path {\tt p}}{size(p)} \key{is path {\tt p} cyclic?}{cyclic(p)} \key{is segment {\tt i} of path {\tt p} straight?}{straight(p,i)} \key{is path {\tt p} straight?}{piecewisestraight(p)} \key{coordinates of path {\tt p} at time {\tt t}}{point(p,t)} \key{direction of path {\tt p} at time {\tt t}}{dir(p,t)} \key{direction of path {\tt p} at {\tt length(p)}}{dir(p)} \key{unit(dir(p)+dir(q))}{dir(p,q)} \key{acceleration of path {\tt p} at time {\tt t}}{accel(p,t)} \key{radius of curvature of path {\tt p} at time {\tt t}}{radius(p,t)} \key{precontrol point of path {\tt p} at time {\tt t}}{precontrol(p,t)} \key{postcontrol point of path {\tt p} at time {\tt t}}{postcontrol(p,t)} \key{arclength of path {\tt p}}{arclength(p)} \key{time at which {\tt arclength(p)=L}}{arctime(p,L)} \key{point on path {\tt p} at arclength {\tt L}}{arcpoint(p,L)} \key{first value {\tt t} at which {\tt dir(p,t)=z}}{dirtime(p,z)} \key{time {\tt t} at relative fraction {\tt l} of {\tt arclength(p)}}{reltime(p,l)} \key{point at relative fraction {\tt l} of {\tt arclength(p)}}{relpoint(p,l)} \key{point midway along arclength of {\tt p}}{midpoint(p)} \key{path running backwards along {\tt p}}{reverse(p)} \key{subpath of {\tt p} between times {\tt a} and {\tt b}}{subpath(p,a,b)} \key{times for one intersection of paths {\tt p} and {\tt q}}{intersect(p,q)} \key{times at which {\tt p} reaches minimal extents}{mintimes(p)} \key{times at which {\tt p} reaches maximal extents}{maxtimes(p)} \key{intersection times of paths {\tt p} and {\tt q}}{intersections(p,q)} \key{intersection times of path {\tt p} with `{\tt --a--b--}'}{intersections(p,a,b)} \key{intersection times of path {\tt p} crossing $x=${\tt x}}{times(p,x)} \key{intersection times of path {\tt p} crossing $y=${\tt z.y}}{times(p,z)} \key{intersection point of paths {\tt p} and {\tt q}}{intersectionpoint(p,q)} \key{intersection points of {\tt p} and {\tt q}}{intersectionpoints(p,q)} \key{intersection of extension of {\tt P--Q} and {\tt p--q}}{extension(P,Q,p,q)} \key{lower left point of bounding box of path {\tt p}}{min(p)} \key{upper right point of bounding box of path {\tt p}}{max(p)} \key{subpaths of {\tt p} split by {\tt n}th cut of {\tt knife}}{cut(p,knife,n)} \key{winding number of path {\tt p} about pair {\tt z}}{windingnumber(p,z)} \key{pair {\tt z} lies within path {\tt p}?}{interior(p,z)} \key{pair {\tt z} lies within or on path {\tt p}?}{inside(p,z)} \key{path surrounding region bounded by paths}{buildcycle(\dots)} \key{path filled by \tt{draw(g,p)}}{strokepath(g,p)} \key{unit square with lower-left vertex at origin}{unitsquare} \key{unit circle centered at origin}{unitcircle} \key{circle of radius {\tt r} about {\tt c}}{circle(c,r)} \key{arc of radius {\tt r} about {\tt c} from angle {\tt a} to {\tt b}}{arc(c,r,a,b)} \key{unit {\tt n}-sided polygon}{polygon(n)} \key{unit {\tt n}-point cyclic cross}{cross(n)} \section{pictures} \key{add picture {\tt pic} to currentpicture}{add(pic)} \key{add picture {\tt pic} about pair {\tt z}}{add(pic,z)} \section{affine transforms} \key{identity transform}{identity()} \key{shift by values}{shift(real,real)} \key{shift by pair}{shift(pair)} \key{scale by {\tt x} in the $x$ direction}{xscale(x)} \key{scale by {\tt y} in the $y$ direction}{yscale(y)} \key{scale by {\tt x} in both directions}{scale(x)} \key{scale by real values {\tt x} and {\tt y}}{scale(x,y)} \key{map $(x,y) \rightarrow (x+${\tt s}$y,y)$}{slant(s)} \key{rotate by real {\tt angle} in degrees about pair {\tt z}}{rotate(angle,z=(0,0))} \key{reflect about line from {\tt P--Q}}{reflect(P,Q)} \section{string operations} \key{concatenate operator}{+} \key{string length}{length(string)} \key{position $\ge$ {\tt pos} of first occurence of {\tt t} in {\tt s}}{find({\tt s},{\tt t},pos=0)} \key{position $\le$ {\tt pos} of last occurence of {\tt t} in {\tt s}}{rfind({\tt s},{\tt t},pos=-1)} \key{string with {\tt t} inserted in {\tt s} at {\tt pos}}{insert({\tt s},{\tt pos},{\tt t})} \key{string {\tt s} with {\tt n} characters at {\tt pos} erased}{erase({\tt s},{\tt pos},{\tt n})} \key{substring of string {\tt s} of length {\tt n} at {\tt pos}}{substr({\tt s},{\tt pos},{\tt n})} \key{string {\tt s} reversed}{reverse({\tt s})} \key{string {\tt s} with {\tt before} changed to {\tt after}}{replace({\tt s},{\tt before},{\tt after})} \key{string {\tt s} translated via {\tt \{\{before,after\},\dots\}}}{replace({\tt s},string [][] table)} \key{format {\tt x} using C-style format string {\tt s} }{format({\tt s},x)} \key{casts hexidecimal string to an integer}{hex(s)} \key{casts {\tt x} to string using precision {\tt digits}}{string(x,digits=realDigits)} \key{current time formatted by {\tt format}}{time(format="\%a \%b \%d \%T \%Z \%Y")} \key{time in seconds of string {\tt t} using {\tt format}}{seconds(t,format)} \key{string corresponding to {\tt seconds} using {\tt format}}{time(seconds,format)} \key{split {\tt s} into strings separated by {\tt delimiter}}{split(s,delimiter="")} %%%%%%%%%%%%%%%%%%%%%%%%%% END LIBRARIES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % This goes at the bottom of the last page (column 6) \copyrightnotice % \bye % Local variables: % compile-command: "tex AsyRefCard" % End: ./asymptote-2.41/doc/join.asy0000644000175000017500000000040513064427076015764 0ustar norbertnorbertsize(300,0); pair[] z=new pair[10]; z[0]=(0,100); z[1]=(50,0); z[2]=(180,0); for(int n=3; n <= 9; ++n) z[n]=z[n-3]+(200,0); path p=z[0]..z[1]---z[2]::{up}z[3] &z[3]..z[4]--z[5]::{up}z[6] &z[6]::z[7]---z[8]..{up}z[9]; draw(p,grey+linewidth(4mm)); dot(z); ./asymptote-2.41/doc/subpictures.asy0000644000175000017500000000052513064427076017400 0ustar norbertnorbertpicture pic1; real size=50; size(pic1,size); fill(pic1,(0,0)--(50,100)--(100,0)--cycle,red); picture pic2; size(pic2,size); fill(pic2,unitcircle,green); picture pic3; size(pic3,size); fill(pic3,unitsquare,blue); picture pic; add(pic,pic1.fit(),(0,0),N); add(pic,pic2.fit(),(0,0),10S); add(pic.fit(),(0,0),N); add(pic3.fit(),(0,0),10S); ./asymptote-2.41/doc/asycolors.sty0000644000175000017500000000536013064427076017073 0ustar norbertnorbert\usepackage{color} \definecolor{cyan}{cmyk}{1,0,0,0} \definecolor{magenta}{cmyk}{0,1,0,0} \definecolor{yellow}{cmyk}{0,0,1,0} \definecolor{black}{cmyk}{0,0,0,1} \definecolor{white}{cmyk}{0,0,0,0} \definecolor{gray}{cmyk}{0,0,0,0.5} \definecolor{red}{cmyk}{0,1,1,0} \definecolor{green}{cmyk}{1,0,1,0} \definecolor{blue}{cmyk}{1,1,0,0} \definecolor{palered}{cmyk}{0,0.25,0.25,0} \definecolor{palegreen}{cmyk}{0.25,0,0.25,0} \definecolor{paleblue}{cmyk}{0.25,0.25,0,0} \definecolor{palecyan}{cmyk}{0.25,0,0,0} \definecolor{palemagenta}{cmyk}{0,0.25,0,0} \definecolor{paleyellow}{cmyk}{0,0,0.25,0} \definecolor{palegray}{cmyk}{0,0,0,0.05} \definecolor{lightred}{cmyk}{0,0.5,0.5,0} \definecolor{lightgreen}{cmyk}{0.5,0,0.5,0} \definecolor{lightblue}{cmyk}{0.5,0.5,0,0} \definecolor{lightcyan}{cmyk}{0.5,0,0,0} \definecolor{lightmagenta}{cmyk}{0,0.5,0,0} \definecolor{lightyellow}{cmyk}{0,0,0.5,0} \definecolor{lightgray}{cmyk}{0,0,0,0.1} \definecolor{mediumred}{cmyk}{0,0.75,0.75,0} \definecolor{mediumgreen}{cmyk}{0.75,0,0.75,0} \definecolor{mediumblue}{cmyk}{0.75,0.75,0,0} \definecolor{mediumcyan}{cmyk}{0.75,0,0,0} \definecolor{mediummagenta}{cmyk}{0,0.75,0,0} \definecolor{mediumyellow}{cmyk}{0,0,0.75,0} \definecolor{mediumgray}{cmyk}{0,0,0,0.25} \definecolor{heavyred}{cmyk}{0,1,1,0.25} \definecolor{heavygreen}{cmyk}{1,0,1,0.25} \definecolor{heavyblue}{cmyk}{1,1,0,0.25} \definecolor{heavycyan}{cmyk}{1,0,0,0.25} \definecolor{heavymagenta}{cmyk}{0,1,0,0.25} \definecolor{lightolive}{cmyk}{0,0,1,0.25} \definecolor{heavygray}{cmyk}{0,0,0,0.75} \definecolor{deepred}{cmyk}{0,1,1,0.5} \definecolor{deepgreen}{cmyk}{1,0,1,0.5} \definecolor{deepblue}{cmyk}{1,1,0,0.5} \definecolor{deepcyan}{cmyk}{1,0,0,0.5} \definecolor{deepmagenta}{cmyk}{0,1,0,0.5} \definecolor{olive}{cmyk}{0,0,1,0.5} \definecolor{deepgray}{cmyk}{0,0,0,0.9} \definecolor{darkred}{cmyk}{0,1,1,0.75} \definecolor{darkgreen}{cmyk}{1,0,1,0.75} \definecolor{darkblue}{cmyk}{1,1,0,0.75} \definecolor{darkcyan}{cmyk}{1,0,0,0.75} \definecolor{darkmagenta}{cmyk}{0,1,0,0.75} \definecolor{darkolive}{cmyk}{0,0,1,0.75} \definecolor{darkgray}{cmyk}{0,0,0,0.95} \definecolor{orange}{cmyk}{0,0.5,1,0} \definecolor{fuchsia}{cmyk}{0,1,0.5,0} \definecolor{chartreuse}{cmyk}{0.5,0,1,0} \definecolor{springgreen}{cmyk}{1,0,0.5,0} \definecolor{purple}{cmyk}{0.5,1,0,0} \definecolor{royalblue}{cmyk}{1,0.5,0,0} \definecolor{salmon}{cmyk}{0,0.5,0.5,0} \definecolor{brown}{cmyk}{0,1,1,0.5} \definecolor{darkbrown}{cmyk}{0,1,1,0.75} \definecolor{pink}{cmyk}{0,0.25,0,0} \definecolor{palegrey}{cmyk}{0,0,0,0.05} \definecolor{lightgrey}{cmyk}{0,0,0,0.1} \definecolor{mediumgrey}{cmyk}{0,0,0,0.25} \definecolor{grey}{cmyk}{0,0,0,0.5} \definecolor{heavygrey}{cmyk}{0,0,0,0.5} \definecolor{deepgrey}{cmyk}{0,0,0,0.9} \definecolor{darkgrey}{cmyk}{0,0,0,0.95} ./asymptote-2.41/doc/FAQ/0000755000175000017500000000000013064427331014711 5ustar norbertnorbert./asymptote-2.41/doc/FAQ/m-info.pl0000644000175000017500000001277313064427076016453 0ustar norbertnorbert## Info output # Copyright (C) 1993-1995 Ian Jackson. # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # It is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # You should have received a copy of the GNU General Public License # along with GNU Emacs; see the file COPYING. If not, write to # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA. # (Note: I do not consider works produced using these BFNN processing # tools to be derivative works of the tools, so they are NOT covered # by the GPL. However, I would appreciate it if you credited me if # appropriate in any documents you format using BFNN.) sub info_init { open(INFO,">$prefix.info"); print INFO <'); } sub info_ftpon { } sub info_endftpon { } sub info_ftpin { } sub info_endftpin { } sub info_docref { } sub info_enddocref { } sub info_courier { } sub info_endcourier { } sub info_newsgroup { } sub info_endnewsgroup { } sub info_ftpsilent { $info_ignore++; } sub info_endftpsilent { $info_ignore--; } sub info_text { return if $info_ignore; if ($info_status eq '') { $info_status= 'p'; } $info_para .= $_[0]; } sub info_tab { local ($n) = $_[0]-length($info_para); $info_para .= ' 'x$n if $n>0; } sub info_newline { return unless $info_status eq 'p'; print INFO &info_writepara; } sub info_writepara { local ($thisline, $thisword, $rest, $output); for (;;) { last unless $info_para =~ m/\S/; $thisline= $info_indentstring; for (;;) { last unless $info_para =~ m/^(\s*\S+)/; unless (length($1) + length($thisline) < 75 || length($thisline) == length($info_indentstring)) { last; } $thisline .= $1; $info_para= $'; } $info_para =~ s/^\s*//; $output.= $thisline."\n"; $info_indentstring= $info_nextindent; last unless length($info_para); } $info_status= ''; $info_para= ''; return $output; } sub info_endpara { return unless $info_status eq 'p'; print INFO &info_writepara; print INFO "\n"; } sub info_endheading { $info_para =~ s/\s*$//; print INFO "$info_para\n\n"; $info_status= ''; $info_para= ''; } sub info_endmajorheading { &info_endheading(@_); } sub info_endminorheading { &info_endheading(@_); } sub info_startverbatim { print INFO &info_writepara; } sub info_verbatim { print INFO $_[0],"\n"; } sub info_endverbatim { $info_status= $info_vstatus; } sub info_finish { close(INFO); } sub info_startindex { &info_endpara; $info_moredetail= ''; $info_status= ''; } sub info_endindex { print INFO "$info_moredetail\n" if length($info_moredetail); } sub info_endindexitem { $info_indentstring= sprintf("* %-17s ",$info_label.'::'); $info_nextindent= ' 'x20; local ($txt); $txt= &info_writepara; if ($info_main) { print INFO $label.$txt; $txt =~ s/^.{20}//; $info_moredetail.= $txt; } else { $info_moredetail.= $label.$txt; } $info_indentstring= $info_nextindent= ''; $info_status='p'; } sub info_startindexitem { print INFO "* Menu:\n" if $info_status eq ''; $info_status= ''; $info_label= $_[2]; $info_main= 0; } sub info_startindexmainitem { print INFO "* Menu:\n" if $info_status eq ''; $info_label= $_[2]; $info_main= 1; $info_moredetail .= "\n$_[2], "; $info_status= ''; } sub info_startindent { $info_istatus= $info_status; print INFO &info_writepara; $info_indentstring= " $info_indentstring"; $info_nextindent= " $info_nextindent"; } sub info_endindent { $info_indentstring =~ s/^ //; $info_nextindent =~ s/^ //; $info_status= $info_istatus; } sub info_startpackedlist { $info_plc=0; } sub info_endpackedlist { &info_newline if !$info_plc; } sub info_packeditem { &info_newline if !$info_plc; &info_tab($info_plc*40+5); $info_plc= !$info_plc; } sub info_startlist { $info_istatus= $info_status; print INFO &info_writepara; $info_indentstring= " $info_indentstring"; $info_nextindent= " $info_nextindent"; } sub info_endlist { $info_indentstring =~ s/^ //; $info_nextindent =~ s/^ //; $info_status= $info_lstatus; } sub info_item { &info_newline; $info_indentstring =~ s/ $/* /; } sub info_pageref { &info_text("*Note Question $_[1]:: \`"); } sub info_endpageref { &info_text("'"); } 1; ./asymptote-2.41/doc/FAQ/m-post.pl0000644000175000017500000001074213064427076016477 0ustar norbertnorbert## POST output # Copyright (C) 1993-1995 Ian Jackson. # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # It is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # You should have received a copy of the GNU General Public License # along with GNU Emacs; see the file COPYING. If not, write to # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA. # (Note: I do not consider works produced using these BFNN processing # tools to be derivative works of the tools, so they are NOT covered # by the GPL. However, I would appreciate it if you credited me if # appropriate in any documents you format using BFNN.) sub post_init { open(POST,">$prefix.post"); } sub post_startmajorheading { print POST '='x79,"\n\n"; $post_status= 'h'; &post_text($_[0] ? "Section $_[0]. " : ''); } sub post_startminorheading { print POST '-'x77,"\n\n"; $post_status= 'h'; } sub post_italic { &post_text('*'); } sub post_enditalic { $post_para .= '*'; } sub post_email { &post_text('<'); } sub post_endemail { &post_text('>'); } sub post_ftpon { } sub post_endftpon { } sub post_ftpin { } sub post_endftpin { } sub post_docref { } sub post_enddocref { } sub post_courier { } sub post_endcourier { } sub post_newsgroup { } sub post_endnewsgroup { } sub post_ftpsilent { $post_ignore++; } sub post_endftpsilent { $post_ignore--; } sub post_text { return if $post_ignore; if ($post_status eq '') { $post_status= 'p'; } $post_para .= $_[0]; } sub post_tab { local ($n) = $_[0]-length($post_para); $post_para .= ' 'x$n if $n>0; } sub post_newline { return unless $post_status eq 'p'; &post_writepara; } sub post_writepara { local ($thisline, $thisword, $rest); for (;;) { last unless $post_para =~ m/\S/; $thisline= $post_indentstring; for (;;) { last unless $post_para =~ m/^(\s*\S+)/; unless (length($1) + length($thisline) < 75 || length($thisline) == length($post_indentstring)) { last; } $thisline .= $1; $post_para= $'; } $post_para =~ s/^\s*//; print POST $thisline,"\n"; $post_indentstring= $post_nextindent; last unless length($post_para); } $post_status= ''; $post_para= ''; } sub post_endpara { return unless $post_status eq 'p'; &post_writepara; print POST "\n"; } sub post_endheading { $post_para =~ s/\s*$//; print POST "$post_para\n\n"; $post_status= ''; $post_para= ''; } sub post_endmajorheading { &post_endheading(@_); } sub post_endminorheading { &post_endheading(@_); } sub post_startverbatim { $post_vstatus= $post_status; &post_writepara; } sub post_verbatim { print POST $_[0],"\n"; } sub post_endverbatim { $post_status= $post_vstatus; } sub post_finish { close(POST); } sub post_startindex { $post_status= ''; } sub post_endindex { $post_status= 'p'; } sub post_endindexitem { printf POST " %-11s %-.66s\n",$post_left,$post_para; $post_status= 'p'; $post_para= ''; } sub post_startindexitem { $post_left= $_[1]; } sub post_startindexmainitem { $post_left= $_[1]; print POST "\n" if $post_status eq 'p'; } sub post_startindent { $post_istatus= $post_status; &post_writepara; $post_indentstring= " $post_indentstring"; $post_nextindent= " $post_nextindent"; } sub post_endindent { $post_indentstring =~ s/^ //; $post_nextindent =~ s/^ //; $post_status= $post_istatus; } sub post_startpackedlist { $post_plc=0; } sub post_endpackedlist { &post_newline if !$post_plc; } sub post_packeditem { &post_newline if !$post_plc; &post_tab($post_plc*40+5); $post_plc= !$post_plc; } sub post_startlist { &post_endpara; $post_indentstring= " $post_indentstring"; $post_nextindent= " $post_nextindent"; } sub post_endlist { &post_endpara; $post_indentstring =~ s/^ //; $post_nextindent =~ s/^ //; } sub post_item { &post_newline; $post_indentstring =~ s/ $/* /; } sub post_pageref { &post_text("Q$_[1] \`"); } sub post_endpageref { &post_text("'"); } 1; ./asymptote-2.41/doc/FAQ/m-html.pl0000644000175000017500000002277513064427076016467 0ustar norbertnorbert## HTML output # Copyright (C) 1993-1995 Ian Jackson. # Modified by John Bowman 02Sep06: simply docref usage # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # It is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # You should have received a copy of the GNU General Public License # along with GNU Emacs; see the file COPYING. If not, write to # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA. # (Note: I do not consider works produced using these BFNN processing # tools to be derivative works of the tools, so they are NOT covered # by the GPL. However, I would appreciate it if you credited me if # appropriate in any documents you format using BFNN.) %saniarray= ('<','lt', '>','gt', '&','amp', '"','quot'); sub html_init { $html_prefix = './'.$prefix; $html_prefix =~ s:^\.//:/:; system('rm','-r',"$html_prefix.html"); system('mkdir',"$html_prefix.html"); open(HTML,">$html_prefix.html/index.html"); print HTML "\n"; print HTML "\n"; $html_needpara= -1; $html_end=''; chop($html_date=`date '+%d %B %Y'`); chop($html_year=`date '+%Y'`); } sub html_startup { print HTML < $user_title

$user_title

END &html_readrefs($_[0]); if (length($user_copyrightref)) { local ($refn) = $qrefn{$user_copyrightref}; if (!length($refn)) { warn "unknown question (copyright) `$user_copyrightref'"; } $refn =~ m/(\d+)\.(\d+)/; local ($s,$n) = ($1,$2); $html_copyrighthref= ($s == $html_sectionn)?'':"section$s.html"; $html_copyrighthref.= "#$qn2ref{$s,$n}"; } } sub html_close { print HTML $html_end,"
\n$user_author\n"; print HTML "- $html_date\n

\n"; print HTML "Extracted from $user_title,\n"; print HTML "" if length($html_copyrighthref); print HTML "Copyright © $html_year $user_copyholder."; print HTML "" if length($html_copyrighthref); print HTML "\n\n"; close(HTML); } sub html_startmajorheading { local ($ref, $this,$next,$back) = @_; local ($nextt,$backt); $this =~ s/^Section /section/; $html_sectionn= $ref; $next =~ s/^Section /section/ && ($nextt= $sn2title{$'}); $back =~ s/^Section /section/ ? ($backt= $sn2title{$'}) : ($back=''); if ($html_sectionn) { &html_close; open(HTML,">$html_prefix.html/$this.html"); print HTML "\n"; print HTML "\n"; $html_end= "
\n"; $html_end.= "Next: $nextt.
\n" if $next; $html_end.= "Back: $backt.
\n" if $back; $html_end.= ""; $html_end.= "Return to contents.

\n"; print HTML < $user_brieftitle - Section $html_sectionn END print HTML "" if $next; print HTML "" if $back; print HTML <

$user_brieftitle - Section $html_sectionn
END $html_needpara= -1; } else { print HTML "\n

\n"; $html_needpara=-1; } } sub html_endmajorheading { print HTML "\n

\n\n"; $html_needpara=-1; } sub html_startminorheading { local ($ref, $this) = @_; $html_needpara=0; $this =~ m/^Question (\d+)\.(\d+)/; local ($s,$n) = ($1,$2); print HTML "\n

\n"; } sub html_endminorheading { print HTML "\n

\n\n"; $html_needpara=-1; } sub html_newsgroup { &arg('newsgroup'); } sub html_endnewsgroup { &endarg('newsgroup'); } sub html_do_newsgroup { print HTML "$_[0]"; } sub html_email { &arg('email'); } sub html_endemail { &endarg('email'); } sub html_do_email { print HTML "$_[0]"; } sub html_courier { print HTML "" ; } sub html_endcourier { print HTML ""; } sub html_italic { print HTML "" ; } sub html_enditalic { print HTML "" ; } sub html_docref { &arg('docref'); } sub html_enddocref { &endarg('docref'); } sub html_do_docref { if (!defined($html_refval{$_[0]})) { # Modified by John Bowman 02Sep06: interpret the argument as an html reference # warn "undefined HTML reference $_[0]"; # $html_refval{$n}='UNDEFINED'; print HTML ""; } else { print HTML ""; } &recurse($_[0]); print HTML ""; } sub html_readrefs { local ($p); open(HTMLREFS,"<$_[0]") || (warn("failed to open HTML refs $_[0]: $!"),return); while() { next if m/^\\\s/; s/\s*\n$//; if (s/^\\prefix\s*//) { $p= $'; next; } elsif (s/^\s*(\S.*\S)\s*\\\s*//) { $_=$1; $v=$'; s/\\\\/\\/g; $html_refval{$_}= $p.$v; } else { warn("cannot understand line in HTML refs >$_<"); } } close(HTMLREFS); } sub html_ftpsilent { &arg('ftpsilent'); } sub html_endftpsilent { &endarg('ftpsilent'); } sub html_do_ftpsilent { if ($_[0] =~ m/:/) { $html_ftpsite= $`; $html_ftpdir= $'.'/'; } else { $html_ftpsite= $_[0]; $html_ftpdir= ''; } } sub html_ftpon { &arg('ftpon'); } sub html_endftpon { &endarg('ftpon'); } sub html_do_ftpon { #print STDERR "ftpon($_[0])\n"; $html_ftpsite= $_[0]; $html_ftpdir= ''; print HTML ""; &recurse($_[0]); print HTML ""; } sub html_ftpin { &arg('ftpin'); } sub html_endftpin { &endarg('ftpin'); } sub html_do_ftpin { #print STDERR "ftpin($_[0])\n"; print HTML ""; &recurse($_[0]); print HTML ""; } sub html_text { print HTML "\n

\n" if $html_needpara > 0; $html_needpara=0; $html_stuff= &html_sanitise($_[0]); while ($html_stuff =~ s/^(.{40,70}) //) { print HTML "$1\n"; } print HTML $html_stuff; } sub html_tab { $htmltabignore++ || warn "html tab ignored"; } sub html_newline { print HTML "
\n" ; } sub html_startverbatim { print HTML "

\n"   ;                       }
sub html_verbatim      { print HTML &html_sanitise($_[0]),"\n";         }
sub html_endverbatim   { print HTML "
\n" ; $html_needpara= -1; } sub html_endpara { $html_needpara || $html_needpara++; } sub html_finish { &html_close; } sub html_startindex { print HTML "
    \n"; } sub html_endindex { print HTML "
\n"; } sub html_startindexitem { local ($ref,$qval) = @_; $qval =~ m/Q(\d+)\.(\d+)/; local ($s,$n) = ($1,$2); print HTML "
  • Q$s.$n. "; $html_indexunhead=''; } sub html_startindexmainitem { local ($ref,$s) = @_; $s =~ m/\d+/; $s= $&; print HTML "

    " if ($s > 1); print HTML "
  • Section $s. "; $html_indexunhead=''; } sub html_endindexitem { print HTML "$html_indexunhead\n"; } sub html_startlist { print HTML "\n"; $html_itemend="
      "; } sub html_endlist { print HTML "$html_itemend\n
    \n"; $html_needpara=-1 } sub html_item { print HTML "$html_itemend\n
  • "; $html_itemend=""; $html_needpara=-1; } sub html_startpackedlist { print HTML "\n"; $html_itemend=""; } sub html_endpackedlist { print HTML "$html_itemend\n\n"; $html_needpara=-1; } sub html_packeditem { print HTML "$html_itemend\n
  • "; $html_itemend=""; $html_needpara=-1; } sub html_startindent { print HTML "
    \n"; } sub html_endindent { print HTML "
    \n"; } sub html_pageref { local ($ref,$sq) = @_; $sq =~ m/(\d+)\.(\d+)/; local ($s,$n) = ($1,$2); print HTML "Q$sq \`"; } sub html_endpageref { print HTML "'"; } sub html_sanitise { local ($in) = @_; local ($out); while ($in =~ m/[<>&"]/) { $out.= $`. '&'. $saniarray{$&}. ';'; $in=$'; } $out.= $in; $out; } 1; ./asymptote-2.41/doc/FAQ/asy-faq.bfnn0000644000175000017500000011747413064427076017143 0ustar norbertnorbert\comment This is the source for the Asymptote FAQ list, in \comment the Bizarre Format With No Name. It is turned into Lout \comment input, HTML, plain ASCII and an Info document by a Perl script. \comment \comment The format and scripts come from the Linux FAQ, by \comment Ian Jackson. \set brieftitle Asymptote FAQ \set author Asymptote \set title Asymptote Frequently Asked Questions \copyto ASCII ASYMPTOTE FREQUENTLY ASKED QUESTIONS `date '+%d %h %Y'` \endcopy \copyto INFO INFO-DIR-SECTION Languages START-INFO-DIR-ENTRY * asymptote FAQ: (asy-faq). Asymptote Frequently Asked Questions. END-INFO-DIR-ENTRY  File: asy-faq.info, Node: Top, Next: Question 1.1, Up: (dir) ASYMPTOTE FREQUENTLY ASKED QUESTIONS `date '+%d %h %Y'` \endcopy This is the list of Frequently Asked Questions about Asymptote (asy). \section Index \index \comment ###################################################################### \section About Asymptote \question 26jun:whatisasy What is Asymptote? Asymptote is a vector graphics language designed for technical graphics, inspired by MetaPost but with IEEE floating-point numerics, native three-dimensional graphics, Grayscale/RGB/CMYK colourspaces, and a C++-like syntax. Unlike MetaPost, it natively supports multiple-segment paths (and hence regions other than simply connected ones), tiling patterns, Gouraud shading, tensor patch shading, and PostScript images. \question 22jun:whereisasy How do I obtain Asymptote? Binary releases are available for Linux, MacOS X, and Microsoft Windows platforms, in addition to full source code, from the website \docref{http://asymptote.sourceforge.net/\}. Many Linux distributions (such as RedHat and Debian) now include an Asymptote package (check your distribution's documentation for further information about this). \question 28jun:beforeasking Where can I ask questions about Asymptote? If you have a question, please try to find an answer in this FAQ, in the extensive Asymptote documentation at \docref{http://asymptote.sourceforge.net/doc/\}, or search the forum: \docref{http://sourceforge.net/forum/forum.php?forum_id=409349\}. \question 02sep:whyasy Why was the name Asymptote chosen? Well, it isn't the perfect graphics package, but we do think it is getting there asymptotically... \question 02sep:whycamp In the internal Asymptote source code, what does the name \courier{camp\} refer to? That was our original tentative name for this project, which stood for "C's Answer to MetaPost" (the language that inspired Asymptote). However, we eventually decided that the name \courier{Asymptote\} better emphasizes the mathematical and graphical nature of this language. \comment ###################################################################### \section Questions about installation and setup \question 26jun:osx Is it possible to install Asymptote on Mac OS X? It is easy to compile Asymptote directly from the source code at \docref{http://sourceforge.net/project/showfiles.php?group_id=120000\} We recommend first upgrading to the latest GNU readline library, unless you don't care about interactive readline support (in which case configure will automatically detect and disable obsolete versions of the readline library). Marius Schamschula also maintains a binary package for various MacOS X platforms \docref{http://www.hmug.org/pub/MacOS_X/X/Applications/Publishing/asymptote\}. \question 26jun:osxbadCPU Why do I get the error \courier{Bad CPU type in executable\} on installing Asymptote from the MAC OS binary? This means either that you have a binary distribution for another MAC architecture, or (according to Marius Schamschula) that you may have a missing library. The simplest solution is to compile Asymptote directly from the official source: \docref{http://sourceforge.net/project/showfiles.php?group_id=120000\}. \question 04nov:brokenpdftex What do I do if I get the error: \courier{Error: pdfetex (file pdftex.cfg): cannot open config file...texinfo.tex appears to be broken\}? Simply put \docref{http://asymptote.sourceforge.net/asymptote.pdf\} in the directory \courier{doc\} and repeat the command \courier{make all\}. Or, if you don't want to build a local copy of the documentation, simply proceed with \courier{make install-asy\}. \question 04nov:brokentexinfo What do I do if I get the error: \courier{! Undefined control sequence. l.6 @copying\}? Either upgrade your \courier{texinfo\} package or follow one of the easy work arounds in \qref brokenpdftex. \question 27jun:latexintegration Is it possible to integrate Asymptote into LaTeX? Yes, see the example latexusage.tex. Dario Teixeira has also written a detailed guide on the topic. You can download it from \docref{http://dario.dse.nl/projects/asylatex/\}. Philippe Ivaldi has contributed an Asymptote mode for Emacs users \docref{http://asymptote.sourceforge.net/doc/Editing-modes.html\}, which includes a \courier{lasy-mode\} that allows one to compile and view the output of one \\begin{asy}...\\end{asy} section at a time. \question 02sep:pdflatex Is it possible to integrate Asymptote into latex or pdflatex? Yes, as of version 1.14, Asymptote supports latex and pdflatex (both in EPS/PDF and inline mode), as illustrated by the example \courier{latexusage.tex\}: \verbatim pdflatex latexusage asy latexusage pdflatex latexusage \endverbatim \question 02sep:tkinterdepend Do I need the \courier{tkinter\} package to install an Asymptote rpm binary? No, you don't need \courier{tkinter\} unless you want to try out the GUI \courier{xasy\}. Try \verbatim rpm -Uvh --nodeps asymptote-x.xx-1.i386.rpm \endverbatim where \courier{x.xx\} represents the version number. \question 26jun:windir What does the path \courier{%USERPROFILE%\\.asy\\config.asy\} mean? That is the way that Microsoft Windows refers to the user profile directory. There's nothing really to understand here, just put your configuration commands in the file \courier{config.asy\} in a new folder \courier{%USERPROFILE%\\.asy\}. \question 25dec:escapechar Why do I get the error "string not terminated" when I try to set \courier{settings.dir="C:\\asymptote\\";\}? The backslash is an escape character here, so \courier{\\"\} is interpreted as a verbatim quotation mark, leaving the string without a terminating quotation mark. Fortunately, this is the only escaped character in double-quoted strings. A final backslash isn't needed here anyway, but should you really want one somewhere, you can say: \courier{settings.dir="C:\\asymptote"+'\\\\';\}. \question 27jun:winglobal How do I change environment variables in Microsoft Windows, for example, in order to change the default PostScript viewer? While it is easier to set the corresponding Asymptote configuration variable in your \courier{config.asy\} file, here is the procedure for changing Microsoft Windows environment variables: Click on the [Start] button * RIGHT-click on 'My Computer' * Choose 'Properties' from the popup menu * Click the 'Advanced' tab * Click the 'Environment Variables' button. \question 02sep:convert Under Microsoft Windows XP, why do I get an error like "Invalid Parameter - 432x432"? This means that ImageMagick wasn't properly installed and you are using the MSDOS convert program rather than the ImageMagick one. Or you may have installed ImageMagick but ran Asymptote from an existing MSDOS window. In that case, simply open a new window and try again. If that doesn't work, check that \verbatim convert --version \endverbatim returns something like \verbatim Version: ImageMagick 6.2.8 06/27/06 Q16 http://www.imagemagick.org \endverbatim \question 26jun:miktex Why does Asymptote freeze upon trying to draw a label with my MikTex installation under Microsoft Windows? Likely, this means that latex and dvips are not in your default path. Try adding the appropriate paths in your \courier{config.asy\} file, for example: \verbatim import settings; latex="C:\Program Files\MiKTeX 2.7\miktex\bin\latex.exe"; dvips="C:\Program Files\MiKTeX 2.7\miktex\bin\dvips.exe"; \endverbatim \comment ##################################################################### \section Questions about paths \question 02sep:tensionsyntax Why do I get a syntax error message when I specify an integer value for the path tension? What is happening here is that \verbatim draw((0,0)..tension 2..(0,50)..(100,100)); \endverbatim is read as \verbatim draw((0,0)..tension 2. .(0,50)..(100,100)); \endverbatim So the first . after the two is treated as a decimal point. Just put a space after the integer tension value: \verbatim draw((0,0)..tension 2 ..(0,50)..(100,100)); \endverbatim \question 27jun:dots Shouldn't dots always be the same size? From the documentation: "The dot command defined in the module plain draws a dot having a diameter equal to an explicit pen linewidth or the default linewidth magnified by dotfactor (6 by default)." Thus, when you use the default pen, the dot will have size 6*linewidth, but when you give a pen with an explicit width specified, you will have a dot of size linewidth. If you want the first case to behave like the second, you may set dotfactor=1. \comment ##################################################################### \section Questions about labels \question 02sep:greek How do I get Greek letters like omega to show up in my labels? In (La)TeX, Greek letters can be obtained in math mode by prepending a backslash to the letter name. So for a omega symbol, use "$\\omega$". Everything between the dollar signs is considered to be a math formula. Uppercase Greek letters can be used by capitalizing the first letter of the name: \verbatim label("$\omega$",(0,0)); label("$\Omega$",(20,0)); \endverbatim \question 29jun:matlabels Can Asymptote use matrices as labels? Yes: \verbatim usepackage("amsmath"); label("$\begin{matrix} 1 & 2 \\\ 1 & 1 \end{matrix}$",(0,0)); \endverbatim \question 27jun:latexpackage How do I tell Asymptote to load a particular LaTeX package, like \courier{mathptmx\}? Put \verbatim usepackage("mathptmx"); \endverbatim at the beginning of your file. Note: to enable the Adobe Times Roman font for text, you will also need to say: \verbatim defaultpen(TimesRoman()); \endverbatim \question 28jun:internatfonts How can I use international fonts in Asymptote labels? See \docref{http://asymptote.sourceforge.net/doc/unicode.html\}. \question 10jul:Fourier How can I use Fourier fonts? \verbatim usepackage("fourier"); defaultpen(font("T1","fut\textfamilyextension","m","n")); \endverbatim \question 26jun:decsep Is there any way to change the default appearance of the decimal separator, using a comma instead of a dot? Just set your locale appropriately: \verbatim locale("it_IT"); usepackage("icomma"); label(format(0.5)); \endverbatim \question 02sep:rotatelabel How can I get a rotated label with the filled box rotated as well so that it fits the text? \verbatim frame f; label(f,"This is some text",white,Fill(blue)); add(rotate(65)*f); \endverbatim \question 02sep:rotatelabel3D How can I rotate labels in a 3D figure? You need to first project the triple to a pair like this: \verbatim import three; size(100,100); draw(rotate(90,project(Z))*"A",O--X); \endverbatim \question 02sep:fixedsize How can I draw some squares and circles of a fixed size and put a label in the middle of them? Fixed-size objects should be drawn on a separate picture and then added to currentpicture. Here is one way (see also \docref{http://asymptote.sourceforge.net/gallery/subpictures.asy\} and \docref{http://asymptote.sourceforge.net/gallery/mosquito.asy\}): \verbatim real u=2cm; picture square; draw(square,scale(u)*shift(-0.5,-0.5)*unitsquare); picture circle; draw(circle,scale(0.5u)*unitcircle); void add(picture pic=currentpicture, Label L, picture object, pair z) { add(pic,object,z); label(pic,L,z); } add("square",square,(0,0)); add("circle",circle,(5cm,0)); \endverbatim \question 27jun:colorssaturation The binary operator * can be used to scale the color of a pen by a real number. Does this scaling factor have to be less than 1? The scaling factor can be greater than 1. But keep in mind that the rgb color components saturate at 1. Try \verbatim write(cyan); write(0.8*cyan); write(1.5*cyan); \endverbatim and you will quickly see what is going on. To get a lighter cyan you can say white+cyan, which yields rgb(0.5,1,1). If you want something even lighter specify the rgb colors directly, for example, rgb(0.9,1,1). Alternatively, work in cmyk colour space, which is nicer in that it handles saturation separately from hue: 0.1*Cyan is light and 0.9*Cyan is dark. You can also say 0.1*cmyk(red). \question 05mar:commadecimalseparator Why is the space after the comma decimal separator in my locale so large? LaTeX is treating the comma as punctuation and not as a decimal separator. The solution is to load the \courier{icomma\} package near the beginning of your file: \verbatim usepackage("icomma"); \endverbatim \question 11mar:hyperref How can I prevent \courier{texpreamble("\\usepackage[pdftex]{hyperref}")\} from changing the page size? \verbatim texpreamble("\usepackage[pdftex,setpagesize=false]{hyperref}"); \endverbatim \comment ##################################################################### \section Questions about arrows \question 02sep:doublearrows How do I draw two arrows at arbitrary positions along a path? Assuming that at least one of the arrowheads is to be filled, you can do this: \verbatim size(200); path g = (0,0)..(1,3)..(3,0); draw(g,Arrow(Relative(0.9))); add(arrow(g,invisible,FillDraw(black),Relative(0.5))); add(arrow(reverse(g),invisible,FillDraw(white,black),Relative(0.9))); \endverbatim If both of the arrowheads are to be drawn with filltype NoFill, one will need to create a specialized version of the arrow routine in \courier{plain_arrows.asy\}: \verbatim void arrow(frame f, arrowhead arrowhead=DefaultHead, path g, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=arrowhead.defaultfilltype, position position=EndPoint, bool forwards=true, margin margin=NoMargin, bool center=false); \endverbatim \question 02sep:reversearrow How do I reverse the direction of an arrowhead? Simply reverse the direction of the path. \verbatim path g=((0,0)--(5cm,0)); draw(reverse(g),Arrow(Relative(0.55))); \endverbatim \question 02sep:reversearrow How do I change the size of all arrows? To override the arrowsize you can give every Arrow drawing attribute a real size argument. If you want to do this globally, you can override the pen-dependent arrowsize function like this: \verbatim DefaultHead.size=new real(pen p=currentpen) {return 2mm;}; \endverbatim \question 26jun:arrowhead Can I create other arrowhead styles? Yes, you can build custom arrowheads like this (see the predefined arrowhead styles in \courier{plain_arrows.asy\} for further examples): \verbatim arrowhead DotHead; DotHead.head=new path(path g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle) { if(size == 0) size=DotHead.size(p); bool relative=position.relative; real position=position.position.x; if(relative) position=reltime(g,position); path r=subpath(g,position,0); pair x=point(r,0); real t=arctime(r,size); pair y=point(r,t); return circle(0.5(x+y),0.5size); }; size(100); draw((0,0)..(1,1)..(2,0),Arrow(DotHead)); dot((2,0),red); \endverbatim If you submit your alternate arrowheads to the Forum or the Patch Tracking System, we'll consider including them in a future release. \comment ##################################################################### \section Questions about 2D graphs \question 02sep:axisticks How can I draw x axis ticks on the right side, with the tick labels on the left side (relative to the axis path)? \verbatim import graph; size(250,200,IgnoreAspect); draw(graph(exp,-1,1),red); xaxis("$x$",RightTicks(Label(align=left))); yaxis("$y$",RightTicks); \endverbatim \question 02sep:axislabel How can I reposition the x axis label to three-quarters along the axis length? \verbatim import graph; size(250,200,IgnoreAspect); draw(graph(exp,-1,1),red); xaxis(Label("$x$",0.75),LeftTicks); yaxis("$y$",RightTicks); \endverbatim \question 02sep:axislabeldown How can I move the x axis label down 10bp? \verbatim import graph; size(250,200,IgnoreAspect); draw(graph(exp,-1,1),red); xaxis(shift(0,-10)*"$x$",LeftTicks); yaxis("$y$",RightTicks); \endverbatim \question 02sep:threeaxispens Can I use different pens for the axis, the axis label, and the tick labels? Yes: \verbatim import graph; size(300,200,IgnoreAspect); xlimits(-50,50); ylimits(0,100); xaxis(Label("$x$",MidPoint,red),Bottom,blue,LeftTicks(green)); yaxis("$y$",Left,RightTicks); \endverbatim \question 02sep:axislabelfont How can I change the font type of the axes label? \verbatim import graph; size(300,200,IgnoreAspect); xlimits(-50,50); ylimits(0,100); xaxis("x",Bottom,Courier("m","n"),LeftTicks); yaxis("$y$",Left,RightTicks); \endverbatim \question 02sep:axisticklabelfont How can I change the font type of the tick labels on an axis? Tick labels are by default typeset in (TeX) math mode, so to use other fonts you need to override the default tick format: \verbatim import graph; size(300,200,IgnoreAspect); xlimits(-50,50); ylimits(0,100); xaxis("$x$",Bottom,LeftTicks("%.4g",Courier("m","n")+fontsize(12))); yaxis("$y$",Left,RightTicks); \endverbatim \question 26jun:overlappingticklabels How can I prevent axes tick labels from rendering on top of each other? Either: (i) give LeftTicks/RightTicks/Ticks the arguments beginlabel=false and/or endlabel=false; (ii) explicitly remove specific ticks and their labels (drawing them manually; see \docref{http://www.github.com/vectorgraphics/asymptote/base/graph.asy\} for the definition of NoZero): \verbatim import graph; size(10cm); real f(real x) {return x^2;} draw(graph(f,-2,2)); xaxis(Ticks(NoZero)); yaxis(Ticks(NoZero)); label("$0$",(0,0),SW); \endverbatim (iii) explicitly remove specific tick labels and draw them manually (see \docref{http://www.github.com/vectorgraphics/asymptote/base/graph.asy\} for the definition of NoZeroFormat): \verbatim import graph; size(10cm); real f(real x) {return x^2;} draw(graph(f,-2,2)); xaxis(Ticks(NoZeroFormat)); yaxis(Ticks(NoZeroFormat)); label("$0$",(0,0),SW); \endverbatim (iv) use the xasy GUI to move overlapping labels; (v) change the Label argument of LeftTicks, RightTicks, or Ticks to: \verbatim Label(currentpen+overwrite(Move)) \endverbatim Solution (v) will move labels that might otherwise overwrite a previous label. Other possible overwrite arguments are Allow (allows overlapping labels; the default), Suppress (an overlapping label will not be written at all), SuppressQuiet, and MoveQuiet. The last two achieve the same result as the non-quiet types, but will not notify you which labels are overlapping. See: \docref{http://asymptote.sourceforge.net/doc/Pens.html\}. In the case of a user-specified tick array, you can change which labels get suppressed/moved by changing the order of array entries. \question 04nov:fixedsizegraphs How do I make the plot region of a graph, ignoring labels and legends, have a fixed size? Either: i) Specify an explicit unitsize, which overrides any call to \courier{size\}: \verbatim unitsize(x=1cm,y=2cm); \endverbatim ii) Explicitly tell Asymptote to map the plot region to a specific size: \verbatim import graph; real[] x={0,1,2,3}; real[] y=x^2; draw(graph(x,y),red); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); size(5cm,5cm,point(SW),point(NE)); label("$f_\mathrm{T}$",point(N),2N); \endverbatim iii) Specify the points in user coordinates that should correspond to a given picture size: \verbatim import graph; size(250,200,IgnoreAspect); draw(graph(exp,-1,1),red); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); fixedscaling((-1.5,-0.5),(1.5,3.5)); \endverbatim In this example, the user coordinate \courier{(-1.5,-0.5)\} will end up being the lower left corner of the figure and \courier{(1.5,3.5)\} will be the upper right corner. You can use this option to ensure multiple figures have the same scaling and same resulting figure size (just ensure the two coordinates given to \courier{fixedscaling()\} leaves room for any labels). See also \docref{http://asymptote.sourceforge.net/doc/Frames-and-pictures.html\}. \question 26jun:graphlimits How can I plot a function f(x) within [0,1]x[0,2] without explicitly calculating the x values for which f(x) hits the boundary? Call \courier{limits\} with the \courier{Crop\} option before drawing the graph: \verbatim import graph; size(250,200,IgnoreAspect); draw(graph(exp,-1,1),red); limits((0,0),(1,2),Crop); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); \endverbatim See also \docref{http://asymptote.sourceforge.net/doc/graph.html\}. \question 26jun:custompalettes Is it possible to define customized palettes? Yes, you may generate your own pen[] array. For example: \verbatim int NColors=32768; pen[] MyPalette=new pen[NColors]; real step=1/(NColors-1.0); // Start at black: rgb(0,0,0) // End at yellow: rgb(1,1,0) for(int i=0; i < NColors; ++i) { real rgval=i*step; MyPalette[i]=rgb(rgval,rgval,0.0); } \endverbatim \question 26jun:factorial Is there an easy way to graph factorial functions nicely? The example below shows a continuous function and two methods for placing markers at integer values of x: \verbatim import graph; size(200,200,IgnoreAspect); real factorial(real t) {return gamma(t+1);} scale(Linear,Log); // Graph the factorial function. draw(graph(factorial,0,10)); // Method 1: Draw nodes, but hide line pair F(int t) {return (t,factorial(t));} // Graph of factorial function from 0 to 10 pair[] z=sequence(F,11); draw(graph(z),invisible,marker(scale(0.8mm)*unitcircle,blue,Fill)); // Method 2: Nongraphing routines require explicit scaling: pair dotloc(int t) {return Scale(F(t));} pair[] dotlocs=sequence(dotloc,11); dot(dotlocs); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); \endverbatim \question 26jun:length How do I indicate that a certain length should be exactly the size I prescribe with no rescaling, within a picture which has its own size? Here's an easy way to do this. \verbatim size(12cm,0); void distance(picture pic=currentpicture, pair A, pair B, Label L="", real n=0, pen p=currentpen) { real d=3mm; path g=A--B; transform T=shift(-n*d*unit(B-A)*I); pic.add(new void(frame f, transform t) { picture opic; path G=T*t*g; draw(opic,Label(L,Center,UnFill(1)),G,p,Arrows(NoFill),Bars,PenMargins); add(f,opic.fit()); }); pic.addBox(min(g),max(g),T*min(p),T*max(p)); } pair A=(0,0), B=(3,3); dot(A); dot(B); distance(A,B,"$\ell$",1); \endverbatim \question 26jun:log2 How can I make the y axis display base-2 logarithmic values? See the example \docref{http://asymptote.sourceforge.net/gallery/2D graphs/log2graph.asy\}. \question 27jun:align How can I align the x axes of two graphs on the same figure? An easy way to do this, if the axes to be aligned have the same scaling and size, is illustrated in the example \docref{http://asymptote.sourceforge.net/gallery/2D graphs/alignedaxis.asy\}. Here is a more general solution to the problem of aligning two arbitrary axes. One fits the second picture to a frame based on the horizontal scaling for the first picture: \verbatim import graph; real width=15cm; real aspect=0.3; picture pic1,pic2; size(pic1,width,aspect*width,IgnoreAspect); size(pic2,width,aspect*width,IgnoreAspect); scale(pic1,false); scale(pic2,false); real xmin1=6; real xmax1=9; real xmin2=8; real xmax2=16; real a1=1; real a2=0.001; real f1(real x) {return a1*sin(x/2*pi);} real f2(real x) {return a2*sin(x/4*pi);} draw(pic1,graph(pic1,f1,xmin1,xmax1)); draw(pic2,graph(pic2,f2,xmin2,xmax2)); xaxis(pic1,Bottom,LeftTicks()); yaxis(pic1,"$f_1(x)$",Left,RightTicks); xaxis(pic2,"$x$",Bottom,LeftTicks(Step=4)); yaxis(pic2,"$f_2(x)$",Left,RightTicks); yequals(pic1,0,Dotted); yequals(pic2,0,Dotted); pair min1=point(pic1,SW); pair max1=point(pic1,NE); pair min2=point(pic2,SW); pair max2=point(pic2,NE); real scale=(max1.x-min1.x)/(max2.x-min2.x); real shift=min1.x/scale-min2.x; transform t1=pic1.calculateTransform(); transform t2=pic2.calculateTransform(); transform T=xscale(scale*t1.xx)*yscale(t2.yy); add(pic1.fit()); real height=truepoint(N,user=false).y-truepoint(S,user=false).y; add(shift(0,-height)*(shift(shift)*pic2).fit(T)); \endverbatim \question 27jun:changeaxis How can I change the direction of the y-axis, such that negatives values are on the upper y-axis? Here is a simple example (see also the example \docref{http://asymptote.sourceforge.net/gallery/2D graphs/diatom.asy\} or the discussion of Linear(-1) in the documentation): \verbatim import graph; size(250,200,IgnoreAspect); scale(Linear,Linear(-1)); draw(graph(log,0.1,10),red); xaxis("$x$",LeftTicks); yaxis("$y$",RightTicks); \endverbatim \question 27jun:functioncolor How can I fill a path with a function that defines the color of each location? Use \courier{functionshade\} with a PDF tex engine, as illustrated by the example {functionshading.asy}. If you want to produce PostScript output, an approximate solution for now would be to superimpose a fine grid and specify colors to \courier{latticeshade\} that depend on position as a single pen[][] lattice. Alternatively, it may be more efficient to use \courier{tensorshade}. \question 27jun:nonexplicitfun Is there a way to draw a function that is not explicitly given, such as (y - 2)^2 = x - 1 ? Yes, use the parametric form \verbatim y=t x=(t-2)^2+1 \endverbatim See the example \docref{http://asymptote.sourceforge.net/gallery/2D graphs/parametricgraph.asy\}. \question 27jun:scalesecondaryaxis Is it possible to reverse or stretch an axis? The real scaling argument to Linear is used to stretch (or reverse) the axis. To see the effect of axis stretching, be sure not to specify IgnoreAspect in the picture size command. A secondary axis has the same length as the primary axis, so stretching cannot have any effect. But one can still reverse the axis, with Linear(-1). \question 02sep:emptymarkers Why can't I use the UnFill option to draw graphs with empty markers? UnFill won't work here because it only affects the local frame the markers are initially drawn on, before being added to currentpicture. Here is a way of achieving the desired effect (assuming a white background): \verbatim import graph; size(10cm,0); pair[] z={(0,0),(0.5,0.5),(1,1)}; path g=graph(z); draw(shift(0,.5)*g,marker(scale(5)*unitcircle,FillDraw(white))); xaxis(BottomTop,LeftTicks); yaxis(LeftRight,RightTicks); \endverbatim \question 02sep:paletterange How can I force several images to use the same palette range (e.g. the entire 0-255 grayscale range)? The palette color space corresponds to a range of values specified by the argument range, which can be \courier{Full\}, \courier{Automatic\} or an explicit range \courier{Range(pair min, pair max)\}. Here \courier{Full} specifies a range varying from the minimum to maximum values of the function over the sampling interval, while \courier{Automatic\} selects "nice" limits. \comment ##################################################################### \section Questions about programming \question 27jun:comporint Is Asymptote an interpreter or a compiler? Asymptote compiles Asymptote commands into its own virtual machine code. It then runs this pseudocode on a virtual machine to produce PostScript code. \question 05sep:framepicture What is the difference between a frame and a picture? Frames are canvases for drawing in PostScript coordinates. While working with frames directly is occasionally necessary for constructing deferred drawing routines, pictures are usually more convenient to work with. See \qref unitsizes. \question 05sep:pathguide What is the difference between a path and a guide? A path is a cubic spline with fixed endpoint conditions. A guide is an unresolved cubic spline (list of cubic-spline nodes and control points). A guide is like a path except that the computation of the cubic spline is deferred until drawing time (when it is resolved into a path); this allows two guides with free endpoint conditions to be joined together smoothly. \question 27jun:picarray What is a convenient way to declare and initialize an array of pictures? You could write yourself a routine such as: \verbatim picture[] picture(int n) { picture[] pic; for(int i=0; i < n; ++i) { pic[i]=new picture; size(pic[i],19cm,0); } return pic; } picture[] pic=picture(6); \endverbatim \question 27jun:genarrays Is there a way to define functions that act on arrays in general (i.e. work for arrays of any type)? Generic types aren't yet implemented. But for now you can at least say \verbatim typedef string T; include F; typedef real T; include F; \endverbatim where \courier{F.asy\} contains some type-dependent code like \verbatim T[] operator $(T A, T B) {return new T[] {A,B};} \endverbatim \question 27jun:cirdep Is there any way to declare structures ahead of their definition, e.g. where struct A performs some operation on struct B, but B contains an A member? Asymptote does not support forward declaration of types. You can, however, nest structures, so that both types are visible for parts of the bodies of both structure definitions. For example: \verbatim struct B { typedef void someroutine(B b); static struct A { someroutine routine; void operator init(someroutine routine) { this.routine=routine; } } string test="Testing"; } typedef B.A A; A a=B.A(new void(B b){write(b.test);}); B b; a.routine(b); \endverbatim \question 04nov:static Where are static variables in for loops allocated? In the example \verbatim void f() { for(int i=0; i < 3; ++i) { static int n; ++n; write(n); } } f(); // Writes 1, 2, 3 \endverbatim the static qualifier means that \courier{n\} is allocated not just outside of the for loop, but also outside the function. This is clear if you call \courier{f\} multiple times; there is still only one instance of \courier{n\}. The "level" of a variable (where it is allocated) has nothing to do with the "scope" of a variable (how long it can be referred to by name). The curly braces enclosing a block affect only a variable's scope, not its level. Static modifiers are meaningless at the top level; they generate a warning and are simply ignored: \verbatim for(int i=0; i < 3; ++i) { static int n; ++n; write(n); } // Writes warning about top-level static modifier and then 1, 1, 1 \endverbatim Since version 1.22, non-static variables allocated in a loop body are allocated anew every iteration. This is only noticable in obscure cases where a variable in a loop is accessed in the closure of a function defined in the loop: \verbatim int f(); for(int i=0; i < 10; ++i) { int j=10*i; if(i == 5) f=new int() {return j;}; } write(f()); // Writes 50 \endverbatim Variables in the body of a loop last as long as that iteration of the loop, unless they are kept alive by a function closure as in the example above. In a function body, variables will last at least as long as the function call, though because of closures and garbage collection, they may last longer than that. If defined at the top level of a file or at the interactive prompt, they will last at least until the end of the file or prompt's run. \question 26jun:debug Is there a debugger for asy? Yes, Asymptote includes a line-based debugger: \docref{http://asymptote.sourceforge.net/doc/Debugger.html\} \question 27jun:patches Do you accept patches for Asymptote? Yes, in fact we would prefer that users submit patches for customized features (to \docref{http://sourceforge.net/tracker/?atid=685685&group_id=120000\}) instead of relying on us to do all of the coding. Development will proceed faster that way. \comment ##################################################################### \section Questions about differences between Asymptote and MetaPost \question 29jun:interp What is the equivalent of the MetaPost c[a,b] interpolation operator? \verbatim interp(a,b,c); \endverbatim \question 02sep:automaticscaling How does picture scaling differ in Asymptote and MetaPost? Asymptote includes an optional facility to do automatic scaling of pictures to achieve a given overall picture size, whereas Metapost only supports manual scaling. Asymptote defers drawing of objects drawn to pictures and distinguishes between true-size objects and objects that should scale with the picture size. The resulting linear programming problem is solved via the Simplex method. See the \docref{http://asymptote.sourceforge.net/gallery/dimension.asy\} example for an example of how deferred drawing is used to accomodate both user and true-size (PostScript) coordinates. \question 02sep:manualscaling How can I avoid automatic scaling of a picture? If you really like Metapost-style manual (hard-wired) scaling either: (i) use the default size(0,0) for the entire picture and do all of the scaling by hand, just like in MetaPost; (ii) draw to a separate picture pic and add(pic.fit()); (iii) use frames. \question 23jun:mp3dots What is the equivalent of MetaPost ... command? The connector \courier{::\} is a macro for tension atleast 1: \verbatim size(100); pair z0=(0,0); pair z1=(1,0.25); pair z2=(2,0); draw(z0{up}::z1{right}::z2{down}); \endverbatim \question 23jun:mppickup What is the equivalent of the MetaPost pickup command? Just say, for example: \verbatim currentpen=red; \endverbatim \question 29aug:whatever What is the equivalent of the MetaPost whatever command? Asymptote does not implicitly solve linear equations and therefore does not have the notion of a \courier{whatever\} unknown. Such a facility could certainly be added (perhaps using the notation \courier{?=\} since \courier{=\} means assignment). However, the most common uses of \courier{whatever\} in MetaPost are covered by functions like \courier{extension\} in \courier{math.asy\}: \verbatim pair extension(pair P, pair Q, pair p, pair q); \endverbatim this returns the intersection point of the extensions of the line segments \courier{PQ\} and \courier{pq\}. We find using routines like \courier{extension\} more explicit and less confusing to new users. But we could be persuaded to add something similar if someone can justify the need. In the meantime, one can always use the explicit built-in linear solver \courier{solve\} (see \docref{http://asymptote.sourceforge.net/doc/solve.html\}), which uses LU decomposition. \question 23jun:lray What is the equivalent for the MetaPost command for \courier{lray - horiz*v - verti*u = whatever*(LightSource - R)\}, a system of three linear equations for three unknowns: \courier{horiz, verti, whatever\}? Since \courier{horiz*v+verti*u\} spans a plane, you could use \verbatim real intersect(vector P, vector Q, vector n, vector Z); \endverbatim to find the intersection time for the line \courier{lray-whatever*(LightSource - R)\} and then extract the three desired values from there. (You'll still need to use the built-in explicit linear solver to solve a 2x2 system to get \courier{horiz\} and \courier{verti\}.) \question 27jun:unitsizes In MetaPost, it is possible to have a drawing remain the same size in different pictures by defining a unit \courier{u\} and explicitly multiply all the coordinates by \courier{u\}. Is there a better way to do this in Asymptote? Yes, Asymptote has a better way: you definitely don't want to manually scale all of your coordinates. To make the user coordinates represent multiples of exactly \courier{1cm\}: \verbatim unitsize(1cm); draw(unitsquare); \endverbatim One can also specify different x and y unit sizes: \verbatim unitsize(x=1cm,y=2cm); draw(unitsquare); \endverbatim Another way is to draw your fixed size object to a frame and add it to currentpicture like this: \verbatim path p=(0,0)--(1,0); frame object; draw(object,scale(100)*p); add(object); add(object,(0,-10)); \endverbatim To understand the difference between frames and pictures, try this: \verbatim size(300,300); path p=(0,0)--(1,0); picture object; draw(object,scale(100)*p); add(object); add(object,(0,-10)); // Adds truesize object to currentpicture \endverbatim \question 28jun:tiles In MetaPost, one could produce tiling pictures by generating a picture, and then clipping the picture to a rectangle of fixed dimensions around the center of the picture. How is that done in Asymptote? If you are using currentpicture the way one would in MetaPost (drawing in raw PostScript coordinates), you can simply do something like: \verbatim fill((0,0)--(100,100)--(200,0)--cycle); pair center(picture pic=currentpicture) {return 0.5*(pic.min()+pic.max());} real height=100; real width=100; pair delta=0.5(width,height); pair c=center(); clip(box(c-delta,c+delta)); \endverbatim However, drawing in PostScript coordinates is often inconvenient. Here's the Asymptote way of doing the same thing, using deferred drawing: \verbatim size(200,100); fill((0,0)--(1,1)--(2,0)--cycle); void clip(picture pic=currentpicture, real width, real height) { pic.clip(new void (frame f, transform) { pair center=0.5(min(f)+max(f)); pair delta=0.5(width,height); clip(f,box(center-delta,center+delta)); }); } clip(100,100); \endverbatim See also the discussion of tilings in the documentation: \docref{http://asymptote.sourceforge.net/doc/Pens.html\}. \comment ###################################################################### \section Questions about output \question 27jun:psviewer How can I disable automatic invocation of the PS viewer after an asy file is done processing? It's actually not on by default, unless you happen to be using Microsoft Windows (because that is what most Microsoft Windows users expect). Microsoft Windows users can turn this feature off with the command-line option -noV or by putting \verbatim import settings; interactiveView=false; batchView=false; \endverbatim in their \courier{config.asy\} file. See \docref{http://asymptote.sourceforge.net/doc/Options.html\}. \question 26jun:jpeg How do I output jpeg images? If you have the ImageMagick convert program installed, simply type \verbatim asy -f jpg test.asy \endverbatim \question 27jun:embedbitmaps Can I embed bitmaps (photos) into my drawings and position and scale them? Convert them to eps format and use the graphic(string) function just like a Label: \verbatim label(graphic("file"),(0,0)); \endverbatim See the example \docref{http://asymptote.sourceforge.net/gallery/orthocenter.asy\} and \docref{http://asymptote.sourceforge.net/doc/label.html\}. \question 28jun:directpdf Does Asymptote support direct PDF output? Yes, PDF output can be produced by the -f pdf option or -tex pdflatex option. This supports transparency, annotations, embedded movies, and U3D/PRC content. \question 28jun:bigpictures How to I produce large pictures of high quality in raster format (e.g. png, giff etc). Try using some of the options to convert, mainly -geometry and -density. For example: \verbatim convert -geometry 1000x3000 example.eps example.png \endverbatim You can also change the default resolution of the image with: \verbatim convert -geometry 1000x3000 -density 300 -units PixelsPerInch example.eps example.png \endverbatim This does not change the number of pixels in the image, but just gives a hint as to how large each pixel should be displayed. If you include the -density option without the -geometry option, convert will keep the image size constant (so a 4cm x 3cm eps figure will generate a 4cm x 3cm png image). \question 28jun:multipage Is it possible to produce multi-page documents with asymptote? Yes, simply call the newpage() function. This is used by the \courier{slide.asy\} package to produce high-quality slide presentations (easier to use than Prosper). \comment Here it ends! ./asymptote-2.41/doc/FAQ/m-ascii.pl0000644000175000017500000001115613064427076016602 0ustar norbertnorbert## ASCII output # Copyright (C) 1993-1995 Ian Jackson. # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # It is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # You should have received a copy of the GNU General Public License # along with GNU Emacs; see the file COPYING. If not, write to # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA. # (Note: I do not consider works produced using these BFNN processing # tools to be derivative works of the tools, so they are NOT covered # by the GPL. However, I would appreciate it if you credited me if # appropriate in any documents you format using BFNN.) sub ascii_init { open(ASCII,">$prefix.ascii"); } sub ascii_startmajorheading { print ASCII '='x79,"\n\n"; $ascii_status= 'h'; &ascii_text($_[0] ? "Section $_[0]. " : ''); } sub ascii_startminorheading { print ASCII '-'x79,"\n\n"; $ascii_status= 'h'; } sub ascii_italic { &ascii_text('*'); } sub ascii_enditalic { $ascii_para .= '*'; } sub ascii_email { &ascii_text('<'); } sub ascii_endemail { &ascii_text('>'); } sub ascii_ftpon { } sub ascii_endftpon { } sub ascii_ftpin { } sub ascii_endftpin { } sub ascii_docref { } sub ascii_enddocref { } sub ascii_courier { } sub ascii_endcourier { } sub ascii_newsgroup { } sub ascii_endnewsgroup { } sub ascii_ftpsilent { $ascii_ignore++; } sub ascii_endftpsilent { $ascii_ignore--; } sub ascii_text { return if $ascii_ignore; if ($ascii_status eq '') { $ascii_status= 'p'; } $ascii_para .= $_[0]; } sub ascii_tab { local ($n) = $_[0]-length($ascii_para); $ascii_para .= ' 'x$n if $n>0; } sub ascii_newline { return unless $ascii_status eq 'p'; &ascii_writepara; } sub ascii_writepara { local ($thisline, $thisword, $rest); for (;;) { last unless $ascii_para =~ m/\S/; $thisline= $ascii_indentstring; for (;;) { last unless $ascii_para =~ m/^(\s*\S+)/; unless (length($1) + length($thisline) < 75 || length($thisline) == length($ascii_indentstring)) { last; } $thisline .= $1; $ascii_para= $'; } $ascii_para =~ s/^\s*//; print ASCII $thisline,"\n"; $ascii_indentstring= $ascii_nextindent; last unless length($ascii_para); } $ascii_status= ''; $ascii_para= ''; } sub ascii_endpara { return unless $ascii_status eq 'p'; &ascii_writepara; print ASCII "\n"; } sub ascii_endheading { $ascii_para =~ s/\s*$//; print ASCII "$ascii_para\n\n"; $ascii_status= ''; $ascii_para= ''; } sub ascii_endmajorheading { &ascii_endheading(@_); } sub ascii_endminorheading { &ascii_endheading(@_); } sub ascii_startverbatim { $ascii_vstatus= $ascii_status; &ascii_writepara; } sub ascii_verbatim { print ASCII $_[0],"\n"; } sub ascii_endverbatim { $ascii_status= $ascii_vstatus; } sub ascii_finish { close(ASCII); } sub ascii_startindex { $ascii_status= ''; } sub ascii_endindex { $ascii_status= 'p'; } sub ascii_endindexitem { printf ASCII " %-11s %-.66s\n",$ascii_left,$ascii_para; $ascii_status= 'p'; $ascii_para= ''; } sub ascii_startindexitem { $ascii_left= $_[1]; } sub ascii_startindexmainitem { $ascii_left= $_[1]; print ASCII "\n" if $ascii_status eq 'p'; } sub ascii_startindent { $ascii_istatus= $ascii_status; &ascii_writepara; $ascii_indentstring= " $ascii_indentstring"; $ascii_nextindent= " $ascii_nextindent"; } sub ascii_endindent { $ascii_indentstring =~ s/^ //; $ascii_nextindent =~ s/^ //; $ascii_status= $ascii_istatus; } sub ascii_startpackedlist { $ascii_plc=0; } sub ascii_endpackedlist { &ascii_newline if !$ascii_plc; } sub ascii_packeditem { &ascii_newline if !$ascii_plc; &ascii_tab($ascii_plc*40+5); $ascii_plc= !$ascii_plc; } sub ascii_startlist { &ascii_endpara; $ascii_indentstring= " $ascii_indentstring"; $ascii_nextindent= " $ascii_nextindent"; } sub ascii_endlist { &ascii_endpara; $ascii_indentstring =~ s/^ //; $ascii_nextindent =~ s/^ //; } sub ascii_item { &ascii_newline; $ascii_indentstring =~ s/ $/* /; } sub ascii_pageref { &ascii_text("Q$_[1] \`"); } sub ascii_endpageref { &ascii_text("'"); } 1; ./asymptote-2.41/doc/FAQ/Makefile0000644000175000017500000000175013064427076016362 0ustar norbertnorbertBFNNCONV = bfnnconv.pl m-ascii.pl m-html.pl m-info.pl m-lout.pl m-post.pl all: faq faq: $(BFNNCONV) asy-faq.bfnn mkdir -p asy-faq.html perl bfnnconv.pl asy-faq.bfnn perl bfnnconv.pl asy-faq.bfnn clean: FORCE -rm -f *~ core a.out *.lout *.ps *.info *.ascii *.xrefdb *.post -rm -rf *.html install-all: install install: faq install-prebuilt ${INSTALL} -d -m 755 $(docdir) $(docdir)/asy-faq.html ${INSTALL} -p -m 644 asy-faq.ascii $(docdir) ${INSTALL} -p -m 644 asy-faq.html/* $(docdir)/asy-faq.html install-prebuilt: ${INSTALL} -d -m 755 $(infodir) ${INSTALL} -p -m 644 asy-faq.info $(infodir) -if test -z "$(DESTDIR)"; then \ install-info --infodir=$(infodir) asy-faq.info; \ fi install-info: faq install-prebuilt uninstall: uninstall-all uninstall-all: -cd $(docdir)/asy-faq.html && rm -rf *.html -cd $(docdir) && rmdir asy-faq.html && rm asy-faq.ascii -install-info --remove --infodir=$(infodir) asy-faq.info -rm -f $(infodir)/asy-faq.info distclean: FORCE clean FORCE: ./asymptote-2.41/doc/FAQ/m-lout.pl0000644000175000017500000001373013064427076016475 0ustar norbertnorbert## Lout output # Copyright (C) 1993-1995 Ian Jackson. # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # It is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # You should have received a copy of the GNU General Public License # along with GNU Emacs; see the file COPYING. If not, write to # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA. # (Note: I do not consider works produced using these BFNN processing # tools to be derivative works of the tools, so they are NOT covered # by the GPL. However, I would appreciate it if you credited me if # appropriate in any documents you format using BFNN.) sub lout_init { open(LOUT,">$prefix.lout"); chop($dprint= `date '+%d %B %Y'`); $dprint =~ s/^0//; } sub lout_startup { local ($lbs) = &lout_sanitise($user_brieftitle); print LOUT <0)*40+5); $lout_plc= !$lout_plc; } sub lout_startlist { &lout_endpara; print LOUT "\@RawIndentedList style {\@Bullet} indent {0.5i} gap {1.1vx}\n"; $lout_styles .= 'l'; $lout_status= ''; } sub lout_endlist { &lout_endpara; print LOUT "\@EndList\n\n"; $lout_styles =~ s/.$//; } sub lout_item { &lout_endpara; print LOUT "\@ListItem{"; $lout_styles.= 'I'; } sub lout_startindex { print LOUT "//0.0fe\n"; } sub lout_endindex { $lout_status='p'; } sub lout_startindexmainitem { $lout_marker= $_[0]; $lout_status= ''; print LOUT "//0.3vx Bold \@Font \@HAdjust { \@HContract { { $_[1] } |3cx {"; $lout_iiendheight= '1.00'; $lout_styles .= 'X'; } sub lout_startindexitem { $lout_marker= $_[0]; print LOUT "\@HAdjust { \@HContract { { $_[1] } |3cx {"; $lout_iiendheight= '0.95'; $lout_styles .= 'X'; } sub lout_endindexitem { print LOUT "} } |0c \@PageOf { $lout_marker } } //${lout_iiendheight}vx\n"; $lout_styles =~ s/.$//; } sub lout_email { &lout_courier; &lout_text('<'); } sub lout_endemail { &lout_text('>'); &lout_endcourier; } sub lout_ftpon { &lout_courier; } sub lout_endftpon { &lout_endcourier; } sub lout_ftpin { &lout_courier; } sub lout_endftpin { &lout_endcourier; } sub lout_docref { } sub lout_enddocref { } sub lout_ftpsilent { $lout_ignore++; } sub lout_endftpsilent { $lout_ignore--; } sub lout_newsgroup { &lout_courier; } sub lout_endnewsgroup { &lout_endcourier; } sub lout_text { return if $lout_ignore; $lout_status= 'p'; $_= &lout_sanitise($_[0]); s/ $/\n/ unless $lout_styles =~ m/[fhX]/; print LOUT $_; } sub lout_tab { local ($size) = $_[0]*0.5; print LOUT " |${size}ft "; } sub lout_newline { print LOUT " //1.0vx\n"; } sub lout_sanitise { local ($in) = @_; local ($out); $in= ' '.$in.' '; $out=''; while ($in =~ m/(\s)(\S*[\@\/|\\\"\^\&\{\}\#]\S*)(\s)/) { $out .= $`.$1; $in = $3.$'; $_= $2; s/[\\\"]/\\$&/g; $out .= '"'.$_.'"'; } $out .= $in; $out =~ s/^ //; $out =~ s/ $//; $out; } sub lout_endpara { return if $lout_status eq ''; if ($lout_styles eq '') { print LOUT "\@LP\n\n"; } elsif ($lout_styles =~ s/I$//) { print LOUT "}\n"; } $lout_status= ''; } sub lout_startverbatim { print LOUT "//0.4f\n\@RawIndentedDisplay lines \@Break". " { {0.7 1.0} \@Scale {Courier Bold} \@Font {\n"; } sub lout_verbatim { $_= $_[0]; s/^\s*//; print LOUT &lout_sanitise($_),"\n"; } sub lout_endverbatim { print LOUT "}\n}\n//0.4f\n"; } 1; ./asymptote-2.41/doc/FAQ/install-sh0000755000175000017500000003253713064427076016735 0ustar norbertnorbert#!/bin/sh # install - install a program, script, or datafile scriptversion=2009-04-28.21; # UTC # 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. nl=' ' IFS=" "" $nl" # set DOITPROG to echo to test this script # Don't use :- since 4.3BSD and earlier shells don't like it. doit=${DOITPROG-} if test -z "$doit"; then doit_exec=exec else doit_exec=$doit fi # Put in absolute file names if you don't have them in your path; # or use environment vars. chgrpprog=${CHGRPPROG-chgrp} chmodprog=${CHMODPROG-chmod} chownprog=${CHOWNPROG-chown} cmpprog=${CMPPROG-cmp} cpprog=${CPPROG-cp} mkdirprog=${MKDIRPROG-mkdir} mvprog=${MVPROG-mv} rmprog=${RMPROG-rm} stripprog=${STRIPPROG-strip} posix_glob='?' initialize_posix_glob=' test "$posix_glob" != "?" || { if (set -f) 2>/dev/null; then posix_glob= else posix_glob=: fi } ' posix_mkdir= # Desired mode of installed file. mode=0755 chgrpcmd= chmodcmd=$chmodprog chowncmd= mvcmd=$mvprog rmcmd="$rmprog -f" stripcmd= src= dst= dir_arg= dst_arg= copy_on_change=false 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: --help display this help and exit. --version display version info and exit. -c (ignored) -C install only if different (preserve the last data modification time) -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. Environment variables override the default commands: CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG RMPROG STRIPPROG " while test $# -ne 0; do case $1 in -c) ;; -C) copy_on_change=true;; -d) dir_arg=true;; -g) chgrpcmd="$chgrpprog $2" shift;; --help) echo "$usage"; exit $?;; -m) mode=$2 case $mode in *' '* | *' '* | *' '* | *'*'* | *'?'* | *'['*) echo "$0: invalid mode: $mode" >&2 exit 1;; esac shift;; -o) chowncmd="$chownprog $2" shift;; -s) stripcmd=$stripprog;; -t) dst_arg=$2 shift;; -T) no_target_directory=true;; --version) echo "$0 $scriptversion"; exit $?;; --) shift break;; -*) echo "$0: invalid option: $1" >&2 exit 1;; *) break;; esac shift done if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then # When -d is used, all remaining arguments are directories to create. # When -t is used, the destination is already specified. # Otherwise, the last argument is the destination. Remove it from $@. for arg do if test -n "$dst_arg"; then # $@ is not empty: it contains at least $arg. set fnord "$@" "$dst_arg" shift # fnord fi shift # arg dst_arg=$arg done fi if test $# -eq 0; 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 if test -z "$dir_arg"; then trap '(exit $?); exit' 1 2 13 15 # Set umask so as not to create temps with too-generous modes. # However, 'strip' requires both read and write access to temps. case $mode in # Optimize common cases. *644) cp_umask=133;; *755) cp_umask=22;; *[0-7]) if test -z "$stripcmd"; then u_plus_rw= else u_plus_rw='% 200' fi cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;; *) if test -z "$stripcmd"; then u_plus_rw= else u_plus_rw=,u+rw fi cp_umask=$mode$u_plus_rw;; esac fi for src do # Protect names starting with `-'. case $src in -*) src=./$src;; esac if test -n "$dir_arg"; then dst=$src dstdir=$dst test -d "$dstdir" dstdir_status=$? 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 "$dst_arg"; then echo "$0: no destination specified." >&2 exit 1 fi dst=$dst_arg # 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: $dst_arg: Is a directory" >&2 exit 1 fi dstdir=$dst dst=$dstdir/`basename "$src"` dstdir_status=0 else # Prefer dirname, but fall back on a substitute if dirname fails. dstdir=` (dirname "$dst") 2>/dev/null || expr X"$dst" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ X"$dst" : 'X\(//\)[^/]' \| \ X"$dst" : 'X\(//\)$' \| \ X"$dst" : 'X\(/\)' \| . 2>/dev/null || echo X"$dst" | sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ s//\1/ q } /^X\(\/\/\)[^/].*/{ s//\1/ q } /^X\(\/\/\)$/{ s//\1/ q } /^X\(\/\).*/{ s//\1/ q } s/.*/./; q' ` test -d "$dstdir" dstdir_status=$? fi fi obsolete_mkdir_used=false if test $dstdir_status != 0; then case $posix_mkdir in '') # Create intermediate dirs using mode 755 as modified by the umask. # This is like FreeBSD 'install' as of 1997-10-28. umask=`umask` case $stripcmd.$umask in # Optimize common cases. *[2367][2367]) mkdir_umask=$umask;; .*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;; *[0-7]) mkdir_umask=`expr $umask + 22 \ - $umask % 100 % 40 + $umask % 20 \ - $umask % 10 % 4 + $umask % 2 `;; *) mkdir_umask=$umask,go-w;; esac # With -d, create the new directory with the user-specified mode. # Otherwise, rely on $mkdir_umask. if test -n "$dir_arg"; then mkdir_mode=-m$mode else mkdir_mode= fi posix_mkdir=false case $umask in *[123567][0-7][0-7]) # POSIX mkdir -p sets u+wx bits regardless of umask, which # is incompatible with FreeBSD 'install' when (umask & 300) != 0. ;; *) tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$ trap 'ret=$?; rmdir "$tmpdir/d" "$tmpdir" 2>/dev/null; exit $ret' 0 if (umask $mkdir_umask && exec $mkdirprog $mkdir_mode -p -- "$tmpdir/d") >/dev/null 2>&1 then if test -z "$dir_arg" || { # Check for POSIX incompatibilities with -m. # HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or # other-writeable bit of parent directory when it shouldn't. # FreeBSD 6.1 mkdir -m -p sets mode of existing directory. ls_ld_tmpdir=`ls -ld "$tmpdir"` case $ls_ld_tmpdir in d????-?r-*) different_mode=700;; d????-?--*) different_mode=755;; *) false;; esac && $mkdirprog -m$different_mode -p -- "$tmpdir" && { ls_ld_tmpdir_1=`ls -ld "$tmpdir"` test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1" } } then posix_mkdir=: fi rmdir "$tmpdir/d" "$tmpdir" else # Remove any dirs left behind by ancient mkdir implementations. rmdir ./$mkdir_mode ./-p ./-- 2>/dev/null fi trap '' 0;; esac;; esac if $posix_mkdir && ( umask $mkdir_umask && $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir" ) then : else # The umask is ridiculous, or mkdir does not conform to POSIX, # or it failed possibly due to a race condition. Create the # directory the slow way, step by step, checking for races as we go. case $dstdir in /*) prefix='/';; -*) prefix='./';; *) prefix='';; esac eval "$initialize_posix_glob" oIFS=$IFS IFS=/ $posix_glob set -f set fnord $dstdir shift $posix_glob set +f IFS=$oIFS prefixes= for d do test -z "$d" && continue prefix=$prefix$d if test -d "$prefix"; then prefixes= else if $posix_mkdir; then (umask=$mkdir_umask && $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break # Don't fail if two instances are running concurrently. test -d "$prefix" || exit 1 else case $prefix in *\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;; *) qprefix=$prefix;; esac prefixes="$prefixes '$qprefix'" fi fi prefix=$prefix/ done if test -n "$prefixes"; then # Don't fail if two instances are running concurrently. (umask $mkdir_umask && eval "\$doit_exec \$mkdirprog $prefixes") || test -d "$dstdir" || exit 1 obsolete_mkdir_used=true fi fi fi if test -n "$dir_arg"; then { test -z "$chowncmd" || $doit $chowncmd "$dst"; } && { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } && { test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false || test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1 else # 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 # Copy the file name to the temp name. (umask $cp_umask && $doit_exec $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 $mode "$dsttmp"; } && # If -C, don't bother to copy if it wouldn't change the file. if $copy_on_change && old=`LC_ALL=C ls -dlL "$dst" 2>/dev/null` && new=`LC_ALL=C ls -dlL "$dsttmp" 2>/dev/null` && eval "$initialize_posix_glob" && $posix_glob set -f && set X $old && old=:$2:$4:$5:$6 && set X $new && new=:$2:$4:$5:$6 && $posix_glob set +f && test "$old" = "$new" && $cmpprog "$dst" "$dsttmp" >/dev/null 2>&1 then rm -f "$dsttmp" else # Rename the file to the real destination. $doit $mvcmd -f "$dsttmp" "$dst" 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. { test ! -f "$dst" || $doit $rmcmd -f "$dst" 2>/dev/null || { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null && { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; } } || { echo "$0: cannot unlink or rename $dst" >&2 (exit 1); exit 1 } } && # Now rename the file to the real destination. $doit $mvcmd "$dsttmp" "$dst" } fi || exit 1 trap '' 0 fi done # Local variables: # eval: (add-hook 'write-file-hooks 'time-stamp) # time-stamp-start: "scriptversion=" # time-stamp-format: "%:y-%02m-%02d.%02H" # time-stamp-time-zone: "UTC" # time-stamp-end: "; # UTC" # End: ./asymptote-2.41/doc/FAQ/bfnnconv.pl0000755000175000017500000002176013064427076017076 0ustar norbertnorbert#!/usr/bin/perl -- # Copyright (C) 1993-1995 Ian Jackson. # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # It is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # You should have received a copy of the GNU General Public License # along with GNU Emacs; see the file COPYING. If not, write to # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA. # (Note: I do not consider works produced using these BFNN processing # tools to be derivative works of the tools, so they are NOT covered # by the GPL. However, I would appreciate it if you credited me if # appropriate in any documents you format using BFNN.) @outputs=('ascii','info','html'); while ($ARGV[0] =~ m/^\-/) { $_= shift(@ARGV); if (m/^-only/) { @outputs= (shift(@ARGV)); } else { warn "unknown option `$_' ignored"; } } $prefix= $ARGV[0]; $prefix= 'stdin' unless length($prefix); $prefix =~ s/\.bfnn$//; if (open(O,"$prefix.xrefdb")) { @xrefdb= ; close(O); } else { warn "no $prefix.xrefdb ($!)"; } $section= -1; for $thisxr (@xrefdb) { $_= $thisxr; chop; if (m/^Q (\w+) ((\d+)\.(\d+)) (.*)$/) { $qrefn{$1}= $2; $qreft{$1}= $5; $qn2ref{$3,$4}= $1; $maxsection= $3; $maxquestion[$3]= $4; } elsif (m/^S (\d+) /) { $maxsection= $1; $sn2title{$1}=$'; } } open(U,">$prefix.xrefdb-new"); for $x (@outputs) { require("m-$x.pl"); } &call('init'); while (<>) { chop; next if m/^\\comment\b/; if (!m/\S/) { &call('endpara'); next; } if (s/^\\section +//) { $line= $_; $section++; $question=0; print U "S $section $line\n"; $|=1; print "S$section",' 'x10,"\r"; $|=0; &call('endpara'); &call('startmajorheading',"$section", "Section $section", $section<$maxsection ? "Section ".($section+1) : '', $section>1 ? 'Section '.($section-1) : 'Top'); &text($line); &call('endmajorheading'); if ($section) { &call('endpara'); &call('startindex'); for $thisxr (@xrefdb) { $_= $thisxr; chop; if (m/^Q (\w+) (\d+)\.(\d+) (.*)$/) { $ref= $1; $num1= $2; $num2= $3; $text= $4; next unless $num1 == $section; &call('startindexitem',$ref,"Q$num1.$num2","Question $num1.$num2"); &text($text); &call('endindexitem'); } } &call('endindex'); } } elsif (s/^\\question \d{2}[a-z]{3}((:\w+)?) +//) { $line= $_; $question++; $qrefstring= $1; $qrefstring= "q_${section}_$question" unless $qrefstring =~ s/^://; print U "Q $qrefstring $section.$question $line\n"; $|=1; print "Q$section.$question",' 'x10,"\r"; $|=0; &call('endpara'); &call('startminorheading',$qrefstring, "Question $section.$question", $question < $maxquestion[$section] ? "Question $section.".($question+1) : $section < $maxsection ? "Question ".($section+1).".1" : '', $question > 1 ? "Question $section.".($question-1) : $section > 1 ? "Question ".($section-1).'.'.($maxquestion[$section-1]) : 'Top', "Section $section"); &text("Question $section.$question. $line"); &call('endminorheading'); } elsif (s/^\\only +//) { @saveoutputs= @outputs; @outputs=(); for $x (split(/\s+/,$_)) { push(@outputs,$x) if grep($x eq $_, @saveoutputs); } } elsif (s/^\\endonly$//) { @outputs= @saveoutputs; } elsif (s/^\\copyto +//) { $fh= $'; while(<>) { last if m/^\\endcopy$/; while (s/^([^\`]*)\`//) { print $fh $1; m/([^\\])\`/ || warn "`$_'"; $_= $'; $cmd= $`.$1; $it= `$cmd`; chop $it; print $fh $it; } print $fh $_; } } elsif (m/\\index$/) { &call('startindex'); for $thisxr (@xrefdb) { $_= $thisxr; chop; if (m/^Q (\w+) (\d+\.\d+) (.*)$/) { $ref= $1; $num= $2; $text= $3; &call('startindexitem',$ref,"Q$num","Question $num"); &text($text); &call('endindexitem'); } elsif (m/^S (\d+) (.*)$/) { $num= $1; $text= $2; next unless $num; &call('startindexmainitem',"s_$num", "Section $num.","Section $num"); &text($text); &call('endindexitem'); } else { warn $_; } } &call('endindex'); } elsif (m/^\\call-(\w+) +(\w+)\s*(.*)$/) { $fn= $1.'_'.$2; eval { &$fn($3); }; warn $@ if length($@); } elsif (m/^\\call +(\w+)\s*(.*)$/) { eval { &call($1,$2); }; warn $@ if length($@); } elsif (s/^\\set +(\w+)\s*//) { $svalue= $'; $svari= $1; eval("\$user_$svari=\$svalue"); $@ && warn "setting $svalue failed: $@\n"; } elsif (m/^\\verbatim$/) { &call('startverbatim'); while (<>) { chop; last if m/^\\endverbatim$/; &call('verbatim',$_); } &call('endverbatim'); } else { s/\.$/\. /; &text($_." "); } } print ' 'x25,"\r"; &call('finish'); rename("$prefix.xrefdb-new","$prefix.xrefdb") || warn "rename xrefdb: $!"; exit 0; sub text { local($in,$rhs,$word,$refn,$reft,$fn,$style); $in= "$holdover$_[0]"; $holdover= ''; while ($in =~ m/\\/) { #print STDERR ">$`##$'\n"; $rhs=$'; &call('text',$`); $_= $rhs; if (m/^\w+ $/) { $holdover= "\\$&"; $in= ''; } elsif (s/^fn\s+([^\s\\]*\w)//) { $in= $_; $word= $1; &call('courier'); &call('text',$word); &call('endcourier'); } elsif (s/^tab\s+(\d+)\s+//) { $in= $_; &call('tab',$1); } elsif (s/^nl\s+//) { $in= $_; &call('newline'); } elsif (s/^qref\s+(\w+)//) { $refn= $qrefn{$1}; $reft= $qreft{$1}; if (!length($refn)) { warn "unknown question `$1'"; } $in= "$`\\pageref:$1:$refn:$reft\\endpageref.$_"; } elsif (s/^pageref:(\w+):([^:\n]+)://) { $in= $_; &call('pageref',$1,$2); } elsif (s/^endpageref\.//) { $in= $_; &call('endpageref'); } elsif (s/^(\w+)\{//) { $in= $_; $fn= $1; eval { &call("$fn"); }; if (length($@)) { warn $@; $fn= 'x'; } push(@styles,$fn); } elsif (s/^\}//) { $in= $_; $fn= pop(@styles); if ($fn ne 'x') { &call("end$fn"); } } elsif (s/^\\//) { $in= $_; &call('text',"\\"); } elsif (s,^(\w+)\s+([-A-Za-z0-9.\@:/]*\w),,) { #print STDERR "**$&**$_\n"; $in= $_; $style=$1; $word= $2; &call($style); &call('text',$word); &call("end$style"); } else { warn "unknown control `\\$_'"; $in= $_; } } &call('text',$in); } sub call { local ($fnbase, @callargs) = @_; local ($coutput); for $coutput (@outputs) { if ($fnbase eq 'text' && eval("\@${coutput}_cmds")) { #print STDERR "special handling text (@callargs) for $coutput\n"; $evstrg= "\$${coutput}_args[\$#${coutput}_args].=\"\@callargs\""; eval($evstrg); length($@) && warn "call adding for $coutput (($evstrg)): $@"; } else { $fntc= $coutput.'_'.$fnbase; &$fntc(@callargs); } } } sub recurse { local (@outputs) = $coutput; local ($holdover); &text($_[0]); } sub arg { #print STDERR "arg($_[0]) from $coutput\n"; $cmd= $_[0]; eval("push(\@${coutput}_cmds,\$cmd); push(\@${coutput}_args,'')"); length($@) && warn "arg setting up for $coutput: $@"; } sub endarg { #print STDERR "endarg($_[0]) from $coutput\n"; $evstrg= "\$${coutput}_cmd= \$cmd= pop(\@${coutput}_cmds); ". "\$${coutput}_arg= \$arg= pop(\@${coutput}_args); "; eval($evstrg); length($@) && warn "endarg extracting for $coutput (($evstrg)): $@"; #print STDERR ">call $coutput $cmd $arg< (($evstrg))\n"; $evstrg= "&${coutput}_do_${cmd}(\$arg)"; eval($evstrg); length($@) && warn "endarg running ${coutput}_do_${cmd} (($evstrg)): $@"; } ./asymptote-2.41/doc/scaledgraph.asy0000644000175000017500000000054313064427076017305 0ustar norbertnorbertimport graph; axiscoverage=0.9; size(200,IgnoreAspect); real[] x={-1e-11,1e-11}; real[] y={0,1e6}; real xscale=round(log10(max(x))); real yscale=round(log10(max(y)))-1; draw(graph(x*10^(-xscale),y*10^(-yscale)),red); xaxis("$x/10^{"+(string) xscale+"}$",BottomTop,LeftTicks); yaxis("$y/10^{"+(string) yscale+"}$",LeftRight,RightTicks(trailingzero)); ./asymptote-2.41/doc/Makefile.in0000644000175000017500000000622113064427076016356 0ustar norbertnorbertMANFILES = asy.1 xasy.1x ASYFILES = $(filter-out $(wildcard latexusage-*.asy),$(wildcard *.asy)) SOURCE = asymptote.texi version.texi options ASY = ../asy -dir ../base -config "" -render=0 DOCFILES = asymptote.pdf asy-latex.pdf CAD.pdf TeXShopAndAsymptote.pdf \ asyRefCard.pdf docdir = $(DESTDIR)@docdir@ infodir = $(DESTDIR)@infodir@ datarootdir = @datarootdir@ INSTALL = @INSTALL@ TEXI2DVI = @TEXI2DVI@ PERL5LIB = ./ export docdir infodir INSTALL PERL5LIB all: doc asy-latex.pdf: pdflatex asy-latex.dtx asymptote.sty: pdflatex asy-latex.dtx dvi: doc asymptote.dvi doc: $(DOCFILES) asy.1 faq latexusage.eps cd png && $(MAKE) all manpage: $(MANFILES) man: $(DOCFILES) manpage cd png && $(MAKE) asymptote.info faq: cd FAQ && $(MAKE) faq %.eps: %.asy $(ASY) -f eps $< %.pdf: %.asy $(ASY) -f pdf -noprc $< latexusage.dvi: latexusage.tex asymptote.sty rm -f latexusage-* rm -f latexusage.pre rm -f latexusage.aux latex latexusage $(ASY) -noprc latexusage-*.asy latex latexusage latexusage.eps: latexusage.dvi dvips -o latexusage.eps latexusage latexusage.pdf: latexusage.dvi dvipdf -P latexusage options: ../settings.cc $(ASY) -h 2>&1 | grep -iv Asymptote > options asy.1: options asy.1.begin asy.1.end cat options | grep \^- | \ sed -e "s/-\(.*\) \([a-zA-Z0-9].*\)/.TP\n.B -\1\n\2\./" | \ sed -e "/^.B/ s/-/\\\\-/g" | cat asy.1.begin - asy.1.end > asy.1 asymptote.dvi: $(SOURCE) $(ASYFILES:.asy=.eps) latexusage.pdf ln -sf asymptote.texi asymptote_.texi $(TEXI2DVI) asymptote_.texi mv asymptote_.dvi asymptote.dvi asymptote.pdf: $(SOURCE) $(ASYFILES:.asy=.pdf) latexusage.pdf $(TEXI2DVI) --pdf asymptote.texi CAD.pdf: CAD.tex CAD1.eps latex CAD latex CAD latex CAD dvipdf -P CAD TeXShopAndAsymptote.pdf: TeXShopAndAsymptote.tex latex TeXShopAndAsymptote latex TeXShopAndAsymptote dvipdf -P TeXShopAndAsymptote asyRefCard.pdf: asyRefCard.tex tex asyRefCard dvipdf -P asyRefCard clean: FORCE -rm -f asy-latex.{aux,idx,ins,log,toc} -rm -f $(ASYFILES:.asy=.pdf) -rm -f *.eps latexusage.{dvi,eps,pdf,log,aux,*.eps} latexusage-* \ latexusage.pre -rm -f \ {asymptote,asymptote_}.{aux,cp,cps,dvi,fn,info,ky,log,pg,toc,tp,vr} -rm -f asymptote_.texi -rm -f {CAD,TeXShopAndAsymptote,asyRefCard}.{aux,dvi,log,toc} -rm -f options asy.1 cd png && $(MAKE) clean install-man: ${INSTALL} -d -m 755 $(docdir) $(mandir)/man1 ${INSTALL} -p -m 644 $(DOCFILES) $(docdir) ${INSTALL} -p -m 644 $(MANFILES) $(mandir)/man1 install: man faq install-man cd png && $(MAKE) install cd FAQ && $(MAKE) install install-prebuilt: install-man options touch png/asymptote.info cd png && $(MAKE) install cd FAQ && $(MAKE) install-prebuilt install-all: $(DOCFILES) $(MANFILES) faq latexusage.eps install-man cd png && $(MAKE) install-all cd FAQ && $(MAKE) install-info uninstall: uninstall-all uninstall-all: cd png && $(MAKE) uninstall cd FAQ && $(MAKE) uninstall -cd $(mandir)/man1 && rm -f $(MANFILES) -rm -f $(addprefix $(docdir)/,$(DOCFILES)) distclean: FORCE clean -rm -f version.texi Makefile -rm -f $(DOCFILES) cd png && $(MAKE) distclean cd FAQ && $(MAKE) distclean FORCE: Makefile: Makefile.in cd ..; config.status ./asymptote-2.41/doc/secondaryaxis.csv0000644000175000017500000013731713064427076017715 0ustar norbertnorbert,"Proportion of crows",,,"Mosquitoes per crow",,, Time,Susceptible,Infectious,Dead,Larvae,Susceptible,Exposed,Infectious 0,1,0,0,,30,0.000,0.001 0.1,1.000,0.000,0.000,12.794,30.000,0.000,0.001 0.2,1.000,0.000,0.000,12.794,30.000,0.000,0.001 0.3,1.000,0.000,0.000,12.795,30.000,0.000,0.001 0.4,1.000,0.000,0.000,12.795,30.000,0.000,0.001 0.5,1.000,0.000,0.000,12.795,30.000,0.000,0.001 0.6,1.000,0.000,0.000,12.795,30.000,0.000,0.001 0.7,1.000,0.000,0.000,12.795,30.000,0.000,0.001 0.8,0.999,0.000,0.000,12.795,30.000,0.000,0.001 0.9,0.999,0.000,0.000,12.795,29.999,0.001,0.001 1,0.999,0.000,0.000,12.795,29.999,0.001,0.001 1.1,0.999,0.000,0.000,12.795,29.999,0.001,0.001 1.2,0.999,0.000,0.000,12.795,29.999,0.001,0.001 1.3,0.999,0.000,0.000,12.795,29.999,0.001,0.001 1.4,0.999,0.000,0.001,12.795,29.999,0.001,0.001 1.5,0.999,0.001,0.001,12.795,29.999,0.001,0.001 1.6,0.999,0.001,0.001,12.795,29.999,0.001,0.001 1.7,0.999,0.001,0.001,12.795,29.998,0.001,0.001 1.8,0.999,0.001,0.001,12.795,29.998,0.001,0.001 1.9,0.998,0.001,0.001,12.795,29.998,0.001,0.002 2,0.998,0.001,0.001,12.795,29.998,0.001,0.002 2.1,0.998,0.001,0.001,12.795,29.998,0.002,0.002 2.2,0.998,0.001,0.001,12.795,29.998,0.002,0.002 2.3,0.998,0.001,0.001,12.795,29.997,0.002,0.002 2.4,0.998,0.001,0.001,12.795,29.997,0.002,0.002 2.5,0.998,0.001,0.002,12.795,29.997,0.002,0.002 2.6,0.997,0.001,0.002,12.795,29.997,0.002,0.002 2.7,0.997,0.001,0.002,12.795,29.996,0.002,0.003 2.8,0.997,0.001,0.002,12.795,29.996,0.002,0.003 2.9,0.997,0.001,0.002,12.795,29.996,0.002,0.003 3,0.997,0.001,0.002,12.795,29.995,0.003,0.003 3.1,0.996,0.001,0.002,12.795,29.995,0.003,0.003 3.2,0.996,0.001,0.003,12.795,29.995,0.003,0.003 3.3,0.996,0.001,0.003,12.795,29.994,0.003,0.004 3.4,0.996,0.001,0.003,12.795,29.994,0.003,0.004 3.5,0.995,0.002,0.003,12.795,29.994,0.003,0.004 3.6,0.995,0.002,0.003,12.795,29.993,0.004,0.004 3.7,0.995,0.002,0.004,12.795,29.993,0.004,0.004 3.8,0.994,0.002,0.004,12.795,29.992,0.004,0.005 3.9,0.994,0.002,0.004,12.795,29.992,0.004,0.005 4,0.994,0.002,0.004,12.795,29.991,0.005,0.005 4.1,0.993,0.002,0.005,12.795,29.991,0.005,0.006 4.2,0.993,0.002,0.005,12.795,29.990,0.005,0.006 4.3,0.992,0.002,0.005,12.795,29.989,0.005,0.006 4.4,0.992,0.003,0.006,12.795,29.989,0.006,0.007 4.5,0.991,0.003,0.006,12.795,29.988,0.006,0.007 4.6,0.991,0.003,0.006,12.795,29.987,0.006,0.008 4.7,0.990,0.003,0.007,12.795,29.986,0.007,0.008 4.8,0.990,0.003,0.007,12.795,29.985,0.007,0.008 4.9,0.989,0.003,0.008,12.795,29.984,0.008,0.009 5,0.988,0.004,0.008,12.795,29.984,0.008,0.009 5.1,0.988,0.004,0.009,12.795,29.982,0.008,0.010 5.2,0.987,0.004,0.009,12.795,29.981,0.009,0.011 5.3,0.986,0.004,0.010,12.795,29.980,0.010,0.011 5.4,0.985,0.005,0.010,12.795,29.979,0.010,0.012 5.5,0.984,0.005,0.011,12.795,29.978,0.011,0.013 5.6,0.983,0.005,0.012,12.795,29.976,0.011,0.013 5.7,0.982,0.005,0.012,12.795,29.975,0.012,0.014 5.8,0.981,0.006,0.013,12.795,29.973,0.013,0.015 5.9,0.980,0.006,0.014,12.795,29.972,0.013,0.016 6,0.979,0.006,0.015,12.795,29.970,0.014,0.017 6.1,0.978,0.007,0.016,12.795,29.968,0.015,0.018 6.2,0.976,0.007,0.016,12.795,29.966,0.016,0.019 6.3,0.975,0.008,0.017,12.795,29.964,0.017,0.020 6.4,0.973,0.008,0.019,12.795,29.962,0.018,0.021 6.5,0.972,0.008,0.020,12.795,29.960,0.019,0.022 6.6,0.970,0.009,0.021,12.795,29.957,0.020,0.024 6.7,0.968,0.009,0.022,12.795,29.955,0.021,0.025 6.8,0.967,0.010,0.023,12.795,29.952,0.022,0.026 6.9,0.965,0.011,0.025,12.795,29.949,0.024,0.028 7,0.963,0.011,0.026,12.795,29.946,0.025,0.030 7.1,0.960,0.012,0.028,12.795,29.943,0.026,0.031 7.2,0.958,0.013,0.029,12.795,29.940,0.028,0.033 7.3,0.956,0.013,0.031,12.795,29.936,0.029,0.035 7.4,0.953,0.014,0.033,12.795,29.933,0.031,0.037 7.5,0.950,0.015,0.035,12.795,29.929,0.033,0.039 7.6,0.947,0.016,0.037,12.795,29.925,0.035,0.042 7.7,0.944,0.016,0.039,12.795,29.920,0.037,0.044 7.8,0.941,0.017,0.041,12.795,29.916,0.039,0.046 7.9,0.938,0.018,0.044,12.795,29.911,0.041,0.049 8,0.934,0.019,0.046,12.795,29.906,0.043,0.052 8.1,0.931,0.020,0.049,12.795,29.900,0.046,0.055 8.2,0.927,0.021,0.052,12.795,29.895,0.048,0.058 8.3,0.923,0.023,0.055,12.795,29.889,0.051,0.061 8.4,0.918,0.024,0.058,12.795,29.883,0.054,0.065 8.5,0.914,0.025,0.061,12.795,29.876,0.056,0.069 8.6,0.909,0.026,0.065,12.795,29.869,0.059,0.072 8.7,0.904,0.028,0.068,12.795,29.862,0.063,0.076 8.8,0.899,0.029,0.072,12.795,29.854,0.066,0.081 8.9,0.893,0.031,0.076,12.795,29.846,0.070,0.085 9,0.887,0.032,0.080,12.795,29.838,0.073,0.090 9.1,0.881,0.034,0.085,12.795,29.829,0.077,0.095 9.2,0.875,0.036,0.090,12.795,29.820,0.081,0.100 9.3,0.868,0.037,0.095,12.795,29.810,0.085,0.106 9.4,0.861,0.039,0.100,12.795,29.800,0.090,0.112 9.5,0.854,0.041,0.105,12.795,29.789,0.094,0.118 9.6,0.846,0.043,0.111,12.795,29.778,0.099,0.124 9.7,0.838,0.045,0.117,12.795,29.766,0.104,0.131 9.8,0.830,0.047,0.123,12.795,29.754,0.109,0.138 9.9,0.821,0.049,0.130,12.795,29.742,0.114,0.145 10,0.812,0.052,0.136,12.795,29.729,0.120,0.153 10.1,0.802,0.054,0.144,12.795,29.715,0.126,0.161 10.2,0.793,0.056,0.151,12.795,29.701,0.132,0.169 10.3,0.782,0.059,0.159,12.795,29.686,0.138,0.178 10.4,0.772,0.061,0.167,12.795,29.670,0.144,0.187 10.5,0.761,0.064,0.175,12.795,29.654,0.150,0.196 10.6,0.750,0.066,0.184,12.795,29.638,0.157,0.206 10.7,0.738,0.069,0.193,12.795,29.621,0.164,0.216 10.8,0.726,0.072,0.203,12.795,29.603,0.171,0.227 10.9,0.713,0.074,0.212,12.795,29.585,0.178,0.238 11,0.700,0.077,0.223,12.795,29.566,0.185,0.250 11.1,0.687,0.080,0.233,12.795,29.547,0.193,0.261 11.2,0.674,0.082,0.244,12.795,29.527,0.200,0.274 11.3,0.660,0.085,0.255,12.795,29.507,0.208,0.286 11.4,0.645,0.088,0.267,12.795,29.486,0.215,0.300 11.5,0.631,0.090,0.279,12.795,29.465,0.223,0.313 11.6,0.616,0.093,0.291,12.795,29.443,0.231,0.327 11.7,0.601,0.095,0.304,12.795,29.421,0.238,0.341 11.8,0.585,0.098,0.317,12.795,29.399,0.246,0.356 11.9,0.570,0.100,0.330,12.795,29.376,0.254,0.371 12,0.554,0.102,0.344,12.795,29.353,0.261,0.386 12.1,0.538,0.104,0.358,12.795,29.330,0.269,0.402 12.2,0.521,0.106,0.372,12.795,29.307,0.276,0.418 12.3,0.505,0.108,0.387,12.795,29.283,0.283,0.434 12.4,0.489,0.110,0.401,12.795,29.260,0.290,0.451 12.5,0.472,0.112,0.416,12.795,29.236,0.297,0.468 12.6,0.456,0.113,0.432,12.795,29.213,0.303,0.485 12.7,0.439,0.114,0.447,12.795,29.190,0.309,0.502 12.8,0.423,0.115,0.462,12.795,29.167,0.315,0.519 12.9,0.406,0.116,0.478,12.795,29.144,0.320,0.536 13,0.390,0.116,0.494,12.795,29.122,0.325,0.554 13.1,0.374,0.117,0.509,12.795,29.100,0.329,0.571 13.2,0.358,0.117,0.525,12.795,29.079,0.333,0.588 13.3,0.343,0.117,0.541,12.795,29.059,0.337,0.606 13.4,0.327,0.116,0.557,12.795,29.039,0.340,0.623 13.5,0.312,0.116,0.572,12.795,29.020,0.342,0.639 13.6,0.297,0.115,0.588,12.795,29.001,0.344,0.656 13.7,0.283,0.114,0.603,12.795,28.984,0.345,0.672 13.8,0.269,0.113,0.618,12.795,28.967,0.346,0.688 13.9,0.255,0.111,0.634,12.795,28.952,0.346,0.704 14,0.242,0.109,0.648,12.795,28.937,0.345,0.719 14.1,0.229,0.108,0.663,12.795,28.924,0.344,0.733 14.2,0.217,0.106,0.677,12.795,28.912,0.342,0.747 14.3,0.205,0.103,0.692,12.795,28.900,0.340,0.761 14.4,0.194,0.101,0.705,12.795,28.891,0.337,0.774 14.5,0.183,0.099,0.719,12.795,28.882,0.333,0.786 14.6,0.172,0.096,0.732,12.795,28.874,0.329,0.797 14.7,0.162,0.093,0.745,12.795,28.868,0.325,0.808 14.8,0.153,0.090,0.757,12.795,28.863,0.320,0.818 14.9,0.143,0.087,0.769,12.795,28.860,0.314,0.827 15,0.135,0.084,0.781,12.795,28.857,0.308,0.836 15.1,0.127,0.081,0.792,12.795,28.856,0.302,0.843 15.2,0.119,0.078,0.803,12.795,28.856,0.295,0.850 15.3,0.112,0.075,0.813,12.795,28.857,0.288,0.856 15.4,0.105,0.072,0.823,12.795,28.859,0.281,0.861 15.5,0.098,0.069,0.833,12.795,28.863,0.273,0.865 15.6,0.092,0.066,0.842,12.795,28.867,0.266,0.868 15.7,0.086,0.063,0.850,12.795,28.873,0.258,0.870 15.8,0.081,0.060,0.859,12.795,28.879,0.250,0.872 15.9,0.076,0.058,0.867,12.795,28.887,0.242,0.873 16,0.071,0.055,0.874,12.795,28.895,0.233,0.873 16.1,0.066,0.052,0.882,12.795,28.904,0.225,0.872 16.2,0.062,0.049,0.888,12.795,28.914,0.217,0.870 16.3,0.058,0.047,0.895,12.795,28.925,0.209,0.867 16.4,0.055,0.044,0.901,12.795,28.936,0.201,0.864 16.5,0.051,0.042,0.907,12.795,28.948,0.192,0.860 16.6,0.048,0.040,0.912,12.795,28.961,0.185,0.856 16.7,0.045,0.037,0.918,12.795,28.974,0.177,0.850 16.8,0.042,0.035,0.922,12.795,28.988,0.169,0.844 16.9,0.040,0.033,0.927,12.795,29.002,0.161,0.838 17,0.037,0.031,0.931,12.795,29.016,0.154,0.831 17.1,0.035,0.029,0.936,12.795,29.031,0.147,0.823 17.2,0.033,0.028,0.939,12.795,29.046,0.140,0.815 17.3,0.031,0.026,0.943,12.795,29.061,0.133,0.807 17.4,0.029,0.024,0.946,12.795,29.077,0.126,0.798 17.5,0.028,0.023,0.950,12.795,29.093,0.120,0.788 17.6,0.026,0.021,0.953,12.795,29.108,0.114,0.779 17.7,0.025,0.020,0.955,12.795,29.124,0.108,0.769 17.8,0.023,0.019,0.958,12.795,29.141,0.102,0.758 17.9,0.022,0.018,0.960,12.795,29.157,0.097,0.748 18,0.021,0.017,0.963,12.795,29.173,0.092,0.737 18.1,0.020,0.015,0.965,12.795,29.189,0.087,0.726 18.2,0.019,0.014,0.967,12.795,29.205,0.082,0.714 18.3,0.018,0.014,0.969,12.795,29.221,0.077,0.703 18.4,0.017,0.013,0.971,12.795,29.237,0.073,0.691 18.5,0.016,0.012,0.972,12.795,29.253,0.069,0.680 18.6,0.015,0.011,0.974,12.795,29.268,0.065,0.668 18.7,0.014,0.010,0.975,12.795,29.284,0.061,0.656 18.8,0.014,0.010,0.977,12.795,29.299,0.057,0.644 18.9,0.013,0.009,0.978,12.795,29.315,0.054,0.632 19,0.012,0.008,0.979,12.795,29.330,0.051,0.620 19.1,0.012,0.008,0.980,12.795,29.345,0.048,0.609 19.2,0.011,0.007,0.981,12.795,29.359,0.045,0.597 19.3,0.011,0.007,0.982,12.795,29.374,0.042,0.585 19.4,0.010,0.007,0.983,12.795,29.388,0.040,0.573 19.5,0.010,0.006,0.984,12.795,29.402,0.037,0.562 19.6,0.010,0.006,0.985,12.795,29.416,0.035,0.550 19.7,0.009,0.005,0.985,12.795,29.430,0.033,0.538 19.8,0.009,0.005,0.986,12.795,29.443,0.031,0.527 19.9,0.009,0.005,0.987,12.795,29.456,0.029,0.516 20,0.008,0.004,0.987,12.795,29.469,0.027,0.505 20.1,0.008,0.004,0.988,12.795,29.482,0.026,0.494 20.2,0.008,0.004,0.989,12.795,29.494,0.024,0.483 20.3,0.007,0.004,0.989,12.795,29.506,0.023,0.472 20.4,0.007,0.003,0.990,12.795,29.518,0.021,0.461 20.5,0.007,0.003,0.990,12.795,29.530,0.020,0.451 20.6,0.007,0.003,0.990,12.795,29.541,0.019,0.441 20.7,0.006,0.003,0.991,12.795,29.553,0.018,0.431 20.8,0.006,0.003,0.991,12.795,29.564,0.017,0.421 20.9,0.006,0.002,0.991,12.795,29.575,0.016,0.411 21,0.006,0.002,0.992,12.795,29.585,0.015,0.401 21.1,0.006,0.002,0.992,12.795,29.595,0.014,0.392 21.2,0.006,0.002,0.992,12.795,29.605,0.013,0.383 21.3,0.005,0.002,0.993,12.795,29.615,0.012,0.374 21.4,0.005,0.002,0.993,12.795,29.625,0.011,0.365 21.5,0.005,0.002,0.993,12.795,29.634,0.011,0.356 21.6,0.005,0.002,0.993,12.795,29.644,0.010,0.347 21.7,0.005,0.002,0.994,12.795,29.653,0.009,0.339 21.8,0.005,0.001,0.994,12.795,29.661,0.009,0.331 21.9,0.005,0.001,0.994,12.795,29.670,0.008,0.323 22,0.004,0.001,0.994,12.795,29.678,0.008,0.315 22.1,0.004,0.001,0.994,12.795,29.687,0.007,0.307 22.2,0.004,0.001,0.995,12.795,29.695,0.007,0.299 22.3,0.004,0.001,0.995,12.795,29.702,0.007,0.292 22.4,0.004,0.001,0.995,12.795,29.710,0.006,0.285 22.5,0.004,0.001,0.995,12.795,29.718,0.006,0.278 22.6,0.004,0.001,0.995,12.795,29.725,0.006,0.271 22.7,0.004,0.001,0.995,12.795,29.732,0.005,0.264 22.8,0.004,0.001,0.995,12.795,29.739,0.005,0.257 22.9,0.004,0.001,0.995,12.795,29.746,0.005,0.251 23,0.004,0.001,0.996,12.795,29.752,0.004,0.244 23.1,0.004,0.001,0.996,12.795,29.758,0.004,0.238 23.2,0.004,0.001,0.996,12.795,29.765,0.004,0.232 23.3,0.003,0.001,0.996,12.795,29.771,0.004,0.226 23.4,0.003,0.001,0.996,12.795,29.777,0.004,0.221 23.5,0.003,0.001,0.996,12.795,29.783,0.003,0.215 23.6,0.003,0.001,0.996,12.795,29.788,0.003,0.210 23.7,0.003,0.001,0.996,12.795,29.794,0.003,0.204 23.8,0.003,0.001,0.996,12.795,29.799,0.003,0.199 23.9,0.003,0.001,0.996,12.795,29.804,0.003,0.194 24,0.003,0.000,0.996,12.795,29.809,0.003,0.189 24.1,0.003,0.000,0.996,12.795,29.814,0.002,0.184 24.2,0.003,0.000,0.997,12.795,29.819,0.002,0.179 24.3,0.003,0.000,0.997,12.795,29.824,0.002,0.175 24.4,0.003,0.000,0.997,12.795,29.829,0.002,0.170 24.5,0.003,0.000,0.997,12.795,29.833,0.002,0.166 24.6,0.003,0.000,0.997,12.795,29.838,0.002,0.162 24.7,0.003,0.000,0.997,12.795,29.842,0.002,0.157 24.8,0.003,0.000,0.997,12.795,29.846,0.002,0.153 24.9,0.003,0.000,0.997,12.795,29.850,0.002,0.149 25,0.003,0.000,0.997,12.795,29.854,0.002,0.145 25.1,0.003,0.000,0.997,12.795,29.858,0.002,0.142 25.2,0.003,0.000,0.997,12.795,29.862,0.001,0.138 25.3,0.003,0.000,0.997,12.795,29.865,0.001,0.134 25.4,0.003,0.000,0.997,12.795,29.869,0.001,0.131 25.5,0.003,0.000,0.997,12.795,29.872,0.001,0.128 25.6,0.003,0.000,0.997,12.795,29.876,0.001,0.124 25.7,0.003,0.000,0.997,12.795,29.879,0.001,0.121 25.8,0.003,0.000,0.997,12.795,29.882,0.001,0.118 25.9,0.003,0.000,0.997,12.795,29.885,0.001,0.115 26,0.002,0.000,0.997,12.795,29.888,0.001,0.112 26.1,0.002,0.000,0.997,12.795,29.891,0.001,0.109 26.2,0.002,0.000,0.997,12.795,29.894,0.001,0.106 26.3,0.002,0.000,0.997,12.795,29.897,0.001,0.103 26.4,0.002,0.000,0.997,12.795,29.900,0.001,0.101 26.5,0.002,0.000,0.997,12.795,29.902,0.001,0.098 26.6,0.002,0.000,0.997,12.795,29.905,0.001,0.095 26.7,0.002,0.000,0.997,12.795,29.907,0.001,0.093 26.8,0.002,0.000,0.997,12.795,29.910,0.001,0.090 26.9,0.002,0.000,0.998,12.795,29.912,0.001,0.088 27,0.002,0.000,0.998,12.795,29.915,0.001,0.086 27.1,0.002,0.000,0.998,12.795,29.917,0.001,0.083 27.2,0.002,0.000,0.998,12.795,29.919,0.001,0.081 27.3,0.002,0.000,0.998,12.795,29.921,0.001,0.079 27.4,0.002,0.000,0.998,12.795,29.923,0.001,0.077 27.5,0.002,0.000,0.998,12.795,29.925,0.001,0.075 27.6,0.002,0.000,0.998,12.795,29.927,0.001,0.073 27.7,0.002,0.000,0.998,12.795,29.929,0.001,0.071 27.8,0.002,0.000,0.998,12.795,29.931,0.001,0.069 27.9,0.002,0.000,0.998,12.795,29.933,0.000,0.067 28,0.002,0.000,0.998,12.795,29.935,0.000,0.066 28.1,0.002,0.000,0.998,12.795,29.937,0.000,0.064 28.2,0.002,0.000,0.998,12.795,29.938,0.000,0.062 28.3,0.002,0.000,0.998,12.795,29.940,0.000,0.061 28.4,0.002,0.000,0.998,12.795,29.942,0.000,0.059 28.5,0.002,0.000,0.998,12.795,29.943,0.000,0.057 28.6,0.002,0.000,0.998,12.795,29.945,0.000,0.056 28.7,0.002,0.000,0.998,12.795,29.946,0.000,0.054 28.8,0.002,0.000,0.998,12.795,29.948,0.000,0.053 28.9,0.002,0.000,0.998,12.795,29.949,0.000,0.052 29,0.002,0.000,0.998,12.795,29.950,0.000,0.050 29.1,0.002,0.000,0.998,12.795,29.952,0.000,0.049 29.2,0.002,0.000,0.998,12.795,29.953,0.000,0.048 29.3,0.002,0.000,0.998,12.795,29.954,0.000,0.046 29.4,0.002,0.000,0.998,12.795,29.955,0.000,0.045 29.5,0.002,0.000,0.998,12.795,29.957,0.000,0.044 29.6,0.002,0.000,0.998,12.795,29.958,0.000,0.043 29.7,0.002,0.000,0.998,12.795,29.959,0.000,0.042 29.8,0.002,0.000,0.998,12.795,29.960,0.000,0.041 29.9,0.002,0.000,0.998,12.795,29.961,0.000,0.040 30,0.002,0.000,0.998,12.795,29.962,0.000,0.039 30.1,0.002,0.000,0.998,12.795,29.963,0.000,0.037 30.2,0.002,0.000,0.998,12.795,29.964,0.000,0.037 30.3,0.002,0.000,0.998,12.795,29.965,0.000,0.036 30.4,0.002,0.000,0.998,12.795,29.966,0.000,0.035 30.5,0.002,0.000,0.998,12.795,29.967,0.000,0.034 30.6,0.002,0.000,0.998,12.795,29.968,0.000,0.033 30.7,0.002,0.000,0.998,12.795,29.969,0.000,0.032 30.8,0.002,0.000,0.998,12.795,29.970,0.000,0.031 30.9,0.002,0.000,0.998,12.795,29.971,0.000,0.030 31,0.002,0.000,0.998,12.795,29.971,0.000,0.029 31.1,0.002,0.000,0.998,12.795,29.972,0.000,0.029 31.2,0.002,0.000,0.998,12.795,29.973,0.000,0.028 31.3,0.002,0.000,0.998,12.795,29.974,0.000,0.027 31.4,0.002,0.000,0.998,12.795,29.974,0.000,0.026 31.5,0.002,0.000,0.998,12.795,29.975,0.000,0.026 31.6,0.002,0.000,0.998,12.795,29.976,0.000,0.025 31.7,0.002,0.000,0.998,12.795,29.976,0.000,0.024 31.8,0.002,0.000,0.998,12.795,29.977,0.000,0.024 31.9,0.002,0.000,0.998,12.795,29.978,0.000,0.023 32,0.002,0.000,0.998,12.795,29.978,0.000,0.023 32.1,0.002,0.000,0.998,12.795,29.979,0.000,0.022 32.2,0.002,0.000,0.998,12.795,29.979,0.000,0.021 32.3,0.002,0.000,0.998,12.795,29.980,0.000,0.021 32.4,0.002,0.000,0.998,12.795,29.981,0.000,0.020 32.5,0.002,0.000,0.998,12.795,29.981,0.000,0.020 32.6,0.002,0.000,0.998,12.795,29.982,0.000,0.019 32.7,0.002,0.000,0.998,12.795,29.982,0.000,0.019 32.8,0.002,0.000,0.998,12.795,29.983,0.000,0.018 32.9,0.002,0.000,0.998,12.795,29.983,0.000,0.018 33,0.002,0.000,0.998,12.795,29.984,0.000,0.017 33.1,0.002,0.000,0.998,12.795,29.984,0.000,0.017 33.2,0.002,0.000,0.998,12.795,29.985,0.000,0.016 33.3,0.002,0.000,0.998,12.795,29.985,0.000,0.016 33.4,0.002,0.000,0.998,12.795,29.985,0.000,0.015 33.5,0.002,0.000,0.998,12.795,29.986,0.000,0.015 33.6,0.002,0.000,0.998,12.795,29.986,0.000,0.015 33.7,0.002,0.000,0.998,12.795,29.987,0.000,0.014 33.8,0.002,0.000,0.998,12.795,29.987,0.000,0.014 33.9,0.002,0.000,0.998,12.795,29.987,0.000,0.014 34,0.002,0.000,0.998,12.795,29.988,0.000,0.013 34.1,0.002,0.000,0.998,12.795,29.988,0.000,0.013 34.2,0.002,0.000,0.998,12.795,29.988,0.000,0.012 34.3,0.002,0.000,0.998,12.795,29.989,0.000,0.012 34.4,0.002,0.000,0.998,12.795,29.989,0.000,0.012 34.5,0.002,0.000,0.998,12.795,29.989,0.000,0.012 34.6,0.002,0.000,0.998,12.795,29.990,0.000,0.011 34.7,0.002,0.000,0.998,12.795,29.990,0.000,0.011 34.8,0.002,0.000,0.998,12.795,29.990,0.000,0.011 34.9,0.002,0.000,0.998,12.795,29.991,0.000,0.010 35,0.002,0.000,0.998,12.795,29.991,0.000,0.010 35.1,0.002,0.000,0.998,12.795,29.991,0.000,0.010 35.2,0.002,0.000,0.998,12.795,29.991,0.000,0.010 35.3,0.002,0.000,0.998,12.795,29.992,0.000,0.009 35.4,0.002,0.000,0.998,12.795,29.992,0.000,0.009 35.5,0.002,0.000,0.998,12.795,29.992,0.000,0.009 35.6,0.002,0.000,0.998,12.795,29.992,0.000,0.009 35.7,0.002,0.000,0.998,12.795,29.993,0.000,0.008 35.8,0.002,0.000,0.998,12.795,29.993,0.000,0.008 35.9,0.002,0.000,0.998,12.795,29.993,0.000,0.008 36,0.002,0.000,0.998,12.795,29.993,0.000,0.008 36.1,0.002,0.000,0.998,12.795,29.993,0.000,0.008 36.2,0.002,0.000,0.998,12.795,29.994,0.000,0.007 36.3,0.002,0.000,0.998,12.795,29.994,0.000,0.007 36.4,0.002,0.000,0.998,12.795,29.994,0.000,0.007 36.5,0.002,0.000,0.998,12.795,29.994,0.000,0.007 36.6,0.002,0.000,0.998,12.795,29.994,0.000,0.007 36.7,0.002,0.000,0.998,12.795,29.995,0.000,0.006 36.8,0.002,0.000,0.998,12.795,29.995,0.000,0.006 36.9,0.002,0.000,0.998,12.795,29.995,0.000,0.006 37,0.002,0.000,0.998,12.795,29.995,0.000,0.006 37.1,0.002,0.000,0.998,12.795,29.995,0.000,0.006 37.2,0.002,0.000,0.998,12.795,29.995,0.000,0.006 37.3,0.002,0.000,0.998,12.795,29.996,0.000,0.005 37.4,0.002,0.000,0.998,12.795,29.996,0.000,0.005 37.5,0.002,0.000,0.998,12.795,29.996,0.000,0.005 37.6,0.002,0.000,0.998,12.795,29.996,0.000,0.005 37.7,0.002,0.000,0.998,12.795,29.996,0.000,0.005 37.8,0.002,0.000,0.998,12.795,29.996,0.000,0.005 37.9,0.002,0.000,0.998,12.795,29.996,0.000,0.005 38,0.002,0.000,0.998,12.795,29.996,0.000,0.005 38.1,0.002,0.000,0.998,12.795,29.997,0.000,0.004 38.2,0.002,0.000,0.998,12.795,29.997,0.000,0.004 38.3,0.002,0.000,0.998,12.795,29.997,0.000,0.004 38.4,0.002,0.000,0.998,12.795,29.997,0.000,0.004 38.5,0.002,0.000,0.998,12.795,29.997,0.000,0.004 38.6,0.002,0.000,0.998,12.795,29.997,0.000,0.004 38.7,0.002,0.000,0.998,12.795,29.997,0.000,0.004 38.8,0.002,0.000,0.998,12.795,29.997,0.000,0.004 38.9,0.002,0.000,0.998,12.795,29.997,0.000,0.004 39,0.002,0.000,0.998,12.795,29.998,0.000,0.003 39.1,0.002,0.000,0.998,12.795,29.998,0.000,0.003 39.2,0.002,0.000,0.998,12.795,29.998,0.000,0.003 39.3,0.002,0.000,0.998,12.795,29.998,0.000,0.003 39.4,0.002,0.000,0.998,12.795,29.998,0.000,0.003 39.5,0.002,0.000,0.998,12.795,29.998,0.000,0.003 39.6,0.002,0.000,0.998,12.795,29.998,0.000,0.003 39.7,0.002,0.000,0.998,12.795,29.998,0.000,0.003 39.8,0.002,0.000,0.998,12.795,29.998,0.000,0.003 39.9,0.002,0.000,0.998,12.795,29.998,0.000,0.003 40,0.002,0.000,0.998,12.795,29.998,0.000,0.003 40.1,0.002,0.000,0.998,12.795,29.998,0.000,0.003 40.2,0.002,0.000,0.998,12.795,29.998,0.000,0.002 40.3,0.002,0.000,0.998,12.795,29.999,0.000,0.002 40.4,0.002,0.000,0.998,12.795,29.999,0.000,0.002 40.5,0.002,0.000,0.998,12.795,29.999,0.000,0.002 40.6,0.002,0.000,0.998,12.795,29.999,0.000,0.002 40.7,0.002,0.000,0.998,12.795,29.999,0.000,0.002 40.8,0.002,0.000,0.998,12.795,29.999,0.000,0.002 40.9,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41.1,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41.2,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41.3,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41.4,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41.5,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41.6,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41.7,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41.8,0.002,0.000,0.998,12.795,29.999,0.000,0.002 41.9,0.002,0.000,0.998,12.795,29.999,0.000,0.002 42,0.002,0.000,0.998,12.795,29.999,0.000,0.002 42.1,0.002,0.000,0.998,12.795,29.999,0.000,0.001 42.2,0.002,0.000,0.998,12.795,30.000,0.000,0.001 42.3,0.002,0.000,0.998,12.795,30.000,0.000,0.001 42.4,0.002,0.000,0.998,12.795,30.000,0.000,0.001 42.5,0.002,0.000,0.998,12.795,30.000,0.000,0.001 42.6,0.002,0.000,0.998,12.795,30.000,0.000,0.001 42.7,0.002,0.000,0.998,12.795,30.000,0.000,0.001 42.8,0.002,0.000,0.998,12.795,30.000,0.000,0.001 42.9,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43.1,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43.2,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43.3,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43.4,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43.5,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43.6,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43.7,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43.8,0.002,0.000,0.998,12.795,30.000,0.000,0.001 43.9,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44.1,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44.2,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44.3,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44.4,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44.5,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44.6,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44.7,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44.8,0.002,0.000,0.998,12.795,30.000,0.000,0.001 44.9,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45.1,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45.2,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45.3,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45.4,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45.5,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45.6,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45.7,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45.8,0.002,0.000,0.998,12.795,30.000,0.000,0.001 45.9,0.002,0.000,0.998,12.795,30.000,0.000,0.001 46,0.002,0.000,0.998,12.795,30.000,0.000,0.001 46.1,0.002,0.000,0.998,12.795,30.000,0.000,0.001 46.2,0.002,0.000,0.998,12.795,30.000,0.000,0.000 46.3,0.002,0.000,0.998,12.795,30.000,0.000,0.000 46.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 46.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 46.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 46.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 46.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 46.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 47.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 48.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 49.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 50.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 51.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 52.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 53.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 54.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 55.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 56.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 57.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 58.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 59.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 60.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 61.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 62.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 63.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 64.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 65.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 66.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 67.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 68.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 69.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 70.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 71.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 72.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 73.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 74.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 75.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 76.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 77.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 78.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 79.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 80.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 81.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 82.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 83.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 84.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 85.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 86.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 87.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 88.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 89.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 90.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 91.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 92.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 93.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 94.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 95.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 96.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 97.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 98.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99.1,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99.2,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99.3,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99.4,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99.5,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99.6,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99.7,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99.8,0.002,0.000,0.998,12.795,30.001,0.000,0.000 99.9,0.002,0.000,0.998,12.795,30.001,0.000,0.000 100,0.002,0.000,0.998,12.795,30.001,0.000,0.000 ./asymptote-2.41/doc/loggraph.asy0000644000175000017500000000040613064427076016631 0ustar norbertnorbertimport graph; size(200,200,IgnoreAspect); real f(real t) {return 1/t;} scale(Log,Log); draw(graph(f,0.1,10)); //limits((1,0.1),(10,0.5),Crop); dot(Label("(3,5)",align=S),Scale((3,5))); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); ./asymptote-2.41/doc/binarytreetest.asy0000644000175000017500000000046213064427076020074 0ustar norbertnorbertimport binarytree; picture pic,pic2; binarytree bt=binarytree(1,2,4,nil,5,nil,nil,0,nil,nil,3,6,nil,nil,7); draw(pic,bt,condensed=false); binarytree st=searchtree(10,5,2,1,3,4,7,6,8,9,15,13,12,11,14,17,16,18,19); draw(pic2,st,blue,condensed=true); add(pic.fit(),(0,0),10N); add(pic2.fit(),(0,0),10S); ./asymptote-2.41/doc/latexusage.tex0000644000175000017500000000604213064427076017176 0ustar norbertnorbert\documentclass[12pt]{article} % Use this form to include EPS (latex) or PDF (pdflatex) files: %\usepackage{asymptote} % Use this form with latex or pdflatex to include inline LaTeX code by default: \usepackage[inline]{asymptote} % Use this form with latex or pdflatex to create PDF attachments by default: %\usepackage[attach]{asymptote} % Enable this line to support the attach option: %\usepackage[dvips]{attachfile2} \begin{document} % Optional subdirectory for latex files (no spaces): \def\asylatexdir{} % Optional subdirectory for asy files (no spaces): \def\asydir{} \begin{asydef} // Global Asymptote definitions can be put here. import three; usepackage("bm"); texpreamble("\def\V#1{\bm{#1}}"); // One can globally override the default toolbar settings here: // settings.toolbar=true; \end{asydef} Here is a venn diagram produced with Asymptote, drawn to width 4cm: \def\A{A} \def\B{\V{B}} %\begin{figure} \begin{center} \begin{asy} size(4cm,0); pen colour1=red; pen colour2=green; pair z0=(0,0); pair z1=(-1,0); pair z2=(1,0); real r=1.5; path c1=circle(z1,r); path c2=circle(z2,r); fill(c1,colour1); fill(c2,colour2); picture intersection=new picture; fill(intersection,c1,colour1+colour2); clip(intersection,c2); add(intersection); draw(c1); draw(c2); //draw("$\A$",box,z1); // Requires [inline] package option. //draw(Label("$\B$","$B$"),box,z2); // Requires [inline] package option. draw("$A$",box,z1); draw("$\V{B}$",box,z2); pair z=(0,-2); real m=3; margin BigMargin=Margin(0,m*dot(unit(z1-z),unit(z0-z))); draw(Label("$A\cap B$",0),conj(z)--z0,Arrow,BigMargin); draw(Label("$A\cup B$",0),z--z0,Arrow,BigMargin); draw(z--z1,Arrow,Margin(0,m)); draw(z--z2,Arrow,Margin(0,m)); shipout(bbox(0.25cm)); \end{asy} %\caption{Venn diagram}\label{venn} \end{center} %\end{figure} Each graph is drawn in its own environment. One can specify the width and height to \LaTeX\ explicitly. This 3D example can be viewed interactively either with Adobe Reader or Asymptote's fast OpenGL-based renderer. To support {\tt latexmk}, 3D figures should specify \verb+inline=true+. It is sometimes desirable to embed 3D files as annotated attachments; this requires the \verb+attach=true+ option as well as the \verb+attachfile2+ \LaTeX\ package. \begin{center} \begin{asy}[height=4cm,inline=true,attach=false,viewportwidth=\linewidth] currentprojection=orthographic(5,4,2); draw(unitcube,blue); label("$V-E+F=2$",(0,1,0.5),3Y,blue+fontsize(17pt)); \end{asy} \end{center} One can also scale the figure to the full line width: \begin{center} \begin{asy}[width=\the\linewidth,inline=true] pair z0=(0,0); pair z1=(2,0); pair z2=(5,0); pair zf=z1+0.75*(z2-z1); draw(z1--z2); dot(z1,red+0.15cm); dot(z2,darkgreen+0.3cm); label("$m$",z1,1.2N,red); label("$M$",z2,1.5N,darkgreen); label("$\hat{\ }$",zf,0.2*S,fontsize(24pt)+blue); pair s=-0.2*I; draw("$x$",z0+s--z1+s,N,red,Arrows,Bars,PenMargins); s=-0.5*I; draw("$\bar{x}$",z0+s--zf+s,blue,Arrows,Bars,PenMargins); s=-0.95*I; draw("$X$",z0+s--z2+s,darkgreen,Arrows,Bars,PenMargins); \end{asy} \end{center} \end{document} ./asymptote-2.41/doc/external-proposal.html0000644000175000017500000004621513064427076020665 0ustar norbertnorbert Asymptote Proposal - External Modules

    Asymptote Proposal &mdash External Modules

    Overview

    External modules allow users to extend Asymptote by calling functions written in another programming language.

    Users do this by writing a .asyc file, which contains a mix of Asymptote code and code from another language, say C++. Then, a program is run which produces a .asy file and a C++ source file. The C++ file is compiled to produce a shared library file. Then, the .asy file can be imported in Asymptote to use the externally defined features.

    This spec is describes a proposed feature that has not yet been implemented. It is incomplete, and does not address all of the issues involved in implementing the feature.

    Example

    Let’s look at a simple example that shows off the main features. Asymptote currently doesn’t offer a way to read the contents of a directory. This would be useful if, say, we wanted to make a series of graphs for every .csv file in a directory.

    /*****
 * dir.asyc
 * Andy Hammerlindl 2007/09/11
 *
 * An example for the proposed external module support in Asymptote.  This reads
 * the contents of a directory via the POSIX commands.
 *
 * Example usage in asymptote:
 *   access dir;
 *   dir.entry[] entries= dir.open('.');
 *   for (dir.entry e : entries)
 *     write(e.name);
 *****/

// Verbatim code will appear in the c++ or asy file (as specified) interleaved
// in the same order as it appears here.
verbatim c++ {
  #include <sys/types.h>
  #include <dirent.h>
  #include <errno.h>

  // asy.h is included by default (needed for hidden code, anyway).
  // Asymptote-specific types, such as array below, are in the asy namespace.
  using namespace asy;
}

// Define a new opaque type in asy which is internally represented by struct
// dirent *.  This is too messy to expose to users of the module, so define
// everything as private.
private asytype const struct dirent *entry_t;

private int entry_d_ino(entry_t e) {
  return (Int)e->d_ino;
}

private int entry_d_off(entry_t e) {
  return (Int)e->d_off;
}

private int entry_d_reclen(entry_t e) {
  return (Int)e->reclen;
}

private string entry_d_type(entry_t e) {
  return string( /*length*/ 1, e->d_type);
}

private string entry_d_name(entry_t e) {
  return string(e->d_name);
}

// Define an asy structure to expose the information.  These steps are annoying,
// but straightforward, and not too hard to plow through.
verbatim asy {
  struct entry {
    restricted int ino;
    restricted int off;
    restricted int reclen;
    restricted int type;
    restricted string name;

    void operator init(entry_t e) {
      ino=entry_d_ino(e);
      off=entry_d_off(e);
      reclen=entry_d_reclen(e);
      type=entry_d_type(e);
      name=entry_d_name(e);
    }
  }
}


// Given the name of a directory, return an array of entries.  Return 0
// (a null array) on error.
private entry_t[] base_read(string name)
{
  DIR *dir=opendir(name.c_str());

  // TODO: Add standard style of error reporting.
  if (dir == NULL)
    return 0;

  // Create the array structure.
  // array is derived from gc, so will be automatically memory-managed.
  array *a=new array();

  struct dirent *entry;
  while (entry=readdir(dir))
    a->push<struct dirent *>(entry);

  // The loop has exited, either by error, or after reading the entire
  // directory.  Check before closedir(), in case that call resets errno.
  if (errno != 0) {
    closedir(dir);
    return 0;
  }

  closedir(dir);
  return a;
}

verbatim asy {
  private entry[] cleanEntries(entry_t[] raw_entries) {
    if (raw_entries) {
      entry[] entries;
      for (entry_t e : raw_entries)
        entries.push(entry(e));
      return entries;
    }
    return null;
  }

  entry[] read(string name) {
    return cleanEntries(base_read(name));
  }
}

    Type Mappings

    Types in Asymptote do not directly relate to types in C++, but there is a partial mapping between them. The header file asymptote.h provides typedefs for the primitive asymptote types. For instance string in Asymptote maps to the C++ class asy::string which is a variant of std::string and real to asy::real which is a basic floating point type (probably double). Because int is a reserved word in C++, the Asymptote type int is mapped to asy::Int which is one of the basic signed numeric types in C++ (currently 64 bit). asy::pair is a class that implements complex numbers. In the first version of the external module implementation, these will be the only primitive types with mappings, but eventually all of them will be added.

    All Asymptote arrays, regardless of the cell type, are mapped to asy::array * where asy::array is a C++ class. The cells of the array are of the type asy::item which can hold any Asymptote data type. Items can be constructed from any C++ type. Once constructed, the value of an item can be retrieved by the function template<typename T> T get(const item&). Calling get on an item using the wrong type generates a runtime error. 

    // Examples of using item.
item x((asy::Int)2);
item y(3.4);
item z=new array;
item w=(asy::real)3.4;

cout << get<asy::Int>(x);
cout << get<double>(y);

x=y;  // x now stores a double.
cout << get<double>(x);

cout << get<asy::real>(w);

    The asy::array class implements, at a minimum, the methods:

    • size_t size() which returns the number of elements,
    • template <typename T> T read(size_t i) const which returns the i-th element, interpreted as being of type t.
    • template <typename T> void push(item i) adds the item to the end of the array.

    It allows access to elements of the array as items by operator[]. We may specify that asy::array be a model of the Random Access Container in the C++ Standard Template Library. It is currently implemented as a subclass of an STL vector.

    // Example of a C++ function that doubles the entries in an array of integers.
using namespace asy;

void doubler(array *a) {
  assert(a);
  size_t length=a->size();
  for (size_t i=0; i<length; ++i) {
    Int x=a->read<Int>(i);  // This is shorthand for get<Int>((*a)[i]).
    a[i]=2*x;               // The type of 2*x is also Int, so this will enter
                            // the item as the proper type.
  }
}

    Users can map new Asymptote types to their own custom C++ types using Opaque Type Declarations, explained below.

    Syntactic Features

    A .asyc file is neither an asy file with some C++ in it, nor a C++ with some asy code in it. It can only contain a small number of specific constructs:

    • Comments
    • Function Definitions
    • Verbatim Code Block
    • Opaque Type Declaration

    Each component may produce code for either the .asy file, the .cc file, or both. The pieces of code produced by each construct appears in the output file in the same order as the constructs in the .asyc. For example, if a function definition occurs before a verbatim Asymptote code block, we can be sure that the function is defined and can be used in that block. Similarly, if a verbatim C++ block occurs before a function definition, then the body of the function can use features declared in the verbatim section.

    Comments

    C++/Asymptote style comments using /* */ or // are allowed at the top level. These do not affect the definition of the module, but the implementation may copy them into the .asy and .cc to help explain the resulting code.

    Verbatim Code Blocks

    Verbatim code, ie. code to be copied directly into the either the output .asy or .cc file can be specified in the .asyc file by enclosing it in a verbatim code block. This starts with the special identifier verbatim followed by either c++ or asy to specify into which file the code will be copied, and then a block of code in braces. When the .asyc file is parsed, the parser keeps track of matching open and close braces inside the verbatim code block, so that the brace at the start of the block can be matched with the one at the end. This matching process will ignore braces occuring in comments and string and character literals.

    Open issue

    It may prove to be impractical to walk through the code, matching braces. Also, this plan precludes having a verbatim block with an unbalanced number of braces which might be useful, say to start a namespace at the beginning of the C++ file, and end it at the end of the file. As such, it may be useful to have another technique. A really simple idea (with obvious drawbacks) would be to use the first closing braces that occur at the same indentation level as the verbatim keyword (assuming that the code block itself will be indented). Other alternatives are to use more complicated tokens such as %{ and %}, or the shell style <<EOF.

    Function Definitions

    A function definition given at the top level of the file (and not inside a verbatim block) looks much like a function definition in Asymptote or C++, but is actually a mix of both. The header of the function is given in Asymptote code, and defines how the function will look in the resulting Asymptote module. The body, on the other hand, is given in C++, and defines how the function is implemented in C++. As a simple example, consider: 

    real sum(real x, real y=0.0) {
  return x+y;
}

    Header

    The header of the definition gives the name, permission, return type, and parameters of the function. Because the function is defined for use in Asymptote, all of the types are given as Asymptote types.

    Permissions

    As in pure Asymptote, the function can optionally be given a private, restricted or public permission. If not specified, the permission is public by default. This is the permission that the function will have when it is part of the Asymptote module. The example of sum above specifies no permission, so it is public.

    Just as public methods such as plain.draw can be re-assigned by scripts that import the plain module, the current plan is to allow Asymptote code to modify public members of any module, including ones defined using native code. This is in contrast to builtin functions bindings, which cannot be modified.

    Return Type

    This gives the Asymptote return type of the function. This cannot be an arbitrary Asymptote type, but must one which maps to a C++ type as explained in the type mapping section above. Our example of sum gives real as a return type, which maps to the C++ type asy::real.

    Function Name

    This gives the name of the function as it will appear in the Asymptote module. In our example, the Asymptote name is sum. The name can be any Asymptote identifier, including operator names, such as operator +.

    It is important to note that the Asymptote name has no relation to the C++ name of the function, which may be something strange, such as _asy_func_modulename162. Also, the actual signature and return type of the C++ function may bear no relation to the Asymptote signature. That said, the C++ name of the function may be defined by giving the function name as asyname:cname. Then it can be referred to by other C++ code. The function will be defined with C calling convention, so that its name is not mangled.

    Formal Parameters

    The function header takes a list of formal parameters. Just as in pure Asymptote code, these can include explicit keywords, type declarations with array and functional types, and rest parameters. Just as with the return type of the function, the type of each of the parameters must map to a C++ type.

    Parameters may be given an optional Asymptote name and an optional C++ name. These may be declared in one of six ways as in the following examples:

    void f(int)
void f(int name)
void f(int :)
void f(int asyname:)
void f(int :cname)
void f(int asyname:cname)

    If the parameter just contains a type, with no identifier, then it has no Asymptote name and no C++ name. If it contains a single name (with no colon), then that name is both the Asymptote and the C++ name. If it contains a colon in the place of an identifier, with an optional name in front of the colon and an optional name behind the colon, than the name in front (if given) is the Asymptote name, and the name behind (if given) is the C++ name.

    The Asymptote name can be any Asymptote identifier, including operator names, but the C++ name must be a valid C++ identifier. For instance void f(int operator +) is not allowed, as the parameter would not have a valid C++ name. The examples void f(int operator +:) and void f(int operator +:addop) are allowed.

    When called by Asymptote code, named arguments are only matched to the Asymptote names, so for example a function defined by void f(int :x, string x:y) could be called by f(x="hi mom", 4), but one defined by void f(int x, string x:y) could not.

    Each formal parameter may take a piece of code as a default value. Because the function is implemented in C++, this code must be given as C++ code. More akin to Asymptote than C++, default arguments may occur for any non-rest parameters, not just those at the end of the list, and may refer to earlier parameters in the list. Earlier parameters are refered to by their C++ names. Example: 

    void drawbox(pair center, real width, real height=2*width, pen p)
    Default arguments are parsed by finding the next comma that is not part of a comment, string literal, or character constant, and is not nested inside parentheses. The C++ code between the equals-sign and the comma is taken as the expression for the default argument.

    Body

    The body of the function is written as C++ code. When the .asyc file is processed, this C++ code is copied verbatim into an actual C++ function providing the implementation. However, the actual body of the resultant C++ function may contain code other than the body provided by the user. This auxillary code could include instruction to retrieve the arguments of the function from their representation in the Asymptote virtual machine and bind them to local variables with their C++ names. It could also include initialization and finalization code for the function.

    In writing code for the function body, one can be assured that all function arguments with C++ names have been bound and are therefore usable in the code. Since all parameters must have Asymptote types that map to C++ types, the types of the paramaters in the body have the type resulting from that mapping.

    The return keyword can be used to return the result of the function (or without an expression, if the return type was declared as void). The Asymptote return type must map to a C++ type, and the expression given in the return statement will be implicitly cast to that type.

    Since the implementation will likely not use an actual return statement to return the value of the function back to the Asymptote virtual machine, the interpreter of the .asyc file may walk through the code converting return expressions into a special format in the actual implementation of the function.

    Opaque Type Declarations

    There are a number of mappings between Asymptote and C++ types builtin to the facility. For instance int maps to asy::Int and real to asy::real. Users, however, may want to reference other C++ objects in Asymptote code. This done though opaque type declarations.

    An opaque type declaration is given by an optional permission modifier, the keyword asytype, a C++ type, and an Asymptote identifier; in that order.

    // Examples
asytype char char;
public asytype const std::list<asy::Int> *intList;
private asytype const struct dirert *entry_t;

    This declaration mapping the Asymptote identifier to the C++ type within the module. The permission of the Asymptote type is given by the permission modifier (or public if the modifier is omitted). The type is opaque, in that none of its internal structure is revealed in the Asymptote code. Like any other type, however, objects of this new type can be returned from functions, given as an arguments to functions, and stored in variables, structures and arrays.

    In many cases, such as the directory listing example at the start, it will be practical to declare the type as private, and use an Asymptote structure as a wrapper hiding the C++ implementation.

    ./asymptote-2.41/doc/logo.asy0000644000175000017500000000115313064427076015766 0ustar norbertnorbertsize(140,80,IgnoreAspect); picture logo(pair s=0, pen q) { picture pic; pen p=linewidth(2)+fontsize(24pt)+q; real a=-0.4; real b=0.95; real y1=-5; real y2=-3y1/2; path A=(a,0){dir(10)}::{dir(89.5)}(0,y2); draw(pic,A,p); draw(pic,(0,y1){dir(88.3)}::{dir(20)}(b,0),p); real c=0.5*a; pair z=(0,2.5); label(pic,"{\it symptote}",z,0.25*E+0.169S,p); pair w=(0,1.7); draw(pic,intersectionpoint(A,w-1--w)--w,p); draw(pic,(0,y1)--(0,y2),p); draw(pic,(a,0)--(b,0),p); return shift(s)*pic; } pair z=(-0.015,0.08); for(int x=0; x < 10; ++x) add(logo(0.1*x*z,gray(0.04*x))); add(logo(red)); ./asymptote-2.41/doc/cylinderskeleton.asy0000644000175000017500000000012613064427076020403 0ustar norbertnorbertimport solids; size(0,100); revolution r=cylinder(O,1,1.5,Y+Z); draw(r,heavygreen); ./asymptote-2.41/doc/secondaryaxis.asy0000644000175000017500000000146513064427076017710 0ustar norbertnorbertimport graph; size(9cm,6cm,IgnoreAspect); string data="secondaryaxis.csv"; file in=input(data).line().csv(); string[] titlelabel=in; string[] columnlabel=in; real[][] a=in; a=transpose(a); real[] t=a[0], susceptible=a[1], infectious=a[2], dead=a[3], larvae=a[4]; real[] susceptibleM=a[5], exposed=a[6],infectiousM=a[7]; scale(true); draw(graph(t,susceptible,t >= 10 & t <= 15)); draw(graph(t,dead,t >= 10 & t <= 15),dashed); xaxis("Time ($\tau$)",BottomTop,LeftTicks); yaxis(Left,RightTicks); picture secondary=secondaryY(new void(picture pic) { scale(pic,Linear(true),Log(true)); draw(pic,graph(pic,t,infectious,t >= 10 & t <= 15),red); yaxis(pic,Right,red,LeftTicks(begin=false,end=false)); }); add(secondary); label(shift(5mm*N)*"Proportion of crows",point(NW),E); ./asymptote-2.41/doc/onecontour.asy0000644000175000017500000000016313064427076017221 0ustar norbertnorbertimport contour; size(75); real f(real a, real b) {return a^2+b^2;} draw(contour(f,(-1,-1),(1,1),new real[] {1})); ./asymptote-2.41/doc/bigdiagonal.asy0000644000175000017500000000005113064427076017262 0ustar norbertnorbertsize(0,100.5); draw((0,0)--(2,1),Arrow); ./asymptote-2.41/doc/imagecontour.asy0000644000175000017500000000155013064427076017523 0ustar norbertnorbertimport graph; import palette; import contour; size(10cm,10cm,IgnoreAspect); pair a=(0,0); pair b=(2pi,2pi); real f(real x, real y) {return cos(x)*sin(y);} int N=200; int Divs=10; int divs=2; defaultpen(1bp); pen Tickpen=black; pen tickpen=gray+0.5*linewidth(currentpen); pen[] Palette=BWRainbow(); bounds range=image(f,Automatic,a,b,N,Palette); // Major contours real[] Cvals=uniform(range.min,range.max,Divs); draw(contour(f,a,b,Cvals,N,operator --),Tickpen); // Minor contours real[] cvals; for(int i=0; i < Cvals.length-1; ++i) cvals.append(uniform(Cvals[i],Cvals[i+1],divs)[1:divs]); draw(contour(f,a,b,cvals,N,operator --),tickpen); xaxis("$x$",BottomTop,LeftTicks,above=true); yaxis("$y$",LeftRight,RightTicks,above=true); palette("$f(x,y)$",range,point(NW)+(0,0.5),point(NE)+(0,1),Top,Palette, PaletteTicks(N=Divs,n=divs,Tickpen,tickpen)); ./asymptote-2.41/doc/slopefield1.asy0000644000175000017500000000023213064427076017232 0ustar norbertnorbertimport slopefield; size(200); real func(real x) {return 2x;} add(slopefield(func,(-3,-3),(3,3),20,Arrow)); draw(curve((0,0),func,(-3,-3),(3,3)),red); ./asymptote-2.41/doc/TeXShopAndAsymptote.tex0000644000175000017500000000513513064427076020721 0ustar norbertnorbert\documentclass[11pt]{article} \usepackage{geometry} \geometry{letterpaper} \usepackage[parfill]{parskip} \usepackage{graphicx} \usepackage{amssymb} \title{Integrating Asymptote and TeXShop for Mac OS X} \author{Vishaal Rajani \& Cole Zmurchok \\ University of Alberta} \date{\today} \begin{document} \maketitle \begin{enumerate} \item Download Asymptote and place the \emph{asymptote-x.xx.src.tgz} file on the desktop. \item Open Terminal and type the following. Note that you will have to enter the root password for the final command. \begin{verbatim} cd Desktop gunzip asymptote-x.xx.src.tgz tar -xf asymptote-x.xx.src.tar cd asymptote-x.xx ./configure make all sudo make install \end{verbatim} If you get an error at the \verb+./configure+ step, stating that you there is \verb+no acceptable C+ \verb+compiler found in $PATH+, a solution is to download and install Xcode here: \\ \verb+http://developer.apple.com/TOOLS/Xcode/+. \item We now create the engine that will typeset Asymptote in TeXShop. The easiest way to create this engine, which we will call \emph{asyEngine.engine}, is to navigate to \verb+~/Library/TeXShop/Engines+ and duplicate one of the existing \emph{.engine} files. Open the duplicate file and delete the code there. Type the following: \begin{verbatim} #!/bin/sh location=$(dirname "$1") basename="${1%.tex}" #process cd $location pdflatex "$1" asy "${basename}"-*.asy pdflatex "$1" \end{verbatim} Save this file as \emph{asyEngine.engine}. \item Now we set our engine to be executable. In the terminal, navigate to the Engines directory and type: \begin{verbatim} chmod +x asyEngine.engine \end{verbatim} \item Finally, in the terminal, type: \begin{verbatim} defaults write TeXShop OtherTeXExtensions -array-add "asy" \end{verbatim} This last command allows you choose the \emph{asyEngine} option from the drop-down menu when you wish to typeset a document that includes asymptote. \end{enumerate} Now, if you wish to typeset something simple, like the following red line, create a new document in TeXShop and type: \begin{verbatim} \documentclass[letterpaper,12pt]{article} \usepackage{amsmath} \usepackage{amssymb} \usepackage{asymptote} \begin{document} \begin{asy} size(300); draw((0,0)--(1,1),red); \end{asy} \end{document} \end{verbatim} Choose the \emph{asyEngine} option from the drop-down menu and press \emph{Typeset}. Your red line will be created in a PDF Document. On a final note, it is best to avoid using filenames with spaces in them. For example, avoid filenames such as \verb+asy test.tex+ and instead use filenames without spaces, such as \verb+asyTest.tex+. \end{document} ./asymptote-2.41/doc/loggrid.asy0000644000175000017500000000057613064427076016465 0ustar norbertnorbertimport graph; size(200,200,IgnoreAspect); real f(real t) {return 1/t;} scale(Log,Log); draw(graph(f,0.1,10),red); pen thin=linewidth(0.5*linewidth()); xaxis("$x$",BottomTop,LeftTicks(begin=false,end=false,extend=true, ptick=thin)); yaxis("$y$",LeftRight,RightTicks(begin=false,end=false,extend=true, ptick=thin)); ./asymptote-2.41/doc/irregularcontour.asy0000644000175000017500000000054513064427076020440 0ustar norbertnorbertimport contour; size(200); int n=100; real f(real a, real b) {return a^2+b^2;} srand(1); real r() {return 1.1*(rand()/randMax*2-1);} pair[] points=new pair[n]; real[] values=new real[n]; for(int i=0; i < n; ++i) { points[i]=(r(),r()); values[i]=f(points[i].x,points[i].y); } draw(contour(points,values,new real[]{0.25,0.5,1},operator ..),blue); ./asymptote-2.41/doc/lineargraph.asy0000644000175000017500000000056513064427076017330 0ustar norbertnorbertimport graph; size(250,200,IgnoreAspect); real Sin(real t) {return sin(2pi*t);} real Cos(real t) {return cos(2pi*t);} draw(graph(Sin,0,1),red,"$\sin(2\pi x)$"); draw(graph(Cos,0,1),blue,"$\cos(2\pi x)$"); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks(trailingzero)); label("LABEL",point(0),UnFill(1mm)); attach(legend(),truepoint(E),20E,UnFill); ./asymptote-2.41/doc/generalaxis.asy0000644000175000017500000000042513064427076017331 0ustar norbertnorbertimport graph; size(0,100); path g=ellipse((0,0),1,2); scale(true); axis(Label("C",align=10W),g,LeftTicks(endlabel=false,8,end=false), ticklocate(0,360,new real(real v) { path h=(0,0)--max(abs(max(g)),abs(min(g)))*dir(v); return intersect(g,h)[0];})); ./asymptote-2.41/doc/asy-latex.dtx0000644000175000017500000004332513064427076016747 0ustar norbertnorbert% \iffalse % %<*internal> \begingroup % %<*batchfile> \input docstrip.tex \keepsilent \preamble ____________________________ The ASYMPTOTE package (C) 2003 Tom Prince (C) 2003-2016 John Bowman (C) 2010 Will Robertson Adapted from comment.sty Licence: GPL2+ \endpreamble \nopostamble \askforoverwritefalse \generate{\file{asymptote.sty}{\from{\jobname.dtx}{pkg}}} % %\endbatchfile %<*internal> \generate{\file{\jobname.ins}{\from{\jobname.dtx}{batchfile}}} \edef\tmpa{plain} \ifx\tmpa\fmtname\endgroup\expandafter\bye\fi \endgroup \immediate\write18{makeindex -s gind.ist -o \jobname.ind \jobname.idx} \immediate\write18{makeindex -s gglo.ist -o \jobname.gls \jobname.glo} % % %<*driver> \ProvidesFile{asy-latex.dtx} % %\ProvidesPackage{asymptote} %<*pkg> [2016/11/26 v1.33 Asymptote style file for LaTeX] % % %<*driver> \documentclass{ltxdoc} \EnableCrossrefs \CodelineIndex \begin{document} \DocInput{\jobname.dtx} \end{document} % % \fi % % \GetFileInfo{asy-latex.dtx} % \title{The \textsf{asymptote} package} % \author{% % John Bowman, Tom Prince, and Will Robertson % } % \date{\filedate\qquad\fileversion} % \maketitle % \begin{abstract} % This package provides integration of inline and external Asymptote % graphics within a \LaTeX\ document. % \end{abstract} % % \tableofcontents % % \section{Introduction} % % This is the documentation for the \LaTeX\ package \texttt{asymptote} % which accompanies the Asymptote drawing package. For further details on % Asymptote, please see its documentation in \texttt{asymptote.pdf}. % % \section{User syntax} % % \subsection{Package loading and options} % % The package may take two options at load time: \texttt{inline} or % \texttt{attach}. % These options can also be set at any time with the % \cmd\asysetup\marg{options} command, or specified individually in the % optional argument to each \texttt{asy} environment or \texttt{asyinclude} % command. % % The \texttt{inline} option uses Asymptote's `inline' mode whereby % included graphics have their labels typeset in the environment of the % document they are contained within. Otherwise the Asymptote graphics are % self-contained and their formatting is independent of the document. % % The \texttt{attach} option allows generated graphics to be embedded % within the PDF using the \texttt{attachfile2} package; please load that % package separately if you wish to use it. The \texttt{attach} option % takes precedence over the \texttt{inline} option. % % This package produces quite a number of output files, which by default % are created in the same directory as the \LaTeX\ document that is being % compiled. To keep things more tidy, you can specify an output directory % for these files by defining the \cmd\asydir\ command. For example, if you % wish to store the figure files in the subdirectory \texttt{asytmp/}, the % you would write \verb|\renewcommand\asydir{asytmp}|. % % Alternatively (and tentatively), you may write \verb|dir=asytmp| in % either the \texttt{asy} environment options or the options to % \cmd\asysetup. % % \subsection{Commands for inserting Asymptote graphics} % % The main environment defined by the package is the \texttt{asy} % environment, in which verbatim Asymptote code is placed that will be % compiled for generating a graphic in the document. For example, % \begin{verbatim} % \begin{figure} % \begin{asy}[ ] % % \end{asy} % \caption{...}\label{...} % \end{verbatim} % % If you have Asymptote code in a separate file, you can include it with % the \cmd\asyinclude\oarg{options}\marg{filename}\ command. % % For Asymptote code that should be included in \emph{every} graphic, % define it using the \texttt{asydef} environment. % % \subsection{Graphics options} % % Both the \texttt{asy} environment and the \cmd\asyinclude\ command take % optional parameters for controlling aspects of the graphics creation. In % addition to locally setting \texttt{inline} and \texttt{attach}, the % following options may also be used: % \begin{description} % \item[width] Width of the figure % \item[height] Height of the figure % \item[keepAspect] Maintain aspect ratio [default true] % \item[viewportwidth] Viewport width for 3D figures % \item[viewportheight] Viewport height for 3D figures % \end{description} % These may also be set globally using the \cmd\asysetup\ command. % % \section{Processing the document} % % After running \LaTeX\ on the document, it is necessary to process the % Asymptote graphics so they can be included in the next compilation. The % simplest procedure is a recipe such as % \begin{verbatim} % pdflatex mydoc % asy mydoc-*.asy % pdflatex mydoc % \end{verbatim} % This technique will recompile each graphic every time, however. To only % recompile graphics that have changed, use the \texttt{latexmk} % tool. Asymptote is distributed with a \texttt{latexmkrc} configuration % file; place this file in a place where \texttt{latexmk} will find it and % your document may be compiled, including the \texttt{asy} compilations, % with \texttt{latexmk mydoc} or \texttt{latexmk --pdf mydoc}. % % \section{Implementation} % % \iffalse %<*pkg> % \fi % % \begin{macrocode} \def\Asymptote{{\tt Asymptote}} % \end{macrocode} % % \begin{macrocode} \InputIfFileExists{\jobname.pre}{}{} % \end{macrocode} % % \subsection{Allocations} % % \paragraph{Allocations} % % \begin{macrocode} \newbox\ASYbox \newdimen\ASYdimen \newcounter{asy} % \end{macrocode} % % \begin{macrocode} \newwrite\AsyStream \newwrite\AsyPreStream % \end{macrocode} % % \begin{macrocode} \newif\ifASYinline \newif\ifASYattach \newif\ifASYkeepAspect \ASYkeepAspecttrue % \end{macrocode} % % \subsection{Packages} % % \begin{macrocode} \RequirePackage{keyval} \RequirePackage{ifthen} \RequirePackage{color,graphicx} % \end{macrocode} % % \paragraph{Emulating packages} % We cannot assume that Asymptote users have recent % \TeX\ distributions. (E.g., Fedora until recently still shipped teTeX.) % So load \textsf{ifpdf} and \textsf{ifxetex} if they exist; otherwise, % emulate them. % % In due course, delete this code and just load the packages. % \begin{macrocode} \IfFileExists{ifpdf.sty}{ \RequirePackage{ifpdf} }{ \expandafter\newif\csname ifpdf\endcsname \ifx\pdfoutput\@undefined\else \ifcase\pdfoutput\else \pdftrue \fi \fi } % \end{macrocode} % % \begin{macrocode} \IfFileExists{ifxetex.sty}{ \RequirePackage{ifxetex} }{ \expandafter\newif\csname ifxetex\endcsname \ifx\XeTeXversion\@undefined\else \xetextrue \fi } % \end{macrocode} % % \begin{macro}{\CatchFileDef} % Used for \cmd\asyinclude. % Note that the fallback definition is not as robust as the one provided by catchfile. % \begin{macrocode} \IfFileExists{catchfile.sty}{ \RequirePackage{catchfile} }{ \newcommand\CatchFileDef[3]{% \begingroup \everyeof{% \ENDCATCHFILEMARKER \noexpand }% \long\def\@tempa####1\ENDCATCHFILEMARKER{% \endgroup \def##1{####1}% }% ##3% \expandafter\@tempa\@@input ##2\relax } } % \end{macrocode} % \end{macro} % % \paragraph{Ensuring attachfile2 is loaded if [attach] is requested} % \begin{macrocode} \newif\if@asy@attachfile@loaded % \end{macrocode} % % \begin{macrocode} \AtBeginDocument{% \@ifpackageloaded{attachfile2}{\@asy@attachfile@loadedtrue}{}% \let\asy@check@attachfile\asy@check@attachfile@loaded } % \end{macrocode} % % \begin{macrocode} \newcommand\asy@check@attachfile@loaded{% \if@asy@attachfile@loaded\else \PackageError{asymptote}{You must load the attachfile2 package}{^^J% You have requested the [attach] option for some or all of your^^J% Asymptote graphics, which requires the attachfile2 package.^^J% Please load it in the document preamble.^^J% }% \fi } % \end{macrocode} % % \begin{macrocode} \newcommand\asy@check@attachfile{% \AtBeginDocument{\asy@check@attachfile@loaded}% \let\asy@check@attachfile\@empty } % \end{macrocode} % % \paragraph{Macros} % \begin{macrocode} \def\csarg#1#2{\expandafter#1\csname#2\endcsname} % \end{macrocode} % % \subsection{Package options} % % \begin{macrocode} \DeclareOption{inline}{% \ASYinlinetrue } \DeclareOption{attach}{% \asy@check@attachfile \ASYattachtrue } \ProcessOptions* % \end{macrocode} % % \begin{macrocode} \def\asylatexdir{} \def\asydir{} \def\ASYasydir{} \def\ASYprefix{} % \end{macrocode} % % % \subsection{Testing for PDF output} % Note this is not quite the same as \cs{ifpdf}, since we still want PDF % output when using XeTeX. % \begin{macrocode} \newif\ifASYPDF \ifxetex \ASYPDFtrue \usepackage{everypage} \else \ifpdf \ASYPDFtrue \fi \fi \ifASYPDF \def\AsyExtension{pdf} \else \def\AsyExtension{eps} \fi % \end{macrocode} % % \subsection{Bug squashing} % % \begin{macrocode} \def\unquoteJobname#1"#2"#3\relax{% \def\rawJobname{#1}% \ifx\rawJobname\empty \def\rawJobname{#2}% \fi } \expandafter\unquoteJobname\jobname""\relax % \end{macrocode} % Work around jobname bug in MiKTeX 2.5 and 2.6: % Turn stars in file names (resulting from spaces, etc.) into minus signs % \begin{macrocode} \def\fixstar#1*#2\relax{% \def\argtwo{#2}% \ifx\argtwo\empty \gdef\Jobname{#1}% \else \fixstar#1-#2\relax \fi } \expandafter\fixstar\rawJobname*\relax % \end{macrocode} % % Work around bug in dvips.def: allow spaces in file names. % \begin{macrocode} \def\Ginclude@eps#1{% \message{<#1>}% \bgroup \def\@tempa{!}% \dimen@\Gin@req@width \dimen@ii.1bp\relax \divide\dimen@\dimen@ii \@tempdima\Gin@req@height \divide\@tempdima\dimen@ii \special{PSfile=#1\space llx=\Gin@llx\space lly=\Gin@lly\space urx=\Gin@urx\space ury=\Gin@ury\space \ifx\Gin@scalex\@tempa\else rwi=\number\dimen@\space\fi \ifx\Gin@scaley\@tempa\else rhi=\number\@tempdima\space\fi \ifGin@clip clip\fi}% \egroup } % \end{macrocode} % % \subsection{Input/Output} % % \begin{macrocode} \immediate\openout\AsyPreStream=\jobname.pre\relax \AtEndDocument{\immediate\closeout\AsyPreStream} % \end{macrocode} % % \begin{macrocode} \def\WriteAsyLine#1{% \immediate\write\AsyStream{\detokenize{#1}}% } % \end{macrocode} % % \begin{macrocode} \def\globalASYdefs{} \def\WriteGlobalAsyLine#1{% \expandafter\g@addto@macro \expandafter\globalASYdefs \expandafter{\detokenize{#1^^J}}% } % \end{macrocode} % % \subsection{Commands for verbatim processing environments} % % \begin{macrocode} \def\ProcessAsymptote#1{% \begingroup \def\CurrentAsymptote{#1}% \let\do\@makeother \dospecials \@makeother\^^L% and whatever other special cases \catcode`\ =10 \endlinechar`\^^M \catcode`\^^M=12 \xAsymptote } % \end{macrocode} % Need lots of comment chars here because \meta{line end} is no longer a % space character. % \begin{macrocode} \begingroup \catcode`\^^M=12 \endlinechar=-1\relax% \gdef\xAsymptote{% \expandafter\ProcessAsymptoteLine% } \gdef\ProcessAsymptoteLine#1^^M{% \def\@tempa{#1}% {% \escapechar=-1\relax% \xdef\@tempb{\string\\end\string\{\CurrentAsymptote\string\}}% }% \ifx\@tempa\@tempb% \edef\next{\endgroup\noexpand\end{\CurrentAsymptote}}% \else% \ThisAsymptote{#1}% \let\next\ProcessAsymptoteLine% \fi% \next% } \endgroup \def\asy@init{ \def\ASYlatexdir{} \ifx\asylatexdir\empty\else \def\ASYlatexdir{\asylatexdir/}% \fi \ifx\asydir\empty\else \def\ASYasydir{\asydir/}% \fi \def\ASYprefix{\ASYlatexdir\ASYasydir}% } % \end{macrocode} % % \subsection{User interface} % % \begin{macrocode} \newcommand\asy[1][]{% \stepcounter{asy}% \setkeys{ASYkeys}{#1}% % \end{macrocode} % Disable the "inline" option if "attach" is enabled: % \begin{macrocode} \ifASYattach \ASYinlinefalse \fi % \end{macrocode} % % \begin{macrocode} \asy@init \immediate\write\AsyPreStream{% \noexpand\InputIfFileExists{% \ASYprefix\noexpand\jobname-\the\c@asy.pre}{}{}% } \asy@write@graphic@header \let\ThisAsymptote\WriteAsyLine \ProcessAsymptote{asy}% } % \end{macrocode} % % \begin{macrocode} \def\endasy{% \asy@finalise@stream \asy@input@graphic } % \end{macrocode} % % \begin{macrocode} \def\asy@write@graphic@header{% \immediate\openout\AsyStream=\ASYasydir\jobname-\the\c@asy.asy\relax \gdef\AsyFile{\ASYprefix\Jobname-\the\c@asy}% \immediate\write\AsyStream{% if(!settings.multipleView) settings.batchView=false;^^J% \ifxetex settings.tex="xelatex";^^J% \else\ifASYPDF settings.tex="pdflatex";^^J% \fi\fi \ifASYinline settings.inlinetex=true;^^J% deletepreamble();^^J% \fi defaultfilename="\Jobname-\the\c@asy";^^J% if(settings.render < 0) settings.render=4;^^J% settings.outformat="";^^J% \ifASYattach settings.inlineimage=false;^^J% settings.embed=false;^^J% settings.toolbar=true;^^J% \else settings.inlineimage=true;^^J% settings.embed=true;^^J% settings.toolbar=false;^^J% viewportmargin=(2,2);^^J% \fi \globalASYdefs }% } \def\asy@expand@keepAspect{% \ifASYkeepAspect keepAspect=true% \else keepAspect=false% \fi% } % \end{macrocode} % % \begin{macrocode} \def\asy@finalise@stream{% % \end{macrocode} % Setting \verb|size()|. Only inserted if one of the dimensions is % set explicitly (i.e., if both height and width are not empty). % \begin{macrocode} \ifx\ASYwidth\@empty \ifx\ASYheight\@empty % write nothing! \else \immediate\write\AsyStream{size(0,\ASYheight,\asy@expand@keepAspect);}% \fi \else \ifx\ASYheight\@empty \immediate\write\AsyStream{size(\ASYwidth,0,\asy@expand@keepAspect);}% \else \immediate\write\AsyStream{size(\ASYwidth,\ASYheight,\asy@expand@keepAspect);}% \fi \fi % \end{macrocode} % Setting \verb|viewportsize=()|. Same logic as for \verb|size()|. % \begin{macrocode} \ifx\ASYviewportwidth\@empty \ifx\ASYviewportheight\@empty % write nothing! \else \immediate\write\AsyStream{viewportsize=(0,\ASYviewportheight);}% \fi \else \ifx\ASYviewportheight\@empty \immediate\write\AsyStream{viewportsize=(\ASYviewportwidth,0);}% \else \immediate\write\AsyStream{% viewportsize=(\ASYviewportwidth,\ASYviewportheight);}% \fi \fi \immediate\closeout\AsyStream } % \end{macrocode} % % \begin{macrocode} \def\asy@input@graphic{% \ifASYinline \IfFileExists{"\AsyFile.tex"}{% \catcode`:=12\relax \@@input"\AsyFile.tex"\relax }{% \PackageWarning{asymptote}{file `\AsyFile.tex' not found}% }% \else \IfFileExists{"\AsyFile.\AsyExtension"}{% \ifASYattach \ifASYPDF \IfFileExists{"\AsyFile+0.pdf"}{% \setbox\ASYbox=\hbox{\includegraphics[hiresbb]{"\AsyFile+0".pdf}}% }{% \setbox\ASYbox=\hbox{\includegraphics[hiresbb]{"\AsyFile".pdf}}% }% \else \setbox\ASYbox=\hbox{\includegraphics[hiresbb]{"\AsyFile.eps"}}% \fi \textattachfile{\AsyFile.\AsyExtension}{\phantom{\copy\ASYbox}}% \vskip-\ht\ASYbox \indent \box\ASYbox \else \ifASYPDF \includegraphics[hiresbb]{"\AsyFile".pdf}% \else \includegraphics[hiresbb]{"\AsyFile.eps"}% \fi \fi }{% % \end{macrocode} % 3D PRC figures require inline mode. % \begin{macrocode} \IfFileExists{"\AsyFile.tex"}{% \catcode`:=12 \@@input"\AsyFile.tex"\relax }{% \PackageWarning{asymptote}{% file `\AsyFile.\AsyExtension' not found% }% }% }% \fi } % \end{macrocode} % % \begin{macrocode} \def\asydef{% \let\ThisAsymptote\WriteGlobalAsyLine \ProcessAsymptote{asydef}% } % \end{macrocode} % % \begin{macrocode} \newcommand\asyinclude[2][]{% \begingroup \stepcounter{asy}% \setkeys{ASYkeys}{#1}% \ifASYattach \ASYinlinefalse \fi \asy@init \immediate\write\AsyPreStream{% \noexpand\InputIfFileExists{% \ASYprefix\noexpand\jobname-\the\c@asy.pre}{}{}% }% \asy@write@graphic@header \IfFileExists{#2.asy}{% \CatchFileDef\@tempa{#2.asy}{% \let\do\@makeother \dospecials \endlinechar=10\relax }% }{% \IfFileExists{#2}{% \CatchFileDef\@tempa{#2}{% \let\do\@makeother \dospecials \endlinechar=10\relax }% }{% \PackageWarning{asymptote}{file #2 not found}% \def\@tempa{}% }% }% \immediate\write\AsyStream{\unexpanded\expandafter{\@tempa}}% \asy@finalise@stream \asy@input@graphic \endgroup } % \end{macrocode} % % \begin{macrocode} \newcommand{\ASYanimategraphics}[5][]{% \IfFileExists{_#3.pdf}{% \animategraphics[{#1}]{#2}{_#3}{#4}{#5}% }{}% } % \end{macrocode} % % \subsection{Keys for graphics processing} % % \begin{macrocode} \newcommand\asysetup[1]{\setkeys{ASYkeys}{#1}} % \end{macrocode} % % \begin{macrocode} \define@key{ASYkeys}{dir}{% \def\asydir{#1}% } \def\ASYwidth{} \define@key{ASYkeys}{width}{% \edef\ASYwidth{\the\dimexpr#1\relax}% } \def\ASYheight{} \define@key{ASYkeys}{height}{% \edef\ASYheight{\the\dimexpr#1\relax}% } \define@key{ASYkeys}{keepAspect}[true]{% \ifthenelse{\equal{#1}{true}} {\ASYkeepAspecttrue} {\ASYkeepAspectfalse}% } \def\ASYviewportwidth{} \define@key{ASYkeys}{viewportwidth}{% \edef\ASYviewportwidth{\the\dimexpr#1\relax}% } \def\ASYviewportheight{} \define@key{ASYkeys}{viewportheight}{% \edef\ASYviewportheight{\the\dimexpr#1\relax}% } % \end{macrocode} % % \begin{macrocode} \define@key{ASYkeys}{inline}[true]{% \ifthenelse{\equal{#1}{true}} {\ASYinlinetrue} {\ASYinlinefalse}% } \define@key{ASYkeys}{attach}[true]{% \ifthenelse{\equal{#1}{true}} {\ASYattachtrue} {\ASYattachfalse}% } % \end{macrocode} % % \iffalse % % \fi % % \Finale % ./asymptote-2.41/doc/Bode.asy0000644000175000017500000000124513064427076015701 0ustar norbertnorbertimport graph; texpreamble("\def\Arg{\mathop {\rm Arg}\nolimits}"); size(10cm,5cm,IgnoreAspect); real ampl(real x) {return 2.5/sqrt(1+x^2);} real phas(real x) {return -atan(x)/pi;} scale(Log,Log); draw(graph(ampl,0.01,10)); ylimits(0.001,100); xaxis("$\omega\tau_0$",BottomTop,LeftTicks); yaxis("$|G(\omega\tau_0)|$",Left,RightTicks); picture q=secondaryY(new void(picture pic) { scale(pic,Log,Linear); draw(pic,graph(pic,phas,0.01,10),red); ylimits(pic,-1.0,1.5); yaxis(pic,"$\Arg G/\pi$",Right,red, LeftTicks("$% #.1f$", begin=false,end=false)); yequals(pic,1,Dotted); }); label(q,"(1,0)",Scale(q,(1,0)),red); add(q); ./asymptote-2.41/doc/Hobbycontrol.asy0000644000175000017500000000101113064427076017463 0ustar norbertnorbertsize(200); pair z0=(0,0); pair z1=(0.5,3); pair z2=(2,1); path g=z0..z1..z2; pair d0=dir(g,0); pair d1=dir(g,1); draw(Label("$\omega_0$",1),z0-d0..z0+d0,blue+dashed,Arrow); draw(Label("$\omega_1$",1),z1-d1..z1+1.5d1,blue+dashed,Arrow); draw(z0--interp(z0,z1,1.5),dashed); draw(subpath(g,0,1),blue); draw("$\theta$",arc(z0,0.4,degrees(z1-z0),degrees(d0)),red,Arrow, EndPenMargin); draw("$\phi$",arc(z1,1.05,degrees(z1-z0),degrees(d1)),red,Arrow, EndPenMargin); dot("$z_0$",z0,SW,red); dot("$z_1$",z1,SE,red); ./asymptote-2.41/doc/knots.asy0000644000175000017500000000064113064427076016165 0ustar norbertnorbertimport syzygy; Braid initial; initial.n = 4; initial.add(bp,1); initial.add(bp,0); initial.add(bp,2); initial.add(bp,1); initial.add(phi,2); initial.add(phi,0); Syzygy pp; pp.lsym="\Phi\Phi"; pp.codename="PhiAroundPhi"; pp.number=true; pp.initial=initial; pp.apply(r4b,2,1); pp.apply(r4b,0,0); pp.apply(r4a,1,0); pp.swap(0,1); pp.apply(-r4b,1,0); pp.apply(-r4a,0,1); pp.apply(-r4a,2,0); pp.swap(4,5); pp.draw(); ./asymptote-2.41/doc/reloadpdf.tex0000644000175000017500000000054213064427076016773 0ustar norbertnorbert% Tex file for generating the reloadpdf.pdf utility to force Adobe Reader % to reload all currently loaded documents. Usage: % % pdflatex reloadpdf % acroread reloadpdf.pdf % \documentclass{article} \begin{document} \ \pdfannot width 0pt height 0pt { /AA << /PO << /S /JavaScript /JS (try{reload();} catch(e) {} closeDoc(this);) >> >> } \end{document} ./asymptote-2.41/doc/join3.asy0000644000175000017500000000067213064427076016055 0ustar norbertnorbertimport graph3; size(200); currentprojection=orthographic(500,-500,500); triple[] z=new triple[10]; z[0]=(0,100,0); z[1]=(50,0,0); z[2]=(180,0,0); for(int n=3; n <= 9; ++n) z[n]=z[n-3]+(200,0,0); path3 p=z[0]..z[1]---z[2]::{Y}z[3] &z[3]..z[4]--z[5]::{Y}z[6] &z[6]::z[7]---z[8]..{Y}z[9]; draw(p,grey+linewidth(4mm),currentlight); xaxis3(Label(XY()*"$x$",align=-3Y),red,above=true); yaxis3(Label(XY()*"$y$",align=-3X),red,above=true); ./asymptote-2.41/doc/extra/0000755000175000017500000000000013064427076015433 5ustar norbertnorbert./asymptote-2.41/doc/extra/intro.asy0000644000175000017500000006106113064427076017310 0ustar norbertnorbertorientation=Landscape; settings.tex="pdflatex"; import slide; import three; import animate; bool long=true; usepackage("mflogo"); usersetting(); viewportsize=pagewidth-2pagemargin; // To generate bibliographic references: // asy -k intro // bibtex intro_ // asy -k intro bibliographystyle("alpha"); itempen=fontsize(22pt); defaultpen(itempen); viewportmargin=(2,2); titlepage(long ? "Asymptote: The Vector Graphics Language" : "Interactive TeX-Aware 3D Vector Graphics", "John Bowman and Andy Hammerlindl", "Department of Mathematical and Statistical Sciences\\ University of Alberta\\ %and Instituto Nacional de Matem\'atica Pura e Aplicada (IMPA) \medskip\Green{Collaborators: Orest Shardt, Michail Vidiassov}", "June 30, 2010", "http://asymptote.sf.net/intro.pdf"); title("History"); item("1979: \TeX\ and \MF\ (Knuth)"); item("1986: 2D B\'ezier control point selection (Hobby)"); item("1989: MetaPost (Hobby)"); item("2004: Asymptote"); subitem("2004: initial public release (Hammerlindl, Bowman, \& Prince)"); subitem("2005: 3D B\'ezier control point selection (Bowman)"); subitem("2008: 3D interactive \TeX\ within PDF files (Shardt \& Bowman)"); subitem("2009: 3D billboard labels that always face camera (Bowman)"); subitem("2010: 3D PDF enhancements (Vidiassov \& Bowman)"); title("Statistics (as of June, 2010)"); item("Runs under Linux/UNIX, Mac OS X, Microsoft Windows."); item("4000 downloads/month from primary\hfill\\ {\tt asymptote.sourceforge.net} site alone."); item("80\ 000 lines of low-level C++ code."); item("36\ 000 lines of high-level Asymptote code."); if(long) { title("Vector Graphics"); item("Raster graphics assign colors to a grid of pixels."); figure("pixel.pdf"); item("Vector graphics are graphics which still maintain their look when inspected at arbitrarily small scales."); asyfigure(asywrite(" picture pic; path zoombox(real h) { return box((-h,-h/2),(min(10,h),min(10,h)/2)); } frame zoom(real h, real next=0) { frame f; draw(f, (0,-100){W}..{E}(0,0), Arrow); clip(f, zoombox(h)); if(next > 0) draw(f, zoombox(next)); return scale(100/h)*f; } add(zoom(100), (0,0)); add(zoom(10), (200,0)); add(zoom(1), (400,0)); ")); } title("Cartesian Coordinates"); item("Asymptote's graphical capabilities are based on four primitive commands: {\tt draw}, {\tt label}, {\tt fill}, {\tt clip} \cite{Bowman08}"); asyfilecode("diagonal"); item("units are {\tt PostScript} {\it big points\/} (1 {\tt bp} = 1/72 {\tt inch})"); item("{\tt --} means join the points with a linear segment to create a {\it path}"); item("{\it cyclic\/} path:"); asycode(" draw((0,0)--(100,0)--(100,100)--(0,100)--cycle); "); title("Scaling to a Given Size"); item("{\tt PostScript} units are often inconvenient."); item("Instead, scale user coordinates to a specified final size:"); asyfilecode("square"); item("One can also specify the size in {\tt cm}:"); asycode(" size(3cm,3cm); draw(unitsquare); "); title("Labels"); item("Adding and aligning \LaTeX\ labels is easy:"); asycode(preamble="defaultpen(fontsize("+string(fontsize(itempen))+"));", "size(6cm); draw(unitsquare); label(\"$A$\",(0,0),SW); label(\"$B$\",(1,0),SE); label(\"$C$\",(1,1),NE); label(\"$D$\",(0,1),NW); "); title("2D B\'ezier Splines"); item("Using {\tt ..} instead of {\tt --} specifies a {\it B\'ezier cubic spline}:"); code(" draw(z0 .. controls c0 and c1 .. z1,blue); "); asyfigure(asywrite("defaultpen(fontsize("+string(fontsize(itempen))+")); size(0,7cm); pair z0=(0,0); pair c0=(1,1); pair c1=(2,1); pair z1=(3,0); draw(z0..controls c0 and c1 .. z1,blue); draw(z0--c0--c1--z1,dashed); dot(\"$z_0$\",z0,W,red); dot(\"$c_0$\",c0,NW,red); dot(\"$c_1$\",c1,NE,red); dot(\"$z_1$\",z1,red); ")); equation("(1-t)^3 z_0+3t(1-t)^2 c_0+3t^2(1-t) c_1+t^3 z_1, \qquad t\in [0,1]."); title("Smooth Paths"); item("Asymptote can choose control points for you, using the algorithms of Hobby and Knuth \cite{Hobby86,Knuth86b}:"); string bean=" pair[] z={(0,0), (0,1), (2,1), (2,0), (1,0)}; "; asycode(preamble="size(130,0);",bean+" draw(z[0]..z[1]..z[2]..z[3]..z[4]..cycle, grey+linewidth(5)); dot(z,linewidth(7)); "); item("First, linear equations involving the curvature are solved to find the direction through each knot. Then, control points along those directions are chosen:"); asyfigure(asywrite(preamble="size(130,0);",bean+" path p=z[0]..z[1]..z[2]..z[3]..z[4]..cycle; dot(z); draw(p,lightgrey+linewidth(5)); dot(z); picture output; save(); for(int i=0; i0$ and a shift $b$ so that all of the coordinates when transformed will lie in the interval $[0,S]$."); item("That is, if $u$ and $t$ are the user and truesize components:"); equation("0\le au+t+b \le S."); item("Maximize the variable $a$ subject to a number of inequalities."); item("Use the simplex method to solve the resulting linear programming problem."); if(long) { title("Sizing"); item("Every addition of a coordinate $(t,u)$ adds two restrictions"); equation("au+t+b\ge 0,"); equation("au+t+b\le S,"); remark("and each drawing component adds two coordinates."); item("A figure could easily produce thousands of restrictions, making the simplex method impractical."); item("Most of these restrictions are redundant, however. For instance, with concentric circles, only the largest circle needs to be accounted for."); asyfigure(asywrite(" import palette; size(160,0); pen[] p=Rainbow(NColors=11); for(int i=1; i<10; ++i) { draw(scale(i)*unitcircle, p[i]+linewidth(2)); } ")); title("Redundant Restrictions"); item("In general, if $u\le u'$ and $t\le t'$ then"); equation("au+t+b\le au'+t'+b"); remark("for all choices of $a>0$ and $b$, so"); equation("0\le au+t+b\le au'+t'+b\le S."); item("This defines a partial ordering on coordinates. When sizing a picture, the program first computes which coordinates are maximal (or minimal) and only sends effective constraints to the simplex algorithm."); item("In practice, the linear programming problem will have less than a dozen restraints."); item("All picture sizing is implemented in Asymptote code."); } title("Infinite Lines"); item("Deferred drawing allows us to draw infinite lines."); code("drawline(P, Q);"); asyfigure("elliptic","height=12cm"); title("Helpful Math Notation"); item("Integer division returns a {\tt real}. Use {\tt quotient} for an integer result:"); code("3/4 == 0.75 quotient(3,4) == 0"); item("Caret for real and integer exponentiation:"); code("2^3 2.7^3 2.7^3.2"); item("Many expressions can be implicitly scaled by a numeric constant:"); code("2pi 10cm 2x^2 3sin(x) 2(a+b)"); item("Pairs are complex numbers:"); code("(0,1)*(0,1) == (-1,0)"); title("Function Calls"); item("Functions can take default arguments in any position. Arguments are matched to the first possible location:"); string unitsize="unitsize(0.65cm);"; string preamble="void drawEllipse(real xsize=1, real ysize=xsize, pen p=blue) { draw(xscale(xsize)*yscale(ysize)*unitcircle, p); } "; asycode(preamble=unitsize,preamble+" drawEllipse(2); drawEllipse(red); "); item("Arguments can be given by name:"); asycode(preamble=unitsize+preamble," drawEllipse(xsize=2, ysize=1); drawEllipse(ysize=2, xsize=3, green); "); if(long) { title("Rest Arguments"); item("Rest arguments allow one to write a function that takes an arbitrary number of arguments:"); code(" int sum(... int[] nums) { int total=0; for(int i=0; i < nums.length; ++i) total += nums[i]; return total; } sum(1,2,3,4); // returns 10 sum(); // returns 0 sum(1,2,3 ... new int[] {4,5,6}); // returns 21 int subtract(int start ... int[] subs) { return start - sum(... subs); } "); } title("High-Order Functions"); item("Functions are first-class values. They can be passed to other functions:"); code("import graph; real f(real x) { return x*sin(10x); } draw(graph(f,-3,3,300),red);"); asyfigure(asywrite(" import graph; size(300,0); real f(real x) { return x*sin(10x); } draw(graph(f,-3,3,300),red); ")); if(long) { title("Higher-Order Functions"); item("Functions can return functions:"); equation("f_n(x)=n\sin\left(\frac{x}{n}\right)."); skip(); string preamble=" import graph; size(300,0); "; string graphfunc2=" typedef real func(real); func f(int n) { real fn(real x) { return n*sin(x/n); } return fn; } func f1=f(1); real y=f1(pi); for(int i=1; i<=5; ++i) draw(graph(f(i),-10,10),red); "; code(graphfunc2); string name=asywrite(graphfunc2,preamble=preamble); asy(nativeformat(),name+".asy"); label(graphic(name+"."+nativeformat()),(0.5,0), Fill(figureborder,figuremattpen)); title("Anonymous Functions"); item("Create new functions with {\tt new}:"); code(" path p=graph(new real (real x) { return x*sin(10x); },-3,3,red); func f(int n) { return new real (real x) { return n*sin(x/n); }; }"); item("Function definitions are just syntactic sugar for assigning function objects to variables."); code(" real square(real x) { return x^2; } "); remark("is equivalent to"); code(" real square(real x); square=new real (real x) { return x^2; }; "); title("Structures"); item("As in other languages, structures group together data."); code(" struct Person { string firstname, lastname; int age; } Person bob=new Person; bob.firstname=\"Bob\"; bob.lastname=\"Chesterton\"; bob.age=24; "); item("Any code in the structure body will be executed every time a new structure is allocated..."); code(" struct Person { write(\"Making a person.\"); string firstname, lastname; int age=18; } Person eve=new Person; // Writes \"Making a person.\" write(eve.age); // Writes 18. "); title("Modules"); item("Function and structure definitions can be grouped into modules:"); code(" // powers.asy real square(real x) { return x^2; } real cube(real x) { return x^3; } "); remark("and imported:"); code(" import powers; real eight=cube(2.0); draw(graph(powers.square, -1, 1)); "); } title("Object-Oriented Programming"); item("Functions are defined for each instance of a structure."); code(" struct Quadratic { real a,b,c; real discriminant() { return b^2-4*a*c; } real eval(real x) { return a*x^2 + b*x + c; } } "); item("This allows us to construct ``methods'' which are just normal functions declared in the environment of a particular object:"); code(" Quadratic poly=new Quadratic; poly.a=-1; poly.b=1; poly.c=2; real f(real x)=poly.eval; real y=f(2); draw(graph(poly.eval, -5, 5)); "); title("Specialization"); item("Can create specialized objects just by redefining methods:"); code(" struct Shape { void draw(); real area(); } Shape rectangle(real w, real h) { Shape s=new Shape; s.draw = new void () { fill((0,0)--(w,0)--(w,h)--(0,h)--cycle); }; s.area = new real () { return w*h; }; return s; } Shape circle(real radius) { Shape s=new Shape; s.draw = new void () { fill(scale(radius)*unitcircle); }; s.area = new real () { return pi*radius^2; } return s; } "); title("Overloading"); item("Consider the code:"); code(" int x1=2; int x2() { return 7; } int x3(int y) { return 2y; } write(x1+x2()); // Writes 9. write(x3(x1)+x2()); // Writes 11. "); title("Overloading"); item("{\tt x1}, {\tt x2}, and {\tt x3} are never used in the same context, so they can all be renamed {\tt x} without ambiguity:"); code(" int x=2; int x() { return 7; } int x(int y) { return 2y; } write(x+x()); // Writes 9. write(x(x)+x()); // Writes 11. "); item("Function definitions are just variable definitions, but variables are distinguished by their signatures to allow overloading."); title("Operators"); item("Operators are just syntactic sugar for functions, and can be addressed or defined as functions with the {\tt operator} keyword."); code(" int add(int x, int y)=operator +; write(add(2,3)); // Writes 5. // Don't try this at home. int operator +(int x, int y) { return add(2x,y); } write(2+3); // Writes 7. "); item("This allows operators to be defined for new types."); title("Operators"); item("Operators for constructing paths are also functions:"); code("a.. controls b and c .. d--e"); remark("is equivalent to"); code( "operator --(operator ..(a, operator controls(b,c), d), e)"); item("This allowed us to redefine all of the path operators for 3D paths."); title("Summary"); item("Asymptote:"); subitem("uses IEEE floating point numerics;"); subitem("uses C++/Java-like syntax;"); subitem("supports deferred drawing for automatic picture sizing;"); subitem("supports Grayscale, RGB, CMYK, and HSV colour spaces;"); subitem("supports PostScript shading, pattern fills, and function shading;"); subitem("can fill nonsimply connected regions;"); subitem("generalizes MetaPost path construction algorithms to 3D;"); subitem("lifts \TeX\ to 3D;"); subitem("supports 3D billboard labels and PDF grouping."); bibliography("../examples/refs"); viewportmargin=(2,2); viewportsize=0; defaultpen(0.5); title("\mbox{Asymptote: 2D \& 3D Vector Graphics Language}"); asyinclude("../examples/logo3"); skip(); center("\tt http://asymptote.sf.net"); center("(freely available under the LGPL license)"); // LocalWords: pdflatex mflogo viewportsize pagewidth pagemargin goysr bibtex // LocalWords: itempen defaultrender medskip Orest Shardt Vidiassov MF ezier // LocalWords: Hammerlindl MetaPost PDF hfill LGPL pdf asywrite zoombox LaTeX // LocalWords: asyfilecode PostScript asycode unitsquare beziercurve grey bw // LocalWords: lightgrey zerowinding evenodd sw unitsize drawEllipse nums fn // LocalWords: frac graphfunc func nativeformat figureborder figuremattpen bt // LocalWords: firstname lastname eval eetomumu binarytree filecode datagraph // LocalWords: lineargraph filegraph loggraph secondaryaxis imagecontour ij // LocalWords: tridiagonal Hobbydir nonumber Hobbycontrol th viewportmargin // LocalWords: asyinclude dotpen wheelpoint yequals xaxis yaxis cardsize mc // LocalWords: polargraph filldraw addPoint lightblue truesize le au NColors // LocalWords: drawline unityroot mult oct intang IEEE numerics HSV colour // LocalWords: nonsimply ./asymptote-2.41/doc/errorbars.asy0000644000175000017500000000162013064427076017026 0ustar norbertnorbertimport graph; picture pic; real xsize=200, ysize=140; size(pic,xsize,ysize,IgnoreAspect); pair[] f={(5,5),(50,20),(90,90)}; pair[] df={(0,0),(5,7),(0,5)}; errorbars(pic,f,df,red); draw(pic,graph(pic,f),"legend", marker(scale(0.8mm)*unitcircle,red,FillDraw(blue),above=false)); scale(pic,true); xaxis(pic,"$x$",BottomTop,LeftTicks); yaxis(pic,"$y$",LeftRight,RightTicks); add(pic,legend(pic),point(pic,NW),20SE,UnFill); picture pic2; size(pic2,xsize,ysize,IgnoreAspect); frame mark; filldraw(mark,scale(0.8mm)*polygon(6),green,green); draw(mark,scale(0.8mm)*cross(6),blue); draw(pic2,graph(pic2,f),marker(mark,markuniform(5))); scale(pic2,true); xaxis(pic2,"$x$",BottomTop,LeftTicks); yaxis(pic2,"$y$",LeftRight,RightTicks); yequals(pic2,55.0,red+Dotted); xequals(pic2,70.0,red+Dotted); // Fit pic to W of origin: add(pic.fit(),(0,0),W); // Fit pic2 to E of (5mm,0): add(pic2.fit(),(5mm,0),E); ./asymptote-2.41/doc/axis3.asy0000644000175000017500000000036613064427076016062 0ustar norbertnorbertimport graph3; size(0,200); size3(200,IgnoreAspect); currentprojection=perspective(5,2,2); scale(Linear,Linear,Log); xaxis3("$x$",0,1,red,OutTicks(2,2)); yaxis3("$y$",0,1,red,OutTicks(2,2)); zaxis3("$z$",1,30,red,OutTicks(beginlabel=false)); ./asymptote-2.41/doc/diatom.asy0000644000175000017500000000550213064427076016305 0ustar norbertnorbertimport graph; size(15cm,12cm,IgnoreAspect); real minpercent=20; real ignorebelow=0; string data="diatom.csv"; string[] group; int[] begin,end; defaultpen(fontsize(8pt)+overwrite(MoveQuiet)); file in=input(data).line().csv(); string depthlabel=in; string yearlabel=in; string[] taxa=in; group=in; begin=in; real[] depth; int[] year; real[][] percentage; while(true) { real d=in; if(eof(in)) break; depth.push(d); year.push(in); percentage.push(in); } percentage=transpose(percentage); real depthmin=-min(depth); real depthmax=-max(depth); int n=percentage.length; int final; for(int taxon=0; taxon < n; ++taxon) { real[] P=percentage[taxon]; if(max(P) < ignorebelow) continue; final=taxon; } real angle=45; real L=3cm; pair Ldir=L*dir(angle); real ymax=-infinity; real margin=labelmargin(); real location=0; for(int i=0; i < begin.length-1; ++i) end[i]=begin[i+1]-1; end[begin.length-1]=n-1; typedef void drawfcn(frame f); drawfcn[] draw=new drawfcn[begin.length]; pair z0; for(int taxon=0; taxon < n; ++taxon) { real[] P=percentage[taxon]; real maxP=max(P); if(maxP < ignorebelow) continue; picture pic; real x=1; if(maxP < minpercent) x=minpercent/maxP; if(maxP > 100) x=50/maxP; scale(pic,Linear(true,x),Linear(-1)); filldraw(pic,(0,depthmin)--graph(pic,P,depth)--(0,depthmax)--cycle, gray(0.9)); xaxis(pic,Bottom,LeftTicks("$%.3g$",beginlabel=false,0,2),above=true); xaxis(pic,Top,above=true); frame label; label(label,rotate(angle)*TeXify(taxa[taxon]),(0,0),N); pair z=point(pic,N); pair v=max(label); int taxon=taxon; pic.add(new void(frame f, transform t) { pair z1=t*z+v; ymax=max(ymax,z1.y+margin); }); for(int i=0; i < begin.length; ++i) { pair z=point(pic,N); pair v=max(label); if(taxon == begin[i]) { pic.add(new void(frame f, transform t) { pair Z=t*z+v; z0=Z; pair w0=Z+Ldir; }); } else if(taxon == end[i]) { int i=i; pair align=2N; pic.add(new void(frame, transform t) { pair z0=z0; pair z1=t*z+v; pair w1=z1+Ldir; draw[i]=new void(frame f) { path g=z0--(z0.x+(ymax-z0.y)/Tan(angle),ymax)-- (z1.x+(ymax-z1.y)/Tan(angle),ymax)--z1; draw(f,g); label(f,group[i],point(g,1.5),align); }; }); } } add(pic,label,point(pic,N)); if(taxon == 0) yaxis(pic,depthlabel,Left,RightTicks(0,10),above=true); if(taxon == final) yaxis(pic,Right,LeftTicks("%",0,10),above=true); add(shift(location,0)*pic); location += pic.userMax().x; } add(new void(frame f, transform) { for(int i=0; i < draw.length; ++i) draw[i](f); }); for(int i=0; i < year.length; ++i) if(year[i] != 0) label((string) year[i],(location,-depth[i]),E); label("\%",(0.5*location,point(S).y),5*S); ./asymptote-2.41/doc/Hobbydir.asy0000644000175000017500000000076413064427076016577 0ustar norbertnorbertsize(200); pair z0=(0,0); pair z1=(1,2); pair z2=(2,1); path g=z0..z1..z2; label("$\ell_k$",z0--z1); draw("$\ell_{k+1}$",z1--z2,dashed); draw(z0--interp(z0,z1,1.5),dashed); pair d1=dir(g,1); draw(z1-d1..z1+d1,blue+dashed); draw(g,blue); draw(Label("$\theta_k$",0.4),arc(z1,0.4,degrees(z2-z1),degrees(d1)),blue,Arrow, EndPenMargin); draw("$\phi_k$",arc(z1,0.4,degrees(d1),degrees(z1-z0),CCW),Arrow, EndPenMargin); dot("$z_{k-1}$",z0,red); dot("$z_k$",z1,NW,red); dot("$z_{k+1}$",z2,red); ./asymptote-2.41/doc/triangulate.asy0000644000175000017500000000061413064427076017346 0ustar norbertnorbertsize(200); int np=100; pair[] points; real r() {return 1.2*(rand()/randMax*2-1);} for(int i=0; i < np; ++i) points.push((r(),r())); int[][] trn=triangulate(points); for(int i=0; i < trn.length; ++i) { draw(points[trn[i][0]]--points[trn[i][1]]); draw(points[trn[i][1]]--points[trn[i][2]]); draw(points[trn[i][2]]--points[trn[i][0]]); } for(int i=0; i < np; ++i) dot(points[i],red); ./asymptote-2.41/doc/exp.asy0000644000175000017500000000031213064427076015616 0ustar norbertnorbertimport graph; size(150,0); real f(real x) {return exp(x);} pair F(real x) {return (x,f(x));} xaxis("$x$"); yaxis("$y$",0); draw(graph(f,-4,2,operator ..),red); labely(1,E); label("$e^x$",F(1),SE); ./asymptote-2.41/doc/leastsquares.dat0000644000175000017500000001425613064427076017526 0ustar norbertnorbert1 3825 2 4057 3 4217 4 4278 5 4353 6 4483 7 4410 8 4462 9 4626 10 4511 11 4531 12 4450 13 4354 14 4402 15 4489 16 4441 17 4366 18 4443 19 4442 20 4335 21 4292 22 4458 23 4444 24 4426 25 4310 26 4264 27 4263 28 4252 29 4330 30 4304 31 4242 32 4272 33 4284 34 4198 35 4242 36 4096 37 4142 38 4248 39 4186 40 4210 41 4125 42 4134 43 4098 44 4129 45 3960 46 4012 47 4079 48 4038 49 4024 50 3949 51 3996 52 3970 53 4031 54 3895 55 3806 56 3825 57 3850 58 3742 59 3678 60 3589 61 3648 62 3476 63 3490 64 3353 65 3270 66 3134 67 3018 68 2922 69 2801 70 2691 71 2528 72 2460 73 2254 74 2105 75 2009 76 1854 77 1677 78 1562 79 1501 80 1399 81 1244 82 1160 83 1080 84 963 85 879 86 797 87 745 88 701 89 634 90 554 91 532 92 549 93 521 94 466 95 460 96 435 97 412 98 376 99 367 100 350 101 360 102 321 103 302 104 291 105 273 106 261 107 255 108 231 109 245 110 252 111 236 112 227 113 207 114 196 115 199 116 211 117 232 118 220 119 214 120 229 121 213 122 208 123 196 124 218 125 196 126 192 127 178 128 177 129 178 130 179 131 170 132 173 133 170 134 150 135 144 136 149 137 145 138 145 139 139 140 147 141 140 142 128 143 133 144 156 145 136 146 164 147 152 148 140 149 141 150 112 151 108 152 110 153 133 154 118 155 113 156 113 157 108 158 88 159 109 160 97 161 99 162 94 163 97 164 104 165 105 166 118 167 108 168 130 169 126 170 114 171 112 172 107 173 96 174 96 175 102 176 85 177 89 178 93 179 96 180 101 181 82 182 97 183 96 184 94 185 97 186 85 187 79 188 72 189 75 190 63 191 65 192 62 193 54 194 53 195 49 196 55 197 48 198 53 199 46 200 50 201 48 202 50 203 51 204 50 205 49 206 46 207 47 208 44 209 42 210 47 211 45 212 44 213 46 214 43 215 40 216 42 217 41 218 40 219 43 220 41 221 42 222 43 223 40 224 42 225 39 226 41 227 42 228 44 229 40 230 40 231 35 232 38 233 37 234 36 235 34 236 34 237 34 238 36 239 36 240 36 241 37 242 37 243 37 244 36 245 36 246 45 247 43 248 43 249 43 250 49 251 58 252 48 253 50 254 56 255 51 256 50 257 55 258 64 259 55 260 49 261 36 262 36 263 40 264 49 265 37 266 35 267 35 268 33 269 33 270 39 271 35 272 34 273 36 274 32 275 37 276 31 277 31 278 32 279 30 280 32 281 29 282 31 283 30 284 30 285 28 286 27 287 26 288 24 289 25 290 28 291 30 292 29 293 27 294 27 295 27 296 26 297 26 298 28 299 27 300 24 301 22 302 27 303 26 304 25 305 25 306 25 307 26 308 28 309 26 310 25 311 24 312 26 313 25 314 23 315 25 316 24 317 23 318 23 319 24 320 23 321 24 322 22 323 24 324 24 325 24 326 23 327 25 328 24 329 22 330 22 331 23 332 23 333 23 334 21 335 19 336 20 337 22 338 26 339 25 340 24 341 22 342 22 343 23 344 23 345 23 346 20 347 21 348 20 349 21 350 25 351 22 352 22 353 21 354 24 355 24 356 22 357 23 358 26 359 24 360 23 361 22 362 26 363 30 364 27 365 25 366 26 367 26 368 25 369 24 370 24 371 22 372 21 373 20 374 20 375 19 376 20 377 21 378 20 379 20 380 19 381 19 382 19 383 19 384 20 385 20 386 19 387 20 388 20 389 20 390 17 391 18 392 16 393 18 394 32 395 31 396 47 397 57 398 64 399 34 400 42 401 40 402 41 403 35 404 26 405 25 406 25 407 36 408 42 409 55 410 75 411 94 412 87 413 97 414 95 415 101 416 70 417 66 418 66 419 73 420 77 421 89 422 79 423 63 424 66 425 71 426 70 427 49 428 46 429 46 430 43 431 49 432 48 433 44 434 36 435 33 436 28 437 29 438 32 439 31 440 29 441 28 442 29 443 31 444 31 445 33 446 33 447 39 448 44 449 37 450 58 451 64 452 38 453 31 454 36 455 33 456 29 457 34 458 28 459 27 460 23 461 31 462 26 463 21 464 23 465 26 466 21 467 21 468 24 469 24 470 24 471 24 472 26 473 23 474 26 475 20 476 21 477 25 478 21 479 22 480 22 481 23 482 22 483 23 484 22 485 20 486 22 487 20 488 22 489 20 490 24 491 20 492 22 493 19 494 19 495 20 496 19 497 18 498 18 499 17 500 16 501 16 502 17 503 17 504 16 505 17 506 16 507 16 508 16 509 17 510 18 511 17 512 16 513 17 514 16 515 16 516 16 517 17 518 16 519 16 520 16 521 16 522 16 523 16 524 16 525 16 526 16 527 17 528 17 529 18 530 17 531 16 532 15 533 15 534 15 535 15 536 16 537 17 538 16 539 18 540 17 541 17 542 15 543 15 544 15 545 16 546 15 547 15 548 15 549 15 550 15 551 14 552 14 553 14 554 14 555 14 556 14 557 14 558 15 559 14 560 16 561 15 562 16 563 17 564 15 565 14 566 17 567 18 568 17 569 16 570 17 571 14 572 15 573 15 574 15 575 14 576 15 577 14 578 14 579 13 580 13 581 13 582 13 583 13 584 12 585 12 586 13 587 12 588 12 589 12 590 13 591 15 592 16 593 14 594 13 595 14 596 13 597 13 598 13 599 13 600 14 601 13 602 13 603 13 604 14 605 15 606 15 607 15 608 15 609 15 610 15 611 15 612 15 613 15 614 15 615 15 616 14 617 14 618 14 619 14 620 14 621 14 622 14 623 15 624 15 625 15 626 14 627 15 628 14 629 14 630 14 631 14 632 14 633 14 634 13 635 13 636 13 637 13 638 13 639 13 640 13 641 13 642 13 643 13 644 13 645 13 646 13 647 13 648 13 649 13 650 13 651 13 652 13 653 13 654 13 655 13 656 13 657 13 658 13 659 13 660 13 661 13 662 13 663 13 664 13 665 13 666 13 667 13 668 13 669 13 670 13 671 13 672 13 673 13 674 13 675 13 676 13 677 13 678 13 679 12 680 12 681 13 682 13 683 13 684 13 685 12 686 12 687 13 688 13 689 13 690 13 691 13 692 13 693 13 694 13 695 13 696 13 697 13 698 13 699 13 700 13 701 13 702 13 703 13 704 13 705 13 706 13 707 13 708 13 709 13 710 13 711 13 712 13 713 13 714 13 715 13 716 13 717 13 718 13 719 13 720 13 721 13 722 13 723 13 724 13 725 13 726 13 727 13 728 13 729 13 730 13 731 13 732 13 733 13 734 13 735 13 736 13 737 13 738 13 739 13 740 13 741 13 742 13 743 13 744 13 745 13 746 13 747 13 748 13 749 13 750 13 751 13 752 13 753 13 754 13 755 12 756 12 757 12 758 12 759 11 760 12 761 11 762 12 763 11 764 12 765 12 766 12 767 12 768 14 769 14 770 14 771 14 772 12 773 12 774 12 775 13 776 13 777 13 778 12 779 13 780 13 781 13 782 13 783 13 784 13 785 12 786 11 787 11 788 11 789 12 790 13 791 13 792 13 793 12 794 13 795 13 796 13 797 13 798 13 799 12 800 12 801 12 802 12 803 12 804 12 805 11 806 11 807 11 808 12 809 13 810 13 811 12 812 12 813 12 814 12 815 12 816 12 817 12 818 12 819 12 820 13 821 13 822 13 823 13 824 12 825 13 826 12 827 13 828 13 829 13 830 13 831 12 832 12 833 12 834 13 835 13 836 12 837 9 838 9 839 10 840 10 841 11 842 11 843 11 844 12 845 12 846 11 847 12 848 12 849 12 850 12 851 12 852 12 853 12 854 12 855 12 856 11 857 10 858 11 859 12 860 11 861 11 862 11 863 10 864 10 865 10 866 11 867 10 868 10 869 10 870 11 871 11 872 12 873 12 874 12 875 12 876 12 877 12 878 12 879 12 880 12 881 0 882 0 ./asymptote-2.41/doc/log2graph.asy0000644000175000017500000000064713064427076016722 0ustar norbertnorbertimport graph; size(200,IgnoreAspect); // Base-2 logarithmic scale on y-axis: real log2(real x) {static real log2=log(2); return log(x)/log2;} real pow2(real x) {return 2^x;} scaleT yscale=scaleT(log2,pow2,logarithmic=true); scale(Linear,yscale); real f(real x) {return 1+x^2;} draw(graph(f,-4,4)); yaxis("$y$",ymin=1,ymax=f(5),RightTicks(Label(Fill(white))),EndArrow); xaxis("$x$",xmin=-5,xmax=5,LeftTicks,EndArrow); ./asymptote-2.41/doc/markers1.asy0000644000175000017500000000513513064427076016557 0ustar norbertnorbertsize(12cm,0); import markers; pair A=(0,0), B=(1,0), C=(2,0), D=(3,0); path p=A--B--C--D; transform T=shift(-4,-1); transform t=shift(4,0); //line 1 ********** draw(p,marker(markinterval(3,dotframe,true))); label("$1$",point(p,0),3W); //line 2 ********** p=t*p; draw(p,marker(stickframe,markuniform(4))); label("$2$",point(p,0),3W); //line 3 ********** p=T*p; draw(p,marker(stickframe(red),markinterval(3,dotframe(blue),true))); label("$3$",point(p,0),3W); //line 4 ********** p=t*p; draw(p,StickIntervalMarker(3,2,blue,dotframe(red))); label("$4$",point(p,0),3W); //line 5 ********** p=T*p; pen pn=linewidth(4bp); draw(p,pn,StickIntervalMarker(3,3,angle=25,pn,dotframe(red+pn))); label("$5$",point(p,0),3W); //line 6 ********** p=t*p; draw(p,StickIntervalMarker(3,5,angle=25,size=4mm,space=2mm,offset=I*2mm, scale(2)*dotframe(red))); label("$6$",point(p,0),3W); //line 7 ********** p=T*p; draw(p,StickIntervalMarker(n=3,angle=45,size=10mm,space=3mm,dotframe)); label("$7$",point(p,0),3W); //line 8 ********** p=t*p; draw(p,CircleBarIntervalMarker(n=2,dotframe)); label("$8$",point(p,0),3W); //line 9 ********** p=T*p; draw(p,CircleBarIntervalMarker(n=3,angle=30,barsize=8mm,radius=2mm, FillDraw(.8red), dotframe)); label("$9$",point(p,0),3W); //line 10 ********** p=t*p; draw(p,CircleBarIntervalMarker(n=3,angle=30,barsize=8mm,radius=2mm, FillDraw(.8red),circleabove=true,dotframe)); label("$10$",point(p,0),3W); //line 11 ********** p=T*p; draw(p,CircleBarIntervalMarker(n=3,angle=30,barsize=8mm,radius=2mm, FillDraw(.8red),circleabove=true,dotframe, above=false)); label("$11$",point(p,0),3W); //line 12 ********** p=t*p; draw(p,TildeIntervalMarker(i=3,dotframe)); label("$12$",point(p,0),3W); //line 13 ********** p=T*p; draw(p,TildeIntervalMarker(i=3,n=2,angle=-20,dotframe)); label("$13$",point(p,0),3W); //line 14 ********** p=t*p; draw(p,CrossIntervalMarker(3,3,dotframe)); label("$14$",point(p,0),3W); //line 15 ********** p=shift(.25S)*T*p; path cle=shift(relpoint(p,.5))*scale(abs(A-D)/4)*unitcircle; draw(cle,StickIntervalMarker(5,3,dotframe(6bp+red))); label("$15$",point(p,0),3W); //line 16 ********** cle=t*cle; p=t*p; frame a; label(a,"$a$",(0,-2labelmargin())); draw(cle,marker(dotframe(6bp+red),markinterval(5,a,true))); label("$16$",point(p,0),3W); // line 17 ********** p=T*shift(relpoint(p,.5)+.65S)*scale(.5)*shift(-relpoint(p,.5))*rotate(45,relpoint(p,.5))*p; draw(p,TildeIntervalMarker(size=5mm,rotated=false,dotframe)); label("$17$",point(p,0),3W); ./asymptote-2.41/doc/markers2.asy0000644000175000017500000000155513064427076016562 0ustar norbertnorbertsize(10cm,0); import markers; import geometry; import math; pair A=0, B=(1,0), C=(0.7,1), D=(-0.5,0), F=rotate(-90)*(C-B)/2+B; draw(A--B); draw(A--C); pen p=linewidth(1mm); draw(B--C,p); draw(A--D); draw(B--F,p); label("$A$",A,SW); label("$B$",B,S); label("$C$",C,N); dot(Label("$D$",D,S)); dot(Label("$F$",F,N+NW)); markangle(A,C,B); markangle(scale(1.5)*"$\theta$",radius=40,C,B,A,ArcArrow(2mm),1mm+red); markangle(scale(1.5)*"$-\theta$",radius=-70,A,B,C,ArcArrow,green); markangle(Label("$\gamma$",Relative(0.25)),n=2,radius=-30,A,C,B,p=0.7blue+2); markangle(n=3,B,A,C,marker(markinterval(stickframe(n=2),true))); pen RedPen=0.7red+1bp; markangle(C,A,D,RedPen,marker(markinterval(2,stickframe(3,4mm,RedPen),true))); drawline(A,A+dir(A--D,A--C),dotted); perpendicular(B,NE,F-B,size=10mm,1mm+red, TrueMargin(linewidth(p)/2,linewidth(p)/2),Fill(yellow)); ./asymptote-2.41/doc/bezier.asy0000644000175000017500000000012113064427076016300 0ustar norbertnorbertlabel("$(1-t)^3z_0+3t(1-t)^2c_0+3t^2(1-t)c_1+t^3z_1\qquad 0\le t\le 1$.",(0,0)); ./asymptote-2.41/doc/filegraph.asy0000644000175000017500000000035613064427076016773 0ustar norbertnorbertimport graph; size(200,150,IgnoreAspect); file in=input("filegraph.dat").line(); real[][] a=in; a=transpose(a); real[] x=a[0]; real[] y=a[1]; draw(graph(x,y),red); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); ./asymptote-2.41/doc/image.asy0000644000175000017500000000062113064427076016107 0ustar norbertnorbertsize(12cm,12cm); import graph; import palette; int n=256; real ninv=2pi/n; real[][] v=new real[n][n]; for(int i=0; i < n; ++i) for(int j=0; j < n; ++j) v[i][j]=sin(i*ninv)*cos(j*ninv); pen[] Palette=BWRainbow(); picture bar; bounds range=image(v,(0,0),(1,1),Palette); palette(bar,"$A$",range,(0,0),(0.5cm,8cm),Right,Palette, PaletteTicks("$%+#.1f$")); add(bar.fit(),point(E),30E); ./asymptote-2.41/doc/HermiteSpline.asy0000644000175000017500000000051213064427076017574 0ustar norbertnorbertimport graph; size(140mm,70mm,IgnoreAspect); scale(false); real[] x={1,3,4,5,6}; real[] y={1,5,2,0,4}; marker mark=marker(scale(1mm)*cross(6,false,r=0.35),red,Fill); draw(graph(x,y,Hermite),"Hermite Spline",mark); xaxis("$x$",Bottom,LeftTicks(x)); yaxis("$y$",Left,LeftTicks); attach(legend(),point(NW),40S+30E,UnFill); ./asymptote-2.41/doc/colors.asy0000644000175000017500000000312413064427076016327 0ustar norbertnorbertint i=0; int j=0; bool components=false; pen p; void col(... string[] s) { for(int n=0; n < s.length; ++n) { j -= 10; string s=s[n]; eval("p="+s+";",true); if(components) { real[] a=colors(p); for(int i=0; i < a.length; ++i) s += " "+(string) a[i]; } label(s,(i+10,j),E); filldraw(box((i,j-5),(i+10,j+5)),p); } } col("palered"); col("lightred"); col("mediumred"); col("red"); col("heavyred"); col("brown"); col("darkbrown"); j -= 10; col("palegreen"); col("lightgreen"); col("mediumgreen"); col("green"); col("heavygreen"); col("deepgreen"); col("darkgreen"); j -= 10; col("paleblue"); col("lightblue"); col("mediumblue"); col("blue"); col("heavyblue"); col("deepblue"); col("darkblue"); j -= 10; i += 150; j=0; col("palecyan"); col("lightcyan"); col("mediumcyan"); col("cyan"); col("heavycyan"); col("deepcyan"); col("darkcyan"); j -= 10; col("pink"); col("lightmagenta"); col("mediummagenta"); col("magenta"); col("heavymagenta"); col("deepmagenta"); col("darkmagenta"); j -= 10; col("paleyellow"); col("lightyellow"); col("mediumyellow"); col("yellow"); col("lightolive"); col("olive"); col("darkolive"); j -= 10; col("palegray"); col("lightgray"); col("mediumgray"); col("gray"); col("heavygray"); col("deepgray"); col("darkgray"); j -= 10; i += 150; j=0; col("black"); col("white"); j -= 10; col("orange"); col("fuchsia"); j -= 10; col("chartreuse"); col("springgreen"); j -= 10; col("purple"); col("royalblue"); j -= 10; col("Cyan"); col("Magenta"); col("Yellow"); col("Black"); j -= 10; col("cmyk(red)"); col("cmyk(blue)"); col("cmyk(green)"); ./asymptote-2.41/doc/externalprc.tex0000644000175000017500000000052713064427076017365 0ustar norbertnorbert% Generate inline PRC images for latex with % asy -inlineimage cube -render=4 % % Generate inline PRC images for pdflatex with % asy -inlineimage cube -render=4 -tex pdflatex % \documentclass[12pt]{article} \input cube.pre \usepackage[bigfiles]{media9} \RequirePackage{asymptote,color,graphicx} \begin{document} \input cube.tex \end{document} ./asymptote-2.41/doc/beziercurve.asy0000644000175000017500000000035213064427076017353 0ustar norbertnorbertsize(400); pair z0=(0,0); pair c0=(1,1); pair c1=(2,1); pair z1=(3,0); draw(z0..controls c0 and c1 .. z1,blue); draw(z0--c0--c1--z1,dashed); dot("$z_0$",z0,W,red); dot("$c_0$",c0,NW,red); dot("$c_1$",c1,NE,red); dot("$z_1$",z1,red); ./asymptote-2.41/doc/square.asy0000644000175000017500000000006413064427076016326 0ustar norbertnorbertsize(3cm); draw((0,0)--(1,0)--(1,1)--(0,1)--cycle); ./asymptote-2.41/doc/elliptic.asy0000644000175000017500000000376713064427076016650 0ustar norbertnorbertstruct curve { real a=0; real b=8; real y2(real x) { return x^3+a*x+b; } real disc() { return -16*(4*a*a*a+27*b*b); } real lowx () { return sqrt(-a/3); } int comps() { if (a < 0) { real x=sqrt(-a/3); return y2(x) < 0 ? 2 : 1; } return 1; } void locus(picture pic=currentpicture, real m, real M, int n=100, pen p=currentpen) { path flip(path p, bool close) { path pp=reverse(yscale(-1)*p)..p; return close ? pp..cycle : pp; } path section(real m, real M, int n) { guide g; real width=(M-m)/n; for(int i=0; i <= n; ++i) { real x=m+width*i; real yy=y2(x); if (yy > 0) g=g..(x,sqrt(yy)); } return g; } if (comps() == 1) { draw(pic,flip(section(m,M,n),false),p); } else { real x=lowx(); // The minimum on x^3+ax+b if (m < x) draw(pic,flip(section(m,min(x,M),n),true),p); if (x < M) draw(pic,flip(section(max(x,m),M,n),false),p); } } pair neg(pair P) { return finite(P.y) ? yscale(-1)*P : P; } pair add(pair P, pair Q) { if (P.x == Q.x && P.x != Q.x) return (0,infinity); else { real lambda=P == Q ? (3*P.x^2+a)/(2*P.y) : (Q.y-P.y)/(Q.x-P.x); real Rx=lambda^2-P.x-Q.x; return (Rx,(P.x-Rx)*lambda-P.y); } } } import graph; import math; size(0,200); curve c; c.a=-1; c.b=4; pair oncurve(real x) { return (x,sqrt(c.y2(x))); } picture output; axes(); c.locus(-4,3,.3red+.7blue); pair P=oncurve(-1),Q=oncurve(1.2); pair PP=c.add(P,P),sum=c.add(P,Q); save(); drawline(P,Q,dashed); drawline(c.neg(sum),sum,dashed); dot("$P$", P, NW); dot("$Q$", Q, SSE); dot(c.neg(sum)); dot("$P+Q$", sum, 2SW); add(output,currentpicture.fit(),(-0.5cm,0),W); restore(); save(); drawline(P,c.neg(PP),dashed); drawline(c.neg(PP),PP,dashed); dot("$P$", P, NW); dot(c.neg(PP)); dot("$2P$", PP, SW); add(output,currentpicture.fit(),(0.5cm,0),E); shipout(output); restore(); ./asymptote-2.41/doc/CAD1.asy0000644000175000017500000000255713064427076015507 0ustar norbertnorbertimport CAD; sCAD cad=sCAD.Create(); // Freehand line draw(g=cad.MakeFreehand(pFrom=(3,-1)*cm,(6,-1)*cm), p=cad.pFreehand); // Standard measurement lines draw(g=box((0,0)*cm,(1,1)*cm),p=cad.pVisibleEdge); cad.MeasureParallel(L="$\sqrt{2}$", pFrom=(0,1)*cm, pTo=(1,0)*cm, dblDistance=-15mm); // Label inside,shifted to the right; arrows outside draw(g=box((2,0)*cm,(3,1)*cm),p=cad.pVisibleEdge); cad.MeasureParallel(L="1", pFrom=(2,1)*cm, pTo=(3,1)*cm, dblDistance=5mm, dblLeft=5mm, dblRelPosition=0.75); // Label and arrows outside draw(g=box((5,0)*cm,(5.5,1)*cm),p=cad.pVisibleEdge); cad.MeasureParallel(L="0.5", pFrom=(5,1)*cm, pTo=(5.5,1)*cm, dblDistance=5mm, dblLeft=10mm, dblRelPosition=-1); // Small bounds,asymmetric measurement line draw(g=box((7,0)*cm,(7.5,1)*cm),p=cad.pVisibleEdge); cad.MeasureParallel(L="0.5", pFrom=(7,1)*cm, pTo=(7.5,1)*cm, dblDistance=5mm, dblLeft=2*cad.GetMeasurementBoundSize(bSmallBound=true), dblRight=10mm, dblRelPosition=2, bSmallBound=true); ./asymptote-2.41/doc/mexicanhat.asy0000644000175000017500000000044013064427076017145 0ustar norbertnorbertsize(200); real mexican(real x) {return (1-8x^2)*exp(-(4x^2));} int n=30; real a=1.5; real width=2a/n; guide hat; path solved; for(int i=0; i < n; ++i) { real t=-a+i*width; pair z=(t,mexican(t)); hat=hat..z; solved=solved..z; } draw(hat); dot(hat,red); draw(solved,dashed); ./asymptote-2.41/doc/graphmarkers.asy0000644000175000017500000000136213064427076017516 0ustar norbertnorbertimport graph; size(200,100,IgnoreAspect); markroutine marks() { return new void(picture pic=currentpicture, frame f, path g) { path p=scale(1mm)*unitcircle; for(int i=0; i <= length(g); ++i) { pair z=point(g,i); frame f; if(i % 4 == 0) { fill(f,p); add(pic,f,z); } else { if(z.y > 50) { pic.add(new void(frame F, transform t) { path q=shift(t*z)*p; unfill(F,q); draw(F,q); }); } else { draw(f,p); add(pic,f,z); } } } }; } pair[] f={(5,5),(40,20),(55,51),(90,30)}; draw(graph(f),marker(marks())); scale(true); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); ./asymptote-2.41/doc/westnile.asy0000644000175000017500000000332213064427076016660 0ustar norbertnorbertimport graph; size(9cm,8cm,IgnoreAspect); string data="westnile.csv"; file in=input(data).line().csv(); string[] columnlabel=in; real[][] A=in; A=transpose(A); real[] number=A[0], survival=A[1]; path g=graph(number,survival); draw(g); scale(true); xaxis("Initial no.\ of mosquitoes per bird ($S_{M_0}/N_{B_0}$)", Bottom,LeftTicks); xaxis(Top); yaxis("Susceptible bird survival",Left,RightTicks(trailingzero)); yaxis(Right); real a=number[0]; real b=number[number.length-1]; real S1=0.475; path h1=(a,S1)--(b,S1); real M1=interp(a,b,intersect(h1,g)[0]); real S2=0.9; path h2=(a,S2)--(b,S2); real M2=interp(a,b,intersect(h2,g)[0]); labelx("$M_1$",M1); labelx("$M_2$",M2); draw((a,S2)--(M2,S2)--(M2,0),Dotted); draw((a,S1)--(M1,S1)--(M1,0),dashed); pen p=fontsize(10pt); real y3=0.043; path reduction=(M1,y3)--(M2,y3); draw(reduction,Arrow,TrueMargin(0,0.5*(linewidth(Dotted)+linewidth()))); arrow(shift(-20,5)*Label(minipage("\flushleft{\begin{itemize}\item[1.] Estimate proportion of birds surviving at end of season\end{itemize}}",100), align=NNE), (M1,S1),NNE,1cm,p,Arrow(NoFill)); arrow(shift(-24,5)*Label(minipage("\flushleft{\begin{itemize}\item[2.] Read off initial mosquito abundance\end{itemize}}",80),align=NNE), (M1,0),NE,2cm,p,Arrow(NoFill)); arrow(shift(20,0)*Label(minipage("\flushleft{\begin{itemize}\item[3.] Determine desired bird survival for next season\end{itemize}}",90),align=SW), (M2,S2),SW,arrowlength,p,Arrow(NoFill)); arrow(shift(8,-15)*Label(minipage("\flushleft{\begin{itemize}\item[4.] Calculate required proportional reduction in mosquitoes\end{itemize}}",90), align=NW), point(reduction,0.5),NW,1.5cm,p,Arrow(NoFill)); ./asymptote-2.41/doc/GaussianSurface.asy0000644000175000017500000000072013064427076020110 0ustar norbertnorbertimport graph3; size(200,0); currentprojection=perspective(10,8,4); real f(pair z) {return 0.5+exp(-abs(z)^2);} draw((-1,-1,0)--(1,-1,0)--(1,1,0)--(-1,1,0)--cycle); draw(arc(0.12Z,0.2,90,60,90,25),ArcArrow3); surface s=surface(f,(-1,-1),(1,1),nx=5,Spline); xaxis3(Label("$x$"),red,Arrow3); yaxis3(Label("$y$"),red,Arrow3); zaxis3(XYZero(extend=true),red,Arrow3); draw(s,lightgray,meshpen=black+thick(),nolight,render(merge=true)); label("$O$",O,-Z+Y,red); ./asymptote-2.41/doc/quartercircle.asy0000644000175000017500000000006113064427076017670 0ustar norbertnorbertsize(100,0); draw((1,0){up}..{left}(0,1),Arrow); ./asymptote-2.41/doc/saddle.asy0000644000175000017500000000023513064427076016262 0ustar norbertnorbertimport three; size(100,0); path3 g=(1,0,0)..(0,1,1)..(-1,0,0)..(0,-1,1)..cycle; draw(g); draw(((-1,-1,0)--(1,-1,0)--(1,1,0)--(-1,1,0)--cycle)); dot(g,red); ./asymptote-2.41/doc/diagonal.asy0000644000175000017500000000003013064427076016575 0ustar norbertnorbertdraw((0,0)--(100,100)); ./asymptote-2.41/doc/leastsquares.asy0000644000175000017500000000200113064427076017533 0ustar norbertnorbertsize(400,200,IgnoreAspect); import graph; import stats; file fin=input("leastsquares.dat").line(); real[][] a=fin; a=transpose(a); real[] t=a[0], rho=a[1]; // Read in parameters from the keyboard: //real first=getreal("first"); //real step=getreal("step"); //real last=getreal("last"); real first=100; real step=50; real last=700; // Remove negative or zero values of rho: t=rho > 0 ? t : null; rho=rho > 0 ? rho : null; scale(Log(true),Linear(true)); int n=step > 0 ? ceil((last-first)/step) : 0; real[] T,xi,dxi; for(int i=0; i <= n; ++i) { real first=first+i*step; real[] logrho=(t >= first & t <= last) ? log(rho) : null; real[] logt=(t >= first & t <= last) ? -log(t) : null; if(logt.length < 2) break; // Fit to the line logt=L.m*logrho+L.b: linefit L=leastsquares(logt,logrho); T.push(first); xi.push(L.m); dxi.push(L.dm); } draw(graph(T,xi),blue); errorbars(T,xi,dxi,red); crop(); ylimits(0); xaxis("$T$",BottomTop,LeftTicks); yaxis("$\xi$",LeftRight,RightTicks); ./asymptote-2.41/doc/tile.asy0000644000175000017500000000060613064427076015765 0ustar norbertnorbertsize(0,90); import patterns; add("tile",tile()); add("filledtilewithmargin",tile(6mm,4mm,red,Fill),(1mm,1mm),(1mm,1mm)); add("checker",checker()); add("brick",brick()); real s=2.5; filldraw(unitcircle,pattern("tile")); filldraw(shift(s,0)*unitcircle,pattern("filledtilewithmargin")); filldraw(shift(2s,0)*unitcircle,pattern("checker")); filldraw(shift(3s,0)*unitcircle,pattern("brick")); ./asymptote-2.41/doc/cube.asy0000644000175000017500000000036313064427076015746 0ustar norbertnorbertimport three; currentprojection=orthographic(5,4,2,center=true); size(5cm); size3(3cm,5cm,8cm); draw(unitbox); dot(unitbox,red); label("$O$",(0,0,0),NW); label("(1,0,0)",(1,0,0),S); label("(0,1,0)",(0,1,0),E); label("(0,0,1)",(0,0,1),Z); ./asymptote-2.41/doc/dots.asy0000644000175000017500000000006113064427076015774 0ustar norbertnorbertdraw((0,0){up}..(100,25){right}..(200,0){down}); ./asymptote-2.41/doc/multicontour.asy0000644000175000017500000000071213064427076017572 0ustar norbertnorbertimport contour; size(200); real f(real x, real y) {return x^2-y^2;} int n=10; real[] c=new real[n]; for(int i=0; i < n; ++i) c[i]=(i-n/2)/n; pen[] p=sequence(new pen(int i) { return (c[i] >= 0 ? solid : dashed)+fontsize(6pt); },c.length); Label[] Labels=sequence(new Label(int i) { return Label(c[i] != 0 ? (string) c[i] : "",Relative(unitrand()),(0,0), UnFill(1bp)); },c.length); draw(Labels,contour(f,(-1,-1),(1,1),c),p); ./asymptote-2.41/doc/asy.1.begin0000644000175000017500000000175513064427076016261 0ustar norbertnorbert.\" Hey, EMACS: -*- nroff -*- .TH ASY 1 "1 Dec 2004" .SH NAME asy \- Asymptote: a script-based vector graphics language .SH SYNOPSIS .B asy .RI [ options ] .RI [ file \ ...] .SH DESCRIPTION \fBAsymptote\fP is a powerful descriptive vector graphics language for technical drawings, inspired by MetaPost but with an improved C++-like syntax. Asymptote provides for figures the same high-quality level of typesetting that LaTeX does for scientific text. .SH OPTIONS If no arguments are given, Asymptote runs in interactive mode. .PP If "\-" is given as the file argument, Asymptote reads from standard input. .PP A summary of options is included below. The effect of most options can be negated by prepending .B no to the option name. Default values for most options may also be entered in the file .B .asy/config.asy in the user's home directory using the long form: .PP import settings; batchView=true; .PP For a complete description, see the Info files. ./asymptote-2.41/doc/labelsquare.asy0000644000175000017500000000017113064427076017325 0ustar norbertnorbertsize(3cm); draw(unitsquare); label("$A$",(0,0),SW); label("$B$",(1,0),SE); label("$C$",(1,1),NE); label("$D$",(0,1),NW); ./asymptote-2.41/doc/lineargraph0.asy0000644000175000017500000000055613064427076017410 0ustar norbertnorbertimport graph; size(400,200,IgnoreAspect); real Sin(real t) {return sin(2pi*t);} real Cos(real t) {return cos(2pi*t);} draw(graph(Sin,0,1),red,"$\sin(2\pi x)$"); draw(graph(Cos,0,1),blue,"$\cos(2\pi x)$"); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks(trailingzero)); label("LABEL",point(0),UnFill(1mm)); add(legend(),point(E),20E,UnFill); ./asymptote-2.41/doc/penimage.asy0000644000175000017500000000033313064427076016612 0ustar norbertnorbertsize(200); import palette; int n=256; real ninv=2pi/n; pen[][] v=new pen[n][n]; for(int i=0; i < n; ++i) for(int j=0; j < n; ++j) v[i][j]=rgb(0.5*(1+sin(i*ninv)),0.5*(1+cos(j*ninv)),0); image(v,(0,0),(1,1)); ./asymptote-2.41/doc/diatom.csv0000644000175000017500000000774313064427076016315 0ustar norbertnorbert"sediment depth (cm)","year","Achnanthes minutissima Kuetzing","Anomoeoneis vitrea (Grunow) Ross","Asterionella formosa Hassall","Tabellaria flocculosa (Roth) Kuetzing","Fragilaria cf. tenera","Chaetoceros muelleri/elmorei cysts","Aulacoseira spp. ","Fragilaria capucina var. vaucheriae (Kuetzing)","Fragilaria crotonensis Kitton" "A","B","C" 0,4,6 0,2000,11.6959064327485,9.55165692007797,49.6101364522417,1.364522417154,0,0.974658869395711,0,2.14424951267057,4.09356725146199 10,1998,20.2676864244742,11.2810707456979,34.7992351816444,2.39005736137667,0,0.191204588910134,0.573613766730402,0.382409177820268,7.55258126195029 20,1996,21.1282051282051,33.6410256410256,24,2.35897435897436,0.615384615384615,0,0.205128205128205,0.615384615384615,2.56410256410256 30,1994,25.7620452310718,21.0422812192724,31.3667649950836,2.16322517207473,0.393313667649951,0.393313667649951,0.196656833824975,1.76991150442478,3.73647984267453 40,1992,21.0422812192724,16.5191740412979,42.9695181907571,0.589970501474926,0,0.983284169124877,0.589970501474926,0.393313667649951,1.96656833824975 50,1990,23.1067961165049,24.0776699029126,29.126213592233,1.35922330097087,0,0.970873786407767,0.388349514563107,0.58252427184466,3.30097087378641 60,1988,35.0738916256158,33.3004926108374,4.33497536945813,1.37931034482759,0.591133004926108,1.97044334975369,1.18226600985222,0.985221674876847,2.75862068965517 70,1986,42.2090729783037,33.7278106508876,2.26824457593688,1.38067061143984,0.788954635108481,1.18343195266272,0.591715976331361,1.38067061143984,3.25443786982249 90,1984,34.5098039215686,41.9607843137255,0.196078431372549,2.15686274509804,0.588235294117647,2.74509803921569,0.588235294117647,2.15686274509804,0 95,1982,38.0487804878049,45.4634146341463,0.487804878048781,0.975609756097561,0.975609756097561,0,0.390243902439024,0.390243902439024,0 110,1980,40.1860465116279,41.4883720930233,1.30232558139535,0.837209302325581,0,0.930232558139535,0.372093023255814,0.372093023255814,1.3953488372093 130,1978,39.6501457725948,42.1768707482993,0.291545189504373,0.194363459669582,2.72108843537415,1.55490767735666,0,1.36054421768707,0.777453838678329 150,1972,32.6298701298701,31.4935064935065,1.86688311688312,1.78571428571429,0.162337662337662,13.961038961039,0.162337662337662,1.94805194805195,1.86688311688312 170,1970,30.7692307692308,47.534516765286,0.986193293885602,3.35305719921105,0.19723865877712,1.38067061143984,0,1.18343195266272,0.591715976331361 190,1965,40.5268490374873,37.8926038500507,1.82370820668693,2.63424518743668,0,1.21580547112462,0.405268490374873,1.21580547112462,1.01317122593718 260,1961,40.4494382022472,26.0299625468165,0.468164794007491,1.31086142322097,0.561797752808989,8.05243445692884,0,3.74531835205992,0.374531835205993 280,1950,44.946025515211,11.9725220804711,0.294406280667321,0.785083415112856,16.48675171737,1.96270853778214,0.392541707556428,2.35525024533857,0 290,1942,41.2818096135721,8.29406220546654,0.188501413760603,0.282752120640905,28.6522148916117,0.942507068803016,0.377002827521206,4.33553251649387,0 300,1940,18.0995475113122,12.3076923076923,0,0.180995475113122,40.3619909502262,5.61085972850679,0,2.35294117647059,0 310,1920,28.6844708209693,11.2759643916914,0.593471810089021,3.26409495548961,13.0563798219585,13.2542037586548,0.19782393669634,9.89119683481701,0.989119683481701 320,1915,6.17977528089888,1.31086142322097,4.30711610486891,6.74157303370787,32.7715355805243,34.4569288389513,1.31086142322097,2.62172284644195,0 330,1910,4.03846153846154,0.769230769230769,14.5192307692308,36.4423076923077,5,0.769230769230769,11.1538461538462,0,2.11538461538462 340,1888,7.37148399612027,1.1639185257032,9.40834141610087,31.8137730358875,1.1639185257032,0.969932104752667,14.3549951503395,0.193986420950533,0.969932104752667 400,1763,2.69749518304432,0.192678227360308,24.8554913294798,26.7822736030829,0.385356454720617,2.69749518304432,20.0385356454721,0,1.54142581888247 450,1726,2.37859266600595,0.396432111000991,9.71258671952428,28.5431119920714,0.198216055500496,0.594648166501487,30.5252725470763,0,0.792864222001982 ./asymptote-2.41/doc/brokenaxis.asy0000644000175000017500000000101413064427076017167 0ustar norbertnorbertimport graph; size(200,150,IgnoreAspect); // Break the x axis at 3; restart at 8: real a=3, b=8; // Break the y axis at 100; restart at 1000: real c=100, d=1000; scale(Broken(a,b),BrokenLog(c,d)); real[] x={1,2,4,6,10}; real[] y=x^4; draw(graph(x,y),red,MarkFill[0]); xaxis("$x$",BottomTop,LeftTicks(Break(a,b))); yaxis("$y$",LeftRight,RightTicks(Break(c,d))); label(rotate(90)*Break,(a,point(S).y)); label(rotate(90)*Break,(a,point(N).y)); label(Break,(point(W).x,ScaleY(c))); label(Break,(point(E).x,ScaleY(c))); ./asymptote-2.41/doc/icon.asy0000644000175000017500000000057413064427076015764 0ustar norbertnorbertimport graph; size(30,30,IgnoreAspect); real f(real t) {return t < 0 ? -1/t : -0.5/t;} picture logo(pair s=0, pen q) { picture pic; pen p=linewidth(3)+q; real a=-0.5; real b=1; real eps=0.1; draw(pic,shift((eps,-f(a)))*graph(f,a,-eps),p); real c=0.5*a; pair z=(0,f(c)-f(a)); draw(pic,z+c+eps--z,p); yaxis(pic,p); return shift(s)*pic; } add(logo(red)); ./asymptote-2.41/doc/datagraph.asy0000644000175000017500000000033213064427076016757 0ustar norbertnorbertimport graph; size(200,150,IgnoreAspect); real[] x={0,1,2,3}; real[] y=x^2; draw(graph(x,y),red); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight, RightTicks(Label(fontsize(8pt)),new real[]{0,4,9})); ./asymptote-2.41/doc/CDlabel.asy0000644000175000017500000000077213064427076016322 0ustar norbertnorbertsize(11.7cm,11.7cm); asy(nativeformat(),"logo"); fill(unitcircle^^(scale(2/11.7)*unitcircle), evenodd+rgb(124/255,205/255,124/255)); label(scale(1.1)*minipage( "\centering\scriptsize \textbf{\LARGE {\tt Asymptote}\\ \smallskip \small The Vector Graphics Language}\\ \smallskip \textsc{Andy Hammerlindl, John Bowman, and Tom Prince} http://asymptote.sourceforge.net\\ ",8cm),(0,0.6)); label(graphic("logo."+nativeformat(),"height=7cm"),(0,-0.22)); clip(unitcircle^^(scale(2/11.7)*unitcircle),evenodd); ./asymptote-2.41/doc/makepen.asy0000644000175000017500000000044513064427076016451 0ustar norbertnorbertsize(200); pen convex=makepen(scale(10)*polygon(8))+grey; draw((1,0.4),convex); draw((0,0)---(1,1)..(2,0)--cycle,convex); pen nonconvex=scale(10)* makepen((0,0)--(0.25,-1)--(0.5,0.25)--(1,0)--(0.5,1.25)--cycle)+red; draw((0.5,-1.5),nonconvex); draw((0,-1.5)..(1,-0.5)..(2,-1.5),nonconvex); ./asymptote-2.41/doc/superpath.asy0000644000175000017500000000017313064427076017042 0ustar norbertnorbertsize(0,100); path unitcircle=E..N..W..S..cycle; path g=scale(2)*unitcircle; filldraw(unitcircle^^g,evenodd+yellow,black); ./asymptote-2.41/doc/install-sh0000755000175000017500000003253713064427076016326 0ustar norbertnorbert#!/bin/sh # install - install a program, script, or datafile scriptversion=2009-04-28.21; # UTC # 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. nl=' ' IFS=" "" $nl" # set DOITPROG to echo to test this script # Don't use :- since 4.3BSD and earlier shells don't like it. doit=${DOITPROG-} if test -z "$doit"; then doit_exec=exec else doit_exec=$doit fi # Put in absolute file names if you don't have them in your path; # or use environment vars. chgrpprog=${CHGRPPROG-chgrp} chmodprog=${CHMODPROG-chmod} chownprog=${CHOWNPROG-chown} cmpprog=${CMPPROG-cmp} cpprog=${CPPROG-cp} mkdirprog=${MKDIRPROG-mkdir} mvprog=${MVPROG-mv} rmprog=${RMPROG-rm} stripprog=${STRIPPROG-strip} posix_glob='?' initialize_posix_glob=' test "$posix_glob" != "?" || { if (set -f) 2>/dev/null; then posix_glob= else posix_glob=: fi } ' posix_mkdir= # Desired mode of installed file. mode=0755 chgrpcmd= chmodcmd=$chmodprog chowncmd= mvcmd=$mvprog rmcmd="$rmprog -f" stripcmd= src= dst= dir_arg= dst_arg= copy_on_change=false 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: --help display this help and exit. --version display version info and exit. -c (ignored) -C install only if different (preserve the last data modification time) -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. Environment variables override the default commands: CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG RMPROG STRIPPROG " while test $# -ne 0; do case $1 in -c) ;; -C) copy_on_change=true;; -d) dir_arg=true;; -g) chgrpcmd="$chgrpprog $2" shift;; --help) echo "$usage"; exit $?;; -m) mode=$2 case $mode in *' '* | *' '* | *' '* | *'*'* | *'?'* | *'['*) echo "$0: invalid mode: $mode" >&2 exit 1;; esac shift;; -o) chowncmd="$chownprog $2" shift;; -s) stripcmd=$stripprog;; -t) dst_arg=$2 shift;; -T) no_target_directory=true;; --version) echo "$0 $scriptversion"; exit $?;; --) shift break;; -*) echo "$0: invalid option: $1" >&2 exit 1;; *) break;; esac shift done if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then # When -d is used, all remaining arguments are directories to create. # When -t is used, the destination is already specified. # Otherwise, the last argument is the destination. Remove it from $@. for arg do if test -n "$dst_arg"; then # $@ is not empty: it contains at least $arg. set fnord "$@" "$dst_arg" shift # fnord fi shift # arg dst_arg=$arg done fi if test $# -eq 0; 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 if test -z "$dir_arg"; then trap '(exit $?); exit' 1 2 13 15 # Set umask so as not to create temps with too-generous modes. # However, 'strip' requires both read and write access to temps. case $mode in # Optimize common cases. *644) cp_umask=133;; *755) cp_umask=22;; *[0-7]) if test -z "$stripcmd"; then u_plus_rw= else u_plus_rw='% 200' fi cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;; *) if test -z "$stripcmd"; then u_plus_rw= else u_plus_rw=,u+rw fi cp_umask=$mode$u_plus_rw;; esac fi for src do # Protect names starting with `-'. case $src in -*) src=./$src;; esac if test -n "$dir_arg"; then dst=$src dstdir=$dst test -d "$dstdir" dstdir_status=$? 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 "$dst_arg"; then echo "$0: no destination specified." >&2 exit 1 fi dst=$dst_arg # 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: $dst_arg: Is a directory" >&2 exit 1 fi dstdir=$dst dst=$dstdir/`basename "$src"` dstdir_status=0 else # Prefer dirname, but fall back on a substitute if dirname fails. dstdir=` (dirname "$dst") 2>/dev/null || expr X"$dst" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ X"$dst" : 'X\(//\)[^/]' \| \ X"$dst" : 'X\(//\)$' \| \ X"$dst" : 'X\(/\)' \| . 2>/dev/null || echo X"$dst" | sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ s//\1/ q } /^X\(\/\/\)[^/].*/{ s//\1/ q } /^X\(\/\/\)$/{ s//\1/ q } /^X\(\/\).*/{ s//\1/ q } s/.*/./; q' ` test -d "$dstdir" dstdir_status=$? fi fi obsolete_mkdir_used=false if test $dstdir_status != 0; then case $posix_mkdir in '') # Create intermediate dirs using mode 755 as modified by the umask. # This is like FreeBSD 'install' as of 1997-10-28. umask=`umask` case $stripcmd.$umask in # Optimize common cases. *[2367][2367]) mkdir_umask=$umask;; .*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;; *[0-7]) mkdir_umask=`expr $umask + 22 \ - $umask % 100 % 40 + $umask % 20 \ - $umask % 10 % 4 + $umask % 2 `;; *) mkdir_umask=$umask,go-w;; esac # With -d, create the new directory with the user-specified mode. # Otherwise, rely on $mkdir_umask. if test -n "$dir_arg"; then mkdir_mode=-m$mode else mkdir_mode= fi posix_mkdir=false case $umask in *[123567][0-7][0-7]) # POSIX mkdir -p sets u+wx bits regardless of umask, which # is incompatible with FreeBSD 'install' when (umask & 300) != 0. ;; *) tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$ trap 'ret=$?; rmdir "$tmpdir/d" "$tmpdir" 2>/dev/null; exit $ret' 0 if (umask $mkdir_umask && exec $mkdirprog $mkdir_mode -p -- "$tmpdir/d") >/dev/null 2>&1 then if test -z "$dir_arg" || { # Check for POSIX incompatibilities with -m. # HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or # other-writeable bit of parent directory when it shouldn't. # FreeBSD 6.1 mkdir -m -p sets mode of existing directory. ls_ld_tmpdir=`ls -ld "$tmpdir"` case $ls_ld_tmpdir in d????-?r-*) different_mode=700;; d????-?--*) different_mode=755;; *) false;; esac && $mkdirprog -m$different_mode -p -- "$tmpdir" && { ls_ld_tmpdir_1=`ls -ld "$tmpdir"` test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1" } } then posix_mkdir=: fi rmdir "$tmpdir/d" "$tmpdir" else # Remove any dirs left behind by ancient mkdir implementations. rmdir ./$mkdir_mode ./-p ./-- 2>/dev/null fi trap '' 0;; esac;; esac if $posix_mkdir && ( umask $mkdir_umask && $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir" ) then : else # The umask is ridiculous, or mkdir does not conform to POSIX, # or it failed possibly due to a race condition. Create the # directory the slow way, step by step, checking for races as we go. case $dstdir in /*) prefix='/';; -*) prefix='./';; *) prefix='';; esac eval "$initialize_posix_glob" oIFS=$IFS IFS=/ $posix_glob set -f set fnord $dstdir shift $posix_glob set +f IFS=$oIFS prefixes= for d do test -z "$d" && continue prefix=$prefix$d if test -d "$prefix"; then prefixes= else if $posix_mkdir; then (umask=$mkdir_umask && $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break # Don't fail if two instances are running concurrently. test -d "$prefix" || exit 1 else case $prefix in *\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;; *) qprefix=$prefix;; esac prefixes="$prefixes '$qprefix'" fi fi prefix=$prefix/ done if test -n "$prefixes"; then # Don't fail if two instances are running concurrently. (umask $mkdir_umask && eval "\$doit_exec \$mkdirprog $prefixes") || test -d "$dstdir" || exit 1 obsolete_mkdir_used=true fi fi fi if test -n "$dir_arg"; then { test -z "$chowncmd" || $doit $chowncmd "$dst"; } && { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } && { test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false || test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1 else # 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 # Copy the file name to the temp name. (umask $cp_umask && $doit_exec $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 $mode "$dsttmp"; } && # If -C, don't bother to copy if it wouldn't change the file. if $copy_on_change && old=`LC_ALL=C ls -dlL "$dst" 2>/dev/null` && new=`LC_ALL=C ls -dlL "$dsttmp" 2>/dev/null` && eval "$initialize_posix_glob" && $posix_glob set -f && set X $old && old=:$2:$4:$5:$6 && set X $new && new=:$2:$4:$5:$6 && $posix_glob set +f && test "$old" = "$new" && $cmpprog "$dst" "$dsttmp" >/dev/null 2>&1 then rm -f "$dsttmp" else # Rename the file to the real destination. $doit $mvcmd -f "$dsttmp" "$dst" 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. { test ! -f "$dst" || $doit $rmcmd -f "$dst" 2>/dev/null || { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null && { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; } } || { echo "$0: cannot unlink or rename $dst" >&2 (exit 1); exit 1 } } && # Now rename the file to the real destination. $doit $mvcmd "$dsttmp" "$dst" } fi || exit 1 trap '' 0 fi done # Local variables: # eval: (add-hook 'write-file-hooks 'time-stamp) # time-stamp-start: "scriptversion=" # time-stamp-format: "%:y-%02m-%02d.%02H" # time-stamp-time-zone: "UTC" # time-stamp-end: "; # UTC" # End: ./asymptote-2.41/doc/xasy.1x0000644000175000017500000000156013064427076015550 0ustar norbertnorbert.\" Hey, EMACS: -*- nroff -*- .TH XASY 1x "27 Nov 2007" .SH NAME asy \- script-based vector graphics language .SH SYNOPSIS .B xasy .RI " [-x magnification] [filename]" .SH DESCRIPTION \fBAsymptote\fP is a powerful descriptive vector graphics language for technical drawing, inspired by MetaPost but with an improved C++\-like syntax. Asymptote provides for figures the same high\-quality level of typesetting that LaTeX does for scientific text. .PP \fBxasy\fP is a GUI for Asymptote that allows for final figure adjustments. .SH OPTIONS .TP .B \-x magnification Initial zoom. .SH SEE ALSO Asymptote and xasy are documented fully in the Asymptote Info page. .SH AUTHOR Asymptote was written by Andy Hammerlindl, John Bowman, and Tom Prince. .PP This manual page was written by Hubert Chan for the Debian project (but may be used by others). ./asymptote-2.41/doc/planes.asy0000644000175000017500000000054313064427076016312 0ustar norbertnorbertsize(6cm,0); import bsp; real u=2.5; real v=1; currentprojection=oblique; path3 y=plane((2u,0,0),(0,2v,0),(-u,-v,0)); path3 l=rotate(90,Z)*rotate(90,Y)*y; path3 g=rotate(90,X)*rotate(90,Y)*y; face[] faces; filldraw(faces.push(y),project(y),yellow); filldraw(faces.push(l),project(l),lightgrey); filldraw(faces.push(g),project(g),green); add(faces); ./asymptote-2.41/doc/eetomumu.asy0000644000175000017500000000203313064427076016664 0ustar norbertnorbertimport feynman; // set default line width to 0.8bp currentpen = linewidth(0.8); // scale all other defaults of the feynman module appropriately fmdefaults(); // define vertex and external points real L = 50; pair zl = (-0.75*L,0); pair zr = (+0.75*L,0); pair xu = zl + L*dir(+120); pair xl = zl + L*dir(-120); pair yu = zr + L*dir(+60); pair yl = zr + L*dir(-60); // draw propagators and vertices drawFermion(xu--zl); drawFermion(zl--xl); drawPhoton(zl--zr); drawFermion(yu--zr); drawFermion(zr--yl); drawVertex(zl); drawVertex(zr); // draw momentum arrows and momentum labels drawMomArrow(xl--zl, Relative(left)); label(Label("$k'$",2RightSide), xl--zl); label(Label("$k$",2LeftSide), xu--zl); drawMomArrow(zl--zr, Relative(left)); label(Label("$q$",2RightSide), zl--zr); drawMomArrow(zr--yu, Relative(right)); label(Label("$p'$",2LeftSide), zr--yu); label(Label("$p$",2RightSide), zr--yl); // draw particle labels label("$e^-$", xu, left); label("$e^+$", xl, left); label("$\mu^+$", yu, right); label("$\mu^-$", yl, right); ./asymptote-2.41/doc/logticks.asy0000644000175000017500000000047213064427076016650 0ustar norbertnorbertimport graph; size(300,175,IgnoreAspect); scale(Log,Log); draw(graph(identity,5,20)); xlimits(5,20); ylimits(1,100); xaxis("$M/M_\odot$",BottomTop,LeftTicks(DefaultFormat, new real[] {6,10,12,14,16,18})); yaxis("$\nu_{\rm upp}$ [Hz]",LeftRight,RightTicks(DefaultFormat)); ./asymptote-2.41/doc/asy.1.end0000644000175000017500000000051513064427076015734 0ustar norbertnorbert .SH SEE ALSO Asymptote is documented fully in the asymptote Info page. The manual can also be accessed in interactive mode with the "help" command. .SH AUTHOR Asymptote was written by Andy Hammerlindl, John Bowman, and Tom Prince. .PP This manual page was written by Hubert Chan for the Debian project (but may be used by others). ./asymptote-2.41/doc/unitcircle3.asy0000644000175000017500000000027213064427076017253 0ustar norbertnorbertimport three; size(100); path3 g=(1,0,0)..(0,1,0)..(-1,0,0)..(0,-1,0)..cycle; draw(g); draw(O--Z,red+dashed,Arrow3); draw(((-1,-1,0)--(1,-1,0)--(1,1,0)--(-1,1,0)--cycle)); dot(g,red); ./asymptote-2.41/doc/pixel.pdf0000644000175000017500000000532313064427076016127 0ustar norbertnorbert%PDF-1.2 %Çì¢ 5 0 obj <> stream xœ+T0Ð3T0A(œËU¨`bnf©gæš[êY€™¡%H~¹‚K>W Ê÷ sendstream endobj 6 0 obj 57 endobj 4 0 obj <> /Contents 5 0 R >> endobj 3 0 obj << /Type /Pages /Kids [ 4 0 R ] /Count 1 >> endobj 1 0 obj <> endobj 8 0 obj <> endobj 7 0 obj <>/Length 1686>>stream xœí]lU†gÊ…Rü!j"5€LdW`V¬©WJC½¨h´¢RÿÀˆTåçBÀ4µQB/$ ’p‰‚%z£ÒBB°´&rA×ݶœíÏvÚnö·=yŸ«/éì¼_öéÌž™Ý9'LÂ[BÙõÙõÙõÙõÙõÙõÙõÙõÙõÙõÙõÙEbÜø„ì"1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìBùû$5^v¡7~øÛ½ìªsYþ:ÙU£bèeÈ7^v¡7^v¡7^v¡7^v¡7^v¡7^v¡7^v¡7^v¡7^v¡7~øÛmrU‘«Z]UìªÑ®šëª9®*pÕ$WÅðÿ`øˆ(dŠá#¢](†ˆBv¡>" Ù…bøˆ(dŠá#¢](†ˆBv¡>" Ù…bøˆ(dŠá#¢þv[\U⪃‘¯çªBWqÕW-wÕ¹µ60†ÚñàÝ4²ËBvsGvÓÈ. ÙÍÙM#»,d7w†`÷ò¹`2á²›;C°ÛTÔZ{aßU§‚Y—VìÚ2jâüEEÓÆ ðŠ¡"»(²ÛzàØñû[îº÷ÚÔIÎ —å]m »8"í¶ŸÚ×4öž…èa”좈°Û~z÷‘e³ úû{Þ]ýÚ½ø×þƒóÊfâÝÊ.Ž~ì¶7¾Ïéæ…ì¢èÇnÝΧ–^W²‹"«Ý¦.¬Ç9¹ÙE‘Ån{ãÖñOO±ÙEÑ×î¿õ­)µ‡ WÍrÕ%W­pUÆîWeF]5ßU‹\•ùÅÝ4W.Ý{cøˆ(úØm®]ãY9ì¢èm·ù­ñqž•ÓÈ.Š^vÏVÜñfì=È.Š^v_ýmÇu±÷ »(zÚ­ý¡zJü=È.Šv¿´ê¸?sÓÈ.Šîv¿ø®†päÊ.Žnv¿}¡¦(jS²‹"c·mõCeœdEÆîç ÛbûÞ ']U±U÷·ª!Ë+–¹*VÑ7ÞÙ=Y±ãR²‹ÂÙ­ã¿Ñ…좸b·þ«ÍñßÆèBvQtÙm[]ú0­ÙEÑe—7¤ dG§Ý3On»•×ƒì¢è´ûõ¯¯{]vÛÊKKÞ†ì¢è°ûû¶w™ïƒì¢è°»9¨âvá-ÆOÛm}þ™Û¹]x‹qãÓv÷Ö}È»òãƧí¾q'ïN†ç7>e÷ÌšÓÞPä‚qãSv÷þ¼ØõãƧìV'7r{ðãƧì¾w³>vQ7>þórÕtncÜøDØXþ©U(ŒŸ>ø,·Ÿ1n|"|ñê×¹-øŒqãaõÝTÁ0n|"|ì ª`7>N?|#·Ÿ1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n¼ìB1n|"œý½nDÂ0n|"Üø ·¯1n¼ìB1n¼ÎÌPŒ¯QãÆë>3ãÆ'šų¹-øŒqãaå”—¸-øŒqãõí½×„?ýXÎîA O½¿‰þ ¤6®ªÕ%‘¯„-U•z¾ÓWÂdMRÏfûJ˜üc+u^$LêÑ{ “š6Ã_RvÉSÞ)»gžøä&vBzF#Mœá+i»šôÆW†ÁL‚FÇ, :x=¥Ã®^Oéœ}[¯ŸtÍœ¯ƒ×KºV½ÐÁë%]vÛÊÑ5¯\Y¨¾Ž³Ä£@âVŠÛÓ°]çfßȬòXùà*j'"ÿdVhm®Z¼’Ù‰È?ÝVWþfÃÖBC÷•Ñë­×ÈÊ+ºÛ ÖšªÙ+zØmÞ°°x,­‘wzØM¬þÛ®“³?ô´4í8¿~*©‘wzÙ ‚ÚCÏÍ( ´"òN»A]ÍÚLjüÓ×nríÒG­ˆ¼Ó×nêÃwÓõ%3uvö€lvƒ¶úï+“ß‘OV»AûéÝGThð<ÒÉn7í÷³ó‹é ”‘MvÓ~7µ®œW½žµÖôo7õñ{àØá™·-¹A‚G*ÿè › endstream endobj 2 0 obj <>endobj xref 0 9 0000000000 65535 f 0000000359 00000 n 0000002314 00000 n 0000000300 00000 n 0000000160 00000 n 0000000015 00000 n 0000000142 00000 n 0000000436 00000 n 0000000407 00000 n trailer << /Size 9 /Root 1 0 R /Info 2 0 R /ID [( œæ›eYšÓI„k÷Û)( œæ›eYšÓI„k÷Û)] >> startxref 2472 %%EOF ./asymptote-2.41/doc/linetype.asy0000644000175000017500000000064013064427076016657 0ustar norbertnorbertvoid testline(real y) { draw((0,y)--(100,y),currentpen+solid); draw((0,y-10)--(100,y-10),currentpen+dotted); draw((0,y-20)--(100,y-20),currentpen+dashed); draw((0,y-30)--(100,y-30),currentpen+longdashed); draw((0,y-40)--(100,y-40),currentpen+dashdotted); draw((0,y-50)--(100,y-50),currentpen+longdashdotted); draw((0,y-60)--(100,y-60),currentpen+Dotted); } currentpen=linewidth(0.5); testline(100); ./asymptote-2.41/memory.h0000644000175000017500000001167613064427076015237 0ustar norbertnorbert/**** * memory.h * * Interface to the Boehm Garbage Collector. *****/ #ifndef MEMORY_H #define MEMORY_H #include #include #include #include #include #include #ifndef NOHASH #ifdef HAVE_UNORDERED_MAP #include #include #define EXT std #else #ifdef HAVE_TR1_UNORDERED_MAP #include #define EXT std::tr1 #else #define EXT __gnu_cxx #include #define unordered_map hash_map #define unordered_multimap hash_multimap #endif #endif #endif #ifdef __DECCXX_LIBCXX_RH70 #define CONST #else #define CONST const #endif #ifdef USEGC #define GC_THREADS #include #ifdef GC_DEBUG extern "C" { #include } #endif inline void *asy_malloc(size_t n) { #ifdef GC_DEBUG if(void *mem=GC_debug_malloc_ignore_off_page(n, GC_EXTRAS)) #else if(void *mem=GC_malloc_ignore_off_page(n)) #endif return mem; throw std::bad_alloc(); } inline void *asy_malloc_atomic(size_t n) { #ifdef GC_DEBUG if(void *mem=GC_debug_malloc_atomic_ignore_off_page(n, GC_EXTRAS)) #else if(void *mem=GC_malloc_atomic_ignore_off_page(n)) #endif return mem; throw std::bad_alloc(); } #undef GC_MALLOC #undef GC_MALLOC_ATOMIC #define GC_MALLOC(sz) asy_malloc(sz) #define GC_MALLOC_ATOMIC(sz) asy_malloc_atomic(sz) #include #include #else // USEGC using std::allocator; #define gc_allocator allocator class gc {}; class gc_cleanup {}; enum GCPlacement {UseGC, NoGC, PointerFreeGC}; inline void* operator new(size_t size, GCPlacement) { return operator new(size); } inline void* operator new[](size_t size, GCPlacement) { return operator new(size); } template struct GC_type_traits {}; #define GC_DECLARE_PTRFREE(T) \ template<> struct GC_type_traits {} #endif // USEGC namespace mem { #define GC_CONTAINER(KIND) \ template \ struct KIND : public std::KIND >, public gc { \ KIND() : std::KIND >() {} \ KIND(size_t n) : std::KIND >(n) {} \ KIND(size_t n, const T& t) : std::KIND >(n,t) {} \ } GC_CONTAINER(list); GC_CONTAINER(vector); template > struct stack : public std::stack, public gc { }; #define PAIR_ALLOC gc_allocator > /* space */ #undef GC_CONTAINER #define GC_CONTAINER(KIND) \ template > \ struct KIND : public std::KIND, public gc \ { \ KIND() : std::KIND () {} \ } GC_CONTAINER(map); GC_CONTAINER(multimap); #undef GC_CONTAINER #ifndef NOHASH #define GC_CONTAINER(KIND) \ template , \ typename Eq = std::equal_to > \ struct KIND : public \ EXT::KIND, public gc { \ KIND() : EXT::KIND () {} \ KIND(size_t n) \ : EXT::KIND (n) {} \ } GC_CONTAINER(unordered_map); GC_CONTAINER(unordered_multimap); #undef GC_CONTAINER #undef EXT #endif #undef PAIR_ALLOC #ifdef USEGC typedef std::basic_string, gc_allocator > string; typedef std::basic_stringstream, gc_allocator > stringstream; typedef std::basic_istringstream, gc_allocator > istringstream; typedef std::basic_ostringstream, gc_allocator > ostringstream; typedef std::basic_stringbuf, gc_allocator > stringbuf; #if GC_TMP_VERSION_MAJOR >= 7 && GC_TMP_VERSION_MINOR > 1 inline void compact(int x) {GC_set_dont_expand(x);} #else inline void compact(int x) {GC_dont_expand=x;} #endif #else inline void compact(int x) {} typedef std::string string; typedef std::stringstream stringstream; typedef std::istringstream istringstream; typedef std::ostringstream ostringstream; typedef std::stringbuf stringbuf; #endif // USEGC } // namespace mem #endif ./asymptote-2.41/profile.py0000644000175000017500000000444313064427076015562 0ustar norbertnorbertimport sys from pprint import pprint # Unused line numbers required by kcachegrind. POS = '1' def nameFromNode(tree): name = tree['name'] pos = tree['pos'] if pos.endswith(": "): pos = pos[:-2] return (name, pos) def addFuncNames(tree, s): s.add(nameFromNode(tree)) for child in tree['children']: addFuncNames(child, s) def funcNames(tree): s = set() addFuncNames(tree, s) return s def computeTotals(tree): for child in tree['children']: computeTotals(child) tree['instTotal'] = (tree['instructions'] + sum(child['instTotal'] for child in tree['children'])) tree['nsecsTotal'] = (tree['nsecs'] + sum(child['nsecsTotal'] for child in tree['children'])) def printName(name, prefix=''): print prefix+"fl=", name[1] print prefix+"fn=", name[0] class Arc: def __init__(self): self.calls = 0 self.instTotal = 0 self.nsecsTotal = 0 def add(self, tree): self.calls += tree['calls'] self.instTotal += tree['instTotal'] self.nsecsTotal += tree['nsecsTotal'] class Func: def __init__(self): self.instructions = 0 self.nsecs = 0 self.arcs = {} def addChildTime(self, tree): arc = self.arcs.setdefault(nameFromNode(tree), Arc()) arc.add(tree) def analyse(self, tree): self.instructions += tree['instructions'] self.nsecs += tree['nsecs'] for child in tree['children']: self.addChildTime(child) def dump(self): print POS, self.instructions, self.nsecs for name in self.arcs: printName(name, prefix='c') arc = self.arcs[name] print "calls="+str(arc.calls), POS print POS, arc.instTotal, arc.nsecsTotal print def analyse(funcs, tree): funcs[nameFromNode(tree)].analyse(tree) for child in tree['children']: analyse(funcs, child) def dump(funcs): print "events: Instructions Nanoseconds" for name in funcs: printName(name) funcs[name].dump() rawdata = __import__("asyprof") profile = rawdata.profile computeTotals(profile) names = funcNames(profile) funcs = {} for name in names: funcs[name] = Func() analyse(funcs, profile) dump(funcs) #pprint(names) ./asymptote-2.41/camp.y0000644000175000017500000004707513064427076014672 0ustar norbertnorbert%{ /***** * camp.y * Andy Hammerlindl 08/12/2002 * * The grammar of the camp language. *****/ #include "errormsg.h" #include "exp.h" #include "newexp.h" #include "dec.h" #include "fundec.h" #include "stm.h" #include "modifier.h" #include "opsymbols.h" // Avoid error messages with unpatched bison-1.875: #ifndef __attribute__ #define __attribute__(x) #endif // Used when a position needs to be determined and no token is // available. Defined in camp.l. position lexerPos(); bool lexerEOF(); int yylex(void); /* function prototype */ void yyerror(const char *s) { if (!lexerEOF()) { em.error(lexerPos()); em << s; em.cont(); } } // Check if the symbol given is "keyword". Returns true in this case and // returns false and reports an error otherwise. bool checkKeyword(position pos, symbol sym) { if (sym != symbol::trans("keyword")) { em.error(pos); em << "expected 'keyword' here"; return false; } return true; } namespace absyntax { file *root; } using namespace absyntax; using sym::symbol; using mem::string; %} %union { position pos; bool boo; struct { position pos; sym::symbol sym; } ps; absyntax::name *n; absyntax::varinit *vi; absyntax::arrayinit *ai; absyntax::exp *e; absyntax::stringExp *stre; absyntax::specExp *se; absyntax::joinExp *j; absyntax::explist *elist; absyntax::argument arg; absyntax::arglist *alist; absyntax::slice *slice; absyntax::dimensions *dim; absyntax::ty *t; absyntax::decid *di; absyntax::decidlist *dil; absyntax::decidstart *dis; absyntax::runnable *run; struct { position pos; trans::permission val; } perm; struct { position pos; trans::modifier val; } mod; absyntax::modifierList *ml; //absyntax::program *prog; absyntax::vardec *vd; //absyntax::vardecs *vds; absyntax::dec *d; absyntax::idpair *ip; absyntax::idpairlist *ipl; absyntax::stm *s; absyntax::block *b; absyntax::stmExpList *sel; //absyntax::funheader *fh; absyntax::formal *fl; absyntax::formals *fls; } %token ID SELFOP DOTS COLONS DASHES INCR LONGDASH CONTROLS TENSION ATLEAST CURL COR CAND BAR AMPERSAND EQ NEQ LT LE GT GE CARETS '+' '-' '*' '/' '%' '#' '^' OPERATOR %token LOOSE ASSIGN '?' ':' DIRTAG JOIN_PREC AND '{' '}' '(' ')' '.' ',' '[' ']' ';' ELLIPSIS ACCESS UNRAVEL IMPORT INCLUDE FROM QUOTE STRUCT TYPEDEF NEW IF ELSE WHILE DO FOR BREAK CONTINUE RETURN_ THIS EXPLICIT GARBAGE %token LIT %token STRING %token PERM %token MODIFIER %right ASSIGN SELFOP %right '?' ':' %left COR %left CAND %left BAR %left AMPERSAND %left EQ NEQ %left LT LE GT GE %left OPERATOR %left CARETS %left JOIN_PREC DOTS COLONS DASHES INCR LONGDASH %left DIRTAG CONTROLS TENSION ATLEAST AND %left CURL '{' '}' %left '+' '-' %left '*' '/' '%' '#' LIT %left UNARY %right '^' %left EXP_IN_PARENS_RULE %left '(' ')' %type fileblock bareblock block %type name %type runnable %type modifiers %type dec fundec typedec %type strid %type idpair stridpair %type idpairlist stridpairlist %type vardec barevardec %type type celltype %type dims %type decidlist %type decid %type decidstart %type varinit %type arrayinit basearrayinit varinits %type formal %type formals %type value exp fortest %type argument %type slice %type join basicjoin %type tension controls %type dir %type dimexps %type arglist tuple %type stm stmexp blockstm %type forinit %type forupdate stmexplist %type explicitornot /* There are four shift/reduce conflicts: * the dangling ELSE in IF (exp) IF (exp) stm ELSE stm * new ID * the argument id=exp is taken as an argument instead of an assignExp * explicit cast */ %expect 4 /* Enable grammar debugging. */ /*%debug*/ %% file: fileblock { absyntax::root = $1; } ; fileblock: /* empty */ { $$ = new file(lexerPos(), false); } | fileblock runnable { $$ = $1; $$->add($2); } ; bareblock: /* empty */ { $$ = new block(lexerPos(), true); } | bareblock runnable { $$ = $1; $$->add($2); } ; name: ID { $$ = new simpleName($1.pos, $1.sym); } | name '.' ID { $$ = new qualifiedName($2, $1, $3.sym); } | '%' { $$ = new simpleName($1.pos, symbol::trans("operator answer")); } ; runnable: dec { $$ = $1; } | stm { $$ = $1; } | modifiers dec { $$ = new modifiedRunnable($1->getPos(), $1, $2); } | modifiers stm { $$ = new modifiedRunnable($1->getPos(), $1, $2); } ; modifiers: MODIFIER { $$ = new modifierList($1.pos); $$->add($1.val); } | PERM { $$ = new modifierList($1.pos); $$->add($1.val); } | modifiers MODIFIER { $$ = $1; $$->add($2.val); } | modifiers PERM { $$ = $1; $$->add($2.val); } ; dec: vardec { $$ = $1; } | fundec { $$ = $1; } | typedec { $$ = $1; } | ACCESS stridpairlist ';' { $$ = new accessdec($1, $2); } | FROM name UNRAVEL idpairlist ';' { $$ = new unraveldec($1, $2, $4); } | FROM name UNRAVEL '*' ';' { $$ = new unraveldec($1, $2, WILDCARD); } | UNRAVEL name ';' { $$ = new unraveldec($1, $2, WILDCARD); } | FROM strid ACCESS idpairlist ';' { $$ = new fromaccessdec($1, $2.sym, $4); } | FROM strid ACCESS '*' ';' { $$ = new fromaccessdec($1, $2.sym, WILDCARD); } | IMPORT stridpair ';' { $$ = new importdec($1, $2); } | INCLUDE ID ';' { $$ = new includedec($1, $2.sym); } | INCLUDE STRING ';' { $$ = new includedec($1, $2->getString()); } ; idpair: ID { $$ = new idpair($1.pos, $1.sym); } /* ID 'as' ID */ | ID ID ID { $$ = new idpair($1.pos, $1.sym, $2.sym , $3.sym); } ; idpairlist: idpair { $$ = new idpairlist(); $$->add($1); } | idpairlist ',' idpair { $$ = $1; $$->add($3); } ; strid: ID { $$ = $1; } | STRING { $$.pos = $1->getPos(); $$.sym = symbol::literalTrans($1->getString()); } ; stridpair: ID { $$ = new idpair($1.pos, $1.sym); } /* strid 'as' ID */ | strid ID ID { $$ = new idpair($1.pos, $1.sym, $2.sym , $3.sym); } ; stridpairlist: stridpair { $$ = new idpairlist(); $$->add($1); } | stridpairlist ',' stridpair { $$ = $1; $$->add($3); } ; vardec: barevardec ';' { $$ = $1; } ; barevardec: type decidlist { $$ = new vardec($1->getPos(), $1, $2); } ; type: celltype { $$ = $1; } | name dims { $$ = new arrayTy($1, $2); } ; celltype: name { $$ = new nameTy($1); } ; dims: '[' ']' { $$ = new dimensions($1); } | dims '[' ']' { $$ = $1; $$->increase(); } ; dimexps: '[' exp ']' { $$ = new explist($1); $$->add($2); } | dimexps '[' exp ']' { $$ = $1; $$->add($3); } ; decidlist: decid { $$ = new decidlist($1->getPos()); $$->add($1); } | decidlist ',' decid { $$ = $1; $$->add($3); } ; decid: decidstart { $$ = new decid($1->getPos(), $1); } | decidstart ASSIGN varinit { $$ = new decid($1->getPos(), $1, $3); } ; decidstart: ID { $$ = new decidstart($1.pos, $1.sym); } | ID dims { $$ = new decidstart($1.pos, $1.sym, $2); } | ID '(' ')' { $$ = new fundecidstart($1.pos, $1.sym, 0, new formals($2)); } | ID '(' formals ')' { $$ = new fundecidstart($1.pos, $1.sym, 0, $3); } ; varinit: exp { $$ = $1; } | arrayinit { $$ = $1; } ; block: '{' bareblock '}' { $$ = $2; } ; arrayinit: '{' '}' { $$ = new arrayinit($1); } | '{' ELLIPSIS varinit '}' { $$ = new arrayinit($1); $$->addRest($3); } | '{' basearrayinit '}' { $$ = $2; } | '{' basearrayinit ELLIPSIS varinit '}' { $$ = $2; $$->addRest($4); } ; basearrayinit: ',' { $$ = new arrayinit($1); } | varinits { $$ = $1; } | varinits ',' { $$ = $1; } ; varinits: varinit { $$ = new arrayinit($1->getPos()); $$->add($1);} | varinits ',' varinit { $$ = $1; $$->add($3); } ; formals: formal { $$ = new formals($1->getPos()); $$->add($1); } | ELLIPSIS formal { $$ = new formals($1); $$->addRest($2); } | formals ',' formal { $$ = $1; $$->add($3); } | formals ELLIPSIS formal { $$ = $1; $$->addRest($3); } ; explicitornot: EXPLICIT { $$ = true; } | { $$ = false; } ; formal: explicitornot type { $$ = new formal($2->getPos(), $2, 0, 0, $1, 0); } | explicitornot type decidstart { $$ = new formal($2->getPos(), $2, $3, 0, $1, 0); } | explicitornot type decidstart ASSIGN varinit { $$ = new formal($2->getPos(), $2, $3, $5, $1, 0); } /* The uses of ID below are 'keyword' qualifiers before the parameter name. */ | explicitornot type ID decidstart { bool k = checkKeyword($3.pos, $3.sym); $$ = new formal($2->getPos(), $2, $4, 0, $1, k); } | explicitornot type ID decidstart ASSIGN varinit { bool k = checkKeyword($3.pos, $3.sym); $$ = new formal($2->getPos(), $2, $4, $6, $1, k); } ; fundec: type ID '(' ')' blockstm { $$ = new fundec($3, $1, $2.sym, new formals($3), $5); } | type ID '(' formals ')' blockstm { $$ = new fundec($3, $1, $2.sym, $4, $6); } ; typedec: STRUCT ID block { $$ = new recorddec($1, $2.sym, $3); } | TYPEDEF vardec { $$ = new typedec($1, $2); } ; slice: ':' { $$ = new slice($1, 0, 0); } | exp ':' { $$ = new slice($2, $1, 0); } | ':' exp { $$ = new slice($1, 0, $2); } | exp ':' exp { $$ = new slice($2, $1, $3); } ; value: value '.' ID { $$ = new fieldExp($2, $1, $3.sym); } | name '[' exp ']' { $$ = new subscriptExp($2, new nameExp($1->getPos(), $1), $3); } | value '[' exp ']'{ $$ = new subscriptExp($2, $1, $3); } | name '[' slice ']' { $$ = new sliceExp($2, new nameExp($1->getPos(), $1), $3); } | value '[' slice ']'{ $$ = new sliceExp($2, $1, $3); } | name '(' ')' { $$ = new callExp($2, new nameExp($1->getPos(), $1), new arglist()); } | name '(' arglist ')' { $$ = new callExp($2, new nameExp($1->getPos(), $1), $3); } | value '(' ')' { $$ = new callExp($2, $1, new arglist()); } | value '(' arglist ')' { $$ = new callExp($2, $1, $3); } | '(' exp ')' %prec EXP_IN_PARENS_RULE { $$ = $2; } | '(' name ')' %prec EXP_IN_PARENS_RULE { $$ = new nameExp($2->getPos(), $2); } | THIS { $$ = new thisExp($1); } ; argument: exp { $$.name = symbol::nullsym; $$.val=$1; } | ID ASSIGN exp { $$.name = $1.sym; $$.val=$3; } ; arglist: argument { $$ = new arglist(); $$->add($1); } | ELLIPSIS argument { $$ = new arglist(); $$->addRest($2); } | arglist ',' argument { $$ = $1; $$->add($3); } | arglist ELLIPSIS argument { $$ = $1; $$->addRest($3); } ; /* A list of two or more expressions, separated by commas. */ tuple: exp ',' exp { $$ = new arglist(); $$->add($1); $$->add($3); } | tuple ',' exp { $$ = $1; $$->add($3); } ; exp: name { $$ = new nameExp($1->getPos(), $1); } | value { $$ = $1; } | LIT { $$ = $1; } | STRING { $$ = $1; } /* This is for scaling expressions such as 105cm */ | LIT exp { $$ = new scaleExp($1->getPos(), $1, $2); } | '(' name ')' exp { $$ = new castExp($2->getPos(), new nameTy($2), $4); } | '(' name dims ')' exp { $$ = new castExp($2->getPos(), new arrayTy($2, $3), $5); } | '+' exp %prec UNARY { $$ = new unaryExp($1.pos, $2, $1.sym); } | '-' exp %prec UNARY { $$ = new unaryExp($1.pos, $2, $1.sym); } | OPERATOR exp { $$ = new unaryExp($1.pos, $2, $1.sym); } | exp '+' exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp '-' exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp '*' exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp '/' exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp '%' exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp '#' exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp '^' exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp LT exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp LE exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp GT exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp GE exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp EQ exp { $$ = new equalityExp($2.pos, $1, $2.sym, $3); } | exp NEQ exp { $$ = new equalityExp($2.pos, $1, $2.sym, $3); } | exp CAND exp { $$ = new andExp($2.pos, $1, $2.sym, $3); } | exp COR exp { $$ = new orExp($2.pos, $1, $2.sym, $3); } | exp CARETS exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp AMPERSAND exp{ $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp BAR exp{ $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp OPERATOR exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | exp INCR exp { $$ = new binaryExp($2.pos, $1, $2.sym, $3); } | NEW celltype { $$ = new newRecordExp($1, $2); } | NEW celltype dimexps { $$ = new newArrayExp($1, $2, $3, 0, 0); } | NEW celltype dimexps dims { $$ = new newArrayExp($1, $2, $3, $4, 0); } | NEW celltype dims { $$ = new newArrayExp($1, $2, 0, $3, 0); } | NEW celltype dims arrayinit { $$ = new newArrayExp($1, $2, 0, $3, $4); } | NEW celltype '(' ')' blockstm { $$ = new newFunctionExp($1, $2, new formals($3), $5); } | NEW celltype dims '(' ')' blockstm { $$ = new newFunctionExp($1, new arrayTy($2->getPos(), $2, $3), new formals($4), $6); } | NEW celltype '(' formals ')' blockstm { $$ = new newFunctionExp($1, $2, $4, $6); } | NEW celltype dims '(' formals ')' blockstm { $$ = new newFunctionExp($1, new arrayTy($2->getPos(), $2, $3), $5, $7); } | exp '?' exp ':' exp { $$ = new conditionalExp($2, $1, $3, $5); } | exp ASSIGN exp { $$ = new assignExp($2, $1, $3); } | '(' tuple ')' { $$ = new callExp($1, new nameExp($1, SYM_TUPLE), $2); } | exp join exp %prec JOIN_PREC { $2->pushFront($1); $2->pushBack($3); $$ = $2; } | exp dir %prec DIRTAG { $2->setSide(camp::OUT); joinExp *jexp = new joinExp($2->getPos(), SYM_DOTS); $$=jexp; jexp->pushBack($1); jexp->pushBack($2); } | INCR exp %prec UNARY { $$ = new prefixExp($1.pos, $2, SYM_PLUS); } | DASHES exp %prec UNARY { $$ = new prefixExp($1.pos, $2, SYM_MINUS); } /* Illegal - will be caught during translation. */ | exp INCR %prec UNARY { $$ = new postfixExp($2.pos, $1, SYM_PLUS); } | exp SELFOP exp { $$ = new selfExp($2.pos, $1, $2.sym, $3); } | QUOTE '{' fileblock '}' { $$ = new quoteExp($1, $3); } ; // This verbose definition is because leaving empty as an expansion for dir // made a whack of reduce/reduce errors. join: DASHES { $$ = new joinExp($1.pos,$1.sym); } | basicjoin %prec JOIN_PREC { $$ = $1; } | dir basicjoin %prec JOIN_PREC { $1->setSide(camp::OUT); $$ = $2; $$->pushFront($1); } | basicjoin dir %prec JOIN_PREC { $2->setSide(camp::IN); $$ = $1; $$->pushBack($2); } | dir basicjoin dir %prec JOIN_PREC { $1->setSide(camp::OUT); $3->setSide(camp::IN); $$ = $2; $$->pushFront($1); $$->pushBack($3); } ; dir: '{' CURL exp '}' { $$ = new specExp($2.pos, $2.sym, $3); } | '{' exp '}' { $$ = new specExp($1, symbol::opTrans("spec"), $2); } | '{' exp ',' exp '}' { $$ = new specExp($1, symbol::opTrans("spec"), new pairExp($3, $2, $4)); } | '{' exp ',' exp ',' exp '}' { $$ = new specExp($1, symbol::opTrans("spec"), new tripleExp($3, $2, $4, $6)); } ; basicjoin: DOTS { $$ = new joinExp($1.pos, $1.sym); } | DOTS tension DOTS { $$ = new joinExp($1.pos, $1.sym); $$->pushBack($2); } | DOTS controls DOTS { $$ = new joinExp($1.pos, $1.sym); $$->pushBack($2); } | COLONS { $$ = new joinExp($1.pos, $1.sym); } | LONGDASH { $$ = new joinExp($1.pos, $1.sym); } ; tension: TENSION exp { $$ = new binaryExp($1.pos, $2, $1.sym, new booleanExp($1.pos, false)); } | TENSION exp AND exp { $$ = new ternaryExp($1.pos, $2, $1.sym, $4, new booleanExp($1.pos, false)); } | TENSION ATLEAST exp { $$ = new binaryExp($1.pos, $3, $1.sym, new booleanExp($2.pos, true)); } | TENSION ATLEAST exp AND exp { $$ = new ternaryExp($1.pos, $3, $1.sym, $5, new booleanExp($2.pos, true)); } ; controls: CONTROLS exp { $$ = new unaryExp($1.pos, $2, $1.sym); } | CONTROLS exp AND exp { $$ = new binaryExp($1.pos, $2, $1.sym, $4); } ; stm: ';' { $$ = new emptyStm($1); } | blockstm { $$ = $1; } | stmexp ';' { $$ = $1; } | IF '(' exp ')' stm { $$ = new ifStm($1, $3, $5); } | IF '(' exp ')' stm ELSE stm { $$ = new ifStm($1, $3, $5, $7); } | WHILE '(' exp ')' stm { $$ = new whileStm($1, $3, $5); } | DO stm WHILE '(' exp ')' ';' { $$ = new doStm($1, $2, $5); } | FOR '(' forinit ';' fortest ';' forupdate ')' stm { $$ = new forStm($1, $3, $5, $7, $9); } | FOR '(' type ID ':' exp ')' stm { $$ = new extendedForStm($1, $3, $4.sym, $6, $8); } | BREAK ';' { $$ = new breakStm($1); } | CONTINUE ';' { $$ = new continueStm($1); } | RETURN_ ';' { $$ = new returnStm($1); } | RETURN_ exp ';' { $$ = new returnStm($1, $2); } ; stmexp: exp { $$ = new expStm($1->getPos(), $1); } ; blockstm: block { $$ = new blockStm($1->getPos(), $1); } ; forinit: /* empty */ { $$ = 0; } | stmexplist { $$ = $1; } | barevardec { $$ = $1; } ; fortest: /* empty */ { $$ = 0; } | exp { $$ = $1; } ; forupdate: /* empty */ { $$ = 0; } | stmexplist { $$ = $1; } ; stmexplist: stmexp { $$ = new stmExpList($1->getPos()); $$->add($1); } | stmexplist ',' stmexp { $$ = $1; $$->add($3); } ; ./asymptote-2.41/drawpath.cc0000644000175000017500000000667613064427076015703 0ustar norbertnorbert/***** * drawpath.cc * Andy Hammerlindl 2002/06/06 * * Stores a path that has been added to a picture. *****/ #include #include #include #include "drawpath.h" #include "psfile.h" #include "util.h" using vm::array; using vm::read; namespace camp { double PatternLength(double arclength, const array& pat, bool cyclic, double penwidth) { double sum=0.0; size_t n=pat.size(); for(unsigned i=0; i < n; i ++) sum += read(pat,i)*penwidth; if(sum == 0.0) return 0.0; if(n % 2 == 1) sum *= 2.0; // On/off pattern repeats after 2 cycles. double pat0=read(pat,0); // Fix bounding box resolution problem. Example: // asy -f pdf testlinetype; gv -scale -2 testlinetype.pdf if(!cyclic && pat0 == 0) sum += 1.0e-3*penwidth; double terminator=(cyclic && arclength >= 0.5*sum) ? 0.0 : pat0*penwidth; int ncycle=(int)((arclength-terminator)/sum+0.5); return (ncycle >= 1 || terminator >= 0.75*arclength) ? ncycle*sum+terminator : 0.0; } bool isdashed(pen& p) { const LineType *linetype=p.linetype(); size_t n=linetype->pattern.size(); return n > 0; } pen adjustdash(pen& p, double arclength, bool cyclic) { pen q=p; // Adjust dash sizes to fit arclength; also compensate for linewidth. const LineType *linetype=q.linetype(); size_t n=linetype->pattern.size(); if(n > 0) { double penwidth=linetype->scale ? q.width() : 1.0; double factor=penwidth; if(linetype->adjust && arclength) { double denom=PatternLength(arclength,linetype->pattern,cyclic,penwidth); if(denom != 0.0) factor *= arclength/denom; } if(factor != 1.0) q.adjust(max(factor,0.1)); } return q; } // Account for square or extended pen cap contributions to bounding box. void cap(bbox& b, double t, path p, pen pentype) { transform T=pentype.getTransform(); double h=0.5*pentype.width(); pair v=p.dir(t); transform S=rotate(conj(v))*shiftless(T); double xx=S.getxx(), xy=S.getxy(); double yx=S.getyx(), yy=S.getyy(); double y=hypot(yx,yy); if(y == 0) return; double numer=xx*yx+xy*yy; double x=numer/y; pair z=shift(T)*p.point(t); switch(pentype.cap()) { case 0: { pair d=rotate(v)*pair(x,y)*h; b += z+d; b += z-d; break; } case 2: { transform R=rotate(v); double w=(xx*yy-xy*yx)/y; pair dp=R*pair(x+w,y)*h; pair dm=R*pair(x-w,y)*h; b += z+dp; b += z+dm; b += z-dp; b += z-dm; break; } } } void drawPathPenBase::strokebounds(bbox& b, const path& p) { Int l=p.length(); if(l < 0) return; bbox penbounds=pentype.bounds(); if(cyclic() || pentype.cap() == 1) { b += pad(p.bounds(),penbounds); return; } b += p.internalbounds(penbounds); cap(b,0,p,pentype); cap(b,l,p,pentype); } bool drawPath::draw(psfile *out) { Int n = p.size(); if (n == 0 || pentype.invisible()) return true; pen q=isdashed(pentype) ? adjustdash(pentype, p.transformed(inverse(pentype.getTransform())).arclength(), p.cyclic()) : pentype; penSave(out); penTranslate(out); if(n > 1) out->write(p); else out->dot(p,q); penConcat(out); out->setpen(q); out->stroke(q,n == 1); penRestore(out); return true; } drawElement *drawPath::transformed(const transform& t) { return new drawPath(transpath(t), transpen(t)); } } //namespace camp ./asymptote-2.41/drawgsave.h0000644000175000017500000000072213064427076015700 0ustar norbertnorbert/***** * drawgsave.h * John Bowman * * Output PostScript gsave to picture. *****/ #ifndef DRAWGSAVE_H #define DRAWGSAVE_H #include "drawelement.h" namespace camp { class drawGsave : public drawElement { public: drawGsave() {} virtual ~drawGsave() {} bool draw(psfile *out) { out->gsave(); return true; } bool write(texfile *out, const bbox&) { out->gsave(); return true; } }; } GC_DECLARE_PTRFREE(camp::drawGsave); #endif ./asymptote-2.41/builtin.symbols.h0000644000175000017500000000343113064427142017044 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(VERSION); ADDSYMBOL(a); ADDSYMBOL(abs); ADDSYMBOL(acos); ADDSYMBOL(acosh); ADDSYMBOL(alias); ADDSYMBOL(array); ADDSYMBOL(asin); ADDSYMBOL(asinh); ADDSYMBOL(atan); ADDSYMBOL(atanh); ADDSYMBOL(b); ADDSYMBOL(cbrt); ADDSYMBOL(concat); ADDSYMBOL(conj); ADDSYMBOL(copy); ADDSYMBOL(cos); ADDSYMBOL(cosh); ADDSYMBOL(currentpen); ADDSYMBOL(depth); ADDSYMBOL(diagonal); ADDSYMBOL(e); ADDSYMBOL(exp); ADDSYMBOL(expm1); ADDSYMBOL(f); ADDSYMBOL(fabs); ADDSYMBOL(file); ADDSYMBOL(identity); ADDSYMBOL(inf); ADDSYMBOL(infinity); ADDSYMBOL(initialized); ADDSYMBOL(intMax); ADDSYMBOL(intMin); ADDSYMBOL(interp); ADDSYMBOL(key); ADDSYMBOL(ldexp); ADDSYMBOL(less); ADDSYMBOL(log); ADDSYMBOL(log10); ADDSYMBOL(log1p); ADDSYMBOL(map); ADDSYMBOL(max); ADDSYMBOL(maxbound); ADDSYMBOL(min); ADDSYMBOL(minbound); ADDSYMBOL(n); ADDSYMBOL(nan); ADDSYMBOL(perm); ADDSYMBOL(pi); ADDSYMBOL(pow10); ADDSYMBOL(printBytecode); ADDSYMBOL(randMax); ADDSYMBOL(realDigits); ADDSYMBOL(realEpsilon); ADDSYMBOL(realMax); ADDSYMBOL(realMin); ADDSYMBOL(s); ADDSYMBOL(search); ADDSYMBOL(sequence); ADDSYMBOL(sin); ADDSYMBOL(sinh); ADDSYMBOL(sort); ADDSYMBOL(sqrt); ADDSYMBOL(suffix); ADDSYMBOL(sum); ADDSYMBOL(t); ADDSYMBOL(tan); ADDSYMBOL(tanh); ADDSYMBOL(transpose); ADDSYMBOL(value); ADDSYMBOL(write); ADDSYMBOL(x); ADDSYMBOL(xx); ADDSYMBOL(xy); ADDSYMBOL(y); ADDSYMBOL(yx); ADDSYMBOL(yy); ADDSYMBOL(z); ./asymptote-2.41/quaternion.cc0000644000175000017500000001351313064427076016242 0ustar norbertnorbert/*********************************************************************** quaternion.cc - A quaternion class ------------------------------------------------------------------- GLUI User Interface Toolkit (LGPL) Copyright (c) 1998 Paul Rademacher WWW: http://sourceforge.net/projects/glui/ Forums: http://sourceforge.net/forum/?group_id=92496 This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA ************************************************************************ Feb 1998, Paul Rademacher (rademach@cs.unc.edu) Oct 2003, Nigel Stewart - GLUI Code Cleaning ************************************************************************/ #include "quaternion.h" #include /******************************************* constructors **************/ quat::quat() { *this = quat_identity(); } quat::quat(const float x, const float y, const float z, const float w) { v.set( x, y, z ); s = w; } quat::quat(const vec3 &_v, const float _s) { set( _v, _s ); } quat::quat(const float _s, const vec3 &_v) { set( _v, _s ); } quat::quat(const float *d) { v[0] = d[0]; v[1] = d[1]; v[2] = d[2]; s = d[3]; } quat::quat(const double *d) { v[0] = (float) d[0]; v[1] = (float) d[1]; v[2] = (float) d[2]; s = (float) d[3]; } quat::quat(const quat &q) { v = q.v; s = q.s; } void quat::set(const vec3 &_v, const float _s) { v = _v; s = _s; } quat &quat::operator=(const quat &q) { v = q.v; s = q.s; return *this; } /******** quat friends ************/ quat operator + (const quat &a, const quat &b) { return quat( a.s+b.s, a.v+b.v ); } quat operator - (const quat &a, const quat &b) { return quat( a.s-b.s, a.v-b.v ); } quat operator - (const quat &a ) { return quat( -a.s, -a.v ); } quat operator * ( const quat &a, const quat &b) { return quat( a.s*b.s - a.v*b.v, a.s*b.v + b.s*a.v + (a.v^b.v) ); } quat operator * ( const quat &a, const float t) { return quat( a.v * t, a.s * t ); } quat operator * ( const float t, const quat &a ) { return quat( a.v * t, a.s * t ); } mat4 quat::to_mat4() const { float xs, ys, zs, wx, wy, wz, xx, xy, xz, yy, yz, zz; float t = 2.0f / (v*v + s*s); xs = v[VX]*t; ys = v[VY]*t; zs = v[VZ]*t; wx = s*xs; wy = s*ys; wz = s*zs; xx = v[VX]*xs; xy = v[VX]*ys; xz = v[VX]*zs; yy = v[VY]*ys; yz = v[VY]*zs; zz = v[VZ]*zs; mat4 matrix( 1.0f-(yy+zz), xy+wz, xz-wy, 0.0f, xy-wz, 1.0f-(xx+zz), yz+wx, 0.0f, xz+wy, yz-wx, 1.0f-(xx+yy), 0.0f, 0.0f, 0.0f, 0.0f, 1.0f ); return matrix; } /************************************************* quat_identity() *****/ /* Returns quaternion identity element */ quat quat_identity() { return quat( vec3( 0.0, 0.0, 0.0 ), 1.0 ); } /************************************************ quat_slerp() ********/ /* Quaternion spherical interpolation */ quat quat_slerp(const quat &from, const quat &to, float t) { quat to1; float omega, cosom, sinom, scale0, scale1; /* calculate cosine */ cosom = from.v * to.v + from.s + to.s; /* Adjust signs (if necessary) */ if ( cosom < 0.0 ) { cosom = -cosom; to1 = -to; } else { to1 = to; } /* Calculate coefficients */ if ((1.0 - cosom) > FUDGE ) { /* standard case (slerp) */ omega = (float) acos( cosom ); sinom = (float) sin( omega ); scale0 = (float) sin((1.0 - t) * omega) / sinom; scale1 = (float) sin(t * omega) / sinom; } else { /* 'from' and 'to' are very close - just do linear interpolation */ scale0 = 1.0f - t; scale1 = t; } return scale0 * from + scale1 * to1; } /********************************************** set_angle() ************/ /* set rot angle (degrees) */ void quat::set_angle(float f) { vec3 axis = get_axis(); static const double halfradians=acos(-1.0)/360.0; f *= halfradians; s = (float) cos( f ); v = axis * (float) sin( f ); } /********************************************** scale_angle() ************/ /* scale rot angle (degrees) */ void quat::scale_angle(float f) { set_angle( f * get_angle() ); } /********************************************** get_angle() ************/ /* get rot angle (degrees). Assumes s is between -1 and 1 */ float quat::get_angle() const { static const double degrees2=360.0/acos(-1.0); return (float) (acos( s ) * degrees2); } /********************************************* get_axis() **************/ vec3 quat::get_axis() const { float scale = (float) sin( acos( s ) ); if ( scale < FUDGE && scale > -FUDGE ) return vec3( 0.0, 0.0, 0.0 ); else return v / scale; } /******************************************* quat::print() ************/ void quat::print(FILE *dest, const char *name) const { fprintf( dest, "%s: v:<%3.2f %3.2f %3.2f> s:%3.2f\n", name, v[0], v[1], v[2], s ); } ./asymptote-2.41/record.cc0000644000175000017500000000325013064427076015330 0ustar norbertnorbert/***** * record.cc * Tom Prince 2004/07/15 * * The type for records and modules in the language. *****/ #include "record.h" #include "inst.h" #include "runtime.h" #include "coder.h" namespace types { record::record(symbol name, frame *level) : ty(ty_record), name(name), level(level), init(new vm::lambda), e() { assert(init); #ifdef DEBUG_FRAME init->name = "struct "+string(name); #endif } record::~record() {} record *record::newRecord(symbol id, bool statically) { frame *underlevel = getLevel(statically); assert(underlevel); frame *level = new frame(id, underlevel, 0); record *r = new record(id, level); return r; } // Initialize to null by default. trans::access *record::initializer() { static trans::bltinAccess a(run::pushNullRecord); return &a; } dummyRecord::dummyRecord(symbol name) : record(name, new frame(name, 0,0)) { // Encode the instructions to put an placeholder instance of the record // on the stack. trans::coder c(nullPos, this, 0); c.closeRecord(); } dummyRecord::dummyRecord(string s) : record (symbol::trans(s), new frame(s,0,0)) { // Encode the instructions to put an placeholder instance of the record // on the stack. trans::coder c(nullPos, this, 0); c.closeRecord(); } void dummyRecord::add(string name, ty *t, trans::access *a, trans::permission perm) { e.addVar(symbol::trans(name), new trans::varEntry(t, a, perm, this, this, position())); } void dummyRecord::add(string name, function *t, vm::bltin f, trans::permission perm) { REGISTER_BLTIN(f, name); add(name, t, new trans::bltinAccess(f), perm); } } // namespace types ./asymptote-2.41/runtime.h0000644000175000017500000000221313064427126015371 0ustar norbertnorbert/***** Autogenerated from runtime.in; changes will be overwritten *****/ #ifndef runtime_H #define runtime_H namespace run { void IntZero(vm::stack *); void realZero(vm::stack *); void boolFalse(vm::stack *); void pushNullArray(vm::stack *); void pushNullRecord(vm::stack *); void pushNullFunction(vm::stack *); void pushDefault(vm::stack *); void isDefault(vm::stack *); void pairToGuide(vm::stack *); void pathToGuide(vm::stack *); void guideToPath(vm::stack *); void newPen(vm::stack *); void loadModule(vm::stack *); void nullGuide(vm::stack *); void dotsGuide(vm::stack *); void dashesGuide(vm::stack *); void newCycleToken(vm::stack *); void curlSpecifierValuePart(vm::stack *); void curlSpecifierSidePart(vm::stack *); void tensionSpecifierOutPart(vm::stack *); void tensionSpecifierInPart(vm::stack *); void tensionSpecifierAtleastPart(vm::stack *); void transformXPart(vm::stack *); void transformYPart(vm::stack *); void transformXXPart(vm::stack *); void transformXYPart(vm::stack *); void transformYXPart(vm::stack *); void transformYYPart(vm::stack *); void real6ToTransform(vm::stack *); void transformIdentity(vm::stack *); } #endif // runtime_H ./asymptote-2.41/parser.h0000644000175000017500000000152413064427076015212 0ustar norbertnorbert/***** * parser.h * Tom Prince 2004/01/10 * *****/ #ifndef PARSER_H #define PARSER_H #include "common.h" #include "absyn.h" namespace parser { // Opens and parses the file returning the abstract syntax tree. If // there is an unrecoverable parse error, returns null. absyntax::file *parseFile(const string& filename, const char *nameOfAction); // Parses string and returns the abstract syntax tree. Any error in lexing or // parsing will be reported and a handled_error thrown. If the string is // "extendable", then a parse error simply due to running out of input will not // throw an exception, but will return null. absyntax::file *parseString(const string& code, const string& filename, bool extendable=false); } // namespace parser #endif // PARSER_H ./asymptote-2.41/base/0000755000175000017500000000000013064427331014447 5ustar norbertnorbert./asymptote-2.41/base/interpolate.asy0000644000175000017500000000755013064427076017530 0ustar norbertnorbert// Lagrange and Hermite interpolation in Asymptote // Author: Olivier Guibé // Acknowledgements: Philippe Ivaldi // diffdiv(x,y) computes Newton's Divided Difference for // Lagrange interpolation with distinct values {x_0,..,x_n} in the array x // and values y_0,...,y_n in the array y, // hdiffdiv(x,y,dyp) computes Newton's Divided Difference for // Hermite interpolation where dyp={dy_0,...,dy_n}. // // fhorner(x,coeff) uses Horner's rule to compute the polynomial // a_0+a_1(x-x_0)+a_2(x-x_0)(x-x_1)+...+a_n(x-x_0)..(x-x_{n-1}), // where coeff={a_0,a_1,...,a_n}. // fspline does standard cubic spline interpolation of a function f // on the interval [a,b]. // The points a=x_1 < x_2 < .. < x_n=b form the array x; // the points y_1=f(x_1),....,y_n=f(x_n) form the array y // We use the Hermite form for the spline. // The syntax is: // s=fspline(x,y); default not_a_knot condition // s=fspline(x,y,natural); natural spline // s=fspline(x,y,periodic); periodic spline // s=fspline(x,y,clamped(1,1)); clamped spline // s=fspline(x,y,monotonic); piecewise monotonic spline // Here s is a real function that is constant on (-infinity,a] and [b,infinity). private import math; import graph_splinetype; typedef real fhorner(real); struct horner { // x={x0,..,xn}(not necessarily distinct) // a={a0,..,an} corresponds to the polyonmial // a_0+a_1(x-x_0)+a_2(x-x_0)(x-x_1)+...+a_n(x-x_0)..(x-x_{n-1}), real[] x; real[] a; } // Evaluate p(x)=d0+(x-x0)(d1+(x-x1)+...+(d(n-1)+(x-x(n-1))*dn))) // via Horner's rule: n-1 multiplications, 2n-2 additions. fhorner fhorner(horner sh) { int n=sh.x.length; checklengths(n,sh.a.length); return new real(real x) { real s=sh.a[n-1]; for(int k=n-2; k >= 0; --k) s=sh.a[k]+(x-sh.x[k])*s; return s; }; } // Newton's Divided Difference method: n(n-1)/2 divisions, n(n-1) additions. horner diffdiv(real[] x, real[] y) { int n=x.length; horner s; checklengths(n,y.length); for(int i=0; i < n; ++i) s.a[i]=y[i]; for(int k=0; k < n-1; ++k) { for(int i=n-1; i > k; --i) { s.a[i]=(s.a[i]-s.a[i-1])/(x[i]-x[i-k-1]); } } s.x=x; return s; } // Newton's Divided Difference for simple Hermite interpolation, // where one specifies both p(x_i) and p'(x_i). horner hdiffdiv(real[] x, real[] y, real[] dy) { int n=x.length; horner s; checklengths(n,y.length); checklengths(n,dy.length); for(int i=0; i < n; ++i) { s.a[2*i]=y[i]; s.a[2*i+1]=dy[i]; s.x[2*i]=x[i]; s.x[2*i+1]=x[i]; } for(int i=n-1; i > 0; --i) s.a[2*i]=(s.a[2*i]-s.a[2*i-2])/(x[i]-x[i-1]); int stop=2*n-1; for(int k=1; k < stop; ++k) { for(int i=stop; i > k; --i) { s.a[i]=(s.a[i]-s.a[i-1])/(s.x[i]-s.x[i-k-1]); } } return s; } typedef real realfunction(real); // piecewise Hermite interpolation: // return the piecewise polynomial p(x), where on [x_i,x_i+1], deg(p) <= 3, // p(x_i)=y_i, p(x_{i+1})=y_i+1, p'(x_i)=dy_i, and p'(x_{i+1})=dy_i+1. // Outside [x_1,x_n] the returned function is constant: y_1 on (infinity,x_1] // and y_n on [x_n,infinity). realfunction pwhermite(real[] x, real[] y, real[] dy) { int n=x.length; checklengths(n,y.length); checklengths(n,dy.length); if(n < 2) abort(morepoints); if(!increasing(x,strict=true)) abort("array x is not strictly increasing"); return new real(real t) { int i=search(x,t); if(i == n-1) { i=n-2; t=x[n-1]; } else if(i == -1) { i=0; t=x[0]; } real h=x[i+1]-x[i]; real delta=(y[i+1]-y[i])/h; real e=(3*delta-2*dy[i]-dy[i+1])/h; real f=(dy[i]-2*delta+dy[i+1])/h^2; real s=t-x[i]; return y[i]+s*(dy[i]+s*(e+s*f)); }; } realfunction fspline(real[] x, real[] y, splinetype splinetype=notaknot) { real[] dy=splinetype(x,y); return new real(real t) { return pwhermite(x,y,dy)(t); }; } ./asymptote-2.41/base/graph_settings.asy0000644000175000017500000000047213064427076020217 0ustar norbertnorbert// Number of function samples. int ngraph=100; int nCircle=400; // Number of mesh intervals. int nmesh=10; real ticksize=1mm; real Ticksize=2*ticksize; real ylabelwidth=2.0; real axislabelfactor=1.5; real axiscoverage=0.8; real epsilon=10*realEpsilon; restricted bool Crop=true; restricted bool NoCrop=false; ./asymptote-2.41/base/plain.asy0000644000175000017500000001564513064427076016311 0ustar norbertnorbert/***** * plain.asy * Andy Hammerlindl and John Bowman 2004/08/19 * * A package for general purpose drawing, with automatic sizing of pictures. * *****/ access settings; if(settings.command != "") { string s=settings.command; settings.command=""; settings.multipleView=settings.batchView=settings.interactiveView; _eval(s+";",false,true); exit(); } include plain_constants; access version; if(version.VERSION != VERSION) { warning("version","using possibly incompatible version "+ version.VERSION+" of plain.asy"+'\n'); nowarn("version"); } include plain_strings; include plain_pens; include plain_paths; include plain_filldraw; include plain_margins; include plain_picture; include plain_Label; include plain_shipout; include plain_arcs; include plain_boxes; include plain_markers; include plain_arrows; include plain_debugger; typedef void exitfcn(); bool needshipout() { return !shipped && !currentpicture.empty(); } void updatefunction() { if(!currentpicture.uptodate) shipout(); } void exitfunction() { if(needshipout()) shipout(); } atupdate(updatefunction); atexit(exitfunction); // A restore thunk is a function, that when called, restores the graphics state // to what it was when the restore thunk was created. typedef void restoreThunk(); typedef restoreThunk saveFunction(); saveFunction[] saveFunctions={}; // When save is called, this will be redefined to do the corresponding restore. void restore() { warning("nomatchingsave","restore called with no matching save"); } void addSaveFunction(saveFunction s) { saveFunctions.push(s); } restoreThunk buildRestoreThunk() { // Call the save functions in reverse order, storing their restore thunks. restoreThunk[] thunks={}; for (int i=saveFunctions.length-1; i >= 0; --i) thunks.push(saveFunctions[i]()); return new void() { // Call the restore thunks in an order matching the saves. for (int i=thunks.length-1; i >= 0; --i) thunks[i](); }; } // Add the default save function. addSaveFunction(new restoreThunk () { pen defaultpen=defaultpen(); pen p=currentpen; picture pic=currentpicture.copy(); restoreThunk r=restore; return new void() { defaultpen(defaultpen); currentpen=p; currentpicture=pic; currentpicture.uptodate=false; restore=r; }; }); // Save the current state, so that restore will put things back in that state. restoreThunk save() { return restore=buildRestoreThunk(); } void restoredefaults() { warning("nomatchingsavedefaults", "restoredefaults called with no matching savedefaults"); } restoreThunk buildRestoreDefaults() { pen defaultpen=defaultpen(); exitfcn atupdate=atupdate(); exitfcn atexit=atexit(); restoreThunk r=restoredefaults; return new void() { defaultpen(defaultpen); atupdate(atupdate); atexit(atexit); restoredefaults=r; }; } // Save the current state, so that restore will put things back in that state. restoreThunk savedefaults() { return restoredefaults=buildRestoreDefaults(); } void initdefaults() { savedefaults(); resetdefaultpen(); atupdate(null); atexit(null); } // Return the sequence n,...m int[] sequence(int n, int m) { return sequence(new int(int x){return x;},m-n+1)+n; } int[] reverse(int n) {return sequence(new int(int x){return n-1-x;},n);} bool[] reverse(bool[] a) {return a[reverse(a.length)];} int[] reverse(int[] a) {return a[reverse(a.length)];} real[] reverse(real[] a) {return a[reverse(a.length)];} pair[] reverse(pair[] a) {return a[reverse(a.length)];} triple[] reverse(triple[] a) {return a[reverse(a.length)];} string[] reverse(string[] a) {return a[reverse(a.length)];} // Return a uniform partition dividing [a,b] into n subintervals. real[] uniform(real a, real b, int n) { if(n <= 0) return new real[]; return a+(b-a)/n*sequence(n+1); } void eval(string s, bool embedded=false) { if(!embedded) initdefaults(); _eval(s+";",embedded); if(!embedded) restoredefaults(); } void eval(code s, bool embedded=false) { if(!embedded) initdefaults(); _eval(s,embedded); if(!embedded) restoredefaults(); } // Evaluate user command line option. void usersetting() { eval(settings.user,true); } string stripsuffix(string f, string suffix=".asy") { int n=rfind(f,suffix); if(n != -1) f=erase(f,n,-1); return f; } // Conditionally process each file name in array s in a new environment. void asy(string format, bool overwrite=false ... string[] s) { for(string f : s) { f=stripsuffix(f); string suffix="."+format; string fsuffix=f+suffix; if(overwrite || error(input(fsuffix,check=false))) { string outformat=settings.outformat; bool interactiveView=settings.interactiveView; bool batchView=settings.batchView; settings.outformat=format; settings.interactiveView=false; settings.batchView=false; string outname=outname(); delete(outname+"_"+".aux"); eval("import \""+f+"\" as dummy"); rename(stripsuffix(outname)+suffix,fsuffix); settings.outformat=outformat; settings.interactiveView=interactiveView; settings.batchView=batchView; } } } void beep() { write('\7',flush); } struct processtime { real user; real system; } struct cputime { processtime parent; processtime child; processtime change; } cputime cputime() { static processtime last; real [] a=_cputime(); cputime cputime; cputime.parent.user=a[0]; cputime.parent.system=a[1]; cputime.child.user=a[2]; cputime.child.system=a[3]; real user=a[0]+a[2]; real system=a[1]+a[3]; cputime.change.user=user-last.user; cputime.change.system=system-last.system; last.user=user; last.system=system; return cputime; } string cputimeformat="%#.2f"; void write(file file, string s="", cputime c, string format=cputimeformat, suffix suffix=none) { write(file,s, format(format,c.change.user)+"u "+ format(format,c.change.system)+"s "+ format(format,c.parent.user+c.child.user)+"U "+ format(format,c.parent.system+c.child.system)+"S ",suffix); } void write(string s="", cputime c, string format=cputimeformat, suffix suffix=endl) { write(stdout,s,c,format,suffix); } if(settings.autoimport != "") { string s=settings.autoimport; settings.autoimport=""; eval("import \""+s+"\" as dummy",true); shipped=false; atupdate(updatefunction); atexit(exitfunction); settings.autoimport=s; } cputime(); void nosetpagesize() { static bool initialized=false; if(!initialized && latex()) { // Portably pass nosetpagesize option to graphicx package. texpreamble("\usepackage{ifluatex}\ifluatex \ifx\pdfpagewidth\undefined\let\pdfpagewidth\paperwidth\fi \ifx\pdfpageheight\undefined\let\pdfpageheight\paperheight\fi\else \let\paperwidthsave\paperwidth\let\paperwidth\undefined \usepackage{graphicx} \let\paperwidth\paperwidthsave\fi"); initialized=true; } } nosetpagesize(); if(settings.tex == "luatex") texpreamble("\input luatex85.sty"); ./asymptote-2.41/base/palette.asy0000644000175000017500000003456513064427076016646 0ustar norbertnorbertprivate import graph; private transform swap=(0,0,0,1,1,0); typedef bounds range(picture pic, real min, real max); range Range(bool automin=false, real min=-infinity, bool automax=false, real max=infinity) { return new bounds(picture pic, real dmin, real dmax) { // autoscale routine finds reasonable limits bounds mz=autoscale(pic.scale.z.T(dmin), pic.scale.z.T(dmax), pic.scale.z.scale); // If automin/max, use autoscale result, else // if min/max is finite, use specified value, else // use minimum/maximum data value real pmin=automin ? pic.scale.z.Tinv(mz.min) : (finite(min) ? min : dmin); real pmax=automax ? pic.scale.z.Tinv(mz.max) : (finite(max) ? max : dmax); return bounds(pmin,pmax); }; } range Automatic=Range(true,true); range Full=Range(); void image(frame f, real[][] data, pair initial, pair final, pen[] palette, bool transpose=(initial.x < final.x && initial.y < final.y), transform t=identity(), bool copy=true, bool antialias=false) { transform T=transpose ? swap : identity(); _image(f,copy ? copy(data) : data,T*initial,T*final,palette,t*T,copy=false, antialias=antialias); } void image(frame f, pen[][] data, pair initial, pair final, bool transpose=(initial.x < final.x && initial.y < final.y), transform t=identity(), bool copy=true, bool antialias=false) { transform T=transpose ? swap : identity(); _image(f,copy ? copy(data) : data,T*initial,T*final,t*T,copy=false, antialias=antialias); } // Reduce color palette to approximate range of data relative to "display" // range => errors of 1/palette.length in resulting color space. pen[] adjust(picture pic, real min, real max, real rmin, real rmax, pen[] palette) { real dmin=pic.scale.z.T(min); real dmax=pic.scale.z.T(max); real delta=rmax-rmin; if(delta > 0) { real factor=palette.length/delta; int minindex=floor(factor*(dmin-rmin)); if(minindex < 0) minindex=0; int maxindex=ceil(factor*(dmax-rmin)); if(maxindex > palette.length) maxindex=palette.length; if(minindex > 0 || maxindex < palette.length) return palette[minindex:maxindex]; } return palette; } private real[] sequencereal; bounds image(picture pic=currentpicture, real[][] f, range range=Full, pair initial, pair final, pen[] palette, bool transpose=(initial.x < final.x && initial.y < final.y), bool copy=true, bool antialias=false) { if(copy) f=copy(f); if(copy) palette=copy(palette); real m=min(f); real M=max(f); bounds bounds=range(pic,m,M); real rmin=pic.scale.z.T(bounds.min); real rmax=pic.scale.z.T(bounds.max); palette=adjust(pic,m,M,rmin,rmax,palette); // Crop data to allowed range and scale if(range != Full || pic.scale.z.scale.T != identity || pic.scale.z.postscale.T != identity) { scalefcn T=pic.scale.z.T; real m=bounds.min; real M=bounds.max; for(int i=0; i < f.length; ++i) f[i]=map(new real(real x) {return T(min(max(x,m),M));},f[i]); } initial=Scale(pic,initial); final=Scale(pic,final); pic.addBox(initial,final); transform T; if(transpose) { T=swap; initial=T*initial; final=T*final; } pic.add(new void(frame F, transform t) { _image(F,f,initial,final,palette,t*T,copy=false,antialias=antialias); },true); return bounds; // Return bounds used for color space } bounds image(picture pic=currentpicture, real f(real, real), range range=Full, pair initial, pair final, int nx=ngraph, int ny=nx, pen[] palette, bool antialias=false) { // Generate data, taking scaling into account real xmin=pic.scale.x.T(initial.x); real xmax=pic.scale.x.T(final.x); real ymin=pic.scale.y.T(initial.y); real ymax=pic.scale.y.T(final.y); real[][] data=new real[ny][nx]; for(int j=0; j < ny; ++j) { real y=pic.scale.y.Tinv(interp(ymin,ymax,(j+0.5)/ny)); scalefcn Tinv=pic.scale.x.Tinv; // Take center point of each bin data[j]=sequence(new real(int i) { return f(Tinv(interp(xmin,xmax,(i+0.5)/nx)),y); },nx); } return image(pic,data,range,initial,final,palette,transpose=false, copy=false,antialias=antialias); } void image(picture pic=currentpicture, pen[][] data, pair initial, pair final, bool transpose=(initial.x < final.x && initial.y < final.y), bool copy=true, bool antialias=false) { if(copy) data=copy(data); initial=Scale(pic,initial); final=Scale(pic,final); pic.addBox(initial,final); transform T; if(transpose) { T=swap; initial=T*initial; final=T*final; } pic.add(new void(frame F, transform t) { _image(F,data,initial,final,t*T,copy=false,antialias=antialias); },true); } void image(picture pic=currentpicture, pen f(int, int), int width, int height, pair initial, pair final, bool transpose=(initial.x < final.x && initial.y < final.y), bool antialias=false) { initial=Scale(pic,initial); final=Scale(pic,final); pic.addBox(initial,final); transform T; if(transpose) { T=swap; int temp=width; width=height; height=temp; initial=T*initial; final=T*final; } pic.add(new void(frame F, transform t) { _image(F,f,width,height,initial,final,t*T,antialias=antialias); },true); } bounds image(picture pic=currentpicture, pair[] z, real[] f, range range=Full, pen[] palette) { if(z.length != f.length) abort("z and f arrays have different lengths"); real m=min(f); real M=max(f); bounds bounds=range(pic,m,M); real rmin=pic.scale.z.T(bounds.min); real rmax=pic.scale.z.T(bounds.max); palette=adjust(pic,m,M,rmin,rmax,palette); rmin=max(rmin,m); rmax=min(rmax,M); // Crop data to allowed range and scale if(range != Full || pic.scale.z.scale.T != identity || pic.scale.z.postscale.T != identity) { scalefcn T=pic.scale.z.T; real m=bounds.min; real M=bounds.max; f=map(new real(real x) {return T(min(max(x,m),M));},f); } int[] edges={0,0,1}; int N=palette.length-1; int[][] trn=triangulate(z); real step=rmax == rmin ? 0.0 : N/(rmax-rmin); for(int i=0; i < trn.length; ++i) { int[] trni=trn[i]; int i0=trni[0], i1=trni[1], i2=trni[2]; pen color(int i) {return palette[round((f[i]-rmin)*step)];} gouraudshade(pic,z[i0]--z[i1]--z[i2]--cycle, new pen[] {color(i0),color(i1),color(i2)},edges); } return bounds; // Return bounds used for color space } bounds image(picture pic=currentpicture, real[] x, real[] y, real[] f, range range=Full, pen[] palette) { int n=x.length; if(n != y.length) abort("x and y arrays have different lengths"); pair[] z=sequence(new pair(int i) {return (x[i],y[i]);},n); return image(pic,z,f,range,palette); } // Construct a pen[] array from f using the specified palette. pen[] palette(real[] f, pen[] palette) { real Min=min(f); real Max=max(f); if(palette.length == 0) return new pen[]; real step=Max == Min ? 0.0 : (palette.length-1)/(Max-Min); return sequence(new pen(int i) {return palette[round((f[i]-Min)*step)];}, f.length); } // Construct a pen[][] array from f using the specified palette. pen[][] palette(real[][] f, pen[] palette) { real Min=min(f); real Max=max(f); int n=f.length; pen[][] p=new pen[n][]; real step=(Max == Min) ? 0.0 : (palette.length-1)/(Max-Min); for(int i=0; i < n; ++i) { real[] fi=f[i]; p[i]=sequence(new pen(int j) {return palette[round((fi[j]-Min)*step)];}, f[i].length); } return p; } typedef ticks paletteticks(int sign=-1); paletteticks PaletteTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, pen pTick=nullpen, pen ptick=nullpen) { return new ticks(int sign=-1) { format.align(sign > 0 ? RightSide : LeftSide); return Ticks(sign,format,ticklabel,beginlabel,endlabel,N,n,Step,step, true,true,extend=true,pTick,ptick); }; } paletteticks PaletteTicks=PaletteTicks(); paletteticks NoTicks=new ticks(int sign=-1) {return NoTicks;}; void palette(picture pic=currentpicture, Label L="", bounds bounds, pair initial, pair final, axis axis=Right, pen[] palette, pen p=currentpen, paletteticks ticks=PaletteTicks, bool copy=true, bool antialias=false) { real initialz=pic.scale.z.T(bounds.min); real finalz=pic.scale.z.T(bounds.max); bounds mz=autoscale(initialz,finalz,pic.scale.z.scale); axisT axis; axis(pic,axis); real angle=degrees(axis.align.dir); initial=Scale(pic,initial); final=Scale(pic,final); pair lambda=final-initial; bool vertical=(floor((angle+45)/90) % 2 == 0); pair perp,par; if(vertical) {perp=E; par=N;} else {perp=N; par=E;} path g=(final-dot(lambda,par)*par)--final; path g2=initial--final-dot(lambda,perp)*perp; if(sgn(dot(lambda,perp)*dot(axis.align.dir,perp)) == -1) { path tmp=g; g=g2; g2=tmp; } if(copy) palette=copy(palette); Label L=L.copy(); if(L.defaultposition) L.position(0.5); L.align(axis.align); L.p(p); if(vertical && L.defaulttransform) { frame f; add(f,Label(L.s,(0,0),L.p)); if(length(max(f)-min(f)) > ylabelwidth*fontsize(L.p)) L.transform(rotate(90)); } real[][] pdata={sequence(palette.length)}; transform T; pair Tinitial,Tfinal; if(vertical) { T=swap; Tinitial=T*initial; Tfinal=T*final; } else { Tinitial=initial; Tfinal=final; } pic.add(new void(frame f, transform t) { _image(f,pdata,Tinitial,Tfinal,palette,t*T,copy=false, antialias=antialias); },true); ticklocate locate=ticklocate(initialz,finalz,pic.scale.z,mz.min,mz.max); axis(pic,L,g,g2,p,ticks(sgn(axis.side.x*dot(lambda,par))),locate,mz.divisor, true); pic.add(new void(frame f, transform t) { pair Z0=t*initial; pair Z1=t*final; draw(f,Z0--(Z0.x,Z1.y)--Z1--(Z1.x,Z0.y)--cycle,p); },true); pic.addBox(initial,final); } // A grayscale palette pen[] Grayscale(int NColors=256) { real ninv=1.0/(NColors-1.0); return sequence(new pen(int i) {return gray(i*ninv);},NColors); } // A color wheel palette pen[] Wheel(int NColors=32766) { if(settings.gray) return Grayscale(NColors); int nintervals=6; int n=-quotient(NColors,-nintervals); pen[] Palette; if(n == 0) return Palette; Palette=new pen[n*nintervals]; real ninv=1.0/n; for(int i=0; i < n; ++i) { real ininv=i*ninv; real ininv1=1.0-ininv; Palette[i]=rgb(1.0,0.0,ininv); Palette[n+i]=rgb(ininv1,0.0,1.0); Palette[2n+i]=rgb(0.0,ininv,1.0); Palette[3n+i]=rgb(0.0,1.0,ininv1); Palette[4n+i]=rgb(ininv,1.0,0.0); Palette[5n+i]=rgb(1.0,ininv1,0.0); } return Palette; } // A rainbow palette pen[] Rainbow(int NColors=32766) { if(settings.gray) return Grayscale(NColors); int offset=1; int nintervals=5; int n=-quotient(NColors-1,-nintervals); pen[] Palette; if(n == 0) return Palette; Palette=new pen[n*nintervals+offset]; real ninv=1.0/n; for(int i=0; i < n; ++i) { real ininv=i*ninv; real ininv1=1.0-ininv; Palette[i]=rgb(ininv1,0.0,1.0); Palette[n+i]=rgb(0.0,ininv,1.0); Palette[2n+i]=rgb(0.0,1.0,ininv1); Palette[3n+i]=rgb(ininv,1.0,0.0); Palette[4n+i]=rgb(1.0,ininv1,0.0); } Palette[4n+n]=rgb(1.0,0.0,0.0); return Palette; } private pen[] BWRainbow(int NColors, bool two) { if(settings.gray) return Grayscale(NColors); int offset=1; int nintervals=6; int divisor=3; if(two) nintervals += 6; int num=NColors-offset; int n=-quotient(num,-nintervals*divisor)*divisor; NColors=n*nintervals+offset; pen[] Palette; if(n == 0) return Palette; Palette=new pen[NColors]; real ninv=1.0/n; int k=0; if(two) { for(int i=0; i < n; ++i) { real ininv=i*ninv; real ininv1=1.0-ininv; Palette[i]=rgb(ininv1,0.0,1.0); Palette[n+i]=rgb(0.0,ininv,1.0); Palette[2n+i]=rgb(0.0,1.0,ininv1); Palette[3n+i]=rgb(ininv,1.0,0.0); Palette[4n+i]=rgb(1.0,ininv1,0.0); Palette[5n+i]=rgb(1.0,0.0,ininv); } k += 6n; } if(two) for(int i=0; i < n; ++i) Palette[k+i]=rgb(1.0-i*ninv,0.0,1.0); else { int n3=-quotient(n,-3); int n23=2*n3; real third=n3*ninv; real twothirds=n23*ninv; for(int i=0; i < n3; ++i) { real ininv=i*ninv; Palette[k+i]=rgb(ininv,0.0,ininv); Palette[k+n3+i]=rgb(third,0.0,third+ininv); Palette[k+n23+i]=rgb(third-ininv,0.0,twothirds+ininv); } } k += n; for(int i=0; i < n; ++i) { real ininv=i*ninv; real ininv1=1.0-ininv; Palette[k+i]=rgb(0.0,ininv,1.0); Palette[k+n+i]=rgb(0.0,1.0,ininv1); Palette[k+2n+i]=rgb(ininv,1.0,0.0); Palette[k+3n+i]=rgb(1.0,ininv1,0.0); Palette[k+4n+i]=rgb(1.0,ininv,ininv); } Palette[k+5n]=rgb(1.0,1.0,1.0); return Palette; } // Quantize palette to exactly n values pen[] quantize(pen[] Palette, int n) { if(Palette.length == 0) abort("cannot quantize empty palette"); if(n <= 1) abort("palette must contain at least two pens"); real step=(Palette.length-1)/(n-1); return sequence(new pen(int i) { return Palette[round(i*step)]; },n); } // A rainbow palette tapering off to black/white at the spectrum ends, pen[] BWRainbow(int NColors=32761) { return BWRainbow(NColors,false); } // A double rainbow palette tapering off to black/white at the spectrum ends, // with a linearly scaled intensity. pen[] BWRainbow2(int NColors=32761) { pen[] Palette=BWRainbow(NColors,true); int n=Palette.length; real ninv=1.0/n; for(int i=0; i < n; ++i) Palette[i]=i*ninv*Palette[i]; return Palette; } //A palette varying linearly over the specified array of pens, using // NColors in each interpolation interval. pen[] Gradient(int NColors=256 ... pen[] p) { pen[] P; if(p.length < 2) abort("at least 2 colors must be specified"); real step=NColors > 1 ? (1/(NColors-1)) : 1; for(int i=0; i < p.length-1; ++i) { pen begin=p[i]; pen end=p[i+1]; P.append(sequence(new pen(int j) { return interp(begin,end,j*step); },NColors)); } return P; } pen[] cmyk(pen[] Palette) { int n=Palette.length; for(int i=0; i < n; ++i) Palette[i]=cmyk(Palette[i]); return Palette; } ./asymptote-2.41/base/math.asy0000644000175000017500000002542613064427076016135 0ustar norbertnorbert// Asymptote mathematics routines int quadrant(real degrees) { return floor(degrees/90) % 4; } // Roots of unity. pair unityroot(int n, int k=1) { return expi(2pi*k/n); } real csc(real x) {return 1/sin(x);} real sec(real x) {return 1/cos(x);} real cot(real x) {return tan(pi/2-x);} real acsc(real x) {return asin(1/x);} real asec(real x) {return acos(1/x);} real acot(real x) {return pi/2-atan(x);} real frac(real x) {return x-(int)x;} pair exp(explicit pair z) {return exp(z.x)*expi(z.y);} pair log(explicit pair z) {return log(abs(z))+I*angle(z);} // Return an Nx by Ny unit square lattice with lower-left corner at (0,0). picture grid(int Nx, int Ny, pen p=currentpen) { picture pic; for(int i=0; i <= Nx; ++i) draw(pic,(i,0)--(i,Ny),p); for(int j=0; j <= Ny; ++j) draw(pic,(0,j)--(Nx,j),p); return pic; } bool polygon(path p) { return cyclic(p) && piecewisestraight(p); } // Return the intersection time of the point on the line through p and q // that is closest to z. real intersect(pair p, pair q, pair z) { pair u=q-p; real denom=dot(u,u); return denom == 0 ? infinity : dot(z-p,u)/denom; } // Return the intersection time of the extension of the line segment PQ // with the plane perpendicular to n and passing through Z. real intersect(triple P, triple Q, triple n, triple Z) { real d=n.x*Z.x+n.y*Z.y+n.z*Z.z; real denom=n.x*(Q.x-P.x)+n.y*(Q.y-P.y)+n.z*(Q.z-P.z); return denom == 0 ? infinity : (d-n.x*P.x-n.y*P.y-n.z*P.z)/denom; } // Return any point on the intersection of the two planes with normals // n0 and n1 passing through points P0 and P1, respectively. // If the planes are parallel return (infinity,infinity,infinity). triple intersectionpoint(triple n0, triple P0, triple n1, triple P1) { real Dx=n0.y*n1.z-n1.y*n0.z; real Dy=n0.z*n1.x-n1.z*n0.x; real Dz=n0.x*n1.y-n1.x*n0.y; if(abs(Dx) > abs(Dy) && abs(Dx) > abs(Dz)) { Dx=1/Dx; real d0=n0.y*P0.y+n0.z*P0.z; real d1=n1.y*P1.y+n1.z*P1.z+n1.x*(P1.x-P0.x); real y=(d0*n1.z-d1*n0.z)*Dx; real z=(d1*n0.y-d0*n1.y)*Dx; return (P0.x,y,z); } else if(abs(Dy) > abs(Dz)) { Dy=1/Dy; real d0=n0.z*P0.z+n0.x*P0.x; real d1=n1.z*P1.z+n1.x*P1.x+n1.y*(P1.y-P0.y); real z=(d0*n1.x-d1*n0.x)*Dy; real x=(d1*n0.z-d0*n1.z)*Dy; return (x,P0.y,z); } else { if(Dz == 0) return (infinity,infinity,infinity); Dz=1/Dz; real d0=n0.x*P0.x+n0.y*P0.y; real d1=n1.x*P1.x+n1.y*P1.y+n1.z*(P1.z-P0.z); real x=(d0*n1.y-d1*n0.y)*Dz; real y=(d1*n0.x-d0*n1.x)*Dz; return (x,y,P0.z); } } // Given a real array a, return its partial sums. real[] partialsum(real[] a) { real[] b=new real[a.length]; real sum=0; for(int i=0; i < a.length; ++i) { sum += a[i]; b[i]=sum; } return b; } // Given a real array a, return its partial dx-weighted sums. real[] partialsum(real[] a, real[] dx) { real[] b=new real[a.length]; real sum=0; for(int i=0; i < a.length; ++i) { sum += a[i]*dx[i]; b[i]=sum; } return b; } // Given an integer array a, return its partial sums. int[] partialsum(int[] a) { int[] b=new int[a.length]; int sum=0; for(int i=0; i < a.length; ++i) { sum += a[i]; b[i]=sum; } return b; } // Given an integer array a, return its partial dx-weighted sums. int[] partialsum(int[] a, int[] dx) { int[] b=new int[a.length]; int sum=0; for(int i=0; i < a.length; ++i) { sum += a[i]*dx[i]; b[i]=sum; } return b; } // If strict=false, return whether i > j implies a[i] >= a[j] // If strict=true, return whether i > j implies a[i] > a[j] bool increasing(real[] a, bool strict=false) { real[] ap=copy(a); ap.delete(0); ap.push(0); bool[] b=strict ? (ap > a) : (ap >= a); b[a.length-1]=true; return all(b); } // Return the first and last indices of consecutive true-element segments // of bool[] b. int[][] segmentlimits(bool[] b) { int[][] segment; bool[] n=copy(b); n.delete(0); n.push(!b[b.length-1]); int[] edge=(b != n) ? sequence(1,b.length) : null; edge.insert(0,0); int stop=edge[0]; for(int i=1; i < edge.length; ++i) { int start=stop; stop=edge[i]; if(b[start]) segment.push(new int[] {start,stop-1}); } return segment; } // Return the indices of consecutive true-element segments of bool[] b. int[][] segment(bool[] b) { int[][] S=segmentlimits(b); return sequence(new int[](int i) { return sequence(S[i][0],S[i][1]); },S.length); } // If the sorted array a does not contain x, insert it sequentially, // returning the index of x in the resulting array. int unique(real[] a, real x) { int i=search(a,x); if(i == -1 || x != a[i]) { ++i; a.insert(i,x); } return i; } int unique(string[] a, string x) { int i=search(a,x); if(i == -1 || x != a[i]) { ++i; a.insert(i,x); } return i; } bool lexorder(pair a, pair b) { return a.x < b.x || (a.x == b.x && a.y < b.y); } bool lexorder(triple a, triple b) { return a.x < b.x || (a.x == b.x && (a.y < b.y || (a.y == b.y && a.z < b.z))); } real[] zero(int n) { return sequence(new real(int) {return 0;},n); } real[][] zero(int n, int m) { real[][] M=new real[n][]; for(int i=0; i < n; ++i) M[i]=sequence(new real(int) {return 0;},m); return M; } bool square(real[][] m) { int n=m.length; for(int i=0; i < n; ++i) if(m[i].length != n) return false; return true; } bool rectangular(real[][] m) { int n=m.length; if(n > 0) { int m0=m[0].length; for(int i=1; i < n; ++i) if(m[i].length != m0) return false; } return true; } bool rectangular(pair[][] m) { int n=m.length; if(n > 0) { int m0=m[0].length; for(int i=1; i < n; ++i) if(m[i].length != m0) return false; } return true; } bool rectangular(triple[][] m) { int n=m.length; if(n > 0) { int m0=m[0].length; for(int i=1; i < n; ++i) if(m[i].length != m0) return false; } return true; } // draw the (infinite) line going through P and Q, without altering the // size of picture pic. void drawline(picture pic=currentpicture, pair P, pair Q, pen p=currentpen) { pic.add(new void (frame f, transform t, transform T, pair m, pair M) { // Reduce the bounds by the size of the pen. m -= min(p); M -= max(p); // Calculate the points and direction vector in the transformed space. t=t*T; pair z=t*P; pair v=t*Q-z; // Handle horizontal and vertical lines. if(v.x == 0) { if(m.x <= z.x && z.x <= M.x) draw(f,(z.x,m.y)--(z.x,M.y),p); } else if(v.y == 0) { if(m.y <= z.y && z.y <= M.y) draw(f,(m.x,z.y)--(M.x,z.y),p); } else { // Calculate the maximum and minimum t values allowed for the // parametric equation z + t*v real mx=(m.x-z.x)/v.x, Mx=(M.x-z.x)/v.x; real my=(m.y-z.y)/v.y, My=(M.y-z.y)/v.y; real tmin=max(v.x > 0 ? mx : Mx, v.y > 0 ? my : My); real tmax=min(v.x > 0 ? Mx : mx, v.y > 0 ? My : my); if(tmin <= tmax) draw(f,z+tmin*v--z+tmax*v,p); } },true); } real interpolate(real[] x, real[] y, real x0, int i) { int n=x.length; if(n == 0) abort("Zero data points in interpolate"); if(n == 1) return y[0]; if(i < 0) { real dx=x[1]-x[0]; return y[0]+(y[1]-y[0])/dx*(x0-x[0]); } if(i >= n-1) { real dx=x[n-1]-x[n-2]; return y[n-1]+(y[n-1]-y[n-2])/dx*(x0-x[n-1]); } real D=x[i+1]-x[i]; real B=(x0-x[i])/D; real A=1.0-B; return A*y[i]+B*y[i+1]; } // Linearly interpolate data points (x,y) to (x0,y0), where the elements of // real[] x are listed in ascending order and return y0. Values outside the // available data range are linearly extrapolated using the first derivative // at the nearest endpoint. real interpolate(real[] x, real[] y, real x0) { return interpolate(x,y,x0,search(x,x0)); } private string nopoint="point not found"; // Return the nth intersection time of path g with the vertical line through x. real time(path g, real x, int n=0) { real[] t=times(g,x); if(t.length <= n) abort(nopoint); return t[n]; } // Return the nth intersection time of path g with the horizontal line through // (0,z.y). real time(path g, explicit pair z, int n=0) { real[] t=times(g,z); if(t.length <= n) abort(nopoint); return t[n]; } // Return the nth y value of g at x. real value(path g, real x, int n=0) { return point(g,time(g,x,n)).y; } // Return the nth x value of g at y=z.y. real value(path g, explicit pair z, int n=0) { return point(g,time(g,(0,z.y),n)).x; } // Return the nth slope of g at x. real slope(path g, real x, int n=0) { pair a=dir(g,time(g,x,n)); return a.y/a.x; } // Return the nth slope of g at y=z.y. real slope(path g, explicit pair z, int n=0) { pair a=dir(g,time(g,(0,z.y),n)); return a.y/a.x; } // A quartic complex root solver based on these references: // http://planetmath.org/encyclopedia/GaloisTheoreticDerivationOfTheQuarticFormula.html // Neumark, S., Solution of Cubic and Quartic Equations, Pergamon Press // Oxford (1965). pair[] quarticroots(real a, real b, real c, real d, real e) { real Fuzz=100000*realEpsilon; // Remove roots at numerical infinity. if(abs(a) <= Fuzz*(abs(b)+Fuzz*(abs(c)+Fuzz*(abs(d)+Fuzz*abs(e))))) return cubicroots(b,c,d,e); // Detect roots at numerical zero. if(abs(e) <= Fuzz*(abs(d)+Fuzz*(abs(c)+Fuzz*(abs(b)+Fuzz*abs(a))))) return cubicroots(a,b,c,d); real ainv=1/a; b *= ainv; c *= ainv; d *= ainv; e *= ainv; pair[] roots; real[] T=cubicroots(1,-2c,c^2+b*d-4e,d^2+b^2*e-b*c*d); if(T.length == 0) return roots; real t0=T[0]; pair[] sum=quadraticroots((1,0),(b,0),(t0,0)); pair[] product=quadraticroots((1,0),(t0-c,0),(e,0)); if(abs(sum[0]*product[0]+sum[1]*product[1]+d) < abs(sum[0]*product[1]+sum[1]*product[0]+d)) product=reverse(product); for(int i=0; i < 2; ++i) roots.append(quadraticroots((1,0),-sum[i],product[i])); return roots; } pair[][] fft(pair[][] a, int sign=1) { pair[][] A=new pair[a.length][]; int k=0; for(pair[] v : a) { A[k]=fft(v,sign); ++k; } a=transpose(A); k=0; for(pair[] v : a) { A[k]=fft(v,sign); ++k; } return transpose(A); } // Given a matrix A with independent columns, return // the unique vector y minimizing |Ay - b|^2 (the L2 norm). // If the columns of A are not linearly independent, // throw an error (if warn == true) or return an empty array // (if warn == false). real[] leastsquares(real[][] A, real[] b, bool warn=true) { real[] solution=solve(AtA(A),b*A,warn=false); if (solution.length == 0 && warn) abort("Cannot compute least-squares approximation for " + "a matrix with linearly dependent columns."); return solution; } // Namespace struct rootfinder_settings { static real roottolerance = 1e-4; } real findroot(real f(real), real a, real b, real tolerance=rootfinder_settings.roottolerance, real fa=f(a), real fb=f(b)) { return _findroot(f,a,b,tolerance,fa,fb); } ./asymptote-2.41/base/pstoedit.asy0000644000175000017500000000054613064427076017033 0ustar norbertnorbertpen textpen=basealign; pair align=Align; // Compatibility routines for the pstoedit (version 3.43 or later) backend. void gsave(picture pic=currentpicture) { pic.add(new void (frame f, transform) { gsave(f); },true); } void grestore(picture pic=currentpicture) { pic.add(new void (frame f, transform) { grestore(f); },true); } ./asymptote-2.41/base/asy-kate.sh0000644000175000017500000002006313064427076016530 0ustar norbertnorbert#!/bin/sh echo ' ' > asymptote.xml # 1. Change Name of lists in <\list> # 2. tail to get rid of the first lines # 3. building the right line ending # 4-5. kill linebreaks # 6. change spaces into <\item> # 7. Undo change (7.) in 'list name' # 8. do some formatting cat asy-keywords.el | sed 's/^(.*\-\([^\-]*\)\-.*/\n/' | tail -14 | sed 's/ ))/<\/item><\/list>/' | tr '\n' '@' | sed 's/@//g' | sed 's/ /<\/item>/g' | sed 's/list<\/item>name/list name/g' | sed 's/>\n> asymptote.xml echo ' ' >> asymptote.xml ./asymptote-2.41/base/graph3.asy0000644000175000017500000017131713064427076016371 0ustar norbertnorbert// Three-dimensional graphing routines private import math; import graph; import three; typedef triple direction3(real); direction3 Dir(triple dir) {return new triple(real) {return dir;};} ticklocate ticklocate(real a, real b, autoscaleT S=defaultS, real tickmin=-infinity, real tickmax=infinity, real time(real)=null, direction3 dir) { if((valuetime) time == null) time=linear(S.T(),a,b); ticklocate locate; locate.a=a; locate.b=b; locate.S=S.copy(); if(finite(tickmin)) locate.S.tickMin=tickmin; if(finite(tickmax)) locate.S.tickMax=tickmax; locate.time=time; locate.dir=zero; locate.dir3=dir; return locate; } private struct locateT { real t; // tick location time triple V; // tick location in frame coordinates triple pathdir; // path direction in frame coordinates triple dir; // tick direction in frame coordinates void dir(transform3 T, path3 g, ticklocate locate, real t) { pathdir=unit(shiftless(T)*dir(g,t)); triple Dir=locate.dir3(t); dir=unit(Dir); } // Locate the desired position of a tick along a path. void calc(transform3 T, path3 g, ticklocate locate, real val) { t=locate.time(val); V=T*point(g,t); dir(T,g,locate,t); } } void drawtick(picture pic, transform3 T, path3 g, path3 g2, ticklocate locate, real val, real Size, int sign, pen p, bool extend) { locateT locate1,locate2; locate1.calc(T,g,locate,val); path3 G; if(extend && size(g2) > 0) { locate2.calc(T,g2,locate,val); G=locate1.V--locate2.V; } else G=(sign == 0) ? locate1.V-Size*locate1.dir--locate1.V+Size*locate1.dir : locate1.V--locate1.V+Size*sign*locate1.dir; draw(pic,G,p,name="tick"); } triple ticklabelshift(triple align, pen p=currentpen) { return 0.25*unit(align)*labelmargin(p); } // Signature of routines that draw labelled paths with ticks and tick labels. typedef void ticks3(picture, transform3, Label, path3, path3, pen, arrowbar3, margin3, ticklocate, int[], bool opposite=false, bool primary=true); // Label a tick on a frame. void labeltick(picture pic, transform3 T, path3 g, ticklocate locate, real val, int sign, real Size, ticklabel ticklabel, Label F, real norm=0) { locateT locate1; locate1.calc(T,g,locate,val); triple align=F.align.dir3; if(align == O) align=sign*locate1.dir; triple shift=align*labelmargin(F.p); if(dot(align,sign*locate1.dir) >= 0) shift=sign*(Size)*locate1.dir; real label; if(locate.S.scale.logarithmic) label=locate.S.scale.Tinv(val); else { label=val; if(abs(label) < zerotickfuzz*norm) label=0; // Fix epsilon errors at +/-1e-4 // default format changes to scientific notation here if(abs(abs(label)-1e-4) < epsilon) label=sgn(label)*1e-4; } string s=ticklabel(label); triple v=locate1.V+shift; if(s != "") label(pic,F.defaulttransform3 ? baseline(s,baselinetemplate) : F.T3*s,v, align,F.p); } // Add axis label L to frame f. void labelaxis(picture pic, transform3 T, Label L, path3 g, ticklocate locate=null, int sign=1, bool ticklabels=false) { triple m=pic.min(identity4); triple M=pic.max(identity4); triple align=L.align.dir3; Label L=L.copy(); pic.add(new void(frame f, transform3 T, picture pic2, projection P) { path3 g=T*g; real t=relative(L,g); triple v=point(g,t); picture F; if(L.align.dir3 == O) align=unit(invert(L.align.dir,v,P))*abs(L.align.dir); if(ticklabels && locate != null && piecewisestraight(g)) { locateT locate1; locate1.dir(T,g,locate,t); triple pathdir=locate1.pathdir; triple perp=cross(pathdir,P.normal); if(align == O) align=unit(sgn(dot(sign*locate1.dir,perp))*perp); path[] g=project(box(T*m,T*M),P); pair z=project(v,P); pair Ppathdir=project(v+pathdir,P)-z; pair Perp=unit(I*Ppathdir); real angle=degrees(Ppathdir,warn=false); transform S=rotate(-angle,z); path[] G=S*g; pair Palign=project(v+align,P)-z; pair Align=rotate(-angle)*dot(Palign,Perp)*Perp; pair offset=unit(Palign)* abs((Align.y >= 0 ? max(G).y : (Align.y < 0 ? min(G).y : 0))-z.y); triple normal=cross(pathdir,align); if(normal != O) v=invert(z+offset,normal,v,P); } label(F,L,v); add(f,F.fit3(identity4,pic2,P)); },exact=false); path3[] G=path3(texpath(L,bbox=true)); if(G.length > 0) { G=L.align.is3D ? align(G,O,align,L.p) : L.T3*G; triple v=point(g,relative(L,g)); pic.addBox(v,v,min(G),max(G)); } } // Tick construction routine for a user-specified array of tick values. ticks3 Ticks3(int sign, Label F="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, real[] Ticks=new real[], real[] ticks=new real[], int N=1, bool begin=true, bool end=true, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return new void(picture pic, transform3 t, Label L, path3 g, path3 g2, pen p, arrowbar3 arrow, margin3 margin, ticklocate locate, int[] divisor, bool opposite, bool primary) { // Use local copy of context variables: int Sign=opposite ? -1 : 1; int sign=Sign*sign; pen pTick=pTick; pen ptick=ptick; ticklabel ticklabel=ticklabel; real Size=Size; real size=size; if(Size == 0) Size=Ticksize; if(size == 0) size=ticksize; Label L=L.copy(); Label F=F.copy(); L.p(p); F.p(p); if(pTick == nullpen) pTick=p; if(ptick == nullpen) ptick=pTick; bool ticklabels=false; path3 G=t*g; path3 G2=t*g2; scalefcn T; real a,b; if(locate.S.scale.logarithmic) { a=locate.S.postscale.Tinv(locate.a); b=locate.S.postscale.Tinv(locate.b); T=locate.S.scale.T; } else { a=locate.S.Tinv(locate.a); b=locate.S.Tinv(locate.b); T=identity; } if(a > b) {real temp=a; a=b; b=temp;} real norm=max(abs(a),abs(b)); string format=autoformat(F.s,norm...Ticks); if(F.s == "%") F.s=""; if(ticklabel == null) { if(locate.S.scale.logarithmic) { int base=round(locate.S.scale.Tinv(1)); ticklabel=format == "%" ? Format("") : DefaultLogFormat(base); } else ticklabel=Format(format); } bool labelaxis=L.s != "" && primary; begingroup3(pic,"axis"); if(primary) draw(pic,margin(G,p).g,p,arrow); else draw(pic,G,p); for(int i=(begin ? 0 : 1); i < (end ? Ticks.length : Ticks.length-1); ++i) { real val=T(Ticks[i]); if(val >= a && val <= b) drawtick(pic,t,g,g2,locate,val,Size,sign,pTick,extend); } for(int i=0; i < ticks.length; ++i) { real val=T(ticks[i]); if(val >= a && val <= b) drawtick(pic,t,g,g2,locate,val,size,sign,ptick,extend); } if(N == 0) N=1; if(Size > 0 && primary) { for(int i=(beginlabel ? 0 : 1); i < (endlabel ? Ticks.length : Ticks.length-1); i += N) { real val=T(Ticks[i]); if(val >= a && val <= b) { ticklabels=true; labeltick(pic,t,g,locate,val,Sign,Size,ticklabel,F,norm); } } } if(labelaxis) labelaxis(pic,t,L,G,locate,Sign,ticklabels); endgroup3(pic); }; } // Automatic tick construction routine. ticks3 Ticks3(int sign, Label F="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, tickmodifier modify=None, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return new void(picture pic, transform3 T, Label L, path3 g, path3 g2, pen p, arrowbar3 arrow, margin3 margin=NoMargin3, ticklocate locate, int[] divisor, bool opposite, bool primary) { path3 G=T*g; real limit=Step == 0 ? axiscoverage*arclength(G) : 0; tickvalues values=modify(generateticks(sign,F,ticklabel,N,n,Step,step, Size,size,identity(),1, project(G,currentprojection), limit,p,locate,divisor, opposite)); Ticks3(sign,F,ticklabel,beginlabel,endlabel,values.major,values.minor, values.N,begin,end,Size,size,extend,pTick,ptick) (pic,T,L,g,g2,p,arrow,margin,locate,divisor,opposite,primary); }; } ticks3 NoTicks3() { return new void(picture pic, transform3 T, Label L, path3 g, path3, pen p, arrowbar3 arrow, margin3 margin, ticklocate, int[], bool opposite, bool primary) { path3 G=T*g; if(primary) draw(pic,margin(G,p).g,p,arrow,margin); else draw(pic,G,p); if(L.s != "" && primary) { Label L=L.copy(); L.p(p); labelaxis(pic,T,L,G,opposite ? -1 : 1); } }; } ticks3 InTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, tickmodifier modify=None, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks3(-1,format,ticklabel,beginlabel,endlabel,N,n,Step,step, begin,end,modify,Size,size,extend,pTick,ptick); } ticks3 OutTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, tickmodifier modify=None, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks3(1,format,ticklabel,beginlabel,endlabel,N,n,Step,step, begin,end,modify,Size,size,extend,pTick,ptick); } ticks3 InOutTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, tickmodifier modify=None, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks3(0,format,ticklabel,beginlabel,endlabel,N,n,Step,step, begin,end,modify,Size,size,extend,pTick,ptick); } ticks3 InTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, real[] Ticks, real[] ticks=new real[], real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks3(-1,format,ticklabel,beginlabel,endlabel, Ticks,ticks,Size,size,extend,pTick,ptick); } ticks3 OutTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, real[] Ticks, real[] ticks=new real[], real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks3(1,format,ticklabel,beginlabel,endlabel, Ticks,ticks,Size,size,extend,pTick,ptick); } ticks3 InOutTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, real[] Ticks, real[] ticks=new real[], real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks3(0,format,ticklabel,beginlabel,endlabel, Ticks,ticks,Size,size,extend,pTick,ptick); } ticks3 NoTicks3=NoTicks3(), InTicks=InTicks(), OutTicks=OutTicks(), InOutTicks=InOutTicks(); triple tickMin3(picture pic) { return minbound(pic.userMin(),(pic.scale.x.tickMin,pic.scale.y.tickMin, pic.scale.z.tickMin)); } triple tickMax3(picture pic) { return maxbound(pic.userMax(),(pic.scale.x.tickMax,pic.scale.y.tickMax, pic.scale.z.tickMax)); } axis Bounds(int type=Both, int type2=Both, triple align=O, bool extend=false) { return new void(picture pic, axisT axis) { axis.type=type; axis.type2=type2; axis.position=0.5; axis.align=align; axis.extend=extend; }; } axis YZEquals(real y, real z, triple align=O, bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Value; axis.type2=Value; axis.value=pic.scale.y.T(y); axis.value2=pic.scale.z.T(z); axis.position=1; axis.align=align; axis.extend=extend; }; } axis XZEquals(real x, real z, triple align=O, bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Value; axis.type2=Value; axis.value=pic.scale.x.T(x); axis.value2=pic.scale.z.T(z); axis.position=1; axis.align=align; axis.extend=extend; }; } axis XYEquals(real x, real y, triple align=O, bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Value; axis.type2=Value; axis.value=pic.scale.x.T(x); axis.value2=pic.scale.y.T(y); axis.position=1; axis.align=align; axis.extend=extend; }; } axis YZZero(triple align=O, bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Value; axis.type2=Value; axis.value=pic.scale.y.T(pic.scale.y.scale.logarithmic ? 1 : 0); axis.value2=pic.scale.z.T(pic.scale.z.scale.logarithmic ? 1 : 0); axis.position=1; axis.align=align; axis.extend=extend; }; } axis XZZero(triple align=O, bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Value; axis.type2=Value; axis.value=pic.scale.x.T(pic.scale.x.scale.logarithmic ? 1 : 0); axis.value2=pic.scale.z.T(pic.scale.z.scale.logarithmic ? 1 : 0); axis.position=1; axis.align=align; axis.extend=extend; }; } axis XYZero(triple align=O, bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Value; axis.type2=Value; axis.value=pic.scale.x.T(pic.scale.x.scale.logarithmic ? 1 : 0); axis.value2=pic.scale.y.T(pic.scale.y.scale.logarithmic ? 1 : 0); axis.position=1; axis.align=align; axis.extend=extend; }; } axis Bounds=Bounds(), YZZero=YZZero(), XZZero=XZZero(), XYZero=XYZero(); // Draw a general three-dimensional axis. void axis(picture pic=currentpicture, Label L="", path3 g, path3 g2=nullpath3, pen p=currentpen, ticks3 ticks, ticklocate locate, arrowbar3 arrow=None, margin3 margin=NoMargin3, int[] divisor=new int[], bool above=false, bool opposite=false) { Label L=L.copy(); real t=reltime(g,0.5); if(L.defaultposition) L.position(t); divisor=copy(divisor); locate=locate.copy(); pic.add(new void (picture f, transform3 t, transform3 T, triple, triple) { picture d; ticks(d,t,L,g,g2,p,arrow,margin,locate,divisor,opposite,true); add(f,t*T*inverse(t)*d); },above=above); addPath(pic,g,p); if(L.s != "") { frame f; Label L0=L.copy(); L0.position(0); add(f,L0); triple pos=point(g,L.relative()*length(g)); pic.addBox(pos,pos,min3(f),max3(f)); } } real xtrans(transform3 t, real x) { return (t*(x,0,0)).x; } real ytrans(transform3 t, real y) { return (t*(0,y,0)).y; } real ztrans(transform3 t, real z) { return (t*(0,0,z)).z; } private triple defaultdir(triple X, triple Y, triple Z, bool opposite=false, projection P) { triple u=cross(P.normal,Z); return abs(dot(u,X)) > abs(dot(u,Y)) ? -X : (opposite ? Y : -Y); } // An internal routine to draw an x axis at a particular y value. void xaxis3At(picture pic=currentpicture, Label L="", axis axis, real xmin=-infinity, real xmax=infinity, pen p=currentpen, ticks3 ticks=NoTicks3, arrowbar3 arrow=None, margin3 margin=NoMargin3, bool above=true, bool opposite=false, bool opposite2=false, bool primary=true) { int type=axis.type; int type2=axis.type2; triple dir=axis.align.dir3 == O ? defaultdir(Y,Z,X,opposite^opposite2,currentprojection) : axis.align.dir3; Label L=L.copy(); if(L.align.dir3 == O && L.align.dir == 0) L.align(opposite ? -dir : dir); real y=axis.value; real z=axis.value2; real y2,z2; int[] divisor=copy(axis.xdivisor); pic.add(new void(picture f, transform3 t, transform3 T, triple lb, triple rt) { transform3 tinv=inverse(t); triple a=xmin == -infinity ? tinv*(lb.x-min3(p).x,ytrans(t,y), ztrans(t,z)) : (xmin,y,z); triple b=xmax == infinity ? tinv*(rt.x-max3(p).x,ytrans(t,y), ztrans(t,z)) : (xmax,y,z); real y0; real z0; if(abs(dir.y) < abs(dir.z)) { y0=y; z0=z2; } else { y0=y2; z0=z; } triple a2=xmin == -infinity ? tinv*(lb.x-min3(p).x,ytrans(t,y0), ztrans(t,z0)) : (xmin,y0,z0); triple b2=xmax == infinity ? tinv*(rt.x-max3(p).x,ytrans(t,y0), ztrans(t,z0)) : (xmax,y0,z0); if(xmin == -infinity || xmax == infinity) { bounds mx=autoscale(a.x,b.x,pic.scale.x.scale); pic.scale.x.tickMin=mx.min; pic.scale.x.tickMax=mx.max; divisor=mx.divisor; } triple fuzz=X*epsilon*max(abs(a.x),abs(b.x)); a -= fuzz; b += fuzz; picture d; ticks(d,t,L,a--b,finite(y0) && finite(z0) ? a2--b2 : nullpath3, p,arrow,margin, ticklocate(a.x,b.x,pic.scale.x,Dir(dir)),divisor, opposite,primary); add(f,t*T*tinv*d); },above=above); void bounds() { if(type == Min) y=pic.scale.y.automin() ? tickMin3(pic).y : pic.userMin().y; else if(type == Max) y=pic.scale.y.automax() ? tickMax3(pic).y : pic.userMax().y; else if(type == Both) { y2=pic.scale.y.automax() ? tickMax3(pic).y : pic.userMax().y; y=opposite ? y2 : (pic.scale.y.automin() ? tickMin3(pic).y : pic.userMin().y); } if(type2 == Min) z=pic.scale.z.automin() ? tickMin3(pic).z : pic.userMin().z; else if(type2 == Max) z=pic.scale.z.automax() ? tickMax3(pic).z : pic.userMax().z; else if(type2 == Both) { z2=pic.scale.z.automax() ? tickMax3(pic).z : pic.userMax().z; z=opposite2 ? z2 : (pic.scale.z.automin() ? tickMin3(pic).z : pic.userMin().z); } real Xmin=finite(xmin) ? xmin : pic.userMin().x; real Xmax=finite(xmax) ? xmax : pic.userMax().x; triple a=(Xmin,y,z); triple b=(Xmax,y,z); triple a2=(Xmin,y2,z2); triple b2=(Xmax,y2,z2); if(finite(a)) { pic.addPoint(a,min3(p)); pic.addPoint(a,max3(p)); } if(finite(b)) { pic.addPoint(b,min3(p)); pic.addPoint(b,max3(p)); } if(finite(a) && finite(b)) { picture d; ticks(d,pic.scaling3(warn=false),L, (a.x,0,0)--(b.x,0,0),(a2.x,0,0)--(b2.x,0,0),p,arrow,margin, ticklocate(a.x,b.x,pic.scale.x,Dir(dir)),divisor, opposite,primary); frame f; if(L.s != "") { Label L0=L.copy(); L0.position(0); add(f,L0); } triple pos=a+L.relative()*(b-a); triple m=min3(d); triple M=max3(d); pic.addBox(pos,pos,(min3(f).x,m.y,m.z),(max3(f).x,m.y,m.z)); } } // Process any queued y and z axes bound calculation requests. for(int i=0; i < pic.scale.y.bound.length; ++i) pic.scale.y.bound[i](); for(int i=0; i < pic.scale.z.bound.length; ++i) pic.scale.z.bound[i](); pic.scale.y.bound.delete(); pic.scale.z.bound.delete(); bounds(); // Request another x bounds calculation before final picture scaling. pic.scale.x.bound.push(bounds); } // An internal routine to draw an x axis at a particular y value. void yaxis3At(picture pic=currentpicture, Label L="", axis axis, real ymin=-infinity, real ymax=infinity, pen p=currentpen, ticks3 ticks=NoTicks3, arrowbar3 arrow=None, margin3 margin=NoMargin3, bool above=true, bool opposite=false, bool opposite2=false, bool primary=true) { int type=axis.type; int type2=axis.type2; triple dir=axis.align.dir3 == O ? defaultdir(X,Z,Y,opposite^opposite2,currentprojection) : axis.align.dir3; Label L=L.copy(); if(L.align.dir3 == O && L.align.dir == 0) L.align(opposite ? -dir : dir); real x=axis.value; real z=axis.value2; real x2,z2; int[] divisor=copy(axis.ydivisor); pic.add(new void(picture f, transform3 t, transform3 T, triple lb, triple rt) { transform3 tinv=inverse(t); triple a=ymin == -infinity ? tinv*(xtrans(t,x),lb.y-min3(p).y, ztrans(t,z)) : (x,ymin,z); triple b=ymax == infinity ? tinv*(xtrans(t,x),rt.y-max3(p).y, ztrans(t,z)) : (x,ymax,z); real x0; real z0; if(abs(dir.x) < abs(dir.z)) { x0=x; z0=z2; } else { x0=x2; z0=z; } triple a2=ymin == -infinity ? tinv*(xtrans(t,x0),lb.y-min3(p).y, ztrans(t,z0)) : (x0,ymin,z0); triple b2=ymax == infinity ? tinv*(xtrans(t,x0),rt.y-max3(p).y, ztrans(t,z0)) : (x0,ymax,z0); if(ymin == -infinity || ymax == infinity) { bounds my=autoscale(a.y,b.y,pic.scale.y.scale); pic.scale.y.tickMin=my.min; pic.scale.y.tickMax=my.max; divisor=my.divisor; } triple fuzz=Y*epsilon*max(abs(a.y),abs(b.y)); a -= fuzz; b += fuzz; picture d; ticks(d,t,L,a--b,finite(x0) && finite(z0) ? a2--b2 : nullpath3, p,arrow,margin, ticklocate(a.y,b.y,pic.scale.y,Dir(dir)),divisor, opposite,primary); add(f,t*T*tinv*d); },above=above); void bounds() { if(type == Min) x=pic.scale.x.automin() ? tickMin3(pic).x : pic.userMin().x; else if(type == Max) x=pic.scale.x.automax() ? tickMax3(pic).x : pic.userMax().x; else if(type == Both) { x2=pic.scale.x.automax() ? tickMax3(pic).x : pic.userMax().x; x=opposite ? x2 : (pic.scale.x.automin() ? tickMin3(pic).x : pic.userMin().x); } if(type2 == Min) z=pic.scale.z.automin() ? tickMin3(pic).z : pic.userMin().z; else if(type2 == Max) z=pic.scale.z.automax() ? tickMax3(pic).z : pic.userMax().z; else if(type2 == Both) { z2=pic.scale.z.automax() ? tickMax3(pic).z : pic.userMax().z; z=opposite2 ? z2 : (pic.scale.z.automin() ? tickMin3(pic).z : pic.userMin().z); } real Ymin=finite(ymin) ? ymin : pic.userMin().y; real Ymax=finite(ymax) ? ymax : pic.userMax().y; triple a=(x,Ymin,z); triple b=(x,Ymax,z); triple a2=(x2,Ymin,z2); triple b2=(x2,Ymax,z2); if(finite(a)) { pic.addPoint(a,min3(p)); pic.addPoint(a,max3(p)); } if(finite(b)) { pic.addPoint(b,min3(p)); pic.addPoint(b,max3(p)); } if(finite(a) && finite(b)) { picture d; ticks(d,pic.scaling3(warn=false),L, (0,a.y,0)--(0,b.y,0),(0,a2.y,0)--(0,a2.y,0),p,arrow,margin, ticklocate(a.y,b.y,pic.scale.y,Dir(dir)),divisor, opposite,primary); frame f; if(L.s != "") { Label L0=L.copy(); L0.position(0); add(f,L0); } triple pos=a+L.relative()*(b-a); triple m=min3(d); triple M=max3(d); pic.addBox(pos,pos,(m.x,min3(f).y,m.z),(m.x,max3(f).y,m.z)); } } // Process any queued x and z axis bound calculation requests. for(int i=0; i < pic.scale.x.bound.length; ++i) pic.scale.x.bound[i](); for(int i=0; i < pic.scale.z.bound.length; ++i) pic.scale.z.bound[i](); pic.scale.x.bound.delete(); pic.scale.z.bound.delete(); bounds(); // Request another y bounds calculation before final picture scaling. pic.scale.y.bound.push(bounds); } // An internal routine to draw an x axis at a particular y value. void zaxis3At(picture pic=currentpicture, Label L="", axis axis, real zmin=-infinity, real zmax=infinity, pen p=currentpen, ticks3 ticks=NoTicks3, arrowbar3 arrow=None, margin3 margin=NoMargin3, bool above=true, bool opposite=false, bool opposite2=false, bool primary=true) { int type=axis.type; int type2=axis.type2; triple dir=axis.align.dir3 == O ? defaultdir(X,Y,Z,opposite^opposite2,currentprojection) : axis.align.dir3; Label L=L.copy(); if(L.align.dir3 == O && L.align.dir == 0) L.align(opposite ? -dir : dir); real x=axis.value; real y=axis.value2; real x2,y2; int[] divisor=copy(axis.zdivisor); pic.add(new void(picture f, transform3 t, transform3 T, triple lb, triple rt) { transform3 tinv=inverse(t); triple a=zmin == -infinity ? tinv*(xtrans(t,x),ytrans(t,y), lb.z-min3(p).z) : (x,y,zmin); triple b=zmax == infinity ? tinv*(xtrans(t,x),ytrans(t,y), rt.z-max3(p).z) : (x,y,zmax); real x0; real y0; if(abs(dir.x) < abs(dir.y)) { x0=x; y0=y2; } else { x0=x2; y0=y; } triple a2=zmin == -infinity ? tinv*(xtrans(t,x0),ytrans(t,y0), lb.z-min3(p).z) : (x0,y0,zmin); triple b2=zmax == infinity ? tinv*(xtrans(t,x0),ytrans(t,y0), rt.z-max3(p).z) : (x0,y0,zmax); if(zmin == -infinity || zmax == infinity) { bounds mz=autoscale(a.z,b.z,pic.scale.z.scale); pic.scale.z.tickMin=mz.min; pic.scale.z.tickMax=mz.max; divisor=mz.divisor; } triple fuzz=Z*epsilon*max(abs(a.z),abs(b.z)); a -= fuzz; b += fuzz; picture d; ticks(d,t,L,a--b,finite(x0) && finite(y0) ? a2--b2 : nullpath3, p,arrow,margin, ticklocate(a.z,b.z,pic.scale.z,Dir(dir)),divisor, opposite,primary); add(f,t*T*tinv*d); },above=above); void bounds() { if(type == Min) x=pic.scale.x.automin() ? tickMin3(pic).x : pic.userMin().x; else if(type == Max) x=pic.scale.x.automax() ? tickMax3(pic).x : pic.userMax().x; else if(type == Both) { x2=pic.scale.x.automax() ? tickMax3(pic).x : pic.userMax().x; x=opposite ? x2 : (pic.scale.x.automin() ? tickMin3(pic).x : pic.userMin().x); } if(type2 == Min) y=pic.scale.y.automin() ? tickMin3(pic).y : pic.userMin().y; else if(type2 == Max) y=pic.scale.y.automax() ? tickMax3(pic).y : pic.userMax().y; else if(type2 == Both) { y2=pic.scale.y.automax() ? tickMax3(pic).y : pic.userMax().y; y=opposite2 ? y2 : (pic.scale.y.automin() ? tickMin3(pic).y : pic.userMin().y); } real Zmin=finite(zmin) ? zmin : pic.userMin().z; real Zmax=finite(zmax) ? zmax : pic.userMax().z; triple a=(x,y,Zmin); triple b=(x,y,Zmax); triple a2=(x2,y2,Zmin); triple b2=(x2,y2,Zmax); if(finite(a)) { pic.addPoint(a,min3(p)); pic.addPoint(a,max3(p)); } if(finite(b)) { pic.addPoint(b,min3(p)); pic.addPoint(b,max3(p)); } if(finite(a) && finite(b)) { picture d; ticks(d,pic.scaling3(warn=false),L, (0,0,a.z)--(0,0,b.z),(0,0,a2.z)--(0,0,a2.z),p,arrow,margin, ticklocate(a.z,b.z,pic.scale.z,Dir(dir)),divisor, opposite,primary); frame f; if(L.s != "") { Label L0=L.copy(); L0.position(0); add(f,L0); } triple pos=a+L.relative()*(b-a); triple m=min3(d); triple M=max3(d); pic.addBox(pos,pos,(m.x,m.y,min3(f).z),(m.x,m.y,max3(f).z)); } } // Process any queued x and y axes bound calculation requests. for(int i=0; i < pic.scale.x.bound.length; ++i) pic.scale.x.bound[i](); for(int i=0; i < pic.scale.y.bound.length; ++i) pic.scale.y.bound[i](); pic.scale.x.bound.delete(); pic.scale.y.bound.delete(); bounds(); // Request another z bounds calculation before final picture scaling. pic.scale.z.bound.push(bounds); } // Internal routine to autoscale the user limits of a picture. void autoscale3(picture pic=currentpicture, axis axis) { bool set=pic.scale.set; autoscale(pic,axis); if(!set) { bounds mz; if(pic.userSetz()) { mz=autoscale(pic.userMin().z,pic.userMax().z,pic.scale.z.scale); if(pic.scale.z.scale.logarithmic && floor(pic.userMin().z) == floor(pic.userMax().z)) { if(pic.scale.z.automin()) pic.userMinz3(floor(pic.userMin().z)); if(pic.scale.z.automax()) pic.userMaxz3(ceil(pic.userMax().z)); } } else {mz.min=mz.max=0; pic.scale.set=false;} pic.scale.z.tickMin=mz.min; pic.scale.z.tickMax=mz.max; axis.zdivisor=mz.divisor; } } // Draw an x axis in three dimensions. void xaxis3(picture pic=currentpicture, Label L="", axis axis=YZZero, real xmin=-infinity, real xmax=infinity, pen p=currentpen, ticks3 ticks=NoTicks3, arrowbar3 arrow=None, margin3 margin=NoMargin3, bool above=false) { if(xmin > xmax) return; if(pic.scale.x.automin && xmin > -infinity) pic.scale.x.automin=false; if(pic.scale.x.automax && xmax < infinity) pic.scale.x.automax=false; if(!pic.scale.set) { axis(pic,axis); autoscale3(pic,axis); } bool newticks=false; if(xmin != -infinity) { xmin=pic.scale.x.T(xmin); newticks=true; } if(xmax != infinity) { xmax=pic.scale.x.T(xmax); newticks=true; } if(newticks && pic.userSetx() && ticks != NoTicks3) { if(xmin == -infinity) xmin=pic.userMin().x; if(xmax == infinity) xmax=pic.userMax().x; bounds mx=autoscale(xmin,xmax,pic.scale.x.scale); pic.scale.x.tickMin=mx.min; pic.scale.x.tickMax=mx.max; axis.xdivisor=mx.divisor; } axis(pic,axis); if(xmin == -infinity && !axis.extend) { if(pic.scale.set) xmin=pic.scale.x.automin() ? pic.scale.x.tickMin : max(pic.scale.x.tickMin,pic.userMin().x); else xmin=pic.userMin().x; } if(xmax == infinity && !axis.extend) { if(pic.scale.set) xmax=pic.scale.x.automax() ? pic.scale.x.tickMax : min(pic.scale.x.tickMax,pic.userMax().x); else xmax=pic.userMax().x; } if(L.defaultposition) { L=L.copy(); L.position(axis.position); } bool back=false; if(axis.type == Both) { triple v=currentprojection.normal; back=dot((0,pic.userMax().y-pic.userMin().y,0),v)*sgn(v.z) > 0; } xaxis3At(pic,L,axis,xmin,xmax,p,ticks,arrow,margin,above,false,false,!back); if(axis.type == Both) xaxis3At(pic,L,axis,xmin,xmax,p,ticks,arrow,margin,above,true,false,back); if(axis.type2 == Both) { xaxis3At(pic,L,axis,xmin,xmax,p,ticks,arrow,margin,above,false,true,false); if(axis.type == Both) xaxis3At(pic,L,axis,xmin,xmax,p,ticks,arrow,margin,above,true,true,false); } } // Draw a y axis in three dimensions. void yaxis3(picture pic=currentpicture, Label L="", axis axis=XZZero, real ymin=-infinity, real ymax=infinity, pen p=currentpen, ticks3 ticks=NoTicks3, arrowbar3 arrow=None, margin3 margin=NoMargin3, bool above=false) { if(ymin > ymax) return; if(pic.scale.y.automin && ymin > -infinity) pic.scale.y.automin=false; if(pic.scale.y.automax && ymax < infinity) pic.scale.y.automax=false; if(!pic.scale.set) { axis(pic,axis); autoscale3(pic,axis); } bool newticks=false; if(ymin != -infinity) { ymin=pic.scale.y.T(ymin); newticks=true; } if(ymax != infinity) { ymax=pic.scale.y.T(ymax); newticks=true; } if(newticks && pic.userSety() && ticks != NoTicks3) { if(ymin == -infinity) ymin=pic.userMin().y; if(ymax == infinity) ymax=pic.userMax().y; bounds my=autoscale(ymin,ymax,pic.scale.y.scale); pic.scale.y.tickMin=my.min; pic.scale.y.tickMax=my.max; axis.ydivisor=my.divisor; } axis(pic,axis); if(ymin == -infinity && !axis.extend) { if(pic.scale.set) ymin=pic.scale.y.automin() ? pic.scale.y.tickMin : max(pic.scale.y.tickMin,pic.userMin().y); else ymin=pic.userMin().y; } if(ymax == infinity && !axis.extend) { if(pic.scale.set) ymax=pic.scale.y.automax() ? pic.scale.y.tickMax : min(pic.scale.y.tickMax,pic.userMax().y); else ymax=pic.userMax().y; } if(L.defaultposition) { L=L.copy(); L.position(axis.position); } bool back=false; if(axis.type == Both) { triple v=currentprojection.normal; back=dot((pic.userMax().x-pic.userMin().x,0,0),v)*sgn(v.z) > 0; } yaxis3At(pic,L,axis,ymin,ymax,p,ticks,arrow,margin,above,false,false,!back); if(axis.type == Both) yaxis3At(pic,L,axis,ymin,ymax,p,ticks,arrow,margin,above,true,false,back); if(axis.type2 == Both) { yaxis3At(pic,L,axis,ymin,ymax,p,ticks,arrow,margin,above,false,true,false); if(axis.type == Both) yaxis3At(pic,L,axis,ymin,ymax,p,ticks,arrow,margin,above,true,true,false); } } // Draw a z axis in three dimensions. void zaxis3(picture pic=currentpicture, Label L="", axis axis=XYZero, real zmin=-infinity, real zmax=infinity, pen p=currentpen, ticks3 ticks=NoTicks3, arrowbar3 arrow=None, margin3 margin=NoMargin3, bool above=false) { if(zmin > zmax) return; if(pic.scale.z.automin && zmin > -infinity) pic.scale.z.automin=false; if(pic.scale.z.automax && zmax < infinity) pic.scale.z.automax=false; if(!pic.scale.set) { axis(pic,axis); autoscale3(pic,axis); } bool newticks=false; if(zmin != -infinity) { zmin=pic.scale.z.T(zmin); newticks=true; } if(zmax != infinity) { zmax=pic.scale.z.T(zmax); newticks=true; } if(newticks && pic.userSetz() && ticks != NoTicks3) { if(zmin == -infinity) zmin=pic.userMin().z; if(zmax == infinity) zmax=pic.userMax().z; bounds mz=autoscale(zmin,zmax,pic.scale.z.scale); pic.scale.z.tickMin=mz.min; pic.scale.z.tickMax=mz.max; axis.zdivisor=mz.divisor; } axis(pic,axis); if(zmin == -infinity && !axis.extend) { if(pic.scale.set) zmin=pic.scale.z.automin() ? pic.scale.z.tickMin : max(pic.scale.z.tickMin,pic.userMin().z); else zmin=pic.userMin().z; } if(zmax == infinity && !axis.extend) { if(pic.scale.set) zmax=pic.scale.z.automax() ? pic.scale.z.tickMax : min(pic.scale.z.tickMax,pic.userMax().z); else zmax=pic.userMax().z; } if(L.defaultposition) { L=L.copy(); L.position(axis.position); } bool back=false; if(axis.type == Both) { triple v=currentprojection.vector(); back=dot((pic.userMax().x-pic.userMin().x,0,0),v)*sgn(v.y) > 0; } zaxis3At(pic,L,axis,zmin,zmax,p,ticks,arrow,margin,above,false,false,!back); if(axis.type == Both) zaxis3At(pic,L,axis,zmin,zmax,p,ticks,arrow,margin,above,true,false,back); if(axis.type2 == Both) { zaxis3At(pic,L,axis,zmin,zmax,p,ticks,arrow,margin,above,false,true,false); if(axis.type == Both) zaxis3At(pic,L,axis,zmin,zmax,p,ticks,arrow,margin,above,true,true,false); } } // Set the z limits of a picture. void zlimits(picture pic=currentpicture, real min=-infinity, real max=infinity, bool crop=NoCrop) { if(min > max) return; pic.scale.z.automin=min <= -infinity; pic.scale.z.automax=max >= infinity; bounds mz; if(pic.scale.z.automin() || pic.scale.z.automax()) mz=autoscale(pic.userMin().z,pic.userMax().z,pic.scale.z.scale); if(pic.scale.z.automin) { if(pic.scale.z.automin()) pic.userMinz(mz.min); } else pic.userMinz(min(pic.scale.z.T(min),pic.scale.z.T(max))); if(pic.scale.z.automax) { if(pic.scale.z.automax()) pic.userMaxz(mz.max); } else pic.userMaxz(max(pic.scale.z.T(min),pic.scale.z.T(max))); } // Restrict the x, y, and z limits to box(min,max). void limits(picture pic=currentpicture, triple min, triple max) { xlimits(pic,min.x,max.x); ylimits(pic,min.y,max.y); zlimits(pic,min.z,max.z); } // Draw x, y and z axes. void axes3(picture pic=currentpicture, Label xlabel="", Label ylabel="", Label zlabel="", bool extend=false, triple min=(-infinity,-infinity,-infinity), triple max=(infinity,infinity,infinity), pen p=currentpen, arrowbar3 arrow=None, margin3 margin=NoMargin3) { xaxis3(pic,xlabel,YZZero(extend),min.x,max.x,p,arrow,margin); yaxis3(pic,ylabel,XZZero(extend),min.y,max.y,p,arrow,margin); zaxis3(pic,zlabel,XYZero(extend),min.z,max.z,p,arrow,margin); } triple Scale(picture pic=currentpicture, triple v) { return (pic.scale.x.T(v.x),pic.scale.y.T(v.y),pic.scale.z.T(v.z)); } real ScaleZ(picture pic=currentpicture, real z) { return pic.scale.z.T(z); } // Draw a tick of length size at triple v in direction dir using pen p. void tick(picture pic=currentpicture, triple v, triple dir, real size=Ticksize, pen p=currentpen) { triple v=Scale(pic,v); pic.add(new void (picture f, transform3 t) { triple tv=t*v; draw(f,tv--tv+unit(dir)*size,p); }); pic.addPoint(v,p); pic.addPoint(v,unit(dir)*size,p); } void xtick(picture pic=currentpicture, triple v, triple dir=Y, real size=Ticksize, pen p=currentpen) { tick(pic,v,dir,size,p); } void xtick3(picture pic=currentpicture, real x, triple dir=Y, real size=Ticksize, pen p=currentpen) { tick(pic,(x,pic.scale.y.scale.logarithmic ? 1 : 0, pic.scale.z.scale.logarithmic ? 1 : 0),dir,size,p); } void ytick(picture pic=currentpicture, triple v, triple dir=X, real size=Ticksize, pen p=currentpen) { tick(pic,v,dir,size,p); } void ytick3(picture pic=currentpicture, real y, triple dir=X, real size=Ticksize, pen p=currentpen) { tick(pic,(pic.scale.x.scale.logarithmic ? 1 : 0,y, pic.scale.z.scale.logarithmic ? 1 : 0),dir,size,p); } void ztick(picture pic=currentpicture, triple v, triple dir=X, real size=Ticksize, pen p=currentpen) { xtick(pic,v,dir,size,p); } void ztick3(picture pic=currentpicture, real z, triple dir=X, real size=Ticksize, pen p=currentpen) { xtick(pic,(pic.scale.x.scale.logarithmic ? 1 : 0, pic.scale.y.scale.logarithmic ? 1 : 0,z),dir,size,p); } void tick(picture pic=currentpicture, Label L, real value, triple v, triple dir, string format="", real size=Ticksize, pen p=currentpen) { Label L=L.copy(); L.align(L.align,-dir); if(shift(L.T3)*O == O) L.T3=shift(dot(dir,L.align.dir3) > 0 ? dir*size : ticklabelshift(L.align.dir3,p))*L.T3; L.p(p); if(L.s == "") L.s=format(format == "" ? defaultformat : format,value); L.s=baseline(L.s,baselinetemplate); label(pic,L,Scale(pic,v)); tick(pic,v,dir,size,p); } void xtick(picture pic=currentpicture, Label L, triple v, triple dir=Y, string format="", real size=Ticksize, pen p=currentpen) { tick(pic,L,v.x,v,dir,format,size,p); } void xtick3(picture pic=currentpicture, Label L, real x, triple dir=Y, string format="", real size=Ticksize, pen p=currentpen) { xtick(pic,L,(x,pic.scale.y.scale.logarithmic ? 1 : 0, pic.scale.z.scale.logarithmic ? 1 : 0),dir,size,p); } void ytick(picture pic=currentpicture, Label L, triple v, triple dir=X, string format="", real size=Ticksize, pen p=currentpen) { tick(pic,L,v.y,v,dir,format,size,p); } void ytick3(picture pic=currentpicture, Label L, real y, triple dir=X, string format="", real size=Ticksize, pen p=currentpen) { xtick(pic,L,(pic.scale.x.scale.logarithmic ? 1 : 0,y, pic.scale.z.scale.logarithmic ? 1 : 0),dir,format,size,p); } void ztick(picture pic=currentpicture, Label L, triple v, triple dir=X, string format="", real size=Ticksize, pen p=currentpen) { tick(pic,L,v.z,v,dir,format,size,p); } void ztick3(picture pic=currentpicture, Label L, real z, triple dir=X, string format="", real size=Ticksize, pen p=currentpen) { xtick(pic,L,(pic.scale.x.scale.logarithmic ? 1 : 0, pic.scale.z.scale.logarithmic ? 1 : 0,z),dir,format,size,p); } private void label(picture pic, Label L, triple v, real x, align align, string format, pen p) { Label L=L.copy(); L.align(align); L.p(p); if(shift(L.T3)*O == O) L.T3=shift(ticklabelshift(L.align.dir3,L.p))*L.T3; if(L.s == "") L.s=format(format == "" ? defaultformat : format,x); L.s=baseline(L.s,baselinetemplate); label(pic,L,v); } void labelx(picture pic=currentpicture, Label L="", triple v, align align=-Y, string format="", pen p=currentpen) { label(pic,L,Scale(pic,v),v.x,align,format,p); } void labelx3(picture pic=currentpicture, Label L="", real x, align align=-Y, string format="", pen p=currentpen) { labelx(pic,L,(x,pic.scale.y.scale.logarithmic ? 1 : 0, pic.scale.z.scale.logarithmic ? 1 : 0),align,format,p); } void labely(picture pic=currentpicture, Label L="", triple v, align align=-X, string format="", pen p=currentpen) { label(pic,L,Scale(pic,v),v.y,align,format,p); } void labely3(picture pic=currentpicture, Label L="", real y, align align=-X, string format="", pen p=currentpen) { labely(pic,L,(pic.scale.x.scale.logarithmic ? 1 : 0,y, pic.scale.z.scale.logarithmic ? 1 : 0),align,format,p); } void labelz(picture pic=currentpicture, Label L="", triple v, align align=-X, string format="", pen p=currentpen) { label(pic,L,Scale(pic,v),v.z,align,format,p); } void labelz3(picture pic=currentpicture, Label L="", real z, align align=-X, string format="", pen p=currentpen) { labelz(pic,L,(pic.scale.x.scale.logarithmic ? 1 : 0, pic.scale.y.scale.logarithmic ? 1 : 0,z),align,format,p); } typedef guide3 graph(triple F(real), real, real, int); typedef guide3[] multigraph(triple F(real), real, real, int); graph graph(interpolate3 join) { return new guide3(triple f(real), real a, real b, int n) { real width=b-a; return n == 0 ? join(f(a)) : join(...sequence(new guide3(int i) {return f(a+(i/n)*width);},n+1)); }; } multigraph graph(interpolate3 join, bool3 cond(real)) { return new guide3[](triple f(real), real a, real b, int n) { real width=b-a; if(n == 0) return new guide3[] {join(cond(a) ? f(a) : nullpath3)}; guide3[] G; guide3[] g; for(int i=0; i < n+1; ++i) { real t=a+(i/n)*width; bool3 b=cond(t); if(b) g.push(f(t)); else { if(g.length > 0) { G.push(join(...g)); g=new guide3[] {}; } if(b == default) g.push(f(t)); } } if(g.length > 0) G.push(join(...g)); return G; }; } guide3 Straight(... guide3[])=operator --; guide3 Spline(... guide3[])=operator ..; guide3 graph(picture pic=currentpicture, real x(real), real y(real), real z(real), real a, real b, int n=ngraph, interpolate3 join=operator --) { return graph(join)(new triple(real t) {return Scale(pic,(x(t),y(t),z(t)));}, a,b,n); } guide3[] graph(picture pic=currentpicture, real x(real), real y(real), real z(real), real a, real b, int n=ngraph, bool3 cond(real), interpolate3 join=operator --) { return graph(join,cond)(new triple(real t) { return Scale(pic,(x(t),y(t),z(t))); },a,b,n); } guide3 graph(picture pic=currentpicture, triple v(real), real a, real b, int n=ngraph, interpolate3 join=operator --) { return graph(join)(new triple(real t) {return Scale(pic,v(t));},a,b,n); } guide3[] graph(picture pic=currentpicture, triple v(real), real a, real b, int n=ngraph, bool3 cond(real), interpolate3 join=operator --) { return graph(join,cond)(new triple(real t) { return Scale(pic,v(t)); },a,b,n); } guide3 graph(picture pic=currentpicture, triple[] v, interpolate3 join=operator --) { int i=0; return graph(join)(new triple(real) { triple w=Scale(pic,v[i]); ++i; return w; },0,0,v.length-1); } guide3[] graph(picture pic=currentpicture, triple[] v, bool3[] cond, interpolate3 join=operator --) { int n=v.length; int i=0; triple w; checkconditionlength(cond.length,n); bool3 condition(real) { bool b=cond[i]; if(b) w=Scale(pic,v[i]); ++i; return b; } return graph(join,condition)(new triple(real) {return w;},0,0,n-1); } guide3 graph(picture pic=currentpicture, real[] x, real[] y, real[] z, interpolate3 join=operator --) { int n=x.length; checklengths(n,y.length); checklengths(n,z.length); int i=0; return graph(join)(new triple(real) { triple w=Scale(pic,(x[i],y[i],z[i])); ++i; return w; },0,0,n-1); } guide3[] graph(picture pic=currentpicture, real[] x, real[] y, real[] z, bool3[] cond, interpolate3 join=operator --) { int n=x.length; checklengths(n,y.length); checklengths(n,z.length); int i=0; triple w; checkconditionlength(cond.length,n); bool3 condition(real) { bool3 b=cond[i]; if(b != false) w=Scale(pic,(x[i],y[i],z[i])); ++i; return b; } return graph(join,condition)(new triple(real) {return w;},0,0,n-1); } // The graph of a function along a path. guide3 graph(triple F(path, real), path p, int n=1, interpolate3 join=operator --) { guide3 g=join(...sequence(new guide3(int i) { return F(p,i/n); },n*length(p))); return cyclic(p) ? join(g,cycle) : join(g,F(p,length(p))); } guide3 graph(triple F(pair), path p, int n=1, interpolate3 join=operator --) { return graph(new triple(path p, real position) {return F(point(p,position));},p,n,join); } guide3 graph(picture pic=currentpicture, real f(pair), path p, int n=1, interpolate3 join=operator --) { return graph(new triple(pair z) {return Scale(pic,(z.x,z.y,f(z)));},p,n, join); } guide3 graph(real f(pair), path p, int n=1, real T(pair), interpolate3 join=operator --) { return graph(new triple(pair z) {pair w=T(z); return (w.x,w.y,f(w));},p,n, join); } // Connect points in v into segments corresponding to consecutive true elements // of b using interpolation operator join. path3[] segment(triple[] v, bool[] cond, interpolate3 join=operator --) { checkconditionlength(cond.length,v.length); int[][] segment=segment(cond); return sequence(new path3(int i) {return join(...v[segment[i]]);}, segment.length); } bool uperiodic(triple[][] a) { int n=a.length; if(n == 0) return false; int m=a[0].length; triple[] a0=a[0]; triple[] a1=a[n-1]; real epsilon=sqrtEpsilon*norm(a); for(int j=0; j < m; ++j) if(abs(a0[j]-a1[j]) > epsilon) return false; return true; } bool vperiodic(triple[][] a) { int n=a.length; if(n == 0) return false; int m=a[0].length-1; real epsilon=sqrtEpsilon*norm(a); for(int i=0; i < n; ++i) if(abs(a[i][0]-a[i][m]) > epsilon) return false; return true; } // return the surface described by a matrix f surface surface(triple[][] f, bool[][] cond={}) { if(!rectangular(f)) abort("matrix is not rectangular"); int nx=f.length-1; int ny=nx > 0 ? f[0].length-1 : 0; bool all=cond.length == 0; int count; if(all) count=nx*ny; else { count=0; for(int i=0; i < nx; ++i) { bool[] condi=cond[i]; bool[] condp=cond[i+1]; for(int j=0; j < ny; ++j) if(condi[j] && condi[j+1] && condp[j] && condp[j+1]) ++count; } } surface s=surface(count); s.index=new int[nx][ny]; int k=-1; for(int i=0; i < nx; ++i) { bool[] condi,condp; if(!all) { condi=cond[i]; condp=cond[i+1]; } triple[] fi=f[i]; triple[] fp=f[i+1]; int[] indexi=s.index[i]; for(int j=0; j < ny; ++j) { if(all || (condi[j] && condi[j+1] && condp[j] && condp[j+1])) s.s[++k]=patch(new triple[] {fi[j],fp[j],fp[j+1],fi[j+1]}); indexi[j]=k; } } if(count == nx*ny) { if(uperiodic(f)) s.ucyclic(true); if(vperiodic(f)) s.vcyclic(true); } return s; } surface bispline(real[][] z, real[][] p, real[][] q, real[][] r, real[] x, real[] y, bool[][] cond={}) { // z[i][j] is the value at (x[i],y[j]) // p and q are the first derivatives with respect to x and y, respectively // r is the second derivative ddu/dxdy int n=x.length-1; int m=y.length-1; bool all=cond.length == 0; int count; if(all) count=n*m; else { count=0; for(int i=0; i < n; ++i) { bool[] condi=cond[i]; for(int j=0; j < m; ++j) if(condi[j]) ++count; } } surface s=surface(count); s.index=new int[n][m]; int k=0; for(int i=0; i < n; ++i) { int ip=i+1; real xi=x[i]; real xp=x[ip]; real x1=interp(xi,xp,1/3); real x2=interp(xi,xp,2/3); real hx=x1-xi; real[] zi=z[i]; real[] zp=z[ip]; real[] ri=r[i]; real[] rp=r[ip]; real[] pi=p[i]; real[] pp=p[ip]; real[] qi=q[i]; real[] qp=q[ip]; int[] indexi=s.index[i]; bool[] condi=all ? null : cond[i]; for(int j=0; j < m; ++j) { if(all || condi[j]) { real yj=y[j]; int jp=j+1; real yp=y[jp]; real y1=interp(yj,yp,1/3); real y2=interp(yj,yp,2/3); real hy=y1-yj; real hxy=hx*hy; real zij=zi[j]; real zip=zi[jp]; real zpj=zp[j]; real zpp=zp[jp]; real pij=hx*pi[j]; real ppj=hx*pp[j]; real qip=hy*qi[jp]; real qpp=hy*qp[jp]; real zippip=zip+hx*pi[jp]; real zppmppp=zpp-hx*pp[jp]; real zijqij=zij+hy*qi[j]; real zpjqpj=zpj+hy*qp[j]; s.s[k]=patch(new triple[][] { {(xi,yj,zij),(xi,y1,zijqij),(xi,y2,zip-qip),(xi,yp,zip)}, {(x1,yj,zij+pij),(x1,y1,zijqij+pij+hxy*ri[j]), (x1,y2,zippip-qip-hxy*ri[jp]),(x1,yp,zippip)}, {(x2,yj,zpj-ppj),(x2,y1,zpjqpj-ppj-hxy*rp[j]), (x2,y2,zppmppp-qpp+hxy*rp[jp]),(x2,yp,zppmppp)}, {(xp,yj,zpj),(xp,y1,zpjqpj),(xp,y2,zpp-qpp),(xp,yp,zpp)}},copy=false); indexi[j]=k; ++k; } } } return s; } // return the surface described by a real matrix f, interpolated with // xsplinetype and ysplinetype. surface surface(real[][] f, real[] x, real[] y, splinetype xsplinetype=null, splinetype ysplinetype=xsplinetype, bool[][] cond={}) { real epsilon=sqrtEpsilon*norm(y); if(xsplinetype == null) xsplinetype=(abs(x[0]-x[x.length-1]) <= epsilon) ? periodic : notaknot; if(ysplinetype == null) ysplinetype=(abs(y[0]-y[y.length-1]) <= epsilon) ? periodic : notaknot; int n=x.length; int m=y.length; real[][] ft=transpose(f); real[][] tp=new real[m][]; for(int j=0; j < m; ++j) tp[j]=xsplinetype(x,ft[j]); real[][] q=new real[n][]; for(int i=0; i < n; ++i) q[i]=ysplinetype(y,f[i]); real[][] qt=transpose(q); real[] d1=xsplinetype(x,qt[0]); real[] d2=xsplinetype(x,qt[m-1]); real[][] r=new real[n][]; real[][] p=transpose(tp); for(int i=0; i < n; ++i) r[i]=clamped(d1[i],d2[i])(y,p[i]); surface s=bispline(f,p,q,r,x,y,cond); if(xsplinetype == periodic) s.ucyclic(true); if(ysplinetype == periodic) s.vcyclic(true); return s; } // return the surface described by a real matrix f, interpolated with // xsplinetype and ysplinetype. surface surface(real[][] f, pair a, pair b, splinetype xsplinetype, splinetype ysplinetype=xsplinetype, bool[][] cond={}) { if(!rectangular(f)) abort("matrix is not rectangular"); int nx=f.length-1; int ny=nx > 0 ? f[0].length-1 : 0; if(nx == 0 || ny == 0) return nullsurface; real[] x=uniform(a.x,b.x,nx); real[] y=uniform(a.y,b.y,ny); return surface(f,x,y,xsplinetype,ysplinetype,cond); } // return the surface described by a real matrix f, interpolated linearly. surface surface(real[][] f, pair a, pair b, bool[][] cond={}) { if(!rectangular(f)) abort("matrix is not rectangular"); int nx=f.length-1; int ny=nx > 0 ? f[0].length-1 : 0; if(nx == 0 || ny == 0) return nullsurface; bool all=cond.length == 0; triple[][] v=new triple[nx+1][ny+1]; for(int i=0; i <= nx; ++i) { real x=interp(a.x,b.x,i/nx); bool[] condi=all ? null : cond[i]; triple[] vi=v[i]; real[] fi=f[i]; for(int j=0; j <= ny; ++j) if(all || condi[j]) vi[j]=(x,interp(a.y,b.y,j/ny),fi[j]); } return surface(v,cond); } // return the surface described by a parametric function f over box(a,b), // interpolated linearly. surface surface(triple f(pair z), pair a, pair b, int nu=nmesh, int nv=nu, bool cond(pair z)=null) { if(nu <= 0 || nv <= 0) return nullsurface; bool[][] active; bool all=cond == null; if(!all) active=new bool[nu+1][nv+1]; real du=1/nu; real dv=1/nv; pair Idv=(0,dv); pair dz=(du,dv); triple[][] v=new triple[nu+1][nv+1]; for(int i=0; i <= nu; ++i) { real x=interp(a.x,b.x,i*du); bool[] activei=all ? null : active[i]; triple[] vi=v[i]; for(int j=0; j <= nv; ++j) { pair z=(x,interp(a.y,b.y,j*dv)); if(all || (activei[j]=cond(z))) vi[j]=f(z); } } return surface(v,active); } // return the surface described by a parametric function f over box(a,b), // interpolated with usplinetype and vsplinetype. surface surface(triple f(pair z), pair a, pair b, int nu=nmesh, int nv=nu, splinetype[] usplinetype, splinetype[] vsplinetype=Spline, bool cond(pair z)=null) { return surface(f,uniform(a.x,b.x,nu),uniform(a.y,b.y,nv), usplinetype,vsplinetype,cond); } // return the surface described by a real function f over box(a,b), // interpolated linearly. surface surface(real f(pair z), pair a, pair b, int nx=nmesh, int ny=nx, bool cond(pair z)=null) { return surface(new triple(pair z) {return (z.x,z.y,f(z));},a,b,nx,ny,cond); } // return the surface described by a real function f over box(a,b), // interpolated with xsplinetype and ysplinetype. surface surface(real f(pair z), pair a, pair b, int nx=nmesh, int ny=nx, splinetype xsplinetype, splinetype ysplinetype=xsplinetype, bool cond(pair z)=null) { bool[][] active; bool all=cond == null; if(!all) active=new bool[nx+1][ny+1]; real dx=1/nx; real dy=1/ny; pair Idy=(0,dy); pair dz=(dx,dy); real[][] F=new real[nx+1][ny+1]; real[] x=uniform(a.x,b.x,nx); real[] y=uniform(a.y,b.y,ny); for(int i=0; i <= nx; ++i) { bool[] activei=all ? null : active[i]; real[] Fi=F[i]; real x=x[i]; for(int j=0; j <= ny; ++j) { pair z=(x,y[j]); Fi[j]=f(z); if(!all) activei[j]=cond(z); } } return surface(F,x,y,xsplinetype,ysplinetype,active); } guide3[][] lift(real f(real x, real y), guide[][] g, interpolate3 join=operator --) { guide3[][] G=new guide3[g.length][]; for(int cnt=0; cnt < g.length; ++cnt) { guide[] gcnt=g[cnt]; guide3[] Gcnt=new guide3[gcnt.length]; for(int i=0; i < gcnt.length; ++i) { guide gcnti=gcnt[i]; guide3 Gcnti=join(...sequence(new guide3(int j) { pair z=point(gcnti,j); return (z.x,z.y,f(z.x,z.y)); },size(gcnti))); if(cyclic(gcnti)) Gcnti=Gcnti..cycle; Gcnt[i]=Gcnti; } G[cnt]=Gcnt; } return G; } guide3[][] lift(real f(pair z), guide[][] g, interpolate3 join=operator --) { return lift(new real(real x, real y) {return f((x,y));},g,join); } void draw(picture pic=currentpicture, Label[] L=new Label[], guide3[][] g, pen[] p, light light=currentlight, string name="", render render=defaultrender, interaction interaction=LabelInteraction()) { pen thin=is3D() ? thin() : defaultpen; bool group=g.length > 1 && (name != "" || render.defaultnames); if(group) begingroup3(pic,name == "" ? "contours" : name,render); for(int cnt=0; cnt < g.length; ++cnt) { guide3[] gcnt=g[cnt]; pen pcnt=thin+p[cnt]; for(int i=0; i < gcnt.length; ++i) draw(pic,gcnt[i],pcnt,light,name); if(L.length > 0) { Label Lcnt=L[cnt]; for(int i=0; i < gcnt.length; ++i) { if(Lcnt.s != "" && size(gcnt[i]) > 1) label(pic,Lcnt,gcnt[i],pcnt,name,interaction); } } } if(group) endgroup3(pic); } void draw(picture pic=currentpicture, Label[] L=new Label[], guide3[][] g, pen p=currentpen, light light=currentlight, string name="", render render=defaultrender, interaction interaction=LabelInteraction()) { draw(pic,L,g,sequence(new pen(int) {return p;},g.length),light,name, render,interaction); } real maxlength(triple f(pair z), pair a, pair b, int nu, int nv) { return min(abs(f((b.x,a.y))-f(a))/nu,abs(f((a.x,b.y))-f(a))/nv); } // return a vector field on a parametric surface f over box(a,b). picture vectorfield(path3 vector(pair v), triple f(pair z), pair a, pair b, int nu=nmesh, int nv=nu, bool truesize=false, real maxlength=truesize ? 0 : maxlength(f,a,b,nu,nv), bool cond(pair z)=null, pen p=currentpen, arrowbar3 arrow=Arrow3, margin3 margin=PenMargin3, string name="", render render=defaultrender) { picture pic; real du=1/nu; real dv=1/nv; bool all=cond == null; real scale; if(maxlength > 0) { real size(pair z) { path3 g=vector(z); return abs(point(g,size(g)-1)-point(g,0)); } real max=size((0,0)); for(int i=0; i <= nu; ++i) { real x=interp(a.x,b.x,i*du); for(int j=0; j <= nv; ++j) max=max(max,size((x,interp(a.y,b.y,j*dv)))); } scale=max > 0 ? maxlength/max : 1; } else scale=1; bool group=name != "" || render.defaultnames; if(group) begingroup3(pic,name == "" ? "vectorfield" : name,render); for(int i=0; i <= nu; ++i) { real x=interp(a.x,b.x,i*du); for(int j=0; j <= nv; ++j) { pair z=(x,interp(a.y,b.y,j*dv)); if(all || cond(z)) { path3 g=scale3(scale)*vector(z); string name="vector"; if(truesize) { picture opic; draw(opic,g,p,arrow,margin,name,render); add(pic,opic,f(z)); } else draw(pic,shift(f(z))*g,p,arrow,margin,name,render); } } } if(group) endgroup3(pic); return pic; } triple polar(real r, real theta, real phi) { return r*expi(theta,phi); } guide3 polargraph(real r(real,real), real theta(real), real phi(real), int n=ngraph, interpolate3 join=operator --) { return graph(join)(new triple(real t) { return polar(r(theta(t),phi(t)),theta(t),phi(t)); },0,1,n); } // True arc path3 Arc(triple c, triple v1, triple v2, triple normal=O, bool direction=CCW, int n=nCircle) { v1 -= c; real r=abs(v1); v1=unit(v1); v2=unit(v2-c); if(normal == O) { normal=cross(v1,v2); if(normal == O) abort("explicit normal required for these endpoints"); } transform3 T=align(unit(normal)); transform3 Tinv=transpose(T); v1=Tinv*v1; v2=Tinv*v2; real fuzz=sqrtEpsilon*max(abs(v1),abs(v2)); if(abs(v1.z) > fuzz || abs(v2.z) > fuzz) abort("invalid normal vector"); real phi1=radians(longitude(v1,warn=false)); real phi2=radians(longitude(v2,warn=false)); if(direction) { if(phi1 >= phi2) phi1 -= 2pi; } else if(phi2 >= phi1) phi2 -= 2pi; static real piby2=pi/2; return shift(c)*T*polargraph(new real(real theta, real phi) {return r;}, new real(real t) {return piby2;}, new real(real t) {return interp(phi1,phi2,t);}, n,operator ..); } path3 Arc(triple c, real r, real theta1, real phi1, real theta2, real phi2, triple normal=O, bool direction, int n=nCircle) { return Arc(c,c+r*dir(theta1,phi1),c+r*dir(theta2,phi2),normal,direction,n); } path3 Arc(triple c, real r, real theta1, real phi1, real theta2, real phi2, triple normal=O, int n=nCircle) { return Arc(c,r,theta1,phi1,theta2,phi2,normal, theta2 > theta1 || (theta2 == theta1 && phi2 >= phi1) ? CCW : CW, n); } // True circle path3 Circle(triple c, real r, triple normal=Z, int n=nCircle) { static real piby2=pi/2; return shift(c)*align(unit(normal))* polargraph(new real(real theta, real phi) {return r;}, new real(real t) {return piby2;}, new real(real t) {return interp(0,2pi,t);},n,operator ..); } ./asymptote-2.41/base/reload.js0000644000175000017500000000122113064427076016255 0ustar norbertnorbert// Load/reload the document associated with a given path. // UNIX: Copy to ~/.adobe/Acrobat/x.x/JavaScripts/ // To avoid random window placement we recommend specifying an acroread // geometry option, for example: -geometry +0+0 // MSWindows: Copy to %APPDATA%/Adobe/Acrobat/x.x/JavaScripts/ // Note: x.x represents the appropriate Acrobat Reader version number. reload = app.trustedFunction(function(path) { app.beginPriv(); n=app.activeDocs.length; for(i=app.activeDocs.length-1; i >= 0; --i) { Doc=app.activeDocs[i]; if(Doc.path == path && Doc != this) { Doc.closeDoc(); break; } } app.openDoc(path); app.endPriv(); }); ./asymptote-2.41/base/smoothcontour3.asy0000644000175000017500000015534513064427076020216 0ustar norbertnorbert// Copyright 2015 Charles Staats III // // Licensed under the Apache License, Version 2.0 (the "License"); // you may not use this file except in compliance with the License. // You may obtain a copy of the License at // // http://www.apache.org/licenses/LICENSE-2.0 // // Unless required by applicable law or agreed to in writing, software // distributed under the License is distributed on an "AS IS" BASIS, // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. // See the License for the specific language governing permissions and // limitations under the License. // smoothcontour3 // An Asymptote module for drawing smooth implicitly defined surfaces // author: Charles Staats III // charles dot staats dot iii at gmail dot com import graph_settings; // for nmesh import three; import math; /***********************************************/ /******** CREATING BEZIER PATCHES **************/ /******** WITH SPECIFIED NORMALS **************/ /***********************************************/ // The weight given to minimizing the sum of squares of // the mixed partials at the corners of the bezier patch. // If this weight is zero, the result is undefined in // places and can be rather wild even where it is // defined. // The struct is used to as a namespace. struct pathwithnormals_settings { static real wildnessweight = 1e-3; } private from pathwithnormals_settings unravel wildnessweight; // The Bernstein basis polynomials of degree 3: real B03(real t) { return (1-t)^3; } real B13(real t) { return 3*t*(1-t)^2; } real B23(real t) { return 3*t^2*(1-t); } real B33(real t) { return t^3; } private typedef real function(real); function[] bernstein = new function[] {B03, B13, B23, B33}; // This function attempts to produce a Bezier patch // with the specified boundary path and normal directions. // For instance, the patch should be normal to // u0normals[0] at (0, 0.25), // normal to u0normals[1] at (0, 0.5), and // normal to u0normals[2] at (0, 0.75). // The actual normal (as computed by the patch.normal() function) // may be parallel to the specified normal, antiparallel, or // even zero. // // A small amount of deviation is allowed in order to stabilize // the algorithm (by keeping the mixed partials at the corners from // growing too large). // // Note that the specified normals are projected to be orthogonal to // the specified boundary path. However, the entries in the array // remain intact. patch patchwithnormals(path3 external, triple[] u0normals, triple[] u1normals, triple[] v0normals, triple[] v1normals) { assert(cyclic(external)); assert(length(external) == 4); assert(u0normals.length == 3); assert(u1normals.length == 3); assert(v0normals.length == 3); assert(v1normals.length == 3); triple[][] controlpoints = new triple[4][4]; controlpoints[0][0] = point(external,0); controlpoints[1][0] = postcontrol(external,0); controlpoints[2][0] = precontrol(external,1); controlpoints[3][0] = point(external,1); controlpoints[3][1] = postcontrol(external,1); controlpoints[3][2] = precontrol(external,2); controlpoints[3][3] = point(external,2); controlpoints[2][3] = postcontrol(external,2); controlpoints[1][3] = precontrol(external,3); controlpoints[0][3] = point(external,3); controlpoints[0][2] = postcontrol(external,3); controlpoints[0][1] = precontrol(external, 4); real[][] matrix = new real[24][12]; for (int i = 0; i < matrix.length; ++i) for (int j = 0; j < matrix[i].length; ++j) matrix[i][j] = 0; real[] rightvector = new real[24]; for (int i = 0; i < rightvector.length; ++i) rightvector[i] = 0; void addtocoeff(int i, int j, int count, triple coeffs) { if (1 <= i && i <= 2 && 1 <= j && j <= 2) { int position = 3 * (2 * (i-1) + (j-1)); matrix[count][position] += coeffs.x; matrix[count][position+1] += coeffs.y; matrix[count][position+2] += coeffs.z; } else { rightvector[count] -= dot(controlpoints[i][j], coeffs); } } void addtocoeff(int i, int j, int count, real coeff) { if (1 <= i && i <= 2 && 1 <= j && j <= 2) { int position = 3 * (2 * (i-1) + (j-1)); matrix[count][position] += coeff; matrix[count+1][position+1] += coeff; matrix[count+2][position+2] += coeff; } else { rightvector[count] -= controlpoints[i][j].x * coeff; rightvector[count+1] -= controlpoints[i][j].y * coeff; rightvector[count+2] -= controlpoints[i][j].z * coeff; } } int count = 0; void apply_u0(int j, real a, triple n) { real factor = 3 * bernstein[j](a); addtocoeff(0,j,count,-factor*n); addtocoeff(1,j,count,factor*n); } void apply_u0(real a, triple n) { triple tangent = dir(external, 4-a); n -= dot(n,tangent)*tangent; n = unit(n); for (int j = 0; j < 4; ++j) { apply_u0(j,a,n); } ++count; } apply_u0(0.25, u0normals[0]); apply_u0(0.5, u0normals[1]); apply_u0(0.75, u0normals[2]); void apply_u1(int j, real a, triple n) { real factor = 3 * bernstein[j](a); addtocoeff(3,j,count,factor*n); addtocoeff(2,j,count,-factor*n); } void apply_u1(real a, triple n) { triple tangent = dir(external, 1+a); n -= dot(n,tangent)*tangent; n = unit(n); for (int j = 0; j < 4; ++j) apply_u1(j,a,n); ++count; } apply_u1(0.25, u1normals[0]); apply_u1(0.5, u1normals[1]); apply_u1(0.75, u1normals[2]); void apply_v0(int i, real a, triple n) { real factor = 3 * bernstein[i](a); addtocoeff(i,0,count,-factor*n); addtocoeff(i,1,count,factor*n); } void apply_v0(real a, triple n) { triple tangent = dir(external, a); n -= dot(n,tangent) * tangent; n = unit(n); for (int i = 0; i < 4; ++i) apply_v0(i,a,n); ++count; } apply_v0(0.25, v0normals[0]); apply_v0(0.5, v0normals[1]); apply_v0(0.75, v0normals[2]); void apply_v1(int i, real a, triple n) { real factor = 3 * bernstein[i](a); addtocoeff(i,3,count,factor*n); addtocoeff(i,2,count,-factor*n); } void apply_v1(real a, triple n) { triple tangent = dir(external, 3-a); n -= dot(n,tangent)*tangent; n = unit(n); for (int i = 0; i < 4; ++i) apply_v1(i,a,n); ++count; } apply_v1(0.25, v1normals[0]); apply_v1(0.5, v1normals[1]); apply_v1(0.75, v1normals[2]); addtocoeff(0,0,count,9*wildnessweight); addtocoeff(1,1,count,9*wildnessweight); addtocoeff(0,1,count,-9*wildnessweight); addtocoeff(1,0,count,-9*wildnessweight); count+=3; addtocoeff(3,3,count,9*wildnessweight); addtocoeff(2,2,count,9*wildnessweight); addtocoeff(3,2,count,-9*wildnessweight); addtocoeff(2,3,count,-9*wildnessweight); count+=3; addtocoeff(0,3,count,9*wildnessweight); addtocoeff(1,2,count,9*wildnessweight); addtocoeff(1,3,count,-9*wildnessweight); addtocoeff(0,2,count,-9*wildnessweight); count += 3; addtocoeff(3,0,count,9*wildnessweight); addtocoeff(2,1,count,9*wildnessweight); addtocoeff(3,1,count,-9*wildnessweight); addtocoeff(2,0,count,-9*wildnessweight); count += 3; real[] solution = leastsquares(matrix, rightvector, warn=false); if (solution.length == 0) { // if the matrix was singular write("Warning: unable to solve matrix for specifying edge normals " + "on bezier patch. Using coons patch."); return patch(external); } for (int i = 1; i <= 2; ++i) { for (int j = 1; j <= 2; ++j) { int position = 3 * (2 * (i-1) + (j-1)); controlpoints[i][j] = (solution[position], solution[position+1], solution[position+2]); } } return patch(controlpoints); } // This function attempts to produce a Bezier triangle // with the specified boundary path and normal directions at the // edge midpoints. The bezier triangle should be normal to // n1 at point(external, 0.5), // normal to n2 at point(external, 1.5), and // normal to n3 at point(external, 2.5). // The actual normal (as computed by the patch.normal() function) // may be parallel to the specified normal, antiparallel, or // even zero. // // A small amount of deviation is allowed in order to stabilize // the algorithm (by keeping the mixed partials at the corners from // growing too large). patch trianglewithnormals(path3 external, triple n1, triple n2, triple n3) { assert(cyclic(external)); assert(length(external) == 3); // Use the formal symbols a3, a2b, abc, etc. to denote the control points, // following the Wikipedia article on Bezier triangles. triple a3 = point(external, 0), a2b = postcontrol(external, 0), ab2 = precontrol(external, 1), b3 = point(external, 1), b2c = postcontrol(external, 1), bc2 = precontrol(external, 2), c3 = point(external, 2), ac2 = postcontrol(external, 2), a2c = precontrol(external, 0); // Use orthogonal projection to ensure that the normal vectors are // actually normal to the boundary path. triple tangent = dir(external, 0.5); n1 -= dot(n1,tangent)*tangent; n1 = unit(n1); tangent = dir(external, 1.5); n2 -= dot(n2,tangent)*tangent; n2 = unit(n2); tangent = dir(external, 2.5); n3 -= dot(n3,tangent)*tangent; n3 = unit(n3); real wild = 2 * wildnessweight; real[][] matrix = { {n1.x, n1.y, n1.z}, {n2.x, n2.y, n2.z}, {n3.x, n3.y, n3.z}, { wild, 0, 0}, { 0, wild, 0}, { 0, 0, wild} }; real[] rightvector = { dot(n1, (a3 + 3a2b + 3ab2 + b3 - 2a2c - 2b2c)) / 4, dot(n2, (b3 + 3b2c + 3bc2 + c3 - 2ab2 - 2ac2)) / 4, dot(n3, (c3 + 3ac2 + 3a2c + a3 - 2bc2 - 2a2b)) / 4 }; // The inner control point that minimizes the sum of squares of // the mixed partials on the corners. triple tameinnercontrol = ((a2b + a2c - a3) + (ab2 + b2c - b3) + (ac2 + bc2 - c3)) / 3; rightvector.append(wild * new real[] {tameinnercontrol.x, tameinnercontrol.y, tameinnercontrol.z}); real[] solution = leastsquares(matrix, rightvector, warn=false); if (solution.length == 0) { // if the matrix was singular write("Warning: unable to solve matrix for specifying edge normals " + "on bezier triangle. Using coons triangle."); return patch(external); } triple innercontrol = (solution[0], solution[1], solution[2]); return patch(external, innercontrol); } // A wrapper for the previous functions when the normal direction // is given as a function of direction. The wrapper can also // accommodate cyclic boundary paths of between one and four // segments, although the results are best by far when there // are three or four segments. patch patchwithnormals(path3 external, triple normalat(triple)) { assert(cyclic(external)); assert(1 <= length(external) && length(external) <= 4); if (length(external) == 3) { triple n1 = normalat(point(external, 0.5)); triple n2 = normalat(point(external, 1.5)); triple n3 = normalat(point(external, 2.5)); return trianglewithnormals(external, n1, n2, n3); } while (length(external) < 4) external = external -- cycle; triple[] u0normals = new triple[3]; triple[] u1normals = new triple[3]; triple[] v0normals = new triple[3]; triple[] v1normals = new triple[3]; for (int i = 1; i <= 3; ++i) { v0normals[i-1] = unit(normalat(point(external, i/4))); u1normals[i-1] = unit(normalat(point(external, 1 + i/4))); v1normals[i-1] = unit(normalat(point(external, 3 - i/4))); u0normals[i-1] = unit(normalat(point(external, 4 - i/4))); } return patchwithnormals(external, u0normals, u1normals, v0normals, v1normals); } /***********************************************/ /********* DUAL CUBE GRAPH UTILITY *************/ /***********************************************/ // Suppose a plane intersects a (hollow) cube, and // does not intersect any vertices. Then its intersection // with cube forms a cycle. The goal of the code below // is to reconstruct the order of the cycle // given only an unordered list of which edges the plane // intersects. // // Basically, the question is this: If we know the points // in which a more-or-less planar surface intersects the // edges of cube, how do we connect those points? // // When I wrote the code, I was thinking in terms of the // dual graph of a cube, in which "vertices" are really // faces of the cube and "edges" connect those "vertices." // An enum for the different "vertices" (i.e. faces) // available. NULL_VERTEX is primarily intended as a // return value to indicate the absence of a desired // vertex. private int NULL_VERTEX = -1; private int XHIGH = 0; private int XLOW = 1; private int YHIGH = 2; private int YLOW = 3; private int ZHIGH = 4; private int ZLOW = 5; // An unordered set of nonnegative integers. // Since the intent is to use // only the six values from the enum above, no effort // was made to use scalable algorithms. struct intset { private bool[] ints = new bool[0]; private int size = 0; bool contains(int item) { assert(item >= 0); if (item >= ints.length) return false; return ints[item]; } // Returns true if the item was added (i.e., was // not already present). bool add(int item) { assert(item >= 0); while (item >= ints.length) ints.push(false); if (ints[item]) return false; ints[item] = true; ++size; return true; } int[] elements() { int[] toreturn; for (int i = 0; i < ints.length; ++i) { if (ints[i]) toreturn.push(i); } return toreturn; } int size() { return size; } } // A map from integers to sets of integers. Again, no // attempt is made to use scalable data structures. struct int_to_intset { int[] keys = new int[0]; intset[] values = new intset[0]; void add(int key, int value) { for (int i = 0; i < keys.length; ++i) { if (keys[i] == key) { values[i].add(value); return; } } keys.push(key); intset newset; values.push(newset); newset.add(value); } private int indexOf(int key) { for (int i = 0; i < keys.length; ++i) { if (keys[i] == key) return i; } return -1; } int[] get(int key) { int i = indexOf(key); if (i < 0) return new int[0]; else return values[i].elements(); } int numvalues(int key) { int i = indexOf(key); if (i < 0) return 0; else return values[i].size(); } int numkeys() { return keys.length; } } // A struct intended to represent an undirected edge between // two "vertices." struct edge { int start; int end; void operator init(int a, int b) { start = a; end = b; } bool bordersvertex(int v) { return start == v || end == v; } } string operator cast(edge e) { int a, b; if (e.start <= e.end) {a = e.start; b = e.end;} else {a = e.end; b = e.start; } return (string)a + " <-> " + (string)b; } bool operator == (edge a, edge b) { if (a.start == b.start && a.end == b.end) return true; if (a.start == b.end && a.end == b.start) return true; return false; } string operator cast(edge[] edges) { string toreturn = "{ "; for (int i = 0; i < edges.length; ++i) { toreturn += edges[i]; if (i < edges.length-1) toreturn += ", "; } return toreturn + " }"; } // Finally, the function that strings together a list of edges // into a cycle. It makes assumptions that hold true if the // list of edges did in fact come from a plane intersection // containing no vertices of the cube. For instance, such a // plane can contain at most two noncollinear points of any // one face; consequently, no face can border more than two of // the selected edges. // // If the underlying assumptions prove to be false, the function // returns null. int[] makecircle(edge[] edges) { if (edges.length == 0) return new int[0]; int_to_intset graph; for (edge e : edges) { graph.add(e.start, e.end); graph.add(e.end, e.start); } int currentvertex = edges[0].start; int startvertex = currentvertex; int lastvertex = NULL_VERTEX; int[] toreturn = new int[0]; do { toreturn.push(currentvertex); int[] adjacentvertices = graph.get(currentvertex); if (adjacentvertices.length != 2) return null; for (int v : adjacentvertices) { if (v != lastvertex) { lastvertex = currentvertex; currentvertex = v; break; } } } while (currentvertex != startvertex); if (toreturn.length != graph.numkeys()) return null; toreturn.cyclic = true; return toreturn; } /***********************************************/ /********** PATHS BETWEEN POINTS ***************/ /***********************************************/ // Construct paths between two points with additional // constraints; for instance, the path must be orthogonal // to a certain vector at each of the endpoints, must // lie within a specified plane or a specified face // of a rectangular solid,.... // A vector (typically a normal vector) at a specified position. struct positionedvector { triple position; triple direction; void operator init(triple position, triple direction) { this.position = position; this.direction = direction; } } string operator cast(positionedvector vv) { return "position: " + (string)(vv.position) + " vector: " + (string)vv.direction; } // The angle, in degrees, between two vectors. real angledegrees(triple a, triple b) { real dotprod = dot(a,b); real lengthprod = max(abs(a) * abs(b), abs(dotprod)); if (lengthprod == 0) return 0; return aCos(dotprod / lengthprod); } // A path (single curved segment) between two points. At each point // is specified a vector orthogonal to the path. path3 pathbetween(positionedvector v1, positionedvector v2) { triple n1 = unit(v1.direction); triple n2 = unit(v2.direction); triple p1 = v1.position; triple p2 = v2.position; triple delta = p2-p1; triple dir1 = delta - dot(delta, n1)*n1; triple dir2 = delta - dot(delta, n2)*n2; return p1 {dir1} .. {dir2} p2; } // Assuming v1 and v2 are linearly independent, returns an array {a, b} // such that a v1 + b v2 is the orthogonal projection of toproject onto // the span of v1 and v2. If v1 and v2 are dependent, returns an empty array // (if warn==false) or throws an error (if warn==true). real[] projecttospan_findcoeffs(triple toproject, triple v1, triple v2, bool warn=false) { real[][] matrix = {{v1.x, v2.x}, {v1.y, v2.y}, {v1.z, v2.z}}; real[] desiredanswer = {toproject.x, toproject.y, toproject.z}; return leastsquares(matrix, desiredanswer, warn=warn); } // Project the triple toproject into the span of a and b, but restrict // to the quarter-plane of linear combinations a v1 + b v2 such that // a >= mincoeff and b >= mincoeff. If v1 and v2 are linearly dependent, // return a random (positive) linear combination. triple projecttospan(triple toproject, triple v1, triple v2, real mincoeff = 0.05) { real[] coeffs = projecttospan_findcoeffs(toproject, v1, v2, warn=false); real a, b; if (coeffs.length == 0) { a = mincoeff + unitrand(); b = mincoeff + unitrand(); } else { a = max(coeffs[0], mincoeff); b = max(coeffs[1], mincoeff); } return a*v1 + b*v2; } // A path between two specified vertices of a cyclic path. The // path tangent at each endpoint is guaranteed to lie within the // quarter-plane spanned by positive linear combinations of the // tangents of the two outgoing paths at that endpoint. path3 pathbetween(path3 edgecycle, int vertex1, int vertex2) { triple point1 = point(edgecycle, vertex1); triple point2 = point(edgecycle, vertex2); triple v1 = -dir(edgecycle, vertex1, sign=-1); triple v2 = dir(edgecycle, vertex1, sign= 1); triple direction1 = projecttospan(unit(point2-point1), v1, v2); v1 = -dir(edgecycle, vertex2, sign=-1); v2 = dir(edgecycle, vertex2, sign= 1); triple direction2 = projecttospan(unit(point1-point2), v1, v2); return point1 {direction1} .. {-direction2} point2; } // This function applies a heuristic to choose two "opposite" // vertices (separated by three segments) of edgecycle, which // is required to be a cyclic path consisting of 5 or 6 segments. // The two chosen vertices are pushed to savevertices. // // The function returns a path between the two chosen vertices. The // path tangent at each endpoint is guaranteed to lie within the // quarter-plane spanned by positive linear combinations of the // tangents of the two outgoing paths at that endpoint. path3 bisector(path3 edgecycle, int[] savevertices) { real mincoeff = 0.05; assert(cyclic(edgecycle)); int n = length(edgecycle); assert(n >= 5 && n <= 6); triple[] forwarddirections = sequence(new triple(int i) { return dir(edgecycle, i, sign=1); }, n); forwarddirections.cyclic = true; triple[] backwarddirections = sequence(new triple(int i) { return -dir(edgecycle, i, sign=-1); }, n); backwarddirections.cyclic = true; real[] angles = sequence(new real(int i) { return angledegrees(forwarddirections[i], backwarddirections[i]); }, n); angles.cyclic = true; int lastindex = (n == 5 ? 4 : 2); real maxgoodness = 0; int chosenindex = -1; triple directionout, directionin; for (int i = 0; i <= lastindex; ++i) { int opposite = i + 3; triple vec = unit(point(edgecycle, opposite) - point(edgecycle, i)); real[] coeffsbegin = projecttospan_findcoeffs(vec, forwarddirections[i], backwarddirections[i]); if (coeffsbegin.length == 0) continue; coeffsbegin[0] = max(coeffsbegin[0], mincoeff); coeffsbegin[1] = max(coeffsbegin[1], mincoeff); real[] coeffsend = projecttospan_findcoeffs(-vec, forwarddirections[opposite], backwarddirections[opposite]); if (coeffsend.length == 0) continue; coeffsend[0] = max(coeffsend[0], mincoeff); coeffsend[1] = max(coeffsend[1], mincoeff); real goodness = angles[i] * angles[opposite] * coeffsbegin[0] * coeffsend[0] * coeffsbegin[1] * coeffsend[1]; if (goodness > maxgoodness) { maxgoodness = goodness; directionout = coeffsbegin[0] * forwarddirections[i] + coeffsbegin[1] * backwarddirections[i]; directionin = -(coeffsend[0] * forwarddirections[opposite] + coeffsend[1] * backwarddirections[opposite]); chosenindex = i; } } if (chosenindex == -1) { savevertices.push(0); savevertices.push(3); return pathbetween(edgecycle, 0, 3); } else { savevertices.push(chosenindex); savevertices.push(chosenindex+3); return point(edgecycle, chosenindex) {directionout} .. {directionin} point(edgecycle, chosenindex + 3); } } // A path between two specified points (with specified normals) that lies // within a specified face of a rectangular solid. path3 pathinface(positionedvector v1, positionedvector v2, triple facenorm, triple edge1normout, triple edge2normout) { triple dir1 = cross(v1.direction, facenorm); real dotprod = dot(dir1, edge1normout); if (dotprod > 0) dir1 = -dir1; // Believe it or not, this "tiebreaker" is actually relevant at times, // for instance, when graphing the cone x^2 + y^2 = z^2 over the region // -1 <= x,y,z <= 1. else if (dotprod == 0 && dot(dir1, v2.position - v1.position) < 0) dir1 = -dir1; triple dir2 = cross(v2.direction, facenorm); dotprod = dot(dir2, edge2normout); if (dotprod < 0) dir2 = -dir2; else if (dotprod == 0 && dot(dir2, v2.position - v1.position) < 0) dir2 = -dir2; return v1.position {dir1} .. {dir2} v2.position; } triple normalout(int face) { if (face == XHIGH) return X; else if (face == YHIGH) return Y; else if (face == ZHIGH) return Z; else if (face == XLOW) return -X; else if (face == YLOW) return -Y; else if (face == ZLOW) return -Z; else return O; } // A path between two specified points (with specified normals) that lies // within a specified face of a rectangular solid. path3 pathinface(positionedvector v1, positionedvector v2, int face, int edge1face, int edge2face) { return pathinface(v1, v2, normalout(face), normalout(edge1face), normalout(edge2face)); } /***********************************************/ /******** DRAWING IMPLICIT SURFACES ************/ /***********************************************/ // DEPRECATED // Quadrilateralization: // Produce a surface (array of *nondegenerate* Bezier patches) with a // specified three-segment boundary. The surface should approximate the // zero locus of the specified f with its specified gradient. // // If it is not possible to produce the desired result without leaving the // specified rectangular region, returns a length-zero array. // // Dividing a triangle into smaller quadrilaterals this way is opposite // the usual trend in mathematics. However, *before the introduction of bezier // triangles,* the pathwithnormals algorithm // did a poor job of choosing a good surface when the boundary path did // not consist of four positive-length segments. patch[] triangletoquads(path3 external, real f(triple), triple grad(triple), triple a, triple b) { static real epsilon = 1e-3; assert(length(external) == 3); assert(cyclic(external)); triple c0 = point(external, 0); triple c1 = point(external, 1); triple c2 = point(external, 2); triple center = (c0 + c1 + c2) / 3; triple n = unit(cross(c1-c0, c2-c0)); real g(real t) { return f(center + t*n); } real tmin = -realMax, tmax = realMax; void absorb(real t) { if (t < 0) tmin = max(t,tmin); else tmax = min(t,tmax); } if (n.x != 0) { absorb((a.x - center.x) / n.x); absorb((b.x - center.x) / n.x); } if (n.y != 0) { absorb((a.y - center.y) / n.y); absorb((b.y - center.y) / n.y); } if (n.z != 0) { absorb((a.z - center.z) / n.z); absorb((b.z - center.z) / n.z); } real fa = g(tmin); real fb = g(tmax); if ((fa > 0 && fb > 0) || (fa < 0 && fb < 0)) { return new patch[0]; } else { real t = findroot(g, tmin, tmax, fa=fa, fb=fb); center += t * n; } n = unit(grad(center)); triple m0 = point(external, 0.5); positionedvector m0 = positionedvector(m0, unit(grad(m0))); triple m1 = point(external, 1.5); positionedvector m1 = positionedvector(m1, unit(grad(m1))); triple m2 = point(external, 2.5); positionedvector m2 = positionedvector(m2, unit(grad(m2))); positionedvector c = positionedvector(center, unit(grad(center))); path3 pathto_m0 = pathbetween(c, m0); path3 pathto_m1 = pathbetween(c, m1); path3 pathto_m2 = pathbetween(c, m2); path3 quad0 = subpath(external, 0, 0.5) & reverse(pathto_m0) & pathto_m2 & subpath(external, -0.5, 0) & cycle; path3 quad1 = subpath(external, 1, 1.5) & reverse(pathto_m1) & pathto_m0 & subpath(external, 0.5, 1) & cycle; path3 quad2 = subpath(external, 2, 2.5) & reverse(pathto_m2) & pathto_m1 & subpath(external, 1.5, 2) & cycle; return new patch[] {patchwithnormals(quad0, grad), patchwithnormals(quad1, grad), patchwithnormals(quad2, grad)}; } // Attempts to fill the path external (which should by a cyclic path consisting of // three segments) with bezier triangle(s). Returns an empty array if it fails. // // In more detail: A single bezier triangle is computed using trianglewithnormals. The normals of // the resulting triangle at the midpoint of each edge are computed. If any of these normals // is in the negative f direction, the external triangle is subdivided into four external triangles // and the same procedure is applied to each. If one or more of them has an incorrectly oriented // edge normal, the function gives up and returns an empty array. // // Thus, the returned array consists of 0, 1, or 4 bezier triangles; no other array lengths // are possible. // // This function assumes that the path orientation is consistent with f (and its gradient) // -- i.e., that // at a corner, (tangent in) x (tangent out) is in the positive f direction. patch[] maketriangle(path3 external, real f(triple), triple grad(triple), bool allowsubdivide = true) { assert(cyclic(external)); assert(length(external) == 3); triple m1 = point(external, 0.5); triple n1 = unit(grad(m1)); triple m2 = point(external, 1.5); triple n2 = unit(grad(m2)); triple m3 = point(external, 2.5); triple n3 = unit(grad(m3)); patch beziertriangle = trianglewithnormals(external, n1, n2, n3); if (dot(n1, beziertriangle.normal(0.5, 0)) >= 0 && dot(n2, beziertriangle.normal(0.5, 0.5)) >= 0 && dot(n3, beziertriangle.normal(0, 0.5)) >= 0) return new patch[] {beziertriangle}; if (!allowsubdivide) return new patch[0]; positionedvector m1 = positionedvector(m1, n1); positionedvector m2 = positionedvector(m2, n2); positionedvector m3 = positionedvector(m3, n3); path3 p12 = pathbetween(m1, m2); path3 p23 = pathbetween(m2, m3); path3 p31 = pathbetween(m3, m1); patch[] triangles = maketriangle(p12 & p23 & p31 & cycle, f, grad=grad, allowsubdivide=false); if (triangles.length < 1) return new patch[0]; triangles.append(maketriangle(subpath(external, -0.5, 0.5) & reverse(p31) & cycle, f, grad=grad, allowsubdivide=false)); if (triangles.length < 2) return new patch[0]; triangles.append(maketriangle(subpath(external, 0.5, 1.5) & reverse(p12) & cycle, f, grad=grad, allowsubdivide=false)); if (triangles.length < 3) return new patch[0]; triangles.append(maketriangle(subpath(external, 1.5, 2.5) & reverse(p23) & cycle, f, grad=grad, allowsubdivide=false)); if (triangles.length < 4) return new patch[0]; return triangles; } // Returns true if the point is "nonsingular" (in the sense that the magnitude // of the gradient is not too small) AND very close to the zero locus of f // (assuming f is locally linear). bool check_fpt_zero(triple testpoint, real f(triple), triple grad(triple)) { real testval = f(testpoint); real slope = abs(grad(testpoint)); static real tolerance = 2*rootfinder_settings.roottolerance; return !(slope > tolerance && abs(testval) / slope > tolerance); } // Returns true if pt lies within the rectangular solid with // opposite corners at a and b. bool checkptincube(triple pt, triple a, triple b) { real xmin = a.x; real xmax = b.x; real ymin = a.y; real ymax = b.y; real zmin = a.z; real zmax = b.z; if (xmin > xmax) { real t = xmax; xmax=xmin; xmin=t; } if (ymin > ymax) { real t = ymax; ymax=ymin; ymin=t; } if (zmin > zmax) { real t = zmax; zmax=zmin; zmin=t; } return ((xmin <= pt.x) && (pt.x <= xmax) && (ymin <= pt.y) && (pt.y <= ymax) && (zmin <= pt.z) && (pt.z <= zmax)); } // A convenience function for combining the previous two tests. bool checkpt(triple testpt, real f(triple), triple grad(triple), triple a, triple b) { return checkptincube(testpt, a, b) && check_fpt_zero(testpt, f, grad); } // Attempts to fill in the boundary cycle with a collection of // patches to approximate smoothly the zero locus of f. If unable to // do so while satisfying certain checks, returns null. // This is distinct from returning an empty // array, which merely indicates that the boundary cycle is too small // to be worth filling in. patch[] quadpatches(path3 edgecycle, positionedvector[] corners, real f(triple), triple grad(triple), triple a, triple b, bool usetriangles) { assert(corners.cyclic); // The tolerance for considering two points "essentially identical." static real tolerance = 2.5 * rootfinder_settings.roottolerance; // If there are two neighboring vertices that are essentially identical, // unify them into one. for (int i = 0; i < corners.length; ++i) { if (abs(corners[i].position - corners[i+1].position) < tolerance) { if (corners.length == 2) return new patch[0]; corners.delete(i); edgecycle = subpath(edgecycle, 0, i) & subpath(edgecycle, i+1, length(edgecycle)) & cycle; --i; assert(length(edgecycle) == corners.length); } } static real areatolerance = tolerance^2; assert(corners.length >= 2); if (corners.length == 2) { // If the area is too small, just ignore it; otherwise, subdivide. real area0 = abs(cross(-dir(edgecycle, 0, sign=-1, normalize=false), dir(edgecycle, 0, sign=1, normalize=false))); real area1 = abs(cross(-dir(edgecycle, 1, sign=-1, normalize=false), dir(edgecycle, 1, sign=1, normalize=false))); if (area0 < areatolerance && area1 < areatolerance) return new patch[0]; else return null; } if (length(edgecycle) > 6) abort("too many edges: not possible."); for (int i = 0; i < length(edgecycle); ++i) { if (angledegrees(dir(edgecycle,i,sign=1), dir(edgecycle,i+1,sign=-1)) > 80) { return null; } } if (length(edgecycle) == 3) { patch[] toreturn = usetriangles ? maketriangle(edgecycle, f, grad) : triangletoquads(edgecycle, f, grad, a, b); if (toreturn.length == 0) return null; else return toreturn; } if (length(edgecycle) == 4) { return new patch[] {patchwithnormals(edgecycle, grad)}; } int[] bisectorindices; path3 middleguide = bisector(edgecycle, bisectorindices); triple testpoint = point(middleguide, 0.5); if (!checkpt(testpoint, f, grad, a, b)) { return null; } patch[] toreturn = null; path3 firstpatch = subpath(edgecycle, bisectorindices[0], bisectorindices[1]) & reverse(middleguide) & cycle; if (length(edgecycle) == 5) { path3 secondpatch = middleguide & subpath(edgecycle, bisectorindices[1], 5+bisectorindices[0]) & cycle; toreturn = usetriangles ? maketriangle(secondpatch, f, grad) : triangletoquads(secondpatch, f, grad, a, b); if (toreturn.length == 0) return null; toreturn.push(patchwithnormals(firstpatch, grad)); } else { // now length(edgecycle) == 6 path3 secondpatch = middleguide & subpath(edgecycle, bisectorindices[1], 6+bisectorindices[0]) & cycle; toreturn = new patch[] {patchwithnormals(firstpatch, grad), patchwithnormals(secondpatch, grad)}; } return toreturn; } // Numerical gradient of a function typedef triple vectorfunction(triple); vectorfunction nGrad(real f(triple)) { static real epsilon = 1e-3; return new triple(triple v) { return ( (f(v + epsilon*X) - f(v - epsilon*X)) / (2 epsilon), (f(v + epsilon*Y) - f(v - epsilon*Y)) / (2 epsilon), (f(v + epsilon*Z) - f(v - epsilon*Z)) / (2 epsilon) ); }; } // A point together with a value at that location. struct evaluatedpoint { triple pt; real value; void operator init(triple pt, real value) { this.pt = pt; this.value = value; } } triple operator cast(evaluatedpoint p) { return p.pt; } // Compute the values of a function at every vertex of an nx by ny by nz // array of rectangular solids. evaluatedpoint[][][] make3dgrid(triple a, triple b, int nx, int ny, int nz, real f(triple), bool allowzero = false) { evaluatedpoint[][][] toreturn = new evaluatedpoint[nx+1][ny+1][nz+1]; for (int i = 0; i <= nx; ++i) { for (int j = 0; j <= ny; ++j) { for (int k = 0; k <= nz; ++k) { triple pt = (interp(a.x, b.x, i/nx), interp(a.y, b.y, j/ny), interp(a.z, b.z, k/nz)); real value = f(pt); if (value == 0 && !allowzero) value = 1e-5; toreturn[i][j][k] = evaluatedpoint(pt, value); } } } return toreturn; } // The following utilities make, for instance, slice(A, i, j, k, l) // equivalent to what A[i:j][k:l] ought to mean for two- and three- // -dimensional arrays of evaluatedpoints and of positionedvectors. typedef evaluatedpoint T; T[][] slice(T[][] a, int start1, int end1, int start2, int end2) { T[][] toreturn = new T[end1-start1][]; for (int i = start1; i < end1; ++i) { toreturn[i-start1] = a[i][start2:end2]; } return toreturn; } T[][][] slice(T[][][] a, int start1, int end1, int start2, int end2, int start3, int end3) { T[][][] toreturn = new T[end1-start1][][]; for (int i = start1; i < end1; ++i) { toreturn[i-start1] = slice(a[i], start2, end2, start3, end3); } return toreturn; } typedef positionedvector T; T[][] slice(T[][] a, int start1, int end1, int start2, int end2) { T[][] toreturn = new T[end1-start1][]; for (int i = start1; i < end1; ++i) { toreturn[i-start1] = a[i][start2:end2]; } return toreturn; } T[][][] slice(T[][][] a, int start1, int end1, int start2, int end2, int start3, int end3) { T[][][] toreturn = new T[end1-start1][][]; for (int i = start1; i < end1; ++i) { toreturn[i-start1] = slice(a[i], start2, end2, start3, end3); } return toreturn; } // An object of class gridwithzeros stores the values of a function at each vertex // of a three-dimensional grid, together with zeros of the function along edges // of the grid and the gradient of the function at each such zero. struct gridwithzeros { int nx, ny, nz; evaluatedpoint[][][] corners; positionedvector[][][] xdirzeros; positionedvector[][][] ydirzeros; positionedvector[][][] zdirzeros; triple grad(triple); real f(triple); int maxdepth; bool usetriangles; // Populate the edges with zeros that have a sign change and are not already // populated. void fillzeros() { for (int j = 0; j < ny+1; ++j) { for (int k = 0; k < nz+1; ++k) { real y = corners[0][j][k].pt.y; real z = corners[0][j][k].pt.z; real f_along_x(real t) { return f((t, y, z)); } for (int i = 0; i < nx; ++i) { if (xdirzeros[i][j][k] != null) continue; evaluatedpoint start = corners[i][j][k]; evaluatedpoint end = corners[i+1][j][k]; if ((start.value > 0 && end.value > 0) || (start.value < 0 && end.value < 0)) xdirzeros[i][j][k] = null; else { triple root = (0,y,z); root += X * findroot(f_along_x, start.pt.x, end.pt.x, fa=start.value, fb=end.value); triple normal = grad(root); xdirzeros[i][j][k] = positionedvector(root, normal); } } } } for (int i = 0; i < nx+1; ++i) { for (int k = 0; k < nz+1; ++k) { real x = corners[i][0][k].pt.x; real z = corners[i][0][k].pt.z; real f_along_y(real t) { return f((x, t, z)); } for (int j = 0; j < ny; ++j) { if (ydirzeros[i][j][k] != null) continue; evaluatedpoint start = corners[i][j][k]; evaluatedpoint end = corners[i][j+1][k]; if ((start.value > 0 && end.value > 0) || (start.value < 0 && end.value < 0)) ydirzeros[i][j][k] = null; else { triple root = (x,0,z); root += Y * findroot(f_along_y, start.pt.y, end.pt.y, fa=start.value, fb=end.value); triple normal = grad(root); ydirzeros[i][j][k] = positionedvector(root, normal); } } } } for (int i = 0; i < nx+1; ++i) { for (int j = 0; j < ny+1; ++j) { real x = corners[i][j][0].pt.x; real y = corners[i][j][0].pt.y; real f_along_z(real t) { return f((x, y, t)); } for (int k = 0; k < nz; ++k) { if (zdirzeros[i][j][k] != null) continue; evaluatedpoint start = corners[i][j][k]; evaluatedpoint end = corners[i][j][k+1]; if ((start.value > 0 && end.value > 0) || (start.value < 0 && end.value < 0)) zdirzeros[i][j][k] = null; else { triple root = (x,y,0); root += Z * findroot(f_along_z, start.pt.z, end.pt.z, fa=start.value, fb=end.value); triple normal = grad(root); zdirzeros[i][j][k] = positionedvector(root, normal); } } } } } // Fill in the grid vertices and the zeros along edges. Each cube starts at // depth one and the depth increases each time it subdivides; maxdepth is the // maximum subdivision depth. When a cube at maxdepth cannot be resolved to // patches, it is left empty. void operator init(int nx, int ny, int nz, real f(triple), triple a, triple b, int maxdepth = 6, bool usetriangles) { this.nx = nx; this.ny = ny; this.nz = nz; grad = nGrad(f); this.f = f; this.maxdepth = maxdepth; this.usetriangles = usetriangles; corners = make3dgrid(a, b, nx, ny, nz, f); xdirzeros = new positionedvector[nx][ny+1][nz+1]; ydirzeros = new positionedvector[nx+1][ny][nz+1]; zdirzeros = new positionedvector[nx+1][ny+1][nz]; for (int i = 0; i <= nx; ++i) { for (int j = 0; j <= ny; ++j) { for (int k = 0; k <= nz; ++k) { if (i < nx) xdirzeros[i][j][k] = null; if (j < ny) ydirzeros[i][j][k] = null; if (k < nz) zdirzeros[i][j][k] = null; } } } fillzeros(); } // Doubles nx, ny, and nz by halving the sizes of the cubes along the x, y, and z // directions (resulting in 8 times as many cubes). Already existing data about // function values and zeros is copied; vertices and edges with no such pre-existing // data are populated. // // Returns true if subdivide succeeded, false if it failed (because maxdepth // was exceeded). bool subdivide() { if (maxdepth <= 1) { return false; } --maxdepth; triple a = corners[0][0][0]; triple b = corners[nx][ny][nz]; nx *= 2; ny *= 2; nz *= 2; evaluatedpoint[][][] oldcorners = corners; corners = new evaluatedpoint[nx+1][ny+1][nz+1]; for (int i = 0; i <= nx; ++i) { for (int j = 0; j <= ny; ++j) { for (int k = 0; k <= nz; ++k) { if (i % 2 == 0 && j % 2 == 0 && k % 2 == 0) { corners[i][j][k] = oldcorners[quotient(i,2)][quotient(j,2)][quotient(k,2)]; } else { triple pt = (interp(a.x, b.x, i/nx), interp(a.y, b.y, j/ny), interp(a.z, b.z, k/nz)); real value = f(pt); if (value == 0) value = 1e-5; corners[i][j][k] = evaluatedpoint(pt, value); } } } } positionedvector[][][] oldxdir = xdirzeros; xdirzeros = new positionedvector[nx][ny+1][nz+1]; for (int i = 0; i < nx; ++i) { for (int j = 0; j < ny + 1; ++j) { for (int k = 0; k < nz + 1; ++k) { if (j % 2 != 0 || k % 2 != 0) { xdirzeros[i][j][k] = null; } else { positionedvector zero = oldxdir[quotient(i,2)][quotient(j,2)][quotient(k,2)]; if (zero == null) { xdirzeros[i][j][k] = null; continue; } real x = zero.position.x; if (x > interp(a.x, b.x, i/nx) && x < interp(a.x, b.x, (i+1)/nx)) { xdirzeros[i][j][k] = zero; } else { xdirzeros[i][j][k] = null; } } } } } positionedvector[][][] oldydir = ydirzeros; ydirzeros = new positionedvector[nx+1][ny][nz+1]; for (int i = 0; i < nx+1; ++i) { for (int j = 0; j < ny; ++j) { for (int k = 0; k < nz + 1; ++k) { if (i % 2 != 0 || k % 2 != 0) { ydirzeros[i][j][k] = null; } else { positionedvector zero = oldydir[quotient(i,2)][quotient(j,2)][quotient(k,2)]; if (zero == null) { ydirzeros[i][j][k] = null; continue; } real y = zero.position.y; if (y > interp(a.y, b.y, j/ny) && y < interp(a.y, b.y, (j+1)/ny)) { ydirzeros[i][j][k] = zero; } else { ydirzeros[i][j][k] = null; } } } } } positionedvector[][][] oldzdir = zdirzeros; zdirzeros = new positionedvector[nx+1][ny+1][nz]; for (int i = 0; i < nx + 1; ++i) { for (int j = 0; j < ny + 1; ++j) { for (int k = 0; k < nz; ++k) { if (i % 2 != 0 || j % 2 != 0) { zdirzeros[i][j][k] = null; } else { positionedvector zero = oldzdir[quotient(i,2)][quotient(j,2)][quotient(k,2)]; if (zero == null) { zdirzeros[i][j][k] = null; continue; } real z = zero.position.z; if (z > interp(a.z, b.z, k/nz) && z < interp(a.z, b.z, (k+1)/nz)) { zdirzeros[i][j][k] = zero; } else { zdirzeros[i][j][k] = null; } } } } } fillzeros(); return true; } // Forward declaration of the draw method, which will be called by drawcube(). patch[] draw(bool[] reportactive = null); // Construct the patches, assuming that we are working // with a single cube (nx = ny = nz = 1). This method will subdivide the // cube if necessary. The parameter reportactive should be an array of // length 6. Setting an entry to true indicates that the surface abuts the // corresponding face (according to the earlier enum), and thus that the // algorithm should be sure that something is drawn in the cube sharing // that face--even if all the vertices of that cube have the same sign. patch[] drawcube(bool[] reportactive = null) { // First, determine which edges (if any) actually have zeros on them. edge[] zeroedges = new edge[0]; positionedvector[] zeros = new positionedvector[0]; int currentface, nextface; void pushifnonnull(positionedvector v) { if (v != null) { zeroedges.push(edge(currentface, nextface)); zeros.push(v); } } positionedvector findzero(int face1, int face2) { edge e = edge(face1, face2); for (int i = 0; i < zeroedges.length; ++i) { if (zeroedges[i] == e) return zeros[i]; } return null; } currentface = XLOW; nextface = YHIGH; pushifnonnull(zdirzeros[0][1][0]); nextface = YLOW; pushifnonnull(zdirzeros[0][0][0]); nextface = ZHIGH; pushifnonnull(ydirzeros[0][0][1]); nextface = ZLOW; pushifnonnull(ydirzeros[0][0][0]); currentface = XHIGH; nextface = YHIGH; pushifnonnull(zdirzeros[1][1][0]); nextface = YLOW; pushifnonnull(zdirzeros[1][0][0]); nextface = ZHIGH; pushifnonnull(ydirzeros[1][0][1]); nextface = ZLOW; pushifnonnull(ydirzeros[1][0][0]); currentface = YHIGH; nextface = ZHIGH; pushifnonnull(xdirzeros[0][1][1]); currentface = ZHIGH; nextface = YLOW; pushifnonnull(xdirzeros[0][0][1]); currentface = YLOW; nextface = ZLOW; pushifnonnull(xdirzeros[0][0][0]); currentface = ZLOW; nextface = YHIGH; pushifnonnull(xdirzeros[0][1][0]); //Now, string those edges together to make a circle. patch[] subdividecube() { if (!subdivide()) { return new patch[0]; } return draw(reportactive); } if (zeroedges.length < 3) { return subdividecube(); } int[] faceorder = makecircle(zeroedges); if (alias(faceorder,null)) { return subdividecube(); } positionedvector[] patchcorners = new positionedvector[0]; for (int i = 0; i < faceorder.length; ++i) { patchcorners.push(findzero(faceorder[i], faceorder[i+1])); } patchcorners.cyclic = true; //Now, produce the cyclic path around the edges. path3 edgecycle; for (int i = 0; i < faceorder.length; ++i) { path3 currentpath = pathinface(patchcorners[i], patchcorners[i+1], faceorder[i+1], faceorder[i], faceorder[i+2]); triple testpoint = point(currentpath, 0.5); if (!checkpt(testpoint, f, grad, corners[0][0][0], corners[1][1][1])) { return subdividecube(); } edgecycle = edgecycle & currentpath; } edgecycle = edgecycle & cycle; { // Ensure the outward normals are pointing in the same direction as the gradient. triple tangentin = patchcorners[0].position - precontrol(edgecycle, 0); triple tangentout = postcontrol(edgecycle, 0) - patchcorners[0].position; triple normal = cross(tangentin, tangentout); if (dot(normal, patchcorners[0].direction) < 0) { edgecycle = reverse(edgecycle); patchcorners = patchcorners[-sequence(patchcorners.length)]; patchcorners.cyclic = true; } } patch[] toreturn = quadpatches(edgecycle, patchcorners, f, grad, corners[0][0][0], corners[1][1][1], usetriangles); if (alias(toreturn, null)) return subdividecube(); return toreturn; } // Extracts the specified cube as a gridwithzeros object with // nx = ny = nz = 1. gridwithzeros getcube(int i, int j, int k) { gridwithzeros cube = new gridwithzeros; cube.grad = grad; cube.f = f; cube.nx = 1; cube.ny = 1; cube.nz = 1; cube.maxdepth = maxdepth; cube.usetriangles = usetriangles; cube.corners = slice(corners,i,i+2,j,j+2,k,k+2); cube.xdirzeros = slice(xdirzeros,i,i+1,j,j+2,k,k+2); cube.ydirzeros = slice(ydirzeros,i,i+2,j,j+1,k,k+2); cube.zdirzeros = slice(zdirzeros,i,i+2,j,j+2,k,k+1); return cube; } // Returns an array of patches representing the surface. // The parameter reportactive should be an array of // length 6. Setting an entry to true indicates that the surface abuts the // corresponding face of the cube that bounds the entire grid. // // If reportactive == null, it is assumed that this is a top-level call; // a dot is printed to stdout for each cube drawn as a very rough // progress indicator. // // If reportactive != null, then it is assumed that the caller had a strong // reason to believe that this grid contains a part of the surface; the // grid will subdivide all the way to maxdepth if necessary to find points // on the surface. draw = new patch[](bool[] reportactive = null) { if (alias(reportactive, null)) progress(true); // A list of all the patches not already drawn but known // to contain part of the surface. This "queue" is // actually implemented as stack for simplicity, since // it does not make any difference. In a multi-threaded // version of the algorithm, a queue (shared across all threads) // would make more sense than a stack. triple[] queue = new triple[0]; bool[][][] enqueued = new bool[nx][ny][nz]; for (int i = 0; i < enqueued.length; ++i) { for (int j = 0; j < enqueued[i].length; ++j) { for (int k = 0; k < enqueued[i][j].length; ++k) { enqueued[i][j][k] = false; } } } void enqueue(int i, int j, int k) { if (i >= 0 && i < nx && j >= 0 && j < ny && k >= 0 && k < nz && !enqueued[i][j][k]) { queue.push((i,j,k)); enqueued[i][j][k] = true; } if (!alias(reportactive, null)) { if (i < 0) reportactive[XLOW] = true; if (i >= nx) reportactive[XHIGH] = true; if (j < 0) reportactive[YLOW] = true; if (j >= ny) reportactive[YHIGH] = true; if (k < 0) reportactive[ZLOW] = true; if (k >= nz) reportactive[ZHIGH] = true; } } for (int i = 0; i < nx+1; ++i) { for (int j = 0; j < ny+1; ++j) { for (int k = 0; k < nz+1; ++k) { if (i < nx && xdirzeros[i][j][k] != null) { for (int jj = j-1; jj <= j; ++jj) for (int kk = k-1; kk <= k; ++kk) enqueue(i, jj, kk); } if (j < ny && ydirzeros[i][j][k] != null) { for (int ii = i-1; ii <= i; ++ii) for (int kk = k-1; kk <= k; ++kk) enqueue(ii, j, kk); } if (k < nz && zdirzeros[i][j][k] != null) { for (int ii = i-1; ii <= i; ++ii) for (int jj = j-1; jj <= j; ++jj) enqueue(ii, jj, k); } } } } if (!alias(reportactive, null) && queue.length == 0) { if (subdivide()) return draw(reportactive); } patch[] surface = new patch[0]; while (queue.length > 0) { triple coord = queue.pop(); int i = floor(coord.x); int j = floor(coord.y); int k = floor(coord.z); bool[] reportface = array(6, false); patch[] toappend = getcube(i,j,k).drawcube(reportface); if (reportface[XLOW]) enqueue(i-1,j,k); if (reportface[XHIGH]) enqueue(i+1,j,k); if (reportface[YLOW]) enqueue(i,j-1,k); if (reportface[YHIGH]) enqueue(i,j+1,k); if (reportface[ZLOW]) enqueue(i,j,k-1); if (reportface[ZHIGH]) enqueue(i,j,k+1); surface.append(toappend); if (alias(reportactive, null)) progress(); } if (alias(reportactive, null)) progress(false); return surface; }; } // The external interface of this whole module. Accepts exactly one // function (throws an error if two or zero functions are specified). // The function should be differentiable. (Whatever you do, do not // pass in an indicator function!) Ideally, the zero locus of the // function should be smooth; singularities will significantly slow // down the algorithm and potentially give bad results. // // Returns a plot of the zero locus of the function within the // rectangular solid with opposite corners at a and b. // // Additional parameters: // n - the number of initial segments in each of the x, y, z directions. // overlapedges - if true, the patches of the surface are slightly enlarged // to compensate for an artifact in which the viewer can see through the // boundary between patches. (Some of this may actually be a result of // edges not lining up perfectly, but I'm fairly sure a lot of it arises // purely as a rendering artifact.) // nx - override n in the x direction // ny - override n in the y direction // nz - override n in the z direction // maxdepth - the maximum depth to which the algorithm will subdivide in // an effort to find patches that closely approximate the true surface. surface implicitsurface(real f(triple) = null, real ff(real,real,real) = null, triple a, triple b, int n = nmesh, bool keyword overlapedges = false, int keyword nx=n, int keyword ny=n, int keyword nz=n, int keyword maxdepth = 8, bool keyword usetriangles=true) { if (f == null && ff == null) abort("implicitsurface called without specifying a function."); if (f != null && ff != null) abort("Only specify one function when calling implicitsurface."); if (f == null) f = new real(triple w) { return ff(w.x, w.y, w.z); }; gridwithzeros grid = gridwithzeros(nx, ny, nz, f, a, b, maxdepth=maxdepth, usetriangles=usetriangles); patch[] patches = grid.draw(); if (overlapedges) { for (int i = 0; i < patches.length; ++i) { triple center = (patches[i].triangular ? patches[i].point(1/3, 1/3) : patches[i].point(1/2,1/2)); transform3 T=shift(center) * scale3(1.03) * shift(-center); patches[i] = T * patches[i]; } } return surface(...patches); } ./asymptote-2.41/base/labelpath.asy0000644000175000017500000000133113064427076017125 0ustar norbertnorbertusepackage("pstricks"); usepackage("pst-text"); string LeftJustified="l"; string RightJustified="r"; string Centered="c"; void labelpath(frame f, Label L, path g, string justify=Centered, pen p=currentpen) { if(latex() && !pdf()) { _labelpath(f,L.s,L.size,g,justify,(L.T.x,L.T.y+0.5linewidth(p)),p); return; } warning("labelpathlatex","labelpath requires -tex latex"); } void labelpath(picture pic=currentpicture, Label L, path g, string justify=Centered, pen p=currentpen) { pic.add(new void(frame f, transform t) { labelpath(f,L,t*g,justify,p); }); frame f; label(f,Label(L.s,L.size)); real w=size(f).y+L.T.y+0.5linewidth(p); pic.addBox(min(g),max(g),-w,w); } ./asymptote-2.41/base/plain_Label.asy0000644000175000017500000003761313064427076017407 0ustar norbertnorbertreal angle(transform t) { pair z=(2t.xx*t.yy,t.yx*t.yy-t.xx*t.xy); if(t.xx < 0) z=-z; return degrees(z,warn=false); } transform rotation(transform t) { return rotate(angle(t)); } transform scaleless(transform t) { real a=t.xx, b=t.xy, c=t.yx, d=t.yy; real arg=(a-d)^2+4b*c; pair delta=arg >= 0 ? sqrt(arg) : I*sqrt(-arg); real trace=a+d; pair l1=0.5(trace+delta); pair l2=0.5(trace-delta); if(abs(delta) < sqrtEpsilon*max(abs(l1),abs(l2))) { real s=abs(0.5trace); return (s != 0) ? scale(1/s)*t : t; } if(abs(l1-d) < abs(l2-d)) {pair temp=l1; l1=l2; l2=temp;} pair dot(pair[] u, pair[] v) {return conj(u[0])*v[0]+conj(u[1])*v[1];} pair[] unit(pair[] u) { real norm2=abs(u[0])^2+abs(u[1])^2; return norm2 != 0 ? u/sqrt(norm2) : u; } pair[] u={l1-d,b}; pair[] v={c,l2-a}; u=unit(u); pair d=dot(u,u); if(d != 0) v -= dot(u,v)/d*u; v=unit(v); pair[][] U={{u[0],v[0]},{u[1],v[1]}}; pair[][] A={{a,b},{c,d}}; pair[][] operator *(pair[][] a, pair[][] b) { pair[][] c=new pair[2][2]; for(int i=0; i < 2; ++i) { for(int j=0; j < 2; ++j) { c[i][j]=a[i][0]*b[0][j]+a[i][1]*b[1][j]; } } return c; } pair[][] conj(pair[][] a) { pair[][] c=new pair[2][2]; for(int i=0; i < 2; ++i) { for(int j=0; j < 2; ++j) { c[i][j]=conj(a[j][i]); } } return c; } A=conj(U)*A*U; real D=abs(A[0][0]); if(D != 0) { A[0][0] /= D; A[0][1] /= D; } D=abs(A[1][1]); if(D != 0) { A[1][0] /= D; A[1][1] /= D; } A=U*A*conj(U); return (0,0,A[0][0].x,A[0][1].x,A[1][0].x,A[1][1].x); } struct align { pair dir; triple dir3; bool relative=false; bool default=true; bool is3D=false; void init(pair dir=0, bool relative=false, bool default=false) { this.dir=dir; this.relative=relative; this.default=default; is3D=false; } void init(triple dir=(0,0,0), bool relative=false, bool default=false) { this.dir3=dir; this.relative=relative; this.default=default; is3D=true; } align copy() { align align=new align; align.init(dir,relative,default); align.dir3=dir3; align.is3D=is3D; return align; } void align(align align) { if(!align.default) { bool is3D=align.is3D; init(align.dir,align.relative); dir3=align.dir3; this.is3D=is3D; } } void align(align align, align default) { align(align); if(this.default) { init(default.dir,default.relative,default.default); dir3=default.dir3; is3D=default.is3D; } } void write(file file=stdout, suffix suffix=endl) { if(!default) { if(relative) { write(file,"Relative("); if(is3D) write(file,dir3); else write(file,dir); write(file,")",suffix); } else { if(is3D) write(file,dir3,suffix); else write(file,dir,suffix); } } } bool Center() { return relative && (is3D ? dir3 == (0,0,0) : dir == 0); } } struct side { pair align; } side Relative(explicit pair align) { side s; s.align=align; return s; } restricted side NoSide; restricted side LeftSide=Relative(W); restricted side Center=Relative((0,0)); restricted side RightSide=Relative(E); side operator * (real x, side s) { side S; S.align=x*s.align; return S; } align operator cast(pair dir) {align A; A.init(dir,false); return A;} align operator cast(triple dir) {align A; A.init(dir,false); return A;} align operator cast(side side) {align A; A.init(side.align,true); return A;} restricted align NoAlign; void write(file file=stdout, align align, suffix suffix=endl) { align.write(file,suffix); } struct position { pair position; bool relative; } position Relative(real position) { position p; p.position=position; p.relative=true; return p; } restricted position BeginPoint=Relative(0); restricted position MidPoint=Relative(0.5); restricted position EndPoint=Relative(1); position operator cast(pair x) {position P; P.position=x; return P;} position operator cast(real x) {return (pair) x;} position operator cast(int x) {return (pair) x;} pair operator cast(position P) {return P.position;} typedef transform embed(transform); transform Shift(transform t) {return identity();} transform Rotate(transform t) {return rotation(t);} transform Slant(transform t) {return scaleless(t);} transform Scale(transform t) {return t;} embed Rotate(pair z) { return new transform(transform t) {return rotate(degrees(shiftless(t)*z, warn=false));}; } path[] texpath(string s, pen p, bool tex=settings.tex != "none", bool bbox=false); struct Label { string s,size; position position; bool defaultposition=true; align align; pen p=nullpen; transform T; transform3 T3=identity(4); bool defaulttransform=true; bool defaulttransform3=true; embed embed=Rotate; // Shift, Rotate, Slant, or Scale with embedded picture filltype filltype=NoFill; void init(string s="", string size="", position position=0, bool defaultposition=true, align align=NoAlign, pen p=nullpen, transform T=identity(), transform3 T3=identity4, bool defaulttransform=true, bool defaulttransform3=true, embed embed=Rotate, filltype filltype=NoFill) { this.s=s; this.size=size; this.position=position; this.defaultposition=defaultposition; this.align=align.copy(); this.p=p; this.T=T; this.T3=copy(T3); this.defaulttransform=defaulttransform; this.defaulttransform3=defaulttransform3; this.embed=embed; this.filltype=filltype; } void initalign(string s="", string size="", align align, pen p=nullpen, embed embed=Rotate, filltype filltype=NoFill) { init(s,size,align,p,embed,filltype); } void transform(transform T) { this.T=T; defaulttransform=false; } void transform3(transform3 T) { this.T3=copy(T); defaulttransform3=false; } Label copy(transform3 T3=this.T3) { Label L=new Label; L.init(s,size,position,defaultposition,align,p,T,T3,defaulttransform, defaulttransform3,embed,filltype); return L; } void position(position pos) { this.position=pos; defaultposition=false; } void align(align a) { align.align(a); } void align(align a, align default) { align.align(a,default); } void p(pen p0) { if(this.p == nullpen) this.p=p0; } void filltype(filltype filltype0) { if(this.filltype == NoFill) this.filltype=filltype0; } void label(frame f, transform t=identity(), pair position, pair align) { pen p0=p == nullpen ? currentpen : p; align=length(align)*unit(rotation(t)*align); pair S=t*position+align*labelmargin(p0)+shift(T)*0; if(settings.tex != "none") label(f,s,size,embed(t)*shiftless(T),S,align,p0); else fill(f,align(texpath(s,p0),S,align,p0),p0); } void out(frame f, transform t=identity(), pair position=position.position, pair align=align.dir) { if(filltype == NoFill) label(f,t,position,align); else { frame d; label(d,t,position,align); add(f,d,filltype); } } void label(picture pic=currentpicture, pair position, pair align) { if(s == "") return; pic.add(new void (frame f, transform t) { out(f,t,position,align); },true); frame f; // Create a picture with label at the origin to extract its bbox truesize. label(f,(0,0),align); pic.addBox(position,position,min(f),max(f)); } void out(picture pic=currentpicture) { label(pic,position.position,align.dir); } void out(picture pic=currentpicture, path g) { bool relative=position.relative; real position=position.position.x; pair Align=align.dir; bool alignrelative=align.relative; if(defaultposition) {relative=true; position=0.5;} if(relative) position=reltime(g,position); if(align.default) { alignrelative=true; Align=position <= sqrtEpsilon ? S : position >= length(g)-sqrtEpsilon ? N : E; } pic.add(new void (frame f, transform t) { out(f,t,point(g,position), alignrelative ? -Align*dir(t*g,position)*I : Align); },!alignrelative); frame f; pair align=alignrelative ? -Align*dir(g,position)*I : Align; label(f,(0,0),align); pair position=point(g,position); pic.addBox(position,position,min(f),max(f)); } void write(file file=stdout, suffix suffix=endl) { write(file,"\""+s+"\""); if(!defaultposition) write(file,", position=",position.position); if(!align.default) write(file,", align="); write(file,align); if(p != nullpen) write(file,", pen=",p); if(!defaulttransform) write(file,", transform=",T); if(!defaulttransform3) { write(file,", transform3=",endl); write(file,T3); } write(file,"",suffix); } real relative() { return defaultposition ? 0.5 : position.position.x; }; real relative(path g) { return position.relative ? reltime(g,relative()) : relative(); }; } Label Label; void add(frame f, transform t=identity(), Label L) { L.out(f,t); } void add(picture pic=currentpicture, Label L) { L.out(pic); } Label operator * (transform t, Label L) { Label tL=L.copy(); tL.align.dir=L.align.dir; tL.transform(t*L.T); return tL; } Label operator * (transform3 t, Label L) { Label tL=L.copy(t*L.T3); tL.align.dir=L.align.dir; tL.defaulttransform3=false; return tL; } Label Label(string s, string size="", explicit position position, align align=NoAlign, pen p=nullpen, embed embed=Rotate, filltype filltype=NoFill) { Label L; L.init(s,size,position,false,align,p,embed,filltype); return L; } Label Label(string s, string size="", pair position, align align=NoAlign, pen p=nullpen, embed embed=Rotate, filltype filltype=NoFill) { return Label(s,size,(position) position,align,p,embed,filltype); } Label Label(explicit pair position, align align=NoAlign, pen p=nullpen, embed embed=Rotate, filltype filltype=NoFill) { return Label((string) position,position,align,p,embed,filltype); } Label Label(string s="", string size="", align align=NoAlign, pen p=nullpen, embed embed=Rotate, filltype filltype=NoFill) { Label L; L.initalign(s,size,align,p,embed,filltype); return L; } Label Label(Label L, align align=NoAlign, pen p=nullpen, embed embed=L.embed, filltype filltype=NoFill) { Label L=L.copy(); L.align(align); L.p(p); L.embed=embed; L.filltype(filltype); return L; } Label Label(Label L, explicit position position, align align=NoAlign, pen p=nullpen, embed embed=L.embed, filltype filltype=NoFill) { Label L=Label(L,align,p,embed,filltype); L.position(position); return L; } Label Label(Label L, pair position, align align=NoAlign, pen p=nullpen, embed embed=L.embed, filltype filltype=NoFill) { return Label(L,(position) position,align,p,embed,filltype); } void write(file file=stdout, Label L, suffix suffix=endl) { L.write(file,suffix); } void label(frame f, Label L, pair position, align align=NoAlign, pen p=currentpen, filltype filltype=NoFill) { add(f,Label(L,position,align,p,filltype)); } void label(frame f, Label L, align align=NoAlign, pen p=currentpen, filltype filltype=NoFill) { add(f,Label(L,L.position,align,p,filltype)); } void label(picture pic=currentpicture, Label L, pair position, align align=NoAlign, pen p=currentpen, filltype filltype=NoFill) { Label L=Label(L,position,align,p,filltype); add(pic,L); } void label(picture pic=currentpicture, Label L, align align=NoAlign, pen p=currentpen, filltype filltype=NoFill) { label(pic,L,L.position,align,p,filltype); } void label(picture pic=currentpicture, Label L, explicit path g, align align=NoAlign, pen p=currentpen, filltype filltype=NoFill) { Label L=Label(L,align,p,filltype); L.out(pic,g); } void label(picture pic=currentpicture, Label L, explicit guide g, align align=NoAlign, pen p=currentpen, filltype filltype=NoFill) { label(pic,L,(path) g,align,p,filltype); } Label operator cast(string s) {return Label(s);} // A structure that a string, Label, or frame can be cast to. struct object { frame f; Label L=Label; path g; // Bounding path void operator init(frame f) { this.f=f; g=box(min(f),max(f)); } void operator init(Label L) { this.L=L.copy(); if(L != Label) L.out(f); g=box(min(f),max(f)); } } object operator cast(frame f) { return object(f); } object operator cast(Label L) { return object(L); } object operator cast(string s) { return object(s); } Label operator cast(object F) { return F.L; } frame operator cast(object F) { return F.f; } object operator * (transform t, explicit object F) { object f; f.f=t*F.f; f.L=t*F.L; f.g=t*F.g; return f; } // Returns a copy of object F aligned in the direction align object align(object F, pair align) { return shift(F.f,align)*F; } void add(picture dest=currentpicture, object F, pair position=0, bool group=true, filltype filltype=NoFill, bool above=true) { add(dest,F.f,position,group,filltype,above); } // Pack a list of objects into a frame. frame pack(pair align=2S ... object inset[]) { frame F; int n=inset.length; pair z; for (int i=0; i < n; ++i) { add(F,inset[i].f,z); z += align+realmult(unit(align),size(inset[i].f)); } return F; } path[] texpath(Label L, bool tex=settings.tex != "none", bool bbox=false) { struct stringfont { string s; real fontsize; string font; void operator init(Label L) { s=replace(L.s,'\n',' '); fontsize=fontsize(L.p); font=font(L.p); } pen pen() {return fontsize(fontsize)+fontcommand(font);} } bool lexorder(stringfont a, stringfont b) { return a.s < b.s || (a.s == b.s && (a.fontsize < b.fontsize || (a.fontsize == b.fontsize && a.font < b.font))); } static stringfont[] stringcache; static path[][] pathcache; static stringfont[] stringlist; static bool adjust[]; path[] G; stringfont s=stringfont(L); pen p=s.pen(); int i=search(stringcache,s,lexorder); if(i == -1 || lexorder(stringcache[i],s)) { int k=search(stringlist,s,lexorder); if(k == -1 || lexorder(stringlist[k],s)) { ++k; stringlist.insert(k,s); // PDF tex engines lose track of the baseline. adjust.insert(k,tex && basealign(L.p) == 1 && pdf()); } } path[] transform(path[] g, Label L) { if(g.length == 0) return g; pair m=min(g); pair M=max(g); pair dir=rectify(inverse(L.T)*-L.align.dir); if(tex && basealign(L.p) == 1) dir -= (0,(1-dir.y)*m.y/(M.y-m.y)); pair a=m+realmult(dir,M-m); return shift(L.position+L.align.dir*labelmargin(L.p))*L.T*shift(-a)*g; } if(tex && bbox) { frame f; label(f,L); return transform(box(min(f),max(f)),L); } if(stringlist.length > 0) { path[][] g; int n=stringlist.length; string[] s=new string[n]; pen[] p=new pen[n]; for(int i=0; i < n; ++i) { stringfont S=stringlist[i]; s[i]=adjust[i] ? "."+S.s : S.s; p[i]=adjust[i] ? S.pen()+basealign : S.pen(); } g=tex ? _texpath(s,p) : textpath(s,p); if(tex) for(int i=0; i < n; ++i) if(adjust[i]) { real y=min(g[i][0]).y; g[i].delete(0); g[i]=shift(0,-y)*g[i]; } for(int i=0; i < stringlist.length; ++i) { stringfont s=stringlist[i]; int j=search(stringcache,s,lexorder)+1; stringcache.insert(j,s); pathcache.insert(j,g[i]); } stringlist.delete(); adjust.delete(); } return transform(pathcache[search(stringcache,stringfont(L),lexorder)],L); } texpath=new path[](string s, pen p, bool tex=settings.tex != "none", bool bbox=false) { return texpath(Label(s,p)); }; ./asymptote-2.41/base/markers.asy0000644000175000017500000001620613064427076016644 0ustar norbertnorbert// Mark routines and markers written by Philippe Ivaldi. // http://www.piprime.fr/ marker operator * (transform T, marker m) { marker M=new marker; M.f=T*m.f; M.above=m.above; M.markroutine=m.markroutine; return M; } // Add n frames f midway (in arclength) between n+1 uniformly spaced marks. markroutine markinterval(int n=1, frame f, bool rotated=false) { return new void(picture pic=currentpicture, frame mark, path g) { markuniform(n+1,rotated)(pic,mark,g); markuniform(centered=true,n,rotated)(pic,f,g); }; } // Return a frame containing n copies of the path g shifted by space // drawn with pen p. frame duplicate(path g, int n=1, pair space=0, pen p=currentpen) { if(space == 0) space=dotsize(p); frame f; int pos=0; int sign=1; int m=(n+1) % 2; for(int i=1; i <= n; ++i) { draw(f,shift(space*(pos-0.5*m))*g,p); pos += i*sign; sign *= -1; } return f; } real tildemarksizefactor=5; real tildemarksize(pen p=currentpen) { static real golden=(1+sqrt(5))/2; return (1mm+tildemarksizefactor*sqrt(linewidth(p)))/golden; } frame tildeframe(int n=1, real size=0, pair space=0, real angle=0, pair offset=0, pen p=currentpen) { size=(size == 0) ? tildemarksize(p) : size; space=(space == 0) ? 1.5*size : space; path g=yscale(1.25)*((-1.5,-0.5)..(-0.75,0.5)..(0,0)..(0.75,-0.5)..(1.5,0.5)); return duplicate(shift(offset)*rotate(angle)*scale(size)*g,n,space,p); } frame tildeframe=tildeframe(); real stickmarkspacefactor=4; real stickmarksizefactor=10; real stickmarksize(pen p=currentpen) { return 1mm+stickmarksizefactor*sqrt(linewidth(p)); } real stickmarkspace(pen p=currentpen) { return stickmarkspacefactor*sqrt(linewidth(p)); } frame stickframe(int n=1, real size=0, pair space=0, real angle=0, pair offset=0, pen p=currentpen) { if(size == 0) size=stickmarksize(p); if(space == 0) space=stickmarkspace(p); return duplicate(shift(offset)*rotate(angle)*scale(0.5*size)*(N--S),n, space,p); } frame stickframe=stickframe(); real circlemarkradiusfactor=stickmarksizefactor/2; real circlemarkradius(pen p=currentpen) { static real golden=(1+sqrt(5))/2; return (1mm+circlemarkradiusfactor*sqrt(linewidth(p)))/golden; } real barmarksizefactor=stickmarksizefactor; real barmarksize(pen p=currentpen) { return 1mm+barmarksizefactor*sqrt(linewidth(p)); } frame circlebarframe(int n=1, real barsize=0, real radius=0,real angle=0, pair offset=0, pen p=currentpen, filltype filltype=NoFill, bool above=false) { if(barsize == 0) barsize=barmarksize(p); if(radius == 0) radius=circlemarkradius(p); frame opic; path g=circle(offset,radius); frame f=stickframe(n,barsize,space=2*radius/(n+1),angle,offset,p); if(above) { add(opic,f); filltype.fill(opic,g,p); } else { filltype.fill(opic,g,p); add(opic,f); } return opic; } real crossmarksizefactor=5; real crossmarksize(pen p=currentpen) { return 1mm+crossmarksizefactor*sqrt(linewidth(p)); } frame crossframe(int n=3, real size=0, pair space=0, real angle=0, pair offset=0, pen p=currentpen) { if(size == 0) size=crossmarksize(p); frame opic; draw(opic,shift(offset)*rotate(angle)*scale(size)*cross(n),p); return opic; } real markanglespacefactor=4; real markangleradiusfactor=8; real markangleradius(pen p=currentpen) { return 8mm+markangleradiusfactor*sqrt(linewidth(p)); } real markangleradius=markangleradius(); real markanglespace(pen p=currentpen) { return markanglespacefactor*sqrt(linewidth(p)); } real markanglespace=markanglespace(); // Mark the oriented angle AOB counterclockwise with optional Label, arrows, and markers. // With radius < 0, AOB-2pi is marked clockwise. void markangle(picture pic=currentpicture, Label L="", int n=1, real radius=0, real space=0, pair A, pair O, pair B, arrowbar arrow=None, pen p=currentpen, filltype filltype=NoFill, margin margin=NoMargin, marker marker=nomarker) { if(space == 0) space=markanglespace(p); if(radius == 0) radius=markangleradius(p); picture lpic,phantom; frame ff; path lpth; p=squarecap+p; pair OB=unit(B-O), OA=unit(A-O); real xoa=degrees(OA,false); real gle=degrees(acos(dot(OA,OB))); if((conj(OA)*OB).y < 0) gle *= -1; bool ccw=radius > 0; if(!ccw) radius=-radius; bool drawarrow = !arrow(phantom,arc((0,0),radius,xoa,xoa+gle,ccw),p,margin); if(drawarrow && margin == NoMargin) margin=TrueMargin(0,0.5linewidth(p)); if(filltype != NoFill) { lpth=margin(arc((0,0),radius+(n-1)*space,xoa,xoa+gle,ccw),p).g; pair p0=relpoint(lpth,0), p1=relpoint(lpth,1); pair ac=p0-p0-A+O, bd=p1-p1-B+O, det=(conj(ac)*bd).y; pair op=(det == 0) ? O : p0+(conj(p1-p0)*bd).y*ac/det; filltype.fill(ff,op--lpth--relpoint(lpth,1)--cycle,p); add(lpic,ff); } for(int i=0; i < n; ++i) { lpth=margin(arc((0,0),radius+i*space,xoa,xoa+gle,ccw),p).g; draw(lpic,lpth,p=p,arrow=arrow,margin=NoMargin,marker=marker); } Label lL=L.copy(); real position=lL.position.position.x; if(lL.defaultposition) {lL.position.relative=true; position=0.5;} if(lL.position.relative) position=reltime(lpth,position); if(lL.align.default) { lL.align.relative=true; lL.align.dir=unit(point(lpth,position)); } label(lpic,lL,point(lpth,position),align=NoAlign, p=p); add(pic,lpic,O); } marker StickIntervalMarker(int i=2, int n=1, real size=0, real space=0, real angle=0, pair offset=0, bool rotated=true, pen p=currentpen, frame uniform=newframe, bool above=true) { return marker(uniform,markinterval(i,stickframe(n,size,space,angle,offset,p), rotated),above); } marker CrossIntervalMarker(int i=2, int n=3, real size=0, real space=0, real angle=0, pair offset=0, bool rotated=true, pen p=currentpen, frame uniform=newframe, bool above=true) { return marker(uniform,markinterval(i,crossframe(n,size,space,angle,offset,p), rotated=rotated),above); } marker CircleBarIntervalMarker(int i=2, int n=1, real barsize=0, real radius=0, real angle=0, pair offset=0, bool rotated=true, pen p=currentpen, filltype filltype=NoFill, bool circleabove=false, frame uniform=newframe, bool above=true) { return marker(uniform,markinterval(i,circlebarframe(n,barsize,radius,angle, offset,p,filltype, circleabove), rotated),above); } marker TildeIntervalMarker(int i=2, int n=1, real size=0, real space=0, real angle=0, pair offset=0, bool rotated=true, pen p=currentpen, frame uniform=newframe, bool above=true) { return marker(uniform,markinterval(i,tildeframe(n,size,space,angle,offset,p), rotated),above); } ./asymptote-2.41/base/latin1.asy0000644000175000017500000000007513064427076016365 0ustar norbertnorbertusepackage("fontenc","T1"); usepackage("inputenc","latin1"); ./asymptote-2.41/base/texcolors.asy0000644000175000017500000000434513064427076017223 0ustar norbertnorbertpen GreenYellow=cmyk(0.15,0,0.69,0); pen Yellow=cmyk(0,0,1,0); pen Goldenrod=cmyk(0,0.10,0.84,0); pen Dandelion=cmyk(0,0.29,0.84,0); pen Apricot=cmyk(0,0.32,0.52,0); pen Peach=cmyk(0,0.50,0.70,0); pen Melon=cmyk(0,0.46,0.50,0); pen YellowOrange=cmyk(0,0.42,1,0); pen Orange=cmyk(0,0.61,0.87,0); pen BurntOrange=cmyk(0,0.51,1,0); pen Bittersweet=cmyk(0,0.75,1,0.24); pen RedOrange=cmyk(0,0.77,0.87,0); pen Mahogany=cmyk(0,0.85,0.87,0.35); pen Maroon=cmyk(0,0.87,0.68,0.32); pen BrickRed=cmyk(0,0.89,0.94,0.28); pen Red=cmyk(0,1,1,0); pen OrangeRed=cmyk(0,1,0.50,0); pen RubineRed=cmyk(0,1,0.13,0); pen WildStrawberry=cmyk(0,0.96,0.39,0); pen Salmon=cmyk(0,0.53,0.38,0); pen CarnationPink=cmyk(0,0.63,0,0); pen Magenta=cmyk(0,1,0,0); pen VioletRed=cmyk(0,0.81,0,0); pen Rhodamine=cmyk(0,0.82,0,0); pen Mulberry=cmyk(0.34,0.90,0,0.02); pen RedViolet=cmyk(0.07,0.90,0,0.34); pen Fuchsia=cmyk(0.47,0.91,0,0.08); pen Lavender=cmyk(0,0.48,0,0); pen Thistle=cmyk(0.12,0.59,0,0); pen Orchid=cmyk(0.32,0.64,0,0); pen DarkOrchid=cmyk(0.40,0.80,0.20,0); pen Purple=cmyk(0.45,0.86,0,0); pen Plum=cmyk(0.50,1,0,0); pen Violet=cmyk(0.79,0.88,0,0); pen RoyalPurple=cmyk(0.75,0.90,0,0); pen BlueViolet=cmyk(0.86,0.91,0,0.04); pen Periwinkle=cmyk(0.57,0.55,0,0); pen CadetBlue=cmyk(0.62,0.57,0.23,0); pen CornflowerBlue=cmyk(0.65,0.13,0,0); pen MidnightBlue=cmyk(0.98,0.13,0,0.43); pen NavyBlue=cmyk(0.94,0.54,0,0); pen RoyalBlue=cmyk(1,0.50,0,0); pen Blue=cmyk(1,1,0,0); pen Cerulean=cmyk(0.94,0.11,0,0); pen Cyan=cmyk(1,0,0,0); pen ProcessBlue=cmyk(0.96,0,0,0); pen SkyBlue=cmyk(0.62,0,0.12,0); pen Turquoise=cmyk(0.85,0,0.20,0); pen TealBlue=cmyk(0.86,0,0.34,0.02); pen Aquamarine=cmyk(0.82,0,0.30,0); pen BlueGreen=cmyk(0.85,0,0.33,0); pen Emerald=cmyk(1,0,0.50,0); pen JungleGreen=cmyk(0.99,0,0.52,0); pen SeaGreen=cmyk(0.69,0,0.50,0); pen Green=cmyk(1,0,1,0); pen ForestGreen=cmyk(0.91,0,0.88,0.12); pen PineGreen=cmyk(0.92,0,0.59,0.25); pen LimeGreen=cmyk(0.50,0,1,0); pen YellowGreen=cmyk(0.44,0,0.74,0); pen SpringGreen=cmyk(0.26,0,0.76,0); pen OliveGreen=cmyk(0.64,0,0.95,0.40); pen RawSienna=cmyk(0,0.72,1,0.45); pen Sepia=cmyk(0,0.83,1,0.70); pen Brown=cmyk(0,0.81,1,0.60); pen Tan=cmyk(0.14,0.42,0.56,0); pen Gray=cmyk(0,0,0,0.50); pen Black=cmyk(0,0,0,1); pen White=cmyk(0,0,0,0); ./asymptote-2.41/base/asy.vim0000644000175000017500000002124613064427076015773 0ustar norbertnorbert" Vim syntax file " Language: Asymptote " Maintainer: Andy Hammerlindl " Last Change: 2005 Aug 23 " Hacked together from Bram Moolenaar's C syntax file, and Claudio Fleiner's " Java syntax file. " For version 5.x: Clear all syntax items " For version 6.x: Quit when a syntax file was already loaded if version < 600 syntax clear elseif exists("b:current_syntax") finish endif " A bunch of useful C keywords syn keyword asyStatement break return continue unravel syn keyword asyConditional if else syn keyword asyRepeat while for do syn keyword asyExternal access from import include syn keyword asyOperator new operator syn keyword asyTodo contained TODO FIXME XXX " asyCommentGroup allows adding matches for special things in comments syn cluster asyCommentGroup contains=asyTodo " String and Character constants " Highlight special characters (those proceding a double backslash) differently syn match asySpecial display contained "\\\\." " Highlight line continuation slashes syn match asySpecial display contained "\\$" syn region asyString start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=asySpecial " asyCppString: same as asyString, but ends at end of line if 0 syn region asyCppString start=+"+ skip=+\\\\\|\\"\|\\$+ excludenl end=+"+ end='$' contains=asySpecial endif "when wanted, highlight trailing white space if exists("asy_space_errors") if !exists("asy_no_trail_space_error") syn match asySpaceError display excludenl "\s\+$" endif if !exists("asy_no_tab_space_error") syn match asySpaceError display " \+\t"me=e-1 endif endif "catch errors caused by wrong parenthesis and brackets syn cluster asyParenGroup contains=asyParenError,asyIncluded,asySpecial,asyCommentSkip,asyCommentString,asyComment2String,@asyCommentGroup,asyCommentStartError,asyUserCont,asyUserLabel,asyBitField,asyCommentSkip,asyOctalZero,asyCppOut,asyCppOut2,asyCppSkip,asyFormat,asyNumber,asyFloat,asyOctal,asyOctalError,asyNumbersCom if exists("asy_no_bracket_error") syn region asyParen transparent start='(' end=')' contains=ALLBUT,@asyParenGroup,asyCppParen,asyCppString " asyCppParen: same as asyParen but ends at end-of-line; used in asyDefine syn region asyCppParen transparent start='(' skip='\\$' excludenl end=')' end='$' contained contains=ALLBUT,@asyParenGroup,asyParen,asyString syn match asyParenError display ")" syn match asyErrInParen display contained "[{}]" else syn region asyParen transparent start='(' end=')' contains=ALLBUT,@asyParenGroup,asyCppParen,asyErrInBracket,asyCppBracket,asyCppString " asyCppParen: same as asyParen but ends at end-of-line; used in asyDefine syn region asyCppParen transparent start='(' skip='\\$' excludenl end=')' end='$' contained contains=ALLBUT,@asyParenGroup,asyErrInBracket,asyParen,asyBracket,asyString if 0 syn match asyParenError display "[\])]" syn match asyErrInParen display contained "[\]]" endif syn region asyBracket transparent start='\[' end=']' contains=ALLBUT,@asyParenGroup,asyErrInParen,asyCppParen,asyCppBracket,asyCppString " asyCppBracket: same as asyParen but ends at end-of-line; used in asyDefine syn region asyCppBracket transparent start='\[' skip='\\$' excludenl end=']' end='$' contained contains=ALLBUT,@asyParenGroup,asyErrInParen,asyParen,asyBracket,asyString syn match asyErrInBracket display contained "[);]" endif "integer number, or floating point number without a dot and with "f". syn case ignore syn match asyNumbers display transparent "\<\d\|\.\d" contains=asyNumber,asyFloat syn match asyNumber display contained "\d\+" "floating point number, with dot, optional exponent syn match asyFloat display contained "\d\+\.\d*\(e[-+]\=\d\+\)\=" "floating point number, starting with a dot, optional exponent syn match asyFloat display contained "\.\d\+\(e[-+]\=\d\+\)\=" "floating point number, without dot, with exponent syn match asyFloat display contained "\d\+e[-+]\=\d\+" syn case match if exists("asy_comment_strings") " A comment can contain asyString, asyCharacter and asyNumber. " But a "*/" inside a asyString in a asyComment DOES end the comment! So we " need to use a special type of asyString: asyCommentString, which also ends on " "*/", and sees a "*" at the start of the line as comment again. " Unfortunately this doesn't very well work for // type of comments :-( syntax match asyCommentSkip contained "^\s*\*\($\|\s\+\)" syntax region asyCommentString contained start=+L\="+ skip=+\\\\\|\\"+ end=+"+ end=+\*/+me=s-1 contains=asySpecial,asyCommentSkip syntax region asyComment2String contained start=+L\="+ skip=+\\\\\|\\"+ end=+"+ end="$" contains=asySpecial syntax region asyCommentL start="//" skip="\\$" end="$" keepend contains=@asyCommentGroup,asyComment2String,asyCharacter,asyNumbersCom,asySpaceError syntax region asyComment matchgroup=asyCommentStart start="/\*" matchgroup=NONE end="\*/" contains=@asyCommentGroup,asyCommentStartError,asyCommentString,asyCharacter,asyNumbersCom,asySpaceError else syn region asyCommentL start="//" skip="\\$" end="$" keepend contains=@asyCommentGroup,asySpaceError syn region asyComment matchgroup=asyCommentStart start="/\*" matchgroup=NONE end="\*/" contains=@asyCommentGroup,asyCommentStartError,asySpaceError endif " keep a // comment separately, it terminates a preproc. conditional syntax match asyCommentError display "\*/" syntax match asyCommentStartError display "/\*"me=e-1 contained syn keyword asyType void bool int real string syn keyword asyType pair triple transform guide path pen frame syn keyword asyType picture syn keyword asyStructure struct typedef syn keyword asyStorageClass static public readable private explicit syn keyword asyPathSpec and cycle controls tension atleast curl syn keyword asyConstant true false syn keyword asyConstant null nullframe nullpath if exists("asy_syn_plain") syn keyword asyConstant currentpicture currentpen currentprojection syn keyword asyConstant inch inches cm mm bp pt up down right left syn keyword asyConstant E NE N NW W SW S SE syn keyword asyConstant ENE NNE NNW WNW WSW SSW SSE ESE syn keyword asyConstant I pi twopi syn keyword asyConstant solid dotted dashed dashdotted syn keyword asyConstant longdashed longdashdotted syn keyword asyConstant squarecap roundcap extendcap syn keyword asyConstant miterjoin roundjoin beveljoin syn keyword asyConstant zerowinding evenodd syn keyword asyConstant invisible black gray grey white syn keyword asyConstant lightgray lightgrey syn keyword asyConstant red green blue syn keyword asyConstant cmyk Cyan Magenta Yellow Black syn keyword asyConstant yellow magenta cyan syn keyword asyConstant brown darkgreen darkblue syn keyword asyConstant orange purple royalblue olive syn keyword asyConstant chartreuse fuchsia salmon lightblue springgreen syn keyword asyConstant pink endif syn sync ccomment asyComment minlines=15 " Define the default highlighting. " For version 5.7 and earlier: only when not done already " For version 5.8 and later: only when an item doesn't have highlighting yet if version >= 508 || !exists("did_asy_syn_inits") if version < 508 let did_asy_syn_inits = 1 command -nargs=+ HiLink hi link else command -nargs=+ HiLink hi def link endif HiLink asyFormat asySpecial HiLink asyCppString asyString HiLink asyCommentL asyComment HiLink asyCommentStart asyComment HiLink asyLabel Label HiLink asyUserLabel Label HiLink asyConditional Conditional HiLink asyRepeat Repeat HiLink asyCharacter Character HiLink asySpecialCharacter asySpecial HiLink asyNumber Number HiLink asyOctal Number HiLink asyOctalZero PreProc " link this to Error if you want HiLink asyFloat Float HiLink asyOctalError asyError HiLink asyParenError asyError HiLink asyErrInParen asyError HiLink asyErrInBracket asyError HiLink asyCommentError asyError HiLink asyCommentStartError asyError HiLink asySpaceError asyError HiLink asySpecialError asyError HiLink asyOperator Operator HiLink asyStructure Structure HiLink asyStorageClass StorageClass HiLink asyExternal Include HiLink asyPreProc PreProc HiLink asyDefine Macro HiLink asyIncluded asyString HiLink asyError Error HiLink asyStatement Statement HiLink asyPreCondit PreCondit HiLink asyType Type HiLink asyConstant Constant HiLink asyCommentString asyString HiLink asyComment2String asyString HiLink asyCommentSkip asyComment HiLink asyString String HiLink asyComment Comment HiLink asySpecial SpecialChar HiLink asyTodo Todo HiLink asyCppSkip asyCppOut HiLink asyCppOut2 asyCppOut HiLink asyCppOut Comment HiLink asyPathSpec Statement delcommand HiLink endif let b:current_syntax = "c" " vim: ts=8 ./asymptote-2.41/base/slopefield.asy0000644000175000017500000000402413064427076017321 0ustar norbertnorbertimport graph_settings; real stepfraction=0.05; picture slopefield(real f(real,real), pair a, pair b, int nx=nmesh, int ny=nx, real tickfactor=0.5, pen p=currentpen, arrowbar arrow=None) { picture pic; real dx=(b.x-a.x)/nx; real dy=(b.y-a.y)/ny; real step=0.5*tickfactor*min(dx,dy); for(int i=0; i <= nx; ++i) { real x=a.x+i*dx; for(int j=0; j <= ny; ++j) { pair cp=(x,a.y+j*dy); real slope=f(cp.x,cp.y); real mp=step/sqrt(1+slope^2); draw(pic,(cp.x-mp,cp.y-mp*slope)--(cp.x+mp,cp.y+mp*slope),p,arrow); } } clip(pic,box(a,b)); return pic; } picture slopefield(real f(real), pair a, pair b, int nx=nmesh, int ny=nx, pen p=currentpen, arrowbar arrow=None) { return slopefield(new real(real x, real y) {return f(x);},a,b,nx,ny,p,arrow); } path curve(pair c, real f(real,real), pair a, pair b) { real step=stepfraction*(b.x-a.x); real halfstep=0.5*step; real sixthstep=step/6; path follow(real sign) { pair cp=c; guide g=cp; real dx,dy; real factor=1; do { real slope; pair S(pair z) { slope=f(z.x,z.y); return factor*sign/sqrt(1+slope^2)*(1,slope); } pair S3; pair advance() { pair S0=S(cp); pair S1=S(cp+halfstep*S0); pair S2=S(cp+halfstep*S1); S3=S(cp+step*S2); pair cp0=cp+sixthstep*(S0+2S1+2S2+S3); dx=min(cp0.x-a.x,b.x-cp0.x); dy=min(cp0.y-a.y,b.y-cp0.y); return cp0; } pair cp0=advance(); if(dx < 0) { factor=(step+dx)/step; cp0=advance(); g=g..{S3}cp0{S3}; break; } if(dy < 0) { factor=(step+dy)/step; cp0=advance(); g=g..{S3}cp0{S3}; break; } cp=cp0; g=g..{S3}cp{S3}; } while (dx > 0 && dy > 0); return g; } return reverse(follow(-1))&follow(1); } path curve(pair c, real f(real), pair a, pair b) { return curve(c,new real(real x, real y){return f(x);},a,b); } ./asymptote-2.41/base/contour3.asy0000644000175000017500000003450413064427076016755 0ustar norbertnorbertimport graph_settings; import three; real eps=10000*realEpsilon; private struct weighted { triple normal; real ratio; int kpa0,kpa1,kpa2; int kpb0,kpb1,kpb2; triple v; } private struct bucket { triple v; triple val; int count; } struct vertex { triple v; triple normal; } // A group of 3 or 4 points. private struct object { bool active; weighted[] pts; } // Return contour vertices for a 3D data array. // z: three-dimensional array of nonoverlapping mesh points // f: three-dimensional arrays of real data values // midpoint: optional array containing estimate of f at midpoint values vertex[][] contour3(triple[][][] v, real[][][] f, real[][][] midpoint=new real[][][], projection P=currentprojection) { int nx=v.length-1; if(nx == 0) abort("array v must have length >= 2"); int ny=v[0].length-1; if(ny == 0) abort("array v[0] must have length >= 2"); int nz=v[0][0].length-1; if(nz == 0) abort("array v[0][0] must have length >= 2"); bool midpoints=midpoint.length > 0; bucket[][][][] kps=new bucket[2nx+1][2ny+1][2nz+1][]; for(int i=0; i < 2nx+1; ++i) for(int j=0; j < 2ny+1; ++j) for(int k=0; k < 2nz+1; ++k) kps[i][j][k]=new bucket[]; object[] objects; // go over region a rectangle at a time for(int i=0; i < nx; ++i) { triple[][] vi=v[i]; triple[][] vp=v[i+1]; real[][] fi=f[i]; real[][] fp=f[i+1]; int i2=2i; int i2p1=i2+1; int i2p2=i2+2; for(int j=0; j < ny; ++j) { triple[] vij=vi[j]; triple[] vpj=vp[j]; triple[] vip=vi[j+1]; triple[] vpp=vp[j+1]; real[] fij=fi[j]; real[] fpj=fp[j]; real[] fip=fi[j+1]; real[] fpp=fp[j+1]; int j2=2j; int j2p1=j2+1; int j2p2=j2+2; for(int k=0; k < nz; ++k) { // vertex values real vdat0=fij[k]; real vdat1=fij[k+1]; real vdat2=fip[k]; real vdat3=fip[k+1]; real vdat4=fpj[k]; real vdat5=fpj[k+1]; real vdat6=fpp[k]; real vdat7=fpp[k+1]; // define points triple p000=vij[k]; triple p001=vij[k+1]; triple p010=vip[k]; triple p011=vip[k+1]; triple p100=vpj[k]; triple p101=vpj[k+1]; triple p110=vpp[k]; triple p111=vpp[k+1]; triple m0=0.25*(p000+p010+p110+p100); triple m1=0.25*(p010+p110+p111+p011); triple m2=0.25*(p110+p100+p101+p111); triple m3=0.25*(p100+p000+p001+p101); triple m4=0.25*(p000+p010+p011+p001); triple m5=0.25*(p001+p011+p111+p101); triple mc=0.5*(m0+m5); // optimization: we make sure we don't work with empty rectangles int countm=0; int countz=0; int countp=0; void check(real vdat) { if(vdat < -eps) ++countm; else { if(vdat <= eps) ++countz; else ++countp; } } check(vdat0); check(vdat1); check(vdat2); check(vdat3); check(vdat4); check(vdat5); check(vdat6); check(vdat7); if(countm == 8 || countp == 8 || ((countm == 7 || countp == 7) && countz == 1)) continue; int k2=2k; int k2p1=k2+1; int k2p2=k2+2; // Evaluate midpoints of cube sides. // Then evaluate midpoint of cube. real vdat8=midpoints ? midpoint[i2p1][j2p1][k2] : 0.25*(vdat0+vdat2+vdat6+vdat4); real vdat9=midpoints ? midpoint[i2p1][j2p2][k2p1] : 0.25*(vdat2+vdat6+vdat7+vdat3); real vdat10=midpoints ? midpoint[i2p2][j2p1][k2p1] : 0.25*(vdat7+vdat6+vdat4+vdat5); real vdat11=midpoints ? midpoint[i2p1][j2][k2p1] : 0.25*(vdat0+vdat4+vdat5+vdat1); real vdat12=midpoints ? midpoint[i2][j2p1][k2p1] : 0.25*(vdat0+vdat2+vdat3+vdat1); real vdat13=midpoints ? midpoint[i2p1][j2p1][k2p2] : 0.25*(vdat1+vdat3+vdat7+vdat5); real vdat14=midpoints ? midpoint[i2p1][j2p1][k2p1] : 0.125*(vdat0+vdat1+vdat2+vdat3+vdat4+vdat5+vdat6+vdat7); // Go through the 24 pyramids, 4 for each side. void addval(int kp0, int kp1, int kp2, triple add, triple v) { bucket[] cur=kps[kp0][kp1][kp2]; for(int q=0; q < cur.length; ++q) { if(length(cur[q].v-v) < eps) { cur[q].val += add; ++cur[q].count; return; } } bucket newbuck; newbuck.v=v; newbuck.val=add; newbuck.count=1; cur.push(newbuck); } void accrue(weighted w) { triple val1=w.normal*w.ratio; triple val2=w.normal*(1-w.ratio); addval(w.kpa0,w.kpa1,w.kpa2,val1,w.v); addval(w.kpb0,w.kpb1,w.kpb2,val2,w.v); } triple dir=P.normal; void addnormals(weighted[] pts) { triple vec2=pts[1].v-pts[0].v; triple vec1=pts[0].v-pts[2].v; triple vec0=-vec2-vec1; vec2=unit(vec2); vec1=unit(vec1); vec0=unit(vec0); triple normal=cross(vec2,vec1); normal *= sgn(dot(normal,dir)); real angle0=acos(-dot(vec1,vec2)); real angle1=acos(-dot(vec2,vec0)); pts[0].normal=normal*angle0; pts[1].normal=normal*angle1; pts[2].normal=normal*(pi-angle0-angle1); } void addobj(object obj) { if(!obj.active) return; if(obj.pts.length == 4) { weighted[] points=obj.pts; object obj1; object obj2; obj1.active=true; obj2.active=true; obj1.pts=new weighted[] {points[0],points[1],points[2]}; obj2.pts=new weighted[] {points[1],points[2],points[3]}; addobj(obj1); addobj(obj2); } else { addnormals(obj.pts); for(int q=0; q < obj.pts.length; ++q) accrue(obj.pts[q]); objects.push(obj); } } weighted setupweighted(triple va, triple vb, real da, real db, int[] kpa, int[] kpb) { weighted w; real ratio=abs(da/(db-da)); w.v=interp(va,vb,ratio); w.ratio=ratio; w.kpa0=i2+kpa[0]; w.kpa1=j2+kpa[1]; w.kpa2=k2+kpa[2]; w.kpb0=i2+kpb[0]; w.kpb1=j2+kpb[1]; w.kpb2=k2+kpb[2]; return w; } weighted setupweighted(triple v, int[] kp) { weighted w; w.v=v; w.ratio=0.5; w.kpa0=w.kpb0=i2+kp[0]; w.kpa1=w.kpb1=j2+kp[1]; w.kpa2=w.kpb2=k2+kp[2]; return w; } // Checks if a pyramid contains a contour object. object checkpyr(triple v0, triple v1, triple v2, triple v3, real d0, real d1, real d2, real d3, int[] c0, int[] c1, int[] c2, int[] c3) { object obj; real a0=abs(d0); real a1=abs(d1); real a2=abs(d2); real a3=abs(d3); bool b0=a0 < eps; bool b1=a1 < eps; bool b2=a2 < eps; bool b3=a3 < eps; weighted[] pts; if(b0) pts.push(setupweighted(v0,c0)); if(b1) pts.push(setupweighted(v1,c1)); if(b2) pts.push(setupweighted(v2,c2)); if(b3) pts.push(setupweighted(v3,c3)); if(!b0 && !b1 && abs(d0+d1)+eps < a0+a1) pts.push(setupweighted(v0,v1,d0,d1,c0,c1)); if(!b0 && !b2 && abs(d0+d2)+eps < a0+a2) pts.push(setupweighted(v0,v2,d0,d2,c0,c2)); if(!b0 && !b3 && abs(d0+d3)+eps < a0+a3) pts.push(setupweighted(v0,v3,d0,d3,c0,c3)); if(!b1 && !b2 && abs(d1+d2)+eps < a1+a2) pts.push(setupweighted(v1,v2,d1,d2,c1,c2)); if(!b1 && !b3 && abs(d1+d3)+eps < a1+a3) pts.push(setupweighted(v1,v3,d1,d3,c1,c3)); if(!b2 && !b3 && abs(d2+d3)+eps < a2+a3) pts.push(setupweighted(v2,v3,d2,d3,c2,c3)); int s=pts.length; //There are three or four points. if(s > 2) { obj.active=true; obj.pts=pts; } else obj.active=false; return obj; } void check4pyr(triple v0, triple v1, triple v2, triple v3, triple v4, triple v5, real d0, real d1, real d2, real d3, real d4, real d5, int[] c0, int[] c1, int[] c2, int[] c3, int[] c4, int[] c5) { addobj(checkpyr(v5,v4,v0,v1,d5,d4,d0,d1,c5,c4,c0,c1)); addobj(checkpyr(v5,v4,v1,v2,d5,d4,d1,d2,c5,c4,c1,c2)); addobj(checkpyr(v5,v4,v2,v3,d5,d4,d2,d3,c5,c4,c2,c3)); addobj(checkpyr(v5,v4,v3,v0,d5,d4,d3,d0,c5,c4,c3,c0)); } static int[] pp000={0,0,0}; static int[] pp001={0,0,2}; static int[] pp010={0,2,0}; static int[] pp011={0,2,2}; static int[] pp100={2,0,0}; static int[] pp101={2,0,2}; static int[] pp110={2,2,0}; static int[] pp111={2,2,2}; static int[] pm0={1,1,0}; static int[] pm1={1,2,1}; static int[] pm2={2,1,1}; static int[] pm3={1,0,1}; static int[] pm4={0,1,1}; static int[] pm5={1,1,2}; static int[] pmc={1,1,1}; check4pyr(p000,p010,p110,p100,mc,m0, vdat0,vdat2,vdat6,vdat4,vdat14,vdat8, pp000,pp010,pp110,pp100,pmc,pm0); check4pyr(p010,p110,p111,p011,mc,m1, vdat2,vdat6,vdat7,vdat3,vdat14,vdat9, pp010,pp110,pp111,pp011,pmc,pm1); check4pyr(p110,p100,p101,p111,mc,m2, vdat6,vdat4,vdat5,vdat7,vdat14,vdat10, pp110,pp100,pp101,pp111,pmc,pm2); check4pyr(p100,p000,p001,p101,mc,m3, vdat4,vdat0,vdat1,vdat5,vdat14,vdat11, pp100,pp000,pp001,pp101,pmc,pm3); check4pyr(p000,p010,p011,p001,mc,m4, vdat0,vdat2,vdat3,vdat1,vdat14,vdat12, pp000,pp010,pp011,pp001,pmc,pm4); check4pyr(p001,p011,p111,p101,mc,m5, vdat1,vdat3,vdat7,vdat5,vdat14,vdat13, pp001,pp011,pp111,pp101,pmc,pm5); } } } vertex preparevertex(weighted w) { vertex ret; triple normal=O; bool first=true; bucket[] kp1=kps[w.kpa0][w.kpa1][w.kpa2]; bucket[] kp2=kps[w.kpb0][w.kpb1][w.kpb2]; bool notfound1=true; bool notfound2=true; int count=0; int stop=max(kp1.length,kp2.length); for(int r=0; r < stop; ++r) { if(notfound1) { if(length(w.v-kp1[r].v) < eps) { if(first) { ret.v=kp1[r].v; first=false; } normal += kp1[r].val; count += kp1[r].count; notfound1=false; } } if(notfound2) { if(length(w.v-kp2[r].v) < eps) { if(first) { ret.v=kp2[r].v; first=false; } normal += kp2[r].val; count += kp2[r].count; notfound2=false; } } } ret.normal=normal*2/count; return ret; } // Prepare return value. vertex[][] g; for(int q=0; q < objects.length; ++q) { object p=objects[q]; g.push(new vertex[] {preparevertex(p.pts[0]),preparevertex(p.pts[1]), preparevertex(p.pts[2])}); } return g; } // Return contour vertices for a 3D data array on a uniform lattice. // f: three-dimensional arrays of real data values // midpoint: optional array containing estimate of f at midpoint values // a,b: diagonally opposite points of rectangular parellelpiped domain vertex[][] contour3(real[][][] f, real[][][] midpoint=new real[][][], triple a, triple b, projection P=currentprojection) { int nx=f.length-1; if(nx == 0) abort("array f must have length >= 2"); int ny=f[0].length-1; if(ny == 0) abort("array f[0] must have length >= 2"); int nz=f[0][0].length-1; if(nz == 0) abort("array f[0][0] must have length >= 2"); triple[][][] v=new triple[nx+1][ny+1][nz+1]; for(int i=0; i <= nx; ++i) { real xi=interp(a.x,b.x,i/nx); triple[][] vi=v[i]; for(int j=0; j <= ny; ++j) { triple[] vij=v[i][j]; real yj=interp(a.y,b.y,j/ny); for(int k=0; k <= nz; ++k) { vij[k]=(xi,yj,interp(a.z,b.z,k/nz)); } } } return contour3(v,f,midpoint,P); } // Return contour vertices for a 3D data array, using a pyramid mesh // f: real-valued function of three real variables // a,b: diagonally opposite points of rectangular parellelpiped domain // nx,ny,nz number of subdivisions in x, y, and z directions vertex[][] contour3(real f(real, real, real), triple a, triple b, int nx=nmesh, int ny=nx, int nz=nx, projection P=currentprojection) { // evaluate function at points and midpoints real[][][] dat=new real[nx+1][ny+1][nz+1]; real[][][] midpoint=new real[2nx+2][2ny+2][2nz+1]; for(int i=0; i <= nx; ++i) { real x=interp(a.x,b.x,i/nx); real x2=interp(a.x,b.x,(i+0.5)/nx); real[][] dati=dat[i]; real[][] midpointi2=midpoint[2i]; real[][] midpointi2p1=midpoint[2i+1]; for(int j=0; j <= ny; ++j) { real y=interp(a.y,b.y,j/ny); real y2=interp(a.y,b.y,(j+0.5)/ny); real datij[]=dati[j]; real[] midpointi2p1j2=midpointi2p1[2j]; real[] midpointi2p1j2p1=midpointi2p1[2j+1]; real[] midpointi2j2p1=midpointi2[2j+1]; for(int k=0; k <= nz; ++k) { real z=interp(a.z,b.z,k/nz); real z2=interp(a.z,b.z,(k+0.5)/nz); datij[k]=f(x,y,z); if(i == nx || j == ny || k == nz) continue; int k2p1=2k+1; midpointi2p1j2p1[2k]=f(x2,y2,z); midpointi2p1j2p1[k2p1]=f(x2,y2,z2); midpointi2p1j2[k2p1]=f(x2,y,z2); midpointi2j2p1[k2p1]=f(x,y2,z2); if(i == 0) midpoint[2nx][2j+1][k2p1]=f(b.x,y2,z2); if(j == 0) midpointi2p1[2ny][k2p1]=f(x2,b.y,z2); if(k == 0) midpointi2p1j2p1[2nz]=f(x2,y2,b.z); } } } return contour3(dat,midpoint,a,b,P); } // Construct contour surface for a 3D data array, using a pyramid mesh. surface surface(vertex[][] g) { surface s=surface(g.length); for(int i=0; i < g.length; ++i) { vertex[] cur=g[i]; s.s[i]=patch(cur[0].v--cur[1].v--cur[2].v--cycle); } return s; } ./asymptote-2.41/base/plain_scaling.asy0000644000175000017500000001260213064427076017777 0ustar norbertnorbertreal expansionfactor=sqrt(2); // A coordinate in "flex space." A linear combination of user and true-size // coordinates. struct coord { real user,truesize; // Build a coord. static coord build(real user, real truesize) { coord c=new coord; c.user=user; c.truesize=truesize; return c; } // Deep copy of coordinate. Users may add coords to the picture, but then // modify the struct. To prevent this from yielding unexpected results, deep // copying is used. coord copy() { return build(user, truesize); } void clip(real min, real max) { user=min(max(user,min),max); truesize=0; } } bool operator <= (coord a, coord b) { return a.user <= b.user && a.truesize <= b.truesize; } bool operator >= (coord a, coord b) { return a.user >= b.user && a.truesize >= b.truesize; } // Find the maximal elements of the input array, using the partial ordering // given. coord[] maxcoords(coord[] in, bool operator <= (coord,coord)) { // As operator <= is defined in the parameter list, it has a special // meaning in the body of the function. coord best; coord[] c; int n=in.length; if(n == 0) return c; int first=0; // Add the first coord without checking restrictions (as there are none). best=in[first]; c.push(best); static int NONE=-1; int dominator(coord x) { // This assumes it has already been checked against the best. for(int i=1; i < c.length; ++i) if(x <= c[i]) return i; return NONE; } void promote(int i) { // Swap with the top coord x=c[i]; c[i]=best; best=c[0]=x; } void addmaximal(coord x) { coord[] newc; // Check if it beats any others. for(int i=0; i < c.length; ++i) { coord y=c[i]; if(!(y <= x)) newc.push(y); } newc.push(x); c=newc; best=c[0]; } void add(coord x) { if(x <= best) return; else { int i=dominator(x); if(i == NONE) addmaximal(x); else promote(i); } } for(int i=1; i < n; ++i) add(in[i]); return c; } struct coords2 { coord[] x,y; void erase() { x.delete(); y.delete(); } // Only a shallow copy of the individual elements of x and y // is needed since, once entered, they are never modified. coords2 copy() { coords2 c=new coords2; c.x=copy(x); c.y=copy(y); return c; } void append(coords2 c) { x.append(c.x); y.append(c.y); } void push(pair user, pair truesize) { x.push(coord.build(user.x,truesize.x)); y.push(coord.build(user.y,truesize.y)); } void push(coord cx, coord cy) { x.push(cx); y.push(cy); } void push(transform t, coords2 c1, coords2 c2) { for(int i=0; i < c1.x.length; ++i) { coord cx=c1.x[i], cy=c2.y[i]; pair tinf=shiftless(t)*(0,0); pair z=t*(cx.user,cy.user); pair w=(cx.truesize,cy.truesize); w=length(w)*unit(shiftless(t)*w); coord Cx,Cy; Cx.user=z.x; Cy.user=z.y; Cx.truesize=w.x; Cy.truesize=w.y; push(Cx,Cy); } } void xclip(real min, real max) { for(int i=0; i < x.length; ++i) x[i].clip(min,max); } void yclip(real min, real max) { for(int i=0; i < y.length; ++i) y[i].clip(min,max); } } // The scaling in one dimension: x --> a*x + b struct scaling { real a,b; static scaling build(real a, real b) { scaling s=new scaling; s.a=a; s.b=b; return s; } real scale(real x) { return a*x+b; } real scale(coord c) { return scale(c.user) + c.truesize; } } // Calculate the minimum point in scaling the coords. real min(real m, scaling s, coord[] c) { for(int i=0; i < c.length; ++i) if(s.scale(c[i]) < m) m=s.scale(c[i]); return m; } // Calculate the maximum point in scaling the coords. real max(real M, scaling s, coord[] c) { for(int i=0; i < c.length; ++i) if(s.scale(c[i]) > M) M=s.scale(c[i]); return M; } // Calculate the sizing constants for the given array and maximum size. real calculateScaling(string dir, coord[] m, coord[] M, real size, bool warn=true) { access simplex; simplex.problem p=new simplex.problem; void addMinCoord(coord c) { // (a*user + b) + truesize >= 0: p.addRestriction(c.user,1,c.truesize); } void addMaxCoord(coord c) { // (a*user + b) + truesize <= size: p.addRestriction(-c.user,-1,size-c.truesize); } for (int i=0; i < m.length; ++i) addMinCoord(m[i]); for (int i=0; i < M.length; ++i) addMaxCoord(M[i]); int status=p.optimize(); if(status == simplex.problem.OPTIMAL) { // TODO: Could just be return a; return scaling.build(p.a(),p.b()).a; } else if(status == simplex.problem.UNBOUNDED) { if(warn) warning("unbounded",dir+" scaling in picture unbounded"); return 0; } else { if(!warn) return 1; bool userzero(coord[] coords) { for(var coord : coords) if(coord.user != 0) return false; return true; } if((userzero(m) && userzero(M)) || size >= infinity) return 1; warning("cannotfit","cannot fit picture to "+dir+"size "+(string) size +"...enlarging..."); return calculateScaling(dir,m,M,expansionfactor*size,warn); } } real calculateScaling(string dir, coord[] coords, real size, bool warn=true) { coord[] m=maxcoords(coords,operator >=); coord[] M=maxcoords(coords,operator <=); return calculateScaling(dir, m, M, size, warn); } ./asymptote-2.41/base/babel.asy0000644000175000017500000000006313064427076016237 0ustar norbertnorbertvoid babel(string s) { usepackage("babel",s); } ./asymptote-2.41/base/slide.asy0000644000175000017500000003712613064427076016304 0ustar norbertnorbertimport fontsize; usepackage("asycolors"); bool reverse=false; // Set to true to enable reverse video. bool stepping=false; // Set to true to enable stepping. bool itemstep=true; // Set to false to disable stepping on each item. settings.toolbar=false; // Disable 3D toolbar by default. if(settings.render < 0) settings.render=4; bool allowstepping=false; // Allow stepping for current slide. real pagemargin=0.5cm; real pagewidth=-2pagemargin; real pageheight=-2pagemargin; bool landscape=orientation == Landscape || orientation == Seascape; if(landscape) { orientation=Portrait; pagewidth += settings.paperheight; pageheight += settings.paperwidth; } else { pagewidth += settings.paperwidth; pageheight += settings.paperheight; } size(pagewidth,pageheight,IgnoreAspect); picture background; real minipagemargin=1inch; real minipagewidth=pagewidth-2minipagemargin; transform tinv=inverse(fixedscaling((-1,-1),(1,1),currentpen)); pen itempen=fontsize(24pt); pen codepen=fontsize(20pt); pen titlepagepen=fontsize(36pt); pen authorpen=fontsize(24pt); pen institutionpen=authorpen; pen datepen=fontsize(18pt); pen urlpen=datepen; real itemskip=0.5; real codeskip=0.25; pair dateskip=(0,0.1); pair urlskip=(0,0.2); pair titlealign=3S; pen titlepen=fontsize(32pt); real titleskip=0.5; string oldbulletcolor; string newbulletcolor="red"; string bullet="{\bulletcolor\textbullet}"; pair pagenumberposition=S+E; pair pagenumberalign=4NW; pen pagenumberpen=fontsize(12); pen steppagenumberpen=colorless(pagenumberpen); real figureborder=0.25cm; pen figuremattpen; pen backgroundcolor; pen foregroundcolor; pair titlepageposition=(-0.8,0.4); pair startposition=(-0.8,0.9); pair currentposition=startposition; string bulletcolor(string color) { return "\def\bulletcolor{"+'\\'+"color{"+color+"}}%"; } int[] firstnode=new int[] {currentpicture.nodes.length}; int[] lastnode; bool firststep=true; int page=0; bool havepagenumber=true; int preamblenodes=2; bool empty() { return currentpicture.nodes.length <= preamblenodes; } void background() { if(!background.empty()) { add(background); layer(); preamblenodes += 2; } } void color(string name, string color) { texpreamble("\def"+'\\'+name+"#1{{\color{"+color+"}#1}}%"); } string texcolor(pen p) { real[] colors=colors(p); string s; if(colors.length > 0) { s="{"+colorspace(p)+"}{"; for(int i=0; i < colors.length-1; ++i) s += format("%.6f",colors[i],"C")+","; s += format("%.6f",colors[colors.length-1],"C")+"}"; } return s; } void setpens(pen red=red, pen blue=blue, pen steppen=red) { itempen=colorless(itempen); codepen=colorless(codepen); pagenumberpen=colorless(pagenumberpen); steppagenumberpen=colorless(steppagenumberpen)+steppen; titlepagepen=colorless(titlepagepen)+red; authorpen=colorless(authorpen)+blue; institutionpen=colorless(institutionpen)+blue; datepen=colorless(datepen); urlpen=colorless(urlpen); } void reversevideo() { backgroundcolor=black; foregroundcolor=white; fill(background,box((-1,-1),(1,1)),backgroundcolor); setpens(mediumred,paleblue,mediumblue); // Work around pdflatex bug, in which white is mapped to black! figuremattpen=pdf() ? cmyk(0,0,0,1/255) : white; color("Red","mediumred"); color("Green","green"); color("Blue","paleblue"); color("Foreground","white"); color("Background","black"); oldbulletcolor="white"; defaultpen(itempen+foregroundcolor); } void normalvideo() { backgroundcolor=invisible; foregroundcolor=black; background=new picture; size(background,currentpicture); setpens(); figuremattpen=invisible; color("Red","red"); color("Green","heavygreen"); color("Blue","blue"); color("Foreground","black"); color("Background","white"); oldbulletcolor="black"; defaultpen(itempen+foregroundcolor); } normalvideo(); texpreamble(bulletcolor(newbulletcolor)); texpreamble("\hyphenpenalty=10000\tolerance=1000"); // Evaluate user command line option. void usersetting() { plain.usersetting(); if(reverse) { // Black background reversevideo(); } else { // White background normalvideo(); } } void numberpage(pen p=pagenumberpen) { if(havepagenumber) { label((string) page,pagenumberposition,pagenumberalign,p); } } void nextpage(pen p=pagenumberpen) { if(!empty()) { numberpage(p); newpage(); } background(); firststep=true; } void newslide(bool stepping=true) { allowstepping=stepping; nextpage(); ++page; havepagenumber=true; currentposition=startposition; firstnode=new int[] {currentpicture.nodes.length}; lastnode.delete(); } bool checkposition() { if(abs(currentposition.x) > 1 || abs(currentposition.y) > 1) { newslide(); return false; } return true; } void erasestep(int erasenode) { if(!stepping || !allowstepping) return; if(!checkposition()) return; lastnode.push(erasenode); nextpage(steppagenumberpen); for(int i=0; i < firstnode.length; ++i) { for(int j=firstnode[i]; j <= lastnode[i]; ++j) { tex(bulletcolor(oldbulletcolor)); currentpicture.add(currentpicture.nodes[j]); } } firstnode.push(currentpicture.nodes.length-1); tex(bulletcolor(newbulletcolor)); } void step() { // Step without erasing anything. erasestep(currentpicture.nodes.length-1); } void incrementposition(pair z) { currentposition += z; } void title(string s, pair position=N, pair align=titlealign, pen p=titlepen, bool newslide=true) { if(newslide) newslide(); checkposition(); frame f; if(s != "") label(f,minipage("\center "+s,minipagewidth),(0,0),align,p); add(f,position,labelmargin(p)*align); currentposition=(currentposition.x,position.y+ (tinv*(min(f)-titleskip*I*lineskip(p)*pt)).y); } void outline(string s="Outline", pair position=N, pair align=titlealign, pen p=titlepen) { newslide(stepping=false); title(s,position,align,p,newslide=false); } void remark(bool center=false, string s, pair align=0, pen p=itempen, real indent=0, bool minipage=true, real skip=itemskip, filltype filltype=NoFill, bool step=false) { checkposition(); if(minipage) s=minipage(s,minipagewidth); pair offset; if(center) { if(align == 0) align=S; offset=(0,currentposition.y); } else { if(align == 0) align=SE; offset=currentposition; } frame f; label(f,s,(indent,0),align,p,filltype); pair m=tinv*min(f); pair M=tinv*min(f); if(abs(offset.x+M.x) > 1) warning("slidetoowide","slide too wide on page "+(string) page+':\n'+ (string) s); if(abs(offset.y+M.y) > 1) { void toohigh() { warning("slidetoohigh","slide too high on page "+(string) page+':\n'+ (string) s); } if(M.y-m.y < 2) { newslide(); offset=(offset.x,currentposition.y); if(offset.y+M.y > 1 || offset.y+m.y < -1) toohigh(); } else toohigh(); } if(step) { if(!firststep) step(); firststep=false; } add(f,offset); incrementposition((0,(tinv*(min(f)-skip*I*lineskip(p)*pt)).y)); } void center(string s, pen p=itempen) { remark("\center "+s,p); } void equation(string s, pen p=itempen) { remark(center=true,"\vbox{$$"+s+"$$}",p,minipage=false,skip=0); } void vbox(string s, pen p=itempen) { remark(center=true,"\vbox{"+s+"}",p,minipage=false,skip=0); } void equations(string s, pen p=itempen) { vbox("\begin{eqnarray*}"+s+"\end{eqnarray*}",p); } void skip(real n=1) { incrementposition((0,(tinv*(-n*itemskip*I*lineskip(itempen)*pt)).y)); } void display(frame[] f, real margin=0, pair align=S, pen p=itempen, pen figuremattpen=figuremattpen, bool final=true) { if(f.length == 0) return; real[] width=new real[f.length]; real sum; for(int i=0; i < f.length; ++i) { width[i]=size(f[i]).x; sum += width[i]; } if(sum > pagewidth) warning("toowide","slide too wide on page "+(string) page); else margin=(pagewidth-sum)/(f.length+1); real pos; frame F; for(int i=0; i < f.length; ++i) { real w=0.5*(margin+width[i]); pos += w; add(F,f[i],(pos,0),Fill(figureborder,figuremattpen)); pos += w; } add(F,(0,currentposition.y),align); if (final) { real a=0.5(unit(align).y-1); incrementposition( (0, (tinv*(a*(max(F)-min(F))-itemskip*I*lineskip(p)*pt)).y)); } } void display(frame f, real margin=0, pair align=S, pen p=itempen, pen figuremattpen=figuremattpen, bool final=true) { display(new frame[] {f},margin,align,p,figuremattpen, final); } void display(string[] s, real margin=0, string[] captions=new string[], string caption="", pair align=S, pen p=itempen, pen figuremattpen=figuremattpen, bool final=true) { frame[] f=new frame[s.length]; frame F; for(int i=0; i < s.length; ++i) { f[i]=newframe; label(f[i],s[i]); add(F,f[i],(0,0)); } real y=point(F,S).y; int stop=min(s.length,captions.length); for(int i=0; i < stop; ++i) { if(captions[i] != "") label(f[i],captions[i],point(f[i],S).x+I*y,S); } display(f,margin,align,p,figuremattpen, final); if(caption != "") center(caption,p); } void display(string s, string caption="", pair align=S, pen p=itempen, pen figuremattpen=figuremattpen, bool final=true) { display(new string[] {s},caption,align,p,figuremattpen, final); } void figure(string[] s, string options="", real margin=0, string[] captions=new string[], string caption="", pair align=S, pen p=itempen, pen figuremattpen=figuremattpen, bool final=true) { string[] S; for(int i=0; i < s.length; ++i) { S[i]=graphic(s[i],options); } display(S,margin,captions,caption,align,itempen,figuremattpen,final); } void figure(string s, string options="", string caption="", pair align=S, pen p=itempen, pen figuremattpen=figuremattpen, bool final=true) { figure(new string[] {s},options,caption,align,p,figuremattpen,final); } void multifigure(string[] slist, string options="", string caption="", pair align=S, pen p=itempen, pen figuremattpen=figuremattpen, bool step=itemstep) { if(step) { int lastnode=currentpicture.nodes.length-1; for (int i=0; i 0 || ysize > 0) ? currentpicture.fit(xsize,ysize) : currentpicture.fit(); currentpicture=currentpictureSave; display(f); } string cropcode(string s) { while(substr(s,0,1) == '\n') s=substr(s,1,length(s)); while(substr(s,length(s)-1,1) == '\n') s=substr(s,0,length(s)-1); return s; } void code(bool center=false, string s, pen p=codepen, real indent=0, real skip=codeskip, filltype filltype=NoFill) { remark(center,"{\tt "+verbatim(cropcode(s))+"}",p,indent,skip,filltype); } void filecode(bool center=false, string s, pen p=codepen, real indent=0, real skip=codeskip, filltype filltype=NoFill) { code(center,file(s),p,indent,skip,filltype); } void asyfigure(string s, string options="", string caption="", pair align=S, pen p=codepen, pen figuremattpen=figuremattpen, filltype filltype=NoFill, bool newslide=false) { string a=s+".asy"; asy(nativeformat(),s); s += "."+nativeformat(); if(newslide && !empty()) { newslide(); currentposition=(currentposition.x,0); align=0; } figure(s,options,caption,align,p,figuremattpen); } string asywrite(string s, string preamble="") { static int count=0; string name=outprefix()+"_slide"+(string) count; ++count; file temp=output(name+".asy"); write(temp,preamble); write(temp,s); close(temp); codefile.push(name); return name; } void asycode(bool center=false, string s, string options="", string caption="", string preamble="", pair align=S, pen p=codepen, pen figuremattpen=figuremattpen, real indent=0, real skip=codeskip, filltype filltype=NoFill, bool newslide=false) { code(center,s,p,indent,skip,filltype); asyfigure(asywrite(s,preamble),options,caption,align,p,figuremattpen,filltype, newslide); } void asyfilecode(bool center=false, string s, string options="", string caption="", pair align=S, pen p=codepen, pen figuremattpen=figuremattpen, real indent=0, real skip=codeskip, filltype filltype=NoFill, bool newslide=false) { filecode(center,s+".asy",p,indent,skip,filltype); asyfigure(s,options,caption,align,p,figuremattpen,filltype,newslide); } void item(string s, pen p=itempen, bool step=itemstep) { frame b; label(b,bullet,(0,0),p); real bulletwidth=max(b).x-min(b).x; remark(bullet+"\hangindent"+(string) (bulletwidth/pt)+"pt$\,$"+s,p, -bulletwidth,step=step); } void subitem(string s, pen p=itempen) { remark("\quad -- "+s,p); } void titlepage(string title, string author, string institution="", string date="", string url="", bool newslide=false) { newslide(); currentposition=titlepageposition; center(title,titlepagepen); center(author,authorpen); if(institution != "") center(institution,institutionpen); currentposition -= dateskip; if(date != "") center(date,datepen); currentposition -= urlskip; if(url != "") center("{\tt "+url+"}",urlpen); } // Resolve optional bibtex citations: void bibliographystyle(string name) { settings.twice=true; settings.keepaux=true; texpreamble("\bibliographystyle{"+name+"}"); } void bibliography(string name) { numberpage(); havepagenumber=false; string s=texcolor(backgroundcolor); if(s != "") tex("\definecolor{Background}"+s+"\pagecolor{Background}%"); label("",itempen); tex("\eject\def\refname{\fontsize{"+string(fontsize(titlepen))+"}{"+ string(lineskip(titlepen))+"}\selectfont References}%"); real hmargin,vmargin; if(pdf()) { hmargin=1; vmargin=0; } else { hmargin=1.5; vmargin=1; } string s; if(landscape) { s="{\centering\textheight="+string(pageheight-1inch)+"bp\textwidth="+ string(pagewidth-1.5inches)+"bp"+ "\vsize=\textheight\hsize=\textwidth\linewidth=\hsize"+ "\topmargin="+string(vmargin)+"in\oddsidemargin="+string(hmargin)+"in"; } else s="{\centering\textheight="+string(pageheight-0.5inches)+"bp\textwidth="+ string(pagewidth-0.5inches)+ "bp\hsize=\textwidth\linewidth=\textwidth\vsize=\textheight"+ "\topmargin=0.5in\oddsidemargin=1in"; s += "\evensidemargin=\oddsidemargin\bibliography{"+name+"}\eject}"; tex(s); } exitfcn currentexitfunction=atexit(); void exitfunction() { numberpage(); if(currentexitfunction != null) currentexitfunction(); if(!settings.keep) for(int i=0; i < codefile.length; ++i) { string name=codefile[i]; delete(name+"."+nativeformat()); delete(name+"_.aux"); delete(name+".asy"); } codefile=new string[]; } atexit(exitfunction); ./asymptote-2.41/base/nopapersize.ps0000644000175000017500000000004713064427076017361 0ustar norbertnorbert@ a4size 0in 0in @ letterSize 0in 0in ./asymptote-2.41/base/three_tube.asy0000644000175000017500000003035213064427076017324 0ustar norbertnorbertvoid render(path3 s, void f(path3, real), render render=defaultrender) { real granularity=render.tubegranularity; void Split(triple z0, triple c0, triple c1, triple z1, real t0=0, real t1=1, real depth=mantissaBits) { if(depth > 0) { real S=straightness(z0,c0,c1,z1); if(S > 0) { --depth; if(S > max(granularity*max(abs(z0),abs(c0),abs(c1),abs(z1)))) { triple m0=0.5*(z0+c0); triple m1=0.5*(c0+c1); triple m2=0.5*(c1+z1); triple m3=0.5*(m0+m1); triple m4=0.5*(m1+m2); triple m5=0.5*(m3+m4); real tm=0.5*(t0+t1); Split(z0,m0,m3,m5,t0,tm,depth); Split(m5,m4,m2,z1,tm,t1,depth); return; } } } f(z0..controls c0 and c1..z1,t0); } Split(point(s,0),postcontrol(s,0),precontrol(s,1),point(s,1)); } struct rmf { triple p,r,t,s; void operator init(triple p, triple r, triple t) { this.p=p; this.r=r; this.t=t; s=cross(t,r); } } // Rotation minimizing frame // http://www.cs.hku.hk/research/techreps/document/TR-2007-07.pdf rmf[] rmf(path3 g, real[] t) { rmf[] R=new rmf[t.length]; triple d=dir(g,0); R[0]=rmf(point(g,0),perp(d),d); for(int i=1; i < t.length; ++i) { rmf Ri=R[i-1]; real t=t[i]; triple p=point(g,t); triple v1=p-Ri.p; if(v1 != O) { triple r=Ri.r; triple u1=unit(v1); triple ti=Ri.t; triple tp=ti-2*dot(u1,ti)*u1; ti=dir(g,t); triple rp=r-2*dot(u1,r)*u1; triple u2=unit(ti-tp); rp=rp-2*dot(u2,rp)*u2; R[i]=rmf(p,unit(rp),unit(ti)); } else R[i]=R[i-1]; } return R; } private real[][][] bispline0(real[][] z, real[][] p, real[][] q, real[][] r, real[] x, real[] y, bool[][] cond={}) { // z[i][j] is the value at (x[i],y[j]) // p and q are the first derivatives with respect to x and y, respectively // r is the second derivative ddu/dxdy int n=x.length-1; int m=y.length-1; bool all=cond.length == 0; int count; if(all) count=n*m; else { count=0; for(int i=0; i < n; ++i) { bool[] condi=cond[i]; bool[] condp=cond[i+1]; for(int j=0; j < m; ++j) if(all || (condi[j] && condi[j+1] && condp[j] && condp[j+1])) ++count; } } real[][][] s=new real[count][][]; int k=0; for(int i=0; i < n; ++i) { int ip=i+1; real xi=x[i]; real xp=x[ip]; real hx=(xp-xi)/3; real[] zi=z[i]; real[] zp=z[ip]; real[] ri=r[i]; real[] rp=r[ip]; real[] pi=p[i]; real[] pp=p[ip]; real[] qi=q[i]; real[] qp=q[ip]; bool[] condi=all ? null : cond[i]; bool[] condp=all ? null : cond[i+1]; for(int j=0; j < m; ++j) { if(all || (condi[j] && condi[j+1] && condp[j] && condp[j+1])) { real yj=y[j]; int jp=j+1; real yp=y[jp]; real hy=(yp-yj)/3; real hxy=hx*hy; real zij=zi[j]; real zip=zi[jp]; real zpj=zp[j]; real zpp=zp[jp]; real pij=hx*pi[j]; real ppj=hx*pp[j]; real qip=hy*qi[jp]; real qpp=hy*qp[jp]; real zippip=zip+hx*pi[jp]; real zppmppp=zpp-hx*pp[jp]; real zijqij=zij+hy*qi[j]; real zpjqpj=zpj+hy*qp[j]; s[k]=new real[][] {{zij,zijqij,zip-qip,zip}, {zij+pij,zijqij+pij+hxy*ri[j], zippip-qip-hxy*ri[jp],zippip}, {zpj-ppj,zpjqpj-ppj-hxy*rp[j], zppmppp-qpp+hxy*rp[jp],zppmppp}, {zpj,zpjqpj,zpp-qpp,zpp}}; ++k; } } } return s; } // return the surface values described by a real matrix f, interpolated with // xsplinetype and ysplinetype. real[][][] bispline(real[][] f, real[] x, real[] y, splinetype xsplinetype=null, splinetype ysplinetype=xsplinetype, bool[][] cond={}) { real epsilon=sqrtEpsilon*norm(y); if(xsplinetype == null) xsplinetype=(abs(x[0]-x[x.length-1]) <= epsilon) ? periodic : notaknot; if(ysplinetype == null) ysplinetype=(abs(y[0]-y[y.length-1]) <= epsilon) ? periodic : notaknot; int n=x.length; int m=y.length; real[][] ft=transpose(f); real[][] tp=new real[m][]; for(int j=0; j < m; ++j) tp[j]=xsplinetype(x,ft[j]); real[][] q=new real[n][]; for(int i=0; i < n; ++i) q[i]=ysplinetype(y,f[i]); real[][] qt=transpose(q); real[] d1=xsplinetype(x,qt[0]); real[] d2=xsplinetype(x,qt[m-1]); real[][] r=new real[n][]; real[][] p=transpose(tp); for(int i=0; i < n; ++i) r[i]=clamped(d1[i],d2[i])(y,p[i]); return bispline0(f,p,q,r,x,y,cond); } bool uperiodic(real[][] a) { int n=a.length; if(n == 0) return false; int m=a[0].length; real[] a0=a[0]; real[] a1=a[n-1]; for(int j=0; j < m; ++j) { real norm=0; for(int i=0; i < n; ++i) norm=max(norm,abs(a[i][j])); real epsilon=sqrtEpsilon*norm; if(abs(a0[j]-a1[j]) > epsilon) return false; } return true; } bool vperiodic(real[][] a) { int n=a.length; if(n == 0) return false; int m=a[0].length-1; for(int i=0; i < n; ++i) { real[] ai=a[i]; real epsilon=sqrtEpsilon*norm(ai); if(abs(ai[0]-ai[m]) > epsilon) return false; } return true; } // return the surface described by a parametric function f evaluated at u and v // and interpolated with usplinetype and vsplinetype. surface surface(triple f(pair z), real[] u, real[] v, splinetype[] usplinetype, splinetype[] vsplinetype=Spline, bool cond(pair z)=null) { int nu=u.length-1; int nv=v.length-1; real[] ipt=sequence(u.length); real[] jpt=sequence(v.length); real[][] fx=new real[u.length][v.length]; real[][] fy=new real[u.length][v.length]; real[][] fz=new real[u.length][v.length]; bool[][] active; bool all=cond == null; if(!all) active=new bool[u.length][v.length]; for(int i=0; i <= nu; ++i) { real ui=u[i]; real[] fxi=fx[i]; real[] fyi=fy[i]; real[] fzi=fz[i]; bool[] activei=all ? null : active[i]; for(int j=0; j <= nv; ++j) { pair z=(ui,v[j]); if(!all) activei[j]=cond(z); triple f=f(z); fxi[j]=f.x; fyi[j]=f.y; fzi[j]=f.z; } } if(usplinetype.length == 0) { usplinetype=new splinetype[] {uperiodic(fx) ? periodic : notaknot, uperiodic(fy) ? periodic : notaknot, uperiodic(fz) ? periodic : notaknot}; } else if(usplinetype.length != 3) abort("usplinetype must have length 3"); if(vsplinetype.length == 0) { vsplinetype=new splinetype[] {vperiodic(fx) ? periodic : notaknot, vperiodic(fy) ? periodic : notaknot, vperiodic(fz) ? periodic : notaknot}; } else if(vsplinetype.length != 3) abort("vsplinetype must have length 3"); real[][][] sx=bispline(fx,ipt,jpt,usplinetype[0],vsplinetype[0],active); real[][][] sy=bispline(fy,ipt,jpt,usplinetype[1],vsplinetype[1],active); real[][][] sz=bispline(fz,ipt,jpt,usplinetype[2],vsplinetype[2],active); surface s=surface(sx.length); s.index=new int[nu][nv]; int k=-1; for(int i=0; i < nu; ++i) { int[] indexi=s.index[i]; for(int j=0; j < nv; ++j) indexi[j]=++k; } for(int k=0; k < sx.length; ++k) { triple[][] Q=new triple[4][]; real[][] Px=sx[k]; real[][] Py=sy[k]; real[][] Pz=sz[k]; for(int i=0; i < 4 ; ++i) { real[] Pxi=Px[i]; real[] Pyi=Py[i]; real[] Pzi=Pz[i]; Q[i]=new triple[] {(Pxi[0],Pyi[0],Pzi[0]), (Pxi[1],Pyi[1],Pzi[1]), (Pxi[2],Pyi[2],Pzi[2]), (Pxi[3],Pyi[3],Pzi[3])}; } s.s[k]=patch(Q); } if(usplinetype[0] == periodic && usplinetype[1] == periodic && usplinetype[1] == periodic) s.ucyclic(true); if(vsplinetype[0] == periodic && vsplinetype[1] == periodic && vsplinetype[1] == periodic) s.vcyclic(true); return s; } path3 interp(path3 a, path3 b, real t) { int n=size(a); return path3(sequence(new triple(int i) { return interp(precontrol(a,i),precontrol(b,i),t);},n), sequence(new triple(int i) {return interp(point(a,i),point(b,i),t);},n), sequence(new triple(int i) {return interp(postcontrol(a,i), postcontrol(b,i),t);},n), sequence(new bool(int i) {return straight(a,i) && straight(b,i);},n), cyclic(a) && cyclic(b)); } struct tube { surface s; path3 center; // tube axis void Null(transform3) {} void Null(transform3, bool) {} void operator init(path3 p, real width, render render=defaultrender, void cylinder(transform3)=Null, void sphere(transform3, bool half)=Null, void pipe(path3, path3)=null) { real r=0.5*width; void generate(path3 p) { int n=length(p); if(piecewisestraight(p)) { for(int i=0; i < n; ++i) { triple v=point(p,i); triple u=point(p,i+1)-v; transform3 t=shift(v)*align(unit(u))*scale(r,r,abs(u)); s.append(t*unitcylinder); cylinder(t); } center=center&p; } else { real[] T; path3 G; for(int i=0; i < n; ++i) render(subpath(p,i,i+1), new void(path3 g, real s) { G=G&g; T.push(i+s); },render); T.push(n); T.cyclic=cyclic(p); rmf[] rmf=rmf(p,T); triple f(pair t) { rmf R=rmf[round(t.x)]; int n=round(t.y); static real[] x={1,0,-1,0}; static real[] y={0,1,0,-1}; return point(G,t.x)+r*(R.r*x[n]-R.s*y[n]); } static real[] v={0,1,2,3,0}; static real[] circular(real[] x, real[] y) { static real a=8/3*(sqrt(2)-1); return a*periodic(x,y); } static splinetype[] Monotonic={monotonic,monotonic,monotonic}; static splinetype[] Circular={circular,circular,circular}; if(T.length > 0) { surface S=surface(f,sequence(T.length),v,Monotonic,Circular); s.append(S); // Compute center of tube: int n=S.index.length; if(T.cyclic) --n; triple[] pre=new triple[n+1]; triple[] point=new triple[n+1]; triple[] post=new triple[n+1]; int[] index=S.index[0]; triple Point; for(int m=0; m < 4; ++m) Point += S.s[index[m]].P[0][0]; pre[0]=point[0]=0.25*Point; for(int i=0; i < n; ++i) { index=S.index[i]; triple Pre,Point,Post; for(int m=0; m < 4; ++m) { triple [][] P=S.s[index[m]].P; Post += P[1][0]; Pre += P[2][0]; Point += P[3][0]; } post[i]=0.25*Post; pre[i+1]=0.25*Pre; point[i+1]=0.25*Point; } index=S.index[n-1]; triple Post; for(int m=0; m < 4; ++m) Post += S.s[index[m]].P[3][0]; post[n]=0.25*Post; bool[] b=array(n+1,false); path3 Center=path3(pre,point,post,b,T.cyclic); center=center&Center; if(pipe != null) { // Compute path along tube triple[] pre=new triple[n+1]; triple[] point=new triple[n+1]; triple[] post=new triple[n+1]; pre[0]=point[0]=S.s[S.index[0][0]].P[0][0]; for(int i=0; i < n; ++i) { triple [][] P=S.s[S.index[i][0]].P; post[i]=P[1][0]; pre[i+1]=P[2][0]; point[i+1]=P[3][0]; } post[n]=S.s[S.index[n-1][0]].P[3][0]; pipe(Center,path3(pre,point,post,b,T.cyclic)); } } } } transform3 t=scale3(r); bool cyclic=cyclic(p); int begin=0; int n=length(p); for(int i=cyclic ? 0 : 1; i < n; ++i) if(abs(dir(p,i,1)-dir(p,i,-1)) > sqrtEpsilon) { generate(subpath(p,begin,i)); triple dir=dir(p,i,-1); transform3 T=t*align(dir); s.append(shift(point(p,i))*T*(dir != O ? unithemisphere : unitsphere)); sphere(shift(point(center,length(center)))*T, half=straight(p,i-1) && straight(p,i)); begin=i; } generate(subpath(p,begin,n)); } } ./asymptote-2.41/base/unicode.asy0000644000175000017500000000006313064427076016620 0ustar norbertnorbertusepackage("ucs"); usepackage("inputenc","utf8x"); ./asymptote-2.41/base/obj.asy0000644000175000017500000000631713064427076015754 0ustar norbertnorbert// A module for reading simple obj files with groups. // Authors: Jens Schwaiger and John Bowman // // Here simple means that : // // 1) all vertex statements should come before the face statements; // // 2) face informations with respect to texture and/or normal vectors are // ignored; // // 3) face statements only contain positive numbers(no relative positions). // // The reading process only takes into account lines starting with "v" or // "f" or "g"(group). import three; struct obj { surface s; material[] surfacepen; pen[] meshpen; path3[][] read(string datafile, bool verbose=false) { file in=input(datafile).word().line(); triple[] vert; path3[][] g; g[0]=new path3[] ; string[] G; void Vertex(real x,real y ,real z) {vert.push((x,y,z));} void Face(int[] vertnr, int groupnr) { guide3 gh; for(int i=0; i < vertnr.length; ++i) gh=gh--vert[vertnr[i]-1]; gh=gh--cycle; g[groupnr].push(gh); } if(verbose) write("Reading data from "+datafile+"."); int groupnr; while(true) { string[] str=in; if(str.length == 0) break; str=sequence(new string(int i) {return split(str[i],"/")[0];},str.length); if(str[0] == "g" && str.length > 1) { int tst=find(G == str[1]); if(tst == -1) { G.push(str[1]); groupnr=G.length-1; g[groupnr]=new path3[] ; } if(tst > -1) groupnr=tst; } if(str[0] == "v") Vertex((real) str[1],(real) str[2],(real) str[3]); if(str[0] == "f") { int[] vertnr; for(int i=1; i < str.length; ++i) vertnr[i-1]=(int) str[i]; Face(vertnr,groupnr); } if(eof(in)) break; } close(in); if(verbose) { write("Number of groups: ",G.length); write("Groups and their names:"); write(G); write("Reading done."); write("Number of faces contained in the groups: "); for(int j=0; j < G.length; ++j) write(G[j],": ",(string) g[j].length); } return g; } void operator init(path3[][] g, material[] surfacepen, pen[] meshpen) { for(int i=0; i < g.length; ++i) { path3[] gi=g[i]; for(int j=0; j < gi.length; ++j) { // Treat all faces as planar to avoid subdivision cracks. surface sij=surface(gi[j],planar=true); s.append(sij); this.surfacepen.append(array(sij.s.length,surfacepen[i])); this.meshpen.append(array(sij.s.length,meshpen[i])); } } } void operator init(string datafile, bool verbose=false, material[] surfacepen, pen[] meshpen=nullpens) { operator init(read(datafile,verbose),surfacepen,meshpen); } void operator init(string datafile, bool verbose=false, material surfacepen, pen meshpen=nullpen) { material[] surfacepen={surfacepen}; pen[] meshpen={meshpen}; surfacepen.cyclic=true; meshpen.cyclic=true; operator init(read(datafile,verbose),surfacepen,meshpen); } } obj operator * (transform3 T, obj o) { obj ot; ot.s=T*o.s; ot.surfacepen=copy(o.surfacepen); ot.meshpen=copy(o.meshpen); return ot; } void draw(picture pic=currentpicture, obj o, light light=currentlight) { draw(pic,o.s,o.surfacepen,o.meshpen,light); } ./asymptote-2.41/base/asy_filetype.vim0000644000175000017500000000014313064427076017665 0ustar norbertnorbert" Vim filetype detection file " Language: Asymptote au BufNewFile,BufRead *.asy setfiletype asy ./asymptote-2.41/base/feynman.asy0000644000175000017500000005172313064427076016640 0ustar norbertnorbert/***************************************************************************** * feynman.asy -- An Asymptote library for drawing Feynman diagrams. * * * * by: Martin Wiebusch * * last change: 2007/04/13 * *****************************************************************************/ /* default parameters ********************************************************/ // default ratio of width (distance between two loops) to amplitude for a gluon // line. The gluon function uses this ratio, if the width parameter is // negative. real gluonratio; // default ratio of width (distance between two crests) to amplitude for a // photon line. The photon function uses this ratio, if the width parameter is // negative. real photonratio; // default gluon amplitude real gluonamplitude; // default photon amplitude real photonamplitude; // default pen for drawing the background. Usually white. pen backgroundpen; // default pen for drawing gluon lines pen gluonpen; // default pen for drawing photon lines pen photonpen; // default pen for drawing fermion lines pen fermionpen; // default pen for drawing scalar lines pen scalarpen; // default pen for drawing ghost lines pen ghostpen; // default pen for drawing double lines pen doublelinepen; // default pen for drawing vertices pen vertexpen; // default pen for drawing big vertices (drawVertexOX and drawVertexBoxX) pen bigvertexpen; // inner spacing of a double line real doublelinespacing; // default arrow for propagators arrowbar currentarrow; // if true, each of the drawSomething commands blots out the background // (with pen backgroundpen) before drawing. bool overpaint; // margin around lines. If one line is drawn over anoter, a white margin // of size linemargin is kept around the top one. real linemargin; // at vertices, where many lines join, the last line drawn should not blot // out the others. By not erasing the background near the ends of lines, // this is prevented for lines with an angle greater than minvertexangle to // each other. Note, that small values for minvertexangle mean that the // background is only erased behind a small segment of every line. Setting // minvertexangle = 0 effectively disables background erasing for lines. real minvertexangle; // size (radius) of vertices real vertexsize; // size (radius) of big vertices (drawVertexOX and drawVertexBoxX) real bigvertexsize; /* defaults for momentum arrows **********************************************/ // (momentum arrows are small arrows parallel to particle lines indicating the // direction of momentum) // default size of the arrowhead of momentum arrows arrowbar currentmomarrow; // default length of momentum arrows real momarrowlength; // default pen for momentum arrows pen momarrowpen; // default offset between momentum arrow and related particle line real momarrowoffset; // default margin for momentum arrows real momarrowmargin; // factor for determining the size of momentum arrowheads. After changing it, // you still have to update currentmomarrow manually. real momarrowfactor; // size function for momentum arrowheads real momarrowsize(pen p=momarrowpen) { return momarrowfactor*linewidth(p); } /* defaults for texshipout ***************************************************/ // tex command for including graphics. It takes one argument, which is the // name of the graphics (eps or pdf) file. string includegraphicscommand; // Determines whether the suffix (.eps or .pdf) should be appended to the stem // of the file name in the \includegraphics command. bool appendsuffix; /* helper functions **********************************************************/ // internal function for overpainting private void do_overpaint(picture pic, path p, pen bgpen, real halfwidth, real vertexangle) { real tanvertexangle = tan(vertexangle*pi/180); if(tanvertexangle != 0) { real t1 = arctime(p, halfwidth/tanvertexangle+halfwidth); real t2 = arctime(p, arclength(p)-halfwidth/tanvertexangle-halfwidth); draw(pic, subpath(p, t1, t2), bgpen+linewidth(2*halfwidth)); } } // returns the path of a gluon line along path p, with amplitude amp and width // width (distance between two loops). If width is negative, the width is // set to amp*gluonratio path gluon(path p, real amp = gluonamplitude, real width=-1) { if(width < 0) width = abs(gluonratio*amp); real pathlen = arclength(p); int ncurls = floor(pathlen/width); real firstlen = (pathlen - width*(ncurls-1))/2; real firstt = arctime(p, firstlen); pair firstv = dir(p, firstt); guide g = point(p, 0)..{firstv}( point(p, firstt) +amp*unit(rotate(90)*firstv)); real t1; pair v1; real t2; pair v2; pathlen -= firstlen; for(real len = firstlen+width/2; len < pathlen; len += width) { t1 = arctime(p, len); v1 = dir(p, t1); t2 = arctime(p, len + width/2); v2 = dir(p, t2); g=g..{-v1}(point(p, t1)+amp*unit(rotate(-90)*v1)) ..{+v2}(point(p, t2)+amp*unit(rotate(+90)*v2)); } g = g..point(p, size(p)); return g; } // returns the path of a photon line along path p, with amplitude amp and width // width (distance between two crests). If width is negative, the width is // set to amp*photonratio path photon(path p, real amp = photonamplitude, real width=-1) { if(width < 0) width = abs(photonratio*amp)/2; else width = width/2; real pathlen = arclength(p); int ncurls = floor(pathlen/width); real firstlen = (pathlen - width*ncurls)/2; real firstt = arctime(p, firstlen+width); guide g = point(p, 0){unit(point(p, firstt)-point(p, 0))}; real t; pair v; pathlen -= firstlen; for(real len = firstlen+width; len < pathlen; len += width) { t = arctime(p, len); v = dir(p, t); g=g..{v}(point(p, t)+amp*unit(rotate(90)*v)); amp = -amp; } g = g..{unit(point(p, size(p))-point(p, t))}point(p, size(p)); return g; } // returns the path of a momentum arrow along path p, with length length, // an offset offset from the path p and at position position. position will // usually be one of the predefined pairs left or right. Making adjust // nonzero shifts the momentum arrow along the path. path momArrowPath(path p, align align, position pos, real offset = momarrowoffset, real length = momarrowlength) { real pathlen = arclength(p); real t1, t2; if(pos.relative) { t1 = arctime(p, (pathlen-length)*pos.position.x); t2 = arctime(p, (pathlen-length)*pos.position.x+length); } else { t1 = arctime(p, (pathlen-length)/2 + pos.position.x); t2 = arctime(p, (pathlen+length)/2+ pos.position.x); } pair v1 = dir(p, t1); pair v2 = dir(p, t2); pair p1, p2; if(align.relative) { p1 = point(p, t1) + offset*abs(align.dir) *unit(rotate(degrees(align.dir)-90)*v1); p2 = point(p, t2) + offset*abs(align.dir) *unit(rotate(degrees(align.dir)-90)*v2); } else { p1 = point(p, t1) + offset*align.dir; p2 = point(p, t2) + offset*align.dir; } return p1{v1}..{v2}p2; } /* drawing functions *********************************************************/ // draw a gluon line on picture pic, along path p, with amplitude amp, width // width (distance between loops) and with pen fgpen. If erasebg is true, // bgpen is used to erase the background behind the line and at a margin // margin around it. The background is not erased at a certain distance to // the endpoints, which is determined by vertexangle (see comments to the // default parameter minvertexangle). For negative values of width, the width // is set to gluonratio*amp. void drawGluon(picture pic = currentpicture, path p, real amp = gluonamplitude, real width = -1, pen fgpen = gluonpen, bool erasebg = overpaint, pen bgpen = backgroundpen, real vertexangle = minvertexangle, real margin = linemargin) { if(width < 0) width = abs(2*amp); if(erasebg) do_overpaint(pic, p, bgpen, amp+margin, vertexangle); draw(pic, gluon(p, amp, width), fgpen); } // draw a photon line on picture pic, along path p, with amplitude amp, width // width (distance between loops) and with pen fgpen. If erasebg is true, // bgpen is used to erase the background behind the line and at a margin // margin around it. The background is not erased at a certain distance to // the endpoints, which is determined by vertexangle (see comments to the // default parameter minvertexangle). For negative values of width, the width // is set to photonratio*amp. void drawPhoton(picture pic = currentpicture, path p, real amp = photonamplitude, real width = -1, pen fgpen = currentpen, bool erasebg = overpaint, pen bgpen = backgroundpen, real vertexangle = minvertexangle, real margin = linemargin) { if(width < 0) width = abs(4*amp); if(erasebg) do_overpaint(pic, p, bgpen, amp+margin, vertexangle); draw(pic, photon(p, amp, width), fgpen); } // draw a fermion line on picture pic, along path p with pen fgpen and an // arrowhead arrow. If erasebg is true, bgpen is used to erase the background // at a margin margin around the line. The background is not erased at a // certain distance to the endpoints, which is determined by vertexangle // (see comments to the default parameter minvertexangle). void drawFermion(picture pic = currentpicture, path p, pen fgpen = currentpen, arrowbar arrow = currentarrow, bool erasebg = overpaint, pen bgpen = backgroundpen, real vertexangle = minvertexangle, real margin = linemargin) { if(erasebg) do_overpaint(pic, p, bgpen, linewidth(fgpen)+margin, vertexangle); draw(pic, p, fgpen, arrow); } // draw a scalar line on picture pic, along path p with pen fgpen and an // arrowhead arrow. If erasebg is true, bgpen is used to erase the background // at a margin margin around the line. The background is not erased at a // certain distance to the endpoints, which is determined by vertexangle // (see comments to the default parameter minvertexangle). void drawScalar(picture pic = currentpicture, path p, pen fgpen = scalarpen, arrowbar arrow = currentarrow, bool erasebg = overpaint, pen bgpen = backgroundpen, real vertexangle = minvertexangle, real margin = linemargin) { if(erasebg) do_overpaint(pic, p, bgpen, linewidth(fgpen)+margin, vertexangle); draw(pic, p, fgpen, arrow); } // draw a ghost line on picture pic, along path p with pen fgpen and an // arrowhead arrow. If erasebg is true, bgpen is used to erase the background // at a margin margin around the line. The background is not erased at a // certain distance to the endpoints, which is determined by vertexangle // (see comments to the default parameter minvertexangle). void drawGhost(picture pic = currentpicture, path p, pen fgpen = ghostpen, arrowbar arrow = currentarrow, bool erasebg = overpaint, pen bgpen = backgroundpen, real vertexangle = minvertexangle, real margin = linemargin) { if(erasebg) do_overpaint(pic, p, bgpen, linewidth(fgpen)+margin, vertexangle); draw(pic, p, fgpen, arrow); } // draw a double line on picture pic, along path p with pen fgpen, an inner // spacing of dlspacint and an arrowhead arrow. If erasebg is true, bgpen is // used to erase the background at a margin margin around the line. The // background is not erased at a certain distance to the endpoints, which is // determined by vertexangle (see comments to the default parameter // minvertexangle). void drawDoubleLine(picture pic = currentpicture, path p, pen fgpen = doublelinepen, real dlspacing = doublelinespacing, arrowbar arrow = currentarrow, bool erasebg = overpaint, pen bgpen = backgroundpen, real vertexangle = minvertexangle, real margin = linemargin) { if(erasebg) do_overpaint(pic, p, bgpen, linewidth(fgpen)+margin, vertexangle); real htw = linewidth(fgpen)+dlspacing/2; draw(pic, p, fgpen+2*htw); draw(pic, p, bgpen+(linewidth(dlspacing))); path rect = (-htw,-htw)--(-htw,htw)--(0,htw)--(0,-htw)--cycle; fill(shift(point(p,0))*rotate(degrees(dir(p,0)))*rect, bgpen); fill(shift(point(p,size(p)))*scale(-1)*rotate(degrees(dir(p,size(p))))* rect,bgpen); draw(pic, p, invisible, arrow); } // draw a vertex dot on picture pic, at position xy with radius r and pen // fgpen void drawVertex(picture pic = currentpicture, pair xy, real r = vertexsize, pen fgpen = vertexpen) { fill(pic, circle(xy, r), fgpen); } // draw an empty vertex dot on picture pic, at position xy with radius r // and pen fgpen. If erasebg is true, the background is erased in the inside // of the circle. void drawVertexO(picture pic = currentpicture, pair xy, real r = vertexsize, pen fgpen = vertexpen, bool erasebg = overpaint, pen bgpen = backgroundpen) { if(erasebg) filldraw(pic, circle(xy, r), bgpen, fgpen); else draw(pic, circle(xy, r), fgpen); } // draw a vertex triangle on picture pic, at position xy with radius r and pen // fgpen void drawVertexTriangle(picture pic = currentpicture, pair xy, real r = vertexsize, pen fgpen = vertexpen) { real cospi6 = cos(pi/6); real sinpi6 = sin(pi/6); path triangle = (cospi6,-sinpi6)--(0,1)--(-cospi6,-sinpi6)--cycle; fill(pic, shift(xy)*scale(r)*triangle, fgpen); } // draw an empty vertex triangle on picture pic, at position xy with size r // and pen fgpen. If erasebg is true, the background is erased in the inside // of the triangle. void drawVertexTriangleO(picture pic = currentpicture, pair xy, real r = vertexsize, pen fgpen = vertexpen, bool erasebg = overpaint, pen bgpen = backgroundpen) { real cospi6 = cos(pi/6); real sinpi6 = sin(pi/6); path triangle = (cospi6,-sinpi6)--(0,1)--(-cospi6,-sinpi6)--cycle; if(erasebg) filldraw(pic, shift(xy)*scale(r)*triangle, bgpen, fgpen); else draw(pic, shift(xy)*scale(r)*triangle, fgpen); } // draw a vertex box on picture pic, at position xy with radius r and pen // fgpen void drawVertexBox(picture pic = currentpicture, pair xy, real r = vertexsize, pen fgpen = vertexpen) { path box = (1,1)--(-1,1)--(-1,-1)--(1,-1)--cycle; fill(pic, shift(xy)*scale(r)*box, fgpen); } // draw an empty vertex box on picture pic, at position xy with size r // and pen fgpen. If erasebg is true, the background is erased in the inside // of the box. void drawVertexBoxO(picture pic = currentpicture, pair xy, real r = vertexsize, pen fgpen = vertexpen, bool erasebg = overpaint, pen bgpen = backgroundpen) { path box = (1,1)--(-1,1)--(-1,-1)--(1,-1)--cycle; if(erasebg) filldraw(pic, shift(xy)*scale(r)*box, bgpen, fgpen); else draw(pic, shift(xy)*scale(r)*box, fgpen); } // draw an X on picture pic, at position xy with size r and pen // fgpen void drawVertexX(picture pic = currentpicture, pair xy, real r = vertexsize, pen fgpen = vertexpen) { draw(pic, shift(xy)*scale(r)*((-1,-1)--(1,1)), fgpen); draw(pic, shift(xy)*scale(r)*((1,-1)--(-1,1)), fgpen); } // draw a circle with an X in the middle on picture pic, at position xy with // size r and pen fgpen. If erasebg is true, the background is erased in the // inside of the circle. void drawVertexOX(picture pic = currentpicture, pair xy, real r = bigvertexsize, pen fgpen = vertexpen, bool erasebg = overpaint, pen bgpen = backgroundpen) { if(erasebg) filldraw(pic, circle(xy, r), bgpen, fgpen); else draw(pic, circle(xy, r), fgpen); draw(pic, shift(xy)*scale(r)*(NW--SE), fgpen); draw(pic, shift(xy)*scale(r)*(SW--NE), fgpen); } // draw a box with an X in the middle on picture pic, at position xy with // size r and pen fgpen. If erasebg is true, the background is erased in the // inside of the box. void drawVertexBoxX(picture pic = currentpicture, pair xy, real r = bigvertexsize, pen fgpen = vertexpen, bool erasebg = overpaint, pen bgpen = backgroundpen) { path box = (1,1)--(-1,1)--(-1,-1)--(1,-1)--cycle; box = shift(xy)*scale(r)*box; if(erasebg) filldraw(pic, box, bgpen, fgpen); else draw(pic, box, fgpen); draw(pic, shift(xy)*scale(r)*((-1,-1)--(1,1)), fgpen); draw(pic, shift(xy)*scale(r)*((1,-1)--(-1,1)), fgpen); } // draw a momentum arrow on picture pic, along path p, at position position // (use one of the predefined pairs left or right), with an offset offset // from the path, a length length, a pen fgpen and an arrowhead arrow. Making // adjust nonzero shifts the momentum arrow along the path. If erasebg is true, // the background is erased inside a margin margin around the momentum arrow. // Make sure that offset and margin are chosen in such a way that the momentum // arrow does not overdraw the particle line. void drawMomArrow(picture pic = currentpicture, path p, align align, position pos = MidPoint, real offset = momarrowoffset, real length = momarrowlength, pen fgpen = momarrowpen, arrowbar arrow = currentmomarrow, bool erasebg = overpaint, pen bgpen = backgroundpen, real margin = momarrowmargin) { path momarrow = momArrowPath(p, align, pos, offset, length); if(erasebg) do_overpaint(pic, momarrow, bgpen, linewidth(fgpen)+margin, 90); draw(pic, momarrow, fgpen, arrow); } /* initialisation ************************************************************/ // The function fmdefaults() tries to guess reasonable values for the // default parameters above by looking at the default parameters of plain.asy // (essentially, currentpen, arrowfactor and dotfactor). After customising the // default parameters of plain.asy, you may call fmdefaults to adjust the // parameters of feynman.asy. void fmdefaults() { real arrowsize=arrowsize(currentpen); real linewidth=linewidth(currentpen); gluonratio = 2; photonratio = 4; gluonamplitude = arrowsize/3; photonamplitude = arrowsize/4; backgroundpen = white; gluonpen = currentpen; photonpen = currentpen; fermionpen = currentpen; scalarpen = dashed+linewidth; ghostpen = dotted+linewidth; doublelinepen = currentpen; vertexpen = currentpen; bigvertexpen = currentpen; currentarrow = MidArrow; doublelinespacing = 2*linewidth; linemargin = 0.5*arrowsize; minvertexangle = 30; overpaint = true; vertexsize = 0.5*dotfactor*linewidth; bigvertexsize = 0.4*arrowsize; momarrowfactor = 1.5*arrowfactor; momarrowlength = 2.5*arrowsize; momarrowpen = currentpen+0.5*linewidth; momarrowoffset = 0.8*arrowsize; momarrowmargin = 0.25*arrowsize; currentmomarrow = EndArrow(momarrowsize()); includegraphicscommand = "\includegraphics"; appendsuffix = false; } // We call fmdefaults once, when the module is loaded. fmdefaults(); /* shipout *******************************************************************/ bool YAlign = false; bool XYAlign = true; // texshipout("filename", pic) creates two files: filename.eps holding the // picture pic and filename.tex holding some LaTeX code that includes the // picture from filename.eps and shifts it vertically in such a way that the // point (0,0) lies on the baseline. void texshipout(string stem, picture pic = currentpicture, bool xalign = YAlign) { file tf = output(stem + ".tex"); pair min=pic.min(); real depth = min.y; real xoffset = min.x; if(xalign) { write(tf, "\makebox[0pt][l]{\kern"); write(tf, xoffset); write(tf, "bp\relax"); } write(tf, "\raisebox{"); write(tf, depth); write(tf, "bp}{"+includegraphicscommand+"{"); write(tf, stem); string suffix="."+nativeformat(); if(appendsuffix) write(tf, suffix); write(tf, "}}"); if(xalign) write(tf, "}"); close(tf); shipout(stem+suffix, pic); } ./asymptote-2.41/base/three_arrows.asy0000644000175000017500000005644613064427076017716 0ustar norbertnorbert// A transformation that bends points along a path transform3 bend(path3 g, real t) { triple dir=dir(g,t); triple a=point(g,0), b=postcontrol(g,0); triple c=precontrol(g,1), d=point(g,1); triple dir1=b-a; triple dir2=c-b; triple dir3=d-c; triple u = unit(cross(dir1,dir3)); real eps=1000*realEpsilon; if(abs(u) < eps) { u = unit(cross(dir1,dir2)); if(abs(u) < eps) { u = unit(cross(dir2,dir3)); if(abs(u) < eps) // linear segment: use any direction perpendicular to initial direction u = perp(dir1); } } u = unit(perp(u,dir)); triple w=cross(dir,u); triple q=point(g,t); return new real[][] { {u.x,w.x,dir.x,q.x}, {u.y,w.y,dir.y,q.y}, {u.z,w.z,dir.z,q.z}, {0,0,0,1} }; } // bend a point along a path; assumes that p.z is in [0,scale] triple bend(triple p, path3 g, real scale) { return bend(g,arctime(g,arclength(g)+p.z-scale))*(p.x,p.y,0); } void bend(surface s, path3 g, real L) { for(patch p : s.s) { for(int i=0; i < 4; ++i) { for(int j=0; j < 4; ++j) { p.P[i][j]=bend(p.P[i][j],g,L); } } } } // Refine a noncyclic path3 g so that it approaches its endpoint in // geometrically spaced steps. path3 approach(path3 p, int n, real radix=3) { guide3 G; real L=length(p); real tlast=0; real r=1/radix; for(int i=1; i < n; ++i) { real t=L*(1-r^i); G=G&subpath(p,tlast,t); tlast=t; } return G&subpath(p,tlast,L); } struct arrowhead3 { arrowhead arrowhead2=DefaultHead; real size(pen p)=arrowsize; real arcsize(pen p)=arcarrowsize; real gap=1; real size; bool splitpath=true; surface head(path3 g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, bool forwards=true, projection P=currentprojection); static surface surface(path3 g, position position, real size, path[] h, pen p, filltype filltype, triple normal, projection P) { bool relative=position.relative; real position=position.position.x; if(relative) position=reltime(g,position); path3 r=subpath(g,position,0); path3 s=subpath(r,arctime(r,size),0); if(filltype == null) filltype=FillDraw(p); bool draw=filltype.type != filltype.Fill; triple v=point(s,length(s)); triple N=normal == O ? P.normal : normal; triple w=unit(v-point(s,0)); transform3 t=transform3(w,unit(cross(w,N))); path3[] H=t*path3(h); surface s; real width=linewidth(p); if(filltype != NoFill && filltype.type != filltype.UnFill && filltype.type != filltype.Draw) { triple n=0.5*width*unit(t*Z); s=surface(shift(n)*H,planar=true); s.append(surface(shift(-n)*H,planar=true)); if(!draw) for(path g : h) s.append(shift(-n)*t*extrude(g,width*Z)); } if(draw) for(path3 g : H) s.append(tube(g,width).s); return shift(v)*s; } static path project(path3 g, bool forwards, projection P) { path h=project(forwards ? g : reverse(g),P); return shift(-point(h,length(h)))*h; } static path[] align(path H, path h) { static real fuzz=1000*realEpsilon; real[][] t=intersections(H,h,fuzz*max(abs(max(h)),abs(min(h)))); return t.length >= 2 ? rotate(-degrees(point(H,t[0][0])-point(H,t[1][0]),warn=false))*H : H; } } arrowhead3 DefaultHead3; DefaultHead3.head=new surface(path3 g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, bool forwards=true, projection P=currentprojection) { if(size == 0) size=DefaultHead3.size(p); bool relative=position.relative; real position=position.position.x; if(relative) position=reltime(g,position); path3 r=subpath(g,position,0); path3 s=subpath(r,arctime(r,size),0); int n=length(s); bool straight1=n == 1 && straight(g,0); real aspect=Tan(angle); real width=size*aspect; surface head; if(straight1) { triple v=point(s,0); triple u=point(s,1)-v; return shift(v)*align(unit(u))*scale(width,width,size)*unitsolidcone; } else { real remainL=size; bool first=true; for(int i=0; i < n; ++i) { render(subpath(s,i,i+1),new void(path3 q, real) { if(remainL > 0) { real l=arclength(q); real w=remainL*aspect; surface segment=scale(w,w,l)*unitcylinder; if(first) { // add base first=false; segment.append(scale(w,w,1)*unitdisk); } for(patch p : segment.s) { for(int i=0; i < 4; ++i) { for(int j=0; j < 4; ++j) { real k=1-p.P[i][j].z/remainL; p.P[i][j]=bend((k*p.P[i][j].x,k*p.P[i][j].y,p.P[i][j].z),q,l); } } } head.append(segment); remainL -= l; } }); } } return head; }; arrowhead3 HookHead3(real dir=arrowdir, real barb=arrowbarb) { arrowhead3 a; a.head=new surface(path3 g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, bool forwards=true, projection P=currentprojection) { if(size == 0) size=a.size(p); bool relative=position.relative; real position=position.position.x; if(relative) position=reltime(g,position); path3 r=subpath(g,position,0); path3 s=subpath(r,arctime(r,size),0); bool straight1=length(s) == 1 && straight(g,0); path3 H=path3(HookHead(dir,barb).head((0,0)--(0,size),p,size,angle), YZplane); surface head=surface(O,reverse(approach(subpath(H,1,0),7,1.5))& approach(subpath(H,1,2),4,2),Z); if(straight1) { triple v=point(s,0); triple u=point(s,1)-v; return shift(v)*align(unit(u))*head; } else { bend(head,s,size); return head; } }; a.arrowhead2=HookHead; a.gap=0.7; return a; } arrowhead3 HookHead3=HookHead3(); arrowhead3 TeXHead3; TeXHead3.size=TeXHead.size; TeXHead3.arcsize=TeXHead.size; TeXHead3.arrowhead2=TeXHead; TeXHead3.head=new surface(path3 g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, bool forwards=true, projection P=currentprojection) { real texsize=TeXHead3.size(p); if(size == 0) size=texsize; bool relative=position.relative; real position=position.position.x; if(relative) position=reltime(g,position); path3 r=subpath(g,position,0); path3 s=subpath(r,arctime(r,size),0); bool straight1=length(s) == 1 && straight(g,0); surface head=surface(O,approach(subpath(path3(TeXHead.head((0,0)--(0,1),p, size), YZplane),5,0),8,1.5),Z); if(straight1) { triple v=point(s,0); triple u=point(s,1)-v; return shift(v)*align(unit(u))*head; } else { path3 s=subpath(r,arctime(r,size/texsize*arrowsize(p)),0); bend(head,s,size); return head; } }; path3 arrowbase(path3 r, triple y, real t, real size) { triple perp=2*size*perp(dir(r,t)); return size == 0 ? y : y+perp--y-perp; } arrowhead3 DefaultHead2(triple normal=O) { arrowhead3 a; a.head=new surface(path3 g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, bool forwards=true, projection P=currentprojection) { if(size == 0) size=a.size(p); path h=a.project(g,forwards,P); a.size=min(size,arclength(h)); path[] H=a.align(DefaultHead.head(h,p,size,angle),h); H=forwards ? yscale(-1)*H : H; return a.surface(g,position,size,H,p,filltype,normal,P); }; a.gap=1.005; return a; } arrowhead3 DefaultHead2=DefaultHead2(); arrowhead3 HookHead2(real dir=arrowdir, real barb=arrowbarb, triple normal=O) { arrowhead3 a; a.head=new surface(path3 g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, bool forwards=true, projection P=currentprojection) { if(size == 0) size=a.size(p); path h=a.project(g,forwards,P); a.size=min(size,arclength(h)); path[] H=a.align(HookHead.head(h,p,size,angle),h); H=forwards ? yscale(-1)*H : H; return a.surface(g,position,size,H,p,filltype,normal,P); }; a.arrowhead2=HookHead; a.gap=1.005; return a; } arrowhead3 HookHead2=HookHead2(); arrowhead3 TeXHead2(triple normal=O) { arrowhead3 a; a.head=new surface(path3 g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, bool forwards=true, projection P=currentprojection) { if(size == 0) size=a.size(p); path h=a.project(g,forwards,P); a.size=min(size,arclength(h)); h=rotate(-degrees(dir(h,length(h)),warn=false))*h; path[] H=TeXHead.head(h,p,size,angle); H=forwards ? yscale(-1)*H : H; return a.surface(g,position,size,H,p, filltype == null ? TeXHead.defaultfilltype(p) : filltype, normal,P); }; a.arrowhead2=TeXHead; a.size=TeXHead.size; a.splitpath=false; a.gap=1.005; return a; } arrowhead3 TeXHead2=TeXHead2(); private real position(position position, real size, path3 g, bool center) { bool relative=position.relative; real position=position.position.x; if(relative) { position *= arclength(g); if(center) position += 0.5*size; position=arctime(g,position); } else if(center) position=arctime(g,arclength(subpath(g,0,position))+0.5*size); return position; } void drawarrow(picture pic, arrowhead3 arrowhead=DefaultHead3, path3 g, material p=currentpen, material arrowheadpen=nullpen, real size=0, real angle=arrowangle, position position=EndPoint, filltype filltype=null, bool forwards=true, margin3 margin=NoMargin3, bool center=false, light light=nolight, light arrowheadlight=currentlight, projection P=currentprojection) { pen q=(pen) p; if(filltype != null) { if(arrowheadpen == nullpen && filltype != null) arrowheadpen=filltype.fillpen; if(arrowheadpen == nullpen && filltype != null) arrowheadpen=filltype.drawpen; } if(arrowheadpen == nullpen) arrowheadpen=p; if(size == 0) size=arrowhead.size(q); size=min(arrowsizelimit*arclength(g),size); real position=position(position,size,g,center); g=margin(g,q).g; int L=length(g); if(!forwards) { g=reverse(g); position=L-position; } path3 r=subpath(g,position,0); size=min(arrowsizelimit*arclength(r),size); surface head=arrowhead.head(g,position,q,size,angle,filltype,forwards,P); if(arrowhead.size > 0) size=arrowhead.size; bool endpoint=position > L-sqrtEpsilon; if(arrowhead.splitpath || endpoint) { if(position > 0) { real Size=size*arrowhead.gap; draw(pic,subpath(r,arctime(r,Size),length(r)),p,light); } if(!endpoint) draw(pic,subpath(g,position,L),p,light); } else draw(pic,g,p,light); draw(pic,head,arrowheadpen,arrowheadlight); } void drawarrow2(picture pic, arrowhead3 arrowhead=DefaultHead3, path3 g, material p=currentpen, material arrowheadpen=nullpen, real size=0, real angle=arrowangle, filltype filltype=null, margin3 margin=NoMargin3, light light=nolight, light arrowheadlight=currentlight, projection P=currentprojection) { pen q=(pen) p; if(filltype != null) { if(arrowheadpen == nullpen && filltype != null) arrowheadpen=filltype.fillpen; if(arrowheadpen == nullpen && filltype != null) arrowheadpen=filltype.drawpen; } if(arrowheadpen == nullpen) arrowheadpen=p; if(size == 0) size=arrowhead.size(q); g=margin(g,q).g; size=min(arrow2sizelimit*arclength(g),size); path3 r=reverse(g); int L=length(g); real Size=size*arrowhead.gap; draw(pic,subpath(r,arctime(r,Size),L-arctime(g,Size)),p,light); draw(pic,arrowhead.head(g,L,q,size,angle,filltype,forwards=true,P), arrowheadpen,arrowheadlight); draw(pic,arrowhead.head(r,L,q,size,angle,filltype,forwards=false,P), arrowheadpen,arrowheadlight); } // Add to picture an estimate of the bounding box contribution of arrowhead // using the local slope at endpoint. void addArrow(picture pic, arrowhead3 arrowhead, path3 g, pen p, real size, real angle, filltype filltype, real position) { triple v=point(g,position); path3 g=v-(size+linewidth(p))*dir(g,position)--v; surface s=arrowhead.head(g,position,p,size,angle); if(s.s.length > 0) { pic.addPoint(v,min(s)-v); pic.addPoint(v,max(s)-v); } else pic.addPoint(v); } picture arrow(arrowhead3 arrowhead=DefaultHead3, path3 g, material p=currentpen, material arrowheadpen=p, real size=0, real angle=arrowangle, filltype filltype=null, position position=EndPoint, bool forwards=true, margin3 margin=NoMargin3, bool center=false, light light=nolight, light arrowheadlight=currentlight) { pen q=(pen) p; if(size == 0) size=arrowhead.size(q); picture pic; if(is3D()) pic.add(new void(frame f, transform3 t, picture pic2, projection P) { picture opic; drawarrow(opic,arrowhead,t*g,p,arrowheadpen,size,angle,position, filltype,forwards,margin,center,light,arrowheadlight,P); add(f,opic.fit3(identity4,pic2,P)); }); addPath(pic,g,q); real position=position(position,size,g,center); path3 G; if(!forwards) { G=reverse(g); position=length(g)-position; } else G=g; addArrow(pic,arrowhead,G,q,size,angle,filltype,position); return pic; } picture arrow2(arrowhead3 arrowhead=DefaultHead3, path3 g, material p=currentpen, material arrowheadpen=p, real size=0, real angle=arrowangle, filltype filltype=null, margin3 margin=NoMargin3, light light=nolight, light arrowheadlight=currentlight) { pen q=(pen) p; if(size == 0) size=arrowhead.size(q); picture pic; if(is3D()) pic.add(new void(frame f, transform3 t, picture pic2, projection P) { picture opic; drawarrow2(opic,arrowhead,t*g,p,arrowheadpen,size,angle,filltype, margin,light,arrowheadlight,P); add(f,opic.fit3(identity4,pic2,P)); }); addPath(pic,g,q); int L=length(g); addArrow(pic,arrowhead,g,q,size,angle,filltype,L); addArrow(pic,arrowhead,reverse(g),q,size,angle,filltype,L); return pic; } void add(picture pic, arrowhead3 arrowhead, real size, real angle, filltype filltype, position position, material arrowheadpen, path3 g, material p, bool forwards=true, margin3 margin, bool center=false, light light, light arrowheadlight) { add(pic,arrow(arrowhead,g,p,arrowheadpen,size,angle,filltype,position, forwards,margin,center,light,arrowheadlight)); if(!is3D()) { pic.add(new void(frame f, transform3 t, picture pic, projection P) { if(pic != null) { pen q=(pen) p; path3 G=t*g; marginT3 m=margin(G,q); add(pic,arrow(arrowhead.arrowhead2,project(G,P),q,size,angle, filltype == null ? arrowhead.arrowhead2.defaultfilltype ((pen) arrowheadpen) : filltype,position, forwards,TrueMargin(m.begin,m.end),center)); } },true); } } void add2(picture pic, arrowhead3 arrowhead, real size, real angle, filltype filltype, material arrowheadpen, path3 g, material p, margin3 margin, light light, light arrowheadlight) { add(pic,arrow2(arrowhead,g,p,arrowheadpen,size,angle,filltype,margin,light, arrowheadlight)); if(!is3D()) { pic.add(new void(frame f, transform3 t, picture pic, projection P) { if(pic != null) { pen q=(pen) p; path3 G=t*g; marginT3 m=margin(G,q); add(pic,arrow2(arrowhead.arrowhead2,project(G,P),q,size,angle, filltype == null ? arrowhead.arrowhead2.defaultfilltype ((pen) arrowheadpen) : filltype, TrueMargin(m.begin,m.end))); } },true); } } void bar(picture pic, triple a, triple d, triple perp=O, material p=currentpen, light light=nolight) { d *= 0.5; perp *= 0.5; pic.add(new void(frame f, transform3 t, picture pic2, projection P) { picture opic; triple A=t*a; triple v=d == O ? abs(perp)*unit(cross(P.normal,perp)) : d; draw(opic,A-v--A+v,p,light); add(f,opic.fit3(identity4,pic2,P)); }); triple v=d == O ? cross(currentprojection.normal,perp) : d; pen q=(pen) p; triple m=min3(q); triple M=max3(q); pic.addPoint(a,-v-m); pic.addPoint(a,-v+m); pic.addPoint(a,v-M); pic.addPoint(a,v+M); } picture bar(triple a, triple dir, triple perp=O, material p=currentpen) { picture pic; bar(pic,a,dir,perp,p); return pic; } typedef bool arrowbar3(picture, path3, material, margin3, light, light); bool Blank(picture, path3, material, margin3, light, light) { return false; } bool None(picture, path3, material, margin3, light, light) { return true; } arrowbar3 BeginArrow3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arrowangle, filltype filltype=null, position position=BeginPoint, material arrowheadpen=nullpen) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light arrowheadlight) { add(pic,arrowhead,size,angle,filltype,position,arrowheadpen,g,p, forwards=false,margin,light,arrowheadlight); return false; }; } arrowbar3 Arrow3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arrowangle, filltype filltype=null, position position=EndPoint, material arrowheadpen=nullpen) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light arrowheadlight) { add(pic,arrowhead,size,angle,filltype,position,arrowheadpen,g,p,margin, light,arrowheadlight); return false; }; } arrowbar3 EndArrow3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arrowangle, filltype filltype=null, position position=EndPoint, material arrowheadpen=nullpen)=Arrow3; arrowbar3 MidArrow3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arrowangle, filltype filltype=null, material arrowheadpen=nullpen) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light arrowheadlight) { add(pic,arrowhead,size,angle,filltype,MidPoint, arrowheadpen,g,p,margin,center=true,light,arrowheadlight); return false; }; } arrowbar3 Arrows3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arrowangle, filltype filltype=null, material arrowheadpen=nullpen) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light arrowheadlight) { add2(pic,arrowhead,size,angle,filltype,arrowheadpen,g,p,margin,light, arrowheadlight); return false; }; } arrowbar3 BeginArcArrow3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arcarrowangle, filltype filltype=null, position position=BeginPoint, material arrowheadpen=nullpen) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light arrowheadlight) { real size=size == 0 ? arrowhead.arcsize((pen) p) : size; add(pic,arrowhead,size,angle,filltype,position,arrowheadpen,g,p, forwards=false,margin,light,arrowheadlight); return false; }; } arrowbar3 ArcArrow3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arcarrowangle, filltype filltype=null, position position=EndPoint, material arrowheadpen=nullpen) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light arrowheadlight) { real size=size == 0 ? arrowhead.arcsize((pen) p) : size; add(pic,arrowhead,size,angle,filltype,position,arrowheadpen,g,p,margin, light,arrowheadlight); return false; }; } arrowbar3 EndArcArrow3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arcarrowangle, filltype filltype=null, position position=EndPoint, material arrowheadpen=nullpen)=ArcArrow3; arrowbar3 MidArcArrow3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arcarrowangle, filltype filltype=null, material arrowheadpen=nullpen) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light arrowheadlight) { real size=size == 0 ? arrowhead.arcsize((pen) p) : size; add(pic,arrowhead,size,angle,filltype,MidPoint,arrowheadpen,g,p,margin, center=true,light,arrowheadlight); return false; }; } arrowbar3 ArcArrows3(arrowhead3 arrowhead=DefaultHead3, real size=0, real angle=arcarrowangle, filltype filltype=null, material arrowheadpen=nullpen) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light arrowheadlight) { real size=size == 0 ? arrowhead.arcsize((pen) p) : size; add2(pic,arrowhead,size,angle,filltype,arrowheadpen,g,p,margin,light, arrowheadlight); return false; }; } arrowbar3 BeginBar3(real size=0, triple dir=O) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light) { real size=size == 0 ? barsize((pen) p) : size; bar(pic,point(g,0),size*unit(dir),size*dir(g,0),p,light); return true; }; } arrowbar3 Bar3(real size=0, triple dir=O) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light) { int L=length(g); real size=size == 0 ? barsize((pen) p) : size; bar(pic,point(g,L),size*unit(dir),size*dir(g,L),p,light); return true; }; } arrowbar3 EndBar3(real size=0, triple dir=O)=Bar3; arrowbar3 Bars3(real size=0, triple dir=O) { return new bool(picture pic, path3 g, material p, margin3 margin, light light, light) { real size=size == 0 ? barsize((pen) p) : size; BeginBar3(size,dir)(pic,g,p,margin,light,nolight); EndBar3(size,dir)(pic,g,p,margin,light,nolight); return true; }; } arrowbar3 BeginArrow3=BeginArrow3(), MidArrow3=MidArrow3(), Arrow3=Arrow3(), EndArrow3=Arrow3(), Arrows3=Arrows3(), BeginArcArrow3=BeginArcArrow3(), MidArcArrow3=MidArcArrow3(), ArcArrow3=ArcArrow3(), EndArcArrow3=ArcArrow3(), ArcArrows3=ArcArrows3(), BeginBar3=BeginBar3(), Bar3=Bar3(), EndBar3=Bar3(), Bars3=Bars3(); ./asymptote-2.41/base/grid3.asy0000644000175000017500000003224413064427076016210 0ustar norbertnorbert// grid3.asy // Author: Philippe Ivaldi (Grids in 3D) // http://www.piprime.fr/ // Created: 10 janvier 2007 import graph3; struct grid3 { path3 axea,axeb; bounds bds; triple dir; valuetime vt; ticklocate locate; void create(picture pic, path3 axea, path3 axeb, path3 axelevel, real min, real max, position pos, autoscaleT t) { real position=pos.position.x; triple level; if(pos.relative) { position=reltime(axelevel,position); level=point(axelevel,position)-point(axelevel,0); } else { triple v=unit(point(axelevel,1)-point(axelevel,0)); triple zerolevel=dot(-point(axelevel,0),v)*v; level=zerolevel+position*v; } this.axea=shift(level)*axea; this.axeb=shift(level)*axeb; bds=autoscale(min,max,t.scale); locate=ticklocate(min,max,t,bds.min,bds.max, Dir(point(axeb,0)-point(axea,0))); } }; typedef grid3 grid3routine(picture pic); triple X(picture pic) {return (pic.userMax().x,pic.userMin().y,pic.userMin().z);} triple XY(picture pic) {return (pic.userMax().x,pic.userMax().y,pic.userMin().z);} triple Y(picture pic) {return (pic.userMin().x,pic.userMax().y,pic.userMin().z);} triple YZ(picture pic) {return (pic.userMin().x,pic.userMax().y,pic.userMax().z);} triple Z(picture pic) {return (pic.userMin().x,pic.userMin().y,pic.userMax().z);} triple ZX(picture pic) {return (pic.userMax().x,pic.userMin().y,pic.userMax().z);} grid3routine XYgrid(position pos=Relative(0)) { return new grid3(picture pic) { grid3 og; triple m=pic.userMin(); triple M=pic.userMax(); og.create(pic,m--X(pic),Y(pic)--XY(pic),m--Z(pic), m.x,M.x,pos,pic.scale.x); return og; }; }; grid3routine XYgrid=XYgrid(); grid3routine YXgrid(position pos=Relative(0)) { return new grid3(picture pic) { grid3 og; triple m=pic.userMin(); triple M=pic.userMax(); og.create(pic,m--Y(pic),X(pic)--XY(pic),m--Z(pic), m.y,M.y,pos,pic.scale.y); return og; }; }; grid3routine YXgrid=YXgrid(); grid3routine XZgrid(position pos=Relative(0)) { return new grid3(picture pic) { grid3 og; triple m=pic.userMin(); triple M=pic.userMax(); og.create(pic,m--X(pic),Z(pic)--ZX(pic),m--Y(pic), m.x,M.x,pos,pic.scale.x); return og; }; }; grid3routine XZgrid=XZgrid(); grid3routine ZXgrid(position pos=Relative(0)) { return new grid3(picture pic) { grid3 og; triple m=pic.userMin(); triple M=pic.userMax(); og.create(pic,m--Z(pic),X(pic)--ZX(pic),m--Y(pic), m.z,M.z,pos,pic.scale.z); return og; }; }; grid3routine ZXgrid=ZXgrid(); grid3routine YZgrid(position pos=Relative(0)) { return new grid3(picture pic) { grid3 og; triple m=pic.userMin(); triple M=pic.userMax(); og.create(pic,m--Y(pic),Z(pic)--YZ(pic),m--X(pic), m.y,M.y,pos,pic.scale.y); return og; }; }; grid3routine YZgrid=YZgrid(); grid3routine ZYgrid(position pos=Relative(0)) { return new grid3(picture pic) { grid3 og; triple m=pic.userMin(); triple M=pic.userMax(); og.create(pic,m--Z(pic),Y(pic)--YZ(pic),m--X(pic), m.z,M.z,pos,pic.scale.z); return og; }; }; grid3routine ZYgrid=ZYgrid(); typedef grid3routine grid3routines[] ; grid3routines XYXgrid(position pos=Relative(0)) { grid3routines ogs=new grid3routine[] {XYgrid(pos),YXgrid(pos)}; return ogs; }; grid3routines XYXgrid=XYXgrid(); grid3routines YXYgrid(position pos=Relative(0)) {return XYXgrid(pos);}; grid3routines YXYgrid=XYXgrid(); grid3routines ZXZgrid(position pos=Relative(0)) { grid3routines ogs=new grid3routine[] {ZXgrid(pos),XZgrid(pos)}; return ogs; }; grid3routines ZXZgrid=ZXZgrid(); grid3routines XZXgrid(position pos=Relative(0)) {return ZXZgrid(pos);}; grid3routines XZXgrid=XZXgrid(); grid3routines ZYZgrid(position pos=Relative(0)) { grid3routines ogs=new grid3routine[] {ZYgrid(pos),YZgrid(pos)}; return ogs; }; grid3routines ZYZgrid=ZYZgrid(); grid3routines YZYgrid(position pos=Relative(0)) {return ZYZgrid(pos);}; grid3routines YZYgrid=YZYgrid(); grid3routines XY_XZgrid(position posa=Relative(0), position posb=Relative(0)) { grid3routines ogs=new grid3routine[] {XYgrid(posa),XZgrid(posb)}; return ogs; }; grid3routines XY_XZgrid=XY_XZgrid(); grid3routines YX_YZgrid(position posa=Relative(0), position posb=Relative(0)) { grid3routines ogs=new grid3routine[] {YXgrid(posa),YZgrid(posb)}; return ogs; }; grid3routines YX_YZgrid=YX_YZgrid(); grid3routines ZX_ZYgrid(position posa=Relative(0), position posb=Relative(0)) { grid3routines ogs=new grid3routine[] {ZXgrid(posa),ZYgrid(posb)}; return ogs; }; grid3routines ZX_ZYgrid=ZX_ZYgrid(); typedef grid3routines[] grid3routinetype; grid3routinetype XYZgrid(position pos=Relative(0)) { grid3routinetype ogs=new grid3routines[] {YZYgrid(pos),XYXgrid(pos), XZXgrid(pos)}; return ogs; } grid3routinetype XYZgrid=XYZgrid(); grid3routines operator cast(grid3routine gridroutine) { grid3routines og=new grid3routine[] {gridroutine}; return og; } grid3routinetype operator cast(grid3routines gridroutine) { grid3routinetype og=new grid3routines[] {gridroutine}; return og; } grid3routinetype operator cast(grid3routine gridroutine) { grid3routinetype og=(grid3routinetype)(grid3routines) gridroutine; return og; } void grid3(picture pic=currentpicture, grid3routinetype gridroutine=XYZgrid, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, pen pGrid=grey, pen pgrid=lightgrey, bool above=false) { for(int j=0; j < gridroutine.length; ++j) { grid3routines gridroutinej=gridroutine[j]; for(int i=0; i < gridroutinej.length; ++i) { grid3 gt=gridroutinej[i](pic); pic.add(new void(picture f, transform3 t, transform3 T, triple, triple) { picture d; ticks3 ticks=Ticks3(1,F="%",ticklabel=null, beginlabel=false,endlabel=false, N=N,n=n,Step=Step,step=step, begin=begin,end=end, Size=0,size=0,extend=true, pTick=pGrid,ptick=pgrid); ticks(d,t,"",gt.axea,gt.axeb,nullpen,None,NoMargin3,gt.locate, gt.bds.divisor,opposite=true,primary=false); add(f,t*T*inverse(t)*d); },above=above); addPath(pic,gt.axea,pGrid); addPath(pic,gt.axeb,pGrid); } } } void grid3(picture pic=currentpicture, grid3routinetype gridroutine, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, pen[] pGrid, pen[] pgrid, bool above=false) { if(pGrid.length != gridroutine.length || pgrid.length != gridroutine.length) abort("pen array has different length than grid"); for(int i=0; i < gridroutine.length; ++i) { grid3(pic=pic,gridroutine=gridroutine[i], N=N,n=n,Step=Step,step=step, begin=begin,end=end, pGrid=pGrid[i],pgrid=pgrid[i], above=above); } } position top=Relative(1); position bottom=Relative(0); position middle=Relative(0.5); // Structure used to communicate ticks and axis settings to grid3 routines. struct ticksgridT { ticks3 ticks; // Other arguments of grid3 are define by ticks and axis settings void grid3(picture, bool); }; typedef ticksgridT ticksgrid(); ticksgrid InOutTicks(Label F="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, real Size=0, real size=0, pen pTick=nullpen, pen ptick=nullpen, grid3routinetype gridroutine, pen pGrid=grey, pen pgrid=lightgrey) { return new ticksgridT() { ticksgridT otg; otg.ticks=Ticks3(0,F,ticklabel,beginlabel,endlabel, N,n,Step,step,begin,end, Size,size,false,pTick,ptick); otg.grid3=new void(picture pic, bool above) { grid3(pic,gridroutine,N,n,Step,step,begin,end,pGrid,pgrid,above); }; return otg; }; } ticksgrid InTicks(Label F="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, real Size=0, real size=0, pen pTick=nullpen, pen ptick=nullpen, grid3routinetype gridroutine, pen pGrid=grey, pen pgrid=lightgrey) { return new ticksgridT() { ticksgridT otg; otg.ticks=Ticks3(-1,F,ticklabel,beginlabel,endlabel,N,n,Step,step, begin,end,Size,size,false,pTick,ptick); otg.grid3=new void(picture pic, bool above) { grid3(pic,gridroutine,N,n,Step,step,begin,end,pGrid,pgrid,above); }; return otg; }; } ticksgrid OutTicks(Label F="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, real Size=0, real size=0, pen pTick=nullpen, pen ptick=nullpen, grid3routinetype gridroutine, pen pGrid=grey, pen pgrid=lightgrey) { return new ticksgridT() { ticksgridT otg; otg.ticks=Ticks3(1,F,ticklabel,beginlabel,endlabel,N,n,Step,step, begin,end,Size,size,false,pTick,ptick); otg.grid3=new void(picture pic, bool above) { grid3(pic,gridroutine,N,n,Step,step,begin,end,pGrid,pgrid,above); }; return otg; }; } void xaxis3(picture pic=currentpicture, Label L="", axis axis=YZZero, pen p=currentpen, ticksgrid ticks, arrowbar3 arrow=None, bool above=false) { xaxis3(pic,L,axis,p,ticks().ticks,arrow,above); ticks().grid3(pic,above); } void yaxis3(picture pic=currentpicture, Label L="", axis axis=XZZero, pen p=currentpen, ticksgrid ticks, arrowbar3 arrow=None, bool above=false) { yaxis3(pic,L,axis,p,ticks().ticks,arrow,above); ticks().grid3(pic,above); } void zaxis3(picture pic=currentpicture, Label L="", axis axis=XYZero, pen p=currentpen, ticksgrid ticks, arrowbar3 arrow=None, bool above=false) { zaxis3(pic,L,axis,p,ticks().ticks,arrow,above); ticks().grid3(pic,above); } /* Example: import grid3; size(8cm,0); currentprojection=orthographic(0.5,1,0.5); defaultpen(overwrite(SuppressQuiet)); scale(Linear, Linear, Log); grid3(pic=currentpicture, // picture gridroutine=XYZgrid(// grid3routine // or grid3routine[] (alias grid3routines) // or grid3routines[]: // The routine(s) to draw the grid(s): // *XYgrid: draw grid from X in direction of Y // *YXgrid: draw grid from Y in direction of X, ... // *An array of previous values XYgrid, YXgrid, ... // *XYXgrid: draw XYgrid and YXgrid grids // *YXYgrid: draw XYgrid and YXgrid grids // *ZXZgrid: draw ZXgrid and XZgrid grids // *YX_YZgrid: draw YXgrid and YZgrid grids // *XY_XZgrid: draw XYgrid and XZgrid grids // *YX_YZgrid: draw YXgrid and YZgrid grids // *An array of previous values XYXgrid,... // *XYZgrid: draw XYXgrid, ZYZgrid, XZXgrid grids. pos=Relative(0)), // the position of the grid relative to the axis // perpendicular to the grid; a real number // specifies a coordinate relative to this axis. // Aliases: top=Relative(1), middle=Relative(0.5) // and bottom=Relative(0). // These arguments are similar to those of InOutTicks(): N=0, // int n=0, // int Step=0, // real step=0, // real begin=true, // bool end=true, // bool pGrid=grey, // pen pgrid=lightgrey, // pen above=false // bool ); xaxis3(Label("$x$",position=EndPoint,align=S),OutTicks()); yaxis3(Label("$y$",position=EndPoint,align=S),OutTicks()); zaxis3(Label("$z$",position=EndPoint,align=(0,0.5)+W),OutTicks()); */ /* Other examples: int N=10, n=2; xaxis3(Label("$x$",position=EndPoint,align=S),OutTicks()); yaxis3(Label("$y$",position=EndPoint,align=S),OutTicks(N=N,n=n)); zaxis3(Label("$z$",position=EndPoint,align=(0,0.5)+W),OutTicks()); grid3(N=N,n=n); xaxis3(Label("$x$",position=EndPoint,align=S),OutTicks()); yaxis3(Label("$y$",position=EndPoint,align=S),OutTicks()); zaxis3(Label("$z$",position=EndPoint,align=(0,0.5)+W),OutTicks()); grid3(new grid3routines[] {XYXgrid(top),XZXgrid(0)}); xaxis3(Label("$x$",position=EndPoint,align=S),OutTicks()); yaxis3(Label("$y$",position=EndPoint,align=S),OutTicks()); zaxis3(Label("$z$",position=EndPoint,align=(0,0.5)+W),OutTicks()); grid3(new grid3routines[] {XYXgrid(-0.5),XYXgrid(1.5)}, pGrid=new pen[] {red,blue}, pgrid=new pen[] {0.5red,0.5blue}); // Axes with grids: xaxis3(Label("$x$",position=EndPoint,align=S), OutTicks(Step=0.5,gridroutine=XYgrid)); yaxis3(Label("$y$",position=EndPoint,align=S), InOutTicks(Label("",align=0.5X),N=8,n=2,gridroutine=YX_YZgrid)); zaxis3("$z$",OutTicks(ZYgrid)); */ ./asymptote-2.41/base/drawtree.asy0000644000175000017500000000407513064427076017016 0ustar norbertnorbert// A simple tree drawing module contributed by adarovsky // See example treetest.asy real treeNodeStep = 0.5cm; real treeLevelStep = 1cm; real treeMinNodeWidth = 2cm; struct TreeNode { TreeNode parent; TreeNode[] children; frame content; pair pos; real adjust; } void add( TreeNode child, TreeNode parent ) { child.parent = parent; parent.children.push( child ); } TreeNode makeNode( TreeNode parent = null, frame f ) { TreeNode child = new TreeNode; child.content = f; if( parent != null ) { add( child, parent ); } return child; } TreeNode makeNode( TreeNode parent = null, Label label ) { frame f; box( f, label); return makeNode( parent, f ); } real layout( int level, TreeNode node ) { if( node.children.length > 0 ) { real width[] = new real[node.children.length]; real curWidth = 0; for( int i = 0; i < node.children.length; ++i ) { width[i] = layout( level+1, node.children[i] ); node.children[i].pos = (curWidth + width[i]/2, -level*treeLevelStep); curWidth += width[i] + treeNodeStep; } real midPoint = ( sum( width )+treeNodeStep*(width.length-1)) / 2; for( int i = 0; i < node.children.length; ++i ) { node.children[i].adjust = - midPoint; } return max( (max(node.content)-min(node.content)).x, sum(width)+treeNodeStep*(width.length-1) ); } else { return max( treeMinNodeWidth, (max(node.content)-min(node.content)).x ); } } void drawAll( TreeNode node, frame f ) { pair pos; if( node.parent != null ) pos = (node.parent.pos.x+node.adjust, 0); else pos = (node.adjust, 0); node.pos += pos; node.content = shift(node.pos)*node.content; add( f, node.content ); if( node.parent != null ) { path p = point(node.content, N)--point(node.parent.content,S); draw( f, p, currentpen ); } for( int i = 0; i < node.children.length; ++i ) drawAll( node.children[i], f ); } void draw( TreeNode root, pair pos ) { frame f; root.pos = (0,0); layout( 1, root ); drawAll( root, f ); add(f,pos); } ./asymptote-2.41/base/graph.asy0000644000175000017500000017461613064427076016313 0ustar norbertnorbertprivate import math; import graph_splinetype; import graph_settings; scaleT Linear; scaleT Log=scaleT(log10,pow10,logarithmic=true); scaleT Logarithmic=Log; string baselinetemplate="$10^4$"; // A linear scale, with optional autoscaling of minimum and maximum values, // scaling factor s and intercept. scaleT Linear(bool automin=false, bool automax=automin, real s=1, real intercept=0) { real sinv=1/s; scalefcn T,Tinv; if(s == 1 && intercept == 0) T=Tinv=identity; else { T=new real(real x) {return (x-intercept)*s;}; Tinv=new real(real x) {return x*sinv+intercept;}; } return scaleT(T,Tinv,logarithmic=false,automin,automax); } // A logarithmic scale, with optional autoscaling of minimum and maximum // values. scaleT Log(bool automin=false, bool automax=automin) { return scaleT(Log.T,Log.Tinv,logarithmic=true,automin,automax); } // A "broken" linear axis omitting the segment [a,b]. scaleT Broken(real a, real b, bool automin=false, bool automax=automin) { real skip=b-a; real T(real x) { if(x <= a) return x; if(x <= b) return a; return x-skip; } real Tinv(real x) { if(x <= a) return x; return x+skip; } return scaleT(T,Tinv,logarithmic=false,automin,automax); } // A "broken" logarithmic axis omitting the segment [a,b], where a and b are // automatically rounded to the nearest integral power of the base. scaleT BrokenLog(real a, real b, bool automin=false, bool automax=automin) { real A=round(Log.T(a)); real B=round(Log.T(b)); a=Log.Tinv(A); b=Log.Tinv(B); real skip=B-A; real T(real x) { if(x <= a) return Log.T(x); if(x <= b) return A; return Log.T(x)-skip; } real Tinv(real x) { real X=Log.Tinv(x); if(X <= a) return X; return Log.Tinv(x+skip); } return scaleT(T,Tinv,logarithmic=true,automin,automax); } Label Break=Label("$\approx$",UnFill(0.2mm)); void scale(picture pic=currentpicture, scaleT x, scaleT y=x, scaleT z=y) { pic.scale.x.scale=x; pic.scale.y.scale=y; pic.scale.z.scale=z; pic.scale.x.automin=x.automin; pic.scale.y.automin=y.automin; pic.scale.z.automin=z.automin; pic.scale.x.automax=x.automax; pic.scale.y.automax=y.automax; pic.scale.z.automax=z.automax; } void scale(picture pic=currentpicture, bool xautoscale=false, bool yautoscale=xautoscale, bool zautoscale=yautoscale) { scale(pic,Linear(xautoscale,xautoscale),Linear(yautoscale,yautoscale), Linear(zautoscale,zautoscale)); } struct scientific { int sign; real mantissa; int exponent; int ceil() {return sign*ceil(mantissa);} real scale(real x, real exp) { static real max=0.1*realMax; static real limit=-log10(max); return x*(exp > limit ? 10^-exp : max); } real ceil(real x, real exp) {return ceil(sign*scale(abs(x),exp));} real floor(real x, real exp) {return floor(sign*scale(abs(x),exp));} } // Convert x to scientific notation scientific scientific(real x) { scientific s; s.sign=sgn(x); x=abs(x); if(x == 0) {s.mantissa=0; s.exponent=-intMax; return s;} real logx=log10(x); s.exponent=floor(logx); s.mantissa=s.scale(x,s.exponent); return s; } // Autoscale limits and tick divisor. struct bounds { real min; real max; // Possible tick intervals: int[] divisor; void operator init(real min, real max, int[] divisor=new int[]) { this.min=min; this.max=max; this.divisor=divisor; } } // Compute tick divisors. int[] divisors(int a, int b) { int[] dlist; int n=b-a; dlist[0]=1; if(n == 1) {dlist[1]=10; dlist[2]=100; return dlist;} if(n == 2) {dlist[1]=2; return dlist;} int sqrtn=floor(sqrt(n)); int i=0; for(int d=2; d <= sqrtn; ++d) if(n % d == 0 && (a*b >= 0 || b % (n/d) == 0)) dlist[++i]=d; for(int d=sqrtn; d >= 1; --d) if(n % d == 0 && (a*b >= 0 || b % d == 0)) dlist[++i]=quotient(n,d); return dlist; } real upscale(real b, real a) { if(b <= 5) b=5; else if (b > 10 && a >= 0 && b <= 12) b=12; else if (b > 10 && (a >= 0 || 15 % -a == 0) && b <= 15) b=15; else b=ceil(b/10)*10; return b; } // Compute autoscale limits and tick divisor. bounds autoscale(real Min, real Max, scaleT scale=Linear) { bounds m; if(scale.logarithmic) { m.min=floor(Min); m.max=ceil(Max); return m; } if(!(finite(Min) && finite(Max))) abort("autoscale requires finite limits"); Min=scale.Tinv(Min); Max=scale.Tinv(Max); m.min=Min; m.max=Max; if(Min > Max) {real temp=Min; Min=Max; Max=temp;} if(Min == Max) { if(Min == 0) {m.max=1; return m;} if(Min > 0) {Min=0; Max *= 2;} else {Min *= 2; Max=0;} } int sign; if(Min < 0 && Max <= 0) {real temp=-Min; Min=-Max; Max=temp; sign=-1;} else sign=1; scientific sa=scientific(Min); scientific sb=scientific(Max); int exp=max(sa.exponent,sb.exponent); real a=sa.floor(Min,exp); real b=sb.ceil(Max,exp); void zoom() { --exp; a=sa.floor(Min,exp); b=sb.ceil(Max,exp); } if(sb.mantissa <= 1.5) zoom(); while((b-a)*10.0^exp > 10*(Max-Min)) zoom(); real bsave=b; if(b-a > (a >= 0 ? 8 : 6)) { b=upscale(b,a); if(a >= 0) { if(a <= 5) a=0; else a=floor(a/10)*10; } else a=-upscale(-a,-1); } // Redo b in case the value of a has changed if(bsave-a > (a >= 0 ? 8 : 6)) b=upscale(bsave,a); if(sign == -1) {real temp=-a; a=-b; b=temp;} real Scale=10.0^exp; m.min=scale.T(a*Scale); m.max=scale.T(b*Scale); if(m.min > m.max) {real temp=m.min; m.min=m.max; m.max=temp;} m.divisor=divisors(round(a),round(b)); return m; } typedef string ticklabel(real); ticklabel Format(string s=defaultformat) { return new string(real x) {return format(s,x);}; } ticklabel OmitFormat(string s=defaultformat ... real[] x) { return new string(real v) { string V=format(s,v); for(real a : x) if(format(s,a) == V) return ""; return V; }; } string trailingzero="$%#$"; string signedtrailingzero="$%+#$"; ticklabel DefaultFormat=Format(); ticklabel NoZeroFormat=OmitFormat(0); // Format tick values as integral powers of base; otherwise with DefaultFormat. ticklabel DefaultLogFormat(int base) { return new string(real x) { string exponent=format("%.4f",log(x)/log(base)); return find(exponent,".") == -1 ? "$"+(string) base+"^{"+exponent+"}$" : format(x); }; } // Format all tick values as powers of base. ticklabel LogFormat(int base) { return new string(real x) { return format("$"+(string) base+"^{%g}$",log(x)/log(base)); }; } ticklabel LogFormat=LogFormat(10); ticklabel DefaultLogFormat=DefaultLogFormat(10); // The default direction specifier. pair zero(real) {return 0;} struct ticklocate { real a,b; // Tick values at point(g,0), point(g,length(g)). autoscaleT S; // Autoscaling transformation. pair dir(real t); // Absolute 2D tick direction. triple dir3(real t); // Absolute 3D tick direction. real time(real v); // Returns the time corresponding to the value v. ticklocate copy() { ticklocate T=new ticklocate; T.a=a; T.b=b; T.S=S.copy(); T.dir=dir; T.dir3=dir3; T.time=time; return T; } } autoscaleT defaultS; typedef real valuetime(real); valuetime linear(scalefcn S=identity, real Min, real Max) { real factor=Max == Min ? 0.0 : 1.0/(Max-Min); return new real(real v) {return (S(v)-Min)*factor;}; } ticklocate ticklocate(real a, real b, autoscaleT S=defaultS, real tickmin=-infinity, real tickmax=infinity, real time(real)=null, pair dir(real)=zero) { if((valuetime) time == null) time=linear(S.T(),a,b); ticklocate locate; locate.a=a; locate.b=b; locate.S=S.copy(); if(finite(tickmin)) locate.S.tickMin=tickmin; if(finite(tickmax)) locate.S.tickMax=tickmax; locate.time=time; locate.dir=dir; return locate; } private struct locateT { real t; // tick location time pair Z; // tick location in frame coordinates pair pathdir; // path direction in frame coordinates pair dir; // tick direction in frame coordinates void dir(transform T, path g, ticklocate locate, real t) { pathdir=unit(shiftless(T)*dir(g,t)); pair Dir=locate.dir(t); dir=Dir == 0 ? -I*pathdir : unit(Dir); } // Locate the desired position of a tick along a path. void calc(transform T, path g, ticklocate locate, real val) { t=locate.time(val); Z=T*point(g,t); dir(T,g,locate,t); } } pair ticklabelshift(pair align, pen p=currentpen) { return 0.25*unit(align)*labelmargin(p); } void drawtick(frame f, transform T, path g, path g2, ticklocate locate, real val, real Size, int sign, pen p, bool extend) { locateT locate1,locate2; locate1.calc(T,g,locate,val); if(extend && size(g2) > 0) { locate2.calc(T,g2,locate,val); draw(f,locate1.Z--locate2.Z,p); } else if(sign == 0) draw(f,locate1.Z-Size*locate1.dir--locate1.Z+Size*locate1.dir,p); else draw(f,locate1.Z--locate1.Z+Size*sign*locate1.dir,p); } real zerotickfuzz=10*epsilon; // Label a tick on a frame. pair labeltick(frame d, transform T, path g, ticklocate locate, real val, pair side, int sign, real Size, ticklabel ticklabel, Label F, real norm=0) { locateT locate1; locate1.calc(T,g,locate,val); pair align=side*locate1.dir; pair perp=I*locate1.pathdir; // Adjust tick label alignment pair adjust=unit(align+0.75perp*sgn(dot(align,perp))); // Project align onto adjusted direction. align=adjust*dot(align,adjust); pair shift=dot(align,-sign*locate1.dir) <= 0 ? align*Size : ticklabelshift(align,F.p); real label; if(locate.S.scale.logarithmic) label=locate.S.scale.Tinv(val); else { label=val; if(abs(label) < zerotickfuzz*norm) label=0; // Fix epsilon errors at +/-1e-4 // default format changes to scientific notation here if(abs(abs(label)-1e-4) < epsilon) label=sgn(label)*1e-4; } string s=ticklabel(label); if(s != "") label(d,F.T*baseline(s,baselinetemplate),locate1.Z+shift,align,F.p, F.filltype); return locate1.pathdir; } // Add axis label L to frame f. void labelaxis(frame f, transform T, Label L, path g, ticklocate locate=null, int sign=1, bool ticklabels=false) { Label L0=L.copy(); real t=L0.relative(g); pair z=point(g,t); pair dir=dir(g,t); pair perp=I*dir; if(locate != null) { locateT locate1; locate1.dir(T,g,locate,t); L0.align(L0.align,unit(-sgn(dot(sign*locate1.dir,perp))*perp)); } pair align=L0.align.dir; if(L0.align.relative) align *= -perp; pair alignperp=dot(align,perp)*perp; pair offset; if(ticklabels) { if(piecewisestraight(g)) { real angle=degrees(dir,warn=false); transform S=rotate(-angle,z); frame F=S*f; pair Align=rotate(-angle)*alignperp; offset=unit(alignperp-sign*locate.dir(t))* abs((Align.y >= 0 ? max(F).y : (Align.y < 0 ? min(F).y : 0))-z.y); } z += offset; } L0.align(align); L0.position(z); frame d; add(d,L0); pair width=0.5*size(d); int n=length(g); real t=L.relative(); pair s=realmult(width,dir(g,t)); if(t <= 0) { if(L.align.default) s *= -axislabelfactor; d=shift(s)*d; } else if(t >= n) { if(L.align.default) s *= -axislabelfactor; d=shift(-s)*d; } else if(offset == 0 && L.align.default) { pair s=realmult(width,I*dir(g,t)); s=axislabelfactor*s; d=shift(s)*d; } add(f,d); } // Check the tick coverage of a linear axis. bool axiscoverage(int N, transform T, path g, ticklocate locate, real Step, pair side, int sign, real Size, Label F, ticklabel ticklabel, real norm, real limit) { real coverage=0; bool loop=cyclic(g); real a=locate.S.Tinv(locate.a); real b=locate.S.Tinv(locate.b); real tickmin=finite(locate.S.tickMin) ? locate.S.Tinv(locate.S.tickMin) : a; if(Size > 0) { int count=0; if(loop) count=N+1; else { for(int i=0; i <= N; ++i) { real val=tickmin+i*Step; if(val >= a && val <= b) ++count; } } if(count > 0) limit /= count; for(int i=0; i <= N; ++i) { real val=tickmin+i*Step; if(loop || (val >= a && val <= b)) { frame d; pair dir=labeltick(d,T,g,locate,val,side,sign,Size,ticklabel,F,norm); if(abs(dot(size(d),dir)) > limit) return false; } } } return true; } // Check the tick coverage of a logarithmic axis. bool logaxiscoverage(int N, transform T, path g, ticklocate locate, pair side, int sign, real Size, Label F, ticklabel ticklabel, real limit, int first, int last) { bool loop=cyclic(g); real coverage=0; real a=locate.a; real b=locate.b; int count=0; for(int i=first-1; i <= last+1; i += N) { if(loop || i >= a && i <= b) ++count; } if(count > 0) limit /= count; for(int i=first-1; i <= last+1; i += N) { if(loop || i >= a && i <= b) { frame d; pair dir=labeltick(d,T,g,locate,i,side,sign,Size,ticklabel,F); if(abs(dot(size(d),dir)) > limit) return false; } } return true; } struct tickvalues { real[] major; real[] minor; int N; // For logarithmic axes: number of decades between tick labels. } // Determine a format that distinguishes adjacent pairs of ticks, optionally // adding trailing zeros. string autoformat(string format="", real norm ... real[] a) { bool trailingzero=(format == trailingzero); bool signedtrailingzero=(format == signedtrailingzero); if(!trailingzero && !signedtrailingzero && format != "") return format; real[] A=sort(a); real[] a=abs(A); bool signchange=(A.length > 1 && A[0] < 0 && A[A.length-1] >= 0); for(int i=0; i < A.length; ++i) if(a[i] < zerotickfuzz*norm) A[i]=a[i]=0; int n=0; bool Fixed=find(a >= 1e4-epsilon | (a > 0 & a <= 1e-4-epsilon)) < 0; string Format=defaultformat(4,fixed=Fixed); if(Fixed && n < 4) { for(int i=0; i < A.length; ++i) { real a=A[i]; while(format(defaultformat(n,fixed=Fixed),a) != format(Format,a)) ++n; } } string trailing=trailingzero ? (signchange ? "# " : "#") : signedtrailingzero ? "#+" : ""; string format=defaultformat(n,trailing,Fixed); for(int i=0; i < A.length-1; ++i) { real a=A[i]; real b=A[i+1]; // Check if an extra digit of precision should be added. string fixedformat="%#."+string(n+1)+"f"; string A=format(fixedformat,a); string B=format(fixedformat,b); if(substr(A,length(A)-1,1) != "0" || substr(B,length(B)-1,1) != "0") { a *= 0.1; b *= 0.1; } if(a != b) { while(format(format,a) == format(format,b)) format=defaultformat(++n,trailing,Fixed); } } if(n == 0) return defaultformat; return format; } // Automatic tick generation routine. tickvalues generateticks(int sign, Label F="", ticklabel ticklabel=null, int N, int n=0, real Step=0, real step=0, real Size=0, real size=0, transform T, pair side, path g, real limit, pen p, ticklocate locate, int[] divisor, bool opposite) { tickvalues tickvalues; sign=opposite ? -sign : sign; if(Size == 0) Size=Ticksize; if(size == 0) size=ticksize; F=F.copy(); F.p(p); if(F.align.dir != 0) side=F.align.dir; else if(side == 0) side=((sign == 1) ? left : right); bool ticklabels=false; path G=T*g; if(!locate.S.scale.logarithmic) { real a=locate.S.Tinv(locate.a); real b=locate.S.Tinv(locate.b); real norm=max(abs(a),abs(b)); string format=autoformat(F.s,norm,a,b); if(F.s == "%") F.s=""; if(ticklabel == null) ticklabel=Format(format); if(a > b) {real temp=a; a=b; b=temp;} if(b-a < 100.0*epsilon*norm) b=a; bool autotick=Step == 0 && N == 0; real tickmin=finite(locate.S.tickMin) && (autotick || locate.S.automin) ? locate.S.Tinv(locate.S.tickMin) : a; real tickmax=finite(locate.S.tickMax) && (autotick || locate.S.automax) ? locate.S.Tinv(locate.S.tickMax) : b; if(tickmin > tickmax) {real temp=tickmin; tickmin=tickmax; tickmax=temp;} real inStep=Step; bool calcStep=true; real len=tickmax-tickmin; if(autotick) { N=1; if(divisor.length > 0) { bool autoscale=locate.S.automin && locate.S.automax; real h=0.5*(b-a); if(h > 0) { for(int d=divisor.length-1; d >= 0; --d) { int N0=divisor[d]; Step=len/N0; int N1=N0; int m=2; while(Step > h) { N0=m*N1; Step=len/N0; m *= 2; } if(axiscoverage(N0,T,g,locate,Step,side,sign,Size,F,ticklabel,norm, limit)) { N=N0; if(N0 == 1 && !autoscale && d < divisor.length-1) { // Try using 2 ticks (otherwise 1); int div=divisor[d+1]; Step=quotient(div,2)*len/div; calcStep=false; if(axiscoverage(2,T,g,locate,Step,side,sign,Size,F,ticklabel, norm,limit)) N=2; else Step=len; } // Found a good divisor; now compute subtick divisor if(n == 0) { if(step != 0) n=ceil(Step/step); else { n=quotient(divisor[divisor.length-1],N); if(N == 1) n=(a*b >= 0) ? 2 : 1; if(n == 1) n=2; } } break; } } } } } if(inStep != 0 && !locate.S.automin) { tickmin=floor(tickmin/Step)*Step; len=tickmax-tickmin; } if(calcStep) { if(N == 1) N=2; if(N == 0) N=(int) (len/Step); else Step=len/N; } if(n == 0) { if(step != 0) n=ceil(Step/step); } else step=Step/n; b += epsilon*norm; if(Size > 0) { for(int i=0; i <= N; ++i) { real val=tickmin+i*Step; if(val >= a && val <= b) tickvalues.major.push(val); if(size > 0 && step > 0) { real iStep=i*Step; real jstop=(len-iStep)/step; for(int j=1; j < n && j <= jstop; ++j) { real val=tickmin+iStep+j*step; if(val >= a && val <= b) tickvalues.minor.push(val); } } } } } else { // Logarithmic string format=F.s; if(F.s == "%") F.s=""; int base=round(locate.S.scale.Tinv(1)); if(ticklabel == null) ticklabel=format == "%" ? Format("") : DefaultLogFormat(base); real a=locate.S.postscale.Tinv(locate.a); real b=locate.S.postscale.Tinv(locate.b); if(a > b) {real temp=a; a=b; b=temp;} int first=floor(a-epsilon); int last=ceil(b+epsilon); if(N == 0) { N=1; while(N <= last-first) { if(logaxiscoverage(N,T,g,locate,side,sign,Size,F,ticklabel,limit, first,last)) break; ++N; } } if(N <= 2 && n == 0) n=base; tickvalues.N=N; if(N > 0) { for(int i=first-1; i <= last+1; ++i) { if(i >= a && i <= b) tickvalues.major.push(locate.S.scale.Tinv(i)); if(n > 0) { for(int j=2; j < n; ++j) { real val=(i+1+locate.S.scale.T(j/n)); if(val >= a && val <= b) tickvalues.minor.push(locate.S.scale.Tinv(val)); } } } } } return tickvalues; } // Signature of routines that draw labelled paths with ticks and tick labels. typedef void ticks(frame, transform, Label, pair, path, path, pen, arrowbar, margin, ticklocate, int[], bool opposite=false); // Tick construction routine for a user-specified array of tick values. ticks Ticks(int sign, Label F="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, real[] Ticks=new real[], real[] ticks=new real[], int N=1, bool begin=true, bool end=true, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return new void(frame f, transform t, Label L, pair side, path g, path g2, pen p, arrowbar arrow, margin margin, ticklocate locate, int[] divisor, bool opposite) { // Use local copy of context variables: int sign=opposite ? -sign : sign; pen pTick=pTick; pen ptick=ptick; ticklabel ticklabel=ticklabel; real Size=Size; real size=size; if(Size == 0) Size=Ticksize; if(size == 0) size=ticksize; Label L=L.copy(); Label F=F.copy(); L.p(p); F.p(p); if(pTick == nullpen) pTick=p; if(ptick == nullpen) ptick=pTick; if(F.align.dir != 0) side=F.align.dir; else if(side == 0) side=F.T*((sign == 1) ? left : right); bool ticklabels=false; path G=t*g; path G2=t*g2; scalefcn T; real a,b; if(locate.S.scale.logarithmic) { a=locate.S.postscale.Tinv(locate.a); b=locate.S.postscale.Tinv(locate.b); T=locate.S.scale.T; } else { a=locate.S.Tinv(locate.a); b=locate.S.Tinv(locate.b); T=identity; } if(a > b) {real temp=a; a=b; b=temp;} real norm=max(abs(a),abs(b)); string format=autoformat(F.s,norm...Ticks); if(F.s == "%") F.s=""; if(ticklabel == null) { if(locate.S.scale.logarithmic) { int base=round(locate.S.scale.Tinv(1)); ticklabel=format == "%" ? Format("") : DefaultLogFormat(base); } else ticklabel=Format(format); } begingroup(f); if(opposite) draw(f,G,p); else draw(f,margin(G,p).g,p,arrow); for(int i=(begin ? 0 : 1); i < (end ? Ticks.length : Ticks.length-1); ++i) { real val=T(Ticks[i]); if(val >= a && val <= b) drawtick(f,t,g,g2,locate,val,Size,sign,pTick,extend); } for(int i=0; i < ticks.length; ++i) { real val=T(ticks[i]); if(val >= a && val <= b) drawtick(f,t,g,g2,locate,val,size,sign,ptick,extend); } endgroup(f); if(N == 0) N=1; if(Size > 0 && !opposite) { for(int i=(beginlabel ? 0 : 1); i < (endlabel ? Ticks.length : Ticks.length-1); i += N) { real val=T(Ticks[i]); if(val >= a && val <= b) { ticklabels=true; labeltick(f,t,g,locate,val,side,sign,Size,ticklabel,F,norm); } } } if(L.s != "" && !opposite) labelaxis(f,t,L,G,locate,sign,ticklabels); }; } // Optional routine to allow modification of auto-generated tick values. typedef tickvalues tickmodifier(tickvalues); tickvalues None(tickvalues v) {return v;} // Tickmodifier that removes all ticks in the intervals [a[i],b[i]]. tickmodifier OmitTickIntervals(real[] a, real[] b) { return new tickvalues(tickvalues v) { if(a.length != b.length) abort(differentlengths); void omit(real[] A) { if(A.length != 0) { real norm=max(abs(A)); for(int i=0; i < a.length; ++i) { int j; while((j=find(A > a[i]-zerotickfuzz*norm & A < b[i]+zerotickfuzz*norm)) >= 0) { A.delete(j); } } } } omit(v.major); omit(v.minor); return v; }; } // Tickmodifier that removes all ticks in the interval [a,b]. tickmodifier OmitTickInterval(real a, real b) { return OmitTickIntervals(new real[] {a}, new real[] {b}); } // Tickmodifier that removes the specified ticks. tickmodifier OmitTick(... real[] x) { return OmitTickIntervals(x,x); } tickmodifier NoZero=OmitTick(0); tickmodifier Break(real, real)=OmitTickInterval; // Automatic tick construction routine. ticks Ticks(int sign, Label F="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, tickmodifier modify=None, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return new void(frame f, transform T, Label L, pair side, path g, path g2, pen p, arrowbar arrow, margin margin, ticklocate locate, int[] divisor, bool opposite) { real limit=Step == 0 ? axiscoverage*arclength(T*g) : 0; tickvalues values=modify(generateticks(sign,F,ticklabel,N,n,Step,step, Size,size,T,side,g, limit,p,locate,divisor,opposite)); Ticks(sign,F,ticklabel,beginlabel,endlabel,values.major,values.minor, values.N,begin,end,Size,size,extend,pTick,ptick) (f,T,L,side,g,g2,p,arrow,margin,locate,divisor,opposite); }; } ticks NoTicks() { return new void(frame f, transform T, Label L, pair, path g, path, pen p, arrowbar arrow, margin margin, ticklocate, int[], bool opposite) { path G=T*g; if(opposite) draw(f,G,p); else { draw(f,margin(G,p).g,p,arrow); if(L.s != "") { Label L=L.copy(); L.p(p); labelaxis(f,T,L,G); } } }; } ticks LeftTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, tickmodifier modify=None, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks(-1,format,ticklabel,beginlabel,endlabel,N,n,Step,step, begin,end,modify,Size,size,extend,pTick,ptick); } ticks RightTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, tickmodifier modify=None, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks(1,format,ticklabel,beginlabel,endlabel,N,n,Step,step, begin,end,modify,Size,size,extend,pTick,ptick); } ticks Ticks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, int N=0, int n=0, real Step=0, real step=0, bool begin=true, bool end=true, tickmodifier modify=None, real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks(0,format,ticklabel,beginlabel,endlabel,N,n,Step,step, begin,end,modify,Size,size,extend,pTick,ptick); } ticks LeftTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, real[] Ticks, real[] ticks=new real[], real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks(-1,format,ticklabel,beginlabel,endlabel, Ticks,ticks,Size,size,extend,pTick,ptick); } ticks RightTicks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, real[] Ticks, real[] ticks=new real[], real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks(1,format,ticklabel,beginlabel,endlabel, Ticks,ticks,Size,size,extend,pTick,ptick); } ticks Ticks(Label format="", ticklabel ticklabel=null, bool beginlabel=true, bool endlabel=true, real[] Ticks, real[] ticks=new real[], real Size=0, real size=0, bool extend=false, pen pTick=nullpen, pen ptick=nullpen) { return Ticks(0,format,ticklabel,beginlabel,endlabel, Ticks,ticks,Size,size,extend,pTick,ptick); } ticks NoTicks=NoTicks(), LeftTicks=LeftTicks(), RightTicks=RightTicks(), Ticks=Ticks(); pair tickMin(picture pic) { return minbound(pic.userMin(),(pic.scale.x.tickMin,pic.scale.y.tickMin)); } pair tickMax(picture pic) { return maxbound(pic.userMax(),(pic.scale.x.tickMax,pic.scale.y.tickMax)); } int Min=-1; int Value=0; int Max=1; int Both=2; // Structure used to communicate axis and autoscale settings to tick routines. struct axisT { int type; // -1 = min, 0 = given value, 1 = max, 2 = min/max int type2; // for 3D axis real value; real value2; pair side; // 2D tick label direction relative to path (left or right) real position; // label position along axis align align; // default axis label alignment and 3D tick label direction int[] xdivisor; int[] ydivisor; int[] zdivisor; bool extend; // extend axis to graph boundary? }; axisT axis; typedef void axis(picture, axisT); axis Bottom(bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Min; axis.position=0.5; axis.side=right; axis.align=S; axis.extend=extend; }; } axis Top(bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Max; axis.position=0.5; axis.side=left; axis.align=N; axis.extend=extend; }; } axis BottomTop(bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Both; axis.position=0.5; axis.side=right; axis.align=S; axis.extend=extend; }; } axis Left(bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Min; axis.position=0.5; axis.side=left; axis.align=W; axis.extend=extend; }; } axis Right(bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Max; axis.position=0.5; axis.side=right; axis.align=E; axis.extend=extend; }; } axis LeftRight(bool extend=false) { return new void(picture pic, axisT axis) { axis.type=Both; axis.position=0.5; axis.side=left; axis.align=W; axis.extend=extend; }; } axis XEquals(real x, bool extend=true) { return new void(picture pic, axisT axis) { axis.type=Value; axis.value=pic.scale.x.T(x); axis.position=1; axis.side=left; axis.align=W; axis.extend=extend; }; } axis YEquals(real y, bool extend=true) { return new void(picture pic, axisT axis) { axis.type=Value; axis.value=pic.scale.y.T(y); axis.position=1; axis.side=right; axis.align=S; axis.extend=extend; }; } axis XZero(bool extend=true) { return new void(picture pic, axisT axis) { axis.type=Value; axis.value=pic.scale.x.T(pic.scale.x.scale.logarithmic ? 1 : 0); axis.position=1; axis.side=left; axis.align=W; axis.extend=extend; }; } axis YZero(bool extend=true) { return new void(picture pic, axisT axis) { axis.type=Value; axis.value=pic.scale.y.T(pic.scale.y.scale.logarithmic ? 1 : 0); axis.position=1; axis.side=right; axis.align=S; axis.extend=extend; }; } axis Bottom=Bottom(), Top=Top(), BottomTop=BottomTop(), Left=Left(), Right=Right(), LeftRight=LeftRight(), XZero=XZero(), YZero=YZero(); // Draw a general axis. void axis(picture pic=currentpicture, Label L="", path g, path g2=nullpath, pen p=currentpen, ticks ticks, ticklocate locate, arrowbar arrow=None, margin margin=NoMargin, int[] divisor=new int[], bool above=false, bool opposite=false) { Label L=L.copy(); real t=reltime(g,0.5); if(L.defaultposition) L.position(t); divisor=copy(divisor); locate=locate.copy(); pic.add(new void (frame f, transform t, transform T, pair lb, pair rt) { frame d; ticks(d,t,L,0,g,g2,p,arrow,margin,locate,divisor,opposite); (above ? add : prepend)(f,t*T*inverse(t)*d); }); pic.addPath(g,p); if(L.s != "") { frame f; Label L0=L.copy(); L0.position(0); add(f,L0); pair pos=point(g,L.relative()*length(g)); pic.addBox(pos,pos,min(f),max(f)); } } real xtrans(transform t, real x) { return (t*(x,0)).x; } real ytrans(transform t, real y) { return (t*(0,y)).y; } // An internal routine to draw an x axis at a particular y value. void xaxisAt(picture pic=currentpicture, Label L="", axis axis, real xmin=-infinity, real xmax=infinity, pen p=currentpen, ticks ticks=NoTicks, arrowbar arrow=None, margin margin=NoMargin, bool above=true, bool opposite=false) { real y=axis.value; real y2; Label L=L.copy(); int[] divisor=copy(axis.xdivisor); pair side=axis.side; int type=axis.type; pic.add(new void (frame f, transform t, transform T, pair lb, pair rt) { transform tinv=inverse(t); pair a=xmin == -infinity ? tinv*(lb.x-min(p).x,ytrans(t,y)) : (xmin,y); pair b=xmax == infinity ? tinv*(rt.x-max(p).x,ytrans(t,y)) : (xmax,y); pair a2=xmin == -infinity ? tinv*(lb.x-min(p).x,ytrans(t,y2)) : (xmin,y2); pair b2=xmax == infinity ? tinv*(rt.x-max(p).x,ytrans(t,y2)) : (xmax,y2); if(xmin == -infinity || xmax == infinity) { bounds mx=autoscale(a.x,b.x,pic.scale.x.scale); pic.scale.x.tickMin=mx.min; pic.scale.x.tickMax=mx.max; divisor=mx.divisor; } real fuzz=epsilon*max(abs(a.x),abs(b.x)); a -= (fuzz,0); b += (fuzz,0); frame d; ticks(d,t,L,side,a--b,finite(y2) ? a2--b2 : nullpath,p,arrow,margin, ticklocate(a.x,b.x,pic.scale.x),divisor,opposite); (above ? add : prepend)(f,t*T*tinv*d); }); void bounds() { if(type == Both) { y2=pic.scale.y.automax() ? tickMax(pic).y : pic.userMax().y; y=opposite ? y2 : (pic.scale.y.automin() ? tickMin(pic).y : pic.userMin().y); } else if(type == Min) y=pic.scale.y.automin() ? tickMin(pic).y : pic.userMin().y; else if(type == Max) y=pic.scale.y.automax() ? tickMax(pic).y : pic.userMax().y; real Xmin=finite(xmin) ? xmin : pic.userMin().x; real Xmax=finite(xmax) ? xmax : pic.userMax().x; pair a=(Xmin,y); pair b=(Xmax,y); pair a2=(Xmin,y2); pair b2=(Xmax,y2); if(finite(a)) { pic.addPoint(a,min(p)); pic.addPoint(a,max(p)); } if(finite(b)) { pic.addPoint(b,min(p)); pic.addPoint(b,max(p)); } if(finite(a) && finite(b)) { frame d; ticks(d,pic.scaling(warn=false),L,side, (a.x,0)--(b.x,0),(a2.x,0)--(b2.x,0),p,arrow,margin, ticklocate(a.x,b.x,pic.scale.x),divisor,opposite); frame f; if(L.s != "") { Label L0=L.copy(); L0.position(0); add(f,L0); } pair pos=a+L.relative()*(b-a); pic.addBox(pos,pos,(min(f).x,min(d).y),(max(f).x,max(d).y)); } } // Process any queued y axis bound calculation requests. for(int i=0; i < pic.scale.y.bound.length; ++i) pic.scale.y.bound[i](); pic.scale.y.bound.delete(); bounds(); // Request another x bounds calculation before final picture scaling. pic.scale.x.bound.push(bounds); } // An internal routine to draw a y axis at a particular x value. void yaxisAt(picture pic=currentpicture, Label L="", axis axis, real ymin=-infinity, real ymax=infinity, pen p=currentpen, ticks ticks=NoTicks, arrowbar arrow=None, margin margin=NoMargin, bool above=true, bool opposite=false) { real x=axis.value; real x2; Label L=L.copy(); int[] divisor=copy(axis.ydivisor); pair side=axis.side; int type=axis.type; pic.add(new void (frame f, transform t, transform T, pair lb, pair rt) { transform tinv=inverse(t); pair a=ymin == -infinity ? tinv*(xtrans(t,x),lb.y-min(p).y) : (x,ymin); pair b=ymax == infinity ? tinv*(xtrans(t,x),rt.y-max(p).y) : (x,ymax); pair a2=ymin == -infinity ? tinv*(xtrans(t,x2),lb.y-min(p).y) : (x2,ymin); pair b2=ymax == infinity ? tinv*(xtrans(t,x2),rt.y-max(p).y) : (x2,ymax); if(ymin == -infinity || ymax == infinity) { bounds my=autoscale(a.y,b.y,pic.scale.y.scale); pic.scale.y.tickMin=my.min; pic.scale.y.tickMax=my.max; divisor=my.divisor; } real fuzz=epsilon*max(abs(a.y),abs(b.y)); a -= (0,fuzz); b += (0,fuzz); frame d; ticks(d,t,L,side,a--b,finite(x2) ? a2--b2 : nullpath,p,arrow,margin, ticklocate(a.y,b.y,pic.scale.y),divisor,opposite); (above ? add : prepend)(f,t*T*tinv*d); }); void bounds() { if(type == Both) { x2=pic.scale.x.automax() ? tickMax(pic).x : pic.userMax().x; x=opposite ? x2 : (pic.scale.x.automin() ? tickMin(pic).x : pic.userMin().x); } else if(type == Min) x=pic.scale.x.automin() ? tickMin(pic).x : pic.userMin().x; else if(type == Max) x=pic.scale.x.automax() ? tickMax(pic).x : pic.userMax().x; real Ymin=finite(ymin) ? ymin : pic.userMin().y; real Ymax=finite(ymax) ? ymax : pic.userMax().y; pair a=(x,Ymin); pair b=(x,Ymax); pair a2=(x2,Ymin); pair b2=(x2,Ymax); if(finite(a)) { pic.addPoint(a,min(p)); pic.addPoint(a,max(p)); } if(finite(b)) { pic.addPoint(b,min(p)); pic.addPoint(b,max(p)); } if(finite(a) && finite(b)) { frame d; ticks(d,pic.scaling(warn=false),L,side, (0,a.y)--(0,b.y),(0,a2.y)--(0,b2.y),p,arrow,margin, ticklocate(a.y,b.y,pic.scale.y),divisor,opposite); frame f; if(L.s != "") { Label L0=L.copy(); L0.position(0); add(f,L0); } pair pos=a+L.relative()*(b-a); pic.addBox(pos,pos,(min(d).x,min(f).y),(max(d).x,max(f).y)); } } // Process any queued x axis bound calculation requests. for(int i=0; i < pic.scale.x.bound.length; ++i) pic.scale.x.bound[i](); pic.scale.x.bound.delete(); bounds(); // Request another y bounds calculation before final picture scaling. pic.scale.y.bound.push(bounds); } // Set the x limits of a picture. void xlimits(picture pic=currentpicture, real min=-infinity, real max=infinity, bool crop=NoCrop) { if(min > max) return; pic.scale.x.automin=min <= -infinity; pic.scale.x.automax=max >= infinity; bounds mx; if(pic.scale.x.automin() || pic.scale.x.automax()) mx=autoscale(pic.userMin().x,pic.userMax().x,pic.scale.x.scale); if(pic.scale.x.automin) { if(pic.scale.x.automin()) pic.userMinx(mx.min); } else pic.userMinx(min(pic.scale.x.T(min),pic.scale.x.T(max))); if(pic.scale.x.automax) { if(pic.scale.x.automax()) pic.userMaxx(mx.max); } else pic.userMaxx(max(pic.scale.x.T(min),pic.scale.x.T(max))); if(crop) { pair userMin=pic.userMin(); pair userMax=pic.userMax(); pic.bounds.xclip(userMin.x,userMax.x); pic.clip(userMin, userMax, new void (frame f, transform t, transform T, pair, pair) { frame Tinvf=T == identity() ? f : t*inverse(T)*inverse(t)*f; clip(f,T*box(((t*userMin).x,(min(Tinvf)).y), ((t*userMax).x,(max(Tinvf)).y))); }); } } // Set the y limits of a picture. void ylimits(picture pic=currentpicture, real min=-infinity, real max=infinity, bool crop=NoCrop) { if(min > max) return; pic.scale.y.automin=min <= -infinity; pic.scale.y.automax=max >= infinity; bounds my; if(pic.scale.y.automin() || pic.scale.y.automax()) my=autoscale(pic.userMin().y,pic.userMax().y,pic.scale.y.scale); if(pic.scale.y.automin) { if(pic.scale.y.automin()) pic.userMiny(my.min); } else pic.userMiny(min(pic.scale.y.T(min),pic.scale.y.T(max))); if(pic.scale.y.automax) { if(pic.scale.y.automax()) pic.userMaxy(my.max); } else pic.userMaxy(max(pic.scale.y.T(min),pic.scale.y.T(max))); if(crop) { pair userMin=pic.userMin(); pair userMax=pic.userMax(); pic.bounds.yclip(userMin.y,userMax.y); pic.clip(userMin, userMax, new void (frame f, transform t, transform T, pair, pair) { frame Tinvf=T == identity() ? f : t*inverse(T)*inverse(t)*f; clip(f,T*box(((min(Tinvf)).x,(t*userMin).y), ((max(Tinvf)).x,(t*userMax).y))); }); } } // Crop a picture to the current user-space picture limits. void crop(picture pic=currentpicture) { xlimits(pic,false); ylimits(pic,false); if(pic.userSetx() && pic.userSety()) clip(pic,box(pic.userMin(),pic.userMax())); } // Restrict the x and y limits to box(min,max). void limits(picture pic=currentpicture, pair min, pair max, bool crop=NoCrop) { xlimits(pic,min.x,max.x); ylimits(pic,min.y,max.y); if(crop && pic.userSetx() && pic.userSety()) clip(pic,box(pic.userMin(),pic.userMax())); } // Internal routine to autoscale the user limits of a picture. void autoscale(picture pic=currentpicture, axis axis) { if(!pic.scale.set) { bounds mx,my; pic.scale.set=true; if(pic.userSetx()) { mx=autoscale(pic.userMin().x,pic.userMax().x,pic.scale.x.scale); if(pic.scale.x.scale.logarithmic && floor(pic.userMin().x) == floor(pic.userMax().x)) { if(pic.scale.x.automin()) pic.userMinx2(floor(pic.userMin().x)); if(pic.scale.x.automax()) pic.userMaxx2(ceil(pic.userMax().x)); } } else {mx.min=mx.max=0; pic.scale.set=false;} if(pic.userSety()) { my=autoscale(pic.userMin().y,pic.userMax().y,pic.scale.y.scale); if(pic.scale.y.scale.logarithmic && floor(pic.userMin().y) == floor(pic.userMax().y)) { if(pic.scale.y.automin()) pic.userMiny2(floor(pic.userMin().y)); if(pic.scale.y.automax()) pic.userMaxy2(ceil(pic.userMax().y)); } } else {my.min=my.max=0; pic.scale.set=false;} pic.scale.x.tickMin=mx.min; pic.scale.x.tickMax=mx.max; pic.scale.y.tickMin=my.min; pic.scale.y.tickMax=my.max; axis.xdivisor=mx.divisor; axis.ydivisor=my.divisor; } } // Draw an x axis. void xaxis(picture pic=currentpicture, Label L="", axis axis=YZero, real xmin=-infinity, real xmax=infinity, pen p=currentpen, ticks ticks=NoTicks, arrowbar arrow=None, margin margin=NoMargin, bool above=false) { if(xmin > xmax) return; if(pic.scale.x.automin && xmin > -infinity) pic.scale.x.automin=false; if(pic.scale.x.automax && xmax < infinity) pic.scale.x.automax=false; if(!pic.scale.set) { axis(pic,axis); autoscale(pic,axis); } Label L=L.copy(); bool newticks=false; if(xmin != -infinity) { xmin=pic.scale.x.T(xmin); newticks=true; } if(xmax != infinity) { xmax=pic.scale.x.T(xmax); newticks=true; } if(newticks && pic.userSetx() && ticks != NoTicks) { if(xmin == -infinity) xmin=pic.userMin().x; if(xmax == infinity) xmax=pic.userMax().x; bounds mx=autoscale(xmin,xmax,pic.scale.x.scale); pic.scale.x.tickMin=mx.min; pic.scale.x.tickMax=mx.max; axis.xdivisor=mx.divisor; } axis(pic,axis); if(xmin == -infinity && !axis.extend) { if(pic.scale.set) xmin=pic.scale.x.automin() ? pic.scale.x.tickMin : max(pic.scale.x.tickMin,pic.userMin().x); else xmin=pic.userMin().x; } if(xmax == infinity && !axis.extend) { if(pic.scale.set) xmax=pic.scale.x.automax() ? pic.scale.x.tickMax : min(pic.scale.x.tickMax,pic.userMax().x); else xmax=pic.userMax().x; } if(L.defaultposition) L.position(axis.position); L.align(L.align,axis.align); xaxisAt(pic,L,axis,xmin,xmax,p,ticks,arrow,margin,above); if(axis.type == Both) xaxisAt(pic,L,axis,xmin,xmax,p,ticks,arrow,margin,above,true); } // Draw a y axis. void yaxis(picture pic=currentpicture, Label L="", axis axis=XZero, real ymin=-infinity, real ymax=infinity, pen p=currentpen, ticks ticks=NoTicks, arrowbar arrow=None, margin margin=NoMargin, bool above=false, bool autorotate=true) { if(ymin > ymax) return; if(pic.scale.y.automin && ymin > -infinity) pic.scale.y.automin=false; if(pic.scale.y.automax && ymax < infinity) pic.scale.y.automax=false; if(!pic.scale.set) { axis(pic,axis); autoscale(pic,axis); } Label L=L.copy(); bool newticks=false; if(ymin != -infinity) { ymin=pic.scale.y.T(ymin); newticks=true; } if(ymax != infinity) { ymax=pic.scale.y.T(ymax); newticks=true; } if(newticks && pic.userSety() && ticks != NoTicks) { if(ymin == -infinity) ymin=pic.userMin().y; if(ymax == infinity) ymax=pic.userMax().y; bounds my=autoscale(ymin,ymax,pic.scale.y.scale); pic.scale.y.tickMin=my.min; pic.scale.y.tickMax=my.max; axis.ydivisor=my.divisor; } axis(pic,axis); if(ymin == -infinity && !axis.extend) { if(pic.scale.set) ymin=pic.scale.y.automin() ? pic.scale.y.tickMin : max(pic.scale.y.tickMin,pic.userMin().y); else ymin=pic.userMin().y; } if(ymax == infinity && !axis.extend) { if(pic.scale.set) ymax=pic.scale.y.automax() ? pic.scale.y.tickMax : min(pic.scale.y.tickMax,pic.userMax().y); else ymax=pic.userMax().y; } if(L.defaultposition) L.position(axis.position); L.align(L.align,axis.align); if(autorotate && L.defaulttransform) { frame f; add(f,Label(L.s,(0,0),L.p)); if(length(max(f)-min(f)) > ylabelwidth*fontsize(L.p)) L.transform(rotate(90)); } yaxisAt(pic,L,axis,ymin,ymax,p,ticks,arrow,margin,above); if(axis.type == Both) yaxisAt(pic,L,axis,ymin,ymax,p,ticks,arrow,margin,above,true); } // Draw x and y axes. void axes(picture pic=currentpicture, Label xlabel="", Label ylabel="", bool extend=true, pair min=(-infinity,-infinity), pair max=(infinity,infinity), pen p=currentpen, arrowbar arrow=None, margin margin=NoMargin, bool above=false) { xaxis(pic,xlabel,YZero(extend),min.x,max.x,p,arrow,margin,above); yaxis(pic,ylabel,XZero(extend),min.y,max.y,p,arrow,margin,above); } // Draw a yaxis at x. void xequals(picture pic=currentpicture, Label L="", real x, bool extend=false, real ymin=-infinity, real ymax=infinity, pen p=currentpen, ticks ticks=NoTicks, arrowbar arrow=None, margin margin=NoMargin, bool above=true) { yaxis(pic,L,XEquals(x,extend),ymin,ymax,p,ticks,arrow,margin,above); } // Draw an xaxis at y. void yequals(picture pic=currentpicture, Label L="", real y, bool extend=false, real xmin=-infinity, real xmax=infinity, pen p=currentpen, ticks ticks=NoTicks, arrowbar arrow=None, margin margin=NoMargin, bool above=true) { xaxis(pic,L,YEquals(y,extend),xmin,xmax,p,ticks,arrow,margin,above); } pair Scale(picture pic=currentpicture, pair z) { return (pic.scale.x.T(z.x),pic.scale.y.T(z.y)); } real ScaleX(picture pic=currentpicture, real x) { return pic.scale.x.T(x); } real ScaleY(picture pic=currentpicture, real y) { return pic.scale.y.T(y); } // Draw a tick of length size at pair z in direction dir using pen p. void tick(picture pic=currentpicture, pair z, pair dir, real size=Ticksize, pen p=currentpen) { pair z=Scale(pic,z); pic.add(new void (frame f, transform t) { pair tz=t*z; draw(f,tz--tz+unit(dir)*size,p); }); pic.addPoint(z,p); pic.addPoint(z,unit(dir)*size,p); } void xtick(picture pic=currentpicture, explicit pair z, pair dir=N, real size=Ticksize, pen p=currentpen) { tick(pic,z,dir,size,p); } void xtick(picture pic=currentpicture, real x, pair dir=N, real size=Ticksize, pen p=currentpen) { tick(pic,(x,pic.scale.y.scale.logarithmic ? 1 : 0),dir,size,p); } void ytick(picture pic=currentpicture, explicit pair z, pair dir=E, real size=Ticksize, pen p=currentpen) { tick(pic,z,dir,size,p); } void ytick(picture pic=currentpicture, real y, pair dir=E, real size=Ticksize, pen p=currentpen) { tick(pic,(pic.scale.x.scale.logarithmic ? 1 : 0,y),dir,size,p); } void tick(picture pic=currentpicture, Label L, real value, explicit pair z, pair dir, string format="", real size=Ticksize, pen p=currentpen) { Label L=L.copy(); L.position(Scale(pic,z)); L.align(L.align,-dir); if(shift(L.T)*0 == 0) L.T=shift(dot(dir,L.align.dir) > 0 ? dir*size : ticklabelshift(L.align.dir,p))*L.T; L.p(p); if(L.s == "") L.s=format(format == "" ? defaultformat : format,value); L.s=baseline(L.s,baselinetemplate); add(pic,L); tick(pic,z,dir,size,p); } void xtick(picture pic=currentpicture, Label L, explicit pair z, pair dir=N, string format="", real size=Ticksize, pen p=currentpen) { tick(pic,L,z.x,z,dir,format,size,p); } void xtick(picture pic=currentpicture, Label L, real x, pair dir=N, string format="", real size=Ticksize, pen p=currentpen) { xtick(pic,L,(x,pic.scale.y.scale.logarithmic ? 1 : 0),dir,size,p); } void ytick(picture pic=currentpicture, Label L, explicit pair z, pair dir=E, string format="", real size=Ticksize, pen p=currentpen) { tick(pic,L,z.y,z,dir,format,size,p); } void ytick(picture pic=currentpicture, Label L, real y, pair dir=E, string format="", real size=Ticksize, pen p=currentpen) { xtick(pic,L,(pic.scale.x.scale.logarithmic ? 1 : 0,y),dir,format,size,p); } private void label(picture pic, Label L, pair z, real x, align align, string format, pen p) { Label L=L.copy(); L.position(z); L.align(align); L.p(p); if(shift(L.T)*0 == 0) L.T=shift(ticklabelshift(L.align.dir,L.p))*L.T; if(L.s == "") L.s=format(format == "" ? defaultformat : format,x); L.s=baseline(L.s,baselinetemplate); add(pic,L); } // Put a label on the x axis. void labelx(picture pic=currentpicture, Label L="", explicit pair z, align align=S, string format="", pen p=currentpen) { label(pic,L,Scale(pic,z),z.x,align,format,p); } void labelx(picture pic=currentpicture, Label L="", real x, align align=S, string format="", pen p=currentpen) { labelx(pic,L,(x,pic.scale.y.scale.logarithmic ? 1 : 0),align,format,p); } void labelx(picture pic=currentpicture, Label L, string format="", explicit pen p=currentpen) { labelx(pic,L,L.position.position,format,p); } // Put a label on the y axis. void labely(picture pic=currentpicture, Label L="", explicit pair z, align align=W, string format="", pen p=currentpen) { label(pic,L,Scale(pic,z),z.y,align,format,p); } void labely(picture pic=currentpicture, Label L="", real y, align align=W, string format="", pen p=currentpen) { labely(pic,L,(pic.scale.x.scale.logarithmic ? 1 : 0,y),align,format,p); } void labely(picture pic=currentpicture, Label L, string format="", explicit pen p=currentpen) { labely(pic,L,L.position.position,format,p); } private string noprimary="Primary axis must be drawn before secondary axis"; // Construct a secondary X axis picture secondaryX(picture primary=currentpicture, void f(picture)) { if(!primary.scale.set) abort(noprimary); picture pic; size(pic,primary); if(primary.userMax().x == primary.userMin().x) return pic; f(pic); if(!pic.userSetx()) return pic; bounds a=autoscale(pic.userMin().x,pic.userMax().x,pic.scale.x.scale); real bmin=pic.scale.x.automin() ? a.min : pic.userMin().x; real bmax=pic.scale.x.automax() ? a.max : pic.userMax().x; real denom=bmax-bmin; if(denom != 0) { pic.erase(); real m=(primary.userMax().x-primary.userMin().x)/denom; pic.scale.x.postscale=Linear(m,bmin-primary.userMin().x/m); pic.scale.set=true; pic.scale.x.tickMin=pic.scale.x.postscale.T(a.min); pic.scale.x.tickMax=pic.scale.x.postscale.T(a.max); pic.scale.y.tickMin=primary.userMin().y; pic.scale.y.tickMax=primary.userMax().y; axis.xdivisor=a.divisor; f(pic); } pic.userCopy(primary); return pic; } // Construct a secondary Y axis picture secondaryY(picture primary=currentpicture, void f(picture)) { if(!primary.scale.set) abort(noprimary); picture pic; size(pic,primary); if(primary.userMax().y == primary.userMin().y) return pic; f(pic); if(!pic.userSety()) return pic; bounds a=autoscale(pic.userMin().y,pic.userMax().y,pic.scale.y.scale); real bmin=pic.scale.y.automin() ? a.min : pic.userMin().y; real bmax=pic.scale.y.automax() ? a.max : pic.userMax().y; real denom=bmax-bmin; if(denom != 0) { pic.erase(); real m=(primary.userMax().y-primary.userMin().y)/denom; pic.scale.y.postscale=Linear(m,bmin-primary.userMin().y/m); pic.scale.set=true; pic.scale.x.tickMin=primary.userMin().x; pic.scale.x.tickMax=primary.userMax().x; pic.scale.y.tickMin=pic.scale.y.postscale.T(a.min); pic.scale.y.tickMax=pic.scale.y.postscale.T(a.max); axis.ydivisor=a.divisor; f(pic); } pic.userCopy(primary); return pic; } typedef guide graph(pair f(real), real, real, int); typedef guide[] multigraph(pair f(real), real, real, int); graph graph(interpolate join) { return new guide(pair f(real), real a, real b, int n) { real width=b-a; return n == 0 ? join(f(a)) : join(...sequence(new guide(int i) {return f(a+(i/n)*width);},n+1)); }; } multigraph graph(interpolate join, bool3 cond(real)) { return new guide[](pair f(real), real a, real b, int n) { real width=b-a; if(n == 0) return new guide[] {join(cond(a) ? f(a) : nullpath)}; guide[] G; guide[] g; for(int i=0; i < n+1; ++i) { real t=a+(i/n)*width; bool3 b=cond(t); if(b) g.push(f(t)); else { if(g.length > 0) { G.push(join(...g)); g=new guide[] {}; } if(b == default) g.push(f(t)); } } if(g.length > 0) G.push(join(...g)); return G; }; } guide Straight(... guide[])=operator --; guide Spline(... guide[])=operator ..; interpolate Hermite(splinetype splinetype) { return new guide(... guide[] a) { int n=a.length; if(n == 0) return nullpath; real[] x,y; guide G; for(int i=0; i < n; ++i) { guide g=a[i]; int m=size(g); if(m == 0) continue; pair z=point(g,0); x.push(z.x); y.push(z.y); if(m > 1) { G=G..hermite(x,y,splinetype) & g; pair z=point(g,m); x=new real[] {z.x}; y=new real[] {z.y}; } } return G & hermite(x,y,splinetype); }; } interpolate Hermite=Hermite(Spline); guide graph(picture pic=currentpicture, real f(real), real a, real b, int n=ngraph, real T(real)=identity, interpolate join=operator --) { if(T == identity) return graph(join)(new pair(real x) { return (x,pic.scale.y.T(f(pic.scale.x.Tinv(x))));}, pic.scale.x.T(a),pic.scale.x.T(b),n); else return graph(join)(new pair(real x) { return Scale(pic,(T(x),f(T(x))));}, a,b,n); } guide[] graph(picture pic=currentpicture, real f(real), real a, real b, int n=ngraph, real T(real)=identity, bool3 cond(real), interpolate join=operator --) { if(T == identity) return graph(join,cond)(new pair(real x) { return (x,pic.scale.y.T(f(pic.scale.x.Tinv(x))));}, pic.scale.x.T(a),pic.scale.x.T(b),n); else return graph(join,cond)(new pair(real x) { return Scale(pic,(T(x),f(T(x))));}, a,b,n); } guide graph(picture pic=currentpicture, real x(real), real y(real), real a, real b, int n=ngraph, real T(real)=identity, interpolate join=operator --) { if(T == identity) return graph(join)(new pair(real t) {return Scale(pic,(x(t),y(t)));},a,b,n); else return graph(join)(new pair(real t) { return Scale(pic,(x(T(t)),y(T(t)))); },a,b,n); } guide[] graph(picture pic=currentpicture, real x(real), real y(real), real a, real b, int n=ngraph, real T(real)=identity, bool3 cond(real), interpolate join=operator --) { if(T == identity) return graph(join,cond)(new pair(real t) {return Scale(pic,(x(t),y(t)));}, a,b,n); else return graph(join,cond)(new pair(real t) { return Scale(pic,(x(T(t)),y(T(t))));}, a,b,n); } guide graph(picture pic=currentpicture, pair z(real), real a, real b, int n=ngraph, real T(real)=identity, interpolate join=operator --) { if(T == identity) return graph(join)(new pair(real t) {return Scale(pic,z(t));},a,b,n); else return graph(join)(new pair(real t) { return Scale(pic,z(T(t))); },a,b,n); } guide[] graph(picture pic=currentpicture, pair z(real), real a, real b, int n=ngraph, real T(real)=identity, bool3 cond(real), interpolate join=operator --) { if(T == identity) return graph(join,cond)(new pair(real t) {return Scale(pic,z(t));},a,b,n); else return graph(join,cond)(new pair(real t) { return Scale(pic,z(T(t))); },a,b,n); } string conditionlength="condition array has different length than data"; void checkconditionlength(int x, int y) { checklengths(x,y,conditionlength); } guide graph(picture pic=currentpicture, pair[] z, interpolate join=operator --) { int i=0; return graph(join)(new pair(real) { pair w=Scale(pic,z[i]); ++i; return w; },0,0,z.length-1); } guide[] graph(picture pic=currentpicture, pair[] z, bool3[] cond, interpolate join=operator --) { int n=z.length; int i=0; pair w; checkconditionlength(cond.length,n); bool3 condition(real) { bool3 b=cond[i]; if(b != false) w=Scale(pic,z[i]); ++i; return b; } return graph(join,condition)(new pair(real) {return w;},0,0,n-1); } guide graph(picture pic=currentpicture, real[] x, real[] y, interpolate join=operator --) { int n=x.length; checklengths(n,y.length); int i=0; return graph(join)(new pair(real) { pair w=Scale(pic,(x[i],y[i])); ++i; return w; },0,0,n-1); } guide[] graph(picture pic=currentpicture, real[] x, real[] y, bool3[] cond, interpolate join=operator --) { int n=x.length; checklengths(n,y.length); int i=0; pair w; checkconditionlength(cond.length,n); bool3 condition(real) { bool3 b=cond[i]; if(b != false) w=Scale(pic,(x[i],y[i])); ++i; return b; } return graph(join,condition)(new pair(real) {return w;},0,0,n-1); } // Connect points in z into segments corresponding to consecutive true elements // of b using interpolation operator join. path[] segment(pair[] z, bool[] cond, interpolate join=operator --) { checkconditionlength(cond.length,z.length); int[][] segment=segment(cond); return sequence(new path(int i) {return join(...z[segment[i]]);}, segment.length); } pair polar(real r, real theta) { return r*expi(theta); } guide polargraph(picture pic=currentpicture, real r(real), real a, real b, int n=ngraph, interpolate join=operator --) { return graph(join)(new pair(real theta) { return Scale(pic,polar(r(theta),theta)); },a,b,n); } guide polargraph(picture pic=currentpicture, real[] r, real[] theta, interpolate join=operator--) { int n=r.length; checklengths(n,theta.length); int i=0; return graph(join)(new pair(real) { pair w=Scale(pic,polar(r[i],theta[i])); ++i; return w; },0,0,n-1); } void errorbar(picture pic, pair z, pair dp, pair dm, pen p=currentpen, real size=0) { real dmx=-abs(dm.x); real dmy=-abs(dm.y); real dpx=abs(dp.x); real dpy=abs(dp.y); if(dmx != dpx) draw(pic,Scale(pic,z+(dmx,0))--Scale(pic,z+(dpx,0)),p, Bars(size)); if(dmy != dpy) draw(pic,Scale(pic,z+(0,dmy))--Scale(pic,z+(0,dpy)),p, Bars(size)); } void errorbars(picture pic=currentpicture, pair[] z, pair[] dp, pair[] dm={}, bool[] cond={}, pen p=currentpen, real size=0) { if(dm.length == 0) dm=dp; int n=z.length; checklengths(n,dm.length); checklengths(n,dp.length); bool all=cond.length == 0; if(!all) checkconditionlength(cond.length,n); for(int i=0; i < n; ++i) { if(all || cond[i]) errorbar(pic,z[i],dp[i],dm[i],p,size); } } void errorbars(picture pic=currentpicture, real[] x, real[] y, real[] dpx, real[] dpy, real[] dmx={}, real[] dmy={}, bool[] cond={}, pen p=currentpen, real size=0) { if(dmx.length == 0) dmx=dpx; if(dmy.length == 0) dmy=dpy; int n=x.length; checklengths(n,y.length); checklengths(n,dpx.length); checklengths(n,dpy.length); checklengths(n,dmx.length); checklengths(n,dmy.length); bool all=cond.length == 0; if(!all) checkconditionlength(cond.length,n); for(int i=0; i < n; ++i) { if(all || cond[i]) errorbar(pic,(x[i],y[i]),(dpx[i],dpy[i]),(dmx[i],dmy[i]),p,size); } } void errorbars(picture pic=currentpicture, real[] x, real[] y, real[] dpy, bool[] cond={}, pen p=currentpen, real size=0) { errorbars(pic,x,y,0*x,dpy,cond,p,size); } // Return a vector field on path g, specifying the vector as a function of the // relative position along path g in [0,1]. picture vectorfield(path vector(real), path g, int n, bool truesize=false, pen p=currentpen, arrowbar arrow=Arrow, margin margin=PenMargin) { picture pic; for(int i=0; i < n; ++i) { real x=(n == 1) ? 0.5 : i/(n-1); if(truesize) draw(relpoint(g,x),pic,vector(x),p,arrow); else draw(pic,shift(relpoint(g,x))*vector(x),p,arrow,margin); } return pic; } real maxlength(pair a, pair b, int nx, int ny) { return min((b.x-a.x)/nx,(b.y-a.y)/ny); } // return a vector field over box(a,b). picture vectorfield(path vector(pair), pair a, pair b, int nx=nmesh, int ny=nx, bool truesize=false, real maxlength=truesize ? 0 : maxlength(a,b,nx,ny), bool cond(pair z)=null, pen p=currentpen, arrowbar arrow=Arrow, margin margin=PenMargin) { picture pic; real dx=1/nx; real dy=1/ny; bool all=cond == null; real scale; if(maxlength > 0) { real size(pair z) { path g=vector(z); return abs(point(g,size(g)-1)-point(g,0)); } real max=size(a); for(int i=0; i <= nx; ++i) { real x=interp(a.x,b.x,i*dx); for(int j=0; j <= ny; ++j) max=max(max,size((x,interp(a.y,b.y,j*dy)))); } scale=max > 0 ? maxlength/max : 1; } else scale=1; for(int i=0; i <= nx; ++i) { real x=interp(a.x,b.x,i*dx); for(int j=0; j <= ny; ++j) { real y=interp(a.y,b.y,j*dy); pair z=(x,y); if(all || cond(z)) { path g=scale(scale)*vector(z); if(truesize) draw(z,pic,g,p,arrow); else draw(pic,shift(z)*g,p,arrow,margin); } } } return pic; } // True arc path Arc(pair c, real r, real angle1, real angle2, bool direction, int n=nCircle) { angle1=radians(angle1); angle2=radians(angle2); if(direction) { if(angle1 >= angle2) angle1 -= 2pi; } else if(angle2 >= angle1) angle2 -= 2pi; return shift(c)*polargraph(new real(real t){return r;},angle1,angle2,n, operator ..); } path Arc(pair c, real r, real angle1, real angle2, int n=nCircle) { return Arc(c,r,angle1,angle2,angle2 >= angle1 ? CCW : CW,n); } path Arc(pair c, explicit pair z1, explicit pair z2, bool direction=CCW, int n=nCircle) { return Arc(c,abs(z1-c),degrees(z1-c),degrees(z2-c),direction,n); } // True circle path Circle(pair c, real r, int n=nCircle) { return Arc(c,r,0,360,n)&cycle; } ./asymptote-2.41/base/plain_boxes.asy0000644000175000017500000000773113064427076017506 0ustar norbertnorbert// Draw and/or fill a box on frame dest using the dimensions of frame src. path box(frame dest, frame src=dest, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true) { pair z=(xmargin,ymargin); int sign=filltype == NoFill ? 1 : -1; pair h=0.5*sign*(max(p)-min(p)); path g=box(min(src)-h-z,max(src)+h+z); frame F; if(above == false) { filltype.fill(F,g,p); prepend(dest,F); } else filltype.fill(dest,g,p); return g; } path roundbox(frame dest, frame src=dest, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true) { pair m=min(src); pair M=max(src); pair bound=M-m; int sign=filltype == NoFill ? 1 : -1; real a=bound.x+2*xmargin; real b=bound.y+2*ymargin; real ds=0; real dw=min(a,b)*0.3; path g=shift(m-(xmargin,ymargin))*((0,dw)--(0,b-dw){up}..{right} (dw,b)--(a-dw,b){right}..{down} (a,b-dw)--(a,dw){down}..{left} (a-dw,0)--(dw,0){left}..{up}cycle); frame F; if(above == false) { filltype.fill(F,g,p); prepend(dest,F); } else filltype.fill(dest,g,p); return g; } path ellipse(frame dest, frame src=dest, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true) { pair m=min(src); pair M=max(src); pair D=M-m; static real factor=0.5*sqrt(2); int sign=filltype == NoFill ? 1 : -1; pair h=0.5*sign*(max(p)-min(p)); path g=ellipse(0.5*(M+m),factor*D.x+h.x+xmargin,factor*D.y+h.y+ymargin); frame F; if(above == false) { filltype.fill(F,g,p); prepend(dest,F); } else filltype.fill(dest,g,p); return g; } path box(frame f, Label L, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true) { add(f,L); return box(f,xmargin,ymargin,p,filltype,above); } path roundbox(frame f, Label L, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true) { add(f,L); return roundbox(f,xmargin,ymargin,p,filltype,above); } path ellipse(frame f, Label L, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true) { add(f,L); return ellipse(f,xmargin,ymargin,p,filltype,above); } typedef path envelope(frame dest, frame src=dest, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true); object object(Label L, envelope e, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true) { object F; F.L=L.copy(); Label L0=L.copy(); L0.position(0); L0.p(p); add(F.f,L0); F.g=e(F.f,xmargin,ymargin,p,filltype); return F; } object draw(picture pic=currentpicture, Label L, envelope e, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true) { object F=object(L,e,xmargin,ymargin,p,filltype,above); pic.add(new void (frame f, transform t) { frame d; add(d,t,F.L); e(f,d,xmargin,ymargin,p,filltype,above); add(f,d); },true); pic.addBox(L.position,L.position,min(F.f),max(F.f)); return F; } object draw(picture pic=currentpicture, Label L, envelope e, pair position, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill, bool above=true) { return draw(pic,Label(L,position),e,xmargin,ymargin,p,filltype,above); } pair point(object F, pair dir, transform t=identity()) { pair m=min(F.g); pair M=max(F.g); pair c=0.5*(m+M); pair z=t*F.L.position; real[] T=intersect(F.g,c--2*(m+realmult(rectify(dir),M-m))-c); if(T.length == 0) return z; return z+point(F.g,T[0]); } frame bbox(picture pic=currentpicture, real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill) { frame f=pic.fit(max(pic.xsize-2*xmargin,0),max(pic.ysize-2*ymargin,0)); box(f,xmargin,ymargin,p,filltype,above=false); return f; } ./asymptote-2.41/base/metapost.asy0000644000175000017500000000037513064427076017034 0ustar norbertnorbert// MetaPost compatibility routines path cuttings; path cutbefore(path p, path q) { slice s=firstcut(p,q); cuttings=s.before; return s.after; } path cutafter(path p, path q) { slice s=lastcut(p,q); cuttings=s.after; return s.before; } ./asymptote-2.41/base/plain_markers.asy0000644000175000017500000002570713064427076020035 0ustar norbertnorbertreal legendlinelength=50; real legendhskip=1.2; real legendvskip=legendhskip; real legendmargin=10; real legendmaxrelativewidth=1; // Return a unit polygon with n sides. path polygon(int n) { guide g; for(int i=0; i < n; ++i) g=g--expi(2pi*(i+0.5)/n-0.5*pi); return g--cycle; } // Return a unit n-point cyclic cross, with optional inner radius r and // end rounding. path cross(int n, bool round=true, real r=0) { assert(n > 1); real r=min(r,1); real theta=pi/n; real s=sin(theta); real c=cos(theta); pair z=(c,s); transform mirror=reflect(0,z); pair p1=(r,0); path elementary; if(round) { pair e1=p1+z*max(1-r*(s+c),0); elementary=p1--e1..(c,s)..mirror*e1--mirror*p1; } else { pair p2=p1+z*(max(sqrt(1-(r*s)^2)-r*c),0); elementary=p1--p2--mirror*p2--mirror*p1; } guide g; real step=360/n; for(int i=0; i < n; ++i) g=g--rotate(i*step-90)*elementary; return g--cycle; } path[] plus=(-1,0)--(1,0)^^(0,-1)--(0,1); typedef void markroutine(picture pic=currentpicture, frame f, path g); // On picture pic, add frame f about every node of path g. void marknodes(picture pic=currentpicture, frame f, path g) { for(int i=0; i < size(g); ++i) add(pic,f,point(g,i)); } // On picture pic, add n copies of frame f to path g, evenly spaced in // arclength. // If rotated=true, the frame will be rotated by the angle of the tangent // to the path at the points where the frame will be added. // If centered is true, center the frames within n evenly spaced arclength // intervals. markroutine markuniform(bool centered=false, int n, bool rotated=false) { return new void(picture pic=currentpicture, frame f, path g) { if(n <= 0) return; void add(real x) { real t=reltime(g,x); add(pic,rotated ? rotate(degrees(dir(g,t)))*f : f,point(g,t)); } if(centered) { real width=1/n; for(int i=0; i < n; ++i) add((i+0.5)*width); } else { if(n == 1) add(0.5); else { real width=1/(n-1); for(int i=0; i < n; ++i) add(i*width); } } }; } // On picture pic, add frame f at points z(t) for n evenly spaced values of // t in [a,b]. markroutine markuniform(pair z(real t), real a, real b, int n) { return new void(picture pic=currentpicture, frame f, path) { real width=b-a; for(int i=0; i <= n; ++i) { add(pic,f,z(a+i/n*width)); } }; } struct marker { frame f; bool above=true; markroutine markroutine=marknodes; void mark(picture pic=currentpicture, path g) { markroutine(pic,f,g); }; } marker marker(frame f=newframe, markroutine markroutine=marknodes, bool above=true) { marker m=new marker; m.f=f; m.above=above; m.markroutine=markroutine; return m; } marker marker(path[] g, markroutine markroutine=marknodes, pen p=currentpen, filltype filltype=NoFill, bool above=true) { frame f; filltype.fill(f,g,p); return marker(f,markroutine,above); } // On picture pic, add path g with opacity thinning about every node. marker markthin(path g, pen p=currentpen, real thin(real fraction)=new real(real x) {return x^2;}, filltype filltype=NoFill) { marker M=new marker; M.above=true; filltype.fill(M.f,g,p); real factor=1/abs(size(M.f)); M.markroutine=new void(picture pic=currentpicture, frame, path G) { transform t=pic.calculateTransform(); int n=size(G); for(int i=0; i < n; ++i) { pair z=point(G,i); frame f; real fraction=1; if(i > 0) fraction=min(fraction,abs(t*(z-point(G,i-1)))*factor); if(i < n-1) fraction=min(fraction,abs(t*(point(G,i+1)-z))*factor); filltype.fill(f,g,p+opacity(thin(fraction))); add(pic,f,point(G,i)); } }; return M; } marker nomarker; real circlescale=0.85; path[] MarkPath={scale(circlescale)*unitcircle, polygon(3),polygon(4),polygon(5),invert*polygon(3), cross(4),cross(6)}; marker[] Mark=sequence(new marker(int i) {return marker(MarkPath[i]);}, MarkPath.length); marker[] MarkFill=sequence(new marker(int i) {return marker(MarkPath[i],Fill);}, MarkPath.length-2); marker Mark(int n) { n=n % (Mark.length+MarkFill.length); if(n < Mark.length) return Mark[n]; else return MarkFill[n-Mark.length]; } picture legenditem(Legend legenditem, real linelength) { picture pic; pair z1=(0,0); pair z2=z1+(linelength,0); if(!legenditem.above && !empty(legenditem.mark)) marknodes(pic,legenditem.mark,interp(z1,z2,0.5)); if(linelength > 0) Draw(pic,z1--z2,legenditem.p); if(legenditem.above && !empty(legenditem.mark)) marknodes(pic,legenditem.mark,interp(z1,z2,0.5)); if(legenditem.plabel != invisible) label(pic,legenditem.label,z2,E,legenditem.plabel); else label(pic,legenditem.label,z2,E,currentpen); return pic; } picture legend(Legend[] Legend, int perline=1, real linelength, real hskip, real vskip, real maxwidth=0, real maxheight=0, bool hstretch=false, bool vstretch=false) { if(maxwidth <= 0) hstretch=false; if(maxheight <= 0) vstretch=false; if(Legend.length <= 1) vstretch=hstretch=false; picture inset; size(inset,0,0,IgnoreAspect); if(Legend.length == 0) return inset; // Check for legend entries with lines: bool bLineEntriesAvailable=false; for(int i=0; i < Legend.length; ++i) { if(Legend[i].p != invisible) { bLineEntriesAvailable=true; break; } } real markersize=0; for(int i=0; i < Legend.length; ++i) markersize=max(markersize,size(Legend[i].mark).x); // If no legend has a line, set the line length to zero if(!bLineEntriesAvailable) linelength=0; linelength=max(linelength,markersize*(linelength == 0 ? 1 : 2)); // Get the maximum dimensions per legend entry; // calculate line length for a one-line legend real heightPerEntry=0; real widthPerEntry=0; real totalwidth=0; for(int i=0; i < Legend.length; ++i) { picture pic=legenditem(Legend[i],linelength); pair lambda=size(pic); heightPerEntry=max(heightPerEntry,lambda.y); widthPerEntry=max(widthPerEntry,lambda.x); if(Legend[i].p != invisible) totalwidth += lambda.x; else { // Legend entries without leading line need less space in one-line legends picture pic=legenditem(Legend[i],0); totalwidth += size(pic).x; } } // Does everything fit into one line? if(((perline < 1) || (perline >= Legend.length)) && (maxwidth >= totalwidth+(totalwidth/Legend.length)* (Legend.length-1)*(hskip-1))) { // One-line legend real currPosX=0; real itemDistance; if(hstretch) itemDistance=(maxwidth-totalwidth)/(Legend.length-1); else itemDistance=(totalwidth/Legend.length)*(hskip-1); for(int i=0; i < Legend.length; ++i) { picture pic=legenditem(Legend[i], Legend[i].p == invisible ? 0 : linelength); add(inset,pic,(currPosX,0)); currPosX += size(pic).x+itemDistance; } } else { // multiline legend if(maxwidth > 0) { int maxperline=floor(maxwidth/(widthPerEntry*hskip)); if((perline < 1) || (perline > maxperline)) perline=maxperline; } if(perline < 1) // This means: maxwidth < widthPerEntry perline=1; if(perline <= 1) hstretch=false; if(hstretch) hskip=(maxwidth/widthPerEntry-perline)/(perline-1)+1; if(vstretch) { int rows=ceil(Legend.length/perline); vskip=(maxheight/heightPerEntry-rows)/(rows-1)+1; } if(hstretch && (perline == 1)) { Draw(inset,(0,0)--(maxwidth,0),invisible()); for(int i=0; i < Legend.length; ++i) add(inset,legenditem(Legend[i],linelength), (0.5*(maxwidth-widthPerEntry), -quotient(i,perline)*heightPerEntry*vskip)); } else for(int i=0; i < Legend.length; ++i) add(inset,legenditem(Legend[i],linelength), ((i%perline)*widthPerEntry*hskip, -quotient(i,perline)*heightPerEntry*vskip)); } return inset; } frame legend(picture pic=currentpicture, int perline=1, real xmargin=legendmargin, real ymargin=xmargin, real linelength=legendlinelength, real hskip=legendhskip, real vskip=legendvskip, real maxwidth=perline == 0 ? legendmaxrelativewidth*size(pic).x : 0, real maxheight=0, bool hstretch=false, bool vstretch=false, pen p=currentpen) { frame F; if(pic.legend.length == 0) return F; F=legend(pic.legend,perline,linelength,hskip,vskip, max(maxwidth-2xmargin,0), max(maxheight-2ymargin,0), hstretch,vstretch).fit(); box(F,xmargin,ymargin,p); return F; } pair[] pairs(real[] x, real[] y) { if(x.length != y.length) abort("arrays have different lengths"); return sequence(new pair(int i) {return (x[i],y[i]);},x.length); } void dot(frame f, pair z, pen p=currentpen, filltype filltype=Fill) { if(filltype == Fill) draw(f,z,dotsize(p)+p); else { transform t=shift(z); path g=t*scale(0.5*(dotsize(p)-linewidth(p)))*unitcircle; begingroup(f); filltype.fill(f,g,p); draw(f,g,p); endgroup(f); } } void dot(picture pic=currentpicture, pair z, pen p=currentpen, filltype filltype=Fill) { pic.add(new void(frame f, transform t) { dot(f,t*z,p,filltype); },true); pic.addPoint(z,dotsize(p)+p); } void dot(picture pic=currentpicture, Label L, pair z, align align=NoAlign, string format=defaultformat, pen p=currentpen, filltype filltype=Fill) { Label L=L.copy(); L.position(z); if(L.s == "") { if(format == "") format=defaultformat; L.s="("+format(format,z.x)+","+format(format,z.y)+")"; } L.align(align,E); L.p(p); dot(pic,z,p,filltype); add(pic,L); } void dot(picture pic=currentpicture, Label[] L=new Label[], pair[] z, align align=NoAlign, string format=defaultformat, pen p=currentpen, filltype filltype=Fill) { int stop=min(L.length,z.length); for(int i=0; i < stop; ++i) dot(pic,L[i],z[i],align,format,p,filltype); for(int i=stop; i < z.length; ++i) dot(pic,z[i],p,filltype); } void dot(picture pic=currentpicture, Label[] L=new Label[], explicit path g, align align=RightSide, string format=defaultformat, pen p=currentpen, filltype filltype=Fill) { int n=size(g); int stop=min(L.length,n); for(int i=0; i < stop; ++i) dot(pic,L[i],point(g,i),-sgn(align.dir.x)*I*dir(g,i),format,p,filltype); for(int i=stop; i < n; ++i) dot(pic,point(g,i),p,filltype); } void dot(picture pic=currentpicture, path[] g, pen p=currentpen, filltype filltype=Fill) { for(int i=0; i < g.length; ++i) dot(pic,g[i],p,filltype); } void dot(picture pic=currentpicture, Label L, pen p=currentpen, filltype filltype=Fill) { dot(pic,L,L.position,p,filltype); } // A dot in a frame. frame dotframe(pen p=currentpen, filltype filltype=Fill) { frame f; dot(f,(0,0),p,filltype); return f; } frame dotframe=dotframe(); marker dot(pen p=currentpen, filltype filltype=Fill) { return marker(dotframe(p,filltype)); } marker dot=dot(); ./asymptote-2.41/base/plain_debugger.asy0000644000175000017500000000421313064427076020142 0ustar norbertnorbertint debuggerlines=5; int sourceline(string file, string text) { string file=locatefile(file); string[] source=input(file); for(int line=0; line < source.length; ++line) if(find(source[line],text) >= 0) return line+1; write("no matching line in "+file+": \""+text+"\""); return 0; } void stop(string file, string text, code s=quote{}) { int line=sourceline(file,text); if(line > 0) stop(file,line,s); } void clear(string file, string text) { int line=sourceline(file,text); if(line > 0) clear(file,line); } // Enable debugging. bool debugging=true; // Variables used by conditional expressions: // e.g. stop("test",2,quote{ignore=(++count <= 10);}); bool ignore; int count=0; string debugger(string file, int line, int column, code s=quote{}) { int verbose=settings.verbose; settings.verbose=0; _eval(s,true); if(ignore) { ignore=false; settings.verbose=verbose; return "c"; } static string s; if(debugging) { static string lastfile; static string[] source; bool help=false; while(true) { if(file != lastfile && file != "-") {source=input(file); lastfile=file;} write(); for(int i=max(line-debuggerlines,0); i < min(line,source.length); ++i) write(source[i]); for(int i=0; i < column-1; ++i) write(" ",none); write("^"+(verbose == 5 ? " trace" : "")); if(help) { write("c:continue f:file h:help i:inst n:next r:return s:step t:trace q:quit x:exit"); help=false; } string Prompt=file+": "+(string) line+"."+(string) column; Prompt += "? [%s] "; s=getstring(name="debug",default="h",prompt=Prompt,store=false); if(s == "h" || s == "?") {help=true; continue;} if(s == "c" || s == "s" || s == "n" || s == "i" || s == "f" || s == "r") break; if(s == "q") {debugging=false; abort();} // quit if(s == "x") {debugging=false; return "";} // exit if(s == "t") { // trace if(verbose == 0) { verbose=5; } else { verbose=0; } continue; } _eval(s+";",true); } } settings.verbose=verbose; return s; } atbreakpoint(debugger); ./asymptote-2.41/base/asy-init.el0000644000175000017500000000041413064427076016533 0ustar norbertnorbert(autoload 'asy-mode "asy-mode.el" "Asymptote major mode." t) (autoload 'lasy-mode "asy-mode.el" "hybrid Asymptote/Latex major mode." t) (autoload 'asy-insinuate-latex "asy-mode.el" "Asymptote insinuate LaTeX." t) (add-to-list 'auto-mode-alist '("\\.asy$" . asy-mode)) ./asymptote-2.41/base/asymptote.py0000755000175000017500000000234313064427076017061 0ustar norbertnorbert# Python module to feed Asymptote with commands # (modified from gnuplot.py) from subprocess import * class asy: def __init__(self): self.session = Popen(['asy','-quiet','-inpipe=0','-outpipe=2'],stdin=PIPE) self.help() def send(self, cmd): self.session.stdin.write(cmd+'\n') self.session.stdin.flush() def size(self, size): self.send("size(%d);" % size) def draw(self, str): self.send("draw(%s);" % str) def fill(self, str): self.send("fill(%s);" % str) def clip(self, str): self.send("clip(%s);" % str) def label(self, str): self.send("label(%s);" % str) def shipout(self, str): self.send("shipout(\"%s\");" % str) def erase(self): self.send("erase();") def help(self): print "Asymptote session is open. Available methods are:" print " help(), size(int), draw(str), fill(str), clip(str), label(str), shipout(str), send(str), erase()" def __del__(self): print "closing Asymptote session..." self.send('quit'); self.session.stdin.close(); self.session.wait() if __name__=="__main__": g = asy() g.size(200) g.draw("unitcircle") g.send("draw(unitsquare)") g.fill("unitsquare, blue") g.clip("unitcircle") g.label("\"$O$\", (0,0), SW") raw_input("press ENTER to continue") g.erase() del g ./asymptote-2.41/base/plain_paths.asy0000644000175000017500000002213513064427076017500 0ustar norbertnorbertpath nullpath; typedef guide interpolate(... guide[]); // These numbers identify the side of a specifier in an operator spec or // operator curl expression: // a{out} .. {in}b restricted int JOIN_OUT=0; restricted int JOIN_IN=1; // Define a.. tension t ..b to be equivalent to // a.. tension t and t ..b // and likewise with controls. tensionSpecifier operator tension(real t, bool atLeast) { return operator tension(t,t,atLeast); } guide operator controls(pair z) { return operator controls(z,z); } guide[] operator cast(pair[] z) { return sequence(new guide(int i) {return z[i];},z.length); } path[] operator cast(pair[] z) { return sequence(new path(int i) {return z[i];},z.length); } path[] operator cast(guide[] g) { return sequence(new path(int i) {return g[i];},g.length); } guide[] operator cast(path[] g) { return sequence(new guide(int i) {return g[i];},g.length); } path[] operator cast(path p) { return new path[] {p}; } path[] operator cast(guide g) { return new path[] {(path) g}; } path[] operator ^^ (path p, path q) { return new path[] {p,q}; } path[] operator ^^ (path p, explicit path[] q) { return concat(new path[] {p},q); } path[] operator ^^ (explicit path[] p, path q) { return concat(p,new path[] {q}); } path[] operator ^^ (explicit path[] p, explicit path[] q) { return concat(p,q); } path[] operator * (transform t, explicit path[] p) { return sequence(new path(int i) {return t*p[i];},p.length); } pair[] operator * (transform t, pair[] z) { return sequence(new pair(int i) {return t*z[i];},z.length); } void write(file file, string s="", explicit path[] x, suffix suffix=none) { write(file,s); if(x.length > 0) write(file,x[0]); for(int i=1; i < x.length; ++i) { write(file,endl); write(file," ^^"); write(file,x[i]); } write(file,suffix); } void write(string s="", explicit path[] x, suffix suffix=endl) { write(stdout,s,x,suffix); } void write(file file, string s="", explicit guide[] x, suffix suffix=none) { write(file,s); if(x.length > 0) write(file,x[0]); for(int i=1; i < x.length; ++i) { write(file,endl); write(file," ^^"); write(file,x[i]); } write(file,suffix); } void write(string s="", explicit guide[] x, suffix suffix=endl) { write(stdout,s,x,suffix); } interpolate operator ..(tensionSpecifier t) { return new guide(... guide[] a) { if(a.length == 0) return nullpath; guide g=a[0]; for(int i=1; i < a.length; ++i) g=g..t..a[i]; return g; }; } interpolate operator ::=operator ..(operator tension(1,true)); interpolate operator ---=operator ..(operator tension(infinity,true)); // return an arbitrary intersection point of paths p and q pair intersectionpoint(path p, path q, real fuzz=-1) { real[] t=intersect(p,q,fuzz); if(t.length == 0) abort("paths do not intersect"); return point(p,t[0]); } // return an array containing all intersection points of the paths p and q pair[] intersectionpoints(path p, path q, real fuzz=-1) { real[][] t=intersections(p,q,fuzz); return sequence(new pair(int i) {return point(p,t[i][0]);},t.length); } pair[] intersectionpoints(explicit path[] p, explicit path[] q, real fuzz=-1) { pair[] z; for(int i=0; i < p.length; ++i) for(int j=0; j < q.length; ++j) z.append(intersectionpoints(p[i],q[j],fuzz)); return z; } struct slice { path before,after; } slice cut(path p, path knife, int n) { slice s; real[][] T=intersections(p,knife); if(T.length == 0) {s.before=p; s.after=nullpath; return s;} T.cyclic=true; real t=T[n][0]; s.before=subpath(p,0,t); s.after=subpath(p,t,length(p)); return s; } slice firstcut(path p, path knife) { return cut(p,knife,0); } slice lastcut(path p, path knife) { return cut(p,knife,-1); } pair dir(path p) { return dir(p,length(p)); } pair dir(path p, path q) { return unit(dir(p)+dir(q)); } // return the point on path p at arclength L pair arcpoint(path p, real L) { return point(p,arctime(p,L)); } // return the direction on path p at arclength L pair arcdir(path p, real L) { return dir(p,arctime(p,L)); } // return the time on path p at the relative fraction l of its arclength real reltime(path p, real l) { return arctime(p,l*arclength(p)); } // return the point on path p at the relative fraction l of its arclength pair relpoint(path p, real l) { return point(p,reltime(p,l)); } // return the direction of path p at the relative fraction l of its arclength pair reldir(path p, real l) { return dir(p,reltime(p,l)); } // return the initial point of path p pair beginpoint(path p) { return point(p,0); } // return the point on path p at half of its arclength pair midpoint(path p) { return relpoint(p,0.5); } // return the final point of path p pair endpoint(path p) { return point(p,length(p)); } path operator &(path p, cycleToken tok) { int n=length(p); if(n < 0) return nullpath; if(n == 0) return p--cycle; if(cyclic(p)) return p; return straight(p,n-1) ? subpath(p,0,n-1)--cycle : subpath(p,0,n-1)..controls postcontrol(p,n-1) and precontrol(p,n)..cycle; } // return a cyclic path enclosing a region bounded by a list of two or more // consecutively intersecting paths path buildcycle(... path[] p) { int n=p.length; if(n < 2) return nullpath; real[] ta=new real[n]; real[] tb=new real[n]; if(n == 2) { real[][] t=intersections(p[0],p[1]); if(t.length < 2) return nullpath; int k=t.length-1; ta[0]=t[0][0]; tb[0]=t[k][0]; ta[1]=t[k][1]; tb[1]=t[0][1]; } else { int j=n-1; for(int i=0; i < n; ++i) { real[][] t=intersections(p[i],p[j]); if(t.length == 0) return nullpath; ta[i]=t[0][0]; tb[j]=t[0][1]; j=i; } } pair c; for(int i=0; i < n ; ++i) c += point(p[i],ta[i]); c /= n; path G; for(int i=0; i < n ; ++i) { real Ta=ta[i]; real Tb=tb[i]; if(cyclic(p[i])) { int L=length(p[i]); real t=Tb-L; if(abs(c-point(p[i],0.5(Ta+t))) < abs(c-point(p[i],0.5(Ta+Tb)))) Tb=t; while(Tb < Ta) Tb += L; } G=G&subpath(p[i],Ta,Tb); } return G&cycle; } // return 1 if p strictly contains q, // -1 if q strictly contains p, // 0 otherwise. int inside(path p, path q, pen fillrule=currentpen) { if(intersect(p,q).length > 0) return 0; if(cyclic(p) && inside(p,point(q,0),fillrule)) return 1; if(cyclic(q) && inside(q,point(p,0),fillrule)) return -1; return 0; } // Return an arbitrary point strictly inside a cyclic path p according to // the specified fill rule. pair inside(path p, pen fillrule=currentpen) { if(!cyclic(p)) abort("path is not cyclic"); int n=length(p); for(int i=0; i < n; ++i) { pair z=point(p,i); pair dir=dir(p,i); if(dir == 0) continue; real[] T=intersections(p,z,z+I*dir); // Check midpoints of line segments formed between the // corresponding intersection points and z. for(int j=0; j < T.length; ++j) { if(T[j] != i) { pair w=point(p,T[j]); pair m=0.5*(z+w); if(interior(windingnumber(p,m),fillrule)) return m; } } } // cannot find an interior point: path is degenerate return point(p,0); } // Return all intersection times of path g with the vertical line through (x,0). real[] times(path p, real x) { return intersections(p,(x,0),(x,1)); } // Return all intersection times of path g with the horizontal line through // (0,z.y). real[] times(path p, explicit pair z) { return intersections(p,(0,z.y),(1,z.y)); } path randompath(int n, bool cumulate=true, interpolate join=operator ..) { guide g; pair w; for(int i=0; i <= n; ++i) { pair z=(unitrand()-0.5,unitrand()-0.5); if(cumulate) w += z; else w=z; g=join(g,w); } return g; } path[] strokepath(path g, pen p=currentpen) { path[] G=_strokepath(g,p); if(G.length == 0) return G; pair center(path g) {return 0.5*(min(g)+max(g));} pair center(path[] g) {return 0.5*(min(g)+max(g));} return shift(center(g)-center(G))*G; } real braceinnerangle=radians(60); real braceouterangle=radians(70); real bracemidangle=radians(0); real bracedefaultratio=0.14; path brace(pair a, pair b, real amplitude=bracedefaultratio*length(b-a)) { real length=length(b-a); real sign=sgn(amplitude); real hamplitude=0.5*amplitude; real hlength=0.5*length; path brace; if(abs(amplitude) < bracedefaultratio*length) { real slope=2*bracedefaultratio; real controldist=(abs(hamplitude))/slope; brace=(0,0){expi(sign*braceouterangle)}:: {expi(sign*bracemidangle)}(controldist,hamplitude):: {expi(sign*bracemidangle)}(hlength-controldist,hamplitude):: {expi(sign*braceinnerangle)}(hlength,amplitude) {expi(-sign*braceinnerangle)}:: {expi(-sign*bracemidangle)}(hlength+controldist,hamplitude):: {expi(-sign*bracemidangle)}(length-controldist,hamplitude):: {expi(-sign*braceouterangle)}(length,0); } else { brace=(0,0){expi(sign*braceouterangle)}:: {expi(sign*bracemidangle)}(0.25*length,hamplitude):: {expi(sign*braceinnerangle)}(hlength,amplitude){expi(-sign*braceinnerangle)}:: {expi(-sign*bracemidangle)}(0.75*length,hamplitude):: {expi(-sign*braceouterangle)}(length,0); } return shift(a)*rotate(degrees(b-a,warn=false))*brace; } ./asymptote-2.41/base/plain_arcs.asy0000644000175000017500000000235313064427076017311 0ustar norbertnorbertbool CCW=true; bool CW=false; path circle(pair c, real r) { return shift(c)*scale(r)*unitcircle; } path ellipse(pair c, real a, real b) { return shift(c)*scale(a,b)*unitcircle; } // return an arc centered at c from pair z1 to z2 (assuming |z2-c|=|z1-c|), // drawing in the given direction. path arc(pair c, explicit pair z1, explicit pair z2, bool direction=CCW) { z1 -= c; real r=abs(z1); z1=unit(z1); z2=unit(z2-c); real t1=intersect(unitcircle,(0,0)--2*z1)[0]; real t2=intersect(unitcircle,(0,0)--2*z2)[0]; static int n=length(unitcircle); if(direction) { if (t1 >= t2) t1 -= n; } else if(t2 >= t1) t2 -= n; return shift(c)*scale(r)*subpath(unitcircle,t1,t2); } // return an arc centered at c with radius r from angle1 to angle2 in degrees, // drawing in the given direction. path arc(pair c, real r, real angle1, real angle2, bool direction) { return arc(c,c+r*dir(angle1),c+r*dir(angle2),direction); } // return an arc centered at c with radius r > 0 from angle1 to angle2 in // degrees, drawing counterclockwise if angle2 >= angle1 (otherwise clockwise). path arc(pair c, real r, real angle1, real angle2) { return arc(c,r,angle1,angle2,angle2 >= angle1 ? CCW : CW); } ./asymptote-2.41/base/patterns.asy0000644000175000017500000000506713064427076017043 0ustar norbertnorbert// Create a tiling named name from picture pic // with optional left-bottom margin lb and right-top margin rt. frame tiling(string name, picture pic, pair lb=0, pair rt=0) { frame tiling; frame f=pic.fit(identity()); pair pmin=min(f)-lb; pair pmax=max(f)+rt; string s="%.6f"; postscript(tiling,"<< /PaintType 1 /PatternType 1 /TilingType 1 /BBox ["+format(s,pmin.x,"C")+" "+format(s,pmin.y,"C")+" "+ format(s,pmax.x,"C")+" "+format(s,pmax.y,"C")+"] /XStep "+format(s,pmax.x-pmin.x,"C")+" /YStep "+format(s,pmax.y-pmin.y,"C")+" /PaintProc {pop"); add(tiling,f); postscript(tiling,"} >> matrix makepattern /"+name+" exch def"); return tiling; } // Add to frame preamble a tiling name constructed from picture pic // with optional left-bottom margin lb and right-top margin rt. void add(string name, picture pic, pair lb=0, pair rt=0) { add(currentpatterns,tiling(name,pic,lb,rt)); } picture tile(real Hx=5mm, real Hy=0, pen p=currentpen, filltype filltype=NoFill) { picture tiling; if(Hy == 0) Hy=Hx; path tile=box((0,0),(Hx,Hy)); tiling.add(new void (frame f, transform t) { filltype.fill(f,t*tile,p); }); clip(tiling,tile); return tiling; } picture checker(real Hx=5mm, real Hy=0, pen p=currentpen) { picture tiling; if(Hy == 0) Hy=Hx; path tile=box((0,0),(Hx,Hy)); fill(tiling,tile,p); fill(tiling,shift(Hx,Hy)*tile,p); clip(tiling,box((0,0),(2Hx,2Hy))); return tiling; } picture brick(real Hx=5mm, real Hy=0, pen p=currentpen) { picture tiling; if(Hy == 0) Hy=Hx/2; path tile=box((0,0),(Hx,Hy)); draw(tiling,tile,p); draw(tiling,(Hx/2,Hy)--(Hx/2,2Hy),p); draw(tiling,(0,2Hy)--(Hx,2Hy),p); clip(tiling,box((0,0),(Hx,2Hy))); return tiling; } real hatchepsilon=1e-4; picture hatch(real H=5mm, pair dir=NE, pen p=currentpen) { picture tiling; real theta=angle(dir); real s=sin(theta); real c=cos(theta); if(abs(s) <= hatchepsilon) { path g=(0,0)--(H,0); draw(tiling,g,p); draw(tiling,shift(0,H)*g,p); clip(tiling,scale(H)*unitsquare); } else if(abs(c) <= hatchepsilon) { path g=(0,0)--(0,H); draw(tiling,g,p); draw(tiling,shift(H,0)*g,p); clip(tiling,scale(H)*unitsquare); } else { real h=H/s; real y=H/c; path g=(0,0)--(h,y); draw(tiling,g,p); draw(tiling,shift(-h/2,y/2)*g,p); draw(tiling,shift(h/2,-y/2)*g,p); clip(tiling,box((0,0),(h,y))); } return tiling; } picture crosshatch(real H=5mm, pen p=currentpen) { picture tiling; add(tiling,hatch(H,p)); add(tiling,shift(H*sqrt(2))*rotate(90)*hatch(H,p)); return tiling; } ./asymptote-2.41/base/plain_xasy.asy0000644000175000017500000000503113064427076017341 0ustar norbertnorbertrestricted bool inXasyMode=false; bool diagnostics=false; void report(string text) { if(diagnostics) write(text); } void report(transform t) { if(diagnostics) write(t); } void report(int i) { if(diagnostics) write(i); } void initXasyMode() { size(0,0); inXasyMode=true; } void exitXasyMode() { inXasyMode=false; } private picture[] tempStore; private picture newPic; void startScript() { tempStore.push(currentpicture.copy()); newPic=new picture; currentpicture=newPic; } void endScript() { if(tempStore.length < 1) { abort("endScript() without matching beginScript()"); } else { currentpicture=tempStore.pop(); add(currentpicture,newPic.fit(),group=false); } shipped=false; } struct indexedTransform { int index; transform t; bool active; void operator init(int index, transform t, bool active=true) { this.index=index; this.t=t; this.active=active; } } struct framedTransformStack { struct transact { transform t; bool active; void operator init(transform t, bool active=true) { this.t=t; this.active=active; } void operator init(indexedTransform i){ this.t=i.t; this.active=i.active; } void operator init() { this.t=identity(); this.active=true; } } private transact[] stack; private int[] frames; private int stackBase=0; transform pop() { if(stack.length == 0) return identity(); else { transform popped=stack[0].t; stack.delete(0); report("Popped"); report(popped); return popped; } } transform pop0() { if(stack.length == 0) return identity(); else { static transform zerotransform=(0,0,0,0,0,0); transform popped=stack[0].active ? stack[0].t : zerotransform; stack.delete(0); report("Popped"); report(popped); return popped; } } void push(transform t, bool Active=true) { report("Pushed"); report(t); stack.push(transact(t,Active)); } void add(... indexedTransform[] tList) { transact[] toPush; for(int a=0; a < tList.length; ++a) toPush[tList[a].index]=transact(tList[a]); for(int a=0; a < toPush.length; ++a) if(!toPush.initialized(a)) toPush[a]=transact(); report("Added"); report(toPush.length); stack.append(toPush); } bool empty() { return stack.length == 0; } } framedTransformStack xformStack; void deconstruct(picture pic=currentpicture, real magnification=1) { deconstruct(pic.fit(),currentpatterns,magnification,xformStack.pop); } ./asymptote-2.41/base/flowchart.asy0000644000175000017500000003374713064427076017202 0ustar norbertnorbert// Flowchart routines written by Jacques Pienaar, Steve Melenchuk, John Bowman. private import math; struct flowdir {} restricted flowdir Horizontal; restricted flowdir Vertical; real minblockwidth=0; real minblockheight=0; real mincirclediameter=0; real defaultexcursion=0.1; struct block { // The absolute center of the block in user coordinates. pair center; // The size of the block pair size; // The relative center of the block. pair f_center; // These eight variables return the appropriate location on the block // in relative coordinates, where the lower left corner of the block is (0,0). pair f_top; pair f_left; pair f_right; pair f_bottom; pair f_topleft; pair f_topright; pair f_bottomleft; pair f_bottomright; void operator init(pair z) { center=z; } void operator init(real x, real y) { center=(x,y); } pair shift(transform t=identity()) { return t*center-f_center; } // Returns the relative position along the boundary of the block. pair f_position(real x); // Returns the absolute position along the boundary of the block. pair position(real x, transform t=identity()) { return shift(t)+f_position(x); } // These eight functions return the appropriate location on the block // in absolute coordinates. pair top(transform t=identity()) { return shift(t)+f_top; } pair bottom(transform t=identity()) { return shift(t)+f_bottom; } pair left(transform t=identity()) { return shift(t)+f_left; } pair right(transform t=identity()) { return shift(t)+f_right; } pair topleft(transform t=identity()) { return shift(t)+f_topleft; } pair topright(transform t=identity()) { return shift(t)+f_topright; } pair bottomleft(transform t=identity()) { return shift(t)+f_bottomleft; } pair bottomright(transform t=identity()) { return shift(t)+f_bottomright; } // Return a frame representing the block. frame draw(pen p=currentpen); // Store optional label on outgoing edge. Label label; // Store rectilinear path directions. pair[] dirs; // Store optional arrow. arrowbar arrow=None; }; // Construct a rectangular block with header and body objects. block rectangle(object header, object body, pair center=(0,0), pen headerpen=mediumgray, pen bodypen=invisible, pen drawpen=currentpen, real dx=3, real minheaderwidth=minblockwidth, real minheaderheight=minblockwidth, real minbodywidth=minblockheight, real minbodyheight=minblockheight) { frame fbody=body.f; frame fheader=header.f; pair mheader=min(fheader); pair Mheader=max(fheader); pair mbody=min(fbody); pair Mbody=max(fbody); pair bound0=Mheader-mheader; pair bound1=Mbody-mbody; real width=max(bound0.x,bound1.x); pair z0=maxbound((width+2dx,bound0.y+2dx),(minbodywidth,minbodyheight)); pair z1=maxbound((width+2dx,bound1.y+2dx),(minheaderwidth,minheaderheight)); path shape=(0,0)--(0,z1.y)--(0,z0.y+z1.y)--(z0.x,z0.y+z1.y)--z1--(z0.x,0)-- cycle; block block; block.draw=new frame(pen p) { frame block; filldraw(block,shift(0,z1.y)*box((0,0),z0),headerpen,drawpen); add(block,shift(-0.5*(Mheader+mheader))*fheader,(0,z1.y)+0.5z0); filldraw(block,box((0,0),z1),bodypen,drawpen); add(block,shift(-0.5*(Mbody+mbody))*fbody,0.5z1); return block; }; block.f_position=new pair(real x) { return point(shape,x); }; block.f_center=interp(point(shape,0),point(shape,3),0.5); block.f_bottomleft=point(shape,0); block.f_bottom=point(shape,5.5); block.f_bottomright=point(shape,5); block.f_right=point(shape,4.5); block.f_topright=point(shape,3); block.f_top=point(shape,2.5); block.f_topleft=point(shape,2); block.f_left=point(shape,0.5); block.center=center; block.size=point(shape,3); return block; } // As above, but without the header. block rectangle(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real dx=3, real minwidth=minblockwidth, real minheight=minblockheight) { frame f=body.f; pair m=min(f); pair M=max(f); pair z=maxbound(M-m+dx*(2,2),(minwidth,minheight)); path shape=box((0,0),z); block block; block.draw=new frame(pen p) { frame block; filldraw(block,shape,fillpen,drawpen); add(block,shift(-0.5*(M+m))*f,0.5z); return block; }; block.f_position=new pair(real x) { return point(shape,x); }; block.f_center=0.5*z; block.center=center; block.size=z; block.f_bottomleft=point(shape,0); block.f_bottom=point(shape,0.5); block.f_bottomright=point(shape,1); block.f_right=point(shape,1.5); block.f_topright=point(shape,2); block.f_top=point(shape,2.5); block.f_topleft=point(shape,3); block.f_left=point(shape,3.5); return block; } block parallelogram(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real dx=3, real slope=2, real minwidth=minblockwidth, real minheight=minblockheight) { frame f=body.f; pair m=min(f); pair M=max(f); pair bound=maxbound(M-m+dx*(0,2),(minwidth,minheight)); real skew=bound.y/slope; real a=bound.x+skew; real b=bound.y; path shape=(0,0)--(a,0)--(a+skew,b)--(skew,b)--cycle; block block; block.draw=new frame(pen p) { frame block; filldraw(block,shape,fillpen,drawpen); add(block,shift(-0.5*(M+m))*f,((a+skew)/2,b/2)); return block; }; block.f_position=new pair(real x) { return point(shape,x); }; block.f_center=((a+skew)/2,b/2); block.center=center; block.size=(a+skew,b); block.f_bottomleft=(0,0); block.f_bottom=((a+skew)/2,0); block.f_bottomright=(a,0); block.f_right=(a+skew/2,b/2); block.f_topright=(a+skew,b); block.f_top=((a+skew)/2,b); block.f_topleft=(skew,b); block.f_left=(skew/2,b/2); return block; } block diamond(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real ds=5, real dw=1, real height=20, real minwidth=minblockwidth, real minheight=minblockheight) { frame f=body.f; pair m=min(f); pair M=max(f); pair bound=maxbound(M-m,(minwidth,minheight)); real e=ds; real a=0.5bound.x-dw; real b=0.5bound.y; real c=b+height; real arg=a^2+b^2+c^2-2b*c-e^2; real denom=e^2-a^2; real slope=arg >= 0 && denom != 0 ? (a*(c-b)-e*sqrt(arg))/denom : 1.0; real d=abs(c/slope); path shape=(2d,c)--(d,2c)--(0,c)--(d,0)--cycle; block block; block.draw=new frame(pen p) { frame block; filldraw(block,shape,fillpen,drawpen); add(block,shift(-0.5*(M+m))*f,(d,c)); return block; }; block.f_position=new pair(real x) { return point(shape,x); }; block.f_center=(point(shape,1).x,point(shape,0).y); block.center=center; block.size=(point(shape,0).x,point(shape,1).y); block.f_bottomleft=point(shape,2.5); block.f_bottom=point(shape,3); block.f_bottomright=point(shape,3.5); block.f_right=point(shape,0); block.f_topright=point(shape,0.5); block.f_top=point(shape,1); block.f_topleft=point(shape,1.5); block.f_left=point(shape,2); return block; } block circle(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real dr=3, real mindiameter=mincirclediameter) { frame f=body.f; pair m=min(f); pair M=max(f); real r=max(0.5length(M-m)+dr,0.5mindiameter); path shape=(0,r)..(r,2r)..(2r,r)..(r,0)..cycle; block block; block.draw=new frame(pen p) { frame block; filldraw(block,shape,fillpen,drawpen); add(block,shift(-0.5*(M+m))*f,(r,r)); return block; }; block.f_position=new pair(real x) { return point(shape,x); }; block.f_center=(r,r); block.center=center; block.size=(2r,2r); block.f_left=point(shape,0); block.f_topleft=point(shape,0.5); block.f_top=point(shape,1); block.f_topright=point(shape,1.5); block.f_right=point(shape,2); block.f_bottomright=point(shape,2.5); block.f_bottom=point(shape,3); block.f_bottomleft=point(shape,3.5); return block; } block roundrectangle(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real ds=5, real dw=0, real minwidth=minblockwidth, real minheight=minblockheight) { frame f=body.f; pair m=min(f); pair M=max(f); pair bound=maxbound(M-m,(minwidth,minheight)); real a=bound.x; real b=bound.y; path shape=(0,ds+dw)--(0,ds+b-dw){up}..{right} (ds+dw,2ds+b)--(ds+a-dw,2ds+b){right}..{down} (2ds+a,ds+b-dw)--(2ds+a,ds+dw){down}..{left} (ds+a-dw,0)--(ds+dw,0){left}..{up}cycle; block block; block.draw=new frame(pen p) { frame block; filldraw(block,shape,fillpen,drawpen); add(block,shift(-0.5*(M+m))*f,(ds,ds)+0.5bound); return block; }; block.f_position=new pair(real x) { return point(shape,x); }; block.f_center=(ds+0.5a,ds+0.5b); block.center=center; block.size=(2ds+a,2ds+b); block.f_bottomleft=point(shape,7.5); block.f_bottom=point(shape,6.5); block.f_bottomright=point(shape,5.5); block.f_right=point(shape,4.5); block.f_topright=point(shape,3.5); block.f_top=point(shape,2.5); block.f_topleft=point(shape,1.5); block.f_left=point(shape,0.5); return block; } block bevel(object body, pair center=(0,0), pen fillpen=invisible, pen drawpen=currentpen, real dh=5, real dw=5, real minwidth=minblockwidth, real minheight=minblockheight) { frame f=body.f; pair m=min(f); pair M=max(f); pair bound=maxbound(M-m,(minwidth,minheight)); real a=bound.x; real b=0.5bound.y; path shape=(2dw+a,b+dh)--(dw+a,2b+2dh)--(dw,2b+2dh)--(0,b+dh)--(dw,0)-- (dw+a,0)--cycle; block block; block.draw=new frame(pen p) { frame block; filldraw(block,shape,fillpen,drawpen); add(block,shift(-0.5*(M+m))*f,(0.5bound+(dw,dh))); return block; }; block.f_position=new pair(real x) { return point(shape,x); }; block.f_center=(dw+0.5a,dh+b); block.center=center; block.size=(2dw+a,2dh+2b); block.f_bottomleft=point(shape,4); block.f_bottom=point(shape,4.5); block.f_bottomright=point(shape,5); block.f_right=point(shape,0); block.f_topright=point(shape,1); block.f_top=point(shape,1.5); block.f_topleft=point(shape,2); block.f_left=point(shape,3); return block; } path path(pair point[] ... flowdir dir[]) { path line=point[0]; pair current, prev=point[0]; for(int i=1; i < point.length; ++i) { if(i-1 >= dir.length || dir[i-1] == Horizontal) current=(point[i].x,point[i-1].y); else current=(point[i-1].x,point[i].y); if(current != prev) { line=line--current; prev=current; } current=point[i]; if(current != prev) { line=line--current; prev=current; } } return line; } void draw(picture pic=currentpicture, block block, pen p=currentpen) { pic.add(new void(frame f, transform t) { add(f,shift(block.shift(t))*block.draw(p)); },true); pic.addBox(block.center,block.center, -0.5*block.size+min(p),0.5*block.size+max(p)); } typedef block blockconnector(block, block); blockconnector blockconnector(picture pic, transform t, pen p=currentpen, margin margin=PenMargin) { return new block(block b1, block b2) { if(b1.dirs.length == 0) { if(abs(b1.center.y-b2.center.y) < sqrtEpsilon) { // horizontally aligned b1.dirs[0]=b1.center.x < b2.center.x ? right : left; blockconnector(pic,t,p,margin)(b1,b2); } else if(abs(b1.center.x-b2.center.x) < sqrtEpsilon) { // vertically aligned b1.dirs[0]=b1.center.y < b2.center.y ? up : down; blockconnector(pic,t,p,margin)(b1,b2); } else { if(abs(b1.center.y-b2.center.y) < abs(b1.center.x-b2.center.x)) { b1.dirs[0]=b1.center.x < b2.center.x ? right : left; b1.dirs[1]=b1.center.y < b2.center.y ? up : down; blockconnector(pic,t,p,margin)(b1,b2); } else { b1.dirs[0]=b1.center.y < b2.center.y ? up : down; b1.dirs[1]=b1.center.x < b2.center.x ? right : left; blockconnector(pic,t,p,margin)(b1,b2); } } return b2; } // compute the link for given directions (and label if any) pair[] dirs=copy(b1.dirs); // deep copy pair current,prev; pair dir=dirs[0]; if(dir == up) prev=b1.top(t); if(dir == down) prev=b1.bottom(t); if(dir == left) prev=b1.left(t); if(dir == right) prev=b1.right(t); path line=prev; arrowbar arrow=b1.arrow; int i; for(i=1; i < dirs.length-1; ++i) { if(abs(length(dirs[i-1])-1) < sqrtEpsilon) current=prev+t*dirs[i-1]*defaultexcursion; else current=prev+t*dirs[i-1]; if(current != prev) { line=line--current; prev=current; } } dir=dirs[dirs.length-1]; current=0; if(dir == up) current=b2.bottom(t); if(dir == down) current=b2.top(t); if(dir == left) current=b2.right(t); if(dir == right) current=b2.left(t); if(abs(dirs[i-1].y) < sqrtEpsilon && abs(prev.x-current.x) > sqrtEpsilon) { prev=(current.x,prev.y); line=line--prev; // horizontal } else if(abs(dirs[i-1].x) < sqrtEpsilon && abs(prev.y-current.y) > sqrtEpsilon) { prev=(prev.x,current.y); line=line--prev; } if(current != prev) line=line--current; draw(pic,b1.label,line,p,arrow,margin); b1.label=""; b1.dirs.delete(); b1.arrow=None; return b2; }; } struct Dir { pair z; void operator init(pair z) {this.z=z;} } Dir Right=Dir(right); Dir Left=Dir(left); Dir Up=Dir(up); Dir Down=Dir(down); // Add a label to the current link block operator --(block b1, Label label) { b1.label=label; return b1; } // Add a direction to the current link block operator --(block b1, Dir dir) { b1.dirs.push(dir.z); return b1; } // Add an arrowbar to the current link block operator --(block b, arrowbar arrowbar) { b.arrow=arrowbar; return b; } ./asymptote-2.41/base/contour.asy0000644000175000017500000004721113064427076016671 0ustar norbertnorbert// Contour routines written by Radoslav Marinov and John Bowman. import graph_settings; real eps=10000*realEpsilon; // 1 // 6 +-------------------+ 5 // | \ / | // | \ / | // | \ / | // | \ / | // 2 | X | 0 // | / \ | // | / \ | // | / \ | // | / \ | // 7 +-------------------+ 4 or 8 // 3 private struct segment { bool active; pair a,b; // Endpoints; a is always an edge point if one exists. int c; // Contour value. int edge; // -1: interior, 0 to 3: edge, // 4-8: single-vertex edge, 9: double-vertex edge. } // Case 1: line passes through two vertices of a triangle private segment case1(pair p0, pair p1, int edge) { // Will cause a duplicate guide; luckily case1 is rare segment rtrn; rtrn.active=true; rtrn.a=p0; rtrn.b=p1; rtrn.edge=edge; return rtrn; } // Case 2: line passes through a vertex and a side of a triangle // (the first vertex passed and the side between the other two) private segment case2(pair p0, pair p1, pair p2, real v0, real v1, real v2, int edge) { segment rtrn; pair val=interp(p1,p2,abs(v1/(v2-v1))); rtrn.active=true; if(edge < 4) { rtrn.a=val; rtrn.b=p0; } else { rtrn.a=p0; rtrn.b=val; } rtrn.edge=edge; return rtrn; } // Case 3: line passes through two sides of a triangle // (through the sides formed by the first & second, and second & third // vertices) private segment case3(pair p0, pair p1, pair p2, real v0, real v1, real v2, int edge=-1) { segment rtrn; rtrn.active=true; rtrn.a=interp(p1,p0,abs(v1/(v0-v1))); rtrn.b=interp(p1,p2,abs(v1/(v2-v1))); rtrn.edge=edge; return rtrn; } // Check if a line passes through a triangle, and draw the required line. private segment checktriangle(pair p0, pair p1, pair p2, real v0, real v1, real v2, int edge=-1) { // default null return static segment dflt; real eps=eps*max(abs(v0),abs(v1),abs(v2)); if(v0 < -eps) { if(v1 < -eps) { if(v2 < -eps) return dflt; // nothing to do else if(v2 <= eps) return dflt; // nothing to do else return case3(p0,p2,p1,v0,v2,v1); } else if(v1 <= eps) { if(v2 < -eps) return dflt; // nothing to do else if(v2 <= eps) return case1(p1,p2,5+edge); else return case2(p1,p0,p2,v1,v0,v2,5+edge); } else { if(v2 < -eps) return case3(p0,p1,p2,v0,v1,v2,edge); else if(v2 <= eps) return case2(p2,p0,p1,v2,v0,v1,edge); else return case3(p1,p0,p2,v1,v0,v2,edge); } } else if(v0 <= eps) { if(v1 < -eps) { if(v2 < -eps) return dflt; // nothing to do else if(v2 <= eps) return case1(p0,p2,4+edge); else return case2(p0,p1,p2,v0,v1,v2,4+edge); } else if(v1 <= eps) { if(v2 < -eps) return case1(p0,p1,9); else if(v2 <= eps) return dflt; // use finer partitioning. else return case1(p0,p1,9); } else { if(v2 < -eps) return case2(p0,p1,p2,v0,v1,v2,4+edge); else if(v2 <= eps) return case1(p0,p2,4+edge); else return dflt; // nothing to do } } else { if(v1 < -eps) { if(v2 < -eps) return case3(p1,p0,p2,v1,v0,v2,edge); else if(v2 <= eps) return case2(p2,p0,p1,v2,v0,v1,edge); else return case3(p0,p1,p2,v0,v1,v2,edge); } else if(v1 <= eps) { if(v2 < -eps) return case2(p1,p0,p2,v1,v0,v2,5+edge); else if(v2 <= eps) return case1(p1,p2,5+edge); else return dflt; // nothing to do } else { if(v2 < -eps) return case3(p0,p2,p1,v0,v2,v1); else if(v2 <= eps) return dflt; // nothing to do else return dflt; // nothing to do } } } // Collect connecting path segments. private void collect(pair[][][] points, real[] c) { // use to reverse an array, omitting the first point int[] reverseF(int n) {return sequence(new int(int x){return n-1-x;},n-1);} // use to reverse an array, omitting the last point int[] reverseL(int n) {return sequence(new int(int x){return n-2-x;},n-1);} for(int cnt=0; cnt < c.length; ++cnt) { pair[][] gdscnt=points[cnt]; for(int i=0; i < gdscnt.length; ++i) { pair[] gig=gdscnt[i]; int Li=gig.length; for(int j=i+1; j < gdscnt.length; ++j) { pair[] gjg=gdscnt[j]; int Lj=gjg.length; if(abs(gig[0]-gjg[0]) < eps) { gdscnt[j]=gjg[reverseF(Lj)]; gdscnt[j].append(gig); gdscnt.delete(i); --i; break; } else if(abs(gig[0]-gjg[Lj-1]) < eps) { gig.delete(0); gdscnt[j].append(gig); gdscnt.delete(i); --i; break; } else if(abs(gig[Li-1]-gjg[0]) < eps) { gjg.delete(0); gig.append(gjg); gdscnt[j]=gig; gdscnt.delete(i); --i; break; } else if(abs(gig[Li-1]-gjg[Lj-1]) < eps) { gig.append(gjg[reverseL(Lj)]); gdscnt[j]=gig; gdscnt.delete(i); --i; break; } } } } } // Join path segments. private guide[][] connect(pair[][][] points, real[] c, interpolate join) { // set up return value guide[][] result=new guide[c.length][]; for(int cnt=0; cnt < c.length; ++cnt) { pair[][] pointscnt=points[cnt]; guide[] resultcnt=result[cnt]=new guide[pointscnt.length]; for(int i=0; i < pointscnt.length; ++i) { pair[] pts=pointscnt[i]; guide gd; if(pts.length > 0) { if(pts.length > 1 && abs(pts[0]-pts[pts.length-1]) < eps) { guide[] g=sequence(new guide(int i) { return pts[i]; },pts.length-1); g.push(cycle); gd=join(...g); } else gd=join(...sequence(new guide(int i) { return pts[i]; },pts.length)); } resultcnt[i]=gd; } } return result; } // Return contour guides for a 2D data array. // z: two-dimensional array of nonoverlapping mesh points // f: two-dimensional array of corresponding f(z) data values // midpoint: optional array containing values of f at cell midpoints // c: array of contour values // join: interpolation operator (e.g. operator -- or operator ..) guide[][] contour(pair[][] z, real[][] f, real[][] midpoint=new real[][], real[] c, interpolate join=operator --) { int nx=z.length-1; if(nx == 0) abort("array z must have length >= 2"); int ny=z[0].length-1; if(ny == 0) abort("array z[0] must have length >= 2"); c=sort(c); bool midpoints=midpoint.length > 0; segment segments[][][]=new segment[nx][ny][]; // go over region a rectangle at a time for(int i=0; i < nx; ++i) { pair[] zi=z[i]; pair[] zp=z[i+1]; real[] fi=f[i]; real[] fp=f[i+1]; real[] midpointi; if(midpoints) midpointi=midpoint[i]; segment[][] segmentsi=segments[i]; for(int j=0; j < ny; ++j) { segment[] segmentsij=segmentsi[j]; // define points pair bleft=zi[j]; pair bright=zp[j]; pair tleft=zi[j+1]; pair tright=zp[j+1]; pair middle=0.25*(bleft+bright+tleft+tright); real f00=fi[j]; real f01=fi[j+1]; real f10=fp[j]; real f11=fp[j+1]; real fmm=midpoints ? midpoint[i][j] : 0.25*(f00+f01+f10+f11); // optimization: we make sure we don't work with empty rectangles int checkcell(int cnt) { real C=c[cnt]; real vertdat0=f00-C; // bottom-left vertex real vertdat1=f10-C; // bottom-right vertex real vertdat2=f01-C; // top-left vertex real vertdat3=f11-C; // top-right vertex // optimization: we make sure we don't work with empty rectangles int countm=0; int countz=0; int countp=0; void check(real vertdat) { if(vertdat < -eps) ++countm; else { if(vertdat <= eps) ++countz; else ++countp; } } check(vertdat0); check(vertdat1); check(vertdat2); check(vertdat3); if(countm == 4) return 1; // nothing to do if(countp == 4) return -1; // nothing to do if((countm == 3 || countp == 3) && countz == 1) return 0; // go through the triangles void addseg(segment seg) { if(seg.active) { seg.c=cnt; segmentsij.push(seg); } } real vertdat4=fmm-C; addseg(checktriangle(bright,tright,middle, vertdat1,vertdat3,vertdat4,0)); addseg(checktriangle(tright,tleft,middle, vertdat3,vertdat2,vertdat4,1)); addseg(checktriangle(tleft,bleft,middle, vertdat2,vertdat0,vertdat4,2)); addseg(checktriangle(bleft,bright,middle, vertdat0,vertdat1,vertdat4,3)); return 0; } void process(int l, int u) { if(l >= u) return; int i=quotient(l+u,2); int sign=checkcell(i); if(sign == -1) process(i+1,u); else if(sign == 1) process(l,i); else { process(l,i); process(i+1,u); } } process(0,c.length); } } // set up return value pair[][][] points=new pair[c.length][][]; for(int i=0; i < nx; ++i) { segment[][] segmentsi=segments[i]; for(int j=0; j < ny; ++j) { segment[] segmentsij=segmentsi[j]; for(int k=0; k < segmentsij.length; ++k) { segment C=segmentsij[k]; if(!C.active) continue; pair[] g=new pair[] {C.a,C.b}; segmentsij[k].active=false; int forward(int I, int J, bool first=true) { if(I >= 0 && I < nx && J >= 0 && J < ny) { segment[] segmentsIJ=segments[I][J]; for(int l=0; l < segmentsIJ.length; ++l) { segment D=segmentsIJ[l]; if(!D.active) continue; if(abs(D.a-g[g.length-1]) < eps) { g.push(D.b); segmentsIJ[l].active=false; if(D.edge >= 0 && !first) return D.edge; first=false; l=-1; } else if(abs(D.b-g[g.length-1]) < eps) { g.push(D.a); segmentsIJ[l].active=false; if(D.edge >= 0 && !first) return D.edge; first=false; l=-1; } } } return -1; } int backward(int I, int J, bool first=true) { if(I >= 0 && I < nx && J >= 0 && J < ny) { segment[] segmentsIJ=segments[I][J]; for(int l=0; l < segmentsIJ.length; ++l) { segment D=segmentsIJ[l]; if(!D.active) continue; if(abs(D.a-g[0]) < eps) { g.insert(0,D.b); segmentsIJ[l].active=false; if(D.edge >= 0 && !first) return D.edge; first=false; l=-1; } else if(abs(D.b-g[0]) < eps) { g.insert(0,D.a); segmentsIJ[l].active=false; if(D.edge >= 0 && !first) return D.edge; first=false; l=-1; } } } return -1; } void follow(int f(int, int, bool first=true), int edge) { int I=i; int J=j; while(true) { static int ix[]={1,0,-1,0}; static int iy[]={0,1,0,-1}; if(edge >= 0 && edge < 4) { I += ix[edge]; J += iy[edge]; edge=f(I,J); } else { if(edge == -1) break; if(edge < 9) { int edge0=(edge-5) % 4; int edge1=(edge-4) % 4; int ix0=ix[edge0]; int iy0=iy[edge0]; I += ix0; J += iy0; // Search all 3 corner cells if((edge=f(I,J)) == -1) { I += ix[edge1]; J += iy[edge1]; if((edge=f(I,J)) == -1) { I -= ix0; J -= iy0; edge=f(I,J); } } } else { // Double-vertex edge: search all 8 surrounding cells void search() { for(int i=-1; i <= 1; ++i) { for(int j=-1; j <= 1; ++j) { if((edge=f(I+i,J+j,false)) >= 0) { I += i; J += j; return; } } } } search(); } } } } // Follow contour in cell int edge=forward(i,j,first=false); // Follow contour forward outside of cell follow(forward,edge); // Follow contour backward outside of cell follow(backward,C.edge); points[C.c].push(g); } } } collect(points,c); // Required to join remaining case1 cycles. return connect(points,c,join); } // Return contour guides for a 2D data array on a uniform lattice // f: two-dimensional array of real data values // midpoint: optional array containing data values at cell midpoints // a,b: diagonally opposite vertices of rectangular domain // c: array of contour values // join: interpolation operator (e.g. operator -- or operator ..) guide[][] contour(real[][] f, real[][] midpoint=new real[][], pair a, pair b, real[] c, interpolate join=operator --) { int nx=f.length-1; if(nx == 0) abort("array f must have length >= 2"); int ny=f[0].length-1; if(ny == 0) abort("array f[0] must have length >= 2"); pair[][] z=new pair[nx+1][ny+1]; for(int i=0; i <= nx; ++i) { pair[] zi=z[i]; real xi=interp(a.x,b.x,i/nx); for(int j=0; j <= ny; ++j) { zi[j]=(xi,interp(a.y,b.y,j/ny)); } } return contour(z,f,midpoint,c,join); } // return contour guides for a real-valued function // f: real-valued function of two real variables // a,b: diagonally opposite vertices of rectangular domain // c: array of contour values // nx,ny: number of subdivisions in x and y directions (determines accuracy) // join: interpolation operator (e.g. operator -- or operator ..) guide[][] contour(real f(real, real), pair a, pair b, real[] c, int nx=ngraph, int ny=nx, interpolate join=operator --) { // evaluate function at points and midpoints real[][] dat=new real[nx+1][ny+1]; real[][] midpoint=new real[nx+1][ny+1]; for(int i=0; i <= nx; ++i) { real x=interp(a.x,b.x,i/nx); real x2=interp(a.x,b.x,(i+0.5)/nx); real[] dati=dat[i]; real[] midpointi=midpoint[i]; for(int j=0; j <= ny; ++j) { dati[j]=f(x,interp(a.y,b.y,j/ny)); midpointi[j]=f(x2,interp(a.y,b.y,(j+0.5)/ny)); } } return contour(dat,midpoint,a,b,c,join); } void draw(picture pic=currentpicture, Label[] L=new Label[], guide[][] g, pen[] p) { begingroup(pic); for(int cnt=0; cnt < g.length; ++cnt) { guide[] gcnt=g[cnt]; pen pcnt=p[cnt]; for(int i=0; i < gcnt.length; ++i) draw(pic,gcnt[i],pcnt); if(L.length > 0) { Label Lcnt=L[cnt]; for(int i=0; i < gcnt.length; ++i) { if(Lcnt.s != "" && size(gcnt[i]) > 1) label(pic,Lcnt,gcnt[i],pcnt); } } } endgroup(pic); } void draw(picture pic=currentpicture, Label[] L=new Label[], guide[][] g, pen p=currentpen) { draw(pic,L,g,sequence(new pen(int) {return p;},g.length)); } // Extend palette by the colors below and above at each end. pen[] extend(pen[] palette, pen below, pen above) { pen[] p=copy(palette); p.insert(0,below); p.push(above); return p; } // Compute the interior palette for a sequence of cyclic contours // corresponding to palette. pen[][] interior(picture pic=currentpicture, guide[][] g, pen[] palette) { if(palette.length != g.length+1) abort("Palette array must have length one more than guide array"); pen[][] fillpalette=new pen[g.length][]; for(int i=0; i < g.length; ++i) { guide[] gi=g[i]; guide[] gp; if(i+1 < g.length) gp=g[i+1]; guide[] gm; if(i > 0) gm=g[i-1]; pen[] fillpalettei=new pen[gi.length]; for(int j=0; j < gi.length; ++j) { path P=gi[j]; if(cyclic(P)) { int index=i+1; bool nextinside; for(int k=0; k < gp.length; ++k) { path next=gp[k]; if(cyclic(next)) { if(inside(P,point(next,0))) nextinside=true; else if(inside(next,point(P,0))) index=i; } } if(!nextinside) { // Check to see if previous contour is inside for(int k=0; k < gm.length; ++k) { path prev=gm[k]; if(cyclic(prev)) { if(inside(P,point(prev,0))) index=i; } } } fillpalettei[j]=palette[index]; } fillpalette[i]=fillpalettei; } } return fillpalette; } // Fill the interior of cyclic contours with palette void fill(picture pic=currentpicture, guide[][] g, pen[][] palette) { for(int i=0; i < g.length; ++i) { guide[] gi=g[i]; guide[] gp; if(i+1 < g.length) gp=g[i+1]; guide[] gm; if(i > 0) gm=g[i-1]; for(int j=0; j < gi.length; ++j) { path P=gi[j]; path[] S=P; if(cyclic(P)) { for(int k=0; k < gp.length; ++k) { path next=gp[k]; if(cyclic(next) && inside(P,point(next,0))) S=S^^next; } for(int k=0; k < gm.length; ++k) { path next=gm[k]; if(cyclic(next) && inside(P,point(next,0))) S=S^^next; } fill(pic,S,palette[i][j]+evenodd); } } } } // routines for irregularly spaced points: // check existing guides and adds new segment to them if possible, // or otherwise store segment as a new guide private void addseg(pair[][] gds, segment seg) { if(!seg.active) return; // search for a path to extend for(int i=0; i < gds.length; ++i) { pair[] gd=gds[i]; if(abs(gd[0]-seg.b) < eps) { gd.insert(0,seg.a); return; } else if(abs(gd[gd.length-1]-seg.b) < eps) { gd.push(seg.a); return; } else if(abs(gd[0]-seg.a) < eps) { gd.insert(0,seg.b); return; } else if(abs(gd[gd.length-1]-seg.a) < eps) { gd.push(seg.b); return; } } // in case nothing is found pair[] segm; segm=new pair[] {seg.a,seg.b}; gds.push(segm); return; } guide[][] contour(real f(pair), pair a, pair b, real[] c, int nx=ngraph, int ny=nx, interpolate join=operator --) { return contour(new real(real x, real y) {return f((x,y));},a,b,c,nx,ny,join); } guide[][] contour(pair[] z, real[] f, real[] c, interpolate join=operator --) { if(z.length != f.length) abort("z and f arrays have different lengths"); int[][] trn=triangulate(z); // array to store guides found so far pair[][][] points=new pair[c.length][][]; for(int cnt=0; cnt < c.length; ++cnt) { pair[][] pointscnt=points[cnt]; real C=c[cnt]; for(int i=0; i < trn.length; ++i) { int[] trni=trn[i]; int i0=trni[0], i1=trni[1], i2=trni[2]; addseg(pointscnt,checktriangle(z[i0],z[i1],z[i2], f[i0]-C,f[i1]-C,f[i2]-C)); } } collect(points,c); return connect(points,c,join); } ./asymptote-2.41/base/geometry.asy0000644000175000017500000116354313064427076017043 0ustar norbertnorbert// geometry.asy // Copyright (C) 2007 // Author: Philippe IVALDI 2007/09/01 // http://www.piprime.fr/ // This program is free software ; you can redistribute it and/or modify // it under the terms of the GNU Lesser General Public License as published by // the Free Software Foundation ; either version 3 of the License, or // (at your option) any later version. // This program is distributed in the hope that it will be useful, but // WITHOUT ANY WARRANTY ; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU // Lesser General Public License for more details. // You should have received a copy of the GNU Lesser General Public License // along with this program ; if not, write to the Free Software // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA // COMMENTARY: // An Asymptote geometry module. // THANKS: // Special thanks to Olivier Guibé for his help in mathematical issues. // BUGS: // CODE: import math; import markers; // A rotation in the direction dir limited to [-90,90] // This is useful for rotating text along a line in the direction dir. private transform rotate(explicit pair dir) { real angle=degrees(dir); if(angle > 90 && angle < 270) angle -= 180; return rotate(angle); } // *=======================================================* // *........................HEADER.........................* /**/ real epsgeo = 10 * sqrt(realEpsilon);/*Variable used in the approximate calculations.*/ /**/ void addMargins(picture pic = currentpicture, real lmargin = 0, real bmargin = 0, real rmargin = lmargin, real tmargin = bmargin, bool rigid = true, bool allObject = true) {/*Add margins to 'pic' with respect to the current bounding box of 'pic'. If 'rigid' is false, margins are added iff an infinite curve will be prolonged on the margin. If 'allObject' is false, fixed - size objects (such as labels and arrowheads) will be ignored.*/ pair m = allObject ? truepoint(pic, SW) : point(pic, SW); pair M = allObject ? truepoint(pic, NE) : point(pic, NE); if(rigid) { draw(m - inverse(pic.calculateTransform()) * (lmargin, bmargin), invisible); draw(M + inverse(pic.calculateTransform()) * (rmargin, tmargin), invisible); } else pic.addBox(m, M, -(lmargin, bmargin), (rmargin, tmargin)); } real approximate(real t) { real ot = t; if(abs(t - ceil(t)) < epsgeo) ot = ceil(t); else if(abs(t - floor(t)) < epsgeo) ot = floor(t); return ot; } real[] approximate(real[] T) { return map(approximate, T); } /**/ real binomial(real n, real k) {/*Return n!/((n - k)!*k!)*/ return gamma(n + 1)/(gamma(n - k + 1) * gamma(k + 1)); } /**/ real rf(real x, real y, real z) {/*Computes Carlson's elliptic integral of the first kind. x, y, and z must be non negative, and at most one can be zero.*/ real ERRTOL = 0.0025, TINY = 1.5e-38, BIG = 3e37, THIRD = 1/3, C1 = 1/24, C2 = 0.1, C3 = 3/44, C4 = 1/14; real alamb, ave, delx, dely, delz, e2, e3, sqrtx, sqrty, sqrtz, xt, yt, zt; if(min(x, y, z) < 0 || min(x + y, x + z, y + z) < TINY || max(x, y, z) > BIG) abort("rf: invalid arguments."); xt = x; yt = y; zt = z; do { sqrtx = sqrt(xt); sqrty = sqrt(yt); sqrtz = sqrt(zt); alamb = sqrtx * (sqrty + sqrtz) + sqrty * sqrtz; xt = 0.25 * (xt + alamb); yt = 0.25 * (yt + alamb); zt = 0.25 * (zt + alamb); ave = THIRD * (xt + yt + zt); delx = (ave - xt)/ave; dely = (ave - yt)/ave; delz = (ave - zt)/ave; } while(max(fabs(delx), fabs(dely), fabs(delz)) > ERRTOL); e2 = delx * dely - delz * delz; e3 = delx * dely * delz; return (1.0 + (C1 * e2 - C2 - C3 * e3) * e2 + C4 * e3)/sqrt(ave); } /**/ real rd(real x, real y, real z) {/*Computes Carlson's elliptic integral of the second kind. x and y must be positive, and at most one can be zero. z must be non negative.*/ real ERRTOL = 0.0015, TINY = 1e-25, BIG = 4.5 * 10.0^21, C1 = (3/14), C2 = (1/6), C3 = (9/22), C4 = (3/26), C5 = (0.25 * C3), C6 = (1.5 * C4); real alamb, ave, delx, dely, delz, ea, eb, ec, ed, ee, fac, sqrtx, sqrty, sqrtz, sum, xt, yt, zt; if (min(x, y) < 0 || min(x + y, z) < TINY || max(x, y, z) > BIG) abort("rd: invalid arguments"); xt = x; yt = y; zt = z; sum = 0; fac = 1; do { sqrtx = sqrt(xt); sqrty = sqrt(yt); sqrtz = sqrt(zt); alamb = sqrtx * (sqrty + sqrtz) + sqrty * sqrtz; sum += fac/(sqrtz * (zt + alamb)); fac = 0.25 * fac; xt = 0.25 * (xt + alamb); yt = 0.25 * (yt + alamb); zt = 0.25 * (zt + alamb); ave = 0.2 * (xt + yt + 3.0 * zt); delx = (ave - xt)/ave; dely = (ave - yt)/ave; delz = (ave - zt)/ave; } while (max(fabs(delx), fabs(dely), fabs(delz)) > ERRTOL); ea = delx * dely; eb = delz * delz; ec = ea - eb; ed = ea - 6 * eb; ee = ed + ec + ec; return 3 * sum + fac * (1.0 + ed * (-C1 + C5 * ed - C6 * delz * ee) +delz * (C2 * ee + delz * (-C3 * ec + delz * C4 * ea)))/(ave * sqrt(ave)); } /**/ real elle(real phi, real k) {/*Legendre elliptic integral of the 2nd kind, evaluated using Carlson's functions RD and RF. The argument ranges are -infinity < phi < +infinity, 0 <= k * sin(phi) <= 1.*/ real result; if (phi >= 0 && phi <= pi/2) { real cc, q, s; s = sin(phi); cc = cos(phi)^2; q = (1 - s * k) * (1 + s * k); result = s * (rf(cc, q, 1) - (s * k)^2 * rd(cc, q, 1)/3); } else if (phi <= pi && phi >= 0) { result = 2 * elle(pi/2, k) - elle(pi - phi, k); } else if (phi <= 3 * pi/2 && phi >= 0) { result = 2 * elle(pi/2, k) + elle(phi - pi, k); } else if (phi <= 2 * pi && phi >= 0) { result = 4 * elle(pi/2, k) - elle(2 * pi - phi, k); } else if (phi >= 0) { int nb = floor(0.5 * phi/pi); result = nb * elle(2 * pi, k) + elle(phi%(2 * pi), k); } else result = -elle(-phi, k); return result; } /**/ pair[] intersectionpoints(pair A, pair B, real a, real b, real c, real d, real f, real g) {/*Intersection points with the line (AB) and the quadric curve a * x^2 + b * x * y + c * y^2 + d * x + f * y + g = 0 given in the default coordinate system*/ pair[] op; real ap = B.y - A.y, bpp = A.x - B.x, cp = A.y * B.x - A.x * B.y; real sol[]; if (abs(ap) > epsgeo) { real aa = ap * c + a * bpp^2/ap - b * bpp, bb = ap * f - bpp * d + 2 * a * bpp * cp/ap - b * cp, cc = ap * g - cp * d + a * cp^2/ap; sol = quadraticroots(aa, bb, cc); for (int i = 0; i < sol.length; ++i) { op.push((-bpp * sol[i]/ap - cp/ap, sol[i])); } } else { real aa = a * bpp, bb = d * bpp - b * cp, cc = g * bpp - cp * f + c * cp^2/bpp; sol = quadraticroots(aa, bb, cc); for (int i = 0; i < sol.length; ++i) { op.push((sol[i], -cp/bpp)); } } return op; } /**/ pair[] intersectionpoints(pair A, pair B, real[] equation) {/*Return the intersection points of the line AB with the conic whose an equation is equation[0] * x^2 + equation[1] * x * y + equation[2] * y^2 + equation[3] * x + equation[4] * y + equation[5] = 0*/ if(equation.length != 6) abort("intersectionpoints: bad length of array for a conic equation."); return intersectionpoints(A, B, equation[0], equation[1], equation[2], equation[3], equation[4], equation[5]); } // *........................HEADER.........................* // *=======================================================* // *=======================================================* // *......................COORDINATES......................* real EPS = sqrt(realEpsilon); /**/ typedef pair convert(pair);/*Function type to convert pair in an other coordinate system.*/ /**/ typedef real abs(pair);/*Function type to calculate modulus of pair.*/ /**/ typedef real dot(pair, pair);/*Function type to calculate dot product.*/ /**/ typedef pair polar(real, real);/*Function type to calculate the coordinates from the polar coordinates.*/ /**/ struct coordsys {/*This structure represents a coordinate system in the plane.*/ /**/ restricted convert relativetodefault = new pair(pair m){return m;};/*Convert a pair given relatively to this coordinate system to the pair relatively to the default coordinate system.*/ /**/ restricted convert defaulttorelative = new pair(pair m){return m;};/*Convert a pair given relatively to the default coordinate system to the pair relatively to this coordinate system.*/ /**/ restricted dot dot = new real(pair m, pair n){return dot(m, n);};/*Return the dot product of this coordinate system.*/ /**/ restricted abs abs = new real(pair m){return abs(m);};/*Return the modulus of a pair in this coordinate system.*/ /**/ restricted polar polar = new pair(real r, real a){return (r * cos(a), r * sin(a));};/*Polar coordinates routine of this coordinate system.*/ /**/ restricted pair O = (0, 0), i = (1, 0), j = (0, 1);/*Origin and units vector.*/ /**/ void init(convert rtd, convert dtr, polar polar, dot dot) {/*The default constructor of the coordinate system.*/ this.relativetodefault = rtd; this.defaulttorelative = dtr; this.polar = polar; this.dot = dot; this.abs = new real(pair m){return sqrt(dot(m, m));};; this.O = rtd((0, 0)); this.i = rtd((1, 0)) - O; this.j = rtd((0, 1)) - O; } }/**/ /**/ bool operator ==(coordsys c1, coordsys c2) {/*Return true iff the coordinate system have the same origin and units vector.*/ return c1.O == c2.O && c1.i == c2.i && c1.j == c2.j; } /**/ coordsys cartesiansystem(pair O = (0, 0), pair i, pair j) {/*Return the Cartesian coordinate system (O, i, j).*/ coordsys R; real[][] P = {{0, 0}, {0, 0}}; real[][] iP; P[0][0] = i.x; P[0][1] = j.x; P[1][0] = i.y; P[1][1] = j.y; iP = inverse(P); real ni = abs(i); real nj = abs(j); real ij = angle(j) - angle(i); pair rtd(pair m) { return O + (P[0][0] * m.x + P[0][1] * m.y, P[1][0] * m.x + P[1][1] * m.y); } pair dtr(pair m) { m-=O; return (iP[0][0] * m.x + iP[0][1] * m.y, iP[1][0] * m.x + iP[1][1] * m.y); } pair polar(real r, real a) { real ca = sin(ij - a)/(ni * sin(ij)); real sa = sin(a)/(nj * sin(ij)); return r * (ca, sa); } real tdot(pair m, pair n) { return m.x * n.x * ni^2 + m.y * n.y * nj^2 + (m.x * n.y + n.x * m.y) * dot(i, j); } R.init(rtd, dtr, polar, tdot); return R; } /**/ void show(picture pic = currentpicture, Label lo = "$O$", Label li = "$\vec{\imath}$", Label lj = "$\vec{\jmath}$", coordsys R, pen dotpen = currentpen, pen xpen = currentpen, pen ypen = xpen, pen ipen = red, pen jpen = ipen, arrowbar arrow = Arrow) {/*Draw the components (O, i, j, x - axis, y - axis) of 'R'.*/ unravel R; dot(pic, O, dotpen); drawline(pic, O, O + i, xpen); drawline(pic, O, O + j, ypen); draw(pic, li, O--(O + i), ipen, arrow); Label lj = lj.copy(); lj.align(lj.align, unit(I * j)); draw(pic, lj, O--(O + j), jpen, arrow); draw(pic, lj, O--(O + j), jpen, arrow); Label lo = lo.copy(); lo.align(lo.align, -2 * dir(O--O + i, O--O + j)); lo.p(dotpen); label(pic, lo, O); } /**/ pair operator /(pair p, coordsys R) {/*Return the xy - coordinates of 'p' relatively to the coordinate system 'R'. For example, if R = cartesiansystem((1, 2), (1, 0), (0, 1)), (0, 0)/R is (-1, -2).*/ return R.defaulttorelative(p); } /**/ pair operator *(coordsys R, pair p) {/*Return the coordinates of 'p' given in the xy - coordinates 'R'. For example, if R = cartesiansystem((1, 2), (1, 0), (0, 1)), R * (0, 0) is (1, 2).*/ return R.relativetodefault(p); } /**/ path operator *(coordsys R, path g) {/*Return the reconstructed path applying R * pair to each node, pre and post control point of 'g'.*/ guide og = R * point(g, 0); real l = length(g); for(int i = 1; i <= l; ++i) { pair P = R * point(g, i); pair post = R * postcontrol(g, i - 1); pair pre = R * precontrol(g, i); if(i == l && (cyclic(g))) og = og..controls post and pre..cycle; else og = og..controls post and pre..P; } return og; } /**/ coordsys operator *(transform t,coordsys R) {/*Provide transform * coordsys. Note that shiftless(t) is applied to R.i and R.j.*/ coordsys oc; oc = cartesiansystem(t * R.O, shiftless(t) * R.i, shiftless(t) * R.j); return oc; } /**/ restricted coordsys defaultcoordsys = cartesiansystem(0, (1, 0), (0, 1));/*One can always refer to the default coordinate system using this constant.*/ /**/ coordsys currentcoordsys = defaultcoordsys;/*The coordinate system used by default.*/ /**/ struct point {/*This structure replaces the pair to embed its coordinate system. For example, if 'P = point(cartesiansystem((1, 2), i, j), (0, 0))', P is equal to the pair (1, 2).*/ /**/ coordsys coordsys;/*The coordinate system of this point.*/ restricted pair coordinates;/*The coordinates of this point relatively to the coordinate system 'coordsys'.*/ restricted real x, y;/*The xpart and the ypart of 'coordinates'.*/ /**/ real m = 1;/*Used to cast mass<->point.*/ void init(coordsys R, pair coordinates, real mass) {/*The constructor.*/ this.coordsys = R; this.coordinates = coordinates; this.x = coordinates.x; this.y = coordinates.y; this.m = mass; } }/**/ /**/ point point(coordsys R, pair p, real m = 1) {/*Return the point which has the coodinates 'p' in the coordinate system 'R' and the mass 'm'.*/ point op; op.init(R, p, m); return op; } /**/ point point(explicit pair p, real m) {/*Return the point which has the coodinates 'p' in the current coordinate system and the mass 'm'.*/ point op; op.init(currentcoordsys, p, m); return op; } /**/ point point(coordsys R, explicit point M, real m = M.m) {/*Return the point of 'R' which has the coordinates of 'M' and the mass 'm'. Do not confuse this routine with the further routine 'changecoordsys'.*/ point op; op.init(R, M.coordinates, M.m); return op; } /**/ point changecoordsys(coordsys R, point M) {/*Return the point 'M' in the coordinate system 'coordsys'. In other words, the returned point marks the same plot as 'M' does.*/ point op; coordsys mco = M.coordsys; op.init(R, R.defaulttorelative(mco.relativetodefault(M.coordinates)), M.m); return op; } /**/ pair coordinates(point M) {/*Return the coordinates of 'M' in its coordinate system.*/ return M.coordinates; } /**/ bool samecoordsys(bool warn = true ... point[] M) {/*Return true iff all the points have the same coordinate system. If 'warn' is true and the coordinate systems are different, a warning is sent.*/ bool ret = true; coordsys t = M[0].coordsys; for (int i = 1; i < M.length; ++i) { ret = (t == M[i].coordsys); if(!ret) break; t = M[i].coordsys; } if(warn && !ret) warning("coodinatesystem", "the coordinate system of two objects are not the same. The operation will be done relative to the default coordinate system."); return ret; } /**/ point[] standardizecoordsys(coordsys R = currentcoordsys, bool warn = true ... point[] M) {/*Return the points with the same coordinate system 'R'. If 'warn' is true and the coordinate systems are different, a warning is sent.*/ point[] op = new point[]; op = M; if(!samecoordsys(warn ... M)) for (int i = 1; i < M.length; ++i) op[i] = changecoordsys(R, M[i]); return op; } /**/ pair operator cast(point P) {/*Cast point to pair.*/ return P.coordsys.relativetodefault(P.coordinates); } /**/ pair[] operator cast(point[] P) {/*Cast point[] to pair[].*/ pair[] op; for (int i = 0; i < P.length; ++i) { op.push((pair)P[i]); } return op; } /**/ point operator cast(pair p) {/*Cast pair to point relatively to the current coordinate system 'currentcoordsys'.*/ return point(currentcoordsys, p); } /**/ point[] operator cast(pair[] p) {/*Cast pair[] to point[] relatively to the current coordinate system 'currentcoordsys'.*/ pair[] op; for (int i = 0; i < p.length; ++i) { op.push((point)p[i]); } return op; } /**/ pair locate(point P) {/*Return the coordinates of 'P' in the default coordinate system.*/ return P.coordsys * P.coordinates; } /**/ point locate(pair p) {/*Return the point in the current coordinate system 'currentcoordsys'.*/ return p; //automatic casting 'pair to point'. } /**/ point operator *(real x, explicit point P) {/*Multiply the coordinates (not the mass) of 'P' by 'x'.*/ return point(P.coordsys, x * P.coordinates, P.m); } /**/ point operator /(explicit point P, real x) {/*Divide the coordinates (not the mass) of 'P' by 'x'.*/ return point(P.coordsys, P.coordinates/x, P.m); } /**/ point operator /(real x, explicit point P) {/**/ return point(P.coordsys, x/P.coordinates, P.m); } /**/ point operator -(explicit point P) {/*-P. The mass is inchanged.*/ return point(P.coordsys, -P.coordinates, P.m); } /**/ point operator +(explicit point P1, explicit point P2) {/*Provide 'point + point'. If the two points haven't the same coordinate system, a warning is sent and the returned point has the default coordinate system 'defaultcoordsys'. The masses are added.*/ point[] P = standardizecoordsys(P1, P2); coordsys R = P[0].coordsys; return point(R, P[0].coordinates + P[1].coordinates, P1.m + P2.m); } /**/ point operator +(explicit point P1, explicit pair p2) {/*Provide 'point + pair'. The pair 'p2' is supposed to be coordinates relatively to the coordinates system of 'P1'. The mass is not changed.*/ coordsys R = currentcoordsys; return point(R, P1.coordinates + point(R, p2).coordinates, P1.m); } point operator +(explicit pair p1, explicit point p2) { return p2 + p1; } /**/ point operator -(explicit point P1, explicit point P2) {/*Provide 'point - point'.*/ return P1 + (-P2); } /**/ point operator -(explicit point P1, explicit pair p2) {/*Provide 'point - pair'. The pair 'p2' is supposed to be coordinates relatively to the coordinates system of 'P1'.*/ return P1 + (-p2); } point operator -(explicit pair p1, explicit point P2) { return p1 + (-P2); } /**/ point operator *(transform t, explicit point P) {/*Provide 'transform * point'. Note that the transforms scale, xscale, yscale and rotate are carried out relatively the default coordinate system 'defaultcoordsys' which is not desired for point defined in an other coordinate system. On can use scale(real, point), xscale(real, point), yscale(real, point), rotate(real, point), scaleO(real), xscaleO(real), yscaleO(real) and rotateO(real) (described further) to change the coordinate system of reference.*/ coordsys R = P.coordsys; return point(R, (t * locate(P))/R, P.m); } /**/ point operator *(explicit point P1, explicit point P2) {/*Provide 'point * point'. The resulted mass is the mass of P2*/ point[] P = standardizecoordsys(P1, P2); coordsys R = P[0].coordsys; return point(R, P[0].coordinates * P[1].coordinates, P2.m); } /**/ point operator *(explicit point P1, explicit pair p2) {/*Provide 'point * pair'. The pair 'p2' is supposed to be the coordinates of the point in the coordinates system of 'P1'. 'pair * point' is also defined.*/ point P = point(P1.coordsys, p2, P1.m); return P1 * P; } point operator *(explicit pair p1, explicit point p2) { return p2 * p1; } /**/ bool operator ==(explicit point M, explicit point N) {/*Provide the test 'M == N' wish returns true iff MN < EPS*/ return abs(locate(M) - locate(N)) < EPS; } /**/ bool operator !=(explicit point M, explicit point N) {/*Provide the test 'M != N' wish return true iff MN >= EPS*/ return !(M == N); } /**/ guide operator cast(point p) {/*Cast point to guide.*/ return locate(p); } /**/ path operator cast(point p) {/*Cast point to path.*/ return locate(p); } /**/ void dot(picture pic = currentpicture, Label L, explicit point Z, align align = NoAlign, string format = defaultformat, pen p = currentpen) {/**/ Label L = L.copy(); L.position(locate(Z)); if(L.s == "") { if(format == "") format = defaultformat; L.s = "("+format(format, Z.x)+", "+format(format, Z.y)+")"; } L.align(align, E); L.p(p); dot(pic, locate(Z), p); add(pic, L); } /**/ real abs(coordsys R, pair m) {/*Return the modulus |m| in the coordinate system 'R'.*/ return R.abs(m); } /**/ real abs(explicit point M) {/*Return the modulus |M| in its coordinate system.*/ return M.coordsys.abs(M.coordinates); } /**/ real length(explicit point M) {/*Return the modulus |M| in its coordinate system (same as 'abs').*/ return M.coordsys.abs(M.coordinates); } /**/ point conj(explicit point M) {/*Conjugate.*/ return point(M.coordsys, conj(M.coordinates), M.m); } /**/ real degrees(explicit point M, coordsys R = M.coordsys, bool warn = true) {/*Return the angle of M (in degrees) relatively to 'R'.*/ return (degrees(locate(M) - R.O, warn) - degrees(R.i))%360; } /**/ real angle(explicit point M, coordsys R = M.coordsys, bool warn = true) {/*Return the angle of M (in radians) relatively to 'R'.*/ return radians(degrees(M, R, warn)); } /**/ bool finite(explicit point p) {/*Avoid to compute 'finite((pair)(infinite_point))'.*/ return finite(p.coordinates); } /**/ real dot(point A, point B) {/*Return the dot product in the coordinate system of 'A'.*/ point[] P = standardizecoordsys(A.coordsys, A, B); return P[0].coordsys.dot(P[0].coordinates, P[1].coordinates); } /**/ real dot(point A, explicit pair B) {/*Return the dot product in the default coordinate system. dot(explicit pair, point) is also defined.*/ return dot(locate(A), B); } real dot(explicit pair A, point B) { return dot(A, locate(B)); } /**/ transform rotateO(real a) {/*Rotation around the origin of the current coordinate system.*/ return rotate(a, currentcoordsys.O); }; /**/ transform projection(point A, point B) {/*Return the orthogonal projection on the line (AB).*/ pair dir = unit(locate(A) - locate(B)); pair a = locate(A); real cof = dir.x * a.x + dir.y * a.y; real tx = a.x - dir.x * cof; real txx = dir.x^2; real txy = dir.x * dir.y; real ty = a.y - dir.y * cof; real tyx = txy; real tyy = dir.y^2; transform t = (tx, ty, txx, txy, tyx, tyy); return t; } /**/ transform projection(point A, point B, point C, point D, bool safe = false) {/*Return the (CD) parallel projection on (AB). If 'safe = true' and (AB)//(CD) return the identity. If 'safe = false' and (AB)//(CD) return an infinity scaling.*/ pair a = locate(A); pair u = unit(locate(B) - locate(A)); pair v = unit(locate(D) - locate(C)); real c = u.x * a.y - u.y * a.x; real d = (conj(u) * v).y; if (abs(d) < epsgeo) { return safe ? identity() : scale(infinity); } real tx = c * v.x/d; real ty = c * v.y/d; real txx = u.x * v.y/d; real txy = -u.x * v.x/d; real tyx = u.y * v.y/d; real tyy = -u.y * v.x/d; transform t = (tx, ty, txx, txy, tyx, tyy); return t; } /**/ transform scale(real k, point M) {/*Homothety.*/ pair P = locate(M); return shift(P) * scale(k) * shift(-P); } /**/ transform xscale(real k, point M) {/*xscale from 'M' relatively to the x - axis of the coordinate system of 'M'.*/ pair P = locate(M); real a = degrees(M.coordsys.i); return (shift(P) * rotate(a)) * xscale(k) * (rotate(-a) * shift(-P)); } /**/ transform yscale(real k, point M) {/*yscale from 'M' relatively to the y - axis of the coordinate system of 'M'.*/ pair P = locate(M); real a = degrees(M.coordsys.j) - 90; return (shift(P) * rotate(a)) * yscale(k) * (rotate(-a) * shift(-P)); } /**/ transform scale(real k, point A, point B, point C, point D, bool safe = false) {/* (help me for English translation...) If 'safe = true' and (AB)//(CD) return the identity. If 'safe = false' and (AB)//(CD) return a infinity scaling.*/ pair a = locate(A); pair u = unit(locate(B) - locate(A)); pair v = unit(locate(D) - locate(C)); real c = u.x * a.y - u.y * a.x; real d = (conj(u) * v).y; real d = (conj(u) * v).y; if (abs(d) < epsgeo) { return safe ? identity() : scale(infinity); } real tx = (1 - k) * c * v.x/d; real ty = (1 - k) * c * v.y/d; real txx = (1 - k) * u.x * v.y/d + k; real txy = (k - 1) * u.x * v.x/d; real tyx = (1 - k) * u.y * v.y/d; real tyy = (k - 1) * u.y * v.x/d + k; transform t = (tx, ty, txx, txy, tyx, tyy); return t; } /**/ transform scaleO(real x) {/*Homothety from the origin of the current coordinate system.*/ return scale(x, (0, 0)); } /**/ transform xscaleO(real x) {/*xscale from the origin and relatively to the current coordinate system.*/ return scale(x, (0, 0), (0, 1), (0, 0), (1, 0)); } /**/ transform yscaleO(real x) {/*yscale from the origin and relatively to the current coordinate system.*/ return scale(x, (0, 0), (1, 0), (0, 0), (0, 1)); } /**/ struct vector {/*Like a point but casting to pair, adding etc does not take account of the origin of the coordinate system.*/ point v;/*Coordinates as a point (embed coordinate system and pair).*/ }/**/ /**/ point operator cast(vector v) {/*Cast vector 'v' to point 'M' so that OM = v.*/ return v.v; } /**/ vector operator cast(pair v) {/*Cast pair to vector relatively to the current coordinate system 'currentcoordsys'.*/ vector ov; ov.v = point(currentcoordsys, v); return ov; } /**/ vector operator cast(explicit point v) {/*A point can be interpreted like a vector using the code '(vector)a_point'.*/ vector ov; ov.v = v; return ov; } /**/ pair operator cast(explicit vector v) {/*Cast vector to pair (the coordinates of 'v' in the default coordinate system).*/ return locate(v.v) - v.v.coordsys.O; } /**/ align operator cast(vector v) {/*Cast vector to align.*/ return (pair)v; } /**/ vector vector(coordsys R = currentcoordsys, pair v) {/*Return the vector of 'R' which has the coordinates 'v'.*/ vector ov; ov.v = point(R, v); return ov; } /**/ vector vector(point M) {/*Return the vector OM, where O is the origin of the coordinate system of 'M'. Useful to write 'vector(P - M);' instead of '(vector)(P - M)'.*/ return M; } /**/ point point(explicit vector u) {/*Return the point M so that OM = u, where O is the origin of the coordinate system of 'u'.*/ return u.v; } /**/ pair locate(explicit vector v) {/*Return the coordinates of 'v' in the default coordinate system (like casting vector to pair).*/ return (pair)v; } /**/ void show(Label L, vector v, pen p = currentpen, arrowbar arrow = Arrow) {/*Draw the vector v (from the origin of its coordinate system).*/ coordsys R = v.v.coordsys; draw(L, R.O--v.v, p, arrow); } /**/ vector changecoordsys(coordsys R, vector v) {/*Return the vector 'v' relatively to coordinate system 'R'.*/ vector ov; ov.v = point(R, (locate(v) + R.O)/R); return ov; } /**/ vector operator *(real x, explicit vector v) {/*Provide real * vector.*/ return x * v.v; } /**/ vector operator /(explicit vector v, real x) {/*Provide vector/real*/ return v.v/x; } /**/ vector operator *(transform t, explicit vector v) {/*Provide transform * vector.*/ return t * v.v; } /**/ vector operator *(explicit point M, explicit vector v) {/*Provide point * vector*/ return M * v.v; } /**/ point operator +(point M, explicit vector v) {/*Return 'M' shifted by 'v'.*/ return shift(locate(v)) * M; } /**/ point operator -(point M, explicit vector v) {/*Return 'M' shifted by '-v'.*/ return shift(-locate(v)) * M; } /**/ vector operator -(explicit vector v) {/*Provide -v.*/ return -v.v; } /**/ point operator +(explicit pair m, explicit vector v) {/*The pair 'm' is supposed to be the coordinates of a point in the current coordinates system 'currentcoordsys'. Return this point shifted by the vector 'v'.*/ return locate(m) + v; } /**/ point operator -(explicit pair m, explicit vector v) {/*The pair 'm' is supposed to be the coordinates of a point in the current coordinates system 'currentcoordsys'. Return this point shifted by the vector '-v'.*/ return m + (-v); } /**/ vector operator +(explicit vector v1, explicit vector v2) {/*Provide vector + vector. If the two vector haven't the same coordinate system, the returned vector is relative to the default coordinate system (without warning).*/ coordsys R = v1.v.coordsys; if(samecoordsys(false, v1, v2)){R = defaultcoordsys;} return vector(R, (locate(v1) + locate(v2))/R); } /**/ vector operator -(explicit vector v1, explicit vector v2) {/*Provide vector - vector. If the two vector haven't the same coordinate system, the returned vector is relative to the default coordinate system (without warning).*/ return v1 + (-v2); } /**/ bool operator ==(explicit vector u, explicit vector v) {/*Return true iff |u - v|*/ return abs(u - v) < EPS; } /**/ bool collinear(vector u, vector v) {/*Return 'true' iff the vectors 'u' and 'v' are collinear.*/ return abs(ypart((conj((pair)u) * (pair)v))) < EPS; } /**/ vector unit(point M) {/*Return the unit vector according to the modulus of its coordinate system.*/ return M/abs(M); } /**/ vector unit(vector u) {/*Return the unit vector according to the modulus of its coordinate system.*/ return u.v/abs(u.v); } /**/ real degrees(vector v, coordsys R = v.v.coordsys, bool warn = true) {/*Return the angle of 'v' (in degrees) relatively to 'R'.*/ return (degrees(locate(v), warn) - degrees(R.i))%360; } /**/ real angle(explicit vector v, coordsys R = v.v.coordsys, bool warn = true) {/*Return the angle of 'v' (in radians) relatively to 'R'.*/ return radians(degrees(v, R, warn)); } /**/ vector conj(explicit vector u) {/*Conjugate.*/ return conj(u.v); } /**/ transform rotate(explicit vector dir) {/*A rotation in the direction 'dir' limited to [-90, 90] This is useful for rotating text along a line in the direction dir. rotate(explicit point dir) is also defined. */ return rotate(locate(dir)); } transform rotate(explicit point dir){return rotate(locate(vector(dir)));} // *......................COORDINATES......................* // *=======================================================* // *=======================================================* // *.........................BASES.........................* /**/ point origin = point(defaultcoordsys, (0, 0));/*The origin of the current coordinate system.*/ /**/ point origin(coordsys R = currentcoordsys) {/*Return the origin of the coordinate system 'R'.*/ return point(R, (0, 0)); //use automatic casting; } /**/ real linemargin = 0;/*Margin used to draw lines.*/ /**/ real linemargin() {/*Return the margin used to draw lines.*/ return linemargin; } /**/ pen addpenline = squarecap;/*Add this property to the drawing pen of "finish" lines.*/ pen addpenline(pen p) { return addpenline + p; } /**/ pen addpenarc = squarecap;/*Add this property to the drawing pen of arcs.*/ pen addpenarc(pen p) {return addpenarc + p;} /**/ string defaultmassformat = "$\left(%L;%.4g\right)$";/*Format used to construct the default label of masses.*/ /**/ int sgnd(real x) {/*Return the -1 if x < 0, 1 if x >= 0.*/ return (x == 0) ? 1 : sgn(x); } int sgnd(int x) { return (x == 0) ? 1 : sgn(x); } /**/ bool defined(point P) {/*Return true iff the coordinates of 'P' are finite.*/ return finite(P.coordinates); } /**/ bool onpath(picture pic = currentpicture, path g, point M, pen p = currentpen) {/*Return true iff 'M' is on the path drawn with the pen 'p' in 'pic'.*/ transform t = inverse(pic.calculateTransform()); return intersect(g, shift(locate(M)) * scale(linewidth(p)/2) * t * unitcircle).length > 0; } /**/ bool sameside(point M, point N, point O) {/*Return 'true' iff 'M' and 'N' are same side of the point 'O'.*/ pair m = M, n = N, o = O; return dot(m - o, n - o) >= -epsgeo; } /**/ bool between(point M, point O, point N) {/*Return 'true' iff 'O' is between 'M' and 'N'.*/ return (!sameside(N, M, O) || M == O || N == O); } typedef path pathModifier(path); pathModifier NoModifier = new path(path g){return g;}; private void Drawline(picture pic = currentpicture, Label L = "", pair P, bool dirP = true, pair Q, bool dirQ = true, align align = NoAlign, pen p = currentpen, arrowbar arrow = None, Label legend = "", marker marker = nomarker, pathModifier pathModifier = NoModifier) {/* Add the two parameters 'dirP' and 'dirQ' to the native routine 'drawline' of the module 'math'. Segment [PQ] will be prolonged in direction of P if 'dirP = true', in direction of Q if 'dirQ = true'. If 'dirP = dirQ = true', the behavior is that of the native 'drawline'. Add all the other parameters of 'Draw'.*/ pic.add(new void (frame f, transform t, transform T, pair m, pair M) { picture opic; // Reduce the bounds by the size of the pen. m -= min(p) - (linemargin(), linemargin()); M -= max(p) + (linemargin(), linemargin()); // Calculate the points and direction vector in the transformed space. t = t * T; pair z = t * P; pair q = t * Q; pair v = q - z; // path g; pair ptp, ptq; real cp = dirP ? 1:0; real cq = dirQ ? 1:0; // Handle horizontal and vertical lines. if(v.x == 0) { if(m.x <= z.x && z.x <= M.x) if (dot(v, m - z) < 0) { ptp = (z.x, z.y + cp * (m.y - z.y)); ptq = (z.x, q.y + cq * (M.y - q.y)); } else { ptq = (z.x, q.y + cq * (m.y - q.y)); ptp = (z.x, z.y + cp * (M.y - z.y)); } } else if(v.y == 0) { if (dot(v, m - z) < 0) { ptp = (z.x + cp * (m.x - z.x), z.y); ptq = (q.x + cq * (M.x - q.x), z.y); } else { ptq = (q.x + cq * (m.x - q.x), z.y); ptp = (z.x + cp * (M.x - z.x), z.y); } } else { // Calculate the maximum and minimum t values allowed for the // parametric equation z + t * v real mx = (m.x - z.x)/v.x, Mx = (M.x - z.x)/v.x; real my = (m.y - z.y)/v.y, My = (M.y - z.y)/v.y; real tmin = max(v.x > 0 ? mx : Mx, v.y > 0 ? my : My); real tmax = min(v.x > 0 ? Mx : mx, v.y > 0 ? My : my); pair pmin = z + tmin * v; pair pmax = z + tmax * v; if(tmin <= tmax) { ptp = z + cp * tmin * v; ptq = z + (cq == 0 ? v:tmax * v); } } path g = ptp--ptq; if (length(g)>0) { if(L.s != "") { Label lL = L.copy(); if(L.defaultposition) lL.position(Relative(.9)); lL.p(p); lL.out(opic, g); } g = pathModifier(g); if(linetype(p).length == 0){ pair m = midpoint(g); pen tp; tp = dirP ? p : addpenline(p); draw(opic, pathModifier(m--ptp), tp); tp = dirQ ? p : addpenline(p); draw(opic, pathModifier(m--ptq), tp); } else { draw(opic, g, p); } marker.markroutine(opic, marker.f, g); arrow(opic, g, p, NoMargin); add(f, opic.fit()); } }); } /**/ void clipdraw(picture pic = currentpicture, Label L = "", path g, align align = NoAlign, pen p = currentpen, arrowbar arrow = None, arrowbar bar = None, real xmargin = 0, real ymargin = xmargin, Label legend = "", marker marker = nomarker) {/*Draw the path 'g' on 'pic' clipped to the bounding box of 'pic'.*/ if(L.s != "") { picture tmp; label(tmp, L, g, p); add(pic, tmp); } pic.add(new void (frame f, transform t, transform T, pair m, pair M) { // Reduce the bounds by the size of the pen and the margins. m += min(p) + (xmargin, ymargin); M -= max(p) + (xmargin, ymargin); path bound = box(m, M); picture tmp; draw(tmp, "", t * T * g, align, p, arrow, bar, NoMargin, legend, marker); clip(tmp, bound); add(f, tmp.fit()); }); } /**/ void distance(picture pic = currentpicture, Label L = "", point A, point B, bool rotated = true, real offset = 3mm, pen p = currentpen, pen joinpen = invisible, arrowbar arrow = Arrows(NoFill)) {/*Draw arrow between A and B (from FAQ).*/ pair A = A, B = B; path g = A--B; transform Tp = shift(-offset * unit(B - A) * I); pic.add(new void(frame f, transform t) { picture opic; path G = Tp * t * g; transform id = identity(); transform T = rotated ? rotate(B - A) : id; Label L = L.copy(); L.align(L.align, Center); if(abs(ypart((conj(A - B) * L.align.dir))) < epsgeo && L.filltype == NoFill) L.filltype = UnFill(1); draw(opic, T * L, G, p, arrow, Bars, PenMargins); pair Ap = t * A, Bp = t * B; draw(opic, (Ap--Tp * Ap)^^(Bp--Tp * Bp), joinpen); add(f, opic.fit()); }, true); pic.addBox(min(g), max(g), Tp * min(p), Tp * max(p)); } /**/ real perpfactor = 1;/*Factor for drawing perpendicular symbol.*/ /**/ void perpendicularmark(picture pic = currentpicture, point z, explicit pair align, explicit pair dir = E, real size = 0, pen p = currentpen, margin margin = NoMargin, filltype filltype = NoFill) {/*Draw a perpendicular symbol at z aligned in the direction align relative to the path z--z + dir. dir(45 + n * 90), where n in N*, are common values for 'align'.*/ p = squarecap + miterjoin + p; if(size == 0) size = perpfactor * 3mm + sqrt(1 + linewidth(p)) - 1; frame apic; pair d1 = size * align * unit(dir) * dir(-45); pair d2 = I * d1; path g = d1--d1 + d2--d2; g = margin(g, p).g; draw(apic, g, p); if(filltype != NoFill) filltype.fill(apic, (relpoint(g, 0) - relpoint(g, 0.5)+ relpoint(g, 1))--g--cycle, p + solid); add(pic, apic, locate(z)); } /**/ void perpendicularmark(picture pic = currentpicture, point z, vector align, vector dir = E, real size = 0, pen p = currentpen, margin margin = NoMargin, filltype filltype = NoFill) {/*Draw a perpendicular symbol at z aligned in the direction align relative to the path z--z + dir. dir(45 + n * 90), where n in N, are common values for 'align'.*/ perpendicularmark(pic, z, (pair)align, (pair)dir, size, p, margin, filltype); } /**/ void perpendicularmark(picture pic = currentpicture, point z, explicit pair align, path g, real size = 0, pen p = currentpen, margin margin = NoMargin, filltype filltype = NoFill) {/*Draw a perpendicular symbol at z aligned in the direction align relative to the path z--z + dir(g, 0). dir(45 + n * 90), where n in N, are common values for 'align'.*/ perpendicularmark(pic, z, align, dir(g, 0), size, p, margin, filltype); } /**/ void perpendicularmark(picture pic = currentpicture, point z, vector align, path g, real size = 0, pen p = currentpen, margin margin = NoMargin, filltype filltype = NoFill) {/*Draw a perpendicular symbol at z aligned in the direction align relative to the path z--z + dir(g, 0). dir(45 + n * 90), where n in N, are common values for 'align'.*/ perpendicularmark(pic, z, (pair)align, dir(g, 0), size, p, margin, filltype); } /**/ void markrightangle(picture pic = currentpicture, point A, point O, point B, real size = 0, pen p = currentpen, margin margin = NoMargin, filltype filltype = NoFill) {/*Mark the angle AOB with a perpendicular symbol.*/ pair Ap = A, Bp = B, Op = O; pair dir = Ap - Op; real a1 = degrees(dir); pair align = rotate(-a1) * unit(dir(Op--Ap, Op--Bp)); perpendicularmark(pic = pic, z = O, align = align, dir = dir, size = size, p = p, margin = margin, filltype = filltype); } /**/ bool simeq(point A, point B, real fuzz = epsgeo) {/*Return true iff abs(A - B) < fuzz. This routine is used internally to know if two points are equal, in particular by the operator == in 'point == point'.*/ return (abs(A - B) < fuzz); } bool simeq(point a, real b, real fuzz = epsgeo) { coordsys R = a.coordsys; return (abs(a - point(R, ((pair)b)/R)) < fuzz); } /**/ pair attract(pair m, path g, real fuzz = 0) {/*Return the nearest point (A PAIR) of 'm' which is on the path g. 'fuzz' is the argument 'fuzz' of 'intersect'.*/ if(intersect(m, g, fuzz).length > 0) return m; pair p; real step = 1, r = 0; real[] t; static real eps = sqrt(realEpsilon); do {// Find a radius for intersection r += step; t = intersect(shift(m) * scale(r) * unitcircle, g); } while(t.length <= 0); p = point(g, t[1]); real rm = 0, rM = r; while(rM - rm > eps) { r = (rm + rM)/2; t = intersect(shift(m) * scale(r) * unitcircle, g, fuzz); if(t.length <= 0) { rm = r; } else { rM = r; p = point(g, t[1]); } } return p; } /**/ point attract(point M, path g, real fuzz = 0) {/*Return the nearest point (A POINT) of 'M' which is on the path g. 'fuzz' is the argument 'fuzz' of 'intersect'.*/ return point(M.coordsys, attract(locate(M), g)/M.coordsys); } /**/ real[] intersect(path g, explicit pair p, real fuzz = 0) {/**/ fuzz = fuzz <= 0 ? sqrt(realEpsilon) : fuzz; real[] or; real r = realEpsilon; do{ or = intersect(g, shift(p) * scale(r) * unitcircle, fuzz); r *= 2; } while(or.length == 0); return or; } /**/ real[] intersect(path g, explicit point P, real fuzz = epsgeo) {/**/ return intersect(g, locate(P), fuzz); } // *.........................BASES.........................* // *=======================================================* // *=======================================================* // *.........................LINES.........................* /**/ struct line {/*This structure provides the objects line, semi - line and segment oriented from A to B. All the calculus with this structure will be as exact as Asymptote can do. For a full precision, you must not cast 'line' to 'path' excepted for drawing routines.*/ /**/ restricted point A,B;/*Two line's points with same coordinate system.*/ bool extendA,extendB;/*If true,extend 'l' in direction of A (resp. B).*/ restricted vector u,v;/*u = unit(AB) = direction vector,v = normal vector.*/ restricted real a,b,c;/*Coefficients of the equation ax + by + c = 0 in the coordinate system of 'A'.*/ restricted real slope, origin;/*Slope and ordinate at the origin.*/ /**/ line copy() {/*Copy a line in a new instance.*/ line l = new line; l.A = A; l.B = B; l.a = a; l.b = b; l.c = c; l.slope = slope; l.origin = origin; l.u = u; l.v = v; l.extendA = extendA; l.extendB = extendB; return l; } /**/ void init(point A, bool extendA = true, point B, bool extendB = true) {/*Initialize line. If 'extendA' is true, the "line" is infinite in the direction of A.*/ point[] P = standardizecoordsys(A, B); this.A = P[0]; this.B = P[1]; this.a = B.y - A.y; this.b = A.x - B.x; this.c = A.y * B.x - A.x * B.y; this.slope= (this.b == 0) ? infinity : -this.a/this.b; this.origin = (this.b == 0) ? (this.c == 0) ? 0:infinity : -this.c/this.b; this.u = unit(P[1]-P[0]); // int tmp = sgnd(this.slope); // this.u = (dot((pair)this.u, N) >= 0) ? tmp * this.u : -tmp * this.u; this.v = rotate(90, point(P[0].coordsys, (0, 0))) * this.u; this.extendA = extendA; this.extendB = extendB; } }/**/ /**/ line line(point A, bool extendA = true, point B, bool extendB = true) {/*Return the line passing through 'A' and 'B'. If 'extendA' is true, the "line" is infinite in the direction of A. A "line" can be half-line or segment.*/ if (A == B) abort("line: the points must be distinct."); line l; l.init(A, extendA, B, extendB); return l; } /**/ struct segment {/*.*/ restricted point A, B;// Extremity. restricted vector u, v;// u = direction vector, v = normal vector. restricted real a, b, c;// Coefficients of the équation ax + by + c = 0 restricted real slope, origin; segment copy() { segment s = new segment; s.A = A; s.B = B; s.a = a; s.b = b; s.c = c; s.slope = slope; s.origin = origin; s.u = u; s.v = v; return s; } void init(point A, point B) { line l; l.init(A, B); this.A = l.A; this.B = l.B; this.a = l.a; this.b = l.b; this.c = l.c; this.slope = l.slope; this.origin = l.origin; this.u = l.u; this.v = l.v; } }/**/ /**/ segment segment(point A, point B) {/*Return the segment whose the extremities are A and B.*/ segment s; s.init(A, B); return s; } /**/ real length(segment s) {/*Return the length of 's'.*/ return abs(s.A - s.B); } /**/ line operator cast(segment s) {/*A segment is casted to a "finite line".*/ return line(s.A, false, s.B, false); } /**/ segment operator cast(line l) {/*Cast line 'l' to segment [l.A l.B].*/ return segment(l.A, l.B); } /**/ line operator *(transform t, line l) {/*Provide transform * line*/ return line(t * l.A, l.extendA, t * l.B, l.extendB); } /**/ line operator /(line l, real x) {/*Provide l/x. Return the line passing through l.A/x and l.B/x.*/ return line(l.A/x, l.extendA, l.B/x, l.extendB); } line operator /(line l, int x){return line(l.A/x, l.B/x);} /**/ line operator *(real x, line l) {/*Provide x * l. Return the line passing through x * l.A and x * l.B.*/ return line(x * l.A, l.extendA, x * l.B, l.extendB); } line operator *(int x, line l){return line(x * l.A, l.extendA, x * l.B, l.extendB);} /**/ line operator *(point M, line l) {/*Provide point * line. Return the line passing through unit(M) * l.A and unit(M) * l.B.*/ return line(unit(M) * l.A, l.extendA, unit(M) * l.B, l.extendB); } /**/ line operator +(line l, vector u) {/*Provide line + vector (and so line + point). Return the line 'l' shifted by 'u'.*/ return line(l.A + u, l.extendA, l.B + u, l.extendB); } /**/ line operator -(line l, vector u) {/*Provide line - vector (and so line - point). Return the line 'l' shifted by '-u'.*/ return line(l.A - u, l.extendA, l.B - u, l.extendB); } /**/ line[] operator ^^(line l1, line l2) {/*Provide line^^line. Return the line array {l1, l2}.*/ line[] ol; ol.push(l1); ol.push(l2); return ol; } /**/ line[] operator ^^(line l1, line[] l2) {/*Provide line^^line[]. Return the line array {l1, l2[0], l2[1]...}. line[]^^line is also defined.*/ line[] ol; ol.push(l1); for (int i = 0; i < l2.length; ++i) { ol.push(l2[i]); } return ol; } line[] operator ^^(line[] l2, line l1) { line[] ol = l2; ol.push(l1); return ol; } /**/ line[] operator ^^(line l1[], line[] l2) {/*Provide line[]^^line[]. Return the line array {l1[0], l1[1], ..., l2[0], l2[1], ...}.*/ line[] ol = l1; for (int i = 0; i < l2.length; ++i) { ol.push(l2[i]); } return ol; } /**/ bool sameside(point M, point P, line l) {/*Return 'true' iff 'M' and 'N' are same side of the line (or on the line) 'l'.*/ pair A = l.A, B = l.B, m = M, p = P; pair mil = (A + B)/2; pair mA = rotate(90, mil) * A; pair mB = rotate(-90, mil) * A; return (abs(m - mA) <= abs(m - mB)) == (abs(p - mA) <= abs(p - mB)); // transform proj = projection(l.A, l.B); // point Mp = proj * M; // point Pp = proj * P; // dot(Mp);dot(Pp); // return dot(locate(Mp - M), locate(Pp - P)) >= 0; } /**/ line line(segment s) {/*Return the line passing through 's.A' and 's.B'.*/ return line(s.A, s.B); } /**/ segment segment(line l) {/*Return the segment whose extremities are 'l.A' and 'l.B'.*/ return segment(l.A, l.B); } /**/ point midpoint(segment s) {/*Return the midpoint of 's'.*/ return 0.5 * (s.A + s.B); } /**/ void write(explicit line l) {/*Write some informations about 'l'.*/ write("A = "+(string)((pair)l.A)); write("Extend A = "+(l.extendA ? "true" : "false")); write("B = "+(string)((pair)l.B)); write("Extend B = "+(l.extendB ? "true" : "false")); write("u = "+(string)((pair)l.u)); write("v = "+(string)((pair)l.v)); write("a = "+(string) l.a); write("b = "+(string) l.b); write("c = "+(string) l.c); write("slope = "+(string) l.slope); write("origin = "+(string) l.origin); } /**/ void write(explicit segment s) {/*Write some informations about 's'.*/ write("A = "+(string)((pair)s.A)); write("B = "+(string)((pair)s.B)); write("u = "+(string)((pair)s.u)); write("v = "+(string)((pair)s.v)); write("a = "+(string) s.a); write("b = "+(string) s.b); write("c = "+(string) s.c); write("slope = "+(string) s.slope); write("origin = "+(string) s.origin); } /**/ bool operator ==(line l1, line l2) {/*Provide the test 'line == line'.*/ return (collinear(l1.u, l2.u) && abs(ypart((locate(l1.A) - locate(l1.B))/(locate(l1.A) - locate(l2.B)))) < epsgeo && l1.extendA == l2.extendA && l1.extendB == l2.extendB); } /**/ bool operator !=(line l1, line l2) {/*Provide the test 'line != line'.*/ return !(l1 == l2); } /**/ bool operator @(point m, line l) {/*Provide the test 'point @ line'. Return true iff 'm' is on the 'l'.*/ point M = changecoordsys(l.A.coordsys, m); if (abs(l.a * M.x + l.b * M.y + l.c) >= epsgeo) return false; if (l.extendA && l.extendB) return true; if (!l.extendA && !l.extendB) return between(l.A, M, l.B); if (l.extendA) return sameside(M, l.A, l.B); return sameside(M, l.B, l.A); } /**/ coordsys coordsys(line l) {/*Return the coordinate system in which 'l' is defined.*/ return l.A.coordsys; } /**/ line reverse(line l) {/*Permute the points 'A' and 'B' of 'l' and so its orientation.*/ return line(l.B, l.extendB, l.A, l.extendA); } /**/ line extend(line l) {/*Return the infinite line passing through 'l.A' and 'l.B'.*/ line ol = l.copy(); ol.extendA = true; ol.extendB = true; return ol; } /**/ line complementary(explicit line l) {/*Return the complementary of a half-line with respect of the full line 'l'.*/ if (l.extendA && l.extendB) abort("complementary: the parameter is not a half-line."); point origin = l.extendA ? l.B : l.A; point ptdir = l.extendA ? rotate(180, l.B) * l.A : rotate(180, l.A) * l.B; return line(origin, false, ptdir); } /**/ line[] complementary(explicit segment s) {/*Return the two half-lines of origin 's.A' and 's.B' respectively.*/ line[] ol = new line[2]; ol[0] = complementary(line(s.A, false, s.B)); ol[1] = complementary(line(s.A, s.B, false)); return ol; } /**/ line Ox(coordsys R = currentcoordsys) {/*Return the x-axis of 'R'.*/ return line(point(R, (0, 0)), point(R, E)); } /**/ restricted line Ox = Ox();/*the x-axis of the default coordinate system.*/ /**/ line Oy(coordsys R = currentcoordsys) {/*Return the y-axis of 'R'.*/ return line(point(R, (0, 0)), point(R, N)); } /**/ restricted line Oy = Oy();/*the y-axis of the default coordinate system.*/ /**/ line line(real a, point A = point(currentcoordsys, (0, 0))) {/*Return the line passing through 'A' with an angle (in the coordinate system of A) 'a' in degrees. line(point, real) is also defined.*/ return line(A, A + point(A.coordsys, A.coordsys.polar(1, radians(a)))); } line line(point A = point(currentcoordsys, (0, 0)), real a) { return line(a, A); } line line(int a, point A = point(currentcoordsys, (0, 0))) { return line((real)a, A); } /**/ line line(coordsys R = currentcoordsys, real slope, real origin) {/*Return the line defined by slope and y-intercept relative to 'R'.*/ if (slope == infinity || slope == -infinity) abort("The slope is infinite. Please, use the routine 'vline'."); return line(point(R, (0, origin)), point(R, (1, origin + slope))); } /**/ line line(coordsys R = currentcoordsys, real a, real b, real c) {/*Retrun the line defined by equation relative to 'R'.*/ if (a == 0 && b == 0) abort("line: inconsistent equation..."); pair M; M = (a == 0) ? (0, -c/b) : (-c/a, 0); return line(point(R, M), point(R, M + (-b, a))); } /**/ line vline(coordsys R = currentcoordsys) {/*Return a vertical line in 'R' passing through the origin of 'R'.*/ point P = point(R, (0, 0)); point PP = point(R, (R.O + N)/R); return line(P, PP); } /**/ restricted line vline = vline();/*The vertical line in the current coordinate system passing through the origin of this system.*/ /**/ line hline(coordsys R = currentcoordsys) {/*Return a horizontal line in 'R' passing through the origin of 'R'.*/ point P = point(R, (0, 0)); point PP = point(R, (R.O + E)/R); return line(P, PP); } /**/ line hline = hline();/*The horizontal line in the current coordinate system passing through the origin of this system.*/ /**/ line changecoordsys(coordsys R, line l) {/*Return the line 'l' in the coordinate system 'R'.*/ point A = changecoordsys(R, l.A); point B = changecoordsys(R, l.B); return line(A, B); } /**/ transform scale(real k, line l1, line l2, bool safe = false) {/*Return the dilatation with respect to 'l1' in the direction of 'l2'.*/ return scale(k, l1.A, l1.B, l2.A, l2.B, safe); } /**/ transform reflect(line l) {/*Return the reflect about the line 'l'.*/ return reflect((pair)l.A, (pair)l.B); } /**/ transform reflect(line l1, line l2, bool safe = false) {/*Return the reflect about the line 'l1' in the direction of 'l2'.*/ return scale(-1.0, l1, l2, safe); } /**/ point[] intersectionpoints(line l, path g) {/*Return all points of intersection of the line 'l' with the path 'g'.*/ // TODO utiliser la version 1.44 de intersections(path g, pair p, pair q) // real [] t = intersections(g, l.A, l.B); // coordsys R = coordsys(l); // return sequence(new point(int n){return point(R, point(g, t[n])/R);}, t.length); real [] t; pair[] op; pair A = l.A; pair B = l.B; real dy = B.y - A.y, dx = A.x - B.x, lg = length(g); for (int i = 0; i < lg; ++i) { pair z0 = point(g, i), z1 = point(g, i + 1), c0 = postcontrol(g, i), c1 = precontrol(g, i + 1), t3 = z1 - z0 - 3 * c1 + 3 * c0, t2 = 3 * z0 + 3 * c1 - 6 * c0, t1 = 3 * c0 - 3z0; real a = dy * t3.x + dx * t3.y, b = dy * t2.x + dx * t2.y, c = dy * t1.x + dx * t1.y, d = dy * z0.x + dx * z0.y + A.y * B.x - A.x * B.y; t = cubicroots(a, b, c, d); for (int j = 0; j < t.length; ++j) if ( t[j]>=0 && ( t[j]<1 || ( t[j] == 1 && (i == lg - 1) && !cyclic(g) ) ) ) { op.push(point(g, i + t[j])); } } point[] opp; for (int i = 0; i < op.length; ++i) opp.push(point(coordsys(l), op[i]/coordsys(l))); return opp; } /**/ point intersectionpoint(line l1, line l2) {/*Return the point of intersection of line 'l1' with 'l2'. If 'l1' and 'l2' have an infinity or none point of intersection, this routine return (infinity, infinity).*/ point[] P = standardizecoordsys(l1.A, l1.B, l2.A, l2.B); coordsys R = P[0].coordsys; pair p = extension(P[0], P[1], P[2], P[3]); if(finite(p)){ point p = point(R, p/R); if (p @ l1 && p @ l2) return p; } return point(R, (infinity, infinity)); } /**/ line parallel(point M, line l) {/*Return the line parallel to 'l' passing through 'M'.*/ point A, B; if (M.coordsys != coordsys(l)) { A = changecoordsys(M.coordsys, l.A); B = changecoordsys(M.coordsys, l.B); } else {A = l.A;B = l.B;} return line(M, M - A + B); } /**/ line parallel(point M, explicit vector dir) {/*Return the line of direction 'dir' and passing through 'M'.*/ return line(M, M + locate(dir)); } /**/ line parallel(point M, explicit pair dir) {/*Return the line of direction 'dir' and passing through 'M'.*/ return line(M, M + vector(currentcoordsys, dir)); } /**/ bool parallel(line l1, line l2, bool strictly = false) {/*Return 'true' if 'l1' and 'l2' are (strictly ?) parallel.*/ bool coll = collinear(l1.u, l2.u); return strictly ? coll && (l1 != l2) : coll; } /**/ bool concurrent(... line[] l) {/*Returns true if all the lines 'l' are concurrent.*/ if (l.length < 3) abort("'concurrent' needs at least for three lines ..."); pair point = intersectionpoint(l[0], l[1]); bool conc; for (int i = 2; i < l.length; ++i) { pair pt = intersectionpoint(l[i - 1], l[i]); conc = simeq(pt, point); if (!conc) break; } return conc; } /**/ transform projection(line l) {/*Return the orthogonal projection on 'l'.*/ return projection(l.A, l.B); } /**/ transform projection(line l1, line l2, bool safe = false) {/*Return the projection on (AB) in parallel of (CD). If 'safe = true' and (l1)//(l2) return the identity. If 'safe = false' and (l1)//(l2) return a infinity scaling.*/ return projection(l1.A, l1.B, l2.A, l2.B, safe); } /**/ transform vprojection(line l, bool safe = false) {/*Return the projection on 'l' in parallel of N--S. If 'safe' is 'true' the projected point keeps the same place if 'l' is vertical.*/ coordsys R = defaultcoordsys; return projection(l, line(point(R, N), point(R, S)), safe); } /**/ transform hprojection(line l, bool safe = false) {/*Return the projection on 'l' in parallel of E--W. If 'safe' is 'true' the projected point keeps the same place if 'l' is horizontal.*/ coordsys R = defaultcoordsys; return projection(l, line(point(R, E), point(R, W)), safe); } /**/ line perpendicular(point M, line l) {/*Return the perpendicular line of 'l' passing through 'M'.*/ point Mp = projection(l) * M; point A = Mp == l.A ? l.B : l.A; return line(Mp, rotate(90, Mp) * A); } /**/ line perpendicular(point M, explicit vector normal) {/*Return the line passing through 'M' whose normal is \param{normal}.*/ return perpendicular(M, line(M, M + locate(normal))); } /**/ line perpendicular(point M, explicit pair normal) {/*Return the line passing through 'M' whose normal is \param{normal} (given in the currentcoordsys).*/ return perpendicular(M, line(M, M + vector(currentcoordsys, normal))); } /**/ bool perpendicular(line l1, line l2) {/*Return 'true' if 'l1' and 'l2' are perpendicular.*/ return abs(dot(locate(l1.u), locate(l2.u))) < epsgeo ; } /**/ real angle(line l, coordsys R = coordsys(l)) {/*Return the angle of the oriented line 'l', in radian, in the interval ]-pi, pi] and relatively to 'R'.*/ return angle(l.u, R, false); } /**/ real degrees(line l, coordsys R = coordsys(l)) {/*Returns the angle of the oriented line 'l' in degrees, in the interval [0, 360[ and relatively to 'R'.*/ return degrees(angle(l, R)); } /**/ real sharpangle(line l1, line l2) {/*Return the measure in radians of the sharp angle formed by 'l1' and 'l2'.*/ vector u1 = l1.u; vector u2 = (dot(l1.u, l2.u) < 0) ? -l2.u : l2.u; real a12 = angle(locate(u2)) - angle(locate(u1)); a12 = a12%(sgnd(a12) * pi); if (a12 <= -pi/2) { a12 += pi; } else if (a12 > pi/2) { a12 -= pi; } return a12; } /**/ real angle(line l1, line l2) {/*Return the measure in radians of oriented angle (l1.u, l2.u).*/ return angle(locate(l2.u)) - angle(locate(l1.u)); } /**/ real degrees(line l1, line l2) {/*Return the measure in degrees of the angle formed by the oriented lines 'l1' and 'l2'.*/ return degrees(angle(l1, l2)); } /**/ real sharpdegrees(line l1, line l2) {/*Return the measure in degrees of the sharp angle formed by 'l1' and 'l2'.*/ return degrees(sharpangle(l1, l2)); } /**/ line bisector(line l1, line l2, real angle = 0, bool sharp = true) {/*Return the bisector of the angle formed by 'l1' and 'l2' rotated by the angle 'angle' (in degrees) around intersection point of 'l1' with 'l2'. If 'sharp' is true (the default), this routine returns the bisector of the sharp angle. Note that the returned line inherit of coordinate system of 'l1'.*/ line ol; if (l1 == l2) return l1; point A = intersectionpoint(l1, l2); if (finite(A)) { if(sharp) ol = rotate(sharpdegrees(l1, l2)/2 + angle, A) * l1; else { coordsys R = coordsys(l1); pair a = A, b = A + l1.u, c = A + l2.u; pair pp = extension(a, a + dir(a--b, a--c), b, b + dir(b--a, b--c)); return rotate(angle, A) * line(A, point(R, pp/R)); } } else { ol = l1; } return ol; } /**/ line sector(int n = 2, int p = 1, line l1, line l2, real angle = 0, bool sharp = true) {/*Return the p-th nth-sector of the angle formed by the oriented line 'l1' and 'l2' rotated by the angle 'angle' (in degrees) around the intersection point of 'l1' with 'l2'. If 'sharp' is true (the default), this routine returns the bisector of the sharp angle. Note that the returned line inherit of coordinate system of 'l1'.*/ line ol; if (l1 == l2) return l1; point A = intersectionpoint(l1, l2); if (finite(A)) { if(sharp) ol = rotate(p * sharpdegrees(l1, l2)/n + angle, A) * l1; else { ol = rotate(p * degrees(l1, l2)/n + angle, A) * l1; } } else { ol = l1; } return ol; } /**/ line bisector(point A, point B, point C, point D, real angle = 0, bool sharp = true) {/*Return the bisector of the angle formed by the lines (AB) and (CD). .*/ point[] P = standardizecoordsys(A, B, C, D); return bisector(line(P[0], P[1]), line(P[2], P[3]), angle, sharp); } /**/ line bisector(segment s, real angle = 0) {/*Return the bisector of the segment line 's' rotated by 'angle' (in degrees) around the midpoint of 's'.*/ coordsys R = coordsys(s); point m = midpoint(s); vector dir = rotateO(90) * unit(s.A - m); return rotate(angle, m) * line(m + dir, m - dir); } /**/ line bisector(point A, point B, real angle = 0) {/*Return the bisector of the segment line [AB] rotated by 'angle' (in degrees) around the midpoint of [AB].*/ point[] P = standardizecoordsys(A, B); return bisector(segment(P[0], P[1]), angle); } /**/ real distance(point M, line l) {/*Return the distance from 'M' to 'l'. distance(line, point) is also defined.*/ point A = changecoordsys(defaultcoordsys, l.A); point B = changecoordsys(defaultcoordsys, l.B); line ll = line(A, B); pair m = locate(M); return abs(ll.a * m.x + ll.b * m.y + ll.c)/sqrt(ll.a^2 + ll.b^2); } real distance(line l, point M) { return distance(M, l); } /**/ void draw(picture pic = currentpicture, Label L = "", line l, bool dirA = l.extendA, bool dirB = l.extendB, align align = NoAlign, pen p = currentpen, arrowbar arrow = None, Label legend = "", marker marker = nomarker, pathModifier pathModifier = NoModifier) {/*Draw the line 'l' without altering the size of picture pic. The boolean parameters control the infinite section. The global variable 'linemargin' (default value is 0) allows to modify the bounding box in which the line must be drawn.*/ if(!(dirA || dirB)) draw(l.A--l.B, invisible);// l is a segment. Drawline(pic, L, l.A, dirP = dirA, l.B, dirQ = dirB, align, p, arrow, legend, marker, pathModifier); } /**/ void draw(picture pic = currentpicture, Label[] L = new Label[], line[] l, align align = NoAlign, pen[] p = new pen[], arrowbar arrow = None, Label[] legend = new Label[], marker marker = nomarker, pathModifier pathModifier = NoModifier) {/*Draw each lines with the corresponding pen.*/ for (int i = 0; i < l.length; ++i) { draw(pic, L.length>0 ? L[i] : "", l[i], align, p = p.length>0 ? p[i] : currentpen, arrow, legend.length>0 ? legend[i] : "", marker, pathModifier); } } /**/ void draw(picture pic = currentpicture, Label[] L = new Label[], line[] l, align align = NoAlign, pen p, arrowbar arrow = None, Label[] legend = new Label[], marker marker = nomarker, pathModifier pathModifier = NoModifier) {/*Draw each lines with the same pen 'p'.*/ pen[] tp = sequence(new pen(int i){return p;}, l.length); draw(pic, L, l, align, tp, arrow, legend, marker, pathModifier); } /**/ void show(picture pic = currentpicture, line l, pen p = red) {/*Draw some informations of 'l'.*/ dot("$A$", (pair)l.A, align = -locate(l.v), p); dot("$B$", (pair)l.B, align = -locate(l.v), p); draw(l, dotted); draw("$\vec{u}$", locate(l.A)--locate(l.A + l.u), p, Arrow); draw("$\vec{v}$", locate(l.A)--locate(l.A + l.v), p, Arrow); } /**/ point[] sameside(point M, line l1, line l2) {/*Return two points on 'l1' and 'l2' respectively. The first point is from the same side of M relatively to 'l2', the second point is from the same side of M relatively to 'l1'.*/ point[] op; coordsys R1 = coordsys(l1); coordsys R2 = coordsys(l2); if (parallel(l1, l2)) { op.push(projection(l1) * M); op.push(projection(l2) * M); } else { point O = intersectionpoint(l1, l2); if (M @ l2) op.push((sameside(M, O + l1.u, l2)) ? O + l1.u : rotate(180, O) * (O + l1.u)); else op.push(projection(l1, l2) * M); if (M @ l1) op.push((sameside(M, O + l2.u, l1)) ? O + l2.u : rotate(180, O) * (O + l2.u)); else {op.push(projection(l2, l1) * M);} } return op; } /**/ void markangle(picture pic = currentpicture, Label L = "", int n = 1, real radius = 0, real space = 0, explicit line l1, explicit line l2, explicit pair align = dir(1), arrowbar arrow = None, pen p = currentpen, filltype filltype = NoFill, margin margin = NoMargin, marker marker = nomarker) {/*Mark the angle (l1, l2) aligned in the direction 'align' relative to 'l1'. Commune values for 'align' are dir(real).*/ if (parallel(l1, l2, true)) return; real al = degrees(l1, defaultcoordsys); pair O, A, B; if (radius == 0) radius = markangleradius(p); real d = degrees(locate(l1.u)); align = rotate(d) * align; if (l1 == l2) { O = midpoint(segment(l1.A, l1.B)); A = l1.A;B = l1.B; if (sameside(rotate(sgn(angle(B-A)) * 45, O) * A, O + align, l1)) {radius = -radius;} } else { O = intersectionpoint(extend(l1), extend(l2)); pair R = O + align; point [] ss = sameside(point(coordsys(l1), R/coordsys(l1)), l1, l2); A = ss[0]; B = ss[1]; } markangle(pic = pic, L = L, n = n, radius = radius, space = space, O = O, A = A, B = B, arrow = arrow, p = p, filltype = filltype, margin = margin, marker = marker); } /**/ void markangle(picture pic = currentpicture, Label L = "", int n = 1, real radius = 0, real space = 0, explicit line l1, explicit line l2, explicit vector align, arrowbar arrow = None, pen p = currentpen, filltype filltype = NoFill, margin margin = NoMargin, marker marker = nomarker) {/*Mark the angle (l1, l2) in the direction 'dir' given relatively to 'l1'.*/ markangle(pic, L, n, radius, space, l1, l2, (pair)align, arrow, p, filltype, margin, marker); } /**/ // void markangle(picture pic = currentpicture, // Label L = "", int n = 1, real radius = 0, real space = 0, // explicit line l1, explicit line l2, // arrowbar arrow = None, pen p = currentpen, // filltype filltype = NoFill, // margin margin = NoMargin, marker marker = nomarker) // {/*Mark the oriented angle (l1, l2).*/ // if (parallel(l1, l2, true)) return; // real al = degrees(l1, defaultcoordsys); // pair O, A, B; // if (radius == 0) radius = markangleradius(p); // real d = degrees(locate(l1.u)); // if (l1 == l2) { // O = midpoint(segment(l1.A, l1.B)); // } else { // O = intersectionpoint(extend(l1), extend(l2)); // } // A = O + locate(l1.u); // B = O + locate(l2.u); // markangle(pic = pic, L = L, n = n, radius = radius, space = space, // O = O, A = A, B = B, // arrow = arrow, p = p, filltype = filltype, // margin = margin, marker = marker); // } /**/ void perpendicularmark(picture pic = currentpicture, line l1, line l2, real size = 0, pen p = currentpen, int quarter = 1, margin margin = NoMargin, filltype filltype = NoFill) {/*Draw a right angle at the intersection point of lines and aligned in the 'quarter' nth quarter of circle formed by 'l1.u' and 'l2.u'.*/ point P = intersectionpoint(l1, l2); pair align = rotate(90 * (quarter - 1)) * dir(45); perpendicularmark(P, align, locate(l1.u), size, p, margin, filltype); } // *.........................LINES.........................* // *=======================================================* // *=======================================================* // *........................CONICS.........................* /**/ struct bqe {/*Bivariate Quadratic Equation.*/ /**/ real[] a;/*a[0] * x^2 + a[1] * x * y + a[2] * y^2 + a[3] * x + a[4] * y + a[5] = 0*/ coordsys coordsys;/**/ }/**/ /**/ bqe bqe(coordsys R = currentcoordsys, real a, real b, real c, real d, real e, real f) {/*Return the bivariate quadratic equation a[0] * x^2 + a[1] * x * y + a[2] * y^2 + a[3] * x + a[4] * y + a[5] = 0 relatively to the coordinate system R.*/ bqe obqe; obqe.coordsys = R; obqe.a = new real[] {a, b, c, d, e, f}; return obqe; } /**/ bqe changecoordsys(coordsys R, bqe bqe) {/*Returns the bivariate quadratic equation relatively to 'R'.*/ pair i = coordinates(changecoordsys(R, vector(defaultcoordsys, bqe.coordsys.i))); pair j = coordinates(changecoordsys(R, vector(defaultcoordsys, bqe.coordsys.j))); pair O = coordinates(changecoordsys(R, point(defaultcoordsys, bqe.coordsys.O))); real a = bqe.a[0], b = bqe.a[1], c = bqe.a[2], d = bqe.a[3], f = bqe.a[4], g = bqe.a[5]; real ux = i.x, uy = i.y; real vx = j.x, vy = j.y; real ox = O.x, oy = O.y; real D = ux * vy - uy * vx; real ap = (a * vy^2 - b * uy * vy + c * uy^2)/D^2; real bpp = (-2 * a * vx * vy + b * ux * vy + b * uy * vx - 2 * c * ux * uy)/D^2; real cp = (a * vx^2 - b * ux * vx + c * ux^2)/D^2; real dp = (-2a * ox * vy^2 + 2a * oy * vx * vy + 2b * ox * uy * vy- b * oy * ux * vy - b * oy * uy * vx - 2c * ox * uy^2 + 2c * oy * uy * ux)/D^2+ (d * vy - f * uy)/D; real fp = (2a * ox * vx * vy - b * ox * ux * vy - 2a * oy * vx^2- b * ox * uy * vx + 2 * b * oy * ux * vx + 2c * ox * ux * uy - 2c * oy * ux^2)/D^2+ (f * ux - d * vx)/D; g = (a * ox^2 * vy^2 - 2a * ox * oy * vx * vy - b * ox^2 * uy * vy + b * ox * oy * ux * vy+ a * oy^2 * vx^2 + b * ox * oy * uy * vx - b * oy^2 * ux * vx + c * ox^2 * uy^2- 2 * c * ox * oy * ux * uy + c * oy^2 * ux^2)/D^2+ (d * oy * vx + f * ox * uy - d * ox * vy - f * oy * ux)/D + g; bqe obqe; obqe.a = approximate(new real[] {ap, bpp, cp, dp, fp, g}); obqe.coordsys = R; return obqe; } /**/ bqe bqe(point M1, point M2, point M3, point M4, point M5) {/*Return the bqe of conic passing through the five points (if possible).*/ coordsys R; pair[] pts; if (samecoordsys(M1, M2, M3, M4, M5)) { R = M1.coordsys; pts= new pair[] {M1.coordinates, M2.coordinates, M3.coordinates, M4.coordinates, M5.coordinates}; } else { R = defaultcoordsys; pts= new pair[] {M1, M2, M3, M4, M5}; } real[][] M; real[] x; bqe bqe; bqe.coordsys = R; for (int i = 0; i < 5; ++i) {// Try a = -1 M[i] = new real[] {pts[i].x * pts[i].y, pts[i].y^2, pts[i].x, pts[i].y, 1}; x[i] = pts[i].x^2; } if(abs(determinant(M)) < 1e-5) {// Try c = -1 for (int i = 0; i < 5; ++i) { M[i] = new real[] {pts[i].x^2, pts[i].x * pts[i].y, pts[i].x, pts[i].y, 1}; x[i] = pts[i].y^2; } real[] coef = solve(M, x); bqe.a = new real[] {coef[0], coef[1], -1, coef[2], coef[3], coef[4]}; } else { real[] coef = solve(M, x); bqe.a = new real[] {-1, coef[0], coef[1], coef[2], coef[3], coef[4]}; } bqe.a = approximate(bqe.a); return bqe; } /**/ bool samecoordsys(bool warn = true ... bqe[] bqes) {/*Return true if all the bivariate quadratic equations have the same coordinate system.*/ bool ret = true; coordsys t = bqes[0].coordsys; for (int i = 1; i < bqes.length; ++i) { ret = (t == bqes[i].coordsys); if(!ret) break; t = bqes[i].coordsys; } if(warn && !ret) warning("coodinatesystem", "the coordinate system of two bivariate quadratic equations are not the same. The operation will be done relatively to the default coordinate system."); return ret; } /**/ real[] realquarticroots(real a, real b, real c, real d, real e) {/*Return the real roots of the quartic equation ax^4 + b^x3 + cx^2 + dx = 0.*/ static real Fuzz = sqrt(realEpsilon); pair[] zroots = quarticroots(a, b, c, d, e); real[] roots; real p(real x){return a * x^4 + b * x^3 + c * x^2 + d * x + e;} real prime(real x){return 4 * a * x^3 + 3 * b * x^2 + 2 * c * x + d;} real x; bool search = true; int n; void addroot(real x) { bool exist = false; for (int i = 0; i < roots.length; ++i) { if(abs(roots[i]-x) < 1e-5) {exist = true; break;} } if(!exist) roots.push(x); } for(int i = 0; i < zroots.length; ++i) { if(zroots[i].y == 0 || abs(p(zroots[i].x)) < Fuzz) addroot(zroots[i].x); else { if(abs(zroots[i].y) < 1e-3) { x = zroots[i].x; search = true; n = 200; while(search) { real tx = abs(p(x)) < Fuzz ? x : newton(iterations = n, p, prime, x); if(tx < realMax) { if(abs(p(tx)) < Fuzz) { addroot(tx); search = false; } else if(n < 200) n *=2; else { search = false; } } else search = false; //It's not a real root. } } } } return roots; } /**/ point[] intersectionpoints(bqe bqe1, bqe bqe2) {/*Return the interscetion of the two conic sections whose equations are 'bqe1' and 'bqe2'.*/ coordsys R = bqe1.coordsys; bqe lbqe1, lbqe2; real[] a, b; if(R != bqe2.coordsys) { R = currentcoordsys; a = changecoordsys(R, bqe1).a; b = changecoordsys(R, bqe2).a; } else { a = bqe1.a; b = bqe2.a; } static real e = 100 * sqrt(realEpsilon); real[] x, y, c; point[] P; if(abs(a[0]-b[0]) > e || abs(a[1]-b[1]) > e || abs(a[2]-b[2]) > e) { c = new real[] {-2 * a[0]*a[2]*b[0]*b[2]+a[0]*a[2]*b[1]^2 - a[0]*a[1]*b[2]*b[1]+a[1]^2 * b[0]*b[2]- a[2]*a[1]*b[0]*b[1]+a[0]^2 * b[2]^2 + a[2]^2 * b[0]^2, -a[2]*a[1]*b[0]*b[4]-a[2]*a[4]*b[0]*b[1]-a[1]*a[3]*b[2]*b[1]+2 * a[0]*a[2]*b[1]*b[4]- a[0]*a[1]*b[2]*b[4]+a[1]^2 * b[2]*b[3]-2 * a[2]*a[3]*b[0]*b[2]-2 * a[0]*a[2]*b[2]*b[3]+ a[2]*a[3]*b[1]^2 - a[2]*a[1]*b[1]*b[3]+2 * a[1]*a[4]*b[0]*b[2]+2 * a[2]^2 * b[0]*b[3]- a[0]*a[4]*b[2]*b[1]+2 * a[0]*a[3]*b[2]^2, -a[3]*a[4]*b[2]*b[1]+a[2]*a[5]*b[1]^2 - a[1]*a[5]*b[2]*b[1]-a[1]*a[3]*b[2]*b[4]+ a[1]^2 * b[2]*b[5]-2 * a[2]*a[3]*b[2]*b[3]+2 * a[2]^2 * b[0]*b[5]+2 * a[0]*a[5]*b[2]^2 + a[3]^2 * b[2]^2- 2 * a[2]*a[5]*b[0]*b[2]+2 * a[1]*a[4]*b[2]*b[3]-a[2]*a[4]*b[1]*b[3]-2 * a[0]*a[2]*b[2]*b[5]+ a[2]^2 * b[3]^2 + 2 * a[2]*a[3]*b[1]*b[4]-a[2]*a[4]*b[0]*b[4]+a[4]^2 * b[0]*b[2]-a[2]*a[1]*b[3]*b[4]- a[2]*a[1]*b[1]*b[5]-a[0]*a[4]*b[2]*b[4]+a[0]*a[2]*b[4]^2, -a[4]*a[5]*b[2]*b[1]+a[2]*a[3]*b[4]^2 + 2 * a[3]*a[5]*b[2]^2 - a[2]*a[1]*b[4]*b[5]- a[2]*a[4]*b[3]*b[4]+2 * a[2]^2 * b[3]*b[5]-2 * a[2]*a[3]*b[2]*b[5]-a[3]*a[4]*b[2]*b[4]- 2 * a[2]*a[5]*b[2]*b[3]-a[2]*a[4]*b[1]*b[5]+2 * a[1]*a[4]*b[2]*b[5]-a[1]*a[5]*b[2]*b[4]+ a[4]^2 * b[2]*b[3]+2 * a[2]*a[5]*b[1]*b[4], -2 * a[2]*a[5]*b[2]*b[5]+a[4]^2 * b[2]*b[5]+a[5]^2 * b[2]^2 - a[4]*a[5]*b[2]*b[4]+a[2]*a[5]*b[4]^2+ a[2]^2 * b[5]^2 - a[2]*a[4]*b[4]*b[5]}; x = realquarticroots(c[0], c[1], c[2], c[3], c[4]); } else { if(abs(b[4]-a[4]) > e){ real D = (b[4]-a[4])^2; c = new real[] {(a[0]*b[4]^2 + (-a[1]*b[3]-2 * a[0]*a[4]+a[1]*a[3]) * b[4]+a[2]*b[3]^2+ (a[1]*a[4]-2 * a[2]*a[3]) * b[3]+a[0]*a[4]^2 - a[1]*a[3]*a[4]+a[2]*a[3]^2)/D, -((a[1]*b[4]-2 * a[2]*b[3]-a[1]*a[4]+2 * a[2]*a[3]) * b[5]-a[3]*b[4]^2 + (a[4]*b[3]-a[1]*a[5]+a[3]*a[4]) * b[4]+(2 * a[2]*a[5]-a[4]^2) * b[3]+(a[1]*a[4]-2 * a[2]*a[3]) * a[5])/D, a[2]*(a[5]-b[5])^2/D + a[4]*(a[5]-b[5])/(b[4]-a[4]) + a[5]}; x = quadraticroots(c[0], c[1], c[2]); } else { if(abs(a[3]-b[3]) > e) { real D = b[3]-a[3]; c = new real[] {a[2], (-a[1]*b[5] + a[4]*b[3] + a[1]*a[5] - a[3]*a[4])/D, a[0]*(a[5]-b[5])^2/D^2 + a[3]*(a[5]-b[5])/D + a[5]}; y = quadraticroots(c[0], c[1], c[2]); for (int i = 0; i < y.length; ++i) { c = new real[] {a[0], a[1]*y[i]+a[3], a[2]*y[i]^2 + a[4]*y[i]+a[5]}; x = quadraticroots(c[0], c[1], c[2]); for (int j = 0; j < x.length; ++j) { if(abs(b[0]*x[j]^2 + b[1]*x[j]*y[i]+b[2]*y[i]^2 + b[3]*x[j]+b[4]*y[i]+b[5]) < 1e-5) P.push(point(R, (x[j], y[i]))); } } return P; } else { if(abs(a[5]-b[5]) < e) abort("intersectionpoints: intersection of identical conics."); } } } for (int i = 0; i < x.length; ++i) { c = new real[] {a[2], a[1]*x[i]+a[4], a[0]*x[i]^2 + a[3]*x[i]+a[5]}; y = quadraticroots(c[0], c[1], c[2]); for (int j = 0; j < y.length; ++j) { if(abs(b[0]*x[i]^2 + b[1]*x[i]*y[j]+b[2]*y[j]^2 + b[3]*x[i]+b[4]*y[j]+b[5]) < 1e-5) P.push(point(R, (x[i], y[j]))); } } return P; } /**/ struct conic {/**/ real e, p, h;/*BE CAREFUL: h = distance(F, D) and p = h * e (http://en.wikipedia.org/wiki/Ellipse) While http://mathworld.wolfram.com/ takes p = distance(F,D).*/ point F;/*Focus.*/ line D;/*Directrix.*/ line[] l;/*Case of degenerated conic (not yet implemented !).*/ }/**/ bool degenerate(conic c) { return !finite(c.p) || !finite(c.h); } /*ANCconic conic(point, line, real)ANC*/ conic conic(point F, line l, real e) {/*DOC The conic section define by the eccentricity 'e', the focus 'F' and the directrix 'l'. Note that an eccentricity equal to 0 defines a circle centered at F, with a radius equal at the distance from 'F' to 'l'. If the coordinate system of 'F' and 'l' are not identical, the conic is attached to 'defaultcoordsys'. DOC*/ if(e < 0) abort("conic: 'e' can't be negative."); conic oc; point[] P = standardizecoordsys(F, l.A, l.B); line ll; ll = line(P[1], P[2]); oc.e = e < epsgeo ? 0 : e; // Handle case of circle. oc.F = P[0]; oc.D = ll; oc.h = distance(P[0], ll); oc.p = abs(e) < epsgeo ? oc.h : e * oc.h; return oc; } /**/ struct circle {/*All the calculus with this structure will be as exact as Asymptote can do. For a full precision, you must not cast 'circle' to 'path' excepted for drawing routines.*/ /**/ point C;/*Center*/ real r;/*Radius*/ line l;/*If the radius is infinite, this line is used instead of circle.*/ }/**/ bool degenerate(circle c) { return !finite(c.r); } line line(circle c){ if(finite(c.r)) abort("Circle can not be casted to line here."); return c.l; } /**/ struct ellipse {/*Look at http://mathworld.wolfram.com/Ellipse.html*/ /**/ restricted point F1,F2,C;/*Foci and center.*/ restricted real a,b,c,e,p;/**/ restricted real angle;/*Value is degrees(F1 - F2).*/ restricted line D1,D2;/*Directrices.*/ line l;/*If one axis is infinite, this line is used instead of ellipse.*/ /**/ void init(point f1, point f2, real a) {/*Ellipse given by foci and semimajor axis*/ point[] P = standardizecoordsys(f1, f2); this.F1 = P[0]; this.F2 = P[1]; this.angle = abs(P[1]-P[0]) < 10 * epsgeo ? 0 : degrees(P[1]-P[0]); this.C = (P[0] + P[1])/2; this.a = a; if(!finite(a)) { this.l = line(P[0], P[1]); this.b = infinity; this.e = 0; this.c = 0; } else { this.c = abs(C - P[0]); this.b = this.c < epsgeo ? a : sqrt(a^2 - c^2); // Handle case of circle. this.e = this.c < epsgeo ? 0 : this.c/a; // Handle case of circle. if(this.e >= 1) abort("ellipse.init: wrong parameter: e >= 1."); this.p = a * (1 - this.e^2); if (this.c != 0) {// directrix is not set for a circle. point A = this.C + (a^2/this.c) * unit(P[0]-this.C); this.D1 = line(A, A + rotateO(90) * unit(A - this.C)); this.D2 = reverse(rotate(180, C) * D1); } } } }/**/ bool degenerate(ellipse el) { return (!finite(el.a) || !finite(el.b)); } /**/ struct parabola {/*Look at http://mathworld.wolfram.com/Parabola.html*/ restricted point F,V;/*Focus and vertex*/ restricted real a,p,e = 1;/**/ restricted real angle;/*Angle, in degrees, of the line (FV).*/ restricted line D;/*Directrix*/ pair bmin, bmax;/*The (left, bottom) and (right, top) coordinates of region bounding box for drawing the parabola. If unset the current picture bounding box is used instead.*/ /**/ void init(point F, line directrix) {/*Parabola given by focus and directrix.*/ point[] P = standardizecoordsys(F, directrix.A, directrix.B); line l = line(P[1], P[2]); this.F = P[0]; this.D = l; this.a = distance(P[0], l)/2; this.p = 2 * a; this.V = 0.5 * (F + projection(D) * P[0]); this.angle = degrees(F - V); } }/**/ /**/ struct hyperbola {/*Look at http://mathworld.wolfram.com/Hyperbola.html*/ restricted point F1,F2;/*Foci.*/ restricted point C,V1,V2;/*Center and vertices.*/ restricted real a,b,c,e,p;/**/ restricted real angle;/*Angle,in degrees,of the line (F1F2).*/ restricted line D1,D2,A1,A2;/*Directrices and asymptotes.*/ pair bmin, bmax; /*The (left, bottom) and (right, top) coordinates of region bounding box for drawing the hyperbola. If unset the current picture bounding box is used instead.*/ /**/ void init(point f1, point f2, real a) {/*Hyperbola given by foci and semimajor axis.*/ point[] P = standardizecoordsys(f1, f2); this.F1 = P[0]; this.F2 = P[1]; this.angle = degrees(F2 - F1); this.a = a; this.C = (P[0] + P[1])/2; this.c = abs(C - P[0]); this.e = this.c/a; if(this.e <= 1) abort("hyperbola.init: wrong parameter: e <= 1."); this.b = a * sqrt(this.e^2 - 1); this.p = a * (this.e^2 - 1); point A = this.C + (a^2/this.c) * unit(P[0]-this.C); this.D1 = line(A, A + rotateO(90) * unit(A - this.C)); this.D2 = reverse(rotate(180, C) * D1); this.V1 = C + a * unit(F1 - C); this.V2 = C + a * unit(F2 - C); this.A1 = line(C, V1 + b * unit(rotateO(-90) * (C - V1))); this.A2 = line(C, V1 + b * unit(rotateO(90) * (C - V1))); } }/**/ /**/ int conicnodesfactor = 1;/*Factor for the node number of all conics.*/ /**/ int circlenodesnumberfactor = 100;/*Factor for the node number of circles.*/ /**/ int circlenodesnumber(real r) {/*Return the number of nodes for drawing a circle of radius 'r'.*/ if (circlenodesnumberfactor < 100) warning("circlenodesnumberfactor", "variable 'circlenodesnumberfactor' may be too small."); int oi = ceil(circlenodesnumberfactor * abs(r)^0.1); oi = 45 * floor(oi/45); return oi == 0 ? 4 : conicnodesfactor * oi; } /**/ int circlenodesnumber(real r, real angle1, real angle2) {/*Return the number of nodes to draw a circle arc.*/ return (r > 0) ? ceil(circlenodesnumber(r) * abs(angle1 - angle2)/360) : ceil(circlenodesnumber(r) * abs((1 - abs(angle1 - angle2)/360))); } /**/ int ellipsenodesnumberfactor = 250;/*Factor for the node number of ellispe (non-circle).*/ /**/ int ellipsenodesnumber(real a, real b) {/*Return the number of nodes to draw a ellipse of axis 'a' and 'b'.*/ if (ellipsenodesnumberfactor < 250) write("ellipsenodesnumberfactor", "variable 'ellipsenodesnumberfactor' maybe too small."); int tmp = circlenodesnumberfactor; circlenodesnumberfactor = ellipsenodesnumberfactor; int oi = circlenodesnumber(max(abs(a), abs(b))/min(abs(a), abs(b))); circlenodesnumberfactor = tmp; return conicnodesfactor * oi; } /**/ int ellipsenodesnumber(real a, real b, real angle1, real angle2, bool dir) {/*Return the number of nodes to draw an ellipse arc.*/ real d; real da = angle2 - angle1; if(dir) { d = angle1 < angle2 ? da : 360 + da; } else { d = angle1 < angle2 ? -360 + da : da; } int n = floor(ellipsenodesnumber(a, b) * abs(d)/360); return n < 5 ? 5 : n; } /**/ int parabolanodesnumberfactor = 100;/*Factor for the number of nodes of parabolas.*/ /**/ int parabolanodesnumber(parabola p, real angle1, real angle2) {/*Return the number of nodes for drawing a parabola.*/ return conicnodesfactor * floor(0.01 * parabolanodesnumberfactor * abs(angle1 - angle2)); } /**/ int hyperbolanodesnumberfactor = 100;/*Factor for the number of nodes of hyperbolas.*/ /**/ int hyperbolanodesnumber(hyperbola h, real angle1, real angle2) {/*Return the number of nodes for drawing an hyperbola.*/ return conicnodesfactor * floor(0.01 * hyperbolanodesnumberfactor * abs(angle1 - angle2)/h.e); } /**/ conic operator +(conic c, explicit point M) {/**/ return conic(c.F + M, c.D + M, c.e); } /**/ conic operator -(conic c, explicit point M) {/**/ return conic(c.F - M, c.D - M, c.e); } /**/ conic operator +(conic c, explicit pair m) {/**/ point M = point(c.F.coordsys, m); return conic(c.F + M, c.D + M, c.e); } /**/ conic operator -(conic c, explicit pair m) {/**/ point M = point(c.F.coordsys, m); return conic(c.F - M, c.D - M, c.e); } /**/ conic operator +(conic c, vector v) {/**/ return conic(c.F + v, c.D + v, c.e); } /**/ conic operator -(conic c, vector v) {/**/ return conic(c.F - v, c.D - v, c.e); } /**/ coordsys coordsys(conic co) {/*Return the coordinate system of 'co'.*/ return co.F.coordsys; } /**/ conic changecoordsys(coordsys R, conic co) {/*Change the coordinate system of 'co' to 'R'*/ line l = changecoordsys(R, co.D); point F = changecoordsys(R, co.F); return conic(F, l, co.e); } /**/ typedef path polarconicroutine(conic co, real angle1, real angle2, int n, bool direction);/*Routine type used to draw conics from 'angle1' to 'angle2'*/ /**/ path arcfromfocus(conic co, real angle1, real angle2, int n = 400, bool direction = CCW) {/*Return the path of the conic section 'co' from angle1 to angle2 in degrees, drawing in the given direction, with n nodes.*/ guide op; if (n < 1) return op; if (angle1 > angle2) { path g = arcfromfocus(co, angle2, angle1, n, !direction); return g == nullpath ? g : reverse(g); } point O = projection(co.D) * co.F; pair i = unit(locate(co.F) - locate(O)); pair j = rotate(90) * i; coordsys Rp = cartesiansystem(co.F, i, j); real a1 = direction ? radians(angle1) : radians(angle2); real a2 = direction ? radians(angle2) : radians(angle1) + 2 * pi; real step = n == 1 ? 0 : (a2 - a1)/(n - 1); real a, r; for (int i = 0; i < n; ++i) { a = a1 + i * step; if(co.e >= 1) { r = 1 - co.e * cos(a); if(r > epsgeo) { r = co.p/r; op = op--Rp * Rp.polar(r, a); } } else { r = co.p/(1 - co.e * cos(a)); op = op..Rp * Rp.polar(r, a); } } if(co.e < 1 && abs(abs(a2 - a1) - 2 * pi) < epsgeo) op = (path)op..cycle; return (direction ? op : op == nullpath ? op :reverse(op)); } /**/ polarconicroutine currentpolarconicroutine = arcfromfocus;/*Default routine used to cast conic section to path.*/ /**/ point angpoint(conic co, real angle) {/*Return the point of 'co' whose the angular (in degrees) coordinate is 'angle' (mesured from the focus of 'co', relatively to its 'natural coordinate system').*/ coordsys R = coordsys(co); return point(R, point(arcfromfocus(co, angle, angle, 1, CCW), 0)/R); } /**/ bool operator @(point M, conic co) {/*Return true iff 'M' on 'co'.*/ if(co.e == 0) return abs(abs(co.F - M) - co.p) < 10 * epsgeo; return abs(co.e * distance(M, co.D) - abs(co.F - M)) < 10 * epsgeo; } /**/ coordsys coordsys(ellipse el) {/*Return the coordinate system of 'el'.*/ return el.F1.coordsys; } /**/ coordsys canonicalcartesiansystem(ellipse el) {/*Return the canonical cartesian system of the ellipse 'el'.*/ if(degenerate(el)) return cartesiansystem(el.l.A, el.l.u, el.l.v); pair O = locate(el.C); pair i = el.e == 0 ? el.C.coordsys.i : unit(locate(el.F1) - O); pair j = rotate(90) * i; return cartesiansystem(O, i, j); } /**/ coordsys canonicalcartesiansystem(parabola p) {/*Return the canonical cartesian system of a parabola, so that Origin = vertex of 'p' and directrix: x = -a.*/ point A = projection(p.D) * p.F; pair O = locate((A + p.F)/2); pair i = unit(locate(p.F) - O); pair j = rotate(90) * i; return cartesiansystem(O, i, j); } /**/ coordsys canonicalcartesiansystem(hyperbola h) {/*Return the canonical cartesian system of an hyperbola.*/ pair O = locate(h.C); pair i = unit(locate(h.F2) - O); pair j = rotate(90) * i; return cartesiansystem(O, i, j); } /**/ ellipse ellipse(point F1, point F2, real a) {/*Return the ellipse whose the foci are 'F1' and 'F2' and the semimajor axis is 'a'.*/ ellipse oe; oe.init(F1, F2, a); return oe; } /**/ restricted bool byfoci = true, byvertices = false;/*Constants useful for the routine 'hyperbola(point P1, point P2, real ae, bool byfoci = byfoci)'*/ /**/ hyperbola hyperbola(point P1, point P2, real ae, bool byfoci = byfoci) {/*if 'byfoci = true': return the hyperbola whose the foci are 'P1' and 'P2' and the semimajor axis is 'ae'. else return the hyperbola whose vertexes are 'P1' and 'P2' with eccentricity 'ae'.*/ hyperbola oh; point[] P = standardizecoordsys(P1, P2); if(byfoci) { oh.init(P[0], P[1], ae); } else { real a = abs(P[0]-P[1])/2; vector V = unit(P[0]-P[1]); point F1 = P[0] + a * (ae - 1) * V; point F2 = P[1]-a * (ae - 1) * V; oh.init(F1, F2, a); } return oh; } /**/ ellipse ellipse(point F1, point F2, point M) {/*Return the ellipse passing through 'M' whose the foci are 'F1' and 'F2'.*/ point P[] = standardizecoordsys(false, F1, F2, M); real a = abs(F1 - M) + abs(F2 - M); return ellipse(F1, F2, finite(a) ? a/2 : a); } /**/ ellipse ellipse(point C, real a, real b, real angle = 0) {/*Return the ellipse centered at 'C' with semimajor axis 'a' along C--C + dir(angle), semiminor axis 'b' along the perpendicular.*/ ellipse oe; coordsys R = C.coordsys; angle += degrees(R.i); if(a < b) {angle += 90; real tmp = a; a = b; b = tmp;} if(finite(a) && finite(b)) { real c = sqrt(abs(a^2 - b^2)); point f1, f2; if(abs(a - b) < epsgeo) { f1 = C; f2 = C; } else { f1 = point(R, (locate(C) + rotate(angle) * (-c, 0))/R); f2 = point(R, (locate(C) + rotate(angle) * (c, 0))/R); } oe.init(f1, f2, a); } else { if(finite(b) || !finite(a)) oe.init(C, C + R.polar(1, angle), infinity); else oe.init(C, C + R.polar(1, 90 + angle), infinity); } return oe; } /**/ ellipse ellipse(bqe bqe) {/*Return the ellipse a[0] * x^2 + a[1] * xy + a[2] * y^2 + a[3] * x + a[4] * y + a[5] = 0 given in the coordinate system of 'bqe' with a[i] = bque.a[i]. .*/ bqe lbqe = changecoordsys(defaultcoordsys, bqe); real a = lbqe.a[0], b = lbqe.a[1]/2, c = lbqe.a[2], d = lbqe.a[3]/2, f = lbqe.a[4]/2, g = lbqe.a[5]; coordsys R = bqe.coordsys; string message = "ellipse: the given equation is not an equation of an ellipse."; real u = b^2 * g + d^2 * c + f^2 * a; real delta = a * c * g + b * f * d + d * b * f - u; if(abs(delta) < epsgeo) abort(message); real j = b^2 - a * c; real i = a + c; real dd = j * (sgnd(c - a) * sqrt((a - c)^2 + 4 * (b^2)) - c-a); real ddd = j * (-sgnd(c - a) * sqrt((a - c)^2 + 4 * (b^2)) - c-a); if(abs(ddd) < epsgeo || abs(dd) < epsgeo || j >= -epsgeo || delta/sgnd(i) > 0) abort(message); real x = (c * d - b * f)/j, y = (a * f - b * d)/j; // real dir = abs(b) < epsgeo ? 0 : pi/2-0.5 * acot(0.5 * (c-a)/b); real dir = abs(b) < epsgeo ? 0 : 0.5 * acot(0.5 * (c - a)/b); if(dir * (c - a) * b < 0) dir = dir < 0 ? dir + pi/2 : dir - pi/2; real cd = cos(dir), sd = sin(dir); real t = a * cd^2 - 2 * b * cd * sd + c * sd^2; real tt = a * sd^2 + 2 * b * cd * sd + c * cd^2; real gg = -g + ((d * cd - f * sd)^2)/t + ((d * sd + f * cd)^2)/tt; t = t/gg; tt = tt/gg; // The equation of the ellipse is t * (x - center.x)^2 + tt * (y - center.y)^2 = 1; real aa, bb; aa = sqrt(2 * (u - 2 * b * d * f - a * c * g)/dd); bb = sqrt(2 * (u - 2 * b * d * f - a * c * g)/ddd); a = t > tt ? max(aa, bb) : min(aa, bb); b = t > tt ? min(aa, bb) : max(aa, bb); return ellipse(point(R, (x, y)/R), a, b, degrees(pi/2 - dir - angle(R.i))); } /**/ ellipse ellipse(point M1, point M2, point M3, point M4, point M5) {/*Return the ellipse passing through the five points (if possible)*/ return ellipse(bqe(M1, M2, M3, M4, M5)); } /**/ bool inside(ellipse el, point M) {/*Return 'true' iff 'M' is inside 'el'.*/ return abs(el.F1 - M) + abs(el.F2 - M) - 2 * el.a < -epsgeo; } /**/ bool inside(parabola p, point M) {/*Return 'true' if 'M' is inside 'p'.*/ return distance(p.D, M) - abs(p.F - M) > epsgeo; } /**/ parabola parabola(point F, line l) {/*Return the parabola whose focus is 'F' and directrix is 'l'.*/ parabola op; op.init(F, l); return op; } /**/ parabola parabola(point F, point vertex) {/*Return the parabola whose focus is 'F' and vertex is 'vertex'.*/ parabola op; point[] P = standardizecoordsys(F, vertex); point A = rotate(180, P[1]) * P[0]; point B = A + rotateO(90) * unit(P[1]-A); op.init(P[0], line(A, B)); return op; } /**/ parabola parabola(point F, real a, real angle) {/*Return the parabola whose focus is F, latus rectum is 4a and the angle of the axis of symmetry (in the coordinate system of F) is 'angle'.*/ parabola op; coordsys R = F.coordsys; point A = F - point(R, R.polar(2a, radians(angle))); point B = A + point(R, R.polar(1, radians(90 + angle))); op.init(F, line(A, B)); return op; } /**/ bool isparabola(bqe bqe) {/*Return true iff 'bqe' is the equation of a parabola.*/ bqe lbqe = changecoordsys(defaultcoordsys, bqe); real a = lbqe.a[0], b = lbqe.a[1]/2, c = lbqe.a[2], d = lbqe.a[3]/2, f = lbqe.a[4]/2, g = lbqe.a[5]; real delta = a * c * g + b * f * d + d * b * f - (b^2 * g + d^2 * c + f^2 * a); return (abs(delta) > epsgeo && abs(b^2 - a * c) < epsgeo); } /**/ parabola parabola(bqe bqe) {/*Return the parabola a[0]x^2 + a[1]xy + a[2]y^2 + a[3]x + a[4]y + a[5]] = 0 (a[n] means bqe.a[n]). */ bqe lbqe = changecoordsys(defaultcoordsys, bqe); real a = lbqe.a[0], b = lbqe.a[1]/2, c = lbqe.a[2], d = lbqe.a[3]/2, f = lbqe.a[4]/2, g = lbqe.a[5]; string message = "parabola: the given equation is not an equation of a parabola."; real delta = a * c * g + b * f * d + d * b * f - (b^2 * g + d^2 * c + f^2 * a); if(abs(delta) < 10 * epsgeo || abs(b^2 - a * c) > 10 * epsgeo) abort(message); real dir = abs(b) < epsgeo ? 0 : 0.5 * acot(0.5 * (c - a)/b); if(dir * (c - a) * b < 0) dir = dir < 0 ? dir + pi/2 : dir - pi/2; real cd = cos(dir), sd = sin(dir); real ap = a * cd^2 - 2 * b * cd * sd + c * sd^2; real cp = a * sd^2 + 2 * b * cd * sd + c * cd^2; real dp = d * cd - f * sd; real fp = d * sd + f * cd; real gp = g; parabola op; coordsys R = bqe.coordsys; // The equation of the parabola is ap * x'^2 + cp * y'^2 + 2dp * x'+2fp * y'+gp = 0 if (abs(ap) < epsgeo) {/* directrix parallel to the rotated(dir) y-axis equation: (y-vertex.y)^2 = 4 * a * (x-vertex) */ pair pvertex = rotate(degrees(-dir)) * (0.5(-gp + fp^2/cp)/dp, -fp/cp); real a = -0.5 * dp/cp; point vertex = point(R, pvertex/R); point focus = point(R, (pvertex + a * expi(-dir))/R); op = parabola(focus, vertex); } else {/* directrix parallel to the rotated(dir) x-axis equation: (x-vertex)^2 = 4 * a * (y-vertex.y) */ pair pvertex = rotate(degrees(-dir)) * (-dp/ap, 0.5 * (-gp + dp^2/ap)/fp); real a = -0.5 * fp/ap; point vertex = point(R, pvertex/R); point focus = point(R, (pvertex + a * expi(pi/2 - dir))/R); op = parabola(focus, vertex); } return op; } /**/ parabola parabola(point M1, point M2, point M3, line l) {/*Return the parabola passing through the three points with its directix parallel to the line 'l'.*/ coordsys R; pair[] pts; if (samecoordsys(M1, M2, M3)) { R = M1.coordsys; } else { R = defaultcoordsys; } real gle = degrees(l); coordsys Rp = cartesiansystem(R.O, rotate(gle) * R.i, rotate(gle) * R.j); pts = new pair[] {coordinates(changecoordsys(Rp, M1)), coordinates(changecoordsys(Rp, M2)), coordinates(changecoordsys(Rp, M3))}; real[][] M; real[] x; for (int i = 0; i < 3; ++i) { M[i] = new real[] {pts[i].x, pts[i].y, 1}; x[i] = -pts[i].x^2; } real[] coef = solve(M, x); return parabola(changecoordsys(R, bqe(Rp, 1, 0, 0, coef[0], coef[1], coef[2]))); } /**/ parabola parabola(point M1, point M2, point M3, point M4, point M5) {/*Return the parabola passing through the five points.*/ return parabola(bqe(M1, M2, M3, M4, M5)); } /**/ hyperbola hyperbola(point C, real a, real b, real angle = 0) {/*Return the hyperbola centered at 'C' with semimajor axis 'a' along C--C + dir(angle), semiminor axis 'b' along the perpendicular.*/ hyperbola oh; coordsys R = C.coordsys; angle += degrees(R.i); real c = sqrt(a^2 + b^2); point f1 = point(R, (locate(C) + rotate(angle) * (-c, 0))/R); point f2 = point(R, (locate(C) + rotate(angle) * (c, 0))/R); oh.init(f1, f2, a); return oh; } /**/ hyperbola hyperbola(bqe bqe) {/*Return the hyperbola a[0]x^2 + a[1]xy + a[2]y^2 + a[3]x + a[4]y + a[5]] = 0 (a[n] means bqe.a[n]). */ bqe lbqe = changecoordsys(defaultcoordsys, bqe); real a = lbqe.a[0], b = lbqe.a[1]/2, c = lbqe.a[2], d = lbqe.a[3]/2, f = lbqe.a[4]/2, g = lbqe.a[5]; string message = "hyperbola: the given equation is not an equation of a hyperbola."; real delta = a * c * g + b * f * d + d * b * f - (b^2 * g + d^2 * c + f^2 * a); if(abs(delta) < 10 * epsgeo || abs(b^2 - a * c) < 0) abort(message); real dir = abs(b) < epsgeo ? 0 : 0.5 * acot(0.5 * (c - a)/b); real cd = cos(dir), sd = sin(dir); real ap = a * cd^2 - 2 * b * cd * sd + c * sd^2; real cp = a * sd^2 + 2 * b * cd * sd + c * cd^2; real dp = d * cd - f * sd; real fp = d * sd + f * cd; real gp = -g + dp^2/ap + fp^2/cp; hyperbola op; coordsys R = bqe.coordsys; real j = b^2 - a * c; point C = point(R, ((c * d - b * f)/j, (a * f - b * d)/j)/R); real aa = gp/ap, bb = gp/cp; real a = sqrt(abs(aa)), b = sqrt(abs(bb)); if(aa < 0) {dir -= pi/2; aa = a; a = b; b = aa;} return hyperbola(C, a, b, degrees(-dir - angle(R.i))); } /**/ hyperbola hyperbola(point M1, point M2, point M3, point M4, point M5) {/*Return the hyperbola passing through the five points (if possible).*/ return hyperbola(bqe(M1, M2, M3, M4, M5)); } /**/ hyperbola conj(hyperbola h) {/*Conjugate.*/ return hyperbola(h.C, h.b, h.a, 90 + h.angle); } /**/ circle circle(explicit point C, real r) {/*Circle given by center and radius.*/ circle oc = new circle; oc.C = C; oc.r = r; if(!finite(r)) oc.l = line(C, C + vector(C.coordsys, (1, 0))); return oc; } /**/ circle circle(point A, point B) {/*Return the circle of diameter AB.*/ real r; circle oc; real a = abs(A), b = abs(B); if(finite(a) && finite(b)) { oc = circle((A + B)/2, abs(A - B)/2); } else { oc.r = infinity; if(finite(abs(A))) oc.l = line(A, A + unit(B)); else { if(finite(abs(B))) oc.l = line(B, B + unit(A)); else if(finite(abs(A - B)/2)) oc = circle((A + B)/2, abs(A - B)/2); else oc.l = line(A, B); } } return oc; } /**/ circle circle(segment s) {/*Return the circle of diameter 's'.*/ return circle(s.A, s.B); } /**/ point circumcenter(point A, point B, point C) {/*Return the circumcenter of triangle ABC.*/ point[] P = standardizecoordsys(A, B, C); coordsys R = P[0].coordsys; pair a = A, b = B, c = C; pair mAB = (a + b)/2; pair mAC = (a + c)/2; pair pp = extension(mAB, rotate(90, mAB) * a, mAC, rotate(90, mAC) * c); return point(R, pp/R); } /**/ circle circle(point A, point B, point C) {/*Return the circumcircle of the triangle ABC.*/ if(collinear(A - B, A - C)) { circle oc; oc.r = infinity; oc.C = (A + B + C)/3; oc.l = line(oc.C, oc.C == A ? B : A); return oc; } point c = circumcenter(A, B, C); return circle(c, abs(c - A)); } /**/ circle circumcircle(point A, point B, point C) {/*Return the circumcircle of the triangle ABC.*/ return circle(A, B, C); } /**/ circle operator *(real x, explicit circle c) {/*Multiply the radius of 'c'.*/ return finite(c.r) ? circle(c.C, x * c.r) : c; } circle operator *(int x, explicit circle c) { return finite(c.r) ? circle(c.C, x * c.r) : c; } /**/ circle operator /(explicit circle c, real x) {/*Divide the radius of 'c'*/ return finite(c.r) ? circle(c.C, c.r/x) : c; } circle operator /(explicit circle c, int x) { return finite(c.r) ? circle(c.C, c.r/x) : c; } /**/ circle operator +(explicit circle c, explicit point M) {/*Translation of 'c'.*/ return circle(c.C + M, c.r); } /**/ circle operator -(explicit circle c, explicit point M) {/*Translation of 'c'.*/ return circle(c.C - M, c.r); } /**/ circle operator +(explicit circle c, pair m) {/*Translation of 'c'. 'm' represent coordinates in the coordinate system where 'c' is defined.*/ return circle(c.C + m, c.r); } /**/ circle operator -(explicit circle c, pair m) {/*Translation of 'c'. 'm' represent coordinates in the coordinate system where 'c' is defined.*/ return circle(c.C - m, c.r); } /**/ circle operator +(explicit circle c, vector m) {/*Translation of 'c'.*/ return circle(c.C + m, c.r); } /**/ circle operator -(explicit circle c, vector m) {/*Translation of 'c'.*/ return circle(c.C - m, c.r); } /**/ real operator ^(point M, explicit circle c) {/*The power of 'M' with respect to the circle 'c'*/ return xpart((abs(locate(M) - locate(c.C)), c.r)^2); } /**/ bool operator @(point M, explicit circle c) {/*Return true iff 'M' is on the circle 'c'.*/ return finite(c.r) ? abs(abs(locate(M) - locate(c.C)) - abs(c.r)) <= 10 * epsgeo : M @ c.l; } /**/ ellipse operator cast(circle c) {/**/ return finite(c.r) ? ellipse(c.C, c.r, c.r, 0) : ellipse(c.l.A, c.l.B, infinity); } /**/ circle operator cast(ellipse el) {/**/ circle oc; bool infb = (!finite(el.a) || !finite(el.b)); if(!infb && abs(el.a - el.b) > epsgeo) abort("Can not cast ellipse with different axis values to circle"); oc = circle(el.C, infb ? infinity : el.a); oc.l = el.l.copy(); return oc; } /**/ ellipse operator cast(conic co) {/*Cast a conic to an ellipse (can be a circle).*/ if(degenerate(co) && co.e < 1) return ellipse(co.l[0].A, co.l[0].B, infinity); ellipse oe; if(co.e < 1) { real a = co.p/(1 - co.e^2); real c = co.e * a; vector v = co.D.v; if(!sameside(co.D.A + v, co.F, co.D)) v = -v; point f2 = co.F + 2 * c * v; f2 = changecoordsys(co.F.coordsys, f2); oe = a == 0 ? ellipse(co.F, co.p, co.p, 0) : ellipse(co.F, f2, a); } else abort("casting: The conic section is not an ellipse."); return oe; } /**/ parabola operator cast(conic co) {/*Cast a conic to a parabola.*/ parabola op; if(abs(co.e - 1) > epsgeo) abort("casting: The conic section is not a parabola."); op.init(co.F, co.D); return op; } /**/ conic operator cast(parabola p) {/*Cast a parabola to a conic section.*/ return conic(p.F, p.D, 1); } /**/ hyperbola operator cast(conic co) {/*Cast a conic section to an hyperbola.*/ hyperbola oh; if(co.e > 1) { real a = co.p/(co.e^2 - 1); real c = co.e * a; vector v = co.D.v; if(sameside(co.D.A + v, co.F, co.D)) v = -v; point f2 = co.F + 2 * c * v; f2 = changecoordsys(co.F.coordsys, f2); oh = hyperbola(co.F, f2, a); } else abort("casting: The conic section is not an hyperbola."); return oh; } /**/ conic operator cast(hyperbola h) {/*Hyperbola to conic section.*/ return conic(h.F1, h.D1, h.e); } /**/ conic operator cast(ellipse el) {/*Ellipse to conic section.*/ conic oc; if(abs(el.c) > epsgeo) { real x = el.a^2/el.c; point O = (el.F1 + el.F2)/2; point A = O + x * unit(el.F1 - el.F2); oc = conic(el.F1, perpendicular(A, line(el.F1, el.F2)), el.e); } else {//The ellipse is a circle coordsys R = coordsys(el); point M = el.F1 + point(R, R.polar(el.a, 0)); line l = line(rotate(90, M) * el.F1, M); oc = conic(el.F1, l, 0); } if(degenerate(el)) { oc.p = infinity; oc.h = infinity; oc.l = new line[]{el.l}; } return oc; } /**/ conic operator cast(circle c) {/*Circle to conic section.*/ return (conic)((ellipse)c); } /**/ circle operator cast(conic c) {/*Conic section to circle.*/ ellipse el = (ellipse)c; circle oc; if(abs(el.a - el.b) < epsgeo) { oc = circle(el.C, el.a); if(degenerate(c)) oc.l = c.l[0]; } else abort("Can not cast this conic to a circle"); return oc; } /**/ ellipse operator *(transform t, ellipse el) {/*Provide transform * ellipse.*/ if(!degenerate(el)) { point[] ep; for (int i = 0; i < 360; i += 72) { ep.push(t * angpoint(el, i)); } ellipse oe = ellipse(ep[0], ep[1], ep[2], ep[3], ep[4]); if(angpoint(oe, 0) != ep[0]) return ellipse(oe.F2, oe.F1, oe.a); return oe; } return ellipse(t * el.l.A, t * el.l.B, infinity); } /**/ parabola operator *(transform t, parabola p) {/*Provide transform * parabola.*/ point[] P; P.push(t * angpoint(p, 45)); P.push(t * angpoint(p, -45)); P.push(t * angpoint(p, 180)); parabola op = parabola(P[0], P[1], P[2], t * p.D); op.bmin = p.bmin; op.bmax = p.bmax; return op; } /**/ ellipse operator *(transform t, circle c) {/*Provide transform * circle. For example, 'circle C = scale(2) * circle' and 'ellipse E = xscale(2) * circle' are valid but 'circle C = xscale(2) * circle' is invalid.*/ return t * ((ellipse)c); } /**/ hyperbola operator *(transform t, hyperbola h) {/*Provide transform * hyperbola.*/ if (t == identity()) { return h; } point[] ep; for (int i = 90; i <= 270; i += 45) { ep.push(t * angpoint(h, i)); } hyperbola oe = hyperbola(ep[0], ep[1], ep[2], ep[3], ep[4]); if(angpoint(oe, 90) != ep[0]) { oe = hyperbola(oe.F2, oe.F1, oe.a); } oe.bmin = h.bmin; oe.bmax = h.bmax; return oe; } /**/ conic operator *(transform t, conic co) {/*Provide transform * conic.*/ if(co.e < 1) return (t * ((ellipse)co)); if(co.e == 1) return (t * ((parabola)co)); return (t * ((hyperbola)co)); } /**/ ellipse operator *(real x, ellipse el) {/*Identical but more efficient (rapid) than 'scale(x, el.C) * el'.*/ return degenerate(el) ? el : ellipse(el.C, x * el.a, x * el.b, el.angle); } /**/ ellipse operator /(ellipse el, real x) {/*Identical but more efficient (rapid) than 'scale(1/x, el.C) * el'.*/ return degenerate(el) ? el : ellipse(el.C, el.a/x, el.b/x, el.angle); } /**/ path arcfromcenter(ellipse el, real angle1, real angle2, bool direction=CCW, int n=ellipsenodesnumber(el.a,el.b,angle1,angle2,direction)) {/*Return the path of the ellipse 'el' from angle1 to angle2 in degrees, drawing in the given direction, with n nodes. The angles are mesured relatively to the axis (C,x-axis) where C is the center of the ellipse.*/ if(degenerate(el)) abort("arcfromcenter: can not convert degenerated ellipse to path."); if (angle1 > angle2) return reverse(arcfromcenter(el, angle2, angle1, !direction, n)); guide op; coordsys Rp=coordsys(el); if (n < 1) return op; interpolate join = operator ..; real stretch = max(el.a/el.b, el.b/el.a); if (stretch > 10) { n *= floor(stretch/5); join = operator --; } real a1 = direction ? radians(angle1) : radians(angle2); real a2 = direction ? radians(angle2) : radians(angle1) + 2 * pi; real step=(a2 - a1)/(n != 1 ? n-1 : 1); real a, r; real da = radians(el.angle); for (int i=0; i < n; ++i) { a = a1 + i * step; r = el.b/sqrt(1 - (el.e * cos(a))^2); op = join(op, Rp*Rp.polar(r, da + a)); } return shift(el.C.x*Rp.i + el.C.y*Rp.j) * (direction ? op : reverse(op)); } /**/ path arcfromcenter(hyperbola h, real angle1, real angle2, int n = hyperbolanodesnumber(h, angle1, angle2), bool direction = CCW) {/*Return the path of the hyperbola 'h' from angle1 to angle2 in degrees, drawing in the given direction, with n nodes. The angles are mesured relatively to the axis (C, x-axis) where C is the center of the hyperbola.*/ guide op; coordsys Rp = coordsys(h); if (n < 1) return op; if (angle1 > angle2) { path g = reverse(arcfromcenter(h, angle2, angle1, n, !direction)); return g == nullpath ? g : reverse(g); } real a1 = direction ? radians(angle1) : radians(angle2); real a2 = direction ? radians(angle2) : radians(angle1) + 2 * pi; real step = (a2 - a1)/(n != 1 ? n - 1 : 1); real a, r; typedef guide interpolate(... guide[]); interpolate join = operator ..; real da = radians(h.angle); for (int i = 0; i < n; ++i) { a = a1 + i * step; r = (h.b * cos(a))^2 - (h.a * sin(a))^2; if(r > epsgeo) { r = sqrt(h.a^2 * h.b^2/r); op = join(op, Rp * Rp.polar(r, a + da)); join = operator ..; } else join = operator --; } return shift(h.C.x * Rp.i + h.C.y * Rp.j)* (direction ? op : op == nullpath ? op : reverse(op)); } /**/ path arcfromcenter(explicit conic co, real angle1, real angle2, int n, bool direction = CCW) {/*Use arcfromcenter(ellipse, ...) or arcfromcenter(hyperbola, ...) depending of the eccentricity of 'co'.*/ path g; if(co.e < 1) g = arcfromcenter((ellipse)co, angle1, angle2, direction, n); else if(co.e > 1) g = arcfromcenter((hyperbola)co, angle1, angle2, n, direction); else abort("arcfromcenter: does not exist for a parabola."); return g; } /**/ restricted polarconicroutine fromCenter = arcfromcenter;/**/ /**/ restricted polarconicroutine fromFocus = arcfromfocus;/**/ /**/ bqe equation(ellipse el) {/*Return the coefficients of the equation of the ellipse in its coordinate system: bqe.a[0] * x^2 + bqe.a[1] * x * y + bqe.a[2] * y^2 + bqe.a[3] * x + bqe.a[4] * y + bqe.a[5] = 0. One can change the coordinate system of 'bqe' using the routine 'changecoordsys'.*/ pair[] pts; for (int i = 0; i < 360; i += 72) pts.push(locate(angpoint(el, i))); real[][] M; real[] x; for (int i = 0; i < 5; ++i) { M[i] = new real[] {pts[i].x * pts[i].y, pts[i].y^2, pts[i].x, pts[i].y, 1}; x[i] = -pts[i].x^2; } real[] coef = solve(M, x); bqe bqe = changecoordsys(coordsys(el), bqe(defaultcoordsys, 1, coef[0], coef[1], coef[2], coef[3], coef[4])); bqe.a = approximate(bqe.a); return bqe; } /**/ bqe equation(parabola p) {/*Return the coefficients of the equation of the parabola in its coordinate system. bqe.a[0] * x^2 + bqe.a[1] * x * y + bqe.a[2] * y^2 + bqe.a[3] * x + bqe.a[4] * y + bqe.a[5] = 0 One can change the coordinate system of 'bqe' using the routine 'changecoordsys'.*/ coordsys R = canonicalcartesiansystem(p); parabola tp = changecoordsys(R, p); point A = projection(tp.D) * point(R, (0, 0)); real a = abs(A); return changecoordsys(coordsys(p), bqe(R, 0, 0, 1, -4 * a, 0, 0)); } /**/ bqe equation(hyperbola h) {/*Return the coefficients of the equation of the hyperbola in its coordinate system. bqe.a[0] * x^2 + bqe.a[1] * x * y + bqe.a[2] * y^2 + bqe.a[3] * x + bqe.a[4] * y + bqe.a[5] = 0 One can change the coordinate system of 'bqe' using the routine 'changecoordsys'.*/ coordsys R = canonicalcartesiansystem(h); return changecoordsys(coordsys(h), bqe(R, 1/h.a^2, 0, -1/h.b^2, 0, 0, -1)); } /**/ path operator cast(ellipse el) {/*Cast ellipse to path.*/ if(degenerate(el)) abort("Casting degenerated ellipse to path is not possible."); int n = el.e == 0 ? circlenodesnumber(el.a) : ellipsenodesnumber(el.a, el.b); return arcfromcenter(el, 0.0, 360, CCW, n)&cycle; } /**/ path operator cast(circle c) {/*Cast circle to path.*/ return (path)((ellipse)c); } /**/ real[] bangles(picture pic = currentpicture, parabola p) {/*Return the array {ma, Ma} where 'ma' and 'Ma' are respectively the smaller and the larger angles for which the parabola 'p' is included in the bounding box of the picture 'pic'.*/ pair bmin, bmax; pair[] b; if (p.bmin == p.bmax) { bmin = pic.userMin(); bmax = pic.userMax(); } else { bmin = p.bmin;bmax = p.bmax; } if(bmin.x == bmax.x || bmin.y == bmax.y || !finite(abs(bmin)) || !finite(abs(bmax))) return new real[] {0, 0}; b[0] = bmin; b[1] = (bmax.x, bmin.y); b[2] = bmax; b[3] = (bmin.x, bmax.y); real[] eq = changecoordsys(defaultcoordsys, equation(p)).a; pair[] inter; for (int i = 0; i < 4; ++i) { pair[] tmp = intersectionpoints(b[i], b[(i + 1)%4], eq); for (int j = 0; j < tmp.length; ++j) { if(dot(b[i]-tmp[j], b[(i + 1)%4]-tmp[j]) <= epsgeo) inter.push(tmp[j]); } } pair F = p.F, V = p.V; real d = degrees(F - V); real[] a = sequence(new real(int n){ return (360 - d + degrees(inter[n]-F))%360; }, inter.length); real ma = a.length != 0 ? min(a) : 0, Ma= a.length != 0 ? max(a) : 0; return new real[] {ma, Ma}; } /**/ real[][] bangles(picture pic = currentpicture, hyperbola h) {/*Return the array {{ma1, Ma1}, {ma2, Ma2}} where 'maX' and 'MaX' are respectively the smaller and the bigger angles (from h.FX) for which the hyperbola 'h' is included in the bounding box of the picture 'pic'.*/ pair bmin, bmax; pair[] b; if (h.bmin == h.bmax) { bmin = pic.userMin(); bmax = pic.userMax(); } else { bmin = h.bmin;bmax = h.bmax; } if(bmin.x == bmax.x || bmin.y == bmax.y || !finite(abs(bmin)) || !finite(abs(bmax))) return new real[][] {{0, 0}, {0, 0}}; b[0] = bmin; b[1] = (bmax.x, bmin.y); b[2] = bmax; b[3] = (bmin.x, bmax.y); real[] eq = changecoordsys(defaultcoordsys, equation(h)).a; pair[] inter0, inter1; pair C = locate(h.C); pair F1 = h.F1; for (int i = 0; i < 4; ++i) { pair[] tmp = intersectionpoints(b[i], b[(i + 1)%4], eq); for (int j = 0; j < tmp.length; ++j) { if(dot(b[i]-tmp[j], b[(i + 1)%4]-tmp[j]) <= epsgeo) { if(dot(F1 - C, tmp[j]-C) > 0) inter0.push(tmp[j]); else inter1.push(tmp[j]); } } } real d = degrees(F1 - C); real[] ma, Ma; pair[][] inter = new pair[][] {inter0, inter1}; for (int i = 0; i < 2; ++i) { real[] a = sequence(new real(int n){ return (360 - d + degrees(inter[i][n]-F1))%360; }, inter[i].length); ma[i] = a.length != 0 ? min(a) : 0; Ma[i] = a.length != 0 ? max(a) : 0; } return new real[][] {{ma[0], Ma[0]}, {ma[1], Ma[1]}}; } /**/ path operator cast(parabola p) {/*Cast parabola to path. If possible, the returned path is restricted to the actual bounding box of the current picture if the variables 'p.bmin' and 'p.bmax' are not set else the bounding box of box(p.bmin, p.bmax) is used instead.*/ real[] bangles = bangles(p); int n = parabolanodesnumber(p, bangles[0], bangles[1]); return arcfromfocus(p, bangles[0], bangles[1], n, CCW); } /**/ void draw(picture pic = currentpicture, Label L = "", circle c, align align = NoAlign, pen p = currentpen, arrowbar arrow = None, arrowbar bar = None, margin margin = NoMargin, Label legend = "", marker marker = nomarker) {/**/ if(degenerate(c)) draw(pic, L, c.l, align, p, arrow, legend, marker); else draw(pic, L, (path)c, align, p, arrow, bar, margin, legend, marker); } /**/ void draw(picture pic = currentpicture, Label L = "", ellipse el, align align = NoAlign, pen p = currentpen, arrowbar arrow = None, arrowbar bar = None, margin margin = NoMargin, Label legend = "", marker marker = nomarker) {/*Draw the ellipse 'el' if it is not degenerated else draw 'el.l'.*/ if(degenerate(el)) draw(pic, L, el.l, align, p, arrow, legend, marker); else draw(pic, L, (path)el, align, p, arrow, bar, margin, legend, marker); } /**/ void draw(picture pic = currentpicture, Label L = "", parabola parabola, align align = NoAlign, pen p = currentpen, arrowbar arrow = None, arrowbar bar = None, margin margin = NoMargin, Label legend = "", marker marker = nomarker) {/*Draw the parabola 'p' on 'pic' without (if possible) altering the size of picture pic.*/ pic.add(new void (frame f, transform t, transform T, pair m, pair M) { // Reduce the bounds by the size of the pen and the margins. m -= min(p); M -= max(p); parabola.bmin = inverse(t) * m; parabola.bmax = inverse(t) * M; picture tmp; path pp = t * ((path) (T * parabola)); if (pp != nullpath) { draw(tmp, L, pp, align, p, arrow, bar, NoMargin, legend, marker); add(f, tmp.fit()); } }, true); pair m = pic.userMin(), M = pic.userMax(); if(m != M) { pic.addBox(truepoint(SW), truepoint(NE)); } } /**/ path operator cast(hyperbola h) {/*Cast hyperbola to path. If possible, the returned path is restricted to the actual bounding box of the current picture unless the variables 'h.bmin' and 'h.bmax' are set; in this case the bounding box of box(h.bmin, h.bmax) is used instead. Only the branch on the side of 'h.F1' is considered.*/ real[][] bangles = bangles(h); int n = hyperbolanodesnumber(h, bangles[0][0], bangles[0][1]); return arcfromfocus(h, bangles[0][0], bangles[0][1], n, CCW); } /**/ void draw(picture pic = currentpicture, Label L = "", hyperbola h, align align = NoAlign, pen p = currentpen, arrowbar arrow = None, arrowbar bar = None, margin margin = NoMargin, Label legend = "", marker marker = nomarker) {/*Draw the hyperbola 'h' on 'pic' without (if possible) altering the size of the picture pic.*/ pic.add(new void (frame f, transform t, transform T, pair m, pair M) { // Reduce the bounds by the size of the pen and the margins. m -= min(p); M -= max(p); h.bmin = inverse(t) * m; h.bmax = inverse(t) * M; path hp; picture tmp; hp = t * ((path) (T * h)); if (hp != nullpath) { draw(tmp, L, hp, align, p, arrow, bar, NoMargin, legend, marker); } hyperbola ht = hyperbola(h.F2, h.F1, h.a); ht.bmin = h.bmin; ht.bmax = h.bmax; hp = t * ((path) (T * ht)); if (hp != nullpath) { draw(tmp, "", hp, align, p, arrow, bar, NoMargin, marker); } add(f, tmp.fit()); }, true); pair m = pic.userMin(), M = pic.userMax(); if(m != M) pic.addBox(truepoint(SW), truepoint(NE)); } /**/ void draw(picture pic = currentpicture, Label L = "", explicit conic co, align align = NoAlign, pen p = currentpen, arrowbar arrow = None, arrowbar bar = None, margin margin = NoMargin, Label legend = "", marker marker = nomarker) {/*Use one of the routine 'draw(ellipse, ...)', 'draw(parabola, ...)' or 'draw(hyperbola, ...)' depending of the value of eccentricity of 'co'.*/ if(co.e == 0) draw(pic, L, (circle)co, align, p, arrow, bar, margin, legend, marker); else if(co.e < 1) draw(pic, L, (ellipse)co, align, p, arrow, bar, margin, legend, marker); else if(co.e == 1) draw(pic, L, (parabola)co, align, p, arrow, bar, margin, legend, marker); else if(co.e > 1) draw(pic, L, (hyperbola)co, align, p, arrow, bar, margin, legend, marker); else abort("draw: unknown conic."); } /**/ int conicnodesnumber(conic co, real angle1, real angle2, bool dir = CCW) {/*Return the number of node to draw a conic arc.*/ int oi; if(co.e == 0) { circle c = (circle)co; oi = circlenodesnumber(c.r, angle1, angle2); } else if(co.e < 1) { ellipse el = (ellipse)co; oi = ellipsenodesnumber(el.a, el.b, angle1, angle2, dir); } else if(co.e == 1) { parabola p = (parabola)co; oi = parabolanodesnumber(p, angle1, angle2); } else { hyperbola h = (hyperbola)co; oi = hyperbolanodesnumber(h, angle1, angle2); } return oi; } /**/ path operator cast(conic co) {/*Cast conic section to path.*/ if(co.e < 1) return (path)((ellipse)co); if(co.e == 1) return (path)((parabola)co); return (path)((hyperbola)co); } /**/ bqe equation(explicit conic co) {/*Return the coefficients of the equation of conic section in its coordinate system: bqe.a[0] * x^2 + bqe.a[1] * x * y + bqe.a[2] * y^2 + bqe.a[3] * x + bqe.a[4] * y + bqe.a[5] = 0. One can change the coordinate system of 'bqe' using the routine 'changecoordsys'.*/ bqe obqe; if(co.e == 0) obqe = equation((circle)co); else if(co.e < 1) obqe = equation((ellipse)co); else if(co.e == 1) obqe = equation((parabola)co); else if(co.e > 1) obqe = equation((hyperbola)co); else abort("draw: unknown conic."); return obqe; } /**/ string conictype(bqe bqe) {/*Returned values are "ellipse" or "parabola" or "hyperbola" depending of the conic section represented by 'bqe'.*/ bqe lbqe = changecoordsys(defaultcoordsys, bqe); string os = "degenerated"; real a = lbqe.a[0], b = lbqe.a[1]/2, c = lbqe.a[2], d = lbqe.a[3]/2, f = lbqe.a[4]/2, g = lbqe.a[5]; real delta = a * c * g + b * f * d + d * b * f - (b^2 * g + d^2 * c + f^2 * a); if(abs(delta) < 10 * epsgeo) return os; real J = a * c - b^2; real I = a + c; if(J > epsgeo) { if(delta/I < -epsgeo); os = "ellipse"; } else { if(abs(J) < epsgeo) os = "parabola"; else os = "hyperbola"; } return os; } /**/ conic conic(point M1, point M2, point M3, point M4, point M5) {/*Return the conic passing through 'M1', 'M2', 'M3', 'M4' and 'M5' if the conic is not degenerated.*/ bqe bqe = bqe(M1, M2, M3, M4, M5); string ct = conictype(bqe); if(ct == "degenerated") abort("conic: degenerated conic passing through five points."); if(ct == "ellipse") return ellipse(bqe); if(ct == "parabola") return parabola(bqe); return hyperbola(bqe); } /**/ coordsys canonicalcartesiansystem(explicit conic co) {/*Return the canonical cartesian system of the conic 'co'.*/ if(co.e < 1) return canonicalcartesiansystem((ellipse)co); else if(co.e == 1) return canonicalcartesiansystem((parabola)co); return canonicalcartesiansystem((hyperbola)co); } /**/ bqe canonical(bqe bqe) {/*Return the bivariate quadratic equation relative to the canonical coordinate system of the conic section represented by 'bqe'.*/ string type = conictype(bqe); if(type == "") abort("canonical: the equation can not be performed."); bqe obqe; if(type == "ellipse") { ellipse el = ellipse(bqe); obqe = changecoordsys(canonicalcartesiansystem(el), equation(el)); } else { if(type == "parabola") { parabola p = parabola(bqe); obqe = changecoordsys(canonicalcartesiansystem(p), equation(p)); } else { hyperbola h = hyperbola(bqe); obqe = changecoordsys(canonicalcartesiansystem(h), equation(h)); } } return obqe; } /**/ conic conic(bqe bqe) {/*Return the conic section represented by the bivariate quartic equation 'bqe'.*/ string type = conictype(bqe); if(type == "") abort("canonical: the equation can not be performed."); conic oc; if(type == "ellipse") { oc = ellipse(bqe); } else { if(type == "parabola") oc = parabola(bqe); else oc = hyperbola(bqe); } return oc; } /**/ real arclength(circle c) {/**/ return c.r * 2 * pi; } /**/ real focusToCenter(ellipse el, real a) {/*Return the angle relatively to the center of 'el' for the angle 'a' given relatively to the focus of 'el'.*/ pair p = point(fromFocus(el, a, a, 1, CCW), 0); pair c = locate(el.C); real d = degrees(p - c) - el.angle; d = abs(d) < epsgeo ? 0 : d; // Avoid -1e-15 return d%(sgnd(a) * 360); } /**/ real centerToFocus(ellipse el, real a) {/*Return the angle relatively to the focus of 'el' for the angle 'a' given relatively to the center of 'el'.*/ pair P = point(fromCenter(el, a, a, 1, CCW), 0); pair F1 = locate(el.F1); pair F2 = locate(el.F2); real d = degrees(P - F1) - degrees(F2 - F1); d = abs(d) < epsgeo ? 0 : d; // Avoid -1e-15 return d%(sgnd(a) * 360); } /**/ real arclength(ellipse el) {/**/ return degenerate(el) ? infinity : 4 * el.a * elle(pi/2, el.e); } /**/ real arclength(ellipse el, real angle1, real angle2, bool direction = CCW, polarconicroutine polarconicroutine = currentpolarconicroutine) {/*Return the length of the arc of the ellipse between 'angle1' and 'angle2'. 'angle1' and 'angle2' must be in the interval ]-360;+oo[ if polarconicroutine = fromFocus, ]-oo;+oo[ if polarconicroutine = fromCenter.*/ if(degenerate(el)) return infinity; if(angle1 > angle2) return arclength(el, angle2, angle1, !direction, polarconicroutine); // path g;int n = 1000; // if(el.e == 0) g = arcfromcenter(el, angle1, angle2, n, direction); // if(el.e != 1) g = polarconicroutine(el, angle1, angle2, n, direction); // write("with path = ", arclength(g)); if(polarconicroutine == fromFocus) { // dot(point(fromFocus(el, angle1, angle1, 1, CCW), 0), 2mm + blue); // dot(point(fromFocus(el, angle2, angle2, 1, CCW), 0), 2mm + blue); // write("fromfocus1 = ", angle1); // write("fromfocus2 = ", angle2); real gle1 = focusToCenter(el, angle1); real gle2 = focusToCenter(el, angle2); if((gle1 - gle2) * (angle1 - angle2) > 0) { angle1 = gle1; angle2 = gle2; } else { angle1 = gle2; angle2 = gle1; } // dot(point(fromCenter(el, angle1, angle1, 1, CCW), 0), 1mm + red); // dot(point(fromCenter(el, angle2, angle2, 1, CCW), 0), 1mm + red); // write("fromcenter1 = ", angle1); // write("fromcenter2 = ", angle2); } if(angle1 < 0 || angle2 < 0) return arclength(el, 180 + angle1, 180 + angle2, direction, fromCenter); real a1 = direction ? angle1 : angle2; real a2 = direction ? angle2 : angle1 + 360; real elleq = el.a * elle(pi/2, el.e); real S(real a) {//Return the arclength from 0 to the angle 'a' (in degrees) // given form the center of the ellipse. real gle = atan(el.a * tan(radians(a))/el.b)+ pi * (((a%90 == 0 && a != 0) ? floor(a/90) - 1 : floor(a/90)) - ((a%180 == 0) ? 0 : floor(a/180)) - (a%360 == 0 ? floor(a/(360)) : 0)); /* // Uncomment to visualize the used branches unitsize(2cm, 1cm); import graph; real xmin = 0, xmax = 3pi; xlimits( xmin, xmax); ylimits( 0, 10); yaxis( "y" , LeftRight(), RightTicks(pTick=.8red, ptick = lightgrey, extend = true)); xaxis( "x - value", BottomTop(), Ticks(Label("$%.2f$", red), Step = pi/2, step = pi/4, pTick=.8red, ptick = lightgrey, extend = true)); real p2 = pi/2; real f(real t) { return atan(0.6 * tan(t))+ pi * ((t%p2 == 0 && t != 0) ? floor(t/p2) - 1 : floor(t/p2)) - ((t%pi == 0) ? 0 : pi * floor(t/pi)) - (t%(2pi) == 0 ? pi * floor(t/(2 * pi)) : 0); } draw(graph(f, xmin, xmax, 100)); write(degrees(f(pi/2))); write(degrees(f(pi))); write(degrees(f(3pi/2))); write(degrees(f(2pi))); draw(graph(new real(real t){return t;}, xmin, xmax, 3)); */ return elleq - el.a * elle(pi/2 - gle, el.e); } return S(a2) - S(a1); } /**/ real arclength(parabola p, real angle) {/*Return the arclength from 180 to 'angle' given from focus in the canonical coordinate system of 'p'.*/ real a = p.a; /* In canonicalcartesiansystem(p) the equation of p is x = y^2/(4a) */ // integrate(sqrt(1 + (x/(2 * a))^2), x); real S(real t){return 0.5 * t * sqrt(1 + t^2/(4 * a^2)) + a * asinh(t/(2 * a));} real R(real gle){return 2 * a/(1 - Cos(gle));} real t = Sin(angle) * R(angle); return S(t); } /**/ real arclength(parabola p, real angle1, real angle2) {/*Return the arclength from 'angle1' to 'angle2' given from focus in the canonical coordinate system of 'p'*/ return arclength(p, angle1) - arclength(p, angle2); } /**/ real arclength(parabola p) {/*Return the length of the arc of the parabola bounded to the bounding box of the current picture.*/ real[] b = bangles(p); return arclength(p, b[0], b[1]); } // *........................CONICS.........................* // *=======================================================* // *=======================================================* // *.......................ABSCISSA........................* /**/ struct abscissa {/*Provide abscissa structure on a curve used in the routine-like 'point(object, abscissa)' where object can be 'line','segment','ellipse','circle','conic'...*/ real x;/*The abscissa value.*/ int system;/*0 = relativesystem; 1 = curvilinearsystem; 2 = angularsystem; 3 = nodesystem*/ polarconicroutine polarconicroutine = fromCenter;/*The routine used with angular system and two foci conic section. Possible values are 'formCenter' and 'formFocus'.*/ /**/ abscissa copy() {/*Return a copy of this abscissa.*/ abscissa oa = new abscissa; oa.x = this.x; oa.system = this.system; oa.polarconicroutine = this.polarconicroutine; return oa; } }/**/ /**/ restricted int relativesystem = 0, curvilinearsystem = 1, angularsystem = 2, nodesystem = 3;/*Constant used to set the abscissa system.*/ /**/ abscissa operator cast(explicit position position) {/*Cast position to abscissa. If 'position' is relative, the abscissa is relative else it's a curvilinear abscissa.*/ abscissa oarcc; oarcc.x = position.position.x; oarcc.system = position.relative ? relativesystem : curvilinearsystem; return oarcc; } /**/ abscissa operator +(real x, explicit abscissa a) {/*Provide 'real + abscissa'. Return abscissa b so that b.x = a.x + x. +(explicit abscissa, real), -(real, explicit abscissa) and -(explicit abscissa, real) are also defined.*/ abscissa oa = a.copy(); oa.x = a.x + x; return oa; } abscissa operator +(explicit abscissa a, real x) { return x + a; } abscissa operator +(int x, explicit abscissa a) { return ((real)x) + a; } /**/ abscissa operator -(explicit abscissa a) {/*Return the abscissa b so that b.x = -a.x.*/ abscissa oa; oa.system = a.system; oa.x = -a.x; return oa; } abscissa operator -(real x, explicit abscissa a) { abscissa oa; oa.system = a.system; oa.x = x - a.x; return oa; } abscissa operator -(explicit abscissa a, real x) { abscissa oa; oa.system = a.system; oa.x = a.x - x; return oa; } abscissa operator -(int x, explicit abscissa a) { return ((real)x) - a; } /**/ abscissa operator *(real x, explicit abscissa a) {/*Provide 'real * abscissa'. Return abscissa b so that b.x = x * a.x. *(explicit abscissa, real), /(real, explicit abscissa) and /(explicit abscissa, real) are also defined.*/ abscissa oa; oa.system = a.system; oa.x = a.x * x; return oa; } abscissa operator *(explicit abscissa a, real x) { return x * a; } abscissa operator /(real x, explicit abscissa a) { abscissa oa; oa.system = a.system; oa.x = x/a.x; return oa; } abscissa operator /(explicit abscissa a, real x) { abscissa oa; oa.system = a.system; oa.x = a.x/x; return oa; } abscissa operator /(int x, explicit abscissa a) { return ((real)x)/a; } /**/ abscissa relabscissa(real x) {/*Return a relative abscissa.*/ return (abscissa)(Relative(x)); } abscissa relabscissa(int x) { return (abscissa)(Relative(x)); } /**/ abscissa curabscissa(real x) {/*Return a curvilinear abscissa.*/ return (abscissa)((position)x); } abscissa curabscissa(int x) { return (abscissa)((position)x); } /**/ abscissa angabscissa(real x, polarconicroutine polarconicroutine = currentpolarconicroutine) {/*Return a angular abscissa.*/ abscissa oarcc; oarcc.x = x; oarcc.polarconicroutine = polarconicroutine; oarcc.system = angularsystem; return oarcc; } abscissa angabscissa(int x, polarconicroutine polarconicroutine = currentpolarconicroutine) { return angabscissa((real)x, polarconicroutine); } /**/ abscissa nodabscissa(real x) {/*Return an abscissa as time on the path.*/ abscissa oarcc; oarcc.x = x; oarcc.system = nodesystem; return oarcc; } abscissa nodabscissa(int x) { return nodabscissa((real)x); } /**/ abscissa operator cast(real x) {/*Cast real to abscissa, precisely 'nodabscissa'.*/ return nodabscissa(x); } abscissa operator cast(int x) { return nodabscissa((real)x); } /**/ point point(circle c, abscissa l) {/*Return the point of 'c' which has the abscissa 'l.x' according to the abscissa system 'l.system'.*/ coordsys R = c.C.coordsys; if (l.system == nodesystem) return point(R, point((path)c, l.x)/R); if (l.system == relativesystem) return c.C + point(R, R.polar(c.r, 2 * pi * l.x)); if (l.system == curvilinearsystem) return c.C + point(R, R.polar(c.r, l.x/c.r)); if (l.system == angularsystem) return c.C + point(R, R.polar(c.r, radians(l.x))); abort("point: bad abscissa system."); return (0, 0); } /**/ point point(ellipse el, abscissa l) {/*Return the point of 'el' which has the abscissa 'l.x' according to the abscissa system 'l.system'.*/ if(el.e == 0) return point((circle)el, l); coordsys R = coordsys(el); if (l.system == nodesystem) return point(R, point((path)el, l.x)/R); if (l.system == relativesystem) { return point(el, curabscissa((l.x%1) * arclength(el))); } if (l.system == curvilinearsystem) { real a1 = 0, a2 = 360, cx = 0; real aout = a1; real x = abs(l.x)%arclength(el); while (abs(cx - x) > epsgeo) { aout = (a1 + a2)/2; cx = arclength(el, 0, aout, CCW, fromCenter); //fromCenter is speeder if(cx > x) a2 = (a1 + a2)/2; else a1 = (a1 + a2)/2; } path pel = fromCenter(el, sgn(l.x) * aout, sgn(l.x) * aout, 1, CCW); return point(R, point(pel, 0)/R); } if (l.system == angularsystem) { return point(R, point(l.polarconicroutine(el, l.x, l.x, 1, CCW), 0)/R); } abort("point: bad abscissa system."); return (0, 0); } /**/ point point(parabola p, abscissa l) {/*Return the point of 'p' which has the abscissa 'l.x' according to the abscissa system 'l.system'.*/ coordsys R = coordsys(p); if (l.system == nodesystem) return point(R, point((path)p, l.x)/R); if (l.system == relativesystem) { real[] b = bangles(p); real al = sgn(l.x) > 0 ? arclength(p, 180, b[1]) : arclength(p, 180, b[0]); return point(p, curabscissa(abs(l.x) * al)); } if (l.system == curvilinearsystem) { real a1 = 1e-3, a2 = 360 - 1e-3, cx = infinity; while (abs(cx - l.x) > epsgeo) { cx = arclength(p, 180, (a1 + a2)/2); if(cx > l.x) a2 = (a1 + a2)/2; else a1 = (a1 + a2)/2; } path pp = fromFocus(p, a1, a1, 1, CCW); return point(R, point(pp, 0)/R); } if (l.system == angularsystem) { return point(R, point(fromFocus(p, l.x, l.x, 1, CCW), 0)/R); } abort("point: bad abscissa system."); return (0, 0); } /**/ point point(hyperbola h, abscissa l) {/*Return the point of 'h' which has the abscissa 'l.x' according to the abscissa system 'l.system'.*/ coordsys R = coordsys(h); if (l.system == nodesystem) return point(R, point((path)h, l.x)/R); if (l.system == relativesystem) { abort("point(hyperbola, relativeSystem) is not implemented... Try relpoint((path)your_hyperbola, x);"); } if (l.system == curvilinearsystem) { abort("point(hyperbola, curvilinearSystem) is not implemented..."); } if (l.system == angularsystem) { return point(R, point(l.polarconicroutine(h, l.x, l.x, 1, CCW), 0)/R); } abort("point: bad abscissa system."); return (0, 0); } /**/ point point(explicit conic co, abscissa l) {/*Return the curvilinear abscissa of 'M' on the conic 'co'.*/ if(co.e == 0) return point((circle)co, l); if(co.e < 1) return point((ellipse)co, l); if(co.e == 1) return point((parabola)co, l); return point((hyperbola)co, l); } /**/ point point(line l, abscissa x) {/*Return the point of 'l' which has the abscissa 'l.x' according to the abscissa system 'l.system'. Note that the origin is l.A, and point(l, relabscissa(x)) returns l.A + x.x * vector(l.B - l.A).*/ coordsys R = l.A.coordsys; if (x.system == nodesystem) return l.A + (x.x < 0 ? 0 : x.x > 1 ? 1 : x.x) * vector(l.B - l.A); if (x.system == relativesystem) return l.A + x.x * vector(l.B - l.A); if (x.system == curvilinearsystem) return l.A + x.x * l.u; if (x.system == angularsystem) abort("point: what the meaning of angular abscissa on line ?."); abort("point: bad abscissa system."); return (0, 0); } /**/ point point(line l, explicit real x) {/*Return the point between node l.A and l.B (x <= 0 means l.A, x >=1 means l.B).*/ return point(l, nodabscissa(x)); } point point(line l, explicit int x) { return point(l, nodabscissa(x)); } /**/ point point(explicit circle c, explicit real x) {/*Return the point between node floor(x) and floor(x) + 1.*/ return point(c, nodabscissa(x)); } point point(explicit circle c, explicit int x) { return point(c, nodabscissa(x)); } /**/ point point(explicit ellipse el, explicit real x) {/*Return the point between node floor(x) and floor(x) + 1.*/ return point(el, nodabscissa(x)); } point point(explicit ellipse el, explicit int x) { return point(el, nodabscissa(x)); } /**/ point point(explicit parabola p, explicit real x) {/*Return the point between node floor(x) and floor(x) + 1.*/ return point(p, nodabscissa(x)); } point point(explicit parabola p, explicit int x) { return point(p, nodabscissa(x)); } /**/ point point(explicit hyperbola h, explicit real x) {/*Return the point between node floor(x) and floor(x) + 1.*/ return point(h, nodabscissa(x)); } point point(explicit hyperbola h, explicit int x) { return point(h, nodabscissa(x)); } /**/ point point(explicit conic co, explicit real x) {/*Return the point between node floor(x) and floor(x) + 1.*/ point op; if(co.e == 0) op = point((circle)co, nodabscissa(x)); else if(co.e < 1) op = point((ellipse)co, nodabscissa(x)); else if(co.e == 1) op = point((parabola)co, nodabscissa(x)); else op = point((hyperbola)co, nodabscissa(x)); return op; } point point(explicit conic co, explicit int x) { return point(co, (real)x); } /**/ point relpoint(line l, real x) {/*Return the relative point of 'l' (0 means l.A, 1 means l.B, x means l.A + x * vector(l.B - l.A) ).*/ return point(l, Relative(x)); } /**/ point relpoint(explicit circle c, real x) {/*Return the relative point of 'c' (0 means origin, 1 means end). Origin is c.center + c.r * (1, 0).*/ return point(c, Relative(x)); } /**/ point relpoint(explicit ellipse el, real x) {/*Return the relative point of 'el' (0 means origin, 1 means end).*/ return point(el, Relative(x)); } /**/ point relpoint(explicit parabola p, real x) {/*Return the relative point of the path of the parabola bounded by the bounding box of the current picture. 0 means origin, 1 means end, where the origin is the vertex of 'p'.*/ return point(p, Relative(x)); } /**/ point relpoint(explicit hyperbola h, real x) {/*Not yet implemented... */ return point(h, Relative(x)); } /**/ point relpoint(explicit conic co, explicit real x) {/*Return the relative point of 'co' (0 means origin, 1 means end).*/ point op; if(co.e == 0) op = point((circle)co, Relative(x)); else if(co.e < 1) op = point((ellipse)co, Relative(x)); else if(co.e == 1) op = point((parabola)co, Relative(x)); else op = point((hyperbola)co, Relative(x)); return op; } point relpoint(explicit conic co, explicit int x) { return relpoint(co, (real)x); } /**/ point angpoint(explicit circle c, real x) {/*Return the point of 'c' in the direction 'x' measured in degrees.*/ return point(c, angabscissa(x)); } /**/ point angpoint(explicit ellipse el, real x, polarconicroutine polarconicroutine = currentpolarconicroutine) {/*Return the point of 'el' in the direction 'x' measured in degrees according to 'polarconicroutine'.*/ return el.e == 0 ? angpoint((circle) el, x) : point(el, angabscissa(x, polarconicroutine)); } /**/ point angpoint(explicit parabola p, real x) {/*Return the point of 'p' in the direction 'x' measured in degrees.*/ return point(p, angabscissa(x)); } /**/ point angpoint(explicit hyperbola h, real x, polarconicroutine polarconicroutine = currentpolarconicroutine) {/*Return the point of 'h' in the direction 'x' measured in degrees according to 'polarconicroutine'.*/ return point(h, angabscissa(x, polarconicroutine)); } /**/ point curpoint(line l, real x) {/*Return the point of 'l' which has the curvilinear abscissa 'x'. Origin is l.A.*/ return point(l, curabscissa(x)); } /**/ point curpoint(explicit circle c, real x) {/*Return the point of 'c' which has the curvilinear abscissa 'x'. Origin is c.center + c.r * (1, 0).*/ return point(c, curabscissa(x)); } /**/ point curpoint(explicit ellipse el, real x) {/*Return the point of 'el' which has the curvilinear abscissa 'el'.*/ return point(el, curabscissa(x)); } /**/ point curpoint(explicit parabola p, real x) {/*Return the point of 'p' which has the curvilinear abscissa 'x'. Origin is the vertex of 'p'.*/ return point(p, curabscissa(x)); } /**/ point curpoint(conic co, real x) {/*Return the point of 'co' which has the curvilinear abscissa 'x'.*/ point op; if(co.e == 0) op = point((circle)co, curabscissa(x)); else if(co.e < 1) op = point((ellipse)co, curabscissa(x)); else if(co.e == 1) op = point((parabola)co, curabscissa(x)); else op = point((hyperbola)co, curabscissa(x)); return op; } /**/ abscissa angabscissa(circle c, point M) {/*Return the angular abscissa of 'M' on the circle 'c'.*/ if(!(M @ c)) abort("angabscissa: the point is not on the circle."); abscissa oa; oa.system = angularsystem; oa.x = degrees(M - c.C); if(oa.x < 0) oa.x+=360; return oa; } /**/ abscissa angabscissa(ellipse el, point M, polarconicroutine polarconicroutine = currentpolarconicroutine) {/*Return the angular abscissa of 'M' on the ellipse 'el' according to 'polarconicroutine'.*/ if(!(M @ el)) abort("angabscissa: the point is not on the ellipse."); abscissa oa; oa.system = angularsystem; oa.polarconicroutine = polarconicroutine; oa.x = polarconicroutine == fromCenter ? degrees(M - el.C) : degrees(M - el.F1); oa.x -= el.angle; if(oa.x < 0) oa.x += 360; return oa; } /**/ abscissa angabscissa(hyperbola h, point M, polarconicroutine polarconicroutine = currentpolarconicroutine) {/*Return the angular abscissa of 'M' on the hyperbola 'h' according to 'polarconicroutine'.*/ if(!(M @ h)) abort("angabscissa: the point is not on the hyperbola."); abscissa oa; oa.system = angularsystem; oa.polarconicroutine = polarconicroutine; oa.x = polarconicroutine == fromCenter ? degrees(M - h.C) : degrees(M - h.F1) + 180; oa.x -= h.angle; if(oa.x < 0) oa.x += 360; return oa; } /**/ abscissa angabscissa(parabola p, point M) {/*Return the angular abscissa of 'M' on the parabola 'p'.*/ if(!(M @ p)) abort("angabscissa: the point is not on the parabola."); abscissa oa; oa.system = angularsystem; oa.polarconicroutine = fromFocus;// Not used oa.x = degrees(M - p.F); oa.x -= p.angle; if(oa.x < 0) oa.x += 360; return oa; } /**/ abscissa angabscissa(explicit conic co, point M) {/*Return the angular abscissa of 'M' on the conic 'co'.*/ if(co.e == 0) return angabscissa((circle)co, M); if(co.e < 1) return angabscissa((ellipse)co, M); if(co.e == 1) return angabscissa((parabola)co, M); return angabscissa((hyperbola)co, M); } /**/ abscissa curabscissa(line l, point M) {/*Return the curvilinear abscissa of 'M' on the line 'l'.*/ if(!(M @ extend(l))) abort("curabscissa: the point is not on the line."); abscissa oa; oa.system = curvilinearsystem; oa.x = sgn(dot(M - l.A, l.B - l.A)) * abs(M - l.A); return oa; } /**/ abscissa curabscissa(circle c, point M) {/*Return the curvilinear abscissa of 'M' on the circle 'c'.*/ if(!(M @ c)) abort("curabscissa: the point is not on the circle."); abscissa oa; oa.system = curvilinearsystem; oa.x = pi * angabscissa(c, M).x * c.r/180; return oa; } /**/ abscissa curabscissa(ellipse el, point M) {/*Return the curvilinear abscissa of 'M' on the ellipse 'el'.*/ if(!(M @ el)) abort("curabscissa: the point is not on the ellipse."); abscissa oa; oa.system = curvilinearsystem; real a = angabscissa(el, M, fromCenter).x; oa.x = arclength(el, 0, a, fromCenter); oa.polarconicroutine = fromCenter; return oa; } /**/ abscissa curabscissa(parabola p, point M) {/*Return the curvilinear abscissa of 'M' on the parabola 'p'.*/ if(!(M @ p)) abort("curabscissa: the point is not on the parabola."); abscissa oa; oa.system = curvilinearsystem; real a = angabscissa(p, M).x; oa.x = arclength(p, 180, a); oa.polarconicroutine = fromFocus; // Not used. return oa; } /**/ abscissa curabscissa(conic co, point M) {/*Return the curvilinear abscissa of 'M' on the conic 'co'.*/ if(co.e > 1) abort("curabscissa: not implemented for this hyperbola."); if(co.e == 0) return curabscissa((circle)co, M); if(co.e < 1) return curabscissa((ellipse)co, M); return curabscissa((parabola)co, M); } /**/ abscissa nodabscissa(line l, point M) {/*Return the node abscissa of 'M' on the line 'l'.*/ if(!(M @ (segment)l)) abort("nodabscissa: the point is not on the segment."); abscissa oa; oa.system = nodesystem; oa.x = abs(M - l.A)/abs(l.A - l.B); return oa; } /**/ abscissa nodabscissa(circle c, point M) {/*Return the node abscissa of 'M' on the circle 'c'.*/ if(!(M @ c)) abort("nodabscissa: the point is not on the circle."); abscissa oa; oa.system = nodesystem; oa.x = intersect((path)c, locate(M))[0]; return oa; } /**/ abscissa nodabscissa(ellipse el, point M) {/*Return the node abscissa of 'M' on the ellipse 'el'.*/ if(!(M @ el)) abort("nodabscissa: the point is not on the ellipse."); abscissa oa; oa.system = nodesystem; oa.x = intersect((path)el, M)[0]; return oa; } /**/ abscissa nodabscissa(parabola p, point M) {/*Return the node abscissa OF 'M' on the parabola 'p'.*/ if(!(M @ p)) abort("nodabscissa: the point is not on the parabola."); abscissa oa; oa.system = nodesystem; path pg = p; real[] t = intersect(pg, M, 1e-5); if(t.length == 0) abort("nodabscissa: the point is not on the path of the parabola."); oa.x = t[0]; return oa; } /**/ abscissa nodabscissa(conic co, point M) {/*Return the node abscissa of 'M' on the conic 'co'.*/ if(co.e > 1) abort("nodabscissa: not implemented for hyperbola."); if(co.e == 0) return nodabscissa((circle)co, M); if(co.e < 1) return nodabscissa((ellipse)co, M); return nodabscissa((parabola)co, M); } /**/ abscissa relabscissa(line l, point M) {/*Return the relative abscissa of 'M' on the line 'l'.*/ if(!(M @ extend(l))) abort("relabscissa: the point is not on the line."); abscissa oa; oa.system = relativesystem; oa.x = sgn(dot(M - l.A, l.B - l.A)) * abs(M - l.A)/abs(l.A - l.B); return oa; } /**/ abscissa relabscissa(circle c, point M) {/*Return the relative abscissa of 'M' on the circle 'c'.*/ if(!(M @ c)) abort("relabscissa: the point is not on the circle."); abscissa oa; oa.system = relativesystem; oa.x = angabscissa(c, M).x/360; return oa; } /**/ abscissa relabscissa(ellipse el, point M) {/*Return the relative abscissa of 'M' on the ellipse 'el'.*/ if(!(M @ el)) abort("relabscissa: the point is not on the ellipse."); abscissa oa; oa.system = relativesystem; oa.x = curabscissa(el, M).x/arclength(el); oa.polarconicroutine = fromFocus; return oa; } /**/ abscissa relabscissa(conic co, point M) {/*Return the relative abscissa of 'M' on the conic 'co'.*/ if(co.e > 1) abort("relabscissa: not implemented for hyperbola and parabola."); if(co.e == 1) return relabscissa((parabola)co, M); if(co.e == 0) return relabscissa((circle)co, M); return relabscissa((ellipse)co, M); } // *.......................ABSCISSA........................* // *=======================================================* // *=======================================================* // *.........................ARCS..........................* /**/ struct arc { /*Implement oriented ellipse (included circle) arcs. All the calculus with this structure will be as exact as Asymptote can do. For a full precision, you must not cast 'arc' to 'path' excepted for drawing routines. */ ellipse el;/*The support of the arc.*/ restricted real angle0 = 0;/*Internal use: rotating a circle does not modify the origin point,this variable stocks the eventual angle rotation. This value is not used for ellipses which are not circles.*/ restricted real angle1, angle2;/*Values (in degrees) in ]-360, 360[.*/ bool direction = CCW;/*The arc will be drawn from 'angle1' to 'angle2' rotating in the direction 'direction'.*/ polarconicroutine polarconicroutine = currentpolarconicroutine;/*The routine to which the angles refer. If 'el' is a circle 'fromCenter' is always used.*/ /**/ void setangles(real a0, real a1, real a2) {/*Set the angles.*/ if (a1 < 0 && a2 < 0) { a1 += 360; a2 += 360; } this.angle0 = a0%(sgnd(a0) * 360); this.angle1 = a1%(sgnd(a1) * 360); this.angle2 = a2%(sgnd(2) * 360); } /**/ void init(ellipse el, real angle0 = 0, real angle1, real angle2, polarconicroutine polarconicroutine, bool direction = CCW) {/*Constructor.*/ if(abs(angle1 - angle2) > 360) abort("arc: |angle1 - angle2| > 360."); this.el = el; this.setangles(angle0, angle1, angle2); this.polarconicroutine = polarconicroutine; this.direction = direction; } /**/ arc copy() {/*Copy the arc.*/ arc oa = new arc; oa.el = this.el; oa.direction = this.direction; oa.polarconicroutine = this.polarconicroutine; oa.angle1 = this.angle1; oa.angle2 = this.angle2; oa.angle0 = this.angle0; return oa; } }/**/ /**/ polarconicroutine polarconicroutine(conic co) {/*Return the default routine used to draw a conic.*/ if(co.e == 0) return fromCenter; if(co.e == 1) return fromFocus; return currentpolarconicroutine; } /**/ arc arc(ellipse el, real angle1, real angle2, polarconicroutine polarconicroutine = polarconicroutine(el), bool direction = CCW) {/*Return the ellipse arc from 'angle1' to 'angle2' with respect to 'polarconicroutine' and rotating in the direction 'direction'.*/ arc oa; oa.init(el, 0, angle1, angle2, polarconicroutine, direction); return oa; } /**/ arc complementary(arc a) {/*Return the complementary of 'a'.*/ arc oa; oa.init(a.el, a.angle0, a.angle2, a.angle1, a.polarconicroutine, a.direction); return oa; } /**/ arc reverse(arc a) {/*Return arc 'a' oriented in reverse direction.*/ arc oa; oa.init(a.el, a.angle0, a.angle2, a.angle1, a.polarconicroutine, !a.direction); return oa; } /**/ real degrees(arc a) {/*Return the measure in degrees of the oriented arc 'a'.*/ real or; real da = a.angle2 - a.angle1; if(a.direction) { or = a.angle1 < a.angle2 ? da : 360 + da; } else { or = a.angle1 < a.angle2 ? -360 + da : da; } return or; } /**/ real angle(arc a) {/*Return the measure in radians of the oriented arc 'a'.*/ return radians(degrees(a)); } /**/ int arcnodesnumber(explicit arc a) {/*Return the number of nodes to draw the arc 'a'.*/ return ellipsenodesnumber(a.el.a, a.el.b, a.angle1, a.angle2, a.direction); } private path arctopath(arc a, int n) { if(a.el.e == 0) return arcfromcenter(a.el, a.angle0 + a.angle1, a.angle0 + a.angle2, a.direction, n); if(a.el.e != 1) return a.polarconicroutine(a.el, a.angle1, a.angle2, n, a.direction); return arcfromfocus(a.el, a.angle1, a.angle2, n, a.direction); } /**/ point angpoint(arc a, real angle) {/*Return the point given by its angular position (in degrees) relative to the arc 'a'. If 'angle > degrees(a)' or 'angle < 0' the returned point is on the extended arc.*/ pair p; if(a.el.e == 0) { real gle = a.angle0 + a.angle1 + (a.direction ? angle : -angle); p = point(arcfromcenter(a.el, gle, gle, CCW, 1), 0); } else { real gle = a.angle1 + (a.direction ? angle : -angle); p = point(a.polarconicroutine(a.el, gle, gle, 1, CCW), 0); } return point(coordsys(a.el), p/coordsys(a.el)); } /**/ path operator cast(explicit arc a) {/*Cast arc to path.*/ return arctopath(a, arcnodesnumber(a)); } /**/ guide operator cast(explicit arc a) {/*Cast arc to guide.*/ return arctopath(a, arcnodesnumber(a)); } /**/ arc operator *(transform t, explicit arc a) {/*Provide transform * arc.*/ pair[] P, PP; path g = arctopath(a, 3); real a0, a1 = a.angle1, a2 = a.angle2, ap1, ap2; bool dir = a.direction; P[0] = t * point(g, 0); P[1] = t * point(g, 2); ellipse el = t * a.el; arc oa; a0 = (a.angle0 + angle(shiftless(t)))%360; pair C; if(a.polarconicroutine == fromCenter) C = el.C; else C = el.F1; real d = abs(locate(el.F2 - el.F1)) > epsgeo ? degrees(locate(el.F2 - el.F1)) : a0 + degrees(el.C.coordsys.i); ap1 = (degrees(P[0]-C, false) - d)%360; ap2 = (degrees(P[1]-C, false) - d)%360; oa.init(el, a0, ap1, ap2, a.polarconicroutine, dir); g = arctopath(oa, 3); PP[0] = point(g, 0); PP[1] = point(g, 2); if((a1 - a2) * (ap1 - ap2) < 0) {// Handle reflection. dir=!a.direction; oa.init(el, a0, ap1, ap2, a.polarconicroutine, dir); } return oa; } /**/ arc operator *(real x, explicit arc a) {/*Provide real * arc. Return the arc subtracting and adding '(x - 1) * degrees(a)/2' to 'a.angle1' and 'a.angle2' respectively.*/ real a1, a2, gle; gle = (x - 1) * degrees(a)/2; a1 = a.angle1 - gle; a2 = a.angle2 + gle; arc oa; oa.init(a.el, a.angle0, a1, a2, a.polarconicroutine, a.direction); return oa; } arc operator *(int x, explicit arc a){return (real)x * a;} /**/ arc operator /(explicit arc a, real x) {/*Provide arc/real. Return the arc subtracting and adding '(1/x - 1) * degrees(a)/2' to 'a.angle1' and 'a.angle2' respectively.*/ return (1/x) * a; } /**/ arc operator +(explicit arc a, point M) {/*Provide arc + point. Return shifted arc. 'operator +(explicit arc, point)', 'operator +(explicit arc, vector)' and 'operator -(explicit arc, vector)' are also defined.*/ return shift(M) * a; } arc operator -(explicit arc a, point M){return a + (-M);} arc operator +(explicit arc a, vector v){return shift(locate(v)) * a;} arc operator -(explicit arc a, vector v){return a + (-v);} /**/ bool operator @(point M, arc a) {/*Return true iff 'M' is on the arc 'a'.*/ if (!(M @ a.el)) return false; coordsys R = defaultcoordsys; path ap = arctopath(a, 3); line l = line(point(R, point(ap, 0)), point(R, point(ap, 2))); return sameside(M, point(R, point(ap, 1)), l); } /**/ void draw(picture pic = currentpicture, Label L = "", arc a, align align = NoAlign, pen p = currentpen, arrowbar arrow = None, arrowbar bar = None, margin margin = NoMargin, Label legend = "", marker marker = nomarker) {/*Draw 'arc' adding the pen returned by 'addpenarc(p)' to the pen 'p'. */ draw(pic, L, (path)a, align, addpenarc(p), arrow, bar, margin, legend, marker); } /**/ real arclength(arc a) {/*The arc length of 'a'.*/ return arclength(a.el, a.angle1, a.angle2, a.direction, a.polarconicroutine); } private point ppoint(arc a, real x) {// Return the point of the arc proportionally to its length. point oP; if(a.el.e == 0) { // Case of circle. oP = angpoint(a, x * abs(degrees(a))); } else { // Ellipse and not circle. if(!a.direction) { transform t = reflect(line(a.el.F1, a.el.F2)); return t * ppoint(t * a, x); } real angle1 = a.angle1, angle2 = a.angle2; if(a.polarconicroutine == fromFocus) { // dot(point(fromFocus(a.el, angle1, angle1, 1, CCW), 0), 2mm + blue); // dot(point(fromFocus(a.el, angle2, angle2, 1, CCW), 0), 2mm + blue); // write("fromfocus1 = ", angle1); // write("fromfocus2 = ", angle2); real gle1 = focusToCenter(a.el, angle1); real gle2 = focusToCenter(a.el, angle2); if((gle1 - gle2) * (angle1 - angle2) > 0) { angle1 = gle1; angle2 = gle2; } else { angle1 = gle2; angle2 = gle1; } // write("fromcenter1 = ", angle1); // write("fromcenter2 = ", angle2); // dot(point(fromCenter(a.el, angle1, angle1, 1, CCW), 0), 1mm + red); // dot(point(fromCenter(a.el, angle2, angle2, 1, CCW), 0), 1mm + red); } if(angle1 > angle2) { arc ta = a.copy(); ta.polarconicroutine = fromCenter; ta.setangles(a0 = a.angle0, a1 = angle1 - 360, a2 = angle2); return ppoint(ta, x); } ellipse co = a.el; real gle, a1, a2, cx = 0; bool direction; if(x >= 0) { a1 = angle1; a2 = a1 + 360; direction = CCW; } else { a1 = angle1 - 360; a2 = a1 - 360; direction = CW; } gle = a1; real L = arclength(co, angle1, angle2, a.direction, fromCenter); real tx = L * abs(x)%arclength(co); real aout = a1; while(abs(cx - tx) > epsgeo) { aout = (a1 + a2)/2; cx = abs(arclength(co, gle, aout, direction, fromCenter)); if(cx > tx) a2 = (a1 + a2)/2 ; else a1 = (a1 + a2)/2; } pair p = point(arcfromcenter(co, aout, aout, CCW, 1), 0); oP = point(coordsys(co), p/coordsys(co)); } return oP; } /**/ point point(arc a, abscissa l) {/*Return the point of 'a' which has the abscissa 'l.x' according to the abscissa system 'l.system'. Note that 'a.polarconicroutine' is used instead of 'l.polarconicroutine'. */ real posx; arc ta = a.copy(); ellipse co = a.el; if (l.system == relativesystem) { posx = l.x; } else if (l.system == curvilinearsystem) { real tl; if(co.e == 0) { tl = curabscissa(a.el, angpoint(a.el, a.angle0 + a.angle1)).x; return curpoint(a.el, tl + (a.direction ? l.x : -l.x)); } else { tl = curabscissa(a.el, angpoint(a.el, a.angle1, a.polarconicroutine)).x; return curpoint(a.el, tl + (a.direction ? l.x : -l.x)); } } else if (l.system == nodesystem) { coordsys R = coordsys(co); return point(R, point((path)a, l.x)/R); } else if (l.system == angularsystem) { return angpoint(a, l.x); } else abort("point: bad abscissa system."); return ppoint(ta, posx); } /**/ point point(arc a, real x) {/*Return the point between node floor(t) and floor(t) + 1.*/ return point(a, nodabscissa(x)); } pair point(explicit arc a, int x) { return point(a, nodabscissa(x)); } /**/ point relpoint(arc a, real x) {/*Return the relative point of 'a'. If x > 1 or x < 0, the returned point is on the extended arc.*/ return point(a, relabscissa(x)); } /**/ point curpoint(arc a, real x) {/*Return the point of 'a' which has the curvilinear abscissa 'x'. If x < 0 or x > arclength(a), the returned point is on the extended arc.*/ return point(a, curabscissa(x)); } /**/ abscissa angabscissa(arc a, point M) {/*Return the angular abscissa of 'M' according to the arc 'a'.*/ if(!(M @ a.el)) abort("angabscissa: the point is not on the extended arc."); abscissa oa; oa.system = angularsystem; oa.polarconicroutine = a.polarconicroutine; real am = angabscissa(a.el, M, a.polarconicroutine).x; oa.x = (am - a.angle1 - (a.el.e == 0 ? a.angle0 : 0))%360; oa.x = a.direction ? oa.x : 360 - oa.x; return oa; } /**/ abscissa curabscissa(arc a, point M) {/*Return the curvilinear abscissa according to the arc 'a'.*/ ellipse el = a.el; if(!(M @ el)) abort("angabscissa: the point is not on the extended arc."); abscissa oa; oa.system = curvilinearsystem; real xm = curabscissa(el, M).x; real a0 = el.e == 0 ? a.angle0 : 0; real am = curabscissa(el, angpoint(el, a.angle1 + a0, a.polarconicroutine)).x; real l = arclength(el); oa.x = (xm - am)%l; oa.x = a.direction ? oa.x : l - oa.x; return oa; } /**/ abscissa nodabscissa(arc a, point M) {/*Return the node abscissa according to the arc 'a'.*/ if(!(M @ a)) abort("nodabscissa: the point is not on the arc."); abscissa oa; oa.system = nodesystem; oa.x = intersect((path)a, M)[0]; return oa; } /**/ abscissa relabscissa(arc a, point M) {/*Return the relative abscissa according to the arc 'a'.*/ ellipse el = a.el; if(!( M @ el)) abort("relabscissa: the point is not on the prolonged arc."); abscissa oa; oa.system = relativesystem; oa.x = curabscissa(a, M).x/arclength(a); return oa; } /**/ void markarc(picture pic = currentpicture, Label L = "", int n = 1, real radius = 0, real space = 0, arc a, pen sectorpen = currentpen, pen markpen = sectorpen, margin margin = NoMargin, arrowbar arrow = None, marker marker = nomarker) {/**/ real Da = degrees(a); pair p1 = point(a, 0); pair p2 = relpoint(a, 1); pair c = a.polarconicroutine == fromCenter ? locate(a.el.C) : locate(a.el.F1); if(radius == 0) radius = markangleradius(markpen); if(abs(Da) > 180) radius = -radius; radius = (a.direction ? 1 : -1) * sgnd(Da) * radius; draw(c--p1^^c--p2, sectorpen); markangle(pic = pic, L = L, n = n, radius = radius, space = space, A = p1, O = c, B = p2, arrow = arrow, p = markpen, margin = margin, marker = marker); } // *.........................ARCS..........................* // *=======================================================* // *=======================================================* // *........................MASSES.........................* /**/ struct mass {/**/ point M;/**/ real m;/**/ }/**/ /**/ mass mass(point M, real m) {/*Constructor of mass point.*/ mass om; om.M = M; om.m = m; return om; } /**/ point operator cast(mass m) {/*Cast mass point to point.*/ point op; op = m.M; op.m = m.m; return op; } /**/ point point(explicit mass m){return m;}/*Cast 'm' to point*/ /**/ mass operator cast(point M) {/*Cast point to mass point.*/ mass om; om.M = M; om.m = M.m; return om; } /**/ mass mass(explicit point P) {/*Cast 'P' to mass.*/ return mass(P, P.m); } /**/ point[] operator cast(mass[] m) {/*Cast mass[] to point[].*/ point[] op; for(mass am : m) op.push(point(am)); return op; } /**/ mass[] operator cast(point[] P) {/*Cast point[] to mass[].*/ mass[] om; for(point op : P) om.push(mass(op)); return om; } /**/ mass mass(coordsys R, explicit pair p, real m) {/*Return the mass which has coordinates 'p' with respect to 'R' and weight 'm'.*/ return point(R, p, m);// Using casting. } /**/ mass operator cast(pair m){return mass((point)m, 1);}/*Cast pair to mass point.*/ /**/ path operator cast(mass M){return M.M;}/*Cast mass point to path.*/ /**/ guide operator cast(mass M){return M.M;}/*Cast mass to guide.*/ /**/ mass operator +(mass M1, mass M2) {/*Provide mass + mass. mass - mass is also defined.*/ return mass(M1.M + M2.M, M1.m + M2.m); } mass operator -(mass M1, mass M2) { return mass(M1.M - M2.M, M1.m - M2.m); } /**/ mass operator *(real x, explicit mass M) {/*Provide real * mass. The resulted mass is the mass of 'M' multiplied by 'x' . mass/real, mass + real and mass - real are also defined.*/ return mass(M.M, x * M.m); } mass operator *(int x, explicit mass M){return mass(M.M, x * M.m);} mass operator /(explicit mass M, real x){return mass(M.M, M.m/x);} mass operator /(explicit mass M, int x){return mass(M.M, M.m/x);} mass operator +(explicit mass M, real x){return mass(M.M, M.m + x);} mass operator +(explicit mass M, int x){return mass(M.M, M.m + x);} mass operator -(explicit mass M, real x){return mass(M.M, M.m - x);} mass operator -(explicit mass M, int x){return mass(M.M, M.m - x);} /**/ mass operator *(transform t, mass M) {/*Provide transform * mass.*/ return mass(t * M.M, M.m); } /**/ mass masscenter(... mass[] M) {/*Return the center of the masses 'M'.*/ point[] P; for (int i = 0; i < M.length; ++i) P.push(M[i].M); P = standardizecoordsys(currentcoordsys, true ... P); real m = M[0].m; point oM = M[0].m * P[0]; for (int i = 1; i < M.length; ++i) { oM += M[i].m * P[i]; m += M[i].m; } if (m == 0) abort("masscenter: the sum of masses is null."); return mass(oM/m, m); } /**/ string massformat(string format = defaultmassformat, string s, mass M) {/*Return the string formated by 'format' with the mass value. In the parameter 'format', %L will be replaced by 's'. .*/ return format == "" ? s : format(replace(format, "%L", replace(s, "$", "")), M.m); } /**/ void label(picture pic = currentpicture, Label L, explicit mass M, align align = NoAlign, string format = defaultmassformat, pen p = nullpen, filltype filltype = NoFill) {/*Draw label returned by massformat(format, L, M) at coordinates of M. .*/ Label lL = L.copy(); lL.s = massformat(format, lL.s, M); Label L = Label(lL, M.M, align, p, filltype); add(pic, L); } /**/ void dot(picture pic = currentpicture, Label L, explicit mass M, align align = NoAlign, string format = defaultmassformat, pen p = currentpen) {/*Draw a dot with label 'L' as label(picture, Label, explicit mass, align, string, pen, filltype) does. .*/ Label lL = L.copy(); lL.s = massformat(format, lL.s, M); lL.position(locate(M.M)); lL.align(align, E); lL.p(p); dot(pic, M.M, p); add(pic, lL); } // *........................MASSES.........................* // *=======================================================* // *=======================================================* // *.......................TRIANGLES.......................* /**/ point orthocentercenter(point A, point B, point C) {/*Return the orthocenter of the triangle ABC.*/ point[] P = standardizecoordsys(A, B, C); coordsys R = P[0].coordsys; pair pp = extension(A, projection(P[1], P[2]) * P[0], B, projection(P[0], P[2]) * P[1]); return point(R, pp/R); } /**/ point centroid(point A, point B, point C) {/*Return the centroid of the triangle ABC.*/ return (A + B + C)/3; } /**/ point incenter(point A, point B, point C) {/*Return the center of the incircle of the triangle ABC.*/ point[] P = standardizecoordsys(A, B, C); coordsys R = P[0].coordsys; pair a = A, b = B, c = C; pair pp = extension(a, a + dir(a--b, a--c), b, b + dir(b--a, b--c)); return point(R, pp/R); } /**/ real inradius(point A, point B, point C) {/*Return the radius of the incircle of the triangle ABC.*/ point IC = incenter(A, B, C); return abs(IC - projection(A, B) * IC); } /**/ circle incircle(point A, point B, point C) {/*Return the incircle of the triangle ABC.*/ point IC = incenter(A, B, C); return circle(IC, abs(IC - projection(A, B) * IC)); } /**/ point excenter(point A, point B, point C) {/*Return the center of the excircle of the triangle tangent with (AB).*/ point[] P = standardizecoordsys(A, B, C); coordsys R = P[0].coordsys; pair a = A, b = B, c = C; pair pp = extension(a, a + rotate(90) * dir(a--b, a--c), b, b + rotate(90) * dir(b--a, b--c)); return point(R, pp/R); } /**/ real exradius(point A, point B, point C) {/*Return the radius of the excircle of the triangle ABC with (AB).*/ point EC = excenter(A, B, C); return abs(EC - projection(A, B) * EC); } /**/ circle excircle(point A, point B, point C) {/*Return the excircle of the triangle ABC tangent with (AB).*/ point center = excenter(A, B, C); real radius = abs(center - projection(B, C) * center); return circle(center, radius); } private int[] numarray = {1, 2, 3}; numarray.cyclic = true; /**/ struct triangle {/**/ /**/ struct vertex {/*Structure used to communicate the vertex of a triangle.*/ int n;/*1 means VA,2 means VB,3 means VC,4 means VA etc...*/ triangle t;/*The triangle to which the vertex refers.*/ }/**/ /**/ restricted point A, B, C;/*The vertices of the triangle (as point).*/ restricted vertex VA, VB, VC;/*The vertices of the triangle (as vertex). Note that the vertex structure contains the triangle to wish it refers.*/ VA.n = 1;VB.n = 2;VC.n = 3; /**/ vertex vertex(int n) {/*Return numbered vertex. 'n' is 1 means VA, 2 means VB, 3 means VC, 4 means VA etc...*/ n = numarray[n - 1]; if(n == 1) return VA; else if(n == 2) return VB; return VC; } /**/ point point(int n) {/*Return numbered point. n is 1 means A, 2 means B, 3 means C, 4 means A etc...*/ n = numarray[n - 1]; if(n == 1) return A; else if(n == 2) return B; return C; } /**/ void init(point A, point B, point C) {/*Constructor.*/ point[] P = standardizecoordsys(A, B, C); this.A = P[0]; this.B = P[1]; this.C = P[2]; VA.t = this; VB.t = this; VC.t = this; } /**/ void operator init(point A, point B, point C) {/*For backward compatibility. Provide the routine 'triangle(point A, point B, point C)'.*/ this.init(A, B, C); } /**/ void operator init(real b, real alpha, real c, real angle = 0, point A = (0, 0)) {/*For backward compatibility. Provide the routine 'triangle(real b, real alpha, real c, real angle = 0, point A = (0, 0)) which returns the triangle ABC rotated by 'angle' (in degrees) and where b = AC, degrees(A) = alpha, AB = c.*/ coordsys R = A.coordsys; this.init(A, A + R.polar(c, radians(angle)), A + R.polar(b, radians(angle + alpha))); } /**/ real a() {/*Return the length BC. b() and c() are also defined and return the length AC and AB respectively.*/ return length(C - B); } real b() {return length(A - C);} real c() {return length(B - A);} private real det(pair a, pair b) {return a.x * b.y - a.y * b.x;} /**/ real area() {/**/ pair a = locate(A), b = locate(B), c = locate(C); return 0.5 * abs(det(a, b) + det(b, c) + det(c, a)); } /**/ real alpha() {/*Return the measure (in degrees) of the angle A. beta() and gamma() are also defined and return the measure of the angles B and C respectively.*/ return degrees(acos((b()^2 + c()^2 - a()^2)/(2b() * c()))); } real beta() {return degrees(acos((c()^2 + a()^2 - b()^2)/(2c() * a())));} real gamma() {return degrees(acos((a()^2 + b()^2 - c()^2)/(2a() * b())));} /**/ path Path() {/*The path of the triangle.*/ return A--C--B--cycle; } /**/ struct side {/*Structure used to communicate the side of a triangle.*/ int n;/*1 or 0 means [AB],-1 means [BA],2 means [BC],-2 means [CB] etc.*/ triangle t;/*The triangle to which the side refers.*/ }/**/ /**/ side AB;/*For the routines using the structure 'side', triangle.AB means 'side AB'. BA, AC, CA etc are also defined.*/ AB.n = 1; AB.t = this; side BA; BA.n = -1; BA.t = this; side BC; BC.n = 2; BC.t = this; side CB; CB.n = -2; CB.t = this; side CA; CA.n = 3; CA.t = this; side AC; AC.n = -3; AC.t = this; /**/ side side(int n) {/*Return numbered side. n is 1 means AB, -1 means BA, 2 means BC, -2 means CB, etc.*/ if(n == 0) abort('Invalid side number.'); int an = numarray[abs(n)-1]; if(an == 1) return n > 0 ? AB : BA; else if(an == 2) return n > 0 ? BC : CB; return n > 0 ? CA : AC; } /**/ line line(int n) {/*Return the numbered line.*/ if(n == 0) abort('Invalid line number.'); int an = numarray[abs(n)-1]; if(an == 1) return n > 0 ? line(A, B) : line(B, A); else if(an == 2) return n > 0 ? line(B, C) : line(C, B); return n > 0 ? line(C, A) : line(A, C); } }/**/ from triangle unravel side; // The structure 'side' is now available outside the triangle structure. from triangle unravel vertex; // The structure 'vertex' is now available outside the triangle structure. triangle[] operator ^^(triangle[] t1, triangle t2) { triangle[] T; for (int i = 0; i < t1.length; ++i) T.push(t1[i]); T.push(t2); return T; } triangle[] operator ^^(... triangle[] t) { triangle[] T; for (int i = 0; i < t.length; ++i) { T.push(t[i]); } return T; } /**/ line operator cast(side side) {/*Cast side to (infinite) line. Most routine with line parameters works with side parameters. One can use the code 'segment(a_side)' to obtain a line segment.*/ triangle t = side.t; return t.line(side.n); } /**/ line line(explicit side side) {/*Return 'side' as line.*/ return (line)side; } /**/ segment segment(explicit side side) {/*Return 'side' as segment.*/ return (segment)(line)side; } /**/ point operator cast(vertex V) {/*Cast vertex to point. Most routine with point parameters works with vertex parameters.*/ return V.t.point(V.n); } /**/ point point(explicit vertex V) {/*Return the point corresponding to the vertex 'V'.*/ return (point)V; } /**/ side opposite(vertex V) {/*Return the opposite side of vertex 'V'.*/ return V.t.side(numarray[abs(V.n)]); } /**/ vertex opposite(side side) {/*Return the opposite vertex of side 'side'.*/ return side.t.vertex(numarray[abs(side.n) + 1]); } /**/ point midpoint(side side) {/**/ return midpoint(segment(side)); } /**/ triangle operator *(transform T, triangle t) {/*Provide transform * triangle.*/ return triangle(T * t.A, T * t.B, T * t.C); } /**/ triangle triangleAbc(real alpha, real b, real c, real angle = 0, point A = (0, 0)) {/*Return the triangle ABC rotated by 'angle' with BAC = alpha, AC = b and AB = c.*/ triangle T; coordsys R = A.coordsys; T.init(A, A + R.polar(c, radians(angle)), A + R.polar(b, radians(angle + alpha))); return T; } /**/ triangle triangleabc(real a, real b, real c, real angle = 0, point A = (0, 0)) {/*Return the triangle ABC rotated by 'angle' with BC = a, AC = b and AB = c.*/ triangle T; coordsys R = A.coordsys; T.init(A, A + R.polar(c, radians(angle)), A + R.polar(b, radians(angle) + acos((b^2 + c^2 - a^2)/(2 * b * c)))); return T; } /**/ triangle triangle(line l1, line l2, line l3) {/*Return the triangle defined by three line.*/ point P1, P2, P3; P1 = intersectionpoint(l1, l2); P2 = intersectionpoint(l1, l3); P3 = intersectionpoint(l2, l3); if(!(defined(P1) && defined(P2) && defined(P3))) abort("triangle: two lines are parallel."); return triangle(P1, P2, P3); } /**/ point foot(vertex V) {/*Return the endpoint of the altitude from V.*/ return projection((line)opposite(V)) * ((point)V); } /**/ point foot(side side) {/*Return the endpoint of the altitude on 'side'.*/ return projection((line)side) * point(opposite(side)); } /**/ line altitude(vertex V) {/*Return the altitude passing through 'V'.*/ return line(point(V), foot(V)); } /**/ line altitude(side side) {/*Return the altitude cutting 'side'.*/ return altitude(opposite(side)); } /**/ point orthocentercenter(triangle t) {/*Return the orthocenter of the triangle t.*/ return orthocentercenter(t.A, t.B, t.C); } /**/ point centroid(triangle t) {/*Return the centroid of the triangle 't'.*/ return (t.A + t.B + t.C)/3; } /**/ point circumcenter(triangle t) {/*Return the circumcenter of the triangle 't'.*/ return circumcenter(t.A, t.B, t.C); } /**/ circle circle(triangle t) {/*Return the circumcircle of the triangle 't'.*/ return circle(t.A, t.B, t.C); } /**/ circle circumcircle(triangle t) {/*Return the circumcircle of the triangle 't'.*/ return circle(t.A, t.B, t.C); } /**/ point incenter(triangle t) {/*Return the center of the incircle of the triangle 't'.*/ return incenter(t.A, t.B, t.C); } /**/ real inradius(triangle t) {/*Return the radius of the incircle of the triangle 't'.*/ return inradius(t.A, t.B, t.C); } /**/ circle incircle(triangle t) {/*Return the the incircle of the triangle 't'.*/ return incircle(t.A, t.B, t.C); } /**/ point excenter(side side) {/*Return the center of the excircle tangent with the side 'side' of its triangle. side = 0 means AB, 1 means AC, other means BC. One must use the predefined sides t.AB, t.AC where 't' is a triangle....*/ point op; triangle t = side.t; int n = numarray[abs(side.n) - 1]; if(n == 1) op = excenter(t.A, t.B, t.C); else if(n == 2) op = excenter(t.B, t.C, t.A); else op = excenter(t.C, t.A, t.B); return op; } /**/ real exradius(side side) {/*Return radius of the excircle tangent with the side 'side' of its triangle. side = 0 means AB, 1 means BC, other means CA. One must use the predefined sides t.AB, t.AC where 't' is a triangle....*/ real or; triangle t = side.t; int n = numarray[abs(side.n) - 1]; if(n == 1) or = exradius(t.A, t.B, t.C); else if(n == 2) or = exradius(t.B, t.C, t.A); else or = exradius(t.A, t.C, t.B); return or; } /**/ circle excircle(side side) {/*Return the excircle tangent with the side 'side' of its triangle. side = 0 means AB, 1 means AC, other means BC. One must use the predefined sides t.AB, t.AC where 't' is a triangle....*/ circle oc; int n = numarray[abs(side.n) - 1]; triangle t = side.t; if(n == 1) oc = excircle(t.A, t.B, t.C); else if(n == 2) oc = excircle(t.B, t.C, t.A); else oc = excircle(t.A, t.C, t.B); return oc; } /**/ struct trilinear {/*Trilinear coordinates 'a:b:c' relative to triangle 't'. */ real a,b,c;/*The trilinear coordinates.*/ triangle t;/*The reference triangle.*/ }/**/ /**/ trilinear trilinear(triangle t, real a, real b, real c) {/*Return the trilinear coordinates relative to 't'. */ trilinear ot; ot.a = a; ot.b = b; ot.c = c; ot.t = t; return ot; } /**/ trilinear trilinear(triangle t, point M) {/*Return the trilinear coordinates of 'M' relative to 't'. */ trilinear ot; pair m = locate(M); int sameside(pair A, pair B, pair m, pair p) {// Return 1 if 'm' and 'p' are same side of line (AB) else return -1. pair mil = (A + B)/2; pair mA = rotate(90, mil) * A; pair mB = rotate(-90, mil) * A; return (abs(m - mA) <= abs(m - mB)) == (abs(p - mA) <= abs(p - mB)) ? 1 : -1; } real det(pair a, pair b) {return a.x * b.y - a.y * b.x;} real area(pair a, pair b, pair c){return 0.5 * abs(det(a, b) + det(b, c) + det(c, a));} pair A = t.A, B = t.B, C = t.C; real t1 = area(B, C, m), t2 = area(C, A, m), t3 = area(A, B, m); ot.a = sameside(B, C, A, m) * t1/t.a(); ot.b = sameside(A, C, B, m) * t2/t.b(); ot.c = sameside(A, B, C, m) * t3/t.c(); ot.t = t; return ot; } /**/ void write(trilinear tri) {/**/ write(format("%f : ", tri.a) + format("%f : ", tri.b) + format("%f", tri.c)); } /**/ point point(trilinear tri) {/*Return the trilinear coordinates relative to 't'. */ triangle t = tri.t; return masscenter(0.5 * t.a() * mass(t.A, tri.a), 0.5 * t.b() * mass(t.B, tri.b), 0.5 * t.c() * mass(t.C, tri.c)); } /**/ int[] tricoef(side side) {/*Return an array of integer (values are 0 or 1) which represents 'side'. For example, side = t.BC will be represented by {0, 1, 1}.*/ int[] oi; int n = numarray[abs(side.n) - 1]; oi.push((n == 1 || n == 3) ? 1 : 0); oi.push((n == 1 || n == 2) ? 1 : 0); oi.push((n == 2 || n == 3) ? 1 : 0); return oi; } /**/ point operator cast(trilinear tri) {/*Cast trilinear to point. One may use the routine 'point(trilinear)' to force the casting.*/ return point(tri); } /**/ typedef real centerfunction(real, real, real);/**/ /**/ trilinear trilinear(triangle t, centerfunction f, real a = t.a(), real b = t.b(), real c = t.c()) {/**/ return trilinear(t, f(a, b, c), f(b, c, a), f(c, a, b)); } /**/ point symmedian(triangle t) {/*Return the symmedian point of 't'.*/ point A, B, C; real a = t.a(), b = t.b(), c = t.c(); A = trilinear(t, 0, b, c); B = trilinear(t, a, 0, c); return intersectionpoint(line(t.A, A), line(t.B, B)); } /**/ point symmedian(side side) {/*The symmedian point on the side 'side'.*/ triangle t = side.t; int n = numarray[abs(side.n) - 1]; if(n == 1) return trilinear(t, t.a(), t.b(), 0); if(n == 2) return trilinear(t, 0, t.b(), t.c()); return trilinear(t, t.a(), 0, t.c()); } /**/ line symmedian(vertex V) {/*Return the symmedian passing through 'V'.*/ return line(point(V), symmedian(V.t)); } /**/ triangle cevian(triangle t, point P) {/*Return the Cevian triangle with respect of 'P' .*/ trilinear tri = trilinear(t, locate(P)); point A = point(trilinear(t, 0, tri.b, tri.c)); point B = point(trilinear(t, tri.a, 0, tri.c)); point C = point(trilinear(t, tri.a, tri.b, 0)); return triangle(A, B, C); } /**/ point cevian(side side, point P) {/*Return the Cevian point on 'side' with respect of 'P'.*/ triangle t = side.t; trilinear tri = trilinear(t, locate(P)); int[] s = tricoef(side); return point(trilinear(t, s[0] * tri.a, s[1] * tri.b, s[2] * tri.c)); } /**/ line cevian(vertex V, point P) {/*Return line passing through 'V' and its Cevian image with respect of 'P'.*/ return line(point(V), cevian(opposite(V), P)); } /**/ point gergonne(triangle t) {/*Return the Gergonne point of 't'.*/ real f(real a, real b, real c){return 1/(a * (b + c - a));} return point(trilinear(t, f)); } /**/ point[] fermat(triangle t) {/*Return the Fermat points of 't'.*/ point[] P; real A = t.alpha(), B = t.beta(), C = t.gamma(); P.push(point(trilinear(t, 1/Sin(A + 60), 1/Sin(B + 60), 1/Sin(C + 60)))); P.push(point(trilinear(t, 1/Sin(A - 60), 1/Sin(B - 60), 1/Sin(C - 60)))); return P; } /**/ point isotomicconjugate(triangle t, point M) {/**/ if(!inside(t.Path(), locate(M))) abort("isotomic: the point must be inside the triangle."); trilinear tr = trilinear(t, M); return point(trilinear(t, 1/(t.a()^2 * tr.a), 1/(t.b()^2 * tr.b), 1/(t.c()^2 * tr.c))); } /**/ line isotomic(vertex V, point M) {/*.*/ side op = opposite(V); return line(V, rotate(180, midpoint(op)) * cevian(op, M)); } /**/ point isotomic(side side, point M) {/**/ return intersectionpoint(isotomic(opposite(side), M), side); } /**/ triangle isotomic(triangle t, point M) {/**/ return triangle(isotomic(t.BC, M), isotomic(t.CA, M), isotomic(t.AB, M)); } /**/ point isogonalconjugate(triangle t, point M) {/**/ trilinear tr = trilinear(t, M); return point(trilinear(t, 1/tr.a, 1/tr.b, 1/tr.c)); } /**/ point isogonal(side side, point M) {/**/ return cevian(side, isogonalconjugate(side.t, M)); } /**/ line isogonal(vertex V, point M) {/**/ return line(V, isogonal(opposite(V), M)); } /**/ triangle isogonal(triangle t, point M) {/**/ return triangle(isogonal(t.BC, M), isogonal(t.CA, M), isogonal(t.AB, M)); } /**/ triangle pedal(triangle t, point M) {/*Return the pedal triangle of 'M' in 't'. */ return triangle(projection(t.BC) * M, projection(t.AC) * M, projection(t.AB) * M); } /**/ line pedal(side side, point M) {/*Return the pedal line of 'M' cutting 'side'. */ return line(M, projection(side) * M); } /**/ triangle antipedal(triangle t, point M) {/**/ trilinear Tm = trilinear(t, M); real a = Tm.a, b = Tm.b, c = Tm.c; real CA = Cos(t.alpha()), CB = Cos(t.beta()), CC = Cos(t.gamma()); point A = trilinear(t, -(b + a * CC) * (c + a * CB), (c + a * CB) * (a + b * CC), (b + a * CC) * (a + c * CB)); point B = trilinear(t, (c + b * CA) * (b + a * CC), -(c + b * CA) * (a + b * CC), (a + b * CC) * (b + c * CA)); point C = trilinear(t, (b + c * CA) * (c + a * CB), (a + c * CB) * (c + b * CA), -(a + c * CB) * (b + c * CA)); return triangle(A, B, C); } /**/ triangle extouch(triangle t) {/*Return the extouch triangle of the triangle 't'. The extouch triangle of 't' is the triangle formed by the points of tangency of a triangle 't' with its excircles.*/ point A, B, C; real a = t.a(), b = t.b(), c = t.c(); A = trilinear(t, 0, (a - b + c)/b, (a + b - c)/c); B = trilinear(t, (-a + b + c)/a, 0, (a + b - c)/c); C = trilinear(t, (-a + b + c)/a, (a - b + c)/b, 0); return triangle(A, B, C); } /**/ triangle incentral(triangle t) {/*Return the incentral triangle of the triangle 't'. It is the triangle whose vertices are determined by the intersections of the reference triangle's angle bisectors with the respective opposite sides.*/ point A, B, C; // real a = t.a(), b = t.b(), c = t.c(); A = trilinear(t, 0, 1, 1); B = trilinear(t, 1, 0, 1); C = trilinear(t, 1, 1, 0); return triangle(A, B, C); } /**/ triangle extouch(side side) {/*Return the triangle formed by the points of tangency of the triangle referenced by 'side' with its excircles. One vertex of the returned triangle is on the segment 'side'.*/ triangle t = side.t; transform p1 = projection((line)t.AB); transform p2 = projection((line)t.AC); transform p3 = projection((line)t.BC); point EP = excenter(side); return triangle(p3 * EP, p2 * EP, p1 * EP); } /**/ point bisectorpoint(side side) {/*The intersection point of the angle bisector from the opposite point of 'side' with the side 'side'.*/ triangle t = side.t; int n = numarray[abs(side.n) - 1]; if(n == 1) return trilinear(t, 1, 1, 0); if(n == 2) return trilinear(t, 0, 1, 1); return trilinear(t, 1, 0, 1); } /**/ line bisector(vertex V, real angle = 0) {/*Return the interior bisector passing through 'V' rotated by angle (in degrees) around 'V'.*/ return rotate(angle, point(V)) * line(point(V), incenter(V.t)); } /**/ line bisector(side side) {/*Return the bisector of the line segment 'side'.*/ return bisector(segment(side)); } /**/ point intouch(side side) {/*The point of tangency on the side 'side' of its incircle.*/ triangle t = side.t; real a = t.a(), b = t.b(), c = t.c(); int n = numarray[abs(side.n) - 1]; if(n == 1) return trilinear(t, b * c/(-a + b + c), a * c/(a - b + c), 0); if(n == 2) return trilinear(t, 0, a * c/(a - b + c), a * b/(a + b - c)); return trilinear(t, b * c/(-a + b + c), 0, a * b/(a + b - c)); } /**/ triangle intouch(triangle t) {/*Return the intouch triangle of the triangle 't'. The intouch triangle of 't' is the triangle formed by the points of tangency of a triangle 't' with its incircles.*/ point A, B, C; real a = t.a(), b = t.b(), c = t.c(); A = trilinear(t, 0, a * c/(a - b + c), a * b/(a + b - c)); B = trilinear(t, b * c/(-a + b + c), 0, a * b/(a + b - c)); C = trilinear(t, b * c/(-a + b + c), a * c/(a - b + c), 0); return triangle(A, B, C); } /**/ triangle tangential(triangle t) {/*Return the tangential triangle of the triangle 't'. The tangential triangle of 't' is the triangle formed by the lines tangent to the circumcircle of the given triangle 't' at its vertices.*/ point A, B, C; real a = t.a(), b = t.b(), c = t.c(); A = trilinear(t, -a, b, c); B = trilinear(t, a, -b, c); C = trilinear(t, a, b, -c); return triangle(A, B, C); } /**/ triangle medial(triangle t) {/*Return the triangle whose vertices are midpoints of the sides of 't'.*/ return triangle(midpoint(t.BC), midpoint(t.AC), midpoint(t.AB)); } /**/ line median(vertex V) {/*Return median from 'V'.*/ return line(point(V), midpoint(segment(opposite(V)))); } /**/ line median(side side) {/*Return median from the opposite vertex of 'side'.*/ return median(opposite(side)); } /**/ triangle orthic(triangle t) {/*Return the triangle whose vertices are endpoints of the altitudes from each of the vertices of 't'.*/ return triangle(foot(t.BC), foot(t.AC), foot(t.AB)); } /**/ triangle symmedial(triangle t) {/*Return the symmedial triangle of 't'.*/ point A, B, C; real a = t.a(), b = t.b(), c = t.c(); A = trilinear(t, 0, b, c); B = trilinear(t, a, 0, c); C = trilinear(t, a, b, 0); return triangle(A, B, C); } /**/ triangle anticomplementary(triangle t) {/*Return the triangle which has the given triangle 't' as its medial triangle.*/ real a = t.a(), b = t.b(), c = t.c(); real ab = a * b, bc = b * c, ca = c * a; point A = trilinear(t, -bc, ca, ab); point B = trilinear(t, bc, -ca, ab); point C = trilinear(t, bc, ca, -ab); return triangle(A, B, C); } /**/ point[] intersectionpoints(triangle t, line l, bool extended = false) {/*Return the intersection points. If 'extended' is true, the sides are lines else the sides are segments. intersectionpoints(line, triangle, bool) is also defined.*/ point[] OP; void addpoint(point P) { if(defined(P)) { bool exist = false; for (int i = 0; i < OP.length; ++i) { if(P == OP[i]) {exist = true; break;} } if(!exist) OP.push(P); } } if(extended) { for (int i = 1; i <= 3; ++i) { addpoint(intersectionpoint(t.line(i), l)); } } else { for (int i = 1; i <= 3; ++i) { addpoint(intersectionpoint((segment)t.line(i), l)); } } return OP; } point[] intersectionpoints(line l, triangle t, bool extended = false) { return intersectionpoints(t, l, extended); } /**/ vector dir(vertex V) {/*The direction (towards the outside of the triangle) of the interior angle bisector of 'V'.*/ triangle t = V.t; if(V.n == 1) return vector(defaultcoordsys, (-dir(t.A--t.B, t.A--t.C))); if(V.n == 2) return vector(defaultcoordsys, (-dir(t.B--t.A, t.B--t.C))); return vector(defaultcoordsys, (-dir(t.C--t.A, t.C--t.B))); } /**/ void label(picture pic = currentpicture, Label L, vertex V, pair align = dir(V), real alignFactor = 1, pen p = nullpen, filltype filltype = NoFill) {/*Draw 'L' on picture 'pic' at vertex 'V' aligned by 'alignFactor * align'.*/ label(pic, L, locate(point(V)), alignFactor * align, p, filltype); } /**/ void label(picture pic = currentpicture, Label LA = "$A$", Label LB = "$B$", Label LC = "$C$", triangle t, real alignAngle = 0, real alignFactor = 1, pen p = nullpen, filltype filltype = NoFill) {/*Draw labels LA, LB and LC aligned in the rotated (by 'alignAngle' in degrees) direction (towards the outside of the triangle) of the interior angle bisector of vertices. One can individually modify the alignment by setting the Label parameter 'align'.*/ Label lla = LA.copy(); lla.align(lla.align, rotate(alignAngle) * locate(dir(t.VA))); label(pic, LA, t.VA, align = lla.align.dir, alignFactor = alignFactor, p, filltype); Label llb = LB.copy(); llb.align(llb.align, rotate(alignAngle) * locate(dir(t.VB))); label(pic, llb, t.VB, align = llb.align.dir, alignFactor = alignFactor, p, filltype); Label llc = LC.copy(); llc.align(llc.align, rotate(alignAngle) * locate(dir(t.VC))); label(pic, llc, t.VC, align = llc.align.dir, alignFactor = alignFactor, p, filltype); } /**/ void show(picture pic = currentpicture, Label LA = "$A$", Label LB = "$B$", Label LC = "$C$", Label La = "$a$", Label Lb = "$b$", Label Lc = "$c$", triangle t, pen p = currentpen, filltype filltype = NoFill) {/*Draw triangle and labels of sides and vertices.*/ pair a = locate(t.A), b = locate(t.B), c = locate(t.C); draw(pic, a--b--c--cycle, p); label(pic, LA, a, -dir(a--b, a--c), p, filltype); label(pic, LB, b, -dir(b--a, b--c), p, filltype); label(pic, LC, c, -dir(c--a, c--b), p, filltype); pair aligna = I * unit(c - b), alignb = I * unit(c - a), alignc = I * unit(b - a); pair mAB = locate(midpoint(t.AB)), mAC = locate(midpoint(t.AC)), mBC = locate(midpoint(t.BC)); label(pic, La, b--c, align = rotate(dot(a - mBC, aligna) > 0 ? 180 :0) * aligna, p); label(pic, Lb, a--c, align = rotate(dot(b - mAC, alignb) > 0 ? 180 :0) * alignb, p); label(pic, Lc, a--b, align = rotate(dot(c - mAB, alignc) > 0 ? 180 :0) * alignc, p); } /**/ void draw(picture pic = currentpicture, triangle t, pen p = currentpen, marker marker = nomarker) {/*Draw sides of the triangle 't' on picture 'pic' using pen 'p'.*/ draw(pic, t.Path(), p, marker); } /**/ void draw(picture pic = currentpicture, triangle[] t, pen p = currentpen, marker marker = nomarker) {/*Draw sides of the triangles 't' on picture 'pic' using pen 'p'.*/ for(int i = 0; i < t.length; ++i) draw(pic, t[i], p, marker); } /**/ void drawline(picture pic = currentpicture, triangle t, pen p = currentpen) {/*Draw lines of the triangle 't' on picture 'pic' using pen 'p'.*/ draw(t, p); draw(pic, line(t.A, t.B), p); draw(pic, line(t.A, t.C), p); draw(pic, line(t.B, t.C), p); } /**/ void dot(picture pic = currentpicture, triangle t, pen p = currentpen) {/*Draw a dot at each vertex of 't'.*/ dot(pic, t.A^^t.B^^t.C, p); } // *.......................TRIANGLES.......................* // *=======================================================* // *=======================================================* // *.......................INVERSIONS......................* /**/ point inverse(real k, point A, point M) {/*Return the inverse point of 'M' with respect to point A and inversion radius 'k'.*/ return A + k/conj(M - A); } /**/ point radicalcenter(circle c1, circle c2) {/**/ point[] P = standardizecoordsys(c1.C, c2.C); real k = c1.r^2 - c2.r^2; pair C1 = locate(c1.C); pair C2 = locate(c2.C); pair oop = C2 - C1; pair K = (abs(oop) == 0) ? (infinity, infinity) : midpoint(C1--C2) + 0.5 * k * oop/dot(oop, oop); return point(P[0].coordsys, K/P[0].coordsys); } /**/ line radicalline(circle c1, circle c2) {/**/ if (c1.C == c2.C) abort("radicalline: the centers must be distinct"); return perpendicular(radicalcenter(c1, c2), line(c1.C, c2.C)); } /**/ point radicalcenter(circle c1, circle c2, circle c3) {/**/ return intersectionpoint(radicalline(c1, c2), radicalline(c1, c3)); } /**/ struct inversion {/*http://mathworld.wolfram.com/Inversion.html*/ point C; real k; }/**/ /**/ inversion inversion(real k, point C) {/*Return the inversion with respect to 'C' having inversion radius 'k'.*/ inversion oi; oi.k = k; oi.C = C; return oi; } /**/ inversion inversion(point C, real k) {/*Return the inversion with respect to 'C' having inversion radius 'k'.*/ return inversion(k, C); } /**/ inversion inversion(circle c1, circle c2, real sgn = 1) {/*Return the inversion which transforms 'c1' to . 'c2' and positive inversion radius if 'sgn > 0'; . 'c2' and negative inversion radius if 'sgn < 0'; . 'c1' and 'c2' to 'c2' if 'sgn = 0'.*/ if(sgn == 0) { point O = radicalcenter(c1, c2); return inversion(O^c1, O); } real a = abs(c1.r/c2.r); if(sgn > 0) { point O = c1.C + a/abs(1 - a) * (c2.C - c1.C); return inversion(a * abs(abs(O - c2.C)^2 - c2.r^2), O); } point O = c1.C + a/abs(1 + a) * (c2.C - c1.C); return inversion(-a * abs(abs(O - c2.C)^2 - c2.r^2), O); } /**/ inversion inversion(circle c1, circle c2, circle c3) {/*Return the inversion which transform 'c1' to 'c1', 'c2' to 'c2' and 'c3' to 'c3'.*/ point Rc = radicalcenter(c1, c2, c3); return inversion(Rc, Rc^c1); } circle operator cast(inversion i){return circle(i.C, sgn(i.k) * sqrt(abs(i.k)));} /**/ circle circle(inversion i) {/*Return the inversion circle of 'i'.*/ return i; } inversion operator cast(circle c) { return inversion(sgn(c.r) * c.r^2, c.C); } /**/ inversion inversion(circle c) {/*Return the inversion represented by the circle of 'c'.*/ return c; } /**/ point operator *(inversion i, point P) {/*Provide inversion * point.*/ return inverse(i.k, i.C, P); } void lineinversion() { warning("lineinversion", "the inversion of the line is not a circle. The returned circle has an infinite radius, circle.l has been set."); } /**/ circle inverse(real k, point A, line l) {/*Return the inverse circle of 'l' with respect to point 'A' and inversion radius 'k'.*/ if(A @ l) { lineinversion(); circle C = circle(A, infinity); C.l = l; return C; } point Ap = inverse(k, A, l.A), Bp = inverse(k, A, l.B); return circle(A, Ap, Bp); } /**/ circle operator *(inversion i, line l) {/*Provide inversion * line for lines that don't pass through the inversion center.*/ return inverse(i.k, i.C, l); } /**/ circle inverse(real k, point A, circle c) {/*Return the inverse circle of 'c' with respect to point A and inversion radius 'k'.*/ if(degenerate(c)) return inverse(k, A, c.l); if(A @ c) { lineinversion(); point M = rotate(180, c.C) * A, Mp = rotate(90, c.C) * A; circle oc = circle(A, infinity); oc.l = line(inverse(k, A, M), inverse(k, A, Mp)); return oc; } point[] P = standardizecoordsys(A, c.C); real s = k/((P[1].x - P[0].x)^2 + (P[1].y - P[0].y)^2 - c.r^2); return circle(P[0] + s * (P[1]-P[0]), abs(s) * c.r); } /**/ circle operator *(inversion i, circle c) {/*Provide inversion * circle.*/ return inverse(i.k, i.C, c); } // *.......................INVERSIONS......................* // *=======================================================* // *=======================================================* // *........................FOOTER.........................* /**/ point[] intersectionpoints(line l, circle c) {/*Note that the line 'l' may be a segment by casting. intersectionpoints(circle, line) is also defined.*/ if(degenerate(c)) return new point[]{intersectionpoint(l, c.l)}; point[] op; coordsys R = samecoordsys(l.A, c.C) ? l.A.coordsys : defaultcoordsys; coordsys Rp = defaultcoordsys; circle cc = circle(changecoordsys(Rp, c.C), c.r); point proj = projection(l) * c.C; if(proj @ cc) { // The line is a tangente of the circle. if(proj @ l) op.push(proj);// line may be a segement... } else { coordsys Rc = cartesiansystem(c.C, (1, 0), (0, 1)); line ll = changecoordsys(Rc, l); pair[] P = intersectionpoints(ll.A.coordinates, ll.B.coordinates, 1, 0, 1, 0, 0, -c.r^2); for (int i = 0; i < P.length; ++i) { point inter = changecoordsys(R, point(Rc, P[i])); if(inter @ l) op.push(inter); } } return op; } point[] intersectionpoints(circle c, line l) { return intersectionpoints(l, c); } /**/ point[] intersectionpoints(line l, ellipse el) {/*Note that the line 'l' may be a segment by casting. intersectionpoints(ellipse, line) is also defined.*/ if(el.e == 0) return intersectionpoints(l, (circle)el); if(degenerate(el)) return new point[]{intersectionpoint(l, el.l)}; point[] op; coordsys R = samecoordsys(l.A, el.C) ? l.A.coordsys : defaultcoordsys; coordsys Rp = defaultcoordsys; line ll = changecoordsys(Rp, l); ellipse ell = changecoordsys(Rp, el); circle C = circle(ell.C, ell.a); point[] Ip = intersectionpoints(ll, C); if (Ip.length > 0 && (perpendicular(ll, line(ell.F1, Ip[0])) || perpendicular(ll, line(ell.F2, Ip[0])))) { // http://www.mathcurve.com/courbes2d/ellipse/ellipse.shtml // Définition tangentielle par antipodaire de cercle. // 'l' is a tangent of 'el' transform t = scale(el.a/el.b, el.F1, el.F2, el.C, rotate(90, el.C) * el.F1); point inter = inverse(t) * intersectionpoints(C, t * ll)[0]; if(inter @ l) op.push(inter); } else { coordsys Rc = canonicalcartesiansystem(el); line ll = changecoordsys(Rc, l); pair[] P = intersectionpoints(ll.A.coordinates, ll.B.coordinates, 1/el.a^2, 0, 1/el.b^2, 0, 0, -1); for (int i = 0; i < P.length; ++i) { point inter = changecoordsys(R, point(Rc, P[i])); if(inter @ l) op.push(inter); } } return op; } point[] intersectionpoints(ellipse el, line l) { return intersectionpoints(l, el); } /**/ point[] intersectionpoints(line l, parabola p) {/*Note that the line 'l' may be a segment by casting. intersectionpoints(parabola, line) is also defined.*/ point[] op; coordsys R = coordsys(p); bool tgt = false; line ll = changecoordsys(R, l), lv = parallel(p.V, p.D); point M = intersectionpoint(lv, ll), tgtp; if(finite(M)) {// Test if 'l' is tangent to 'p' line l1 = bisector(line(M, p.F)); line l2 = rotate(90, M) * lv; point P = intersectionpoint(l1, l2); tgtp = rotate(180, P) * p.F; tgt = (tgtp @ l); } if(tgt) { if(tgtp @ l) op.push(tgtp); } else { real[] eq = changecoordsys(defaultcoordsys, equation(p)).a; pair[] tp = intersectionpoints(locate(l.A), locate(l.B), eq); point inter; for (int i = 0; i < tp.length; ++i) { inter = point(R, tp[i]/R); if(inter @ l) op.push(inter); } } return op; } point[] intersectionpoints(parabola p, line l) { return intersectionpoints(l, p); } /**/ point[] intersectionpoints(line l, hyperbola h) {/*Note that the line 'l' may be a segment by casting. intersectionpoints(hyperbola, line) is also defined.*/ point[] op; coordsys R = coordsys(h); point A = intersectionpoint(l, h.A1), B = intersectionpoint(l, h.A2); point M = midpoint(segment(A, B)); bool tgt = M @ h; if(tgt) { if(M @ l) op.push(M); } else { real[] eq = changecoordsys(defaultcoordsys, equation(h)).a; pair[] tp = intersectionpoints(locate(l.A), locate(l.B), eq); point inter; for (int i = 0; i < tp.length; ++i) { inter = point(R, tp[i]/R); if(inter @ l) op.push(inter); } } return op; } point[] intersectionpoints(hyperbola h, line l) { return intersectionpoints(l, h); } /**/ point[] intersectionpoints(line l, conic co) {/*Note that the line 'l' may be a segment by casting. intersectionpoints(conic, line) is also defined.*/ point[] op; if(co.e < 1) op = intersectionpoints((ellipse)co, l); else if(co.e == 1) op = intersectionpoints((parabola)co, l); else op = intersectionpoints((hyperbola)co, l); return op; } point[] intersectionpoints(conic co, line l) { return intersectionpoints(l, co); } /**/ point[] intersectionpoints(conic co1, conic co2) {/*Return the intersection points of the two conics.*/ if(degenerate(co1)) return intersectionpoints(co1.l[0], co2); if(degenerate(co2)) return intersectionpoints(co1, co2.l[0]); return intersectionpoints(equation(co1), equation(co2)); } /**/ point[] intersectionpoints(triangle t, conic co, bool extended = false) {/*Return the intersection points. If 'extended' is true, the sides are lines else the sides are segments. intersectionpoints(conic, triangle, bool) is also defined.*/ if(degenerate(co)) return intersectionpoints(t, co.l[0], extended); point[] OP; void addpoint(point P[]) { for (int i = 0; i < P.length; ++i) { if(defined(P[i])) { bool exist = false; for (int j = 0; j < OP.length; ++j) { if(P[i] == OP[j]) {exist = true; break;} } if(!exist) OP.push(P[i]); }}} if(extended) { for (int i = 1; i <= 3; ++i) { addpoint(intersectionpoints(t.line(i), co)); } } else { for (int i = 1; i <= 3; ++i) { addpoint(intersectionpoints((segment)t.line(i), co)); } } return OP; } point[] intersectionpoints(conic co, triangle t, bool extended = false) { return intersectionpoints(t, co, extended); } /**/ point[] intersectionpoints(ellipse a, ellipse b) {/**/ // if(degenerate(a)) return intersectionpoints(a.l, b); // if(degenerate(b)) return intersectionpoints(a, b.l);; return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(ellipse a, circle b) {/**/ // if(degenerate(a)) return intersectionpoints(a.l, b); // if(degenerate(b)) return intersectionpoints(a, b.l);; return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(circle a, ellipse b) {/**/ return intersectionpoints(b, a); } /**/ point[] intersectionpoints(ellipse a, parabola b) {/**/ // if(degenerate(a)) return intersectionpoints(a.l, b); return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(parabola a, ellipse b) {/**/ return intersectionpoints(b, a); } /**/ point[] intersectionpoints(ellipse a, hyperbola b) {/**/ // if(degenerate(a)) return intersectionpoints(a.l, b); return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(hyperbola a, ellipse b) {/**/ return intersectionpoints(b, a); } /**/ point[] intersectionpoints(circle a, parabola b) {/**/ return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(parabola a, circle b) {/**/ return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(circle a, hyperbola b) {/**/ return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(hyperbola a, circle b) {/**/ return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(parabola a, parabola b) {/**/ return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(parabola a, hyperbola b) {/**/ return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(hyperbola a, parabola b) {/**/ return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(hyperbola a, hyperbola b) {/**/ return intersectionpoints((conic)a, (conic)b); } /**/ point[] intersectionpoints(circle c1, circle c2) {/**/ if(degenerate(c1)) return degenerate(c2) ? new point[]{intersectionpoint(c1.l, c2.l)} : intersectionpoints(c1.l, c2); if(degenerate(c2)) return intersectionpoints(c1, c2.l); return (c1.C == c2.C) ? new point[] : intersectionpoints(radicalline(c1, c2), c1); } /**/ line tangent(circle c, abscissa x) {/*Return the tangent of 'c' at 'point(c, x)'.*/ if(c.r == 0) abort("tangent: a circle with a radius equals zero has no tangent."); point M = point(c, x); return line(rotate(90, M) * c.C, M); } /**/ line[] tangents(circle c, point M) {/*Return the tangents of 'c' passing through 'M'.*/ line[] ol; if(inside(c, M)) return ol; if(M @ c) { ol.push(tangent(c, relabscissa(c, M))); } else { circle cc = circle(c.C, M); point[] inter = intersectionpoints(c, cc); for (int i = 0; i < inter.length; ++i) ol.push(tangents(c, inter[i])[0]); } return ol; } /**/ point point(circle c, point M) {/*Return the intersection point of 'c' with the half-line '[c.C M)'.*/ return intersectionpoints(c, line(c.C, false, M))[0]; } /**/ line tangent(circle c, point M) {/*Return the tangent of 'c' at the intersection point of the half-line'[c.C M)'.*/ return tangents(c, point(c, M))[0]; } /**/ point point(circle c, explicit vector v) {/*Return the intersection point of 'c' with the half-line '[c.C v)'.*/ return point(c, c.C + v); } /**/ line tangent(circle c, explicit vector v) {/*Return the tangent of 'c' at the point M so that vec(c.C M) is collinear to 'v' with the same sense.*/ line ol = tangent(c, c.C + v); return dot(ol.v, v) > 0 ? ol : reverse(ol); } /**/ line tangent(ellipse el, abscissa x) {/*Return the tangent of 'el' at 'point(el, x)'.*/ point M = point(el, x); line l1 = line(el.F1, M); line l2 = line(el.F2, M); line ol = (l1 == l2) ? perpendicular(M, l1) : bisector(l1, l2, 90, false); return ol; } /**/ line[] tangents(ellipse el, point M) {/*Return the tangents of 'el' passing through 'M'.*/ line[] ol; if(inside(el, M)) return ol; if(M @ el) { ol.push(tangent(el, relabscissa(el, M))); } else { point Mp = samecoordsys(M, el.F2) ? M : changecoordsys(el.F2.coordsys, M); circle c = circle(Mp, abs(el.F1 - Mp)); circle cc = circle(el.F2, 2 * el.a); point[] inter = intersectionpoints(c, cc); for (int i = 0; i < inter.length; ++i) { line tl = line(inter[i], el.F2, false); point[] P = intersectionpoints(tl, el); ol.push(line(Mp, P[0])); } } return ol; } /**/ line tangent(parabola p, abscissa x) {/*Return the tangent of 'p' at 'point(p, x)' (use the Wells method).*/ line lt = rotate(90, p.V) * line(p.V, p.F); point P = point(p, x); if(P == p.V) return lt; point M = midpoint(segment(P, p.F)); line l = rotate(90, M) * line(P, p.F); return line(P, projection(lt) * M); } /**/ line[] tangents(parabola p, point M) {/*Return the tangent of 'p' at 'M' (use the Wells method).*/ line[] ol; if(inside(p, M)) return ol; if(M @ p) { ol.push(tangent(p, angabscissa(p, M))); } else { point Mt = changecoordsys(coordsys(p), M); circle c = circle(Mt, p.F); line l = rotate(90, p.V) * line(p.V, p.F); point[] R = intersectionpoints(l, c); for (int i = 0; i < R.length; ++i) { ol.push(line(Mt, R[i])); } // An other method: http://www.du.edu/~jcalvert/math/parabola.htm // point[] R = intersectionpoints(p.directrix, c); // for (int i = 0; i < R.length; ++i) { // ol.push(bisector(segment(p.F, R[i]))); // } } return ol; } /**/ line tangent(hyperbola h, abscissa x) {/*Return the tangent of 'h' at 'point(p, x)'.*/ point M = point(h, x); line ol = bisector(line(M, h.F1), line(M, h.F2)); if(sameside(h.F1, h.F2, ol) || ol == line(h.F1, h.F2)) ol = rotate(90, M) * ol; return ol; } /**/ line[] tangents(hyperbola h, point M) {/*Return the tangent of 'h' at 'M'.*/ line[] ol; if(M @ h) { ol.push(tangent(h, angabscissa(h, M, fromCenter))); } else { coordsys cano = canonicalcartesiansystem(h); bqe bqe = changecoordsys(cano, equation(h)); real a = abs(1/(bqe.a[5] * bqe.a[0])), b = abs(1/(bqe.a[5] * bqe.a[2])); point Mp = changecoordsys(cano, M); real x0 = Mp.x, y0 = Mp.y; if(abs(x0) > epsgeo) { real c0 = a * y0^2/(b * x0)^2 - 1/b, c1 = 2 * a * y0/(b * x0^2), c2 = a/x0^2 - 1; real[] sol = quadraticroots(c0, c1, c2); for (real y:sol) { point tmp = changecoordsys(coordsys(h), point(cano, (a * (1 + y * y0/b)/x0, y))); ol.push(line(M, tmp)); } } else if(abs(y0) > epsgeo) { real y = -b/y0, x = sqrt(a * (1 + b/y0^2)); ol.push(line(M, changecoordsys(coordsys(h), point(cano, (x, y))))); ol.push(line(M, changecoordsys(coordsys(h), point(cano, (-x, y))))); }} return ol; } /**/ point[] intersectionpoints(conic co, arc a) {/*intersectionpoints(arc, circle) is also defined.*/ point[] op; point[] tp = intersectionpoints(co, (conic)a.el); for (int i = 0; i < tp.length; ++i) if(tp[i] @ a) op.push(tp[i]); return op; } point[] intersectionpoints(arc a, conic co) { return intersectionpoints(co, a); } /**/ point[] intersectionpoints(arc a1, arc a2) {/**/ point[] op; point[] tp = intersectionpoints(a1.el, a2.el); for (int i = 0; i < tp.length; ++i) if(tp[i] @ a1 && tp[i] @ a2) op.push(tp[i]); return op; } /**/ point[] intersectionpoints(line l, arc a) {/*intersectionpoints(arc, line) is also defined.*/ point[] op; point[] tp = intersectionpoints(a.el, l); for (int i = 0; i < tp.length; ++i) if(tp[i] @ a && tp[i] @ l) op.push(tp[i]); return op; } point[] intersectionpoints(arc a, line l) { return intersectionpoints(l, a); } /**/ point arcsubtendedcenter(point A, point B, real angle) {/*Return the center of the arc retuned by the 'arcsubtended' routine.*/ point OM; point[] P = standardizecoordsys(A, B); angle = angle%(sgnd(angle) * 180); line bis = bisector(P[0], P[1]); line AB = line(P[0], P[1]); return intersectionpoint(bis, rotate(90 - angle, A) * AB); } /**/ arc arcsubtended(point A, point B, real angle) {/*Return the arc circle from which the segment AB is saw with the angle 'angle'. If the point 'M' is on this arc, the oriented angle (MA, MB) is equal to 'angle'.*/ point[] P = standardizecoordsys(A, B); line AB = line(P[0], P[1]); angle = angle%(sgnd(angle) * 180); point C = arcsubtendedcenter(P[0], P[1], angle); real BC = degrees(B - C)%360; real AC = degrees(A - C)%360; return arc(circle(C, abs(B - C)), BC, AC, angle > 0 ? CCW : CW); } /**/ arc arccircle(point A, point M, point B) {/*Return the CCW arc circle 'AB' passing through 'M'.*/ circle tc = circle(A, M, B); real a = degrees(A - tc.C); real b = degrees(B - tc.C); real m = degrees(M - tc.C); arc oa = arc(tc, a, b); // TODO : use cross product to determine CWW or CW if (!(M @ oa)) { oa.direction = !oa.direction; } return oa; } /**/ arc arc(ellipse el, explicit abscissa x1, explicit abscissa x2, bool direction = CCW) {/*Return the arc from 'point(c, x1)' to 'point(c, x2)' in the direction 'direction'.*/ real a = degrees(point(el, x1) - el.C); real b = degrees(point(el, x2) - el.C); arc oa = arc(el, a - el.angle, b - el.angle, fromCenter, direction); return oa; } /**/ arc arc(ellipse el, point M, point N, bool direction = CCW) {/*Return the arc from 'M' to 'N' in the direction 'direction'. The points 'M' and 'N' must belong to the ellipse 'el'.*/ return arc(el, relabscissa(el, M), relabscissa(el, N), direction); } /**/ arc arccircle(point A, point B, real angle, bool direction = CCW) {/*Return the arc circle centered on A from B to rotate(angle, A) * B in the direction 'direction'.*/ point M = rotate(angle, A) * B; return arc(circle(A, abs(A - B)), B, M, direction); } /**/ arc arc(explicit arc a, abscissa x1, abscissa x2) {/*Return the arc from 'point(a, x1)' to 'point(a, x2)' traversed in the direction of the arc direction.*/ real a1 = angabscissa(a.el, point(a, x1), a.polarconicroutine).x; real a2 = angabscissa(a.el, point(a, x2), a.polarconicroutine).x; return arc(a.el, a1, a2, a.polarconicroutine, a.direction); } /**/ arc arc(explicit arc a, point M, point N) {/*Return the arc from 'M' to 'N'. The points 'M' and 'N' must belong to the arc 'a'.*/ return arc(a, relabscissa(a, M), relabscissa(a, N)); } /**/ arc inverse(real k, point A, segment s) {/*Return the inverse arc circle of 's' with respect to point A and inversion radius 'k'.*/ point Ap = inverse(k, A, s.A), Bp = inverse(k, A, s.B), M = inverse(k, A, midpoint(s)); return arccircle(Ap, M, Bp); } /**/ arc operator *(inversion i, segment s) {/*Provide inversion * segment.*/ return inverse(i.k, i.C, s); } /**/ path operator *(inversion i, triangle t) {/*Provide inversion * triangle.*/ return (path)(i * segment(t.AB))-- (path)(i * segment(t.BC))-- (path)(i * segment(t.CA))&cycle; } /**/ path compassmark(pair O, pair A, real position, real angle = 10) {/*Return an arc centered on O with the angle 'angle' so that the position of 'A' on this arc makes an angle 'position * angle'.*/ real a = degrees(A - O); real pa = (a - position * angle)%360, pb = (a - (position - 1) * angle)%360; real t1 = intersect(unitcircle, (0, 0)--2 * dir(pa))[0]; real t2 = intersect(unitcircle, (0, 0)--2 * dir(pb))[0]; int n = length(unitcircle); if(t1 >= t2) t1 -= n; return shift(O) * scale(abs(O - A)) * subpath(unitcircle, t1, t2); } /**/ line tangent(explicit arc a, abscissa x) {/*Return the tangent of 'a' at 'point(a, x)'.*/ abscissa ag = angabscissa(a, point(a, x)); return tangent(a.el, ag + a.angle1 + (a.el.e == 0 ? a.angle0 : 0)); } /**/ line tangent(explicit arc a, point M) {/*Return the tangent of 'a' at 'M'. The points 'M' must belong to the arc 'a'.*/ return tangent(a, angabscissa(a, M)); } // *=======================================================* // *.......Routines for compatibility with original geometry module........* path square(pair z1, pair z2) { pair v = z2 - z1; pair z3 = z2 + I * v; pair z4 = z3 - v; return z1--z2--z3--z4--cycle; } // Draw a perpendicular symbol at z aligned in the direction align // relative to the path z--z + dir. void perpendicular(picture pic = currentpicture, pair z, pair align, pair dir = E, real size = 0, pen p = currentpen, margin margin = NoMargin, filltype filltype = NoFill) { perpendicularmark(pic, (point) z, align, dir, size, p, margin, filltype); } // Draw a perpendicular symbol at z aligned in the direction align // relative to the path z--z + dir(g, 0) void perpendicular(picture pic = currentpicture, pair z, pair align, path g, real size = 0, pen p = currentpen, margin margin = NoMargin, filltype filltype = NoFill) { perpendicularmark(pic, (point) z, align, dir(g, 0), size, p, margin, filltype); } // Return an interior arc BAC of triangle ABC, given a radius r > 0. // If r < 0, return the corresponding exterior arc of radius |r|. path arc(explicit pair B, explicit pair A, explicit pair C, real r) { real BA = degrees(B - A); real CA = degrees(C - A); return arc(A, abs(r), BA, CA, (r < 0) ^ ((BA-CA) % 360 < 180) ? CW : CCW); } // *.......End of compatibility routines........* // *=======================================================* // *........................FOOTER.........................* // *=======================================================* ./asymptote-2.41/base/three.asy0000644000175000017500000025161413064427076016313 0ustar norbertnorbertprivate import math; if(inXasyMode) settings.render=0; if(prc0()) { if(!latex()) settings.prc=false; else { access embed; Embed=embed.embedplayer; } } // Useful lossy compression values. restricted real Zero=0; restricted real Low=0.0001; restricted real Medium=0.001; restricted real High=0.01; restricted int PRCsphere=0; // Renders slowly but produces smaller PRC files. restricted int NURBSsphere=1; // Renders fast but produces larger PRC files. struct render { // PRC parameters: real compression; // lossy compression parameter (0=no compression) real granularity; // PRC rendering granularity bool closed; // use one-sided rendering? bool tessellate; // use tessellated mesh to store straight patches? bool3 merge; // merge nodes before rendering, for faster but // lower quality PRC rendering (the value default means // merge opaque patches only). int sphere; // PRC sphere type (PRCsphere or NURBSsphere). // General parameters: real margin; // shrink amount for rendered openGL viewport, in bp. real tubegranularity; // granularity for rendering tubes bool labelfill; // fill subdivision cracks in unlighted labels bool partnames; // assign part name indices to compound objects bool defaultnames; // assign default names to unnamed objects static render defaultrender; void operator init(real compression=defaultrender.compression, real granularity=defaultrender.granularity, bool closed=defaultrender.closed, bool tessellate=defaultrender.tessellate, bool3 merge=defaultrender.merge, int sphere=defaultrender.sphere, real margin=defaultrender.margin, real tubegranularity=defaultrender.tubegranularity, bool labelfill=defaultrender.labelfill, bool partnames=defaultrender.partnames, bool defaultnames=defaultrender.defaultnames) { this.compression=compression; this.granularity=granularity; this.closed=closed; this.tessellate=tessellate; this.merge=merge; this.sphere=sphere; this.margin=margin; this.tubegranularity=tubegranularity; this.labelfill=labelfill; this.partnames=partnames; this.defaultnames=defaultnames; } } render operator init() {return render();} render defaultrender=render.defaultrender=new render; defaultrender.compression=High; defaultrender.granularity=Medium; defaultrender.closed=false; defaultrender.tessellate=false; defaultrender.merge=false; defaultrender.margin=0.02; defaultrender.tubegranularity=0.001; defaultrender.sphere=NURBSsphere; defaultrender.labelfill=true; defaultrender.partnames=false; defaultrender.defaultnames=true; real defaultshininess=0.25; real angleprecision=1e-5; // Precision for centering perspective projections. int maxangleiterations=25; string defaultembed3Doptions="3Dmenu"; string defaultembed3Dscript; real defaulteyetoview=63mm/1000mm; string partname(int i, render render=defaultrender) { return render.partnames ? string(i+1) : ""; } triple O=(0,0,0); triple X=(1,0,0), Y=(0,1,0), Z=(0,0,1); // A translation in 3D space. transform3 shift(triple v) { transform3 t=identity(4); t[0][3]=v.x; t[1][3]=v.y; t[2][3]=v.z; return t; } // Avoid two parentheses. transform3 shift(real x, real y, real z) { return shift((x,y,z)); } transform3 shift(transform3 t) { transform3 T=identity(4); T[0][3]=t[0][3]; T[1][3]=t[1][3]; T[2][3]=t[2][3]; return T; } // A 3D scaling in the x direction. transform3 xscale3(real x) { transform3 t=identity(4); t[0][0]=x; return t; } // A 3D scaling in the y direction. transform3 yscale3(real y) { transform3 t=identity(4); t[1][1]=y; return t; } // A 3D scaling in the z direction. transform3 zscale3(real z) { transform3 t=identity(4); t[2][2]=z; return t; } // A 3D scaling by s in the v direction. transform3 scale(triple v, real s) { v=unit(v); s -= 1; return new real[][] { {1+s*v.x^2, s*v.x*v.y, s*v.x*v.z, 0}, {s*v.x*v.y, 1+s*v.y^2, s*v.y*v.z, 0}, {s*v.x*v.z, s*v.y*v.z, 1+s*v.z^2, 0}, {0, 0, 0, 1}}; } // A transformation representing rotation by an angle in degrees about // an axis v through the origin (in the right-handed direction). transform3 rotate(real angle, triple v) { if(v == O) abort("cannot rotate about the zero vector"); v=unit(v); real x=v.x, y=v.y, z=v.z; real s=Sin(angle), c=Cos(angle), t=1-c; return new real[][] { {t*x^2+c, t*x*y-s*z, t*x*z+s*y, 0}, {t*x*y+s*z, t*y^2+c, t*y*z-s*x, 0}, {t*x*z-s*y, t*y*z+s*x, t*z^2+c, 0}, {0, 0, 0, 1}}; } // A transformation representing rotation by an angle in degrees about // the line u--v (in the right-handed direction). transform3 rotate(real angle, triple u, triple v) { return shift(u)*rotate(angle,v-u)*shift(-u); } // Reflects about the plane through u, v, and w. transform3 reflect(triple u, triple v, triple w) { triple n=unit(cross(v-u,w-u)); if(n == O) abort("points determining reflection plane cannot be colinear"); return new real[][] { {1-2*n.x^2, -2*n.x*n.y, -2*n.x*n.z, u.x}, {-2*n.x*n.y, 1-2*n.y^2, -2*n.y*n.z, u.y}, {-2*n.x*n.z, -2*n.y*n.z, 1-2*n.z^2, u.z}, {0, 0, 0, 1} }*shift(-u); } // Project u onto v. triple project(triple u, triple v) { v=unit(v); return dot(u,v)*v; } // Return a unit vector perpendicular to a given unit vector v. triple perp(triple v) { triple u=cross(v,Y); if(abs(u) > sqrtEpsilon) return unit(u); u=cross(v,Z); return (abs(u) > sqrtEpsilon) ? unit(u) : X; } // Return the transformation corresponding to moving the camera from the target // (looking in the negative z direction) to the point 'eye' (looking at target, // orienting the camera so that direction 'up' points upwards. // Since, in actuality, we are transforming the points instead of the camera, // we calculate the inverse matrix. // Based on the gluLookAt implementation in the OpenGL manual. transform3 look(triple eye, triple up=Z, triple target=O) { triple f=unit(target-eye); if(f == O) f=-Z; // The eye is already at the origin: look down. triple s=cross(f,up); // If the eye is pointing either directly up or down, there is no // preferred "up" direction. Pick one arbitrarily. s=s != O ? unit(s) : perp(f); triple u=cross(s,f); transform3 M={{ s.x, s.y, s.z, 0}, { u.x, u.y, u.z, 0}, {-f.x, -f.y, -f.z, 0}, { 0, 0, 0, 1}}; return M*shift(-eye); } // Return a matrix to do perspective distortion based on a triple v. transform3 distort(triple v) { transform3 t=identity(4); real d=length(v); if(d == 0) return t; t[3][2]=-1/d; t[3][3]=0; return t; } projection operator * (transform3 t, projection P) { projection P=P.copy(); if(!P.absolute) { P.camera=t*P.camera; triple target=P.target; P.target=t*P.target; if(P.infinity) P.normal=t*(target+P.normal)-P.target; else P.normal=P.vector(); P.calculate(); } return P; } // With this, save() and restore() in plain also save and restore the // currentprojection. addSaveFunction(new restoreThunk() { projection P=currentprojection.copy(); return new void() { currentprojection=P; }; }); pair project(triple v, projection P=currentprojection) { return project(v,P.t); } pair dir(triple v, triple dir, projection P) { return unit(project(v+0.5dir,P)-project(v-0.5*dir,P)); } // Uses the homogenous coordinate to perform perspective distortion. // When combined with a projection to the XY plane, this effectively maps // points in three space to a plane through target and // perpendicular to the vector camera-target. projection perspective(triple camera, triple up=Z, triple target=O, real zoom=1, real angle=0, pair viewportshift=0, bool showtarget=true, bool autoadjust=true, bool center=autoadjust) { if(camera == target) abort("camera cannot be at target"); return projection(camera,up,target,zoom,angle,viewportshift, showtarget,autoadjust,center, new transformation(triple camera, triple up, triple target) {return transformation(look(camera,up,target), distort(camera-target));}); } projection perspective(real x, real y, real z, triple up=Z, triple target=O, real zoom=1, real angle=0, pair viewportshift=0, bool showtarget=true, bool autoadjust=true, bool center=autoadjust) { return perspective((x,y,z),up,target,zoom,angle,viewportshift,showtarget, autoadjust,center); } projection orthographic(triple camera, triple up=Z, triple target=O, real zoom=1, pair viewportshift=0, bool showtarget=true, bool center=false) { return projection(camera,up,target,zoom,viewportshift,showtarget, center=center,new transformation(triple camera, triple up, triple target) { return transformation(look(camera,up,target));}); } projection orthographic(real x, real y, real z, triple up=Z, triple target=O, real zoom=1, pair viewportshift=0, bool showtarget=true, bool center=false) { return orthographic((x,y,z),up,target,zoom,viewportshift,showtarget, center=center); } // Compute camera position with x axis below the horizontal at angle alpha, // y axis below the horizontal at angle beta, and z axis up. triple camera(real alpha, real beta) { real denom=Tan(alpha+beta); real Tanalpha=Tan(alpha); real Tanbeta=Tan(beta); return (sqrt(Tanalpha/denom),sqrt(Tanbeta/denom),sqrt(Tanalpha*Tanbeta)); } projection oblique(real angle=45) { transform3 t=identity(4); real c2=Cos(angle)^2; real s2=1-c2; t[0][2]=-c2; t[1][2]=-s2; t[2][2]=1; t[2][3]=-1; return projection((c2,s2,1),up=Y,normal=(0,0,1), new transformation(triple,triple,triple) { return transformation(t);}); } projection obliqueZ(real angle=45) {return oblique(angle);} projection obliqueX(real angle=45) { transform3 t=identity(4); real c2=Cos(angle)^2; real s2=1-c2; t[0][0]=-c2; t[1][0]=-s2; t[1][1]=0; t[0][1]=1; t[1][2]=1; t[2][2]=0; t[2][0]=1; t[2][3]=-1; return projection((1,c2,s2),normal=(1,0,0), new transformation(triple,triple,triple) { return transformation(t);}); } projection obliqueY(real angle=45) { transform3 t=identity(4); real c2=Cos(angle)^2; real s2=1-c2; t[0][1]=c2; t[1][1]=s2; t[1][2]=1; t[2][1]=-1; t[2][2]=0; t[2][3]=-1; return projection((c2,-1,s2),normal=(0,-1,0), new transformation(triple,triple,triple) { return transformation(t);}); } projection oblique=oblique(); projection obliqueX=obliqueX(), obliqueY=obliqueY(), obliqueZ=obliqueZ(); projection LeftView=orthographic(-X,showtarget=true); projection RightView=orthographic(X,showtarget=true); projection FrontView=orthographic(-Y,showtarget=true); projection BackView=orthographic(Y,showtarget=true); projection BottomView=orthographic(-Z,up=-Y,showtarget=true); projection TopView=orthographic(Z,up=Y,showtarget=true); currentprojection=perspective(5,4,2); projection projection() { projection P; real[] a=_projection(); if(a.length == 0 || a[10] == 0.0) return currentprojection; int k=0; return a[0] == 1 ? orthographic((a[++k],a[++k],a[++k]),(a[++k],a[++k],a[++k]), (a[++k],a[++k],a[++k]),a[++k],(a[k += 2],a[++k])) : perspective((a[++k],a[++k],a[++k]),(a[++k],a[++k],a[++k]), (a[++k],a[++k],a[++k]),a[++k],a[++k],(a[++k],a[++k])); } // Map pair z to a triple by inverting the projection P onto the // plane perpendicular to normal and passing through point. triple invert(pair z, triple normal, triple point, projection P=currentprojection) { transform3 t=P.t; real[][] A={{t[0][0]-z.x*t[3][0],t[0][1]-z.x*t[3][1],t[0][2]-z.x*t[3][2]}, {t[1][0]-z.y*t[3][0],t[1][1]-z.y*t[3][1],t[1][2]-z.y*t[3][2]}, {normal.x,normal.y,normal.z}}; real[] b={z.x*t[3][3]-t[0][3],z.y*t[3][3]-t[1][3],dot(normal,point)}; real[] x=solve(A,b,warn=false); return x.length > 0 ? (x[0],x[1],x[2]) : P.camera; } // Map pair to a triple on the projection plane. triple invert(pair z, projection P=currentprojection) { return invert(z,P.normal,P.target,P); } // Map pair dir to a triple direction at point v on the projection plane. triple invert(pair dir, triple v, projection P=currentprojection) { return invert(project(v,P)+dir,P.normal,v,P)-v; } pair xypart(triple v) { return (v.x,v.y); } struct control { triple post,pre; bool active=false; bool straight=true; void operator init(triple post, triple pre, bool straight=false) { this.post=post; this.pre=pre; active=true; this.straight=straight; } } control nocontrol; control operator * (transform3 t, control c) { control C; C.post=t*c.post; C.pre=t*c.pre; C.active=c.active; C.straight=c.straight; return C; } void write(file file, control c) { write(file,".. controls "); write(file,c.post); write(file," and "); write(file,c.pre); } struct Tension { real out,in; bool atLeast; bool active; void operator init(real out=1, real in=1, bool atLeast=false, bool active=true) { real check(real val) { if(val < 0.75) abort("tension cannot be less than 3/4"); return val; } this.out=check(out); this.in=check(in); this.atLeast=atLeast; this.active=active; } } Tension operator init() { return Tension(); } Tension noTension; noTension.active=false; void write(file file, Tension t) { write(file,"..tension "); if(t.atLeast) write(file,"atleast "); write(file,t.out); write(file," and "); write(file,t.in); } struct dir { triple dir; real gamma=1; // endpoint curl bool Curl; // curl specified bool active() { return dir != O || Curl; } void init(triple v) { this.dir=v; } void init(real gamma) { if(gamma < 0) abort("curl cannot be less than 0"); this.gamma=gamma; this.Curl=true; } void init(dir d) { dir=d.dir; gamma=d.gamma; Curl=d.Curl; } void default(triple v) { if(!active()) init(v); } void default(dir d) { if(!active()) init(d); } dir copy() { dir d=new dir; d.init(this); return d; } } void write(file file, dir d) { if(d.dir != O) { write(file,"{"); write(file,unit(d.dir)); write(file,"}"); } else if(d.Curl) { write(file,"{curl "); write(file,d.gamma); write(file,"}"); } } dir operator * (transform3 t, dir d) { dir D=d.copy(); D.init(unit(shiftless(t)*d.dir)); return D; } void checkEmpty(int n) { if(n == 0) abort("nullpath3 has no points"); } int adjustedIndex(int i, int n, bool cycles) { checkEmpty(n); if(cycles) return i % n; else if(i < 0) return 0; else if(i >= n) return n-1; else return i; } struct flatguide3 { triple[] nodes; bool[] cyclic; // true if node is really a cycle control[] control; // control points for segment starting at node Tension[] Tension; // Tension parameters for segment starting at node dir[] in,out; // in and out directions for segment starting at node bool cyclic() {int n=cyclic.length; return n > 0 ? cyclic[n-1] : false;} bool precyclic() {int i=find(cyclic); return i >= 0 && i < cyclic.length-1;} int size() { return cyclic() ? nodes.length-1 : nodes.length; } void node(triple v, bool b=false) { nodes.push(v); control.push(nocontrol); Tension.push(noTension); in.push(new dir); out.push(new dir); cyclic.push(b); } void control(triple post, triple pre) { if(control.length > 0) { control c=control(post,pre,false); control[control.length-1]=c; } } void Tension(real out, real in, bool atLeast) { if(Tension.length > 0) Tension[Tension.length-1]=Tension(out,in,atLeast,true); } void in(triple v) { if(in.length > 0) { in[in.length-1].init(v); } } void out(triple v) { if(out.length > 0) { out[out.length-1].init(v); } } void in(real gamma) { if(in.length > 0) { in[in.length-1].init(gamma); } } void out(real gamma) { if(out.length > 0) { out[out.length-1].init(gamma); } } void cycleToken() { if(nodes.length > 0) node(nodes[0],true); } // Return true if outgoing direction at node i is known. bool solved(int i) { return out[i].active() || control[i].active; } } void write(file file, string s="", explicit flatguide3 x, suffix suffix=none) { write(file,s); if(x.size() == 0) write(file,""); else for(int i=0; i < x.nodes.length; ++i) { if(i > 0) write(file,endl); if(x.cyclic[i]) write(file,"cycle"); else write(file,x.nodes[i]); if(i < x.nodes.length-1) { // Explicit control points trump other specifiers if(x.control[i].active) write(file,x.control[i]); else { write(file,x.out[i]); if(x.Tension[i].active) write(file,x.Tension[i]); } write(file,".."); if(!x.control[i].active) write(file,x.in[i]); } } write(file,suffix); } void write(string s="", flatguide3 x, suffix suffix=endl) { write(stdout,s,x,suffix); } // A guide3 is most easily represented as something that modifies a flatguide3. typedef void guide3(flatguide3); restricted void nullpath3(flatguide3) {}; guide3 operator init() {return nullpath3;} guide3 operator cast(triple v) { return new void(flatguide3 f) { f.node(v); }; } guide3 operator cast(cycleToken) { return new void(flatguide3 f) { f.cycleToken(); }; } guide3 operator controls(triple post, triple pre) { return new void(flatguide3 f) { f.control(post,pre); }; }; guide3 operator controls(triple v) { return operator controls(v,v); } guide3 operator cast(tensionSpecifier t) { return new void(flatguide3 f) { f.Tension(t.out, t.in, t.atLeast); }; } guide3 operator cast(curlSpecifier spec) { return new void(flatguide3 f) { if(spec.side == JOIN_OUT) f.out(spec.value); else if(spec.side == JOIN_IN) f.in(spec.value); else abort("invalid curl specifier"); }; } guide3 operator spec(triple v, int side) { return new void(flatguide3 f) { if(side == JOIN_OUT) f.out(v); else if(side == JOIN_IN) f.in(v); else abort("invalid direction specifier"); }; } guide3 operator -- (... guide3[] g) { return new void(flatguide3 f) { if(g.length > 0) { for(int i=0; i < g.length-1; ++i) { g[i](f); f.out(1); f.in(1); } g[g.length-1](f); } }; } guide3 operator .. (... guide3[] g) { return new void(flatguide3 f) { for(int i=0; i < g.length; ++i) g[i](f); }; } typedef guide3 interpolate3(... guide3[]); interpolate3 join3(tensionSpecifier t) { return new guide3(... guide3[] a) { if(a.length == 0) return nullpath3; guide3 g=a[0]; for(int i=1; i < a.length; ++i) g=g..t..a[i]; return g; }; } interpolate3 operator ::=join3(operator tension(1,true)); interpolate3 operator ---=join3(operator tension(infinity,true)); flatguide3 operator cast(guide3 g) { flatguide3 f; g(f); return f; } flatguide3[] operator cast(guide3[] g) { flatguide3[] p=new flatguide3[g.length]; for(int i=0; i < g.length; ++i) { flatguide3 f; g[i](f); p[i]=f; } return p; } // A version of asin that tolerates numerical imprecision real asin1(real x) { return asin(min(max(x,-1),1)); } // A version of acos that tolerates numerical imprecision real acos1(real x) { return acos(min(max(x,-1),1)); } struct Controls { triple c0,c1; // 3D extension of John Hobby's control point formula // (cf. The MetaFont Book, page 131), // as described in John C. Bowman and A. Hammerlindl, // TUGBOAT: The Communications of the TeX Users Group 29:2 (2008). void operator init(triple v0, triple v1, triple d0, triple d1, real tout, real tin, bool atLeast) { triple v=v1-v0; triple u=unit(v); real L=length(v); d0=unit(d0); d1=unit(d1); real theta=acos1(dot(d0,u)); real phi=acos1(dot(d1,u)); if(dot(cross(d0,v),cross(v,d1)) < 0) phi=-phi; c0=v0+d0*L*relativedistance(theta,phi,tout,atLeast); c1=v1-d1*L*relativedistance(phi,theta,tin,atLeast); } } private triple cross(triple d0, triple d1, triple reference) { triple normal=cross(d0,d1); return normal == O ? reference : normal; } private triple dir(real theta, triple d0, triple d1, triple reference) { triple normal=cross(d0,d1,reference); if(normal == O) return d1; return rotate(degrees(theta),dot(normal,reference) >= 0 ? normal : -normal)* d1; } private real angle(triple d0, triple d1, triple reference) { real theta=acos1(dot(unit(d0),unit(d1))); return dot(cross(d0,d1,reference),reference) >= 0 ? theta : -theta; } // 3D extension of John Hobby's angle formula (The MetaFont Book, page 131). // Notational differences: here psi[i] is the turning angle at z[i+1], // beta[i] is the tension for segment i, and in[i] is the incoming // direction for segment i (where segment i begins at node i). real[] theta(triple[] v, real[] alpha, real[] beta, triple dir0, triple dirn, real g0, real gn, triple reference) { real[] a,b,c,f,l,psi; int n=alpha.length; bool cyclic=v.cyclic; for(int i=0; i < n; ++i) l[i]=1/length(v[i+1]-v[i]); int i0,in; if(cyclic) {i0=0; in=n;} else {i0=1; in=n-1;} for(int i=0; i < in; ++i) psi[i]=angle(v[i+1]-v[i],v[i+2]-v[i+1],reference); if(cyclic) { l.cyclic=true; psi.cyclic=true; } else { psi[n-1]=0; if(dir0 == O) { real a0=alpha[0]; real b0=beta[0]; real chi=g0*(b0/a0)^2; a[0]=0; b[0]=3a0-a0/b0+chi; real C=chi*(3a0-1)+a0/b0; c[0]=C; f[0]=-C*psi[0]; } else { a[0]=c[0]=0; b[0]=1; f[0]=angle(v[1]-v[0],dir0,reference); } if(dirn == O) { real an=alpha[n-1]; real bn=beta[n-1]; real chi=gn*(an/bn)^2; a[n]=chi*(3bn-1)+bn/an; b[n]=3bn-bn/an+chi; c[n]=f[n]=0; } else { a[n]=c[n]=0; b[n]=1; f[n]=angle(v[n]-v[n-1],dirn,reference); } } for(int i=i0; i < n; ++i) { real in=beta[i-1]^2*l[i-1]; real A=in/alpha[i-1]; a[i]=A; real B=3*in-A; real out=alpha[i]^2*l[i]; real C=out/beta[i]; b[i]=B+3*out-C; c[i]=C; f[i]=-B*psi[i-1]-C*psi[i]; } return tridiagonal(a,b,c,f); } triple reference(triple[] v, int n, triple d0, triple d1) { triple[] V=sequence(new triple(int i) { return cross(v[i+1]-v[i],v[i+2]-v[i+1]); },n-1); if(n > 0) { V.push(cross(d0,v[1]-v[0])); V.push(cross(v[n]-v[n-1],d1)); } triple max=V[0]; real M=abs(max); for(int i=1; i < V.length; ++i) { triple vi=V[i]; real a=abs(vi); if(a > M) { M=a; max=vi; } } triple reference; for(int i=0; i < V.length; ++i) { triple u=unit(V[i]); reference += dot(u,max) < 0 ? -u : u; } return reference; } // Fill in missing directions for n cyclic nodes. void aim(flatguide3 g, int N) { bool cyclic=true; int start=0, end=0; // If the cycle contains one or more direction specifiers, break the loop. for(int k=0; k < N; ++k) if(g.solved(k)) {cyclic=false; end=k; break;} for(int k=N-1; k >= 0; --k) if(g.solved(k)) {cyclic=false; start=k; break;} while(start < N && g.control[start].active) ++start; int n=N-(start-end); if(n <= 1 || (cyclic && n <= 2)) return; triple[] v=new triple[cyclic ? n : n+1]; real[] alpha=new real[n]; real[] beta=new real[n]; for(int k=0; k < n; ++k) { int K=(start+k) % N; v[k]=g.nodes[K]; alpha[k]=g.Tension[K].out; beta[k]=g.Tension[K].in; } if(cyclic) { v.cyclic=true; alpha.cyclic=true; beta.cyclic=true; } else v[n]=g.nodes[(start+n) % N]; int final=(end-1) % N; triple d0=g.out[start].dir; triple d1=g.in[final].dir; triple reference=reference(v,n,d0,d1); real[] theta=theta(v,alpha,beta,d0,d1,g.out[start].gamma,g.in[final].gamma, reference); v.cyclic=true; theta.cyclic=true; for(int k=1; k < (cyclic ? n+1 : n); ++k) { triple w=dir(theta[k],v[k]-v[k-1],v[k+1]-v[k],reference); g.in[(start+k-1) % N].init(w); g.out[(start+k) % N].init(w); } if(g.out[start].dir == O) g.out[start].init(dir(theta[0],v[0]-g.nodes[(start-1) % N],v[1]-v[0], reference)); if(g.in[final].dir == O) g.in[final].init(dir(theta[n],v[n-1]-v[n-2],v[n]-v[n-1],reference)); } // Fill in missing directions for the sequence of nodes i...n. void aim(flatguide3 g, int i, int n) { int j=n-i; if(j > 1 || g.out[i].dir != O || g.in[i].dir != O) { triple[] v=new triple[j+1]; real[] alpha=new real[j]; real[] beta=new real[j]; for(int k=0; k < j; ++k) { v[k]=g.nodes[i+k]; alpha[k]=g.Tension[i+k].out; beta[k]=g.Tension[i+k].in; } v[j]=g.nodes[n]; triple d0=g.out[i].dir; triple d1=g.in[n-1].dir; triple reference=reference(v,j,d0,d1); real[] theta=theta(v,alpha,beta,d0,d1,g.out[i].gamma,g.in[n-1].gamma, reference); for(int k=1; k < j; ++k) { triple w=dir(theta[k],v[k]-v[k-1],v[k+1]-v[k],reference); g.in[i+k-1].init(w); g.out[i+k].init(w); } if(g.out[i].dir == O) { triple w=dir(theta[0],g.in[i].dir,v[1]-v[0],reference); if(i > 0) g.in[i-1].init(w); g.out[i].init(w); } if(g.in[n-1].dir == O) { triple w=dir(theta[j],g.out[n-1].dir,v[j]-v[j-1],reference); g.in[n-1].init(w); g.out[n].init(w); } } } private real Fuzz=10*realEpsilon; triple XYplane(pair z) {return (z.x,z.y,0);} triple YZplane(pair z) {return (0,z.x,z.y);} triple ZXplane(pair z) {return (z.y,0,z.x);} bool cyclic(guide3 g) {flatguide3 f; g(f); return f.cyclic();} int size(guide3 g) {flatguide3 f; g(f); return f.size();} int length(guide3 g) {flatguide3 f; g(f); return f.nodes.length-1;} triple dir(path3 p) { return dir(p,length(p)); } triple dir(path3 p, path3 h) { return 0.5*(dir(p)+dir(h)); } // return the point on path3 p at arclength L triple arcpoint(path3 p, real L) { return point(p,arctime(p,L)); } // return the direction on path3 p at arclength L triple arcdir(path3 p, real L) { return dir(p,arctime(p,L)); } // return the time on path3 p at the relative fraction l of its arclength real reltime(path3 p, real l) { return arctime(p,l*arclength(p)); } // return the point on path3 p at the relative fraction l of its arclength triple relpoint(path3 p, real l) { return point(p,reltime(p,l)); } // return the direction of path3 p at the relative fraction l of its arclength triple reldir(path3 p, real l) { return dir(p,reltime(p,l)); } // return the initial point of path3 p triple beginpoint(path3 p) { return point(p,0); } // return the point on path3 p at half of its arclength triple midpoint(path3 p) { return relpoint(p,0.5); } // return the final point of path3 p triple endpoint(path3 p) { return point(p,length(p)); } path3 path3(triple v) { triple[] point={v}; return path3(point,point,point,new bool[] {false},false); } path3 path3(path p, triple plane(pair)=XYplane) { int n=size(p); return path3(sequence(new triple(int i) {return plane(precontrol(p,i));},n), sequence(new triple(int i) {return plane(point(p,i));},n), sequence(new triple(int i) {return plane(postcontrol(p,i));},n), sequence(new bool(int i) {return straight(p,i);},n), cyclic(p)); } path3[] path3(explicit path[] g, triple plane(pair)=XYplane) { return sequence(new path3(int i) {return path3(g[i],plane);},g.length); } path3 invert(path p, triple normal, triple point, projection P=currentprojection) { return path3(p,new triple(pair z) {return invert(z,normal,point,P);}); } path3 invert(path p, triple point, projection P=currentprojection) { return path3(p,new triple(pair z) {return invert(z,P.normal,point,P);}); } path3 invert(path p, projection P=currentprojection) { return path3(p,new triple(pair z) {return invert(z,P.normal,P.target,P);}); } // Construct a path from a path3 by applying P to each control point. path path(path3 p, pair P(triple)=xypart) { int n=length(p); if(n < 0) return nullpath; guide g=P(point(p,0)); if(n == 0) return g; for(int i=1; i < n; ++i) g=straight(p,i-1) ? g--P(point(p,i)) : g..controls P(postcontrol(p,i-1)) and P(precontrol(p,i))..P(point(p,i)); if(straight(p,n-1)) return cyclic(p) ? g--cycle : g--P(point(p,n)); pair post=P(postcontrol(p,n-1)); pair pre=P(precontrol(p,n)); return cyclic(p) ? g..controls post and pre..cycle : g..controls post and pre..P(point(p,n)); } void write(file file, string s="", explicit path3 x, suffix suffix=none) { write(file,s); int n=length(x); if(n < 0) write(""); else { for(int i=0; i < n; ++i) { write(file,point(x,i)); if(i < length(x)) { if(straight(x,i)) write(file,"--"); else { write(file,".. controls "); write(file,postcontrol(x,i)); write(file," and "); write(file,precontrol(x,i+1),newl); write(file," .."); } } } if(cyclic(x)) write(file,"cycle",suffix); else write(file,point(x,n),suffix); } } void write(string s="", explicit path3 x, suffix suffix=endl) { write(stdout,s,x,suffix); } void write(file file, string s="", explicit path3[] x, suffix suffix=none) { write(file,s); if(x.length > 0) write(file,x[0]); for(int i=1; i < x.length; ++i) { write(file,endl); write(file," ^^"); write(file,x[i]); } write(file,suffix); } void write(string s="", explicit path3[] x, suffix suffix=endl) { write(stdout,s,x,suffix); } path3 solve(flatguide3 g) { int n=g.nodes.length-1; // If duplicate points occur consecutively, add dummy controls (if absent). for(int i=0; i < n; ++i) { if(g.nodes[i] == g.nodes[i+1] && !g.control[i].active) g.control[i]=control(g.nodes[i],g.nodes[i],straight=true); } // Fill in empty direction specifiers inherited from explicit control points. for(int i=0; i < n; ++i) { if(g.control[i].active) { g.out[i].init(g.control[i].post-g.nodes[i]); g.in[i].init(g.nodes[i+1]-g.control[i].pre); } } // Propagate directions across nodes. for(int i=0; i < n; ++i) { int next=g.cyclic[i+1] ? 0 : i+1; if(g.out[next].active()) g.in[i].default(g.out[next]); if(g.in[i].active()) { g.out[next].default(g.in[i]); g.out[i+1].default(g.in[i]); } } // Compute missing 3D directions. // First, resolve cycles int i=find(g.cyclic); if(i > 0) { aim(g,i); // All other cycles can now be reduced to sequences. triple v=g.out[0].dir; for(int j=i; j <= n; ++j) { if(g.cyclic[j]) { g.in[j-1].default(v); g.out[j].default(v); if(g.nodes[j-1] == g.nodes[j] && !g.control[j-1].active) g.control[j-1]=control(g.nodes[j-1],g.nodes[j-1]); } } } // Next, resolve sequences. int i=0; int start=0; while(i < n) { // Look for a missing outgoing direction. while(i <= n && g.solved(i)) {start=i; ++i;} if(i > n) break; // Look for the end of the sequence. while(i < n && !g.solved(i)) ++i; while(start < i && g.control[start].active) ++start; if(start < i) aim(g,start,i); } // Compute missing 3D control points. for(int i=0; i < n; ++i) { int next=g.cyclic[i+1] ? 0 : i+1; if(!g.control[i].active) { control c; if((g.out[i].Curl && g.in[i].Curl) || (g.out[i].dir == O && g.in[i].dir == O)) { // fill in straight control points for path3 functions triple delta=(g.nodes[i+1]-g.nodes[i])/3; c=control(g.nodes[i]+delta,g.nodes[i+1]-delta,straight=true); } else { Controls C=Controls(g.nodes[i],g.nodes[next],g.out[i].dir,g.in[i].dir, g.Tension[i].out,g.Tension[i].in, g.Tension[i].atLeast); c=control(C.c0,C.c1); } g.control[i]=c; } } // Convert to Knuth's format (control points stored with nodes) int n=g.nodes.length; bool cyclic; if(n > 0) { cyclic=g.cyclic[n-1]; if(cyclic) --n; } triple[] pre=new triple[n]; triple[] point=new triple[n]; triple[] post=new triple[n]; bool[] straight=new bool[n]; if(n > 0) { for(int i=0; i < n-1; ++i) { point[i]=g.nodes[i]; post[i]=g.control[i].post; pre[i+1]=g.control[i].pre; straight[i]=g.control[i].straight; } point[n-1]=g.nodes[n-1]; if(cyclic) { pre[0]=g.control[n-1].pre; post[n-1]=g.control[n-1].post; straight[n-1]=g.control[n-1].straight; } else { pre[0]=point[0]; post[n-1]=point[n-1]; straight[n-1]=false; } } return path3(pre,point,post,straight,cyclic); } path nurb(path3 p, projection P, int ninterpolate=P.ninterpolate) { triple f=P.camera; triple u=unit(P.normal); transform3 t=P.t; path nurb(triple v0, triple v1, triple v2, triple v3) { return nurb(project(v0,t),project(v1,t),project(v2,t),project(v3,t), dot(u,f-v0),dot(u,f-v1),dot(u,f-v2),dot(u,f-v3),ninterpolate); } path g; if(straight(p,0)) g=project(point(p,0),t); int last=length(p); for(int i=0; i < last; ++i) { if(straight(p,i)) g=g--project(point(p,i+1),t); else g=g&nurb(point(p,i),postcontrol(p,i),precontrol(p,i+1),point(p,i+1)); } int n=length(g); if(cyclic(p)) g=g&cycle; return g; } path project(path3 p, projection P=currentprojection, int ninterpolate=P.ninterpolate) { guide g; int last=length(p); if(last < 0) return g; transform3 t=P.t; if(ninterpolate == 1 || piecewisestraight(p)) { g=project(point(p,0),t); // Construct the path. int stop=cyclic(p) ? last-1 : last; for(int i=0; i < stop; ++i) { if(straight(p,i)) g=g--project(point(p,i+1),t); else { g=g..controls project(postcontrol(p,i),t) and project(precontrol(p,i+1),t)..project(point(p,i+1),t); } } } else return nurb(p,P); if(cyclic(p)) g=straight(p,last-1) ? g--cycle : g..controls project(postcontrol(p,last-1),t) and project(precontrol(p,last),t)..cycle; return g; } pair[] project(triple[] v, projection P=currentprojection) { return sequence(new pair(int i) {return project(v[i],P.t);},v.length); } path[] project(explicit path3[] g, projection P=currentprojection) { return sequence(new path(int i) {return project(g[i],P);},g.length); } guide3 operator cast(path3 p) { int last=length(p); bool cyclic=cyclic(p); int stop=cyclic ? last-1 : last; return new void(flatguide3 f) { if(last >= 0) { f.node(point(p,0)); for(int i=0; i < stop; ++i) { if(straight(p,i)) { f.out(1); f.in(1); } else f.control(postcontrol(p,i),precontrol(p,i+1)); f.node(point(p,i+1)); } if(cyclic) { if(straight(p,stop)) { f.out(1); f.in(1); } else f.control(postcontrol(p,stop),precontrol(p,last)); f.cycleToken(); } } }; } // Return a unit normal vector to a planar path p (or O if the path is // nonplanar). triple normal(path3 p) { triple normal; real fuzz=sqrtEpsilon*abs(max(p)-min(p)); real absnormal; real theta; bool Cross(triple a, triple b) { if(abs(a) >= fuzz && abs(b) >= fuzz) { triple n=cross(unit(a),unit(b)); real absn=abs(n); if(absn < sqrtEpsilon) return false; n=unit(n); if(absnormal > 0 && abs(normal-n) > sqrtEpsilon && abs(normal+n) > sqrtEpsilon) return true; else { int sign=dot(n,normal) >= 0 ? 1 : -1; theta += sign*asin1(absn); if(absn > absnormal) { absnormal=absn; normal=n; theta=sign*theta; } } } return false; } int L=length(p); if(L <= 0) return O; triple zi=point(p,0); triple v0=zi-precontrol(p,0); for(int i=0; i < L; ++i) { triple c0=postcontrol(p,i); triple c1=precontrol(p,i+1); triple zp=point(p,i+1); triple v1=c0-zi; triple v2=c1-c0; triple v3=zp-c1; if(Cross(v0,v1) || Cross(v1,v2) || Cross(v2,v3)) return O; v0=v3; zi=zp; } return theta >= 0 ? normal : -normal; } // Return a unit normal vector to a polygon with vertices in p. triple normal(triple[] p) { triple normal; real fuzz=sqrtEpsilon*abs(maxbound(p)-minbound(p)); real absnormal; real theta; bool Cross(triple a, triple b) { if(abs(a) >= fuzz && abs(b) >= fuzz) { triple n=cross(unit(a),unit(b)); real absn=abs(n); n=unit(n); if(absnormal > 0 && absn > sqrtEpsilon && abs(normal-n) > sqrtEpsilon && abs(normal+n) > sqrtEpsilon) return true; else { int sign=dot(n,normal) >= 0 ? 1 : -1; theta += sign*asin1(absn); if(absn > absnormal) { absnormal=absn; normal=n; theta=sign*theta; } } } return false; } if(p.length <= 0) return O; triple zi=p[0]; triple v0=zi-p[p.length-1]; for(int i=0; i < p.length-1; ++i) { triple zp=p[i+1]; triple v1=zp-zi; if(Cross(v0,v1)) return O; v0=v1; zi=zp; } return theta >= 0 ? normal : -normal; } // Transforms that map XY plane to YX, YZ, ZY, ZX, and XZ planes. restricted transform3 XY=identity4; restricted transform3 YX=rotate(-90,O,Z); restricted transform3 YZ=rotate(90,O,Z)*rotate(90,O,X); restricted transform3 ZY=rotate(-90,O,X)*YZ; restricted transform3 ZX=rotate(-90,O,Z)*rotate(-90,O,Y); restricted transform3 XZ=rotate(-90,O,Y)*ZX; private transform3 flip(transform3 t, triple X, triple Y, triple Z, projection P) { static transform3 flip(triple v) { static real s(real x) {return x > 0 ? -1 : 1;} return scale(s(v.x),s(v.y),s(v.z)); } triple u=unit(P.normal); triple up=unit(perp(P.up,u)); bool upright=dot(Z,u) >= 0; if(dot(Y,up) < 0) { t=flip(Y)*t; upright=!upright; } return upright ? t : flip(X)*t; } restricted transform3 XY(projection P=currentprojection) { return flip(XY,X,Y,Z,P); } restricted transform3 YX(projection P=currentprojection) { return flip(YX,Y,X,Z,P); } restricted transform3 YZ(projection P=currentprojection) { return flip(YZ,Y,Z,X,P); } restricted transform3 ZY(projection P=currentprojection) { return flip(ZY,Z,Y,X,P); } restricted transform3 ZX(projection P=currentprojection) { return flip(ZX,Z,X,Y,P); } restricted transform3 XZ(projection P=currentprojection) { return flip(XZ,X,Z,Y,P); } // Transform3 that projects in direction dir onto plane with normal n // through point O. transform3 planeproject(triple n, triple O=O, triple dir=n) { real a=n.x, b=n.y, c=n.z; real u=dir.x, v=dir.y, w=dir.z; real delta=1.0/(a*u+b*v+c*w); real d=-(a*O.x+b*O.y+c*O.z)*delta; return new real[][] { {(b*v+c*w)*delta,-b*u*delta,-c*u*delta,-d*u}, {-a*v*delta,(a*u+c*w)*delta,-c*v*delta,-d*v}, {-a*w*delta,-b*w*delta,(a*u+b*v)*delta,-d*w}, {0,0,0,1} }; } // Transform3 that projects in direction dir onto plane defined by p. transform3 planeproject(path3 p, triple dir=O) { triple n=normal(p); return planeproject(n,point(p,0),dir == O ? n : dir); } // Transform for projecting onto plane through point O with normal cross(u,v). transform transform(triple u, triple v, triple O=O, projection P=currentprojection) { transform3 t=P.t; real[] tO=t*new real[] {O.x,O.y,O.z,1}; real tO3=tO[3]; real factor=1/tO3^2; real[] x=(tO3*t[0]-tO[0]*t[3])*factor; real[] y=(tO3*t[1]-tO[1]*t[3])*factor; triple x=(x[0],x[1],x[2]); triple y=(y[0],y[1],y[2]); u=unit(u); v=unit(v); return (0,0,dot(u,x),dot(v,x),dot(u,y),dot(v,y)); } // Project Label onto plane through point O with normal cross(u,v). Label project(Label L, triple u, triple v, triple O=O, projection P=currentprojection) { Label L=L.copy(); L.position=project(O,P.t); L.transform(transform(u,v,O,P)); return L; } path3 operator cast(guide3 g) {return solve(g);} path3 operator cast(triple v) {return path3(v);} guide3[] operator cast(triple[] v) { return sequence(new guide3(int i) {return v[i];},v.length); } path3[] operator cast(triple[] v) { return sequence(new path3(int i) {return v[i];},v.length); } path3[] operator cast(guide3[] g) { return sequence(new path3(int i) {return solve(g[i]);},g.length); } guide3[] operator cast(path3[] g) { return sequence(new guide3(int i) {return g[i];},g.length); } void write(file file, string s="", explicit guide3[] x, suffix suffix=none) { write(file,s,(path3[]) x,suffix); } void write(string s="", explicit guide3[] x, suffix suffix=endl) { write(stdout,s,(path3[]) x,suffix); } triple point(explicit guide3 g, int t) { flatguide3 f; g(f); int n=f.size(); return f.nodes[adjustedIndex(t,n,f.cyclic())]; } triple[] dirSpecifier(guide3 g, int t) { flatguide3 f; g(f); int n=f.size(); checkEmpty(n); if(f.cyclic()) t=t % n; else if(t < 0 || t >= n-1) return new triple[]; return new triple[] {f.out[t].dir,f.in[t].dir}; } triple[] controlSpecifier(guide3 g, int t) { flatguide3 f; g(f); int n=f.size(); checkEmpty(n); if(f.cyclic()) t=t % n; else if(t < 0 || t >= n-1) return new triple[]; control c=f.control[t]; if(c.active) return new triple[] {c.post,c.pre}; else return new triple[]; } tensionSpecifier tensionSpecifier(guide3 g, int t) { flatguide3 f; g(f); int n=f.size(); checkEmpty(n); if(f.cyclic()) t=t % n; else if(t < 0 || t >= n-1) return operator tension(1,1,false); Tension T=f.Tension[t]; return operator tension(T.out,T.in,T.atLeast); } real[] curlSpecifier(guide3 g, int t) { flatguide3 f; g(f); int n=f.size(); checkEmpty(n); if(f.cyclic()) t=t % n; else if(t < 0 || t >= n-1) return new real[]; return new real[] {f.out[t].gamma,f.in[t].gamma}; } guide3 reverse(guide3 g) { flatguide3 f; bool cyclic=cyclic(g); g(f); if(f.precyclic()) return reverse(solve(g)); int n=f.size(); checkEmpty(n); guide3 G; if(n >= 0) { int start=cyclic ? n : n-1; for(int i=start; i > 0; --i) { G=G..f.nodes[i]; control c=f.control[i-1]; if(c.active) G=G..operator controls(c.pre,c.post); else { dir in=f.in[i-1]; triple d=in.dir; if(d != O) G=G..operator spec(-d,JOIN_OUT); else if(in.Curl) G=G..operator curl(in.gamma,JOIN_OUT); dir out=f.out[i-1]; triple d=out.dir; if(d != O) G=G..operator spec(-d,JOIN_IN); else if(out.Curl) G=G..operator curl(out.gamma,JOIN_IN); } } if(cyclic) G=G..cycle; else G=G..f.nodes[0]; } return G; } triple intersectionpoint(path3 p, path3 q, real fuzz=-1) { real[] t=intersect(p,q,fuzz); if(t.length == 0) abort("paths do not intersect"); return point(p,t[0]); } // return an array containing all intersection points of p and q triple[] intersectionpoints(path3 p, path3 q, real fuzz=-1) { real[][] t=intersections(p,q,fuzz); return sequence(new triple(int i) {return point(p,t[i][0]);},t.length); } triple[] intersectionpoints(explicit path3[] p, explicit path3[] q, real fuzz=-1) { triple[] v; for(int i=0; i < p.length; ++i) for(int j=0; j < q.length; ++j) v.append(intersectionpoints(p[i],q[j],fuzz)); return v; } path3 operator &(path3 p, cycleToken tok) { int n=length(p); if(n < 0) return nullpath3; triple a=point(p,0); triple b=point(p,n); return subpath(p,0,n-1)..controls postcontrol(p,n-1) and precontrol(p,n).. cycle; } // return the point on path3 p at arclength L triple arcpoint(path3 p, real L) { return point(p,arctime(p,L)); } // return the point on path3 p at arclength L triple arcpoint(path3 p, real L) { return point(p,arctime(p,L)); } // return the direction on path3 p at arclength L triple arcdir(path3 p, real L) { return dir(p,arctime(p,L)); } // return the time on path3 p at the relative fraction l of its arclength real reltime(path3 p, real l) { return arctime(p,l*arclength(p)); } // return the point on path3 p at the relative fraction l of its arclength triple relpoint(path3 p, real l) { return point(p,reltime(p,l)); } // return the direction of path3 p at the relative fraction l of its arclength triple reldir(path3 p, real l) { return dir(p,reltime(p,l)); } // return the point on path3 p at half of its arclength triple midpoint(path3 p) { return relpoint(p,0.5); } real relative(Label L, path3 g) { return L.position.relative ? reltime(g,L.relative()) : L.relative(); } // return the linear transformation that maps X,Y,Z to u,v,w. transform3 transform3(triple u, triple v, triple w=cross(u,v)) { return new real[][] { {u.x,v.x,w.x,0}, {u.y,v.y,w.y,0}, {u.z,v.z,w.z,0}, {0,0,0,1} }; } // return the rotation that maps Z to a unit vector u about cross(u,Z), transform3 align(triple u) { real a=u.x; real b=u.y; real c=u.z; real d=a^2+b^2; if(d != 0) { d=sqrt(d); real e=1/d; return new real[][] { {-b*e,-a*c*e,a,0}, {a*e,-b*c*e,b,0}, {0,d,c,0}, {0,0,0,1}}; } return c >= 0 ? identity(4) : diagonal(1,-1,-1,1); } // return a rotation that maps X,Y to the projection plane. transform3 transform3(projection P=currentprojection) { triple w=unit(P.normal); triple v=unit(perp(P.up,w)); if(v == O) v=cross(perp(w),w); triple u=cross(v,w); return u != O ? transform3(u,v,w) : identity(4); } triple[] triples(real[] x, real[] y, real[] z) { if(x.length != y.length || x.length != z.length) abort("arrays have different lengths"); return sequence(new triple(int i) {return (x[i],y[i],z[i]);},x.length); } path3[] operator cast(path3 p) { return new path3[] {p}; } path3[] operator cast(guide3 g) { return new path3[] {(path3) g}; } path3[] operator ^^ (path3 p, path3 q) { return new path3[] {p,q}; } path3[] operator ^^ (path3 p, explicit path3[] q) { return concat(new path3[] {p},q); } path3[] operator ^^ (explicit path3[] p, path3 q) { return concat(p,new path3[] {q}); } path3[] operator ^^ (explicit path3[] p, explicit path3[] q) { return concat(p,q); } path3[] operator * (transform3 t, explicit path3[] p) { return sequence(new path3(int i) {return t*p[i];},p.length); } triple[] operator * (transform3 t, triple[] v) { return sequence(new triple(int i) {return t*v[i];},v.length); } triple[][] operator * (transform3 t, triple[][] v) { triple[][] V=new triple[v.length][]; for(int i=0; i < v.length; ++i) { triple[] vi=v[i]; V[i]=sequence(new triple(int j) {return t*vi[j];},vi.length); } return V; } triple min(explicit path3[] p) { checkEmpty(p.length); triple minp=min(p[0]); for(int i=1; i < p.length; ++i) minp=minbound(minp,min(p[i])); return minp; } triple max(explicit path3[] p) { checkEmpty(p.length); triple maxp=max(p[0]); for(int i=1; i < p.length; ++i) maxp=maxbound(maxp,max(p[i])); return maxp; } path3 randompath3(int n, bool cumulate=true, interpolate3 join=operator ..) { guide3 g; triple w; for(int i=0; i <= n; ++i) { triple z=(unitrand()-0.5,unitrand()-0.5,unitrand()-0.5); if(cumulate) w += z; else w=z; g=join(g,w); } return g; } path3[] box(triple v1, triple v2) { return (v1.x,v1.y,v1.z)-- (v1.x,v1.y,v2.z)-- (v1.x,v2.y,v2.z)-- (v1.x,v2.y,v1.z)-- (v1.x,v1.y,v1.z)-- (v2.x,v1.y,v1.z)-- (v2.x,v1.y,v2.z)-- (v2.x,v2.y,v2.z)-- (v2.x,v2.y,v1.z)-- (v2.x,v1.y,v1.z)^^ (v2.x,v2.y,v1.z)-- (v1.x,v2.y,v1.z)^^ (v1.x,v2.y,v2.z)-- (v2.x,v2.y,v2.z)^^ (v2.x,v1.y,v2.z)-- (v1.x,v1.y,v2.z); } restricted path3[] unitbox=box(O,(1,1,1)); restricted path3 unitcircle3=X..Y..-X..-Y..cycle; restricted path3 unitsquare3=O--X--X+Y--Y--cycle; path3 circle(triple c, real r, triple normal=Z) { path3 p=normal == Z ? unitcircle3 : align(unit(normal))*unitcircle3; return shift(c)*scale3(r)*p; } // return an arc centered at c from triple v1 to v2 (assuming |v2-c|=|v1-c|), // drawing in the given direction. // The normal must be explicitly specified if c and the endpoints are colinear. path3 arc(triple c, triple v1, triple v2, triple normal=O, bool direction=CCW) { v1 -= c; real r=abs(v1); v1=unit(v1); v2=unit(v2-c); if(normal == O) { normal=cross(v1,v2); if(normal == O) abort("explicit normal required for these endpoints"); } transform3 T; bool align=normal != Z; if(align) { T=align(unit(normal)); transform3 Tinv=transpose(T); v1=Tinv*v1; v2=Tinv*v2; } string invalidnormal="invalid normal vector"; real fuzz=sqrtEpsilon*max(abs(v1),abs(v2)); if(abs(v1.z) > fuzz || abs(v2.z) > fuzz) abort(invalidnormal); real[] t1=intersect(unitcircle3,O--2*(v1.x,v1.y,0)); real[] t2=intersect(unitcircle3,O--2*(v2.x,v2.y,0)); if(t1.length == 0 || t2.length == 0) abort(invalidnormal); real t1=t1[0]; real t2=t2[0]; int n=length(unitcircle3); if(direction) { if(t1 >= t2) t1 -= n; } else if(t2 >= t1) t2 -= n; path3 p=subpath(unitcircle3,t1,t2); if(align) p=T*p; return shift(c)*scale3(r)*p; } // return an arc centered at c with radius r from c+r*dir(theta1,phi1) to // c+r*dir(theta2,phi2) in degrees, drawing in the given direction // relative to the normal vector cross(dir(theta1,phi1),dir(theta2,phi2)). // The normal must be explicitly specified if c and the endpoints are colinear. path3 arc(triple c, real r, real theta1, real phi1, real theta2, real phi2, triple normal=O, bool direction) { return arc(c,c+r*dir(theta1,phi1),c+r*dir(theta2,phi2),normal,direction); } // return an arc centered at c with radius r from c+r*dir(theta1,phi1) to // c+r*dir(theta2,phi2) in degrees, drawing drawing counterclockwise // relative to the normal vector cross(dir(theta1,phi1),dir(theta2,phi2)) // iff theta2 > theta1 or (theta2 == theta1 and phi2 >= phi1). // The normal must be explicitly specified if c and the endpoints are colinear. path3 arc(triple c, real r, real theta1, real phi1, real theta2, real phi2, triple normal=O) { return arc(c,r,theta1,phi1,theta2,phi2,normal, theta2 > theta1 || (theta2 == theta1 && phi2 >= phi1) ? CCW : CW); } private real epsilon=1000*realEpsilon; // Return a representation of the plane through point O with normal cross(u,v). path3 plane(triple u, triple v, triple O=O) { return O--O+u--O+u+v--O+v--cycle; } // PRC/OpenGL support include three_light; void draw(frame f, path3 g, material p=currentpen, light light=nolight, string name="", render render=defaultrender, projection P=currentprojection); void begingroup3(frame f, string name="", render render=defaultrender, triple center=O, int interaction=0) { _begingroup3(f,name,render.compression,render.granularity,render.closed, render.tessellate,render.merge == false, render.merge == true,center,interaction); } void begingroup3(picture pic=currentpicture, string name="", render render=defaultrender, triple center=O, int interaction=0) { pic.add(new void(frame f, transform3, picture pic, projection) { if(is3D()) begingroup3(f,name,render,center,interaction); if(pic != null) begingroup(pic); },true); } void endgroup3(picture pic=currentpicture) { pic.add(new void(frame f, transform3, picture pic, projection) { if(is3D()) endgroup3(f); if(pic != null) endgroup(pic); },true); } void addPath(picture pic, path3 g, pen p) { if(size(g) > 0) pic.addBox(min(g),max(g),min3(p),max3(p)); } include three_surface; include three_margins; pair min(path3 p, projection P) { path3 q=P.T.modelview*p; if(P.infinity) return xypart(min(q)); return maxratio(q)/P.T.projection[3][2]; } pair max(path3 p, projection P) { path3 q=P.T.modelview*p; if(P.infinity) return xypart(max(q)); return minratio(q)/P.T.projection[3][2]; } pair min(frame f, projection P) { frame g=P.T.modelview*f; if(P.infinity) return xypart(min3(g)); return maxratio(g)/P.T.projection[3][2]; } pair max(frame f, projection P) { frame g=P.T.modelview*f; if(P.infinity) return xypart(max3(g)); return minratio(g)/P.T.projection[3][2]; } void draw(picture pic=currentpicture, Label L="", path3 g, align align=NoAlign, material p=currentpen, margin3 margin=NoMargin3, light light=nolight, string name="", render render=defaultrender) { pen q=(pen) p; pic.add(new void(frame f, transform3 t, picture pic, projection P) { path3 G=margin(t*g,q).g; if(is3D()) { draw(f,G,p,light,name,render,null); if(pic != null && size(G) > 0) pic.addBox(min(G,P),max(G,P),min(q),max(q)); } if(pic != null) draw(pic,project(G,P),q); },true); Label L=L.copy(); L.align(align); if(L.s != "") { L.p(q); label(pic,L,g); } addPath(pic,g,q); } include three_tube; draw=new void(frame f, path3 g, material p=currentpen, light light=nolight, string name="", render render=defaultrender, projection P=currentprojection) { pen q=(pen) p; if(is3D()) { p=material(p); real width=linewidth(q); void drawthick(path3 g) { if(settings.thick) { if(width > 0) { bool prc=prc(); void cylinder(transform3) {}; void sphere(transform3, bool half) {}; void disk(transform3) {}; void pipe(path3, path3); if(prc) { cylinder=new void(transform3 t) {drawPRCcylinder(f,t,p,light);}; sphere=new void(transform3 t, bool half) {drawPRCsphere(f,t,half,p,light,render);}; disk=new void(transform3 t) {draw(f,t*unitdisk,p,light,render);}; pipe=new void(path3 center, path3 g) {drawPRCtube(f,center,g,p,light);}; } real linecap=linecap(q); real r=0.5*width; bool open=!cyclic(g); int L=length(g); triple g0=point(g,0); triple gL=point(g,L); if(open && L > 0) { if(linecap == 2) { g0 -= r*dir(g,0); gL += r*dir(g,L); g=g0..g..gL; L += 2; } } tube T=tube(g,width,render,cylinder,sphere,pipe); path3 c=T.center; if(L >= 0) { if(open) { int Lc=length(c); triple c0=point(c,0); triple cL=point(c,Lc); triple dir0=dir(g,0); triple dirL=dir(g,L); triple dirc0=dir(c,0); triple dircL=dir(c,Lc); transform3 t0=shift(g0)*align(-dir0); transform3 tL=shift(gL)*align(dirL); transform3 tc0=shift(c0)*align(-dirc0); transform3 tcL=shift(cL)*align(dircL); if(linecap == 0 || linecap == 2) { transform3 scale2r=scale(r,r,1); T.s.append(t0*scale2r*unitdisk); disk(tc0*scale2r); if(L > 0) { T.s.append(tL*scale2r*unitdisk); disk(tcL*scale2r); } } else if(linecap == 1) { transform3 scale3r=scale3(r); T.s.append(t0*scale3r* (dir0 != O ? unithemisphere : unitsphere)); sphere(tc0*scale3r,half=straight(c,0)); if(L > 0) { T.s.append(tL*scale3r* (dirL != O ? unithemisphere : unitsphere)); sphere(tcL*scale3r,half=straight(c,Lc-1)); } } } if(opacity(q) == 1) _draw(f,c,q); } for(patch s : T.s.s) draw3D(f,s,p,light,prc=false); } else _draw(f,g,q); } else _draw(f,g,q); } bool group=q != nullpen && (name != "" || render.defaultnames); if(group) begingroup3(f,name == "" ? "curve" : name,render); if(linetype(q).length == 0) drawthick(g); else { real[] dash=linetype(adjust(q,arclength(g),cyclic(g))); if(sum(dash) > 0) { dash.cyclic=true; real offset=offset(q); real L=arclength(g); int i=0; real l=offset; while(l <= L) { real t1=arctime(g,l); l += dash[i]; real t2=arctime(g,min(l,L)); drawthick(subpath(g,t1,t2)); ++i; l += dash[i]; ++i; } } } if(group) endgroup3(f); } else draw(f,project(g,P),q); }; void draw(frame f, explicit path3[] g, material p=currentpen, light light=nolight, string name="", render render=defaultrender, projection P=currentprojection) { bool group=g.length > 1 && (name != "" || render.defaultnames); if(group) begingroup3(f,name == "" ? "curves" : name,render); for(int i=0; i < g.length; ++i) draw(f,g[i],p,light,partname(i,render),render,P); if(group) endgroup3(f); } void draw(picture pic=currentpicture, explicit path3[] g, material p=currentpen, margin3 margin=NoMargin3, light light=nolight, string name="", render render=defaultrender) { bool group=g.length > 1 && (name != "" || render.defaultnames); if(group) begingroup3(pic,name == "" ? "curves" : name,render); for(int i=0; i < g.length; ++i) draw(pic,g[i],p,margin,light,partname(i,render),render); if(group) endgroup3(pic); } include three_arrows; void draw(picture pic=currentpicture, Label L="", path3 g, align align=NoAlign, material p=currentpen, arrowbar3 arrow, arrowbar3 bar=None, margin3 margin=NoMargin3, light light=nolight, light arrowheadlight=currentlight, string name="", render render=defaultrender) { bool group=arrow != None || bar != None; if(group) begingroup3(pic,name,render); bool drawpath=arrow(pic,g,p,margin,light,arrowheadlight); if(bar(pic,g,p,margin,light,arrowheadlight) && drawpath) draw(pic,L,g,align,p,margin,light,render); if(group) endgroup3(pic); if(L.s != "") label(pic,L,g,align,(pen) p); } void draw(frame f, path3 g, material p=currentpen, arrowbar3 arrow, light light=nolight, light arrowheadlight=currentlight, string name="", render render=defaultrender, projection P=currentprojection) { picture pic; bool group=arrow != None; if(group) begingroup3(f,name,render); if(arrow(pic,g,p,NoMargin3,light,arrowheadlight)) draw(f,g,p,light,render,P); add(f,pic.fit()); if(group) endgroup3(f); } void add(picture pic=currentpicture, void d(picture,transform3), bool exact=false) { pic.add(d,exact); } // Fit the picture src using the identity transformation (so user // coordinates and truesize coordinates agree) and add it about the point // position to picture dest. void add(picture dest, picture src, triple position, bool group=true, bool above=true) { dest.add(new void(picture f, transform3 t) { f.add(shift(t*position)*src,group,above); }); } void add(picture src, triple position, bool group=true, bool above=true) { add(currentpicture,src,position,group,above); } // Align an arrow pointing to b from the direction dir. The arrow is // 'length' PostScript units long. void arrow(picture pic=currentpicture, Label L="", triple b, triple dir, real length=arrowlength, align align=NoAlign, pen p=currentpen, arrowbar3 arrow=Arrow3, margin3 margin=EndMargin3, light light=nolight, light arrowheadlight=currentlight, string name="", render render=defaultrender) { Label L=L.copy(); if(L.defaultposition) L.position(0); L.align(L.align,dir); L.p(p); picture opic; marginT3 margin=margin(b--b,p); // Extract margin.begin and margin.end triple a=(margin.begin+length+margin.end)*unit(dir); draw(opic,L,a--O,align,p,arrow,margin,light,arrowheadlight,name,render); add(pic,opic,b); } void arrow(picture pic=currentpicture, Label L="", triple b, pair dir, real length=arrowlength, align align=NoAlign, pen p=currentpen, arrowbar3 arrow=Arrow3, margin3 margin=EndMargin3, light light=nolight, light arrowheadlight=currentlight, string name="", render render=defaultrender, projection P=currentprojection) { arrow(pic,L,b,invert(dir,b,P),length,align,p,arrow,margin,light, arrowheadlight,name,render); } triple min3(picture pic, projection P=currentprojection) { return pic.min3(P); } triple max3(picture pic, projection P=currentprojection) { return pic.max3(P); } triple size3(picture pic, bool user=false, projection P=currentprojection) { transform3 t=pic.calculateTransform3(P); triple M=pic.max(t); triple m=pic.min(t); if(!user) return M-m; t=inverse(t); return t*M-t*m; } triple point(frame f, triple dir) { triple m=min3(f); triple M=max3(f); return m+realmult(rectify(dir),M-m); } triple point(picture pic=currentpicture, triple dir, bool user=true, projection P=currentprojection) { triple min = pic.userMin(), max = pic.userMax(); triple v=min+realmult(rectify(dir),max-min); return user ? v : pic.calculateTransform3(P)*v; } triple truepoint(picture pic=currentpicture, triple dir, bool user=true, projection P=currentprojection) { transform3 t=pic.calculateTransform3(P); triple m=pic.min(t); triple M=pic.max(t); triple v=m+realmult(rectify(dir),M-m); return user ? inverse(t)*v : v; } void add(picture dest=currentpicture, object src, pair position=0, pair align=0, bool group=true, filltype filltype=NoFill, bool above=true) { if(prc()) label(dest,src,position,align); else if(settings.render == 0) plain.add(dest,src,position,align,group,filltype,above); } private struct viewpoint { triple target,camera,up; real angle; void operator init(string s) { s=replace(s,'\n'," "); string[] S=split(s); int pos(string s, string key) { int pos=find(s,key); if(pos < 0) return -1; pos += length(key); while(substr(s,pos,1) == " ") ++pos; if(substr(s,pos,1) == "=") return pos+1; return -1; } triple C2C=X; real ROO=1; real ROLL=0; angle=30; int pos; for(int k=0; k < S.length; ++k) { if((pos=pos(S[k],"COO")) >= 0) target=((real) substr(S[k],pos),(real) S[++k],(real) S[++k]); else if((pos=pos(S[k],"C2C")) >= 0) C2C=((real) substr(S[k],pos),(real) S[++k],(real) S[++k]); else if((pos=pos(S[k],"ROO")) >= 0) ROO=(real) substr(S[k],pos); else if((pos=pos(S[k],"ROLL")) >= 0) ROLL=(real) substr(S[k],pos); else if((pos=pos(S[k],"AAC")) >= 0) angle=(real) substr(S[k],pos); } camera=target+ROO*C2C; triple u=unit(target-camera); triple w=unit(Z-u.z*u); up=rotate(ROLL,O,u)*w; } } projection perspective(string s) { viewpoint v=viewpoint(s); projection P=perspective(v.camera,v.up,v.target); P.angle=v.angle; P.absolute=true; return P; } projection absorthographic(triple camera=Z, triple target=O, real roll=0) { triple u=unit(target-camera); triple w=unit(Z-u.z*u); triple up=rotate(roll,O,u)*w; projection P= projection(camera,up,target,1,0,false,false, new transformation(triple camera, triple up, triple target) {return transformation(look(camera,up,target));}); P.absolute=true; return P; } projection absperspective(triple camera=Z, triple target=O, real roll=0, real angle=30) { triple u=unit(target-camera); triple w=unit(Z-u.z*u); triple up=rotate(roll,O,u)*w; projection P=perspective(camera,up,target); P.angle=angle; P.absolute=true; return P; } private string Format(real x) { assert(abs(x) < 1e17,"Number too large: "+string(x)); return format("%.9f",x,"C"); } private string Format(triple v, string sep=" ") { return Format(v.x)+sep+Format(v.y)+sep+Format(v.z); } private string Format(real[] c) { return Format((c[0],c[1],c[2])); } private string format(triple v, string sep=" ") { return string(v.x)+sep+string(v.y)+sep+string(v.z); } private string Format(transform3 t, string sep=" ") { return Format(t[0][0])+sep+Format(t[1][0])+sep+Format(t[2][0])+sep+ Format(t[0][1])+sep+Format(t[1][1])+sep+Format(t[2][1])+sep+ Format(t[0][2])+sep+Format(t[1][2])+sep+Format(t[2][2])+sep+ Format(t[0][3])+sep+Format(t[1][3])+sep+Format(t[2][3]); } string lightscript(light light) { string script="for(var i=scene.lights.count-1; i >= 0; i--) scene.lights.removeByIndex(i);"+'\n\n'; for(int i=0; i < light.position.length; ++i) { string Li="L"+string(i); real[] diffuse=light.diffuse[i]; script += Li+"=scene.createLight();"+'\n'+ Li+".direction.set("+format(-light.position[i],",")+");"+'\n'+ Li+".color.set("+format((diffuse[0],diffuse[1],diffuse[2]),",")+");"+'\n'; } // Work around initialization bug in Adobe Reader 8.0: return script +" scene.lightScheme=scene.LIGHT_MODE_HEADLAMP; scene.lightScheme=scene.LIGHT_MODE_FILE; "; } void writeJavaScript(string name, string preamble, string script) { file out=output(name); write(out,preamble); if(script != "") { write(out,endl); file in=input(script); while(true) { string line=in; if(eof(in)) break; write(out,line,endl); } } close(out); if(settings.verbose > 1) write("Wrote "+name); if(!settings.inlinetex) file3.push(name); } pair viewportmargin(pair lambda) { return maxbound(0.5*(viewportsize-lambda),viewportmargin); } string embed3D(string prefix, string label=prefix, string text=label, frame f, string format="", real width=0, real height=0, string options="", string script="", light light=currentlight, projection P=currentprojection, real viewplanesize=0) { if(!prc(format) || Embed == null) return ""; if(width == 0) width=settings.paperwidth; if(height == 0) height=settings.paperheight; if(script == "") script=defaultembed3Dscript; if(P.infinity) { if(viewplanesize==0) { triple lambda=max3(f)-min3(f); pair margin=viewportmargin((lambda.x,lambda.y)); viewplanesize=(max(lambda.x+2*margin.x,lambda.y+2*margin.y))/P.zoom; } } else if(!P.absolute) P.angle=2*aTan(Tan(0.5*P.angle)); shipout3(prefix,f); string name=prefix+".js"; // Adobe Reader doesn't appear to support user-specified viewport lights. bool lightscript=light.on() && !light.viewport; if(lightscript) writeJavaScript(name,lightscript(light),script); if(!settings.inlinetex && !prconly()) file3.push(prefix+".prc"); static transform3 flipxz=xscale3(-1)*zscale3(-1); transform3 inv=inverse(flipxz*P.T.modelview); string options3="3Dlights="+ (light.on() ? (light.viewport ? "Headlamp" : "File") : "None"); if(defaultembed3Doptions != "") options3 += ","+defaultembed3Doptions; if((settings.render < 0 || !settings.embed) && settings.auto3D) options3 += ",activate=pagevisible"; options3 += ",3Dtoolbar="+(settings.toolbar ? "true" : "false")+ ",label="+label+ (P.infinity ? ",3Dortho="+Format(1/viewplanesize) : ",3Daac="+Format(P.angle))+ ",3Dc2w="+Format(inv)+ ",3Droo="+Format(abs(P.vector()))+ ",3Dpsob="+(P.infinity ? "Max" : "H")+ ",3Dbg="+Format(light.background()); if(options != "") options3 += ","+options; if(settings.inlinetex) prefix=jobname(prefix); if(lightscript) options3 += ",add3Djscript="+prefix+".js"; options3 += ",add3Djscript=asylabels.js"; return text == "" ? Embed(prefix+".prc","",options3,width,height) : "\hbox to 0pt{"+text+"\hss}"+Embed(prefix+".prc","\phantom{"+text+"}", options3); } struct scene { frame f; transform3 t; projection P; bool adjusted; real width,height; pair viewportmargin; transform3 T=identity4; picture pic2; void operator init(frame f, real width, real height, projection P=currentprojection) { this.f=f; this.t=identity4; this.P=P; this.width=width; this.height=height; } void operator init(picture pic, real xsize=pic.xsize, real ysize=pic.ysize, bool keepAspect=pic.keepAspect, bool is3D=true, projection P=currentprojection) { real xsize3=pic.xsize3, ysize3=pic.ysize3, zsize3=pic.zsize3; bool warn=true; if(xsize3 == 0 && ysize3 == 0 && zsize3 == 0) { xsize3=ysize3=zsize3=max(xsize,ysize); warn=false; } if(P.absolute) this.P=P.copy(); else if(P.showtarget) draw(pic,P.target,nullpen); t=pic.scaling(xsize3,ysize3,zsize3,keepAspect,warn); adjusted=false; triple m=pic.min(t); triple M=pic.max(t); if(!P.absolute) { this.P=t*P; if(this.P.center && settings.render != 0) { triple target=0.5*(m+M); this.P.target=target; this.P.calculate(); } if(this.P.autoadjust || this.P.infinity) adjusted=adjusted | this.P.adjust(m,M); } bool scale=xsize != 0 || ysize != 0; bool scaleAdjust=scale && this.P.autoadjust; bool noAdjust=(this.P.absolute || !scaleAdjust); if(pic.bounds3.exact && noAdjust) this.P.bboxonly=false; f=pic.fit3(t,pic.bounds3.exact ? pic2 : null,this.P); if(!pic.bounds3.exact) { if(noAdjust) this.P.bboxonly=false; transform3 s=pic.scale3(f,xsize3,ysize3,zsize3,keepAspect); t=s*t; this.P=s*this.P; f=pic.fit3(t,pic2,this.P); } if(is3D || scale) { pic2.bounds.exact=true; transform s=pic2.scaling(xsize,ysize,keepAspect); pair m2=pic2.min(s); pair M2=pic2.max(s); pair lambda=M2-m2; viewportmargin=viewportmargin(lambda); width=ceil(lambda.x+2*viewportmargin.x); height=ceil(lambda.y+2*viewportmargin.y); if(!this.P.absolute) { if(scaleAdjust) { pair v=(s.xx,s.yy); transform3 T=this.P.t; pair x=project(X,T); pair y=project(Y,T); pair z=project(Z,T); real f(pair a, pair b) { return b == 0 ? (0.5*(a.x+a.y)) : (b.x^2*a.x+b.y^2*a.y)/(b.x^2+b.y^2); } transform3 s=keepAspect ? scale3(min(f(v,x),f(v,y),f(v,z))) : xscale3(f(v,x))*yscale3(f(v,y))*zscale3(f(v,z)); s=shift(this.P.target)*s*shift(-this.P.target); t=s*t; this.P=s*this.P; this.P.bboxonly=false; if(!is3D) pic2.erase(); f=pic.fit3(t,is3D ? null : pic2,this.P); } if(this.P.autoadjust || this.P.infinity) adjusted=adjusted | this.P.adjust(min3(f),max3(f)); } } } // Choose the angle to be just large enough to view the entire image. real angle(projection P) { T=identity4; real h=-0.5*P.target.z; pair r,R; real diff=realMax; pair s; int i; do { r=minratio(f); R=maxratio(f); pair lasts=s; if(P.autoadjust) { s=r+R; if(s != 0) { transform3 t=shift(h*s.x,h*s.y,0); f=t*f; T=t*T; adjusted=true; } } diff=abs(s-lasts); ++i; } while (diff > angleprecision && i < maxangleiterations); real aspect=width > 0 ? height/width : 1; real rx=-r.x*aspect; real Rx=R.x*aspect; real ry=-r.y; real Ry=R.y; if(!P.autoadjust) { if(rx > Rx) Rx=rx; else rx=Rx; if(ry > Ry) Ry=ry; else ry=Ry; } return (1+angleprecision)*max(aTan(rx)+aTan(Rx),aTan(ry)+aTan(Ry)); } } object embed(string prefix=outprefix(), string label=prefix, string text=label, scene S, string format="", bool view=true, string options="", string script="", light light=currentlight) { object F; transform3 modelview; projection P=S.P; transform3 tinv=inverse(S.t); projection Q; triple orthoshift; modelview=P.T.modelview; transform3 inv; if(P.absolute) { Q=modelview*P; inv=inverse(modelview); } else { triple target=P.target; S.f=modelview*S.f; P=modelview*P; Q=P.copy(); if(P.infinity) { triple m=min3(S.f); triple M=max3(S.f); triple lambda=M-m; S.viewportmargin=viewportmargin((lambda.x,lambda.y)); S.width=ceil(lambda.x+2*S.viewportmargin.x); S.height=ceil(lambda.y+2*S.viewportmargin.y); orthoshift=(-0.5(m.x+M.x),-0.5*(m.y+M.y),0); S.f=shift(orthoshift)*S.f; // Eye will be at (0,0,0) inv=inverse(modelview); } else { if(P.angle == 0) { P.angle=S.angle(P); modelview=S.T*modelview; if(S.viewportmargin.y != 0) P.angle=2*aTan(Tan(0.5*P.angle)-S.viewportmargin.y/P.target.z); } inv=inverse(modelview); Q.angle=P.angle; if(settings.verbose > 0) { if(S.adjusted) write("adjusting camera to ",tinv*inv*P.camera); target=inv*P.target; } P=S.T*P; } if(settings.verbose > 0) { if((P.center && settings.render != 0) || (!P.infinity && P.autoadjust)) write("adjusting target to ",tinv*target); } } light Light=modelview*light; if(prefix == "") prefix=outprefix(); bool prc=prc(format); bool preview=settings.render > 0 && !prconly(); if(prc) { // The media9.sty package cannot handle spaces or dots in filenames. string dir=stripfile(prefix); prefix=dir+replace(stripdirectory(prefix), new string[][]{{" ","_"},{".","_"}}); if((settings.embed || nativeformat() == "pdf") && !prconly()) prefix += "+"+(string) file3.length; } else preview=false; if(preview || (!prc && settings.render != 0)) { frame f=S.f; triple m,M; real zcenter; real r; if(P.absolute) { f=modelview*f; m=min3(f); M=max3(f); r=0.5*abs(M-m); zcenter=0.5*(M.z+m.z); } else { m=min3(f); M=max3(f); zcenter=P.target.z; r=P.distance(m,M); } M=(M.x,M.y,zcenter+r); m=(m.x,m.y,zcenter-r); if(P.infinity) { triple margin=(S.viewportmargin.x,S.viewportmargin.y,0); M += margin; m -= margin; } else if(M.z >= 0) abort("camera too close"); shipout3(prefix,f,preview ? nativeformat() : format, S.width-defaultrender.margin,S.height-defaultrender.margin, P.infinity ? 0 : 2aTan(Tan(0.5*P.angle)*P.zoom), P.zoom,m,M,P.viewportshift, tinv*inv*shift(0,0,zcenter),Light.background(),Light.position, Light.diffuse,Light.ambient,Light.specular, Light.viewport,view && !preview); if(!preview) return F; } string image; if((preview || (prc && settings.render == 0)) && settings.embed) { image=prefix; if(settings.inlinetex) image += "_0"; if(!preview && !shipped && !S.pic2.empty2()) { transform T=S.pic2.scaling(S.width,S.height); shipout(image,S.pic2.fit(T),newframe,nativeformat(),false,false,null); } image += "."+nativeformat(); if(!settings.inlinetex) file3.push(image); image=graphic(image,"hiresbb"); } if(prc) { if(P.viewportshift != 0) { if(!P.infinity) warning("offaxis", "PRC does not support off-axis projections; use pan instead of shift"); triple lambda=max3(S.f)-min3(S.f); Q.target -= (P.viewportshift.x*lambda.x/P.zoom, P.viewportshift.y*lambda.y/P.zoom,0); } real viewplanesize=0; if(P.absolute) { if(P.infinity) { S.f=modelview*S.f; triple lambda=max3(S.f)-min3(S.f); pair margin=viewportmargin((lambda.x,lambda.y)); viewplanesize=(max(lambda.x+2*margin.x,lambda.y+2*margin.y))/Q.zoom; S.f=inv*S.f; } Q=inv*Q; } else { if(P.infinity) { triple lambda=max3(S.f)-min3(S.f); pair margin=viewportmargin((lambda.x,lambda.y)); viewplanesize=(max(lambda.x+2*margin.x,lambda.y+2*margin.y))/(Q.zoom); transform3 t=inv*shift(-orthoshift); Q=t*Q; S.f=t*S.f; } else { Q=inv*Q; S.f=inv*S.f; } } F.L=embed3D(prefix,label,text=image,S.f,format, S.width-2,S.height-2,options,script,light,Q,viewplanesize); } return F; } object embed(string prefix=outprefix(), string label=prefix, string text=label, picture pic, string format="", real xsize=pic.xsize, real ysize=pic.ysize, bool keepAspect=pic.keepAspect, bool view=true, string options="", string script="", light light=currentlight, projection P=currentprojection) { bool is3D=is3D(format); scene S=scene(pic,xsize,ysize,keepAspect,is3D,P); if(is3D) return embed(prefix,label,text,S,format,view,options,script,light); else { object F; transform T=S.pic2.scaling(xsize,ysize,keepAspect); F.f=pic.fit(scale(S.t[0][0])*T); add(F.f,S.pic2.fit()); return F; } } object embed(string prefix=outprefix(), string label=prefix, string text=label, frame f, string format="", real width=0, real height=0, bool view=true, string options="", string script="", light light=currentlight, projection P=currentprojection) { if(is3D(format)) return embed(label,text,prefix,scene(f,width,height,P),format,view,options, script,light); else { object F; F.f=f; return F; } } embed3=new object(string prefix, frame f, string format, string options, string script, light light, projection P) { return embed(prefix=prefix,f,format,options,script,light,P); }; frame embedder(object embedder(string prefix, string format), string prefix, string format, bool view, light light) { frame f; bool prc=prc(format); if(!prc && settings.render != 0 && !view) { static int previewcount=0; bool keep=prefix != ""; prefix=outprefix(prefix)+"+"+(string) previewcount; ++previewcount; format=nativeformat(); if(!keep) file3.push(prefix+"."+format); } object F=embedder(prefix,format); if(prc) label(f,F.L); else { if(settings.render == 0) { add(f,F.f); if(light.background != nullpen) box(f,light.background,Fill,above=false); } else if(!view) label(f,graphic(prefix,"hiresbb")); } return f; } currentpicture.fitter=new frame(string prefix, picture pic, string format, real xsize, real ysize, bool keepAspect, bool view, string options, string script, light light, projection P) { frame f; bool empty3=pic.empty3(); if(!empty3) f=embedder(new object(string prefix, string format) { return embed(prefix=prefix,pic,format,xsize,ysize,keepAspect,view, options,script,light,P); },prefix,format,view,light); if(is3D(format) || empty3) add(f,pic.fit2(xsize,ysize,keepAspect)); return f; }; frame embedder(string prefix, frame f, string format, real width, real height, bool view, string options, string script, light light, projection P) { return embedder(new object(string prefix, string format) { return embed(prefix=prefix,f,format,width,height,view,options,script, light,P); },prefix,format,view,light); } projection[][] ThreeViewsUS={{TopView}, {FrontView,RightView}}; projection[][] SixViewsUS={{null,TopView}, {LeftView,FrontView,RightView,BackView}, {null,BottomView}}; projection[][] ThreeViewsFR={{RightView,FrontView}, {null,TopView}}; projection[][] SixViewsFR={{null,BottomView}, {RightView,FrontView,LeftView,BackView}, {null,TopView}}; projection[][] ThreeViews={{FrontView,TopView,RightView}}; projection[][] SixViews={{FrontView,TopView,RightView}, {BackView,BottomView,LeftView}}; void addViews(picture dest, picture src, projection[][] views=SixViewsUS, bool group=true, filltype filltype=NoFill) { frame[][] F=array(views.length,new frame[]); pair[][] M=array(views.length,new pair[]); pair[][] m=array(views.length,new pair[]); for(int i=0; i < views.length; ++i) { projection[] viewsi=views[i]; frame[] Fi=F[i]; pair[] Mi=M[i]; pair[] mi=m[i]; for(projection P : viewsi) { if(P != null) { frame f=src.fit(P); mi.push(min(f)); Mi.push(max(f)); Fi.push(f); } else { pair Infinity=(infinity,infinity); mi.push(Infinity); Mi.push(-Infinity); Fi.push(newframe); } } } real[] my=new real[views.length]; real[] My=new real[views.length]; int Nj=0; for(int i=0; i < views.length; ++i) { my[i]=minbound(m[i]).y; My[i]=maxbound(M[i]).y; Nj=max(Nj,views[i].length); } real[] mx=array(Nj,infinity); real[] Mx=array(Nj,-infinity); for(int i=0; i < views.length; ++i) { pair[] mi=m[i]; pair[] Mi=M[i]; for(int j=0; j < views[i].length; ++j) { mx[j]=min(mx[j],mi[j].x); Mx[j]=max(Mx[j],Mi[j].x); } } if(group) begingroup(dest); real y; for(int i=0; i < views.length; ++i) { real x; pair[] mi=m[i]; for(int j=0; j < views[i].length; ++j) { if(size(F[i][j]) != 0) add(dest,shift(x-mx[j],y+my[i])*F[i][j],filltype); x += (Mx[j]-mx[j]); } y -= (My[i]-my[i]); } if(group) endgroup(dest); } void addViews(picture src, projection[][] views=SixViewsUS, bool group=true, filltype filltype=NoFill) { addViews(currentpicture,src,views,group,filltype); } void addStereoViews(picture dest, picture src, bool group=true, filltype filltype=NoFill, real eyetoview=defaulteyetoview, bool leftright=true, projection P=currentprojection) { triple v=P.vector(); triple h=0.5*abs(v)*eyetoview*unit(cross(P.up,v)); projection leftEye=P.copy(); leftEye.camera -= h; leftEye.calculate(); projection rightEye=P.copy(); rightEye.camera += h; rightEye.calculate(); addViews(dest,src,leftright ? new projection[][] {{leftEye,rightEye}} : new projection[][] {{rightEye,leftEye}},group,filltype); } void addStereoViews(picture src, bool group=true, filltype filltype=NoFill, real eyetoview=defaulteyetoview, bool leftright=true, projection P=currentprojection) { addStereoViews(currentpicture,src,group,filltype,eyetoview,leftright,P); } // Fit an array of 3D pictures simultaneously using the sizing of picture all. frame[] fit3(string prefix="", picture[] pictures, picture all, string format="", bool view=true, string options="", string script="", light light=currentlight, projection P=currentprojection) { frame[] out; scene S=scene(all,P); triple m=all.min(S.t); triple M=all.max(S.t); out=new frame[pictures.length]; int i=0; bool reverse=settings.reverse; settings.animating=true; for(picture pic : pictures) { picture pic2; frame f=pic.fit3(S.t,pic2,S.P); if(settings.interrupt) break; add(f,pic2.fit2()); draw(f,m,nullpen); draw(f,M,nullpen); out[i]=f; ++i; } while(!settings.interrupt) { for(int i=settings.reverse ? pictures.length-1 : 0; i >= 0 && i < pictures.length && !settings.interrupt; settings.reverse ? --i : ++i) { frame f=embedder(prefix,out[i],format,S.width,S.height,view,options, script,light,S.P); if(!settings.loop) out[i]=f; } if(!settings.loop) break; } settings.animating=false; settings.interrupt=false; settings.reverse=reverse; return out; } // Fit an array of pictures simultaneously using the size of the first picture. fit=new frame[](string prefix="", picture[] pictures, string format="", bool view=true, string options="", string script="", projection P=currentprojection) { if(pictures.length == 0) return new frame[]; picture all; size(all,pictures[0]); for(picture pic : pictures) add(all,pic); return all.empty3() ? fit2(pictures,all) : fit3(prefix,pictures,all,format,view,options,script,P); }; // Add frame src to picture dest about position. void add(picture dest=currentpicture, frame src, triple position) { if(is3D(src)) { dest.add(new void(frame f, transform3 t, picture, projection) { add(f,shift(t*position)*src); },true); } else { dest.add(new void(frame, transform3 t, picture pic, projection P) { if(pic != null) { pic.add(new void(frame f, transform T) { add(f,T*shift(project(t*position,P))*src); },true); } },true); } dest.addBox(position,position,min3(src),max3(src)); } exitfcn currentexitfunction=atexit(); void exitfunction() { if(currentexitfunction != null) currentexitfunction(); if(!settings.keep) for(int i=0; i < file3.length; ++i) delete(file3[i]); file3=new string[]; } atexit(exitfunction); ./asymptote-2.41/base/plain_strings.asy0000644000175000017500000001354013064427076020052 0ustar norbertnorbertstring defaultformat(int n, string trailingzero="", bool fixed=false, bool signed=true) { return "$%"+trailingzero+"."+string(n)+(fixed ? "f" : "g")+"$"; } string defaultformat=defaultformat(4); string defaultseparator="\!\times\!"; string ask(string prompt) { write(stdout,prompt); return stdin; } string getstring(string name="", string default="", string prompt="", bool store=true) { string[] history=history(name,1); if(history.length > 0) default=history[0]; if(prompt == "") prompt=name+"? [%s] "; prompt=replace(prompt,new string[][] {{"%s",default}}); string s=readline(prompt,name); if(s == "") s=default; else saveline(name,s,store); return s; } int getint(string name="", int default=0, string prompt="", bool store=true) { return (int) getstring(name,(string) default,prompt,store); } real getreal(string name="", real default=0, string prompt="", bool store=true) { return (real) getstring(name,(string) default,prompt,store); } pair getpair(string name="", pair default=0, string prompt="", bool store=true) { return (pair) getstring(name,(string) default,prompt,store); } triple gettriple(string name="", triple default=(0,0,0), string prompt="", bool store=true) { return (triple) getstring(name,(string) default,prompt,store); } // returns a string with all occurrences of string 'before' in string 's' // changed to string 'after'. string replace(string s, string before, string after) { return replace(s,new string[][] {{before,after}}); } // Like texify but don't convert embedded TeX commands: \${} string TeXify(string s) { static string[][] t={{"&","\&"},{"%","\%"},{"_","\_"},{"#","\#"},{"<","$<$"}, {">","$>$"},{"|","$|$"},{"^","$\hat{\ }$"}, {"~","$\tilde{\ }$"},{" ","\phantom{ }"}}; return replace(s,t); } private string[][] trans1={{'\\',"\backslash "}, {"$","\$"},{"{","\{"},{"}","\}"}}; private string[][] trans2={{"\backslash ","$\backslash$"}}; // Convert string to TeX string texify(string s) { return TeXify(replace(replace(s,trans1),trans2)); } // Convert string to TeX, preserving newlines string verbatim(string s) { bool space=substr(s,0,1) == '\n'; static string[][] t={{'\n',"\\"}}; t.append(trans1); s=TeXify(replace(replace(s,t),trans2)); return space ? "\ "+s : s; } // Split a string into an array of substrings delimited by delimiter // If delimiter is an empty string, use space delimiter but discard empty // substrings. string[] split(string s, string delimiter="") { bool prune=false; if(delimiter == "") { prune=true; delimiter=" "; } string[] S; int last=0; int i; int N=length(delimiter); int n=length(s); while((i=find(s,delimiter,last)) >= 0) { if(i > last || (i == last && !prune)) S.push(substr(s,last,i-last)); last=i+N; } if(n > last || (n == last && !prune)) S.push(substr(s,last,n-last)); return S; } int system(string s) { return system(split(s)); } int[] operator ecast(string[] a) { return sequence(new int(int i) {return (int) a[i];},a.length); } real[] operator ecast(string[] a) { return sequence(new real(int i) {return (real) a[i];},a.length); } // Read contents of file as a string. string file(string s) { file f=input(s); string s; while(!eof(f)) { s += f+'\n'; } return s; } string italic(string s) { return s != "" ? "{\it "+s+"}" : s; } string baseline(string s, string template="\strut") { return s != "" && settings.tex != "none" ? "\vphantom{"+template+"}"+s : s; } string math(string s) { return s != "" ? "$"+s+"$" : s; } private void notimplemented(string text) { abort(text+" is not implemented for the '"+settings.tex+"' TeX engine"); } string jobname(string name) { int pos=rfind(name,"-"); return pos >= 0 ? "\ASYprefix\jobname"+substr(name,pos) : name; } string graphic(string name, string options="") { if(latex()) { if(options != "") options="["+options+"]"; bool pdf=pdf(); string includegraphics="\includegraphics"+options; if(settings.inlinetex) return includegraphics+"{"+jobname(name)+"}"; else return includegraphics+ (find(name," ") < 0 ? "{"+name+"}" : (pdf ? "{\""+stripextension(name)+"\".pdf}" : "{\""+name+"\"}")); } if(settings.tex != "context") notimplemented("graphic"); return "\externalfigure["+name+"]["+options+"]"; } string graphicscale(real x) { return string(settings.tex == "context" ? 1000*x : x); } string minipage(string s, real width=100bp) { if(latex()) return "\begin{minipage}{"+(string) (width/pt)+"pt}"+s+"\end{minipage}"; if(settings.tex != "context") notimplemented("minipage"); return "\startframedtext[none][frame=off,width="+(string) (width/pt)+ "pt]"+s+"\stopframedtext"; } void usepackage(string s, string options="") { if(!latex()) notimplemented("usepackage"); string usepackage="\usepackage"; if(options != "") usepackage += "["+options+"]"; texpreamble(usepackage+"{"+s+"}"); } void pause(string w="Hit enter to continue") { write(w); w=stdin; } string math(real x) { return math((string) x); } string format(string format, real x, string locale="") { return format(format,defaultseparator,x,locale); } string format(real x, string locale="") { return format(defaultformat,defaultseparator,x,locale); } string phantom(string s) { return settings.tex != "none" ? "\phantom{"+s+"}" : ""; } string[] spinner=new string[] {'|','/','-','\\'}; spinner.cyclic=true; void progress(bool3 init=default) { static int count=-1; static int lastseconds=-1; if(init == true) { lastseconds=0; write(stdout,' ',flush); } else if(init == default) { int seconds=seconds(); if(seconds > lastseconds) { lastseconds=seconds; write(stdout,'\b'+spinner[++count],flush); } } else write(stdout,'\b',flush); } restricted int ocgindex=0; ./asymptote-2.41/base/plain_margins.asy0000644000175000017500000000477013064427076020026 0ustar norbertnorbertstruct marginT { path g; real begin,end; }; typedef marginT margin(path, pen); path trim(path g, real begin, real end) { real a=arctime(g,begin); real b=arctime(g,arclength(g)-end); return a <= b ? subpath(g,a,b) : point(g,a); } margin operator +(margin ma, margin mb) { return new marginT(path g, pen p) { marginT margin; real ba=ma(g,p).begin < 0 ? 0 : ma(g,p).begin; real bb=mb(g,p).begin < 0 ? 0 : mb(g,p).begin; real ea=ma(g,p).end < 0 ? 0 : ma(g,p).end; real eb=mb(g,p).end < 0 ? 0 : mb(g,p).end; margin.begin=ba+bb; margin.end=ea+eb; margin.g=trim(g,margin.begin,margin.end); return margin; }; } margin NoMargin() { return new marginT(path g, pen) { marginT margin; margin.begin=margin.end=0; margin.g=g; return margin; }; } margin Margin(real begin, real end) { return new marginT(path g, pen p) { marginT margin; real factor=labelmargin(p); margin.begin=begin*factor; margin.end=end*factor; margin.g=trim(g,margin.begin,margin.end); return margin; }; } margin PenMargin(real begin, real end) { return new marginT(path g, pen p) { marginT margin; real factor=linewidth(p); margin.begin=(begin+0.5)*factor; margin.end=(end+0.5)*factor; margin.g=trim(g,margin.begin,margin.end); return margin; }; } margin DotMargin(real begin, real end) { return new marginT(path g, pen p) { marginT margin; real margindot(real x) {return x > 0 ? dotfactor*x : x;} real factor=linewidth(p); margin.begin=(margindot(begin)+0.5)*factor; margin.end=(margindot(end)+0.5)*factor; margin.g=trim(g,margin.begin,margin.end); return margin; }; } margin TrueMargin(real begin, real end) { return new marginT(path g, pen p) { marginT margin; margin.begin=begin; margin.end=end; margin.g=trim(g,begin,end); return margin; }; } margin NoMargin=NoMargin(), BeginMargin=Margin(1,0), Margin=Margin(0,1), EndMargin=Margin, Margins=Margin(1,1), BeginPenMargin=PenMargin(0.5,-0.5), PenMargin=PenMargin(-0.5,0.5), EndPenMargin=PenMargin, PenMargins=PenMargin(0.5,0.5), BeginDotMargin=DotMargin(0.5,-0.5), DotMargin=DotMargin(-0.5,0.5), EndDotMargin=DotMargin, DotMargins=DotMargin(0.5,0.5); ./asymptote-2.41/base/size10.asy0000644000175000017500000000114013064427076016302 0ustar norbertnorberttexpreamble("\makeatletter% \renewcommand\normalsize{\@setfontsize\normalsize\@xpt\@xiipt}% \renewcommand\small{\@setfontsize\small\@ixpt{11}}% \renewcommand\footnotesize{\@setfontsize\footnotesize\@viiipt{9.5}}% \renewcommand\scriptsize{\@setfontsize\scriptsize\@viipt\@viiipt}% \renewcommand\tiny{\@setfontsize\tiny\@vpt\@vipt}% \renewcommand\large{\@setfontsize\large\@xiipt{14}}% \renewcommand\Large{\@setfontsize\Large\@xivpt{18}}% \renewcommand\LARGE{\@setfontsize\LARGE\@xviipt{22}}% \renewcommand\huge{\@setfontsize\huge\@xxpt{25}}% \renewcommand\Huge{\@setfontsize\Huge\@xxvpt{30}}% \makeatother"); ./asymptote-2.41/base/tube.asy0000644000175000017500000001031113064427076016126 0ustar norbertnorbert// Author: Philippe Ivaldi // http://www.piprime.fr/ // Based on this paper: // http://www.cs.hku.hk/research/techreps/document/TR-2007-07.pdf // Note: the additional rotation for a cyclic smooth spine curve is not // yet properly determined. // TODO: Implement variational principles for RMF with boundary conditions: // minimum total angular speed OR minimum total squared angular speed import three; // A 3D version of roundedpath(path, real). path3 roundedpath(path3 A, real r) { // Author of this routine: Jens Schwaiger guide3 rounded; triple before, after, indir, outdir; int len=length(A); bool cyclic=cyclic(A); if(len < 2) {return A;}; if(cyclic) {rounded=point(point(A,0)--point(A,1),r);} else {rounded=point(A,0);} for(int i=1; i < len; i=i+1) { before=point(point(A,i)--point(A,i-1),r); after=point(point(A,i)--point(A,i+1),r); indir=dir(point(A,i-1)--point(A,i),1); outdir=dir(point(A,i)--point(A,i+1),1); rounded=rounded--before{indir}..{outdir}after; } if(cyclic) { before=point(point(A,0)--point(A,len-1),r); indir=dir(point(A,len-1)--point(A,0),1); outdir=dir(point(A,0)--point(A,1),1); rounded=rounded--before{indir}..{outdir}cycle; } else rounded=rounded--point(A,len); return rounded; } real[] sample(path3 g, real r, real relstep=0) { real[] t; int n=length(g); if(relstep <= 0) { for(int i=0; i < n; ++i) { real S=straightness(g,i); if(S < sqrtEpsilon*r) t.push(i); else render(subpath(g,i,i+1),new void(path3, real s) {t.push(i+s);}); } t.push(n); } else { int nb=ceil(1/relstep); relstep=n/nb; for(int i=0; i <= nb; ++i) t.push(i*relstep); } return t; } real degrees(rmf a, rmf b) { real d=degrees(acos1(dot(a.r,b.r))); real dt=dot(cross(a.r,b.r),a.t); d=dt > 0 ? d : 360-d; return d%360; } restricted int coloredNodes=1; restricted int coloredSegments=2; struct coloredpath { path p; pen[] pens(real); bool usepens=false; int colortype=coloredSegments; void operator init(path p, pen[] pens=new pen[] {currentpen}, int colortype=coloredSegments) { this.p=p; this.pens=new pen[] (real t) {return pens;}; this.usepens=true; this.colortype=colortype; } void operator init(path p, pen[] pens(real), int colortype=coloredSegments) { this.p=p; this.pens=pens; this.usepens=true; this.colortype=colortype; } void operator init(path p, pen pen(real)) { this.p=p; this.pens=new pen[] (real t) {return new pen[] {pen(t)};}; this.usepens=true; this.colortype=coloredSegments; } } coloredpath operator cast(path p) { coloredpath cp=coloredpath(p); cp.usepens=false; return cp; } coloredpath operator cast(guide p) { return coloredpath(p); } private surface surface(rmf[] R, real[] t, coloredpath cp, transform T(real), bool cyclic) { path g=cp.p; int l=length(g); bool[] planar; for(int i=0; i < l; ++i) planar[i]=straight(g,i); surface s; path3 sec=path3(T(t[0]/l)*g); real adjust=0; if(cyclic) adjust=-degrees(R[0],R[R.length-1])/(R.length-1); path3 sec1=shift(R[0].p)*transform3(R[0].r,R[0].s,R[0].t)*sec, sec2; for(int i=1; i < R.length; ++i) { sec=path3(T(t[i]/l)*g); sec2=shift(R[i].p)*transform3(R[i].r,cross(R[i].t,R[i].r),R[i].t)* rotate(i*adjust,Z)*sec; for(int j=0; j < l; ++j) { surface st=surface(subpath(sec1,j,j+1)--subpath(sec2,j+1,j)--cycle, planar=planar[j]); if(cp.usepens) { pen[] tp1=cp.pens(t[i-1]/l), tp2=cp.pens(t[i]/l); tp1.cyclic=true; tp2.cyclic=true; if(cp.colortype == coloredSegments) { st.colors(new pen[][] {{tp1[j],tp1[j],tp2[j],tp2[j]}}); } else { st.colors(new pen[][] {{tp1[j],tp1[j+1],tp2[j+1],tp2[j]}}); } } s.append(st); } sec1=sec2; } return s; } surface tube(path3 g, coloredpath section, transform T(real)=new transform(real t) {return identity();}, real corner=1, real relstep=0) { pair M=max(section.p), m=min(section.p); real[] t=sample(g,max(M.x-m.x,M.y-m.y)/max(realEpsilon,abs(corner)), min(abs(relstep),1)); bool cyclic=cyclic(g); t.cyclic=cyclic; return surface(rmf(g,t),t,section,T,cyclic); } ./asymptote-2.41/base/bezulate.asy0000644000175000017500000002253613064427076017016 0ustar norbertnorbert// Bezier triangulation routines written by Orest Shardt, 2008. private real fuzz=sqrtEpsilon; real duplicateFuzz=1e-3; // Work around font errors. real maxrefinements=10; private real[][] intersections(pair a, pair b, path p) { pair delta=fuzz*unit(b-a); return intersections(a-delta--b+delta,p,fuzz); } int countIntersections(path[] p, pair start, pair end) { int intersects=0; for(path q : p) intersects += intersections(start,end,q).length; return intersects; } path[][] containmentTree(path[] paths) { path[][] result; for(path g : paths) { // check if current curve contains or is contained in a group of curves int j; for(j=0; j < result.length; ++j) { path[] resultj=result[j]; int test=inside(g,resultj[0],zerowinding); if(test == 1) { // current curve contains group's toplevel curve; // replace toplevel curve with current curve resultj.insert(0,g); // check to see if any other groups are contained within this curve for(int k=j+1; k < result.length;) { if(inside(g,result[k][0],zerowinding) == 1) { resultj.append(result[k]); result.delete(k); } else ++k; } break; } else if(test == -1) { // current curve contained within group's toplevel curve resultj.push(g); break; } } // create a new group if this curve does not belong to another group if(j == result.length) result.push(new path[] {g}); } return result; } bool isDuplicate(pair a, pair b, real relSize) { return abs(a-b) <= duplicateFuzz*relSize; } path removeDuplicates(path p) { real relSize = abs(max(p)-min(p)); bool cyclic=cyclic(p); for(int i=0; i < length(p); ++i) { if(isDuplicate(point(p,i),point(p,i+1),relSize)) { p=subpath(p,0,i)&subpath(p,i+1,length(p)); --i; } } return cyclic ? p&cycle : p; } path section(path p, real t1, real t2, bool loop=false) { if(t2 < t1 || loop && t1 == t2) t2 += length(p); return subpath(p,t1,t2); } path uncycle(path p, real t) { return subpath(p,t,t+length(p)); } // returns outer paths void connect(path[] paths, path[] result, path[] patch) { path[][] tree=containmentTree(paths); for(path[] group : tree) { path outer = group[0]; group.delete(0); path[][] innerTree = containmentTree(group); path[] remainingCurves; path[] inners; for(path[] innerGroup:innerTree) { inners.push(innerGroup[0]); if(innerGroup.length>1) remainingCurves.append(innerGroup[1:]); } connect(remainingCurves,result,patch); real d=2*abs(max(outer)-min(outer)); while(inners.length > 0) { int curveIndex = 0; //pair direction=I*dir(inners[curveIndex],0,1); // Use outgoing direction //if(direction == 0) // Try a random direction // direction=expi(2pi*unitrand()); //pair start=point(inners[curveIndex],0); // find shortest distance between a node on the inner curve and a node // on the outer curve real mindist = d; int inner_i = 0; int outer_i = 0; for(int ni = 0; ni < length(inners[curveIndex]); ++ni) { for(int no = 0; no < length(outer); ++no) { real dist = abs(point(inners[curveIndex],ni)-point(outer,no)); if(dist < mindist) { inner_i = ni; outer_i = no; mindist = dist; } } } pair start=point(inners[curveIndex],inner_i); pair end = point(outer,outer_i); // find first intersection of line segment with outer curve //real[][] ints=intersections(start,start+d*direction,outer); real[][] ints=intersections(start,end,outer); assert(ints.length != 0); real endtime=ints[0][1]; // endtime is time on outer end = point(outer,endtime); // find first intersection of end--start with any inner curve real starttime=inner_i; // starttime is time on inners[curveIndex] real earliestTime=1; for(int j=0; j < inners.length; ++j) { real[][] ints=intersections(end,start,inners[j]); if(ints.length > 0 && ints[0][0] < earliestTime) { earliestTime=ints[0][0]; // time on end--start starttime=ints[0][1]; // time on inner curve curveIndex=j; } } start=point(inners[curveIndex],starttime); bool found_forward = false; real timeoffset_forward = 2; path portion_forward; path[] allCurves = {outer}; allCurves.append(inners); while(!found_forward && timeoffset_forward > fuzz) { timeoffset_forward /= 2; if(countIntersections(allCurves,start, point(outer,endtime+timeoffset_forward)) == 2) { portion_forward = subpath(outer,endtime,endtime+timeoffset_forward)--start--cycle; found_forward=true; // check if an inner curve is inside the portion for(int k = 0; found_forward && k < inners.length; ++k) { if(k!=curveIndex && inside(portion_forward,point(inners[k],0),zerowinding)) found_forward = false; } } } bool found_backward = false; real timeoffset_backward = -2; path portion_backward; while(!found_backward && timeoffset_backward < -fuzz) { timeoffset_backward /= 2; if(countIntersections(allCurves,start, point(outer,endtime+timeoffset_backward))==2) { portion_backward = subpath(outer,endtime+timeoffset_backward,endtime)--start--cycle; found_backward = true; // check if an inner curve is inside the portion for(int k = 0; found_backward && k < inners.length; ++k) { if(k!=curveIndex && inside(portion_backward,point(inners[k],0),zerowinding)) found_backward = false; } } } assert(found_forward || found_backward); real timeoffset; path portion; if(found_forward && !found_backward) { timeoffset = timeoffset_forward; portion = portion_forward; } else if(found_backward && !found_forward) { timeoffset = timeoffset_backward; portion = portion_backward; } else // assert handles case of neither found { if(timeoffset_forward > -timeoffset_backward) { timeoffset = timeoffset_forward; portion = portion_forward; } else { timeoffset = timeoffset_backward; portion = portion_backward; } } endtime=min(endtime,endtime+timeoffset); // or go from timeoffset+timeoffset_backward to timeoffset+timeoffset_forward? timeoffset=abs(timeoffset); // depends on the curves having opposite orientations path remainder=section(outer,endtime+timeoffset,endtime) --uncycle(inners[curveIndex], starttime)--cycle; inners.delete(curveIndex); outer = remainder; patch.append(portion); } result.append(outer); } } bool checkSegment(path g, pair p, pair q) { pair mid=0.5*(p+q); return intersections(p,q,g).length == 2 && inside(g,mid,zerowinding) && intersections(g,mid).length == 0; } path subdivide(path p) { path q; int l=length(p); for(int i=0; i < l; ++i) q=q&(straight(p,i) ? subpath(p,i,i+1) : subpath(p,i,i+0.5)&subpath(p,i+0.5,i+1)); return cyclic(p) ? q&cycle : q; } path[] bezulate(path[] p) { if(p.length == 1 && length(p[0]) <= 4) return p; path[] patch; path[] result; connect(p,result,patch); for(int i=0; i < result.length; ++i) { path p=result[i]; int refinements=0; if(size(p) <= 1) return p; if(!cyclic(p)) abort("path must be cyclic and nonselfintersecting."); p=removeDuplicates(p); if(length(p) > 4) { static real SIZE_STEPS=10; static real factor=1.05/SIZE_STEPS; for(int k=1; k <= SIZE_STEPS; ++k) { real L=factor*k*abs(max(p)-min(p)); for(int i=0; length(p) > 4 && i < length(p); ++i) { bool found=false; pair start=point(p,i); //look for quadrilaterals and triangles with one line, 4 | 3 curves for(int desiredSides=4; !found && desiredSides >= 3; --desiredSides) { if(desiredSides == 3 && length(p) <= 3) break; pair end; int endi=i+desiredSides-1; end=point(p,endi); found=checkSegment(p,start,end) && abs(end-start) < L; if(found) { path p1=subpath(p,endi,i+length(p))--cycle; patch.append(subpath(p,i,endi)--cycle); p=removeDuplicates(p1); i=-1; // increment will make i be 0 } } if(!found && k == SIZE_STEPS && length(p) > 4 && i == length(p)-1) { // avoid infinite recursion ++refinements; if(refinements > maxrefinements) { warning("subdivisions","too many subdivisions",position=true); } else { p=subdivide(p); i=-1; } } } } } if(length(p) <= 4) patch.append(p); } return patch; } ./asymptote-2.41/base/embed.asy0000644000175000017500000000223713064427076016253 0ustar norbertnorbertif(latex()) { usepackage("hyperref"); texpreamble("\hypersetup{"+settings.hyperrefOptions+"}"); usepackage("media9","bigfiles"); } // For documentation of the options see // http://mirror.ctan.org/macros/latex/contrib/media9/doc/media9.pdf // Embed PRC or SWF content in pdf file string embedplayer(string name, string text="", string options="", real width=0, real height=0) { if(width != 0) options += ",width="+(string) (width/pt)+"pt"; if(height != 0) options += ",height="+(string) (height/pt)+"pt"; return "% \includemedia[noplaybutton,"+options+"]{"+text+"}{"+name+"}"; } // Embed media in pdf file string embed(string name, string text="", string options="", real width=0, real height=0) { return embedplayer("VPlayer.swf",text,"label="+name+ ",activate=pageopen,addresource="+name+ ",flashvars={source="+name+"&scaleMode=letterbox},"+ options,width,height); } string link(string label, string text="Play") { return "\PushButton[ onclick={ annotRM['"+label+"'].activated=true; annotRM['"+label+"'].callAS('playPause'); }]{\fbox{"+text+"}}"; } ./asymptote-2.41/base/simplex.asy0000644000175000017500000001535113064427076016661 0ustar norbertnorbert/***** * simplex.asy * Andy Hammerlindl 2004/07/27 * * Solves the two-variable linear programming problem using the simplex method. * This problem is specialized in that the second variable, "b", does not have * a non-negativity condition, and the first variable, "a", is the quantity * being maximized. * Correct execution of the algorithm also assumes that the coefficient of "b" * will be +1 or -1 in every added restriction, and that the problem can be * initialized to a valid state by pivoting b with one of the slack * variables. This assumption may in fact be incorrect. *****/ private real infinity=sqrt(0.25*realMax); struct problem { typedef int var; static var VAR_A = 0; static var VAR_B = 1; static int OPTIMAL = -1; static var UNBOUNDED = -2; static int INVALID = -3; struct row { real c, t[]; } // The variables of the rows. // Initialized for the two variable problem. var[] v = {VAR_A, VAR_B}; // The rows of equalities. row rowA() { row r = new row; r.c = 0; r.t = new real[] {1, 0}; return r; } row rowB() { row r = new row; r.c = 0; r.t = new real[] {0, 1}; return r; } row[] rows = {rowA(), rowB()}; // The number of original variables. int n = rows.length; // Pivot the variable v[col] with vp. void pivot(int col, var vp) { var vc=v[col]; // Recalculate rows v[col] and vp for the pivot-swap. row rvc = rows[vc], rvp = rows[vp]; real factor=1/rvp.t[col]; // NOTE: Handle rvp.t[col] == 0 case. rvc.c=-rvp.c*factor; rvp.c=0; rvc.t=-rvp.t*factor; rvp.t *= 0; rvc.t[col]=factor; rvp.t[col]=1; var a=min(vc,vp); var b=max(vc,vp); // Recalculate the rows other than the two used for the above pivot. for (var i = 0; i < a; ++i) { row r=rows[i]; real m = r.t[col]; r.c += m*rvc.c; r.t += m*rvc.t; r.t[col]=m*factor; } for (var i = a+1; i < b; ++i) { row r=rows[i]; real m = r.t[col]; r.c += m*rvc.c; r.t += m*rvc.t; r.t[col]=m*factor; } for (var i = b+1; i < rows.length; ++i) { row r=rows[i]; real m = r.t[col]; r.c += m*rvc.c; r.t += m*rvc.t; r.t[col]=m*factor; } // Relabel the vars. v[col] = vp; } // As b does not have a non-negativity condition, it must initially be // pivoted out for a variable that does. This selects the initial // variable to pivot with b. It also assumes that there is a valid // solution with a == 0 to the linear programming problem, and if so, it // picks a pivot to get to that state. In our case, a == 0 corresponds to // a picture with the user coordinates shrunk down to zero, and if that // doesn't fit, nothing will. var initVar() { real min=infinity, max=-infinity; var argmin=0, argmax=0; for (var i = 2; i < rows.length; ++i) { row r=rows[i]; if (r.t[VAR_B] > 0) { real val=r.c/r.t[VAR_B]; if (val < min) { min=val; argmin=i; } } else if (r.t[VAR_B] < 0) { real val=r.c/r.t[VAR_B]; if (val > max) { max=val; argmax=i; } } } // If b has a minimal value, choose a pivot that will give b its minimal // value. Otherwise, if b has maximal value, choose a pivot to give b its // maximal value. return argmin != 0 ? argmin : argmax != 0 ? argmax : UNBOUNDED; } // Initialize the linear program problem by moving into an acceptable state // this assumes that b is unrestrained and is the second variable. // NOTE: Works in limited cases, may be bug-ridden. void init() { // Find the lowest constant term in the equations. var lowest = 0; for (var i = 2; i < rows.length; ++i) { if (rows[i].c < rows[lowest].c) lowest = i; } // Pivot if necessary. if (lowest != 0) pivot(VAR_B, lowest); } // Selects a column to pivot on. Returns OPTIMAL if the current state is // optimal. Assumes we are optimizing the first row. int selectColumn() { int i=find(rows[0].t > 0,1); return (i >= 0) ? i : OPTIMAL; } // Select the new variable associated with a pivot on the column given. // Returns UNBOUNDED if the space is unbounded. var selectVar(int col) { // We assume that the first two vars (a and b) once swapped out, won't be // swapped back in. This finds the variable which gives the tightest // non-negativity condition restricting our optimization. This turns // out to be the max of c/t[col]. Note that as c is positive, and // t[col] is negative, all c/t[col] will be negative, so we are finding // the smallest in magnitude. var vp=UNBOUNDED; real max=-infinity; for (int i = 2; i < rows.length; ++i) { row r=rows[i]; if(r.c < max*r.t[col]) { max=r.c/r.t[col]; vp=i; } } return vp; } // Checks that the rows are in a valid state. bool valid() { // Checks that constants are valid. bool validConstants() { for (int i = 0; i < rows.length; ++i) // Do not test the row for b, as it does not have a non-negativity // condition. if (i != VAR_B && rows[i].c < 0) return false; return true; } // Check a variable to see if its row is simple. // NOTE: Simple rows could be optimized out, since they are not really // used. bool validVar(int col) { var vc = v[col]; row rvc = rows[vc]; if (rvc.c != 0) return false; for (int i = 0; i < n; ++i) if (rvc.t[i] != (i == col ? 1 : 0)) return false; return true; } if (!validConstants()) { return false; } for (int i = 0; i < n; ++i) if (!validVar(i)) { return false; } return true; } // Perform the algorithm to find the optimal solution. Returns OPTIMAL, // UNBOUNDED, or INVALID (if no solution is possible). int optimize() { // Put into a valid state to begin and pivot b out. var iv=initVar(); if (iv == UNBOUNDED) return iv; pivot(VAR_B, iv); if (!valid()) return INVALID; while(true) { int col = selectColumn(); if (col == OPTIMAL) return col; var vp = selectVar(col); if (vp == UNBOUNDED) return vp; pivot(col, vp); } // Shouldn't reach here. return INVALID; } // Add a restriction to the problem: // t1*a + t2*b + c >= 0 void addRestriction(real t1, real t2, real c) { row r = new row; r.c = c; r.t = new real[] {t1, t2}; rows.push(r); } // Return the value of a computed. real a() { return rows[VAR_A].c; } // Return the value of b computed. real b() { return rows[VAR_B].c; } } ./asymptote-2.41/base/three_surface.asy0000644000175000017500000021541713064427076020024 0ustar norbertnorbertimport bezulate; private import interpolate; int nslice=12; real camerafactor=1.2; string meshname(string name) {return name+" mesh";} private real Fuzz=10.0*realEpsilon; private real nineth=1/9; // Return the default Coons interior control point for a Bezier triangle // based on the cyclic path3 external. triple coons3(path3 external) { return 0.25*(precontrol(external,0)+postcontrol(external,0)+ precontrol(external,1)+postcontrol(external,1)+ precontrol(external,2)+postcontrol(external,2))- (point(external,0)+point(external,1)+point(external,2))/6; } struct patch { triple[][] P; pen[] colors; // Optionally specify 4 corner colors. bool straight; // Patch is based on a piecewise straight external path. bool3 planar; // Patch is planar. bool triangular; // Patch is a Bezier triangle. path3 external() { return straight ? P[0][0]--P[3][0]--P[3][3]--P[0][3]--cycle : P[0][0]..controls P[1][0] and P[2][0].. P[3][0]..controls P[3][1] and P[3][2].. P[3][3]..controls P[2][3] and P[1][3].. P[0][3]..controls P[0][2] and P[0][1]..cycle; } path3 externaltriangular() { return P[0][0]..controls P[1][0] and P[2][0].. P[3][0]..controls P[3][1] and P[3][2].. P[3][3]..controls P[2][2] and P[1][1]..cycle; } triple[] internal() { return new triple[] {P[1][1],P[2][1],P[2][2],P[1][2]}; } triple[] internaltriangular() { return new triple[] {P[2][1]}; } triple cornermean() { return 0.25*(P[0][0]+P[0][3]+P[3][0]+P[3][3]); } triple cornermeantriangular() { return (P[0][0]+P[3][0]+P[3][3])/3; } triple[] corners() {return new triple[] {P[0][0],P[3][0],P[3][3],P[0][3]};} triple[] cornerstriangular() {return new triple[] {P[0][0],P[3][0],P[3][3]};} real[] map(real f(triple)) { return new real[] {f(P[0][0]),f(P[3][0]),f(P[3][3]),f(P[0][3])}; } real[] maptriangular(real f(triple)) { return new real[] {f(P[0][0]),f(P[3][0]),f(P[3][3])}; } triple Bu(int j, real u) {return bezier(P[0][j],P[1][j],P[2][j],P[3][j],u);} triple BuP(int j, real u) { return bezierP(P[0][j],P[1][j],P[2][j],P[3][j],u); } triple BuPP(int j, real u) { return bezierPP(P[0][j],P[1][j],P[2][j],P[3][j],u); } triple BuPPP(int j) {return bezierPPP(P[0][j],P[1][j],P[2][j],P[3][j]);} path3 uequals(real u) { triple z0=Bu(0,u); triple z1=Bu(3,u); return path3(new triple[] {z0,Bu(2,u)},new triple[] {z0,z1}, new triple[] {Bu(1,u),z1},new bool[] {straight,false},false); } triple Bv(int i, real v) {return bezier(P[i][0],P[i][1],P[i][2],P[i][3],v);} triple BvP(int i, real v) { return bezierP(P[i][0],P[i][1],P[i][2],P[i][3],v); } triple BvPP(int i, real v) { return bezierPP(P[i][0],P[i][1],P[i][2],P[i][3],v); } triple BvPPP(int i) {return bezierPPP(P[i][0],P[i][1],P[i][2],P[i][3]);} path3 vequals(real v) { triple z0=Bv(0,v); triple z1=Bv(3,v); return path3(new triple[] {z0,Bv(2,v)},new triple[] {z0,z1}, new triple[] {Bv(1,v),z1},new bool[] {straight,false},false); } triple point(real u, real v) { return bezier(Bu(0,u),Bu(1,u),Bu(2,u),Bu(3,u),v); } // compute normal vectors for degenerate cases private triple normal0(real u, real v, real epsilon) { triple n=0.5*(cross(bezier(BuPP(0,u),BuPP(1,u),BuPP(2,u),BuPP(3,u),v), bezier(BvP(0,v),BvP(1,v),BvP(2,v),BvP(3,v),u))+ cross(bezier(BuP(0,u),BuP(1,u),BuP(2,u),BuP(3,u),v), bezier(BvPP(0,v),BvPP(1,v),BvPP(2,v),BvPP(3,v),u))); return abs(n) > epsilon ? n : 0.25*cross(bezier(BuPP(0,u),BuPP(1,u),BuPP(2,u),BuPP(3,u),v), bezier(BvPP(0,v),BvPP(1,v),BvPP(2,v),BvPP(3,v),u))+ 1/6*(cross(bezier(BuP(0,u),BuP(1,u),BuP(2,u),BuP(3,u),v), bezier(BvPPP(0),BvPPP(1),BvPPP(2),BvPPP(3),u))+ cross(bezier(BuPPP(0),BuPPP(1),BuPPP(2),BuPPP(3),v), bezier(BvP(0,v),BvP(1,v),BvP(2,v),BvP(3,v),u)))+ 1/12*(cross(bezier(BuPPP(0),BuPPP(1),BuPPP(2),BuPPP(3),v), bezier(BvPP(0,v),BvPP(1,v),BvPP(2,v),BvPP(3,v),u))+ cross(bezier(BuPP(0,u),BuPP(1,u),BuPP(2,u),BuPP(3,u),v), bezier(BvPPP(0),BvPPP(1),BvPPP(2),BvPPP(3),u)))+ 1/36*cross(bezier(BuPPP(0),BuPPP(1),BuPPP(2),BuPPP(3),v), bezier(BvPPP(0),BvPPP(1),BvPPP(2),BvPPP(3),u)); } static real fuzz=1000*realEpsilon; triple partialu(real u, real v) { return bezier(BuP(0,u),BuP(1,u),BuP(2,u),BuP(3,u),v); } triple partialv(real u, real v) { return bezier(BvP(0,v),BvP(1,v),BvP(2,v),BvP(3,v),u); } triple normal(real u, real v) { triple n=cross(partialu(u,v),partialv(u,v)); real epsilon=fuzz*change2(P); return (abs(n) > epsilon) ? n : normal0(u,v,epsilon); } triple normal00() { triple n=9*cross(P[1][0]-P[0][0],P[0][1]-P[0][0]); real epsilon=fuzz*change2(P); return abs(n) > epsilon ? n : normal0(0,0,epsilon); } triple normal10() { triple n=9*cross(P[3][0]-P[2][0],P[3][1]-P[3][0]); real epsilon=fuzz*change2(P); return abs(n) > epsilon ? n : normal0(1,0,epsilon); } triple normal11() { triple n=9*cross(P[3][3]-P[2][3],P[3][3]-P[3][2]); real epsilon=fuzz*change2(P); return abs(n) > epsilon ? n : normal0(1,1,epsilon); } triple normal01() { triple n=9*cross(P[1][3]-P[0][3],P[0][3]-P[0][2]); real epsilon=fuzz*change2(P); return abs(n) > epsilon ? n : normal0(0,1,epsilon); } triple pointtriangular(real u, real v) { real w=1-u-v; return w^2*(w*P[0][0]+3*(u*P[1][0]+v*P[1][1]))+ u^2*(3*(w*P[2][0]+v*P[3][1])+u*P[3][0])+ 6*u*v*w*P[2][1]+v^2*(3*(w*P[2][2]+u*P[3][2])+v*P[3][3]); } triple bu(real u, real v) { // Compute one-third of the directional derivative of a Bezier triangle // in the u direction at (u,v). real w=1-u-v; return -w^2*P[0][0]+w*(w-2*u)*P[1][0]-2*w*v*P[1][1]+u*(2*w-u)*P[2][0]+ 2*v*(w-u)*P[2][1]-v^2*P[2][2]+u^2*P[3][0]+2*u*v*P[3][1]+v^2*P[3][2]; } triple buu(real u, real v) { // Compute one-sixth of the second directional derivative of a Bezier // triangle in the u direction at (u,v). real w=1-u-v; return w*P[0][0]+(u-2*w)*P[1][0]+v*P[1][1]+(w-2*u)*P[2][0]-2*v*P[2][1]+ u*P[3][0]+v*P[3][1]; } triple buuu() { // Compute one-sixth of the third directional derivative of a Bezier // triangle in the u direction at (u,v). return -P[0][0]+3*P[1][0]-3*P[2][0]+P[3][0]; } triple bv(real u, real v) { // Compute one-third of the directional derivative of a Bezier triangle // in the v direction at (u,v). real w=1-u-v; return -w^2*P[0][0]-2*u*w*P[1][0]+w*(w-2*v)*P[1][1]-u^2*P[2][0]+ 2*u*(w-v)*P[2][1]+v*(2*w-v)*P[2][2]+u*u*P[3][1]+2*u*v*P[3][2]+ v^2*P[3][3]; } triple bvv(real u, real v) { // Compute one-sixth of the second directional derivative of a Bezier // triangle in the v direction at (u,v). real w=1-u-v; return w*P[0][0]+u*P[1][0]+(v-2*w)*P[1][1]-2*u*P[2][1]+(w-2*v)*P[2][2]+ u*P[3][2]+v*P[3][3]; } triple bvvv() { // Compute one-sixth of the third directional derivative of a Bezier // triangle in the v direction at (u,v). return -P[0][0]+3*P[1][1]-3*P[2][2]+P[3][3]; } // compute normal vectors for a degenerate Bezier triangle private triple normaltriangular0(real u, real v, real epsilon) { triple n=9*(cross(buu(u,v),bv(u,v))+ cross(bu(u,v),bvv(u,v))); return abs(n) > epsilon ? n : 9*cross(buu(u,v),bvv(u,v))+ 3*(cross(buuu(),bv(u,v))+cross(bu(u,v),bvvv())+ cross(buuu(),bvv(u,v))+cross(buu(u,v),bvvv()))+ cross(buuu(),bvvv()); } // Compute the normal of a Bezier triangle at (u,v) triple normaltriangular(real u, real v) { triple n=9*cross(bu(u,v),bv(u,v)); real epsilon=fuzz*change2(P); return (abs(n) > epsilon) ? n : normal0(u,v,epsilon); } triple normal00triangular() { triple n=9*cross(P[1][0]-P[0][0],P[1][1]-P[0][0]); real epsilon=fuzz*change2(P); return abs(n) > epsilon ? n : normaltriangular0(0,0,epsilon); } triple normal10triangular() { triple n=9*cross(P[3][0]-P[2][0],P[3][1]-P[2][0]); real epsilon=fuzz*change2(P); return abs(n) > epsilon ? n : normaltriangular0(1,0,epsilon); } triple normal01triangular() { triple n=9*cross(P[3][2]-P[2][2],P[3][3]-P[2][2]); real epsilon=fuzz*change2(P); return abs(n) > epsilon ? n : normaltriangular0(0,1,epsilon); } pen[] colors(material m, light light=currentlight) { bool nocolors=colors.length == 0; if(planar) { triple normal=normal(0.5,0.5); return new pen[] {color(normal,nocolors ? m : colors[0],light), color(normal,nocolors ? m : colors[1],light), color(normal,nocolors ? m : colors[2],light), color(normal,nocolors ? m : colors[3],light)}; } return new pen[] {color(normal00(),nocolors ? m : colors[0],light), color(normal10(),nocolors ? m : colors[1],light), color(normal11(),nocolors ? m : colors[2],light), color(normal01(),nocolors ? m : colors[3],light)}; } pen[] colorstriangular(material m, light light=currentlight) { bool nocolors=colors.length == 0; if(planar) { triple normal=normal(1/3,1/3); return new pen[] {color(normal,nocolors ? m : colors[0],light), color(normal,nocolors ? m : colors[1],light), color(normal,nocolors ? m : colors[2],light)}; } return new pen[] {color(normal00(),nocolors ? m : colors[0],light), color(normal10(),nocolors ? m : colors[1],light), color(normal01(),nocolors ? m : colors[2],light)}; } triple min3,max3; bool havemin3,havemax3; void init() { havemin3=false; havemax3=false; if(triangular) { external=externaltriangular; internal=internaltriangular; cornermean=cornermeantriangular; corners=cornerstriangular; map=maptriangular; point=pointtriangular; normal=normaltriangular; normal00=normal00triangular; normal10=normal10triangular; normal01=normal01triangular; colors=colorstriangular; uequals=new path3(real u) {return nullpath3;}; vequals=new path3(real u) {return nullpath3;}; } } triple min(triple bound=P[0][0]) { if(havemin3) return minbound(min3,bound); havemin3=true; return min3=minbezier(P,bound); } triple max(triple bound=P[0][0]) { if(havemax3) return maxbound(max3,bound); havemax3=true; return max3=maxbezier(P,bound); } triple center() { return 0.5*(this.min()+this.max()); } pair min(projection P, pair bound=project(this.P[0][0],P.t)) { triple[][] Q=P.T.modelview*this.P; if(P.infinity) return xypart(minbezier(Q,(bound.x,bound.y,0))); real d=P.T.projection[3][2]; return maxratio(Q,d*bound)/d; // d is negative } pair max(projection P, pair bound=project(this.P[0][0],P.t)) { triple[][] Q=P.T.modelview*this.P; if(P.infinity) return xypart(maxbezier(Q,(bound.x,bound.y,0))); real d=P.T.projection[3][2]; return minratio(Q,d*bound)/d; // d is negative } void operator init(triple[][] P, pen[] colors=new pen[], bool straight=false, bool3 planar=default, bool triangular=false, bool copy=true) { this.P=copy ? copy(P) : P; if(colors.length != 0) this.colors=copy(colors); this.straight=straight; this.planar=planar; this.triangular=triangular; init(); } void operator init(pair[][] P, triple plane(pair)=XYplane, bool straight=false, bool triangular=false) { triple[][] Q=new triple[4][]; for(int i=0; i < 4; ++i) { pair[] Pi=P[i]; Q[i]=sequence(new triple(int j) {return plane(Pi[j]);},4); } operator init(Q,straight,planar=true,triangular); } void operator init(patch s) { operator init(s.P,s.colors,s.straight,s.planar,s.triangular); } // A constructor for a cyclic path3 of length 3 with a specified // internal point, corner normals, and pens (rendered as a Bezier triangle). void operator init(path3 external, triple internal, pen[] colors=new pen[], bool3 planar=default) { triangular=true; this.planar=planar; init(); if(colors.length != 0) this.colors=copy(colors); P=new triple[][] { {point(external,0)}, {postcontrol(external,0),precontrol(external,0)}, {precontrol(external,1),internal,postcontrol(external,2)}, {point(external,1),postcontrol(external,1),precontrol(external,2), point(external,2)} }; } // A constructor for a convex cyclic path3 of length <= 4 with optional // arrays of internal points (4 for a Bezier patch, 1 for a Bezier // triangle), and pens. void operator init(path3 external, triple[] internal=new triple[], pen[] colors=new pen[], bool3 planar=default) { if(internal.length == 0 && planar == default) this.planar=normal(external) != O; else this.planar=planar; int L=length(external); if(L == 3) { operator init(external,internal.length == 1 ? internal[0] : coons3(external),colors,this.planar); straight=piecewisestraight(external); return; } if(L > 4 || !cyclic(external)) abort("cyclic path3 of length <= 4 expected"); if(L == 1) { external=external--cycle--cycle--cycle; if(colors.length > 0) colors.append(array(3,colors[0])); } else if(L == 2) { external=external--cycle--cycle; if(colors.length > 0) colors.append(array(2,colors[0])); } init(); if(colors.length != 0) this.colors=copy(colors); if(internal.length == 0) { straight=piecewisestraight(external); internal=new triple[4]; for(int j=0; j < 4; ++j) internal[j]=nineth*(-4*point(external,j) +6*(precontrol(external,j)+postcontrol(external,j)) -2*(point(external,j-1)+point(external,j+1)) +3*(precontrol(external,j-1)+ postcontrol(external,j+1)) -point(external,j+2)); } P=new triple[][] { {point(external,0),precontrol(external,0),postcontrol(external,3), point(external,3)}, {postcontrol(external,0),internal[0],internal[3],precontrol(external,3)}, {precontrol(external,1),internal[1],internal[2],postcontrol(external,2)}, {point(external,1),postcontrol(external,1),precontrol(external,2), point(external,2)} }; } // A constructor for a convex quadrilateral. void operator init(triple[] external, triple[] internal=new triple[], pen[] colors=new pen[], bool3 planar=default) { init(); if(internal.length == 0 && planar == default) this.planar=normal(external) != O; else this.planar=planar; if(colors.length != 0) this.colors=copy(colors); if(internal.length == 0) { internal=new triple[4]; for(int j=0; j < 4; ++j) internal[j]=nineth*(4*external[j]+2*external[(j+1)%4]+ external[(j+2)%4]+2*external[(j+3)%4]); } straight=true; triple delta[]=new triple[4]; for(int j=0; j < 4; ++j) delta[j]=(external[(j+1)% 4]-external[j])/3; P=new triple[][] { {external[0],external[0]-delta[3],external[3]+delta[3],external[3]}, {external[0]+delta[0],internal[0],internal[3],external[3]-delta[2]}, {external[1]-delta[0],internal[1],internal[2],external[2]+delta[2]}, {external[1],external[1]+delta[1],external[2]-delta[1],external[2]} }; } } patch operator * (transform3 t, patch s) { patch S; S.P=new triple[s.P.length][]; for(int i=0; i < s.P.length; ++i) { triple[] si=s.P[i]; triple[] Si=S.P[i]; for(int j=0; j < si.length; ++j) Si[j]=t*si[j]; } S.colors=copy(s.colors); S.planar=s.planar; S.straight=s.straight; S.triangular=s.triangular; S.init(); return S; } patch reverse(patch s) { assert(!s.triangular); patch S; S.P=transpose(s.P); if(s.colors.length > 0) S.colors=new pen[] {s.colors[0],s.colors[3],s.colors[2],s.colors[1]}; S.straight=s.straight; S.planar=s.planar; return S; } // Return a degenerate tensor patch representation of a Bezier triangle. patch tensor(patch s) { if(!s.triangular) return patch(s); triple[][] P=s.P; return patch(new triple[][] {{P[0][0],P[0][0],P[0][0],P[0][0]}, {P[1][0],P[1][0]*2/3+P[1][1]/3,P[1][0]/3+P[1][1]*2/3,P[1][1]}, {P[2][0],P[2][0]/3+P[2][1]*2/3,P[2][1]*2/3+P[2][2]/3,P[2][2]}, {P[3][0],P[3][1],P[3][2],P[3][3]}}, s.colors.length > 0 ? new pen[] {s.colors[0],s.colors[1],s.colors[2],s.colors[0]} : new pen[], s.straight,s.planar,false,false); } // Return the tensor product patch control points corresponding to path p // and points internal. pair[][] tensor(path p, pair[] internal) { return new pair[][] { {point(p,0),precontrol(p,0),postcontrol(p,3),point(p,3)}, {postcontrol(p,0),internal[0],internal[3],precontrol(p,3)}, {precontrol(p,1),internal[1],internal[2],postcontrol(p,2)}, {point(p,1),postcontrol(p,1),precontrol(p,2),point(p,2)} }; } // Return the Coons patch control points corresponding to path p. pair[][] coons(path p) { int L=length(p); if(L == 1) p=p--cycle--cycle--cycle; else if(L == 2) p=p--cycle--cycle; else if(L == 3) p=p--cycle; pair[] internal=new pair[4]; for(int j=0; j < 4; ++j) { internal[j]=nineth*(-4*point(p,j) +6*(precontrol(p,j)+postcontrol(p,j)) -2*(point(p,j-1)+point(p,j+1)) +3*(precontrol(p,j-1)+postcontrol(p,j+1)) -point(p,j+2)); } return tensor(p,internal); } // Decompose a possibly nonconvex cyclic path into an array of paths that // yield nondegenerate Coons patches. path[] regularize(path p, bool checkboundary=true) { path[] s; if(!cyclic(p)) abort("cyclic path expected"); int L=length(p); if(L > 4) { for(path g : bezulate(p)) s.append(regularize(g,checkboundary)); return s; } bool straight=piecewisestraight(p); if(L <= 3 && straight) { return new path[] {p}; } // Split p along the angle bisector at t. bool split(path p, real t) { pair dir=dir(p,t); if(dir != 0) { path g=subpath(p,t,t+length(p)); int L=length(g); pair z=point(g,0); real[] T=intersections(g,z,z+I*dir); for(int i=0; i < T.length; ++i) { real cut=T[i]; if(cut > sqrtEpsilon && cut < L-sqrtEpsilon) { pair w=point(g,cut); if(!inside(p,0.5*(z+w),zerowinding)) continue; pair delta=sqrtEpsilon*(w-z); if(intersections(g,z-delta--w+delta).length != 2) continue; s.append(regularize(subpath(g,0,cut)--cycle,checkboundary)); s.append(regularize(subpath(g,cut,L)--cycle,checkboundary)); return true; } } } return false; } // Ensure that all interior angles are less than 180 degrees. real fuzz=1e-4; int sign=sgn(windingnumber(p,inside(p,zerowinding))); for(int i=0; i < L; ++i) { if(sign*(conj(dir(p,i,-1))*dir(p,i,1)).y < -fuzz) { if(split(p,i)) return s; } } if(straight) return new path[] {p}; pair[][] P=coons(p); // Check for degeneracy. pair[][] U=new pair[3][4]; pair[][] V=new pair[4][3]; for(int i=0; i < 3; ++i) { for(int j=0; j < 4; ++j) U[i][j]=P[i+1][j]-P[i][j]; } for(int i=0; i < 4; ++i) { for(int j=0; j < 3; ++j) V[i][j]=P[i][j+1]-P[i][j]; } int[] choose2={1,2,1}; int[] choose3={1,3,3,1}; real T[][]=new real[6][6]; for(int p=0; p < 6; ++p) { int kstart=max(p-2,0); int kstop=min(p,3); real[] Tp=T[p]; for(int q=0; q < 6; ++q) { real Tpq; int jstop=min(q,3); int jstart=max(q-2,0); for(int k=kstart; k <= kstop; ++k) { int choose3k=choose3[k]; for(int j=jstart; j <= jstop; ++j) { int i=p-k; int l=q-j; Tpq += (conj(U[i][j])*V[k][l]).y* choose2[i]*choose3k*choose3[j]*choose2[l]; } } Tp[q]=Tpq; } } bool3 aligned=default; bool degenerate=false; for(int p=0; p < 6; ++p) { for(int q=0; q < 6; ++q) { if(aligned == default) { if(T[p][q] > sqrtEpsilon) aligned=true; if(T[p][q] < -sqrtEpsilon) aligned=false; } else { if((T[p][q] > sqrtEpsilon && aligned == false) || (T[p][q] < -sqrtEpsilon && aligned == true)) degenerate=true; } } } if(!degenerate) { if(aligned == (sign >= 0)) return new path[] {p}; return s; } if(checkboundary) { // Polynomial coefficients of (B_i'' B_j + B_i' B_j')/3. static real[][][] fpv0={ {{5, -20, 30, -20, 5}, {-3, 24, -54, 48, -15}, {0, -6, 27, -36, 15}, {0, 0, -3, 8, -5}}, {{-7, 36, -66, 52, -15}, {3, -36, 108, -120, 45}, {0, 6, -45, 84, -45}, {0, 0, 3, -16, 15}}, {{2, -18, 45, -44, 15}, {0, 12, -63, 96, -45}, {0, 0, 18, -60, 45}, {0, 0, 0, 8, -15}}, {{0, 2, -9, 12, -5}, {0, 0, 9, -24, 15}, {0, 0, 0, 12, -15}, {0, 0, 0, 0, 5}} }; // Compute one-ninth of the derivative of the Jacobian along the boundary. real[][] c=array(4,array(5,0.0)); for(int i=0; i < 4; ++i) { real[][] fpv0i=fpv0[i]; for(int j=0; j < 4; ++j) { real[] w=fpv0i[j]; c[0] += w*(conj(P[i][0])*(P[j][1]-P[j][0])).y; // v=0 c[1] += w*(conj(P[3][j]-P[2][j])*P[3][i]).y; // u=1 c[2] += w*(conj(P[i][3])*(P[j][3]-P[j][2])).y; // v=1 c[3] += w*(conj(P[0][j]-P[1][j])*P[0][i]).y; // u=0 } } pair BuP(int j, real u) { return bezierP(P[0][j],P[1][j],P[2][j],P[3][j],u); } pair BvP(int i, real v) { return bezierP(P[i][0],P[i][1],P[i][2],P[i][3],v); } real normal(real u, real v) { return (conj(bezier(BuP(0,u),BuP(1,u),BuP(2,u),BuP(3,u),v))* bezier(BvP(0,v),BvP(1,v),BvP(2,v),BvP(3,v),u)).y; } // Use Rolle's theorem to check for degeneracy on the boundary. real M=0; real cut; for(int i=0; i < 4; ++i) { if(!straight(p,i)) { real[] ci=c[i]; pair[] R=quarticroots(ci[4],ci[3],ci[2],ci[1],ci[0]); for(pair r : R) { if(fabs(r.y) < sqrtEpsilon) { real t=r.x; if(0 <= t && t <= 1) { real[] U={t,1,t,0}; real[] V={0,t,1,t}; real[] T={t,t,1-t,1-t}; real N=sign*normal(U[i],V[i]); if(N < M) { M=N; cut=i+T[i]; } } } } } } // Split at the worst boundary degeneracy. if(M < 0 && split(p,cut)) return s; } // Split arbitrarily to resolve any remaining (internal) degeneracy. checkboundary=false; for(int i=0; i < L; ++i) if(!straight(p,i) && split(p,i+0.5)) return s; while(true) for(int i=0; i < L; ++i) if(!straight(p,i) && split(p,i+unitrand())) return s; return s; } struct surface { patch[] s; int index[][];// Position of patch corresponding to major U,V parameter in s. bool vcyclic; bool empty() { return s.length == 0; } void operator init(int n) { s=new patch[n]; } void operator init(... patch[] s) { this.s=s; } void operator init(surface s) { this.s=new patch[s.s.length]; for(int i=0; i < s.s.length; ++i) this.s[i]=patch(s.s[i]); this.index=copy(s.index); this.vcyclic=s.vcyclic; } void operator init(triple[][][] P, pen[][] colors=new pen[][], bool3 planar=default, bool triangular=false) { s=sequence(new patch(int i) { return patch(P[i],colors.length == 0 ? new pen[] : colors[i],planar, triangular); },P.length); } void colors(pen[][] palette) { for(int i=0; i < s.length; ++i) s[i].colors=copy(palette[i]); } triple[][] corners() { triple[][] a=new triple[s.length][]; for(int i=0; i < s.length; ++i) a[i]=s[i].corners(); return a; } real[][] map(real f(triple)) { real[][] a=new real[s.length][]; for(int i=0; i < s.length; ++i) a[i]=s[i].map(f); return a; } triple[] cornermean() { return sequence(new triple(int i) {return s[i].cornermean();},s.length); } triple point(real u, real v) { int U=floor(u); int V=floor(v); int index=index.length == 0 ? U+V : index[U][V]; return s[index].point(u-U,v-V); } triple normal(real u, real v) { int U=floor(u); int V=floor(v); int index=index.length == 0 ? U+V : index[U][V]; return s[index].normal(u-U,v-V); } void ucyclic(bool f) { index.cyclic=f; } void vcyclic(bool f) { for(int[] i : index) i.cyclic=f; vcyclic=f; } bool ucyclic() { return index.cyclic; } bool vcyclic() { return vcyclic; } path3 uequals(real u) { if(index.length == 0) return nullpath3; int U=floor(u); int[] index=index[U]; path3 g; for(int i : index) g=g&s[i].uequals(u-U); return vcyclic() ? g&cycle : g; } path3 vequals(real v) { if(index.length == 0) return nullpath3; int V=floor(v); path3 g; for(int[] i : index) g=g&s[i[V]].vequals(v-V); return ucyclic() ? g&cycle : g; } // A constructor for a possibly nonconvex simple cyclic path in a given // plane. void operator init(path p, triple plane(pair)=XYplane) { for(path g : regularize(p)) { if(length(g) == 3) { path3 G=path3(g,plane); s.push(patch(G,coons3(G),planar=true)); } else s.push(patch(coons(g),plane,piecewisestraight(g))); } } void operator init(explicit path[] g, triple plane(pair)=XYplane) { for(path p : bezulate(g)) s.append(surface(p,plane).s); } // A general surface constructor for both planar and nonplanar 3D paths. void construct(path3 external, triple[] internal=new triple[], pen[] colors=new pen[], bool3 planar=default) { int L=length(external); if(!cyclic(external)) abort("cyclic path expected"); if(L <= 3 && piecewisestraight(external)) { s.push(patch(external,internal,colors,planar)); return; } // Construct a surface from a possibly nonconvex planar cyclic path3. if(planar != false && internal.length == 0 && colors.length == 0) { triple n=normal(external); if(n != O) { transform3 T=align(n); external=transpose(T)*external; T *= shift(0,0,point(external,0).z); for(patch p : surface(path(external)).s) s.push(T*p); return; } } if(L <= 4 || internal.length > 0) { s.push(patch(external,internal,colors,planar)); return; } // Path is not planar; split into patches. real factor=1/L; pen[] p; triple[] n; bool nocolors=colors.length == 0; triple center; for(int i=0; i < L; ++i) center += point(external,i); center *= factor; if(!nocolors) p=new pen[] {mean(colors)}; // Use triangles for nonplanar surfaces. int step=normal(external) == O ? 1 : 2; int i=0; int end; while((end=i+step) < L) { s.push(patch(subpath(external,i,end)--center--cycle, nocolors ? p : concat(colors[i:end+1],p),planar)); i=end; } s.push(patch(subpath(external,i,L)--center--cycle, nocolors ? p : concat(colors[i:],colors[0:1],p),planar)); } void operator init(path3 external, triple[] internal=new triple[], pen[] colors=new pen[], bool3 planar=default) { s=new patch[]; construct(external,internal,colors,planar); } void operator init(explicit path3[] external, triple[][] internal=new triple[][], pen[][] colors=new pen[][], bool3 planar=default) { s=new patch[]; if(planar == true) {// Assume all path3 elements share a common normal. if(external.length != 0) { triple n=normal(external[0]); if(n != O) { transform3 T=align(n); external=transpose(T)*external; T *= shift(0,0,point(external[0],0).z); path[] g=sequence(new path(int i) {return path(external[i]);}, external.length); for(patch p : surface(g).s) s.push(T*p); return; } } } for(int i=0; i < external.length; ++i) construct(external[i], internal.length == 0 ? new triple[] : internal[i], colors.length == 0 ? new pen[] : colors[i],planar); } void push(path3 external, triple[] internal=new triple[], pen[] colors=new pen[], bool3 planar=default) { s.push(patch(external,internal,colors,planar)); } // Construct the surface of rotation generated by rotating g // from angle1 to angle2 sampled n times about the line c--c+axis. // An optional surface pen color(int i, real j) may be specified // to override the color at vertex(i,j). void operator init(triple c, path3 g, triple axis, int n=nslice, real angle1=0, real angle2=360, pen color(int i, real j)=null) { axis=unit(axis); real w=(angle2-angle1)/n; int L=length(g); s=new patch[L*n]; index=new int[n][L]; int m=-1; transform3[] T=new transform3[n+1]; transform3 t=rotate(w,c,c+axis); T[0]=rotate(angle1,c,c+axis); for(int k=1; k <= n; ++k) T[k]=T[k-1]*t; typedef pen colorfcn(int i, real j); bool defaultcolors=(colorfcn) color == null; for(int i=0; i < L; ++i) { path3 h=subpath(g,i,i+1); path3 r=reverse(h); path3 H=shift(-c)*h; real M=0; triple perp; void test(real[] t) { for(int i=0; i < 3; ++i) { triple v=point(H,t[i]); triple V=v-dot(v,axis)*axis; real a=abs(V); if(a > M) {M=a; perp=V;} } } test(maxtimes(H)); test(mintimes(H)); perp=unit(perp); triple normal=unit(cross(axis,perp)); triple dir(real j) {return Cos(j)*normal-Sin(j)*perp;} real j=angle1; transform3 Tk=T[0]; triple dirj=dir(j); for(int k=0; k < n; ++k, j += w) { transform3 Tp=T[k+1]; triple dirp=dir(j+w); path3 G=reverse(Tk*h{dirj}..{dirp}Tp*r{-dirp}..{-dirj}cycle); Tk=Tp; dirj=dirp; s[++m]=defaultcolors ? patch(G) : patch(G,new pen[] {color(i,j),color(i,j+w),color(i+1,j+w), color(i+1,j)}); index[k][i]=m; } ucyclic((angle2-angle1) % 360 == 0); vcyclic(cyclic(g)); } } void push(patch s) { this.s.push(s); } void append(surface s) { this.s.append(s.s); } void operator init(... surface[] s) { for(surface S : s) this.s.append(S.s); } } surface operator * (transform3 t, surface s) { surface S; S.s=new patch[s.s.length]; for(int i=0; i < s.s.length; ++i) S.s[i]=t*s.s[i]; S.index=copy(s.index); S.vcyclic=(bool) s.vcyclic; return S; } private string nullsurface="null surface"; triple min(surface s) { if(s.s.length == 0) abort(nullsurface); triple bound=s.s[0].min(); for(int i=1; i < s.s.length; ++i) bound=s.s[i].min(bound); return bound; } triple max(surface s) { if(s.s.length == 0) abort(nullsurface); triple bound=s.s[0].max(); for(int i=1; i < s.s.length; ++i) bound=s.s[i].max(bound); return bound; } pair min(surface s, projection P) { if(s.s.length == 0) abort(nullsurface); pair bound=s.s[0].min(P); for(int i=1; i < s.s.length; ++i) bound=s.s[i].min(P,bound); return bound; } pair max(surface s, projection P) { if(s.s.length == 0) abort(nullsurface); pair bound=s.s[0].max(P); for(int i=1; i < s.s.length; ++i) bound=s.s[i].max(P,bound); return bound; } private triple[] split(triple z0, triple c0, triple c1, triple z1, real t=0.5) { triple m0=interp(z0,c0,t); triple m1=interp(c0,c1,t); triple m2=interp(c1,z1,t); triple m3=interp(m0,m1,t); triple m4=interp(m1,m2,t); triple m5=interp(m3,m4,t); return new triple[] {m0,m3,m5,m4,m2}; } // Return the control points of the subpatches // produced by a horizontal split of P triple[][][] hsplit(triple[][] P, real v=0.5) { // get control points in rows triple[] P0=P[0]; triple[] P1=P[1]; triple[] P2=P[2]; triple[] P3=P[3]; triple[] c0=split(P0[0],P0[1],P0[2],P0[3],v); triple[] c1=split(P1[0],P1[1],P1[2],P1[3],v); triple[] c2=split(P2[0],P2[1],P2[2],P2[3],v); triple[] c3=split(P3[0],P3[1],P3[2],P3[3],v); // bottom, top return new triple[][][] { {{P0[0],c0[0],c0[1],c0[2]}, {P1[0],c1[0],c1[1],c1[2]}, {P2[0],c2[0],c2[1],c2[2]}, {P3[0],c3[0],c3[1],c3[2]}}, {{c0[2],c0[3],c0[4],P0[3]}, {c1[2],c1[3],c1[4],P1[3]}, {c2[2],c2[3],c2[4],P2[3]}, {c3[2],c3[3],c3[4],P3[3]}} }; } // Return the control points of the subpatches // produced by a vertical split of P triple[][][] vsplit(triple[][] P, real u=0.5) { // get control points in rows triple[] P0=P[0]; triple[] P1=P[1]; triple[] P2=P[2]; triple[] P3=P[3]; triple[] c0=split(P0[0],P1[0],P2[0],P3[0],u); triple[] c1=split(P0[1],P1[1],P2[1],P3[1],u); triple[] c2=split(P0[2],P1[2],P2[2],P3[2],u); triple[] c3=split(P0[3],P1[3],P2[3],P3[3],u); // left, right return new triple[][][] { {{P0[0],P0[1],P0[2],P0[3]}, {c0[0],c1[0],c2[0],c3[0]}, {c0[1],c1[1],c2[1],c3[1]}, {c0[2],c1[2],c2[2],c3[2]}}, {{c0[2],c1[2],c2[2],c3[2]}, {c0[3],c1[3],c2[3],c3[3]}, {c0[4],c1[4],c2[4],c3[4]}, {P3[0],P3[1],P3[2],P3[3]}} }; } // Return a 2D array of the control point arrays of the subpatches // produced by horizontal and vertical splits of P at u and v triple[][][][] split(triple[][] P, real u=0.5, real v=0.5) { triple[] P0=P[0]; triple[] P1=P[1]; triple[] P2=P[2]; triple[] P3=P[3]; // slice horizontally triple[] c0=split(P0[0],P0[1],P0[2],P0[3],v); triple[] c1=split(P1[0],P1[1],P1[2],P1[3],v); triple[] c2=split(P2[0],P2[1],P2[2],P2[3],v); triple[] c3=split(P3[0],P3[1],P3[2],P3[3],v); // bottom patch triple[] c4=split(P0[0],P1[0],P2[0],P3[0],u); triple[] c5=split(c0[0],c1[0],c2[0],c3[0],u); triple[] c6=split(c0[1],c1[1],c2[1],c3[1],u); triple[] c7=split(c0[2],c1[2],c2[2],c3[2],u); // top patch triple[] c8=split(c0[3],c1[3],c2[3],c3[3],u); triple[] c9=split(c0[4],c1[4],c2[4],c3[4],u); triple[] cA=split(P0[3],P1[3],P2[3],P3[3],u); // {{bottom-left, top-left}, {bottom-right, top-right}} return new triple[][][][] { {{{P0[0],c0[0],c0[1],c0[2]}, {c4[0],c5[0],c6[0],c7[0]}, {c4[1],c5[1],c6[1],c7[1]}, {c4[2],c5[2],c6[2],c7[2]}}, {{c0[2],c0[3],c0[4],P0[3]}, {c7[0],c8[0],c9[0],cA[0]}, {c7[1],c8[1],c9[1],cA[1]}, {c7[2],c8[2],c9[2],cA[2]}}}, {{{c4[2],c5[2],c6[2],c7[2]}, {c4[3],c5[3],c6[3],c7[3]}, {c4[4],c5[4],c6[4],c7[4]}, {P3[0],c3[0],c3[1],c3[2]}}, {{c7[2],c8[2],c9[2],cA[2]}, {c7[3],c8[3],c9[3],cA[3]}, {c7[4],c8[4],c9[4],cA[4]}, {c3[2],c3[3],c3[4],P3[3]}}} }; } // Return the control points for a subpatch of P on [u,1] x [v,1]. triple[][] subpatchend(triple[][] P, real u, real v) { triple[] P0=P[0]; triple[] P1=P[1]; triple[] P2=P[2]; triple[] P3=P[3]; triple[] c0=split(P0[0],P0[1],P0[2],P0[3],v); triple[] c1=split(P1[0],P1[1],P1[2],P1[3],v); triple[] c2=split(P2[0],P2[1],P2[2],P2[3],v); triple[] c3=split(P3[0],P3[1],P3[2],P3[3],v); triple[] c7=split(c0[2],c1[2],c2[2],c3[2],u); triple[] c8=split(c0[3],c1[3],c2[3],c3[3],u); triple[] c9=split(c0[4],c1[4],c2[4],c3[4],u); triple[] cA=split(P0[3],P1[3],P2[3],P3[3],u); return new triple[][] { {c7[2],c8[2],c9[2],cA[2]}, {c7[3],c8[3],c9[3],cA[3]}, {c7[4],c8[4],c9[4],cA[4]}, {c3[2],c3[3],c3[4],P3[3]}}; } // Return the control points for a subpatch of P on [0,u] x [0,v]. triple[][] subpatchbegin(triple[][] P, real u, real v) { triple[] P0=P[0]; triple[] P1=P[1]; triple[] P2=P[2]; triple[] P3=P[3]; triple[] c0=split(P0[0],P0[1],P0[2],P0[3],v); triple[] c1=split(P1[0],P1[1],P1[2],P1[3],v); triple[] c2=split(P2[0],P2[1],P2[2],P2[3],v); triple[] c3=split(P3[0],P3[1],P3[2],P3[3],v); triple[] c4=split(P0[0],P1[0],P2[0],P3[0],u); triple[] c5=split(c0[0],c1[0],c2[0],c3[0],u); triple[] c6=split(c0[1],c1[1],c2[1],c3[1],u); triple[] c7=split(c0[2],c1[2],c2[2],c3[2],u); return new triple[][] { {P0[0],c0[0],c0[1],c0[2]}, {c4[0],c5[0],c6[0],c7[0]}, {c4[1],c5[1],c6[1],c7[1]}, {c4[2],c5[2],c6[2],c7[2]}}; } triple[][] subpatch(triple[][] P, pair a, pair b) { return subpatchend(subpatchbegin(P,b.x,b.y),a.x/b.x,a.y/b.y); } patch subpatch(patch s, pair a, pair b) { assert(a.x >= 0 && a.y >= 0 && b.x <= 1 && b.y <= 1 && a.x < b.x && a.y < b.y && !s.triangular); return patch(subpatch(s.P,a,b),s.straight,s.planar); } // return an array containing the times for one intersection of path p and // patch s. real[] intersect(path3 p, patch s, real fuzz=-1) { return intersect(p,s.P,fuzz); } // return an array containing the times for one intersection of path p and // surface s. real[] intersect(path3 p, surface s, real fuzz=-1) { for(int i=0; i < s.s.length; ++i) { real[] T=intersect(p,s.s[i].P,fuzz); if(T.length > 0) return T; } return new real[]; } // return an array containing all intersection times of path p and patch s. real[][] intersections(path3 p, patch s, real fuzz=-1) { return sort(intersections(p,s.P,fuzz)); } // return an array containing all intersection times of path p and surface s. real[][] intersections(path3 p, surface s, real fuzz=-1) { real[][] T; if(length(p) < 0) return T; for(int i=0; i < s.s.length; ++i) for(real[] s: intersections(p,s.s[i].P,fuzz)) T.push(s); static real Fuzz=1000*realEpsilon; real fuzz=max(10*fuzz,Fuzz*max(abs(min(s)),abs(max(s)))); // Remove intrapatch duplicate points. for(int i=0; i < T.length; ++i) { triple v=point(p,T[i][0]); for(int j=i+1; j < T.length;) { if(abs(v-point(p,T[j][0])) < fuzz) T.delete(j); else ++j; } } return sort(T); } // return an array containing all intersection points of path p and surface s. triple[] intersectionpoints(path3 p, patch s, real fuzz=-1) { real[][] t=intersections(p,s,fuzz); return sequence(new triple(int i) {return point(p,t[i][0]);},t.length); } // return an array containing all intersection points of path p and surface s. triple[] intersectionpoints(path3 p, surface s, real fuzz=-1) { real[][] t=intersections(p,s,fuzz); return sequence(new triple(int i) {return point(p,t[i][0]);},t.length); } // Return true iff the control point bounding boxes of patches p and q overlap. bool overlap(triple[][] p, triple[][] q, real fuzz=-1) { triple pmin=minbound(p); triple pmax=maxbound(p); triple qmin=minbound(q); triple qmax=maxbound(q); if(fuzz == -1) fuzz=1000*realEpsilon*max(abs(pmin),abs(pmax),abs(qmin),abs(qmax)); return pmax.x+fuzz >= qmin.x && pmax.y+fuzz >= qmin.y && pmax.z+fuzz >= qmin.z && qmax.x+fuzz >= pmin.x && qmax.y+fuzz >= pmin.y && qmax.z+fuzz >= pmin.z; // Overlapping bounding boxes? } triple point(patch s, real u, real v) { return s.point(u,v); } real PRCshininess(real shininess) { // Empirical translation table from Phong-Blinn to PRC shininess model: static real[] x={0.015,0.025,0.05,0.07,0.1,0.14,0.23,0.5,0.65,0.75,0.85, 0.875,0.9,1}; static real[] y={0.05,0.1,0.15,0.2,0.25,0.3,0.4,0.5,0.55,0.6,0.7,0.8,0.9,1}; static realfunction s=fspline(x,y,monotonic); return s(shininess); } struct interaction { int type; bool targetsize; void operator init(int type, bool targetsize=false) { this.type=type; this.targetsize=targetsize; } } restricted interaction Embedded=interaction(0); restricted interaction Billboard=interaction(1); interaction LabelInteraction() { return settings.autobillboard ? Billboard : Embedded; } material material(material m, light light) { return light.on() || invisible((pen) m) ? m : emissive(m); } void draw3D(frame f, int type=0, patch s, triple center=O, material m, light light=currentlight, interaction interaction=Embedded, bool prc=true) { if(s.colors.length > 0) m=mean(s.colors); m=material(m,light); real PRCshininess; if(prc()) PRCshininess=PRCshininess(m.shininess); (s.triangular ? drawbeziertriangle : draw) (f,s.P,center,s.straight && s.planar,m.p,m.opacity,m.shininess, PRCshininess,s.colors,interaction.type,prc); } // Draw triangles on a frame. void draw(frame f, triple[] v, int[][] vi, triple[] n={}, int[][] ni={}, material m=currentpen, pen[] p={}, int[][] pi={}, light light=currentlight) { if(p.length > 0) m=mean(p); m=material(m,light); real PRCshininess; if(prc()) PRCshininess=PRCshininess(m.shininess); draw(f,v,vi,n,ni,m.p,m.opacity,m.shininess,PRCshininess,p,pi); } // Draw triangles on a picture. void draw(picture pic=currentpicture, triple[] v, int[][] vi, triple[] n={}, int[][] ni={}, material m=currentpen, pen[] p={}, int[][] pi={}, light light=currentlight) { bool colors=pi.length > 0; bool normals=ni.length > 0; if(!colors && !normals) { n=new triple[]; ni=new int[vi.length][3]; triple lastnormal=O; for(int i=0; i < vi.length; ++i) { int[] vii=vi[i]; int[] nii=ni[i]; triple normal=normal(new triple[] {v[vii[0]],v[vii[1]],v[vii[2]]}); if(normal != lastnormal || n.length == 0) { n.push(normal); lastnormal=normal; } nii[0]=nii[1]=nii[2]=n.length-1; } } pic.add(new void(frame f, transform3 t, picture pic, projection P) { triple[] v=t*v; triple[] n=t*n; if(is3D()) { draw(f,v,vi,n,ni,m,p,pi,light); if(pic != null) { for(int[] vii : vi) for(int viij : vii) pic.addPoint(project(v[viij],P)); } } else if(pic != null) { static int[] edges={0,0,1}; if(colors) { for(int i=0; i < vi.length; ++i) { int[] vii=vi[i]; int[] pii=pi[i]; gouraudshade(pic,project(v[vii[0]],P)--project(v[vii[1]],P)-- project(v[vii[2]],P)--cycle, new pen[] {p[pii[0]],p[pii[1]],p[pii[2]]},edges); } } else { if(normals) { for(int i=0; i < vi.length; ++i) { int[] vii=vi[i]; int[] nii=ni[i]; gouraudshade(pic,project(v[vii[0]],P)--project(v[vii[1]],P)-- project(v[vii[2]],P)--cycle, new pen[] {color(n[nii[0]],m,light), color(n[nii[1]],m,light), color(n[nii[2]],m,light)},edges); } } else { for(int i=0; i < vi.length; ++i) { int[] vii=vi[i]; path g=project(v[vii[0]],P)--project(v[vii[1]],P)-- project(v[vii[2]],P)--cycle; pen p=color(n[ni[i][0]],m,light); fill(pic,g,p); if(opacity(m.diffuse()) == 1) // Fill subdivision cracks draw(pic,g,p); } } } } },true); for(int[] vii : vi) for(int viij : vii) pic.addPoint(v[viij]); } void drawPRCsphere(frame f, transform3 t=identity4, bool half=false, material m, light light=currentlight, render render=defaultrender) { m=material(m,light); drawPRCsphere(f,t,half,m.p,m.opacity,PRCshininess(m.shininess), render.sphere); } void drawPRCcylinder(frame f, transform3 t=identity4, material m, light light=currentlight) { m=material(m,light); drawPRCcylinder(f,t,m.p,m.opacity,PRCshininess(m.shininess)); } void drawPRCdisk(frame f, transform3 t=identity4, material m, light light=currentlight) { m=material(m,light); drawPRCdisk(f,t,m.p,m.opacity,PRCshininess(m.shininess)); } void drawPRCtube(frame f, path3 center, path3 g, material m, light light=currentlight) { m=material(m,light); drawPRCtube(f,center,g,m.p,m.opacity,PRCshininess(m.shininess)); } void tensorshade(transform t=identity(), frame f, patch s, material m, light light=currentlight, projection P) { pen[] p; if(s.triangular) { p=s.colorstriangular(m,light); p.push(p[0]); s=tensor(s); } else p=s.colors(m,light); tensorshade(f,box(t*s.min(P),t*s.max(P)),m.diffuse(), p,t*project(s.external(),P,1),t*project(s.internal(),P)); } restricted pen[] nullpens={nullpen}; nullpens.cyclic=true; void draw(transform t=identity(), frame f, surface s, int nu=1, int nv=1, material[] surfacepen, pen[] meshpen=nullpens, light light=currentlight, light meshlight=nolight, string name="", render render=defaultrender, projection P=currentprojection) { bool is3D=is3D(); if(is3D) { bool group=name != "" || render.defaultnames; if(group) begingroup3(f,name == "" ? "surface" : name,render); // Sort patches by mean distance from camera triple camera=P.camera; if(P.infinity) { triple m=min(s); triple M=max(s); camera=P.target+camerafactor*(abs(M-m)+abs(m-P.target))*unit(P.vector()); } real[][] depth=new real[s.s.length][]; for(int i=0; i < depth.length; ++i) depth[i]=new real[] {dot(P.normal,camera-s.s[i].cornermean()),i}; depth=sort(depth); for(int p=depth.length-1; p >= 0; --p) { real[] a=depth[p]; int k=round(a[1]); draw3D(f,s.s[k],surfacepen[k],light); } if(group) endgroup3(f); pen modifiers=thin()+squarecap; for(int p=depth.length-1; p >= 0; --p) { real[] a=depth[p]; int k=round(a[1]); patch S=s.s[k]; pen meshpen=meshpen[k]; if(!invisible(meshpen) && !S.triangular) { if(group) begingroup3(f,meshname(name),render); meshpen=modifiers+meshpen; real step=nu == 0 ? 0 : 1/nu; for(int i=0; i <= nu; ++i) draw(f,S.uequals(i*step),meshpen,meshlight,partname(i,render), render); step=nv == 0 ? 0 : 1/nv; for(int j=0; j <= nv; ++j) draw(f,S.vequals(j*step),meshpen,meshlight,partname(j,render), render); if(group) endgroup3(f); } } } if(!is3D || settings.render == 0) { begingroup(f); // Sort patches by mean distance from camera triple camera=P.camera; if(P.infinity) { triple m=min(s); triple M=max(s); camera=P.target+camerafactor*(abs(M-m)+abs(m-P.target))*unit(P.vector()); } real[][] depth=new real[s.s.length][]; for(int i=0; i < depth.length; ++i) depth[i]=new real[] {dot(P.normal,camera-s.s[i].cornermean()),i}; depth=sort(depth); light.T=shiftless(P.T.modelview); // Draw from farthest to nearest for(int p=depth.length-1; p >= 0; --p) { real[] a=depth[p]; int k=round(a[1]); tensorshade(t,f,s.s[k],surfacepen[k],light,P); pen meshpen=meshpen[k]; if(!invisible(meshpen)) draw(f,t*project(s.s[k].external(),P),meshpen); } endgroup(f); } } void draw(transform t=identity(), frame f, surface s, int nu=1, int nv=1, material surfacepen=currentpen, pen meshpen=nullpen, light light=currentlight, light meshlight=nolight, string name="", render render=defaultrender, projection P=currentprojection) { material[] surfacepen={surfacepen}; pen[] meshpen={meshpen}; surfacepen.cyclic=true; meshpen.cyclic=true; draw(t,f,s,nu,nv,surfacepen,meshpen,light,meshlight,name,render,P); } void draw(picture pic=currentpicture, surface s, int nu=1, int nv=1, material[] surfacepen, pen[] meshpen=nullpens, light light=currentlight, light meshlight=nolight, string name="", render render=defaultrender) { if(s.empty()) return; bool cyclic=surfacepen.cyclic; surfacepen=copy(surfacepen); surfacepen.cyclic=cyclic; cyclic=meshpen.cyclic; meshpen=copy(meshpen); meshpen.cyclic=cyclic; pic.add(new void(frame f, transform3 t, picture pic, projection P) { surface S=t*s; if(is3D()) draw(f,S,nu,nv,surfacepen,meshpen,light,meshlight,name,render); if(pic != null) { pic.add(new void(frame f, transform T) { draw(T,f,S,nu,nv,surfacepen,meshpen,light,meshlight,P); },true); pic.addPoint(min(S,P)); pic.addPoint(max(S,P)); } },true); pic.addPoint(min(s)); pic.addPoint(max(s)); pen modifiers; if(is3D()) modifiers=thin()+squarecap; for(int k=0; k < s.s.length; ++k) { patch S=s.s[k]; pen meshpen=meshpen[k]; if(!invisible(meshpen) && !S.triangular) { meshpen=modifiers+meshpen; real step=nu == 0 ? 0 : 1/nu; for(int i=0; i <= nu; ++i) addPath(pic,s.s[k].uequals(i*step),meshpen); step=nv == 0 ? 0 : 1/nv; for(int j=0; j <= nv; ++j) addPath(pic,s.s[k].vequals(j*step),meshpen); } } } void draw(picture pic=currentpicture, surface s, int nu=1, int nv=1, material surfacepen=currentpen, pen meshpen=nullpen, light light=currentlight, light meshlight=nolight, string name="", render render=defaultrender) { material[] surfacepen={surfacepen}; pen[] meshpen={meshpen}; surfacepen.cyclic=true; meshpen.cyclic=true; draw(pic,s,nu,nv,surfacepen,meshpen,light,meshlight,name,render); } void draw(picture pic=currentpicture, surface s, int nu=1, int nv=1, material[] surfacepen, pen meshpen, light light=currentlight, light meshlight=nolight, string name="", render render=defaultrender) { pen[] meshpen={meshpen}; meshpen.cyclic=true; draw(pic,s,nu,nv,surfacepen,meshpen,light,meshlight,name,render); } surface extrude(path3 p, path3 q) { static patch[] allocate; return surface(...sequence(new patch(int i) { return patch(subpath(p,i,i+1)--subpath(q,i+1,i)--cycle); },length(p))); } surface extrude(path3 p, triple axis=Z) { return extrude(p,shift(axis)*p); } surface extrude(path p, triple plane(pair)=XYplane, triple axis=Z) { return extrude(path3(p,plane),axis); } surface extrude(explicit path[] p, triple axis=Z) { surface s; for(path g:p) s.append(extrude(g,axis)); return s; } triple rectify(triple dir) { real scale=max(abs(dir.x),abs(dir.y),abs(dir.z)); if(scale != 0) dir *= 0.5/scale; dir += (0.5,0.5,0.5); return dir; } path3[] align(path3[] g, transform3 t=identity4, triple position, triple align, pen p=currentpen) { if(determinant(t) == 0 || g.length == 0) return g; triple m=min(g); triple dir=rectify(inverse(t)*-align); triple a=m+realmult(dir,max(g)-m); return shift(position+align*labelmargin(p))*t*shift(-a)*g; } surface align(surface s, transform3 t=identity4, triple position, triple align, pen p=currentpen) { if(determinant(t) == 0 || s.s.length == 0) return s; triple m=min(s); triple dir=rectify(inverse(t)*-align); triple a=m+realmult(dir,max(s)-m); return shift(position+align*labelmargin(p))*t*shift(-a)*s; } surface surface(Label L, triple position=O, bool bbox=false) { surface s=surface(texpath(L,bbox=bbox)); return L.align.is3D ? align(s,L.T3,position,L.align.dir3,L.p) : shift(position)*L.T3*s; } private path[] path(Label L, pair z=0, projection P) { path[] g=texpath(L,bbox=P.bboxonly); return L.align.is3D ? align(g,z,project(L.align.dir3,P)-project(O,P),L.p) : shift(z)*g; } transform3 alignshift(path3[] g, transform3 t=identity4, triple position, triple align) { if(determinant(t) == 0) return identity4; triple m=min(g); triple dir=rectify(inverse(t)*-align); triple a=m+realmult(dir,max(g)-m); return shift(-a); } transform3 alignshift(surface s, transform3 t=identity4, triple position, triple align) { if(determinant(t) == 0) return identity4; triple m=min(s); triple dir=rectify(inverse(t)*-align); triple a=m+realmult(dir,max(s)-m); return shift(-a); } transform3 aligntransform(path3[] g, transform3 t=identity4, triple position, triple align, pen p=currentpen) { if(determinant(t) == 0) return identity4; triple m=min(g); triple dir=rectify(inverse(t)*-align); triple a=m+realmult(dir,max(g)-m); return shift(position+align*labelmargin(p))*t*shift(-a); } transform3 aligntransform(surface s, transform3 t=identity4, triple position, triple align, pen p=currentpen) { if(determinant(t) == 0) return identity4; triple m=min(s); triple dir=rectify(inverse(t)*-align); triple a=m+realmult(dir,max(s)-m); return shift(position+align*labelmargin(p))*t*shift(-a); } void label(frame f, Label L, triple position, align align=NoAlign, pen p=currentpen, light light=nolight, string name="", render render=defaultrender, interaction interaction=LabelInteraction(), projection P=currentprojection) { Label L=L.copy(); L.align(align); L.p(p); if(interaction.targetsize && settings.render != 0) L.T=L.T*scale(abs(P.camera-position)/abs(P.vector())); transform3 T=transform3(P); if(L.defaulttransform3) L.T3=T; if(is3D()) { bool lighton=light.on(); if(name == "") name=L.s; if(prc() && interaction.type == Billboard.type) { surface s=surface(texpath(L)); transform3 centering=L.align.is3D ? alignshift(s,L.T3,position,L.align.dir3) : identity4; transform3 positioning= shift(L.align.is3D ? position+L.align.dir3*labelmargin(L.p) : position); frame f1,f2,f3; begingroup3(f1,name,render); if(L.defaulttransform3) begingroup3(f3,render,position,interaction.type); else { begingroup3(f2,render,position,interaction.type); begingroup3(f3,render,position); } for(patch S : s.s) { S=centering*S; draw3D(f3,S,position,L.p,light,interaction); // Fill subdivision cracks if(render.labelfill && opacity(L.p) == 1 && !lighton) _draw(f3,S.external(),position,L.p,interaction.type); } endgroup3(f3); if(L.defaulttransform3) add(f1,T*f3); else { add(f2,inverse(T)*L.T3*f3); endgroup3(f2); add(f1,T*f2); } endgroup3(f1); add(f,positioning*f1); } else { begingroup3(f,name,render); for(patch S : surface(L,position).s) { triple V=L.align.is3D ? position+L.align.dir3*labelmargin(L.p) : position; draw3D(f,S,V,L.p,light,interaction); // Fill subdivision cracks if(render.labelfill && opacity(L.p) == 1 && !lighton) _draw(f,S.external(),V,L.p,interaction.type); } endgroup3(f); } } else { pen p=color(L.T3*Z,L.p,light,shiftless(P.T.modelview)); if(L.defaulttransform3) { if(L.filltype == NoFill) fill(f,path(L,project(position,P.t),P),p); else { frame d; fill(d,path(L,project(position,P.t),P),p); add(f,d,L.filltype); } } else for(patch S : surface(L,position).s) fill(f,project(S.external(),P,1),p); } } void label(picture pic=currentpicture, Label L, triple position, align align=NoAlign, pen p=currentpen, light light=nolight, string name="", render render=defaultrender, interaction interaction=LabelInteraction()) { Label L=L.copy(); L.align(align); L.p(p); L.position(0); pic.add(new void(frame f, transform3 t, picture pic2, projection P) { // Handle relative projected 3D alignments. Label L=L.copy(); triple v=t*position; if(!align.is3D && L.align.relative && L.align.dir3 != O && determinant(P.t) != 0) L.align(L.align.dir*unit(project(v+L.align.dir3,P.t)-project(v,P.t))); if(interaction.targetsize && settings.render != 0) L.T=L.T*scale(abs(P.camera-v)/abs(P.vector())); transform3 T=transform3(P); if(L.defaulttransform3) L.T3=T; if(is3D()) { bool lighton=light.on(); if(name == "") name=L.s; if(prc() && interaction.type == Billboard.type) { surface s=surface(texpath(L,bbox=P.bboxonly)); transform3 centering=L.align.is3D ? alignshift(s,L.T3,v,L.align.dir3) : identity4; transform3 positioning= shift(L.align.is3D ? v+L.align.dir3*labelmargin(L.p) : v); frame f1,f2,f3; begingroup3(f1,name,render); if(L.defaulttransform3) begingroup3(f3,render,v,interaction.type); else { begingroup3(f2,render,v,interaction.type); begingroup3(f3,render,v); } for(patch S : s.s) { S=centering*S; draw3D(f3,S,v,L.p,light,interaction); // Fill subdivision cracks if(render.labelfill && opacity(L.p) == 1 && !lighton) _draw(f3,S.external(),v,L.p,interaction.type); } endgroup3(f3); if(L.defaulttransform3) add(f1,T*f3); else { add(f2,inverse(T)*L.T3*f3); endgroup3(f2); add(f1,T*f2); } endgroup3(f1); add(f,positioning*f1); } else { begingroup3(f,name,render); for(patch S : surface(L,v,bbox=P.bboxonly).s) { triple V=L.align.is3D ? v+L.align.dir3*labelmargin(L.p) : v; draw3D(f,S,V,L.p,light,interaction); // Fill subdivision cracks if(render.labelfill && opacity(L.p) == 1 && !lighton) _draw(f,S.external(),V,L.p,interaction.type); } endgroup3(f); } } if(pic2 != null) { pen p=color(L.T3*Z,L.p,light,shiftless(P.T.modelview)); if(L.defaulttransform3) { if(L.filltype == NoFill) fill(project(v,P.t),pic2,path(L,P),p); else { picture d; fill(project(v,P.t),d,path(L,P),p); add(pic2,d,L.filltype); } } else pic2.add(new void(frame f, transform T) { for(patch S : surface(L,v).s) fill(f,T*project(S.external(),P,1),p); }); } },!L.defaulttransform3); Label L=L.copy(); if(interaction.targetsize && settings.render != 0) L.T=L.T*scale(abs(currentprojection.camera-position)/ abs(currentprojection.vector())); path[] g=texpath(L,bbox=true); if(g.length == 0 || (g.length == 1 && size(g[0]) == 0)) return; if(L.defaulttransform3) L.T3=transform3(currentprojection); path3[] G=path3(g); G=L.align.is3D ? align(G,L.T3,O,L.align.dir3,L.p) : L.T3*G; pic.addBox(position,position,min(G),max(G)); } void label(picture pic=currentpicture, Label L, path3 g, align align=NoAlign, pen p=currentpen, light light=nolight, string name="", interaction interaction=LabelInteraction()) { Label L=L.copy(); L.align(align); L.p(p); bool relative=L.position.relative; real position=L.position.position.x; if(L.defaultposition) {relative=true; position=0.5;} if(relative) position=reltime(g,position); if(L.align.default) { align a; a.init(-I*(position <= sqrtEpsilon ? S : position >= length(g)-sqrtEpsilon ? N : E),relative=true); a.dir3=dir(g,position); // Pass 3D direction via unused field. L.align(a); } label(pic,L,point(g,position),light,name,interaction); } surface extrude(Label L, triple axis=Z) { Label L=L.copy(); path[] g=texpath(L); surface S=extrude(g,axis); surface s=surface(g); S.append(s); S.append(shift(axis)*s); return S; } restricted surface nullsurface; // Embed a Label onto a surface. surface surface(Label L, surface s, real uoffset, real voffset, real height=0, bool bottom=true, bool top=true) { int nu=s.index.length; int nv; if(nu == 0) nu=nv=1; else { nv=s.index[0].length; if(nv == 0) nv=1; } path[] g=texpath(L); pair m=min(g); pair M=max(g); pair lambda=inverse(L.T*scale(nu-epsilon,nv-epsilon))*(M-m); lambda=(abs(lambda.x),abs(lambda.y)); path[] G=bezulate(g); path3 transpath(path p, real height) { return path3(unstraighten(p),new triple(pair z) { real u=uoffset+(z.x-m.x)/lambda.x; real v=voffset+(z.y-m.y)/lambda.y; if(((u < 0 || u >= nu) && !s.ucyclic()) || ((v < 0 || v >= nv) && !s.vcyclic())) { warning("cannotfit","cannot fit string to surface"); u=v=0; } return s.point(u,v)+height*unit(s.normal(u,v)); }); } surface s; for(path p : G) { for(path g : regularize(p)) { path3 b; bool extrude=height > 0; if(bottom || extrude) b=transpath(g,0); if(bottom) s.s.push(patch(b)); if(top || extrude) { path3 h=transpath(g,height); if(top) s.s.push(patch(h)); if(extrude) s.append(extrude(b,h)); } } } return s; } private real a=4/3*(sqrt(2)-1); private transform3 t1=rotate(90,O,Z); private transform3 t2=t1*t1; private transform3 t3=t2*t1; private transform3 i=xscale3(-1)*zscale3(-1); restricted patch octant1=patch(X{Y}..{-X}Y{Z}..{-Y}Z..Z{X}..{-Z}cycle, new triple[] {(1,a,a),(a,1,a),(a^2,a,1), (a,a^2,1)}); restricted surface unithemisphere=surface(octant1,t1*octant1,t2*octant1, t3*octant1); restricted surface unitsphere=surface(octant1,t1*octant1,t2*octant1,t3*octant1, i*octant1,i*t1*octant1,i*t2*octant1, i*t3*octant1); restricted patch unitfrustum(real t1, real t2) { real s1=interp(t1,t2,1/3); real s2=interp(t1,t2,2/3); return patch(interp(Z,X,t2){Y}..{-X}interp(Z,Y,t2)--interp(Z,Y,t1){X}..{-Y} interp(Z,X,t1)--cycle, new triple[] {(s2,s2*a,1-s2),(s2*a,s2,1-s2),(s1*a,s1,1-s1), (s1,s1*a,1-s1)}); } // Return a unitcone constructed from n frusta (the final one being degenerate) surface unitcone(int n=6) { surface unitcone; unitcone.s=new patch[4*n]; real r=1/3; for(int i=0; i < n; ++i) { patch s=unitfrustum(i < n-1 ? r^(i+1) : 0,r^i); unitcone.s[i]=s; unitcone.s[n+i]=t1*s; unitcone.s[2n+i]=t2*s; unitcone.s[3n+i]=t3*s; } return unitcone; } restricted surface unitcone=unitcone(); restricted surface unitsolidcone=surface(patch(unitcircle3)...unitcone.s); // Construct an approximate cone over an arbitrary base. surface cone(path3 base, triple vertex) {return extrude(base,vertex--cycle);} private patch unitcylinder1=patch(X{Y}..{-X}Y--Y+Z{X}..{-Y}X+Z--cycle); restricted surface unitcylinder=surface(unitcylinder1,t1*unitcylinder1, t2*unitcylinder1,t3*unitcylinder1); private patch unitplane=patch(new triple[] {O,X,X+Y,Y}); restricted surface unitcube=surface(reverse(unitplane), rotate(90,O,X)*unitplane, rotate(-90,O,Y)*unitplane, shift(Z)*unitplane, rotate(90,X,X+Y)*unitplane, rotate(-90,Y,X+Y)*unitplane); restricted surface unitplane=surface(unitplane); restricted surface unitdisk=surface(unitcircle3); void dot(frame f, triple v, material p=currentpen, light light=nolight, string name="", render render=defaultrender, projection P=currentprojection) { pen q=(pen) p; if(is3D()) { bool group=name != "" || render.defaultnames; if(group) begingroup3(f,name == "" ? "dot" : name,render); real size=0.5*linewidth(dotsize(q)+q); transform3 T=shift(v)*scale3(size); for(patch s : unitsphere.s) draw3D(f,T*s,v,p,light,prc=false); if(prc()) drawPRCsphere(f,T,p,light); if(group) endgroup3(f); } else dot(f,project(v,P.t),q); } void dot(frame f, triple[] v, material p=currentpen, light light=nolight, string name="", render render=defaultrender, projection P=currentprojection) { if(v.length > 0) { // Remove duplicate points. v=sort(v,lexorder); triple last=v[0]; dot(f,last,p,light,name,render,P); for(int i=1; i < v.length; ++i) { triple V=v[i]; if(V != last) { dot(f,V,p,light,name,render,P); last=V; } } } } void dot(frame f, path3 g, material p=currentpen, light light=nolight, string name="", render render=defaultrender, projection P=currentprojection) { dot(f,sequence(new triple(int i) {return point(g,i);},size(g)), p,light,name,render,P); } void dot(frame f, path3[] g, material p=currentpen, light light=nolight, string name="", render render=defaultrender, projection P=currentprojection) { int sum; for(path3 G : g) sum += size(G); int i,j; dot(f,sequence(new triple(int) { while(j >= size(g[i])) { ++i; j=0; } triple v=point(g[i],j); ++j; return v; },sum),p,light,name,render,P); } void dot(picture pic=currentpicture, triple v, material p=currentpen, light light=nolight, string name="", render render=defaultrender) { pen q=(pen) p; real size=0.5*linewidth(dotsize(q)+q); pic.add(new void(frame f, transform3 t, picture pic, projection P) { triple V=t*v; if(is3D()) { bool group=name != "" || render.defaultnames; if(group) begingroup3(f,name == "" ? "dot" : name,render); transform3 T=shift(V)*scale3(size); for(patch s : unitsphere.s) draw3D(f,T*s,V,p,light,prc=false); if(prc()) drawPRCsphere(f,T,p,light,render); if(group) endgroup3(f); } if(pic != null) dot(pic,project(V,P.t),q); },true); triple R=size*(1,1,1); pic.addBox(v,v,-R,R); } void dot(picture pic=currentpicture, triple[] v, material p=currentpen, light light=nolight, string name="", render render=defaultrender) { if(v.length > 0) { // Remove duplicate points. v=sort(v,lexorder); triple last=v[0]; bool group=name != "" || render.defaultnames; if(group) begingroup3(pic,name == "" ? "dots" : name,render); dot(pic,last,p,light,partname(0,render),render); int k=0; for(int i=1; i < v.length; ++i) { triple V=v[i]; if(V != last) { dot(pic,V,p,light,partname(++k,render),render); last=V; } } if(group) endgroup3(pic); } } void dot(picture pic=currentpicture, explicit path3 g, material p=currentpen, light light=nolight, string name="", render render=defaultrender) { dot(pic,sequence(new triple(int i) {return point(g,i);},size(g)), p,light,name,render); } void dot(picture pic=currentpicture, path3[] g, material p=currentpen, light light=nolight, string name="", render render=defaultrender) { int sum; for(path3 G : g) sum += size(G); int i,j; dot(pic,sequence(new triple(int) { while(j >= size(g[i])) { ++i; j=0; } triple v=point(g[i],j); ++j; return v; },sum),p,light,name,render); } void dot(picture pic=currentpicture, Label L, triple v, align align=NoAlign, string format=defaultformat, material p=currentpen, light light=nolight, string name="", render render=defaultrender) { Label L=L.copy(); if(L.s == "") { if(format == "") format=defaultformat; L.s="("+format(format,v.x)+","+format(format,v.y)+","+ format(format,v.z)+")"; } L.align(align,E); L.p((pen) p); dot(pic,v,p,light,name,render); label(pic,L,v,render); } void pixel(picture pic=currentpicture, triple v, pen p=currentpen, real width=1) { real h=0.5*width; pic.add(new void(frame f, transform3 t, picture pic, projection P) { triple V=t*v; if(is3D()) drawpixel(f,V,p,width); if(pic != null) { triple R=h*unit(cross(unit(P.vector()),P.up)); pair z=project(V,P.t); real h=0.5*abs(project(V+R,P.t)-project(V-R,P.t)); pair r=h*(1,1)/mm; fill(pic,box(z-r,z+r),p,false); } },true); triple R=h*(1,1,1); pic.addBox(v,v,-R,R); } pair minbound(triple[] A, projection P) { pair b=project(A[0],P); for(triple v : A) b=minbound(b,project(v,P.t)); return b; } pair maxbound(triple[] A, projection P) { pair b=project(A[0],P); for(triple v : A) b=maxbound(b,project(v,P.t)); return b; } pair minbound(triple[][] A, projection P) { pair b=project(A[0][0],P); for(triple[] a : A) { for(triple v : a) { b=minbound(b,project(v,P.t)); } } return b; } pair maxbound(triple[][] A, projection P) { pair b=project(A[0][0],P); for(triple[] a : A) { for(triple v : a) { b=maxbound(b,project(v,P.t)); } } return b; } triple[][] operator / (triple[][] a, real[][] b) { triple[][] A=new triple[a.length][]; for(int i=0; i < a.length; ++i) { triple[] ai=a[i]; real[] bi=b[i]; A[i]=sequence(new triple(int j) {return ai[j]/bi[j];},ai.length); } return A; } // Draw a NURBS curve. void draw(picture pic=currentpicture, triple[] P, real[] knot, real[] weights=new real[], pen p=currentpen, string name="", render render=defaultrender) { P=copy(P); knot=copy(knot); weights=copy(weights); pic.add(new void(frame f, transform3 t, picture pic, projection Q) { if(is3D()) { triple[] P=t*P; bool group=name != "" || render.defaultnames; if(group) begingroup3(f,name == "" ? "curve" : name,render); draw(f,P,knot,weights,p); if(group) endgroup3(f); if(pic != null) pic.addBox(minbound(P,Q),maxbound(P,Q)); } },true); pic.addBox(minbound(P),maxbound(P)); } // Draw a NURBS surface. void draw(picture pic=currentpicture, triple[][] P, real[] uknot, real[] vknot, real[][] weights=new real[][], material m=currentpen, pen[] colors=new pen[], light light=currentlight, string name="", render render=defaultrender) { if(colors.length > 0) m=mean(colors); m=material(m,light); bool lighton=light.on(); P=copy(P); uknot=copy(uknot); vknot=copy(vknot); weights=copy(weights); colors=copy(colors); pic.add(new void(frame f, transform3 t, picture pic, projection Q) { if(is3D()) { bool group=name != "" || render.defaultnames; if(group) begingroup3(f,name == "" ? "surface" : name,render); triple[][] P=t*P; real PRCshininess; if(prc()) PRCshininess=PRCshininess(m.shininess); draw(f,P,uknot,vknot,weights,m.p,m.opacity,m.shininess,PRCshininess, colors); if(group) endgroup3(f); if(pic != null) pic.addBox(minbound(P,Q),maxbound(P,Q)); } },true); pic.addBox(minbound(P),maxbound(P)); } ./asymptote-2.41/base/labelpath3.asy0000644000175000017500000000464113064427076017217 0ustar norbertnorbert// Fit a label to a path3. // Author: Jens Schwaiger import three; private real eps=100*realEpsilon; triple nextnormal(triple p, triple q) { triple nw=p-(dot(p,q)*q); return abs(nw) < 0.0001 ? p : unit(nw); } triple[] firstframe(path3 p, triple optional=O) { triple[] start=new triple[3]; start[0]=dir(p,reltime(p,0)); start[1]=(abs(cross(start[0],optional)) < eps) ? perp(start[0]) : unit(cross(start[0],optional)); start[2]=cross(start[0],start[1]); return start; } // Modification of the bishop frame construction contained in // space_tube.asy (from Philippe Ivaldi's modules). // For noncyclic path3s only triple[] nextframe(path3 p, real reltimestart, triple[] start, real reltimeend, int subdiv=20) { triple[][] bf=new triple[subdiv+1][3]; real lg=reltimeend-reltimestart; if(lg <= 0) return start; bf[0]=start; int n=subdiv+1; for(int i=1; i < n; ++i) bf[i][0]=dir(p,reltime(p,reltimestart+(i/subdiv)*lg)); for(int i=1; i < n; ++i) { bf[i][1]=nextnormal(bf[i-1][1],bf[i][0]); bf[i][2]=cross(bf[i][0],bf[i][1]); } return bf[subdiv]; } surface labelpath(string s, path3 p, real angle=90, triple optional=O) { real Cos=Cos(angle); real Sin=Sin(angle); path[] text=texpath(Label(s,(0,0),Align,basealign)); text=scale(1/(max(text).x-min(text).x))*text; path[][] decompose=containmentTree(text); real[][] xpos=new real[decompose.length][2]; surface sf; for(int i=0; i < decompose.length; ++i) {// Identify positions along x-axis xpos[i][1]=i; real pos0=0.5(max(decompose[i]).x+min(decompose[i]).x); xpos[i][0]=pos0; } xpos=sort(xpos); // sort by distance from 0; triple[] pos=new triple[decompose.length]; real lg=arclength(p); //create frames; triple[] first=firstframe(p,optional); triple[] t0=first; real tm0=0; triple[][] bfr=new triple[decompose.length][3]; for(int j=0; j < decompose.length; ++j) { bfr[j]=nextframe(p,tm0,t0,xpos[j][0]); tm0=xpos[j][0]; t0=bfr[j]; } transform3[] mt=new transform3[bfr.length]; for(int j=0; j < bfr.length; ++j) { triple f2=Cos*bfr[j][1]+Sin*bfr[j][2]; triple f3=Sin*bfr[j][1]+Cos*bfr[j][2]; mt[j]=shift(relpoint(p,xpos[j][0]))*transform3(bfr[j][0],f2,f3); } for(int j=0; j < bfr.length; ++j) { path[] dc=decompose[(int) xpos[j][1]]; pair pos0=(0.5(max(dc).x+min(dc).x),0); sf.append(mt[j]*surface(scale(lg)*shift(-pos0)*dc)); } return sf; } ./asymptote-2.41/base/lmfit.asy0000644000175000017500000006012313064427076016310 0ustar norbertnorbert/* Copyright (c) 2009 Philipp Stephani 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 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */ /* Fitting $n$ data points $(x_1, y_1 \pm \Delta y_1), \dots, (x_n, y_n \pm \Delta y_n)$ to a function $f$ that depends on $m$ parameters $a_1, \dots, a_m$ means minimizing the least-squares sum % \begin{equation*} \sum_{i = 1}^n \left( \frac{y_i - f(a_1, \dots, a_m; x_i)}{\Delta y_i} \right)^2 \end{equation*} % with respect to the parameters $a_1, \dots, a_m$. */ /* This module provides an implementation of the Levenberg--Marquardt (LM) algorithm, converted from the C lmfit routine by Joachim Wuttke (see http://www.messen-und-deuten.de/lmfit/). Implementation strategy: Fortunately, Asymptote's syntax is very similar to C, and the original code cleanly separates the customizable parts (user-provided data, output routines, etc.) from the dirty number crunching. Thus, mst of the code was just copied and slightly modified from the original source files. I have amended the lm_data_type structure and the callback routines with a weight array that can be used to provide experimental errors. I have also created two simple wrapper functions. */ // copied from the C code private real LM_MACHEP = realEpsilon; private real LM_DWARF = realMin; private real LM_SQRT_DWARF = sqrt(realMin); private real LM_SQRT_GIANT = sqrt(realMax); private real LM_USERTOL = 30 * LM_MACHEP; restricted string lm_infmsg[] = { "improper input parameters", "the relative error in the sum of squares is at most tol", "the relative error between x and the solution is at most tol", "both errors are at most tol", "fvec is orthogonal to the columns of the jacobian to machine precision", "number of calls to fcn has reached or exceeded maxcall*(n+1)", "ftol is too small: no further reduction in the sum of squares is possible", "xtol too small: no further improvement in approximate solution x possible", "gtol too small: no further improvement in approximate solution x possible", "not enough memory", "break requested within function evaluation" }; restricted string lm_shortmsg[] = { "invalid input", "success (f)", "success (p)", "success (f,p)", "degenerate", "call limit", "failed (f)", "failed (p)", "failed (o)", "no memory", "user break" }; // copied from the C code and amended with the weight (user_w) array struct lm_data_type { real[] user_t; real[] user_y; real[] user_w; real user_func(real user_t_point, real[] par); }; // Asymptote has no pointer support, so we need reference wrappers for // the int and real types struct lm_int_type { int val; void operator init(int val) { this.val = val; } }; struct lm_real_type { real val; void operator init(real val) { this.val = val; } }; // copied from the C code; the lm_initialize_control function turned // into a constructor struct lm_control_type { real ftol; real xtol; real gtol; real epsilon; real stepbound; real fnorm; int maxcall; lm_int_type nfev; lm_int_type info; void operator init() { maxcall = 100; epsilon = LM_USERTOL; stepbound = 100; ftol = LM_USERTOL; xtol = LM_USERTOL; gtol = LM_USERTOL; } }; // copied from the C code typedef void lm_evaluate_ftype(real[] par, int m_dat, real[] fvec, lm_data_type data, lm_int_type info); typedef void lm_print_ftype(int n_par, real[] par, int m_dat, real[] fvec, lm_data_type data, int iflag, int iter, int nfev); // copied from the C code private real SQR(real x) { return x * x; } // Asymptote doesn't support pointers to arbitrary array elements, so // we provide an offset parameter. private real lm_enorm(int n, real[] x, int offset=0) { real s1 = 0; real s2 = 0; real s3 = 0; real x1max = 0; real x3max = 0; real agiant = LM_SQRT_GIANT / n; real xabs, temp; for (int i = 0; i < n; ++i) { xabs = fabs(x[offset + i]); if (xabs > LM_SQRT_DWARF && xabs < agiant) { s2 += SQR(xabs); continue; } if (xabs > LM_SQRT_DWARF) { if (xabs > x1max) { temp = x1max / xabs; s1 = 1 + s1 * SQR(temp); x1max = xabs; } else { temp = xabs / x1max; s1 += SQR(temp); } continue; } if (xabs > x3max) { temp = x3max / xabs; s3 = 1 + s3 * SQR(temp); x3max = xabs; } else { if (xabs != 0.0) { temp = xabs / x3max; s3 += SQR(temp); } } } if (s1 != 0) return x1max * sqrt(s1 + (s2 / x1max) / x1max); if (s2 != 0) { if (s2 >= x3max) return sqrt(s2 * (1 + (x3max / s2) * (x3max * s3))); else return sqrt(x3max * ((s2 / x3max) + (x3max * s3))); } return x3max * sqrt(s3); } // This function calculated the vector whose square sum is to be // minimized. We use a slight modification of the original code that // includes the weight factor. The user may provide different // customizations. void lm_evaluate_default(real[] par, int m_dat, real[] fvec, lm_data_type data, lm_int_type info) { for (int i = 0; i < m_dat; ++i) { fvec[i] = data.user_w[i] * (data.user_y[i] - data.user_func(data.user_t[i], par)); } } // Helper functions to print padded strings and numbers (until // Asymptote provides a real printf function) private string pad(string str, int count, string pad=" ") { string res = str; while (length(res) < count) res = pad + res; return res; } private string pad(int num, int digits, string pad=" ") { return pad(string(num), digits, pad); } private string pad(real num, int digits, string pad=" ") { return pad(string(num), digits, pad); } // Similar to the C code, also prints weights void lm_print_default(int n_par, real[] par, int m_dat, real[] fvec, lm_data_type data, int iflag, int iter, int nfev) { real f, y, t, w; int i; if (iflag == 2) { write("trying step in gradient direction"); } else if (iflag == 1) { write(format("determining gradient (iteration %d)", iter)); } else if (iflag == 0) { write("starting minimization"); } else if (iflag == -1) { write(format("terminated after %d evaluations", nfev)); } write(" par: ", none); for (i = 0; i < n_par; ++i) { write(" " + pad(par[i], 12), none); } write(" => norm: " + pad(lm_enorm(m_dat, fvec), 12)); if (iflag == -1) { write(" fitting data as follows:"); for (i = 0; i < m_dat; ++i) { t = data.user_t[i]; y = data.user_y[i]; w = data.user_w[i]; f = data.user_func(t, par); write(format(" t[%2d]=", i) + pad(t, 12) + " y=" + pad(y, 12) + " w=" + pad(w, 12) + " fit=" + pad(f, 12) + " residue=" + pad(y - f, 12)); } } } // Prints nothing void lm_print_quiet(int n_par, real[] par, int m_dat, real[] fvec, lm_data_type data, int iflag, int iter, int nfev) { } // copied from the C code private void lm_qrfac(int m, int n, real[] a, bool pivot, int[] ipvt, real[] rdiag, real[] acnorm, real[] wa) { int i, j, k, kmax, minmn; real ajnorm, sum, temp; static real p05 = 0.05; for (j = 0; j < n; ++j) { acnorm[j] = lm_enorm(m, a, j * m); rdiag[j] = acnorm[j]; wa[j] = rdiag[j]; if (pivot) ipvt[j] = j; } minmn = min(m, n); for (j = 0; j < minmn; ++j) { while (pivot) { kmax = j; for (k = j + 1; k < n; ++k) if (rdiag[k] > rdiag[kmax]) kmax = k; if (kmax == j) break; for (i = 0; i < m; ++i) { temp = a[j * m + i]; a[j * m + i] = a[kmax * m + i]; a[kmax * m + i] = temp; } rdiag[kmax] = rdiag[j]; wa[kmax] = wa[j]; k = ipvt[j]; ipvt[j] = ipvt[kmax]; ipvt[kmax] = k; break; } ajnorm = lm_enorm(m - j, a, j * m + j); if (ajnorm == 0.0) { rdiag[j] = 0; continue; } if (a[j * m + j] < 0.0) ajnorm = -ajnorm; for (i = j; i < m; ++i) a[j * m + i] /= ajnorm; a[j * m + j] += 1; for (k = j + 1; k < n; ++k) { sum = 0; for (i = j; i < m; ++i) sum += a[j * m + i] * a[k * m + i]; temp = sum / a[j + m * j]; for (i = j; i < m; ++i) a[k * m + i] -= temp * a[j * m + i]; if (pivot && rdiag[k] != 0.0) { temp = a[m * k + j] / rdiag[k]; temp = max(0.0, 1 - SQR(temp)); rdiag[k] *= sqrt(temp); temp = rdiag[k] / wa[k]; if (p05 * SQR(temp) <= LM_MACHEP) { rdiag[k] = lm_enorm(m - j - 1, a, m * k + j + 1); wa[k] = rdiag[k]; } } } rdiag[j] = -ajnorm; } } // copied from the C code private void lm_qrsolv(int n, real[] r, int ldr, int[] ipvt, real[] diag, real[] qtb, real[] x, real[] sdiag, real[] wa) { static real p25 = 0.25; static real p5 = 0.5; int i, kk, j, k, nsing; real qtbpj, sum, temp; real _sin, _cos, _tan, _cot; for (j = 0; j < n; ++j) { for (i = j; i < n; ++i) r[j * ldr + i] = r[i * ldr + j]; x[j] = r[j * ldr + j]; wa[j] = qtb[j]; } for (j = 0; j < n; ++j) { while (diag[ipvt[j]] != 0.0) { for (k = j; k < n; ++k) sdiag[k] = 0.0; sdiag[j] = diag[ipvt[j]]; qtbpj = 0.; for (k = j; k < n; ++k) { if (sdiag[k] == 0.) continue; kk = k + ldr * k; if (fabs(r[kk]) < fabs(sdiag[k])) { _cot = r[kk] / sdiag[k]; _sin = p5 / sqrt(p25 + p25 * _cot * _cot); _cos = _sin * _cot; } else { _tan = sdiag[k] / r[kk]; _cos = p5 / sqrt(p25 + p25 * _tan * _tan); _sin = _cos * _tan; } r[kk] = _cos * r[kk] + _sin * sdiag[k]; temp = _cos * wa[k] + _sin * qtbpj; qtbpj = -_sin * wa[k] + _cos * qtbpj; wa[k] = temp; for (i = k + 1; i < n; ++i) { temp = _cos * r[k * ldr + i] + _sin * sdiag[i]; sdiag[i] = -_sin * r[k * ldr + i] + _cos * sdiag[i]; r[k * ldr + i] = temp; } } break; } sdiag[j] = r[j * ldr + j]; r[j * ldr + j] = x[j]; } nsing = n; for (j = 0; j < n; ++j) { if (sdiag[j] == 0.0 && nsing == n) nsing = j; if (nsing < n) wa[j] = 0; } for (j = nsing - 1; j >= 0; --j) { sum = 0; for (i = j + 1; i < nsing; ++i) sum += r[j * ldr + i] * wa[i]; wa[j] = (wa[j] - sum) / sdiag[j]; } for (j = 0; j < n; ++j) x[ipvt[j]] = wa[j]; } // copied from the C code private void lm_lmpar(int n, real[] r, int ldr, int[] ipvt, real[] diag, real[] qtb, real delta, lm_real_type par, real[] x, real[] sdiag, real[] wa1, real[] wa2) { static real p1 = 0.1; static real p001 = 0.001; int nsing = n; real parl = 0.0; int i, iter, j; real dxnorm, fp, fp_old, gnorm, parc, paru; real sum, temp; for (j = 0; j < n; ++j) { wa1[j] = qtb[j]; if (r[j * ldr + j] == 0 && nsing == n) nsing = j; if (nsing < n) wa1[j] = 0; } for (j = nsing - 1; j >= 0; --j) { wa1[j] = wa1[j] / r[j + ldr * j]; temp = wa1[j]; for (i = 0; i < j; ++i) wa1[i] -= r[j * ldr + i] * temp; } for (j = 0; j < n; ++j) x[ipvt[j]] = wa1[j]; iter = 0; for (j = 0; j < n; ++j) wa2[j] = diag[j] * x[j]; dxnorm = lm_enorm(n, wa2); fp = dxnorm - delta; if (fp <= p1 * delta) { par.val = 0; return; } if (nsing >= n) { for (j = 0; j < n; ++j) wa1[j] = diag[ipvt[j]] * wa2[ipvt[j]] / dxnorm; for (j = 0; j < n; ++j) { sum = 0.0; for (i = 0; i < j; ++i) sum += r[j * ldr + i] * wa1[i]; wa1[j] = (wa1[j] - sum) / r[j + ldr * j]; } temp = lm_enorm(n, wa1); parl = fp / delta / temp / temp; } for (j = 0; j < n; ++j) { sum = 0; for (i = 0; i <= j; ++i) sum += r[j * ldr + i] * qtb[i]; wa1[j] = sum / diag[ipvt[j]]; } gnorm = lm_enorm(n, wa1); paru = gnorm / delta; if (paru == 0.0) paru = LM_DWARF / min(delta, p1); par.val = max(par.val, parl); par.val = min(par.val, paru); if (par.val == 0.0) par.val = gnorm / dxnorm; for (;; ++iter) { if (par.val == 0.0) par.val = max(LM_DWARF, p001 * paru); temp = sqrt(par.val); for (j = 0; j < n; ++j) wa1[j] = temp * diag[j]; lm_qrsolv(n, r, ldr, ipvt, wa1, qtb, x, sdiag, wa2); for (j = 0; j < n; ++j) wa2[j] = diag[j] * x[j]; dxnorm = lm_enorm(n, wa2); fp_old = fp; fp = dxnorm - delta; if (fabs(fp) <= p1 * delta || (parl == 0.0 && fp <= fp_old && fp_old < 0.0) || iter == 10) break; for (j = 0; j < n; ++j) wa1[j] = diag[ipvt[j]] * wa2[ipvt[j]] / dxnorm; for (j = 0; j < n; ++j) { wa1[j] = wa1[j] / sdiag[j]; for (i = j + 1; i < n; ++i) wa1[i] -= r[j * ldr + i] * wa1[j]; } temp = lm_enorm(n, wa1); parc = fp / delta / temp / temp; if (fp > 0) parl = max(parl, par.val); else if (fp < 0) paru = min(paru, par.val); par.val = max(parl, par.val + parc); } } // copied from the C code; the main function void lm_lmdif(int m, int n, real[] x, real[] fvec, real ftol, real xtol, real gtol, int maxfev, real epsfcn, real[] diag, int mode, real factor, lm_int_type info, lm_int_type nfev, real[] fjac, int[] ipvt, real[] qtf, real[] wa1, real[] wa2, real[] wa3, real[] wa4, lm_evaluate_ftype evaluate, lm_print_ftype printout, lm_data_type data) { static real p1 = 0.1; static real p5 = 0.5; static real p25 = 0.25; static real p75 = 0.75; static real p0001 = 1.0e-4; nfev.val = 0; int iter = 1; lm_real_type par = lm_real_type(0); real delta = 0; real xnorm = 0; real temp = max(epsfcn, LM_MACHEP); real eps = sqrt(temp); int i, j; real actred, dirder, fnorm, fnorm1, gnorm, pnorm, prered, ratio, step, sum, temp1, temp2, temp3; if ((n <= 0) || (m < n) || (ftol < 0.0) || (xtol < 0.0) || (gtol < 0.0) || (maxfev <= 0) || (factor <= 0)) { info.val = 0; return; } if (mode == 2) { for (j = 0; j < n; ++j) { if (diag[j] <= 0.0) { info.val = 0; return; } } } info.val = 0; evaluate(x, m, fvec, data, info); if(printout != null) printout(n, x, m, fvec, data, 0, 0, ++nfev.val); if (info.val < 0) return; fnorm = lm_enorm(m, fvec); do { for (j = 0; j < n; ++j) { temp = x[j]; step = eps * fabs(temp); if (step == 0.0) step = eps; x[j] = temp + step; info.val = 0; evaluate(x, m, wa4, data, info); if(printout != null) printout(n, x, m, wa4, data, 1, iter, ++nfev.val); if (info.val < 0) return; for (i = 0; i < m; ++i) fjac[j * m + i] = (wa4[i] - fvec[i]) / (x[j] - temp); x[j] = temp; } lm_qrfac(m, n, fjac, true, ipvt, wa1, wa2, wa3); if (iter == 1) { if (mode != 2) { for (j = 0; j < n; ++j) { diag[j] = wa2[j]; if (wa2[j] == 0.0) diag[j] = 1.0; } } for (j = 0; j < n; ++j) wa3[j] = diag[j] * x[j]; xnorm = lm_enorm(n, wa3); delta = factor * xnorm; if (delta == 0.0) delta = factor; } for (i = 0; i < m; ++i) wa4[i] = fvec[i]; for (j = 0; j < n; ++j) { temp3 = fjac[j * m + j]; if (temp3 != 0.0) { sum = 0; for (i = j; i < m; ++i) sum += fjac[j * m + i] * wa4[i]; temp = -sum / temp3; for (i = j; i < m; ++i) wa4[i] += fjac[j * m + i] * temp; } fjac[j * m + j] = wa1[j]; qtf[j] = wa4[j]; } gnorm = 0; if (fnorm != 0) { for (j = 0; j < n; ++j) { if (wa2[ipvt[j]] == 0) continue; sum = 0.0; for (i = 0; i <= j; ++i) sum += fjac[j * m + i] * qtf[i] / fnorm; gnorm = max(gnorm, fabs(sum / wa2[ipvt[j]])); } } if (gnorm <= gtol) { info.val = 4; return; } if (mode != 2) { for (j = 0; j < n; ++j) diag[j] = max(diag[j], wa2[j]); } do { lm_lmpar(n, fjac, m, ipvt, diag, qtf, delta, par, wa1, wa2, wa3, wa4); for (j = 0; j < n; ++j) { wa1[j] = -wa1[j]; wa2[j] = x[j] + wa1[j]; wa3[j] = diag[j] * wa1[j]; } pnorm = lm_enorm(n, wa3); if (nfev.val <= 1 + n) delta = min(delta, pnorm); info.val = 0; evaluate(wa2, m, wa4, data, info); if(printout != null) printout(n, x, m, wa4, data, 2, iter, ++nfev.val); if (info.val < 0) return; fnorm1 = lm_enorm(m, wa4); if (p1 * fnorm1 < fnorm) actred = 1 - SQR(fnorm1 / fnorm); else actred = -1; for (j = 0; j < n; ++j) { wa3[j] = 0; for (i = 0; i <= j; ++i) wa3[i] += fjac[j * m + i] * wa1[ipvt[j]]; } temp1 = lm_enorm(n, wa3) / fnorm; temp2 = sqrt(par.val) * pnorm / fnorm; prered = SQR(temp1) + 2 * SQR(temp2); dirder = -(SQR(temp1) + SQR(temp2)); ratio = prered != 0 ? actred / prered : 0; if (ratio <= p25) { if (actred >= 0.0) temp = p5; else temp = p5 * dirder / (dirder + p5 * actred); if (p1 * fnorm1 >= fnorm || temp < p1) temp = p1; delta = temp * min(delta, pnorm / p1); par.val /= temp; } else if (par.val == 0.0 || ratio >= p75) { delta = pnorm / p5; par.val *= p5; } if (ratio >= p0001) { for (j = 0; j < n; ++j) { x[j] = wa2[j]; wa2[j] = diag[j] * x[j]; } for (i = 0; i < m; ++i) fvec[i] = wa4[i]; xnorm = lm_enorm(n, wa2); fnorm = fnorm1; ++iter; } info.val = 0; if (fabs(actred) <= ftol && prered <= ftol && p5 * ratio <= 1) info.val = 1; if (delta <= xtol * xnorm) info.val += 2; if (info.val != 0) return; if (nfev.val >= maxfev) info.val = 5; if (fabs(actred) <= LM_MACHEP && prered <= LM_MACHEP && p5 * ratio <= 1) info.val = 6; if (delta <= LM_MACHEP * xnorm) info.val = 7; if (gnorm <= LM_MACHEP) info.val = 8; if (info.val != 0) return; } while (ratio < p0001); } while (true); } // copied from the C code; wrapper of lm_lmdif void lm_minimize(int m_dat, int n_par, real[] par, lm_evaluate_ftype evaluate, lm_print_ftype printout, lm_data_type data, lm_control_type control) { int n = n_par; int m = m_dat; real[] fvec = new real[m]; real[] diag = new real[n]; real[] qtf = new real[n]; real[] fjac = new real[n * m]; real[] wa1 = new real[n]; real[] wa2 = new real[n]; real[] wa3 = new real[n]; real[] wa4 = new real[m]; int[] ipvt = new int[n]; control.info.val = 0; control.nfev.val = 0; lm_lmdif(m, n, par, fvec, control.ftol, control.xtol, control.gtol, control.maxcall * (n + 1), control.epsilon, diag, 1, control.stepbound, control.info, control.nfev, fjac, ipvt, qtf, wa1, wa2, wa3, wa4, evaluate, printout, data); if(printout != null) printout(n, par, m, fvec, data, -1, 0, control.nfev.val); control.fnorm = lm_enorm(m, fvec); if (control.info.val < 0) control.info.val = 10; } // convenience functions; wrappers of lm_minimize /* The structure FitControl specifies various control parameters. */ struct FitControl { real squareSumTolerance; // relative error desired in the sum of squares real approximationTolerance; // relative error between last two approximations real desiredOrthogonality; // orthogonality desired between the residue vector and its derivatives real epsilon; // step used to calculate the jacobian real stepBound; // initial bound to steps in the outer loop int maxIterations; // maximum number of iterations bool verbose; // whether to print detailed information about every iteration, or nothing void operator init(real squareSumTolerance=LM_USERTOL, real approximationTolerance=LM_USERTOL, real desiredOrthogonality=LM_USERTOL, real epsilon=LM_USERTOL, real stepBound=100, int maxIterations=100, bool verbose=false) { this.squareSumTolerance = squareSumTolerance; this.approximationTolerance = approximationTolerance; this.desiredOrthogonality = desiredOrthogonality; this.epsilon = epsilon; this.stepBound = stepBound; this.maxIterations = maxIterations; this.verbose = verbose; } FitControl copy() { FitControl result = new FitControl; result.squareSumTolerance = this.squareSumTolerance; result.approximationTolerance = this.approximationTolerance; result.desiredOrthogonality = this.desiredOrthogonality; result.epsilon = this.epsilon; result.stepBound = this.stepBound; result.maxIterations = this.maxIterations; result.verbose = this.verbose; return result; } }; FitControl operator init() { return FitControl(); } FitControl defaultControl; /* Upon returning, this structure provides information about the fit. */ struct FitResult { real norm; // norm of the residue vector int iterations; // actual number of iterations int status; // status of minimization void operator init(real norm, int iterations, int status) { this.norm = norm; this.iterations = iterations; this.status = status; } }; /* Fits data points to a function that depends on some parameters. Parameters: - xdata: Array of x values. - ydata: Array of y values. - errors: Array of experimental errors; each element must be strictly positive - function: Fit function. - parameters: Parameter array. Before calling fit(), this must contain the initial guesses for the parameters. Upon return, it will contain the solution parameters. - control: object of type FitControl that controls various aspects of the fitting procedure. Returns: An object of type FitResult that conveys information about the fitting process. */ FitResult fit(real[] xdata, real[] ydata, real[] errors, real function(real[], real), real[] parameters, FitControl control=defaultControl) { int m_dat = min(xdata.length, ydata.length); int n_par = parameters.length; lm_evaluate_ftype evaluate = lm_evaluate_default; lm_print_ftype printout = control.verbose ? lm_print_default : lm_print_quiet; lm_data_type data; data.user_t = xdata; data.user_y = ydata; data.user_w = 1 / errors; data.user_func = new real(real x, real[] params) { return function(params, x); }; lm_control_type ctrl; ctrl.ftol = control.squareSumTolerance; ctrl.xtol = control.approximationTolerance; ctrl.gtol = control.desiredOrthogonality; ctrl.epsilon = control.epsilon; ctrl.stepbound = control.stepBound; ctrl.maxcall = control.maxIterations; lm_minimize(m_dat, n_par, parameters, evaluate, printout, data, ctrl); return FitResult(ctrl.fnorm, ctrl.nfev.val, ctrl.info.val); } /* Fits data points to a function that depends on some parameters. Parameters: - xdata: Array of x values. - ydata: Array of y values. - function: Fit function. - parameters: Parameter array. Before calling fit(), this must contain the initial guesses for the parameters. Upon return, it will contain the solution parameters. - control: object of type FitControl that controls various aspects of the fitting procedure. Returns: An object of type FitResult that conveys information about the fitting process. */ FitResult fit(real[] xdata, real[] ydata, real function(real[], real), real[] parameters, FitControl control=defaultControl) { return fit(xdata, ydata, array(min(xdata.length, ydata.length), 1.0), function, parameters, control); } ./asymptote-2.41/base/ode.asy0000644000175000017500000003550413064427076015751 0ustar norbertnorbertreal stepfactor=2; // Maximum dynamic step size adjustment factor. struct coefficients { real[] steps; real[] factors; real[][] weights; real[] highOrderWeights; real[] lowOrderWeights; } struct RKTableau { int order; coefficients a; void stepDependence(real h, real c, coefficients a) {} real pgrow; real pshrink; bool exponential; void operator init(int order, real[][] weights, real[] highOrderWeights, real[] lowOrderWeights=new real[], real[] steps=sequence(new real(int i) { return sum(weights[i]);},weights.length), void stepDependence(real, real, coefficients)=null) { this.order=order; a.steps=steps; a.factors=array(a.steps.length+1,1); a.weights=weights; a.highOrderWeights=highOrderWeights; a.lowOrderWeights=lowOrderWeights; if(stepDependence != null) { this.stepDependence=stepDependence; exponential=true; } pgrow=(order > 0) ? 1/order : 0; pshrink=(order > 1) ? 1/(order-1) : pgrow; } } real[] Coeff={1,1/2,1/6,1/24,1/120,1/720,1/5040,1/40320,1/362880,1/3628800, 1/39916800.0,1/479001600.0,1/6227020800.0,1/87178291200.0, 1/1307674368000.0,1/20922789888000.0,1/355687428096000.0, 1/6402373705728000.0,1/121645100408832000.0, 1/2432902008176640000.0,1/51090942171709440000.0, 1/1124000727777607680000.0}; real phi1(real x) {return x != 0 ? expm1(x)/x : 1;} real phi2(real x) { real x2=x*x; if(fabs(x) > 1) return (exp(x)-x-1)/x2; real x3=x2*x; real x5=x2*x3; if(fabs(x) < 0.1) return Coeff[1]+x*Coeff[2]+x2*Coeff[3]+x3*Coeff[4]+x2*x2*Coeff[5] +x5*Coeff[6]+x3*x3*Coeff[7]+x5*x2*Coeff[8]+x5*x3*Coeff[9]; else { real x7=x5*x2; real x8=x7*x; return Coeff[1]+x*Coeff[2]+x2*Coeff[3]+x3*Coeff[4]+x2*x2*Coeff[5] +x5*Coeff[6]+x3*x3*Coeff[7]+x7*Coeff[8]+x8*Coeff[9] +x8*x*Coeff[10]+x5*x5*Coeff[11]+x8*x3*Coeff[12]+x7*x5*Coeff[13]+ x8*x5*Coeff[14]+x7*x7*Coeff[15]+x8*x7*Coeff[16]+x8*x8*Coeff[17]; } } real phi3(real x) { real x2=x*x; real x3=x2*x; if(fabs(x) > 1.6) return (exp(x)-0.5*x2-x-1)/x3; real x5=x2*x3; if(fabs(x) < 0.1) return Coeff[2]+x*Coeff[3]+x2*Coeff[4]+x3*Coeff[5] +x2*x2*Coeff[6]+x5*Coeff[7]+x3*x3*Coeff[8]+x5*x2*Coeff[9] +x5*x3*Coeff[10]; else { real x7=x5*x2; real x8=x7*x; real x16=x8*x8; return Coeff[2]+x*Coeff[3]+x2*Coeff[4]+x3*Coeff[5] +x2*x2*Coeff[6]+x5*Coeff[7]+x3*x3*Coeff[8]+x5*x2*Coeff[9] +x5*x3*Coeff[10]+x8*x*Coeff[11] +x5*x5*Coeff[12]+x8*x3*Coeff[13]+x7*x5*Coeff[14] +x8*x5*Coeff[15]+x7*x7*Coeff[16]+x8*x7*Coeff[17]+x16*Coeff[18] +x16*x*Coeff[19]+x16*x2*Coeff[20]; } } void expfactors(real x, coefficients a) { for(int i=0; i < a.steps.length; ++i) a.factors[i]=exp(x*a.steps[i]); a.factors[a.steps.length]=exp(x); } // First-Order Euler RKTableau Euler=RKTableau(1,new real[][], new real[] {1}); // First-Order Exponential Euler RKTableau E_Euler=RKTableau(1,new real[][], new real[] {1}, new void(real h, real c, coefficients a) { real x=-c*h; expfactors(x,a); a.highOrderWeights[0]=phi1(x); }); // Second-Order Runge-Kutta RKTableau RK2=RKTableau(2,new real[][] {{1/2}}, new real[] {0,1}, // 2nd order new real[] {1,0}); // 1st order // Second-Order Exponential Runge-Kutta RKTableau E_RK2=RKTableau(2,new real[][] {{1/2}}, new real[] {0,1}, // 2nd order new real[] {1,0}, // 1st order new void(real h, real c, coefficients a) { real x=-c*h; expfactors(x,a); a.weights[0][0]=1/2*phi1(x/2); real w=phi1(x); a.highOrderWeights[0]=0; a.highOrderWeights[1]=w; a.lowOrderWeights[0]=w; }); // Second-Order Predictor-Corrector RKTableau PC=RKTableau(2,new real[][] {{1}}, new real[] {1/2,1/2}, // 2nd order new real[] {1,0}); // 1st order // Second-Order Exponential Predictor-Corrector RKTableau E_PC=RKTableau(2,new real[][] {{1}}, new real[] {1/2,1/2}, // 2nd order new real[] {1,0}, // 1st order new void(real h, real c, coefficients a) { real x=-c*h; expfactors(x,a); real w=phi1(x); a.weights[0][0]=w; a.highOrderWeights[0]=w/2; a.highOrderWeights[1]=w/2; a.lowOrderWeights[0]=w; }); // Third-Order Classical Runge-Kutta RKTableau RK3=RKTableau(3,new real[][] {{1/2},{-1,2}}, new real[] {1/6,2/3,1/6}); // Third-Order Bogacki-Shampine Runge-Kutta RKTableau RK3BS=RKTableau(3,new real[][] {{1/2},{0,3/4}}, new real[] {2/9,1/3,4/9}, // 3rd order new real[] {7/24,1/4,1/3,1/8}); // 2nd order // Third-Order Exponential Bogacki-Shampine Runge-Kutta RKTableau E_RK3BS=RKTableau(3,new real[][] {{1/2},{0,3/4}}, new real[] {2/9,1/3,4/9}, // 3rd order new real[] {7/24,1/4,1/3,1/8}, // 2nd order new void(real h, real c, coefficients a) { real x=-c*h; expfactors(x,a); real w=phi1(x); real w2=phi2(x); a.weights[0][0]=1/2*phi1(x/2); real a11=9/8*phi2(3/4*x)+3/8*phi2(x/2); a.weights[1][0]=3/4*phi1(3/4*x)-a11; a.weights[1][1]=a11; real a21=1/3*w; real a22=4/3*w2-2/9*w; a.highOrderWeights[0]=w-a21-a22; a.highOrderWeights[1]=a21; a.highOrderWeights[2]=a22; a.lowOrderWeights[0]=w-17/12*w2; a.lowOrderWeights[1]=w2/2; a.lowOrderWeights[2]=2/3*w2; a.lowOrderWeights[3]=w2/4; }); // Fourth-Order Classical Runge-Kutta RKTableau RK4=RKTableau(4,new real[][] {{1/2},{0,1/2},{0,0,1}}, new real[] {1/6,1/3,1/3,1/6}); // Fifth-Order Cash-Karp Runge-Kutta RKTableau RK5=RKTableau(5,new real[][] {{1/5}, {3/40,9/40}, {3/10,-9/10,6/5}, {-11/54,5/2,-70/27,35/27}, {1631/55296,175/512,575/13824, 44275/110592,253/4096}}, new real[] {37/378,0,250/621,125/594, 0,512/1771}, // 5th order new real[] {2825/27648,0,18575/48384,13525/55296, 277/14336,1/4}); // 4th order // Fifth-Order Fehlberg Runge-Kutta RKTableau RK5F=RKTableau(5,new real[][] {{1/4}, {3/32,9/32}, {1932/2197,-7200/2197,7296/2197}, {439/216,-8,3680/513,-845/4104}, {-8/27,2,-3544/2565,1859/4104, -11/40}}, new real[] {16/135,0,6656/12825,28561/56430,-9/50,2/55}, // 5th order new real[] {25/216,0,1408/2565,2197/4104,-1/5,0}); // 4th order // Fifth-Order Dormand-Prince Runge-Kutta RKTableau RK5DP=RKTableau(5,new real[][] {{1/5}, {3/40,9/40}, {44/45,-56/15,32/9}, {19372/6561,-25360/2187,64448/6561, -212/729}, {9017/3168,-355/33,46732/5247,49/176, -5103/18656}}, new real[] {35/384,0,500/1113,125/192,-2187/6784, 11/84}, // 5th order new real[] {5179/57600,0,7571/16695,393/640, -92097/339200,187/2100,1/40}); // 4th order real error(real error, real initial, real lowOrder, real norm, real diff) { if(initial != 0 && lowOrder != initial) { static real epsilon=realMin/realEpsilon; real denom=max(abs(norm),abs(initial))+epsilon; return max(error,max(abs(diff)/denom)); } return error; } void report(real old, real h, real t) { write("Time step changed from "+(string) old+" to "+(string) h+" at t="+ (string) t+"."); } real adjust(real h, real error, real tolmin, real tolmax, RKTableau tableau) { if(error > tolmax) h *= max((tolmin/error)^tableau.pshrink,1/stepfactor); else if(error > 0 && error < tolmin) h *= min((tolmin/error)^tableau.pgrow,stepfactor); return h; } struct solution { real[] t; real[] y; } void write(solution S) { for(int i=0; i < S.t.length; ++i) write(S.t[i],S.y[i]); } // Integrate dy/dt+cy=f(t,y) from a to b using initial conditions y, // specifying either the step size h or the number of steps n. solution integrate(real y, real c=0, real f(real t, real y), real a, real b=a, real h=0, int n=0, bool dynamic=false, real tolmin=0, real tolmax=0, real dtmin=0, real dtmax=realMax, RKTableau tableau, bool verbose=false) { solution S; S.t=new real[] {a}; S.y=new real[]{y}; if(h == 0) { if(b == a) return S; if(n == 0) abort("Either n or h must be specified"); else h=(b-a)/n; } real F(real t, real y)=(c == 0 || tableau.exponential) ? f : new real(real t, real y) {return f(t,y)-c*y;}; tableau.stepDependence(h,c,tableau.a); real t=a; real f0; if(tableau.a.lowOrderWeights.length == 0) dynamic=false; bool fsal=dynamic && (tableau.a.lowOrderWeights.length > tableau.a.highOrderWeights.length); if(fsal) f0=F(t,y); real dt=h; while(t < b) { h=min(h,b-t); if(t+h == t) break; if(h != dt) { if(verbose) report(dt,h,t); tableau.stepDependence(h,c,tableau.a); dt=h; } real[] predictions={fsal ? f0 : F(t,y)}; for(int i=0; i < tableau.a.steps.length; ++i) predictions.push(F(t+h*tableau.a.steps[i], tableau.a.factors[i]*y+h*dot(tableau.a.weights[i], predictions))); real highOrder=h*dot(tableau.a.highOrderWeights,predictions); real y0=tableau.a.factors[tableau.a.steps.length]*y; if(dynamic) { real f1; if(fsal) { f1=F(t+h,y0+highOrder); predictions.push(f1); } real lowOrder=h*dot(tableau.a.lowOrderWeights,predictions); real error; error=error(error,y,y0+lowOrder,y0+highOrder,highOrder-lowOrder); h=adjust(h,error,tolmin,tolmax,tableau); if(h >= dt) { t += dt; y=y0+highOrder; S.t.push(t); S.y.push(y); f0=f1; } h=min(max(h,dtmin),dtmax); } else { t += h; y=y0+highOrder; S.y.push(y); } } return S; } struct Solution { real[] t; real[][] y; } void write(Solution S) { for(int i=0; i < S.t.length; ++i) { write(S.t[i],tab); for(real y : S.y[i]) write(y,tab); write(); } } // Integrate a set of equations, dy/dt=f(t,y), from a to b using initial // conditions y, specifying either the step size h or the number of steps n. Solution integrate(real[] y, real[] f(real t, real[] y), real a, real b=a, real h=0, int n=0, bool dynamic=false, real tolmin=0, real tolmax=0, real dtmin=0, real dtmax=realMax, RKTableau tableau, bool verbose=false) { Solution S; S.t=new real[] {a}; S.y=new real[][] {copy(y)}; if(h == 0) { if(b == a) return S; if(n == 0) abort("Either n or h must be specified"); else h=(b-a)/n; } real t=a; real[] f0; if(tableau.a.lowOrderWeights.length == 0) dynamic=false; bool fsal=dynamic && (tableau.a.lowOrderWeights.length > tableau.a.highOrderWeights.length); if(fsal) f0=f(t,y); real dt=h; while(t < b) { h=min(h,b-t); if(t+h == t) break; if(h != dt) { if(verbose) report(dt,h,t); dt=h; } real[][] predictions={fsal ? f0 : f(t,y)}; for(int i=0; i < tableau.a.steps.length; ++i) predictions.push(f(t+h*tableau.a.steps[i], y+h*tableau.a.weights[i]*predictions)); real[] highOrder=h*tableau.a.highOrderWeights*predictions; if(dynamic) { real[] f1; if(fsal) { f1=f(t+h,y+highOrder); predictions.push(f1); } real[] lowOrder=h*tableau.a.lowOrderWeights*predictions; real error; for(int i=0; i < y.length; ++i) error=error(error,y[i],y[i]+lowOrder[i],y[i]+highOrder[i], highOrder[i]-lowOrder[i]); h=adjust(h,error,tolmin,tolmax,tableau); if(h >= dt) { t += dt; y += highOrder; S.t.push(t); S.y.push(y); f0=f1; } h=min(max(h,dtmin),dtmax); } else { t += h; y += highOrder; S.t.push(t); S.y.push(y); } } return S; } real[][] finiteDifferenceJacobian(real[] f(real[]), real[] t, real[] h=sqrtEpsilon*abs(t)) { real[] ft=f(t); real[][] J=new real[t.length][ft.length]; real[] ti=copy(t); real tlast=ti[0]; ti[0] += h[0]; J[0]=(f(ti)-ft)/h[0]; for(int i=1; i < t.length; ++i) { ti[i-1]=tlast; tlast=ti[i]; ti[i] += h[i]; J[i]=(f(ti)-ft)/h[i]; } return transpose(J); } // Solve simultaneous nonlinear system by Newton's method. real[] newton(int iterations=100, real[] f(real[]), real[][] jacobian(real[]), real[] t) { real[] t=copy(t); for(int i=0; i < iterations; ++i) t += solve(jacobian(t),-f(t)); return t; } real[] solveBVP(real[] f(real, real[]), real a, real b=a, real h=0, int n=0, bool dynamic=false, real tolmin=0, real tolmax=0, real dtmin=0, real dtmax=realMax, RKTableau tableau, bool verbose=false, real[] initial(real[]), real[] discrepancy(real[]), real[] guess, int iterations=100) { real[] g(real[] t) { real[][] y=integrate(initial(t),f,a,b,h,n,dynamic,tolmin,tolmax,dtmin,dtmax, tableau,verbose).y;return discrepancy(y[y.length-1]); } real[][] jacobian(real[] t) {return finiteDifferenceJacobian(g,t);} return initial(newton(iterations,g,jacobian,guess)); } ./asymptote-2.41/base/x11colors.asy0000644000175000017500000001131413064427076017026 0ustar norbertnorbertpen rgbint(int r, int g, int b) { return rgb(r/255,g/255,b/255); } pen AliceBlue=rgbint(240,248,255); pen AntiqueWhite=rgbint(250,235,215); pen Aqua=rgbint(0,255,255); pen Aquamarine=rgbint(127,255,212); pen Azure=rgbint(240,255,255); pen Beige=rgbint(245,245,220); pen Bisque=rgbint(255,228,196); pen Black=rgbint(0,0,0); pen BlanchedAlmond=rgbint(255,235,205); pen Blue=rgbint(0,0,255); pen BlueViolet=rgbint(138,43,226); pen Brown=rgbint(165,42,42); pen BurlyWood=rgbint(222,184,135); pen CadetBlue=rgbint(95,158,160); pen Chartreuse=rgbint(127,255,0); pen Chocolate=rgbint(210,105,30); pen Coral=rgbint(255,127,80); pen CornflowerBlue=rgbint(100,149,237); pen Cornsilk=rgbint(255,248,220); pen Crimson=rgbint(220,20,60); pen Cyan=rgbint(0,255,255); pen DarkBlue=rgbint(0,0,139); pen DarkCyan=rgbint(0,139,139); pen DarkGoldenrod=rgbint(184,134,11); pen DarkGray=rgbint(169,169,169); pen DarkGreen=rgbint(0,100,0); pen DarkKhaki=rgbint(189,183,107); pen DarkMagenta=rgbint(139,0,139); pen DarkOliveGreen=rgbint(85,107,47); pen DarkOrange=rgbint(255,140,0); pen DarkOrchid=rgbint(153,50,204); pen DarkRed=rgbint(139,0,0); pen DarkSalmon=rgbint(233,150,122); pen DarkSeaGreen=rgbint(143,188,143); pen DarkSlateBlue=rgbint(72,61,139); pen DarkSlateGray=rgbint(47,79,79); pen DarkTurquoise=rgbint(0,206,209); pen DarkViolet=rgbint(148,0,211); pen DeepPink=rgbint(255,20,147); pen DeepSkyBlue=rgbint(0,191,255); pen DimGray=rgbint(105,105,105); pen DodgerBlue=rgbint(30,144,255); pen FireBrick=rgbint(178,34,34); pen FloralWhite=rgbint(255,250,240); pen ForestGreen=rgbint(34,139,34); pen Fuchsia=rgbint(255,0,255); pen Gainsboro=rgbint(220,220,220); pen GhostWhite=rgbint(248,248,255); pen Gold=rgbint(255,215,0); pen Goldenrod=rgbint(218,165,32); pen Gray=rgbint(128,128,128); pen Green=rgbint(0,128,0); pen GreenYellow=rgbint(173,255,47); pen Honeydew=rgbint(240,255,240); pen HotPink=rgbint(255,105,180); pen IndianRed=rgbint(205,92,92); pen Indigo=rgbint(75,0,130); pen Ivory=rgbint(255,255,240); pen Khaki=rgbint(240,230,140); pen Lavender=rgbint(230,230,250); pen LavenderBlush=rgbint(255,240,245); pen LawnGreen=rgbint(124,252,0); pen LemonChiffon=rgbint(255,250,205); pen LightBlue=rgbint(173,216,230); pen LightCoral=rgbint(240,128,128); pen LightCyan=rgbint(224,255,255); pen LightGoldenrodYellow=rgbint(250,250,210); pen LightGreen=rgbint(144,238,144); pen LightGrey=rgbint(211,211,211); pen LightPink=rgbint(255,182,193); pen LightSalmon=rgbint(255,160,122); pen LightSeaGreen=rgbint(32,178,170); pen LightSkyBlue=rgbint(135,206,250); pen LightSlateGray=rgbint(119,136,153); pen LightSteelBlue=rgbint(176,196,222); pen LightYellow=rgbint(255,255,224); pen Lime=rgbint(0,255,0); pen LimeGreen=rgbint(50,205,50); pen Linen=rgbint(250,240,230); pen Magenta=rgbint(255,0,255); pen Maroon=rgbint(128,0,0); pen MediumAquamarine=rgbint(102,205,170); pen MediumBlue=rgbint(0,0,205); pen MediumOrchid=rgbint(186,85,211); pen MediumPurple=rgbint(147,112,219); pen MediumSeaGreen=rgbint(60,179,113); pen MediumSlateBlue=rgbint(123,104,238); pen MediumSpringGreen=rgbint(0,250,154); pen MediumTurquoise=rgbint(72,209,204); pen MediumVioletRed=rgbint(199,21,133); pen MidnightBlue=rgbint(25,25,112); pen MintCream=rgbint(245,255,250); pen MistyRose=rgbint(255,228,225); pen Moccasin=rgbint(255,228,181); pen NavajoWhite=rgbint(255,222,173); pen Navy=rgbint(0,0,128); pen OldLace=rgbint(253,245,230); pen Olive=rgbint(128,128,0); pen OliveDrab=rgbint(107,142,35); pen Orange=rgbint(255,165,0); pen OrangeRed=rgbint(255,69,0); pen Orchid=rgbint(218,112,214); pen PaleGoldenrod=rgbint(238,232,170); pen PaleGreen=rgbint(152,251,152); pen PaleTurquoise=rgbint(175,238,238); pen PaleVioletRed=rgbint(219,112,147); pen PapayaWhip=rgbint(255,239,213); pen PeachPuff=rgbint(255,218,185); pen Peru=rgbint(205,133,63); pen Pink=rgbint(255,192,203); pen Plum=rgbint(221,160,221); pen PowderBlue=rgbint(176,224,230); pen Purple=rgbint(128,0,128); pen Red=rgbint(255,0,0); pen RosyBrown=rgbint(188,143,143); pen RoyalBlue=rgbint(65,105,225); pen SaddleBrown=rgbint(139,69,19); pen Salmon=rgbint(250,128,114); pen SandyBrown=rgbint(244,164,96); pen SeaGreen=rgbint(46,139,87); pen Seashell=rgbint(255,245,238); pen Sienna=rgbint(160,82,45); pen Silver=rgbint(192,192,192); pen SkyBlue=rgbint(135,206,235); pen SlateBlue=rgbint(106,90,205); pen SlateGray=rgbint(112,128,144); pen Snow=rgbint(255,250,250); pen SpringGreen=rgbint(0,255,127); pen SteelBlue=rgbint(70,130,180); pen Tan=rgbint(210,180,140); pen Teal=rgbint(0,128,128); pen Thistle=rgbint(216,191,216); pen Tomato=rgbint(255,99,71); pen Turquoise=rgbint(64,224,208); pen Violet=rgbint(238,130,238); pen Wheat=rgbint(245,222,179); pen White=rgbint(255,255,255); pen WhiteSmoke=rgbint(245,245,245); pen Yellow=rgbint(255,255,0); pen YellowGreen=rgbint(154,205,50); ./asymptote-2.41/base/plain_pens.asy0000644000175000017500000002054013064427076017324 0ustar norbertnorbertreal labelmargin=0.3; real dotfactor=6; pen solid=linetype(new real[]); pen dotted=linetype(new real[] {0,4}); pen dashed=linetype(new real[] {8,8}); pen longdashed=linetype(new real[] {24,8}); pen dashdotted=linetype(new real[] {8,8,0,8}); pen longdashdotted=linetype(new real[] {24,8,0,8}); pen linetype(string pattern, real offset=0, bool scale=true, bool adjust=true) { return linetype((real[]) split(pattern),offset,scale,adjust); } void defaultpen(real w) {defaultpen(linewidth(w));} pen operator +(pen p, real w) {return p+linewidth(w);} pen operator +(real w, pen p) {return linewidth(w)+p;} pen Dotted(pen p=currentpen) {return linetype(new real[] {0,3})+2*linewidth(p);} pen Dotted=Dotted(); restricted pen squarecap=linecap(0); restricted pen roundcap=linecap(1); restricted pen extendcap=linecap(2); restricted pen miterjoin=linejoin(0); restricted pen roundjoin=linejoin(1); restricted pen beveljoin=linejoin(2); restricted pen zerowinding=fillrule(0); restricted pen evenodd=fillrule(1); bool interior(int windingnumber, pen fillrule) { return windingnumber != undefined && (fillrule(fillrule) == 1 ? windingnumber % 2 == 1 : windingnumber != 0); } restricted pen nobasealign=basealign(0); restricted pen basealign=basealign(1); pen invisible=invisible(); pen thin() {return settings.thin ? linewidth(0) : defaultpen;} pen thick(pen p=currentpen) {return linewidth(linewidth(p));} pen nullpen=linewidth(0)+invisible; pen black=gray(0); pen white=gray(1); pen gray=gray(0.5); pen red=rgb(1,0,0); pen green=rgb(0,1,0); pen blue=rgb(0,0,1); pen Cyan=cmyk(1,0,0,0); pen Magenta=cmyk(0,1,0,0); pen Yellow=cmyk(0,0,1,0); pen Black=cmyk(0,0,0,1); pen cyan=rgb(0,1,1); pen magenta=rgb(1,0,1); pen yellow=rgb(1,1,0); pen palered=rgb(1,0.75,0.75); pen palegreen=rgb(0.75,1,0.75); pen paleblue=rgb(0.75,0.75,1); pen palecyan=rgb(0.75,1,1); pen palemagenta=rgb(1,0.75,1); pen paleyellow=rgb(1,1,0.75); pen palegray=gray(0.95); pen lightred=rgb(1,0.5,0.5); pen lightgreen=rgb(0.5,1,0.5); pen lightblue=rgb(0.5,0.5,1); pen lightcyan=rgb(0.5,1,1); pen lightmagenta=rgb(1,0.5,1); pen lightyellow=rgb(1,1,0.5); pen lightgray=gray(0.9); pen mediumred=rgb(1,0.25,0.25); pen mediumgreen=rgb(0.25,1,0.25); pen mediumblue=rgb(0.25,0.25,1); pen mediumcyan=rgb(0.25,1,1); pen mediummagenta=rgb(1,0.25,1); pen mediumyellow=rgb(1,1,0.25); pen mediumgray=gray(0.75); pen heavyred=rgb(0.75,0,0); pen heavygreen=rgb(0,0.75,0); pen heavyblue=rgb(0,0,0.75); pen heavycyan=rgb(0,0.75,0.75); pen heavymagenta=rgb(0.75,0,0.75); pen lightolive=rgb(0.75,0.75,0); pen heavygray=gray(0.25); pen deepred=rgb(0.5,0,0); pen deepgreen=rgb(0,0.5,0); pen deepblue=rgb(0,0,0.5); pen deepcyan=rgb(0,0.5,0.5); pen deepmagenta=rgb(0.5,0,0.5); pen deepyellow=rgb(0.5,0.5,0); pen deepgray=gray(0.1); pen darkred=rgb(0.25,0,0); pen darkgreen=rgb(0,0.25,0); pen darkblue=rgb(0,0,0.25); pen darkcyan=rgb(0,0.25,0.25); pen darkmagenta=rgb(0.25,0,0.25); pen darkolive=rgb(0.25,0.25,0); pen darkgray=gray(0.05); pen orange=rgb(1,0.5,0); pen fuchsia=rgb(1,0,0.5); pen chartreuse=rgb(0.5,1,0); pen springgreen=rgb(0,1,0.5); pen purple=rgb(0.5,0,1); pen royalblue=rgb(0,0.5,1); // Synonyms: pen salmon=lightred; pen brown=deepred; pen olive=deepyellow; pen darkbrown=darkred; pen pink=palemagenta; pen palegrey=palegray; pen lightgrey=lightgray; pen mediumgrey=mediumgray; pen grey=gray; pen heavygrey=heavygray; pen deepgrey=deepgray; pen darkgrey=darkgray; // Options for handling label overwriting restricted int Allow=0; restricted int Suppress=1; restricted int SuppressQuiet=2; restricted int Move=3; restricted int MoveQuiet=4; pen[] colorPen={red,blue,green,magenta,cyan,orange,purple,brown, deepblue,deepgreen,chartreuse,fuchsia,lightred, lightblue,black,pink,yellow,gray}; colorPen.cyclic=true; pen[] monoPen={solid,dashed,dotted,longdashed,dashdotted, longdashdotted}; monoPen.cyclic=true; pen Pen(int n) { return (settings.gray || settings.bw) ? monoPen[n] : colorPen[n]; } pen Pentype(int n) { return (settings.gray || settings.bw) ? monoPen[n] : monoPen[n]+colorPen[n]; } real dotsize(pen p=currentpen) { return dotfactor*linewidth(p); } pen fontsize(real size) { return fontsize(size,1.2*size); } real labelmargin(pen p=currentpen) { return labelmargin*fontsize(p); } void write(file file=stdout, string s="", pen[] p) { for(int i=0; i < p.length; ++i) write(file,s,p[i],endl); } void usetypescript(string s, string encoding="") { string s="\usetypescript["+s+"]"; if(encoding != "") s +="["+encoding+"]"; texpreamble(s); } pen font(string name, string options="") { // Work around misalignment in ConTeXt switchtobodyfont if font is not found. return fontcommand(settings.tex == "context" ? "\switchtobodyfont["+name+ (options == "" ? "" : ","+options)+ "]\removeunwantedspaces" : "\font\ASYfont="+name+"\ASYfont"); } pen font(string name, real size, string options="") { string s=(string) (size/pt)+"pt"; if(settings.tex == "context") return fontsize(size)+font(name+","+s,options); return fontsize(size)+font(name+" at "+s); } pen font(string encoding, string family, string series, string shape) { return fontcommand("\usefont{"+encoding+"}{"+family+"}{"+series+"}{"+shape+ "}"); } pen AvantGarde(string series="m", string shape="n") { return font("OT1","pag",series,shape); } pen Bookman(string series="m", string shape="n") { return font("OT1","pbk",series,shape); } pen Courier(string series="m", string shape="n") { return font("OT1","pcr",series,shape); } pen Helvetica(string series="m", string shape="n") { return font("OT1","phv",series,shape); } pen NewCenturySchoolBook(string series="m", string shape="n") { return font("OT1","pnc",series,shape); } pen Palatino(string series="m", string shape="n") { return font("OT1","ppl",series,shape); } pen TimesRoman(string series="m", string shape="n") { return font("OT1","ptm",series,shape); } pen ZapfChancery(string series="m", string shape="n") { return font("OT1","pzc",series,shape); } pen Symbol(string series="m", string shape="n") { return font("OT1","psy",series,shape); } pen ZapfDingbats(string series="m", string shape="n") { return font("OT1","pzd",series,shape); } pen squarepen=makepen(shift(-0.5,-0.5)*unitsquare); struct hsv { real h; real v; real s; void operator init(real h, real s, real v) { this.h=h; this.s=s; this.v=v; } void operator init(pen p) { real[] c=colors(rgb(p)); real r=c[0]; real g=c[1]; real b=c[2]; real M=max(r,g,b); real m=min(r,g,b); if(M == m) this.h=0; else { real denom=1/(M-m); if(M == r) { this.h=60*(g-b)*denom; if(g < b) h += 360; } else if(M == g) { this.h=60*(b-r)*denom+120; } else this.h=60*(r-g)*denom+240; } this.s=M == 0 ? 0 : 1-m/M; this.v=M; } // return an rgb pen corresponding to h in [0,360) and s and v in [0,1]. pen rgb() { real H=(h % 360)/60; int i=floor(H) % 6; real f=H-i; real[] V={v,v*(1-s),v*(1-(i % 2 == 0 ? 1-f : f)*s)}; int[] a={0,2,1,1,2,0}; int[] b={2,0,0,2,1,1}; int[] c={1,1,2,0,0,2}; return rgb(V[a[i]],V[b[i]],V[c[i]]); } } pen operator cast(hsv hsv) { return hsv.rgb(); } hsv operator cast(pen p) { return hsv(p); } real[] rgba(pen p) { real[] a=colors(rgb(p)); a.push(opacity(p)); return a; } pen rgba(real[] a) { return rgb(a[0],a[1],a[2])+opacity(a[3]); } // Return a pen corresponding to a given 6-character RGB hexidecimal string. pen rgb(string s) { real value(string s, int i) {return hex(substr(s,2i,2))/255;} return rgb(value(s,0),value(s,1),value(s,2)); } pen[] operator +(pen[] a, pen b) { return sequence(new pen(int i) {return a[i]+b;},a.length); } pen[] operator +(pen a, pen[] b) { return sequence(new pen(int i) {return a+b[i];},b.length); } // Interpolate an array of pens in rgb space using by default their minimum // opacity. pen mean(pen[] p, real opacity(real[])=min) { if(p.length == 0) return nullpen; real[] a=rgba(p[0]); real[] t=new real[p.length]; t[0]=a[3]; for(int i=1; i < p.length; ++i) { real[] b=rgba(p[i]); a += b; t[i]=b[3]; } a /= p.length; return rgb(a[0],a[1],a[2])+opacity(opacity(t)); } pen[] mean(pen[][] palette, real opacity(real[])=min) { return sequence(new pen(int i) {return mean(palette[i],opacity);}, palette.length); } ./asymptote-2.41/base/plain_arrows.asy0000644000175000017500000004521513064427076017702 0ustar norbertnorbertreal arrowlength=0.75cm; real arrowfactor=15; real arrowangle=15; real arcarrowfactor=0.5*arrowfactor; real arcarrowangle=2*arrowangle; real arrowsizelimit=0.5; real arrow2sizelimit=1/3; real arrowdir=5; real arrowbarb=3; real arrowhookfactor=1.5; real arrowtexfactor=1; real barfactor=arrowfactor; real arrowsize(pen p=currentpen) { return arrowfactor*linewidth(p); } real arcarrowsize(pen p=currentpen) { return arcarrowfactor*linewidth(p); } real barsize(pen p=currentpen) { return barfactor*linewidth(p); } struct arrowhead { path head(path g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle); real size(pen p)=arrowsize; real arcsize(pen p)=arcarrowsize; filltype defaultfilltype(pen) {return FillDraw;} } real[] arrowbasepoints(path base, path left, path right, real default=0) { real[][] Tl=transpose(intersections(left,base)); real[][] Tr=transpose(intersections(right,base)); return new real[] {Tl.length > 0 ? Tl[0][0] : default, Tr.length > 0 ? Tr[0][0] : default}; } path arrowbase(path r, pair y, real t, real size) { pair perp=2*size*I*dir(r,t); return size == 0 ? y : y+perp--y-perp; } arrowhead DefaultHead; DefaultHead.head=new path(path g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle) { if(size == 0) size=DefaultHead.size(p); bool relative=position.relative; real position=position.position.x; if(relative) position=reltime(g,position); path r=subpath(g,position,0); pair x=point(r,0); real t=arctime(r,size); pair y=point(r,t); path base=arrowbase(r,y,t,size); path left=rotate(-angle,x)*r; path right=rotate(angle,x)*r; real[] T=arrowbasepoints(base,left,right); pair denom=point(right,T[1])-y; real factor=denom != 0 ? length((point(left,T[0])-y)/denom) : 1; path left=rotate(-angle*factor,x)*r; path right=rotate(angle*factor,x)*r; real[] T=arrowbasepoints(base,left,right); return subpath(left,0,T[0])--subpath(right,T[1],0)&cycle; }; arrowhead SimpleHead; SimpleHead.head=new path(path g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle) { if(size == 0) size=SimpleHead.size(p); bool relative=position.relative; real position=position.position.x; if(relative) position=reltime(g,position); path r=subpath(g,position,0); pair x=point(r,0); real t=arctime(r,size); path left=rotate(-angle,x)*r; path right=rotate(angle,x)*r; return subpath(left,t,0)--subpath(right,0,t); }; arrowhead HookHead(real dir=arrowdir, real barb=arrowbarb) { arrowhead a; a.head=new path(path g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle) { if(size == 0) size=a.size(p); angle=min(angle*arrowhookfactor,45); bool relative=position.relative; real position=position.position.x; if(relative) position=reltime(g,position); path r=subpath(g,position,0); pair x=point(r,0); real t=arctime(r,size); pair y=point(r,t); path base=arrowbase(r,y,t,size); path left=rotate(-angle,x)*r; path right=rotate(angle,x)*r; real[] T=arrowbasepoints(base,left,right,1); pair denom=point(right,T[1])-y; real factor=denom != 0 ? length((point(left,T[0])-y)/denom) : 1; path left=rotate(-angle*factor,x)*r; path right=rotate(angle*factor,x)*r; real[] T=arrowbasepoints(base,left,right,1); left=subpath(left,0,T[0]); right=subpath(right,T[1],0); pair pl0=point(left,0), pl1=relpoint(left,1); pair pr0=relpoint(right,0), pr1=relpoint(right,1); pair M=(pl1+pr0)/2; pair v=barb*unit(M-pl0); pl1=pl1+v; pr0=pr0+v; left=pl0{dir(-dir+degrees(M-pl0,false))}..pl1--M; right=M--pr0..pr1{dir(dir+degrees(pr1-M,false))}; return left--right&cycle; }; return a; } arrowhead HookHead=HookHead(); arrowhead TeXHead; TeXHead.size=new real(pen p) { static real hcoef=2.1; // 84/40=abs(base-hint)/base_height return hcoef*arrowtexfactor*linewidth(p); }; TeXHead.arcsize=TeXHead.size; TeXHead.head=new path(path g, position position=EndPoint, pen p=currentpen, real size=0, real angle=arrowangle) { static real wcoef=1/84; // 1/abs(base-hint) static path texhead=scale(wcoef)* ((0,20) .. controls (-75,75) and (-108,158) .. (-108,166) .. controls (-108,175) and (-100,178) .. (-93,178) .. controls (-82,178) and (-80,173) .. (-77,168) .. controls (-62,134) and (-30,61) .. (70,14) .. controls (82,8) and (84,7) .. (84,0) .. controls (84,-7) and (82,-8) .. (70,-14) .. controls (-30,-61) and (-62,-134) .. (-77,-168) .. controls (-80,-173) and (-82,-178) .. (-93,-178) .. controls (-100,-178) and (-108,-175).. (-108,-166).. controls (-108,-158) and (-75,-75) .. (0,-20)--cycle); if(size == 0) size=TeXHead.size(p); path gp=scale(size)*texhead; bool relative=position.relative; real position=position.position.x; if(relative) position=reltime(g,position); path r=subpath(g,position,0); pair y=point(r,arctime(r,size)); return shift(y)*rotate(degrees(-dir(r,arctime(r,0.5*size))))*gp; }; TeXHead.defaultfilltype=new filltype(pen p) {return Fill(p);}; private real position(position position, real size, path g, bool center) { bool relative=position.relative; real position=position.position.x; if(relative) { position *= arclength(g); if(center) position += 0.5*size; position=arctime(g,position); } else if(center) position=arctime(g,arclength(subpath(g,0,position))+0.5*size); return position; } void drawarrow(frame f, arrowhead arrowhead=DefaultHead, path g, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, position position=EndPoint, bool forwards=true, margin margin=NoMargin, bool center=false) { if(size == 0) size=arrowhead.size(p); if(filltype == null) filltype=arrowhead.defaultfilltype(p); size=min(arrowsizelimit*arclength(g),size); real position=position(position,size,g,center); g=margin(g,p).g; int L=length(g); if(!forwards) { g=reverse(g); position=L-position; } path r=subpath(g,position,0); size=min(arrowsizelimit*arclength(r),size); path head=arrowhead.head(g,position,p,size,angle); bool endpoint=position > L-sqrtEpsilon; if(cyclic(head) && (filltype == NoFill || endpoint)) { if(position > 0) draw(f,subpath(r,arctime(r,size),length(r)),p); if(!endpoint) draw(f,subpath(g,position,L),p); } else draw(f,g,p); filltype.fill(f,head,p+solid); } void drawarrow2(frame f, arrowhead arrowhead=DefaultHead, path g, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, margin margin=NoMargin) { if(size == 0) size=arrowhead.size(p); if(filltype == null) filltype=arrowhead.defaultfilltype(p); g=margin(g,p).g; size=min(arrow2sizelimit*arclength(g),size); path r=reverse(g); int L=length(g); path head=arrowhead.head(g,L,p,size,angle); path tail=arrowhead.head(r,L,p,size,angle); if(cyclic(head)) draw(f,subpath(r,arctime(r,size),L-arctime(g,size)),p); else draw(f,g,p); filltype.fill(f,head,p+solid); filltype.fill(f,tail,p+solid); } // Add to picture an estimate of the bounding box contribution of arrowhead // using the local slope at endpoint and ignoring margin. void addArrow(picture pic, arrowhead arrowhead, path g, pen p, real size, real angle, filltype filltype, real position) { if(filltype == null) filltype=arrowhead.defaultfilltype(p); pair z=point(g,position); path g=z-(size+linewidth(p))*dir(g,position)--z; frame f; filltype.fill(f,arrowhead.head(g,position,p,size,angle),p); pic.addBox(z,z,min(f)-z,max(f)-z); } picture arrow(arrowhead arrowhead=DefaultHead, path g, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, position position=EndPoint, bool forwards=true, margin margin=NoMargin, bool center=false) { if(size == 0) size=arrowhead.size(p); picture pic; pic.add(new void(frame f, transform t) { drawarrow(f,arrowhead,t*g,p,size,angle,filltype,position,forwards,margin, center); }); pic.addPath(g,p); real position=position(position,size,g,center); path G; if(!forwards) { G=reverse(g); position=length(g)-position; } else G=g; addArrow(pic,arrowhead,G,p,size,angle,filltype,position); return pic; } picture arrow2(arrowhead arrowhead=DefaultHead, path g, pen p=currentpen, real size=0, real angle=arrowangle, filltype filltype=null, margin margin=NoMargin) { if(size == 0) size=arrowhead.size(p); picture pic; pic.add(new void(frame f, transform t) { drawarrow2(f,arrowhead,t*g,p,size,angle,filltype,margin); }); pic.addPath(g,p); int L=length(g); addArrow(pic,arrowhead,g,p,size,angle,filltype,L); addArrow(pic,arrowhead,reverse(g),p,size,angle,filltype,L); return pic; } void bar(picture pic, pair a, pair d, pen p=currentpen) { picture opic; Draw(opic,-0.5d--0.5d,p+solid); add(pic,opic,a); } picture bar(pair a, pair d, pen p=currentpen) { picture pic; bar(pic,a,d,p); return pic; } typedef bool arrowbar(picture, path, pen, margin); bool Blank(picture, path, pen, margin) { return false; } bool None(picture, path, pen, margin) { return true; } arrowbar BeginArrow(arrowhead arrowhead=DefaultHead, real size=0, real angle=arrowangle, filltype filltype=null, position position=BeginPoint) { return new bool(picture pic, path g, pen p, margin margin) { add(pic,arrow(arrowhead,g,p,size,angle,filltype,position,forwards=false, margin)); return false; }; } arrowbar Arrow(arrowhead arrowhead=DefaultHead, real size=0, real angle=arrowangle, filltype filltype=null, position position=EndPoint) { return new bool(picture pic, path g, pen p, margin margin) { add(pic,arrow(arrowhead,g,p,size,angle,filltype,position,margin)); return false; }; } arrowbar EndArrow(arrowhead arrowhead=DefaultHead, real size=0, real angle=arrowangle, filltype filltype=null, position position=EndPoint)=Arrow; arrowbar MidArrow(arrowhead arrowhead=DefaultHead, real size=0, real angle=arrowangle, filltype filltype=null) { return new bool(picture pic, path g, pen p, margin margin) { add(pic,arrow(arrowhead,g,p,size,angle,filltype,MidPoint,margin, center=true)); return false; }; } arrowbar Arrows(arrowhead arrowhead=DefaultHead, real size=0, real angle=arrowangle, filltype filltype=null) { return new bool(picture pic, path g, pen p, margin margin) { add(pic,arrow2(arrowhead,g,p,size,angle,filltype,margin)); return false; }; } arrowbar BeginArcArrow(arrowhead arrowhead=DefaultHead, real size=0, real angle=arcarrowangle, filltype filltype=null, position position=BeginPoint) { return new bool(picture pic, path g, pen p, margin margin) { real size=size == 0 ? arrowhead.arcsize(p) : size; add(pic,arrow(arrowhead,g,p,size,angle,filltype,position, forwards=false,margin)); return false; }; } arrowbar ArcArrow(arrowhead arrowhead=DefaultHead, real size=0, real angle=arcarrowangle, filltype filltype=null, position position=EndPoint) { return new bool(picture pic, path g, pen p, margin margin) { real size=size == 0 ? arrowhead.arcsize(p) : size; add(pic,arrow(arrowhead,g,p,size,angle,filltype,position,margin)); return false; }; } arrowbar EndArcArrow(arrowhead arrowhead=DefaultHead, real size=0, real angle=arcarrowangle, filltype filltype=null, position position=EndPoint)=ArcArrow; arrowbar MidArcArrow(arrowhead arrowhead=DefaultHead, real size=0, real angle=arcarrowangle, filltype filltype=null) { return new bool(picture pic, path g, pen p, margin margin) { real size=size == 0 ? arrowhead.arcsize(p) : size; add(pic,arrow(arrowhead,g,p,size,angle,filltype,MidPoint,margin, center=true)); return false; }; } arrowbar ArcArrows(arrowhead arrowhead=DefaultHead, real size=0, real angle=arcarrowangle, filltype filltype=null) { return new bool(picture pic, path g, pen p, margin margin) { real size=size == 0 ? arrowhead.arcsize(p) : size; add(pic,arrow2(arrowhead,g,p,size,angle,filltype,margin)); return false; }; } arrowbar BeginBar(real size=0) { return new bool(picture pic, path g, pen p, margin margin) { real size=size == 0 ? barsize(p) : size; bar(pic,point(g,0),size*dir(g,0)*I,p); return true; }; } arrowbar Bar(real size=0) { return new bool(picture pic, path g, pen p, margin margin) { int L=length(g); real size=size == 0 ? barsize(p) : size; bar(pic,point(g,L),size*dir(g,L)*I,p); return true; }; } arrowbar EndBar(real size=0)=Bar; arrowbar Bars(real size=0) { return new bool(picture pic, path g, pen p, margin margin) { real size=size == 0 ? barsize(p) : size; BeginBar(size)(pic,g,p,margin); EndBar(size)(pic,g,p,margin); return true; }; } arrowbar BeginArrow=BeginArrow(), MidArrow=MidArrow(), Arrow=Arrow(), EndArrow=Arrow(), Arrows=Arrows(), BeginArcArrow=BeginArcArrow(), MidArcArrow=MidArcArrow(), ArcArrow=ArcArrow(), EndArcArrow=ArcArrow(), ArcArrows=ArcArrows(), BeginBar=BeginBar(), Bar=Bar(), EndBar=Bar(), Bars=Bars(); void draw(frame f, path g, pen p=currentpen, arrowbar arrow) { picture pic; if(arrow(pic,g,p,NoMargin)) draw(f,g,p); add(f,pic.fit()); } void draw(picture pic=currentpicture, Label L=null, path g, align align=NoAlign, pen p=currentpen, arrowbar arrow=None, arrowbar bar=None, margin margin=NoMargin, Label legend=null, marker marker=nomarker) { // These if statements are ordered in such a way that the most common case // (with just a path and a pen) executes the least bytecode. if (marker == nomarker) { if (arrow == None && bar == None) { if (margin == NoMargin && size(nib(p)) == 0) { pic.addExactAbove( new void(frame f, transform t, transform T, pair, pair) { _draw(f,t*T*g,p); }); pic.addPath(g,p); // Jumping over else clauses takes time, so test if we can return // here. if (L == null && legend == null) return; } else // With margin or polygonal pen. { _draw(pic, g, p, margin); } } else /* arrow or bar */ { // Note we are using & instead of && as both arrow and bar need to be // called. if (arrow(pic, g, p, margin) & bar(pic, g, p, margin)) _draw(pic, g, p, margin); } if(L != null && L.s != "") { L=L.copy(); L.align(align); L.p(p); L.out(pic,g); } if(legend != null && legend.s != "") { legend.p(p); pic.legend.push(Legend(legend.s,legend.p,p,marker.f,marker.above)); } } else /* marker != nomarker */ { if(marker != nomarker && !marker.above) marker.mark(pic,g); // Note we are using & instead of && as both arrow and bar need to be // called. if ((arrow == None || arrow(pic, g, p, margin)) & (bar == None || bar(pic, g, p, margin))) { _draw(pic, g, p, margin); } if(L != null && L.s != "") { L=L.copy(); L.align(align); L.p(p); L.out(pic,g); } if(legend != null && legend.s != "") { legend.p(p); pic.legend.push(Legend(legend.s,legend.p,p,marker.f,marker.above)); } if(marker != nomarker && marker.above) marker.mark(pic,g); } } // Draw a fixed-size line about the user-coordinate 'origin'. void draw(pair origin, picture pic=currentpicture, Label L=null, path g, align align=NoAlign, pen p=currentpen, arrowbar arrow=None, arrowbar bar=None, margin margin=NoMargin, Label legend=null, marker marker=nomarker) { picture opic; draw(opic,L,g,align,p,arrow,bar,margin,legend,marker); add(pic,opic,origin); } void draw(picture pic=currentpicture, explicit path[] g, pen p=currentpen, Label legend=null, marker marker=nomarker) { // This could be optimized to size and draw the entire array as a batch. for(int i=0; i < g.length-1; ++i) draw(pic,g[i],p,marker); if(g.length > 0) draw(pic,g[g.length-1],p,legend,marker); } void draw(picture pic=currentpicture, guide[] g, pen p=currentpen, Label legend=null, marker marker=nomarker) { draw(pic,(path[]) g,p,legend,marker); } void draw(pair origin, picture pic=currentpicture, explicit path[] g, pen p=currentpen, Label legend=null, marker marker=nomarker) { picture opic; draw(opic,g,p,legend,marker); add(pic,opic,origin); } void draw(pair origin, picture pic=currentpicture, guide[] g, pen p=currentpen, Label legend=null, marker marker=nomarker) { draw(origin,pic,(path[]) g,p,legend,marker); } // Align an arrow pointing to b from the direction dir. The arrow is // 'length' PostScript units long. void arrow(picture pic=currentpicture, Label L=null, pair b, pair dir, real length=arrowlength, align align=NoAlign, pen p=currentpen, arrowbar arrow=Arrow, margin margin=EndMargin) { if(L != null && L.s != "") { L=L.copy(); if(L.defaultposition) L.position(0); L.align(L.align,dir); L.p(p); } marginT margin=margin(b--b,p); // Extract margin.begin and margin.end pair a=(margin.begin+length+margin.end)*unit(dir); draw(b,pic,L,a--(0,0),align,p,arrow,margin); } // Fit an array of pictures simultaneously using the sizing of picture all. frame[] fit2(picture[] pictures, picture all) { frame[] out; if(!all.empty2()) { transform t=all.calculateTransform(); pair m=all.min(t); pair M=all.max(t); for(picture pic : pictures) { frame f=pic.fit(t); draw(f,m,nullpen); draw(f,M,nullpen); out.push(f); } } return out; } // Fit an array of pictures simultaneously using the size of the first picture. // TODO: Remove unused arguments. frame[] fit(string prefix="", picture[] pictures, string format="", bool view=true, string options="", string script="", projection P=currentprojection) { if(pictures.length == 0) return new frame[]; picture all; size(all,pictures[0]); for(picture pic : pictures) add(all,pic); return fit2(pictures,all); } ./asymptote-2.41/base/bsp.asy0000644000175000017500000001242713064427076015765 0ustar norbertnorbertprivate import math; import three; real epsilon=10*realEpsilon; // Routines for hidden surface removal (via binary space partition): // Structure face is derived from picture. struct face { picture pic; transform t; frame fit; triple normal,point; triple min,max; void operator init(path3 p) { this.normal=normal(p); if(this.normal == O) abort("path is linear"); this.point=point(p,0); min=min(p); max=max(p); } face copy() { face f=new face; f.pic=pic.copy(); f.t=t; f.normal=normal; f.point=point; f.min=min; f.max=max; add(f.fit,fit); return f; } } picture operator cast(face f) {return f.pic;} face operator cast(path3 p) {return face(p);} struct line { triple point; triple dir; } private line intersection(face a, face b) { line L; L.point=intersectionpoint(a.normal,a.point,b.normal,b.point); L.dir=unit(cross(a.normal,b.normal)); return L; } struct half { pair[] left,right; // Sort the points in the pair array z according to whether they lie on the // left or right side of the line L in the direction dir passing through P. // Points exactly on L are considered to be on the right side. // Also push any points of intersection of L with the path operator --(... z) // onto each of the arrays left and right. void operator init(pair dir, pair P ... pair[] z) { pair lastz; pair invdir=dir != 0 ? 1/dir : 0; bool left,last; for(int i=0; i < z.length; ++i) { left=(invdir*z[i]).y > (invdir*P).y; if(i > 0 && last != left) { pair w=extension(P,P+dir,lastz,z[i]); this.left.push(w); this.right.push(w); } if(left) this.left.push(z[i]); else this.right.push(z[i]); last=left; lastz=z[i]; } } } struct splitface { face back,front; } // Return the pieces obtained by splitting face a by face cut. splitface split(face a, face cut, projection P) { splitface S; void nointersection() { if(abs(dot(a.point-P.camera,a.normal)) >= abs(dot(cut.point-P.camera,cut.normal))) { S.back=a; S.front=null; } else { S.back=null; S.front=a; } } if(P.infinity) { P=P.copy(); static real factor=1/sqrtEpsilon; P.camera *= factor*max(abs(a.min),abs(a.max), abs(cut.min),abs(cut.max)); } if((abs(a.normal-cut.normal) < epsilon || abs(a.normal+cut.normal) < epsilon)) { nointersection(); return S; } line L=intersection(a,cut); if(dot(P.camera-L.point,P.camera-P.target) < 0) { nointersection(); return S; } pair point=a.t*project(L.point,P); pair dir=a.t*project(L.point+L.dir,P)-point; pair invdir=dir != 0 ? 1/dir : 0; triple apoint=L.point+cross(L.dir,a.normal); bool left=(invdir*(a.t*project(apoint,P))).y >= (invdir*point).y; real t=intersect(apoint,P.camera,cut.normal,cut.point); bool rightfront=left ^ (t <= 0 || t >= 1); face back=a, front=a.copy(); pair max=max(a.fit); pair min=min(a.fit); half h=half(dir,point,max,(min.x,max.y),min,(max.x,min.y),max); if(h.right.length == 0) { if(rightfront) front=null; else back=null; } else if(h.left.length == 0) { if(rightfront) back=null; else front=null; } if(front != null) clip(front.fit,operator --(... rightfront ? h.right : h.left)--cycle, zerowinding); if(back != null) clip(back.fit,operator --(... rightfront ? h.left : h.right)--cycle, zerowinding); S.back=back; S.front=front; return S; } // A binary space partition struct bsp { bsp back; bsp front; face node; // Construct the bsp. void operator init(face[] faces, projection P) { if(faces.length != 0) { this.node=faces.pop(); face[] front,back; for(int i=0; i < faces.length; ++i) { splitface split=split(faces[i],this.node,P); if(split.front != null) front.push(split.front); if(split.back != null) back.push(split.back); } this.front=bsp(front,P); this.back=bsp(back,P); } } // Draw from back to front. void add(frame f) { if(back != null) back.add(f); add(f,node.fit,group=true); if(labels(node.fit)) layer(f); // Draw over any existing TeX layers. if(front != null) front.add(f); } } void add(picture pic=currentpicture, face[] faces, projection P=currentprojection) { int n=faces.length; face[] Faces=new face[n]; for(int i=0; i < n; ++i) Faces[i]=faces[i].copy(); pic.nodes.push(new void (frame f, transform t, transform T, pair m, pair M) { // Fit all of the pictures so we know their exact sizes. face[] faces=new face[n]; for(int i=0; i < n; ++i) { faces[i]=Faces[i].copy(); face F=faces[i]; F.t=t*T*F.pic.T; F.fit=F.pic.fit(t,T*F.pic.T,m,M); } bsp bsp=bsp(faces,P); if(bsp != null) bsp.add(f); }); for(int i=0; i < n; ++i) { picture F=Faces[i].pic; pic.userBox3(F.userMin3(), F.userMax3()); pic.bounds.append(F.T, F.bounds); // The above 2 lines should be replaced with a routine in picture which // copies only sizing data from another picture. } } ./asymptote-2.41/base/three_light.asy0000644000175000017500000000671113064427076017476 0ustar norbertnorbertstruct material { pen[] p; // diffusepen,ambientpen,emissivepen,specularpen real opacity; real shininess; void operator init(pen diffusepen=black, pen ambientpen=black, pen emissivepen=black, pen specularpen=mediumgray, real opacity=opacity(diffusepen), real shininess=defaultshininess) { p=new pen[] {diffusepen,ambientpen,emissivepen,specularpen}; this.opacity=opacity; this.shininess=shininess; } void operator init(material m) { p=copy(m.p); opacity=m.opacity; shininess=m.shininess; } pen diffuse() {return p[0];} pen ambient() {return p[1];} pen emissive() {return p[2];} pen specular() {return p[3];} void diffuse(pen q) {p[0]=q;} void ambient(pen q) {p[1]=q;} void emissive(pen q) {p[2]=q;} void specular(pen q) {p[3]=q;} } material operator init() { return material(); } void write(file file, string s="", material x, suffix suffix=none) { write(file,s); write(file,"{"); write(file,"diffuse=",x.diffuse()); write(file,", ambient=",x.ambient()); write(file,", emissive=",x.emissive()); write(file,", specular=",x.specular()); write(file,", opacity=",x.opacity); write(file,", shininess=",x.shininess); write(file,"}",suffix); } void write(string s="", material x, suffix suffix=endl) { write(stdout,s,x,suffix); } bool operator == (material m, material n) { return all(m.p == n.p) && m.opacity == n.opacity && m.shininess == n.shininess; } material operator cast(pen p) { return material(p); } material[] operator cast(pen[] p) { return sequence(new material(int i) {return p[i];},p.length); } pen operator ecast(material m) { return m.p.length > 0 ? m.diffuse() : nullpen; } material emissive(material m) { return material(black+opacity(m.opacity),black,m.diffuse(),black,m.opacity,1); } pen color(triple normal, material m, light light, transform3 T=light.T) { triple[] position=light.position; if(invisible((pen) m)) return invisible; if(position.length == 0) return m.diffuse(); normal=unit(transpose(inverse(shiftless(T)))*normal); if(settings.twosided) normal *= sgn(normal.z); real s=m.shininess*128; real[] Diffuse=rgba(m.diffuse()); real[] Ambient=rgba(m.ambient()); real[] Specular=rgba(m.specular()); real[] p=rgba(m.emissive()); for(int i=0; i < position.length; ++i) { triple L=light.viewport ? position[i] : T*position[i]; real Ldotn=max(dot(normal,L),0); p += light.ambient[i]*Ambient+Ldotn*light.diffuse[i]*Diffuse; // Apply specularfactor to partially compensate non-pixel-based rendering. if(Ldotn > 0) // Phong-Blinn model of specular reflection p += dot(normal,unit(L+Z))^s*light.specularfactor* light.specular[i]*Specular; } return rgb(p[0],p[1],p[2])+opacity(opacity(m.diffuse())); } light operator * (transform3 t, light light) { light light=light(light); if(!light.viewport) light.position=shiftless(t)*light.position; return light; } light operator cast(triple v) {return light(v);} light Viewport=light(ambient=gray(0.1),specularfactor=3,viewport=true, (0.25,-0.25,1)); light White=light(new pen[] {rgb(0.38,0.38,0.45),rgb(0.6,0.6,0.67), rgb(0.5,0.5,0.57)},specularfactor=3, new triple[] {(-2,-1.5,-0.5),(2,1.1,-2.5),(-0.5,0,2)}); light Headlamp=light(gray(0.8),ambient=gray(0.1),specular=gray(0.7), specularfactor=3,viewport=true,dir(42,48)); currentlight=Headlamp; light nolight; ./asymptote-2.41/base/stats.asy0000644000175000017500000001621313064427076016334 0ustar norbertnorbertprivate import graph; real legendmarkersize=2mm; real mean(real A[]) { return sum(A)/A.length; } // unbiased estimate real variance(real A[]) { return sum((A-mean(A))^2)/(A.length-1); } real variancebiased(real A[]) { return sum((A-mean(A))^2)/A.length; } // unbiased estimate real stdev(real A[]) { return sqrt(variance(A)); } real rms(real A[]) { return sqrt(sum(A^2)/A.length); } real skewness(real A[]) { real[] diff=A-mean(A); return sum(diff^3)/sqrt(sum(diff^2)^3/A.length); } real kurtosis(real A[]) { real[] diff=A-mean(A); return sum(diff^4)/sum(diff^2)^2*A.length; } real kurtosisexcess(real A[]) { return kurtosis(A)-3; } real Gaussian(real x, real sigma) { static real sqrt2pi=sqrt(2pi); return exp(-0.5*(x/sigma)^2)/(sigma*sqrt2pi); } real Gaussian(real x) { static real invsqrt2pi=1/sqrt(2pi); return exp(-0.5*x^2)*invsqrt2pi; } // Return frequency count of data in [bins[i],bins[i+1]) for i=0,...,n-1. int[] frequency(real[] data, real[] bins) { int n=bins.length-1; int[] freq=new int[n]; for(int i=0; i < n; ++i) freq[i]=sum(bins[i] <= data & data < bins[i+1]); return freq; } // Return frequency count in n uniform bins from a to b // (faster than the above more general algorithm). int[] frequency(real[] data, real a, real b, int n) { int[] freq=sequence(new int(int x) {return 0;},n); real h=n/(b-a); for(int i=0; i < data.length; ++i) { int I=Floor((data[i]-a)*h); if(I >= 0 && I < n) ++freq[I]; } return freq; } // Return frequency count in [xbins[i],xbins[i+1]) and [ybins[j],ybins[j+1]). int[][] frequency(real[] x, real[] y, real[] xbins, real[] ybins) { int n=xbins.length-1; int m=ybins.length-1; int[][] freq=new int[n][m]; bool[][] inybin=new bool[m][y.length]; for(int j=0; j < m; ++j) inybin[j]=ybins[j] <= y & y < ybins[j+1]; for(int i=0; i < n; ++i) { bool[] inxbini=xbins[i] <= x & x < xbins[i+1]; int[] freqi=freq[i]; for(int j=0; j < m; ++j) freqi[j]=sum(inxbini & inybin[j]); } return freq; } // Return frequency count in nx by ny uniform bins in box(a,b). int[][] frequency(real[] x, real[] y, pair a, pair b, int nx, int ny=nx) { int[][] freq=new int[nx][]; for(int i=0; i < nx; ++i) freq[i]=sequence(new int(int x) {return 0;},ny); real hx=nx/(b.x-a.x); real hy=ny/(b.y-a.y); real ax=a.x; real ay=a.y; for(int i=0; i < x.length; ++i) { int I=Floor((x[i]-ax)*hx); int J=Floor((y[i]-ay)*hy); if(I >= 0 && I <= nx && J >= 0 && J <= ny) ++freq[I][J]; } return freq; } int[][] frequency(pair[] z, pair a, pair b, int nx, int ny=nx) { int[][] freq=new int[nx][]; for(int i=0; i < nx; ++i) freq[i]=sequence(new int(int x) {return 0;},ny); real hx=nx/(b.x-a.x); real hy=ny/(b.y-a.y); real ax=a.x; real ay=a.y; for(int i=0; i < z.length; ++i) { int I=Floor((z[i].x-ax)*hx); int J=Floor((z[i].y-ay)*hy); if(I >= 0 && I < nx && J >= 0 && J < ny) ++freq[I][J]; } return freq; } path halfbox(pair a, pair b) { return a--(a.x,b.y)--b; } path topbox(pair a, pair b) { return a--(a.x,b.y)--b--(b.x,a.y); } // Draw a histogram for bin boundaries bin[n+1] of frequency data in count[n]. void histogram(picture pic=currentpicture, real[] bins, real[] count, real low=-infinity, pen fillpen=nullpen, pen drawpen=nullpen, bool bars=false, Label legend="", real markersize=legendmarkersize) { if((fillpen == nullpen || bars == true) && drawpen == nullpen) drawpen=currentpen; bool[] valid=count > 0; real m=min(valid ? count : null); real M=max(valid ? count : null); bounds my=autoscale(pic.scale.y.scale.T(m),pic.scale.y.T(M), pic.scale.y.scale); if(low == -infinity) low=pic.scale.y.scale.Tinv(my.min); real last=low; int n=count.length; begingroup(pic); for(int i=0; i < n; ++i) { if(valid[i]) { real c=count[i]; pair b=Scale(pic,(bins[i+1],c)); pair a=Scale(pic,(bins[i],low)); if(fillpen != nullpen) { fill(pic,box(a,b),fillpen); if(!bars) draw(pic,b--(b.x,a.y),fillpen); } if(!bars) draw(pic,halfbox(Scale(pic,(bins[i],last)),b),drawpen); else draw(pic,topbox(a,b),drawpen); last=c; } else { if(!bars && last != low) { draw(pic,Scale(pic,(bins[i],last))--Scale(pic,(bins[i],low)),drawpen); last=low; } } } if(!bars && last != low) draw(pic,Scale(pic,(bins[n],last))--Scale(pic,(bins[n],low)),drawpen); endgroup(pic); if(legend.s != "") { marker m=marker(scale(markersize)*shift((-0.5,-0.5))*unitsquare, drawpen,fillpen == nullpen ? Draw : (drawpen == nullpen ? Fill(fillpen) : FillDraw(fillpen))); legend.p(drawpen); pic.legend.push(Legend(legend.s,legend.p,invisible,m.f)); } } // Draw a histogram for data in n uniform bins between a and b // (optionally normalized). void histogram(picture pic=currentpicture, real[] data, real a, real b, int n, bool normalize=false, real low=-infinity, pen fillpen=nullpen, pen drawpen=nullpen, bool bars=false, Label legend="", real markersize=legendmarkersize) { real dx=(b-a)/n; real[] freq=frequency(data,a,b,n); if(normalize) freq /= dx*sum(freq); histogram(pic,a+sequence(n+1)*dx,freq,low,fillpen,drawpen,bars,legend, markersize); } // Method of Shimazaki and Shinomoto for selecting the optimal number of bins. // Shimazaki H. and Shinomoto S., A method for selecting the bin size of a // time histogram, Neural Computation (2007), Vol. 19(6), 1503-1527. // cf. http://www.ton.scphys.kyoto-u.ac.jp/~hideaki/res/histogram.html int bins(real[] data, int max=100) { real m=min(data); real M=max(data)*(1+epsilon); real n=data.length; int bins=1; real minC=2n-n^2; // Cost function for N=1. for(int N=2; N <= max; ++N) { real C=N*(2n-sum(frequency(data,m,M,N)^2)); if(C < minC) { minC=C; bins=N; } } return bins; } // return a pair of central Gaussian random numbers with unit variance pair Gaussrandpair() { real r2,v1,v2; do { v1=2.0*unitrand()-1.0; v2=2.0*unitrand()-1.0; r2=v1*v1+v2*v2; } while(r2 >= 1.0 || r2 == 0.0); return (v1,v2)*sqrt(-log(r2)/r2); } // return a central Gaussian random number with unit variance real Gaussrand() { static real sqrt2=sqrt(2.0); static pair z; static bool cached=true; cached=!cached; if(cached) return sqrt2*z.y; z=Gaussrandpair(); return sqrt2*z.x; } struct linefit { real m,b; // slope, intercept real dm,db; // standard error in slope, intercept real r; // correlation coefficient real fit(real x) { return m*x+b; } } // Do a least-squares fit of data in real arrays x and y to the line y=m*x+b linefit leastsquares(real[] x, real[] y) { linefit L; int n=x.length; if(n == 1) abort("Least squares fit requires at least 2 data points"); real sx=sum(x); real sy=sum(y); real sxx=n*sum(x^2)-sx^2; real sxy=n*sum(x*y)-sx*sy; L.m=sxy/sxx; L.b=(sy-L.m*sx)/n; if(n > 2) { real syy=n*sum(y^2)-sy^2; if(sxx == 0 || syy == 0) return L; L.r=sxy/sqrt(sxx*syy); real arg=syy-sxy^2/sxx; if(arg <= 0) return L; real s=sqrt(arg/(n-2)); L.dm=s*sqrt(1/sxx); L.db=s*sqrt(1+sx^2/sxx)/n; } return L; } ./asymptote-2.41/base/asy-mode.el0000644000175000017500000021306713064427076016526 0ustar norbertnorbert;;; asy-mode.el --- Major mode for editing Asymptote source code. ;; Copyright (C) 2006-8 ;; Author: Philippe IVALDI 20 August 2006 ;; Maintainer: John Bowman ;; URL: https://github.com/vectorgraphics/asymptote ;; Version: 1.6 ;; Keywords: language, mode ;;; License: ;; This program is free software ; you can redistribute it and/or modify ;; it under the terms of the GNU Lesser General Public License as published by ;; the Free Software Foundation ; either version 3 of the License, or ;; (at your option) any later version. ;; ;; This program is distributed in the hope that it will be useful, but ;; WITHOUT ANY WARRANTY ; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ;; Lesser General Public License for more details. ;; ;; You should have received a copy of the GNU Lesser General Public License ;; along with this program ; if not, write to the Free Software ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA ;;; Commentary ;; Major mode for editing Asymptote source code. ;; INSTALLATION: ;; Place this file (asy-mode.el) and asy-keywords.el in your Emacs load path. ;; Then choose ONE of the following installation methods: ;; * Method 1: ;; Copy and uncomment the following lines to your .emacs initialization file: ;;(autoload 'asy-mode "asy-mode.el" "Asymptote major mode." t) ;;(autoload 'lasy-mode "asy-mode.el" "hybrid Asymptote/Latex major mode." t) ;;(autoload 'asy-insinuate-latex "asy-mode.el" "Asymptote insinuate LaTeX." t) ;;(add-to-list 'auto-mode-alist '("\\.asy$" . asy-mode)) ;; * Method 2: ;; Copy and uncomment the following line to your .emacs initialization file: ;;(require 'asy-mode) ;; Notes: ;; ;; For full functionality the two-mode-mode package should also be installed ;; (http://www.dedasys.com/freesoftware/files/two-mode-mode.el). ;; ;; See also paragraph II of the documentation below to automate asy-insinuate-latex. ;;; Code: (defvar asy-mode-version "1.6") ;;;###autoload (define-derived-mode asy-mode objc-mode "Asymptote" "Emacs mode for editing Asymptote source code. For full functionality the `two-mode-mode' package should also be installed (http://www.dedasys.com/freesoftware/files/two-mode-mode.el). I. This package provides two modes: 1- asy-mode: All the files with the extension '.asy' are edited in this mode, which provides the following features: * Syntax color highlighting; * Compiling and viewing current buffer with the key binding C-c C-c; * Moving cursor to the error by pressing the key F4. * Showing the available function prototypes for the command at the cursor with the key binding C-c ? * Compiling and viewing a TeX document linked with the current buffer (usually a document that includes the output picture). To link a Tex document try 'M-x asy-set-master-tex' follow by C-Return (see descriptions further of the key binding C-Return, C-S-Return, M-Return, M-S-Return etc within 2- lasy-mode) 2- lasy-mode Editing a TeX file that contains Asymptote code is facilitated with the hybrid mode 'lasy-mode'. Toggle lasy-mode with M-x lasy-mode. In this hybrid mode the major mode is LaTeX when the cursor is in LaTeX code and becomes asy-mode when the cursor is between '\\begin{asy}' and '\\end{asy}'. All the features of asy-mode are provided and the key binding C-c C-c of asy-mode compiles and views only the code of the picture where the cursor is. Note that some keys binding are added to the LaTeX-mode-map in lasy-mode if the value of the variable lasy-extra-key is t (the default) . * C-return: compile (if the buffer/file is modified) and view the PostScript output with sequence [latex->[asy->latex]->dvips]->PSviewer * M-return: same with pdf output and with the sequence [pdflatex->[asy->pdflatex]]->PDFviewer * C-M-return: same with pdf output and with the sequence [latex->[asy->latex]->dvips->ps2pdf]->PSviewer * Add the Shift key to the sequence of keys to compile even if the file is not modified. II. To add a menu bar in current 'latex-mode' buffer and activate hot keys, use 'M-x asy-insinuate-latex '. You can automate this feature for all the 'latex-mode' buffers by inserting the five following lines in your .emacs initialization file: (eval-after-load \"latex\" '(progn ;; Add here your personal features for 'latex-mode': (asy-insinuate-latex t) ;; Asymptote globally insinuates Latex. )) You can access this help within Emacs by the key binding C-h f asy-mode BUGS: This package has been tested in: * Linux Debian Etch - GNU Emacs 22.0.50.1 - GNU Emacs 21.4.1 (only basic errors management and basic font-lock features within lasy-mode are supported) * WindowsXP - GNU Emacs 22.0.990.1 (i386-mingw-nt5.1.2600) This package seems to work with XEmacs 21.4 but not all the features are available (in particular syntax highlighting). Report bugs to http://asymptote.sourceforge.net Some variables can be customized: M-x customize-group asymptote ." (setq c++-font-lock-extra-types (cons "true" c++-font-lock-extra-types))) (require 'font-lock) (require 'cc-mode) (require 'cl) ;; Common Lisp extensions for Emacs (require 'compile) (require 'wid-edit) ;;;###autoload (add-to-list 'auto-mode-alist '("\\.asy$" . asy-mode)) (defvar running-xemacs-p (featurep 'xemacs)) (defvar running-unix-p (not (string-match "windows-nt\\|ms-dos" (symbol-name system-type)))) (when running-xemacs-p (defalias 'turn-on-font-lock-if-enabled 'ignore) (defalias 'line-number-at-pos 'line-number) (defvar temporary-file-directory (temp-directory)) (defun replace-regexp-in-string (regexp rep string) (replace-in-string string regexp rep)) ) (when (or (< emacs-major-version 22) running-xemacs-p) ;; Add regexp for parsing the compilation errors of asy (add-to-list 'compilation-error-regexp-alist '("\\(.*?.asy\\): \\(.*?\\)\\.\\(.*?\\):" 1 2 3))) (when (< emacs-major-version 22) (defun line-number-at-pos (&optional pos) "Return (narrowed) buffer line number at position POS. If POS is nil, use current buffer location. Counting starts at (point-min), so the value refers to the contents of the accessible portion of the buffer." (let ((opoint (or pos (point))) start) (save-excursion (goto-char (point-min)) (setq start (point)) (goto-char opoint) (forward-line 0) (1+ (count-lines start (point))))))) (defcustom lasy-extra-key t "* If on, the folowing binding keys are added in lasy-mode : (define-key lasy-mode-map (kbd \"\") 'lasy-view-ps) (define-key lasy-mode-map (kbd \"\") 'asy-master-tex-view-ps-f) (define-key lasy-mode-map (kbd \"\") 'lasy-view-pdf-via-pdflatex) (define-key lasy-mode-map (kbd \"\") 'asy-master-tex-view-pdflatex-f) (define-key lasy-mode-map (kbd \"\") 'lasy-view-pdf-via-ps2pdf) (define-key lasy-mode-map (kbd \"\") 'asy-master-tex-view-ps2pdf-f) If you also want this feature in pure latex-mode, you can set this variable to `nil' and add these lines in your .emacs: (require 'asy-mode) (eval-after-load \"latex\" '(progn (define-key LaTeX-mode-map (kbd \"\") 'lasy-view-ps) (define-key LaTeX-mode-map (kbd \"\") 'asy-master-tex-view-ps-f) (define-key LaTeX-mode-map (kbd \"\") 'lasy-view-pdf-via-pdflatex) (define-key LaTeX-mode-map (kbd \"\") 'asy-master-tex-view-pdflatex-f) (define-key LaTeX-mode-map (kbd \"\") 'lasy-view-pdf-via-ps2pdf) (define-key LaTeX-mode-map (kbd \"\") 'asy-master-tex-view-ps2pdf-f)))" :type 'boolean :group 'asymptote) (defcustom asy-compilation-buffer 'none " 'visible means keep compilation buffer visible ; 'available means keep compilation buffer available in other buffer but not visible; 'none means delete compilation buffer automatically after a *successful* compilation. 'never means don't open any window or buffer attached to the compilation process. If the value is 'never': * Emacs is suspended until the child program returns; * the management of errors is poorer than with other value; * the compilation doesn't modify your current window configuration." :type '(choice (const visible) (const available) (const none) (const never)) :group 'asymptote) (defcustom lasy-ask-about-temp-compilation-buffer t "* If t, ask before visiting a temporary buffer of compilation." :type 'boolean :group 'asymptote) (defcustom lasy-compilation-inline-auto-detection nil "* If t, lasy-mode detects automatically if the option 'inline' is passed to asymptote.sty. In case of 'inline' option, the compilation of a figure separately of the document is processed by rebuilding the preamble and compiling it as a file '.tex' containing only this picture. If nil (the default), the compilation of a figure separately of the document is processed by building a file '.asy', without the features of the LaTeX preamble." :type 'boolean :group 'asymptote) (defcustom asy-command-location "" "* If not in the path, you can put here the name of the directory containing Asy's binary files. this variable must end in /." :type 'directory :group 'asymptote) (defcustom asy-command "asy -V" "* Command invoked to compile a Asymptote file. You can define the location of this command with the variable `asy-command-location'." :type 'string :group 'asymptote) (defcustom lasy-command "asy" "* Command invoked to compile a Asymptote file generated compiling a .tex file. You can define the location of this command with the variable `asy-command-location'." :type 'string :group 'asymptote) (defcustom lasy-latex-command "latex -halt-on-error" "* Command invoked to compile a .tex file with LaTeX." :type 'string :group 'asymptote) (defcustom lasy-pdflatex-command "pdflatex -halt-on-error" "* Command invoked to compile a .tex file with pdflaTex." :type 'string :group 'asymptote) (defcustom lasy-dvips-pre-pdf-command "dvips -Ppdf" "* Command invoked to convert a .dvi file to a temporary .ps file in order to generate a final .pdf file." :type 'string :group 'asymptote) (defcustom lasy-dvips-command "dvips -q" "* Command invoked to convert a .dvi file to a final .ps file." :type 'string :group 'asymptote) (defcustom lasy-ps2pdf-command "ps2pdf14" "* Command invoked to convert a .dvi file to .ps file." :type 'string :group 'asymptote) (defcustom asy-temp-dir temporary-file-directory "*The name of a directory for Asy's temporary files. Such files are generated by functions like `asy-compile' when lasy-mode is enable." :type 'directory :group 'asymptote) (defcustom ps-view-command (if running-unix-p "gv" "") "Command to view a PostScript file generated by compiling a tex file within lasy-mode. This variable is not used when running the Windows OS. See `asy-open-file'." :type 'string :group 'asymptote) (defcustom pdf-view-command (if running-unix-p "xpdf" "") "Command to view a pdf file generated by compiling a tex file within lasy-mode. This variable is not used when running the Windows OS. See `asy-open-file'." :type 'string :group 'asymptote) (defvar asy-TeX-master-file nil "TeX file associate with current asymptote code. This variable must be modified only using the function 'asy-set-master-tex by M-x asy-set-master-tex .") (make-variable-buffer-local 'asy-TeX-master-file) (defvar lasy-compile-tex nil "* Internal use. t if LaTeX compilation come from latex-mode.") (when (fboundp 'font-lock-add-keywords) (if (< max-specpdl-size 2000) (setq max-specpdl-size 2000)) (defun asy-add-function-keywords (function-keywords face-name) (let* ((keyword-list (mapcar #'(lambda (x) (symbol-name x)) function-keywords)) (keyword-regexp (concat "\\<\\(" (regexp-opt keyword-list) "\\)("))) (font-lock-add-keywords 'asy-mode `((,keyword-regexp 1 ',face-name))))) (defun asy-add-variable-keywords (function-keywords face-name) (let* ((keyword-list (mapcar #'(lambda (x) (symbol-name x)) function-keywords)) (keyword-regexp (concat "\\<[0-9]*\\(" (regexp-opt keyword-list) "\\)\\(?:[^(a-zA-Z]\\|\\'\\)"))) (font-lock-add-keywords 'asy-mode `((,keyword-regexp 1 ',face-name))))) ;; External definitions of keywords: ;; asy-function-name and asy-variable-name (if (locate-library "asy-keywords.el") (load "asy-keywords.el") (progn ;; Use dummy keyword definitions if asy-keywords.el is not found: (defvar asy-keyword-name nil) (defvar asy-type-name nil) (defvar asy-function-name nil) (defvar asy-variable-name nil))) (defcustom asy-extra-type-name '() "Extra user type names highlighted with 'font-lock-type-face" :type '(repeat symbol) :group 'asymptote) (defcustom asy-extra-function-name '() "Extra user function names highlighted with 'font-lock-function-name-face" :type '(repeat symbol) :group 'asymptote) (defcustom asy-extra-variable-name '() "Extra user variable names highlighted with 'font-lock-constant-face" :type '(repeat symbol) :group 'asymptote) (asy-add-variable-keywords asy-keyword-name 'font-lock-builtin-face) (asy-add-variable-keywords (nconc asy-type-name asy-extra-type-name) 'font-lock-type-face) (asy-add-function-keywords (nconc asy-function-name asy-extra-function-name) 'font-lock-function-name-face) (asy-add-variable-keywords (nconc asy-variable-name asy-extra-variable-name) 'font-lock-constant-face) (defface asy-environment-face `((t (:underline t :inverse-video t))) "Face used to highlighting the keywords '\\begin{asy}' and '\\end{asy}' within lasy-mode." :group 'asymptote) (font-lock-add-keywords 'asy-mode '(("\\\\begin{asy}.*" . 'asy-environment-face) ("\\\\end{asy}" . 'asy-environment-face))) (defface asy-link-face ;; widget-field-face `((t (:underline t))) "Face used to highlighting the links." :group 'asymptote) (font-lock-add-keywords 'asy-mode '(("\\[.*?\\.asy\\]" . 'asy-link-face))) ) (setq buffers-menu-max-size nil) (setq mode-name "Asymptote") (if running-xemacs-p (defvar asy-menu '("Asy" ["Toggle lasy-mode" lasy-mode :active (and (featurep 'two-mode-mode) two-mode-bool)] ["Compile/View" asy-compile t] ["Go to error" asy-goto-error t] ["Describe command" asy-show-function-at-point t]"--" ("Master TeX file" ["Set/Change value" (asy-set-master-tex) :active (not (and (boundp two-mode-bool) two-mode-bool))] ["Erase value" (asy-unset-master-tex) :active (not (and (boundp two-mode-bool) two-mode-bool))] ("Compile OR View" ["PS" asy-master-tex-view-ps :active t] ["PDF (pdflatex)" asy-master-tex-view-pdflatex :active t] ["PDF (ps2pdf)" asy-master-tex-view-ps2pdf :active t]) ("Compile AND View" ["PS" asy-master-tex-view-ps-f :active t] ["PDF (pdflatex)" asy-master-tex-view-pdflatex-f :active t] ["PDF (ps2pdf)" asy-master-tex-view-ps2pdf-f :active t])) ["Asymptote insinuates globally LaTeX" asy-insinuate-latex-globally :active (not asy-insinuate-latex-globally-p)]"--" ("Debugger Buffer" ["Visible" (setq asy-compilation-buffer 'visible) :style radio :selected (eq asy-compilation-buffer 'visible) :active t] ["Available" (setq asy-compilation-buffer 'available) :style radio :selected (eq asy-compilation-buffer 'available) :active t] ["None" (setq asy-compilation-buffer 'none) :style radio :selected (eq asy-compilation-buffer 'none) :active t] ["Never" (setq asy-compilation-buffer 'never) :style radio :selected (eq asy-compilation-buffer 'never) :active t]) ("Compilation Options" :included (and (featurep 'two-mode-mode) two-mode-bool) ["Enable Automatic Detection of Option" (setq lasy-compilation-inline-auto-detection t) :style radio :selected lasy-compilation-inline-auto-detection :active t] ["Disable Automatic Detection of Option" (setq lasy-compilation-inline-auto-detection nil) :style radio :selected (not lasy-compilation-inline-auto-detection) :active t]) ["Customize" (customize-group "asymptote") :active t] ["Help" (describe-function 'asy-mode) :active t] )) (defvar asy-menu '("Asy" ["Toggle Lasy-Mode" lasy-mode :visible (and (featurep 'two-mode-mode) two-mode-bool)] ["Compile/View" asy-compile t] ["Go to Error" asy-goto-error t] ["Describe Command" asy-show-function-at-point t]"--" ("Master TeX File" ["Set/Change Value" (asy-set-master-tex) :active (not (and (boundp two-mode-bool) two-mode-bool)) :key-sequence nil] ["Erase Value" (asy-unset-master-tex) :active (not (and (boundp two-mode-bool) two-mode-bool)) :key-sequence nil] ("Compile or View" ["PS" asy-master-tex-view-ps :active t] ["PDF (pdflatex)" asy-master-tex-view-pdflatex :active t] ["PDF (ps2pdf)" asy-master-tex-view-ps2pdf :active t]) ("Compile and View" ["PS" asy-master-tex-view-ps-f :active t] ["PDF (pdflatex)" asy-master-tex-view-pdflatex-f :active t] ["PDF (ps2pdf)" asy-master-tex-view-ps2pdf-f :active t])) ["Asymptote Insinuates Globally LaTeX" asy-insinuate-latex-globally :active (not asy-insinuate-latex-globally-p)]"--" ("Debugger Buffer" ["Visible" (setq asy-compilation-buffer 'visible) :style radio :selected (eq asy-compilation-buffer 'visible) :active t :key-sequence nil] ["Available" (setq asy-compilation-buffer 'available) :style radio :selected (eq asy-compilation-buffer 'available) :active t :key-sequence nil] ["None" (setq asy-compilation-buffer 'none) :style radio :selected (eq asy-compilation-buffer 'none) :active t :key-sequence nil] ["Never" (setq asy-compilation-buffer 'never) :style radio :selected (eq asy-compilation-buffer 'never) :active t :key-sequence nil]) ("Compilation Options" :visible (and (featurep 'two-mode-mode) two-mode-bool) ["Enable Automatic Detection of Option" (setq lasy-compilation-inline-auto-detection t) :style radio :selected lasy-compilation-inline-auto-detection :active t :key-sequence nil] ["Disable Automatic Detection of Option" (setq lasy-compilation-inline-auto-detection nil) :style radio :selected (not lasy-compilation-inline-auto-detection) :active t :key-sequence nil]) ["Customize" (customize-group "asymptote") :active t :key-sequence nil] ["Help" (describe-function 'asy-mode) :active t :key-sequence nil] ))) (easy-menu-define asy-mode-menu asy-mode-map "Asymptote Mode Commands" asy-menu) ;; On the hook for XEmacs only. (if running-xemacs-p (add-hook 'asy-mode-hook (lambda () (and (eq major-mode 'asy-mode) (easy-menu-add asy-mode-menu asy-mode-map))))) (defun asy-protect-file-name(Filename) (concat "\"" Filename "\"")) (defun asy-get-temp-file-name(&optional noext) "Get a temp file name for printing." (if running-xemacs-p (concat (make-temp-name asy-temp-dir) (if noext "" ".asy")) (concat (make-temp-file (expand-file-name "asy" asy-temp-dir)) (if noext "" ".asy")))) (defun asy-log-filename() (concat buffer-file-name ".log")) (defun asy-compile() "Compile Asymptote code." (interactive) (if (and (boundp two-mode-bool) two-mode-bool) (lasy-compile) ;; compile asy code in a TeX file. (progn ;; compile asy code in a asy file. (let* ((buffer-base-name (file-name-sans-extension (file-name-nondirectory buffer-file-name))) (asy-compile-command (concat asy-command-location asy-command (if (eq asy-compilation-buffer 'never) " " " -wait ") (asy-protect-file-name buffer-base-name)))) (if (buffer-modified-p) (save-buffer)) (message "%s" asy-compile-command) (asy-internal-compile asy-compile-command t t))))) (defun asy-error-message(&optional P) (let ((asy-last-error (asy-log-field-string (asy-log-filename) 0))) (if (and asy-last-error (not (string= asy-last-error ""))) (message (concat asy-last-error (if P "\nPress F4 to go to error" ""))) (when (and (boundp two-mode-bool) two-mode-bool lasy-run-tex (not (zerop asy-last-compilation-code))) (message "The LaTeX code may be incorrect."))))) (defun asy-log-field-string(Filename Field) "Return field of first line of file filename. Fields are defined as 'field1: field2.field3:field4' . Field=0 <-> all fields" (let ((view-inhibit-help-message t)) (with-temp-buffer (progn (insert-file Filename) (beginning-of-buffer) (if (re-search-forward "^\\(.*?\\): \\(.*?\\)\\.\\(.*?\\):\\(.*\\)$" (point-max) t) (match-string Field) nil))))) (defun asy-next-error(arg reset) (if (> emacs-major-version 21) (next-error arg reset) (next-error arg))) (defun lasy-ask-visit-tem-compilation-buffer() "* Ask before visiting a temporary compilation buffer depending the value of `lasy-ask-about-temp-compilation-buffer'." (if lasy-ask-about-temp-compilation-buffer (y-or-n-p "Visit temporary buffer of compilation ? ") t)) (defun lasy-place-cursor-to-error(Filename li co) (save-excursion (with-temp-buffer (insert-file-contents (if running-unix-p Filename (replace-regexp-in-string "//" ":/" (replace-regexp-in-string "/cygdrive/" "" Filename)))) ;; Not right, ;;;maybe take a look at the code of compilation-find-file (beginning-of-buffer) (next-line (1- (string-to-number li))) (setq line-err (buffer-substring-no-properties (progn (beginning-of-line) (point)) (progn (end-of-line) (point)))))) (beginning-of-buffer) (search-forward line-err) (beginning-of-line) (forward-char (1- (string-to-number co)))) (defun asy-goto-error(&optional arg reset) "Go to point of last error within asy/lasy-mode." (interactive "P") (if (or (eq asy-compilation-buffer 'never) (and (boundp two-mode-bool) two-mode-bool)) (let* ((log-file (asy-log-filename)) (li_ (asy-log-field-string log-file 2)) (co_ (asy-log-field-string log-file 3))) (if (and (boundp two-mode-bool) two-mode-bool) ;; Within Lasy-mode (progn ;; lasy-mode need the compilation of file.tex ;; the error can be in Tex commands or in Asymptote commands (if (eq asy-compilation-buffer 'never) ;; Find error in the log file. (if li_ ;; Asy error found in the log-file (progn (lasy-place-cursor-to-error (asy-log-field-string log-file 1) li_ co_) (asy-error-message)) (message "There is an error in your LaTeX code...")) (if (or running-xemacs-p (< emacs-major-version 22)) (when (lasy-ask-visit-tem-compilation-buffer) (next-error arg)) (let ((msg)) ;; Find error in the compilation buffer (save-excursion (set-buffer (next-error-find-buffer)) (when reset (setq compilation-current-error nil)) (let* ((columns compilation-error-screen-columns) (last 1) (loc (compilation-next-error (or arg 1) nil (or compilation-current-error compilation-messages-start (point-min)))) (end-loc (nth 2 loc)) (marker (point-marker))) (setq compilation-current-error (point-marker) overlay-arrow-position (if (bolp) compilation-current-error (copy-marker (line-beginning-position))) loc (car loc))) (if (re-search-forward "^\\(.*?\\): \\(.*?\\)\\.\\(.*?\\):\\(.*\\)$" (point-max) t) (progn (setq msg (match-string 0) log-file (match-string 1) li_ (match-string 2) co_ (match-string 3))) (error "Not other errors."))) (lasy-place-cursor-to-error log-file li_ co_) (message msg))))) (if li_ ;;Pure asy-mode and compilation with shell-command (progn (goto-line (string-to-number li_)) (forward-char (1- (string-to-number co_))) (asy-error-message)) (progn (message "No error."))))) (asy-next-error arg reset))) (defun asy-grep (Regexp) "Internal function used by asymptote." (let ((Strout "") (case-fold-search-asy case-fold-search)) (progn (beginning-of-buffer) (setq case-fold-search nil) (while (re-search-forward Regexp (point-max) t) (setq Strout (concat Strout (match-string 0) "\n\n"))) (setq case-fold-search case-fold-search-asy) (if (string= Strout "") "No match.\n" Strout)))) (defun asy-widget-open-file-at-pos (widget &optional event) "" (kill-buffer (current-buffer)) (find-file (widget-get widget :follow-link)) (goto-line (string-to-number (widget-get widget :value)))) (defun asy-show-function-at-point() "Show the Asymptote definitions of the command at point." (interactive) (save-excursion (let ((cWord (current-word)) (cWindow (selected-window))) (switch-to-buffer-other-window "*asy-help*") (fundamental-mode) (setq default-directory "/") (if (> emacs-major-version 21) (call-process-shell-command (concat asy-command-location "asy -l --where") nil t nil) (insert (shell-command-to-string "asy -l --where"))) (let ((rHelp (asy-grep (concat "^.*\\b" cWord "(\\(.\\)*?$"))) (tag)(file)(line)) (erase-buffer) (insert rHelp) (beginning-of-buffer) (while (re-search-forward "\\(.*\\): \\([0-9]*\\)\\.\\([0-9]*\\)" (point-max) t) (setq file (match-string 1) line (match-string 2) tag (file-name-nondirectory file)) (widget-create `(file-link :tag ,tag :follow-link ,file :value ,line :action asy-widget-open-file-at-pos )))) (beginning-of-buffer) (while (re-search-forward "\\(.*: [0-9]*\\.[0-9]*\\)" (point-max) t) (replace-match "")) (asy-mode) (use-local-map widget-keymap) (widget-setup) (goto-char (point-min)) (select-window cWindow)))) (add-hook 'asy-mode-hook (lambda () (c-set-style "gnu"); (c-set-offset (quote topmost-intro-cont) 0 nil) (make-local-variable 'c-label-minimum-indentation) (setq c-label-minimum-indentation 0) (when (fboundp 'flyspell-mode) (flyspell-mode -1)) (turn-on-font-lock) (column-number-mode t) )) ;;;###autoload (defun lasy-mode ()) ;;; ************************************ ;;; asy-mode mixed with LaTeX-mode: lasy ;;; ************************************ (if (locate-library "two-mode-mode") (progn (defvar lasy-fontify-asy-p nil "Variable to communicate with `font-lock-unfontify-region'. Internal use, don't set in any fashion.") (setq lasy-fontify-asy-p nil) (eval-after-load "two-mode-mode" '(progn ;; Redefine `two-mode-mode-update-mode' to use regexp. (defun two-mode-mode-update-mode () "Redefined in `asy-mode.el' to use regexp" (when (and two-mode-bool two-mode-update) (setq two-mode-update 0) (let ((mode-list second-modes) (flag 0)) (while mode-list (let ((mode (car mode-list)) (lm -1) (rm -1)) (save-excursion (if (search-backward-regexp (cadr mode) nil t) (setq lm (point)) (setq lm -1))) (save-excursion (if (search-backward-regexp (car (cddr mode)) nil t) (setq rm (point)) (setq rm -1))) (if (and (not (and (= lm -1) (= rm -1))) (>= lm rm)) (progn (setq flag 1) (setq mode-list '()) (two-mode-change-mode (car mode) (car (cdr (cddr mode))))))) (setq mode-list (cdr mode-list))) (if (= flag 0) (two-mode-change-mode (car default-mode) (cadr default-mode)))))) (defun two-mode-change-mode (to-mode func) "Redefined in asy-mode. Change the variable `lasy-fontify-asy-p' according to the value of func and the current mode." (if (string= to-mode mode-name) t (progn (setq lasy-fontify-asy-p (eq func 'asy-mode)) (funcall func) (hack-local-variables) (two-mode-mode-setup) (if two-mode-switch-hook (run-hooks 'two-mode-switch-hook)) (if (eq font-lock-mode t) (font-lock-fontify-buffer)) (turn-on-font-lock-if-enabled)))) )) (require 'two-mode-mode) (defun lasy-mode () "Treat, in some cases, the current buffer as a literal Asymptote program." (interactive) (save-excursion (let ((prefix (progn (goto-char (point-max)) (re-search-backward "^\\([^\n]+\\)Local Variables:" (- (point-max) 3000) t) (match-string 1))) (pos-b (point))) (when (and prefix (progn (re-search-forward (regexp-quote (concat prefix "End:")) (point-max) t) (re-search-backward (concat "\\(" prefix "mode: .*\\)") pos-b t)) ) (error (concat "lasy-mode can not work if a mode is specified as local file variable. You should remove the line " (int-to-string (line-number-at-pos))))))) (set (make-local-variable 'asy-insinuate-latex-p) asy-insinuate-latex-p) (make-local-variable 'lasy-fontify-asy-p) (when (< emacs-major-version 22) (make-local-variable 'font-lock-keywords-only)) (setq default-mode '("LaTeX" latex-mode) second-modes '(("Asymptote" "^\\\\begin{asy}.*$" "^\\\\end{asy}" asy-mode))) (if two-mode-bool (progn (latex-mode) (asy-insinuate-latex)) (progn (two-mode-mode) ))) (when (not running-xemacs-p) (defadvice TeX-command-master (around asy-choose-compile act) "Hack to circumvent the preempt of 'C-c C-c' by AucTeX within `lasy-mode'." (if (string-match "asymptote" (downcase mode-name)) (asy-compile) ad-do-it))) (add-hook 'two-mode-switch-hook (lambda () (if (eq major-mode 'latex-mode) (progn ;; Switch to latex-mode ;; Disable LaTeX-math-Mode within lasy-mode (because of incompatibility) (when LaTeX-math-mode (LaTeX-math-mode -1)) (asy-insinuate-latex) (when (< emacs-major-version 22) (setq font-lock-keywords-only nil))) (progn ;; Switch to asy-mode (when (< emacs-major-version 22) (setq font-lock-keywords-only t)) )))) ;; (setq two-mode-switch-hook nil) ;; Solve a problem restoring a TeX file via desktop.el previously in lasy-mode. (if (boundp 'desktop-buffer-mode-handlers) (progn (defun asy-restore-desktop-buffer (desktop-b-f-name d-b-n d-b-m) (find-file desktop-b-f-name)) (add-to-list 'desktop-buffer-mode-handlers '(asy-mode . asy-restore-desktop-buffer)))) ;; Functions and 'advises' to restrict 'font-lock-unfontify-region' ;; and 'font-lock-fontify-syntactically-region' within lasy-mode ;; Special thanks to Olivier Ramaré for his help. (when (and (fboundp 'font-lock-add-keywords) (> emacs-major-version 21)) (defun lasy-mode-at-pos (pos &optional interior strictly) "If point at POS is in an asy environment return the list (start end)." (save-excursion (save-match-data (goto-char pos) (let* ((basy (progn (unless strictly (end-of-line)) (when (re-search-backward "^\\\\begin{asy}" (point-min) t) (when interior (next-line)) (point)))) (easy (and basy (progn (when (re-search-forward "^\\\\end{asy}" (point-max) t) (when interior (previous-line)(beginning-of-line)) (point)))))) (and basy easy (> pos (- basy (if interior 12 0))) (< pos (+ easy (if interior 10 0))) (list basy easy)))))) (defun lasy-region (start end &optional interior) "If the region 'start to end' contains the beginning or the end of an asy environment return the list of points where the asy environment starts and ends." (let* ((beg (min start end)) (lim (max start end))) (or (lasy-mode-at-pos beg interior) (save-match-data (save-excursion (goto-char beg) (and (re-search-forward "^\\\\begin{asy}" lim t) (lasy-mode-at-pos (point) interior))))))) (defun lasy-tags (start end) "Return associated list of points where the tags starts and ends restricted to the region (start end). \"b\" associated with (start-beginTag end-beginTag), \"e\" associated with (start-endTag end-endTag)." (let* ((beg (min start end)) (lim (max start end)) out) (save-excursion (goto-char beg)(beginning-of-line) (while (when (re-search-forward "^\\\\begin{asy}.*" lim t) (push (list (progn (beginning-of-line)(point)) (progn (end-of-line)(point))) out))) (goto-char beg)(beginning-of-line) (while (when (re-search-forward "^\\\\end{asy}" lim t) (push (list (progn (beginning-of-line)(point)) (progn (end-of-line)(point))) out))) out))) (defun lasy-restrict-region (start end &optional interior) "If the region 'start to end' contains the beginning or the end of an asy environment, returns the list of points wich restricts the region to the asy environment. Else, return (start end)." (let* ((beg (min start end)) (lim (max start end)) (be (if (lasy-mode-at-pos beg) beg (or (save-excursion (goto-char beg) (when (re-search-forward "^\\\\begin{asy}.*" lim t) (unless interior (beginning-of-line)) (point))) beg))) (en (or (save-excursion (goto-char be) (when (re-search-forward "^\\\\end{asy}" lim t) (when interior (beginning-of-line)) (point))) lim))) (list be en))) (defun lasy-parse-region (start end) "Return a list ((a (start1 end1)) (b (start2 end2)) [...]). where a, b, ... are nil or t; t means the region from 'startX' through 'endX' (are points) is in a asy environnement." (let (regasy out rr brr err tags) (save-excursion (goto-char start) (while (< (point) end) (setq regasy (lasy-region (point) end)) (if regasy (progn (setq rr (lasy-mode-at-pos (point))) (setq brr (and rr (nth 0 rr)) err (and rr (nth 1 rr))) (if rr (progn (push (list t (list (max 1 (1- (point))) (min end err))) out) (goto-char (min end err))) (progn (push (list nil (list (point) (nth 0 regasy))) out) (goto-char (1+ (nth 0 regasy)))))) (progn (push (list nil (list (min (1+ (point)) end) end)) out) (goto-char end))) )) ;; Put start and end of tag in latex fontification. (setq tags (lasy-tags start end)) (dolist (tag tags) (push (list nil tag) out)) (reverse out))) (defadvice font-lock-unfontify-region (around asy-font-lock-unfontify-region (beg end)) (if two-mode-bool (let ((rstate (lasy-parse-region beg end)) curr reg asy-fontify latex-fontify) (while (setq curr (pop rstate)) (setq reg (nth 1 curr)) (setq asy-fontify (and (nth 0 curr) lasy-fontify-asy-p) latex-fontify (and (not (nth 0 curr)) (not lasy-fontify-asy-p))) (when (or asy-fontify latex-fontify) (setq beg (nth 0 reg) end (nth 1 reg)) (save-excursion (save-restriction (narrow-to-region beg end) ad-do-it (widen)))))) ad-do-it)) (ad-activate 'font-lock-unfontify-region) ;; (ad-deactivate 'font-lock-unfontify-region) (defadvice font-lock-fontify-syntactically-region (around asy-font-lock-fontify-syntactically-region (start end &optional loudly)) (if (and two-mode-bool (eq major-mode 'asy-mode)) (let*((reg (lasy-restrict-region start end))) (save-restriction (setq start (nth 0 reg) end (nth 1 reg)) (narrow-to-region start end) (condition-case nil ad-do-it (error nil)) (widen) )) ad-do-it)) (ad-activate 'font-lock-fontify-syntactically-region) ;; (ad-deactivate 'font-lock-fontify-syntactically-region) (defadvice font-lock-default-fontify-region (around asy-font-lock-default-fontify-region (beg end loudly)) (if two-mode-bool (let ((rstate (lasy-parse-region beg end)) asy-fontify latex-fontify curr reg) (while (setq curr (pop rstate)) (setq reg (nth 1 curr)) (setq asy-fontify (and (nth 0 curr) lasy-fontify-asy-p) latex-fontify (and (not (nth 0 curr)) (not lasy-fontify-asy-p))) (when (or asy-fontify latex-fontify) (setq beg (nth 0 reg) end (nth 1 reg)) (save-excursion (save-restriction (narrow-to-region beg end) (condition-case nil ad-do-it (error nil)) (widen) ))))) ad-do-it)) (ad-activate 'font-lock-default-fontify-region) ;; (ad-deactivate 'font-lock-default-fontify-region) )) (progn (defvar two-mode-bool nil) (defun lasy-mode () (message "You must install the package two-mode-mode.el.")))) (setq asy-latex-menu-item '(["Toggle lasy-mode" lasy-mode :active (featurep 'two-mode-mode)] ["View asy picture near cursor" lasy-compile :active t]"--" ("Compile OR View" ["PS" lasy-view-ps :active t] ["PDF (pdflatex)" lasy-view-pdf-via-pdflatex :active t] ["PDF (ps2pdf)" lasy-view-pdf-via-ps2pdf :active t]) ("Compile AND View" ["PS" asy-master-tex-view-ps-f :active t] ["PDF (pdflatex)" asy-master-tex-view-pdflatex-f :active t] ["PDF (ps2pdf)" asy-master-tex-view-ps2pdf-f :active t])"--" ["Asymptote insinuates globally LaTeX" asy-insinuate-latex-globally :active (not asy-insinuate-latex-globally-p)] ("Disable Asymptote insinuate Latex" ["locally" asy-no-insinuate-locally :active t] ["globally" asy-no-insinuate-globally :active t]) ("Debugger Buffer" ["Visible" (setq asy-compilation-buffer 'visible) :style radio :selected (eq asy-compilation-buffer 'visible) :active t] ["Available" (setq asy-compilation-buffer 'available) :style radio :selected (eq asy-compilation-buffer 'available) :active t] ["None" (setq asy-compilation-buffer 'none) :style radio :selected (eq asy-compilation-buffer 'none) :active t] ["Never" (setq asy-compilation-buffer 'never) :style radio :selected (eq asy-compilation-buffer 'never) :active t]) )) (if running-xemacs-p (setq asy-latex-menu-item (nconc '("Asymptote") asy-latex-menu-item)) (setq asy-latex-menu-item (nconc '("Asymptote" :visible asy-insinuate-latex-p) asy-latex-menu-item))) (defun asy-insinuate-latex-maybe () "This function is added to `LaTeX-mode-hook' to define the environment 'asy' and, eventually, set its indentation. For internal use only." (when (or asy-insinuate-latex-globally-p (save-excursion (beginning-of-buffer) (save-match-data (search-forward "\\begin{asy}" nil t)))) (asy-insinuate-latex)) (LaTeX-add-environments '("asy" (lambda (env &rest ignore) (unless asy-insinuate-latex-p (asy-insinuate-latex)) (LaTeX-insert-environment env))))) ;; (add-hook 'after-init-hook ;; (lambda () (eval-after-load "latex" '(progn (add-hook 'LaTeX-mode-hook 'asy-insinuate-latex-maybe) (setq lasy-mode-map (copy-keymap LaTeX-mode-map)) (setq LaTeX-mode-map-backup (copy-keymap LaTeX-mode-map)) (defadvice TeX-add-local-master (after asy-adjust-local-variable ()) "Delete the line that defines the mode in a file .tex because two-mode-mode reread the local variables after switching mode." (when (string= (file-name-extension buffer-file-name) "tex") (save-excursion (goto-char (point-max)) (delete-matching-lines "mode: latex" (re-search-backward "^\\([^\n]+\\)Local Variables:" (- (point-max) 3000) t) (re-search-forward (regexp-quote (concat (match-string 1) "End:"))) nil)))) (ad-activate 'TeX-add-local-master) ;; (ad-deactivate 'TeX-add-local-master) (when lasy-extra-key (define-key lasy-mode-map (kbd "") (lambda () (interactive) (lasy-view-ps nil nil t))) (define-key lasy-mode-map (kbd "") (lambda () (interactive) (lasy-view-ps t nil t))) (define-key lasy-mode-map (kbd "") (lambda () (interactive) (lasy-view-pdf-via-pdflatex nil nil t))) (define-key lasy-mode-map (kbd "") (lambda () (interactive) (lasy-view-pdf-via-pdflatex t nil t))) (define-key lasy-mode-map (kbd "") (lambda () (interactive) (lasy-view-pdf-via-ps2pdf nil nil t))) (define-key lasy-mode-map (kbd "") (lambda () (interactive) (lasy-view-pdf-via-ps2pdf t nil t))) (define-key lasy-mode-map (kbd "") 'asy-goto-error)) (easy-menu-define asy-latex-mode-menu lasy-mode-map "Asymptote insinuates LaTeX" asy-latex-menu-item) )) ;; )) (defvar asy-insinuate-latex-p nil "Not nil when current buffer is insinuated by Asymptote. May be a local variable. For internal use.") (defvar asy-insinuate-latex-globally-p nil "Not nil when all latex-mode buffers is insinuated by Asymptote. For internal use.") (defun asy-set-latex-asy-indentation () "Set the indentation of environnment 'asy' like the environnment 'verbatim' is." ;; Regexp matching environments with indentation at col 0 for begin/end. (set (make-local-variable 'LaTeX-verbatim-regexp) (concat (default-value 'LaTeX-verbatim-regexp) "\\|asy")) ;; Alist of environments with special indentation. (make-local-variable 'LaTeX-indent-environment-list) (add-to-list 'LaTeX-indent-environment-list '("asy" current-indentation))) (defun asy-unset-latex-asy-indentation () "Unset the indentation of environnment 'asy' like the environnment 'verbatim' is." (set (make-local-variable 'LaTeX-verbatim-regexp) (default-value 'LaTeX-verbatim-regexp)) (set (make-local-variable 'LaTeX-indent-environment-list) (default-value 'LaTeX-indent-environment-list))) (defun asy-no-insinuate-locally () (interactive) (set (make-local-variable 'asy-insinuate-latex-p) nil) (setq asy-insinuate-latex-globally-p nil) (asy-unset-latex-asy-indentation) (if running-xemacs-p (easy-menu-remove-item nil nil "Asymptote") (menu-bar-update-buffers)) (if (and (boundp 'two-mode-bool) two-mode-bool) (lasy-mode)) (use-local-map LaTeX-mode-map-backup)) (defun asy-no-insinuate-globally () (interactive) (if running-xemacs-p (easy-menu-remove-item nil nil "Asymptote") (easy-menu-remove-item LaTeX-mode-map nil "Asymptote")) (kill-local-variable asy-insinuate-latex-p) (setq-default asy-insinuate-latex-p nil) (setq asy-insinuate-latex-globally-p nil) (if (not running-xemacs-p) (menu-bar-update-buffers)) (setq LaTeX-mode-map (copy-keymap LaTeX-mode-map-backup)) ;;Disable lasy-mode in all latex-mode buffers. (when (featurep 'two-mode-mode) (mapc (lambda (buffer) (with-current-buffer buffer (when (and (buffer-file-name) (string= (file-name-extension (buffer-file-name)) "tex")) (asy-unset-latex-asy-indentation) (latex-mode) (setq asy-insinuate-latex-p nil)))) (buffer-list)))) ;;;###autoload (defun asy-insinuate-latex (&optional global) "Add a menu bar in current 'latex-mode' buffer and activate asy keys bindings. If the optional parameter (only for internal use) 'global' is 't' then all the FUTURE 'latex-mode' buffers are insinuated. To insinuate all (current and future) 'latex-mode' buffers, use 'asy-insinuate-latex-globally' instead. You can automate this feature for all the 'latex-mode' buffers by inserting the five following lines in your .emacs initialization file: (eval-after-load \"latex\" '(progn ;; Add here your personal features for 'latex-mode': (asy-insinuate-latex t) ;; Asymptote insinuates globally Latex. ))" (interactive) (if (and (not asy-insinuate-latex-globally-p) (or global (string= major-mode "latex-mode"))) (progn (asy-set-latex-asy-indentation) (if global (progn (setq asy-insinuate-latex-p t) (setq asy-insinuate-latex-globally-p t) (setq LaTeX-mode-map (copy-keymap lasy-mode-map)) (if running-xemacs-p (add-hook 'LaTeX-mode-hook (lambda () (if asy-insinuate-latex-globally-p (easy-menu-add asy-latex-mode-menu lasy-mode-map)))))) (progn (use-local-map lasy-mode-map) (easy-menu-add asy-latex-mode-menu lasy-mode-map) (set (make-local-variable 'asy-insinuate-latex-p) t))) ))) (defun asy-insinuate-latex-globally () "Insinuates all (current and future) 'latex-mode' buffers. See `asy-insinuate-latex'." (interactive) (asy-insinuate-latex t) (if running-xemacs-p (add-hook 'LaTeX-mode-hook (lambda () (if asy-insinuate-latex-globally-p (easy-menu-add asy-latex-mode-menu lasy-mode-map))))) (mapc (lambda (buffer) (with-current-buffer buffer (when (and (buffer-file-name) (string= (file-name-extension (buffer-file-name)) "tex")) (setq asy-insinuate-latex-p t) (use-local-map LaTeX-mode-map) (use-local-map lasy-mode-map) (asy-set-latex-asy-indentation) (easy-menu-add asy-latex-mode-menu lasy-mode-map)))) (buffer-list))) (defun lasy-inline-p() "Return nil if the option 'inline' is not used or if `lasy-compilation-inline-auto-detection' value is nil." (if lasy-compilation-inline-auto-detection (save-excursion (re-search-backward "^[^%]* *\\\\usepackage\\[ *inline *\\]{ *asymptote *}" 0 t)) nil)) (defvar lasy-run-tex nil) (defun lasy-asydef() "Return the content between the tags \\begin{asydef} and \\end{asydef}." (save-excursion (if (re-search-backward "\\\\begin{asydef}" 0 t) (buffer-substring (progn (next-line)(beginning-of-line)(point)) (progn (re-search-forward "\\\\end{asydef}") (previous-line)(end-of-line) (point))) ""))) (defun lasy-compile-tex() "Compile region between \\begin{asy}[text with backslash] and \\end{asy} through a reconstructed file .tex." (interactive) (setq lasy-run-tex t) (save-excursion (let* ((Filename (asy-get-temp-file-name t)) (FilenameTex (concat Filename ".tex")) (asydef (lasy-asydef))) (save-excursion (beginning-of-buffer) (write-region (point) (progn (re-search-forward "\\\\begin{document}.*\n") (point)) FilenameTex) (write-region (concat "\\begin{asydef}\n" asydef "\n\\end{asydef}\n") 0 FilenameTex t)) (re-search-backward "\\\\begin{asy}") (write-region (point) (progn (re-search-forward "\\\\end{asy}") (point)) FilenameTex t) (with-temp-file FilenameTex (insert-file FilenameTex) (end-of-buffer) (insert "\n\\end{document}")) (let ((default-directory asy-temp-dir)) (lasy-view-ps t Filename))))) (defun lasy-compile() "Compile region between \\begin{asy} and \\end{asy}." (interactive) (if (or (lasy-inline-p) (progn ;; find \begin{asy}[any backslash] (save-excursion (re-search-forward "\\\\end{asy}" (point-max) t) (re-search-backward "\\\\begin{asy}.*\\(\\[.*\\\\.*\\]\\)" 0 t)) (match-string 1))) (progn (lasy-compile-tex)) ;; a temporary TeX file must be reconstructed. (progn (setq lasy-run-tex nil) (save-excursion (let ((Filename (asy-get-temp-file-name)) (asydef (lasy-asydef))) (write-region (match-string 0) 0 Filename) (re-search-backward "\\\\begin{asy}") (write-region (point) (progn (re-search-forward "\\\\end{asy}") (point)) Filename) (with-temp-file Filename (insert-file-contents Filename) (beginning-of-buffer) (if (re-search-forward "\\\\begin{asy}\\[\\(.*\\)\\]" (point-max) t) (let ((sz (match-string 1))) (replace-match "") (insert (concat asydef "\nsize(" sz ");"))) (when (re-search-forward "\\\\begin{asy}" (point-max) t) (replace-match "") (insert asydef))) (while (re-search-forward "\\\\end{asy}" (point-max) t) (replace-match ""))) (let* ((asy-compile-command (concat asy-command-location asy-command (if (eq asy-compilation-buffer 'never) " " " -wait ") (asy-protect-file-name Filename)))) (asy-internal-compile asy-compile-command t (not (eq asy-compilation-buffer 'never))))))))) (defun asy-set-master-tex () "Set the local variable 'asy-TeX-master-file. This variable is used by 'asy-master-tex-view-ps" (interactive) (set (make-local-variable 'asy-TeX-master-file) (file-name-sans-extension (file-relative-name (expand-file-name (read-file-name "TeX document: "))))) (if (string= (concat default-directory asy-TeX-master-file) (file-name-sans-extension buffer-file-name)) (prog1 (set (make-local-variable 'asy-TeX-master-file) nil) (error "You should never give the same name to the TeX file and the Asymptote file")) (save-excursion (end-of-buffer) (if (re-search-backward "asy-TeX-master-file\\(.\\)*$" 0 t) (replace-match (concat "asy-TeX-master-file: \"" asy-TeX-master-file "\"")) (insert (concat " /// Local Variables: /// asy-TeX-master-file: \"" asy-TeX-master-file "\" /// End:")) t)))) (defun asy-unset-master-tex () "Set the local variable 'asy-TeX-master-file to 'nil. This variable is used by 'asy-master-tex-view-ps" (interactive) (set (make-local-variable 'asy-TeX-master-file) nil) (save-excursion (end-of-buffer) (if (re-search-backward "^.*asy-TeX-master-file:.*\n" 0 t) (replace-match "")))) (defun asy-master-tex-error () "Asy-mode internal use..." (if (y-or-n-p "You try to compile the TeX document that contains this picture. You must set the local variable asy-TeX-master-file. Do you want set this variable now ?") (asy-set-master-tex) nil)) (defun asy-master-tex-view (Func-view &optional Force fromtex) "Compile the LaTeX document that contains the picture of the current Asymptote code with the function Func-view. Func-view can be one of 'lasy-view-ps, 'lasy-view-pdf-via-pdflatex, 'lasy-view-pdf-via-ps2pdf." (interactive) (if (or (and (boundp two-mode-bool) two-mode-bool) (string-match "latex" (downcase mode-name))) (progn ;; Current mode is lasy-mode or latex-mode not asy-mode (funcall Func-view Force nil fromtex)) (if asy-TeX-master-file (if (string= asy-TeX-master-file (file-name-sans-extension buffer-file-name)) (error "You should never give the same name to the TeX file and the Asymptote file") (funcall Func-view Force asy-TeX-master-file fromtex)) (if (asy-master-tex-error) (funcall Func-view Force asy-TeX-master-file fromtex))))) (defvar asy-last-compilation-code nil "Code returned by the last compilation with `compile'.") (defvar asy-compilation-auto-close nil "Variable to communicate with `asy-compilation-finish-function'. Do not set this variable in any fashion.") (defun asy-compilation-finish-function (buf msg) "Function to automatically close the compilation buffer '*asy-compilation*' when no error or warning occurs." (when (string-match "*asy-compilation*" (buffer-name buf)) (when (and asy-compilation-auto-close (eq asy-compilation-buffer 'none)) (setq asy-compilation-auto-close nil) (if (not (string-match "exited abnormally" msg)) (progn (save-excursion (set-buffer buf) (beginning-of-buffer) (if (not (search-forward-regexp "[wW]arning" nil t)) (when (not (eq asy-compilation-buffer 'visible)) ;;no errors/Warning, make the compilation window go away (run-at-time 0.5 nil (lambda (buf_) (delete-windows-on buf_) (kill-buffer buf_)) buf) (message (replace-regexp-in-string "\n" "" msg))) (message "Compilation warnings...")))))))) (if running-xemacs-p (setq compilation-finish-function 'asy-compilation-finish-function) (add-to-list 'compilation-finish-functions 'asy-compilation-finish-function)) (defun asy-compilation-wait(&optional pass auto-close) "Wait for process in *asy-compilation* exits. If pass is 't' don't wait. If auto-close is 't' close the window if the process exit with success." (setq asy-compilation-auto-close auto-close) (let* ((buff (get-buffer "*asy-compilation*")) (comp-proc (get-buffer-process buff))) (while (and comp-proc (not (eq (process-status comp-proc) 'exit)) (not pass)) (setq comp-proc (get-buffer-process buff)) (sit-for 1) (message "Waiting process...") ;; need message in Windows system ) (message "") ;; Erase previous message. (if (and (not pass) comp-proc) (setq asy-last-compilation-code (process-exit-status comp-proc)) (setq asy-last-compilation-code 0)) (when (and (eq asy-compilation-buffer 'available) (zerop asy-last-compilation-code)) (delete-windows-on buff)))) (defun asy-internal-shell (command &optional pass) "Execute 'command' in a inferior shell discarding output and redirecting stderr in the file given by the command `asy-log-filename'. `asy-internal-shell' waits for PROGRAM to terminate and returns a numeric exit status. The variable `asy-last-compilation-code' is always set to the exit status. The optional argument pass, for compatibility, is not used." (let* ((log-file (asy-log-filename)) (discard (if pass 0 nil)) (status (progn (let ((view-inhibit-help-message t))(write-region "" 0 log-file nil)) (message "%s" command) (call-process shell-file-name nil (list nil log-file) nil shell-command-switch command)))) (setq asy-last-compilation-code (if status status 0)) (if status status nil))) ;; (defun asy-internal-shell (command &optional pass) ;; "Execute 'command' in a inferior shell discarding output and ;; redirecting stderr in the file given by the command `asy-log-filename'. ;; pass non-nil means `asy-internal-shell' returns immediately with nil value. ;; Otherwise it waits for PROGRAM to terminate and returns a numeric exit status. ;; The variable `asy-last-compilation-code' is always set to the exit status or 0 if the ;; process returns immediately." ;; (let* ((log-file (asy-log-filename)) ;; (discard (if pass 0 nil)) ;; (status ;; (progn ;; (let ((inhibit-redisplay t))(write-region "" 0 log-file nil)) ;; (message "%s" command) ;; (call-process shell-file-name nil (list discard log-file) nil shell-command-switch command)))) ;; (setq asy-last-compilation-code (if status status 0)) ;; (when pass (sit-for 1)) ;; (if status status nil))) (defun asy-internal-compile (command &optional pass auto-close stderr) "Execute command. pass non-nil means don't wait the end of the process. auto-close non-nil means automatically close the compilation buffer. stderr non-nil means redirect the standard output error to the file returned by `asy-log-filename'. In this case command is running in an inferior shell without any output and the parameter auto-close is not used (see `asy-internal-shell')." (setq asy-last-compilation-code -1) (let* ((compilation-buffer-name "*asy-compilation*") (compilation-buffer-name-function (lambda (mj) compilation-buffer-name))) (if (or stderr (eq asy-compilation-buffer 'never)) (progn (asy-internal-shell command pass) (asy-error-message t)) (progn (let ((comp-proc (get-buffer-process compilation-buffer-name))) (if comp-proc (condition-case () (progn (interrupt-process comp-proc) (sit-for 1) (delete-process comp-proc) (when (and asy-compilation-auto-close (eq asy-compilation-buffer 'none) (not (eq asy-compilation-buffer 'visible))) (sit-for 0.6))) (error "")) )) (let ((view-inhibit-help-message t)) (write-region "" 0 (asy-log-filename) nil)) (compile command)) (asy-compilation-wait pass auto-close)))) (defun asy-open-file(Filename) "Open the ps or pdf file Filename. In unix-like system the variables `ps-view-command' and `pdf-view-command' are used. In Windows the associated system file type is used instead." (let ((command (if running-unix-p (let ((ext (file-name-extension Filename))) (cond ((string= ext "ps") ps-view-command) ((string= ext "pdf") pdf-view-command) (t (error "Extension Not Supported.")))) (asy-protect-file-name (file-name-nondirectory Filename)))) ) (if running-unix-p (start-process "" nil command Filename) (call-process-shell-command command nil 0)))) (defun lasy-TeX-master-file () "Return the file name of the master file for the current document. The returned string contain the directory but does not contain the extension of the file." (expand-file-name (concat (TeX-master-directory) (TeX-master-file nil t)))) (defun lasy-must-compile-p (TeX-Master-File out-file &optional Force) "" (or Force (file-newer-than-file-p (concat TeX-Master-File ".tex") out-file) (and (stringp (TeX-master-file)) ;; current buffer is not a mater tex file (file-newer-than-file-p buffer-file-name out-file)))) (defun lasy-view-ps (&optional Force Filename fromtex) "Compile a LaTeX document embedding Asymptote code with latex->asy->latex->dvips and/or view the PostScript output. If optional argument Force is t then force compilation." (interactive) (setq lasy-run-tex t) (setq lasy-compile-tex fromtex) (if (buffer-modified-p) (save-buffer)) (when (eq asy-compilation-buffer 'never) (write-region "" 0 (asy-log-filename) nil)) (let* ((b-b-n (if Filename Filename (lasy-TeX-master-file))) (b-b-n-tex (asy-protect-file-name (concat b-b-n ".tex"))) (b-b-n-ps (asy-protect-file-name (concat b-b-n ".ps"))) (b-b-n-dvi (asy-protect-file-name (concat b-b-n ".dvi"))) (b-b-n-asy (asy-protect-file-name (concat b-b-n ".asy"))) (stderr (eq asy-compilation-buffer 'never))) (if (lasy-must-compile-p b-b-n (concat b-b-n ".ps") Force) (progn (let ((default-directory (file-name-directory b-b-n))) (asy-internal-compile (concat lasy-latex-command " " b-b-n-tex)) (when (and (zerop asy-last-compilation-code) (file-readable-p (concat b-b-n ".asy"))) (asy-internal-compile (concat asy-command-location lasy-command " " b-b-n-asy) nil nil stderr) (when (zerop asy-last-compilation-code) (asy-internal-compile (concat lasy-latex-command " " b-b-n-tex)))) (when (zerop asy-last-compilation-code) (asy-internal-compile (concat lasy-dvips-command " " b-b-n-dvi " -o " b-b-n-ps) nil t) (when (zerop asy-last-compilation-code) (asy-open-file (concat b-b-n ".ps")))))) (asy-open-file (concat b-b-n ".ps"))))) (defun lasy-view-pdf-via-pdflatex (&optional Force Filename fromtex) "Compile a LaTeX document embedding Asymptote code with pdflatex->asy->pdflatex and/or view the PDF output. If optional argument Force is t then force compilation." (interactive) (setq lasy-run-tex t) (setq lasy-compile-tex fromtex) (if (buffer-modified-p) (save-buffer)) (when (eq asy-compilation-buffer 'never) (write-region "" 0 (asy-log-filename) nil)) (let* ((b-b-n (if Filename Filename (lasy-TeX-master-file))) (b-b-n-tex (asy-protect-file-name (concat b-b-n ".tex"))) (b-b-n-pdf (asy-protect-file-name (concat b-b-n ".pdf"))) (b-b-n-asy (asy-protect-file-name (concat b-b-n ".asy"))) ;; (stderr (or (eq asy-compilation-buffer 'never) lasy-compile-tex))) (stderr (eq asy-compilation-buffer 'never))) (if (lasy-must-compile-p b-b-n (concat b-b-n ".pdf") Force) (progn (let ((default-directory (file-name-directory b-b-n))) (asy-internal-compile (concat lasy-pdflatex-command " " b-b-n-tex)) (when (and (zerop asy-last-compilation-code) (file-readable-p (concat b-b-n ".asy"))) (asy-internal-compile (concat asy-command-location lasy-command " " b-b-n-asy) nil nil stderr) (when (zerop asy-last-compilation-code) (asy-internal-compile (concat lasy-pdflatex-command " " b-b-n-tex) t))) (when (zerop asy-last-compilation-code) (asy-open-file (concat b-b-n ".pdf"))))) (asy-open-file (concat b-b-n ".pdf"))))) (defun lasy-view-pdf-via-ps2pdf (&optional Force Filename fromtex) "Compile a LaTeX document embedding Asymptote code with latex->asy->latex->dvips->ps2pdf14 and/or view the PDF output. If optional argument Force is t then force compilation." (interactive) (setq lasy-run-tex t) (setq lasy-compile-tex fromtex) (if (buffer-modified-p) (save-buffer)) (when (eq asy-compilation-buffer 'never) (write-region "" 0 (asy-log-filename) nil)) (let* ((b-b-n (if Filename Filename (lasy-TeX-master-file))) (b-b-n-tex (asy-protect-file-name (concat b-b-n ".tex"))) (b-b-n-ps (asy-protect-file-name (concat b-b-n ".ps"))) (b-b-n-dvi (asy-protect-file-name (concat b-b-n ".dvi"))) (b-b-n-pdf (asy-protect-file-name (concat b-b-n ".pdf"))) (b-b-n-asy (asy-protect-file-name (concat b-b-n ".asy"))) ;; (stderr (or (eq asy-compilation-buffer 'never) lasy-compile-tex))) (stderr (eq asy-compilation-buffer 'never))) (if (lasy-must-compile-p b-b-n (concat b-b-n ".pdf") Force) (progn (let ((default-directory (file-name-directory b-b-n))) (asy-internal-compile (concat lasy-latex-command " " b-b-n-tex)) (when (and (zerop asy-last-compilation-code) (file-readable-p (concat b-b-n ".asy"))) (asy-internal-compile (concat asy-command-location lasy-command " " b-b-n-asy) nil nil stderr) (when (zerop asy-last-compilation-code) (asy-internal-compile (concat lasy-latex-command " " b-b-n-tex)))) (when (zerop asy-last-compilation-code) (asy-internal-compile (concat lasy-dvips-pre-pdf-command " " b-b-n-dvi " -o " b-b-n-ps)) (when (zerop asy-last-compilation-code) (asy-internal-compile (concat lasy-ps2pdf-command " " b-b-n-ps " " b-b-n-pdf) t) (when (zerop asy-last-compilation-code) (asy-open-file (concat b-b-n ".pdf"))))))) (asy-open-file (concat b-b-n ".pdf"))))) ;; Goto error of last compilation (define-key asy-mode-map (kbd "") 'asy-goto-error) ;; Save and compile the file with option -V (define-key asy-mode-map (kbd "C-c C-c") 'asy-compile) ;; Show the definitions of command at point (define-key asy-mode-map (kbd "C-c ?") 'asy-show-function-at-point) ;; new line and indent (define-key asy-mode-map (kbd "RET") 'newline-and-indent) (defun asy-master-tex-view-ps () "Look at `asy-master-tex-view'" (interactive) (asy-master-tex-view 'lasy-view-ps nil t)) (define-key asy-mode-map (kbd "") 'asy-master-tex-view-ps) (defun asy-master-tex-view-ps-f () "Look at `asy-master-tex-view'" (interactive) (asy-master-tex-view 'lasy-view-ps t t)) (define-key asy-mode-map (kbd "") 'asy-master-tex-view-ps-f) (defun asy-master-tex-view-pdflatex () "Look at `asy-master-tex-view'" (interactive) (asy-master-tex-view 'lasy-view-pdf-via-pdflatex nil t)) (define-key asy-mode-map (kbd "") 'asy-master-tex-view-pdflatex) (defun asy-master-tex-view-pdflatex-f () "Look at `asy-master-tex-view'" (interactive) (asy-master-tex-view 'lasy-view-pdf-via-pdflatex t t)) (define-key asy-mode-map (kbd "") 'asy-master-tex-view-pdflatex-f) (defun asy-master-tex-view-ps2pdf () "Look at `asy-master-tex-view'" (interactive) (asy-master-tex-view 'lasy-view-pdf-via-ps2pdf nil t)) (define-key asy-mode-map (kbd "") 'asy-master-tex-view-ps2pdf) (defun asy-master-tex-view-ps2pdf-f () "Look at `asy-master-tex-view'" (interactive) (asy-master-tex-view 'lasy-view-pdf-via-ps2pdf t t)) (define-key asy-mode-map (kbd "") 'asy-master-tex-view-ps2pdf-f) (provide `asy-mode) ;;; asy-mode.el ends here ./asymptote-2.41/base/annotate.asy0000644000175000017500000000110213064427076016776 0ustar norbertnorbertvoid annotate(picture pic=currentpicture, string title, string text, pair position) { pic.add(new void(frame f, transform t) { position=t*position; label(f,"\special{!/pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse [/Rect["+(string) position.x+" 0 0 "+(string) position.y+"] /Subtype /Text /Name /Comment /Title ("+title+") /Contents ("+text+") /ANN pdfmark}"); },true); draw(pic,position,invisible); } ./asymptote-2.41/base/plain_filldraw.asy0000644000175000017500000001422413064427076020165 0ustar norbertnorbert// Draw path g on frame f with user-constructed pen p. void makedraw(frame f, path g, pen p, int depth=mantissaBits) { if(depth == 0) return; --depth; path n=nib(p); for(int i=0; i < size(g); ++i) fill(f,shift(point(g,i))*n,p); static real epsilon=1000*realEpsilon; int L=length(g); real stop=L-epsilon; int N=length(n); pair first=point(n,0); pair n0=first; for(int i=0; i < N; ++i) { pair n1=point(n,i+1); pair dir=unit(n1-n0); real t=dirtime(g,-dir)-epsilon; if(straight(g,(int) t)) t=ceil(t); if(t > epsilon && t < stop) { makedraw(f,subpath(g,0,t),p,depth); makedraw(f,subpath(g,t,L),p,depth); return; } real t=dirtime(g,dir); if(straight(g,(int) t)) t=ceil(t); if(t > epsilon && t < stop) { makedraw(f,subpath(g,0,t),p,depth); makedraw(f,subpath(g,t,L),p,depth); return; } n0=n1; } n0=first; for(int i=0; i < N; ++i) { pair n1=point(n,i+1); fill(f,shift(n0)*g--shift(n1)*reverse(g)--cycle,p); n0=n1; } } void draw(frame f, path g, pen p=currentpen) { if(size(nib(p)) == 0) _draw(f,g,p); else { begingroup(f); makedraw(f,g,p); endgroup(f); } } void draw(frame f, explicit path[] g, pen p=currentpen) { for(int i=0; i < g.length; ++i) draw(f,g[i],p); } void draw(frame f, guide[] g, pen p=currentpen) { for(int i=0; i < g.length; ++i) draw(f,g[i],p); } void filldraw(frame f, path[] g, pen fillpen=currentpen, pen drawpen=currentpen) { begingroup(f); fill(f,g,fillpen); draw(f,g,drawpen); endgroup(f); } path[] complement(frame f, path[] g) { static pair margin=(0.5,0.5); return box(minbound(min(f),min(g))-margin,maxbound(max(f),max(g))+margin)^^g; } void unfill(frame f, path[] g, bool copy=true) { clip(f,complement(f,g),evenodd,copy); } void filloutside(frame f, path[] g, pen p=currentpen, bool copy=true) { fill(f,complement(f,g),p+evenodd,copy); } struct filltype { typedef void fill2(frame f, path[] g, pen fillpen); fill2 fill2; pen fillpen; pen drawpen; int type; static int Fill=1; static int FillDraw=2; static int Draw=3; static int NoFill=4; static int UnFill=5; void operator init(int type=0, pen fillpen=nullpen, pen drawpen=nullpen, fill2 fill2) { this.type=type; this.fillpen=fillpen; this.drawpen=drawpen; this.fill2=fill2; } void fill(frame f, path[] g, pen p) {fill2(f,g,p);} } path[] margin(path[] g, real xmargin, real ymargin) { if(xmargin != 0 || ymargin != 0) { pair M=max(g); pair m=min(g); real width=M.x-m.x; real height=M.y-m.y; real xfactor=width > 0 ? (width+2xmargin)/width : 1; real yfactor=height > 0 ? (height+2ymargin)/height : 1; g=scale(xfactor,yfactor)*g; g=shift(0.5*(M+m)-0.5*(max(g)+min(g)))*g; } return g; } filltype Fill(real xmargin=0, real ymargin=xmargin, pen p=nullpen) { return filltype(filltype.Fill,p,new void(frame f, path[] g, pen fillpen) { if(p != nullpen) fillpen=p; if(fillpen == nullpen) fillpen=currentpen; fill(f,margin(g,xmargin,ymargin),fillpen); }); } filltype FillDraw(real xmargin=0, real ymargin=xmargin, pen fillpen=nullpen, pen drawpen=nullpen) { return filltype(filltype.FillDraw,fillpen,drawpen, new void(frame f, path[] g, pen Drawpen) { if(drawpen != nullpen) Drawpen=drawpen; pen Fillpen=fillpen == nullpen ? Drawpen : fillpen; if(Fillpen == nullpen) Fillpen=currentpen; if(Drawpen == nullpen) Drawpen=Fillpen; if(cyclic(g[0])) filldraw(f,margin(g,xmargin,ymargin),Fillpen,Drawpen); else draw(f,margin(g,xmargin,ymargin),Drawpen); }); } filltype Draw(real xmargin=0, real ymargin=xmargin, pen p=nullpen) { return filltype(filltype.Draw,drawpen=p, new void(frame f, path[] g, pen drawpen) { pen drawpen=p == nullpen ? drawpen : p; if(drawpen == nullpen) drawpen=currentpen; draw(f,margin(g,xmargin,ymargin),drawpen); }); } filltype NoFill=filltype(filltype.NoFill,new void(frame f, path[] g, pen p) { draw(f,g,p); }); filltype UnFill(real xmargin=0, real ymargin=xmargin) { return filltype(filltype.UnFill,new void(frame f, path[] g, pen) { unfill(f,margin(g,xmargin,ymargin)); }); } filltype FillDraw=FillDraw(), Fill=Fill(), Draw=Draw(), UnFill=UnFill(); // Fill varying radially from penc at the center of the bounding box to // penr at the edge. filltype RadialShade(pen penc, pen penr) { return filltype(new void(frame f, path[] g, pen) { pair c=(min(g)+max(g))/2; radialshade(f,g,penc,c,0,penr,c,abs(max(g)-min(g))/2); }); } filltype RadialShadeDraw(real xmargin=0, real ymargin=xmargin, pen penc, pen penr, pen drawpen=nullpen) { return filltype(new void(frame f, path[] g, pen Drawpen) { if(drawpen != nullpen) Drawpen=drawpen; if(Drawpen == nullpen) Drawpen=penc; pair c=(min(g)+max(g))/2; if(cyclic(g[0])) radialshade(f,margin(g,xmargin,ymargin),penc,c,0,penr,c, abs(max(g)-min(g))/2); draw(f,margin(g,xmargin,ymargin),Drawpen); }); } // Fill the region in frame dest underneath frame src and return the // boundary of src. path fill(frame dest, frame src, filltype filltype=NoFill, real xmargin=0, real ymargin=xmargin) { pair z=(xmargin,ymargin); path g=box(min(src)-z,max(src)+z); filltype.fill(dest,g,nullpen); return g; } // Add frame dest to frame src with optional grouping and background fill. void add(frame dest, frame src, bool group, filltype filltype=NoFill, bool above=true) { if(above) { if(filltype != NoFill) fill(dest,src,filltype); if(group) begingroup(dest); add(dest,src); if(group) endgroup(dest); } else { if(group) { frame f; endgroup(f); prepend(dest,f); } prepend(dest,src); if(group) { frame f; begingroup(f); prepend(dest,f); } if(filltype != NoFill) { frame f; fill(f,src,filltype); prepend(dest,f); } } } void add(frame dest, frame src, filltype filltype, bool above=filltype.type != filltype.UnFill) { if(filltype != NoFill) fill(dest,src,filltype); (above ? add : prepend)(dest,src); } ./asymptote-2.41/base/trembling.asy0000644000175000017500000001324513064427076017163 0ustar norbertnorbert// Copyright(c) 2008, Philippe Ivaldi. // Simplified by John Bowman 02Feb2011 // http: //www.piprime.fr/ // trembling.asy: handwriting package for the software Asymptote. // This program is free software; you can redistribute it and/or modify // it under the terms of the GNU Lesser General Public License as published by // the Free Software Foundation; either version 3 of the License, or //(at your option) any later version. // This program is distributed in the hope that it will be useful, but // WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU // Lesser General Public License for more details. // You should have received a copy of the GNU Lesser General Public License // along with this program; if not, write to the Free Software // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA // COMMENTARY: // THANKS: // BUGS: // magnetic points are experimental... // CODE: real magneticRadius=1; // unit is bp in postscript coordinates. real trembleFuzz(){return min(1e-3,magneticRadius/10);} real trembleAngle=4, trembleFrequency=0.5, trembleRandom=2; struct tremble { static real test=5; real angle,frequency,random,fuzz; pair[] single(pair[] P) { pair[] op; bool allow; for(int i=0; i < P.length-1; ++i) { allow=true; for(int j=i+1; j < P.length; ++j) { if(abs(P[i]-P[j]) < magneticRadius) { allow=false; break; } } if(allow) op.push(P[i]); } if(P.length > 0) op.push(P[P.length-1]); return op; } real atime(pair m, path g, real fuzz=trembleFuzz()) {// Return the time of the point on path g nearest to m, within fuzz. if(length(g) == 0) return 0.0; real[] t=intersect(m,g,fuzz); if(t.length > 0) return t[1]; real ot; static real eps=sqrt(realEpsilon); real abmax=abs(max(g)-m), abmin=abs(min(g)-m); real initr=abs(m-midpoint(g)); real maxR=2*max(abmax,abmin), step=eps, r=initr; real shx=1e-4; transform T=shift(m); path ig; if(t.length > 0) ot=t[1]; real rm=0, rM=r; while(rM-rm > eps) { r=(rm+rM)/2; t=intersect(T*scale(r)*unitcircle,g,fuzz); if(t.length <= 0) { rm=r; } else { rM=r; ot=t[1]; } } return ot; } path addnode(path g, real t) {// Add a node to 'g' at point(g,t). real l=length(g); real rt=t % 1; if(l == 0 || (t > l && !cyclic(g)) || rt == 0) return g; if(cyclic(g)) t=t % l; int t0=floor(t); int t1=t0+1; pair z0=point(g,t0), z1=point(g,t1), c0=postcontrol(g,t0), c1=precontrol(g,t1), m0=(1-rt)*z0+rt*c0, m1=(1-rt)*c0+rt*c1, m2=(1-rt)*c1+rt*z1, m3=(1-rt)*m0+rt*m1, m4=(1-rt)*m1+rt*m2; guide og=subpath(g,0,t0)..controls m0 and m3..point(g,t); if(cyclic(g)) { if(t1 < l) og=og..controls m4 and m2..subpath(g,t1,l)&cycle; else og=og..controls m4 and m2..cycle; } else og=og..controls m4 and m2..subpath(g,t1,l); return og; } path addnodes(path g, real fuzz=trembleFuzz()...pair[] P) { pair[] P=single(P); if(length(g) == 0 || P.length == 0 || magneticRadius <= 0) return g; path og=g; for(pair tp: P) { real t=atime(tp,og,fuzz); real d=abs(tp-point(og,t)); if(d < magneticRadius) og=addnode(og,t); } return og; } path addnodes(path g, int n) {// Add 'n' nodes between each node of 'g'. real l=length(g); if(n == 0 || l == 0) return g; path og=g; int np=0; for(int i=0; i < l; ++i) { real step=1/(n+1); for(int j=0; j < n; ++j) { og=addnode(og,i*(n+1)+j+step); step=1/(n-j); } } return og; } void operator init(real angle=trembleAngle, real frequency=trembleFrequency, real random=trembleRandom, real fuzz=trembleFuzz()) { this.angle=angle; this.frequency=frequency; this.random=random; this.fuzz=fuzz; } path deform(path g...pair[] magneticPoints) { /* Return g as it was handwriting. The postcontrols and precontrols of the nodes of g will be rotated by an angle proportional to 'angle'(in degrees). If frequency < 1, floor(1/frequency) nodes will be added to g to increase the control points. If frequency>= 1, one point for floor(frequency) will be used to deform the path. 'random' controls the randomized coefficient which will be multiplied by 'angle'. random is 0 means don't use randomized coefficient; The higher 'random' is, the more the trembling is randomized. */ if(length(g) == 0) return g; g=addnodes(g,fuzz*abs(max(g)-min(g))...magneticPoints); path tg=g; frequency=abs(frequency); int f=abs(floor(1/frequency)-1); tg=addnodes(tg,f); int frequency=floor(frequency); int tf=(frequency == 0) ? 1 : frequency; int l=length(tg); guide og=point(tg,0); random=abs(random); int rsgn(real x){ int d2=floor(100*x)-10*floor(10*x); if(d2 == 0) return 1; return 2 % d2 == 0 ? 1 : -1; } real randf() { real or; if(random != 0) { if(1 % tf != 0) or=0; else { real ur=unitrand(); or=rsgn(ur)*angle*(1+ur^(1/random)); } } else or=rsgn(unitrand())*1.5*angle; return or; } real first=randf(); for(int i=1; i <= l; ++i) { pair P=point(tg,i); real a=randf(); pair post=rotate(a,point(tg,i-1))*postcontrol(tg,i-1); pair pre=rotate((a+randf())/2,P)*precontrol(tg,i); if(i == l && (cyclic(tg))) og=og..controls post and pre..cycle; else og=og..controls post and pre..P; } return og; } } ./asymptote-2.41/base/plain_bounds.asy0000644000175000017500000005101513064427076017652 0ustar norbertnorbertinclude plain_scaling; // After a transformation, produce new coordinate bounds. For paths that // have been added, this is only an approximation since it takes the bounds of // their transformed bounding box. private void addTransformedCoords(coords2 dest, transform t, coords2 point, coords2 min, coords2 max) { dest.push(t, point, point); // Add in all 4 corner coords, to properly size rectangular pictures. dest.push(t,min,min); dest.push(t,min,max); dest.push(t,max,min); dest.push(t,max,max); } // Adds another sizing restriction to the coordinates, but only if it is // maximal, that is, if under some scaling, this coordinate could be the // largest. private void addIfMaximal(coord[] coords, real user, real truesize) { // TODO: Test promoting coordinates for efficiency. for (coord c : coords) if (user <= c.user && truesize <= c.truesize) // Not maximal. return; // The coordinate is not dominated by any existing extreme, so it is // maximal and will be added, but first remove any coords it now dominates. int i = 0; while (i < coords.length) { coord c = coords[i]; if (c.user <= user && c.truesize <= truesize) coords.delete(i); else ++i; } // Add the coordinate to the extremes. coords.push(coord.build(user, truesize)); } private void addIfMaximal(coord[] dest, coord[] src) { // This may be inefficient, as it rebuilds the coord struct when adding it. for (coord c : src) addIfMaximal(dest, c.user, c.truesize); } // Same as addIfMaximal, but testing for minimal coords. private void addIfMinimal(coord[] coords, real user, real truesize) { for (coord c : coords) if (user >= c.user && truesize >= c.truesize) return; int i = 0; while (i < coords.length) { coord c = coords[i]; if (c.user >= user && c.truesize >= truesize) coords.delete(i); else ++i; } coords.push(coord.build(user, truesize)); } private void addIfMinimal(coord[] dest, coord[] src) { for (coord c : src) addIfMinimal(dest, c.user, c.truesize); } // This stores a list of sizing bounds for picture data. If the object is // frozen, then it cannot be modified further, and therefore can be safely // passed by reference and stored in the sizing data for multiple pictures. private struct freezableBounds { restricted bool frozen = false; void freeze() { frozen = true; } // Optional links to further (frozen) sizing data. private freezableBounds[] links; // Links to (frozen) sizing data that is transformed when added here. private static struct transformedBounds { transform t; freezableBounds link; }; private transformedBounds[] tlinks; // The sizing data. It cannot be modified once this object is frozen. private coords2 point, min, max; // A bound represented by a path. Using the path instead of the bounding // box means it will be accurate after a transformation by coordinates. private path[] pathBounds; // A bound represented by a path and a pen. // As often many paths use the same pen, we store an array of paths. private static struct pathpen { path[] g; pen p; void operator init(path g, pen p) { this.g.push(g); this.p = p; } } private static pathpen operator *(transform t, pathpen pp) { // Should the pen be transformed? pathpen newpp; for (path g : pp.g) newpp.g.push(t*g); newpp.p = pp.p; return newpp; } // WARNING: Due to crazy optimizations, if this array is changed between an // empty and non-empty state, the assignment of a method to // addPath(path,pen) must also change. private pathpen[] pathpenBounds; // Once frozen, the sizing is immutable, and therefore we can compute and // store the extremal coordinates. public static struct extremes { coord[] left, bottom, right, top; void operator init(coord[] left, coord[] bottom, coord[] right, coord[] top) { this.left = left; this.bottom = bottom; this.right = right; this.top = top; } } private static void addMaxToExtremes(extremes e, pair user, pair truesize) { addIfMaximal(e.right, user.x, truesize.x); addIfMaximal(e.top, user.y, truesize.y); } private static void addMinToExtremes(extremes e, pair user, pair truesize) { addIfMinimal(e.left, user.x, truesize.x); addIfMinimal(e.bottom, user.y, truesize.y); } private static void addMaxToExtremes(extremes e, coords2 coords) { addIfMaximal(e.right, coords.x); addIfMaximal(e.top, coords.y); } private static void addMinToExtremes(extremes e, coords2 coords) { addIfMinimal(e.left, coords.x); addIfMinimal(e.bottom, coords.y); } private extremes cachedExtremes = null; // Once frozen, getMutable returns a new object based on this one, which can // be modified. freezableBounds getMutable() { assert(frozen); var f = new freezableBounds; f.links.push(this); return f; } freezableBounds transformed(transform t) { // Freeze these bounds, as we are storing a reference to them. freeze(); var tlink = new transformedBounds; tlink.t = t; tlink.link = this; var b = new freezableBounds; b.tlinks.push(tlink); return b; } void append(freezableBounds b) { // Check that we can modify the object. assert(!frozen); //TODO: If b is "small", ie. a single tlink or cliplink, just copy the //link. // As we only reference b, we must freeze it to ensure it does not change. b.freeze(); links.push(b); } void addPoint(pair user, pair truesize) { assert(!frozen); point.push(user, truesize); } void addBox(pair userMin, pair userMax, pair trueMin, pair trueMax) { assert(!frozen); this.min.push(userMin, trueMin); this.max.push(userMax, trueMax); } void addPath(path g) { // This, and other asserts have been removed to speed things up slightly. //assert(!frozen); this.pathBounds.push(g); } void addPath(path[] g) { //assert(!frozen); this.pathBounds.append(g); } // To squeeze out a bit more performance, this method is either assigned // addPathToNonEmptyArray or addPathToEmptyArray depending on the state of // the pathpenBounds array. void addPath(path g, pen p); private void addPathToNonEmptyArray(path g, pen p) { //assert(!frozen); //assert(!pathpenBounds.empty()); var pp = pathpenBounds[0]; // Test if the pens are equal or have the same bounds. if (pp.p == p || (min(pp.p) == min(p) && max(pp.p) == max(p))) { // If this path has the same pen as the last one, just add it to the // array corresponding to that pen. pp.g.push(g); } else { // A different pen. Start a new bound and put it on the front. Put // the old bound at the end of the array. pathpenBounds[0] = pathpen(g,p); pathpenBounds.push(pp); } } void addPathToEmptyArray(path g, pen p) { //assert(!frozen); //assert(pathpenBounds.empty()); pathpenBounds.push(pathpen(g,p)); addPath = addPathToNonEmptyArray; } // Initial setting for addPath. addPath = addPathToEmptyArray; // Transform the sizing info by t then add the result to the coords // structure. private void accumulateCoords(transform t, coords2 coords) { for (var link : links) link.accumulateCoords(t, coords); for (var tlink : tlinks) tlink.link.accumulateCoords(t*tlink.t, coords); addTransformedCoords(coords, t, this.point, this.min, this.max); for (var g : pathBounds) { g = t*g; coords.push(min(g), (0,0)); coords.push(max(g), (0,0)); } for (var pp: pathpenBounds) { pair pm = min(pp.p), pM = max(pp.p); for (var g : pp.g) { g = t*g; coords.push(min(g), pm); coords.push(max(g), pM); } } } // Add all of the sizing info to the given coords structure. private void accumulateCoords(coords2 coords) { for (var link : links) link.accumulateCoords(coords); for (var tlink : tlinks) tlink.link.accumulateCoords(tlink.t, coords); coords.append(this.point); coords.append(this.min); coords.append(this.max); for (var g : pathBounds) { coords.push(min(g), (0,0)); coords.push(max(g), (0,0)); } for (var pp: pathpenBounds) { pair pm = min(pp.p), pM = max(pp.p); for (var g : pp.g) { coords.push(min(g), pm); coords.push(max(g), pM); } } } // Returns all of the coords that this sizing data represents. private coords2 allCoords() { coords2 coords; accumulateCoords(coords); return coords; } private void addLocalsToExtremes(transform t, extremes e) { coords2 coords; addTransformedCoords(coords, t, this.point, this.min, this.max); addMinToExtremes(e, coords); addMaxToExtremes(e, coords); if (pathBounds.length > 0) { addMinToExtremes(e, minAfterTransform(t, pathBounds), (0,0)); addMaxToExtremes(e, maxAfterTransform(t, pathBounds), (0,0)); } for (var pp : pathpenBounds) { if (pp.g.length > 0) { addMinToExtremes(e, minAfterTransform(t, pp.g), min(pp.p)); addMaxToExtremes(e, maxAfterTransform(t, pp.g), max(pp.p)); } } } private void addToExtremes(transform t, extremes e) { for (var link : links) link.addToExtremes(t, e); for (var tlink : tlinks) tlink.link.addToExtremes(t*tlink.t, e); addLocalsToExtremes(t, e); } private void addLocalsToExtremes(extremes e) { addMinToExtremes(e, point); addMaxToExtremes(e, point); addMinToExtremes(e, min); addMaxToExtremes(e, max); if (pathBounds.length > 0) { addMinToExtremes(e, min(pathBounds), (0,0)); addMaxToExtremes(e, max(pathBounds), (0,0)); } for(var pp : pathpenBounds) { pair m=min(pp.p); pair M=max(pp.p); for(path gg : pp.g) { if (size(gg) > 0) { addMinToExtremes(e,min(gg),m); addMaxToExtremes(e,max(gg),M); } } } } private void addToExtremes(extremes e) { for (var link : links) link.addToExtremes(e); for (var tlink : tlinks) tlink.link.addToExtremes(tlink.t, e); addLocalsToExtremes(e); } private static void write(extremes e) { static void write(coord[] coords) { for (coord c : coords) write(" " + (string)c.user + " u + " + (string)c.truesize); } write("left:"); write(e.left); write("bottom:"); write(e.bottom); write("right:"); write(e.right); write("top:"); write(e.top); } // Returns the extremal coordinates of the sizing data. public extremes extremes() { if (cachedExtremes == null) { freeze(); extremes e; addToExtremes(e); cachedExtremes = e; } return cachedExtremes; } // Helper functions for computing the usersize bounds. usermin and usermax // would be easily computable from extremes, except that the picture // interface actually allows calls that manually change the usermin and // usermax values. Therefore, we have to compute these values separately. private static struct userbounds { bool areSet=false; pair min; pair max; } private static struct boundsAccumulator { pair[] mins; pair[] maxs; void push(pair m, pair M) { mins.push(m); maxs.push(M); } void push(userbounds b) { if (b.areSet) push(b.min, b.max); } void push(transform t, userbounds b) { if (b.areSet) { pair[] box = { t*(b.min.x,b.max.y), t*b.max, t*b.min, t*(b.max.x,b.min.y) }; for (var z : box) push(z,z); } } void pushUserCoords(coords2 min, coords2 max) { int n = min.x.length; assert(min.y.length == n); assert(max.x.length == n); assert(max.y.length == n); for (int i = 0; i < n; ++i) push((min.x[i].user, min.y[i].user), (max.x[i].user, max.y[i].user)); } userbounds collapse() { userbounds b; if (mins.length > 0) { b.areSet = true; b.min = minbound(mins); b.max = maxbound(maxs); } else { b.areSet = false; } return b; } } // The user bounds already calculated for this data. private userbounds storedUserBounds = null; private void accumulateUserBounds(boundsAccumulator acc) { if (storedUserBounds != null) { assert(frozen); acc.push(storedUserBounds); } else { acc.pushUserCoords(point, point); acc.pushUserCoords(min, max); if (pathBounds.length > 0) acc.push(min(pathBounds), max(pathBounds)); for (var pp : pathpenBounds) if(size(pp.g) > 0) acc.push(min(pp.g), max(pp.g)); for (var link : links) link.accumulateUserBounds(acc); // Transforms are handled as they were in the old system. for (var tlink : tlinks) { boundsAccumulator tacc; tlink.link.accumulateUserBounds(tacc); acc.push(tlink.t, tacc.collapse()); } } } private void computeUserBounds() { freeze(); boundsAccumulator acc; accumulateUserBounds(acc); storedUserBounds = acc.collapse(); } private userbounds userBounds() { if (storedUserBounds == null) computeUserBounds(); assert(storedUserBounds != null); return storedUserBounds; } // userMin/userMax returns the minimal/maximal userspace coordinate of the // sizing data. As coordinates for objects such as labels can have // significant truesize dimensions, this userMin/userMax values may not // correspond closely to the end of the screen, and are of limited use. // userSetx and userSety determine if there is sizing data in order to even // have userMin/userMax defined. public bool userBoundsAreSet() { return userBounds().areSet; } public pair userMin() { return userBounds().min; } public pair userMax() { return userBounds().max; } // To override the true userMin and userMax bounds, first compute the // userBounds as they should be at this point, then change the values. public void alterUserBound(string which, real val) { // We are changing the bounds data, so it cannot be frozen yet. After the // user bounds are set, however, the sizing data cannot change, so it will // be frozen. assert(!frozen); computeUserBounds(); assert(frozen); var b = storedUserBounds; if (which == "minx") b.min = (val, b.min.y); else if (which == "miny") b.min = (b.min.x, val); else if (which == "maxx") b.max = (val, b.max.y); else { assert(which == "maxy"); b.max = (b.max.x, val); } } // A temporary measure. Stuffs all of the data from the links and paths // into the coords. private void flatten() { assert(!frozen); // First, compute the user bounds, taking into account any manual // alterations. computeUserBounds(); // Calculate all coordinates. coords2 coords = allCoords(); // Erase all the old data. point.erase(); min.erase(); max.erase(); pathBounds.delete(); pathpenBounds.delete(); addPath = addPathToEmptyArray; links.delete(); tlinks.delete(); // Put all of the coordinates into point. point = coords; } void xclip(real Min, real Max) { assert(!frozen); flatten(); point.xclip(Min,Max); min.xclip(Min,Max); max.xclip(Min,Max); // Cap the userBounds. userbounds b = storedUserBounds; b.min = (max(Min, b.min.x), b.min.y); b.max = (min(Max, b.max.x), b.max.y); } void yclip(real Min, real Max) { assert(!frozen); flatten(); point.yclip(Min,Max); min.yclip(Min,Max); max.yclip(Min,Max); // Cap the userBounds. userbounds b = storedUserBounds; b.min = (b.min.x, max(Min, b.min.y)); b.max = (b.max.x, min(Max, b.max.y)); } // Calculate the min for the final frame, given the coordinate transform. pair min(transform t) { extremes e = extremes(); if (e.left.length == 0) return 0; pair a=t*(1,1)-t*(0,0), b=t*(0,0); scaling xs=scaling.build(a.x,b.x); scaling ys=scaling.build(a.y,b.y); return (min(infinity, xs, e.left), min(infinity, ys, e.bottom)); } // Calculate the max for the final frame, given the coordinate transform. pair max(transform t) { extremes e = extremes(); if (e.right.length == 0) return 0; pair a=t*(1,1)-t*(0,0), b=t*(0,0); scaling xs=scaling.build(a.x,b.x); scaling ys=scaling.build(a.y,b.y); return (max(-infinity, xs, e.right), max(-infinity, ys, e.top)); } // Returns the transform for turning user-space pairs into true-space pairs. transform scaling(real xsize, real ysize, real xunitsize, real yunitsize, bool keepAspect, bool warn) { if(xsize == 0 && xunitsize == 0 && ysize == 0 && yunitsize == 0) return identity(); // Get the extremal coordinates. extremes e = extremes(); real sx; if(xunitsize == 0) { if(xsize != 0) sx=calculateScaling("x",e.left,e.right,xsize,warn); } else sx=xunitsize; /* Possible alternative code : real sx = xunitsize != 0 ? xunitsize : xsize != 0 ? calculateScaling("x", Coords.x, xsize, warn) : 0; */ real sy; if(yunitsize == 0) { if(ysize != 0) sy=calculateScaling("y",e.bottom,e.top,ysize,warn); } else sy=yunitsize; if(sx == 0) { sx=sy; if(sx == 0) return identity(); } else if(sy == 0) sy=sx; if(keepAspect && (xunitsize == 0 || yunitsize == 0)) return scale(min(sx,sy)); else return scale(sx,sy); } } struct bounds { private var base = new freezableBounds; // We should probably put this back into picture. bool exact = true; // Called just before modifying the sizing data. It ensures base is // non-frozen. // Note that this is manually inlined for speed reasons in a couple often // called methods below. private void makeMutable() { if (base.frozen) base = base.getMutable(); //assert(!base.frozen); // Disabled for speed reasons. } void erase() { // Just discard the old bounds. base = new freezableBounds; // We don't reset the 'exact' field, for backward compatibility. } bounds copy() { // Freeze the underlying bounds and make a shallow copy. base.freeze(); var b = new bounds; b.base = this.base; b.exact = this.exact; return b; } bounds transformed(transform t) { var b = new bounds; b.base = base.transformed(t); b.exact = this.exact; return b; } void append(bounds b) { makeMutable(); base.append(b.base); } void append(transform t, bounds b) { // makeMutable will be called by append. if (t == identity()) append(b); else append(b.transformed(t)); } void addPoint(pair user, pair truesize) { makeMutable(); base.addPoint(user, truesize); } void addBox(pair userMin, pair userMax, pair trueMin, pair trueMax) { makeMutable(); base.addBox(userMin, userMax, trueMin, trueMax); } void addPath(path g) { //makeMutable(); // Manually inlined here for speed reasons. if (base.frozen) base = base.getMutable(); base.addPath(g); } void addPath(path[] g) { //makeMutable(); // Manually inlined here for speed reasons. if (base.frozen) base = base.getMutable(); base.addPath(g); } void addPath(path g, pen p) { //makeMutable(); // Manually inlined here for speed reasons. if (base.frozen) base = base.getMutable(); base.addPath(g, p); } public bool userBoundsAreSet() { return base.userBoundsAreSet(); } public pair userMin() { return base.userMin(); } public pair userMax() { return base.userMax(); } public void alterUserBound(string which, real val) { makeMutable(); base.alterUserBound(which, val); } void xclip(real Min, real Max) { makeMutable(); base.xclip(Min,Max); } void yclip(real Min, real Max) { makeMutable(); base.yclip(Min,Max); } void clip(pair Min, pair Max) { // TODO: If the user bounds have been manually altered, they may be // incorrect after the clip. xclip(Min.x,Max.x); yclip(Min.y,Max.y); } pair min(transform t) { return base.min(t); } pair max(transform t) { return base.max(t); } transform scaling(real xsize, real ysize, real xunitsize, real yunitsize, bool keepAspect, bool warn) { return base.scaling(xsize, ysize, xunitsize, yunitsize, keepAspect, warn); } } bounds operator *(transform t, bounds b) { return b.transformed(t); } ./asymptote-2.41/base/tree.asy0000644000175000017500000000253713064427076016141 0ustar norbertnorbert/***** * treedef.asy * Andy Hammerlindl 2003/10/25 * * Implements a dynamic binary search tree. *****/ struct tree { tree left; tree right; int key = 0; int value = 0; } tree newtree() { return null; } tree add(tree t, int key, int value) { if (t == null) { tree tt; tt.key = key; tt.value = value; return tt; } else if (key == t.key) { return t; } else if (key < t.key) { tree tt; tt.left = add(t.left, key, value); tt.key = t.key; tt.value = t.value; tt.right = t.right; return tt; } else { tree tt; tt.left = t.left; tt.key = t.key; tt.value = t.value; tt.right = add(t.right, key, value); return tt; } } bool contains(tree t, int key) { if (t == null) return false; else if (key == t.key) return true; else if (key < t.key) return contains(t.left, key); else return contains(t.right, key); } int lookup(tree t, int key) { if (t == null) return 0; else if (key == t.key) return t.value; else if (key < t.key) return lookup(t.left, key); else return lookup(t.right, key); } void write(file out=stdout, tree t) { if (t != null) { if(t.left != null) { write(out,t.left); } write(out,t.key); write(out,"->"); write(out,t.value,endl); if (t.right != null) { write(out,t.right); } } } ./asymptote-2.41/base/external.asy0000644000175000017500000000214213064427076017014 0ustar norbertnorbertusepackage("hyperref"); texpreamble("\hypersetup{"+settings.hyperrefOptions+"}"); // Embed object to be run in an external window. An image file name can be // specified; if not given one will be automatically generated. string embed(string name, string text="", string options="", real width=0, real height=0, string image="") { string options; // Ignore passed options. if(image == "") { image=stripdirectory(stripextension(name))+"."+nativeformat(); convert(name+"[0]",image,nativeformat()); if(!settings.keep) { exitfcn currentexitfunction=atexit(); void exitfunction() { if(currentexitfunction != null) currentexitfunction(); delete(image); } atexit(exitfunction); } } if(width != 0) options += ", width="+(string) (width/pt)+"pt"; if(height != 0) options +=", height="+(string) (height/pt)+"pt"; return "\href{run:"+name+"}{"+graphic(image,options)+"}"; } string hyperlink(string url, string text) { return "\href{"+url+"}{"+text+"}"; } string link(string label, string text="Play") { return hyperlink("run:"+label,text); } ./asymptote-2.41/base/solids.asy0000644000175000017500000002776413064427076016510 0ustar norbertnorbertimport graph3; pen defaultbackpen=linetype(new real[] {4,4},4,scale=false); // A solid geometry package. // Try to find a bounding tangent line between two paths. real[] tangent(path p, path q, bool side) { static real fuzz=1.0e-5; if((cyclic(p) && inside(p,point(q,0)) || cyclic(q) && inside(q,point(p,0))) && intersect(p,q,fuzz).length == 0) return new real[]; for(int i=0; i < 100; ++i) { real ta=side ? mintimes(p)[1] : maxtimes(p)[1]; real tb=side ? mintimes(q)[1] : maxtimes(q)[1]; pair a=point(p,ta); pair b=point(q,tb); real angle=angle(b-a,warn=false); if(abs(angle) <= sqrtEpsilon || abs(abs(0.5*angle)-pi) <= sqrtEpsilon) return new real[] {ta,tb}; transform t=rotate(-degrees(angle)); p=t*p; q=t*q; } return new real[]; } path line(path p, path q, real[] t) { return point(p,t[0])--point(q,t[1]); } // Return the projection of a generalized cylinder of height h constructed // from area base in the XY plane and aligned with axis. path[] cylinder(path3 base, real h, triple axis=Z, projection P) { base=rotate(-colatitude(axis),cross(axis,Z))*base; path3 top=shift(h*axis)*base; path Base=project(base,P); path Top=project(top,P); real[] t1=tangent(Base,Top,true); real[] t2=tangent(Base,Top,false); path p=subpath(Base,t1[0]/P.ninterpolate,t2[0]/P.ninterpolate); path q=subpath(Base,t2[0]/P.ninterpolate,t1[0]/P.ninterpolate); return Base^^Top^^line(Base,Top,t1)^^line(Base,Top,t2); } // The three-dimensional "wireframe" used to visualize a volume of revolution struct skeleton { struct curve { path3[] front; path3[] back; } // transverse skeleton (perpendicular to axis of revolution) curve transverse; // longitudinal skeleton (parallel to axis of revolution) curve longitudinal; } // A surface of revolution generated by rotating a planar path3 g // from angle1 to angle2 about c--c+axis. struct revolution { triple c; path3 g; triple axis; real angle1,angle2; triple M; triple m; static real epsilon=10*sqrtEpsilon; void operator init(triple c=O, path3 g, triple axis=Z, real angle1=0, real angle2=360) { this.c=c; this.g=g; this.axis=unit(axis); this.angle1=angle1; this.angle2=angle2; M=max(g); m=min(g); } revolution copy() { return revolution(c,g,axis,angle1,angle2); } triple vertex(int i, real j) { triple v=point(g,i); triple center=c+dot(v-c,axis)*axis; triple perp=v-center; triple normal=cross(axis,perp); return center+Cos(j)*perp+Sin(j)*normal; } // Construct the surface of rotation generated by rotating g // from angle1 to angle2 sampled n times about the line c--c+axis. // An optional surface pen color(int i, real j) may be specified // to override the color at vertex(i,j). surface surface(int n=nslice, pen color(int i, real j)=null) { return surface(c,g,axis,n,angle1,angle2,color); } path3 slice(real position, int n=nCircle) { triple v=point(g,position); triple center=c+dot(v-c,axis)*axis; triple perp=v-center; if(abs(perp) <= epsilon*max(abs(m),abs(M))) return center; triple v1=center+rotate(angle1,axis)*perp; triple v2=center+rotate(angle2,axis)*perp; path3 p=Arc(center,v1,v2,axis,n); return (angle2-angle1) % 360 == 0 ? p&cycle : p; } triple camera(projection P) { triple camera=P.camera; if(P.infinity) { real s=abs(M-m)+abs(m-P.target); camera=P.target+camerafactor*s*unit(P.vector()); } return camera; } // add transverse slice to skeleton s; void transverse(skeleton s, real t, int n=nslice, projection P) { skeleton.curve s=s.transverse; path3 S=slice(t,n); triple camera=camera(P); int L=length(g); real midtime=0.5*L; real sign=sgn(dot(axis,camera-P.target))*sgn(dot(axis,dir(g,midtime))); if(dot(M-m,axis) == 0 || (t <= epsilon && sign < 0) || (t >= L-epsilon && sign > 0)) s.front.push(S); else { path3 Sp=slice(t+epsilon,n); path3 Sm=slice(t-epsilon,n); path sp=project(Sp,P); path sm=project(Sm,P); real[] t1=tangent(sp,sm,true); real[] t2=tangent(sp,sm,false); if(t1.length > 1 && t2.length > 1) { real t1=t1[0]/P.ninterpolate; real t2=t2[0]/P.ninterpolate; int len=length(S); if(t2 < t1) { real temp=t1; t1=t2; t2=temp; } path3 p1=subpath(S,t1,t2); path3 p2=subpath(S,t2,len); path3 P2=subpath(S,0,t1); if(abs(midpoint(p1)-camera) <= abs(midpoint(p2)-camera)) { s.front.push(p1); if(cyclic(S)) s.back.push(p2 & P2); else { s.back.push(p2); s.back.push(P2); } } else { if(cyclic(S)) s.front.push(p2 & P2); else { s.front.push(p2); s.front.push(P2); } s.back.push(p1); } } else { if((t <= midtime && sign < 0) || (t >= midtime && sign > 0)) s.front.push(S); else s.back.push(S); } } } // add m evenly spaced transverse slices to skeleton s void transverse(skeleton s, int m=0, int n=nslice, projection P) { if(m == 0) { int N=size(g); for(int i=0; i < N; ++i) transverse(s,(real) i,n,P); } else if(m == 1) transverse(s,reltime(g,0.5),n,P); else { real factor=1/(m-1); for(int i=0; i < m; ++i) transverse(s,reltime(g,i*factor),n,P); } } // return approximate silhouette based on m evenly spaced transverse slices; // must be recomputed if camera is adjusted path3[] silhouette(int m=64, projection P=currentprojection) { if(is3D()) warning("2Dsilhouette", "silhouette routine is intended only for 2d projections"); path3 G,H; int N=size(g); int M=(m == 0) ? N : m; real factor=m == 1 ? 0 : 1/(m-1); int n=nslice; real tfirst=-1; real tlast; for(int i=0; i < M; ++i) { real t=(m == 0) ? i : reltime(g,i*factor); path3 S=slice(t,n); triple camera=camera(P); path3 Sp=slice(t+epsilon,n); path3 Sm=slice(t-epsilon,n); path sp=project(Sp,P); path sm=project(Sm,P); real[] t1=tangent(sp,sm,true); real[] t2=tangent(sp,sm,false); if(t1.length > 1 && t2.length > 1) { real t1=t1[0]/P.ninterpolate; real t2=t2[0]/P.ninterpolate; if(t1 != t2) { G=G..point(S,t1); H=point(S,t2)..H; if(tfirst < 0) tfirst=t; tlast=t; } } } int L=length(g); real midtime=0.5*L; triple camera=camera(P); real sign=sgn(dot(axis,camera-P.target))*sgn(dot(axis,dir(g,midtime))); skeleton sfirst; transverse(sfirst,tfirst,n,P); triple delta=this.M-this.m; path3 cap; if(dot(delta,axis) == 0 || (tfirst <= epsilon && sign < 0)) { cap=sfirst.transverse.front[0]; } else { if(sign > 0) { if(sfirst.transverse.front.length > 0) G=reverse(sfirst.transverse.front[0])..G; } else { if(sfirst.transverse.back.length > 0) G=sfirst.transverse.back[0]..G; } } skeleton slast; transverse(slast,tlast,n,P); if(dot(delta,axis) == 0 || (tlast >= L-epsilon && sign > 0)) { cap=slast.transverse.front[0]; } else { if(sign > 0) { if(slast.transverse.back.length > 0) H=reverse(slast.transverse.back[0])..H; } else { if(slast.transverse.front.length > 0) H=slast.transverse.front[0]..H; } } return size(cap) == 0 ? G^^H : G^^H^^cap; } // add longitudinal curves to skeleton; void longitudinal(skeleton s, int n=nslice, projection P) { real t, d=0; // Find a point on g of maximal distance from the axis. int N=size(g); for(int i=0; i < N; ++i) { triple v=point(g,i); triple center=c+dot(v-c,axis)*axis; real r=abs(v-center); if(r > d) { t=i; d=r; } } path3 S=slice(t,n); path3 Sm=slice(t+epsilon,n); path3 Sp=slice(t-epsilon,n); path sp=project(Sp,P); path sm=project(Sm,P); real[] t1=tangent(sp,sm,true); real[] t2=tangent(sp,sm,false); transform3 T=transpose(align(axis)); real Longitude(triple v) {return longitude(T*(v-c),warn=false);} real ref=Longitude(point(g,t)); real angle(real t) {return Longitude(point(S,t/P.ninterpolate))-ref;} triple camera=camera(P); void push(real[] T) { if(T.length > 1) { path3 p=rotate(angle(T[0]),c,c+axis)*g; path3 p1=subpath(p,0,t); path3 p2=subpath(p,t,length(p)); if(length(p1) > 0 && (length(p2) == 0 || abs(midpoint(p1)-camera) <= abs(midpoint(p2)-camera))) { s.longitudinal.front.push(p1); s.longitudinal.back.push(p2); } else { s.longitudinal.back.push(p1); s.longitudinal.front.push(p2); } } } push(t1); push(t2); } skeleton skeleton(int m=0, int n=nslice, projection P) { skeleton s; transverse(s,m,n,P); longitudinal(s,n,P); return s; } } surface surface(revolution r, int n=nslice, pen color(int i, real j)=null) { return r.surface(n,color); } // Draw on picture pic the skeleton of the surface of revolution r. // Draw the front portion of each of the m transverse slices with pen p and // the back portion with pen backpen. Rotational arcs are based on // n-point approximations to the unit circle. void draw(picture pic=currentpicture, revolution r, int m=0, int n=nslice, pen frontpen=currentpen, pen backpen=frontpen, pen longitudinalpen=frontpen, pen longitudinalbackpen=backpen, light light=currentlight, string name="", render render=defaultrender, projection P=currentprojection) { if(is3D()) { pen thin=thin(); void drawskeleton(frame f, transform3 t, projection P) { skeleton s=r.skeleton(m,n,inverse(t)*P); if(frontpen != nullpen) { draw(f,t*s.transverse.back,thin+defaultbackpen+backpen,light); draw(f,t*s.transverse.front,thin+frontpen,light); } if(longitudinalpen != nullpen) { draw(f,t*s.longitudinal.back,thin+defaultbackpen+longitudinalbackpen, light); draw(f,t*s.longitudinal.front,thin+longitudinalpen,light); } } bool group=name != "" || render.defaultnames; if(group) begingroup3(pic,name == "" ? "skeleton" : name,render); pic.add(new void(frame f, transform3 t, picture pic, projection P) { drawskeleton(f,t,P); if(pic != null) pic.addBox(min(f,P),max(f,P),min(frontpen),max(frontpen)); }); frame f; drawskeleton(f,identity4,P); pic.addBox(min3(f),max3(f)); if(group) endgroup3(pic); } else { skeleton s=r.skeleton(m,n,P); if(frontpen != nullpen) { draw(pic,s.transverse.back,defaultbackpen+backpen,light); draw(pic,s.transverse.front,frontpen,light); } if(longitudinalpen != nullpen) { draw(pic,s.longitudinal.back,defaultbackpen+longitudinalbackpen, light); draw(pic,s.longitudinal.front,longitudinalpen,light); } } } revolution operator * (transform3 t, revolution r) { triple trc=t*r.c; return revolution(trc,t*r.g,t*(r.c+r.axis)-trc,r.angle1,r.angle2); } // Return a right circular cylinder of height h in the direction of axis // based on a circle centered at c with radius r. revolution cylinder(triple c=O, real r, real h, triple axis=Z) { triple C=c+r*perp(axis); axis=h*unit(axis); return revolution(c,C--C+axis,axis); } // Return a right circular cone of height h in the direction of axis // based on a circle centered at c with radius r. The parameter n // controls the accuracy near the degenerate point at the apex. revolution cone(triple c=O, real r, real h, triple axis=Z, int n=nslice) { axis=unit(axis); return revolution(c,approach(c+r*perp(axis)--c+h*axis,n),axis); } // Return an approximate sphere of radius r centered at c obtained by rotating // an (n+1)-point approximation to a half circle about the Z axis. // Note: unitsphere provides a smoother and more efficient surface. revolution sphere(triple c=O, real r, int n=nslice) { return revolution(c,Arc(c,r,180-sqrtEpsilon,0,sqrtEpsilon,0,Y,n),Z); } ./asymptote-2.41/base/plain_prethree.asy0000644000175000017500000001530613064427076020201 0ustar norbertnorbert// Critical definitions for transform3 needed by projection and picture. pair viewportmargin=(0.1,0.1); // Horizontal and vertical 3D viewport margins. typedef real[][] transform3; restricted transform3 identity4=identity(4); // A uniform 3D scaling. transform3 scale3(real s) { transform3 t=identity(4); t[0][0]=t[1][1]=t[2][2]=s; return t; } // Simultaneous 3D scalings in the x, y, and z directions. transform3 scale(real x, real y, real z) { transform3 t=identity(4); t[0][0]=x; t[1][1]=y; t[2][2]=z; return t; } transform3 shiftless(transform3 t) { transform3 T=copy(t); T[0][3]=T[1][3]=T[2][3]=0; return T; } real camerafactor=2; // Factor used for camera adjustment. struct transformation { transform3 modelview; // For orientation and positioning transform3 projection; // For 3D to 2D projection bool infinity; void operator init(transform3 modelview) { this.modelview=modelview; this.projection=identity4; infinity=true; } void operator init(transform3 modelview, transform3 projection) { this.modelview=modelview; this.projection=projection; infinity=false; } transform3 compute() { return infinity ? modelview : projection*modelview; } transformation copy() { transformation T=new transformation; T.modelview=copy(modelview); T.projection=copy(projection); T.infinity=infinity; return T; } } struct projection { transform3 t; // projection*modelview (cached) bool infinity; bool absolute=false; triple camera; // Position of camera. triple up; // A vector that should be projected to direction (0,1). triple target; // Point where camera is looking at. triple normal; // Normal vector from target to projection plane. pair viewportshift; // Fractional viewport shift. real zoom=1; // Zoom factor. real angle; // Lens angle (for perspective projection). bool showtarget=true; // Expand bounding volume to include target? typedef transformation projector(triple camera, triple up, triple target); projector projector; bool autoadjust=true; // Adjust camera to lie outside bounding volume? bool center=false; // Center target within bounding volume? int ninterpolate; // Used for projecting nurbs to 2D Bezier curves. bool bboxonly=true; // Typeset label bounding box only. transformation T; void calculate() { T=projector(camera,up,target); t=T.compute(); infinity=T.infinity; ninterpolate=infinity ? 1 : 16; } triple vector() { return camera-target; } void operator init(triple camera, triple up=(0,0,1), triple target=(0,0,0), triple normal=camera-target, real zoom=1, real angle=0, pair viewportshift=0, bool showtarget=true, bool autoadjust=true, bool center=false, projector projector) { this.camera=camera; this.up=up; this.target=target; this.normal=normal; this.zoom=zoom; this.angle=angle; this.viewportshift=viewportshift; this.showtarget=showtarget; this.autoadjust=autoadjust; this.center=center; this.projector=projector; calculate(); } projection copy() { projection P=new projection; P.t=t; P.infinity=infinity; P.absolute=absolute; P.camera=camera; P.up=up; P.target=target; P.normal=normal; P.zoom=zoom; P.angle=angle; P.viewportshift=viewportshift; P.showtarget=showtarget; P.autoadjust=autoadjust; P.center=center; P.projector=projector; P.ninterpolate=ninterpolate; P.bboxonly=bboxonly; P.T=T.copy(); return P; } // Return the maximum distance of box(m,M) from target. real distance(triple m, triple M) { triple[] c={m,(m.x,m.y,M.z),(m.x,M.y,m.z),(m.x,M.y,M.z), (M.x,m.y,m.z),(M.x,m.y,M.z),(M.x,M.y,m.z),M}; return max(abs(c-target)); } // This is redefined here to make projection as self-contained as possible. static private real sqrtEpsilon = sqrt(realEpsilon); // Move the camera so that the box(m,M) rotated about target will always // lie in front of the clipping plane. bool adjust(triple m, triple M) { triple v=camera-target; real d=distance(m,M); static real lambda=camerafactor*(1-sqrtEpsilon); if(lambda*d >= abs(v)) { camera=target+camerafactor*d*unit(v); calculate(); return true; } return false; } } projection currentprojection; struct light { real[][] diffuse; real[][] ambient; real[][] specular; pen background=nullpen; // Background color of the 3D canvas. real specularfactor; bool viewport; // Are the lights specified (and fixed) in the viewport frame? triple[] position; // Only directional lights are currently implemented. transform3 T=identity(4); // Transform to apply to normal vectors. bool on() {return position.length > 0;} void operator init(pen[] diffuse, pen[] ambient=array(diffuse.length,black), pen[] specular=diffuse, pen background=nullpen, real specularfactor=1, bool viewport=false, triple[] position) { int n=diffuse.length; assert(ambient.length == n && specular.length == n && position.length == n); this.diffuse=new real[n][]; this.ambient=new real[n][]; this.specular=new real[n][]; this.background=background; this.position=new triple[n]; for(int i=0; i < position.length; ++i) { this.diffuse[i]=rgba(diffuse[i]); this.ambient[i]=rgba(ambient[i]); this.specular[i]=rgba(specular[i]); this.position[i]=unit(position[i]); } this.specularfactor=specularfactor; this.viewport=viewport; } void operator init(pen diffuse=white, pen ambient=black, pen specular=diffuse, pen background=nullpen, real specularfactor=1, bool viewport=false...triple[] position) { int n=position.length; operator init(array(n,diffuse),array(n,ambient),array(n,specular), background,specularfactor,viewport,position); } void operator init(pen diffuse=white, pen ambient=black, pen specular=diffuse, pen background=nullpen, bool viewport=false, real x, real y, real z) { operator init(diffuse,ambient,specular,background,viewport,(x,y,z)); } void operator init(explicit light light) { diffuse=copy(light.diffuse); ambient=copy(light.ambient); specular=copy(light.specular); background=light.background; specularfactor=light.specularfactor; viewport=light.viewport; position=copy(light.position); } real[] background() {return rgba(background == nullpen ? white : background);} } light currentlight; ./asymptote-2.41/base/plain_shipout.asy0000644000175000017500000000654513064427076020063 0ustar norbertnorbert// Default file prefix used for inline LaTeX mode string defaultfilename; string[] file3; string outprefix(string prefix=defaultfilename) { return stripextension(prefix != "" ? prefix : outname()); } string outformat(string format="") { if(format == "") format=settings.outformat; if(format == "") format=nativeformat(); return format; } bool shipped; // Was a picture or frame already shipped out? frame currentpatterns; frame Portrait(frame f) {return f;}; frame Landscape(frame f) {return rotate(90)*f;}; frame UpsideDown(frame f) {return rotate(180)*f;}; frame Seascape(frame f) {return rotate(-90)*f;}; typedef frame orientation(frame); orientation orientation=Portrait; // Forward references to functions defined in module three. object embed3(string, frame, string, string, string, light, projection); string Embed(string name, string text="", string options="", real width=0, real height=0); bool prconly(string format="") { return outformat(format) == "prc"; } bool prc0(string format="") { return settings.prc && (outformat(format) == "pdf" || prconly() || settings.inlineimage ); } bool prc(string format="") { return prc0(format) && Embed != null; } bool is3D(string format="") { return prc(format) || settings.render != 0; } frame enclose(string prefix=defaultfilename, object F, string format="") { if(prc(format)) { frame f; label(f,F.L); return f; } return F.f; } include plain_xasy; void shipout(string prefix=defaultfilename, frame f, string format="", bool wait=false, bool view=true, string options="", string script="", light light=currentlight, projection P=currentprojection) { if(is3D(f)) { f=enclose(prefix,embed3(prefix,f,format,options,script,light,P)); if(settings.render != 0 && !prc(format)) { shipped=true; return; } } if(inXasyMode) { erase(); add(f,group=false); return; } // Applications like LaTeX cannot handle large PostScript coordinates. pair m=min(f); int limit=2000; if(abs(m.x) > limit || abs(m.y) > limit) f=shift(-m)*f; shipout(prefix,f,currentpatterns,format,wait,view, xformStack.empty() ? null : xformStack.pop0); shipped=true; } void shipout(string prefix=defaultfilename, picture pic=currentpicture, orientation orientation=orientation, string format="", bool wait=false, bool view=true, string options="", string script="", light light=currentlight, projection P=currentprojection) { if(!uptodate()) { bool inlinetex=settings.inlinetex; bool prc=prc(format); bool empty3=pic.empty3(); if(prc && !empty3) { if(settings.render == 0) { string image=outprefix(prefix)+"+"+(string) file3.length; if(settings.inlineimage) image += "_0"; settings.inlinetex=false; settings.prc=false; shipout(image,pic,orientation,nativeformat(),view=false,light,P); settings.prc=true; } settings.inlinetex=settings.inlineimage; } frame f=pic.fit(prefix,format,view=view,options,script,light,P); if(!prconly() && (!pic.empty2() || settings.render == 0 || prc || empty3)) shipout(prefix,orientation(f),format,wait,view); settings.inlinetex=inlinetex; } pic.uptodate=true; shipped=true; } void newpage(picture pic=currentpicture) { pic.add(new void(frame f, transform) { newpage(f); },true); } ./asymptote-2.41/base/plain_constants.asy0000644000175000017500000000706213064427076020377 0ustar norbertnorbertrestricted int undefined=(intMax % 2 == 1) ? intMax : intMax-1; restricted real inches=72; restricted real inch=inches; restricted real cm=inches/2.54; restricted real mm=0.1cm; restricted real bp=1; // A PostScript point. restricted real pt=72.0/72.27; // A TeX pt; smaller than a PostScript bp. restricted pair I=(0,1); restricted pair right=(1,0); restricted pair left=(-1,0); restricted pair up=(0,1); restricted pair down=(0,-1); restricted pair E=(1,0); restricted pair N=(0,1); restricted pair W=(-1,0); restricted pair S=(0,-1); restricted pair NE=unit(N+E); restricted pair NW=unit(N+W); restricted pair SW=unit(S+W); restricted pair SE=unit(S+E); restricted pair ENE=unit(E+NE); restricted pair NNE=unit(N+NE); restricted pair NNW=unit(N+NW); restricted pair WNW=unit(W+NW); restricted pair WSW=unit(W+SW); restricted pair SSW=unit(S+SW); restricted pair SSE=unit(S+SE); restricted pair ESE=unit(E+SE); restricted real sqrtEpsilon=sqrt(realEpsilon); restricted pair Align=sqrtEpsilon*NE; restricted int mantissaBits=ceil(-log(realEpsilon)/log(2))+1; int min(... int[] a) {return min(a);} int max(... int[] a) {return max(a);} real min(... real[] a) {return min(a);} real max(... real[] a) {return max(a);} bool finite(real x) { return abs(x) < infinity; } bool finite(pair z) { return abs(z.x) < infinity && abs(z.y) < infinity; } bool finite(triple v) { return abs(v.x) < infinity && abs(v.y) < infinity && abs(v.z) < infinity; } restricted file stdin=input(); restricted file stdout=output(); void none(file file) {} void endl(file file) {write(file,'\n',flush);} void newl(file file) {write(file,'\n');} void DOSendl(file file) {write(file,'\r\n',flush);} void DOSnewl(file file) {write(file,'\r\n');} void tab(file file) {write(file,'\t');} void comma(file file) {write(file,',');} typedef void suffix(file); // Used by interactive write to warn that the outputted type is the resolution // of an overloaded name. void overloadedMessage(file file) { write(file,' '); endl(file); } void write(suffix suffix=endl) {suffix(stdout);} void write(file file, suffix suffix=none) {suffix(file);} path box(pair a, pair b) { return a--(b.x,a.y)--b--(a.x,b.y)--cycle; } restricted path unitsquare=box((0,0),(1,1)); restricted path unitcircle=E..N..W..S..cycle; restricted real circleprecision=0.0006; restricted transform invert=reflect((0,0),(1,0)); restricted pen defaultpen; // A type that takes on one of the values true, false, or default. struct bool3 { bool value; bool set; } void write(file file, string s="", bool3 b, suffix suffix=none) { if(b.set) write(b.value,suffix); else write("default",suffix); } void write(string s="", bool3 b, suffix suffix=endl) { write(stdout,s,b,suffix); } restricted bool3 default; bool operator cast(bool3 b) { return b.set && b.value; } bool3 operator cast(bool b) { bool3 B; B.value=b; B.set=true; return B; } bool operator == (bool3 a, bool3 b) { return a.set == b.set && (!a.set || (a.value == b.value)); } bool operator != (bool3 a, bool3 b) { return a.set != b.set || (a.set && (a.value != b.value)); } bool operator == (bool3 a, bool b) { return a.set && a.value == b; } bool operator != (bool3 a, bool b) { return !a.set || a.value != b; } bool operator == (bool a, bool3 b) { return b.set && b.value == a; } bool operator != (bool a, bool3 b) { return !b.set || b.value != a; } bool[] operator cast(bool3[] b) { return sequence(new bool(int i) {return b[i];},b.length); } bool3[] operator cast(bool[] b) { return sequence(new bool3(int i) {return b[i];},b.length); } ./asymptote-2.41/base/roundedpath.asy0000644000175000017500000000654613064427076017523 0ustar norbertnorbert// a function to round sharp edges of open and cyclic paths // written by stefan knorr path roundedpath(path A, real R, real S = 1) // create rounded path from path A with radius R and scale S = 1 { path RoundPath; // returned path path LocalPath; // local straight subpath path LocalCirc; // local edge circle for intersection real LocalTime; // local intersectiontime between . and .. pair LocalPair; // local point to be added to 'RoundPath' int len=length(A); // length of given path 'A' bool PathClosed=cyclic(A); // true, if given path 'A' is cyclic // initialisation: define first Point of 'RoundPath' as if (PathClosed) // ? is 'A' cyclic RoundPath=scale(S)*point(point(A,0)--point(A,1), 0.5); // centerpoint of first straight subpath of 'A' else RoundPath=scale(S)*point(A,0); // first point of 'A' // doing everything between start and end // create round paths subpath by subpath for every i-th edge for(int i=1; i < len; ++i) { // straight subpath towards i-th edge LocalPath=point(A,i-1)---point(A,i); // circle with radius 'R' around i-th edge LocalCirc=circle(point(A,i),R); // calculate intersection time between straight subpath and circle real[] t=intersect(LocalPath, LocalCirc); if(t.length > 0) { LocalTime=t[0]; // define intersectionpoint between both paths LocalPair=point(subpath(LocalPath, 0, LocalTime), 1); // add straight subpath towards i-th curvature to 'RoundPath' RoundPath=RoundPath--scale(S)*LocalPair; } // straight subpath from i-th edge to (i+1)-th edge LocalPath=point(A,i)---point(A,i+1); // calculate intersection-time between straight subpath and circle real[] t=intersect(LocalPath, LocalCirc); if(t.length > 0) { LocalTime=t[0]; // define intersectionpoint between both paths LocalPair=point(subpath(LocalPath, 0, LocalTime), 1); // add curvature near i-th edge to 'RoundPath' RoundPath=RoundPath..scale(S)*LocalPair; } } // final steps to have a correct termination if(PathClosed) { // Is 'A' cyclic? // straight subpath towards 0-th edge LocalPath=point(A,len-1)---point(A,0); // circle with radius 'R' around 0-th edge LocalCirc=circle(point(A,0),R); // calculate intersection-time between straight subpath and circle real[] t=intersect(LocalPath, LocalCirc); if(t.length > 0) { LocalTime=t[0]; // define intersectionpoint between both paths LocalPair=point(subpath(LocalPath, 0, LocalTime), 1); // add straight subpath towards 0-th curvature to 'RoundPath' RoundPath=RoundPath--scale(S)*LocalPair; } // straight subpath from 0-th edge to 1st edge LocalPath=point(A,0)---point(A,1); // calculate intersection-time between straight subpath and circle real[] t=intersect(LocalPath, LocalCirc); if(t.length > 0) { LocalTime=t[0]; // define intersectionpoint between both paths LocalPair=point(subpath(LocalPath, 0, LocalTime), 1); // add curvature near 0-th edge to 'RoundPath' and close path RoundPath=RoundPath..scale(S)*LocalPair--cycle; } } else RoundPath=RoundPath--scale(S)*point(A,len); return RoundPath; } ./asymptote-2.41/base/size11.asy0000644000175000017500000000113013064427076016302 0ustar norbertnorberttexpreamble("\makeatletter% \renewcommand\normalsize{\@setfontsize\normalsize\@xipt{13.6}}% \renewcommand\small{\@setfontsize\small\@xpt\@xiipt}% \renewcommand\footnotesize{\@setfontsize\footnotesize\@ixpt{11}}% \renewcommand\scriptsize{\@setfontsize\scriptsize\@viiipt{9.5}} \renewcommand\tiny{\@setfontsize\tiny\@vipt\@viipt} \renewcommand\large{\@setfontsize\large\@xiipt{14}} \renewcommand\Large{\@setfontsize\Large\@xivpt{18}} \renewcommand\LARGE{\@setfontsize\LARGE\@xviipt{22}} \renewcommand\huge{\@setfontsize\huge\@xxpt{25}} \renewcommand\Huge{\@setfontsize\Huge\@xxvpt{30}} \makeatother"); ./asymptote-2.41/base/binarytree.asy0000644000175000017500000002633213064427076017345 0ustar norbertnorbert/* ********************************************************************** * binarytree: An Asymptote module to draw binary trees * * * * Copyright(C) 2006 * * Tobias Langner tobias[at]langner[dot]nightlabs[dot]de * * * * Modified by John Bowman * * * * Condensed mode: * * Copyright(C) 2012 * * Gerasimos Dimitriadis dimeg [at] intracom [dot] gr * * * ************************************************************************ * * * This library is free software; you can redistribute it and/or * * modify it under the terms of the GNU Lesser General Public * * License as published by the Free Software Foundation; either * * version 3 of the License, or(at your option) any later version. * * * * This library is distributed in the hope that it will be useful, * * but WITHOUT ANY WARRANTY; without even the implied warranty of * * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * * Lesser General Public License for more details. * * * * You should have received a copy of the GNU Lesser General Public * * License along with this library; if not, write to the * * Free Software Foundation, Inc., * * 51 Franklin St, Fifth Floor, * * Boston, MA 02110-1301 USA * * * * Or get it online: * * http: //www.gnu.org/copyleft/lesser.html * * * ***********************************************************************/ // default values real minDistDefault=0.2cm; real nodeMarginDefault=0.1cm; // structure to represent nodes in a binary tree struct binarytreeNode { int key; binarytreeNode left; binarytreeNode right; binarytreeNode parent; bool spans_calculated=false; int left_span,total_left_span; int right_span,total_right_span; void update_spans(); // Get the horizontal span of the tree consisting of the current // node plus the whole subtree that is rooted at the right child // (condensed mode) int getTotalRightSpan() { if(spans_calculated == false) { update_spans(); } return total_right_span; } // Get the horizontal span of the tree consisting of the current // node plus the whole subtree that is rooted at the left child // (condensed mode) int getTotalLeftSpan() { if(spans_calculated == false) { update_spans(); } return total_left_span; } // Get the horizontal distance between this node and its right child // (condensed mode) int getRightSpan() { if(spans_calculated == false) { update_spans(); } return right_span; } // Get the horizontal distance between this node and its left child // (condensed mode) int getLeftSpan() { if(spans_calculated == false) { update_spans(); } return left_span; } // Update all span figures for this node. // condensed mode) update_spans=new void() { if(spans_calculated == true) return; left_span=0; total_left_span=0; right_span=0; total_right_span=0; if(left != null) { left_span=left.getTotalRightSpan()+1; total_left_span=left_span+left.getTotalLeftSpan(); } if(right != null) { right_span=right.getTotalLeftSpan()+1; total_right_span=right_span+right.getTotalRightSpan(); } spans_calculated=true; }; // set the left child of this node void setLeft(binarytreeNode left) { this.left=left; this.left.parent=this; } // set the right child of this node void setRight(binarytreeNode right) { this.right=right; this.right.parent=this; } // return a boolean indicating whether this node is the root bool isRoot() { return parent == null; } // return the level of the subtree rooted at this node. int getLevel() { if(isRoot()) return 1; else return parent.getLevel()+1; } // set the children of this binarytreeNode void setChildren(binarytreeNode left, binarytreeNode right) { setLeft(left); setRight(right); } // create a new binarytreeNode with key static binarytreeNode binarytreeNode(int key) { binarytreeNode toReturn=new binarytreeNode; toReturn.key=key; return toReturn; } // returns the height of the subtree rooted at this node. int getHeight() { if(left == null && right == null) return 1; if(left == null) return right.getHeight()+1; if(right == null) return left.getHeight()+1; return max(left.getHeight(),right.getHeight())+1; } } binarytreeNode operator init() {return null;} // "constructor" for binarytreeNode binarytreeNode binarytreeNode(int key)=binarytreeNode.binarytreeNode; // draw the tree rooted at the given at the given position , with // =the height of the containing tree, // =the minimal horizontal distance of two nodes at the lowest level, // =the vertical distance between two levels, // =the diameter of one node. object draw(picture pic=currentpicture, binarytreeNode node, pair pos, int height, real minDist, real levelDist, real nodeDiameter, pen p=currentpen, bool condensed=false) { Label label=Label(math((string) node.key),pos); binarytreeNode left=node.left; binarytreeNode right=node.right; // return the distance for two nodes at the given when the // containing tree has height // and the minimal distance between two nodes is . real getDistance(int level, int height, real minDist) { return(nodeDiameter+minDist)*2^(height-level); } // return the horiontal distance between node and its left child // (condensed mode) real getLeftDistance(binarytreeNode n) { return(nodeDiameter+minDist) *(real)n.getLeftSpan() * 0.5; } // return the horiontal distance between node and its right child // (condensed mode) real getRightDistance(binarytreeNode n) { return(nodeDiameter+minDist) *(real)n.getRightSpan() * 0.5; } real dist=getDistance(node.getLevel(),height,minDist)/2; // draw the connection between the two nodes at the given positions // by calculating the connection points and drawing the corresponding // arrow. void deferredDrawNodeConnection(pair parentPos, pair childPos) { pic.add(new void(frame f, transform t) { pair start,end; // calculate connection path transform T=shift(nodeDiameter/2*unit(t*childPos-t*parentPos)); path arr=(T*t*parentPos)--(inverse(T)*t*childPos); draw(f,PenMargin(arr,p).g,p,Arrow(5)); }); pic.addPoint(parentPos); pic.addPoint(childPos); } if(left != null) { pair childPos; if(condensed == false) { childPos=pos-(0,levelDist)-(dist/2,0); } else { childPos=pos-(0,levelDist)-((real)getLeftDistance(node),0); } draw(pic,left,childPos,height,minDist,levelDist,nodeDiameter,p,condensed); deferredDrawNodeConnection(pos,childPos); } if(right != null) { pair childPos; if(condensed == false) { childPos=pos-(0,levelDist)+(dist/2,0); } else { childPos=pos-(0,levelDist)+((real)getRightDistance(node),0); } draw(pic,right,childPos,height,minDist,levelDist,nodeDiameter,p,condensed); deferredDrawNodeConnection(pos,childPos); } picture obj; draw(obj,circle((0,0),nodeDiameter/2),p); label(obj,label,(0,0),p); add(pic,obj,pos); return label; } struct key { int n; bool active; } key key(int n, bool active=true) {key k; k.n=n; k.active=active; return k;} key operator cast(int n) {return key(n);} int operator cast(key k) {return k.n;} int[] operator cast(key[] k) { int[] I; for(int i=0; i < k.length; ++i) I[i]=k[i].n; return I; } key nil=key(0,false); // structure to represent a binary tree. struct binarytree { binarytreeNode root; int[] keys; // add the given to the tree by searching for its place and // inserting it there. void addKey(int key) { binarytreeNode newNode=binarytreeNode(key); if(root == null) { root=newNode; keys.push(key); return; } binarytreeNode n=root; while(n != null) { if(key < n.key) { if(n.left != null) n=n.left; else { n.setLeft(newNode); keys.push(key); return; } } else if(key > n.key) { if(n.right != null) n=n.right; else { n.setRight(newNode); keys.push(key); return; } } } } // return the height of the tree int getHeight() { if(root == null) return 0; else return root.getHeight(); } // add all given keys to the tree sequentially void addSearchKeys(int[] keys) { for(int i=0; i < keys.length; ++i) { int key=keys[i]; // Ignore duplicate keys if(find(this.keys == key) == -1) addKey(key); } } binarytreeNode build(key[] keys, int[] ind) { if(ind[0] >= keys.length) return null; key k=keys[ind[0]]; ++ind[0]; if(!k.active) return null; binarytreeNode bt=binarytreeNode(k); binarytreeNode left=build(keys,ind); binarytreeNode right=build(keys,ind); bt.left=left; bt.right=right; if(left != null) left.parent=bt; if(right != null) right.parent=bt; return bt; } void addKeys(key[] keys) { int[] ind={0}; root=build(keys,ind); this.keys=keys; } // return all key in the tree int[] getKeys() { return keys; } } binarytree searchtree(...int[] keys) { binarytree bt; bt.addSearchKeys(keys); return bt; } binarytree binarytree(...key[] keys) { binarytree bt; bt.addKeys(keys); return bt; } // draw the given binary tree. void draw(picture pic=currentpicture, binarytree tree, real minDist=minDistDefault, real nodeMargin=nodeMarginDefault, pen p=currentpen, bool condensed=false) { int[] keys=tree.getKeys(); // calculate the node diameter so that all keys fit into it frame f; for(int i=0; i < keys.length; ++i) label(f,math(string(keys[i])),p); real nodeDiameter=abs(max(f)-min(f))+2*nodeMargin; real levelDist=nodeDiameter*1.8; draw(pic,tree.root,(0,0),tree.getHeight(),minDist,levelDist,nodeDiameter,p, condensed); } ./asymptote-2.41/base/animation.asy0000644000175000017500000001223713064427076017157 0ustar norbertnorbert/***** * animation.asy * Andy Hammerlindl and John Bowman 2005/11/06 * * Produce GIF, inline PDF, or other animations. *****/ // animation delay is in milliseconds real animationdelay=50; typedef frame enclosure(frame); frame NoBox(frame f) { return f; } enclosure BBox(real xmargin=0, real ymargin=xmargin, pen p=currentpen, filltype filltype=NoFill) { return new frame(frame f) { box(f,xmargin,ymargin,p,filltype,above=false); return f; }; } struct animation { picture[] pictures; string[] files; int index; string prefix; bool global; // If true, use a global scaling for all frames; this requires // extra memory since the actual shipout is deferred until all frames have // been generated. void operator init(string prefix="", bool global=true) { prefix=replace(stripdirectory(outprefix(prefix))," ","_"); this.prefix=prefix; this.global=global; } string basename(string prefix=stripextension(prefix)) { return "_"+prefix; } string name(string prefix, int index) { return stripextension(prefix)+"+"+string(index); } private string nextname() { string name=basename(name(prefix,index)); ++index; return name; } void shipout(string name=nextname(), frame f) { string format=nativeformat(); plain.shipout(name,f,format=format,view=false); files.push(name+"."+format); shipped=false; } void add(picture pic=currentpicture, enclosure enclosure=NoBox) { if(global) { ++index; pictures.push(pic.copy()); } else this.shipout(enclosure(pic.fit())); } void purge(bool keep=settings.keep) { if(!keep) { for(int i=0; i < files.length; ++i) delete(files[i]); } } int merge(int loops=0, real delay=animationdelay, string format="gif", string options="", bool keep=settings.keep) { string args="-loop " +(string) loops+" -delay "+(string)(delay/10)+ " -alpha Off -dispose Background "+options; for(int i=0; i < files.length; ++i) args += " " +files[i]; int rc=convert(args,prefix+"."+format,format=format); this.purge(keep); if(rc == 0) animate(file=prefix+"."+format,format=format); else abort("merge failed"); return rc; } void glmovie(string prefix=prefix, projection P=currentprojection) { if(!view() || settings.render == 0) return; fit(prefix,pictures,view=true,P); } // Export all frames with the same scaling. void export(string prefix=prefix, enclosure enclosure=NoBox, bool multipage=false, bool view=false, projection P=currentprojection) { if(pictures.length == 0) return; if(!global) multipage=false; bool inlinetex=settings.inlinetex; if(multipage) settings.inlinetex=false; frame multi; frame[] fits=fit(prefix,pictures,view=false,P); for(int i=0; i < fits.length; ++i) { string s=name(prefix,i); if(multipage) { add(multi,enclosure(fits[i])); newpage(multi); files.push(s+"."+nativeformat()); } else { if(pictures[i].empty3() || settings.render <= 0) this.shipout(s,enclosure(fits[i])); else // 3D frames files.push(s+"."+nativeformat()); } } if(multipage) { plain.shipout(prefix,multi,view=view); settings.inlinetex=inlinetex; } shipped=true; } string load(int frames, real delay=animationdelay, string options="", bool multipage=false) { if(!global) multipage=false; string s="\animategraphics["+options+"]{"+format("%.18f",1000/delay,"C")+ "}{"+basename(); if(!multipage) s += "+"; s += "}{0}{"+string(frames-1)+"}"; return s; } bool pdflatex() { return latex() && pdf(); } string pdf(enclosure enclosure=NoBox, real delay=animationdelay, string options="", bool keep=settings.keep, bool multipage=true) { settings.twice=true; if(settings.inlinetex) multipage=true; if(!global) multipage=false; if(!pdflatex()) abort("inline pdf animations require -tex pdflatex or -tex xelatex"); if(settings.outformat != "") settings.outformat="pdf"; string filename=basename(); string pdfname=filename+".pdf"; if(global) export(filename,enclosure,multipage=multipage); shipped=false; if(!keep) { exitfcn currentexitfunction=atexit(); void exitfunction() { if(currentexitfunction != null) currentexitfunction(); if(multipage || !settings.inlinetex) this.purge(); if(multipage && !settings.inlinetex) delete(pdfname); } atexit(exitfunction); } if(!multipage) delete(pdfname); return load(index,delay,options,multipage); } int movie(enclosure enclosure=NoBox, int loops=0, real delay=animationdelay, string format=settings.outformat == "" ? "gif" : settings.outformat, string options="", bool keep=settings.keep) { if(global) { if(format == "pdf") { export(enclosure,multipage=true,view=true); return 0; } export(enclosure); } return merge(loops,delay,format,options,keep); } } animation operator init() { animation a=animation(); return a; } ./asymptote-2.41/base/graph_splinetype.asy0000644000175000017500000001637613064427076020565 0ustar norbertnorbertprivate import math; typedef real[] splinetype(real[], real[]); restricted real[] Spline(real[] x, real[] y); restricted splinetype[] Spline; string morepoints="interpolation requires at least 2 points"; string differentlengths="arrays have different lengths"; void checklengths(int x, int y, string text=differentlengths) { if(x != y) abort(text+": "+string(x)+" != "+string(y)); } void checkincreasing(real[] x) { if(!increasing(x,true)) abort("strictly increasing array expected"); } // Linear interpolation real[] linear(real[] x, real[] y) { int n=x.length; checklengths(n,y.length); real[] d=new real[n]; for(int i=0; i < n-1; ++i) d[i]=(y[i+1]-y[i])/(x[i+1]-x[i]); d[n-1]=d[n-2]; return d; } // Standard cubic spline interpolation with not-a-knot condition: // s'''(x_2^-)=s'''(x_2^+) et s'''(x_(n_2)^-)=s'''(x_(n-2)^+) // if n=2, linear interpolation is returned // if n=3, an interpolation polynomial of degree <= 2 is returned: // p(x_1)=y_1, p(x_2)=y_2, p(x_3)=y_3 real[] notaknot(real[] x, real[] y) { int n=x.length; checklengths(n,y.length); checkincreasing(x); real[] d; if(n > 3) { real[] a=new real[n]; real[] b=new real[n]; real[] c=new real[n]; real[] g=new real[n]; b[0]=x[2]-x[1]; c[0]=x[2]-x[0]; a[0]=0; g[0]=((x[1]-x[0])^2*(y[2]-y[1])/b[0]+b[0]*(2*b[0]+3*(x[1]-x[0]))* (y[1]-y[0])/(x[1]-x[0]))/c[0]; for(int i=1; i < n-1; ++i) { a[i]=x[i+1]-x[i]; c[i]=x[i]-x[i-1]; b[i]=2*(a[i]+c[i]); g[i]=3*(c[i]*(y[i+1]-y[i])/a[i]+a[i]*(y[i]-y[i-1])/c[i]); } c[n-1]=0; b[n-1]=x[n-2]-x[n-3]; a[n-1]=x[n-1]-x[n-3]; g[n-1]=((x[n-1]-x[n-2])^2*(y[n-2]-y[n-3])/b[n-1]+ b[n-1]*(2*b[n-1]+3(x[n-1]-x[n-2]))* (y[n-1]-y[n-2])/(x[n-1]-x[n-2]))/a[n-1]; d=tridiagonal(a,b,c,g); } else if(n == 2) { real val=(y[1]-y[0])/(x[1]-x[0]); d=new real[] {val,val}; } else if(n == 3) { real a=(y[1]-y[0])/(x[1]-x[0]); real b=(y[2]-y[1])/(x[2]-x[1]); real c=(b-a)/(x[2]-x[0]); d=new real[] {a+c*(x[0]-x[1]),a+c*(x[1]-x[0]),a+c*(2*x[2]-x[0]-x[1])}; } else abort(morepoints); return d; } // Standard cubic spline interpolation with periodic condition // s'(a)=s'(b), s''(a)=s''(b), assuming that f(a)=f(b) // if n=2, linear interpolation is returned real[] periodic(real[] x, real[] y) { int n=x.length; checklengths(n,y.length); checkincreasing(x); if(abs(y[n-1]-y[0]) > sqrtEpsilon*norm(y)) abort("function values are not periodic"); real[] d; if(n > 2) { real[] a=new real[n-1]; real[] b=new real[n-1]; real[] c=new real[n-1]; real[] g=new real[n-1]; c[0]=x[n-1]-x[n-2]; a[0]=x[1]-x[0]; b[0]=2*(a[0]+c[0]); g[0]=3*c[0]*(y[1]-y[0])/a[0]+3*a[0]*(y[n-1]-y[n-2])/c[0]; for(int i=1; i < n-1; ++i) { a[i]=x[i+1]-x[i]; c[i]=x[i]-x[i-1]; b[i]=2*(a[i]+c[i]); g[i]=3*(c[i]*(y[i+1]-y[i])/a[i]+a[i]*(y[i]-y[i-1])/c[i]); } d=tridiagonal(a,b,c,g); d.push(d[0]); } else if(n == 2) { d=new real[] {0,0}; } else abort(morepoints); return d; } // Standard cubic spline interpolation with the natural condition // s''(a)=s''(b)=0. // if n=2, linear interpolation is returned // Don't use the natural type unless the underlying function // has zero second end points derivatives. real[] natural(real[] x, real[] y) { int n=x.length; checklengths(n,y.length); checkincreasing(x); real[] d; if(n > 2) { real[] a=new real[n]; real[] b=new real[n]; real[] c=new real[n]; real[] g=new real[n]; b[0]=2*(x[1]-x[0]); c[0]=x[1]-x[0]; a[0]=0; g[0]=3*(y[1]-y[0]); for(int i=1; i < n-1; ++i) { a[i]=x[i+1]-x[i]; c[i]=x[i]-x[i-1]; b[i]=2*(a[i]+c[i]); g[i]=3*(c[i]*(y[i+1]-y[i])/a[i]+a[i]*(y[i]-y[i-1])/c[i]); } c[n-1]=0; a[n-1]=x[n-1]-x[n-2]; b[n-1]=2*a[n-1]; g[n-1]=3*(y[n-1]-y[n-2]); d=tridiagonal(a,b,c,g); } else if(n == 2) { real val=(y[1]-y[0])/(x[1]-x[0]); d=new real[] {val,val}; } else abort(morepoints); return d; } // Standard cubic spline interpolation with clamped conditions f'(a), f'(b) splinetype clamped(real slopea, real slopeb) { return new real[] (real[] x, real[] y) { int n=x.length; checklengths(n,y.length); checkincreasing(x); real[] d; if(n > 2) { real[] a=new real[n]; real[] b=new real[n]; real[] c=new real[n]; real[] g=new real[n]; b[0]=x[1]-x[0]; g[0]=b[0]*slopea; c[0]=0; a[0]=0; for(int i=1; i < n-1; ++i) { a[i]=x[i+1]-x[i]; c[i]=x[i]-x[i-1]; b[i]=2*(a[i]+c[i]); g[i]=3*(c[i]*(y[i+1]-y[i])/a[i]+a[i]*(y[i]-y[i-1])/c[i]); } c[n-1]=0; a[n-1]=0; b[n-1]=x[n-1]-x[n-2]; g[n-1]=b[n-1]*slopeb; d=tridiagonal(a,b,c,g); } else if(n == 2) { d=new real[] {slopea,slopeb}; } else abort(morepoints); return d; }; } // Piecewise Cubic Hermite Interpolating Polynomial (PCHIP) // Modified MATLAB code // [1] Fritsch, F. N. and R. E. Carlson, // "Monotone Piecewise Cubic Interpolation," // SIAM J. Numerical Analysis, Vol. 17, 1980, pp.238-246. // [2] Kahaner, David, Cleve Moler, Stephen Nash, // Numerical Methods and Software, Prentice Hall, 1988. real[] monotonic(real[] x, real[] y) { int n=x.length; checklengths(n,y.length); checkincreasing(x); real[] d=new real[n]; if(n > 2) { real[] h=new real[n-1]; real[] del=new real[n-1]; for(int i=0; i < n-1; ++i) { h[i]=x[i+1]-x[i]; del[i]=(y[i+1]-y[i])/h[i]; } int j=0; int k[]=new int[]; for(int i=0; i < n-2; ++i) if((sgn(del[i])*sgn(del[i+1])) > 0) {k[j]=i; j=j+1;} real[] hs=new real[j]; for(int i=0; i < j; ++i) hs[i]=h[k[i]]+h[k[i]+1]; real w1[]=new real[j]; real w2[]=new real[j]; real dmax[]=new real[j]; real dmin[]=new real[j]; for(int i=0; i < j; ++i) { w1[i]=(h[k[i]]+hs[i])/(3*hs[i]); w2[i]=(h[k[i]+1]+hs[i])/(3*hs[i]); dmax[i]=max(abs(del[k[i]]),abs(del[k[i]+1])); dmin[i]=min(abs(del[k[i]]),abs(del[k[i]+1])); } for(int i=0; i < n; ++i) d[i]=0; for(int i=0; i < j; ++i) d[k[i]+1]=dmin[i]/(w1[i]*(del[k[i]]/dmax[i])+w2[i]*(del[k[i]+1]/dmax[i])); d[0]=((2*h[0]+h[1])*del[0]-h[0]*del[1])/(h[0]+h[1]); if(sgn(d[0]) != sgn(del[0])) {d[0]=0;} else if((sgn(del[0]) != sgn(del[1])) && (abs(d[0]) > abs(3*del[0]))) d[0]=3*del[0]; d[n-1]=((2*h[n-2]+h[n-3])*del[n-2]-h[n-2]*del[n-2])/(h[n-2]+h[n-3]); if(sgn(d[n-1]) != sgn(del[n-2])) {d[n-1]=0;} else if((sgn(del[n-2]) != sgn(del[n-3])) && (abs(d[n-1]) > abs(3*del[n-2]))) d[n-1]=3*del[n-2]; } else if(n == 2) { d[0]=d[1]=(y[1]-y[0])/(x[1]-x[0]); } else abort(morepoints); return d; } // Return standard cubic spline interpolation as a guide guide hermite(real[] x, real[] y, splinetype splinetype=null) { int n=x.length; if(n == 0) return nullpath; guide g=(x[0],y[0]); if(n == 1) return g; if(n == 2) return g--(x[1],y[1]); if(splinetype == null) splinetype=(x[0] == x[x.length-1] && y[0] == y[y.length-1]) ? periodic : notaknot; real[] dy=splinetype(x,y); for(int i=1; i < n; ++i) { pair z=(x[i],y[i]); real dx=x[i]-x[i-1]; g=g..controls((x[i-1],y[i-1])+dx*(1,dy[i-1])/3) and (z-dx*(1,dy[i])/3)..z; } return g; } ./asymptote-2.41/base/animate.asy0000644000175000017500000000005213064427076016606 0ustar norbertnorbertusepackage("animate"); import animation; ./asymptote-2.41/base/fontsize.asy0000644000175000017500000000004313064427076017031 0ustar norbertnorbertif(latex()) usepackage("type1cm"); ./asymptote-2.41/base/three_margins.asy0000644000175000017500000000531413064427076020025 0ustar norbertnorbertstruct marginT3 { path3 g; real begin,end; }; typedef marginT3 margin3(path3, pen); path3 trim(path3 g, real begin, real end) { real a=arctime(g,begin); real b=arctime(g,arclength(g)-end); return a <= b ? subpath(g,a,b) : point(g,a); } margin3 operator +(margin3 ma, margin3 mb) { return new marginT3(path3 g, pen p) { marginT3 margin; real ba=ma(g,p).begin < 0 ? 0 : ma(g,p).begin; real bb=mb(g,p).begin < 0 ? 0 : mb(g,p).begin; real ea=ma(g,p).end < 0 ? 0 : ma(g,p).end; real eb=mb(g,p).end < 0 ? 0 : mb(g,p).end; margin.begin=ba+bb; margin.end=ea+eb; margin.g=trim(g,margin.begin,margin.end); return margin; }; } margin3 NoMargin3() { return new marginT3(path3 g, pen) { marginT3 margin; margin.begin=margin.end=0; margin.g=g; return margin; }; } margin3 Margin3(real begin, real end) { return new marginT3(path3 g, pen p) { marginT3 margin; real factor=labelmargin(p); real w=0.5*linewidth(p); margin.begin=begin*factor-w; margin.end=end*factor-w; margin.g=trim(g,margin.begin,margin.end); return margin; }; } margin3 PenMargin3(real begin, real end) { return new marginT3(path3 g, pen p) { marginT3 margin; real factor=linewidth(p); margin.begin=begin*factor; margin.end=end*factor; margin.g=trim(g,margin.begin,margin.end); return margin; }; } margin3 DotMargin3(real begin, real end) { return new marginT3(path3 g, pen p) { marginT3 margin; real margindot(real x) {return x > 0 ? dotfactor*x : x;} real factor=linewidth(p); margin.begin=margindot(begin)*factor; margin.end=margindot(end)*factor; margin.g=trim(g,margin.begin,margin.end); return margin; }; } margin3 TrueMargin3(real begin, real end) { return new marginT3(path3 g, pen p) { marginT3 margin; margin.begin=begin; margin.end=end; margin.g=trim(g,begin,end); return margin; }; } margin3 NoMargin3=NoMargin3(), BeginMargin3=Margin3(1,0), Margin3=Margin3(0,1), EndMargin3=Margin3, Margins3=Margin3(1,1), BeginPenMargin3=PenMargin3(0.5,-0.5), BeginPenMargin2=PenMargin3(1.0,-0.5), PenMargin3=PenMargin3(-0.5,0.5), PenMargin2=PenMargin3(-0.5,1.0), EndPenMargin3=PenMargin3, EndPenMargin2=PenMargin2, PenMargins3=PenMargin3(0.5,0.5), PenMargins2=PenMargin3(1.0,1.0), BeginDotMargin3=DotMargin3(0.5,-0.5), DotMargin3=DotMargin3(-0.5,0.5), EndDotMargin3=DotMargin3, DotMargins3=DotMargin3(0.5,0.5); ./asymptote-2.41/base/CAD.asy0000644000175000017500000002511613064427076015567 0ustar norbertnorbertstruct sCAD { int nLineGroup = 0; // 0-3 pen // A pA, pVisibleEdge, // Sichtbare Kanten pVisibleContour, // Sichtbarer Umriss pUsableWindingLength, // Nitzbare Gewindelänge pSystemLine, // Systemlinie (Stahlbau) pDiagramCurve, // Kurve in Diagrammen pSurfaceStructure, // Oberflächenstrukturen // B pB, pLightEdge, // Lichtkante pMeasureLine, // Maßlinie pMeasureHelpLine, // Maßhilfslinie pMeasureLineBound, // Maßlinienbegrenzung pReferenceLine, // Hinweislinie pHatch, // Schraffur pWindingGround, // Gewindegrund pDiagonalCross, // Diagonalkreuz pBendLine, // Biegelinie pProjectionLine, // Projektionslinie pGrid, // Rasterlinien // C pC, pFreehand, // Begrenzung abgebrochener oder unterbrochener // Schnitte, wenn die Begrenzung // keine Mittellinie ist // E pE, pSurfaceTreatmentAllowed, // Bereich zulässiger Oberflächenbehandlung // F pF, pInvisibleEdge, // unsichtbare Kante pInvisibleContour, // unsichtbarer Umriss // G pG, pMiddleLine, // Mittellinie pSymmetryLine, // Symmetrielinie pPartialCircle, // Teilkreis pCircularHole, // Lochkreis pDivisionPlane, // Teilungsebene pTransferLine, // Trajektorien (Übertragunslinien) // J pJ, pCuttingPlane, // Schnittebene pSurfaceTreatmentRequested, // Bereich geforderter Behandlungen // K pK, pContourBeforeDeformation, // Umrisse vor Verformung pAdjacentPartContour, // Umrisse angrenzender Teile pEndShapeRawMaterial, // Fertigformen in Rohteilen pContourEligibleType, // Umrisse wahlweiser Ausführungen pPartInFrontOfCuttingPlane; // Teile vor der Schnittebene static sCAD Create(int nLineGroup = 1) { sCAD cad = new sCAD; if ( nLineGroup < 0 ) nLineGroup = 0; if ( nLineGroup > 3 ) nLineGroup = 3; cad.nLineGroup = nLineGroup; restricted real[] dblFullWidth = {0.35mm, 0.5mm, 0.7mm, 1.0mm}; restricted real[] dblHalfWidth = {0.18mm, 0.25mm, 0.35mm, 0.5mm}; pen pFullWidth = linewidth(dblFullWidth[nLineGroup]); pen pHalfWidth = linewidth(dblHalfWidth[nLineGroup]); // Linienarten: // A cad.pA = cad.pVisibleEdge = cad.pVisibleContour = cad.pUsableWindingLength = cad.pSystemLine = cad.pDiagramCurve = cad.pSurfaceStructure = pFullWidth + solid; // B cad.pB = cad.pLightEdge = cad.pMeasureLine = cad.pMeasureHelpLine = cad.pMeasureLineBound = cad.pReferenceLine = cad.pHatch = cad.pWindingGround = cad.pDiagonalCross = cad.pBendLine = cad.pProjectionLine = cad.pGrid = pHalfWidth + solid; // C cad.pC = cad.pFreehand = pHalfWidth + solid; // D // Missing, as I have no idea how to implement this... // E cad.pE = cad.pSurfaceTreatmentAllowed = pFullWidth + linetype(new real[] {10,2.5}); // F cad.pF = cad.pInvisibleEdge = cad.pInvisibleContour = pHalfWidth + linetype(new real[] {20,5}); // G cad.pG = cad.pMiddleLine = cad.pSymmetryLine = cad.pPartialCircle = cad.pCircularHole = cad.pDivisionPlane = cad.pTransferLine = pHalfWidth + linetype(new real[] {40,5,5,5}); // H // see J // I // This letter is not used in DIN 15 // J cad.pJ = cad.pCuttingPlane = cad.pSurfaceTreatmentRequested = pFullWidth + linetype(new real[] {20,2.5,2.5,2.5}); // K cad.pK = cad.pContourBeforeDeformation = cad.pAdjacentPartContour = cad.pEndShapeRawMaterial = cad.pContourEligibleType = cad.pPartInFrontOfCuttingPlane = pHalfWidth + linetype(new real[] {40,5,5,5,5,5}); return cad; } // end of Create real GetMeasurementBoundSize(bool bSmallBound = false) { if ( bSmallBound ) return 1.5 * linewidth(pVisibleEdge) / 2; else return 5 * linewidth(pVisibleEdge); } path GetMeasurementBound(bool bSmallBound = false) { if ( bSmallBound ) return scale(GetMeasurementBoundSize(bSmallBound = bSmallBound)) * unitcircle; else return (0,0) -- (-cos(radians(7.5)), -sin(radians(7.5))) * GetMeasurementBoundSize(bSmallBound = bSmallBound) -- (-cos(radians(7.5)), sin(radians(7.5))) * GetMeasurementBoundSize(bSmallBound = bSmallBound) -- cycle; } void MeasureLine(picture pic = currentpicture, Label L, pair pFrom, pair pTo, real dblLeft = 0, real dblRight = 0, real dblRelPosition = 0.5, bool bSmallBound = false) { if ( dblLeft < 0 ) dblLeft = 0; if ( dblRight < 0 ) dblRight = 0; if ( (dblLeft > 0) && (dblRight == 0) ) dblRight = dblLeft; if ( (dblLeft == 0) && (dblRight > 0) ) dblLeft = dblRight; pair pDiff = pTo - pFrom; real dblLength = length(pDiff); pair pBegin = pFrom - dblLeft * unit(pDiff); pair pEnd = pTo + dblRight * unit(pDiff); if ( bSmallBound ) { draw( pic = pic, g = pBegin--pEnd, p = pMeasureLine); } else { real dblBoundSize = GetMeasurementBoundSize(bSmallBound = bSmallBound); if ( dblLeft == 0 ) draw( pic = pic, g = (pFrom + dblBoundSize/2 * unit(pDiff)) -- (pTo - dblBoundSize/2 * unit(pDiff)), p = pMeasureLine); else draw( pic = pic, g = pBegin -- (pFrom - dblBoundSize/2 * unit(pDiff)) ^^ pFrom -- pTo ^^ (pTo + dblBoundSize/2 * unit(pDiff)) -- pEnd, p = pMeasureLine); } path gArrow = GetMeasurementBound(bSmallBound = bSmallBound); picture picL; label(picL, L); pair pLabelSize = 1.2 * (max(picL) - min(picL)); if ( dblLeft == 0 ) { fill( pic = pic, g = shift(pFrom) * rotate(degrees(-pDiff)) * gArrow, p = pVisibleEdge); fill( pic = pic, g = shift(pTo) * rotate(degrees(pDiff)) * gArrow, p = pVisibleEdge); if ( dblRelPosition < 0 ) dblRelPosition = 0; if ( dblRelPosition > 1 ) dblRelPosition = 1; label( pic = pic, L = rotate(degrees(pDiff)) * L, position = pFrom + dblRelPosition * pDiff + unit(rotate(90)*pDiff) * pLabelSize.y / 2); } else { fill( pic = pic, g = shift(pFrom) * rotate(degrees(pDiff)) * gArrow, p = pVisibleEdge); fill( pic = pic, g = shift(pTo) * rotate(degrees(-pDiff)) * gArrow, p = pVisibleEdge); if ( (dblRelPosition >= 0) && (dblRelPosition <= 1) ) label( pic = pic, L = rotate(degrees(pDiff)) * L, position = pFrom + dblRelPosition * pDiff + unit(rotate(90)*pDiff) * pLabelSize.y / 2); else { // draw label outside if ( dblRelPosition < 0 ) label( pic = pic, L = rotate(degrees(pDiff)) * L, position = pBegin + pLabelSize.x / 2 * unit(pDiff) + unit(rotate(90)*pDiff) * pLabelSize.y / 2); else // dblRelPosition > 1 label( pic = pic, L = rotate(degrees(pDiff)) * L, position = pEnd - pLabelSize.x / 2 * unit(pDiff) + unit(rotate(90)*pDiff) * pLabelSize.y / 2); } } } // end of MeasureLine void MeasureParallel(picture pic = currentpicture, Label L, pair pFrom, pair pTo, real dblDistance, // Variables from MeasureLine real dblLeft = 0, real dblRight = 0, real dblRelPosition = 0.5, bool bSmallBound = false) { pair pDiff = pTo - pFrom; pair pPerpendicularDiff = unit(rotate(90) * pDiff); real dblDistancePlus; if ( dblDistance >= 0 ) dblDistancePlus = dblDistance + 1mm; else dblDistancePlus = dblDistance - 1mm; draw( pic = pic, g = pFrom--(pFrom + dblDistancePlus*pPerpendicularDiff), p = pMeasureHelpLine ); draw( pic = pic, g = pTo--(pTo + dblDistancePlus*pPerpendicularDiff), p = pMeasureHelpLine ); MeasureLine( pic = pic, L = L, pFrom = pFrom + dblDistance * pPerpendicularDiff, pTo = pTo + dblDistance * pPerpendicularDiff, dblLeft = dblLeft, dblRight = dblRight, dblRelPosition = dblRelPosition, bSmallBound = bSmallBound); } // end of MeasureParallel path MakeFreehand(pair pFrom, pair pTo, real dblRelDivisionLength = 12.5, real dblRelDistortion = 2.5, bool bIncludeTo = true) { pair pDiff = pTo - pFrom; pair pPerpendicular = dblRelDistortion * linewidth(pFreehand) * unit(rotate(90) * pDiff); int nNumOfSubDivisions=ceil(length(pDiff) / (dblRelDivisionLength * linewidth(pFreehand))); restricted real[] dblDistortion = {1, -.5, .75, -.25, .25, -1, .5, -.75, .25, -.25}; int nDistortion = 0; guide g; g = pFrom; for ( int i = 1 ; i < nNumOfSubDivisions ; ++i ) { g = g .. (pFrom + pDiff * i / (real)nNumOfSubDivisions + pPerpendicular * dblDistortion[nDistortion]); nDistortion += 1; if ( nDistortion > 9 ) nDistortion = 0; } if ( bIncludeTo ) g = g .. pTo; return g; } // end of MakeFreehand } // end of CAD ./asymptote-2.41/base/plain_picture.asy0000644000175000017500000013234513064427076020041 0ustar norbertnorbert// Pre picture <<<1 import plain_scaling; import plain_bounds; include plain_prethree; // This variable is required by asymptote.sty. pair viewportsize=0; // Horizontal and vertical viewport limits. restricted bool Aspect=true; restricted bool IgnoreAspect=false; struct coords3 { coord[] x,y,z; void erase() { x.delete(); y.delete(); z.delete(); } // Only a shallow copy of the individual elements of x and y // is needed since, once entered, they are never modified. coords3 copy() { coords3 c=new coords3; c.x=copy(x); c.y=copy(y); c.z=copy(z); return c; } void append(coords3 c) { x.append(c.x); y.append(c.y); z.append(c.z); } void push(triple user, triple truesize) { x.push(coord.build(user.x,truesize.x)); y.push(coord.build(user.y,truesize.y)); z.push(coord.build(user.z,truesize.z)); } void push(coord cx, coord cy, coord cz) { x.push(cx); y.push(cy); z.push(cz); } void push(transform3 t, coords3 c1, coords3 c2, coords3 c3) { for(int i=0; i < c1.x.length; ++i) { coord cx=c1.x[i], cy=c2.y[i], cz=c3.z[i]; triple tinf=shiftless(t)*(0,0,0); triple z=t*(cx.user,cy.user,cz.user); triple w=(cx.truesize,cy.truesize,cz.truesize); w=length(w)*unit(shiftless(t)*w); coord Cx,Cy,Cz; Cx.user=z.x; Cy.user=z.y; Cz.user=z.z; Cx.truesize=w.x; Cy.truesize=w.y; Cz.truesize=w.z; push(Cx,Cy,Cz); } } } // scaleT and Legend <<< typedef real scalefcn(real x); struct scaleT { scalefcn T,Tinv; bool logarithmic; bool automin,automax; void operator init(scalefcn T, scalefcn Tinv, bool logarithmic=false, bool automin=false, bool automax=false) { this.T=T; this.Tinv=Tinv; this.logarithmic=logarithmic; this.automin=automin; this.automax=automax; } scaleT copy() { scaleT dest=scaleT(T,Tinv,logarithmic,automin,automax); return dest; } }; scaleT operator init() { scaleT S=scaleT(identity,identity); return S; } typedef void boundRoutine(); struct autoscaleT { scaleT scale; scaleT postscale; real tickMin=-infinity, tickMax=infinity; boundRoutine[] bound; // Optional routines to recompute the bounding box. bool automin=false, automax=false; bool automin() {return automin && scale.automin;} bool automax() {return automax && scale.automax;} real T(real x) {return postscale.T(scale.T(x));} scalefcn T() {return scale.logarithmic ? postscale.T : T;} real Tinv(real x) {return scale.Tinv(postscale.Tinv(x));} autoscaleT copy() { autoscaleT dest=new autoscaleT; dest.scale=scale.copy(); dest.postscale=postscale.copy(); dest.tickMin=tickMin; dest.tickMax=tickMax; dest.bound=copy(bound); dest.automin=(bool) automin; dest.automax=(bool) automax; return dest; } } struct ScaleT { bool set; autoscaleT x; autoscaleT y; autoscaleT z; ScaleT copy() { ScaleT dest=new ScaleT; dest.set=set; dest.x=x.copy(); dest.y=y.copy(); dest.z=z.copy(); return dest; } }; struct Legend { string label; pen plabel; pen p; frame mark; bool above; void operator init(string label, pen plabel=currentpen, pen p=nullpen, frame mark=newframe, bool above=true) { this.label=label; this.plabel=plabel; this.p=(p == nullpen) ? plabel : p; this.mark=mark; this.above=above; } } // >>> // Frame Alignment was here triple min3(pen p) { return linewidth(p)*(-0.5,-0.5,-0.5); } triple max3(pen p) { return linewidth(p)*(0.5,0.5,0.5); } // A function that draws an object to frame pic, given that the transform // from user coordinates to true-size coordinates is t. typedef void drawer(frame f, transform t); // A generalization of drawer that includes the final frame's bounds. // TODO: Add documentation as to what T is. typedef void drawerBound(frame f, transform t, transform T, pair lb, pair rt); // PairOrTriple <<<1 // This struct is used to represent a userMin/userMax which serves as both a // pair and a triple depending on the context. struct pairOrTriple { real x,y,z; void init() { x = y = z = 0; } }; void copyPairOrTriple(pairOrTriple dest, pairOrTriple src) { dest.x = src.x; dest.y = src.y; dest.z = src.z; } pair operator cast (pairOrTriple a) { return (a.x, a.y); }; triple operator cast (pairOrTriple a) { return (a.x, a.y, a.z); } void write(pairOrTriple a) { write((triple) a); } struct picture { // <<<1 // Nodes <<<2 // Three-dimensional version of drawer and drawerBound: typedef void drawer3(frame f, transform3 t, picture pic, projection P); typedef void drawerBound3(frame f, transform3 t, transform3 T, picture pic, projection P, triple lb, triple rt); // The functions to do the deferred drawing. drawerBound[] nodes; drawerBound3[] nodes3; bool uptodate=true; struct bounds3 { coords3 point,min,max; bool exact=true; // An accurate picture bounds is provided by the user. void erase() { point.erase(); min.erase(); max.erase(); } bounds3 copy() { bounds3 b=new bounds3; b.point=point.copy(); b.min=min.copy(); b.max=max.copy(); b.exact=exact; return b; } } bounds bounds; bounds3 bounds3; // Other Fields <<<2 // Transform to be applied to this picture. transform T; transform3 T3; // The internal representation of the 3D user bounds. private pairOrTriple umin, umax; private bool usetx, usety, usetz; ScaleT scale; // Needed by graph Legend[] legend; pair[] clipmax; // Used by beginclip/endclip pair[] clipmin; // The maximum sizes in the x, y, and z directions; zero means no restriction. real xsize=0, ysize=0; real xsize3=0, ysize3=0, zsize3=0; // Fixed unitsizes in the x y, and z directions; zero means use // xsize, ysize, and zsize. real xunitsize=0, yunitsize=0, zunitsize=0; // If true, the x and y directions must be scaled by the same amount. bool keepAspect=true; // A fixed scaling transform. bool fixed; transform fixedscaling; // Init and erase <<<2 void init() { umin.init(); umax.init(); usetx=usety=usetz=false; T3=identity(4); } init(); // Erase the current picture, retaining any size specification. void erase() { nodes.delete(); nodes3.delete(); bounds.erase(); bounds3.erase(); T=identity(); scale=new ScaleT; legend.delete(); init(); } // Empty <<<2 bool empty2() { return nodes.length == 0; } bool empty3() { return nodes3.length == 0; } bool empty() { return empty2() && empty3(); } // User min/max <<<2 pair userMin2() {return bounds.userMin(); } pair userMax2() {return bounds.userMax(); } bool userSetx2() { return bounds.userBoundsAreSet(); } bool userSety2() { return bounds.userBoundsAreSet(); } triple userMin3() { return umin; } triple userMax3() { return umax; } bool userSetx3() { return usetx; } bool userSety3() { return usety; } bool userSetz3() { return usetz; } private typedef real binop(real, real); // Helper functions for finding the minimum/maximum of two data, one of // which may not be defined. private static real merge(real x1, bool set1, real x2, bool set2, binop m) { return set1 ? (set2 ? m(x1,x2) : x1) : x2; } private pairOrTriple userExtreme(pair u2(), triple u3(), binop m) { bool setx2 = userSetx2(); bool sety2 = userSety2(); bool setx3 = userSetx3(); bool sety3 = userSety3(); pair p; if (setx2 || sety2) p = u2(); triple t = u3(); pairOrTriple r; r.x = merge(p.x, setx2, t.x, setx3, m); r.y = merge(p.y, sety2, t.y, sety3, m); r.z = t.z; return r; } // The combination of 2D and 3D data. pairOrTriple userMin() { return userExtreme(userMin2, userMin3, min); } pairOrTriple userMax() { return userExtreme(userMax2, userMax3, max); } bool userSetx() { return userSetx2() || userSetx3(); } bool userSety() { return userSety2() || userSety3(); } bool userSetz() = userSetz3; // Functions for setting the user bounds. void userMinx3(real x) { umin.x=x; usetx=true; } void userMiny3(real y) { umin.y=y; usety=true; } void userMinz3(real z) { umin.z=z; usetz=true; } void userMaxx3(real x) { umax.x=x; usetx=true; } void userMaxy3(real y) { umax.y=y; usety=true; } void userMaxz3(real z) { umax.z=z; usetz=true; } void userMinx2(real x) { bounds.alterUserBound("minx", x); } void userMinx(real x) { userMinx2(x); userMinx3(x); } void userMiny2(real y) { bounds.alterUserBound("miny", y); } void userMiny(real y) { userMiny2(y); userMiny3(y); } void userMaxx2(real x) { bounds.alterUserBound("maxx", x); } void userMaxx(real x) { userMaxx2(x); userMaxx3(x); } void userMaxy2(real y) { bounds.alterUserBound("maxy", y); } void userMaxy(real y) { userMaxy2(y); userMaxy3(y); } void userMinz(real z) = userMinz3; void userMaxz(real z) = userMaxz3; void userCorners3(triple c000, triple c001, triple c010, triple c011, triple c100, triple c101, triple c110, triple c111) { umin.x = min(c000.x,c001.x,c010.x,c011.x,c100.x,c101.x,c110.x,c111.x); umin.y = min(c000.y,c001.y,c010.y,c011.y,c100.y,c101.y,c110.y,c111.y); umin.z = min(c000.z,c001.z,c010.z,c011.z,c100.z,c101.z,c110.z,c111.z); umax.x = max(c000.x,c001.x,c010.x,c011.x,c100.x,c101.x,c110.x,c111.x); umax.y = max(c000.y,c001.y,c010.y,c011.y,c100.y,c101.y,c110.y,c111.y); umax.z = max(c000.z,c001.z,c010.z,c011.z,c100.z,c101.z,c110.z,c111.z); } // Cache the current user-space bounding box x coodinates void userBoxX3(real min, real max, binop m=min, binop M=max) { if (usetx) { umin.x=m(umin.x,min); umax.x=M(umax.x,max); } else { umin.x=min; umax.x=max; usetx=true; } } // Cache the current user-space bounding box y coodinates void userBoxY3(real min, real max, binop m=min, binop M=max) { if (usety) { umin.y=m(umin.y,min); umax.y=M(umax.y,max); } else { umin.y=min; umax.y=max; usety=true; } } // Cache the current user-space bounding box z coodinates void userBoxZ3(real min, real max, binop m=min, binop M=max) { if (usetz) { umin.z=m(umin.z,min); umax.z=M(umax.z,max); } else { umin.z=min; umax.z=max; usetz=true; } } // Cache the current user-space bounding box void userBox3(triple min, triple max) { userBoxX3(min.x,max.x); userBoxY3(min.y,max.y); userBoxZ3(min.z,max.z); } // Add drawer <<<2 void add(drawerBound d, bool exact=false, bool above=true) { uptodate=false; if(!exact) bounds.exact=false; if(above) nodes.push(d); else nodes.insert(0,d); } // Faster implementation of most common case. void addExactAbove(drawerBound d) { uptodate=false; nodes.push(d); } void add(drawer d, bool exact=false, bool above=true) { add(new void(frame f, transform t, transform T, pair, pair) { d(f,t*T); },exact,above); } void add(drawerBound3 d, bool exact=false, bool above=true) { uptodate=false; if(!exact) bounds.exact=false; if(above) nodes3.push(d); else nodes3.insert(0,d); } void add(drawer3 d, bool exact=false, bool above=true) { add(new void(frame f, transform3 t, transform3 T, picture pic, projection P, triple, triple) { d(f,t*T,pic,P); },exact,above); } // Clip <<<2 void clip(pair min, pair max, drawer d, bool exact=false) { bounds.clip(min, max); this.add(d,exact); } void clip(pair min, pair max, drawerBound d, bool exact=false) { bounds.clip(min, max); this.add(d,exact); } // Add sizing <<<2 // Add a point to the sizing. void addPoint(pair user, pair truesize=0) { bounds.addPoint(user,truesize); //userBox(user,user); } // Add a point to the sizing, accounting also for the size of the pen. void addPoint(pair user, pair truesize=0, pen p) { addPoint(user,truesize+min(p)); addPoint(user,truesize+max(p)); } void addPoint(triple user, triple truesize=(0,0,0)) { bounds3.point.push(user,truesize); userBox3(user,user); } void addPoint(triple user, triple truesize=(0,0,0), pen p) { addPoint(user,truesize+min3(p)); addPoint(user,truesize+max3(p)); } // Add a box to the sizing. void addBox(pair userMin, pair userMax, pair trueMin=0, pair trueMax=0) { bounds.addBox(userMin, userMax, trueMin, trueMax); } void addBox(triple userMin, triple userMax, triple trueMin=(0,0,0), triple trueMax=(0,0,0)) { bounds3.min.push(userMin,trueMin); bounds3.max.push(userMax,trueMax); userBox3(userMin,userMax); } // For speed reason, we unravel the addPath routines from bounds. This // avoids an extra function call. from bounds unravel addPath; // Size commands <<<2 void size(real x, real y=x, bool keepAspect=this.keepAspect) { if(!empty()) uptodate=false; xsize=x; ysize=y; this.keepAspect=keepAspect; } void size3(real x, real y=x, real z=y, bool keepAspect=this.keepAspect) { if(!empty3()) uptodate=false; xsize3=x; ysize3=y; zsize3=z; this.keepAspect=keepAspect; } void unitsize(real x, real y=x, real z=y) { uptodate=false; xunitsize=x; yunitsize=y; zunitsize=z; } // min/max of picture <<<2 // Calculate the min for the final frame, given the coordinate transform. pair min(transform t) { return bounds.min(t); } // Calculate the max for the final frame, given the coordinate transform. pair max(transform t) { return bounds.max(t); } // Calculate the min for the final frame, given the coordinate transform. triple min(transform3 t) { if(bounds3.min.x.length == 0 && bounds3.point.x.length == 0 && bounds3.max.x.length == 0) return (0,0,0); triple a=t*(1,1,1)-t*(0,0,0), b=t*(0,0,0); scaling xs=scaling.build(a.x,b.x); scaling ys=scaling.build(a.y,b.y); scaling zs=scaling.build(a.z,b.z); return (min(min(min(infinity,xs,bounds3.point.x),xs,bounds3.min.x), xs,bounds3.max.x), min(min(min(infinity,ys,bounds3.point.y),ys,bounds3.min.y), ys,bounds3.max.y), min(min(min(infinity,zs,bounds3.point.z),zs,bounds3.min.z), zs,bounds3.max.z)); } // Calculate the max for the final frame, given the coordinate transform. triple max(transform3 t) { if(bounds3.min.x.length == 0 && bounds3.point.x.length == 0 && bounds3.max.x.length == 0) return (0,0,0); triple a=t*(1,1,1)-t*(0,0,0), b=t*(0,0,0); scaling xs=scaling.build(a.x,b.x); scaling ys=scaling.build(a.y,b.y); scaling zs=scaling.build(a.z,b.z); return (max(max(max(-infinity,xs,bounds3.point.x),xs,bounds3.min.x), xs,bounds3.max.x), max(max(max(-infinity,ys,bounds3.point.y),ys,bounds3.min.y), ys,bounds3.max.y), max(max(max(-infinity,zs,bounds3.point.z),zs,bounds3.min.z), zs,bounds3.max.z)); } void append(coords3 point, coords3 min, coords3 max, transform3 t, bounds3 bounds) { // Add the coord info to this picture. if(t == identity4) { point.append(bounds.point); min.append(bounds.min); max.append(bounds.max); } else { point.push(t,bounds.point,bounds.point,bounds.point); // Add in all 8 corner points, to properly size cuboid pictures. point.push(t,bounds.min,bounds.min,bounds.min); point.push(t,bounds.min,bounds.min,bounds.max); point.push(t,bounds.min,bounds.max,bounds.min); point.push(t,bounds.min,bounds.max,bounds.max); point.push(t,bounds.max,bounds.min,bounds.min); point.push(t,bounds.max,bounds.min,bounds.max); point.push(t,bounds.max,bounds.max,bounds.min); point.push(t,bounds.max,bounds.max,bounds.max); } } // Scaling and Fit <<<2 // Returns the transform for turning user-space pairs into true-space pairs. transform scaling(real xsize, real ysize, bool keepAspect=true, bool warn=true) { bounds b = (T == identity()) ? this.bounds : T * this.bounds; return b.scaling(xsize, ysize, xunitsize, yunitsize, keepAspect, warn); } transform scaling(bool warn=true) { return scaling(xsize,ysize,keepAspect,warn); } // Returns the transform for turning user-space pairs into true-space triples. transform3 scaling(real xsize, real ysize, real zsize, bool keepAspect=true, bool warn=true) { if(xsize == 0 && xunitsize == 0 && ysize == 0 && yunitsize == 0 && zsize == 0 && zunitsize == 0) return identity(4); coords3 Coords; append(Coords,Coords,Coords,T3,bounds3); real sx; if(xunitsize == 0) { if(xsize != 0) sx=calculateScaling("x",Coords.x,xsize,warn); } else sx=xunitsize; real sy; if(yunitsize == 0) { if(ysize != 0) sy=calculateScaling("y",Coords.y,ysize,warn); } else sy=yunitsize; real sz; if(zunitsize == 0) { if(zsize != 0) sz=calculateScaling("z",Coords.z,zsize,warn); } else sz=zunitsize; if(sx == 0) { sx=max(sy,sz); if(sx == 0) return identity(4); } if(sy == 0) sy=max(sz,sx); if(sz == 0) sz=max(sx,sy); if(keepAspect && (xunitsize == 0 || yunitsize == 0 || zunitsize == 0)) return scale3(min(sx,sy,sz)); else return scale(sx,sy,sz); } transform3 scaling3(bool warn=true) { return scaling(xsize3,ysize3,zsize3,keepAspect,warn); } frame fit(transform t, transform T0=T, pair m, pair M) { frame f; int n = nodes.length; for(int i=0; i < n; ++i) nodes[i](f,t,T0,m,M); return f; } frame fit3(transform3 t, transform3 T0=T3, picture pic, projection P, triple m, triple M) { frame f; for(int i=0; i < nodes3.length; ++i) nodes3[i](f,t,T0,pic,P,m,M); return f; } // Returns a rigid version of the picture using t to transform user coords // into truesize coords. frame fit(transform t) { return fit(t,min(t),max(t)); } frame fit3(transform3 t, picture pic, projection P) { return fit3(t,pic,P,min(t),max(t)); } // Add drawer wrappers <<<2 void add(void d(picture, transform), bool exact=false) { add(new void(frame f, transform t) { picture opic=new picture; d(opic,t); add(f,opic.fit(identity())); },exact); } void add(void d(picture, transform3), bool exact=false, bool above=true) { add(new void(frame f, transform3 t, picture pic2, projection P) { picture opic=new picture; d(opic,t); add(f,opic.fit3(identity4,pic2,P)); },exact,above); } void add(void d(picture, transform3, transform3, triple, triple), bool exact=false, bool above=true) { add(new void(frame f, transform3 t, transform3 T, picture pic2, projection P, triple lb, triple rt) { picture opic=new picture; d(opic,t,T,lb,rt); add(f,opic.fit3(identity4,pic2,P)); },exact,above); } // More scaling <<<2 frame scaled() { frame f=fit(fixedscaling); pair d=size(f); static real epsilon=100*realEpsilon; if(d.x > xsize*(1+epsilon)) warning("xlimit","frame exceeds xlimit: "+(string) d.x+" > "+ (string) xsize); if(d.y > ysize*(1+epsilon)) warning("ylimit","frame exceeds ylimit: "+(string) d.y+" > "+ (string) ysize); return f; } // Calculate additional scaling required if only an approximate picture // size estimate is available. transform scale(frame f, real xsize=this.xsize, real ysize=this.ysize, bool keepaspect=this.keepAspect) { if(bounds.exact) return identity(); pair m=min(f); pair M=max(f); real width=M.x-m.x; real height=M.y-m.y; real xgrow=xsize == 0 || width == 0 ? 1 : xsize/width; real ygrow=ysize == 0 || height == 0 ? 1 : ysize/height; if(keepAspect) { real[] grow; if(xsize > 0) grow.push(xgrow); if(ysize > 0) grow.push(ygrow); return scale(grow.length == 0 ? 1 : min(grow)); } else return scale(xgrow,ygrow); } // Calculate additional scaling required if only an approximate picture // size estimate is available. transform3 scale3(frame f, real xsize3=this.xsize3, real ysize3=this.ysize3, real zsize3=this.zsize3, bool keepaspect=this.keepAspect) { if(bounds3.exact) return identity(4); triple m=min3(f); triple M=max3(f); real width=M.x-m.x; real height=M.y-m.y; real depth=M.z-m.z; real xgrow=xsize3 == 0 || width == 0 ? 1 : xsize3/width; real ygrow=ysize3 == 0 || height == 0 ? 1 : ysize3/height; real zgrow=zsize3 == 0 || depth == 0 ? 1 : zsize3/depth; if(keepAspect) { real[] grow; if(xsize3 > 0) grow.push(xgrow); if(ysize3 > 0) grow.push(ygrow); if(zsize3 > 0) grow.push(zgrow); return scale3(grow.length == 0 ? 1 : min(grow)); } else return scale(xgrow,ygrow,zgrow); } // calculateTransform with scaling <<<2 // Return the transform that would be used to fit the picture to a frame transform calculateTransform(real xsize, real ysize, bool keepAspect=true, bool warn=true) { transform t=scaling(xsize,ysize,keepAspect,warn); return scale(fit(t),xsize,ysize,keepAspect)*t; } transform calculateTransform(bool warn=true) { if(fixed) return fixedscaling; return calculateTransform(xsize,ysize,keepAspect,warn); } transform3 calculateTransform3(real xsize=xsize3, real ysize=ysize3, real zsize=zsize3, bool keepAspect=true, bool warn=true, projection P=currentprojection) { transform3 t=scaling(xsize,ysize,zsize,keepAspect,warn); return scale3(fit3(t,null,P),keepAspect)*t; } // min/max with xsize and ysize <<<2 // NOTE: These are probably very slow as implemented. pair min(real xsize=this.xsize, real ysize=this.ysize, bool keepAspect=this.keepAspect, bool warn=true) { return min(calculateTransform(xsize,ysize,keepAspect,warn)); } pair max(real xsize=this.xsize, real ysize=this.ysize, bool keepAspect=this.keepAspect, bool warn=true) { return max(calculateTransform(xsize,ysize,keepAspect,warn)); } triple min3(real xsize=this.xsize3, real ysize=this.ysize3, real zsize=this.zsize3, bool keepAspect=this.keepAspect, bool warn=true, projection P) { return min(calculateTransform3(xsize,ysize,zsize,keepAspect,warn,P)); } triple max3(real xsize=this.xsize3, real ysize=this.ysize3, real zsize=this.zsize3, bool keepAspect=this.keepAspect, bool warn=true, projection P) { return max(calculateTransform3(xsize,ysize,zsize,keepAspect,warn,P)); } // More Fitting <<<2 // Returns the 2D picture fit to the requested size. frame fit2(real xsize=this.xsize, real ysize=this.ysize, bool keepAspect=this.keepAspect) { if(fixed) return scaled(); if(empty2()) return newframe; transform t=scaling(xsize,ysize,keepAspect); frame f=fit(t); transform s=scale(f,xsize,ysize,keepAspect); if(s == identity()) return f; return fit(s*t); } static frame fitter(string,picture,string,real,real,bool,bool,string,string, light,projection); frame fit(string prefix="", string format="", real xsize=this.xsize, real ysize=this.ysize, bool keepAspect=this.keepAspect, bool view=false, string options="", string script="", light light=currentlight, projection P=currentprojection) { return fitter == null ? fit2(xsize,ysize,keepAspect) : fitter(prefix,this,format,xsize,ysize,keepAspect,view,options,script, light,P); } // Fit a 3D picture. frame fit3(projection P=currentprojection) { if(settings.render == 0) return fit(P); if(fixed) return scaled(); if(empty3()) return newframe; transform3 t=scaling(xsize3,ysize3,zsize3,keepAspect); frame f=fit3(t,null,P); transform3 s=scale3(f,xsize3,ysize3,zsize3,keepAspect); if(s == identity4) return f; return fit3(s*t,null,P); } // In case only an approximate picture size estimate is available, return the // fitted frame slightly scaled (including labels and true size distances) // so that it precisely meets the given size specification. frame scale(real xsize=this.xsize, real ysize=this.ysize, bool keepAspect=this.keepAspect) { frame f=fit(xsize,ysize,keepAspect); transform s=scale(f,xsize,ysize,keepAspect); if(s == identity()) return f; return s*f; } // Copying <<<2 // Copies enough information to yield the same userMin/userMax. void userCopy2(picture pic) { userMinx2(pic.userMin2().x); userMiny2(pic.userMin2().y); userMaxx2(pic.userMax2().x); userMaxy2(pic.userMax2().y); } void userCopy3(picture pic) { copyPairOrTriple(umin, pic.umin); copyPairOrTriple(umax, pic.umax); usetx=pic.usetx; usety=pic.usety; usetz=pic.usetz; } void userCopy(picture pic) { userCopy2(pic); userCopy3(pic); } // Copies the drawing information, but not the sizing information into a new // picture. Fitting this picture will not scale as the original picture would. picture drawcopy() { picture dest=new picture; dest.nodes = copy(nodes); dest.nodes3=copy(nodes3); dest.T=T; dest.T3=T3; // TODO: User bounds are sizing info, which probably shouldn't be part of // a draw copy. Should we move this down to copy()? dest.userCopy3(this); dest.scale=scale.copy(); dest.legend=copy(legend); return dest; } // A deep copy of this picture. Modifying the copied picture will not affect // the original. picture copy() { picture dest=drawcopy(); dest.uptodate=uptodate; dest.bounds=bounds.copy(); dest.bounds3=bounds3.copy(); dest.xsize=xsize; dest.ysize=ysize; dest.xsize3=xsize; dest.ysize3=ysize3; dest.zsize3=zsize3; dest.keepAspect=keepAspect; dest.xunitsize=xunitsize; dest.yunitsize=yunitsize; dest.zunitsize=zunitsize; dest.fixed=fixed; dest.fixedscaling=fixedscaling; return dest; } // Helper function for defining transformed pictures. Do not call it // directly. picture transformed(transform t) { picture dest=drawcopy(); // Replace nodes with a single drawer that realizes the transform. drawerBound[] oldnodes = dest.nodes; void drawAll(frame f, transform tt, transform T, pair lb, pair rt) { transform Tt = T*t; for (var node : oldnodes) node(f, tt, Tt, lb, rt); } dest.nodes = new drawerBound[] { drawAll }; dest.uptodate=uptodate; dest.bounds=bounds.transformed(t); dest.bounds3=bounds3.copy(); dest.bounds.exact=false; dest.xsize=xsize; dest.ysize=ysize; dest.xsize3=xsize; dest.ysize3=ysize3; dest.zsize3=zsize3; dest.keepAspect=keepAspect; dest.xunitsize=xunitsize; dest.yunitsize=yunitsize; dest.zunitsize=zunitsize; dest.fixed=fixed; dest.fixedscaling=fixedscaling; return dest; } // Add Picture <<<2 // Add a picture to this picture, such that the user coordinates will be // scaled identically when fitted void add(picture src, bool group=true, filltype filltype=NoFill, bool above=true) { // Copy the picture. Only the drawing function closures are needed, so we // only copy them. This needs to be a deep copy, as src could later have // objects added to it that should not be included in this picture. if(src == this) abort("cannot add picture to itself"); uptodate=false; picture srcCopy=src.drawcopy(); // Draw by drawing the copied picture. if(srcCopy.nodes.length > 0) nodes.push(new void(frame f, transform t, transform T, pair m, pair M) { add(f,srcCopy.fit(t,T*srcCopy.T,m,M),group,filltype,above); }); if(srcCopy.nodes3.length > 0) { nodes3.push(new void(frame f, transform3 t, transform3 T3, picture pic, projection P, triple m, triple M) { add(f,srcCopy.fit3(t,T3*srcCopy.T3,pic,P,m,M),group,above); }); } legend.append(src.legend); if(src.usetx) userBoxX3(src.umin.x,src.umax.x); if(src.usety) userBoxY3(src.umin.y,src.umax.y); if(src.usetz) userBoxZ3(src.umin.z,src.umax.z); bounds.append(srcCopy.T, src.bounds); //append(bounds.point,bounds.min,bounds.max,srcCopy.T,src.bounds); append(bounds3.point,bounds3.min,bounds3.max,srcCopy.T3,src.bounds3); //if(!src.bounds.exact) bounds.exact=false; if(!src.bounds3.exact) bounds3.exact=false; } } // Post Struct <<<1 picture operator * (transform t, picture orig) { return orig.transformed(t); } picture operator * (transform3 t, picture orig) { picture pic=orig.copy(); pic.T3=t*pic.T3; triple umin=pic.userMin3(), umax=pic.userMax3(); pic.userCorners3(t*umin, t*(umin.x,umin.y,umax.z), t*(umin.x,umax.y,umin.z), t*(umin.x,umax.y,umax.z), t*(umax.x,umin.y,umin.z), t*(umax.x,umin.y,umax.z), t*(umax.x,umax.y,umin.z), t*umax); pic.bounds3.exact=false; return pic; } picture currentpicture; void size(picture pic=currentpicture, real x, real y=x, bool keepAspect=pic.keepAspect) { pic.size(x,y,keepAspect); } void size3(picture pic=currentpicture, real x, real y=x, real z=y, bool keepAspect=pic.keepAspect) { pic.size3(x,y,z,keepAspect); } void unitsize(picture pic=currentpicture, real x, real y=x, real z=y) { pic.unitsize(x,y,z); } void size(picture pic=currentpicture, real xsize, real ysize, pair min, pair max) { pair size=max-min; pic.unitsize(size.x != 0 ? xsize/size.x : 0, size.y != 0 ? ysize/size.y : 0); } void size(picture dest, picture src) { dest.size(src.xsize,src.ysize,src.keepAspect); dest.size3(src.xsize3,src.ysize3,src.zsize3,src.keepAspect); dest.unitsize(src.xunitsize,src.yunitsize,src.zunitsize); } pair min(picture pic, bool user=false) { transform t=pic.calculateTransform(); pair z=pic.min(t); return user ? inverse(t)*z : z; } pair max(picture pic, bool user=false) { transform t=pic.calculateTransform(); pair z=pic.max(t); return user ? inverse(t)*z : z; } pair size(picture pic, bool user=false) { transform t=pic.calculateTransform(); pair M=pic.max(t); pair m=pic.min(t); if(!user) return M-m; t=inverse(t); return t*M-t*m; } // Frame Alignment <<< pair rectify(pair dir) { real scale=max(abs(dir.x),abs(dir.y)); if(scale != 0) dir *= 0.5/scale; dir += (0.5,0.5); return dir; } pair point(frame f, pair dir) { pair m=min(f); pair M=max(f); return m+realmult(rectify(dir),M-m); } path[] align(path[] g, transform t=identity(), pair position, pair align, pen p=currentpen) { if(g.length == 0) return g; pair m=min(g); pair M=max(g); pair dir=rectify(inverse(t)*-align); if(basealign(p) == 1) dir -= (0,m.y/(M.y-m.y)); pair a=m+realmult(dir,M-m); return shift(position+align*labelmargin(p))*t*shift(-a)*g; } // Returns a transform for aligning frame f in the direction align transform shift(frame f, pair align) { return shift(align-point(f,-align)); } // Returns a copy of frame f aligned in the direction align frame align(frame f, pair align) { return shift(f,align)*f; } // >>> pair point(picture pic=currentpicture, pair dir, bool user=true) { pair umin = pic.userMin2(); pair umax = pic.userMax2(); pair z=umin+realmult(rectify(dir),umax-umin); return user ? z : pic.calculateTransform()*z; } pair truepoint(picture pic=currentpicture, pair dir, bool user=true) { transform t=pic.calculateTransform(); pair m=pic.min(t); pair M=pic.max(t); pair z=m+realmult(rectify(dir),M-m); return user ? inverse(t)*z : z; } // Transform coordinate in [0,1]x[0,1] to current user coordinates. pair relative(picture pic=currentpicture, pair z) { return pic.userMin2()+realmult(z,pic.userMax2()-pic.userMin2()); } void add(picture pic=currentpicture, drawer d, bool exact=false) { pic.add(d,exact); } typedef void drawer3(frame f, transform3 t, picture pic, projection P); void add(picture pic=currentpicture, drawer3 d, bool exact=false) { pic.add(d,exact); } void add(picture pic=currentpicture, void d(picture,transform), bool exact=false) { pic.add(d,exact); } void add(picture pic=currentpicture, void d(picture,transform3), bool exact=false) { pic.add(d,exact); } void begingroup(picture pic=currentpicture) { pic.add(new void(frame f, transform) { begingroup(f); },true); } void endgroup(picture pic=currentpicture) { pic.add(new void(frame f, transform) { endgroup(f); },true); } void Draw(picture pic=currentpicture, path g, pen p=currentpen) { pic.add(new void(frame f, transform t) { draw(f,t*g,p); },true); pic.addPath(g,p); } // Default arguments have been removed to increase speed. void _draw(picture pic, path g, pen p, margin margin) { if (size(nib(p)) == 0 && margin==NoMargin) { // Inline the drawerBound wrapper for speed. pic.addExactAbove(new void(frame f, transform t, transform T, pair, pair) { _draw(f,t*T*g,p); }); } else { pic.add(new void(frame f, transform t) { draw(f,margin(t*g,p).g,p); },true); } pic.addPath(g,p); } void Draw(picture pic=currentpicture, explicit path[] g, pen p=currentpen) { // Could optimize this by adding one drawer. for(int i=0; i < g.length; ++i) Draw(pic,g[i],p); } void fill(picture pic=currentpicture, path[] g, pen p=currentpen, bool copy=true) { if(copy) g=copy(g); pic.add(new void(frame f, transform t) { fill(f,t*g,p,false); },true); pic.addPath(g); } void drawstrokepath(picture pic=currentpicture, path g, pen strokepen, pen p=currentpen) { pic.add(new void(frame f, transform t) { draw(f,strokepath(t*g,strokepen),p); },true); pic.addPath(g,p); } void latticeshade(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, pen[][] p, bool copy=true) { if(copy) { g=copy(g); p=copy(p); } pic.add(new void(frame f, transform t) { latticeshade(f,t*g,stroke,fillrule,p,t,false); },true); pic.addPath(g); } void axialshade(picture pic=currentpicture, path[] g, bool stroke=false, pen pena, pair a, bool extenda=true, pen penb, pair b, bool extendb=true, bool copy=true) { if(copy) g=copy(g); pic.add(new void(frame f, transform t) { axialshade(f,t*g,stroke,pena,t*a,extenda,penb,t*b,extendb,false); },true); pic.addPath(g); } void radialshade(picture pic=currentpicture, path[] g, bool stroke=false, pen pena, pair a, real ra, bool extenda=true, pen penb, pair b, real rb, bool extendb=true, bool copy=true) { if(copy) g=copy(g); pic.add(new void(frame f, transform t) { pair A=t*a, B=t*b; real RA=abs(t*(a+ra)-A); real RB=abs(t*(b+rb)-B); radialshade(f,t*g,stroke,pena,A,RA,extenda,penb,B,RB,extendb,false); },true); pic.addPath(g); } void gouraudshade(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, pen[] p, pair[] z, int[] edges, bool copy=true) { if(copy) { g=copy(g); p=copy(p); z=copy(z); edges=copy(edges); } pic.add(new void(frame f, transform t) { gouraudshade(f,t*g,stroke,fillrule,p,t*z,edges,false); },true); pic.addPath(g); } void gouraudshade(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, pen[] p, int[] edges, bool copy=true) { if(copy) { g=copy(g); p=copy(p); edges=copy(edges); } pic.add(new void(frame f, transform t) { gouraudshade(f,t*g,stroke,fillrule,p,edges,false); },true); pic.addPath(g); } void tensorshade(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, pen[][] p, path[] b=g, pair[][] z=new pair[][], bool copy=true) { if(copy) { g=copy(g); p=copy(p); b=copy(b); z=copy(z); } pic.add(new void(frame f, transform t) { pair[][] Z=new pair[z.length][]; for(int i=0; i < z.length; ++i) Z[i]=t*z[i]; tensorshade(f,t*g,stroke,fillrule,p,t*b,Z,false); },true); pic.addPath(g); } void tensorshade(frame f, path[] g, bool stroke=false, pen fillrule=currentpen, pen[] p, path b=g.length > 0 ? g[0] : nullpath) { tensorshade(f,g,stroke,fillrule,new pen[][] {p},b); } void tensorshade(frame f, path[] g, bool stroke=false, pen fillrule=currentpen, pen[] p, path b=g.length > 0 ? g[0] : nullpath, pair[] z) { tensorshade(f,g,stroke,fillrule,new pen[][] {p},b,new pair[][] {z}); } void tensorshade(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, pen[] p, path b=g.length > 0 ? g[0] : nullpath) { tensorshade(pic,g,stroke,fillrule,new pen[][] {p},b); } void tensorshade(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, pen[] p, path b=g.length > 0 ? g[0] : nullpath, pair[] z) { tensorshade(pic,g,stroke,fillrule,new pen[][] {p},b,new pair[][] {z}); } // Smoothly shade the regions between consecutive paths of a sequence using a // given array of pens: void draw(picture pic=currentpicture, path[] g, pen fillrule=currentpen, pen[] p) { path[] G; pen[][] P; string differentlengths="arrays have different lengths"; if(g.length != p.length) abort(differentlengths); for(int i=0; i < g.length-1; ++i) { path g0=g[i]; path g1=g[i+1]; if(length(g0) != length(g1)) abort(differentlengths); for(int j=0; j < length(g0); ++j) { G.push(subpath(g0,j,j+1)--reverse(subpath(g1,j,j+1))--cycle); P.push(new pen[] {p[i],p[i],p[i+1],p[i+1]}); } } tensorshade(pic,G,fillrule,P); } void functionshade(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, string shader, bool copy=true) { if(copy) g=copy(g); pic.add(new void(frame f, transform t) { functionshade(f,t*g,stroke,fillrule,shader); },true); pic.addPath(g); } void filldraw(picture pic=currentpicture, path[] g, pen fillpen=currentpen, pen drawpen=currentpen) { begingroup(pic); fill(pic,g,fillpen); Draw(pic,g,drawpen); endgroup(pic); } void clip(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, bool copy=true) { if(copy) g=copy(g); //pic.userClip(min(g),max(g)); pic.clip(min(g), max(g), new void(frame f, transform t) { clip(f,t*g,stroke,fillrule,false); }, true); } void beginclip(picture pic=currentpicture, path[] g, bool stroke=false, pen fillrule=currentpen, bool copy=true) { if(copy) g=copy(g); pic.clipmin.push(min(g)); pic.clipmax.push(max(g)); pic.add(new void(frame f, transform t) { beginclip(f,t*g,stroke,fillrule,false); },true); } void endclip(picture pic=currentpicture) { pair min,max; if (pic.clipmin.length > 0 && pic.clipmax.length > 0) { min = pic.clipmin.pop(); max = pic.clipmax.pop(); } else { // We should probably abort here, since the PostScript output will be // garbage. warning("endclip", "endclip without beginclip"); min = pic.userMin2(); max = pic.userMax2(); } pic.clip(min, max, new void(frame f, transform) { endclip(f); }, true); } void unfill(picture pic=currentpicture, path[] g, bool copy=true) { if(copy) g=copy(g); pic.add(new void(frame f, transform t) { unfill(f,t*g,false); },true); } void filloutside(picture pic=currentpicture, path[] g, pen p=currentpen, bool copy=true) { if(copy) g=copy(g); pic.add(new void(frame f, transform t) { filloutside(f,t*g,p,false); },true); pic.addPath(g); } // Use a fixed scaling to map user coordinates in box(min,max) to the // desired picture size. transform fixedscaling(picture pic=currentpicture, pair min, pair max, pen p=nullpen, bool warn=false) { Draw(pic,min,p+invisible); Draw(pic,max,p+invisible); pic.fixed=true; return pic.fixedscaling=pic.calculateTransform(pic.xsize,pic.ysize, pic.keepAspect); } // Add frame src to frame dest about position with optional grouping. void add(frame dest, frame src, pair position, bool group=false, filltype filltype=NoFill, bool above=true) { add(dest,shift(position)*src,group,filltype,above); } // Add frame src to picture dest about position with optional grouping. void add(picture dest=currentpicture, frame src, pair position=0, bool group=true, filltype filltype=NoFill, bool above=true) { if(is3D(src)) { dest.add(new void(frame f, transform3, picture, projection) { add(f,src); // always add about 3D origin (ignore position) },true); dest.addBox((0,0,0),(0,0,0),min3(src),max3(src)); } else { dest.add(new void(frame f, transform t) { add(f,shift(t*position)*src,group,filltype,above); },true); dest.addBox(position,position,min(src),max(src)); } } // Like add(picture,frame,pair) but extend picture to accommodate frame. void attach(picture dest=currentpicture, frame src, pair position=0, bool group=true, filltype filltype=NoFill, bool above=true) { transform t=dest.calculateTransform(); add(dest,src,position,group,filltype,above); pair s=size(dest.fit(t)); size(dest,dest.xsize != 0 ? s.x : 0,dest.ysize != 0 ? s.y : 0); } // Like add(picture,frame,pair) but align frame in direction align. void add(picture dest=currentpicture, frame src, pair position, pair align, bool group=true, filltype filltype=NoFill, bool above=true) { add(dest,align(src,align),position,group,filltype,above); } // Like add(frame,frame,pair) but align frame in direction align. void add(frame dest, frame src, pair position, pair align, bool group=true, filltype filltype=NoFill, bool above=true) { add(dest,align(src,align),position,group,filltype,above); } // Like add(picture,frame,pair,pair) but extend picture to accommodate frame; void attach(picture dest=currentpicture, frame src, pair position, pair align, bool group=true, filltype filltype=NoFill, bool above=true) { attach(dest,align(src,align),position,group,filltype,above); } // Add a picture to another such that user coordinates in both will be scaled // identically in the shipout. void add(picture dest, picture src, bool group=true, filltype filltype=NoFill, bool above=true) { dest.add(src,group,filltype,above); } void add(picture src, bool group=true, filltype filltype=NoFill, bool above=true) { currentpicture.add(src,group,filltype,above); } // Fit the picture src using the identity transformation (so user // coordinates and truesize coordinates agree) and add it about the point // position to picture dest. void add(picture dest, picture src, pair position, bool group=true, filltype filltype=NoFill, bool above=true) { add(dest,src.fit(identity()),position,group,filltype,above); } void add(picture src, pair position, bool group=true, filltype filltype=NoFill, bool above=true) { add(currentpicture,src,position,group,filltype,above); } // Fill a region about the user-coordinate 'origin'. void fill(pair origin, picture pic=currentpicture, path[] g, pen p=currentpen) { picture opic; fill(opic,g,p); add(pic,opic,origin); } void postscript(picture pic=currentpicture, string s) { pic.add(new void(frame f, transform) { postscript(f,s); },true); } void postscript(picture pic=currentpicture, string s, pair min, pair max) { pic.add(new void(frame f, transform t) { postscript(f,s,t*min,t*max); },true); } void tex(picture pic=currentpicture, string s) { // Force TeX string s to be evaluated immediately (in case it is a macro). frame g; tex(g,s); size(g); pic.add(new void(frame f, transform) { tex(f,s); },true); } void tex(picture pic=currentpicture, string s, pair min, pair max) { frame g; tex(g,s); size(g); pic.add(new void(frame f, transform t) { tex(f,s,t*min,t*max); },true); } void layer(picture pic=currentpicture) { pic.add(new void(frame f, transform) { layer(f); },true); } void erase(picture pic=currentpicture) { pic.uptodate=false; pic.erase(); } void begin(picture pic=currentpicture, string name, string id="", bool visible=true) { if(!latex() || !pdf()) return; settings.twice=true; if(id == "") id=string(++ocgindex); tex(pic,"\begin{ocg}{"+name+"}{"+id+"}{"+(visible ? "1" : "0")+"}"); layer(pic); } void end(picture pic=currentpicture) { if(!latex() || !pdf()) return; tex(pic,"\end{ocg}"); layer(pic); } // For users of the LaTeX babel package. void deactivatequote(picture pic=currentpicture) { tex(pic,"\catcode`\"=12"); } void activatequote(picture pic=currentpicture) { tex(pic,"\catcode`\"=13"); } ./asymptote-2.41/base/syzygy.asy0000644000175000017500000005467313064427076016570 0ustar norbertnorbert/***** syzygy.asy {{{1 * Andy Hammerlindl 2006/12/02 * * Automates the drawing of braids, relations, and syzygies, along with the * corresponding equations. * * See * http://katlas.math.toronto.edu/drorbn/index.php?title=06-1350/Syzygies_in_Asymptote * For more information. *****/ struct Component { // {{{1 // The number of strings coming in or out of the component. int in; int out; // Which 'out' string each 'in' string is connected to. For deriving // equations. int[] connections; string symbol; // For pullback notation. string lsym; // For linear equations. string codename; // For Mathematica code. guide[] draw(picture pic, guide[] ins); } // Utility functions {{{1 pair[] endpoints(guide[] a) { pair[] z; for (int i=0; i M.x) M=(z[i].x,M.y); if (z[i].y > M.y) M=(M.x,z[i].y); } return M; } // Component Definitions {{{1 real hwratio=1.4; real gapfactor=6; Component bp=new Component; bp.in=2; bp.out=2; bp.connections=new int[] {1,0}; bp.symbol="B^+"; bp.lsym="b^+"; bp.codename="bp"; bp.draw=new guide[] (picture pic, guide[] ins) { pair[] z=endpoints(ins); pair m=min(z), M=max(z); real w=M.x-m.x, h=hwratio*w; pair centre=(0.5(m.x+M.x),M.y+h/2); /* return new guide[] {ins[1]..centre{NW}..z[0]+h*N, ins[0]..centre{NE}..z[1]+h*N}; */ real offset=gapfactor*linewidth(currentpen); draw(pic, ins[1]..(centre-offset*NW){NW}); return new guide[] {(centre+offset*NW){NW}..z[0]+h*N, ins[0]..centre{NE}..z[1]+h*N}; }; Component bm=new Component; bm.in=2; bm.out=2; bm.connections=new int[] {1,0}; bm.symbol="B^-"; bm.lsym="b^-"; bm.codename="bm"; bm.draw=new guide[] (picture pic, guide[] ins) { pair[] z=endpoints(ins); pair m=min(z), M=max(z); real w=M.x-m.x, h=hwratio*w; pair centre=(0.5(m.x+M.x),M.y+h/2); /* return new guide[] {ins[1]..centre{NW}..z[0]+h*N, ins[0]..centre{NE}..z[1]+h*N}; */ real offset=gapfactor*linewidth(currentpen); draw(pic, ins[0]..(centre-offset*NE){NE}); return new guide[] {ins[1]..centre{NW}..z[0]+h*N, (centre+offset*NE){NE}..z[1]+h*N}; }; Component phi=new Component; phi.in=2; phi.out=1; phi.connections=new int[] {0,0}; phi.symbol="\Phi"; phi.lsym="\phi"; phi.codename="phi"; phi.draw=new guide[] (picture pic, guide[] ins) { pair[] z=endpoints(ins); pair m=min(z), M=max(z); real w=M.x-m.x, h=hwratio*w; pair centre=(0.5(m.x+M.x),M.y+h/2); //real offset=4*linewidth(currentpen); draw(pic, ins[0]..centre{NE}); draw(pic, ins[1]..centre{NW}); draw(pic, centre,linewidth(5*linewidth(currentpen))); dot(pic, centre); return new guide[] {centre..centre+0.5h*N}; }; Component wye=new Component; wye.in=1; wye.out=2; wye.connections=null; // TODO: Fix this! wye.symbol="Y"; wye.lsym="y"; wye.codename="wye"; wye.draw=new guide[] (picture pic, guide[] ins) { pair z=endpoint(ins[0]); real w=10, h=hwratio*w; // The 10 is a guess here, and may produce badness. pair centre=(z.x,z.y+h/2); draw(pic, ins[0]..centre); draw(pic, centre,linewidth(5*linewidth(currentpen))); return new guide[] {centre{NW}..centre+(-0.5w,0.5h), centre{NE}..centre+(0.5w,0.5h)}; }; struct Braid { // {{{1 // Members {{{2 // Number of lines initially. int n; struct Placement { Component c; int place; Placement copy() { Placement p=new Placement; p.c=this.c; p.place=this.place; return p; } } Placement[] places; void add(Component c, int place) { Placement p=new Placement; p.c=c; p.place=place; places.push(p); } void add(Braid sub, int place) { for (int i=0; i= minheight ? ins[i] : ins[i]..(z[i].x,minheight)); } } void draw(picture pic, guide[] ins, real minheight=0) { int steps=places.length; guide[] nodes=ins; for (int i=0; ij) return swap(j,i); else { assert(j==i+1); assert(swapable(places[i],places[j])); Placement p=places[i].copy(); Placement q=places[j].copy(); /*write("swap:"); write("p originally at " + (string)p.place); write("q originally at " + (string)q.place); write("p.c.in: " + (string)p.c.in + " p.c.out: " + (string)p.c.out); write("q.c.in: " + (string)q.c.in + " q.c.out: " + (string)q.c.out);*/ if (q.place + q.c.in <= p.place) // q is left of p - adjust for q renumbering strings. p.place+=q.c.out-q.c.in; else if (p.place + p.c.out <= q.place) // q is right of p - adjust for p renumbering strings. q.place+=p.c.in-p.c.out; else // q is directly on top of p assert(false, "swapable"); /*write("q now at " + (string)q.place); write("p now at " + (string)p.place);*/ Braid b=this.copy(); b.places[i]=q; b.places[j]=p; return b; } } // Tests if the component at index 'start' can be moved to index 'end' // without interfering with other components. bool moveable(int start, int end) { assert(start= sub.places.length) return true; // The next component to match. Placement p=sub.places[acc.length]; // Start looking immediately after the last match. for (int step=acc[acc.length-1]+1; step= sub.places.length) return true; // The next component to match. Placement p=sub.places[acc.length]; // Start looking immediately after the last match. for (int step=acc[acc.length-1]+1; step place && q.place < place + size) { // It's in the window, so it must match the next component in the // subbraid. if (p.c==q.c && p.place+place==q.place) { // A match - go on to the next component. acc.push(step); return tryMatch(sub, place, size, acc); // TODO: Adjust place/size. } else return false; } // TODO: Adjust place and size. } // We've run out of components to match. return false; } // This attempts to find a subbraid within the braid. It allows other // components to be interspersed with the components of the subbraid so long // as they don't occur on the same string as the ones the subbraid lies on. // Returns null on failure. int[] match(Braid sub, int place) { for (int i=0; i<=this.places.length-sub.places.length; ++i) { // Find where the first component of the subbraid matches and try to // match the rest of the braid starting from there. if (matchComponent(sub, 0, place, i)) { int[] result; result.push(i); if (tryMatch(sub,place,sub.n,result)) return result; } } return null; } // Equations {{{2 // Returns the string that 'place' moves to when going through the section // with Placement p. static int advancePast(Placement p, int place) { // If it's to the left of the component, it is unaffected. return place=0 && place=0 && step0) s+=" "; s+=stepToFormula(step); } return s; } } string windowToLinear(int step, int w_place, int w_size) { int[] a=pullbackWindow(step, w_place, w_size); string s="("; for (int arg=1; arg<=w_size+1; ++arg) { if (arg>1) s+=","; bool first=true; for (int var=0; var1) s+=", "; bool first=true; for (int var=0; var1) s+=","; bool first=true; for (int var=0; var0) s+= subtract ? " - " : " + "; s+=stepToLinear(step); } return s; } } string toCode(bool subtract=false) { if (places.length==0) return subtract ? "0" : ""; // or "1" ? else { string s = subtract ? " - " : ""; for (int step=0; step0) s+= subtract ? " - " : " + "; s+=stepToCode(step); } return s; } } } struct Relation { // {{{1 Braid lhs, rhs; string lsym, codename; bool inverted=false; string toFormula() { return lhs.toFormula() + " = " + rhs.toFormula(); } string linearName() { assert(lhs.n==rhs.n); assert(lsym!=""); string s=(inverted ? "-" : "") + lsym+"("; for (int i=1; i<=lhs.n+1; ++i) { if (i>1) s+=","; s+="x_"+(string)i; } return s+")"; } string fullCodeName() { assert(lhs.n==rhs.n); assert(codename!=""); string s=(inverted ? "minus" : "") + codename+"["; for (int i=1; i<=lhs.n+1; ++i) { if (i>1) s+=", "; s+="x"+(string)i+"_"; } return s+"]"; } string toLinear() { return linearName() + " = " + lhs.toLinear() + rhs.toLinear(true); } string toCode() { return fullCodeName() + " :> " + lhs.toCode() + rhs.toCode(true); } void draw(picture pic=currentpicture) { picture left; lhs.draw(left); frame l=left.fit(); picture right; rhs.draw(right); frame r=right.fit(); real xpad=30; add(pic, l); label(pic, "=", (max(l).x + 0.5xpad, 0.25(max(l).y+max(r).y))); add(pic, r, (max(l).x+xpad,0)); } } Relation operator- (Relation r) { Relation opposite; opposite.lhs=r.rhs; opposite.rhs=r.lhs; opposite.lsym=r.lsym; opposite.codename=r.codename; opposite.inverted=!r.inverted; return opposite; } Braid apply(Relation r, Braid b, int step, int place) { bool valid=b.exactMatch(r.lhs,place,step); if (valid) { Braid result=new Braid; result.n=b.n; for (int i=0; i M.x) M=(z.x,M.y); if (z.y > M.y) M=(M.x,z.y); } picture pic; real xpad=2.0, ypad=1.3; void place(int index, real row, real column) { pair z=((M.x*xpad)*column,(M.y*ypad)*row); add(pic, cards[index], z); if (number) { label(pic,(string)index, z+(0.5M.x,0), S); } } // Handle small collections. if (n<=4) { for (int i=0; i1) s+=","; s+="x_"+(string)i; } return s+")"; } string fullCodeName() { assert(codename!=""); string s=codename+"["; for (int i=1; i<=initial.n+1; ++i) { if (i>1) s+=", "; s+="x"+(string)i+"_"; } return s+"]"; } string toLinear() { string s=linearName()+" = "; Braid b=initial; bool first=true; for (int i=0; i "; Braid b=initial; bool first=true; for (int i=0; igsave(); out->concat(t); out->image(image,palette,antialias); out->grestore(); return true; } drawElement *transformed(const transform& T) { return new drawPaletteImage(image,palette,T*t,antialias); } }; class drawNoPaletteImage : public drawImage { vm::array image; public: drawNoPaletteImage(const vm::array& image, const transform& t, bool antialias) : drawImage(t,antialias), image(image) {} virtual ~drawNoPaletteImage() {} bool draw(psfile *out) { out->gsave(); out->concat(t); out->image(image,antialias); out->grestore(); return true; } drawElement *transformed(const transform& T) { return new drawNoPaletteImage(image,T*t,antialias); } }; class drawFunctionImage : public drawImage { vm::stack *Stack; vm::callable *f; Int width, height; public: drawFunctionImage(vm::stack *Stack, vm::callable *f, Int width, Int height, const transform& t, bool antialias) : drawImage(t,antialias), Stack(Stack), f(f), width(width), height(height) {} virtual ~drawFunctionImage() {} bool draw(psfile *out) { out->gsave(); out->concat(t); out->image(Stack,f,width,height,antialias); out->grestore(); return true; } drawElement *transformed(const transform& T) { return new drawFunctionImage(Stack,f,width,height,T*t,antialias); } }; class drawRawImage : public drawImage { unsigned char *raw; // For internal use; not buffered, may be overwritten. size_t width,height; public: drawRawImage(unsigned char *raw, size_t width, size_t height, const transform& t, bool antialias) : drawImage(t,antialias), raw(raw), width(width), height(height) {} virtual ~drawRawImage() {} bool draw(psfile *out) { out->gsave(); out->concat(t); out->rawimage(raw,width,height,antialias); out->grestore(); return true; } }; } #endif ./asymptote-2.41/wce0000755000175000017500000000033313064427076014246 0ustar norbertnorbert#!/bin/sh printf "Testing errors..." ./asy -sysdir base -noautoplain -debug errortest 2> errors.temp result=`diff errors.temp errors` if test "$result" = ""; then echo PASSED. else echo FAILED. echo "$result" exit 1 fi ./asymptote-2.41/triple.h0000644000175000017500000001735013064427076015221 0ustar norbertnorbert/***** * triple.h * John Bowman * * Stores a three-dimensional point. * *****/ #ifndef TRIPLE_H #define TRIPLE_H #include #include #include #include #include "common.h" #include "angle.h" #include "pair.h" namespace run { void transpose(double *a, size_t n); void inverse(double *a, size_t n); } namespace camp { typedef double Triple[3]; class triple; bool isIdTransform3(const double* t); void copyTransform3(double*& d, const double* s, GCPlacement placement=NoGC); void multiplyTransform3(double*& t, const double* s, const double* r); void boundstriples(double& x, double& y, double& z, double& X, double& Y, double& Z, size_t n, const triple* v); class triple : virtual public gc { double x; double y; double z; public: triple() : x(0.0), y(0.0), z(0.0) {} triple(double x, double y=0.0, double z=0.0) : x(x), y(y), z(z) {} triple(const Triple& v) : x(v[0]), y(v[1]), z(v[2]) {} virtual ~triple() {} void set(double X, double Y=0.0, double Z=0.0) { x=X; y=Y; z=Z; } double getx() const { return x; } double gety() const { return y; } double getz() const { return z; } // transform by row-major matrix friend triple operator* (const double* t, const triple& v) { if(t == NULL) return v; double f=t[12]*v.x+t[13]*v.y+t[14]*v.z+t[15]; if(f == 0.0) reportError("division by 0 in transform of a triple"); f=1.0/f; return triple((t[0]*v.x+t[1]*v.y+t[2]*v.z+t[3])*f, (t[4]*v.x+t[5]*v.y+t[6]*v.z+t[7])*f, (t[8]*v.x+t[9]*v.y+t[10]*v.z+t[11])*f); } friend triple transformNormal(const double* t, const triple& v) { if(t == NULL) return v; double T[16]; memcpy(T,t,sizeof(double)*16); T[3]=T[7]=T[11]=0.0; run::inverse(T,4); run::transpose(T,4); triple V=T*v; return unit(V); } friend void transformtriples(const double* t, size_t n, triple* d, const triple* s) { if(n == 0 || d == NULL || s == NULL) return; for(size_t i=0; i < n; i++) d[i]=t*s[i]; } friend void copytriples(size_t n, triple* d, const triple* s) { if(d == NULL || s == NULL) return; for(size_t i=0; i < n; i++) d[i]=s[i]; } friend void boundstriples(triple& Min, triple& Max, size_t n, const triple* v) { if(n==0 || v==NULL) return; double x,y,z; double X,Y,Z; X=x=v[0].getx(); Y=y=v[0].gety(); Z=z=v[0].getz(); for(size_t i=1; i < n; ++i) { const double vx=v[i].getx(); x=fmin(x,vx); X=fmax(X,vx); const double vy=v[i].gety(); y=fmin(y,vy); Y=fmax(Y,vy); const double vz=v[i].getz(); z=fmin(z,vz); Z=fmax(Z,vz); } Min.set(x,y,z); Max.set(X,Y,Z); } friend void ratiotriples(pair &b, double (*m)(double, double), bool &first, size_t n, const triple* v) { if(n==0 || v==NULL) return; if(first) { first=false; const triple& v0=v[0]; b=pair(v0.x/v0.z,v0.y/v0.z); } double x=b.getx(); double y=b.gety(); for(size_t i=0; i < n; ++i) { const triple& vi = v[i]; x=m(x,vi.x/vi.z); y=m(y,vi.y/vi.z); } b=pair(x,y); } friend triple operator+ (const triple& z, const triple& w) { return triple(z.x + w.x, z.y + w.y, z.z + w.z); } friend triple operator- (const triple& z, const triple& w) { return triple(z.x - w.x, z.y - w.y, z.z - w.z); } friend triple operator- (const triple& z) { return triple(-z.x, -z.y, -z.z); } friend triple operator* (double s, const triple& z) { return triple(s*z.x, s*z.y, s*z.z); } friend triple operator* (const triple& z, double s) { return triple(z.x*s, z.y*s, z.z*s); } friend triple operator/ (const triple& z, double s) { if (s == 0.0) reportError("division by 0"); s=1.0/s; return triple(z.x*s, z.y*s, z.z*s); } const triple& operator+= (const triple& w) { x += w.x; y += w.y; z += w.z; return *this; } const triple& operator-= (const triple& w) { x -= w.x; y -= w.y; z -= w.z; return *this; } friend bool operator== (const triple& z, const triple& w) { return z.x == w.x && z.y == w.y && z.z == w.z; } friend bool operator!= (const triple& z, const triple& w) { return z.x != w.x || z.y != w.y || z.z != w.z; } double abs2() const { return x*x+y*y+z*z; } friend double abs2(const triple &v) { return v.abs2(); } double length() const /* r */ { return sqrt(abs2()); } friend double length(const triple& v) { return v.length(); } double polar() const /* theta */ { double r=length(); if (r == 0.0) reportError("taking polar angle of (0,0,0)"); return acos(z/r); } double azimuth() const /* phi */ { return angle(x,y); } friend triple unit(const triple& v) { double scale=v.length(); if(scale == 0.0) return v; scale=1.0/scale; return triple(v.x*scale,v.y*scale,v.z*scale); } friend double dot(const triple& u, const triple& v) { return u.x*v.x+u.y*v.y+u.z*v.z; } friend triple cross(const triple& u, const triple& v) { return triple(u.y*v.z-u.z*v.y, u.z*v.x-u.x*v.z, u.x*v.y-u.y*v.x); } // Returns a unit triple in the direction (theta,phi), in radians. friend triple expi(double theta, double phi) { double sintheta=sin(theta); return triple(sintheta*cos(phi),sintheta*sin(phi),cos(theta)); } friend istream& operator >> (istream& s, triple& z) { char c; s >> std::ws; bool paren=s.peek() == '('; // parenthesis are optional if(paren) s >> c; s >> z.x >> std::ws; if(s.peek() == ',') s >> c >> z.y; else z.y=0.0; if(s.peek() == ',') s >> c >> z.z; else z.z=0.0; if(paren) { s >> std::ws; if(s.peek() == ')') s >> c; } return s; } friend ostream& operator << (ostream& out, const triple& z) { out << "(" << z.x << "," << z.y << "," << z.z << ")"; return out; } }; triple expi(double theta, double phi); // Return the component of vector v perpendicular to a unit vector u. inline triple perp(triple v, triple u) { return v-dot(v,u)*u; } double xratio(const triple& v); double yratio(const triple& v); inline void bounds(double& x, double &X, double v) { if(v < x) x=v; else if(v > X) X=v; } inline void boundstriples(double& x, double& y, double& z, double& X, double& Y, double& Z, size_t n, const triple* v) { X=x=v[0].getx(); Y=y=v[0].gety(); Z=z=v[0].getz(); for(size_t i=1; i < n; ++i) { triple V=v[i]; bounds(x,X,V.getx()); bounds(y,Y,V.gety()); bounds(z,Z,V.getz()); } } extern const double third; // return the maximum distance squared of points c0 and c1 from // the respective internal control points of z0--z1. inline double Straightness(const triple& z0, const triple& c0, const triple& c1, const triple& z1) { triple v=third*(z1-z0); return std::max(abs2(c0-v-z0),abs2(z1-v-c1)); } // return the maximum perpendicular distance squared of points c0 and c1 // from z0--z1. inline double Distance1(const triple& z0, const triple& c0, const triple& c1, const triple& z1) { triple Z0=c0-z0; triple Q=unit(z1-z0); triple Z1=c1-z0; return std::max(abs2(Z0-dot(Z0,Q)*Q),abs2(Z1-dot(Z1,Q)*Q)); } // return the perpendicular distance squared of a point z from the plane // through u with unit normal n. inline double Distance2(const triple& z, const triple& u, const triple& n) { double d=dot(z-u,n); return d*d; } } //namespace camp GC_DECLARE_PTRFREE(camp::triple); #endif ./asymptote-2.41/builtin.cc0000644000175000017500000007473013064427076015533 0ustar norbertnorbert/***** * builtin.cc * Tom Prince 2004/08/25 * * Initialize builtins. *****/ #include #include "builtin.h" #include "entry.h" #include "runtime.h" #include "runpicture.h" #include "runlabel.h" #include "runhistory.h" #include "runarray.h" #include "runfile.h" #include "runsystem.h" #include "runstring.h" #include "runpair.h" #include "runtriple.h" #include "runpath.h" #include "runpath3d.h" #include "runmath.h" #include "types.h" #include "castop.h" #include "mathop.h" #include "arrayop.h" #include "vm.h" #include "coder.h" #include "exp.h" #include "refaccess.h" #include "settings.h" #include "opsymbols.h" #ifndef NOSYM #include "builtin.symbols.h" #endif namespace vm { // Defined in stack.cc extern vm::frame *make_dummyframe(string name); } using namespace types; using namespace camp; using namespace vm; namespace trans { using camp::transform; using camp::pair; using vm::bltin; using run::divide; using run::less; using run::greater; using run::plus; using run::minus; using namespace run; void gen_runtime_venv(venv &ve); void gen_runbacktrace_venv(venv &ve); void gen_runpicture_venv(venv &ve); void gen_runlabel_venv(venv &ve); void gen_runhistory_venv(venv &ve); void gen_runarray_venv(venv &ve); void gen_runfile_venv(venv &ve); void gen_runsystem_venv(venv &ve); void gen_runstring_venv(venv &ve); void gen_runpair_venv(venv &ve); void gen_runtriple_venv(venv &ve); void gen_runpath_venv(venv &ve); void gen_runpath3d_venv(venv &ve); void gen_runmath_venv(venv &ve); void gen_rungsl_venv(venv &ve); void addType(tenv &te, symbol name, ty *t) { te.enter(name, new tyEntry(t,0,0,position())); } // The base environments for built-in types and functions void base_tenv(tenv &te) { #define PRIMITIVE(name,Name,asyName) \ addType(te, symbol::trans(#asyName), prim##Name()); #include "primitives.h" #undef PRIMITIVE } const formal noformal(0); function *functionFromFormals(ty *result, formal f1=noformal, formal f2=noformal, formal f3=noformal, formal f4=noformal, formal f5=noformal, formal f6=noformal, formal f7=noformal, formal f8=noformal, formal f9=noformal, formal fA=noformal, formal fB=noformal, formal fC=noformal, formal fD=noformal, formal fE=noformal, formal fF=noformal, formal fG=noformal, formal fH=noformal, formal fI=noformal) { function *fun = new function(result); if (f1.t) fun->add(f1); if (f2.t) fun->add(f2); if (f3.t) fun->add(f3); if (f4.t) fun->add(f4); if (f5.t) fun->add(f5); if (f6.t) fun->add(f6); if (f7.t) fun->add(f7); if (f8.t) fun->add(f8); if (f9.t) fun->add(f9); if (fA.t) fun->add(fA); if (fB.t) fun->add(fB); if (fC.t) fun->add(fC); if (fD.t) fun->add(fD); if (fE.t) fun->add(fE); if (fF.t) fun->add(fF); if (fG.t) fun->add(fG); if (fH.t) fun->add(fH); if (fI.t) fun->add(fI); return fun; } void addFunc(venv &ve, access *a, ty *result, symbol id, formal f1=noformal, formal f2=noformal, formal f3=noformal, formal f4=noformal, formal f5=noformal, formal f6=noformal, formal f7=noformal, formal f8=noformal, formal f9=noformal, formal fA=noformal, formal fB=noformal, formal fC=noformal, formal fD=noformal, formal fE=noformal, formal fF=noformal, formal fG=noformal, formal fH=noformal, formal fI=noformal) { function *fun = functionFromFormals(result,f1,f2,f3,f4,f5,f6,f7,f8,f9, fA,fB,fC,fD,fE,fF,fG,fH,fI); // NOTE: If the function is a field, we should encode the defining record in // the entry varEntry *ent = new varEntry(fun, a, 0, position()); ve.enter(id, ent); } // Add a function with one or more default arguments. void addFunc(venv &ve, bltin f, ty *result, symbol name, formal f1, formal f2, formal f3, formal f4, formal f5, formal f6, formal f7, formal f8, formal f9, formal fA, formal fB, formal fC, formal fD, formal fE, formal fF, formal fG, formal fH, formal fI) { #ifdef DEBUG_BLTIN // If the function is an operator, print out the whole signature with the // types, as operators are heavily overloaded. min and max are also heavily // overloaded, so we check for them too. Many builtin functions have so // many arguments that it is noise to print out their full signatures. string s = name; if (s.find("operator ", 0) == 0 || s == "min" || s == "max") { function *fun = functionFromFormals(result,f1,f2,f3,f4,f5,f6,f7,f8,f9, fA,fB,fC,fD,fE,fF,fG,fH,fI); ostringstream out; fun->printVar(out, name); REGISTER_BLTIN(f, out.str()); } else { REGISTER_BLTIN(f, name); } #endif access *a = new bltinAccess(f); addFunc(ve,a,result,name,f1,f2,f3,f4,f5,f6,f7,f8,f9, fA,fB,fC,fD,fE,fF,fG,fH,fI); } void addOpenFunc(venv &ve, bltin f, ty *result, symbol name) { function *fun = new function(result, signature::OPEN); REGISTER_BLTIN(f, name); access *a= new bltinAccess(f); varEntry *ent = new varEntry(fun, a, 0, position()); ve.enter(name, ent); } // Add a rest function with zero or more default/explicit arguments. void addRestFunc(venv &ve, bltin f, ty *result, symbol name, formal frest, formal f1=noformal, formal f2=noformal, formal f3=noformal, formal f4=noformal, formal f5=noformal, formal f6=noformal, formal f7=noformal, formal f8=noformal, formal f9=noformal) { REGISTER_BLTIN(f, name); access *a = new bltinAccess(f); function *fun = new function(result); if (f1.t) fun->add(f1); if (f2.t) fun->add(f2); if (f3.t) fun->add(f3); if (f4.t) fun->add(f4); if (f5.t) fun->add(f5); if (f6.t) fun->add(f6); if (f7.t) fun->add(f7); if (f8.t) fun->add(f8); if (f9.t) fun->add(f9); if (frest.t) fun->addRest(frest); varEntry *ent = new varEntry(fun, a, 0, position()); ve.enter(name, ent); } void addRealFunc0(venv &ve, bltin fcn, symbol name) { addFunc(ve, fcn, primReal(), name); } template void addRealFunc(venv &ve, symbol name) { addFunc(ve, realReal, primReal(), name, formal(primReal(),SYM(x))); addFunc(ve, arrayFunc, realArray(), name, formal(realArray(),SYM(a))); } #define addRealFunc(fcn, sym) addRealFunc(ve, sym); void addRealFunc2(venv &ve, bltin fcn, symbol name) { addFunc(ve,fcn,primReal(),name,formal(primReal(),SYM(a)), formal(primReal(),SYM(b))); } template void realRealInt(vm::stack *s) { Int n = pop(s); double x = pop(s); s->push(func(x, intcast(n))); } template void addRealIntFunc(venv& ve, symbol name, symbol arg1, symbol arg2) { addFunc(ve, realRealInt, primReal(), name, formal(primReal(), arg1), formal(primInt(), arg2)); } void addInitializer(venv &ve, ty *t, access *a) { addFunc(ve, a, t, symbol::initsym); } void addInitializer(venv &ve, ty *t, bltin f) { #ifdef DEBUG_BLTIN ostringstream s; s << "initializer for " << *t; REGISTER_BLTIN(f, s.str()); #endif access *a = new bltinAccess(f); addInitializer(ve, t, a); } // Specifies that source may be cast to target, but only if an explicit // cast expression is used. void addExplicitCast(venv &ve, ty *target, ty *source, access *a) { addFunc(ve, a, target, symbol::ecastsym, source); } // Specifies that source may be implicitly cast to target by the // function or instruction stores at a. void addCast(venv &ve, ty *target, ty *source, access *a) { //addExplicitCast(target,source,a); addFunc(ve, a, target, symbol::castsym, source); } void addExplicitCast(venv &ve, ty *target, ty *source, bltin f) { #ifdef DEBUG_BLTIN ostringstream s; s << "explicit cast from " << *source << " to " << *target; REGISTER_BLTIN(f, s.str()); #endif addExplicitCast(ve, target, source, new bltinAccess(f)); } void addCast(venv &ve, ty *target, ty *source, bltin f) { #ifdef DEBUG_BLTIN ostringstream s; s << "cast from " << *source << " to " << *target; REGISTER_BLTIN(f, s.str()); #endif addCast(ve, target, source, new bltinAccess(f)); } template void addVariable(venv &ve, T *ref, ty *t, symbol name, record *module=settings::getSettingsModule()) { access *a = new refAccess(ref); varEntry *ent = new varEntry(t, a, PUBLIC, module, 0, position()); ve.enter(name, ent); } template void addVariable(venv &ve, T value, ty *t, symbol name, record *module=settings::getSettingsModule(), permission perm=PUBLIC) { item* ref=new item; *ref=value; access *a = new itemRefAccess(ref); varEntry *ent = new varEntry(t, a, perm, module, 0, position()); ve.enter(name, ent); } template void addConstant(venv &ve, T value, ty *t, symbol name, record *module=settings::getSettingsModule()) { addVariable(ve,value,t,name,module,RESTRICTED); } // The identity access, i.e. no instructions are encoded for a cast or // operation, and no functions are called. identAccess id; function *IntRealFunction() { return new function(primInt(),primReal()); } function *realPairFunction() { return new function(primReal(),primPair()); } function *voidFileFunction() { return new function(primVoid(),primFile()); } void addInitializers(venv &ve) { addInitializer(ve, primBoolean(), boolFalse); addInitializer(ve, primInt(), IntZero); addInitializer(ve, primReal(), realZero); addInitializer(ve, primString(), emptyString); addInitializer(ve, primPair(), pairZero); addInitializer(ve, primTriple(), tripleZero); addInitializer(ve, primTransform(), transformIdentity); addInitializer(ve, primGuide(), nullGuide); addInitializer(ve, primPath(), nullPath); addInitializer(ve, primPath3(), nullPath3); addInitializer(ve, primPen(), newPen); addInitializer(ve, primPicture(), newPicture); addInitializer(ve, primFile(), nullFile); } void addCasts(venv &ve) { addExplicitCast(ve, primString(), primInt(), stringCast); addExplicitCast(ve, primString(), primReal(), stringCast); addExplicitCast(ve, primString(), primPair(), stringCast); addExplicitCast(ve, primString(), primTriple(), stringCast); addExplicitCast(ve, primInt(), primString(), castString); addExplicitCast(ve, primReal(), primString(), castString); addExplicitCast(ve, primPair(), primString(), castString); addExplicitCast(ve, primTriple(), primString(), castString); addExplicitCast(ve, primInt(), primReal(), castDoubleInt); addCast(ve, primReal(), primInt(), cast); addCast(ve, primPair(), primInt(), cast); addCast(ve, primPair(), primReal(), cast); addCast(ve, primPath(), primPair(), cast); addCast(ve, primGuide(), primPair(), pairToGuide); addCast(ve, primGuide(), primPath(), pathToGuide); addCast(ve, primPath(), primGuide(), guideToPath); addCast(ve, primFile(), primNull(), nullFile); // Vectorized casts. addExplicitCast(ve, IntArray(), realArray(), arrayToArray); addCast(ve, realArray(), IntArray(), arrayToArray); addCast(ve, pairArray(), IntArray(), arrayToArray); addCast(ve, pairArray(), realArray(), arrayToArray); addCast(ve, realArray2(), IntArray2(), array2ToArray2); addCast(ve, pairArray2(), IntArray2(), array2ToArray2); addCast(ve, pairArray2(), realArray2(), array2ToArray2); } void addTupleOperators(venv &ve) { addFunc(ve, realRealToPair, primPair(), SYM_TUPLE, formal(primReal(), SYM(x)), formal(primReal(), SYM(y))); addFunc(ve, realRealRealToTriple, primTriple(), SYM_TUPLE, formal(primReal(), SYM(x)), formal(primReal(), SYM(y)), formal(primReal(), SYM(z))); addFunc(ve, real6ToTransform, primTransform(), SYM_TUPLE, formal(primReal(), SYM(x)), formal(primReal(), SYM(y)), formal(primReal(), SYM(xx)), formal(primReal(), SYM(xy)), formal(primReal(), SYM(yx)), formal(primReal(), SYM(yy))); } void addGuideOperators(venv &ve) { // The guide operators .. and -- take an array of guides, and turn them // into a single guide. addRestFunc(ve, dotsGuide, primGuide(), SYM_DOTS, guideArray()); addRestFunc(ve, dashesGuide, primGuide(), SYM_DASHES, guideArray()); } /* Avoid typing the same type three times. */ void addSimpleOperator(venv &ve, bltin f, ty *t, symbol name) { addFunc(ve,f,t,name,formal(t,SYM(a)),formal(t,SYM(b))); } void addBooleanOperator(venv &ve, bltin f, ty *t, symbol name) { addFunc(ve,f,primBoolean(),name,formal(t,SYM(a)),formal(t,SYM(b))); } template class op> void addArray2Array2Op(venv &ve, ty *t3, symbol name) { addFunc(ve,array2Array2Op,t3,name,formal(t3,SYM(a)),formal(t3,SYM(b))); } template class op> void addOpArray2(venv &ve, ty *t1, symbol name, ty *t3) { addFunc(ve,opArray2,t3,name,formal(t1,SYM(a)),formal(t3,SYM(b))); } template class op> void addArray2Op(venv &ve, ty *t1, symbol name, ty *t3) { addFunc(ve,array2Op,t3,name,formal(t3,SYM(a)),formal(t1,SYM(b))); } template class op> void addOps(venv &ve, ty *t1, symbol name, ty *t2) { addSimpleOperator(ve,binaryOp,t1,name); addFunc(ve,opArray,t2,name,formal(t1,SYM(a)),formal(t2,SYM(b))); addFunc(ve,arrayOp,t2,name,formal(t2,SYM(a)),formal(t1,SYM(b))); addSimpleOperator(ve,arrayArrayOp,t2,name); } template class op> void addBooleanOps(venv &ve, ty *t1, symbol name, ty *t2) { addBooleanOperator(ve,binaryOp,t1,name); addFunc(ve,opArray, booleanArray(),name,formal(t1,SYM(a)),formal(t2,SYM(b))); addFunc(ve,arrayOp, booleanArray(),name,formal(t2,SYM(a)),formal(t1,SYM(b))); addFunc(ve,arrayArrayOp,booleanArray(),name,formal(t2,SYM(a)), formal(t2,SYM(b))); } void addWrite(venv &ve, bltin f, ty *t1, ty *t2) { addRestFunc(ve,f,primVoid(),SYM(write),t2, formal(primFile(),SYM(file),true), formal(primString(),SYM(s),true), formal(t1,SYM(x)),formal(voidFileFunction(),SYM(suffix),true)); } template void addUnorderedOps(venv &ve, ty *t1, ty *t2, ty *t3, ty *t4) { addBooleanOps(ve,t1,SYM_EQ,t2); addBooleanOps(ve,t1,SYM_NEQ,t2); addFunc(ve, run::array2Equals, primBoolean(), SYM_EQ, formal(t3, SYM(a)), formal(t3, SYM(b))); addFunc(ve, run::array2NotEquals, primBoolean(), SYM_NEQ, formal(t3, SYM(a)), formal(t3, SYM(b))); addCast(ve,t1,primFile(),read); addCast(ve,t2,primFile(),readArray1); addCast(ve,t3,primFile(),readArray2); addCast(ve,t4,primFile(),readArray3); addWrite(ve,write,t1,t2); addRestFunc(ve,writeArray,primVoid(),SYM(write),t3, formal(primFile(),SYM(file),true), formal(primString(),SYM(s),true), formal(t2,SYM(a),false,true)); addFunc(ve,writeArray2,primVoid(),SYM(write), formal(primFile(),SYM(file),true),t3); addFunc(ve,writeArray3,primVoid(),SYM(write), formal(primFile(),SYM(file),true),t4); } inline double abs(pair z) { return z.length(); } inline double abs(triple v) { return v.length(); } inline pair conjugate(pair z) { return conj(z); } template inline T negate(T x) { return -x; } template class op> void addBinOps(venv &ve, ty *t1, ty *t2, ty *t3, ty *t4, symbol name) { addFunc(ve,binopArray,t1,name,formal(t2,SYM(a))); addFunc(ve,binopArray2,t1,name,formal(t3,SYM(a))); addFunc(ve,binopArray3,t1,name,formal(t4,SYM(a))); } template void addOrderedOps(venv &ve, ty *t1, ty *t2, ty *t3, ty *t4) { addBooleanOps(ve,t1,SYM_LT,t2); addBooleanOps(ve,t1,SYM_LE,t2); addBooleanOps(ve,t1,SYM_GE,t2); addBooleanOps(ve,t1,SYM_GT,t2); addOps(ve,t1,SYM(min),t2); addOps(ve,t1,SYM(max),t2); addBinOps(ve,t1,t2,t3,t4,SYM(min)); addBinOps(ve,t1,t2,t3,t4,SYM(max)); addFunc(ve,sortArray,t2,SYM(sort),formal(t2,SYM(a))); addFunc(ve,sortArray2,t3,SYM(sort),formal(t3,SYM(a))); addFunc(ve,searchArray,primInt(),SYM(search),formal(t2,SYM(a)), formal(t1,SYM(key))); } template void addBasicOps(venv &ve, ty *t1, ty *t2, ty *t3, ty *t4, bool integer=false, bool Explicit=false) { addOps(ve,t1,SYM_PLUS,t2); addOps(ve,t1,SYM_MINUS,t2); addFunc(ve,initialized,primBoolean(),SYM(initialized),formal(t1,SYM(a))); addArray2Array2Op(ve,t3,SYM_PLUS); addArray2Array2Op(ve,t3,SYM_MINUS); addFunc(ve,&id,t1,SYM_PLUS,formal(t1,SYM(a))); addFunc(ve,&id,t2,SYM_PLUS,formal(t2,SYM(a))); addFunc(ve,Negate,t1,SYM_MINUS,formal(t1,SYM(a))); addFunc(ve,arrayFunc,t2,SYM_MINUS,formal(t2,SYM(a))); addFunc(ve,arrayFunc2,t3,SYM_MINUS,formal(t3,SYM(a))); if(!integer) addFunc(ve,interp,t1,SYM(interp), formal(t1,SYM(a),false,Explicit), formal(t1,SYM(b),false,Explicit), formal(primReal(),SYM(t))); addFunc(ve,sumArray,t1,SYM(sum),formal(t2,SYM(a))); addUnorderedOps(ve,t1,t2,t3,t4); } template void addOps(venv &ve, ty *t1, ty *t2, ty *t3, ty *t4, bool integer=false, bool Explicit=false) { addBasicOps(ve,t1,t2,t3,t4,integer,Explicit); addOps(ve,t1,SYM_TIMES,t2); addOpArray2(ve,t1,SYM_TIMES,t3); addArray2Op(ve,t1,SYM_TIMES,t3); if(!integer) { addOps(ve,t1,SYM_DIVIDE,t2); addArray2Op(ve,t1,SYM_DIVIDE,t3); } addOps(ve,t1,SYM_CARET,t2); } // Adds standard functions for a newly added array type. void addArrayOps(venv &ve, types::array *t) { ty *ct = t->celltype; // Check for the alias function to see if these operation have already been // added, if they have, don't add them again. static types::function aliasType(primBoolean(), primVoid(), primVoid()); aliasType.sig.formals[0].t = t; aliasType.sig.formals[1].t = t; if (ve.lookByType(SYM(alias), &aliasType)) return; addFunc(ve, run::arrayAlias, primBoolean(), SYM(alias), formal(t, SYM(a)), formal(t, SYM(b))); size_t depth=(size_t) t->depth(); // Define an array constructor. This needs to know the depth of the array, // which may not be known at runtime. Therefore, the depth, which is known // here at compile-time, is pushed on the stack beforehand by use of a // thunk. callable *copyValueFunc = new thunk(new vm::bfunc(run::copyArrayValue),(Int) depth-1); addFunc(ve, new callableAccess(copyValueFunc), t, SYM(array), formal(primInt(), SYM(n)), formal(ct, SYM(value)), formal(primInt(), SYM(depth), true)); callable *copyFunc = new thunk(new vm::bfunc(run::copyArray),(Int) depth); addFunc(ve, new callableAccess(copyFunc), t, SYM(copy), formal(t, SYM(a)), formal(primInt(), SYM(depth), true)); addFunc(ve, run::arrayFunction, t, SYM(map), formal(new function(ct, ct), SYM(f)), formal(t, SYM(a))); addFunc(ve, run::arraySequence, t, SYM(sequence), formal(new function(ct, primInt()), SYM(f)), formal(primInt(), SYM(n))); addFunc(ve, run::arraySort, t, SYM(sort), formal(t, SYM(a)), formal(new function(primBoolean(), ct, ct), SYM(less))); switch (depth) { case 1: addRestFunc(ve, run::arrayConcat, t, SYM(concat), new types::array(t)); addFunc(ve, run::arraySearch, primInt(), SYM(search), formal(t, SYM(a)), formal(ct, SYM(key)), formal(new function(primBoolean(), ct, ct), SYM(less))); break; case 2: addFunc(ve, run::array2Transpose, t, SYM(transpose), formal(t, SYM(a))); break; case 3: addFunc(ve, run::array3Transpose, t, SYM(transpose), formal(t, SYM(a)), formal(IntArray(),SYM(perm))); break; default: break; } } void addRecordOps(venv &ve, record *r) { addFunc(ve, run::boolMemEq, primBoolean(), SYM(alias), formal(r, SYM(a)), formal(r, SYM(b))); addFunc(ve, run::boolMemEq, primBoolean(), SYM_EQ, formal(r, SYM(a)), formal(r, SYM(b))); addFunc(ve, run::boolMemNeq, primBoolean(), SYM_NEQ, formal(r, SYM(a)), formal(r, SYM(b))); } void addFunctionOps(venv &ve, function *f) { // No function ops. } void addOperators(venv &ve) { addSimpleOperator(ve,binaryOp,primString(),SYM_PLUS); addBooleanOps(ve,primBoolean(),SYM_AMPERSAND,booleanArray()); addBooleanOps(ve,primBoolean(),SYM_BAR,booleanArray()); addBooleanOps(ve,primBoolean(),SYM_CARET,booleanArray()); addUnorderedOps(ve,primBoolean(),booleanArray(),booleanArray2(), booleanArray3()); addOps(ve,primInt(),IntArray(),IntArray2(),IntArray3(),true); addOps(ve,primReal(),realArray(),realArray2(),realArray3()); addOps(ve,primPair(),pairArray(),pairArray2(),pairArray3(),false,true); addBasicOps(ve,primTriple(),tripleArray(),tripleArray2(), tripleArray3()); addFunc(ve,opArray,tripleArray(),SYM_TIMES, formal(primReal(),SYM(a)),formal(tripleArray(),SYM(b))); addFunc(ve,opArray2,tripleArray2(),SYM_TIMES, formal(primReal(),SYM(a)),formal(tripleArray2(),SYM(b))); addFunc(ve,arrayOp,tripleArray(),SYM_TIMES, formal(tripleArray(),SYM(a)),formal(primReal(),SYM(b))); addFunc(ve,array2Op,tripleArray2(),SYM_TIMES, formal(tripleArray2(),SYM(a)),formal(primReal(),SYM(b))); addFunc(ve,arrayOp,tripleArray(),SYM_DIVIDE, formal(tripleArray(),SYM(a)),formal(primReal(),SYM(b))); addUnorderedOps(ve,primString(),stringArray(),stringArray2(), stringArray3()); addSimpleOperator(ve,binaryOp,primPair(),SYM(minbound)); addSimpleOperator(ve,binaryOp,primPair(),SYM(maxbound)); addSimpleOperator(ve,binaryOp,primTriple(),SYM(minbound)); addSimpleOperator(ve,binaryOp,primTriple(),SYM(maxbound)); addBinOps(ve,primPair(),pairArray(),pairArray2(),pairArray3(), SYM(minbound)); addBinOps(ve,primPair(),pairArray(),pairArray2(),pairArray3(), SYM(maxbound)); addBinOps(ve,primTriple(),tripleArray(),tripleArray2(), tripleArray3(),SYM(minbound)); addBinOps(ve,primTriple(),tripleArray(),tripleArray2(), tripleArray3(),SYM(maxbound)); addFunc(ve,arrayFunc,realArray(),SYM(abs), formal(pairArray(),SYM(a))); addFunc(ve,arrayFunc,realArray(),SYM(abs), formal(tripleArray(),SYM(a))); addFunc(ve,arrayFunc,pairArray(),SYM(conj), formal(pairArray(),SYM(a))); addFunc(ve,arrayFunc2,pairArray2(),SYM(conj), formal(pairArray2(),SYM(a))); addFunc(ve,binaryOp,primReal(),SYM_DIVIDE, formal(primInt(),SYM(a)),formal(primInt(),SYM(b))); addFunc(ve,arrayOp,realArray(),SYM_DIVIDE, formal(IntArray(),SYM(a)),formal(primInt(),SYM(b))); addFunc(ve,opArray,realArray(),SYM_DIVIDE, formal(primInt(),SYM(a)),formal(IntArray(),SYM(b))); addFunc(ve,arrayArrayOp,realArray(),SYM_DIVIDE, formal(IntArray(),SYM(a)),formal(IntArray(),SYM(b))); addOrderedOps(ve,primInt(),IntArray(),IntArray2(),IntArray3()); addOrderedOps(ve,primReal(),realArray(),realArray2(),realArray3()); addOrderedOps(ve,primString(),stringArray(),stringArray2(), stringArray3()); addOps(ve,primInt(),SYM_MOD,IntArray()); addOps(ve,primInt(),SYM_QUOTIENT,IntArray()); addOps(ve,primReal(),SYM_MOD,realArray()); addRestFunc(ve,diagonal,IntArray2(),SYM(diagonal),IntArray()); addRestFunc(ve,diagonal,realArray2(),SYM(diagonal),realArray()); addRestFunc(ve,diagonal,pairArray2(),SYM(diagonal),pairArray()); } dummyRecord *createDummyRecord(venv &ve, symbol name) { dummyRecord *r=new dummyRecord(name); vm::frame *f = make_dummyframe(name); addConstant(ve, f, r, name); addRecordOps(ve, r); return r; } double identity(double x) {return x;} double pow10(double x) {return run::pow(10.0,x);} // An example of an open function. #ifdef OPENFUNCEXAMPLE void openFunc(stack *Stack) { vm::array *a=vm::pop(Stack); size_t numArgs=checkArray(a); for (size_t k=0; kpush((Int)numArgs); } #endif // A function accessible in asy code print the bytecode of a function. void printBytecode(stack *Stack) { // As arbitrary addresses can be sent to printBytecode, it should not be run // in safe mode. if (settings::safe) { cerr << "use -nosafe flag to enable printBytecode" << endl; return; } vm::array *a=vm::pop(Stack); size_t numArgs=checkArray(a); if (numArgs != 1) cerr << "printBytecode takes one argument" << endl; // TODO: Add a reliable test for the object being a func. callable *c = a->read(0); if (func *f = dynamic_cast(c)) print(cout, f->body->code); else cout << "callable is not a standard function"; } // NOTE: We should move all of these into a "builtin" module. void base_venv(venv &ve) { // Register the name of arrayDeleteHelper for debugging in "asy -s" mode. // This is done automatically for other function, but because // arrayDeleteHelper is not defined in the usual way, it must be done // explicitly, and here is as good a place as any. REGISTER_BLTIN(arrayDeleteHelper, "arrayDeleteHelper"); addInitializers(ve); addCasts(ve); addOperators(ve); addTupleOperators(ve); addGuideOperators(ve); addRealFunc(sin,SYM(sin)); addRealFunc(cos,SYM(cos)); addRealFunc(tan,SYM(tan)); addRealFunc(asin,SYM(asin)); addRealFunc(acos,SYM(acos)); addRealFunc(atan,SYM(atan)); addRealFunc(exp,SYM(exp)); addRealFunc(log,SYM(log)); addRealFunc(log10,SYM(log10)); addRealFunc(sinh,SYM(sinh)); addRealFunc(cosh,SYM(cosh)); addRealFunc(tanh,SYM(tanh)); addRealFunc(asinh,SYM(asinh)); addRealFunc(acosh,SYM(acosh)); addRealFunc(atanh,SYM(atanh)); addRealFunc(sqrt,SYM(sqrt)); addRealFunc(cbrt,SYM(cbrt)); addRealFunc(fabs,SYM(fabs)); addRealFunc(ve,SYM(abs)); addRealFunc(expm1,SYM(expm1)); addRealFunc(log1p,SYM(log1p)); addRealIntFunc(ve, SYM(ldexp), SYM(x), SYM(e)); addRealFunc(pow10,SYM(pow10)); addRealFunc(identity,SYM(identity)); #ifdef STRUCTEXAMPLE dummyRecord *fun=createDummyRecord(ve, SYM(test)); addFunc(fun->e.ve,realReal,primReal(),SYM(f),formal(primReal(),SYM(x))); addVariable(fun->e.ve,1,primInt(),SYM(x)); #endif addFunc(ve,writestring,primVoid(),SYM(write), formal(primFile(),SYM(file),true), formal(primString(),SYM(s)), formal(voidFileFunction(),SYM(suffix),true)); addWrite(ve,write,primTransform(),transformArray()); addWrite(ve,write,primGuide(),guideArray()); addWrite(ve,write,primPen(),penArray()); addFunc(ve,arrayArrayOp,booleanArray(),SYM_EQ, formal(penArray(),SYM(a)),formal(penArray(),SYM(b))); addFunc(ve,arrayArrayOp,booleanArray(),SYM_NEQ, formal(penArray(),SYM(a)),formal(penArray(),SYM(b))); addFunc(ve,arrayFunction,realArray(),SYM(map), formal(realPairFunction(),SYM(f)), formal(pairArray(),SYM(a))); addFunc(ve,arrayFunction,IntArray(),SYM(map), formal(IntRealFunction(),SYM(f)), formal(realArray(),SYM(a))); addConstant(ve, Int_MAX, primInt(), SYM(intMax)); addConstant(ve, Int_MIN, primInt(), SYM(intMin)); addConstant(ve, HUGE_VAL, primReal(), SYM(inf)); addConstant(ve, run::infinity, primReal(), SYM(infinity)); addConstant(ve, nan(""), primReal(), SYM(nan)); addConstant(ve, DBL_MAX, primReal(), SYM(realMax)); addConstant(ve, DBL_MIN, primReal(), SYM(realMin)); addConstant(ve, DBL_EPSILON, primReal(), SYM(realEpsilon)); addConstant(ve, DBL_DIG, primInt(), SYM(realDigits)); addConstant(ve, RANDOM_MAX, primInt(), SYM(randMax)); addConstant(ve, PI, primReal(), SYM(pi)); addConstant(ve, string(REVISION),primString(),SYM(VERSION)); addVariable(ve, &processData().currentpen, primPen(), SYM(currentpen)); #ifdef OPENFUNCEXAMPLE addOpenFunc(ve, openFunc, primInt(), SYM(openFunc)); #endif addOpenFunc(ve, printBytecode, primVoid(), SYM(printBytecode)); gen_runtime_venv(ve); gen_runbacktrace_venv(ve); gen_runpicture_venv(ve); gen_runlabel_venv(ve); gen_runhistory_venv(ve); gen_runarray_venv(ve); gen_runfile_venv(ve); gen_runsystem_venv(ve); gen_runstring_venv(ve); gen_runpair_venv(ve); gen_runtriple_venv(ve); gen_runpath_venv(ve); gen_runpath3d_venv(ve); gen_runmath_venv(ve); #ifdef HAVE_LIBGSL gen_rungsl_venv(ve); #endif } } //namespace trans namespace run { double infinity=cbrt(DBL_MAX); // Reduced for tension atleast infinity void arrayDeleteHelper(stack *Stack) { array *a=pop(Stack); item itj=pop(Stack); bool jdefault=isdefault(itj); item iti=pop(Stack); Int i,j; if(isdefault(iti)) { if(jdefault) { (*a).clear(); return; } else i=j=get(itj); } else { i=get(iti); j=jdefault ? i : get(itj); } size_t asize=checkArray(a); if(a->cyclic() && asize > 0) { if(j-i+1 >= (Int) asize) { (*a).clear(); return; } i=imod(i,asize); j=imod(j,asize); if(j >= i) (*a).erase((*a).begin()+i,(*a).begin()+j+1); else { (*a).erase((*a).begin()+i,(*a).end()); (*a).erase((*a).begin(),(*a).begin()+j+1); } return; } if(i < 0 || i >= (Int) asize || i > j || j >= (Int) asize) { ostringstream buf; buf << "delete called on array of length " << (Int) asize << " with out-of-bounds index range [" << i << "," << j << "]"; error(buf); } (*a).erase((*a).begin()+i,(*a).begin()+j+1); } // Used by coder to optimize conditional jumps. const bltin intLess = binaryOp; const bltin intGreater = binaryOp; } ./asymptote-2.41/locate.h0000644000175000017500000000106013064427076015160 0ustar norbertnorbert/***** * locate.h * Tom Prince 2005/03/24 * * Locate files in search path. *****/ #ifndef LOCATE_H #define LOCATE_H #include "common.h" namespace settings { typedef mem::list file_list_t; extern file_list_t searchPath; // Find the appropriate file, first looking in the local directory, then the // directory given in settings, and finally the global system directory. string locateFile(string id); namespace fs { // Check to see if a file of given name exists. bool exists(string filename); } } // namespace settings #endif // LOCATE_H ./asymptote-2.41/runpath.symbols.h0000644000175000017500000000277613064427143017073 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(a); ADDSYMBOL(accel); ADDSYMBOL(arclength); ADDSYMBOL(arctime); ADDSYMBOL(atleast); ADDSYMBOL(b); ADDSYMBOL(c); ADDSYMBOL(cyclic); ADDSYMBOL(d); ADDSYMBOL(dir); ADDSYMBOL(dirtime); ADDSYMBOL(extension); ADDSYMBOL(fillrule); ADDSYMBOL(fuzz); ADDSYMBOL(g); ADDSYMBOL(incircle); ADDSYMBOL(inside); ADDSYMBOL(intersect); ADDSYMBOL(intersections); ADDSYMBOL(l); ADDSYMBOL(length); ADDSYMBOL(m); ADDSYMBOL(max); ADDSYMBOL(maxAfterTransform); ADDSYMBOL(maxtimes); ADDSYMBOL(min); ADDSYMBOL(minAfterTransform); ADDSYMBOL(mintimes); ADDSYMBOL(normalize); ADDSYMBOL(nurb); ADDSYMBOL(orient); ADDSYMBOL(p); ADDSYMBOL(phi); ADDSYMBOL(piecewisestraight); ADDSYMBOL(point); ADDSYMBOL(postcontrol); ADDSYMBOL(precontrol); ADDSYMBOL(q); ADDSYMBOL(radius); ADDSYMBOL(relativedistance); ADDSYMBOL(reverse); ADDSYMBOL(sign); ADDSYMBOL(size); ADDSYMBOL(straight); ADDSYMBOL(subpath); ADDSYMBOL(t); ADDSYMBOL(theta); ADDSYMBOL(unstraighten); ADDSYMBOL(w0); ADDSYMBOL(w1); ADDSYMBOL(w2); ADDSYMBOL(w3); ADDSYMBOL(windingnumber); ADDSYMBOL(z); ADDSYMBOL(z0); ADDSYMBOL(z1); ADDSYMBOL(z2); ADDSYMBOL(z3); ./asymptote-2.41/item.h0000644000175000017500000001334113064427076014654 0ustar norbertnorbert/***** * item.h * Tom Prince and John Bowman 2005/04/12 * * Descibes the items that are used by the virtual machine. *****/ #ifndef ITEM_H #define ITEM_H #include "common.h" #include #include #if COMPACT #include #else #include #endif namespace vm { class item; class bad_item_value {}; template T get(const item&); #if COMPACT // Identify a default argument. extern const Int DefaultValue; // Identify an undefined item. extern const Int Undefined; // Values for true and false unlikely to match other values. extern const Int BoolTruthValue; extern const Int BoolFalseValue; inline Int valueFromBool(bool b) { return b ? BoolTruthValue : BoolFalseValue; } #endif extern const item Default; class item : public gc { private: #if !COMPACT const std::type_info *kind; #endif union { Int i; double x; #if !COMPACT bool b; #endif void *p; }; public: #if COMPACT bool empty() const {return i >= Undefined;} item() : i(Undefined) {} item(Int i) : i(i) {} item(int i) : i(i) {} item(double x) : x(x) {} item(bool b) : i(valueFromBool(b)) {} item& operator= (int a) { i=a; return *this; } item& operator= (unsigned int a) { i=a; return *this; } item& operator= (Int a) { i=a; return *this; } item& operator= (double a) { x=a; return *this; } item& operator= (bool b) { i=valueFromBool(b); return *this; } template item(T *p) : p((void *) p) { assert(!empty()); } template item(const T &p) : p(new(UseGC) T(p)) { assert(!empty()); } template item& operator= (T *a) { p=(void *) a; return *this; } template item& operator= (const T &it) { p=new(UseGC) T(it); return *this; } #else bool empty() const {return *kind == typeid(void);} item() : kind(&typeid(void)) {} item(Int i) : kind(&typeid(Int)), i(i) {} item(int i) : kind(&typeid(Int)), i(i) {} item(double x) : kind(&typeid(double)), x(x) {} item(bool b) : kind(&typeid(bool)), b(b) {} item& operator= (int a) { kind=&typeid(Int); i=a; return *this; } item& operator= (unsigned int a) { kind=&typeid(Int); i=a; return *this; } item& operator= (Int a) { kind=&typeid(Int); i=a; return *this; } item& operator= (double a) { kind=&typeid(double); x=a; return *this; } item& operator= (bool a) { kind=&typeid(bool); b=a; return *this; } template item(T *p) : kind(&typeid(T)), p((void *) p) {} template item(const T &p) : kind(&typeid(T)), p(new(UseGC) T(p)) {} template item& operator= (T *a) { kind=&typeid(T); p=(void *) a; return *this; } template item& operator= (const T &it) { kind=&typeid(T); p=new(UseGC) T(it); return *this; } const std::type_info &type() const { return *kind; } #endif template friend inline T get(const item&); friend inline bool isdefault(const item&); friend ostream& operator<< (ostream& out, const item& i); private: template struct help; template struct help { static T* unwrap(const item& it) { #if COMPACT if(!it.empty()) return (T*) it.p; #else if(*it.kind == typeid(T)) return (T*) it.p; #endif throw vm::bad_item_value(); } }; template struct help { static T& unwrap(const item& it) { #if COMPACT if(!it.empty()) return *(T*) it.p; #else if(*it.kind == typeid(T)) return *(T*) it.p; #endif throw vm::bad_item_value(); } }; }; #ifdef SIMPLE_FRAME // In the simple implementation, a frame is just an array of items. typedef item frame; #else class frame : public gc { #ifdef DEBUG_FRAME string name; Int parentIndex; #endif typedef mem::vector internal_vars_t; internal_vars_t vars; // Allow the stack direct access to vars. friend class stack; public: #ifdef DEBUG_FRAME frame(string name, Int parentIndex, size_t size) : name(name), parentIndex(parentIndex), vars(size) {} string getName() { return name; } Int getParentIndex() { return parentIndex; } #else frame(size_t size) : vars(size) {} #endif item& operator[] (size_t n) { return vars[n]; } item operator[] (size_t n) const { return vars[n]; } size_t size() { return vars.size(); } // Extends vars to ensure it has a place for any variable indexed up to n. void extend(size_t n) { if(vars.size() < n) vars.resize(n); } }; #endif template inline T get(const item& it) { return item::help::unwrap(it); } template <> inline int get(const item&) { throw vm::bad_item_value(); } template <> inline Int get(const item& it) { #if COMPACT if(!it.empty()) return it.i; #else if(*it.kind == typeid(Int)) return it.i; #endif throw vm::bad_item_value(); } template <> inline double get(const item& it) { #if COMPACT if(!it.empty()) return it.x; #else if(*it.kind == typeid(double)) return it.x; #endif throw vm::bad_item_value(); } template <> inline bool get(const item& it) { #if COMPACT if(it.i == BoolTruthValue) return true; if(it.i == BoolFalseValue) return false; #else if(*it.kind == typeid(bool)) return it.b; #endif throw vm::bad_item_value(); } #if !COMPACT // This serves as the object for representing a default argument. struct default_t : public gc {}; #endif inline bool isdefault(const item& it) { #if COMPACT return it.i == DefaultValue; #else return *it.kind == typeid(default_t); #endif } ostream& operator<< (ostream& out, const item& i); } // namespace vm #endif // ITEM_H ./asymptote-2.41/runtime.cc0000644000175000017500000016421113064427126015536 0ustar norbertnorbert/***** Autogenerated from runtime.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runtime.in" /***** * runtime.in * Tom Prince 2005/4/15 * * Generate the runtime functions used by the vm::stack machine. * *****/ /* Autogenerated routines are specified like this (separated by a formfeed): type asyname:cname(cparams) { C code } */ // Use Void f() instead of void f() to force an explicit Stack argument. #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 55 "runtime.in" #include #include #include #include #include #include #include "angle.h" #include "pair.h" #include "triple.h" #include "transform.h" #include "path.h" #include "path3.h" #include "pen.h" #include "drawpath.h" #include "guide.h" #include "picture.h" #include "fileio.h" #include "genv.h" #include "builtin.h" #include "texfile.h" #include "pipestream.h" #include "parser.h" #include "stack.h" #include "util.h" #include "locate.h" #include "mathop.h" #include "callable.h" #include "stm.h" #include "lexical.h" #include "process.h" #include "arrayop.h" #ifdef __APPLE__ extern "C" int isnan(double); #endif #if defined(USEGC) && defined(GC_DEBUG) && defined(GC_BACKTRACE) extern "C" { void *GC_generate_random_valid_address(void); void GC_debug_print_heap_obj_proc(void *); } #endif using namespace vm; using namespace camp; using namespace settings; #undef OUT #undef IN namespace run { using camp::pair; using vm::array; using vm::frame; using vm::stack; using camp::transform; using absyntax::runnable; typedef array boolarray; typedef array Intarray; typedef array Intarray2; typedef array realarray; typedef array realarray2; typedef array pairarray; typedef array pairarray2; typedef array triplearray; typedef array triplearray2; typedef array patharray; typedef array patharray2; typedef array guidearray; typedef array transformarray; typedef array penarray; typedef array penarray2; typedef array stringarray; typedef array stringarray2; typedef callable callableBp; typedef callable callableReal; typedef callable callableTransform; } using vm::array; using types::function; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE using types::booleanArray; using types::IntArray; using types::IntArray2; using types::realArray; using types::realArray2; using types::pairArray; using types::pairArray2; using types::tripleArray; using types::tripleArray2; using types::pathArray; using types::pathArray2; using types::guideArray; using types::transformArray; using types::penArray; using types::penArray2; using types::stringArray; using types::stringArray2; using types::formal; function *realRealFunction() { return new function(primReal(),primReal()); } function *realTripleFunction() { return new function(primReal(),primTriple()); } const size_t camp::ColorComponents[]={0,0,1,3,4,0}; namespace vm { #if COMPACT const Int DefaultValue=0x7fffffffffffffffLL; const Int Undefined=0x7ffffffffffffffeLL; const Int BoolTruthValue=0xABABABABABABABACLL; const Int BoolFalseValue=0xABABABABABABABABLL; const item Default=DefaultValue; #else const item Default=item(default_t()); #endif } namespace run { const char *arrayempty="cannot take min or max of empty array"; const char *noruntime="no runtime environment for embedded eval"; void writestring(stack *s) { callable *suffix=pop(s,NULL); string S=pop(s); vm::item it=pop(s); bool defaultfile=isdefault(it); camp::file *f=defaultfile ? &camp::Stdout : vm::get(it); if(!f->isOpen()) return; if(S != "") f->write(S); if(f->text()) { if(suffix) { s->push(f); suffix->call(s); } else if(defaultfile) f->writeline(); } } string emptystring; pair zero; } static string defaulttransparency=string("Compatible"); void unused(void *) { } // Autogenerated routines: #ifndef NOSYM #include "runtime.symbols.h" #endif namespace run { // Initializers #line 227 "runtime.in" void IntZero(stack *Stack) { #line 228 "runtime.in" {Stack->push(0); return;} } #line 233 "runtime.in" void realZero(stack *Stack) { #line 234 "runtime.in" {Stack->push(0.0); return;} } #line 238 "runtime.in" void boolFalse(stack *Stack) { #line 239 "runtime.in" {Stack->push(false); return;} } #line 243 "runtime.in" // bool isnan(real x); void gen_runtime3(stack *Stack) { real x=vm::pop(Stack); #line 244 "runtime.in" {Stack->push(std::isnan(x)); return;} } #line 248 "runtime.in" void pushNullArray(stack *Stack) { #line 249 "runtime.in" {Stack->push(0); return;} } #line 253 "runtime.in" void pushNullRecord(stack *Stack) { #line 254 "runtime.in" {Stack->push(0); return;} } #line 258 "runtime.in" void pushNullFunction(stack *Stack) { #line 259 "runtime.in" {Stack->push(nullfunc::instance()); return;} } // Default operations // Put the default value token on the stack (in place of an argument when // making a function call). #line 268 "runtime.in" void pushDefault(stack *Stack) { #line 269 "runtime.in" {Stack->push(Default); return;} } // Test if the value on the stack is the default value token. #line 275 "runtime.in" void isDefault(stack *Stack) { item i=vm::pop(Stack); #line 276 "runtime.in" {Stack->push(isdefault(i)); return;} } // Casts #line 282 "runtime.in" void pairToGuide(stack *Stack) { pair z=vm::pop(Stack); #line 283 "runtime.in" {Stack->push(new pairguide(z)); return;} } #line 288 "runtime.in" void pathToGuide(stack *Stack) { path p=vm::pop(Stack); #line 289 "runtime.in" {Stack->push(new pathguide(p)); return;} } #line 293 "runtime.in" void guideToPath(stack *Stack) { guide * g=vm::pop(Stack); #line 294 "runtime.in" {Stack->push(g->solve()); return;} } // Pen operations #line 300 "runtime.in" void newPen(stack *Stack) { #line 301 "runtime.in" {Stack->push(pen()); return;} } #line 306 "runtime.in" // bool ==(pen a, pen b); void gen_runtime13(stack *Stack) { pen b=vm::pop(Stack); pen a=vm::pop(Stack); #line 307 "runtime.in" {Stack->push(a == b); return;} } #line 311 "runtime.in" // bool !=(pen a, pen b); void gen_runtime14(stack *Stack) { pen b=vm::pop(Stack); pen a=vm::pop(Stack); #line 312 "runtime.in" {Stack->push(a != b); return;} } #line 316 "runtime.in" // pen +(pen a, pen b); void gen_runtime15(stack *Stack) { pen b=vm::pop(Stack); pen a=vm::pop(Stack); #line 317 "runtime.in" {Stack->push(a+b); return;} } #line 321 "runtime.in" // pen *(real a, pen b); void gen_runtime16(stack *Stack) { pen b=vm::pop(Stack); real a=vm::pop(Stack); #line 322 "runtime.in" {Stack->push(a*b); return;} } #line 326 "runtime.in" // pen *(pen a, real b); void gen_runtime17(stack *Stack) { real b=vm::pop(Stack); pen a=vm::pop(Stack); #line 327 "runtime.in" {Stack->push(b*a); return;} } #line 331 "runtime.in" // pair max(pen p); void gen_runtime18(stack *Stack) { pen p=vm::pop(Stack); #line 332 "runtime.in" {Stack->push(p.bounds().Max()); return;} } #line 336 "runtime.in" // pair min(pen p); void gen_runtime19(stack *Stack) { pen p=vm::pop(Stack); #line 337 "runtime.in" {Stack->push(p.bounds().Min()); return;} } // Reset the meaning of pen default attributes. #line 342 "runtime.in" // void resetdefaultpen(); void gen_runtime20(stack *) { #line 343 "runtime.in" processData().defaultpen=camp::pen::initialpen(); } #line 347 "runtime.in" // void defaultpen(pen p); void gen_runtime21(stack *Stack) { pen p=vm::pop(Stack); #line 348 "runtime.in" processData().defaultpen=pen(resolvepen,p); } #line 352 "runtime.in" // pen defaultpen(); void gen_runtime22(stack *Stack) { #line 353 "runtime.in" {Stack->push(processData().defaultpen); return;} } #line 357 "runtime.in" // bool invisible(pen p); void gen_runtime23(stack *Stack) { pen p=vm::pop(Stack); #line 358 "runtime.in" {Stack->push(p.invisible()); return;} } #line 362 "runtime.in" // pen invisible(); void gen_runtime24(stack *Stack) { #line 363 "runtime.in" {Stack->push(pen(invisiblepen)); return;} } #line 367 "runtime.in" // pen gray(pen p); void gen_runtime25(stack *Stack) { pen p=vm::pop(Stack); #line 368 "runtime.in" p.togrey(); {Stack->push(p); return;} } #line 373 "runtime.in" // pen rgb(pen p); void gen_runtime26(stack *Stack) { pen p=vm::pop(Stack); #line 374 "runtime.in" p.torgb(); {Stack->push(p); return;} } #line 379 "runtime.in" // pen cmyk(pen p); void gen_runtime27(stack *Stack) { pen p=vm::pop(Stack); #line 380 "runtime.in" p.tocmyk(); {Stack->push(p); return;} } #line 385 "runtime.in" // pen interp(pen a, pen b, real t); void gen_runtime28(stack *Stack) { real t=vm::pop(Stack); pen b=vm::pop(Stack); pen a=vm::pop(Stack); #line 386 "runtime.in" {Stack->push(interpolate(a,b,t)); return;} } #line 390 "runtime.in" // pen rgb(real r, real g, real b); void gen_runtime29(stack *Stack) { real b=vm::pop(Stack); real g=vm::pop(Stack); real r=vm::pop(Stack); #line 391 "runtime.in" {Stack->push(pen(r,g,b)); return;} } #line 395 "runtime.in" // pen cmyk(real c, real m, real y, real k); void gen_runtime30(stack *Stack) { real k=vm::pop(Stack); real y=vm::pop(Stack); real m=vm::pop(Stack); real c=vm::pop(Stack); #line 396 "runtime.in" {Stack->push(pen(c,m,y,k)); return;} } #line 400 "runtime.in" // pen gray(real gray); void gen_runtime31(stack *Stack) { real gray=vm::pop(Stack); #line 401 "runtime.in" {Stack->push(pen(gray)); return;} } #line 405 "runtime.in" // realarray* colors(pen p); void gen_runtime32(stack *Stack) { pen p=vm::pop(Stack); #line 406 "runtime.in" size_t n=ColorComponents[p.colorspace()]; array *a=new array(n); switch(n) { case 0: break; case 1: (*a)[0]=p.gray(); break; case 3: (*a)[0]=p.red(); (*a)[1]=p.green(); (*a)[2]=p.blue(); break; case 4: (*a)[0]=p.cyan(); (*a)[1]=p.magenta(); (*a)[2]=p.yellow(); (*a)[3]=p.black(); break; default: break; } {Stack->push(a); return;} } #line 433 "runtime.in" // string hex(pen p); void gen_runtime33(stack *Stack) { pen p=vm::pop(Stack); #line 434 "runtime.in" {Stack->push(p.hex()); return;} } #line 438 "runtime.in" // Int byte(real x); void gen_runtime34(stack *Stack) { real x=vm::pop(Stack); #line 439 "runtime.in" {Stack->push(camp::byte(x)); return;} } #line 443 "runtime.in" // string colorspace(pen p); void gen_runtime35(stack *Stack) { pen p=vm::pop(Stack); #line 444 "runtime.in" string s=ColorDeviceSuffix[p.colorspace()]; std::transform(s.begin(),s.end(),s.begin(),tolower); {Stack->push(s); return;} } #line 450 "runtime.in" // pen pattern(string *s); void gen_runtime36(stack *Stack) { string * s=vm::pop(Stack); #line 451 "runtime.in" {Stack->push(pen(setpattern,*s)); return;} } #line 455 "runtime.in" // string pattern(pen p); void gen_runtime37(stack *Stack) { pen p=vm::pop(Stack); #line 456 "runtime.in" {Stack->push(p.fillpattern()); return;} } #line 460 "runtime.in" // pen fillrule(Int n); void gen_runtime38(stack *Stack) { Int n=vm::pop(Stack); #line 461 "runtime.in" {Stack->push(pen(n >= 0 && n < nFill ? (FillRule) n : DEFFILL)); return;} } #line 465 "runtime.in" // Int fillrule(pen p); void gen_runtime39(stack *Stack) { pen p=vm::pop(Stack); #line 466 "runtime.in" {Stack->push(p.Fillrule()); return;} } #line 470 "runtime.in" // pen opacity(real opacity=1.0, string blend=defaulttransparency); void gen_runtime40(stack *Stack) { string blend=vm::pop(Stack,defaulttransparency); real opacity=vm::pop(Stack,1.0); #line 471 "runtime.in" for(Int i=0; i < nBlendMode; ++i) if(blend == BlendMode[i]) {Stack->push(pen(Transparency(blend,opacity))); return;} ostringstream buf; buf << "Unknown blend mode: " << "'" << blend << "'"; error(buf); } #line 480 "runtime.in" // real opacity(pen p); void gen_runtime41(stack *Stack) { pen p=vm::pop(Stack); #line 481 "runtime.in" {Stack->push(p.opacity()); return;} } #line 485 "runtime.in" // string blend(pen p); void gen_runtime42(stack *Stack) { pen p=vm::pop(Stack); #line 486 "runtime.in" {Stack->push(p.blend()); return;} } #line 490 "runtime.in" // pen linetype(realarray *pattern, real offset=0, bool scale=true, bool adjust=true); void gen_runtime43(stack *Stack) { bool adjust=vm::pop(Stack,true); bool scale=vm::pop(Stack,true); real offset=vm::pop(Stack,0); realarray * pattern=vm::pop(Stack); #line 492 "runtime.in" size_t size=checkArray(pattern); array *a=new array(size); for(size_t i=0; i < size; ++i) (*a)[i]=::max(vm::read(pattern,i),0.0); {Stack->push(pen(LineType(*a,offset,scale,adjust))); return;} } #line 501 "runtime.in" // realarray* linetype(pen p=CURRENTPEN); void gen_runtime44(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 502 "runtime.in" array a=p.linetype()->pattern; {Stack->push(copyArray(&a)); return;} } #line 507 "runtime.in" // real offset(pen p); void gen_runtime45(stack *Stack) { pen p=vm::pop(Stack); #line 508 "runtime.in" {Stack->push(p.linetype()->offset); return;} } #line 512 "runtime.in" // bool scale(pen p); void gen_runtime46(stack *Stack) { pen p=vm::pop(Stack); #line 513 "runtime.in" {Stack->push(p.linetype()->scale); return;} } #line 517 "runtime.in" // bool adjust(pen p); void gen_runtime47(stack *Stack) { pen p=vm::pop(Stack); #line 518 "runtime.in" {Stack->push(p.linetype()->adjust); return;} } #line 522 "runtime.in" // pen adjust(pen p, real arclength, bool cyclic); void gen_runtime48(stack *Stack) { bool cyclic=vm::pop(Stack); real arclength=vm::pop(Stack); pen p=vm::pop(Stack); #line 523 "runtime.in" {Stack->push(adjustdash(p,arclength,cyclic)); return;} } #line 527 "runtime.in" // pen linecap(Int n); void gen_runtime49(stack *Stack) { Int n=vm::pop(Stack); #line 528 "runtime.in" {Stack->push(pen(setlinecap,n >= 0 && n < nCap ? n : DEFCAP)); return;} } #line 532 "runtime.in" // Int linecap(pen p=CURRENTPEN); void gen_runtime50(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 533 "runtime.in" {Stack->push(p.cap()); return;} } #line 537 "runtime.in" // pen linejoin(Int n); void gen_runtime51(stack *Stack) { Int n=vm::pop(Stack); #line 538 "runtime.in" {Stack->push(pen(setlinejoin,n >= 0 && n < nJoin ? n : DEFJOIN)); return;} } #line 542 "runtime.in" // Int linejoin(pen p=CURRENTPEN); void gen_runtime52(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 543 "runtime.in" {Stack->push(p.join()); return;} } #line 547 "runtime.in" // pen miterlimit(real x); void gen_runtime53(stack *Stack) { real x=vm::pop(Stack); #line 548 "runtime.in" {Stack->push(pen(setmiterlimit,x >= 1.0 ? x : DEFJOIN)); return;} } #line 552 "runtime.in" // real miterlimit(pen p=CURRENTPEN); void gen_runtime54(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 553 "runtime.in" {Stack->push(p.miter()); return;} } #line 557 "runtime.in" // pen linewidth(real x); void gen_runtime55(stack *Stack) { real x=vm::pop(Stack); #line 558 "runtime.in" {Stack->push(pen(setlinewidth,x >= 0.0 ? x : DEFWIDTH)); return;} } #line 562 "runtime.in" // real linewidth(pen p=CURRENTPEN); void gen_runtime56(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 563 "runtime.in" {Stack->push(p.width()); return;} } #line 567 "runtime.in" // pen fontcommand(string *s); void gen_runtime57(stack *Stack) { string * s=vm::pop(Stack); #line 568 "runtime.in" {Stack->push(pen(setfont,*s)); return;} } #line 572 "runtime.in" // string font(pen p=CURRENTPEN); void gen_runtime58(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 573 "runtime.in" {Stack->push(p.Font()); return;} } #line 577 "runtime.in" // pen fontsize(real size, real lineskip); void gen_runtime59(stack *Stack) { real lineskip=vm::pop(Stack); real size=vm::pop(Stack); #line 578 "runtime.in" {Stack->push(pen(setfontsize,size > 0.0 ? size : 0.0, lineskip > 0.0 ? lineskip : 0.0)); return;} } #line 583 "runtime.in" // real fontsize(pen p=CURRENTPEN); void gen_runtime60(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 584 "runtime.in" {Stack->push(p.size()); return;} } #line 588 "runtime.in" // real lineskip(pen p=CURRENTPEN); void gen_runtime61(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 589 "runtime.in" {Stack->push(p.Lineskip()); return;} } #line 593 "runtime.in" // pen overwrite(Int n); void gen_runtime62(stack *Stack) { Int n=vm::pop(Stack); #line 594 "runtime.in" {Stack->push(pen(setoverwrite,n >= 0 && n < nOverwrite ? (overwrite_t) n : DEFWRITE)); return;} } #line 599 "runtime.in" // Int overwrite(pen p=CURRENTPEN); void gen_runtime63(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 600 "runtime.in" {Stack->push(p.Overwrite()); return;} } #line 604 "runtime.in" // pen basealign(Int n); void gen_runtime64(stack *Stack) { Int n=vm::pop(Stack); #line 605 "runtime.in" {Stack->push(pen(n >= 0 && n < nBaseLine ? (BaseLine) n : DEFBASE)); return;} } #line 609 "runtime.in" // Int basealign(pen p=CURRENTPEN); void gen_runtime65(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); #line 610 "runtime.in" {Stack->push(p.Baseline()); return;} } #line 614 "runtime.in" // transform transform(pen p); void gen_runtime66(stack *Stack) { pen p=vm::pop(Stack); #line 615 "runtime.in" {Stack->push(p.getTransform()); return;} } #line 619 "runtime.in" // path nib(pen p); void gen_runtime67(stack *Stack) { pen p=vm::pop(Stack); #line 620 "runtime.in" {Stack->push(p.Path()); return;} } #line 624 "runtime.in" // pen makepen(path p); void gen_runtime68(stack *Stack) { path p=vm::pop(Stack); #line 625 "runtime.in" {Stack->push(pen(p)); return;} } #line 629 "runtime.in" // pen colorless(pen p); void gen_runtime69(stack *Stack) { pen p=vm::pop(Stack); #line 630 "runtime.in" p.colorless(); {Stack->push(p); return;} } // Interactive mode #line 636 "runtime.in" // bool interactive(); void gen_runtime70(stack *Stack) { #line 637 "runtime.in" {Stack->push(interact::interactive); return;} } #line 642 "runtime.in" // bool uptodate(); void gen_runtime71(stack *Stack) { #line 643 "runtime.in" {Stack->push(interact::uptodate); return;} } // System commands #line 649 "runtime.in" // Int system(stringarray *s); void gen_runtime72(stack *Stack) { stringarray * s=vm::pop(Stack); #line 650 "runtime.in" if(safe) error("system() call disabled; override with option -nosafe"); size_t size=checkArray(s); if(size == 0) {Stack->push(0); return;} mem::vector cmd; for(size_t i=0; i < size; ++i) cmd.push_back(read(s,i)); {Stack->push(System(cmd)); return;} } #line 661 "runtime.in" // bool view(); void gen_runtime73(stack *Stack) { #line 662 "runtime.in" {Stack->push(view()); return;} } #line 666 "runtime.in" // string asydir(); void gen_runtime74(stack *Stack) { #line 667 "runtime.in" {Stack->push(systemDir); return;} } #line 671 "runtime.in" // string locale(string s=emptystring); void gen_runtime75(stack *Stack) { string s=vm::pop(Stack,emptystring); #line 672 "runtime.in" char *L=setlocale(LC_ALL,s.empty() ? NULL : s.c_str()); {Stack->push(L != NULL ? string(L) : ""); return;} } #line 677 "runtime.in" // void abort(string s=emptystring); void gen_runtime76(stack *Stack) { string s=vm::pop(Stack,emptystring); #line 678 "runtime.in" if(s.empty()) throw handled_error(); error(s.c_str()); } #line 683 "runtime.in" // void exit(); void gen_runtime77(stack *) { #line 684 "runtime.in" throw quit(); } #line 688 "runtime.in" // void assert(bool b, string s=emptystring); void gen_runtime78(stack *Stack) { string s=vm::pop(Stack,emptystring); bool b=vm::pop(Stack); #line 689 "runtime.in" flush(cout); if(!b) { ostringstream buf; buf << "assert FAILED"; if(s != "") buf << ": " << s; error(buf); } } #line 699 "runtime.in" // void sleep(Int seconds); void gen_runtime79(stack *Stack) { Int seconds=vm::pop(Stack); #line 700 "runtime.in" if(seconds <= 0) return; sleep(seconds); } #line 705 "runtime.in" // void usleep(Int microseconds); void gen_runtime80(stack *Stack) { Int microseconds=vm::pop(Stack); #line 706 "runtime.in" if(microseconds <= 0) return; usleep((unsigned long) microseconds); } #line 711 "runtime.in" // void _eval(string *s, bool embedded, bool interactiveWrite=false); void gen_runtime81(stack *Stack) { bool interactiveWrite=vm::pop(Stack,false); bool embedded=vm::pop(Stack); string * s=vm::pop(Stack); #line 712 "runtime.in" if(embedded) { trans::coenv *e=Stack->getEnvironment(); vm::interactiveStack *is=dynamic_cast(Stack); if(e && is) runStringEmbedded(*s, *e, *is); else error(noruntime); } else runString(*s,interactiveWrite); } #line 724 "runtime.in" // void _eval(runnable *s, bool embedded); void gen_runtime82(stack *Stack) { bool embedded=vm::pop(Stack); runnable * s=vm::pop(Stack); #line 725 "runtime.in" absyntax::block *ast=new absyntax::block(s->getPos(), false); ast->add(s); if(embedded) { trans::coenv *e=Stack->getEnvironment(); vm::interactiveStack *is=dynamic_cast(Stack); if(e && is) runCodeEmbedded(ast, *e, *is); else error(noruntime); } else runCode(ast); } #line 740 "runtime.in" // string location(); void gen_runtime83(stack *Stack) { #line 741 "runtime.in" ostringstream buf; buf << getPos(); {Stack->push(buf.str()); return;} } // Wrapper for the stack::load() method. #line 747 "runtime.in" void loadModule(stack *Stack) { string * index=vm::pop(Stack); #line 748 "runtime.in" Stack->load(*index); } #line 752 "runtime.in" // string cd(string s=emptystring); void gen_runtime85(stack *Stack) { string s=vm::pop(Stack,emptystring); #line 753 "runtime.in" if(!s.empty() && !globalwrite()) { string outname=getSetting("outname"); string dir=stripDir(outname); if(dir.empty()) Setting("outname")=getPath()+dirsep+outname; } {Stack->push(setPath(s.c_str())); return;} } #line 762 "runtime.in" // void list(string *s, bool imports=false); void gen_runtime86(stack *Stack) { bool imports=vm::pop(Stack,false); string * s=vm::pop(Stack); #line 763 "runtime.in" if(*s == "-") return; trans::genv ge; symbol name=symbol::trans(*s); record *r=ge.getModule(name,*s); r->e.list(imports ? 0 : r); } // Guide operations #line 773 "runtime.in" void nullGuide(stack *Stack) { #line 774 "runtime.in" {Stack->push(new pathguide(path())); return;} } #line 779 "runtime.in" void dotsGuide(stack *Stack) { guidearray * a=vm::pop(Stack); #line 780 "runtime.in" guidevector v; size_t size=checkArray(a); for (size_t i=0; i < size; ++i) v.push_back(a->read(i)); {Stack->push(new multiguide(v)); return;} } #line 789 "runtime.in" void dashesGuide(stack *Stack) { guidearray * a=vm::pop(Stack); #line 790 "runtime.in" static camp::curlSpec curly; static camp::specguide curlout(&curly, camp::OUT); static camp::specguide curlin(&curly, camp::IN); size_t n=checkArray(a); // a--b is equivalent to a{curl 1}..{curl 1}b guidevector v; if (n > 0) v.push_back(a->read(0)); if (n==1) { v.push_back(&curlout); v.push_back(&curlin); } else for (size_t i=1; iread(i)); } {Stack->push(new multiguide(v)); return;} } #line 816 "runtime.in" void newCycleToken(stack *Stack) { #line 817 "runtime.in" {Stack->push(cycleToken()); return;} } #line 821 "runtime.in" // guide* operator cast(cycleToken tok); void gen_runtime91(stack *Stack) { cycleToken tok=vm::pop(Stack); #line 822 "runtime.in" // Avoid unused variable warning messages. unused(&tok); {Stack->push(new cycletokguide()); return;} } #line 828 "runtime.in" // guide* operator spec(pair z, Int p); void gen_runtime92(stack *Stack) { Int p=vm::pop(Stack); pair z=vm::pop(Stack); #line 829 "runtime.in" camp::side d=(camp::side) p; camp::dirSpec *sp=new camp::dirSpec(z); {Stack->push(new specguide(sp,d)); return;} } #line 836 "runtime.in" // curlSpecifier operator curl(real gamma, Int p); void gen_runtime93(stack *Stack) { Int p=vm::pop(Stack); real gamma=vm::pop(Stack); #line 837 "runtime.in" camp::side s=(camp::side) p; {Stack->push(curlSpecifier(gamma,s)); return;} } #line 842 "runtime.in" void curlSpecifierValuePart(stack *Stack) { curlSpecifier spec=vm::pop(Stack); #line 843 "runtime.in" {Stack->push(spec.getValue()); return;} } #line 847 "runtime.in" void curlSpecifierSidePart(stack *Stack) { curlSpecifier spec=vm::pop(Stack); #line 848 "runtime.in" {Stack->push(spec.getSide()); return;} } #line 852 "runtime.in" // guide* operator cast(curlSpecifier spec); void gen_runtime96(stack *Stack) { curlSpecifier spec=vm::pop(Stack); #line 853 "runtime.in" {Stack->push(new specguide(spec)); return;} } #line 857 "runtime.in" // tensionSpecifier operator tension(real tout, real tin, bool atleast); void gen_runtime97(stack *Stack) { bool atleast=vm::pop(Stack); real tin=vm::pop(Stack); real tout=vm::pop(Stack); #line 858 "runtime.in" {Stack->push(tensionSpecifier(tout, tin, atleast)); return;} } #line 862 "runtime.in" void tensionSpecifierOutPart(stack *Stack) { tensionSpecifier t=vm::pop(Stack); #line 863 "runtime.in" {Stack->push(t.getOut()); return;} } #line 867 "runtime.in" void tensionSpecifierInPart(stack *Stack) { tensionSpecifier t=vm::pop(Stack); #line 868 "runtime.in" {Stack->push(t.getIn()); return;} } #line 872 "runtime.in" void tensionSpecifierAtleastPart(stack *Stack) { tensionSpecifier t=vm::pop(Stack); #line 873 "runtime.in" {Stack->push(t.getAtleast()); return;} } #line 877 "runtime.in" // guide* operator cast(tensionSpecifier t); void gen_runtime101(stack *Stack) { tensionSpecifier t=vm::pop(Stack); #line 878 "runtime.in" {Stack->push(new tensionguide(t)); return;} } #line 882 "runtime.in" // guide* operator controls(pair zout, pair zin); void gen_runtime102(stack *Stack) { pair zin=vm::pop(Stack); pair zout=vm::pop(Stack); #line 883 "runtime.in" {Stack->push(new controlguide(zout, zin)); return;} } #line 887 "runtime.in" // Int size(guide *g); void gen_runtime103(stack *Stack) { guide * g=vm::pop(Stack); #line 888 "runtime.in" flatguide f; g->flatten(f,false); {Stack->push(f.size()); return;} } #line 894 "runtime.in" // Int length(guide *g); void gen_runtime104(stack *Stack) { guide * g=vm::pop(Stack); #line 895 "runtime.in" flatguide f; g->flatten(f,false); {Stack->push(g->cyclic() ? f.size() : f.size()-1); return;} } #line 901 "runtime.in" // bool cyclic(guide *g); void gen_runtime105(stack *Stack) { guide * g=vm::pop(Stack); #line 902 "runtime.in" flatguide f; g->flatten(f,false); {Stack->push(g->cyclic()); return;} } #line 908 "runtime.in" // pair point(guide *g, Int t); void gen_runtime106(stack *Stack) { Int t=vm::pop(Stack); guide * g=vm::pop(Stack); #line 909 "runtime.in" flatguide f; g->flatten(f,false); {Stack->push(f.Nodes(adjustedIndex(t,f.size(),g->cyclic())).z); return;} } #line 915 "runtime.in" // pairarray* dirSpecifier(guide *g, Int t); void gen_runtime107(stack *Stack) { Int t=vm::pop(Stack); guide * g=vm::pop(Stack); #line 916 "runtime.in" flatguide f; g->flatten(f,false); Int n=f.size(); if(!g->cyclic() && (t < 0 || t >= n-1)) {Stack->push(new array(0)); return;} array *c=new array(2); (*c)[0]=f.Nodes(t).out->dir(); (*c)[1]=f.Nodes(t+1).in->dir(); {Stack->push(c); return;} } #line 927 "runtime.in" // pairarray* controlSpecifier(guide *g, Int t); void gen_runtime108(stack *Stack) { Int t=vm::pop(Stack); guide * g=vm::pop(Stack); #line 928 "runtime.in" flatguide f; g->flatten(f,false); Int n=f.size(); if(!g->cyclic() && (t < 0 || t >= n-1)) {Stack->push(new array(0)); return;} knot curr=f.Nodes(t); knot next=f.Nodes(t+1); if(curr.out->controlled()) { assert(next.in->controlled()); array *c=new array(2); (*c)[0]=curr.out->control(); (*c)[1]=next.in->control(); {Stack->push(c); return;} } else {Stack->push(new array(0)); return;} } #line 944 "runtime.in" // tensionSpecifier tensionSpecifier(guide *g, Int t); void gen_runtime109(stack *Stack) { Int t=vm::pop(Stack); guide * g=vm::pop(Stack); #line 945 "runtime.in" flatguide f; g->flatten(f,false); Int n=f.size(); if(!g->cyclic() && (t < 0 || t >= n-1)) {Stack->push(tensionSpecifier(1.0,1.0,false)); return;} knot curr=f.Nodes(t); {Stack->push(tensionSpecifier(curr.tout.val,f.Nodes(t+1).tin.val,curr.tout.atleast)); return;} } #line 954 "runtime.in" // realarray* curlSpecifier(guide *g, Int t); void gen_runtime110(stack *Stack) { Int t=vm::pop(Stack); guide * g=vm::pop(Stack); #line 955 "runtime.in" flatguide f; g->flatten(f,false); Int n=f.size(); if(!g->cyclic() && (t < 0 || t >= n-1)) {Stack->push(new array(0)); return;} array *c=new array(2); real c0=f.Nodes(t).out->curl(); real c1=f.Nodes(t+1).in->curl(); (*c)[0]=c0 >= 0.0 ? c0 : 1.0; (*c)[1]=c1 >= 0.0 ? c1 : 1.0; {Stack->push(c); return;} } #line 968 "runtime.in" // guide* reverse(guide *g); void gen_runtime111(stack *Stack) { guide * g=vm::pop(Stack); #line 969 "runtime.in" flatguide f; g->flatten(f,false); if(f.precyclic()) {Stack->push(new pathguide(g->solve().reverse())); return;} size_t n=f.size(); bool cyclic=g->cyclic(); guidevector v; size_t start=cyclic ? n : n-1; knot curr=f.Nodes(start); knot next=curr; for(size_t i=start; i > 0; --i) { next=f.Nodes(i-1); v.push_back(new pairguide(curr.z)); if(next.out->controlled()) { assert(curr.in->controlled()); v.push_back(new controlguide(curr.in->control(),next.out->control())); } else { pair d=curr.in->dir(); if(d != zero) v.push_back(new specguide(new dirSpec(-d),camp::OUT)); else { real C=curr.in->curl(); if(C >= 0.0) v.push_back(new specguide(new curlSpec(C),camp::OUT)); } real tout=curr.tin.val; real tin=next.tout.val; bool atleast=next.tout.atleast; if(tout != 1.0 || tin != 1.0 || next.tout.atleast) v.push_back(new tensionguide(tensionSpecifier(tout,tin,atleast))); d=next.out->dir(); if(d != zero) v.push_back(new specguide(new dirSpec(-d),camp::IN)); else { real C=next.out->curl(); if(C >= 0.0) v.push_back(new specguide(new curlSpec(C),camp::IN)); } } curr=next; } if(cyclic) v.push_back(new cycletokguide()); else v.push_back(new pairguide(next.z)); {Stack->push(new multiguide(v)); return;} } #line 1021 "runtime.in" // realarray* _cputime(); void gen_runtime112(stack *Stack) { #line 1022 "runtime.in" static const real ticktime=1.0/sysconf(_SC_CLK_TCK); struct tms buf; ::times(&buf); array *t=new array(4); (*t)[0] = ((real) buf.tms_utime)*ticktime; (*t)[1] = ((real) buf.tms_stime)*ticktime; (*t)[2] = ((real) buf.tms_cutime)*ticktime; (*t)[3] = ((real) buf.tms_cstime)*ticktime; {Stack->push(t); return;} } // Transforms #line 1037 "runtime.in" // bool ==(transform a, transform b); void gen_runtime113(stack *Stack) { transform b=vm::pop(Stack); transform a=vm::pop(Stack); #line 1038 "runtime.in" {Stack->push(a == b); return;} } #line 1043 "runtime.in" // bool !=(transform a, transform b); void gen_runtime114(stack *Stack) { transform b=vm::pop(Stack); transform a=vm::pop(Stack); #line 1044 "runtime.in" {Stack->push(a != b); return;} } #line 1048 "runtime.in" // transform +(transform a, transform b); void gen_runtime115(stack *Stack) { transform b=vm::pop(Stack); transform a=vm::pop(Stack); #line 1049 "runtime.in" {Stack->push(a+b); return;} } #line 1053 "runtime.in" // transform *(transform a, transform b); void gen_runtime116(stack *Stack) { transform b=vm::pop(Stack); transform a=vm::pop(Stack); #line 1054 "runtime.in" {Stack->push(a*b); return;} } #line 1058 "runtime.in" // pair *(transform t, pair z); void gen_runtime117(stack *Stack) { pair z=vm::pop(Stack); transform t=vm::pop(Stack); #line 1059 "runtime.in" {Stack->push(t*z); return;} } #line 1063 "runtime.in" // path *(transform t, path g); void gen_runtime118(stack *Stack) { path g=vm::pop(Stack); transform t=vm::pop(Stack); #line 1064 "runtime.in" {Stack->push(transformed(t,g)); return;} } #line 1068 "runtime.in" // pen *(transform t, pen p); void gen_runtime119(stack *Stack) { pen p=vm::pop(Stack); transform t=vm::pop(Stack); #line 1069 "runtime.in" {Stack->push(transformed(t,p)); return;} } #line 1073 "runtime.in" // picture* *(transform t, picture *f); void gen_runtime120(stack *Stack) { picture * f=vm::pop(Stack); transform t=vm::pop(Stack); #line 1074 "runtime.in" {Stack->push(transformed(t,f)); return;} } #line 1078 "runtime.in" // picture* *(realarray2 *t, picture *f); void gen_runtime121(stack *Stack) { picture * f=vm::pop(Stack); realarray2 * t=vm::pop(Stack); #line 1079 "runtime.in" {Stack->push(transformed(*t,f)); return;} } #line 1083 "runtime.in" // transform ^(transform t, Int n); void gen_runtime122(stack *Stack) { Int n=vm::pop(Stack); transform t=vm::pop(Stack); #line 1084 "runtime.in" transform T; if(n < 0) { n=-n; t=inverse(t); } for(Int i=0; i < n; i++) T=T*t; {Stack->push(T); return;} } #line 1094 "runtime.in" void transformXPart(stack *Stack) { transform t=vm::pop(Stack); #line 1095 "runtime.in" {Stack->push(t.getx()); return;} } #line 1099 "runtime.in" void transformYPart(stack *Stack) { transform t=vm::pop(Stack); #line 1100 "runtime.in" {Stack->push(t.gety()); return;} } #line 1104 "runtime.in" void transformXXPart(stack *Stack) { transform t=vm::pop(Stack); #line 1105 "runtime.in" {Stack->push(t.getxx()); return;} } #line 1109 "runtime.in" void transformXYPart(stack *Stack) { transform t=vm::pop(Stack); #line 1110 "runtime.in" {Stack->push(t.getxy()); return;} } #line 1114 "runtime.in" void transformYXPart(stack *Stack) { transform t=vm::pop(Stack); #line 1115 "runtime.in" {Stack->push(t.getyx()); return;} } #line 1119 "runtime.in" void transformYYPart(stack *Stack) { transform t=vm::pop(Stack); #line 1120 "runtime.in" {Stack->push(t.getyy()); return;} } #line 1124 "runtime.in" void real6ToTransform(stack *Stack) { real yy=vm::pop(Stack); real yx=vm::pop(Stack); real xy=vm::pop(Stack); real xx=vm::pop(Stack); real y=vm::pop(Stack); real x=vm::pop(Stack); #line 1126 "runtime.in" {Stack->push(transform(x,y,xx,xy,yx,yy)); return;} } #line 1130 "runtime.in" // transform shift(transform t); void gen_runtime130(stack *Stack) { transform t=vm::pop(Stack); #line 1131 "runtime.in" {Stack->push(transform(t.getx(),t.gety(),0,0,0,0)); return;} } #line 1135 "runtime.in" // transform shiftless(transform t); void gen_runtime131(stack *Stack) { transform t=vm::pop(Stack); #line 1136 "runtime.in" {Stack->push(transform(0,0,t.getxx(),t.getxy(),t.getyx(),t.getyy())); return;} } #line 1140 "runtime.in" // transform identity(); void transformIdentity(stack *Stack) { #line 1141 "runtime.in" {Stack->push(identity); return;} } #line 1145 "runtime.in" // transform inverse(transform t); void gen_runtime133(stack *Stack) { transform t=vm::pop(Stack); #line 1146 "runtime.in" {Stack->push(inverse(t)); return;} } #line 1150 "runtime.in" // transform shift(pair z); void gen_runtime134(stack *Stack) { pair z=vm::pop(Stack); #line 1151 "runtime.in" {Stack->push(shift(z)); return;} } #line 1155 "runtime.in" // transform shift(real x, real y); void gen_runtime135(stack *Stack) { real y=vm::pop(Stack); real x=vm::pop(Stack); #line 1156 "runtime.in" {Stack->push(shift(pair(x,y))); return;} } #line 1160 "runtime.in" // transform xscale(real x); void gen_runtime136(stack *Stack) { real x=vm::pop(Stack); #line 1161 "runtime.in" {Stack->push(xscale(x)); return;} } #line 1165 "runtime.in" // transform yscale(real y); void gen_runtime137(stack *Stack) { real y=vm::pop(Stack); #line 1166 "runtime.in" {Stack->push(yscale(y)); return;} } #line 1170 "runtime.in" // transform scale(real x); void gen_runtime138(stack *Stack) { real x=vm::pop(Stack); #line 1171 "runtime.in" {Stack->push(scale(x)); return;} } #line 1175 "runtime.in" // transform scale(real x, real y); void gen_runtime139(stack *Stack) { real y=vm::pop(Stack); real x=vm::pop(Stack); #line 1176 "runtime.in" {Stack->push(scale(x,y)); return;} } #line 1180 "runtime.in" // transform slant(real s); void gen_runtime140(stack *Stack) { real s=vm::pop(Stack); #line 1181 "runtime.in" {Stack->push(slant(s)); return;} } #line 1185 "runtime.in" // transform rotate(real angle, pair z=0); void gen_runtime141(stack *Stack) { pair z=vm::pop(Stack,0); real angle=vm::pop(Stack); #line 1186 "runtime.in" {Stack->push(rotatearound(z,radians(angle))); return;} } #line 1190 "runtime.in" // transform reflect(pair a, pair b); void gen_runtime142(stack *Stack) { pair b=vm::pop(Stack); pair a=vm::pop(Stack); #line 1191 "runtime.in" {Stack->push(reflectabout(a,b)); return;} } } // namespace run namespace trans { void gen_runtime_venv(venv &ve) { #line 225 "runtime.in" REGISTER_BLTIN(run::IntZero,"IntZero"); #line 233 "runtime.in" REGISTER_BLTIN(run::realZero,"realZero"); #line 238 "runtime.in" REGISTER_BLTIN(run::boolFalse,"boolFalse"); #line 243 "runtime.in" addFunc(ve, run::gen_runtime3, primBoolean(), SYM(isnan), formal(primReal(), SYM(x), false, false)); #line 248 "runtime.in" REGISTER_BLTIN(run::pushNullArray,"pushNullArray"); #line 253 "runtime.in" REGISTER_BLTIN(run::pushNullRecord,"pushNullRecord"); #line 258 "runtime.in" REGISTER_BLTIN(run::pushNullFunction,"pushNullFunction"); #line 263 "runtime.in" REGISTER_BLTIN(run::pushDefault,"pushDefault"); #line 273 "runtime.in" REGISTER_BLTIN(run::isDefault,"isDefault"); #line 280 "runtime.in" REGISTER_BLTIN(run::pairToGuide,"pairToGuide"); #line 288 "runtime.in" REGISTER_BLTIN(run::pathToGuide,"pathToGuide"); #line 293 "runtime.in" REGISTER_BLTIN(run::guideToPath,"guideToPath"); #line 298 "runtime.in" REGISTER_BLTIN(run::newPen,"newPen"); #line 306 "runtime.in" addFunc(ve, run::gen_runtime13, primBoolean(), SYM_EQ, formal(primPen(), SYM(a), false, false), formal(primPen(), SYM(b), false, false)); #line 311 "runtime.in" addFunc(ve, run::gen_runtime14, primBoolean(), SYM_NEQ, formal(primPen(), SYM(a), false, false), formal(primPen(), SYM(b), false, false)); #line 316 "runtime.in" addFunc(ve, run::gen_runtime15, primPen(), SYM_PLUS, formal(primPen(), SYM(a), false, false), formal(primPen(), SYM(b), false, false)); #line 321 "runtime.in" addFunc(ve, run::gen_runtime16, primPen(), SYM_TIMES, formal(primReal(), SYM(a), false, false), formal(primPen(), SYM(b), false, false)); #line 326 "runtime.in" addFunc(ve, run::gen_runtime17, primPen(), SYM_TIMES, formal(primPen(), SYM(a), false, false), formal(primReal(), SYM(b), false, false)); #line 331 "runtime.in" addFunc(ve, run::gen_runtime18, primPair(), SYM(max), formal(primPen(), SYM(p), false, false)); #line 336 "runtime.in" addFunc(ve, run::gen_runtime19, primPair(), SYM(min), formal(primPen(), SYM(p), false, false)); #line 341 "runtime.in" addFunc(ve, run::gen_runtime20, primVoid(), SYM(resetdefaultpen)); #line 347 "runtime.in" addFunc(ve, run::gen_runtime21, primVoid(), SYM(defaultpen), formal(primPen(), SYM(p), false, false)); #line 352 "runtime.in" addFunc(ve, run::gen_runtime22, primPen(), SYM(defaultpen)); #line 357 "runtime.in" addFunc(ve, run::gen_runtime23, primBoolean(), SYM(invisible), formal(primPen(), SYM(p), false, false)); #line 362 "runtime.in" addFunc(ve, run::gen_runtime24, primPen(), SYM(invisible)); #line 367 "runtime.in" addFunc(ve, run::gen_runtime25, primPen(), SYM(gray), formal(primPen(), SYM(p), false, false)); #line 373 "runtime.in" addFunc(ve, run::gen_runtime26, primPen(), SYM(rgb), formal(primPen(), SYM(p), false, false)); #line 379 "runtime.in" addFunc(ve, run::gen_runtime27, primPen(), SYM(cmyk), formal(primPen(), SYM(p), false, false)); #line 385 "runtime.in" addFunc(ve, run::gen_runtime28, primPen(), SYM(interp), formal(primPen(), SYM(a), false, false), formal(primPen(), SYM(b), false, false), formal(primReal(), SYM(t), false, false)); #line 390 "runtime.in" addFunc(ve, run::gen_runtime29, primPen(), SYM(rgb), formal(primReal(), SYM(r), false, false), formal(primReal(), SYM(g), false, false), formal(primReal(), SYM(b), false, false)); #line 395 "runtime.in" addFunc(ve, run::gen_runtime30, primPen(), SYM(cmyk), formal(primReal(), SYM(c), false, false), formal(primReal(), SYM(m), false, false), formal(primReal(), SYM(y), false, false), formal(primReal(), SYM(k), false, false)); #line 400 "runtime.in" addFunc(ve, run::gen_runtime31, primPen(), SYM(gray), formal(primReal(), SYM(gray), false, false)); #line 405 "runtime.in" addFunc(ve, run::gen_runtime32, realArray(), SYM(colors), formal(primPen(), SYM(p), false, false)); #line 433 "runtime.in" addFunc(ve, run::gen_runtime33, primString() , SYM(hex), formal(primPen(), SYM(p), false, false)); #line 438 "runtime.in" addFunc(ve, run::gen_runtime34, primInt(), SYM(byte), formal(primReal(), SYM(x), false, false)); #line 443 "runtime.in" addFunc(ve, run::gen_runtime35, primString() , SYM(colorspace), formal(primPen(), SYM(p), false, false)); #line 450 "runtime.in" addFunc(ve, run::gen_runtime36, primPen(), SYM(pattern), formal(primString(), SYM(s), false, false)); #line 455 "runtime.in" addFunc(ve, run::gen_runtime37, primString() , SYM(pattern), formal(primPen(), SYM(p), false, false)); #line 460 "runtime.in" addFunc(ve, run::gen_runtime38, primPen(), SYM(fillrule), formal(primInt(), SYM(n), false, false)); #line 465 "runtime.in" addFunc(ve, run::gen_runtime39, primInt(), SYM(fillrule), formal(primPen(), SYM(p), false, false)); #line 470 "runtime.in" addFunc(ve, run::gen_runtime40, primPen(), SYM(opacity), formal(primReal(), SYM(opacity), true, false), formal(primString() , SYM(blend), true, false)); #line 480 "runtime.in" addFunc(ve, run::gen_runtime41, primReal(), SYM(opacity), formal(primPen(), SYM(p), false, false)); #line 485 "runtime.in" addFunc(ve, run::gen_runtime42, primString() , SYM(blend), formal(primPen(), SYM(p), false, false)); #line 490 "runtime.in" addFunc(ve, run::gen_runtime43, primPen(), SYM(linetype), formal(realArray(), SYM(pattern), false, false), formal(primReal(), SYM(offset), true, false), formal(primBoolean(), SYM(scale), true, false), formal(primBoolean(), SYM(adjust), true, false)); #line 501 "runtime.in" addFunc(ve, run::gen_runtime44, realArray(), SYM(linetype), formal(primPen(), SYM(p), true, false)); #line 507 "runtime.in" addFunc(ve, run::gen_runtime45, primReal(), SYM(offset), formal(primPen(), SYM(p), false, false)); #line 512 "runtime.in" addFunc(ve, run::gen_runtime46, primBoolean(), SYM(scale), formal(primPen(), SYM(p), false, false)); #line 517 "runtime.in" addFunc(ve, run::gen_runtime47, primBoolean(), SYM(adjust), formal(primPen(), SYM(p), false, false)); #line 522 "runtime.in" addFunc(ve, run::gen_runtime48, primPen(), SYM(adjust), formal(primPen(), SYM(p), false, false), formal(primReal(), SYM(arclength), false, false), formal(primBoolean(), SYM(cyclic), false, false)); #line 527 "runtime.in" addFunc(ve, run::gen_runtime49, primPen(), SYM(linecap), formal(primInt(), SYM(n), false, false)); #line 532 "runtime.in" addFunc(ve, run::gen_runtime50, primInt(), SYM(linecap), formal(primPen(), SYM(p), true, false)); #line 537 "runtime.in" addFunc(ve, run::gen_runtime51, primPen(), SYM(linejoin), formal(primInt(), SYM(n), false, false)); #line 542 "runtime.in" addFunc(ve, run::gen_runtime52, primInt(), SYM(linejoin), formal(primPen(), SYM(p), true, false)); #line 547 "runtime.in" addFunc(ve, run::gen_runtime53, primPen(), SYM(miterlimit), formal(primReal(), SYM(x), false, false)); #line 552 "runtime.in" addFunc(ve, run::gen_runtime54, primReal(), SYM(miterlimit), formal(primPen(), SYM(p), true, false)); #line 557 "runtime.in" addFunc(ve, run::gen_runtime55, primPen(), SYM(linewidth), formal(primReal(), SYM(x), false, false)); #line 562 "runtime.in" addFunc(ve, run::gen_runtime56, primReal(), SYM(linewidth), formal(primPen(), SYM(p), true, false)); #line 567 "runtime.in" addFunc(ve, run::gen_runtime57, primPen(), SYM(fontcommand), formal(primString(), SYM(s), false, false)); #line 572 "runtime.in" addFunc(ve, run::gen_runtime58, primString() , SYM(font), formal(primPen(), SYM(p), true, false)); #line 577 "runtime.in" addFunc(ve, run::gen_runtime59, primPen(), SYM(fontsize), formal(primReal(), SYM(size), false, false), formal(primReal(), SYM(lineskip), false, false)); #line 583 "runtime.in" addFunc(ve, run::gen_runtime60, primReal(), SYM(fontsize), formal(primPen(), SYM(p), true, false)); #line 588 "runtime.in" addFunc(ve, run::gen_runtime61, primReal(), SYM(lineskip), formal(primPen(), SYM(p), true, false)); #line 593 "runtime.in" addFunc(ve, run::gen_runtime62, primPen(), SYM(overwrite), formal(primInt(), SYM(n), false, false)); #line 599 "runtime.in" addFunc(ve, run::gen_runtime63, primInt(), SYM(overwrite), formal(primPen(), SYM(p), true, false)); #line 604 "runtime.in" addFunc(ve, run::gen_runtime64, primPen(), SYM(basealign), formal(primInt(), SYM(n), false, false)); #line 609 "runtime.in" addFunc(ve, run::gen_runtime65, primInt(), SYM(basealign), formal(primPen(), SYM(p), true, false)); #line 614 "runtime.in" addFunc(ve, run::gen_runtime66, primTransform(), SYM(transform), formal(primPen(), SYM(p), false, false)); #line 619 "runtime.in" addFunc(ve, run::gen_runtime67, primPath(), SYM(nib), formal(primPen(), SYM(p), false, false)); #line 624 "runtime.in" addFunc(ve, run::gen_runtime68, primPen(), SYM(makepen), formal(primPath(), SYM(p), false, false)); #line 629 "runtime.in" addFunc(ve, run::gen_runtime69, primPen(), SYM(colorless), formal(primPen(), SYM(p), false, false)); #line 635 "runtime.in" addFunc(ve, run::gen_runtime70, primBoolean(), SYM(interactive)); #line 642 "runtime.in" addFunc(ve, run::gen_runtime71, primBoolean(), SYM(uptodate)); #line 647 "runtime.in" addFunc(ve, run::gen_runtime72, primInt(), SYM(system), formal(stringArray(), SYM(s), false, false)); #line 661 "runtime.in" addFunc(ve, run::gen_runtime73, primBoolean(), SYM(view)); #line 666 "runtime.in" addFunc(ve, run::gen_runtime74, primString() , SYM(asydir)); #line 671 "runtime.in" addFunc(ve, run::gen_runtime75, primString() , SYM(locale), formal(primString() , SYM(s), true, false)); #line 677 "runtime.in" addFunc(ve, run::gen_runtime76, primVoid(), SYM(abort), formal(primString() , SYM(s), true, false)); #line 683 "runtime.in" addFunc(ve, run::gen_runtime77, primVoid(), SYM(exit)); #line 688 "runtime.in" addFunc(ve, run::gen_runtime78, primVoid(), SYM(assert), formal(primBoolean(), SYM(b), false, false), formal(primString() , SYM(s), true, false)); #line 699 "runtime.in" addFunc(ve, run::gen_runtime79, primVoid(), SYM(sleep), formal(primInt(), SYM(seconds), false, false)); #line 705 "runtime.in" addFunc(ve, run::gen_runtime80, primVoid(), SYM(usleep), formal(primInt(), SYM(microseconds), false, false)); #line 711 "runtime.in" addFunc(ve, run::gen_runtime81, primVoid(), SYM(_eval), formal(primString(), SYM(s), false, false), formal(primBoolean(), SYM(embedded), false, false), formal(primBoolean(), SYM(interactivewrite), true, false)); #line 724 "runtime.in" addFunc(ve, run::gen_runtime82, primVoid(), SYM(_eval), formal(primCode(), SYM(s), false, false), formal(primBoolean(), SYM(embedded), false, false)); #line 740 "runtime.in" addFunc(ve, run::gen_runtime83, primString() , SYM(location)); #line 746 "runtime.in" REGISTER_BLTIN(run::loadModule,"loadModule"); #line 752 "runtime.in" addFunc(ve, run::gen_runtime85, primString() , SYM(cd), formal(primString() , SYM(s), true, false)); #line 762 "runtime.in" addFunc(ve, run::gen_runtime86, primVoid(), SYM(list), formal(primString(), SYM(s), false, false), formal(primBoolean(), SYM(imports), true, false)); #line 771 "runtime.in" REGISTER_BLTIN(run::nullGuide,"nullGuide"); #line 779 "runtime.in" REGISTER_BLTIN(run::dotsGuide,"dotsGuide"); #line 789 "runtime.in" REGISTER_BLTIN(run::dashesGuide,"dashesGuide"); #line 816 "runtime.in" REGISTER_BLTIN(run::newCycleToken,"newCycleToken"); #line 821 "runtime.in" addFunc(ve, run::gen_runtime91, primGuide(), symbol::trans("operator cast"), formal(primCycleToken(), SYM(tok), false, false)); #line 828 "runtime.in" addFunc(ve, run::gen_runtime92, primGuide(), symbol::trans("operator spec"), formal(primPair(), SYM(z), false, false), formal(primInt(), SYM(p), false, false)); #line 836 "runtime.in" addFunc(ve, run::gen_runtime93, primCurlSpecifier(), SYM_CURL, formal(primReal(), SYM(gamma), false, false), formal(primInt(), SYM(p), false, false)); #line 842 "runtime.in" REGISTER_BLTIN(run::curlSpecifierValuePart,"curlSpecifierValuePart"); #line 847 "runtime.in" REGISTER_BLTIN(run::curlSpecifierSidePart,"curlSpecifierSidePart"); #line 852 "runtime.in" addFunc(ve, run::gen_runtime96, primGuide(), symbol::trans("operator cast"), formal(primCurlSpecifier(), SYM(spec), false, false)); #line 857 "runtime.in" addFunc(ve, run::gen_runtime97, primTensionSpecifier(), SYM_TENSION, formal(primReal(), SYM(tout), false, false), formal(primReal(), SYM(tin), false, false), formal(primBoolean(), SYM(atleast), false, false)); #line 862 "runtime.in" REGISTER_BLTIN(run::tensionSpecifierOutPart,"tensionSpecifierOutPart"); #line 867 "runtime.in" REGISTER_BLTIN(run::tensionSpecifierInPart,"tensionSpecifierInPart"); #line 872 "runtime.in" REGISTER_BLTIN(run::tensionSpecifierAtleastPart,"tensionSpecifierAtleastPart"); #line 877 "runtime.in" addFunc(ve, run::gen_runtime101, primGuide(), symbol::trans("operator cast"), formal(primTensionSpecifier(), SYM(t), false, false)); #line 882 "runtime.in" addFunc(ve, run::gen_runtime102, primGuide(), SYM_CONTROLS, formal(primPair(), SYM(zout), false, false), formal(primPair(), SYM(zin), false, false)); #line 887 "runtime.in" addFunc(ve, run::gen_runtime103, primInt(), SYM(size), formal(primGuide(), SYM(g), false, false)); #line 894 "runtime.in" addFunc(ve, run::gen_runtime104, primInt(), SYM(length), formal(primGuide(), SYM(g), false, false)); #line 901 "runtime.in" addFunc(ve, run::gen_runtime105, primBoolean(), SYM(cyclic), formal(primGuide(), SYM(g), false, false)); #line 908 "runtime.in" addFunc(ve, run::gen_runtime106, primPair(), SYM(point), formal(primGuide(), SYM(g), false, false), formal(primInt(), SYM(t), false, false)); #line 915 "runtime.in" addFunc(ve, run::gen_runtime107, pairArray(), SYM(dirSpecifier), formal(primGuide(), SYM(g), false, false), formal(primInt(), SYM(t), false, false)); #line 927 "runtime.in" addFunc(ve, run::gen_runtime108, pairArray(), SYM(controlSpecifier), formal(primGuide(), SYM(g), false, false), formal(primInt(), SYM(t), false, false)); #line 944 "runtime.in" addFunc(ve, run::gen_runtime109, primTensionSpecifier(), SYM(tensionSpecifier), formal(primGuide(), SYM(g), false, false), formal(primInt(), SYM(t), false, false)); #line 954 "runtime.in" addFunc(ve, run::gen_runtime110, realArray(), SYM(curlSpecifier), formal(primGuide(), SYM(g), false, false), formal(primInt(), SYM(t), false, false)); #line 968 "runtime.in" addFunc(ve, run::gen_runtime111, primGuide(), SYM(reverse), formal(primGuide(), SYM(g), false, false)); #line 1021 "runtime.in" addFunc(ve, run::gen_runtime112, realArray(), SYM(_cputime)); #line 1035 "runtime.in" addFunc(ve, run::gen_runtime113, primBoolean(), SYM_EQ, formal(primTransform(), SYM(a), false, false), formal(primTransform(), SYM(b), false, false)); #line 1043 "runtime.in" addFunc(ve, run::gen_runtime114, primBoolean(), SYM_NEQ, formal(primTransform(), SYM(a), false, false), formal(primTransform(), SYM(b), false, false)); #line 1048 "runtime.in" addFunc(ve, run::gen_runtime115, primTransform(), SYM_PLUS, formal(primTransform(), SYM(a), false, false), formal(primTransform(), SYM(b), false, false)); #line 1053 "runtime.in" addFunc(ve, run::gen_runtime116, primTransform(), SYM_TIMES, formal(primTransform(), SYM(a), false, false), formal(primTransform(), SYM(b), false, false)); #line 1058 "runtime.in" addFunc(ve, run::gen_runtime117, primPair(), SYM_TIMES, formal(primTransform(), SYM(t), false, false), formal(primPair(), SYM(z), false, false)); #line 1063 "runtime.in" addFunc(ve, run::gen_runtime118, primPath(), SYM_TIMES, formal(primTransform(), SYM(t), false, false), formal(primPath(), SYM(g), false, false)); #line 1068 "runtime.in" addFunc(ve, run::gen_runtime119, primPen(), SYM_TIMES, formal(primTransform(), SYM(t), false, false), formal(primPen(), SYM(p), false, false)); #line 1073 "runtime.in" addFunc(ve, run::gen_runtime120, primPicture(), SYM_TIMES, formal(primTransform(), SYM(t), false, false), formal(primPicture(), SYM(f), false, false)); #line 1078 "runtime.in" addFunc(ve, run::gen_runtime121, primPicture(), SYM_TIMES, formal(realArray2(), SYM(t), false, false), formal(primPicture(), SYM(f), false, false)); #line 1083 "runtime.in" addFunc(ve, run::gen_runtime122, primTransform(), SYM_CARET, formal(primTransform(), SYM(t), false, false), formal(primInt(), SYM(n), false, false)); #line 1094 "runtime.in" REGISTER_BLTIN(run::transformXPart,"transformXPart"); #line 1099 "runtime.in" REGISTER_BLTIN(run::transformYPart,"transformYPart"); #line 1104 "runtime.in" REGISTER_BLTIN(run::transformXXPart,"transformXXPart"); #line 1109 "runtime.in" REGISTER_BLTIN(run::transformXYPart,"transformXYPart"); #line 1114 "runtime.in" REGISTER_BLTIN(run::transformYXPart,"transformYXPart"); #line 1119 "runtime.in" REGISTER_BLTIN(run::transformYYPart,"transformYYPart"); #line 1124 "runtime.in" REGISTER_BLTIN(run::real6ToTransform,"real6ToTransform"); #line 1130 "runtime.in" addFunc(ve, run::gen_runtime130, primTransform(), SYM(shift), formal(primTransform(), SYM(t), false, false)); #line 1135 "runtime.in" addFunc(ve, run::gen_runtime131, primTransform(), SYM(shiftless), formal(primTransform(), SYM(t), false, false)); #line 1140 "runtime.in" addFunc(ve, run::transformIdentity, primTransform(), SYM(identity)); #line 1145 "runtime.in" addFunc(ve, run::gen_runtime133, primTransform(), SYM(inverse), formal(primTransform(), SYM(t), false, false)); #line 1150 "runtime.in" addFunc(ve, run::gen_runtime134, primTransform(), SYM(shift), formal(primPair(), SYM(z), false, false)); #line 1155 "runtime.in" addFunc(ve, run::gen_runtime135, primTransform(), SYM(shift), formal(primReal(), SYM(x), false, false), formal(primReal(), SYM(y), false, false)); #line 1160 "runtime.in" addFunc(ve, run::gen_runtime136, primTransform(), SYM(xscale), formal(primReal(), SYM(x), false, false)); #line 1165 "runtime.in" addFunc(ve, run::gen_runtime137, primTransform(), SYM(yscale), formal(primReal(), SYM(y), false, false)); #line 1170 "runtime.in" addFunc(ve, run::gen_runtime138, primTransform(), SYM(scale), formal(primReal(), SYM(x), false, false)); #line 1175 "runtime.in" addFunc(ve, run::gen_runtime139, primTransform(), SYM(scale), formal(primReal(), SYM(x), false, false), formal(primReal(), SYM(y), false, false)); #line 1180 "runtime.in" addFunc(ve, run::gen_runtime140, primTransform(), SYM(slant), formal(primReal(), SYM(s), false, false)); #line 1185 "runtime.in" addFunc(ve, run::gen_runtime141, primTransform(), SYM(rotate), formal(primReal(), SYM(angle), false, false), formal(primPair(), SYM(z), true, false)); #line 1190 "runtime.in" addFunc(ve, run::gen_runtime142, primTransform(), SYM(reflect), formal(primPair(), SYM(a), false, false), formal(primPair(), SYM(b), false, false)); } } // namespace trans ./asymptote-2.41/runmath.cc0000644000175000017500000004155213064427126015533 0ustar norbertnorbert/***** Autogenerated from runmath.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runmath.in" /***** * runmath.in * * Runtime functions for math operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 12 "runmath.in" #include #include "mathop.h" #include "path.h" #ifdef __CYGWIN__ extern "C" double yn(int, double); extern "C" double jn(int, double); #endif using namespace camp; typedef array realarray; typedef array pairarray; using types::realArray; using types::pairArray; using run::integeroverflow; using vm::frame; const char *invalidargument="invalid argument"; extern uint32_t CLZ(uint32_t a); // Return the factorial of a non-negative integer using a lookup table. Int factorial(Int n) { static Int *table; static Int size=0; if(size == 0) { Int f=1; size=2; while(f <= Int_MAX/size) f *= (size++); table=new Int[size]; table[0]=f=1; for(Int i=1; i < size; ++i) { f *= i; table[i]=f; } } if(n >= size) integeroverflow(0); return table[n]; } static inline Int Round(double x) { return Int(x+((x >= 0) ? 0.5 : -0.5)); } inline Int sgn(double x) { return (x > 0.0 ? 1 : (x < 0.0 ? -1 : 0)); } static bool initializeRandom=true; void Srand(Int seed) { initializeRandom=false; const int n=256; static char state[n]; initstate(intcast(seed),state,n); } // Autogenerated routines: #ifndef NOSYM #include "runmath.symbols.h" #endif namespace run { #line 81 "runmath.in" // real ^(real x, Int y); void gen_runmath0(stack *Stack) { Int y=vm::pop(Stack); real x=vm::pop(Stack); #line 82 "runmath.in" {Stack->push(pow(x,y)); return;} } #line 86 "runmath.in" // pair ^(pair z, Int y); void gen_runmath1(stack *Stack) { Int y=vm::pop(Stack); pair z=vm::pop(Stack); #line 87 "runmath.in" {Stack->push(pow(z,y)); return;} } #line 91 "runmath.in" // Int quotient(Int x, Int y); void gen_runmath2(stack *Stack) { Int y=vm::pop(Stack); Int x=vm::pop(Stack); #line 92 "runmath.in" {Stack->push(quotient()(x,y)); return;} } #line 96 "runmath.in" // Int abs(Int x); void gen_runmath3(stack *Stack) { Int x=vm::pop(Stack); #line 97 "runmath.in" {Stack->push(Abs(x)); return;} } #line 101 "runmath.in" // Int sgn(real x); void gen_runmath4(stack *Stack) { real x=vm::pop(Stack); #line 102 "runmath.in" {Stack->push(sgn(x)); return;} } #line 106 "runmath.in" // Int rand(); void gen_runmath5(stack *Stack) { #line 107 "runmath.in" if(initializeRandom) Srand(1); {Stack->push(random()); return;} } #line 113 "runmath.in" // void srand(Int seed); void gen_runmath6(stack *Stack) { Int seed=vm::pop(Stack); #line 114 "runmath.in" Srand(seed); } // a random number uniformly distributed in the interval [0,1] #line 119 "runmath.in" // real unitrand(); void gen_runmath7(stack *Stack) { #line 120 "runmath.in" {Stack->push(((real) random())/RANDOM_MAX); return;} } #line 124 "runmath.in" // Int ceil(real x); void gen_runmath8(stack *Stack) { real x=vm::pop(Stack); #line 125 "runmath.in" {Stack->push(Intcast(ceil(x))); return;} } #line 129 "runmath.in" // Int floor(real x); void gen_runmath9(stack *Stack) { real x=vm::pop(Stack); #line 130 "runmath.in" {Stack->push(Intcast(floor(x))); return;} } #line 134 "runmath.in" // Int round(real x); void gen_runmath10(stack *Stack) { real x=vm::pop(Stack); #line 135 "runmath.in" if(validInt(x)) {Stack->push(Round(x)); return;} integeroverflow(0); } #line 140 "runmath.in" // Int Ceil(real x); void gen_runmath11(stack *Stack) { real x=vm::pop(Stack); #line 141 "runmath.in" {Stack->push(Ceil(x)); return;} } #line 145 "runmath.in" // Int Floor(real x); void gen_runmath12(stack *Stack) { real x=vm::pop(Stack); #line 146 "runmath.in" {Stack->push(Floor(x)); return;} } #line 150 "runmath.in" // Int Round(real x); void gen_runmath13(stack *Stack) { real x=vm::pop(Stack); #line 151 "runmath.in" {Stack->push(Round(Intcap(x))); return;} } #line 155 "runmath.in" // real fmod(real x, real y); void gen_runmath14(stack *Stack) { real y=vm::pop(Stack); real x=vm::pop(Stack); #line 156 "runmath.in" if (y == 0.0) dividebyzero(); {Stack->push(fmod(x,y)); return;} } #line 161 "runmath.in" // real atan2(real y, real x); void gen_runmath15(stack *Stack) { real x=vm::pop(Stack); real y=vm::pop(Stack); #line 162 "runmath.in" {Stack->push(atan2(y,x)); return;} } #line 166 "runmath.in" // real hypot(real x, real y); void gen_runmath16(stack *Stack) { real y=vm::pop(Stack); real x=vm::pop(Stack); #line 167 "runmath.in" {Stack->push(hypot(x,y)); return;} } #line 171 "runmath.in" // real remainder(real x, real y); void gen_runmath17(stack *Stack) { real y=vm::pop(Stack); real x=vm::pop(Stack); #line 172 "runmath.in" {Stack->push(remainder(x,y)); return;} } #line 176 "runmath.in" // real Jn(Int n, real x); void gen_runmath18(stack *Stack) { real x=vm::pop(Stack); Int n=vm::pop(Stack); #line 177 "runmath.in" {Stack->push(jn(n,x)); return;} } #line 181 "runmath.in" // real Yn(Int n, real x); void gen_runmath19(stack *Stack) { real x=vm::pop(Stack); Int n=vm::pop(Stack); #line 182 "runmath.in" {Stack->push(yn(n,x)); return;} } #line 186 "runmath.in" // real erf(real x); void gen_runmath20(stack *Stack) { real x=vm::pop(Stack); #line 187 "runmath.in" {Stack->push(erf(x)); return;} } #line 191 "runmath.in" // real erfc(real x); void gen_runmath21(stack *Stack) { real x=vm::pop(Stack); #line 192 "runmath.in" {Stack->push(erfc(x)); return;} } #line 196 "runmath.in" // Int factorial(Int n); void gen_runmath22(stack *Stack) { Int n=vm::pop(Stack); #line 197 "runmath.in" if(n < 0) error(invalidargument); {Stack->push(factorial(n)); return;} } #line 201 "runmath.in" // Int choose(Int n, Int k); void gen_runmath23(stack *Stack) { Int k=vm::pop(Stack); Int n=vm::pop(Stack); #line 202 "runmath.in" if(n < 0 || k < 0 || k > n) error(invalidargument); Int f=1; Int r=n-k; for(Int i=n; i > r; --i) { if(f > Int_MAX/i) integeroverflow(0); f=(f*i)/(n-i+1); } {Stack->push(f); return;} } #line 212 "runmath.in" // real gamma(real x); void gen_runmath24(stack *Stack) { real x=vm::pop(Stack); #line 213 "runmath.in" #ifdef HAVE_TGAMMA {Stack->push(tgamma(x)); return;} #else real lg = lgamma(x); {Stack->push(signgam*exp(lg)); return;} #endif } #line 222 "runmath.in" // realarray* quadraticroots(real a, real b, real c); void gen_runmath25(stack *Stack) { real c=vm::pop(Stack); real b=vm::pop(Stack); real a=vm::pop(Stack); #line 223 "runmath.in" quadraticroots q(a,b,c); array *roots=new array(q.roots); if(q.roots >= 1) (*roots)[0]=q.t1; if(q.roots == 2) (*roots)[1]=q.t2; {Stack->push(roots); return;} } #line 231 "runmath.in" // pairarray* quadraticroots(explicit pair a, explicit pair b, explicit pair c); void gen_runmath26(stack *Stack) { pair c=vm::pop(Stack); pair b=vm::pop(Stack); pair a=vm::pop(Stack); #line 232 "runmath.in" Quadraticroots q(a,b,c); array *roots=new array(q.roots); if(q.roots >= 1) (*roots)[0]=q.z1; if(q.roots == 2) (*roots)[1]=q.z2; {Stack->push(roots); return;} } #line 240 "runmath.in" // realarray* cubicroots(real a, real b, real c, real d); void gen_runmath27(stack *Stack) { real d=vm::pop(Stack); real c=vm::pop(Stack); real b=vm::pop(Stack); real a=vm::pop(Stack); #line 241 "runmath.in" cubicroots q(a,b,c,d); array *roots=new array(q.roots); if(q.roots >= 1) (*roots)[0]=q.t1; if(q.roots >= 2) (*roots)[1]=q.t2; if(q.roots == 3) (*roots)[2]=q.t3; {Stack->push(roots); return;} } // Logical operations #line 252 "runmath.in" // bool !(bool b); void gen_runmath28(stack *Stack) { bool b=vm::pop(Stack); #line 253 "runmath.in" {Stack->push(!b); return;} } #line 258 "runmath.in" void boolMemEq(stack *Stack) { frame * b=vm::pop(Stack); frame * a=vm::pop(Stack); #line 259 "runmath.in" {Stack->push(a == b); return;} } #line 263 "runmath.in" void boolMemNeq(stack *Stack) { frame * b=vm::pop(Stack); frame * a=vm::pop(Stack); #line 264 "runmath.in" {Stack->push(a != b); return;} } #line 268 "runmath.in" void boolFuncEq(stack *Stack) { callable * b=vm::pop(Stack); callable * a=vm::pop(Stack); #line 269 "runmath.in" {Stack->push(a->compare(b)); return;} } #line 273 "runmath.in" void boolFuncNeq(stack *Stack) { callable * b=vm::pop(Stack); callable * a=vm::pop(Stack); #line 274 "runmath.in" {Stack->push(!(a->compare(b))); return;} } // Bit operations #line 280 "runmath.in" // Int AND(Int a, Int b); void gen_runmath33(stack *Stack) { Int b=vm::pop(Stack); Int a=vm::pop(Stack); #line 281 "runmath.in" {Stack->push(a & b); return;} } #line 286 "runmath.in" // Int OR(Int a, Int b); void gen_runmath34(stack *Stack) { Int b=vm::pop(Stack); Int a=vm::pop(Stack); #line 287 "runmath.in" {Stack->push(a | b); return;} } #line 291 "runmath.in" // Int XOR(Int a, Int b); void gen_runmath35(stack *Stack) { Int b=vm::pop(Stack); Int a=vm::pop(Stack); #line 292 "runmath.in" {Stack->push(a ^ b); return;} } #line 296 "runmath.in" // Int NOT(Int a); void gen_runmath36(stack *Stack) { Int a=vm::pop(Stack); #line 297 "runmath.in" {Stack->push(~a); return;} } #line 301 "runmath.in" // Int CLZ(Int a); void gen_runmath37(stack *Stack) { Int a=vm::pop(Stack); #line 302 "runmath.in" if((uint32_t) a > 0xFFFFFFFF) {Stack->push(-1); return;} {Stack->push(CLZ((uint32_t) a)); return;} } #line 307 "runmath.in" // Int CTZ(Int a); void gen_runmath38(stack *Stack) { Int a=vm::pop(Stack); #line 308 "runmath.in" if((uint32_t) a > 0xFFFFFFFF) {Stack->push(-1); return;} #if __GNUC__ {Stack->push(__builtin_ctz(a)); return;} #else // find the number of trailing zeros in a 32-bit number static const int MultiplyDeBruijnBitPosition[32] = { 0, 1, 28, 2, 29, 14, 24, 3, 30, 22, 20, 15, 25, 17, 4, 8, 31, 27, 13, 23, 21, 19, 16, 7, 26, 12, 18, 6, 11, 5, 10, 9 }; {Stack->push(MultiplyDeBruijnBitPosition[((uint32_t)((a & -a) * 0x077CB531U)) >> 27]); return;} #endif } } // namespace run namespace trans { void gen_runmath_venv(venv &ve) { #line 81 "runmath.in" addFunc(ve, run::gen_runmath0, primReal(), SYM_CARET, formal(primReal(), SYM(x), false, false), formal(primInt(), SYM(y), false, false)); #line 86 "runmath.in" addFunc(ve, run::gen_runmath1, primPair(), SYM_CARET, formal(primPair(), SYM(z), false, false), formal(primInt(), SYM(y), false, false)); #line 91 "runmath.in" addFunc(ve, run::gen_runmath2, primInt(), SYM(quotient), formal(primInt(), SYM(x), false, false), formal(primInt(), SYM(y), false, false)); #line 96 "runmath.in" addFunc(ve, run::gen_runmath3, primInt(), SYM(abs), formal(primInt(), SYM(x), false, false)); #line 101 "runmath.in" addFunc(ve, run::gen_runmath4, primInt(), SYM(sgn), formal(primReal(), SYM(x), false, false)); #line 106 "runmath.in" addFunc(ve, run::gen_runmath5, primInt(), SYM(rand)); #line 113 "runmath.in" addFunc(ve, run::gen_runmath6, primVoid(), SYM(srand), formal(primInt(), SYM(seed), false, false)); #line 118 "runmath.in" addFunc(ve, run::gen_runmath7, primReal(), SYM(unitrand)); #line 124 "runmath.in" addFunc(ve, run::gen_runmath8, primInt(), SYM(ceil), formal(primReal(), SYM(x), false, false)); #line 129 "runmath.in" addFunc(ve, run::gen_runmath9, primInt(), SYM(floor), formal(primReal(), SYM(x), false, false)); #line 134 "runmath.in" addFunc(ve, run::gen_runmath10, primInt(), SYM(round), formal(primReal(), SYM(x), false, false)); #line 140 "runmath.in" addFunc(ve, run::gen_runmath11, primInt(), SYM(Ceil), formal(primReal(), SYM(x), false, false)); #line 145 "runmath.in" addFunc(ve, run::gen_runmath12, primInt(), SYM(Floor), formal(primReal(), SYM(x), false, false)); #line 150 "runmath.in" addFunc(ve, run::gen_runmath13, primInt(), SYM(Round), formal(primReal(), SYM(x), false, false)); #line 155 "runmath.in" addFunc(ve, run::gen_runmath14, primReal(), SYM(fmod), formal(primReal(), SYM(x), false, false), formal(primReal(), SYM(y), false, false)); #line 161 "runmath.in" addFunc(ve, run::gen_runmath15, primReal(), SYM(atan2), formal(primReal(), SYM(y), false, false), formal(primReal(), SYM(x), false, false)); #line 166 "runmath.in" addFunc(ve, run::gen_runmath16, primReal(), SYM(hypot), formal(primReal(), SYM(x), false, false), formal(primReal(), SYM(y), false, false)); #line 171 "runmath.in" addFunc(ve, run::gen_runmath17, primReal(), SYM(remainder), formal(primReal(), SYM(x), false, false), formal(primReal(), SYM(y), false, false)); #line 176 "runmath.in" addFunc(ve, run::gen_runmath18, primReal(), SYM(Jn), formal(primInt(), SYM(n), false, false), formal(primReal(), SYM(x), false, false)); #line 181 "runmath.in" addFunc(ve, run::gen_runmath19, primReal(), SYM(Yn), formal(primInt(), SYM(n), false, false), formal(primReal(), SYM(x), false, false)); #line 186 "runmath.in" addFunc(ve, run::gen_runmath20, primReal(), SYM(erf), formal(primReal(), SYM(x), false, false)); #line 191 "runmath.in" addFunc(ve, run::gen_runmath21, primReal(), SYM(erfc), formal(primReal(), SYM(x), false, false)); #line 196 "runmath.in" addFunc(ve, run::gen_runmath22, primInt(), SYM(factorial), formal(primInt(), SYM(n), false, false)); #line 201 "runmath.in" addFunc(ve, run::gen_runmath23, primInt(), SYM(choose), formal(primInt(), SYM(n), false, false), formal(primInt(), SYM(k), false, false)); #line 212 "runmath.in" addFunc(ve, run::gen_runmath24, primReal(), SYM(gamma), formal(primReal(), SYM(x), false, false)); #line 222 "runmath.in" addFunc(ve, run::gen_runmath25, realArray(), SYM(quadraticroots), formal(primReal(), SYM(a), false, false), formal(primReal(), SYM(b), false, false), formal(primReal(), SYM(c), false, false)); #line 231 "runmath.in" addFunc(ve, run::gen_runmath26, pairArray(), SYM(quadraticroots), formal(primPair(), SYM(a), false, true), formal(primPair(), SYM(b), false, true), formal(primPair(), SYM(c), false, true)); #line 240 "runmath.in" addFunc(ve, run::gen_runmath27, realArray(), SYM(cubicroots), formal(primReal(), SYM(a), false, false), formal(primReal(), SYM(b), false, false), formal(primReal(), SYM(c), false, false), formal(primReal(), SYM(d), false, false)); #line 250 "runmath.in" addFunc(ve, run::gen_runmath28, primBoolean(), SYM_LOGNOT, formal(primBoolean(), SYM(b), false, false)); #line 258 "runmath.in" REGISTER_BLTIN(run::boolMemEq,"boolMemEq"); #line 263 "runmath.in" REGISTER_BLTIN(run::boolMemNeq,"boolMemNeq"); #line 268 "runmath.in" REGISTER_BLTIN(run::boolFuncEq,"boolFuncEq"); #line 273 "runmath.in" REGISTER_BLTIN(run::boolFuncNeq,"boolFuncNeq"); #line 278 "runmath.in" addFunc(ve, run::gen_runmath33, primInt(), SYM(AND), formal(primInt(), SYM(a), false, false), formal(primInt(), SYM(b), false, false)); #line 286 "runmath.in" addFunc(ve, run::gen_runmath34, primInt(), SYM(OR), formal(primInt(), SYM(a), false, false), formal(primInt(), SYM(b), false, false)); #line 291 "runmath.in" addFunc(ve, run::gen_runmath35, primInt(), SYM(XOR), formal(primInt(), SYM(a), false, false), formal(primInt(), SYM(b), false, false)); #line 296 "runmath.in" addFunc(ve, run::gen_runmath36, primInt(), SYM(NOT), formal(primInt(), SYM(a), false, false)); #line 301 "runmath.in" addFunc(ve, run::gen_runmath37, primInt(), SYM(CLZ), formal(primInt(), SYM(a), false, false)); #line 307 "runmath.in" addFunc(ve, run::gen_runmath38, primInt(), SYM(CTZ), formal(primInt(), SYM(a), false, false)); } } // namespace trans ./asymptote-2.41/array.h0000644000175000017500000000363713064427076015043 0ustar norbertnorbert/***** * array.h * Tom Prince 2005/06/18 * * Array type used by virtual machine. *****/ #ifndef ARRAY_H #define ARRAY_H #include "vm.h" #include "common.h" #include "item.h" namespace vm { // Arrays are vectors with push and pop functions. class array : public mem::vector { bool cycle; void setNonBridgingSlice(size_t l, size_t r, mem::vector *a); void setBridgingSlice(size_t l, size_t r, mem::vector *a); public: array() : cycle(false) {} array(size_t n) : mem::vector(n), cycle(false) {} array(size_t n, item i, size_t depth); void push(item i) { push_back(i); } item pop() { item i=back(); pop_back(); return i; } template T read(size_t i) const { return get((*this)[i]); } array *slice(Int left, Int right); void setSlice(Int left, Int right, array *a); void cyclic(bool b) { cycle=b; } bool cyclic() const { return cycle; } array *copyToDepth(size_t depth); }; template inline T read(const array *a, size_t i) { return a->array::read(i); } template inline T read(const array &a, size_t i) { return a.array::read(i); } inline size_t checkArray(const vm::array *a) { if(a == 0) vm::error("dereference of null array"); return a->size(); } inline void checkEqual(size_t i, size_t j) { if(i == j) return; ostringstream buf; buf << "operation attempted on arrays of different lengths: " << i << " != " << j; vm::error(buf); } inline size_t checkArrays(const vm::array *a, const vm::array *b) { size_t asize=checkArray(a); size_t bsize=checkArray(b); checkEqual(asize,bsize); return asize; } // Copies an item to a depth d. If d == 0 then the item is just returned // without copying, otherwise, the array and its subarrays are copied to // depth d. item copyItemToDepth(item i, size_t depth); } // namespace vm #endif // ARRAY_H ./asymptote-2.41/quaternion.h0000644000175000017500000001154113064427076016103 0ustar norbertnorbert/**************************************************************************** quaternion.h - A quaternion class GLUI User Interface Toolkit (LGPL) Copyright (c) 1998 Paul Rademacher --------------------------------------------------------------------- WWW: http://sourceforge.net/projects/glui/ Forums: http://sourceforge.net/forum/?group_id=92496 This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *****************************************************************************/ #ifndef GLUI_QUATERNION_H #define GLUI_QUATERNION_H #include "algebra3.h" #include /* this line defines a new type: pointer to a function which returns a */ /* float and takes as argument a float */ typedef float (*V_FCT_PTR)(float); /**************************************************************** * Quaternion * ****************************************************************/ class quat { /*protected: */ public: vec3 v; /* vector component */ float s; /* scalar component */ /*public: */ /* Constructors */ quat(); quat(float x, float y, float z, float w); quat(const vec3 &v, float s); quat(float s, const vec3 &v); quat(const float *d); /* copy from four-element float array */ quat(const double *f); /* copy from four-element double array */ quat(const quat &q); /* copy from other quat */ /* Assignment operators */ quat &operator = (const quat &v); /* assignment of a quat */ quat &operator += (const quat &v); /* incrementation by a quat */ quat &operator -= (const quat &v); /* decrementation by a quat */ quat &operator *= (float d); /* multiplication by a constant */ quat &operator /= (float d); /* division by a constant */ /* special functions */ float length() const; /* length of a quat */ float length2() const; /* squared length of a quat */ quat &normalize(); /* normalize a quat */ quat &apply(V_FCT_PTR fct); /* apply a func. to each component */ vec3 xform(const vec3 &v ); /* q*v*q-1 */ mat4 to_mat4() const; void set_angle(float f); /* set rot angle (degrees) */ void scale_angle(float f); /* scale rot angle (degrees) */ float get_angle() const; /* set rot angle (degrees) */ vec3 get_axis() const; /* get axis */ void print( FILE *file, const char *name ) const; /* print to a file */ float &operator [] (int i); /* indexing */ const float &operator [] (int i) const; /* indexing */ void set(float x, float y, float z); /* set quat */ void set(const vec3 &v, float s); /* set quat */ /* friends */ friend quat operator - (const quat &v); /* -q1 */ friend quat operator + (const quat &a, const quat &b); /* q1 + q2 */ friend quat operator - (const quat &a, const quat &b); /* q1 - q2 */ friend quat operator * (const quat &a, float d); /* q1 * 3.0 */ friend quat operator * (float d, const quat &a); /* 3.0 * q1 */ friend quat operator * (const quat &a, const quat &b); /* q1 * q2 */ friend quat operator / (const quat &a, float d); /* q1 / 3.0 */ friend int operator == (const quat &a, const quat &b); /* q1 == q2 ? */ friend int operator != (const quat &a, const quat &b); /* q1 != q2 ? */ friend void swap(quat &a, quat &b); /* swap q1 &q2 */ /*friend quat min(const quat &a, const quat &b); -- min(q1, q2) */ /*friend quat max(const quat &a, const quat &b); -- max(q1, q2) */ friend quat prod(const quat &a, const quat &b); /* term by term mult*/ }; /* Utility functions */ quat quat_identity(); /* Returns quaternion identity element */ quat quat_slerp(const quat &from, const quat &to, float t); #endif ./asymptote-2.41/drawclipend.h0000644000175000017500000000227513064427076016216 0ustar norbertnorbert/***** * drawclipend.h * John Bowman * * End clip of picture to specified path. *****/ #ifndef DRAWCLIPEND_H #define DRAWCLIPEND_H #include "drawclipbegin.h" #include "path.h" namespace camp { class drawClipEnd : public drawElement { bool grestore; drawClipBegin *partner; public: drawClipEnd(bool grestore=true, drawClipBegin *partner=NULL) : grestore(grestore), partner(partner) {} virtual ~drawClipEnd() {} bool endclip() {return true;} void bounds(bbox& b, iopipestream&, boxvector&, bboxlist& bboxstack) { if(bboxstack.size() < 2) reportError("endclip without matching beginclip"); b.clip(bboxstack.back()); bboxstack.pop_back(); b += bboxstack.back(); bboxstack.pop_back(); } bool endgroup() {return true;} bool svg() {return true;} void save(bool b) { grestore=b; if(partner) partner->save(b); } bool draw(psfile *out) { if(grestore) out->grestore(); return true; } bool write(texfile *out, const bbox& bpath) { out->endgroup(); if(out->toplevel()) out->endpicture(bpath); if(grestore) out->grestore(); return true; } }; } GC_DECLARE_PTRFREE(camp::drawClipEnd); #endif ./asymptote-2.41/camp.tab.h0000644000175000017500000000776313064427112015405 0ustar norbertnorbert/* A Bison parser, made by GNU Bison 3.0.4. */ /* Bison interface for Yacc-like parsers in C Copyright (C) 1984, 1989-1990, 2000-2015 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ /* As a special exception, you may create a larger work that contains part or all of the Bison parser skeleton and distribute that work under terms of your choice, so long as that work isn't itself a parser generator using the skeleton or a modified version thereof as a parser skeleton. Alternatively, if you modify or redistribute the parser skeleton itself, you may (at your option) remove this special exception, which will cause the skeleton and the resulting Bison output files to be licensed under the GNU General Public License without this special exception. This special exception was added by the Free Software Foundation in version 2.2 of Bison. */ #ifndef YY_YY_CAMP_TAB_H_INCLUDED # define YY_YY_CAMP_TAB_H_INCLUDED /* Debug traces. */ #ifndef YYDEBUG # define YYDEBUG 1 #endif #if YYDEBUG extern int yydebug; #endif /* Token type. */ #ifndef YYTOKENTYPE # define YYTOKENTYPE enum yytokentype { ID = 258, SELFOP = 259, DOTS = 260, COLONS = 261, DASHES = 262, INCR = 263, LONGDASH = 264, CONTROLS = 265, TENSION = 266, ATLEAST = 267, CURL = 268, COR = 269, CAND = 270, BAR = 271, AMPERSAND = 272, EQ = 273, NEQ = 274, LT = 275, LE = 276, GT = 277, GE = 278, CARETS = 279, OPERATOR = 280, LOOSE = 281, ASSIGN = 282, DIRTAG = 283, JOIN_PREC = 284, AND = 285, ELLIPSIS = 286, ACCESS = 287, UNRAVEL = 288, IMPORT = 289, INCLUDE = 290, FROM = 291, QUOTE = 292, STRUCT = 293, TYPEDEF = 294, NEW = 295, IF = 296, ELSE = 297, WHILE = 298, DO = 299, FOR = 300, BREAK = 301, CONTINUE = 302, RETURN_ = 303, THIS = 304, EXPLICIT = 305, GARBAGE = 306, LIT = 307, STRING = 308, PERM = 309, MODIFIER = 310, UNARY = 311, EXP_IN_PARENS_RULE = 312 }; #endif /* Value type. */ #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED union YYSTYPE { #line 60 "camp.y" /* yacc.c:1909 */ position pos; bool boo; struct { position pos; sym::symbol sym; } ps; absyntax::name *n; absyntax::varinit *vi; absyntax::arrayinit *ai; absyntax::exp *e; absyntax::stringExp *stre; absyntax::specExp *se; absyntax::joinExp *j; absyntax::explist *elist; absyntax::argument arg; absyntax::arglist *alist; absyntax::slice *slice; absyntax::dimensions *dim; absyntax::ty *t; absyntax::decid *di; absyntax::decidlist *dil; absyntax::decidstart *dis; absyntax::runnable *run; struct { position pos; trans::permission val; } perm; struct { position pos; trans::modifier val; } mod; absyntax::modifierList *ml; //absyntax::program *prog; absyntax::vardec *vd; //absyntax::vardecs *vds; absyntax::dec *d; absyntax::idpair *ip; absyntax::idpairlist *ipl; absyntax::stm *s; absyntax::block *b; absyntax::stmExpList *sel; //absyntax::funheader *fh; absyntax::formal *fl; absyntax::formals *fls; #line 159 "camp.tab.h" /* yacc.c:1909 */ }; typedef union YYSTYPE YYSTYPE; # define YYSTYPE_IS_TRIVIAL 1 # define YYSTYPE_IS_DECLARED 1 #endif extern YYSTYPE yylval; int yyparse (void); #endif /* !YY_YY_CAMP_TAB_H_INCLUDED */ ./asymptote-2.41/runstring.in0000644000175000017500000002304413064427076016131 0ustar norbertnorbert/***** * runstring.in * * Runtime functions for string operations. * *****/ stringarray2* => stringArray2() #include #include #include #include "array.h" using namespace camp; using namespace vm; using namespace settings; typedef array stringarray; typedef array stringarray2; using types::stringArray; using types::stringArray2; namespace types { extern const char *names[]; } namespace run { extern string emptystring; } static const string defaulttimeformat=string("%a %b %d %T %Z %Y"); #ifdef HAVE_STRFTIME static const size_t nTime=256; static char Time[nTime]; #endif void checkformat(const char *ptr, bool intformat) { while(*ptr != '\0') { if(*ptr != '%') /* While we have regular characters, print them. */ ptr++; else { /* We've got a format specifier. */ ptr++; while(*ptr && strchr ("-+ #0'I", *ptr)) /* Move past flags. */ ptr++; if(*ptr == '*') ptr++; else while(isdigit(*ptr)) /* Handle explicit numeric value. */ ptr++; if(*ptr == '.') { ptr++; /* Go past the period. */ if(*ptr == '*') { ptr++; } else while(isdigit(*ptr)) /* Handle explicit numeric value. */ ptr++; } while(*ptr && strchr ("hlL", *ptr)) ptr++; if(*ptr == '%') {++ptr; continue;} else if(*ptr != '\0') { if(intformat) { switch(*ptr) { case 'd': case 'i': case 'o': case 'u': case 'x': case 'X': case 'c': break; default: ostringstream buf; buf << "Invalid format '" << *ptr << "' for type " << types::names[types::ty_Int]; error(buf); break; } } else { switch(*ptr) { case 'f': case 'F': case 'e': case 'E': case 'g': case 'G': break; default: ostringstream buf; buf << "Invalid format '" << *ptr << "' for type " << types::names[types::ty_real]; error(buf); break; } } } break; // Only one argument is allowed. } /* End of else statement */ } } // Autogenerated routines: // String operations string :emptyString() { return emptystring; } Int length(string *s) { return (Int) s->length(); } Int find(string *s, string t, Int pos=0) { size_t n=s->find(t,pos); return n == string::npos ? (Int) -1 : (Int) n; } Int rfind(string *s, string t, Int pos=-1) { size_t n=s->rfind(t,pos); return n == string::npos ? (Int) -1 : (Int) n; } string reverse(string s) { reverse(s.begin(),s.end()); return s; } string insert(string s, Int pos, string t) { if ((size_t) pos < s.length()) return s.insert(pos,t); return s; } string substr(string* s, Int pos, Int n=-1) { if ((size_t) pos < s->length()) return s->substr(pos,n); return emptystring; } string erase(string s, Int pos, Int n) { if ((size_t) pos < s.length()) return s.erase(pos,n); return s; } string downcase(string s) { std::transform(s.begin(),s.end(),s.begin(),tolower); return s; } string upcase(string s) { std::transform(s.begin(),s.end(),s.begin(),toupper); return s; } // returns a string constructed by translating all occurrences of the string // from in an array of string pairs {from,to} to the string to in string s. string replace(string *S, stringarray2 *translate) { size_t size=checkArray(translate); for(size_t i=0; i < size; i++) { array *a=read(translate,i); checkArray(a); } const char *p=S->c_str(); ostringstream buf; while(*p) { for(size_t i=0; i < size;) { array *a=read(translate,i); size_t size2=checkArray(a); if(size2 != 2) error("translation table entry must be an array of length 2"); string* from=read(a,0); size_t len=from->length(); if(strncmp(p,from->c_str(),len) != 0) {i++; continue;} buf << read(a,1); p += len; if(*p == 0) return buf.str(); i=0; } buf << *(p++); } return buf.str(); } string format(string *format, Int x, string locale=emptystring) { ostringstream out; const char *p0=format->c_str(); checkformat(p0,true); const char *p=p0; const char *start=NULL; while(*p != 0) { char curr=*p; if(curr == '%') { p++; if(*p != '%') {start=p-1; break;} } out << *(p++); } if(!start) return out.str(); // Allow at most 1 argument while(*p != 0) { if(*p == '*' || *p == '$') return out.str(); if(isupper(*p) || islower(*p)) {p++; break;} p++; } string f=format->substr(start-p0,p-start); const char *oldlocale=NULL; if(!locale.empty()) { oldlocale=setlocale(LC_ALL,NULL); if(oldlocale) oldlocale=StrdupNoGC(oldlocale); setlocale(LC_ALL,locale.c_str()); } Int size=snprintf(NULL,0,f.c_str(),x)+1; if(size < 1) size=255; // Workaround for non-C99 compliant systems. char *buf=new char[size]; snprintf(buf,size,f.c_str(),x); out << string(buf); out << p; delete[] buf; if(oldlocale) { setlocale(LC_ALL,oldlocale); delete[] oldlocale; } return out.str(); } string format(string *format, string separator, real x, string locale=emptystring) { bool tex=getSetting("tex") != "none"; bool texify=false; ostringstream out; const char *p0=format->c_str(); checkformat(p0,false); const char *phantom="\\phantom{+}"; const char *p=p0; const char *start=NULL; char prev=0; while(*p != 0) { char curr=*p; if(tex && curr == '$' && prev != '\\') texify=true; prev=curr; if(curr == '%') { p++; if(*p != '%') {start=p-1; break;} } out << *(p++); } if(!start) return out.str(); // Allow at most 1 argument while(*p != 0) { if(*p == '*' || *p == '$') return out.str(); if(isupper(*p) || islower(*p)) {p++; break;} p++; } const char *tail=p; string f=format->substr(start-p0,tail-start); const char *oldlocale=NULL; if(!locale.empty()) { oldlocale=setlocale(LC_ALL,NULL); if(oldlocale) oldlocale=StrdupNoGC(oldlocale); setlocale(LC_ALL,locale.c_str()); } Int size=snprintf(NULL,0,f.c_str(),x)+1; if(size < 1) size=255; // Workaround for non-C99 compliant systems. char *buf=new char[size]; snprintf(buf,size,f.c_str(),x); bool trailingzero=f.find("#") < string::npos; bool plus=f.find("+") < string::npos; bool space=f.find(" ") < string::npos; char *q=buf; // beginning of formatted number if(*q == ' ' && texify) { out << phantom; q++; } const char decimal=*(localeconv()->decimal_point); // Remove any spurious sign if(*q == '-' || *q == '+') { p=q+1; bool zero=true; while(*p != 0) { if(!isdigit(*p) && *p != decimal) break; if(isdigit(*p) && *p != '0') {zero=false; break;} p++; } if(zero) { q++; if((plus || space) && texify) out << phantom; } } const char *r=p=q; bool dp=false; while(*r != 0 && (isspace(*r) || isdigit(*r) || *r == decimal \ || *r == '+' || *r == '-')) { if(*r == decimal) dp=true; r++; } if(dp) { // Remove trailing zeros and/or decimal point r--; unsigned n=0; while(r > q && *r == '0') {r--; n++;} if(*r == decimal) {r--; n++;} while(q <= r) out << *(q++); if(!trailingzero) q += n; } bool zero=(r == p && *r == '0') && !trailingzero; // Translate "E+/E-/e+/e-" exponential notation to TeX while(*q != 0) { if(texify && (*q == 'E' || *q == 'e') && (*(q+1) == '+' || *(q+1) == '-')) { if(!zero) out << separator << "10^{"; bool plus=(*(q+1) == '+'); q++; if(plus) q++; if(*q == '-') out << *(q++); while(*q == '0' && (zero || isdigit(*(q+1)))) q++; while(isdigit(*q)) out << *(q++); if(!zero) out << "}"; break; } out << *(q++); } while(*tail != 0) out << *(tail++); delete[] buf; if(oldlocale) { setlocale(LC_ALL,oldlocale); delete[] oldlocale; } return out.str(); } Int hex(string s) { istringstream is(s); is.setf(std::ios::hex,std::ios::basefield); Int value; if(is && is >> value && ((is >> std::ws).eof())) return value; ostringstream buf; buf << "invalid hexidecimal cast from string \"" << s << "\""; error(buf); } Int ascii(string s) { return s.empty() ? -1 : (unsigned char) s[0]; } string string(Int x) { ostringstream buf; buf << x; return buf.str(); } string string(real x, Int digits=DBL_DIG) { ostringstream buf; buf.precision(digits); buf << x; return buf.str(); } string time(string format=defaulttimeformat) { #ifdef HAVE_STRFTIME const time_t bintime=time(NULL); if(!strftime(Time,nTime,format.c_str(),localtime(&bintime))) return ""; return Time; #else return format; #endif } string time(Int seconds, string format=defaulttimeformat) { #ifdef HAVE_STRFTIME const time_t bintime=seconds; if(!strftime(Time,nTime,format.c_str(),localtime(&bintime))) return ""; return Time; #else // Avoid unused variable warning messages unused(&seconds); return format; #endif } Int seconds(string t=emptystring, string format=emptystring) { #if defined(HAVE_STRPTIME) const time_t bintime=time(NULL); tm tm=*localtime(&bintime); if(t != "" && !strptime(t.c_str(),format.c_str(),&tm)) return -1; return (Int) mktime(&tm); #else return -1; #endif } ./asymptote-2.41/impdatum.cc0000644000175000017500000003071013064427076015673 0ustar norbertnorbert#include #include "stack.h" #include "env.h" #include "exp.h" #include "stm.h" #include "refaccess.h" using std::strlen; using namespace absyntax; using namespace trans; using vm::item; using vm::get; #include "policy.h" coenv &coenvInOngoingProcess(); void runInOngoingProcess(absyntax::runnable *r); void runExp(absyntax::exp *e) { absyntax::expStm s(nullPos, e); runInOngoingProcess(&s); } class ImpDatum; class ImpArguments; ImpDatum *datumError(const char *msg); // Expression used for non-item datums. class errorExp : public absyntax::exp { public: errorExp() : exp(nullPos) {} void prettyprint(ostream &out, Int indent) { absyntax::prettyname(out, "errorExp", indent); } void complain() { em.error(nullPos); em << "cannot use datum as expression"; } types::ty *getType(coenv &) { return types::primError(); } types::ty *trans(coenv &e) { complain(); return getType(e); } void transAsType(coenv &e, types::ty *target) { complain(); } }; // Abstract base class for Datum types. class ImpDatum { public: virtual operator handle_typ() { return (handle_typ)(this); } virtual int_typ toInt() { datumError("cannot convert to integer"); // Return a weird value that will hopefully be noticed. return -777777; } virtual bool toBool() { datumError("cannot convert to bool"); return false; } virtual double toDouble() { datumError("cannot convert to double"); return -777e77; } virtual string_typ toString() { datumError("cannot convert to string"); string_typ s = { "XXXXX", 5 }; return s; } virtual absyntax::exp *getExp() { datumError("invalid use of datum"); return new errorExp; } // How to access a field of the datum. virtual absyntax::exp *getFieldExp(symbol id) { assert(id); return new fieldExp(nullPos, this->getExp(), id); } virtual ImpDatum *getField(const char *name); virtual ImpDatum *getCell(ImpDatum *index) { return datumError("cannot index datatype"); } virtual void addField(const char *name, ImpDatum *init) { datumError("cannot set field of datatype"); } }; // An ever-growing list of handles, used to avoid garbage collecting the data. // TODO: Implement effective releaseHandle. mem::vector handles; handle_typ wrap(ImpDatum *d) { handle_typ h = (handle_typ)(d); handles.push_back(h); return h; } ImpDatum *unwrap(handle_typ handle) { assert(handle != 0); return (ImpDatum *)(handle); } class ErrorDatum : public ImpDatum { }; error_callback_typ errorCallback = 0; ImpDatum *datumError(const char *msg) { static ErrorDatum ed; if (errorCallback) { string_typ s = { msg, strlen(msg) }; errorCallback(s); } else { cerr << msg << '\n'; } return &ed; } handle_typ imp_copyHandle(handle_typ handle) { //cout << "+"; // For now, don't do anything. return handle; } void imp_releaseHandle() { //cout << "-"; // Do nothing, for now. } // A datum representing a value in Asymptote. Both the runtime representation // of the value and its type are stored. class ItemDatum : public ImpDatum { item i; types::ty *t; public: // Every itemDatum has a fixed (non-overloaded) type, t ItemDatum(types::ty *t) : t(t) { assert(t); assert(t->isNotOverloaded()); assert(t->isNotError()); } // An expression that can be used to get and set the datum. // The value should only be set once, when the datum is created, and not // changed. absyntax::exp *getExp() { // It may be faster to create this once on start, but then the datum will // require more space. For now, we create the access and expression on // demand. return new varEntryExp(nullPos, t, new itemRefAccess(&i)); } int_typ toInt() { // TODO: Decide if we want to use casting. if (t->kind == types::ty_Int) return static_cast(get(i)); else return ImpDatum::toInt(); } bool toBool() { if (t->kind == types::ty_boolean) return get(i); else return ImpDatum::toBool(); } double toDouble() { if (t->kind == types::ty_real) return get(i); else return ImpDatum::toDouble(); } string_typ toString() { if (t->kind == types::ty_string) { // TODO: Fix for strings containing NUL. string *s = get(i); string_typ st = { s->c_str(), s->length() }; return st; } else return ImpDatum::toString(); } }; ItemDatum *ItemDatumFromExp(types::ty *t, absyntax::exp *e) { ItemDatum *d = new ItemDatum(t); assignExp ae(nullPos, d->getExp(), e); runExp(&ae); return d; } ItemDatum *ItemDatumFromInt(int_typ x) { intExp ie(nullPos, static_cast(x)); return ItemDatumFromExp(types::primInt(), &ie); } ItemDatum *ItemDatumFromBool(bool x) { booleanExp be(nullPos, x); return ItemDatumFromExp(types::primBoolean(), &be); } ItemDatum *ItemDatumFromDouble(double x) { realExp re(nullPos, x); return ItemDatumFromExp(types::primReal(), &re); } ItemDatum *ItemDatumFromString(string_typ x) { mem::string s(x.buf, (size_t)x.length); stringExp se(nullPos, s); return ItemDatumFromExp(types::primString(), &se); } // If the interface is asked to return a field which is overloaded, a handle // to and OverloadedDatum is returned. No evaluation actually occurs. The // datum simply consists of the containing datum and the name of the field // requested. Subsequent use of the datum will resolve the overloading (or // report an error). class OverloadedDatum : public ImpDatum { ImpDatum *parent; symbol id; public: OverloadedDatum(ImpDatum *parent, symbol id) : parent(parent), id(id) { assert(parent); assert(id); } absyntax::exp *getExp() { return parent->getFieldExp(id); return new fieldExp(nullPos, parent->getExp(), id); } }; ImpDatum *ImpDatum::getField(const char *name) { coenv &e = coenvInOngoingProcess(); symbol id = symbol::trans(name); absyntax::exp *ex = getFieldExp(id); types::ty *t = ex->getType(e); if (t->isError()) return datumError("no field of that name"); if (t->isOverloaded()) return new OverloadedDatum(this, id); // Create a new datum and assign the variable to it. ItemDatum *d = new ItemDatum(t); assignExp ae(nullPos, d->getExp(), ex); runExp(&ae); return d; } handle_typ imp_handleFromInt(int_typ x) { return wrap(ItemDatumFromInt(x)); } handle_typ imp_handleFromBool(int_typ x) { if (x != 0 && x != 1) return wrap(datumError("invalid boolean value")); return wrap(ItemDatumFromBool(x == 1)); } handle_typ imp_handleFromDouble(double x) { return wrap(ItemDatumFromDouble(x)); } int_typ imp_IntFromHandle(handle_typ handle) { return unwrap(handle)->toInt(); } int_typ imp_boolFromHandle(handle_typ handle) { return unwrap(handle)->toBool() ? 1 : 0; } double imp_doubleFromHandle(handle_typ handle) { return unwrap(handle)->toDouble(); } handle_typ imp_handleFromString(string_typ x) { return wrap(ItemDatumFromString(x)); } string_typ imp_stringFromHandle(handle_typ handle) { return unwrap(handle)->toString(); } handle_typ imp_getField(handle_typ handle, const char *name) { return wrap(unwrap(handle)->getField(name)); } handle_typ imp_getCell(handle_typ handle, handle_typ index) { return wrap(unwrap(handle)->getCell(unwrap(index))); } void imp_addField(handle_typ handle, const char *name, handle_typ init) { unwrap(handle)->addField(name, unwrap(init)); } class ImpArguments /* TODO: gc visible but not collected */ { arglist args; public: ImpArguments() {} void add(const char *name, ImpDatum *arg, arg_rest_option isRest) { assert(isRest == NORMAL_ARG); // TODO: Implement rest. symbol id = (name && name[0]) ? symbol::trans(name) : symbol::nullsym; args.add(arg->getExp(), id); } arglist *getArgs() { return &args; } }; arguments_typ wrapArgs(ImpArguments *args) { return (arguments_typ)(args); } ImpArguments *unwrapArgs(arguments_typ args) { return (ImpArguments *)(args); } arguments_typ imp_newArguments() { return wrapArgs(new ImpArguments); } void imp_releaseArguments(arguments_typ args) { // For now, do nothing. } void imp_addArgument(arguments_typ args, const char *name, handle_typ handle, arg_rest_option isRest) { unwrapArgs(args)->add(name, unwrap(handle), isRest); } ImpDatum *callDatum(ImpDatum *callee, ImpArguments *args) { coenv &e = coenvInOngoingProcess(); callExp callex(nullPos, callee->getExp(), args->getArgs()); types::ty *t = callex.getType(e); if (t->isError()) { // Run for errors. runExp(&callex); em.sync(); return datumError("invalid call"); } assert(t->isNotOverloaded()); // Calls are never overloaded. if (t->kind == types::ty_void) { // Execute the call and return 0 to indicate void. runExp(&callex); return 0; } else return ItemDatumFromExp(t, &callex); } handle_typ imp_call(handle_typ callee, arguments_typ args) { return wrap(callDatum(unwrap(callee), unwrapArgs(args))); } class GlobalsDatum : public ImpDatum { typedef std::map gmap; gmap base; virtual absyntax::exp *getFieldExp(symbol id) { // Fields of the globals datum are global variables. Use the unqualified // name. return new nameExp(nullPos, id); } virtual void addField(const char *name, ImpDatum *init) { datumError("addField not yet re-implemented"); } }; class ImpState { //ImpArguments *params; ImpDatum *retval; public: ImpState() : retval(0) {} ImpDatum *globals() { return new GlobalsDatum(); } int_typ numParams() { /*if (params) return params->val.size(); else */ { datumError("parameters accessed outside of function"); return 0; } } ImpDatum *getParam(int_typ index) { /*if (params) { if (index >= 0 && index < static_cast(params->val.size())) return params->val[index]; else return datumError("invalid index for parameter"); } else */ { return datumError("parameters accessed outside of function"); } } void setReturnValue(ImpDatum *retval) { /*if (params) { if (this->retval) datumError("return value set more than once"); else this->retval = retval; } else */ { datumError("return value set outside of function"); } } ImpDatum *getReturnValue() { return retval; } }; state_typ wrapState(ImpState *s) { return (state_typ)(s); } ImpState *unwrapState(state_typ s) { return (ImpState *)(s); } handle_typ imp_globals(state_typ state) { return wrap(unwrapState(state)->globals()); } int_typ imp_numParams(state_typ state) { return unwrapState(state)->numParams(); } handle_typ imp_getParam(state_typ state, int_typ index) { return wrap(unwrapState(state)->getParam(index)); } void imp_setReturnValue(state_typ state, handle_typ handle) { unwrapState(state)->setReturnValue(unwrap(handle)); } state_typ cheatState() { return wrapState(new ImpState()); } #if 0 class FunctionDatum : public ImpDatum { function_typ f; void *data; public: FunctionDatum(function_typ f, void *data) : f(f), data(data) {} ImpDatum *call(ImpArguments *args) { ImpState state(args); // Call the function. f(wrapState(&state),data); if (state.getReturnValue()) return state.getReturnValue(); else // TODO: Decide on datum for void return. return 0; } }; #endif handle_typ imp_handleFromFunction(const char *signature, function_typ f, void *data) { // TODO: Re-implement. return 0; //wrap(new FunctionDatum(f, data)); } void imp_setErrorCallback(error_callback_typ callback) { errorCallback = callback; } extern policy_typ imp_policy; policy_typ imp_policy = { /* version = */ 101, imp_copyHandle, imp_releaseHandle, imp_handleFromInt, imp_handleFromBool, imp_handleFromDouble, imp_handleFromString, imp_handleFromFunction, imp_IntFromHandle, imp_boolFromHandle, imp_doubleFromHandle, imp_stringFromHandle, imp_getField, imp_getCell, imp_addField, imp_newArguments, imp_releaseArguments, imp_addArgument, imp_call, imp_globals, imp_numParams, imp_getParam, imp_setReturnValue, imp_setErrorCallback, }; // Defined in process.cc void init(bool resetpath=true); extern "C" { policy_typ *_asy_getPolicy() { return &imp_policy; } state_typ _asy_getState() { static state_typ state = cheatState(); // TODO: Make sure this runs once. char buf[] = "asymptote.so"; char *argv [] = { buf }; settings::setOptions(1,argv); // Ensures uptodate is not used. init(); return state; } } ./asymptote-2.41/fundec.cc0000644000175000017500000001737713064427076015335 0ustar norbertnorbert/***** * fundec.h * Andy Hammerlindl 2002/8/29 * * Defines the semantics for defining functions. Both the newexp syntax, and * the abbreviated C-style function definition. *****/ #include "fundec.h" #include "errormsg.h" #include "coenv.h" #include "stm.h" #include "runtime.h" namespace absyntax { using namespace trans; using namespace types; using mem::list; varinit *Default=new definit(nullPos); void formal::prettyprint(ostream &out, Int indent) { prettyname(out, keywordOnly ? "formal (keyword only)" : "formal", indent); base->prettyprint(out, indent+1); if (start) start->prettyprint(out, indent+1); if (defval) defval->prettyprint(out, indent+1); } types::formal formal::trans(coenv &e, bool encodeDefVal, bool tacit) { return types::formal(getType(e,tacit), getName(), encodeDefVal ? (bool) getDefaultValue() : 0, getExplicit()); } types::ty *formal::getType(coenv &e, bool tacit) { types::ty *bt = base->trans(e, tacit); types::ty *t = start ? start->getType(bt, e, tacit) : bt; if (t->kind == ty_void && !tacit) { em.error(getPos()); em << "cannot declare parameters of type void"; return primError(); } return t; } void formal::addOps(coenv &e, record *r) { base->addOps(e, r); if (start) start->addOps(base->trans(e, true), e, r); } void formals::prettyprint(ostream &out, Int indent) { prettyname(out, "formals",indent); for (list::iterator p = fields.begin(); p != fields.end(); ++p) (*p)->prettyprint(out, indent+1); } void formals::addToSignature(signature& sig, coenv &e, bool encodeDefVal, bool tacit) { for (list::iterator p = fields.begin(); p != fields.end(); ++p) { formal& f=**p; types::formal tf = f.trans(e, encodeDefVal, tacit); if (f.isKeywordOnly()) sig.addKeywordOnly(tf); else sig.add(tf); } if (rest) { if (!tacit && rest->getDefaultValue()) { em.error(rest->getPos()); em << "rest parameters cannot have default values"; } sig.addRest(rest->trans(e, encodeDefVal, tacit)); } } // Returns the types of each parameter as a signature. // encodeDefVal means that it will also encode information regarding // the default values into the signature signature *formals::getSignature(coenv &e, bool encodeDefVal, bool tacit) { signature *sig = new signature; addToSignature(*sig,e,encodeDefVal,tacit); return sig; } // Returns the corresponding function type, assuming it has a return // value of types::ty *result. function *formals::getType(types::ty *result, coenv &e, bool encodeDefVal, bool tacit) { function *ft = new function(result); addToSignature(ft->sig,e,encodeDefVal,tacit); return ft; } void formals::addOps(coenv &e, record *r) { for(list::iterator p = fields.begin(); p != fields.end(); ++p) (*p)->addOps(e, r); if (rest) rest->addOps(e, r); } // Another helper class. Does an assignment, but relying only on the // destination for the type. class basicAssignExp : public exp { varEntry *dest; varinit *value; public: basicAssignExp(position pos, varEntry *dest, varinit *value) : exp(pos), dest(dest), value(value) {} void prettyprint(ostream &out, Int indent) { prettyname(out, "basicAssignExp", indent); } types::ty *getType(coenv &) { return dest->getType(); } types::ty *trans(coenv &e) { // This doesn't handle overloaded types for the destination. value->transToType(e, getType(e)); dest->encode(WRITE, pos, e.c); return getType(e); } }; void transDefault(coenv &e, position pos, varEntry *v, varinit *init) { // This roughly translates into the statement // if (isDefault(x)) // x=init; // where x is the variable in v and isDefault is a function that tests // whether x is the default argument token. v->encode(READ, pos, e.c); label end = e.c.fwdLabel(); e.c.useLabel(inst::jump_if_not_default, end); init->transToType(e, v->getType()); v->encode(WRITE, pos, e.c); e.c.encodePop(); e.c.defLabel(end); } void formal::transAsVar(coenv &e, Int index) { symbol name = getName(); if (name) { trans::access *a = e.c.accessFormal(index); assert(a); // Suppress error messages because they will already be reported // when the formals are translated to yield the type earlier. types::ty *t = getType(e, true); varEntry *v = new varEntry(t, a, 0, getPos()); // Translate the default argument before adding the formal to the // environment, consistent with the initializers of variables. if (defval) transDefault(e, getPos(), v, defval); e.e.addVar(name, v); } } void formals::trans(coenv &e) { Int index = 0; for (list::iterator p=fields.begin(); p!=fields.end(); ++p) { (*p)->transAsVar(e, index); ++index; } if (rest) { rest->transAsVar(e, index); ++index; } } void fundef::prettyprint(ostream &out, Int indent) { result->prettyprint(out, indent+1); params->prettyprint(out, indent+1); body->prettyprint(out, indent+1); } function *fundef::transType(coenv &e, bool tacit) { bool encodeDefVal=true; return params->getType(result->trans(e, tacit), e, encodeDefVal, tacit); } function *fundef::transTypeAndAddOps(coenv &e, record *r, bool tacit) { result->addOps(e,r); params->addOps(e,r); function *ft=transType(e, tacit); e.e.addFunctionOps(ft); if (r) r->e.addFunctionOps(ft); return ft; } varinit *fundef::makeVarInit(function *ft) { struct initializer : public varinit { fundef *f; function *ft; initializer(fundef *f, function *ft) : varinit(f->getPos()), f(f), ft(ft) {} void prettyprint(ostream &out, Int indent) { prettyname(out, "initializer", indent); } void transToType(coenv &e, types::ty *target) { assert(ft==target); f->baseTrans(e, ft); } }; return new initializer(this, ft); } void fundef::baseTrans(coenv &e, types::function *ft) { string name = id ? string(id) : string(""); // Create a new function environment. coder fc = e.c.newFunction(getPos(), name, ft); coenv fe(fc,e.e); // Translate the function. fe.e.beginScope(); params->trans(fe); body->trans(fe); types::ty *rt = ft->result; if (rt->kind != ty_void && rt->kind != ty_error && !body->returns()) { em.error(body->getPos()); em << "function must return a value"; } fe.e.endScope(); // Put an instance of the new function on the stack. vm::lambda *l = fe.c.close(); e.c.encode(inst::pushclosure); e.c.encode(inst::makefunc, l); } types::ty *fundef::trans(coenv &e) { // I don't see how addFunctionOps can be useful here. // For instance, in // // new void() {} == null // // callExp has to search for == before translating either argument, and the // operator cannot be added before translation. (getType() is not allowed to // manipulate the environment.) // A new function expression is assigned to a variable, given as a return // value, or used as an argument to a function. In any of these // // We must still addOps though, for the return type and formals. ex: // // new guide[] (guide f(int)) { // return sequence(f, 10); // }; function *ft=transTypeAndAddOps(e, (record *)0, false); assert(ft); baseTrans(e, ft); return ft; } void fundec::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "fundec '" << id << "'\n"; fun.prettyprint(out, indent); } void fundec::trans(coenv &e) { transAsField(e,0); } void fundec::transAsField(coenv &e, record *r) { function *ft = fun.transTypeAndAddOps(e, r, false); assert(ft); createVar(getPos(), e, r, id, ft, fun.makeVarInit(ft)); } } // namespace absyntax ./asymptote-2.41/runfile.in0000644000175000017500000001344413064427076015545 0ustar norbertnorbert/***** * runfile.in * * Runtime functions for file operations. * *****/ file* => primFile() #include "fileio.h" #include "callable.h" #include "triple.h" #include "array.h" #ifdef __CYGWIN__ extern "C" int mkstemp(char *c); #endif using namespace camp; using namespace settings; using namespace vm; string commentchar="#"; // Autogenerated routines: bool ==(file *a, file *b) { return a == b; } bool !=(file *a, file *b) { return a != b; } file* :nullFile() { return &camp::nullfile; } file* input(string name=emptystring, bool check=true, string comment=commentchar, string mode=emptystring) { file *f=NULL; if(mode == "binary") { f=new ibfile(name,check); } else if(mode == "xdr") { #ifdef HAVE_RPC_RPC_H f=new ixfile(name,check); #else ostringstream buf; buf << name << ": XDR read support not enabled"; error(buf); #endif } else if(mode == "") { char c=comment.empty() ? (char) 0 : comment[0]; f=new ifile(name,c,check); } else { f=NULL; ostringstream buf; buf << name << ": invalid file mode '" << mode << "'"; error(buf); } f->open(); return f; } file* output(string name=emptystring, bool update=false, string comment=commentchar, string mode=emptystring) { file *f=NULL; if(mode == "pipe") { f=new opipe(name); } else if(mode == "binary") { if(update) f=new iobfile(name); else f=new obfile(name); } else if(mode == "xdr") { #ifdef HAVE_RPC_RPC_H if(update) f=new ioxfile(name); else f=new oxfile(name); #else ostringstream buf; buf << name << ": XDR write support not enabled"; error(buf); #endif } else if(mode == "") { if(update) { char c=comment.empty() ? (char) 0 : comment[0]; f=new iofile(name,c); } else f=new ofile(name); } else { f=NULL; ostringstream buf; buf << name << ": invalid file mode '" << mode << "'"; error(buf); } f->open(); if(update) f->seek(0,false); return f; } bool eof(file *f) { return f->eof(); } bool eol(file *f) { return f->eol(); } bool error(file *f) { return f->error(); } void clear(file *f) { f->clear(); } void close(file *f) { f->close(); } Int precision(file *f=NULL, Int digits=0) { if(f == 0) f=&camp::Stdout; return f->precision(digits); } void flush(file *f) { f->flush(); } string getc(file *f) { char c=0; if(f->isOpen()) f->read(c); static char str[1]; str[0]=c; return string(str); } Int tell(file *f) { return f->tell(); } void seek(file *f, Int pos) { f->seek(pos,pos >= 0); } void seekeof(file *f) { f->seek(0,false); } string :namePart(file f) { return f.filename(); } string :modePart(file f) { return f.FileMode(); } // Set file dimensions file* :dimensionSetHelper(Int nx=-1, Int ny=-1, Int nz=-1, file *f) { f->dimension(nx,ny,nz); return f; } callable* :dimensionSet(file *f) { return new thunk(new bfunc(dimensionSetHelper),f); } array * :dimensionPart(file f) { array *a=new array(3); (*a)[0]=f.Nx(); (*a)[1]=f.Ny(); (*a)[2]=f.Nz(); return a; } // Set file f to read arrays in line-at-a-time mode file* :lineSetHelper(bool b=true, file *f) { f->LineMode(b); return f; } callable* :lineSet(file *f) { return new thunk(new bfunc(lineSetHelper),f); } bool :linePart(file f) { return f.LineMode(); } // Set file to read comma-separated values file* :csvSetHelper(bool b=true, file *f) { f->CSVMode(b); return f; } callable* :csvSet(file *f) { return new thunk(new bfunc(csvSetHelper),f); } bool :csvPart(file f) { return f.CSVMode(); } // Set file to read whitespace-separated values file* :wordSetHelper(bool b=true, file *f) { f->WordMode(b); return f; } callable* :wordSet(file *f) { return new thunk(new bfunc(wordSetHelper),f); } bool :wordPart(file f) { return f.WordMode(); } // Set file to read/write single precision real XDR values. file* :singlerealSetHelper(bool b=true, file *f) { f->SingleReal(b); return f; } callable* :singlerealSet(file *f) { return new thunk(new bfunc(singlerealSetHelper),f); } bool :singlerealPart(file f) { return f.SingleReal(); } // Set file to read/write single precision int XDR values. file* :singleintSetHelper(bool b=true, file *f) { f->SingleInt(b); return f; } callable* :singleintSet(file *f) { return new thunk(new bfunc(singleintSetHelper),f); } bool :singleintPart(file f) { return f.SingleInt(); } // Set file to read/write signed int XDR values. file* :signedintSetHelper(bool b=true, file *f) { f->SignedInt(b); return f; } callable* :signedintSet(file *f) { return new thunk(new bfunc(signedintSetHelper),f); } bool :signedintPart(file f) { return f.SignedInt(); } // Set file to read an arrayi (i int sizes followed by an i-dimensional array) file* :readSetHelper(Int i, file *f) { switch(i) { case 1: f->dimension(-2); break; case 2: f->dimension(-2,-2); break; case 3: f->dimension(-2,-2,-2); break; default: f->dimension(); } return f; } callable* :readSet(file *f) { return new thunk(new bfunc(readSetHelper),f); } // Delete file named s. Int delete(string s) { s=outpath(s); Int rc=unlink(s.c_str()); if(rc == 0 && verbose > 0) cout << "Deleted " << s << endl; return rc; } // Rename file "from" to file "to". Int rename(string from, string to) { from=outpath(from); to=outpath(to); Int rc=rename(from.c_str(),to.c_str()); if(rc == 0 && verbose > 0) cout << "Renamed " << from << " to " << to << endl; return rc; } // Create a unique temporary file name. string mktemp(string s) { char *S=Strdup(s+"XXXXXX"); int fd=mkstemp(S); if(fd < 0) { ostringstream buf; buf << "Could not create unique temporary filename based on " << s; error(buf); } return S; } ./asymptote-2.41/runtriple.h0000644000175000017500000000050013064427126015727 0ustar norbertnorbert/***** Autogenerated from runtriple.in; changes will be overwritten *****/ #ifndef runtriple_H #define runtriple_H namespace run { void tripleZero(vm::stack *); void realRealRealToTriple(vm::stack *); void tripleXPart(vm::stack *); void tripleYPart(vm::stack *); void tripleZPart(vm::stack *); } #endif // runtriple_H ./asymptote-2.41/policy.h0000644000175000017500000000473613064427076015225 0ustar norbertnorbert/***** * policy.h * Andy Hammerlindl 2011/09/03 * * Defines a low-level C interface for interacting with the interpreter and * its datatypes. *****/ // TODO: Wrap in namespace. typedef long long int_typ; typedef struct {} handle_base_typ; typedef handle_base_typ *handle_typ; typedef struct {} arguments_base_typ; typedef arguments_base_typ *arguments_typ; typedef struct {} state_base_typ; typedef state_base_typ *state_typ; typedef void (*function_typ)(state_typ, void *); typedef struct { const char *buf; size_t length; } string_typ; typedef void (*error_callback_typ)(string_typ); typedef long arg_rest_option; #define NORMAL_ARG 45000 #define REST_ARG 45001 typedef struct { int_typ version; handle_typ (*copyHandle)(handle_typ handle); void (*releaseHandle)(); handle_typ (*handleFromInt)(int_typ x); // For bool, O is false, 1 is true, and no other value is allowed. handle_typ (*handleFromBool)(int_typ x); handle_typ (*handleFromDouble)(double x); handle_typ (*handleFromString)(string_typ x); handle_typ (*handleFromFunction)(const char *signature, function_typ f, void *data); int_typ (*IntFromHandle)(handle_typ handle); int_typ (*boolFromHandle)(handle_typ handle); double (*doubleFromHandle)(handle_typ handle); // TODO: Note that a pointer and length are returned, but the pointer is // valid for a limited time only. string_typ (*stringFromHandle)(handle_typ handle); #if 0 bool (*handleIsOverloaded)(handle_typ handle); handle_typ (*signatureless)(handle_typ handle); #endif handle_typ (*getField)(handle_typ handle, const char *name); handle_typ (*getCell)(handle_typ handle, handle_typ index); // Adds a field to a datum (possibly a module) and sets it to an initial // value. // TODO: Change name to sig. void (*addField)(handle_typ handle, const char *name, handle_typ init); arguments_typ (*newArguments)(); void (*releaseArguments)(arguments_typ args); void (*addArgument)(arguments_typ args, const char *name, handle_typ handle, arg_rest_option at); handle_typ (*call)(handle_typ callee, arguments_typ args); handle_typ (*globals)(state_typ state); int_typ (*numParams)(state_typ state); handle_typ (*getParam)(state_typ state, int_typ index); void (*setReturnValue)(state_typ state, handle_typ handle); // Allows the user sets an error callback, which is called on any error. void (*setErrorCallback)(error_callback_typ callback); } policy_typ; ./asymptote-2.41/drawfill.cc0000644000175000017500000001063213064427076015660 0ustar norbertnorbert/***** * drawfill.cc * Andy Hammerlindl 2002/06/06 * * Stores a cyclic path that will outline a filled shape in a picture. *****/ #include "drawfill.h" namespace camp { void drawAxialShade::palette(psfile *out) { pentype.convert(); penb.convert(); colorspace=(ColorSpace) max(pentype.colorspace(),penb.colorspace()); switch(colorspace) { case RGB: { if (pentype.grayscale()) pentype.greytorgb(); else if (penb.grayscale()) penb.greytorgb(); break; } case CMYK: { if (pentype.grayscale()) pentype.greytocmyk(); else if (penb.grayscale()) penb.greytocmyk(); if (pentype.rgb()) pentype.rgbtocmyk(); else if (penb.rgb()) penb.rgbtocmyk(); break; } default: break; } out->gsave(); } bool drawFill::draw(psfile *out) { if(pentype.invisible() || empty()) return true; palette(out); writepath(out); fill(out); return true; } drawElement *drawFill::transformed(const transform& t) { return new drawFill(transpath(t),stroke,transpen(t)); } drawElement *drawLatticeShade::transformed(const transform& t) { return new drawLatticeShade(transpath(t),stroke,pentype,pens,t*T); } drawElement *drawAxialShade::transformed(const transform& t) { pair A=t*a, B=t*b; return new drawAxialShade(transpath(t),stroke,pentype,A,extenda,penb,B, extendb); } drawElement *drawRadialShade::transformed(const transform& t) { pair A=t*a, B=t*b; double RA=length(t*(a+ra)-A); double RB=length(t*(b+rb)-B); return new drawRadialShade(transpath(t),stroke,pentype,A,RA,extenda,penb,B,RB, extendb); } drawElement *drawGouraudShade::transformed(const transform& t) { size_t size=vertices.size(); vm::array *Vertices=new vm::array(size); for(size_t i=0; i < size; i++) (*Vertices)[i]=t*vm::read(vertices,i); return new drawGouraudShade(transpath(t),stroke,pentype,pens,*Vertices,edges); } drawElement *drawTensorShade::transformed(const transform& t) { size_t size=boundaries.size(); size_t zsize=z.size(); vm::array *Boundaries=new vm::array(size); vm::array *Z=new vm::array(zsize); for(size_t i=0; i < size; i++) (*Boundaries)[i]=vm::read(boundaries,i).transformed(t); for(size_t i=0; i < zsize; i++) { vm::array *zi=vm::read(z,i); size_t zisize=checkArray(zi); vm::array *Zi=new vm::array(zisize); (*Z)[i]=Zi; for(size_t j=0; j < zisize; j++) (*Zi)[j]=t*vm::read(zi,j); } return new drawTensorShade(transpath(t),stroke,pentype,pens,*Boundaries,*Z); } bool drawFunctionShade::write(texfile *out, const bbox& box) { if(empty()) return true; ColorSpace colorspace=pentype.colorspace(); size_t ncomponents=ColorComponents[colorspace]; out->verbatim("\\pdfobj stream attr {/FunctionType 4"); out->verbatim("/Domain [0 1 0 1]"); out->verbatim("/Range ["); for(size_t i=0; i < ncomponents; ++i) out->verbatim("0 1 "); out->verbatim("]}{{"); out->verbatimline(shader); out->verbatimline("}}%"); out->verbatimline("\\edef\\lastobj{\\the\\pdflastobj}\\pdfrefobj\\lastobj"); out->verbatim("\\setbox\\ASYbox=\\hbox to "); double Hoffset=out->hoffset(); double hoffset=(bpath.Max().getx()-Hoffset)*ps2tex; out->write(hoffset); out->verbatim("pt {"); out->verbatim("\\vbox to "); out->write((box.top-box.bottom)*ps2tex); out->verbatimline("pt {\\vfil%"); out->gsave(); out->beginspecial(); out->beginraw(); writeshiftedpath(out); if(stroke) strokepath(out); out->endclip(pentype); out->verbatimline("/Sh sh"); out->endraw(); out->endspecial(); out->grestore(); out->verbatimline("}\\hfil}%"); out->verbatimline("\\pdfxform resources {"); out->verbatimline("/Shading << /Sh << /ShadingType 1"); out->verbatim("/Matrix ["); out->write(shift(pair(-Hoffset,-box.bottom))*matrix(bpath.Min(),bpath.Max())); out->verbatimline("]"); out->verbatim("/Domain [0 1 0 1]"); out->verbatim("/ColorSpace /Device"); out->verbatimline(ColorDeviceSuffix[colorspace]); out->verbatimline("/Function \\lastobj\\space 0 R >> >>}\\ASYbox"); out->verbatimline("\\pdfrefxform\\the\\pdflastxform"); out->verbatim("\\kern"); out->write(-hoffset); out->verbatimline("pt%"); return true; } drawElement *drawFunctionShade::transformed(const transform& t) { return new drawFunctionShade(transpath(t),stroke,pentype,shader); } } // namespace camp ./asymptote-2.41/drawgroup.h0000644000175000017500000000555413064427076015737 0ustar norbertnorbert/***** * drawgroup.h * John Bowman * * Group elements in a picture to be deconstructed as a single object. *****/ #ifndef DRAWGROUP_H #define DRAWGROUP_H #include "drawelement.h" namespace camp { class drawBegin : public drawElement { public: drawBegin() {} virtual ~drawBegin() {} bool begingroup() {return true;} }; class drawEnd : public drawElement { public: drawEnd() {} virtual ~drawEnd() {} bool endgroup() {return true;} }; class drawBegin3 : public drawElementLC { string name; double compression; double granularity; bool closed; // render the surface as one-sided; may yield faster rendering bool tessellate; // use tessellated mesh to store straight patches bool dobreak; // force breaking bool nobreak; // force grouping for transparent patches triple center; int interaction; public: drawBegin3(string name, double compression, double granularity, bool closed, bool tessellate, bool dobreak, bool nobreak, triple center, int interaction) : name(name), compression(compression), granularity(granularity), closed(closed), tessellate(tessellate), dobreak(dobreak), nobreak(nobreak), center(center), interaction(interaction) {} virtual ~drawBegin3() {} bool begingroup() {return true;} bool begingroup3() {return true;} bool write(prcfile *out, unsigned int *count, double compressionlimit, groupsmap& groups) { groupmap& group=groups.back(); if(name.empty()) name="group"; groupmap::const_iterator p=group.find(name); unsigned c=(p != group.end()) ? p->second+1 : 0; group[name]=c; ostringstream buf; buf << name; if(c > 0) buf << "-" << (c+1); if(interaction == BILLBOARD) buf << "-" << (*count)++ << "\001"; prc::PRCoptions options(compression > 0.0 ? max(compression,compressionlimit) : 0.0, granularity,closed,tessellate,dobreak,nobreak); groups.push_back(groupmap()); const string& s=buf.str(); out->begingroup(s.c_str(),&options,T); return true; } drawBegin3(const double* t, const drawBegin3 *s) : drawElementLC(t, s), name(s->name), compression(s->compression), granularity(s->granularity), closed(s->closed), tessellate(s->tessellate), dobreak(s->dobreak), nobreak(s->nobreak), interaction(s->interaction) { center=t*s->center; } drawElement *transformed(const double* t) { return new drawBegin3(t,this); } }; class drawEnd3 : public drawElement { public: drawEnd3() {} virtual ~drawEnd3() {} bool endgroup() {return true;} bool endgroup3() {return true;} bool write(prcfile *out, unsigned int *, double, groupsmap& groups) { groups.pop_back(); out->endgroup(); return true; } }; } GC_DECLARE_PTRFREE(camp::drawBegin); GC_DECLARE_PTRFREE(camp::drawEnd); #endif ./asymptote-2.41/arcball.cc0000644000175000017500000001303213064427076015451 0ustar norbertnorbert/********************************************************************** arcball.cc -------------------------------------------------- GLUI User Interface Toolkit (LGPL) Copyright (c) 1998 Paul Rademacher Feb 1998, Paul Rademacher (rademach@cs.unc.edu) Oct 2003, Nigel Stewart - GLUI Code Cleaning WWW: http://sourceforge.net/projects/glui/ Forums: http://sourceforge.net/forum/?group_id=92496 This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA **********************************************************************/ #include "arcball.h" #include /**************************************** Arcball::Arcball() ****/ /* Default (void) constructor for Arcball */ Arcball::Arcball() { rot_ptr = &rot; init(); } /**************************************** Arcball::Arcball() ****/ /* Takes as argument a mat4 to use instead of the internal rot */ Arcball::Arcball(mat4 *mtx) { rot_ptr = mtx; } /**************************************** Arcball::Arcball() ****/ /* A constructor that accepts the screen center and arcball radius*/ Arcball::Arcball(const vec2 &_center, float _radius) { rot_ptr = &rot; init(); set_params(_center, _radius); } /************************************** Arcball::set_params() ****/ void Arcball::set_params(const vec2 &_center, float _radius) { center = _center; radius = _radius; } /*************************************** Arcball::init() **********/ void Arcball::init() { center.set( 0.0, 0.0 ); radius = 1.0; q_now = quat_identity(); *rot_ptr = identity3D(); q_increment = quat_identity(); rot_increment = identity3D(); is_mouse_down = false; is_spinning = false; damp_factor = 0.0; zero_increment = true; } /*********************************** Arcball::mouse_to_sphere() ****/ vec3 Arcball::mouse_to_sphere(const vec2 &p) { float mag; vec2 v2 = (p - center) / radius; vec3 v3( v2[0], v2[1], 0.0 ); mag = v2*v2; if ( mag > 1.0 ) v3.normalize(); else v3[VZ] = (float) sqrt( 1.0 - mag ); /* Now we add constraints - X takes precedence over Y */ if ( constraint_x ) { v3 = constrain_vector( v3, vec3( 1.0, 0.0, 0.0 )); } else if ( constraint_y ) { v3 = constrain_vector( v3, vec3( 0.0, 1.0, 0.0 )); } return v3; } /************************************ Arcball::constrain_vector() ****/ vec3 Arcball::constrain_vector(const vec3 &vector, const vec3 &axis) { return (vector-(vector*axis)*axis).normalize(); } /************************************ Arcball::mouse_down() **********/ void Arcball::mouse_down(int x, int y) { down_pt.set( (float)x, (float) y ); is_mouse_down = true; q_increment = quat_identity(); rot_increment = identity3D(); zero_increment = true; } /************************************ Arcball::mouse_up() **********/ void Arcball::mouse_up() { q_now = q_drag * q_now; is_mouse_down = false; } /********************************** Arcball::mouse_motion() **********/ void Arcball::mouse_motion(int x, int y, int shift, int ctrl, int alt) { /* Set the X constraint if CONTROL key is pressed, Y if ALT key */ set_constraints( ctrl != 0, alt != 0 ); vec2 new_pt( (float)x, (float) y ); vec3 v0 = mouse_to_sphere( down_pt ); vec3 v1 = mouse_to_sphere( new_pt ); vec3 cross = v0^v1; q_drag.set( cross, v0 * v1 ); // *rot_ptr = (q_drag * q_now).to_mat4(); mat4 temp = q_drag.to_mat4(); *rot_ptr = *rot_ptr * temp; down_pt = new_pt; /* We keep a copy of the current incremental rotation (= q_drag) */ q_increment = q_drag; rot_increment = q_increment.to_mat4(); set_constraints(false, false); if ( q_increment.s < .999999 ) { is_spinning = true; zero_increment = false; } else { is_spinning = false; zero_increment = true; } } /********************************** Arcball::mouse_motion() **********/ void Arcball::mouse_motion(int x, int y) { mouse_motion(x, y, 0, 0, 0); } /***************************** Arcball::set_constraints() **********/ void Arcball::set_constraints(bool _constraint_x, bool _constraint_y) { constraint_x = _constraint_x; constraint_y = _constraint_y; } /***************************** Arcball::idle() *********************/ void Arcball::idle() { if (is_mouse_down) { is_spinning = false; zero_increment = true; } if (damp_factor < 1.0f) q_increment.scale_angle(1.0f - damp_factor); rot_increment = q_increment.to_mat4(); if (q_increment.s >= .999999f) { is_spinning = false; zero_increment = true; } } /************************ Arcball::set_damping() *********************/ void Arcball::set_damping(float d) { damp_factor = d; } ./asymptote-2.41/access.h0000644000175000017500000000564013064427076015162 0ustar norbertnorbert/***** * access.h * Andy Hammerlindl 2003/12/03 * * Describes an "access," a representation of where a variable will be * stored at runtime, so that read, write, and call instructions can be * made. *****/ #ifndef ACCESS_H #define ACCESS_H #include #include "errormsg.h" #include "item.h" #include "vm.h" namespace vm { struct callable; } namespace trans { class frame; class coder; enum action { READ, WRITE, CALL }; // These serves as the base class for the accesses. class access : public gc { protected: // Generic compiler access error - if the compiler functions properly, // none of these should be reachable by the user. void error(position pos) { em.compiler(pos); em << "invalid use of access"; } public: virtual ~access() = 0; // Encode a read/write/call of the access when nothing is on the stack. virtual void encode(action, position pos, coder &) { error(pos); } // Encode a read/write/call of the access when the frame "top" is on top // of the stack. virtual void encode(action, position pos, coder &, frame *) { error(pos); } }; // This class represents identity conversions in casting. class identAccess : public access { virtual void encode(action act, position, coder&); }; // Represents a function that is implemented by a built-in C++ function. class bltinAccess : public access { vm::bltin f; public: bltinAccess(vm::bltin f) : f(f) {} void encode(action act, position pos, coder &e); void encode(action act, position pos, coder &e, frame *); }; // Similar to bltinAccess, but works for any callable. class callableAccess : public access { vm::callable *f; public: callableAccess(vm::callable *f) : f(f) {} void encode(action act, position pos, coder &e); void encode(action act, position pos, coder &e, frame *); }; // An access that puts a frame on the top of the stack. class frameAccess : public access { frame *f; public: frameAccess(frame *f) : f(f) {} void encode(action act, position pos, coder &e); void encode(action act, position pos, coder &e, frame *top); }; // Represents the access of a local variable. class localAccess : public access { Int offset; frame *level; public: localAccess(Int offset, frame *level) : offset(offset), level(level) {} void encode(action act, position pos, coder &e); void encode(action act, position pos, coder &e, frame *top); }; class qualifiedAccess : public access { // The location and frame of the record. access *qualifier; frame *qualifierLevel; // The location of the field relative to the record. access *field; public: qualifiedAccess(access *qualifier, frame *qualifierLevel, access *field) : qualifier(qualifier), qualifierLevel(qualifierLevel), field(field) {} void encode(action act, position pos, coder &e); void encode(action act, position pos, coder &e, frame *top); }; } // namespace trans #endif // ACCESS_H ./asymptote-2.41/runmath.symbols.h0000644000175000017500000000216713064427143017062 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(AND); ADDSYMBOL(CLZ); ADDSYMBOL(CTZ); ADDSYMBOL(Ceil); ADDSYMBOL(Floor); ADDSYMBOL(Jn); ADDSYMBOL(NOT); ADDSYMBOL(OR); ADDSYMBOL(Round); ADDSYMBOL(XOR); ADDSYMBOL(Yn); ADDSYMBOL(a); ADDSYMBOL(abs); ADDSYMBOL(atan2); ADDSYMBOL(b); ADDSYMBOL(c); ADDSYMBOL(ceil); ADDSYMBOL(choose); ADDSYMBOL(cubicroots); ADDSYMBOL(d); ADDSYMBOL(erf); ADDSYMBOL(erfc); ADDSYMBOL(factorial); ADDSYMBOL(floor); ADDSYMBOL(fmod); ADDSYMBOL(gamma); ADDSYMBOL(hypot); ADDSYMBOL(k); ADDSYMBOL(n); ADDSYMBOL(quadraticroots); ADDSYMBOL(quotient); ADDSYMBOL(rand); ADDSYMBOL(remainder); ADDSYMBOL(round); ADDSYMBOL(seed); ADDSYMBOL(sgn); ADDSYMBOL(srand); ADDSYMBOL(unitrand); ADDSYMBOL(x); ADDSYMBOL(y); ADDSYMBOL(z); ./asymptote-2.41/genv.h0000644000175000017500000000313213064427076014652 0ustar norbertnorbert/***** * genv.h * Andy Hammerlindl 2002/08/29 * * This is the global environment for the translation of programs. In * actuality, it is basically a module manager. When a module is * requested, it looks for the corresponding filename, and if found, * parses and translates the file, returning the resultant module. * * genv sets up the basic type bindings and function bindings for * builtin functions, casts and operators, and imports plain (if set), * but all other initialization, is done by the local environmet defined * in env.h. *****/ #ifndef GENV_H #define GENV_H #include "common.h" #include "table.h" #include "record.h" #include "absyn.h" #include "access.h" #include "coenv.h" #include "stack.h" using types::record; using vm::lambda; namespace trans { class genv : public gc { // The initializer functions for imports, indexed by filename. typedef mem::map importMap; importMap imap; // List of modules in translation. Used to detect and prevent infinite // recursion in loading modules. mem::list inTranslation; // Checks for recursion in loading, reporting an error and throwing an // exception if it occurs. void checkRecursion(string filename); // Translate a module to build the record type. record *loadModule(symbol name, string s); public: genv(); // Get an imported module, translating if necessary. record *getModule(symbol name, string s); // Uses the filename->record map to build a filename->initializer map to be // used at runtime. vm::stack::importInitMap *getInitMap(); }; } // namespace trans #endif ./asymptote-2.41/libatomic_ops-7.4.4.tar.gz0000644000175000017500000165153613064427103020176 0ustar norbertnorbert‹R´DWì<ýwÚH’ù5ü} o< ;ÉNr¾°Í 8ÉÏ«Ð…¤“„fgïo¿ªêÖ·$ãänçÆ/¡®®®®ïþ4ô™æYk}®Z¶[{U?©Ÿ<ôÀGð÷êÕ ün¼zqýöÿ5š¯šÆq³Ñl>:‚‡'Ø‹GÿB~Güï‘?#CþëV/“åÿòÕñŸòÿ_”¿áý·5s-ƒ{¼¾>yÖ¼<9É‘ãøÕ«“@þGG '“““æ#öèOùó¿§,.jV«1mnXsÍ`®æéîr«›7̇` ¾ÔMÝÓ-Ó­3ø«=«)Ïš[æ O Oáe˲·Ž~³òX¹Ua Ó“ ¶Š¯èóül4àuã;s8gckéÝk'gÖÆ\hØJ•uÍy^~ttÏã&›mÙxnyûQ[s—øÚÔLОԉ‚ÉJwÙR78ÃoÄîJìo˜·âñ#±ýŽ»€`cúZ÷ø‚ÙÜY뮋…žÅæÐ1¦™‹ç–úë9úlLÑ¡õ{Ý[1xßÖÆ$kk¡/õ9av«Ls™a+áÛCúLËÓçD¡íp—;w|Q/@5xÔù/‚)P¿ñÏÐ2㦧;ÜØ"YKË2©Ý¯G–åyšm£ôÀÈ=ÌéšÄ[$~È}¥!!Ö¾€^¯µ¹c¹ìNטÒRÛ³«>+Cç”+ñ£RD÷+}¾‚zwœšÇ6ãÐò|¥™7€ÈZŸ¨¤.\ô™ën–4ÿKå¼ÛÊð|aYŽËŠÏûW9>SæWuz¥­žõ”óýY0iLíÎ:6xÑi½W/;“‹A;…*hŸnK£Vûu4™tw .½[jç½Á;/ß!†î°³Så3À¥~ˆb=ˆòa¦“ê9¾@Nî6ùl¾ÁxbA÷Ûîä+o,/U3Bwª8¿ú¸ÓίŒ…><Û;e 1貓áÞ£¥Y•}¶¿à×°§L:i—œ •Mf7;qeÀ$1V'¸ŸìU²x‡Žw&WÃ|Ç+Š³Ã”°Ñvï¬ÕÏšQ€ÝVÖþ ¸ßmÉžït ÐÜd¦5èŸuÏsóYœá¦ºcJUΔñ$7§ÉÊÉ)”>˜î§O9y…_º£òÙ«W;*céŽÊç­wTÆÒ|ÉâÔ€“9ùz j21eBì£éӧè áv g?e¹˜’m‚<¢-·[ö{iËÇ”lÄ}m¸Ýªµ—¶|LÉ6G‡)ÚèMíWµÑº–éBÒåÙ„œó¦ à2ɈdàuþvÕ…`ª¶•ÑÇn_xÓqUÜŽñ/(sk8Ìv Q€ÌQfg¨Œ:hÕ¿] p@e•—7nÝ7"?p8N`Ùî2(Ê­ÖÊ­ÕÊ­”í׃"¬¶sýDzÅ$ÿï^ýÙ·þs|Ò|ÙL®ÿ4/ÿ\ÿù>ë?Ü°¹Ã–sN§ÙL!}¶ÒÌ…¡›7´Ô“ü«=«…ÓÈ.þÔ~ÿÚϹælÙ‡:û mn€>±îó‡Yöù+‹šÞ7š$¥ùËqþ)´ŠÎâ¢^¾TZ£A ‡"U&^Ñ ×þ+$ kâºZ˜Ò[ñS½à™­yîfæzåbCU‹M uúw­ö«RûÏ£Úê5¯Æ¨†qÁÑŒ‹!ÜóÍ!‚ƒ¬D,îD[ÁÕ¶’±† ¡ysZ÷ kS XTQ—l,DÙêÙ+F›q™0 WÃ%1ZwYÚM=ÉÇ°ÓÈÄ°0-Æi±<+6¯+•…iˆØ¡#*5%„¬|£ß…­ƒ™ÐãòôÊÄ5'“>KÅf å5½ÆÖ#rëží¸ƒ³tZƒ‡þ`‚?®¿Lÿ2%ÜùÌçhÏ=ÊO´Št¹GíÊ昅º×]žA@¿”@Š«ià×1ý8‰©ðU¿×e…q?zÝñ$J×ïàBœ~?Ár—É )8—#­“„”áJ#¨<°+Řxo$wpII›¯Ä€ZF@kºW†ÓrÖš¡ÿ XHY«…Ǿzífmˆë<z±‰iñšç<÷1À– ·¸13ª‘à JÚa®Ø¾DTe9­eƒË˜óšËmÍÑ0T¸ÀZ²žX Ä¥¹®5×—é0L…á2ø×H}MKºžjn€XTЄ¾Œ¿ÛïÄ]˜X‘DŸø&´ZZ4pí‘ž †âô Ò) ÛäŸõ@w6fÒ­‘ÞD±[øJ-"mHŠ”â+…¢'òÄ:Úê£Ìé“uèÛµR5íŽÑ6†Çî4cÃ]VÖëD³¬ O™p¸fò¹ÇÙ€DåÚ|y_¼.°,'’À¦ ò9ötÊMmfpU¼85-¨ ¤ïEp¯›ÇÍÚÂ0"8è`2"hž‚º˜–X½å¸Ä| ³Öpw€½utk ¦;.ª¢eÛí}»$$¦{Μ؃ⳠR&èú±AEwê˜: ð™W‘&×Qµ$²mÔX”€8‡•@±+5ÿ%iƒ`¬…fEGÙl£ ¢nɤD¦9 ý b–)I;@‹·Mi ÉÅÅñŒ8Û‡HÆõ qœ‡ØègÛD™à<û~l¶>¯ÑŠ¼iÕìÏÇîäBLÕïG±Ô\¯¦›@„Ÿ¬èËkéd£Æ'÷7¢éŸk®…Ná‘E~Î,ÜHþvX‹Ô¥ûIг•SRáëJÊ/£¯>À³§OîRlÁä›ô“Iª}Õ®K¸ƒðÅój‘?=DZ“USɤš^&RkøáY=èî0ͦÜdú÷ì,;ò6\ƒüŠÔ$ÚŸdc¹ùm:¥ì*ˆÑiº©3Âu4R;ÄñnaøˆÌñwïÄæâÄZ8ÒŒ:įu•óþ` Mûûÿ°rñè5îu´îäŽ,™cSìD9G=7"6Km­MÁÞxWM•üØ«›PIRRÂñ³ãÒ=°6ÜüDFT( ö3°™6¿ n|ëÐkÌœ’ôÙÀ¦R‚ Uxn‹¤h˜ßj7S‚fZŽG!ðÝT„g”Üún™Eb]!ëPr…¹yJqeAÇu³ð¬ö¬6ßÞÌ3öÃ_khñÞÿaß7ýç9¿™ÏŸ¡¯ Ö”°¯eeŒƒñ*[j†ËÓÅí^¿«H?æl¹€¸CàêrXeÖì—ÅfmGß¼)pW› ²k¿²'Eeü„ýå/LŸjnÕ ÝiõÊSZºÅí"&ûP (®gnmǺY_Ó`0‚LÒHåó©$7[–âcCþfsÈËH»òÐËžzù|*;™@/KôƒÙ/|î1„L’FjU¶5~ìöAôm\9+à{9GM0-¥?èw[JO½Œ'ç› 5ë{˜mÐÚw·ÜËãM%7å)TT®zûGä¸7Ó¹57E×j5a–2w¢1•"MßðÓ:(©l/™Ñ•’pà$ÒFVƒ/á„]É´Jbd­qnq!vŠ´>¦F³ñŒ.ŒÒåªÏ“`Š­Ø¨B2&þþŠP2`¶2:—uËS?‡ce¬^tzCÚ{Ó?/Oìzûï¯ßžߟ߾þ·˜MÉIÊÔ÷ ;ŸCV‹€²§×¹¤N MÅoÜ>-þc¨´Þ+皬üO*>SPr‡û¬Mz}’‰¶*(@‹Þ KM+Yƒ YFnÿ’ò5Äo˺Ũ¨ šs³!ÂM¬ÎÉ-ºšÜ3 ʽ¡Ñ±,[(…@fx*N©DÜÓb÷lü†Á=i»Ò׈”É`äÏ|að±oop$ìô¶° ©faá1΢§{ò©už°SzzòF ƒ³4ƒ —ºlia™\>¦0‹×’aèþ}1ÅæKŒ×ŸÅ–tE•›ËñÛd7áXæˆë㊓/`àŠ6’­j‘Ä;FEaw¤Þ1t*O·ˆïÎÏöÂÊSÓ™ìS6Úi—òëBÌñ¥ld˜! òÂŒ(L‡™dù8Êüy¨(#æ 7'ÊX"ÒÄ"L0¿µ'Â$´,#Âû"LþtÚ—F˜]˜0yu„tìŠ0´‘ìÖŽ#±±T/vF˜h­øˇ‹0A;#L*a¢Ó–‡Ç™}Ñ&6ƒšs¢0%yj¯”5ÛúãO|«i^ŠB}e,JÌ(ïŽHQàd\¢šÈ›µþ+'‡ŠÐLB‹I‰¼•Õ THˆ* É W1ü±Qì»’,{ C»OÀO„‘,Z3Ç’¯)š±Œp¶[3Ãi¬šöÄ·¸å.É|a¬;kvÜ»Jǽ¤[ùÚè£ìÛMÂ1{ãÒ~úËæáb|ÈÞÊPˆþî}ÎCßi2Sav‡ø X?Χ wŒÇµp}2'¾ÿ_àô#üω…ÎRê-.w¦C¾ð‘ž äcµR•ý,wù™*ïþT)ülÊü ˆì íûŸá[¤Ïÿ„Ö+2sª\ƒWÅÙwwEœFÖgªÅØÔFYÛºç.ƲéôEí‡ëëgU »b5år|.VT(…§ÑqÂfzá9°Øú‡ÞÑN€;òr‚k‰ óìx9²^Ÿ«$4åþòâ7ìúµ5§ù”µ[= ~R ˆéb` ƒj:ŸÉå2õ0™|EB#KŒÎJ<”yˆdlg4ŒÂ]~AÊ4¦p]I‡å‚Ì4æw*B«­Jv/Fã2 Tý @Äɬ27õ. "SÄd·Q±Qg µ!PeÁøÙîmø7Hu’@~Þ#’¸3¹ˆ§½E-]ƒdÁCÎh ùºLD¨Ž4&LF"™h¨ 8Ó½{}á­0ýà9Ú‚®ðÑð’»rê–,À£úò~U%‡ ø½þÆ;*Ð@=hÝØVƒ;Ý59¾3Ýàu‰§sçß’rÞ¿"§…ŽËôï–¼û±Óš¨—ƒv‡nø +%Jµ5°è%ø?rª“Ïœ¯ž¯p_Ù½åÜâ-^3BÝ¢èpoVÙßhtܬŠ|‰¼<ÁÔ³øHÚqóŸQ0¶Ã5 n}6\~P¢4–>ÀȬ’:ÑeÞø¢h~ ~öIú?ÎÒÒ lBH,¸ÁE¨L¾?Þ&ž¢&¬hOz÷†±ÝHY;xÅ%j2*ülb‡Q6*¬$3Š!Nú îäæy™ƒ? íïÝIAIìà*‰í7É Òô¯ýSº Å´Q,òÙ»&Œý.¥çŠ=‡.ªÂá'íGÔÏMˬÁ7îmŸ8F@¤,>ø/¼güˆeÀ‡ßpt 4©¸Éð4H´B"ý?3¤Æ>ËQµ¤ý€1µ¨$‡Õø#2²zúÃé—Pdœ?V“?…±Ä—_Kº*&#ƒ·6§Í£Rü¹ß ‡3Ü;ÑëOrÇã#ßìí’YÜ×Ù»LšüÁî!]@å÷Ø?ú“ï¼}$à…Šem–”›(éVòm¹I:gs%m¦Œ»,¨i%Kºí^D¾¦Ãçmw\ì&æb‹ÁVöã>ñau73ÈúÑ2ö¡@úÛØ〓Ÿ†²ÉŸš‚W^«>²(èÝ™[&d„:n%߇9 êŸZýóï›ßÿênn4ç!Nÿî½ÿõèää(qþ÷øÅñÉŸç¿×ý¯¾¨ñîW¹¯WÄñ3´-w2ÿ²œë_÷žÿýë®ó¿§ÿßœý}‘Å·9ù;¾:WFç~êáÉ_Hü~±t³ Ùh•AâßÀUÛÑy³^¯ïŸ&…ò¡c-6ÐK¬J-UO 1ˆ`3½òi×ÏftgFƒƒkazÐ篥Û+1‡Þ2º×ÂÛ@‰h¼µ¥7ë/›Uæêx` Ó$®9†Î±àrKëÓÙJ[@ÆyãÆC’Á™NHoŸ[‘ƒ‰&&ß6ñDJüjMQCüÇŸêu¥x$Óe<²¶Ò—tC<ßV*ÿv‡ 2f‘#07å4Û@âkW*Ã\sÊþ¹Eü¹&$©™º½Á;SÑ}à ˆ§“ˆ¦Ò!Q“ãµ­hÊ¡ÛJÅ¡þ…¢r8Œ§ú>¦Yñƒ ím,ï€Q.éPšgl“’Òe¯¯ã|ýH õHÄRƒL¦L‰7¨®ÛÍDš-ÏAâõ¹æƒÓ@ )9,ˆÒ8‹“’Š6&ÁŠb#à¾fÛÜ\ÄN؈ñ6´Œ¿ð4¸¼™9DLnoÖ=ºbÍñR[ÓÃñ®ml\V Ú+• %2K Yý”GóXG§ò( ž¶ÁÐùâMp4ý£3ª^ô(=y4—• ®ÝÑlüJV'¿ŒcáD* ¯4ï¬[¾¨²"t@H ‡B0HŽÔ¡‚¿Ãã‹àHü³¾ V´Š¬‚§ñKè¨êÚö¶•È]ãâ"ôð;|T¦[ÊpI8ß+]Ä!ºË×ؼ‹ôŠfJA=‡“Ê/8›X»A£§sÔ‘óÎ à—I?+xn ?›ÒHË·Ö3DBa8‚´þ“½†Ëã«3øFýO‡…ŒC㉆=1øaÚ?÷ŒŽÏŠÂ+A¡ˆ¾XÄÅ„>#¢dº%½ _Ç‚|Bþ6!Ûéhà_dmyQ9µXVâ.s²‰rMý÷kïT’‘x«3-aÅ5#åÄtè¬þ‡½/hãHöÿý½B‰$¬ð‘/I°›®‡pì¬DÄ 0kiFÑHÖvþöoÝ=ÝsèÀ8ɾoòÞÍLwõ]]]]õ)øM+i‰ïÅcrt[³9Îp^K8 q6Ñh„åK½ÕÃ.¹%1&r˜kżôÇX(—¬µÅM…½ñE"U8¹¤Tp¨;³x_œ fl=år †²Šr>žéz¡ij}e—Õÿ©™ë]ÊÕ<ÖûÍb¦?oðƒ›ÂÃëýÿÅ¿‡@¿?fžÓ{—BÜrZÉwî˜x.^kèšÂ<×…¼’^ˆm~gr¹KÚ2ŸôÊÒ¥y†ÀTè~B¨öÄ'™ÝC‚…æÑôùÓ½-YݯØ9]Ö <-«kòtíd‘ƒ¦ôÏ,HÞVá)m¦KbVrcd{^’öz¥í½0¢Ÿv~Á!Ý=Ûë4ÖŠP‚_– ëeUv²\˜rïÜ;³øæë Tc¾ZÉbÒ*·Qx\ŽAˆ¨Œ—îV¥Qµ×m^k‡”ºI==˜ =ÆA3§‹Q+c~¨·eË’’žÛëxzÃd¯2Êé þ@¨˜Ý­ýæÎìàä²Ié–’=‰)Ì£…\¦¼Ô¤ž%‡ÏëÝ‘lf¢…¿âNøüí6sØ©*¦¼ü4:VäxÁÒ¡>G __Ð}Z«"Î4‡Ð7"Rê-¥ƒv» 2xXu&i©}Ã/=‘ùGšWî%1[ć$ )ùé­ éFÇ ìòÿ­þOŠ£_ÿoumý›Ç ü¿Õ¿õ˜þ/jÔÊ'áOÐX \ZZšè/S±wÿ€Nÿýʽ±Û¼«Éȹ Ž ?¿'kß|g @¼±*RZÍH€§\ CÞ†›Z½uXÆÏlý‚‘ðdçç½xJKK()Eíã·#ë¹Y¤lÅ¿Åó³õZßöV„•5,oHyÇ!õËÐ6#²žÇÑFé¨R‚Š*È”s_}Yþ¯Çä ßÿ¬­­?]MðÿÇO¯ýÍÿÿ þ-¿*ðtÉ«ôE2ê#t”ð.»ƒÚpÆÿñ®Þ¹È•‘êû–3µjÿ²wø’lfü~ÊÚÚ“Ùý¦®Šb=¡¢Ü…ÁdÔueœ²!Et„±ëé8Ž§ ¯ôðyœÑ6à»ç¤“pÑt“ÀwN¯¶O·^ìíïþ‚=±»wz¸ÓlŠÝ£±%àWösJZ'{$.E’ÄPq@¦äŒ±æ (¹LXŠQmæñÝ.îöîm×eÓKœVs‚ºCóesêH|Ô0)8 D™m’>£ÕX‡#4F¢B?pîTœ>ƒxÔϯЬUž:ŸJ@hÿ¦˜ÄÈ ¥¾>ÊjqGÄ&AÔ(R€2ƒÊ{Œö'ƒññËIŸÂþáMðÞ髣קbëðñfëä&ã/Ïõ MT¤„––^ÖÈyÌêßûL_!š¼‚d 2¦a£sÏ;^?ä&ÿBÍú=’9r»®G0¾ÌdfN_¼ %~"c"r¸DêSÁ€ŒÀ”p‰ÿóz<nÔë777µ+R FW°ƒ°þ}-Ç&k*°è·ÊèK¹ŸìœìüoIŠ{éâK ÈS¢u2Ò1ÔJíjÝà+D¥Ñ”dMhO]¦¥Ô–¹;dW6R*?UÈ%Êþ©®ÙwmZéðXÃFwzû±Š",ñH\³Åhž! Ño¡w”&Aþ÷Œ4WÆUߺe̘]/^ïíooïÌìA†ˆÚùáÂf'÷Ý*”£TƒDìO Œ\÷Ú9]X~a &Õ.;•¬aχ7½s6…]i Â,k/I‹W鶫è0ê­‡îâZ¼qû2çÍ5l”„;‹‹•Èž•µiz„ ˆ“ªÔR€­ÉŠŽÄö`9ÕE³°…w dóiÝ$óXŒ]Ðììîl¾>Ùá6çâ^ö¢³õúm:B{%)‡ã;°Òwðjw[ g´oæW`5ǯ³s+s6£-'Oê0ü™Hªƒ´ VÚ%ø܉¯/ø ·º-7HñZÇAUb^¯Ôúµó$nmUÿÕ9{TÐQÉœ~?¸T„’¸s´ûOTûŒïoýë—Î{ƒ/ ³öÐðõþNYÒ3ì?u•)0­‰S_1,W(˜ªu¦EOÁ_¹›ÌÀ§*âð†5žI z5FÛ¢%%Aü0›’$44uD­8•4œdr«ch–Zô{³ðAÎBz¬Ö/<¿^R¶´ÇÎæ´Â"cFËÉ…¬M[¡tÄ[¡ŒäÊÜB1]ºç{çœÆZÜ9&nŒùŠt¶((/›ß£ÐrãG1¡ežÍb¡D5.‹B †¶C¥K*«Ã`»­ùúEó´$óÝ€Á¸È.:º«¦X´1%¯ÇÉ»PÜ]xko«i„ïSÄ„AÀHv0%Ùý­—ã4ÓxÊ·JÜ`ôoô±Â¡@nVùâ´–ÃXƒ‚(•srÊã>À!oˆ¬þÇæÇWòyò8àÝ,¢$Z›/ËÅM¦Õj·ëggÑ›n×é^[ŸøEYùˆ„Ý®‘H¿NFp0¾ÈVövuÅz†§‹‘ë¼Ó¯´¿¡ötˆw¬÷OÎ ÏGäU3óPt¡¹³-òáWµ•úW_ÁÁê«_Éx¬ç„Õ¯¾ÊŸç>i'…´Á×’Bô®Ôhd\×à1Á$;¢ñQ߈"A“¹ľB¶xË(£´_ý¿f'ù~Dæ$äpEò'[U0W »#o8–¦Vî?¸î†:§wzjô?íWÊp†cSÇÝ­9MÂ_ŒÉ&§~‚c+Í ÇTLûš” &f~a-gãc'ïÉ4ŒÇ•,7Yå”|™%K”¯xѱ”Ó1–óÓFU};<˜Nwÿ°#Ç9‚Æw„3Œ?6ó}_TÃ|¬ê”O©BmQ±íQYEçD€AúïÂôJ {;Øîl½íìïÆ{ýÚniØœn'zX50‰'°“(ñ%8,ù|/§u·{ëš48ˆ E8È £È¤I·i $û\ÃR¯<Še¤¤ñQX à 45äÁ0•ðŠÒ<­` #­ƒ/O« IbÄêÝ“£ŠÈ Ù%[‘ϳY”3šA¾‚Í_š'GG§Ù”NO 3(x®æ4òР$x>QPø)Õ7.™ËŽ&¾òÅþOx-½†]öðSEh·§³ û@Bï2ÊÐQiÌFèWçºàR´A>ê:CØà±äZN9“V}‘o>ü«ùJŽAy¦ƒ<ë÷aI®7ÄeÀ¬DDËõï<4jGûûˆ#€rKS¸þ{oødDJèÄb›È2‰Ô{Ç÷Âk·u/Iã‚wž ºK èˆVñŽ´k°É»·äTn}1À^`Y¼ì0TEá( Ù”!ôªÏgB¶˜Î–}yô@Öˆ}ÂÅšSÔè¸/jGÿAœ°J\4n °Ê†ýÈtCÈ %˵ü>·éär‘påO:ýž‚äÀᑯr9˜l46 ÿÄpïpæ¿9Ë-t|7rÇJ©ø5ºéÆæÑhÐÖT»]sO9•ðh}£Õw»FºmN±½ u^ëݾê§Í@®ãüÐ*¨ÓžtJÆÃ7œùÈ6™œƒ¯Ýî;òPQzG~ ‹à:è©ÑB"£ÌhWQ-ôÓ&Ò‘ ¬çͳCÔ:’¬6LÒ8WGFÐné…èC§;è¡wz1*§hLb½}Ð×”¹úÊohAK¡{(C Gº7K³mó@ƒ~©Í×ÇÇG'§ ï(µP¡žµâðàÜÙíz=Ø£€ù_ÁpŒÚŽ>.Ùs Ï”œt0…ÑÊlÛ Á(¦(MNvËaˆ.ºü‹ÔœäaEŸH©QÔ†SEtä‹n"“¡P`ÛaJ7úª ¶6…¡ÝÐ:Ou€ñºÃ='F•d?ànÄb€;“ÛNÏZl\|©Š ýóÎEZa€ß0䘺äã <¨&Ñå6‡Û“‡zW–åøw7Î]r GjgË,?:yÐ} ð`7þíxQ\ G$R%Ψ±›ÅBôP„áe"›ÆÛº¦k¨¾¢ÁŸ/Жÿ°ÕíNR¿‰³‚´‘IúPÞœ·Œ [Í@Ï65 ¢Ädé&ÃÚ"ä…8alôNZ8W!áo9Q-y3À‰W,ÕýÑSþ&g#Ú1øÚ’}^}žŽZå¤á“€3HˆgAxhEü²è;n¿iÓÆÿ­ª¢ÏŒ;yâ^y!êš,*R×ÇAõÒÛÈfµ¤™K¢†1?ÇIÞÚ*Ž¾Œ‹çOuJR9å´,ö|C²&OÔ)f9£OAP˜¿'Íþ{è®ûœ^ÓMxàž3º&Ö{Í­Ÿwôg£Ñ3º»s¯é9íò$­\ÃQºfË\>xÅoé}N¶¸Æ;‡§Üø1—SüV¯'ú®ÓcË« âÖIS Ø}Øœ}ð|äòžç ZŸ‡1Ø r«jGe•ëæ:Zd$’vàÓ^Š‚™œù¨ f×»K ¡Ýœä¬­œ$°e?q’_Å þY¦q„šL­"ˆ~;„„¯!R ³*{ë?ÔÎ Ê•½W”Ãiv—Jþ¿»÷ö`gCì Ÿ¼XúËÍØhGʪ4{yɦÍöN³q²'ã:ÃœmVáÐðrgû‡‡òÄ[=]B{¸–h©¨MÅXDH=Ó ýŸj¼Ì_Âë‹2“¡{c™QKTVVh)Y‚wZ­2‰YgɇnõÈH‹År%rmÆdT>HV[þÿ•‰ K.eáÒONF œ‚IgMòAr»}”±éŠ8ò¥ª.óá‡(Št$qB—“>Š)Kç§M VN^‘‹g‡¯ù‰õ\"i¬Üû©Âî9WWhM¯>¸*ä»uÇ=Ɉf6£ƒ¾èÒøœÅŸ ²x…¾ÆU‰ùÐI:¡áÜ”ãv´ZÏ–’í×+±v_W¹¸s\¼8ÚiÔéÀgŽ÷º yÝKk9Æ’£Êó‰#ŠÛ*xûVÏÀ°†HA¡q06¤æ= µ6gzøßšÊËÓö|LÎjcœUDœ3HR%Eó)ƒØ :4’Vx•€æ_h¦OD»ÈÔ©¨YÔš5 u«¾p­S«Ý[¤Þë©õVy;¼Ôþ˜zÇ •KÅûјÀþ¹)Öåq»°šá»–p5µ'dɤ1Ó«:Ý–óJÛ,£­`ïê4vÞ8Ãå[Ø6{îà=.'Ø2œkÿH¶lGsj11ô$™b÷¿î{öOAù)G¼!­“ãUT^Ô…+ÙS›á––Òw;j†ëĵ0ø“yF:Ý:}ݤ v ï¯å(Ì=ìI,t"¥)-T>º€‰¦v¨ïB á˜š- ”±?zãô(æ³#uÜèŒBr#™ÁÐñ%Y©&#Ð.C9B§¬9zä :œ²9–ÚÔŽ‰4{¤„º!‚xÖ©Ûî$Bd]Û,j±3xŒìà YºÙüyqFÿo±Aèš…7º1ú À]`ñ]¦Ùþ°BÊÉk u~Ý;òX5`§'clHÉÅ=φ]x^€ŸÜÅëF qB¯±ÊÀ{Í¡;ù^ˆ=?:mT¸§Ù-ÏpÐ騫gO‰±¥Ïg¢„SÉ Ëd±¶!}ÎÄ?!ÿ÷ÆxÐó|’¡8HŠd~Ì ,½÷-–` 抖¼³N)b§$É™˜5tù$•È­S¦^÷1¤•:þcG)P$TV*ü4r}âUÄw`v»Ír”¢$®ê8•gRísÅÌȾqKCÎ%ò&è¼w<ˆE–nÕVTŒq§Èˆ™û'‚èÔó2'Hµs;Æ -¾"q ¹ˆhËŸ/~Õ©¹Ä¦d%C³ *ËøŸÒ–oKTO'¯ŠB—0 õ¬D•ó RÌ8hmqCÞ0[„FvɆðú4cŸè80½]˜@|D3¥XßdŒ—5- Œ4!·v“1Oœzç²À¤b‡gßg;}›eÐc1Z,ª›)V 7[…3­åC‰ý{»e$YŸÄþºH=Ï¢ÆZâ]U p5 †)ÝlŸ.Ì9 ¹ÉôKe@-š½ÆnK+‘øåŠÎÚQðrkâIó2X:žb®qÏ.k%•Y°"hÁ)~a^]HÕ“§Ó‹%ízš,€lb»Ò÷rD5ØHâ<1®F=TËàzF'f²y{¢O;Þs€²´Ódr3ˆ³¹ÙÛÕ²„¼iÌbŠÀ»™uÀ˜·Ò}%Ö ( ·yùœÂfŠ~ÈÄtZ|_먶w^â.}¥4ñ¾-ºÞë)ÐH`þkï&—iÇÔ÷vÊ~¦Ñü%ƒ'–p aCS“Š·h=æ W(Ýyãå_ÈX˜Jª¨kK¬I\ «Š2W4]2&%îJtáÈÁƒpSW–&]– ÉÒƒPÁй=´ˆóhϬ÷stYÊT~DJºuªm)w.ÂD:&ÔÒÅ3óJ‡~ÞÛÞéìíîì7ÙWzíÁƆþ:{—–Æ\š g¢JâE<™ÙûN—õäj¤÷O% „¶w²²ÞŽÖ]¾öÈÈRïÝ‘p®È«ÓOˆÒL:ýÆ<ÓX©ÐªÓ(–oI^÷ÆL€-â€:Ú± Aº}”°Æ ÍthÚÐ70­äåbIí¾±‹šV¬yÍ |ü(¶š·{§¥5‚eÓŸ6‹Q²¢¾ó™££ÑçÛ Ç¡Ê0V7)*JÚº¶æí'áùuD¡36r 4wú•èÔÏòr˜]×ÒxÊý.Lõ=8{û¹âÕqõõ[ñ.¼¦¦5Ñ^•–êpäÉØAcgtåŽ wa´9÷’»mòHÀÉáŽk¹ÒÄGëQ~[ß×{îûº†ëß½†æ}f‚\ÒŽ«{SLµÄ*¤Je˜GÒ^s3ŽÆdjY$ÓËbNÛUµ½e1§¬!á¥ú©Ì÷Èj‹\¾"C:ц؅r¬00ü@ö5'ÀºÆÀ¶øâRzÎ]ºGGÂŽÛ½”ïý-oÿü'4„å´æDYi:iŽŠ|(]mÖíÜ™!`غӲöÔ#Íö9ÕŠ­Ï而¿òy~Ñ.@6úoŸ+W>r±£ÿÎñ=$;;‹¢#µ<MY79]žÓêòš6ü†ƒ8>âY\~‰Í¥(?ÕL,㉋)hË»hâ{í]x㎠Då3fVQU‰ËI EHnh€iX7*SÇϦÞÏ8U]õ1¹ 1eô=9”fæ”%þWì  ÖñåÎáðŸm2¤cÃüE{âœæ‘|ùR":¢{MžVlq†Yñ€…§vÞ>#´üqCÇéCh¹ ƒ¨)z?Þ*'NÜJÈÈŒ‘LÈ=ÈÕîB &"›C»†¦`q«Žg=.!çC&R\þGö—ß&hœK¼.ž)âÕ»·øéÊ# ¡-IÁC)•ôSp¤ÄÒß]!ÃãîFµaûEГ°.l‚u&£)]#Ê Ô±xÄý; „¹Ø^uF—A±o°–ýku)µcÌE sxtº×€ƒ—6ÓÎÒ¶.…¶òQ²<û#œL|‚Šp.´•®î„ñä"rÓêNFÄå,%4ÞÊId–AÓ d0˜xmÙï„õt¼ ¢\è&& ï÷ß«æW,⸇›GoK­é‹'ç;üI|ÿu‚LN–ˆ^›ùv®Èé‹lÙì¢!8£«X­¤ý0³•’@p#À˜7“Ù[EÃŒÎm<²Š)38—Q0`íô_Ëå^‡Î• £ÝZ=-às–ƒæV¯+0wÉç„#eÊs ¾”øôˆ…‰ÆÄ ^I%¶!ec9~ÃÀ¾àÂè Òz3’óZÜp ¼"A Úà =÷br¥W¥+#6cãf‰Ó(ÌåN\â1×'Õ?áGUöÁ*ëûZ^‘8…a"ÆÇ"ö-–ðS Š#öJœ•õÊ0´¼ñÜB«Hy]Îéd>J:í+“µY•KýÈ%à×fÁ2ªŒª°6{_G1G8Š ED±b"בBP~À›°¿o®i™33þÇ&4vù,G21;—µÖΔ¨ͧøq¬ª? -âŒxy4~ùçŒO¶ªd>91ÿ5å¿NÏ©R2ódÃÜ=ÊÝÓ¹éËæF””'2&ý’V™ÑðOzó›Îlq"¢ÁDVʱøêŒ@\ùÞP'I74ÔE¹S˜éEZµÜÄb„Eçù(-)¦¨©O'®ì³îC^C¬å±Aj*˜íÔ^~)›´VL ë¯äÖé¼\~œ¥X™NDm™;ù¿Ê],£˜œÒ“­–UaZ†0‹Ë‘¶âÏÆ=ƒ¢]†ᢕIxlŽ ½k sÄWèjÄâq ö¡E‘&D7ñí£&“FIXkˆªÈwîUFÁñVuA†~E6|L`F°é!ª÷òR…~Ý~²‰ºYR`*q^™ˆÒÈ-c‰2–’)æë:@ãkj£žtñü³¹Á’ÛôÊn<›PhËñB¢|xS8Üäm½S‹3ŸµÝGÓOjD­ù’BS£ŽsK+Ÿ­oUØXRp´ï02n(¤ ÞZ+pR]Uñjc‹+AÊW‡³¸XÉgO²ÃIs¥ÕÂÈÄ·.þQ‚§º#”?n¼B‘j–¯0l-7Y”G³Ö0G—]gÀ»¶CIÇÄ1ð0K²ìÔK‚4`¡,|‹lW•œÉ‹'¾%ótØ,RŽ«'"¨lÇdõ='Í>ÍÉ,„èÀáÇçÆbÈ‚c Ä,7‘îåa>üÄ_Ç#gÄOD;_IÚj;]Ë‹5±.ÖžRRL¤Óä%Q¥;E-)°k3AúaÓ!×˱×%Ë }ô¥‚”’Ê¢ [‰‡1˜§¹!IZÐù·s^Â?t­ëqB?ª>HT†Âü#yd¯ýv¾~¬G§;¢q͸X‡oÒ¢3Œò|Þûi_Æ‘×.“„|< Þ{‘¥¼>íÁ÷J` 8=¤Y ¸¾÷Èzy˜ìœ.KX©î !¼ Ñ¡Ón†à (y-ÿŠ\ž7èÑÛý—&’<Ù:ù…¼õéF¡ð‚ŒRÒ™<)¿———Å‹—{‡ñ[ý,û†´‹lIgçp;N%''‘9¯Šò]16³¬ÚhŒÁ2„8,©¾>ÙaÂÊ«þàõ!pw†,Úkžæ2‘ߢzÎE_V"¿‚çk<¸Œ'è3ˆjÞÈÔ‡¹°&ðPEç”›¸r©T¶ 96 ˆ,EÉs¥vÜË4Éâ/ut|IeiJj(§ð¶”ì8Á*¹NBGΌХåêk¹!nÕÖX¤×rw„×ò¿>9€7'üÀ0@EîÄ¢Ä9•Åf‰O@qdV†ÚÐ+Ó,™PI:BÀiÃrq2¼°KdAV®„S·tU EHRIiªÂÎôlyéèFÕ1UŒ×p£°V´U£Ögòµ¡7iºÂ7n¦~p“°Èb ×G^Ù“T’²fÓ /s•ðŸDŸ¡­+ÑŠÄzYe;Ç®¤}T&ÎI 8¥g°‰i ›­l¦"cGîbl%‰òîÒÒ’ni©!]©áãÃÛ·òÓË –çå‘üò?Î{ÇÎõ²ñ?òìT0p¾øæ;Åî7ßØ)bŸU…Þ·FÝû‰Ëñ1 Y”êD¥ŠnxôØÖZÑYC[–P¾Âš²Š‰¹ÀMüh–ª‘ØÞ´–狶òÔCªqǽ-S=fÛ(G.«ææÄ£&&A‘ð8£O3& €š—À(‰Ù(G¦Õ kêD‹¦߉ZOµ÷Ô mÙ/ù3þÓr»q£ÀÂÉF§—&J„Âñ а 6Vä®Ac¸Cƨn°¿AÅ6_¾hkwÜ(TfGŽÒû.Êš Y0B©³±’*³¼/"H¾âaQ¥&¦ÿ·üyÍ-sˆ/ÐH¿n¾*½ dçÖ me¥ÖË#<øÒBxD°Ôòèz–’ž¬xp„Íô—}`òò¬%ïìoSê’"à ëWÄU·{„ˆi"IÒ:;ÝY\3@¶yÖ¤±åLºUø`§ÿD…e)3„üv}R ¢Ìú)—ÊŒ¬¸¬Eþæ…b±Œ8nÙ¼àã)y3l-5–ëÛ·šÄøºÁ¬Ô‚{˜ïÊvö² J—Uè.2}³Ðˆé§J©c…⻲}f¡X™)E6’%6̲<”£Ðbp€Ï´¶ÎZZ¶º3ä%i­ï½SÀYhÇ ´=ÑÀ  ¬XC%ä:h5ŠxUˆ·0¥UXŠÕ¬h‡MËeÕNît‰œéyÕÑ+Ê™ž×Úuíj.¥õ5}Šu6¾+ÛÄ€‚{8Þ»û£*Âz;O!ví"¬O" x“MþlöD%möíQöD¥M5ÖwGf±GÙå©ŠžÄÆIÊÂ0ÓÆÚyb.Œ“†¤Èffèü†±sܱ´ôáÀQô­C"n±–GÊ<"™”yD´>µp™£‘’!35°NŽ‚mfÚ‹r\N-V`‹X×$ãZ$ºdj’Ƭ²ÝÓ’œ4bÑ3LPß4ßG{˲ €“¨òม†Ä¤¿ohäï-Ѥª ¹­ÌŒ)‹þµÆÕh¤K,š •£ÉGeêsŠ»ôº)uÐT·Û%9‰IÒ©l/”W*²*´˜zñƒlÿ2G3J qY4*ŠPºl4jlošÞF£J@¸ŸRsSsAt¹ "ÔKµÈV›ˆÑO$È ¹Ÿ$†pp…Jã(¤iáùvJ!‡Ô"3oÄÝUlš2Ñ¥¿è¼8Â?Çû[§S°“FÌÕ ¼ðÏÿ¤CtF>m´X;i‡bä9s PÔÃë°ä=U²^i·Vv” ÄžŒIƒÇ¤^‹à‚s‘%×£#ëÑÁ„¬F^|oe¤\dC‹O2yžÝ¬[2 .Ö-Ô{ÏEýW±ò¨Þ+ÄÜÑ(×a<¶º7úlórfÒó^ÿ¨7+†®(e´"?¸ÃŸæHk”zñAÄ|Ù˜¬ÍÃÖ`ޱôŸ3pÜKó [u”2r)ƒ#‡M2âíÎöÖÉ›½C>ã4çð_œøŒÅ™Nå¬ÒJ¿'btí àw‡7=gtãùQÜ;ã¨ØÚnþr€×„¸Þ &c¯¿7ÎR“ìl£Ñ­hù·ç§$Ýß;>b—ça0%Ù‘Š°¯Òô„Ïžè¤üS%¶#C˜­Šð![§¨$(Zß2€©Äfï‰í7['»lÎ$ .0ò/ZÐ ºY슣¦x›ZVÔ%)%uér”`…zÁ–Ž\ÀlÚª§·áæi@4dnÓlòºï úý^¯ŽZQ·)Ï[*2º®‰ ÏwFÞ¼Ôy”æ¢ÿ „8o<­±¶Z{rÆ—+4=¶`‚ð$)µDUâ\ ‚ÞD²0¹AÃRa¼|gH;C·%5*—•dÓWñ¿,F,d Rf,-‹:p¡ö{DÓ䯱Jbíj+ …P·?òz.Ò¸¸Sñx%¼BÂëAã/Ä*‚¹Ñàß ÇwÂÇLc)Bá{¬Õêªé©ú°C/R €¤›Zn ¯ŸF«^³ÄÞ<­ä–˜q£¹êe”R»üaäŽ'#_¬=ÿ|;â¢]•š¼Ø„v]ƒ_¬ÏÕ Y†h窽;…¼.>Ußô+±NŒ ȧš /-ZÞÚÙÎY$l;Ö~¢ôŽ¸¯Èˆj…°CÙE”íßc€ ù_±LÞ*(9QíŒH©æ Q¤,AW´=2§/·u]=iCkCÃkÅÂË“c‘Ñ4H£¦4߸[¹S;z92†Ò᤼Av'd‰%1n±Ê¦ v= ˜ß”âéщðvfÉí놤ÌDláÜõ~>jCöÇ`P@èÎßÔKoê²à [ýzEŽÆ¥7•ƒñ}¾ÛëÈ=¢Cˆ6'³¹U¿×IÍ3oºˆµ¡¾Ò+oªbY wä}xÔ* $S¨Œùhiá¢I-³bæWîit>üÉÔå°~Ž¯'[¸©´È+hiV‹drv2„þÌ-é›Í§*M'ø§ "jàôR·(4J‘2ÑǨÿÉH×ä+ÿü§P·ÜÌ]!O2¹½RY|’Ë®?ÿdÙ{h£îÓ«v‘Ýé‚™l“‰-@%ð,2²N['À&ÖŠq bS+2#寧lîï½°)L-2-ôrf "® sìVç;sÃRÔÍbh±E³ªR«ÏßƇ-*};´7Ã9·%c‘¥íIs±iÙ©æÖ¡•¹cĪгë‡PõI[ÝwÚy—7—êLAø¿Ø^‚ùÒ)j™™GFƒ‹BÚÎ<@®ÕZ­Õµõ3­ß' gÄa¶;ŸݽÍbá¦_Õ¢ðá¦ÿ ¯þÑ‘©¨WV¾}¶RåNøvå#¿’Ï­Öwkä8¿´ØxJÙ¸ƒV½“!u:–%gH«U©ÍEuÁqÅ"¤®±ˆÈ¦óNÄ–”«E¦Ðh«*Be±` ÖÅœ±¬ÓKÉVҋ⤘0Ü,R屢[–ÀQÓ†Qk À;°Ó«2Q rÁO®±©)Åü^`ríùè |ŸÚö ¶xUêš¼fÈ~`÷IÄPS:Bª­°jŠ‰&šéRYÌJE“À¸ˆ‘ú6©ßS?Kó#1*]lh*c)"¹¾?€ÑdÄš^”1]kz4‡îX-•k†¦°,m$ ™Taº°ƒ×ä~·" ke–F”ógv¾š‘H;$p:ÞüÒ†×0@hψi˜Ø°ËMYéSÁ(ƒb‚tT Q*ïའR<—àKï êŠ ‹}!Úù6ÅyçbÑ,¦MöüïÛ4-}÷¦c¤Þ„±W´þ ±Hf~NñÖŸs°u”íg‰dö6"²Ê[óÈžP´ä¤Ñ@}É@¨XVýéO mÓ¢kÊE¨à„Ñ«fîÞ-ªX…FRã#:ŒŒ—˜15bœœHsÒB³×ºo3ž¹_`þÀLZùè;Wð¤E£xFñ;õ^ž¢€.æ柕É<椔ÜDƒ‹ ”÷°â6­©ï`sirûóíTÃTGµ i½…òz»Àßá_ÑP´U”Jø¥Gœo,«h>‡ãBýÖ.Œp9ÖÛ…0/P¤!ÀQHîm“æãàý.цYõ®^À—¾;Wý§W@õ"ï@fEȾ?üøëÇÎÇ¢ø'v7Òɯìm­±¯ýþ×{Óžk¬Ò{ªê>hg=ü˜ÙRË€MõZ1ñë‹Hys¬Ô‘¨¾sÝag8òÞÃq¯*Ý‘#ëƒXÞ£vÊWÆH«Q‹ï9«LJ0µR:òÏZ_ÿgzsæTEÓVÔqF[¯¹öXh Œ£ŒKQÝùú‡}ò¶öÞ–@™•Â꾇¨®Žx¾7púÚ…DVdéJ£gI”T²¸ƒNè‹/%ìiNTCdüžOqó+du€ [¡¨OÂê’6ðå°%áZŽ÷´ÈÊ裬JÞ.A× Bë‰ïÉ—XuÌN£èta®¡Ë}Pc“žW⨠¹’)›ñ˜!–Í– Bg0ê±ß¿Ô8Þ­è#ؘ?qúH»9ŽàgBö0UÎä=ï’bûŽ†aWRX9p5m¨ËA¨%wr4™Å¹¨ü %ón;R¾Žn¤Ì’Ù–¦"¹(&Š‰¹)_T rãUNÎn­Xÿykß„6.µY:ÕXÙåN»+`Ä)0(„¨hIVV߃Ð.:*7Ö°^A;ñõ õ_Wå/ºGÛ¥Ö¯âl¥]+…z{­®>ñÇ'IùÓYÑ^¸S³yÞ› †¢úJ+çزÅE7Èõ¤! J`C¦½*Ö²ü99>Ff?Žxö¤Š÷é,ØKÖž×KLòZ.v«=_Ý3N_ó´öí³'ÓàKOñË?¦ƒRG*ßšðóQ“ž Y¼[« è`öN²ãîsQ&£ç¡mlK­ƒ'ÍWUþ¨CžÆ Ëå¬xÖ„Þúb«ñSs«ùj*Þþ.ήkÄifÜîK ïëóņta3~ÂwAO<Šù0{¹PaÙ‰1ûˆä8öº“>j èÒX; ­×ž­j-!Jôz中A½u\QÄxá!B“Š‡‚”’ÑRƒ—‡„–7Õ (1®(™•q›ÀÖv#Ë©±¬ížÄáÁ7›Åöó_1GÅ jÚ?3>s…DÚ¥½Ã—¥Ö5oQ [&qbIê8Åeɯ/=‡*Ú¥ÜkˆÝ¿¸eàÖÈ5>ÿö¼$I 4XE¶`áRœça[z o¿þšÝ³U63ã¾ÆsåßÒûˆð`‹¹èòH‘¼_…÷ ˆÙÚ~QíËâu(}Ü4.3FWË üäƹ É ‚°LÒ1˜…øÓ˜°)8ÌIfÞ³¸zIšEäOs×Ô[9£«Z—æû–5÷†nEX Š e~5t‡Ž„׳iHÀh!TÌ¢•Áÿäèè4ÍÇ#ò‰§–>6–À5£ £W {Šb®RK½ÆlÍtͱDO,µªU\»U™âÇnü¸¹½wòãÆ÷?² Ý$’(áŒ@e¾:y2Ì0mÈ"Jò¨Î2ÅPU'ÇêÜ絃D¹Æ¿Ø±äÑ!Ó²QyÊ0x¾”ö“Ì£òŸýÑïX…=-ì@ñî AFù#ržÔ iM•/ÙY'$´ +öΠ˹”›»—†¥#2¨“ö¡JSXu²µcäôýÓóçTH/ÄMÒ Ä¬R^"1‘pƒ!'ÉX‘óƒÅbÙxÁäc¼Ð¢}f¦‰§|º§êS„Á ’èôACxK:ižÉr$GMò!jÔFÕ>%–[ô]{õ`Á<Èpý>£ÉØÍ)ó’¯Þ9K0Vº—_¸B*o`ú0áE¹s¸õbí0?¥ ÌÙÒœ‘V®H\rüVGߨöƒî;yhM¬½ž¢ ¥šH ©4¤EÍñ©Ò€N/F®óeb¬yŸ„¦^Èм7eàG ‰Ð¶“òž.br2^ëµðBH:"!sEò²”§õµet›‰Cq¨Œ‰áoÔr‘m nꞇҕêõprKóPžtp¸­{„âb“͈V‘wN‡0ADC!Åiu úûJ;ª"îÞó¢i“¥¼Gh%èžüÒÙADTJÙXÏÔ„s:ú]x~]â¥'üWtd6vöw«×ÑRáÕñë·½­gOðx·³ùx=·¤Í(Ù³')Éž=ÑÉäÅñˆ˜!Z”BªèQoäÝ>ûü.åÝ©­å3DbÅÂþÞáÎáQQäõq*ÿ9}~ë‹;nçÊŸtú1eü"C³´òx"l?²¿½ âÚþvµßû$ª·ùxý"xÃ<~ES“•CÁŒ´Ô¼¥fmKV†gO.˜vÒöÄ0Mx¨æ˜õÊhÅœuöD¥ŠÕšæã”I™ƒæ†0·«+0QbµÿéSÓLú›0”÷å Ñp%èdüû‰Æ!b ÑPX©hlŽp¯J4_$h_ŒÃØÜ\ÙOIÖ%ûœjÈIiÑ÷ÍžÐÄcKI0m~ÆÜ»ýöY7šwˆç}öVªÀ<>ª·ƒt¼Çáæ9 2ሊšbKsÖO^B¬@~)M,¥úx½Ã@™K\  %”šœêh&¥iÔV.ŸgO@|µ«œZx8ìRª|*‘yH¤RÀ5z;;wÓÙqAÏWp‡Ò¹¹/Ò˜ögO N?çäÈ&ÖËó  'tsZîyòƳf²ÓiD2†jež L©Ù¢4ÉÒa7x\[ÿTrù#_4Gâ™Mw„\÷)E$¥SRõýX¢7FDªJkΞv`EnÅÐÒϨ¡<ŒÊaJùÕ ±|.ép “Ü@ |6:qPLÊÅ‘Ö@Tîv¥=¾€ˆ" ²†´·ŸémÕ:;«à?eíÓdÑfSÃÔ/~pfBDŽ­[º˜Ñ•Ý”ð#ÓDw…³ë‚‰õÚ·µÕŠp¯º¡X«Ñ%ïÂ,}Ž› ¹h](iMõ¼1 jðù) ú0Vá'¥þaWÄ›Lÿı*Úç`htbÓ5$Jü¶X(²×´dU5ûQý7IE©43–û¼Ô¢eŸJN‹’<¡Ú»^[_Ã[G5ž(ld|–£@㻌|ÖLŸÚ¨"?‹âjä%tÿ «*/eП —Ÿh{Žgöì iÃ#ç¬õšåŽ—á”z¶CÖäéÎŽ8•e²®Mȃî»p3Mù¤õá¦zͺ^ÞŠÁ¥]œn)p£¢YÚ:©ˆEï–ø€²këdÓ}’?;¼ú»£É§˜¾‘ƒh¯)=£´i%ô’Š†N½Kz2ÄwÐ%df‰–ðU´ÅÊOêǤÒ FgÜ¡x+¤+Œ¿•^¢æ—@b²M_x[ò":q3yN?G¡x °ñèn³ˆ^–Õ䘛ÙfÖ4×µbäÌ«XK×®cj#XU÷7Fpá „ÂŽN¤é”î=Žê2ÂYâ"¸šÈ@ä@TKx\m¶Z‘[ʬݒQ1ßM«X´ˆCôcrëqgðX„vÇà ¤*ayÁDfV²_Èˇìð7ÕÝrʧ!…Íôd®¾£õŠ¯ø/]ºC¡žÇd2ÏØ^AÖ Ø–Hu°Ý9Ú߆WW{?ïLµfÑhQvºŒ5IÛH1¨^?® °"6¤fœ ƒè¹sЯÍøµ!¾5€É$ ‘ÊýïþÔ* e7áŠ9>Ù.ZÅòG*—& æ×&TJ«¡Bœ´t°¼°@fô{Õp|×wM¶³,¶Ý1!ó]#>ŠæQQœÐ^WÃÄÔrð©c3Çy@@«ðÚÔ)Ã0À¡gXÎÄhôÏž‡lM¹‰&z™é™¯2i¡)FJ¯XÈN¸ÑvLŠÀøFY•D®.s¤®£öu{’¦µ߯'6Ìôa7Ój8?•ÜìN˜µèÒ+kÄ.³›)o¹Œ7ê€Å&’Í(1B„Ì,ŒÌ‹ó³òÇ’,Ém²"~Þ:ÙC!¨Šæ½A+¬’[^Zj1¨|Ž±ˆ«Í×ä5Þìníí¿>Ù™;ðò<î‰ÂƒÌb™Ð¡e§Pd²šÇSÛ{Ïz –/ßšsd²ïq¹eÑPi{ ñQš“õ¹E /GTòFê| ¥ƒ’iaWBtÌ‹U¡:Ô®[»ðˆ¯†•dÁ@EiËÚ¼òPÉUk‰á<3"d}Üðrá¯h>¤SÞjþ°RñSQjÂt08­q„: HîèøÒžh‚QæÈIê”5chÞ†£´P(o‡’F*\¥=ÆÓzÎ:Mý#†¤²Ž6èe"̒쑲À>à‹ÕÐ%|ŠáãÈ¥‘('ïì[…³Âº9LŠG?%½lü)äÓ÷Þêû³èû3Û:>¶Ëú5†«‡cÁ^oíïm5mlçø¾$R·«‘NeàH§ý9…€Çí/&LÙù­{¹Ô}ßjÖ¾ëg•%1È`CNÝãز©‰¸â“4®ãª×´Öè<3¶¦EÊB~™(&Šð…g©ƒ­·ýÃÜr¶9´2ð¾±uxt¸×ØÚï¼:jÊ(]ËìÕƒs{àÜzƒÉ@ô]ÿ dT t(’ÈrH­'\ÉÍF؆#kß0(ÀsnHî2E†ò6W¥/{Ïln½hlGq0éÔ«þƒ°„½_ ‡ò@O÷”›±Âwf †¡§Ñyt2D¯šñø C"ö&.{ëȘ˜žO IIª„ü€àu{ðH㺄»¾ºº*.î0l#9ò„侃¾¬ì¡:Q—w½ ¡ ú1‡D„¬rMˆÜe` ò/¡1ò’ew-/Tá~y£R¦»}„Í’ÂÐ6½ÌªRûysm}ýÛoŸ3¹µõŸ‚õ‚"£a­RÖÀß+¢ûôµßƒrðÊèÕdÔ3{VD”{YOû4)|WI€Œ\ÞX±ÕY“¦&óéP½hø9ÇU×Ð\GÅûÉ0pß»£) ¯®=7Z×½»Bðß Í þèºWÝ®9Þxþw·u”K¢öâ,BÅ;:a`—càn}þÑI{ì¼sU‹¹SŸ"ù ·ýÅ£y-®FH }D|h²‡¡‹U³ßÀ¤cORØ((@G —Ðr9Þ:!m£+23¢¥áf•”gÏ<¿ÿãúyâMÂusß“?¹Ž–뿣®”p<¡¸Êª±¢$éB÷ò¸EùþôÙ»²jÆÇ%«À÷q1ÿFƒùáÄohwrò®G&T$°V–êÊ~_¹-F‘ópÿ„þ›ß®}·.J *žÖת¿=.O[˜Úœ ò›ŠFýÀ;<åG®1&ŸMÑP¹ï \R(jê„çÀ£»EÊsÞ•„f‘[øê¨)¢÷C€GSŽf•€¡Á4ƒMãCGS¤ 7êZαúÖ!¬Ï"õ4ÎRËŠ¿FÎlï}BET=ðÓwÇò—­^æ({:¾ž3 &h)@óûñ·Ï^4·+Ûu@0qÁ{‡³ûr2B>‹[~+ê!^õCÅ»c[nIoѹ™5í …ù5à5è<Cżeô…EKˆåÉ(E Oédž=}úøÙÒ2Œ©qÖ‚8€^ M 6[Qfí‘®sé®öà%SÆö¸ÍH™=Ä>Šv]<9¿wæñøܘ5Ä«½[=þo\ñÎÇ{3XÄp€mwýÙúÚ“'4_@{Âk1Ú#J„­/OÛ×¾{ölõ[£A¸nÌ>×\Kæz¶qÔ¬Ï\áKMx{T¯`?;ïÞ¹Ø qŒúMØ,™…"tÉ`Æ¡éàöÏú^Wnj“l-)D±ã©Â䥇 #é#ÓÕámÒ¬aýOG“gOjbOíÆjÏEãS¼÷¢ Ù,>DcCW³š¡C‚!,NØÞgÙE/e²æqdpsVN•1ž=þö SÉ^ºÔò4/;…¨þ†âY7£ÎM{œ•µ•ræîŸe¼//§,k·Ì†­®?Y]52Ý…}кÁÓ÷Ïè¼zR[ŸÜ¨Ù÷ŽYÀæ9ÙÅ gì¢îŽ»ula½{YëÕñŠÈM8ÄÙ±)%¡ü<üˆÎù*‡ô‘+†õÚJ«µ$ÎÎêõâœ,éñú7ϾMtÖÔN:/]Aã™@6]ÔÅ´–¥ÒÉk'ví4á™FsñlsuÏ\lð3¡Ñ·ËâåCøÃã1,§ ï exy[Að;‘„™¡§«( ‰µŸ$ª€áÂg­OzP9(|-žjÖĺx,ž€@úL|#¾}ΖåQßʳV!úmü”){js‚üŠ7 èoµðA…þ¦G2Ä ¯?}ÒÕÞ»´N RBÅÇF;Òb¿7Jñ•ÅUê.M*vì¤+O:\;ýK%):]”ZcÉILפ³¢»TFõØÍ5^ô|àú¾=wý÷Ji–Ú5ykÑrÀ ùùf§gz.>Å­Ó`¶«¼TôÚ7<ɽ<Ôêëâà…1â®’»—ÈOMNO<kçŸ3Ä(™¢ƒ9A„¦’$'ãPB0ÑÞQ›cÉXý‘"_[á`Uª¦F=u5¶XÀñ®| ‰ç ¬ —ú.ë#gãÑ#@Š…w¨ºt=ÀËÆ÷07 ~ÂîSÅpчOµÑMZF›¨p0Šëò@TÝë $tÄ£ŽÅ6‘’I<µÏâIë白sðR3º°á‹œžºlàR‰}˜¤X3«N!f~Óóæ¼xÓÕIŽÒ ü Í bš±Ùš;‹_¸·÷ùíÒ’•„zhÅ;̽½oäMÏm%Q¹Ó“®Rª²ªy}–·þ÷tØ13îoýë—ÎÑIçðèr›³´Ç÷ÒÑÁ3 ¸È²’–Ò6ÕÄJûÑD!QéOðK²5FzÙw*]ÔzÝ{‰)D¬t«.²vÓ)ÅSš´ŒJY´²©ÅSÚÔ²ó­Yx°úgr6àz­^¾÷BÉ·7¯½^Ï%{´›³B†‘Ê!ÒIù0ꃮ³åM8 |vX1=¼•Ý3aûçé Ô¹¤ÓyyøºÑéàÙ¥T*éÇÍMñ˜.IÕ«ƒ½ChoG|Ê…¤¯8Ò‘¶K¥2ÐuÆ ôêv:¥RÔ¾R^žÇóårù¹î +³Ž±ódO}GáO‘ `… ›6E¯š;QZ­˜‹ïc|”ÊÏYÇ#˜£¡}‹ÉÓXt)JH•ÏŠ"‹÷R¯Ñèc%OÕ„Ú+¯› f«ÏÍè1j‚0¥¦XL±‘ŒS‹XòsÂi 8i„HˆƒÐ•°7—Ô fV¯B$ã&=Ç'”K>…ú‹pçsUžç>qŽ’.N(XÚV?ÉûtëÐaœwKµºJüœÊ=å4c#3»:È[O¬Š¹-è÷‘–å66.eQ0T+·‰~†ïë‰ïrš|¼]ÏcN64êÆËt¾v@´çëÿÂcöÆÿ'‚´X´1‘@]®¢¸f¾NEìKÖXŽÅe‹X4¼À"Üz½ÉÖûNº©;lÌ®ÓD¢ Hç’8˜oÐ7 ÐÓ-Í]}IaQÁ˜86uäÁ*…`âu(%ík¾vÞ<^_¿YîCû 7<­@ë^/… ÿ™MÁ²%§èH¢×ÇDC%i¿×1;ï çÊÁ @Ø!{ጀ";ÝnSqOä³*–R©js¶Ršr×ïݯï¥ã·”=¥"›@ŸÇ£;lÞoáÕ·}Íx̧ǻ 1Fš|¯ô¼ÁDfᯙŽ:ŒCZ>“L]âX •$!±Q©ùÛÍ£°vŸQK6VäFÆÃ=ân”Záu_E$\Ò^f²H㛶=³‡³‡ãi“È"’1¬”««T4C¬(‰VOÈ ?ä“Õ·I†ï¹•Ñô ¥’åܺ©ýh³“´“Ôùsf–yõ‹ÿâ¿Ú½.šîrw1|¯-§²8WŽóešRzŸ·¿ñÚBÏÛ­Xö;¨Ðo® ™@5Ž•¼üaCªã(f¿ï\cèQ‡NmkÒŠëÌy[T·Íã^>—›Éô¦O§Pr}ÖFº7}FMU9ÐÐZJÈ~DLG¼i[eí½À‚à_F­ÁG»i%ɧ‡Uv˜ŽF˜D]žêM²À繕XùÒ†hI¤íÿ%ž%©¼±’ñ:+‹¤å VW¶B¦¦ãx™ìëŠÅG%‘šå€¶L6£s9!v2³·pw˲îÕëJ^Iï|óë 8Ù_!ÑÜ€WªˆVQÁZ‘9‘i¯¨§tAOö$I²ªóhÐG?(§Iw)Ybo¶,8WѲ3fÕ@õY6ìúÄÄO£Z–k­Êy}[¤”rx)òDSó0ŒL,ï6£ rúm:ÍàRÍøp.ú²éÅ3KË\q‰ò¥¶;~T™­ñ¶Ž)"íðòïX)†¶[;4:Gs]Ñø„jJz9Rí’ÀX Èþ-ôÐÞÍñÝ`’=ÚP›Šé›Ää&c£‹?Rç‘q⛾2dZM#êFë«7Û4;DÈ} ¯tIéNˆ}¡ë-ÛÊ Ôèdyøåì wЉÞ) 1…ÐY(±®c6Þq…Âà]Ï‹¾’B­g=r‚€/cïéx˜îydë$HÔ+ù¿= §{þí˜t4'ÓTÁxÂ?ÉI0kòS4ˆ?Ãcð¾N±î˜ìüØ›4Áxí%/9™2Ëof^.šê8ø“G7¢†F©Ão»rÿ¿Ü³lØX^¢]DïØÏ#¼“°ŽúÎ=v4¬ÜB;tm;¤Ú³2Rk£ôŽ¸q%š -²«f˜_ãŠ)uÍG )Zú¤Íf¤P¼BëÈAa´³ã– rt[ˆ%Û¸1-5ÞÎy£XvŒòÉ0±¬£‰Oßc,½xbÑ<­b“q0`•'f“++'ý[pßЭö¿ b:ì‚þXÏT‰‚kðÓdÅYôv˜3 ©Q$GY}' Ç÷ÂA„÷b &j”®U¨Ej髨(c©‘‹l¼Â˜7^Höç`…®^x©û">Wï!â¢'2LÆ|ÚrÝÞWÇAõ­F4´‰ñòòì~ˆµÁꎙ™Ñ÷2ìì[£¥üJ¹š2–’Ê¡|4 Bõj®Å£d¦NZîWóÆHOݯhn —¾O"šCXS¨B8_éÞ`àö@Œw­]SÕ@騀(¾/†ÛíóЇALU‚¥.{2Ϫ lëJM‡;C\Ô˜‘ÝDà^Í^œQ®Y Úóa¾{㪎͎e±ëÊ/MWG-b |¥øÒvdZ”F"GBUl4UÔâ°#ª¦)1‹Bh˜Û›«^¾Ûu×ej½@"B¯4%+Y˜s±þ³ì³_ÅX9úm`­ìèÏÄÒß…mìc;‡ƒIh“ðaIÊH©ŠÝyy²ƒ0Û„V 5Ý$ôÅè)±c©;±Þ2Š“…ÛÒÂ!nihòOD?&OŽ¢€Uyt˜'¢ù4…A„‹iÖZÎ+òUzUí¹“«¼EÀÊœ™qâó‰1Ÿùï(ZŸ4ÑÜÝ{{°#ª8×PQJ‡Î‘ëôÙ¤"´™Pˆ6#øñȃ ¹¥ÌÂhLéHK‘’líºÑLqá™lXÌp0–Fã´§¸¸e%͸àR(Žª‚úÒ0€Héc4ÇhvfbQ¯•5zçxëd§sðú𥠚¼¿×%Ë™Ùz™q£¶’$3µ?VîÕÅI:ÄU?åÎ"älf2oÓáñnû8ùî5¤ AGáÙÇ`ø~|tr »Ü.Ë hÊHô{µ0pªBx[Aèí†1–—,sNà¥i²Êç\T¼>8ž[.þ•5 ï~wgëô5ìué)³¸½Ò›ØR•4ÓPov¯Â)ä.VÒãf—›Q6E¦ˆ¤ î¿y‡À›Åú¯zsݨWêû'0‘õ$ÍNY´`ªS‹‹ƒ‘å¼+÷ûŽûÛf1ü¸Ù.µZ[Õ9Õÿœm´ËÛk¯bH䩬ëD²” 1—™ët=ÇÑ•até#jšB¨4‰.:eӌ՜­VÖóø²«Ä¹i>/–[¿Ò~nZEã–Iò¿V¼åŸçÙa‘Ò͆Ÿ.X5/7e¾yÂÈ0Zí N”m û ê݉¾Î&J^Í­ÁF™/ B_ÒðR\ZpŽ‚ cv!õqŸî!’¬Êffaý…ªÖ;çNù‹‘Ø{Œú*Š.fƒoÐéRŸª+{‰!†ê!mÇœ2~ò4åcÞ`ŽÏ™9¦!.Ü&L‚­Ø&®á­Ó£,!ž@g_Gï*ÂgËlVÉ®RìÐ$i…¥1Çî’ŽÈÿ™Ìà—Ij@xB©‚)ˆÝÆWòÀZ«Iòx0줵¿R~X…¨Û¬Óˆ _UÔ(m)—eª¡¡Šák, (çT‰½üx:‘K8}þ¡p„ovT6£gzŽA³R㬠…0vÀx„·)kÖ¡ÙS'žÔÖÐÑ›½ŠÖ" ©ÙøçéË3Ï 4_.òÈœòõZôK½\IPËz_‡zºY}Ÿ˜-xuÁѪ;RZC 7a\Nð|•ãUH xdM¢’ñQL-!üä'»Û®EjÅ%JÉÒCT1B%ìåžA5/÷ƒbîÅÎ˽CñᤉÛ)0/±K¿êÛ~þù'rʃü—©žòÏå…¢#À‹Õçr„ñ¶Öƒ‡»äÚì‰ï»={ÕjYzö¡]J>¢:–Õ"ú±–/[€üe¿˜Ÿ¢Ò=RcŸX/ùÁŒ7UŠ* µ4ó›ÍŽËáW‘Ã_‚dTnµj$Ë™ñßO9]<–A E÷J|I©ÕâggP}+±õ+½†Ùˆ%¨ÚAúOEæJ[o~Ò¶ØÎE€F£@,ÈZ(Š °À†Ùب÷‚°NÛe—¾ªÐB^ÂÚb²Ìb›‹Âç‘ûÖÇzªìsnñ œîÀ?ﱑÁûÃýõæñ¹Rjg’ÊבC*[ô-^ë2ŒÈŸR‰Ù¡N¹ÝÀ;|ä§"ÆzÁÇbÁuÔë\x=roÇ» ¹D€”\Z¨Ø¼ðÚ~ÀsÒ3î8ÌÇ„ÆX»÷aLY/ð;ã»!†Äf¡ü2Xܦ£F›5ùœêª^Fgåe3H SíÒ»Õ…jU1j|ÙÇð,F×@;‰`a”[Öç'è´²Éô°gO1ØÇ*=¢Óªbx™ä^ŽõeIGk– +‡Ä›Bý¾²{Þß{q²uòKGÝU¾ÝQU)µ K«„§”ÙÜ/$àMl2ÎŒãÝ>¦Ñê}ŠÆIžª¤$£ ˜þ¤Î¯%ò+Ê >B:\xW·€kÙ&§`± ç`aä"¢[`;š¼°àÉ%Œ‰P©jF³gÖ±3Ù{+“—;ÈŲâ„Å—d‹q£ô6„éùoàÆøåµ;òsL­(Q)Ê`¢Ðo­Ö“êwggÛ{ñyJ¶,Öä 7)Ó–MwÔÖï9Ïž°e Žuw8±ï ±ŸF×{[ÏÛnÑÁãž]lx¯Q.6ÒÛÖÝ8¢ÄŠÒådˆÝº^ûîií¶=ÝïCO¯Ká(rúr±‰¢1ÜIz¬D ÎÈPAù¨‘A#ì1Z±Œ,‡¡_þ‡¨)#½²h…,®\ßUêZ^Œã@!"RùsX¬+ê–.¥yz:‡&í„ £¬¶9$ñÞíCBo}g§=ÖòbçÀ&PÀ£ÇµÕZÎŽõil–BÀ,~‚rü©µZ«k°‘[Oµ#¨ßß±! \‡uèu”’˜ß}S.’ã“!…ˆù‚qŠˆ#û"êðÂF]jbIâꅃȄ[B7ûŽQ…gÃ)K±&Þ\G3tÍ&²gÇ{Œ¯•éBOoÀî%·§›ÿ cJüƒe”ªÞ»ÏB*­Tu(8¼Š'ñv{A¬ ’L¬îFèB¨^„¥ì8]²— “ˆ m¨ÔŽXµY¯ áW•o}{5 × ý¬(,!N î`íCwD7°¼ÕNÐ 4f7ô­1©Vã(eM„ ][ý0 U€\Ñ’„l?T[Næ`8BÑM±îӆ㠬z1«‘‘úCò%€ã¥:åô»qû}²\¨V±w«°«¼Cm†ïGOˆ´ê’Ó@Ù´Aúìé§wEÃÁŸ9¤®ÍZZAsj?ÓÔ×O‰jŸŒR YC*cÍT8tÓÈu”ª›´r“4„d©®Ååd°—`… åÞ‘¸ðÆ7^fUéñ:öÛ³'e.†T`DÐîç›Í&¨È5ÁÁGâdŠæID£ç†O _ëUŠ7®ó®(Þ¹wèNõÑH¦eÙíìmmîÿÂÓ$É Û5Ñ•4ÙDEezc¼:D¸yé'qüÔVO|‚a\¸h)¨ÁÊIH»T]GAr|‰½@ÖT aÂÀÍŒ¡ ÊÍV" ±{»žP¢ú½5½rÆn„MîÀüîðü®ð7Ô«#׶æ¦Ð‚èǵzqºØ€ôåÑ$i$$E3Åá¨lô­ãš8VØRˆz¿diѾ®Ä*ß@adƒw Ø@ÜärB÷3—Œ&Ïãm¯ÀWFþ?rŒœdb©,íóP;dâËѵ1¤‡~.š ¥+MOÕ«%ÞzPM‡ËÝ%Feš@ãŸØßã9Pòö×CôÝ!#~Yn0ìk4lv ]…﯉€tŒ¾¢T®µ«H»«ûH )òål95.j±‡=‰íQÀú"ã2 ØñN«tÆPû¹U>‹Fá ]AÃA ˜tš&®§x_h3P†ñ‰rå J)ª lõäEúêeŸ¿H2_øldô%îW•ìËK´Ñ×ÛWz/æU/Rï•ÎuÝ“7ªJ-€ÞÍßs¾Ìœ 4\Ò Éy—wÛ 5Á¦˜HË\L‡Ž¢I_Z˜cKq›;òÞ] +ªä§t›/›’O¯Nž >5‚H…ËhÀþ(y(sÆü Y½µî`˜±ìb+©ò¥¸ÖräY‹’%¿—&ÁÑ‘a¡ÕŠ3¼××k5uÉñŠãT"šöüâÞ (ƒP6ûÐÜ#u86ï(u{ÑåÛ ýÃN]™tKÒ§z”§-ÙÔn›º¢zŠåéÅn¬îØÊŸ¹Ø¹ÖﱆO3+éú[©‰!ª4ÈÐOu‡ù‡(æ»Ê<£Iuþgâøúêê7*ÀÈ ýu=ÍI*4åÑÜ-—HU#!3x€–ö+$ÝWA®ÂÂïÃÏýÎfáF5‘\:QóWËýi’*õòàÙ·ïÊ3ëPónÍ aò‘eÑàS[áƒüò©£Sßs[Šû£–àŠìEó’§ÈgÁ Lvgå»-ÕWŒ’M󚈲¼ÍsšP¨ùC§5Zg‘µH»X ¿úµ¶Bwo¿ÖÏÎVÚåvD¶ðU{í+L4ÑYUW²žÞ H¢WV°N-àñŽÔœùçbá<¸z Î`]1ab€Ó_cQNGöøϺKYu¦"Š {^«õä鹸°î(þ„õ±øîhÞ`±›6óm2*Ú ˜=yèY³GÎ©Ä…Å”+\Ê»Ä}»¶= ®mä]ð‹´{Þˆ|êµgZVîeKáI§F‘mœ>jM”-Y¢2°÷SnUå“gôº¤ž“UC‘ªÌqQM0 Ya™“ZGò•Î8U…cº¶C¥œ·)Á “(«Öl†ä½à&¤ñ2.·{¤ON×”›7½1½l4*…n·ƒºU©*bرŠ¶„*ÌæÈPvÄ‚·÷÷mVht¡Ä³¬\¯Õ0ä ªôâbV.]öºHÅæ¹®f»€/ÎWmŸáóYƲcOµKܶÆþl4)|ôžóýL[ Äv#Šäù¬Ä®søGÌeé„ÊÐ? ™°Hvö®Õ;•TË‹IAQ¦Ôâ ²E #Σ۬†AV¿ …Jüá̘ß`ð!@˜LÀ­Dñ‰¢bÿíÂÏõõS1—%ý~?kPp¦ )õÕ¥ßÿ]3†Q Dü¦5ýx”}Wha“A/pÓ-(BŠ¢àµcé’Ñâ$õô"zɵ!z±m>ÚöÖ`½x.SInô·Zµ³³z­J£ÝÃÚ {lŒ+ÒRõÈdÐ…¬Oš¥Öë8C/¯Y¥à›s•p<ÿ囨£LÅ"õì´i¼Ïë«šÄ4£Êá£1ˆÃ›™c˜Æàf åðæ³G2ýWžñ|hlj ØMÄäJ·¯Yõ¡ƒ‘fÅAóç†bÙfŸ³uÔ‹™[õ¶±íøÐjª•gMæÈÒ” =½Ëp³°·Û”¯á×fñyѪ†¸«ÊàÝñ‘¸0KÁ §?,‹}ØÞmC;°é˜ÐÒ$¯¼P…ómí±Çw}¾]Ôv8º²¼Gu¥Q*¤ÆÀ^€qŠz½!òXí¯(\‰ 2á€ñ#ÏW¿‡^>ŠvŸ¯KOÆËèàŠ^Çä|Ðü¥Éí¬Í(m$˜•"o.©mø]+øY´ñ”äTÿ³Uý×ÙY»]Þø(êmöÐà¿ÂžT<·×P’£Gu‡-ê–Ü+ìü€Ah‚Ð|ƒØ}VJM†ðÒo"0vɤ}ý?ÊŒÝ'á5 Œ¹ö.4‘½sî½,×z·Žx–'[¿¯mðK6´ŸÞ±¦tµ*ÿPayœÞzv,”Á.ïS·i“ÀðÉv}Hz¯eVÂXçÅ9Ç4l±9Nñy«[ýO&úp81‘iY†pÌYݧ:‡…sésJ¾©µÙ«u®…bðcÓå$fåaʘ1ÚêH: opX¦ˆ²UÄÈt<’ž!†õ‘ ¯ù4! ÷ø5QrkW5‘?–FÕ¤Ïã}{^­“|9e×üûðñ@‡ÿ ~ŠŒO )IIH[ì醒¸¡Jx4Srù¹(RPjAs.ÉÎððÒëkĸh¾G@×Øm)†°eêy5$”;†æ, ?ºv†aл£þÊÔÉaD“|\)ÁDæ7ôK‰FÚ¬´î\H=§bkº²æ—Ý]Û¿¤hà íKñœÖb­ö tú¦¨Ý1'ÍTÛãé™~Cÿyç©g¸ûŸß´&ŒŽoS4iE;½°ü ”xïjrû§ØÿWèVg©I±/G®{öpUõFÎUà_öyYaz|ÞqÁ‘ÍlµÖ“UµA›c8RGt´„È3Ñ‹O5I·ZÐÙ´ÎÒL«FHkÙðO2¸ºßEvr%DÈš±Ec>ªÙÙæ´¯©µŒ™(‡±k#eÉV¬+£üyö~*Rf|,úq­ÉW0ôÛù‰f:Ÿ$Ë['™Dúu;JN>է䂥Nyû¤¶V[‹%‚7³ë/§Å¬ê³ÉÚ(ˆ'µgá×PvÐÜèÁºÉ¸ ¼v¼w“?e#É”^¤.ürɳø¿qωK"3&ÇTyà"Æõë`àÖùF%zËg2ã»%*dÎûáäö;\ øcmUÿZ“ÛàK2W6ÊVWeš`û·)ÝJïöú8'&!ÁCå”ëíÇVÞ2#í‡Öü '~Î?—ÒŒ8ÐM³CÔVÊSVI¶d­¯»g3Ò™k•|KJP<ò×d‹,Ð<å€ò§ì’÷Ù#•@‡%´Î{uüúmÝû:GÛ;1@ºìkju×3(Ù²púÛ|ŒjÊŠ‘CØÍYŸgOÒêóìÉ¢.&@Þõpè¬dMØþgNØþ&#Tªp&.›Ü¹¢ù Rýÿ:¥ç˜Cg}µ£&F·š/ó¹³"ó̘€ªIŸ÷öÆÓ`8®ŠD®"e»ÇÅ'Æ͘ÚÊ›WÇÕ×oQäÅ ;:­ˆ°ÜÀÙoÂ9á"ž4yúôiEð]@R/É–„j_¤ÂÐYÎñú+e„ÀÐdN¬:^8ã`ÀÍ6(8“SŸ;Xæ&”»70w„¾àÿ4_ðÿ ¹,®ÎÛã~k·ÒiM”Žw*|ë³³¿[žËÐj–@7Uòò OQÞÂÏð‡RÐ8J¥NêIÞH"âˆüÁ¸}YJ•I!B`tú yié¦Í{BÛä°¹¥KÏZvsN¯ÅÇú™ÉY“5eõÈÛNUǪlòÌ¢Ÿ‰M€éíoã­³6c« ž0æ'Z¾ru…”á7î^3>ëþ6ÏŒêãõ+yøWä?®Tx*^¿Þß"oh,âÃwçÊën>^¯^xc5íª>S÷mò@N~°^$‹€wQ!‡tU Ë]ȳ'H ¶\Uij'Fø)I2DÄáAÓ~öÄlCyzƒ}æLuà@ÇÆ-BæQ²>h¢Ÿ>fK!ISØ–¬ª^Ï´ãœF3?‹³a$>cËÔžªh.±O<$ÀxÓÒ¥’»y7¸¼¬åˆ¿¬Ð7\üˆi¢'L˜vïA}„eËL~ox½ä†ˆÀ>xÃÄßIµ‹ˆÛª†‘Ó¸e¾ÿe¶ÂE¶²¸±ðgîNÒÚNÆõDõµG:na¢Ü›@ ¾ÓíºCvLÎqˆ:‚0'ˆ…6ÌXè;#0æ8œý%‡Áó´O²µ1¯R¶p5„ü̲Õv€ƒ‰NO=Q%8I ¢:$ŽÈG=1üði!5(Êf±ºoXfóäçX©¨æ‡¶]Á×n$ 5½a*¿[Á;‡*l©ø€±là“-Tïàß¿e¹Ï·™¯ú ™ÍOgÁѬ‡B&c”àû=: q#àyh]Û§“ׇ’¨LõóÖ~I¢šR 13¡Ò&g‡£§/ÜúMÙ 9mEœ—ê„“wÓßlÇCÉŦÓtoƒ¼ØÎ-¥ÇMŸ{Ñ´óyáž;{»;ûMFyÞß:|Ùa’Dîo•uÀªÖV’–Z¢TØÌh@¡B²q[fJÙ2׃Å4rACR[‘}aÆàèÒ³ûœ"HÃÛìpæªÏÈéXéÓÈfÖà¿g/‹½§Ó–´J„ñ V(!‹ë]d+š[S89P‚–Esa§/Þ›1pÆ c\5 +€íÂËZ•Tƒ‰âÉšîTbY–tÝ…&ÆQ×µBW’÷pFgǼ.Ç™ lň·Šê[Q}¯&دõ"Â)àéÅ®Û FNtq,Û¨¤ªgO*D a\b)¾/U_5Ók4=„á"ø.4/EGº« ê%.&)ÌJäP£ƒ/”(ú¬ßíOzè鯡 l>ó&d=wÜ­G„ ¥-LÐ>q㑳yNp¨õ_%aQß;”B²¹½,‘¿{NÑ|¿²×å+¢Ý*œ­—ËÏEødõMôWûDáóøª,mw1ݪN¿>Å?ãµ´-~–jÿyý×Ö’8[¹¾é:CüUï=ë­ÊÒšÉÁïÍÖ¯›g+HÊ¿!±Ÿòuø#ç~ã‘(¶ý¢€ÿ;Ÿ¥Ï‹eŒNËó-ºŠ…ðT4Øñ8±Io¨ô8j=/$=[Bÿp#é¤Z9ÁÐo豈í[ÑÜùàßñ¾6¶<̹¦–$ÜÅ(xçÊP…ݬ-þ5äÉÌ&–\Ÿ* %Á-J]R¸2K² â”3ö// äB`7ŒJW­Ê.¨r*2œZY9¨’“ì©X_¹¹œÒAÃêÜ1è|²¶Âþ¯¥H–Q. %ØùîŶòg^SÁô&£N„ÂN' lN}J ‰üE­¦l•ìÄCwü¢¹ ¼§ç·rÔ“úÂå¿FWœÑ2´ì_v¸Ut‹ó¹²§jß½ ƒðÙ_ -uqÿ³{ ;c:ˆ ÖóSLààåÿgÆl÷WEǧw¿½g°=<žJ9mFÞU6œãê3kX´øñ‘?Ÿ“?ž›÷ÉÉqÕœ&ÅŠÖëä¤÷壳8‚p]¹ö§y–=°›2¸hÖ×£(—h´#2ò—AKѪ^Gû6Š\øH² (äó;šÕad’¯¿ÖÖVþß,”ØB_4h$Åaçj™SûQêÈu°;R/DµP*} S®ðaùý§r™3×DGf•ÙüÂûóØÒNTNú×Iä¡´{)êÇÈÊÜžy B2¹/Rû½/£ïáwq_¯ îß…9.æv¹XÔÛ{†¯÷ƒxzß×Ï›½¼ïé2¥Ç3!¤HËÛ$%r(šbòèV›£Ð ¢ôö$[ªûsÄ$œâî¸{Oœ™Ý·Œ 4`Û&"Ó´Ÿ„Ç¡’:ó.|˜öô·ö—‹mñX†=Ä{dÏ‘2m }¯<Žâl· ™R•òú0²P‹àa=tØ Ësúp à~3Ó§»ˆÌÕ ÌM¢˜"ÐÉ}¢˜âÜ¡çáÊÁ1M@#Dåõ1|˜žã6=çÆ«Mçµûiqæ ËÈ*'ìkëú÷Ó÷dœ…îñ7Pþ>‚3ñëý·+j¥¯LnÖS8h7ø“÷·ÿŠmN^x³ýF£Ý}<¼”ž§Ç» ’FêûêØ]¹cŽè ı†gå¯Ø( ­ ¯ý"ñ}Q‹ÏÉ8MÎúÿ^" }î”cM} ùd§ùzÿ´Ô*ØiÏÊ9b!>…)Œ}$­QZlžœ‚ J§×¹ FE~ØÌ“?DÁª»(¢E~zhåi¤ Ù1€RgçíNCCïî½£ƒã½ýöÏ0{cîåt%Ðò+ñAdp•GîSTËld–édæ):É2 O;©Î"EXÆû?‚¸Fc‡Éz`Sð””\ê:\øcØyÃ1†Né‡hÃÏ'ÉÈíó¡E :=§Ô&Go |ÈKˆù”ˆyb0ñ¯p=c%ØûMÉ‘ów䛓º\…‡É.…’eå±Rbˆî™P£n¦Õì½ÓŸ £¶8Œ¢ÄzE†WU¬‡û&…d.§"¥—(yö¤Ç¯kÊôég•LÜÀ&ärÅBå“­¡ÜXS5Š"DŽ¦ºM†sLÎ`ÄÆ:f p »Z±Í_­ªºlQÔ"àÀy –u8„ #þNTryIÑ¢æhwIËž%IÈÜ)4¡ýd,,úÏlp+•W´šv<-ÉŠÖˆ¢%‹ JZqJóRH1z3º|/Œö‹ÈF ¹Zk/-Ìd²ÍK9ÑDk—qŸ8œ Ñ •¯œ)$b»¬5ca<8|“ŠEé@¨Ú%4Fl £xGïVäS8&µ Eèa·8ŒØwbÙÐhY–©è]žŽ¡]í#ZþY²ÏƒxËe…O¯™Óô„KuEòžw ò ñK4›ÒuÇôÉ‚RÝ”¬"ÝÑÀ iÆ“Û”öwº$ewÆÂí2a­’(/®ÙÂw모Ûk<FºÄˆ5ñ"œX”¯Ô"l5úìBtúù‹14`iôCm#Ä â˜¹žš¸V‘Àc(«4¼`°'ÄV(òFUòáÞ¢í 6Ø Z ñVy9rh›•; RÂå9Kï$ UÜøÉ)’Œ­eÿæÚ¥í0‚NÒÁ²Lþ28söÌÈXâ‹–K¼ã²ÍšÉClžl‘½ cÓÄ«ÛîFÈŒ˜»P-RÊJÙ”­wn‡}¯ë¥ïý(ÀɃF­® «íò¬¼Lñ˜mûà4{l·»s’C?ÝéÑѾ”ZKø» «™ÿa\bÂã § ÎM\/’a W¾÷Ÿ˜íÛ¶wv_–Zi%cLâÁ“ŽtUå4Øi´8+÷ü¾:J4^í4~Ú;|YjaOÖ ©–µ¶t–Ã>Øz nlu>ôë7xìoµÚíú b„ˆ6ð÷Ù û¦QØ4²2n)P†0÷5OŒLÜøö\ÙhÂYhEÒ%ãâ4¢¹$âês µsЦ{“Áà'"ý…0KÆc Ó‰±*µøcª]Íøú ­Ãå?>jî½­aÜÛQÏÈ »VœÐÐCã6'´KRbÏVˆr4ä½£Ï*òl· v0½À¿Âºkˆ‚AæëøN\lܬ²™Wx]0õEEP«a!Àc™¬/a¨1­7"œY•í¹Â™M…V¤pV:PòÏÍš}ï{©Õ k6ÞAúl‰ó:‰ž§ËÙyuð%Ý‘k§MžŠ=¯ˆÃJÝwðÑ€"õ.å£Ì"î BäFî•{»y1¢°2I"y±!LíRm¥]Ο#!£iíÂ$hèˆ7Ùf9·Ú(±n„×)0¯(Ъµ»êO Æ‹96ðû ²†n,þùOd;G»bíû¯×s¹••ñÆQÉ}[¤ïçeÚœ.©÷«kµ'„ý|3Š-Ðan_x°ñÜmPÂH:È(ZR õJBR™_:qâò ì?=÷râò •’Iª¬Tø{NS©øÄQÎ_lߦÇrδ—LRÑܱæ–]”¹A¥Ömžª·(Ñ4ßà» økrpoã¨7ûÛVç«ŽWˆÄt>•+覀Ç¿Š?ùlȃIìkx²ó¿¯÷Nس Ê:†–Ío­Ã£Ã½ÆÖ~çÕQótF’¯÷ J“*h6w¦}5ÄÐøwª!Zau^l5~jîo5_qB¬ËÖÉËΛ½ÓW¥ð²j¿§äú­fçÕÎþq§yzB¢¬ŒÛ­-µ wˆ†öÙà=Žz±'~üçÆR5¸é?n|ÿ£öºk™Zu¤ :…‡3îèÈ-N&7_û¬>Ì9\@›ýÞt•ù²h ôöªÛUòþ©bÖ*|BU¯(l}$§ŠòìdÖCü莸etÀ×t+Õ•ªÆ€舾ë0ùñÈá m]$rØ\`Á'#_y×M†pd 9î•M2DpرK^I¨âC/s… S¾f·ì-s*(zºÔ§x!’ªT\JÐvÆ›î“:<±7WáÄÇ°Ø~ œÂíÏu鞺¼˜kœÅE;‘fÒ˜v¬“õ>©­Ílßغæ;É&Nuøý‹œè¢Ùø1ûk䉜yþÛ~±i¥x ù’»‚†µüá)ž ’ó^±§‚ä ²Z•·+†3:2}ˆÞ¿¤ŸG§PX¦’ýÓ)]…Eõ}MgR0õh6¢Ãòª‹Æ—…¢WF°Uù‰1[² ®¥ê{6?þg©"2œXŠäÔS$óÅîv­júG|žâ ±¬®¬$öHOì¹rèÀTa_NöØ î/ªÄ¹ô`=ìÛÇ€ý˜ü¿Ÿ-øïÏøŒK¦Ú999:)µ #Ÿp»Ë`B¾Á‚Í.¥–QJQ\¸Í×/š§ ^m£ì,½ü£cÅþ¶¾U9n'”Úš®Ü-5&ʃ†ðgBëŒpÀ“7D»rì ‘‘辧«XIÇ>TXŸ­³„ì²åjü4‘r&à´RPeÖH´Ôò.Íkóhác¼ç8ˆÐXÎdÞ¸•T^ÀÃोs;cµ¦¯S‘¬Ydû’ñÝ4ñ€Þ47®$X™}”­°ö¶¶3s°•¢c‚QHå: –aéW«âøèäô`‡1øKHzy_]ˆdj±‘*‘6°¤f†^ †¤!Ý‘ .þÚ yL’47½ßëpÂÏÀ÷­´›Åê¨g¾*¤%ä-op0ó([åQAÈã$L:y+y^[ãÈ—l¸ m²ˆVQ`%˜z‘Œ‹¹s¹¹ÂjÚ‚ÿHœXp*té¨ó¨ ®*ãg$ Τ <‰ÿe¨“ªm æ…›~u”ÙàÀì½:Ínu~‚t4/FW˜a]´Ì)ˆë[“hYô¢KIKËc¬4‹ûmÇV^¤CA5 Š¾½^'ÜÎ\,fN¬ˆJjÏ„ùÍùjB¬®­?~òôÙ7ß~ç\t¡„ø³ø^ÅÔ¼j…£Gó§NµÉ6™4mool¶·?å”F w€fgwgëôõ‰®¯¬haUI¤åË®l^\„n×…-w¼ <Õ(ʨ†cXOqü¦V³ ’=‹°Vm&*a=vhÿßÜ`±d4@y6¥„õXiÆ¥ y“ Ÿž¼>llî¤Üÿ©9Ñ®ÏÇ£‰ßÅ9ê °]ôzC7…±*²iW|j"Wxr\®yèRŒ2hr3£TŸ;ðù Ϫd›95[¬±ûC&LJm’5ÁŠ³ÌåÉoyëîÒÚƒ•>„ʸÁ4ÔHŸiÆd¶&¯žÑ8¤^õ`çôÕÑvæ½6|Ӯьü;y¿âú]¼¶Y6%ŽK¼)ñ| Éb`•pVí-í…c¯Æ—F¢~³îÀÓ5“S+{ E:oÕ–±!ØWäÄN»H„úðGû>6A­0.æ)ôÕàæÒ›E©à("ꤡ°ñ±Ùíºte¬ã‚ˆ,Óþ3Æ€5òÖMBÔ TN³|,"zd‡ÎüÂV/ j‡Ò©:aÒ•b¦ò¥Þ º“!3©£3ƒNãÙ³8˜•¨ 0ìÀ"ƒµ¶JůêΗ3ŽkI'5½”—gãÅȳŒ¼ã†úBr—¼­]°žÙ916¦2\%ÑA`jË46ÅÖÈð¡RÚÇoåi¹¾poQE†v0X&Veï¯ö8ÒU«ˆ*œ¬hi䣿‚u÷‡Kž‹#WÃÈ*7ÒšÈèBº\aT¡’+èº1 É÷x; UË%¥Uq¶Ÿhœí)sR•*mÛ/\éV»@–°çAaOg—eŽÝÎþ®Àx5ß¡Ú–þ¬ ª-¼;Ø?;k¾%yWÅ2àGƒÑÞuú"Õ§è*¬ºŸš2Z¬ì‰Œ.(ÝZ¨‡h¯  yó ÔC{%¯Ç^)áµ #„ßètÎó¥ïxàx~-¼ž¿'~½ýö™6Çô¸4?Ò»íýýì–Æ+¦|hì³ 7âN ²[çÛ½€QçFÁ{¥ý‘óWÉ:iOB¶%:Án?“e!ð´h'.é‹0„½É`Xdð-é |ã²xÅ%WhµâÕ.‚j)„0ÖGK7æÐ< Wâûκ(àSRµn¢À=Ä,2 úµ,~rÝ¡´"pÆÀ¬Éè1¼ó»ÑŠ¶Gð2N¨¶Hí©dxØÒÐõVªÞãoŸ•j+Ô"4 V³!ðeù‡C·êŒÕÄLÃhfõÙ“ò´fF –—EÓ 1:÷.sÀökwƨ‰¦ëÊt-w¯Êú×VЄ«ï&š Ë?d/œX[¦„«œŸf†æ[@M¤!¨¥ ²+05£pÔ‡r7Ñ{‰(Bañ‚KòE0Ô¯‘jÜ!Ç0P‘ }ßC¥Z»`z²©õ@ Õ}_£Vvû.ñåÉ°f]ÌÃÒ.ôÔ⣬ÍG'¬\÷dThV‰tžpê/ÿÐs‰ «8,à]Ñ*;6ÆÖ.•0ÚÃIƒXÈÝ ¶ržØ…›kzèµ.›^qœ«Úz<ÔÕ\­žcjÞQ í]Zþù“¶j¿* kÇæ5[Q)ƒ·±îÈØ‘Sà µæ¯¶k‰";C¯‹È¡fl Ë £6T¬"ßû?*µaÊ Ér¡¸PÜ P‘³ƒM”ScFØ#ÊÉxf´‡rjȆ•rvpÙ»ó3ˆ‡pŸ¿T]ô³7¸û´žÞ¢_jñ ˜‡UÏšNAÍÌ}÷&Ÿ=ìy'ÂÙï°ç÷s®g¿Fg4åü“ kñ³±x>$Çð&Å왧'J&ÈØü­‘®æÏbb_-ë!@E+.?”¸c#ÚüqË)~–WÔòÅÌ-4]¨”2%1{¿;*/ HÊ\¡ûÛÄõÇå)§5ÍŠÓ] Mï.Q6"Õih¤Ï­\~‘ʵÉÏ”nlª· ²´Ð »÷ÈdR öd1SçÍ@…¡ˆÑWýàb3‡šÄŽຣ~ í{ò2ˆÉÓ¥3.ɈM§ÜŽ'õNRI^p ”‘¢’¦jm„ˆ×KÅ 5®¨ãmáçl]¼è6zÛîÎåîÕËëWÞÞ¿ÿçÝOýýÁ ûßÑIØŸN^¿ÿùæÍíÛ»_þó/?ÖÛ¥Z­]®‡íz«Õ^1Zÿ½z^¿’&˜æm=õ.b<Äæz!mäR‡«=”Æ•TºãÓ×_‹TšÊš2æZ‘–Ör°=`¯,}3¤” )7)¤³ØB˜âÇk6ß*)æ˜Ln©b›¦oW~Z8¬2¤m©‡¢jxN_^ Ü»ÀØì´ ÜM+‰ÍiÙ¿@ÑúÆ/y¹g:'ÌåœàˆÍí*^T4«Ê¼¬/¼#ÕMáð`7…„MÄÌ’DÉ”#31¼Ä=<0lÑÄððÀ4»ŸnÀX³Í6!»aé:ã€û{3áËâfx hXÜ)¬1Q Ý$/„?È+ ‘.]Çñ`)ÈØN« ƒç5.N5/ŽpÅpïuû—Ö ~˜t1»çë3Œ‘ç1G†4Ô ÈnX·1î6Š¶ü%f§Ì/“æÉKéFÇÐ{¬¹ åçù& ß ÓV¯§°©Š¨“^û­ˆÒ÷tµIFXAêÉgÄ< ³«\(Bç.Ü@* ´ 6„d¬Ê6.ÿ"/¼+Ñ[0ÍéhòìI1Ä*E¨tÝmwx‰„wï¾géË^Ô Q:†F&hñáëýŠà; ?F{©_â­;Žï”Ÿ-£GñÞ¼$Gp] éÊ@ÚèÁÔý€TuèaK®Ý—”±´¶ê šµ*a‚T\„^&#Ì¥3 ›cîÉÖS&„â^@p˜";Û Y•æñ+™F‹uüÉ5Ç_‰Ê c^‰š ±¢S0삇yþnÍ…³)w2«‚™Š“ÊNöŽ/‡”c9éÒ]º°øŒúöúÆa‰Ø»F[‘—ú!Î~šö¡Y=:‘áEª½IR–¼ü&íËŒ¶øÁ'6ÅR‹YY½[É"ƈÝa}RlyYl{=4&` <ÿŽš¾aTèrŸ˜^'êÅy6Þí¼Ø;”‹œ¾Þ˜±ohÑ·2ÚkÑ»°Y’Qtâ"[É'ªø˜‡ÝkÃv{®ÊÕðnpôCQ½vZèNŸ‰äÐ8ÚÝÕN’Òf>›fÞ¾¢HdÝH½Â aŒåeâ3S³Áciw&ÑÀq”¯µßd´'Àˆã~€óc`Øãƒü—¡P¤öŸ[³%…ȻВ2ˆ÷›òT Ì†1—N×,®`S5ÞFæÉæûÍ…Š/ ¤´Úˆí–”>dYd"ÁÜÅ4HkÞHÑûÀÄ$BŽ=…Õ즉{ç¸ÔÚÝÛß9Ë„ÏË‘>Õ4—SòÌyÃqÜ(èZ±¼HZÜ“ÉbÒ2’$þ‡|Òuè›Äÿ4P‘c@{ºz¸<°IRkïPcwÎÊ~_ð'AqxÛÅbXÿµ…¡wÏVêê ¿‹&†µB´ ÒÝ a8¹ÎÌXÿµ]zŽxc+‚Wå䃘ÛÙ…•3ÈR\‚ü%;[T=ÅŠo—vÞ¢DÒl” ‡ír»Ä•’ô¡ õ¡*Ceÿ-*0í¿#tšE„<ØÏL,†<Úòç©Z%kí(Y>•h5ƒñ|¥]>»2?ZæTð ÊïÈŸÖË µêwGUó¶Zs^¨sipSÁ )µ¨OúAm©ö7ÉÔ«;”)òü# !at¨Í;;¤,ÛxóÊï¾F§ ­l`+M]xœ>ÆÊ&i8kløãÎÉéé^©uºõ’ €Ë³qq;F+MÄê:TÈ×?o ª9k+Œ¡ŽâþØóÙÖBy37ˆçh·ÛÑñInôßk_à…K,Šê[{T½ôƒªLS´„ÆûÐM£¹“öðŸîò¦¯k¢•‹De4{ü‹wQH—R•á¯+„É;QJ)~M¡óF&Z¸ù¢Y²›”?ÓÀtÚã8FAJ=SKQBç’‚ò±W?úMFux)dúèÌcŠ›±Én¹¯¾Ü?zܳùËÁ‹£ýf¶ˆ™ôPµsÎÉ›À)£o[o~J~4Yß¾ jY OP×I¸Ž¾W#ç‚ÄÁJWV;\ý~pÀ] õ…`ÇýA-‰Ök:#d‡ t“rEkŒï?âÀ¾­(¸Þ;ý—Ù!wPµœÚÌè*Þñ]9Ayì!¬%zŽQˆA wqéÞˆ ß“Ûùá! ŠØB¬Öë>ˆ=·5!ÞŠ  g¹H€p|™â‡üCgô¾´0ºLMó¿f"ÓÊÐL¸}b¤1ãK‰Œþb‰j]f'šÇ1Ñ·ñ‚âEì6O_ë$¼%’kç‹Žšíð5¬o k† &–a<;&mMj©W‚9_ý9R'eÁÐ$æÁ O„¨2‘9VR¹L†~Ù°“x‰ }ì¡çŒh ÒÃ-2–H²—qÐáD›y\bpXÂS QöDmE¢+êí58‹ä©¼­Þ¿Ñyæ… ,2¶âÇ#Ç¥3^]ÞN†²@ÝXm\# rÓ¹‚w›ùÔr]RÑ‹N‡¢áÀ¢-Á‘É•IU+ÚkÏeÕEØFPˆí|{­¯ˆÒûÀë¡•þê§J‚*’˜ bØ”àÛ,bÉLFÈŸQã¢4¤[(¬Bˆ[äõód¢s“½“ÞXÀèT!/À»×ÓO‘ñÀAÏR rÓ hE°- LƒÛ ÉmG”à ]í ¹[™õm4Qù€ÜsõŒÕªáþ]%·¬¼MÉ!#õ/j8ÝëZnJ?PÓÕ„†,XÝÑÎé¹qš2Ùð.°½V*Ó¼2ÒäVWRòZSrž4%ìùìôz#Øú¦6•‡P¦Œ·9q£!²ÖPÿ© bÞ¶§‘hÝ^““úžÝ@ìõ×2´PZŽuLmþž1Cû¥v’Z_¤£¦²Œ¨¯êñ$±;ýô°ÆÉþ.*ÓHF ü~íÀN ¡í#¥1 ‰"Z™F‚–oÛV+kíOEÆŒ½Õ±ËÊFªKÖh„œ0´wÚS £cŠ*TG êÄGã†n0RP¢4êð9iÞ†Þèò‰æó"ßÉ“Ý«vô¤’]T,VÔ’9‰Sò½CøOJ¨¯ñæ|{9³o¯Ñý½ÌÜn¯ ø_ž |3ò¤î‰!•†G´Â4PYhGÚ»Î;—ÀZ#ƒn…s'NÙÖÏ¿#SFÆè(­|ò%mHîÇÚ’Éì鯉½¸¦Ðyû¡45j`Œ©NèRÃ6åßçB½hÄãOÏuêú¯hD#ø`+N·^ìïÔ?@3KΖk™2lK¤•Å‡–wffn2Q8+ùWPéÚÊ2ŒuÃÚJièÁ9úª\ÿ@ÍZm®YU+Mƒg­lˆú 9R‚Ê®VB¿ÒÎo´óeh„·N.Âñ¨úg½£sz7$8“ëëI´ó§°ÀC¯¢²z®o gg9‹n®‰½yI`•ÿñ{]™Eˆ•öÇú ði#V‰×‡¨`Wßà¿€SدÏÚå•R9‘ïƒwY¢ÎTýXñ—›íüv;±"¿×Û¥v¹FuÀ/§ø%Jlt²S©·?~lêØËôÚÁͦ…­µ³ß뿶~üáLuÌe_Ò?Ïãu¡äÄ=dA”t ƒù# ¦¢0& ܱôÛîZMMP/o75XËY>颖µNlÁ¼¶Â÷íRbh—ù“¼Ý0Š+0k,0C/Ô ’åIÁ—3ë´ÏÊÆ­Lƒp1ÇA½W”|Ó²ãÕã(*-Bd¶‡Lßwè=ECMÜšÉ뼤eVS%·ì]"ZNÐýIˆÿËI-ßÈ‹¹e×Q3GÒZaã-ðÃç9ÚIÕd±´·–3?|ø”VÖ'UμÆ+•?Ålâs‹Vù9C¹—VËÏ?éx ¼Ÿl5:§'¿tvPI‹•­ÝãmAØXT+´$Ëf>ìãÑ´Vn;&u8ɦ˜x‰öG1}ðó¢ý½(Pem9_ !½³1,YaÂó6n3p¼ÿmâ]Þ)³mÖšÕ" rL¬‰±>à7õæTYŒÞ³I¹|­)He ÀóI'Šìcuýp+&” e‹úÎ"SàNht­ œiTU^›“ªPŒêž@Ä[JɃ3bz¦x¡+ÅúŠIÃ~úò®õÂ߸®TZ<©HkrÏàC[íš…(¤‰A#Wê8ϵNçÍÞáãu4ä×o:_^Â[ôÿýK×yÓØÁ monIùCJÛûûd„Ïäº^Å]¸ã«¢Á¤aSN¢•v¶B=(>QDþX%öÒïCe&C ùbº“^P•;<7GVRìŸþøõøÇÎö>ÆÑaóVoßl,HÅ—¶€|ðõe¢DYëÈÈÐ’‰Ä³ŠžŒWF;ò\å†î´LMq—yÙœ`ˆy… §kÌfy1&älò9ëx/Šš«’§qõ=1<ñ}rNs)37eêrG£Ìpˆl!i[ ½ Çãô[ÁµUbGŠý½ÍM¼âo¦}eœæÍÿÅ”>ƒ¶L—ɾîÌËhw1ñ›nmÒª¹‘–¹ÎÆÐŽ‰"”éšÒÚoÔ½Þ¹% mÁd::zš{ ¹µ©=0Å^kI‡FczÙÔ`žEÌr“1|-¢°‰’Pm¢¬éJ#8E²Ö -ÅR†Ô¸qÂlZ–5›~¿ÿú©if62$f5}WXßfP@ã–"ÌKà>/-ņ²ˆ&†)Þ©uók¸¾äwt–<,£“ÍH,Ó5À¨Ïž›îì/#^F Œà]YjÕO„4tÙNZZÔîwí‰Èw'4EúÝ,þXä:t!¥lœà•ì—_lµ~<;C ½¢HÁgN§‹õl Ó®§ÅŒëkÃ÷Åk;øªÏ©2X%…“9Þ륡· ¥ÊËË(}¸¦ÕÊLÕL+Õ£Öi—ÓëÁÂD‰æ« ©3Õ…Ÿq×7pü !öJ ÔÑG–z\•<·>}¡žkÈ› Î*†Ž7Z¤r†î~ázZy?¯ÊìËo\I€ˆÄø©Vcl´t¿4³"1϶(UÜ‘.±8-:M2i¸#îBôЯ¤CŠ}ì“ !PÀC6™F k¾ã½ÆÜ–|YV|Çpr¶µÎ4aç¦/mö¦%zÝ9R±dªLUŒf2—n¼¥Àœ¬¿zô(ò-ÂÛîD*C‘ÀZ¹ãnÚVùòíÛxHËYm+Vßô+Å™ÉÍúåÅ@1‡UÀ-B(ƒ¥ðï‹­½·ÅF§sÛÏ4GAG{Èú$‰›Èh ‘K¢¹N0Ê-Í_÷ªò± ·sq±z u/F°ÜØwåH@­l€Uqƒw¤}ÔˤLÆÛ¹ÀK«-$xÔ|"ja ÁÙÍL÷¨¬vØ…£Ç³oßÅ+±»÷ö`gCé™"Ó®gß®®¯òÀépV©’cô¡: *Em¤ø²Ñˆˆ&kèîÆ×òŽ~Ù1Š}ï¢õdµX»Op=@duCºM{¼.ªÆDÇwã`äV')=fø·«AW¶ãÓà œ-¬…Ø–‡•“v*¶!L¡£¦ÖlokmþY„!rSFÜ 6Kú×Æ µ×?)c‚ɨ+ED‚ ½’æáà‹.gÄÓódõ<¿ G_ÔxÑÖƒŒ%R“\“UŸ{K!«õM^„Â]®</h¯Ø5’[CAHöÍ‚¡oë¡%ÍIR0"± ßt§qx—E©Zí±KÕ™Œƒª²Û‰"…Ë™o2Þ—ÿ‘†ÁK­9'Ð6z/°?Eñ,e¹G PFÔšŸ3a,%Å›–2f!+¤#KgÎ' µEpá2æCixNàëa“š#-Qa,^u¶c6ïå 2I?@Ÿ{ ^Œ ôþ}5õÝþŸ—ÇÇ‘‚Sòº‡A~¤ Î欅]p„”Aø«hŠx¬QþïáÛ(ú5WpÏÉÐ1ò> ªØT¨¾ "Ün¼0⺨µAîŒF5¨7¨-.J©’Š #÷“ÊÒ Õ3¸´Õd)CT]š-¥Ò–6[N]DÊÖ’ªÖbΟ÷‡­¾z±·AÀ”°ŽÑ¶&¬ÁÎ\$mf4qº×Áh‚²ëRªïÑR÷¶{ýì[Æ"Z/Gx?ò F=¤ÃŠò?á¯óÖ/_­úAwj8©¢ÍóØã ´êDtÈ•Œ¨@2†¡ 'ÊÆÑÑ~g{ïDan.jŽ(ü|°£_7ø§‘xO~Þ-AuÞÖš“· Œ¢n™_ÐZzké¡Ä«¥,g†ëS¶õIïŠ8sÆDA]ó£G ´jβ~b6¡J]]woéÓmî2†´†’¸Z)£žtFG]C™¬ÓȈ›Öw:¢‚[!³¿yz+vR_Z討B%¬7ýO2¤`q´d°´ù;ùÑ¿$]¾´Q]íü™MLî¼KæÆûQ®XRÛÙ£™Û»zÏ ‰fÍÂ=‘PˆisLD)ì+¾ýNÁÂÓASüì…§O+£ä†`ò^æß!€É <ÇÍìèwü`–45œÁŸ9wað;J< R0Ä#ÿ?¢ÙHª¸& 1àÇÏ&ÚåÓßÎõÞ¾ÒœømÑ0wuxCSþií»Å6p“GÝÏÛÇÿ+ÚÀªgÈ ñìο¥»ãìòí·ïìïÃi{˜±¾æìš7¢[ácsÏÕ!~ …GšŽâAµÓôŸ¥©0n2tüóÈ ÷— ¸»OLñã„ÑR \¯=©­}Ö9Éb»ÛÞ•ƒ]³ßE9Èÿìzʆ±¥ù»O“´‘ÓM|s¨W{R[¯k“árôfXsÏçÊc6§»/Ÿ“çþ?öÇ…â)ÄOæ;î˜}{ÏõõyâPŸÕNr)Lº^ïK©C4B‚‰‹ÉÉ@KøƒÏŒ;‹Sz1ÜÁ´†šÓã0ð›p|®¾~‹ïôÕêç©Ä¦ Ðû[2Œ\è¡ëøvÁeÞÅåú&!zLŠ™‰‰Xõ§š™ümhò·¡É߆&mh’ei¢n>äEÈß–&ÿ‡-Mþ«MMþÒ&ÿŸ9$ïWÞìá/lNÃ<5ìaÜê8Ð2; ÞP4Ú·”BzàËD×àI¶’þÔ1i ¥©Ñ*c0$â¿ :«ìª ÿóÌÜLQöº P~‹^«f&"ÿ—Xžü96OjðbˆÊ Y#‹üxÒsô©Zl¼÷ðg½¶ž[DeùVºdã…!“æi‡í®?gÛóší|¥dؙŠ„–UàŽ½S‰‘ùT9 R,¨÷H‹ÒK[\›Ï*~ÁSÓŸ€a#¤‡1AÊXÿ•òFæjƒõæ\Aµ,ÅöáÖK± 3rüènž`Í ü_¥¸¨Û:¤Ý{L?­ü_96üŸß§Y%Ý“ eʪ‘ÄI’¢]#¹UçWò«Xç”!µ½ÎƒH’dž“Öw åQãFèÊ ‘1rEyº˜ ^O4?,xDHµdŠÉ¶Su>kHKÔÒ>–F5‹² ófÄnÁ¢†73y¬iÞ2·i‹ò¸ïΚ0qeôb:ÜÅU  ².Uf³èÉ;—5‹”(8à…Ý6þBqù€±ï  ¸Ú<¿­­©vô/¿{ú…ê¯ 4!…7kA`)CXZtë_Zèì>·!Ñý‡2sÞu.FìÈ/`#Fj¥ªb(N=‘ë‹7æ˜HÆå« ð2¼ºüæùã»Uõã©üÁ#cÉl1*U`(J+°™­ð=6‚sN¤XP *Øi̇ú„®Ì+ä×! ¼©þBëŽoùBÈëÒÚ=v}-ƒøi3Ÿ·¯½í+ó(þ{©í£xúJ«¨ÚEÕÕ \[­­UÄÚZm-ÝJê ŒÍo‹Žme ;³Œ¢¤AH3a[qRÍÀûõÜ­ÖZõŒ•üôm­ÕZ­>Væe|ý1áÇt8F­ŒñĹÝàÊ÷þUå@ÆÖÂÃó,–´[Ðû]äÎ5lEè›zi7Ñúò_¬Â 뉨ò sxÊÚí¯Twu›¯ç/Ì`Ûhþ5va†©dvÇ'É.jk{/K[êoµ´y?ø’•ÎÑÃÙã’b0rHôÝ›0Ÿ-¨€üÉP&Ü{—ù?¡0žzñzÃn–GÍÝúZÚfùG°QÏ0!x‚fЖ?z M9J)OÊxR '¾|¿øýZàará¹UöhO[ÚíÞöÃ÷Õ ~öB¦ËìÑ(þŽ~z|ÿEñgð¤¿*ZAŇ0%2뺸ÞÑ`@»ºs2­…ë<ã®SWa<皌›Z>ÔY~¶Ä üʹô2Ê÷úRE_$[d2SÝ–Ê`¼£öü+ÄrÜÈÅ`>æGë˜7et8× ¢õêüü?×~˜ï ˆ+útV>“w‡:´H<Š5œEÑö”¢á…,áyg©jºPâ͹/¡ÝfveaÎRs¹åœ³?H7æwºc”¨žË¹Ï¸žKT—;e®Tz<дv3øh4@éKÏ;3`)/й¦DŸ<7çE~¥¬O[ðs¾%5祺&Œ+cžØª1`žûp±”à©8<™QSác)u«×ó¤{L× šÊ×Ú6TÆšVn$mØ*ð¦ŸZÔM?*éb?K£Ç4°¬TVD8Ì^Q*Oú¢ºéOgr/dœuø: åfC¶Ùž¾}©§nØß;ü)3 ¯QÕB²0cÕÍXr2S´ê0O Eb–i,3{w¸!&ŽI2ulùû”˜»ÒÂXôîà] A¿ÓîÂ×€—²3›¯ÌzþØÕóÎuIÕŠµÈÜCO丅X-•i•Õ™;-Önc“>lîíî4¡«ŽöÓÓ!2ðëÓ½ý&†úÞz½Ú¼_Þéñ{SâÏÇ7xW™`·GÓ^@©°¿]Ž†!Þû0ª ŸÆÔe³…;ßéz¡º><€à]W ±læ›çú]Œ†SH‘CaŠíb1¬×VD½Ž?ñ €²›ŽkR°K,Æ«ÓíOznAY•VQuçÑîns¿Øßé|To;»­½í³Nm¥x–K5x°—äå”Ȩ7®4aD êú|µ‘—²– (VmŠ‚Š¡dû/É ÎH~%Bf´—òŠÌ3ŽKé«R*eLßïç«/¢œ_ŒG®3U”2×y§#z(ò) µ” šKÖ.QT¸ö° qšm 'ù7y]×k4‹!¯,°(Þ¹wÀ1{(³a;™:a‚¶vÙ… åw‘Ój1™ho )ÇQ„±ª†jUŠâš8Áàya€D®÷ÊlúqäÂi¡ëÆ;ˆ{-_=ÎM³·|¸¾µ±i ÝE˜™I¼ð˜Ð0}­T_ ¯2ŒsóŽVƬD©„¡½ÖÅæ¦ÈŸæËR&z±ñ"þâM¾L1J-ŽÍu†ŸWÖ*°ë"ªN ¿sAfx%c¦AjÔpóâÙØÙß>áÿ™‹·:I_¸V,¹:êCt0@@/o°ß$ßÀð_Ä:^`¸ë__PlëBý¸½F|ä\TëþÕÃö‹Ÿã/þ•6k©c°0Yc,Ö¦ŒÓÚ"ã$Õ7$@“m\âÄ›9f õú}zÑH nÚØejH»ý4B*×/v_ïïwöО vÜfãdïøôèäcò²þÙ`~¾ÕÉ)[ÿ•¢Š¿Eê¿î1ÝÞs,kkCkG%-°ÓÎÓï­b«sö(uÃ5>tZ»¼çÒËk×éuZ:.=¼éÀœù˜xÓñˆ±Ÿ¥ê†2•1EVŽª*¥¨ÑÄ:ãkŠygK1d÷ÛÁ说ßFakéÐ;¯c—fèÏ̤lœg4>ý;ef²(¨lÈa‡Oœé%ZÜUÕ©EzšdÔT¶FL¨íçŸV¿˜ô MíáÁD¢#\¼‰:]Ïeö_,QǹƒþdìÎH m† Ó»-ž8t‡°#MM œzvög”^Q5¯9íÄ×ÆŒv&ÏùÑwF˜>.va=À1pˆ qŠâ;?¸ñí¤ƒ 7égÏpùyÆú½ŽZ „&úÍü‰%#ÌÌ0¾!§ KwúÝ\PWM;‘t™ÍÅ#Þ«ÌÄ/\3üÉܪ]C²g›®f+&9-€ëàãá8>f)<ŸHÄv²ÇêPLs×Gâù:™EæË™wÞïf„€*Т;Q¥"Ù8Ë…"Ióˆ8@'4ÔïÃJë^C–+ϧxÁˆë $Ä© 8Q±üœ>^t?ÖVz°ésa²VðÊ¢#K¼è+DÎ 9Œ¡’Qªì ºg±D W|¯ö@jx§fÃã“#Þ;}OÇŒçð,1€S¬pj™²/×#%碌N{|˜B]4‡—N–žÒ„乇w€dÎë]c‚ Î-¬Ì®7¦Ø:—p .ÛƒozÈn p í~É2€C…‘‘ ”7Œ½°•*†Nòağν¾ûÞ©yÊçF©àwzH°8ò _†Qçä–nã²zc:ì?„>T‡"ôC¶ç÷Åa0†Œ±¿Þ¿q¾Å'9ž)"øE𞌔a®`×&+ØÌ¥ëR¤à´€ûËS·Â6䘠®O7¼|´Ü qAéì i8°. Nçêîdã…Cç„áduu”jCæ?𺣠.Ç€§>k¤¤@m:QsÜcíxiž'"ÜP¥ŒÔÕ×ÁЭëj1œ(šªâ²¤È¢ß~'J›²C8³YÒkœ7ÐV_‚ä^xã‘wµ’Ì «Éi±¨Ç{›\ÃHž¦ØL™«èŒ`­ÀWTƒôI©aX½»>-`­’ñáý{mcÈ‹ŠzuJÒ…#¸¼”ÃeäÐø _×8Ö,PÙ’(”·)Ž…b4Ú¨©h%KìfŽêšzÀXe;¯‘!ÒNshèØÒI5Ýë{ã;²)Nm9°‰WÁ ®ì 2Vü~ãŒdT&zäRlºt߉ ªÈ’óó… ÝàŠõÚÚwµ§Ë6A\°ÏâµCµ\H[BV'ñ9`Sá…bú¬ Žú¹^M›¬îocPQTþ(ø¾•¶h— Šmñ¤£±×Û嶪MYád$jµÖY§85v Aëd ¹ŒD™jJ‡y§æKܶ§LŸ y+æöÞ¥0xØ Åþv…Vn£!¡à»!µ¯IüBžEF/ƼȤwó]9ifżŠˆ“VûÊ"OÁãXÀ>ˆ{ÉeŠ#<¤1lp#;žŒÇr$%vµÂSšTt²D[Àhä¡Ë;Òö]ô_…Ú0Ÿ4{ûۓׇtí?¬ÎäÉáŠäe¿ œ¨˜qâÍ8C*§©Ê4EÕG~×Ã{!Ù·=¯gúâW«$˜VåÐ zØéGÚQ\ *¸¢©!õ;ã\êÒ©2pfI1V!ë WÔiÅOÑ=Î’¼õÞ¥îM:ZJ†óDí#Ï04>a½Ôúµ|Ö~Tn‡íGpÎŒŠ\¤Ä®àp±RÎ.Wc´®‘M¬®)kxf.«È6¢k«5â!0È]˜5ý'~]‹HáSí»ÇµÕÚz[Ì®¢8¾ú¦öXÔjµ8‘u ²6/•ØÙGx•ümm=…˜ª=_Ià+ÝÍÞæê¯u@_KÊéžy6ÝA>‰ÛBl•õããF%ÚÅøÖ ä¨ÖDëHs”O‡¶ÏE;öý×ë¹ÜÊÊŠxûéF¬•Äj2äÛ|â´‚u¹òÄŽT˜½MH£#S{$œËý5ÁFj2Ÿ"·Ä]º‚ ÆŸ‘(íÖ7bÞ¸‹Ü¢¢6tdÐÈü“û8¤„£à¼u …éÀ³¤ÜL‰Ìzm}ïÆH^§[²AÐÃÀý{O_inU«öÈ]b°onÖ/PéÎOYx#R–è%tlò®& UáÔ¢€ó–‘*bZROX$OÙÝ‘JMêc¢[å[¦£7Ý¿Ñ%VÊZœUlB;Sœ ¢mFNDc˜¢Æ6̺³îÝJY¡ÖsÆÎï…Æ«#‘_–úhÕ@5ÆÚçQñ·Xþý½'['¿tö¶ÅZcË/˜ÿç“æÞÑ¡( œ£ûP8ÙùyIŒÜ÷rÁù¨lø_‡b‘Sè1ÿ½p²uˆøâ÷R·#†÷Y=Q}¼^ÎðYbNuß’m¦Q°ô’wc„:ÃL:StÙ0<±åo6U·™&Ä,Í¥Å7¢p$ùŸ t‡×â…‹€ÉlÍÿü÷èâñÁ–×÷tèaXòi:ªÀa˜N4Z8Óeë$ˆŠH»£÷®ÌëlŽ‚`­‚]åŒÕïÌÕhù'aYZoœSc ì4}²‘þLÙ©VÁMÊQè ÒX¨‹ý$HÇ­h{?LqvYxŠßO€‡jW³¯è曄)Ù¦ß,Å«;ç]Ï]tÍß÷ª{Õ9¢!™}Œ{X™Ù‡½o" Á7±-+·ŠfBƒ}U««Œ»™~Ë i‰T(­Éå¤vЪÈéã}ÍkØk°†è5jA ´b~/|yïUP=Ä«Òiâ9fi.I:l÷÷Ѻ°s\jÅfÊY9ÖÇÀ‡ñé”ÑSXùȉÕ8ú2¨Èu ê›”uR) X:N”ýý|™/½ßõok&dæýs'ÉçîZ6¬ç.mϼNØrä ºžVßÏÙÒfÉk÷Ü´Âë‘{;æk–Z/-ÞnZ'³¬,¥tQøÀ÷UAî`@ñ“Ø;Ü;Ý;lžn6vÄéÎÉzH9¨£ÎÕßsK’¾²0B1¼WiÚù4I<ƒl4âàõþéÞñþŽ8<:l¾Ú:ÙÙž›€^Ô³’»ƒ[¼™Õ3Nn¥õ<ñ£=ߟº£A¾Þ›£dœÁÿBü²ê¿º£1ýÈ^›³§ø¬zÚU3~ZâbnSçß$ž¶µKï–×YçFþ÷(Ƭ¢²)òç4oÖ~‹ï çFŒF›–ñ„¢ÛZ/ÿã½&ÊŒ¥kçA`k—jdæÙi¯Õ¯ ß~gMX|_‚Ùlæþ?4…M”ݤ½JÑ £ûAþ„ ]¨ÜÅ%þXÇs™Ge%L1:šš~ÖÝJå³Nf;0Â+§ûnƒÀ­# g¾x'CåQE ONöŽÂr†#m ”sê­•4‚@Å¥/HÂ$á”Vo×Vù?qq§‰É›´2]§+`èžtѹ#ÝeßÃÎ×Á;¶ÌÊë;F1HN§ '.GΪñYi=…8 „ó>ð©žú`èußÕä Ñi{ýé3ñ“÷¶Þzm¹pÇ7hì°zûT5 \½}¶»ÛàÇ1ik51‚´â xµ™ Úi £Kظƒ¯òhN„£w¥õ2OÕ—Ù”{ßœÒÌ5SLDÓÊ9L5@?œlnT …Oâ+ñdõ»g¢.ÖE{E¬?[_{òD<kŸ¬¯}óÍú·«çSd¿ìÝM{òáÇ_?v>æ“2}†TÎd~À¶\´¢R'°*µ¦þeºL1*s„C£?Ž‡—³A ;C¿¿žçŽ#>¤öJ¢WÅoÐ;BEB½CfÅìÁLt—¦©{}þ|i9N”¯ÄÙ¹Qzö‰Ò?ð3Þ÷–¥]@ì´’~èßYH *ÚPϯ¿æ–úµNUVZsñ­Óë‘Og1š9EþŠ?Fx†‰~©¤\‹Hмòü— $j…÷Ú—õmÖò9*þP#…v*¦jªoÃ8öîôÁ¿·óØ1´=G©Ñ5öª"S#ß}.l—dúvþœ×Aò–{‰çaz7³ÈœÀ‚K©½ Y™á·! þÿݱ¢zà`cE¶¿™X!`-Õå%÷7òìFägø˜$^õ”¸!‰^šD 5N6Ö9qTó±NT{ïÒ[¥N>…lœžò4J ¢.2gTY‹P<ÂDjS¦"ã?‚5Ý=:Ok ½V‚6˜ä—ÌP¶SÛ ½QA5–z®Óg}Û¿‰$rj›~¼ ¯G°ñ%æUƒ#,M ŒðÿÇBœÏ;EZÅE6qs¢PÊiŸ…P¸p§Æ{繘¯›«ÿ1zùãÇ¿v/'¦òË¢…Yõ©Ê9-#Ùl!¼ÈÒFD"Ï/äÂÉ?_¥ª9EÜ,2Ëò(ŸPÚÏ%““N>ÿAº^oLS)AY¿[·äé*œÝUý:kMêíµçõ©Š¢a®žûbå¹øô|±ü_vŒð­ì÷jØyÃ1}Í®\Ò,-^3Äï± a:¿2 :ÒÖ•’÷Ë7€~q÷ˆ/ªÜ6L¸_µ{(µAÜì*Þ8a|!ö4Íxr6¸Ÿ¡êÒ̳4A²ï?ø^F]ù¨/ҥŗçÒ²2¿àÚüüÕ)Ägu~|éͳî–hÉ™sÊå}®Ütàvͬ©w:ýÝN¶¸ó¾ØVŸ¾ŸjÓ“1a_P§‘yäÌ~ÓmgC÷¬ÛÅÖ3MÙÒ滞~؉;$õ=”$¶:bL:‰$ƒrUzŒ÷1Ã…»Ûb½]ûv–ÝÖ}¬kÑ7F›f­×¾­­(_Ã~T2oe›_K°R³ -‰ÌhI¬•‡ÛÖ ˜dy9"‚^7Ò,m­´©MXÎB?~ý¿W^êÊ»¿„{Mx5!``¯é¾WŽ}Ï|óß”?{¡Ÿö—±å=yB`‰Ïjß­ÕVk•Ã+[°Ï6šo6ŽþäõUý/·ê—è )…d„{ ÝîdäÑïØÙVdˆµkïêš¼‘Ù¾Gá‘¡hì¶ldxÛ¦`Èœ“ýÊPdOéY®›á,ÎD¶OÑ—‹?†eI÷Kî-ÔŒý)SäG"Ä‹ ÓRS naTIu-ˆŽ‘2î÷øÆëºÖmÜ–pMŠºÅÄmé¶rš_tˆbïÃ?—óœ)ÎJø~XëYÒ)F;Åp2r«c÷vlÉ«Úî`ºÜª6KhuiŸjÝ5×­}Búï­þ/¿ÕÛ¾uê.o3iÙú±(ÒbühQk{{&ð^¢'îtùŒ{^pÉ[#oéE·„çö9,Oõ,L @ðð6ýéV˜Ù³â"öPöøbg#1ýNŸ®­‹ê+ú÷â`£y²“ꊔZbdnƒp !{ZÍ’xS@r ÖþÞ Ú·Ùèe…^a/p+9NïÒc@šê~mq׸F q2ô]yõ?ìYŸãkK>t=ĸfªu(øÁ(~ãï…_¤'‡pT˜ø~h¬Ûæé©l<9­’N‹qˆÔù‚?£eÔ†¾4p1$ò²ÝÑ^—&K Γ Q‘âzRt‘yX\¢áB×ô%¨áH»4IöZ˜„8;ò²áOJàÕ~Ðqýñ莿X<ñ³ _—÷uéóA_—>ñuiÜëÒçc½.}6ÐëÒ=P^—„x]úß57tI‰¼#»þE‘]—ð¨‘Í ô‡8ø¥‚„žH‡Ñ€ÎÎ &‡ç`4pú˜U8¾ëëÏ5dՋѸÏaÓî {UÂN¼M»<®ÍÑe…4q69–*éÅaÐõa›XÏn*:À+ ÔYw’ Y{äºE-aÎzJÕƒ˜a-NOT9b*0ÿ<™Ac2_ª¤wmZ¿™òð½ây 1}QsJøoÔ~. DújÃ*"ÞP„‰Þ%=o7¤e%Oþ±&"áùp ½[Ê![YáÂiˆ.¼+.[ b-7—®ø Ú²TàéYÒá}‹÷p 5’¢ ©ƒÀ°qMðeÅŽp9'° + åi€ë ûQ,Y>#A±rRk Ï¿x"Ž Ù üO³&{é\z}øàöwQù8#ÊWSùð+ªZ/§*ˆ-Ø.Å•h·×¾ºÊŸãRxŽI8±)|*^„ÞÀë;$‚]Ãyelã(sœ‚ç’ûO hõÜ–q–}NVª|‘Ьý [Ê죜¾…kµ¥(2„9bÂh$u/ˆ[¤;¡¤½k ìM²ÞÆú0$ÕÙƒøeû'ÒìŽç ŠðÀ\ U ðZð GóôdïÊ}ëù{).›-ÿC9•¦æDÓ2½î®G)degÉ—ų'JîK|z¼žGQðyªcW9Å7lÎv{ƒáŒ¹¬VÕ½ÇÿÞKì^ í¢zýáÈEL>3ŽÍ˜Z_`Uü,æb®é7™@Òùç)€i-2²ÀNÏÆ¡³(Æ€µEÌ‚ñ×z•-ULÝ`€ø&1÷Dvyfq&¶„Ò†¡ÎlÍÃÿqJg`kï;!r¦¥”17øŠ^ãIE§v@9:ã"þ¤²o¿&‰êT‡Lÿæä[&®=54]zèèóK¥€Šo íGãâaøל¡`Œ¶É"‹ÌGŸ˜flÔ† ôÊkr³íÝëAЃ“ØXý^§ s‘‹‘¥?–³™ífþǣקǯO´'ã¸cL_™ðôèh¿“–š7?‹®éLk°LÜ+µ·;eŽÌòf3J7 ¶ #dòxe Éw)­z dd6J‘7X§q°u¸·»Ó„ž…^0cãšv>ê9#y–];Ã0èÝYç¤í­“7{‡ý½ÃŸvà°¸³uúúd§YÒq:W“ÛEü“_ŠêuÄi^䇎N1S2ŒýÈu_4·f±Fy BzrèA è>z4¯Ö¥ ÃÈ݈• sý %±±aw‚nLQdNeÏgMi¾˜s|x]#é黲ÖÖ>qì8îÓx­p\èѹ³ä¨€…lÙ6ãq_¹¸RHsÆÃ.ó)ðš‡ihý"ü¸Ó¹P—ØuÕÄû ûÉÃþ°^ëËâµ ©ß»8b°v-èq…>Ö3HY{±¥9Ž¶ôf‹uõ—íé‡é›Ù¡]î¹ÎÓܽ"€òX¯4”lúš´Uv rµÞȹB\û»ûÄâ‰~³{ÔÞçþ;æêõprû]Âi7Í7ýsBmüN•ÏߦçÏKÏ8¢9x?­œâ"ÀlSÚŽëñB`K?§™æZýÔ÷‹Ù©Èñ›=eÓ­7˜äI-§d6èõ¯ÂKãi©¿D+œ(®íš¡mòƒQ/$Pƒ”ÕF:`û}YÜ"BÌE¸¶š¶ •;,ÄJªÉ˽ÐL`è®cH!Ùkq!f7×r‘k"ú2–Ç—ÆÀÄ™Ñe‹Oò¥Eæ÷ÒuÓ¹ ®…¶FYZ÷„Ïœ¨óÖà!7²³2—ú'¶ºœ²@ÿšëT–ñ1ug:u.rvÊb«Ù›û‚Þ¼K÷%yi/¾Ç/*/àK˜5‰tÀ‘wK(°øƒ@`}Ô‹CCsøgÑ…Ñ;ì&Þ¸Ãa~³•x³ðP”ÃÑA˳m#eø e±ë\Œ¼®+^¸ý>T_¸¸Cqêùw¢¡¹MCß«¾ÄÕÅÔ‹â?/ºÊ¼‡)Bq­Á”_T-)ûlþr¤ÿÞþîg¨Òÿ„kß½ ƒðÙŸxK?{þh&±B¹?…è7?bê#ºÂÈËÇ XóUâpS½Ô—ÜèQ\ï÷ja0í<=—ö8ãðºØITWñ?">ç?Ow]ÿ"ê³$±¹ ÊBQ¯$?7Øü}Îþi(«_¾·ïÓ¸lÑpî82A˜jpò †?³/öÁ]OØÙÍÅfÙ›GúÁ¹’™íWÊ(~{‡{§{‡ÍÓ­ÃÆŽ8Ý99PÓÑA•Ï-IúÊô…Úy•¦Ÿ-Φ°uº%^ïŸîïïˆÃ£Ãæ«­“í¹ °ù{svrwp Ë šŸÒ>°ž'?=ߟº£A¾Þ›£d\ÿBÓÈ꿺£1ý¸¿¡Áìz{ƒa´¾²Þÿ{‚Ä’G°oyåqnä6.Eøç4oÖ~‹nÌýʦe<¡ùûZ/ÿyX¢ÌXºv>¬ÿÊA õN{­~ýö;G–JÆ}´rÿšÂ¦mënŠ­Al¯8¼¥Þü7k²³ÎcSú2¥#ÿ˜^ü«¨œþ[/Æâz‚g øû”bÖ;!/¸(\…ÓcP¼tª€C .ë/¿TðRûþ—M4aþK9Æ—v/Ö<¼Ô=O‘+ΞÃA\ŠüW¡ø*l·ý|òÆ0ß.x,’!6:ú–¢ûs#/eÌW¯ :)o$M8žN˜$žmW“¤FR}|e$†jîA‘bçÃAz¨Ú)Æ‹&z—ŒÑ»··‘цã¥À:•þÝB+I-#{ } ¦?ƒ[Ç*ÏñVýšh}ß4†Í‘qïm½ ÅÑ­+E3Äç{Û}Ý;ä»Z‚½†KFtW9³âµO_a3:âÀ^b÷îšØäOë1ú÷ÏQDÞ¥•¼º»ÅÓÚjžmdähçPQ‘’9ÜGó<¯~ðO\!¦6=†{tCl-ó%k!Î¥@ü¬Ñ¹¯þö¯0>Ó¿ðøL]hSl§úBiÚíFj@J½5pí§ggäño¿ª­nï|åyJ¾…Ê>uÃ,]uáåÚ…à~:rƒš·Jã6e µ%ºiTZ®gLòbMØ`´½ mC0D eJ³[¡P-#÷rÒW?Ðä‰ÂÄQádÌÔÔ`ú¡‡Ð Mn X¯=¥swa²ŸÖÖ~H1#1÷¹!D%#ÇàèoÙ'PDe i¦'S¥ßL/(eÃÛ¸M>+ñ=nËc¡‹58ŸûÛ‘Ë42Ô§Œ pï×8aˆUÄK!óUÄ…ÛudD°ñõýp=ŸŒIßÕÅz"x6~c?yÏ÷ ´ëÙÃpâ,ÿ¡ Ü|žî/Õ»8û[ð^:-†3áÜ×Qæ¡/Pþ47Ñð.|ÿ$8gÉ&¡ï•ç•@@ØÈ걌,ˆœ|¥].¢ üðÃÛ>ôÜë³yýò²€Ú` ÛNkœ°Äp¼¿u°¿÷B¦€)øïI}}9 Âð èM”zÎæÞ¯#1¥+Âôk,È4Hµ8§5¶X²4àŒÜ÷O:?˲2ÐÙ>B¯…Î]H>JŒ“}G¬,Ä×ȵî€O¹é|Ó q]Üß>$¼ðâC,ƒÚã?xaZ5ç¿ÙŽñ¦4påà8iCÑc ßí.`UtÏÙ²€¹…9ÒÆ@ç–tF3Eܘ#Åè+ãZœ;frC¨ƒøðôhèú¯÷Þê¯}ïö ˆ>ßP)ÒZ­µÕ³³Æjº½ÁO”¸<®­¿‡ó&\’•˜¥ )¥‚ÛSq­EÚ™kNe/¥‡u!À=¾òÅ´ ñ¢äôOI¿w5´È}ù‡4øå—lkêyjNpùûéûgB'ÇãŠÆÖááÑ)ùZHÍ^Yܸbà]]c\îÐÃpÓJîÔ1›4%OAŒy…a=ÉG‚s9þ†û'eBô‡fYñ ÓÝ*"Í8Æáöº×2V8‰Œúë:>-•8|/V*´RÿŽ4r(ó•”#$`‹dãq5k2x¨ººVÅ“ÓÁá' Ûˆ¥C Ñq ¡Þ’rÞßU¯¡ܨJð^ömí¡8LöõçãÀ& oZ4pKåÞ·mŸÐqC³ØŽü7ßý›ïÎÇw'cã¼ÿ ,­mYæŒò0EÕúßËÒ}ĵ†*…>)Þ=©­Ò”܇ ¸—:… †0%RÝhŒáŸ³rn«Ñ9h¾ìœì4_Z…ÌN€´¦ïpf:ºÌë:~‡àù¤Å¢7•[‘ç1×ÛôEæ”Û;ýyÎ3\"þZÅŽú:^´'—í·Ä!ëá0žwòPÓžßÑ0Œ9ñq ÿiÚÑà“´jaNMjÖ^¬&»~ÆX5-©.®“¢ëQ2“pí8AŒ#ÅÂaC—ç–sˆ·Š›¹¯B^Þj_N’PÚøÒÑ ËßæÙó8 o?ÞbÔÝîä9$à Ôéñf?wL¡œ ýal•‚e×e® ^Ó‹Z1+Åß‹†¨'ÑQ¤ƒ» óÝsádObEªÊašÆ®«E¹,ˆ¥šdO±ú¦ÓªÖ{^´Øó¡–¥š9`¥¦Ëwì"œpµPg×Í….ÉYî%Æj„¼5áð³Ó¹NïN QOâ§Hf™ GB§hÖP¦&a²eÒ,ß[{\c3ˆ‚S¡s¦tË<›g¼19^{tÿ|%·$‘¸Hˆ=å*dˆ~ï ?Æ‹•¡Vpºhíš#¸ûšÆω‚Çרä‚ôeÊAsL?ËpvÙÕ‰*rV^6±L‰µ6s¹œ|KÀkÆÑáîÞËR ªY–E5ã?ø´ã‡æ müKïj2bHEu26žhDG:'N<ämw@GJk5”™ÜÐ5rrBÅ9Î=…ßÅ sM±Ý7ÀñÜÜrü|eÖR%Ç)Örƒ'Àš.'~©•h9ôo >KÀ p\:;¨a-·Rm4›…F#§PëŽ_7_•¨ŒM éÄQx@Ѐ+V;¢!/B(AX˱vo³‹¹Žh¨ÒrÉVõÙYQ·˜·üNêA¤&¨7P~eq›º Gi"*êlו›¢˜ÜÌ#¶*o;jĦX}žŸNŸ¸{œ8-Ûˆr)cp§Rùãõ•VËÏ?µêÆçàxoç»—#ˆD@žjÔ+RÅì1 lfïÝÎèKÖW`¦÷œ.èŠE‡!— 9)[0½‘n•9FÔáÑq-§ýÛ;»[¯÷Oi*UœâÆ!'ë¦!†;«ìClvŽ'27¬óâÿïoî䌅j¾Î¡-äÖÏ;[§bçcêmà›S¿ N?°K:C|xÞ# •{Ãe€'3léÀÁઠÌ(Ò!©iâcu˜{Ô]7^ˆ'ZîvÔ‡pÊ‚“WwÁD¼óƒ˜´9ƒ©ä ø;¸౨VËi;6tlS=ÝrX½qxÔ99=Ý“Q—¬OÇ{´×ÎQÚë]ø·³Ôø©i|µ˜ ñ¾ùK³³ý ö2M2Ó«­“íÆÑ6eÙT¦P¹÷Žw;MÊ¢šlw(:<Ú³Ò=Ò‰KNtÔIJ ß±B{©¶êhœ£; ¼¤‹½Ã—„A­d(锦)uN}w¿uÄû³úúnGé6R‰›—qÂtÇi)é‚“¾}±µ÷¶’TДŽ~)_*$X‚Z¥€h¢‰–*QÃ9†²"õ+Y`Šà9<Å»Ãñn•é¨e¹aß¼™U§ê¨Ûmk sÈhû ÛÔVmæ æãïmdºMaKt¨s;$†Y‰bQs†½ßÆCZ­'Õï´Í¢ªÂAslCv½nµT†’¾-ªð7t¹Ò+II_Èã¥%¤Á‹Kô€YZZZ¶Õ§hñ„~>2Ÿ|` QÞðýèIeefV¥5¸ƒ dE6È$'ÌÉ9šY·i˜"û®_ÞÈ—ñucuÛÜ‹&6—Ïø"ùÝ2H|’Äqd»Vã·ßñì´9‹Á"­>a+¨¬†(U½f˜$ú!3ƒÞÐRÍÑqHè‰ISpŠ ’oßÎ-JÞG˜¤ðreqR·?M ÄéõéÞ~S M,g žñ櫓Âr:‹GAUˆ›•4¯&!_Ó¬/‰}»‚n5¾‰s|Q}/Ì‹Hò‚-ÃTãœ:Ÿ&Z.Gá«aŸQw4Žs2ht/çœÉÕõ˜úÉ6 ‡i“¦=*çæ½Þœïzv¾ ê1rY†f¹AѺJ£6Ý4)7‡ëÈÜè†iÓmÅróbæf:;e”œbifBÊ¥eÑšµ4Â)(·vãþ&Yõä½J2MºyéÄG×ÏÍŒrZˆ¿Î%=‹Œ[sãMnš RÁx“›mMœ›×c2wˆ)”é¦y;¤z‡Ãy½  |Q„(Ö§”Ç´=°3‡ÊU¶E=wìŽt…„’Ü €WFNdñW;x´Ðü¹ÕÀ´ ÞêAÜqêNF#Þ~8HÝ:ÃaÿNÞwëBB4•":<@B‡ *H$d:%\¸dâ>ŽyS×tBC\ææw0ÞDUVT“ŽŽb(JïNãÊ‘ô8¿þ€­m× L/ÃÐ!˜dj<ô–…“íH¬´ZggQT+ˆOE.OÆ“FÑ’cm¢•μ±suå[»~ˆ!Zpä Â×"ã¿HKAôSÄέæ¹ß:Z 2K$# öFƒD­H'Í$ßýÉû>’!c ,ã… "ÀûÛ7Âxñó¾¤Ìüóí[ã«q mÛ¬FIh@²2F?æb¬F%&ѽ½}}þÉ<Ø$iªV¾œ´" 'N „’™•ñOjE¸š°@²*‘Ú¬õNváºñT°Æ".|0ŠB鞇©a¯€ŸÕ|÷Ñ£ü'|£Fïí[5~j½ËqNÕk»ÔŸ΋­æ^•¢®@¦âS õ NÅ7®´¿¼q|Ä|öƒª{‹ÑKH…*8·̈¥øžK±RB+.ÉÀ>F‡yÏgì uq-€ ¯ ;­ƒî4«Ãm ìƒu•øÌ­ÇëôÔ¡r¾ê.cLz1j…&ZdÈÚR>'Jò‡£ó7®Ýî;,Hå$v& ;dØ#Âèß©ÛH]ªúu)(Ƚ‚¯P.\d/fHI× ¥î™u-Ã#&%|Ö”ø"1'ÁYáÕûA8ÄžÝaGÙL¥8O fÅJ2xd pôí?¥º°ÝSפ5ísðu³’mU™Æ¨Ð2z›³e¶8_…”ÕF…á|LCíÁp|gx ‚Ú Nè™Hi»ŽO ûHuŽ¼0í»—UØد}Oy„øâþ=Ìfï 7mÑãå^ ‚‘[¥ƒƒ( 5dPrü®‡êráô¼òH ¦V%¡¼ªtT R€ XÓùñ¢ú½ÓGp_tl"к*2¡*Y:÷{ç@ãÝÓñv 4­esâ"05‹xQ|/â¡)R#þL='¨ÅXÅ-„•¢N“¨‚.Ðà°‹”®³ØHëz éÃZà¡1Ge‹¯L=ƹ{ï¢{ eŠǬ<ºh刜8¢¡'PjT¼—$HÔ¡ºõ†/gÆÌ‘ñ5Ì@h”ACqcÃ.’' {®*k¡ ”œÏ À ƒ·]#Â/DApŒ’ªÓ{û°såªw\¶²ÿ¸„æ€,‹ ƒYÈVÜbó´¶ÿ"|0 탆íÉêúÄë¥7y tÀ¸°ëïgxÇjt-“—H‘궢tÊ ¯CƒÞWwˆÔ57掮ÔæqS!Õ{ÒuAV§£ÌbÞš •í½áÂG[Zë:*$ÈÿÚÒVÖÀF^η«ûyÉ‘Œµ‚H´BR—\4f7/ G{†K<†zxÆì¹awä ®íÓ¥_O1¤%ÁÙÐ(§ gkèn¯Ëž­BÇ@xzôä„-ø[žqß5ÍEQ¹g ~wC–ó,LÂ$Cw$Û£Üá¨*i+"Ë;RD¨a‰‹œÄeNö]WðÈ{[ÏžT¤muٖ®)¤i>ÏË;ÅÕHÞ¾‘‚ºEM{‡è³?&Cd»ž¹QµS.ˆÌ ´B±ƒ]lH'˜'èÀ–8ºã$Y{BvYVÍÉMjqðaDb®Œ"™è ²tFÿE‹ÆÖÞ[ÁëÊ’¹oõb4îÓI?¸’™û*Þ#n²#¯.Žõ@Ò¶@Âwáa˜øÕ,*»ð1>·±(I©Ž¨:‰dÑ`£9j-@ŠžÚÒö5äÒ:®åã׃é’‡Ú°rçñŠÐòl¶ZsJ|­Wû¹,K¯èØ ?¨ˆxg$齞ºÔÿ™t hã?¾4èð%›ÜÂìÒ/‚ñ57CÕ¿^jA9^úÔÂîÝx*žZ?£øÅŸY»t¾©UCø`¥ÏÓõqŒàI­ÕZ|vöÑø][ùH\ô©ä¢äÜF&†¶²ªà¦ˆú¬‚k2ý(‘z¿Bë]šÂ¤Oÿw è]ôˆ˜^Æ3ýFÀiþ¥½á±wÍ Ó³/á ÌE©o!åžw+Ï…›D9/ierLcs5 IïY‰h»ó1,ÓéKyðàþnq¯¨B®ÞEÈ%#Á =©ÓÆÐùf÷qJ¤Ú7ý V^ºÇõîjc¤nK³¶%Hâô\4O†ˆð¹$A X&ÛWR¬ò»ýwBÇ1Ånê61 û ”G i˜O4‘w£•)iqé`‰˜’‘›‡‘Ö³!<-¢<©õÅéQƒN —ýà&Ï>ˆ8ÿ?öÞ¶¡[i>_ñ_x¾lZ0ÅIZ(m„SÜ@Úô 9Îb/àc»^;1Mr~û33’v¥]í®´6†´¦ Ø»£Ñèm43š5aG,÷;uU æÄ%.‹ââºüþû% ¨2Úªãs]‡Dê¦/¥ ¢Ä<,)΋æ{+S[4šçÍKV¿ïJÁPÙ˜K5ièS6ZÞXn`3ILXc•²FV%ÊÅbˆœq3kOZxÜ®šÒcNÂ6¼øyü<`"Œ’1Ø=öîY“iÒÍ6M ·/‡RUôzV¶D‹!SJILAe ™¶Ù´Íh¹ºîFô¥²PRºãwæýÄÌáL²&î×!8g­²BB!¬C4ÐJBK®‚ƒÙ_)B¸×yO&ôV Ú»B’¾8‡ä©b×*«ß³xzC»‚Þn$@Þñ˜uqM#ÚöÃÂä%2Ã7kŒ½ñcBËäY»p1ÔÈ4:Ž¨‘ëá6Ñóv:jcÀº¬ÂwZQЬÉ#ûpd{0oÝ&‹>¼h’#+÷¿SC…Ç°ôZ  ;(ãq‘ îà€gÂÜPõ8P; ‰sxcO,ÓäæÅÒÊÎäÏ 4cÇÑx€ÈÉÅÞɾÍÉóK¬3ùFÆ5+}awÜ<Ÿ SÐ}¢ÄaPÄËÃWû»ìØØÆü›ÙêÛR†P—r yΉ\çÛØú[þüq± G‘0Ðæ†É­¹YESœ‹R¼SÜ%t.©|Šjn“Í ’Ñž>÷:xM+Ú({zèíŸçÖЖÚÇ󸾿^Y€ñ¹Ðù<š&2˜8ÿîø^÷ÊyêÕAÈ9Gß,`?³ “èžÎf)«à˜™1ä‚ú*<_\Ãó½žÌRéÐõ6J!g$à ,ÑÝÎ…JÌ®éNñÖ]º÷lwç‰8ó«NoàKG!ì¥^¯a\UД-3ì¸ÝÂÝ*“žø‰O|RÕo.?6Ûx²*×åGüÐý¸JÙåë RÅþúõb”ú™Åz AÛüÀpÀÜ+_žü¶Í$ªR”JDäyÀëM(mŸM`Þú”Ѓáhct4;u@Í`g߯$]è• µ9sy'½…Á.ûèòÉkÕ©‡  ÀΚt%÷Jæí ò }‰1äþ¤ hÀ3OAàs#{Þ~!•I'NkP&§ŽÈªâÒ}/Wný}Åpõ˜¢«0¸ ä0¼‹å½—˜0d½8KY~|BŽÃF`ŸÿP½i~ß,0SŠ2ßßÇ8ôÚ¦PS§•b6TZ7]L= 4à‰¶Å˜\Åž]Ó.©ðì$œPwgÄ¢EAV\Á™;››ó—þ³T&ãAy÷5z¯®/ác秘¬ò³“\§ZåESsu. |b« ¿ø$¥S°Õy§GAõÁRæ ³=sU”Ì,¤y* ƒäºA: îl)^I†,!$ZÉTÌ' Þ ®¦QÇ7â´m‡ü•ÈÍÓmsæ¡!š`…W_¿ºî4@ª]s0J['¥²Jz9^¨Õç}le³øäðÕéÑ«Ó'Ñ.îפaá ˜ ¡¦‡çÞh2nu‡¤]¦€÷y¡²ûz·¤z9)´(TH¨è—®@”ìÙø3mÑ=¸åªM$¡ßaȨE•¢H—ei™Jš ÊNº+¨ »†½ôÞµÌKEä”4Cmi€ –6=E A_׳ ,Ãfß©FG¥ádB#Œ%r}ùt·Š-®ôí>Q¼`x$c\â…êS/ ¨1l·,¬01'ßáþ ‰šòÎ2sJP=î4t&A4¡q ^(ó¸—^E^§üšoe\eºáå<|:ìPø^xM–ÝAäW ™ 7yz¼(\â]_àhúaÞ¹ELkŠ¾ìÛ»O0“œ¹w)'vgX¢ˆ“)ÈÃéO2b˜­AågsZ)%>±±Ýÿ9Ú_²4Bfå@¾Ê¼²ƒ-«áö¸"Ø»r»~§q#m¦4y¶Žß;ùžín¾:Þei%­·ã¯Dn!³á™fŽ^ö1®ôd°žÝí‡NdËã­ã?œÙOl¬¾•§qööN÷NN·¶wÓÝã—âKQ3¹iÔ»øE¦²vvO¶÷ŽN÷œ³¢€:+uó; ÇÖé–óòÕþéÞÑþ®spxpòbëxwÇE°&³ x×CXˆá à‡(KEb.{ífÿÔë]—FµãBü?TWËÿWïõéƒBT…ȦVPxÑ`2¸ñ‹Óy’P8æEs(@Â)þOö€˜61ž'PõÏ(‡§¢¨ø¤o¨ÞVÅ ÆÜ4uG`ÏŠ ŸÍWÎJ³Kµ³êÒ%ôâÿÄ=LÑ]æ³£”ÿûÌiY-}¦QK%¼”Ÿ8Î/5Ô¬]ó*­´ÚpGi\†æVT¯þý÷"pÉΖš½wF¼Ë«ú0¬êyÏóÚ΋f«Å‚}Efò‰2‘'X/ áç~c¥¢ c•±Ä¶=OMPŽ¦ ·ÙC» sUa—¢¯¤s£NQ2,°]T±JVÙk]Dó[ 5øP@jôÜËNû¢u£†IÀÓ“g•3 ‹ õ"!>÷mcÀÌý6] ¥‘˜KÝ;(×–AÓåx™Ö+·ù~ÝjÝÍÈ£•äŠô‘(ï†?ê)7pÈúþ<+-K†gÿzNçãÝñE^EÅ]vQ½¬àF ô][,ÌÀ¢'= G0žéˆ{Îé èÖž¦@ºEŠ3Ëà²ÛÛK[Ž,Æk:ÆíÜXõüøeÂLÞeš5|î)¿¢*eëY'üIBÅ¡¾‚"ÊFCJ‘µëi2Ä\d0FÏ2Î< ¦Ù@8\¤Kì/¢¼Ün×cnT”äï£K#a,i ×Aq'È5d‘ûl)·¥èPÛã+×(cÈW—ÂT"ØgTÞ‹~'HÞ|ÃcˆÑë_6#GG)ªr®“$ùj$fI¡{a`Ð6ßÍ‹‰œ‘+¥„ín˜åÝú¦³A6Ï¿(R\ ÅPqÎ èEc‰•Eu&òì_Å g!x‰_4(ElP øFÌç¡ŠsÉ ?²êÂGg¤Èpö÷â“]N¾nÁÙ•@:yE„êòÂgú[Õ䌑³ ÄÜG(fìd }ðl½;ˆk]u»î£µ…Ï};Êœ*…irË(¼JgKc’FxÙVáÌzpMžì4©À’5[IÎ(ø1 q3ÙÜŒ‰ø–¶¬D»Iè¬nXS|’ͨ3LÊDb Ë0yîJ£ŸŒûÎé2œð0"‘ø€b}pÔY–É[¦{<4'Fy˜Qf4YwfBîL–tË܈òìÌxÙ™±H°3:Ñuæ6dÖ{.²&›äR„Ô ¹%i7ž‰oǥŒ…ð«•pËG{Ûâ¢*GÒqÓü®²œ~'¬6Þ¸ 4lrü8Ú¼/‡þôjl€Ha"ThR^%hÍ6¦Ý¾y³*ò¤H©3æ¢éLžDÒ‹ÚÓo3y~æó­¿_§ ˜¬qÎjeÈrŸ¹mºØßKëùÜ«»h‘±1ÅVˆg¥ÝÕÝF×cQ©˜4 ƒñòO Ë5œùePÅØs~ƒxø’*ÑnÜÏÍïï¾!~ ûtïÇ«fýŠyÁø˜Ú‡2_{×á@pMû)n»=÷onà—Õâm¶.ÐqÜfƒ¶Ij4¬ ¼C¹e:׋ˆgåá#ç×æÓ²Ûj^bò‰øs¯ÿÏl–‡E°®åá£g϶ÙWv+3âÁó)¨òe‡Òºl甚ï¶üŽÈU€9±ÿ¼÷~~¥äÐ=}•LÙ.o#s<Ì!Ù—$ôY|ó¨çÌ~:Þ:Ø9|Yžýâ|ë¬-ÿøÈYrVœ³gåÑJumÍùÞ©®®­T?^ùaù÷`tŽ‚PÑÿüŸÏµÏŸ›N²+1€üoŒÍÖ¤_L­|ì½p &,ćxR„™^ʺ×Éó=ä‹ÖŽr(–”)¸ö–ÿ8<—D'ó¿ïÂ|°fY:,òEˆFeß#ùÒåH Ðcƒn¸B­ç]‚ôË>2L~§&T\9]?ï˜-‘¹Qºm7Eî¥k»Ï½ ©+ÅÛ Eì/·W\ä¹úà;¦n%ÉvïxïµrµžKjÚBx›v_¾ ‡ö[`QT_pc7±O!>®}LŠV£×3¯Ñbã ÊBù÷ãÅò€Ù[Üw­ÕÀa˜ š‡™MàÓ¹I¥åé (äŠïc“`LæéL4¥Å? ¿¢2™&¦2ù48UŠ»;:òk.ÛÓŸdC;CÜÞ/ Û@~ÁhX¿ÓÑÊÏà·ùñ«¼Gü:@qd–-ßïÔ‘ó@wîµëgþ×­½’ꇂÉF.”pƒ§È-¸À&Ì”áRXÐÖB ÅŠß):ó „çV‘ÔñGåW¯YŽ¬#_c/èw(Ï—þ jž0òùÒãEŸ'¼Çä&› r\ {G^Æ’ž”ç…Aa’‡ÿÌ—–Ë?n•ÿÏ-ÿõéËÛ·g¥¥3ü©.]"л ÆÁ›ç.C9aÄÒÙ,¯ñ¬RYX‚žXBË»gô=7ºéÂ;ãFŽó <Ô ¾É ÏH\ûçtTÒ­@‹!5¹C§ÖůֺH,ŲXÆ,Þçâ±¼ ”8–"?0]{×e¥/p푹ÒYEíã¸Òj¼BûSæ0ª•ÜaÇSw+±šcNªÑ¹Þ­ã®îÑß`'FëK+Ô×äkdÑæØÞœ*ÌÔàžw>9±²$¡˜#”§Fºq"õ]ñÑhÄ8("òÌEL8 ¾ç<®T"Xän¯Õ¤«RX°k£ÁÖ*Ç… Ù÷Z‚EGÓ˜eQþß-]P™QWŠ–ÇJä{ÛwÙÍ̘'B¼m¢òÜX73#ÝQvZiFá….ÞGáqŒ?ýën­ kq3õaFXÜCø9§Ü }뜑-»ƒ:WœH1àȉ8¬p<Œ6Xaß™ºßî=3©œzŠÁ¢{ :æ!¹¬w»1?Ó#L}F¾Ô½Î «pü8› 9Ôb=sÞ¼©–b†zLåOHÏtŽ5]–Š\ »-èáÍSnâ©À—ÿECÁQ^è]€@°±×D]YàŒ£\mH°¨ñ$B`pfÙ´fOZt¬ñž_Í·ä¿Oœw”½[à§løÎÙB¥=ãcj€öWNŽÞç4ý’°—šôMVçäê¶UÓMóI]âD“hÑ6¯+jÞ7šJŽ·ö÷ž*é ´×;ê·ìÝMY‘­.„¸=?³ã]°Èˆ<•[•\ûªzì¼P’Ä G’X'=÷½A¹ìs¸ÛMmuOŽÆ1 ó@Ì#Õh,¹÷A²y‡ª>.BÒö¥ÕxV<+’ÒO–u4­ŸéýÙÕ)Ê2„Þ„—‘G‹Z¯àÇáÏøqEÊ ÃáHÔ‡RÄ"Z†Ý?ó2Nh9Üe-ôž1^ ÂöÑ´…£ÈæþNíøÕe·¿®†/„œwÖ¬¦Í¿EÓúNdn¿ ±D †âMMöóÿ©,´#6ïàGø5‹¦ÿêÒýò¿|=ÐþÚ÷Š©nH©)a.°ç—ÃVÈüöž¾t^ï3»IÛ9:Ú^dgZ,B7¿~ë;Ukþóú½ÕƒŽƒ•Eç. î›®¹mW¹%3~·Ïf¹?9—­Î¹ÛZO˃ÅåY}¦d0üȉÒ;ÀlÝXJÍn¡EΈÃýÖº³°á|Ù°Ç1¦Á§¼§Ëìnq‚LId %×È™Ð$fÇå}÷ðOÉ\r2hŸ9Û¡IäOÈÚò°ò£f°ï“(ÿ…——ÌYHßÏõwŠ”¯nÑ Ù\Ô˜ uVÒÆŒµŸDùXeT£ ÄQÉ–íÙ"rù/IBþüy²r¼ÝÁ  àó‘Q³Þ±å€ñ\ä÷2 ]á‚éªÙmñè¹Ñ€m%í02Äó±3€½øÜã7×;$JJßÌIäz É é»Hò£‡']¢/ñ±ßÐí¥ù鎔ÔiÂ×ç¦=ìøj6c?÷t÷°’ë~xŸ¯ £˜\¹¦iË•ògn9»Ml0Û^¶”¸b’ jµÝýgµÊš8uvr e‹W?gdØ×ÌBÌŸù”<Ýo=ÒöÁÒJ[ÛÇT¹i›Äô8+à9G;cÀKiò8¿wzïÝ^g€7ˆb¢­.W+Ì*[¿Æع[.(öVöVZ/·.ëu§ÜÂði}½8'OŽ…v¿CgG¶‡ú45š=rzDPüx¡ó&h——üB‘ÇW܇——-æwÒC×G ˨ç™;3žÊbíÈÇ¢Awÿåß%¯ìËž×oÞ3ÒÖNØHkàÔ–lK3Œ-²g‰ÑÌ¥ÿÎ0Z1Œ©*I+]cò]ÇÑñ/VqÙÁß5þ÷áÔíöž»Ýy“{ìx{¾ƶÜÑÝêR<çBW!ÉÏ‹–Qi^uJS„ix=\ºÇòÒ=vÙ…{ÔÞ•ÊZ¥:‘\’œÒ«zÿªŒ7›ãn=hcVþÖvúÙÂ\g-½eċ*£FžŒH63¶˜ÕÏzø4cwÏ®|q’÷%pÆê:kÜ›hx§1¿#TÈé_8Åo}ç[ÿì¬]t¸ùº:ųÙ&³ÿ tYâ&_a8.óc1©ˆøîF§r³âŸÊH¢“<¨<{ôxSÛ%˜‡Ó“o•ÆÎHgì¦g¦Ó3S~f|hø¾>ŽCÔ{z†Ía3£^äQÁt `rhð%­¤—•r¦P™„¬sÏ“gÔd-y;Q¡|›Ýy-’5| ý*í4ãò ȳge×Ó¾e°s¥0ó\,¹ö¶¤y9À‚È°Ö‹j"1¡»ßŸE]?ï)RÎ$ùþVðZÎ%ü€o­2œˆÝb—Ѳšöõfãoµ‚H`3>èÌ1hëjeÑyXÒbÝö0_¬2@ 2’AJJ¾k{é’ÛkIhx wÇHV˨K’(™än” ;¦un!/­î6ºìªžfïÈzœm÷L<¯R;¾$òµ²Ryófù(FA}TY(ErŸÎ°{_ƒ}±Ñk~ÀÂÃs\,‘Y§×à–qøÓé’°H0a/D.ôð¹ò_Žt;W ¥,\‹âvv¿‰§"'ŒDg¥òÈ™¿vo@A[©<¬T)©±Žéî8P#LØ{n½¯œºÀž‘¿MM¦j”¦%C÷ÒzœŒ-<¯·É]gmJ÷3Q¯2¿UhâûWZQÉê  B0ž$B·óS¯¼½8»¿ÃÅ?`›ëApO@"‰UÈ–íTßÄ­;ñ/göÓÇÖÅ-oR¥81¡ H‚ìÜVÎ*/Q½7饮Ò›¾¦=69dNê³Ø^›Ô·µåŽMÇ›–g¤çݦ§MÊFwJÃ~û˜[H©{ÞŸƒ&´n®ü|Î98<…<“  ±TF€ÛÅE§w]±Z‹Ï§‹/{ñ=Ÿ®¶Û_mÏoi¡]4óÚÀŽuö¯¸Ð?c!ïÓò3–îí|—N«Õ}\•¯ãæ@+3ãX[|\!U¾<<ìzíW{¯ƒ¯ÚÍáï0Þ±¥Uhè›7Õå·oñý^}ÄW\ï¬VV><¬,#àÊ%½6V¨‹Ø°¹BžÛmït‘#%ç¤PÉ9aI5~‹‡ûUÓ¬#+Lg.¡‚¤Pªç)ãšë±‹ÔG ç—qsÅŽ:‘6K•ÝRÃcKG²—áâ'>ÿüð&až¡  oÝùÔ”­ÜÛ1GS‘}¼tç£ç\7/¯úðÀ`1ȘþÑãY² ²P¦7”qÎ#›&6Ï‚3X·}#ò0ÎM‡ ã["q[ÝŸ”£àüK$E¿öܶïü•'÷ø7&ä6FªPF/"¥Þé¡Ãnë”Þ=L 6Ûfô"õ9¸sÔ­ÅM)ͯ:ƒË+Q)c`|dþØnwŒLMv”ì;Wžûá¦|ÍöˆxÄ»PMrnÂVÌ®rçEè¾.1“z<‹Òí¥î?^L¿´^83·®‚§äµó×åK °§0Ñcãþ­óÐûÁE­7§Ñì-ÂØ^犳Y(‹±šñ–·aP)Ì®8Š±¨;ÛŸÌÎqö)Ü'ºq åÖ»6?g9ÏW:í“~§[~õŸ;°ñ,ÿíO¦> ?vzï'{X9™ÊÔ ó¶¶k/Ož×ŽwO^íŸÎ¿™MÄò–'çÏO„%…ºÛ®šô§=’Qˆú|{›ÇW<ý:úr‡¿Ûßa€~ºõÛîÖ©³ûòèôðx]|y´·¿{\;ÚÛÖ¿Ø®ê_<ƒßµýÃí_UŒû{¿ÂÛ“PúIÙùã`ëåÞ6‡Ò|±u¼³}¸³‹äâ®K0RíÏöžórMô¾¼W¿*"øööæl ˜ž ¼r{Ž.=¤ïðbgûõkšø9 Ïe<Ï ‘œ˜6x%=xZÿP#!‚cWžD!B41€^ç’£­‡šð©ROUØY˜ŽâZ]XÔ¶_"k^¯×Á΃»¿uð¼vtxTx[zÀ €B¡Àž?{u°];9=Þ;‚qÝ­m<ƒeí¼ ƒ-ònÄý Vo_  åEs¬æÿàc€cGÇ»À¢H98yõ ?v..0Õ/VU°8–°;›èˆŒìpçl¡9=ïÒƒš@ìkº-(«Í ^óûºþZ€ÖÑ£Óo^¶á+Jíµ{`u–ç6ð`í¬¸¾3Ϙ @›©2ר@OS¬’‹`% ¹ð€ªaOûÀ¶^ËTw[hCær»üúd¯d;†F«}·X@ßÒº×åΧ6]Wœß8×kÊÑ‚š|‡1‘ƒ>{_v(Ä6àlà9Šá£K™Q)\¯€ $Ì¿ÑúÛÅ7v §Îñîÿ{µw¼Ëwv·÷k'»;ÀÚ£¯ŽŽŸ×Ð/ºöt xÈþÖÉ €ÒÌùRáS‹ON>?YarZ¦"РZè±ÊÜ­xUr'ýö?ø¤úí·Žÿ-†L¶³Ùo¿-¾£] ó€2ŠŽ¶À/ŽnÚëJ³~ÄÒÒpî7°o!tTÒ*SÜ3`4`Fm¥7Š70Ó­¹—†°Ér,MS,¥°ÝžÏN%£Equrý‘¡T^[º*­Fò‘Ü{ñny»Xx0üÔÏPØœ^îíÃŽ³ûl “·%ÝÕÌd‚{àìÈ݃¾Þ-·ŽI#.ðb2J‘H~aºox‡½C õ‚šWI&Ž"‡ò>šm<@’KjÞÂ;tfÝ–\ ï[) ‘üŠ»¹>Y5hÕÃ¾Ñ¼î² ·”é7Œ±€©˜°è46ë3Nƒ—¢Iƒ²‘0nƒ1ù¬ ¥Hfãìõç|šà71l¨ñ¯ÈþÓòúŽçÖ¯¨Pß½äIÜ¡lÛûˆDþ?Ì ÒÚz3¬ŠÌ-ˆžØ/±DlJF0Uš ‡Vß.:oðžËü,YîÝ:_þôvçîá³´Ëq7 tOÞE§ãÌ㧒ó Út–7œ/‰èbØ+p×[.ÈvÏ:`rÝÁy«YG™ó™¶–n¯ùÁí{ÀIú²¡©úÙãÇFU ÿÅs3ûØ¿Ð6qûÚ5 [€!k{ÒÕ—^oaÍqùwsYؽþ '´;˜:ª¶o‘¨|$=ßþ·Ml\6T8p?âƒ!F0(š%çn/?"!|ü¢³ç‡f”¸õ÷xù"v î*øaë¦ HË(Ø¡ù 8ƒ,ìnòƒªí¥E9£N]sÌÎœòE«ß¿°òbÅà€ë¢Ý)ÃÛ"jyúñªÓí¥Óûb™yˆ”»­Áe³R4Kh˜^‰K<Ï–ƒåÌ6æ*®§ÇÔvÛÚŸ‡‘ൔ¸ã%RÏA–3#@OèÊN¯8½÷¼®ƒˆß£T(2'áÅÀ]ñN‹žØ¥ "8YL(ùl´BS˜3xö¼Fóã[¸"l¼KáÞ#B‹ X>5‹%™âVÞÇC„ò1ýn…6hšÉEßù|¥Û>ƒ«E‹åOû‹Ç_ŠüÀsp«„(Ž=¡0‹kBõ*¾ayŸl ]Ì%Ù~øËcþ2ðBâ7g»ð w·f{ x Èõ"ÿÆïu ÷at|ØœÕ µŠ% 'çq ç±)ÎVÎV g˧lKƒáHì¥Í„ª7åš™¢Ì/³n¹æÈ-‰ë(œTáº`þ¶0'qE0ó#»û¦‡1õ¼g»/£:.!wv¸Î4Ý}h¢Ü…³ øsÝô!:n«úêZ^”Ædêk5™Lï³ðÂÐà%âùµÁdœbîÊ6•>UŸ?c™•s*&9!—/Î~2…ý"X³ús·²ý3Íb¹UdcÊN,Ût”HÝË5„¨^@E™n@)FXÐæ9™ý< l1v¤€»Wžq¼ÁIý­èrÿ&ê ao}™«öœòNé©pA†Ÿhy"†è… a,æÆ.Ë6öÛsJöOÅÉÁhÈ~ÉŠòØàÕ3 ëDw9&þÃêùè;ƒnXºƒ(ÜjÙºcÌ™vXæQ×eÇHØGYŒGÊ>bÏI§@\ÉLšu4y&h€³êu¢ÓÁlöÑ®S•³¦qõ'y6X´dÑÇ©Q(H[Žâ¶[¨Ãƒ.Î-v ž[A›Œ[¹@”Is™á­r½¶îAvÙ.èµ×|¢"›˜­²ŽD£oϽ.pF¡Ë`Æi*ÍÒ‚ýt´6ŸâIÈQ½l$üö¶˜Ú<`Ýç!Môcà©æT]šTÞ›˜£êh½æðÍ›ÕòÜ}ŠïxÍ¡³ZyÈÐ=[Ê¿k··†Si¹Ü“eÑíï¿gé™Bc%áºBacTùI³¿ˆ6„9îÒïáïâå÷ßqÛ9=>ÅHžÃd!IH‰Á+¡ª :ÆÔ-'‘a“öUX(Rμ¢šÉ'Í;#¨$k T˜ˆ‚5ˆ'&æb ˜×ijO96•È ¯üo@HúÆùærŽýóÍ7sïpªs„h\žgœJðLMZ”oN#¢8ƒc¶p5Y;)ÐBgî„ N ¥Zk;¢¯Ñ׉D\}¶3-1êdeÔ$òžÏÑD€¤ÑŒu{p L0$Ó2}¶Éå^Xð4 ^d¸É™›PbMVô¸M8°¢ÓÁÕ³ÇÅÉ!šÐ3Ìçðr·M‘M\!ÎJØ‘¯052®ä:Ï:=PøÚÎãÇ!ù@)d šhÿ ®¡d‚¹ïI(P_÷ç¾÷çT}a¬„Þ; ”wîc¯ÙT²fŽosQ«y¤OÇ|¯N^̇M(”mÊPNiYJÁg¢ŠûJ£écc°yp;2õ03r_S¡Ðí¯¦zµhÑ%¹ÊŒ=à Y CÕÓó&Àê]ä æ.qZÐk8ýÚ~jÍî ß¹Æär:(Í-í*Àu§1hy ÝÊ_¦v½ÞuoÐF'‡v!Ó¯l6ú¸wß gЬô¤æ96+=)dûbL=â•IצåÂ3=Ò)=ËòWë @U¸öÂù\@#Ù [é3 Ñym:FÖs‡¦O ~¥À,Æ›XîPÒƒÔrœ44˜Ô¸©Œ4{&z‰•tÚ†ÞöI‘þ,(…õ‰Ã!Z_ܳËí íz×t/²Ö3O>“ù&ó‘EÏ(tdq˜…0ä–0iÞCkäþCfŽL´>èõej!™,Ü.^ŒZ-ÉÐÈÂØ#<ǽ˜¢–1z¶Óë ºü Ü÷ú–w$¦ÇèN»Ì •ò>Ê—~^ƒ,Jöãm:Ÿï§öБìüMàc½Èœ<’Næ6‹gñS“~Ò)H±Q3ùCÇ«UOÛÂ:¹ T(ÕÑê_£³„8ó)& §_ß½¼ôêîEF§0¦A›(£õ%Q=ð=bøQ‹q>º=œxþÒyûŸbÑ0Î[CC"ÞKOñÏÑþÖénAñ?’_P5[¸+9@Hþ%šL>äÄîö.aµû~…÷ó:Úœ%‡!É}hsö¹ò(r.ÃÜ–>Á,)ai¿H~Kψ˜j»Fºæ+5x½½]{ºu²‹'Ü « (r·c4=~\lyŠ/•dæŽ|Û/v·Ý;Qªyú‰ð«mT D^îÔuŒºî½-ôuˆì|„Oª@–O¢ÈÉYP᧠pɶ³µ÷z1†—øϽ>'å>Ž=N:s ŽY2$ Ïü*Žö¶+m ?´lW%ÏLåÎ …l¥!Dšìy© »B5vžàÈæfqVþú¿3qñêå –ï’¹–ÎJÎw´R¤³”„–sUÿ5®ú‰ÚñºlÆÅEڒŇõ“Òt5ÈjÌsyq?Ãxˆ=S¸§°|s‹ðm5˜e‚07º«~^® E9ÿComq!«˜ ¿ö®ÏÑz(!€²ÑQBdQ\Í6árT?ƒÙ¹EÐ[¼?£ptE)½e±œ"3œ/§ÎË€{M*¢T€ŽJ‘[ßx~¥5ƒA—Pû†´ÔÛRšg/ñ¯šgïßÖuWãskêÍ›àä*‹_)þ­¡~1l›[rî·å`;Ãp㬚 ¶ãVƒí£ÁöÔf0µLm“²Ôõ&ƒÙOðá¢^óáé°_¾øbjB¨ß Âö?Æ€°=µLíYöƒírñâLJªù`;Á~@Xѽñ®þàHç²=(Œh]˜Ú¦6…©MajSø*m zŽ8þ§Äߢb;Õ±­5A<ßþ÷íy0à{Lqóo÷ƒ¤G ä.ß/ƒDØÜ"Dõ‰ÐR î!TäfºjDí×*Gÿ…7†ú‰…Fd*ѧÊóR Ò—b:VIZO”Õç”ø§ ˜ä“ˆxâÌšŸPbŸ?¡+!Þ¼yû%Û% cÃù2‡”ŒK¦Kô¶ò|¢4Ÿ$ËÛJò9>Ad ÷ø·/’äa—‹—õÿ‚(/ÊÁ#Ä%Ëñ©rzÂŽ•.¼?øo§cŠ;7Äkp„—5HFä¨ oQÙyü’#–£«Ù®Ûóî‡á¦߽ǵsq×Nܱ3t-e¾ÖŽOO÷ø>˜°‘'lãé›xÒn°CGög4 Þ Œ,ÂضÙ”¶de‹ ÷ŽÈ{xû[ìóÎ=ßW³¶ÕCÛ]š¬ÝS/;†;j Á¤÷Su‹[»ú‹ísœ=ž 6­‚é¾™cß<ÜÆ}³~Ù‘wÎÃImœé¾9Ý7ÿ~ûæ¡vÛ<¾½Óq|ÿ{³ÝÀð=ÌðJ[̽Þ?·3öÏãmÛýóx[¿öê†ûg Á„÷Ï9ߥ/wAúDöNw_:Åï ÑÝâ¢S]^^tÈž¸»Ã÷»Ñ6ÔÙr¦»©énʶÒcØIC7`ý…{©åš¸YÊ'ûa»ÀäZ¯u¤K“2õºžÆ8_”7æà„ÇŠ‘N²8©¼«ÚÙ}öê@µJ±tUÍ àóÈ#ÂŽú$C¾}óR…U°p+@@+©vzx¸?/ËúÅIc^Ÿ¬èŸ„-á{xò…ÌèâÉf±|é”WÄ  =yõôät^”ÞÂoÞ"+cBÏ!†Áà \/l½ªmíïmP«#íS¬s”ŽÅ­Ó½åjeÍ99–NƒÅâÁê;o¶šý›uT:3‚IGâPÝ8r-wÖá6v‹¥BãñvF`ì1ŒÇ€¯Ž2³ŸŽ·ånÂÝb ½Äò&yùvñÒ‰Øn (:ÏPp…ìŒ%ÞòÚ˜ìÜÙô;È é6ª«N‡Ÿ^žã̺ìy]Ü—?¸Í%ã’!0GáE³Gw©*æ|e™èfÝHE›ØËXR7ñúYø:ôJÃgtÞ‰6‰XQ‹hdRô",%jNè¡€ ejÀ<.¡I‡[*Ž]IÛÙ=ÞåÙ {1àg‘a ½žÛrØ­ºR1ÛƒN» êaæɲׅÑc!î)G1§OÍãY&0^›$qY Á*f fyÐã‡Oÿ½óêå˜'Þü;¸ã¼àTÆ×±(ª\t.ܖ)ÀAhðÏ›‚@uh‚Z‘äg¬ÌÐÁ246a·Š2b±$ïìï#…Ù8‰9L ¸b†¦ 8l¼ ø P¤Z-S5]ÀA¨ øçMé‚ ÞðÇEƒŒÉ×…Ò~Q Öþ“ÝHÛQÈ»òêï¹ìÅ Õº)‹´¨¸@ãU,rmÔÀ:^-X .`ö…)\ñ‰H%*ÀQÏ»éMn$>^@5 jûó“²~$Τ†ߨ£àï&`*¼†_›E¥^õ—þózi©é7¬i©%¬!tOj¹¢E<õHŒ;`eø·x­Pl÷'ÜÖx«‹®$°ÆðÆ­×)­,…V/±– åÏWKâúM‡¼áÊm)–:.–Ü¡­H)¼a LçÿA¿¿ÃÓÝu–Â…ô~L¿ ¼Âk#ÿºnöû<‡$]I M³ ŒÅq°0 jÀo  DŒüï7Î’Tì /ì‚"ÙòÈOJ®  “PöD^1@$ 3bщ‡ç¿DÿÏE3õçÁh&MZe hΪ¾l1ùbV¤Ì4d°†éí¤tÔ€ƒäÓétIػĕ)xŸ2ŸáÁú°6|p *”àF` ò ãÍ]¤úx9Z¥Àî)BPžÓCº-ON²÷ DpøµáÐ'Ü €²£­ã-Ù ÔJ=¦qdémа„£àH>鬭föq³Â“ÜAóA©Æ5JŠ¦ÇÚ$µ£êPéöX>F€™›sfù#–á´(ß~PŽÝIéú2X7 di6¬vVBõ¯bP>Zþ +÷¨œ,tŪÁrgÒúë2†æÚn.óÏu`}øºg£á, üÞÒ°{¹¶tÞl/Ñàû|Áõoº˜ÇXq[ôrå÷‚"Ë&™‰ôÓ ¤Ê׃ Lá˜pÝ?Úæ ¼Ïi°¿Á48R7±»ÂL˜e3¸TηIÎsj“yZJÿ\;pŠËÕ•Õµ‡ÿð#{´]t~VËËÛšØ~ÈíØúgõqR°îâ[M…ÞðSº>î'‰ÜÏL(ÔºëLù„‘ófˆ˜ÞžÃþý¾ÀçÃÇ+2áôž”Á±/÷ˆò9ljÿšeÓº–®¼ƒg‘¾l]=2ËÉó ;÷矣C’Yî—%wviiúA”ˆÁTJ »Š–A­@I9tU ¹¨üíOËË$Kƒj¶1ƒ§ïaΣk–Þ ““ º¢U—r«ŒMši!fy*½ó†Ýž#;ß;Õw5Ó˜‚«|>‚å¨ò…p•Ê…—)3€F>d° ©$ÔùÛW:ö¤Yn‚¯Ô` ìrqBþ:u—£•”& Ÿ¼ØÝ߯=ÛÝ:}ÍH±SSætä_,õ9Ï6…¢KVîÓΠZ ,ñ×'{]-J¥ßé‘8C7€±ô~°‚x «Û9?–Ñ\Gnî0-æù—[{û›–7œAí6øµDÃf¿äürdÁÁ$øMú-RŒOI'©”ByS¼ÇÏËø+Þxùšö"™–]à>o»O·wö¶±¶N¶÷öXò+– êõç>t˜3wV]®Î½#_å­zÈ# Œ`ÉÆøÂKÔíy}²ÎòËÚЄ/îþí ƒúùR¿Çšzr´r°¿9už-¯-ïêÊ{s°¿rrÄßTâ Ás,wfx{ Ú¡LE ÌèŒ#îñøÿÍI ÁÂ'$¼ÛƒÏ¤3`ÌËfë3É4mnlÀ®QP}Eð9D!Š1$ !C!¤}í«†¤®íÃßvOö(Yþ)|8ɺ}€Òçó@vêFçd ¦+@Ùæ&´½ ¿ix{…¸,¤ß©‘/7•Ÿ‡Y·(š.âPÀ{•‚ <÷Á#Sà{Ø‘ˆ×£û;ð¨Ñ/‹Œˆµ7ë6|F7lP™>F—kb¯h,UÛ[‡{Û[ûµ‡'§ZkUòôÕÞþN£ÊõWdZ¡Î™9Z½J5y½c;¯Ý_îM<»U²õ±Ø…òB™š½à”¤øV_] Ca|B½? ±ï‰,¸jêܤã aO±Â}\]‰»úcUõ›ËͶ È 7+šŒèŽ“yè—³Ðní+ƒB 5.ö좑X›&Øˬâ±wtôÅ õ¯¾‘.¦Šmf°m`>ɾOÄ)¶q‰´Šb•S¯û¥B¾æJ‰cÅfõèb²”L1Å^2¦¯+¶Ù°]Ü‚kÐNž‹û ùDèf;‹! Ìð)Ñé5šmÌHÜ™ðáuÞ=e˜è@Sƒ'i„&ÁÞ²Iaoòœ•f‘ŠqV_Sò,RÀ¢³H})ϢȃY”0𲀑,Cükúóõÿ´šçn¿ƒY:]¿ü¸²VY["猥ñÕÚùãÇñoõñÃUù¯øùWuåñJµººR]Yùˆó«þå<üš:R4DüýêÇŸn@Q¬¿¯ÔGïšGÖÆe¹ ïøøW×ÁóêÚãGËÿrþ5ÿ[ÿYZUÙÙîtoztëû|½ä¬,/?t^€êéõûå#tmî5@üàµ:]ôJ¢3· êÛ~å¨å»% ~UaÏk4ñüœî+¹m DëN£y×T‚.±€²¨iúxÆxÙ{m:E?bJûÍ:e™À#B|âYŸ=çYÏóœ“ÎEÿ#æÝdÏÐ(Kªà†ˆR Œ±$ŽÌ3'Ò?C+ÑEõt¯‹mÚ#+¯Ü ~À}ÕéòÓ‘f?HÁ¬DìÎÉß÷N_¾:u¶þ@D¿ooœþ±Aæs´JAo2T¤ f ¿ç¶û7Ø /w·_üÖÓ½ý½Ó?èg{§»''ÔÀÃcgË9Ú:>ÝÛ~µ¿uì½:>:<ÙÅ\ž—Õ‡¬ˆ‡kûðèI»&[ià »…1» K…ƒæ…ðËœ±õÛ.w›ª½@/Q:Ýkxìf…æeåªXxàµa€±÷“ßo4;•«ŸU\µ¿=™eh÷™¿<ݸØ[ݼ¸˜/2Ÿ§÷Ín×kœµ‹%&z±ÌâR.¨-bTÉü|PÍï{«+%´ê~V½ýÇsz^«éßÀó’Ãó[|þÒüòd»bPIyÈ0ÁïíÝ ”Œtë°öêd—ƒ¾8ÞÝÚ9ÁÞãwâñ—ü…Ôè4{ôùO™[-ö,kºô®Û¿Âl+ìf@0ÀœˆÁpà,ÿªè,-Œ¾¾¯\‰ˆô`‚ÌG;ºBé£ÚK˜b¿¯®lïR×ÊÝãžwz}©;èû|É©¡yt¾\-!ò]6æñïÍöö.R!u®—[¯kRŸqÔòS<2ˆöõÁaítïå®TâÒëƒðïÕ}¨Á[Ò VGFioâ‡cpûkóÚ£ap¸3þ kT—p ÞD†eœþ9¿Åâ¿Ï×?W—Ä|€¯Ô?¯PБ8ßCÙÊ5ð«fÿš­š;Øǯ@7§¾ ©Ä’4‡â„3º¡Ø^-ôh­|Œ0lÏüø,[‡÷”õ?ðö]bÞk¯sÑpo ™åä–~¨ô?Ô¹ÔVzl¹¾„ODƒqБôoÄ€ÓDîßwYÀiÖˆ´ÁPö¶7ìop6; ^ÛH§â5¯åá~Ô­›ùij3ÎM,}rºµýkmï`ïtokïÿv˜9x4¢¼?˜Ûìš\14¥åm°óÅù¶³¹ íçMǧ Š6¬|„o3mµ:õy¿ùtÞ¼Œ²TøR~‡ÌœçâŽޢS<Ðáÿµ›ÃMÈ|:¾˜_á_¿°ŠË?SÿD_Ð)ÝãÇ;fÑ™§n](áe|…/¼C¨fà³#ÞÝ q«Ý|*™Wß–+,µýÚ Xo°îŽçEÑNÃù—¥¯ÉXv_Ÿ–.¶ ç@©¤lKßâf´ètE³Y[x05FÂ0À÷Fá; x $}ÿÞAç¬à‡·bnÔñšuEâÌèŠÙ ;¥ Í©n8Mç'çûï›%NCó-»¿òtŸ˜jHlÐw¡¿´à‘ŸR;–CSæ')ùLl¢’ØG7î´½ÎÀgn+‚,>TÍÒ†œõ†í$á£/A·}cKBc€Çèª3 Ò¨UÅKå‚Žìª ;$:Fò˦ﳻJÒIú…­ZŒƒeO«E‡®×Cìl²‰ýxïåÞi€ Xïi§|¾=`Ir.dKÝN±àÎÎrÈ¡ ããît0I>Zlƒ¢íšï²|ÅSdܹ±wS¨ÊàFïp )ò¶Êt5|O’@D €Hæ½ðúõ«h05มt <ž‡С°}•°\Ò;.«Q'<ÔfŸN»ðy ‘"+埌b´Ý:ÞOþoäfÕD“&ÛS¡xwÐëv|χòO”ƒÈ'«mºäÏCV Ûrx6wøk… ÷ö÷vÙØ©Ôªãºà0êé 5AL(z¯Y¤½# ©­|žÿ‚·Ÿƒ~OX”mœ½‘÷ç$Øqv~?<Þýê`ëhã k°Þ)8h~ÿè·Ã½Œ »™Øé‚ ÇŸq8ªM³ñößDùôÛ€ã¤"ëƒ/%Údký “8²˜¤ .<Õ¬À¯:vþ°áp£ÇÓ âŒ–ÖRÚ&§pö™WGë;eáñbl[ù>üâüĦ|d·ìd™ØI.q•(×ë3®¤aû|¯ïtí^avÈŸ–Qæ@¥‚ì_ù© ú[ÆYëÖÞþîŽ,$²P™†Ÿò45S~¡†ÈÌûohtèñç¿Î÷›RµVŒ-+/)& pfö&É:üsúÄHa „SfÑù¯2kB=ùKÈ‘j»¯vAú=8•å±S ã í7/1g'ÉÛ”¬4¾<Þ(¥Q˜ ôzºc»wY_drÑÂ¥•¡eGçõ-`X‹>ó†0Ékí ž•p¾Š3 q²±“‹À(¯a1RmvE…ýl²JÐq›óH^–µ¡ÈÜO°˜@6Qžý¬è–†ÒÂ^ø eÜâ ëE°á‰à¿èl'‰»¾ð–¦Ëñ¯|÷Òƒ)ã;o¢¾¥¹C _~«Ê÷UI¾§ÄG­#ñå'uÞàŠïJÿí¼ÔÓ°èÂþÜT‡ ‹Ïqù%எ´Ðb[„øa[CVk6ä¾|±u°³¿Ëß)Sùmˆ>èU.írLý¬bÁ’$¯lyíËþêF¼y A—|_--­„äIz4n 5\oÒÛ¸‚é(ç ¹ÈS~k¤8®‹¡ÚüvA~)b~ðEe¬¨„Ô¶M¶sÅ‹ñBô‹ I)©#mW_ «ù{íf¿ ü’¤]yB~Û(­Ó*¦ÞF´8SÇ©Óˆ¿âU8ˆð\2)…±Þ‘¨p2Áé„ÇÒ g®GLXÚ¹·é"ÂSz2ðjÑY^T$$Øà˜,7MÍ ê~ÑwÁz‹ìÉH5T’* Vïüâ,;ëL˜zîõ÷]¿¿‹÷¦Ê}[‹:±(ÙõŠóßèã­2h— Ãv«4(#Îö"ƒtĈãÀ¬ÇÃð« —‚û¿ÐÄ›[l 1FºŽxñªò0.áRð»d£¥y.-ô;بÇU)vý2F¢ûÎe·»ÃTƒ>d·Õbb…Nïý"ÍSoHÉ2"f$TŠì½<ÉYϧÈïn³ÿ¬Ó;¦´<–na^š&{ÏÐ<·[B!á÷­½S OÜÝ>­-;¿$N™1ÌØÿv@0’§ëøçVa3Ï4²´nž1ùO ×Û7œ½“Z HŠ¥yÙ‚^–8!ÕñÀˆiƒ”ûmk pgÍR6®8ÎÙ™tl ¡ºÜó(_ û…í)ûƒh—:‚’IOÝ»WîÈ,kª]•"Ö)˜ =Ï›oy’¡f,òW¸Á¶•“’°bUCð×lT7ËB´ß·Îñ,F5,Ï5?s#зBÙñ×ãBi³‹â´mg“j%È 9Vê¾ÅiŸ¹¥…¢‰Î˜½oaò&­eÙǾC ªcRyýj•€úZ Œ:µ¡K+¥%åA)YXÅUßüDV'}‰iŸìíÔëêkðÿ!ÄÞè”êÿópueåqèÿµŒÏ««+§þ?“øѹ #G‚_Ð*ºÝD]ƒ¸;ˆ„[­–Cð”îËë}À€â¨ÝÔþöUîÃî*—Ü]…ç$n1w•ÅÐwaPŸâ²¢z«,ñj. Huyš+2¢ó~n0g!œÜä~í¹°Ñ²„L$½*ÌBY¦(ìµ^wÊ»‹Ölã%?,2b8TL-‚0ÉÒÍë&:Aû'÷OÐBO˜ÒÉó£«(§tÈÚc\¤ëH«<8v} ooâûQ/zA&~¿ŒöøÄ°š 0i¯)ž¯ç*ÿ£ÛÍ®4V‚û%ðÄØòz(À0€à½Zµ6fBØA[«aCBæðÜmï£ äjJؼ~Iž ¥ÍÏ(™\ös¥ÓÓ–ÂóX³€WötÒ“Öîðža «ÏáÑ|iÝ)çcô`CPJÀþº©F>˜Ä5©Îà¾Ã¶õ°–ðarUST;[®Š¦Q¤.v¸‡xùˆË•jÞ&×NÀ)Õ«G°*‘ó0ªGJ&&&™$¥ˆ)iÕ4Úª±Ñ½6¤¨jD’?8O& _¦¾6! ¡SHw!…tÀ“„ÁŠ¼I®Sªìô"5vz ª/’ëëôRªÆê&V84­q˜Ze”Gê¾æU² D·dÍ $S-_”Ï!Qt9Ü9\§$p£3À¼*¢ ÿ¸9hËh€õk £‡ô@™ýdS,kí¤ô™éf¶G~7ÿ]ß—‰Ž½K¦L•èù2Õ þyZA§ÛÊÖd²–B*Öª&%Ö,ÆlŒ‰I,y;ZŘ Ë­e܃NUûP‘æÓBR×áÜëôR± ¥÷£k)**E[ VTk _¤j/,K‹pm&¨I§Õ¨/Óµ -Z-'å]ºÖ£‡ÊÐ~ ÈÓN³4#BHªV¤ƒ5ÔElI¯šÐ^Mø40SíÉŠdÔm2I–2´*{’åRéZVÒ›d­Ën HRµ°ŠÂ‰Z™=!|º––@Ï0“ ¡-EC#’’6¶ m.BŠ¹V—^Ð\»Ó4ÍVË(¬´=¹™Ö—ºvs÷kžâ¶Ú`Òþi!ÄèµÃÌd-Q1Ó5ôNµÆ¢ÖèÖÿ4{&Z#‡LÑS­Ñ¶@Õ¤ÁfƒÅV°11‰%oIk/aùµÆ»ïÔ‘µFiN­1mÎ=7Ò° ¥÷cÐTªÖ(VLk ^¤k,Skäp:­QÔ¤Õ•—Zcœ½Ö¨§Ey—¡5j¡²´Ælò´Ó,UkT I×5°¦Z£%éUÚ«‰Ÿf¬5ÚL:[É2P–ÖhM²\*CkÔÓ)½IÑ­¦€T ]kÔS¾HÖ­è á3´F==ÃL‚†¶ HJÚز´F• ­1µ …ÖošµÖÈQØiR!C­1míæî×<Å­µÆ„ýÓBˆIÐ2S´FÆPkŒÓ;Õÿ™gnÃè 1Í‘¿6?b´€®f‚3«¨Û°<3¡A_ìÖÎÇCÒ(§‰wÔ‹c8DsŸ ºRÞÙEFç„òCñr,§†Oôȱ漟f*>ˆI'…Z§GVA¡™ûc´þ¤ÓÁXýá‹ÌsÁ(Hö¡ Û°8tÇnÃð,Ðmä;4'·šIoU?¨‰0‡†dòs·2ˆì3?2ƒ"™§}nC{Ôç6RÏù܆Í!ŸÛÈ:á‹QÁŸ¦í™ÒÀ3Oõb4 Ó‰ZQ1Ì&C»µdãXá%•²:ÀSš“ãôÎmØݱÆçv +/_/Z—Íq\ßÁLe…ă:¤.õ”ŽÑ)4N5­¢¦õ±×웜Î\Š®Åß›*[vàÕlx„ÌŠ-SC2ÊÝ’Æ5>¢òë\wÙ•#«]ÊœzWòl7šg !$coÇ {IˆTå‹­ë˜öŧ«_”©”Ncuh50éU† ¥A¯ƒéhÞdha˜,5,‹,Í4JUÄdÒ5±¤©*fEr5›æjÂ'«c椒Z”Nj’¥‘Y’–ÉÐÉtôÏS´2‹¡ÀÓõ2%âq²ffA‡€ÎÐÍtt 3ÚQ24 E¿ e)h2ZJ1 -Ú$kØ)iAC--y=æìKûÂÖŠšv¯3/T5N`Š®B*kQ:§ÚÚ?Q[»´ZÊ‚¥èj쵩ªf]ÍGÀ,˜Ø*5£A_ì–´´q‘”_G»³^YA 1æÔÏ'¸Éì!±üP¼ƒnâQU3ZÄ1ÍŒ=MWÌ&S/C ZFhµ²ðM†R©_¯“iê_dhdq,…,ƒ¤ø´IUǤúÓµ±( ©2fCn5“Þª~PaŒ1c2IJ%3€ÈÒÂìÈ Šdè`ÚÄã Ì|xtºþ¥¡‚?MÖ¾ÌiàÀº—††a:C+*†Ùdh·–,µK¢ÀBëJ.e¡tEšc­say;•K”0Ô¸W^¾^´.k­név0SY!AÙbÔ¥èZ€¡ª¡qªiýƒ³Ÿ)ðÙ™OlÏËò«š—“‚¸sþX’—Qþv³£Ü‘#gJ¹W]>®Ü)c8‡Ë^UVó6 ÃÏ8ŸËèœÜ™U’ÏëT~“”eÅìüN6͸’|ž§Ö–}Åâ|/‰ÆÔL,)ç}q 2³²ä9ÿ3%;e›äi±8L,a™³ÅöœÐ¸MÕŒ ” l›ËÅöѬ)qPÃì.¹ÎM›ãÉù^2ÏsL¥X1£ 0Iç‘&„¦™ä„1:§L£shHè0¥C RÓ7uü1yÏ5 ŠÛçýœSA”+ŸŒõ¹g6ÿ±ïó#É›g&ϹhªŒ“ i’yÆþ¼4©Smþœ…Æ4®PÏÎGcg˜«TÕ¸˜Wo9gG[zñÛÍV3vGÎ[sz{\ilF_Ì\H6³5L‡טÞ/¹óÛ$Æ9*Ì%)ÓQÜ£ kšó&1R©8-ûy\d}©yp’ã$cÕgfÄÉ7iHrò´5IcO™TÀ2UŽe|¥i{ªé“&Ö6}Žeü¥Q3b†ÙtòÄe6#Êä’“ëdÅkÚOŸh)£\; qœD¦@™¤Þ1‰ïL¡qhFä0•Cs2S·jÃÄ<9ãA³KÛ§è9>TÆ“+Ym¼h&§­×sãÈ›À'GÊ•bZ| ]‘OÖÔôº|#[o˜hôJ}ÃR¯O§U “¡Ý§Bg)ø9•âššŸGÓƒ²Ÿ[ß·h[5sb™€+þyšDª¶i“tÀY€ÜMҕΰ42M ck@#¯A acH§8lÈEo¼\†} Þ¡1Áü­HβÌz-,F,ŒÉM·¶DPÙ™4… ­&¼fäqµ!CÉ!\&bä§Øt°†&…äöL­ ÿ«BýÊíÕ$ÓBº)Aw4zKòdªVˆP‘‹æm «™àwÔLtqÒ+¦Õþ0.ÃÒ¶³Üy1ª,õ‹áù#¨ú–ª½nÊŽ2ù:½äò ÷¤7ÛZuרê1ÕiÒ`íTpëfÈÅ*¸a3â°v*¸a3$æ–¤‚L¤0ÜÌe&¨àDꡲUpC‡é4͈æ¢rhNfÒNm¤‚«”٪੥mUðxsó7çŠk¶UÁ3ùÃh}G>ÏmäQSÌ·ÙBµžþazƒXpó~Ë`-16<ý.j›‹¨Mo¡Ö3ɬÌkY1ä6·êêKY%bˈ-7º‘ÚÞ&/[Ž˜ó¬æ$C[§i-=w«vm¬L¸Ì¹ò·å‰Y7oZ Ü&[îXv›¦EylFv7£÷œS/ZÔ<Ù[Zì»)á) Æ¹ßŒcâ³èZ>ÌOùÐ’ôTÙÃ&3Ü(1ô#Ýe‰q ‰ârÄÖgÝcm*ÿÙç=æ~äñ0À›+\v,¾ñMÖy¯±žÞa=5k¨f¨dfhÙhØ7F2RÔF4qØÇ‚Q ùhÎD3)sÇÈ£Ñãk­±Z?´b±²4ìÍ Æø‡à1C´èU{H”+ÆL"1€t«H²êšbiÚFÆæ‘F^ I#‘Ä€~- ‰©$µˆ‘µdkBÍÚf’Ûl2.ËÉhÆÛöVÍ&¥I;+Jîf’¡Âª™ºFæ”Ñš©CabTi˜ÙUv¦•ÆHÖ•†µÅ q¨ 3Kþ6Ä ›[ Ú0´kÄp¤V 훑%ùÙ^ôÛš_Œ°ØZ`’»ÃÚAeg‡Ñ¶1Åó³ñŒÍ(¸òÙd2äªBt‚e&Ö†ãŒÖÐ>“Üž©‰æŸb¢ñ¯:½¾l£I·ÉpðN‚RÅ^“È›¦§10E˜²¯fÃd6Pt›’+—i*¡ÒV¶’[¤0N˜¥9Äj 'Ô„L–& íüm"vz)@fÊh»µ]Bc‡ˆÙ2ì iv…ODê _Ä´—è«äÊCÈÑQš¢ZèM¢öŸ“EÉ$K™;Zòˆq<2‹T¥ ÉÕlš« ¬²¢´jA*ꯤ"H&©!9©X&“TÔÒÏS=ò>‹*Ï$¥ÓÓRÒ饢¾Î¢£ÓË$c˜@Ç0ƒ¡%CR¢–®(P¦öbS,«Q,#èŽVº¢N7LÛºSÖ`Îþ³)l¶fSúÒT‚Ðësiú›…¾6ÕϦúY˜5ÁTOðYúZg¥ˆå,V5/'…Ú«¶ä%–Ÿ˜~w+Sß»gƒ1V=P­a}Ð`ÙYMì0"3]O4ì£ÜÙ Rò$f40Ìe`¦O èD½2¨5Y¿TALôL )úf* „‰þ©‡5ÒCÉÖÎÝl/Bš~ª+a¥ýåkRÕ¼MÕŒ ”l§ÇæhŠÓo ×7%l§ç7EbzIz¯Ñ¤J€3ЃI ™i‚^lD¨,[O6&s˜AçÐÐa>J‡¤&mèFzu„8[ý:½¸­ž­irÞŒ¹rØêßÕߧú;¿g®+ÇFÙžÒ™a­úSë2UÃBÌFî6rðšS¥/<ÉsöqÒ:æö{Ðûã>X·Ožöc˜ºtj‘Šk(@Æ’®×Ç~›|gEyGRÚÑyª_¶QiÜøÄ<®ðµáY¹y|v´œõ)¹Û0:"wVçãnc”ÃqÛfT ÛQM›‰ÖâVäó“çLò8Ósp{òƒ‚†'àn#åøÛmœ}» ûƒo·avê@—}ÞmG/bxÒ@ÛЄ¸aꆦäi·TÓ£mƒ¨Wë²9µG‹>¶9NŠ3ÎUì²{×Cî#lÛøáÌ áÌHaÛðàiLðTçå:¯Á }’Ø—|—,qeÞ肋oòªš–BxCÐØ‚¶",¡ôätßqS;Ví÷¾ Áxà<饬€qLbl²° ˜qkÁ‰·ä%ÜŽgt+^æmxQ.•¬ ëïèÒ)ÃY)Å–@Š:œ~Ç]¤™BlF®fn¨Äi—WÁÛ)Å9šR5mK5u¢$ƒZ*ƶM uÔ¤ ! ™nœ« aI#í8™îàm¦~l=e‚B&r2…âe–ŽlMŸ(c¤%'Ó74"p˜‡Â¡1‰úÍ×LU6»Ì¾°µ²<òp9n‚K¼.[´±Q˜múØEN•9Ç-oÙ·»eßêf}›Ûô·©Þ,ôæ‹A«e¬6#p¦ÖÌ€ì”æeª†…Ü 2¶žm¨Òžœ¾<^ZǪ-ß‹Þ¯ª¢ISÎXOæSäš \C2n-9Dª*ÉÄXb:2{š®"#Œ¡†Œ É 2U–¢‡ïÔã]iÚq"]ák#Ý8h¦‘Ÿ‹Š±D‘‰^·S‹í›Q5lG5mr$BZªÄ–ä“j@~g¦ç!?(h¤ 'Ò,^fê¶ÓD”1Ñ„©ãï²ô`[Úx#-8‘¶¡ qÃÔ MÉÓn©f °D“µþ›\ÖZý4ÓZûÅòvʯ(a¥ûf¬øQz×CNÅW·c› P j/£1Eë •ÞS÷ŸŸÌòÌX)eš«,ßò(…«¶¥¥„#¹6sœeâùÌnúÛÈmvo‡êV²ílÚtçXa–£3k›Ì -ù [åIyÑÌδ`»iYgÜ*ÙùҬϼ“h7È–y§É0Zþ3q»æ¤¬ óÌjÖgå‰åreYËwvnÙÖªÑDÌ.’/ûZ¾³u›&Æ XåcáÌÝ®‰1¶œ•¡Íð,>÷”Œ¶ÈÙ–~FoÞ€4`ó,ng÷Ùô­0¥Cë&¤ 3V™ÞF;ë7@’7ëÛègÿ ¢\àrú˜ò­±ŒI~T£e†Ëã+*Ó%CšäŠ³÷!HjÇÔ®òÏgžy ²&ÙP®xôÊV- K9`òFJç¡6ÉÄóËÝí·‘iî~ŽÒ­$žWœ»áºµ_ a¶“øw‹ÎË‘.1>ýNt› ÑMoCO`œ™©ê2ãæmn`N(f—¹.+žÞèt³V‰ìòÄÙg6)Ü>¯Ýˆñ÷ù›YµlgÕdòe–È—ð.Wœ¾EóbðVùïòÇï[5/Ê{³Òá™Åõç†Ñ²ÙñRãý‰O5O–gž “ö¡ ñèڒŸ*¢X¥Ò)oÀ(·d Cf½ù²î/7s$ÚCžÑÇÄq®¼{ÙùŒo,Ï{]ùô®ò©M$b‰Êm¦f‘†¥ed4GmTûˆuy,ÙÙJ’“ìL<“³•L¢cµ˜|ƒ6^Ó‰¶¦‘¬'v”FŠy C ô¸-)Züª1%Ê)cö”@ºI%Y×M³ª4L + sÛJ#·y¥‘ËÂbÒ-¤‘%µŒ™©e$3DÍÞà’ßæ26³Ëˆ–ë6W '¨I!KLþ¦’‰Ã®©º"f¶˜›ªÃad‘ie–v™Æh¦™†½uƤ%q°,Í툗6²Ô˜´chÙáh-æhJ–€df¸Ñmm»1Bcm¾Iîk N•GSØÊŽcÎãÆ4>£ ËiÐÉ¿rHÜ fX#R,;:XCãNr{¦öŠ}§ÙV¬;éÖî$¨^ø’„á4eáÊ ¸š pY ÑUmF@¬Tª=ÅÊŒrKD´XZFŒ‡ñ6iÁ´aiÊÐLÈüs«ÓK, ⾩֖¥!fYÈ°$¤YÄÔ"Ç4õErµ.Eè ¦ž¦nzž¨Í'@¤SC2ÈQ¦††,å}‚øœ —N¢R̆Ôj­Uí@ê@,(¬“ˆºf*‰AbbJ"–È À4tÁÓ”Á¼M§€3Hèô4tz)¨/Óëïô2ªjë¦0´¡`˜IBt“ÐÐÉÔÌ ¥SÅ1‚Æf¥¡é4²äm5qmåê7›¢&k1¥M7x½æ”¦)YhFSMhª ‰x3H@§kF!”…Ò“«PÕ´”îg+ðÛ–Xúv5©[ rdÍêuø84.q~Í+s YÌÕ0„2M#Kï’Ü9 R²$æ%0ÌH`¢¹ Ø .¨1I“S²5: m‰š] mÊûlMOi ñ’«šYZU„¨LMPo¡oåiJÕ´-ÕÔ‰’j£1Z7AŽ±ÏÔ ›µÑ( › q/½†i0y 25NCCŽ¨Õ@ Ôei¤†ä Sé8ÌCáИĤM×@ƒe§É¦¶Óh5MÍkŸ+ÊÞNÓÍä#õsy4à¤ýÝBðJœ7‰™Ï-?Õ”§š²8D6Ô”9t†¦@ÙhÊy UMKIÑ^ÖŠ›a‰¥oYS?‘£kÊ÷§ÃÇ¢)+ˆGД³ÖÅ\ #éR5åÔ.ɇž‚ž}nxn¤)sØ$MYÔ˜¨)+šrœ¶dM9™6彦¬…4Ñ”ÍÈÕNÍLMY%*[SÖÀÛhÊ9šR5mK5u¢¤ZiʶMë³5e³&ÄA­4e³&HÜ+ASΞ< PÙš²‰!GÔkÊÙê25e3ò†©ô æ¡phLbÒ¦k¢)«dYjÊ©…-5åxSóÆ]ç ¹¶Ô”³xÁHýœE.M9a·¼Òƒ©Mâ¨s„PO5婦l0-ªdùÙfFNêÎ ,KTŠ0 ³ÛÈq iJ¾è­Ÿ¼qœßqé°Ø:Ü8i8ɨŸ‚g(Æv:¬ÖÇ›gE+Ì$ù88Å«×(P6<ÖÒ¾4:ÿ5ÕUKYžüº ƒc_·aqæë6òøÚ‘_5¢¿š< á,y-ÈægªdPfg»¶dÅŒNuÝFâ‘®ÛÈ<Ïu¶‡¹nÃä$WK“u†kC/`tz«¥i˜MÔКª¡YÚmÏì¸Ö VѲ¤õAíh£öa¢I±¡b„Íá¬a¯Z—Ïy,kç™Ü™ÑiÆ9Ýœj—¤]ÜþˆjÉ:…²Ræ5QqùľHÕ¬ BÆ–°I eoYË/£ë™÷¡›Ç¢jæ¹b-qJ:/AIÇ4 Ƥo&Þ”–pCšÑÍh™7¢©&IéÔßȤ{m vf]’™Ú‰Šgú­f©p&ª§ ™š©—©|¦]Gdm£~Z7¡jÖ†jÊ„H´RAíH'õ/›ôÌD ÍAzXÎ@M¢7x—¡‰ZN H¶.šD™x•®ZÒ%Jè£It ÚS64$M¿Aš(¥f7EÙµTKG¾©+Ç ]‰7se‰檩yßÚ#È¥œæ¸q+û¦­ì¶¬oÖšÞ¨5ÕP™†JWÜ›)¨š¡Ÿ2õÔºDÕ¨›ÀÅV°9=ú¢·¬™Ž“¼ÑõÒ;ïá±(¥!ÖtÒÔÅa:AIÅ3cÒGC\ª:JL!¦²§éÊ(Â题¤ŠRE‰šhøÖ@Г¬‡&о4ÐBã`&J¨‰ñ©–©‚J´dk Q`Ô–üªýÕäIg¥|Z‘M:_&Ù”‰æiOvPÌ@ïL U¼ÊÐ:í¦ƒ(‘­s&PÅߤkœv4ñúfMÃl¢†ÖT ÍÈÒn{&ª¦D¥¦™\ÒRÑŒ4ÏZÏÄòvj¦(a¡e¦®äü½j]>—Š©ÛaM囓Q˜¢_†êe„Æ©vùÏØduª^An”½)Ϲhþ¢U»²R²‡œy9HÍÀ1™ O·Dðز=ÝËágþ§1·š­Hëy¦ð08‡5è°ÜÙ¡’ÏeUþ•”)ÊìœV¶É•~n«Ò•AÊò7‰æÌlRçºqjŒ2Kå=çµiFÊÔ7Í5eyþ›X*GÞ©<çÁVm¬L¸ìyòQå9/6oZÜ"CUîsd›¦ÅøkzÎ*£óåœS/VÔ8‹UÚ¹³)ái ¦y­ŒÏ£³èZ>ÌOùÐ’ôtÃ"÷Õ(ç×(òåÁý<[A”+'V®óm3~4†±Èh”\YyοSe°dH“ìYöçâIí˜Z0þá™´lâ„3¯D¥sÉ7œ»dÕª¨”#_´«=é(&“qëVÈ[î­û7ãLÅ5žxd£Eh;»ÃT*ÙqÊÙ}•;GWbÜrúÝÆ6›Þj¬ezÉ»2â›m.LÕ²Éå•÷lto± ¸Ej/ûx茦$Ûfú)N:oóªVí«fO²Lø<)ÀrÄS7+m‘,oœµE³¢L4=A˜Iüu¾é-iœ/,%.ÛèHÓôa¦ñÚ4͉æ¦zhGvªa‘\l„øîQ. ÍD8†\c9â¾³î6ã¬S>êX Í•‰,;NÜøà¼×ÿNïþZëCTö23@4¬l£j£Y",Kc¹Æˆöˆ\gb¹e«Äí=ºmâþÌXŒÚ F°Sؘ*ÖÖ SìC ì˜lZ´ªÙ"Êåb–‹@ºñ"YÛL¶_4ÌL S+F#§!£‘Ö‘M»ÎÀ¢‘ZÂĨ1‚â_³5mäµnŒÉÀ1’ò­U£‰hRÄÊØ‘·‰dR°i¢®€‰Õc¤&ê0Ø>F憕¤1Š¤akÉnA(Ý’›þxY›H6ýC« GiÁк YBŒ‰‰DO®¥•Ä‰¥¡$¹+¬m%TvæMa ‹‰)ï˸Œ‚*—é$C^Ê!'PbMH±¡è` Í(Éí™ZRþ)–¾ì%cJºñDÀw´$þž¤Ú4ÅKD¥É‚“-|Õ €@E—º1%±‚Z å¥úVFŽ[¥N&ÊÒša9È·Oÿ– KË„~ÞŽ:ÿ:½4 *%¶ÜÚР1,Ä †ƒ4CÄ"Iob*Jì]rýhŠ¼(ÏP=ô*QµOʤŒÊd“¦Ì =‰ H‚žšI®RÒ’ìªÝÕ¤ÁÖAÙQ[µ!µÖ,r&›ÜÊ‚\,”M.@êi„é IÀg“Óéé©éôÒ‰QßgÒÒée“2L¢e˜EÌÐ’š¡ 9ÑIO[*S­±*—Ù’(š”J+%R§4¦îëië2oÚ”6\Ç)ýi*gè¾4ÏB¡›*pSNÊ&`¬È·±g)t! ¢–·\Õ¢ k—C%±¦0Á$ÀÛ¡vL á½…1)Š*î‘F“g7ŸÃ°Ç E2³‡rgHÉ ˜À0€¡Â)À“Ï ÞT…1RD5t¦)¤ét* F ªØLQ5'];ƒ Àu& ¬®ˆj˜³YU‹vU³&S´¥¢›§9r༉âkÞœ8´¥"lÞ‰ &*Æf,ÐDQ6'7ä¯IŠ³±z8EÚœÔa­CSb‡9©Ú›´Ó›)Þú¬ðôòÖŠ¸¦Ùy#ósÅä[+è&|dÔ>σ%§âž$WXÈé±÷&Q÷9âí§ þTÁ—‚íÍ|q‰|¦‚Z*ø9ËU- JqkyTK[ LDÁ¿jÇ¥àß·Q—‚¯àMÁ7Xpvó9 %ÌRð³z(w8}J$}b½aü¼©‚ÏÁS|Qoš‚¯À˜)øq:SüT:3_ l¨à“®Á& ¾J‘‚¯)b©àçkVÕ¢]լɔm«àçhŽ€n¤à7'm«à7Gâ‚É ¾ÑK4RðÉ ùk¢‚oD¬ÎDÁ7&u˜EëДØaNj‡6ä&íô† ¾JŸ½‚ŸZÞ^Á7;oÈ{®hw{߀ŒÚçy°äUðä ù/=¶Ý$¬=GDûTÁŸ*øì?+ˆ]=}2pÆÎ …M8F±/T5-ÅLën#ßI±aúÒ:©+ã;£¿Ý>¾£yëó”é>–K‡é؆fœgñúÐq}¼¸IxVdx”¥¾§»~Å¢FáÍÏÜ“h ß›ž¶›GxÇ ÚŸ³» ³Cv·awÂî6F:^·nJÕ´-ÕÔ‰’j¤n×~pÝ„Ðø$=G‚’¦gèn#íÝm˜œž»GçnÃðÜ<‰BþÒàÄÜ’>^Æô¬<‰¾¡Ã<IÔîµÆ‡ã·ö…ó‹ùlîœãœ-ÇX…›÷°5Šü‡à¶1̙˙Ñʶ!ÊÓ¸ä©R,”bƒËñdá0ù®,E(˼‚K+ÿä*U5.†LacëÚŽ¶„âQŽÇNé¸ÔãûÓ÷ãÒóÜp—6óÇ3wA¼ÉÄ7 €Æ§&'^d—pÑÅu™ÖŸSŠ®¬¿Z+ÂL[κ)¾Òôåô+é²@ 5fC’53ÔDgN»‡Ê¬€¥Öœ§9UãöTÓ'M2¬­ælÝ RVšB*Ïùš5SŸSh^g+ÐöÓ'(e¤B§P)Þf*Ñö4ŠBfjt C3"‡¹¨š“©ß• ui³«Çr”¶×¦G¾ü-Ç¥o‰—½È=VµU?ÛãÈ«Sç¸Ø-ûB·ì‹Ü¬/p›^Ü6U¬ÅúbÐj™ëÕ­V3(K­:O¡ªi)„7-k+Âô¥'¢P™Îq©Ó÷¤ÛÇ¥K‡ˆGS¥³V’ÅŒé& ÛPÀŒOÑ©Z41”˜Íž¦ëÐcªB#lŠMÕ¥)Ð!€™þ¡-U}N¦-|o¦<Ç! ug3rã3ÒDs–ˆ2Rœ£ð–zsŽ¦TMÛRM(‰ ¶:³mHC5iBh¨0çjBPÒL]N¦[¼ÍV–­§Œ(d¤*'SÈ_f*ÊÖôñ2fjr2}C#‡y(“¨Ýk 5d‰,{9¹°½~iªµzŒåí´cQÂN9Îâ#õ°5Š¼š±ng7³ôbFdŠZjŧJñ4‰ší©³RÌ8¡ZÎSè‘JW­‹K©PòŸæ£9Í$“®ÝåcNÀvÇhÌ)ÙÆwºm¼|ó¬…0ßÙ©·YÿåNØ–| ®ò¾¤ämf§â °e"·ÌSr•ƒ¤nö§æIô›$xË>E“ešìm„SuË&¥¬‹ôoö§í‰ó¥‚ËyúnÛÞªÙ¤Ì.“3E\ÎÓy«fÆKØ%åÔÞ²™1>™FÎô4?ÿôŒ•¶I,—qÊoш4h‹Ts6§ÿmÚ5b8R+†öÍH—rìÒÑè-`€%wjºÑ½D¹ÒÔåõ&0æeã—ü¸FL_—ÇÛ UöK†4Ihgï…ÔŽ©áešÜÎ2>óúf]N¤|1ñ£®Ú––²ÓäÚÎEp:–I&Á»-ºÇœï¾Ϙ³ã-ÖÞtÅæXaÞ!£|£®Ë6/1&?ý.w›‹ÜMoqOb˜Ùùô²c÷mî“N*g™^/3¦ßèwÃvÙörÅúg7+>Gò½QsŒÐÔªm[«F1³Hά|ùrØ41VÀ.Iß9ìšeÆ™9û s äž’ÑÂ6)üÒs˜7 Ø"£ŸE.‚lú‡V ŽÒ‚¡uRe»|£å.åžpœcHÿ—#§AÖýíærdžl€ãÈu0†q1Àœ+9`vã›Ûó^Û>½³}j4‰M¢R±Ý¤ak:ÑRÙ€b‹6F7£ä¥<ÑDŒ)¡~\&•¯e´Æe[ÑÖ1šyÅÒÂÒÈcd±¨c¨Ÿ©E‹Yµ¶D9dÌàH·¹$+À©f—†±å¥aa|iä·¿4ò™`ŒÚ¡53Ĥ2´ÅŒf£¨å°ÈŒ`”Ÿ]fTÓŒ}»«¦“Õ¤”­f„æ’IJ¹º2†ÆšQ›«Cbf²i˜Zm¶†›Æˆ¶›FóQkâp™FœQÚ/nfÊ1jËж1Ã[3ÌÓœ,ÉÉв£§ÛÞ¸c„ÇÞ¾“Ü-Ö&ž*;+¦°¡Ç‚ïkŒFÁ–×â“!§åËì>±V¤˜~t°†ÖŸäö|)ükú3–ŸVóœÛU:]¿ü¸²VY[ÂAð—$›K¥ï]wAY÷òÕ± ?­áßê㇫ò_zõøñÚ¿ª+WªÕÕêÚ#x^}ôpåñ¿œ¯ª#yc‚¿_ÉÏÔúÏ0¤¾>Ùû¿]ÙŽúúuºå”½ùõk­µƒú‰ÉF¨¨2Öª&%Ö,ºoš£)©5h¾Þ>ýãh×Ê–yˤqŠ, •–C|ÛÔ`v “vÔ¹×é¥bÒ{MÓ­í„b„5µâ£Tëßë×iö>™KDê“_Ŭñ—ÉDÈ°)ª™2Yµ´ðw‰V¹¨,êx¡Lò"JKf&AýÍ„Í"9RÔŽôª íÕÄ׃YQ\µ"íI™$3 L’e0s’Y©L’‰hé¤7©“!‘EÈ$ y’–"|‘JP ‹„Ï$g˜HÏ0“ ¡-EC#’âÛ—–¾8X¦5Á®`VkâxF°é¼~meÅaàiëÔ°“€ ûÒ®¸ÙúNíWsáDomAÒ’í+ü­™EE¡‹ÙP’õV½ƒµÒ4¼œv€týÿ‡UýeyeõáTÿŸêÿÉúÿIçÚsÎ]Pøn»Ù‡ pÖm 7ûžÓèÂŒ©ês·×kz=@|í¶A°HÄô`ÐFvtºUs}hG¿ð€-ÔðÉ9 ç·ûó~¿áõz‹Nq‹@‘ü ü­¿þmÙ絮;°ÄÏÚÅE¡D~jµg{û»µÚ"|Úß;€O¥EÇ6ûóÕÒ†ó% óåÞÉ ôH@$ÿ>ßv¯9•œ°â˦ï7Û—ë@ÕûAœ"0€7HË[20þâ ‘× Ú~óx–S¿r{ιòÈ¿êôúŽ¯<ƒš¿þÚ°WÆþµ†}Þ;Ø;ÝÛÚÎzœÏ÷']“œŒ…æ±í“ÃOíãFì1lø8•ðÄí1ž¬8‡×®Y¼I+ðv¿*ª›ê£öÈXýŒ*™ýœTâoó®†Ë& ,ðÉù&ã±da¥ŒÁŠN€@7.:ÕÕ뛀U8óCgs“½àÛñ‡8Ç7ZÄz‚5y„@XlÉâ“VBê9¥ïýÔ>!>:4ZŸÑ§|õ©]‡o…5`XRzQ×}ªï=9Ð*£…š`Úlø†}‘ [±þuxÚ&õ/50‡}+ìͨøõ*c³Ûû»[Ç|öš•8Ù=Í ß©:|¯H©RkeLY­Žšäâó(fź¶N*£DVi¾ ©äljÔ+ŭȯfÓ_Õ¬ˆ ª¼ß?4&†Y'R‰fNÌš1X„S.gC"EœãÊOç¿óÍØkX*ɆF¬V7d¸ñflW*—È|¥ÖEY°o‚‚DF¾†ÏfÆ!xZ_[0æx^+•jä-h<’9·ÔF£ÍÏ´p´R¹Zr±yUŒ/•9ž§A–£yUÓö£ñ³¸ž®`Àû|Kò9 0 o͘<…f‘‡:WŒÊç¿;7ã…a!ýò ß›L ÚŒÆ ñA©X”å‚ç&\Ê'2Áà-tt6  SúØ‚ÆàMøXX¨‘³\²¤Âh™^Ø|“>Ïfy:0šð©/±Ô¼bÊ0áwqTö-«6¸Éy³Ó” xݹm‰¬N жfJ›Âè²hk¶ãBŸô Ô†¿Ìø\PH?ƒƒ×&\.6cr1x#–Jbqa›¢LX–Oäpâ%vq6‡ÐɽkÁߢà&l*(ÓÈW,™¹ ZÞ4Ü ¯³9›ŠMñTΖXj^¶¾š0¶&ëfUÍÚUe$f±µx¹€«1[²1i‰\M’¶fHšÂÔ2IK²¶†„}£9*–Å5š±‰0LÙú0­¦`‚‰ =‚Ž#À3AûÖV2ú!ôg‚'ìðÈzô(¡mËIêôx™¡óy0dTÚˆ½Á“•Wªì ü°c,ãüwT&ÖN‚ë`•8ß}çÈ/V¨)PGʶ,Õ–±j2‘Ù—0ÙqSs.—4ÒÔÜõš­[|1"ƒ\ïñÃØœ?¬¬­jƒ{ƒ°ÈÊÄ&Bd²±Jp"Dæ«£4ÁJÔÖÛS°èú!³2&b—µ”.g/ ® ˜Ì!cÍ@w»@Ž"FúRP†©´ÔP&IÁq¾åšÞéR¶¾îRnGM#Þ¾ÛX¼‰«ö––lúœ]X…+¤wýËóѸ—HÊÚ¸•u‘Ú¶Õ‡Wô«>^{t¯§Ö£íÔÏ}u%EÛ®¤¯§ÉãYµ^o-©Æš—ÁEZ©”(—õõ|› ´Ù*-MÓ>ÜIþ]üÇÕøó?¬.¯<~øHĬ,?¤üÖ¦ñÓø¿OüǽˆþÐÅ~L6òãÖâ> £>Lc>&ñ‘?Þ#G´ÇmÆzÈ‘_sœ‡å1ñ1Æ#!Âcß‘'¾#-ºÃ6¶Ã.²ãNâ:²¢",c:&Ñ‘Ï1©hŽÌXŽ‰Drèâ8¦QãŽâ˜ÆpÜ£³‡\ñw½a»q‘†q“‹ÚÐÄlL#6Ʊ1׸³x £†<±w©a§1ù( ³IEhÄã3¦ÑãˆÎ˜ÆfL<6Ã$‚!O\ÆÝEeÅdL>"Ã(cÒÑ&RãŠÄ¸/qRÆc0äŒÉÆ_ÈÑw{ayq+q÷=êbÜ1Óˆ‹¯0âblñˆ¶øŠb-¦‘÷1ÒÂ>Î⎢,î*Æâî",î.¾â΢+î,¶â«‹¬°ˆ«˜dTÅdc*&Q1éxŠÉFS|±÷0’b²qó(Š¿q Å?#‚âï?ñ7ž¸ë؉©«÷D\½]õ>¸| bt®ßâÝd]Àƒî¹-W𘭠Ý%Ü\5ELÀEÜ„¶Œ‹—Í[—Ø·è:«Czö5»’ÇÚ¥<º–èZ®voÌÅ\êç©«¹µ«¹Ú¹z§ð°‡í\Ïõå²\гJݪ+zÊ\ÓÂYº¦+Å&ã¢nÚ¢jâ:º%—u#ÂdÀ‰¸°ÇyyüÝÔ¥}Ü.í)saêÚ~W®í™ƒ’ÀÚr¸º+…ïÎåÝ®Åcš¼ ¼©*”K|Œ‘Æ_M]äÇæ"Ÿ2¦®ò“q•Ï‚†gï:¯”½#z«ÆJÜgÒ.õætª\r2.ö1{3u¹‡Ë}Ê,˜ºÞß®ë}F×'06{W|µì]¸äÛ´´*“;Y}c2U†8Y—ý$"µ¾#ŠutþˆÝöÎ]ùc›Døh‚®ý1*†2&æê£Dzv·®ÿ™­Ì©;ÎPù= P{m|¡aû§!_]ˆ€:)Æ*™ ·2p›UÝRè@^’§!“!0‘†ÒKÞQHRý„¨Í¿‹•‚»5P)¸ƒƒø L8ô@»¾†+-(¡­Iˆ®òÉ„&hçõê„«\¨B|M"d!6îuèBº&q§! JGN,”A©õïÒ·s¿¢Ð†I5ñ~„8Ü£ÖŽ%Ô!o{¾²‡ñ2¹ièÃ}}&¬{úÀ‰Ñ†>ðw}Ýsk¡QbFèƒ983kDé¿ÍÐÚ2”<óÖ%öãm†>Dëž}Õ¡Ñv)O§¡£†>(Ý}ûyú`ú tnB0BÐÖ¡Úr™¡¥n7ô!y®iálCäb }0lQ5qÝVèƒ a2àdBb¼<þnú0öЇä¹0 }¸³Ð‡¬AI`myBäÂwú`Õb‰1ÝAèƒ9©*XèC”‘Æ_MCÆú<¦¡ }È‚†—#ôA.{W¡6•¸ÏÄCŒéT¹ä„B¢<2öfú0–ЇäY0 }¸åЇô®O`l9B”²wú`ÑÒªLî„CLÉTâ„CˆÔú¤(vÖ1„>¨vÛ»}ˆná£I†>D©FȘ\èC”éÙ‡>dY´2§îXCdä÷9ôAéµ1†>ퟆ>|}¡ʤGèƒ:n5ô᫺­Ð‡œ$OC&ú` ¥—¼«Ð¹ú»}Pš'¡ wú Pp¡±A˜tèƒn|¡6ZPB['úYå }ÐÍëÕ W;ÁЇØ*šHèCt:ÝïЇTMânC䎜\èƒ\ëß8ô!gç~M¡jâ= }¸?­OèCÎö|m¡cerÓЇûëƒÛ¸/W>¸„ûÜÆÄ/{p·yÓƒdÂ˼æÁVX?$²o÷‚‡tª2ãØ¥ï¸Û½×Aª@<øÊotZ>š4Œ~—ƒèXÝEÔÃÓP†<·8,‰—*£‡íý ÑB—7$¹í›´3+dg/3± ²RÕ/–Û»ª!ƒ¤jR—4Èì9òb£p ×3hÇ p‡w3¤ŒˆŽ廕—¼Ó+L*Ð\Æ`D¤Ä%'x ƒÄ*#ϧQã¼€A;¦!»}!¹ÿu\-×½ ¼àÝ]º`ØFÁeîຠ%>8±‹$.¨>žÆŒéŠíÈOƒ ný~…Ä~×q¯\7+ˆ‚wt­‚Y«¡¿PÁ€@‰åMü*…8y ÷(çX.Q¬¥÷á‰ûó;Aª(0É[$ă;¿/!Ŭ”>?Ç|SÇ|¿¯I5Ö;°åÓ(¯ñ‚l<·#óà–¯F¸znï^{z§‘º!]®I)vw×!ðºïæ.Ñð;ºATG· ˆêïæ ¹ï'ÿAdÊ%—ê-ºVNæÚƒp5Oì΃È,^d½í@^0ºê@š?÷ýžƒ$Uà®/9à]8Éx•ëë ì»õëºÛàöÛwo.6¸M×­öùú®4K›:õßw§~¦²Þ ¯~"EëÖOo&ì×/éò·áدÚ2<ûMcVˆ[öíϤ+CI3mWBïݦ{¿ZCðä«vðWÛ$=›ºøêâ/áûø‹>ž:ùÛ;ùK›à}Ï{×ÒÍ_S*ÓÏ?µÌí:ú'Í/ ”­«XhB¾þFm©&¬šÛòöÏ&*›Œ¿„[GßL=þÇîñŸ4¦.ÿwæòŸ>$ZF–Çé?,z‡^ÿm Ñøý›’)óˉyþ«L3úbêû?>ßÿ¤i0uþŸóêhÙ[÷ÿ°ä]ùÿ›73à60¤Q戊Pùaäù4 `,QI£? ¸å0€´Ž×²±RÉ;‰0nc5$u±f$ÊÌoÂÑZµî’5t ñ²mõîÔ­@<˜dH€JÁP!arA*Á“; H·?eLÔ±„¨ïsd€Ô_c àmŸÆ|}±Ò„Gp€<n5:àÖ*º­ð€\Oã&)餕»«°ò»š~'1Rýw$ ÕQ‘îŸt˜@|âq涓ˆPVõ„Bâsyu¢•N0X ²n&- N¢û.¢Üm¼@؉“ ëüG äêد)d`" ¼'1÷¥­ã ÈÕš¯-j`ŒŒm6pßÃH˾QH‰6h_L8f€zåÖBËFFÄ€!¬d2™D¼@UÊša£ôw›ÁJâÁW* ´(|4 5P ìØxœïái˜€}˜@Ø­ ¾û¬o-ƒâ…2cÒŠÜnˆ@ÂÌŠÙe&`Òª~±ÜVt@&IÔdbTöy1 {d@ÂøOî,0 uDtü+OX@Pò£Ì*ÐÄ)qɉE(¬2ò|0¾x€„)0 ˜P8@Zÿë¸ZŽ`€ à]Å·Qp™‰G˜Q(ñÁ Å(\P}<K@ÂÈOƒn9 ¥ßuÜ+G@XðN"LX °ÿ¿Ë›°÷¿Ž<­?Ghàƒï¿d-½{×…ûóï“tüWêÊLÎí_¡A<¸c§ÿT³Rúü«Ë€ù>{ü‡5F‡Öò©¿ÿ×çïN‡q¸ûKóàV½ýo«žÛröÏCïÔ×"¾þYrMJ±»òôê¾ Gÿ°áwâçV'nþaõwáå¯öý¤ücSþ«ðñ7Ö[t­œ„‡¿¼š'äà›Å«“¬s‚îýê‚™ˆw¿2î·s²*p·¾ýANε?¨òoìÙŸ§[¿&ÇþI´ïžøõß“¦ŽÇ­?Oc¾6¯þñ±´©Sÿ}wêWuÝ{áݯ¤uóW &ìï¯vØ­9þëm¶…tæŽIÄÓ™yá›]{3zù6Ãô5ÅÞ|Õú6jÞMC F )Ðtu<¶ ÚçÓ û MG'DDzÛ2ì ¥tfüQÙÛ DÈš)ж¡ ñŠQ°jc5cõÝVÔ‚9‘qðÉÄ1$ìIÓȆ±G6dÍ‘iˆÃ…8˜ M*CÌôGq‡Ñ9ú ÆÈî –lÿX„„ž 'Lc&Æ3‘5M¦Á ž0ˆT6™#œ"Žá®â*ì›ãV´°¤YÇa'{¡ç¯ ï§Ñc‰ÆÈšÓ°Œ[Ë0€Tv˜#PCƒáN"6¬Û^“>á;’uÌtÂQ©kÝy4Vç1ÄyèlÙwð¡ßr¢/&¢§h¨%irA!zªboî8LÄÌŽg8áÇ8¯â>GhúqŒ¡$‘¾˜Æ”|}1%š 2ŽàÝ̸Õ(“[¯ð¶ÂMF"|w2‘¸cÉˤü]E¢Ä‰¸‹MWÜIlŠ†Ž; RÑÐqÑ* Ã2é°•ä…òUįØkh©ížDD‹–+L(´%yî¯ÞIå vIXo‰zÑO¶ûþb ÇÜmL¼S'¯ûo3RGM!2mè=‰•¹omOÐÌH­úÚ¢gnNÃhî{bøºQ42EÚ `Â14JoÝZÖ™AcY†™_´Í¹ÍøS*3”MËƦwðmÏh+Š¾øªCg´-Œ¿šÎŒ8ïèxÜL¤Ç§a3öa3ñnNˆ]QûÚ2h&¹pfÌŒIÑÛ ™É˜‰ÉÀ¶3±²Š—±i`5}ÑÝV´Œ1‰1èÉÄÊè·…€i¤ÌØ#e2æÇ4PæÎeŒF&æ “‰a¸Ã(ûˆ2°;ˆ‘±$ZÃu'!£e½ ï§ñ1ã‹É˜"Ó𘠅ǘŒCwÌCpW±1Ömr©‰GÆØQ¬á«Š‹ÑrUýëiTÌX¢b2fÆ4(æ–ƒb ú? 扉#¸“ˆÛ†Wc„O8ÆŠ` p4L¹Z¿Ÿ¸!y ±0ëô݇Âhw™ÈóIÂhéêš\Œ–¦è‹;‚12Ï™Íó±†ÀÄj¸Ï0ñNcŒÚÓø—¯/þ%>=Æþ¢™·ýrÛõÝVðË(tOc_&ûb*g¿«È— wøïˆ;‰{‰“q'a/q2î"êE?&“zI\"_EÌ‹µ–ÖêID¼è¸Á„^gýê]Ô=ÁpýB›H´‹vžÝï`—l•ånc]b]:¹P—XÕãH—Qºùk t™d;ïIœË=kòxÂ\FiÔ×å2~˜?Èå_±ŸVóœG9tº~ùqe­²¶D$K/Ý÷†¯TÜëö³ ?­áßê㇫ò_ü¸²º¼ò¯êÊã•juµºöžW×Ö?þ—ó¯¯é‡5f9øû•üì¾>=ÞªíìœnÊ!/Ív½5hx•¾wÝm¹}Ïi5ƒ—áÃÞ ]ƒÉæ¶Z^«r%òèP])8ê0+÷œ<ê5Ï€L_¦±ZnÑñá­ç4ûWuåö€©ßqz ¨BLWÞµÓi;¿7ÛÎGßùØì_u}ÇÇà¬ÂÓW{û§µ“ÃWÇÛ»'°–³im*ß:tu>Àè$,žXØzYÛ>:z¶¿õAÃþ)ïÍÎ÷;ÝÚù Ùj4š½Ò’ß«Oásð,­ ­ÓX)zZ(€I’ãÑé‹ãÝ­Ú‹ÂéîÉé‰<ÊJÓ»ý+äP>{è÷Ýú{öñ†·S/è`E/nÒkþ´¤/#:d³¼\ëÕIHâÎî³gv^ê´û;[;;‘JéY©@œ1¡¥ñFñpšú•W_;:>|~¼õ[CJ…‚¦U2ÚŠÚ-DŒ3”§íìïï==)9š±^Røn¥åòºˆDµ*z$jbï“* 'Kf•µËn ªµ)RÉzO%“=trˆ»&4º¬×4&W˜¹~r×y)'#ŽHÌGv£–á/k`‘ ï|´ç¡ßåt[µÚK˜¿¯®lcZ8u$ÝsL/µóN¥ïó%§F¹ãÊÕ’³´€ó±Gs´Ý št`´½‹“Lj%™C:­…Ha=:=ÞÙ{ö¬vê´:íËØàƒùh­”P‚¿&@VšÓ¿ézH å§[pæ±=WÚõÒ<{VÚ¡0Ç‚ ½;„)màĆ8öúƒ^Ûw¾ÁCfXyþ ^÷|ŸV¯@Þæ]›Ÿ¿,;ÕÅ° §¿‹¾í÷Y¼JÁ·¡Ÿšc­ƒÒññC¿Wë;øgCzŒÙ{oªËËoñ)VÕê†d†™O¡¶&t?OÈÛÁâK Ñ2æsõ‰ŸMÄÒ!ÊÍ[wzÞŸÀ ,±ßé8×À<Ž ªáŽŽ˜ìë–ëæà‹£W¯ù™K âŽwáZ}‡lùÍ¿hN#r`Ïïzõ&|¼¡CPâÃÖœófßÙzº‡ƒÍíµë=”Tf¿âäøaˆ¨D7mìÄ I«µ»óÕ啵ü…Nu4÷D@ï§àx'Ö‰iyšÉŠS,$ÑV<üÕq/ú^6¦Î莊Üá_¼z‘YÔlËø?–h~àf4ß$ÿ§éüLÖ çûï›êTÀ®˜Ç‰Ð'öqß›‡oÎ÷NsÑ!Ì‹4¿ÅžÇ_j–¬;‡á†)†Ëón6ùä‚4‹‘˜E§4;2Ó°ÄïÛùßN³­|Ó|»è¼Úß·o¢ScBx¡’-Vú ²=à—pB`™À¿&qe?£y—²nN>ú }á<—šÌ…<߆Çϱ´†Þ®‡bÅÉØU»1¿2?«¹È¦ºt ²®û± Sºa¡DÁ˜QαºòøÑ°èž½:؆·D}Ø\Ld!¼F×ëE×ÃEçÑ¢óxÑ ?ôÓ,ãõo:»ÇLJÇÓ= T¤Ë%.›î1 t»£Î]æ\Ó¯P‚ŸGŒ{ ¦°ó¶QØæá¯%¥Ö¯åÞÌ?Z–¦þ¤Öœ~Ö¤-½`‰Eמ$¹ü~oP‡åÒs¯»5·wéMáŠkcM$ ÁK¨–ÑÎï‡Ç; Ù:Úcç÷~;ÜÛqp%\³5Ç»@¿7yÍ«•¤%ÊÛ3Oµ”æeA±4O8Ê?_´Kó¼Î{¿KØ·À[^lììï*ì%Þü—¿X¿Ýo ÌjñP3›o+m¿¨nDÃ_xÞ”ÙFÀ7œmÚÄO ÷bÆâ}f,v\Ÿ™ý«Ð¶ü¬çyÎIç¢ÿÑí²gÀíâEŽ×Ds_hc^tp¿qûÎMgÐs:]„*9(  c(Ú´GŽær3@5ÅJ¯:]ô5DÍ>ìš­6xà{ƒÖ¢ ž¾8|uêlüˆ~ß:>Þ:8ýc#pH‡Þd¨š×ÝvßsÛý솗»ÇÛ Xn=ÝÛß;ý‰~¶wz°{rB <„íõyíEI2òA4¼h^¢ W²žÊŒ‡âK&[éUÔ \F,Ù¸™Üxí6Ûü±ç‰’n9ñß7»]y» ÷6fP£ S²@«']Eù•Ö‹¸(ÒCs.ÊÇ'(£ÂOÔÖ«¼¤×¬Ï¸pŽ)º(qÜ6ä õ¶€¾ê¸Y7(Xÿ³çµ¤ba)þ&^FI÷®«PD‡X“Ü<:Ôšäâ¥BîR©Ã¢ÅHñU=Ø4®QDý%¢ô4ÅÌ•2ÙH2&É–€î;§ÊíUDÅÚËT>ÿ'YR$‹¥•ÂÖÄJEį¤1¦&sÀ «6y™Pf}8b‹>õŠ >M6¥Y™?¸½&ð·uAÕùyS|^ÁjåyÀïA‘­Dæ†f²ßÒÄàó"¦;u×75As(ãóR0‘ª²‚öIÑb¢:k­¸õT%5A«ÊþHd±|T,}¥x&•×…„/•Òß;:èè^b’Ë2Ú…%­#]ËŠ»‘x®žÓFۿ↠ÈRûd*2:ŽNÒ &ÚMp¸Þ{Ž?èqÉ÷a߃­UAPa_:†šp4tÙw>4½()ùŽ ××t4wî »=Ï'©$zæièyΆžg4”f³Ü/?)Ýk1ÃOÜŸ8M#E!è˜N¯7„~ Èá·‰j­N˜Ä—@ Åº‰´õ\më¹q[cÄg´¯Ik8Û'»¿”òwÃyZ7œ›wׂv[Š šM‰"—¹|›CȺÅÓȆ•²»`ùÄM%q›Ò]_Ãd º9­Õ©¿×_žVP:Ž½†è<—@A@yYûï ýž'6¨¨ÃTiÛÐRu9ÙBŸpUÏüwH9É0ñ ‚0çk´aá´WßD6¯TS"Zl)Z!S"òÀê¢$Ô}Ûj,Bà§D‹"MX•ˆEý&nb\t"Cè,l:+úWå ƒ®ÔÃäRk·Ø+wÝå²~®„>ÑTñ>J<ŒÍ } P™o^“ó› ¦•"|EÞ¼hù,`.ÄgZ9A+‘9Rd8 ¤e-ï NQ=éD(ÔYçinŒ¿àN÷‚Ýͧ>eÂUì1ú)'âN*¿p<úiÙòyÒÚ¢¢¸-ªú ʹð} Í®ýË¥tÄÈZ]”t†Ey7“VSQSãR {1Ï-o’.Æv‹ÅøÔ–É“_ÊTD–H8Ç¿Q/”)Rz?5ïOíÿû¿ˆê¿Uûuy-fÿ¯NíÿwiÿŸšþ§¦ÿÑLÿÙÆõt‡vƒ¸`GÜÏîÿÞz]“|ÎÅ-àÒS4²Ç<ºaÃÛzµ*e&}jåË—[Gt™ G…”òU;IP«¡„©þ v¼û¨w[ûaÍúÄ»TÄYÓÔ.¿ÇcÜù¯ TÀÔ¤Ù†~í äìïœÖöwžŸ¾Hï *ÑÐI®sëøù.zeÔ0\-£ZTBÝ8Âéëätë`gëx§örkÿp[qÅgsmøCðIyŒg¾[rø_MÙš×v1ÔîúÚíΗb~üÜEŠ¢ÜÚèÒꇱW moØ—¬qÀ„ǹ è9­öF¡Ð‚áEß,rä5¿ã:~gÀëä ^Ö3ì÷\‘ÄŽ?»¾©‰Çô—ÜGÏó­¾ðØZ`/#—Ù3s:³™1$’c–À*U@õ6àï¿*d•1Ó ïs$¯s1ß‚QøÞá_P›]ø¯0Q8ð3Nô†9d&·køÝjR‡%sÐéAÝ!?.ßFý U—…!>`ã8´¿„Ú,Ř¬Èžcœ¬òÏ4^жƆòÇ•düþ&œãÁŠ/H—â,Ýp£p[jNpê›a8oXžR±ë KzæB›ÏàØRhŽs> ÀꆣzwÚ^ˆÇ¹½KväNMÀû{±‘‘‹’âCÌÜ‘»ÊÆ¡J¥ìÏ S–±SºX#».Q•>&wX÷ж áX¹èh*T¦øõàÓñ:Óªèhv%yÛј€c4È÷!*Î Ý7˸KtߨE–VtOËU|:çαFý™ÕѬ{ÿ”öâToÛ”ýxô9²' nù'kÿŸÚöÿ©oÿù\Ø8ê¿o¨SÐœ¦ëGö6 C…xT)…›RÐZ ÖðDÎeðPøÚE-8էבÄTi\éçDúŸ ¤Ÿ+¤ÿ™@úyé'üà{4Úÿ,1¿-¡ ìì>}õ¼vüê vx°[ÃLüú4‰“-©â%Qg\´fZUcs¡¢Å¯OÉx¿ã $¼c-ÎÉ8ƒÄ`œð4uô.qsñ]:ùG_€.°„Ú Ú¸ÍÀ ÿ"JÐálï²¾ÈÙ…|”ÉÑÜ?gÔb¡p ƒØŠÍ˜6«¸8añ•Ôâ µ71TáÛê[%J*€ùÉ©âÔ’Â9d­½”Æ2Г¨{Æf4b塲š§TBË?êqÔŠáå»—,¾óF®â-qzjÔrØ(¥†/Š?â‘׃ÙsM‘, >9Ü™ºà»×òÈœ†3ƒDxzú(Ì]šsÊôY º/¼îK§|nÄÂpy/^”6pyWZâË1îSùezhð·´ÿùß›íÛÌÿ^]YÅd/Üþ¿²\¥üïáÏÔþ?ŸŽ4ÎŽH¡NÖuwÝÙª•êC¦|IwT`‡| ¿ƒžWk¶»ƒ>ex’ζKNõÇ×Ê0ªkª¡^²Ò/bö –$aW&O°”ÏKmÄ-þ"ÀpÙüJÖ Ýj^7±]˜/ùÍáfZÊÄA„”x¾Ù_„¢ö/9’N*˜Ä<ÒõyÀ§O¾~¨:7ë”n÷g¯÷rËó6t{Ëž{ãð0DŽ‚³r/Äò ¡á®Amëó±j¹ƒ³]ò.°£(¯9\(žœìžÖ^nýºû¤ðÛÑÖé Ø䟰¤óO îu­Öôk—íA¦Ì&¨}gLÏ"Ÿüò_ÎÜì<Þ‡}l¿4GCÙæ‰v.`O„Á=#»`P¤-ŠÔ^žœFŠô{ƒ´¸Wî”æЊ#½Ü~u¼³wœ‚ ¤‚MMüû…I)l˜(ƒÕ°Ãk쉧÷¯£gßìì§>ʼ}þ®ü‡^$0ÿ¥ällßJˆ|l ½6hAFWâw€ŠRZtá@5ó³-hrŒ–9‡’‚à)\Ñùù»• Ê2 ¨óÞðÝ:ûtåúX~³Ýaß}Ĥö¢å^ú›³³Øé”±C ûì|dN””>cŠKÃÀ;4À/÷äÂÙÙ›3çlæí‚œQþÜß<;“©êÎœ9Œ-žsŠrµ;?ã…NÑ_š=÷ñßüåà/¨rié²ø.È°«Ødq( ¥†Ö”°Ó€tký¨öЗÎ<#ú“˜o­K ið´(R­,ÌÎ.-AÍTì ¯–0@bßÌΪÍÝp1ÍqÀ{ALÙà–°@>E¨Ecl³‹âˆ:¼–`6>—ËÐýA ¹ãË {¥h«çö`í…µR(ðË‚¶ˆŠö0s˜ŠöP‡ö0Š¶‡i¥¢méжd´å7Ýë·¥d$oþ}šø:œU‰0;«,o G¬UD䜃ˆÿ^ƒ¯ò>ûÄg/ÅæDÈé½àGx¡T³ÙÞà <‰e•J!’÷ž×½ì ÃóÞO÷ý%Z!1Ï$Þ$Á?—–žmmÿºõ¶#€à§Å(üyWÀ°ñ÷ÞЫK0ü« ‡×Ñs{7ÂMX¨Ÿþïä…Øu¾¯|™Çµ“]ØI·NKEr…n€Âî÷A¡ªùWµ­Ó-N¬xÆ2[^;ÖÖdH~3‰X†:Ù>Þ;:Õ휜níï×^€b½{LâQ*Àìmû¨©Ò;.¾Ô‚§5–êáàðøåÖ~ÐõÂÑñ®úvjå/óê Z*òË©è‚.®–‡óò =xR¸êø}ù1~RàÓJzΞ<)$Y?x¥_ò”1Ÿàò2™«Ú©ž¯ê‰¬-d¡R ,I„Tfçñ9‚ëaih^±ýUžbØ~‰ü2˜±j‰R8õ3.TÚzYû­Fç… ÏøR{‚OŸ0RèAüµ0#+`ËW.û0ÉÛýð)Ž}K»kŒC¤ÙíP¢?:  e}·'Í*-á¸$NÖþ€˜„+ÌR8 £é•‘‡SK»–ŠÈ,Êh·Jf¸¸Q:²¸?_d Ä`Ã.R_©ðc›îá•cf})ˆc—³EšÈ®o‹´0 6Py£@ßYóhåI+û(²îj±—ñUD‹ž¬*Á“* z„ÿùEêÀ'€x=økzÂÌ*Žƒ˜É2âÌ>Ù€ˆÛPÝ®ÌÕÜ(Ws®æ&q5—qµ'áWª@îlï¿Ú¡‘+€¤€Çy„õäÅîþ~)" pBŸQ@ß×›s4¬‰L¿ú€^œòE'Ç'¬ÛÛˆ’2i°¿ %’ÿÃÏò…‹lV„_ÙÛà ÿTØ?•«Ûß{zzx¸Ï¡q›A¤Üw/7··Ù3!ס>*—¯; o“sFš@ðV­›À/]+ˆX 1ÞííÈèÃøëøèà eÒÒؤšÛÛû;b” û{¿Ž¹[Íö{¾¿“4~AŸì﯂t³‚èNªhÁþN¬à‘D×Gð*ÒK€>ÖKEý^Ѫ¿^4ò8*(f¿°2(©Ü¶ÉòÌZ «‘”bOin !5.Õ7ÛÕ¸ ûêôvÔ¼ŸBMÇ¡E¨ý¹Ýù|pXâækaøY(9BK(Âr™kG%çg`7–ÚƒVËYùù;ÙöËd1÷òÒkÔˆåP§0½‚š µæ¦Sh.í¡Gô1†i‡ž|mï#´Ç+ûžBãÑÏڗܵ’%ôÝvãMè@ ÏCÐëŽì¢ŽçÖ¯x”Þï[÷ƒÓšÆ ÛÂÃϯ8ÎåÞ¡MP,´;ýù 6h7ÿ4/nØÑ5më÷_KÎ6ÿéîó½ç“Óî´½ënÿ†y|áÛfß»Fk0ùU7d¨ª€‚m!Ñá¿EW8îK‚g[ˆ£Ä[Ö$K+œ+°9‘C :Ïï zu¼ÁˆtZ¸‡y˜¼ÝíaàMÝøvœW¹¬,²NÅ{YXy¢Cçs°øW.^Ñà^ãÙV0÷)MË9î1Ø Í‹ ¯G‡NÌ4䣔Ð(èo¾K¡ë;õitÆ`g`6çø²‘^ãAÌ9“cƒ6ßaeMfÆÆ"’ñ:8ã¹@³x³Èˆ“À÷ vfÀ¾š4½y4y:Ÿ9£R¿ô®°{Êîhö€<¿°Í¿ÕéQÝÇ, ­Nϯ‘ƒoØõe~›Îe>µðëyk¿z—›0™›¬rfB€âÄ5üÍv'‚581ã©®´¡§_3¾~¸x\c—Ãk4ÞK‡,ñZ£GfIˆÜÖG÷ÆOEFöå¶ÙÓÝã—Eô { „Ÿ³Ó6r}¶8VB†c†_  ¨ev6ÊŒÖ 2’¹ÿïÍòÆjõzNpA"öp%|ˆC«ÊCBöp-|x})Š?” aœ2|‚ƒOÄùððC×í_ÕÜÆ1tw€ ›©t„°ùŽm‹Áô?sþç üw9÷nCÅ‚”m Ýpg?0ý‹él7¾u¾ÌÑ ÈC":rnvö›ƒô_þÒY{ÉY# À\* xÛ™>†" _ŸÂ“´ò_tl‹â4ùógÁ¿qÊ | ¥ŠcÂ7|O‹>쉇A?&.<Ï;u" ÈÉ¡w xpÙ¾[,•ƒ}6zõFI®ŠÊˆ"Áa/ãU= ôpíþç3óva?[§ouÙ‚UÀ2(ÔX €R€½&Ã[™½–Ê¢;Ì'£Õ¹TÊâkV˼æe8[” Ct£Y$·Ÿ6È™qùROÔ©xŠåãe7û *jòɆòÝcÇÑÙCî:ènÔï°Øæ2ˆè€cÐtEryáSd…î‰>»”Xl¾ð·LhÄ<«Ï|¯Ž¥—^ãЯŸœy7b¥ßó‹%qŸàOÁ@S \ —eˆOŠ[¥9”‘¯„Ø¡“»(?ÃvRAå²2¡øѲôèKð9p¦:þç,±ÙN©Ò›öÁÛ7‡·KÉtÞRÅ7¼}ãí¾}㟤UžXÇ—@™çXÁ9µõVh‘GMóœú›äƒ¹[›ÖüfœËl)9Pk pÿBêH˪Рäl³’Òú”¦0ÐŒw“Ñ… lqþÚ¿Ä®`ýÈ:£HoÖ1ŒOÿgŸ¬ã8`¼EPÖÐûˆs)îw„=!cî¡ŠìÑçù+Ð%½^´ ö”!iyè©¿/ûW<Ü’É…¿ºÁbúhƒÂýš”ŸPB`Æ›œ*ñý¬}Ö. âXíqæ®ã8SÄ ïøÕAñv×9ˆ"O䬊åõÇ¡Æ!2ƒœUÊZÑrôRÊRñçóÅ´²ÅEØí©}¥xQbê³³ÉPÚîD8+ Ýmꪬ@;¶’8@0>TòÖ´¤¸Î†Fj³Éô`ŒZêÀ$L“9p%Q†-5µË¿„ÃeRŒtR&xì±à÷Ú%NÑM­ßì·<Æ‘°3é+ ]\#@ÁØq¾Ã`±+Ú*K›K—Ý!|vÈ]¾\’„²ÓÅtZn¯écÙnßs‹<ùÚJšÑ¡¼!ýžÛhâÈÁEµµÁƒU×õAÞ*{EìMaÑgèŽOö^c‚˜K.Þ?Ò„‘'âŠãüÞé½±‚f›è¸{~ƒÃîy ù%h$ó?!ó~}²Ç\ɹˆiâ¾÷Š%èfÎǼq¬“ü«šhV\A,£P½à¡»•íŽ,|‚;äÈ[Ú¦m-^í„|; t¤5ö¬Æà™ä].“6^frN1¦ 9 I)_ÁîT&GÖ˜«à›{”¡(â²Èˆ'àéi?-¢ã5 f ¢{=ò‰ö.:Ü€&6Uî]HuÐÿ,ÖØç;'ˆÅ€´Ó»¡ý‚%«»Äþe¼˜_3ƒQ¨ÊÐ<ˆöº‹Eëûý BöqrÜ€qwèÕ ,ËŽ×+‹´+l Øpn½d6šÚîÁo{LJ/wNa_»À 6lÆñéøb€”¦+÷ öƒV~ì¹Ý.eãqûä ßjagt;~TRÙyVZutêM’EöŸ×øaÐ1´³¡õ¯nœ+÷ÈÐÀÌùä!¬ÛóhÊ0–NÔÒÆ þˆ;Iɉ<.I°¡¥,@ÂôèÍÀz°Áõ^Ÿ›6ˆFqöIe†ÄðjX"t~¸¢²„`1FèÝdèؘ Ì&A± ¬.Ž‘Ì'3?3’ Ùî¶é A;GÍŽ© 1ÃÙkÂþ­–/ÝÙ;®•Ô÷ðŠD§ÙÙ_6°ÙL dÏ^C)ѵĚ.yÌ“æ©mpÂqÅï¡f©HÆTÞ¿¿IŠ$ßÀ¹¼97ûdŽµ["ƒœîwöN¶žîïÖ^`¦ºíDxà³^×s2W†ÔÌ„£”OF@ƒV· jèÃ×϶öö¹™ÓOÃÎüÈ¡-Ü¡F;xÆñ43!æ¹`,IôjÁ¡uÒ$ É%‹llùÒ!Kì!i þ•×j…ºCÇÁ¡Çúª"+–2…»`â«žw Ê^ÔŒGÁþÒó®;`¾Ï7+^eÑÁ}냋î:­›E=nœ>;‘!à9s¸µÏÅ‘–èäÂ`öÝa| kŽ8ƒ\s³hêñçÄÇU§[°(–]¶£^“e¹`|6_üTît‚œÏmáÈÜ`?pÛ˜ø£lýε[1”ôicï!‹þÐi}ÀGìü¤Èº­cƒ6A E5«Ù®ó0všBç.x@D_³þea2=RH2~ë..šÃr cziD0Ž Óv¹-¿ãÌ‘¥ætÞ—‰ß•yñŠ5GÍb0 L•¡Wšu|Î÷}¯Ï§ uß›é3ž½­‡.ì|æBOB{%ŸHRµÎ°P¤š{§ áðôí]áxwûÅîö¯TéŒaÝx® ¯_Ÿìý¶[;Å rò€aº>W© òjïtKqWš²?À~ØûÝק»èoåŸ0§»' Íh7¥c¨â8ÙË‚p2i¦ mbì4^ÚÔø!:> ˃/Aן˧´È C›<í*BZæïæd?~s¾‰/6Tý‡ž³&´ÉƒáNþ’5_¼Pp‡Ç»¨‹àÊ­u²¾‰ˆKêûÐå,,².zÖ+ u~eGl5VA!yÀ¢ŨÏeLJÈÃBÄÇVï‹+Dç¥w–‰E´ÜwÖ¡0pä_åCôÝ×x¤OŸ¡[·˜pºÆiÎ?¢,z‚È_#p¹Ø=~ ŠÇéìuü9@³¢XîÕé!úûÒwþ™= ˆŸ„ßØ ˜ÏY@àÖï¿Òƒß}R ‡š'ÛÛøië„}Þ:aßvv^î슇ü+{Çâ»øú‚Ï•!|, ŽèëÑ}ßóÏðôçäÊü;=_ž(÷-<¿øí=*è;~‚'ûûèdCØGxvòÇËW§{ì!ÿ O_½‘ Ná»—òâIÜ‹žìïà§`ÈøGx¶÷ôðé¿Ù3ö‘ž‰ì›þŸ²G‡ðí Æàá/|;•qž†Xaþq‚.VÇ[ÇÔDx«æñ“ÂË­½j<}Àï¿îâ²eØg|z°÷ ùŒ Oyï™+Ø'x"j;dµÐŸGkÁ“GkO <Œ ŸMüCíé+œ?‡Ç§ÒÛðaw°õRF@ß÷8ÈÏå÷ìI,+Š‚? a^ïËïákøŽGZÉïù#„‘#¯ˆü öˆkÐ+öñIáx놱OO '»49á~f¡Ï샦­ŠáøŽ“›¾ã‡'æ! LƒÏYùû“‚Ô†€v÷ÜÜqñ…ü½e›ŒxÄ_ÃgÙ•W¼—Ÿ…P*Žð @Ôk ¢°ÝA|O_ŸÅS‰ç)xL8OâŠoïì]ËsQh¯5:}ñ^zÄ`þtúAiúò„{¥õÄSøø„ÐJOéË“Ây³Í[Ê>=aaeR8 3s[MJ»øDú*ÞÕ»ƒð |Ï;RNýÁk7:½ð ûÎß Z‚ ŸðìY¯ÓéKÏùWx×#Ç>Á“Mñ„>=)`À"ZZ@Ï gËð+ ž ƒæ(”.hzø¿á ŸùÓNÜa£¥¯ð®ÝâÄñO J æ“ð¾¹èéã)¼‘=ßž‚@Î'ì= C7Ÿ„ßà Æh‰*ƒ/ü9&GUÞ‰O ¨O³ì>)t aJ£”O ÝÆÁ>Á“`pĸèC.„î ”ðRŸpúáT÷Å\gÞ}rÕ'O !'À¿ñ18L< ¾‰K9´’]3Hþ¼å³(ü¼éÈ…:a‰p6)à½àfÒôŽ>“ xT¨ò?™÷…w$€H\üØ÷®»˜'œåååDÁC5ѵ¤ÁiïTpÔ1sÈïžœ”D_õ¥à"·C4ÉŒ‚Æ0´½à¡ŽHå"¼eßaRt>†‰ò|t„}újo_öyΦµ©|ë(HPh8i€’>×”yüž& %x*t*|–V†Y·¢¥X̪E°S–÷·*©±åÝujÈ‚æý"b$ÒS5ÚL;®0ÛbŘ -I'%Ç(4(îî†=Õeˆ¤šÂaµ]2.‚d4.ø‘´ºs‡¤ëª,ÌZPääF aI Ó*–ÝëB¡ròêÙ³½×»'ëÒG§RG§æØQ¿óÿ2ûƯâálAkôXçzüÛ=®¡öÍffBÀ²p4SÂ¥þ'äGî1¿È_¸c÷L` ÓⲞçž-^Ió‹t)ñ&vÔu¹ DÏQBBã0eé@dö‰ð-ǃ•eîY΂.šÜMn&–/g&̯1#ÒkÌ0«]H*ï2F¨0Ÿ`äžV6/ÛŽš{,µ3¡ï^ Uk‚© >¬§Ú¶ÂÙÉ#ÄQTø0~| ~ GeA Ç&÷¸ˆn QE»/‚‘› +*±ØÀKí1û„ÏG5ŠŽYÀS‰Íš5‚¹MR;uÝIÈ9$Àû N_¨‰ 3¹;X«1e‘kWs~ ”ÕF“+ŒV¯ãz¡P³]¦c‘c¦»ˆXQócб%?Ø,2÷îð v9\ñÅЗ¹€Ã álK¾{ò¹-¾ ‘ –ÅK½³ðgŸó—dá!}…‚.ÂzDâQÊ‘ÇjÚ aÉN†€ÞfuëêäqŠ,±„‘e¿–Ìè` ­„eSHÍö°žM˜€\¯om¨®ÙqºLÚoL«¶G"Y+‚Žˆ„ÚG§4[ ¡¶6š)#­‘éth›¤&çXWƒ-£ˆâÑõ‘öèÔæ¨õ¥¶&†h[®;~¿uà ŒÖTf/H9 ¨8&ÂõÝsÔ0Ÿl½„60«ãdãZe ­ñ܃)OBg8êȸQPéÓqŒ?—äÇŠi/*¦B´Øõ=ºp1Utw{;È}Á¼„[7@‚(öò„Iø³ÿŽàß3'¬fv¡rÚíPº/ ·vfJÅìöKz²Ò ²XAû²wáTà‘ïÔðw¡°·³îhÓ«{Rb›Ò†sý¾Ù€ÊövœÙY–À¦€éb€ÅÁo<”Á$2ì[¡ÀŸ­‹TIQ{ƒ†ŒÔ’iîÊëy›ïºï¤ó€ÊÆ¿j^0»žtZ©ö­cßÙÙA¸Yß¹÷gÙÐÉ¡pà©zfg)§T9ä¶ô0=˧|IfKže†~QÕ%ñAžzê‰Äð ˆxR :Zœ·´ŽŒ?‚™em™¹hêlLëbPYn þ PÏ1®&Ã'ض¿¬³%ÇWƒŠŽtåóp2qô#€é°‡¦‹6}ÕLbö*ù”«(á'ˆØ v~¤F†ás•Lÿ?ÿ?È£~¬°œ‘’¥æuÀ1)á°2%çù1ûsòÇKøMÞ°Œa|nnXÄpÃÃ Ú gÏç(wÀ»Ç¿ê Z Çkó™U) oGã¯Yj4[L„©N|ç÷*ÿîµ›ÈÓ -•KIEt­\õ“TæË"ýº -x X¾°ýƒ±ZžÇ‹1„öBJ‡¡ÌeÞ`WOO·ö×q%'c*øyﲸ‘Ke3¢¥€ð—½v2Vc ‘³jmÆŒZ2¸ÁèɧÛØ‚õoå']åÈ1xôÎså¥Ý!ò£‰ì2,# ݃ …ƒR®.,SÆtÈeºÊµTTÃË”(xÄõ~á¿ËÜ'%µa5©¹mÔg岚‡úˆé#ïÒU=Û©ïîìãQ.º’ú+ê)t—úBí-z÷è,îÀöVÌM:è®Èµ¿ØË@‡EN¥cëRçNY qÝJ  þÞ¤gZgý4û“Ü^JrUJê€H*§Ûî…Hu5uWHèh’(£N‘o%5t’uW Hî¿øËh‡&AØ÷p“i—'Òpûc¯:kPè´„užE‹Ý<…’í-"Ò%"LÊìtµ8¤Óm#jL¼h¶µpN¹ÓÒñn®‡ºÀãåe¨vèÕúÕu§á ¾ï}:Ÿ¾8g:#¢Ü<éŠ,ê²ÐÌÙÀœâRïD,]èçîqD0¿_$zŠx«m è ÆÍ€"ÙžHljæ«ÏTM7¡ ¸îW3WûÑ­…Ç裡9151 T²%¸¢ižG@PT`­;Aà¸tÛøºøbƒYÜ;¸ÅG×uGþ&¿Å„Gá[ü†oƒëwÖà#ù …ŸÃÞ|’E ¯3V‹ÀÆûOþ&“HÌt]ñ­VOY¿Dfcš¯§#’Z´òJÁt s™RŸc¥›eé ˜#‹œBÝKb‹‘Ú1ýñ&AâƒÍ°Û‹J«.šŠ‡(eÃiÖÑß)jd![ܾÂ}Z´à’5M_PР04ëÒHÓî¨H¤ç²³W–e€ÊÔtÈâï‚ ^i"KVŸ$Ä”9½ U(\»MJ¥ïõÊÑðÛc)´Èy·`âÑE6b”Ââ>Zv¾W Kfnk>»ë†çpvoÄí ŽßõêM·å Û°Ï²)‘ÀT)ªÝ§r@¥iæHmXwXSȹ‘Ï”üŽÒdGqcƹ-OlD óºŽ8²ÁÀá9Œo þþ. Itb!ÅNl6Ñv¦ø0Pñ¡É£¿ëJ·îàozÎ?¬(ç²Ù‹ç¾ôa½Pˆ0fù Ö }Q6 Æ£—ž0Zäo ™¶ðÂÜ°€D«ò@*SRúÖm\„¥á‹R˜}—¡} ØWa}4!â«e݉­ãé )©N+'im*>ù@Bd–ªßÕ÷bŠiXvtÂóuP(P¿Šþ úû÷›è/Y\€¯ÜÙ˜ ž‚EGŠ~—$GÙð¡ìыÃ?Öv?,ó•¥_XŒ‘‘²dôAÔÒµ,½â MȯZxŸ‡ãc¿lEêBv¸T‹K™/gZ¾ÀV­Z±tÓú—0¹Î¨KZ^Ñõ¬ˆirѨØF$EV®²RåÂRq™Êë2²Få’]_]“ê´P¤D©Xt^¡[<4½”¼´Ë%²44Å‚áÅò†AkX+È[ˆQMc.fS°`"’våèxw{ïðÕ‰¤¨aAÊÀõÔŠ@6&ÏD]êü%Öì“wòBŠ´¿þúõúú¥3û‹ó3¹^ËÏk=Nnù{ €[§}<M¹Éo麅ä×ÐARPqYH8‰1J JvÇum¦ÉÄÞcòÍ‘s÷¬(¥–»:+cy²÷»5ìhöuûô£Ýõ­ÃZ?x Cž¢#e„"}, ©Hm£òiCi„ eÆØtãè„$Í:[<†)ªõú•Û‹`´ýæeÛk,-,,)¯S'›%&ƒ¹g‹1{*ÚÓ8ÎÎËœ¶ø2æmÎ;™·3m&¹ÕéõSP«ïÓ§¹-.“‰nÓ`ªç s¼˜=¬1fMø¼cs ¤ÞÖÔ´™ö µ&`6œëFL&¸"ƒYmJÑ:&{R˜¡Éš´V<.¢Æ:…læd£38oyqù…=7•lmИÌOt³ÔŽº±uXöä°A–5os Áx ¼…)—6“Õ¯¹¹ Iç“ò¨¦ò.Óñ œß¼^óâFÅâø7í¾;\WªêĪÒæÕû‘žÒÍŒEcúΛÕÊÃW+VKÎüüà Jîw0šY\ºêJ—9Òm‡‡ý±é{Ž ù Ö×;3¦û“ÿ7Çí;8 ýÙåÏ=ÀUgwð*‡»¯Ñ7{½ð¯éÏÈ?JúòãÊZeMd©¾x¾?Ž:–áçñÇø·úøáªü>­¬>z¼ò¯êÊã•juue¹ Ï««VÖþå|U¹Ì~‚¿_Éσoœ¥ófä@¼J¶6& † Á‡ZwÛv³î¶ÄREÖƒ«Øq¶;Ý›]}ZýñÇ•2 Ýšó¬çyÎIç¢ÿÑíyÎ3¼Øœ.J_töÚõJ¡€¶ú}÷º»9‡ðåjµ¼¼6G¬Ïó˜§üE4>G³áÜtHÆˇ7¤ÃpÛ%<íë4ÕÑêP¡×ãwÒö®ƒ j‘7=§QZΰåfÝÙoÖ½62!ßéâÿ ¯ ¿áw×&5dÃñšt7<ç‚Ϊ¨‚ã[t:=À1, Èîñ˶Kt×.ZЉ¢ÙüŽlyØÀà>Ü«N—_4 M¦Ë¹!|6ÐE ñÓ‡¯N­ƒ?œß·Ž·NÿØnz¡«çÞqÛÄЦžÛîßéPøåîñö (±õto/„}¶wz°{râ<;]V + Kè_X(P(ôfñ¬ð ?¬;³ËΛãӽ÷…Âá ß°Æ«“Œ„G>Rœ©Ÿ½›½ö(_ fàÁ>,v=ìÕó× ŽS¾ZtÊå+¯Õ ƒº=Ö•ø|1¼9áû,¿L¥2éìb¡À1b_âä•ÇÑ™Ÿ v­ôKÖ4­òlŒ´ìâ;ŸÏ¹,KrH«Y$&Ù¢ôÙuê=Ú9 ‚»o0)™?–ËÃæ¡gpX7‹…ÓÞ ›%|Ì…¼ÏU{×Ô,“Ýíù^à›Ó‚õZøx…<‘¹˜òôpºðŠû²g«€†nJR&ÌgþSu•ûN)¸ãš­‹`\ŠÏ°±Á‘ˆ)å>ÄÊñ—ñR4·±Ò+ªñ*V’%ˆsJóÀ9éwº|ÇG–ŠÑž0TÏI@W …ÒÌçò†~6|šaÝVD!z!FѵfJà5ÏVg±!”#!€&WTGB#á§KÁÉ?µdEx€îÀ<áAA©´ßéC©Æí]®1l\©•G¸^4Aèë¹]gŽ=˜"VœêCœ'˜ðò𸆾R;Ø‹üX»‡m}‹®8>ƒpAà^†[+m¡¼¦öj’ØÄÙËÄ·1Øë°Š`üÔË}áïEYÁ@îíô(Ššù„uPÈbÁÐ d$”‰KÈ¡¸*ϽVçã"¿xɸ}Þ­_‘úÛð`ç#á‡ÔA–„ê¯sá öúÀy»UEëÖÍ¢óNîŒ9ÖŒd× çÝ‹C¼:|{®‚ú}QÚ…^Þ @² 6H.ä´5¼.XتöHЂ±ò h~¨¸aM¥žjû]xÊûß Äè"  Z©×1º’Elαñ-âøÖa«Ø<Ã;mæ™[ÑÙ,Tútåg)=Nï­ôV~A i¢œÍ |Ed¼Ž\Hùj­ÙÔ[…Ùa·ütú’ò¶.A/ð“fòn~píúïåÇ‘œë÷89˜ó>+°T¿|M?Å’\Ï»0;¤÷‘-OâɆóÅùü¹$ACP×w_2h ¬fv¶Ì_â»(]ØZDZ’‘*å˳³é±»iIÿîöÚÀªÖùD€ý&&Þòhm„3…Ö·T¡Ä`iàŽÃV LûpQ…ó Ã8y‘àLAcp}}³‰´-ÑGy>Ö›ÅYzT©;üCG|èy-þú·À6y=-Îò5²i£Y\,…<EŠá¹Gˆ6XäIé­×KøWÿáG§þãlÛbÑ"ó³ua!‹PT/9áÄ€Iò6x(óÀ–©ƒ†Õ‹Á¶ÀBð/Åýl„NæâÒ(–b"Ī lwj‚-ÂRaƒZÔ,Ì £_\\(EiÀŽ¡w ôR}Ç{ppP.‰pg#Ôâáÿ6YëƒQÈÇ€ÉœÈ n@Ï.}x2t>¢Ü†'×tŸžì ËnÏdc˜¿¼rÿj>iwê•Þ  +^c€RÕZyù‡òÊZ 7ªy»±Tqû}4fPuÉ#€žÆ›³ø{]¡yH’#>¦]ëÞF^{¹µýbï`™µ¡|YóŸ?;*ä ý¾ÝùØæåw÷w·N¤ò½¤òR-òÇÉéîË°¸)–çjq~±xXþCRõR”/ðä©Ÿdì_Ðɾ°ßl†ŸANÆK ¥H0{Š>ÑrëïÉzÄç Ñÿ;€ê6ëïËVóÄÞºö–%¸Ä|œ°1Á®lo²EQzfïéö&Hê…ÂŒBŽ3y¸Öw~ú©¼{øLZÁ€Z¨É?]?FæW®~ÆÇÁ.9_«½ÚÆ jµ¯iPGŠÒ[…p¦×Ç7!¤xB°¾'Q @2¿(ÌEœêw³ª¬³ri4@ä¤ÔdsÿA\sA”á"¬ØKÐ÷føúÃ…†ÒÐ:Èð¨£Ô¼l“…)ª˜ÎçÒ­•n›ÔT:˜MúćV‰0Ÿ¾_Ö##|çó3|Àg ›$U®x}XÃë ëlR°¯Î|ûÜo”‚t§Üô3ÿ‘t·ÛmÝ ‘ ±43Ù^§‡åI½àšjÐ…M`ÝY(/”Û^0z­‹…Eé»Ûô±œSï\\,&>\…éÚA8A$T¢ªÝoÝ`yD·úã_»ûÏäJœD½ïµ`G#Ê:8 ð„óÌøÃ"aM™ý¡ :4K_ ï>â=Í3Lr…Íö¼ÙjöoˆH\2m$C Å¹†íÉm7ýkÒµX¸3C¥ Âcêwš¼÷1»l{®OÖ¨f}Ðr{°Æê8!Üó7° ¶±(òÀÀ@„Oh,R·õѽñ‘ñ£\ S䜢µâ5áýÖf‘ýE¡æêcå¤aLqíöêWÅÂŒ2Íj[ ŒWZ»ʗfy9e-|@K¿— G»8§¦ô.Hûü)^#›«„Õí]{ç8åˆÈMúZæHp£@ L ¿ZõZ!ˆÕÒ‚œË ˆ‡*’‡-/$¢mšR€ØÄ îÇžÃ-90qNwfŒˆ)D³‡,š0¶W éˆ€8Ø"¸™šïÚä®ó~_øÜ\ýáÑçëG?¼ÿÜöWWÞ†.Zøìà ­þàw$2{”†h¼k5 ªVÃ5QÞZV&EsÎZþS”ƒ‡L˜ašû!šÉ幫± «5=пv·Ÿ=ò“ö€[ÁÅ3²žR%@vìA´öŽ/;4@¾³÷ú×ñ76—¶õ1ð7x„BÛL8à‹\.6Ö'? Ç';Þy»4g|ùÌðî‚`~q\˜ ¨’½StÛlد°ó  Gp r¶‘á2Þò€µ½è|ô>ðýƒ±q{Ah,ûÞëµ½à¤X¶-:~'ï\ðH•e—˜ï ÉT÷rQÌ1¿Ób&C”=Êhº‹Î7e;¢Þbͧ>ã²9‡Eç¢=*Þò D‘ ïs`y]zS®½­,,U–p;Vzÿ„ ÒÛG¯jxþ_~¹uðêÙÖöé«ãÝãò¯»Ç»ûåãÝã­Ó½ƒç|o]g{? ‚0JwQëÑI s®Ãc*¤¯&Š4$T‚LmŸøø)Ï~êø_f?ñ–)òLGÂ>´þ´ #}ÉwrëF®æA`à•%ꥵ<ª|NðÑžŽœ«ÊÙTpxs2:PRÞû÷Þ% <é´š Sœ>g"…±ívëë/›½Þ.,Õ^· »nö (ŒãI¤Ï¡Ûê^¹ë‡'Ϫ%SÓ•"´rÖ*˸(#úS(øÍ¿`-”?À¸»ß;sŸØ¡Àìê—`Q.<¬,ä±ö%¶°·êu³Iîê8Û(±ý¹(É$]¿GF¸kž{ ä¸Üf‹X§å¡ÉKUîN{ƒGk\E"©°1¨GY Ô>„ýa/<îeÜy(EôAan3rî1ÑRªU—âY‰¿azÁåY(Q6«þˆ‚(ÈŒ¤LÆÆ$ Àd¡´³ \ckÿèÅVM0¹ÿD«©‰?¶9‹üF°ávÎæ+ g%a ïô* ³KgÕ¥.ê65¡Ä¦Ö2òâîokÎüJuùÑZ©Ž«Ð¸‹TY1”¼òЦÀþö¯àÑþþÁ°ª¤šV‰÷á¡Z¢òˆ—ÙJ-ô(¡ÔÑvr±nÝ•{lXî±RŽj[Io—ZÓ#VÓJF»Eê©ü°ý”—ÛN-÷C´ÜÖ>/÷Ô®Üök^nǪÜ[¼Ø|û1½?*e©_VÓûRí•Ç•y™ÔzózFåµ+íPèB ;ël„>'÷[ ŽËQÀÓdÀ‹¦j°|¨Î˼Ž–AG ˜7m¤‰ÇE ßcrÈH‘-*Z­¬ ¸â;EøT$±YØÌ*I;ä厡ÜäCó¥ÿ¼9úíôõ[ àq¿çÌm=ÝÞÙ}öüÅÞ¿ÝypxôÿŽON_ýöûë?þoΙsÏë ïâòªùß÷­ëv§ûgÏï>|Þü…ûJø¨ï¾Þ;uèdâÜ»@[nx|§`—ÌøÝA¯Ùàõ.í2l9fîFn]aû#™Ìþ‚éMñ”lÎYI'Å[±ƒná°ŸÁÎü{´õ~íàTZ@GX:nÈ _ÏùÎ^DÆæÐÝïŠ\¢\&J‹(ѣÓ½×t5í+¿ËL3ñb·}驦M¯šqÉìÁü `»`£„‘¢ÀÒÉ2ÁèUsUåäGÐú…$Íá2%MF¦*,ç–Ú¹þpy}µ¤Å‘ÿØl·û«•‡já­ë楻°þê`ïui¼µßÖA¨Ô^.7ϯI–õ˜G@´Ô_K¿½”Ëø€ƒÊüõáºãÅëX[^ÖÉT‹/#’(%Ç{'Û ëÕÊ›åêÊ[(úöš~½9”ž#Ø».» UµË $Crì]/®Ž¿ÎQ/P…‡'뤢÷´Šæäxå—åêú‹½ò«×K/Ž°,°‚“ã–¡¹ÊcòªÛu«•jù 4RЛàï`xÝíªxùöÛp#}¹wÿ~òò¨¶³]iáºï=ïÉÇ.¨×Ë«•]÷â¼â^T®›-g~×í ù¬âl½÷J¤& ¿@ÀFòäÁÞþn%<*¾›_b§ìEµôãq‘Ûï‡ |hñeñÃjA˜#´ dx@«„Ü H µj½? fNý‡^d©íŸüò¨Ò*}NS4•›õV¹=|”PŒ­r\ß+ 뱯ƒWM¿é‹çBß`"lpFä”»ï)“ª+9±ª‡î3ìø‹Ñ€«h¸~2h«ó0¶¤qÙ€ç¤\ɶ0ü§òvë¯R{ýA{í¯ t›õH]¹­±T± Wû¤ÛèvZÞBrÍPjäš›?<½ukÐëôÜW¯ƒÊáñÐkGž‡lï‡G¸}¸ôvÁBX jÛ8úHËÌŽ'¯˜Å¡ˆÃ/æu%Ÿt¡s3¤’ZÆ<ïx^¢GkhùàfW¿"lõ¡[ PƒçÍâF8‡ìˆµÚþÑ£µZ suœªÓj¾÷èHÁ*Ìô‡WÍ!øØé½÷Ù½ xØ ÈòŸxãDÏ¿Ùtæb‡ÅsÎ[ù´ÏXÙíÏš AîuãÑÞÛŠ÷Nj †ïRñgsìl®Äs<ÎoožlfXk8Yk¼Òi.ÏØÇØX82Ã|QääLŠMIõçÌ8WÊ#ÁÉ3÷áj‘91±›Qñ×ùèÞ”ð­oþEæZÂø4ún¯:á{C·ÞGwCœ$ &pÇ©ÀœÀ¡<‰}ø¤uÃ}‡è¦Ë k3 ÉZ%i!¯Ž£c$#O1äºd¯+¿êö' ýyþÂç“5ÅFœZG2ÿv»ndpgÄÔ{é…QIܲ­úˆ²Nx·V©VVËÿÞŸÓ´}Ðîø™ //Õt­^]ˆï$d˜Óù€àÞ ›™Ücgè=€$Tÿt–¼~}éºÓoD W(Æ÷{󳫋«¥/sêÞÏ/.+Ƹ$ Å!9©®†C'†M3lqIÈYí Lí8;‚R‘ŽO(Ɔ[þU7ÞÙ ¼ìzC“g§%~³?`^oä Û<8e̼Õì÷[Ìmz€œÌÁVžÐ¡(ÇÂ1>4{€ }‚ñLä–<ðyéóÇ«&Lü&»æ“-º}\lý"ž&‰/^1ˆ}SB$ÜІƋÿŒbN‰'…ç€Êº›Ï®h-b³ ¼³µˆ^Èô#áQ-ði¼Åª)^ì*:óHº$ÓW¬êó}å#OOŠNÃVz~Þ´린¼ºTI1 ôµñˆ<8o‘S%à&Ã¥t¿,Ç^’q¡+óœåýùÆu ñrA\~ŒmÒ<>Õ,cz_ƪ Â-Äk\¸•Ú.ÜÌQµ¾ð¡Tcøp”ú@-q#µ‰Gr]â™®*zgPÕ•Û€MA©J<’«ÏtUÑ;“^T»O­@:<÷Èì2_G¾ÑQ3ÖïÝnË+ó·éx¸ ®C%´s lL[   MÍ®OfÄQ5o­²ª+÷jÿôxﵶä Jj†,þÛÖkcAFòÁãXY^Y^ßÞgTÀ8­¬­†ßÂz«Ùi‹Y˜.{n÷ª †Ys¼KV†õW/÷ŽNh†óØøŽŸ¢#ðCÈÿÌ ñ§ŸrH üÑѹÞmÁ6ÿ ¡‡úþw*W?;ÎÒíE´«_ÌÓÑI¿Cç2 K˜Y®OAPÎ<~r{—õE´ÔõœøüáÍÛ’ó©ÀÝÑBP†˜ÿ˜ÛPŠmP1æ´&ùÇ9óW¼Nz€<…ƒÇØ5»OK`ÜÞ=99<ÞÔØê¸c6 ZÌuý‡ªËËÎ[\¹ÉU€(Ì(¦7²uü|÷´ötï`ëøÚÞÁéîñ³­íÝ/C,íÆ6y­‹!CÞ–UvˆµIÆŠ°#—eD_#âžXôyÝ× K ¢šx”\KÔ~ûò‡Öw:­.h+|Žãè‰À;^UfBƒ½ÓMBFsG̯Õw(%á€XM§×놑¢þæ½ï÷:°LèEñ+xý›†ê¾(¥«ʬ­§¤_ëˆ$^ˆ˺êœy¶A„ò]XÙÌU¡s/*ÿçô/›å&ˆ?F†ˆË¨%âþ³¾µ÷ú—õ7Õ•·•êúJ‰t$xä¬TV*UT7Ù—*|Uêøtéh £¨]²Z»Ð\¦a‰àç²ùÁ£3Ýœ+Pµé|ÝEšaõG2q®ómdNØuüwsEŽrišcÖÚ…aÖ£ö^NSĶë>Z“ iE—‡NÀ<:>1ÃÒ Ž>öž¾„>ýMâ0è]pô!@¢Þ…•„µ”hùwQâäØbš’½B'›@6Ù<Ï;þêÊCF=—¸tg Or’|e‰T/’ÎH10¡—ؤ®_\b ¼Eñq-63Ÿðš¿©Õhªuëó%zE-š'ff¦;èûóEù¼š¿ ³îa‘ð2ûÌ%º&6[êщ*ïB/Þ€úÕòyíã¹Bw°¥h°ÿ×,û_|M=G‹ĹðŸÇoÖ>züºç ºCííÈÎW-èpÊÛ{˜…œò‰äzƤ¿êŸ™GÎÏVòpƒæÊøÜ~ìÂ,úVù%ˆGqŽß=žKì,C6xÖFeÑs>#X‹c+´å·ºÝôõÉ@ÊûÖq„*½¾WÁàç3¿> Y~¶.5tÊ»Á_bâïìÒòÒ¨+\4ÉpqKLÿ;¿îõA€]#óïgÁ€×…5Xeˤš¯é0,h˫ܘ»2®>áäï«!æLƒeAÄfžÚŒ» ä—Äú£»ky=¨‡ªG+÷9><ÑõØ9Ì·2Œz¤ÏvŽ^/­ü²¼¼þ´rX9©Ä¬+TL³Ëÿ8—Þ¬®½…}ꆦ®W+1ãQ7¾g_uaç‰ì\+ ¸b#&Ê>züqT~%ZÿâèÕk¶Œb*o–ŸŠã}PWhº§ZW«¿8ʬxqÄÖ)3)¾hRó$x ø}Û P%ÆÜÕÅ~éõ)œ<8adgõZ½;¨‰4ïbà'ÛÄ•ø"œn,ì vÞìûzÌdõÓ Ñy*5¼÷¸ÌÿpeµtA‘yˆ,£#žÃÜò¶jh)ªÖ–¥"?ÄŠTuEªa‘Õ•RÒ*’Š¬P-3ÝRº%bSX©,·™÷ ¾~´ý1|=7]d«ýCóÖ©.WVˆá ÁÂÎoX ?~þÄ1±³§bd$Š2Ž¸X0YœAy†Ùlœ­ výŽ*æô°oP ¨ô´mxÁ¥žÐp†ó÷J¡ ê,*qÒ(v:4 ƒÔ`¾Å@±S„í',Í 9TJšéPJ´žB²œy(Êd4òê´[wP s惹Yâ±åúÕHjz˜rëÙ}¢PŒýÂdE¢™¡¡]®—fœR1[]‰‚µ#`@…;hõ£`¨/á2’¥õ›¤±•5"k0˜Zb]ÿEÌñÐ$ÈÀø<ÉE". G3fˆÅ)‰Åá†xU(ÊÀH#­Mɉ˜›CÄŲÅp’°P <N”ÂÍïª;.P|„+`x|˜ˆxåù[xÚ3̘ÃѬ®8¹Ë:„((ƒÄgZ”OˆYPÀQb²',òâˆr©„ápíεìÇ×9mVMP¯;%g¦€Ûü9ÖÕjee5O}¿³Å:;cØ _`Ëâ‘‘Ü]è³cîu#|n(B’•W,WñíA1U)¯“œpÄ´Äã&è|Ѩôcˆ˜õ@ê²ÄZW—./0GÐõto°ô“íÆ‚Û »é‡ö•OØAÿOeÿ3ĪðˆŸEû_ƒ²‚É¢sîÕÝgÎ{'°åÕ^n?úáWÇëõ:m¯3ð[7ÂòÊ –ýÞ€åSw Xlë&náÅ{žLj¾b±Ÿ‡ø$s‹` mªÄO„½4²…}">e°…)¸½…¯ê0Äö4K +V2iÐí©E¸åöKp­Ô‰ÁPʽÈ3•"†8@ÃÁÄud¸™Ÿ;i-0tD4ct>”@’F+zªS’žõÃ/oÿøV~óÓÖhm¼¨ŒP-¶¬-¶ðã/¿,¬¿<Ú]jŠCæPÿ–åg<×]/ªÛ_u±9"ðº¼%Á3M;:þEÍMÕ±dF• (ª‹‚í˜;ü¼Uò¥Ç&@MÕë÷±‡Tø¸±«‹N0õ…õýfŸ|84n÷Ýr _ªå¶« ëÛöoÈ* Gëô5|Š ¡@µÌÞÇy{%ÕJÐy˜+äÆga nº-·Wsëu&±>¨ƒÄ¢Ô†K’½Q_D{c{u-›„ Ûµº–Ü°Õ °ý `û!›i e)„oý±ðGùåѺ2â7×Ýr½çÞÀ”ijNŽ•@®³ íñ³K•×Ksìo¶Êÿ÷–ÅȤ8å§ÕvV˜‘+D¬•…³yŽø¬„Gèsá) @Ý,%G“-%Ç’-)H Úvz¢6«ÿãòØúítuWE.BQå®ßTÇÉoUµÿCu  h¯íÓ¥ë®â˜Ûú»y«x¶ºüf¹ú6VÆVóÇA$Šô¨xöêß N¾¢sèÀ™ùzôD¶ÛmwD´jG,1éYT½µidé÷hî”"·ÿKùbðßfß”Ãç@ÿ—ð Œ&¢x¸ëÙµŠÚ·÷£ÆV«Ú…̯9GÇÑæÿôdgiþò€ñ(àâ ë[~Ýk7ÎœÝësùK±LÝ:òôf†7;½ U¥zi9@2ép$J&èÐÿ9šP$Ãá„¥©øýæ3ÂH˜À­Å 4¡ë4ÐeWfóÊÀÀ;Jb¥\Xù¨øãnõMØáÿxþûÞAÆà×o.?6cñ¥/÷žÿþh-£ìu³}ùñÑš¶°IÑÕ•XQXY%Ad‹5õ# ,^]*gæš»ï¡p‘…:£·91ŸÄ(t-yPÏQV»ºšFñ¸m9IJ¤d0÷`¶³„ü}ÂxjM@EÄÈâ(Phí7ë0ñœ×kšm cÂÝ—ÖN“&µa {[Òº Œ9ÎòÍêÚ÷ÀºD8ø‰yÅÿ }ŒžÝ‰v†¼L©±çAqÞº2ÍHT>r„Ý;¸¾Ípý=¼]Égáf­f:œíö¼òJe9 ‰ê\8[§ßýÿÔ]k{Û6²î×ðW`emkMêâ[¢ÄMäKµ¾h%ÛqŽ×q(Š²YS¤JR¶Õ6ÿýÌ ¤¨‹[?ç<ëÝF ·Á˜yç”Á7'$ñt|€Ö8Ò“?3ð¦Úål±TOÉ’ª‰H¢åͯ>ÌtŒ_yBj”#à„UB‚µ—Ÿ3°G¹°ÓÙÿ®ca¹ññø,¶”‘4x‡‹B¿å6bBzíR¯€¨/b€ˆ˜¯â(ú}[k‘1‡«Jâ³îÓ•hD4âM²ÇÀ³t‰$·hÁN³#àFÐÓ¯—_+WéB¨W´ÿMêÒÔ¿*}{¢' GE:rÐï|ñò“Ø&¯Âh$,Ü¥ôŽ\—ˉ vݳSôÒ°/I¢¿S¡p©…p·xi+^ùŠçÑ„ÔQ +_a¸ 'Ûô–UÐ⨩ð D:Ïœoâuu†a±+¤ÙZ•fK$jï51UN"7RRm/Lup¾5“)%Íö,¦¶¶“D¯Ê«3½R4*¿÷kŒXñú(pîÍÈÖä ­mDŒ-–àPº}#ôšßP|‡WâUqÇO¸pãqb¡¹›mh¸LÏVÒïhXv/r¤(͸7In¨š£ëƒænkIO,E…ðL²§î$ŸTøð2ÍU{¯{}þ¡½®h–'‘yÚæ{9®l³çL[€/Ÿ÷v¹wS;é>@}÷Y:Ü‚En Jæ£."s¿^Jƒàþyjvk?š7¾÷<ÄhYL ˜yDÌçZe†ëõà™Àâ3QB÷:U.áƒlÿâ5,Æ'(Dþ=Ëá̶›EŠ'Ÿ·Ãëë”k˜|œ~˜óL<Ò^7;¹…ñŸSæn~™»9eîN—¹;£Ì¸D|9å›öבë\Iâ <ŠÀïï„2òˆ7ˆñ=!=Ï꽡$m%/‹2cÎjwËŒ3?P ð‹Ÿi Ì~`O“JŸvÍÍ•S=ÝŽrg¾°ÿXšìÑÉvèûwÒ&€‘„Ô E‚ªwùUîr£”Öþ2#ÀcœPЙ>¨KÍ°ÝÜ. L%y­—˺Ô욯Ôäxï>/y9‰âBî³ÓNyFV^ûŠ]Ý’M<²fRX2ÿÖ†kÏáBÙ]Χ3‡Êr4Î*5X8¾Õâ‚ãóèÞâÉà³L´ðö¹²ê0=y®•6r3ëYHÝ›ËtúÍÏ!"NNž…¡ÇÈöB³üŒÒþ—ãÖEe=66¤P‚lèr,é+&­‘0:ÄJ<!Xa¶¸Ng—?Ú!ª ã )â^x°Ñg[„—Eøó“;7@:ùÞP½ÐBû·±íEyŽ³T’î¨þT¥3Ïy¤ØÕ Â[ߧã5ôh#¶ÝRlºa$QÌ.`ŒBBKba„Á(CnÚdÙ]ÖP 4¸`ËS’»$)||O{ Κ1éÙͽhŒÍyà$ç3 œmãq ƒÀx(˜H¬á® $Ô–#c*ŸR¡/|=â W…'³¼ñj«¼ÊíVÒgb¼I.0ÅH~ÊÍlÊòŸå=ÛµŒ•žI»%Ò nþTK·õræˆy ¹S†‘_—v_qx9<ÄjX±z6UÜåÊHKp7Œò¹0¯«Ðái…oózô÷$B‚pSM÷“ª‚+_óøz™Êù'õo‡ãr+§æFy¸-a¥y9œWUìåŒÂô8˜‘½$”!ÇG)E‹¢õLÜ\– +·ZKQÜz‹¬øO :{"[~º;Ïûõ7aØt$·1‡öÖl\ypheÑk¤®¶É/–Cƒîÿü±Ý–½J#«k"([GÂä]Tìj,ÃGŒ\sÂBs`c¬X3 ÇCŠ }e$QȵÅ%&…Ì=:ëž"j[ì½JÁ[&À™¤&,cÊ-†¨D…Š¬+?îïÆ0«Œ ê°ÓO‚hHN“Y†:™ëËYë Þ˺+k=±²Ö§öÝt†˜º¢t^mUéŠÔæ°xÚª\Ël‚£Â–,FÝ#"ÂøN{¦OÂÊØìC»O»§+½ ¡ “+')€µ(æÜ £ÀT9¡Æ^aÍ~_h”ñ;>.ä1‘÷Ê™ÚMA—¡÷IÑR™'¯ÑÓåL3SÈN¼•+7öN[¸ð—7Å„@èBgÀ¨*$^¸ÕZ•Û¤7²öb"µ4_&6a ج Sž¼s)A)ïª}ilë/à¾cöôþÔ=âÑ–ÀJ9¿Ü¤µ›²ñ%'`ØÁç[¯”£³‡ÑSqRJñYìÉBFïÞјªBEª°ž¯sGÞfÞõrÞÓJú釅W¼ÚL?èþÒÜÈ<ÙïÖÓ>}Ì<ØÞ¬Ö”‚ ö']Z°J%¥!÷ãü:}”½Ð"‘¡,·—_ÙU™ñäý“À^áýeB –¸”µWÞ‰fj©ãWQIgà:§{V ö4ëÅ?8Wß•#Ìy%p÷d,F¬3sŠÚ\T”ÚùIß—s:GØsV|Š…㽎€³åè÷íN³?P:ØXŸÝÅHçÿµ›ÿO;úi]½la£õé¿YXúÎ'½WTŸÁÜ…“¹Ì†pu}–±o¬4çìå´‹ä[)gÅ/ÁÇžÈ%&`)žB€ßÚ{Ùæ˵ìÅaA­–èd®ì(ºn,V@)† o;¢tö#c× @u|oYG¦ã{¶ŽCããÉùOª;¦ròÛ13­Ê§\_ú€(ÑíÀtûì“ý`C¹·øño݆fpgGl+~2¤å"»J;ܯºgGþÕÆh¦ÁýÞ1½ÿë0ãÞ%Ræó‹ÿK³Ú¦7x>ô-CäD¶ U¿žC‘¶õçñq“ Ù6Ç®ñ1¾ßçÐœ‚þýt`ž'’ζÁE‡åF³rv16xaÌ Ï~ËãƒÏ]=‰S Ì8ß›è˜Æ3±U:¨. ð+Ëñ"-0;‰;Æ—®ô~é”Õ@,ª¯aŸïV<ÛR`>àù,y£ bÒyÛ…éI¸kïú];A2Äï1Z,‰8­è4~höiûºk¯±v{B"Û³áÿÙÚµaO8· x›Tü°\ß›SïѼ2`˜WmNPMÒ³ûÚT?™ÎÝX’¥O¤{‹yr¯™Òùæ¹99»úF£{Ö>èèé>nða2ÙÁ¢T6gPÙ|•­T¶žDe{•í'Qy5ƒÊ«§QéÌ",O‡tXüoÍQè÷'³AÈ‘b‘;N¥iÛ¯'‘Ü7ƒÇ›åà“}úóO–}+Æç\óEa©™ÉŠv›qôuÅ:[B¨IçT½ ·Dá¼£»6«UY&8ÏÓ£ú¼È éÃA?žÓghÍŒ¸>˜eAl5.»#8Áòå¨Vx·:ÕÄ\Öè*ÑÞ«³:B&Ì@U%ˆºs{HuÅ kRÐGûѶƤYJSÙ„õzÑå. oaM!ÏAaÂÃNOÃŒ8‚^T3­ÇAÌ„^ÄÓYèP`R\aʬ}4Ý¡èB‘ﻡÁXÓ›dqjq-’ÜlÃâ$3»&†É'«ñpÅôpNû·±ÔŸ GÂatdþ$À/EåˆèUˆ7"‚A6;GqtxÄ‹JÕ»‰G&)®y¡bŽEq®ò¦ïïVÅ[ŽK>•¸H~`M¼È/Ç’ÿ>¾h`üÂuÄä|õúj‘dY &0JU!³GIÈàšÚºH1«zSø×óUk†ÐàÙ#mÈšA0?8Ñß5ŽOŽñ²[àd©"Û³}=‚cu/¼›_ìq÷vssh…öhuæóKÓž|¯ù£Ì IÚ'iA¿éžïáMþ8Ó<»Ý:*Àä •ÚÙöB|¡‡Ž=„ [Αñ~·RÎõÏ_ 3÷˜ú¢µ]Ó{ïJ ò&¨ §§õÁ˜C^D7:ˆ%T´@ú`´ áìe0‘+"–Làˆ‹~üÆI±&\¢ñËGž ß Ó5^¥,Œæź2/rÄf?9¦4YêŸ#l–l[ÁêêµtØÓþ¨–ó@LJµêT¶ƒãƒ‹9™lÏÎŒ–_ºP •V¯ !óËáÔ# 8±¡>KÓG{/d¨žaèâ—C½–Cjs6©Ç;7—TyvµI¦³µN»³³8Q6*ëA‹öúðyv‘Þ Úþ7^(Çöéºíƒ;YÊ’¦O©îä þcS‡çGÝ\­Ù§L‹pY›Òì5‰n|? ™z”.#e*ò§‘è\&’u2iTßÚrã £ tž] mÏÉ3 ï& ì–ðöå7ò·4âQFË›œr‚þâb0MNÖfg±i‘d³ŠìùG\j@Ù*01i‘šÚÌO?ÖÙÛ·hH_¬6ðÔR˜¬ñ˜ŽB/C™¥i¤2…VàŒ@»úm胞í@ #g²ÒŽÖÈ2p`‚>O8°-ÿÆÃÈ‘ä«›‘³lâéVįkQ4R³ï`»“º)4Œ´æúfŸ4´¡%ƒÞ Äû ú©Ú¾æwì‚O\NƒF»¢Q£R¹q"#4ïMÏ3ooløÁ >|°{•w£ fèDoÌžë÷®A ;Þ›ÁŽ sø涷óé ¹¯¡÷賑ǽ˜°Æ£¶ÆuÃf嘽,VIÓ5ÝV½‰Ò klD&2Z›Ê;ð]×À¶†÷&GœôФ–Ã!'ˆdÑ‚âDÙÍmÄz¶ýƒWë@ø-gMq‹É÷¢V?¡âËQþ"ŠgwÏÍlP±ì¾Ý×Ô2H÷ú0ª ´ †(ÐÔeñð%6Kš[…ì°Xf WÓI2¶í›Ì¨y‚åò„jžp¹<÷jžûy´)èÊ=õ4#–Ó¶TøG¹Ô§™ŸóCúóÉWù…ð ÜésâukÙ˜©j¶Ì«¼éÕ‹ñ«Y…Éh9…‰Wy99ÜWEAH‹sN½Ê6h`gÚG+µv( b}@ÕŠ™’@èÉZÊÜOy¢”ÖH„×4 ]bpË}o í°ðH¨Á^šý¾~‹3¥‡À‰l}Ò˜„¬„³K§éµ ’_ds5X!ž~;¥B:ŸÔ䟉þÏj}ˆÿô3‰@ü@ Êz_µžåÏuzfäë”9}ÛØ06*âØè‡çúƒMPu{s?kÛ›ëê'~ݪolþP«o×kµõzµÏkõ­ÍíØÿM¼2Õøó¿äoåÒ7ÆÕçÀĈ‰±%!EÑ[û>íÑ]2qWÍJºÅt¿K× $x?ôa¶RzmèÕãþìt§Õž?š´¾Ü[eµ×¯_ÃÁ”‰uýAD2ð¨’V¸5Öò,ƒØr"ØIá5Í©?d§ yØö6¢Ï÷ÖVÏP\Q®h":,ž79Ä5A’`Ëé¿¡µÃövmÜœÞt˜úP¥ Ô›T¯‰†Ñ´yeiýì`JMÑ.>¢´ËÚãžëXìб`‹OvŒ#|Þ‚šÕC2˜aV A)wh·,Õ‘:™5¾äÚYÀ¸©0ŠT0ø!Hš_Õ¤F}áCn\რɰá°ÕŒÝ5 €vŸŸ[§ŸNÎNYóø ûÜìtšÇ§_ÞÐf/zAæsJÎpä¢N •L/š@s£ƒÎÞ'ÈÑÜm¶N¿ ÿZ§ÇÝ.ûpÒaMÖnvN[{g‡ÍkŸuÚ'Ý£~“^ùç4怺­íôÞ×ù ôŸaPû=š,î$lN‚^¦ãŠHiB` ôCæk°=±Ù[¡€><<Äz§Ëi„l@¨IQŽG¶å@1ö£e¤n6Ÿ‡5<·G |Eé3Î ®)4Ž`ÕÀʘqGÂB½š´•Øî•k„|J°s€¬9Ž|LµFã~hN$ÄU<¾Å%3ܘªy¹W ã!i‰àù 5´ŧÉI5€OD»F^ù`DN†æ]¬P‹h04oBÒŠá‹nŠd‰Nì£Û:m ÷¢È‡sÕ €,(92{ܯË~`®ƒW²xÒ #¶EîD¸K¡þ #áßcŸ6TNÈ[(°¹RŽó!â‡ì<Â6JJÜqÄÓ(1#›Š„V3olCk}èîX¡ð¢è¹MúFÍh™Œ=ë:~Ä趉~Ôÿ}B’“NÞ`(é%oaঈ*'öʪF8[ c¡VELƒyÇZi@íðæ™…ã¶zÈ*S‡û"˜iÐëÔeü¸üÏV? ¡ÑB![^ò=ápãßF“gx¾Ê›ÿóe ƒq'¹Iè è,4· 925~¹ªý¡1ªÕN±¦É{>Ž<Ú™Wаíò•+26{¡ïâŒÁ$kÂUÛçìxži\½70B\^|Έ¿;Ð*qµÚÖ’-ÞãÃ9”^2qà:qrÃÑëV契ìVB„ãù±ŒŸšJ(§’”Ói ¤ #^½#¾$íE9*kÅú1X^Kž®qÊHƒØ«ðßÔê߬aŸU*{Ò?Ÿš>} Yà@@ð´\$Üo’¯CšÜäf„†N°ÃäÄ ñžMüŽscíRyñÏü°(3¯½Ò"ôŒ~g–å^÷Íðögü]ßAw„cÑr™+ßA Lr­tyçø—ýVGKç–ƒ4=t ÅZAË 4 vãŒb½ˆg;E1<é,;õ&Éø†×R=Œ|Û(èQH‰â_L?lí¶›§Ÿ"ÃT¥]Q3”"û>Lñ­©`¨S;c+ŒG\ësµtvQkÈÆg&Ý$ïx>| aõ½FÁV„à7~-½)Q¢–’€Ä¬+¯ð®ïs· Ì')hb®Ã[¯ü1vº*P©}×Å oj«J~&0Aùob4›E¼#ì}M™8Šs—RÎËx }HKyÌ% ˆÓç—Ð÷=[˶¥2a¶ e²êéḣpÔRCçAl, Ò{ƒîÅèøAîÁb_ÀE¿GG‘áª$#Gæcµ¤pŒN> §Ft ê1¬ ÊØÇáD}¿ÓÈ x1œ€dðÄíêAm3J·&<ØÑb%U@ÖH&ê> ›D{²Å)?¤ueEA+Å•ÆðCÿV‰;µ@y5MF‘(ÖGIÃÇ+dãÒ?¹ºìí^]þúóÕªüž’#õB&ÃŽØ#aµãŸâ÷ÉîÏôé÷~…Â,.rÇþLF–i–Œ¢$Ö'ž"^GRbUé…´£tB{Ü¥RJ•M 87êkMDž©ájCbZS3äœ ]¯Ú`Ǿ\i`Kv ŠK©XeºëǨ”(÷"FÕ~ú±.èPi¢úÔ :b0Bþ2/ oêÞ¾ýŸáN­‹ýK^È~;™+Öîœ|ì4Øe³ó±{¥iñÀ¬cý{Pªa-éCƒ~‰ï$‘ê->² qD›å!ßbj0Oa1õ0 8€‰Ø –ý8²­.ñÂKÞFÁDØŽñ]¤ œúPUبÞAÝc?Y2ݺµ5~X'NøªØ›w:ÔƼ/#ª·|7ÆJ­ãîióð;´Å_°Á7èü=î®â;-é­{ê­{Ñ[|XÈ*¦Žÿ—½?mhãÊ…áÏè/¼_*…’BDƒÁîôiˆÒM0v¸ pÇiË‘…T€ÚBRT’îo׸‡$a;}†ç¸;HªÚó^{í5¯0¿….zD­¿i´ZoékwPØtžÑOn>M¿üJÒͧ£8Á˜)œ )"é‚5¾#b]J]þ()ÅBôÊhñÍÚ'l”¬RBvðìË›yl¬‹MG=â6¶ƒÁT€W16­JV2èMªÛ •……û~â7„÷Jï62ü¦}Fð»¶ÊBB\ÀHD´Á5,}³ tˆkÌÛDÊ3|Þ~½Ö†Îy‡ZS"·!ì l×5 ˜ bBóÐ F‡Hd·Iœj­f}Ù©‰!b½ì¿¨…±8ÆÁ(!TÍ®ˆ2oV«˜“šˆ6øàfæ€8ÃDÌA4N¦f@zœš½¯»(¿+ üÂKDK£si;œdǃR@Ó¸^ê2©%tWö@b³ÜýZ_Ój5ÞÞÝmð ã?c(è-úÝhÕ»åF}„òwQ“²Ý÷ȆB¯£É-²0‘™žþ­zím¨d}ª&"*7û€etmiÕ”0æF,ZÑlÑöÖ¦JáÔY}OkÁbtÅÍП3^!,R  ¹®Šë%$‚äûSsaµ ñ (8K˜¤]¼‘»z$º¹ÓÉÞµï.¢wõ^ n( Nfñv 8ê ›Á‹Ÿ ²½»l(¥AáJ§Ã´<Ûýbo+˜ ð°V¯OPI‹ŒÞ{ ìüûþ`‡1î—XIÀ»õþ ÂÉ>t4âãm´l½>ž Å2…@ª^"è Ý„ ä1ß²*fj€(‹ÕôNþÕ畾(Ykpjñ#¸?ûW¦UçU^ËîkÓ:žž³ÝVI—aBV+ýW+qº·˜™®ñe“ËZˆ1l›_H}í+ù–Ò`×áÏO©’ôõw€(üêt7WÉ-JÃ/¬êþßKêÿ‘B»ˆ‡õäò êÿÿ\¤ÿôèñæŸUÿ¿ñä;Ôÿ?~üè»ÿÕÿÿ{ôÿªþGê©%žý|E'Á\q“XU‹IÅ¡H×0xFJà ÏÝ¢©úÕ“ªQOÖ/ëýa•dît;âxÚ­W€HJèþUu2šMº¬Lú|g—ÑÔqxÔEâ%Wâ›î˜ õ„Ž4_2 (ª‡ÿ‹1>çü¦Èk~±ãOGâ»'OrÏÿÆÆŸ7lXûŸGÂó¿ñøÑÿžÿ·ýp¹‡ÁËÃÓ`ïéþiPs”ùÖ¤€ø—zƒˆOôAW`ÖêûÿÎÐØÕì59ÙÐÞ§öh£öèqý™Úø¡&=X“ 2ø£l~oÄ–»ô‡ˆ‹ƒx‘Á3k´14ª8ŠyCÏG“9cOï_¼ úþ‘ô¡Ó¯_õ§õ¸7û¡ŠIßåš)}‡fJZl¦¤žo){£$Ž]ìÆ¢¢ñ-ófB'ÄVÅöå!4¦F6Û$!¬ù)Ö6%±²9µþof¥]Ë™jpÓ6RERŸl ƒÓeÑÙò:F‘̦$%r›B@ £èlCÖ Ç6nÉùÏ·ËYÍÀ ÅÐL Õš¡ŽgñßÔP¬$òܦ ¸ÒÑÎîßwžï™ßbŠÜdÌ'Ùö$þÐg“Jz\B[£Áê*þ ™u]~Ø7ÂQ¤øÕ•˜ã7žåÔ!÷½3à©‚xÝí»ðŸ/ý›ô{¤íÕ–PÓ›ø£Ûßs<Ñ–Ö$[«ЪÆÊî   ÁEÑÁ=MFWêtLÜ0R¦l­u-Æ`&·^/>ïÌèm°µ ±gÃ.ádÑ´!2ÆÅ:¦®eLÎ’H-Øð±àŽ¥Höi2•óƒËPƒ`)z|a(á›ä,yÝG1™G!ŒBA´‘*må;¯Nw_>k†1ä ïÍ‹;ßã(O‡ 6IVþ„/¢ø¥µ}Y¼5²+/fÝK\bÄ¿ƒÑu]tá:{”Vš„þgzõ ñ ýòíÏ=WEgBñÑ547¸ß_•ÑëOè;‰ÑÈK¯DaFúf`¸ž5GþÒ›êvÌ‘õÌ3„üŸH69ç-žÔð(T¤É Döÿ¨ÿèÌ.¬ªP°O²d>ý@Fü76­~üétÄ°óu.ÜÒêɈyD4¶±æ?K™÷þµ7ŸCE|"ñGÓ´5?rͦY§ C†ÖÆx Yëèà Gµ«õQ {:ƒYÇ#t‡qGÎéhŒÓegC£¾æ/èt»äl8’Ci¯PÄ Æ‘J3SÑ•¹E4ZÔMœG¨´(<Ù{Zƒëøž˜´|w½s8NlM×e-‘2!˜oö‘1äѹ{ÏñðC2¢öÜŒ i à`Á-Ô“„gñ9BBÌËaˆ$_ß²z¿Ò…ª¹~ÂF snVYú$[è.Jx.h«9b¦×ø"tñ#¬ÿ0vs% éÂa4öÞˆìч·É5ÌÕé„€Ô\¤ŠpªÔ:R¤¦ŸÓÞW¥ÒÓW;»;'{Í Ô½Ì飀QÅ‹¿ŸÀˆKž~ûã?O~RǺoaaïC´æ\‹¯fˆT¡x%_¯ ÝŸ-?^¾:8Ø}ñ” QמÔ7½œÆÿLÈÊâØyÀ͸Z¾¬üqã[ÔÝ ]A-p‹)£ÕÑ.lœOa›È=›69î`ÌBTiÂþÁÂÔ.‚È´5#üD+W˜\p϶ŸþØ>yõãÉiI4ùl,¾F2Õ”Ç#"Êu”pÞ¬W.@ [n‚ímÖQ‹þôà$Î`d@ &[èÉPf4ôà©ÌØ\¹+ZFŽ¸mbõÐ%V/µŸ·‘Ül“\6nâo Ùn~ãFÂ38dú¼óò9ýyÜIp°ÛÞ98À]Œ"A_vNéë  Ô [9PЬPaçÕ Za«ü±Ì­0´|KM²@1)Ól•å›S@ßí’É¢–‚'©ùµBÓV«Åög-y²Ð7§t+”ܱ-ìJ çm‹"Œ„b9TÞS4¿®—ÖfCœ2ÿÌ€8·@IMÐé(î?;N&tßç˜G„°Jɸ‘ú³ˆMÝXœHV…ÖÃ]`7â&1r?tÖI󽑠>À¨ëÆhòUÉ ÄWí“=¸JwNåÕÄ]5ûç—¡Sº†ÏšÊ·ñO´<£Geü $ìePë[¹Ëó‘vÜiaëA-ÜÝ Ä¤†Åöè÷t¤æsG‚¡QË:µ,+K€W–á« 5GCœÒyr°W*ª‰0twßóaQ±Á±M ÞðâD®Ÿlbg8ÚéÐÑß°5̽2âm$C24;i쟜»?ííþ½ý ]hÞà2¾--äÒÓS9!¯º„üNy¯e9n…ÈcW'qƒÈzµFSq§ ° mª6¾bVÝ­a¢«Â°_q±1ï‚{ê1î0KVƒ˜Œê˜È´«Â¢$§3¡‘䳡 y7LGdÞŒÅÎI ÉFPfó2ÜlZû6¬%pîú*mØ%M%ÿbK¾QUÀVBˆˆÌ¾µ¯:7ÆîtÑ6D€ÂÙVX Ÿ´Ñs‹]8è!«¡Ý–<ä£öñq-¤ó†mÃí¹ù(û˜]Ø(Y^zþ!lwœF-µ­{¶¼ãKH}Fd(Ûjï/.N›òØÚhqm‚zþÚ¬犉®B[s½•½eqú‘âp¼âr£‹¢ ¾÷zÏ+âO½)}7Ên/eié”=¸¡·©d!‚ÀßÎb§Óé²öô |g-ÅNÐ)¸˜kzmåmä–5Vû:s[Ðñ’)õ˜ý\ÇëËñæÒS£ÃM&¤à±)(&ÌÞWó%zÇÀÜ!‡öZRËÓáHÎ=;±“$"ƒ³˜]x`Z|tcƒ¬&Ïøõ^°ðÏhmÇ¡`Îl6;56³ìñÔʉ Sb„¡Ð…¢½€OE …avpƒ²S’ïc /Är¶«¸3$y(2µˆ1Gâ¦"€+¤“xð*×Dà­U>@bS¢<$b 8”7©cò¾?fѵ3;ýj((e †YK£ XÕáüê\)ÌÅÃêÓÅÀ}HL£\,J¶€À:Oë%»çЉÙ`„Œ¸×f¦¶™4:‹ÿ5Îýk” êéã>¢ÙÚãàIð§à»àÏø]—½Ÿ@åù¬¥¾pÌÞÛ0•å/ù-ø'^‡'™Ù–Ô¥Ñ9šXs M¢?–²ÈnÃÜ ûéÜ”©é<°q2n3±Íá–œLã—Å9Ÿ¤ ÷ݶ0½Kù«û4Hw-ŽóÜ£ hý‡r^f°ìyà.n’*Îñì¥âYW½€bå^a¯™ -ëU6+ý˜Ÿ c`ü|l¼Kù9‡æ- ýbššÞÝi å(ì¢78ï`r/d3ûSÕ½GÛNôUA»Q·X|› ¼[¦”ww5aÆœöj^ 6­¯mþºñ¨BÄNBás‡x¦“™ב6'Žf—.U°ñ(¨ üÑkÿ&WÞ.»0ãAØpàm!±¥Ì}„&ð'Ì=Wt;lQd¤›ñÅdrJ™1ðAÕ,¸›äY >?Þ;ZŸbTfƒP)Dó1*öcPjzêÔàqJÙùßÕàÂ,‹nb.^Žèkm 8 TÜPfÝJ-ú_üó¿øgþ¡£vÃüc˜‚ì棛ÿý?å ±ˆ R™=9K$â€zeDf9²}ч’Æj!PC)ªù¬ZÞPÙÁ€„F×Á=žœdô˜"×woŽª5cN“}é”Dî|èô¢sèת&è™…‰¤àß=j†€`jªðßÛýé° òû:i õ9m£ß ¶'OŸyOŸÉÓƒ—í“f8µDž° ˜ÐŒ|OÈAý~°#9~Ñ hå÷ÉO{Ð×G4TØÞ¦ß5±*¼Ÿg–`æ|6 ‚5öa·§ÉB… ’°0D\æf”Ü5Œ¦ˆÞ ã¾úµ¾ÞÀç$ž‚fgÉ´?Yg)Ô€  ê&£3 rðÇþA3ÀCîûdÐA—1à¥Ðí"žv¬ð…AXd«xŠ©×Q›ÜÍ`ÃkØ vN À á éY›Æƒãl­½&¿Õz۪ܵZ­» ³¤GíœÀ²Ñˆx–R}{&&1åc" HZê9ÕKz ßQ' ì¤q1gaPØFbi¶³ÈC!Zßðäø>!GÆÅý)êA1Ë a«-ÏÚT'ûæmýͯ0Ùutëjµ¾¹›7 ƃC¹~¼iÝ¥Hý 8E}²Lh,Óu•B¸kd+„CÇ;Æ+‡êÿ8évƹÈì2aT4ÝB/¸•¨ˆ&é ëòhZô¦í€Æ-í!ü[‡¿wÛ“ú>ð…Ìñ8®E­ˆü¸®0ìê4€W~_H,4dÊÝDED×ÈhCC5V½óµ$ö¨îg5tæìõ‚áìê ‘òy@]³•QBˆE@k¸õó{­òÊaat„ËaJNlxÕÎMöȇ„«Ü*öI¨ð:˜^ð'l‰ ½ƒzZzÄ£9?i÷ÎQC‡e%à®XhIì0†‰Ž ºÅ^t¤ö:KšQ«ñ×Mün~=á_æIzèLàa9rÏŽÙÞfØB…‰ø vã›V«Ô¸ G¿ò³Í²iFJ}Ó ÷-8qRæm«UÉ–†Sè<Á‘UHþJ4DÄw4‡]“½‚w¢t_{wsØŸöQmn J¢ãXlžà¦ì\ÐAŒL»l5Eïx,VTFv'ˆ#Ç0T4B"«™¥éY\*EEŽPv(«ò£ªÒá«Ø®õÌWkq-S/!ûËñú‰¥…SÔ1⣂Äj¼+#‹À«UÃàÕ ðÄeIÂw¾õ‡(aR3Q-µºŸÿ)@lI¸óž8wŠ°~÷f§öÏNí÷·[@‚VX¥Æa$x µJ‘æT¸ªð]ªV·'UTÏ:¾î9ex±ä}£¬Ëâ„ÞÑqÀäD Tõ\f˜–@Z%ÍmJ1lt{V)ì˜=d†“Â8jÃL;Ö¦ÍLúîÎ.ÇÃfÏQbæQp'"""/¤àN½LR ¨ƒsŒ(ᤱ <ì])×#bk¦êHq©ºLDi1–ÂœÆuŒ©ÿغÈò⧃Vc~ùà1\7µÄ“lˆû °Ý›Ü¶¡²X à ã©ó®¯3 4ä ^@ÿlºÁ±h¤ Ø8íã5fJ6’dÝÆ8V&P¾ˆ4Q[8FÄI­h’ ãÎá”·å ø¨5rV`Óðë!™¥ô`"ò¶Ý5kÊÕ"6[U4ŠRî6¢èÝMzBpD8OmÃê&¹9!6ô9$ ¨øVDÁIdÒ 3ÐVIVϱÃ:S`­áâGbžLpÑg[Ò†ÜLuƽ¡ØaD¾Pdç=ž i· c¤AÿŒ|’E¦#´}šÇÍc2©Ç÷Å·†`x$hìS¯­gºE°ŒÂpšU'cOEçÃÖÚìøàšhóÅá’áV‰>^"ôÉ€ã6ÎÊ·°c:ßþyp†ÆÀS<çâÕÑH樮Ñýi½”Ó ô¼Þ‹^X»2Ë$”kši°áZÍþ><8<>Ý;~A€÷êd¯½óòd¿MOòeöä g°qUXÒnmd(QOõœ’4u¸B³ù‹Ý~V(ú3ÛP¨¤ì¤yDü6#Q)Ëmy™0\^ºú?š Xcv”y§fÒ 7ÔXÎ*Ã6(øOªdVÿe.~,°<ÒÐœâ†ÀšÑÿïÍ£«È}Ž €7®¢m~BñIÀ§ö cìPxúؾÀ$õôl3Õ. zþ„Ê“îm‡K~gJ:Avq6‡Ö¡q2K¦ÆÃËÛ*bÀ¨ÛþtÍß‘ü3¹˜<òÌæ=s,oAl…wîk¿=:&™ötñl™w~f!ËR´¸‡ä XüL¶ÜœÂŒ:çh-”ÓîWja;›¹íðŽ{å¶ô$õD¼b úSnCY^1Ûн¯˜•ƒ–‡Ð¶ 5•r}?S&PìSÙyw: åbrISïÜë#wˆh ¹}ΙWN‘í¢ÚFhr+`䘓B#° JbÜqØ®™è"Œù5Š§Úóm{Ž"GO”JÌ'È6÷á2gËf¤bÉ`DÚ'¥µS·¶á&Ÿÿ±s ÿ¼*´\Ç»H‹B1h]”ñM?™Š[êTLª±¹z‰ÜpÐ…9);âj€—ðÞÃŒbaê)c…ISá8Xʦ–fC s“ÑÂ&ÄÇ c¶Ê$)‚aœ°ˆ‚H°À¿'—¦™³‹ò¶-'X';°ÀðãNÊ¡)ÇÅÉÁéx9ùÓÎ?íïK{xÔ ocT¸¦ß¿†[áðèÄ}Í|Ý·MáÞ`¨×ds0Œz³. ÅiëNÀPwÖøÍÆæÛ:¦€}\ÄU0 3õ€¹ƒ::€ëÿ¦FX#]E“V/Sžî²ŠÈT"‘LÕSÉŠ‰hs€Þ£¾pñaêý„·7‰éd°ŠÈz±‰Á|o³d…ÉõRÊÜS´hì䉆bÆè¦ÙÙn¾m†Åú'Û•|§=¿ #?Ý ©]$ Úo\gà5@ÉÄU÷nX!Ø×¥Š·"óôÈ¢%ÙÀ×?RìYž†{bëª4qƾYåo›-Œ¿ (4RGµÕÚ³Q<ÂD=Zý(žÁ0¤¤gèÈ’_rXWC”åÇ‚¾^:öÏñ0P[Tæ ‘ÅGÿ—⌎(+'Fñ[gð¸ +ÍWm”ˆÜ*gZ_b_ÍÉÏ쇎ÎRPiV²îkËÊl†é=k­rNYµS÷öóïÔƒÈÛÅÙ°ÿÛ’{ho¬4‹—½XªFÏl/ Jµx·’ íAcºÁõ¡zfš 0ÌlhÄAr 4Å í³f”·d”Mdu½qG·ÝkF™õp¾zÂDyäÔýº±~_Þt]¼Öƒ  ôã­ÉÇ3*-O¬$,Ä)œŒÑ}miçtšytkÏÓ™Y{è×åœvˆÊ| ¤dAùk’'gq±YN-{‡#¡Ñùqη9B…¨<°> £lº9xÒŸŸ££½—Oƒ—‡/Ÿî·÷Žvv÷^ì½<}˜Ï0ÅIºÏ$b»v¸{Ñ(kCá#:½žvìáZŒ+c¡97{Ú³#¬»K¡=Î]‰^þJvÄCG_jYÒktO(Ç£¿{Ôæ¤æl â‘5oE#·‚¬zÉêY¸¹;ª\°~!¶ 0®Þý¡zh¦UÓÅØ23B©¼7ÂæýÖS˜›'šPu·»”€h1 1â ѤÞ ™.ÙD`3 ¯0Ãë é4-& ¸<ˆôkáA-U²§Ù9~žOÌ ! P}ê èK¸`m®â„“—Ú– Ç— o–×kkùÚ~ú!0â‰*bõÊ–VÒ®ß^còÂ5c`(KcaŽû¯ß½¿Dm¼I —I–jŸLZ¤[6P~¼¤ÊtÍð‘ΚQÓvÝdÌëafý!,{{#ØùlÿõüÁÌßÁªg0Ë͉Rž Î|«Æhê×ë©ñ ¾c~ ¸ðJ¥Ü é@ ¡œ§RR0¡ÚÍòƶÉ>%1eY`P ¼¡±™Þe*³„EÀ‡jLrÃêž´RźRφDž“[Éy\L/]èœvK¨¾!äï¨ ¯*ൔ¾ 9»–´#_QÖúÎiVãD=¦”ð ¦Ï-"Åî‡ ÉšÚ‡ïÜ6dÝ6ø‘m'¹+›Îîî.Lý{ÿDÙÆÜ ßY¿äTÃQrW¿ 0ûPNa°ŠúiWGfèš¹ìŸõ§m€¿©zG$iT"°÷eQŠÓh µÔW ã@ƒuô·àjW`.&r;vÑ™rc€¥Ð6)Tµ(VNëŸpx³öÒ…ÿòG†þ{êÂ;0lÁéNÒµZY„ì>qÂlí€ÆšqÚé³pœE"{âX¹~]>)@%\*ä%„¦Ä’Ìèòv P¾\Dùé<Ù}ã¬ÑÝvQçŸ($C£Ûe¥ÍêÍ}ùãÍ×Ä{Â' ‹ø¹P¯º™¹R” ËïÐq¸ˆ‹„vS^Ý¸Ï OØŠ N6PžÖ×ôW0!èòUçÛÀšY ¹þµÇé{»§‡Ç¿Ô(dÙ\Xö,ZYØŽv:&4’ß–g’$À«½Î£0M./ɤ½á¼àøF¥lzàL=k cš…eÇ4QwÒ˜±£“M#&®§Å} ëÕ"/Ïp¦OWXR[¯äL¦ÞÈ©å'î4ƒú™ÜÛIŒ‚1ñ„5¶J±[¶JO¦š©Pâiâ_µ^îÒxaŽHÚB#;lš‡.$£1Yß0!I†OÀ/¾J(¹3ÜC+tÇ|ƒRV%=^š¡Q©Ãè¦â‘â’,fg³ƒÝ*;ïKΨ÷Ï­àNû ÝA:äÕC.]äô6­³A gë:•o%Ë»¶·Q®Ìqˆ4r£¿vNpïËÉè:èÚÆ^búM Sd';S3wáÃ%ÚÒð,4V-.F9Ór—4Õ$=t ¶-Ž¼ª“ri*¬×–jË ã¥írfaKþ8í8kÆ©àÈë°ƒ^Ñ3\‚æˆ/v:á×D`àYÇJjU­ 8où|jX' €h·ÿm6ŒuÛWïS€ƒ¯ÌË29H;ÇRv+»æù³6§ùGœ*^æ0©ë˜-q{" dŠZv ’©uÜ܆.Ñ+€’;¹ålšp‡ Ÿ¥ÛG}M¨Ù‚ïÝûÝËp£Þü¸sBÉÜHz7t·4 úœL‘l1»t,9 Í]üæœ41fÙ´# y’Ê5Hª5…Yݤÿ!V°z ;Bv¦îš¦f;ïfÂ2o®ñÓG µÆôj|ß(ܨéÞ¿¶‚‚ËGã˜D`î> {Ï>à´d¼U}ÂÍÐL sa¡…=îS=áOe­\.‘rÉA›wG…0Ìü:BC˜Ž€ææœkX¸Ã~U#>ý©'ðš¿®ô˽EéŽR²'6ª¥ÒªAÿbˆŠ:”àÛZŽ-Q½î7wDY¸Øf“-)‰Ñ³m )B›]Oƒ„šDÌ…¦åà(Ïv!.ëþTv(èCfEÄ꧟´k”;– l,Ø©0od& ·‘i‡,æeN]L5s1!öCÏ‹=ñq»°+/ºÁæì‡ÏtLɵ|¡N µáoò>Œ[¾"wp¿·bå‹qvGFÌÚS˜´2z—í`^'ãäqÙÁ8@t¡q|’¾#ÚT­l!m 7(þ.œÓ›ãqà†^”L\pŠ!6>6¾úÓ‘4qíÄAê–¥Z[îOäÂg¡èÉñ.r½OONác c'Wäµ”1¦uÈ >²Òj¨·z)g<óµ{y=2œ=£ îtÐ?#‰Â¸,nw³¸Ý3 3¿]ºAÙÑ’Òñ©j‚V‹ÇWx³SlP‘°9ä`L#É¢ûÜ»¨¾\¼^>¦“>1ç :¡3Fn©f˜Ã„Þt º·s ·ÎËzî`l€C^‰ôx,CÎi;Dv/œ³^áÒó\ÀæAy`ž¥æ ïŽé/·ÔÞzz·éœ…Z° Þ)+¼K­€nJά?Qr-ö§ø!ÂJHä7¥M¿ZvåêâMXÔFfÛsaÇk%½!Þn}þ0 ˆ’2Ó×heÚåìmÌ>Çå¬<–ˆ8R(ÓÓP›¥9"’9P¼—Ï9,é¾s:³ûf˹]ø°•!Ër¯:¥Ê2myRV\e/£à¾¢f¼Þ²«" ¢z¤“œû³^0‰Åx"½hu\µ%vèS÷¨ï•˜?NCP °,å’òw[ÂÒ=Ó`(—ñ´ß%Çd½ 55Ã1¶ds§‰8Æ»’4C«°=v¿»Ô©Ý²A¸j#Ns4t “ƒfSVê4;r©ö)õ¹‰<$¢±Ö¯/F²š¿¦z>M6°Í‚î{ÇÄ£¯—W·ÝYÇ•7­Vë¦)Ä(i’MP{îL.šï$àv„·£¬ßˆ"7|Wx ¦[…AdjÞÉœ¿(zFW2xf~½ $ݼ;¤p)/“E͵jµZƨÂ-æîÈjðÔw²®v±GS:7ÞڃέӈŸ´j㬻Á¥Ýä´6‚qÉ¥sŽXÝ)ðÕKnX 8„|â%4Žaá¨ó9ƒ‘¾§8“ êÓîPÑëR¢%ÊQ„ó[·©Mùà¶î‚í›Öÿk­¶~m}ÓZo­µ*­­ûÖ]k»õ}ë‡Ö_[Q+h­¼]¿[‡ÿ|‰ ,½ˆ­Ì–µÂ%¨:¿‘txŽr-—Â÷ÁÚƒæÏ„e„sX²•›u¢òo„¤Þ Ì" +e›3x›0ð’H{q øü¡bâ ŠTIè–†p¢ëC§òÄ#JÌ f^š+ÃEœ˜IoWZP2XÄC_u¤k“ópÇ\ÔðùˆáÐÂ'#YhÆ> Ȭ|.<¹ùVðü;§ÂÒŒGÇ{èˆròê~,c-§„ŸR÷Aš ñ›CÓî<Å\yde’z¦›¸B-Ù=0˜P„ð3 s9‘<6¬…š*ÒLdƒ€‰IÈ¿‘ñLjÓ[ÓªÑß¡/ô¶–ˆÒ™{o€Å*õO²;¶+>Çnx5÷0vïŸê›õ'Öl´‡"É×_—¹·‰hûl4½ xé~‘À9ÔHNÐ]ÖN‚KÂ)FV³jc¢Ú7ùKù½¼ü˜û|QÒýÃë}’¸ã륖’qѦECuõ…ÎtoçcÏf3ùú×òÆ×_‡ò“”7[exòÎ`ðY¦¢Ó7üF‡/¦Ôw_< Þ £C{ïõÑÛ%Ü$™•r£}Ýd‹O»ä´€f9!Ï°J:6}CÛƒ>þ:ZŽ—!æ~Ô¹i̸؉γ飀âÆÄ»Bt0´Y‹¶¢û9øPT®W=7ŽŠ¯)(ÏC¤¡£4Û@ärM.RŽËâvÁY%àwZ3 ¬ÐPt|\ÄXÜÒ{·˜×•mú¡3ÓÑ×îs@FÒ£?rþûÛºsŽ•Hñ´É:À´ž3]œÏ†6_ôѱ,€A Yõ4@{‹ágÉ$™\ œ¶rÒ9¥røïƒÜé¤MAì=(’!ª€J/þЧL»ÄÙâ¶hö 9é'£!Åx‘¼?šE²3%KS4ÝO‚úŸ‚ïñoý‘äÝÒçOêO:ôêImü¸#$ OEñX),U7æ[B|rΌиâ†3ÑQ¡.6M¼rog³(¨=Wý™±ŒFS¸F;ã:«Çù²Ù_¶­°ÐoÊÏ>CD×µ ‹!B1Ä+'ß ®ž´em^ !€«Â}ø»Ux\ɾ#Ý'çhµ» xáÞ®½6ªCüܬnÒçãêcú|R}BŸªþ‰>¿«~GŸ®þ™>ÿ£úôù—ê_†QêfÍ<:ÞûG°ûêøxN¤]qBâ¯|ª‚›‹ÕˆJ0éD‰i—ˆô.vJC±¯‡²miÛG ôž!R!ºƒÅpñüräôièñoUÄyŽ%€§Ã’ÛÂüòá îA3¸yçï¢Ý¡$6~{'‡óIG>5kx/o1¡&™¢(YC2¾àñE2r+XëôzµKÌGq`÷ò3Ôàj¸W0"œùU“ðm[A¸ñ¨Á½`6¿Þº­}ýhó ÿôêðç§m´^?Ý ý&èëï£!Æη{ÃÌà«@Ò§jÒŽ9uB”²Ã^ê¹^òG°ùhãIíÑFíÑŸëKç”&ÌDœ®ãÁìâ‚CìrðI´k†µÆ¦]Ñ%žÚŸ'ýé”3å>GAÎ?êÁ?:³‹Ë0IÐåHÚo'ý‹Ëi°¶[¡§5øó§àZ%ŒÎ§×©Ïо¦Ã¸ö‡]£,Å»’Ì—¤à6æXf¢˜³`఺ЅDg?æÙäúå!ç™b¹Ýæ´QÀÆQÍ{Ç»?í¼<Ýùqÿ`ÿôDZÏöO_îœÏa]ŽvŽO÷w_ìG¯ŽOöê&¸’é1n™,`€û¸3g3vǃÃÙ€.u²[L[÷!‰”¨[ê󗯂ç|5GhÑ  BÄc|» À±BñrJ>w…”ÇÚ…´‡ùC0å)'/›È®W8Äj´fîÄíü qr‰Éõþ¡`§g±„CW ÅÏû§?¾: v^þü¼s| ;ð˶ñ ¡ÝÁ–4$©n§}ù”=ÃT:±dóš³´ç´9#vŠ2šò/°™ré-¦žè#—ß!À[¼cè~6iT/O˜U›V ¬¿¿œNÇ[Æõõuýb8«&·‘4~ Á ÈÝx7¼SÒE+Í9H\ dçœÇ¿I#u7ú½É®ŒA¼¼8÷np{rHÁ€ Ÿ3n±‹ƒ ykÒ´Ô”‹ò%È9 Þ‚Þèš.É4Á.HÖG~†ÁÀÎ#©[cÉ`å%îuS”v²kŠ´=G„qòOMâó¦”$·‰dµÂÅg¼Ð³žWf­… ¬k’ÁÉGÈÛwgä­ËJL6n›(V9ƒt‘â+LÕiúñÕF#ö«œ …”ó\Æ>ÇNLAˆ_Œ`.±©îX›Æ†Ð Ûðe-jŽI€$AÙ/r;”“œQ¦ ®œI{j"ÒS32ܨ—háš‘ÍÖùæðètÿðå[Àìœíþ±®+\„«`ŒžŸ”h/,Q~Ü“-C'É$F&ÈéçB‡¹×¡’ Äy›{zÎã¼`™Œ(ë <{KÍÀæµwöÊ?07·fQƒÒË‘ ³Vám©Öb¨o ®.±+Ú9ýÇÚR\"½­5õCbÄlÈMJÞƦI|#o½£,P,”°“6~·{SúÙªõ ƒP¨E M#éÍ?ÊÔìfp4å8£‰ÞKØù¹cŸ*OÈÀT°ù/'1‹¡Xá$žLh-~r—‰Ö‘òÍSˆN.œ‹tê%–4à4ÃS”¶L°•@‘Ž¡ô½¬C·…9 ]LþŠÌµ¹\6ÈÅé£l´`½îÐD‘\wé…Eœñ(„Høn&\‡ö$”‰½D´G±:’ ^³hbBh“!^"ñeHîþ&o!³~Âõ½€ÍÒIÆ,Üíù¦:ðæiÜt4—£©Âˆ{¢)È]ƒ¤!^ lŽ×ëQ_N%D"Á3£˜o7,6}Zº}N :ÐeËÍêíé§Ãÿ·ñç’fHÇhç•LÓ³¤L_¦-…ÚþTm¾1µˆ)ŒRwº¬1žÝÀgqŒ!Óh{A¨³9 gMÉréK] 3©ù*E•‰` #ËÆÖÝèàD;Sú(î}粌°Ä¯n§M® óVY!Œõ;ÒÝ÷}ŽòÝmîói¹é}¦°àþ—[ßHlÏj]“ˆ§Éó¤ÄÊÌ‘çy–&'5ëS!"b ë®Ûkäm)%ÜÚÓ¡sr¶¾[éÙP#íõœv Ïè{ì0îµµË6žãd £ª„Zïyâ&¼ðq¥‘{9H)—‚àêÖÈÆÆÁ˜ž´‰œ#»jŸ®{7Su}6ÉÁ˜]5¹ LiŸ‡)û$¶«%H×'˜Bb˜@ŽQ+Š¦Bà;Tdg`XY®¹£›¢¦XjöËê*3­ZH OÐH‹™jhV§)ï²ì¢²ÆÈ€Ù $=@2ÿ õ F>F:e&@M;“¸ Äz_…vU (LÒ0XâyÒ\?|BL;œLÛÏq€ÉA¥u›Î ÇŨÿì¦dBã–áP_LƒG„RÌ!0'ió‚ͤFcŠrâ¥Q@º«%²UäŸÍ-¼V}ïã1ç§ìîf¸ÂMòn¥ZOÐ&ØsIG¯…6ÕÁMe\ _ÂT÷_FLj„Ž7êË› ¨.µüÚèB“õÙq¤—5õ/½bÎÜS³9“!‘l׶‰Òë6B7°ùMwË'_ï}óKȨÒx'Xú$kšÎÃNqÙ$¢å¦YöèYAq ÔQFälŽ:ß«Æ®ìOY’þ‡¸~rt¦øVXó9Ó ÷—Ñ,b}Dl4*€×xn$ü›$-d:iÒñÅkŒ!Q!Hj òÖ">© îs®òª uѪ¦ÖûêzCF¨i³ÙhS‹V‰†ÃÐþq(™éN†Gꥌ^{¸ÙJ8×Õ+:¦è÷0€‘Ÿ½Vź¢uõ9}·é’×Ï|€wåùt åAýse#`‰SHÎ-ümJuç¼Ê´ž©L^ÿ©òÞiP Û‡ef¼µÉô”Kª³‚×6EË#ÓÔÉç:ù°5Ý»ÙmðNhšwù^oß–bx>)÷¡‰…h.x#54ªJRè9j "2³; >„pWË>×+M’P÷ÙÅ¥Ë!— üŸXÕßñ›Òåb›0¼/à•„u £ñˆ³Ša%vT5ìXûˆc‚¨ áxMc¶z⣪…ç˜R‘‰)½‘,XiU˜BŠôX|(™ˆÌîÝ“SaœDaš°Ú¹mšd}fžzœÍR/7÷È!Î’âóÀØÇ,Ë nD¹FòÜ>gÍÙ¯ŸRN×ó±d’i–LÜJ•#£ÙIÂoÈWUu%ED²q¾Å‹ŒL|É®³œ×ÔLår‹­ÓëEL|Öh‚v ¢e€IÌq!;fÅØ÷ 4≿:)(¡ØY=šrNá|˜¡ëßF§Ê·ôHƒJè‰q(ä?‘£¼[º!ëÃQ¸LšgNsÔÊ|½0ÿºhvÉÁ¬³ 3+—uÇqZø•ÀWäÝÕn®6ÀÓŒ(€ÜMT ¢sÜH÷gݬ§“í0ºˆ’üÎø†#£8¼sÙ•Ò"Çê)½eŠR(bJVVòÆã ÆŒäç¢!è†5a»”¸¾ê‡K.ìº#ð.ÇÉý7ÇÍcûÃRûdd˜¥bnÕ ANéÀE÷ØPhw"»”9MåeNÏØækT½ÂÝ/œ íyÉ^#9+ö‰]#Ü<¬ï¡›S&ûÏõA0yT:*’@ÿ‘Kâ2-úþÄAW+]o•æËܬÖi·’-'•É‡éçÉGË .!tîj*á³åökÌ*fþj„à–jýõ®vYqW‰å^Kȱ{eˆ…ÇA­8’& …È€;Œ 6Y¨é¡œmÄômPÙ*­ÔjëM+xq>@}çœV–’2qµöà2 çnp^¥ VZ/Ü£üEI ßÌòþ\¹ ¤pŸ)[r} …oŸÆKŠ(@]H…ÿ>À7ÿõ–¬öoX³Z­’ŽÐèTOˆ™‘¸yl^à-ÎÂ?¬›ÜrÒP3¥¬HtN\ÇOe£kæry‘EÚ¹ÕQËÒªr'•:*'’Îù Š‹®ÊVÀNÙp‰½8 SèÕähà/Ÿ/¼J­”?â9üòS±Àu ²5¨ýLµÉ“ƒÔS3W<9de/þ\ú1,f´3cÏ0Û”ÀL"Sk¡ktÉIº“ø:î±i9J²böó¨~&¨³æqí¹†[jðGMíYK‘¡×\/rŽIµÄ)WÎn5£ò~Ј¡”Nœ"q£z,éöûµ3Ž&‰ÓÉt o,ðþäTºNNq<lÛ\Á´ Ë.½Ÿo7Ób[™V’Ê–ÈÒÃV˜W¦lÛÕNªÞ”Ôwn¾^lÂ] ]“¬Í¦»b½œšìüiZ M^ƬŒý¦“mø‘—sÏaaƒDÏúÄ=æ0Zpy°Ó9:ó‘Õ\xÎ(–JŸü‚+Xý+ž`$Æëv¢$g »X××Ú%+‹Rç“OS–lôŸG>fìÍÉv­ýMô7I^,–QQ3¢@_õÒëdÅ%‰fý.;Ã^/ì˜nWÙI„608G£¬IJ™ÃÉeÝàcî¾9A³²`äoWÎñ×_7×ï M¸ÐêzóÞ]Ó𦈳hŠS±%U“i× –JኦçF&Ï‚HL¶¬.>hŒŽ.E ælÖÕKyœÒ'-$w¾áìÎÑ fƒkb6¸èÝÜÕúÔeRîLƒéÐ0š­µ:Œ¥iFé`5S;}À-ÉòÓáñéáÑéqMRGݧúÓÇÝ£ìëUêÌ»'^Æ!/ðØoäfõÿÇË®Úò`ä­Ÿ¿þõ~^1\L:Œs˜Ëû?þ¼|Þ\iih­ æŸ‘2õês!ÜT¶@N:ÆÝÌIÖóg1©Á’žO¤5Ð>8J{GwåG;Ï÷ŽkhÍ{ÏÎdx8›GøäØÍÓž±£ø<ÊúæÊtjˆÙ¬]„fp[ãWëÚøèðò7Ûãm›ìã¾´rYZñ ÿßsè rêJu˜¦Y½IáðüT û'æ-Jÿ–‡­±TÄ“HæÀ‰9<çÐ_:»fk»•ÆWgÁ…M¿EVà¦@«ÞøÊ]Ì—Î÷ä®5„-îÜ,"WßÊ[¶œ>¿zþºjÃõ,n½Nüm–'˜ÈÜÊÌ¥Uy<ªý¥Z{»þ&€¿pŸnÔþòVµ*w­ µéVç 5=¼ãÉo™O¾†æ¯ÿsCžÄ9IÇ5‰Ö0ú‚¤ª¸þ¤þ]dé" 9`\9I$NþÚâ-šˆ,åƒç˜n}sî8œ­ºXJ?CÀéÒÆ{`W[4w · IÅæ€4–Éëé°i”?SÆ›dòÃë@®¹â ­8Šy›}^Ó;T˜PÅåxóáô¿Ýb{@ü~¿Eíb¡Ÿ.§áœ˜m âíé~x¾‚‘YdS¿SÎ »ÃÁëÊn˜dwaaˆ´‚˜`<³ì$<ç€dw€ÊŒ~ßÈnêä |‡^1èÍ&ì…œ2m²–#sƒ7/ŸîÕDbú7äŒðaJæ_«uÉï=%*ßÒ®ëoQW'ñ’þÄC´Ö×´èÎ?b ‘ÛmÊbŽÇÃF$·ä4ïŒÀÄ'É6tÖIúÝÔŠ|ƒ¹1<;M\jÛF/%-ã,Pʳq0KðÛ¬îäÃ)ïÃÏä’k«¨ïS­7ÃŽvX˜ª#<ôñ,ÁY ãa÷VÂûîÜ)¨¬ïûÀíÌõz0Õ§‹æéÎswp¶›.þx‹êxn»NÕi÷]gì&Æe.Ý »çx¦Šºñ ×Ï‚¿ç^%I#†cCX8Öîñû‚‌²T"°VûÂg¡$d¦±5¶Œ¬;ˆ;CÏ©ŸÀ’NžuËDÞ¯'ÁZF“9f´9 R¿;&$Å.â`½B£³A+Ú{§Ù&8v¢¦Ü@a§FGÐTî@Æ!6é¨ô´dª ûpç{ƒAÃKGZ4±¥u0™“&mÊ:ùm ”KíáG¸÷ž)¹Ó;A›H|ëÔÔŠ³¡ß¥l€íƒ'u$±»%½+NððÞ ¡¸P|}á{L¦­¾dâàO8|7UK‘ƒ #MâÜ9;›p¸KªñKŠ¯ŒC3§„,)ÚÄÖKäåŸac½8J³Ü §äG¢a—J4l>á,…sañ(ðWÁ¡²¼‡S5 9.ôÞ›u5Ì[I¢+ø'ÀE0ö4\Ž’i øàláÃ%sUÂõ¶åÈü´wp: -P>8ÝÝM¿ ΋d‹^>;Øy~â‚­‹µŸkÃÙ_૱ _ÛƒžQÒ –4åí‚çß%ïh½µÖ»µòΫÓÃ;ßs­[\Aö åè´—FªÝ×Ï·Q:vb¥ÁN}_j2V öC½äÌ65#$AÈ É¦qþRC³iä7<–ka‹6$`^CñËCý"™Ê`´9 ü?{»§µyê¥Ì&¤ÄvÊË9¢ú`q(× $Ì”ÊK°&t{b4)á,`ÿͤÑjAýV¹Q/c›i£4ÚÈ y„o£F铲“Ð4Q^6á´]±Kb3wl| oîuŽ/6ü—Wa#ßÆK3_S´¬ý -ÎÁþ°žµÃãÚÉá«ãÝ=z?O-éËe/ÒÕ톌±Eõn¬a%‘V¨»UºylµÔyëÈCvÒ>õ–lýš| ˜6ÁàEA»_™uÎ òŽ4Ãæ(d)iÉÚüç4%w­ú›_ëo×Ëw0‘;#zM«¾}Js¹é_Pîwù‹›£÷+ÚŒJx†6,µ*fBñ² ÊG;»ßy¾”zwf”olõgQÇG<÷¤“\À_Ã’5O‘¨Wî¬ñÞß1 í%žš¡ÖiÖÎx·){A÷¼ýº òjðãÞóý—xžN"-„‡SfïåS[¢d(&Ÿ7¬ºf†ÕFÙöà­²ÿ¼ÑÛ¦§Ô¾>«¶Ê½0Oǹn™–Ï,AbB4âüëFF¿²PFßÑ=ÇШ 5ô‡Üf‹*a€y«ÎX ŠŒÃµµêò%‰ ’Âø¦Lj» lMmÉœ%½Å¦œÙdv@bg‹i?®^ Ä´ýágâg¡u< P@!s !+«ÍùÇ¥ƒŸS\2ƒädă™;ùƒþâøïn¶¨_«þY°÷Ëpä4á„3Ô—ôòÊC(Ëùy- i—ײ‡.?%‡ƒ3GÐÌDC_Z0d¦ÈÏíbä÷9ǽKýÏÔƒ"?`ŒSö0Ë œ7% ™ ’½ƒ´ÓØqÍÏñ‰A!ش⎾їa±×¶‹×‹Ù}ÿH¾,<_eúåøþ¸“Ïcà»&d{&þõmÙ~/ÝÏ‹<0Ï·3=úŒñÅüeo¯­Tƒ*9«82¦¥J&¬ä„¸˜‡(S¸~âÎ ¼•S *~±h+Ð7QªŽ¡ò¥£_8ã‚®B)?Ô jØÇ8t΋¾ »ÜÄzSÊM¦x›n`†ðà ފ·6ycÙ%*=VFJ½ŠçæÔÕ8Ä)‘çnµÀ—:°´¨õÄš[tþ- û0'¢ÂÃßpdÂkâw"ýæŸ?—:\"r‰O0áâ•üRk¼xÿÖ‹ ÖüewýÁ3û¼ô&oýךÀ´sQ þ|ˆ–wsÐᓘˆ'-¶¿ÔÝéEYþxzáSþ¸[Y vl±‘Bsô]^ˆ³-'ÃÊÊüè +^ô…Âð dü…\’õ“IsŸðÍm»äQ矽áËp(“£¢=`ÎeúÒƒ'Pñí£ 6À“íÉlE‘Cy«$hÕ©šAÛÐ[¤4\„M²[ÞÒ@è¤6 …«¥‡Vƒ“Ñ“IoÚô_h€"VKPí§ŒåR÷¢ß€l%W‡_…_ÍïžüiÓfˆY1¸¥\t»¦(þ{0è4м ¿¨‘~¯ù§¿üù?þCUaÝÛ‹ëþp=¸ Ö¯`ç®éÛøúñ&}éÆÐ"}KdìôcŸ'B k_(ýÄLžÅøYƒ×—áMÉHå=˜É”<æAí¥ÛjS×æ¼ÝÓ¸'4{)Cå8ƒX®r.;P¬Æ++ÑÛÿÑn¤þ£[®WcžÚÅuFu÷WŠwß]:¯¸QçxV繄äÖ!îØîOòû>ì«iÐœ5´±Ÿv&A2ƒ9za§½vr9‰o¦ÍVXæoxD’–SùpH1¨Y*Ų„Ýnì˜ÂU²ñd=¥Ç1±U¸PhVC[¥QÎ$­®q©sÏçwÏ'ˆ¤o':™AQœ‹`ã‡o6K.‘žŠj‘–)7wÕElB¸VLZ‚š•b MôLÐ>›Š7©oyá$×*2»5³/L¶Åîn¹â¥ÙP¤Ñ†i!û‡]eóƒÀ<à6Ë\E=ЕvÄ92\YMÜ™`dpGh£IeÍóKÖÒª$¦Ôj@ußcÔî‚ܲÊ+›ñWŸ$ø÷µ´«9eJW‹~·}ýõ×/vžïï» xñË6À¾S`ïõž_¨”±é€ce´ÎpUu/û0º¯}˜°ß4)ø¾¨|Œ …Ø!E8IÆØÙ £!š5a*®,éO)!1'£ÆCŠ°%Á؇=US™Ø–häPS:ÑižÇA|>%Ç3¤ûÈ<›æw‰S.q>u›T•aKœÍ ɉɇ#1'wÎZ„θÆ(p0À#á¹ ²¹'êâH‡xuq%ç'%’=»½fÎn“Áð †q~Ž8:Ç´­”wÌÇù‰'^]²Bë¬úœú•¬Ù Ê%º¶MæïËΤ‡Ù^³ä’"Ûö<…‹Ç_áÅO4dVÞ0ÛFÝ$"¿®J’m_}]5naðCà[‰8K0€ƒzIÎb3õgû{&Í5 s£ú ¹þl}+V·’î75¸”º¸p5tĆæä{çœ a¿ùÆ3Œƒ'¿ñ Ï>˜³®™Å™ 1=À·FÃ"1¦¼@äâÎX¼òÈP#' ¸¦+ÄârØ,#ªŸJÂS8ÂUήÇ^*‰À4‡RïF»Zó ^Ã>` wqþJÞ„„Ÿô/úØy©wȈrÂìàà ÁÆ^Å4D©’I4«Y'è2Œ/(yxÀ¨7¸&-ó9 “-`«ëÎ-Î&ï)ˆ[„ý9YÂ(k‘fs 8Èj5‡#Ù°"¿'æ7¢¨àOßó(ø© i2¸±6†Ð6‚Íàqð¤´ÒqÄNŒ˜¶§¨‹$ÇlÕ÷ŸqèMïÖ;ìA+å8•ý{W˯o#ïj³D3O%¿^‡Ž1â¼úX4å(b!}Ð`q£\ÜLƈqÈ9-[±C©ñj$@ÞZpÎw ©š êZ2]4Æ<t­£–¸´òEŸñ›pyz  ÊN_ÞÒâŧm@¹mØu3„ÿ×È|ÂaL¯£n˜B¤T«VT²5ogí|z^Àè’üÄt*ïï¡ÅäRÚÌ݉‡c ¼ ÿÓOGñ‘0X†]iîæâ0•*WøZb¥­=º´p ©`Oß)ðîn¶ÏÝÃ/v^>=©3 j{÷ÅS\ XZe‚–ÈäÙغÉ`ySÝCñªa.ÄÄÌáù†5€:_•²ã.TÀ£4¯Ý?O( Æ6Å°ˆþ_d<50<) Š6Ò4’±Ýº9€VX†V蔼èR(ùã[â…囵­û¼€¦¾ Ñz;c¸þ…0Z•äÑÖe—L} AôÙ? Ž»Ÿñ¦?e¦dj  ð”ep ’¿9ɨ:0BŒ>€Û„ç'lül4½ä'¸)ø…Ð'‘4[ÖѺÆÍÔð%eŸ¾2 –ú’žË 9¯çµÇ•* ŒÍÕâáÚfå« Ø$£ªÉjé$©;‡¢0©f’©¼3©W–q~"Xçâh±ÕZ¯¬Ôù(™KdŸÔγ´É3R´ØÊä6™Œ`€G;§?Qjâñs+f(Ç­k"Àá[¶EÒ“kÙxBÙZ%^,R˜èê^Њ5r;—)Ï©Çòi^9Åxmš"ðL#ùf„ˆ>œ×€ƒè‹¤<*ç"ô’‘êš›¡µM/9à"Z^r7H4JL¬ëŒÆ©¼'„áeS¸‰$oùs»’‘™ÄÑþ8dõ…Š6³ÛRPûëúVè<óW×+Âë¼á­fÞˆš°'‹VQºÃ´µèÈŽ09(\؃(6ò6¤?<‡ÛÕ†ÉåÅ¥ A <š¾p˜œOñò%Úûw>Àõ@8žw^a¨‰ëN‚Bþî%pzpô;ìÒB:ÖÐ\Ä£hÒcìª+J¯ÛO4\µqœ—p"»»A<üПŒ†$v6$çƒS=]NLå!<ñjí7šÎÔ¾M=j¹mÈämY]wÛ`jƒtY÷“Ü,›ˆ=)™¬#x«RŠ‰Ïn Ämf¦NGÅ:5–߈Ù;Œ u«ÿ"áÂï]>°2¤¹®_‹½÷~/§¼—\Ÿõ[àó%’"»\G©¨±pQù÷}mx r±1ì3c}'ÉOœ¸RtþŒŠk4ƒåª±S)r%’<ù›‘Ã&ǾºŠ§Š6©k ËœãsŒW–9Å+?ÄVTÂ!¦tT+ŸbVþ°c×ÿtÁMà Àÿqbk’,‘£ï‰Ûwæj«ÛÒÌàË”ÖÀcwÝNMMã û»>a» ›˜Ìª‘ôLDkDü÷ÌdŠ'¾O7YkI¸ëó•õÝc_»˜ÑÉ s³(19×/Öun`*jF‘%V+¦!JÌ[x¡„ÞCö¥ l¡•7[QÚEÞ)`r¥©Bû!Žùܼ“®u%E2• v×Ђ¼áÊÝŸ? ¾ÿuq«AÙ}Ôòw®”Rf•ŽŸï¼àxJ*3¯XW>L>}ÄΫOƒ—‡§@qJ´±>K¿B‚šyÃij¯Âð½ª9DqSG¨|‰°&4éÑþ®Œ®^BØãïͲ݊t 4}²µJð³­È [*Yg·ò‹ °Ã_:”¸OÔ>€cl>ôŸŠ%(ÁÜÔÄìÁ­ny?ííÏ^½ÜÅ ˜'Áê§ôâ„Etnn“¸ûоLמŽÚ×71ðL)“DÆd~¡3Lgž[!?C”OqÜÖõaÿO5Ù*± Wp¦*bŠ ˜`+&pI[Žã…”’ð†ŒR¢Á­k…ƒ£÷è`C¾U-«Œ…(¨ÆÄ[%:††‘ÃçéOu‚YX½Úd&vÒhð£SŸ²ý Ž˜ Eê$a6;q˜?ìgñ 3ÊNáHØ’¤)@~D[|)`ô%Zd%½®”–ØWUM{LÚÒÃbÔéqt.îZ ^¡¹Ìt†VkƒÛª]oWQ8UžÅßãÉHfÕõb ‘{KkÈ>C{]^c¦Ý…>ž’^vD¦pÕ5f"†Í\«ÂK[F蚈\n†Eˆ­ ’”¸´Î èƒý) ;ØØü3íÙ9Hcë&äˆX%­sp%Ê N‰Ëo”ÑNóns[´xÞq9x£¹!Í0´ÞÀdcõè^qæØì.±ƒÓ«qóÙÚuF÷.3à¯!0¿±i·Ýïåzò/´åáËDÎZ²'»špøˆa§ÿ!n£%J2è !Ñmø.}‰.?,«Ë%â#Ëô¶–¨_ÊǶ¸À¶´aK#Z‘2}>¢µh–Pîç!ZÍâèÑE!¢±KÊ g¤ÉÈ¡k_j(ap<>ãè j*•FÍ`@8ágÂÖýáã͇!êôžI)â<)IfrLß=F…® ’üà8£%ïI̳MŠ‘£ò ’%F{N“Âß8ò[‰=JÈ¢^ZÀrÑþj0›ƒ­‰úæFiiq$7×`’{s¬Ssî½ôV&6ü–Ñe-ÑÉy¾²‹Û]ú¸çâl_ažeíÒÈdnÈ”¥×3Neù­X~¬EñH\Ãý¥û Âí¬R6°‡|ñµŒf‡ç#æôÄ|Ë‘å160ûnü,úð΄$*…%ºC +RC©ýÁi{÷—çŒÏ4pˆ±œD N<»k•ž&’b—•|䇓 ºÂ; »ØpmsXØF^œürâ“Ô»ů=vûãõ`Èb- Hƒ6«b´ËÔ… È’ºh߉3î½åÒ-]ëǤèÏ©fÄäª"Hš°T2ÅêBÛÕþh–0!ÏÛ²8;’Å‚Fi¾\¹âLåqjÔ…ÃÃ.3å†B YƱôŒä Pn‰­ÅÁdô‚:‘ÌYiY†scRJzÁ‘Ñ®„éHŠ´¦îÇœˆŒˆÌfÎ’ÑÍháˆSx¼Y1Œ‹‚°ú,ôÒáÉj¥ÁŒËÄA¼„KòŽOîã!HÛ“£ö9÷_8H-g³€:´eQ6»|…Õ|ä!ÊÕÀškTa¾œkbˆÚCïºð`é@ƒ‹‹9ΰµ"ÄØ8# ýÑÞ€œaÛQ&ok‘Wc8Áq§4æUr›øäå®\æY¨B„sÆRLm  Î&®¬Cžß«¯J.[eÒ¹~F¯[dÈÂ7MP¤º„c—Ëõ´ÌšïÖ¨™F£+a,‘óIß.¹W5áÜ=¶¿Î¤Ö ÊÙæ4Nïc. \ó î¹9 ˆîV#±\ ž‰ËƒÃ‰ç¬‹N,•RYX!ÌÂëùìøðEÂÉÞQpzh¾šçú0Kö=”¢ÿ‡Ã’4þPp z9pêpÂ#Àƒýn ®$º a3ÏâÁè: pÎ-¸')€{ü€#_4:aÉ—·Ç¼9ê:(TX³ØE ­Ü $É€8º^šÙ5BùÉèCÜ ÑV+ŽM45t~«û÷*e‘üŠr¬núLÈ`j,kˆ_ŒÇmäÔ“f˜Ü•7îÊ›wÆ Ãƒï†üü8_²SÔEl'¯‡ò㙤ØC`f$qÞ˜„ÆTênÕИ¹ãÈŽ!Š³«)†âì¸E¼ù‘*Xçìüó–…>l’Ø à)Ã8Ö ‰i·KhÀ~¤ž®­?d+ÄœŒ‰k†GkƶL¥¥q¯B£F[d·þ´ópaR»v²Åè ZÞ¬»âjXöŒ&áUC hB6‚D:®v¦57JKqsE âö’ÅnSúCÚ)`oi‡Õp¶$³M¸Vˤa1Uˆ-ŒoÏ@å)*ÌãÁ,ô·eò¶­­»òDlZ±”hÎ\<‘ô%_TW\2 £˜XОCôå-ÙBîp>‰],ežÏˆúVȹÍ/Ãl–”¶(`‰Ø¿¨fÃ9°GIâ©¥AB¤Yùœþ§o ?Š/º…(übKO+ÝTÍÖ5[Ì!”]9É«¶cfmf‰j…]ÉŒdyéRð¹ðN[¯]Ñßý»î­f¢êß,½é$Ìnùo³>gÌ Ÿ•Ü$&„³Ó²–¨ž”‡¡F;è?ø˜çèy>á¬ëHþ¨­·+´àg¡…{¯¸ßc»ÛïàØ™Hüœ=N ð? ›ó:ËU²eÑøràá‰}ÿ ˜Ÿ—q>X‚*§T2Á4fAT3˜­—R°”¾W–"ïçLð ß+ªêNãHQ¾S`¢éÈ/àÆšÔ²}Z sµ¤ÿU ÔÛŸ‡òÛ9¬vÚþñ“¹ìB›=ƒ}j-6–`²Mb­Þ‘gö¹Ó)9Ï"óŸ©öQŒdÄq]T5—xÐ)´®©Š{­†wëkg¤ëÍJ‰#’i¸(>ƒ9ÖK8ÄI=I‰ãç¥*C6q[%‰Ý›S<[9 ùW÷ÄØDÑPŒ]ÃVŽ(Ém‚¦TÙfxËÞà²ü ^à¾Ï0f__ò G\=!6ºdbN-âì —†ƒb_Ãøº°—-kÉãzDm#d€È Ê”í='l! î{ýi;}LÔ)tÍpÄ=E…9ÅQš³¤áxÔBo¡õGË;‰‡Å©×ÐtB>ЂUÉ}¥§YšyÑ,-Ô©—Ò7KÅ£^BO®’¡<wá,܉ÿpz”Œ¯3#Í]¡««I©’Ay8_»û™Â7?e»/¾ó'ȇbÉ\¾¦›*.#¥ÉŽ=ÛDž”Æ“qoÌ8çKièU±”Æßžÿ:š«õ0Mj çSaÇ’Ô]Œ@)“ÝB+P^>L•ÐâIh@ÅÍû DâÛ–šSÓ¡+v‹êÛum×£m5Dö¬u$e“‹¥zÖ¡? †;ÌÁ [ð¿|n“Öez5ÞhÎñk_Äãä·XÔÛåXA¡æ´í$â-Fî› åºH7n­CKë[!u*‹9Wu7WPÆÓ˜#(óOå——‘å à Ÿ"TáÎ]•­? TsuºŽ°¬6.†–wÿAn”Žïˆ")qЉÁž€îÓ¥7éÿÐùvò_£Aÿw†ñyâHoÿrEP9–†ÿ&IdÞØþgÂó‰Gèdóã9'!-ršó[ÿ~ˆßzQ$uuÅ ÿ`+‰[³‘ëÃÉ”‡Š\ÿMľ4@$?îÒ|Z¿šCëK YŠ¿ú_ˆÖÿ”ëiñ™.ò(úÿÎÁΪ%è`ÐîÅçí1yå‡Ñü¹?쮓àéÁÀ ”ŽLðè¿Ç0Lðp;ì²lóåBÁöÓ½gí#|¥v•WOJ©‹–)üÿ‡—–mÕ}³¼]Gcuû´ñkkm»¾Þª¬—½È/ÞZÛ{}tx|zÒº;Øÿñxçø—V¥µ†H0F2•~“¯ªë¦# …(”Ev”^Ņ`B5u&èd•}1'Ñäs ×ÂEY´ªÎÜ&Õ½ ,ÉGÓ Åþɤ‹¯›eÎcƒ-Áu°Ç{ܹŽã-ÂZÀYR‹1™QžPÊÛ8I=$Á7wóäCÄòÍñ€Ñ:$6à2ÉæÛÛ˜°CùJx%quóŠi£6®Æa *¥FœtBµ¹FKÞ}¸H·RlMË]˜Ò :A#Ml»´’õŠÍt…¥` / ¢’_Cûwëò;çN·§$=—=¬9v0”™+Å]ª(¼‘½C$ÒqKL¥lÈœÛÑ ÓQà‚hôœ¨6Š8¡æHFÃnLñvÌx‚øÈNArhÕ`‹‚» v®ŸGû{•oHÝMŒã¤áª² &pÁýmÁò£™6| :'Зû AžTLh é†àg~˜VP@“ª{À;åWz­Ñ£*ÞâœÁy¡*ñ û©]ŒÈ­™…÷AèVHIùOœnÔ‹ÃTI,\sÂXé÷É/ý g8 eÿŸŸkRƒ]ÊZ ¸KÜú‹ÇÛíØ@ö¸xvQÇþÜ­®Ûåt„øøFÄöº¨”_»àÆ^ =<´ºÙp¼Uêʼn–†ÍÙxi~Ü•‚ðgÒ‡3( }–©ŸžP ³‘&BwÈ“Â"pF{ŒTM~±4Þ¨§ÁÑ Ç^— ãå7¨À ŒlRçHžr­¯h„3uu`ç,†Þã$·1®éÍ^êÑÆéµ@øŒc¡±(Á˜ÁE©8Y‚>Z¶™‹v[]Æp®)|&GÛº·C+Œ{ç/©]QuVÍUQ*¾"à·gŽ›A“¤#4!Ɔ~ÆUƒBß`—qåCÖûC—¢°ÀØ^÷C'h“ÉÛ!¡žœÔ_¤¬s.… Ô ènîpswåEn—Fï‹Ó‰kÖ+`L€˜„+­Äapø™Üp3ù{rCqdÍž©ó»3T$LjÛÝŽü¥Œ4-Âhsd;ÙlãøF}JÒЗe!#¬ ˜‚¥’ÌáGÒ_ºí¨SAs½8¦ýGÝlÛ9d ¥…””º(–“KC?7¯LV’ÙB¥˜Lv+~Ð:""òè=!j*ZÁUJµƒ”t~C–&‚Æ0LQ# Ë[ªÉÔÉŒ57[iQ²6ZÙîµÁ:è ÷zN†6+Òü$Žlí; '½yûÿV]ÿx¿ýý #üßJðÍZåî]ùÍÛÈm‚ãrRå ”#Àw¾ ñ”ø«ãŠÆü·tÂ…ù0h”a³bp°–³qÏB,z-妸`Þ‡Î"–1 /¤ÉRÉGë>IIæœR.º¼'‡] “?å„È…`j4ÊŒæè¤þà°g!ÑÛ¤EƒóËyƒÊMØÀ´³¢Wsn%›iõphT“(ãŠ(xR8‰;ƒ¢"’Ø@d|¨)™ ¬éíXXX›]µ=J·ØD¦&©¦1qÚRNfª¸Ó5‰(žƒÝ…Ñâ‚j-ë•‹12($ïWœ0vŒ+-@¯âé娦B:hHÇ.>>ÞÂWì"QŒ‘9#¶+¼Ûtg Él2ÐIÂܾ®eÿÜÆÝÅàI%™é¯}ºßk¹ë`¬vÛ#~j‰ŽfèÞ;vŽ’¯­¯7¾þz;H¾nÕßüZ»^þúëè]6½eGÝ÷LíÚVëø0 ‘N§ÊÄÇ1=M4—Ó\jåF§})&}"ƒb’L2çš´Ú‹Õùg"’¸Š$¦Ñœ@W÷±Ð€Ã÷D1u>Œú˜Ñ#Ãr$X2{Ã4ïÈÚûë:ƒË` •:záºñ8ò½X#NÔyvXþ¹Ó§±àímªˆ¹(Ÿn@>+ÉM›éPôpòëÔçÚË™f†¦!‡ìQ`a©;CŽ7–”¡(UšÜJÂ;ÞDN•W²)šœø±,^×À²]ã…NiO$âRª^>%Àëÿdyg*ªuErâéXŒK–œPµ„ÕI”àÜFxC&3àAã^ݯáNv%r^'—” Ád‰ ŽR•ñ€Qi¬hÖþU1žC@ÆO‘t%Kdw:Ú‚É®WÐJæÊÇ/‚²½0‘\qzܬÈÉÖDÖÛž\%B3HãvæNl~×~›ÓIg Éü·sRG”ÎoãO¥R®Û§;“ù>ržÔ·È}tÍçÉ~ó[ÊOÅ[r’5+mƒ K"´í¥—xhô$˜ËªþI±©…JnHD¸Bû¢)ô ”¨¡£–Î’^û²ß‹G³¤\bfófcâ]Y_yw·â!³š>å”uíª‚”‰Â&]9+˜8à ò’éU¾¸½0“5š 﨤„`‘¦gA¦sZt®“èØ}ã”ëÜŒ—kĨ!B¼Ý‰r+’Iœ…H½C@¬4éJË%GNªn;4â–88é)æ]'˜šqEY˜9Ø_Ù]êåî˜%/–3Ž%&QH¤ÒVÉÈåþ÷æù/xóTóŸ Õ=·1I'S£€ “õÔººƒÜÔô>¼+“í>fˆ¸§5•–.â8ín%æ¨ÂˆåÉušå¿nK^MT!ÊY†r¬ðâi8ÍÌsÞŸ$Swÿë©™+~w•3fniÍb”NÇùdË:Ðx”ô±ïZâË ´Ò»¸ð´Ë]Bù̯[6ÿrøT$_V•šg<ü®1ÄSz^y¼×4Ÿ‹åWƒÙ-‹4„E”[€Ù oƒ^_‰‚°Èí´œ‚ƒpÉ‹%°Ë'‘aÿ{›üïmòŸ~›|ÖMñЋâ‹ÞË$d)Î\cuZaZJ*è«]ÆWÃÁH³#ä ]0À–É,ªÒóY¡ÃŠ#™4§ÏÆeƒ…Hs’fê÷<4N^íîm­Ine1hŠÃq,XÀȳæBåßbXʵb_S“Æ”ˆäJò£×O¬o*BYZÑÍW„yXY.=–…j÷VцÖäCràô»Ü†t½™’@½gïþ„ÅQ…îÔM'³3‰pê%Ï¢Û6O¬’£;ˆ;C;Æ ­Rø ûÛâüm$¨|sx„ÞÒoëõzP«‘ “ê°moŽ_Ԝה„¶^/•Ä$G“Ø©ð•mâÔc¹êíÊD5,¶bБæúáö€+uû”9ˆ$¡´dj·6½‹¶ôðaQ“…²ÂÀ·GÐû°×™ô"/3˜AìoÁ *蜘üðg·,NÔHy™ÀÉöÛ6,¬f2;K¦ýélªUwÚI#ÄV°’@ci´õRJ}ÏeªPh0Šr«deÿDÄ+µ5µ|ðC¿%”»£.½„þðÄèØØ®Ÿ¦ˆtCGqÕgœÐÞs‘z>1 õWÛdì¤b4î Üþ“X:w ä磅¡Ž&+P7%*!–0ÆF…¬Ü%&f¾b)7WæÄ&FáLËp“!mµKìORazÝP»Co¶$Ö®¡Ê„]2ŒíCI—µ‰66CÎÒ0¬eî)Ùüžûç™Y#°$ÞÎa ’ËO7®¼9Øÿñéþ1ÃÙ®8/Ðe X;ÎÖ,i1ti¯gnAb !J¹³Üʧ6Ëq¢é5dd=8¼±,5âùxB–RãIÿàˆ h'^óDq4j5 Ÿkp"MÆÙ'Þ(ø׌xÓ!E4ÀÑמå§.~î"Ë2|â*Kí`ÿåÉéÎÁs0Ë;7šóhâ-QªšTÞÖÈÖÙfÖŠ“ Ç{—Äl–VJˆ°¿¨;Ž<´áGX‘†(Zz8| b"×ÄndpËX{ k³S ŽŽ¿®! à†¹¿Îñ¶º ¬ÍÑõåΑG5A`ds™Ë¸pFzødž"_Xkt7ÿxò´†-t8“n’ÒŽJø †|½J.Xàµú‰0Uáмü» øÔ¹+}X0 ?…­@ë8NXzß•$*%¨3ÈÐî®Û­•Ûø:»–Ž¢µÃÄgE(vî£d.æÔàÑÃxòF3˜à›O !ˆ“{·°Ô–ÔAî jPE”fÔ4†­ˆWZ'Ðçrû²’Aëž¡4hü¸ÿ’€60vC&Ì^ ¸7é­áu›Lã«„#•‚œv[5[0g–„+êœ7•ÉLÐáŠèŠì팗$@>Ý“Âb+¯†zpoS<¦)nIªic—}ùI÷]T Lèêl4 Ã4˜¶¡Ö`Ô»­-ϱ±ø…T5Ý t›AÉ·Ö$q 5{HFƒÊëõP|íqÅiOëŸüòB˜€ì?!ŹSÆÄ;KU~Œó²¤š¯Mà&¹ Ž÷žï½þ”.(ž:GYçjr'šIܙث¡ÄЖÖ0`M (€¸óÏ]¾‰úƒ:·%Eðkc3€qfƒØiF¹-Ëèð…‚‰pZç@àŠQ4ÂÙ©ñ4»oȪk˜ÂA’Ô)K X¬$µîá’ ŸÔ‹»ƒ{àLAi(ña¼¦ X3¼¥ C÷©á@Ôغ§lµ@_ÉXÛ@Œ×!B|å¡gsd ?¸í%›½Á€.ÞNÊTJv³Iè!È‘apxÒØ Ö†0³ós’; %ÿâáIœT„ í¢k@ú_´œ›¥s.c•¯p¤)ýòñÞÁÞÎÉž‹ëºïQF¥0Ûú$㥌õ:ÀβEFâºyì´ƒÚfÄ¿œÅ¾ÿ2WÇæŽßo½“ƒH!-Œ‘0l‰\A‰ÊÚíÊpßtnáH_y´-70A]äÉ«g@©PpaL4X’2¸)è@쨦ñ0‘EÊpïóo/ŽË€äš¬É;üL ``AO¹­Ë½XÃÍv_ï½<}³u¼÷}Œ±øfkçùÞÛ·¹ý)ØèbØXôÐÒæVO,*éZy„ÍÕ®ãF?Ìça `Ç."˜‰öÑŸV ð¼ÓQ~5þj?HêkOj‚º ¤ ØâÀ¶È•#LY¾E.Dìîú͘FRM¤Æô€÷µÝÝJ©„ÑMÁ§%~)–ãCOMTaj™Ö{È¿AK·Ò€që!5a"ÍÕ¬8Œg„?$§ݨ>èDØfÉ©1z«Ò›ˆP'ÎA2ôîm)ECŠ“Œ‹Ç):¥Ž@˜ü¬¸²Ÿ(6ª–èø§,¸ƒ5’æpGÍ™j®†ª(ÜÍEÐZIoí*qrM£ÔŽà‹CRöãa×ÍHÈ|‡Y°:µ³0+’F‰Éô¨3eà¤3äºÐ 4õ=—bøj^÷8wê_l€í˜È£ƒê ðœåDùv>·áŒ:—ƒ2`ò‰l”©¿„²ÂÜtÿw†> ý?ImQ¤£òt¥/¡£X¯øJ)×é¢?üÐôálcñ "ñNd´g‘×¢ï …vÓ%Ç<õŽBda¢VÃ>"–ò&qtÎÐÒ‘q «î(âÀjð’"¢ø'Ž> ZÝ3oÍÊÕ×iµÖÞü¼]oU hãiÌŽ "`mmPã[Hp³fü¯%´ðbeèòebeè‹9±2¬”лñ­0–Ÿhº¯z #åw…‘jên%’ãbõt†§Md$äúWWq¯ßq"èŒ&ª’# *îø„ð¸fV ]Ù"´ªÅ}f¦îú¡ 2l3õ¶o´ÎWNƒ™†æø,ÚRªDDb#LºããE€©ãôwZr§Æ='­¹šB|¥5Rç­àŠGv¬¤vUõ…â‹™ŽÌl†!úYø€°Øó7tÀ$ÏF¦À¢Ê_à¸ßu{¼~ãëÞ;M!”rIzO3å߶+¤Q²k‰ã†Oñ©€v …ÙEÏQ+l•Ë^ÑVhàAWÜ×M¬µB߀v^Ù­œ>|ó.ë/½ÊYH ëÈ}¨ŠV¼ùÖÒZœú•6€€dV‡”Ý T}c #æYj&'waûªsÑï6Ëôa7 ÷=u²eœ ûëk¬Œ¤éÝJyA˜ü›£¶N1@%0¶^a£gŒ~'F=Ù‹/{+Ø+Áèr—ð­0•¡¶y¨öfH!“ªæ`)¨g…Ò„”îÜ–+œT¡IT7áéqPv– ,Dz´îùÏiQî3g!è,åêmþ_ŠÉbb šÕ<â+tŸõ“¯Ì Õ‚€cféå$Äö3å³õTl}5Ö®çÙ½zç&uæ[Â^×ԉÎ9É+ì´**T»ikyu¢",’µìL9/1øÕ`ARWÊÌÒ¬æ1ô…;ÆDêåZ $÷2˜b;$¢Þyùœþ¼Úy¾ì¶wðc÷ô—#ú½{xp°sJ__À4¡Ô‰aQt”:WÜ€•©Ì=| ï¾Ó_¼ý·ÿ¤(ì•[s[uRò›¯{Eß+ø¨Å8óþ¼º”wñ`ŽaºVêŠÈϵË"Ô‹'JOÑ2{¯FÍÀlÓl•#™c±«E¬Å®Ïís˜aväy!¯C‘Cô{ùÑé]õ‡P(qÂéa´?Œå'ÌNèŒÅCð^{<\_é\m¡ˆ1xÔŸ[Û`Ò4ïJ…wƒÉ™ A˜&sáíbúÅn'K/ªÇ°ŒÜtáïëbW ~=U.)L¿ež.âÚÀ© â @q¯^ íAŠv\)|—i Á5LÀ‰ÑÛV¥ìuÒhm4.¶=*(¯~.j!I£ò„¤¨D)pb§\ˆæÝôÏ8¤,—Ãݪ$ #wˆí£mœR´Øõ`™píyb 3%Y] I+gëYï:o‚Ó«1ѯ⠋>-ðûÝü1®¸¹×% t…koŽa™›¼²]x~R[Ê¥ý”y ø¨ :øôêžÿ9U6ÁΆññøÅý3êPÉ0ß̓s2@‘d³þæ»?ÿÇ_ÞÞ™ßoÕþò–B½òÒZ¼j êP:Õ½µJ5èN1|aƒœàÚ æ~œJh›£«}=Ôp­ëë%¯ñÀo2#1øò7€ìU¾$ŽP sx+)QÄZ©º-Ã[é‹ùŠ$XH±™À€Ùcq'I.i M ^fÝ­5ÊèܤV NÚ( ÖbcõëZ2¼<­ø¡ÂòÉO{!û™ »Ä½$»¬ˆ}W ü€ qqúó—¯`¼xÑD‰ÑF¦¸\h 7Ù:×X¯[ÛÛ|œw€†¯<N^¬ß¾Ø7XHï;!ÐB5Ã9á… 1E1Œ7TyÙ?ŸfD/n›n-Gßgé.6ÀGLì«AÆd³°0RËÅ+’¿&°±KCzð3oY¸ªgÜÅ/»mXï^`KüÆMà›V«4ÞvÇ-Üz-Ö7·\Á®û‚À#/\°ã|Ü‘¨÷Js¨Ç'O­–œÝ Ø4.™jL½A,’ Ø6ù†a¤›Þ¤1”£§†õMß½†qSzï³(ºj±ê‡Y1›˜_Ž ( 0œˆòOËÈ›œLéH‹ÔhEÏsã£yˆ Xˆ Ò$,†¸yo†óBìå —eFbEfV îÎæ¡F†7T”º­pšÛ*“ÍXÎ8Ò‡jÃ:ð(8™TZ8çÜæïD~>ÂÉß 80K@F‘ÀèwÑ߉2ÏÅ€îºYù\)ÔàÆÜ4,ÂZÔ8Í„EžNwao2g%ƒÐHÆÂi%7iU?éôìõS”!ÂU±úf.^_)Ѻ§=í !GP¾Q–Ñoo°()Òñ‹óŒíVRtϼ8ÖܧX!¤Ú.ŠUít•îÚÑ®LÝ W1ör7o•&äøN™(z`ß~…E¨ÖéÍ®®nYáœl;dž /¯Ô_Lƒ ±„ɱÂÁ;*3:áËX–B/d ƒoQ¹ýf§öÏNí÷·[ü¤’™ïšpÉ`Q*å«ËW86¿e× FK*ê8‡øH 2¬©¾qRud¥]9ÔØCŒÎPL¤™¥ Ke Ø¿Ãê¯ÎgÓÙD…òLr˜ø VÚª“Eêìçõ¹fo(/Œo¦j¨ ®/YByN¯ã£`;ºY½ïýw´§KYÔ¥Må$">kbÈ$”Fµ5>]±%¦Ù±.úÞú»nƒeg¹!"D”c2Á(`K2ËSN·ML¼^Uj„|ºWˆÃñBÑeêj7Ržš¡ ÆîÜØÕ„à\Õ¡ùàA#ËTÍØ«>Nk0Ç&-c©gãÉú”¼¿ï¾ÚÅd–=’Mf˜K\ñxÐg^…€²TºNx Û\­MZ&tüÑC”†ÏÞ“×"=ª÷(Ø)ê…B€ÈZ4êu”kʃ۪f›¼§IÄ’•Šƒ B³É³ H´Î8 â[ôç´v©L±:{Ã’+³/ó²ÔÑÇ–Î*e¯hˆ"49—±®YFÏãòŒ†Fw‡ã²…H.ö%F\ª\Ѓ‘Ùdn¤þ1‚²ÎQá¡5‚)°7:ûäë¿¥úøÛ×™Àéá"¼®†³ÿ2½J£„ÒFܹSñº;fj&V`¶;ÙÓ¨pS¹Bµ"i¾˜àC(eÿ`-òÏâó‘\Úá©huÉà:¶â·Dåo;i‡`ô®'%Wòñ®t•2»AùШ¸dFãçZ·ÆN¯ €º©ñQ«ÜŸ þÑx(ÙÁ“8ž×ÅïÛu”ãîFäñ~lÊ,}B¶a†m¶ £:²ÓEDSQÁOY¾˜+ÉM…²27Š¦@Y±4–v+•‘xÙ>![D¦U ÂÉaMÍ#êP•œòÛÁ=ü¿ê`‡±³­…Æ/ãÒ¯ž†W€¦™š"Û§5±À%(ÓE6ã$žõF5ãÁOч¬÷×x6 ‚Òi…O™Ãü¯à@ø=ý#¡¼~&ج/õã[/…¬Òç§ñ¢skÃ)d™3$aF£ºd~ãȸ–±ªÂ\žÝ?œâ¹Žºkýz\‡]ßV†ËÄ‹„’Ï0…¢ð¤@&Ø_Õºù0!ÊÑ°ÁÇJFÝruÁGÌ4šUÓR)Éì&ºµó·²°}N*õ4îͺYu˜;eXÔZ2½õ}«M^cmÑÊD¬ñ<§,Ô4jÞ4G çd/4êouð®¤kØá;³óµæ6XÈQÜëÌV“ñi5ò…0郗ª »‹ræ8!×ä§Ïm‚·y·>ŸŽîn«ù‡ÆÞ¶{Øï³ióÛ ë–»áE›ìoejssP.žp«lª›ï,Ëô1ßJŽ-AÊ¥êÿ3çT´s|Ò¸ê´y¬j¾x–Áv‚:\.”¦ÊŽ¬²ºæm(ÝÀ"˜+´xôßǞÎ$+Ë^ÍéÅ„[mãV8¥ÍŒh. D¨¸”Û_Êͦ@‚õ#wUy<'}µQëÀ°!Iú–X4‡û=™RCë–š^grÚÎûAGf%9á?)Ñ\ès$ä²a@—_m¿‹üw×Uçmë ¦v–}¾˜¼„Æ ¯Ù˜IRà4ÊttSšsÍk<èùâ&:–Nÿ©L£\~™D£AÀé{¤ƒÂt£¹É»²,Ÿl—öïð¸yŽ)¹r[äg3²ÛL¿n© ìÌÁí4ëù !Ÿ3å”4{Ÿ'Ñ˳¢fTÆY‹7GÁs_±®¡Û 1Æöó©Æ¢<Ó·”<|•%ud>Ò#½ zgÆøÂ;_0Ô´uGdºH{aGl不.kÌ‚6Å 03Jµ¥Í¤ |÷ÏnÝÄ9ÞZ$Çý@Ù€6…}NZ(Mú(uÀÔ;ýn{\B·?Jžä”¦ÖçÎ üËmS÷'uN©Mtñš› ˆq¯‡ôx ®nÛ.ݶašQ7Ë›úÆß,|\#úøÞ<'壽[½ú.qöæ×Ní÷Ú?ÑSæë6‘dÒ³™‰½-JÙ®uÐD^P;œÏñÊ~ù"…+.£3àÅxé`bc‹ìíhʽåõïf…câðœÄM= êL»Ì]ål¶2ç9-áàkæO”ï~óÒËàåØð×»lõÔOºhlÊ>í擪iÈyÐlÎ8ºA¼5©¯J9HU+Üxù#}ÞŸ˜o§l tÔ™$Žœ‘ Kž&'u“ª)`Äg#4ž1ÑIs†%«“—© ó/^ª&el¬» YÓ“EæZä›ØŒD‘¿G|â«™¢ë lð¹J0áOùèøðùñ΋` ]uÊG;»ßy¾W ÊÿØ;ÆpÄX§´Ú?ïÅçA»Ýf þWâáA+Üm…À­¬¢eÄ9• 4àx» Mî¶Ûçkkkæg³<©ÐCyôbÿåá1¼ø_TpuláðQiu<é\\u‚ç»»A¯ß¹â…Õ5A¨Zaíg¼A»hÚ0šŽÐ#i…fT0é¿£ùˆdo䀉Éí°‹I¯‘ ™GýêI5L¯:ý!~¶ÙC¯~)bK|̈KâÍóçý—7qØv滿<‡§0~÷)•kÿ¼»‡zºsºô1¯åTŽàÓƒƒ„\³¨9àB"2Á„3ìêPmŠ "Ë *‡ú&ÕjÐU­F–A/JRî…¨pc}ÕÖéÈ ƒƒÓöÓƒ“_^´w_žœÂ¼ %çí6Žžl9ÿ¢ha»€?€Ý!îX=wx =™ÑÊeaŸ€Ê Þr+ܤÐÉéñÞÿ]K6ªA²Y ÖºWcº=×àY¡îQ…@aÏm/a°e xÜxÐxhZ%×ÔLU>ŠWØ ¹ðØÏ“ú!„•O©Ò2nýÈ·G[Áßähþ-ˆQ²R!š.¢•ØèÚx™¨ËjÜe»­³oÉ肽™Ì½5¢ETÇWãÑæËù5%ôüåÁæÉÑ;öikÄM˜¦­¬/–×b‹¨yÛ€YN¹»p9åúÚõ/°¨àWÞ½ |ÂËAaUœvöb~øº£íà¶,λã›î`FñwÆî9_d&©Q÷žïµA¬¥ª”C `œF©6(½ª¼3ß"Gz‘2‘A#FÒÜ#ååFµõE‡—¶†SºŒM î7î™ä+)?`ÞôüWRá3 ä‚!¢ÃoЛg¨¡€aµ¢Æ¯î‰/7z=N¿Ö׃ÖZe?Òeaô½¿Š©ù˜ÕL)~„îʨð›Q•Ld, †8iïõÑáñé ôŸC·8+H9ŒòŠ0‹tfÀx 7¸âD²^q¤yâ¸ùPª©nDñrÞÖ߬ÿZ~Ûª4Zøo£qaÖ¾4ô{þ…Qð}ÞøçJ‡içSr¾°^ðýg˜8X +_Vò÷_'ôÀ& 7Þˆ@ñf2|]M–KÓ»éÁ‹i±Mu½šô5½#'³ÉÙå6c•ƒj áhÍ®­§óè C½+ïV-&ô$(×FÙi1íÒJ¾'ÀIeæé ;Úƒ‰P[ª k—mí¬¾Á4¼®SÓÓAø¢iÞ @عdœzžååNbJPŠ1%«dÕMIØ»°Ûg1EVauN‚YÍâÄmÆ/õѯ¥‡Ç‘*4Pð;·•”Áo2gðs€M+ùÅs—uš,­ áUŽžS= úÝ>&[1VDn–³ï}ü¡î7Xf{aÜ3ð¥{–`ÂëvãiÐØNøµÝ€[Ïo^ Ó‡6Ð.Ê „·j¹Ä±Gþ@YfÔX^¾Ü ÖÝÍ©žvDz¢ò¹ÖPEãûÜ‘m™Ñ3² —™¨MÍÔ|ßwÝShN?,‘³8#eÇv*Òñ;m!l UÏÒG£L;™NfÝ)%Ûa%ÖÉÉž¥¸Þéõq$Û¥{ Sß8Üm•‚§d”n™ü ­ «¤îÛ§¯³9^ß¼Ýf!£³Ô‰]oe—[ñS ñ“ ƒÙM×ð7kÞæŒ9X—µkK ¯µmYãÚì¤òí·ü›¥ UǺ·F}½aÎüIpƒ5·~Pø7­°R1­Ê>À¸Öxc*Aë›o¶.8í/ùK¯"ãüûÐèY²â€ˆ Yú|l¥”—­°j'ÿè¾úE&Àþþ¶ÿrÿôo^?ßXÂí•ÈmÀy23É~Õ}±„­,@zmŽ›êc×%¶P½ÑÒ‰3ÊOìO˯è#oÃJ÷Û%£@a×ç΄RÝR¾o`>¯(éí$Ž14™„Õdâ«gÇ{{ð¢ýóáñßwŽ_½|ªGÑ÷äç‘Ž§³ñZ…pܾÂZòXß»z½´P_"âZ¹Zà+—øð@å<E»Ch“4•j{l3kXÔºP‚¬‡&£«†p Ê‘ɪèh”ÔpØΉ´P: o±ÅYÝ,óÙìB35³›Ø´·”Ž£ùP"ÊÚÓ.ŠC>ç4ëE ìI±uöwÕ-+~œ‘ýES!?E Ï`GuIÚGö€¦Ëô¡ö)gF$˜ˆoP3uøf}³þÝn}ô¡¿a;b}û¸¾A¤×zm½vÏÎ’Þf}ýÎùù¸þÈûÎñ‘ªüD£~íi 5ò6{9žÝ,ÝZ˜>Ôe5ñ T? «Ï·Óã*í.Eùk²¨ãßåƒÓ]L{¢"B/:Þ &‡îÇÅî\?ö÷ âaxÝ ŸÆTó%¬§ƒÐ´}dç „’]k‡>#ÏRé°«èéînÙï¼ÖŨ`èZô9-Q9w=KŽJ”rçÚÅTjÖg¼ 4yìJ>ù8)*Î54æ‰óý4ôiO€Í>ãs‘ïšì½ Ó ùh  ¾'o¯ÔH24â¹·„—LZ맛˜g’‚‚l÷:N¡>«M½ð¢*5éCÿöõ¾‚²]€¯U©vøÙNÓo¾\¯–?ùÌÿóÉ´Éžsã|á1ù[äæ…Æ̺ö̆ï‡h)ÌΑ@3ÖB|(£0ÏpØ1V¤Hª€åb„÷™Y¢IGG ¦HBÜë÷Ðd…²g ûÖõ‰Äš|ÝlŒ~ÞéðLeE1¦%ñqô‚š)ºîÄ› ·ÞC¡¢sù„í ìêmr|Ú>æ4ÅÆžb° èÑLûb8C.™•;ÇÏK8 –°‡î(±Ðp S ¿Ç“9·Î’`íôø\K@¯­bMv°|þòšéϦýA"³¾¤¾sƒP‹šŽ†^«ÏvN Y“Z,:s,f¾Qgždoc±EwQ/Ó«1,ùËA±€>—# »JÜ–ŠEÁZû2îôÚcïQí/í·ß¶ßtzoëwyÛ}Äw•2ŠºÖÐ…c s6ù*ù’{< ^œü![ëóÛYÛÉÙXÞ×öËWíý¨«n?Ý;Ù=Þ?:=<ž·kÞ8ÜMc)¼àM¥U墜\Ê“Ðö„!‚bQiÓaÇ”úz0"Ô‹Ñ9ŠKNÌ»~ë¾ÎfDÁ›½Ãýú©“H~òŽ¤ÃÃÁp`Ïa0šôØ¢>Š;ÓÈ‹ð[ZeV ôfÔŒ¸Œ2ï†A4LÚCŠ·%zÚ'ãþÔšÀV9vJã’ø|÷$8ʼ›úHýeÖ'Jœ'[®#ó 6A»4Z½ÚAPÞpô¸iLyÅÙ®x½3iihÀ–¬aK·hs1$ìcÆcyMÈ73¨ðæ?¾Ó†¤ Û@ÓÕèvC­v50»ÑQ>fÞ$T¥ÆA|1oãΔąj|jâÐë ÞÞýio÷ïí;Ï÷1ÕÝéO‡OMx~‚ûòáÿçé«d;«d£ÎE~‹|µ†Iü#ÈŽV—¯k㸿^ë?þïÖêë4¯)гI¼àÃÊ_ïÆq­3¹ª]£þ€å©}÷ØÛEŽÕ÷ð 0$Ìò*­á÷‹Œ5È +Ö§:Ϲca}ñ=ƒ¥J+JQó^¯†d‹M˜÷]ÊGÊÐJÅ`+n£ïx_mÁ–ŒG ÐWµÚ§;›Ø‹­¿˜¦Ý¨n¼„:ãe·ßÝ|¼Ômzóe¤u©7²$«÷ÑŽ¿üÞxòýÏU äëRZÕ.:jö ›zµ’?‡äõã.÷º—£$î§`P¾h"õÒò[• 9pMv/5ߥeò6–ËŠi/jô LbÞ*ª–7Ãœ›šõb_wG€w0°+L]ëEaÙNm5>Î÷ˆB\u&ÈLw¦^. ƒŒÅ ÖÖUZÖhç¨k¿;ÇÇφ¼khoÑ…™t5”Bn#ý8äH­}T´A4 /4‘ø“ÇÍà\Ed-- ’î ®;· êã‘b XHœ ¥±õf%x»îÒ+ãøMÿmëcu£u_kð`¿îÍìÞüºõv}KÞ ÉÚB–„X+ìD+z3—¼£èPÉ3#  Â1;i¨Þúøäqë¾ñ•vü ͱ&1zIζæ-~ùœÜ'ÛNbjD.4u™]þ?#@˜ºÉ¨02E— A0$`f,~kœfKI3©¹ì¢-/RoYÿñ™|n9Ïn à´†ÆE:OëôRß”ó;ndjhö„ÞhÊüÐ5Ò¤É@Û´ñ¦UZÓ·ëe§þî¬Î®Žöñw²h;º{ò¨© ‡ ð†¶Á…©šˆ®S4å+‘è:'‘X¬ñx2HB]O&ž0ÊUŽ§KK gà$|¤a"°4ÕÚõà§x6é£3Û&0¾B%¯©MÁ$F‰Ô—i0 !§Ãðz””ëÓÚAT‚5yXERàŠÎ$³½_†BtBè–ÉkÃõŠ¸{qð!Ô£q梉ɞ>+ÒÄ£›Ç6ÕÑ QkVÚ‡­û{MÓ$¼¤Q¼¤ BeÒ<î!a?šŽ@Ü.'$¢Å]ÉŒ%ÏÝ…åÓZe!AË&œ–²^òm mÕ½m<­øù[´Ÿ]žL‰”ÖŠ„"•¬çs™io˜WIͪðþCýÎj¢¸Å €uYR1¹ž39#íΰ­èU 1£TT¤0ÜÀ9”æ‚׿¼áæyq^jT‘ Ï ^}A#˜7úQJ:Œ¹æ I° DšI·]Çw%5QÄ =mL:z¡'¸[¶ŽÝt…2¨Ã¶ ÂŸ;}²ÏÄsnªˆl‘ Œ• PXµ™“:/X *¡[eñH ½sÜ­°•_+¬p´dŒŽ’fù¯ÛŒ™ã§éT¶%4–ˆ>o±Óë—éË!¡áè)?JzìHò“E©|ÔfÝ´EjÅíz+7+’§’“¨¥„ä1Làß%û½R·‚Ôò6r†å¨‘2çCof8ïÓÑXH`ÒfÊÍ‹ÈÁm¤Nj€©QŒK¡Hì ô-nêï<<æGçÌyCÑýL€")KV¶'F‘ VB’Svy®§#OH¥•â,J:Sœ5¿æù»ñuï]ØÐ×anVÚ´{Ž–×:óyþ`R¦=3#QÓ%žÓ-gî6{¦ì^ܳûgì§Ê¦E4¡2&¾pkÑàÔLb¸GÁ·eH?—1S-ǵƎv0Í´UK¯åðøïçd‰ÊN£æÍÍNÉ]YBØ:¶âéê=f²ËæpÎŽ ÑÜa>$Ñë}Ò‹ˆ¸Qrþ>x–½ºùŸ=]›sî"ã<Ÿ÷Uà3ßwnIqGļŸÁÌ$¬*qùòª£éÀÓiL,ΚÛmU< D‚…¢½Ã|OÎv5Ïçp:ðP·Ö룠ƜlmdÌS'O‰/­s¢¡mÞe:nfž$Í 4[—kÄ.8{-¤g" œÖ̘…ørb8°-‘É @»M„^ƒIîæé@Å耤697ã6ªK‡)·^.á ‘ôGåw\X!^g%óc8n 3SŽîÑ›“iˆViõ«€c?"è‰%lP 0hõˆ„m)#V;Ñ*?(øšQj—éIBŸÅn%¬gOd© ¥ÕTRÀ4ð¸yû±aj^"Ưz'ᥲ9%gs’S"ˆ>‹ û"ûÅ¡Ã1£Ó#–Û(ŠêF„˜ÙY2íO%ºI¾ãÁ8Á ‰½Q0áqÁ€Ö°á{° î{ʹŒ’Pš«xÚ±*ngí"ÿ!Ö3 hÀ¹F²{¢~¯FŽšMãiFåÔ“Çûcü8šM†/¬3í£XÒ¡WQòñŸ'?µeC¿…Ãxߢ(k—s±U ¼[ƒÀ–hÒ¶ûâ)¥j^ þ™\ë7¤)yŸüœŠ`ãœ?ÒÂ(=Ç¡ü­ÞW‘¯ì^R o8e6Î{9K:x¤ŸöNÓKÂc¸_ E.»3è½[»"¯Õ¨ÉW”ÙÀ,áž ^¶ŸþØ>yõãÉiI¤!ÄtµÞ­!Zª*.Õßz‡äÃ:ÙÐóÈ%ؤf{›/¨ó~éG@G'?5oÆO¶Eµð3˜¼ÓÉì»'¥§¯vvwNöš¦”>’r/þ~‚ +G짣ګ×Á{XU\ѣÓý×bWbõSÀñÔÁZ˜È€.’fÙ}z´sú¡0ÌË°6âøif“Ü¥R*¶|+€½–ô\ÆÃýÉhxåE-éi’Ó„CÃÑÃS„WGÝÀ%nTnŽä¦ÎD‡Cþa Ð¤Q¡†(Ð _¬lA(3ç¼p®:ÝÉH#¸¤sfDé ‘Ïjð3^0˜ì3E`!'Á~4ÀªoÆl1gu³dÒÁ½±l¥»Y—ã«ÜõÈíXñQ+qÂoØe;ñ#e(à 17÷ ÞÊŽ&HÌ7áŽÓM“0g8p¯ž€"ñÁƒs¹æŒžd¿"Ó³¡—¾ÿ¾}pŠ½¶÷Ÿ•Zå’óÕY8,š Ì›¦Ô YCüG üB¿+JT'„†Ù €Ÿ²ÖZ§b’(0Ñ䪂ä^©kg¾|H«ÔñßÆâR *7øjhþ s35,-ÕðWN¼íÁéjÕER®u+tO’ŽÑÑ©Ñ„µÚ`Z ¡úå–ü»Æ5G=J>"²êý`W€B% n/ÆŸ½\qC± åôz¤Z687²ÐH‹ã…jü`v5®ñrÔ¥!¼]{1¦Çs‡©uP¨0Þ¦KQlª¥0Š¤±Ñ6Z”{þ,Vê-J‚ò#¦«®¢5@Ñoýšyämr“ÛºUß93ºs"Σ&¥R`„Ë”M†ª”òŇ•^´BÚÙUªé1l¨Ô6½r–aBßlxÞ~Úl½lÑ _S7Î[)Ñѯ¯îëåf(ýuÔzgšÜ q‚_óÚÆ„”fõÌØž}òØ8•;0D²ŒÜ_Ã~Ö M95>òmifÓŒéÕ®ÄÑÅ°ÿ;EŸ…RÅ[H(ð®…lüðͦßÃF®õ¤ò…bÞ!)þð œé‹.WWq¯OÀ¾Uòd„D x¸›cËͪ°%ß·Zåƒý—{/·2Œcng¤¾<¯ ζ`YçI¿BÖ©|øxXCω˜”s¼ïLÿ¬´Ü­RØÄ N*%IJÅûF±çíÁ2ÏÚ/ü±ç ½Ìy2{7%†ñ5TûðÆ 7üv+ GðK€&Õqë]“ ]õ ´Å´f»¨06¸‡ÆÚAA™ÚÙå`á’ÉdÐ|ìØñ…¥¬hHueb¤ÎÐ’ijùO䊷:tÐmQbfâ+Ñõ¾c:`úªI‡½K<>l$~Â.<¢eÇ9czyüW–H®,|x»[X4 œé€F]Ð×BÉe—Œê?o-èB4–X…´­·.‚™\q&׎¾ºZ»^R–éÝ jƒ^ÎøÐÔ5rµ‚FcÌ#d ¸‹B¸ŽQ‰K¡¥æÝ’‰‹ ç'ňl”"Ú…FIlþp*ÒÌîegx»SqyÇ›–f2RvñÆŽ2í…£³¥ ¿A4›µR;³·^eÚÝò½‘[Öõ¿qøع‹çÙ]´.ÞOKÕ½J8Uk4EUÀvݘÅò®0—É(´«íõˆË'Ÿræ#»B˜áv,’Z‹;#èMÉ5#§ã3Kx6uÄå°Ó“k}=JAIúˆÕSÐaÏïøºg–º¤^ïœÔ‡¢–â>[d{P‡&!ŸWòÑ„­ç¤Åášo~(䣣€d´#¯§x†0á‚•A猗¸ˆcvøŠÇÖí¥Æ…Á_dY\\À|4å>ÏÍÚàe¸t²©Ù;[Ð{n•È!D¢2  Â%ÒçMÖ¤–J©ÂEdÄøg~tÕFoZLw8ÏëuïUʸwqã·Ö»í ¥TˆÃÊ9ýJxÑœ®¶ƒ{Y_ÚÕ*לR~B ˜kÏ£S¶x/þgÈ/6’CÍ«?yª B²e™™žÒ‰Y)Žhwã$Q£Öšª¦“4ùï%Ê ²3(EKW'Q.®´¤ÆtƒP:‡,·MؤøV ç½âqÈ©LL3¯V!üøö5’/gÍ-˜­{XGÛâ&4g;q3‡nÎÙóÞÂJðw4œà<…ÃÄ-ãÔOçý pÔCGÒõÏhd‹ÍØÐêu(ÊÜoŒQ~a٠È^“aã‰qƒ6ù¿ŒŽ5mrÌþÃÜg• ÊHBH: ®ª*:lÂ*ô(¾À–ø2â;Ì|¤§)eü%h^† 2™eœÃFš ¬_š~WÀ³ÑëÐä'ÝcE j'ÌìÛ:Y;¡¢ÛEoÛâ˜+lÒï¡qÀlÈ–Ð^"5¯áÔ;Tض'‹—A3ë¨/­LÞo¼$þÎ#›ÛNZeÿ­âL`Ëp³8R¢Ûeµ Ru<$æ•F´ ¡Ø{õR–™—<ÇQ~‰¬û UwÙ{ÓÈ©ÃÎÁ7±U™#nŸi¯žÛÀIÌö'*™L%û"ƒjN®Ìn”è¨ã6dîX†ó>FrL[×(¡ ËØN&hWYO (ŸƒZּŚÚ@͆.f.¨Z]hèâ[¹_ ?X†0J°§…dByvÎŒŠl;`9fÜ5¾Œq§¶_Úºƒ;v¬;œÙ=ÜÂ#–7ñXo”pÕWTñý÷!üMxÑ'»h*a³¿µwOÛ'{»¯Ž÷Ú/ÛO÷ŽŽ÷vwN÷h%4éjH!̓ï‘ÝÕ/ð¡g =K÷` ñ\¨}›$dê©´/êÌc¸˜¡§TYÎP›•è©š]×Ò2Ÿô´®`×FÝ̼ÛùÏ:IO¦ér¨ÊôŸuÑ`Ôxl˜Z¹óîp:H5v›4Ð+Ÿ~Zæ=/ÓÀÓn¹—'ûFÀ™dr+brÈç??Þ¤5Óe„N÷wOÛXž£~¨I1†‚57ˆweÛYU?‘¡³ùr (Ä¢»ßk·jÛǾM×îCÀG™ñTÿ”s†ëã’ Ú&‚‚“I²^§\žNzK¼„;¢(âR ‰U`çP@Ks °Sø‹ 0²K9|02øhËç €žá6~±»—P Óû¸ÿî5¼hóûB–N·Ï¾8iï¿~ur´áËÞë½Ý̺`ñŸ7Üb¨’?íücð×éÞË؇Ïö^¶þ1¯Ï‚}·¶ éÝv÷ Éëö‹×^ºL|Ïœ—^óðßì½Ì­å¾ÎdâÔB6Ÿ¸âÂ=;rßÛDx<²HÍ–|~|ä—„¶$Á´´.„{L->Ý?†e>Ú9Þ9=t Ø{DȾ¢ÕqÞmEùIls’»¾8yzx’ÊíÚ~úžñC$wí‹Ã“Í D`ýw€¤ncDÈöÉ/'§{/ŠQTv’íM¼DòæÙÞŠ´Yܧõý){ ¤_Ñv”¾’ò›š‘VöOÚÞ;@‰p'Ð_¸¼W†®3á¦ïæ†Ím±UZY+h•’ç¾jobašIA§f~9ëd‡ã¿ôgè¿s¦˜YÞÔ—o¦áÌ"¯]3 …¢\¸ Óg²}ØþqÿåÎñ/ñ¥œs©÷þë;‡»kHLT‘ —`kôµ7L¸Àz»$ýßãÑ9½¯à^hKA| ‰Ó¸‚¾éü ;®<û`prý¹ÐgDÅvpeïEM´†D†{t1ÃÞ¯ž‹`_ãäãíŒê`²&iÛ‚çò_?Ú6Sw/oÕ’›C3…¯ E ¬+ìŽFȽª¨7SÌ ÂZ%ŽÒoVW¦=¥UÜÊCëx“sXÆyHÎI4ŽµtÓúm´*ß+)c6…á/´HÙ*P¹ç•EœŒú¡r(öQQ»XVÊu/c4Iœ_ÐÌÖû÷ÎX *xàNPJkfÚ(6ô[Eac•·“¢¼xﮦU¼WvÈ9{ù®P¾|k+^Ù€ÑD­þ–å$P™Â&K=É1:Ý'd›g–ªa‚ØzXC¿*9(‰%Ÿû¼ÓëñŒ§£6Tt0÷€™Ã=lg)â⑤ªSXŠTç_ëcÎòÛNÆë¡Æ:Z¸€"MYÃ{v^›ïpœøÑ„I1ÿ}ðÄÏ9 êQn˜JOÿ}ð§ŠEŽ±dܶ?ô“>eÍÖÇÀ$>á”S´ÝîLá0Ÿ¡ì«½¶–-|“Ó! œfÜ% 8h(PË$0å8¯°]¡.0¾ß7ÿØ9¦°nÍŒÐÔ]´— ÖO¬±3Ñ‚‹Æ«cÛêŽMñàÕ”k:!…M“RxÛÊ$Ü<Œ®|baën#’'“I2G¿xÒ¾@}ÑÄaó3{‹¿Ó0à”û(oËŒ`î".PàÎY”Óãç{À»°8®­#LkŽøŽoìËÑ8>¤ÍÔu8=+²ÊÎ~ÙÎÚN?+&34ÓÁ©Z+Q|Æ£ã½gû¯ $©ízÞ]3˜ª„ãIÖ¦fQ«¹7"[1AFWþWØD:¦×a~ƒtĶµ°A,M!}QBC´` ï-¸º*Ÿ!+Á·b~ÆWÛþŽªM,-¶„ÝmSb 8F‰û”UFšL%Šßjò8i‘LèRÙpöC£±ë`&¨_‚tóÏdR‰úô-Elª ÉЕk (–‘• ¶*³…:B®kݪҜZ0´É­PW™ÐË#¡0a”GœÐæ •!â‹Zrô®@a ›éðc¸p¼ÇÇ·$¢¢AʘgÄH‡¥v?RžÀÀÅ= Õ!&eÍçç1ægæ pë 3³nó‘É=×'Z>èÃ5M;ô¿ýVòΕ2iæh•úЙÆÀ•¬|t%Ô9iÓÝd0’!j­¬-,º §Ά˜el@é}(Ç!™,„‹¬jm£j¸­Ê6 ù•T®ó,2X 2D÷^¡š£hå~Þè±ã¹Ûù,’“º|4œö‡³xA»X¦b}ÜÎ!^£Î¡J_Ý:Cõ4ÃÕtà_¤Æ¬•ŽŠS1i$†& Þˆ|ÆÆ! :g¸ihúêµÃÅk £àOISUÅòS¬?ñªëWR͹ÙzE%)¦zEa=8Ô„ U±°M‚«þÅ¥DnåØ\ƒ>¬‡ßÔºW6ö½‚3Çïê“©îxa WÊeF ]Pññ‰,Z3`ªùh0Hµ%©çéaì…¹ê_Ì&qúáQû-‘Ñ”«wº58 S›“½î_oøð*,\›…jí*PÙh3ß$\:IÇMåëÄú¨|Da5EŽi»¹€\ Ô+öpèyh65Tz« E˜ïÍ·ß { ÇË q¿ÅûRAyôdR¤áOêw5Žâ(C¶!ìÈ%›ŒZBÆ\XYeš£ÎYL#íXè3 +Ûù ¿%;Z˽sÿ¯h³ª¿i¡ÒŽ{‘šÆ܇| º4¬wFxâv¸Ï/ÏT)-Ê ¤x©R\¯“‡O-du²çd‚„åšX ‰H' ¬êT×€Ž‡; ^‡<ªÖ#-JUü‚ãîœcH×ùÃÎ$‚䊙ÑåLKȪ\j*¯qjÝSåªæöbh,=8ÔËTóÛ%|ç4Í‚’Ù…†‘Õ”Äg^õ*‘|f™ †[¸Zi:95G:S‡úu'Z«ÑÅ%¦<âe¢œ<˜/DºƒÑP¸Z!·ÑüËaÃ2ûæ´ò€5Í©•ZJ§·çv©…[æ!ðë™Q„, éâ7>ÛÞò$bö®y„™‡ñ¥Ç3TI·?ˆ‡‡"øV³•H©Pld rð_Quq ºA]àÖìpªÅg c2·°í¸°D#ÌY½˜h ˜‰4hUòŒ1Ë=’‹ÌP½Ó Ïéu¿+÷gj; lÚþ €Ú/O…¡ºô œûNFÎ!I@Å™ÉÍÅ;O »Ã›¬/Æj‰éÛ…]¥ ãšs8œÙWï¨lÌAÊ™ecÇÝ!åÄÚ£ÄaƘ«äm#³ºëÁ˜)*Ñ­¡\ºË‰¿t¨5­TÐÑÞàØÐÊ:Öˆ‘’z÷…͹ËóÀï-¥¤¼_çWˆi pyúJ,GÑrL@n!†Zƒdâ«h0å5º ÖØÀâZþÅÉ߃ä’+À£W¤ È1 ®i©àš/þ¬1ËKvf ªmfìçÕVé‡JZ`»æH’+ÚZýõºÊ0kŠ<¥kŠÍlB¡1¶Y©Œ%-'­¦æ¯ÄTFw’áWSS¬,{‰Ø Ä[ïæ0Z,·cj#vyÄb•¥e%/‰ȯ{o½ ¡jÇ£åú"ëÂôŒ±’ÁúHâ0F¿š‡€ó`òIë$hòw)N¦MPšÄÊÚRÊ*yAƒJ*+€£Ó>jÿ¼³Z |ìá©ÈDVºnÈpÜf3¨mø‹Ž§¯Ó0g°:! -?º,áÑç¦QöV¢£Ân…™=óçd¶é0âA×Èø°R1|´®H ª¸QžáT…¡täc9»É[™ÂÆÞF8 âJ5¡;–uPˆ.­CƆ»ëLÈÕY…ô+ pô½*ùKyZ~Ió{¼ Öø+à7)Ê–¼¿_—â%¯â+ô¦‹o.“t†Œd¢pˆ”Jól hdRIáüÕÐdVòlæ$DÔ&2÷~%ôÑ–Üæ÷¾EižÝ‹ìSFÛ¾yÇC*þ“÷ýq€:Jq¤NÞ3»ÕÇt©PìËH &(»ŸtãËLu6LúØ BU‘xC5&}ßx‹‡.ÚŠxw¨éo›Á¦µ ‰C‡=f¦f?ð¯"Iì6mæ¬ñ:(Éà´Kì@0/Ì=«A–0³ •…­™u§l™LpY¤;¨˜ãžåç­Mƒåšq®Ðt—£Êý+OÓJ¬µ$ pùéo@™?)1·1ôàzOVŸðKFïŒ=áÚ Vü>hׇíø^ÕI‹ÌZh¥Í£íÏYÖTìªÎYT½:dRl+E¥6«šYiXýJÖ¾'›Î“˜ÃÙÒÑ ‘$ÞDÕˆ`^»“»˜å¦Ò)ºä^akñ‘>g©Q•P¾bÕ§ê†Câ#&¡uô@\ôE m93“MvsE ‚®–2¡2`}µ)ڌ†A™mÌݵ­Ì'éFÏf¨õ¢u{dBRT¸¥7Ž5.`„·|Á /HÙ*¡+X6Ñ@. ”© /”º{ˆUÖ¥‚QÑuçiÔzùÀ*nZŽõÇíþkÚh}î%0¡Ë§ëÏZÿh’Ç›%t¹zk:g5a¹HX+£–M&éí WþÌ-oO“AWõ†±}fïgz¤Ø[Yb+KNÀÙ)o+3X¹_~Ïp®© )$ä6ž`ì^H@/í°×îéT¿Bi(\^›è*S*C7`æPQÛê KœŸ¡›Ó÷ôs¡|0ÙÛxA%Œ€7ÃÌŒL xZø‹0¬ñGckât÷›¡{å¸Ëa×ØùØîoØÒ6– ~õZY I½¯­ÿ†û Ue…¤jéR5€kÁ¸â dƒMlA0Љ¿±÷›¬8óçæèšYYá´ÆÈoÊ »¦ ;› †ß k½")ø¥FUÇ ¡bu-Ìl, ¥æ_¶HÝ’«ñóðZ1·¢:^*%„ቼ󎛌0%RÕê¾€T¤.$f]‰¯ˆwÚ¤Ú¦‰lŸoäÍ[•4 Mžnzq†Q t ©¥ÕðI¶n‰‰}δÆR=gJËNhÑt–Âr+(®QsnkAˆd*ú,à:l·5:g¦PŒrÏwÝqŒŸø®’Ê«ÎE„^!–; _äx,`Þ‹Cúæù”C°Ü˜þ¥åà¤è2,¼Í=Ç2åKYÝ}éøP¼ü»mÐ\èŽ`}Uƒnc3@Q:TãÛ Ç’oç’ žÈÞ¡e Å«£¢W$ä8X©?]_¹•,2´’)Ú#ãçhâUÐe¨ÍgS„b†sH¾.ã›DYùþ&›'Þ˜ ²F$딾¾SK³aЈ{ëÞ“ é&80ˆóugÒK$ &ƒOâáÑàm×·Aþrפ_«µø!ÈlÈÚW9’ˆqE‰¾q­f¨Ä5¢»Ú‚Y¦²(8Wú$ÄçS™\vàƒu'@p8h|?}›¸Åv@Œ½:]”†Ràc\+À4PâÃÀ|ràÞ`òBËKvæÂüœƒ,’Q”Ye;L8ç…¦)2§lîb±…ŠÜCùá¡’,V2£ÌN$µBß[Ü·œÏ‹®˜è§ž‰ôE+r~§1”ö¶óŠ:Ï‘ö.*ø¤âÜ¢ó‚}J†ŽÇ‡ß7±¶¿Øï·ô eWÆ:’¦…MÂiÀ9@N-¼ÚV ré³}œXØÜicŠ#´/J8´e*$Œ®çÚ_2í”ðu²…ÿÚ e5U x8ƒI¡CV: ¹TE®¦ætñ!ÓË»Í ¹³æ<¤0›"%Ñ¢ã(1€q90° y{Ï’ÔªàH·ùvaS&×ëË,瘗wÞjÁǼ«RÒš[vAL‡¦¤²ýÔÙÊN¶Ô™·#×£0/^ŸãúæQÎÎÍ T—énÔÞëýÓö³ýƒWÇ{þŠ„ÏvNwÂìü 8Œy 9Ž¥Ç;O³J `VÃ5,Y 絕ë˜ç6¶–-O¡ÕpÊWBhÝÞþz?Ä—Ï„ô^ÎÈ´N1p) Ú¶¢¶?‹åw¢TE"Õ¹èx ´ò5„ŠÒ@nòÎàºs›°ùo‡Ìeªt?àt.âa÷–Ã4}åTVÞÇ`|—ÒTÿ?1‘§åâ%"ºáжîà`ncVäPDܪjPü®S\‰2к=r|®›tíñhÜqÒ!±@ðBÁ ‡@üäÕîîÞɉPéº ¡ ·'ý<'pø\97˜a|Í5ô&°m (;M¦n9^hû:Åï9õ¶ý*0˜TYxb ™ñd÷A+~›îUùB]yež{cS¦+•3ÔÜ’™ŽiH9FßNË…û-ä÷*/é}žX8»˜Ö´Üôè8Øé“}Ž¦RÝTðìŸßŒuvëDLü<ä%@Nì>‚·~±Ÿë©“’µu»pÐR¥ªiQ™MBV.å/rƒüuPËàù£Õ^¬”9¯éˆLGÊÑáë`8£Y¯©ø Ö6Þ¸âØbµšJO ê¼s‘1TdG&ø-ýâ>ÜæþÉà¦ÝüÏ·ÏÜŽ§·e §P§{ÄöNä­eR } 1¾Zæa°?\W²xZ«ÏËÑT2AÊS16£?MâÁ9Uä€ßn¶:žÀNÁ_ž•Y˜p÷ðÅÉÑÞnh .Ëy©1z×>‡'⩲ÿòÙaða;øPï]ÃCNM¶?<ÀÄÃÇ¡K¼ò.O¥ÒÞÍÚ7ÜWØ䑨˜÷{ȃCí£ƒÓg‡Ç/8¼Pû婹ÿ‰ˆì^õȲIT™y>C^¹}8q§‡æºä§y+’ÇñçŽ1±0«&Ù %Œ‚HlšaaIµ¾KÉsØ2 ¶&~ŽÙ†‘ò•ù­AÃnŒ6’7Ó5KÌOñî$“sdqÏQk±Y,ü £` -®pÇ£ï#VôCTAaw§D”Vâ’6­œP² JÖ9“°† =´ÍÃ$XW}ì•ÜÚØ[;˜Ò`± /´-(‡\4™M(v*¯ç†ä…@&ž°Î#y5Œ“ngŒî©n!j„¶÷4V;èBP ¿âós8 ˜âTû:S?!¥´W ’Ì”u*´¬CŒë)îxvÉenÎ+ÃÉ™›Y&Yr­»³¹>üvæØ$Ó ÛJÇkíhGWB —­´6dVU&¦©ý˜LT­?h¹Oô>D› $†IZÛxÒ÷wÚ»?íŸa+lµ‚Ö£Gðß&ü÷þ{ÿý þûþûsëÑÆ#øÞoÀû x¿ï7àý¼ß€÷›ð~ÞoÂûMx¿ ï7áý&¼ß„÷áýcxÿÞ?†÷áýcxÿÞ?þs˜ßÎî?ydâ_šbżùÞòtaaÇü¤¯–»p¦N¬VŸW\7IWMþçdCL®oìä(œžuUÛo,BÄ o¸ô…S·þá4®<×÷ŒÇûÑL]ÏÁt˜n‚ïœ^ÒÐæÏY3K¨"ΞÛ%‡‡á—ä#f1¥ ”u zêКP 1ib|6y¯mUóND%mŒ€\"g§”ÈÑÍ9 Э8Õ—Z½ÀàðÄXÜPÂJ‹ ¶ÅÅ. ?aûÚˆ6÷ê<o“‚„›gÚ-8(FŸá2¸³Õ×üöÛmc~‘0YMÁ Öœ QºAB6¾ŽáTÆj´È´S!nÔŠ íÛ¦7ªo}7¿ ô6œšN1Q¿çMV”"sçœ;$,à­u® „jóQeSv°ëão¿ hÁþ°]`ôþŶÔÛ¿‚ìZÿB¾ >j55%Ѷx–ò¼ûoÛA3÷ÌŒ{ŸÔ¤Òò'ãMDw"«[ß>îIＯ|óËKq-íx´·Dß´¶~ŽP‚o”û\K{—s9‘Â(`ëÁ9Þ`6´N&<†ºÓ…ÑäE˜>³”4~m­Õ[ÿü—Ö}«_ëë­J£µÑ*µ6¥KxßZ{4È[|Újm4.àQ¾üî×Öð-T©¯7Pv?ƒ{0÷FX…1m7Æ¥‹ÒÓ¨pF<ÿ{ù5'&»l¿F²¼ÝÇØåSætƒãç˜úu2£Û~IT .„^KU$›ûÀövMàr”ÄsDþ60"¥¢¶%±,Á²6%§KIµEó7òÖÀ‚o<úíÉ^Ä}­£¤ZGç¼èÜTC÷fú ü^’i¯Ý9ëÃÓ¯¾¢`ó»€Ô‚ÓŸöOข“W/ƒÝÝ`çÙéÞqPF[¡²—Xò—`ïõÑÎ˧{O¿úŠÒÒˆ'˜á‰KO‚óAçÓHˆ‡åÜùqßäÉä‚7Éò0Ë% LJÔƒ‚WNLRŒRrN±7˜­ v_¿~v°óüDÂÙû³[°øavf6-Î<ÂæE®ß­·‚´Ú:ëÍ£Ú_ÞÒŸV/  Œ· º77O¨¼÷x€›„ÏUšÄãœ%±ks8òs¼Î+ g1'!¬Ýd› ×eqìÓùëâdåìžÂçÎæúÔãëÇ›ëóR9ÞrÕ„#ò¡[ŽÒ¨àökäUÈT@3«èSÌ!÷) Äó щª2J@Ÿ«)ü‡n,£€Ã¢`8~ÛIPHƨyÑyëÉ®nJÞãúãNBÇ?¾™N:¦ „f*Sì'u&ï?Œ8çcÝ¥À3mdÉ–·Ö¼{¶ÿúÅÞpÆÐÔt6”DÔS“éz<Á ]%6ƒ$ÇÑá ç<¦- &ÃËHG벃^YjDÌ1ãÀP"FÑkÚ ÿŽÚÓk*Lȃ¹Ó†SŽ®«NÚ=‘¦‘ÚpT³½Ž†^sÚi ðt-ié»°¸˜Ü"žà¦ÙéàP”%ÃfYŒ+9ïǽª.F’(¦‡­;^ÿÌq1°¹°¤I¨¹XPÅÞ,GC‰çE¾EmÁ#ÍPÞå¿1žB0^Mè²3@~ ýÒ«I¸M¿‚óL‹™8’©¢©çÀPÀ†÷ãa7æ£A¯y؋ǘGÏ–ð(‚o‚oÊò ßûO<§d-tÖæg$^nb?Nã‡~Â3¨)¬J*dïaÏûHQù=PòBl`™¢"Ð3¼¦':Df@Ôó…§ZSô´{·ÃÎU¿›z*ÙÌyÖžÄñ ¿¹ÐÌ&fº£³éMí"ž°HÑFjÔ'¶ TXGUË’`h%  \ªR¦ÕífI›&ç' kƧ¤M.àÍ`Ôé5‰TÐ'L­æM±ÚÄáòÃîåó¨¬+&­ç¸ü¾Äè`í¤sn&ý“í4í×6K@ôõuÜy߶ †ægH!ñº•¯5ïIÉP¬ÐÌw ˜ºìžKM(õ³EaÒ¬Æ+Su“/N(¢Šd›ÁeïG“z7?énÙ϶›a#wb¢r~…ñ-)-L[Q Î/Ä8íä¦Gã'#“¶†öâüD¡¦º¡œ2€ó¨mÅyai…[qË´ÃìËQZ19Mk]2Y¸¡3ßj™¨`êgJ+NåŠ0a^°Ñ¼Y™8¶¿CÊê'@ˆç׋HÊ„³8‡M-žÆ³ÉfÕ§(„<òŠ‚ý÷ÝRLÙ¹½÷£qÖNýȾؘèÖN*½»ÿÉCt–nו,ü0 û`MÕÒpm®gMšKiãbâã8¼r(4§{â|[_ú¦^2é?iöØ­¼k£†¢—É Ú9C“¾Ÿ£8t2š]\¦5L&®“d"¿R:éº#„‹“È9,¯q1Eù„A4ˆ“Ë™$Ür„X,´‰§ ñøª.à7ªšS HXpc·A䞇=ðA–)¯ l©\ÎM7 ÞLŸ‘¯§E¾%6ÀØÕ­ˆ×n6`±>"´Ä(šàÙo–¥ûÛá«Ó£W§ ÓEÓXº¬ÑLßLdPßBoàr ÀÃ5ºbC€jCB‹ÜY2„ª—å&F‡OcÙ$“Lc|Û[a»"E6ïJz×rVáä—(éù[˜-·©âJ0láOƒù—ÕõAÙ¿ú`„yæå¾åø´8ì$¦*˜êˆîºˆ6»qÅa=Ñ¥ÂÔY*vµ’lF°~‰‘ú´› EAΞø»¢!„°ÍÔ ì&Ñ`<0ô†bú¢ìAR7UÑàUC8sa³6˜ö3ûõÌÔçÎÛ-Œl2#ö ›%õÊ/9L¾*äLÞŒádðùIQèz 5­-£A&²Q?+( t÷ÅÔÍÔ ‰)GÒ+Áä¿HtvФ„¤ÿ©ÐË+†mv6«p²¿ÇIŠÿ[¸ZWƒÁ‡+ªºì:^X÷ CTüã…J™ª•¥b Òë'ÝΤ‡‚Dn"ªQƒo¿F &yEo$6 2’i<®Ïck4õöi-F÷<%¨Ê¸0ÈÛ‡„ r<D4‘ä}‡rï°¬uÂwB‹J«9çMÛ¡;»?0I˜èô7Ü6zÇ×p*“¥åYÔK¶Ø.ú‘ô'“$‚ t®ÜrZ]ùhe«þ¡‘ :(˜ ‘lS˱bùZô—õ9]`ø1zø1ôàVÀCž²Ü—“’ ÑîÜ>…ËíPBy_ûÖï)UMÛ:%¾ù&¯Dª3¯ çKGmÉòmt®·ÿÊMu1ûÔ2zßrÔ¿½Â+Í™¼)*‡~Åò.D}éÐÀþy`&€?EšS‘ˆªTB¨¬ºß¡½:å9Þ™+’þƒQàO{»P° ŽÕ>p)âŠNi=j‡IÒ¹ê¤Vº˜ÌRôHÈSÚÙAXÊÛAløÊük>»†víèw‚£ý]¯Í‚±¼æ—9`dÏËËÑ°æ7š…îâû‰žÂY åþC;e`@‡=¼„†ÞP3ÓO‰üpR÷¶4ác2o¯i1S£•}ZY1°mx;;do^Ôбåe]ÊÓ2—›8±(1K¼í†Uùk˜ÌCWFÉKs›b2¡ÒJÎÝœn8bßÒJÆÅÖààœGŠ‚ÉÆçÒ x#D•}MTö0>_…O²ËÜ™;ÿ*(ÊÌž†®°,ò‹[V+· ÷j"m­ü/#~WS[îÒOjJx€ê -9Ÿó’É’³;I;½ÄŒaÀ Èâ^ÍZ܈ ¿Òaæ.F˜Ó½NÏ.â×)Ù­¦ÈFK+zyºOy¸s Ù•ˆREó  25–"Öhq„‹ùW)Ô£Šíï¿œK–TbÔ’ v°óòùÖz¾ìŸœn­“·QíàåáÖºiûÁ"¡¹Z¬:FÈhîÄÍùlÀŽV#vPbE ù(ÕtHN½¥?ë[ëFaí‹n·aÅÂÃQ¥ÂýIÿÉ0ûc ­XyYD¯å¬Â6wñ°SÆM'ý13;µƒ0ˆ"ùxLª_Ö¤Q5¤…]]hÊlÀƒíIüÛ¬OZâvO¯ãxDµñ›+oDá"VÈ_¢ÒH‡uYlØúëÁGƒ,™ŒFÓÂ9•V,‹—ªc˜¯¹¤7²Ñ¸ëóÉnÞ{hû|×í¡ø«Ï™…ÉÜjÅ•}r1zÙ*Z‘UöböÂŽíè,ç«2Ìûâ5f1>µŸ‚ž<ÚËÐ C²!µ¤´ð%ýÁ€/ TÙGBÌxŒÆݧEH¢“Ä“±–ä@öC´æDkäÁ¬‡>‰ZPgÖgeš¿þ¸LE{OšÅ è/,Æ ¦XŸkîÒaÓX#g-®øC^Qu¿+ïíþt¨p%†éQ²Þ€a•×Pj=zg–m+•YµÅáÖß²ÌÒÖV%e4ˆ”“L b·ú˵¨o;ŸùC°å–‰-æ(.‹Ñç`½â^°ƒ®½TͯòîÚŒ²ð{}w³åñe§ÿ~¦ü;݉ ÒÀùLîÎìâ1¼ÂeP+âµN$³îeeŽöYÀí=ô·x€Ú ;†-¥s>ŸÄ±ó³7é\Œ†çƒ[³T}@ìv¨OGt—+ò€1uƒÞ,æ|£8V”(âS<€ùëŸ4È ¼dÔ3£`ðFýͣͷf,ÇR Öo:gúâ¸,dþ Á;¤TF‚o—õ4Âów2éŽ×7?üIÇ ¿ÿôá;»b»È"$)÷v»;½ÇŸ´8'žÔ7gמñ‰éÏ\Ãäõ÷!LðÕËý×ΈÔYˆÄx2Mxe­º£ ^üÈ Æ–¬”ŸÙ.ÞÆÌÀÚŠ`­ö$çL§ôç‚k.´BÏ|Ñ¡ 2oµ1OˆVWo4 žƒ!‚òo¹,§j{¢ËéGQA2ì…’bó[ÈV­J¦-ÜÖ€  ëƃ}çÞRþ9C¸¿s‹¾&@«ì~û­i£;Àˆ ¬‚Ó3¼¨ŠäßFó5²e‚çÖÓã)Fî[¯QTR⯽žÅœ˜, §°àÄi۩ƃ;ªyWë urW«É·Š¿ÎYA/÷RÄþr¤>mŽ–m ñJŽÃ]í=»«ý]¿ŒS_ P¿ÕPýä&7tW3ïÏÀ¯Æw5ýÄÿnÌCüó[r5n®ÿû—DhÖb„EbàÀ'æ6dÉÄ9ôÂp ý¶9&Y y·@AÃQí¼,³¸à²ÂOס°ž­òÈLc×”&:™1§¬—î{ô»BO&ñHeÿU²NÞ¯çä¦ãú¸‹rH‹—fUA½¶zŒ ɈÈ9a‘¡ªéóôÈ™;)«úÃö‹mÒ"„ÙJÌœ&¥WoéV?MŽþ'mÜkG]¿KòÚ(й8ÿ,*¼»›*®E|fí*¹hs²æQrt»†Çç bùnX+…XÙ‰¯ÏhåÅcþfdL{Æ© sÉwŠ¶£$zm,Ýä•-áÌi8-8²B®}à\ÿtæ«Â\`}Q’û.¾‹0 Ø ¢úzk Þ´*Ñ;ïZðY O›"·üçÍÍ]…^Y´"NIl5åàË©‰”çXˆ}Ž@Úþ³öO±“VçŸǗϹ®³†œ™µU•<¬ˆ óÂ&÷£„S?ÀTÄYfp§~OK@^ß¿Œ‹:6ò[äÄ¿ýBàïô¼^G£næ9=ãÒàn›Zjs7n+ƒ‘40×ÉëÓÜ»–rìò¬ÕKYsôo{Žo—J1RÎ]sÄ:|¾{—-Rèß•S¤À_d®ÕÄB/ñƒyOÁ|—‚ùóæíº ?܆þ\¯¸I/¯¥ü»Ô/É×Ú9^#ŸéΕ±.ôêËõ0Ÿõ…Þ\‹¼¶sœ:·mg)®œ˜¹®%Æ ÉõúѬ9N]nÔ€^]ŸÕËùuéÌ »Ò«°¬çÌg¹v9N¿iß. ÖîAî]\áþ]y‹™уWçàËywѲæ¹wñ¤€‹aãEø8ÏÅ+—ûxi~Ñeâ÷bžaå’^ÖÆÒ£… œ¡…†¶§¾ÀÁ£l»ùF Ǥ˜d2¡ m@}S×9÷êú‰±eÂ$Ô>ôC\¤Ø²g| œ[lŽQ©ëjá†'™wM°nbþÄd>gTî]±ôÀ’8Óݦù­™ŽçSíöÔÊFÓ.¿b(¸¡Ô>8¡ýošêä°QxÕc3,­ëÀ _ÆÓ~—ˆf —¯®&RüL£þùrC…ÞÖ#/Ìkk<¨,™ö§³TºVȆʉÄäRô_ΰÂAêÈÉ3à;Ê;‹Ê¯R*>— ¬ÓrCV1¾¹ŒÀƒàŒ¢²x © · xA¨Ä­(MrúŽ©èhþKâ»ÛxR|Ÿ¶·°U\Ã$ìX^ä±ôÒ"E&!sûÙ ‹YQ®:Vâsgü]_½r.‡-×MuͲüòןÖׄ-mÃöù‹ºjB5:VÚ)°ÚÔ¯ëî½ð"¶ÞµØ˜ýÓüŠ­0hÝ-2nnEIc«4.ZQ‹–:‰ì²­– æŽo“v¦k˜dö± ^ÕÞ  ²÷B«ËF?EerŸŸbnãËáËNÛ»‡/Ÿí?z³‰Ø©Ò=,1LM¯i·®  «’±ÉåÌp—ä=<%Y‡×º³ô®Õ!¸’€Ê:¡¶Å F¤ûaX)Bg·£;Ý©t}¸lÒ0àØL$ÕF I“‘€-1Q´6•29Ïþå”ê8oÜúÎcLÚ‹ß4»EŽõ‚S­pÌnº5±o½ä')TJ&¾°" ƒ«ž‘iÖ`À9¬8~#^J#,3 j$ocõ\r£JO8|SÌq‘Ô®kqý¢Ôøï ?+&Ò+wA(Ezs‚1*÷0·’vo6Fú2ñ¢¢£©ëã" ‘©‹‹ÅýeLÁ0뛢ѭ“ ˆ©xûmŠë+n›UiÍé^ÅIùšÖØůÅ»\öèÌ'¸°’›‡ دQh­CbUÚðQ`ÂP`@ ƒµVƒ}²‰'ñ·kùJVÇéÛB/«¬(™‹gÏ\$˜Šú8OJä"5‰*ÓÎÎO&_Ÿºˆ¦ŽŒŽë_R Õ‰Š¤è ³GÄ°.R–“vi7ýÇϨTK½â&3r#ú¸Î(N3óbŸn|"9½ô7 ÍEð(Øœdùàg ÕˆWÉíšÌ ÿÿì½y_ç¹7Þ­ÏïELdµ*‰Í+© & §ØøÜ$qåA`‚¤Qg$–Æ>¯ýw­÷2‹¶›óô49§f4sïëµ~/sRÌس5k䌼n4OÁU;i¼ 5¨×Ôµ{_ÌŸé“=šüSçÖËÀýRL߆ âé…¤EáÈÁZ¸¢þE.™rûêR=I]+!¯Ã¤Wn°+škÅÑ%T·J§#4¿Ìpc5Ü"ÙÆ°¥E9a|ú YÙIŸ2¢Ñ™¼EA€*Zʤüs6)§O×+·Àî;Woþìâ sì¥Æùù t̺sˆar%ÊE´Ø™†ôá]/Ë™`ÂNÚ'¶D^¤ôv°ÙÐ3O­ ¸óSc0¨³SºS–´ÆŸXIq5Gš ¼ ãZe+&°·ÄJDÀt×áÿ; <+õä’÷ ¥Zv–†žëú¼çÏuƒšq—K´ ]ÌV¨¢ü|Æ]Q"p±å?Ö}¼èb5½¥,–¿CºÀþE3©TÑ«,‹¢¡ê@ËO€;S7w§oîNáäl̘š/?3î1[¼éIœÞ†ºäâoü¿N'Þ6‚ÿkˆÃ½¥E—9µBÀ{*œg8h,HðeØ£"rÈ'®¬<¥¸W¤+yï*³‚QP‘0›ÃòCåŒ"Tt×…?¹Ð8·îNÜtoiÙF6ô e»§Äoq*³Ðÿ÷gÑD;\ÎÞ¼\Ž•ÏÀ‰§[©¸éð8܃wgËäü+Ìj¥3þçŽÝí`~|E¾ÄؼÙTD³âÆ.:†Œ‰¨é(þÇÔ3dèÜŽ1íúÊÏĘvPäòÓ³|Ï—Mâ*GËQ¢Ñn.ÒšôͳÿoÛ¡Åô–³ù~°g¨™ð·š5c£(/Ò&jTaXË ÷¼ê­ØÞÌ‹I,¹PŠæ?H w|©I¿œ&T ðrs®‡ ™QvC<û•Üv‘e”º=tïè£ÉyÒç tNx»sD!¥(Ú$èO‡Ã›òŒÏ$ì &õ² R=»>ÕKóÖƒ ø²/t–Ž1xÏ;›»3É{ œÁÚ7Ëýèry4 epuåTÉÁ¼‚ÆÎ÷;¯¡Ô’¶Ôƒo“Ý£úÝÛ°„0Ýþ¸ìºŒks¯˜²<ä²ÄNJSWÔ;GfKÀ—––‚ùtÜ0+Ìнp®Æ"$<ÃS‚ô2u¿”\¨n‡QF^WWÙW˜ëö+SX“m=¢˜ã&d;Ú&è¡®%3‡¥q)» 7AÖ…á8<‰ñäÆÄ-'ý˜ö#œN’a¨¦“°BpùE¢! }%«E+›ïÁ·0n»¤ö¤Ãµ/ `‚0_ø…Éà++VpRbKb¦cæ>£§ád–æ—å˜y²z·h”Q$1=츆ØZÆÈ‚!¢Õâ(_&Cjÿ‚Æ?a.n)'ØUK †âN=/Ë wA9’_ ]FþÕ¿ñTÀ—#3ˆ´0×]v¾eÔ—¸ ¬ýuµN±àÌã+NŒ»G!Œ¤8<9þ U>Sy vö@tH<=TW#"ž§o˜Á‹7hË–QêïT4Ròôþ­ÁoÏìÚVÞ°Y\ QÓ2ä²µ{بŠm@Æ·öZ®Õî±4Õº«—ñ˜KVº®…Îq41cgm:â°«}{Î4¥Êfý®Þž9_‹‚¯ç-­•VU¸}Háuu§¨Î ¢ŠTª…ßt”ýüôàÉV}Áj¹x`³vÏxD¹NÖ:ˆîC¼qàøÀ1<ä¥-Ìç÷ÂWcÿQ^ŒO0 iŒ÷´SV‹p¬é$‡¤Ø ”I‡ÈûJHn@a Ç)›YÑì:¾´¡øÒ–HY „'lõºEÛ^-©ãÒ¨ÃCüÕ³Ñ.2çŒA뎊q5Ò…XXée§eÇ oÿ4Þý¸|¼ê6mùŒ§ Æ£ªVŽW·Éjp”4Ÿ î‘IôêJëžHué.‚©ÊBëåŠy<¥ò¢"èK3ÄtÖÕ?îدþ‘y~³œ`ÃMùk¥&ÕhY‹ ØgÁGg±™uÉÇe¬pš’ùlrh”äôî-“®Æáo£ Ä'‘˜!Z¡.Ãé<¸4D€ðœ@ùL+%è{QkãÝz·:ªÓ¼êyÇîê|uxôÕ}Ä|ó®ŠbÇn(únØ'Ï ô'ÙOiÈr›ãÞˆžGœÝ.óâ×»åÏdwXs³¼þó—]É€8hÜßÖ jNá9Dì³ Ó½ÈÑÚ„zË;ª—«ü©rjt)-U0[ª‰@±‰Ý& $ßmß‹óë¶d®f Ò,Ìs‡ÍëØþÇ»ºÜÕ p¿úŠaÜòpÜŠXNL;‚L,[Bl“·æòöO*m“¯Ã4ŽsëqY%*e ük w\P¢™‘îv йwÿÕÛ¬Á‚âé¦Iô0.k®TP¾Ó6Üc˦óó9ƒ¯òñ@ª¸+ê†cQà®°ÖÖŒ–àð[elV€–áØÜ l.ŠZq™±É …9'ƒIÐÌôБ¬Qª:]#áL†'¹Ž l²1ŸÃ9Rr˜ûW¦S=U¹…™ÏŽé ‘çÁ¼ó´6Ž.Ý · éBή0œÜ ­#Ÿ8º={ñu¼µf’Ï° »[ˆ*­Y/+Gbœm(Œ¸9qïeú± ½;ÏÎ1Ñ0>;‡Mšøðù~» iÅÝÍ›®ò ®ŸˆNùUd“.CXy÷:2ØÑã³;‡Ëõ•°ÏÕ˜’esZ'ÞSwj–KŽÈüÐæ¸l<í0¢^¿ãj…̘™L¶=°OŠ¯z–™“û%–~ŠÂªó0í÷€féÑ*õ?Ç1_© ȤOC}Ò(Î9.È´Ú…¬‹d|D²Þ*¤°~<äôlöYÙˆº©h‡ÿù ·‡1-ðÀ²¢ƒÍ€Æ>¯§¤åÕνI3@7UíÞ,«Î9¯b‹Û0CÊXÜUÞ왼Þ0Vï#¹€†áÓ¢9®oW¥ç:¢KRLÿ4:;ÿøkêýëö‹½=å:–œ6:Ä?Z´’Í=F·#áM‰zBU49 ŒÂGØbTdä³… 'ú|4KüiôjшôÅW¤<@§‰µh@hâ!ÑNµa¡)™VcËYH_¯ÅNôLŠ°â“oêð ªL%Î"“®…+m‹“ôŒš¨*+×"*‹© OøÛ±¥üˆ·WVµªhfJ©)ñ[ 8œxzr-ØyYãi:F×P±±!èíÛEXi³-‡©3;¼RQ§`†;²¤ÏR©W:p猴oOD':é;áyž7lÙÍ›ÇΑtl€2Ë¢L½¬NWê=Oþ"«Í#ô×(³ŸM|÷ Ry’$òp‹P`yÆA9‰pÏ^ÚàÆP™¸ÃðDêØü¥Çѱý^B‚ëÕ}TnÕ Úâ!§bDÐŒ¤rJØõÄà“1žÝ?¿Úz¹»­ûÖ–„=7ñJD­ºX¾Ìªå8¿ÏcuQ-㣅™/( ¢ä´A–ƒ¾tì~™{¯ÏÉø©Û0¿ýå©Q¸<H¦²VàÿsâB¾Úô§pñÎí%∢rs1Kùù©&«…*æ7^-dیհÁ¸Ñ"gÏ•jcÛËùÓš3E‚É2V(×o7Ò³f•èXNE¯l<Ñ 9ÑúÅŒŠUKÊ2²"¨ù¥"î´æZ²áàŸ~’0´àǧ¡ˆç´œ >Ñ0ø6”÷Jì1î¯"{-Prƒð+îõGõÓ3låÊ:æ JK°É“t9”€–Ι¿iêÏ3ÿ7–jÃ8Ùå\&Â2&Š›tJ 8€nÌqbz7Vn£8ã_UÆ])³vvuNÌ]-Ïɹݪ4R}ï1ÇŸË,Ø7ó6Cþè:êMÉö¾ÌˆŸÔ¦ôQºP$¿?ßS ¢]¯N*](sÐ •2€\€Œ‚¾ e¾EÞïwæw¦š€©¸¼²Ä<¸‹Rùnt=În†@‘ ûù•uŸ!1ŸH(Ó,áÄŒ$b\š¼kT¾²?>¢í3kÙV ß '}z/ÞJÖ]I¾ðný½¶/>Q)@¯®¢à,AOŽüNõq”ž²˜ô,Iúhò—§TòÈ}Û”zŠøŒQbšTà|`ŸícBd[†ÆS«ytÀ­d€^©iLP0Ó4E{“6,í³ˆ<Í~IÔz›ÒXXô¼™žžÆ×›í%«t³b4dîü±×Çã’³TGI'µÀL¢T‚5HPÔCÞb£}™&¡j wå-"8M]3Ì0Œ(õT p„kOëÆͽàñpÜ.—QuÂZ.˜‡žµˆ\´C‘“@bÖôó¥#¦•Ãñ±•¥Mm8†d£ÂÃ&ø•quGïÆõ#ÑMºÖDâ­)%7ë^!|µF<¥^œ£zÐŒ®ãIÐøK³Q‡{'8B·÷ŽÓ™ž=›Ñ+…ËF›_ûÉörótgöAWÒ/éÖÐbh½Ö±€´ÌH›‹ÿYMÂz÷`9ÈÂëΰÐq™óžÏµXš^­Ýšêá>\Äo^íþD§³¾ÄpÛ@KF¡®Õw·«+dî¦.´˜n I®0ÉÌ*˜á ¨¬¾Ø-Ìò, ³ò‹ªÃ׈Xláf2{ÌN7;·Xho®devLF98e ÑÒ¹n ƒõ›. åà¤ô¹³"lžèŠ5Gµ‡Q/cÆóVwîW«çaÄé ðúõÝæ‡r{^Æ·a8s“Ì×ËløelÌÅ£›äù&lÌV Î+Sò;¨¦0Eã]}•¾Ð^AÕ…Tà¸åm*iËímÈÕÏPXT¥gÔ½ªDz¢äSͳ“d͹EnÑÜÃõ»Ú,”{U2w‘hž<˜˜é³(ð¸@þ"ô1áS£5ر)í ­œ…D 5av¨±ŒºËr§ûDbT⥒3ØÏ‹7n½ULQzµ¸ô\‡wVÞù öŽœªåcϜܚ-<«\HEiÈ]:bÍÿËcì–^–žîî´˜ àZá·¤Î]TÕSo÷o¨ò£²†ÞuÖk+8›F³7˜=E6Ù1ï«\ŸI|Ì1¨9ŠÔ§?|êãiÊc§dÉnÚO»­J îÌQÃQvW”3”ÇoucY,ùà\î?DlÍfÙt(@Èæ&§AîTDÀü©Æeˆ†Æ¡žÈg€UŒ¦ø»°Ò9¥u7¥!³›Æ#‹›ìÒd_Í’pøÕóŸ­piaÈ©ìñ8M¶[ 8 µÊÂD²1wµù|¥õú+b†A„»4^•È<’@1¾ª´ÆÈ›NàÑ4a¸.°äU†ÆœP‰(ZÈÎÕ°©8A\TñÕ¤ÿ5¥…ZÿP%3äc{Æ•E"@·oÖd‰–¢6䎀»¬A†«Öô­í;y n)l¹mq_ä¦PÔ°2ô2.Ór¿,z™_êç˜ùå}†Y§^N܉ÐË¿l¥ØÒ0£b'<ѴܬËÖ¯Ø$XÊ&ø¯hêÅbÍÂT‰ ² › T:Hp¹eŽÇ­¿1Çmƒ1()˜†™ÖùƒaVõ'”è€ØéG«Ô˨]î8’Ó ’àr9}w ‰Èêl~H®0¬T‹gôŠ:D“L½ŠOí8AÏH…?IT%Mò¡áPi"Þ`&ºbKüSš£!á@¡— ÆIÄ@•ŠÓÕûÅçÿl ËÅÆk ‚ÃD-3KNe"œfÑ(­êUO-ûþÕ›à.3˜vèa+€ãSõÉÖ•Õå„j|œÊýâ¹ÙMn¨ù¦y¬NÀž%™‹’’<øù¼n¬DQ;4©Ü8‚ÒÀ{wÙ?ßþRóPvª¨ _Uœ÷ÉÛöÙgk¥Q0Ùõ¯03æ•éœ~­{wd·xM䚪¤…hL#o y†@‰4_#Tp5 °¡›€KÔ ÆÏ­Œ rϱÀðàyï)”-ÄC%¯„éu2Ô51’ð³­‡}ƒ5â.J8ž¹áóÆ÷ ·G$q»WƒØ«8ŽDö®öce¹û×]#•€ù®/99>VºÜ:)¥º¸¦>ÉŸäÓœò^(÷ß|î(Añ¿;ù¥˜8ðúŸVZ‰Öä²ØEó…œ-fx¿P<”ÒþVzdÌãínn·œsÝyܤüónKˆ`ÇÂéù>~l¾/;âó,EI•~˜î²ÿf´óѯ¥ŸÙTGµ?; àÕ Ý¿AÊl3àgYÇ6Ì•–šÃô œ¯49(ÝHî6“ A©ŒÚ‚Àäv£‰áD{FP|Jv ¾ž±Eª\ß+ñµ÷Vü\S¸9·Œž¶´©ÃT’ôLLGÚ¸ #TŒ力MTsqû4GBÅrT¶ÏøÏ"i åÞÅØiv¡qP¾þD…‚ì–¼K¦‰Z¤[æ;0Ü·(óœóZ*Š,‘Î*¢D*©ìª¿97ëünµ±Õ5|*V¬ k \H‘¨.Ä­Ä(r` JcÈj0nŽËá\¹Éw#Í*¥5ËošVàìp·Ewþ²XO>¿23cRó ×\n©¹L–çæ¹ÈÈåÑŽEFï1gJ¸ÄÒà3ºw‹í&¼»Ûóe˜Rxo3¶e0L/ c`˜à- ~ *Ho&ì=X”†ä“€ñU½¦w„a@ëÇ LÊvê¸ËªøRÍb'Ç„|õуœˆú‡¼— Ã_rDÌ–#dWÁ‰Q1Pæ(Ì&7’$@†‘¬?ìõbDŠd/H¯€“4¹ˆFbä}ßôÁcŽ]–s³aè·ØÜ0ì£vœFW$Oà'‹ê5&cñ^´qÐ춘õG¢ ¢Ì}²ŸTˆNÆ& ³d´A’{6fñ>ÉÌQšF.Iê{¨ßCn%ºFt<±ÃK”h…ባlÆrQD„’Œu8EŸÜø8Uz~·$.œÌª„if¼«!°SñØEÊJzì™Ñ#¿*Èm¯Ì4b0à ؆òÔqïœ (5?'.fn‘«ÑÑau8 ¤9 zè jÙ…µi›ò'òëÙ±70Ï~l Tj coùꢧnBU@fÆL܈I­DÍóG—ð€°„D¢ÖëAHgöøÆѸ6¸ o2Þy,Yç¹€V8¹£ÁlÒÞ»2˜O(3OűMÂ- #h¢·Âð ñÓ‘zæ™ “4î]d"Ä›—Õí­v÷HCÝËX™õ]°ùé\š²B%âÅ:y"¯ ¤©Û˜k“òμç¢ï;åÞ+ ö8OÑJÁÏ牦7Ô,ñ¡–?M~ÈæA&©–ûAFnñ¯»Cù ; ¯-ô¶ÒŒÇBýȯ–ª™3îÉÃé(ØÞLXd¸×ól£æh¶ú‰nøIxÆÌÀ§üjØO+Íè&™+Y…•?½öDˆ”ô}êlÿ-XûæO«@²"VÓü÷E²Kдã`Fæ>·òÏvžÖ ’È þéu{é;<1Ý+覈Òã´è‚¯éËÙvw2ÌØ4ƒ¶Æ!Ù†Wίt:jÖr¸ûÓ“àÒzß̯,À9›yFMéynkÛÛõüˆ6òÉT€ëéö6Êà`àañãH–|ùhü^H¸GÑxCîQULŽ–i½ '¡èe“óä(Õ1´‡4ö\\-®ŽJn¹¾r2O ˜ƒ”ÔlúxϾI[>™{´Äu‡õs˜¥¢ J2ÕrŒ9AªÍe™¦0UÀÜ$?לIžÃʶJϪå+¦eZsϾbÀI|› út²E” qÀ¼^‚EŸEƒS3èù(«ÌnV†Z­Žçœ€¦n7òÒ1ìò;–«+_Ù I”%)¯È'¿¬F»]Ø} oiÇzN‘Gåk 3zS(ízfqw) hÛÓ¤ª$±®icšeók4žDé]*‘Q•ýçÏw)‘iÅ %ËýÔX˜åµqÚ¶¤½½R4Z»"‡z$:­£)Ù£©A8\rGr–ÛYð7Þ ™z¡ÖŠç{rò‹úÉŽÞ¿äœæÊR®MH¼t]TS1“B‹Hr¸~µõr1·;î>‘& ÄpMi³9ª`»m¾[ »ï±[;™t£ë ¹¶Ÿ§ðDn´Ho©ÀY=ß}ÄÚ=³ß°U®Æ]ý YÕ¢67BL¼€…¶çv7QCd£è mØókjä¸üuMø8x§°E²gᨊÐ:Ñ™œ€ÖŠ ²k‰Bs8#Z1œA0s@)`ÖZ)~Õ šh,ó¶I˪jŠšJOFßEVzQÔ|KÐÊP)lpU=åD¥ ¯&‘HMh\L¬9’áÜB;>j„ù°kœºë¹"µ)T{d/ä##Ð溂èZÑCE.YÜ)ðpǘ¤pFúã;‡¥ƒ;Bw”¾&P§ «pë¢Öæ>U¯ÛÔTo¼¡ìDoI>wÃü”š¨vL#N¬Örn­DéÃ%ÞѤù[½fFëpâC”F*Yš±q«‘rTEØk!Ð&Ž®È5ïWU‹™¨±Ù%•ÍJ+ÕæÆuHâ2ƤVéÈ!dw›0¾ IIK¯ärshSøvˆdnUA}ttw£?J‡§îU—£CŠVQ"e;V•¨—y¦‚»­fÉØðtÈN4”ÆœT/ñ)Üþ»ß> àvöK°‚ÿ‡á/ ‘S54§×­Ç¹¹·ÌN0 Gˆ8…Šª Iá’À[ Ú“°˜ÆžC»Á#.Ò7QÁžátÞת¬¬Á… “qZ΋S a'h7áœÆ¢wDŸbA¡'¢–X\ãJ† RÓHF48]nñq°²ˆ…ãW]ÞYu_Å#|µæ¼J£Ë;·ÙX§¢`v(g°zÚ&,½J‚ Lo·X.c;x΢Xë ¤«±65G‡R6#áh1@µ°±( *}Ã"é9“ôu@ a›y±1±¶â4¾æäTè¹Jç¡h8nÃ~Ö2ù8₆ubz-£Êew'7ãH¤t÷Øž%O8cg£é2ÿèO \Ň“ø º~¢‚Ž$jd­ðá4¢“¬ß†käeüd§ŠéÜ~Ñ¢k°ÆXJîD¶¿qDôȃ] ¯D–Fg@”³ÙIÏ­ÚP›Âqøá£ë„š°˜«ØmcEáNÅØž·œ-ì~6IÆÓëÿÑ1p¾ &]lX7õÒ«䤊Kñ×(¡V›VÐ~³…Ó^£&¬{‚'3.Ó(ì+[BÚ¼]m?}Çÿ¾]ñKW¿¤hg XÄ”äö›ƒƒWG@4Jõ†Q@$­d4ŠÎàÌ»¤ /Àw¦õr‚´Éç–±iá–\õÜpq×Í©ò›öý`ço»‡»û¯ óÚ€ÿ‘Þãaø›v|ëûè3Tûw×Àð`Ýõ }†²îòüN±©PÛy¥¬ìs¯%lp Çs$»ÊYÏ_ s;ô¦rÈ£‚ŒÌ62_Î5Ÿ'x›lš+>ÑEA‚{‚«†ø@Aìá½ÂIãç¤ÝÖ6 s·™Z…ÂëKAŠÝäáÇE¡X8ÌÂû ø¢ßì”Ƕ¿Œø×Á\†{ÿÜ^P× çÕq€ý[Qœ>´¶ãˆgˆm]Ñ ?tÓ©Þ}G\zvìëhÀèQp]<´eôÊ#cGy®Ne»W×!ªªêñ+)ÖPY¼Õ[`ÜiHV¸v« æÙÞ.:.ŒÂ3íC}¯ÿÒ±*Ö\âç0»}ÿ®VñQ‡C@-º;CÊõ÷ƒyíï¯$ ÿõªDú'øø¤YÎ+¯@&ãV62üµ,îavæ¨I¼Nìʉå¦ùæ*Í ëHSggqŽ´K­‘O­ÃkFÖÊEcöا¨yzeÆT$–—í ¢£œÍü’d¼éMÔÕ9DÓŒ¬ L†|¨nMܱ5¤ .&Sw¨¼’vvó“­X;|\nME¶9†…êÝ°Ÿ=§›ûÁ·l¼Il5ÁX¶ÎÉtˆØ® »4;ÍŽ»ì +R\ê…UN¬Ø¢Ãá݉·û ¶!p‰_nÇ;GL¡6gÊ*}™õ+-¾ÛÒuzü?°r7x±vVrk”TMø]GQfžLÓ<éÕÉ ª-áUß0c¾R7S,÷n “-ë%Ÿ”Í0÷Ÿ|K‰4CHÒ7J«›AJð¶j+ÈbªvîŠbA$ÆØÂÿ¿Ø? žtÖIn¦Ñ:ón†ÛöBÛžÔx‡÷©À¯c€ƒ´+¤]5MïæiÖ‹œþ€Pr"Q<û¨ß‰Ú„˜¾a ÒØN.°Ÿ%»öVFcÆépbvÉA)HÉD4w}&m{ü%ðâþ”p þ1Å(gÖv—Åøj]‰n¤d"‰gÆ~Pób—Ý)Fó°_W:+e²—-BºHéœG†¸–Kv8kZj0dLøgo²XG&˜îòw¯h5ƸS¨ÎtT'-i}Ó¶ªškgËo¶;VÊc²ð£äDŠÇ«Ú ‚Û UÈt«+¸í¬$ª:œåÉUפ,Ap‚JrŸˆ7è庣~ƒ£í7Ú‡B‹ÅèjdivpôtŠ1ú #o3°aAg`=ð½ó Ô¦êOKjF§ Á€í—´mÓc'w ~T&ÇÇo¡¾•ÎT”ôfc”ä^ñªÈk9©7jþ€‘"n†Y`ÔÝu÷q£Væ„g4©OaøYwÕ—P„NQJAƒ¢çͼŠ{&Ö·Ùqxq²ú-cIFŸ†H,ëX,Š¾Gð´Äü&‚+þ$2ö}¶ägÆWÆëÝmU'Ãèr¡h¾‰j¤áØy¡ŽQ9]àÆx #5vÙð2)íÂíغÐtPäx>ë‰ÄسÕÍëÛ“A•Br©ú›Þ'Nƒgl€auãdš‘S¥š YgYô?–“Øy#·£ª¬¤6Yà~ ñ¼µºî9 /Þ£³ðì’Ac½0ZÆNš/¶ZvoAÍŸÓÂQ}Õå(_^~Lƒc7q‰9ó§Ú<Ýrš[ÛÕ¨~u‹–ݳŠb4Y9ÌÔV³Jó( G™;u‰ì¸::ò › ¤mËf(Ö3Ðîmô|½öjOÝëËÇZIc¹ÿ É쵄’½Ú[;|ý¾d4wñ0¡\”ø‡ƒ&ï†ëÑ&‰Ù±IÑè^uç5It/ïHæ6;gêªÍÎþ(ž¨ þxVoŠR§?S„ump²¶÷ª2{Ö­n!Ú…1‹Q²g¯} áJ\Šqt#Q-ÉS¤Ï6ìðY§H7|œ9P;ü^Ï2|€r"üœ6Á¶i4ʲ»0³ƒ• ºcð!÷„¨†öàæ$]ŠX1n÷E´˜;$×^Q ‚Ë}>eË‹ÍAß<·WkÜÓ5æЮ-´µ’vŒÉÕ£ÅÉå›’;qɵ4ÇdÜõXÉMŠMÜ0n&Žõ¼»Àý0õU‚×Uk™3Ëö̶+û쇹“ÅèEcŸ«³nôöÛú{«*oïçCÙC7¶—ÚNôFøe#7ÁñÕúš>cø&y<‰’ŒŸmt'x}ÆÓ¥E‹Öˆ: @È$YØ›LÉ4„‘ ƒ`,„ù¯-~å1vPlzŽ³¤£Õ0繊ñIÖÞ™Ú$U°mŠD»Öã2ª£q7/ÂüØc›ÓºŽêõ|‹FÑä$ëÛž2E.Á0`CI½ý9XÜv0ÊØ ßÞ6F_ãë¨ßÉ—‰[ •NŠðÞô9 Ï’ÑéàÆ­”x gÓ~Äu s=ÍÔñß.ã?Ý´P£†•1á_zÉÃËG¶‚mô¸ÍrvÝn……²0êLg ÃθÁdô‡FŒÑß&òŒ­LôLhƒ¥“Œû#Ó§rVºDŸ´:‡Ù²óéËŒ÷uO@Ei~÷–•[º6aÏŒ¢0d*töŽcæÞŒ ¡v=µ!]uPáË-©¥I“ʘžò†ÎqñƇËÛŒwÑÄmS›2½“_ÈÀ/¯å—£S–æ·¨åµÈ¿€ŠhiýÑ £…¿'È@©ð[JÖÉ Gì.™©\`~ý,‚$²ƒéXg¼=büs6?\¡!$û›$XR'1#n_Ž+ÐaâJÿbº›Óš«È„±$Äk³Ÿ&0y}t">ßuÑô­§éôT#ëE—-·â/¨š¶ƒ¾ëìsK6ë8`‡äOvƒx2 Ó}|‰ú1’Òm®€³^9!ŠõÌ‹® äê‡É|XuýWMy’®Â?Hv¨S)V{8£ˆ”‡˜½‚'28TÕQ㉜@¹îAò†¦ã“ð!ã jÃA Äe{ª+:åEgȆ1ƒõ“eìjN.b¥KQÉ\H-´ÅìÇg„àOÄÈY`Ï,¸QŒ€;â±P$ìw®ÔE>U÷èXºéš–ë¦Ã~bŽëïÏ‚ïÙPUóâzéÛxÑ8=ýØŽò“/>_ $çè§7Ýt:Bº²qð ›SºNoñIðó.øúëýïHôkdXX ~EÃÒi: Vžkò}VÙí{ïh{›þýnoëûà˜n• ~bO@èA—ùÊÍ÷ðl’¿·xu±ßUÈ»€tòíιSÀÁ@ ˆè08ÛM¦BbéM]x -˜Y!èO©{¤ðtü D…ÝêãÈw˦ ½ïý©ðœ¼w·€¢¦; '°2³ò\@ÍÏëSûÅ<Ó§¹ È€Ñý¾®Ç)r|fEÔƒ ÞYòÊ«¿'%ÞJ.oÖøX-h‚s`“…¼ƒò] ó-OÐÂ,ªAØëEã á?¸n'q§î”ûeQ¾¿8Ì÷§à|ï¢íx G¦‹ø%ËÓðìaàžãA?î  "Ø(B»ŽnÜçPÔÀ# X*¡±Ê¤xh—t‡sögÑD1·•ÛGÜV¸¶Ú˜=Gª×Õ,Ø0+ë¿ì€_pQúJ®p䘮½Cö Ìy.EË(lQÅÀ¡ŠpC _Ä1ðj›Xt{<0ÉÄ×G±ÿ­ÏÑٗƽ;ܱ{œU_÷Šä÷'œÝsÞÅó{®Ü9ÃÍ)nÎqƒX}–ßù4ÿ¼ó|νüLÿ"§ú\£êœìUg»wºáóý_vÂÿ Îø/Í¡¬ÄÏ;ç©Õpt–•LätÉaïŸó8sœõ>F§Y=e+ǬšâŠù Žk³È\›W¡hÙ "½â.1>4ˆo¡^óƒ¢9r”.(ûgx?Bª"L‰·%&Gv1FùÒLPFBŒÇÔM“Q5Àþ`¼„›|Y¸ÿðÆ È&sÕb´-e‰ºT1N`N*šL¢”ý ߬,Á( …óã,î±ü¦p`ù ¸9¶‚Àæd¥â¦S¥nÏx`5VÆ[­¿W¨¦°ë#i—a59i­i`õ¤׫æ1ÚÈ[ÑËDOw¾ûn½÷ðÎ3½Ñ«¯zN qüÚÌÞVEãàhYZ†iån@¯,gÆ1 J “„¯7ß³£ìr…wìD™ÖF°"¿¬÷îAâfåg¼¼BÙLw”à¸Sƒ(Xù¹ù>;*h—X‘%äòzÇFv“u‹/ÏK9KÈ¥|ƒ¼»XZ“9­‘/ãd‚BžPl]Þ`íÄF9Œ ßvÚï–‚5«¶W£‘+̹Ë?¹T=ÝQ§Ketu‡úEzèß÷ƒï2É’S>‡QÒf—$ÔÞì!”»-³îÖíÇÚߥ‘¿ï¹Ö y¬kò…%‰Íà¶@C”‰¢€’YW¡,ÇÁr2Fk<Ëd“¼z[ØeÚÓpµ÷nz!nœ~Ý·rBŽ—De“ «SœZQ†”ÝÉLu‰d¹7H2²Áÿ ¥í4šTaËɃ×!Šeájú‹ÅÏN&„øo‡Ö|rlwÛç<úù‘—y¼ÇŸ°FZ,m4¢âwTx¹³„S³¼Œ Á bo3ò97ìßi©d¡“ìžýd”ñÚRS÷‡·‡2>4ß×8Ë=Ãä€çiõ1Džsèô†ýÑ^¹˜ãÒ•(gÕêÊ?ô ÛÕx'¡Ô” üß›ïh¿çžì÷H|¬åW·tȉ¹Ã‰_$Ì„,+#ã…°¤“ÏÐðD£˜šÍ{E7Ë´›Ö—‹,õÅ(ù/JÃIê½H·ï=ÞGáÈK¬”@ØJz¦(Ú¯»í?íÊwng¦®ØJžOq:FˆÒ;‚ªáØÃPª)ÎÐtÔï N‡<ç±:Z¯TËbݽn+ËFÅHb`ò<šJPCæκ†È—Dh–•+’ñMC§ Fá£4VQCÏ¥u« ;€À}l@{Ï©¸ç-Ð…e˜šPö÷øgrž,¬„ƒÁ2:J7ËÄœ÷£»’Î^æß©çÿµÔó—#4gÓrUtܸ"¸ÆÅXÄc¬Í§TP’½‘Gº7mÝ‹-Å¿eù†¥ëÕD¼ á’ܲ%Û¤ü¢½Ã®×ËÞr`Øt÷ÞýýÖýýÖýì[—Vl ë÷ìâõZñ¿âù¨“×i™gSˆ¼y+aLÕr4h)ÔX^†ûßî¼{û÷àÝÒò2ÅEùü‹ÍWn7W‰t_|¹pUÿ„Ó,|¨®ôF,̦ñ¦]nšé¥ÝuÞ:¶Ìñ‡õ÷e2A&œlj°øö«ã{ÇÁ;]6¤³uíEÁ\°]ñ¨9É7µm⨈ZíPØäIÝš4FJšÿ´:xIqÅ=gHf‹Þ¢åÙ„¬”œY<Ç^kA‹,Üå¸Eüìø!ûfcjXÕ°&cÖ«áZžó´Í†k§¦Ð§öE- n>“PB²06¡bLN‡Ø¶#/¼“2óPg{ñŽ*6n°\b8,óÖ-Á¨Ñ]ìŒ{‰ ÝŒÐÚvá—,0/j3¯Y8²Ó9ÇÊJ½Ý[9‹ƒ£9g‘€ßPy ÚÍžT…¸ãŸ«»X”Ý}[¤î|¼òÛ"q»zÆüþ21¹ó¥~‰ÀÜù2?;:w¾ÀOÑ­ÇÕ|á¹K!ž«•fxjjHo7A1®·{RÏp÷Ìô¶Ãr¤xå®À ª‹¡lw $úºâÚö(bDzWžÉâ²·4q¡H¼÷3»ñaQê‰'z­t~ª=|«÷Ç¡¸W:ZÉôFÁgµU²Ú”Ôˆbc⪗¬eLäb$¥ IKŠ‰ÙTUÃ, n>:¢¸>4jžn«to:çmu>Üìaæ04˜w F?÷BÿÍÂÖ‹Gû=2iòœ(¾ù¾ª§7ç>Ì·»a4 2XGg컇~ºõÓ$ñœ+`€NBvL¯;A!i½–ëbˆ¤ö.·õ¢rìµò‡›ÿÊ0ˆ6šà,–áŽE–‚‰ß§Àf·z!¨Å”ötÜgLýÀ\ñM41¥˜€Ã~À;6?‹Gä§ïóÙZ^RŽ ug½¯ªý9«?-ÕÕIRƒ³:nXµ{Õ1GË3ÖÊ Sµ¾\úzÑ\mR ß Ëâ‡ÒÀP®•ó9s2åb9¹­3Sy§Ü“ã´ØOþ#“ß×Óžã!½à B$ÚÓÅŽ ¦àÄ–vû4rqå#VÂ6àOc²ñ§ppÆ÷nEà  Ñ0pq G,Eﻳž&h\ xcP=ÂP§±ùï`j Ø(„0ÕbÃ42lŠ’sõ@Ud 7ö^ã¬_ 6 1ˆ ¬G‰« Íþƒ|öv,mün2óT±¨f¿›šh¢ü”sÓ­iÐaAvð€кTri€NúÙ0YsnÇ©—Ô“„æZHç1 Ås„ÌÌLb“›81Ýosn¾§èù3ܘó"¿ühºÂ¿ÂHKU®ï>9ë ‰ãth!DÅVòu¬GCu7 -©Nj fÇ/f «±»+ÚR?Š|£‚Û«¬WºXxdi åxÆŠ9®çÌÜÌBÇS‘plò¤¬nÏw:Âä]Øƹå'þÃã(æÙÕ:¹àÌ^¦ÏËžsf÷Mï¸}žu8=É&ñd*kFÇ ¯ËÆBºRñÚ½¹·Lð§?Iý•©}¶OwN>‘ )itì3{ÆêV–X9> –C¯Qd[£^Šêá"g{ìùa”m¡®€ÕÃ-áYÃèÇu_ª}v½ÙäSï¸á¾m> 84SàuÐŽBLºï­î¦~0uqO%u`î07ïB¥ê8wòê‘n^5œB¼920Ÿd,Ìoï›3"Þ{‹·ü½N&j¶B‚.‚Y‘#T;w ºä'Vù^´ /‰WmbI誾ËQb´¼ùQâOÔĤ4D‘$hh-Ìïy7SO.p…´‡óÊ ’ª6ǸÚBq<…J¼´:s B d”¤ã³kt¡Óq– (àöú&ª#—Ý°ghÜSÒžÅ=Fsa¥æÀ¥)Ñp™õŸlXÜ?9¸*à…#ß?ªZ}XIc„×r†9ïlÓ—”Ulf )9X•—csVúülh‡p2rˬ'@˜vs5¸bz‰¼zÏKP Æ‹X,œÊ•£õÏÂÇê”XMR¤«YjÊà6S³œ »äðq}`2úÑi·ltaÔµš0<bôæzµd\žÃ ¹I}Ù ^R\D}D$2'$2k‘å(9‹Ñ”^ÑépáöÃIh_ NxæF †`btXf Ã~Ýš²%hnTðê8‘¤½¯èM‘Q¤ò,>#¨9ŠàÌŽÖãol/H9Ǿ¶µXY]çͶJh'oneƒM3Ø(Õº½ËV²Šrsa¨—üZã Š©/ÃȾ>úVó5÷wf7s§an‰T+jJ›dáJÖzÉr¦z¥'ä¦.P|„QHY¸Ñx 6ÍF„M•ùηóeã—»„—N.°üѪãÏ%a™šÿÝ´¤\%Š³¸´šÉPkx#ºÀ-9‚Ý$˜•£!áÈuq(èz“ïNy @20äV £ /&,Ef?Ty£PÁ7€I&VŸÞ£Ý.[ƒý7Ç;æðOüq„öÔ‚²OC4¸‚’®Ö× Å »3A€úÙå~XÇ%¼Ð¡2¼ÍqëÖÜlJ”_Âoá:áÉrš>¯¨j”˜DÅ°àù^È^g“) ­Ñ7 öº„¨†×8T]zem«t?ä´QÐ^}Æ;—ø‡åvaø°ËA3ºŽºû ,²{ÙEŒzÙx›§¡«€÷Y±ÂÌæX{'ºµ89¢”žwÑ ”ÎŶÆà Vº@i}/Ž®¯TËÛ,p„j:£¡¶Ç]v^›Le…5 m;«®z[®üôÓ¥ñê%¬x ÁH-ÁÊ6¼lè}ò íqw0Œq_ioÔ1ªly]Ìß‚o¼1(Ý·/~grÜu›ëâ"9;|‡3F‚Ôª?ŽÔÙ¤FÈo²YÄn`ìïNa°™x^* û¤=v°KÙœYüN‡lîrÛ Æ|KF„ˆ:…éà¦ÅxGW1ÒÒ^z’‚žpˆ¹Mêz?†Á€¢á§Ç9^tŠc«ÉH1/ò°\kÉ‘>ƒÚs"S’ ëî5´ jÉNqÓE-/½HçáJúÕùñ¨Þ¬¬âåßJ3Kn–hÓ¾ w€öP·“LNpØ"Åu•”S’¶Œ!Ññæíšoªå«¾Áá-Öƒƒã GùlûRÖ WT}dèkN”º—6FócK*ø «1Ó³D~ ÎÖ°@f#Ê·™©·Â³àÅÖÑ–V\ç‰@¿Šø’Ò4*•ºp |Ó)—ÓÌšz¨dj•*ÀÖ°]ûì)}¢W‡Ì2ÐXÏB‹£R[£¢c'Øddý¡Cd½`‘§ã(Åc kF#Ñ®´9l4ㄤ ~IâÑÂê¢uŽˆ¬ØJeŠ®&SDoewàˆ, , #[„dP|$~OÍå·AëŽòòWýgY‹½ŽÞÇ­wøØÊ>üýxµñáxõxíC«|'`a«ÏžŠùyà[ º ó du·Oo[<ÐÉ’m=Íïaë˜e²4†\û«ý6TÓèb »ÊF7»«q,*K]#N?c½hfÈ—ˆQ#:yóG¨Ó°†Œ’\'@@¨¦Ì*€Œ`Ú#m5Ô¡ûe]¾zsi‰TP^ÁV^¤¾ g@zF^Q ØL-•áôÚ±¿!¦z¡lÿSLh %Õ¢‘p¢%wE7+„ßUâö¤‚5Òhý„^‹ ö^UðqÝ»[Diž}0½ ¸’Û¿Z„ó×Å•¦¨õ}\g\„Ú6±/8£¶3ÓDÞ*/ë@Ú—ãbÏÝ×]`8,‚¶ìfái”»/¥sç)³J×Ëd¯j¬â(³DDN(»!ÙæLÇ*ÉšŽò¶7¬ÚfEõÈá÷—Â÷WÑ ½~îðÃa ¹Ä¯*\þø†ÞIfäÍÞ×Å&•Ç¿éÎ‹Ä ™ª/ô†-‰r!†·þ<ðK’}T<3é;ÉÏ4S¾™F^A‘ËqYÝX,”)~ÏY+V•XY”–áFž˜¿ƒzÌßÃ’~»JÜÖG×B¢¼0·—ó¥TŠ+|15š¯eRýv‹€ä±ˆà† ä6¾Sª”édØË`G½BM[8¿Ì"!9è“H:Ç-ŠÄl£ÅQ¶åôà"²^áVµ²ºÁ´LI^-[šŠ5‡šyÂip]¸àCfA±æÔÜ£w õþ¦@¥b!îm†ât1eÈ…ë,-O G¡½È08-%ç Ͳé0rݽИ4%…UVU²‡üªVHÌ px,Šê¤ „^ƒŠ[rÌÚ!X’ÅƳŽìèºÄŒZì9m'áv©)+®þççÒ Lƒ”ÊÀd•‰Û‚à6ywÇÈ*ŠLXn•ŒÌæøÇ4š’K›°!£Y/¤µÈîöGG™g>Bˆ NF½Ðù …KèØè!¤Lá ýºØ\­NIw\np˜ÏĽ¹ÎFÓîÀ·½¾Uv8]ðf,S'yžìrNéJòŒýss÷Õë7GÁBÓòOVž_&êS9'B)•øyðmÕB?”"x5;–ÔB¸çóInpV¶ÌM ƒ\-I-–?i²- QQ=ïdÏœf9–fHn1óF~ŠQx]6»< `ÔK]ÿEUA9?•“ãi+`Ö…W‡·ä~Ëö…’ôô8?Ý•mcšÅR8Õ‹­D6Z\åRåŒÅÈ¢’½e±µ•ÊÈ¿ d×ãQ]U$“~…+%š+óq)¦•šUîí¡‚-¹4Øç¬Äul‘oýgžY¼¦î¹ÍÕ„¾ü9(Q±YšÏék‘åòÀû•5a³ÉAÇÔ âÄ¥8MtÌ@]jÐ4Òmá`ˆÎJ¶VˆxœñÕ.3"Ñ€çæGÜ-9ÛZÿ›Å•¢¸’1¹)ñÃkòQíãòìÈ]:ü/7Í9šišc¿ºÆ<&©o¸3ó*-=ðçÕX—0D¿¼üˆÈײà lÏ=‘Ÿvº‡o¶·w͵ÍÒŠ“ rtò,¶>ÄêKCÂhÌâøª;R»á® RjÊ¢Ÿ˜Óƒ…ŠµÉ ÒA¯ö^u½jœ0Ž³ñÇÝ= ÚÝi ߧ!ÐfB€]ˆíkvža_¥ú^îE)Ö»ö9‚3d&c+ߣXÎ- ;Ž~qù  ð;Ì9̪gϘ·…¡[¬•Èº$@½{±˜†ž¨>\¹ƒSÓ`š¢+†e êM]kRhò³Q‚Xl¢˜Â[®n[äÂ^¹ØOñH¾,#‚:z™Á¡åë4i×7Û{MŽ’ Ë1¡òäåüÊW@«ûR(ìzfiw(é2¦ªª qïkcš;”)褕åÏ·Èîƒbëdg«3HÕM}ĺÀ¬¨Effõ¡ŠOC8¿»›¬§‹œ/é.²Ì¦T%ÐŒ#è·"ÖÙ–‰g“emX“¬%Æšî\Ja¾MŒY!¸Æ¤ I¬ÅU‹½€!v20ÎûŠãT*8G ­´È–³ïÒ€¥”A‘¢’“̱2“ÍÙ‘®ˆÊ¼?*¸â•jpL ýøôXù©w˜­y½»½Œã 4j‰¤f\ý)C“ÚBX„O$4C@Õ2Ð(ÖòÈ{!Q-²Úiàhp{h̽1BqÕ[+/î#?Õþq@ãT³NèåÖmx4œÃa¤ñ«±Œ•}LyÙ}ï ¼a0ÓqØ‹:ÞZwg¼ Q½=ŽïòˆTvØ­·ûí×Ùa8î“’ y&ÏìT4ࣽ¢ ƒ'Q‘À Ôú|¾ÂŒ7%ßqPUš5÷¬ä^N~ùrlKξÐèºÛê[÷š5K‰¬9›uMç]á¯Bàl#-.a¯uÕƒ¬5œS{Îuµùñ±­Ø¶ 68ŸÚÙäÆèˆr{Ô(xg6Is‹,+†gc¹ÿ,€Ÿð‹ó#P^#?ÚÚZ£®‡ƒÑ¡_E Å›Ï3p^MwðML¦´0Ô(€ì'¬/Ë]+¬iÌmQëûR¾;eÙÍ8‰MÔs Y_3óÌø¯_ª=fiÀ¹ iÜü[H>º#œà •Œ–Á÷‰¨O'¦Å„P‹ÄŒéØš N<1ÁõOÂᥕæV¾_ÁWfñ*Göc­ì¶à9J×ö£Ó ؉¸ÅÏŸˆÔ8Ü0"B^]ÈW _Ñ\¡0\– ¸ç8©f~ e"‹_ƒ{wXúùu4kܾ<ò¥U¯²8׋¶³˜~Ô„s ½kæM ý“ 4 æ+»f¿é¬áy¿í\(±!>,DE¡^£•ûËèùÄNuºe~ æý u)7×¾½£îî«Ý£…·œãð¿Ë¸ß ¶¤Ät°Ý2[ªëäh~Y!æS0O‚8«Q pjE àÜ—;„*0ðnÅBóŸîPj){P5fՙ𧛤ñÔá?B¢EQ‹ƒ ¶ÿügUÊÁ‘ûaÚ›$xŸÂÅOÌå…Ò×ö«+(¿`„ƒ…›ðæ«EG<±ýÓOì‹žå¤.Üì__nmïþÔ}±ózoÿç—;¯ŽºG[ßﵡà•À~á\¯¿[,S«é<©½Žx±í“xÔ.îƒzY63·æskÑûKrÒê»\õ§-Å;U‘[—¿b&ïÿ`ì\“þͲóûÆÊ®ÍuBä·Wm¾¢°gJ "F[¾öAP‰]#½ê©t—Ôs J\*I^GdV.6qe`Í”®oqƒ“[Nù1ß׶€³’ëCI{S[ÉÍÍR!k$×A(²«¯àþ9¯†ÃV‘`ùGÛ®mgH<”ë ×?¢;cZßϺÀáÍDèG×8Ï Jí‘_ —ZÑ“?šÚE\Ρg}"*u5(sΙy.Xê 4a•š]¸ç@£®F¢žgƒÍB ¶HI‹Š¿ R(þ_­¯és’É£!Š=B²'N=„WªÙ1šÊ––Qä²´ i—XGíØaÀW.¶{ÃôvCJÙ°½ÝØX ¼ÔºîKÃK˜òêþer[#l÷f7Ħ›¯16}}Þ;ùpÂï„®Ï&ÝsÀ„WC„ÓžQdð`æ®Ééý¼SxS‚ |Æ©þû1þû1þ?~Œ›Eø‰çyyþªƒý?ëÀð7xîÄðÝcòîྻ Èá4eæ,ôæXðsÒÃå Ñ;–%ªß^‰¹sŸçy[ZþË<ÅåIjZhªŸêö­ÒN±Gyþú`ÿûƒ­—Ïë IiÉq42¤ƒhl‡Ú¤T¢ÍI|ãÉ2ù±—p†ù*Å ’¢†ëÓ8ú›³$ZL­ áB”ÍúZ/ZZ4:ÒûÁ‹8#×$-–…0ihM¦ËÍZ¢¹ zi’erq‘gtsÞtLÁÅVòêw«ÔwÈ/¡½lóæQºÌ_“-7•}]~ßè«Ùq–¬Lü¶F˜”*¡…ü¢NB»:+”£ŽÞ-Ñ«BÖèßqó±¬êùþ›£×oŽžÿ±iýM–LñJ”¢òEø\#©«~hÐ2ã?7"¥ø‚ð–S£äªÃº"”O³Í•ZE×m”ìMNJFŸÆÁ¸ÒÅw+`‚—mó½±íâi˜/Õ#ò«†S¿íïïu$•M—WzLø pìäc̽X<#-8#tZŒáàš ªëõ,å%YõÍUˆ¯gu&n¦2°¯¥ýÅ´/¿þó‘ZŽç+/ÅåØ‘xéÒËßÆ^£g4±p¥•´q¾®À¢Ýž´‹Í λ[É9K•(š'<‘ Nt[h¢™‰ÔÒ휛è¸^œ†¬ž 13*§P¿H¿Jʽc½©ºS«ÔÍz‰Ž’®ÏÉ÷£«aVî%ƒ­Vq1@ n¹$îp“yU8b÷ðŸç+ÚÿÙJ¡šró?1(¼ì¡ÍÛÍáùK4’µaŸçn ~¿”æ7¯Éñíl¨Øjœ¢¾,X׶‰µKáîß…DóR2’Ý ÐõÙÁî×®Ög3»´pç#NšQ32Ú,†“ľó¤Yý]½X”µ¿•hÞÒVÈÖŸ¦˜Ä—º†hâ ‹ÅÁñú—b@ÍÜðhÏ[ǸtG7Ð>ÉŠc‚¬¢hinR…µFÉâÿäÜš'(:Ô~ñ1õk*³vžó|U(Ï;dsx=Ä2óQi}m›t‹ 6'¬®(ÿi0i;_=®#ºŒk/=§«Oé²á¨Ýû¢ÇvÕˆêI~§s¼\%éÄä …™è(ùDKû?舧@šxóªæéªì<É{·Œhõ¶‰CÔ¼Fá”ÀRnœÏdA §áé)Át H œœÀÁÆIÊjcÈ@´œÉØEo·>ù r•ŽË”Á CÉ7º–þŠùþ TãÇcOìÛÓõ_+sÑnLºÓÒžø$ô´i#K¯gÁGúÿüH€Hj$ì’“ô&Ž”ËJêÍ·™m-«¹¼Î,*÷Êämhk›QO£$¯¬ß9š`üÅîå Gµ÷ã«þûBÆÅz!µ9sUX1c+‚‰è]“úû’Bª@ÏLÉ µgXËð"Õô$@´l­:ItÖ×øžÇB˜>åG{Á Ü"h²wŠöiç!¡…Úd%tz_k<2ÛÄDÉé)AE˜°ÞÖqEò˜õŽö¡3ÍC­†ïÞ}^$n$ A8^§a<È‚«å„]O¢†f ®• .ªÓj„ñQ1Ÿë¥8£õrZÛƳŸ^uHW!õ8=ªl™'Ûtb@Æ)•ŒŽÇEâ ÿßñÚÕuVæ$“P¹nnªžJ“iÚ‹Œ3‡k,åÜ©Ti§çgÍgrRšq§ËܯËþ„ø=ž•ð™kãüÝÖîÞ›ƒz°¬«½Ð ÃxÒÕLІn–öÐ(Ý/×øg9w–ÃáÁ.BqïD€Èqñ„ê5ÑÒt±Æ‹!ÃIÙ ./¢uÐz‰ÄåmÍkÄæhGÚb²«š„)zAÙö´‚!ª>O"ãƒîk2!µKõÝ"Ò‘" .ã4a˜ÌNy¨EZ×Ø;ÚÞ¦¿ÛÛúþ0h'và C¨yv_çgô£a ZÕí{Þa<á0–Ît&’¾Ëé™îóë¢uS™Ú[òÎB»-ÃÌ7{ïã‰m°Ožô“Nkò2ŠÌìÑ)Üg‹ÍÞ9û<´]ýšÕ¶pM³l±ÉìÔ´Û°OûÓá¸-µ}3ï€äR»y´ÐQr—b,dž áhN9O¤’›~}§Ýí7Ð-—1øóµû6gKòq Ÿ§ºF‘¸“¨`Œ]`a›¡¿Öi”i‚ÑlMLô;è«ù(?²Ù¨'ì(ê•\ ‡ãG£ ÅøŽ*D -¬xœa¿Ïf9'ºbev“‡‰à½j¼Z¼‚Qe —9ü!oñ†”zý¢œNÎv,Ò£Š}¤– È1JÆÎx†¦É°‹ÆÃ|äVm­QÕPeY5ç|úßÄ3÷Lª~ïõþáîOA?bo78 Þ0#6qÁ Rº—³v–hî$/“¸oaŠMcÉ›ÀøŽJ`ŠGf’²VÝÌxcCà¦'Qz¦ˆ•uÎ:-ŽÈdkÁüìe–†MNA)N!F M¹ÒIÜØG“8&7œS"µHöpQ´Ñ`¡7MÑíQïîûâ`ô4—¼âv³àâ³Ë¤”‚ý»”zÐŽ8¯[4O`2d^åO{ Dêr?º\MNXûæO«‹¥qvÈÛ²ÞKÆ7dl `+D}WÜÌ­i" ì)LçÄ€ì±5¯i†hª4¶>Š6ÜŠÞ$Î`ê;VâMG°f6WU}æã;™<ÍYéèþŸÅ©[†ÝnjÞ\Ö¢½ö°jY·ôö8X~GPö%ãEuuŽÒ¿ -,qʲi'Üî³ ¤B„DðÅ€ÚMò§pq> !0Ǩš¿ç‚Z & š¶Öœ‹ Ÿb]DZļ¼Û÷´g\¥±ÁCÏ=7¿âû–guYRÊéÉ®oÏ`Ùq67^· –žÁF°á—JÑãÒO¥þgΑY‘ÚÌàbUF" 4™¶ŸÛNPte’^"äêÁ̘êµ{”…ÓΊÞâbÑyw¡`]×îåB¬#UT`Ý‚6}f\¯âÅÌ0}9³Où˜–FŒ)‹'m„¹8zT+$£œLǯ·ù+ã¬Ì¼[ŽßjôQø ½­Œ­ÈT÷HÛ d€f·¬zܳÈÆÍú„ kðf¦“¬jb,@fŬÐY|°õjo÷ÛÍÿÅ×òf#‘*­j®‹à~°KÎW)EzŒ&x´]…tÁŸ¢“€Èa8Ä€ŒLÜ•¿Ì{}Ü;¿g ÇÞ¢D¦dGÞ›E¦2‚Œs—kÎ cÏ¿ÙQ`‚ :œEá Íqñ¤·E„áSv£ÌVŸx ©×õj1‘Ñ¡]"ß¡Üì,šØUl"/871GcÉIFøèÞTèNo…#ºX•[ ñ¯ ]P¾r„L1;Å,äïë’¬èGÙðø1~8AÁ·¬±ùO• ÿû¸jGÄe@veºÅ2•"ƒúùP†Ü0‡ m.Ac8‰Uf“ÓKææjË Ò–:ƒP „Å*ùÍjøc;ít³˜ÛA`wîª ýdÍ¥ušW}9¿òò·U]~ºâòÓÔ–ºæQY~q…e¹ûŠU‰ßªŸ¥å<üagoæˆliÈp°N¢5Za°¡Ï² xšÑ¦hÞ*³¡oÏÙ¿…רLz¾X/¯ôÓ•¥yEk6$C‚MÑé-·‰)h[ý¯›œ•­¡êZg¨YOÉõK-°`lZ!U[k’V{ÂI’®ú`z—(±R~¨ÁŠÈX.“[œa6úA‹’œå={úÁ°‰Q þÉØèßÞý,„\"7zLÁO†ÆãÍáÞ©ùÞJMο’¬V`³Ò$™x¹ž}pÉ€fÄ&1˗פ ±|¼º¿åw?î½=>^~‡ÖEo·Úÿ7lÿóÝ¿YœU¸F¬‹/ˆ$¬/Woƒ`ÆÞ O²úoºY~‹Þ¹^ÞÁÓÈäZÎÆá~Àôƒ½cg{IŠ[ }8b²Ë±o"ý‚WaoB˜r~ '¶=èÑ;´5"»ÂÂ2È=›,†¸ Œ°ƒà¦ý6eðƒŒç{ì?e\ Çà 'Æ¡ÓsBà W %é Gº¼×[G?´¸ ==B(çŒT}Œó ­ŠÂ,FSÈh¥CfRu¤ÖÚt ƒ³<è¾Ùµ†UFUBÚâù´HG'ëŠe\`ÂH£„ñY²'×0A»¨–0ÕQ8²þ2‚<àQðz‡‹QU¤@¬UÝ @]Eá…óÓä2îó p´†éºùAÕ—\üß$æBéâ‘¥W‘NÖÄd5¬#ô]CÁ/ÅîžxOnÃ¦È ‰ž'2~›²3`ôe‹œòŃ@ 0\•ø†ˆÚ N˽=|2«Ãˆå‘•PNÞ~®Õ¥|`oC÷«¯às¸j•"W‹]š]ñþžC]šÖîú¶#…‹´&ŽÅ{Dqh·à "CàT€˜¶–pÆœ1Ë FH¥Qyì9µ™â)ò0Ë’™ˆe&¥+€ðúF¸Ä‘À">Õ€À¹‚Ó—kT·T(b!QMp𶪀ÛÓá|ÌÛ íԔ緦´vÖ’ŽGdÃ,C²÷óiÜ#gáXFÀÅM#7gCö¬…lñÒØñI‡Âs%ìÊÝx¢4 |“,‹OÐÑ.•Ãx ôlD = aˉR’å¢×ÀóJi™FŽµNÍE Y;Ü IòÖQ{‘DÚshµ 4¡9®ÖÃñ­°¥¼zÞú½Pˆ›¸fI]õ²¸i;,ú¦’^“ƒI²f6ÓnÚ ®Áµ¹½g¶NÓå-ñÂNɃÙÃÅ®á¬+c-™CoNœÅ’8¸^g Ï+læÑ]Úžc^ôà*+/‹ºYëÆÐÈ)fÍŽÔîÌìœ Æ,ŸÐèB¶;4üž™]lÒHëg4z¢±†@ñÛ(LNØʲHßÄD¶+=XfsÇ#@o‡cŠgŽü¶£ýl€á“•™² —Š;ˆUëÿb)FÈ[šÈ7òµ³¸!¨iN'‚(·SÂÇ}j[}²öæRÌÛæ\6ÇÂÈñEkó:ãJ$…Ìäˆ/Fb˺8ßê)ÌÎ=¥¼+¼ƒo-Æq5v7£¬ûÒX’7’/ô9Ê~ŸD xÏÎi2˜ÆE‘ðmnd·sNÑÅIpºé ²„ƒ¤1'þ bº…¡ó펳±¥hÉä¼KnÛ²dV&]žc–¨7UEÏ2]6òÜ®ŽcvKözÑLržVÉ~E’»ØÓTÈ¡lÓI.^È´JÉFå)‚$ÏeÝaddŒ=„{_CTÂöçä,õÃÅÖg" ¥.Ýž‡x)ÜÆпÌT4âb=åÑW€|Ìœ–DÝØ=§÷‘1&ýÉŽ0:þ©Qˆr}FWÇûyÛÊu£¾*éÁéð7•änÔîÓ ³‘Áù3Ð\pçí˜tø4AkðjgÔߨýÿƒ†“dˆtù8k?î<èðKYp”œ ¿Ä×agBOϳÞùUÿ³“¤gßpª«`ël”@ø÷Ï'سÞsüÑE“ojߦa݇Cìð×p÷Ÿã?í _tzIgz©¦p½Œ'=Œëžb:xÑê‹çgÐà¤~SÛ†k!É‚ýæ  Œà@üºG/žŸ„ƒ> éUÒé…ßÔ^„£8ߧáM‡ú×йçC [1§½NÔŸB’dzìE!|<ïe$»ŠÎþ¶¥Ûçп¯#xìBC® _@Ž&ܤ­§PÅá$Ÿ_ã¯ìy„±s¥©ß¥áè"8ì‡Ñ)öê"B_ÿeÐÁÓ+Ë.Cgüó<ì yFñSû5š¯âAFãv>~~ÖëuÎFSN³ kåÇnP¸X¿ŽÃÑÕó34‰eW8v†Ï_Rððœ‘Âçÿ"évr…¾þ>X]yÞã7X-Œÿ‚•=„3í#HèÛó ½:Ÿ>G3¥ˆ»ô_ñ*KáÊ¡Òâag(¿ž_DÃ,LñœÎ$u¥gÁ°HqR®èïóx ¶7O:´ovoü-ÃÍÓ2ÀŸ—üËʽi/ ¾ S<í!Õ´ûÏ(Mž“u£õפw7Õ6Fï„@¿zÏ“éd$\ÈËð ¶áË— ´~ȸSH½ŽR^’/e¹E)¬+¨wä÷óx—Vç4…„RÖ@&›;çðë9ö$•¶½á¤úFnãPŒù¾xŽìŒð9&½„òÂ8»˜Ž!aÊOÏá†b‰ûñš=Qߤ@Âúõ”žNâNæòõy<ˆÇãàÿ†C š°(Æÿ„Ççq Ë:xÛ% þo|™ü2J.xû7Pò<Çý(…ó„Ï”ƒä êù!A,H‚¿ søË›ÃèøcX Áa]Å@~é«çäD2NbÜ˽ojGáB?'ð/4l¿;7ô»óÏ_ £# (d¡ |$LÄ”¶uÜ ×º“ fì²Ï°b (¦“ɲ~„’4Ã[àûAˆ§öד³çýèZÂ3q”À) Ó9¡Óv÷’›ðùô䄲Ÿq+$Óëàëx„U1½öæñ¿ÿ÷ÿØeôß0ÎÐ…ü‹’F>¬ ÿV®¯¯(ý·¶²JôߣÇk¿Ó¿Å÷¿ Èè1;Æ`;áâRËfÓO°'ç!2QVG€ÆŠÖ:¤Æ ‡ˆ7qÛ«+íµ'ÕõgÁýàÍÑvjßp\˜…íÅ`õéÓGmHú ø.¢à09\¡|â;´M"~¥ìŽzȪ–Ó©H¶´z Ð#¯ñ”k~LŸÇpâL‡H`FáϦU&Æqæš4bÝ™Ôý,@ÚHÁ…gB "É TÄ2 ðXñ)2¾ñDÉ 8Bãb±oÄ‘a ÏAðzz‚VY{q/!ÔŒo€ICzVdU½Ö0& ‡Jp×;i˜þ ­Œ1Õbí>¹s¼qIZÚSÛ!£6Ä«V$/3?ÍÐÔÅ.héýã.°ƒoŽ‚­W??nl½:úù™Ñ; ¿ ûÉ.MaVÅ x¹s°ýäØúvwo÷èglþw»G¯vƒïö‚­àõÖÁÑîö›½­ƒàõ›ƒ×û‡;Öâ-e«Çò”fƒÄYb^ é†ÙM$Ù‘§Q/Š/Q€ ÂÒíS„ƒI†ÞâwcGÚµK¾¦-Ò‘|}>™Œ7–—¯®®”ä\pÙò7Ô˜-TŸ‘äx½ˆæKUrÕmh¡tf¸vß™2kíK«.lÆÉÒù•øá¢)ó¢­í‡lƒúÑ’IW÷l<Å4š^›-ø롨^Õæ”tÍ¢M®Ú¡ˆÓ–‘ß?Õö$M ìÚ §ó(Ä)àð Ítþ‹UAþ“8£†ÁMØë‰Vd]˜LûŒ}Y¼VS+n†ïf­¼6-D!6Z“fêÄÇIšpÒ´a6ð/üÞÕšgMêÇg£¸ ·ëY-ÿÙ$Ø ‹“éL%Õ÷5ünk—ž+ç,æ‡bs뮶KX^ô¿ˆþIùßLþÄú71#w!ê"hxÄû=lI#+ë^rŠâÓ¢±²§ÔÅ(¹‚…ÛXmÊ…Xϧ›÷T1çŠÖʈ¡÷Üutr¤ážÓÅF“²²Þ¥SC…Ô3øµ ]`A;~œözQÔGß µˆ*³«•¨Âc5JrŽà2Èþ ½¯1ø; æz‘CÒQ=÷"-‰ iF¿‰Ÿ¡ôDúÏXヷc ¥Ã_Xá‚hÕ,žG®ÞÄ=±KIÊĈͯ’mâø^CÂÂT¯‡‘Lg6i7ölç:fùaðh]Ü´tAÀ:I髦(#ösRÓfzÞ°*ï'vÚHèBŒE8š¸jï0`›¡Ò³F.ù²Æ£x8ZúÉ\W21ÖÍ…5ÌÎ6ë0'á gõšµ¡Ô<ÀÕ˜LþÂã‡ÂOÙ -Íœ#&íØãË$»o?3ÛîóѦ°ÓH©ñª\0wŒ®0›Ð] §ö ûæ`oÓ¡]ð/5<±Ü¯ø»Ã6 °MÎ"”i,×àè*µœ/Ké ý5r³»B£© ¼siã^“ó÷ƒžDŠÖÃÇj0i{» Pè%¤ôø€½‹ð,Ú¨{E|ÝÈ7{YëúÆO¹ËŽvqhéL'á¯áû×0pÌ– åü|ÕbQßÜšrø`¹H'Ð|û-õƒ^TìõõiƒI—às,Ï3šŸ5~ó 4k5<´»B«ÈòC,)8÷)L©ŽûÃ)) wÏH“õ»’nó=×ÚXEü<:Ù„#[þ;ÞÍËË°áþoúÅ”Æi<šœÍ?fÇpJ×iJ`*ptÈ‘@©÷±´³ÍzӼ脽&R0Žl°"D;~²ºÙkÅž˜Í's·ä/‡“"¥-á¤ÇaM˜F~ϯ°åÏMU+ã‰qqÈŸMmO³¸ÄyAjC4£¦vÎqøü†6üážÝ:nFIûð<ùÔÖ!Î,Å/ ‡ŸÙ§qÜ ¿mzb•´Í¥6m!M¤Q ¦jÐêÜç~ãðLkjöÔc‡¿4¢ · 'fô‡“èý¥Hìâ†A³sÓ䀕õbÇó¹BK’I¸æÔxz~K¼ÆÜ'35u9_À;ôï÷ÏhþàÎͧXŽ{@‘ ¯µ5 7ÿ„¬êŠ’#ù¶+õÉM·»uãêEÿÕ‰T„¢¡Mgw—¤YóOvDgGú§|ågLÍƘg§UØ­FÍ®~i†Á•k ®AÉT‡ƒ²!¡=Z6(GÐèÆüã1á ùû)–lAÿ;¾8cŠnù êWéY]ªúßÕµÕ?¬¬®¯¯­ý!xø»þ÷xþOigÜëÄ£/fÿ¹òàÑcßþs ’?þ]ÿÿ[üÇš…Íçü÷yÜ ô¥óãym’Œ»dÜŒ.üÏà ‹aßð÷,íy_ù÷óZ q6ÈÁ.)Á²à¬­ÅÚ‹ˆ¯ ´V¶(u0Œ†hS8÷ñÞ4.™êP6‚ç›ÔФ絽ø$Û¿º­ü¸ -ZöÖ|gÖ¶ h#hï–$7o¹3ô®örþ;ÃtÇ=§ý¿’Ûÿ«Ö¬þ¾ÿÿßÚÿ‡ôœÿ>¯©8ßÙç[öúv·q"Û’h¨N ·ïúö^ãWnçÇ =°ÍðvºmôÇÿ\r±lÿ;’ÈßÂÿöÿznÿ¯¯¯?ø}ÿÿÿ¾ùöÅîÁa°àU×OzŒbY«mmïíooíu·^rÜàMØ3ÁðA­fnôÝ  ¼Ñíµa“t_lmA¢Š¥6J(ÁŒT9º³VC#¤.¤„³"ÔŒÛû¯®<`Faµv~::Øê¾Ø=<‚ï(Å=‹Fì˜],€|LÛ$ŒþgËö¿hI²éÉo`ÿ»ºòhmm=gÿ»¾ö»ÿ×ÿˆý¯k0HþËb;8=I“é}ùúF“ÜÀ±æ]}útm.KÞJnHp³ÙÄôíÕµöÊzÓX«²LúÓŒrøþoo”»®UëÍÍRòVºe6º÷?ßH ? ”ÿ9#]Yi;‡‘îý­•î3 3Ÿ‘îýß­tñ£5îR“«3‚ klÇíÑÒç½–¡Ö~=†bn¹–³oêß¿Þ»\¯/v©@0Ž3´S£”šÍº¾æjË+k¥H³çŸYÎA…Ro>Á"27ã#¡æ>ÂÜ°OnÆžih$Š&]¤rBü‡˜ÃPç’âÜâ 0vǘøB*UK6~dä)pˆÐÌg也M`äRcžÊ똬áVÉÝAa«bØZX:!âÖpy¸Ñ C€Í 9<ž›ëÀ‘É>Í1£õ*«ýwQö/›æ,žt²ð2Âs³{àåUt²ü—ñ¦ ðâY¸y2HNºã¬êg§›–€xv~²ùPe…óp2£â0«WÑïÉ»„•9Y‘ëáHÎF4{¢aÜ~ý†¡ãÉ^ŽQj˜XLí T'Á„F†ñè Q$i¸—àD^¢šô¢Á¡ßAp5Õ#AKaŸŒ‘etJdK)2© æÃ[#»‡›šö– PØȉ ٚо…R§1]Å!)p0ê0‚%hDXV{]‡Ú»¬±,ƒâ€œ%°rtÒu* ‚a86ƒŠZ Ô´’6ˆùp:ÁÈö %Cô 5û£Ç0˜!Ø‚Â7FÁLR\]÷`ÖºG?¿Þi¿Üzõæ»­í£7;íý×;[G@Åw><Úy‰g A×võ|YK´Wä›4MÛt¼Î.ö¯;¯vöÊJg¼ô«T¬’>ÑêÆy_ú=qFÆlÅÕf­ÎÒr«…¶]SÜã›õãÚ|Øã{\±í—ßao¡ª?tlíínÖjÛ³+±çÞ÷eJ­èƒÀœbFßâ(ÏjH?ÁôV™fÒ³$æ”#³²þ¹'dœ—?gˆoòë«Ñí£ÝLµÚ?¨„ç:ÏI_¯ÕŒñ¸†;Ö1ÁBÃД‹0rŸ@“*œKŽèÌ„ÀØ. î!QÚ¡z¾3ÞÔ)í¤Wû5%¬žÑÆ'º ó} …&È¢z í×ß70¦À vÌ—h˜f~@áG47¾7g“`%$¨œ®·>ÈOŒÓÒžj¢ F_fÐëÁ3¾ÃĘÁ.ÈwYÈ'‹¹hÙb¥çTãy!'m¬z>[°(À˜‡‹ƒ‰ f0‚ºí¨ãÌ3ŽÉg2‹÷È5¯O8jRm<(o.õR¡E(è´@OTscµ©›”äQ(Äá’o‡‡ð™qŠXG*jrž¢/s ¤’×ÖW{cÕ«ÂT`é´žì ‹§ü>MùÊ¢Û5“P²†;Bv ¶'XÜ*AÃÎfð„á¡Ù³ªüêpÁŽÍ•bÕÓÕx†Ý'xZnï¿|L ®æýCÜ8z¤ @€C‹xmÿ U„ÝU$xŽlVØ ÀöòýÖ©M}u“LÎvØbÚ›-ÿÃVµÞþ½ýn©MÿR«µe8íy45?ï#hzû£k\Å°ÿ¦×m8ÇìèHšÄ}û¢G 6n^À ¿1š˜ð;èÖÀf™ö0þƧò7Réj'YI_`™£hâ¾Ëý¤$J!K@dÞ‡l‚0½ó0ÉðU’­µ£!u6 /Ú£ä2”å ãÙ6CÃv“a÷º²¨ï4Ø«8ØÆ\GÆ°M=µ•yü*l‹s‘­Xzv[±\NcY ëômÐðr!$!dyÇôx=–.¿ÎR{¹­Å 3&{¦{v3Ý¿ìE“fæ,ý{sK}žnx'±?žhY“WbKe •¢2Fgù¹7m?êe¬‚i¯¯®¬çÜ?FdºEÙmõb¨;šb, dÓÛZ øeT ò,!Åà™›LˆvêyÄ»ï^;›Ž–`ir¾×)ÅÓƒûrIéæ$ÍŽ-œeÜô à8pmè3]GÃxLë½Íæ…zŽF=¸„éqÜ{¸¾Æ Îbþ› {›æ^;œp†Çë++ô°®ýh0 ¹†vl8Î<½][ðN ˜"ÔÆ>Å'üw]O袤[3θÖpŒ]¥§Á„·(æ'÷ÒôL>ê¥RÆUFÍ᦯?Òæ­ÊÃy<ÁõÏTÊÛÕµujx­m¥7iŸÊJ†@SsßÎð_˜»4$bksÎLŠ)u?Œw†ê:;Dß?Έ?ÂbO†ÔRJ=„k=huXX‡úzÍ¥]Œ¦ÀØQcž¶^šœ ÂF´" YwÏß¾p‘Ê\Ÿ ¦J^4i»7ºÐoYLÍèÅP?õò"Æ?WQþÄ£ o¯rO'‹úë*Í´ªËkò£›‘Ž†tšÉÒ¦ÖÉ‹[ó¤ý?¼˜‘é<ž^›JðÇU´æ´ÿ‘~‚燗 å1ùäQ$øwÜÃÓÌ–öÐ)m½³vùð3Ë{+ïÁg–etÞ>h?}§#"Ù“ÌË/)åï%—ñ™õ^Úz5¬ùá9žÎ*t¢ž"qDÜqçsçäòÑÿ@­K¹™[ûœò¦ý *ï“ €}®íǵÎgµH²ë’æôe*JÛ@ìÂÙœ†ãs§öÏkþàÐÕÇO´ø;Éà…—à¡ÿù¡÷Ñÿ¦ŸÆ“ë;·L®L§yp^ö“« n£™»Ê$Ã'¯€±{Ž3Û¾!ŠèàMÞ®èþñ[;|ôä®d m¥LÌ(oò""a¬H™÷R”Ú{\‰ÏF¨Gæ!M‚!”,¢¨˜ÂJ/š†°!€ƒbd;D eÉ1oúèÒŪ½aý‰j/Dh(£{«®àÝûðÉ ^˜‚píé…<¡eý£yêžDòndÌD#<…ž¼³?>²ÏÞ>¶ŸÆ½ðáÛGß9…pñü”+_Ø¢ð—WØ£¹â†ëëݵŽö"Å[þNôÅ^ ßž ÞEü½œ¼ãÇË·kR5>¯Ã³óíñ[øW«¹Lúw}_œDð„ +üâ–=õ\×ޓ•‡¸ìe/ó§þêÊ%¼ë¯óŸ&ìgãÕG×ל ÇÐI˜júu÷‘¦8M×WèÏ%¿>Db€òßñ8”?«·+«ïä‹yz;ºÒ÷Úäóè:¦Þç´$Á#/Á£\3 ô\øè¿Š y ŠÅg'«ÿ³˜$}¼zä_¸ÉÜq* Òäzýi`ͧÑêÊ炧uÝJÃä:Ö9‘¿Ù¦ŸGýŒFœþÒþ¡'=—G1]øgMÿÒŠç'©zë;4‚œ²×P”óe5)uÿŒúô Ûwܯbkñ/ÙøúGŠ'@ÞqËMœy¦–Ê/Ýoã›43M?€Õë]RÏèIOtð[•Ê™˜ÑNçGäá²sä6¼ãǵïBûDÝÆçu:íá ÊKùs‘S”üX¦"ê þ1¯Æ|»Ð_þÊO'öñRŸ<ºÖÇA41ñÄ-ìò‰~¸|jŸNìã¥&žòÃ$Ê'ÀAÿÿáé»bš¬¶ßÉ ·mø{ÞÓ§Õ5óÆ(O>È'¿‚L¤«ß{M ŒÊ!QßKÊ&&Rê{au‘„¥ÍÌè/n/}©Óˆá¹ ÇÂÚ"‘ýWIÚêRV=˜PXiDIF§XâItsìUÔƒ`ܶx‰7Ü“GÝG(’ÕÌS<'©ûÁ>‡ÿ^}Èa|õiy<µªYj/µ‰M"&lwTfepü¾±zÜÜ0)øíU~Ü$Ù®‘ÿö { ËdH-žÁy8¡<¼K{Ér/晹–ö’ÇÁ˜¯ÈDð7‡‹q_<|äþ"æÃˬE{Ü‹ÿÊ-Âp0^!Êĸéüwp¤,)/c²ÂÆY ˜=¡.ÑÓÀ#Ûd~Û±ÖIâ~¤TÈ>ñÃS}pr!Å/ÿáŽ02Rú<Й83ƒì”>#CE —2³À™³âxô¯ÈÙ¯oÖÙÇ¿¬é£Ù=|oðë'O¸µÈ’ñRbü„ü–Éc83þæ0j6É8“È–™GY±Ìš™G§7Äž¹¿dû)‹æb®ÌI lZ.²fn*fÕüDDÒ;‰„Ä÷Éæ²,[þ3ri^fÛ ÉÖóÉÖË’=\É%cö­ìi>Y¡éÄx™4ÂƤ¹$ii¢G¹D ‰œI–®À¯ŠÙºb¢G¹DeU7ç§"ö®˜ ù¹\BfñܤþX– $rwæ;³zæó06'PLK.c§¿ˆ‘£üÂÜÙg{i!Çï‘¡³O²{„Í3©a-óû1q~ò´¾f¶:qæð~KöGlÏ6b)71üô‹üá=;æÍD¬žÉÆ|Ÿý€¡ÿK:k8D“•yDý‰ì %Láþç‡ì‘n„ÔŒpvN/”¥ÓȺÏ2fÂ#ê3q‰òÃ<Ø @vÑ+ÝüD–Q¥{Ì3šœc½É…EtŸOÜ—öpöð^aÈDz/.ŸØÄ—OÝç÷‡”É3˜]ÿE !®Òüˆõ–'&SŸ:Íã#ód¯ÜI<ˆÌBB¦@Ÿ•ÕßÈXRvâ0íÓª}Ììãšóx¹nÊÍô3gª¿ˆ7Õ×r93¹ÌȪò\0ö*6¬+#æÕô憖Ÿ²²”âŸØñÅ;±yq¾ÄQ:$'c›ÂÕÞ‘KÎ×®öºJ˜sLoÇZ씳‰°# £Í唦­d@žÀµÖ}l¿ŒÃþ!4wýÉ£“¬_lm r<¤“Ö®“î1Ë+ñšB ™:™´åí¸'Yx }A¦Q|=î•êmV¸SzÉèñš°‰i8OK¸@ä&Âa_=íÇšã$ìM³’ ô>7a?êšébsáH¥Vµ95íÀü² IÙbv"p%‘É2! ý]_yô¤J·…ß5ϺYÑyá­ý)ƒ!f3—Avò˜6Y{©2¡hô|m˜5¼b{«e«ÒƒòÂó^Ù?þ¦cx“]š<ñiªðo»JÓ—›/LË£ˆOý$»5Ö*ÙÜBp™r1×s  ™NõÒç’K¶ÒXÌéLjZÖOÚº4£ÔÅÔöoz]Yþx kRIú“pŽz%¢¦DD,Ùú70pšqö.€!-æ$6Õ@²ïËe,›uÊz—õW,Ü1òËVz'>Œ„øú¬aÞuGð\)æ¼sqªJ{ô …=-9±à%^éŠ6kº¢zÑY¯w›Œ†j&22k÷JD“½U1A+,uÍ´V’ií¶Lëe¹ÖoÏö ,Ûƒ[³=)Ëö¤2µýR6ö¿Ì{’Í”TÅ2›B¶áØd$á>þ)[:ôÞŸ½hpjò’9àtTyÀb “8ÎXC$ODuE“4¼>ÍJkæTh÷ç!ùm抬~¾ë²Dו뇤¦Ç?•W~ÔäÆh3å,hú†×ò‡¹¤a, %d)9!IØŸŠÈ0v•L7á'<”`Äçq6ìØ$AÊ8_Æš–±6ok¶ŒÁ/åuQR‹Yk;ÿ›Ók$vÎ`¬`©vH`^TŒ´~v+Rv­>ñëź®qá—Üܲïlªþ/gãÅMüÐÍ0Ì€¾ ”šk|½F³ŠË–ð¼'ÓÒ;'Ivíä^’ÜK”¦bTœìn'£“a2ª&--L 5 i‹9XvKÿ*¶‹ÆÝÏ«{ªhN«³Õ'´JöwØb$É"óÀï+ºŒQÝ1¨4’K™§×kPfÉL¡ ק¯áÎ+:Ò™?#ÉgÉMŠ\0,RngIÙÕâ`˜F’Ÿ¯¯<\!mcëçd‘öªh—Zë’Xü|X²¬Y`žË;ÌÜ|×p+Ì—ñšïÎù°²Æ‡³j${ðŠ]ËK–óù˜Ä© â|ì&«¦˜)¿~)Çù¸’6Y0Ísñ”,éR%8¿«fpÅmçÓ‹µ| ë«ù…ö²¯¿]«®0?*O/åj{tçö>†ÄÝ"Ü3V­WÆ'û“ó~ðÝîO/w6Œá7¸1ZÊ;G±OPɶJ¥:ð~„üÞ>búÇOÞ=•ôæÞ?]ç—O׿L³hŒW×=–>{oïTŠ·'wœ¹qHþ#jA‹Ïpí×IvzKcøœ=µyÊNÅBHe‰)4GTüSvDr Í°ôäÑeÙQZa‚ìÛF›dÍ-îÁÒg÷À-í3ËrŠÊ’Águ”½÷LWá®Á2*n!ü¡T ?j¦öeFþ™Kü‡ 5?SåøçA¿‚„ÍÎðB𼸈&lC.¾ú¨¨{‚”~O¬òáãóì¶¥Ê ˆ6¬³Œj¡306$‹3àÒ(Z ²{…¥ü³ye´y·|2Ö7J†Ãé\"WarV^pŸ#á ‹•=µ*n]ú¨©Ã3 æN:èõ•ŠiÄŠÃ:ŒÒA™x‡iªé$º(Éã;måë2ZèëŠ6=ŠGgW· .ÅغÙJI3ò—d~¦^4@Ã$¶™ãÓ4F•WºuÖ“,KE¯øµô2~u¤?Á×áÎØúR»úô+[Z|ÞPÖeÖ;;« üüâr"[àEb`Ü*:—&øG¥GÉé©É•ŽÏËx:á妉“›Ì×qt’”€ø¥—S[ºþíÒVJdï>m ßòpÒvf¶Ñ­kÒhòËlæKÉ/5õ(ì•0œdÊ’³Ùƒ„š§—-]Æ~=€6Á×’k”ÝÑa´æºm8µÍŠNCQZº3/ Úit JNDq…Å?‰ŧ'æéiYhý¡Ÿ¯iÊ•uE«+ÙVÖWff$W\1˜¦¯Uwge½ËÇ%UÃKHØ+ž¹âM<\b¿âŠ¾â·ò»Z)È¥À¿°m^£¥ÍR—Ø\+ÞìÅDëeWüè|}¥r>M„+gɨBþå.DËÊ‘oè•×7ƒdålUSùYôêø¤_EŽO&±ItR1¶NÄi «ƒ‡¨e¨"Lé³ÉòôɬÛ\Ó´—*RÝU¹6Æ@àDoÑJÿ‚þyDÑ5P…ÈŠÅao}–ðÙ)6 –„ù±G89:‚ºK³(§¤3äyÍ>Æîûõ9Ë*!ÔãÇ%éX)òþ\ȶÚáÁ`{!ŽÒáøéÃãÆ•suÔ¼ˆ­]5hŸX[se2ºîØÿ¶þ¥«.µâ É¸s%ÇÌxä]?tÈ.–¼ŽgÌÎfãÞI´x+ñ.xˆ0K{†ÚþÎ="—6k¼O&üÊr?´ùKeѨØâœ]$0£íðñZqyqÀZD=AUòOªÝ$ø匔è¼m ÉÞ²¤Íþ8j%3F’²Ü¹7Y•þÆY·å’„‡žele iŸŒ‘ðÏ<Ò‹Ôrøx»RÉÍ@œòÙètøý ª¤>YŒ9L Ú¹ø§T¹‰–½v¸²õ§d÷·þ´T‹CïýÔ×’üº*ýµ›!\{ºVÖðJÿìdµ¼›ÆàÜ_~dq>;GÞÏì^Ö*sEŸ YW~d$™Qlˆ%1·ªXÖ‹Ò–ȃ³óJE]vþ°¬Çðº°7Ñ@º,eáà±æÎW)áÄÃ,Ql¤ŠO““¸°ìñ|Jñ5“cš–Õ4Mó휬Uss“MRŒäXAsË×Á‡ñ®d{kô¯,[è˜à®ÇW6­Uò+ðÑI§Ê-)©ÝhÙ³îe{0o¶6ÛzUm3êZ¯ªëbFMJkb¢ºª¥U•ærë*WݲùìÎ!ü©ú{SuKË´L"úù!&ÿŠ°ŸNG£2!Ÿ6÷eɈ¾U¦fÙÍpMÒ›[Ïž¼!èd½L˜.®š•ÕMÊLá&3LáÈmáŽÈOS˸^Z~““h°«PuòÂý0ÙY­2¹º¾”™\M®Áƒèèõµ* I[)ÃøtöýIUŒõ‚r«!{‘æßz•ÕùÍÔœ}Cõ ¾|²Ê¢Ö>•.á­#¹t¼Â/Ãë+ºŒôË—eÖ)~êKsÝ]ŽÇK.¯áÿË6äéúÊjûtúK<ÉtmÈeT-ù«º·äW¥Eø-ùª§§*ãÕ£‡eζ¯ú%£|õ]¯«EP‚€X&¨».Õ£ÌÒ¯]´»ì”ÄìÊs»¹Š€zØóÁ î¨WÁ»“s/Ã-k¯Ï›a‰­: U4ä9Dtt1ß?‹®ñÐä[™‘o¥2NU‰0 }Á¢P2™`PÙ™H±V]ÜVÄw°Ï‹:ýcXŒ~*…âÓ»EPTuÖÏZ‚HAåD¾NÆS¸;¼ÄæY`F||›È˜>ZéÍ“y“[9–a¹¯:€ô¨–EFœ•Æ¶¼Ë2»H{O‰?MþBY ¯Vo³É°¹/v¶qP!D?*“˜TÜ!9=˯›U§äTu»¯Õ<˜=©Çå!?Í2~!˜\çv‰ JŒÀ Çÿ…å­Ë ]fË” hÒmlÝÄ«+«‘ó9à;*áÆWäŽßkÃÓ-~84‡œm\™C…Tn¦%U^[ôhD8BŠáfFaÿ¦íÏé{®† ”ü›à‡(:£ž\^L=£\ÌFº q©ÝÏ€ãÜù²|¥eØ+öºÀ|8Lúˆ}×"MN(´wâÜAꀚètûØÖx%¥È•íN­FÐä×õF’Õ’üº^ÞÕ܇ÕÖ8¼2è¼wBî˜h;÷@|H84VÀmúìÿÊ+à ÖC8—Ê-Q´)q¨uRµœ8_bc¢tuzš&©8¬±Wÿ6в\ö*crósg&îèMöùºN-Y,gàÚÙeúÀâØ:œ=×VÄÿÚY›^i `0–‰Õ˜Ý6“ìƒáKlûtšÂã\r dâë* :,=\2X%¢XHá`¥ˆqz/ß;¯^»¯‚­`©å¹˜/2¯ÐÉ%½™<ðÒx"µQH¼Vžbdèðh†8Æ%`äïÞ¹±ÃHÒYë/)ĸ<’Í ëUÒ^ržqÊ{ £¶gš6cl÷P~÷F hNƒÎxa-¹¢Ñ7W;b€uÔœÒßÁt ò¹$ÑŸä¬>¿yÀÑG/à!ÊÂÑS?­8¡.™ç¾ü c"ƒè.Lrâä4W’~H“\{Ȇ¾]^y)OÄ9ðè¡kcÃ˸/sEÜ1> :Ø6f<˜f:GüNx’¯y&½AŽeÐØ휇HâTð2HõQߺÙObXg<90®šÆ7îG‰©Cãeà÷û"ÝbDä\…Ivm`ùÙGâZ×A2•^*Ixû% ²2#ëŸr’È<ú1/¬d'9OJ†Ü€ÿæŒT664žD2äQÄq ÐÇDVfnÄ ¾¼ý‘öOøúdæRßœ]ICОŒW¬„BÐB€¾—ÄÊ”GÃÜÐ ï·dž=Ö;qLÚ¹è)nù°)m?fJÛ‘âØõø’™HÛ<ŽôPé_H/ظÏÏI˜ÝšÒŒ„ì‘ô<„AmÔSýŽK1Ê5ž¶½®—$»ˆ'_AJëØsŸÜâd‡>~„ê®ÍKöékÇ“Üø'—)ŒÃÁPw-“áêáG4ÍÏ[Mʱ ô…$ÆX0æƒÂÈBîÇY® ¢N‡!gìk·G×øÏcŽºÁ+ºOÆ,§ƒ›Ü\ÜH#ÎÃø‚LÚ· Ë$"qúí|v?Òx]˜÷Ö”—ÕeÂ^lÁÿ-(G!;°üÓŒØÍ`€Ä®C€ó M`ñmrÕõ&zÎO2|7›Žc^‰¾]<ó5[ ò~Vkö£í:<2þueQz)?ÞCa)‘~Ø¡KO·¬Lô›ìíywx=fe2¶eµm ©&â0’wÅlãU_ú úÒJàÃzyŽ›ª<D–b¼õ(6q mË6ñhå®E3ÓrÌ•|¹V`òk¬zª]î‚ÑVŒ¶ïƒ‘s´`2{±ˆ³Òþçå0‰ôý0«Ÿˆ÷ÅÏs2¯wŽ|‘üãž)Æ$ähÌïÛÍ@"ìYŒYøˤS¾lšÙ²§AžC°#&üL²ù…9ÒìYt1î—ÑF[*xXcœØ[hí4r"íš0ƒ—\SiЛ¦i4š n08ä8 ³‹*N࣢8ubÞÂû1EYæ ±WáM« È’LC—õM)ZEâ}•L4œ;o¦™7æ8´“ôÆRu/˜m9è… ª…bêx Ô%¸*†÷¦X XF$Q‰ø@ô´Ñ™Ó1jCæÀ¯@ixd·`×1èOX”u705H9I.1;E¥Ïâ3 nâ]CC9ºÚí5 ê ÔdX M(o]bÅ'C3Jæò[b喹؄ü6_¯"C({Šß¥\\¼ü×ä"®ør>^,",,¹Žêè ‹D™—`p ­ø·€æ-¹Ø2KŽ“e I·„aK¡ß`MŸ™uzæ4N"–‘4 wÔc;3&§åŽ¸tÆLG¡)Õxc¹ä£ùêXúÑ(Nls]Él¹‘Óü‘y}æ8äôgi—ËÌkANÀÛv—Ž ÑmIê%A})û’™ùEY®}φ¦edá’‰ Y_E3 Å—Ÿf€®Ç¶áÖL¶°—€›-ý@šµEë?ïŒ79ß–Q…%'&ÑD§qED·ÞÕ¹|@å«Û3¾4ñYô­à$Âà-Q0VIÄ![Çq ’³˜cM;IjL#mªæµZsæh}·À{*2%AÆ=)î[zA ádý4¬™5)P,ÿ„ô^*Ö¢›T'Q¾BÝ4ßIjï}'D ó3 ûÝÉšDÅÎÊ™IAª/EÿÌýN:ï»zâ›$¬øðÒŒ¼:H"o峆Í2úU)4âŸcÄgÒ(ÃXUF¹*A¥^N¶W29Ãüh©ÛÎË0»uZ¬ ©—ŸŸBywãôl9âcoû\XÖÆî×—äÍ­®g˲ۖ\ærý½«.ÉŠ’CäºðHÙ£˜òÈ.¡Ü#Û€W0IÁBØï·Ï“ä"h^¥h]}"z‘M„n§+° æþ›N6‚:aã›ÍfÝOqŠáP0É7nÚ\Yâ?ý\"褠¬;ðXûÃïÿývÿ â“p’ a½Eß~ÜyÐy°ö¸P:Ã_¦ ÎW=z€W?\wÿÂÓÚ㵇kÀ?««ëk+«+XY]_}°ú‡àßj Wø?ó÷ßä¿ûâܹÇK8…•Üxp­NnY°ál[¥?ø”íd|“’©ÇÂöb°úôé£6Ìàƒà»4Š‚Ãä”DþÁwÉtÔ'aQ+ØõHB|'ž2h€jÖ “äψ(©*²žÅ—QLGƒxc³ÇQ:„[eQLiL(æËÀOÁå¬&BhnÐ")Åä<áJ{†Ie8~k ãÓí 3–6ù÷¨…cÇömãc9KÃ!~µõ`ôxjÿ9\½"ã™°pä„‚KNØ$Î~Ü=úaÿÍQ€qdÜ:8Øzuôs‹%há2A‰ õ"¿Ât «gÚt:º#®+Ž1 ›Â4 G“í½Ü9ØþJÜúvwo÷ègìôw»G¯vƒïö‚-ÈÿzëàhwûÍÞÖAðúÍÁëýÃèÜðA7>õ£Ó…·[ÛÝíýWßí~ß}¹µ}°ß}±{pø®¼…$ð}:ZxÛÝzYžäÝ¢MTULiæ…ÆóÅwð¹vl½9ÚÇ´Ý¿íîî¿zתÔœí|x½µý×­ïwl‚ 4Ý ¸ôn㨼†E(a­óèé»V«†Àà¢ØtáíĬÜ+X'v÷¬¾îÌÙ©ý¬29ª &H“²!í0¼Á`\L¶‹½ÌÙ4ÄùŒ ðIÒ©ížZ!ß!¢!¬Y|…¹Gœ,H#mË{§ñÀ\¡»o n:µ£$è'°åZÆ{QíÿúIoŠâB^tô-ì]„gÀSg!§CÛòÝÑi³C3V8ÖVVÖæ:îÿ»Ÿ°’qý¼Üú«Y€ òI¦öŒÿ07»QðSççHÄ^$Õ—&Ø`{qbì½ ‹cK8D#vÖ6 lß \U=RgÁ3LÿÁÎÿy³{°C'`~¾;þâŸÕÜe‡¯9{ýË.ºÒe8ûÞ“³ü;ÔðE¤;G9Ü,S&7Â,‹†pû ©ì¿Û E¸Vÿcn†×ûßw·½Eí¯ I‹å~ðíQ|^Eºãô’Þ¦8=0)v€ïv™ŽÒÇÑÚ”ÅKóKeooÃœN€Gê_···ÿœE“õ`3È0hñ‡ßm6¶·½Dßím}_š’>@rú‹n|ßýÛÖÁÂ[ü +’OQ³Nl£Ñ´÷ç‚t‘Ÿnoã’ËC…ãê.)ætže¹B(=„K~÷»îþë#Úi£¤ÝÆì°QN9 ç˜ô|±ózçÕ‹WÛ»;‡Òpï§ó¥ÝŸ^o½zÌûßïëß®ÿïPcž&ŠBwåd|Þž& ÒÛfÐ`­áuÔ{ÝpzÝíÇ´Ü›,íÁó2$o"Ù,.e¦u-ËHa hŽfËfîtà´Êyïx¬÷OaT¦)j· µD*»ó®<ÏPÏ ê˜ ¸rñM’¥Ä ùñ SØÔ@­ô€d¾– ž]á€M”æ ¥K\½HGèŽ 7:<.ê%Å4áI– pî @ß“Å"N"/|2öÑ)®–4SpžS[˜\€y›Lp=Œ¤[hbÔCÍAŒTÓ¬#·!@|AuÓÑ4£¡r!›žha›m(Ì6 *,3¨¯¸A¢nȼ1²>HÕˆÚ¢P¬ö ØX›Èïзaû¿À$!Ìž ÷ýųL‹žl à¿Ó0d4yJßÒl…n•7h™áö‡KªÇ²¡W]Y>·ÔS,G'«u§æ=üíõÖÑrêã¾äø¿ÐSŸ b•gÌwNÐl «–µÀKÐv‹¨(¯ r;< ‡+å4¾fîPV-ïFX“ñ¨-sÍÍœÈêšfSd¡˜sŠdœeÆD>¤jâÞº§pÛ2êÁü–†-//t–ŽëïqN˜a›¸!ë/ww_}'U(?7ëÇ_ØÙÛûæ{X×ëÆnJç ×"E:á®Vs®´tZ¡¤é6ød:¨¯—Ä¿Ž’`…d‹ËÛ$ùɬÖáUä'ªºhƒVÅö¶²'”ætCAÎfä•ì´ Šgß¬Ø &¬ GuZÒuoêhål‰è†VÝÌT–Ò¢“áÓ,€yËíúˆ-1‹—¬\ý4¼: {fûñõh’â)GÇò% C·?Ð ¼ôùð&—bh†÷4‹dŒu\Â9NÝ%iˆ=ñéEÿjÆœ[oöŽ˜0ºìTtÑou§æ¬ï÷½~n1ÿéOÁøªÿÞÒYPç‹]¤Ö¶ö‚;ü7—@úñ ŸáŒâ«­—;­€6zÛ¼_¼¯6Üõ >F0.èˆ ÃÃAŽïuê“uôú`–ÒÂÛµÎÃ5^1'h9:x³ƒÜ#_i¬ ¥`ÌJ¹ª*FHöï¶öw„ß#;5’¾ùöð›Ð¥ú‹¯¹\Ã.Ó‡î«ý#•í8ùÊ¿;äD 8FÀÒì½Ùér20H¬ÑºA/¥ŽM~¤â6›÷›lk?ã+'ډػ½ÿò%léCœ……Ú[¨€x¹ö?‘“>ÒæóßSYë¦-PâËÃï»;û@™¿uæ2¬ÖIèÍd/wÖß¾ÜEHGz¦&¯iBé æ .ò¾»¢7wp œÆådؾOÿ¶/ÓhrÑ…Áit…”2ãçp= ¡4`Lx™À:ŽEÓr÷MHƒIQU4¢ÛèFÝPéRGÂÒ´˜šJ…t±bå–ò"it”!ñ,Á·dŒŒäþä”0]gÈ‚Às#;";v6@‘|Ob>#ÄKÿGÔÙ Aµ½Ë¥)¬²qÂ, 3NÄÚ¹œÀ‘‰¼xYÄ»µ8ŒÛÛ‹Ï,µÉÊ­ §=4}7,'Ž/Ü[#éÊ9Ký•€z ¸ÑZ‘lQeܸ‘£CžæyWÛv÷Ê7®@ΰp’)c~÷óþ›£×oŽl!?›c´49Épw_mï½y±Sš ‚ƒvkû¯üÕ×3lo“hì- Q¯·YoÀ‚aV@W[wÇ˦UCH¶Ÿ~¢KÓdƒõ4G6\yøW³ÑŠ,fkžõzëüÓ,+€ªöŠÀÊïP¬z¯ñ¸ æhü÷ÛÿåeƒßeÙJêõÿ3àÍUVï"ÑÇÛ[Û?ìtáÛ]xëìólr3ˆÈQ†Ê)V‚Z®Þ%Üí]WÆh+AKL\•Þm¼õ’—É›ç:>E"yˆÅ`f{Óî&9”Jh[õY©…y3>’]ß F "çh Ì&}8•ëR.@6/›LÓ‘ú· %~8½ö|û϶˨ŸDLšStÌ袸¨_=4ÍŠ•{†V53z-^}»\†Ë \V(¾L¦¤B£•È÷ˆQúÈ*ÄÑ“|ӶƯ@„îütÔN>šDÃx4Í(i½ÐÉ?xØ#Å,ô(“E³ŽØŠ…Љ‘‘ØK†­D°iæãQ•ìöZ°'Þ tR£º[nIz9÷F ^|;Ú–l‘/;qA“ð¬„O>Ά È&ë†.Ö6gm©MKs00¥Ðšg[Ó>o{à³àöÑÏ­¦"Ô”iÌÕv݈FH Øëð¦‹&2Hªa®o¢Lî¹{¹N‘”êÞ ì¹ yCw—ÓßavÙCú‹hAü£Ü¨7Ë]çÍ‹™&ÄÎRôPh÷x"Òb#i®‚„{sf¦òCîò&š°à=‹tºy\ ÈÓdzv®ÄP£ö 'rõGá…Ù>¨é‹!R"yfsñpöœAÖ•\¹Šóë8¿ZFÑb@㫯ÈÛCæO:³iVù±r)|Aú¨'ÔѦî›òãe³™;§‚Ép\úé¾™Ì 6[F ˜¬†×¹ÜynK‚o óåòh $ÝÚ7&I”¦À&iª3à8òGz¾ÁßnAZ‘ýÑ'd7#w‡Œ_QvÐFFîcÐÎßãó¾É%&‘ž‡1Äc—?\0xàãaDN@A29£Ú˜“Ð$β)'“½²Ýd0 Ó‹,X Óq:|Û?’«þ"ì Ö‘òMú8ì,aN!ʲð,2EÑ.ÈPçj#ˆdÃ@ÒÆâV~Án¸Öð@b™Pûåëuïqg…n”ÇUÚðƒ¶á4Ül˜Œ&ÝæÍR+ÚÅ ®—̸-pQ5Ÿ¡~;2eVsѾs¼ ÇžáQ ç ´gl¼-zÒY™]3ä†Sßë¦ße{¾.Ј6smlÞÿðÁ-p¯8?ù¢¿UtÑÏQ˜SåVG “©ä §?Dè0ëÚ©bº¥ö¹y+(˜M¿Œ6æÅÎë—û/vDìÄÛ^ÙÄñgß:(œ…¥dÌeØ׈šDz=åE¹þÝîÞÎ!³KÇÍ¥E*‚ÖÝ5\n¢:“è$ï~ôUÈ÷ì<>ˆì 8ÿÀq‘}ÙËï˜ïṕ¿Ð-!Œ?õ›¹¬Sñ¯7†§u/NøFg©AH^\ü6KÎ#²lR=Ô¥ªÑ«u*RÅ«u+Ÿ Ó@UÑ kƒ2èkîNßÐ÷ц¡¯³øЄõLj›I”Ø´wN‚¼¡hXÂM‹—!.ÄS(ä&™¦êÔϹ5B ;^@ß²F&P°Ò±¦08‰Ï`É¢10¹aDâpàX—¡¥¢‡$âØ’Išîvwßóv<[5×?Õú/¾Íå·öã¾7¶8ȶñh&÷Õ~vÒî«w‹e9Þ²¯àỹ-¤sG{ÊóKõD´—dÃÛHà³1и­ú1ëÂ8 $D{­ópe±euÇ'hŒRdo|tpçjÄÄø8«â OÈ1ºN‰‰]¦´lÓÃŽâóMMÀdOg"ôÕîƒìB(-µ=3ŠH8ÌàŽž°ë=©±¤`/4LE!‰9Ž~h¤DŸH«Ì$W#/¹†ê1f}]0œH˜3™®…²§XD¯h;“&c3æÜxîNî€õ:^0h$ÞÚ¸æMë¯Â;Ÿ¢ph€"%(Ç%—Í}§ì /ʸiÄFW´Æd9êRâ…·‡âÞnµÿï»?“sk£Ôäp¦ûy1ƒì¨ÝW‡G[{{ÆÅ@è«¡ŽLâ¥AWDý==:Fio`tÛ»õç¡#†®Sû2vDE²a3óÌ·Dל SååÑ ,"¥ÞÞíÔÙÝÅP8Š­šníÍw‹²#JΞ¨¶ÀN’¼("æH<Ý8Ä™ã]ã˜ü±¦ŽWü½ƒhÊÓÌá‡|ƒù¼§cIñÏHY§u×ÚjêâëDL,ÑoÀ-1$Ñ ³N€ÀúõnÎÐÕ¦æYnÿü=:u´S… I G›(ásúóìôʵÙ4Ù¯P¸h˜;›ÉGÓ`;_&Üÿ|Q`Q‘h¨ÈÁ—éÐþx“•Ê4ÎÎ1ˆáU‹ ön›1Ù6ñJ~‘Û­Àyó°€þ¼u_ìn}ÿjÿÖA‚®IÑ$Ê[o’óÈä*iËÉ·~ÛB‰ÞΘK\“Å%âªÖÅ· çnŽUgË™M~ «…¯ z‰`?üÂL6'Ò^EÎàè1O;ÉŽ’‹@ßÿ„MÉâSŸPh ä7°ÉÅ»ÅÒN[1 À“‹ xn)`Åi8ÁQÒ&Yvñ¤6* ‚3 ØHff`ÓiÎÑñHÍYcÚ,6¿©5”bÐ$¶d5õÐ}óêÿ¼Ù?Úyá5¤ÞuüõJDsÒ3ÜÉeù†Õòƒòÿ­êÁ”$m½Ïôú™gön%wèNárØ‚±ÿ™-›K/T¹à…p°õR¾¿ìŠŸ'½ÇD{ûÛèâ¼G‘6+pŸ¬~ËedÊ)WfU:¾s9vçUü°³õbç@3ŸÃY¥ei±ŠÝWßí‚TNE¥á˜{9vEuš£ƒÝ×Õ÷¬0èê?‰¦¶p¦¡º~"?©¼T>‰p""kI^J¥wkfyµó´s^h$‹\R`(V3Þ!úå`Ég)²-äNƒÇ_ŸO&ãåe2l윦$=[F M`h–Ï'ÃÁ²ý2°Qkí•ÇËÃìŒð;øù›Ï*dõbw&ÙâvÇ´3 2Lx“׬1dxuaHÌ:ñ3pK¢­æ„PP”›Å'"v>Úz ´Ú`-²‰(Ô¡ :ÑÑ!Ñ‹,„:äË!S¶~üëŒYÅ“æJ‚¬ LÍ0ЋöýØõ ¡bû„_ãñ/±Þ–ä‡×Åœø’òqü¨üçËÇïZïV€¡}÷ÿ¶û.ŒïvöwrÖPŠ¢" %°ÈÜiëJ™¼ª2­7ge³ÈB¹ª]ðqfÃ$sUË0{e±··]qªG_gµÎd¯hP]ò| œ5~òý¶FÎE-dVù'¿©v÷Á9x³·shI #u!4Þý¢ãÔ²óÓÎÎOGÄ j%ÌXDïþÖt]S‘pfÞ—¯¡îICfNp¨*r •aL20™Îl¨ºK29?s¦ƒ:”Ù©³Så¿‹ÄQ–82äDVÒ¶<(3|Ñï"õC)yƒßÕí0#èþáîO¼%˜‘Ó)BÀzŒ¸7UªÔÑêç´.¦5°b9éþ_Ÿ©m0òÆŠÎr2 Ò" ³l:dÓ)ŒNS£Å!æ½s€ùÃÄ€zœ¥ö‚|±6!ê]¸ž…HHjÍqFz" 3fTA],<¡ÇýºbP¬\ñŽz½Aõ6 N¦g÷WWž¬=!+é Ʊ©ݺ—1ÞE'T´.4‹º£Â&b÷Q§`_1³BÍtشв„faìÿDÑ ÃÅ®“,;|&ÿäZI(}œNtH j#ÊÏÎ;È.Ò "{O©>¥§jDFÓ(lð=Á7Z ¾þº ûµYÛOÆÙW56Mý¦Âš¢dT'Y\u²ú#ýŒú°{8B5ô?©ƒ±¬k1ª-»+àp´O›je§²ÐÑÄ-BµI¦75y<‰€=Ž±y@:SX&èœ4ÒDxRDrÛH¦d¨~5ZKh_ƒox{†Hµ CÁ# DÖÖFÖE“åË8ºêŒÏljû›¬}S«½f)Ec‚dm]OÏ…v’“‰¤±üˆ•WªC&…X-9å4 ¼!m(¬=±dh Ñô™>äŠOf›zTáÚ@ß0X)h¢ GK¤{ݬtµÒïÔj0ߎ õÛÛ;¯€òýnç`wÿ {ðRY2¯ßD™ë ÅJ¥m/V»k¡ò=¢NP-öF6жGÀiâºs ª®Ý"rÁ Väòò#¸È¯é-ÜŽ:â~l3±h9 ¬ØNB% ½ˆ0è$èÐÎ`édr5$aŸ¦‹¼ë çß¿zƒNÙÑt‚˜OP&’²˜v’q5gel´š£ÌøcØxuueHpU_,›²—¿¦^°žÄdZ ,pi7ŧ‘µ O†2ü5Og Ž”“Íè2N“Øš9¨ž§šNOKäÐm<$ÜYry‘Zñ°aRïò4½é8Ò2C¤aLš4Š <²jNš.l)áwGƒø„L#ZÈpP1åüËŠçÚjš£©2)8ÎP|A¥„âÓQD%­«:%·Í£'V;¤âÀb~@;˜ÉŠf ]ÑdÂÛ…°#R©[Åy0Š-7ˆiÔa=š‹Y)å‚DÕ )ŸBõ #¤ªDœæu:Õs<øÜŠL$ºVìv acèDzϋqTN  Ù›{’[cÚ„V7,.h!Ù@0Óq_³96ŹØW¹ZC¸ƒâ>;â²ÖГ÷fΓ 4Ê^ìà… U£hÍèåCr¦^é8ìǧ§yÀ²b¡&ˆÑ¢?AØA! ¦Î‘îûû è" 5é€I2–@Bþà¨J› ì©íYKŒÐðTÓÖCti9g'tÏ*°¢UŒsº ÛŠ`ÚV›8”ýèšü>¹9]©»Së"”Tz¶ÙX¥Gª±ÛK¦£Éæj …ø–S—äG‹x²Ò`k>/-4 )?ø`7–5Ÿð|nìë|C±­‘{ü9X}ïØû‘Ý›c˜€)$ÞЊëÁ79ƒýðnñý²¬Ç·ïòõT@¯ÿ‡ìZ™]©×êrwÑ׳ÃëÈþŠvò9ô4OyÒ¯¶hÍEó x2T/C‹Ž¦&¥E®;ƈ`d¹gÊqûš.bŸ$igçMcr:#oyÖº®MOocK¨Äõ_ÿÏX\y;Y±¸œ>…H £0˜ÜS:§µ¡Aˆì'“ØBðò°ýbÿPù» WŽËQ\n:XoŽÚ®ÆÀ…×F7اo®_ë±Ùqüv¼]\é°´p_/ëäÒE³”†ñËÀpžh`¥mòQ–ŽæQé¿j{Ÿû°L’að_ñ0xÝDèFõŸlDHD»¯Žàp¥¢»úèPc›œ§æ³c¡î9AZÎL°ç½49lc4ÏÒ •XÛ1¬ö†‰&O{“ÚÎV(@=é€o¢Én€Nž eGSÊh*™)YímJ„ùP)2›¹2.ÚXÉëâ[6Þ;A{ùs?7–ï8Þ !l0ŠÅ*؆”Ä:O³s-62µ°)ì v TÆËî 껹 ÊÜüóg2 p‰g³ð6»Ä¤K˜Ž —ñš$“ çš<Ï‘B,Ö„S##:K½5‡e¢s¯-jsÞaÁìš.9»X*×[¸Þd¹Ë$çéõ¶Ý~W2‚oÛåÙé¼,$fá`:D%Ø=9{:U}Òc1’„ÇÛ¢†-eˆ–Ñr'G©™ù·owòÓ²)n\—á`Vªw¬þ/i}Ë]Í£ÿ½Á‰Y´À;‡pÎÀv()™f0/Ž.l/‘I—l7²èËf#—€ŒM=« J jƒÚ¢½µÅÎýØ1sC4Ácóð¬sïwÐþ÷‹Eº[(½NÊš%ü¹a愇 Â\›®ƒ|$tLŒzÁ×_,¨CB£ŸÄ“Ú½çÄH©ç!íËGÑ×:¯Øõó†yOÂ¥ûÁî©…<#\/-g‡fâ;ŸéE’£Rck–íyÈä8-K¡~ÒAXÓ®ÓHý~½f½<ˆµ…)€#Žý¢Ñ™™…†4°\‡”ÐVRë“Ár€d ¯§%1ŠÞ1ìXßHcÔ7I+u–!å½6ÚG*Xs  Þ îӌ˱ãc|bEÜîÊßšëÚRcFZº ½¬âñ#÷ƒW$^» ¾=|QÚ{“ËzÒl0²VÍ¢ãŽ/„£Ô´Ã¤ 1wè4 ªûsêؾ{ž=õ㺸_8£½­9ÐEÞÌ)ÙóÇ5åÚ;ÙÔ¶|øÈÚÝZ2ñG qÉi%±pÛèNH‚Å‹Q/ŒWGâΞ®áCq‹|ñ.nµ¹’Jäúù dÞ¼‚il¬n"ªs›õÖ¿›NGkõvÁ4Vù|®”[ä'& À)Q3"[DáiÈØ”´/á3û„!Á”ŽÄ³Ã'0}i1°­×Jœ$v'kY FÒ¾ ?yæ–ŽÀ|"›„>£c.ˆÜŠ¢PGêø<‰NIü…ãzI8Ì.PdÝ=´½ÇŽ·{* ýƒÑ3°˜wkô± ¯MqQˆô²Ä2Ú®å!(Šm%µ<Ô™E8 e‘D9Ž.ÁëéHèÕØtjŠ'Ñ¢e’þ^’±! O©ÔðÚ¬™Hêpò4ß@ðVŒÇ•â @àÀ<¡’¡ŸnìÈ4ÔC-‹È`D¡Vá¶I0Þ/ï¬ÀRÊ1QÚžÀ±ƒqmâ•;cžB&™ÀnÂœªU Á-.ÉóÒ¤2dÔ =R±^¬3^oo/;Œ©\ W“`´a…yëí¿¦­/¬kRéPaΣîþ«mÇCϤàmUÄÔÿxźî_1M® àípn’–6®#L±+¡xÒ]þÁæ_ƒä lãkDó ì‡cÍ\)ú&[¹H‹$Œw. ¹|$¼)Ec³î0Úhìí¾ÚyµZ‹zðÍŸ8cçð=Á }÷;’¹ K\ö áoJ3˜þl6þR³øϹ 6)`'®®Ÿ†Ë&\|||ç˳‡ȈX=s¬×I­pÄÚÔß¼õìzÕG¾öÝõœcÂ¥\ÑU9D?0Þ ÜFTâá-¶Jâ€,N&„’ d0 6e"qJ·ÈTÙ >jîåÄó¡|ƒÓÍf­)]ôßÑÄÛ·ÇÇÇõãûÇã?7Iî98}÷N$¾í¥4¼ºmÔ²w‹*¸eqˆFôœQßqp|ovR™@oØP¾¶.ÆiÂýÒ4A1Øæ ÖøBì ’“±ÞÐX”ŠbUgSÜ—S‘¸·÷K ia‡¼°¹Æ« $³á ]&x"ö.XèšS±îÝ(IyÏQ?[õ9Cõ­:žèÐÈ8ÐkṈÌ-î µsÆvö&„Kt%UÔÇýM<Ä[Ž¡QÒÌMd>á‚ÎK°ü‰9W[nã«Y13™Õ÷oy"´ÊÚOÍæA7›×¢±º1whª÷âÝ~ ÞOPÚÅ(Hoüz÷…bÆ]…1¯VSŒg…gin&qícõ}vÑU06OÿsAǛԘÎÝ"ïDñ&4‘Õ0ï'¾Áä™û<³×¼Ú+‘/SH xÑ“Œ:¹µ‚ú(©c÷¢áxr#)äãbÞ4Ôõ†-bggh„:iS£æÍöÓ㧒.ŠµÀÌe²!è5Û\­/Þ†˜],}ž‚WêÖ˜‰JA¨æâºl`'òó?n<°RÚEF§áF˜o÷Œß\a}ú(©ø¾ª6þß½8Ž7<ª+ïXI ä¨‡¢xžbsä;uaä…ÎY§¼JF‡'»H—õ«èzr8‰Æ‹T€@•+êÖˆ¶X+ãØ“1^NÁwèéÓµ'T,»­®­?¦ãµhf“|hä¥j aÌšsmLA˜bÒ®$írÊn>% »;Û?ì/¼}Û$øÀÆ·[…¿-.ÖàaE¢›Áã*Å«Áâò,~ ˜m±`ØÓ|÷nÝ7Œù°º•×Ã-¦ëÛ d0;9ÐÖ§®H°1G¦À—â4r<«fãoM€ ×i¨É4IììþDR€ÛÙým“¿ó/³lñmÙ2^4¥)o£,M¾¨òDžM fÀc ðæ››Þ”8#_>Mi~m‘)ÇÇÂ÷2ÍWŸOô»sMì¦ê–Dç(Òè3؀ˎô4hŠñjSâÎ|ÿêÍ"[í…äüŒLNØ<˜á\ÔÕSAÆ3BD?‰G°…¢Ìq(q*(}%䜤zšdY›åÇøÊa²–8¿pÔTãà˜_DìQ)±ÏÈ!.É\Þ4‚Ï“éhCÁ¨_ «PΓ2ÜŽ£9?Å¥<¸Â0:dób³Ç gÞaÛÄo–üVú'æ·eÚƒA”E`@ßíݱ€Éɱ£_œéEÐFE¥])F0 b¢Ü7D„òT‚ÃSÆQ_œŒ›ô»i=ýŬßBãù}‡ÿ!¹¢ ´šuH;R˜OÂ[À¤LÆ’È_ìïì/Ñ\Õñgph0šå.Ï¢jC’„÷“,^Á³c½ ^ äíGÍéÚuIWAËEÒæŽA§€ˆ¸9A³LËÕær“ ‚W:^æÝ£ýý½…·2…Á[2xØ ¶Ï›aÕb’vÆú~-¢Æ®Õ3´4[¥žäÑŽÚÝ¿Fþ¶u°‹„ø-öˆ¾’âè ¤’P† bÒÕjQ°Hžëós\ÓN´‚bd ¯¶ŽÙL/äìJÜCÀOéöbz2ˆ{A†F£»Q¨!Ͼxµ«ÕŠWyãù¢«ü@ãrœOVJ‡hn{’gÐç FÃ"}ðf‚H`ßí¼Ü:ša†5sÌqõ!` ÜÝ\]ƒôä€<¢ªÉ×ËÇÍVÐ$L3x@b`^7yDÑ€,žL©ts˜6Ð/¥ éÏ|¨18 iÌXHô)Z¹ÔÞÖZѸƹ~c“ Ÿ~mZeÆŸþäÖÿMÀfÓøuk‹§#Ûf 'üSï/y3vË›Ï[—¼Ðݾök-1§Idú-¦‚û%| ;¦[ð爂µƒRWµûŠl´ÈîGæ’}$€$€ê8à«@¢âmÕét<:›Z‡¨~_ágåcSÀ¢&ÔIØx_²c2ã™ô³üz \ö4—ÙÔ0,!`n6ÏFSLê±è[‚  ^ /èã„âi6k5/Ãåcc„s¿é¶ã."OYoÈò©73_~ÊkHׄ’ÕFéfg,i–@é3r8C ­>}òD÷‰n¯83ÖÕt œÆ×Q¿áÑ ŸuÜh†FlžPûÚ*ÐaÀºs4…Q|³ûBM4‚ïw_`t`ØΰV[NpLjwi€P2ˆyÂJ ]8Bü÷3˜:(gò#A™“>>›™v…b°a`ÍiÊ ^äi´eÁ1<}¤·°ë]­S¡ ´qÆ[èÆB4x— ê N w +:Y‹¾5X L©i‚‰ÔÁUT“Ó"sWÆ~áX̺8˜C—;âp”ģp€Òyî^2‚}Owišô§¢L§K$cË,ŽæN½„±Ð²jr51–åT ?y'áç±ì7ÞñÄÖP$Ń)`,Ñ:žz/—ã?O$´(ž­t‚’€ôœx:¦®%2ËoFÄýâA77gLšÜ~|÷Ù>'9¡ƒ„+1ô ¤"X›=Úm¢S5Å Z0#à#%rÙX,pš[F8< û¤*ÄH—ÒBéo¿CC1.­¦xÊÃkw“.$¬£4ê$c³sé~Rìy>q£@Zöø’µ^sÕêt@±yþ¿Ú­Ä1|=Ú9xyl½zÔÃCÔHÂEµ‚»h0óíBÂÀ„/÷_ì~·»½…/°ñ+¶.(!•d9Ò`#ÇÅðÙ|2ˆ®;«…ªûÔøƒ…Az윳›HÞi+X«ŽËHmjîC¥“ËÉ A°¯¿æöÕ[¬kÕˆf1ͧkÁ鶞¥VaP§®œp\cÞFZZa^ÄaÊùÂÞë8'/C„ëãáÆÛ«ššà‹²!§Í™¸%+6)­š4ÀðbŒá[bè‘kîæ>;ß‹—}m{sÊ¡X~€“ Ñ2$…@úÆÞƒ´·òyTÓ™ êníu¤†LbÝ:ÜuØ([oÈB"ãJ,ûÂë¤êUk–BæÕ!Ëá±D•M'è F‡r¥ëRA›ˆä´¦q‘Ü¡—CY)”µªžÚÅ)t²Ôb]`O©Bœ[ºèUkÂB«iÍ |€1Z‰+ÁøAÐ8òE§ƒ úYÒâÅNíG .‹,F‚÷ša-zï˜N¢Â‚Ž«Õ1áÍ< «ÒjRL3séœ^—¸F²½aG”Ô§@ˆI  KÿÖphÆqošL³×gålÊ:Æ ÚJ†tÌP#ÝT5»Óää‘NôaK FÞ·øóN íM‘BøÇ4–I\b®°Î"Pî*7¡´Ñerr›˜õJuÚíAÌhãÓŸ²ygõ V=³“”EŒÌª¶f‹î%”=P0ç0KFd˜ç8É»t)qPpØÞÂ_F™ ¸{P¼AÙÅ-ÚR¿A§Ÿ \m¦ù´•rÉ;(¢©[5 §“¡–[tðÊf|ôÉG ³&d¸k§´–¿TØ6×!8åÒâ2”)”\z Õü`°‡^(J c(4‰ËÔ×pjS©F‰Ì)Ý,õ™ùän¥ÑY˜öÉ šó±¸ÈðÎÀ£ó)ÙÓº"’¿OÌ)ãD—FŽüÕlRsEGŒ¹»5è©‚eA¤{À,N¿S±7µè:J™ýUÁ™DW¡eƒí0PI äÜ`ÀèçŠ[WB `TÁ‘ÁoÁUây Îzj±Âóp?È;§¤ ZžÖ¢R"æTR"‹ø; .“Á”0Q€ëÍ&IŠ_]ãylÓ¾ö:IõüsZÇÇ&C¯—RzË­Ï&Õó]È·YH¾L•üY£8l^×›xDÈ™tÞ EVrÿÖuÇ­RÖ¢¢ªˆ(8 ÄŸÈE´ôÓVŒÃG¤¦0³a‚Dö’”eÊtagÕÆËÉ”eBZ²çu׺8Õ” ß5~wh‚eòzPZ2 Ó-iU0d…„xé05ö †°e(²bÏB³Ÿˆän¡aO,`— ЄÀ?ç(Ã"n„ÈÃVDÂMKr¡ F ‡ÿ%FšzD‰†K9¼ý¢Tim8w½¶ØÉÆžMsr#îÜÑùÉñæ?¾€ç›ƒêñçž|ÂôªVW¦Ð.x•0ƒåZ€³øËM-̲¤«@ ¶—9ÁW‰Ï’ô3S·ßšÞ_®÷¦Q7t Û#ë,J.RaM|„‘©fb¶Uè»]HŇ·†Æn€®rЈz Qëf[@¶Å…R2úâ‚¡*áú²8`á/D aEuº`±A/`G1ìÃc|QzX£ÚÄ´ ” ™ðàõûœRf‚qQ›MU5!ÛCÙ¡±DûtFB穧t$±œ@®‡,'£…Ž˜dS=ËŒAQÇ¡¨¢i5ŒÙÞƒ¨ZÍ ¹G3¶2W@aõ)¹MÄ(P4L$Hked¥wJ’õºÁ¼Õ³=¶Î#5œˆ¼™Kš9ƒZƒ x`i1Ž‚ ×´¥n ô«ïòçÒG¼RqõbpQ b äª×ãÜ!U(FZ€èÃñ¤fÀµ~°¤úêÚñüD½RKàŠa›ûpÏx‹Ä8‘žÞ³¤Y5³u€‘„&¥9\YfEƒ¡jvš^¼!”Bsd‚Fÿ¦– qjÍoLÃhë¨o$ÅÚàQÑ…nŒÓŸ,ƒÑÔˆÜ{ÈS§ìËm† ¾ès ¹àå¸tÄÜ‚[Ó}‰_Á:Ì3dñYlë«rE¤‡!¨Ë'åA“,¯û`ÛäxCåÊRRÒÇ'±8³ Â+£½F±Ø.‡½á[hà †{vNx¿ ÆJ!û" wPáØ3«†ëG½áMw?ºŒ°øTÍŒî¢Øã›æ×rƒ˜cqÄÔáQ‡õ(„iÆÊ,Rÿ–{F ¹ $‹YdÝz¤ÕT‘,_ØR„7±/KtüÚ.ØÝtMPU(CÕ„BŽ§n‘\j|oÏàDx0+To†Ù”ÃUZ×0ç¤âêÔü$*L%g ÿö›w ¨”œã˜ú‘ãÈw‚ÝS¾ØIœ[Ôhð®ý—iÿŒCw‘âp§¬s®%Š7N¤‰Ne>U€òš`µÍì´â¦Pøíle‹­š³ ‰¦q¤…€kgÁ ÄÞH«€ò#ŠØe­ØžÔ‹zO£©l“‰¦½ ‚m±º÷2^(üÄzÍÕX—M.Äþ‰"Ã;2ýD¨ñ ­v`yeñp:€m±²ˆp‡œ ]iOýš«¶q¬õ"˜K¿;Ùäê/L"’Þº0+öž¨ý‹–I¡Î®±ž1ð”l#¤É ° 7m2)p6·C'h-pø1Ù›Nbl¢baŒÁ ‹íÍ/`#‰ª€~péä!ÆBL>]†—ÂÄD¹÷œE`GzŠ—–Ñ$Ïh>ÓpŽÒ§ B˜Ïh€”43ÃhI7âM•ÇW/›±7 kSœö¦CE%øœp`ðÈ-Þ±D­±PRõ)šÈQKä,WÅ€rÄK¨æV‹Ô]Oä6ž¦t‚•ÈÜ`f¦r?Ó/ÞõŽõIfÍ*ØÇ}r#Ò3ש¡žÈêXp€>Ѭ ª‘4›S>ó+?…£ÁÞ9-T-ŸXÒ`§ÏR)QÍ0-ƒíM1ý-#_­t9¾âÇlž¡«L"ù¡%½¤yŒ4µ6&95¶„mͧŽTcXñ+T᧤ƒDë¾B“¢~MW;]“5¢œçɈÞœd×Òsx¶ˆ%ÊôL„¨Ó±Q÷’ÕrŸxЊ²G§™Z!„3FˆI±Qó…¦­Ú>{I#ÙüÄØKÈ1(7!ÄçIL4áQn׸˔^BC±”î“Ó•0‰'0 Ñ%o€“¨x[ñ­šMŠrGd"žtT¹–—S,‹ÕkîÄŠ3Ç|ÕjJŒ2 wŠkÅ®þ“«Ùrùt>£-9R°%ÂS‘X¯ÌkG‘  =ì÷Y FTUL>>' º×EÇèî5ÖÅÕø 6]i±if8ñ³zî ŒN°×À Ôì@ðÑ1ͤòSÞ±rŠ¢Yøg1ù ì`T‘dt ;MD\âS#`õãIÒ¿)'?í%L¥):Ž”Z_¤ÑeLÚ[žr4j©¬&s_a’Î4R±¸bÂŽ'äf· Ú<¸0á†ìÊœã”ÌÖUÌ”Òç`÷l!Ðhºú,±ñlpDU JVsÀB$H"®¥0œ*”¯¢¼±Ï¡i¦ÐiA=¥£éð$J­}¨òÆFš¨g?m‘à£Ò1¨“›¶Ž‡7j¥ZB½e¹8º²ÕFà ϪOP«‘˜jµQIªV^U:ÁÖL—C­d9úîxD X^Éä”d7Ɔ%Q:_³žZikÊ|2Øti¥£Ä£Ú :»ƒh…‚ý ÙÂñùëZ¡f¢¿óvpŽ¨æ•F:bŽ|ãÝ5±¡GòÝrÒBš[Àè#Ýcî–‘ÏUWµ_Ÿ‘ ‡Æï®Ñ}`„Œ™±x7 ¼ÄhÜI†;–|߶MÆÏ’p@»[œtÙ1YÀ¨Ú¸¦ ¿Ð+õðñüf¸¤d˜ž=ض¡ÏpÓÞåÎP×À¡ZW§WûÁ[[¯Ž~¦ù_íßîlo½9Ü Ž~ØÑȦÿ?{ïÚÐÆ‘, ¿_™_Ñ+´;HA`Ç›@”,`³áv'α1H#˜cI£h$kûùío]ú:3â’Ä'ÇÞ šé鮾UWWW×Eìž(­Ø-±s¼½-wDãåæñ‹íeÌw¼9lX¨#k€\‡ô¾ýútûàTmïïžž´ç¿ˆÍ£#NžÐö6Fw,¯ÛG§âç—ÛÞ!‚ÿyÚsrº‰vÄÏÇ»§©¢"îñî‹—§âåáÞÖö1iëÖ v*(Ž6Ow·O†ñ;8Ý|¾»· U¢æðÎîéTAúÅ›ÜòÆ«½MèÄ«ã£ÃŒ˜HC@`ÀwO~›'žØÿzµ©Áè’׬ƒMTj"±»â—ÃW¸k@¿÷¶0ƒ§2à@m£OëíÆéîO0½ª9yµ¿-Çûä”hoOl70ÒÍñ/âdûø§ÝŽƒw¼}´¹ Ã:ÒÇÇåð€iËZ'°dû'ÄW{Ø[é|2Ææ À6LkÞ½Ÿw¡rœ¡ôä/Sø`&ÿ@£C±¿ù +fÿ"Ñš©5·]¬¤0عùüÇà9´‡]õACp@pŠ¶6÷7_lŸ,{ ¨j©L¾,NŽ¶»øßõ`®÷xT`ý×+œEH@Ä&L'v ñPN®Aĵ…#Pwz].™ºSø‡x±wx‚È•œn j1ü>ßÆÜÇÛ0^´œ6WÇ°´0–€Öœ¼‚Ŷ{@“âai5ïo©õDã,v6w÷^gp j>„!D„kzB’”– ÄîTÕx)gO8«öñ¦âù6dÛÜúi)×ãÁZ8Ù•cr(!Èq$ÂFƧÐ?ÊŸ£Àºÿ˜å%«ImÒi”%¬§´ÿCâ/Hp€Ù‘»\‚,wÆl¬½x›³ä†Œ¥eß&µôäfyAöÉ؃3‹Éd?>â"'OÜ!y¸a™ô%1˜éa=wvž:öܽ€÷@m°ƒŠIŽpÓ2Õ—ÅJ|¨,â”Hv<ä•“a´2ol_–"ÿ""u±kØb]º¯2“~Ý1áyÇBî”±([ °Î 0ïÃygÌ{"Ù4£lL*<Š`HGvìœCÞö_Ðì@øù[‰aL' RÅÑN‚éªÀxWì" • ¿Ãñ¤òJcÀ?¡Iô9œ=º¶ü€•‰‚±rcSýž`¹ÆÔß¡&Â÷PÀ]Ÿ˜žï¹ÞSËÓlŽOJeÝèÌ2s¿Æ8Œ5(Çùêžy–ÆF3;qøF­­7Q2†lF®*Ù3—aeÉÕ’.eùçjþØW±òv‰Z=c9Ίé‚eÓÉ.³ð@£6w$BjƒßÐòªÄ»=ÒT*ÀhSˆîÔ> ƒ;Ç6}Â~ßc³Å :"ªgõX½œ2áëÔ$Z |“Þ˜/úö0´SqWü=yPµ 9È«¿ès:fÑë³%ÂÆIû¼F®eÀÿUîêáöXŸí¨©ª>¼]¯ûä_6¹P\-Òj‘N­6¦óbí„=6j^ãà¬Ä:ü6›KÕr³YJ¶Š(?ã‹zquC¾±GqHÓ”BMd3Ë%oAՙܺdž oaž¥óUËœA7ílCÕŠÄD?O_Å4sMT‚;hHÕÏô˜Âz¨´õdÉL*Â!§¸)PF«Dø@–ËdéCaOhß·cc}8Ú<}Ù:Ù>Ú<Þ<=<–ÛÓßêHz5¹yh÷YÂ4@ —øÇß;”TÄ¿‚›·žë-üË, „õ;AøøQNQªYþŽÝ'Þ ÅîÎ ÅOaË”dȶÁ9qxÅ€òg20’NH1*§°þׄo€#Œ6Ïêcã­)ìDä'ŠÔFHW:Çá¨ÄT_ªCþni<´¨Á?oîý(®š²ÐéZ < :ÙƲ£ŒK›9…úSÛ9z¸ ùË¡.À%.´Zò ±^…‚BP 7„nÅÉ—œ$Bÿöâø–8¨QI¡ ¤EZé™ ?ÒØ9ѦؿAs˜º 2»Âk”¶æ7ÍfímY”„Éßi•)1 Þ‡-l_þlzrçÑ#½â¤…±1Ü~õ(:e¶`xÂÚL¸qVüX·Ý†tŽZqEeR Ôl×Ôä“:S£Ëwzu"V—%¿í$Zcãsº„A¥²aGŸp8ç«/ ñž‘´}&$}SëAk€óm]ØSe­àë¢î î×ö¤gׄ*ñ7ŒöZ°J銘Ø_×EˆQ\Ö¥º÷’?mˆQˆÝasÑz›‰{È¢Ó à âû¬)œ^•Téb¹u(bÿ¡²° ÕJ&4r@&õøBÆF½E\„•'ÕñêçÝd_JÒü^° Á ²V]a®Z0ž 5¨€‹j2$S!:݈ÂIx¡C H]}”þ±MZ8þÒ’Ï’N$ #Žî`}DM:ÈO}]]«®ÂM"ó{V#Žgûà'ÿíoîîщáìüæèºYüPäbD‘qbqÔ/B®#?ã»ÌSºO¹×ÉŒy×=Bպ_„­ëèd­îOOëþWð=;Ø;ƒ Ð V Þk´6÷öê Å^ó»··yðâÕæ‹mëƒL¡àq[عª'Û˯3ÚÈMðÂLÅÐ")ò¡ÓbI†riIh„á-ºz_T.ÅðŠ„ Q(­e°‚Õó™ØRŽJjW-~ì6Ê ,‚œd!3o’×@$¡íj%6vv_´N^nïíñw‹sË×1¥0÷ˆ `ð³R±7èÛ'IÐ~íÛØyâ×U”&VÀ‹•±›<Œ3s:õÊ° ]ÖîõÍ°Ó¸oUz·cÌ8â߃QY„u|¹M<]QâZj*[fèlA¡ôDå=®\«+±QHê¯}݉ª§VE]c…ç¾IìQùfà½ÀäöT¡í ÃÓõ¾|]þ¾—ûX“zåýµÜ¦RÉ2õÚIUy­4½)à håa&‡ìš9F’ì°þ-zºTrçßè÷ÝÙ²Ùœ²+æ Erf΃OºÚä¡ó+HJz†Íñ«žEÛWÖå5 ›IÜ—ñ‡S8ŒôJv-"/k_­ØSÞûh±±\ü’U)pÅÒÕ®ÔŸœCj›¨lÕ„yÒkbCÎbjA|²w;·}© ïœ$6-#±©,IL³ÐÌÊbš†0¦‰sÍùWó2T¿îËǹä2Í\ÁLó$3žeZ/0>BèÀ@,• –¹šÅÕÒðïü=™°53epŠ¬˜LˆäH÷³™VM&Hq¡eá`– ÅÃÖ¡¡r}%Õ6ØI?ýe‚¸ÂÜ<¼«Ù6ãAhZa•‡€„§¼ÝY °óeawxVCì|ncPFBX 0[áÞ¯a""®ÂB+饤p/S-"nX(sÊ×Çä?8”ü02â*¢•â“$+†âï@¨kÂâ÷“ 0l°g*Ò;žqkµ^Øp¾í·âÞîÁöÁáŒVPoÊž]ÇÚ#Ö±æÔA¼£On`X¬¶øôœ:dJRßלïÿø‡:Ua6žL&¾«Í³fAÌé[“â‰[ˆqñƒ-T°h»ñòð“ÆþaB_ݳf¦ý7Ÿ•›ä)5ìX/šõÄ4þbËÍÂë¦%ö”@ÕD¿–ïÑlʽ¦'UP j§-¥j³¸´$V£D©™×ÜU‹Ä†0œ(µ•äI^i‚<È›=ç&LÅÉ|Ä14š×/¦³ iÌ'èV˜E™ß «Â9„HB‘×–QÖ\ŠÇRÔ]E*ùaÒ݈uO‹`u#`‡_5”¼ÊhŽÈoì=ø:eóMÂ×ÍqA…V†¬ÊìSXÏ. jÁÀv9þŶc# ‘5Êï0ad—¤@ƒ²4>:ÉU`% °q!…ceæ)G†y,¸Ø§&jõÀ®a棡ͪÖu|ì¤&Qæj”µ#ܵU$àkˆôðÿ?SËÀ9¦Ÿ… Œ$/(ªDfÇ£4ÖFòü}ÅTÏÝjÙÈ›µ>dÒÕ#"G ¨î;°Ö(ô´ÁÆuw¥¨›Ý(]šjÁÙž3\£’ŽZÂ6·šÝåao¢…}ßL~HZLîÃHí´õà‡£@²#˜§Õ'Õ§x»MÊöÔP};ê>B#Š¼ c]•@ªøüëb0Aõ²<¤Z¦)ðÈ›%k`–ße*Šl× is£T¶ÏÉ=#£g“Qõ€ÊIÏpèÅgLÒ#TÙ ë%ýÆÛcgˆ§ÝxK"*…ÆD^hª[þ¿$Ïl­HŪOJ˜ÌÄTÝV™«¨;–ö÷xH$´?1 [£†3©ŨqÝØÛmî·vÛuñâxû¨uxDLuOÊ ytð§÷ºUÈÓu'xxgSY´}uâMi0µåÁþ€#Ï™—õ„ £jšV¶OJVŠ«Þ'‘­Ü4ˆ°ezS msh "ýCÊæp¨uÒó†}s(V ˆÌ’Z…vMr=®Ú²MÙ>Ìò•äÛÝ@“%;ÇÓl ܦ›ŒW!¬øgxoRZ·‚ê@¬ÈÑÚ”hÝsÏ©€››Ï¦ QáËVâëkò#íq’¹c­c5[{8ÑU “§t %©Kßóx½·nElÏmék4}nÈoØ’3—åãj:k($5¿¦õ¾_»@¥ ±èk@ŠÝ‹]µ›Yð‹2·¯š•œ<Üx Ë’JÅÞ]QðñÚ$¯ ÿ5*€¼ùµö¶YªÕèÿ+×ÊE_4?Š&𶙵Z³„¹f瘠Y¢U›ÕÕÄÁ´Š|”¢ÙŽðk¿ZÍmÖšVƒá¹XûÀœxÕ¯Öøù7üù„¨0âÆWËsgŸpé6I rTkâ7ÿLÎ\g@Ò2†tö›ä.pðn'>™óJj9ÈÕMÛ)к‚d•¥þ®QPeàÔ`ˆ‚"9S®@aaíìîmϤ¯§d Ò¥Œ¤½ãøž…äX ïÙ ³àKRfŽa«-nßfŠêöCd=p—ÿö^Mo.²»œ—M!¯ÉŠ…ʨC~”vI–[©g†‡¸›‰Óà]ˆ è¼àÓ…ÂôMûò$ÙEòUŒ~j€·ûBñ#ŒËÅ(¾‚½•QBÒ­æ.Qx6Ë #D-²½úmtÐZ¥­(W.¨ Dï±mÚ{” Qg$S|»Ž‚lyq__ÛзùòêÕÕµ©b+–á:ã¿„ÑË™Ëmý«z³ˆ:Ÿ|KÀ4«ä/®Ê2Àv w† †W…tÇ/ªÕjîl#¹åEmªe¢Mq<„ ¡ŽæU ÊdÒSöM¨ôÝ‹Ïånåyê݉OReÐ>q`¬Ñ Fí,åC}È<úô,ŠKK%Ž ‚ôÜž­|©ã|SCe 4w¢ŽÀŠpˆ,åÍΔ2R;Κ­©„¿‰Õ³Ì„! Ï")Dš˜ãÛÇLJÇâ ߈½Ã­­·ÓiLÞäòQ¡p†26Ú‹+gZÿ‡*(Än lÿˆ<ÚÈêp€¹Jr¢º¨½î.³õž<„- FοÌA¬Âyµdp|0aN‹±E2ã¯r€•€ÅŠ¦†T‹$ƒ(Ù!õKåë4ë)•ÙVmMÜâÓ”6-ßqÀ¹E?W Å'…OÖÕ Ài¿«§ß‹©„ô!9¯p݆+¯w>éI(®á!¾øT©2¥ÝŒkÿ˜mÕ]´©?ðpe*Èw4—d;²rOí¯…×Œ¹dŽ„Eªe`7ªU(FêȯW¤º•R…†Ìuüc- J“âîˆZ°¤1X²Z®`HÕî䤯R ºVpd¶ºz°ê×ßÜ6(ÑâkgVÕšG€^Ö¦( xŠÑ$øòתZ}15Óô1[jw­€ÚŠKZ£$ñZsÉ0u¥º2•Á\¹oɵ9|%Ì´[ñ|üdí,bíL"ò!´E°á‡Év¤Æe€ÖçáH£§Ž„HD{Ôê…c¼Z®ûÁy¸’‹ËèÞõúƒxøÛ(OÞ_]ßüÇ—Y÷¶OO·OêþæóÆÖö΋—»ÿþqoÿàðè¿ŽON_ýôóë_þ[g•P‹N%EŽÌÚ‰.¢1Ô¿²ºöäé×ÏþùÍ· HÐLú Äž‚ ‘€Ú¾¹.*Blß@ç_@g³®ÙY­{dV-Õ÷¾êF—¤ßη5뛹?.\3‰È‚{./Ø)€|uú\Ï{¸öÂPlWÅ~{?¸D?ëß>Y­ Ér‰åàaÇODrüÃuUˆõJÉcŒ­ ¤jþþÖÞßrgkxœõÅwFˆkã¹Yw’ª6ûKYÔ‘¶M„  ÌLT(ã}àE-ŒhDþ:dlÑö»* ,K2˜DI '™©H2ìòdÕà AÒÅDU Ï<ÀÔh5ê¤ÌÐ:¿§ÒžàLY%]Kå3ºë© Ê%mCH9üë›fÛ?ãxåv¹¤Àø þÆÆ¢|%OJ0¸¨9œS"Ú°=×7%Ö¨€ÆøLÙ)ÖEâzÞ%—ß|CÊÝ@v6ÙŸUWÏÄ÷Â\hÉK>»z)jƒj¶ì¨_øêbɃcT¥Kö³Å¢üÁ‹Rõˆ‡{c.×QÉ(úR,† ?Ô좒ÙHç$‚˜${÷—†KÔóï-xùFnµ7•Än´êR^~ÞŠ-Øö¨œ/us$+B¶²!/Ää×q Ó•¬ËL«%q8û'¿÷OÀϸnª”„}ä¤7°Rºä߆˯•ÄÖ¿_‰ïÐà)-v •ÉMD$ž/ÉùÙ!9^Øî€Û€iEm'¯Ëd6€gí¡¨ ¥“™i#•žÍkþÍš:Ä mø¤Q§['ž‹;ODo²èKCŒ0Œ«û>Ý‚Å)¬t{ÔŸ‡ˆ…Œ¨•¡Ë :.,f«û:«áé¸Z@Õ|†¡åjñÍ…áðâX¨u]÷¥ÈŒ s-9Y=GtF÷"{FE' У49ŽÉAFRk&"='†tΪsöužç{ø­oí³TwÄ~÷ñ™zJ|g)2B‘;{&KÐâŸ~y'‡"yšˆ¥“ŸŽŸT×–EÜë …Ú^4˜\—ä.èóø‚Xë- í—a;œ¼‹pœðEgÃ8´[ª¦úÙ’®šÍ¹+ƒ’{p¢¡Zý Ï"hè¸@= „(©C £‘E×uRãêÅí ‡Ñú En!êôN΀;>ÏÿGjiíí>?|þïØ,QÂÕbß?0¥¨Ç–LÎùžfgoóäÙßüq[>b‹(DëØ8Ùíwxìm6~Ü|±Ý:ØÜßÒlûšðõÇÓÍã™ßåmzÝ'ï&ý¼H©LÏ_á=ëá1ìŸS/ÀMîWÇ{uß÷pŒ&ƒè·IHƒV/$£vÍÔQm£…×N€rzDzE™/¿C­bv‡q C¬ ¡Éàe‰š§z¡é-ÊDñ]2îDqõò{HêBñró'èÞ/'­Ó_Ž¶OZ/É’Oå½Ijèú+¡üx"ífŠ¡,+[ 3[èät«Ñz¹½‰Îxã ,åw¡ AªŸ¬šO·‰¨Þ|0²Þœ6ÓLr‹»âo$Ì”·›†V¥S™ýíýÃã_RµõÃ~<ºqj³›‚³5mب 鱦ÓFz÷à4g~¢ÁxæôœnA¹t5(5¥À«ƒ](ãÜ„2¦@0–ѯ…N«V-l6@„QÑoµ¶_oo¿>mílîl{VÂéñ«moïTE¼ƒíí­Öæɾ, _);5íèôå1ÌNë¥Ì’J¤Œü¶µPO¼£ÝR ¶(¨PÒ7aI¿ôðôðpïÙSþ…†zûÛ[»§ÞÖÉ/û¯Nw÷€òìîlŸ@«1Ëñæ ’6nm{ð¨Š>A¶^íC=-è˾̃IÏw<õ»·åí ð¶é/ýA¯Ñ• à0u”LÍkðìTê)>mmínñ3ÑGzróçÁPTyü8ˆá“·¹iÏ<ìmž¼äW Ÿ©$æÿmCzR‘á3lˆ80Í϶‡F'›¸·%›ªZ ƒ 8Êѯðq %kM§Rý›û-»­­íÍW0Ã@ºŸÃAþô'_~¢–Nã`DOø»¹[½Á~…’¶V'Ãtœ¶p¿ñ6þÑS÷Ÿû?BÏZGÞîк½=Z¾G-é°Ø£7OjÇAûÕîÁΡ·ùêô) =2\x@æÂÛlì66÷<¹á¨]Áküò‚-ìyta3Ðõ¢fÓˆT{ª_UkÆœvÜŠõô-úËç·öp"=ä0ýÊ\ôŒyðÁCG*ÌÂ2¿`&zRÉ‚‹ð#çãgZ|´äŸy|´Ù9ñðh §:b!BzŠð† ýítñ§ó>ŸËq¿‡¿è.”’ã6þ³$1‘?êGŠ»½¡ü°c^odON0Ôï(ŽÇ²ÈÇQÎsŠõäÉéCxÌ`àmb‹„ãÌó'™#{·Ïò )ö"Í…¤¹‡ÅñRÊ÷Ä«ú†3æS :Ð`P8Q ˆÕg'»­öeØF]'•œD…³5ÂЮ* Ã&Ò-÷¨…ªu*Y9kßà0¸Ph˜õ^4·)òwk2 RK®þD×­$¦‘¤÷‹Á¤FÏ0U8-ª0L jõ`zß©4ô%9â¸JôÐ<´£x’ÈÍÉFK [,F‚å’+B`MĈβ›·»@^Ÿ=x(šÃEXŠ¨¤…¡S‡’µ&Î-ÃÖÚÖõ›4Å”';â¡CñÅ•xN3©IØuŠ©N8¡È©äæSÈPU² ¬;ìTŠå{$½$-I˜A;Û óªîyG¶½AÜbD¡qî‡ggRË(/-™t3iîr«'Ë×ð?q¶¿XPL(yGFÇŠF‚d6²:[Bê‹Êv4‹¦^³}¼gQén#dq¢ÑZU%¤¿þ*zR¢ëºK壛ë7¿Öß–ë|GæŸIÛz‰ë”E…å[©hÄgÔ`il6õŠ¥X¤£1ú2hÜÀöiû¶ÔTž-tZu¢àb@‘ïn€èTN©ùHw°B·’Ô"=e²Mø•—´øùÒúI=Èß’3Ö²uQ‚¨—-xö‹õlõS½Ìe¹¢CÝVä8³ó¤äoª}†PÄUkêÙ<ê'Ý,(§m´ËVHތŦ½:oäZÇJ°žÍ£~Rò—ܾš­^vÕ4CvgzBê^S­s2Ø/Ö³yÔOêA £ÅŽdG±ÂèozÞÈâUÎ!‹Éƒ*Ê>›Gw´TN*µù”m(Λý¢z£òe»b‘O],ÿÝ}uÞôÈëÙOý2«Ø”ôéErS§eÏIËÏšIq³aR*‹ûš®I ?Ü¡MMbæãÌ‘ŸQxvÑ©g›Rhz‘ÜÓ²çdNgÅÄL¶tBz¤4zrV©(0Ô£~Rò75ë\JÎ2+<”-xö‹õlõ“n;—Ëik¢Ûç<©ù›j_b5/±”z6úI7(ÉoÏo˜ï·I2#é>©ùË?jFY¥ŠÒÒúI=p¤–ÅË%ÖýöÙ<ê'õ ÝaJ½€ÄÑÈ{³_¬g i“s“Id2UWÀÕ âb·$™š¬ÔtBêÝ}Í@°_¬gó¨Ÿì¢ò75 në帺ÚOåœ~æ%Ú£j¥g³fRÒ 9Ü,Λýb=»@ô=Énræ:Rób=¤F¿È1‹L¿œG]¦æÔ2ÒÒ¢ô£~Rò7Õ†‘% ’je žýb=›Gý¤[:š"Ö1 s\bÊ«óf¿˜ù wó¨ŸÔƒüMõÔÔ'{køÊ©¥Rïî«)”b¶žÍ£~ÒcfjÎŽ«S‰ô£~Rò—ÜþÛÚÉr8I¶&ûb=›Gý¤Tlø9½x¹¥>-Ì>›GýÄ •®µ1H•f•1õlõ>üäÞ¥(µèu”.“¸[üx‡»e*ð¿ãfYZ;~Ž7Ë$âú}ï•i¢|«œnhÞ²’ߌ¢·;"–ù_ Eô©p¢¯Œ°·r=óüÚ_Û¤òZ]2öê¼Ù/zw»6·—ô¨ŸÔƒ»á› ¹Ý˜šåÞ1=!õî¾Zîµ}syÍw—úÙ<ª=Ê2ãÈ.×늶é妽»¯Vc8Å~±žÍ£~Ré3«‘3æ&åtã2)ég¼8ÍÍâ¼Ù/Ö³y4ƒišMöTì {HMòuÑ<3dÏ÷0F ¤¬HÕ_š¦BºÎõɸ†) ×S®zÞ£ãÑiäToÎõG ¤šæp¥Ž·g߇¡z³Rùö-…dxó7—®–EéZêT¨†ˆ+ò "—n˜öNd‡â¶+‡N‘“Ý×ûÛëÒß? Â~üž>)ïüâIu¥šï¨Qü¼y|°{ðb<ÞK(L˜H=}Yª—,k&S¹dtö#3U¼͵ÍhŒLR‹A ÷uaW£Z°Ž±¿sÔè!Ó'QüU|‘òØ]üd#'MùcöfÛèâõJ…-©‘¦¢—˜oly”FcO©Wˆ¦žÞ*Nc¹G°=r'€¥ÂVKÅ´mt½˜±®KéÙ`­ÐSP*¦´•ÇªÞ Š 3šòÔnÎCå1,·<û÷´ª £h‘Q9Îj·È²\ÞpZ.Ÿì> ¯e7£õ¹"EŠ,ÇÞÈØ{Ò/”å#ŒŒ ¯:õ3øc\ôê½æªCþH᱇>Áêg½m\DõL&Cõ©Ýq “•¼®¥ÑøŠÃœX˜+]fž£ûq8꣜‚§}Ë6°â¢]w!¿øä.Ld\'âe”ûÇLí²—ß‘&£vHnðÐÝ}—( ™!^ œ=v#Œ¥ª·H ™ÀRLg‡æ$åINSý¤_J5ìÒ›66Á¡–Ù:™ R`S¢ÊU(!`nT`+˜C}¹Kl·Ì”ðÙL·€™3H‡îÊ_5N‡%WÎA ™úFU(V+º¾»l#¡T«®÷ÁTäØw¬@Ò—x±‘m(X]ÁBÕj!g­ÊµOWyí%b)U ·Lµ¾°Õð¹Ÿ\Ô ª@@§=•e™üa6‘.Éß\ÿ;¨Ysì–h,ÏEÊtˆ,R…TKd+ÚÊ{µ’Ñ» Œy’S/úuAØT9Æ’îf´–¬†,På§eë.Û õÅ’áÙý©ü¶¬4K–²Ú¬‘ç@Ú€uJ3ë+\Ntg,/-Jèóbã°;DéãiôÛy‹õ7–ÓVþ|ˆ¥«RÒA;sàÛæþ>iE/;ê׺ÿÜ™*ƒ¿3ª[- ëÖî±*Ôu™Wj3~~c¼pÈ=¸yñÖórE!ù‹Öz®GÇÛpÊÒMÓ‘.GíËh %nj–þ¸d3±n.è†ñuþ½)fܹҨ:–‡ÛºþÜšsêݾ½bÎ#ð\»2Z†Q±Ý'ùìÛHW*±XÕâ±lÕm=9Z¹ŸÐc û9¿Är€"IŒG¾ô­™R}ysè×<ˆ¾ àƒ(&S–i“$X×|íæåáþ¶”drœ“?d:lŒâÞ2É\mJD´ óF%`BÇIТ™(#˜,¤Äx#e9OÄ9E8^<ãInI&õ°ÀY0@¢!X†A©é—_X‘-0šVy dPáØëä¿œÎ%Ž å¡ï& ÄUî‘€úq¨)GÕš¶jxí¸/;峨vYðfµ 6=49³"™¼vÜÁÍ_]كå-e{ BCú– BÕ)3sIWS_N•DŒăÊE»-ÞØN©†ínÃTo¦´šIr7¢E³bÀeÇÂ7c~Ð æñáá)WƒÃ¶‚.<2ZìÄ퉎sç%7YÖ§ÇVŠ[+3j—®ˆ´JÍ/Ú/Íh|–C·sJ»%y8íâèÌáÛ˜²Žu¡‘énº-‡ =ŠÒoCº ï£Y…¤"lª*âÎ*”ä”ÀuN)#9WÍÉ6U‘$,tfRû¥c‘Ú7Ùðƒ„«ò E]&jŠL‘ Ï'UõO^í¤ÀÉx…òÃœÐRJäÒs+®É€ä)*%L…ç0]&ïÏ’ð“ ÷ù«Ý½-!Ý•I–×·>þPÎóæbl˜ä¢Ø†üåáÉ©ì‰H+,"%ñ<{È’­ s 6 Q¡7“AIA1 ê‹íÓé ‘°¥ s™û BÓsžwùeN]©K/û›Ö!a>ø£0Œr‰Ã¢v·Öœ#Ðzoä5@ ÿi«†sÝ{ûó \ÒðN^Ñœ¯€ó^†;×`ÊUFAÔöïÚÙÞ<}u¼íò¥JñC}\"‡ŒÀòjçòK}@6jéä7uð·"ç $£pô­]†¹ú 9…EÚˆGT¥Èx!ùã¥É ¯K'˜?ÕW %§'.œy ¬œÆO´òD;¿ä|¶æúðТ]ÖFR%‡K·~:0!àô\ä¸[Àî¢âødˆAí+Ø%}g²‰zS?úñÅÉ[é¥NÞvÚLŠŠ-0ˆ]T!_¿éÒ”˜W:iè¸"ÇR™ÑM— uyãl-jÔ¤÷`Üûß •Ÿq.É;9 ÊŒ²~œÕw$qѸ¦ÆlªW¡}*q$ÜL"HçKºôT ‘xt!SËPi¨©¯¾ØÅ,*`סi%­ùá lÙ v´Û¨!?¿’Eµfl’ÌZvNÈ´¹D×vè\‡ÇÉûÑÓ˜eŠÚ˜¦Å41Á»@NÑj¡ÄR˜˜MÆp•Q¯–M7 9o«¦¡ƒIÕÚÙ“˜Zá ½Uá%äèòfV’nªß ƒCã{"C+¥TŠ™4+ I!Á £fôFµƒ‚R=x/á\…•àÌxÂRÇno‚¡RÈRŽÔ Q±Ñ0À­nÊhg˜Äq™ Ý^ptHºÇfŽ9¼SŸ–JôDeï;Ô˜~ï{l(ªÑ-¿é>j)¥: ˜—HÿÁÖ­œ„µî>?Ñ|º<„YSt™›£ÒûN"–W~¼±üÒ!!8p%Ѩ5¾úŠXÄQŒrü8Õ›ÝïÔn){”j¹îŸŠÍ‚½›ÖÍÄ扅{aÿ\N„3#b©£D—ÐÍ9³Ô~ÈóKRRå(;–Íó\îö鵊Š…oju&ŒÜÃ`L¢fŒeÐÉH”ÓjJ§×1Å7á ¥½ô2ŽPjÖ‡áC׶°š.#sçE$’&Y›™~Í/eyjg­Ë;Põ-îöÛ[äð=W¸þÁÒ;zÑøfÝK5Ãm—òrŸ¹Ì&ìg^@™ݪÂ8};+ß´u«Ÿ•MuÙÊŠ ,4èÁñ7D];ä² ZÆ Øñ(:G₼ Ý8ÜPTÙsŠ˜t£-òÿ‰ÅEül¢$;«òó¬Ò³¤:6@F7-%”ÑÖ§—­T<©_+v”Ñ J ×­úÆ¡-1ô³¼oCµ»I»†TîË«}©ä}°ƒÂ׋ôs¥P\-|²‚ÃRµßÕÓïÅT‚hX7À×cÖûÀhíP:UÔ˜‚dk–H] ¾d(ˆfŒHšgüÓdk5ì.PV‰†7EØíoæ‘S¥Ê¢¿š…¦\ßvÏ‹<+Ÿ˜KT¹›…‚çr(ê qnßÿãkhÀÕáô CƒêÁ>]*°Y„@“¹DØ-âvì-Zû¿ŠòW¾“KØÀW¥iÎØβ*Û&Dÿ½33ø)Õ2X9Ä/pšÅ€E6ô¦ 롾˜dȳ‚ †)ŽQëŠtÎZxÀ"NzA+ð%é¶Ñ¿O†uNòpŒM¬ó(Ú@-ü¥9˜%ëÚº¸ ’uî‡4:ùµöQÔüÌ’£,Þ‚©bÕ£¡“ÚúîšØÖrÒúW럀t¡òœþ¢Õ !U]Q×àyŸD. I“<³ßJW Q¡ì¦(å&':N¥0ظ¿y¡N}¡-¿;m1ÈåÔR(¦ì”Æ°©§r¡\ןL¨ÅVH:”ÈbímÖvÅÒ.jYŠ#8u€½í‰ÍAлI¢¤vÈ·Äï”l–—`±‚ñ‡ïèÅ®‘-©&µ¢aðMK70ŽKf ˜1q…“ˆÔ<»(Ý!é`/$•"ùÝGXëpûKÔ@¬Û$P€¹óð\ЬÍá°ú‰nVUà ¸#õÏÃ.Þ*²v -„ŽÅ\LƒFvwN~ÙSûõï86ö&@7'*¶°Ëh Ž¤*~Ú<»½W[Û'3™Ï™ÿpÁxÙz‡Ð£ÆTÜBP=줈ÉïwSëWkÙóOìÓñjìÂ:Òw§^Ɔ€ÄåtÀ²È†[ë”[S@‡ZwD ?ëcУì)«;´ÕÙjçÕA's¨2g'*Í'§»œ¼œö|9ô<ôÐÉ[¤®Í#N¼åÄí Í–:sËxÓGdì;º‚Âß‹NØîh ÝB|G+¥ð:è{á²xyTyõZ¬®F¹%.pÎûaÜE¯ÔŠÅŽnƒ®½U\ó°yRu]š ŒQBy[0_“sÑPÑD“•^ûÁ¸Í¢+É´ Å*<´z± (!v„âåsÆTMr1 ÑhÀ ‡=…j,ÚÃÞ$Áÿ<Àeh·(4 ª§ÖbOO¡9xuÛÐjg<7 3k¤û ´ƒ5q)¢1šP÷Bò źO0½«à&¡}€ÖüÉ/'hLŒ “^Öíñ$@ÌC Ö '-ðK²é#"rðEŽ† h±Ç.N"Kv¨ºï «$®ÃŠÀ»óTb  ‰w¡è‡zöa’M‘tü‡ˆ9šž2AI ¢ÿ¢òD©÷÷Ò¾¸_«{ÒèÊûo´_HhÕ*3h\6I›…ÐÆ,P¹z°w˜ªH•ƒeÂå¨c»…èZ hòðaECÞ…UÏÛ“ËKÒí*MðвÆIJ\APàå @êÝÁ{å“G)¨âQaÜïÐ/@ñ_žÂFò}ôõ÷Ö&+÷'¯P¯ÛÑEº G½`Œ2ûŒ®)' á­·º8[Ò/°ª&ì€gPrýÙ:ÞêogžüÞ§‚ê%•ù#kæLïñÕ@—ÙeFó•Iì2É|eÞÛeÞßRÆ#ËÍóhP“†T:“z ;/Ûº;Õ…€ÿrƒH9Øù§aá§,ý/Û,Õ ‚YygÃK}Ê›ñ}x]ö%¹IÈbTÃË|ºmØT# T¶}êSNó§AÙ猟ü4m§·/NzÀµôòÆO~šoü!"TÎ sÚ§>Mi`a4ð€%Áû°µ»sR/Ÿ AO¨œÞ:Ù>Ú<Þ<=]`S¿Þ™ µ‡¾U4—™L†CØαw$wÓ{_ k®g“VrÒV)­?Óù;îÞÕÖéĦÜ‘5 àÖªXcÌ’éì›·»¾„Ñ}²´:Í æH˜É×vnÌŲq?©ü©Þ7xÏ=Ã÷ˆLÊM¿l¹Å@)5wHRúí…¤æ×ü¦üçûµ‹ÂYÆÙ±+9²”¸ªÜÏJ[êìäÁÙ—ÕÊk®æi…W²ˆºŒ(fè×x4‘gvR=ÈCàþ^°›é pc¨ãŽ˜Ë¼Uiô""-¤±cœ^ÓÈ;.k ¡”}"g1o賓¤å¡ Ën½èëŒh:<©)šF§rO(IÇú0E3¡5TbN€v4^bÞX{d§”GÿådX-”­y…²pÈ‚Æ«é±yÝ– «¦¦ '”rh<”w@·cOò¸HM›ýùƒ¹õ uvÈ|Úø”Wbuz‰U(¡|ÙÑQ4"kNRšhìw–E»ƒÉ»?Œé ,g’:CŒâ1Ê ÿͪ$Òo+î0äIYm@˯¤?)"î‰ô06B |ÀçŒ@ªû 6¦ÇïÄ„Ôæ9Ê|  ¼• õF¼Ãóñ˜" ô—¡2…Äê`ç:å·x󢃷ÎÁŽSè ˆAx…[ã2l,ø íëç'[âiuͼª•ñq´!7l„h´ƒ[C£|·yºb9‰ô1`Ž`¸ì?xJ•ßKñ9 ÖŠ-p$¤É4ulH.èlû€b‘nŒÛ%I"ÐwXW\¢”ôŽ—0ÿxa%‡ˆ¦‘ˆW²ì-™}Mºõ;[ü£ UIÜaã¹Kj¿6—Þ•ÿlVþ»õV>¬T¾m‘_þj]k1ãÙ†Ú§¹§Î8sVøËtô>é­'í°Y{ê/£_?Ø8çhdJ‰¥ps6W#••#¤ *îimã“ \b£©=lÁø¯)ÈÇå ‡^ÛÍÇç›'/[›Ç/~‚Ïô|rø긱]r½n;Eh°œÏŠÚÈ÷tóˆ6~Øs‰m<[Â{‘!ð­uZîøgCègyS­K4…žu‰v°!g þ!Þ~)ábƒ}·þÚ¬LEi@ÔH§5I›äѲYª5›«u†¸FÀ††¼ëö¥ÚR¨ý:O5u–=å-7½Ò]è„"‡ìãVJ‘C*²^;“É9l‘è²ÓcG¶ÃöÜåšï}˜D>¾Î$§ñ.‡Hžá ‡hÏ£;—…³¼•‘6¢9“€ñ± Û?@Š×Ú´óî8튮Öì9г°ƒ|3‰ÆV±œn@£gš‹é³a»„ YÈŸ‹…ô4,<ê 0´0ç¸gGÞƺ(5‰uU5×ØË‘µ/¸òNÎ9cì^£å´L[C3VD¦¿ÕÅʬð$ÀìàæÏÙ…UrJl6j³ø ̨nà-iz¹*…꣰ªåãeÕÎX1rö²î?‹ej ±ŒGªl¦ž/VÔùVöƒO¸bõ‰XýZnÜÌ(é,ußô¨¹t¸Œ W}k˜6¥V<Ïž=¾ŠJÄá‰+,†Èpp|ÆLÖÖ6ìzx±^£NÕ›10¿Ö]³?ˆr­ u²TÎE¼T÷-Ž§Û?, u¾·i鎺הŽUZ(±‚ ·_ Z’3?˜S`(\H2å>À~Ú>>Ù=<°€É”û;9=NÇ‚Å ÷õüÕ‹ãí£ÃãS šN»ÀWÇ{(x+ØB´½O ©•._’°‡ž•èVŽîJÇŠI¦Ï@©"x¡$ªÊ¸‚WÆ„ˆ(…ŠÆè…’ út¥g4 ³„G„6ÝêÏ°’*/‡1»+_­c$'i“œ}ªqx°³û¢u²{ºm;`òœŽ2¹@ ¤RyàÁoðì‚°M¸ ó^ÌÜT¤‡«mÕšY j¼³Xùòr•ÄÐX·ÉØÁæÇÁ‰Ø`Õ(ý·’k šÕÍTÎ53·|–÷} lÖCì5d ¥+Ã8"ŠÂÊr8ôr«QÕR k2Zž<ô7òçAQl\—j(€ýoõX׃¾ûÉÚ…ç>Dõ—hUIãçT…ùg¦¹ >Ûød¢Jh•¬BN˜«šùÒôôõ‡ùûDªtL:ù^uüõiý˜šŽw^:Ô9C Tèþô¾{èÎ\ùfGéƒ<¯ÂY²—ÌŽøš/±ÑRÊpŠ‰¢¥&x‘U¤%=¹H?’Kö¯L ÐDpÅ Ó9£Añ¦‹Z-½³ÇxKÀú%˜…Á¸*ÄÖ¿_‰°?é$3«s W£ðRØçlu:òZÍ7¨ÛÒ¯{ .|§šÙ›[@!*YóÍœŒò†TSÝ°¢˜æþ«RÌ‹l yD2aEæWpÃk‰; Ãì<ß[©C)%V•æ!à  ’q§W/ ·ä› à·s{¾ä&©¡£¾>fUNAˆ‘¤p=2D…åw oñ:*\÷‹üv½ ‡’gPó†…d|ÅDý¥®îEÑœñ0â^G†ª˜ÄÂÊ;¯LÞY(§ºHÕ¹ó³ê¦lîrÑ4Ga7&—¼;êèHÂÉT£a’R BÚ##‰rg|55D‘¦n4ÜBvM.f㔚éu%ÆYF)ÖãtšDÙ4œìæ-€æìXI³q© 2Ü“‡O…T3h¤èð¢èD]4}ȘWèÁ›„zŠg…³)탸Ùwž¹uUçÀ™×ªȪRYd*dq\°ixÍéòº±š½KÔ£º a‡C3ã¾>ÿ Î gq! ½¾g¼CŸÐðÈù:»#¦«3YÜšÄp7ÔÎ;vôqk½ÏÆ’”“í-À†³0w÷I×GLÛáÝ%Óú4G1jèÚÑžŒFì“ 2@‰®3Úqk1³è»‘ló¯Ýs¶CsïÅB"›;+Xä!ðcRT›…l€Ž&Ú”IÔP³–’L*"2‡A–]g®šAAó®s­ØòÎý2ß­ˆMæf'CTÙÅ;K`”åÕg8H(RRІÚ7U+ýü—È"ÃÁ/Ý]¥Ö·è?á$s÷J­• Ùö9Ë:úýá(îG2Î y˜»¥e÷„ÈÍOÅÐ&O†—AÏZ$,õñf¼FÑxF}›µ¥ò¶=”:‡/Šù–o(#Ôû¨§}wèJ–Ï{³m‘ú«C×És^{8¬ûEô¦ZT¾j}ÏøeÂo QiÃWvüªsåZ/QQTý–åâ<½ì,¨¢rî›Y$¼ ²RXn] &uÉ…º©žÇQNƒÉ5©Üy®GSãvT‡=DœÖ ¾Kf:íW3H§ß•äÒ>ZÊŒ*Yæo%—lA)³Yp`pY¨Onì¼<‡~Vê#U\»âäÝ—?¬R†¡£+¥+¶H“cÂ,‹[ÑUgÄ‘4#º,L'—QODW/šj¦›ó Sžz¥”ÌBäHÊDÐÙžÙÔ µ bŠP¬æÞvO†èm7ì,£AÒëGètXPsÎ%Qp5`ÎRÙQ+¿B  )až¢b%Ñ"ÒƒIÂm­Zí/˜0±Ón–°Œ±¥‘t­]À NÍ%ÆC@‹'6!Ñz“Á„¢ Øê“z£iQ ˜\viϱÜÖ)CXjºÔíä˜S±6<ô.;|ž Ü PäÏr6$O©‰R˜ð«Fi¹iLÕ³fæ56™ ž K ™u>NG^¬à–°ñл»¡ Œ`¢¸Ì°5ÌäM›Ò)È.e¼Ÿå¡òÓ̬ÝPàÖY0¢›/S…ÏfÌ£âÙ0óg†ÊËÁ¡Ø ¯ë¨ò§ÃEƨncO583ÛFóšjÑ”ÐÙ3‘# Cš§pˆ×½ì›TWòŒœìo„šAW_((l¥\!Ž×ÓÌ«éY4ž˜`:_ ÿðrKqX¶ZZ¬ËøñV=tË•Õâ÷+¾‡‹k§Q^ruÇ ˜`#VåË{ Ë1likœeCpN ¹öÏÑÁ?‡hêˆÍFÅ) "“„ɺÔÇ.–‘îãµòPZ‹ÆÝ$ìõ’uYg è_–ÿ¦r(U$ÞeTXºÐ™œ•`|×D­R»À8ºÌø߇` ñÈœô"u¹À|÷£–€ÈD½§Åk_áÉ*\¼0ôF}¾}Iš:Δ›ù;.H!w1"#ñ€õˆÐ§,Gõ)³i’°pÎZ´‡Ÿç]‰”——–\‡ôüÇ.Cªræ*”9Ì"TEÔ”ï»9°Ùœ‹0›yÚ2äœ^ˆ fúR”aÙìÙvÖ¢ü~ûj´+ºïz´aü+’áOY“æcfUÊY{ÀºTÀsV¦;ü6ïꔹyÝÉÑ“+T¾ý±kTV:s•ê ×Fñ;tu1b2šGϨ¬£=áMò“ uÙ¬eA¶¥!X%a¶Éàð„¿Xyщæñîk‘ν‰i©¤~t ˆ†©Hú}àW8 Äñø#º%䞣‡7(÷k'äS¡Í^e¡ó¤£Àtâ0!ãÇxôNHÓ&ÎÊESB;²A7¹Jl( „mv£îBÈâet-8ùéX6`Ò>O«pV*&´ àbO†¢º]¼ì><©­q80ÜfR.IñBYþônô5ÞöƒÁ8jˆjºÒó)’»AO(hù jw÷MÁjrY%BC‘ S8)u:åùM}쵎 Y¬[Rõîç¢'ÏO¶*:Jð·8î™V,½CÁ×îÁÉéæÞž’zY»7ƾR2¶{½ÿ{g@áv;ž ØœwÆ8W0øhd„ŒüB‹¤½çHò¨lJ*UO›|àÆn «5 âÕþ­½i7ÞÖP© ­t|1A¿éOn²YZ ˆÔ¤‰“5úUa"SŠ6‡'üYN™þLÍPKµq¤'69‡';«$· {v’a?¹¸lZDgª!„ª­†°~ÌÔmànG¨ƒ+½¥¼Çà‡h!Nå×é¹7o{‡Wè›èAíÕÁ£UD73´ñ»“þòHÖ†qÀ%¹æþ¬9ÜÅõ šÑïsÑHÚÈ"AÅ|ß;ŬXî{ ì¿CR“…uo•J{F P®fÃ-è¡Y'± /lšQL7,óåÕý7S©H6¥¯ÏºL‘e9Ž¬ôi„ª üW[ K£:ëA¦ûž¸"°ƒBs¡Ÿ·qÁYãSöz_’Pub±KxVÌ)X›Ègô0/œÃâÑxYó.Ƙ@¨‹PI-Yï.ø$…LVªÌuk¢/J–µ21ÈØ+JcM¬ʈ»–ßv®ËYaþYž ¡;t?±Û nWÄ ¬™¨kö™{6¾=»×éUñ郫•NÌ p[PSnôj@ˆµ~ ãmóŸçèF„ƒ{}xŒ*Ð¥OÈ®í¢®c4x—ØçÂEä&Ç#pžLäHûVÛòMœ,î¨%×»‘J«ûÅ2é“ïå”=iï:E9éÖ’[›§›N9L°K¡“§gOŸú÷‘ù(—,<·UÐOp0˜%ºµ¬Ãojþy2H‚nhÝõÑÔÉøz#X*î Q°.û‘ðS ‡‡GwÖ»"uÁ9x– €Î¾ŠGÍ^·î{>³uò“Ú÷Ô,4›Åæ?š>ª‰`Ö·’iJKEdç·MðÁ8G4’ õ˜_uS4n©^‘úQ¾êçVë!ë&| z>ßÆ"†3±ŠXçç!¼R¿¢\>žå”[TÚÇ{( §]Ù“ J9Ú4þÙ–(ç‚Çoú¨œ±Áø —`@ËhA4êˆ â:uP‘>œÔ)/ê–pYlÆRx¡=°'À$“2ñm=Þ¢™£RO7d%#~‰ûNШN^g™ÅDQÇ´4ì'¯*¬ è`¸,¨Jä,0›× uqib=¯ÅpÆ•½±Ñü°n‰BÀm³3ÏÕY-–)ïkK;f£uÔ‰˜+«¾9ª“5¨-Û© õL_‹ ¦,(.Æ*ævª8-F$va·+aDä„œtâ.EgÌ+©»(M‘£w|Iji!ê.›£ H–…2Ð"I-†’A“$tTªÈ·'–Õ …”ØâÑ&¥“¥j%¶\"8–å /uØžÚèªC +ÚäA…f%pDš€HVQC8µÀyº\0J”21®:­ÀÑ•#VŒV#‚Glj5`ì ðv£]¡ó”i^C„rçêãGuŽàÅP õ`Y5kE ä¢ø÷ÄЩAëÖÀ]r7l®é­Á%OÕ GÙwz] 2”R™Û­$(Þ%"XcbOòçäo[UÐø©ùCùZFjgžç&ë¯óÆòÕI¨¤˜0Ö2&°oÙAÈBkVÏdJGô‡ŒœµVDmg¼Z²©4Åâ†Þ¶Ñ¸FFîˆTQkuêHéPèKŠ6ˆý:ä…XR³+J‚”l¸Å¿Ñ-G*HM¨—+x&²!Í-²+w®’üúTÉlL“RKF2,› ÜùHÄGÚÛd¿UM7GŶž³9Íâ?REg¶g‹[‚žäšÈï‘Y}®¥#døpFÂtYù.BŠÕÅC̨´º¥ÓFÝOjÀHßÖþñÚÅFRÛ`)|±Vó½)-¶õ”§Éö¥ÎrQWT8CfbûzˆôÓºõ’.¸5O„g(Â/¥­w¦"é*Å:äd‘3f}×pfÛß=9Ù=x!jh0kÕ¤8NCU! Ç"X“R/4‹ˆêB ;S¬FAh¨ggKÇrÊå”*˜@â¤"KˆEzû¸>åÈPqí*½P” E¥%•:W¦þZú…ý–¬ýØ×Mí¨8•ã.ºËÚ“/!øÖ½È8ŽéÎ -1Uoq4?ÔRÆåoO²9B>lžm•O3e¾=gF3Ówç:¿l~Ñ‚5ÝH¨ùŠµ¢A@·¤…™0³‹DönIͧwOI}‡PP÷®ÀHU„ °Ñ¿Œ¯Â÷°G©¢ìŒKräµ0V ª–ÊÜm1Þa…U’Ù——Å$ËÌ6P½M²åª ÃËx O\>:>8òcœ>CU¨&>šô¤î¢ºó ‘ º“;ˆõÔ¦]Õ`Ý·ìx·¯Ñ+èØ:²_¡_θ+;V±O«K÷:˲Ÿ?½ùóÀG”\þÒëüõ ¿<_æQR¸õÙ°Êج¢ÛLoú¬ß}éZ¤–­LûOÛ"Õ Ä¾øcÏ|÷W8)~Øßüq»‚ÂÈO¸G$X:L*Í¡q2½°³„¥…‰•™bâÀƒs ²f™f|UÖ€ò$µ7¿Zj-´×°# Z³ðØÑUždîÕÄA%ñwß5¥ËW¾Å®³­@réÁž°î-ü‹ºàÿë_ÿúûßÿ^—cPçW_y‹]¤àvb<¢ ÐáÁ’$úÍêÛu±A7pa :LGÁ€6áÎ8QšÑgÎØ×{T‹K)ÚÈþP–“Òxå¸mÆXâ‰ÂàÏSd«#Hêö‘dß,Bâ›Äîfq68ulý×ï-7ÀpÚ>máxÖŸ•lUP ¿öìô%í¨+ªckö<æÌ2Éš¸uè›}—ÕBOhxUÕ‰Çõªu…å|hqÀÍ\àÚÅ¡Zí:‡ó©à5DBפÀ8 ìKˆœ³Å9[”3ˉrLPÊI±®s mаð)>ç3ÄÀ\–Äæ~kk{góÕÞ)z£~~x²{úK}…½! â)ßWÿ§©ß ‹ñ©–CÊ@{%®3Zb²T‹ µt¡{óXz0üÓãW€ãKÏ7‹K?•J<¬H–ð¸J“¼Ÿê«dƒÖ‰£1Òâ+yÕ£—‡¿¬ õ͇½Aw´OU†˜£s¤òb–Ä­Ù±w_vðY‘Ð|eÙÆ<…RT ¶ÿT÷qv|O8¸©yk2Êq£²Å¼,çT°AÛÍ‚ë¬Y:kt>Lk£1n{²Š°(¿öÍJ\)Zã—tÂùÙ‘£-ɼFpSr—©~¶:©AÕ}]üÊ·E&‡ ®!ŒJ<ìªÏdp6Œ£ñÒ@•281I×ýu߉G UÈ€uŸbþÍÀD°¢Ü^ÚMÈKγYæ«Hñ cEl6ö›{°õȧJ踥‘ò)@U¹ W¡¶Uï§Â'hÝæ«ÓCÔÅDò1ˆô?¥‹HVE=N)‚UñËíÍ­íc ‡_¦@b§ËTëÛ=Ø9”.>æª1€ZìvbŒ8ç2ñ*qP:´ÜŠz€¨@Jþ·¤@(FÛhdˆÕê·ÕkÒT‰FÐaí–¡ÜŽr–ŽÑDvÐYÆ%VÉß]ŽÇÃõZ E'Õ‹Á¤.(V00GµËq¿WSãT[[Y]«¬ü³ÖO.Vàßj?ÿ «O%b[èØoIŠ”JdÎý3ã Ž¨K¸D˜›(('K¨:5ŒadÏ{ïtóHtFb·Dz·!)’“ZfX‡Õʇ2†¶ ×zÜ$2ìö%ÊeÏ+YrÃüžÅF£›ê”ƒÈD*4ßÔŸ~‘ÝY82¦ñ8*0ڹ摱ܪ#tá È)Ò4 dŸ Ϩ™Ì-Ì<·L-UnC¼:ÙníoîœÂÛÇ­ýím•½ÝËE——‹…!÷º@É—~LÉ£ÆQË;rò¥ä©¯-’Gå¤ïlîÀápQ‹6r â÷ieå€ÐÇz1¯¸tM-=ßò'©[!ÉUŠ”<à²ài),ûQbÕÛÚ>æ¾Î§![¦û Ø_TÁ1å>íV§‘[æeÀΠ²òM"»¼Üm ¾‚©¯-´crg'»aùQž,2Ò<¢ÚäŠ4˜•ÈT 9`,‹ÿAk66\±”û¾þ|’ñMvU™r’¡$Œ·\TßZÞYý$7âŒõÂbÞÉÛŽ ¼:êxJ ¯[#iÛk.‹¨6 ¡êqgUÍr^”Ák¿‹ÃJ&U|œ‰pŽ¡¥A§!• zŠã ãJŸ„aú:I Xu]ÓïºV°R§ SÐÔÓÙ”óLWCvwå¯L•Âê6ôÒ3¾(ÅA|E½Gûâ¼Þ[#L=d‰»h11ÌzTÕ Ô(ùf˜´ÒüÆ+‚éýn׫¦ïÂî~¡Y¡d­Q€ÞzV,gmìr³š!­î'ÂMs/‡‹[Íô› èÁ|о© Î o’³ö+S ¥ ̽gå”Ýpl™ ×3²²U“eù‡lÈM¹êebÄÖ@V]‘4O݈ͰîïOnNîׯ·!~Ël>V&Þrì|Œå¿ƒ}ÒE»ý(ÖIç3Ó…j4AªÑÈÕ„j4êôí‹Ôt=(£é¾° ¿/ *Ü>L9³(QJ™OsþOšs‘W~îòÊÏÀüßZ:à¦Ú”øÑæ#‹6¥ï#;„öóO2©C®Sú3ZKW}Z§f¦ö§ýkǶ|Ã:ÐÐêC L†P)¾y&µÊzñ…Oä…Ôß;á8ˆz‰¶€#â÷H ɲ#"mkV;eõg©N5V½ûì#V‹¥þ2 »Í/…[w·-IcmŠ`<äTÞ‹ÊO¢ò›|—t§ gt£”àd½Ej.°Tai©È¹ Êóm=ßžñOcuRês½)³Kûxç›ùDˆ¦Ìæõ÷B³Ðœ9dE+7ê¹H}÷IRÔ%éóxF?KbÍx8„â½’íëÅìÕŠ`-BBžVW‚¦‡ü3c¨ˆq²)³NˆšË²ÂÑÿÕ•ß|¨°Û²ªu½íDÙ5…¤| à×T_æDÆ&,¢: ÷\mIZ¢!º“4á“$²ªeÒ¯¢mü¬^Hí¯VÆè6Vö* GÍó¢ÁØC\±ôé6â GÓ€ª¼OÊ&gÍ7[¤¡Iû “(“˜Ê#ÑÛ$ˆ JQ%ñoµsòË><Â,Î1Ý ŸŽnl3§0¬ƒ6©Ä̉.£Eé(¼@ã-†Èñ}؇±4QèDÁÅ€ÃûP4…ƒ «£ž'j.Þñ„ «U¢~éB²ÏšGÅ;§˜«ÅÉŠQ-i÷ãx.‘ßìв0de…o~o˵š¦"ÌJãP«bâL­cryÒ V_›Hrþ‚¿žI“·Ìº¿£>ƒR´’£/ ­qˆ0ê Äò;ûAÐê[@ìª×í¸Û¥§q'¡ßývÎù;">œŸËŸ úíCú…ƒK©|1ÿ=ÿjD4U£iDå‹n]Á¸}§•ÈdÀÊIÒÈ4¥·çì/GÞÎ!M§ )Jþ»C딶H¶³ˆ•µêêoEZÉ#…Ô´ ~αO{± §Xç?.³¯·«(‘fQìUÝ©üöëííק½›ûl%hó‹ªm$ŠÌ¡>Ú9í|‰8П.eØbË6Q™æ]Æ£q¥Ú“h,-óp\pqiú&&¶Çž”êÔ:^„Ê@A£ºã.ñO_¥Þ‚\¦o‚ó·DmJqGKôq¨”9¤Ù=–Åùd, zήh؆Ñà¡d;¡1Jï†=éW½:Æ(bP-c§† ÊV&Ø‘Eù¼÷I7LpK;[ý,¼ŽìQ_þ›_«oËÍ¥fµZn–€bcEî+Öç`9T0Þ )Ðî$ 1¢±t,Ð;éº<³Œé7C¨Ã£ÈaK/I£7ȳ  ÷‚‰ÿµ,c†QQ•Ñ«#´ БE„A Ù9DKo#42UŘphXœ`/ŽßAkF“îøfݾâ:ïƒÁírã.Õ­ re¨µô„át™C¢s秆ÄöTxÖ½b—ô–ý<5?Þ íyÜ“vö8†‘Ÿ`ˆ•t (ź:¢Ð6ÿkí£¨ù¹ªÔ¨»ÿ'ŸÿùOQ°x[rzf¡&÷9ÞWÔq‹®»øØ™v–T¤Èb®dDÀ™âÊ9 8 á½ILg²r$•®XM¹,œ¥£b8UFÓ˜z[YßÐ)bÓç„bÎÙâ¾ÖTL´˜{W8u›U^™´ 8—ûKòp"ï¶ÛçÀg‰3û°áÓIM'ù_çLñûbé*ìõ€=;öè=Î\ ø699pÁH—)* Kæ7WÑ`™Â"šÈÑï"m0ÚjZ,EÕ°ŠÁ·ºl„ëB/‘wĹù¸"Br°(ÎF}?Ãvå¦Ì±IJŠ>w^LØLÒ=Ø)n·Î]y·¦îŸ”Sm[@œ1²Y.åXV®¨ÇqhqeÝgk#—ˆ¶ˆ)Ÿ®Þo°¡œÛû#{N »”d‰?©ýÁÚ7øûc«•åwɸÅÕËïSâ«Ý½mQîqé²…Ä‚ >–EáªPô’ò­.ÏìR·„ «Ë‘ ñ”væ†e]N­Ú„QŸåôæÔ¥3ÁHÕþ Cç¼Ñd½Æ ¨10Úý¢ÙåÑ…I¶È“8´™ú‡ˆ®Z^&\®ð*¿`n „üa®_Õ/»îï!>&™ºZ¿ZË¥*¾œ¿Øxcþ`&ç“uW‘ÂyŽ2­o@g¬:ž³ÏCã9 Gél²|ásÚ.ÑE‹>Ñt,ÇÒ»L?TîelêÅ¡šg• ÞŸuíS«¬Þ×ejfR£’ó}Ö^9åTdoÈáØ·°-eýsŸŽìBÓôh0Ïõ|ÿQ·Y©é‰­ÇóÿÉ;ïI¤ü«ÞÊþi§¾i'#wFîz6ÚøGæ8¤ÎB¼rÏBpª6—äAÈŽÔ“øù«Igž¥l:“>L=ʪZ´ç'{ ¹Ÿsm ä”ó”ùHdóðù¿­sDê/ѦÈßÎÛ¸DèÆLjçgæ§A˜¶ ¸~4>—Ý`1êà³hµ VK[¸\ ˜o€DÝ»ª4¶‹™ªª¾Æ7«ƒi#¶—÷Ô'vb¦Ptºú(Ng§alް׋©Š¼‡ ¶ j ‚g3¥ü»Rv9/ {˜ðUjXbé{z©?ðݽQÔ{ÔÈTù÷!q ©È–ˆÊ<ç]·ÀLýâv»uqÏ`~²›íÖÐV·\ðÛ)ž¼UtrÉsAª|ìrÜ V©ý#Y°;.&»í–¨H?VŸgì•Ÿ™ÁìÄz μ,üoš–‡R²?»¼˜–@Mõ˜M!¤Î÷”ÌÌ¥‡épŠŠº„Ð!ÂV )"lêyÁúÚn”ƒ—¢r¸æèn»¤Ä8c˜b>¸»ŸÝ]» ÎR×t¬4”ÅîÉ¡h|óímŠÞFæÛß|{oBï‚![f5—l³óØ‚ô`t’ôáz2M€dzÛ‚ÚY±–Ìâ^/¾"¾*LˆOLÆqºJ6¬ÇñuõŸ¾ñ"ZMdíìùÙ¨rgB)¼KåQ;Aé}I,Y9ËËÂj¾BÉÒ†‡oQf=‰r(–†ðAº@ä´òeTS´ÄOÓ½á›è-’>†¡hÉEI½Èú–5ÐeT$.4NJ°š÷A ã%ˆ÷ò Æbéýò¯€/¨ð Æ¿ Ø’ÌŽsµô¾d‘æÛ‡cx²#žVWDü&Úmþ“:<ÆA%·š=ÔiªlœìZNáñ´ipº“A[ykÇã›!*åBÉN_¬$…‡-¿yýò¥/.Ãkê[ÐF]"˜B¼:'¤>}z&Ê]*ºß±Â.ï&¨ ?ž ‚qØ»Y¦;WÔ”#¡ˆYÒT?:Dpá_ûÔÁ«hÀw# ì² uPü¤@©«¡WW##/Pÿѱ0lLFQ¯ÙŸeqÎÉà ¡bLBEõB]LW–Ê¥ÛÉ ýU”…0ºhox¼¼ßH1Rê&Q,a<È°,VèþŸß¬¼(–r>¯šÏ80S1)C*Áw•ßzÁà¢÷¾WÊ[ƒ•À<òºhz •M`×*›¨lµ^½zÝ:9|uÜØ.@âë6&¶¶_Ÿn`ÄŸ“V«ÀzŸÊºNn4Ä&@ÕiÈw/Ž·/ çŽ|™ðIÛ1$ÇÞºF]9×ælÊõ´4¥’£Cð¢Øl´›—Û­Ÿ6÷¤H7·*^ó~r¿º ;YM?çò,>„~ݳ¶É@‡(I×–údj“΂¥¹»Èûµ%o(g2º2‡j @S„Y$Ðþlñˆ…¶qeg´éÎ=L^3 ·ú1¹‡Nã.}Ç”eNÎl ÓâVj”lÅŸÿ¥êØíkÏ6¤©6z—°Îq%$ËH«Õ„‚‰£Y¥‚;š/Ú‰Ñ8€˜¶­Ãev›¯íÔÅø Cš(]tä…¨¼Q4…9˜%´„`Šl½" ˆ#ª1k¹2£/sPC >„µÜ°‰—T–r2³!Å^´‰ö[n¡«bmC¹R¡>ßÇÈ­"@©­e±fmUÚv|éŽKXPݺ¥¯Ý¦´mÚ5°ב}ÑVBBÚ4vŽÊ8ÁÚ í¶8î 0x“Ñ$Êg|j|Y~¨®­ÌM»4šÏÙìË ;š.ÀŒ<$„©ÕŽ)KS9Ò"”lž”âºcˆÙ´[â-Ù:hÓÂM²’h¢!¹…Â5²ûz{Ï[h"4ŠñpCãÇ ™íùD¹`âó‘ xó¬eXK#fnñ2l xx8!+$ eSô ‚pT^½/ð8²…AÒ!™(Z¿…Œ¹ºÂ WÀô,3¤€íf¨ ÆbŠó× ÍâÒ8¶dˆÑšbÿ ¹Ñ(À¼c_{±WYŠÒïæ_z[öÐg[º â…¢¾£$ ~ŸBÆ¿ ïQ¤zflfÓ MÛ¼€€ëBQ˜˜†£`àNPÐHÆ„(؈pEE:p½²qP<ØŸÎ)d-ॵ³$v 6½CmŒ'u%q[œ €ÀÑ`÷i¬Iz—zµ‘»  ømäÝão²Ž8‡áUzâÒ(ŽÑý€Åñò¨òê5µí¢Ý–Ñjq_Ê6%^o´éFGø[pœ«èMÒ¯ìCªA%¢0”þ ì˜À±U¨Jª:²Î80JÊÙS‰‹¢Q@ãLñ€yTU¥±=ˆW&îM$‰“?â›/^€1pLÈ_lQ{èÎgºíN¶a?‡Ò9ÝÃhòu? ltd+Jn´ 1,›Îc2&+ï„£lŽQc Ãa/jË0Œz9 0(Iéÿ â|NG“gOý%jØ„] #ò´$`ZˆMQ¬ÆJƒ(a·‹ ˆ»r» ß,‚Ax²NÎkª’»<žŒÈ é.[Pû}寇Ž 8“ÂCçiÖhæZç€?Ž/É#’Ž×È ¡;CÍ“Ê€”OËÍ¥7Aå?›•ÿ^©|û¶Ü,•Šµæjmè‹ïDU…99S^8Ì(†vM‚ž Ë.x ’†‰‚ |ƒêV¢‚ñO›öS)‡DnR'‡Uj$C)ºÀ¦º±aœí=DäH×´å÷1j¢=˧k¸\ £½ YR Eô؈I¡u‘˜´ãÞ¤?߬ˆ%ª¦Y"È•c> ôWz”K›#µ]FíK̲«B@áF/ÝGç“ÊPð…Yè1‰r™Tâð„@Ø –…´ÁÔúæýàF2¬;õ›/ú2èfÈŒOÚ“‘¡S5Š#p^ª ò)Q«a®PÂii›xÌ~˜­5–«mí£Jqùâ‰x*¾Ïô\ª L‹N¦q2ö‹‘_½ÄPL¹@9¦;Ŭuªö"‚bò ’°\×úºZå•rÃÜCWWWDí<Ԓ˪Ó08ÙñQ®ùÙŠ(«ä«õÉàƒàéoéÕé“Ó‘£Øþd…æ²½‘R|%t¿Òf{+¿û:4s‚»²¼ö)t‚䲟Œ;dÙÀ0¤°Ø^¼ÆÍ7ÂËQøÛšvTæ RU×æ¶ê+¶›ã¦öF¬ûÛOÞ·ÿ)>òo?¹Iø9J&Aò ~HÍ‹åkù ‹Qü×c!îâ!â3aA̽‘·jG)ºß„Z˜®Çxºy\{dé< 1†Ü¿/Èk¯"ôÄM =}`L…`WwvH†¬m†>êñ¦F²Âä©XœÆã4¶ Bi‚§’´?2˜?Ù™ºÆr-^à Ò]@mÉœÔÕ:1Ùe”ÇzŠN‰q˜ûé¾éÂÅ“—Û{{†‡PìÎ¥è¹- ù^GÓK¹ž‚SŠÊu š¤§l…åC9ÎêŒâÏîQ\Ü ÚÑ2Ý ‚éBŽÈØiC#œ"ãv"Âj ¹ž&F”Fsàrt`‡—‡†0Ði*@Éââ&9ÞÏt‡[âì(ì b]|óz£‚MkP´ ¼« T#è0ÆNZ:X.}¹QÕ%F‚Ä~+*ûGËÔ½VWhGùgu•´ ñzx]˜uoÙ5·¢º¸Îõ’Ã(n lTþ†žp⋼„Ê Ò ´äÁZôMuevÍ<ëV}G¾ÛeC_—hDýTSÞÍ>~´¢pœ›½ä.…4Ú‹‰4ÏC‘ ](‡"Ÿ«ÓμJ[fÞ£tžx_yã̦H o-CÒ˜FckûˆBkò:Gq£>Zw¤·Ç}$ògy¨™§‰ud`žØ1+[ÝWì ªÈ‘nj&‚dN!Ž$™WŽý[z‹â¹Vc ³^DÜhô–o à Y†$IØÇö‰W9{ùÐhlž8Nz€UÂ4Ò£²3•âTNW¯Ø÷mžüïømž|ù}ù}ùýßùÍ\ퟣÐï‹„î‹„î‹„î‹„î‹„î‹„î‹„î‹„î‹„î‹„î‹„î%t³O¿§ŒnŽ³Èƒ¥t3ë˜*§»µ””ÔmžL•ÕÍñhÒº[:K^Es%v>[f§ æHítY–Ûƒu6¼êœ)—8‚}á,”ïhÑ ƒëìEç$Çp£m`Fzüd’G*¢¡dÌšXyóìÖ=÷†º¶aŒàTµ$7[÷תO«Ï|™: §±“½1ªk³mŒÔ™ä¤jrIòO@‡¤`œM$¹ã@eIÉ["‡TÐ`Ã#Œ[ÁfQ:Lt”aÆ^ëð£[œÛἇõÂY±Ù|Û,ÕšM8§_øX÷ FmCQÇ9 ™µêÄ4LTÞøÍ'O¨€‰xVäZskÈV€íÂ,Ñx¢¬k;a/¸Aö4 bdÍìjÒ†˜ûçFWŒB"ÝS»N_÷Z„[ªŒÕ&ó¯XS¿÷nT ¢&¨*9-=~Ó÷ñ¬š^§×¼£š‡?ÃI㢟Ÿ³M¤@ßMP ÁfŒ»¾7ˆ[˜ÃêeûV¦*¶/ë~óùçsuEü›÷ç–ÏœçôËø n8B£=‰õ3DçyÙ¡9°H{9ƒŒ7£ÄHŠÅ¢`‡(ÐGäÏ^ú$®Eó×gKDe„ÂßÊ@ Ÿ-½cŸ!Ñ~ ©@ë‰ûUÅìB4&™R…×”n¤s<ÍVAß2úW »âïÉ=b±æ@o(r‘q0´A1R <ìöÎåéTšÙrø[* Ïîî ø ƒ.É|4‡ùî»ÖÞ)ÖÞB£•âªg½â&ôI7. ‘<õÃìÑšö‰ä³`| *óphJþ œ3QüJ¢…,qª.Œ%¶õ²p¡€vÙ,T Úóx´Ê¥»[ÌqÉôÞeRͥݻ ÀÜJdºmx÷`öÒÀe’cØçþ»Ÿc‡€¢žé}| §û6‘éÿs@˜êæ!_¶N¶·îwafþ¡¹ÙÔ“Zpû¿Úùmÿj2J;›§¥­âŸ–¼Õªœ é[?è™wéVG‹6…±Þ”lB"cN}ûío–õZ¢Ž@¬*7”%JÙòç6†Ø  ªÆ½E±^´¢0ÚêÄCÈ7R6b-ÇO( ;›·¨@($:‡]-Ø6÷·+{»'§ýÏ‹«ªBïâÐ]À=I÷‹»*çV••ër"Ÿª¹‘Z ×ó¼rh DpVFv'öèrNE5ÂgŒ- ݲv-ò ‘ªÙTÄ..ÊP’Nîz¬§JfQfh.)ãúŠ»fWVמ<ýúÙ?¿ùV|oœ‡G(¾œ[7Ùq·r2¥Þ,ãþǺÿ^¸©"] ß°N;è¥bßút5’ÍDëtŽˆö[Än*Þ¸«ú£%èDÝ®HeNJɾœâŒhÀ–£¹©šñ•XUaxhR°wÀ8‘MîÊŘI±žÜ~p]Yù”˜=§0d?T øÐ&.Ó™æ])èÙÎÃ1ŠÝ5©›\Ù•†­¨ëVz–ÌdQ¬®”—Ö~]])‘[ ºKŽxב„a?aÿ•° ¤øÙ„øv{½º’ õ‰Ai{QüÖÜ8Ž†õn,咙Ţ«Oìû­™Q‘SÜA'¼óÌø±ˆ¡me͘Š ëø÷tž—ü4A`o{©4Uu½ ŠÒÒ2b¶óyŠíÿ›LEøÈüÄö#1ÛósÛc)¶syŠí;1Û)ò¾í²Ûm¾b{.ÆBŽ ç.þ•8ˆí?†…ÈG²¼õ÷á"¶/6bûn|Dø»2<­¼-+!îÆ*ÓÇŶËRlgyŠí‡1Ý9˜Šî­LÅÎÙ ?8/·}ÃY쨔9‹‡±Ø™ÅXìä3;ÿ7‹î#3;ÄXìÌÏXì<Œ±ØÉe,vîÄXì¤hþŽËXìüµ‹¹ 9&<[®bçá*ò1,oñýE¸Šß‹«Ø¹WÑý]¹ žVÞ“‘«Ø¹«Øq¹Š,W±£¸Š””'ƒrã¸x9ÿ¡UÞ|+Ôì©\ &BÔF'5sK/«øs ÿÆV¯c[}[læ€%Y/ZY7¸<ÌW€È´gX™ìèDv2‡ùòäþTïut{ Äø(–q4÷ 2¡µq…´t*X´‚ÅPžº…jW8|Uï ¶«€”5"ù°œÉ—¹™M™Xa´V©\)WúPòJ*/ROzaÀÍ š åF£(¸¥Ïâei*9ÂŒ$‚ xŠêàб«ÝìˆpK`èÆ€á7WV¿öÏWçsÂ…¤u%)™Ù›MŽ œ'qCâÉ<±‰Af ˜ÍâÌTº;Q“k]‡Ã<,A3JfÁÌ q3ËeåUrÚÐѼd6ïEó§.`îq–sW/·)É,Y^lˆSÖWþÊÒèl:#c,(ùBö;ÅPç­{1203Øš›ƒfÀÞ¨³ÙªJõüd«‚æ­û'´Ã6â\úú!§!ˆƒ~é–ír> Sñ ÉÁÁþ÷Q¤!ûöÁc6ªº”í`¿Å-’7è·Æq‹ºY'©ÛµàGןýtÕn†‚eöH¾‚È4…Îö™ª†°ÀJƒ~A¹™¡S˸5î!íøn^½÷ÏË?är‚NâívBÎCÂ^×Ià—Iûœ|‹XBÌ\~cŽCîa tSþˆëà/)V„³ÈB>_£§â„¸Œ±c¡V±Ðf§£Â„ûxF\ýÍÇ}ŽÞP„ý` ã$Ó©U¹ÓR‡=´!_G(*ZOÙµ‹Âó‚2)Ç<Ê4I™‰KÃHsb‰È$=À =êØ1åÀþÉ/üpÚf A^í-‹ýhðâgOQ LDÑUØŽo¼>z¶brè´ ¹ˆDçA§E.Œª,¹Z¸Êe*ÇD)?¤¦­òœ°V•‘bFÒ’õa”‰j/”í,L¿weï© ­4&f)½UP!†–2°5|ä–ãS¦qô³ƒtË0J‘ÊÁ0¦W<,ðw«j®œ¹µlÑ1Ô  Ÿ€’‘ÌÓåHKvK†¤$ýìÖCñ¦è]nÌÉ; TÙÏÛà'ˆý„ö‰Ý<ž:a¦Ñ1›×çßœ%/¿­§ ;쟟¼û çHÓvMóÕ‰£øg7—¦¿8êÎ'çlEíUýEàHåïlË$‹fo_“þèb5½5l½Ú?z¾{`œo{Òq³vÝÔ•l( “'*øZ0÷‹bûÍõÇZ]Å£ž‘ÒUè# ¹çCbYª3óü#6ÓK7SS@m`K±¾zqí¾!‘%„ÛÂËl3CËzÄk7”¤üV7¹æÀªäO´êºã•&Ù̽ž4ך8ε¦}¥7ZS°Ñ½L›9|ìšÙ ‚L“l¢y3ïJ$QS--f[ïÍFŽ»“C9)Bh¥ÿ®'^Ï%Ù]ÊÜk±¨Ì YîÂëYVßç¤c„k·Ò°‡­ÏJ9#ö´Ê—K±Ü9J—øB½¦S¯œ‘û¼ˆVjùMkº7ÆÜïÊÕB¤œûVçëïNÒ¦u1šÙsü ¦²Öŵ… zê× 6'Çg®ö(N”ß#ô÷¥·8tF^»¼›0Y/yw÷5Ä÷GT@Êý%n¡ ‰JW›ãQ4ì…ã[Ý ÝàÚÆ'ÏíÊØ´Íw=u‹oëLm ¢’Üôϱ•Ë0À(··ØH4Þ8ÜÙÑ·–, ³àº*Ì]w¿Ëþp‹n¬ó±#³NøÈ‘îª!fx„„ÃSÿÞB=’qØ’7[Âxœá¨´gÙEÞRršønÐoé<÷Û•²pê…=èEçm j gÒµœv[^·Ãäëk+++âü½šk'Õç“nW$&J=©3!/£èÎx°C÷®ÛètU^Ó‡#<C¾“Ù•x¤\äK÷ãJ#‘œäXm@HÇçÒvî¬ÔW×Ö¾ùfCê„®ýHÒyŠÇ1Š..ÇJ~/=¦¯ÀXÐ=æËɨclÄÌ”òåª]³Q´¡>ˆa\ûÐÆ1‡¹Ç”„Qzˆ$7oD×púDe/4ЫË`œÄKdFÇ+«VïÚ7WÑ…ó|aíð¢Ý¶ÑèçhðíumÛî/bQ‚hT©ÐOÚˆ _üŽƒw¡ê1ê×ä{Ì1+t,•1£ÃA>_>GA¯w£ºýs 25CØž»´÷<t½ÀÒ FrÍtFÁð3½|éŽÂð<éàã ˧xð±äF¯H€@ ùΈŒßO¾y¬ò²Žitq/z‡ØÝŒŽ¤T»®E-¡À7I{ÜËQÖJ÷èÌÎgäwÀòUÖ@&ÖŠ4z‚¯ˆïZCªÌ”Z´×¹|0ϾþúɳŒú#£èpä-’Á€QJ\¥þM¼ÜétЃ^Ð aWûºÜšÒNôUª˜ÉÔGѬ‰§g÷.\OÎ,¬!Z]ëùÿ9äØO¸ˆ…‡mwíÙÚêÓ§„¯—Á¨Ó¦`ZïÊêX¢È0ÐûÒ¬}íÛgÏV¾±Z'kö…öZ²×3Óڭ+ÂÜÕ€·FUñ#Gm¿{b7ÄQ/L jÅ7”Ir'D‡°tvµ‘‚P<D“Q¨9…·Hµøe´ˆu +Z€Q-Þö0H ¶Ÿ.á«S„wcµçFmƲ]}‚åªt³[Ú‘ÑÜí<„íMQ–G“o@èMÄ+gòÏž|óÔŠ¥“»t©çÎÚbaI*‡¨ü†ìY{Ê XzˆB”WùJ?w÷ST¥ ª{R]{ÿuy&’­¬=]Y± Ý$P¥6íøë÷Ïè ’žV×&W ûÞ1 ¨Ÿ‘5Éæñ‹ÖþækQ Çm TPkw«Z2ž BÇlöÖT*ÌCè¡J(©RR«–ß,ˆ·µš?'Az²öÏgßd†jæ-]@× cª«¨Æ/fõ+NA{âÕ·5°c„p¤‚žXWâébs Î\DðdÐÛE±\„Åú¸a1GÈÁŸ‡]´¿¢0yx[.ÄeL¨hlt{±ú£t’l˜}wu&ã`¤KäzÿßØÎGí“VÑ<[Y»Š+R/~ ßJñCãð`g÷E‹_eЦOŸt³w»ÎY!nÄÉas%B+“ÐÇkp 0t¤d^™Y¥áÒ RgTR‰¤fåeÐë*>1h#ÏšÊÎú& ë—ø°'@cªŽUÆnïë³pð^ùYÍÇZñ ðuA{”%?Îù…Ðï÷Ù°$ ®¯þ“‘<Â+ªÕÚšØn͸e¢'ì©ŒrFh×xö)F¾£x²úrÞŒvŠœŒuO†;GuŽ%ãŒGA¬‹Bµ\`ãZ/ÓN‰Ù›èbu#˜°±b º†ÜÓN;h–bÝÛ¨oáN’ ‡þ ÖŒ¤K¼S„jmAÏ=Õbbvôå±Uƒb­cŽã…Ù¤A¥À{_à¥MÙGó²ñEÞïGþPÎÞ¾Ä8oBÓàfAR²x\”x:Ñ ÝØÚËûΕª—_õ44ù#hìm ™Ací…ã ² ³˜_×CPÙ4•3Ù‚ʤk¸·¥ìQ(8s/Ã’ä6]ÅÛÊOCÖ^§Å¹[htðURݯŒü‡(¸à¦LE6õÏnGnN¹¬Äò:+(ˆ°{dw(l8'{A£¦LLƒ#³‡J†9I|kýé{ßœë»!,ô5žmýÿ·Œcöa¤|¹ç,yë‘x+<èài£!ðïÎÞæ‹8 A:½è\¯zjJ‡Sò£{ šÛ —žËc¶nrÚœ*%½æûè*Oõ™é.>ÿ7ê½=‚Ö²„”«¯,¿ÕM®/:ÊÓu”ÍhMÃÇÏF[Y5µ˜m¾7;î¾'hÔImVú﬜¶Èv:mF¡ÇG Ê-èçó¤/Î0<šmÄ,Zã|ºÄºs›m„¹ÏŽØ¤–Ô´–{ó Ì}M#¦¡Ì×ß—åØ;èº]{=´ð¾Ø<äÙ<8(eðÈvqèÒ“Ñ磩^ßz&`«rr1=‚´w¶ã‹znSÁºÇ¨Ý9 FQ8GLڙŧ!+äIØ£4u|wrNäÃpµéï÷7_ì6Zý-ßËäÀe_ÞôÖÔ}éÒÁ÷ÅAˆ‘7cÒò`—Ua›•[µ‘†”ÅÛY¥oçXàº_àq¹vTt óêãmÊ’öÂE­ÊGùT›0k"_cY÷º-/ç”k ˆ(L*èI³ˆ àƈ%0Øj§Vüªp3ºp+iàäí!•å{ÏóÑX?šcgA%̨‹7oFáExýö­[ÒvðJB©\Lã„æúx탽R6ŒDéÆÝ9WQä:SЦÖ^PI·KŸ—è`–šå£¼ õq1<õÝÐb†‘¼…!…+x÷¥>i‚ÊG‹ZßBÒ¹-sìà2éô/SMúžþ ocIU &ªêeÏéAtýæiåÛ·–S¢\ŒTuò]wJõÈ;I:Ñ›§_ßZ“=oÛ{;âÍ 4þ”+çÀE¾Ùß{{ò\,%—j3³Lècç˜I(ðJþÔ¥I·h¨ü@‚ÐÊ^nN³DkÉ%À«¡ºy5‘î™<)×(÷KR@x}²´î<êð¥2+OèpÏJ'‘KG®Ÿ{ ~½þæ™@W‹(ú¸ ?RÚÖÞÞôž¦&/é¨z—ÖÓ8°ˆ_, è\‰ž|ól©Z¦aùY˜Xúáã0¬£~å ñºYyö´4«›ŠI•®¯Lªh©h9ߢV'ŸUq†R`XõîÕCÙþj™õ·2Ý„¥¦/œT_°F©zt “¸ssGÒg©_µì’\¡ÕJ×j¡kYt´»-*Úˬú”oßfÑóöp¢n6¢2 fI«ÂÈ=Dï ’HИOꇰ£)$„\Qtú~” "®QlÛ#ûéïË5ÑÕ‹{>äÐ+å2ˆÞMîˆU—ÃÉõêJumñŠ^V-·ô:q¢àÙSGqôö9KÌîL>²VÌkI8»4¯ÓŠØÝ|öt =±6_5äص'kÖ.,ýr8 ÊÒâ7¢b¥”–Ï(ý°$Þìí«QúÁío,¥Þ,C±²8Ú¬ïž4˜OiVégþÎ ƒµ•Ö³§²w½)¼÷è–l–ݪRî2™§•™ÖItG4”f´B%­?Úm6HÄù(~L1ù]Î(žT¯—‰­zruy#>6«1[è/H‡n!þ䬥¶Ml :ÿj© (‚KEE½#¨“Àñô¿áÐ’ŒcÀªrI¯„½-uqüdíc¹E¡„EcR²†8!5KœeÊsðdMfxö¿?{ê|~öÔ€°’hW¡îØ#;?†;}4/:ÅÎU ºê3}„¿+ãîƒNþñí~V,SiÊpþZ¥Ñ£lb÷g‰Ö_©_…?<÷óâÙhä€Ó¤z^ÅɳÇ:Å9ç|G˜4Ÿsõz‰9Á”ã˜|þ6¸¾ã´+›1(-ÎJ)7ãgsâÂYá÷À€ì¼= fc™F‹8é>!«º¤ûTþ~}ÇÁuî|¨VëøŽ¥,›¶¨qìc&ƒèú 6 |FfìÕÁîkm7SVf3w«î©¶»ybQ]â?Þ‡ƒZA±x<ŽGЧ;m~÷“ˆ}«ŒøIºˆžoûÎg Ëgfƒ´G¥;0‚ÊX)ümÆ¥g-½øýq73†HÈC7m=N³ ó5ËjGáV>Å•Ò¨Gavº{Lð}BK4vï¶D”!äÜ´Ù}µ‘ò꘢“4-+«ˆY‚ÎêŠ[ƒ8% bË™ÈT7Õ9 DYQ•”ë$—1œA?rhjSÓLAévÝH?–Oº/¼ÌƒÍóçíFg+Üîî\¼¸|íþÏ¿ßýØÛëïâÃáÑoÿ5:NNƧ“WïºúùúõÍ/ÿùo!C¼TBQHjÍ¥jµYª%ÍÚ›æê[õ÷b£vQ˜b4ÂÑ°%VÌ[x^.®Ì˜8ëf'^ÿñ‘ SEoÉÿ÷;¨+uz=|}u% ëss»·wzx¸÷aR¾CXþV7¹¾¨ Ìp«Gk>~>aeS‹Ùæ{³±ãaê¤=šô?O])ûÇz*U#o£@ 8Ÿ'}q†áñ\¹Î 5îÀ§K|¡;·ºrU#÷Ù›Ô’šÖro„¹·'×)D(óõWWÒu§Ü³ªéü¢®4ÝE«Rlu%—ž¤ˆ~J]IÏ,pUN.&ïô•à·£`¢{ílŠœ†ßAmi(S]øÑi²µº£¸-~‡/÷6˺ ª¥‹”Õ™ËÆcQŒ¯b bÈ­”v@’«±Aå:a·zC‘EX‘@ß·ƒapKgŒºC°‡[[½rëË ¢RZ‡&N8Šé+*ŒEÝ› z4h]§)ÓG„M¿n.°Ï-@®l­¨‡¦iXÙ;Úïò„ JEfYWfŸ¶Ø=ºÖy¦™"”>’paz5ÓœÌ,@K`VÓobчY5ɸu€îtàMF_B£äsª›ÇÀžnçò¤›Çuúö…ûœÎ}Ò}îP ‘E§ÍÞÔé¿;áBI‘&NúC`•·Å8I£ùgRséÍÿá&BS¨§]µv8ß*sÛW×ç©$EbT¢w NÜ÷@›Ctìx@‡üLE‚¹Üs.Né—#îÔ#®Â*B%{}YÁ—`ôI>¶È½ÞM>yÞC#îJeå‘ø×ÎîÞ¶²ä¸…ºæšv F­€/`rò4P8²ŽǤz)*â»ïZ›íÃñ}&G­LžMö*†Ï$4O’b ð ‘ÏN£p< Äʆ÷ÉcˆØ€´ &pt£ÌKL¸l«?49¡2ìÀ½dlJ¡c³îÃÖŒìÏ.¹®WÙñ/»(ÎÒ\ýÿË‹£Ñ,L™ü&¥¸ÎfýZá8ÌGôõI É8O’zñon"Ü,þ‹¿¨ +’K$Â$SÜñ)^wETÂߘÚÈÒ&Šîö€T”É3¤BÃnõГ;œôÏã €jü×T½7h‡=%Î { •Á\°Æqæ£vm™]\ÿÒåe³õÉrj‘\©,hnaÇ|ÉþÌ2}ˆ,ÁtaŠìÀÍÀJ VlÖz^FÃÍITka4¢V2 ÛuEžr>ei÷€¿Ë 8J¥Ç]Aú̸ô“ÓãÝÇ0¢'8¹ü9}©«_8ó霹©| ül˜tnf1Ýpo>ÜîHtIúçÝsç`úXN7ï6 so‚ò9Ò«ûvПNKìÁvs¡+·øå¨}fÄÄY>ùmönG‘ûýó‰LêÛ~-kvO÷rú¾„Í=Ü[¤°Æ¾»¶)†CÆS÷Öräas‰õß­Tª~ ¾’A}fÃñæÁÞîóGØPîvÀŸê:Ï—M`ú& Çj "~6;‚lh1Óvo&ZÜ} PH“¢X&ùÏã1óp~¬¦P¶ð6ŠsóYÒ{ÓœA[œ!OåÿBgnc6Õ¸}nÄÅ]HSšíÍ)÷å8§ôÇ?œçTU»L§šÆ/\g.×iã‘F›ïtȇKÛSœ§Xβâ=ÅV8G} N)=ÿ¬6àþ8q¯SIÆ7Ñjµ•Ä(:|jÉ7åÙ¹)BXøî±À†!¬^Oj_öãŽxöô©*`2NNVoöc]fbfºq0s[R(æ%ÿ¿¦¬HTÆ¢Y¤ùâv2z€÷; ¦DƒÌ(3<;i*,ÄœQqpˆ£Lî d)Ù!ÅT·Û!yLŽ…£FQÃuŒë~séMk³òßAå?oÕÙZ7K>SxT¾–ƒP‘k£­]K""ç¸ ¤Eï´ûô­ô·2—J¸)Š‘ã_ìžœþ¬Ê_*¿,Š £W"m0ŒÎŠlöϤϸe@Ÿ/Y—/¹#. ±»y9þËÊb»\°²m›vœR“ÅŒQ*é´,ó¸eHfª’øƒ“ÓWo€]D,¯Bô5ɼ †ô—yí!…Œ0Dî<ÆÎuQW*ÙfW~2ºõeAþE|"ŠÏw¶üÜY?¦i7M1fâLý9êílÆ÷Oðœ8„Õd˾^`”\¼¤ÅÃg'f¥ÄÒYŸq%—%9ã¸Å™ê\HÀ?TB Äú뮨–Es© K¥Xk®Ö†~Áãp‡Ê©6ãM­jØö‰tÃ"^O†²ÝZWÜ¢NØîµ.ãø]½[/ž—FÑjaF\žK^Á•€º£mC6 áµp÷˜¸úf¡¹Ú„ãùE.—Äʧå T{g0âÕ…ßn–-d•€òSZ b‰-Ž",° n‚VLãÛg23¸ÙÑÉï,ñE°—¨9ùs%’®‘Ÿ¢µfÆÌ Ø7ÐVèB€ n%'¸‰È­E,…É°ŠÛÒ²ú¢¤¼Ô 5Æj+™ÞÍ2@‘Ž3É·ÞE8À°òÌrèB$åŽu]!4Ì`ÑŽ¦§qã4Ù k€UK%Â++oQ.`õ[Î)ë äFÒæ}pTä{ÐéÀÙ2™ÙUžB™3Ýg3ãVGÖe«¡ý3ļ}ÏÑüGsU"õ=‡ˆ'šòði‡Q˜êü#CHΠòI-‚ße f’ 3Vwñ,qý%¦ã½F?B‡pAQϼx}Õ=+6˜dq˜uÁ=Kæ9#ëá_7?¬,¯6?ù°½GâZøcÓ?Ã|­ªM²4rýPA»Uoë«NDùÄ"YåuQû {Ñx »²œ –›…õf¡ˆêÉä<–’Á›µ·Ëk¥œÓ›!@D®}Žh*œÂúN¢eU4Zæö.!r–¦À½Õ€Ø6ùoÿ¯¶M; P¹ù±öaÔÚ®F¬|%^lmïõ Ò8ŽZ¿~|Û,•—J™r¢î ¦Ç’HçèÖ›…­fbCþ_­¹Ô,U© ø忘ÌÖ ˵æÇÍQ G™’àÄîZòfõíÿ«ýúæ_?¼UÓ]ÆDú³‘n e'â!+¢¬c˜ÌÑd*c‚ÀKÏîÐjx¾À”ú¯e)d}óM[%.[^-¿Yo›K™ý¡YÂø_Ùª§È$±È„¼X+JR'^:(Þ²Hg}Æ4ϯ±¸LZ½q\ëø’^²È‡b7„|l'ÏËX ‰ öŒÄÓ[”Žšð^Z-·ì±nü÷ýZÔß;m¡Bûb„ŠðЖö°7Ið?O2f…FA|ðð˜qi@šÉ…ÐÁ vP•‚¤•öÔÒÔ>åÕõIU€è øK¥V5u?ð7X¥ ÖÊ_Z)m|òT/x¹Ú6J»Yö”§·m¾þ¡ŠÛÎ>w€.€°…rsác€GÙºžãA_9>»ÏxÀɃÕTv¼êÛ+¾è›¶ŸvÊ»S—ëìBLž4-Ê!Th¯cb°‡hðà<_…!E_A½Úº,½Aào‹OÒÕKælf¦>@„´‰ÖÏ»OÖÄÇ&¥Õø夢'Ú©|­ŸÛØ ­ÍÓMÉJönkoã¥×0~Í9Ù=$ÀZ«àÒu‡'£¶öfè!ð»À–ã¶U!Úßëø‰ŽCþ0 '¸"ù.îŽl¤€1ÜÚÖ®Õ8<89²Ú³; Ç”n«…­'ßÏ2lL'–q{Ú1î0èeƒøQ»y0ÞÔâ‘n­3 §}e(ŠÜÏ»ïh ¿ H!K5ä©B]sDÈ”C"6Ó)Š’s|ñ½u+ïißgñÐ÷r°5]y€C€3"PHjÒKZ!ç05PÀMÚc!Gž6ß2Æû3Ú_e8jyRG5èsëèøðÅñæ~ šøOî:6ìÈÞ'oÞŠº÷né ÿ’YÿåœÍŧe{ÀÉ!e᲌‡٠rsÖ(C+ŽHÁû´áiÜfF)‘nÉÛàÈÖG<–ñ"HœŽ$1@,Ü9ÞÞ†­ŸÜ<>æÜ“gFž® FØSàB†K%š%i'xû l~g&3”AzÜÿ±ÕjoAÿ8ÔóÀ†1Õª*÷­4Ì ÍÄUMb•“½Ýç'õ"þÍûªî8ùsPþ)°enu Z¤!‹/5j âŠM`Óä ÒXèþœÉ¶ ?ýiƒš © ƒc¶<‡mG—² ´m«-æM5´Åü ò˜-f§؃®“pÂÞImKmÈЛmÒÇ姗 ]Ø1 ´¼â:@`×·°x AÒpä !þ é['ãNØËÔ%úU¬›²ÊØ9æðG‹üÒÈ:©ÕQæƒ×G°R1‡rŽm2ÊTÄWÃŽèJ7kóŠÊ7Ç|gWK?Œ®µË™Ã¨«¼UÊŸQçœ÷öÍôþŠf<£i•(“ú Õ²ø]0§hÕ2¼0Ç(}IÈfÂÊzý~׊‰<-ãOÿ_¾G\]w*wbÆá´ôGí¿ù×[´ž÷³ò4¨Æˆtö¿û©ÂÂTâø6Ó™ËÑÔÐJ+*nT¥‚üdEæ%• yhñÌÒ’Y¾‚}õŽ1üZÚ˜({½hçÝP¨a'¢$„†‡Ï”$åõv6$e‹K.]RGJ/å†sÞ³ Q€Š I´tϬy%ÝL76¨’«<Ù0äœØM*HÉz/ÂCë·I<[$,c¯ßÜ þèû%+Áß]ÍÓ­=¥—˜þøLZçKÝÛѵ¡…SbÃyTH™` ‚ó$îM€MǨ˜Õ‚ñ ¾æ–Ë[Ž{4ûƒÈõÊ þ”iz^ÆÏ¸Ç ²oÛtÄí¬SõÄaTZÐÌ­­û)ˆöuÅÊêÚ“§_?ûç7ßç@Œ»éwËFä9[dd?ê\kMŽðÖÖz½¸µõ)³Slm9Jè¦'-R‡®SghSÝ‹c<¹'~q©5Ð}Š]x©å§1hSx8dŸ6÷·+{»'(ÓøµÒ•O¬NgC¹à»Ÿ¾ºT:7ãTwtÕ±Gc\ÉÕq·áPD3Ìô$ÄiÊ|?Oê(€i×WÅwÖ,[ˆ·‹k9[O»?´yYc°êkàХйžiDŽ¬{šï,æ|×>…ÄÊe«ËOÓšwƒ Óí²©ùº£øœé#9í")?fÖRÃq?‡™FæéÚ§3HJvo´càÈÛ(@ö…“7‡ ÚÜbÓô4Uædþì\¶‰u½zR£ý, œÖd[‚ yºòí3Õ”‚íaåväLsúvm…©áHžþVxˆ;·®\‡,é,f¯&Ž2èµ'=ļv»…Ž|ñ4Xâä]4¤(áKç{ ‡áˆelå—Õ&ª»Í5ØÓ“"ëmŒó…ûG¹P°H·´ ÑßµWåûé£(¿i6koÍ{›0Ú|à×’ŠüI øùv[gѯÃÉ(êÞètùêmVÊÎ;¼­ÔIÚæCÒK!Ò}oñ)%•‚ê^AE¡)$¯–kÿû†Hþþ+ëѽ(H*ÿ;°¢¹Œ>†]ª"ÅñTïŸÂïsΖÌÙÂœSØ~ÎIŒN¡ c—"Ýöäd¢M2'D/J펕ýñDªê£’^pŒ9Y£ >RòCÄ›‹8F+ Ù!4¢ jñUÊ­©¼(vP´‚Tà ïf6ŸïRäËé-ÔÝ™´Y‘ßÜ?J ˜ì¸ÃìëQˆÝxÔ¢|+LKËÇûÔhùâÓ¿è])+»!Ûs£gf—1ú,ÅŠZxyôêu ã̶ö·¶ì{ zEQ6 ›Îöì©Î&—]®´Izàà˜¢FFÁÛÑ`‘4}9¸>lëФèb2 ÿ·p#}À燄Ӥ…Ñq¯wï‚J eöŠè!IJÀö¶*½Î'Q釽ó¤ŽL ÊŒqSòBÖÁ“5“›ÃÀN+ðìé9ÃÎ’K"ûXݱÛ5¥s¶ýÙS•+ÕjZ?3‘ÝM`-VÊ­öËRú£—RØŸôê€z÷¥¹½rðû‰ðÆ\ƒ:N.—âÞ«û'Ï3°ÏÇIj-•÷r²õRÙÒ ¹ˆø{$4ðÔÒEÌ[¸e­\󬅬ǻî( UHç*•ÐÇa|Ž†m½¢>ÂÑ$yòíŠIo¥òc2 Fí?lõ q-U8”ƒ0iÔ¸è¡ñÝ{²­cž(‰Æ©¸p…AÁQí=Â÷ §Ø6]͈Õ^ÜR2i_Š€Ê°‰P'ÆÆ3¦JÞµ0XÀGŒWÐëX–ƒ±`´]6‘à¼Ú¡€&AiCñ‘}ŠC‚`À¼NošôÇŽ—Sx´áK85_ؽ©Ë-Χ8._Pî )ñEmzÉÍkEO @28nsŠZ s¶oA6ÊKþr!§Ò'k-®ê\à ùà—ŸÚhg%bµV.øgOá¼æ69·òÞpئ\…\ ó€È…€TåúöÒ-ÌçD4_Å-Êk•æ±ÈÛfŒœNä˜ o”ç™(˜Næ¼Òó”MºÌ2eªÊó4`öLÝ~¸¢Ó•cH»(â¤qH¶¯'á÷‰¯—•¶£¨œC½¤U ÛPwÒëUº!ŒlM"Έm.O6ÚNkÁd]Xá.×ÔZ¾ªD(HÔ-ØÆDÂ.œ½½ð4m»Ý¢\-Ìt?-o0õ6¹ªë~±qt$ð Šï™=¿5D¥-Ô€é\¹ZT7EY.ÎQ©ÉUÜÛš“ô›4d­Ž Z¹ÖqS¥íŸèZžl>óüÊçL ³'ùîg¾¿‹Gî&ï°ÙAÏa/Ä_ üv¦aŠô;“GÞ´Û‹¿Õ§dw,HIþ*Á9ðÆí¶X«~S]YáE;«Õ”_BØ6ï$Bˆ,-‘ £HE÷,÷@dmwÈÁû o;•·5ì‹}Y‘‘mVIg¶½ÙÑÀÂ^*çY+öÌ«³ø“˺®PÁ¼Ð g NŸy  / èïZumÍX¶ ²5\ðáHó+Võë“?¹÷œï´e§2‚Ð ùIéj1K‡ ]XdB)@/TY* ¤`u™"§²gO½± ÝZÕŠ#O©=_À†Š¥Y›®ýv®Š•tLЭI’{ó»8íÅálü™9‡Üß<ØÝÙ>9m=RŒm^®{H'G=]⋃Èé"Ó#—ƒ£Ÿ»H·­Åi½ðæAž»³;)œJ1:™¯ž»ÚËeœšo·Ù·°ûÑ«ÏŽ<å Ä£¹°½TåMC~é/dë6¿¶©QüœhUîj›Ýo~|º¯¿ÛÙ4lJž?Üûmª®ÜÔœñ…›ë 7ñÒØf+ˆæ‘£ÜÝ$å'75S@%\Hýñ=è=Òk ž·ÑQkÆ~ÏØæ)>MbHêˆ(ÉÂœ4À 㘅ÆáÝÁàH3¯üà+ú“ó FŽ„ë{W2e-F9”±bßWr ó]ÅÍïEV×sF¯P6g±ì#Ö$KÙŠ¦ˆ—ò3ª¹Í“0å”Ðýt1xÝX"åºL†_Ã$îÜ wGÇUðïpbì$7ýÉ8ê=ʹQûÌس­“_ö_î>O¦@å2bêcÝÊ÷…åšÎrYã5-?öK7¶˜Óï$¹;Á2”"Pö‡?ïD˜¿ÆfJu;o£H!@Ÿ)½q‡âÑN‚3iOjø3e¾Ð¡ÛŽ~fì>?â“^\SïÍ…7÷=ìM%JÙÏøÏTîžîÌ´~9Øåì\¬²PÉ>Î¥Kzð”­ßCôÃNô8÷ ê3Û-ö··vOa—`@¹»ªë<_vƒé»«)ˆøÙl ²¡ÅLÛ½™hqwâ¯&EŸLòŸÇ‡æáüXM¡lámçþ泤'ö<ï9ƒ¶8CžÊÿ…ÎÜÆuªqû܈‹»¦4Û›SîËkN!:é8Ÿ©ªv¹L5_xÌ\ÓÆ#<6é—¶ÿž¼e/ÆÂY" ÏlØÛ=:|ú`ré>~¨Ëï_èüt:/Ç)õ>rO,¦ZíÍ@„»“uF”ýQ‰™Åï1Oµí6Šr_òÒ ÓõGã§Òk˜¼_èÈmü"ÙçE<ìE“Û`ïVܸ/—˜KTÜO8‡È»ü!OÛî0—;4˜#ÑÅæ -"aSìß“+Œéúþ1ØB‚ô™ÑùÃGRO<œªx(u~¿(ÞBÓ§èH3~6þ0£lx˜U/<|¨Báa® á៯þ|˜§ö,Çäp5ç{”Ï‘~XÝ4FñðåæCG©ù ]™W”£ö™gùä·Ù»EîË0ÎÐS>üÓô“óô’¿è#Ï`m=äÃŒþñaVïøÐèÿžŒã³§Ç:>{ú92Ïž>ûc5•|ö´nr}!ö·0‘4ZÓðñób$¡©Åló½ÙØqOvQ'¡äô?™¥LcÿXO¥jä\ŒåýÎçI_œax\ör ­q>]â Ý™‹ÉÄ‘ûìˆMjIMk¹7Â<ˆÝÌ!B™¯ˉuç08_ØÎél§B'ƒCÖSÓ’Á¿% ‘÷ñ†EÎh°¿°–ûqgÒ µ»mŒ7›.O/8ͦ-€¡OSò!Fm9àتÍáÒ‘î¶ö_íî¢éW{Ûjy.,Šç7Ê¡$º*»Šz=tbIT:Õ?ê˜ø%žÐf©è9Â8¿aDŽÁ`—«¨áà}4ŠRÔĺO5KâA%ìÇ7BšÉ‘—[ÁKѱ%ùóé —QéC3#Õv•ŽÈyyU¯r¨ÚQ}¤k3ºÎ ¼•U¸9 Ç2N´tµºq{Œå][冡k4þM¹zªÄÙ:DÓ«tn€uˆÚøVù¹·œDSŒˆwWø BÌ]EÊ0Q{ƒÁ(Ò'ñÀÝ.% :™gš á¸K½ø‚Ý(œŠ X’½„RÜVôC$ɤÏ{<· P´S.¤ Ãö{“ŽbH’°c³iä”®A7¬oƼÚvˆ}ºŠ@£¨kI¦@mØÇŠœbE„×ä{8 ²‹åmGüË*.^ 8kÜðLÓ±WÈ÷·í‚ióôLAUxÅü®¡ŸhžŠÔQ6‘`šÓÔ)& Srr˜éðƒ˜ð¦¥î.äúVÓÈv¯ÓÊ-ûÚ= ¦!àsK:H“NÌK2›uÈ@ò”W(å3R$¹u.Ûå Ú¹×çêŒpêÐeüÎäßÍEá‚ž3{äØoZ?¦¬ÀYÙ¼ áO;la¤á»¬½üR3œ)ðÀUf™¥…¸moö€ÛBEAföÊtZNÃ.+¤E>We´Wbz¯´m—j¶Gµ¶ÌöÅ”g@«ÎÍcØÅ&ÎX…ŠnÉ›ýxó`o÷¹[™—Á†sÛ #a°Çveαµ9$Ý®†èœ™õåjmzt>¿år[sò=ÖzÉcz¦x”à8o¢;1•%IUÙqëœæþ/ou±ç ÜyF-Ï„)fóå#©Í›Û…-/‚ÕÎÉ/û%´¦GÓ©«›GÅ*×'ÅjõÍÊêÚÛ’…ð¡ôzñUk2€4´_¼êUô+ÐÆ«Þ'ŒøMN|åSQA,Ï h’Íd´1Fí¼”K¥€Å×Õk+”‹ˆÊ£É¹zH«+Õ¯)h0×À4# Ý ‡½ø†Žã`„î¯U CF½:<¡àQ< ŽÀ]óŒ÷iœ)î‚Ep˜¿*¶â?7pdíÁyXøÏ¥ö7‡'¯[[ÛG{‡¿ìoœ¶N7_lŸV øʧeãžß—Ëß<+Wx¾)ä$ùþæÛÕ·ìoü.³)Ïq€Hñ»É†k"ìx³\âgÁ?J;S>>)E¿åG?Ê;8ÎLU“¬Ã_t€¾gQüZ¦ò>¹UqV̘Ô}½|¹È'GdIÞ $ ½"3U¡<úé@H¹Õü?i]‡Ä>¸Ósû¾ÎžtŒ ·¢ó2D]ÅÊ„´ÚǦ)HT%³[Ïï”*b7Ê ·ÈAû“ÁE(KâYë§ÍãÝÍç{Û‚ø‹¢rû?È¥KE _ËÄ]#Pˆ´ÀH ùiÑh‰$#:ÜS¥q`Àè†íqŒnöeÐ=jy‹æsþ` $%¡°Àиequµ/±ÊdÊèµVðtÞVüN†——Ææ ʱ[$áæ»c<ûÈØYèé=—aÐA!zÒ§pb€:‚ ¥Íí6©¨»œâ <ôPy)îÏv)ƒ ›€Ãñè…‰YG£° )ßõ¢~4Nª—ßãˆ|$I8ãLG«urºÕhµp“üÜ2 ÔÛ¼Ì*^UM`±Ã$aÔ±Qs K²rYï!ãàAøútY´Û8¶€—‰ÜDé~O..鹟Ø’¡iË:¼ØÿLðQæ…Y$>¹­üš/ Øhº’€nÁI²}Éñ&àW½G‘N.FøªG Ö Mo]0#ã-RZŸôÃ' ®·Àñ±ìÆOkB/s¤š íÅóQü.¬Ã’‰zn˜œ^„wÃÀ!V=äP¢Á$̉ÅíÈ,£¬D’'îÇeÆ„œƒ£ÂQÌ»+¦Q:¾Ï Jà™19!RK¦Ž†à½ +§G›=Èí–Õ컌¨=–ɤdû òÇSÿÎ-К ¶0Þ%ë©RÜgHßš%ép™gË_еÖÑñöÑña£µ»³½w² Ë¥Ý ƒ/?¼°JÞEÀ^uªÓ±ge×X5Òe§Ö8é]*^G:ORÞŠîg+6jmsSQBïu$zÍ3‚zÕñק©|MÍLê\¬ëH ÅDÁ=u`T+ ÊÍ‚\ €¯Ñø†±Ô; C€ÈÔ³Ú‹/|bÍûxÏ ˜‰ù +Ä×J×î/Öíž*›'»pà³v«ä–«ÖœÓ‡9O+wÚ÷;ª=*MfÀK„ÛN Fé4ÜÝ´n/ˆ ÝWå@NV.±Ê –­hýxwÝ‚,5RÇìb¼¨#/c™ÙÀiÿðD<­^ 50ÀÈ…¬´Ù Û=ŒîÜûåe’qŽ‚Ñ î؈%ÕÇŸA53Ö(s;Vé„Ý µÀ1ïÄGD¸mºˆ,@sÛ—(É»|´èâmc¯ßu¹Ãîž4ÄZu¥º&Nf‡Y°?dHÕ¢xØbsÿ¼¥¨‚À‹Â²ÜEו§U¼&¼Ç )Éjo†€©rÔb2è!SÀªÈ•`DU[;­O]°k¤5»þ»(jc†Biª3³ä _üC¬\¯ìì”D½ŽOk+%¼ pkïðçíã¥vI,ù/¾« |þÇ?èÞüÿøVöÓÃWGG2»Uôáoúâ+¨^*•Ä:B(i†8[_“Yá¥)õF¾Î"ðægÉÿŸ¼l£L¶dJ/æéuà#ŒÒÓ«Ä·{‹²ðëÃã%Xk](»´R-[ê–JTûßd &”RÔ_æé±lp)âÈ—‘øN¬} ›aôÕW:<ÄÔ9’±†‡Ò²:|)y PÙ8ž‡G_ñÞMvŠ¿K…¥&4צƒÝéç9v–rUn0£°jô=ÅE?PìósúÉavPmæVtýìÆ„ëþ¾z¤™þäÚvdr8±Cn¡50…õ8ؾièd1jß‚n”g~t£ìD7‚1 ÝøcÝÒßÿÂئÇç±°ÍtÐ-‹8(r¯ §â ~n §¢ ~&dQù6pDoAYÈB”ˆPuѺÎ&?:‡¢ÿŸ B`Ÿ%NȶÏ\H"¾Xx¡{ú(‘5 #f’nŒ+Ñ0 Æm&AÁœ-™sn²bzq±!M!1N–éûZ*Û_—Þ¤‡ì‘¨N¬ƒi¼¶‚Qû0 N5ýsÄsc¹R®Ñõ›¯+ß¾-/ãü{÷±³aÕCRq þ¢l*Æ“°I*I“¡mŒ+ÞGp†Xø^ð¡ñ4š ­$1ûʘNš!W‹sÍE¡Mö|b >&ïGO?âMPÉË×]Kß_¼¼ÄW³6 «™^8÷9¨dBo¦ZšiºåTCY5¥ÇâvMéÚáQ_ãgZ–[Df¿û1>'sˆÏù. $ZÀGV[Ngµ4“ÅÌ’ªM8˜_7ˆ¶dþ H»Œt3Hd–KVð’•@Î4?ŽùJü<_Eñ%RÂβ°4Âz7ÂO.GÕØGÛ|l={ oË J(CÔ:Yð}ÇÄjïÝ,1Äêvû¨ô-vàY•p¶ñþþ 'ûÅÁ+sq/¢‹ÊqŸÿ{»qŠ¦ñÛâ|2&M7áWú0DÏžúd1§Z¤F=.´/QâÅWÇçáxŒz¨£`ƒC÷5KÊÐÿÉZ©ê¨‘?{JÚ⬕'kŸ\Uñ¤‘G#­(>»€Ñ§?°Êhéæa¶ÐŽ$l&ñ”Õ è›¬ÌQE2<ŸD=¢l82<Ö8ŒaÇÛÛ}Ž®$ÐÚƒ¶ ”"œÍ WBÛc< ¤²xU•©ûÅ¥“—Û{{%Q\ÇÃÕÒ‰F¥šÌê{³ÿY®Z'¤i‰õBo *I!•ÛÑÌüðß'/[?mŸì0ý4Ó¯pº‡­{‡Ï['¯žŸœÒʾßm#›!ÜrÁÈ™¦™nò×ûÑ6–lVaH±fî*¼þ;tü“M×ÃÔáz\ì¦Ôé“Q"Ø?©lž˜ 2€¡{RV‘%e óð—kút€ƒJmP’Ææ·íFhy³ m9ÌGyÙç#ãÐí"¤½Ó,ø­ÝãðZA‹“Nʨ VäZª‹DŒžñ%pÀ<_Ô—ŠTH¥^4@éz= kÊ»0¤HÞ±(Á…A"¾€²'ÒoTãpoÉÑÁæþöI®;¶Su¨÷Á J.‘ ÄpÒí»Óß…öÖ@;ЧŽôêr[À¶.lÊã~±h˜2yÑ‹ÏaQ MÖ½Q¬.Ɍꀉˆ-Ä!bÔ̧°™tcóÛ$¡Êš_ |½ÍáJ”‚̉‹s)¼n‡@ öO~j,,fûX]ÚG õìÃ*YžG”öb0iõ: H{“O6—d}RWl…É2AHõj÷ãΤ %¥»%â¨HØøë…íøbý¶e„qzJ.ÕŠ}8û¡Ž!³÷²T¦)•0'mÔÚ ³;3ëvCé”\>ÁyY] J J‡l I 7Ý_:•I&áZzÂzP‚bS3ðtÍ¿FÒl‰»¬.-yTò  @3ñó2Ú¬ìýUÀÒŠQH¬‡Åò`ê Z’›d ¯0yÁÐ&˜ÃžBc‚q>¹¨È¦ý 6÷j<ºð´§ Z d®–V§ÕIRî–C@ÜUàÒ;‹3£Ém ÆYõfW|€GIkkMñÔΗßÙ©­}®ûf¹ÝÎ;æt·;Ù¾ïÆ=Ç>ýe[þ_¼-ßuþ²é~Ùt¿lº_6Ý¿Þ¦k ¤Í¬{ÊfŽäÍZˆ¯DæÊq9â …ÏI{ Çž§&A 1þÚö,‹âA;dJí-­ð¥˜2°•ŠLÎÿiCN)YA'S\ËläC‘éV’,c}€Z˜QØÓ¦l(FSCéªLúÑx«NQÙÒ^ePO¸0>9©LÇD ²oüÜIGÃK+¥O¾¹ÄØí¢«ž†0¤HO‡a;êFxIENU%cð§Br´O¹¥É ²¸B³Ì4šy$EhÔ#dÛ')‚Œ¯ RÙí)!è5A+=®š0‘@jå(ºdÙŠ~tIñµ«Q4«+1rЋ—Ëzô‚n ÂíyH·Ò0¢ØÜ&‘†žn¾øióxÉ€~ó¶Ä¾‹L›Z[Û;›¯öNUÛpq*ÄIí<ƤK,õž§C•‘Ý'oÖêæOÛ›§b{ÿØîuL9UN­a•„ƒv0„mƒ)8¢±¤âÝÑŒO–aÇ¥›¡öe0¸fÓNîF¨DŒ÷`ʽ´èÇŒó}@YŠË ÍWÐñ óÎíqïA]!›…»;1êƒWS®XÔ´ªÝé Iæõ|bº<Glã^7'Kå í½yË–¨›)ïÛm©.qk ¾¨¼ÖT¦Ò…ÝX~–Þàî'[˜·ÞûfñPª›…žî€WK¸ŠÑxñ_‹  ôŒ3ï!M=;½Ç’-Sè!3K=°[¶ñ¨:›heÍ>äRÕN3Y˜1ÊÞÉB ½©‡Ô‚ME‹=ú´!‚$‰.Ê“#ìf´Üç}€ ©¨K«%8R ^q]ày™sÈÒZ 6nL7fîÇòWÐ=+Ph¥'%¥2§*C8€öñiÈ"Ó°mAû»æÚXBçAû]Mº”#tsœ0$}Üë€TÐY±DWÎâòfP"/T;ÎKrOz>µ´ãúiêÝÈFšA‰ðN° „m€îÒÞGÀÓŒ ìÙ6 9dó¹$äž™„c·1¸QÛ¤Ñäçš¼„­Wy?5?¬,¯6?‰õÓX Ö•}»xó«x[VãܬÊ[m»Ð?2…Š9¹Öý3ÌÀ¶ŽÜ^t’&É“§X³@Ë»dJ¬¯…”sÞ’\0x‡:I¤gÞi.k]’¤ênZ[Ô@´ga2ÑÄpæ[ÉøÖJäµ$¯TGLÃó¬ÉÅÙÀFäY؉…¬%u…s´ï(H'€PpŽ…/RÑpËQìo_ˆç)<›Àˆ±ð@ê²Ã7öœÇjÜ}ÝÙί‡Fî¾ïŽ±õ¶æ92¨¿¥$¯¡É_'êÚŽ®‡nŽïÓ‚áHÀf’Qí˜Ïâü7Å==@±cfåSô=n-Ãú™ùÎPg¶ÆçÖ}› ÎÌ2c×5žÝÖ•¡Ò·Í@½êÕ³üÎ0jç¤JûÏŽÒ”ËÿäWã£7o?ÿ³íK[ß›îß™ÔQµÖ)kp ^ ùZ}´Û¨¦D«Q îT{8±âñ`ѯ2š ÙÝ„ìÚó9ßžÒÚ窹)‰Rî€ú•.´Í7Z®¬[Û.‚8Ѳú 5&}çaÛxŠäÞ'! 4QK'8GãÓMxxòTTa¯“}r ÍÑ8a\÷Ÿ}ó.]éÎîëýíuR EI”c†È$<ûfemE:=‚³,iæŠSðd¸!$‹~¥OPXûÁ >Óp„ž˜`j&9…ÜàâB*`.§ ö¢w ÖÓ¿:Oÿ¹^8æ„IÔÊž¬‰J? ]ELÃ>P žæŒ%RT“zÂŒµŽFÑõ×êá> `}Žãáä_â¤ûDþ>•¿_[˜ ‚bs¸—b²}w‡Ú~@UÛ‡¹B@í› t"Oë'k š~Úá…>ƒðö‡^¥€¥"Ç»1³a¤äkÉšp[‡½žVFH€M¢ ‰Hµ 2)¶n .‘K[f·¤B—ô¸L%ฆÌq©j-êñ¥qšE½A/ar?Æs psc;’ ™Ô%{ "7=ãÚr©RéD Ù¯“q\‰HQ¸dÉÕg"ÆÖÖÞ^kûõÑáñ©Ÿ]¤6aÂA.Í èïZQŒ…Yø#ÀÄioö3Ñ‚®QÐlªFé¼ ¶;Qƒ­õ/Y²¶ÿ²µõ Æ” ¯5·Ð.ØbØŠ%MÁ.ƒèÝäv´}‰Ùªæ…¢ G£À‹®ñýây¬ªNk–ÚRÁ¥uk[ž=­œmŠ—G•W¯¹Jüød ?2SUÝ:î ²Pð󉼺ˆÚÔ'ÏÐé±›ótïD VøL¾ÀATêÑÉ©zËnp9ågOÛÅWÿmC¶0+mj? £ÖèúÍ4®1CºËÉâIõš–d¥ kPY>‹‹p¢Gp9‡´%T-É8 :dU0 {qs¦÷ ÜUF“jºfÈ\Ò‰“Îÿ\ ‡V³þîó”ÛÚ+¶¾Â­” Ce×I¨;ðøÁ sÁ¦ ÑšÁÛ&yOסÀr7%ÑÓT¼Ìhšj›±)†Òª[åÁ8Æ%_þm`£ð¼æ+J4ah|õÕ²1U KKR-V&åò2Žãe#/3¡#Æ|O‡þ+:“þ°z;»¢ §=ŒÎû§åý#ÝPK7œ.æaÛ ^’_ùy| Uø–æŸô”îÄPiD¶#¦¥pJ‡ÔqÒ Dòéok½‡ŸµêÚ´J‰‰}-ã)ùy÷÷yít¦ô¥`‰ûò¡äŒ‘µp5Ç 6ªými?Fª%’“IbGƒJ×”òvUÕYÎÛü÷-Œþσ³2Àôìç`s*ç»ëäŽ:݆ ‘?øÓ°ðÅn<Û߃ h†åd~Ql¾@‹€ñ(蟎 jNñ¿eß»…‘vÎsÏÛl†ú¯ÂÙ~>,&2JßâÀáÃêŠ~ZiOe¯ “DÌä¶ «¥Ë+–KóXs²=‘šÜ›ùù꿧Œ °&‰Ý)˾)#ÍøÄ6€Úôæ|2èÐ}zã‡[¸Vš§€£ýH “ô;ëìxÇ)Z¢V~„çRj¾nc¯ý ÔÚÊç`+ásì»òyÒ)W.|Ag%I܆*Qið7%àÈ%T‹xx#³Ghqýͳֳ§*4 öä£Lý©êÐuíÜ 72þ‘9áÛER: ð¿Êò;‚¥!7Þ Ð˜¿h4,¾ØÑÕÍ‘m²¢ <ƒ¶jÑôç†a|ÏŽuб½à2¼Ñ;Ä7ÕU'Ýo¿¾g{4'9£I9´Kï^ S¶­…Ûö«…YÕ<œ…i̘ÑlQì磶‘ç!Þ5íÇ­ÜOÄiùÿ³÷ç}mÙâ8üûïù WQJ„°ÀØI $ƒYlî°}ÇÎXNÓH ôXR+j‰%±óÚŸ³UuUwKlO&÷Ú÷NhuWÚN:uÖ ÃT~Þ…KúÕ¿`|é_œû­<|¿ žÈϜûéçÀ ö-é¹y ÎóD*¸†ºtÛ3& 8 ¼/1KYlŒWÚp³CÆ Žˆ·}ÛC8‡–ÅLAø¸Ó¿ôóÈ÷£‹VGn:8ågúï9þð›ÐgçÙžz½ ˆò]}¡¡1zq¡¾XU‹‹õEd!7èô|ÖÏá>ý ¹üí®¹üŸðVPNžD¨OÉÞíg¶0yºMõä·S²7ž?õšjN˸©w%Ý_áý¼þÝTokß¾­ç|ø®þf¡öX’îQ\]‹à<¦Û Š`}F½Dݦo.‘XâmF|O îS1¢3cP†¾ ñ(x;3–Êgî@íÿɽNÇTg6ìéÛPOêßî¾0¾Y¸ØBG6®õÆöÛyMûÆL‹d2œFQ¤gC²&S²i¼?nü¹³d¬Š'²Û½à:Žâ§wÈ3þiݦ¦KùÑDÕÇl-’íƒãíÆbÙ~3;h[J¸‡Ð,ïçXâ <³œ÷rÚËYzòŸø=MàÝl3ùeVcÂCsQ¼|Ç’:tmZ¡Â½7É*qðo}itMþõxz¤û{ö£Å¨eGŽZ~ˆ²Úî aϨÞ\ŠÓ,µ¢Çõ%~ÏO®è&zW¼—û;¯ÿÚɃ~¶&mÚ;û0^TošNÂaC?éÙýivåA}³öÚväÈŠ8ž“–@-I\´ƒT¨µMât9¿ Ú ¢ä¼­`É71™T*_&ÎÍ5Ú?0(‚‘››ÃK;gáï 0¹ötf§ 󓙚â¤åÎÙ§³„BuÂ4ÖORŽŸ»¸ãj ³&‚LhׇŠ71¤C|#•„ߎ(˜dñš-ÜC—ò‘¶Ë¦ùèI=šÖzyXS#’GÅ?):1È¿ÄfyÒæÿbµüÅjù‹Õò«åÿz«å„„þGí•M³ÓžÕIéém”“jÖ<0?™Kºõ½³ˆËZÄ8FùàƒSÑ<‰×œŽIv žÙësÖÙÊêi)Ûöý8–©€MDzHµO̵ØP…q!Ooq¨^ÓžÕøA¿+wëœ!s9›Œ§e.[c2€i‡Ëô!aSí¬cx–t‹ Îç$Ü.…téãÀ%y³j½OÁ PIñ›x=I)i4"™ÃoQŽ³ôYõ,Íž*{<ô0 Á>èOƒ†ò'‚+òî=ê§OÇ­ÖÂæ’ïŸðT±{5ÕÁ’®0ýÙâÔ´f|e±×V½ ÿ„nª-ŒÜ@–ì8•÷uQ̓2­„ÒŸŽD0¡Œ)4rÂâ¢íEóÕ_‰m;?¹@4ú˜Ûß—ÕÁ6té%{Þ¿Üæ&ßæ¾\ÄlÔ™xKüL²q¨Œuÿ’ÛÙC/`© ›| ËNnêMÞm,]ÄÜÈÒ-gKÞçf†40÷dm]v£¶=ºVuÊÍš½§ñü>ßA•¨ †Ô›B+€þânŒ·ÔÇ0¤¸eqÅÆ\{t9š e7é C uQ0QäÚNEÄ$ì‚lßrHsû½î.¾s‹ù®×sÿ缌ÂLOÅ-H9f¾œß_Îï/ç÷—óûËùýåüþr~ÿ-ÏïKÐ&QŠá†Î\þ¯×&ÁÑ{ÊQö4:ó:QËÌj«ŸŽwГ…‰KêèDi@¯oMüᇲ×ìüƒ€™äã@I0w‡uBE‡‰PÊš:Æñ4wzÉ9ì[™ÀmçÐY¨7Œ0kRu2¨ožàæMÃxhÛ÷ÇÆBÝO©¬e‚\V™‡„á~µ~´¿³ÿ|EaàÎr h˜2±ƒe:Ôˤ¨ý»Li1e/öϳ׸½OziõƒXˆjD_ÃóM{„´¾Ù¹‚–ë0•ž•€EK¤çJ»›•„UN»GOLyøp°næC…nß-ETü‹¤7걩j["ðá{ŒÍá±×'^wŒ¥:Z«ÛŽ×¬ßPÊ™×IhÌÙCÜ@kÈ_mÎå'âLqJ—–¤õömÏA²WšoÒ3nµ\Úß žAc1ÎTï*è…¨¤ÇSþ‚²I ¯ösö7Ëå¸QŸW>¢5âëýAÉm¬,ôù}ƒ^t“tÉæ=¹/=ÿ,Ž:£aú ‡î0ÓM~Sçc7ìbo7/¾„Jf±aShï.$=@¨pè ð»P-Ô×>x¿jPò&øü¨“¬¸üL-8æUÒ¸€'°ð×ã?råØ^cÑöpãº3p}A[¦®ýiVI~z MßÈY†òÁb,Ô¾ß j2q°5´ );ÕÌ3¦ÏÛàÚ:&2%H4gNcܱ±1=~ð_ŠŒÀ(ÊzŸº’4-õ ¶é7Ô»øý>ŸÂe5Wæd•º¨¨î(æh€tpPÑíJByr0ð8F'ïu¥¶ØEȨÿþ¬õ¾>߮ϗ¹1m”Œ3†RÒâY‹ÒEÎb@ôkôáõcÒ`É„ÐeP.|P«MA€R3±V¦4~ë»ÞÁööñƹ}¶»å½×o½í7;›o=èOÁ J“[‹ãáßêõS· ȈY8ëÌþÍZV™sþYU ÛqìÈpWTu‘p`²’a´ 6ÖÁ¥?/蜔Ò´ cê„­®Ÿ–áÌï1EÆ]E¦?d.Ïñé%TÐë{˺êÝ*r¤èawgÜqFòðÛy5G!Šfa¹x*.\ðéî„¿ãÝ€&̽޼jÃ4ÉÝ…\éÄ?ܸŒkGqÛCÜÄ°Â9Äümp‰ CûÒ'ß̳$·Ë¾ÞþaŒª°«ã,¼¢\—€æl@À)¢Ik4€¹ÇeðãxÔ±Ä5ßü¨¨Ôß 1úmt>T?‡dVpSL rí«œèj’µSrɉa°¨%ɨBB·˜ÁBëÿÆMyõƒ†é,8ü?zõá†"Éwß«¹5™J!Ý’¾ªQèæ‹n¿èßáÅ|¶‚tÍ :KÆD¼)vï GáÀeªºJ®*@#1ßhâP n>ãmÝó1¬vã A3]¦8Öä½Á••—ǪA³sî·8©æ4–t“°¹¤çž)ÃcH«;­Af gƬ›aÉ» T(ãÄDŽLãgúá€]sôÐÃN8¼%wËÜ‘Ã]㮬" Äï"_ÐG·‚ÎèÚCCU„:Ö’·¥úâ÷õ'óÐ,O¸à°Ck¹M£„ q dCº¥s>Øs<"ËBíM¸»©jWäMÈN„JÍ7UsºØTÏ€E†¸YiêÞuÑ„Bo–(8ÑÄRÀH—©pªqËM‰ÏiÓ~]â 3¾^Ö4?‹:c¸É˜wÎYâXínVi—nl¡éÀw‹—º}@Úø… HEI‰ÌI)ÈÇ™=\Â,lXÖÄ•Aú·:€…B“,´ ÊXw <€GálÀ®@bA²õ1‡ñf>GR µ–¨ûzÃ4ѾìnzG/÷=Lô#ÈƱ§gHO%þ^¶‹æpîT§ÆŸkò¹lS·B µ(s×Ûv\¨Z8ÁšÎÀ úCÓ ùk—A§¯ÝiK”ï¦ 75§b9'ÝÐý1œf‰V½œê€s½(›2™æÒ‰¤'ð³æœÑ·9ÏG—¸$£½¦ùÎ~—K IŸs¿Vš*͸ùî2 )-FÛ÷xñùÊø6p/%»¶ø¢¸QX€ Ÿü\\¨Óî‡åkCj(ßøu1ƒ¿êß?®/Ô—šêîöàÑ‹oëU½^OY ‹ÓBÙƒów€‚ïêK9ÀtïÙ_™!Â4Õ\%±±&ˆ“‚ÈãïæÃ@¥cÃÁAÇ[ãðp£šœ<,€³:u+áò‚C}•*a±f¦Jð”´ZMb“Žúœ]ñaWey¹o"É;ÒÓ6òP:$æWÎÀ ¹‹h¼&»Ó€NÒªÉSð9ð$ا+"‹Ô^§BÒ‡.RJ9œ9k1—0‰„×x3“#À,Õ—PYæŸQ%µ\ˆÃó[N¤„„ÓÄDò1®LÍ]©s̪ÀÃúš£ËØP§vç™FEïç¦ê‘˜]õ$ùÒwÃÿ|à[G*ĉ|dzŒ–Çñ(®RÄi‹á ‘ÇZDU˹Íز‡òT‘uS<ÚS%6µ×‰Âý¥ðFÎèzÛúŠîHgÇìØÔ#ìêyïYwçÙÑúÑ/ÞΦZ„ê÷®ÿóÖÑñÎÁ¾*uýGƒ‡@8Úúy‡A ‚«iØtPÖüÏÓö¿á™YÓ?KGëûV _ü9×j§€Q‚¿žª=^ª¸ :½¨í:fùŽ\lû“nûÇé*Ÿ‡šgÿÆÖýkQó¾'Tý³s®ÅZB”“ˆ=K¦?÷9€&ðBS1ñå ¸òàëm6ŠÌN ó‘²;Téè×%9zµ³¿s²³|²¾¿±¥N¶Žöô^Y³Ñˆ;fþæÖñÆÑÎá ²¨èîÇeÈnZpŒ¨½—»';‡»[jÿ`ÿøÅúÑÖæÔÌ&»«xнAžÁ9E£ÍîôÂáI0èí)ZFŒûÆ»­ý«5ÒÃø½r7JÞÕoØCC'.&ܸ¾ Dº8g³çé)".á¥Áh(æèZü-{z$©·]XÖ/<{ÛÅÕ ’虉åšE:Úð+5¼æbãæíO–ò¤ÏÀ^»ößemcƒmÇ¡lKÁùC}@®®îOÓνørÍFœ®1Göûé|õ^·–­$Ü ¿õn…s$i)ªb¤Ç&ßl ŽºuÎL—¹œÄ¹z Qo£È¬§èüWtþÏ-Ü,.ð?uvk€‰®¥BÊUæ¢-†À·$5ë„­¡ŽnL\iŒ™€ILÚ ºÑ ¥ãQ—µÕùÀ¿@ÁþÖò6¸jë ¨Ù¥9臭wuu¢nrÓ\zòTý3|—¾ð¢‡]JÆr ¯Qõ½póD \¸yº½½Á?‡Ä,`” C©½è {3ês$kJüNieF8VñÙàZü“ÑKýn§¯½Ò§ãu—l¦-aÔª§€UÀýq´¾¿y°W+•>¨¯ÕòÂ÷OUC-©æ¼Zzº´¸¼¬©ÅÇËK‹ß~»ôÝÂišSÊ=kÐ(£¿ÿõ½÷¾˜åhÇð¤ áÏO8ÖA€Ö.úÖS£ëÍÄÆ?Ïi2‚Q¿n›0áÃþùÝÑÂ5¹AÿývXtFŸT¯†ß ÍV’S"2¢3¹ñáÔÂJ¤“1Ðø­®Î̦²R”£$ º#nÏ}…ŸQ#XÍpŠwÏ¿XoÝK`§šÐOËnG§;«S€ðñ­ßnK–_ƒ9eþÂÅ“ÀÛ™y©æÜ%šteþeDoXq·Ç+ Y¶ä(O9ã|ï ­l1N³Ø„ukG³§Ó&iãlGŠaq.÷Ëî'(VƬLì?MiþU±³KÝ`é@£¹¸Ú˜(ÉæNá­«³¢æWÕ‡ÕûÕÿ¼k‚oežkqkö‡ôu|粦h]8†Ñ•,%“®Ñµ±lZ$ØÊU”:øÈ+›ó6ý‹*½ˆ’\eslÙ•åb "ú},@Ü«×ÙÖJfùOž,.©Ú úïÙÞÊñÑV®#Bn‹‰ Æ®[awl™9½¸’©YâX!_“¿»óŒÎ)Q,1 'ßK§8®hxr°†Únýn“¼´,=Ï“j¿«±îp$!¹'º5<ÿzÑ ­U c‹Îpð=òTfóŒVÔéŒ%8"Ód/‹Y£ðæͲmÃâø›åº›‘æ/¯ZùE9¶ìB²v0]‡9# }q 8º¹ž¿õbíYò+«!òÑdz}øï$e¥¾ Äñ‘…béÈMÈ:"î´êú˜–<‹ýX_¹‹—HƱelª¬Þ·lã PL?Te‹f]m“}8L jÈ:|¨KìtM b7 ,¬«(euÃ!ÓϘˆMïwÐ1>5#’»ß>àÿÙεQž£ÅŒfïr'äÔÕáü¸®#qãú<{K扇ÍE²Ú?UµÃþEç?5î‹ŸÓ/þ•éÅÜ™¾7PkÆ'¬ÆâÔ«,õxÊGá1ˆ6Ÿë`)@íèÒÑ/C~ñ’ º~«âv‰‡·ó¹ŽD±v6’.:ž]³wUO§XÀmhµtÈg»I¹ÊŠ‡nKëRHDe;×G÷: ¾ãgàcÕ6¹–ÐH˜¦À‡¶I¤2°´¡­jœvÈz‘l9q>™âT󧶣_ÁJEø^íEE2ö?«ûsøß8ªÿ\‘¶ª æj¥UUz ¦ú-†€S\1‘ìÛÕoqô9Õ­Ôºõ[øáÙ¨- ÉÂ}Õœ‹/õ¨’n+ô}FÑÈîhlªmÚŠ¯ËÕy½ÛÖ„IL³ÚÈ -×ß,=~ûÞ<ÕçñùÍffxv:Ìt“Æ^ö jÙEB1GÜÓ o+ 7%)OŠ{ùˆæ!ÙGù•OLì•3@÷w‰µü¶¢¦Q®LémP³ìæ™]QÉq½FÉl˜ÅzÌûñé½(“S8આd1~LIxilý'0Ê„—$—~HgÃ/´²Ä(”ð\¸ªõéf0›ɬK1G5–a<ÏÆ0žð¥ÑoKéb® «ƒÂGz–ÐH6®`{jLÜ5d>°ÓF«C³‘Ç:†«Ã%Ñ!œ8ˆYDY~†Ð˜Ã'è™ò5Å4°0 .\W~WB’Òv(Rž#ur°AQgÎáÚYT~lîD!*µaÔ‚1p6^¿¦yllðtâf¹xô¨äЦà-’*óACr@òå  :¼¡2Ê*7NKt^pÛzë…\)SyzyP:¨cN‘LðÆòÊÎa(ñ0ö %[<¯ºi˧ܡN¸¬ªŽy2øíÙc¿S¥8ÚÌwc»Ú;Œh**ŠWD"l—“À[6ËΗ\*Ÿ‚hèiȹg"éž3%&œpv­“3ÄyaqISg|¬sÈ0 ~œÃ} ÕÒ=¢–ëK,œÆ(|g¥˜¬t‡Fƒ:ŽqæÞ¦é>KWB [â–züˆ­¡¸ ‘E6#^¯†»¨Fou‘S›&×Îq%•Ql@´ØRJ%™þ¬o2°-£Îa G²+ýÁŒ2d;¡“ƒû´M_ñóŠ-ÏMÊF·Ø$)[¸Òø¢P9G†lÔ“+Ž‚†x0 B|f$Yç}OQ9“[¥Èd1&cÀ1±Ò‚†€ oÒ->bÒ< ï8F‚33­cæÌÄ ­ÙÓaF܇Òæäi$¿óèµáKÖ/U$Òñ\® (Câ@3Ar5fND­=ãùá£!!™(u·$ˆ°$:A'€[›Dd •Nóñ¥Ô«áÐŽø´ÀzWv™œã}ÝR={¾ìOH¶Ì7%ƒw¥:NlÉd¶' ¯8’ä:œ¿UÕÏl7£žÔŸ¡Â“]zÜY¯¡ëY0ôáF-Qâw¬Ç¤ãè9ƒ*(šÅ¾`ØVŽÌHÙ.VÒëZ¦UÔ;ñÞ(’¦±ÂÖÕd °ìÕ2ùɬAªTv!,ìK³5“}ÑQJĹ@@âùbô÷$<8ƒ3®$:.bšBD9n¡¿ÔœÇ9GX-*-ç.‚^€á‚í8Âvð^R O)1×Ë$·¼qÖ³ZÁŽ;DÄIìM–á™}ùtóeáúñ¥•* #Ï8¬8äqÍql"„Í ÇQ{Ô O>hL°›2Nì'gÕf3Ù¥¸¶—&6¢¦Ò¬NR=$— ¶g¡À‹·[ÏXÙbÄDœOI)„³(m<‚OUõe­”)¬cÁ[Ù‰¬¯ÞÃélž0ø¸~ ÷ÃÞúšMü˜IÔ˜§ÈÍIq8Èæ…0tcPs•Â¸iÃÑ §V  ³F¤óž×òð:A‹[”õEÓkŽÄj,ÚkzÙ6!>fÆ¢QÅ”'êÜØ_ä‰üD;ÍEÍ—ÍņþÜLJùCÙäi²_;mÐ÷ENbW'W‚–öÈز”Cñ”bÔr"b¤À¾zº\;ƒ]Í—"|IHI:´ê n…Õ:˜T?m…á„Q¼†£ã“ È#üÿ ‹|Q)'ÅŒƒ;œd‡óå5ž“r÷ãÛŃüZÁÿHV&ç“w˜WHˆþgRiE¸ª•2nòºX˜h2O|õ}”‘×rɹ‰—3êìS3k=¢XR2 Ó®²\{•«~]‘ΰëŠ/W¸2!×>ŽÄ›rRhŠ@ý‰Ôk(-dé:fÆH£ËnLloÃßÃ?ÒQ÷FL®¹³b†`YCHæ–þˆ¤Q@Ï¢´`­©¸«V¬Ë³-eö8óTKË—ò™Nc—>21”1‡£ù³´÷ÏÍ£ %Ê™Po䟟ÓXºp²…ýŽ‘ÙÄ,5‹«éÌšÒ2Ævy QïxwÒbz>ø€„ú4Í¥Nì¢ePŒ¿¦®5BWÕÛf³ò5w¡Ù\üú¢xZNk§8˜uêBÀIÀ‡Ýs¢:º&%Ê EEI›ÜèrÂsµ«…½ž}[,S¼‡MÃæò<ÉòLæLJH•Kc¦›éQÆ„.—%JÛÐå;{•ÄÚ=' R¶ßv[’Ž»éãæáî‰å f7èž¡MlÐzôšîã“£CDó‡öóϹô•bö+í¼77±f¦Ûì›Ë'wƒñUÆ\afEÑו̧ÇKE¼Á¬æ:HVr|,§wØíß«z×æ=k½«çºM!€KÓKMHIk ëU­íìÂ6\)–ÐéÒsà%¡2;œ™âŸ¦kåÿu!¾)Èw1-T„7cƒeWs‚©äÍ£U¨q|´Ab*x¸JÙ]ÿÚ¨‘(¡Æ3²ÂsùC6²¢ߞݜ,\Â…‚ÍHVüÇ„ÉÀÑ> ¶§…‘lÂ$a¶Ð½WgöMî‰ET{Øœ‰¨N€îѲ•³blFܪª¬•‡ƒÞ¦ ";“M¯ºÿCMïá*z:RòÁÑûì+J²:óW$€¨R^±_OÕt<àß)S<Ào’E(®û="­8Õ}à6Å^HF׺ìFm¸½,.wÚ¬ÎÀRdtÇE:CÁ$¹kż<9|yòY†ž…^Rðäà`×Ë+ÍG˜×ö¼'Q@ãàý|}ëõVÅ"çøZ­[ »€N¶xº³¥ì»œŠN?›±¥ï‘+|¯ß[ßßÙÞ:L‡Y°|ØÎYRkµÓ~à¾s§ FÕtY’jümÛFƒV°’WœŒ¦ƒ›p¨ÝùEF||'ÂVN¥§œUëÌC!ï!©šŸ€ù_ÂT¸>×ijZ"(Ô¾è&aWµN«ÔÐÎ@|PAÿ¼ƒ^çÓj3ƒ¹¤z|¾rMš“iáT ¹Ðáˆûç­6>Ô†Ð)ÀBd0gЊ!Cøg ÿjÃß{“îm 7†Á¥ß£ö-`.i=ò$ÏSä¬OÜóµgºôòÙ¼¬­+LÉJö–ê:l‚0VŠþù‚E’ éÍ¢RÌ?ÃlB¹ â’1–Þ¹ä¡äÁŒÁRz©¯…I7$Ž”úÞD"Õ0Z~OpÊÉí™_©­œÒÙ¥ÌÖ±WR8°«`pŧÚ5g> ñ[ è„°¸]šù} 3Í×”¦iÇf&çŒfhžš%ŠÌÑhjV´YÂØg¤?Vf\1]_=`øð†mNàí¨ãôù®~ÖÎàK'˜ª¿9 æJðPÚXæˆèȹ7³¬{3Å»753¬Ã.èéÿ½ó¯’aÅã×"33”÷ÓMΧ_à‰#KhJ*ÖEb>eHýÅèfR”çªv™Ž©8mP”%!º#2 §ƒ xv¼‰QƒÙCç.Åœm•#µ= ê‘¢oàŒšp²1•¬ÏË8Q­L@¬ºBöñ †ÒÀÅgLñ'IàC§Dì€bz!‰Æ$×=¶®º“dL™jÉÞ‹ y»B{dÃƨæÚ]M" ¦ú2ŽküÞ¸ñÈE_ÁÑ„ ƒ®÷ Üv>;¸WÞ”Ü éf&áÛLªÍLôž¹ség€¤3÷ÃÏ™ ¨™ÍŠ‰È·ø äËjûg.û}³‚ä„·‘3’÷À<ñ¢ää#w43y;N%‡n¼>²ý݃cq?d]Î>û’œ}¾5`Cǃ ׉›bq±¾$Òì'»‘MƒŽÝC1÷âðû¥å'k ‹j½ŽUëK Úµ»ª¬ÏÏðóëúã'‹ß>©áŸÖŸRIš€?Œý=úÄ^7X)ýÑÓ³ÕÄòýà {–“ûí9iÑ’ža€<´×R°Mù'—¯×ël㿪>,g7ºœwö0‡|XÂäÅÀÑ{:D†ŽQÈ›qFWy™€c‚_!õñx¡ò3Ç<œb¦W~Gá;/ýh W½Dœcrn+$‰2KX€AÍ_)‚[mK€ßsÅ1Æ[\ ×aòfÕ10ôþ-ES‚diq͆àqÁ¡­V¿°Ã®ŠdV­÷)?6ÜDÙà›.É|ãĸÁõNta<"µ‡±¾_D„Ñ:6Ë!Qƒœªg®ZMy<ºP´ËötÃ)V°ÕÈ\dU5~Uó°¬Ó¦=ýK…DuÔÏϘvµ¥l([™•‡h–Ž>Æl­÷]µ¸ÿWÌÞtæmD-Ù¨LÞSïf‡²¢Jù}q·³ç£\ȨgÊ[ó7=åýØÓÇLýçdÿØ)#}Ìý5ìàăõ}røåE;™tCv˜‰\–óŽ°33SÜ8ø€»?çy߻ф@ãѤÈ„7ê(Ò}¥Qß’wÞCbðI#Ÿ&^ FˆM*§¬ßg-†:C H*pʬQ¿ ä×aŒ&çÙ,Eqäé ¶ƒkÃqÅ%vÎz-oscÐ' f*é&Ÿ‹搜= Ô'#÷ ‘„R 8 ç Eéì²ô´s«ƒ-àpµàœu³èwÁÓ3î^Œ3GÞn¨©ö{#ÿ5Ó12aª jžX {!çÉûóN×—u5A€äX÷[­ ?Œ3s5µz¸qœâ²—*û0î+ŸÁšÉç°¬(i)ýqÝùpEãpÑœÊäÌö)¼D1¬%68‡©”1 ¦qU÷tÕ‡|Þ¬™q8ÕÜR@p?£ó¢ù—ÏL|/‘7˜1üĸ¢„›3ùlu™fqbfUÂúɺÚ{¹{²s¸»¥öö_¬mmN @Žî.toP"jðG„±¢·‰þ½px ºÅF{Š–Cÿ…¦ßµµCzx¸•ÃÝý1œL”Ÿ‰Ç*\ž˜:è B¤Š÷°Ïn´·6àBñÏ„ðk(ÆEnñ·¬—ZBï]XÖ/4“\lW‘ÆdÚL•kÉ…®N¹:¼æbãæíOΙ͉ìÔþ»£¬mË¿í: XÀRpþ@ä2F=‰M¢¢æ|y³Ÿoûw¨:ü|þ\åLÔ癥ÿÀËÅØBöeäÁáï“ù \bý˜7@’Ëos`ÔEÔº@‘”)ñ/ß÷ˆQÿÿ‹u\ðÿ’MF³ûß-mC}Iˆº¸Óœsö”œŸ(yÀ¹*~«¯ãf³WÌ*‚ŠÍRÈ, æNAßmñpJêRÅbí’‚{­¢Ç‹ö`¬zÑIÏŸÁìÌÒL½†}Úɧ°7º·eJ”õ,Äm‘ÝGëæ&±2ÁêµùzÞ¹¸ô6p÷Àƒ‰êxês{à äý«ýŽZ[#™D9'.näòÔ¦¥ž4J”?؈,w;°bãÉT¸BŒ¿ÆÓ1Œ¨ 0×`æµÑ\\m8›áO†ŠhÑYQó«êêû=Ü1ð=w jö§•Çý7Ìÿ¤ÁÞ{þ'n” &&¨‘ç¦\6¤=ÜjOÞR< ûE}Þ ùÀê˜2éÓ†©X=qk‡—gG Ï¢A ЮUÌغ#6&á¶ùg(’… åºRèÕÛã ƒ]š@²„™¥AƒÛû¨£³i¡¥U¥ÆɾãØ$ωCt¤>æá©¥úS5×õoÏx|R_ü©’U1ÛgÌ^…¨bòt¤k 31^¥„X"I)Kz;<Ô–HܸlõShæR‰ì“Xà¿0Ò‰Ôí·£•ìã%b,™ÎnÇi¤¤^U-_òf/è@ l"¦á§Ã:eD¤xlßÃ1!Â^Èá\ë°÷B×b^Í|ò£:<ק×ýIÑ:2?Ž`¦ú£AP£ƒ³öLBë<Ô#äAÂîÏáÿßÆWË9y•éœŽ{aeÜiüЃ7gLj·4yWŠiF¶ø駟£gâ0è=¶SŸUÐ:¦Io#Z!Â`ÐÃÝõ½ÝgRPâߣ8ùú|Åñùa×ÇçcŒÁÆ@Û¡­$ŸJyŒ¥Íf¦« Ôé³Ou/R³{ÒLNƒçÅþmLÎ3¥û–¶~LÆá°Ëoa_ùte0êÜ*ïnzG/÷=´Á,? ë?»‡ø˜nŒ×²%‰×s:<¿w˜Õ¯¶Y¿Ú Z4ú\Í ªX{%¬…°êØ%H?ëLŒQÑñ@G×Ç<9è½—û;¯Í‹—½ðæÅߢŸüÛú›Å…·óëæ_SÁVô¸¾t|>ZZ~;éòGçe myÒÝÓ¬Þ]«;I?Î>O›ê'»3¦A â¥C7?¼Ù;쾞–=ÿœcÉEÖ'6ºÉ󓫧VôÑýh¬`Øÿõýýƒ2Ly j¯Õ /.‡ð"’™p0&ÛŸdò`((¾À!KÉ ˜k¡GŒ/Å^¦Èü0,'«,‡öDäDžX®0l]RœÒ˜3Ž7Ü‹L>pj)I+{%L·NÊ׹崸×AyXW9³ŽH?L,Ag²Û—ºy²°†‹<Û†±µLÒ:bÄ1Àá·ü«ÛÚ%ÌBt ÞËÜÖïµãs…®\Ž3ù|ÚpW¦¡êÔ:€©ÒäN6çH5_èÖÿº5Z7¯¿AtÓ×#a“Èæ& ׸1·ÈôõÃP û!ŒÆr}ÉâC]ÔŠ&îØZ”Œ>ÂæsÒš ãÖLÝõ$d-Ûí/dÈn;~Y_¿ù=9= ú§£›ÁŒ,ß°5ÛQ¬ú7[À@£HÏ{:_îñ}¡œŸ Mrñ¦”G6‹8ï7ïo0}6¥~’’p¸YN2~›éûØô0n ¶ªEª%ÇvÀ^~^|¦F‚ùòŸeëô–0‡xJÃõ„CòDpÀÀ5†NbJSÃýx³¢˜ÓGVžv¹ ö»kûÐ!—åE„3›_dJ‹3 $ÀÈaÐÅä4  sé“+l‹ŽÎà7 nOeüìwà¶Û¾U}2Äø)9†á˜& Md)-<´i@`¾y)úpß#weS8C™…¦ð8ºÈ8?£<z˜Ÿ U¿Ø™Œ—¶¬æŽÚ$üþ\µH³Øä9mÇÌj³ˆõ¥…f°úƒb‡æÄå[¾VPÿ_àŠFñZé'k€w¬_³ôl¥’©\”vh¯%¯¡ z)¥\Ì­ìÛ‘¤oçø ÈCú7ž-k9®EøYs6¬6  ½®ï5¥lך§œð)›•i­vÅ'ǘ¼2ºSjÒÑ•®Õ¥ÃÙAÁò£#S~Øʼ·cÓ‹IÆ á†MÓ–š?6¿YTMmöÜ,Òö?M+£—ÊE¥‡ûbÎV’ìAÔ­¬5h”6%Ô†ü5þí¼=ø‚Å5VÈDƒ[;›-çÜ…öI´vÎ"7Açn?êQÖ1¹3¨@7¥Î` ¦X çsì ]ª•ôÃJsö¬OØ3‡jx¸rÿ¤Á{Áu0 È°|,¥¿š¿=‹¼A‹UUDÒTlÔ“'ýr>mÜû†*&èæÌ}[Ð {tSw(${NÑÀ°Rß0¾JÅt\‰Åá<ùÕÄøÌî8IÜ'ö"·ã$Shf>E‹‰„í1 wo÷1P‹r” ϶žïì«?ŽÈ9ˆ—Ú¦§Æûf¯¸úAýÁm`üxK©.Û‰Fd‰°°*+</Q¨´¿½ªèñGd?ñ©V«Ž¼U¢˜ „­3ÍÏzQ³ ®áûSÒú£GZrô“L&E°~ÒIè¥]ßtÜ¿Jòxd@&íÖjV±‚ýÿû¡`šÇ6h ²‚ßÞðû·Ðy§¨õ ;¼ˆUˆèžAée¦Hë¯þ©ÓF È/†ùêÑ(î`Rç OÔ¨ ¬ –+v7è(¢ê¸Z€²0:d[âúý¸˜û,Í‚,~ßÈázNjˆ”óG¼ßß]:><5OÆ*¢Ë­ñ½•4GßE¼kˆN‡ÑÇrÌȵV$™˜ŽƒÓØò^ 9ÎŒqTÈ$¢7£žûíjâK÷^2ž-ýµ~J^eèè&ÖF½wp$÷ bäì oûÜê€HhA,3×kÅ$& z z¢Ú;¦ªXà[ ”eo-Ó¨WclO‹¡ ³ÈõÔm4ÂLÑ$5FØCTàUÙÆ(Æ@ìV¸!QØÙFÛ‹mÁ™Yìç‰90³#LìLçà_Ãýð†mœé¢˜°GDgG‘ä{£¿n: {MΠ`þÎ} .Ÿƒ3åtfdË;‘lÐGç0‰&YgÝGé¿»ä»;ÏÈx€wþÎkõ˜Ä˜ÀÀJDZKbcN‘‘Ý€Š2p*k©ïØRA‹ž¦è(A)óçíÍríû·ŸvîÒhE* g-Ýì2 –±BOŸÐD-Ñl´ú#ûxæù{¢g+V;ëO—%Æý–Žçõ~‹k}eOj7=x•ÖÛ M8«^!c‰Là¨ÓºTÿþIý¦ 3ÝéÀL/i%7ŒÇ\a—\Ð’O ÑoÓÁ@‹IÔxEf¤VäiÀ¬ 5Ñé2PåÙ¯T½LÃØѯc‘‹ 0ÿ¯õâC“)ÚG!}¹^®j=;v·´.45 hYä[WA'êSÂ߸ç÷áR6¤P­89p^F”²ýq}¡^˜`j 8ŒŠ,üCv2ösÝ6#úƒ…‹åYxö¼çû/70NˆZÂPæsæœ×KÈËÈ‹½ýƒ#,·¦¾ÿ¶B†_†$ö‹Y˜ð¼Œ¢Åœ8 XúG•‰J²’²èÏꪲªMG¿†v¢¸wxÑ·ÉÞæZÄWŠÓVõ®Ï ¬8Ä€'C7£2[ŠRŒÓ¶ ¬ˆ“ŸàVqùaÖÕ«Ë;‡ &Qì8ÄÖ3ô§¡Þ4¥·V’Q– 2J– ³Èü\nèt‹TŠº3j]šNÔ1Þ*Û¸cÐ9Bܾ[£aV4ØÆAÈ*Æ|Õ!–:ûh©nÓL#ü ª²F®]ÏÏŠ‘†:7Ø·@B1Þ9 1`kë3 ­wäó{CžäDÒ¢å)4a”…·®Ö;qTÕ¦(PH@Èø¡³8rÒoã aÐ’Ñ»sà[º6ä`µ³ÁP¯ŒöÈnn€ú"NF>No¶µÎn ¶¢8w­ÅWƒe­§ä$by3µ?ýÌyhia™:šÞœašlNýgBýžÁ~ ¢e@lEª ¥¬=SÅ ™0<×øhM&J÷Mâ[ ŒD~¬®ãb 2¸[° ‡Z§#çfâ,^‡mÀª¹ÇK8oO—+Ü I©ª‡ZC6ƒ‚«ÂUØÎ@Á ÅXM{þC¢1 JrõÀØÑ ¡‚ôà[5Ï0'§œ]©«K'dÔ“Q.t߉ëã,*óٰΠ€žÕ9>zP’†ÛcX*„ãœñʦá-ðÛ¸’ï>™Hr£>´Ž Þ.|¥öÙ¶/1¸íc)j7?cϧ¸8LÁ£¦¹OÃà2ô¢ô*`‘ðNXœxŽ§¿þs%YWžÃq0B(›–¸—Òó`DÂÖ&±WâE‹Äéµ™]8Üòø>ó‰á5œ[»`Ý÷FdÍ#žUÕyœÇsTõš£+‹zqîæ4l­@dòO©G•âñäN  ¥’Œ:/©¯´Öfi{ËUhç AÞI dz‰[zÃ#ST¥(3Hraª>~–ªi„üŒÓãã³?ÐlJI4Õ÷‰çˆÅ© pñ —ÊÙlÓ–hY²ÕRª$ýc­X‹ÞÿIHGä»XTE”àØuÿ4±Ò¥ç(*ÄĹBƭﱦ¼^âÄÀEJ¯§(ù§‰&WR!étòšÞê´Oæ×ô-”­ùJ‰Ë(ÄAõöÚR¶nO^Q ƒŽZ0aÚz2”b~w(}ÂAP­ ºì%W„6ï1˜¿`Ã1iwöPü;¶›µ‹ªŸƒJ}Bê{×fd¿×ÎãÔèjp¯]Š˜Ýî˜=š»Õx§q)• ;¿xðÆh<Ù0T#û}—f̵ÚÉÖdÅÌî¾wŒ!*ÍHòQ<Ž*“¶jî´MÜImMêÌ&·vujÇß¹É}ÙãØ»@Êc(ùÚĬ§›êÂ8¬F6çΰóý–¶”8&ãÕÿÛ½´°ð­ZÇêÇÀ?—× éd„–r·YH +È ±Ÿ³&\}•-VÑÅŒ½xÜÑ¢p%É C–(Ý«þ2Ž”f¹ûô»w•;ûPol„°éȬÚàÛ™NÍ”º÷#â9±ñmŒZ :ÓÒ»”ùÎwFqt:±ŽÄÒ˜·Z¶-µÝc&g=ïf+_ý׿ÖçQökãí|³ÒL€–¾n.~MYìWÉŽÖt±‘?(_ ¤û×”M¶/;'äÖ,®ª{×Á½ÜÀ|‘·\9£ëGä? ó'b‘»úwi¨röœ-*§fãvøfùÉçPL8:ˆ¿`oÜÿd´Šeœ$L;ŽWñZ’wÚœ ÊŽ1t—Bb‚>•ª¦4ª¯“(O„gü"O隀ÏÕBæ5àÔžuÓË ÚÔqˆÊï dD›te:ƒùI°¶îòÑSz=§£,ÓñOd•ª°ƒ6ŠF1 % "YDñFÑKd/, a‹(îcÁÚÖíZ&u0êöþõã%KížÆf(ÞŽ®ãBnàÜ,ºæhÖÌ¡Dn ™ïè(bŒø  wSc W©Éïæî.Y¼1À²×ÒcY¥Q¯7ÿPl—f± ù|öbñ¯šn6KøâTŠiwˆù=-¿Ø‚Æ1¬‘ªµˆÒÖ™ÃÇfɀŸá*ë`šÂpÑM ¢%“a¹Ná?Ò0·e j{ü€ÖR˜âö%¨êëwº¨á³L¢”4¬vºìFmå?ºWÀ²KÂî—„¡Äç$‡ý ÃÆÁTZ2gw ¥$ˆšø7K?­S¹0ŽóθEÁU˜¼´¤4KÔ—NÇ„ÂsQ/DZ“š%¯ ”í—ømÐ DbÒä¨2”(K8\G^\¶¢]:ô™Ã«ë½nqÓ?@‹Í_)×úíE£|*¥„†[–¸PìMým£†¦ÉÙá‰?Þr\÷)Éø4Æï‡E—ÁM[ü˜YÙ {Ï_%“b id‚&]ä>fÀN'‰<&]ßÖrõ¯ï\­âcŠHÙ.¨°3€Ð<êÕÕ\P¿¨«â¡X0“¸»ˆZó¢Þ%Åʸ_®½ø[°ì¸#ø•á4o$Q7R×øîäZÎ%ÂGÃ^NÅÑYŽTfw 0æA ÷%‡n]â*qPre»¼2ÂK.&¾0®Á¥ß£ö-ÍÖX‰[û¶Ó.¦… dzCÝ©„d$­Ê›Î{‰¿ÒP\IÖ8ìr§kó—i—%])stñz©KA Õšª£q&0s„;(’ÇÛ1=Ãü…g§Ä?ü†6¥\¬ì–VŽ±¾¶Øn_Hš¿ÿ´µößBRz—Ðgð|’Ê­=ð/¢Þy‡7Gô{Xãº@‘~4ÖéelIÆš€L—ÑB€Å…–mUðÇï…qõ5b yѺeÝ^»áÅ…#®ý›Y‹o1ïÖN³åNm“ò\aˆ óÍÒcŠ6œ@ÃÁX¾ÉÉôiÍñlwM ÖJ¦š‘?ÚåR¨è$´Ñ_c õ0…tv˜·é-c±8zØŸrÌy_s{™2ОXw쌒Q,i#úiNyjR*>&|Ügò°@ÞMp¬“H¦­%ôcI7¦_6“¢Ë&&wR2ón¹¾X_L7w÷[Pá®n³i,\®?U˜¡yC>ÙôXš¼K?|7úKŽŽ±Ü‰ÊzÐ7 Ý¿ã)“æ4î@Ž‰ÀY —Q7h°FyzË7.ëÇÃÒÌÁXL µïn¾Ç}€‹ æiQ¾çdÄ®íˆ b¸¶-kx×ûLËMÚ¨›ë NŒ0ÊYKøNÿutCú +Ò èà…GŸ—ò 0ÐOÌ‹Ï3–ÄvÉxÎÙ(«ï&žwîUòÿ€›q¬õ¢ w`×g«±P;‰ü%'ãCÎEÍÂÀe-ê^¾|í¡û·w°¹åúÐOP3kíb"@r¹ßü·ÅÔœ=”[H‰\¦ìÏÓå¼þ<]¾oÄ%Q$0D’/û}~Âv>a;S , ã‹èZ_N)èG¯ ÷ ãPêÿ*JO}iÁÓˆÑjÅöËbá¬{GÌD|ÉLj,û=Öc׫Gždü6 ë’2R€þ6kê g^Ö^¾F–#VóìŒ4¯âNt ·½#rÆ•=ºhòñäÉ“ªb9VêÈš}(b’&΢0õÜÑÿj„ÙÂ/Ù¥GO¼ò‡Q=I:·è¦Áé϶¹åô" ›7ÿ*Oí¿W–Öíð¬©Çõ± ZTs‡[UÖçlínW¦2“º‹›Èw…Њ•ŽOñ¡<Ð0ê‹'÷ænQéðüÁÒ«d²ëpð:Š É!mMäê™O„6ðχÄXΦ›½î¿Öÿ„Ì–‡¬9ËhVÞ]pê:ve1‹3GÃÃT,½Ä­Þ]æ„Phÿõ´3*”Œ¯Ãaë’Øoµ»É˜Q{¼ô~¾ÿUÅ÷óµ.Þ†—ÎânØÇ·ÖOU´déŽá»®¶Ö/ÕΡF»Z¡÷\ðN>8/²MÀ»¤‘}RH;ðÃ4òtAÁ«›xº|f €eC…8ü0°Ÿ.Ûc¨LpCþ׺?mç1X¥ô‡úáÞ7ÃñŒåc¾7€ƒÐè ¨ûnu 58BñGÔz:«¼ƒÿ~áÝ>Þ½ֻ—‘ûd’›`942"¿Þi×ßGÂÏxŽ¡®6O0Iˆµâ¬O€ÿ°pëw‚Õf²÷’¸k:fò…§hM¦ª` ƒ‹ò¡AQè®;kÍb^Œñ&0ÍÂŒ챆ñ¸uÒØÓ,…}á@ДœæRÕÔ?xë[ÛêÇLdøÆ–3a£‡f; !,ì 8Üwl’Òãú»1³j§M·dK20Š¡) Å*¡£bŠÍ›ÓÆã`3¨Y1ëÀð0ì^ƼDU]F×”/Šº†"±!Ž •É:øàøzŒrÒq„‰Y „Ò èÜ¢ˆð5L¯ÐqåÊ;ì(Y8¨Z9¡ûªöZÕ®4îþÚ(c€&`”áÚÚÑÀOÛ2FÍ>]®$ÓUOòTIÄ(3LŸ±ÔPcƒA½(š¹âu†WЋJQÎn90ùgâˆ,÷ôÕA«25‡ê.8ª;£6ÆÐa ÙPÑÊÑ”o [%bíÐi2ð×N)jãW¬êÉ2sªû9ò­`«D¥¾Ží=_¬ªfi©RYUñ;¸Y¬¡gÜa=¿ÂW± n–L Ë_V?¤{èZÍÖçÕƯofÔÛùËë–ßǧF{5n¼Y©Î¼Es=x^{óëÚÛùåg(¬äS±¿–í2€T¹Ù++ø¿Ó»$©ø˜%kŠ’šG|Ù)‹.N:"5I8µìW¬Æ$ÌHÊ¢WØ$µÛÞ;¹ ô¯× ­¯Ã±6jÿe*„<àÛ±0vJîl½Ã0"X¯…HMÆ‹˜™M=¹?5f¨Î¢ä…´[> “s;ÞZ†Bçp|»ZM¦@2s‘2Oöjt#J0GQÎx4ËÁÀ<©ùd÷…ó_Ïá‚“Z´š)íCd9+©Pä&S'φÖóòB×éO¹æµŸÕ´á|aW99·Ò“¸ ŸoÝ©Ã]³’̤Q ým¤ÚcF†V‰sGEú¦½<Þ!è×q?ý/‹ºzÿËÊGÏNÆžÚšïìºJ“c­Eûõ3RÒ‡ÒÑO³9¢xI‡ÈómûÄÑ”Ñ⸱DÇ6ñh^¤|r6ठ­û•Žèø]’ &¦PrÀÅfB*Ÿ&Z`8ÐŽòÍ7&P„óEÆWk¥9öã0ë—,qqµ¶ª×*\º—”N\[#hõLÕJssßÊ•þ˜½úP©påºò¤ªTë•®NS[;©’xèã'qòth4‰½»‹”j ‰—òÐíV›?Àÿã¡Þ<¿9žS:Líúq_¿ò;¼Ê?‰OùC=ÊÙŸü®)f|ŒgJÚ-…)Ï9%3…¿Ëò÷Iö¼€·{eå=™šÉš&+>‡Ø¹$¾æ­n¿3ˆáý¸­Ð&ƒøˆÍ«7hKì™qŠ -bÿ"Wÿ lÚW€Y8ÚtéîP,±¡qgצ –3nŒá -*roË㹺¿†MB†­ÆÚ¹sšÓVVJâ W™ÆMbs˜JšL'Íó]ŽŒÿ‚-`Ùnpîlm†÷ÂÊQïv ±ÓÍ[ÙæSgCt&Š+Sz˜t#X ~w–Ïw`™j@c‰rC'çD9ÇõÄàáüÞ!! •Œêö0_˜ÁñO†žSÇ,«O¦õ‡Iq2¦KbÂrvÜ»­èq}ÉBì7+YÒ¬ H² Ο"|gINÑnÜÃÚ0ªµ†‰7;ëŽÛ?YþóúÑœ™‚Ô*ÉdäOYxƒØÛuÓ3îêìhl9¡ Çb1é·4Ž™˜8u×RPŠg-•H‘—Û̶HCadP‚0{†I¹ó[ »Ý r†1 ÉÒ¦nÑÉÄä÷n‡—Ô&QëðrÕ“)¦%0)TL·>êK<îÏj¤fxœï´Í¾•S{-¯lζ {€ÊáÐ#sì fÕ¶i< }¬Ž;„òe˜*1Ûól ?dc’Lݺ™ Ü®îV‚¡XA 3k4U¿L¢úqý‚3åœtP µ¶»ù•Õl»ƒºê¤YçµIg›zÁ‰qß*ñ÷¥ùmk'O ûn±I”¿}oÒ0†ü·­9Ÿ@¾ôAc/y7†tÝçhú8²õ…-ý–~aKÿW²¥Ÿ‚$ÄWw22éâ“È~ÿü„[ùBþ¤Á‡|â`ø»’k DªÔxá|0‘@(K&Ú¼ÄS^x2åïºðè _.<ÿ]„B–q©°J|â †=þÂcJü/öpxéF’Óœà—ìh¬ò2wº\2z3{ ˆ @œr §/Ò»ÉÒ%mXV§Xã¡¥KºÐÆ×[°ªðbg~˜Ç,6à®_…qx»zx»v¶Ûé÷Ñ^¬j‡ã ÃŒK &È,Áªûl’à†ÀïÜÏJjn»gQ'–E†]’Á´gz¾ÿrÃó𰘛›3?×ÖÔã ½”W{;û0^Oýˆ*è<™þ_!;¥Î{ÑeÅ×b–ëÑ0ð¼¹¹d|sE1+V*Àaé©p*ÿ¡Y®å%"«ÈI>M)b>ç‘ÊYÔW»…ª½ùÞ§W‰˜9Ä *:$mUÎû9„ʇïIz¿¹væ‘?V‹ÔMè½6Mwªºš—>ïÂŒqN1D/™†–PäÕB‚Šd¶Óa\¢v‡xp˜âÌ)˜Õî´:ã!­âÂã—6{’"áw¹+Äô Q§®ÿÿGg?ŸÃxòÓQÜ,Ž9Œ›ÄŸ _Ö,1@ž·JÍý c™Ñkø­ÏœŸ¬ƒòŽ¿Yú çÌT.J#t~&¯%üQâJó)ärÌN:J‹Ñ›«7táUr^UlÇ.®µ†ö„Ù»)™÷‰¯ÃM k*ùÚUíF•THcÚ*‚êï1Lsž^3•K‰pl¥`²'ÓÁ–G'ÑïÏðNª9‘ïÕ? û›@ûü\°´u73l$NNò{ÑßD¸ìÈšïˆÍ̲ÛDg‘œg…ÛÔFX£÷½¨’çFSEgŸït0UÓ2 wõ@/àxãû“òs°ºe|/¬:4ÕZ!B“.óëáw‚ѧÆ&¦ œ­Ú†vŠÛÁÒ÷Ä îøähçü¨j?s”,q°ˆ!r |1/*« ]X²'ƒ:³SÔàkôªÖÎFE€SylÅQÙ„â}Èz/ú¤w¼¢™nŠr««zfƒ!óª˜Æ‹mž1ê¶x´P¶Nð¥.¢¨ ¨…Ѭó]_œ5psf†£¯¤ùÓz|ïë”s’bî ¾¥¡ó› ¥“}úFÆîh<#Ž8>ù5fÕ>‚¨´Ž% Rk8¢%> XÝý Óvùa§iöHËf›°Ñ§©îìòÌb)íâŸ9¡ò hiÍÃÉúX#ÐûÌÇuS“a«ƒ³£‚ã8ð™Œ=µ¾óºš“¯¯×Œõ'èBƒA)0EßoUäã”ù˜x±ˆ#òîlÔóé…Þ<–ýàZ\OC»ë“¢0Gë=Ó%1è@!È`ŬŸ6¥ð¬V*ÔlT5]¬dÃ$»™‡ðfYgLº„ItÅ­W’ëº=ãÉpÆYåÐ8Ðã(Õ>Ä{’ÙY;&®æ« eª·õuufffV/#Ú]´†èÐý®Ç‘Â@äEkÕ¯ËÕù;«Ê¼) £’°6·šöœo üë@8u+˜M+ååýwy R[<óõSîïÔ†¹×þNÕMíïYµç¿ƒ7ÂP€!UuFB.ÓöJ {tËNÑ“¶†u-A>ëù¬æ+Ï:_9Xp¹Ö‡V¿Û¸}eÌBÊôžØøm#œ–6DÂmŒG2‚PèU%«%®åY!eAùy&Ù|ÈFª~Ñ­‰©‹û¶PØØ –/1ÙB¬°Šg=6ÉʼÔgd‘*#ù†c;¸é#µŽz­`…_o –±óº= 9[85‡ï.äà¾,™_E¤ÐŽØ<,öàà ú°vš¬¤cÏ“Ô-"? …†À¬Ó‚ë·!¥e^lá™iS>ê¼&ž¬ äÙAR Âêfñ¦YJÕl’11y–ž¤å?Z†ˆÚ ±0+BEk”$Ïàç©ZÔÆvÄmµ1 „þ'óK®*+eØ÷/‚8ü=03;ѧŪà:¶ØÆx·8u3öhwOúùÖÉáúó­ãm¹ãäa>̦Åâø XÜ¿ÃœÕ.:Î’•Ãß@ï<¼ Ú^3ä<ÐÏLeFÃSèÎà¤Æ9ÌAü¯¹¨e»˜Å©%Æ«¤½ )ô€âsSŸA¿ãq)Ö:ŒHéÀoHØ}ré÷ÞQ~Ó=LÞû‡+`Ð!~ï®Z¿ ¾H®á¡Î"•zÀÁCž­]ˆ¹€£sZ"¹‚£X­•Â ¿„Wþ0 •ÍRê=½Ã,Hx÷„£­HGÆRHó”Þ]ÇïÀå´}«œòr¦›–×÷iy|•TÃ0?Û0cº§ø(®Z¡e`ZÃs¸vá ÃÞÀ6ÕñOÎèöÝž#&òÌo½cÎmäÛª0”Íu9ÎùŒóU;ÙÜð^l­onã•Î| 3¾_å½`Køy¡rs–jŠæ ÅÀ؈G­¨âÞÔ[¥xÖù§ ©Öº¦¶Â¬¨&½ã Ïz©Œ¨¹ b&Rè9»pJ“$º—û5¬uŸ<À_ŽáëÑúêÔqoÙ3Ö÷~—&Ò(L9¾ŸÕ­1Ë–³ºä|”>éöŸ>i.`üø°±›t@ÉT:ïtm~ Ãl¢v•nÈ'ݾÕAn¤aÀKÇ6R°3=Ó\P (åNà8€éR¦ï™©s†å´˜ú`Fe¿Ï[ki<Ñ rûüÝâ÷K3P¯?êaTÑ!‰ï¤Õd>L»DmeÃÙõm†0›NT±kÍ|ÛúUþ³$ã-¾…9Û¥L‹¾j%pXUzDúÕy» ÿ["ÙŠþ\˜5v" Ò­n‡ƒxX2 ǃÏ''$Îf=Ç…?8Ãã'D»¡:k_±sŽ»TÑ,Õœn•Ô˜¦K²`G”±‹«rš Y‰ª’1¨G$Êùü5òH…(7@2Ì.;£®¿Ss ôã¼ [@zÐh8äªZxº°`z%P NW–ô7¦ès8s¼f(2?캼.¬—>o›ùÜ~´Êl;Ÿ~\Î;ìEç8Pà߃ATƒÙî%Ã6N;%sFƒ¯³*K©Nл^¦Âó B˜‚ãçÏ^Ó\R–à‹€I6ÎÌL ›$33¼ÂÄxG›¯Ž0P··q´µ~BO'G/÷72“¶”™µe9a!ÊBŠ™IÔm /Ò.:õŸ¬ -9„g0Ú>èÙ®ªÃ£ƒº· Ý£çWG;'[Uµ·~è¿X?ÚÚ$D‡.ïš Ü5*´½¾³»µé4þtJìCXó QP‡ª0ß:«¿dšïó+Ý°ÐÈéÃw.²HÜš—ΆQìUøœKŸCšÑN%‡é mDâ®ü!íWŒÉÅìÄïu!‚2dâK,-{>Á¥T’MƸ4i›}ï. D7o’Æ.xaf†:‰Kzx´óóúÉ ÞyÍH@8à’™…{¯4ÓèÞ„…_\L(g³öºóiØ]Í?JÜ!æ¦åܺȃVÔAþUsÁÉÚcŽ[˜ë³[¹Òð„“÷úÀÚ_( €ÇdZ3—Hb¬E½¢WoZb»¤©­óó“l:Œ¦§ùÝÕ0¤G”PÚÇÓÚÅÇ»”s—r9M§qÅðVã=ALj52þ ãÅ®Wè|]œCAÝl¼yuÑz˜7TÑŸyl³ rÝHÍ»³m‚Ó¢Å}„‹hþ¸Æ8ŠŽ/ìX L,m‹— VŽ4nh…Z,:‚»‚=ÓESöQIràÍ` ºìpgC¡·c½@ÖJ~Ü]#QY> ¨{í‚=„«åÝÔÀÒ½Lù\Ë Ž”îLhÍX¥VÔZ°ùÚ|M‚WbÆPøÅ2õ~™Uô•®Â{øéMíúñRãéò[!i‘²v.zÊiç›Å0îÍb]Ü/F[orϘŽÞ»Mêqº9óÒjI/0}ûh«ÿ‹V‹›VäJ+σžÇ×”0"7Wé5””úK¢Gƒwþ õÚ+È#`^‚!Åx\_®?UsǜĬ’ØcË^"Yf×o ¢ºee²aéA«Ík™:•úþ)¸—¨‚Òr ™ˆ¦G{Px È´ÿ-K†Ò÷C F8Yâž|º¿—fì©ÙLfüÁ¦<¥T/ÇPgç»…@ yÉ”sEýzRôÞ)Ö6eaÖ•F Ê®NÑÄF£aŽ6” ^ûƒJðêB{å瘟L[­’©Ý3Ùõ+©dãùçÀñO†À­–wM=Î"pòé“ ðä}(âšÞA\绬]i­2iýÔ«­×'Gëf=‹zj’÷‚³ÉÂ#Ž–ø{²üF•à^öG7?¸šÅGÿÊ;(õÛœ£ ¾¥ió£ƒ%UëÓ¤Y«ÐK;¡åÃNØö³† æeÞ ‹ßRý¬¤»hø¯á`d»M¹þ"¶`V­÷n%…J˜´Kó" ‘DEÒüäÉìöSq3堌ţØ<£Vc‹“š£+)Pmp^½ºÅhþ!–)I9ÎA› þZ›‹Ë]ùµR¦Êª“í¦˜-PÄ ÝDnsëÙË繬¾õo5CqÀ¬ çÅ&ŠvÛu–b“…8k×mÔ;ÚÚÚ‡­¿’m¸€i'´á›$ãU_Œ3axŽá^{Ž™*õ ½¾¼—ÛÅÃŽ<¢ óU­#oî8ÇÖ›KW²+ÆÈXÒÌ—èX÷‹Žå,íØY™RŸ0JVžäGËÊ-ùwš•7˜ ѳÆE+¿FÆzÉ¥.tvÚ4÷¦äÀúXÆN^ pvs—¦Êì LN/žÅmK°ȈÒiNºƒ6‚nO„9$ö›>ÎRØÌÙbjlTDïÎA€¿k½‘¼k_XÜ;¨dL)°®€ÄqÓ°$$æÊLÆ">;„`’[Uq„Yè‹áŠ¤b0I2z^÷²ÝJKj½ {—ÌÙBVH†¨Úµ; ð¬:~ö©¸ç#Œî•^œ¼*ÍKpÞì2®xûט'vþùÅ1äÒpêiôã3]M‹º$”–½¨ëÚZ˾Þ^ß=ÞZ+Ï–5=Ê«†ŸÇÔä8sIŸ4›šéÎþÖÖ¦·~¼g:b^dºàåÆS¥y.CWÔ"¸¦¯ô†ŒŸIÃÐŽZ ó#X?S’Ÿýw ¡!èõãz¿•û¾6ê™,5P¦èti²A®v¤.ÐIN8ÁÆN?üÐÔæ•lºB½"5H|tLjAÖ¼`•XŽZ¤Á¤1 ³²P„õXœ%æR1©_n)FÆY œ€c¿FEŒ ‚d×óAÆUR¡™weh½O¥µ¿¬Qëdg¨ó; <u°;œ§P ÀXmÒ15¤tözD·Ñ–¯W´ƒ"S¦ èWé Æc݈j…Û!“’Ù¬t¬.n»” ¬yÐü!f£Ã~ŠŠgž'úœ "¿ù…fé{­6XÁ-ã£r8©fìÜâ)ŸOAïÊ;¢r’«=¹‡ØA˜µ`Xa*˜vÉ¢…A0§€ÀðöœßUÖ^ôàjžªÎë6¾7†ðÍ¢Ð~n`§]#J¾ˆ6ÜÚ —nV ˆ2¨ÉÖYey6º! D3mG>úßÀ*ÀÁ””:3 @èEd‚ËbVÆND6²¬*äýq"Øæ/8?[!¬bÆqDuïp(É| `ŸtóXøe‡ŒHãKÊ JúwÒ;ÆÃ6òC„¢>z’q$'yƒiá‡Î-ö›Œƒ!ïšK`XÕY84!;Lõ:¤ƒÖ³«‘ú]™Klâ1+T?£•'Q4â«õT9nüÚœ{ã×~_¯ýË{+ µï½·óÍÊZ}¾Ñ\lô˧«€áìRˆ&ê´³Ö,•¼•Zš?a{³s|$KÖë|0G¢Up`„¢ˆ7ó•é¯Ù¯ÖöwöŸ¯È´èÕ1ÀÍVõõ"eY<ÿ@HK«ßwãì3a„ÌüÎö1ü—æ”’ÏÖ_xëGφÏô||ðòhc«¢L0LFìT¡Ér>¯òÖ¿ÓL¹Ü³í»R6jØ‹‰<Ãè·VVåUeŠžæ­²)ÛTt •Ê +öÛ(‰U.ñ`~»Íïã(8Bý40âÑ\´†#&ppñ‰Uþ±Õg³)ÖºHcä›|Ñl’`|³0SŒåF+—Ë‹U ›Ûö‡Cn <¿Óuß>¦ß5a[@Ñ:>4šÍÅ5´TnôQ™“ôøyxɸɮ=ømÒÉv«ŽÉg1Ò:¼dNRƒ(6~¦¯kv·ÌºËÇ@ò úPÙ P5~MŽˆÆÞË%g¢juÙéjÅzfòëÑ œ—7|x ³S)5´(ª¹hËžÐ5뛆†jÈÀA0½X}­¹ôAj¬@…²0©lJgÂósò…ßÄXU°$ÎúRŽµk„åÚh]ðì6ÐòÆ@w}!§¦a£~Û§£{ë4O«&×xºšV }…wswv` xÌ—¹cžÑÒ™A§L^è&I!‡è¡Hoi?­ÀŽ€½Ö½Ò*~ï@/•0‘¬)•þæÃ&…´ßî‚ŽÛ`Æ"Ô¢é¢?f@S/q‹z1F=<íéИz%ï€Ö q’ ²PÐèÙÀ-á†ä ûû[h’ίHŽ"L½Ç¯P ÙXJ|í‚› %_ë¦õÒl½_+—þà§åBaskîíózã`{ç¹÷¢À‹gÑÙ¿ã5zš_/×´{Yˆˆ³B2ăgÿsŒ\‡-Z ©ýÊjrØqÎÝź:b µõП‚„ÒKÜ ÚH/¹I< º<¬Ô,½lÖõÆ*<Ö£RCÎþ e.ÚƒÒ!f¥èÃ*žRŸ–êêpôQ°É£ÙÜ9Ât{H|(-9gb¦$Õï‚×ë‹ IIV€Â@#ÝþÎdA—™+qIfá9É/ëìîxÞóÐ.ú‘¬€*ªféÓÚ L€%§+æÕNª_,€NTf:éÖZ)iµPØ=q^͇HÔ‰…Or¶ó} : Ãí ¹þL°ß NÚ|ÃñÖ÷»^Ü‹Ÿ×ÛÎi0«^  [+ÍÅÇeîlêãýÚ‘s³À¤Ã?1Áº·àW$M„ô;Š3­×[[¯O’!@<~g¤#Ö«Œ|$]œ%$™Ž “"Éü±·¾³ÿÛ:òö6·¨ú‡bR+·Aû`õ–°–ÃŽ•~¢ \m²½6¹YLÕnÙ}+€‹®\W/¼Œ9rÛ×~/ËÑÖ ¢òtY{W†ó´èÜÖ‹–Ûë£;Äõ½Í­Ãüñ§û ‡êüÇk‰I¯ÛAc#0n‘û Ê©û×nýxŠáA¡àúñ|ˆ9BÔÌóÄ©SЭüŸ#¡ÍŒÌ•ÕN=&]í?0šÂ öSx§ã“õ“—Çk ÐÈ ?‘‹" “‡òÖH¶ ³Ë–IWÆê³äeªŒÈ~“ªä4Z¼Ç¹Œ?xž¦ Œa}'GFJ9C#!´[”4ÊǨQ~Oâ«übaö+U:~±µ‹‘tŸ›³îØÜ>ŠêŽF½DˆÉSꔄCeçisòS$B¬¶¡ H"¶†ë¢ö¨ÅÀ ›PÕRdJd…!Ó.`¬FäK%(…¼–w" ¥]\Q"JÕDƒ‹{"äuÞÅЗÞP^hÈkÍuðwgâC³Ä(žž;žØìÌ6'Lí¬ªåüS³³øio9¾T;hëêwÂßyÖäÓ¸Z0-Ï`£ òøY4ô˧°ùr}(äÆ‘–þëWj–¦wïŸÇ*¾t£ãýñ¯ãÞÏ[GÇ;û"{Àp³AwDþñeeœX/‚¦êu^îînìm®­G}m¹¾ä8lÿ Ü&ár[ÅýN8$´ŽzªôÇâ£béÅUv"!‹Ž9VYH4Ta¿žÍ0¦Û#%`"‰í*uB µ U6Ëkeü[&ÙÍ0êÕþ…ŽöŽ_>;>q,ÝHî«jQÅæ%ÙÝ|?ŠC ÔÉ‘7¹¬¢—æ~m¾âý9‰ÆF¿µr¡¬1‹^pšÂÍ‚¯:üÁ°w(¯ø1ªƒÄœY}«£xÐ8 {>Ö8¯„N¬‘tî?ð¯lZÔ$ꮿ÷®`*úœSHøw¨ m™¶4AE °Üûœ*ðI¦Íè6àþˆ×8[†b)$±qÎ`šQ—ó{|YwF+˾(Y{¤(V¸Iø¾ýú”: jhsf΀S¼€_ëŸÅJn4[³ˆˆròÞë%_zô)è ŸÓð¹ú:þ¨f@³—×,~)g¤¼>#lµÎtT!©õLÜÝÃý±>Û×=ÝÞYÔ¾]+“t>¹XZdéz±ìÔ>¦Ë–mÙTlØ{œœÅ¢®áµ–M§[UL ¹‹µÒ⪫³\¸*™¢t…kº%(ä¶%eV 3ó4]®>ÏL×N„y…,C@¢¶Ò½¡<À„ôXãLÏ)쌭åÒÊ-tA ƒV) .6ÖÈòØÄÁÕ Ò_þ9¡\€è·-þ›àÖÑÑÁ‘z#©vvž{Û›o ùw¹¼ã5V<¬ xn@¿N ’SÅÄD¦ŽVVÒâ$7‰»“0º Û”¸Ã&È œt>Ôi€Âå«Š8í ×BŠÍàêx:÷xÑØ I,Õh7ñxñÞŽ5‰/¤m¤cH°™‰ƒDJ1 ž³_´~§jÁojA¨ž[t¼ž–S,# TÖláJ±ô¸ø!ù†pàöŸþ]J½(¸»…6²¥%¤¥eÍeÅ5NÁ¥DTvÚ£.|PYX¨¦§†§z<¡ÍnžŸp=õºèÛÎ9‡QÔ+b•e£øÒ¢Õ™¤”…æØõñ]w[‚)rSsÐ9$/¾*Â]¾¯à„Ì(Òí™­†p“3xƒ¤XäQ`fÐ@iQn§óø&é6oÚŸ×²Æ &›±Ý*SLw_H´ÍÐbb.´¸ú¡@b7ú½fU2M‹€Âÿv_n]Aø°Îe)ÔÚöÃTQ­ÄÄÑ9ë3o´f„Øí;¯Nüw¸Sýö•Ÿ.ØKN ^´v슔IŽ5Œ€q­ü.LDø{À¹­€_ ¢kX>¼e8ÔËr@êf\%µ0º¯HŸ†·}Ìئ~ùíExr!/ŠÜš^aßLž¶úªÖ?*s¥q3•^C­¿²–1È!Í$ |’óZÜ{!:½”|= 0"!ýîGÇ3‹SXé ÷ ;&ŒÐÕë§ù/¼ê³º:‘Äù1…ÌbUÂñ"1íû¨ÍŽa{A ¥+ƒ[}5L8cû/ò@RÔX˜HR¾†|´Ó™èmšt$WÂÐé&àáuàMÌ^Ž×—85+ÆÇdLHÑ,sG~£SÞ½¨r³liLüµ™?*ÔlÙòœÐPìѤ9t7‹å’”.ënÅE§ ÷Åâ:쉰€ä5Ÿâõy<‡áüoÌ›C9Å ¸!ÀR“KLp7ß`õÝæ¬î"3tx:B8¬qo`ŸðýØ ^¹,ÎZÒh‘G'å‘wœ w‘'>$Öõ©í1/b¯X$¢]ˆ@"Ðdv0·Yë»K舡¹ðZÙ51·ÝÅz>ÃÀ™á/FÂåZ²}ÀžÞÞÙÝš(Ì9¡ÜQçTc=뢤›´åJU/^â˜V»ßžìì¿Å«ã¨Ž¸k—U ¯—A§/×r6µ"£B|[e &i ôÏXZÌ“Òú gÁÀ‰¬À³#Ʊ ÿéÐ VÛNÕTû¿aû¿B4èÕØšÕJFoþ‰ž™’QήdŒ»^k#2šÕ58Ë/û…™ì9¼º¯:nü#G¼@ÓGŠô­;Îù)“XìÆz;„`×Ò½Y9ÙÚ;Ü]?Ùz›7ki}œi%úM •†Ë›æã!Kb<‚]ØÈ4¯JöFN—‘½›”2ÑØÜrzû&õ›BAÒõ’‘lžÎÚ×­tÈÜCµo;~¯ .~¬'»ÿÞ”Œ÷>7¾VLùëókÏ\Äú²ˆAT®qãM³Y,6O›¥· ¼8~Ó¸(Ÿ¦l  (Í‚{¦º“ŽÖ‚iŠÍΪjò [-(V1ê3zÒ,Ù£8Ýý[2)Ssp†-,.QÆ(u¯‘vl£åŠì´^«ÎŒÛCQ|#Àuc©ËÖãÀ0æHŒa'Ânˆ£èc nÕ¶ cU4 ¾ô mRhw†I§Â!®(Œ¥Ý^+—ø¡\ˆ-¼9—KüP.ììÃïîÂy*öþ¹¹säÂ+y*Ö_ý~ÂËcñÝÄßtɯþõ»8=ØŒO‹±?9¸ˆ…Ÿ fÀtü–Ô’r‰iyfH@Äk+q0';‹Æ~ l`ÅœÀ" qkµùµŸ$júa"$攋ú¯½äå"ËEËK)JÅ™>)LÄÚJ’‘ÛýˆVÇÂÍ …4ÜvURAZ•é¿…LèaÃ/Ixš­YõB¸`­µ•ƒÒFCØß[D>yNÍ“~¿üÇ Àò¾XÑ“¦É÷æ9y4OúAþòüïϪ’±Ô°ÉLq•m¤19TßëGó¤ä/ÿ›¡¤@ó™ù^žôƒüå?ø߶e¿3 td½çùËLdqÝ 1Œ&2‹õDv{Îo'Éöt|‹r¹’³‘ByÊä!*âb*JJgîÜfŠªœô¢\Ô8áîqŽ«És"‡í{ýhžôÃ_27Gªoe+ª"Šä:akhBu 3ŠÇž«É2ùÝ38/1#ïã|ûb¹pL<- 2¹8·PØCËf¸‹¦;ÐÏ2¡ã席@·w'ü†ˆ%î“~¿ü‡Ìá‰ùVz—~4OúAþò›Àˆ+׊$a—ðj"0ÓqMEïÌܨ‡¬êE ^4yÒ¤¸ü ‡Ø€1©Š Åmj;x2Ã#¶8pŠ|?¦774Šaô;}ðrc°¼ý“š*ÍÏ}À¶äG+û£ÒQäGQ¶V/k/_“ÓRA ó$lúrŽÊyÜa–€Mb£ÑrzŠ.ióƒáýÍ{aê= %åQ-dºÝ7¶£n¥Je_BÁ ãßzZØœÍy].´¹;•OKh 弧DäÇ[›ðž¡°Å‚ÝlñTÃWa.0ýaJhÍœ#KZÀœ÷÷„…F€­Xô~JX”¾#jýê~½Áž¼ÉöÉþ:%\ž [­K¸ Â6Dé‡ üøBS¶"$ˤßSÖÅ*VUü3eÍ´k“á~˜Šœ=rܵ %/ï%Uÿ>íG™Æ£i[F·ÔvfÖÛûÀIC¸W¢l¦”°ñhksÊz¯c‡ àÏ)k>?Ú:´jâÏi17Uuëu·Su·ïQwמ¢ÝighϪµ¿7m[ûÞ±Ýüœšòßx­nÛFÎ!ûæí”pLx+ JòjJêJáêm‚J/¦¬ÝŠ‰}R_¿šÂñáÒþ® ^MawéøÐ…@¯¦‡Ðºò†‘GdoÖ¸.¼œ÷…ŽQÙ'Bw L }` c³ôY ­·÷ƒ ÇY8øvJ8Cíåž½òfÊúí ß ÏbÉ’€©g#{®ò>O ™&¶ë_÷áοûáþÐÐÖ?~™ÆÚözŠMRðR_¦„·¹»{rp`o+ys/îs? ÎroàwæÆš²•u›7Y?šº–Ç™›ìºüjZÊÉüÜÀCxšçË~œö„>9Ú±1Ÿ~OY÷h}wç™U™_LY3Ÿõ# Apzç}¾'d|l·À= kÞ:®ýiZj]°ë’p‚4Õ6É_jÊv66,p˜uºZi¼Ý¸Öêt_V}ýjZŽÎéöó©ûÍGT|{ìØÝ38¬úa?ÈœdùÅ>²%8[í Õ™¢5]ôã[ QÏ>œ®I.û Fé¡Q'YÙ§®SçS÷3IhÜûwǪ~¯žõºåÇ:§`í©víSB…*t4ç‘üÌ·é{ 30ˆ¢’ÈËûqˆƒQsyga/ËZ§¥­gÿ&…tBQéÅ”µ÷ÖŸïlx,,`ÞM?.4nÑÉBÀÅx"*Í°ÞUô¡-öVÞç‡B¾îL|Ýy(ÜŒÔmL‰{á– ®ˆË”˜vW¡ÖS›T%/§Æ¶ýí­ã/ų:ï§å|Ù{y²ã°¾òjjyÀÖæΉ#ÀÓÊvm©þœöî”ýÁ=FMeŸ.§k?]žOÂ3WÀ/¦¾-  pš…³ÞN- 6 ÝKà8‰Óó>ßã§*¬êëäðüÎç‡HÞ=´z’êÍ†Ý 'ŽÏ-<õL!»áµoᨅÚH#Ó‡Ú¸"ÓÞH/#L*“×À˜÷äfiºc#¾ç°¶Î÷Ü+èjÚ ®']0œ2mc ÒN,÷샵÷„ÄÐú:­L3j:™Zoï'¿{ÙÓâ2n´‹ÞÈsä÷ÖÛigrx£žJNs1yŸ§=G£ñ`3ߦ՛øƒv+j#[{†îOy{xl™¶a"½MhÔ¹o¬O΃Ì_ÏÓ‘ÇÆ6EîÛB7ìbo7²|º/Äøó}ú€¹%®Sà¾Ð9…‡Ë€f?N 5ì]ƒpè °7@çýÔüIï‡Ò%‘;œŠûi꽌!-=9%ùöêмï÷;¥R–É|.ú@k èÂt¾L½BãॾL«í´©Û¯§…ÅÃ\PöûûÈêó®ýºó›ÐƒÖr4ðx|äñ…îu¯Ê¼¤¾Ü^ÖpÅ~=íø¹´‡9Ãí[¯§Õ9z9„Ìz;õí#Ÿ$>„&u$[(,¡ô(r¦Ôô÷-’¥0Ò~==$ô"™[œ/õqÚyˆòºg½šÂ°R@ÏSÚ(÷û=hĭĵ5Ör`H¸ø2 Îz{?8èÿœ…ƒoï{ÚcNI/ušf?N‹1·,ê¼Ex´;Òè3¦ÈÔ7FmqŠ7e¯Ý±à8ÇñÅÖKt=½™&·—SøÞ\XZ_•úr?ÉD»ƒiY!¿,âèq,áBku˜-s{:úq!o˜º–ë×ÓbxÊ=!vOPWÂ?eü!úÀ’~´•|‰dsk{ýåî …Õ]Wç£^‹óÆJÞgÎÀ‡Ž¨r‰r‹5®IÉ0P:-Ö÷Άù­wlj,a)8 Úÿðƒ·{B®Ðâ¸YZ,X¿Ë…Ø“ÿG‰o±H§1G,–pÅbÆMvŒðǵ=„8_M²2ÃBòw[þîâ·ý=|Ú÷Žá6 âG²ïGËÒ~‰­ <åŠÀk×ÖÃ}z,x“²·€7b9Oã àãúý‡ à1kG€cF›øËê}xØØÀÿè:zÉyc•©>kíçä"¬­¼Œ£Æ»OY‹=5Õl¼ÌhÜLA[ÕÅ/'j†òŠôÃVÞëëNÞ[&&¦ùŒ";kôðÃÑI vˆrÐõˆ²;‡ˆñRDDñ„@F$¿ÆIh óe«Š8rQ¬‘H³ùrDQ8’(ûn¬(ç›ÝPï+"¼I]õö²×xüÅH5¦˜¦˜WœÁÈ.’Ë>R»†)‚_6­Gòhbt‘³Zó”Kã?&ïøT,ò‹&^éè¹Ø<5ÞloÄ7í_C©·&M6T”¢Šk\¬ÈE ø¢ Ïp‚àO"Šü%åÔÔ§~©ÙY%KÀY$bL`]†g!Я êÚ±›5ûî.ê.q;ÙœÛâ5«6­Ôæ:Ïù„óÀ²&”EI³éÖk—Ó–¶À›00«J•t$ûyßRuS-äÄá­%ÖN~¹Erd<ðÖ„àO[˜!¿S£Î ëê€è<†«&Z1žÎ~Îá\ÿk·H-гN=X2ùžÝEvå7Ÿÿ¶}fyd•-¬2Ô $ïŠÏÙAz’¯í÷øRbTCÛŸÜ,”ÅcZÀ—A4º¸4Ñé)Út=:WMèOËï1ù‘ÕütÍœuIhÊÜŒnSðlü“?”KòÄ1D¼–'~}´oŽöøGDAJÊ%ú sÿwˆZôDüø¡ˆ†z˜}r)•7üÀ¿Сíáa ®Ã¾‰Õ]×É¿WSJD“ñ?µƒ&äÔ QãAK§Ê¼,VRÎ0˜”dzS\ãR˜aŽhTIGœJ ˜T¦°©MÓ§ª­ËšÊ{þ»€²¾W?ô¤*»¥›bI§£VcÊÊNQçbJNQQ<žDª°ÒwÁ ÒHb¬Ôû­; «5lÍAûaM¤!XÄÉl¦C I|“òÃN|¼Ã‡øÓÛ†¼Ó[ ì$’MBh0QD—V;€‰dQÂÄ=C;x>yžJPü{¸K/­CUNÐÕ“dW̮車\°ëŠyPâ[ ÔRRδTçdNºyJI™ ­,~‡=ìš: 8ÑeÀ w@pƒÎ-fD ÷ƒ@Ç©>õŽÕr}±þ¸®ýËouCnuV6{¡%'¥dCRæà„')@ÈÊš ¥Ã(eÀhÔÇàR&̧|z }+ìUâWŒÓ •®‚^ôZ˜] w æ@“Wäd§`j)G¦·¸5oKKc ´ ã?Sœ,x 0¿­Ï ´à~K¡²cLÒ_Ž t¥£rHN·Æ°Û§Äq„‰$à#y¥0§WQææPÃ1„€©ú¼q°5“i îGCA8Ói_Å]ŸR¹ôÚp˜›`„mf‚®C(‚;ã,P”9h¯`èSŠÀˆ­ò0`è²û,8§p ðžB bTí3Œ{Áh´)v †V®Jkå=‡4íö×ðàÿøÉ”1…I,ô¼¦TÐ\je á|(R "»Í.lðâQ@êAònU}@opÎ+c/”Õ‚iÔJS³XV‹jI->V‹O ’(Ó¾š‹10APÁ~§ð ßÐBÖ fd§s£®¿S ß~‹è¾Cd¤îr&ë×ô¯˜JKKY*’è¹8‚ÂeÏX]j×Ðßcó`S#¦ZÂ@¶\·RøpwäÝü}Ø‘JÌ-K…€ ’¤hÔç¨pP‹³¯º§dÐÒ‰£÷#δè #aÝ®D•èt€zA€\RHné0ÐYŠvšJ ®c}]–]¦Ó9Ê4»Éa9kêÿ5'Ú|­ÊÍ…Å'åSÌÞÕS­Û Ø0UÎê†Û&M5©!0ø§§N\¬AðÛˆ8|Øßà0O°ÛïzÈ@Ÿã9à¢äUâ±c7$ #ì;ήèsÜBÌüÁéRÅP«˜/ú€dÁ§.…q—Ÿkù¬›ªáºiúèrÁÆûD¹Ù4)”;G÷ð¯ßÑ„`@1U~¶õ|g6K†‹~spVTÊê;ÞB‚¾VšOå6ñi·ά'v“Ø“$GŒý…GA¤S?H·ÊêG½Ïx[¬CŒŽlØt}q~¨3`Y,jB`yß%14èV‡—<;H^}¾ñÍW¥oð;\Ãn£lWHyÃjP†Âögv ­4nÂ.ž>é,ð©mGÍy˜Wãt\/AÓ—–¼ÕUÖÊ_å}5«ÊúŽÑÁ CÞݯfÜu8úºÒÇÏGˆ×WµvŠÓ‹;gØLn³ÔxÝèUjÅ’¾>µòÉ•xמ2+çŽmNÉJÖt¸y:,;‚^€¢éËWæIyÉ˯T‘s,jgSé~@0[®ÀÑS[n¨xEŽì™ÿrá²7~m¿)R,ȯߋo×…~á?¼ùõ«·ó_5…XNoûð'n”“1Ë%ø>Tô£°ÒëÈæ\½ùÇâòwÍÍJÿ,bŒÂ´_ß›MŒ6ùMã[ýµÁ­—àU>aó½Â7¶rg%©ÖR ++Ü«É=ZšAŸq/–Ò îÏ V‰)à$‹oHµö1`P£ÙƒŠ Jr>ƒ>òÞèÃø1‹Rt$Ͻ ˆ¦WÔ±ƘÖï ¼z ›cncœêâÿ¯X€¡àØ(p6ìSbÁà´:íy|Ì7<ÇY’éeUÿQD¡Ñ:˜¢5ªaÅÖð¿ÃË9*øfñmEw%Ä´e«*T?hÐðãÑ£Š¤ÞÀž®1ø7á[ýÊ ¿Y‡©pœñh Šã’C•cz//e\ÔÛ d±Š`+ªX”:ðàÀ¦é>QÝ |w†ýèQøV—OæˆÃL~HÈ‘¶hZ¢Tj¢{‚*ZYûÇ¿‚ “0||f7€-Iª$;m’›pÌ©´Ÿ7Ãpx‰ÆEQóÐ=L÷ƒÊc~tßòK W÷~‡u–V‚MòÕ¬ë·.av·.±×Ƭú™Suý[¹­ $^fî¯rtrÄš{“ˆÌqEJsúµ‚·ÃÒüã]ÿÁ?þ¡àÞ?õ‘ÛÂY¦¯x©+Ö‹UÒôa‘ý¶\/)O0¬ þlE ºÍ ){&&4°¬¤3d´  îºÞ=‰Å\⾟SJCx³î ‡J59G90¿WŠÃfLJå+Z·À«>¬ÏZHߌz;O] §5ú/B$Ø@‘¾®àz_â畦™ÂxsÁ¯ôDšWz2õ‹_Wæ âÊ<žW7t"p{”Hƒç!¾tò­éþ`ùœîþþ»ƒ2Ž¹Ü}£2ۇߩÄCnUZL9æV%5kOsc6 kcÂÈ錤0òÖn:ø½˜ä`Ø>ÔŒë—(Z‹(á7œ•¼ùÔZ®*Œ²ÕnS0y‚C¯µ£ ôð\rÆRe±ÑËp8¦¾?ˆ0×—$œÀ&IÕÁ—ÉzØc<Ú£V¼.Ø:ÞC“HvjÇDJnÂØô†GFÉ4?FQÓ¥¥ i`‡Æwf^³î8ûĽn$᫹6ÍY~°^ñóðÍO>1㌠DlšàHUmJøP0ð)- ÊÓK !#GÁRàNø.¸au*ÞXj  C7R’ ÊÀ[WêPÓ<¼tÇ0%—¢\ ŒQ ÀiÌq¯£AÛko<71âÛ7nšù„·XÇo(ðÞ˜™x…þ 霥ÿò¶ÀG¦ŸŠùÎóBàs¤jMfÒÏâ^Çeb”jÎqkÒåb¹YiÎͽùu®òv¾Ò¬0•¤ÚC¨»W„bs©Ø,lê_ªù¸Øèf°ª,aèãçìëMéVÑ/P^†á}{™zM{w¬ SP–þ¸ëК|í03Óš|a²úvÆ}“»†ÐQ}ÏH]Úð¾Ò,Ó]3î¥p/ ›µ9é’ðïAÍ!¡4ý™c¤~OvHz÷ÈZ¯9|3÷ö}³Ti(ëzÑäû…}«ðp§Pt§ t¹ƒ ¸:¨5hx¶¨™{h„Zø}‰¹{ ‹òæñÛ‚f¯³U„·gÈUµTI×&xLÇðK¿/AÏæ ³XƒÉν8Ĩ“q\övBÃ7òS÷£¢jjQÒL65w˜Ù„‚1+ }BV<:>â<´ø &‡sXêü#Ô•"/K±*½=”Ô¦V§†d—5鷳ͅõ ^å¬XkëtW ËAÔG¡ÖÀÁD7æË5ÜÚ: 5ükÌ'@¥žÛyœ‹&|œo°-¤1›¤!®•“J$×)ŸâºY“9ŸèÞÿúæ×àäß¿_߯ÈsU½¿(fNËI£½^ÖáÐ / }µ¦njÖ}-Û'Sº]J}ÔGÓÊM9Ü VJ`^h8#zQM°èÃJbêôÒgjç|ºúéI(“¾Œ† ´¿KÞ88\L&÷˜-oh pÚÈv˜X Ûâ›S#´Ò,Ï7¿A’?ß|ÏšóJËX‰"m2;’i³·@zÖ”ÎØ­UˆdÚúÍ{+»fe–f+9ÐÓ m[O7kŠ9¿ÒJm…º¾dÖÅ0™%A(þ›( ó€da,*‘Iªâ$,«E~Nh *Z¿Ÿ>+´[#7-t¶ÈDS%†6øßšZòyóý0WS ˜iuéè¥dè’ÍÓG¬W¼xtŽ®èÄàD}S u×kuç­öZGD";hB#uÒX¹Î‘B6ëx˜¾}ÿž†€.oÅz½Èwà`]³–’º.’²t÷² J«ÝÆ›_±Ùù÷zýýç†ô Ù•)°¼E‹ÅÊ=§„ÈCî×¼VÉvT:+*šŸÅNÑ5IE§¿¥ß»ã.ÌÒ|¢´ëÚ`FÌ.0KáY·ØÛ•Bªn¿¤³:õ«Ö^à\²(²„ôÂÒIºI¢Þu“ “å™ßZÞåÍ€.¦‡l…ñôÊ üiE©+ëšä,ÒnûÒuwfVó:ÅÇõCf@¯,^ˆ;0™WcZÍ™ËÜžÜ5;nÝÉ“Ô°:icUÊ­˜êʸ{Å6îîYÚ¦ÖÞ™’ÿkŸì.ÀÔéMi=›ö·¼Ñ;å“ەε¨S-šÞÈï ½á–ܶ“׶†•´ý1™Å YççMt dl柡SFÛúZ–¦ŠéÈ0•Ì·w^ïm­hUPëÜ5ûË:Â6š•×ê6ð:÷Rýé+%¸Ö^£¬ÌöÛ8zkajô‡µr¡ab‰+¿¡àïø Uu>þˆZæv™¨…>cú'šþÒs™ ;E–.‰DíN4‹†­‘KG‘üæ­žñbfÆsÄxD™ŽÎ¿Ÿ×ýÄGÝM|Nz‰¿¤“t¸MÍG¿Z?ÚßÙ¾’î.œ@Ú*ý¢‡¸ˆµšÕ[£xãýi /­~xp’)¥ò°¯0ñ7fz¿)ÉÓ7òçÞÓƒ~­çý›’<éÉ"|S2Ïú£¬É7%~×èhõ‡Õ±Ü ùõÍEÙÄDoiÝPXNÞõ§:·«ZS§õ2nºc²úl1=´®npTw)±- sÈMŽ1k—¶Åz€5ñ>¦ÍŠT×Yö@ù­Ï_P?=(k0nj–Y?RËJº#9® aƒ¾ñk¿¯×þå½Õ µïßÎÿ£ñÕY!~ÿÔçïK™‹ÐûUoVÌ>èÿñMÞÑÿM¦¨ÐÞTqykŠ‹âgó)9öøsòÛiÌ.’üv ¤‹¹ïLQw„ú—É-b¿É4˜-j¿5ÅåXäRòÃ|”s‹?ÊþXÊÙÅ…¢–·mòKØÔ,&AM|1šh±YÖlçGý´_[ GÍîv)‡à‹mð”‚t”èÓË‘€Ó'é<”,ž®Z"r®-îùðXk¤ß+ókYßØó[ø=·…‡ž1‰öÛ‚s P“äíùªš§VW1ø+ÊÜÌá<„ €ÊòZ9°-@<"´“SŸQIÏðŒƒùdëÊ”$Åæq©ƒœÉšÅ.ÎZ¡ø6‚–KxVëc-zr\¥@$Ÿ“ûÝ6m÷ó¡+/2<9keäí4E­ìJV±1Ÿ•²“œHŸÐ/‡âÇdö¾m1TÎ’ ±oLÄZ‰ëGK¶´µž;ë‘ÓÖcŒï%)M0“Ë·.ýÞÅø 1¶°–˜Z&ŸiŒ’×6R%C±Ú,Ì|Üä‘ÔÖtä?÷ZõZºÇÐ_ÌÛÜíã¥?™ˆr̪u¹þŠõ‚çw1}íš5½ø*úÝ>°-£Þíý  øVòagáS-¦!NYž”ìlÄx.Éô:Ï:¸ŸÖGÃ÷žâ¸€¼Ô•Äé›DÅ@|ªäÕŠä‚.pÚËy–Ä“–§I¸ <k%ûÿVÅþy@f&äöÍ‘èØK€ ¾Ñ†„ ¿`—ÈiWÝ1• ³ÊÕUܤ­‡±¶p`Ø‚.m@™ÐQS/zz¸™’ùÞ¶ª£juÔgÓì&múèÜ(ãYHÙ=7>i]£þ­¨ìZ©£¹4ÉɱÀ¸j8«äü8L’»¯Sh`¿.ŒRT[c:ò•gì/ßæ›ï˜:ñ­ÄV»ûW×®‡½2­§T';QôçˆãAkéU0*‹ô’;š°ß´2L' ‰îÅóAÐ/kÓ(¶H` z1óíaL”§5ŒÉSë"´f(¤—°zJHã·QäÖ ®"Fì‹ú8éTš:ƒÑ Ï¢Üî°A¿f°;QÔVAˆ“¾¢Öw^³Ý%¹Œ’ÛC!Ëeliiaù;Þè*³ ˜­½W/Ñø™çjÖÛ8IÈ=Õò‚1†Òš¸úël}þÂVû²Ôõùêë*Ý—i¨O¯'2TpìôýÁ0G©Ø=Ï?øjê“')œwè¸_ÇUœæ¨¡~þoU:¬§6¸r•ø[{K·{q¨÷æÎQUÁåID8 €/ˆb 2–Àú†@˜ÐCȨŒèUf\d°É ;nüʯԚjà¥úÆîr“æBtsFbuÏj½¿²U2< 6œÃ¥åžUÛhÕƒ[NF Ùp!¾U0!Úʇ¼‚[:¾¤å¶PKœ:Ršã1WĆ*-E –WXï*ÂÛ1RÞë.ÜÚ Š¯ÊP^XŒ–ƒõû@ìdµ¢[ 1¦.ÙˎEâÇ kâˆjŠ˜¼\´]™Ü®•ñgÐno_íiU%3a¸»t“hÈ|A?U@iœLMpK'GWÓô-¥Êd¯‘صÍrä¸!4ÈÓC¬M”eÏ%4¬Q2W|` ùf¹6÷4˜¸ËZb¢©Ä½í$þ—IˆéA“E…§¬µ„ 4Ç 0ÆN.&h‹; n0«Ú£n÷¶L.Œ9åè¢&4ól…ܾXË}t¨7s¯pouÇDŸ“‚½‹÷&›8_°Éê¹í¥È-ÅÒÑžjKR¤ 9ŠK‘£¸°@ ™2Em7%!‹1<±úñG»ÀìWªD‘ˆ ³–uŸÉeB`føŠ£æt$ºŠÒÁç Þ./‡ºöãDɃ·…ÁÕéþ¡7•oõ^ÅÝR´s;Åð;û'[+ÀC£ÄͲÛ"öDµŸƒPã ™×x¸bXØÎ5Dõ˜ÕÑš°3K†ºª¶’Ð5cyúè=Br`¾{ÆA?€y@ù†¿‡¬ªÅï¿J~pQÿv@*¬9¸›--,.«í àqt>¼F ÜFŸ TU;½–qCÄ1`ÁX ®¢°Ö6åå˜Mý[öfíqD%öÐFûìý¼zÃÛUæïðþ5÷¶Ž6^¬ïŸ¬?ÛÙÝ9ùïÛ;'û[ÇÇjûàH­«Ãõ£“—»ëGêðåÑáÁñM×óý—f³]¼F‰V5DóÂ3”êÁNiàÕ*j‡çè> ¯ˆcEý ëKÂgôê¨ÃÑY'lAs­ ‡¡]à6‰oâKâ›9ÚØØÙ\þ^IF À|hBZU69ó±çÙñôeSh:`*ê`ÌpŠ%¦–ÁM+èsüð莞WqëCš–Mq`@Ï(‚zS^ ü..ˆ ¡ PNñš h£‹kn­D•&½­õŸOæ®HÝÀîuž&ŸZ@ÈÀhãò+š0¨»Å‘B‚dPmmn~õ%Ð,µÞ†ü|ÄÂÜ?;'/^ž¨õý_P§qÈø˪!£„¨i¸§å ‚ÇÐ#¨üôUDû‘Ÿš„f$@;úa'æ!ÿ“#– tá®&Ù7áÝè‹ÑÂȃUdäƒÃsªÐdvg•¶ø—Ãa¥Ñ¸¾¾®_ôFõhpÑè0Œ¸ñcböˆèÁl›¡q´ Qõùä²Å×Lj’@ëÿ †F±Z¡f¼V.3­2$Y‡Ä£ÙБqݸ·ÝQê­¨fé83Ž9övwž­ý⡶mªœvvV±Û3 hß,ªÁo¯HS5X%…~ÀŒyõî2$(üø©@C&3OÉù)ÁUhÕ¿¹–À°h…4bäHÁ‘êe'†HøYM.}à¬n:ʉà8Hz\Ä -PTA¡Ôå¶OCç(å±X/ôCíØ£ŸòÛGÒÖEC º6øä0B*}ö›ÇWž¼2½°_’/>φDsV]t0GãǘäFU}#¡ƒߦæïV“Sá¸Öw^×%€ &Í09ãIiü·‚1±!Ѻf_¸“ÑyMŸ$^@½@|˦èeiy9KMn5‘Òüïe\" ¡L•ñAï>2gI¸kš)ËLnsõTª‚á¾ÒЈýѵð‡œˆè<Ók~Á%"ý9Š5·uF-dýàòJ# )ÂÐÖ‰Ír&ǘÑéÌr£®c žÜ­MŽØÐæ°}ÜŸÊ¿Š0Li }{CbáÀŠEpæ+†ßFsàûê…×Їµ¢ T½·Ú×F‘ûGÒ1§ƒ+úhÇ À,Ô7|uß:ÚbIi0¨s¾ ^]S*‰‚KÄSxÛÞN ?;Þ¬áFÛ;®iëߎ†I4õö÷¨Òþž½7áBq*{Âú˜#»ýº¹:¨ >*ÀbèÎMØu%è s rA:xƒÍ=øˆtÎü@ œã€Ø¶GUs½hÐ¥)FÅJ³cþb²› G¬·Eê Ú©‹Uƒ›€ªò_¬—ˆµÙ‘‰˜4FP¸åë˜0‚iÀô„•‡£A=o9î„Ž"€Ûó—PiÌÄTÐ…¸ W‡ùÇ,'ºý(p  GC8½xßÐØøT…ºMÚ\}ÖFm6Ò°Âœ®éŒò©÷ãL<2Z—hšf¥s$¬ó^PW²Tp8|¼÷½$] Õ•g,¿ÇÙZHÚdk´Ll˜œCtZ-gL=7÷ µ‘÷ùBB‡$ç&YSÅ$a `€›N†Úp_QøZ¸drØëG¨{@6\¤vi ³¯¤ÛÂw8#¯æ»­œ6Ó7›Ê†CͦÞQ&ˆÝÝ$’¬a¹%qU’çÔtûqµÐ§O/"¾§l «1>ëAÿY/:O½°Î‡Ù:`Û`! Í$æKO—¬›<>RœØ«°=uØajI*›HbOëÖ²€\öµœ\¼;(üSš‰¤¬A|Tá“5‰±Ñ¡ »ƒ£®Œý\“ñp¾!Á¹ù7è{Þ‡1i9œòî'ûÄ}å+Ì¡C,Ô1ܘdñ n xvŽŽäãZiÂGžÀ ¥“ãÔ9Óvoc?âOóUaŠ›¸ž$à¢rf‰OPL‚4–¼c˜×.a¦Žä›5‡oÿZ–ŽÃrmˆ´½ÍÛ¤IùØÄNnФLP±¨Cm` ƒŽ?>8? ÔÄu¡;ÅJ#Æ7z¨¤¶íq,1Ìì‚œUN78ÓÔ]ýàRÓŒžgWé¬T}?ä ÞÉGuç,8¥Ø &ª˜aH¢BPÄ‹ ´ïìŸèõ^]µ*Ú·káß’ öõ‚~ËjÃ~M,°„Ê7·!1Ñd/.£†¢=Ü,íïÕ³‰¼zæ­îÚqJTäsèZNÐr÷*î&.‹B®äÐO<[’l¾£“SJ)yN7æ ૳°‡7;ÜuTÙÎ;fÍýÚ™c`$z"âåIk…[®Ü:¦8°)¤ià¿ò¥Pp ˆ‚†É@ÕŠ•³î,¸@ø$¡³Né½õç;ÞÆ\gÌ#qR£xÈFHw-Ž#bá+’C¢?Y9ÎxÍO‚ã÷Âs”ª‘üÂMFÅ74M8b&aDîLBµÛjóÕúÑ6Ç·×g÷DÑ-up¬à~­óª1÷ ?lÐl0©x‹à r1ôÉÆ™Ùä2ƒcúxK¨e¤²æ>§ az7¾åÀBê´Û +tÎùÈ Ž—+¿uY;`d ÓpÌüèyéé2@N¨êËum.ût™.QÖ‘›½ùxÄ£›ÿµ'Z ’­Wéúe嵞ÌüÖ›&Q㘬nßÅúû˜vÙsR/\wòÁ]wr瘘+$á’š µ9e¬eTŸÐÉd/l¢þÍ ?»£ÎÐïÑ(îÜ¥Z‹î[µHkÓ~*ØI¸­ y&Aw¾Þïk–;ÑwiÅ™±$±1R¿Ío§Ælb—À–K¶f…é é)hJê’›ÛÖÄ{„ž2§R/­žÏ-“»rÜàA;Á r•L¢âúØ|ãr…Êÿ˜Û„ Pïê^„—€uå œÜžëãÒ™³:!ÿ›#@¶7w+ꋽ3á>«62=¨ç'JwH‡óÅþžC¾Æ]IÇ&›ÎP7ç«j>‘e›%Î.œÚ¥%—Wœ˜Õ:¿#é›ò8Jži+CÁê“0Û)d½ŸØª9ªøœs±Ð›í“2´2tSóÖïœ|Ýv‘T-Ô iEè‡G ôV»5ñÓyVLY¿µºÉ²É3Ôˆwv[Ò~ÆM5ñ0… œ÷Ám6è1l‘1D¶:ärÀfÞ&0£„o¢Ìˆ£€‘²@„«Âbš£CLD»$–ŒïØZÖÖÔwó+$œ<NQŽ±_óÌÌ¥X3šs_[ÄIRÚz¦qc5“Û¸ùª“ÀDo12Œ5°›;G (·î¦¶ n†©i2³ŠÉ/п…æT®ý£©x~­.2Ù³®9üâ?בÆú ÙË—…òu|Þb5¬“¡ddüŒÝáDªK‘?)0‘jºBI‡BäJT;3%žn,37æËøI¢hI»8n•qsƒ3ƒÆÁS¬S7ìbo×ꌼ߉ãpu#ó«Ÿ×Ö°3Ÿ )±Zþû¼> è§mä\“ú±2ÅÅÓ #ÃP~ Ǭ>Æz'–ë’zIÐÚûÓ´l ļ³qPÆa•CŒy%¥æè¡ÐF'r%›(¤Fq˜.E|'v~Ú$HË`ˆîÑiž˜KëáT •µY,6•xnøˆÑÊèÝ7yk•­3ª#æãQríßÆšñ“2Àûæ½Î“ⓤ>݆á2å·-£Ï¼§NëSŽÒø\šgÆC[L³û|÷t›"«qÍÌH3λL´¶ÿOYÞ•S@ŽööËý“ƒýc «ëG[›dÎ/P_maa¼ø{h%°ÈðhïÎú³Ý-2 …Bµ»ÿ¡þI× c#07‘¬Y÷ÈâϳØ1· ·–φf©oboÚ‰zaç¬dlJ騮˜f³ýú .¿Yÿ¼])fudk6¥oH¸ß &Q&bÓõ¸Ί4ŽŸ¥ ÌáÛ••7ðw}å-þ7è!A=¼«{ì§'Abn!Pª¾>]¯Òc3Àu]‰MN b¸‹Gs•ÂI¬ï›Ò’†qcÂ’› 0+É+ŠQZ\kOKhέ â{EÆœ¡¡ÐX¥Òb³˜†s³2Ÿ « в€æWÆCjfA±÷mj5eF"{ÂȤÊJ}> `ÌXçï9eYYã \7üN‹íZ-O{  ;λ°O1z‰TBôÆ̺´ÀÑÖ´ðÀ‚à¹Âµî¤åÖ!Á“)~<™~xóXð…æRŠ´@HæFá6à¼Þ“ˆ*ÏÉÀ°ÓZ½dyHa&;¬JF~ŒÞ’ìÅ«½u7vw·6N<¼‰Ãý*D=Ržéƒ¢ª3R‹èÊ'å[ŽÎÉ;0îFï‚$#Bÿj ýuø)]çf}anÈ}ù1õD¦’Ø%•ÃGnðbÕ0^ªÿG‡y‘<F†…®`â{´cÙüŸç‡‡ê"²“-‰„Âsf‡×ÝðÞn5v·i§ín×(l [ØÃÖ 1† ÖD#IJBk Žn†¤T®¢kQvnµÍ{Ìüp¶Šú&SÏ=ÁË&³Œ(æÄîp€•ëË[â[កƒA W±•@¨ÑO’·\ú #¥ð,]LÓ‘ÏÞ¿Ws:à›þ¦}¡Ù¼{å~…ÇÈÄ@¦~”D'èçV°"ê¸'Z—0WêÑ)XH¼ÓÅÉŽ¢6Iè)uLÍ*+»S¡ Ü°ï :î,¦î~˜É˜°ÇúMÆ2Û³ä ÅŒÑ<Àt\8*£° ª1ÏüIyëMBÐ{# 1ã–Pz袚dÚÅ{mœÊ “$•Ìª$¿Â{èM<à¯Uá02 ˆ—(˜Žz€®Û*m…ƒcq…EOΪ2~çX…9;d>Þ¡òt¥³NêJOìvìså§#‚ž2 Þ±Š=bçŠàÑ{õÏŠ°äZó˜ãHûÎîË›X×ø·cÆÍàü{à¶êD±8x›™ÄÀLCr³> ’ 87*86þÇ+¾ÅŠå$áyEkuI¬qÎÍtÒÀ¯JÜ©ãJ‰%7ôÖxŽò•ÛJg\êEëH)àÆ·R·!G-¼}Qv.|Ãaÿ¸GoŽf ¬ïTCÌŒŒÒŠÝ:®…̾‡«ÜÐJÓCÓý$ #¯8˜A µÕPÂÙe§Jÿ˜¬Q·—1†0¨!ûæJhË>p¸qÆMO(yþ`÷­aâBºs κDSŸì/Ú¾$¹ãCm¯„gÂ`$æÿJ•œîZ! ‰øáQäD£€Ò£l±è¢‡¼¨$¤ÉjˆuŠìéB±Îa™{‘Yåû×µÕKè™Ó;ÂáÞ°Å`ÿßßü_'<󇪣~\û¶¾\_npDŒÝèâµ±ÿž>]Æ¿‹ß>ylÿ…Ë‹KKËÿßâÒ·K‹‹—ŸÂûÅÇ Oþ?õ·šHÌ‚ùû7ùWX[SohÙßbx‘§µ…'µ¥eµ¶V(Ì«-Œ`‡ç!\Õ 8jè6êñ³Ä˜~. °ReëæDŠ¥Ð@9jÕ]`Fö‚ü±Ž ‰ŒfYmôûânÈ0b’;(èÂ1ƒ€¶ÃbóŸÔoÜ„9Äò¬¯Z—O—A µk4[ì0ëÀ¹~WÇ:û ìíú×'N8ÑʱEr²A¼‹~Ç€Yë Wšaœ„O¤´¢ç"áц3©–†ÁÀÒ@tt±ˆ"k¢Ý¥OE”Ÿ×’pDOÙJN‡x¬hXÃÛ~”É0¢‹!Š‘#ŒsýxÏ{ýtÙ[ÿy}g¥(d/ì‘Tó†®$DìÀRë„ïÝ°cešóAàŸàÅ×~«Qnur°y ,ñYk“dÌ ÁLÌÐæSGÃËhÀ*ÇDÜ|‡ ñfë8ªêà$±ú¶¾t!*ÌnPx‰PxQxaIP'Æ7SÓŽZ£­õͽ­úî!sœ’9DŒû‚ e}¸ øƒaœ0ÍÉË~Q6è"Ø C_Õ’¸žÝi‰ƒCW¥ÏÏlwÏóº»@Ý}\[\¬-~+Ý]o·%ÚM㣧âÌFÌ/È£æbêVÀ´}&pØÜkÀ1ò{9GµÛžß"m]¿ï„fcúq ×2mÅcÀ2ù`KZVVc€üæÅï/Ñ‘¢Æñ(–â¾SPX7®jGQÚX?¶6.¡¤3NêM^E–5| ¥; Éz\8hCŸÛƒó64¡¹ŸÌaC‡™#js´wõôQÅ© m§Æ‰ -žT¤ÈÖÃ]ô‚&…2 Ñ&=~¹·åý¼Ì%®#®wö/%‡Á Û$Ƶ%̦ y5†z~°+¦ø£!+–̹™ î¯!<ÀÒ$[ïò7³`Ïgù@H†$F|5"bg!jݤdŠo¡‘›4âjZZ†Iˆ‡eÌtøØ’!¿>ÞùׯÛÙ4Y­tW›+='銩C_Ŧg0À#1šŽ†®Û .8M™YXŒÆnv«up˜˜Œ©Á'G$V01p»ñùÐ-úoT¼Ë)•Äj¦1t‚‘…^æØbÐYHNüKŽ~€óžœ˜Ì˜­žã@‚G‡PE4›8s©A¼B¼ç¦YmˆGu¹{Žé*Ê´¯{Qß;Ç(ox9¡s±qøR7ÆêøxkIÍ]´Z›ïž¤gÁàX i°nJ'/p»mîîî<;¶ü`æÕ^—|耺ŠÐ~¿C!…aï™Ô!mÙ)„p·>‚ªuºï^IÅéמC½F¬³¾³9ˆŠçË’ßýNÿ’œÆæ1ü…`2ÁX0x×F ˆ1¯69Í:Ðýïyì0 8y½HÓíXæÖïç›WÑà/wöë4‰ºÈ¦W&VRÞæÊ¢ÎÓž˜‰W†Õ±ª |‹–[ä -ò†^c'„Z5 >ø–å«ÞŒç+¨£¤Z+’C’ Dœ£~„üHvž½ÜA+þƒ—G$#æ³zÑ‹p±=èÚú¨êìësƒ+8½õêÁÌ z)Ž¶% ¬†Z¡†Ü€b (æÙ&¼|è~F#/Õ¯ÒÜŠú-9L¨€Â½Ô`>È|—õ„ªáÃ1<[ßâã5Õ£°Ãthʆù'48àýî MDZSÒ…õt¹†~•é+D>5q«Âæ^¢V ÅØcæôÌ ÒŽ÷ݪBB’lþ‚ÝeçÐ725syTx‹ãÒ»T !Âzºl•`ãJ1m2!]tä:½ñ¬ ãN#¦y½Z«ßgv}Î °~i÷){*¡ Q5ÑXã<]…¾D (ë0 $½­] `jA2©ŸjÖx·,¼L!;>’Í™c]_<Ë•Ì-.&ŸžN 6 ¹¼­}Ýk0œ«À" wÃÄ‹|{aT[ä¹é½ÒÝ•Õѽ–ß²¾c–.Êb… 2èÁEv¤"|BôªªLä+••NÂâÁÄÀŪ›šþ¡Åù5\Ô·­Ï'4ܳi¸Gœç„¾ ¢QŸ0ðµfª=aª=}¦%Äxí½Î{+KDŽ/ÔPý¡íhÒh1üUëZBPŽ¤TyFžpY.RˆPþìVÇ1¤hsÄé»\þ6-kÐ676Øj¸fð¬ lk(Ï] òCÖ[û Å[›Êâ¨Ú_ì %ø• 's' ÃiIø‹ Οß;6Ö9õ66rÞ'5³ûÁ\=.F>ÆñDÍTàpxÖñ´†ÃÛ\8É–Â!+ë²»y´õz³q|‚ÜzVÃH9;VÀÒÎÜѪ¤fO³ F#n­Üîž•m1;òY‰2DŸQÔÅ›Xu‘¦å³â(Eé¢]ÚE ®nmÞƒ]‡Â¬§/™~'Ž$¿JŒ4ïûïLRMëd±qotŠ ‰ý—Ûoä$ƒ.l¤sŸl§XÒ¥y0¢{8Ò„¶«wÁí5PÇë“_·Hd¨V-Fúì£=ž+Þ©†0á·#Å1…ÎØ+…†! èLÌåO)ÄS=¨ÄFL™üUf¢¦åHa3dA_"a¦h0 ™¯ [¦ax¸ë»°ÊÖäp±²3=:t'2c}ÉJ¼ ”Yêõ3óöÎQ#~²Ç¦°£¹ê¡Ð÷ßçœ5kM'?ݳml; ƇN†sJÅ#ÿŠ@:ƒÚrö†(¤Lö¼Íb•Ñ0‚A×cÊ…PFÛ™2\Zïð0wå¢(—ÄΆ‡w“d0K‡„)!™ƒo|Ȉxóµ§O£ÌadÎ;æ’é—ªIô2{Í"g«[.7b®ËGn¯pÀF „ƒeo;iE†'…1ô‚X8ü—Ç[ú èmnm+Šk+Ñþœ^àž· ÔQZlZnµÊ¨l>;“›W‡ÞåA ©ã;ñ Le PìjÎý+”Þ;[Á`¿ gԻǴèÒμÂ4SAwÄ^ùc…Zr|ÑÍÂœ_а=.XRºƒ•ûdQ&«Ñ`Ôónt:Ag5Ù"GÑ[ Š?h3àÄúFµyðòÙî–wâíìïœì¬ïÂ^;RxôY ÂÐÈRe™&w§Zßù¾Î¿¥£3le_¢ÔÉ@ŒÕÉü]taî9¾áJÛt͘<ÛÜ f¥]/ ¼ªzlsäܸì©:oU­ê™“Ë#Ê-ø1\) 'öwæ«‹'(kwÇß TÒÃjرbŒ4Ö8-ÓÄ ºÞ [U]öû>#Vö4P‡CÄÆ°ú±Å&"|E¦’ç!GI8IQ¼,ñÁ¹ÞêÇ¿ìoxðÊ#1Æξ-jA¹Ž?Àà÷Ô™åúrý±¹kC+ªP†{|™C­$rk^²º «ûxLb+V×,¡ºfqÑÒ”k=Ô2Š®Œ3²»iŽðxÐj˜c£2r%$¬1þ(%’™M¤RV¹ü;nŽT‘ø<ä»þòäÅÁÑq5Qq%Å’ãH«¾D¶ ÕëuïSVB†>Gu·öÄR(À¡„CbÂÍTð c… )à¡è(‘½ë?oy7ÖÇé¦$ŠE²)P‘‚(£3¿9Õµ ‹aìon={ù§\«13X3j ¸LÞ¾lד(iJ® … Ñ(¶vÎn2ë6œ£b´YäÈÇ®b TJgÓ “&¥X¢ø`;‡ÇŸº>Ù|B^]›k7i´èã±úyãÑ£UŽP®½z\Δ´ÇV`€yÌßAB%ë~ÀÏöYÌÑk8K^Z¾ Í ÿ™£+¶µUDqÌ{H A(}[9Hhôª&Ež0cLÆte-;fÑVÈ3Á‡Ö\P¿¨WáVA9$j¦¯SG R2“H‡ ±ˆ]ÿß(\ 5­mâ貑µ7jä9“³BŽS1ÙA\9<ÚÚÞ:òžoíoÑy¹)¼†è!#-!»ÂNžwÏ:·Ö¹N‘]]•ì L›Kòyš¸Ò U†D_´¤‚DcŽPÌÕÖ!+…\½„blÀÍÓØÀ8A BgBU•{\L¬”LJtŸ–H‰HŠtéD/â9û:?„à…E„IqW‘ÀÀG½¡¨?º°jûCÆI¤Ù0dU«p¹…¾××h•)æÈX¶~Ò½jb•V·Óº¼X|z&7ÌûˆI=&©gr52üáOýá€.t(Ñ£ºa­ì€È`†n»€£:ÜÙ Žé@ðýÞZ©„£Ö.Ü^ËÏÑ¥VÅÍ”N#$þ3Q±;¼Zžš)%L—#1cÇ—Ö“bW4È8 p—tÃî®Õ:æ¼ë2 ç5å%ã©Çß/è*ƒ€â\é¼QC3¦¡4¦©­*ãPÌË$¡¸ Dç,h4_“d¦­1"· ƒIWV²ÄäŒtîÄ‚³ç‹¾[GC[_m¿«-|o ÖÕfÒ^‘]ZÃCgqܦXAI£¬Æel¡ glY¼fÔ¨)n5­Žuw ‹g¬!Ž¹¼[ëÞo™܉…¹ š óÅ)xwÁÇœÀZ7Z¬>bIËáÉÑæÎö¶w¢W]¬ùÈþö,^AÏð³¼ðCÀâA=;ùæ^io ½I©îat 7êZ8Z²9½` [CôGñ¥fÁÈ (¿ ÆO}:neõíK¢²o¤¯_›iäÙË©Æ]ÖöP¤V¬_VtjÒ!_wiw÷ç=äê¿M—Ÿ~g¶¢GâŠõ£ÞÏ“[eZ2&"½ö][ö7ÿ©æˆ ©$ÇŠÍúlÜ^\‡½*ª,.®k×O—öfbgFZŽáy°¦Í@âpÂå œ(#@"$D9§¥ufað¢€|ÌÕ²š³d¾Û"ýƒ3¹Iâþh§ýVÖ¡ºaú Bíé²-Ïy¾ijg Ï%lL¶èµQ¢„¤\Ô‹É‘QÉ·°ø‘ûGw;Ã`a~rd \tf²–dÏÓdÄ¢8äNZ£øZt¹%Q¸°WˆÛ)Pxmu5¨” Íш—åx)‘ ”nü ´E=|iQ%âÖžmZ¬-<­-.[´I7“B4ë:ŒŸuD¼&¡Ùƒ6F‚Ög-ÌÂÝÝ!®OØÍ0¦åä‚x;Öe³ý;n> ÓelnИîärÔ=«-¥O€ìL`ÎiC', ›Ø¨Ù â‰Æ†>äPG!‰9‘sÜk9¢ñ¶·Nr- CŠ‡‚iì”EQõgºpéïs¶ßB¢£¾€!†ÂÅdÁZœo“5 Ì—h¡ÿœ‡|ê/ûþFG´ú5å™(¼$‘IltÜ,pSª‰è©XUר ´4‰Em¬Õ”-€E[r¤üÞÆ«Ì**Æxå.±!åHÍpÝYJózãÅsPUŠ»¿ÈUh®ŸKî Ý †F…jI´¥­‘='›~,FÂÂ7ytíÕ¬ ´íÀúÆž+F&’ØøÇ¢*ÀÁ•è–"ä/!—HÃÖ—@9Ê¥Íð"¦fÏ—a¾¦5êdŠí²¼âÚHvŽLË`Ç/4åÑoÈä¿f«Áõ¢½¶¶K6‚óîÚ-ÉÚ¡ðÊv:AÑ&qš ž¹„¬älÇÏEºù9Î9Ê¢ûÚ:€ôC¨R$gm]ÞbJ•f.$s‘M`†ººÔ•ÈÎà Y{¡°+;ûÇ'ë»»ºÚ¨7d…·èíÁŒçñÒÔZdVÉŒ‘VB,m¾ }½!þRŸ­íLIvÚëß]­¹MG4‚k²úÈB»Ñ°í³Õy$:À±6…º”ÁÃù™% þç7GôTßmþ‡î>ëûÇ; …¥4>«Ó¦µVA^³}ÖÿrMÖ㯖 uw_‘ŠÒKPv‘îPKî%Ã>õl[¿ Qt9+Q·õt4h Á~ûNŒ9F^ó7ªÃØ™½ïÑ…^›©ä`p"¯ƒÅ"ÝÁ‘¶Íaçéô2§# `ŽŸÄ¾Ã`iVå™îM –¤õíO!ªÁAã|tú$²{<ªèM´·nXè¾.¦L1e,7È{ná[dò–¾³pCö¹Öv²teÜÄ©9`ØwG-_=ó(ˆ¯ä0ƒ94Ö&¢:…èG¶+²KJ-÷%À²HÝR¬Òÿ<ÎÖ^óÖE[‘äØÁz¢b (Ó--ŠÎωŠóT-ò]æ fËÙF˜¯8"ï7²Ë™9a;Hq±O µ€Œèz¹!6¶vÙȹÐbitŸÎ]FÁT$k ìc‰Mì/˜å‹5Ú×~+j»šœ»±Þ>X”´P†c%á$Ì¢cÏnÑGî_ÈLi¨f@]>wTÿ$Ü&†Ã"=&úדd ™>©Áѽ”r¥£#+Üç"CÌ1 ¸QÄ.ÒÉ]D‰OqÌBïU}§†ïëûÞÖÞË]ìPt÷t÷×–òÅAé;\Gšg Ií‚z‡l{ÌIm1á ¾ŽöM46ÔÒæì/ü^\;$ne?ìı(¡uebt.éRÂÎËXî$êÝb¶! €SÞœjjŽŽJL^ÍNl#p/„i:U £ µøUu]@Ó/"ÔVwÎ,âZSˆ?Ñœ !z㵦‡—¯_Ä^ØMÁ30†ÌG;Ä×&v¤¨KâtJœRd+jÑyÍÞ·†ñNLc o9…¡m‚L3„¥xéEf§é ǬtîMKªj÷—PÏyTµÞ‰Y‰ö’M`Í¡lßñY¢®”²]ÌÛlÍg  Ã RƒVj¸AH¡Y‹Ä'ncwký¨ lM§Ýº~ÃV£o-+ Ä6£hëƒò&°VNņ#'Œ÷6¦kœ\–ò`«b2ª¢ë-†0#$¶¤"¯Të˸ ºp¶MÃæpHœªØÉ[sŒZŽ²pèm¿ÜÝ&QÞÝ ŽðÈｋԿ«èß½è*l%×bQhV¶þ·©òwÿ‚ZžOåÛoŸŒ‰ÿÂáR$þËÒâÒÒÿ·°¸´¸üøÿSO¾ÄùËÖß6þú¼ñŸ./=MÅÿY^^Xþÿç?ñ¯1_Pxµíß—t W”V…øÐJÐՋຠ‡µCt®´á„» :QŸD5Ää÷n«j·~X ÇJ¢á÷ ÚA[íª¢SZÔÔ‡5v ãµâMíLG®@C±þ-‹$TY¯Q6Gü¿ÎVŸ'êÀ8”ÆóXj+UÖ ù(AÌõWãu‹©¡ÄdAçÁÏhÛªELhƇS#<æªÔá*^×ÃsüÐøÈÖ7¾¬R°Wf"«h¿¶‚ÖbEê 9Ò‰ÝG‰}áBÞ>8Rë xê“—»ëGêðåÑáÁñtb ïïìoAC[{[û'uhÞ©­Ÿá†Ê† ZCpb\Uhz´óüʼnzq°KQžmAÿ(Ò5µ£ÛØ]ßÙƒ»ÄúÞúó-ªu€hX’»©^½Ø·Øê:ü?…èÅñlìŸÁO4e?:1µ_íoUá²·sŒ3³}t°G#ÅÙ…Jªîo1 Šñë,Áß/· Lµ¹µ¾ àŽ±²ŒU—ÇEn LvLX¾žÙWŽÄŽU$d„aÙ˜ ”‹ˆHN]©Ñ¯–èã&‘Eãkô.n\"1ÉD ƨŠèJ|Õdž¥Š¦HhžŽ”a^C{åð¿xóñµ/¼ÄêëímÚú¾[Ÿ¤J’·càbèPØbñšFÄ>é$âyœÅÔL¬‡š#ö[V(ëßyŠgò²X˜Å(¨çn=Ïãnz­N³çyŒáø•þ,~$ûÞñÎóýõÝãŠDÊÍ+´¾p¼»µuˆAló˜”n28+Ú¢3UÝ¢H÷¥¦TÖ“Â\70 ¿¹b¹]É~ÒÈ©zµ³ÿxÉ„A¹k´›×ß 8Úú/wŽ¶PLMë°Q¶ˆóJN¾2Kjºãíox?o¹ô¼=Ø^¯`^úóƒ£] Bø…—éý{5apØœî»ÆžŒéÿö¤êJ™1õÐÞÈ浪ٵÌZ®PÄg‘;ÄÊzºóÚ;ÙÙCbxøt]glHZ¸”5ÛH^›WAçÎÅ·ë¡ëØRª¡]í\…šu€y/_¾–˜0•±] 0Ükê#º¶†c&“¶°ö´wp‚@ ñ¯käG’I¶x=ÄÓñ:ò¼­– J×÷ºÀËÜx¤´í£¡!€_SÚ™tïåÉÖkÛ;qÕê *#ÉÖÝ &P×Ę¢a‘ñ1jë™9€æ¾+QΨzNò ´„1£²Ä6 <(M9 Öûâ®ìgzG¤ Ú3ÉùÇLÜ( 4BÂÆa7M˦!Õõ1»,cÝS`yŽ[¼J/ ÷QWt9…:fCìq ŠÁ@Y‚«|´|Åfúúbýø…Gnä‹O és7577g"‘v¢ÞE_þø£Z\J¨ælµÅ Ð7e4duôî]ä- /&ƒàBêVüêÿ´«…ŧÖ~saoXYEâ©mcÎ̆ŠÇš8+Qy\/Š:s&–š^¥ùgç@›ç#ÎS|{ÆÛ¹´²F¶Ê\§¢ÖÖÄñÖ '•0}zô(¬¬bîŠuã@d:1¡çÔÜ%0Ã6m[S·Ï0ƒìä6?êMî€'ëêã\¥Á`[`·(™‡?V“ov;C+W›'9·õ‹jJŸÁZÔÀÎhàÒ$;s¦_ó”k~¡6g‰±äÍõW)õíÜ7VŸ+2ÅHæšÉoLO+:# þÊ®g’§@'Ðź5÷ž-SM–& ™òF‰ŽÒéUU-JÁiº~ünÖÊ{¶{°ñϪ2íU•3IfØ?ûLmª—äX‹Þù^\XøÚœà+dŽØöj¶úØ*l¹I*3Ä™Žè¥0^ 'ÒÉ!ð}4a«1BÔtã%©3€Ý{RÍaÏ(„`b¤ùクÆ@LäD xl Õ%ß6HÝE6àhþŽ'cqO\xãüx0ÿ¬«iþˆÂ!”¯2Û—ˆ#mʱÞÍž9tçÜm<†TU~F\ºò;Õ‚šöUÔÈPÍЦAÝ[kË3kõÈœÂØ(a+ .Ôö*fõ˜@¦TB¡4æ3ÒgIÆ7º44«˜‹”}.}£XC_i:V…x;ŸÖôô0 ‚PAUdÏ'À¹îï­ãöÖ=¯ªý—»»NÿÅøÚ™2 í¡k9ÆN( LÐÆ…éWßF™œE•–MfUC“ŸKB1œöAùÏ#b!JíGl‡daÒ"^¼ÝÏKÖç%÷„ÊÀ1³´š[b))±¤KH¨”5µ˜œ2'±>.ü§±Y/χ„LâûLEºJ2+¦÷õ¸=lΰä݇7F*ÇÒ—þMì8ÝQΚ(êדƒUcšÝ?¨UqpÑ\Lôèp[÷ÔxcÔš€ Íl¨?$åäX‘•I‹9Bõ æ¦ëcv¦8áã`¶‡WpShémi¿îñ{èÊjé;õòqð.Ñø V`à0e𹦖*sØó{¹{Ï}ƒ–ö ´%)ýßÂ. „ÑÑnÄIYZŸnëØ<±r˜ ¢Ó5!)·)³•š €ãäìÙ3—˜0'ó¶ÒŒ’ÍóÙŸªê–Ô’úUÒv”û>›0jµª««««ª«E;“iñ8/9TŠ?KGhüÂŒƒ®(w°’î~Î`Š¯b m¼Ñ”æ^xüËo 6ãû{üZÚ,ÙSA¦7ñÆmÍRíÄ÷ã)éa&@ïõñå…‡çx èjÈj­Ä÷7pþÙ›ž÷KNi—ž dψÄa}“®ñê/P—¼ÏN‡ã‘³únÉ@S~àá$a å ×áuæ$3hT#%šÓ«Xi2•àë”ß3fš°êL,ç fI ?C¬¹ ¨Ìr §*à' ‹l‘§Ž[|•¥¿ˆ©['ïöv1×GÈò¡ß²¿|8>…ŸÖ˜'Nðd5Xä*?Ý5pÌy– ¹ì`ð¥´n'‘ÁŒú„g= %zä¡'/´(,Äuh‘C➳̩.4šÜ0uþ¿A¬øò“Ä!>gF[?Wã:Æ!$ìµßGx(ø »¡2 7¹‘ÛιÊ3VMÛ™Ì2áÁß¼ü±†%4›Oa[Þ$½à]ü.ž@K¯ÊÆMN]þ‘öúÏWk¿e˜Èâ(®ìzTn±ü<ÁtDÊŠd7€Yt-ÅJ÷bqEË<›`4à%¯À!ló>¿åEuxèÅÄÆ´—vÁ(ˆáÌAâO„>o§£×Õs^Ç:s&ɺ˜¨'ýpˆ“ÐÆKŽÒ$ÉÕ¤2h¬¶5q Ý;¡ ziƒÅž[é‡ø9ë”Ò>©OªuBü@2E*ˆäxc›ÀMìèØ/ÝTšÎÁ2íýx‰ðV”×Â)ÛÀ?¾òþ?aé´’¹L½¦ùÝ4õÑù‚¡ÜÑXí’õ„.*•¶Ýw„qÄÛ cÌPÓFsïã;ƒ¡ŸT ÅUŒYsz >‡Þ#ï Óri÷Ä·Ø4¦Òƒs1³¹£c Fkײ@Yqv•œ·çp‹ä‡_/mŽ«2ô}ÝzÅ^¿¾=e?' ¨>ë= Zwb´„±(…$¸ Œ‚—zyQê¹^˜ÍÃWk¹!">:jA;ÐIZÁ¾j üºÕþõ×­ß~+æ¬$}`¬~CqÃë_xY¥øí· 0)E­v¼uD5¶õÏ4ЫiÖå;H£ÎtÁ^Do°Œ!oèýU á•‡@q¦ˆºÿaÚ|"˜6Þ²§¿Ñ ÇEE‰ç'6x #ÕŸ¸’„EHQÂOáš±ãhä” BÇÆʤ `àÇE+3ùE\ºQÛKüÌÌŠQ/ʯ66F­Í¿ñÀûm/ý ¶ZÙL>ð=‹–ÑKQȱ’ѤZ¬y’,éI?¸Æå &¼°ÊÌ „Ħódª†7Û6/^¦AXÀÊÔ^2Ä@|ný˜í¸jî‚?…R—WȧLÑh»C°c/Áïñïs f %€k´½ ¡Y’$v5$ÙˤV—I8Žµ•4=AT?ϾNÎÁ‡I‚vròá½dsO8©ÓXŠê(%ôWfÑó“zRMÙŸ·e [†âžÞá/¶ì¬€eK‰…ö©Æu àš÷ßDZC˜Ö!@kò8k´ÖaXû¬ÁZ}e¨Ñ­ VFd†~ –ôÙpT¡ä“gåy™W&ój¥wA9[F+5£š´j¡Íìà, 3CêO'ÑÜ3D¨]Ò’Sa%àYºþºÏ‹¦¤µn9‚Èñ?£¤$ ƒ¹ð±Ž4o0Fþ}0 ã¡»«à~Š•oçŽð,Eì÷jñmw œíœ$W ËT“T¯~ž9'ék¥8i¿h2ª´ÚâQøš9Å¥ŒìÕƒV?Ü@ÓÚA: Ã9Ø¿è½Þ¿8:ìœíâÅæÃÇ!.-ƒi¾žˆÖ×üÅž[qé!¡ÜL¡$‰ÆKpË×۵ʡù³‘¶ù¿[­z–I¥n7í’éïõn‘¹Qè­§tb+Õ*ÍâÿÛ6 èn£Ù1§„jpÕt.«ž”Ý'»ê‰úÏfÕ—Ü9ŠaÚ§mH>‚œÄølDÅÚ"•¦Yèš%›©„'±X²•òXÈ…ÙÂ!›&Fœé̬y²´Æ ¢]MsqP:²mɵâ·êÈMxZ¯3g<Öœ6˜™Ö†±È¿fÕÚ/3[òC.øQ`Ý‚–{ bV-¦QzÑ›'Mɳ¨N¡dFþh·Æ%iÏ öjiVX °âTßiìù*°kž” î‰ÊfÜ žF^4äø²äê¶éew£Ö¼Jÿ$)-áUB7»LçkfõVN/‹&@E¥§ˆäJwVËE®U™m‹N²Ç zþ•óðÍ{šií6«~£œ¯ÿS¼•j^é¥bù%L1 ^€àþÔu¸ü"fE-î¦Ç­•raYQoç—TÈg3¹’›çk6­¢¦m¤Åi±AZ|D¤ÅKï:B-êÞ©˜“¯ëÚ|DDoó2Éw4z³Þ"ëB ¸Èi7FÖDÌyÑ f%˜‹6ÜÓÝ}, ‘ÆžlÞ¨w±Ì”µ'Ââ2®ö}Ý\[6{«c´©GWL9;^jovÚ©'®”`|8®ØÝíÕv!½âk~ã©rÄæþ¯AЊ§€ÆžîªÑÞ6¢¾*\r©ww°G¬¢úÜ´¾ö¦Ð*¸&M_®9 =)®I‚ä5ð̆oŽÐlOŠkÅ Ðbš@˜ ÏÜͱzn5[Y|–[O­U»«el¾ñl£°wxëÔåqJ8Üð]=wK{zn`·¯×Å]ˬûÕpi¸ÒÈö­WÎXg[ªlãÙUuÜƶgº‹×TºÑqjpŸJd’j­®U2¨bl«FÞ˜3YYÇnáìÚ`ÿäÝ0õ/™Õòð³;Œ£"<Çq”“[;£ž+æ¸çªçTc„ÔæhÏó–5'­#È%bÇnQãꈎBm1%L\²ˆú¹E…«£:®nÔ.±_—¨oUdÇÕØ>¶ëÕ­ˆî¸J©¶ˆÝ–ŠÚ:Gƒª(Öʬt‚¾’÷aáTTç‰Æw¨'N8MÈeŒ¥vŽ8àÊ="?TŽû -ö™ž.&GñQëÈèêqÝ— ½}g­£+¿.Ë¢®j•:Gáêæ\ —¢&ÞÕ°VçžS­´ú+‰W·"]蟬™ivE½|«ÁȨ/þX"òXbIn;û¥#v1ÆU³be£·%ê`!Óš[ÚB#Í‚“#Cæ> Bò)vaae™Á!Óv*Š¥”` Ó–¶DZñVµH0"ݹj¿*ŽßN)»È…zÖ,·ÇÁ&¿šÁm‡ñSHà¶EùbánIÕ¿ÄÈÒª¡4fdaMºM¹ ó¯¾ù.‰©S –š¶âbRy¬è‘*¡WÆ;Â:«ÜETŠcr|r†â}Û^ZÔ¹5áC‰=(@ÔÃí¦ZKÀ¸•ê«í£€’¢ú•#J*W… RRaÔ—±ì,yTFc8kA7]`‚–|úº Nxɧ  Ên-“OÏü|‰©hò)½%k‡[":ºNòIKÆg$•€FÔI¡YØIÓ>êi¾tO†)41ƒ4Pt’9Œ½ü‡´ T’î,4’¥ÐP9 á6À†B{kší8¯<TCQ–æºóKÊs“É`=S6sF=«0oÈgÅùY…Ü™aÛJH]ÅxIymP ™RΨzuGypÊ*Ë´}o•X^©¹èqíõ£ºy%Mx_1¯œáž¯$ìÊœ2sË=î‰ðª˜úù¬rÃ+3sÊÕ„ªçv´…fµÔŠY~9»Ù°æÛÒf%l¼÷[×/ùëÝá&ðjyZÒÿrC‰|˜½¹žZfÒפ^KcÌ=€¦µ¿w½Rv:ZA¥!Æ ªã6¶-«í=šHNܯìÚ”HëÔXL«cL¥hRm<1§’b·.ÑßÚPepu¯(¼™°­Æ£ÚQFQíÀŽºa›Bˆ«.¥½P? £-§[–ü³ Á:_]®Õa•$Úb@èyc £¹„U«Ã7®f´öÁSû°iUØÆÕŒÔ68j­׸*é5?K„=ƒ-åUeEö9SÉz0ÚöU9¡4ákæ„bÒ£pB¨™0o¹‡\û²°…ÓñÀÞL¨/ÀhZ\=ô¢ë"³µÄ쉕Â]eW^YÐÀU¬CÇ€V½ür6ôkáX彬*ÏâU%ÕZIà·è8·_­¬²¶êäVe󠮞sè®>üÀR<¶6ÄK†êl‚t«eÁŠFmŒÓ'ÆÏ5÷Š“&ÊE%‡MÌt­ªÉ¿n´‹Ì€‰q+9ú ¸}q;;Ò,ø(×ãˆD7šò#¶Q­ö3¯"Þ’½ö`NÉW1‚͈4i„؆F…1Rîþ>K­ëÒh‡¹¥e1›:<ºòSYÌP½„­4`¥% ÷ý,@ åë[·ÀFÕV¯ýÜçGb ]XŸ|8 Ù_>S›ç5à=lÐCl[šÖ°gé°õÊoX؃©*”#*DÚ„;(µ‚] $+®¸/pGUe±xuƒOfñÖ…!ø¨‹·œJ·€ |íᦾF0ÀG}[ÛÎ"õÛÌSýÔ§øSŸÚ Á'#_Ò¨ŒŸ~kò”[2€$ð3 £°£–¤Ë.Ä£îK‚˜®ÂãYöZžBWFõaÖ—4S­$×î-imI© —ÇEjx¾R6ãIø«ß”øNŠFÎèN%çÈÛ)?õJ–‘ÊQ®*ùúe×v)>sêÓå¡÷Ê.¿r°{Î\°“XwÀ½Â°å8=y˜Ó_ÕNX<­éÇ€Ñ+§bfêA¬ƒª*¥^«çå¶V7Êæé´_-yYkô•´`y©òùD–ñƒàÙïºeð${­IÛ*Á¾},X;ws¡T¨Ñ h—S9ŸÊ¼=="_Šu+d‹ÐP 8·•B¹Yø=„[mðm¥¡Û*BŒU]§åáÚV¹fn®†%|7h¶Õî‘Õùg™R\Q–zZ¡f´¿¹Ö9X¥ ×Vk„ÔqS³ÌZ}k5ëÕ­f«V?¤Zu8µ@©ÙF(kÃär„Os D&áE»¤<ü˜‡K[9TZ™hãê¦Cº_×V­L¸Ð)Ph"¬ƒV Dªd Ð6Xö¬ÞÑÙúìB|UaÎê™M Ï*„WÖ¬niÔêCtA…r꬛œà^œ*UF-5}kµɃZâª×8f(¤qÑ;¬U´m¡yœBb+ †Y„ÁV7Vj¬DЫt¸¦Ìê) ”UçZrÈÔÇ'£¸2w*í)Uøco)¡†JÕ¨“ìƒQµ±Åj®‹3•¶ä:‚MNa¦ú°°j«#¬d (­nÈ+¥9p¤ƒü2ÀT©Ÿä0_F€*ë«âfh¯"¬W±ÂoÊRaߢN•ÀwÙqÆŒâ‚}b7{2B-ØfxR žKû&BêðÒ˜£&mñ÷Ãå´öJÃo) ·r³%ƒT*7U%a¶ì ¶j×R@kYÀjYAjÙa¯8Ci)T› B«ú<[àr°l/ÀÔ•%|þA9VµE(60Íþ rß, °t0X% ° ðWjCÂ8r·Eè :4‹Lqõ苬*¤Õ£.2wujcµbSfõSZTգΪícwåºM•Â§6uŸê”• pa§ªBN9ÀM•…š’ÁLé!¦ôðR•¡¥´°R&°# äŒJÊäÈþ&¸|”àGîcGd°ãž$쯆ˆr✿ÃʈXRZ‰#ïpJŒPNÒaÆR±”Ò¾g™uW æÉÜÈq•–‡vr].å ¬Gl–:w' ')|S!O~§× Š¢¢5ùPMnêÎrDÙYªgUWŽIÅT†i¥L–ðKv~€v)¹ôt–ÞƒÁ+™w·2°JVJ 8¥'¤ÿ :É~vW™á’dPIOhN©Dj ‘H¤éIA" ¦°$‚ž2’ö¥Š)£Ú¾•1uþËZõ‘Ù•â÷K'%/‹Jɲ-.y(žwk©^ °’Ÿt·xO¤q«Wj]*5o-×Ù°¸S¥ï@wÁÊš×Þ ¹mìÒ°Æ’¡Úk>–êÈ…3¥0›’3v»ô}HoyY¼òt¹bs)Ì$qÅsóOyi/”™IQß.+»±Ô½iØ£UÒ†Ž›6S~5¬“æ–>뜡žë$Áâ:gÅwÝÍ­RhYiyÕqÑóN~V $-×ɨÃá*‘[¨·ËVʤª!²:ùcÎyä=;†Àkƒ|Rôgâ2¼¥ qç×Öè\êÀv¤KA]íX].X„LW>:{¤~/Æ·ìÙi.{vŒ:W‡úÒÑj{yÛÈ*›h¡cT¹: Ø*Gî;vŠW…[å¨bÃ.QáŠða«•p›Øo¹¨¯{ø¨’¾­ÎP'lE'6G ŒÑ9õ3Æ ÿäq£ÊÔϤ¥ÇeŠÒÉ_Ų2°ÄÉ0©5¾jY]=èY‰é` ZÇQ«†÷*,Ó²È_«[´î¼ÚÙWÆ©‹uì’5°Ð->W^%–Ä‘Z™~tŽoÖÍ9Ó£fæÕa‡Ô¿,¹¬©¬,Ë]܃ò‘JËåÊÙ±:XÇ"uhnBÍmb±•nùÉ!ÞòßP¡H:±1Æ̸oBC%Ùrr ¨fBSkJí¸¬Ü$@qeøkÆ’°ÁRc;‰‰f,öÌ·E¡¢™®g‘&’ Z²‘uëDïß]åP˜®¸ ­gYbV×—„°Ój[õZuÉ(½Y x;¥z0èãå]­™î$"’Y à­P’ì ‚Òþl¯Bj=ŒjèA9bDèAwIý6oÞ"uØrU÷G Œ½Œ’•Cí©—€ qOeÈ—3álYUJK¸«?ëå¯@ê{ºË¿¿§²üKïÐ~oD>´`ÔƒøTdÃÁµÉ8©¶‚ð) Àç1ñÕ"vF˜A±]´Aãèéd»|ÔMAh’l/O£u\L O(¶1Çl4 i²9è·Â·´¨M²mÔ¡ØR= õ6{â ö„[Îú`O|XÿfÐ,9÷†(LÝÎ/¬Ò :à‡I&jEbhÆ>+%„UãÔD)ˆE»êV*åq«-Ýr(Œ%™b-ÞîÐŒ2.ÈÁ°$ü°ÍÍÖâ‡Ø"eÕç <–cÍí6‰ ·ÝT^Y­]ü±¸¥«™S Ò HkA„,Y»¨…‰Ìh°Osý? ¤ë>_^R¾»[hpØä'¤Ã ²¬±R6nk©,ê­OtJÎR©KÿÐüSæŸÑðÊŸOÇÃ~o:‹6_tv;»Ï¢°ÿ,ýñÙM0 B4ü%èÜ–úÆü³··‹ÿî¾x¾#þ›ž<ßÙýCwûÅv·»ÓÝ݃߻{Ïwwþà}RŒdƒÙJþý‰üÓ€Á6`° lûx`°øã÷Éã±Ç›‚€ùL:®AlÒí¨sÛ¡nn) d/#rƒaB>ºEèCàýŸh]̃ñlδÙ<»Mø.“þ-hšæÖÅGwé/± ™|âÖ‡µâ"\iÞµ‚s3:ød_‹¦cÐ~ ç!|l­þ-¾ «ÇàÏf¼7þŒîñ%–|NÛ :7V)"…ä kð<#ÎÜ‹’¥ƒkõ¡GÚṡcx=áÓü—,(çc÷a¹ÅL'įxÁrz ôOÿ6èÿ êçÖŸ{w0ì0 „Álä÷A¡ÐšŸx0œæ¦}u<ïxâqk•eˆùƒÑ0ôÁ¢Ãþý êâ=çGÜI4Í|^MyŒBý1&}:G4ó‘x‰ Os°ì( Ø)pˆôñ(ó.à³EºTR§Óɉ’Éæ)€‡`³âžHÊu%û %žÿÙÄ.ÍA¢ÇL®I˜F…ÿ¿˜ µmúrÜn3šýáõ°OŠgt¼ˆæ‚Yœ=´âË Üš ?oÜ¿<{{|Ð;{wÑ{ƒç^aßMå#2-¤ØSz/Ó9p¶Kæs²ÂÛxÊ7 ú°œü𞶉Ù¶˜ÙNšÐ)͉û’92_³p°3í-’+rýëSø Co¡»Ì9/FÈY=Œ–÷qèãI«“°Hv\ªÇ·“’Y¼ÐÀ½Å ˜‡¼†¼ºp‚5qF=!)€ÈÕcUa¸}ûmêÀ’CjS·>9Èua\Æ‘·â^âÍ[²ÐT€¢>êQUsnu)Þr÷º ƒs‹ÎŽÇB^“-›eˆ3rNÛÈË΄ ±ª–ÉÈC\8ÍGNiÚ͇š´s9œ‡˜^-ó‘[aóÕ¢ßìŸ÷./z—¹nৃ³·à+õÀ;è]|Ø×ûîýÉɆߞ¶'–g8è:«TucñÑýƒÿz|~TÃwÁ·ýôùÑÉÑþEŸNæØòÓñ'U¦妓uç:™êÚ?+¥Ç™ :çÆjZ6Òy‘,Êwïd4ÿþ7u¬SiÊuÖÊëCFÈû'½D/lÄŒB„ÖBºeª×øÀÔ¢kQlÓtÿqqtÙJµZªãv¯ø3ÊÇ“6ƒ4º¯0œx:Dì èN™)‹f-éÊqâdÆE‰¹Kò“˜¾œ¡AÞ¶ü$ÆD “˜tå8‰2‹¤Ä$&zñILbÎöÐN"o[zk˜<×I«8YOc’l&‡þ¤ÕéÔ›…ÃiHÑ ¡@7qòét¦Œ L¦³âI3Vnà·¼_%G©ðT{ ^ŒtHý†$GqؤÆ%âÁ5Mí`1ß³ë«ð÷ñéñåñþÉñ¿Rï¦_ÑKª#âøƒÚÁ ‘ÝVËF|)"ÇBÄ/½ÁtÝ::,J!>\è7^Š¦~•ë'¡x;0½ô›ÍQ’óÌxÛÏL‚$Mȧ´!"›`‚)̾*û¾B,“k&2fˆ”n,ÊËǦºu,Wë–‹²ž¡ª®“ ÚÝ2×8õ’¹§^dM%$^¹ã¤Ùè™*™ðì¤Bª¼”÷Ut[¼ } WéÌU¦Ïq5óŠfµØ¢:m6¸¨Å˜¿~ZÅÛGåçT‹^ZèV YjÔnÊL1´Œ0ë—ÙËZ)Œµü—Q+Ùñ,hýÁ(-šV" ¾/£Ó¬n«bƒHu·bÙ è êH–aë6‡H¢#:Ù 3+ºˆœä–@t€>¬>2k«K;6µUvt–ØëOqѵÔb´Ç\¬<(£²¶—ƒæ®Q=h Pözµxž¥ç‹Ñ~(qÑ:³E¸OºIT ÓpÙú‹8Ùh=Í9ÞŒÆþhÔ¹]W<öaåÞŽéù³¯YR*|—§‰§¸ˆô·wk}àM'ªº+!S…K ïðìýë“£Þ»ËóÞÅåÙùþ÷Gnh’6ç®r’)\U8|NJä¯U/3.žÖv³‡·Û.]ðS×n6×a›ÆÅcyù; w¯Ö¤e_âß©Mžb¿^rzÛ•<ÞNoóÇÔ“ðvL äñvú8~;<{wìÌùŽ¹²1Tœ*Ë'1딹¥RBàlS]4o×Tã¾´Ä$ª¬E¥,š„Ñ$&q4É£Y ó‰BY©Ôg;h&YãȵeÅ6¨gExÏ !«¡è†ª¯„e÷r]므d)l—x{’Èÿ¶º„–aoá²= Ô#tV)‚gÇG]Üý1eDê¶Ø½ÃËÙuÛÀI`$ð11)%~©Í¼ˆ}µœ9mQmËjûÝìùèÕÉIi¶Šnÿ*tUBGÚpmµG2ùˆO‡#v!cC'Ò ²Í;O6Aj£ˆ}V‹WžÞJцÅ-ÈPÊKo õ«üšØ®Tw®º^Zߤñ¢á›R)~|“Ä|„k ÕùIð¬p} *S±e9VÆ«§¼˜¥g½õÈ÷‹Ò¥ÆÊ.ww›Ø|¦c§²g!uë^ÔSÑ'/ÃÝ N\­ü­m¯Ã–C5«cYÙ÷§¡›íÏׄ±%lªUð¶6«Ž3>Æ»yPÒŠ_:æUŒU‰ƒBÓ)Ôjyä®sÈŒ}P(ºf½.صí²r‘ê‡ Q¯82­I׎®‡^MÚÉh1YÖ¸‰ïI_-{V:šËD˜CË¥YesRæÿ˜Wµx²c Ù´—?ñ»EÂÆzç ŒÝ%Vì$ÖšÇOBæ­"ÃåBÂîq¦*Úמ­ÎjÉZéZ¹*ÕÙ¢õGVÁ¹¶zjlÑ„oVÁ™{j,Q‡V³z ÚÍ™!N†J½qXû¬…8hoí)šƒÕgJ­å+¿úQ½G[‹%âxu3¯Œ›Q#û*n{50Ð1PWZÏÉÃ&¥ôÜãœ5óÍÅ’¨ŸuÍŠ:Øeâ—¶A¹X¤2k;¿B¼Ò2PùÌXÉø“kðÓÉÇ`2 ° ûõbÒO¡q“€Ç»ß„î7 ^‚£‹ÞÏ‚ˆð$À'‚®ð‘‘U‡xm8Wj¯šªk]¿WÎT%ß—cJê(*/¤‰×6ñjëx(ÿxœÞÎýàóË)N{Êþ°m(±P„Ú,j_EBh/6•R¬¯°¬H,²VC¸¼>©]DjH¶¯…¬Ãu•Ú@V(*Kä3•Ê9ýF¤fµæk&[è°ªIÈJ5IlÁ|6j$ëo”J”*!’bŠFÑ0–U\{\Ý!¸áŸ‰tÜøšÆ\m’Râ’ŽT›Õ›&Ÿ¡ì(CAõdn¹Ú*eö¢ŒßúD¨è[^VKÕʲ’ ² ƒ¸Ôp!{…‚’M|&ò©•$´¨ÿÝGƒþ]©4Þ‹ÏõÿX¹<^ÿo»»½ý‡­îó/¶ÿà=oêÿ=¥ùG×óþ³™ÿÝ­½fþŸäü/¿Ùëíí:UÕ×ÿìîn?ßÊÖÿ܆÷šúŸMýϦþgSÿ³©ÿù9×ÿL1Ý:g *=4¼W¨Ç7 ÑÔ°jß1ÄÛ9,eïÇoö¼áx6 ’ÕÅ5#m/ŸÑê &×Ó¤w‚—ÃU0¿ ‚ ¬áñ4¼ÏÔ=úñàèÝ%+é{Xì/Lº¢Ò}âÍ@=%u+)ÌoÎðºÁØ¿Ý{ƒE¯ÁC*˜§ Ó9/, ¹wµ¸¾Æâžnç³Ï¨&p» 5ï÷yÉKükz}=ìã2Ä“‘±«(Ƽàåk¤ÞþÏ0 ÒÈáÍ‚7ŸNéARÁK{¶:bWÙ'¶Ãl³zœ½»ýÅIûo{?îíööØ?>ÁE€ÙÂûÜÁyoQ ì$Éжö§½9k§gðæÝ8˜ÞEÛ¿%Þ$pá¸QéQôc¸ùók_‚f'¾þ)• ì}{qx Î!ˆç *` ]í#ãfè=NæÀ:ø¢vnq礒°£;ÿ>ÂÍázt4nŽÁ@è 'e?± ¼ÞÛ‹ƒÞ°Þþö­×ÝÝÚb§óñH†Ø|&8µ/f¡3ö=öS4ì{½cØœÃÑ´ÿs08Z÷&7Áþ³Jômù-¨ø•½ÝV¦ê(hÞïŽÎ{ßS=‡C,?¢ïòxÒiAcg¦Æ‡Cca`Dhè~¾–”’CÙð–Až¯b7ã÷“€±ak <Ì¡üÒÆÆÉÙé÷ø^Ò××-è'ù½E½Zûmí‹\€¡H‘쮂n%±Ã¤¶¼M¯k$¯kAlüÎô s¬¤ïÏ&ú’ç.÷%”V•j eK|®™ƒkBM`ç-í’“3Å-œ–Š"'B”N>€Ê`°qC§H%ü ÿ’ÈvÊH±=­¹Ì¶kq&·ê”kMN“~ÊDaq÷YKËZ [fGJ¿°¡ÆÕ^ÏƨÊñô£‡³…턟«%Øüä‹·„o{W÷óÀ›ÍCïÐàŸàSŒ8ú£ü¤œxÅ £[0äÙ#úO»aSÓì¸ÙOV_ÚüLŒÌÀ—º«èç»-w÷#¬Ž¶Þ<ÀÝ©Ñ5YlT´‰ý'ìBópÁóôâ"é‰5Õ_„|ߟúJà±zï”Ó×÷ûè½qÔïc]í `ÿ¡ºrª¹Du¤æÁKo}LD®{GÛ-*¿˜¡?Æà‘Ñgcžgþ62ÈáŒ}Ÿ14-Þ¯ëHÅΤ“CqC½D•T0! ÃŽ¤Z—À®WÅ– 2Øo^'¦-A£Üà¿sˬf±åoui¸F/±”J|i+ƒ·ï~ú#ù)^ißK¦Ññ=ñ\$÷f›Þ2¼Ÿ›ÈBÖgMô"09‘ þÄ?âWà EÍëßR î¦dºŠ iÅã¾V~µæuWË"@™Ì¥Mãdmgã=‹³Ë/Ü‚©-‹ϲè¥ËWdì¶9–¯z*ÏOUƃÂ5»CӜݗ8º7ggø%Žðmè¬û,_<¿ÍÊZþ<ŠD­ö¨?Øï± ÃK¨‹¿wqùÓIÖh88{ ÆQïèGôC¾?Êþ3¦ lا¼ûáìøP3EŽ™ÔVÀþNs hÆ,­• È r%2%rYùÑð½_r¨K—È æ,è•F?Ëäÿ;%ÿ›ãÝ/rùÿÝ{»Ý&þ÷˜ñ¿&ôׄþšÐ_ú[mèïøZ3Šâóû6žû,Ëù‹yФ öá ì¤!¨LW?_\ÂAHÊ®íýËÔ»‚Þ)¹ßMͲ»Üð…]f{þ¹8æVþ:¹Ì§(£u"LaœÉ­Ža­QM´Ü$5€ÿù±{Ž, Y²ÈZ¹$ßu`$M¯ÜÇœÊG®?ÙD=èë=Þ5™/& [ÐÏœLƒhò§¹,A=ØdÃû;Ü=;Ò[ÇÑ»pŠ™†ß>Æ®ßÑm‘ùÆ»ï ŽfKá"È_/™^Ñe Üka/ ?ú8a i8ÿƒTgÄgëèµã÷owaª..Ï/29Z”•XÌID±DXôýÒ Bv¡ƒßjéSD&‚&µ?[ âDó^ó˜0]\‰ø…”6¾ oÝúl_‡ÏúXe$—.—=rùà—·‹(í DmŠ›4}O`kƒ}rˆ“>f½ÉæUÂßâ<å û‡‡O5ï80åù¼c–XÅ®'ͦ» µN¦Ø&Üßj¬{`}˜r‚ùŸIêr`J]ò©Ë«á2û¹P)–Æ╉$³×)¯×œÕ߶–××…Ü%î6ót_áŒ'y³D–o Èò-Ïw ¬¨ÝdÂ<ô {òÞ.…»ÃpŠ7 §è ‡–HaÑÈ]}Ó$8²;•äôLÙ•Eæ‰ýkáH¹ÕB‰áÞÞ.Ÿ^a°Þ'û 1þÙ×ñæÞ÷Ãpˆï€fÖe;n„èÀN ®UàGx“ò¨ÛábÜ×2FÊÁÜ1ÕoŽþÞÛòûÓ£ÃÜ Ñž"sêYœ¨&µ³ˆÎ·Áw[ÔÛábÂÇ)ñú#¼Å9†Íh ãñÖÇ-U{?Ñ[†Ÿ—v*Y‹ŽÑ{ºÇÆ'¥-'¿á>hS¤öCô¯£&h½dNB?¡ ÞÖ%Í¡nEÙGôâ æÒ·§´ ðÈGìQ8Ý*ûKµ¼o¿-üX‹(îÙiW—½ã 4µµ—¬Û»©K†b4w /€Ku€DÚÙ;Ø¿»KÖWÓù-}T`EMÌw¯ë½dm¾c]:þë‡ãzã¿[»/¶¶óñ_ 7ñß&þÛÄ›øoÿý\¡_’ø†äx3‚xÞ !\¨ bj‚„Ïp|{ôÒ;œf˜g³­ tUÈâ÷=ºJÉí”+rjÂÿÈ”oˆ{þª%ÐYþ=.[ÒhW¨E†óNË1^¬+a¶\ѹ¦`_0^ŒHA.È%vtŸÄœJ4ãöÏßzÑh߆îÚèC€¾¹õ#XÕÁ„^Ó052-þуjhÏœ Óçß’jÁÕ{/bz)px”‰zA†*+n“°Ô͘Uàë$‘Î9Í=ÅììKqä~ˆó.fHàd0¥¡Ù‰šäääÙÅw=òo’®ÞOb6Ð&q^0©h‹bú4³{:Š‚'®XEÇ×KBöp2@tgqô6ΩmÇ!j!ü}z ê}Þ³óNRj%ŽÆ  —¿5W¿ùAØ&Ãã ¶isý‚gg0K‹ÄIäL.ù¼j±ô[ïm…îoßz{$Ñço?îaÇ´E Ã(›¢œû8¤™ßTg.ù'lÒ;‰Daùà²qyvxö2õr<ÖbóWBê–xð!Ð>!JÉò›½VGˆÖòÌQ>ž¿z{Iy®o8û.>¼ëä#À’NeîÚƒåHüˆZìÿ½ç…û_[ÏûÿQíÐày€›ý ¨û ¸ÌFóRÐøÐøeò@¸ÄEÌ6dÖ:3J†i»Ì…-f2›@°ªHa°mª[ŒC—™Ð"Y¶c°×)¤è“¸f‹ í(º” N á:Ò*C<÷˜7ð]âÿ pË( ›^ QBV¨ï.$°1‘ÊÙ–òãõ¸¨H|¾žÚmô$¸Í­ÈÓå±éuÜ?×I äv#F+y.E<Ò•À ô¥Fäãâã”R‹Y'92y?™8ex‚$äQÄöùȽyz«å!p+=ŠMú+ê¡-.?›\ì?•CZÙþëîìæì¿íç{/ûïí¿Ý&þÛØ}Ý×Ø}OÍîC:VÕXØH_ÇZ̦"ÜŒ†¿€,þkB7â1) ®³4s –WL¡„ƒÛuè?ß–õ¦`‡`´3bé~ЮÃDfà„ÍâZ¸ÎK`‹÷蛑GPù³{Æ"¬ÜŒq¿`FÔ¯,ɉE:¿õ¶Ú<ë »üÖëþÆÿJ_eâD<+}œ{zprÒ+tž{ŽYUÉ—ÖrYP+ó+{péu3ëó²ÿ†ýþ³Ò¦‘[ýŸ½ç;[MýŸ'8ÿCß±öMýŸÝBþÇ΋Æþoâ¿Ðøð{ñ¸-†¨Âr b2ƒí+\+»f°h]’È°ˆãFÐï·Ø bÑJÐRÈOó©£À*–¶ád„F+h“`Œ™•ýé€Grìê¦ß'Š”¥Š*ÞâK ‰`SŠ´<ãË•šõxÉbPc\4}Z+IÂ2w40S³í¯¯Q;à M$—Ó88b§õûµ€Ï0(|Ÿ¦æ_Aθ¦ 0Ì-z,tY馤pîE£9é½»<ƒR¾–A“ë9£6ð6ÛÜÓ"“0l‰^o4øßÛØÈ~ª5kI]ÄïÈ‚ï4ûqqiBMRà£í¿ÁÖÅÏ·“œô–ªîFæ[ÒJt,¾ ¦cQþ*XzjŽA?'M±ï&˜p'¤n4è@·âü¥lFw]\ UÆej¤`µéV[†ù]óU˜@U•(ãeœ»ÂŠ9|б£XT»µme+9ãÄéŠaö]JÞvdè7®²dÁ”ÒL5Y|ŸS…Ô‚)6ƨ³¬rSÎí>lîmWÎæßwämwÏUbmxS»FCù㮣èÚðÆ®V¤ƒÜ’-ìÂ×Ì›Ž<ͼëÈOWY5s£$/ ~Å'ÁKGÉ4sc­9ÿÍÿÝ<äùïö^sþûçŸB!Ãþ¦ç·¶@úóßç;{ÛùüÏ.üØœÿ>Öùo÷/énÂÿìâ!ðA8]Bƒp6eÁ~õño±›=ìæ/ØÍÅp4ìO'Þ÷¡?»Rv¸]/¥‹Q±ãÃã ïíþåÑùñþIæüŽÙé¡·ÿúâìäýåÑÉOx8—$ò³Ã£C:;O‘òÓŸè :Ü¿ô~:{î}8õÎ/þns ÎŒñ,OWùij8…Çc:»Å¬7<_Óñ˜ßs` iìX–¸²‹¬°=Rq’¸r/;jíäÈ€²ÃiŽ4âSåôlšµ@Ü&v%'÷Ø™%ì´Ú…ÐêòΧãéä;Ã(=,NŽôä'ÏœµÏdVV‘x‘ÌI5daá¹TÁ͘S—½öO˜U•y§°CK¾%·<܆㟦£l¹À]ªçˆÂA;°¢‡QÌ¢`<ÜœÝN©9«ßMÿ4÷£?Á3ûÕpî½ðînñSTê›jISÖã ~&ƒˆV¼’ðlÞN›B'ý[ü8žÚν±–H&£öâè²Ã›‚¬Dc’^/d¯·Q(›²4z_v_yX _n­¼ôÖ¿¬{Œ ­6ü9†?Ÿd­ Oƒñ4¼_aåÜîõqwÓðçÈx)qZ¨\5LaB[ñ¼­žÂ<“(ŸSÖþ6 oxÍUkb­øhÑï°öüj*F¼ÜM¡¬‹Ò¤[Ó¡ÊÛ’rttz[ ¬/’6ËöuFÞ—;í/wÛ4“Á¿´3ɾà4“ЖË@üŸ á†9æ·Kr°%ã*ÓÃg‡g/©–t@N±²N`§Xëù²w|eI'%w>åú/þhvë»:&ûŒ»¼ýÿ¢»ÕØÿýßØÿý¯±ÿ3F&ÚÃd? d´1õ­R Ú`²úÓÞœµKw®Ó³Þáaïìü$ëôûd…ýðПû¨M0ƒ Œ~0 К™Óy<òašÐ^NnDƒÚ¶È¶ÄÚX_­Ã–þ2»­ëêpË¿uçñcw_£ÉL_aíÉÅhà](ü’rþadÊF ¸q ¢ŽŠôæƒ1Ò‰Ù£35xÔ –3P6Ãù辿ó!€Ž†ÁG.‡£Á¿z#¯Óé€Gô¯^??=ä?Ñ ¼+? ‡AÈÍ£iobê¬Ë¬; k¥®ÚÏùGó`Cãû« gä.ÑÎX×ìY2)-e'¡`{Ã{Ç!7Ë/Èlñ ³–0ÿf“ÜÍG™nŒàÆþ·µÿoƒ¥6àm}öþØÎÕÜÚÞkìÿ´ÿùs3óÖ±9€lkþ²¸j`d|M½õat?é¯ÓXÖ¹µ´þʻ޵¶Ù,!³aHéïÞ gh‚L`Ännçë±-®¯q0žw2ü9¸âç^ã(å•Ð•¿˜O7Ùî8Húõ¦×Þ×1æRþ“ß A¡úšÌàøCDhÜ•@ïñÅ~º“’u¬êYgÌEgc>憓AÏcÞo˜–önýÈÃYÞd5³ÛÍö&øáƒ!ĨÇð߃ˆI#LhÂP%òxP1 üldð HôAA`˜`õ;˜õðÝA'íëøÈTÅwGç½ïNÎ÷OŽÿ´F8bcú#3’c‹šÿ©1ŽÁNì@°¿Üò¾EËÿ®ÇX¶ñåNë4<;d(±ŠrSžôÔ…žÐÙ «9Ó ï Égö™Txâž²ä´gÝôüe7éz¢yõÄy•ö4¼ö6þˆïÿßb<óºWš@7áYÔ5 3šó!²´´'n‹Ç ø'ã7·—3¡j²…7bûþ“M\. fÝŒõ«>5PVIÑœ"©H€x½z.0øãxö|ëuMn–Q’¶KJÒ¯b·°ÇmCÇàu‚¡h}±•ï–&ϧ=Zºóï#/Xýî0‰7-£oz¼?u£­—úl¢>O\reºq.5"vK¶´iùˆY¿_L _e¶rÖÖzv:Z╶‘ã®Ã4ÿÇoh#üøoã‡oØ™Ì`÷mºÀ?öÁ aÛ¿ÁÿÇÓ"o4ü9ðbiDA$ùkã[ûÞ“÷}DÐòÐ<ÿìí²Â™&èj?PÐ궣ÆMjü?îÿÝ:ßþ4úÝEÿo{÷Eãÿ=–ÿÞùl—þÏ~t;ÏæâÍñqãd59$ WGy £ý·´ÁÍý¨sµI 87ºX?DrÄ«O˜]'z½ÿÄ;Z`zÍ3—´b£‡;k2»Füq.S‹ÇÛÿÁi=89Ú?‡æÉå@ûÛrR'¸cµ»êÿ¿lÕ}ÿÿùÖÎV^ÿïl7ñ¿&þ×Äÿš­Éÿ£+ô/½Å5#S\þa^Ò%Ýña„Þ`Ú_$‰~ž?›>8`Àœ+ºD®èâv>Ÿ½|öl¶¸}úKç ƒ°3¼w@? àAôl6¸~6øå/¿„ Ìø#Û»“ïÍü›À{¾ù—=”¯ú¢“ùèþ¥Õ@6½·ìÎJ\ƒ¤MpBÀÁ» &Aèhn˜Zg;0É— '7°_ò.¼8høz1ÇlË„ñäñxÆ4î ðŒ~ Tx9?ýÝ›…Oò0œóÏsL„Ü@Jð5 $A/ƒaôéêYÌ»ãÜ2ê!*HïõÁyv©Üúñõ´àú:I»x‡Y'cú áþOÈûÛÀ‡E‚í'ÞÁÅhå(_öjÂG°¿ÏÆò¼æÓÛÛXûÂãáô^ÍÌe¯·–ÞéêG l··0É ó ¾HÄq›IãeM†³±ßJc¿D!ÝÛþ†ýHy yagU ÒåË,¢<õ‹ÿ%…'åÆ>ëÏû–òÜVŠ¬JíÄq {R°y‡§Z¤T™¨¡Öâqr,Ù ¢NòkâZÿvÑa¿Þû_{yÿo{k»Éÿhü¿ƒµÁ`Õá¾1ƒ˜,×Ìý,´ÐÁ‰‹¼ï¼ÝÎ d4ØìÑÂþŽ£Â þQÔÆ+fÞ÷§ï½·þd9£ý[†‡¬{çÛÞÆëÅp4ßûíz1á†[ÒÎÇ €às݉^W²ÿjOÜ2{ø17rÙ™"šfø)²ÞÜo°lxínÆ‘þ9NóçY ïOAâ@ŠÏΈx=ä%Ž_« ¬ïùQÀÌ8ñ}˜´{Sp3r(Øm»+.T#J¦‘b˜y‹É$ÀÎýP§w•»$çyÅkr‚حëñž6ZŠ\ìôVÜÜNT}ˆp'²J]ç·ø,.ð­6×ýƒÿz|~¤û4¾¶–Ú´E8 >ž,E M"þü+7à „¥õðño”ù äˆc·9€™ý~Ò§ÿ¹¼§Ö ¯“É…6Ÿ‚ãê'4{Ÿ‘Ѭ«É­•Íh j‘;º›ˆ_x…W}àÔí˜Þ¹$D0×Çæ¢YÌBÙ=Ÿ”7bO,ÃGœÞýUÊܲ§7¾»:º ëEFŒ ý²Š|uó=YV&ú“êöôk®*oXVÅ#%Û»d¢^;<{ÿúä¨÷îò¼wqyv¾ÿý‘Dù1g”b=9õÿÅÎã'Bã {"‡âÖžóëHñ±ÑȘˆv ÅÝít„÷:{™Ôdã+ìoóoq Åâ“^R(\qÔ‰ÊÕñ&Y.ÿãùÞ^ÿ{Äü¿]×h›6àÕö®Ã À³\ÌéºMCá B¼ 1½ÂÈr|Šú`Ókóˆ¦×sDÁ RMûCŸÎÙ2õ‰¼ B¬_ð7Ö[ôAà°Ãá„bñSŠ6á©/Ø$sðô°›6÷ÿ’øñ—/¯!€‰°ÄþX¯M·yh þÐø( ºm ±µ6è0ø±Lð-Í3¼—Œˆ8²cƒNilǺ2wÎÙEé ”ÇÙñ ‰ªkØVàÃ,È8˜ûè»ÿº?kOÃfÉåèe0UFß)©Lgš?Šn ?HCyà ö–#1dàQ>ÖððbV Ï$Ž¢“n¼‹³ï.?ìŸeâ¶ë¸]g‘Û³÷—i¸öì;ŠËþýøô°Çn= {}GnÛÞñéÁÉûÃãÓï½×ðêéÙ¥wrüöøú½<£oòÞŽ.°¿·GçoàÏý×Ç'Ç—?Qô»ãËSìù»³soß{·~y|ðþdÿÜ{÷þüÝ٘駇Ðóéñéwˆ {ôöèô²ÆÐòÑð‡wñfÿ俆Ýí¿‡aœ#¡ÞÁÙ»ŸÎ¿sé½9;9<‚_}û°;°¯ÁèNö߶½Ãý·°OÐ[gÐ [22½oŽðWüê>üÿƒËã³SÏÁÙéå9üÙ†áž_&o8¾8›åüø9óÝùÙ[)r^:£~àÕÓ#ÖÅÌ3Mðo ‰Ç}z‡Gà,ž~/ó±Æí;ùìŽéEéÅL‡+wŠDÔ¸¿W1™æêbñ½ ßÔ¢%+'ìßç°ÔÐÎð“ìø&"•$Y¿^÷®Gþ ¯ ÁV-^àƒå4-9žñC*·ä%8nЈ“ô¢·µ¨^¨Ænn½ã? DL”9¬X¤ðvzGŠ ?tGÑ;,ì@§Þíý ƒÌ à+Ë- móÍk¾P1x.Îñ7ž 5`;Fvü%X ˜JûYœ=ò,˜‡þ²»µ5Z>ÃÃÞØŸ<Ã×éŸnO`¦?êí ¶ãÍlpo:i^Ä÷OGïmÀé1]°Iµ;ÅûÙÑ8ös7ÌoÌ8!–)fvЬ‚/MØ̸h:ð&ÖÍtNúŽåp çI¹¸ w(Q‚χ³"&‡ úGÃÉbɨ©…†ÖÙ³Ù|sìë&°$âÀkÜ`í–0‡ÌÓ2¸ÇOWbç,ƒˆŽ§®A‹ñø³£f x#šp„àOL#Ö˜¢É$±Éu½l´-xätæ}Msô5{)ãtŒaÇÁÜ·hÎXŒGE F~S´fv¨¶¼ÂÆo×-:WñeBs{iÕg}~¹ÓÆnÍí¯î®½­+s;6jm›„_ËÓÕQßËÃÿ&ÕëâŸÖ}d®Õ é/vùìMJÆSÎÿð?†;Ûu×ÿØ+Öÿ{þ¢Ûøâÿðû_¯C0 1žÊÿõ þüOüŸÍ€Ý¼³øùoõú~ܺ/íûa2÷ÏÑ÷cÆý³óý° ÷ÏàûQâ…•ûgðý˜©÷ îw·ÝýË&øvÞ,çþ‘*óÝ?ZªrÐÉý#<@£û'zt6`Æý[«Ã«[¥S§O¨ùh7c¢“ežZå&HLÁ2\öoo¼/ÿÁ®þ³ ÿ ¦ý›AóþSVg.nαMÑb”µÂžDpÓ¸Kú­k(-' ²x†ÍÑIê;™^–ÊZ2Oši²š%,¾E!]þy.q]Ö©0KçÿûËÀþ”Ì£¢q€¨å™Æ|Bí¯Bæ+­¸²NuVp_ðŠÒcèPZlE^fä ‰D®K˜ÆGDïÉÉ_šŽŸJ3’õ’OÑ_óŠgr+Gy*ˆ®õ¿‡³ºÏºÝç»/òöÿÞVsþó˜ç?ÏÛð?/( ëÄ»× óþ:¿þsÌ1L8™vÁßš ¶Ÿ/ö ¢gáèüÝ·±ÿ38@KHcò„h˜º‹ï½·Çï.x€{¼èß-X yŽ—*á]nȱA`:µnJAñE±ø4s …úÓDÌï PdÜŽaT0zLº±ì÷UÀàr& ∕7ý™Ü¨qÀ°•H2â¬q?¾uë^i=Çb˜F ¬A($æýe¿Û;9¹8èÁjã àð#ôøÑÛï‚G>œy<_—÷¸î[N3çÑ):@UòIÖlÉÈtR‡4-Ö"—y#º–Õ&h» Ún„¶[an‰Ä«¤[l']-ÝõVáƒW¼€5Øm{Û×rÂh]ÅívÔˆúzÂtû´¬­JÞ_÷JÝn4äßÝn'E[2í¶uH5Y5M…Ý?+ ìkêJêªÎŸ35”ŸbåYÄ1³º¨SVKêw¶ÛÐêI—NñÓ± O¶_¶&a²ö'A°ÿ_N²u¦OF2싲€hg|Ôg ]Óøö³p”¬Ü§%ã§ñD’êë¸R„MÂIIθ '†ÀN0ÆcÂ> vðÏÇðM*ó9ö)1 |ã | F « ‡åÜ…Ïø1.ï"¾¬< ‘^ t6‰Cp@9PÖðvÞ;ó£ô¢v6a1 xIà`רÿ¤ŠÝ”Ãÿà7jQ ñb}Åü½\þÿöö‹Ý¦þsƒÿÑà4ø2üÔâúñàò§wGøÃhœÉn ³6YžW2Ë^gU^¶/î©é×LÔ¨îå–¥*½Y«£*½E›–ð3m°8­ñVl_ HZÂ/͵±tVQ芢ÒÐU¼­Jº Sˆ"ì ëŠ]õ$²¨£a\ÃX0Ÿªá¬ :HGG¤‰²ÒÇd…®7¤ oÇñ®•kPN“Pø<™2é¯U]„´§ªõ´!íyÃÀõvñ÷z}†”=¡Eaµ+½ˆ"IVoò&£1š’…÷c´ðä)û=¸«A´Ô;Seféiû!R&Ù»!ÝÕØ]Ÿ‰ÝÝNC:ö¦ÿ0Z^Ôª^Ó+ý°6ÖWIZuæW‘^&/ù¹ª&tUÕc]­ÄºÞ0ñ¾-yP¯&Pc Vo‡­‚h¥%&¡ÊRþ]Œ1qHNÖ{QºÑ³GOÙÓñéÁ 2FLÍÓUnªž¶Q&gTc•5VÙïÊ*[ã Q:S¬^ ,þš‰“ÑU¯­•ÿ*)îäǪvVÒQU+ ;Z‰•t¼¡`tªêk¶§’/kÉRÛRõ§´œ èäÖÖXrµ‘Šû퓶ˆÔ¬xp{I©g>læâi›<2^4Ocðü. žøÂ…¢HHÍa¦¼#~]S~£æRÁ ©Å˜©'\´’@Q¡lGöîLÍ eHYA£rÔ!•‘R⪑qŠ¯"%5,žvˆæ©œ–U潎ïOü¬IÃûá¿"*÷Þn­õw»Ï·óõ·öü×&ÿ÷ò—Mô°—¼ÀíþŽª¯žê³vìÁ<Í×\3@®n®ª:j¶Hë¯jäƒõÁø ¬ãõ"4Ž²Ò)/ÑÊq‡›†°’x©¯ô©bÃõp‰¶ºx+wÿ,.<èNß0Ð Øž{½ïOß‘ûÖÛ-ªŠ –(Ãø뚪¬ þŽ—Õa拨Pt¤ãâòÇw^ߟ ôVF}˜(¬/ª”wrøýB›!ƒÇò2ÕeÑ¡šÆ›´œxÑåÅ„ ¾NÏ~<¤EßÞ=Û’T„Æ ¦bÁ;É|>{–eMñžøh°œÅ Š‹éshñåÝv[h¥ÌÁ2l`ÊuÓ»ä™ß·Óßs…[ãÿ•Ü5Ëžaå˜=¼;ºíèà²÷ÝþÉÅQüj·?ž<‰œŠ•-­¥È©P¥£49Ï[LŒlþüßÕÊëî¦ú®ZÍâ”ÅÌÉ pög³óoe÷Î?ÚlžÅ¤‹d'ÖP…ÄO\Ò‹6–ÚÊjDþSy¹íh}‹=ýSý‚iðûSö£Ï[ôKÙ3Å $îrÿt…÷»VöŸ¹ÈçJñd¢‰¹¸,Ç‹ÀøjsÖöœÿͦwA8ë×yþ·ýâEñüog»ÁÿhÎÿšÀæàOzð»Î[Va+¾Œ’‚ ¬ ¯?~ww·ÙÝÚë ¯Æ¬øx\+DÏÒ´5&|á3?„¯Œ‚è&9Ü,`¤ÛùxD£Ù ²ËAØR™c¬+»O>˜¨Uø\'Üe¥ g3ø.«¹¢"‡ìö‡ó¤ ü>¿ ‚ ‰ÌÏC uz]¸`—™Ç•¹Ãຟô1ûÉîÖÕ¾Xâ>˜€¨âìct ?b² ~NGBi›ŽÐÕ1LÛäOsïçÉô­6V=† Ý£YÇ*, ³™ŽÏ3˜Hú£;ÿ>Šk u,ºzŸÊaÊ«¶ ƒá” í¿6 ÕJ«y’ïj1éûÌÌyÞFÓ¬ëÝ|àüt¨:ž§5v=BÒÕ|Ïôf;mÙ®¨ˆ‘BÆÄ6 ‚± ´W÷ Z‚-†`ªâ„ÂÄ„KžŠ:Œ²Ç¯¼«±Wx‚nîP<îPLæm\æèwÍãÒ¾üL·³—ÈX…j=ë˜f·îVɳhï¨~,Z¾É§O2`}%+.ÅÔãrù“k¯ü0a'aB‘pÖsB6/òÔÃêO'.~:ûÛu,¬ü‘ê%öAék”’ð[¦„aš ÑòRj[Rn±Ì†üÛ˜Xlñ26#VZ2UlŽfAw6ñ$³é°ÿ ç´^Ǹ֘쀎ìû“dqaåâø Öxô>æ…B·°ÞüVëÀÊTS®qnÉ3hó .âáÄA¼ä2µÝcÝ,ôùzÁöEž³ /GXæq2µ°„H5úÞ@¬6ßÔŸ€>ÉôŽæŠ _R1 ƒäkÂ6ïlm¬í=fi¼i#ºù(š œÅÐí)P{Ç]AW³Yo×£ba£©¾ÑÝ/Yé/“aOÇ~-f»ðlö^o³{»½^ ƒÂé¯{»¯/á×5…ïï1ç}4øò}÷Ë»ÚH]ýõþxvG?m%?]M‚M¯›”0Àê4_ñ"kù§ÂRlÃÂ-q!§øô‚¸TßM0÷Àq£¢ë &}Ž;UÞNNwÓÒlqa œÕãx½ÙYÇ%¦äÕˆÞ“¬½ù:(f0>ŽÅên`Lr#qý~]hÛ± ¯ï~y$f÷íWH¯°¸§!×X™SQAeÁ/X8=»d¸YB¥i…ò '^¦¾‡û m,¹MEµ¯”¸Ö ¨h Q+ï[ÖÂ⃾àY¬¸£pY$ñønã‡Wþ þ6-:ÅQÂ渻 üb tÞ­ÿ_pè!¢ 2̪ʅ·`ËÎÔ¸LXûÁ4Ï"¢â‡xUf<C\RCñEŸûÇ:é®T~Ìûµ.Æ“I€e¸Ï-&øu2q‡¸KÔì=쾂]:½ú?`82õÏIîLRQì´"Zöw¬A1fîõŽ¯õ’­f_?{4Ë—:_ÿÌXLn)ñX‚<±Oì 4Æ`HÑè-Ö 7;Álv#µ†Êö„j¨.Mî:–™lþ„Óv¬/üZ0°ìƒ¹¬§h>è/;7NG3@Ã3U‘IÈÑӴɪÚdi:À,¡1FsÎ,f¨z¢Þ’Ë"lž‘M8Bìå&˜«hâaï¸l[ñiZ]ÿ“ªå¬©ªÊw¿l1¾¸*R-wW›ÀÝ==»kÎUà²&@©²VÛ€49$»xâûéA^~?¡æ¯Š›·ÑŠ‘‘cK½ÌªP/¡GA¾<ù5I%y…3X3g¥\)ËsgmÕ E®²Rdü<“Y™0g – ;›­Ç3Æfí„íX£˜· DÈ@àuçD…”ÕØè·²¢˜ói± ©¢æªš˜‰²µ*?1 v2ã0êèEÕlVÎb£!žÙw¥]$ÉúZ_S(g~ÒŸñŤZ:Sü‘*äÁu¥/57üέ; º«.AwOA‚î ªQ‚øöowÅÂ2=Ô*/ÔZgt¯LÅ'WÅ“kâ<1$·Y•£!Ð*Ðeã‘Rì0l›!éó¼Ì ^%æN9#7±ì¤ã¡kãª)è—LõÓ/j41´µt¥a§íA0/v N“Ýö ÚÒíq®¸E¤]H#NÛƒjspØ2š=Öëb Ý5[]žk-Qà‰`šß»êó{÷æ÷îw6¿Yï¼dqd[Åe·OÓ4ÙåôÊTœ¨ñúSŽýRÊÿÔÔ5VÛz%ÖÈC®,²f3“…`5~­\‚&0ÜVÐ÷¨‰…Ö 'ý4L#Fb^1{ .s ÌáĶm¬X…¡¢¿„'š;¢Ë†ãfØ=Ûhq¼ÅwEÿ/†k“†wëòc³±óÆæͪ¥Éw8(é:³w÷»½ìV®Ž­g”ÆšI«XìÙ9íRÔ§±‚bïPóòª3G—yæ53Ý6)ˆ‰PãF74ìR6[íg+á¿S°½ž}>sD {ÍCÚJtÂ/{ÇÀàË"Ðqœƒ–üÁcZ¸®fÿ#ø><ì¨÷ï,¿Ùs»ûa¾ÿ±ó|w÷yöþG÷ÅöÞ^sÿ£¹ÿÑà¿5×@T×@¼ ºtÀòÇ~ÿu&˪ö“xWÓ0¤ìXJöš.Bïûƒt¤(ÏÉ•’KL­£dZÌxâ™ç~-à;wæIÞî7{8eW ‡”]÷/AÌŸ2©x¶¦\bF?¦ùsuî{Ñb8Guì]>ÝŸÀ“^$=œŠw&Æcä[ŠÌŒ/Og¤ÕK$ý‹épiZ(ì·þ,b î'>({®]†fÍ·°”bŒÀ'ì’°æ¶qëüê+ïñ¯ˆÍwqÔ{wtzyüþí.ì—ç|#]_ã-uJ‡ôÀ¥‹Ø e‰€Ý9§ƒEŸ1úäy c2.ÆÞ.ƒ‚Ã]XØ%ßJ¶b‘X5Y*è@á‚90“=r`£O’‚?渃BðØý³?bXY#b1i«ˆý§Àš(AÏJÓé!¿Ý1 TX쌒tv暎ç÷A/FÅkVœ¬s¦e(»4½+‚:É1ö3ÔFM%½ÇϤŠ¶­—7Åg¢žMåˆmf¥hzë˜S÷Ê[’³K—úAL•¡¬L®5zŒc¼ò>£,ë­uy…mL¿¦Ÿ•ýäÝAVY;¿XÆ“T5Vð8ó 1;û ãú¯b¢,ý.°ÞÈø++Îÿkœ7:W I¹*-Phâ+¯u'2–ý$á,{àÂÚ»Çj#kU\Z3j {#ß¼ðkZ]’CÞÓ²¿GP [z& \MÐéJ°U¢âá¨@§a}£&?î`ù`Tc]Ö9Øå£v)  €3±Èšô2ß`}Ü×Ù‡õeÿöfnkçâý¦äe±ÚJp ~ÇÙxIN¸ÈBµ` à‹a„ÖAb¡¯#Ø„^jñ FHËÉ 2îee³b%{Uzî‘œ_²{_ŒuÂÒ Îh4}Nr²Î$ÌÚRwï‹úJö9@Ð>'ĤÇEPÉ[¨§72£jm-¯¯!4v ÑÜ%r‹ú[]†„”8~9:‰³á™s§pÃ-ÀôDû´#†ñW—¼Ä|cu°ÄéZ2Ü{ýþøäòø”ó0f|¿eWÏĽ–‰eI“Bk&Á°vÙkÔü’ÀRôÜ£¸#vÛ.=i¡ÛëÌþç×ðbÇ{ø,8s3š^±9t«RÕUúyôEŒp¹|׌q©NMTx<åǬ¶^¡ý‹q ¦KW Ÿ»^©ZAâKºþé³5íàdE,¹ ,¤nZ§ºÕŸé¶ª”€/,ÖÞŠ 8™Ö›{UÌÜs“Æ]½¢ÌˆéEö›Ÿ¢*KdÑ}?ç!ÅYJî¹i(¬×[~³×c§K’Y^Z(!6e0ba€&q×€ÿé{ÿZøð`óñ¢™ Ê¼½]BÞ¸š.°¿ûä[láðä}Òƒðb_P”;!)”‡ŸDãÐT ‰Ê‰‹»:¸õgèœ|Óévº¨—˜Ž08»³ï½ÃhýÆâz €¨Vþ±?Yø£¨#hÅ”çûXä#fÀÁ›£ƒ¿÷` ¾R–_È‚vÜ3ÞXꬴ7§¾YÐIp$aNGš3 ÙÖczcYâ×A)©_Öͪ±m×nøbëf ŒíÔéÈlb©ÉÑë½;f(IW‘ÿÖ[pµäA,âïñµ QHqŠH†Û<"ˆ¶)FHá 4àlH|šD.2N¢ˆ¡ÿýÙ¥7›"¤ÑõˆN X™þÐ%Å?ióÆÃœA.±ó9@–c4$%š¦.Òƒ®‚øû#øà„0J"îªä;›-¢[Ï †ø~ÌYoãîÙ4†ÿÇwé9ž‘‚K8×ÂFŒ#¾èß­Ø-jÇ8DBWÁÇð#‹*ƒ Ê~¦3$Šp|Ê6²3£¤‡˜éW‹››{,a“£Œç!D,ˆ Ëur.@Goæs3ŒNÆ'ƒ4Ä5p ±³á„ŽZü( Æxñß¿F]ƒœlYcQ}Á!H™Hž½»<~‹ÖB/YŠ ÿô£÷å—À†Šú?óu’#ä—Ä*ÌzÑÀæ} “™¼cD<$è€Í®7¢æE›Q”ôFYP‰™I7ío®¼ ¢­EÝÙ|;ÿ}a-™¿^ÍTÍ…DƒØ¯ƒÔ~جWݪ¡z½ŸšÛ±­³[û}ä+fM MôH°üYv’(ÚL• ‘²íq„&©ºX#ÀºÅõ6œ|œþÇ+’®(j±y¶ÅÏ%aˆ°˜Â»aDÐ%˜ŽqZØhÌzˆqer]¡Ž`ÍyâÖuïüèû‹?Ù-9¡+Q冯ìÜ`Ȳó3 o·DžÖ‚ýæ“^°ÔÅNž!I6sRqÍëÖfNäôpé±õC¢­r1r1Ĉ‚Ma"ÐBøÌ6Ë÷‡/Ùøqè{ïºÏ“ë5sœrÀ¯óy~|³“;߶.”òV–q¶X˜:côãRAÛGã­vÿE»ßÝj?—¼,ú±¹bÈ¡÷_ôZãßÔvÌ4qÒZLØy‚ ˬ’Âf¤rYT2qcàÇMYiÎíD9ß'¡hþ sžøϳ!%=±\œC–ÝQ¥S½ŸÄ ÒIN\ nv³ð)ÂÇÂ’xpLO›éœOq.4`8EÆf˜§¨K—&ˆA~"2åv¥ Òë¨2¹‹çÁuÒ‰K]\‡ýšßÞßé<ï€aîw“Œ9ÄöùMŠÇòÓùtÏÏ0 ¬”oÿÚ¦ŸRfßú£k–”¿FéNìÇÍx"Èzeá?Ÿmj IzåÔ“¿Ôq9}‹“>C èf °ýûe“2!ÇÝüŒŸõ¥'/s›$ÃËag‰°ýÞ{`jÿãõ³7ÿÌ`×°ä12ÔŸAz3!ÀÑ:b&©`^/^ŽË]Gþ8mûÞÛv‚N;{;ç^ì*SÙ¾íx]œÄ`¹ÿw o„±€´ÙÍSï›ÎóvÁ `°Nlb+ŸÖ$s*h¬­xûa.&iñ°˜Ð^9P<°V7åN‚'ÆL>Ã)% *LŒLâ}:˜ƒ2 ÆèÓ Úp1›SX^Qœ˜BI`1\I&«5AzÇé;8A]$‚öÐf9XŒÇ4·ðp:At&vù>s™bŒØñ<· Álµtøe® <ì=%ñp’a;¬dÙ÷2ü5y¿ !:I©'D-*9a¹’JKN^®”“ø§(5:¹1IŽ¥ìØH­üÄTÌHJ½¦f ©d…ƒYÚg†åÞ¬C\ KÉË­¼Ü6òr$r:”è~k€ŸzŠ‹„Ü>N.¦~;Z×Ì”fö\<ÇsrxÞ¹Má¯3¾‹bÃK.2ÄXuùE ¦“å‰U7gŒ*¶O bG“a0ù}r}ñaÿ*hqŽa§°Ð0—à(×÷g³Ñ¬rŠMv»h!Ÿ¶Ë[Êîg½ËØDdÎ 1(áFå{FÁ!\”$2ý>ÏøÀ^'Á¾€WoÁðþÂ3ý³e.Ù÷ã ¥bÆ Ì#ïO˜Ì þÄýè6'Ùã‰Á®ÏB\Œµ ÓОe ·¿,ñT6N;d÷BØ·r}óþæÈÍÅÌ –OîÑy ÖÎÇ-ï h»ð^„e$R5$<>¢ñè'×ÔSSý´Ë€´ÚÜ¥{-(Ó×£`‰È6Ï9gö³cùñ°‰ÞgŒÕ½¾fÄÜÎDÝ¡ÉwgçG yëûì]ç\ˆœ‡®^/æíØÃÉfoaÞÁ÷É‚íKè:ü¶›¾mêó7¡?ˆˆaH€™ì{!,¢#4ÁY¸‚yõ}˜¤ ¿˜ÇÐAÂM>!¨ÁªÐ]ê8Ñ›(Ü<ö›:ŧ(õyn©î¿³ód  åÅqpPyÎ;ur>ÏÔcÙ°<\›[’mú}óÐËÏCŒO"F‰ ñÝÇâ ”tDɨtŸòëœ]ºaaÃ`ÍÍ!®'hª^>0¤„R¢ôñÛ˜jaßVïÙâ׌¹Œ'àñÝzGØ„³ž€Ç |wU­ø6M­Ä}ZÜ£ñqŸ¶‰öåêŠ »uv³.”ë¶Ö\¶ç\a1ixPäo.°—•5 ¤¢ža?W –ìx†DeDA-™/Åü–É\ žÿ3W¢þ4À4Þ ÅÚr<àš¦R1$3BÉÕ¹'P1îC¦êå]d$m;KIRæí¸¡Ö‹¡ZÕ"ø2[D>/€ôÌJ"Œ³Ò¸ÕéìÄ4½LKÜ1‘„&æû÷»Îó´³èº63Êe· ˜õJc×]wµâ¨Ã.Ã/²›Óª‹*ÙCñíf?›•=•Äm¯Hâ¸Õ‡xÉekEÓÕ‹L´¸Z©È`ÿ+ø„NdA#2"ƒ&Š }²j†b‰ÌùmS}&'ÐiIáÈ*IViP¥Vù\oeæZ>­[5M«'N¤ˆ(òg"$_.ÿ°žÚâL/dÓ7 럽iXÇäM𙼤¬‡lî–«˜¼e=³L›ÙÊ”XלUN¨ Uyž´T•k‘ªBÆJn‡wðW‹Ä8y­We-³C⎬IÏ,òþÆÃx¶^nÓö2®…'ø"—¸¤HI+u/ÑstysOôX€…Sw±"^ž'/ãå^À«F©“Ðã$v·µˆÝm#v™yÖËdÎÄ hÕAÉãб(ï!©Ÿ“ 3d¤Ü¤MsŸ¶jÄÛMöÎíœßÄëUÑÊJSìâ&ÉæÞM‚z—K.Þb¨ˆçÈ8 c¯<°Ôã¤m;š!q†ã!–ßõîüpBtû‰G˜¡<Á„ +S…tv}!A«ö9faÐ÷yn%–w ðÓñH†?.ø»ýçeðWsê€çQ|ù\ddÂ"ª¨L-ÁÔN3„ ^Dœõƒi’˜f3 óPHUÓLÅŽ:åutù†Ÿv¯3Tó˜Û©ņ齚ëÎ4òUyÌ!9úñÝÑÁeï»ý“‹£øƒ|î$!Ñe½<`;¶:2›³¬1ÿ&ÈzöL¾½o½îÊHí?–5îâyk4rØõ¾òÂmÑ5x)XÆY‘ØÈŠ‰r¹³Ëîð¾÷Ço ÀïéûWaàÿ¬….UK?ÏÈüòMš–iç‰È‚ñ¿’%À¿—ó¸NL¬ª¢'`r’¡ =ð-eh2¼<~3Q¼ŒyN'ÆS9ö®)-ÊÇ«xï9`wm¤ù˜åòa†¸ Y«$ ÇQò—â©œ`®$‡_gF ‡1öéÞá¸`æzÈá‘xYsÿx ëŠ83,µ‹çþŽçÌ“Ìïl§eØ•5éMg%:Ýcv“¢bǵ'Œ)~%\LR>²t6ÂEOóÙöþŒ6Î]¦àXßYP~c/“å'¯é\(ÏYh&ÜÄÓs IƒY é)A8BöO./Qc˜Œ„e–›¾j¸)Õ L¹zjA!ù„$ ÃÃÂD`NŽ×Þ1B|_&7c¸.vIX ¯”`I23:Ç‘wÅnB’pa ðõ”pzÙEð(¹ 2BŽÆœÁ^ĽٮÞú?³¼_|ŒWÓcâûœºc­?]Ìg *ÿ8œK©ŠÑ§À¦‘?KáÒ„LÞÉ ÎÎvžëjç¾"q?€UB¬Þ8OB¢ˆ"ƒm¤Y£"¯ngra/ä`UæSèçb‚Þ“d­;d::Ý?Žîfl‡Û.ÚÂæ{Ì€I±dÕ:WWB$–`A§¯+p*x$’ÿ¼žbïÏZø§°[.E²jëâ³nþ‰Ý-i÷ÌHY¹ìB£P«¢*Ë©7¦N%UcþÐüó”ð_ cˆA tÆÄ*Äý*ø¯[ÛÏw¶³ø¯Û;ÝîvƒÿÚà¿B/ýº¹½ÕíÀ_a‡Mg”¤Ç`ÛÞIçÝçüÚà¾fq_S«ôǃ˟Þá?^àÑL¶ØÕ¯÷ÏS«”µCZü¯4ó>©ÖÆUïj0`¨öÔ² ”—goz?‚™ÝKSzT´ÈÒ´X[leA­¸Å dj±ú §–Z:‘“ &rV£qV$‘ ¦pY•ÄeecÖ>Ëýèïí:Àë÷ÿíÝnÿ}çÅn³ÿ?Öþ_zËÕîzmª³aA´[,o×&è;ÜæÀ™FGô*NÔðIõcÓk¶9FÓëùãWEÑ´?$Ÿ,ö^?‚«Ð¿õ þÆz«Íʲù#ìpÈî[ÆOiËÁ¯B}¿6ßXÊ{Œ&ü#I «ûc;y›nóýþÐøf‹«Ñ0ºm lï€%Lð-Í3=qlßfƒNilÇÛô ™;çì¢ã¿»Ûé8;ž!Qu |˜Yƒ©‡˜‰ðÝÿãõ…2Õ1C††F/c«I¹óh®¤3ÍE·>«—ìçà ö–Z$hðxŽ;Ç‚x±’(s#î$ÖÛ‘wqöÝ%XdGãm¬·uf¾½¿Lm¶³ïÈ8ûûñéa;6à<„sü:6ßÚÞñéÁÉûÃãÓï½×ðêéÙ¥wrüöøú½<£oòÞŽ.°¿·GçoàÏý×Ç'Ç—?‘%ôÝñå)öü˜…ûÞ»ýóËãƒ÷'ûçÞ»÷çïÎÀ2Ü?=„žOO¿;‡½=:½ìÀ‡Ñ¾<úþð.Þ쟜à×°»ý÷0Œs$Ô;8{÷Óùñ÷o.½7g'‡è˜¿>ú¨ } Fwp²ü¶íî¿ÝÿþˆÞ:ƒŽhØ’‘é}xs„¿âW÷áÿP±ÏÁÙéå9üÙ†áž_&o8¾8j{û`Ã"g¾;?{K#EîÂKgÔ¼zzÄ:"Ã93AÐÿF»8îÓ;<Ú‡]úû |™5nß‘@ø 0_¹°n±YŸ@{¨'‰[ë þáíXòUóÉœg¿y÷ìýd±v²ÀK x$ÁF!¢üùe+i<ƒwìW ¦%HjÁôä Ñ@éèÞƒEüÊ3 Îv379hh æQU¯Ÿ±é\„ éC°üBfc³Ø>VÀ”…Éýï„ûrtê­ï®³î?¨oAÉò"¥`Å…³ãð>"I„7¤‡+é¯K?GcaÐŒ›ªJðqL2ÅM8ÙFê $‹ØHŪ½,œ…oã¯QÍÄ{^ï(¦%vJxÈÀ‹îÇWÓ+ïÝN»š²‘Ý>ÀŸx†¸†ü»BýÓ3 ÅÏed!î ñw:]Æÿûé‚@`§Tzˆö¶É=;sa¥:Ó«ïÙ[êÇû 6sg…ø†³úvÿâï¼L)UGè ~5?†cNë.1ñÇñdSPâ^£înñðxœ‰2‹åŸ„¢Óïl3œ‰8–´± vZðŠa”ÝÂnÃö¬2¤‡9¢"VðÛT *Š‚1Öö`ÂqkBCcU»ñþ~ ðäv™û˽ëhWÀñioÿðð\ŸŠOA%²Çm*ú,iqñáø¿ÿö:[Ò_v¿ÝjÙ}õ*_çdc6[Š ÷/Ë9½ýew˜f©r4ýgKR7‚–ï7ëò…ºÉÆ  WU6"­‹VtÑr ¨¿*3Ç׼آ¿%àvj‘:LwŸã½Ä“¥g.µ*3.éÈ.æš²'}:^O¦ªŸ÷¾Üú“ Ú0ÑêwÅ ãâ¼½§øe&ïxë7f…ùÂx¼ñ>ÓàóO†iœæ+ÓOIÒ6‘k"/,¸ö„DíѹËšÕAÛ¼ôx.ôù鶹éñF¯Ð¥JÞ<똂Îlˆo¿ütöOïURu9žåËYÿòœè¶Y‡Ê*Í|›Ó§3;¤òµt‚Û^ò51™~Æ1ðlëÖš]Éå*™ÕæVxƒK×ç$âêýÊdÊ^ÎÞÊ5k‡Rø¦Ù—HŽ²?e*û('YŽ’¤• ®£¦p” 7‰ÀAÌ[2¹(%“ZZ( ªâ “T8ê W…Q—\Ô/:mÁ.xç®S;è 'ŒÛÜ[Yá`¿É¥ƒ=[¥xl»šŸ–xØÌnùP«ŽÏG>>kõa3»ùèz¶iœÞ·&ÜãÞ ¼¸7žƒŸtÊþN"•<΄@§Bõ5 …eP‰%Ñ )pEr)¡’å!‰´â•\ŠsæYz=K銽ÍÝ\H-û/s^¦(Ú·¤éÚ dj^¬¹sQ½æëäb6*ôT¹˜¬.Š1“”ÅÍ'ÉÆlÉ™/ŒO˜IDɳ )ÙòÚÁ(LxnWö 0'Ù)\4Ì<ÍmüÊSaßööìúørÛJnîºÆâΞÝÐ {¹Q4r#×ʇÚî+-ËîSŒy÷»IðY8ñ“ry ÎÇd.ÌSŽÒ‚MÌ3ºÏÝô?úÃAÞc†%7ÑÑtR¸ Ó LgãÐUsÅ£ÎüÏÛÙ̯9ÿsëÅîÎó|þçó½Mþçcæ6©ŸMêg“úÙ¤~>~ê'Þ§êŒ"¶Â% ‚¨gLŽâ¾¢YÐG[ç@ëIidfV¤ÅL1i0ò®ýÝý§"AsXŽm„à–°nq‰$…n"χOcî`ÜOÿùRêdÓÚ0󌧵†?£eC†Ëõ"®Hw˜;XRªè‚,s f"^kN*±&å~Yæ)B*f¿ (å’Ô¹ž.BªøDÕg#Á6Uš‹t ]ìŠÁbL«?_Œ;Þïÿ¬Œ¾·ÝÙélça"FXÊs~KxI}nºÌƒª$_|ûP:r^1ŒØ™ß£TBŸ¡õÉþG£Kiÿc÷Ÿ¯Ö~{·ˆc„—‰<¾<&'÷SݽV«µš”k<ú#?¹7}ÆX¬ñY-3?Ö/N-®ý0ô)a™TðÝXˆDRYWô!dØà~âY~»¨žsÅ !7Ù—bªâ$RYÏOFXÏ'‡Xaw4†€ž¼´2L–™œ“à I´èëÖF J œ˜Ü´¤ïêþù3¥‰Ûôº-Ë~¾òþ?MlI|˜†?£ÎCÑëvº4MðŸÛ-Üêy0¦"ïr”KŒ/Mƒ”Ö`ݾ’>üÚÍ.™‚W<Æ'*áppC ²EO‹Ð ’„ðxCu”‰î¯¦ÇQ¥6ˆzz«›#–ö%.<"EìóMüGŒÿè¯]•ÿìl=ßÍã¼xÞÜÿ}ÌøÏnÿiâ?Mü§‰ÿ¬0þæÑ!…p®‚(”‰U¶©ju&=—šuï²Ù]lådÌ *)ÎB[Š˜£-ƒ®ä›Ü³øÞ Zà ¶}f„ûB Çdf‚æÄ™ˆ2E‚…pŒP¦]sqYÖž•Kw|‰Mw| Oþtï4§e¿kû/‰'–1´øo/ ø/Ï·wû¯9ÿkì¿Æþkì¿Ï×þq‹.y:ƒ@Qd†‰$3¶2f!Åá9 al¬%çi1´yá@gž5Òx½`ÙfóÞ‰±2PD4 Ÿ`þÃ~íÍØq½`À{þöülü§»½Óà¿>îþ»wÞàÛ¾ºµ±; ±; Œ ˆãÎÍa—„Í}8öÃá螌Apµ¸¹aG¤¹…ßI‚7‚8¡ù#¼9]Dñ‰ij ncq¦jnFÓ+”Ež†"d $çùìR—IGa5Ð3Ð7iž†ˆ-†ø_¼øHzͳd¼Åd„™ žŠåàa,Fª€ˆ[R›%`‘m”R. ¡¼0ûÈCc#We%êð®6 ¯«`4 >ÆÉÕ¬RbnaV=[“ìÔ{ȪÔuZZꯉqð7Ѳ*bðùSV¼O¬æŠJëPLçI-Š!ÁzÁ¶3b*x‚=2Ñ»\E×|ÎÐkq›Fqn–õð¯17k<\b‰;jËd*H”„@yÉ™HâZ,bʹ?]LÄ Û姌,'4ü…ÉLÄð~ ð¨¯Qˆø¾„Û*É)X΃pOwo »É’åÝ€¹ŠÒúÊÒ\Íö€on|•öBÇ¥Ù&‹‰¤‘’«9Bi}DG±ˆŸÌÇŠÖ¤NõbI½öNB²Œ­3-ÊgáR’ËÇ£ ÷`üjF© H‰2;('D‚ä Ã_xS”‰lž¨…l²d€¹zúr´Úܱ7Ï¢p©^zþIÌcn0ÒGM´3)âä}ð¥˜#W:™xmŽ_š3O¤p953Ù‹©8‰™aȦh'0½˜ýí¡'/KèZµ ­ÌÖ–dË–›±Lò/²(:É¥µžU„O çñ„.°X\þgJ˜²“m˜URº›ÎøVšVê ¦SΗys”y*0úõÌKJiz¦Î]×AB Òr;Öq"·UÍòûTÊ› ÒÓe’bÔöÀ2^ñÍ`VØ $ÜJ dž.»T#7í+V¼"½;Ë)] Ÿøeë§Ë%ùˆe{UÌÑè¡HŒÍ¦3ó¾ú–½SzÓ‰)’Q‹uiê$ößU‰åÉh]ÖMìÿV%v©¡–%ØL\UîËG†PåH ¼¯} ÿ®e ¦Y®~ ÿ[Ë@t²Åó°&î{ÔËW–VõhÔóRß`þ]Ï`Œ3³|ˆÁüo=ƒÑÉeî©¥,3Š‡—,‘:õꉨFü¿ë ÞÀù媈ÿß:ˆ—ÉÚÔäæ—«Ç&ÚŽÂ+bÔbxímd%†%CƉbNƒ«™YmÙÅÛ3p¾¤®V×j¾$¯ÚÂï~ÂÓhšŽ @§QÊ57°«ŒŸZîekLÔOxN³"›Ô5=z™JÃ碕.s“¼$Ÿ“Ïe6 L¥ÓÖ÷:­†OŽ²It¡›wx5ßz Hlón8€?ö/’ƒX:ÕN  ø½ê_×2»üÙ}%ûuhÇÿäسóW…ÄO2¥êÏÞ¿>9BH[Âc m[íø?¼ßrpÒYúߺ#Ò¸y.œœü,T?±Ž'w8;`æ±ÓÍ¿ ìÉ´ØεخïÌ ?t™‘ÅÛ(N\³œig~r3¹2Lð¸ñÕ˜’áA®Ávi+­0<‘<’§F62Åö^|lßuSSoÛíeP!Ý´Bȶ5ïQE‘Úü›—Ì©©®÷ÕW^öÑ6´ÍÔW¼È ï5¯¤O·ÙÓíø©•4 @Š¼Ûßà wÚºþþ–Ô1ϲF6jŠ¼4¬`n?Ó ”ÏË*bHˆþ‘ [æï&Ƙ@óÛàž—¥L³‰¨"¢O˜!1îåEñ<·ÅlàÏUÒ{Ó!ÿ;/F½¾Õÿ¸·»]¸ÿµ·÷¼Éÿnò¿›üï&ÿ»Éÿþìó¿ñÇ£ btµÑVˆ³š§ \°y¶Yn²ÌÐ! §ÅE>AŒæ9Û¸_ñ„[–‹ ‚y ܼž†(­”q½‰yÀ¬j0­fhzsKŽ1Üã¡ÃuH€µ@+µ Ëg¾sî ¤|x­¡˜–º?ÁLç+ÄKõlý.vn5Q¢ø …Ùæ›q^¶—îÕLÿ‘–»F Êp: QM2ÂH:?ú¯÷ÇçG=tá#Ì€A˜¹ã$iÑÅ”%ÿô`ÈL à‡ØD12RW××ð”'gr¯¹ §rÑY …’û‡˜Æub•“K®gyîQ\ ¾˜äÝþøã4¦| üŽÅ1º[ȇȵ(—¥ü[qæ9eäϧD÷ŒÍ)P’ŸGB›c— c0Ó¤èÌþåÙÛãƒÞÙ»‹Þ¬ª@âp™ÈK†ÇEw8ºz¦Ëlôá‹ítéöf̧Ÿ¼ï#o(Â/É©!Ú¯ˆû¿Z[ä³ +§¥¤[paÈŸÈŽh»do|dÝlÌm),¼Ln¸‹9Ÿò®‹™‰°ýº€%û ÕGB©®TÜÎF@ŠKh VHµË+~È&’ÐÚm³†0`üd7í¶È7a®ƒ)=Eö[±2ž†ÿ–dUø;½GoÔ» ‡syÓÂ#ökR0BöJñ¡“¾Áž¤£‚ŒÍqÝ4éúK›è®M4ø/Jü¿pÜï?+é¿xñ\åÿ“»Ìýÿíîö6úÿ[Ï_üÁ{ÞøÿOoþá{÷œb@úøOwþÈÝÿßÚÙkð3þóã?àèy'G›Ç—/óö‚<ü~ð<ô' *?þûço?îI®àÆHÃðÜ;üÑÇapç]N§£þ­?œ¤>P fî¡è² ' !s„Î8¼ðv:ݤ-üÿ+Íw¼— ¯`¨ç†‰lç„ ½ÜX»ùKwþgücN—Ð œMÌfÕX%íaGÁŽ.†£a¨ø>ôg·Ã~äÖÏ_68u. œ_xo÷/Î÷O2‘ œ°¸‰·ÿúâìäýåÑÉO–HB({Ý>Aöý!j§Cß;x×}N˜G(/QdãØ­x1!Y/<ÒƒÉ%x[F- `IŸÓ&="m û ¥“Ðe)Ú8|ûºÕñÎ Â4˜§DñðD4ÇàiQ,Õž ô* øƒÆ\&70i„)p|áÙXäaÄèÄàÖ¢ëýk1ìÿ Î]IÂ=.V§¥‚ô³¡/¢¸º‚½_½ÁøÊû-gÌ%ø2E‡“›‘Pd%ÆXˆË.ÓûÓcЉ(h,8Ì0%8úSU~{a|A’ŒQ²ã ` SvÖpUY\» g?ž/O8€uýí;ŸÄ?˜IŠ,Ê„kãçŒ3~ÅË‹ð´û}¶ßr|‚¢¸žÆÇ(×sš`R²5·,!þ“ª‰BŠ þ3î‡Þ¬û¼½ÕÆQ´û/ÚýîVûy¦Ío¯0.º*°³x=R-Ê@v s+c¼¹uoçøBDk&wX4gF ûr˜Œƒ¦¾§òÁœ¯ðPÉES³‚V<øqN ù•Û?,Šç‘7 «‡CMÀoÓ›Éðx—­ þ>eùPštÉB¤ïÞG±X¿yýÒ{4xjük¸°iÁb‰è êG1ùWÞ]ä>û{¼Ïú,þŠ<ðA"ˆ1+»Hµ-~ž€ÕÅ?ðP9\Ìæ  ø±r)Á æ37bëè¨Ùjf°'IQG¬‘B¹ZóxL˜Ý_„!ŒƒêÑ'h‹ô#¶îƒÎMÇ;Á²@´²² +qîõÑ´8ç'—f‡¥"¼ùxöjm vìðþåZ^‚Gƒ0X¿¡QÛûvúÏäLUúŒ>Rh2þÅþM¾ØJ~¿šqêAx¿&,‚C^²Ã`6òY>€wñaÿêdª1ˆÞ€Iˆ÷KLþòÖ÷g³µÍ§´­u»hÑâ©ÿç’q°¾Þeöx:qTbü°‡Ù˜˜Àpk„§ƒg2Gð, VðJt?é߉O„OÁ~q)!÷`шų`Rꇭ,¦˜aŒ %šŽ…iñ} -ÙjJ´?mI'e3 ƒù]БnÄËõ>Gf.fC_+êjyûo^·÷ÝÛmÅ—á íÓ>ŽOÞílCÂÕ¿.Çc˜¥p8ÁŠPž›Ã|>Š‘×W˜T ´‰ĸmöKŒ¼–Ðabu÷z$6]÷|ô-hÔÊž4TRúbá-:§ÿ‘¿FGV…#B"öîò¼wËÖuŠd¶˜ –eaæÕ,Å-ë¾Jÿ{û•GnÃÌçÑ+± Öét$WŸ?vtL4ÕÅ;Ö¢âGR· ò=ì5s¾¶Vr|F!Ž†òsèµ±ž õ'à!AhxWò%êö•ô[tvçmÀÞR6ºòñEgÇÍný° ú"`ŲcS‚qoø?«ñÛpkÂS7iu±« ïã‰[,ʼnÇÊäGTD¡ŸÞrgê+×ê>©˜eNînèß?û[õ44( èÊ°¾u¸ïØ>(ø~=ÙZ¤Û6çÃqÀ‹1…)غÓú&—AáaÂLB¯ýë‚Ë+!…ðÃÿÀ6Óë ᵂ@mãÑdò~û¯ë½ô6»ÿ|µöÛ+¤=Öæpo˜T¼0¯­›{¼}¼½ÖøyÿïvVêög™ûŸ{Ïww›ûŸOpþ‡þÞnÍø_ÝîÞö‹<þ×nw¯ñÿÿ«ñÿÿ¿ñÿÿÿ¡t$jÂr b2/ÆN¥ÉU™7ïßûAÐ~|öþG°U?Ô˜ùŸÑ°ÑÝ *”|Íë‹©t÷üæï$¾ãxƒ7͇ ‘+õV¸|JY>”S¼}JͨÔt‚wÒ‹S°Š­Ub»¿r/ ·ågl¼Ø2Ïš½ìÁ’Ç—Ï>œöޛߵÌù÷1¡æû ±UÒùщÛÞ¿sP îc¼XPóm®f’DJ-ÆTï$m®b–D:í®-X—á|ªS®˜µÎTÇôco>íùáF6“ï{?´ÓT÷âäf™Îñ‰ ¥H— ›¤•—&³ØË'í1Ù›“3;æ’8—anîkö¼•(!§j<A.UG^ŒGWh§F Ç­ùuíÒíXFG"ãNóPø'4VKAœ…. V¨f¤^ îªÖ42”5ú ï+Ìžz }’³÷”– ßSWFá¡ñ+܉zªñßÛÙ̯;þ»ÕÝ)ÄŸ¿hâ¿[ÿ¡ ý6¡ß&ôÛ„~WúÅ¿ƒpø1.kÀҬ⬔ÎÛÀÇh.……1ð{ÓïË"±T; £¯Ï„x,aàk[¥[L«B°ª Þ&â‚Ê4jôxõo×ð¢5‡[ãZ)Æ)ÂeFÞµ°cø¹9¬÷6,/X‚bÀQ&PuQZq"›‚†5)"̽8& ¦°˜°âÂl†÷°hâèžeö\/b¤Â¸Ã4o ÊfžåRо;þñíÑKÒïöy‘ ´Eìcoì߃JîaÐ>¢þ 6Îb]]XXZÃG5Jx–wðâW¬„ÇÐýyªðb6p4˜ôïióé”`Fhø+ðBðøþà€Ágá•ý›…O;»”Oƒ´qÞ„-ئs‰ëé"$È)ćDéX¨˜ýyº*ú .Ù̾w¼ Þÿ q}o»³ÓÙγe„8j¬¨™— VØèö!‚YeKntlIs~f>»Fâ³;è}Jô!ÐBîÿc7ÎÚIàÛ//ÄtÂmuǹ¦™œŸn›þßo´va§Yþ„ãâÚ% .ì..¥vÇþný„¥ÈÁÙ5œ¤²Z­Õ©²J —~Þí —{(HÇ~‰/uKÓÝõIZ¨núÝÊïù$”¬ñè¡I³&"¨-Κscçr=—(¸vVÒ¦¼uÌõ)ë9š ©Œ^Ä`PQð ÌñAš(¯?»Bè@¤íHðøbPì…—öA?‘9 Ž1éÑ ——ÿ(û³[„Q‹AXã”]¾–:–j!å%~fÃG¢9KƒñàÃ[Õ b¿„ÚýÑú»‰çø¾GÌͳÇ óaÑ$Š#ò¾è$åãdmÿD*Àog4* «>ÀƒlFQŒ‹Šy²2‡.0–R†[I\@HwQf1VOâ’"óé,÷Þ[ïõüy ³¼±Á9¿ÑÝkµZë±]NÙ‘Br"LÌØ®ñþÅŽrã\Éø2¹ –3‰ä’JbÝŸX(DRYWô!{½ŸøðŒU2JÕmN@H·% ûRLUü‘DÊ:%7Tº`}¢81Äc´ž¼ôõˆ4†*‘«&²!«PÝÚØØÈä'·¤ïêþù3¥V‰Ûôº-Ë~¾òþ?MlI|  w0%À²èvº4MðŸÛ­øj€—Õ€«Ÿ2„B/…i ƒ4Â,ø.¬ÏWÒ‡”Ô탶Î1S2+„’ÓBjC »EßÓ#* #Ç{¦~œ²¢å DA· ×cousÄÒÖÃåI¤ˆ}¾¹`ùÕÿ˜²œX$n!@}üïùÞÖîV±þGÿkò?› `l‚€ŸûýO*ªñzAi]UæãòŸ ãpÞµOˆùóN! ô&˜R¡ÐN§“g<é(†ä  VÉ4¯GÆ÷c‹ =ÜìEÄø vCO3gzñ¯Jc;±#[+nC‚/8GûzTü‹?!VW,ÐM‘N5áìqr†²/”Õ“–d­6äÇ÷±6ð}õ¼Ð †üLb¡ìâ©Ø]¶qaPY¸m68B×6ÍNöEåxÝK;r e¯­YÕuâU×À¬®çÞÙp’ä&µÝH1Ñ~¤ÔZ3R‚ºv)½Sv¤j´|¤ÐH½vñaa4ð£qÝb› «^×= Õ4óÉÓÐH14©@ð4ÔÒ»Ô¼”Q¼´ yYæ¥hy‰ÝZ(¼¥Xœélà^nð’Rè¡Få3ÈI9“¥]z Hn9£]Ylf®#[%u‡keg 6ªØø“?Ùø“?Ùø“Vþ$EöõN%k"õ,ÓÒçVî%k^ÖÇÌÕW9š† mä.g¡œ»Úïäã©è|šÇ•ñKøø\+Åh‹mJ;¤F¬Þ+uäa׉].v„ìÅ*îª èî ÒW Þk)¤/VñcÍ,À–zý´¹µvº!iXÍÁ5f7ø»vC‰ÛUò|ÍYG²Tei;–e ƒYÚŒFqÃ~½É_µôEfTp“kWéõùÊæ(Å{K®—á·Æ®Ï58ÑÎ6žtãI7žtãI7ž´'ͯȜ鸕ܟŽ¯8Û»Ôñ¥½êøf¯Ù±60ÛLá^‹C4{ØÉðª:Ù6Ã̺”Ép]\måà¥ÍÊ;ÜF¾<€ÏíÌÒn)žv-™Úu[=Šw+¹àn1}q ŽˆíJ¹ãU9’,29åFÝ"6’ºæ¶zEl[ÑA·8ŒÆ± mdžºíÈ„¦Õüu›q-m¶Ôlé0´e=c[ZN‚QÒ‰7¬Y%ÜIuW~›E޼̈́” ûI(É~g_'ÛëpîsŒnüûÆ¿oüûÆ¿oü{;ÿž)üû¸•Ü¿A°ìýûøÒþ}bSçߘm¦ðïÅ!šýûdxUý{›afÝ×d¸.þ½rðÒfåý{#_À¿wfi·O»–Líº­Å»•ü{7Žˆ·Žþ½GÄv¥üûª‘øªý{£nIý{[½"¶­èßÛ Øœ}𞡱q³`³›GdlPÕ l驲ûtáƒÉªÏu2ůYo2éÁ~žL©ó°Æ>ŸF+ý*˜ßÁ„¦Ÿ‡ªËš¥ «Î΀Ãè›ñ*½ap ÝOúAÔ±7X «}±z0‰‡.¨"¯@ewñôq:™‡S˜þõ>/€Ê…ïþy2½C ‹<ûTëû6Í:T‚q¶™Ž‘ÛtȾÑyq¡n‹®^ÇÄÏW'åUÛ †ÁpÊNdçø5V^kÏÂ+¹®“¾ßGW‹ñ¼¯Z-fèçU|]Pmp¢•!­$‹f3½•(%Ë•?ù™ê­ݽšü`NÃtqã>3’ϧ7@Æ›)0€­oœ*µwÇÓ» +ó̪’ãã{´V±âwˆºÏ u›o^§†°XUÝGZ_[Ãò¦t¾z?éoà­Wk_ÌBÿf vq¿w Œ{¿zë/ú pwýþº÷E‚±ôv¯wzÖ;ùpñÓéA¯—‰{Žîè=þþÚÁ( ¨H*û&{¬ù*Ÿ¾»|7 D§šLã©–Ðq«Pé5iWx›¢Âæ—)^KåsaÉ.™úÀšÆ¼ü²3—:Bñu¥¸>:,‡(H¥žÞÇ«„2hõò±£ƒ‚I¾w}_`w¯ÛÉ d¦V/éÍÀæI³Òʵô78m‹VN§¯xe]Ρª.k'«¥›Ú“”ÑÍÞ…—PÓfÿýÑ-‚„2‘j$R  Ù[ò(¥S,ˆ|~ôÝÑyïû£Ó£sªoÈV1ÛŒ£áx8BÇÅnú°Æ‘¬?¼‚¿°xõy 5)(Z·8ï·þG|{ Žó=üõ©žÜlߨ§gáôŠÜ`Þ™ý)Õq‡Ù§šïÃñ8`LèbÕ¹yƉVMYÕp–”5fGʿŠÂ´/Þ1lšÁ˜m†ZʨŽì HÇ2ª&ÂßOå4? ^ZÙ]neäØR/“f õzäÈKD»Rung¥\)Ë8f¤ÿÒÕÊcYEE§¨¥V/`kã9ÿ+>µ[svùg b¯!Q*ùrR-&óƒÉku5§’ãTÆ•¸2ÓjÀ>³gy“¨ÊùŠte‘5 äëVÇ‚ÂÒ-7~­\Öú£ iÚŸÏÏ^ K1ŸËÕæ9@Ϧá³%,ÝÁ­å3ëa1~‚ñ°ð.þ·»ÝÄÿžâüG°Ü¢çÿ/ºùø_7ñ¿æü¿9ÿoÎÿ›óÿÏóü¿”ÁØ:‡%ì]¯XÖ]ä]^€¦3d¾ÀcĽ`ÙfóÞ]÷~)¸|ÞhÚg‹ýÿÑ4ÒÕý<è˜zÏøóÞ0ꡪ£OËyÀŒøRÞð+Š¥Ç†&­-P° cÈ¥sAª¯MÜÉô.6/ÍnmjÄž X@©ß÷>‚Š!MˆTÇ+;ÿáÒ?ü¥ó´ Ø柵ÿ–ßì9Z&û¯ûbgw'kÿu_ì¾xÑØeÿuÿò—î&üÏ.¨>ïÇ œ.¡A[v|™pöuf¡õ„gƒŽ´›=ìæ/ØÍÅLP«ß‡þìvØ\zùË&ÞÝÆ^òF)7D;ª¾kLˆ·û—GçÇû's‚¬ fLxû¯/ÎNÞ_ü„{ubWpSâèöÄóؘÀÀ†Œ{t¸éýtöö¾§ì£·±Š¹‰¦[ܸ §ðxL¦< #y¼G›~¢y•ž]2 Œ††šÑìt35½:9:à«ÌXM¸•™Úª¬Å3îèÀ!J,yìÌ’ f½ú±‘HHÉ'ï|2W“ïЉ+7ÑôúÎ[¢1o/’sI ×ïßâ~Çμ†ýä#ÞÕ4 §wñ9Çtzߤ#EyN²/3ÆqF&BDøx¨{ëã [o÷›=œ²+Ã|DÉãN[C/¹ˆ—V@özïÀ¢<~ÿv·w|zqy~‘½;Õë w¾Ùk­y½^_ã÷º·¼ÝbYŽt@J h÷ÞÞî3<ØÛ_m8‹òçyâIªäûª 92RYTN<ŠóâƒOn ØèWŠ$öz~4îõàß±l$ƒzIÿo¯SŒï·âu—¸ïµäØ—š²¬\Œ$ ³Åp;Íz½àG QŒãth„yŒ1Ô´`n"|×Çhå0¶Û˜Q™dNì1Ê¿YDiW pSôùè£W˜r§ìCLɳÞPÚ²‡’Yˆe¬Ï´Mc]óûç/bÿ)°†-yÌkHÎû‹0„ÃÚ™®g–@£dy®b–ƒç÷AmDÅ,NÖ9[„tîH¹5Ô.A$äØO¦¸î8U”3Šm{ž´‚¶—jÏxH›n '’˜ Sëd|‰Ÿ_yKèÞûr«í}Ù]WÆÄAt¿ ai²n[moýÏcøóëYK÷Ê4‰iS6—D!ð-]%ÊÒÞ†C°”Ë™„müÿ­çxæb}ö6NœìïÂD§áÊjþµúy0?(ø%å1%‚Se„Ûq™ÚfÙÌ~’ð™=paôÝSx#£U<[3ê{í$ßçâãJ­Ã³M  c:~ïË.°|KËrã¬$Ÿ¶b²D…$õÓƒçu¼k;°ü) =.Q®ù²Î¡/ŸØØsõÙ­÷ SlÌSÇÖÒT:y†¼bkót:^’ý²¾ìßÞ¬‹FKšŒ‰ ØôÄÎupl`8K¶d|Ǿ¼/¯,·FQªÝÍ·µ¼¾vUp[1l²[D5—ÎOoÿâmïõÙÙIï`ÿ"Öuø!äÚä— œ²„Þ€'Ž ñ'Z€-‡_'µáÄ50œpË«DFA>'&^À¸\ú㛿m\2¯À–ŸÿbšGaâ`¿õÓ=Ë´šbbá5ŸÉ‚»»Ý¼¥·ÖtEä㨘YÏ)+hµyôÑ€ºxµæ4®Ó'|©Ä_“¬ÎÌØsMDG:öçAÒU{zÖ;xûîǃ7ßóxžM |l?»fÚLWÀÆ9ÅXfÁÐi'ì#˜‚ÌŽ`ÿµð`Î âËðöv7Ñ ½š.°Ç{ŒÄkœºâ©ø}ʆwÀafᲑ`ÑPªU„80ãOVÞ›8\Œ[4ºày…+ŒœîÜ-ÆÜ@)Ÿ#*Ïxsy¨%¶£2K‡Ém>Íp:O–‹}Ff4aLs<õü§/<øqv³KvÛ½#¾.ºY½¼ÍƯ¼»¼f«Ÿ¿¹Z±v¤Ky;·´»-3Öû©N 7¯Ò¿»Ú]©ß™†÷T:^#'˜$*ª|Q-° ¤ÐéeïøÄñ’ÇÁðåÞ.5%U¼HÍ1×T&޽θ—øC6’yäP}Z9Û˜çjœOVwïuoÿ‡ýã<öwVçgt[oÿí¡w6ç3ÏQè¯öÐ¥ÁÞ¸8þþøä=| €Šzî c¡!Þö¡Ä™!jö(hÙ_Kª¨÷¼º_}š¯¬ê³×|ݽFõUW}²¥ÄT`Ò,ÖvqrÉßìåbõx2E(¦ÃîÀÁÙÙ&+èÃpr€Ç#íÌÕ;v™øÍÉâ%NöN Y#ÌU:8zwÉýiW<|„w»(?ó£ÈƒÞGÀÙjx[q†ìÓ Á"ˆ¼>£!ð&î QØ~zÍ®~yW‹ëë Œ\®²®>hlêbÊÏèbNðü0ñ¶þ5½¾ö1ã Oæ"¯#Æüe¼ [“þÏ0² :3 o4¨ùtJxÃE¿Š:È*ǧIò¨=ÿ÷¢Îü_L÷-äÿv÷šü‡ø'^I( Kƒëó`9O÷ÎÍhz5ò»(–ÐVœ§^ >ÞßÛ…é hZâK,ÉKð­(†Ä ¬I?hò£:èK¢¨ ~Tø5ç„--† ¨JìFæ6^LÝöÝNà-ŒÕ_Ìö_wçEÁþ{ÞÜÿmì¿Æþkì¿Æþkì?^¹Ea~ ö_À¥“†³!5öØåG–U_ø=ƒš·©çšÀ¯7Š´µ8Ò1'Fyy‘Ù˜^Ÿ¥ýGµim£ñ¿­¼ý·ÝÝnì¿Æþkì¿Æþkì¿&þ÷ÙÄÿÖø]ÐOë+–óû¼#}š_ÌÆÆÆ|pûÏ>ôg—ÿù<þ»ý|o«±ÿû¯±ÿû¯±ÿšøßgÿË…þ Ú_íÑ=öy‹ˆ^Ìkì¿|ü•NŠë%—š%ö Áþ{¾UÈÿ{þâEsÿç1í¿ÍÆlŒÀÆlŒÀÕTêô:‰‰÷~üÙ,œÎBª.ŠöZ0ù8 §d›! 7SË-1¬¨2)ˆ•/ZŒ·>ôÈëà&)¶¼’S|BJuÁw¼LP+.ך ˆö$ÁlGl5"¬J¸RŒóÒÅ;†ÿ.Æ©®ƒ…ù¥€¸«£ñlrH­›~ÿÙÐßÛeh†t«( À  þ{8ñ³w +7D$¯dä‘à(ïnñûe8ù™JÅ2hXä@Ä÷ÞÇÎñL(°Î/L1mN0.á*c&Ù‡žÐ@gÁ#§Y=s^ö]Üž·©É, 6w¡K*ùBc„_>§‹ˆ*ÑŽg‹9¡ÔÓ•1/Çö«`‰à“¥~8Å+^Y!y»Ô¤JöQ¬ïP“ ÷iW<žÉœ «SÖ#Ñz¯AÓãÊõ’j,·AÿgÆhVŠÅÛ^º,Ÿ°¶’—&‡=«ËÀ ­ƒPËÆ}úþ ×kåU„o³úÒÅ+dè( DºîEv m+ñ)bðw}Ü[Uü¹ÿ ¢òE Ëöá¶’ì¿ &(ðˆÎ6ñFƒ|ÐÛNïoîí¶:pÊ̈¬ ƒóãùyØFQU:;L +‰X L:`¶´2#Žæøj~Ä4à¯Í¾^ôÆïkü¿¬ÿ§†X,ÿñ|+ïÿu»Íý¯&þ߸~ë׸~Mü_€d¹ TŒ† $îLPý `eñaké˲@ `—‰=˜üœ@¥¤XÉ'B÷%E@µ"8(º‹ä³*A¢Ìs<î| ´¼ö­·ÁGŸ4ÑÖÚü[ÜÎÊ(8*³ÇùãâñKX4ó“ö0f•œÞØÐ2$µß;)”,ÑŸÝ”Ëÿ°ý[Åÿü‡­ç]²ÿ¶šøÿoŒÀÆlŒÀ&þßÄÿ›øÿÿãÿqI!]Ü?M‚Ê=¡x¿)Ö¯ˆóër»3¾ŸíWÇÿ2gñvŸçâ¿»hA7öÿmLÿÆôoLÿ&ÿû³Éÿ¦S! }µ%´!É•e1 DÔ-ƒ™‘Ž´I øÌÎÿEü/ #þC¡þÃÎÎnÿmì¿Æþkì¿Æþkì¿Ï ÿu`‚fBMÁöëÉc¿ HdJü±buöŸ¤XÈ<Ï°¢J ûoûy¡þßónƒÿú¨çÿMý¯ÆlìÀÆ|;ð‹Ä¦¡ÝûÇ‹ãÿf‡nÌŽHÿ¦òU¨Uøñ&.ev06³f3ƒœÅGab v¡‡ø’Ù?ÙgTX‹YZ…îÅ.âÃÎßóþÏâ²¼ZXÙøO÷ùÖó<þûnw¯Áÿlöÿfÿoöÿfÿÿíÿz¸¸ §?'©6ì üÿY3Åc6xùL*ê¹Ñjgûú’ìþÅoÇ»£>õÙ¨ÏF}>õ)ž»‹ŠLø½>*¦3h5¨äë mTh£BúôTh‚€’ÑcEH—Êê3éR¯<‹ˆ,êlTg£:Õùô¬Ï¢ÝY³Åiak6ª²Q•ªlTåÓV•xQ‰‰êSœ­þ”}ÿ39ílþ©åüW¨ÿhSÈxÿs+ÿ¾³»½×œÿ6ùÿ=ÔØC=ÔÜÿülî¦?'<è)™Þô´ºà™FI+ªÉÿ/ÿÑ}¾µ“ÇÿØy±Ûmì¿&ÿ¯±;°±‡ùiúògÙìÿ´ƒBò¶oUæL¡ÑîltçSMþK•gúwYí)ôPPŸ¹ÞUú³ØE£@Ú(ÐF>ÍÔ¿T}&•ÞJ*ÏBÅ»DufzV)ÎB¡¹Fm6j³Q›Ú|rj3U™UÔ¥\UÕd£"Ù¨ÈFE~é~©¦~(«0Å. z3ß¿J}J:i²ýšóßRõßä(pÆúo»Û¹óß½çMý·Ç=ÿmê¿5VRc%5VRSÿ­©ÿÖÔkê¿•¬ÿöãÁåOïŽÖä Œ9ØkÖV¬ÇyBµà$8’,_ÖJQNf;þë‰Ô†“Þ8ÿ'¯ÿb]Üäÿu··òþ_·Ûäÿ6þ_ãÿ5þ_ãÿ5þ_ãÿ5þ_ãÿ}ŠþŸ¶î‘ÊT×?òŠÏžsX¼( ñ %8Ɔ·‹¿?wQ‚‹ÜxT¿‡ó?¡ô§®ð“%þÇÎÖNáþçönãÿ5øë׸~ë×ÔÿüäëÊÎALçEÐöîï¡ÚgÌ eO¡JXcÄ=þ‡XÿKcšëæí¿çÏwü·ÿ£±;°±—õ?‹°¸²¤ŠÊ¨¸B§zP\YfÄç%_9þsk·5êâ?ÛÏóûÿöÎnÿiâ?;ßìû;ßÄ>ýøü×|_fÎÇ}ð™.êó{ˆ÷0(£=MœçIÙ ÑÉ:Ô˜ÿ¹ÓÍçîìÏRÔÿÚ9Æ](knAWo0–KJšw:4òíõý ˆb‹ÓÕA‰Äe82Í:iœ6 ¢fpæ|½Þò¾úÊûcþqR­ƒšÈë€à#ŽÐ\ÌWMÊï¶bÔ{j.Oi±ntUCðí$$+ ØéG$´) )}¦OÄÅ€gÚtC>’6åçÎ[ŠÜìµãºæýÛ¨ªôÌÇǨRRòFa´Å6|Ô ïÌó)y[És*³,µXG”(xW$Àž‡]w&vm¸ØuX²7œ…¤KÀ¦åÊ‚ô ’F®,H_,Ë‚¤- °¥^?$- ÃŒŸuCÒ°‚fˆûÐŽf7(Œ…?0%nWa$¼ í@–Æ‘,•CYÚŽeYÃ`–6£aB‰'`û1á¼ógëMþªbÝIsfLGà¥Ä+’U(ï¦F•shJYÓ¦]ÞRÒ´3PŠ÷–\/ÃoA WÇçüÕröóÿŒF=áæ?þ«áþÏÖ΋üýŸÝnsÿ§9ÿkB?Mè§ ý|ÖçQVæ ÉOþp[NŸH}f²ý0‰-˜ä9ìÙüîþÌOI—°ÃB:e R£{Þ;LN£ Ù~l=xëÂÞ‰çüêìºØD‘^dm·EC~Wâ%ùQ¹vÍYsþ'±ÿ®~þ·ýâEÿ ÀÆþkì¿Æþkì¿Æþkì¿ì?Ñ'$€åò¿¢Šù_ã.6M¶®]Æ´Ó5,»¸Y‰ýÿühÿðíQÉ­Q³ÿo=ßÍÝÿíîím5õ_äŸKº×Ëc~7õ~NÐÞ;›£Þ¦]+CXœÓðþåÚÚ¦w±¸ŠÀFýi«v†» ì*°ÍD³ ?¼†Åß+‚½y&=;»Àÿ¾NØ­´hïȇõζƒ(ÙIP]s"2S%±™|ã6ðð…ö6¹Ù’<à¶AFß›ù° õ#?ô’ksl_rØÎÁH 1=`~ÏòÆ´'^Ѧ‚Ž+g¼͇³Þ ´cnè™1õéÛÿ…JÔNÉÆõÿ|kûyþþ<€fý7ùÐ8ð™;ì*üìšn4KN¬uï×ù×þñz1éζu]Çwz[ìºmÜÛK%õo+n~8¤ð÷¦£WïŒxÞ¯kB»ä~´ÀôXžu÷÷jŸÆÇüÛà?å®C{Þo*äL=Gâ3ô§4Õü"sKBªCÅEYzW†§Òô…’SÖrœˆ¦©ëD0V3ðÒlöVÇhS4Šîr”9ð2†EpçJ¢g¸k—'Ê•d©—ç !÷:ñ„aý>QŽqUø‚ƒë¸püÁÓ]5þ ‡$Bð¶Ú'ÉÛÿcM;H½»ƒ%Û+ª>7­/jûáš Ö”kÕøĹ–¨½ZyfÃ7­ú|â\‹•ãƒ3M§dËñÌÝ‹Ú íãØâ³Üzt{EŽÉ«¸âbwµŒ‘ŠÌD”²où"~ ý(cḊ§¡ ²–Ö õp·´§çÀßÝ×ëânŠð ªôAÔp擵 n}9Cßã2ÖÙ–rç탚URÖ ÅaNÏz‡‡½³óÃ# ©fqÝ™îâ5 n¬sŸ‡ܧ‘‚'ÅP]#k«dPÅØV¼‰½Ì?,v‹KMØJ˜]z8™‹!hÇà³R¶ D«BΘsSŒ7«§¶Ö(sùøòª§Lcc˜m§²Ï[Öœ´— »…+òKÝOÖE±Ñ7•B¿nA_óæûx£v íºuMÈãØ>të´5Ø­)Õ¡ÙRAYç`OÅZ™•Ec«G-|†ê<ѸµóD£†žO”!”Ú9¢TROŠ*¿|‹F®Ä\¹ábrÔþ´|ZkÞŠ‰.KÐÞ¾³ sV Á•_—² Ûc®Rç [Ýœ+áRÔÄ»öÁêÜsŠ¡•VŠ`Í#éB×ðcÍLs°+êå[ FF}áÅE»ˆYuéÌÖØ/H´ !®š+½m¨ŠÌhĞ̵Ù!–‘-¸Lù—}–XÊ%’©Rc¶²2(WQ,¥43 ±¶DZñVµ$«p5¯dlfÙN)»È…zÖ,WªM yc§Ùê­uE¤Äø¶EJt*žT@ŠÕNâÕââú¶wTàì*ÀK£ ŠÚ^4DÄY¼½@ë¾7#ÿž]Q¥*JÔÝUp? ¼á¼Â½Ò¸»Jqò+_9©9©5/9‹%¹­y:9èër sX=Yq)¨üÍœ>RW¼~É\A›ÚEŠc:Ø¿è½Þ¿8:ìœíöðÊñ å…KÆ`ÊzB%9Þ]¦$“šßðn:|Çuô㻣ƒËÞwû'G4þî°¾…Á´\oŠˆÃjó·Z5ɽ›švC6îh郺·³ÜP †O:Ô ±™R¼Eãößÿ¶Ž÷•1°,yTfé;«3‹EMzì)/j"ðS_Ôe•}1ÄúøæÜÃM}Lã§>ûö6 4AB뚧ú)Oñ§>µ•B\ÅmOË¡féælb¶Ø¢<ä–SÅá §áHöØÒôÙ’X™^m$‰Ä0…;2…ye†C¶± Ÿk!héB¯ÙBÀfÕ’¥Ï4å4„‡¦¥Ýšf;Î+¸„Çuq=sœbÏsÓ&žinì°IÆU*…Ró&?T2rŸ¿­@îò¨Eê*ÆÊkóô)CyFÕ«;”ÉŸ¬ÖºLíÙÁ^­À[yVœ®»1@´Û¨n©'g…eýÒœdz¹‹v@†\MVºìÂÒšWéŸ$±¢¥µÀÊ(c§¹zpUì¤ÊJ*bѨªàTQSéžj¹–õúѪúHFA˜XÒ5·ØÉŒKüé/îr¾UüOñZ¨Å‚./cbÙháXŸ¾–_n¬¨‰u±½IQ2¸)ªóä‘xú3'¹µ½öps&*Àªÿ àú°ßŽ­@ÿmñ?w^tŸ¿Ø‰ñ?··žwÿ°µ½µµÝàÿ6øŸ þgƒÿÙà~îøŸw_¸`½qÖÚ+¨`‘qêN‡Y£±ä¤¤Hlºä®µú…Ô¸‹Ë<ûúk‚öͼÂïöVáÕ‚­È‹b˸e¾øí·©Ý)µÛԜЗÕPgqÄ,ÿªþ~¼ö•N[3g‚Þ¨còl‡u4Z¸¾òK`Ãü¼á§=&¼Ÿ:æÏÆåÕÑh HÊ?+ #æ.O^ÅÌÕ5oz ¬:fÍ2ÕË•>S%)ù„ ãjóŸÄ§ÅØ©g‘2æ4Ô9O”Ë­jzjš%`¹y¨ºI•Uv¹s÷ ËRù9DÝ”ÓZ÷æUóùZE p8s²0¬J*ÒlΔ»ùi§Xמ,hÀÌÖK¬“¼u *ÊB¾qÈg¡Õ¨B(”w:+Ÿ Tâ @‡`Âæ@3¯ø!ð®‡a4÷æá=ÆφãÙ( h¶õG?ú“9+š„ã$°•–ÌV!+=’à+ãád8þxÐ56æwТŽ6ðQ.䑇$Þ‘— At‹¯–0<†“¾ð+“Ïä´‹ ϯkÂI.x?&œ}¡„àÿjNÀ4¡œôJqÑEBÿ̆šKé¥ñ©…¸Èb³R+LÉ~LI±–†ò1•§+E(‚ŠçØ5‰…u°¦t˜&û=iŒÆZ2ÊGkž®dQQž†dX‡œÝÓÌwÊIÂç$Õg¾ž·5y³û½ÄP·ò³ 4«Ü5ïPeXd²=Ñ×5êö=ã³ûÁ#ŒÑ|Sò¢xSÕîñÆgµ)úâ5E³Ç”O-°¦â; ¨¦…R.›JûéØ‚"ôƒdaR•¦Í&×Ãψô‡Q/쀤õül•6?lÌ 5f@yNÔ±Òmî$©÷ä•Œ^ ´šÑ·»G½ä ÄjÆn¾ñÀ#/"f¬Jä3›ä*lPÄV§0–A5š/‚X©Eɺh•‹æ8è}#phÙÅRñÚPMKÇ"´^9n«õq©ÜÖ¢9ør0ëL@=%Õìà¡u‘=jj­ì±Ü•kçP¹-º|TûÌîØêØ!­Ì„,4ö¯s¬fÈŠbw]‹ÝÌVíäût­¶÷®ˆWƒkßµZJÝÌ®nÉ‚RQø®í^ÕÍì-uíP¶ì°¨deZqÄRívsà¹õh[[Ž” Xæ(å>eeñu#¦+Ï–ãÎÖðp^(fc¥ëŒ`¤7Pì×GÖ.©`Þº( [Ñ(Ú¹•H)QQúåÍ8b)BeÁ°ìLGSB´¹cdHŠ ¥´Q,åSè:luíO¶jÚN»Y8qÏi/u<éÚŸiÕ´5–]Ùì®íiV-]™‘•;ÆêZ:Nuì\å¤Ññ«k( 'Ó0.^·½E¬ÓK¹õí¤V4,[³V?,îÿÃËÎÑJXÑOaHVf‚IúÔ@ÍulŒõÔG[±WnxïíMþ¹µT)wÁÔv_•îÕØãƨ‡AîJ¾"‹J“»î|8+¡*QöJœq øÔÂ÷t5ö®c„½[¯ÙŽ©¶¶c-¡õîù®Q:Õ£ÅÕ ƒêØ»yûNZ)™h ¢’o[›]‹;ùôÊ#ëô%›-IlèÈl$½O*¼N³Ñ¶bCG¶dÃé•Øò01vú”ÙºK›92D ”VbÇÚ¹4 •¤•óŠI¢ —˃EÛÅåi+$v®}t½Õò!wqíZ “Õænb¯Cé¬6îŽ_2rÅ5ŒÝ% ‘16,|„üŽìUÜ“Í<É:æ^v/v ôæ7V¯âÖº²Ñ• ÏgwH¯Ò¹²‘•Ïgv;¯Ê~·Bit Ï'±Ï“"²öÖÌje€´¸¾´ÓŠ†ekë‡åUx€aÙÙ,úA¹„!`HV&…Iú¬#c¥6Æ•„çëòïíÃóE‘.áä[‹AÙø³‹WWô¹Ôº({®Ì×XH= rWòYT.íàõÖ…,£„J‡ç«rÆ5`T sÜ7Ò„神¬ÉP¬/V­`ª­íX=<»©;äºFižGDôú™°µ®”H¦Q‰;ÕýÑ"ø] .}ÅǪ,8’a¥ÙTKgFã$b#]´Bxž«˜X‹+BW6î+…{4‘áy”9 °¹:J<­ƒ*kgŸ1W¡¸ã‡õÌ ÙQû4xçЬ¥Ü›s‚Y‘j0ÖW¡±Ùº0Ò¨644Z_|«‡F•Ï ¡Ðòl=ô)LRí$ÛÜ­¨Ó«ÉÄ­âÀŠúV²í ù©üU¹ä´\6 ã&`çt„J}߸œˆ¹:K¥Æ£U6v#rQ=eÆäâÛèוò g©Eæ豕ŠVÍZÆEçê‘W§á ìèih6£y›ÆŠÖXÑÿ¶²¢9'Í»C2-Û ÚèLèô±L4ã9µ0¿ÒŽl,Bh­3ŸÓÇÕ©r°¡µÚtŽV§ÈÚn&ž*Ìfþ¬ŽY3Û̼GƒÉ< Õ–TV cQ ÃzÏš†fÍn O­Ä•äYkíÈSY4Jâ,-˜HSìäšYµÙºS´ °ëXP¤ÅeVÝ6–ŠJËAû›T»!©•"³é"S®d‰¡èÔ‰Õ`”K‰ádmÈ2«Çh8:,%G#¸@¿q6tÚÓf ªToÿ.Wb/m,àec›Màÿµ2—Ö6ðÒÆ^¬à¥Þ ^:XTK7Cxi°„—zSØ•2cx©µ†—:sØ•*kƒx©³ˆ—“Ø}ÍFñÒÎ*^꬧¥v#[ÊM¨¥Ëæµ´1ðŒ4ªÕ»†Fk^*ÛFC¡¥=S}Š^;É6»ûÒÆR^Öe*/Õ¶ò²cyéd-/íÍ奫‘i*³‘é&b®Ff©ñh•Ýˆ\TO™1¹Xžúue4<™£ ]f(Z5k5«7¤Á|6 Ÿa»\v‡ö¡7üÉpr3 ¢¨“æÂÊäI±û~ËÛÞÚÚÙÜÞêv½7ÁÝ(˜Ï7ßùýŸýpàƒÑtFÀÐèœÜ·½“λ¸lý» £h8xÃÈ» ÂàêÞ» ýÉ<´½ë0°.’z´±ÒtàÍ‚0‚¦Wsˆäy¾×z°?*"=EÓëùŽSNü(šö‡>t †uÄ€åŽÕÒÁJŽ¼ ,;¶~ÁßXoÑw?±<<ŽŸzwÃùít1Güûy8ìc7„ð>ZPá±øñh8òàëĪûƒ®  n{ã)Ìþ; ñÍW£atÛöCìýj1‡#ü±Lð-6]^Œˆ8èd$•Ób©~h†ÌsvQ´»Ûé8;ž!Qu½'ðá€^L}ôÝÿ úsü߸žŽFÓ;V‰ d‡½ä³x Ïý«éÇ€†Åäb2ÕŒœ‘Y:ÓüQtëƒ]upöÁLJì G"Ñäaè¼Ù4¤ïæGKÓå›#ïâì»ËûçGÞñ…÷îüì‡ããCo}ÿþ^o{Ž/ßœ½¿ô ÅùþéåOÞÙwÞþéOÞßOÛ8KçGÞÙ9övüöÝÉñü||zpòþ“™^ë§g—ÞÉñÛãKè÷òŒ¾É{;>ºÀþÞ¼?÷_Ÿ_þÔƾ¾;¾<Åž¿;;÷ö½wûç—ÇïOöϽwïÏß]‡Ðóéñéw˜5uôöèô²†ß¼£àïâÍþÉ ~ »ÛÃ8GB½ƒ³w?ÿæÒ{svrx?¾>úö_Ÿ±¯ÁèNö߶½Ãý·ûßÑ[gÐ [22½oŽðWüê>üÿƒËã³SÏÁÙéå9üÙ†áž_&o8¾8‚ ýüø9óÝùÙ[)r^:£~àÕÓ#Ör>;AÐÿ~q”ôéíƒÓýý¾ÌÇ·ÇIf¹dÑ-ÈAÁ‡õ6®`x¸®„!ÖŸ¢<£É^’#‰#$U,5oȃ ô‚,ªÀ”+ÍÞÕÔ¬4r¥¦RÑvh-^-}¶ß•Vn1Ͷ`KmÓWë jó­bm íi©´À#P|ZZsÏ4ÚR{Os •ôV16eñ´T/ƒ+>¬+®{eÕ3XßüÉê‚×<{æ"ß ÓßIWÊŒ²Ž³æOf”Ôj®}Ñ*rëèsŸ0§¹ZÝ4Õ6CªÉ);•7±ÒJ0ŠQbC³UŠç>êé­s“*ÉògTU%ASD¦Œ‘ZVÁfoK•0W-îÚÓ’ I€¬²HT–Õ…87p‚QÐQ¨"ã"ù»euª‹9JMu•Qƒˆ Ô9½â8Æ µzïzFsoÞc$n8žŠ¦f[ôá?™G¯ Âq"K¢¶^†A4ÃàñrÑ“¤øÊx8Ž‡¿t¯ü0aÔÑGPJÆNd•èTeSé Qˆ%ÈyeLuÝÔDTÝR3ø÷Ür3t‘¡ú’3\‹f«m¡çÊÇeËéä¢J|æI‹F!ŠSI:jûÈOù˜¢aI©ûyÒ2Rˆ=±*¹{·¹šrådⳓ…ê2PÓÜ[ÛÈùµ²“x­6È&€é¾kA¥¢O?Ó®mvœvg4S’aøÐã´ËL”½)MRT6|Ì1Úä9Êe ˜ò¨j÷¸²ªÍšT})I ´Ñ×e“×>5Û²Åh_±ÿ°~©¦k3étõ˺*o¡=ÆÔHóÔÌ*šøaW}ÜÀÔVyCÅÊîPgƒUaG-«ß&ÁO³q¯ˆÒܸU±À&îáY IF]Ìi«?üb¢çêV€!'´»ÕžÒ-DfÒ™æ$m;}i—§m$rÙŒÙÎå׎:úaW’CÞtÝŒrÝykdUÉGsèæbš²´K«¤j%éëÒOöéë5óÈv㮟M%wñ:0,<´pçVȉYyx%Ð,¥A·G|­ã5ãZJúëÚäÛž’õogXBSÛ ºv Ë\wJ·!¹²Âv#+Uæ¼}YóÄ¢î”ùhÇ[u\ª>†Y [³¥\Â6“Ê\WTÝ®*CDƒÉšÆÒAJóÄ}ÝXØ4î¥8 vŒÃrÑ—r±‡‰µ”Fo·µ²]UK9áqË72”Ó´S5µ•ÄlpU:e„Ì•Ef®¤Õ3ÔÆŒíÈ\£]×cµ®Ã¹Z];®©–~»u=†é:œ¨Õµy–a飴®õYZ=;a©Ñ•¾] ß\ÊèíÛ D•èu÷QŒôˤZ€¿"œ##5q©ÄP•OåãÖÝGð]ÜS¥¨~5ö8’êáP‰½vEý®kD¿R&KÎZ[›õ„ò»1ìÚFêÄÇjW« â+ÊK*›éÊS‚öÅLbU•jå× ”¯.œ¨kéÊ–lè¾"g. ¯® ¨kéÊœl¿"s*¬¯ªGªnçÊ1"[‘)ÜWØT6s_CI¼µòzÀ¿¤ª«µš)'8²~=*çaýÒÂœv*¨”€Iûõ(£U‡ûã žzÞ8²£8Å52¶‰‹‘ß»½ª»·gr–‘‘˜Ý´Ëù Ø«º¯p„厲û¨Wm']áèÊ dvD¯Òž¸RÉt:H>c,@úÉÞûw3ÉÕ‘X›êä:¥µ²±Y[Ô†±9†*dl–ŽadNñΗýaFûè[¹ís5ǵE ŽŠ^&r`/¥CÞNž`mïrˤB¸»:œ£,5q©ÄP•O%ãÞ..t]ÏRŠ©ü±@eö8‡£êáP‰½vÇRŸØhZÖWpÖÚÚ¬áX vwzصÔöXìW{•ë–W˶*uý\SpìóƒµúÊTs,ËP «N,§®Öª¹ÊÝÅõ ¯Ë-™b››+BgV~p®rµœ:yí±’Ô¹D 2UÜå´ÉªÔ”¤Ì>z –.WMh¡´k©7qe‘ùä±rHö·6¡µ…-b&Tcb赿X¡J¯CG¦í…ẈTÙ³ú9·º€*hP¦Uk“Õ²liVªN¦¤–ÓžbÞ.,8“Œi z•’8gÇ«Ü ôªÈrXNŠ©ÔÀœü$ÃZÓ•÷*³ð\]ÀRãÑkb»!9©eP®ºøo%ƒÜPý7Ó¨1ÇMæø¿íÌq›À¹éÑnêÀùçRIµ+ ›ïÊʤT—Î?¯ƒ2#\U8û´ªì pE àÌÃzfÐÂø6–Ž›il0UUÎø©j0öÛ›¡|­U¯¦Ñ^·×B£ÒRShkûÔBŸjû×M²Õ~o(\˜Äjf¶´°j‘•1²mK«7 ã&`iŒê…ÊÂu1g#´Ìx´ÊÆnD.ª§Ì˜²vh¹e6>]–—«5m_ü×NÁZÆEÛ éåŠ,饕)½lliK[úíl饽1½´²¦—&szi°§—.æØÒÑ¢^šLê¥Á¦v¦ÎŪ^êÍê¥Ö®v¦ÌÞ²^jMë¥Î¶.1›ÖõÒÒ¼^jí®¥~Ï[*Œ¯¥Ó>·´²Í„j6¡öš¿.B•V‘ŽL[K¨."UÖ~έL‚¥•É½¬Íæ^jŒîe=V÷ÒÍì^:ØÝKgCÕ$c†ª£Ä9ªå¥WE–ÃrRL¥æd½ÖšÙxu[x®Æx©ñè5±ÝœÔ²Á" òÙ4|† s™+˜Þ8ð'ÃÉÍ(ˆ¢NRÙmÍûÚ;˜ÎîÃáÍíÜÛè·¼í­­Íí­n×{Ü‚ù|óßÿÙÞað1MgTAî­ÖÉ}Û;é¼ë@'ØÏ» £h8xÃÈ» ÂàêÞ» ýÉ<´½ë0°°\ÿÖo‚6–Šƒ¼YFðÂôjî‘<Ï÷ú@öGUè §hz=¿Ã`6EÓþЇ.Á6ï/°ÿ¡‡k°³#oëÖ­_ð7Ö[ôAà°C¬oã§ÞÝp~;]P%…y8ìc7„í?ZPåºøñh8òàëĪûƒ®  n{ã)Lþ; ñÍW£atÛöCìýj1‡#ü±Lð-6]^Œˆ8èd$¥÷b©~h†ÌsvQ¡½»Ûé8;ž!Qu½'ðá€^L}ôÝÿ úsü߸žŽFÓ;VÊ„‡½ä³x Ïý«éÇ€†Åäb2ÕŒœ‘Y:ÓüQtëƒvpöÁLJì G"Ñäa輈,~7?âXš.ßygß]~Ø??òŽ/¼wçg?zëûð÷zÛûp|ùæìý¥-Î÷O/òξóöOòþ~|zØöÀÝ:?º¸ðÎα·ã·ïNŽàçãÓƒ“÷‡˜¨õ^==»ôNŽß_B¿—gôMÞÛñÑö÷öèüà ü¹ÿúøäøò§6öõÝñå)öüÝÙ¹·ï½Û?¿<>x²î½{þîìâˆ8„žOO¿ÃŒ°£·G§—ø0üæýxoöONðkØÝþ{Æ9ꜽûéüøû7—Þ›³“Ã#øñõзÿúäˆ} Fwp²ü¶íî¿ÝÿþˆÞ:ƒŽhØ’‘é}xs„¿âW÷áÿ\ŸâxÎN/ÏáÏ6 ÷ü2yûÃñÅìóçÇÈ™ïÎÏÞÒH‘»ðÒõ¯ž±ŽóÙ ‚&ø÷û‹£¤Oïðh|÷ï/ðe>Ö¸=N2Ë“NŠ.°·q›ÑÀÃU­(P­ˆ<`oŠêž&#JFˆ$‘ÔAU¶/†$ò‘ˆ5ÇuEM ƒ®©Ð¸r¼Z#WC›Åmvé7¥5yôÓ¢,ÃSafªON¡þbýócSIQC¡ƒô³ÒrŠú)RVP|Ô)*”?¬Šl j(4Þf—~TW ^ýB½“SqjdeÝksv­àèoÊ+DAYu[Ùþ)í6’ªÙ5/Ct5m®sá0 uÍ@5æ«ø^ŽÕ7Œ’Z)‡±á¼y´”ÃIJaæjÚH¤Z«ü OµIÖTÅq7ãÊi¼ì=(gƒN¯×oº%±ŸÊ³]q²UWÙ\æÚ FJC¡ÄýŒço‚Õ°ÈW0ïr šê ½òìÔy±ép8n ‹ zïzFsoÞcàh8ž þe[ôá?™G^ ÂqÑI‚Œ^†A4ÃXÅœrî~Ò|e<œ ÇÃ_ºÆÆW~ƒ0êè\þRξ¬.ž¬Ìk*” <óÞ//ãê–bàšY ŽMÔ—WàZÈ[Î@£&*6p¨ã«š`û¨Á“™ãBH¡Ò4×6Ó¶aˆ²E}B—ɶ?<™É.'žÆdÛ4\]´\8‡Éý„&µúdÖ2‰–b¾¨¬ì€U³>³ù?ê5éZÙO±Wë34‚¬ÍŒÒl6¦ñIòËr|viÅ÷¤™iŠf56›œ6ÙŒsÛä­O&µYqò¯$ÙqfµZ6驘\àf,FsPËÒ}€õA¯2͘ItÊ(KÖQY ç¡™-M2)Tâƒ]io-+[e­‹m^‡S– 5¬\›Ü*å–º‚K‘V1p›l¥‡¸$ýoÃ6§>ä ‹it«‘qC®]U›ÑçÐ%„£×€æ$Xíg—kñ°WíÆüÑr«CMúpkÅ!û´Nö¸í™µ1¨Ôæ¡9ª±7ÅL™­¥TMµìuèû\ß9c·åÖÍœRûo †Î]¦•±B"/^T CIêÁ]ã8͆…Þºæ¤KÛšFžm6oKdb[§»k³xÌUŒÔ‹춣RL›%',ªÙ˜y6Ì°S¯¥Š%˜´ª%3Ê8üvi1ær•ªVÕØ`ª¯úªëâ0ç «,*U]ÚjðŠo–R ¥ASÈÔºeQF@¬«Y›fÚÃNpÊâ [™$nÊÄ] ÜcâEZû@ezØÇ-Ðu;>êZŸÕ³Wš*²è6J·ã‡®õÉQ=_‰‘•<2êZžÕ±•U©Ã¢®ëSÃÎTJÝŽ‰Lõ€$ºÄÁ[¶6n5 ÈXB­†V2"K U;"CE‚‘•]¡¶˜ÉÆfï7ˆ›º Fõ-¯ž*?+õ£máæú>ÚvòËÇy»n0;/„*ðJœqŒ9ÔÂg5^;e#¼Ýö\N…¨w¦8fêà‹ó.¹’€w×-â]©t?--Á:BÝ݇nM#t rcÑŸU¹øt•~µAí$UUãWñÁG¸ÕÕãÔíÜxh—aÃÄ·ÕÐÔíÜ8‘ g—áÄCĶU5U­Üx -œîÀ•¶u\—B±ú¹Ó:x ¨¶¤¥¥j(#²(v5ñp!miÁ@µQBt$!ì d•ñ츄 ŽNc/?\ß?c˜õü¶éUÛ8l°(@®Û8¨ùmЫ¶®hdeÂÝÙÍ«²µ­hTîáîÌnåUدV&áîä¶ánC±ñò–®*þhSóX­†V2"K‹U;"'G~å#²28´ãqˆò­|46vAÜl£Oe¶¼U„»kò¨­ÃÝVåì îµíä— ê:8U5…tË,„Òݪœq @ÔÂg5^;¥"»öÎh=!¾ §l¸»"S5uðÅy—¬?Üm,Q/i^[üס<½™ ÷p·¬4ýª‡[ÓíÂÝš’ô¥¡tLåèÅ6w{õy>}Ìc™y‘QFËTb>n£ ¨ËËg¦Ì|ïÀ¾´|ÜZãü«ËÊ— ÊÞ‡W”Ï<¬N‘­ÿ­*$/>«cÖŒ¾³¹€ °‡½úp‰±”ºa¥˜ ;ûeãfŸÚ—l4«F‹1ØëI­iº\mº´0N—uj.….2ʨ×öéRo .µêÒÞðY:Ù¨K½‘ºÔZ©ŽTÙÛ©K¡ºÔXªŽÙÚªK±ºT[«Î³f´W—VëRcç,u;ÐRjì,v¥…f"O©œÕäÙjä:ÈSX!jâì,:H“ï˺YµØŒ—Fì²&+v©4c—uرKCvimÉ.@½@'™r4Ë E§N¬ã \J ÇÁ2Ô®!“aè² ÜÌÛ£ÐéP›8(T­Û"o ‘7…È›BäŸT!òúŠ—,@îR|ÜPxZÌc·žþÛ¾5׿[}¡q÷"ãå Œ;7¯Àùò̯·x©"âå ˆ;7”)¨·Px©"áe „;7¯Âü’¬¯³x‰"à% €»ÿ6þ~xm_c¡o÷"ßî¾-‹{« {—ãp9æ–/äíTÄ»jïRÅ»m w üvˆùgf¦¢"´BÝŠtW,Ð]¦8·eaîRóYËt>n!îòE¸«à.Y|Û¾ðv¹EZÓ¼>…BÛ.E¶?áÛÎŽ¬©°6N9ûAWP»°çf+þÅRd>‘f¹F?µâÙŽ…³Ë¸ÂÕUgö‚uîžDQl÷‚Øeœi‹BتI4ûÑ:‰O¢Øµ{¡k7ESàZ1iOt²§ˆµ}1BûâÕV…«ë)Zí\¸L±j«BÕõ©®8»¼!‹ÂÔu¥®8›Œ#s!êŠPW–1m®’Cáézê ?´É"—^Maiç¢Ò«`¤4µ£¦BÒ.E¤K¶­ªë:àŠ+Í&מ|p¹AJ“Cê¤MöȪ)I°ªsˆæ¬U°˜¨T¯œ2™ÊÚXU‹=› =×Pä¹Dg×âÎå*»IxÅzÅ•äÝ!O¯VØïSµ0ÃY‰»m.U–ØI5T«E[EOØç=ÖÀó6W'#œ÷¼:Àºì 1×[¸tæÊÅ—µ…—W8ÈšÆeæ²+´ìVÂXªbqe§ÂÊŽE•ËMØ6ª^Òµˆ²{eçê6õyª×Žt-˜ì^,Ù±˜„¹ÄWÕÂ’nÅ‘] #»ÕŽ0V¦ªXrÒ©²cä’¥"ì‹×U«¬\Ñã²ËU†°.t\S9®RŽK7¶.¡+j¬*ðh[ÌØ¡ª£Cc»Æ5ïO&ýRE‹í ×¼á8Ž¤ÄÑA×âì êâ8 çCƒ®Ù¨¸38K”ýq©"ƒu)XwCP¡$ŒÐÝÅlËRoaÍ)©7àH?õƽZI»Pþ(7í§‘Qƒš—ßZê©ž°ÐH5WLp.\²ü­³ÇP!é$Ìe¨¥¹àà'W惓:-ω2QÃîYÐ. ¢dÔ´,Uyà´3Õ0íÚGL+Áü—*à[½x¯¾p惘WÈ\‚¤ºB½eƒ¤ŠrBŽÅyÕ…y1ƒDUSб o…診Ž{^m^‡á®6,ª®ãâ^lW[h×aÄ«Œ‡ªj@¹ÕÕÔuéÊ¡ŠšEŽÅsÕ…säwÅPS¡Ü²Er- äº/ãÕ‡> qKÃ5Âu_ૈy ßÚ½•¼µ–¥Ïj,rkWà¶zq[§²¢¥ŠÚÚ´­^̶ÊH\áê¶U‹×V…[8TY°¶b±Újeµ(Pk]*ÔÝò“Ŷl*:;-K½…§¤ÞÚé\õÆ[I»eie”›öXÈØD;\·–ºÃ¡5x~VáP«²ÎÅcK–Guvjº s© `.88Æ•ùà¤NËsÂ9hçXU9*ˆ2áÐ pTåÓÎTo8ÔXèµ¾ª§¥ ¼V/îª/캪áÕ0"s8TSÈÕ²ÁTÀµX¼µp_.W5àÓÆg0jµ*Òj*Ъ)Ϊ.ÌjYÞÓ¾ «¦«º«vþ§²øªªðª6¾£ªØª¢ÐªÓ,hý>sqUUýMeÄbéMÛz‡¦r :R¤[¦œ›kUH‘X³rBÌœªQ´¢T3c¸Nc*†ZG!TyÔÊP­‹ŸÚ>u©ª–-@½µ\8å®d«–µ‘pËEîHº¥ ­”yø¼í°w)Vé-Ñ–JL ¦.ål¾ê?J?}ÞÆ›±©M…'Cq'u]'eI'»º@Ö…œÔ5œ”囬)°3ÙTõš¥š¬¿nc®)j3ÉË29p^kªë0)*õ¨Ê¥JôX–E1 RS!Uu2*lt[i*${²Œó\š‚â&%Ÿ îd¨‘TCy$ie¤ªE‘lë!Y•Br(¤šz­Qc)ÅŠ…k¢Ùn»Qm,Ô©l!c'æö¶—}Ñ"µ:2Ðk§›”fײF»ËTxsù;³¼Œ6­Škš kjŠjª jZ–e´/¤©)¢©. é@… ¦,š©*˜é@¦*’©(é4 Z[Ì\SU7QY½®X2ѶN©Œ£Ž©”“b£ùª"Ù儘wä*d÷0ÕÌ6.SË: XÊ‹WV.\i]´Ò®`¥K…Gµ$hk¹p0z\ÉV-k#á–‹Ü‘tKKH)ó:CÈvØ›nŽ«ô–‰hK%¦´ßÜ‹Kþá)ü3^ùóéxØïMgÑæ‹Îng÷YöŸ¥?>ó§½AˆÅ ;·¥¾±ÿìííâ¿»/žïˆÿÆvv_ìý¡»ýb»ÛÝéîîÁïݽçÏ÷þàýáSú‡&ù÷'ò¦ÂéÖnSá´©pÚT8m*œ®°Â)lùž#¶yööø wöî¢÷=¬0y¹DaÃ… ò5]€/Ò–²l³ýùè¾#nÆ(Á³)¬³{XÙ7 ¹PÐù&æMã+øÏ— RmÖŸïÖY ¸ùËJج‡“i¸Îßò6pÀoýpºîÍüpŽŠn«õ Öb0ÉôHtóeȺ"ååq[ ŸÏÂã s_F„>MUwàõŸƒ`†C©" xûh>„UöKNAÝ!%@GßÎâš'R–~}Ü%°®:ÒâÇ2£µ1¥š?£EÀTìxÍáÃþÌÍÿÏÞ¿6¦q$‹ãðyëù Ï›^¬]„èbÙIP”#ls" @¶sl/ÁHš50,–”ØÿÏþÔ­{z†á&ËÞÝß±wc3}©¾UWWUWW ( ç‹œû——@X½Íç*lÄŒ —P¯$zýûî¸sÐ]t…ŽÄë¿œÍp;4¿jùð¸ZŒ`=Œx¸—°wÛÇåÿ ý>5«vY»éY•F]í¢°OlÒ¿ ÷¥ù¿K@§‘Ûóÿð .ÈWýâØë{pßÿ·½µµ³õ(Îÿíl?zòý7þï_Ìÿ}‹pÿÿûÆÿ}ãÿ¾t„û×ÍÚÿN_rÝ=Î=ûc´ûôÎÌ‹y?§Ft¿öºÒúí´ªoØäkù°RaN<Ê…ƒ¾§¸ÈsF;W§=·K8ΘÑnjpEK3dç3Wçóh*à—X£e‚ûÍíå]f4ñoÑ2MEþû—/ÓT°¿/±LË„ï›ÛË…Váó`ÖÜßuº?û¹3…JøºÃa2—b­`f”X½{:XR)ØÝŸ>w¡ç º {wWê·Dtø%j~öšßó’‰0ñŸ½à³^q¯¶Þ+xϚѩøA«¬zò¹ôgoö{_ûtG^Ÿ¿áﺳÙC_]¢÷å© ŽÕxt‹ &¿?ìÑ5B<€úàŽ|w0I çúFó]lt‚ÑÈ ‡¨“"ÝTB)` @+}à÷ý?< ±ð¹;ùÞ(,ÎW ÜQ%êÏÆJF 1S|nÎçâ¡]#œ[lt«Á­fv;OsqÆ·«ÆËž5yKУ»+–Ù»h—Ó*ü›¬ñ”Âá_¶~Î,Þe±—VOÌ׸Êb/§›ø7Yì)µÅ¿Ëb/¯êX]hKÄæ[aqÿ#õóóžqi61%7ÍÖsîþŒäÏÛ•«Wœy^Ï0¥ç>O˜{è,gÊ#Ž¯=Î垤ÕL}2³à¿rŒË<4IÇé‡'³ÊýkquîS–Y-™§-ËÞ»¾_øw`Ë@™ôÆ@ºgœ ªîéWrÑ{‰IePwçƒþÓúja1Ù¥ùX.¶ù‚IÍÝ‹XŠ)˜ýàs¦ã^vô2?æÆ_h RßV|©)XæAÆן‚”H_j¿Zúúß~ôåvÀ‚GD÷Á‹®â²w5ÕÐ"š¹øÞrôr¹×xKéTV9>{»ûÞ™ý(îëî¤ÕÝ÷D­zòÞãTÝñà™sU´ k·èßIÒÌ×_•>-ÿèñžçhÙƒûþ§éŽ§ø}ø^8‡Kˆh_pJR0h)©íÞ†S5bÿ’Áßëxû"N·½ŒÙè²aÚÒà/Ç,é¸yÁ{¹µ8ŠÛ¼iÕ©Xö »SÅÇ×Òs²D¨·åØÇå¦eYr|§˜<‹©ðÒÓr7%IJæ=‹#ßÎ.÷¹b3LKOÇÂb3Ù“Õ÷Í<Íêa‚ð1+l—ùáÃVá‡W"$K#É£a,Ëe¯JZî†<«™Ñ,ˆ'»©¹¤JaV%:wA²U§hñ¬D!„f33ËŽlUíÄöªWeÛ+Ü•Ý׉»(ØØüãvÕ«•ínÉîëð¼Óï|=¶½ôýØýœ„wÝ/ƶ—»îåd»#f®z%¶($^*ÝYIz_žK®ÆvšG´¾ØØ–æ…ŒmA¸¢ÉØ–äVŒlnd²ɸ–ã("ãì[÷s|ÞO@¾/.ã/§è_¢o¡´¿Ö½¯NÎâQç¯ùR?­.. ¦Ÿîuš,§mÍÏ ý:‘r+)‹‹%…²E867¾ê0neaênƒšOŠ–ÖJ„éN[IöY°×æÅg½ËÆ[U¬»ÓxæSâ冴Y^àœ5}&ÛÄ’žÇcëÐÒÿ'Yì˱ØiA±Lù™¼ÖÙ¢·)ðçTÌÉ­rP,<–d0ç#ÕÌåJ(¶2cy—ñÌ%6ËhÒs—1ÅyË»í¨Å å*ÛkUyj‹×e.]j4«PÛÌñÍâŽo–boþOóÇ_Ž?¾YžA¾YŠC¾YÄ"ß,à‘oVa±nVä’o±É7 øä•{· §|3ŸU¾™Ë+¯Ü³å¹å›¹ìòÍ<~ù«¹Ç|³$Ë|3——º™ŽÝÌ`¨nV:»n–âùwtaŸ×Ñå©ù}ut&§3¯›Ër7÷ÕÉY'þü5_꘿YŠ¾¹7>úf#}s?œôÍj¬ôÍ ¼ôÍÊÌç"[‚ù\ãVf>ï6¨ù¤hÉa­D˜î4°•8Ò{m1CºÚÆ[•Á¾ÓxæSâ冴Y^ÀesLûM,˜°Q ¾ï¹pÙó°(Q¿þëÛŸÝŸž¾ßiðð}q·¸»Ž:›Qb;»÷ÅÎÝÛØ‚?Ožìâ¿Ûß?~dÿ víl?þ¯íïw¶·mï>ôíÇáõ5‘<˜-óïÈŸÍ Gm¨J0¼ù—WcµÞÉ©­­Çê…wÝóÆãÂ),¾;êªCïƒ× †Õ¯‚Òâà6¯ŽŠ§E¨ ZW~¨.PÌì»·êÜS#¯ë‡ã‘>{°÷‰,¨~Ô‡ïÉ ë0öÖÅ|~r¦ž{oäöÔéä¼çwÔ‘ßñ¡§ÜP 1%¼ç·TüÙÈóT3¸_yA`Ï€ v0ØSžEFêƒ7 á[í€0;RëîXÝ“‘ †X*}»U “Gõ˜jcƒ²‡ ¡Ñ«`èÁäÕµ¬? xzÀgä”T¯j­õ³–*Ÿü†€^•òIë·=(<¾  Ì&ƒÂX‰8!Ðý‘;ßâ4W•P¾ü´vTký†~VkT›M`½¡Êê´ÜhÕ*gGå†:=kœÖ›U §MÏ[4‡<„C‹U©Ÿþ†Æz´8@ »ÞØõ{!NA"Ì •úɳÚóö »Þ¤ë©L'\ø—Å«ŒÅcIÞO8wÈû9–ÖºOsÃÐ1Íy=êÿœÕÐl¹•ÍL'hÙ2F=kVÛå£ãz³Õ>ªW~m?kT«¨=A• æ]Xªu0Îí¡0'ãÙ‰;Ú~ñ¨ö¬®zþà=ԇꘔ®|­I»€ZXWžx;”Kí)+¸%.M*ã»jtqºa—!n¢äÈó8 øÍ*›Z¶/E—1Pþ8¯B˜ACÜs–êß*˜,l?œt:ØD5DºË+êÀÀ»Ç@ ˜ @~@õAp­®G¬—RuØ!aЛPo(o¬†½tÞ.`ß1®ûã¨W¡º hr@Í!R…þå°ð Æ׃ݕWÃQðÁï"ÆÃ>r?À®†žúc÷œ _kPç¸q’©Ï“þ9ô¦mäu&°G¡Z0dÀ(G¾ÇlEl€eZ7X­AHëG³ÏKõØqö]uÞd¢²ÓTÕUH¡òô#gýAzHüpµF^?øàu¡;'wÀ“ ¨Š‡µ)t“Q€*Ö.p’®ƒIf)Ùµ+Ü…¥ ò˜£{…Í»=˜I.ÁbÀ–ûIÏÁÏ.b‚žÒµî½¢ù¶p´7 a˜Ð‘;b< Fx‚`Ïr€úÀëø~M#äiÄpÁ=B—ûÏûËgC=ñгîäÆïùØ&€¢cÌx2òŠö[P-ô±¹½œÐêÂĸfÐ4ÏØà=`œ‡ëÈs¨q!¢ Abñïò‡A=\áA^ÛkŽèõ!Ä­T~ 2Chm2:÷ºÝeØ¡´1ÚÒ¹¥€rŒ\šr• F=¹4ÂØŠ“½"m8^"×íá$¼j{7pðuüqfz:ž&”…‚ƒÈË”Ц €ª6Üœó'+áÇê¦Mß'ÅÂ8w³§3 ’vÆ [USd¢7„Zq„“9ò4ѽÑ1Úõ‚E8Z…}/ªÏúƒ FÞxt[b…(t÷éQÅ,Œï¼cn  µ&uˆ¬„ + ¬R§µ€õÕŽº‰.7¥Ú[¹ÆAo^ #ÙÃi¬ ýÑQݽؒÅëT_·ÕãêÑoÀóöü÷^ï–Í©UÐÒ•ÿ\°š„öõަЋ=u>R!.'𺰶ö”¯~²0h&ÄŸžrœ‘9kêç¦×+às×-1éë¶òÚÝuýó×1}-£ë:k]‰¦>¸)ºÃÓJTËër?ä’P/ q|ÑVE”ÓnÜ@S@ÝîœË™¡…™P#œ¼Æ¼êû„§$IRD„{æðNO?¹IbN:W^ç=»ÌW {vî“°UàgŸ‹$ùnœ”I8!pç öÿB|Ç@½þá ­‚a©‘_ Ô×Às‡ÀOúÄzÒ‡ç"ô Qþ_»ÒGQH5…×öt*4Ü«b“ûø@žB±06=L ¥tÜŸÿ4 D}:ö¼NU/‹:± Ä…Dô1ë¶\!¸¸P᱗„{ wÈ<]Ž¸¯1´ozå†ÔIiÜIÏŸcX`[°Uäý±’ªù>0ãèŒÂu®ü±G“d¤;—Þ˜¤Í1S,/)0ˆ{Žƒ^Ï.hŽ8jhyêâª,1‚ª#Y¹öˆ=ç¾##q1 ú‘T½`+hP–ÊI¹Brɧ҅žÅpŒ:>ÌIĺê¹US<ÝÈê$_j.At15̪l'§½‡Ó}kf*šw–™ã£ä§{„Ün»½á•ÛnÓ/|>?9«´Ûˆ<»9êóÿ’ J¹™ÂÎ`0zïŽHaÓnŸO|8XHná4Ô¸„ Y@fpX¨ËN§°[|R|´I}%¥Rœ±´”0^]¸~q °¾†u1-3“³X«?#7tS%W–ÓB¶kœsû¤É8Rz&åjù¨}÷ÙƒAÑÜB½"á,;F¢GÛ^hVŒÊYÄŠ@³ IƒÀaB;†HPŽFŘ~Í$_Éç3E¨q6“ËýfŽùocÿyì¾÷Ð@¬Ø/Æ÷`9ÛþsëÑ“Gß'ì?wo³ÿü*‡9eýù¨°¢ (Bi‘j‚¯ôFþ¼ñþÑÎæËÊwß)ƒOÊRPÄÌí˜ qZO®Ö'!륓V9hW•Y“äŽÔ@.êJ ¤‚d~[*‰é`ñŠÄ—K6ôÿð t%U¼Ê(É0Û¢A†¤ x ÌÏ5Ú^aÖ{ÏÎïßÀE“5ò†AèRç õð*@iÃÏ€Û`¢®ÉJ+À(C:hâƒ2 “°x*8³rĨº-àð‰Í#w‚ú4ÌT…þÅž*n²•&ðŒ{ÊjÅšÊí%,•Hà®›fy9´†\Û`j5‹7";Ò«µÈô ouᜲח'ž®"Lâf±X\ñHÜ"‹Ü ÷C ïuC]8s;8:`LÿÖ®œží¿þá‰ó¬­sJÎyøcI:Þa?;NåÙQùys¿PßQ…WTá«ÜlžWÛ¯j'‡õWÍpœ£ÚÓvýé7÷­.çÿ°q%è$SÙþòK*FOÛ—Ã^R /¶ä<èôÔÚ:÷-§ ØV°‹G Ì­¤ôcU£ϯ+å rjïKPQÏOÎy)j3˜ŒK©…cek”T±ø¿Ã·V*ìû´ähC%;^+΂³ù,(ÚI±ÖÛ×?>þœê -ß>6)}à N¶¯§}Î,¸©5ÌIê­ó€ÙïTTŒÔÉ ݱ?ºvÔÖuÌï ¡’MLUb•=´®óàÀë\¥Ãs'R&“1þp„·ó½€m}³Ç~H  7YÕ9Ù½ôÂŒó ¹X !†Aß[ œ|p§åƒ{ít€/À~ìz=µQôn€;&š’>?ÿzþÏíß k4çýÏã­Ý)þoûÑ“oüß×øS>nË ypZ£_¦žR* …ÚÚúndªºpç?L*üÖiŽ#4³ý¢Z>¬6°rœ˜z¶‘r ]á!Ô>jÁ)Ò(7jU„CÒbÏMÛ,®¼ÔIµz§ûqâ ë¹ífý¬Q©&º?Aoî‰M‡T±KBpX9;UúèÐÌŸÈÓp¨íÒ£Ò–* ‚Þ’æ/åØÕž!²i§w*”Uú‘ ö´|x˜²ŽƒV‘åöa­Ù‚ì˜Àh3y2¯› @ŠãªõàÛ*c1ä.ðWýâØëñMÖÂòÌÀÏ/®»àíqÛál/Yã²ÓáÆüÎr=K«¸JÉzY÷Íèé,¿ŠÖw«âLL¸k]úX¹2½ðºÔrØF1âÎ èk%ádÐÙ ‡î¨;ÚyzV;j¥n©Ü»Z鮖Ƕ«•ÑìjUüºúlĺº F]Ý •–®Õ¹ríçwí1ƒ¹K·íš+öþºNPîÒs«âŠOÙ¸WŸ³c—®^£û˜3s—Y‹U•ysœ‡§#ÿÒœü¢Êò7ð>ûk ߟ6A€ïCÛR •BÒ Ÿ_Å\ ¤’›D™µõ5³}¨Ìe(R¯·ÜäήÝ#h{jSkvõϪ†¸4½š©µ¼þ¤×î¸áâ’BDÛC¶o]\A|é‚mï¦ã ÇíëÑâ*؃öÒ 38èº#X@_ûŒ×b1oh¼1PxPÝ¥’ÆX½EK9êé·?w‹êuVo+:õ]ó\*¾Š‡Kn;.Ú úý`ðh§ bj¸l¥äbÍ/Ú^mB,Ñâj©²Ô[5Ÿ"K”–’oý÷Àf¨ÂPýÿ¢-¨Z;øÝy€wdO…%òÂTBÒ\º”ò ZÒÏ—6766%{íõ3TŸªM<Ðœê:ë§ÖsFõ9µÚ¥D´J˜× £ãt%}Úuù_i9mÄÿééwɸ¥eu.‹§±ýúi¹QJŸ#ÌA×3Æ‚ÙÂäÎ)!ìïœä…n.·»hzÒäúÒ5N+Lwóy¥‚ßêQùuõ’ß:Üš®ØÌgàóŠ-­Šø«_…@ű0¾\!ŸFŸ³÷ÑÚçP™»´·2QºC#«®PD’P-7ï}…VmísWhÕöî´B+6²ê ¡ÁnVÿ§]i¶î{yVjês×f¥Æî´0«´p§³?E]ºë¥È7Æj%elé®`¾‰÷ J,©ÿ.ÝÇ}×·û" 6[!^º·«Ú%—nÞ,,È‚«²¯>šÑùŒ»´¯?¶…X¾xH‹.»¾þ VÙûKl,ûú­ô9Ö _qû|í>ßÿ&ùê#¸¿­ðÕ»þE^Tâ¥Ï²±ùê(ÿ5{ý¥þ«Žá¾Ñþ«v~UÄÿöPîÿlü‡âÕ—µÿÞÝ}üäIÒþ{wûûoößÿÂøøp{{å §Þ¨¯#Øc<ú9¿U—×ø Ëx|äýÒË“üÁ-ºö ѽlÓ>‡·ä©ò‚ý …ßý´‡aÐñÑøJuƒ9Ýf)ôM­ã#³ŒŽ‘ÉQ;]Ïí!@ñ@¢sM8ô©4ò;쒀͹øíg÷ü¾/Г;œªÜ_èÞ€Ÿ»å9ºþëÑø$VEÞŠ ‘W!…c@?¡y#ôzÔ9â{&†î#;?‚††8¹c™®\”\É@3Ÿzu1 8H¿)DwñÐî?Лxƒ‰Þ· ÷rò–L(˜èst©×1x1ÆÐkyÄ+2ŒVZ²Â+—ã`hk8| ‰Þ3!Ul„Ý@³%ò: FÆѶ= RäEU5ëÏZ¯Êªª5Õi£þ²vX=T™r¾3yfCÇ×PõgrCýZ;9Ì«êëÓFµÙTõ¹ =>=ªU!¹vR9:;Ä O¡êI½¥ŽjǵÀmÕ©M†o^"y=•h3Cq@'òIíäYªWOZEhÒTõ%|¨æ‹òѶ†àÊg0Œv”âq4jÏ_´Ô‹ú>­BÿÊOªÜŒ®rT®çÕaù¸ü¼Jµêˆ‰%¹›êÕ‹*¦b«eø¥U«Ÿàx*õ“V>ó0ÜFËÔ~UkVóªÜ¨5qfž5êÇ4Rœ]¨T'8Põ¤Ê€pæã Eðû¬Y50Õaµ|àšXYƪËGF¶£Üª×*íúi³ýÂŽKO³§ÌÌóÌs÷‚Å~D˜R9êQŠ¥œüŒÉ Û@Ñ»Õw;Wø|™ìvFAÒ+änÅ H‹u‹‰C¦ø'ì˜Ð÷Ô5tÇBÄÍ*&¦“üwááLF!9á›ôÆ!O}1@CFHÛÐÙp@iàsˆ' ݦ¢óf|¶È‹ô1®úÈÿ`|~M-*ÍSk(úîÜj Êcö¼b×~ÿb#†"zª °l€‰Ï j€þ['ØùpÒÊ©:ˆ1xÖú¡Á5vìöá<åg˜ñP%„Ø·V “®“A·A&ZÔ8òÅò¸¿ ýk#›"a@:ãù†”×÷¤É3ŒF19çÔíXyåÎB¨ŠV›žÏk@vÔí£wH;±¤.„ ÝªÑ £[µÐêp|.üÁ‡ ÷Ácì÷n\l&¯(l 9HLÅÁrã ,ÜAtÒ]À§¯ÀvÀæ¹n¾7¼¨ƒì=,ÝDv»?ȤPLR,³Ø1—±12QD§Ð%ðÅ…£¹G’ª…¬zLÃRPëvˆËפšµ]Zq Z¡[RUwÔóÉu–‹E}»^ϽEçWˆr:€Ðꈜ¥ ßÉ®v™iò1½p»%Èyèýs"!;¶b6’O‘øžKÁ t¶ïu9„Û ‹+Í›c™™ ÏP@Š³ÂåzÁ‘Þ¸~qÕ¡KuUç[:&ä3Hkê…'=¤˜;Ô–ì½X/¢…(®Œàñ@©³»ãÅæ*Fµb9gCàþ'Wëþ6»q„rÚÇeÙÊ2‘±€\fQn‹1ÌØÈ2šõ(M…£8ß5ñôõ™ H•÷y ìGj§bt›[ Ä…7î\ ·Û½[/b ¶?HŒwíÿ;Og0RŸ âæÎ0 ˆ)/Åwλº·Ížtûäo£ƒ˜ÏænÏï_´DMc FV83"j#r©‹´O6ä:èÓvù¬™FàkБ$™É‹?=2ºU0LÀ<Œ¹?èKrÐe.Áb€O»%CèQŒ–×0¸`/è0 ÂðÀbÊ»­+Oz°C#±¸Ä$(A~86 yë&âË: t G´f]1º—@ u—çEÒó䊺N:WÉ1•I'䎣nKЙsO3æ4Å1NA¼®Ù#ûEr<”3;Â:uГT4ϱéÙ\°fîÆŠaæÊŽd–·M4!Ųp“Ei8˜› Ï’S}ûGcÎŽj…£9 :Å/»GÒ6û˜Â ±Çv  Â](Ž¯€þå{±Pø$Žg‰9ÓÙƒ;zp$XhžØ…?¼Q Òl$LtI7ò+¸E_DrÇ,j¯»Ì`Æâv.*_´dvÏâ#Ïÿ€­¼ŸŒÓëéÙŒM'ÈË+aõ£~qæLʽáEË>Ö“3˜‚Jfäôƒˆ «v~_‘V³Ý¬¶¦§öu0Šænö¢Ê8NàhËaÏ Ç5/*GÕrµS£€0Ð¥A0êSïÉ?zÒ™~q‹2 £È +w#i3¶¨"ÚM³+X}š‘Xª¡rUG²"ñz·¢B¼Q ÉbLo@*;ë(BoR‘¤ÏKžÙŽ¼fº½ºTs–X~èrï6gÎ(ʱ¡ôA¥W-oõ½:C#Hie<æð䛂`ä_Yì¿$‚¿Ò;…8ò—‹j1t“qÛÐ#ž3c¿?£_€Ea™€Ä=èJ¿âJ”âïÐ&BŠ@‹zZ´æÿ×´ÎèÖ*bx¿b±¸Ç_·ú =/.Aµ’[‘%Îõ¿!0~Ôe:”WÛ¹:tußã:—s/6÷bÌÑàY«žè…“2&·¦ö#—3ƒ“mÆdîg“8Àg¢ùÖÑõ´úu2s”»=[5ÖõÈ»(]eásTÔ(Q½X|¿?æ S’óOê—‰L‡;_Õ4~( , þ¨ˆŽh×r¤êŠ\#Ç@ÔHC…“ Ägûõ•GaÂ\;¾stø²€mzá~pý©:Ùi«Z&O/R·ò8ÍÁ/ć_'ߦWžûŽьӭ^ËØ*SÀ¹¸x§Ñ FŽCb£¡àÈ#ež¶ä#K(,q0d‰n½çƒìWè#ŸK€B\jPæž>rIè]‡ñp5$x^i£­n®h㬚eÚù_FoAlYOPJ”uö(Ç|k/#Qí"¦ÅczãºHÂqí¤Þ`Vr'gq.) œœù\ut V(xÖ:q–˜Í‚?`¹é£%ÙIÕ‚¥Nð!w™B=S)“ˆÇ‰™Â Ù£a&An§÷PlõÜ £ÓÆefɆ+å“võøì'+Þ(ÃNiT|_ªUqoºÚx¥…”¶Ñ«æ²M³ÎÄ*2€4Èè#qiÐìPqùÉè)í¢£Òe›e§¦‰1€ÈârsJܦ¤žÚÒG¼8ƒ! Ÿ´<Þ ‰î›^¦a;Ò]×´ßÝå×Å´Ö:œv˶Œ.BWh!§´ˆÎx³\iÔšËõ=ù.»Ñ¦ÐІK£!yÌM¢!HÛXW‰!5_ì.¹Ë®VÚbW髈¾—^Gvœœ™5KâÖxi’«½ [­˱Šçå’ `íiŠúOOï…\Š|pz:QI# B[â HŒ'••œšƒ3_5O{ÜÙðò»!•eMj WÂeùe¾ Ù’,uß~ìõèÕ+ 5¨Ì~^©päë1]…öñ–Xó“iœt\¡³OR³˜M5ÝÔ g|žñÜÞÞÞÊ-ÇH>®s þÏæï:¶88ylõÃŒ}ytZŒL‘‹îeIë§A\ž{LŸŽ{І®§©Cq£ô“’Á¥U¤ G÷ºMT<®ÿl×^ÿð$ ¯7hRÈŸú!¡½l+©¼ÉŠ„pêŠb$&‚„vB%’î(¨éÔY­5'DÊèkùŽO.9PSL“¼%¦_ïÐD¢Ûï.³Þ‘ôLêŒ¤ß &qù‰–9ížÔ0¶7÷¸&¾ÓUV*y¢Å"Së–}F¯©lºÉì¼S×ÑNmõ&V›ª vXwhJ׌£]bº£Uá%cÑ\ÒZª [ŽG-SìªÙ¶/U’ÂXÆWZ³—©SCæg–}Ý˵¼¥kå¦ßÿ&ôY¥ë èyž«@$¡·»úÒ½¸Äµ.>¢§ÛâVr¡èú8~É@IëhK››²ÿ[_××Ú9.’WÖ=´QìJ£•åÆ›%×Twj[Ï»1*ëo3]2)v’¤;v&QókmÇå k“P 6]E^|¾píŠ3…È~“FóôMÄr·,1N¡vç3Îëi–`Ö’éØ&z øÛª¸>µxRíR通U€Ð8—[ZÁ/þ0ZíÚ}´?Ä«Jd+KñÚ“x>tCë©ç‚;zC†²vÆ1Õ?}oÖ#ëªhþ•{éúƒ¢–L–f‡„ªêAjÉ|Vó鉣µ%žá“ ÍØԉ쥵߭â®})k![Ì覥­xbéd-”(ù²|d›9¶-EÂ… 6óïïÿ ¶ú… ”Á|áøÏÛèLûÿB¯SèÿkëûoñŸ¿’ÿ/•Xn ÏŬ£Ë‚œ‰œ‘ÛA»Yô rEO1‹Æ¯¦EŠÐëŸÇÌC×é™ÕËʦ"p›MŒÓŸ&‰íòËrí½´2›¼òÝà:TM<‡FdK‘W/ýpŒoõäqú}‰c­L5Ñ<;®¶_Öš­² Ý¢ÊÀœrp ð•"YTÇ,]­æ&ÎkñUíä°þªùãv«@.$ñ1ÈÒª>„±àsª+(cI®ÊñéëÊ‹çÛOž&fì=¶ŒÙ,ÊÕ_óÕ©m–C¿ÅÙÃÑa£úz³Ù‚¿¥QlqTž|—høY½Q©²èÕ©Õâ÷ٜӛʯc°-bèð´^g‘‹Ãh»ÛPnví‰9©k¹¯9{ÂIÐS~üN,âePó´Ü¨´_þhrüŒõ¸©^67í¨+y‘lÐ&g/ŸŽõ£Ãv³õÛQ•Ôs£zå×ê!)éÊ YT_££±ç¼ §d†d´Ý˜ó´ta#x½åÄ.9@ÛùX£§ê³jÚåCæGn‡Ž/ ¾IÞù:d‚¼Ž—ødMo$ƒ@ïaÕöqùºoÏOè.{^¡ƒFϱ])s’svR;mÔ+Õf³ÞHlz˜Ø6ª[GhŽMÌÃckíÝ0²y‹/©lãm5ã3¿µ“f­Â˜r⛘Aö};èxœ…É€ÌdO“‘; Mê‚ÙJ{K ÚÝ1 4n¡òËÀ^”>G’¡Ù¢‰ÎëÓd6UÝ­g‘´ù¥p…ÍGc”LO4Ë…k¿ ¼,Žç91•„H.?|Ñ!'c°qî^4ø^*Z—.8ÚÖ²0—Boº4~OÀŠw„s} ޘܪ˜‹Á×0×d284‚žâ8@ˆÀ–ãsTmÙg·qÔjןþ÷a­‘€ßõCaÐ×&¹*פví“ÃêÓ³çÌi¢W7 šCôu|ió–§åʯåçÕ”hÜuä—FRYí9_Ê ¸È¥JHÞ¦ÀÃ9ó¼Q=­7Z) ‘²z =´á¦:)WçÂÀSY«B–€Ç;"":¤ oûç¸\è0~é¶Ê¼Â·ZHܧf0 ÎYã(Æ C{Ym4—9ÀÊÀ,ªŠç1$¯´_Ày]ÖèeÌÁl:ZÙm×,—+ž~·lŸõoü´y˜³›Œs ¶¤íjýô‚ü¸:­7k¯µ¡XýFµŠŽ€OZßœûóÿ?Çÿ¿È‡Ÿ`¾þo •~ ÿÿ¿ßyôMÿ÷/ôÿÿø›ëÿo®ÿ¿¹þÿæúÿ ºþ§ÛD²Ž@ÕEHŸ5É—™Z³‰¯î:識q‹cn"St\Õ§Öø†}t(ViAIb"+6šô¦\'b°–3À¤¥^M·©r+=åÜ/É%ùH\z‚4WùïCQKÙ~ ZìÊXÚçË•'>#$§e0‰ô¦Pmäö$y#Rò®s»˜Å…‚kÍl¢ZÁ¸Ü"NÜs‡ä#° iî‰3Ÿr{CÐsmo€‚Wòóƽäu¨žÁ¯«Ðoüß\þ¯ó¥î¿üý÷Süßî7þï?‹ÿk÷WòŽ½ShÞ§«ùb“|¤Àƒ.[±+¥!Ýy~r&Ð=uJ“:b®‰‚U0c$8É3<64û@t°édØSžOÞŽ´B`‡â¬»cîGòÀ4Gœ(_&ë 22&~GiC˜È«`è税ᜤö‹I/O¾94wg6ÒLÊža+a6&´Nt™e å‘à;°ÓÂvÐgpmÀóÍ!€XE\,d:ðÔ¿ Å!¯]xF†Qxc1EÚ<àžÕž·_Ĭjµõ@d‚c—–Ýdú©åËĉ©uµbx„¼¸µw;´Ù¤ûB4sœÄ¹+ÆÌÅ"…tjäÛÐʾЌ†Eò€=˜4óÔüç˜EðzŠ÷¸Íò1Ìò«G;ÐPòQðÛ£±eFßèÁ»ñÇë…íœb_ŠÄã“,)KùÊTªì¨AÛ>¾ÁöÃm &Cå¹0]4ÅÌLá£k/4ÒÀÀ‰÷м°~ßLBRï¡‹À¢€|ïyCÖùÅY¬#é‚UžÔ2€ŒUüÍ™}á‘÷#rÕȾ×XRo¬ X%¸`ÇFltBŠ<Ÿ rÖ—C0¼ü€q(2†²Ã1ƒþ üÂ^塚Ô$…;AýÂI;¿EEÛ:Û.Jïs1v…u7rÇ ð*/ÎN~mã¥RŽFÜCVC)j*ôP¶’‹8¾÷Ñ·­ÏŒ–ÜÕ[«‚’.ßÐyf¾Ýž9Ð ÁQÁ̆;"‡ƒ^4¿ìîî9Ð$@2S5Ý’?  W}ÏXv$öÒúyËÊáÊp¢ÊÖD`rÈ·P¨Ã¾ ;~¤ø~<œ×Qý9l¨×4OfÛ©jûÉ,3зXarãa/©ˆÑ,ì7œûQíù J^­“ —…Š°SRt‚N‘{l„Œy´KR¸Ôú¶úé§Ø s1aB|x¡¢øTÏLÌÃT"[­ïl¬Ûà¾ÛÎmXøgú‚Z„ {«¬û›4ˆï€Oz.7ÉQÍöpl€ž<·À_ ‡H<ÆöTš³¯ø`¬þÏœ ž*Å©±Ù¶{맭¶Îœ*•ôΔZ8áËæajá-ÓÍT”E:*²fÐuKÄ]gŽ êü9õz2àÅœzéð7>:7ÞsΓ^#àŒé˜Åƒ@ÞZE.ªl°iàô|2¤}¼qé©Ïøø‰ÕáØu%ùâ­Ï,TrùÌÜ£oÿöEW¶í>¡«"ɉ:9Ì­ÿe=üCýM­[„­ýÍÑ «ó{(<{ì‘ÖÀ‘Ç{…¥twöÑ f°žÙìz611“WÀ'ÖOŽ~“iÆvLñ}€ÞrQKºçJG/Ø'”XßÊÃ|åQcØj£.¶.ý~çb5?å+¾I>ÆP0¯»œW[ô¢˜•ÍÜÞ¼avzàÔÌÙÅQéÎîÓfxV®Uõ$Ê0¶ö3P½ÖŸŒÆ¦C&Wsò_›‚ä³(7”9“ü³u@Å"@Á" Á ѲÃ2ñOüXW#ß9Ï3b¨km>â‹œÀ_í‘MnUIŽâ !Öq£}ëà&¾uôE»oLDa@ßíG¥|ƒ¶'ÀJgáâÕáÌC *ù°þ¿änèf¹ìýúæÄ—y+g!­®•è)½m‡Mœ{SØ~gŽàðª—DC™æ!+.“.Óå•VÂÔ_öÙ¥Ò¢ÇÀÓ(:£övPx8Ž,i™ý¡5}ò:ÀÄ¡•/î!b!— âŸ"ö+>ù0DüFºk‰ q”œYÌšÂaNÕIq›÷9·T¡ö¨ãÛGÕ¹š Þ›!kâß¿å dÒöjã®]ßÛË©?™øP)Ͳ 'lj9ñ¡¿þ·$·—#HJÙÀ­zëŒ89êw€œfcÒù0×ï n¡DùˆÐÛpÕì^h¨ÆXv’‹$N'¹o¯i÷먺ÈÛ„r*áW×çiÂl’Å“›ö6TÞ¨NÏT~)ïŠSÓ•—¤ØÐ4CñÉ13[€B’¥bž*&l¡T€ž2¾¦8e)ƒKéåüsùx·mú \ƒY:¡`qæñË°xAW4Ek hø>EûB¥†ñå˜ÀX‹XØ3Ì 0/ëÓcDnÇ gA³:©ýåc¸ÎG/i?П7ÅýÂÐ bHˆAþ§SL«GâÏzQ3Œñ/žÒ îú|¼—|IŒ¥ÛyßG” zò&..¾ã‹ž§ˆ ¨ ¢Á8¾YÆè9¾Ñ‰QÑ–±byÉÖî¼’ˆÌÞ 0â6 CMÓغ*‚feNÝP.«t¯¬Ð—mÍö  ö®ã÷¢D9¶ù¬"ù›kî9Ö¢[‡÷ÏûŠi†dUŽðtæ2m…f•uZc¦¥ØÃn©Ÿö¥côõµ!ˆoj8 ¯Öÿ[,îê;ÙwDi…äÒtÀVpŒŸl1ÃÔESEUúáyøfû r Ø.0ÁÛy”6áÿ¬ÿï¦þßù´'Vd„òäÍ?ý±1¢“WìØ º”w)¦Ã˜œöŠF܆ÕR^ÌxÂ-†<^ÿ=ÕÏ?«G;̯eˆé@∃ü¡kb4¨FuÄ£N z=ÈÚŽq±Ã‚ݲ+Èc%¾~6 ¤ø ª0‰6¯hŸÚ¸…>DtÄ?Ú‰ŽA݃ujgûÉl`?£ïí'ið¢Ô$¼æƒû! Ú6°O²¢!:SzÌp4†±»ç$!ìFg\”H›5|—.æ1At’wöF À¤ÂÈPI’I„ºùGLø‹ ê)<1‘D‚ ößQZ)æ ßf>¢nÁpݦmß ÇÒes} ¥!pdâlâ/Ç7³½wHÕ(5&H¡0bŸ#r€XÍ®ÚM\£ SEϦV²$ï‰þÅpäÆ°Æ Šû”ùëMÉ2¶øko’H¾dÒù(`}Ç9¹Rj‡^ïiÛz,þR•Ü«ï¶sqµ‡…:°VÛ}œ¸%ÈÐ ðæÁâí‡ÉóÌaQ™h†zb¸BcXßÐGÂÏÝmڨ˦—pêpÖÒghŸÍÄ„­K×~Ž©âÑ=.‰ž^V>7¥¡I­n´„1!'"®ë3'} –Eç¼LÒ'ç?ÁþC¼E›_Èþwk÷ÉNÂþã |~³ÿøzöâ\„/¬ðWüÊÌŠ(cS¢ñ@ž©Þý‡–ÐìȪ& ›Üo+&f‰šlÛ°ÔD¦Dá²^zZö ww †ºò%]ƒ5mÃÿ û¯c÷½GϹ¾´ÿíí­ÝÝ'–ÿÜÿ»ÛÛÿ_ãÏCe­´‰çÒÕn>(ìÚvqû1e˜²n½¤Ï m0œŒðúDz%«äÔö?î`Uwã†Z–•V©Ok ±»ƒ= ž(µö¦-¾,@AÂ\ HGÇ‘©:ª% gÚ-2êRþ8UÉ?P02Zl©ÖÑî«Ü˜ EÙ—Z¾£9<Æ>}@³ =†!ë‡ï`<æcÆv,¯õ4Þ Æ“—7²V=÷ÚØ–!;s7ë26-ƒú)ÆeŽsЬâÕدUXfçåi¹õ¸¿ ]tà¸ý6º’ºLÚ„4ûêOò…§šþPÙµu¬~T}Y=Êe÷8>,û׺p‹Ú£rÜÉUºJûE½ÙJT&ójÈëº\+³rÖ8¬5æÀöxªO>þû‰‰£k&å¯SÞf;B1%“Ÿµµ?Ù†ä>áâkÏ«¿äÔÞžùÚÈ)¯sÀ4xÉ„+åüþàöünÆòçÊ2â{Cz•îK6Šƒ‘Q?ÿmgφFg JÈl„n‡]¹!Ößüºz{Ñs/Ãýµ5œtºCÝÓ˾¶žÀ‰\lΧ!XÕ­e 5ðí™ÜxûöÍ[õöÁ» Û¯íy¸ÿö­=¨DS¿³ü¡² ß²*cOçG…ÌL&Ü\[;ñ¿7ø—¿ ÉÍÍËÌïf!£©bdVßûÃ6š×E“¤`Ø\¿s©Ö¹Ój|ë]¦t R3vG¶‹kk››Ð2Uû$m¢udœ?¬­Å‡»‡Ï€Íq@¾î ì-ÐKØ &z‹öuþ7ŧ½ø:H+fö7> 0ý¦†=ñ…Z.9êl ö^ÔtÀª~ÙH­[Ÿ.SŸ ¶ž¶žÛ›.Ó› ¶—¶gƒ-¼éVûïr³¼ùïÖÌì«f.ÀÚZl{Cô^E@r4 ¯ „¸ VH-ƉˆÒuG·@PÎ5³?Ø“ >‹d{m²Ñrô2@5çœ÷KÀ¾¿ÄHßpÎ@ýµuùÛírØáZ²Tñ ܇úçÿ6_èSç»â§µuÌh7«èø¡Uoä2¸Ï:]Gü`l…Ãr«,Õi9Uè¨B_=ÙݵKž6êÏåã”Âv©f¥Q;m¥B¯=å£#y£N%tv"ç uHbæ Ó6©m|ÙŸsNêãòQ[ªBÑ’sڨƿᤎ%H³“d­D Ö‹'¡“Ÿn7WÏC¼< „ç*Çv2~8‚VV:§8áDVx§\9ªW ?Ç»4Òq0l3 “Ût;h]Ó+öwi}å³Ýßm£48U¼¿»)Î* ì¤ÓÙc‰a…RrÃÉ¥;š]Y¿FH¯üÿça#õRØ>û[ «n“2È$³‰ÿ¬Ðaõ´zrX=©ÔªäöÚˆ¦/çÖ`É*õããú ÁÓm[RB´µ{3PÖ†ãîÈQ&÷Ê‚œsúï™x8Ü]G¿Iи­Ÿ#è ô|Ò~V;ª6Õ~<‘ØX“…Mº@zÜî?ЇÞdÈXƒ-#bíÿάš«>š³áÇ"üï2ûû^ v‡éö0¢ÚÑTµ¾0@׆ÑIÿñïpNG o~ühñT ŠÛ\5Ë'#»†‹-3Ô‚‡ýü{q éŽê©ì»7Pgw‹eqšžb`–šŠÍ7ïŠo ÿoßn||·ùþümff ´EÞeÈœ *K‰_‰fdNªh05S3cC¦›kÝÓÉí-nSÅÚ¥qóš¨DËêã^&«6Uqãíææ_BüÿmûŽ©¹Í7ß|Gtþív>+À`½ú5§²O«Ïk'ÀyÑÛõ7™b/o3õɤ­­í`šõ‘ÿ¨ÕÕß}7‚zÔÖšZ1äþTÄ[Bõ¼rOéêjk/Þ.õå“B€ýÂqÄ/_ÞÜç*¤i¨ðóú”¥E±—DO$H$9Ù›ÿW¸ùv°©k¬ÈÎ-HÍoAmêJ•²þŒxE‘±Æšßÿø Pæ_€¢`6ÔÊÑ/ÒG:qÏÌAbTRëpÞc·¡‰¡pº.pÙ]A&—‰‰^¼znÎnŠêè*†ÿdo^¡‹°«è¯«‘3¬M&žj1E8ò±L¡Å”鵎jO径6¨m¥åœ˜â°ÝsÛW><*:•ËQ[šDÙ`”Y쨴»çà¤Z=$ ©ú N­?ýïj¥ÕŒÃëVÝVãl¥ª0)‰ÊRzMÌHË8+?ç”Û/Û½ˆF}€ö¦0ÇL ÓÙ‡Õgå³£V¼Ø”+BM¢ÔmHM[ “_ ,¬T«^?ÂÃV:Çhaì^îW*rÊ·¥IŹ¨’| íhŸnÇP9:Ì™šS'ú5ݙòþ p^$º~9ìa ›ÁûY»L±ç:S“.õÒVZéÓz?˜~Š8µ¾S RÖ8^&—áßg t‡¬É·–‚×zvj¡âiQOÛS™ÓhzJXJÚ4“²M >Á^=±€ÀW¢ LI)0Ýæ`KB}B&ŒeÏ*DÛƒÚvímè&·¡Û†î¬mèò6<ˆ>©]}ŽÎ:@=ð.‹ 6_Thým¶] (øͧXß½=G…ªN`¹ rà¯Â…S9=-7%Ò®P˜ ¤íÏô¿±®äHüÓ¿ ÎœžFXcýÆ,å™8%¦ÚNCìdftKÃg¹ì›Õ˜?’9Ã0ƒœ1ê+ ÆZrúN §¥šF ΋!%·GJ.FX_Æå11tnr“4—oÁÊ’tç%¼÷œ/]Å^’JrÑ*íéì”åª$Öª¢¦”á…z«WÉYŽ¬¯4‡1²>ƒ¦›s"å0µ(¸éªÁÑáÔü@RZ‘´9‚¬Ä,ø©Y‚R4OÂøi&2•+œy:é|V5Ø 2™2;óÁ¿íPí¨™ipįr`ÎNË-Ôs=«ðF$É>‚'õœ\YºVR`¡ Êœœú™ž½ ÐçÎϳoZÑ‚ØúK[32CgB£»ôº,öP}«ž5Ë-À VwÜkžæ¬èÎCÕ@oÒ.›€£iïÍ4 ¡‡¾nñ¾Q<óFïôÑ­W„Ð-0^b¢u9 †üJLAú*t¼¼¹bíN†=öz‰öóXU#| æ‡bcŒ7ìÛUðþ9ñ/nù¾™ÊÂ4Ρ¨ ¸÷‡ã[i?É%‹?öú(Ún¡h ´Uj[—b!¥j›ÓB¯‹N0´Èë“4†³_£«p2b#=ya0u<6ŒÁ®{ô®-eÚË£«‚s¯ã¢/9¼¹-^Ùwˆ¾T¹¾øU¡Kõsr·†®>Ý>^H›]ñÁÑ»aœ;rvå_\x#º)fmn¸9ÐíahN“øó– äÃñ~–·šw§oÉð´ÿ;6æ't)F=Á7 Ï~FîÿD-óG×|üiTb”¡ïÐDÈ/~îw§Šè ½õ {¡S‘¯}%Ôˆé Jìôz\eJ»`ZŸª3)êB<Ø,=¥þ´w[õ5’ ú]}Ýj”™2i4Qù‰”ºUnP þ Êmˆoµñ´ÞÄ«zÊžN‡Ò\ëµê¨â¤oùÍ©F?z}q^êt¾à‡ME ¯~=pèh=¨Tð±Gø/Pv\?¬êDùä<¾­•úÀôX¨|TX—<=¥ÏÓSúåËoHýí9io_Q²þ8p(ø%$á¿øuŠ›¾ñ¤áqKIüÒš¿Ÿµjœ(¿!õìøôií„ùçS­¼¨·iFø—¤œ˜]¦eRZ‚®)À÷ë* %Яç™.ñŒKèOþŠ®Eä§IÓ·Höw”Ý$’¢2æÞè žb•hÁw¬XÆCŒÆÁÑ!þ2K&?!­öÄcN㟔¦øK¯üÄ´Ó:'œÖáë¤ÍåáßVS˜­j‹\™³¾ê·¶6VII>pŽË ré~ÿZÅmËIüSOjϪ°¿uÿb ÿ+  ËòóÀ9¡©:9Æ_ÕÃZ‹¿ð׃N˧0I~Rš`ÿ‚ÝZ[¡žìš”'»Ž\Jbš¹Ÿœò)nåF‰Q9ôÆmÁï(—€Ûùœ•‡ÞvIŠÊœ5Žì|øŒòäÞÔΗ$,cߣr;JÔˆjPÿôoÊt]ÿÖ©Í‹%ˆ…—XËbnôÉy=àñu¾•Äeþ9 Ʀ6}û:Ò©ðó@x=+•>œs #å_|Il]ó¥±ÛóÝФò§Îë 'Q|èôÀª˜Ò¼A7E9ü-¹º/fE"3…ùÉi£ [éò y^9þ)|B¿4?¦8–»¢O¾ ®ÀébÜ =ú’¸þ-©AT8Ð%£A[Ÿ7î÷¤sòóÀ‰™]D_˜s˜dúy`+p²þ"¯æ_”bD_ƒWÖºIó!éøv/–§œ¾«±‡AÊ{ø§=¤$þyà0°Ø b ΰ{!ü RÌâèuI7 ài9P#Ô@C‚F¨j\gÆß`<JJ )@x"c«SÍ—6˜° %Ä„Â`ýmr‹¢/“Ø•‚¨F„M±È×ÔÌBïdšUJƧqúgÓ>£2‰ –‚ ïNjÌækx94~7©šùG»‘„<¿8ºš¾[ˆ%i‡Nâ-åCMi,ðr#y6Kõ‘¸ZK^f-Y-ýFnÖN£h7XÙ±]zTÚR…AP Pø晧‡I»šé¤L_Ç™w…q÷nè›Ëé;¥Hhƒ\#5ö˱Jy.ž§­ÝÔHµÀÇWýâØë)ª×¢òä§pAñ´ˆ¾ËÕÀ0`Ô˜ßY®giWé"º !ŸX›âeC»Üjkÿ^«âLL¸k]úX¹2©«¼.µ¶ñÕÓAp¼£U`د“‡¢Ô¥î¨Ü»Z鮖Ƕ«•ÑìjUüºúlĺº F]Ý •–®E‘î?¿Ç æ.ݶk®ØwXø{è:A¹KÏ­Š+v£ð¬ºK=¤Ž±z‹–rÔ‡ƒ þnx²J=<î\tÈòdw‰õĽᕻdÑQÉ‚Fv–+Úùár%ù–+|åݸ—ó(F¬ðp¸ä øî²ÓÚòÃû%KúÃ%g€Ü«—œðÑ[K–¼Z²ñˆK½ùa%¤½.»XrjÔñÏûés·¨^gõ¶¢ãQˆÌ|*¾JˆKn;.Ú úý`ðhïdÃe+%k~ÑöjbIWK•¥Þ8e¥éÓÛ<ÉxÀÏsŤż»Ì¡/ü‚ÛwœbóìºÜn–¬ŸªØTÅŽBƒÍ"þÿüNêmnI.qà¿j£W‹¬÷˜ñ8E[\ÇžÆäœ,Šü"ÚÄ $›Z)Ë6!äI¤Ñ“Ôâ¡ Áš&4îž9ýBaä]{y¥,0ŠŸjZ×êkúNŸínÉ:¿ù£Kt²0õ´÷Aôð~ ø€.â³QWeʸ£ún ”Ðý?ºà´EQÀƒÈ„} 5ºŽ£”f^ØÇv‚Z¨„°v²H¿D+²+­Ë×DOa*9u ˆbëYŒw8áˆk‚‹q£O6µ˜ÛÙ;ƒæAðÛ!gԌ·eæ±¢>kÆŒ9î<ÁºCS-ÎÙà©;ùî=ˆ=u[ÐlòÝçµ›±ä8š„–Ðܪ?,\m²Gtžð[‘™Ù³š7ý«4Ã,fÑÞKv`E¤E:`NŠÔ¬¶þÊy°>‡"11bÙ5‹–ìý8˜t®ÐŠÒA/%…«î¨ä<(pQÝ1kµÕ_Ï?·ôü¥´4ÖÖãj1M[]%‹£Ã ñb‘±ž÷À²R ÚÌøk~¦½n#2bŸkC㎠WÎp•yÇ'ž)%m”Öc*ª“áÇO\‡CåØ"‡çæÔó¤¬nÂ*—þŒ Ëñ•€·¸]êÅ„¬Qô:g=‡fƒ¬Sz.týkt!uV¨ŸÇ<{K¢cæmõçbÙLìâ­fÞ æ>¥ÌÀ„´¥-ÄæÚÚÅç-F²•ÌŒV2ý5˜šîB´'¦æ6‘èTj0gMpom-Sß­Òv6/V…á“—É—G¨‹÷TøQ¿IýH_ðïf´u ªðc6!Áp&¿OíwèÍÔv×OÿÄ\Íx¦$Æ&oÚJiÖáú)UZ^üiº6¯\PLÌåÙ">—ö*­vò+ Å_oGþ!Víß' ºÁÒ:iWº¥Y6ï3!§¼ƒ›5òÔ¢óGo=P[b–ìëÔL éÞ-oy%§ŵu6|ËÙGnJ¹±{^ì8ÎAù†È@Ìɶ/*nâvFÓÏœåÕ²xÚ l#¤Ï¥¯§ï"ßß'@¹ÅO€»”JºpÑëuåå«F|”£·8æ© Èq ÙÊÂñ!üw ÿ=SQËkÅÖ0 W&ø E­ý´  wœ/0rÓpb §ÁôLØpÙ@"Þy6£âúSVÜÜÃÿûƒ@1̧åʯͣróÅÁRp·öMÿäM™˜5ã§ØçRà/Ññvb%¦Àš\ZÇó|…•üjkSkäé~Êþþmi¿ØÒ¦Í6®uoéM¡ù¯Ü¶½/°¸è½ì?`u§!¶u;Ó$8±–ÄûYÁ/³7“SP¹çm9wÙî°hSýMìÆ™ 5Mcïm©SÖokw§µK'¢"š²–æ‰ô¿nãõîwõV¤™_yùìù¶7Ÿ-8ÈHlæÈIÍ]¨"$… %¤Ð‰åë,v+¥”÷¶ ÔsÉâqÅIÌÏNLybyªµYÆVÃ-P›YpªÎ’}°Ôg¢È[FM(>¸¨‡Ý}¹_êîGn¿63F1¨Œ ­®ÑÆpoP9Ö1p`´QâÞH÷ÀÌCÜqaÎøNZbZfU]gìÑù^?uíôUÙ¼yûvóÝœ¿”øgNáCÆ}»¬e7Cy–‘Š.¤,³Í£ú‹yT?ßÆ7­†O%¦0\ó«Ø»ŒuÓ¡§Ìh‹ìŒÍº© ¼6R ¹#RF«¤ž7øŸæoÇð79$`2†ÕjIü‡°s8Vöµk¹Úe„†©0,¤Z ŽÆˆ¨wÚ* »Þ¶˜Õˆ§Iò«˜¿ŸŒÜùNy:Þg"*bÊć³ù1¹(Xí÷Gñ|Ö½‹,ÁÐá²ÅnÏËQÙ wðÁ}º‰¾}»{ÐhR [ óƹ¯¸ö•Jreš†ÉÑE ΰΠ¢@Ž8¥kæP$±¢Å RXr˜„õº›±º2³¸ÿdøš+´¥ {p¿ïMq¦è"7šŒ8“j–¨qj9Uß¡ëèA£Ø¨Â÷[[Ðì‡ÐûAWM¾]ߨ??©·{¦m3¸øð¬­ñÎ ãÆxŸÖìÄ;×Â<Ó¬'x¼í½¯06Ó/³nKôȦiUœîœêØÌpF#)Åc­YÔÑé\y÷tšˆ/%L[Ï6üÕP2ïlñÖØ2ƒ°}š#1Ër‰·˜8§^ÕòLé/Úž–Œ¤!&¹ˆ„¢gFº¶ÊTh‰&CÿDÄ))ûËÎE_Q.~a®aÍK*’Bðü~›åB)d~g¤Í©V44YpûËî"QëRŒg†³„Lœ¬ L,Š§ö#ᵊTçC9ƒ¯Óq3æUš¶ºÚ/„ÑF`LËÍ6û·ìl&Ñz»zòrŸJbÂ~4í™Ø¨€#·µ«ò\§¤ªÑwÄ蘴˜ÁÓt¸…¸ÍSJ¾Pdÿå[òQÍl…l˜Þ.å8}׌á?oTH@ÜX’S>|…ž Ñ?ß`Œ!/»¤«‰ªSxûIl¶®t±ëaŽåjŽìÖwoÕÈ£GˆlËí)TKSý‘G\K1Ÿ¾8•ˆ -A@h ÀÝÓPˆ±—_:M†§Ò¬ÔTLOŽ`¯>B3ë\RÑ’#­0õÈÈÄp»Æ~ß®õQMÙó¨)tb݃ei«â¬µƒÎq O|î&ý x‰¾hJ ÿ¦tùQrÈ R¦‹@ý(9N‚–E$4®áUsU8ì–õ#¶¦› ‚Õˆ¯OTÇeÅÛãŒ\Úc1ãŽ%XÛ­¯a÷"ª ±Êüm—­Âa¼l+jx„éXRS[siDK©GX5kÛÇ®“  üÇó5ò¦PÌäV’æ84¯z>Í<âüɼéù²OkûìN`å,s_ìÀµ£ãñ´¢ãŸ9/½†ó¡bg7T9}Q?ù­¤ØÁ&‹³ôV“* K¯4o{55=KУ˜Ž‚UBTS´BÑ.EÑ ÆiŒ&© Õ¦ÝKÄES"(šª¤Mj-“äœlJ‘ vUf1aÔŸ!°+Ï cÒó9°«%VÆ"v©T̲ G‚ˆØu‡aœhÄq-ÆEZÕ ^ÙO’»›öߌoï×ÔýœØ»)Õ Âàe`0ª[{4–F&åöžž½¥c;7± ‹·ôi£Z©ÕÏš‘ìä8Î\¿.¥¥| Áœ S4”‡É…ÙÚÁï¨G'5AXzݬýoµ„oäK—’RiývZ-M!9QØÜØØ”ìµ_ÔÏøš&Y›üQÌ©®ó±~*XòÕçÔj—uÊõöÜVø]ðt%í”À®ëÌ÷¾SZÎ3Ôÿééwù*-ëÿjñ4¶_?-7Jés„9¥ÓÇ‚ÙâmdN ñC2§Ä5,ý|nwÑô¤ùX*ÝÙû× ÓÆÝ|^©àw£zT~]=„dÔˆÞš®ØÌgàóŠ-­Šø«_…@ű0¾\ùŸ³Z£ú9Ëq­}•¹K{+¥;4²ê ET ‰ÕróÞWhÕÖ>w…VmïN+´b#«®úìfõÚ•fë¾—g¥¦>wmVjìN ³J w:ûSÜ–îê òcµ’c¼Ò=¸Ãü&J܃(±¤/ÂÒ}øý¶`_dÁf{&,Ý›ÛÜ%—nÞ,,È·¥_}4+"¢ó~M¿þØbùâ!-r<úõµÊÞ_bcÙ®PKŸã9ú+nŸ¯Ýçûß$_}÷·¾z׿‹oÂÒgù;ÿê(ÿ5{ý¥þ«Žá¾Ñþ«v~eĨZ^¯§Ä}t¨Þ<*>þ1ÿ¨øäQ£*>?9S}Œ·8Ô +ïfˆF—xÝb¢ H}|å®ýÐS®‚!A·UÏïûcµŽVÍÛð% Zá16ΑÉƹ§Ð‘±×Åx“Å“zõ5†É*9ÿõÿ쟘ۖÂ÷ÅÝâîf7èlÞg[ðçûïã¿Ûß?~dÿ«ÿü×öÎ÷;ÛÛv¶wvþkkþÙþ/õø?i"õ@ô¿ÿáëϱL´k›ñÍø3§æÉ“ÝYëÿdkû‰^ÿíÝ'¾ýxfPý×·õÿâZ¬6áºIÉítˆtÓZ´‡Wá@†÷…‹‘ç)Æ E¹}o0&ïaEÇÑÑmKPÜ O]…ŠM1Ð@ßë£[#Œ ]ÜžºrÝž7Ê;@¡S û ŽÛ ü …Ø¥ˆI# £K–wݺ‡ÂûAp­®!Éa§÷¦ÐÿkŽ ö<¨01 Vž»ùÅ‘úƒKJ„¡§ ŒïØQKØ`èØošrGð9èݪˉ;r¡{­lGÓ–W~Ñ+*× 6Lë9æ`Aî"õ ;?yLè^/ óê|2VýIoì£j224…¸ÅÀÂÍ3tÆ…Ý c„©›že„|(8†'½.öx ÐÛ)KŸaÚ¤vðÜ£&Ã1ž·Îù­r!çOÃ›à §ú}6aAXPZLÆ¡ßõ ˜ëŸtšÆÍcE„rØhfufjìuÆ0)ØZ¾¼ ^*´ÈÄHyøþÄ|_wúÈ7àT™;Qtps\Q4 ^~`F ßw;£@e€>.Õ+íZ³ ÿüÚ~Ö¨V3ÐB ã»…|\_ù+³gÈÒtˆF£°Vn íé•7èèŃ•üM›Óe^G xXã@ñ±±…Ø&l`\qÏM:m–BáÈÒcø4Xì eª ½º÷î¥gÍ*lÞË èæìÆ°‡¨{8ec˜0œYHóÊÌ•“J(¸÷8T!@7룱¬H0†åìà`]ƒÕ_‡}ƒ»’z1 ÆêÂí÷™ãáÁrŸÞÝ:ÿœø°!‡A@fÿÃò;ïç¡;‚IÏåaî qãü÷aQaw:À^#l#M£[Mihaç›Aßþ\žó0˜\ª#Ï͆Ñz:˜Ó»ã`Âÿ5Àé‚BCë ›¼ö76·êœF3C.ÝuP}$ (NP¦^»ÃĤ;šÂáÄhª¬—÷Úe žXpö; 0y0*„°î¹ßódžÜ^¸„IÎ`€&ɸF:xû1ßš]ÁмAŒ|›hä…Ðÿ6){&\½ &Ùƒö&÷HÊ"Îx{(há0í’ ·zŒ~ë‚Ñõ¥'c9`¾ü0œxHb+x “ÐUÇ°#]¯Ëèö.²}pÖOkjgkk7§®õ²r5 u¡å‘Þ«@P킆'@CÜ0Ô¸vÊšPÞã8ùLc H°19šY@Hqä0 }¸£.¿aô¥^!Ñþˆ4šú„;·ú#œô]تÁu7¸ðÙ séè0*êŽÁNúéͽµ©B@»<ÂÇÚ»)­uA´B7/Þz¸‡‹h€> Ü$ºÏ“ÒƒÕA¢Ì“=3säñÎðŒxÆXˆ{-C…(‡yGxœöɈ¢Ý»ÄcD}jGu;Ì;\øqXÌ9ÎÙ†4ž \¢ÅˆuVj"%vhàí S°ÖK32Á9šªµt:W“Áû×Àfk°Ûõ&ÌÇSY Ü2—é5Lyë>u½¼Óï»ÃÂ9•´6n&ŽBjCŽÔ‘?˜Ü0.iB¨ž6YúÀÈœ‘9“ Ò6ÖÆ.'1t©v¨ð5ž°1:W°[Ðëµ:e OlCvâ±N¦‘Žl'ô–é,’`$… aó:fú7ð·|dkB§–¦ xâùZß9~Š‡/±.œö¹¼ƒƒ#*váú½-ÚG\ðE{Øp´ØŒZÿÇ„§éÉ†puAvüQgÒ'N‹O\ê¼ðKò~ ‰TPÆGêõˆže´ ÷@rÐlO ÛK\AM8íëpŒxRrœ‡:œòO)±BV›#nÝØtœßU¦­u|Èʹ=΃,Ü0ë\ph%s¶7@ônã\P!(ñ_ßþüû3Kþ?ªUª'ÍÚÉóÏ”ý—ÿ?z²•ÿw·}“ÿ¿ÊŸúdÄ¢:c9´ÐÁ©køÙ’€88pÎAÒãóXΠáÈ÷Æ(]‡ÁÅø8! ¶/H!Ï7>©¯ KGÂ1€¡x^tzÄÝÚ"IKÐN„38¥j­B8¾ía¿:Þ D©¼¬.¼k#áà”A-ŽÌTFꌺãçlr­N'çNSÓ¢3+ ᘓ.…0Úxìô|J„fWÉ™|W¡\Sd}ÈÍC( ’º€"_#++C‚á°äÇ©ÃÛñŽëœ*Y˜èó+ó‡\ ´tIj æháP0¼BÖ%O‡ëàe³*0[ƒ  _Ã[#ꥥ5wAVèøt€½˜DL$¿‚\ÇaešR#“£Fºpê;"Rè,ÃœYÂn^Î=ìƒÎŽNfªNã FÐ<õeQ3ð_†5Äå £Á7=#ÄFäBhÍqŽ‰ÚDÁÖëõ@ú^¨WL÷Žy,hßòîà)¢r}%ü 0?“Ñšdö$ö0 ÿ!ø[kdº>ñ%Æfh:f9AN€®rH€‹VU²@b9O?f'…‰5œ6Oò3>AEž–x›Ä0{_TU³þ¬õªÜ¨ªZS6ê/k‡ÕC•)7á;“W¯j­õ³–‚òIë7U¦Ê'¿©_k'‡yU}}Ú¨6›ªÞpjǧGµ*¤ÕN*Gg‡pˆ¨§Pï¤ÞRG5ؽ´UWØ €ÂW.ì¸Ú¨¼€ÏòÓÚQ­õ[ÞyVk Ìgõ†*«Ór£U«œ•êô¬qZoV¡ùC{R;yÖ€VªÇÕ“VZ…4U} ªù¢|t„M9å3è}û§*õÓßµç/ZêEýˆžß<­BÏÊOªÜ ªrT®çÕaù¸ü¼Jµê¥á`1îzõ¢ŠIØ^þ_iÕê'8ŒJý¤Õ€Ï<Œ²Ñ2U_ÕšÕ¼*7jxªªgúqÞÁé„uõNª §ZÅVŠà÷Y³jªÃjù`5±2Q..&šb÷($‹ð­ºPðP ñ•Ä¡Ðbé}V©DRåÓÀ»êA¶……WÈë#bq½Ñت€Ë—îèœ8`@z‚É*N—b³)YU†äv<ÈVØj8ô¡¥eÆ•B [/ŸË­j£V>Šá6¡6c¶*?mÖÎZÕ£ß} ’ ^W\%Æl8ÛGp1Z¹¥~«ŸÁ¢¼:Q°º¿. ¿úP%MÐðVv6êyݾƒ‘âɤW˜ ÌùàwIE¬ ï}>ÝF=w#Ñ’ÞtÒ¾/Ú=ÀC£hλž&j]ä>À¡|è‘>,œ%; « “Ѽk'M t9 ÔŠ4㙤¯¸Ì1ÇåÕŽ|¥Ö›pÒ“¹ ÒØO™bN‘¾Œ¸$¢VíÑ[}’ÔAç[K…Çë8õ>Eèn‚@†c¦ý«¼ ƒÆEãnóJ6Ï…}*:ëÔi\S˜^£‘éÃD’3œ¡;få!k—D÷ˆ.ûÆ1…‰Y=Ù•ºãÏO஽èÎ…\² ¿1…3·öãHÔW¤ôñû`VÏ} _æ¢#58»èÔuÇ`ÍDANŠ¯ñ(€t8òH«HÈxÎlvNW8þÉ> Ew¼A¡^¿I¸+ÝÿÞƒð·PþÛy²ûý÷ ùïÑã'O¾É_ãÏYû Ö­j±5È#ïJS`îßÌA^yâÒ(“©¾‡=w€bÞwñCzΑò@$:rhö8Þ ±‚ï:½ç†&«ïyè¾ÊC6ÑGÕ$Q’èÂe膆ƒ±oÀ ñƒ ë@érÀq¶°£w®¢²P@"âßìÿ¤_lûóóQ.þ›½h¹%bŽPõ-‚Òd€£BM'©sñ.ö ¯6'pâàéCþ^ðÎ𠟦ßâÍ^=ç‡MgzKÇ +IåŽ+I<(øàËð6/cùð€sÉÁ B‚”¸xs2P¯ |p ä’î”Å’$ŽG;¸ŸÍ5‚ãìäTÙ:Áô¹£µ’¶Î Ÿxî¯@`Š¢Û\ê„Ñïó)#W¦š·”£ž˜FÌëNÒdßÛÈÐà’hMªÐj0œ[m)O(~ hç\_deôÚ¡‘h,$rðtêõÒÇYvGÀy¢yÜ„.fªÄujö ÕjÔ(Œ¨ ýÇ8º{òZͨO¸&Ð,߈ûÀ6„|R;ádȤ‹¶7Ù•í²ˆ¤!5Í)HÊop uȦ“L5ðrhº ãµ œæX2û¨2³3ñæf•8‰€ÆV¤A’ž(a³iSB´(DîF(B¼—ŒQÏ}ÑiâŽHÂ:ÐÑJ¢2CÖÏà ³|³ ý 70ÅbQÕ­ù5 Œ¹‚ E,Í/6f§l»<>N™Y2MYg½bL\TØÜ*m¶¤0â4Ù(‚©ˆž$2?ÊÂJãv#ê7@¶>ÇWú˜OL rÿ')töÍO8±?·ßý þI˜§Ÿ×‚IÎÉ}æÑ,.ôŸäÎ ß&/•åËê)G8ãؽ â1žÌÓ¬>4Md–afqhK²”Cl¿îA·$&ƒ`¸ž3ohN•<ùätÖÜ!vÌðW@/&=Z;`Æ·»NÖŽJ¿©$ÔU H×(j„E*ƒÛÀÜ"÷†Þ笧UÏóÇÀ»n$ѹD•u Ü8™*^x@hˆ<@b²«`F©Ð¡ eÀy™f JL«‚‘'µÛc4µ†6Ýí´DÍV“û?Þ{n};79œœßäu¬™[/lçr².?gÎh¼©“–…ŠY™RûÚ‹Œî3ÍysW˜7é@ýÈT•'øšŒf¢gÐë"ò-¬•"k<]•±Š¥>΢,  $_ˆ†X>^~£ï¿whf¢-ààoè*QaL*y´ÎÒ&êÞ'Ã.ñ6šýGÎÆžlÓpá>Fáeùzks±1"+1ƒ¤ÑPHÀfP„qÇ6Ñ@…TIV‹Ñ`ètð@ÊEÓ@l•0/Ú n|hÆ‹4«-âÞL—(½I7Hê0}7†™h™âY}qŒi‘AõNpð¥ 1ÕÌ]äÑʇ±æ #¥Ð‰0B¿–ˆ”-›Ië—št{c^ž-&M<¨¢dŽE<Û¼qTŠÝÈ@"¥¬›Õʱ~§˜Y4¡õfÄC46@3降ÚI­U+Õþ·Úˆ ´t‡‰ù-C¬gˆÙFdT¡œõú„á Ãy ¬nÜ¿ kbOq¢Ef¦G®¬X¨‰ïOy½€ÊYÇí~‘†DÆЖ±Hí(tFÒ”¨µˆsÕ½'hŽÌÕoÿô+$Ø‚¤¬ÇíÃB»‡Â_è¹l“’né ÉëZ‡–Gñˆ˜”„NÂŒÅæÊX``F‘^¨à… f•j’žÅX“[b…Xª&¿'XP†ë8ˆZrOiu‰9Hm>‹{TX ]tàŠŒ¾p\ M €4i»ØP  wm;mK·BûÅ$G±õs€°ºÐ(EQë! „ÈeÞQÀ·V—eÃZüî‡i¡ˆ.!™B²¨õ¹ãÈ ˜÷ݹ‡@Èm7ïDŒf衵ÎBx<‡žCIÿ§¼„vˆ|Iž8m_A)„¢é‚<òz]@I²˜´E||'¯RÆN›YŸê‚oŽømÊÇŸé)¶ÅXÁ'jú¢ü²jòñÎI„3TM4«h2…FGÍV£\;i¡’¢êÚ²­¢ýDQ졨ҾaúÉc$ôš»‡è?#!ÖK°¨>ÉغnÔDé¹ìž0H2ŽH 懱!8fúÍTô ¯™Ö6ë°b|î÷ú+¹M‚˜Kóc{ÈCÕ½•CcQm¢ºYZFO¿[“~Ö×û¹„RmâRPð‰+"˜t‰tSÂïoñ¹UÑÑ^‚JªêŽz(ÿZkÕÇ—çxÍhí‹åIb^¬½+—j‘×’±íÙ¨¤ŽÜñâfX—Í7Üò²«š“óÐûçD¤Ýy8ß2¾ÔýMë%¯±'=,F ЀÙç÷º“¿$ èð§Í.ÍÄÑg˜ì†LŠdv'#¹s§î™ÉK³ù­“CGUgqSÛ¨™'=Ã=×£Y7º˜Ð0g¨ÆB½Äž1Âð§+ëÉ·ØŠî}:ô¤C>;°¢™QÒG3:äJÈ1A;=‡³†áÅæ6º|˜:1Ì5»­-Î]ø WqK8>Ýö s¡jyáBt›Õ9aXñ3:FòöKZµúÑí®Þ¡ŽÈˆO˜ì¡5¬&ϺÔaÆUY²³v>£5×ÔŠ¥j榱[B„å… jªua²ˆËGò ¿7жãr»Ãe“.öZ&BÓ ÍòhêC ¦V§Ø ­ÚŽ+£ED×õ¼  6Ye¾P§Wçt%Â~e§ÈÖÕ"°ÝObA’Åéí|¾ %Œ^è¹5ˆiÕÈc‹Ð1ŠA€‡'ô€žñÊúv|ûúŠ¯¶Çb=*—´³Pƒ«Ò·/h;ÞxÉØ3v£Óë;"«#<È^yr^‹ v¡é"mÄpÑ%— d€$‚o*‰¡B‚Õ»D~p‰¨"HPœ6[Pmà$-¦ÄN3mp4Óan“AØ'Ë"zåA"® Áµcð„wsȆHãÖ…åµg™‹v¼¢6aJìÃá2púž; ù"Ô·ÊBŸ…0äõ·Pµ’¹›Ò÷„]ÖbcœŒÙàP8Ùºn>: lèT„ÈgÞ1p#æx«‘=}÷Mâ~Žï~,{$ºKy„niÅê`@#ŒÛTXÓªÏQóîĉ™£:¯ÈøX÷®15“Ëc6í2Vaù©7RŒ»5ù3Vc2H\CQ2fŠ›ôÞ•ã{ª¸i}òeÉT«fc†ô£<âói©Tô3¶ð‚8Ê^-€^ºƒP¿¡à6vç¬;Ìô~ÆÚpœ_øžâV©D8Ò‘E(ΰ±2`R-2„æQ5íXº1V "@atýâ‘Ô±àÂÓá;c‡ÜA£‡Ãø1¨é1`|ÔÜ·w¾ã¸1 ´<¯CÚ/ õ~W«ó ÈêD¡2EbÎÀÖž…t5ª@´ôtC×a[Ñ%*RãH»_ Ý‘›JÖÖDÆLxcŒ*¹XG–-¨¡¯—ƒ¾6 ×zFDÁ2q/9ÚûÚå,Rï¡š•ßbË3)Ü$yu•±Žt¬5vhÆ.{0®^¤CÊ{s>b‘~)O ¢wm´ÍζLÜÍNHOcºGÝ5t\CfXžŽÞ‡d&Æ!®C7ŠÅbŽÞu#GxuŸ°ÎjRåˆó2F‚¡ÅûN¼´bãÕúo5O5ù|ñðáWö×ëž”ЩöèN–O¶Ýž þ±ùÔ=öÑÈ.¸‡ŒÐX¹Ù<;®¶_ÕN믚?þ@fžñˆ_æ°2 Š©5ÃsÄïhü5œ vHa8Ó>¹µ[pûñXú9)—#GÒÚ­8_È#‰=ýà1sd¹Ùõ™Ð³!|ƒ1Ý3%¯óØ#'ëN,§ëÚ= ¿ê91oݱcž‚øRß¼.ˆ=×gm°rfc;äÆ:òÄO{—©Å§ÌÔ¤VÇÛTôh¾cî—{.»åÕnµd6ÀÛ‰vGúX6Ó¬xè¨ (+\°Gº+‚häj,uŸÑ+CŒz!j¡KŽó„…ÿ.*òŽ”W´fñë?ÕïÑ ¡3yuZ?¬Ïá¼s5K››dÅÓ+º~1]nvÄñY±sÑÿ¥øÝýí­ííïŸ|_¤¿ßuÌ=2GCq;¬ÆœB/Ù™Ïȳž:;‘SÔÝRÄ{ÜìC­E¡|¿/(9ƒCE‡nLä!µ¹¡Pè4õ°üœOyÖ›‰²ôÈk„±‚f$E7xx—?ýe×Råkq‡lU¦è¸#CœHÈbõó¢.NB~r„v{‡%ckk²;É+|µבvÉ©½=óµ‘S^ç*P™yÀK,J£2Í‚QI›™f¬ø½r/®ó¤WÙé¾d#'&õóßvöl ‰ŒÕ¶ôÏ Ýÿ‚SëïþA.¡Þ^ôÜËpm 'ýÙQùysO/ûÚz'r±9Ÿ†`U·–A&ÔÀ·grãíÛ7oÕÛï`£1œ‡ûoßÚƒJ4õ;Ü\¨ì_÷ƒ¬ÊXÀãÓùQ¡  7×ÖÎCüï þ¥ð/hrsó2ó»YÈhªY Õ÷þ°ÌM4i@ †m´±íÁ\ªuîôŸßz—)]ƒÔŒÝ‘íâÆÚÚæ&´LÕ>I›°‡¡$ÎÍÚZ|¸{è»PзäëŽÊÞ¹„ òg¢·Z¾§0ë ­˜ØßøX(Àô›öÄ6j¹ä¨³5Ø{QkЫ Tøe#µJl}ºL}.ØzØzloºLo.Ø^Øž ¶ð¦[=ì¿ËÍòæ¿[3³#¬š¹kk±í ýÑ{©sàÊߧÀë!n‚R‹q"¢tÝÑ-Z®í«õX3ûƒ=Ùà³HV.yïyÃ˹è)8ï—€#WÐi|JËïÜæÁi¹òkù9œGPB¿Á”BÑg¢0¼º ÿœÎÇgHVù´Ëa‡;](P9ăp6êŸÿÛ|¡OÖÖ1£Ý¬ÂQZnÕ¹ î³J=tÝÞ¯èJ]:«ÓrªÐQ…¾z²»k—p­¬tN9p‰¬8È5N¹rT¯@Žwi¤ã`Øf&·évPpïû»´¾òÙîï¶)*F²xwÍD¡ì¤ÓÙcFá ¤ä†“Kw4»²è#gTþÿ‚ó0À²© c^t;Œ­†S7ƒId’+õ“gµçg°B‡ÕÓêÉaõ¤R«6sÜF4}9ç°KV©×OžnÛp·&H¶nAÈ9ý÷‚´]ô 2…Ä]‡;fã0Ž˜‚Ú…öeÜÅ+]ýÇœ´ŸÕŽªMµO$Öd•Û/Û§f^>´OÛ˜vÀd ¿§2«ÏÊgG­X¡-(Eœ£IÙ&d&øÏ«'øJ´))¦ÛÁlé€YG¥2qjí`Ï*„sÛîØ‚ìŽ-CÂtöt»AÍFŸÔ@³~Ö¨Ð4ÒŠFŸ„yîéz[VÓ\q^Z:;Ì@Bò¬Hш¸ÁÇAðñŽ{æÆõ9§œÆŽ,d·äÔÏ›]ïÃ柗ïüü7›•å^]8[Üî?ÐÐd]a¼¥S|ÿwžPƒÌš÷ʆ‹ð¿Ëìï{q(P_†1Œzíèè…º6ŒX¹F,jxóãG‹™¤ZPÜféYf5˜ši¸Ø2C-xØÏ¿7šî¨ÞC}÷êìnQâ À £MOq¨KMÅæ›wÅ7Ðÿ·o7>¾Û| þ¶ 33Z€RtafMQIG i4#{ÄŠD#€©™š2éù4ªN$··¸Mk—ÆÍk¢-«{™¬ÚTÅ·›› ñü· aþí:¦æ6ßü}óð`ù·Ûù¬*ùêלÊ>­>¯kMöÅo2ÅÌ;èw&£>™´µµL³>2¸ƒ×¶5"€µþÝw)¨Gm­i.|þ”‡P6oÜSººÚÚ‹·K}ù$€Òc¿`ÞÖ¿| ä–¨¦¡ÂÏwêS–Å^=‘ rþådoþ_áæÛÁ¦¬± ;· 57è±SWÚ¨”’íðgÄÌþ É KhîãG(@™£³¡VÆèþ‚Ï7RG:qÏÌA²» vJžاÂ. ›”gr™˜lÍ«×éæ즨Ž®bä­Oö敶âaµÙBõ°h†'ÎeÃHN¶gì^^z]ž3*Çgh{!Öø³0ˆøuTkžrõ…½? Â/g)”°výi7T}¤ž~W_·ej"§™3o§E¥â0¢(ÑiwÆm>ôoÊt]ÿÖ©Í‹%ÈÕ‡„LÂÜè“ózìÇ Ý Æ:ßJâ2ÿœ ¶äÒÇœÜ# ?„ ²RéãÀ9Gô”È¿X{biMX›âö|74©ü©ó:ÃI”:=°*¦ôoÐ FQK®î‹Y‘Hw ?9mc+]>!/Ð+Ç¿ 僯Sè׃z¹6;×'Q8údQ¤"‘zô%92pý[Rƒ¨p KFƒ¶>!oÜïIçäçÓGD_˜s˜dúy`iñ8Y8F_yÀ¿(%ÒPD_ƒºݤùô\ [y:áÀÁWÏœÁ¿ å=üÓRÿuol1÷²÷ƒ$Ô×ýßgêèñæ#q+`ßkP÷ýÑþÌYÒ&³´Å9`À.C…êNØ€ú¨è/à‡žâ°[FLÔ+‰*“U¤0+_—X·%4 %©0,"¹½&Qïô C«dM8½ÀMs̱.E(ëFfê²joœ‰S&>œÍÉã«q‡åÎ,ê]tªã™µéÍåYT6Ã|ð@ÉÅÁ&^Ït÷ /¥µ0oîgävF*aÜ´Âäwe–šbD5˜J:xƳ9¥kæP¨Iу-1°^w3VWf‘\†/ù{G؃ûÝ0ÜŒ5R?Þ« RË©=¡êâ%šªÂ÷[[Ð,HšªsÕºjòÝèúFýùI½Ý3m›ÁŇgh©L™¾`q«¿X ÉÎu†0ÏÃÆ4«Ãr‘?¾ðØL¿Ìº-Ñ#1i|` ñèô™îœêØÌpF#)Åc­Io‰Ê““a³Œ¼E %¥ÓN.Ók$sÄ%X÷O%Þr58óœ‰vŠu§ç#v”˵šî¤4UÒ¢)öKÿÄ•‰2ðËÎŶ£\òü ¹†ö—TtÈ¡¬ý6ó']:—hsª MfÔþ²»Hä°dqGd MÊSË™™Ô~$n(?I½hÈ„˜6›W)žŽîÂh' 0&–ÿ-;›I´Þ®ž¼Ü§’˜°M{&6ª ?ƈÓ;¿SÒ¼wô0‘ö áúú´Ýs?rÍ›–¯ùŽ7:÷?ªY€-Û¥9àíRèšÙ§WÊÞ¨€˜ÑÛí:Ú~‚…;?ª®½èfLE|ïî¡-šö¡G¯ð ž~?'(Ä«"¹ $¶ ˜á.ñ[WÚSú—N“~ª˜¤ìåÂZfaJ*Z#ÜÜ"JE„5«¦ÖA•3ûà3|ú05¼%…Sºü hLÒ€‹@Hý(9N‚jXÄ*Át[E±ië#FºLWäÉJáNÚ_1v§#+ª¨‚5ˆX‚UÄúv/¢Úð«ÌßvéÐ*ƈ±¢æìšÆß’šÂè´åN)Ç5kcÄdóÒÂÅ¿ãùeS„{Ç¡¹ÒsdæçDæBÏ}pÙÇØ4Ú‘üÚg§Š=PàôEýä7:ñäÔããß0¼æî8dÛXDUPrŠíé]ÄšNÔ „ÁÍ%Œ6”ÞU´‰ôN"µ&m€ô²2±Ã¬*S“eïªÄ³«78ëø§¾&ö’]YºÛ:ÊÚ8öN±ë12X[#¾Kâ‹jUä¥Lle[%q+ÏÂ{kS±ëN#6¢´ 5 2ã²Òb+Ûx=­OÕJ­~ÖŒxS‡Ùy¶_Û7ŠÌ?*>y”Ãçmè·’Ã%âÝé°+\ xNNYªºyìªð6{}D¦Öñ¸kÞ†/9qQŸ#ž¼›ŽD^,žÔ«¯ÑV ôŸíÁ.íý/ÅžìŽ|˜á{{ûýãÇ3Þÿnooín%Þÿ>B7pßÞÿ~÷¿Q›çþ`3¼‚-a-¼*¨s7„ÍNîª'A2ЃÔðÙ†û¸r…­ï ÛŠ;;{ê¡:kU¦ŸC©í¥ž?LyK›x Œ®§ÑÃ×È‹=æÕ/|éï-^vŽ-ŸuccÈÈ«üÙ.nñ¯² ¶89sžïéx[Ú‡Ìù(X½ÉcÌ@AwÒJ?ïHêý=6Ï‚ç> ‹ž§= Vªé±û°‡ó&“䇀b÷’Ÿ4óo°~âDŒ¼wad<À°.9Þ.^$œNz”-‘¾¢)dïæ@ýóä'ñ«v}}]¼LÈ©šø3 7¦wÛe m)R ’y~>+O®çùBöÉ:€°°úÂΡOîh,Þtdµ' quõ û¬à_žŒ,Å.×ñ<Ò6G¿GÉÉŠíó^pžźYqÀ.îÿÉUOžyÇκP‹{ d,‹_ã-~äá K8xIÂÝOð£ ÝÈŒÿŒEŽåÉ­<c:?érI6å©ä«20>ýhu$<v< ñdwŠþ¯¤µç÷‡êÊë ÉeI0fŸ3¸ÈSÑøvF^§ú_t0âraìwè^zm‚¤ÖsΟŽ¹Ú*©µ z; idߦ’Bš¸ç“ãØy¢ýÓOÕ“Cç “Kb´nÈ.é hû²O–ƒ…B/¸,àJ쓵&…Ñwâõ÷›B½….`£MFÞþŸ·^øq|z‡y Œ¨…0ÊHþ漺+ÐøÃ8˜d•VµÙ*ˆ±ìë£Pny^Û8¯m™W|lË÷„¬¨ —dñÑ Ì ©mŽ+Z( çl„Û“K½_öö¨€yňj#ÖZì¸Î$kšuÉ©hj×à ¯ü‹±Ò«•Sfv“Eôú=É"â»ñh†’㘜S‰ù*>…µPezÆ“Õrò¥ŸJcâFNÙ»?#Þ”öÆ]ÛÎf¨(‹Dé•™b€_±’ÿ‘Á%¾f÷ mÕMfÍÌqFí«¼‰•Ë¬ÙŸöòd ½µ½x½BËBÐk›q´"û&^&ƒ×97¬Ð†iˆMa<,žÙÐñmΰJq Î…ï˜qƒxÿÄ ’ÖˆÔ3aåu-dãwîÊCõ«ç %òÀ·ƒsY6Ýþ&IÕE·_â«åñø¶MÐÂ\cUºŸýÿ½ÙÚ{´ÝÏ´‡á¼ $y‡’Ÿ£o\Ìè]RƶÎ8"ùRgŸ÷&’½KÙO{Óû—ÞcJ?†±ÃÉ\$çÔHÆ?1f3uÈR‚Ñb©CÔ85Að¨&ÍS7h#QØÏŠ6Yc˜2˜²§Ö™l Ç:¥fñùøPeÂñþöÎ{jMeÔ¶•óhËÎÙ±rv·cuÙYbYYú7ÄšN0à :ÕʬÀ¡uŸ:;í¯ýb!Â4Y|ÑͤÔ"\ûñGƒ&ãkØéÔ Ûzr“Í+SñD‘ÒZœœ1ß*ÝzL÷×Ðe1ðgû¯OËÀƒwŒ(ˆ†ºDþ˜EP AŠëÀúRªbêÀȤΠ *ßOu¨ UiþZ;M«¢›ùñǨà Õ©6 ÌîÚ†5œžÔyý¬\;šÓΆ5=Tef;DuÜt¤é1‡2œñ+Y ÂUYT¨OÂÈ (Ú=€4 `0 ’ Èj€‰ÛU´€Cå(FÝ’ó¥ `‡qÜv¶³‘0oÄ/öuG.Å©à9Ëh—³Ác.#« ÉÙ"ì: DIí ˜Ô‡ÛÛ?lïæ`k3?Šî·£#Eö¨1ò„ËÁÞˆ6‡5_zšÈCÖ ÀÂ*|ZûàÃß@'>•¬v2 ã=ÞYÅ1؇ û:Eÿ™Ð¯f4ük\ дãçˆÚèR3²V8¥´` ¡_éÅ þ  Àa^ aU¢< òöÔK-`” ©t½ôªc‰Abx»ÚšºD]q¹½,_·[¸kU¹ ™Aºhn0¯ ßÂsüŒÿa;¹/Õèlÿ¨ìÝJÄÿxô-þãWóÿx*±#{ñ}“Df_§*²×Òr¹Bî×ßÄ0é]þ áÒ»üy÷ú²CF£a1À€ì·=w€út_]iŸ6ªêÿ¬ïŸlãûïv¥|R?©¡}v«Üx^¸ï8] Ò•ÃZm$6cñâ¬"ÇåJƒ¼ˆ¬¿éïbåcê`[¿PXcÞ'à=æùþpx?¼t¸|Â(ܱ ËËùõ7¶·¨…šn$°:~Àöó/¤î»¼zƒ/Y?´‡°¨GÈO§%‚w¹d¢^gR—a-Ä,V³]{¶þF,QHûð.S2¾Ñ+™)ÊÀö·•ž—Ì»n°@€ËTg5^þê«8íi›–ÿ•wÂ'›±*:IJÚ ’²Ñdv:íkªŸã(YæxÆü¦Î­©ŒÓæÕ°æõ9Ü0ÈÄÓ2±N^áÄ­qv4T‘ygQƒ«áäfÆÞÌ|÷¿™äÖÄ´r}WßQ…þ8‰ízßC!o¯Y$àWÀ¨)€‰‰† õd†|¢OØév{ø®„ç¡*n9¤qDv¯(„.:÷ )nÍا Ë¼TòH[•PÒvõ¤ü…Ø»46Ûë yQ=:çëÑ@T±¤¬¿ØhöÒ»Ü;ûÄ­JT‹ôö-VŸÁÁºþæä°úôì9ÀÝÐÂãyða¨Ü©ÆŠÐ– ¨yö´ÙZ—)ÎE)èÙÙŠíVõøô¨Ü‚vڧ젉C¨ýCßüæ‚#Ϩ¡Ä Së'Þøió0‡-ÅHlù`NšGÕê©EœÞœ¡yˆžç ×ÙfŸüäßÎÒÖu\fZì– Tzý ÝEá̦v¡ÞnÖžŸ”švù =§@VK‹Ôd¸ÙûëÈ«ÚÉ£krãÂáÁ›_|J€.UªÀ¯Õ+¸À­F°‚ ~|¼I&h$d³Š!@!rÌhµ(ºŒÄUÀÖ—ùžsȽñaªéçUà)¨ psÇí§õúp¯±™xŒ:Þô"Dü„úà»êÂw®ÚÉR)ƒ^ù°¤QÇvc§wA.9žJÔPÈ{kD¡3`kõÏ{·|¯†ñà`H_cY]ܳ±qUyER–ǃqä$Öí £C»MœÊZ[ÙwJâ¡¥ôçõõ“Ývùe¹v„ôËîDm@qÚõh¬õŒZ/+›7?<ù.­H*OËJûår|M/„ùî¨?~'àè; XýèÎÇߎÐIe«ÚÀXhÕCâõÊj»úMgž§M§;è` 1uÜT/›BM½b2ŠüœÕ;;©äX©6›õ†5¼î‚“ºƒÖ51<˜31¸0ö(à7üÍZ¥™¾ ÇíúŸÇŠQFh'I¡"”té½Àc¥uÂéuâAÎêÍiõ¤U;;Þ¥ÇÈ©Óä5&}µ«²ý oÐñ²1\1è8 |ó·Ô,4ÛOÏjG­ÚI ÙDÑ¢n0ØV¹i}!º`ã2ú ª35Pààp óúÇŒ-òªZþµ}X?ƒ=H=«ŸA^­~’Fg£¨†ã+ê’Ùù¤ãÞeŽfD4Åê`8’Â?ÖQèG{ãcV"÷1µ¦32âÙ€á„uB«2æÚü¸£«E[8Ì9VÎi½Y{mB°òA{Dæ1ØÙ€LhɦB:d0d·¹¢ƒam͘‰*•0(°¡›²uÉËëiZһȫx=äá#õf-–‹wÞøA˜SÛkÕ~¡'åæ:o|v-MÇ\öÒÒmèùÔÜSnZÐ@UÊ{ddð»p9˜HZ÷ÒEâúž×ÔtÝ~M©jŒÎB¢jbd'ÕóÏͤ‡®'Y}wÜ–ĸNŒ{‰†mh¨XLëÞt·’*£ˆ…Ô‹EktqríÞÎüP5ßÃ)ÅÇ k “‹†_IéIÄ\KfáCÅ(pœ‘Ñ#$·Nj§ÑºhéËT…ÈCÐèŠI¬CÇH3vîÃcÔAÖH”Ö_”_F Ú‹ü\Ï%+ŸTìweªi±7ªaé<éÙúCHŒ-¾Nˆ9z1Ôf”’HK8<|ɺT[«;ìÌÍ/˜—^ʪw±>£óÑòÉ!tˆ“;éßåß¼y‡•hfíOùù)ãT*ø]©ÀOävñÿ…Ïw¬€®ŸµNÏZÎÿ…ûñðÔïÞãÕÈœøï»v%îv?yòíþçëÜÿ af„†„­Ç0öVíDT_©Jý°šW§GÕr³ª€¹R•ímUo`€Òí]âÔÉa¹q¨Ê­ú10”ôXÐIÕŸ¥«5•x±,Jˆqø¿6™'ÜÃ3Ö0D;ñ>ÙGÑ‹~—MÉÑZØj©í¼A wë–¡÷Õ9†ß.âó«ÍËÎf-òíb!”»ôÇW“ó"È]›þ‡¾ëoÆ]Ä×FUùà{×Òç¡Ûy½”5÷ýÅì&FX‚¤G~²µý$ñþwçÉãoüÿ×ÿ+ ¯ z³ZoådF*Åð€@Åvˆ»;Þ¶À,c˜þ,øqáÑVqëû™Ï‚·üñÇ•¢ÿ¿ÿ*øÿà£àoo‚ÿ½ß×aÃú$ ‘°¬u¢çÝÀæ‚…¬÷ü®ú)ÀºpbO~Çí‹ç#œÐØcÆl–µ½Ñ‹Zz°D¾§-F'»¶%¼v6BçÑÞ÷HFmóƒ[ãÛ1Ü•úˆµE©Ì¯nßVëÏäÙ­¡uo¸ z×*›ïÒ]ޔϛï§1è´¦Â4~,¡i$?ô˜A!…„™¨>ø£`@bâ‡èUÂzø°€tž‡p©#—ïx0“{ùèp1 <ôûÂøš…5ÉÆ:K/Ô‚óàå?ý©óoª"BNz% ¤Ä¥ˆR×æMì˜÷o4Ø"‚ 'AiP‰Ä‚ãþДmy}`Q`Ðå%¯Ñ3W˜šWzF'—ø畘qê4¼ÅB©~ý6ô @™U¼Ì¦^tK R­ýb!ÕBª6îjDJ<°Mƒ *=÷ø9P4¥!©Ñ£Hö|)Å:z~ì…îc¨{z·b½zÏR²˜¢…HNZ#xRàñàé fI>üàÇGl®²›YÕ¹rý€^#±ëaØ ¤Cô\ê’wÝè‘»µÕŧ«åÍtm;æÈô£82ý¸‰î}÷¢ÀèX%ºùdO]8¹¸ðoØÒ©!´HŸÌ_êäÁÜaý,†Ü8Û£Á„Y]¯Äüµù¶øæïEÉæföwî/9Þ z_£LÔOˆ–v`׎#qÔXúƒA‡™t cãOç"’ª‹Ôôû·z×å1‹4eJ6ÊAè‰3ö$ªÏ =mÅÓ^3æ 侢ÑŸ¬ö.w€ðòð­VfM dx¸Ï\D5ܲ,#E‡Óf„エ½ô"™ÃL éEÝ*óª;¹ÉÂô’Eä#+ª X½¢ãú7ml¯-í%‡@k›h³pøÀÙÐ?yH¬]ž@Ø’kΘWñ¨os¿ŒõªnçJ‘ë~“4Ù‹ (%«µâU¶(µÒ ÑÄ0OO¡‹ÿ˜@k°;—Äm…k(°‚RkLïã%—^æ1 yÄÈ$ÖT¶ë”$5R#™ë{F3"däý±[ÝL ,QŸ»ÿgäG:»¶ÈZ/¸öFï6JyÝË|FýŸ5!3«¾Y»çêÝFª²7äµ|)ŸMó)Ž¨˜Ä/œ“E=} <½0¦¨Ï8^V䶕ˆ¨£©ûÙY*1ð®i•­ìAo?ëdém‡¤©®](—çžž7€ÜÁ%A®¦·¢8˜OÑ,Ú–}Ⱦ ÁÑ~ùiå°úìù‹Úÿzt|R?ýŸF³uöòÕëßþס™ÛwÏ;P÷òÊÿÇû^ ÿ9 Ç“×7·8]àîÆá>Hßv?ùþ‡·7¼r÷×þ$ØŸÖþ$Ÿ¢wÔä™Tx–„¿RæP‰¼ÚÑŽˆ ¥è¥ð7yÍ´ ÂjÖ¨XÏ{ÝðÌý‘uðÈå@éùÆpr¾y²?Îÿ¡.~{‹iEŒÇ@9§AÑ‘E‡¡Ë¯‚&ÿ2õQ- ?¾ùûÛ·t|eñΦAû”ÝüÛǽðãÛâÛu:ÞæÖ>Oßncâ)Zƒ¿áÄûäDX-F¦Q¢‘+xæf±õv{á8ihøH•n‚.€utpfð€#»Ÿˆ-:—¾ÚW]7¼êÓOÐ$­o€—]¤Ò#ÒÓóß{ò—²ò$n"Û†×9ØΘ¡.ö?xËÑÇ'Kþ=Ùç|¬QYò¯B͈|{î_23qîòá98U?Ó( ~r¼\AÅ8 857ØBeƒzæ4òDÍ{ôÔÇ’ÍPu@æQ"ŠÉ»ðУ÷ÔÏRdòn_] -o/N£ã…ÞŽ ‹xE„ïFÜÑ%9ˆù.GÜÿ>$ÆüVÄšÁ…yÝÇ] Vƒš3‹V†VËiv.Zí ƒøu³Ô…»vcp{IQ¯'ûù© Ä·B&½«ýðC§Þ†s» …üŽßÎpHØp½ ¬€§X`Lh‹Tý¿éÈ Àd3²œƒ`%«‚v\f%…L‰}$ÒkwÔ% v.À/n#dBÞÕ 3‹›-Ìc¨…üfþ2kÍÕëÙK…ãÿ~™ è|ÿŸ5ôÎ÷³}ÓëXí==V•ÍÊwß©Šl‡KlÞô*¼ÕXúŒ/0ÒFÌ–-éÛ;埸ý¡n“|áøYÊƃ=Ó+C ëQïð…Í#e®8B»I#gͺwG5*< «_#óûF©ßÜÛ¿0©)ñ1ƒ4xò¸-ƒnwÍ%Ž! {æøþ#*JÔ íB”„háEX(¨q†31ž €þônó¤n|Ú4S$Ú_ê0ÛX—ÞÌãc¨J^ÁH6e õËuÍà¿`tË°5@xS";Dö†y¤·È_h€r&TÚe²ìõzújhä|:h š,UÍGGÁ-!:¡žhÚ8¸>wdœÁ`ù²TL}‘6|z½VÛ[Å-Â|àY³t)¹L‰Ô´„ì…hr•z:Ò¾Æâä ¼èòVW ÙhëÚx“ {‘‘ÊÂÿ2kƒÞ”^L6ÚG{¾}‹ gúÚüûÚf7+ÙŠBÖ>~d-Ùf‰²§a¬mª€ø9A>ÒÉòWÃ\$Ï?$+ÔlŒµgÎd”Ñ»À1ŒCm}WcË Ds&/qjcÜýÚzNüÌ(«%ºç•é¹‡ÔŸu²Æ¬Ëá£qq K,D1RñÂK?g‘çÌšðìIŸ'Bì3Híá`›Ýü,Å¡°žRlj戒…³a¡:çëùnÚ¶¤m#‚È+†ö|<wn_ÔÎ;lèQÏÂÚñæ!%Þ³¬¥Öm*:FªÇÖxtË|"&ÄdÌæ {D4põéTÒ–ºdTXkÔ^S Û›ñ™&PPÖ‘:}¦`î€.ko ¼Y–m¨Öw·~|¢eŠ‡ üIqÈ«¶ÜAª!©5ÑFj4òú€c$eá8©å=‚c¦:ÈW!=“RÂ2g–@>ÊjÒE³O³'Õ­CÁ²N} ‘ ¨=JšL„›‹1¢¡ºY«"ÀgØØÊÏSËL¸ðsÊê[Ì^V˜ žÐ\SÁÀñŽ7íøú‚#ÓD®dq*Éþ/TþÏ#‡ ôü‡ÓC׿Ɇ±BË€´•4-&šá”ÜCõ™‹šh–¤6À7ä‘eÑc Ãöø=zK,WÛDØþ6º»6²6‰ý2|>u$«/’²2g<c±²ñô­Ûž¾3ÜݦFWä ¥ÓCõRL·žðÄoí¡Çç@'i„9¶îÂöA2¢{e;g‰(B·í}¼ä§Ëêâ$‘·³ŸžþˆêP¬èM»„È0¨C³±éÆfæ=šÊ“SñóÀíLìs'þù(ý| ’emB,W‚*Š§Ô½“ ðHé3ëZöÚ¸#Ô~¨õ–?¸…§wZŽ-· ÿäŸWÏ_só–Öæ„[Å‹;OгÚëãj‰ßþèl¾Wa#Ç.šÇC:\}ÏÒ{¼6!Ÿù|ûkÞxZ:#sùGY¨á+Q>üHù9æGèêßÒØ ôÆgø5±S¼FÏ|D¯ë͵QÚ!Ùñ!pÔæäƒçm$ïU²o³yv=€÷Ô¥YºKGEw:ñÏ+þŒõ‰Å8ÛGâ0Ø ùl·Ÿ%…øÉ%QhÊ)F«Ä/Œ8oC2þdgqš<3C(»õèÇÝŽ{ñ=ÁÉT1I á "dH_¡YÌi]æ×Ò;ˆà Ønh¶A.B×t98éYFƒW^dÈÂ& Œ ÆVï}zv‘w©¦.n”>žôã4Ç0¥)º÷Aý–…mÁ&IbÕ½óp\•¥î—²$!ßæ—µ† Ž´éRo×}ÉÁ¿o×>¾Ý.}.ÒÌcBDïAZ}Ã/°‘±wã7™ôÚ§O¯ècý.ƒL…²kcy>3°ü~Ö#G3È“ÇÆ£°{ͽ-õÁ൮6W–SÏr|yiHÞt¤`Ðìí—™þé ûîà–%kÑ’ûk±ðád$âAò.…4™¨Wítt˜¢3¼ÔÄ÷Æ݃ülh)¨-âr÷_}ŠœHìŠh.ðŽŸ°“\&_›è 9dJà›«È,I„e°ÉÔ™;w¢8°{Å 3ôå:\kõ“>Í«–1'5e¼7ðÍ ;·Lã²ØWÍq?T8!¤áà¥5¦@†R%²`ª]9Ú’È¢æ½ ÄmÌ~@€–f‚*‹IŽ'Òákcž"")–Õ‘ˆ¶f×øIå‹Ó'D0žO8겨ÇîÊeÏ ®‹7A1…+—˜-«°a]v@ùŒ½Áþƒ®Àè<”d•mcë¬IU]Õó8˜Ü•a]ê;в yÆ1kƒAnÄûVÒPò²3U"ÔBÃŒ^ÏëqßByrå×2á…¸ËÛˆÌá“É!Yò -äÒp,²Dº­8eN øM. ðÉ’Y4‡¾á¥?MÎsðQlb2È*mê=êcäÐ욀ÎZößx:ªmµ£¶a¬…RþŸQîoomᙸ¿¦SàË»ãÇÂîàˆúï)Ö9J®Ñ3cô@Oι<ñlû” ft2jççM`·6Œ-mN\#jå¡Ûï9‹ ó^û&Ѽ63G:i0‹5Uç%ê‡$kÎÔbñ-HrˆúfgH>‘\ÛRDº g¢ëMõɘK‚píóå‹1† ‰ Æ3h4ú—&Æ Œ5å…®=g&ðFr!hÐ ­®„#ßÿï1¨°ÚþÝÑNH<Ù•Y1ìߺƒ6‰—l>y‘ƒ‰èe2¹¬dîOy"Ví!!ïw(®v÷èÚ†S×ñnÄ ±pJòI7«{Ó#†îc—H:ˆ ²vX¢ã³ø o Ù¯æ¹pRÇÆ ÛxŽW7ÒAb~²Kø½@3zà1‡/Jp9_ZÔMUéØz¢n\OÄ“¼XWÔ£+²@p+é„–Q qÁÏW­®÷Yâ ÀRÆðs鉱Ý.‰¤ícÆ»µ—Ýɯý™ˆÕ¨€~¨ÍÍédõö-jΧ3PožLÆ>eH­wÓ®O/©Ïp#E¤©Åû*¡¨>dà ¾˜z²ìÒ“<ÁÏò€àdÑ<êUQ Û™ªèfZÎ* "¼ýËZ³²l6^9þ'Åí<©÷ܪ È—OŠ;…Ç[»HúDA´Ä•hC)í UK¾ÌFð{MÔбpçW$ jß!è¼¼îÝèËræ¡ñ]øà­ÊcMICóÀt'òo¢ý黲ëÀ†mQ;6/IJ“„GŽ@‘&‹/ê"u“ž<ÒÝ‹L%Æ!ˆôBS]B1êÜӎʸ¼Y’3Qëƒ (gJ¿-³|ŽÌ¤ê—:ô8q,&$$á]'^à2˜˜ s× >Áò“:RKfÈÔ¡^•úÈ­¹ô˜ ò„ AØêçuì«ùóÐ2q}¼ð ‘ªˆ&ï½k?ôŠ ï(ºÆ%åô¾I^_ÞÇ™”~Ñu$ÿïß`1Aq>ùp] „@VDxÕ÷„úeò‚›2_ÒîöÔuß)†û´ÒvŠ½æñ’‰R‘ÁÞšC§ê,åù%ð¢øÚ7ûw¶ïæç’8X¶¤²SuÿÌüXizÆ·¿šá'9Æ,#?Š‹HoøæÖ~?€ë*Ï„¹ Þ¾–E~Ⱥ&"Q#¾ø°¬¶ÜNgÂ>Cò¥Ÿ¡Úþ˘»F¿ãçTB`2«´Íãq,Ög/³ú6Ëc·¤ñôøïÔÑHÜ­‘hãš³Õˆ8vãF©cR®*À¡ìlÎ@ ­ÏßTÈu…››o·7éÇÛ·›ø”b‰òÐfé£Z3-PJCÞÂDËkØÐv¨£  Tg¨Ù >zÌdßnl!£(÷˜´Κ4]Ü0ű ÏuÃS|Ù”)ê¾ðòOôê°8#÷’n ô5GZ_zQdPf®$iÂü‡ÛH<È62ÇhEì~X0ÖŽP‘¦ƒv¢ˆ÷)–#'aÝ9yðP%â‡}y¤’„@qŠŽc½ÊâÔô ãü®Âl—ÈÁ6b£©ˆSÞÀ” VäóÍ»’$ý²‘ÆqFÄ%7‹·¼—î¨K.aÊ ¹–üøѸXn RxÂMùH!Ǿœ*Ìcp9 §Ÿ‚Å@ðܾÄÜŠ}ynMæRÈœEQ\ â÷zÿ ‡Ýy­¢.;Q.ÊzŸ Ÿ;f“:)ªÉÝ ° V&³#j.FåN>’‹®ÃNIŽ\Eý 8Á`ì&±;yÈIð4í=ÜøX¨Í'¡ÒAÝ؃è&†Hl Øi«™&ò…ºìèö‹×Õ’£…‡…ÌG´ÇÃVDî(d—s¤gŠîwYê- )ÍY3`M\Á¡Ü*GFb¼öa@ŽŸÚì-gʉv'@ªÈÍ"z­ NnÖµ?1x*¿%+DCþ‡!”6€C¾Hªð2³n +€L‡'ÏéMGä¥À¾&' #þÔƒ J”ÞØ\z7ò0ZŸÈyòáâ«1f@Œ³Å,R8ñúÈÏD7HèÙçíº–º6JosßnÌ| j/–e_êi;¿ÓÍΠô±ãàk’ÿøWñœtHn;ÃῈ¯ýÆÅþ›q±¬v«Æñl ÈøP½Ù*üøŽþÚPt‡’Aw(|UX*)’’KìI¿P„êtï½!—kék¥Rv96q N*'™(“¦Žà]‰wÂjssîpÖèÇÊŒ˜åÑâÛþ[´ÿm³Ëòy-SxÞÏ|ÌlÒß…ç>ýÆ¿ ÿ[Ãßðw.²•‰mÆ(Ù›üJîçù;z)XqDïcË0ÊøOB]ׂÝH{ñí6îÃj³ûÚ…3~t¶ýUýõí[õ×K}ŠIu.¦˜Ã~¦jÙ¸ÐRÛz™Fßn¿-¥µ5_ ÷ÿ€£ç(Ñëh,ÇtB`žé³Áû:#щ#W0qa–WNJÙ¢Huèk-rFV‚$¬[b“èËA é‚O×ïÄ•Ô¤yÜ^I­»Ýná ¦Fe‰òÈ›&„*‹&q1úCôü}è¹R XϘíL¼ÛYC©¿–n ÝÚéã_Ý"üõ"Q’~þs…ÏZ•D®‡ë3âóªðÍUþ7ÿÿÅÝM‰2R¯¾†ÿÿG»w%üÿ?z´µûÍÿÿ×ñÿ¹ÿ—uWó˸'Ï 5'#Ï®;véº/Í×ÿöNaçqqç‘åëŸoåØyøX»|½½Ýx¬Öûþxs2ö{›H#_1¼ÊiÛ¼kô!þñõ3dGĵ~Ó‘à< È`û¾½t¼ªŽ =EVB3iQ v> £áOúT柰 Tx#ïüV]¢Ï|´Áà 8üªüR¼ñn1\ú Îѧ ˜Ô gNK?€#g‡AÇgϸAgÅbá‹RzGŸÑ29l†Â7¸=­Î4á´£+\OÞº¸ÔÙ= éëŠn 狦!sË<õ6/Ñà_'±ò–›û<>äèi?øtÏJ~L4ô£'^º‡ü˜ pbÇ2UÔòõ•hÌhЫŠº˜Œ‚J€øP«¢›‹—hµÅÇ䎄»;ç×úz±AÀÁ‡ì± Mô£%–¬ðÊåØ rcMºÑ‡t‡­GE¾EQuH.P<²U@zŒg­UÕ¬?k½*7ª £â5ê/k‡ÕC•)7á;“7QtÄ  ‡~­æUõõic0Ôèbúøô¨V…ÔÚIåèì°vò\=…š'õ–:ª×Z¶U§&X­ÚDp‰Øè\sQlèÂ!>©Â ;í° }4™Ø[B,¬NÒ=?Èž>>Ò'‹BOŒ®>#É™§ê™E’Eùjž‹Žq->¡Y€â!êaÉá.È`‡õZ C2à¨3(×dØŒ Çä+ÇéþxíO]¾ð‰RÚ(¡cø]*ày¯>ï#÷< z–IJâ¨%(µkÇdg¥)\ ŠÝ{½A\K¸CÛ„ÎÕ埤]B³•Ï§ÔJý™pz˜Ìãú¡dB*f‚¸f2ë¯N$R!³o€ È>4©’iôK’=¬5(‡R!óƒÎyÉÉ>9£¾¤5Ž)mÔÿäpPNn¶5O©0…à ôoÚrŸýM‡d G‚&Eˆ—}rçCJ&äe~:ýî>OþZ3ÓÂs@¹ý”Åý….âWf»Š÷+ÜC*ê„£Î¾Ó Çûë° L}ñ¸v0hó>•8×~Øæ;ô¶Û6ïI÷aX!`ö­ãL0@Ê~æ­Ž”²¶¥ÞÔO)6=>Í|Sh½SÍF£B«Ãf ÿE¥O0š**¥šøÖ¢ZRýÛŒ²…qTÄ®8«xׯq9§Æ4göJÉ̳˜žÂÖ‘ÎuÉY «G£®ÆM¬Û¦ºG¦Î.”Ð v§>.ƒµÌUF§„ú~»òÙY;Þݘèè&ðLTV' ?«8Æ éØÊìu²öõèjºP±s4M"­ììèEß:ºôF¼èê 9zfîüŽ0~Ÿ”,…® Tn™‹iº…ùÚŽ.Ó —êy£~vÊõ× …Hl:B¨ Uê+ Ue*ÉI«„©N€Gv#ª#%­¤:¡=¸5³ï“u¨¬Ÿfvé2ÎÂ(ײarŒUXAŽÆ !XÈ×uvˆÖÔ¨@tŽt ‰e®Ýù²B« UU†„*¡˜Ši¤24Q1 „úLø”!t@öÓ؇ښ•܉È.èxuoôD¦ÁA'!&»K]ˆ2ÅÒ/¡š&Œ CÖv:gSƒöVNkU‰^eöô)ÕÏMÞ_Û1`¸÷l2°®…6²*»¡>ª ÖÑÊO8‹éWvƒ3³¿È¿o²–²<þÂÓ|p{~W4†k¬tÔ;MqŽVµgÁÄôXœ92ZÏž0§Ìùá´ÉG]O? øÎÆÒ§‰5ÀEŒ M-Œƒ·‚ Äsä¹&±£(˜sXÖÄRðøjp–ßì¿]›ûË»œé@qS_næZ¹$t„LBk >m%C9M£V!—¸÷ ëy“½‘KÁ¶<œØŽ#„Aã€Z3£ã¶øZô!;C»n¤Ÿ[Ü[ ¹ÆY"4.É‹Nž}h–¾ÐEÞ}o®â:ZÞy{æÉ"™} —‹KvËŒ.ƺÓ|¸þ!È–Žž¸ÅsyÁ2©ªÅ’/ò§Å!ºÑÜU¹X'ŠM+ÓŸKÛ.é5Õ2ËÙ’û:Ý«‡=l€³'Æ»ybØ×µ..ÓùQ•}þ™HLE Î8‚Ãd㯛hºn-ãoÙíÂç·YU]Ëwùè`6®Úý0 É(áÅ Ék©ÞÒ-½U:ТɣO aFÁµqèšD­H½#ÔgÞü‹M—Îзÿ†¾è„Ï¥.3(˲Tž»L¢”÷OëYG< Nr؈>@éä’ÕhÙÓñ˜=ReCUÿ•° 11k‰Èt5#¼ÇÃ\é äq2ï!# ÛÞÖ- 6÷k[±á¦ÊžŒK豉ï“YK¥µxÏç‰51È_Ø D*JF“§óKª&nmR)5‡2‹ ’> nÐÆzûÙu¦ñ#oœÓô~g³øØßÞùqúÃU2Ô–•ùhËÎ܉gînÇj>Jä>Šå>f»TLúnøž"4ðà£ÀoèeBGw ‚½¼D§ø?‡ñÁD–ÏÕ϶B~úHÑ"É…™g`,‰u9ºè¤ñK@¦à¨éc‰ífœÂáõdwØ•a›z 3òHÛ€økeìì˜ãîÍVáûwš#‰-•æaâx¡Ô¤=ìMÂöèz_¯{ä×ÄÎÍþUílme%GˆŠ:ÁÞA²ëYõý÷ß«‚ ó¯j{kkKesYµf`ýž4‘¸×Žæ'ß®gv“ºu%b ·ÉõÞ¨ãtÙmÆçÐM^jfXû8½D=ÐJø'êÂÔi?MQ3•ô9‚­ÇˆBŒÏþÝÆWq“ßãÑÌ þ½rÉ[¡¼&öÅùxêXá€W1Ç„ ŒûÃŒ–œ´“Rÿó‹ØÄ¡ %0£¹†Ò/¼ÈŽüÜ5Ž/¸¥u¾E€(m梃‰b’¢©Ô‹\àUÄ´YÛ1î7Èzc!t¦vÁ¥x•Ã’v\M[Yi­×ªv1ÅûDÄ;OŽ÷ÅÜ7:y÷ÄŸ3ÚšDóÛ &¨zÕOÃ2¢‰O¬Fªø#S±™‡Ëñ<ã,²†’ÆÑ'wtù£ƒäÍßMS^úßcµôfØJ:r ¿Ã_R­+§ï¯Ô™d2ø¦œµœmddEwh³1(hRg¿xerbéJ#FL‡~–÷Ý|šQpº¾×õE¿¤]ÈQ†ÓÏ?VPE[œdÑ‚¥ß‘cm&I³NY¢Òö?~_ØÞ*ìüU•þù=!¢jò^\ã³8&ªÎ=E·ðfçÑ“ïßñß9%SÊ´þ±¤Y¥Š¶vÞá@~‹ÉßñúÑ9ª›²OSþc—‡X<ŽïÔÎNÒ6AÎ¥sþÞÝ‚‚&mgk~ ¬++ü{l¤is‘¿ ×IñÞZáWÈîºFK×jÞµœZ_ÌÖŽ †x™êfÝ"ikäaÔpQ¢¢‹N8{šIßTèÓ™Á>öc%Mª&ÓäYź_àMÇÇ,Üx³½óè1"® kPoâ+}Ú‰…!Jo°Ã¾»¾QçhÝÐÉ+Á§^ y»J^ƒMï4<Ö¹§S¶¶rDŠ1h lˆå¡ñ"Ë?[ÇPs>¡iÇZ£|rX?.¬­ÅË#/E^zí—=ã ¡lv3æwÂ;_Äç£é_L}~¡ûocÒIG8l†¸f.žty"\0Ó…‚Ý‘œ²l`w~þÛv|qœš>¸ûPêšòë#äÔx7áVKx=^²B¿˜^ÿÅiߪlw§¨£hÔéì¹icXPÁ(±˜”,Èu" ¢ÖÐûu5ÏX¨Ày>£_Çž·§»¢¯Þˆ¢8ñ¶›Ô©?½°Ýë¶Å~ï…ªÐëFò{ZÞzvÅø´þt?…_F `.—.¼ß¿ßÚŠ!ýt­BZ­ÇgÕ‚ÂD"Òó‘x¦a,ÞuDø ä*Þ`k‰3ý3½}{BÚÛKÎ¥2öúVmä½â)ííLZíOÎÂ$ pb“ÑR¢€áÉÌ5Íl‚WÜÇI¹vÈižãÒó.0ìÙ:¯Fèµp^¸ ¸ŠbjG@βˆHqþ*Ø´Ë™3&†@Ò©­ànYòcŒ,÷zœ3šI׌¡Á" g@™ØÓ:•"–Öò“*̹šñ»~gÒ &!rôƒ–è²$6"xyoÛÆÚi§¾ÝV݉ÇîGUƨĊJ3¢:ò yg0dJ‡¸Ä^yŽ½!.-þ›g‹u-‘ŽÈa;Ú~xê2(ê1d‚rlÂæPVûÙͬµ^o "y[Š±xS s¢t›a Юd þ’oüÜ´Ô·…‹)]®t1å1 –ùî‚´†àuS:×¾NÀ¹èϬNlç¿tÀýþQÍ<û Ôÿ»ÖæÄÂpî4#õdƦEAÝB÷½éSw]k^æü+c~Îv²d“„xJ¼øÖƒ‚t“7‰n%aQz‰cmjRÌ *›½˜¢]"¢Q•éÓlãm0쟲úå°i@^ÉnÖ¾•?Ùìæeæ÷©£È‚"ÕEbWx±%ÔíyáE€dmŠl>ëg¼µMÛ?°“ÂÓë6’¸ô¹K³ˆÄ·"*óÖ¤·6*™nå`9´ÕÌJYí4ïÜã: Kâ_$äüiq¡ú:š¦Þ+“f´.ŸôPã5ùš?^“ÓfÖÄ'[S£1 Z0÷™ŠfËn˜Í­â sš(~£æíé´í¶'p„“§×Æìç´'‰`ˆ&˜q”•FßÓFL*®­µÅ?X,oÔ§T sÔû£³> ;¾ B/j.è"s¢¤($áDÿ‰fdô¨Ñ´ôÃðq?aÆ}-¶GN^»µ¢ÚDQ´¯¢Ü4@2¨ÛrÉØØòË¢•‰¢•áûO6ødk%(:ñ»$°rFZFabQÀ†å¨“çK¿¾ z%bp‰öÊ:Ž7;œ&É–Ôˆl¦#V¤6Ð<;«ŽÒEž9êó– òfUrN”iM«]#Ò&Ô÷0ÆH’/ ´ùøÚòa7h”¢Õ%@Á\@U×8‹¢šyÖÂwþæ@Îfá~ í5®zÓ™u¥zý^|lž}‹Ö¯ñœL[£ ÚX¤!³»cß—s»÷°tŒ5|ñÂ4î‹"š°k÷!qûB[EtÇìe$Vð½¹wS2¯úÄò—?”Iw^&üú9›ÎÂàpƒoÇ£áø4 Ï4±éŠÆììY®göqv]&ÕƒoÄÎÐâŒßi¤5¨HÀ€¢}?í77¦½[2ð¨\@*øN1-ŸÎnçæ¬V‘buv˯•YMú[ºŒ¾€ÁWÕ—¸ô9Y_H’ÙEªÓ '6§þ—ôù¨¾—:kl3ð%¥¸d®jX©zG÷ñ*¨w"zcöFD£‰ÛJžÈ\§¸:!«.<1z Zèwå9&«§åW-ÙØ¢¯Ø@y1TrTàJ°Ði´ÙØÚú½¶¶^QÿÏÚÿZ˜áøO3}öl{ýïxú$aÿ»ýÃÚþ÷¿Åþ7T£mÝ·ûÎKŸ”ž|ÏB­Åí¡XÙgáºt©6´EÕm:Áw&h/ÐE•¼x¶?>/Y;a]THÅ\Æ6–6¤ …KzHÙæõÞq†œFˆd“Te± K4}¤k´†Í:m 1#W‚ô¼™q)(v¡l®Fû“¾kƒñŒÎÙm9ÖÓàºÅ4ÂyÄ`›?øØaEðSi¬?ÑJÒX€nÙ'¢?Îéa&2—•±õ>TMÕ‰ƒ²YÇ¡6mï-”i?³ûÄF{vŸh$–°ü„ÆEÆqÀÁ0³w¶ZÁf¶¬Qлîv‡³îåø¶Ks¦ß³S_I2ŸÛÀÜŸ…¼¼CÎ×É|‰A‘ÁHEH–îËVç8–…Lçø¹Ñîì·š…¼Ó¦Ä“öî~{ -üuºâ¿÷ÔHz¿B~ºØã]q)X#T>TË}íN+ÞãØ››óÑdÂƬ®ø2âÖ@áŠö˜V«<›¸ÏŠVµÔ*Ÿ¬KÞ©ô,QÕ4Œ6:÷^Pèª7Ãüµñ„ã³Þx@µEW«³Z.‡þ⠾שšaÏmÄæDÁëó$•] ƒt¨¥¯{róôôÍixšÁCr׆³YíôT7*VÔÛé ôæE˜ÿ·Ùé}ß9â~wÚCÎ\îl†ÿ¿Á?!þ"Ë|Ú)9\WñdRß §]|PÈunŸ»ô¼,ôe¸Á•þbæÛè2¥jÍêŠ<)mærå2”LÙî¥LXÀI/_äüæ҉ʩS·ƒtS1ö“E×{±ÚšCùª)ÀŽƒ”bG ¶yGw–6‡îøâæ~!Þêü>¬=W:êrY Û©Y|²­$Nk)ÙVÙVœì(‰3ZJv”Fv¤Éßô»×¨?¹ˆÈ›/Lv³jáärÞò†ú˜µJ>ÐÄ–$AÅoɬ\<'§ëß|~Ð ¯˜Ú¸* |Ë*‘wƒÁôr‚ûïw+Й¾»DE¼:«¶„ å訾óS}¾G€a3’‹Æð@à58L¦ã¦Â‘¨Æà Ÿ÷ag?„5X¨_~í¼4_G¥ûÜ&t; ø”Ö[í¸ž÷ÙávgWÝÝúq]*k`´ï,^‡Ï¶·5&Úåµë‡)È«³ÓÞ?:NCÚovŽëÝ—ún£M„•(0{Ç3ºHÅ4‘_ºÚÅ}b!h¶Ú‡õƒ®dÔJpÔnøqøR{ÉsÒŒçŠA0Ÿ¢ÇH»¸¸Ð#Ȉ‚+|^D12­œ!QÀÏæ¤ÔwZ;P›Ãmjç|2í²S(÷ÎñÌeTºÞ¦Ñ•h÷z»KïüÆѯ·Ëân¤™dòܼ9 )©³ÛËÞÍâ̲u]ù?ÍH*+–—zçìê·ÑÜÙot \†ë¾B°»¶Ó:†®€0¼çsѨÿ~¨bWókMøÙU®QÀ5…Ÿ´üXy*C¬hžö/Òñ§³ì$ÞKŽ®5•à—ã‡<±>´«ÃÁ˜ öÆ(`t­QéÅÄß´ÁÜ89žƒ_´-à,m'iïÆ“»fËêÛ Ä­ ÝGÚœ8v¡¢öT<ÏÈi¯ÿ]¼ØœBU˜Q’8i. _uÎÚïJðßeþmÕ§‚Œ›1uµvl5-ÑÜÔí)î~ÏåTÁå»;µ«¡\€®÷ƒT,˼üY5t±då ¨5SQÃ4¯{!ÏöcŽ'ôè S3Ý@[¥•º¢üæ·Ò¨ÿééæÝoôÂÒ¿—¡g¤…(î’¦¼G•H;#×#U~·úνÐy—èMIXæ’lH¡úp™¡Wî©ó=ÆJïªÙ|XK›§åòw3 ÀÿeØšln„ô8Ô›ßË¿ÁfŸÎ 1ø`ÿòS!Ì?oìí7aGÊo²¥ìox3˜ ï-,—{Š0É"ÏÍ=1Õ¡= ¢iµÓ‚Û i ÙŸn)’ÕÐdGC¯\ªË½¡ëý¶ÁÊrŒ[ª3T!ø[xŸ§AÑCb:2ŸË}׬.ÿ3+ŸŽË!Ì5ù¥ˆTœå1]ª =›)Ëá‹ÛUÑ]xŽ0¬wý;sQ.v^9ïýs¹ÐJo °jû‰(ɇrvXm|K³Ñe- ë‡d YïG„¯~Aż’Ånüïõâ –ân£sŒçh°W°›³¶1Odé…’»áI•òÆ,ÆFm^Ù¢¸. :îÓ{ €Ñ'ºuÔŸ\?ž¡]¯yóRᡉ?9m»)Æ’¨é6&c3™`¹„PH$x55ÉH•žäKÒ. P“&]p®~ÅU¶Vñxl‡þ¢hA"5™4fqmàŸ"Þ¯RGà×—ÚÐËAŸ§2Ʋl‡A¤ "e–,1v°ß9ÂË·6Y‡´ö&xË‚sѼþÚ§ótCçÞòÀ÷Uz7}6úÃ3o¼Žæå=è™7´×ádŒ®ó̉|ÿ½¡Qº{F{AvHON!7Ç“ù¦>Œ—eúÇíðâ_OPÓ˜%âH¶ˆþ¤Ñé3¦{9”â=90¨ÇÈ €*¬'‹YòF“Z0¬kˆŒ‹hÆ5¤5…ó(“Ù'öLçñ+'dÃFU×jx#Þ»ùd4°ã¥ËÒ–8¼ö_I±7ù³+z̧w÷VŠµ7®äõFù‡’Ýÿ¬ì^é¥Îìþn< >Ïì lC-ÏU'ãY;¦sƒjo±°aì‹xêo Šþa(Âô sÔ 6”`Î\åKÊ•ð¿ð6hÐÒ¨…ƒ‰s¬³Ó:j`”–Hü'Ïñú“0oÜü’Û•¯°•[9ŸàÖOŽ_¶ ‚P÷×èïòîÒÓÁäÒ¼Ç`vµ—·hÞe¶¸·gÚëâhN!èÆl|I]`v¨ÀÔÕþÛD5oh¼B¡™ÂWÇí:õQ!0ìIÈñY¡˜Û0×36TãH¸ ¼ÕeTºw£„_O‹Ÿõï“ÐöB§†Åù'd†ø-Å‹³°øôñãöA¢nxûèCøå>ÌW݃!òQ¼¹ðI™dúÏFƒÁ4ü~®ýŒÒÌ­àD¥†Ñ ¹‰Ö&¯Á¦#ðõé÷hfÊ)ko§úr0£Õvƒ+p¶õ;¾PÆ·Ê%#:4tLX„SÞÜÒ‰¨tI‰ `Z* g·sƒXÞ4‚§AP¾ÃH›Œ'YµÌ¹žv/BÉJìÑ×4ÆÜrhËí§ =!H²Þ¨§¡!Vúï©W…ÇÉ*`³oËœþÔ“ ¸û—g—Nrmð®µlGøÕxú`O¤5ó)«úI›MinJ98/übbÕ2Пå”.1,Xuéš²ªÚiGw!œ Í ]Kw‡ëí¼LÛ˜{×Û;/AŠêx|¥’Séòsröùi°÷ëþQ·Ñüð‹Å3(‡É8!Œ¤§³ÏÃéS^Bœeâ$RÑ6Ä|‰•„ý\óAY€?§Ë3r!°,i~?-•ïðÜM å;ÜÍØ7¬ñÀòbBŸ|×<—ü§ßW¨¯üâ™#T¡g‚Œ»“µFûy«ƒº”œ„6gÅ|'Ç-<Á¤¸„jOT#ã¼°5pÖH±Ž¿ü;;ÜÙÁP½Ãáz‡c»#r-)@‰rß/K EîåpøÙ`QôèˆÂ.]Â}½G‡³¿ØD¢º‡0ñ_Œ¡Å3Ç1ƒƒãV‹z_‚ë¼><9Þg „zrxô|¿I@FAcçe«K=Â!4-Äà[È1@öÚ j þªŸuP( ^ŒŒa¢s9‘-ÌÜ{E:îRÝ]W9{Óù…î,Óhy Qp°‹‰»²C&A€í?o=ÿÃ8H0à˜ "ì¨Å€£Äš]Ƈ!v¬i;ª M½ît!Þ®·_wzM 8 ëûMj<0þS…/q¡Íý d`R?éè ”î" FA“ºªyˆ¡Æîþ1Ç0POœS’ ÁdVp ¦´—Bÿ<Û¶gÛQ r Â쪺ÏOpþ Gw—ꀯY?Ô(îRqAVé qÀ²â$äpNÚ:¢.MX. ÄÑ7¿Œ¢!€±O\ƒ’8íz†AŠ‚Nƒ&'üƒaÖ½b€ÑÃê¼lð£ÄqrSQpü² \˜†ÌYÕ[÷ÞÙÌ^]a‚Žs*oKLšÕÿ‚°¾ö2éæ°|çÝóy—¿&l Ì×MØ@Ïó¢“Æz”ꢜ_@|£ÛŸÌMº1ηèe_R)É‘ÉB0’Ó¥HœÁ÷”[Ê¡ˆ¯µÕu6_s÷FÃÞÌB9jÒΧ·.">Q&ûý`ܟܸŽKª©‹§XIa7“É\Á% i3rÈû¡P( pWÕ»R¼ÌsQ¾¼w—öt•o›îb’" 7aNòÄ`ºF«(¤Í¯GR9 F§(¹¦˜Ä` FJ½‚Á&V‘$âAœêHäb‚×ì¦H8^7{ihÆ ŠØÁ}wJ FÁæ5ÊDÁ´! ˆ3.é*Œ‘–9f†èŒhÎÜTŸ™¹ÎGOº>$ '0`öi†‡jcFÅC«v^fé¸M•Yäb6e¢3M\7›<@Xn¦¦w¦°¤ >ôùŸæ}¼Ó.ofµVê‡FB)î‡×Û>]÷šlBà¢/V5Ôáû¬¸ÖAâ Õ¡ä ¿2‡Òu?pgAxG~‹^‰ñœ)2ÿÎ<J“/ö_5:`§EH¹€ÝÞUŪ„™¨¤¶UD‚ÿí.JèÝãöI#Z —¦jŸy:ð}Ýrd‘‘ûá|j¦<_¶fD`¤‹šQžãòx9c+Bv²fãR€­&:^Žéø$¿ y8æÊkÞÇŠˆRåÍ8Õ¿ŒÙ5gtåÔyãâ‚LrMucÙ©Àå4¨,8>kÑxº90T2&?ºØôPÜ0H;s$$Â’OËõû" Ó… ’¶ël5¹óÒÉ “eî4y—sÖ½î}:\ þ$‚\a¾­–vde¡Ž–Qɹ~|ÒñÕÁpôÔ ×-ß, H/Y¬©«rébÀJO5íúq¥·e0Ñ‚ ŒE¦« leù„W=ò2_=G‚¸ù?_½äMÆ·T5Ðw¹¢`Y 2E¾œÞ,&Ašxs–4 »ø7pG\I*°Ê€óÀêK©O~Ñ*©WÕÀ|r¾*,ÂÌýW2›ØãpÿÂüîŽïÍhÁzN8èrÌåfŒR¨’l× øIJ½ˆÏg«†[ÜÅ—öÖN“2ñql&Mo…Hú—tSSÃ~M®çð• ËгæjÎV>‘œK¾Dö¶Î*pH#Ã×ä¢Z4L l?x*ÌVÙa…NIÏøpåP(ŠÓ3KÌ=E¬RóŸ3I¨®|‹šªW„ÚZ1M&­‹EÕÞÔöRÕÝž¦j¸ìj±\À,•¸ÆÆòuÃN´_)ŽüÉËÄQ^e¡Äêñÿy©¤vÌj‹%­—-â<¸V¾y¢ü‹–Šê¥‡‹1 µÞ€ò³ ¬³q´båÏ^ˆï‰£KìÁª‰oñácç}zÈ‘­?¯IWMräùC£Ãö5ó«›ÉíåÛ¨ª· Ãã‰ö—ò¾7ºå—X…Š³¿×z úìjÝš¡ÊÉÆ“Íl"ùÈQÆ€ÞÌû²õшC ù-¿êhË>7¨-L¼°ß œU2y Å~qPÀ' 7žÜó˜[á´7³Ï¥ÐÛ|¦½l+m×;!ª+•‚VœŸèÂÂòe®díš š!6Юå)Û§ì0ä6U#0/ÉkfÒŸÌ»³Á`,Fƒ®†Ñ°d¦ÎÊnß\.óT¥ ½Åb6DNBWþ =7ØΘ%¦µ]`K«6<#žh·“üð­¨jÆY 3 C~~Șª‰™"e2|F]iKBè_ðg؇›ôÙ¶ %p騬)¤Ø»6´]Ï/B6˜–o¨=TˆEWÞÏÂ~à°k­FGÓ•m"²Atñ,“Üß~«›fQ›Ç¯Ñ‹ŠôšòaÒ ¨P|6öw+aŠz–Ùÿ,R}ýnˆnMöw¡-¬Æ Ò¾à¤5ïÔ¨b`@PµŠÑô͉Rë,ä#5duê-ØU0 ¤¾…g ¤¿U4'ûK4îU7 ¶1;Œ1Uøºè;°[²‰ì‹2굜X;ÕpùjI]%iF¥êMd§.lˤÐvwçN€°C=Ï”‹5!—ÃN.{™cËÀNÕ'àðÛkž|†“G­[oÃÐår›fþdÓ¥¤:ÁÂÖˆÞ`.g;9Æ2ròÑcŸWØ #³TqùUE×wÜo¦&)œäŸ¤£ldÉapÎK+f°¾¢Àé+—×*£¨nGœÃØ$¹`ºñ>`'¥ñ–‹{Ô(³àãGŠÞ±r¦@Œ8ýðѤ_bÿ„Å!$ï© dyÖgÖò¬ˆ¶g‰z@Zÿ> ªáºÑ¤% <è,,þ!­%k®ŽBù!“̵‘ƒ ©Š=žðª¤#•PgP&e VR-Í…!“&e~,Wà5ò…³Â1bÆ›ÓÓòo(aüXá`!œ±6–ÃU¥AÒ-ßU¸#·Ábøð¶j¬±¡O‰Õk¶XX£X_ø÷¿'OÅôà¨C&Z³v‰Ã×’¦^¸×æ:¯á/ivÐŽ 8 ñŽul:Ñ1U4Ô¨"ª¸¬•oÖx\…4“¦0‹3šik(H»_m{¥L¯˜‰L¦©4ÔB]‰Ž–N¹æ¤œŽOÔöŽÞSwx˜¢,¬2¡2ïJX¾UçYÇ -ŽßÔ³óçfS"8ê šÚ¹» 4ÀS‡ JËÑàf¹‚™L(VHe´õêW¡wn€ ´ÙVÙéÜêLäƒðömÚBrä L]QÜcöY?˜3¦åì¢d/ì¤P'J9Š*{y .pó%=«÷ߺqo­ŒŸ®ômòû$Õ¿m9 -ðZà7>¢øiÕ–mç7OY P—k-h7*'«Þñ+w>…~ž¶“T…Å*Ë—êÿÅm³õ²ã¶Biñ"µr‚Ù±˜é‚BRнÒsVçCþæõÏ”±ÕVŸý (ùM­¿†ªÆô@Ž 9iE̪è`§©úÕv6›2|0_ ÉZÓ¤,4 «–¡ò$Ë16‹x;´ÂÞZÓ‚A‹‘φ±4 ?=ÍÆ‹Ä_òûX«<ðŒãËùU—.05]Óþ®&ûbÁaºÍOo™El¤B]Ø^ø ¤6Î$¤5ÐKSL–WX¯PúÇÏ_Uö«_±8l?‡ŠÅÁ}øñsZë?®R< þª*ÀnQ~©·›ûͽJ˜íˆßé íÏþõnίÈ&šÞ f(\á=3 ã(p4¸ì²Î*ó9O~+ø<<ºË³Ÿ‰Ò÷óJ®=¬‘‘yu¿¼uã?ôié±Ðx¸ M%Òúì׺ õ Wì2D]ÐoÙÇrMýk:…꡺dÅUŒÙZÆÜ'þ’]§¢„fL*áæ\[d>X5/¯ î‚“ò mTUP¬å£J~y‰r±&W ¤n-—>XvªŽ^ÎùŽ-d¥F¹¨'>£ƒû¿ #ÖËÛzHà½úf5”ìä ;®ÑEQ^óe¿«×|³Ñ³—ô¿`uøÊÍZØs×ËæЈ«Æ6Íên W6:f ¦@ÿ<Å–Í<Ó"ªV-=ె ðá$ÀYBadk4ZPѲ |´Ù‘ &3\–ùW“÷v¬ÙBœ+,  ëã«:Tò„xêLËRhª«‹¿,h•yöɸ/zñƒ·zœ™±†ò Œçù`! )£É¶†¢|a¨ÆËr›Ô8]#»±¢hÿÜúpA¥ÿÖ/JŽ`½­úïo~¯à‰Ÿûm•aÇnO`4ºIÕdzw ý^ÌÁ¯œµ¨à}¾öI=èMëƒW*•K%ßÅ‹Þh~ˆ.â^6v~ê:ïv¾Ϋr9N±ÈûõQyf qün̪Ú/‘ü—¤÷ßÄ!æò –yPaE¼ÕˆZu‡‡’´a5†º©}æ¶~.[·¼–uýÆE÷š¸.ÄN®Ÿ\ÑßY¹T®•/)<¥¿‰-çrÓ¼>æSÌÓQ¡E9DOŸ —ÐH;%Ž|£Ýnµ+ø )MH'±ãüÞ˜ïÀójÒAS¿ã™P%ÜÇ ¾¡zòrÊùÿÍ'á·U‚zH>‡Ë ñï°»½…>ÿ#|,íWι¤b|@oÃö.æ°°+Ù°ª×ª§ßhUχÜú\kƒç¸àš‰Ô•<ÉâÅò0à!ÛµM{mUÜZƒ¹eªŸ·Üy˜¼*6í_TÒ}W{8>‰éL噥f™y9ì×<¹Ê*˼~Íl¤ ‘÷|ž+oÏìè>9gåâdÐ9\Ä<›¼Jº³UßnI§ðÏ0Ŷ/hLbcaÇûÞïsÓ×¥-6Å ˜A ?R•EžUÝG_}ïéË 9^¶š¯—de×’¬ýEp'/´€(ãv9Å1SFÞxöõü¼>D-#£$´‰ ©?%Q»ŸöÜ¿Æ=™…ö¾-´7)¡½†²Ù?~Í¥‚ó"ëfR ôxž©¶Ïã{ãQ²Æ΂ðtŒy qÆPرÁPx€ò%Ÿ6’8=âbœçP{IJ}~÷«¿PZ¤ºÆX\ÜÇ~ce¡bdšsy¾öiµ¤3pŹB]iì#Ýëâ+Ó{Š¸—þÖ±—{QÇVåÈBi&¾‰1 ¹ 4uÌ$wgfš7 þ7q‡£vcg¿uÒQî'‚à/j"£ÁG…®¡P¦Ø ÌÂ7-}ÿ·­¿–žýµ€&T{Í~4¤<˜|¤ûG¬¦µ¹Bû¬–±^‚Ý.?ÒÒ#†áŠ[O³Ÿñ‰`(­þP–:Çσ>ú:.5[Wè ëÿØë£ëßú·þ­ëßú·þ­ëßú·þ­ëßú·þ­ëßú·þ­ëßú·þ­ëßú·þ­ëßú·þý¿ÿFï*ˆ'./asymptote-2.41/predicates.h0000644000175000017500000000144313064427076016041 0ustar norbertnorbert#ifndef PREDICATES_H #define PREDICATES_H double orient2d(double* pa, double* pb, double* pc); double orient2d(double ax, double ay, double bx, double by, double cx, double cy); double orient2dadapt(double *pa, double *pb, double *pc, double detsum); double orient3d(double* pa, double* pb, double* pc, double* pd); double incircle(double* pa, double* pb, double* pc, double* pd); double incircle(double ax, double ay, double bx, double by, double cx, double cy, double dx, double dy); double insphere(double* pa, double* pb, double* pc, double* pd, double* pe); extern const double resulterrbound,ccwerrboundA,ccwerrboundB,ccwerrboundC, o3derrboundA,o3derrboundB,o3derrboundC,iccerrboundA,iccerrboundB, iccerrboundC,isperrboundA,isperrboundB,isperrboundC; #endif ./asymptote-2.41/runpath3d.in0000644000175000017500000001756313064427076016017 0ustar norbertnorbert/***** * runpath3.in * * Runtime functions for path3 operations. * *****/ pair => primPair() triple => primTriple() path3 => primPath3() boolarray* => booleanArray() realarray* => realArray() realarray2* => realArray2() triplearray* => tripleArray() triplearray2* => tripleArray2() #include "path3.h" #include "array.h" #include "drawsurface.h" #include "predicates.h" using namespace camp; using namespace vm; typedef array boolarray; typedef array realarray; typedef array realarray2; typedef array triplearray; typedef array triplearray2; using types::booleanArray; using types::realArray; using types::realArray2; using types::tripleArray; using types::tripleArray2; // Autogenerated routines: path3 path3(triplearray *pre, triplearray *point, triplearray *post, boolarray *straight, bool cyclic) { size_t n=checkArrays(pre,point); checkEqual(n,checkArray(post)); checkEqual(n,checkArray(straight)); mem::vector nodes(n); for(size_t i=0; i < n; ++i) { nodes[i].pre=read(pre,i); nodes[i].point=read(point,i); nodes[i].post=read(post,i); nodes[i].straight=read(straight,i); } return path3(nodes,(Int) n,cyclic); } path3 :nullPath3() { return nullpath3; } bool ==(path3 a, path3 b) { return a == b; } bool !=(path3 a, path3 b) { return !(a == b); } triple point(path3 p, Int t) { return p.point((Int) t); } triple point(path3 p, real t) { return p.point(t); } triple precontrol(path3 p, Int t) { return p.precontrol((Int) t); } triple precontrol(path3 p, real t) { return p.precontrol(t); } triple postcontrol(path3 p, Int t) { return p.postcontrol((Int) t); } triple postcontrol(path3 p, real t) { return p.postcontrol(t); } triple dir(path3 p, Int t, Int sign=0, bool normalize=true) { return p.dir(t,sign,normalize); } triple dir(path3 p, real t, bool normalize=true) { return p.dir(t,normalize); } triple accel(path3 p, Int t, Int sign=0) { return p.accel(t,sign); } triple accel(path3 p, real t) { return p.accel(t); } real radius(path3 p, real t) { triple v=p.dir(t,false); triple a=p.accel(t); real d=dot(a,v); real v2=v.abs2(); real a2=a.abs2(); real denom=v2*a2-d*d; real r=v2*sqrt(v2); return denom > 0 ? r/sqrt(denom) : 0.0; } real radius(triple z0, triple c0, triple c1, triple z1, real t) { triple v=(3.0*(z1-z0)+9.0*(c0-c1))*t*t+(6.0*(z0+c1)-12.0*c0)*t+3.0*(c0-z0); triple a=6.0*(z1-z0+3.0*(c0-c1))*t+6.0*(z0+c1)-12.0*c0; real d=dot(a,v); real v2=v.abs2(); real a2=a.abs2(); real denom=v2*a2-d*d; real r=v2*sqrt(v2); return denom > 0 ? r/sqrt(denom) : 0.0; } path3 reverse(path3 p) { return p.reverse(); } path3 subpath(path3 p, Int a, Int b) { return p.subpath((Int) a, (Int) b); } path3 subpath(path3 p, real a, real b) { return p.subpath(a,b); } Int length(path3 p) { return p.length(); } bool cyclic(path3 p) { return p.cyclic(); } bool straight(path3 p, Int t) { return p.straight(t); } path3 unstraighten(path3 p) { return p.unstraighten(); } // Return the maximum perpendicular deviation of segment i of path3 g // from a straight line. real straightness(path3 p, Int t) { if(p.straight(t)) return 0; triple z0=p.point(t); triple u=unit(p.point(t+1)-z0); return ::max(length(perp(p.postcontrol(t)-z0,u)), length(perp(p.precontrol(t+1)-z0,u))); } // Return the maximum perpendicular deviation of z0..controls c0 and c1..z1 // from a straight line. real straightness(triple z0, triple c0, triple c1, triple z1) { triple u=unit(z1-z0); return ::max(length(perp(c0-z0,u)),length(perp(c1-z0,u))); } bool piecewisestraight(path3 p) { return p.piecewisestraight(); } real arclength(path3 p) { return p.arclength(); } real arctime(path3 p, real dval) { return p.arctime(dval); } realarray* intersect(path3 p, path3 q, real fuzz=-1) { bool exact=fuzz <= 0.0; if(fuzz < 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(q.max()),length(q.min()))); std::vector S,T; real s,t; if(intersections(s,t,S,T,p,q,fuzz,true,exact)) { array *V=new array(2); (*V)[0]=s; (*V)[1]=t; return V; } else return new array(0); } realarray2* intersections(path3 p, path3 q, real fuzz=-1) { bool exact=fuzz <= 0.0; if(fuzz < 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(q.max()),length(q.min()))); bool single=!exact; real s,t; std::vector S,T; bool found=intersections(s,t,S,T,p,q,fuzz,single,exact); if(!found) return new array(0); array *V; if(single) { V=new array(1); array *Vi=new array(2); (*V)[0]=Vi; (*Vi)[0]=s; (*Vi)[1]=t; } else { size_t n=S.size(); V=new array(n); for(size_t i=0; i < n; ++i) { array *Vi=new array(2); (*V)[i]=Vi; (*Vi)[0]=S[i]; (*Vi)[1]=T[i]; } } stable_sort(V->begin(),V->end(),run::compare2()); return V; } realarray* intersect(path3 p, triplearray2 *P, real fuzz=-1) { triple *A; copyArray2C(A,P,true,4); if(fuzz <= 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), norm(A,16)); std::vector T,U,V; bool found=intersections(T,U,V,p,A,fuzz,true); delete[] A; if(found) { array *W=new array(3); (*W)[0]=T[0]; (*W)[1]=U[0]; (*W)[2]=V[0]; return W; } else return new array(0); } realarray2* intersections(path3 p, triplearray2 *P, real fuzz=-1) { triple *A; copyArray2C(A,P,true,4); if(fuzz <= 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), norm(A,16)); std::vector T,U,V; intersections(T,U,V,p,A,fuzz,false); delete[] A; size_t n=T.size(); array *W=new array(n); for(size_t i=0; i < n; ++i) { array *Wi=new array(3); (*W)[i]=Wi; (*Wi)[0]=T[i]; (*Wi)[1]=U[i]; (*Wi)[2]=V[i]; } return W; // Sorting will done in asy. } Int size(path3 p) { return p.size(); } path3 &(path3 p, path3 q) { return camp::concat(p,q); } triple min(path3 p) { return p.min(); } triple max(path3 p) { return p.max(); } realarray *mintimes(path3 p) { array *V=new array(3); triple v=p.mintimes(); (*V)[0]=v.getx(); (*V)[1]=v.gety(); (*V)[2]=v.getz(); return V; } realarray *maxtimes(path3 p) { array *V=new array(3); triple v=p.maxtimes(); (*V)[0]=v.getx(); (*V)[1]=v.gety(); (*V)[2]=v.getz(); return V; } path3 Operator *(realarray2 *t, path3 g) { return transformed(*t,g); } pair minratio(path3 g) { return g.ratio(::min); } pair maxratio(path3 g) { return g.ratio(::max); } // Return a negative (positive) value if a--b--c--cycle is oriented // counterclockwise (clockwise) when viewed from d or zero if all four // points are coplanar. // The value returned is the determinant // |a.x a.y a.z 1| // |b.x b.y b.z 1| // |c.x c.y c.z 1| // |d.x d.y d.z 1| real orient(triple a, triple b, triple c, triple d) { real A[]={a.getx(),a.gety(),a.getz()}; real B[]={b.getx(),b.gety(),b.getz()}; real C[]={c.getx(),c.gety(),c.getz()}; real D[]={d.getx(),d.gety(),d.getz()}; return orient3d(A,B,C,D); } // Return a positive (negative) value if e lies inside (outside) // the sphere passing through the points a,b,c,d oriented so that // a--b--c--cycle appears in clockwise order when viewed from d // or zero if all five points are cospherical. // The value returned is the determinant // |a.x a.y a.z a.x^2+a.y^2+a.z^2 1| // |b.x b.y b.z b.x^2+b.y^2+b.z^2 1| // |c.x c.y c.z c.x^2+c.y^2+c.z^2 1| // |d.x d.y d.z d.x^2+d.y^2+d.z^2 1| // |e.x e.y e.z e.x^2+e.y^2+e.z^2 1| real insphere(triple a, triple b, triple c, triple d, triple e) { real A[]={a.getx(),a.gety(),a.getz()}; real B[]={b.getx(),b.gety(),b.getz()}; real C[]={c.getx(),c.gety(),c.getz()}; real D[]={d.getx(),d.gety(),d.getz()}; real E[]={e.getx(),e.gety(),e.getz()}; return insphere(A,B,C,D,E); } ./asymptote-2.41/psfile.cc0000644000175000017500000004474613064427076015353 0ustar norbertnorbert/***** * psfile.cc * Andy Hammerlindl 2002/06/10 * * Encapsulates the writing of commands to a PostScript file. * Allows identification and removal of redundant commands. *****/ #include #include #include #include #include "psfile.h" #include "settings.h" #include "errormsg.h" #include "array.h" #include "stack.h" using std::ofstream; using std::setw; using vm::array; using vm::read; using vm::stack; using vm::callable; using vm::pop; namespace camp { void checkColorSpace(ColorSpace colorspace) { switch(colorspace) { case DEFCOLOR: case INVISIBLE: reportError("Cannot shade with invisible pen"); case PATTERN: reportError("Cannot shade with pattern"); break; default: break; } } psfile::psfile(const string& filename, bool pdfformat) : filename(filename), pdfformat(pdfformat), pdf(false), transparency(false), buffer(NULL), out(NULL) { if(filename.empty()) out=&cout; else out=new ofstream(filename.c_str()); out->setf(std::ios::boolalpha); if(!out || !*out) reportError("Cannot write to "+filename); } static const char *inconsistent="inconsistent colorspaces"; static const char *rectangular="matrix is not rectangular"; void psfile::writefromRGB(unsigned char r, unsigned char g, unsigned char b, ColorSpace colorspace, size_t ncomponents) { static const double factor=1.0/255.0; pen p(r*factor,g*factor,b*factor); p.convert(); if(!p.promote(colorspace)) reportError(inconsistent); write(&p,ncomponents); } inline unsigned char average(unsigned char *a, size_t dx, size_t dy) { return ((unsigned) a[0]+(unsigned) a[dx]+(unsigned) a[dy]+ (unsigned) a[dx+dy])/4; } void psfile::dealias(unsigned char *a, size_t width, size_t height, size_t n, bool convertrgb, ColorSpace colorspace) { // Dealias all but the last row and column of pixels. size_t istop=width-1; size_t jstop=height-1; if(convertrgb) { size_t nwidth=3*width; for(size_t j=0; j < height; ++j) { unsigned char *aj=a+nwidth*j; for(size_t i=0; i < width; ++i) { unsigned char *ai=aj+3*i; if(i < istop && j < jstop) writefromRGB(average(ai,3,nwidth), average(ai+1,3,nwidth), average(ai+2,3,nwidth),colorspace,n); else writefromRGB(ai[0],ai[1],ai[2],colorspace,n); } } } else { size_t nwidth=n*width; for(size_t j=0; j < jstop; ++j) { unsigned char *aj=a+nwidth*j; for(size_t i=0; i < istop; ++i) { unsigned char *ai=aj+n*i; for(size_t k=0; k < n; ++k) ai[k]=average(ai+k,n,nwidth); } } } } void psfile::writeCompressed(const unsigned char *a, size_t size) { uLongf compressedSize=compressBound(size); Bytef *compressed=new Bytef[compressedSize]; if(compress(compressed,&compressedSize,a,size) != Z_OK) reportError("image compression failed"); encode85 e(out); for(size_t i=0; i < compressedSize; ++i) e.put(compressed[i]); } void psfile::close() { if(out) { out->flush(); if(!filename.empty()) { #ifdef __MSDOS__ chmod(filename.c_str(),~settings::mask & 0777); #endif if(!out->good()) // Don't call reportError since this may be called on handled_error. reportFatal("Cannot write to "+filename); delete out; out=NULL; } } } psfile::~psfile() { close(); } void psfile::header() { Int level=settings::getSetting("level"); *out << "%!PS-Adobe-" << level << ".0 EPSF-" << level << ".0" << newl; } void psfile::prologue(const bbox& box) { header(); BoundingBox(box); *out << "%%Creator: " << settings::PROGRAM << " " << settings::VERSION << REVISION << newl; time_t t; time(&t); struct tm *tt = localtime(&t); char prev = out->fill('0'); *out << "%%CreationDate: " << tt->tm_year + 1900 << "." << setw(2) << tt->tm_mon+1 << "." << setw(2) << tt->tm_mday << " " << setw(2) << tt->tm_hour << ":" << setw(2) << tt->tm_min << ":" << setw(2) << tt->tm_sec << newl; out->fill(prev); *out << "%%Pages: 1" << newl; *out << "%%Page: 1 1" << newl; if(!pdfformat) *out << "/Setlinewidth {0 exch dtransform dup abs 1 lt {pop 0}{round} ifelse" << newl << "idtransform setlinewidth pop} bind def" << newl; } void psfile::epilogue() { *out << "showpage" << newl; *out << "%%EOF" << newl; } void psfile::setcolor(const pen& p, const string& begin="", const string& end="") { if(p.cmyk() && (!lastpen.cmyk() || (p.cyan() != lastpen.cyan() || p.magenta() != lastpen.magenta() || p.yellow() != lastpen.yellow() || p.black() != lastpen.black()))) { *out << begin << p.cyan() << " " << p.magenta() << " " << p.yellow() << " " << p.black() << (pdf ? " k" : " setcmykcolor") << end << newl; } else if(p.rgb() && (!lastpen.rgb() || (p.red() != lastpen.red() || p.green() != lastpen.green() || p.blue() != lastpen.blue()))) { *out << begin << p.red() << " " << p.green() << " " << p.blue() << (pdf ? " rg" : " setrgbcolor") << end << newl; } else if(p.grayscale() && (!lastpen.grayscale() || p.gray() != lastpen.gray())) { *out << begin << p.gray() << (pdf ? " g" : " setgray") << end << newl; } } void psfile::setopacity(const pen& p) { if(p.blend() != lastpen.blend()) { *out << "/" << p.blend() << " .setblendmode" << newl; transparency=true; } if(p.opacity() != lastpen.opacity()) { *out << p.opacity() << " .setopacityalpha" << newl; transparency=true; } lastpen.settransparency(p); } void psfile::setpen(pen p) { p.convert(); setopacity(p); if(!p.fillpattern().empty() && p.fillpattern() != lastpen.fillpattern()) *out << p.fillpattern() << " setpattern" << newl; else setcolor(p); // Defer dynamic linewidth until stroke time in case currentmatrix changes. if(p.width() != lastpen.width()) *out << p.width() << (pdfformat ? " setlinewidth" : " Setlinewidth") << newl; if(p.cap() != lastpen.cap()) *out << p.cap() << " setlinecap" << newl; if(p.join() != lastpen.join()) *out << p.join() << " setlinejoin" << newl; if(p.miter() != lastpen.miter()) *out << p.miter() << " setmiterlimit" << newl; const LineType *linetype=p.linetype(); const LineType *lastlinetype=lastpen.linetype(); if(!(linetype->pattern == lastlinetype->pattern) || linetype->offset != lastlinetype->offset) { out->setf(std::ios::fixed); *out << linetype->pattern << " " << linetype->offset << " setdash" << newl; out->unsetf(std::ios::fixed); } lastpen=p; } void psfile::write(const pen& p) { if(p.cmyk()) *out << p.cyan() << " " << p.magenta() << " " << p.yellow() << " " << p.black(); else if(p.rgb()) *out << p.red() << " " << p.green() << " " << p.blue(); else if(p.grayscale()) *out << p.gray(); } void psfile::write(path p, bool newPath) { Int n = p.size(); assert(n != 0); if(newPath) newpath(); pair z0=p.point((Int) 0); // Draw points moveto(z0); for(Int i = 1; i < n; i++) { if(p.straight(i-1)) lineto(p.point(i)); else curveto(p.postcontrol(i-1),p.precontrol(i),p.point(i)); } if(p.cyclic()) { if(p.straight(n-1)) lineto(z0); else curveto(p.postcontrol(n-1),p.precontrol((Int) 0),z0); closepath(); } else { if(n == 1) lineto(z0); } } void psfile::latticeshade(const vm::array& a, const transform& t) { checkLevel(); size_t n=a.size(); if(n == 0) return; array *a0=read(a,0); size_t m=a0->size(); setfirstopacity(*a0); ColorSpace colorspace=maxcolorspace2(a); checkColorSpace(colorspace); size_t ncomponents=ColorComponents[colorspace]; *out << "<< /ShadingType 1" << newl << "/Matrix "; write(t); *out << newl; *out << "/ColorSpace /Device" << ColorDeviceSuffix[colorspace] << newl << "/Function" << newl << "<< /FunctionType 0" << newl << "/Order 1" << newl << "/Domain [0 1 0 1]" << newl << "/Range ["; for(size_t i=0; i < ncomponents; ++i) *out << "0 1 "; *out << "]" << newl << "/Decode ["; for(size_t i=0; i < ncomponents; ++i) *out << "0 1 "; *out << "]" << newl; *out << "/BitsPerSample 8" << newl; *out << "/Size [" << m << " " << n << "]" << newl << "/DataSource <" << newl; for(size_t i=n; i > 0;) { array *ai=read(a,--i); checkArray(ai); size_t aisize=ai->size(); if(aisize != m) reportError(rectangular); for(size_t j=0; j < m; j++) { pen *p=read(ai,j); p->convert(); if(!p->promote(colorspace)) reportError(inconsistent); *out << p->hex() << newl; } } *out << ">" << newl << ">>" << newl << ">>" << newl << "shfill" << newl; } // Axial and radial shading void psfile::gradientshade(bool axial, ColorSpace colorspace, const pen& pena, const pair& a, double ra, bool extenda, const pen& penb, const pair& b, double rb, bool extendb) { checkLevel(); endclip(pena); setopacity(pena); checkColorSpace(colorspace); *out << "<< /ShadingType " << (axial ? "2" : "3") << newl << "/ColorSpace /Device" << ColorDeviceSuffix[colorspace] << newl << "/Coords ["; write(a); if(!axial) write(ra); write(b); if(!axial) write(rb); *out << "]" << newl << "/Extend [" << extenda << " " << extendb << "]" << newl << "/Function" << newl << "<< /FunctionType 2" << newl << "/Domain [0 1]" << newl << "/C0 ["; write(pena); *out << "]" << newl << "/C1 ["; write(penb); *out << "]" << newl << "/N 1" << newl << ">>" << newl << ">>" << newl << "shfill" << newl; } void psfile::gouraudshade(const pen& pentype, const array& pens, const array& vertices, const array& edges) { checkLevel(); endclip(pentype); size_t size=pens.size(); if(size == 0) return; setfirstopacity(pens); ColorSpace colorspace=maxcolorspace(pens); *out << "<< /ShadingType 4" << newl << "/ColorSpace /Device" << ColorDeviceSuffix[colorspace] << newl << "/DataSource [" << newl; for(size_t i=0; i < size; i++) { write(read(edges,i)); write(read(vertices,i)); pen *p=read(pens,i); p->convert(); if(!p->promote(colorspace)) reportError(inconsistent); *out << " "; write(*p); *out << newl; } *out << "]" << newl << ">>" << newl << "shfill" << newl; } void psfile::vertexpen(array *pi, int j, ColorSpace colorspace) { pen *p=read(pi,j); p->convert(); if(!p->promote(colorspace)) reportError(inconsistent); *out << " "; write(*p); } // Tensor-product patch shading void psfile::tensorshade(const pen& pentype, const array& pens, const array& boundaries, const array& z) { checkLevel(); endclip(pentype); size_t size=pens.size(); if(size == 0) return; size_t nz=z.size(); array *p0=read(pens,0); if(checkArray(p0) != 4) reportError("4 pens required"); setfirstopacity(*p0); ColorSpace colorspace=maxcolorspace2(pens); checkColorSpace(colorspace); *out << "<< /ShadingType 7" << newl << "/ColorSpace /Device" << ColorDeviceSuffix[colorspace] << newl << "/DataSource [" << newl; for(size_t i=0; i < size; i++) { // Only edge flag 0 (new patch) is implemented since the 32% data // compression (for RGB) afforded by other edge flags really isn't worth // the trouble or confusion for the user. write(0); path g=read(boundaries,i); if(!(g.cyclic() && g.size() == 4)) reportError("specify cyclic path of length 4"); for(Int j=4; j > 0; --j) { write(g.point(j)); write(g.precontrol(j)); write(g.postcontrol(j-1)); } if(nz == 0) { // Coons patch static double nineth=1.0/9.0; for(Int j=0; j < 4; ++j) { write(nineth*(-4.0*g.point(j)+6.0*(g.precontrol(j)+g.postcontrol(j)) -2.0*(g.point(j-1)+g.point(j+1)) +3.0*(g.precontrol(j-1)+g.postcontrol(j+1)) -g.point(j+2))); } } else { array *zi=read(z,i); if(checkArray(zi) != 4) reportError("specify 4 internal control points for each path"); write(read(zi,0)); write(read(zi,3)); write(read(zi,2)); write(read(zi,1)); } array *pi=read(pens,i); if(checkArray(pi) != 4) reportError("specify 4 pens for each path"); vertexpen(pi,0,colorspace); vertexpen(pi,3,colorspace); vertexpen(pi,2,colorspace); vertexpen(pi,1,colorspace); *out << newl; } *out << "]" << newl << ">>" << newl << "shfill" << newl; } void psfile::write(pen *p, size_t ncomponents) { switch(ncomponents) { case 0: break; case 1: writeByte(byte(p->gray())); break; case 3: writeByte(byte(p->red())); writeByte(byte(p->green())); writeByte(byte(p->blue())); break; case 4: writeByte(byte(p->cyan())); writeByte(byte(p->magenta())); writeByte(byte(p->yellow())); writeByte(byte(p->black())); default: break; } } string filter() { return settings::getSetting("level") >= 3 ? "1 (~>) /SubFileDecode filter /ASCII85Decode filter\n/FlateDecode" : "1 (~>) /SubFileDecode filter /ASCII85Decode"; } void psfile::imageheader(size_t width, size_t height, ColorSpace colorspace) { size_t ncomponents=ColorComponents[colorspace]; *out << "/Device" << ColorDeviceSuffix[colorspace] << " setcolorspace" << newl << "<<" << newl << "/ImageType 1" << newl << "/Width " << width << newl << "/Height " << height << newl << "/BitsPerComponent 8" << newl << "/Decode ["; for(size_t i=0; i < ncomponents; ++i) *out << "0 1 "; *out << "]" << newl << "/ImageMatrix [" << width << " 0 0 " << height << " 0 0]" << newl << "/DataSource currentfile " << filter() << " filter" << newl << ">>" << newl << "image" << newl; } void psfile::image(const array& a, const array& P, bool antialias) { size_t asize=a.size(); size_t Psize=P.size(); if(asize == 0 || Psize == 0) return; array *a0=read(a,0); size_t a0size=a0->size(); if(a0size == 0) return; setfirstopacity(P); ColorSpace colorspace=maxcolorspace(P); checkColorSpace(colorspace); size_t ncomponents=ColorComponents[colorspace]; imageheader(a0size,asize,colorspace); double min=read(a0,0); double max=min; for(size_t i=0; i < asize; i++) { array *ai=read(a,i); size_t size=ai->size(); if(size != a0size) reportError(rectangular); for(size_t j=0; j < size; j++) { double val=read(ai,j); if(val > max) max=val; else if(val < min) min=val; } } double step=(max == min) ? 0.0 : (Psize-1)/(max-min); beginImage(ncomponents*a0size*asize); for(size_t i=0; i < asize; i++) { array *ai=read(a,i); for(size_t j=0; j < a0size; j++) { double val=read(ai,j); size_t index=(size_t) ((val-min)*step+0.5); pen *p=read(P,index < Psize ? index : Psize-1); p->convert(); if(!p->promote(colorspace)) reportError(inconsistent); write(p,ncomponents); } } endImage(antialias,a0size,asize,ncomponents); } void psfile::image(const array& a, bool antialias) { size_t asize=a.size(); if(asize == 0) return; array *a0=read(a,0); size_t a0size=a0->size(); if(a0size == 0) return; setfirstopacity(*a0); ColorSpace colorspace=maxcolorspace2(a); checkColorSpace(colorspace); size_t ncomponents=ColorComponents[colorspace]; imageheader(a0size,asize,colorspace); beginImage(ncomponents*a0size*asize); for(size_t i=0; i < asize; i++) { array *ai=read(a,i); size_t size=ai->size(); if(size != a0size) reportError(rectangular); for(size_t j=0; j < size; j++) { pen *p=read(ai,j); p->convert(); if(!p->promote(colorspace)) reportError(inconsistent); write(p,ncomponents); } } endImage(antialias,a0size,asize,ncomponents); } void psfile::image(stack *Stack, callable *f, Int width, Int height, bool antialias) { if(width <= 0 || height <= 0) return; Stack->push(0); Stack->push(0); f->call(Stack); pen p=pop(Stack); setopacity(p); ColorSpace colorspace=p.colorspace(); checkColorSpace(colorspace); size_t ncomponents=ColorComponents[colorspace]; imageheader(width,height,colorspace); beginImage(ncomponents*width*height); for(Int j=0; j < height; j++) { for(Int i=0; i < width; i++) { Stack->push(j); Stack->push(i); f->call(Stack); pen p=pop(Stack); p.convert(); if(!p.promote(colorspace)) reportError(inconsistent); write(&p,ncomponents); } } endImage(antialias,width,height,ncomponents); } void psfile::outImage(bool antialias, size_t width, size_t height, size_t ncomponents) { if(antialias) dealias(buffer,width,height,ncomponents); if(settings::getSetting("level") >= 3) writeCompressed(buffer,count); else { encode85 e(out); for(size_t i=0; i < count; ++i) e.put(buffer[i]); } } void psfile::rawimage(unsigned char *a, size_t width, size_t height, bool antialias) { pen p(0.0,0.0,0.0); p.convert(); ColorSpace colorspace=p.colorspace(); checkColorSpace(colorspace); size_t ncomponents=ColorComponents[colorspace]; imageheader(width,height,colorspace); count=ncomponents*width*height; if(colorspace == RGB) { buffer=a; outImage(antialias,width,height,ncomponents); } else { beginImage(count); if(antialias) dealias(a,width,height,ncomponents,true,colorspace); else { size_t height3=3*height; for(size_t i=0; i < width; ++i) { unsigned char *ai=a+height3*i; for(size_t j=0; j < height; ++j) { unsigned char *aij=ai+3*j; writefromRGB(aij[0],aij[1],aij[2],colorspace,ncomponents); } } } endImage(false,width,height,ncomponents); } } } //namespace camp ./asymptote-2.41/config.h.in0000644000175000017500000001436113064427104015563 0ustar norbertnorbert/* config.h.in. Generated from configure.ac by autoheader. */ /* Define if building universal (internal helper macro) */ #undef AC_APPLE_UNIVERSAL_BUILD /* Directory for documentation */ #undef ASYMPTOTE_DOCDIR /* System directory for global .asy files */ #undef ASYMPTOTE_SYSDIR /* Define if gluNurbsCallback expects a variadic function. */ #undef GLU_TESS_CALLBACK_TRIPLEDOT /* Define to 1 if you have the header file. */ #undef HAVE_CURSES_H /* Define to 1 if you have the `dup2' function. */ #undef HAVE_DUP2 /* Define to 1 if you have the header file. */ #undef HAVE_FENV_H /* Define to 1 if you have the `floor' function. */ #undef HAVE_FLOOR /* Define to 1 if you have the `fork' function. */ #undef HAVE_FORK /* Define to 1 if you have the header file. */ #undef HAVE_FPU_CONTROL_H /* Define to 1 if fseeko (and presumably ftello) exists and is declared. */ #undef HAVE_FSEEKO /* Define if getopt.h is the GNU version */ #undef HAVE_GNU_GETOPT_H /* Define to 1 if you have the header file. */ #undef HAVE_INTTYPES_H /* Define to 1 if you have the `curses' library (-lcurses). */ #undef HAVE_LIBCURSES /* Define to 1 if you have the `fftw3' library (-lfftw3). */ #undef HAVE_LIBFFTW3 /* Define to 1 if you have the `GL' library (-lGL). */ #undef HAVE_LIBGL /* Define to 1 if you have the `GLU' library (-lGLU). */ #undef HAVE_LIBGLU /* Define to 1 if you have the `glut' library (-lglut). */ #undef HAVE_LIBGLUT /* Define to 1 if you have the `gsl' library (-lgsl). */ #undef HAVE_LIBGSL /* Define to 1 if you have the header file. */ #undef HAVE_LIBINTL_H /* Define to 1 if you have the `m' library (-lm). */ #undef HAVE_LIBM /* Define to 1 if you have the `OSMesa' library (-lOSMesa). */ #undef HAVE_LIBOSMESA /* Define to 1 if you have the `readline' library (-lreadline). */ #undef HAVE_LIBREADLINE /* Define to 1 if you have the `rt' library (-lrt). */ #undef HAVE_LIBRT /* Define to 1 if you have the `sigsegv' library (-lsigsegv). */ #undef HAVE_LIBSIGSEGV /* Define to 1 if you have the `z' library (-lz). */ #undef HAVE_LIBZ /* Define to 1 if the system has the type `long'. */ #undef HAVE_LONG /* Define to 1 if the system has the type `long long'. */ #undef HAVE_LONG_LONG /* Define to 1 if you have the header file. */ #undef HAVE_MEMORY_H /* Define to 1 if you have the `memrchr' function. */ #undef HAVE_MEMRCHR /* Define to 1 if you have the `memset' function. */ #undef HAVE_MEMSET /* Define to 1 if you have the header file. */ #undef HAVE_NCURSES_CURSES_H /* Define to 1 if you have the header file. */ #undef HAVE_NCURSES_H /* Define to 1 if you have the `pow' function. */ #undef HAVE_POW /* Define if you have POSIX threads libraries and header files. */ #undef HAVE_PTHREAD /* Have PTHREAD_PRIO_INHERIT. */ #undef HAVE_PTHREAD_PRIO_INHERIT /* Define to 1 if the system has the type `ptrdiff_t'. */ #undef HAVE_PTRDIFF_T /* Define if you have a working header file */ #undef HAVE_RPC_RPC_H /* Define to 1 if you have the `sqrt' function. */ #undef HAVE_SQRT /* Define to 1 if you have the header file. */ #undef HAVE_STDDEF_H /* Define to 1 if you have the header file. */ #undef HAVE_STDINT_H /* Define to 1 if you have the header file. */ #undef HAVE_STDLIB_H /* Define to 1 if you have the `strchr' function. */ #undef HAVE_STRCHR /* Define to 1 if you have the `strftime' function. */ #undef HAVE_STRFTIME /* Define to 1 if you have the header file. */ #undef HAVE_STRINGS_H /* Define to 1 if you have the header file. */ #undef HAVE_STRING_H /* Define to 1 if you have the `strptime' function. */ #undef HAVE_STRPTIME /* Define to 1 if you have the header file. */ #undef HAVE_SYS_STAT_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_TYPES_H /* Define to 1 if you have that is POSIX.1 compatible. */ #undef HAVE_SYS_WAIT_H /* Define to 1 if you have the `tgamma' function. */ #undef HAVE_TGAMMA /* Define to 1 if you have tr1/unordered_map */ #undef HAVE_TR1_UNORDERED_MAP /* Define to 1 if you have the header file. */ #undef HAVE_UNISTD_H /* Define to 1 if you have unordered_map */ #undef HAVE_UNORDERED_MAP /* Define to 1 if you have the `vfork' function. */ #undef HAVE_VFORK /* Define to 1 if you have the header file. */ #undef HAVE_VFORK_H /* Define to 1 if `fork' works. */ #undef HAVE_WORKING_FORK /* Define to 1 if `vfork' works. */ #undef HAVE_WORKING_VFORK /* 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 necessary symbol if this constant uses a non-standard name on your system. */ #undef PTHREAD_CREATE_JOINABLE /* Define as the return type of signal handlers (`int' or `void'). */ #undef RETSIGTYPE /* Define to 1 if you have the ANSI C header files. */ #undef STDC_HEADERS /* Define WORDS_BIGENDIAN to 1 if your processor stores words with the most significant byte first (like Motorola and SPARC, unlike Intel). */ #if defined AC_APPLE_UNIVERSAL_BUILD # if defined __BIG_ENDIAN__ # define WORDS_BIGENDIAN 1 # endif #else # ifndef WORDS_BIGENDIAN # undef WORDS_BIGENDIAN # endif #endif /* Define to 1 if `lex' declares `yytext' as a `char *' by default, not a `char[]'. */ #undef YYTEXT_POINTER /* Define to 1 to make fseeko visible on some hosts (e.g. glibc 2.2). */ #undef _LARGEFILE_SOURCE /* 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 /* Define to `int' if does not define. */ #undef pid_t /* Define to `unsigned int' if does not define. */ #undef size_t /* Define as `fork' if `vfork' does not work. */ #undef vfork ./asymptote-2.41/symbol.cc0000644000175000017500000002132013064427076015355 0ustar norbertnorbert/***** * symbol.cc * Andy Hammerlindl 2002/06/18 * * Creates symbols from strings so that multiple calls for a symbol of * the same string will return an identical object. *****/ #include #include using std::strlen; #include "settings.h" #include "symbol.h" namespace sym { const char USED = 1; const char SKIP = 2; struct symbolRecord { // When a symbol is entered into the table, its hash is computed. If the // corresponding entry in the table is full, this value is incremented until // an empty slot is found. hashplus stores the end value. // Each symbol has a unique hashplus value, even if there is a collision in // the original hashing function. uint hashplus; // Whether the cell of the table is empty, in use, or a "skip" entry due to // a resizing of the table. unsigned char flag; // Pointer to a copy of the string (allocated on the heap). This string // will never be deallocated. Symbols, in essence, last forever. char *s; }; // The table size must be a power of two so that (h % tableSize) can be // replaced by (h & tableMask). 1 << 15 was chosen based on the number of // unique symbols (roughly 4000) which occured in all of the base modules. const size_t SYMBOL_TABLE_BASE_CAPACITY = 1 << 15; symbolRecord baseSymbolTable[SYMBOL_TABLE_BASE_CAPACITY]; symbolRecord *table = baseSymbolTable; size_t tableCapacity = SYMBOL_TABLE_BASE_CAPACITY; uint tableMask = 0; size_t tableSize = 0; symbolRecord &recordByHashplus(uint h) { return table[h & tableMask]; } GCInit symbol::initialize; symbol symbol::nullsym; symbol symbol::initsym; symbol symbol::castsym; symbol symbol::ecastsym; const char *nullsymstr = ""; void initTable() { tableMask = (uint)(tableCapacity - 1); tableSize = 0; // Set every entry to empty. (Is this faster than memsetting the whole // thing?) for (size_t i = 0; i < tableCapacity; ++i) table[i].flag = 0; // The zeroth entry is reserved for the "null" symbol. if (table == baseSymbolTable) { table[0].flag = USED; table[0].s = new char[strlen(nullsymstr) + 1]; strcpy(table[0].s, nullsymstr); ++tableSize; symbol::nullsym.hashplus = 0; symbol::initsym = symbol::opTrans("init"); symbol::castsym = symbol::opTrans("cast"); symbol::ecastsym = symbol::opTrans("ecast"); } } // Hashing constants found experimentally to reduce collision (a little). const uint A = 25191, B = 16342, C = 1746, D = 18326; // Hash the string into an integer. Experimental testing has shown that // hashing only the first few letters seems to be faster than hashing deeper // into the string, even though this approach causes more hash collisions. uint hash(const char *s, size_t len) { uint h = s[0]; if (len == 2) return h; h += A*s[1]; if (len == 3) return h; h += B*s[2]; if (len == 4) return h; h += C*s[3]; if (len == 5) return h; h += D*s[4]; return h+len; } /* Under normal circumstances, the initial table should be large enough for * all of the symbols used and will never be resized. Just in case the * program encounters a large number of distinct symbols, we implement * resizing of the table. */ void resizeTable() { symbolRecord *oldTable = table; size_t oldSize = tableSize; size_t oldCapacity = tableCapacity; tableCapacity *= 4; table = new symbolRecord[tableCapacity]; initTable(); // The null symbol is a special case. table[0] = oldTable[0]; ++tableSize; #if 0 printf("old:\n"); for (size_t i = 0; i < oldCapacity; ++i) { symbolRecord &r = oldTable[i]; if (r.flag != USED) continue; printf(" %u -> %s\n", r.hashplus, r.s); } #endif for (size_t i = 1; i < oldCapacity; ++i) { symbolRecord &r = oldTable[i]; if (r.flag != USED) continue; // Entries that were skipped over when this symbol was entered into the // old hash table may not appear in the same spot in the new hash table. // Put "SKIP" entries in their place, so that the symbol will still be // found. for (uint h = hash(r.s, strlen(r.s)+1); h < r.hashplus; ++h) { symbolRecord &skipr = recordByHashplus(h); if (skipr.flag == 0) skipr.flag = SKIP; } // Enter the symbol in its spot. symbolRecord &newr = recordByHashplus(r.hashplus); assert(newr.flag != USED); newr.flag = USED; newr.hashplus = r.hashplus; newr.s = r.s; ++tableSize; } #if 0 printf("new:\n"); for (size_t i = 0; i < tableCapacity; ++i) { symbolRecord &r = table[i]; if (r.flag != USED) continue; printf(" %u -> %s\n", r.hashplus, r.s); } #endif assert(tableSize == oldSize); // Debugging resize. for (size_t i = 1; i < oldCapacity; ++i) { symbolRecord &r = oldTable[i]; if (r.flag != USED) continue; symbolRecord &newr = recordByHashplus(r.hashplus); assert(newr.hashplus == r.hashplus); assert(newr.flag != 0); assert(newr.flag != SKIP); assert(newr.flag == USED); assert(newr.s = r.s); if (strncmp(r.s, "gensym", 6) != 0) assert(symbol::rawTrans(r.s, strlen(r.s)+1).hashplus == r.hashplus); } #if 0 // Diagnostics. uint empty=0, used=0, skip=0; for (size_t i = 0; i < tableCapacity; ++i) { symbolRecord &r = table[i]; if (r.flag == 0) ++empty; else if (r.flag == USED) ++used; else if (r.flag == SKIP) ++skip; else assert("Unknown flag" == 0); } cout << "Resized symbol table. " << "empty: " << empty << "used: " << used << "skip: " << skip << endl; #endif } symbol symbolize(uint h) { symbol s; s.hashplus = h; return s; } // Handles the insertion of a new symbol into a table the has been resized (or // needs resizing). symbol advancedInsert(const char *s, size_t len) { if (2*tableSize >= tableCapacity) resizeTable(); uint hashplus = hash(s, len); #if 1 assert(s != 0); assert(len > 0); assert(2*tableSize <= tableCapacity); #endif // We know the symbol is not in the table. Just search for the first unused // entry (either empty or a skip entry) and insert there. for (;;) { symbolRecord &r = recordByHashplus(hashplus); if (r.flag != USED) { r.flag = USED; r.s = new char[len]; memcpy(r.s, s, len); assert(r.s[len-1] == '\0'); r.hashplus = hashplus; ++tableSize; assert(2*tableSize <= tableCapacity); return symbolize(hashplus); } ++hashplus; } assert("Unreachable code" == 0); return symbol::nullsym; } symbol symbol::gensym(string s) { // Gensym can be inserted as if it were a normal string not already in the // table. advancedInsert handles this. s = "gensym " + s; return advancedInsert(s.c_str(), s.size() + 1); } symbol symbol::rawTrans(const char *s, size_t len) { uint hashplus = sym::hash(s, len); #if 1 assert(s != 0); assert(len > 0); assert(2*tableSize <= tableCapacity); #endif // Search through the table till we find the symbol already translated or // an empty field. for (;;) { symbolRecord &r = recordByHashplus(hashplus); // Translating pre-existing symbols is more common, so check for it first. if (r.hashplus == hashplus && r.flag == USED && strncmp(r.s, s, len) == 0) { return symbolize(hashplus); } // Then check for an empty entry, in which case the entry is added. if (r.flag == 0) { // Test if the table needs resizing before entering a new symbol, or if // the table has already been resized. In either case, the symbol will // be added to a resized table which may contain skip entries, and a // more involved insertion routine is needed. if (2*tableSize >= SYMBOL_TABLE_BASE_CAPACITY) return advancedInsert(s, len); r.flag = USED; r.s = new char[len]; memcpy(r.s, s, len); assert(r.s[len-1] == '\0'); r.hashplus = hashplus; ++tableSize; assert(2*tableSize <= tableCapacity); return symbolize(hashplus); } // A case where a different symbol is in the spot, continue along the // table. ++hashplus; } assert("Unreachable code" == 0); return symbol::nullsym; } symbol::operator string () const { symbolRecord &r = recordByHashplus(this->hashplus); return (string)r.s; } ostream& operator<< (ostream& out, const symbol sym) { symbolRecord &r = recordByHashplus(sym.hashplus); return out << r.s; } } // end namespace sym /* Define all of operator symbols SYM_PLUS, etc. */ #define OPSYMBOL(str, name) \ sym::symbol name = sym::symbol::opTrans(str) #include "opsymbols.h" #undef OPSYMBOL /* Define all of the symbols of the type SYM(name) in selected files. */ #define ADDSYMBOL(name) \ sym::symbol PRETRANSLATED_SYMBOL_##name = sym::symbol::literalTrans(#name) #include "allsymbols.h" #undef ADDSYMBOL ./asymptote-2.41/asy-list.pl0000755000175000017500000000311413064427076015647 0ustar norbertnorbert#!/usr/bin/env perl ##### # asy-list.pl # # Build asy-keywords.el from list of asy global functions and variables # ##### open(keywords, "> asy-keywords.el") || die("Couldn't open asy-keywords.el for writing."); print keywords <) { if (/^%%\s*$/) { last; # Break out of the loop. } } while () { if (/^%%\s*$/) { last; # A second %% indicates the end of definitions. } if (/^(\w+)\s*\{/) { add($1); } } openlist(); while () { if (/^(\w*)[^ ]* (\w*)\(.*/) { push @types, $1; push @functions, $2; } if (/^([^ ]*) (\w*);/) { push @variables, $2; } } @saw{@types} = (); @types = sort keys %saw; undef %saw; @saw{@functions} = (); @functions = sort keys %saw; undef %saw; @saw{@variables} = (); @variables = sort keys %saw; undef %saw; print keywords <getParent()); } } void newRecordExp::prettyprint(ostream &out, Int indent) { prettyname(out, "newRecordExp", indent); } bool newRecordExp::encodeLevel(position pos, coenv &e, trans::tyEntry *ent) { record *r = dynamic_cast(ent->t); assert(r); // The level needed on which to allocate the record. frame *level = r->getLevel()->getParent(); if (ent->v) { // Put the record on the stack. For instance, in code like // import imp; // new imp.t; // we are putting the instance of imp on the stack, so we can use it to // allocate an instance of imp.t. ent->v->getLocation()->encode(trans::READ, pos, e.c); // Adjust to the right frame. For instance, in the last new in // struct A { // struct B { // static struct C {} // } // B b=new B; // } // A a=new A; // new a.b.C; // we push a.b onto the stack, but need a as the enclosing frame for // allocating an instance of C. record *q = dynamic_cast(ent->v->getType()); return e.c.encode(level, q->getLevel()); } else return e.c.encode(level); } types::ty *newRecordExp::transFromTyEntry(position pos, coenv &e, trans::tyEntry *ent) { types::ty *t = ent->t; if (t->kind == ty_error) return t; else if (t->kind != ty_record) { em.error(pos); em << "type '" << *t << "' is not a structure"; return primError(); } // Put the enclosing frame on the stack. if (!encodeLevel(pos, e, ent)) { em.error(pos); em << "allocation of struct '" << *t << "' is not in a valid scope"; return primError(); } record *r = dynamic_cast(t); assert(r); // Encode the allocation. e.c.encode(inst::makefunc,r->getInit()); e.c.encode(inst::popcall); return t; } types::ty *newRecordExp::trans(coenv &e) { return transFromTyEntry(getPos(), e, result->transAsTyEntry(e, 0)); } types::ty *newRecordExp::getType(coenv &e) { types::ty *t = result->trans(e, true); if (t->kind != ty_error && t->kind != ty_record) return primError(); else return t; } void newArrayExp::prettyprint(ostream &out, Int indent) { prettyname(out,"newArrayExp",indent); celltype->prettyprint(out, indent+1); if (dimexps) dimexps->prettyprint(out, indent+1); if (dims) dims->prettyprint(out, indent+1); if (ai) ai->prettyprint(out, indent+1); } types::ty *newArrayExp::trans(coenv &e) { types::ty *c = celltype->trans(e); if (c->kind == ty_void) { em.error(getPos()); em << "cannot declare array of type void"; return primError(); } if (dims) c = dims->truetype(c); if (ai) { ai->transToType(e, c); return c; } else if (dimexps || dims) { if (dimexps) { for (size_t i = 0; i < dimexps->size(); ++i) { (*dimexps)[i]->transToType(e, types::primInt()); c = new types::array(c); } } if (dims) { for (size_t i = 0; i < dims->size(); ++i) { e.c.encode(inst::intpush,0); } } e.c.encode(inst::intpush, (Int) ((dimexps ? dimexps->size():0) + (dims ? dims->size():0))); e.c.encode(inst::builtin, run::newDeepArray); return c; } else { em.compiler(getPos()); em << "new array expression must have either dims or dimexps"; return primError(); } } types::ty *newArrayExp::getType(coenv &e) { types::ty *c = celltype->trans(e); if (c->kind == ty_void) { return primError(); } if (dims) c = dims->truetype(c); if (dimexps) { Int depth = (Int)dimexps->size(); while (depth > 0) { c = new types::array(c); depth--; } } return c; } } // namespace absyntax ./asymptote-2.41/util.cc0000644000175000017500000002274413064427076015040 0ustar norbertnorbert/***** * util.cc * John Bowman * * A place for useful utility functions. *****/ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "util.h" #include "settings.h" #include "errormsg.h" #include "camperror.h" #include "interact.h" using namespace settings; bool False=false; namespace vm { void error(const char* message); } #if __GNUC__ #include string demangle(const char *s) { int status; char *demangled = abi::__cxa_demangle(s,NULL,NULL,&status); if (status == 0 && demangled) { string str(demangled); free(demangled); return str; } else if (status == -2) { free(demangled); return s; } else { free(demangled); return string("Unknown(") + s + ")"; } } #else string demangle(const char* s) { return s; } #endif char *Strdup(string s) { size_t size=s.size()+1; char *dest=new(UseGC) char[size]; std::memcpy(dest,s.c_str(),size*sizeof(char)); return dest; } char *StrdupNoGC(string s) { size_t size=s.size()+1; char *dest=new char[size]; std::memcpy(dest,s.c_str(),size*sizeof(char)); return dest; } char *StrdupMalloc(string s) { size_t size=s.size()+1; char *dest=(char *) std::malloc(size); std::memcpy(dest,s.c_str(),size*sizeof(char)); return dest; } string stripDir(string name) { size_t p; #ifdef __MSDOS__ p=name.rfind('\\'); if(p < string::npos) name.erase(0,p+1); #endif p=name.rfind('/'); if(p < string::npos) name.erase(0,p+1); return name; } string stripFile(string name) { size_t p; bool dir=false; #ifdef __MSDOS__ p=name.rfind('\\'); if(p < string::npos) { dir=true; while(p > 0 && name[p-1] == '\\') --p; name.erase(p+1); } #endif p=name.rfind('/'); if(p < string::npos) { dir=true; while(p > 0 && name[p-1] == '/') --p; name.erase(p+1); } return dir ? name : ""; } string stripExt(string name, const string& ext) { string suffix="."+ext; size_t p=name.rfind(suffix); size_t n=suffix.length(); if(n == 1 || p == name.length()-n) return name.substr(0,p); else return name; } void backslashToSlash(string& s) { size_t p; while((p=s.find('\\')) < string::npos) s[p]='/'; } void spaceToUnderscore(string& s) { size_t p; while((p=s.find(' ')) < string::npos) s[p]='_'; } string Getenv(const char *name, bool msdos) { char *s=getenv(name); if(!s) return ""; string S=string(s); if(msdos) backslashToSlash(S); return S; } void writeDisabled() { camp::reportError("Write to other directories disabled; override with option -globalwrite"); } string cleanpath(string name) { string dir=stripFile(name); name=stripDir(name); spaceToUnderscore(name); return dir+name; } string outpath(string name) { bool global=globalwrite(); string dir=stripFile(name); if(global && !dir.empty()) return name; string outdir=stripFile(outname()); if(!(global || dir.empty() || dir == outdir)) writeDisabled(); return outdir+stripDir(name); } string buildname(string name, string suffix, string aux) { name=stripExt(outpath(name),defaultformat())+aux; if(!suffix.empty()) name += "."+suffix; return name; } string auxname(string filename, string suffix) { return buildname(filename,suffix,"_"); } sighandler_t Signal(int signum, sighandler_t handler) { struct sigaction action,oldaction; action.sa_handler=handler; sigemptyset(&action.sa_mask); action.sa_flags=0; return sigaction(signum,&action,&oldaction) == 0 ? oldaction.sa_handler : SIG_ERR; } void push_split(mem::vector& a, const string& S) { const char *p=S.c_str(); string s; char c; while((c=*(p++))) { if(c == ' ') { if(s.size() > 0) { a.push_back(s); s.clear(); } } else s += c; } if(s.size() > 0) a.push_back(s); } char **args(const mem::vector& s, bool quiet) { size_t count=s.size(); char **argv=NULL; argv=new char*[count+1]; for(size_t i=0; i < count; ++i) argv[i]=StrdupNoGC(s[i]); if(!quiet && settings::verbose > 1) { cerr << argv[0]; for(size_t i=1; i < count; ++i) cerr << " " << argv[i]; cerr << endl; } argv[count]=NULL; return argv; } void execError(const char *command, const char *hint, const char *application) { cerr << "Cannot execute " << command << endl; if(*application == 0) application=hint; if(hint) { string s=string(hint); transform(s.begin(), s.end(), s.begin(), toupper); cerr << "Please put in a file " << getSetting("config") << ": " << endl << endl << "import settings;" << endl << hint << "=\"LOCATION\";" << endl << endl << "where LOCATION specifies the location of " << application << "." << endl << endl << "Alternatively, set the environment variable ASYMPTOTE_" << s << endl << "or use the command line option -" << hint << "=\"LOCATION\". For further details, see" << endl << "http://asymptote.sourceforge.net/doc/Configuring.html" << endl << "http://asymptote.sourceforge.net/doc/Search-paths.html" << endl; } } // quiet: 0=none; 1=suppress stdout; 2=suppress stdout+stderr. int System(const mem::vector &command, int quiet, bool wait, const char *hint, const char *application, int *ppid) { int status; cout.flush(); // Flush stdout to avoid duplicate output. char **argv=args(command); int pid=fork(); if(pid == -1) camp::reportError("Cannot fork process"); if(pid == 0) { if(interact::interactive) signal(SIGINT,SIG_IGN); if(quiet) { static int null=creat("/dev/null",O_WRONLY); close(STDOUT_FILENO); dup2(null,STDOUT_FILENO); if(quiet == 2) { close(STDERR_FILENO); dup2(null,STDERR_FILENO); } } if(argv) { execvp(argv[0],argv); execError(argv[0],hint,application); _exit(-1); } } if(ppid) *ppid=pid; for(;;) { if(waitpid(pid, &status, wait ? 0 : WNOHANG) == -1) { if(errno == ECHILD) return 0; if(errno != EINTR) { if(quiet < 2) { ostringstream msg; msg << "Command failed: "; for(size_t i=0; i < command.size(); ++i) msg << command[i] << " "; camp::reportError(msg); } } } else { if(!wait) return 0; if(WIFEXITED(status)) { if(argv) { char **p=argv; char *s; while((s=*(p++)) != NULL) delete [] s; delete [] argv; } return WEXITSTATUS(status); } else { if(quiet < 2) { ostringstream msg; msg << "Command exited abnormally: "; for(size_t i=0; i < command.size(); ++i) msg << command[i] << " "; camp::reportError(msg); } } } } } string stripblanklines(const string& s) { string S=string(s); bool blank=true; const char *t=S.c_str(); size_t len=S.length(); for(size_t i=0; i < len; i++) { if(t[i] == '\n') { if(blank) S[i]=' '; else blank=true; } else if(t[i] != '\t' && t[i] != ' ') blank=false; } return S; } char *startpath=NULL; void noPath() { camp::reportError("Cannot get current path"); } char *getPath(char *p) { #ifdef MAXPATHLEN static size_t size = MAXPATHLEN; #else static size_t size = 1024; #endif if(!p) p=new(UseGC) char[size]; if(!p) noPath(); else while(getcwd(p,size) == NULL) { if(errno == ERANGE) { size *= 2; p=new(UseGC) char[size]; } else {noPath(); p=NULL;} } return p; } const char *setPath(const char *s, bool quiet) { if(startpath == NULL) startpath=getPath(startpath); if(s == NULL || *s == 0) s=startpath; int rc=chdir(s); if(rc != 0) { ostringstream buf; buf << "Cannot change to directory '" << s << "'"; camp::reportError(buf); } char *p=getPath(); if(p && (!interact::interactive || quiet) && verbose > 1) cout << "cd " << p << endl; return p; } void push_command(mem::vector& a, const string& s) { a.push_back(s); #ifdef __MSDOS__ if(s == "cmd") { a.push_back("/c"); a.push_back("start"); a.push_back("\"\""); } #endif } void popupHelp() { // If the popped-up help is already running, pid stores the pid of the viewer. static int pid=0; // Status is ignored. static int status=0; // If the help viewer isn't running (or its last run has termined), launch the // viewer again. if (pid==0 || (waitpid(pid, &status, WNOHANG) == pid)) { mem::vector cmd; push_command(cmd,getSetting("pdfviewer")); string viewerOptions=getSetting("pdfviewerOptions"); if(!viewerOptions.empty()) cmd.push_back(viewerOptions); cmd.push_back(docdir+dirsep+"asymptote.pdf"); status=System(cmd,0,false,"pdfviewer","your PDF viewer",&pid); } } const char *intrange="integer argument is outside valid range"; const char *uintrange="integer argument is outside valid unsigned range"; unsigned unsignedcast(Int n) { if(n < 0 || n/2 > INT_MAX) vm::error(uintrange); return (unsigned) n; } unsignedInt unsignedIntcast(Int n) { if(n < 0) vm::error(uintrange); return (unsignedInt) n; } int intcast(Int n) { if(Abs(n) > INT_MAX) vm::error(intrange); return (int) n; } Int Intcast(unsignedInt n) { if(n > (unsignedInt) Int_MAX) vm::error(intrange); return (Int) n; } ./asymptote-2.41/Makefile.in0000644000175000017500000002320713064427076015614 0ustar norbertnorbert# @configure_input@ ARCH = unix POLL = poll GCVERSION = @GCVERSION@ GC = gc-$(GCVERSION) LIBATOMIC = libatomic_ops-@ATOMICVERSION@ GCOPTIONS = @GCOPTIONS@ GCLIB = @GCLIB@ GCPPLIB = @GCPPLIB@ GCLIBS = $(GCPPLIB) $(GCLIB) LFLAGS = @LDFLAGS@ LIBS = $(LFLAGS) @PTHREAD_LIBS@ @LIBS@ $(GCLIBS) DOSLIBS = $(subst -lncurses, -ltermcap, $(LIBS)) -s -static PERL = perl # Libraries needed to make asymptote.so. # We have to remove OpenGL, threading, GC, etc from this. SHAREDLIBS = $(filter-out -lGL -lGLU -lglut -pthread $(GCLIBS), $(LIBS)) vpath %.cc prc CAMP = camperror path drawpath drawlabel picture psfile texfile util settings \ guide flatguide knot drawfill path3 drawpath3 drawsurface \ beziercurve bezierpatch pen pipestream RUNTIME_FILES = runtime runbacktrace runpicture runlabel runhistory runarray \ runfile runsystem runpair runtriple runpath runpath3d runstring \ runmath # Files to be scanned for pre-translated symbols defined by SYM(name). SYMBOL_FILES = types builtin gsl $(RUNTIME_FILES) PRC = PRCbitStream oPRCFile PRCdouble writePRC COREFILES = $(CAMP) $(SYMBOL_FILES) env genv stm dec errormsg \ callable name symbol entry exp newexp stack camp.tab lex.yy \ access virtualfieldaccess absyn record interact fileio \ fftw++asy simpson coder coenv impdatum \ @getopt@ locate parser program application varinit fundec refaccess \ envcompleter process constructor array Delaunay predicates \ $(PRC) glrender tr arcball algebra3 quaternion FILES = $(COREFILES) main DIST = camp.tab.h camp.tab.cc lex.yy.cc runtime.cc keywords.cc \ asy-keywords.el $(RUNTIME_FILES:=.cc) $(RUNTIME_FILES:=.h) asy.list \ allsymbols.h opsymbols.h $(SYMBOL_FILES:=.symbols.h) NAME = asy XNAME = x$(NAME) CLEAN = camp.output base/version.asy doc/version.texi \ GUI/xasyVersion.py $(XNAME) doc/asy-latex.pdf EXTRA = asy-mode.el asy-init.el asy.vim asy_filetype.vim asy-kate.sh \ asymptote.py reload.js nopapersize.ps EXEXTRA = piicon.eps *.views *.dat *.bib DOCEXTRA = *.asy *.csv *.dat latexusage.tex externalprc.tex pixel.pdf KEYWORDS = base $(ASYMPTOTE_SITEDIR) LATEXFILES = asymptote.sty asycolors.sty ocg.sty latexmkrc CONTEXTFILES = colo-asy.tex ASY = ./asy -dir base -config "" -render=0 DEFS = @DEFS@ @OPTIONS@ @PTHREAD_CFLAGS@ -DFFTWPP_SINGLE_THREAD CFLAGS = @CFLAGS@ OPTS = $(DEFS) @CPPFLAGS@ @CXXFLAGS@ $(CFLAGS) INCL = -I. @INCL@ # Options for compiling the object files for the shared library. # gc has to be configured with the option --disable-threads in order to make a # shared library that doesn't seg fault. For now, just disable gc in the # shared library. SHAREDOPTS = $(filter-out -DUSEGC, $(OPTS)) -fPIC -DFOR_SHARED CXX = @CXX@ -Wall CC = @CC@ -Wall MAKEDEPEND = $(OPTS) -O0 -M -DDEPEND BISON = bison LEX = @LEX@ prefix = @prefix@ exec_prefix = @exec_prefix@ datarootdir = @datarootdir@ bindir = $(DESTDIR)@bindir@ mandir = $(DESTDIR)@mandir@ infodir = $(DESTDIR)@infodir@ datadir = $(DESTDIR)@datadir@ asydir = $(datadir)/asymptote GUIdir = $(asydir)/GUI docdir = $(DESTDIR)@docdir@ exampledir = $(docdir)/examples animationsdir = $(exampledir)/animations latexdir = $(DESTDIR)@latexdir@ contextdir = $(DESTDIR)@contextdir@ INSTALL = @INSTALL@ REVISION = "const char *REVISION=" last = $(shell cat revision.cc | sed -e 's/.*\"\(.*\)\";/\1/') usinggit = $(shell if test -d ".git"; then echo yes; fi) ifeq ($(usinggit),yes) revision = $(shell LC_ALL="C" git describe --long | sed -e 's/git//' \ | sed -e 's/-g.*//') else revision = @VERSION@ endif export prefix docdir exampledir mandir infodir INSTALL MAKE DESTDIR TEXI2DVI asy: version if test -n "$(MSDOS)"; then \ $(CXX) $(OPTS) -o $(NAME) $(FILES:=.o) revision.o asy.o $(DOSLIBS); \ else \ ln -sf GUI/xasy.py $(XNAME); \ $(CXX) $(OPTS) -o $(NAME) $(FILES:=.o) revision.o $(LIBS); \ fi version: $(GCLIB) $(FILES:=.o) if test ! -s revision.cc -o "$(revision)" != "$(last)"; then \ echo $(REVISION)\"$(revision)\"\; > revision.cc; \ fi $(CXX) $(OPTS) $(INCL) -o revision.o -c revision.cc; echo string VERSION=\"$(revision)\"\; > base/version.asy echo @set VERSION $(revision) > doc/version.texi echo @set Datadir @datadir@ >> doc/version.texi echo "#!/usr/bin/env python" > GUI/xasyVersion.py echo xasyVersion = \"$(revision)\" >> GUI/xasyVersion.py if test -n "$(MSDOS)"; then \ cat asy.rc | sed -e "s/ASYMPTOTE_VERSION/$(revision)/" | \ windres -o asy.o; \ fi asymptote.so: $(COREFILES:=.pic.o) $(CXX) $(OPTS) -shared -o asymptote.so revision.o $(COREFILES:=.pic.o) $(SHAREDLIBS) all: asy sty man faq asy-keywords.el $(GCLIB): $(GC).tar.gz gunzip -c $(GC).tar.gz > $(GC).tar tar -xf $(GC).tar rm -f $(GC).tar if test -r $(LIBATOMIC).tar.gz; then \ gunzip -c $(LIBATOMIC).tar.gz > $(LIBATOMIC).tar; \ tar -xf $(LIBATOMIC).tar; \ rm -f $(LIBATOMIC).tar; \ mv $(LIBATOMIC) $(GC)/libatomic_ops; \ fi if test "$(GC)" = "gc-7.0"; then \ cd $(GC)/include/private && \ patch < ../../../patches/gc-7.0nomem.patch; \ fi if test "$(GC)" = "gc-7.2b"; then \ mv gc-7.2 gc-7.2b; \ fi if test "$(GC)" = "gc-7.2c"; then \ mv gc-7.2 gc-7.2c; \ fi if test "$(GC)" = "gc-7.2d"; then \ mv gc-7.2 gc-7.2d; \ fi cd $(GC) && \ ./configure CC="$(CC)" CXX="$(CXX)" $(GCOPTIONS); \ $(MAKE) check $(GCPPLIB): $(GCLIB) sty: cd doc && $(MAKE) asy-latex.pdf dvi: asy sty cd doc && $(MAKE) dvi html: asy sty cd doc && $(MAKE) doc man: asy sty cd doc && $(MAKE) man faq: asy sty cd doc && $(MAKE) faq $(RUNTIME_FILES:=.cc): %.cc: runtime.pl opsymbols.h runtimebase.in %.in $(PERL) ./runtime.pl $(@:.cc=) $(SYMBOL_FILES:=.symbols.h): %.symbols.h: findsym.pl %.cc $(CXX) -E -DNOSYM $(OPTS) $(INCL) $(@:.symbols.h=.cc) | \ $(PERL) ./findsym.pl $@ - $(SYMBOL_FILES:=.o): %.o: %.symbols.h allsymbols.h: findsym.pl $(SYMBOL_FILES:=.cc) $(CXX) -E -DNOSYM $(OPTS) $(INCL) $(SYMBOL_FILES:=.cc) | \ $(PERL) ./findsym.pl $@ - symbol.o: opsymbols.h allsymbols.h camp.tab.cc: camp.y $(BISON) -dvt -b camp camp.y && mv camp.tab.c camp.tab.cc camp.tab.h: camp.tab.cc lex.yy.cc: camp.l $(LEX) -d -olex.yy.cc camp.l lex.yy.d: $(GCLIB) lex.yy.cc camp.tab.h keywords.cc: keywords.pl camp.l process.cc $(PERL) ./keywords.pl opsymbols.h: opsymbols.pl camp.l $(PERL) ./opsymbols.pl envcompleter.d: keywords.cc asy-keywords.el: asy @echo Creating $@; $(ASY) -l > asy.list ls $(addsuffix /*.asy,$(KEYWORDS)) | grep -v plain\* | \ grep -v three_\* | grep -v featpost3D | xargs $(ASY) -l >> asy.list $(PERL) ./asy-list.pl asy.list $(revision) install: asy-keywords.el install-texhash install-man install-all: install install-html install-texhash: install-asy -if test -z "$(DESTDIR)"; then \ texhash; \ fi install-asy: asy sty ${INSTALL} -d $(bindir) $(asydir) $(GUIdir) $(exampledir) \ $(animationsdir) -${INSTALL} -d $(latexdir) -${INSTALL} -d $(contextdir) ${INSTALL} -p -m 755 $(NAME) $(bindir) ${INSTALL} -p -m 644 base/*.asy $(addprefix base/,$(EXTRA)) \ asy-keywords.el $(asydir) ${INSTALL} -p -m 755 GUI/*.py $(GUIdir) ln -sf @datadir@/asymptote/GUI/xasy.py $(bindir)/$(XNAME) ${INSTALL} -p -m 644 examples/*.asy $(addprefix examples/,$(EXEXTRA)) \ doc/extra/*.asy $(addprefix doc/,$(DOCEXTRA)) $(exampledir) ${INSTALL} -p -m 644 examples/animations/*.asy \ examples/animations/inlinemovie.tex \ examples/animations/inlinemovie3.tex $(animationsdir) -${INSTALL} -p -m 644 $(addprefix doc/,$(LATEXFILES)) $(latexdir) -${INSTALL} -p -m 644 $(addprefix doc/,$(CONTEXTFILES)) $(contextdir) install-html: html cd doc && $(MAKE) install-all install-man: man cd doc && $(MAKE) install install-prebuilt: install-asy cd doc && $(MAKE) install-prebuilt uninstall: uninstall-all uninstall-all: uninstall-man uninstall-asy uninstall-docdir uninstall-asy: -cd $(animationsdir) && rm -f *.asy *.tex -rmdir $(animationsdir) -cd $(exampledir) && rm -f $(EXEXTRA) $(DOCEXTRA) -rmdir $(exampledir) -cd $(GUIdir) && rm -f *.py -rmdir $(GUIdir) -cd $(asydir) && rm -f asy-keywords.el *.asy $(EXTRA) -rmdir $(asydir) -cd $(latexdir) && rm -f $(LATEXFILES) -rmdir $(latexdir) -cd $(contextdir) && rm -f $(CONTEXTFILES) -rmdir $(contextdir) -cd $(bindir) && rm -f $(NAME) $(XNAME) uninstall-man: cd doc && $(MAKE) uninstall uninstall-docdir: -rmdir $(docdir) clean: FORCE -rm -f asy asymptote.so *.pic.o *.o *.d *mon.out $(CLEAN) gc-clean: FORCE clean -if test -d $(GC); then \ $(MAKE) -C $(GC) clean; \ fi cleaner: FORCE clean -if test -d $(GC); then \ rm -rf $(GC); \ fi -rm -f Makefile config.h config.log config.status errors.temp cd doc && $(MAKE) clean cd tests && $(MAKE) distclean distclean: FORCE cleaner cd doc && $(MAKE) distclean cleanest: FORCE maintainer-clean maintainer-clean: FORCE distclean -rm -f configure config.h.in $(DIST) -rm -rf autom4te.cache check: asy FORCE ./wce $(MAKE) -C tests check-all: asy FORCE ./wce $(MAKE) -C tests all .SUFFIXES: .c .cc .o .d .cc.o: $(CXX) $(OPTS) $(INCL) -o $@ -c $< .cc.d: @echo Creating $@; \ rm -f $@; \ ${CXX} $(MAKEDEPEND) $(INCL) $(MDOPTS) $< > $@.$$$$ 2>/dev/null && \ sed 's,\($*\)\.o[ :]*,\1.o \1.pic.o $@ : ,g' < $@.$$$$ > $@; \ rm -f $@.$$$$ .c.d: @echo Creating $@; \ rm -f $@; \ ${CC} $(MAKEDEPEND) $(INCL) $(MDOPTS) $< > $@.$$$$ 2>/dev/null && \ sed 's,\($*\)\.o[ :]*,\1.o $@ : ,g' < $@.$$$$ > $@; \ rm -f $@.$$$$ # Compile for the shared library. OpenGL must be disabled as it causes # crashes inside a shared library. %.pic.o: %.cc $(CXX) $(SHAREDOPTS) $(INCL) -o $@ -c $< ifeq (,$(findstring clean,${MAKECMDGOALS})) -include $(FILES:=.d) endif FORCE: configure: configure.ac autoheader && autoconf Makefile: Makefile.in config.status ./config.status config.status: configure ./config.status --recheck ./asymptote-2.41/autogen.sh0000755000175000017500000000004213064427076015540 0ustar norbertnorbert#!/bin/sh autoheader && autoconf ./asymptote-2.41/prc/0000755000175000017500000000000013064427076014327 5ustar norbertnorbert./asymptote-2.41/prc/PRCdouble.h0000644000175000017500000000726513064427076016331 0ustar norbertnorbert#ifndef __PRC_DOUBLE_H #define __PRC_DOUBLE_H #include #include #include #ifdef HAVE_CONFIG_H #include "config.h" #endif #ifdef BYTE_ORDER # undef WORDS_BIG_ENDIAN # undef WORDS_LITTLE_ENDIAN # if BYTE_ORDER == BIG_ENDIAN # define WORDS_BIG_ENDIAN 1 # endif # if BYTE_ORDER == LITTLE_ENDIAN # define WORDS_LITTLE_ENDIAN 1 # endif #endif // from Adobe's documentation union ieee754_double { double d; /* This is the IEEE 754 double-precision format. */ struct { #ifdef WORDS_BIGENDIAN unsigned int negative:1; unsigned int exponent:11; /* Together these comprise the mantissa. */ unsigned int mantissa0:20; unsigned int mantissa1:32; #else /* Together these comprise the mantissa. */ unsigned int mantissa1:32; unsigned int mantissa0:20; unsigned int exponent:11; unsigned int negative:1; #endif } ieee; }; union ieee754_float { float f; /* This is the IEEE 754 float-precision format. */ struct { #ifdef WORDS_BIGENDIAN unsigned int negative:1; unsigned int exponent:8; unsigned int mantissa:23; #else unsigned int mantissa:23; unsigned int exponent:8; unsigned int negative:1; #endif } ieee; }; enum ValueType {VT_double,VT_exponent}; struct sCodageOfFrequentDoubleOrExponent { short Type; short NumberOfBits; unsigned Bits; union { unsigned ul[2]; double Value; } u2uod; }; #ifdef WORDS_BIGENDIAN # define DOUBLEWITHTWODWORD(upper,lower) upper,lower # define UPPERPOWER (0) # define LOWERPOWER (!UPPERPOWER) # define NEXTBYTE(pbd) ((pbd)++) # define PREVIOUSBYTE(pbd) ((pbd)--) # define MOREBYTE(pbd,pbend) ((pbd)<=(pbend)) # define OFFSETBYTE(pbd,offset) ((pbd)+=offset) # define BEFOREBYTE(pbd) ((pbd)-1) # define DIFFPOINTERS(p1,p2) ((p1)-(p2)) # define SEARCHBYTE(pbstart,b,nb) (unsigned char *)memrchr((pbstart),(b),(nb)) # define BYTEAT(pb,i) *((pb)-(i)) #else # define DOUBLEWITHTWODWORD(upper,lower) lower,upper # define UPPERPOWER (1) # define LOWERPOWER (!UPPERPOWER) # define NEXTBYTE(pbd) ((pbd)--) # define PREVIOUSBYTE(pbd) ((pbd)++) # define MOREBYTE(pbd,pbend) ((pbd)>=(pbend)) # define OFFSETBYTE(pbd,offset) ((pbd)-=offset) # define BEFOREBYTE(pbd) ((pbd)+1) # define DIFFPOINTERS(p1,p2) ((unsigned)((p2)-(p1))) # define SEARCHBYTE(pbstart,b,nb) (unsigned char *)memchr((pbstart),(b),(nb)) # define BYTEAT(pb,i) *((pb)+(i)) #endif #define MAXLENGTHFORCOMPRESSEDTYPE ((22+1+1+4+6*(1+8))+7)/8 #define NEGATIVE(d) (((union ieee754_double *)&(d))->ieee.negative) #define EXPONENT(d) (((union ieee754_double *)&(d))->ieee.exponent) #define MANTISSA0(d) (((union ieee754_double *)&(d))->ieee.mantissa0) #define MANTISSA1(d) (((union ieee754_double *)&(d))->ieee.mantissa1) typedef unsigned char PRCbyte; typedef unsigned short PRCword; typedef unsigned PRCdword; extern PRCdword stadwZero[2],stadwNegativeZero[2]; #define NUMBEROFELEMENTINACOFDOE (2077) #ifdef WORDS_BIGENDIAN # define DOUBLEWITHTWODWORDINTREE(upper,lower) {upper,lower} #else # define DOUBLEWITHTWODWORDINTREE(upper,lower) {lower,upper} #endif extern sCodageOfFrequentDoubleOrExponent acofdoe[NUMBEROFELEMENTINACOFDOE]; struct sCodageOfFrequentDoubleOrExponent* getcofdoe(unsigned,short); #define STAT_V #define STAT_DOUBLE int stCOFDOECompare(const void*,const void*); #ifdef WORDS_BIGENDIAN #ifndef HAVE_MEMRCHR void *memrchr(const void *,int,size_t); #endif #endif #endif // __PRC_DOUBLE_H ./asymptote-2.41/prc/oPRCFile.h0000644000175000017500000014435013064427076016112 0ustar norbertnorbert/************ * * This file is part of a tool for producing 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt and * Michail Vidiassov * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #ifndef __O_PRC_FILE_H #define __O_PRC_FILE_H #include #include #include #include #include #include #include #include #include #ifdef HAVE_CONFIG_H #include "config.h" #endif #include "PRC.h" #include "PRCbitStream.h" #include "writePRC.h" namespace prc { class oPRCFile; class PRCFileStructure; // Map [0,1] to [0,255] inline uint8_t byte(double r) { if(r < 0.0) r=0.0; else if(r > 1.0) r=1.0; int a=(int)(256.0*r); if(a == 256) a=255; return a; } struct RGBAColour { RGBAColour(double r=0.0, double g=0.0, double b=0.0, double a=1.0) : R(r), G(g), B(b), A(a) {} double R,G,B,A; void Set(double r, double g, double b, double a=1.0) { R = r; G = g; B = b; A = a; } bool operator==(const RGBAColour &c) const { return (R==c.R && G==c.G && B==c.B && A==c.A); } bool operator!=(const RGBAColour &c) const { return !(R==c.R && G==c.G && B==c.B && A==c.A); } bool operator<(const RGBAColour &c) const { if(R!=c.R) return (R PRCcolourMap; struct RGBAColourWidth { RGBAColourWidth(double r=0.0, double g=0.0, double b=0.0, double a=1.0, double w=1.0) : R(r), G(g), B(b), A(a), W(w) {} double R,G,B,A,W; bool operator==(const RGBAColourWidth &c) const { return (R==c.R && G==c.G && B==c.B && A==c.A && W==c.W); } bool operator!=(const RGBAColourWidth &c) const { return !(R==c.R && G==c.G && B==c.B && A==c.A && W==c.W); } bool operator<(const RGBAColourWidth &c) const { if(R!=c.R) return (R PRCcolourwidthMap; typedef std::map PRCcolorMap; struct PRCmaterial { PRCmaterial() : alpha(1.0),shininess(1.0), picture_data(NULL), picture_format(KEPRCPicture_BITMAP_RGB_BYTE), picture_width(0), picture_height(0), picture_size(0), picture_replace(false), picture_repeat(false) {} PRCmaterial(const RGBAColour &a, const RGBAColour &d, const RGBAColour &e, const RGBAColour &s, double p, double h, const uint8_t* pic=NULL, EPRCPictureDataFormat picf=KEPRCPicture_BITMAP_RGB_BYTE, uint32_t picw=0, uint32_t pich=0, uint32_t pics=0, bool picreplace=false, bool picrepeat=false) : ambient(a), diffuse(d), emissive(e), specular(s), alpha(p), shininess(h), picture_data(pic), picture_format(picf), picture_width(picw), picture_height(pich), picture_size(pics), picture_replace(picreplace), picture_repeat(picrepeat) { if(picture_size==0) { if (picture_format==KEPRCPicture_BITMAP_RGB_BYTE) picture_size = picture_width*picture_height*3; if (picture_format==KEPRCPicture_BITMAP_RGBA_BYTE) picture_size = picture_width*picture_height*4; if (picture_format==KEPRCPicture_BITMAP_GREY_BYTE) picture_size = picture_width*picture_height*1; if (picture_format==KEPRCPicture_BITMAP_GREYA_BYTE) picture_size = picture_width*picture_height*2; } } RGBAColour ambient,diffuse,emissive,specular; double alpha,shininess; const uint8_t* picture_data; EPRCPictureDataFormat picture_format; uint32_t picture_width; uint32_t picture_height; uint32_t picture_size; bool picture_replace; // replace material color with texture color? if false - just modify bool picture_repeat; // repeat texture? if false - clamp to edge bool operator==(const PRCmaterial &m) const { return (ambient==m.ambient && diffuse==m.diffuse && emissive==m.emissive && specular==m.specular && alpha==m.alpha && shininess==m.shininess && picture_replace==m.picture_replace && picture_repeat==m.picture_repeat && picture_format==m.picture_format && picture_width==m.picture_width && picture_height==m.picture_height && picture_size==m.picture_size && (picture_data==m.picture_data || memcmp(picture_data,m.picture_data,picture_size)==0) ); } bool operator<(const PRCmaterial &m) const { if(ambient!=m.ambient) return (ambient PRCmaterialMap; struct PRCpicture { PRCpicture() : data(NULL), format(KEPRCPicture_BITMAP_RGB_BYTE), width(0), height(0), size(0) {} PRCpicture(const uint8_t* pic, EPRCPictureDataFormat picf, uint32_t picw, uint32_t pich, uint32_t pics=0) : data(pic), format(picf), width(picw), height(pich), size(pics) { if(size==0) { if (format==KEPRCPicture_BITMAP_RGB_BYTE) size = width*height*3; if (format==KEPRCPicture_BITMAP_RGBA_BYTE) size = width*height*4; if (format==KEPRCPicture_BITMAP_GREY_BYTE) size = width*height*1; if (format==KEPRCPicture_BITMAP_GREYA_BYTE) size = width*height*2; } } PRCpicture(const PRCmaterial& m) : data(m.picture_data), format(m.picture_format), width(m.picture_width), height(m.picture_height), size(m.picture_size) {} const uint8_t* data; EPRCPictureDataFormat format; uint32_t width; uint32_t height; uint32_t size; bool operator==(const PRCpicture& p) const { return ( format==p.format && width==p.width && height==p.height && size==p.size && (data==p.data || memcmp(data,p.data,size)==0) ); } bool operator<(const PRCpicture& p) const { if(format!=p.format) return (format PRCpictureMap; struct PRCmaterialgeneric { PRCmaterialgeneric() : alpha(1.0),shininess(1.0) {} PRCmaterialgeneric(const RGBAColour& a, const RGBAColour& d, const RGBAColour& e, const RGBAColour& s, double p, double h) : ambient(a), diffuse(d), emissive(e), specular(s), alpha(p), shininess(h) {} PRCmaterialgeneric(const PRCmaterial& m) : ambient(m.ambient), diffuse(m.diffuse), emissive(m.emissive), specular(m.specular), alpha(m.alpha), shininess(m.shininess) {} RGBAColour ambient,diffuse,emissive,specular; double alpha,shininess; bool operator==(const PRCmaterialgeneric& m) const { return (ambient==m.ambient && diffuse==m.diffuse && emissive==m.emissive && specular==m.specular && alpha==m.alpha && shininess==m.shininess); } bool operator<(const PRCmaterialgeneric& m) const { if(ambient!=m.ambient) return (ambient PRCmaterialgenericMap; struct PRCtexturedefinition { PRCtexturedefinition() : picture_index(m1), picture_replace(false), picture_repeat(false) {} PRCtexturedefinition(uint32_t picindex, bool picreplace=false, bool picrepeat=false) : picture_index(picindex), picture_replace(picreplace), picture_repeat(picrepeat) {} PRCtexturedefinition(uint32_t picindex, const PRCmaterial& m) : picture_index(picindex), picture_replace(m.picture_replace), picture_repeat(m.picture_repeat) {} uint32_t picture_index; bool picture_replace; // replace material color with texture color? if false - just modify bool picture_repeat; // repeat texture? if false - clamp to edge bool operator==(const PRCtexturedefinition& t) const { return (picture_index==t.picture_index && picture_replace==t.picture_replace && picture_repeat==t.picture_repeat); } bool operator<(const PRCtexturedefinition& t) const { if(picture_index!=t.picture_index) return (picture_index PRCtexturedefinitionMap; struct PRCtextureapplication { PRCtextureapplication() : material_generic_index(m1), texture_definition_index(m1) {} PRCtextureapplication(uint32_t matindex, uint32_t texindex) : material_generic_index(matindex), texture_definition_index(texindex) {} uint32_t material_generic_index; uint32_t texture_definition_index; bool operator==(const PRCtextureapplication& t) const { return (material_generic_index==t.material_generic_index && texture_definition_index==t.texture_definition_index); } bool operator<(const PRCtextureapplication& t) const { if(material_generic_index!=t.material_generic_index) return (material_generic_index PRCtextureapplicationMap; struct PRCstyle { PRCstyle() : line_width(0), alpha(1), is_material(false), color_material_index(m1) {} PRCstyle(double linewidth, double alph, bool ismat, uint32_t colindex=m1) : line_width(linewidth), alpha(alph), is_material(ismat), color_material_index(colindex) {} double line_width; double alpha; bool is_material; uint32_t color_material_index; bool operator==(const PRCstyle& s) const { return (line_width==s.line_width && alpha==s.alpha && is_material==s.is_material && color_material_index==s.color_material_index); } bool operator<(const PRCstyle& s) const { if(line_width!=s.line_width) return (line_width PRCstyleMap; struct PRCtessrectangle // rectangle { PRCVector3d vertices[4]; uint32_t style; }; typedef std::vector PRCtessrectangleList; struct PRCtessquad // rectangle { PRCVector3d vertices[4]; RGBAColour colours[4]; }; typedef std::vector PRCtessquadList; /* struct PRCtesstriangle // textured triangle { PRCtesstriangle() : style(m1) {} PRCVector3d vertices[3]; // PRCVector3d normals[3]; // RGBAColour colors[3]; PRCVector2d texcoords[3]; uint32_t style; }; typedef std::vector PRCtesstriangleList; */ struct PRCtessline // polyline { std::vector point; PRCRgbColor color; }; typedef std::list PRCtesslineList; typedef std::map PRCtesslineMap; struct PRCface { PRCface() : transform(NULL), face(NULL) {} uint32_t style; bool transparent; PRCGeneralTransformation3d* transform; PRCFace* face; }; typedef std::vector PRCfaceList; struct PRCcompface { PRCcompface() : face(NULL) {} uint32_t style; bool transparent; PRCCompressedFace* face; }; typedef std::vector PRCcompfaceList; struct PRCwire { PRCwire() : style(m1), transform(NULL), curve(NULL) {} uint32_t style; PRCGeneralTransformation3d* transform; PRCCurve* curve; }; typedef std::vector PRCwireList; typedef std::map > PRCpointsetMap; class PRCoptions { public: double compression; double granularity; bool closed; // render the surface as one-sided; may yield faster rendering bool tess; // use tessellated mesh to store straight patches bool do_break; // bool no_break; // do not render transparent patches as one-faced nodes double crease_angle; // crease angle for meshes PRCoptions(double compression=0.0, double granularity=0.0, bool closed=false, bool tess=false, bool do_break=true, bool no_break=false, double crease_angle=25.8419) : compression(compression), granularity(granularity), closed(closed), tess(tess), do_break(do_break), no_break(no_break), crease_angle(crease_angle) {} }; class PRCgroup { public: PRCgroup() : product_occurrence(NULL), parent_product_occurrence(NULL), part_definition(NULL), parent_part_definition(NULL), transform(NULL) {} PRCgroup(const std::string& name) : product_occurrence(NULL), parent_product_occurrence(NULL), part_definition(NULL), parent_part_definition(NULL), transform(NULL), name(name) {} PRCProductOccurrence *product_occurrence, *parent_product_occurrence; PRCPartDefinition *part_definition, *parent_part_definition; PRCfaceList faces; PRCcompfaceList compfaces; PRCtessrectangleList rectangles; // PRCtesstriangleList triangles; PRCtessquadList quads; PRCtesslineMap lines; PRCwireList wires; PRCpointsetMap points; std::vector pointsets; std::vector polymodels; std::vector polywires; PRCGeneralTransformation3d* transform; std::string name; PRCoptions options; }; void makeFileUUID(PRCUniqueId&); void makeAppUUID(PRCUniqueId&); class PRCUncompressedFile { public: PRCUncompressedFile() : file_size(0), data(NULL) {} PRCUncompressedFile(uint32_t fs, uint8_t *d) : file_size(fs), data(d) {} ~PRCUncompressedFile() { if(data != NULL) delete[] data; } uint32_t file_size; uint8_t *data; void write(std::ostream&) const; uint32_t getSize() const; }; typedef std::deque PRCUncompressedFileList; class PRCStartHeader { public: uint32_t minimal_version_for_read; // PRCVersion uint32_t authoring_version; // PRCVersion PRCUniqueId file_structure_uuid; PRCUniqueId application_uuid; // should be 0 PRCStartHeader() : minimal_version_for_read(PRCVersion), authoring_version(PRCVersion) {} void serializeStartHeader(std::ostream&) const; uint32_t getStartHeaderSize() const; }; class PRCFileStructure : public PRCStartHeader { public: uint32_t number_of_referenced_file_structures; double tessellation_chord_height_ratio; double tessellation_angle_degree; std::string default_font_family_name; std::vector colors; std::vector pictures; PRCUncompressedFileList uncompressed_files; PRCTextureDefinitionList texture_definitions; PRCMaterialList materials; PRCStyleList styles; PRCCoordinateSystemList reference_coordinate_systems; std::vector font_keys_of_font; PRCPartDefinitionList part_definitions; PRCProductOccurrenceList product_occurrences; // PRCMarkupList markups; // PRCAnnotationItemList annotation_entities; double unit; PRCTopoContextList contexts; PRCTessList tessellations; uint32_t sizes[6]; uint8_t *globals_data; PRCbitStream globals_out; // order matters: PRCbitStream must be initialized last uint8_t *tree_data; PRCbitStream tree_out; uint8_t *tessellations_data; PRCbitStream tessellations_out; uint8_t *geometry_data; PRCbitStream geometry_out; uint8_t *extraGeometry_data; PRCbitStream extraGeometry_out; ~PRCFileStructure () { for(PRCUncompressedFileList::iterator it=uncompressed_files.begin(); it!=uncompressed_files.end(); ++it) delete *it; for(PRCTextureDefinitionList::iterator it=texture_definitions.begin(); it!=texture_definitions.end(); ++it) delete *it; for(PRCMaterialList::iterator it=materials.begin(); it!=materials.end(); ++it) delete *it; for(PRCStyleList::iterator it=styles.begin(); it!=styles.end(); ++it) delete *it; for(PRCTopoContextList::iterator it=contexts.begin(); it!=contexts.end(); ++it) delete *it; for(PRCTessList::iterator it=tessellations.begin(); it!=tessellations.end(); ++it) delete *it; for(PRCPartDefinitionList::iterator it=part_definitions.begin(); it!=part_definitions.end(); ++it) delete *it; for(PRCProductOccurrenceList::iterator it=product_occurrences.begin(); it!=product_occurrences.end(); ++it) delete *it; for(PRCCoordinateSystemList::iterator it=reference_coordinate_systems.begin(); it!=reference_coordinate_systems.end(); it++) delete *it; free(globals_data); free(tree_data); free(tessellations_data); free(geometry_data); free(extraGeometry_data); } PRCFileStructure() : number_of_referenced_file_structures(0), tessellation_chord_height_ratio(2000.0),tessellation_angle_degree(40.0), default_font_family_name(""), unit(1), globals_data(NULL),globals_out(globals_data,0), tree_data(NULL),tree_out(tree_data,0), tessellations_data(NULL),tessellations_out(tessellations_data,0), geometry_data(NULL),geometry_out(geometry_data,0), extraGeometry_data(NULL),extraGeometry_out(extraGeometry_data,0) {} void write(std::ostream&); void prepare(); uint32_t getSize(); void serializeFileStructureGlobals(PRCbitStream&); void serializeFileStructureTree(PRCbitStream&); void serializeFileStructureTessellation(PRCbitStream&); void serializeFileStructureGeometry(PRCbitStream&); void serializeFileStructureExtraGeometry(PRCbitStream&); uint32_t addPicture(EPRCPictureDataFormat format, uint32_t size, const uint8_t *picture, uint32_t width=0, uint32_t height=0, std::string name=""); uint32_t addTextureDefinition(PRCTextureDefinition*& pTextureDefinition); uint32_t addRgbColor(const PRCRgbColor &color); uint32_t addRgbColorUnique(const PRCRgbColor &color); uint32_t addMaterialGeneric(PRCMaterialGeneric*& pMaterialGeneric); uint32_t addTextureApplication(PRCTextureApplication*& pTextureApplication); uint32_t addStyle(PRCStyle*& pStyle); uint32_t addPartDefinition(PRCPartDefinition*& pPartDefinition); uint32_t addProductOccurrence(PRCProductOccurrence*& pProductOccurrence); uint32_t addTopoContext(PRCTopoContext*& pTopoContext); uint32_t getTopoContext(PRCTopoContext*& pTopoContext); uint32_t add3DTess(PRC3DTess*& p3DTess); uint32_t add3DWireTess(PRC3DWireTess*& p3DWireTess); /* uint32_t addMarkupTess(PRCMarkupTess*& pMarkupTess); uint32_t addMarkup(PRCMarkup*& pMarkup); uint32_t addAnnotationItem(PRCAnnotationItem*& pAnnotationItem); */ uint32_t addCoordinateSystem(PRCCoordinateSystem*& pCoordinateSystem); uint32_t addCoordinateSystemUnique(PRCCoordinateSystem*& pCoordinateSystem); }; class PRCFileStructureInformation { public: PRCUniqueId UUID; uint32_t reserved; // 0 uint32_t number_of_offsets; uint32_t *offsets; void write(std::ostream&); uint32_t getSize(); }; class PRCHeader : public PRCStartHeader { public : uint32_t number_of_file_structures; PRCFileStructureInformation *fileStructureInformation; uint32_t model_file_offset; uint32_t file_size; // not documented PRCUncompressedFileList uncompressed_files; void write(std::ostream&); uint32_t getSize(); }; typedef std::map PRCtransformMap; inline double X(const double *v) {return v[0];} inline double Y(const double *v) {return v[1];} inline double Z(const double *v) {return v[2];} class oPRCFile { public: oPRCFile(std::ostream &os, double u=1, uint32_t n=1) : number_of_file_structures(n), fileStructures(new PRCFileStructure*[n]), unit(u), modelFile_data(NULL),modelFile_out(modelFile_data,0), fout(NULL),output(os) { for(uint32_t i = 0; i < number_of_file_structures; ++i) { fileStructures[i] = new PRCFileStructure(); fileStructures[i]->minimal_version_for_read = PRCVersion; fileStructures[i]->authoring_version = PRCVersion; makeFileUUID(fileStructures[i]->file_structure_uuid); makeAppUUID(fileStructures[i]->application_uuid); fileStructures[i]->unit = u; } groups.push(PRCgroup()); PRCgroup &group = groups.top(); group.name="root"; group.transform = NULL; group.product_occurrence = new PRCProductOccurrence(group.name); group.parent_product_occurrence = NULL; group.part_definition = new PRCPartDefinition; group.parent_part_definition = NULL; } oPRCFile(const std::string &name, double u=1, uint32_t n=1) : number_of_file_structures(n), fileStructures(new PRCFileStructure*[n]), unit(u), modelFile_data(NULL),modelFile_out(modelFile_data,0), fout(new std::ofstream(name.c_str(), std::ios::out|std::ios::binary|std::ios::trunc)), output(*fout) { for(uint32_t i = 0; i < number_of_file_structures; ++i) { fileStructures[i] = new PRCFileStructure(); fileStructures[i]->minimal_version_for_read = PRCVersion; fileStructures[i]->authoring_version = PRCVersion; makeFileUUID(fileStructures[i]->file_structure_uuid); makeAppUUID(fileStructures[i]->application_uuid); fileStructures[i]->unit = u; } groups.push(PRCgroup()); PRCgroup &group = groups.top(); group.name="root"; group.transform = NULL; group.product_occurrence = new PRCProductOccurrence(group.name); group.parent_product_occurrence = NULL; group.part_definition = new PRCPartDefinition; group.parent_part_definition = NULL; } ~oPRCFile() { for(uint32_t i = 0; i < number_of_file_structures; ++i) delete fileStructures[i]; delete[] fileStructures; if(fout != NULL) delete fout; free(modelFile_data); for(PRCpictureMap::iterator it=pictureMap.begin(); it!=pictureMap.end(); ++it) delete it->first.data; } void begingroup(const char *name, PRCoptions *options=NULL, const double* t=NULL); void endgroup(); std::string lastgroupname; std::vector lastgroupnames; std::string calculate_unique_name(const ContentPRCBase *prc_entity,const ContentPRCBase *prc_occurence); bool finish(); uint32_t getSize(); const uint32_t number_of_file_structures; PRCFileStructure **fileStructures; PRCHeader header; PRCUnit unit; uint8_t *modelFile_data; PRCbitStream modelFile_out; // order matters: PRCbitStream must be initialized last PRCcolorMap colorMap; PRCcolourMap colourMap; PRCcolourwidthMap colourwidthMap; PRCmaterialgenericMap materialgenericMap; PRCtexturedefinitionMap texturedefinitionMap; PRCtextureapplicationMap textureapplicationMap; PRCstyleMap styleMap; PRCpictureMap pictureMap; PRCgroup rootGroup; PRCtransformMap transformMap; std::stack groups; PRCgroup& findGroup(); void doGroup(PRCgroup& group); uint32_t addColor(const PRCRgbColor &color); uint32_t addColour(const RGBAColour &colour); uint32_t addColourWidth(const RGBAColour &colour, double width); uint32_t addLineMaterial(const RGBAColour& c, double width) { return addColourWidth(c,width); } uint32_t addMaterial(const PRCmaterial &material); uint32_t addTransform(PRCGeneralTransformation3d*& transform); uint32_t addTransform(const double* t); uint32_t addTransform(const double origin[3], const double x_axis[3], const double y_axis[3], double scale); template void addPoint(const V P, const RGBAColour &c, double w=1.0) { PRCgroup &group = findGroup(); group.points[addColourWidth(c,w)].push_back(PRCVector3d(X(P),Y(P),Z(P))); } void addPoints(uint32_t n, const double P[][3], const RGBAColour &c, double w=1.0); void addLines(uint32_t nP, const double P[][3], uint32_t nI, const uint32_t PI[], const RGBAColour& c, double w, bool segment_color, uint32_t nC, const RGBAColour C[], uint32_t nCI, const uint32_t CI[]); uint32_t createLines(uint32_t nP, const double P[][3], uint32_t nI, const uint32_t PI[], bool segment_color, uint32_t nC, const RGBAColour C[], uint32_t nCI, const uint32_t CI[]); template void addTriangles(uint32_t nP, const V P[], uint32_t nI, const uint32_t PI[][3], const PRCmaterial &m, uint32_t nN, const V N[], const uint32_t NI[][3], uint32_t nT, const double T[][2], const uint32_t TI[][3], uint32_t nC, const RGBAColour C[], const uint32_t CI[][3], uint32_t nM, const PRCmaterial M[], const uint32_t MI[], double ca) { if(nP==0 || P==NULL || nI==0 || PI==NULL) return; const uint32_t tess_index = createTriangleMesh(nP, P, nI, PI, m, nN, N, NI, nT, T, TI, nC, C, CI, nM, M, MI, ca); useMesh(tess_index,m1); } template uint32_t createTriangleMesh(uint32_t nP, const V P[], uint32_t nI, const uint32_t PI[][3], const PRCmaterial& m, uint32_t nN, const V N[], const uint32_t NI[][3], uint32_t nT, const double T[][2], const uint32_t TI[][3], uint32_t nC, const RGBAColour C[], const uint32_t CI[][3], uint32_t nM, const PRCmaterial M[], const uint32_t MI[], double ca) { const uint32_t style = addMaterial(m); if(M!=NULL && nM>0) { uint32_t* const styles = new uint32_t[nM]; for(uint32_t i=0; i uint32_t createTriangleMesh(uint32_t nP, const V P[], uint32_t nI, const uint32_t PI[][3], const uint32_t style_index, uint32_t nN, const V N[], const uint32_t NI[][3], uint32_t nT, const double T[][2], const uint32_t TI[][3], uint32_t nC, const RGBAColour C[], const uint32_t CI[][3], uint32_t nS, const uint32_t S[], const uint32_t SI[], double ca) { if(nP==0 || P==NULL || nI==0 || PI==NULL) return m1; const bool triangle_color = (nS != 0 && S != NULL && SI != NULL); const bool vertex_color = (nC != 0 && C != NULL && CI != NULL); const bool has_normals = (nN != 0 && N != NULL && NI != NULL); const bool textured = (nT != 0 && T != NULL && TI != NULL); PRC3DTess *tess = new PRC3DTess(); PRCTessFace *tessFace = new PRCTessFace(); tessFace->used_entities_flag = textured ? PRC_FACETESSDATA_TriangleTextured : PRC_FACETESSDATA_Triangle; tessFace->number_of_texture_coordinate_indexes = textured ? 1 : 0; tess->coordinates.reserve(3*nP); for(uint32_t i=0; icoordinates.push_back(X(P[i])); tess->coordinates.push_back(Y(P[i])); tess->coordinates.push_back(Z(P[i])); } if(has_normals) { tess->normal_coordinate.reserve(3*nN); for(uint32_t i=0; inormal_coordinate.push_back(X(N[i])); tess->normal_coordinate.push_back(Y(N[i])); tess->normal_coordinate.push_back(Z(N[i])); } } else tess->crease_angle = ca; if(textured) { tess->texture_coordinate.reserve(2*nT); for(uint32_t i=0; itexture_coordinate.push_back(T[i][0]); tess->texture_coordinate.push_back(T[i][1]); } } tess->triangulated_index.reserve(3*nI+(has_normals?3:0)*nI+(textured?3:0)*nI); for(uint32_t i=0; itriangulated_index.push_back(3*NI[i][0]); if(textured) tess->triangulated_index.push_back(2*TI[i][0]); tess->triangulated_index.push_back(3*PI[i][0]); if(has_normals) tess->triangulated_index.push_back(3*NI[i][1]); if(textured) tess->triangulated_index.push_back(2*TI[i][1]); tess->triangulated_index.push_back(3*PI[i][1]); if(has_normals) tess->triangulated_index.push_back(3*NI[i][2]); if(textured) tess->triangulated_index.push_back(2*TI[i][2]); tess->triangulated_index.push_back(3*PI[i][2]); } tessFace->sizes_triangulated.push_back(nI); if(triangle_color) { tessFace->line_attributes.reserve(nI); for(uint32_t i=0; iline_attributes.push_back(SI[i]); } else if (style_index != m1 ) { tessFace->line_attributes.push_back(style_index); } if(vertex_color) { tessFace->is_rgba=false; for(uint32_t i=0; iis_rgba=true; break; } tessFace->rgba_vertices.reserve((tessFace->is_rgba?4:3)*3*nI); for(uint32_t i=0; irgba_vertices.push_back(byte(C[CI[i][0]].R)); tessFace->rgba_vertices.push_back(byte(C[CI[i][0]].G)); tessFace->rgba_vertices.push_back(byte(C[CI[i][0]].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[CI[i][0]].A)); tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].R)); tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].G)); tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].A)); tessFace->rgba_vertices.push_back(byte(C[CI[i][2]].R)); tessFace->rgba_vertices.push_back(byte(C[CI[i][2]].G)); tessFace->rgba_vertices.push_back(byte(C[CI[i][2]].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[CI[i][2]].A)); } } tess->addTessFace(tessFace); const uint32_t tess_index = add3DTess(tess); return tess_index; } void addQuads(uint32_t nP, const double P[][3], uint32_t nI, const uint32_t PI[][4], const PRCmaterial &m, uint32_t nN, const double N[][3], const uint32_t NI[][4], uint32_t nT, const double T[][2], const uint32_t TI[][4], uint32_t nC, const RGBAColour C[], const uint32_t CI[][4], uint32_t nM, const PRCmaterial M[], const uint32_t MI[], double ca); uint32_t createQuadMesh(uint32_t nP, const double P[][3], uint32_t nI, const uint32_t PI[][4], uint32_t style_index, uint32_t nN, const double N[][3], const uint32_t NI[][4], uint32_t nT, const double T[][2], const uint32_t TI[][4], uint32_t nC, const RGBAColour C[], const uint32_t CI[][4], uint32_t nS, const uint32_t S[], const uint32_t SI[], double ca); uint32_t createQuadMesh(uint32_t nP, const double P[][3], uint32_t nI, const uint32_t PI[][4], const PRCmaterial& m, uint32_t nN, const double N[][3], const uint32_t NI[][4], uint32_t nT, const double T[][2], const uint32_t TI[][4], uint32_t nC, const RGBAColour C[], const uint32_t CI[][4], uint32_t nM, const PRCmaterial M[], const uint32_t MI[], double ca) { const uint32_t style = addMaterial(m); if(M!=NULL && nM>0) { uint32_t* const styles = new uint32_t[nM]; for(uint32_t i=0; ibase_surface = surface; \ face.transparent = m.alpha < 1.0; \ face.style = addMaterial(m); #define ADDCOMPFACE \ PRCgroup &group = findGroup(); \ group.compfaces.push_back(PRCcompface()); \ PRCcompface& face = group.compfaces.back(); \ PRCCompressedFace *compface = new PRCCompressedFace; \ face.face = compface; \ face.transparent = m.alpha < 1.0; \ face.style = addMaterial(m); inline bool isid(const double* t) { return( t[0]==1 && t[1]==0 && t[2]==0 && t[3]==0 && t[4]==0 && t[5]==1 && t[6]==0 && t[7]==0 && t[8]==0 && t[9]==0 && t[10]==1 && t[11]==0 && t[12]==0 && t[13]==0 && t[14]==0 && t[15]==1); } #define SETTRANSF \ if(t&&!isid(t)) \ face.transform = new PRCGeneralTransformation3d(t); \ if(origin) surface->origin.Set(origin[0],origin[1],origin[2]); \ if(x_axis) surface->x_axis.Set(x_axis[0],x_axis[1],x_axis[2]); \ if(y_axis) surface->y_axis.Set(y_axis[0],y_axis[1],y_axis[2]); \ surface->scale = scale; \ surface->geometry_is_2D = false; \ if(surface->origin!=PRCVector3d(0.0,0.0,0.0)) \ surface->behaviour = surface->behaviour | PRC_TRANSFORMATION_Translate; \ if(surface->x_axis!=PRCVector3d(1.0,0.0,0.0)||surface->y_axis!=PRCVector3d(0.0,1.0,0.0)) \ surface->behaviour = surface->behaviour | PRC_TRANSFORMATION_Rotate; \ if(surface->scale!=1) \ surface->behaviour = surface->behaviour | PRC_TRANSFORMATION_Scale; \ surface->has_transformation = (surface->behaviour != PRC_TRANSFORMATION_Identity); void useMesh(uint32_t tess_index, uint32_t style_index, PRCGENTRANSFORM); void useMesh(uint32_t tess_index, const PRCmaterial& m, PRCGENTRANSFORM) { useMesh(tess_index,addMaterial(m),t); } void useMesh(uint32_t tess_index, uint32_t style_index, PRCCARTRANSFORM); void useMesh(uint32_t tess_index, const PRCmaterial& m, PRCCARTRANSFORM) { useMesh(tess_index,addMaterial(m),origin, x_axis, y_axis, scale); } void useLines(uint32_t tess_index, uint32_t style_index, PRCGENTRANSFORM); void useLines(uint32_t tess_index, const RGBAColour& c, double w, PRCGENTRANSFORM) { useLines(tess_index, addLineMaterial(c,w), t); } void useLines(uint32_t tess_index, uint32_t style_index, PRCCARTRANSFORM); void useLines(uint32_t tess_index, const RGBAColour& c, double w, PRCCARTRANSFORM) { useLines(tess_index,addLineMaterial(c,w),origin, x_axis, y_axis, scale); } // void addTriangle(const double P[][3], const double T[][2], uint32_t style_index); template void addLine(uint32_t n, const V P[], const RGBAColour &c, double w=1.0) { PRCgroup &group = findGroup(); if(group.options.tess) { group.lines[w].push_back(PRCtessline()); PRCtessline& line = group.lines[w].back(); line.color.red = c.R; line.color.green = c.G; line.color.blue = c.B; for(uint32_t i=0; ipoint.resize(n); for(uint32_t i=0; ipoint[i].Set(X(P[i]),Y(P[i]),Z(P[i])); curve->interval.min = 0; curve->interval.max = curve->point.size()-1; } } template void addBezierCurve(uint32_t n, const V cP[], const RGBAColour &c) { ADDWIRE(PRCNURBSCurve) curve->is_rational = false; curve->degree = 3; const size_t NUMBER_OF_POINTS = n; curve->control_point.resize(NUMBER_OF_POINTS); for(size_t i = 0; i < NUMBER_OF_POINTS; ++i) curve->control_point[i].Set(X(cP[i]),Y(cP[i]),Z(cP[i])); curve->knot.resize(3+NUMBER_OF_POINTS+1); curve->knot[0] = 1; for(size_t i = 1; i < 3+NUMBER_OF_POINTS; ++i) curve->knot[i] = (i+2)/3; // integer division is intentional curve->knot[3+NUMBER_OF_POINTS] = (3+NUMBER_OF_POINTS+1)/3; } template void addCurve(uint32_t d, uint32_t n, const V cP[], const double *k, const RGBAColour &c, const double w[]) { ADDWIRE(PRCNURBSCurve) curve->is_rational = (w!=NULL); curve->degree = d; curve->control_point.resize(n); for(uint32_t i = 0; i < n; i++) if(w) curve->control_point[i].Set(X(cP[i])*w[i],Y(cP[i])*w[i],Z(cP[i])*w[i], w[i]); else curve->control_point[i].Set(X(cP[i]),Y(cP[i]),Z(cP[i])); curve->knot.resize(d+n+1); for(uint32_t i = 0; i < d+n+1; i++) curve->knot[i] = k[i]; } template void addQuad(const V P[], const RGBAColour C[]) { PRCgroup &group = findGroup(); group.quads.push_back(PRCtessquad()); PRCtessquad &quad = group.quads.back(); for(size_t i = 0; i < 4; i++) { quad.vertices[i].x = X(P[i]); quad.vertices[i].y = Y(P[i]); quad.vertices[i].z = Z(P[i]); quad.colours[i] = C[i]; } } template void addRectangle(const V P[], const PRCmaterial &m) { PRCgroup &group = findGroup(); if(group.options.tess) { group.rectangles.push_back(PRCtessrectangle()); PRCtessrectangle &rectangle = group.rectangles.back(); rectangle.style = addMaterial(m); for(size_t i = 0; i < 4; i++) { rectangle.vertices[i].x = X(P[i]); rectangle.vertices[i].y = Y(P[i]); rectangle.vertices[i].z = Z(P[i]); } } else if(group.options.compression == 0.0) { ADDFACE(PRCNURBSSurface) surface->is_rational = false; surface->degree_in_u = 1; surface->degree_in_v = 1; surface->control_point.resize(4); for(size_t i = 0; i < 4; ++i) { surface->control_point[i].x = X(P[i]); surface->control_point[i].y = Y(P[i]); surface->control_point[i].z = Z(P[i]); } surface->knot_u.resize(4); surface->knot_v.resize(4); surface->knot_v[0] = surface->knot_u[0] = 1; surface->knot_v[1] = surface->knot_u[1] = 3; surface->knot_v[2] = surface->knot_u[2] = 4; surface->knot_v[3] = surface->knot_u[3] = 4; } else { ADDCOMPFACE compface->degree = 1; compface->control_point.resize(4); for(size_t i = 0; i < 4; ++i) { compface->control_point[i].x = X(P[i]); compface->control_point[i].y = Y(P[i]); compface->control_point[i].z = Z(P[i]); } } } template void addPatch(const V cP[], const PRCmaterial &m) { PRCgroup &group = findGroup(); if(group.options.compression == 0.0) { ADDFACE(PRCNURBSSurface) surface->is_rational = false; surface->degree_in_u = 3; surface->degree_in_v = 3; surface->control_point.resize(16); for(size_t i = 0; i < 16; ++i) { surface->control_point[i].x = X(cP[i]); surface->control_point[i].y = Y(cP[i]); surface->control_point[i].z = Z(cP[i]); } surface->knot_u.resize(8); surface->knot_v.resize(8); surface->knot_v[0] = surface->knot_u[0] = 1; surface->knot_v[1] = surface->knot_u[1] = 1; surface->knot_v[2] = surface->knot_u[2] = 1; surface->knot_v[3] = surface->knot_u[3] = 1; surface->knot_v[4] = surface->knot_u[4] = 2; surface->knot_v[5] = surface->knot_u[5] = 2; surface->knot_v[6] = surface->knot_u[6] = 2; surface->knot_v[7] = surface->knot_u[7] = 2; } else { ADDCOMPFACE compface->degree = 3; compface->control_point.resize(16); for(size_t i = 0; i < 16; ++i) { compface->control_point[i].x = X(cP[i]); compface->control_point[i].y = Y(cP[i]); compface->control_point[i].z = Z(cP[i]); } } } template void addSurface(uint32_t dU, uint32_t dV, uint32_t nU, uint32_t nV, const V cP[], const double *kU, const double *kV, const PRCmaterial &m, const double w[]) { ADDFACE(PRCNURBSSurface) surface->is_rational = (w!=NULL); surface->degree_in_u = dU; surface->degree_in_v = dV; surface->control_point.resize(nU*nV); for(size_t i = 0; i < nU*nV; i++) if(w) surface->control_point[i]=PRCControlPoint(X(cP[i])*w[i],Y(cP[i])*w[i],Z(cP[i])*w[i],w[i]); else surface->control_point[i]=PRCControlPoint(X(cP[i]),Y(cP[i]),Z(cP[i])); surface->knot_u.insert(surface->knot_u.end(), kU, kU+(dU+nU+1)); surface->knot_v.insert(surface->knot_v.end(), kV, kV+(dV+nV+1)); } template void addTube(uint32_t n, const V cP[], const V oP[], bool straight, const PRCmaterial &m, PRCTRANSFORM) { ADDFACE(PRCBlend01) SETTRANSF if(straight) { PRCPolyLine *center_curve = new PRCPolyLine; center_curve->point.resize(n); for(uint32_t i=0; ipoint[i].Set(X(cP[i]),Y(cP[i]),Z(cP[i])); center_curve->interval.min = 0; center_curve->interval.max = center_curve->point.size()-1; surface->center_curve = center_curve; PRCPolyLine *origin_curve = new PRCPolyLine; origin_curve->point.resize(n); for(uint32_t i=0; ipoint[i].Set(X(oP[i]),Y(oP[i]),Z(oP[i])); origin_curve->interval.min = 0; origin_curve->interval.max = origin_curve->point.size()-1; surface->origin_curve = origin_curve; surface->uv_domain.min.x = 0; surface->uv_domain.max.x = 2*pi; surface->uv_domain.min.y = 0; surface->uv_domain.max.y = n-1; } else { PRCNURBSCurve *center_curve = new PRCNURBSCurve; center_curve->is_rational = false; center_curve->degree = 3; const uint32_t CENTER_NUMBER_OF_POINTS = n; center_curve->control_point.resize(CENTER_NUMBER_OF_POINTS); for(uint32_t i = 0; i < CENTER_NUMBER_OF_POINTS; ++i) center_curve->control_point[i].Set(X(cP[i]),Y(cP[i]),Z(cP[i])); center_curve->knot.resize(3+CENTER_NUMBER_OF_POINTS+1); center_curve->knot[0] = 1; for(uint32_t i = 1; i < 3+CENTER_NUMBER_OF_POINTS; ++i) center_curve->knot[i] = (i+2)/3; // integer division is intentional center_curve->knot[3+CENTER_NUMBER_OF_POINTS] = (3+CENTER_NUMBER_OF_POINTS+1)/3; surface->center_curve = center_curve; PRCNURBSCurve *origin_curve = new PRCNURBSCurve; origin_curve->is_rational = false; origin_curve->degree = 3; const uint32_t ORIGIN_NUMBER_OF_POINTS = n; origin_curve->control_point.resize(ORIGIN_NUMBER_OF_POINTS); for(uint32_t i = 0; i < ORIGIN_NUMBER_OF_POINTS; ++i) origin_curve->control_point[i].Set(X(oP[i]),Y(oP[i]),Z(oP[i])); origin_curve->knot.resize(3+ORIGIN_NUMBER_OF_POINTS+1); origin_curve->knot[0] = 1; for(size_t i = 1; i < 3+ORIGIN_NUMBER_OF_POINTS; ++i) origin_curve->knot[i] = (i+2)/3; // integer division is intentional origin_curve->knot[3+ORIGIN_NUMBER_OF_POINTS] = (3+ORIGIN_NUMBER_OF_POINTS+1)/3; surface->origin_curve = origin_curve; surface->uv_domain.min.x = 0; surface->uv_domain.max.x = 2*pi; surface->uv_domain.min.y = 1; // first knot surface->uv_domain.max.y = (3+CENTER_NUMBER_OF_POINTS+1)/3; // last knot } } void addHemisphere(double radius, const PRCmaterial& m, PRCTRANSFORM); void addSphere(double radius, const PRCmaterial& m, PRCTRANSFORM); void addDisk(double radius, const PRCmaterial& m, PRCTRANSFORM); void addCylinder(double radius, double height, const PRCmaterial& m, PRCTRANSFORM); void addCone(double radius, double height, const PRCmaterial& m, PRCTRANSFORM); void addTorus(double major_radius, double minor_radius, double angle1, double angle2, const PRCmaterial& m, PRCTRANSFORM); #undef PRCTRANSFORM #undef PRCCARTRANSFORM #undef PRCGENTRANSFORM #undef ADDCOMPFACE uint32_t addPicture(EPRCPictureDataFormat format, uint32_t size, const uint8_t *picture, uint32_t width=0, uint32_t height=0, std::string name="", uint32_t fileStructure=0) { return fileStructures[fileStructure]->addPicture(format, size, picture, width, height, name); } uint32_t addPicture(const PRCpicture& pic, std::string name="", uint32_t fileStructure=0) { return fileStructures[fileStructure]->addPicture(pic.format, pic.size, pic.data, pic.width, pic.height, name); } uint32_t addTextureDefinition(PRCTextureDefinition*& pTextureDefinition, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addTextureDefinition(pTextureDefinition); } uint32_t addTextureApplication(PRCTextureApplication*& pTextureApplication, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addTextureApplication(pTextureApplication); } uint32_t addRgbColor(const PRCRgbColor &color, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addRgbColor(color); } uint32_t addRgbColorUnique(const PRCRgbColor &color, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addRgbColorUnique(color); } uint32_t addMaterialGeneric(PRCMaterialGeneric*& pMaterialGeneric, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addMaterialGeneric(pMaterialGeneric); } uint32_t addStyle(PRCStyle*& pStyle, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addStyle(pStyle); } uint32_t addPartDefinition(PRCPartDefinition*& pPartDefinition, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addPartDefinition(pPartDefinition); } uint32_t addProductOccurrence(PRCProductOccurrence*& pProductOccurrence, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addProductOccurrence(pProductOccurrence); } uint32_t addTopoContext(PRCTopoContext*& pTopoContext, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addTopoContext(pTopoContext); } uint32_t getTopoContext(PRCTopoContext*& pTopoContext, uint32_t fileStructure=0) { return fileStructures[fileStructure]->getTopoContext(pTopoContext); } uint32_t add3DTess(PRC3DTess*& p3DTess, uint32_t fileStructure=0) { return fileStructures[fileStructure]->add3DTess(p3DTess); } uint32_t add3DWireTess(PRC3DWireTess*& p3DWireTess, uint32_t fileStructure=0) { return fileStructures[fileStructure]->add3DWireTess(p3DWireTess); } /* uint32_t addMarkupTess(PRCMarkupTess*& pMarkupTess, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addMarkupTess(pMarkupTess); } uint32_t addMarkup(PRCMarkup*& pMarkup, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addMarkup(pMarkup); } uint32_t addAnnotationItem(PRCAnnotationItem*& pAnnotationItem, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addAnnotationItem(pAnnotationItem); } */ uint32_t addCoordinateSystem(PRCCoordinateSystem*& pCoordinateSystem, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addCoordinateSystem(pCoordinateSystem); } uint32_t addCoordinateSystemUnique(PRCCoordinateSystem*& pCoordinateSystem, uint32_t fileStructure=0) { return fileStructures[fileStructure]->addCoordinateSystemUnique(pCoordinateSystem); } private: void serializeModelFileData(PRCbitStream&); std::ofstream *fout; std::ostream &output; }; } #endif // __O_PRC_FILE_H ./asymptote-2.41/prc/PRCTools/0000755000175000017500000000000013064427076015774 5ustar norbertnorbert./asymptote-2.41/prc/PRCTools/iPRCFile.h0000644000175000017500000000444513064427076017551 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #ifndef __READPRC_H #define __READPRC_H #include #include #include #include #include #include #include "../PRC.h" #include "inflation.h" struct FileStructureInformation { unsigned int UUID[4]; unsigned int reserved; std::vector offsets; }; const int GLOBALS_SECTION = 0; const int TREE_SECTION = 1; const int TESSELLATION_SECTION = 2; const int GEOMETRY_SECTION = 3; const int EXTRA_GEOMETRY_SECTION = 4; struct FileStructure { unsigned int readVersion; unsigned int authoringVersion; unsigned int fileUUID[4]; unsigned int appUUID[4]; char* sections[5]; unsigned int sectionLengths[5]; }; class iPRCFile { public: iPRCFile(std::istream&); ~iPRCFile() { for(unsigned int i = 0; i < fileStructures.size(); ++i) for(unsigned int j = 0; j < 5; ++j) if(fileStructures[i].sections[j] != NULL) free(fileStructures[i].sections[j]); if(modelFileData!=NULL) free(modelFileData); if(buffer != 0) delete[] buffer; } void describe(); void dumpSections(std::string); private: // header data std::vector fileStructureInfos; std::vector fileStructures; unsigned int modelFileOffset; char* modelFileData; unsigned int modelFileLength; char *buffer; unsigned int fileSize; unsigned int numberOfUncompressedFiles; }; #endif // __READPRC_H ./asymptote-2.41/prc/PRCTools/describePRC.cc0000644000175000017500000020503613064427076020436 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include #include #include #include "../PRC.h" #include "describePRC.h" using std::ostringstream; using std::cout; using std::endl; using std::hex; using std::dec; using std::string; using std::setw; using std::setfill; // describe sections void describeGlobals(BitByBitData &mData) { mData.tellPosition(); cout << getIndent() << "--Globals--" << endl; if(!checkSectionCode(mData,PRC_TYPE_ASM_FileStructureGlobals)) return; indent(); describeContentPRCBase(mData,false); unsigned int numberOfReferencedFileStructures = mData.readUnsignedInt(); cout << getIndent() << "numberOfReferencedFileStructures " << numberOfReferencedFileStructures << endl; indent(); for(unsigned int i = 0; i < numberOfReferencedFileStructures; ++i) { describeCompressedUniqueID(mData); } dedent(); double tessellation_chord_height_ratio = mData.readDouble(); cout << getIndent() << "tessellation_chord_height_ratio " << tessellation_chord_height_ratio << endl; double tessellation_angle_degree = mData.readDouble(); cout << getIndent() << "tessellation_angle_degree " << tessellation_angle_degree << endl; string default_font_family_name = mData.readString(); cout << getIndent() << "default_font_family_name \"" << default_font_family_name << '\"' << endl; unsigned int number_of_fonts = mData.readUnsignedInt(); cout << getIndent() << "number_of_fonts " << number_of_fonts << endl; indent(); for(unsigned int q = 0; q < number_of_fonts; ++q) { string font_name = mData.readString(); cout << getIndent() << "font_name \"" << font_name << '\"' << endl; unsigned int char_set = mData.readUnsignedInt(); cout << getIndent() << "char_set " << char_set << endl; unsigned int number_of_font_keys = mData.readUnsignedInt(); cout << getIndent() << "number_of_font_keys " << number_of_font_keys << endl; indent(); for(unsigned int i = 0; i < number_of_font_keys; i++) { unsigned int font_size = mData.readUnsignedInt() - 1; cout << getIndent() << "font_size " << font_size << endl; unsigned char attributes = mData.readChar(); cout << getIndent() << "attributes " << static_cast(attributes) << endl; } dedent(); } dedent(); unsigned int number_of_colours = mData.readUnsignedInt(); cout << getIndent() << "number_of_colours " << number_of_colours << endl; indent(); for(unsigned int i = 0; i < number_of_colours; ++i) describeRGBColour(mData); dedent(); unsigned int number_of_pictures = mData.readUnsignedInt(); cout << getIndent() << "number_of_pictures " << number_of_pictures << endl; indent(); for(unsigned int i=0;i(mData.readChar()) << endl; unsigned int number_of_coedge = mData.readUnsignedInt(); cout << getIndent() << "number_of_coedge " << number_of_coedge << endl; indent(); for(unsigned int i = 0; i < number_of_coedge; ++i) { describeObject(mData); cout << getIndent() << "neigh_serial_index " << mData.readUnsignedInt() << endl; } dedent(); dedent(); } void describeTopoCoEdge(BitByBitData &mData) { cout << getIndent() << "--CoEdge--" << endl; indent(); describeBaseTopology(mData); describeObject(mData); // edge describeObject(mData); // uv_curve cout << getIndent() << "orientation_with_loop " << static_cast(mData.readChar()) << endl; cout << getIndent() << "orientation_uv_with_loop " << static_cast(mData.readChar()) << endl; dedent(); } void describeTopoEdge(BitByBitData &mData) { cout << getIndent() << "--Edge--" << endl; indent(); describeContentWireEdge(mData); describeObject(mData); // vertex_start describeObject(mData); // vertex_end bool have_tolerance = mData.readBit(); cout << getIndent() << "have_tolerance " << (have_tolerance?"yes":"no") << endl; if(have_tolerance) cout << getIndent() << "tolerance " << mData.readDouble() << endl; dedent(); } void describeTopoUniqueVertex(BitByBitData &mData) { cout << getIndent() << "--Unique Vertex--" << endl; indent(); describeBaseTopology(mData); describeVector3d(mData); bool have_tolerance = mData.readBit(); cout << getIndent() << "have_tolerance " << (have_tolerance?"yes":"no") << endl; if(have_tolerance) cout << getIndent() << "tolerance " << mData.readDouble() << endl; dedent(); } void describeTopoConnex(BitByBitData &mData) { cout << getIndent() << "--Connex--" << endl; indent(); describeBaseTopology(mData); unsigned int number_of_shells = mData.readUnsignedInt(); cout << getIndent() << "number_of_shells " << number_of_shells << endl; indent(); for(unsigned int i = 0; i < number_of_shells; ++i) { // NOTE: this does not check if the objects are actually shells! describeObject(mData); } dedent(); dedent(); } void describeTopoShell(BitByBitData &mData) { cout << getIndent() << "--Shell--" << endl; indent(); describeBaseTopology(mData); cout << getIndent() << "shell_is_closed " << (mData.readBit()?"yes":"no") << endl; unsigned int number_of_faces = mData.readUnsignedInt(); cout << getIndent() << "number_of_faces " << number_of_faces << endl; for(unsigned int i = 0; i < number_of_faces; ++i) { // NOTE: this does not check if the objects are actually faces! describeObject(mData); unsigned char orientation = mData.readChar(); cout << getIndent() << "orientation_surface_with_shell " << static_cast(orientation) << endl; } dedent(); } void describeObject(BitByBitData &mData) { cout << getIndent() << "--Object--" << endl; bool already_stored = mData.readBit(); cout << getIndent() << "already_stored " << (already_stored?"yes":"no") << endl; if(already_stored) // reverse of documentation? { cout << getIndent() << "index of stored item " << mData.readUnsignedInt() << endl; } else { unsigned int type = mData.readUnsignedInt(); switch(type) { case PRC_TYPE_ROOT: cout << getIndent() << "NULL Object" << endl; break; // topological items case PRC_TYPE_TOPO_Connex: describeTopoConnex(mData); break; case PRC_TYPE_TOPO_Shell: describeTopoShell(mData); break; case PRC_TYPE_TOPO_Face: describeTopoFace(mData); break; case PRC_TYPE_TOPO_Loop: describeTopoLoop(mData); break; case PRC_TYPE_TOPO_CoEdge: describeTopoCoEdge(mData); break; case PRC_TYPE_TOPO_Edge: describeTopoEdge(mData); break; case PRC_TYPE_TOPO_UniqueVertex: describeTopoUniqueVertex(mData); break; case PRC_TYPE_TOPO_WireEdge: describeContentWireEdge(mData); break; // curves case PRC_TYPE_CRV_Circle: describeCurvCircle(mData); break; case PRC_TYPE_CRV_NURBS: describeCurvNURBS(mData); break; case PRC_TYPE_CRV_PolyLine: describeCurvPolyLine(mData); break; case PRC_TYPE_CRV_Line: describeCurvLine(mData); break; // surfaces case PRC_TYPE_SURF_NURBS: describeSurfNURBS(mData); break; case PRC_TYPE_SURF_Cylinder: describeSurfCylinder(mData); break; case PRC_TYPE_SURF_Plane: describeSurfPlane(mData); break; // topological items case PRC_TYPE_TOPO_Item: case PRC_TYPE_TOPO_MultipleVertex: // curves case PRC_TYPE_CRV_Base: case PRC_TYPE_CRV_Blend02Boundary: case PRC_TYPE_CRV_Composite: case PRC_TYPE_CRV_OnSurf: case PRC_TYPE_CRV_Ellipse: case PRC_TYPE_CRV_Equation: case PRC_TYPE_CRV_Helix: case PRC_TYPE_CRV_Hyperbola: case PRC_TYPE_CRV_Intersection: case PRC_TYPE_CRV_Offset: case PRC_TYPE_CRV_Parabola: case PRC_TYPE_CRV_Transform: // surfaces case PRC_TYPE_SURF_Base: case PRC_TYPE_SURF_Blend01: case PRC_TYPE_SURF_Blend02: case PRC_TYPE_SURF_Blend03: case PRC_TYPE_SURF_Cone: case PRC_TYPE_SURF_Cylindrical: case PRC_TYPE_SURF_Offset: case PRC_TYPE_SURF_Pipe: case PRC_TYPE_SURF_Ruled: case PRC_TYPE_SURF_Sphere: case PRC_TYPE_SURF_Revolution: case PRC_TYPE_SURF_Extrusion: case PRC_TYPE_SURF_FromCurves: case PRC_TYPE_SURF_Torus: case PRC_TYPE_SURF_Transform: case PRC_TYPE_SURF_Blend04: cout << getIndent() << "TODO: Unhandled object of type " << type << endl; break; default: cout << getIndent() << "Invalid object of type " << type << endl; break; } } } void describeBaseTopology(BitByBitData &mData) { bool base_information = mData.readBit(); cout << getIndent() << "base_information " << (base_information?"yes":"no") << endl; if(base_information) { describeAttributes(mData); describeName(mData); cout << getIndent() << "identifier " << mData.readUnsignedInt() << endl; } } void describeBaseGeometry(BitByBitData &mData) { bool base_information = mData.readBit(); cout << getIndent() << "base_information " << (base_information?"yes":"no") << endl; if(base_information) { describeAttributes(mData); describeName(mData); cout << getIndent() << "identifier " << mData.readUnsignedInt() << endl; } } unsigned int describeContentBody(BitByBitData &mData) { describeBaseTopology(mData); unsigned int behaviour = static_cast(mData.readChar()); cout << getIndent() << "behaviour " << behaviour << endl; return behaviour; } void describeContentSurface(BitByBitData &mData) { describeBaseGeometry(mData); cout << getIndent() << "extend_info " << mData.readUnsignedInt() << endl; } void describeBody(BitByBitData &mData) { cout << getIndent() << "--Body--" << endl; unsigned int type = mData.readUnsignedInt(); switch(type) { case PRC_TYPE_TOPO_BrepData: { cout << getIndent() << "--PRC_TYPE_TOPO_BrepData--" << endl; unsigned int behaviour = describeContentBody(mData); unsigned int number_of_connex = mData.readUnsignedInt(); cout << getIndent() << "number_of_connex " << number_of_connex << endl; indent(); for(unsigned int i = 0; i < number_of_connex; ++i) { describeObject(mData); } dedent(); if(behaviour != 0) { cout << getIndent() << "bbox " << endl; indent(); describeExtent3d(mData); dedent(); } break; } case PRC_TYPE_TOPO_SingleWireBody: { cout << getIndent() << "--PRC_TYPE_TOPO_SingleWireBody--" << endl; // unsigned int behaviour = describeContentBody(mData); // TODO: is behaviour needed to get data about how to describe? describeContentBody(mData); describeObject(mData); // curve break; } case PRC_TYPE_TOPO_BrepDataCompress: case PRC_TYPE_TOPO_SingleWireBodyCompress: cout << getIndent() << "TODO: Unhandled body type " << type << endl; break; default: cout << getIndent() << "Invalid body type " << type << endl; break; } } void describeTopoContext(BitByBitData &mData) { cout << getIndent() << "--Topological Context--" << endl; if(!checkSectionCode(mData,PRC_TYPE_TOPO_Context)) return; indent(); describeContentPRCBase(mData,false); cout << getIndent() << "behaviour " << static_cast(mData.readChar()) << endl; cout << getIndent() << "granularity " << mData.readDouble() << endl; cout << getIndent() << "tolerance " << mData.readDouble() << endl; bool have_smallest_face_thickness = mData.readBit(); cout << getIndent() << "have_smallest_face_thickness " << (have_smallest_face_thickness?"yes":"no") << endl; if(have_smallest_face_thickness) cout << getIndent() << "smallest_thickness " << mData.readDouble() << endl; bool have_scale = mData.readBit(); cout << getIndent() << "have_scale " << (have_scale?"yes":"no") << endl; if(have_scale) cout << getIndent() << "scale " << mData.readDouble() << endl; dedent(); } void describeLineAttr(BitByBitData& mData) { cout << getIndent() << "index_of_line_style " << mData.readUnsignedInt()-1 << endl; } void describeArrayRGBA(BitByBitData& mData, int number_of_colours, int number_by_vector) { // bool new_colour = true; // not currently used for(int i = 0; i < number_by_vector; ++i) { cout << getIndent() << static_cast(mData.readChar()) << ' '; cout << static_cast(mData.readChar()) << ' '; cout << static_cast(mData.readChar()) << endl; //TODO: finish this } } void describeContentBaseTessData(BitByBitData &mData) { cout << getIndent() << "is_calculated " << (mData.readBit()?"yes":"no") << endl; unsigned int number_of_coordinates = mData.readUnsignedInt(); cout << getIndent() << "number_of_coordinates " << number_of_coordinates << endl; indent(); for(unsigned int i = 0; i < number_of_coordinates; ++i) { cout << getIndent() << mData.readDouble() << endl; } dedent(); } void describeTessFace(BitByBitData &mData) { cout << getIndent() << "--Tessellation Face--" << endl; if(!checkSectionCode(mData,PRC_TYPE_TESS_Face)) return; indent(); unsigned int size_of_line_attributes = mData.readUnsignedInt(); cout << getIndent() << "size_of_line_attributes " << size_of_line_attributes << endl; indent(); for(unsigned int i = 0; i < size_of_line_attributes; ++i) { describeLineAttr(mData); } dedent(); unsigned int start_wire = mData.readUnsignedInt(); cout << getIndent() << "start_wire " << start_wire << endl; unsigned int size_of_sizes_wire = mData.readUnsignedInt(); cout << getIndent() << "size_of_sizes_wire " << size_of_sizes_wire << endl; indent(); for(unsigned int i = 0; i < size_of_sizes_wire; ++i) { cout << getIndent() << mData.readUnsignedInt() << endl; } dedent(); unsigned int used_entities_flag = mData.readUnsignedInt(); cout << getIndent() << "used_entities_flag " << used_entities_flag << endl; unsigned int start_triangulated = mData.readUnsignedInt(); cout << getIndent() << "start_triangulated " << start_triangulated << endl; unsigned int size_of_sizes_triangulated = mData.readUnsignedInt(); cout << getIndent() << "size_of_sizes_triangulated " << size_of_sizes_triangulated << endl; indent(); for(unsigned int i = 0; i < size_of_sizes_triangulated; ++i) { cout << getIndent() << mData.readUnsignedInt() << endl; } dedent(); cout << getIndent() << "number_of_texture_coordinate_indexes " << mData.readUnsignedInt() << endl; bool has_vertex_colors = mData.readBit(); cout << getIndent() << "has_vertex_colors " << (has_vertex_colors?"yes":"no") << endl; indent(); if(has_vertex_colors) { bool is_rgba = mData.readBit(); cout << getIndent() << "is_rgba " << (is_rgba?"yes":"no") << endl; bool b_optimised = mData.readBit(); cout << getIndent() << "b_optimised " << (b_optimised?"yes":"no") << endl; if(!b_optimised) { indent(); //TODO: compute size of Array and pass it instead of 0 describeArrayRGBA(mData,0,(is_rgba ? 4 : 3)); dedent(); } else { // not described // what does this mean? that this should not happen? // or is omitted from the docs? } } dedent(); if(size_of_line_attributes) { cout << getIndent() << "behaviour " << mData.readUnsignedInt() << endl; } dedent(); } void describe3DTess(BitByBitData &mData) { cout << getIndent() << "--3D Tessellation--" << endl; indent(); describeContentBaseTessData(mData); cout << getIndent() << "has_faces " << (mData.readBit()?"yes":"no") << endl; cout << getIndent() << "has_loops " << (mData.readBit()?"yes":"no") << endl; bool must_recalculate_normals = mData.readBit(); cout << getIndent() << "must_recalculate_normals " << (must_recalculate_normals?"yes":"no") << endl; indent(); if(must_recalculate_normals) { cout << getIndent() << "Docs were wrong: must_recalculate_normals is true." << endl; cout << getIndent() << "normals_recalculation_flags " << static_cast(mData.readChar()) << endl; cout << getIndent() << "crease_angle " << mData.readDouble() << endl; } dedent(); unsigned int number_of_normal_coordinates = mData.readUnsignedInt(); cout << getIndent() << "number_of_normal_coordinates " << number_of_normal_coordinates << endl; indent(); for(unsigned int i = 0; i < number_of_normal_coordinates; ++i) { cout << getIndent() << mData.readDouble() << endl; } dedent(); unsigned int number_of_wire_indices = mData.readUnsignedInt(); cout << getIndent() << "number_of_wire_indices " << number_of_wire_indices << endl; indent(); for(unsigned int i = 0; i < number_of_wire_indices; ++i) { cout << getIndent() << mData.readUnsignedInt() << endl; } dedent(); unsigned int number_of_triangulated_indices = mData.readUnsignedInt(); cout << getIndent() << "number_of_triangulated_indices " << number_of_triangulated_indices << endl; indent(); for(unsigned int i = 0; i < number_of_triangulated_indices; ++i) { cout << getIndent() << mData.readUnsignedInt() << endl; } dedent(); unsigned int number_of_face_tessellation = mData.readUnsignedInt(); cout << getIndent() << "number_of_face_tessellation " << number_of_face_tessellation << endl; indent(); for(unsigned int i = 0; i < number_of_face_tessellation; ++i) { describeTessFace(mData); } dedent(); unsigned int number_of_texture_coordinates = mData.readUnsignedInt(); cout << getIndent() << "number_of_texture_coordinates " << number_of_texture_coordinates << endl; indent(); for(unsigned int i = 0; i < number_of_texture_coordinates; ++i) { cout << getIndent() << mData.readDouble() << endl; } dedent(); dedent(); } void describe3DWireTess(BitByBitData &mData) { //TODO } void describe3DMarkupTess(BitByBitData &mData) { //TODO } void describeHighlyCompressed3DTess(BitByBitData &mData) { //TODO } void describeSceneDisplayParameters(BitByBitData &mData) { cout << getIndent() << "--Scene Display Parameters--" << endl; if(!checkSectionCode(mData,PRC_TYPE_GRAPH_SceneDisplayParameters)) return; indent(); describeContentPRCBase(mData,true); cout << getIndent() << "is active? " << (mData.readBit()?"yes":"no") << endl; unsigned int number_of_lights = mData.readUnsignedInt(); cout << getIndent() << "number of lights " << number_of_lights << endl; indent(); for(unsigned int i = 0; i < number_of_lights; ++i) { describeLight(mData); } dedent(); bool camera = mData.readBit(); cout << getIndent() << "camera? " << (camera?"yes":"no") << endl; if(camera) describeCamera(mData); bool rotation_centre = mData.readBit(); cout << getIndent() << "rotation centre? " << (rotation_centre?"yes":"no") << endl; if(rotation_centre) describeVector3d(mData); unsigned int number_of_clipping_planes = mData.readUnsignedInt(); cout << getIndent() << "number of clipping planes " << number_of_clipping_planes << endl; indent(); for(unsigned int i = 0; i < number_of_clipping_planes; ++i) { cout << "Can't describe planes!!!" << endl; //describePlane(mData); } dedent(); cout << getIndent() << "Background line style index: " << mData.readUnsignedInt()-1 << endl; cout << getIndent() << "Default line style index: " << mData.readUnsignedInt()-1 << endl; unsigned int number_of_default_styles_per_type = mData.readUnsignedInt(); cout << getIndent() << "number_of_default_styles_per_type " << number_of_default_styles_per_type << endl; indent(); for(unsigned int i = 0; i < number_of_default_styles_per_type; ++i) { cout << getIndent() << "type " << mData.readUnsignedInt() << endl; cout << getIndent() << "line style index: " << mData.readUnsignedInt()-1 << endl; } dedent(); dedent(); } void describeCartesionTransformation3d(BitByBitData& mData) { cout << getIndent() << "--3d Cartesian Transformation--" << endl; if(!checkSectionCode(mData,PRC_TYPE_MISC_CartesianTransformation)) return; indent(); unsigned char behaviour = mData.readChar(); cout << getIndent() << "behaviour " << static_cast(behaviour) << endl; if((behaviour & PRC_TRANSFORMATION_Translate) != 0) { cout << getIndent() << "Translation" << endl; describeVector3d(mData); } if((behaviour & PRC_TRANSFORMATION_NonOrtho) != 0) { cout << getIndent() << "Non orthogonal transformation" << endl; cout << getIndent() << "X" << endl; describeVector3d(mData); cout << getIndent() << "Y" << endl; describeVector3d(mData); cout << getIndent() << "Z" << endl; describeVector3d(mData); } else if((behaviour & PRC_TRANSFORMATION_Rotate) != 0) { cout << getIndent() << "Rotation" << endl; cout << getIndent() << "X" << endl; describeVector3d(mData); cout << getIndent() << "Y" << endl; describeVector3d(mData); } // this is different from the docs!!! but it works... if ((behaviour & PRC_TRANSFORMATION_NonUniformScale) != 0) { cout << getIndent() << "Non-uniform scale by " << endl; describeVector3d(mData); } // this is different from the docs!!! but it works... if((behaviour & PRC_TRANSFORMATION_Scale) != 0) { cout << getIndent() << "Uniform Scale by " << mData.readDouble() << endl; } if((behaviour & PRC_TRANSFORMATION_Homogeneous) != 0) { cout << getIndent() << "transformation has homogenous values" << endl; cout << getIndent() << "x = " << mData.readDouble() << endl; cout << getIndent() << "y = " << mData.readDouble() << endl; cout << getIndent() << "z = " << mData.readDouble() << endl; cout << getIndent() << "w = " << mData.readDouble() << endl; } dedent(); } void describeTransformation3d(BitByBitData& mData) { cout << getIndent() << "--3d Transformation--" << endl; indent(); bool has_transformation = mData.readBit(); cout << getIndent() << "has_transformation " << (has_transformation?"yes":"no") << endl; if(has_transformation) { unsigned char behaviour = mData.readChar(); cout << getIndent() << "behaviour " << static_cast(behaviour) << endl; if((behaviour & PRC_TRANSFORMATION_Translate) != 0) { cout << getIndent() << "Translation" << endl; describeVector3d(mData); } if((behaviour & PRC_TRANSFORMATION_Rotate) != 0) { cout << getIndent() << "Rotation" << endl; cout << getIndent() << "X" << endl; describeVector3d(mData); cout << getIndent() << "Y" << endl; describeVector3d(mData); } if((behaviour & PRC_TRANSFORMATION_Scale) != 0) { cout << getIndent() << "Uniform Scale by " << mData.readDouble() << endl; } } dedent(); } void describeTransformation2d(BitByBitData& mData) { cout << getIndent() << "--2d Transformation--" << endl; indent(); bool has_transformation = mData.readBit(); cout << "has_transformation " << (has_transformation?"yes":"no") << endl; if(has_transformation) { unsigned char behaviour = mData.readChar(); cout << getIndent() << "behaviour " << static_cast(behaviour) << endl; if((behaviour & PRC_TRANSFORMATION_Translate) != 0) { cout << getIndent() << "Translation" << endl; describeVector2d(mData); } if((behaviour & PRC_TRANSFORMATION_Rotate) != 0) { cout << getIndent() << "Rotation" << endl; cout << getIndent() << "X" << endl; describeVector2d(mData); cout << getIndent() << "Y" << endl; describeVector2d(mData); } if((behaviour & PRC_TRANSFORMATION_Scale) != 0) { cout << getIndent() << "Uniform Scale by " << mData.readDouble() << endl; } } dedent(); } void describeFileStructureInternalData(BitByBitData &mData) { cout << getIndent() << "--File Structure Internal Data--" << endl; if(!checkSectionCode(mData,PRC_TYPE_ASM_FileStructure)) return; indent(); describeContentPRCBase(mData,false); cout << getIndent() << "next_available_index " << mData.readUnsignedInt() << endl; cout << getIndent() << "index_product_occurence " << mData.readUnsignedInt() << endl; dedent(); } void describeProductOccurrence(BitByBitData &mData) { cout << getIndent() << "--Product Occurrence--" << endl; if(!checkSectionCode(mData,PRC_TYPE_ASM_ProductOccurence)) return; indent(); describeContentPRCBaseWithGraphics(mData,true); cout << getIndent() << "index_part " << static_cast(mData.readUnsignedInt()-1) << endl; unsigned int index_prototype = mData.readUnsignedInt()-1; cout << getIndent() << "index_prototype " << static_cast(index_prototype) << endl; if(index_prototype+1 != 0) { bool prototype_in_same_file_structure = mData.readBit(); cout << getIndent() << "prototype_in_same_file_structure " << (prototype_in_same_file_structure?"yes":"no") << endl; if(!prototype_in_same_file_structure) describeCompressedUniqueID(mData); } unsigned int index_external_data = mData.readUnsignedInt()-1; cout << getIndent() << "index_external_data " << static_cast(index_external_data) << endl; if(index_external_data+1 != 0) { bool external_data_in_same_file_structure = mData.readBit(); cout << getIndent() << "external_data_in_same_file_structure " << (external_data_in_same_file_structure?"yes":"no") << endl; if(!external_data_in_same_file_structure) describeCompressedUniqueID(mData); } unsigned int number_of_son_product_occurences = mData.readUnsignedInt(); cout << getIndent() << "number_of_son_product_occurences " << number_of_son_product_occurences << endl; indent(); for(unsigned int i = 0; i < number_of_son_product_occurences; ++i) cout << getIndent() << mData.readUnsignedInt() << endl; dedent(); cout << getIndent() << "product_behaviour " << static_cast(mData.readChar()) << endl; describeUnit(mData); cout << getIndent() << "Product information flags " << static_cast(mData.readChar()) << endl; cout << getIndent() << "product_load_status " << mData.readUnsignedInt() << endl; bool has_location = mData.readBit(); cout << getIndent() << "has_location " << has_location << endl; if(has_location) { describeCartesionTransformation3d(mData); } unsigned int number_of_references = mData.readUnsignedInt(); cout << getIndent() << "number_of_references " << number_of_references << endl; indent(); for(unsigned int i = 0; i < number_of_references; ++i) { //TODO: describeReferenceToPRCBase(mData); } dedent(); describeMarkups(mData); unsigned int number_of_views = mData.readUnsignedInt(); cout << getIndent() << "number_of_views " << number_of_views << endl; indent(); for(unsigned int i = 0; i < number_of_views; ++i) { describeAnnotationView(mData); } dedent(); bool has_entity_filter = mData.readBit(); cout << getIndent() << "has_entity_filter " << (has_entity_filter?"yes":"no") << endl; if(has_entity_filter) { //TODO: describeEntityFilter(mData); } unsigned int number_of_display_filters = mData.readUnsignedInt(); cout << getIndent() << "number_of_display_filters " << number_of_display_filters << endl; indent(); for(unsigned int i = 0; i < number_of_display_filters; ++i) { //TODO: describeFilter(mData); } dedent(); unsigned int number_of_scene_display_parameters = mData.readUnsignedInt(); cout << getIndent() << "number_of_scene_display_parameters " << number_of_scene_display_parameters << endl; indent(); for(unsigned int i = 0; i < number_of_scene_display_parameters; ++i) { describeSceneDisplayParameters(mData); } dedent(); describeUserData(mData); dedent(); } void describeGraphics(BitByBitData &mData) { bool sameGraphicsAsCurrent = mData.readBit(); cout << getIndent() << "Same graphics as current graphics? " << (sameGraphicsAsCurrent?"yes":"no") << endl; if(!sameGraphicsAsCurrent) { layer_index = mData.readUnsignedInt()-1; cout << getIndent() << "layer_index " << layer_index << endl; index_of_line_style = mData.readUnsignedInt()-1; cout << getIndent() << "index_of_line_style " << index_of_line_style << endl; unsigned char c1 = mData.readChar(); unsigned char c2 = mData.readChar(); behaviour_bit_field = c1 | (static_cast(c2) << 8); cout << getIndent() << "behaviour_bit_field " << behaviour_bit_field << endl; } } void describeContentPRCBaseWithGraphics(BitByBitData &mData, bool efr) { describeContentPRCBase(mData,efr); describeGraphics(mData); } void describePartDefinition(BitByBitData &mData) { cout << getIndent() << "--Part Definition--" << endl; if(!checkSectionCode(mData,PRC_TYPE_ASM_PartDefinition)) return; indent(); describeContentPRCBaseWithGraphics(mData,true); describeExtent3d(mData); unsigned int number_of_representation_items = mData.readUnsignedInt(); cout << getIndent() << "number_of_representation_items " << number_of_representation_items << endl; indent(); for(unsigned int i = 0; i < number_of_representation_items; ++i) { describeRepresentationItem(mData); } dedent(); describeMarkups(mData); unsigned int number_of_views = mData.readUnsignedInt(); cout << getIndent() << "number_of_views " << number_of_views << endl; indent(); for(unsigned int i = 0; i < number_of_views; ++i) { describeAnnotationView(mData); } dedent(); describeUserData(mData); dedent(); } void describeMarkups(BitByBitData& mData) { cout << getIndent() << "--Markups--" << endl; indent(); unsigned int number_of_linked_items = mData.readUnsignedInt(); cout << getIndent() << "number_of_linked_items " << number_of_linked_items << endl; for(unsigned int i = 0; i < number_of_linked_items; ++i) { cout << "describe linked item!" << endl; } unsigned int number_of_leaders = mData.readUnsignedInt(); cout << getIndent() << "number_of_leaders " << number_of_leaders << endl; for(unsigned int i = 0; i < number_of_leaders; ++i) { cout << "describe leader!" << endl; } unsigned int number_of_markups = mData.readUnsignedInt(); cout << getIndent() << "number_of_markups " << number_of_markups << endl; for(unsigned int i=0; i < number_of_markups; ++i) { cout << "describe markup!" << endl; } unsigned int number_of_annotation_entities = mData.readUnsignedInt(); cout << getIndent() << "number_of_annotation_entities " << number_of_annotation_entities << endl; for(unsigned int i=0; i < number_of_annotation_entities; ++i) { cout << "describe annotation entity!" << endl; } dedent(); } void describeAnnotationView(BitByBitData &mData) { cout << getIndent() << "--Annotation View--" << endl; if(!checkSectionCode(mData,PRC_TYPE_MKP_View)) return; indent(); describeContentPRCBaseWithGraphics(mData,true); unsigned int number_of_annotations = mData.readUnsignedInt(); for(unsigned int i = 0; i < number_of_annotations; ++i) { //TODO: describeReferenceUniqueIdentifier(mData); } //TODO: describePlane(mData); bool scene_display_parameters = mData.readBit(); if(scene_display_parameters) { describeSceneDisplayParameters(mData); } describeUserData(mData); dedent(); } void describeExtent3d(BitByBitData &mData) { // I suspect the order of min/max should be flipped cout << getIndent() << "Minimum" << endl; indent(); describeVector3d(mData); dedent(); cout << getIndent() << "Maximum" << endl; indent(); describeVector3d(mData); dedent(); } void describeExtent1d(BitByBitData &mData) { cout << getIndent() << "Minimum " << mData.readDouble() << endl; cout << getIndent() << "Maximum " << mData.readDouble() << endl; } void describeExtent2d(BitByBitData &mData) { cout << getIndent() << "Minimum" << endl; indent(); describeVector2d(mData); dedent(); cout << getIndent() << "Maximum" << endl; indent(); describeVector2d(mData); dedent(); } void describeVector3d(BitByBitData &mData) { double x = mData.readDouble(); double y = mData.readDouble(); double z = mData.readDouble(); cout << getIndent() << '(' << x << ',' << y << ',' << z << ')' << endl; } void describeVector2d(BitByBitData &mData) { double x = mData.readDouble(); double y = mData.readDouble(); cout << getIndent() << '(' << x << ',' << y << ')' << endl; } void describePicture(BitByBitData &mData) { cout << getIndent() << "--Picture--" << endl; unsigned int sectionCode = mData.readUnsignedInt(); if(sectionCode != PRC_TYPE_GRAPH_Picture) { cout << getIndent() << "Invalid section code." << endl; } describeContentPRCBase(mData,false); int format = mData.readInt(); switch(format) { case KEPRCPicture_PNG: cout << getIndent() << "PNG format" << endl; break; case KEPRCPicture_JPG: cout << getIndent() << "JPG format" << endl; break; case KEPRCPicture_BITMAP_RGB_BYTE: cout << getIndent() << "gzipped pixel data (see PRC base compression). Each element is a RGB triple. (3 components)" << endl; break; case KEPRCPicture_BITMAP_RGBA_BYTE: cout << getIndent() << "gzipped pixel data (see PRC base compression). Each element is a complete RGBA element. (4 components)" << endl; break; case KEPRCPicture_BITMAP_GREY_BYTE: cout << getIndent() << "gzipped pixel data (see PRC base compression). Each element is a single luminance value. (1 components)" << endl; break; case KEPRCPicture_BITMAP_GREYA_BYTE: cout << getIndent() << "gzipped pixel data (see PRC base compression). Each element is a luminance/alpha pair. (2 components)" << endl; break; default: cout << getIndent() << "Invalid picture format." << endl; break; } cout << getIndent() << "uncompressed_file_index " << mData.readUnsignedInt()-1 << endl; cout << getIndent() << "pixel width " << mData.readUnsignedInt() << endl; cout << getIndent() << "pixel height " << mData.readUnsignedInt() << endl; } void describeTextureDefinition(BitByBitData &mData) { cout << getIndent() << "--Texture Definition--" << endl; if(!checkSectionCode(mData,PRC_TYPE_GRAPH_TextureDefinition)) return; cout << getIndent() << "TODO: Can't describe textures yet." << endl; } void describeMaterial(BitByBitData &mData) { cout << getIndent() << "--Material--" << endl; unsigned int code = mData.readUnsignedInt(); if(code == PRC_TYPE_GRAPH_Material) { describeContentPRCBase(mData,true); cout << getIndent() << "index of ambient color " << mData.readUnsignedInt() - 1 << endl; cout << getIndent() << "index of diffuse color " << mData.readUnsignedInt() - 1 << endl; cout << getIndent() << "index of emissive color " << mData.readUnsignedInt() - 1 << endl; cout << getIndent() << "index of specular color " << mData.readUnsignedInt() - 1 << endl; cout << getIndent() << "shininess " << mData.readDouble() << endl; cout << getIndent() << "ambient_alpha " << mData.readDouble() << endl; cout << getIndent() << "diffuse_alpha " << mData.readDouble() << endl; cout << getIndent() << "emissive_alpha " << mData.readDouble() << endl; cout << getIndent() << "specular_alpha " << mData.readDouble() << endl; } else if(code == PRC_TYPE_GRAPH_TextureApplication) { describeContentPRCBase(mData,true); cout << getIndent() << "material_generic_index " << mData.readUnsignedInt() - 1 << endl; cout << getIndent() << "texture_definition_index " << mData.readUnsignedInt() - 1 << endl; cout << getIndent() << "next_texture_index " << mData.readUnsignedInt() - 1 << endl; cout << getIndent() << "UV_coordinates_index " << mData.readUnsignedInt() - 1 << endl; } else { cout << getIndent() << "Invalid section code in material definition." << endl; } } void describeLinePattern(BitByBitData &mData) { cout << getIndent() << "--Line Pattern--" << endl; if(!checkSectionCode(mData,PRC_TYPE_GRAPH_LinePattern)) return; indent(); describeContentPRCBase(mData,true); unsigned int size_lengths = mData.readUnsignedInt(); cout << getIndent() << "size_lengths " << size_lengths << endl; indent(); for(unsigned int i=0;i(mData.readUnsignedInt()-1) << endl; cout << getIndent() << "is_material " << (mData.readBit()?"yes":"no") << endl; cout << getIndent() << "color_index / material_index " << static_cast(mData.readUnsignedInt()-1) << endl; bool is_transparency_defined = mData.readBit(); cout << getIndent() << "is_transparency_defined " << (is_transparency_defined?"yes":"no") << endl; if(is_transparency_defined) { indent(); cout << getIndent() << "transparency " << static_cast(mData.readChar()) << endl; dedent(); } bool is_additional_1_defined = mData.readBit(); cout << getIndent() << "is_additional_1_defined " << (is_additional_1_defined?"yes":"no") << endl; if(is_additional_1_defined) { indent(); cout << getIndent() << "additional_1 " << static_cast(mData.readChar()) << endl; dedent(); } bool is_additional_2_defined = mData.readBit(); cout << getIndent() << "is_additional_2_defined " << (is_additional_2_defined?"yes":"no") << endl; if(is_additional_2_defined) { indent(); cout << getIndent() << "additional_2 " << static_cast(mData.readChar()) << endl; dedent(); } bool is_additional_3_defined = mData.readBit(); cout << getIndent() << "is_additional_3_defined " << (is_additional_3_defined?"yes":"no") << endl; if(is_additional_3_defined) { indent(); cout << getIndent() << "additional_3 " << static_cast(mData.readChar()) << endl; dedent(); } dedent(); } void describeFillPattern(BitByBitData &mData) { cout << getIndent() << "--Fill Pattern--" << endl; unsigned int type = mData.readUnsignedInt(); cout << getIndent() << "type " << type << endl; switch(type) { //TODO: actually describe fill patterns default: cout << getIndent() << "Invalid fill pattern type " << type << endl; } } void describeRepresentationItemContent(BitByBitData &mData) { describeContentPRCBaseWithGraphics(mData,true); unsigned int index_local_coordinate_system = mData.readUnsignedInt()-1; unsigned int index_tessellation = mData.readUnsignedInt()-1; //cast to int will not be right for big indices cout << getIndent() << "index_local_coordinate_system " << static_cast(index_local_coordinate_system) << endl; cout << getIndent() << "index_tessellation " << static_cast(index_tessellation) << endl; } void describeRepresentationItem(BitByBitData &mData) { cout << getIndent() << "--Representation Item--" << endl; unsigned int type = mData.readUnsignedInt(); switch(type) { case PRC_TYPE_RI_Curve: { cout << getIndent() << "--PRC_TYPE_RI_Curve--" << endl; describeRepresentationItemContent(mData); bool has_wire_body = mData.readBit(); if(has_wire_body) { cout << getIndent() << "context_id " << mData.readUnsignedInt() << endl; cout << getIndent() << "body_id " << mData.readUnsignedInt() << endl; } describeUserData(mData); break; } case PRC_TYPE_RI_PolyBrepModel: { cout << getIndent() << "--PRC_TYPE_RI_PolyBrepModel--" << endl; describeRepresentationItemContent(mData); cout << getIndent() << "is_closed " << (mData.readBit()?"yes":"no") << endl; describeUserData(mData); break; } case PRC_TYPE_RI_BrepModel: { cout << getIndent() << "--PRC_TYPE_RI_BrepModel--" << endl; describeRepresentationItemContent(mData); bool has_brep_data = mData.readBit(); cout << getIndent() << "has_brep_data " << (has_brep_data?"yes":"no") << endl; if(has_brep_data) { cout << getIndent() << "context_id " << mData.readUnsignedInt() << endl; cout << getIndent() << "object_id " << mData.readUnsignedInt() << endl; } cout << getIndent() << "is_closed " << (mData.readBit()?"yes":"no") << endl; describeUserData(mData); break; } case PRC_TYPE_RI_Direction: case PRC_TYPE_RI_Plane: case PRC_TYPE_RI_CoordinateSystem: case PRC_TYPE_RI_PointSet: case PRC_TYPE_RI_Set: case PRC_TYPE_RI_PolyWire: cout << getIndent() << "TODO: Unhandled representation item " << type << endl; break; default: cout << getIndent() << "Invalid representation item type " << type << endl; break; } } void describeRGBColour(BitByBitData &mData) { cout << getIndent() << "R: " << mData.readDouble(); cout << " G: " << mData.readDouble(); cout << " B: " << mData.readDouble() << endl; } void describeSchema(BitByBitData &mData) { cout << getIndent() << "--Schema--" << endl; indent(); unsigned int numSchemas = mData.readUnsignedInt(); cout << getIndent() << "Number of Schemas " << numSchemas << endl; if(numSchemas != 0) { cout << "Error: Don't know how to handle multiple schemas." << endl; } dedent(); } string currentName; int layer_index; int index_of_line_style; unsigned short behaviour_bit_field; void resetCurrentGraphics() { layer_index = -1; index_of_line_style = -1; behaviour_bit_field = 1; } void unFlushSerialization() { currentName = ""; resetCurrentGraphics(); } void describeName(BitByBitData &mData) { bool sameNameAsCurrent = mData.readBit(); cout << getIndent() << "Same name as current name? " << (sameNameAsCurrent?"yes":"no") << endl; if(!sameNameAsCurrent) currentName = mData.readString(); cout << getIndent() << "Name \"" << currentName << '\"' << endl; } void describeUnit(BitByBitData &mData) { cout << getIndent() << "Unit is from CAD file? " << (mData.readBit()?"yes":"no") << endl; cout << getIndent() << "Unit is " << mData.readDouble() << " mm" << endl; } void describeAttributes(BitByBitData &mData) { cout << getIndent() << "--Attributes--" << endl; indent(); unsigned int numAttribs = mData.readUnsignedInt(); cout << getIndent() << "Number of Attributes " << numAttribs << endl; indent(); for(unsigned int i = 0; i < numAttribs; ++i) { cout << getIndent() << "PRC_TYPE_MISC_Attribute " << mData.readUnsignedInt() << endl; bool titleIsInt = mData.readBit(); cout << getIndent() << "Title is integer? " << (titleIsInt?"yes":"no") << endl; indent(); if(titleIsInt) { cout << getIndent() << "Title " << mData.readUnsignedInt() << endl; } else { cout << getIndent() << "Title \"" << mData.readString() << '\"' << endl; } unsigned int sizeOfAttributeKeys = mData.readUnsignedInt(); cout << getIndent() << "Size of Attribute Keys " << sizeOfAttributeKeys << endl; for(unsigned int a = 0; a < sizeOfAttributeKeys; ++a) { bool titleIsInt = mData.readBit(); cout << getIndent() << "Title is integer? " << (titleIsInt?"yes":"no") << endl; indent(); if(titleIsInt) { cout << getIndent() << "Title " << mData.readUnsignedInt() << endl; } else { cout << getIndent() << "Title \"" << mData.readString() << '\"' << endl; } dedent(); unsigned int attributeType = mData.readUnsignedInt(); cout << getIndent() << "Attribute Type " << attributeType << endl; switch(attributeType) { case KEPRCModellerAttributeTypeInt: cout << getIndent() << "Attribute Value (int) " << mData.readInt() << endl; break; case KEPRCModellerAttributeTypeReal: cout << getIndent() << "Attribute Value (double) " << mData.readDouble() << endl; break; case KEPRCModellerAttributeTypeTime: cout << getIndent() << "Attribute Value (time_t) " << mData.readUnsignedInt() << endl; break; case KEPRCModellerAttributeTypeString: cout << getIndent() << "Attribute Value (string) \"" << mData.readString() << '\"' << endl; break; default: break; } } dedent(); cout << endl; } dedent(); dedent(); } void describeContentPRCBase(BitByBitData &mData, bool typeEligibleForReference) { cout << getIndent() << "--ContentPRCBase--" << endl; indent(); describeAttributes(mData); describeName(mData); if(typeEligibleForReference) { cout << getIndent() << "CAD_identifier " << mData.readUnsignedInt() << endl; cout << getIndent() << "CAD_persistent_identifier " << mData.readUnsignedInt() << endl; cout << getIndent() << "PRC_unique_identifier " << mData.readUnsignedInt() << endl; } dedent(); } void describeCompressedUniqueID(BitByBitData &mData) { cout << getIndent() << "UUID: " << hex << setfill('0'); for(int i = 0; i < 4; ++i) cout << setw(8) << mData.readUnsignedInt() << ' '; cout << dec << setfill(' ') << endl; } void describeUserData(BitByBitData &mData) { unsigned int bits = mData.readUnsignedInt(); cout << getIndent() << bits << " bits of user data" << endl; indent(); for(unsigned int i = 0; i < bits; ++i) { if(i%64 == 0) cout << getIndent(); cout << mData.readBit(); if(i%64 == 63) cout << endl; } if(bits%64 != 0) cout << endl; dedent(); } bool checkSectionCode(BitByBitData &mData, unsigned int code) { unsigned int num = mData.readUnsignedInt(); if(code != num) { cout << getIndent() << "Invalid section code " << num << ". Expected " << code << " at "; mData.tellPosition(); return false; } else { cout << getIndent() << "Section code " << code << endl; return true; } } unsigned int currentIndent = 0; string getIndent() { ostringstream out; for(unsigned int i = 0; i < currentIndent; ++i) out << " "; return out.str(); } void indent() { ++currentIndent; } void dedent() { --currentIndent; } ./asymptote-2.41/prc/PRCTools/bitData.cc0000644000175000017500000001360513064427076017660 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include "../PRC.h" #include "../PRCdouble.h" #include "bitData.h" using std::cout; using std::endl; using std::hex; using std::cerr; BitPosition BitByBitData::getPosition() { BitPosition bp; bp.byteIndex = data - start; bp.bitIndex = 0; for(unsigned char temp = bitMask<<1; temp != 0; temp <<= 1) bp.bitIndex++; return bp; } void BitByBitData::setPosition(const BitPosition& bp) { if(bp.byteIndex < length) { data = start + bp.byteIndex; bitMask = 0x80 >> bp.bitIndex; // big-endian, zero based bit index (from 0 to 7) // so 0x80 => bit 0, 0x01 => bit 7 // Why? It is easy to see in a hex editor. failed = false; } else { failed = true; } } void BitByBitData::setPosition(unsigned int byte, unsigned int bit) { if(byte <= length) { data = start + byte; bitMask = 0x80 >> bit; // big-endian, zero based bit index (from 0 to 7) // so 0x80 => bit 0, 0x01 => bit 7 // Why? It is easy to see in a hex editor. failed = false; } else { failed = true; } } void BitByBitData::setShowBits(bool val) { showBits = val; } void BitByBitData::tellPosition() { BitPosition bp = getPosition(); cout << bp.byteIndex << ':' << bp.bitIndex << endl; } bool BitByBitData::readBit() { if(!failed) { bool val = *data & bitMask; if(showBits) cout << (val?'1':'0'); nextBit(); return val; } else return false; } unsigned char BitByBitData::readChar() { unsigned char dat = 0; dat |= readBit(); for(int a = 0; a < 7; ++a) { dat <<= 1; dat |= readBit(); } return dat; } unsigned int BitByBitData::readUnsignedInt() { unsigned int result = 0; unsigned int count = 0; while(readBit()) { result |= (static_cast(readChar()) << 8*count++); } if(showBits) cout << " " << result << endl; return result; } std::string BitByBitData::readString() { bool isNotNull = readBit(); std::string result; if(isNotNull) { unsigned int stringLength = readUnsignedInt(); char *buf = new char[stringLength+1]; buf[stringLength] = '\0'; for(unsigned int a = 0; a < stringLength; ++a) { buf[a] = readChar(); } result = buf; delete[] buf; } if(showBits) cout << " " << result << endl; return result; } int BitByBitData::readInt() { int result = 0; unsigned int count = 0; while(readBit()) { result |= (static_cast(readChar()) << 8*count++); } result <<= (4-count)*8; result >>= (4-count)*8; if(showBits) cout << " " << result << endl; return result; } // Thanks to Michail Vidiassov double BitByBitData::readDouble() { ieee754_double value; value.d = 0; sCodageOfFrequentDoubleOrExponent *pcofdoe; unsigned int ucofdoe = 0; for(int i = 1; i <= 22; ++i) { ucofdoe <<= 1; ucofdoe |= readBit(); if((pcofdoe = getcofdoe(ucofdoe,i)) != NULL) break; } value.d = pcofdoe->u2uod.Value; // check if zero if(pcofdoe->NumberOfBits==2 && pcofdoe->Bits==1 && pcofdoe->Type==VT_double) return value.d; value.ieee.negative = readBit(); // get sign if(pcofdoe->Type == VT_double) // double from list return value.d; if(readBit()==0) // no mantissa return value.d; // read the mantissa // read uppermost 4 bits of mantissa unsigned char b4 = 0; for(int i = 0; i < 4; ++i) { b4 <<= 1; b4 |= readBit(); } #ifdef WORDS_BIGENDIAN *(reinterpret_cast(&value)+1) |= b4; unsigned char *lastByte = reinterpret_cast(&value)+7; unsigned char *currentByte = reinterpret_cast(&value)+2; #else *(reinterpret_cast(&value)+6) |= b4; unsigned char *lastByte = reinterpret_cast(&value)+0; unsigned char *currentByte = reinterpret_cast(&value)+5; #endif for(;MOREBYTE(currentByte,lastByte); NEXTBYTE(currentByte)) { if(readBit()) { // new byte *currentByte = readChar(); } else { // get 3 bit offset unsigned int offset = 0; offset |= (readBit() << 2); offset |= (readBit() << 1); offset |= readBit(); if(offset == 0) { // fill remaining bytes in mantissa with previous byte unsigned char pByte = BYTEAT(currentByte,1); for(;MOREBYTE(currentByte,lastByte); NEXTBYTE(currentByte)) *currentByte = pByte; break; } else if(offset == 6) { // fill remaining bytes except last byte with previous byte unsigned char pByte = BYTEAT(currentByte,1); PREVIOUSBYTE(lastByte); for(;MOREBYTE(currentByte,lastByte); NEXTBYTE(currentByte)) *currentByte = pByte; *currentByte = readChar(); break; } else { // one repeated byte *currentByte = BYTEAT(currentByte,offset); } } } if(showBits) cout << " " << value.d << endl; return value.d; } void BitByBitData::nextBit() { bitMask >>= 1; if(bitMask == 0) { if(data < start+length) data++; else { failed = true; cout << "End of data."<< endl; } bitMask = 0x80; } } ./asymptote-2.41/prc/PRCTools/makePRC.cc0000644000175000017500000001115413064427076017567 0ustar norbertnorbert/************ * * This file is part of a tool for producing 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include #include #include #include "../oPRCFile.h" using namespace std; void readPoints(istream &is, unsigned int n, double p[][3]) { for(unsigned int i = 0; i < n; ++i) { is >> p[i][0] >> p[i][1] >> p[i][2]; } if(!is) { cerr << "Error reading list of points." << endl; exit(1); } } void readDoubles(istream &is, unsigned int n, double d[]) { for(unsigned int i = 0; i < n; ++i) { is >> d[i]; } if(!is) { cerr << "Error reading list of doubles." << endl; exit(1); } } int main(int argc, char **argv) { const char *oFileName = "output.prc"; int c; opterr = 0; while ((c = getopt (argc, argv, "o:")) != -1) switch (c) { case 'o': oFileName = optarg; break; case '?': if (optopt == 'o') cerr << "Option '-o' requires an argument, the filename." << endl; else cerr << "Unrecognized option '-" << (char)optopt << "'." << endl; exit(1); break; default: exit(1); } istream *ins = NULL; if(optind < argc) { ins = new ifstream(argv[optind]); if(!*ins) { cerr << "Error opening input file " << argv[optind] << endl; exit(1); } } else { ins = &cin; } ofstream outf(oFileName); if(!outf) { cerr << "Error opening output file " << oFileName << endl; exit(1); } oPRCFile oPRC(outf); string entityType; while(*ins) { *ins >> entityType; if(!*ins) break; if(entityType == "Line") { double r,g,b,a; unsigned int numberOfPoints; *ins >> r >> g >> b >> a >> numberOfPoints; if(!*ins) { cerr << "Error reading line data." << endl; exit(1); } else { double (*points)[3] = new double[numberOfPoints][3]; readPoints(*ins,numberOfPoints,points); oPRC.add(new PRCline(&oPRC,numberOfPoints,points, *new RGBAColour(r,g,b,a))); } } else if(entityType == "Curve") { double r,g,b,a; unsigned int numberOfPoints; unsigned int degree; *ins >> r >> g >> b >> a >> degree >> numberOfPoints; if(!*ins) { cerr << "Error reading curve data." << endl; exit(1); } else { double (*points)[3] = new double[numberOfPoints][3]; double *knots = new double[degree+numberOfPoints+1]; readPoints(*ins,numberOfPoints,points); readDoubles(*ins,degree+numberOfPoints+1,knots); oPRC.add(new PRCcurve(&oPRC,degree,numberOfPoints,points, knots,*new RGBAColour(r,g,b,a))); } } else if(entityType == "Surface") { double r,g,b,a; unsigned int numberOfPointsU,numberOfPointsV; unsigned int degreeU,degreeV; *ins >> r >> g >> b >> a >> degreeU >> degreeV >> numberOfPointsU >> numberOfPointsV; if(!*ins) { cerr << "Error reading surface data." << endl; exit(1); } else { double (*points)[3] = new double[numberOfPointsU*numberOfPointsV][3]; double *knotsU = new double[degreeU+numberOfPointsU+1]; double *knotsV = new double[degreeV+numberOfPointsV+1]; readPoints(*ins,numberOfPointsU*numberOfPointsV,points); readDoubles(*ins,degreeU+numberOfPointsU+1,knotsU); readDoubles(*ins,degreeV+numberOfPointsV+1,knotsV); oPRC.add(new PRCsurface(&oPRC,degreeU,degreeV,numberOfPointsU, numberOfPointsV,points,knotsU,knotsV, *new RGBAColour(r,g,b,a))); } } else { cerr << "Unrecognized entity type " << entityType << endl; exit(1); } } if(ins && ins != &cin) delete ins; oPRC.finish(); outf.close(); return 0; } ./asymptote-2.41/prc/PRCTools/bitSearchDouble.cc0000644000175000017500000000360713064427076021350 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include #include "bitData.h" using namespace std; int main(int argc, char *argv[]) { if(argc < 2) { cerr << "Error: Input file not specified." << endl; return 1; } ifstream inFile(argv[1]); if(!inFile) { cerr << "Error: Cannot open input file." << endl; return 1; } inFile.seekg(0,ios::end); unsigned int length = inFile.tellg(); inFile.seekg(0,ios::beg); char *buf = new char[length]; inFile.read(buf,length); BitByBitData bbbd(buf,length); double dsf; cout << "double to search for: "; cin >> dsf; BitPosition currP; for(currP.byteIndex = 0; currP.byteIndex < length; ++currP.byteIndex) for(currP.bitIndex = 0; currP.bitIndex < 8; ++currP.bitIndex) { bbbd.setPosition(currP); if(bbbd.readDouble() == dsf) { BitPosition bp = bbbd.getPosition(); cout << "Found " << dsf << " at " << currP.byteIndex << ':' << currP.bitIndex << " to " << bp.byteIndex << ':' << bp.bitIndex << endl; } } delete[] buf; return 0; } ./asymptote-2.41/prc/PRCTools/iPRCFile.cc0000644000175000017500000002113013064427076017675 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include "bitData.h" #include "iPRCFile.h" #include "describePRC.h" using std::vector; using std::istream; using std::ios; using std::cout; using std::endl; using std::cerr; using std::string; using std::ofstream; using std::ostringstream; void iPRCFile::dumpSections(string prefix) { ofstream out; for(unsigned int i = 0; i < fileStructures.size(); ++i) { ostringstream name; name << prefix << "Structure" << i; out.open((name.str()+"-Globals.bin").c_str()); out.write(fileStructures[i].sections[GLOBALS_SECTION],fileStructures[i].sectionLengths[GLOBALS_SECTION]); out.close(); out.open((name.str()+"-Tree.bin").c_str()); out.write(fileStructures[i].sections[TREE_SECTION],fileStructures[i].sectionLengths[TREE_SECTION]); out.close(); out.open((name.str()+"-Tessellation.bin").c_str()); out.write(fileStructures[i].sections[TESSELLATION_SECTION],fileStructures[i].sectionLengths[TESSELLATION_SECTION]); out.close(); out.open((name.str()+"-Geometry.bin").c_str()); out.write(fileStructures[i].sections[GEOMETRY_SECTION],fileStructures[i].sectionLengths[GEOMETRY_SECTION]); out.close(); out.open((name.str()+"-ExtraGeometry.bin").c_str()); out.write(fileStructures[i].sections[EXTRA_GEOMETRY_SECTION],fileStructures[i].sectionLengths[EXTRA_GEOMETRY_SECTION]); out.close(); } out.open((prefix+"-ModelFile.bin").c_str()); out.write(modelFileData,modelFileLength); out.close(); } void iPRCFile::describe() { /* for(int i = 0; i < modelFileLength; ++i) { cout << ' ' << std::hex << std::setw(2) << std::setfill('0') << static_cast(static_cast(mfd.readChar())); if(i%16 == 15) cout << endl; } cout << endl; */ unFlushSerialization(); for(unsigned int i = 0; i < fileStructures.size(); ++i) { cout << "File Structure " << i << ":" << endl; //describe header char *header = buffer + fileStructureInfos[i].offsets[0]; cout << "--Header Section--" << endl; cout << " Signature " << header[0] << header[1] << header[2] << endl; cout << " Minimal version for read " << *(unsigned int*)(header+3) << endl; cout << " Authoring version " << *(unsigned int*)(header+7) << endl; cout << std::hex; cout << " File structure UUID " << *(unsigned int*)(header+11) << ' ' << *(unsigned int*)(header+15) << ' ' << *(unsigned int*)(header+19) << ' ' << *(unsigned int*)(header+23) << endl; cout << " Application UUID " << *(unsigned int*)(header+27) << ' ' << *(unsigned int*)(header+31) << ' ' << *(unsigned int*)(header+35) << ' ' << *(unsigned int*)(header+39) << endl; cout << std::dec; // uncompressed files unsigned int numberOfUncompressedFiles = *(unsigned int*)(header+43); cout << "Number of uncompressed files " << numberOfUncompressedFiles << endl; char *position = header+47; for(unsigned int j = 0; j < numberOfUncompressedFiles; ++j) { cout << "Uncompressed file " << j << ":" << endl; unsigned int size = *(unsigned int*)position; cout << " size " << size << " bytes" << endl; position += size+sizeof(unsigned int); } BitByBitData fileStruct(fileStructures[i].sections[GLOBALS_SECTION],fileStructures[i].sectionLengths[GLOBALS_SECTION]); describeSchema(fileStruct); describeGlobals(fileStruct); unFlushSerialization(); fileStruct = BitByBitData(fileStructures[i].sections[TREE_SECTION],fileStructures[i].sectionLengths[TREE_SECTION]); describeTree(fileStruct); unFlushSerialization(); fileStruct = BitByBitData(fileStructures[i].sections[TESSELLATION_SECTION],fileStructures[i].sectionLengths[TESSELLATION_SECTION]); describeTessellation(fileStruct); unFlushSerialization(); fileStruct = BitByBitData(fileStructures[i].sections[GEOMETRY_SECTION],fileStructures[i].sectionLengths[GEOMETRY_SECTION]); describeGeometry(fileStruct); unFlushSerialization(); fileStruct = BitByBitData(fileStructures[i].sections[EXTRA_GEOMETRY_SECTION],fileStructures[i].sectionLengths[EXTRA_GEOMETRY_SECTION]); describeExtraGeometry(fileStruct); unFlushSerialization(); } BitByBitData mfd(modelFileData,modelFileLength); describeSchema(mfd); describeModelFileData(mfd,fileStructures.size()); unFlushSerialization(); } iPRCFile::iPRCFile(istream& in) { char PRC[3]; in.read(PRC,3); if(PRC[0] != 'P' || PRC[1] != 'R' || PRC[2] != 'C') { cerr << "Error: Invalid file format: PRC not found." << endl; } unsigned int versionForRead,authoringVersion; in.read((char*)&versionForRead,sizeof(versionForRead)); in.read((char*)&authoringVersion,sizeof(authoringVersion)); cout << "Version for reading " << versionForRead << endl; cout << "Authoring version " << authoringVersion << endl; unsigned int fileStructureUUID[4]; in.read((char*)fileStructureUUID,sizeof(fileStructureUUID)); //(void*) is for formatting cout << "File structure UUID " << (void*)(fileStructureUUID[0]) << ' ' << (void*)(fileStructureUUID[1]) << ' ' << (void*)(fileStructureUUID[2]) << ' ' << (void*)(fileStructureUUID[3]) << endl; unsigned int applicationUUID[4]; in.read((char*)applicationUUID,sizeof(applicationUUID)); cout << "Application UUID " << (void*)(applicationUUID[0]) << ' ' << (void*)(applicationUUID[1]) << ' ' << (void*)(applicationUUID[2]) << ' ' << (void*)(applicationUUID[3]) << endl; unsigned int numberOfFileStructures; in.read((char*)&numberOfFileStructures,sizeof(numberOfFileStructures)); cout << "number of file structures " << numberOfFileStructures << endl; // load fileStructureInformation for(unsigned int fsi = 0; fsi < numberOfFileStructures; ++fsi) { FileStructureInformation info; in.read((char*)&info.UUID,sizeof(info.UUID)); cout << "\tFile structure UUID " << (void*)(info.UUID[0]) << ' ' << (void*)(info.UUID[1]) << ' ' << (void*)(info.UUID[2]) << ' ' << (void*)(info.UUID[3]) << endl; in.read((char*)&info.reserved,sizeof(info.reserved)); cout << "\tReserved " << info.reserved << endl; unsigned int numberOfOffsets; in.read((char*)&numberOfOffsets,sizeof(numberOfOffsets)); cout << "\tNumber of Offsets " << numberOfOffsets << endl; for(unsigned int oi = 0; oi < numberOfOffsets; ++oi) { unsigned int offset; in.read((char*)&offset,sizeof(offset)); info.offsets.push_back(offset); cout << "\t\tOffset " << offset << endl; } fileStructureInfos.push_back(info); } in.read((char*)&modelFileOffset,sizeof(modelFileOffset)); cout << "Model file offset " << modelFileOffset << endl; in.read((char*)&fileSize,sizeof(fileSize)); // this is not documented cout << "File size " << fileSize << endl; in.read((char*)&numberOfUncompressedFiles,sizeof(numberOfUncompressedFiles)); cout << "Number of uncompressed files " << numberOfUncompressedFiles << endl; for(unsigned int ufi = 0; ufi < numberOfUncompressedFiles; ++ufi) { unsigned int size; in.read((char*)&size,sizeof(size)); in.seekg(size,ios::cur); } //read the whole file into memory in.seekg(0,ios::beg); buffer = new char[fileSize]; if(!buffer) cerr << "Couldn't get memory." << endl; in.read(buffer,fileSize); //decompress fileStructures for(unsigned int fs = 0; fs < fileStructureInfos.size(); ++fs) { fileStructures.push_back(FileStructure()); for(unsigned int i = 1; i < fileStructureInfos[fs].offsets.size(); ++i) // start at 1 since header is decompressed { fileStructures[fs].sections[i-1] = NULL; unsigned int offset = fileStructureInfos[fs].offsets[i]; fileStructures[fs].sectionLengths[i-1] = decompress(buffer+offset,fileSize-offset,fileStructures[fs].sections[i-1]); } } //decompress modelFileData modelFileData = NULL; modelFileLength = decompress(buffer+modelFileOffset,fileSize-modelFileOffset,modelFileData); } ./asymptote-2.41/prc/PRCTools/inflation.cc0000644000175000017500000000434413064427076020273 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include "inflation.h" using std::istream; using std::ios; using std::cout; using std::cerr; using std::endl; using std::exit; int decompress(char* inb, int fileLength, char* &outb) { const int CHUNK = 16384; unsigned int resultSize = 0; outb = (char*) realloc(outb,CHUNK); z_stream strm; strm.zalloc = Z_NULL; strm.zfree = Z_NULL; strm.avail_in = fileLength; strm.next_in = (unsigned char*)inb; strm.opaque = Z_NULL; int code = inflateInit(&strm); if(code != Z_OK) return -1; strm.next_out = (unsigned char*)outb; strm.avail_out = CHUNK; code = inflate(&strm,Z_NO_FLUSH); resultSize = CHUNK-strm.avail_out; unsigned int size = CHUNK; while(code == Z_OK) { outb = (char*) realloc(outb,2*size); if(outb == NULL) { cerr << "Ran out of memory while decompressing." << endl; exit(1); } strm.next_out = (Bytef*)(outb + resultSize); strm.avail_out += size; size *= 2; code = inflate(&strm,Z_NO_FLUSH); resultSize = size - strm.avail_out; } code = inflateEnd(&strm); if(code != Z_OK) { free(outb); return 0; } return resultSize; } int decompress(istream &input,char* &result) { input.seekg(0,ios::end); int fileLength = input.tellg(); input.seekg(0,ios::beg); char *inb = new char[fileLength]; input.read(inb,fileLength); int code = decompress(inb,fileLength,result); delete[] inb; return code; } ./asymptote-2.41/prc/PRCTools/describePRC.h0000644000175000017500000001035713064427076020300 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #ifndef __DESCRIBE_PRC_H #define __DESCRIBE_PRC_H #include "iPRCFile.h" #include "bitData.h" void describeGlobals(BitByBitData&); void describeTree(BitByBitData&); void describeTessellation(BitByBitData&); void describeGeometry(BitByBitData&); void describeExtraGeometry(BitByBitData&); void describeModelFileData(BitByBitData&,unsigned int); void describePicture(BitByBitData&); void describeTextureDefinition(BitByBitData&); void describeMaterial(BitByBitData&); void describeLinePattern(BitByBitData&); void describeCategory1LineStyle(BitByBitData&); void describeFillPattern(BitByBitData&); void describeRepresentationItem(BitByBitData&); //void describe(BitByBitData&); void describeLight(BitByBitData&); void describeCamera(BitByBitData&); bool describeContentCurve(BitByBitData&); void describeCurvCircle(BitByBitData&); void describeCurvLine(BitByBitData&); void describeCurvNURBS(BitByBitData&); void describeCurvPolyLine(BitByBitData&); void describeContentWireEdge(BitByBitData&); bool isCompressedSerialType(unsigned int); void describeUVParametrization(BitByBitData&); void describeSurfNURBS(BitByBitData&); void describeSurfCylinder(BitByBitData&); void describeSurfPlane(BitByBitData&); void describeTopoFace(BitByBitData&); void describeTopoLoop(BitByBitData&); void describeTopoCoEdge(BitByBitData&); void describeTopoEdge(BitByBitData&); void describeTopoConnex(BitByBitData&); void describeTopoShell(BitByBitData&); void describeObject(BitByBitData&); void describeBaseTopology(BitByBitData&); void describeBaseGeometry(BitByBitData&); unsigned int describeContentBody(BitByBitData&); void describeContentSurface(BitByBitData&); void describeBody(BitByBitData&); void describeTopoContext(BitByBitData&); void describeLineAttr(BitByBitData&); void describeArrayRGBA(BitByBitData&,int,int); void describeContentBaseTessData(BitByBitData&); void describeTessFace(BitByBitData&); void describe3DTess(BitByBitData&); void describe3DWireTess(BitByBitData&); void describe3DMarkupTess(BitByBitData&); void describeHighlyCompressed3DTess(BitByBitData&); void describeSceneDisplayParameters(BitByBitData&); void describeCartesionTransformation3d(BitByBitData&); void describeTransformation3d(BitByBitData&); void describeTransformation2d(BitByBitData&); void describeFileStructureInternalData(BitByBitData&); void describeProductOccurrence(BitByBitData&); void describeRepresentationItemContent(BitByBitData&); void describeMarkups(BitByBitData&); void describeAnnotationView(BitByBitData&); void describeExtent3d(BitByBitData&); void describeExtent2d(BitByBitData&); void describeExtent1d(BitByBitData&); void describeVector3d(BitByBitData&); void describeVector2d(BitByBitData&); void describeContentPRCBaseWithGraphics(BitByBitData&,bool); void describeGraphics(BitByBitData&); void describePartDefinition(BitByBitData&); void describeRGBColour(BitByBitData&); void describeSchema(BitByBitData&); void describeName(BitByBitData&); void describeAttributes(BitByBitData&); void describeContentPRCBase(BitByBitData&,bool); void describeUnit(BitByBitData&); void describeCompressedUniqueID(BitByBitData&); void describeUserData(BitByBitData&); extern std::string currentName; extern int layer_index; extern int index_of_line_style; extern unsigned short behaviour_bit_field; void unFlushSerialization(); void resetCurrentGraphics(); bool checkSectionCode(BitByBitData&,unsigned int); std::string getIndent(); void indent(); void dedent(); #endif // __DESCRIBE_PRC_H ./asymptote-2.41/prc/PRCTools/bitSearchUI.cc0000644000175000017500000000350713064427076020452 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include #include "bitData.h" using namespace std; int main(int argc, char *argv[]) { if(argc < 2) { cerr << "Error: Input file not specified." << endl; return 1; } ifstream inFile(argv[1]); if(!inFile) { cerr << "Error: Cannot open input file." << endl; return 1; } inFile.seekg(0,ios::end); unsigned int length = inFile.tellg(); inFile.seekg(0,ios::beg); char *buf = new char[length]; inFile.read(buf,length); BitByBitData bbbd(buf,length); unsigned int uisf; cout << "Unsigned int to search for: "; cin >> uisf; BitPosition currP; for(currP.byteIndex = 0; currP.byteIndex < length; ++currP.byteIndex) for(currP.bitIndex = 0; currP.bitIndex < 8; ++currP.bitIndex) { bbbd.setPosition(currP); if(bbbd.readUnsignedInt() == uisf) { cout << "Found " << uisf << " at " << currP.byteIndex << ':' << currP.bitIndex << endl; } } delete[] buf; return 0; } ./asymptote-2.41/prc/PRCTools/extractSections.cc0000644000175000017500000000243613064427076021472 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include "iPRCFile.h" using namespace std; int main(int argc, char* argv[]) { if(argc < 2) { cerr << "Error: Input file not specified." << endl; return 1; } ifstream inFile(argv[1]); if(!inFile) { cerr << "Error: Cannot open input file." << endl; return 1; } iPRCFile myFile(inFile); string name(argv[1]); myFile.dumpSections(name.substr(0,name.find(".")).c_str()); return 0; } ./asymptote-2.41/prc/PRCTools/inflation.h0000644000175000017500000000203313064427076020126 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #ifndef __INFLATION_H #define __INFLATION_H #include #include #include int decompress(std::istream&,char*&); int decompress(char*,int,char*&); #endif // __INFLATION_H ./asymptote-2.41/prc/PRCTools/bitData.h0000644000175000017500000000350413064427076017517 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #ifndef __BITDATA_H #define __BITDATA_H #include #include struct BitPosition { unsigned int byteIndex; unsigned int bitIndex; }; class BitByBitData { public: BitByBitData(char* s,unsigned int l) : start(s),data(s),length(l), bitMask(0x80),showBits(false),failed(false) {} void tellPosition(); BitPosition getPosition(); void setPosition(const BitPosition&); void setPosition(unsigned int,unsigned int); void setShowBits(bool); bool readBit(); unsigned char readChar(); unsigned int readUnsignedInt(); std::string readString(); int readInt(); double readDouble(); private: char *start; // first byte so we know where we are char *data; // last byte read unsigned int length; unsigned char bitMask; // mask to read next bit of current byte bool showBits; // show each bit read? bool failed; void nextBit(); // shift bit mask and get next byte if needed }; #endif // __BITDATA_H ./asymptote-2.41/prc/PRCTools/inflationMain.cc0000644000175000017500000000270713064427076021101 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include #include #include "inflation.h" using namespace std; int main(int argc, char *argv[]) { if(argc < 2) { cerr << "No file specified." << endl; return 1; } ifstream data(argv[1]); char *buff = NULL; int dataSize = decompress(data,buff); cout << hex; for(int i = 0; i < dataSize; ++i) { cout << ' ' << setw(2) << setfill('0') << static_cast(static_cast(buff[i])); if(i%16 == 15) cout << endl; } cout << endl << dec << dataSize << " bytes" << endl; free(buff); return 0; } ./asymptote-2.41/prc/PRCTools/Makefile0000644000175000017500000000317213064427076017437 0ustar norbertnorbertCFLAGS = -O3 -Wall CXX = g++ makePRC: PRCbitStream oPRCFile PRCdouble writePRC makePRC.cc $(CXX) $(CFLAGS) -o makePRC PRCbitStream.o oPRCFile.o PRCdouble.o writePRC.o makePRC.cc -lz describePRC: bitData inflation PRCdouble iPRCFile describePRC.cc describeMain.cc $(CXX) $(CFLAGS) -o describePRC bitData.o inflation.o PRCdouble.o iPRCFile.o describePRC.cc describeMain.cc -lz bitSearchUI: bitSearchUI.cc bitData PRCdouble $(CXX) $(CFLAGS) -o bitSearchUI bitData.o PRCdouble.o bitSearchUI.cc bitSearchDouble: bitSearchDouble.cc bitData PRCdouble $(CXX) $(CFLAGS) -o bitSearchDouble bitData.o PRCdouble.o bitSearchDouble.cc extractSections: extractSections.cc iPRCFile inflation bitData PRCdouble $(CXX) $(CFLAGS) -o extractSections iPRCFile.o inflation.o bitData.o PRCdouble.o describePRC.cc extractSections.cc -lz inflateTest: inflation inflationMain.cc $(CXX) $(CFLAGS) -o inflateTest inflation.o inflationMain.cc -lz PRCdouble: ../PRCdouble.cc $(CXX) $(CFLAGS) -c ../PRCdouble.cc -o PRCdouble.o PRCbitStream: ../PRCbitStream.cc $(CXX) $(CFLAGS) -c ../PRCbitStream.cc -o PRCbitStream.o oPRCFile: ../oPRCFile.cc $(CXX) $(CFLAGS) -c ../oPRCFile.cc -o oPRCFile.o writePRC: ../writePRC.cc PRCbitStream $(CXX) $(CFLAGS) -c ../writePRC.cc -o writePRC.o bitData: bitData.cc $(CXX) $(CFLAGS) -c bitData.cc -o bitData.o inflation: inflation.cc $(CXX) $(CFLAGS) -c inflation.cc -o inflation.o iPRCFile: iPRCFile.cc $(CXX) $(CFLAGS) -c iPRCFile.cc -o iPRCFile.o all: makePRC describePRC bitSearchUI bitSearchDouble extractSections inflateTest tools: all clean: rm -f *.o describePRC bitSearchUI bitSearchDouble extractSections inflateTest ./asymptote-2.41/prc/PRCTools/describeMain.cc0000644000175000017500000000233513064427076020673 0ustar norbertnorbert/************ * * This file is part of a tool for reading 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include "iPRCFile.h" using namespace std; int main(int argc, char* argv[]) { if(argc < 2) { cerr << "Error: Input file not specified." << endl; return 1; } ifstream inFile(argv[1]); if(!inFile) { cerr << "Error: Cannot open input file." << endl; return 1; } iPRCFile myFile(inFile); myFile.describe(); return 0; } ./asymptote-2.41/prc/test.cc0000644000175000017500000010660313064427076015623 0ustar norbertnorbert/************ * * This file is part of a tool for producing 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt and * Michail Vidiassov * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include #include #include #include "oPRCFile.h" using namespace std; extern const double pi; int main() { // List of pictures used; keep track of memory allocated to free it in the end // shared pointers or garbage collector may be an alternative uint8_t *picture1 = NULL; uint8_t *picture2 = NULL; uint8_t *picture3 = NULL; uint8_t *picture4 = NULL; oPRCFile file("test.prc"); const size_t N_COLOURS = 32; RGBAColour colours[N_COLOURS]; for(size_t i = 0; i < N_COLOURS; ++i) { colours[i%N_COLOURS].R = 0.0; colours[i%N_COLOURS].G = (i%N_COLOURS)/static_cast(N_COLOURS); colours[i%N_COLOURS].B = 0.95; colours[i%N_COLOURS].A = 0.75; } PRCmaterial materials[N_COLOURS]; for(size_t i = 0; i < N_COLOURS; ++i) { materials[i%N_COLOURS].diffuse.R = 0.0; materials[i%N_COLOURS].diffuse.G = (i%N_COLOURS)/static_cast(N_COLOURS); materials[i%N_COLOURS].diffuse.B = 0.95; materials[i%N_COLOURS].diffuse.A = 0.75; materials[i%N_COLOURS].specular.R = 0.01*0.0; materials[i%N_COLOURS].specular.G = 0.01*(i%N_COLOURS)/static_cast(N_COLOURS); materials[i%N_COLOURS].specular.B = 0.01*0.95; materials[i%N_COLOURS].specular.A = 0.01*0.75; materials[i%N_COLOURS].emissive.R = 0.20*0.0; materials[i%N_COLOURS].emissive.G = 0.20*(i%N_COLOURS)/static_cast(N_COLOURS); materials[i%N_COLOURS].emissive.B = 0.20*0.95; materials[i%N_COLOURS].emissive.A = 0.20*0.75; materials[i%N_COLOURS].ambient.R = 0.05*0.0; materials[i%N_COLOURS].ambient.G = 0.05*(i%N_COLOURS)/static_cast(N_COLOURS); materials[i%N_COLOURS].ambient.B = 0.05*0.95; materials[i%N_COLOURS].ambient.A = 0.05*0.75; materials[i%N_COLOURS].alpha = 0.75; materials[i%N_COLOURS].shininess = 0.1; } if(1) { double knotsU[] = {1,1,1,1,2,2,2,2}; double knotsV[] = {1,1,1,1,2,2,2,2}; const size_t NUMBER_OF_PATCHES = 32; double controlPoints[NUMBER_OF_PATCHES][16][3] = { { // Patch 0 {1.4,0,2.4},{1.4,-0.784,2.4},{0.784,-1.4,2.4},{0,-1.4,2.4}, {1.3375,0,2.53125},{1.3375,-0.749,2.53125},{0.749,-1.3375,2.53125},{0,-1.3375,2.53125}, {1.4375,0,2.53125},{1.4375,-0.805,2.53125},{0.805,-1.4375,2.53125},{0,-1.4375,2.53125}, {1.5,0,2.4},{1.5,-0.84,2.4},{0.84,-1.5,2.4},{0,-1.5,2.4}, }, { // Patch 1 {0,-1.4,2.4},{-0.784,-1.4,2.4},{-1.4,-0.784,2.4},{-1.4,0,2.4}, {0,-1.3375,2.53125},{-0.749,-1.3375,2.53125},{-1.3375,-0.749,2.53125},{-1.3375,0,2.53125}, {0,-1.4375,2.53125},{-0.805,-1.4375,2.53125},{-1.4375,-0.805,2.53125},{-1.4375,0,2.53125}, {0,-1.5,2.4},{-0.84,-1.5,2.4},{-1.5,-0.84,2.4},{-1.5,0,2.4}, }, { // Patch 2 {-1.4,0,2.4},{-1.4,0.784,2.4},{-0.784,1.4,2.4},{0,1.4,2.4}, {-1.3375,0,2.53125},{-1.3375,0.749,2.53125},{-0.749,1.3375,2.53125},{0,1.3375,2.53125}, {-1.4375,0,2.53125},{-1.4375,0.805,2.53125},{-0.805,1.4375,2.53125},{0,1.4375,2.53125}, {-1.5,0,2.4},{-1.5,0.84,2.4},{-0.84,1.5,2.4},{0,1.5,2.4}, }, { // Patch 3 {0,1.4,2.4},{0.784,1.4,2.4},{1.4,0.784,2.4},{1.4,0,2.4}, {0,1.3375,2.53125},{0.749,1.3375,2.53125},{1.3375,0.749,2.53125},{1.3375,0,2.53125}, {0,1.4375,2.53125},{0.805,1.4375,2.53125},{1.4375,0.805,2.53125},{1.4375,0,2.53125}, {0,1.5,2.4},{0.84,1.5,2.4},{1.5,0.84,2.4},{1.5,0,2.4}, }, { // Patch 4 {1.5,0,2.4},{1.5,-0.84,2.4},{0.84,-1.5,2.4},{0,-1.5,2.4}, {1.75,0,1.875},{1.75,-0.98,1.875},{0.98,-1.75,1.875},{0,-1.75,1.875}, {2,0,1.35},{2,-1.12,1.35},{1.12,-2,1.35},{0,-2,1.35}, {2,0,0.9},{2,-1.12,0.9},{1.12,-2,0.9},{0,-2,0.9}, }, { // Patch 5 {0,-1.5,2.4},{-0.84,-1.5,2.4},{-1.5,-0.84,2.4},{-1.5,0,2.4}, {0,-1.75,1.875},{-0.98,-1.75,1.875},{-1.75,-0.98,1.875},{-1.75,0,1.875}, {0,-2,1.35},{-1.12,-2,1.35},{-2,-1.12,1.35},{-2,0,1.35}, {0,-2,0.9},{-1.12,-2,0.9},{-2,-1.12,0.9},{-2,0,0.9}, }, { // Patch 6 {-1.5,0,2.4},{-1.5,0.84,2.4},{-0.84,1.5,2.4},{0,1.5,2.4}, {-1.75,0,1.875},{-1.75,0.98,1.875},{-0.98,1.75,1.875},{0,1.75,1.875}, {-2,0,1.35},{-2,1.12,1.35},{-1.12,2,1.35},{0,2,1.35}, {-2,0,0.9},{-2,1.12,0.9},{-1.12,2,0.9},{0,2,0.9}, }, { // Patch 7 {0,1.5,2.4},{0.84,1.5,2.4},{1.5,0.84,2.4},{1.5,0,2.4}, {0,1.75,1.875},{0.98,1.75,1.875},{1.75,0.98,1.875},{1.75,0,1.875}, {0,2,1.35},{1.12,2,1.35},{2,1.12,1.35},{2,0,1.35}, {0,2,0.9},{1.12,2,0.9},{2,1.12,0.9},{2,0,0.9}, }, { // Patch 8 {2,0,0.9},{2,-1.12,0.9},{1.12,-2,0.9},{0,-2,0.9}, {2,0,0.45},{2,-1.12,0.45},{1.12,-2,0.45},{0,-2,0.45}, {1.5,0,0.225},{1.5,-0.84,0.225},{0.84,-1.5,0.225},{0,-1.5,0.225}, {1.5,0,0.15},{1.5,-0.84,0.15},{0.84,-1.5,0.15},{0,-1.5,0.15}, }, { // Patch 9 {0,-2,0.9},{-1.12,-2,0.9},{-2,-1.12,0.9},{-2,0,0.9}, {0,-2,0.45},{-1.12,-2,0.45},{-2,-1.12,0.45},{-2,0,0.45}, {0,-1.5,0.225},{-0.84,-1.5,0.225},{-1.5,-0.84,0.225},{-1.5,0,0.225}, {0,-1.5,0.15},{-0.84,-1.5,0.15},{-1.5,-0.84,0.15},{-1.5,0,0.15}, }, { // Patch 10 {-2,0,0.9},{-2,1.12,0.9},{-1.12,2,0.9},{0,2,0.9}, {-2,0,0.45},{-2,1.12,0.45},{-1.12,2,0.45},{0,2,0.45}, {-1.5,0,0.225},{-1.5,0.84,0.225},{-0.84,1.5,0.225},{0,1.5,0.225}, {-1.5,0,0.15},{-1.5,0.84,0.15},{-0.84,1.5,0.15},{0,1.5,0.15}, }, { // Patch 11 {0,2,0.9},{1.12,2,0.9},{2,1.12,0.9},{2,0,0.9}, {0,2,0.45},{1.12,2,0.45},{2,1.12,0.45},{2,0,0.45}, {0,1.5,0.225},{0.84,1.5,0.225},{1.5,0.84,0.225},{1.5,0,0.225}, {0,1.5,0.15},{0.84,1.5,0.15},{1.5,0.84,0.15},{1.5,0,0.15}, }, { // Patch 12 {-1.6,0,2.025},{-1.6,-0.3,2.025},{-1.5,-0.3,2.25},{-1.5,0,2.25}, {-2.3,0,2.025},{-2.3,-0.3,2.025},{-2.5,-0.3,2.25},{-2.5,0,2.25}, {-2.7,0,2.025},{-2.7,-0.3,2.025},{-3,-0.3,2.25},{-3,0,2.25}, {-2.7,0,1.8},{-2.7,-0.3,1.8},{-3,-0.3,1.8},{-3,0,1.8}, }, { // Patch 13 {-1.5,0,2.25},{-1.5,0.3,2.25},{-1.6,0.3,2.025},{-1.6,0,2.025}, {-2.5,0,2.25},{-2.5,0.3,2.25},{-2.3,0.3,2.025},{-2.3,0,2.025}, {-3,0,2.25},{-3,0.3,2.25},{-2.7,0.3,2.025},{-2.7,0,2.025}, {-3,0,1.8},{-3,0.3,1.8},{-2.7,0.3,1.8},{-2.7,0,1.8}, }, { // Patch 14 {-2.7,0,1.8},{-2.7,-0.3,1.8},{-3,-0.3,1.8},{-3,0,1.8}, {-2.7,0,1.575},{-2.7,-0.3,1.575},{-3,-0.3,1.35},{-3,0,1.35}, {-2.5,0,1.125},{-2.5,-0.3,1.125},{-2.65,-0.3,0.9375},{-2.65,0,0.9375}, {-2,0,0.9},{-2,-0.3,0.9},{-1.9,-0.3,0.6},{-1.9,0,0.6}, }, { // Patch 15 {-3,0,1.8},{-3,0.3,1.8},{-2.7,0.3,1.8},{-2.7,0,1.8}, {-3,0,1.35},{-3,0.3,1.35},{-2.7,0.3,1.575},{-2.7,0,1.575}, {-2.65,0,0.9375},{-2.65,0.3,0.9375},{-2.5,0.3,1.125},{-2.5,0,1.125}, {-1.9,0,0.6},{-1.9,0.3,0.6},{-2,0.3,0.9},{-2,0,0.9}, }, { // Patch 16 {1.7,0,1.425},{1.7,-0.66,1.425},{1.7,-0.66,0.6},{1.7,0,0.6}, {2.6,0,1.425},{2.6,-0.66,1.425},{3.1,-0.66,0.825},{3.1,0,0.825}, {2.3,0,2.1},{2.3,-0.25,2.1},{2.4,-0.25,2.025},{2.4,0,2.025}, {2.7,0,2.4},{2.7,-0.25,2.4},{3.3,-0.25,2.4},{3.3,0,2.4}, }, { // Patch 17 {1.7,0,0.6},{1.7,0.66,0.6},{1.7,0.66,1.425},{1.7,0,1.425}, {3.1,0,0.825},{3.1,0.66,0.825},{2.6,0.66,1.425},{2.6,0,1.425}, {2.4,0,2.025},{2.4,0.25,2.025},{2.3,0.25,2.1},{2.3,0,2.1}, {3.3,0,2.4},{3.3,0.25,2.4},{2.7,0.25,2.4},{2.7,0,2.4}, }, { // Patch 18 {2.7,0,2.4},{2.7,-0.25,2.4},{3.3,-0.25,2.4},{3.3,0,2.4}, {2.8,0,2.475},{2.8,-0.25,2.475},{3.525,-0.25,2.49375},{3.525,0,2.49375}, {2.9,0,2.475},{2.9,-0.15,2.475},{3.45,-0.15,2.5125},{3.45,0,2.5125}, {2.8,0,2.4},{2.8,-0.15,2.4},{3.2,-0.15,2.4},{3.2,0,2.4}, }, { // Patch 19 {3.3,0,2.4},{3.3,0.25,2.4},{2.7,0.25,2.4},{2.7,0,2.4}, {3.525,0,2.49375},{3.525,0.25,2.49375},{2.8,0.25,2.475},{2.8,0,2.475}, {3.45,0,2.5125},{3.45,0.15,2.5125},{2.9,0.15,2.475},{2.9,0,2.475}, {3.2,0,2.4},{3.2,0.15,2.4},{2.8,0.15,2.4},{2.8,0,2.4}, }, { // Patch 20 {0,0,3.15},{0,0,3.15},{0,0,3.15},{0,0,3.15}, {0.8,0,3.15},{0.8,-0.45,3.15},{0.45,-0.8,3.15},{0,-0.8,3.15}, {0,0,2.85},{0,0,2.85},{0,0,2.85},{0,0,2.85}, {0.2,0,2.7},{0.2,-0.112,2.7},{0.112,-0.2,2.7},{0,-0.2,2.7}, }, { // Patch 21 {0,0,3.15},{0,0,3.15},{0,0,3.15},{0,0,3.15}, {0,-0.8,3.15},{-0.45,-0.8,3.15},{-0.8,-0.45,3.15},{-0.8,0,3.15}, {0,0,2.85},{0,0,2.85},{0,0,2.85},{0,0,2.85}, {0,-0.2,2.7},{-0.112,-0.2,2.7},{-0.2,-0.112,2.7},{-0.2,0,2.7}, }, { // Patch 22 {0,0,3.15},{0,0,3.15},{0,0,3.15},{0,0,3.15}, {-0.8,0,3.15},{-0.8,0.45,3.15},{-0.45,0.8,3.15},{0,0.8,3.15}, {0,0,2.85},{0,0,2.85},{0,0,2.85},{0,0,2.85}, {-0.2,0,2.7},{-0.2,0.112,2.7},{-0.112,0.2,2.7},{0,0.2,2.7}, }, { // Patch 23 {0,0,3.15},{0,0,3.15},{0,0,3.15},{0,0,3.15}, {0,0.8,3.15},{0.45,0.8,3.15},{0.8,0.45,3.15},{0.8,0,3.15}, {0,0,2.85},{0,0,2.85},{0,0,2.85},{0,0,2.85}, {0,0.2,2.7},{0.112,0.2,2.7},{0.2,0.112,2.7},{0.2,0,2.7}, }, { // Patch 24 {0.2,0,2.7},{0.2,-0.112,2.7},{0.112,-0.2,2.7},{0,-0.2,2.7}, {0.4,0,2.55},{0.4,-0.224,2.55},{0.224,-0.4,2.55},{0,-0.4,2.55}, {1.3,0,2.55},{1.3,-0.728,2.55},{0.728,-1.3,2.55},{0,-1.3,2.55}, {1.3,0,2.4},{1.3,-0.728,2.4},{0.728,-1.3,2.4},{0,-1.3,2.4}, }, { // Patch 25 {0,-0.2,2.7},{-0.112,-0.2,2.7},{-0.2,-0.112,2.7},{-0.2,0,2.7}, {0,-0.4,2.55},{-0.224,-0.4,2.55},{-0.4,-0.224,2.55},{-0.4,0,2.55}, {0,-1.3,2.55},{-0.728,-1.3,2.55},{-1.3,-0.728,2.55},{-1.3,0,2.55}, {0,-1.3,2.4},{-0.728,-1.3,2.4},{-1.3,-0.728,2.4},{-1.3,0,2.4}, }, { // Patch 26 {-0.2,0,2.7},{-0.2,0.112,2.7},{-0.112,0.2,2.7},{0,0.2,2.7}, {-0.4,0,2.55},{-0.4,0.224,2.55},{-0.224,0.4,2.55},{0,0.4,2.55}, {-1.3,0,2.55},{-1.3,0.728,2.55},{-0.728,1.3,2.55},{0,1.3,2.55}, {-1.3,0,2.4},{-1.3,0.728,2.4},{-0.728,1.3,2.4},{0,1.3,2.4}, }, { // Patch 27 {0,0.2,2.7},{0.112,0.2,2.7},{0.2,0.112,2.7},{0.2,0,2.7}, {0,0.4,2.55},{0.224,0.4,2.55},{0.4,0.224,2.55},{0.4,0,2.55}, {0,1.3,2.55},{0.728,1.3,2.55},{1.3,0.728,2.55},{1.3,0,2.55}, {0,1.3,2.4},{0.728,1.3,2.4},{1.3,0.728,2.4},{1.3,0,2.4}, }, { // Patch 28 {0,0,0},{0,0,0},{0,0,0},{0,0,0}, {1.425,0,0},{1.425,0.798,0},{0.798,1.425,0},{0,1.425,0}, {1.5,0,0.075},{1.5,0.84,0.075},{0.84,1.5,0.075},{0,1.5,0.075}, {1.5,0,0.15},{1.5,0.84,0.15},{0.84,1.5,0.15},{0,1.5,0.15}, }, { // Patch 29 {0,0,0},{0,0,0},{0,0,0},{0,0,0}, {0,1.425,0},{-0.798,1.425,0},{-1.425,0.798,0},{-1.425,0,0}, {0,1.5,0.075},{-0.84,1.5,0.075},{-1.5,0.84,0.075},{-1.5,0,0.075}, {0,1.5,0.15},{-0.84,1.5,0.15},{-1.5,0.84,0.15},{-1.5,0,0.15}, }, { // Patch 30 {0,0,0},{0,0,0},{0,0,0},{0,0,0}, {-1.425,0,0},{-1.425,-0.798,0},{-0.798,-1.425,0},{0,-1.425,0}, {-1.5,0,0.075},{-1.5,-0.84,0.075},{-0.84,-1.5,0.075},{0,-1.5,0.075}, {-1.5,0,0.15},{-1.5,-0.84,0.15},{-0.84,-1.5,0.15},{0,-1.5,0.15}, }, { // Patch 31 {0,0,0},{0,0,0},{0,0,0},{0,0,0}, {0,-1.425,0},{0.798,-1.425,0},{1.425,-0.798,0},{1.425,0,0}, {0,-1.5,0.075},{0.84,-1.5,0.075},{1.5,-0.84,0.075},{1.5,0,0.075}, {0,-1.5,0.15},{0.84,-1.5,0.15},{1.5,-0.84,0.15},{1.5,0,0.15}, }, }; file.begingroup("Teapot"); for(size_t i = 0; i < NUMBER_OF_PATCHES; ++i) { if(1) file.addPatch(controlPoints[i],materials[i%N_COLOURS]); if(0) file.addSurface(3,3,4,4,controlPoints[i],knotsU,knotsV,materials[i%N_COLOURS],NULL); // use (too) general API for the same result as above } file.endgroup(); double t[4][4]; t[0][0]=1; t[0][1]=0; t[0][2]=0; t[0][3]=6; t[1][0]=0; t[1][1]=1; t[1][2]=0; t[1][3]=0; t[2][0]=0; t[2][1]=0; t[2][2]=1; t[2][3]=0; t[3][0]=0; t[3][1]=0; t[3][2]=0; t[3][3]=1; PRCoptions teapotopt; teapotopt.no_break = true; teapotopt.do_break = false; teapotopt.compression = 0.0001; // force joining together of patches, damaging transparency file.begingroup("Teapot rendered in the way of opaque surfaces and transferred",&teapotopt,t); for(size_t i = 0; i < NUMBER_OF_PATCHES; ++i) { file.addPatch(controlPoints[i],materials[i%N_COLOURS]); } file.endgroup(); } const size_t NUMBER_OF_POINTS = 31; double points[NUMBER_OF_POINTS][3]; for(size_t i = 0; i < NUMBER_OF_POINTS; ++i) { points[i][0] = 3.5*cos(3.0*i/NUMBER_OF_POINTS*2.0*pi); points[i][1] = 3.5*sin(3.0*i/NUMBER_OF_POINTS*2.0*pi); points[i][2] = 5.0*i/NUMBER_OF_POINTS-1.0; } const size_t NUMBER_OF_WIRES = 2; double shifted_points[NUMBER_OF_WIRES][NUMBER_OF_POINTS][3]; for(size_t wire = 0; wire < NUMBER_OF_WIRES; ++wire) for(size_t point = 0; point < NUMBER_OF_POINTS; ++point) { shifted_points[wire][point][0] = points[point][0]; shifted_points[wire][point][1] = points[point][1]; shifted_points[wire][point][2] = points[point][2]+0.1*wire+0.1; } double knots[3+NUMBER_OF_POINTS+1]; knots[0] = 1; for(size_t i = 1; i < 3+NUMBER_OF_POINTS; ++i) { knots[i] = (i+2)/3; // integer division is intentional } knots[3+NUMBER_OF_POINTS] = (3+NUMBER_OF_POINTS+1)/3; PRCoptions grpopt; grpopt.no_break = true; grpopt.do_break = false; grpopt.tess = true; if(1){ double point1[3] = {11,0,0}; double point2[3] = {12,0,0}; double points[2][3] = {{9,0,0},{10,0,0}}; file.begingroup("points",&grpopt); file.addPoint(point1, RGBAColour(1.0,0.0,0.0)); file.addPoint(point2, RGBAColour(1.0,0.0,0.0)); file.addPoints(2, points, RGBAColour(1.0,0.0,0.0,0.5),10); file.endgroup(); } if(1){ PRCoptions grpopt; grpopt.no_break = true; grpopt.do_break = false; grpopt.tess = true; grpopt.closed = true; double t[4][4]; const size_t nP = 5; double P[nP][3] = {{0,0,0},{1,0,0},{1,1,0},{0,1,0},{0,2,0}}; const size_t nI = 3; uint32_t PI[nI][3] = {{0,1,3},{1,2,3},{3,2,4}}; const size_t nM = 2; PRCmaterial M[nM]; M[0] = PRCmaterial( RGBAColour(0.0,0.0,0.18), RGBAColour(0.0,0.0,0.878431), RGBAColour(0.0,0.0,0.32), RGBAColour(0.0,0.0,0.072), 1.0,0.1); M[1] = PRCmaterial( RGBAColour(0.18,0.0,0.0), RGBAColour(0.878431,0.0,0.0), RGBAColour(0.32,0.0,0.0), RGBAColour(0.072,0.0,0.0), 0.5,0.1); uint32_t MI[nI] = {0,1,0}; const size_t nN = 2; double N[nN][3] = {{0,0,1},{0,0,-1}}; uint32_t NI[nI][3] = {{0,0,0},{0,0,0},{1,1,1}}; const uint32_t nC = 3; RGBAColour C[nC]; uint32_t CI[nI][3] = {{0,0,0},{1,1,1},{1,1,2}}; PRCmaterial materialGreen( RGBAColour(0.0,0.18,0.0), RGBAColour(0.0,0.878431,0.0), RGBAColour(0.0,0.32,0.0), RGBAColour(0.0,0.072,0.0), 1.0,0.1); if(1){ t[0][0]=1; t[0][1]=0; t[0][2]=0; t[0][3]=0; t[1][0]=0; t[1][1]=1; t[1][2]=0; t[1][3]=0; t[2][0]=0; t[2][1]=0; t[2][2]=1; t[2][3]=-1; t[3][0]=0; t[3][1]=0; t[3][2]=0; t[3][3]=1; file.begingroup("triangles_onecolor_with_normals",&grpopt,t); file.addTriangles(nP, P, nI, PI, materialGreen, nN, N, NI, 0, NULL, NULL, 0, NULL, NULL, 0, NULL, NULL); file.endgroup(); } if(1){ file.begingroup("triangles_onecolor",&grpopt); file.addTriangles(nP, P, nI, PI, materialGreen, 0, NULL, NULL, 0, NULL, NULL, 0, NULL, NULL, 0, NULL, NULL); file.endgroup(); } if(1){ t[0][0]=1; t[0][1]=0; t[0][2]=0; t[0][3]=0; t[1][0]=0; t[1][1]=1; t[1][2]=0; t[1][3]=0; t[2][0]=0; t[2][1]=0; t[2][2]=1; t[2][3]=1; t[3][0]=0; t[3][1]=0; t[3][2]=0; t[3][3]=1; file.begingroup("triangles_manymaterials",&grpopt,t); file.addTriangles(nP, P, nI, PI, materialGreen, 0, NULL, NULL, 0, NULL, NULL, 0, NULL, NULL, nM, M, MI); file.endgroup(); } if(1){ t[0][0]=1; t[0][1]=0; t[0][2]=0; t[0][3]=0; t[1][0]=0; t[1][1]=1; t[1][2]=0; t[1][3]=0; t[2][0]=0; t[2][1]=0; t[2][2]=1; t[2][3]=2; t[3][0]=0; t[3][1]=0; t[3][2]=0; t[3][3]=1; PRCmaterial materialBase( RGBAColour(0.1,0.1,0.1,1), RGBAColour(1,1,1,1), RGBAColour(0.1,0.1,0.1,1), RGBAColour(0.1,0.1,0.1,1), 1.0,0.1); C[0] = RGBAColour(1,0,0,0.1); C[1] = RGBAColour(0,1,0,0.5); C[2] = RGBAColour(0,0,1,0.9); file.begingroup("triangles_rgba_vertexcolors_on_opaque_a_component_of_vertexcolor_ignored",&grpopt,t); file.addTriangles(nP, P, nI, PI, materialBase, 0, NULL, NULL, 0, NULL, NULL, nC, C, CI, 0, NULL, NULL); file.endgroup(); t[0][0]=1; t[0][1]=0; t[0][2]=0; t[0][3]=0; t[1][0]=0; t[1][1]=1; t[1][2]=0; t[1][3]=0; t[2][0]=0; t[2][1]=0; t[2][2]=1; t[2][3]=3; t[3][0]=0; t[3][1]=0; t[3][2]=0; t[3][3]=1; PRCmaterial materialTransparent( RGBAColour(0.1,0.1,0.1,0.3), RGBAColour(1,1,1,0.3), RGBAColour(0.1,0.1,0.1,0.3), RGBAColour(0.1,0.1,0.1,0.3), 0.3,0.1); C[0] = RGBAColour(1,0,0,0.1); C[1] = RGBAColour(0,1,0,0.5); C[2] = RGBAColour(0,0,1,0.9); file.begingroup("triangles_rgba_vertexcolors_on_transparent_a_component_of_vertexcolor_ignored",&grpopt,t); file.addTriangles(nP, P, nI, PI, materialTransparent, 0, NULL, NULL, 0, NULL, NULL, nC, C, CI, 0, NULL, NULL); file.endgroup(); t[0][0]=1; t[0][1]=0; t[0][2]=0; t[0][3]=0; t[1][0]=0; t[1][1]=1; t[1][2]=0; t[1][3]=0; t[2][0]=0; t[2][1]=0; t[2][2]=1; t[2][3]=4; t[3][0]=0; t[3][1]=0; t[3][2]=0; t[3][3]=1; C[0] = RGBAColour(1,0,0,0.5); C[1] = RGBAColour(0,1,0,0.5); C[2] = RGBAColour(0,0,1,0.5); file.begingroup("triangles_rgb_vertexcolors_on_transparent_may_not_work_in_OpenGL",&grpopt,t); file.addTriangles(nP, P, nI, PI, materialTransparent, 0, NULL, NULL, 0, NULL, NULL, nC, C, CI, 0, NULL, NULL); file.endgroup(); } if(1){ t[0][0]=1; t[0][1]=0; t[0][2]=0; t[0][3]=0; t[1][0]=0; t[1][1]=1; t[1][2]=0; t[1][3]=0; t[2][0]=0; t[2][1]=0; t[2][2]=1; t[2][3]=5; t[3][0]=0; t[3][1]=0; t[3][2]=0; t[3][3]=1; const uint32_t picture_width=2; const uint32_t picture_height=2; const uint8_t picRGB[picture_width*picture_height*3] = {255,0,0, 0,255,0, 0,0,255, 0,0,0 }; // {255,255,0, 255,0,0, 255,0,0, 255,0,0 }; // { 255,0,0, 255,255,0, 255,255,0, 255,255,255 }; // {255,0,0, 0,255,0, 0,0,255, 0,0,0 }; const uint8_t picRGBA[picture_width*picture_height*4] = {255,0,0,255, 0,255,0,150, 0,0,255,150, 0,0,0,100 }; // (1,0) 2 3 (1,1) // (0,0) 0 1 (1,0) uint8_t *pictureRGB = new uint8_t[picture_width*picture_height*3]; for(size_t i=0; i and * Michail Vidiassov * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include "writePRC.h" #include #include // debug print includes #include #include #include #include #if !defined(__GNUC__) || defined(__clang__) #include #endif using namespace std; #ifndef __GNUC_PREREQ #define __GNUC_PREREQ(maj, min) (0) #endif // Count leading zeros. uint32_t CLZ(uint32_t a) { #if __GNUC_PREREQ(3,4) return __builtin_clz(a); #else // find the log base 2 of a 32-bit integer static const int MultiplyDeBruijnBitPosition[32] = { 0, 9, 1, 10, 13, 21, 2, 29, 11, 14, 16, 18, 22, 25, 3, 30, 8, 12, 20, 28, 15, 17, 24, 7, 19, 27, 23, 6, 26, 5, 4, 31 }; a |= a >> 1; // first round down to one less than a power of 2 a |= a >> 2; a |= a >> 4; a |= a >> 8; a |= a >> 16; return 31-MultiplyDeBruijnBitPosition[(uint32_t)(a * 0x07C4ACDDU) >> 27]; #endif } // Portable integer implementation of ceil(log2(x)). uint32_t Log2(uint32_t x) { assert(x != 0); uint32_t L=31-CLZ(x); return ((uint32_t) 1 << L == x) ? L : L+1; } #define WriteUnsignedInteger( value ) pbs << (uint32_t)(value); #define WriteInteger( value ) pbs << (int32_t)(value); #define WriteCharacter( value ) pbs << (uint8_t)(value); #define WriteDouble( value ) pbs << (double)(value); #define WriteBit( value ) pbs << (bool)(value); #define WriteBoolean( value ) pbs << (bool)(value); #define WriteString( value ) pbs << (value); #define SerializeContentPRCBase serializeContentPRCBase(pbs); #define SerializeGraphics serializeGraphics(pbs); #define SerializePRCBaseWithGraphics { serializeContentPRCBase(pbs); serializeGraphics(pbs); } #define SerializeRepresentationItemContent serializeRepresentationItemContent(pbs); #define SerializeRepresentationItem( value ) (value)->serializeRepresentationItem(pbs); #define SerializeMarkup( value ) (value).serializeMarkup(pbs); #define SerializeReferenceUniqueIdentifier( value ) (value).serializeReferenceUniqueIdentifier(pbs); #define SerializeContentBaseTessData serializeContentBaseTessData(pbs); #define SerializeTessFace( value ) (value)->serializeTessFace(pbs); #define SerializeUserData UserData(0,0).write(pbs); #define SerializeLineAttr( value ) pbs << (uint32_t)((value)+1); #define SerializeVector3d( value ) (value).serializeVector3d(pbs); #define SerializeVector2d( value ) (value).serializeVector2d(pbs); #define SerializeName( value ) writeName(pbs, (value)); #define SerializeInterval( value ) (value).serializeInterval(pbs); // #define SerializeBoundingBox( value ) (value).serializeBoundingBox(pbs); #define SerializeDomain( value ) (value).serializeDomain(pbs); #define SerializeParameterization serializeParameterization(pbs); #define SerializeUVParameterization serializeUVParameterization(pbs); #define SerializeTransformation serializeTransformation(pbs); #define SerializeBaseTopology serializeBaseTopology(pbs); #define SerializeBaseGeometry serializeBaseGeometry(pbs); #define SerializePtrCurve( value ) {WriteBoolean( false ); if((value)==NULL) pbs << (uint32_t)PRC_TYPE_ROOT; else (value)->serializeCurve(pbs);} #define SerializePtrSurface( value ) {WriteBoolean( false ); if((value)==NULL) pbs << (uint32_t)PRC_TYPE_ROOT; else (value)->serializeSurface(pbs);} #define SerializePtrTopology( value ) {WriteBoolean( false ); if((value)==NULL) pbs << (uint32_t)PRC_TYPE_ROOT; else (value)->serializeTopoItem(pbs);} #define SerializeContentCurve serializeContentCurve(pbs); #define SerializeContentWireEdge serializeContentWireEdge(pbs); #define SerializeContentBody serializeContentBody(pbs); #define SerializeTopoContext serializeTopoContext(pbs); #define SerializeContextAndBodies( value ) (value).serializeContextAndBodies(pbs); #define SerializeBody( value ) (value)->serializeBody(pbs); #define ResetCurrentGraphics resetGraphics(); #define SerializeContentSurface serializeContentSurface(pbs); #define SerializeCompressedUniqueId( value ) (value).serializeCompressedUniqueId(pbs); #define SerializeUnit( value ) (value).serializeUnit(pbs); #define SerializeBoundingBox serializeBoundingBox(pbs); #define SerializeAttributeEntry serializeAttributeEntry(pbs); #define SerializeContentSingleAttribute( value ) (value).serializeSingleAttribute(pbs); #define SerializeAttribute( value ) (value).serializeAttribute(pbs); #define SerializeAttributeData serializeAttributes(pbs); #define WriteUncompressedUnsignedInteger( value ) writeUncompressedUnsignedInteger(out, (uint32_t)(value)); #define SerializeFileStructureUncompressedUniqueId( value ) (value).serializeFileStructureUncompressedUniqueId(out); void writeUncompressedUnsignedInteger(ostream &out, uint32_t data) { #ifdef WORDS_BIGENDIAN out.write(((char*)&data)+3,1); out.write(((char*)&data)+2,1); out.write(((char*)&data)+1,1); out.write(((char*)&data)+0,1); #else out.write(((char*)&data)+0,1); out.write(((char*)&data)+1,1); out.write(((char*)&data)+2,1); out.write(((char*)&data)+3,1); #endif } double PRCVector3d::Length() { return sqrt(x*x+y*y+z*z); } bool PRCVector3d::Normalize() { double fLength=Length(); if(fLength < FLT_EPSILON) return false; double factor=1.0/fLength; x *= factor; y *= factor; z *= factor; return true; } double PRCVector2d::Length() { return sqrt(x*x+y*y); } bool PRCVector2d::Normalize() { double fLength=Length(); if(fLength < FLT_EPSILON) return false; double factor=1.0/fLength; x *= factor; y *= factor; return true; } void PRCVector2d::serializeVector2d(PRCbitStream &pbs) { WriteDouble (x) WriteDouble (y) } uint32_t makeCADID() { static uint32_t ID = 1; return ID++; } uint32_t makePRCID() { static uint32_t ID = 1; return ID++; } bool type_eligible_for_reference(uint32_t type) { if( type == PRC_TYPE_MISC_EntityReference || type == PRC_TYPE_MISC_MarkupLinkedItem || type == PRC_TYPE_RI_BrepModel || type == PRC_TYPE_RI_Curve || type == PRC_TYPE_RI_Direction || type == PRC_TYPE_RI_Plane || type == PRC_TYPE_RI_PointSet || type == PRC_TYPE_RI_PolyBrepModel || type == PRC_TYPE_RI_PolyWire || type == PRC_TYPE_RI_Set || type == PRC_TYPE_RI_CoordinateSystem || type == PRC_TYPE_ASM_ProductOccurence || type == PRC_TYPE_ASM_PartDefinition || type == PRC_TYPE_ASM_Filter || type == PRC_TYPE_MKP_View || type == PRC_TYPE_MKP_Markup || type == PRC_TYPE_MKP_Leader || type == PRC_TYPE_MKP_AnnotationItem || type == PRC_TYPE_MKP_AnnotationSet || type == PRC_TYPE_MKP_AnnotationReference || type == PRC_TYPE_GRAPH_Style || type == PRC_TYPE_GRAPH_Material || type == PRC_TYPE_GRAPH_TextureApplication || type == PRC_TYPE_GRAPH_TextureDefinition || type == PRC_TYPE_GRAPH_LinePattern || type == PRC_TYPE_GRAPH_DottingPattern || type == PRC_TYPE_GRAPH_HatchingPattern || type == PRC_TYPE_GRAPH_SolidPattern || type == PRC_TYPE_GRAPH_VPicturePattern || type == PRC_TYPE_GRAPH_AmbientLight || type == PRC_TYPE_GRAPH_PointLight || type == PRC_TYPE_GRAPH_DirectionalLight || type == PRC_TYPE_GRAPH_SpotLight || type == PRC_TYPE_GRAPH_SceneDisplayParameters || type == PRC_TYPE_GRAPH_Camera ) return true; else return false; } void UserData::write(PRCbitStream &pbs) { pbs << size; if(size > 0) { uint32_t quot=size/8; uint32_t rem=size-8*quot; for(uint32_t i = 0; i < quot; ++i) pbs << data[i]; for(uint32_t j = 0; j < rem; ++j) // 0-based, big endian bit counting pbs << (bool)((data[quot] & (0x80 >> j))!=0); } } void PRCAttributeEntry::serializeAttributeEntry(PRCbitStream &pbs) const { WriteBoolean (title_is_integer) if (title_is_integer) WriteUnsignedInteger (title_integer) else WriteString (title_text) } void PRCSingleAttribute::serializeSingleAttribute(PRCbitStream &pbs) const { SerializeAttributeEntry WriteUnsignedInteger (type) switch (type) { case KEPRCModellerAttributeTypeInt: WriteInteger (value.integer) break; case KEPRCModellerAttributeTypeReal: WriteDouble (value.real) break; case KEPRCModellerAttributeTypeTime: WriteUnsignedInteger (value.time) break; case KEPRCModellerAttributeTypeString: WriteString (value_text) break; default: break; } } void PRCAttribute::serializeAttribute(PRCbitStream &pbs) const { WriteUnsignedInteger (PRC_TYPE_MISC_Attribute) SerializeAttributeEntry const uint32_t size_of_attribute_keys = attribute_keys.size(); WriteUnsignedInteger (size_of_attribute_keys) for(uint32_t i=0;i 1) WriteInteger (texture_wrapping_mode_T) // Texture wrapping mode if (texture_dimension > 2 ) WriteInteger (texture_wrapping_mode_R) // Texture wrapping mode WriteBit (texture_transformation) // if (texture_transformation) // SerializeTextureTransformation (texture_transformation) } void PRCMaterialGeneric::serializeMaterialGeneric(PRCbitStream &pbs) { WriteUnsignedInteger (PRC_TYPE_GRAPH_Material) SerializeContentPRCBase WriteUnsignedInteger (ambient + 1) WriteUnsignedInteger (diffuse + 1) WriteUnsignedInteger (emissive + 1) WriteUnsignedInteger (specular + 1) WriteDouble (shininess) WriteDouble (ambient_alpha) WriteDouble (diffuse_alpha) WriteDouble (emissive_alpha) WriteDouble (specular_alpha) } void PRCTextureApplication::serializeTextureApplication(PRCbitStream &pbs) { WriteUnsignedInteger (PRC_TYPE_GRAPH_TextureApplication) SerializeContentPRCBase WriteUnsignedInteger (material_generic_index+1) WriteUnsignedInteger (texture_definition_index+1) WriteUnsignedInteger (next_texture_index+1) WriteUnsignedInteger (UV_coordinates_index+1) } void PRCLinePattern::serializeLinePattern(PRCbitStream &pbs) { uint32_t i = 0; WriteUnsignedInteger (PRC_TYPE_GRAPH_LinePattern) SerializeContentPRCBase const uint32_t size_lengths = lengths.size(); WriteUnsignedInteger (size_lengths) for (i=0;i>8)&0xFF); current_layer_index = l; current_index_of_line_style = i; current_behaviour_bit_field = b; } else pbs << true; } void writeGraphics(PRCbitStream &pbs,const PRCGraphics &graphics,bool force) { if(force || current_layer_index != graphics.layer_index || current_index_of_line_style != graphics.index_of_line_style || current_behaviour_bit_field != graphics.behaviour_bit_field) { pbs << false << (uint32_t)(graphics.layer_index+1) << (uint32_t)(graphics.index_of_line_style+1) << (uint8_t)(graphics.behaviour_bit_field&0xFF) << (uint8_t)((graphics.behaviour_bit_field>>8)&0xFF); current_layer_index = graphics.layer_index; current_index_of_line_style = graphics.index_of_line_style; current_behaviour_bit_field = graphics.behaviour_bit_field; } else pbs << true; } void PRCGraphics::serializeGraphics(PRCbitStream &pbs) { if(current_layer_index != this->layer_index || current_index_of_line_style != this->index_of_line_style || current_behaviour_bit_field != this->behaviour_bit_field) { pbs << false << (uint32_t)(this->layer_index+1) << (uint32_t)(this->index_of_line_style+1) << (uint8_t)(this->behaviour_bit_field&0xFF) << (uint8_t)((this->behaviour_bit_field>>8)&0xFF); current_layer_index = this->layer_index; current_index_of_line_style = this->index_of_line_style; current_behaviour_bit_field = this->behaviour_bit_field; } else pbs << true; } void PRCGraphics::serializeGraphicsForced(PRCbitStream &pbs) { pbs << false << (uint32_t)(this->layer_index+1) << (uint32_t)(this->index_of_line_style+1) << (uint8_t)(this->behaviour_bit_field&0xFF) << (uint8_t)((this->behaviour_bit_field>>8)&0xFF); current_layer_index = this->layer_index; current_index_of_line_style = this->index_of_line_style; current_behaviour_bit_field = this->behaviour_bit_field; } void resetGraphics() { current_layer_index = m1; current_index_of_line_style = m1; current_behaviour_bit_field = 1; } void resetGraphicsAndName() { resetGraphics(); resetName(); } void PRCMarkup::serializeMarkup(PRCbitStream &pbs) { WriteUnsignedInteger (PRC_TYPE_MKP_Markup) SerializeContentPRCBase SerializeGraphics WriteUnsignedInteger (type) WriteUnsignedInteger (sub_type) const uint32_t number_of_linked_items = 0; WriteUnsignedInteger (number_of_linked_items) // for (i=0;iserializeTransformation3d(pbs); SerializeUserData } void PRCFontKeysSameFont::serializeFontKeysSameFont(PRCbitStream &pbs) { uint32_t i=0; // universal index for PRC standart compatibility WriteString (font_name) WriteUnsignedInteger (char_set) const uint32_t number_of_font_keys = font_keys.size(); WriteUnsignedInteger (number_of_font_keys) for (i=0;i &rgba_vertices,const bool is_rgba, PRCbitStream &pbs) { uint32_t i = 0; uint32_t j = 0; // number_by_vector can be assigned a value of 3 (RGB) or 4 (RGBA). // number_of_vectors is equal to number_of_colors / number_by_vector. const uint32_t number_by_vector=is_rgba?4:3; const std::vector &vector_color = rgba_vertices; const uint32_t number_of_colors=vector_color.size(); const uint32_t number_of_vectors=number_of_colors / number_by_vector; // first one for (i=0;i= 1u<<(bit_number - 1 - i) ) { WriteBoolean (true) value -= 1u<<(bit_number - 1 - i); } else { WriteBoolean (false) } } } #define WriteUnsignedIntegerWithVariableBitNumber( value, bit_number ) writeUnsignedIntegerWithVariableBitNumber( pbs, (value), (bit_number) ); void writeIntegerWithVariableBitNumber(PRCbitStream &pbs, int32_t iValue, uint32_t uBitNumber) { WriteBoolean(iValue<0); WriteUnsignedIntegerWithVariableBitNumber(abs(iValue), uBitNumber - 1); } #define WriteIntegerWithVariableBitNumber( value, bit_number ) writeIntegerWithVariableBitNumber( pbs, (value), (bit_number) ); void writeDoubleWithVariableBitNumber(PRCbitStream &pbs, double dValue,double dTolerance, unsigned uBitNumber) { // calling functions must ensure no overflow int32_t iTempValue = (int32_t) ( dValue / dTolerance ); WriteIntegerWithVariableBitNumber(iTempValue, uBitNumber); } #define WriteDoubleWithVariableBitNumber( value, bit_number ) writeDoubleWithVariableBitNumber( pbs, (value), (bit_number) ); uint32_t GetNumberOfBitsUsedToStoreUnsignedInteger(uint32_t uValue) { uint32_t uNbBit=2; uint32_t uTemp = 2; while(uValue >= uTemp) { uTemp*=2; uNbBit++; } return uNbBit-1; } void writeNumberOfBitsThenUnsignedInteger(PRCbitStream &pbs, uint32_t unsigned_integer) { uint32_t number_of_bits = GetNumberOfBitsUsedToStoreUnsignedInteger( unsigned_integer ); WriteUnsignedIntegerWithVariableBitNumber ( number_of_bits, 5 ) WriteUnsignedIntegerWithVariableBitNumber ( unsigned_integer, number_of_bits ) } #define WriteNumberOfBitsThenUnsignedInteger( value ) writeNumberOfBitsThenUnsignedInteger( pbs, value ); uint32_t GetNumberOfBitsUsedToStoreInteger(int32_t iValue) { return GetNumberOfBitsUsedToStoreUnsignedInteger(abs(iValue))+1; } int32_t intdiv(double dValue, double dTolerance) { double ratio=fabs(dValue)/dTolerance; assert(ratio <= INT_MAX); int32_t iTempValue=(int32_t) ratio; if(ratio - iTempValue >= 0.5) iTempValue++; if(dValue < 0) return -iTempValue; else return iTempValue; } // round dValue to nearest multiple of dTolerance double roundto(double dValue, double dTolerance) { return intdiv(dValue, dTolerance) * dTolerance; } PRCVector3d roundto(PRCVector3d vec, double dTolerance) { PRCVector3d res; res.x = roundto(vec.x,dTolerance); res.y = roundto(vec.y,dTolerance); res.z = roundto(vec.z,dTolerance); return res; } uint32_t GetNumberOfBitsUsedToStoreDouble(double dValue, double dTolerance ) { return GetNumberOfBitsUsedToStoreInteger(intdiv(dValue,dTolerance)); } struct itriple { int32_t x; int32_t y; int32_t z; }; uint32_t GetNumberOfBitsUsedToStoreTripleInteger(const itriple &iTriple) { const uint32_t x_bits = GetNumberOfBitsUsedToStoreInteger(iTriple.x); const uint32_t y_bits = GetNumberOfBitsUsedToStoreInteger(iTriple.y); const uint32_t z_bits = GetNumberOfBitsUsedToStoreInteger(iTriple.z); uint32_t bits = x_bits; if(y_bits > bits) bits = y_bits; if(z_bits > bits) bits = z_bits; return bits; } itriple iroundto(PRCVector3d vec, double dTolerance) { itriple res; res.x = intdiv(vec.x, dTolerance); res.y = intdiv(vec.y, dTolerance); res.z = intdiv(vec.z, dTolerance); return res; } void PRCCompressedFace::serializeCompressedFace(PRCbitStream &pbs, double brep_data_compressed_tolerance) { serializeCompressedAnaNurbs( pbs, brep_data_compressed_tolerance ); } #define SerializeCompressedFace( value ) (value)->serializeCompressedFace( pbs, brep_data_compressed_tolerance ); void PRCCompressedFace::serializeContentCompressedFace(PRCbitStream &pbs) { WriteBoolean ( orientation_surface_with_shell ) const bool surface_is_trimmed = false; WriteBoolean ( surface_is_trimmed ) } void PRCCompressedFace::serializeCompressedAnaNurbs(PRCbitStream &pbs, double brep_data_compressed_tolerance) { // WriteCompressedEntityType ( PRC_HCG_AnaNurbs ) const bool is_a_curve = false; WriteBoolean ( is_a_curve ) WriteUnsignedIntegerWithVariableBitNumber (13 , 4) serializeContentCompressedFace( pbs ); serializeCompressedNurbs( pbs, brep_data_compressed_tolerance ); } void PRCCompressedFace::serializeCompressedNurbs(PRCbitStream &pbs, double brep_data_compressed_tolerance) { const double nurbs_tolerance = 0.2*brep_data_compressed_tolerance; const uint32_t degree_in_u = degree; const uint32_t degree_in_v = degree; WriteUnsignedIntegerWithVariableBitNumber ( degree_in_u, 5) WriteUnsignedIntegerWithVariableBitNumber ( degree_in_v, 5) const uint32_t number_of_knots_in_u = 4; // 0011 or 00001111 knot vector - just 2 spans WriteUnsignedIntegerWithVariableBitNumber (number_of_knots_in_u - 2, 16) uint32_t number_bit = degree_in_u ? Log2( degree_in_u + 2 ) : 2; WriteBoolean (false) // Multiplicity_is_already_stored - no WriteUnsignedIntegerWithVariableBitNumber( degree_in_u+1,number_bit) WriteBoolean (true) // Multiplicity_is_already_stored - yes const uint32_t number_of_knots_in_v = 4; // 0011 or 00001111 knot vector - just 2 spans WriteUnsignedIntegerWithVariableBitNumber (number_of_knots_in_v - 2, 16) number_bit = degree_in_v ? Log2( degree_in_v + 2 ) : 2; WriteBoolean (false) // Multiplicity_is_already_stored - no WriteUnsignedIntegerWithVariableBitNumber( degree_in_v+1,number_bit) WriteBoolean (true) // Multiplicity_is_already_stored - yes const bool is_closed_u = false; WriteBoolean ( is_closed_u ) const bool is_closed_v = false; WriteBoolean ( is_closed_v ) const uint32_t number_of_control_point_in_u = degree_in_u + 1; const uint32_t number_of_control_point_in_v = degree_in_v + 1; #if defined(__GNUC__) && !defined(__clang__) PRCVector3d P[number_of_control_point_in_u][number_of_control_point_in_v]; #else vector > P(number_of_control_point_in_u, vector(number_of_control_point_in_v)); #endif for(uint32_t i=0;i > compressed_control_point(number_of_control_point_in_u, vector(number_of_control_point_in_v)); vector > control_point_type(number_of_control_point_in_u, vector(number_of_control_point_in_v)); #endif uint32_t number_of_bits_for_isomin = 1; uint32_t number_of_bits_for_rest = 1; for(uint32_t j = 1; j < number_of_control_point_in_v; j++) { compressed_control_point[0][j] = iroundto(P[0][j]-P[0][j-1], nurbs_tolerance ); P[0][j] = P[0][j-1] + roundto(P[0][j]-P[0][j-1], nurbs_tolerance); uint32_t bit_size = GetNumberOfBitsUsedToStoreTripleInteger(compressed_control_point[0][j]); if (bit_size > number_of_bits_for_isomin) number_of_bits_for_isomin = bit_size; } for(uint32_t i = 1; i < number_of_control_point_in_u; i++) { compressed_control_point[i][0] = iroundto(P[i][0]-P[i-1][0], nurbs_tolerance ); P[i][0] = P[i-1][0] + roundto(P[i][0]-P[i-1][0], nurbs_tolerance); uint32_t bit_size = GetNumberOfBitsUsedToStoreTripleInteger(compressed_control_point[i][0]); if (bit_size > number_of_bits_for_isomin) number_of_bits_for_isomin = bit_size; } for(uint32_t i=1;i number_of_bits_for_rest) number_of_bits_for_rest = bit_size; } if( number_of_bits_for_rest == 2 ) number_of_bits_for_rest--; // really I think it must be unconditional, but so it seems to be done in Adobe Acrobat (9.3) WriteUnsignedIntegerWithVariableBitNumber ( number_of_bits_for_isomin, 20 ) WriteUnsignedIntegerWithVariableBitNumber ( number_of_bits_for_rest, 20 ) WriteDouble ( P[0][0].x ) WriteDouble ( P[0][0].y ) WriteDouble ( P[0][0].z ) for(uint32_t j = 1; j < number_of_control_point_in_v; j++) { WriteIntegerWithVariableBitNumber(compressed_control_point[0][j].x, number_of_bits_for_isomin+1) WriteIntegerWithVariableBitNumber(compressed_control_point[0][j].y, number_of_bits_for_isomin+1) WriteIntegerWithVariableBitNumber(compressed_control_point[0][j].z, number_of_bits_for_isomin+1) } for(uint32_t i = 1; i < number_of_control_point_in_u; i++) { WriteIntegerWithVariableBitNumber(compressed_control_point[i][0].x, number_of_bits_for_isomin+1) WriteIntegerWithVariableBitNumber(compressed_control_point[i][0].y, number_of_bits_for_isomin+1) WriteIntegerWithVariableBitNumber(compressed_control_point[i][0].z, number_of_bits_for_isomin+1) } for(uint32_t i = 1; i < number_of_control_point_in_u; i++) { for(uint32_t j = 1; j < number_of_control_point_in_v; j++) { WriteUnsignedIntegerWithVariableBitNumber ( control_point_type[i][j], 2 ) if(control_point_type[i][j] == 1) { WriteIntegerWithVariableBitNumber ( compressed_control_point[i][j].z, number_of_bits_for_rest+1 ) } else if(control_point_type[i][j] == 2) { WriteIntegerWithVariableBitNumber ( compressed_control_point[i][j].x, number_of_bits_for_rest+1 ) WriteIntegerWithVariableBitNumber ( compressed_control_point[i][j].y, number_of_bits_for_rest+1 ) } else if(control_point_type[i][j] == 3) { WriteIntegerWithVariableBitNumber ( compressed_control_point[i][j].x, number_of_bits_for_rest+1 ) WriteIntegerWithVariableBitNumber ( compressed_control_point[i][j].y, number_of_bits_for_rest+1 ) WriteIntegerWithVariableBitNumber ( compressed_control_point[i][j].z, number_of_bits_for_rest+1 ) } } } const uint32_t type_param_u = 0; WriteBoolean( type_param_u == 0 ) const uint32_t type_param_v = 0; WriteBoolean( type_param_v == 0 ) const bool is_rational = false; WriteBoolean( is_rational ) } void PRCCompressedBrepData::serializeCompressedShell(PRCbitStream &pbs) { uint32_t i; const uint32_t number_of_face = face.size(); WriteBoolean ( number_of_face == 1 ) if( number_of_face != 1 ) WriteNumberOfBitsThenUnsignedInteger (number_of_face) for( i=0; i < number_of_face; i++) SerializeCompressedFace ( face[i] ) const bool is_an_iso_face = false; for( i=0; i < number_of_face; i++) WriteBoolean ( is_an_iso_face ) } void PRCCompressedBrepData::serializeCompressedBrepData(PRCbitStream &pbs) { WriteUnsignedInteger ( PRC_TYPE_TOPO_BrepDataCompress ) SerializeContentBody WriteDouble ( brep_data_compressed_tolerance ) const uint32_t number_of_bits_to_store_reference = 1; WriteNumberOfBitsThenUnsignedInteger ( number_of_bits_to_store_reference ) const uint32_t number_vertex_iso = 0; WriteUnsignedIntegerWithVariableBitNumber ( number_vertex_iso, number_of_bits_to_store_reference ) const uint32_t number_edge_iso = 0; WriteUnsignedIntegerWithVariableBitNumber ( number_edge_iso, number_of_bits_to_store_reference ) const uint32_t number_of_shell = 1; const uint32_t number_of_connex = 1; WriteBoolean ( number_of_shell == 1 && number_of_connex == 1 ) serializeCompressedShell( pbs ); uint32_t i; const uint32_t number_of_faces = face.size(); for(i=0; i< number_of_faces; i++) face[i]->serializeBaseTopology( pbs ); } void PRCBlend01::serializeBlend01(PRCbitStream &pbs) { WriteUnsignedInteger (PRC_TYPE_SURF_Blend01) SerializeContentSurface SerializeTransformation SerializeUVParameterization SerializePtrCurve ( center_curve ) SerializePtrCurve ( origin_curve ) SerializePtrCurve ( tangent_curve ) } void PRCRuled::serializeRuled(PRCbitStream &pbs) { WriteUnsignedInteger (PRC_TYPE_SURF_Ruled) SerializeContentSurface SerializeTransformation SerializeUVParameterization SerializePtrCurve ( first_curve ) SerializePtrCurve ( second_curve ) } void PRCSphere::serializeSphere(PRCbitStream &pbs) { WriteUnsignedInteger (PRC_TYPE_SURF_Sphere) SerializeContentSurface SerializeTransformation SerializeUVParameterization WriteDouble ( radius ) } void PRCCone::serializeCone(PRCbitStream &pbs) { WriteUnsignedInteger (PRC_TYPE_SURF_Cone) SerializeContentSurface SerializeTransformation SerializeUVParameterization WriteDouble ( bottom_radius ) WriteDouble ( semi_angle ) } void PRCCylinder::serializeCylinder(PRCbitStream &pbs) { WriteUnsignedInteger (PRC_TYPE_SURF_Cylinder) SerializeContentSurface SerializeTransformation SerializeUVParameterization WriteDouble ( radius ) } void PRCTorus::serializeTorus(PRCbitStream &pbs) { WriteUnsignedInteger (PRC_TYPE_SURF_Torus) SerializeContentSurface SerializeTransformation SerializeUVParameterization WriteDouble ( major_radius ) WriteDouble ( minor_radius ) } void PRCFace::serializeFace(PRCbitStream &pbs) { uint32_t i = 0; WriteUnsignedInteger (PRC_TYPE_TOPO_Face) SerializeBaseTopology SerializePtrSurface ( base_surface ) WriteBit ( have_surface_trim_domain ) if ( have_surface_trim_domain ) SerializeDomain ( surface_trim_domain ) WriteBit ( have_tolerance ) if ( have_tolerance ) WriteDouble ( tolerance ) WriteUnsignedInteger ( number_of_loop ) WriteInteger ( outer_loop_index ) for (i=0;iserialType() ) if ( IsCompressedType(body[i]->serialType()) ) { WriteDouble ( body[i]->serialTolerance() ) } } } void PRCTopoContext::serializeContextGraphics(PRCbitStream &pbs) { uint32_t i=0, j=0, k=0, l=0; ResetCurrentGraphics uint32_t number_of_body = body.size(); PRCGraphicsList element; bool has_graphics = false; for (i=0;itopo_item_type == PRC_TYPE_TOPO_BrepData && dynamic_cast(body[i])) { PRCBrepData *body_i = dynamic_cast(body[i]); for (j=0;jconnex.size();j++) { for(k=0;kconnex[j]->shell.size();k++) { for( l=0;lconnex[j]->shell[k]->face.size();l++) { element.push_back( body_i->connex[j]->shell[k]->face[l] ); has_graphics = has_graphics || body_i->connex[j]->shell[k]->face[l]->has_graphics(); } } } } else if ( body[i]->topo_item_type == PRC_TYPE_TOPO_BrepDataCompress && dynamic_cast(body[i])) { PRCCompressedBrepData *body_i = dynamic_cast(body[i]); for( l=0;lface.size();l++) { element.push_back( body_i->face[l] ); has_graphics = has_graphics || body_i->face[l]->has_graphics(); } } } uint32_t number_of_treat_type = 0; if (has_graphics && !element.empty()) number_of_treat_type = 1; WriteUnsignedInteger (number_of_treat_type) for (i=0;ihas_graphics() ) if (element[j]->has_graphics()) { element[j]->serializeGraphics(pbs); } } } } uint32_t PRCTopoContext::addSingleWireBody(PRCSingleWireBody*& pSingleWireBody) { body.push_back(pSingleWireBody); pSingleWireBody = NULL; return body.size()-1; } uint32_t PRCTopoContext::addBrepData(PRCBrepData*& pBrepData) { body.push_back(pBrepData); pBrepData = NULL; return body.size()-1; } uint32_t PRCTopoContext::addCompressedBrepData(PRCCompressedBrepData*& pCompressedBrepData) { body.push_back(pCompressedBrepData); pCompressedBrepData = NULL; return body.size()-1; } void PRCSingleWireBody::serializeSingleWireBody(PRCbitStream &pbs) { WriteUnsignedInteger ( PRC_TYPE_TOPO_SingleWireBody) SerializeContentBody SerializePtrTopology ( wire_edge ) } void PRCUniqueId::serializeCompressedUniqueId(PRCbitStream &pbs) const { WriteUnsignedInteger (id0) WriteUnsignedInteger (id1) WriteUnsignedInteger (id2) WriteUnsignedInteger (id3) } void PRCUniqueId::serializeFileStructureUncompressedUniqueId(std::ostream& out) const { WriteUncompressedUnsignedInteger (id0) WriteUncompressedUnsignedInteger (id1) WriteUncompressedUnsignedInteger (id2) WriteUncompressedUnsignedInteger (id3) } void PRCUnit::serializeUnit(PRCbitStream &pbs) { WriteBoolean (unit_from_CAD_file) WriteDouble (unit) } void PRCProductOccurrence::serializeProductOccurrence(PRCbitStream &pbs) { WriteUnsignedInteger ( PRC_TYPE_ASM_ProductOccurence ) SerializePRCBaseWithGraphics // SerializeReferencesOfProductOccurrence WriteUnsignedInteger (index_part+1) WriteUnsignedInteger (index_prototype+1) if (index_prototype != m1) { WriteBoolean (prototype_in_same_file_structure) if (!prototype_in_same_file_structure) SerializeCompressedUniqueId (prototype_file_structure) } WriteUnsignedInteger(index_external_data+1) if (index_external_data != m1) { WriteBoolean (external_data_in_same_file_structure) if (!external_data_in_same_file_structure) SerializeCompressedUniqueId (external_data_file_structure) } const uint32_t number_of_son_product_occurrences = index_son_occurrence.size(); WriteUnsignedInteger (number_of_son_product_occurrences) for (uint32_t i=0;iserializeTransformation3d (pbs); WriteUnsignedInteger (0) // number_of_references // SerializeMarkups (markups) WriteUnsignedInteger (0) // number_of_linked_items WriteUnsignedInteger (0) // number_of_leaders WriteUnsignedInteger (0) // number_of_markups WriteUnsignedInteger (0) // number_of_annotation_entities WriteUnsignedInteger (0) // number_of_views WriteBit (false) // has_entity_filter WriteUnsignedInteger (0) // number_of_display_filters WriteUnsignedInteger (0) // number_of_scene_display_parameters SerializeUserData } uint32_t PRCPartDefinition::addBrepModel(PRCBrepModel*& pBrepModel) { representation_item.push_back(pBrepModel); pBrepModel = NULL; return representation_item.size()-1; } uint32_t PRCPartDefinition::addPolyBrepModel(PRCPolyBrepModel*& pPolyBrepModel) { representation_item.push_back(pPolyBrepModel); pPolyBrepModel = NULL; return representation_item.size()-1; } uint32_t PRCPartDefinition::addPointSet(PRCPointSet*& pPointSet) { representation_item.push_back(pPointSet); pPointSet = NULL; return representation_item.size()-1; } uint32_t PRCPartDefinition::addSet(PRCSet*& pSet) { representation_item.push_back(pSet); pSet = NULL; return representation_item.size()-1; } uint32_t PRCPartDefinition::addWire(PRCWire*& pWire) { representation_item.push_back(pWire); pWire = NULL; return representation_item.size()-1; } uint32_t PRCPartDefinition::addPolyWire(PRCPolyWire*& pPolyWire) { representation_item.push_back(pPolyWire); pPolyWire = NULL; return representation_item.size()-1; } uint32_t PRCPartDefinition::addRepresentationItem(PRCRepresentationItem*& pRepresentationItem) { representation_item.push_back(pRepresentationItem); pRepresentationItem = NULL; return representation_item.size()-1; } void PRCPartDefinition::serializePartDefinition(PRCbitStream &pbs) { WriteUnsignedInteger ( PRC_TYPE_ASM_PartDefinition ) SerializePRCBaseWithGraphics SerializeBoundingBox uint32_t number_of_representation_items = representation_item.size(); WriteUnsignedInteger (number_of_representation_items) for (uint32_t i=0;i and * Michail Vidiassov * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #ifndef __WRITE_PRC_H #define __WRITE_PRC_H #include #include #include #include #include #include #include "PRCbitStream.h" #include "PRC.h" #include #include static const uint32_t m1=(uint32_t)-1; static const double pi=acos(-1.0); class PRCVector3d { public : double x; double y; double z; PRCVector3d() : x(0), y(0), z(0) {} PRCVector3d(double fx, double fy, double fz) : x(fx), y(fy), z(fz) {} PRCVector3d(const double c[], double fx=0, double fy=0, double fz=0) : x(c?c[0]:fx), y(c?c[1]:fy), z(c?c[2]:fz) {} PRCVector3d(const PRCVector3d& sVector3d) : x(sVector3d.x), y(sVector3d.y), z(sVector3d.z) {} void Set(double fx, double fy, double fz) { x = fx; y = fy; z = fz; } double Dot(const PRCVector3d & sPt) const { return(x*sPt.x)+(y*sPt.y)+(z*sPt.z); } double LengthSquared() { return(x*x+y*y+z*z); } friend PRCVector3d operator + (const PRCVector3d& a, const PRCVector3d& b) { return PRCVector3d(a.x+b.x,a.y+b.y,a.z+b.z); } friend PRCVector3d operator - (const PRCVector3d& a) { return PRCVector3d(-a.x,-a.y,-a.z); } friend PRCVector3d operator - (const PRCVector3d& a, const PRCVector3d& b) { return PRCVector3d(a.x-b.x,a.y-b.y,a.z-b.z); } friend PRCVector3d operator * (const PRCVector3d& a, const double d) { return PRCVector3d(a.x*d,a.y*d,a.z*d); } friend PRCVector3d operator * (const double d, const PRCVector3d& a) { return PRCVector3d(a.x*d,a.y*d,a.z*d); } friend PRCVector3d operator / (const PRCVector3d& a, const double d) { return PRCVector3d(a.x/d,a.y/d,a.z/d); } friend PRCVector3d operator * (const PRCVector3d& a, const PRCVector3d& b) { return PRCVector3d((a.y*b.z)-(a.z*b.y), (a.z*b.x)-(a.x*b.z), (a.x*b.y)-(a.y*b.x)); } void write(PRCbitStream &out) { out << x << y << z; } void serializeVector3d(PRCbitStream &pbs) const { pbs << x << y << z; } void serializeVector2d(PRCbitStream &pbs) const { pbs << x << y; } double Length(); bool Normalize(); bool operator==(const PRCVector3d &v) const { return x==v.x && y==v.y && z==v.z; } bool operator!=(const PRCVector3d &v) const { return !(x==v.x && y==v.y && z==v.z); } bool operator<(const PRCVector3d &v) const { if(x!=v.x) return (x attribute_keys; }; typedef std::list PRCAttributeList; class PRCAttributes { public: void serializeAttributes(PRCbitStream&) const; PRCAttribute& newAttribute() { attributes.push_front(PRCAttribute()); return attributes.front(); } void addAttribute(const PRCAttribute &attribute) { attributes.push_front(attribute); } PRCAttributeList attributes; }; bool type_eligible_for_reference(uint32_t type); uint32_t makeCADID(); uint32_t makePRCID(); class ContentPRCBase : public PRCAttributes { public: ContentPRCBase(uint32_t t, std::string n="") : type(t),name(n),CAD_identifier(0), CAD_persistent_identifier(0), PRC_unique_identifier(0) { if(type_eligible_for_reference(type)) { CAD_identifier = makeCADID(); PRC_unique_identifier = makePRCID(); } } void serializeContentPRCBase(PRCbitStream&) const; uint32_t getPRCID() const { return PRC_unique_identifier; } uint32_t getType() const { return type; } uint32_t type; std::string name; uint32_t CAD_identifier, CAD_persistent_identifier, PRC_unique_identifier; }; class PRCReferenceUniqueIdentifier { public: PRCReferenceUniqueIdentifier() : type(0), unique_identifier(m1) {} void serializeReferenceUniqueIdentifier(PRCbitStream&); uint32_t type; // bool reference_in_same_file_structure; // PRCUniqueId target_file_structure; uint32_t unique_identifier; }; extern std::string currentName; void writeName(PRCbitStream&,const std::string&); void resetName(); extern uint32_t current_layer_index; extern uint32_t current_index_of_line_style; extern uint16_t current_behaviour_bit_field; void writeGraphics(PRCbitStream&,uint32_t=m1,uint32_t=m1,uint16_t=1,bool=false); void resetGraphics(); void resetGraphicsAndName(); struct PRCRgbColor { PRCRgbColor(double r=0.0, double g=0.0, double b=0.0) : red(r), green(g), blue(b) {} double red,green,blue; void serializeRgbColor(PRCbitStream&); bool operator==(const PRCRgbColor &c) const { return (red==c.red && green==c.green && blue==c.blue); } bool operator!=(const PRCRgbColor &c) const { return !(red==c.red && green==c.green && blue==c.blue); } bool operator<(const PRCRgbColor &c) const { if(red!=c.red) return (red PRCTextureDefinitionList; class PRCMaterial { public: virtual ~PRCMaterial() {} virtual void serializeMaterial(PRCbitStream&) = 0; }; typedef std::deque PRCMaterialList; class PRCMaterialGeneric : public ContentPRCBase, public PRCMaterial { public: PRCMaterialGeneric(std::string n="") : ContentPRCBase(PRC_TYPE_GRAPH_Material,n), ambient(m1), diffuse(m1), emissive(m1), specular(m1), shininess(0.0), ambient_alpha(1.0), diffuse_alpha(1.0), emissive_alpha(1.0), specular_alpha(1.0) {} void serializeMaterialGeneric(PRCbitStream&); void serializeMaterial(PRCbitStream &pbs) { serializeMaterialGeneric(pbs); } uint32_t picture_index; uint32_t ambient; uint32_t diffuse; uint32_t emissive; uint32_t specular; double shininess; double ambient_alpha; double diffuse_alpha; double emissive_alpha; double specular_alpha; bool operator==(const PRCMaterialGeneric &m) const { return (ambient==m.ambient && diffuse==m.diffuse && emissive==m.emissive && specular==m.specular && shininess==m.shininess && ambient_alpha==m.ambient_alpha && diffuse_alpha==m.diffuse_alpha && emissive_alpha==m.emissive_alpha && specular_alpha==m.specular_alpha); } }; class PRCTextureApplication : public ContentPRCBase, public PRCMaterial { public: PRCTextureApplication(std::string n="") : ContentPRCBase(PRC_TYPE_GRAPH_TextureApplication,n), material_generic_index(m1), texture_definition_index(m1), next_texture_index(m1), UV_coordinates_index(0) {} void serializeTextureApplication(PRCbitStream&); void serializeMaterial(PRCbitStream &pbs) { serializeTextureApplication(pbs); } uint32_t material_generic_index; uint32_t texture_definition_index; uint32_t next_texture_index; uint32_t UV_coordinates_index; }; class PRCLinePattern : public ContentPRCBase { public: PRCLinePattern(std::string n="") : ContentPRCBase(PRC_TYPE_GRAPH_LinePattern,n), phase(0), is_real_length(false) {} void serializeLinePattern(PRCbitStream&); std::vector lengths; double phase; bool is_real_length; }; typedef std::deque PRCLinePatternList; class PRCStyle : public ContentPRCBase { public: PRCStyle(std::string n="") : ContentPRCBase(PRC_TYPE_GRAPH_Style,n), line_width(0.0), is_vpicture(false), line_pattern_vpicture_index(m1), is_material(false), color_material_index(m1), is_transparency_defined(false), transparency(255), additional(0) {} void serializeCategory1LineStyle(PRCbitStream&); double line_width; bool is_vpicture; uint32_t line_pattern_vpicture_index; bool is_material; uint32_t color_material_index; bool is_transparency_defined; uint8_t transparency; uint8_t additional; }; typedef std::deque PRCStyleList; class PRCTessFace { public: PRCTessFace() : start_wire(0), used_entities_flag(0), start_triangulated(0), number_of_texture_coordinate_indexes(0), is_rgba(false), behaviour(PRC_GRAPHICS_Show) {} void serializeTessFace(PRCbitStream&); std::vector line_attributes; uint32_t start_wire; // specifing bounding wire seems not to work as of Acrobat/Reader 9.2 std::vector sizes_wire; // specifing bounding wire seems not to work as of Acrobat/Reader 9.2 uint32_t used_entities_flag; uint32_t start_triangulated; std::vector sizes_triangulated; uint32_t number_of_texture_coordinate_indexes; bool is_rgba; std::vector rgba_vertices; uint32_t behaviour; }; typedef std::deque PRCTessFaceList; class PRCContentBaseTessData { public: PRCContentBaseTessData() : is_calculated(false) {} void serializeContentBaseTessData(PRCbitStream&); bool is_calculated; std::vector coordinates; }; class PRCTess : public PRCContentBaseTessData { public: virtual ~PRCTess() {} virtual void serializeBaseTessData(PRCbitStream &pbs) = 0; }; typedef std::deque PRCTessList; class PRC3DTess : public PRCTess { public: PRC3DTess() : has_faces(false), has_loops(false), crease_angle(25.8419) // arccos(0.9), default found in Acrobat output {} ~PRC3DTess() { for(PRCTessFaceList::iterator it=face_tessellation.begin(); it!=face_tessellation.end(); ++it) delete *it; } void serialize3DTess(PRCbitStream&); void serializeBaseTessData(PRCbitStream &pbs) { serialize3DTess(pbs); } void addTessFace(PRCTessFace*& pTessFace); bool has_faces; bool has_loops; double crease_angle; std::vector normal_coordinate; std::vector wire_index; // specifing bounding wire seems not to work as of Acrobat/Reader 9.2 std::vector triangulated_index; PRCTessFaceList face_tessellation; std::vector texture_coordinate; }; class PRC3DWireTess : public PRCTess { public: PRC3DWireTess() : is_rgba(false), is_segment_color(false) {} void serialize3DWireTess(PRCbitStream&); void serializeBaseTessData(PRCbitStream &pbs) { serialize3DWireTess(pbs); } bool is_rgba; bool is_segment_color; std::vector wire_indexes; std::vector rgba_vertices; }; class PRCMarkupTess : public PRCTess { public: PRCMarkupTess() : behaviour(0) {} void serializeMarkupTess(PRCbitStream&); void serializeBaseTessData(PRCbitStream &pbs) { serializeMarkupTess(pbs); } std::vector codes; std::vector texts; std::string label; uint8_t behaviour; }; class PRCGraphics { public: PRCGraphics() : layer_index(m1), index_of_line_style(m1), behaviour_bit_field(PRC_GRAPHICS_Show) {} void serializeGraphics(PRCbitStream&); void serializeGraphicsForced(PRCbitStream&); bool has_graphics() { return (index_of_line_style!=m1 || layer_index!=m1 || behaviour_bit_field!=PRC_GRAPHICS_Show) ; } uint32_t layer_index; uint32_t index_of_line_style; uint16_t behaviour_bit_field; }; typedef std::deque PRCGraphicsList; void writeGraphics(PRCbitStream&,const PRCGraphics&,bool=false); class PRCMarkup: public PRCGraphics, public ContentPRCBase { public: PRCMarkup(std::string n="") : ContentPRCBase(PRC_TYPE_MKP_Markup,n), type(KEPRCMarkupType_Unknown), sub_type(KEPRCMarkupSubType_Unknown), index_tessellation(m1) {} void serializeMarkup(PRCbitStream&); EPRCMarkupType type; EPRCMarkupSubType sub_type; // vector linked_items; // vector leaders; uint32_t index_tessellation; }; typedef std::deque PRCMarkupList; class PRCAnnotationItem: public PRCGraphics, public ContentPRCBase { public: PRCAnnotationItem(std::string n="") : ContentPRCBase(PRC_TYPE_MKP_AnnotationItem,n) {} void serializeAnnotationItem(PRCbitStream&); void serializeAnnotationEntity(PRCbitStream &pbs) { serializeAnnotationItem(pbs); } PRCReferenceUniqueIdentifier markup; }; typedef std::deque PRCAnnotationItemList; class PRCRepresentationItemContent: public PRCGraphics, public ContentPRCBase { public: PRCRepresentationItemContent(uint32_t t, std::string n="") : ContentPRCBase(t,n), index_local_coordinate_system(m1), index_tessellation(m1) {} void serializeRepresentationItemContent(PRCbitStream&); uint32_t index_local_coordinate_system; uint32_t index_tessellation; }; class PRCRepresentationItem : public PRCRepresentationItemContent { public: PRCRepresentationItem(uint32_t t, std::string n="") : PRCRepresentationItemContent(t,n) {} virtual ~PRCRepresentationItem() {} virtual void serializeRepresentationItem(PRCbitStream &pbs) = 0; }; typedef std::deque PRCRepresentationItemList; class PRCBrepModel : public PRCRepresentationItem { public: PRCBrepModel(std::string n="") : PRCRepresentationItem(PRC_TYPE_RI_BrepModel,n), has_brep_data(true), context_id(m1), body_id(m1), is_closed(false) {} void serializeBrepModel(PRCbitStream&); void serializeRepresentationItem(PRCbitStream &pbs) { serializeBrepModel(pbs); } bool has_brep_data; uint32_t context_id; uint32_t body_id; bool is_closed; }; class PRCPolyBrepModel : public PRCRepresentationItem { public: PRCPolyBrepModel(std::string n="") : PRCRepresentationItem(PRC_TYPE_RI_PolyBrepModel,n), is_closed(false) {} void serializePolyBrepModel(PRCbitStream&); void serializeRepresentationItem(PRCbitStream &pbs) { serializePolyBrepModel(pbs); } bool is_closed; }; class PRCPointSet : public PRCRepresentationItem { public: PRCPointSet(std::string n="") : PRCRepresentationItem(PRC_TYPE_RI_PointSet,n) {} void serializePointSet(PRCbitStream&); void serializeRepresentationItem(PRCbitStream &pbs) { serializePointSet(pbs); } std::vector point; }; class PRCWire : public PRCRepresentationItem { public: PRCWire(std::string n="") : PRCRepresentationItem(PRC_TYPE_RI_Curve,n), has_wire_body(true), context_id(m1), body_id(m1) {} void serializeWire(PRCbitStream&); void serializeRepresentationItem(PRCbitStream &pbs) { serializeWire(pbs); } bool has_wire_body; uint32_t context_id; uint32_t body_id; }; class PRCPolyWire : public PRCRepresentationItem { public: PRCPolyWire(std::string n="") : PRCRepresentationItem(PRC_TYPE_RI_PolyWire,n) {} void serializePolyWire(PRCbitStream&); void serializeRepresentationItem(PRCbitStream &pbs) { serializePolyWire(pbs); } }; class PRCSet : public PRCRepresentationItem { public: PRCSet(std::string n="") : PRCRepresentationItem(PRC_TYPE_RI_Set,n) {} ~PRCSet() { for(PRCRepresentationItemList::iterator it=elements.begin(); it!=elements.end(); ++it) delete *it; } void serializeSet(PRCbitStream&); void serializeRepresentationItem(PRCbitStream &pbs) { serializeSet(pbs); } uint32_t addBrepModel(PRCBrepModel*& pBrepModel); uint32_t addPolyBrepModel(PRCPolyBrepModel*& pPolyBrepModel); uint32_t addPointSet(PRCPointSet*& pPointSet); uint32_t addSet(PRCSet*& pSet); uint32_t addWire(PRCWire*& pWire); uint32_t addPolyWire(PRCPolyWire*& pPolyWire); uint32_t addRepresentationItem(PRCRepresentationItem*& pRepresentationItem); PRCRepresentationItemList elements; }; class PRCTransformation3d { public: virtual ~PRCTransformation3d() {} virtual void serializeTransformation3d(PRCbitStream&) const =0; }; typedef std::deque PRCTransformation3dList; class PRCGeneralTransformation3d : public PRCTransformation3d { public: PRCGeneralTransformation3d() { setidentity(); } PRCGeneralTransformation3d(const double t[]) { set(t); } void serializeGeneralTransformation3d(PRCbitStream&) const; void serializeTransformation3d(PRCbitStream& pbs) const { serializeGeneralTransformation3d(pbs); } double mat[4][4]; bool operator==(const PRCGeneralTransformation3d &t) const { for (size_t i=0;i<4;i++) for (size_t j=0;j<4;j++) if(mat[i][j]!=t.mat[i][j]) return false; return true; } bool operator<(const PRCGeneralTransformation3d &t) const { for (size_t i=0;i<4;i++) for (size_t j=0;j<4;j++) if(mat[i][j]!=t.mat[i][j]) { return (mat[i][j] PRCGeneralTransformation3dList; class PRCCartesianTransformation3d : public PRCTransformation3d { public: PRCCartesianTransformation3d() : behaviour(PRC_TRANSFORMATION_Identity), origin(0.0,0.0,0.0), X(1.0,0.0,0.0), Y(0.0,1.0,0.0), Z(0.0,0.0,1.0), scale(1.0,1.0,1.0), uniform_scale(1.0), X_homogeneous_coord(0.0), Y_homogeneous_coord(0.0), Z_homogeneous_coord(0.0), origin_homogeneous_coord(1.0) {} PRCCartesianTransformation3d(const double o[3], const double x[3], const double y[3], double sc) : behaviour(PRC_TRANSFORMATION_Identity), origin(o,0.0,0.0,0.0), X(x,1.0,0.0,0.0), Y(y,0.0,1.0,0.0), Z(0.0,0.0,1.0), scale(1.0,1.0,1.0), uniform_scale(sc), X_homogeneous_coord(0.0), Y_homogeneous_coord(0.0), Z_homogeneous_coord(0.0), origin_homogeneous_coord(1.0) { if(origin!=PRCVector3d(0.0,0.0,0.0)) behaviour = behaviour | PRC_TRANSFORMATION_Translate; if(X!=PRCVector3d(1.0,0.0,0.0) || Y!=PRCVector3d(0.0,1.0,0.0)) behaviour = behaviour | PRC_TRANSFORMATION_Rotate; if(uniform_scale!=1) behaviour = behaviour | PRC_TRANSFORMATION_Scale; } void serializeCartesianTransformation3d(PRCbitStream& pbs) const; void serializeTransformation3d(PRCbitStream& pbs) const { serializeCartesianTransformation3d(pbs); } uint8_t behaviour; PRCVector3d origin; PRCVector3d X; PRCVector3d Y; PRCVector3d Z; PRCVector3d scale; double uniform_scale; double X_homogeneous_coord; double Y_homogeneous_coord; double Z_homogeneous_coord; double origin_homogeneous_coord; bool operator==(const PRCCartesianTransformation3d &t) const { return behaviour==t.behaviour && origin==t.origin && X==t.X && Y==t.Y && Z==t.Z && scale==t.scale && uniform_scale==t.uniform_scale && X_homogeneous_coord==t.X_homogeneous_coord && Y_homogeneous_coord==t.Y_homogeneous_coord && Z_homogeneous_coord==t.Z_homogeneous_coord && origin_homogeneous_coord==t.origin_homogeneous_coord; } }; class PRCTransformation { public: PRCTransformation() : has_transformation(false), geometry_is_2D(false), behaviour(PRC_TRANSFORMATION_Identity), origin(0.0,0.0,0.0), x_axis(1.0,0.0,0.0), y_axis(0.0,1.0,0.0), scale(1) {} void serializeTransformation(PRCbitStream&); bool has_transformation; bool geometry_is_2D; uint8_t behaviour; PRCVector3d origin; PRCVector3d x_axis; PRCVector3d y_axis; double scale; }; class PRCCoordinateSystem : public PRCRepresentationItem { public: PRCCoordinateSystem(std::string n="") : PRCRepresentationItem(PRC_TYPE_RI_CoordinateSystem,n), axis_set(NULL) {} ~PRCCoordinateSystem() { delete axis_set; } void serializeCoordinateSystem(PRCbitStream&); void serializeRepresentationItem(PRCbitStream &pbs) { serializeCoordinateSystem(pbs); } void setAxisSet(PRCGeneralTransformation3d*& transform) { axis_set = transform; transform = NULL; } void setAxisSet(PRCCartesianTransformation3d*& transform) { axis_set = transform; transform = NULL; } PRCTransformation3d *axis_set; bool operator==(const PRCCoordinateSystem &t) const { if(index_local_coordinate_system!=t.index_local_coordinate_system) return false; PRCGeneralTransformation3d* axis_set_general = dynamic_cast(axis_set); PRCGeneralTransformation3d* t_axis_set_general = dynamic_cast(t.axis_set); PRCCartesianTransformation3d* axis_set_cartesian = dynamic_cast(axis_set); PRCCartesianTransformation3d* t_axis_set_cartesian = dynamic_cast(t.axis_set); if(axis_set_general!=NULL) return (t_axis_set_general!=NULL?(*axis_set_general==*t_axis_set_general):false); if(axis_set_cartesian!=NULL) return (t_axis_set_cartesian!=NULL?(*axis_set_cartesian==*t_axis_set_cartesian):false); return false; } }; typedef std::deque PRCCoordinateSystemList; struct PRCFontKey { uint32_t font_size; uint8_t attributes; }; class PRCFontKeysSameFont { public: void serializeFontKeysSameFont(PRCbitStream&); std::string font_name; uint32_t char_set; std::vector font_keys; }; // Topology class PRCBaseGeometry : public PRCAttributes { public: PRCBaseGeometry() : base_information(false), identifier(0) {} PRCBaseGeometry(std::string n, uint32_t id = 0) : base_information(true),name(n),identifier(id) {} void serializeBaseGeometry(PRCbitStream&); bool base_information; std::string name; uint32_t identifier; }; class PRCBoundingBox { public: PRCBoundingBox() : min(0.0,0.0,0.0), max(0.0,0.0,0.0) {} PRCBoundingBox(const PRCVector3d &m1, const PRCVector3d& m2) : min(m1),max(m2) {} void serializeBoundingBox(PRCbitStream &pbs); PRCVector3d min; PRCVector3d max; }; class PRCDomain { public: void serializeDomain(PRCbitStream &pbs); PRCVector2d min; PRCVector2d max; }; class PRCInterval { public: PRCInterval() : min(0), max(0) {} PRCInterval(double m, double M) : min(m), max(M) {} void serializeInterval(PRCbitStream &pbs); double min; double max; }; class PRCParameterization { public: PRCParameterization() : parameterization_coeff_a(1), parameterization_coeff_b(0) {} PRCParameterization(double min, double max) : interval(min, max), parameterization_coeff_a(1), parameterization_coeff_b(0) {} void serializeParameterization(PRCbitStream &pbs); PRCInterval interval; double parameterization_coeff_a; double parameterization_coeff_b; }; class PRCUVParameterization { public: PRCUVParameterization() : swap_uv(false), parameterization_on_u_coeff_a(1), parameterization_on_v_coeff_a(1), parameterization_on_u_coeff_b(0), parameterization_on_v_coeff_b(0) {} void serializeUVParameterization(PRCbitStream &pbs); bool swap_uv; PRCDomain uv_domain; double parameterization_on_u_coeff_a; double parameterization_on_v_coeff_a; double parameterization_on_u_coeff_b; double parameterization_on_v_coeff_b; }; class PRCControlPoint { public: PRCControlPoint() : x(0), y(0), z(0), w(1) {} PRCControlPoint(double X, double Y, double Z=0, double W=1) : x(X), y(Y), z(Z), w(W) {} PRCControlPoint(const PRCVector3d &v) : x(v.x), y(v.y), z(v.z), w(1) {} void Set(double fx, double fy, double fz, double fw=1) { x = fx; y = fy; z = fz; w = fw; } double x; double y; double z; double w; }; class PRCContentSurface: public PRCBaseGeometry { public: PRCContentSurface() : PRCBaseGeometry(), extend_info(KEPRCExtendTypeNone) {} PRCContentSurface(std::string n) : PRCBaseGeometry(n,makeCADID()),extend_info(KEPRCExtendTypeNone) {} void serializeContentSurface(PRCbitStream&); EPRCExtendType extend_info; }; class PRCSurface : public PRCContentSurface { public: PRCSurface() : PRCContentSurface() {} PRCSurface(std::string n) : PRCContentSurface(n) {} virtual ~PRCSurface() {} virtual void serializeSurface(PRCbitStream &pbs) = 0; }; class PRCNURBSSurface : public PRCSurface { public: PRCNURBSSurface() : PRCSurface(), knot_type(KEPRCKnotTypeUnspecified), surface_form(KEPRCBSplineSurfaceFormUnspecified) {} PRCNURBSSurface(std::string n) : PRCSurface(n), knot_type(KEPRCKnotTypeUnspecified), surface_form(KEPRCBSplineSurfaceFormUnspecified) {} void serializeNURBSSurface(PRCbitStream &pbs); void serializeSurface(PRCbitStream &pbs) { serializeNURBSSurface(pbs); } bool is_rational; uint32_t degree_in_u; uint32_t degree_in_v; std::vector control_point; std::vector knot_u; std::vector knot_v; const EPRCKnotType knot_type; const EPRCBSplineSurfaceForm surface_form; }; class PRCContentCurve: public PRCBaseGeometry { public: PRCContentCurve() : PRCBaseGeometry(), extend_info(KEPRCExtendTypeNone), is_3d(true) {} PRCContentCurve(std::string n) : PRCBaseGeometry(n,makeCADID()),extend_info(KEPRCExtendTypeNone), is_3d(true) {} void serializeContentCurve(PRCbitStream&); EPRCExtendType extend_info; bool is_3d; }; class PRCCurve : public PRCContentCurve { public: PRCCurve() : PRCContentCurve() {} PRCCurve(std::string n) : PRCContentCurve(n) {} virtual ~PRCCurve() {} virtual void serializeCurve(PRCbitStream &pbs) = 0; }; typedef std::deque PRCCurveList; class PRCNURBSCurve : public PRCCurve { public: PRCNURBSCurve() : PRCCurve(), knot_type(KEPRCKnotTypeUnspecified), curve_form(KEPRCBSplineCurveFormUnspecified) {} PRCNURBSCurve(std::string n) : PRCCurve(n), knot_type(KEPRCKnotTypeUnspecified), curve_form(KEPRCBSplineCurveFormUnspecified) {} void serializeNURBSCurve(PRCbitStream &pbs); void serializeCurve(PRCbitStream &pbs) { serializeNURBSCurve(pbs); } bool is_rational; uint32_t degree; std::vector control_point; std::vector knot; const EPRCKnotType knot_type; const EPRCBSplineCurveForm curve_form; }; class PRCPolyLine : public PRCCurve, public PRCTransformation, public PRCParameterization { public: PRCPolyLine() : PRCCurve() {} PRCPolyLine(std::string n) : PRCCurve(n) {} void serializePolyLine(PRCbitStream &pbs); void serializeCurve(PRCbitStream &pbs) { serializePolyLine(pbs); } std::vector point; }; class PRCCircle : public PRCCurve, public PRCTransformation, public PRCParameterization { public: PRCCircle() : PRCCurve(), PRCParameterization(0,2*pi) {} PRCCircle(std::string n) : PRCCurve(n), PRCParameterization(0,2*pi) {} void serializeCircle(PRCbitStream &pbs); void serializeCurve(PRCbitStream &pbs) { serializeCircle(pbs); } double radius; }; class PRCComposite : public PRCCurve, public PRCTransformation, public PRCParameterization { public: PRCComposite() : PRCCurve() {} PRCComposite(std::string n) : PRCCurve(n) {} void serializeComposite(PRCbitStream &pbs); void serializeCurve(PRCbitStream &pbs) { serializeComposite(pbs); } PRCCurveList base_curve; std::vector base_sense; bool is_closed; }; class PRCBlend01 : public PRCSurface, public PRCTransformation, public PRCUVParameterization { public: PRCBlend01() : PRCSurface(), center_curve(NULL), origin_curve(NULL), tangent_curve(NULL) {} PRCBlend01(std::string n) : PRCSurface(n), center_curve(NULL), origin_curve(NULL), tangent_curve(NULL) {} ~PRCBlend01() { delete center_curve; delete origin_curve; delete tangent_curve; } void serializeBlend01(PRCbitStream &pbs); void serializeSurface(PRCbitStream &pbs) { serializeBlend01(pbs); } // void setCenterCurve (PRCCurve*& curve) { center_curve = curve; curve = NULL; } // void setOriginCurve (PRCCurve*& curve) { origin_curve = curve; curve = NULL; } // void setTangentCurve(PRCCurve*& curve) { tangent_curve = curve; curve = NULL; } PRCCurve* center_curve; PRCCurve* origin_curve; PRCCurve* tangent_curve; }; class PRCRuled : public PRCSurface, public PRCTransformation, public PRCUVParameterization { public: PRCRuled() : PRCSurface(), first_curve(NULL), second_curve(NULL) {} PRCRuled(std::string n) : PRCSurface(n) {} ~PRCRuled() { delete first_curve; delete second_curve; } void serializeRuled(PRCbitStream &pbs); void serializeSurface(PRCbitStream &pbs) { serializeRuled(pbs); } // void setFirstCurve(PRCCurve*& curve) { first_curve = curve; curve = NULL; } // void setSecondCurve(PRCCurve*& curve) { second_curve = curve; curve = NULL; } PRCCurve* first_curve; PRCCurve* second_curve; }; class PRCSphere : public PRCSurface, public PRCTransformation, public PRCUVParameterization { public: PRCSphere() : PRCSurface() {} PRCSphere(std::string n) : PRCSurface(n) {} void serializeSphere(PRCbitStream &pbs); void serializeSurface(PRCbitStream &pbs) { serializeSphere(pbs); } double radius; }; class PRCCone : public PRCSurface, public PRCTransformation, public PRCUVParameterization { public: PRCCone() : PRCSurface() {} PRCCone(std::string n) : PRCSurface(n) {} void serializeCone(PRCbitStream &pbs); void serializeSurface(PRCbitStream &pbs) { serializeCone(pbs); } double bottom_radius; double semi_angle; }; class PRCCylinder : public PRCSurface, public PRCTransformation, public PRCUVParameterization { public: PRCCylinder() : PRCSurface() {} PRCCylinder(std::string n) : PRCSurface(n) {} void serializeCylinder(PRCbitStream &pbs); void serializeSurface(PRCbitStream &pbs) { serializeCylinder(pbs); } double radius; }; class PRCTorus : public PRCSurface, public PRCTransformation, public PRCUVParameterization { public: PRCTorus() : PRCSurface() {} PRCTorus(std::string n) : PRCSurface(n) {} void serializeTorus(PRCbitStream &pbs); void serializeSurface(PRCbitStream &pbs) { serializeTorus(pbs); } double major_radius; double minor_radius; }; class PRCBaseTopology : public PRCAttributes { public: PRCBaseTopology() : base_information(false),identifier(0) {} PRCBaseTopology(std::string n, uint32_t id = 0) : base_information(true),name(n),identifier(id) {} void serializeBaseTopology(PRCbitStream&); bool base_information; std::string name; uint32_t identifier; }; class PRCTopoItem { public: virtual ~PRCTopoItem() {} virtual void serializeTopoItem(PRCbitStream&)=0; }; class PRCContentBody: public PRCBaseTopology { public: PRCContentBody() : PRCBaseTopology(), behavior(0) {} PRCContentBody(std::string n) : PRCBaseTopology(n,makeCADID()), behavior(0) {} void serializeContentBody(PRCbitStream&); uint8_t behavior; }; class PRCBody : public PRCContentBody, public PRCTopoItem { public: PRCBody() : PRCContentBody(), topo_item_type(PRC_TYPE_ROOT) {} PRCBody(uint32_t tit) : PRCContentBody(), topo_item_type(tit) {} PRCBody(uint32_t tit, std::string n) : PRCContentBody(n), topo_item_type(tit) {} virtual ~PRCBody() {} virtual void serializeBody(PRCbitStream &pbs) = 0; void serializeTopoItem(PRCbitStream &pbs) { serializeBody(pbs); } uint32_t serialType() { return topo_item_type; } virtual double serialTolerance() { return 0; } const uint32_t topo_item_type; }; typedef std::deque PRCBodyList; class PRCContentWireEdge : public PRCBaseTopology { public: PRCContentWireEdge() : PRCBaseTopology(), curve_3d(NULL), has_curve_trim_interval(false) {} PRCContentWireEdge(std::string n) : PRCBaseTopology(n,makeCADID()), curve_3d(NULL), has_curve_trim_interval(false) {} ~PRCContentWireEdge() { delete curve_3d; } void serializeContentWireEdge(PRCbitStream &pbs); // void setCurve(PRCCurve*& curve) { curve_3d = curve; curve = NULL; } PRCCurve* curve_3d; bool has_curve_trim_interval; PRCInterval curve_trim_interval; }; class PRCWireEdge : public PRCContentWireEdge, public PRCTopoItem { public: void serializeWireEdge(PRCbitStream &pbs); void serializeTopoItem(PRCbitStream &pbs) { serializeWireEdge(pbs); } }; class PRCSingleWireBody : public PRCBody { public: PRCSingleWireBody() : PRCBody(PRC_TYPE_TOPO_SingleWireBody), wire_edge(NULL) {} PRCSingleWireBody(std::string n) : PRCBody(PRC_TYPE_TOPO_SingleWireBody, n), wire_edge(NULL) {} ~PRCSingleWireBody() { delete wire_edge; } void serializeSingleWireBody(PRCbitStream &pbs); void serializeBody(PRCbitStream &pbs) { serializeSingleWireBody(pbs); } void setWireEdge(PRCWireEdge*& wireEdge) { wire_edge = wireEdge; wireEdge = NULL; } PRCWireEdge* wire_edge; }; class PRCFace : public PRCBaseTopology, public PRCTopoItem, public PRCGraphics { public: PRCFace() : PRCBaseTopology(), base_surface(NULL), have_surface_trim_domain(false), have_tolerance(false), tolerance(0), number_of_loop(0), outer_loop_index(-1) {} PRCFace(std::string n) : PRCBaseTopology(n,makeCADID()), base_surface(NULL), have_surface_trim_domain(false), have_tolerance(false), tolerance(0), number_of_loop(0), outer_loop_index(-1) {} ~PRCFace() { delete base_surface; } void serializeFace(PRCbitStream &pbs); void serializeTopoItem(PRCbitStream &pbs) { serializeFace(pbs); } void setBaseSurface(PRCSurface*& surface) { base_surface = surface; surface = NULL; } PRCSurface *base_surface; const bool have_surface_trim_domain; PRCDomain surface_trim_domain; const bool have_tolerance; const double tolerance; const uint32_t number_of_loop; const int32_t outer_loop_index; // PRCLoopList loop; }; typedef std::deque PRCFaceList; class PRCShell : public PRCBaseTopology, public PRCTopoItem { public: PRCShell() : PRCBaseTopology(), shell_is_closed(false) {} PRCShell(std::string n) : PRCBaseTopology(n,makeCADID()), shell_is_closed(false) {} ~PRCShell() { for(PRCFaceList::iterator it=face.begin(); it!=face.end(); ++it) delete *it; } void serializeShell(PRCbitStream &pbs); void serializeTopoItem(PRCbitStream &pbs) { serializeShell(pbs); } void addFace(PRCFace*& pFace, uint8_t orientation=2); bool shell_is_closed; PRCFaceList face; std::vector orientation_surface_with_shell; }; typedef std::deque PRCShellList; class PRCConnex : public PRCBaseTopology, public PRCTopoItem { public: PRCConnex() : PRCBaseTopology() {} PRCConnex(std::string n) : PRCBaseTopology(n,makeCADID()) {} ~PRCConnex() { for(PRCShellList::iterator it=shell.begin(); it!=shell.end(); ++it) delete *it; } void serializeConnex(PRCbitStream &pbs); void serializeTopoItem(PRCbitStream &pbs) { serializeConnex(pbs); } void addShell(PRCShell*& pShell); PRCShellList shell; }; typedef std::deque PRCConnexList; class PRCBrepData : public PRCBody, public PRCBoundingBox { public: PRCBrepData() : PRCBody(PRC_TYPE_TOPO_BrepData) {} PRCBrepData(std::string n) : PRCBody(PRC_TYPE_TOPO_BrepData, n) {} ~PRCBrepData() { for(PRCConnexList::iterator it=connex.begin(); it!=connex.end(); ++it) delete *it; } void serializeBrepData(PRCbitStream &pbs); void serializeBody(PRCbitStream &pbs) { serializeBrepData(pbs); } void addConnex(PRCConnex*& pConnex); PRCConnexList connex; }; // For now - treat just the case of Bezier surfaces cubic 4x4 or linear 2x2 class PRCCompressedFace : public PRCBaseTopology, public PRCGraphics { public: PRCCompressedFace() : PRCBaseTopology(), orientation_surface_with_shell(true), degree(0) {} PRCCompressedFace(std::string n) : PRCBaseTopology(n,makeCADID()), orientation_surface_with_shell(true), degree(0) {} void serializeCompressedFace(PRCbitStream &pbs, double brep_data_compressed_tolerance); void serializeContentCompressedFace(PRCbitStream &pbs); void serializeCompressedAnaNurbs(PRCbitStream &pbs, double brep_data_compressed_tolerance); void serializeCompressedNurbs(PRCbitStream &pbs, double brep_data_compressed_tolerance); bool orientation_surface_with_shell; uint32_t degree; std::vector control_point; }; typedef std::deque PRCCompressedFaceList; // For now - treat just the case of one connex/one shell class PRCCompressedBrepData : public PRCBody { public: PRCCompressedBrepData() : PRCBody(PRC_TYPE_TOPO_BrepDataCompress), serial_tolerance(0), brep_data_compressed_tolerance(0) {} PRCCompressedBrepData(std::string n) : PRCBody(PRC_TYPE_TOPO_BrepDataCompress, n), serial_tolerance(0), brep_data_compressed_tolerance(0) {} ~PRCCompressedBrepData() { for(PRCCompressedFaceList::iterator it=face.begin(); it!=face.end(); ++it) delete *it; } void serializeCompressedBrepData(PRCbitStream &pbs); void serializeBody(PRCbitStream &pbs) { serializeCompressedBrepData(pbs); } void serializeCompressedShell(PRCbitStream &pbs); double serialTolerance() { return serial_tolerance; } double serial_tolerance; double brep_data_compressed_tolerance; PRCCompressedFaceList face; }; class PRCTopoContext : public ContentPRCBase { public: PRCTopoContext(std::string n="") : ContentPRCBase(PRC_TYPE_TOPO_Context,n), behaviour(0), granularity(1), tolerance(0), have_smallest_face_thickness(false), smallest_thickness(0), have_scale(false), scale(1) {} ~PRCTopoContext() { for(PRCBodyList::iterator it=body.begin(); it!=body.end(); ++it) delete *it; } void serializeTopoContext(PRCbitStream&); void serializeContextAndBodies(PRCbitStream&); void serializeGeometrySummary(PRCbitStream&); void serializeContextGraphics(PRCbitStream&); uint32_t addSingleWireBody(PRCSingleWireBody*& body); uint32_t addBrepData(PRCBrepData*& body); uint32_t addCompressedBrepData(PRCCompressedBrepData*& body); uint8_t behaviour; double granularity; double tolerance; bool have_smallest_face_thickness; double smallest_thickness; bool have_scale; double scale; PRCBodyList body; }; typedef std::deque PRCTopoContextList; class PRCUniqueId { public: PRCUniqueId() : id0(0), id1(0), id2(0), id3(0) {} void serializeCompressedUniqueId(PRCbitStream&) const; void serializeFileStructureUncompressedUniqueId(std::ostream& out) const; uint32_t id0; uint32_t id1; uint32_t id2; uint32_t id3; }; class PRCUnit { public: PRCUnit() : unit_from_CAD_file(false), unit(1) {} PRCUnit(double u, bool ufcf=true) : unit_from_CAD_file(ufcf), unit(u) {} void serializeUnit(PRCbitStream&); bool unit_from_CAD_file; double unit; }; class PRCProductOccurrence: public PRCGraphics, public ContentPRCBase { public: PRCProductOccurrence(std::string n="") : ContentPRCBase(PRC_TYPE_ASM_ProductOccurence,n), index_part(m1), index_prototype(m1), prototype_in_same_file_structure(true), index_external_data(m1), external_data_in_same_file_structure(true), product_behaviour(0), product_information_flags(0), product_load_status(KEPRCProductLoadStatus_Loaded), location(NULL) {} ~PRCProductOccurrence() { delete location; } void setLocation(PRCGeneralTransformation3d*& transform) { location = transform; transform = NULL; } void serializeProductOccurrence(PRCbitStream&); uint32_t index_part; uint32_t index_prototype; bool prototype_in_same_file_structure; PRCUniqueId prototype_file_structure; uint32_t index_external_data; bool external_data_in_same_file_structure; PRCUniqueId external_data_file_structure; std::vector index_son_occurrence; uint8_t product_behaviour; PRCUnit unit_information; uint8_t product_information_flags; EPRCProductLoadStatus product_load_status; PRCGeneralTransformation3d *location; }; typedef std::deque PRCProductOccurrenceList; class PRCPartDefinition: public PRCGraphics, public ContentPRCBase, public PRCBoundingBox { public: PRCPartDefinition(std::string n="") : ContentPRCBase(PRC_TYPE_ASM_PartDefinition,n) {} ~PRCPartDefinition() { for(PRCRepresentationItemList::iterator it=representation_item.begin(); it!=representation_item.end(); ++it) delete *it; } void serializePartDefinition(PRCbitStream&); uint32_t addBrepModel(PRCBrepModel*& pBrepModel); uint32_t addPolyBrepModel(PRCPolyBrepModel*& pPolyBrepModel); uint32_t addPointSet(PRCPointSet*& pPointSet); uint32_t addSet(PRCSet*& pSet); uint32_t addWire(PRCWire*& pWire); uint32_t addPolyWire(PRCPolyWire*& pPolyWire); uint32_t addRepresentationItem(PRCRepresentationItem*& pRepresentationItem); PRCRepresentationItemList representation_item; }; typedef std::deque PRCPartDefinitionList; #endif //__WRITE_PRC_H ./asymptote-2.41/prc/oPRCFile.cc0000644000175000017500000021213713064427076016247 0ustar norbertnorbert/************ * * This file is part of a tool for producing 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt and * Michail Vidiassov * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include "oPRCFile.h" #include #include #include #include #include #include #include namespace prc { #define WriteUnsignedInteger( value ) out << (uint32_t)(value); #define WriteInteger( value ) out << (int32_t)(value); #define WriteDouble( value ) out << (double)(value); #define WriteString( value ) out << (value); #define WriteUncompressedUnsignedInteger( value ) writeUncompressedUnsignedInteger(out, (uint32_t)(value)); #define WriteUncompressedBlock( value, count ) out.write((char *)(value),(count)); #define SerializeFileStructureUncompressedUniqueId( value ) (value).serializeFileStructureUncompressedUniqueId(out); #define SerializeCompressedUniqueId( value ) (value).serializeCompressedUniqueId(out); #define SerializeContentPRCBase write(out); #define SerializeRgbColor( value ) (value).serializeRgbColor(out); #define SerializePicture( value ) (value).serializePicture(out); #define SerializeTextureDefinition( value ) (value)->serializeTextureDefinition(out); #define SerializeMarkup( value ) (value)->serializeMarkup(out); #define SerializeAnnotationEntity( value ) (value)->serializeAnnotationEntity(out); #define SerializeFontKeysSameFont( value ) (value).serializeFontKeysSameFont(out); #define SerializeMaterial( value ) (value)->serializeMaterial(out); #define SerializeUserData UserData(0,0).write(out); #define SerializeEmptyContentPRCBase ContentPRCBase(PRC_TYPE_ROOT_PRCBase).serializeContentPRCBase(out); #define SerializeCategory1LineStyle( value ) (value)->serializeCategory1LineStyle(out); #define SerializeCoordinateSystem( value ) (value)->serializeCoordinateSystem(out); #define SerializeRepresentationItem( value ) (value)->serializeRepresentationItem(out); #define SerializePartDefinition( value ) (value)->serializePartDefinition(out); #define SerializeProductOccurrence( value ) (value)->serializeProductOccurrence(out); #define SerializeContextAndBodies( value ) (value)->serializeContextAndBodies(out); #define SerializeGeometrySummary( value ) (value)->serializeGeometrySummary(out); #define SerializeContextGraphics( value ) (value)->serializeContextGraphics(out); #define SerializeStartHeader serializeStartHeader(out); #define SerializeUncompressedFiles \ { \ const uint32_t number_of_uncompressed_files = uncompressed_files.size(); \ WriteUncompressedUnsignedInteger (number_of_uncompressed_files) \ for(PRCUncompressedFileList::const_iterator it = uncompressed_files.begin(); it != uncompressed_files.end(); it++) \ { \ WriteUncompressedUnsignedInteger ((*it)->file_size) \ WriteUncompressedBlock ((*it)->data, (*it)->file_size) \ } \ } #define SerializeModelFileData serializeModelFileData(modelFile_out); modelFile_out.compress(); #define SerializeUnit( value ) (value).serializeUnit(out); using namespace std; void PRCFileStructure::serializeFileStructureGlobals(PRCbitStream &out) { // even though this is technically not part of this section, // it is handled here for convenience const uint32_t number_of_schema = 0; WriteUnsignedInteger (number_of_schema) WriteUnsignedInteger (PRC_TYPE_ASM_FileStructureGlobals) PRCSingleAttribute sa((int32_t)PRCVersion); PRCAttribute a("__PRC_RESERVED_ATTRIBUTE_PRCInternalVersion"); a.addKey(sa); ContentPRCBase cb(PRC_TYPE_ROOT_PRCBase); cb.addAttribute(a); cb.serializeContentPRCBase(out); WriteUnsignedInteger (number_of_referenced_file_structures) // SerializeFileStructureInternalGlobalData WriteDouble (tessellation_chord_height_ratio) WriteDouble (tessellation_angle_degree) // SerializeMarkupSerializationHelper WriteString (default_font_family_name) const uint32_t number_of_fonts = font_keys_of_font.size(); WriteUnsignedInteger (number_of_fonts) for (uint32_t i=0;iunit_information.unit_from_CAD_file = true; product_occurrences[i]->unit_information.unit = unit; SerializeProductOccurrence (product_occurrences[i]) } // SerializeFileStructureInternalData WriteUnsignedInteger (PRC_TYPE_ASM_FileStructure) SerializeEmptyContentPRCBase const uint32_t next_available_index = makePRCID(); WriteUnsignedInteger (next_available_index) const uint32_t index_product_occurence = number_of_product_occurrences; // Asymptote (oPRCFile) specific - we write the root product last WriteUnsignedInteger (index_product_occurence) SerializeUserData } void PRCFileStructure::serializeFileStructureTessellation(PRCbitStream &out) { WriteUnsignedInteger (PRC_TYPE_ASM_FileStructureTessellation) SerializeEmptyContentPRCBase const uint32_t number_of_tessellations = tessellations.size(); WriteUnsignedInteger (number_of_tessellations) for (uint32_t i=0;iserializeBaseTessData(out); SerializeUserData } void PRCFileStructure::serializeFileStructureGeometry(PRCbitStream &out) { WriteUnsignedInteger (PRC_TYPE_ASM_FileStructureGeometry) SerializeEmptyContentPRCBase const uint32_t number_of_contexts = contexts.size(); WriteUnsignedInteger (number_of_contexts) for (uint32_t i=0;ifile_structure_uuid ) // index+1 out << (uint32_t)fileStructures[0]->product_occurrences.size(); // active out << true; out << (uint32_t)0; // index in model file SerializeUserData } void makeFileUUID(PRCUniqueId& UUID) { // make a UUID static uint32_t count = 0; ++count; // the minimum requirement on UUIDs is that all must be unique in the file UUID.id0 = 0x33595341; // some constant UUID.id1 = (uint32_t)time(NULL); // the time UUID.id2 = count; UUID.id3 = 0xa5a55a5a; // Something random, not seeded by the time, would be nice. But for now, a constant // maybe add something else to make it more unique // so multiple files can be combined // a hash of some data perhaps? } void makeAppUUID(PRCUniqueId& UUID) { UUID.id0 = UUID.id1 = UUID.id2 = UUID.id3 = 0; } void PRCUncompressedFile::write(ostream &out) const { if(data!=NULL) { WriteUncompressedUnsignedInteger (file_size) out.write((char*)data,file_size); } } uint32_t PRCUncompressedFile::getSize() const { return sizeof(file_size)+file_size; } void PRCStartHeader::serializeStartHeader(ostream &out) const { WriteUncompressedBlock ("PRC",3) WriteUncompressedUnsignedInteger (minimal_version_for_read) WriteUncompressedUnsignedInteger (authoring_version) SerializeFileStructureUncompressedUniqueId( file_structure_uuid ); SerializeFileStructureUncompressedUniqueId( application_uuid ); } uint32_t PRCStartHeader::getStartHeaderSize() const { return 3+(2+2*4)*sizeof(uint32_t); } void PRCFileStructure::write(ostream &out) { // SerializeFileStructureHeader SerializeStartHeader SerializeUncompressedFiles globals_out.write(out); tree_out.write(out); tessellations_out.write(out); geometry_out.write(out); extraGeometry_out.write(out); } #define SerializeFileStructureGlobals serializeFileStructureGlobals(globals_out); globals_out.compress(); sizes[1]=globals_out.getSize(); #define SerializeFileStructureTree serializeFileStructureTree(tree_out); tree_out.compress(); sizes[2]=tree_out.getSize(); #define SerializeFileStructureTessellation serializeFileStructureTessellation(tessellations_out); tessellations_out.compress(); sizes[3]=tessellations_out.getSize(); #define SerializeFileStructureGeometry serializeFileStructureGeometry(geometry_out); geometry_out.compress(); sizes[4]=geometry_out.getSize(); #define SerializeFileStructureExtraGeometry serializeFileStructureExtraGeometry(extraGeometry_out); extraGeometry_out.compress(); sizes[5]=extraGeometry_out.getSize(); #define FlushSerialization resetGraphicsAndName(); void PRCFileStructure::prepare() { uint32_t size = 0; size += getStartHeaderSize(); size += sizeof(uint32_t); for(PRCUncompressedFileList::const_iterator it = uncompressed_files.begin(); it != uncompressed_files.end(); it++) size += (*it)->getSize(); sizes[0]=size; SerializeFileStructureGlobals FlushSerialization SerializeFileStructureTree FlushSerialization SerializeFileStructureTessellation FlushSerialization SerializeFileStructureGeometry FlushSerialization SerializeFileStructureExtraGeometry FlushSerialization } uint32_t PRCFileStructure::getSize() { uint32_t size = 0; for(size_t i=0; i<6; i++) size += sizes[i]; return size; } void PRCFileStructureInformation::write(ostream &out) { SerializeFileStructureUncompressedUniqueId( UUID ); WriteUncompressedUnsignedInteger (reserved) WriteUncompressedUnsignedInteger (number_of_offsets) for(uint32_t i = 0; i < number_of_offsets; ++i) { WriteUncompressedUnsignedInteger (offsets[i]) } } uint32_t PRCFileStructureInformation::getSize() { return (4+2+number_of_offsets)*sizeof(uint32_t); } void PRCHeader::write(ostream &out) { SerializeStartHeader WriteUncompressedUnsignedInteger (number_of_file_structures) for(uint32_t i = 0; i < number_of_file_structures; ++i) { fileStructureInformation[i].write(out); } WriteUncompressedUnsignedInteger (model_file_offset) WriteUncompressedUnsignedInteger (file_size) SerializeUncompressedFiles } uint32_t PRCHeader::getSize() { uint32_t size = getStartHeaderSize() + sizeof(uint32_t); for(uint32_t i = 0; i < number_of_file_structures; ++i) size += fileStructureInformation[i].getSize(); size += 3*sizeof(uint32_t); for(PRCUncompressedFileList::const_iterator it = uncompressed_files.begin(); it != uncompressed_files.end(); it++) size += (*it)->getSize(); return size; } void oPRCFile::doGroup(PRCgroup& group) { const std::string& name = group.name; PRCProductOccurrence*& product_occurrence = group.product_occurrence; PRCProductOccurrence*& parent_product_occurrence = group.parent_product_occurrence; PRCPartDefinition*& part_definition = group.part_definition; PRCPartDefinition*& parent_part_definition = group.parent_part_definition; if(group.options.tess) { if(!group.lines.empty()) { for(PRCtesslineMap::const_iterator wit=group.lines.begin(); wit!=group.lines.end(); wit++) { bool same_color = true; const PRCtesslineList& lines = wit->second; const PRCRgbColor &color = lines.front().color; for(PRCtesslineList::const_iterator lit=lines.begin(); lit!=lines.end(); lit++) if(color!=lit->color) { same_color = false; break; } map points; PRC3DWireTess *tess = new PRC3DWireTess(); if(!same_color) { tess->is_segment_color = true; tess->is_rgba = false; } for(PRCtesslineList::const_iterator lit=lines.begin(); lit!=lines.end(); lit++) { tess->wire_indexes.push_back(lit->point.size()); for(uint32_t i=0; ipoint.size(); i++) { map::iterator pPoint = points.find(lit->point[i]); if(pPoint!=points.end()) tess->wire_indexes.push_back(pPoint->second); else { const uint32_t point_index = tess->coordinates.size(); points.insert(make_pair(lit->point[i],point_index)); tess->wire_indexes.push_back(point_index); tess->coordinates.push_back(lit->point[i].x); tess->coordinates.push_back(lit->point[i].y); tess->coordinates.push_back(lit->point[i].z); } if(!same_color && i>0) { tess->rgba_vertices.push_back(byte(lit->color.red)); tess->rgba_vertices.push_back(byte(lit->color.green)); tess->rgba_vertices.push_back(byte(lit->color.blue)); } } } const uint32_t tess_index = add3DWireTess(tess); PRCPolyWire *polyWire = new PRCPolyWire(); polyWire->index_tessellation = tess_index; if(same_color) polyWire->index_of_line_style = addColourWidth(RGBAColour(color.red,color.green,color.blue),wit->first); else polyWire->index_of_line_style = addColourWidth(RGBAColour(1,1,1),wit->first); part_definition->addPolyWire(polyWire); } } // make rectangles pairs of triangles in a tesselation if(!group.rectangles.empty()) { bool same_color = true; const uint32_t &style = group.rectangles.front().style; for(PRCtessrectangleList::const_iterator rit=group.rectangles.begin(); rit!=group.rectangles.end(); rit++) if(style!=rit->style) { same_color = false; break; } map points; PRC3DTess *tess = new PRC3DTess(); tess->crease_angle = group.options.crease_angle; PRCTessFace *tessFace = new PRCTessFace(); tessFace->used_entities_flag=PRC_FACETESSDATA_Triangle; uint32_t triangles = 0; for(PRCtessrectangleList::const_iterator rit=group.rectangles.begin(); rit!=group.rectangles.end(); rit++) { const bool degenerate = (rit->vertices[0]==rit->vertices[1]); uint32_t vertex_indices[4]; for(size_t i = (degenerate?1:0); i < 4; ++i) { map::const_iterator pPoint = points.find(rit->vertices[i]); if(pPoint!=points.end()) vertex_indices[i] = pPoint->second; else { points.insert(make_pair(rit->vertices[i],(vertex_indices[i] = tess->coordinates.size()))); tess->coordinates.push_back(rit->vertices[i].x); tess->coordinates.push_back(rit->vertices[i].y); tess->coordinates.push_back(rit->vertices[i].z); } } if(degenerate) { tess->triangulated_index.push_back(vertex_indices[1]); tess->triangulated_index.push_back(vertex_indices[2]); tess->triangulated_index.push_back(vertex_indices[3]); triangles++; if(!same_color) tessFace->line_attributes.push_back(rit->style); } else { tess->triangulated_index.push_back(vertex_indices[0]); tess->triangulated_index.push_back(vertex_indices[2]); tess->triangulated_index.push_back(vertex_indices[3]); triangles++; if(!same_color) tessFace->line_attributes.push_back(rit->style); tess->triangulated_index.push_back(vertex_indices[3]); tess->triangulated_index.push_back(vertex_indices[1]); tess->triangulated_index.push_back(vertex_indices[0]); triangles++; if(!same_color) tessFace->line_attributes.push_back(rit->style); } } tessFace->sizes_triangulated.push_back(triangles); tess->addTessFace(tessFace); const uint32_t tess_index = add3DTess(tess); PRCPolyBrepModel *polyBrepModel = new PRCPolyBrepModel(); polyBrepModel->index_tessellation = tess_index; polyBrepModel->is_closed = group.options.closed; if(same_color) polyBrepModel->index_of_line_style = style; part_definition->addPolyBrepModel(polyBrepModel); } } if(!group.quads.empty()) { map points; PRC3DTess *tess = new PRC3DTess(); tess->crease_angle = group.options.crease_angle; PRCTessFace *tessFace = new PRCTessFace(); tessFace->used_entities_flag=PRC_FACETESSDATA_Triangle; uint32_t triangles = 0; tessFace->is_rgba = false; for(PRCtessquadList::const_iterator qit=group.quads.begin(); qit!=group.quads.end(); qit++) { const RGBAColour* C = qit->colours; if(C[0].A != 1.0 || C[1].A != 1.0 || C[2].A != 1.0 || C[3].A != 1.0) { tessFace->is_rgba = true; break; } } bool same_colour = true; const RGBAColour& colour = group.quads.front().colours[0]; for(PRCtessquadList::const_iterator qit=group.quads.begin(); qit!=group.quads.end(); qit++) { const RGBAColour* C = qit->colours; if(colour!=C[0] || colour!=C[1] || colour!=C[2] || colour!=C[3]) { same_colour = false; break; } } for(PRCtessquadList::const_iterator qit=group.quads.begin(); qit!=group.quads.end(); qit++) { const RGBAColour* C = qit->colours; const bool degenerate = (qit->vertices[0]==qit->vertices[1]); uint32_t vertex_indices[4]; for(size_t i = (degenerate?1:0); i < 4; ++i) { map::const_iterator pPoint = points.find(qit->vertices[i]); if(pPoint!=points.end()) vertex_indices[i] = pPoint->second; else { points.insert(make_pair(qit->vertices[i],(vertex_indices[i] = tess->coordinates.size()))); tess->coordinates.push_back(qit->vertices[i].x); tess->coordinates.push_back(qit->vertices[i].y); tess->coordinates.push_back(qit->vertices[i].z); } } if(degenerate) { tess->triangulated_index.push_back(vertex_indices[1]); tess->triangulated_index.push_back(vertex_indices[2]); tess->triangulated_index.push_back(vertex_indices[3]); triangles++; if(!same_colour) { tessFace->rgba_vertices.push_back(byte(C[1].R)); tessFace->rgba_vertices.push_back(byte(C[1].G)); tessFace->rgba_vertices.push_back(byte(C[1].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[1].A)); tessFace->rgba_vertices.push_back(byte(C[2].R)); tessFace->rgba_vertices.push_back(byte(C[2].G)); tessFace->rgba_vertices.push_back(byte(C[2].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[2].A)); tessFace->rgba_vertices.push_back(byte(C[3].R)); tessFace->rgba_vertices.push_back(byte(C[3].G)); tessFace->rgba_vertices.push_back(byte(C[3].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[3].A)); } } else { tess->triangulated_index.push_back(vertex_indices[0]); tess->triangulated_index.push_back(vertex_indices[2]); tess->triangulated_index.push_back(vertex_indices[3]); triangles++; if(!same_colour) { tessFace->rgba_vertices.push_back(byte(C[0].R)); tessFace->rgba_vertices.push_back(byte(C[0].G)); tessFace->rgba_vertices.push_back(byte(C[0].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[0].A)); tessFace->rgba_vertices.push_back(byte(C[2].R)); tessFace->rgba_vertices.push_back(byte(C[2].G)); tessFace->rgba_vertices.push_back(byte(C[2].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[2].A)); tessFace->rgba_vertices.push_back(byte(C[3].R)); tessFace->rgba_vertices.push_back(byte(C[3].G)); tessFace->rgba_vertices.push_back(byte(C[3].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[3].A)); } tess->triangulated_index.push_back(vertex_indices[3]); tess->triangulated_index.push_back(vertex_indices[1]); tess->triangulated_index.push_back(vertex_indices[0]); triangles++; if(!same_colour) { tessFace->rgba_vertices.push_back(byte(C[3].R)); tessFace->rgba_vertices.push_back(byte(C[3].G)); tessFace->rgba_vertices.push_back(byte(C[3].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[3].A)); tessFace->rgba_vertices.push_back(byte(C[1].R)); tessFace->rgba_vertices.push_back(byte(C[1].G)); tessFace->rgba_vertices.push_back(byte(C[1].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[1].A)); tessFace->rgba_vertices.push_back(byte(C[0].R)); tessFace->rgba_vertices.push_back(byte(C[0].G)); tessFace->rgba_vertices.push_back(byte(C[0].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[0].A)); } } } tessFace->sizes_triangulated.push_back(triangles); tess->addTessFace(tessFace); const uint32_t tess_index = add3DTess(tess); PRCPolyBrepModel *polyBrepModel = new PRCPolyBrepModel(); polyBrepModel->index_tessellation = tess_index; polyBrepModel->is_closed = group.options.closed; if(same_colour) polyBrepModel->index_of_line_style = addColour(colour); part_definition->addPolyBrepModel(polyBrepModel); } if(!group.points.empty()) { for(PRCpointsetMap::const_iterator pit=group.points.begin(); pit!=group.points.end(); pit++) { PRCPointSet *pointset = new PRCPointSet(); pointset->index_of_line_style = pit->first; pointset->point = pit->second; part_definition->addPointSet(pointset); } } if(!group.pointsets.empty()) { for(std::vector::iterator pit=group.pointsets.begin(); pit!=group.pointsets.end(); pit++) { part_definition->addPointSet(*pit); } } if(!group.polymodels.empty()) { for(std::vector::iterator pit=group.polymodels.begin(); pit!=group.polymodels.end(); pit++) { (*pit)->is_closed = group.options.closed; part_definition->addPolyBrepModel(*pit); } } if(!group.polywires.empty()) { for(std::vector::iterator pit=group.polywires.begin(); pit!=group.polywires.end(); pit++) { part_definition->addPolyWire(*pit); } } if(!group.wires.empty()) { PRCTopoContext *wireContext = NULL; const uint32_t context_index = getTopoContext(wireContext); for(PRCwireList::iterator wit=group.wires.begin(); wit!=group.wires.end(); wit++) { PRCWireEdge *wireEdge = new PRCWireEdge; wireEdge->curve_3d = wit->curve; PRCSingleWireBody *wireBody = new PRCSingleWireBody; wireBody->setWireEdge(wireEdge); const uint32_t wire_body_index = wireContext->addSingleWireBody(wireBody); PRCWire *wire = new PRCWire(); wire->index_of_line_style = wit->style; wire->context_id = context_index; wire->body_id = wire_body_index; if(wit->transform) wire->index_local_coordinate_system = addTransform(wit->transform); part_definition->addWire(wire); } } PRCfaceList &faces = group.faces; if(!faces.empty()) { bool same_color = true; const uint32_t style = faces.front().style; for(PRCfaceList::const_iterator fit=faces.begin(); fit!=faces.end(); fit++) if(style!=fit->style) { same_color = false; break; } PRCTopoContext *context = NULL; const uint32_t context_index = getTopoContext(context); context->granularity = group.options.granularity; // Acrobat 9 also does the following: // context->tolerance = group.options.granularity; // context->have_smallest_face_thickness = true; // context->smallest_thickness = group.options.granularity; PRCShell *shell = new PRCShell; for(PRCfaceList::iterator fit=faces.begin(); fit!=faces.end(); fit++) { if(fit->transform || group.options.do_break || (fit->transparent && !group.options.no_break)) { PRCShell *shell = new PRCShell; shell->addFace(fit->face); PRCConnex *connex = new PRCConnex; connex->addShell(shell); PRCBrepData *body = new PRCBrepData; body->addConnex(connex); const uint32_t body_index = context->addBrepData(body); PRCBrepModel *brepmodel = new PRCBrepModel(); brepmodel->index_of_line_style = fit->style; brepmodel->context_id = context_index; brepmodel->body_id = body_index; brepmodel->is_closed = group.options.closed; brepmodel->index_local_coordinate_system = addTransform(fit->transform); part_definition->addBrepModel(brepmodel); } else { if(!same_color) fit->face->index_of_line_style = fit->style; shell->addFace(fit->face); } } if(shell->face.empty()) { delete shell; } else { PRCConnex *connex = new PRCConnex; connex->addShell(shell); PRCBrepData *body = new PRCBrepData; body->addConnex(connex); const uint32_t body_index = context->addBrepData(body); PRCBrepModel *brepmodel = new PRCBrepModel(); if(same_color) brepmodel->index_of_line_style = style; brepmodel->context_id = context_index; brepmodel->body_id = body_index; brepmodel->is_closed = group.options.closed; part_definition->addBrepModel(brepmodel); } } PRCcompfaceList &compfaces = group.compfaces; if(!compfaces.empty()) { bool same_color = true; const uint32_t style = compfaces.front().style; for(PRCcompfaceList::const_iterator fit=compfaces.begin(); fit!=compfaces.end(); fit++) if(style!=fit->style) { same_color = false; break; } PRCTopoContext *context = NULL; const uint32_t context_index = getTopoContext(context); PRCCompressedBrepData *body = new PRCCompressedBrepData; body->serial_tolerance=group.options.compression; body->brep_data_compressed_tolerance=0.1*group.options.compression; for(PRCcompfaceList::const_iterator fit=compfaces.begin(); fit!=compfaces.end(); fit++) { if(group.options.do_break || (fit->transparent && !group.options.no_break)) { PRCCompressedBrepData *body = new PRCCompressedBrepData; body->face.push_back(fit->face); body->serial_tolerance=group.options.compression; body->brep_data_compressed_tolerance=2.8346456* group.options.compression; const uint32_t body_index = context->addCompressedBrepData(body); PRCBrepModel *brepmodel = new PRCBrepModel(); brepmodel->index_of_line_style = fit->style; brepmodel->context_id = context_index; brepmodel->body_id = body_index; brepmodel->is_closed = group.options.closed; part_definition->addBrepModel(brepmodel); } else { if(!same_color) fit->face->index_of_line_style = fit->style; body->face.push_back(fit->face); } } if(body->face.empty()) { delete body; } else { const uint32_t body_index = context->addCompressedBrepData(body); PRCBrepModel *brepmodel = new PRCBrepModel(); if(same_color) brepmodel->index_of_line_style = style; brepmodel->context_id = context_index; brepmodel->body_id = body_index; brepmodel->is_closed = group.options.closed; part_definition->addBrepModel(brepmodel); } } // Simplify and reduce to as simple entities as possible // products with named representation items can not be reduced to sets, since // outside references are already set bool nonamedparts = true; for(PRCRepresentationItemList::const_iterator it=part_definition->representation_item.begin(); it!=part_definition->representation_item.end(); it++) { if (!(*it)->name.empty()) { nonamedparts = false; break; } } lastgroupname.clear(); lastgroupnames.clear(); // First option - reduce to one element in parent if (parent_part_definition && product_occurrence->index_son_occurrence.empty() && part_definition->representation_item.size() == 1 && ( name.empty() || part_definition->representation_item.front()->name.empty() ) && ( !group.transform || part_definition->representation_item.front()->index_local_coordinate_system==m1) ) { if(part_definition->representation_item.front()->name.empty() ) part_definition->representation_item.front()->name = name; if(part_definition->representation_item.front()->index_local_coordinate_system==m1) part_definition->representation_item.front()->index_local_coordinate_system = addTransform(group.transform); lastgroupname = calculate_unique_name(part_definition->representation_item.front(), parent_product_occurrence); parent_part_definition->addRepresentationItem(part_definition->representation_item.front()); part_definition->representation_item.clear(); delete product_occurrence; product_occurrence = NULL; delete part_definition; part_definition = NULL; } // Second option - reduce to a set else if (parent_part_definition && product_occurrence->index_son_occurrence.empty() && !part_definition->representation_item.empty() && !group.options.do_break && nonamedparts) { PRCSet *set = new PRCSet(name); set->index_local_coordinate_system = addTransform(group.transform); lastgroupname = calculate_unique_name(set, parent_product_occurrence); for(PRCRepresentationItemList::iterator it=part_definition->representation_item.begin(); it!=part_definition->representation_item.end(); it++) { lastgroupnames.push_back(calculate_unique_name(*it, parent_product_occurrence)); set->addRepresentationItem(*it); } part_definition->representation_item.clear(); parent_part_definition->addSet(set); delete product_occurrence; product_occurrence = NULL; delete part_definition; part_definition = NULL; } // Third option - create product else if ( !product_occurrence->index_son_occurrence.empty() || !part_definition->representation_item.empty()) { // if everything is enclosed in one group - drop the root group if (parent_product_occurrence == NULL && group.transform == NULL && part_definition->representation_item.empty() && product_occurrence->index_son_occurrence.size()==1) { delete part_definition; part_definition = NULL; delete product_occurrence; product_occurrence = NULL; } else { lastgroupname = calculate_unique_name(product_occurrence, NULL); if (part_definition->representation_item.empty()) { delete part_definition; part_definition = NULL; } else { for(PRCRepresentationItemList::const_iterator it=part_definition->representation_item.begin(); it!=part_definition->representation_item.end(); it++) if ((*it)->name.empty()) lastgroupnames.push_back(calculate_unique_name(*it, product_occurrence)); product_occurrence->index_part = addPartDefinition(part_definition); } if (group.transform) { product_occurrence->location = group.transform; group.transform = NULL; } if (parent_product_occurrence) { parent_product_occurrence->index_son_occurrence.push_back(addProductOccurrence(product_occurrence)); } else { addProductOccurrence(product_occurrence); } } } // Last case - absolutely nothing to do else { delete product_occurrence; product_occurrence = NULL; delete part_definition; part_definition = NULL; } } std::string oPRCFile::calculate_unique_name(const ContentPRCBase *prc_entity,const ContentPRCBase *prc_occurence) { std::stringstream ss (std::stringstream::in | std::stringstream::out); uint8_t *serialization_buffer = NULL; PRCbitStream serialization(serialization_buffer,0u); const PRCFileStructure *pfile_structure = fileStructures[0]; const PRCUniqueId& uuid = pfile_structure->file_structure_uuid; // ConvertUniqueIdentifierToString (prc_entity) // SerializeCompressedUniqueId (file_structure) serialization << uuid.id0 << uuid.id1 << uuid.id2 << uuid.id3; // WriteUnsignedInteger (type) serialization << prc_entity->getType(); // WriteUnsignedInteger (unique_identifier) serialization << prc_entity->getPRCID(); if (prc_occurence) { // serialization_buffer = Flush serialization (serialization) { const uint32_t size_serialization = serialization.getSize(); while(size_serialization == serialization.getSize()) serialization << false; } // ConvertUniqueIdentifierToString (prc_occurrence_unique_id) // SerializeCompressedUniqueId (file_structure) serialization << uuid.id0 << uuid.id1 << uuid.id2 << uuid.id3; // WriteUnsignedInteger (type) serialization << (uint32_t)PRC_TYPE_ASM_ProductOccurence; // WriteUnsignedInteger (unique_identifier) serialization << prc_occurence->getPRCID(); } ss << (prc_entity->name.empty()?"node":prc_entity->name) << '.'; const uint32_t size_serialization = serialization.getSize(); for(size_t j=0; jprepare(); SerializeModelFileData // create the header // fill out enough info so that sizes can be computed correctly header.number_of_file_structures = number_of_file_structures; header.fileStructureInformation = new PRCFileStructureInformation[number_of_file_structures]; for(uint32_t i = 0; i < number_of_file_structures; ++i) { header.fileStructureInformation[i].UUID = fileStructures[i]->file_structure_uuid; header.fileStructureInformation[i].reserved = 0; header.fileStructureInformation[i].number_of_offsets = 6; header.fileStructureInformation[i].offsets = new uint32_t[6]; } header.minimal_version_for_read = PRCVersion; header.authoring_version = PRCVersion; makeFileUUID(header.file_structure_uuid); makeAppUUID(header.application_uuid); header.file_size = getSize(); header.model_file_offset = header.file_size - modelFile_out.getSize(); uint32_t currentOffset = header.getSize(); for(uint32_t i = 0; i < number_of_file_structures; ++i) { for(size_t j=0; j<6; j++) { header.fileStructureInformation[i].offsets[j] = currentOffset; currentOffset += fileStructures[i]->sizes[j]; } } // write the data header.write(output); for(uint32_t i = 0; i < number_of_file_structures; ++i) { fileStructures[i]->write(output); } modelFile_out.write(output); output.flush(); for(uint32_t i = 0; i < number_of_file_structures; ++i) delete[] header.fileStructureInformation[i].offsets; delete[] header.fileStructureInformation; return true; } uint32_t oPRCFile::getSize() { uint32_t size = header.getSize(); for(uint32_t i = 0; i < number_of_file_structures; ++i) { size += fileStructures[i]->getSize(); } size += modelFile_out.getSize(); return size; } uint32_t PRCFileStructure::addPicture(EPRCPictureDataFormat format, uint32_t size, const uint8_t *p, uint32_t width, uint32_t height, std::string name) { uint8_t *data = NULL; uint32_t components=0; PRCPicture picture(name); if(size==0 || p==NULL) { cerr << "image not set" << endl; return m1; } PRCUncompressedFile* uncompressed_file = new PRCUncompressedFile; if(format==KEPRCPicture_PNG || format==KEPRCPicture_JPG) { data = new uint8_t[size]; memcpy(data, p, size); uncompressed_files.push_back(uncompressed_file); uncompressed_files.back()->file_size = size; uncompressed_files.back()->data = data; picture.format = format; picture.uncompressed_file_index = uncompressed_files.size()-1; picture.pixel_width = 0; // width and height are ignored for JPG and PNG pictures - but let us keep things clean picture.pixel_height = 0; pictures.push_back(picture); return pictures.size()-1; } switch(format) { case KEPRCPicture_BITMAP_RGB_BYTE: components = 3; break; case KEPRCPicture_BITMAP_RGBA_BYTE: components = 4; break; case KEPRCPicture_BITMAP_GREY_BYTE: components = 1; break; case KEPRCPicture_BITMAP_GREYA_BYTE: components = 2; break; default: { cerr << "unknown picture format" << endl; return m1; } } if(width==0 || height==0) { cerr << "width or height parameter not set" << endl; return m1; } if (size < width*height*components) { cerr << "image too small" << endl; return m1; } { uint32_t compressedDataSize = 0; const int CHUNK= 1024; // is this reasonable? z_stream strm; strm.zalloc = Z_NULL; strm.zfree = Z_NULL; strm.opaque = Z_NULL; if(deflateInit(&strm,Z_DEFAULT_COMPRESSION) != Z_OK) { cerr << "Compression initialization failed" << endl; return m1; } unsigned int sizeAvailable = deflateBound(&strm,size); uint8_t *compressedData = (uint8_t*) malloc(sizeAvailable); strm.avail_in = size; strm.next_in = (unsigned char*)p; strm.next_out = (unsigned char*)compressedData; strm.avail_out = sizeAvailable; int code; unsigned int chunks = 0; while((code = deflate(&strm,Z_FINISH)) == Z_OK) { ++chunks; // strm.avail_out should be 0 if we got Z_OK compressedDataSize = sizeAvailable - strm.avail_out; compressedData = (uint8_t*) realloc(compressedData,CHUNK*chunks); strm.next_out = (Bytef*)(compressedData + compressedDataSize); strm.avail_out += CHUNK; sizeAvailable += CHUNK; } compressedDataSize = sizeAvailable-strm.avail_out; if(code != Z_STREAM_END) { deflateEnd(&strm); free(compressedData); { cerr << "Compression error" << endl; return m1; } } deflateEnd(&strm); size = compressedDataSize; data = new uint8_t[compressedDataSize]; memcpy(data, compressedData, compressedDataSize); free(compressedData); } uncompressed_files.push_back(uncompressed_file); uncompressed_files.back()->file_size = size; uncompressed_files.back()->data = data; picture.format = format; picture.uncompressed_file_index = uncompressed_files.size()-1; picture.pixel_width = width; picture.pixel_height = height; pictures.push_back(picture); return pictures.size()-1; } uint32_t PRCFileStructure::addTextureDefinition(PRCTextureDefinition*& pTextureDefinition) { texture_definitions.push_back(pTextureDefinition); pTextureDefinition = NULL; return texture_definitions.size()-1; } uint32_t PRCFileStructure::addRgbColor(const PRCRgbColor &color) { colors.push_back(color); return 3*(colors.size()-1); } uint32_t PRCFileStructure::addRgbColorUnique(const PRCRgbColor &color) { for(uint32_t i = 0; i < colors.size(); ++i) { if(colors[i] == color) return 3*i; } colors.push_back(color); return 3*(colors.size()-1); } uint32_t oPRCFile::addColor(const PRCRgbColor &color) { PRCcolorMap::const_iterator pColor = colorMap.find(color); if(pColor!=colorMap.end()) return pColor->second; // color_index = addRgbColorUnique(color); const uint32_t color_index = fileStructures[0]->addRgbColor(color); colorMap.insert(make_pair(color,color_index)); return color_index; } uint32_t oPRCFile::addColour(const RGBAColour &colour) { PRCcolourMap::const_iterator pColour = colourMap.find(colour); if(pColour!=colourMap.end()) return pColour->second; const uint32_t color_index = addColor(PRCRgbColor(colour.R, colour.G, colour.B)); PRCStyle *style = new PRCStyle(); style->line_width = 1.0; style->is_vpicture = false; style->line_pattern_vpicture_index = 0; style->is_material = false; style->color_material_index = color_index; style->is_transparency_defined = (colour.A < 1.0); style->transparency = (uint8_t)(colour.A * 256); style->additional = 0; const uint32_t style_index = fileStructures[0]->addStyle(style); colourMap.insert(make_pair(colour,style_index)); return style_index; } uint32_t oPRCFile::addColourWidth(const RGBAColour &colour, double width) { RGBAColourWidth colourwidth(colour.R, colour.G, colour.B, colour.A, width); PRCcolourwidthMap::const_iterator pColour = colourwidthMap.find(colourwidth); if(pColour!=colourwidthMap.end()) return pColour->second; const uint32_t color_index = addColor(PRCRgbColor(colour.R, colour.G, colour.B)); PRCStyle *style = new PRCStyle(); style->line_width = width; style->is_vpicture = false; style->line_pattern_vpicture_index = 0; style->is_material = false; style->color_material_index = color_index; style->is_transparency_defined = (colour.A < 1.0); style->transparency = (uint8_t)(colour.A * 256); style->additional = 0; const uint32_t style_index = fileStructures[0]->addStyle(style); colourwidthMap.insert(make_pair(colourwidth,style_index)); return style_index; } uint32_t oPRCFile::addTransform(PRCGeneralTransformation3d*& transform) { if(!transform) return m1; PRCtransformMap::const_iterator pTransform = transformMap.find(*transform); if(pTransform!=transformMap.end()) return pTransform->second; PRCCoordinateSystem *coordinateSystem = new PRCCoordinateSystem(); bool transform_replaced = false; if( transform->M(0,1)==0 && transform->M(0,2)==0 && transform->M(1,0)==0 && transform->M(1,2)==0 && transform->M(2,0)==0 && transform->M(2,1)==0 && transform->M(3,0)==0 && transform->M(3,1)==0 && transform->M(3,2)==0 && transform->M(3,3)==1 ) { transform_replaced = true; PRCCartesianTransformation3d *carttransform = new PRCCartesianTransformation3d; // if(transform->M(0,3)==0 && transform->M(1,3)==0 && transform->M(1,3)==0 && // transform->M(0,0)==1 && transform->M(1,1)==1 && transform->M(2,2)==1 ) // carttransform->behaviour = PRC_TRANSFORMATION_Identity; if(transform->M(0,3)!=0 || transform->M(1,3)!=0 || transform->M(2,3)!=0) { carttransform->behaviour |= PRC_TRANSFORMATION_Translate; carttransform->origin.Set(transform->M(0,3),transform->M(1,3),transform->M(2,3)); } if(transform->M(0,0)!=transform->M(1,1) || transform->M(0,0)!=transform->M(2,2)) { carttransform->behaviour |= PRC_TRANSFORMATION_NonUniformScale; carttransform->scale.Set(transform->M(0,0),transform->M(1,1),transform->M(2,2)); } else if(transform->M(0,0)!=1) { carttransform->behaviour |= PRC_TRANSFORMATION_Scale; carttransform->uniform_scale=transform->M(0,0); } coordinateSystem->axis_set = carttransform; } else coordinateSystem->axis_set = transform; const uint32_t coordinate_system_index = fileStructures[0]->addCoordinateSystem(coordinateSystem); transformMap.insert(make_pair(*transform,coordinate_system_index)); if(transform_replaced) delete transform; transform = NULL; return coordinate_system_index; } uint32_t oPRCFile::addTransform(const double* t) { if(!t) return m1; PRCGeneralTransformation3d* transform = new PRCGeneralTransformation3d(t); return addTransform(transform); } uint32_t oPRCFile::addTransform(const double origin[3], const double x_axis[3], const double y_axis[3], double scale) { PRCCartesianTransformation3d* transform = new PRCCartesianTransformation3d(origin, x_axis, y_axis, scale); if(transform->behaviour==PRC_TRANSFORMATION_Identity) return m1; PRCCoordinateSystem *coordinateSystem = new PRCCoordinateSystem(); coordinateSystem->axis_set = transform; const uint32_t coordinate_system_index = fileStructures[0]->addCoordinateSystem(coordinateSystem); return coordinate_system_index; } uint32_t oPRCFile::addMaterial(const PRCmaterial& m) { uint32_t material_index = m1; const PRCmaterialgeneric materialgeneric(m); PRCmaterialgenericMap::const_iterator pMaterialgeneric = materialgenericMap.find(materialgeneric); if(pMaterialgeneric!=materialgenericMap.end()) material_index = pMaterialgeneric->second; else { PRCMaterialGeneric *materialGeneric = new PRCMaterialGeneric(); const PRCRgbColor ambient(m.ambient.R, m.ambient.G, m.ambient.B); materialGeneric->ambient = addColor(ambient); const PRCRgbColor diffuse(m.diffuse.R, m.diffuse.G, m.diffuse.B); materialGeneric->diffuse = addColor(diffuse); const PRCRgbColor emissive(m.emissive.R, m.emissive.G, m.emissive.B); materialGeneric->emissive = addColor(emissive); const PRCRgbColor specular(m.specular.R, m.specular.G, m.specular.B); materialGeneric->specular = addColor(specular); materialGeneric->shininess = m.shininess; materialGeneric->ambient_alpha = m.ambient.A; materialGeneric->diffuse_alpha = m.diffuse.A; materialGeneric->emissive_alpha = m.emissive.A; materialGeneric->specular_alpha = m.specular.A; material_index = addMaterialGeneric(materialGeneric); materialgenericMap.insert(make_pair(materialgeneric,material_index)); } uint32_t color_material_index = m1; if(m.picture_data!=NULL) { uint32_t picture_index = m1; PRCpicture picture(m); PRCpictureMap::const_iterator pPicture = pictureMap.find(picture); if(pPicture!=pictureMap.end()) picture_index = pPicture->second; else { picture_index = addPicture(picture); uint8_t* data = new uint8_t[picture.size]; memcpy(data,picture.data,picture.size); picture.data = data; pictureMap.insert(make_pair(picture,picture_index)); } uint32_t texture_definition_index = m1; PRCtexturedefinition texturedefinition(picture_index, m); PRCtexturedefinitionMap::const_iterator pTexturedefinition = texturedefinitionMap.find(texturedefinition); if(pTexturedefinition!=texturedefinitionMap.end()) texture_definition_index = pTexturedefinition->second; else { PRCTextureDefinition *TextureDefinition = new PRCTextureDefinition; if (m.picture_size==216688 && m.picture_format==KEPRCPicture_JPG) TextureDefinition->texture_mapping_attribute=PRC_TEXTURE_MAPPING_OPACITY; TextureDefinition->picture_index = picture_index; TextureDefinition->texture_function = m.picture_replace ? KEPRCTextureFunction_Replace : KEPRCTextureFunction_Modulate; TextureDefinition->texture_wrapping_mode_S = m.picture_repeat ? KEPRCTextureWrappingMode_Repeat : KEPRCTextureWrappingMode_ClampToEdge; TextureDefinition->texture_wrapping_mode_T = m.picture_repeat ? KEPRCTextureWrappingMode_Repeat : KEPRCTextureWrappingMode_ClampToEdge; TextureDefinition->texture_mapping_attribute_components = (m.picture_format==KEPRCPicture_BITMAP_RGB_BYTE || m.picture_format==KEPRCPicture_JPG) ? PRC_TEXTURE_MAPPING_COMPONENTS_RGB : PRC_TEXTURE_MAPPING_COMPONENTS_RGBA; texture_definition_index = addTextureDefinition(TextureDefinition); texturedefinitionMap.insert(make_pair(texturedefinition,texture_definition_index)); } uint32_t texture_application_index = m1; const PRCtextureapplication textureapplication(material_index, texture_definition_index); PRCtextureapplicationMap::const_iterator pTextureapplication = textureapplicationMap.find(textureapplication); if(pTextureapplication!=textureapplicationMap.end()) texture_application_index = pTextureapplication->second; else { PRCTextureApplication *TextureApplication = new PRCTextureApplication; TextureApplication->material_generic_index = material_index; TextureApplication->texture_definition_index = texture_definition_index; texture_application_index = addTextureApplication(TextureApplication); textureapplicationMap.insert(make_pair(textureapplication,texture_application_index)); } color_material_index = texture_application_index; } else color_material_index = material_index; uint32_t style_index = m1; PRCstyle style(0,m.alpha,true,color_material_index); PRCstyleMap::const_iterator pStyle = styleMap.find(style); if(pStyle!=styleMap.end()) style_index = pStyle->second; else { PRCStyle *Style = new PRCStyle(); Style->line_width = 0.0; Style->is_vpicture = false; Style->line_pattern_vpicture_index = 0; Style->is_material = true; Style->is_transparency_defined = (m.alpha < 1.0); Style->transparency = (uint8_t)(m.alpha * 256); Style->additional = 0; Style->color_material_index = color_material_index; style_index = addStyle(Style); styleMap.insert(make_pair(style,style_index)); } // materialMap.insert(make_pair(material,style_index)); return style_index; } void oPRCFile::begingroup(const char *name, PRCoptions *options, const double* t) { const PRCgroup &parent_group = groups.top(); groups.push(PRCgroup()); PRCgroup &group = groups.top(); group.name=name; if(options) group.options=*options; if(t&&!isid(t)) group.transform = new PRCGeneralTransformation3d(t); group.product_occurrence = new PRCProductOccurrence(name); group.parent_product_occurrence = parent_group.product_occurrence; group.part_definition = new PRCPartDefinition; group.parent_part_definition = parent_group.part_definition; } void oPRCFile::endgroup() { if(groups.size()<2) { fputs("begingroup without matching endgroup",stderr); exit(1); } doGroup(groups.top()); groups.pop(); // std::cout << lastgroupname << std::endl; // for(std::vector::const_iterator it=lastgroupnames.begin(); it!=lastgroupnames.end(); it++) // std::cout << " " << *it << std::endl; } PRCgroup& oPRCFile::findGroup() { return groups.top(); } void oPRCFile::addPoints(uint32_t n, const double P[][3], const RGBAColour &c, double w) { if(n==0 || P==NULL) return; PRCgroup &group = findGroup(); PRCPointSet *pointset = new PRCPointSet(); group.pointsets.push_back(pointset); pointset->index_of_line_style = addColourWidth(c,w); pointset->point.reserve(n); for(uint32_t i=0; ipoint.push_back(PRCVector3d(P[i][0],P[i][1],P[i][2])); } void oPRCFile::useMesh(uint32_t tess_index, uint32_t style_index, const double origin[3], const double x_axis[3], const double y_axis[3], double scale) { PRCgroup &group = findGroup(); PRCPolyBrepModel *polyBrepModel = new PRCPolyBrepModel(); polyBrepModel->index_local_coordinate_system = addTransform(origin, x_axis, y_axis, scale); polyBrepModel->index_tessellation = tess_index; polyBrepModel->is_closed = group.options.closed; polyBrepModel->index_of_line_style = style_index; group.polymodels.push_back(polyBrepModel); } void oPRCFile::useMesh(uint32_t tess_index, uint32_t style_index, const double* t) { PRCgroup &group = findGroup(); PRCPolyBrepModel *polyBrepModel = new PRCPolyBrepModel(); polyBrepModel->index_local_coordinate_system = addTransform(t); polyBrepModel->index_tessellation = tess_index; polyBrepModel->is_closed = group.options.closed; polyBrepModel->index_of_line_style = style_index; group.polymodels.push_back(polyBrepModel); } void oPRCFile::useLines(uint32_t tess_index, uint32_t style_index, const double origin[3], const double x_axis[3], const double y_axis[3], double scale) { PRCgroup &group = findGroup(); PRCPolyWire *polyWire = new PRCPolyWire(); polyWire->index_local_coordinate_system = addTransform(origin, x_axis, y_axis, scale); polyWire->index_tessellation = tess_index; polyWire->index_of_line_style = style_index; group.polywires.push_back(polyWire); } void oPRCFile::useLines(uint32_t tess_index, uint32_t style_index, const double* t) { PRCgroup &group = findGroup(); PRCPolyWire *polyWire = new PRCPolyWire(); polyWire->index_local_coordinate_system = addTransform(t); polyWire->index_tessellation = tess_index; polyWire->index_of_line_style = style_index; group.polywires.push_back(polyWire); } void oPRCFile::addQuads(uint32_t nP, const double P[][3], uint32_t nI, const uint32_t PI[][4], const PRCmaterial &m, uint32_t nN, const double N[][3], const uint32_t NI[][4], uint32_t nT, const double T[][2], const uint32_t TI[][4], uint32_t nC, const RGBAColour C[], const uint32_t CI[][4], uint32_t nM, const PRCmaterial M[], const uint32_t MI[], double ca) { if(nP==0 || P==NULL || nI==0 || PI==NULL) return; const uint32_t tess_index = createQuadMesh(nP, P, nI, PI, m, nN, N, NI, nT, T, TI, nC, C, CI, nM, M, MI, ca); useMesh(tess_index,m1); } uint32_t oPRCFile::createQuadMesh(uint32_t nP, const double P[][3], uint32_t nI, const uint32_t PI[][4], uint32_t style_index, uint32_t nN, const double N[][3], const uint32_t NI[][4], uint32_t nT, const double T[][2], const uint32_t TI[][4], uint32_t nC, const RGBAColour C[], const uint32_t CI[][4], uint32_t nS, const uint32_t S[], const uint32_t SI[], double ca) { if(nP==0 || P==NULL || nI==0 || PI==NULL) return m1; const bool triangle_color = (nS != 0 && S != NULL && SI != NULL); const bool vertex_color = (nC != 0 && C != NULL && CI != NULL); const bool has_normals = (nN != 0 && N != NULL && NI != NULL); const bool textured = (nT != 0 && T != NULL && TI != NULL); PRC3DTess *tess = new PRC3DTess(); PRCTessFace *tessFace = new PRCTessFace(); tessFace->used_entities_flag = textured ? PRC_FACETESSDATA_TriangleTextured : PRC_FACETESSDATA_Triangle; tessFace->number_of_texture_coordinate_indexes = textured ? 1 : 0; tess->coordinates.reserve(3*nP); for(uint32_t i=0; icoordinates.push_back(P[i][0]); tess->coordinates.push_back(P[i][1]); tess->coordinates.push_back(P[i][2]); } if(has_normals) { tess->normal_coordinate.reserve(3*nN); for(uint32_t i=0; inormal_coordinate.push_back(N[i][0]); tess->normal_coordinate.push_back(N[i][1]); tess->normal_coordinate.push_back(N[i][2]); } } else tess->crease_angle = ca; if(textured) { tess->texture_coordinate.reserve(2*nT); for(uint32_t i=0; itexture_coordinate.push_back(T[i][0]); tess->texture_coordinate.push_back(T[i][1]); } } tess->triangulated_index.reserve(2*(3*nI+(has_normals?3:0)*nI+(textured?3:0)*nI)); for(uint32_t i=0; itriangulated_index.push_back(3*NI[i][0]); if(textured) tess->triangulated_index.push_back(2*TI[i][0]); tess->triangulated_index.push_back(3*PI[i][0]); if(has_normals) tess->triangulated_index.push_back(3*NI[i][1]); if(textured) tess->triangulated_index.push_back(2*TI[i][1]); tess->triangulated_index.push_back(3*PI[i][1]); if(has_normals) tess->triangulated_index.push_back(3*NI[i][3]); if(textured) tess->triangulated_index.push_back(2*TI[i][3]); tess->triangulated_index.push_back(3*PI[i][3]); // second triangle if(has_normals) tess->triangulated_index.push_back(3*NI[i][1]); if(textured) tess->triangulated_index.push_back(2*TI[i][1]); tess->triangulated_index.push_back(3*PI[i][1]); if(has_normals) tess->triangulated_index.push_back(3*NI[i][2]); if(textured) tess->triangulated_index.push_back(2*TI[i][2]); tess->triangulated_index.push_back(3*PI[i][2]); if(has_normals) tess->triangulated_index.push_back(3*NI[i][3]); if(textured) tess->triangulated_index.push_back(2*TI[i][3]); tess->triangulated_index.push_back(3*PI[i][3]); } tessFace->sizes_triangulated.push_back(2*nI); if(triangle_color) { tessFace->line_attributes.reserve(2*nI); for(uint32_t i=0; iline_attributes.push_back(SI[i]); tessFace->line_attributes.push_back(SI[i]); } } else { tessFace->line_attributes.push_back(style_index); } if(vertex_color) { tessFace->is_rgba=false; for(uint32_t i=0; iis_rgba=true; break; } tessFace->rgba_vertices.reserve(2*(tessFace->is_rgba?4:3)*3*nI); for(uint32_t i=0; irgba_vertices.push_back(byte(C[CI[i][0]].R)); tessFace->rgba_vertices.push_back(byte(C[CI[i][0]].G)); tessFace->rgba_vertices.push_back(byte(C[CI[i][0]].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[CI[i][0]].A)); tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].R)); tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].G)); tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].A)); tessFace->rgba_vertices.push_back(byte(C[CI[i][3]].R)); tessFace->rgba_vertices.push_back(byte(C[CI[i][3]].G)); tessFace->rgba_vertices.push_back(byte(C[CI[i][3]].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[CI[i][3]].A)); // second triangle tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].R)); tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].G)); tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[CI[i][1]].A)); tessFace->rgba_vertices.push_back(byte(C[CI[i][2]].R)); tessFace->rgba_vertices.push_back(byte(C[CI[i][2]].G)); tessFace->rgba_vertices.push_back(byte(C[CI[i][2]].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[CI[i][2]].A)); tessFace->rgba_vertices.push_back(byte(C[CI[i][3]].R)); tessFace->rgba_vertices.push_back(byte(C[CI[i][3]].G)); tessFace->rgba_vertices.push_back(byte(C[CI[i][3]].B)); if(tessFace->is_rgba) tessFace->rgba_vertices.push_back(byte(C[CI[i][3]].A)); } } tess->addTessFace(tessFace); const uint32_t tess_index = add3DTess(tess); return tess_index; } /* void oPRCFile::addTriangle(const double P[][3], const double T[][2], uint32_t style_index) { PRCgroup &group = findGroup(); group.triangles.push_back(PRCtesstriangle()); PRCtesstriangle &triangle = group.triangles.back(); for(size_t i = 0; i < 3; i++) { triangle.vertices[i].x = P[i][0]; triangle.vertices[i].y = P[i][1]; triangle.vertices[i].z = P[i][2]; triangle.texcoords[i].x = T[i][0]; triangle.texcoords[i].y = T[i][1]; } triangle.style = style_index; } */ void oPRCFile::addLines(uint32_t nP, const double P[][3], uint32_t nI, const uint32_t PI[], const RGBAColour& c, double w, bool segment_color, uint32_t nC, const RGBAColour C[], uint32_t nCI, const uint32_t CI[]) { if(nP==0 || P==NULL || nI==0 || PI==NULL) return; const uint32_t tess_index = createLines(nP, P, nI, PI, segment_color, nC, C, nCI, CI); useLines(tess_index, c, w); } uint32_t oPRCFile::createLines(uint32_t nP, const double P[][3], uint32_t nI, const uint32_t PI[], bool segment_color, uint32_t nC, const RGBAColour C[], uint32_t nCI, const uint32_t CI[]) { if(nP==0 || P==NULL || nI==0 || PI==NULL) return m1; const bool vertex_color = (nC != 0 && C != NULL && CI != NULL); PRC3DWireTess *tess = new PRC3DWireTess(); tess->coordinates.reserve(3*nP); for(uint32_t i=0; icoordinates.push_back(P[i][0]); tess->coordinates.push_back(P[i][1]); tess->coordinates.push_back(P[i][2]); } tess->wire_indexes.reserve(nI); for(uint32_t i=0; iwire_indexes.push_back(PI[i]); const uint32_t ni = i+PI[i]+1; for(i++; iwire_indexes.push_back(3*PI[i]); } if(vertex_color) { tess->is_segment_color = segment_color; tess->is_rgba=false; for(uint32_t i=0; iis_rgba=true; break; } tess->rgba_vertices.reserve((tess->is_rgba?4:3)*nCI); for(uint32_t i=0; irgba_vertices.push_back(byte(C[CI[i]].R)); tess->rgba_vertices.push_back(byte(C[CI[i]].G)); tess->rgba_vertices.push_back(byte(C[CI[i]].B)); if(tess->is_rgba) tess->rgba_vertices.push_back(byte(C[CI[i]].A)); } } const uint32_t tess_index = add3DWireTess(tess); return tess_index; } #define PRCFACETRANSFORM const double origin[3], const double x_axis[3], const double y_axis[3], double scale, const double* t void oPRCFile::addHemisphere(double radius, const PRCmaterial &m, PRCFACETRANSFORM) { ADDFACE(PRCSphere) SETTRANSF surface->uv_domain.min.x = 0; surface->uv_domain.max.x = 2*pi; surface->uv_domain.min.y = 0; surface->uv_domain.max.y = 0.5*pi; surface->radius = radius; } void oPRCFile::addSphere(double radius, const PRCmaterial &m, PRCFACETRANSFORM) { ADDFACE(PRCSphere) SETTRANSF surface->uv_domain.min.x = 0; surface->uv_domain.max.x = 2*pi; surface->uv_domain.min.y =-0.5*pi; surface->uv_domain.max.y = 0.5*pi; surface->radius = radius; } void oPRCFile::addDisk(double radius, const PRCmaterial &m, PRCFACETRANSFORM) { ADDFACE(PRCRuled) SETTRANSF PRCCircle *first_curve = new PRCCircle; first_curve->radius = radius; surface->first_curve = first_curve; PRCCircle *second_curve = new PRCCircle; second_curve->radius = 0; surface->second_curve = second_curve; surface->uv_domain.min.x = 0; surface->uv_domain.max.x = 1; surface->uv_domain.min.y = 0; surface->uv_domain.max.y = 2*pi; surface->parameterization_on_v_coeff_a = -1; surface->parameterization_on_v_coeff_b = 2*pi; } void oPRCFile::addCylinder(double radius, double height, const PRCmaterial &m, PRCFACETRANSFORM) { ADDFACE(PRCCylinder) SETTRANSF surface->uv_domain.min.x = 0; surface->uv_domain.max.x = 2*pi; surface->uv_domain.min.y = (height>0)?0:height; surface->uv_domain.max.y = (height>0)?height:0; surface->radius = radius; } void oPRCFile::addCone(double radius, double height, const PRCmaterial &m, PRCFACETRANSFORM) { ADDFACE(PRCCone) SETTRANSF surface->uv_domain.min.x = 0; surface->uv_domain.max.x = 2*pi; surface->uv_domain.min.y = (height>0)?0:height; surface->uv_domain.max.y = (height>0)?height:0; surface->bottom_radius = radius; surface->semi_angle = -atan(radius/height);; } void oPRCFile::addTorus(double major_radius, double minor_radius, double angle1, double angle2, const PRCmaterial &m, PRCFACETRANSFORM) { ADDFACE(PRCTorus) SETTRANSF surface->uv_domain.min.x = (angle1/180)*pi; surface->uv_domain.max.x = (angle2/180)*pi; surface->uv_domain.min.y = 0; surface->uv_domain.max.y = 2*pi; surface->major_radius = major_radius; surface->minor_radius = minor_radius; } #undef ADDWIRE #undef SETTRANSF uint32_t PRCFileStructure::addMaterialGeneric(PRCMaterialGeneric*& pMaterialGeneric) { materials.push_back(pMaterialGeneric); pMaterialGeneric = NULL; return materials.size()-1; } uint32_t PRCFileStructure::addTextureApplication(PRCTextureApplication*& pTextureApplication) { materials.push_back(pTextureApplication); pTextureApplication = NULL; return materials.size()-1; } uint32_t PRCFileStructure::addStyle(PRCStyle*& pStyle) { styles.push_back(pStyle); pStyle = NULL; return styles.size()-1; } uint32_t PRCFileStructure::addPartDefinition(PRCPartDefinition*& pPartDefinition) { part_definitions.push_back(pPartDefinition); pPartDefinition = NULL; return part_definitions.size()-1; } uint32_t PRCFileStructure::addProductOccurrence(PRCProductOccurrence*& pProductOccurrence) { product_occurrences.push_back(pProductOccurrence); pProductOccurrence = NULL; return product_occurrences.size()-1; } uint32_t PRCFileStructure::addTopoContext(PRCTopoContext*& pTopoContext) { contexts.push_back(pTopoContext); pTopoContext = NULL; return contexts.size()-1; } uint32_t PRCFileStructure::getTopoContext(PRCTopoContext*& pTopoContext) { pTopoContext = new PRCTopoContext; contexts.push_back(pTopoContext); return contexts.size()-1; } uint32_t PRCFileStructure::add3DTess(PRC3DTess*& p3DTess) { tessellations.push_back(p3DTess); p3DTess = NULL; return tessellations.size()-1; } uint32_t PRCFileStructure::add3DWireTess(PRC3DWireTess*& p3DWireTess) { tessellations.push_back(p3DWireTess); p3DWireTess = NULL; return tessellations.size()-1; } /* uint32_t PRCFileStructure::addMarkupTess(PRCMarkupTess*& pMarkupTess) { tessellations.push_back(pMarkupTess); pMarkupTess = NULL; return tessellations.size()-1; } uint32_t PRCFileStructure::addMarkup(PRCMarkup*& pMarkup) { markups.push_back(pMarkup); pMarkup = NULL; return markups.size()-1; } uint32_t PRCFileStructure::addAnnotationItem(PRCAnnotationItem*& pAnnotationItem) { annotation_entities.push_back(pAnnotationItem); pAnnotationItem = NULL; return annotation_entities.size()-1; } */ uint32_t PRCFileStructure::addCoordinateSystem(PRCCoordinateSystem*& pCoordinateSystem) { reference_coordinate_systems.push_back(pCoordinateSystem); pCoordinateSystem = NULL; return reference_coordinate_systems.size()-1; } uint32_t PRCFileStructure::addCoordinateSystemUnique(PRCCoordinateSystem*& pCoordinateSystem) { for(uint32_t i = 0; i < reference_coordinate_systems.size(); ++i) { if(*(reference_coordinate_systems[i])==*pCoordinateSystem) { pCoordinateSystem = NULL; return i; } } reference_coordinate_systems.push_back(pCoordinateSystem); pCoordinateSystem = NULL; return reference_coordinate_systems.size()-1; } } ./asymptote-2.41/prc/test.asy0000644000175000017500000000013713064427076016025 0ustar norbertnorbertsettings.outformat="pdf"; import embed; label(embed("test.prc","poster,3Droo=25",1500,500)); ./asymptote-2.41/prc/PRCbitStream.h0000644000175000017500000000472613064427076017010 0ustar norbertnorbert/************ * * This file is part of a tool for producing 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt and * Michail Vidiassov * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #ifndef __PRC_BIT_STREAM_H #define __PRC_BIT_STREAM_H #ifdef _MSC_VER #include #if _MSC_VER >= 1600 #include #else typedef signed char int8_t; typedef signed short int16_t; typedef signed long int32_t; typedef unsigned char uint8_t; typedef unsigned short uint16_t; typedef unsigned long uint32_t; #endif // _MSC_VER >= 1600 #else #include #endif // _MSC_VER #include #include #include #define CHUNK_SIZE (1024) // Is this a reasonable initial size? class PRCbitStream { public: PRCbitStream(uint8_t*& buff, unsigned int l) : byteIndex(0), bitIndex(0), allocatedLength(l), data(buff), compressed(false) { if(data == 0) { getAChunk(); } } unsigned int getSize() const; uint8_t* getData(); PRCbitStream& operator <<(const std::string&); PRCbitStream& operator <<(bool); PRCbitStream& operator <<(uint32_t); PRCbitStream& operator <<(uint8_t); PRCbitStream& operator <<(int32_t); PRCbitStream& operator <<(double); PRCbitStream& operator <<(const char*); void compress(); void write(std::ostream &out) const; private: void writeBit(bool); void writeBits(uint32_t,uint8_t); void writeByte(uint8_t); void nextByte(); void nextBit(); void getAChunk(); // bitIndex is "big endian", zero based, location of next bit to write unsigned int byteIndex,bitIndex; unsigned int allocatedLength; uint8_t*& data; bool compressed; uint32_t compressedDataSize; }; #endif // __PRC_BIT_STREAM_H ./asymptote-2.41/prc/PRCdouble.cc0000644000175000017500000053213613064427076016467 0ustar norbertnorbert#include "PRCdouble.h" // from Adobe's documentation PRCdword stadwZero[2]={DOUBLEWITHTWODWORD(0x00000000,0x00000000)}; PRCdword stadwNegativeZero[2]={DOUBLEWITHTWODWORD(0x80000000,0x00000000)}; struct sCodageOfFrequentDoubleOrExponent* getcofdoe(unsigned Bits, short NumberOfBits) { struct sCodageOfFrequentDoubleOrExponent *pcofdoe; for(pcofdoe=acofdoe; pcofdoe < acofdoe+NUMBEROFELEMENTINACOFDOE; ++pcofdoe) { if(pcofdoe->NumberOfBits == NumberOfBits && pcofdoe->Bits == Bits) return pcofdoe; } return NULL; } int stCOFDOECompare(const void* pcofdoe1,const void* pcofdoe2) { return(EXPONENT(((const struct sCodageOfFrequentDoubleOrExponent *)pcofdoe1)->u2uod.Value)- EXPONENT(((const struct sCodageOfFrequentDoubleOrExponent *)pcofdoe2)->u2uod.Value)); } #ifdef WORDS_BIGENDIAN #ifndef HAVE_MEMRCHR void *memrchr(const void *buf,int c,size_t count) { unsigned char *pcBuffer=(unsigned char *)buf, *pcBufferEnd=pcBuffer-count; for(;pcBuffer>pcBufferEnd;pcBuffer--) if(*pcBuffer==c) return(pcBuffer); return(NULL); } #endif #endif sCodageOfFrequentDoubleOrExponent acofdoe[NUMBEROFELEMENTINACOFDOE] = { {VT_double,2,0x1,{DOUBLEWITHTWODWORDINTREE(0x00000000,0x00000000)}}, {VT_exponent,22,0xd1d32,{DOUBLEWITHTWODWORDINTREE(0x00000000,0x00000000)}}, {VT_exponent,22,0xd1d33,{DOUBLEWITHTWODWORDINTREE(0x00100000,0x00000000)}}, {VT_exponent,22,0xf78d8,{DOUBLEWITHTWODWORDINTREE(0x00200000,0x00000000)}}, {VT_exponent,22,0xf78d9,{DOUBLEWITHTWODWORDINTREE(0x00300000,0x00000000)}}, {VT_exponent,22,0xf78da,{DOUBLEWITHTWODWORDINTREE(0x00400000,0x00000000)}}, {VT_exponent,22,0xf78db,{DOUBLEWITHTWODWORDINTREE(0x00500000,0x00000000)}}, {VT_exponent,22,0xf78dc,{DOUBLEWITHTWODWORDINTREE(0x00600000,0x00000000)}}, {VT_exponent,22,0xf78dd,{DOUBLEWITHTWODWORDINTREE(0x00700000,0x00000000)}}, {VT_exponent,22,0xf78de,{DOUBLEWITHTWODWORDINTREE(0x00800000,0x00000000)}}, {VT_exponent,22,0xf78df,{DOUBLEWITHTWODWORDINTREE(0x00900000,0x00000000)}}, {VT_exponent,22,0xf78e0,{DOUBLEWITHTWODWORDINTREE(0x00a00000,0x00000000)}}, {VT_exponent,22,0xf78e1,{DOUBLEWITHTWODWORDINTREE(0x00b00000,0x00000000)}}, {VT_exponent,22,0xf78e2,{DOUBLEWITHTWODWORDINTREE(0x00c00000,0x00000000)}}, {VT_exponent,22,0xf78e3,{DOUBLEWITHTWODWORDINTREE(0x00d00000,0x00000000)}}, {VT_exponent,22,0xf78e4,{DOUBLEWITHTWODWORDINTREE(0x00e00000,0x00000000)}}, {VT_exponent,22,0xf78e5,{DOUBLEWITHTWODWORDINTREE(0x00f00000,0x00000000)}}, {VT_exponent,22,0xf78e6,{DOUBLEWITHTWODWORDINTREE(0x01000000,0x00000000)}}, {VT_exponent,22,0xf78e7,{DOUBLEWITHTWODWORDINTREE(0x01100000,0x00000000)}}, {VT_exponent,22,0xf78e8,{DOUBLEWITHTWODWORDINTREE(0x01200000,0x00000000)}}, {VT_exponent,22,0xf78e9,{DOUBLEWITHTWODWORDINTREE(0x01300000,0x00000000)}}, {VT_exponent,22,0xf78ea,{DOUBLEWITHTWODWORDINTREE(0x01400000,0x00000000)}}, {VT_exponent,22,0xf78eb,{DOUBLEWITHTWODWORDINTREE(0x01500000,0x00000000)}}, {VT_exponent,22,0xf78ec,{DOUBLEWITHTWODWORDINTREE(0x01600000,0x00000000)}}, {VT_exponent,22,0xf78ed,{DOUBLEWITHTWODWORDINTREE(0x01700000,0x00000000)}}, {VT_exponent,22,0xf78ee,{DOUBLEWITHTWODWORDINTREE(0x01800000,0x00000000)}}, {VT_exponent,22,0xf78ef,{DOUBLEWITHTWODWORDINTREE(0x01900000,0x00000000)}}, {VT_exponent,22,0xf78f0,{DOUBLEWITHTWODWORDINTREE(0x01a00000,0x00000000)}}, {VT_exponent,22,0xf78f1,{DOUBLEWITHTWODWORDINTREE(0x01b00000,0x00000000)}}, {VT_exponent,22,0xf78f2,{DOUBLEWITHTWODWORDINTREE(0x01c00000,0x00000000)}}, {VT_exponent,22,0xf78f3,{DOUBLEWITHTWODWORDINTREE(0x01d00000,0x00000000)}}, {VT_exponent,22,0xf78f4,{DOUBLEWITHTWODWORDINTREE(0x01e00000,0x00000000)}}, {VT_exponent,22,0xf78f5,{DOUBLEWITHTWODWORDINTREE(0x01f00000,0x00000000)}}, {VT_exponent,22,0xf78f6,{DOUBLEWITHTWODWORDINTREE(0x02000000,0x00000000)}}, {VT_exponent,22,0xf78f7,{DOUBLEWITHTWODWORDINTREE(0x02100000,0x00000000)}}, {VT_exponent,22,0xf78f8,{DOUBLEWITHTWODWORDINTREE(0x02200000,0x00000000)}}, {VT_exponent,22,0xf78f9,{DOUBLEWITHTWODWORDINTREE(0x02300000,0x00000000)}}, {VT_exponent,22,0xf78fa,{DOUBLEWITHTWODWORDINTREE(0x02400000,0x00000000)}}, {VT_exponent,22,0xf78fb,{DOUBLEWITHTWODWORDINTREE(0x02500000,0x00000000)}}, {VT_exponent,22,0xf78fc,{DOUBLEWITHTWODWORDINTREE(0x02600000,0x00000000)}}, {VT_exponent,22,0xf78fd,{DOUBLEWITHTWODWORDINTREE(0x02700000,0x00000000)}}, {VT_exponent,22,0xf78fe,{DOUBLEWITHTWODWORDINTREE(0x02800000,0x00000000)}}, {VT_exponent,22,0xf78ff,{DOUBLEWITHTWODWORDINTREE(0x02900000,0x00000000)}}, {VT_exponent,22,0x3a8300,{DOUBLEWITHTWODWORDINTREE(0x02a00000,0x00000000)}}, {VT_exponent,22,0x3a8301,{DOUBLEWITHTWODWORDINTREE(0x02b00000,0x00000000)}}, {VT_exponent,22,0x3a8302,{DOUBLEWITHTWODWORDINTREE(0x02c00000,0x00000000)}}, {VT_exponent,22,0x3a8303,{DOUBLEWITHTWODWORDINTREE(0x02d00000,0x00000000)}}, {VT_exponent,22,0x3a8304,{DOUBLEWITHTWODWORDINTREE(0x02e00000,0x00000000)}}, {VT_exponent,22,0x3a8305,{DOUBLEWITHTWODWORDINTREE(0x02f00000,0x00000000)}}, {VT_exponent,22,0x3a8306,{DOUBLEWITHTWODWORDINTREE(0x03000000,0x00000000)}}, {VT_exponent,22,0x3a8307,{DOUBLEWITHTWODWORDINTREE(0x03100000,0x00000000)}}, {VT_exponent,22,0x3a8308,{DOUBLEWITHTWODWORDINTREE(0x03200000,0x00000000)}}, {VT_exponent,22,0x3a8309,{DOUBLEWITHTWODWORDINTREE(0x03300000,0x00000000)}}, {VT_exponent,22,0x3a830a,{DOUBLEWITHTWODWORDINTREE(0x03400000,0x00000000)}}, {VT_exponent,22,0x3a830b,{DOUBLEWITHTWODWORDINTREE(0x03500000,0x00000000)}}, {VT_exponent,22,0x3a830c,{DOUBLEWITHTWODWORDINTREE(0x03600000,0x00000000)}}, {VT_exponent,22,0x3a830d,{DOUBLEWITHTWODWORDINTREE(0x03700000,0x00000000)}}, {VT_exponent,22,0x3a830e,{DOUBLEWITHTWODWORDINTREE(0x03800000,0x00000000)}}, {VT_exponent,22,0x3a830f,{DOUBLEWITHTWODWORDINTREE(0x03900000,0x00000000)}}, {VT_exponent,22,0x3a8310,{DOUBLEWITHTWODWORDINTREE(0x03a00000,0x00000000)}}, {VT_exponent,22,0x3a8311,{DOUBLEWITHTWODWORDINTREE(0x03b00000,0x00000000)}}, {VT_exponent,22,0x3a8312,{DOUBLEWITHTWODWORDINTREE(0x03c00000,0x00000000)}}, {VT_exponent,22,0x3a8313,{DOUBLEWITHTWODWORDINTREE(0x03d00000,0x00000000)}}, {VT_exponent,22,0x3a8314,{DOUBLEWITHTWODWORDINTREE(0x03e00000,0x00000000)}}, {VT_exponent,22,0x3a8315,{DOUBLEWITHTWODWORDINTREE(0x03f00000,0x00000000)}}, {VT_exponent,22,0x3a8316,{DOUBLEWITHTWODWORDINTREE(0x04000000,0x00000000)}}, {VT_exponent,22,0x3a8317,{DOUBLEWITHTWODWORDINTREE(0x04100000,0x00000000)}}, {VT_exponent,22,0x3a8318,{DOUBLEWITHTWODWORDINTREE(0x04200000,0x00000000)}}, {VT_exponent,22,0x3a8319,{DOUBLEWITHTWODWORDINTREE(0x04300000,0x00000000)}}, {VT_exponent,22,0x3a831a,{DOUBLEWITHTWODWORDINTREE(0x04400000,0x00000000)}}, {VT_exponent,22,0x3a831b,{DOUBLEWITHTWODWORDINTREE(0x04500000,0x00000000)}}, {VT_exponent,22,0x3a831c,{DOUBLEWITHTWODWORDINTREE(0x04600000,0x00000000)}}, {VT_exponent,22,0x3a831d,{DOUBLEWITHTWODWORDINTREE(0x04700000,0x00000000)}}, {VT_exponent,22,0x3a831e,{DOUBLEWITHTWODWORDINTREE(0x04800000,0x00000000)}}, {VT_exponent,22,0x3a831f,{DOUBLEWITHTWODWORDINTREE(0x04900000,0x00000000)}}, {VT_exponent,22,0x3a8320,{DOUBLEWITHTWODWORDINTREE(0x04a00000,0x00000000)}}, {VT_exponent,22,0x3a8321,{DOUBLEWITHTWODWORDINTREE(0x04b00000,0x00000000)}}, {VT_exponent,22,0x3a8322,{DOUBLEWITHTWODWORDINTREE(0x04c00000,0x00000000)}}, {VT_exponent,22,0x3a8323,{DOUBLEWITHTWODWORDINTREE(0x04d00000,0x00000000)}}, {VT_exponent,22,0x3a8324,{DOUBLEWITHTWODWORDINTREE(0x04e00000,0x00000000)}}, {VT_exponent,22,0x3a8325,{DOUBLEWITHTWODWORDINTREE(0x04f00000,0x00000000)}}, {VT_exponent,22,0x3a8326,{DOUBLEWITHTWODWORDINTREE(0x05000000,0x00000000)}}, {VT_exponent,22,0x3a8327,{DOUBLEWITHTWODWORDINTREE(0x05100000,0x00000000)}}, {VT_exponent,22,0x3a8328,{DOUBLEWITHTWODWORDINTREE(0x05200000,0x00000000)}}, {VT_exponent,22,0x3a8329,{DOUBLEWITHTWODWORDINTREE(0x05300000,0x00000000)}}, {VT_exponent,22,0x3a832a,{DOUBLEWITHTWODWORDINTREE(0x05400000,0x00000000)}}, {VT_exponent,22,0x3a832b,{DOUBLEWITHTWODWORDINTREE(0x05500000,0x00000000)}}, {VT_exponent,22,0x3a832c,{DOUBLEWITHTWODWORDINTREE(0x05600000,0x00000000)}}, {VT_exponent,22,0x3a832d,{DOUBLEWITHTWODWORDINTREE(0x05700000,0x00000000)}}, {VT_exponent,22,0x3a832e,{DOUBLEWITHTWODWORDINTREE(0x05800000,0x00000000)}}, {VT_exponent,22,0x3a832f,{DOUBLEWITHTWODWORDINTREE(0x05900000,0x00000000)}}, {VT_exponent,22,0x3a8330,{DOUBLEWITHTWODWORDINTREE(0x05a00000,0x00000000)}}, {VT_exponent,22,0x3a8331,{DOUBLEWITHTWODWORDINTREE(0x05b00000,0x00000000)}}, {VT_exponent,22,0x3a8332,{DOUBLEWITHTWODWORDINTREE(0x05c00000,0x00000000)}}, {VT_exponent,22,0x3a8333,{DOUBLEWITHTWODWORDINTREE(0x05d00000,0x00000000)}}, {VT_exponent,22,0x3a8334,{DOUBLEWITHTWODWORDINTREE(0x05e00000,0x00000000)}}, {VT_exponent,22,0x3a8335,{DOUBLEWITHTWODWORDINTREE(0x05f00000,0x00000000)}}, {VT_exponent,22,0x3a8336,{DOUBLEWITHTWODWORDINTREE(0x06000000,0x00000000)}}, {VT_exponent,22,0x3a8337,{DOUBLEWITHTWODWORDINTREE(0x06100000,0x00000000)}}, {VT_exponent,22,0x3a8338,{DOUBLEWITHTWODWORDINTREE(0x06200000,0x00000000)}}, {VT_exponent,22,0x3a8339,{DOUBLEWITHTWODWORDINTREE(0x06300000,0x00000000)}}, {VT_exponent,22,0x3a833a,{DOUBLEWITHTWODWORDINTREE(0x06400000,0x00000000)}}, {VT_exponent,22,0x3a833b,{DOUBLEWITHTWODWORDINTREE(0x06500000,0x00000000)}}, {VT_exponent,22,0x3a833c,{DOUBLEWITHTWODWORDINTREE(0x06600000,0x00000000)}}, {VT_exponent,22,0x3a833d,{DOUBLEWITHTWODWORDINTREE(0x06700000,0x00000000)}}, {VT_exponent,22,0x3a833e,{DOUBLEWITHTWODWORDINTREE(0x06800000,0x00000000)}}, {VT_exponent,22,0x3a833f,{DOUBLEWITHTWODWORDINTREE(0x06900000,0x00000000)}}, {VT_exponent,22,0x3a8340,{DOUBLEWITHTWODWORDINTREE(0x06a00000,0x00000000)}}, {VT_exponent,22,0x3a8341,{DOUBLEWITHTWODWORDINTREE(0x06b00000,0x00000000)}}, {VT_exponent,22,0x3a8342,{DOUBLEWITHTWODWORDINTREE(0x06c00000,0x00000000)}}, {VT_exponent,22,0x3a8343,{DOUBLEWITHTWODWORDINTREE(0x06d00000,0x00000000)}}, {VT_exponent,22,0x3a8344,{DOUBLEWITHTWODWORDINTREE(0x06e00000,0x00000000)}}, {VT_exponent,22,0x3a8345,{DOUBLEWITHTWODWORDINTREE(0x06f00000,0x00000000)}}, {VT_exponent,22,0x3a8346,{DOUBLEWITHTWODWORDINTREE(0x07000000,0x00000000)}}, {VT_exponent,22,0x3a8347,{DOUBLEWITHTWODWORDINTREE(0x07100000,0x00000000)}}, {VT_exponent,22,0x3a8348,{DOUBLEWITHTWODWORDINTREE(0x07200000,0x00000000)}}, {VT_exponent,22,0x3a8349,{DOUBLEWITHTWODWORDINTREE(0x07300000,0x00000000)}}, {VT_exponent,22,0x3a834a,{DOUBLEWITHTWODWORDINTREE(0x07400000,0x00000000)}}, {VT_exponent,22,0x3a834b,{DOUBLEWITHTWODWORDINTREE(0x07500000,0x00000000)}}, {VT_exponent,22,0x3a834c,{DOUBLEWITHTWODWORDINTREE(0x07600000,0x00000000)}}, {VT_exponent,22,0x3a834d,{DOUBLEWITHTWODWORDINTREE(0x07700000,0x00000000)}}, {VT_exponent,22,0x3a834e,{DOUBLEWITHTWODWORDINTREE(0x07800000,0x00000000)}}, {VT_exponent,22,0x3a834f,{DOUBLEWITHTWODWORDINTREE(0x07900000,0x00000000)}}, {VT_exponent,22,0x3a8350,{DOUBLEWITHTWODWORDINTREE(0x07a00000,0x00000000)}}, {VT_exponent,22,0x3a8351,{DOUBLEWITHTWODWORDINTREE(0x07b00000,0x00000000)}}, {VT_exponent,22,0x3a8352,{DOUBLEWITHTWODWORDINTREE(0x07c00000,0x00000000)}}, {VT_exponent,22,0x3a8353,{DOUBLEWITHTWODWORDINTREE(0x07d00000,0x00000000)}}, {VT_exponent,22,0x3a8354,{DOUBLEWITHTWODWORDINTREE(0x07e00000,0x00000000)}}, {VT_exponent,22,0x3a8355,{DOUBLEWITHTWODWORDINTREE(0x07f00000,0x00000000)}}, {VT_exponent,22,0x3a8356,{DOUBLEWITHTWODWORDINTREE(0x08000000,0x00000000)}}, {VT_exponent,22,0x3a8357,{DOUBLEWITHTWODWORDINTREE(0x08100000,0x00000000)}}, {VT_exponent,22,0x3a8358,{DOUBLEWITHTWODWORDINTREE(0x08200000,0x00000000)}}, {VT_exponent,22,0x3a8359,{DOUBLEWITHTWODWORDINTREE(0x08300000,0x00000000)}}, {VT_exponent,22,0x3a835a,{DOUBLEWITHTWODWORDINTREE(0x08400000,0x00000000)}}, {VT_exponent,22,0x3a835b,{DOUBLEWITHTWODWORDINTREE(0x08500000,0x00000000)}}, {VT_exponent,22,0x3a835c,{DOUBLEWITHTWODWORDINTREE(0x08600000,0x00000000)}}, {VT_exponent,22,0x3a835d,{DOUBLEWITHTWODWORDINTREE(0x08700000,0x00000000)}}, {VT_exponent,22,0x3a835e,{DOUBLEWITHTWODWORDINTREE(0x08800000,0x00000000)}}, {VT_exponent,22,0x3a835f,{DOUBLEWITHTWODWORDINTREE(0x08900000,0x00000000)}}, {VT_exponent,22,0x3a8360,{DOUBLEWITHTWODWORDINTREE(0x08a00000,0x00000000)}}, {VT_exponent,22,0x3a8361,{DOUBLEWITHTWODWORDINTREE(0x08b00000,0x00000000)}}, {VT_exponent,22,0x3a8362,{DOUBLEWITHTWODWORDINTREE(0x08c00000,0x00000000)}}, {VT_exponent,22,0x3a8363,{DOUBLEWITHTWODWORDINTREE(0x08d00000,0x00000000)}}, {VT_exponent,22,0x3a8364,{DOUBLEWITHTWODWORDINTREE(0x08e00000,0x00000000)}}, {VT_exponent,22,0x3a8365,{DOUBLEWITHTWODWORDINTREE(0x08f00000,0x00000000)}}, {VT_exponent,22,0x3a8366,{DOUBLEWITHTWODWORDINTREE(0x09000000,0x00000000)}}, {VT_exponent,22,0x3a8367,{DOUBLEWITHTWODWORDINTREE(0x09100000,0x00000000)}}, {VT_exponent,22,0x3a8368,{DOUBLEWITHTWODWORDINTREE(0x09200000,0x00000000)}}, {VT_exponent,22,0x3a8369,{DOUBLEWITHTWODWORDINTREE(0x09300000,0x00000000)}}, {VT_exponent,22,0x3a836a,{DOUBLEWITHTWODWORDINTREE(0x09400000,0x00000000)}}, {VT_exponent,22,0x3a836b,{DOUBLEWITHTWODWORDINTREE(0x09500000,0x00000000)}}, {VT_exponent,22,0x3a836c,{DOUBLEWITHTWODWORDINTREE(0x09600000,0x00000000)}}, {VT_exponent,22,0x3a836d,{DOUBLEWITHTWODWORDINTREE(0x09700000,0x00000000)}}, {VT_exponent,22,0x3a836e,{DOUBLEWITHTWODWORDINTREE(0x09800000,0x00000000)}}, {VT_exponent,22,0x3a836f,{DOUBLEWITHTWODWORDINTREE(0x09900000,0x00000000)}}, {VT_exponent,22,0x3a8370,{DOUBLEWITHTWODWORDINTREE(0x09a00000,0x00000000)}}, {VT_exponent,22,0x3a8371,{DOUBLEWITHTWODWORDINTREE(0x09b00000,0x00000000)}}, {VT_exponent,22,0x3a8372,{DOUBLEWITHTWODWORDINTREE(0x09c00000,0x00000000)}}, {VT_exponent,22,0x3a8373,{DOUBLEWITHTWODWORDINTREE(0x09d00000,0x00000000)}}, {VT_exponent,22,0x3a8374,{DOUBLEWITHTWODWORDINTREE(0x09e00000,0x00000000)}}, {VT_exponent,22,0x3a8375,{DOUBLEWITHTWODWORDINTREE(0x09f00000,0x00000000)}}, {VT_exponent,22,0x3a8376,{DOUBLEWITHTWODWORDINTREE(0x0a000000,0x00000000)}}, {VT_exponent,22,0x3a8377,{DOUBLEWITHTWODWORDINTREE(0x0a100000,0x00000000)}}, {VT_exponent,22,0x3a8378,{DOUBLEWITHTWODWORDINTREE(0x0a200000,0x00000000)}}, {VT_exponent,22,0x3a8379,{DOUBLEWITHTWODWORDINTREE(0x0a300000,0x00000000)}}, {VT_exponent,22,0x3a837a,{DOUBLEWITHTWODWORDINTREE(0x0a400000,0x00000000)}}, {VT_exponent,22,0x3a837b,{DOUBLEWITHTWODWORDINTREE(0x0a500000,0x00000000)}}, {VT_exponent,22,0x3a837c,{DOUBLEWITHTWODWORDINTREE(0x0a600000,0x00000000)}}, {VT_exponent,22,0x3a837d,{DOUBLEWITHTWODWORDINTREE(0x0a700000,0x00000000)}}, {VT_exponent,22,0x3a837e,{DOUBLEWITHTWODWORDINTREE(0x0a800000,0x00000000)}}, {VT_exponent,22,0x3a837f,{DOUBLEWITHTWODWORDINTREE(0x0a900000,0x00000000)}}, {VT_exponent,22,0x3a8380,{DOUBLEWITHTWODWORDINTREE(0x0aa00000,0x00000000)}}, {VT_exponent,22,0x3a8381,{DOUBLEWITHTWODWORDINTREE(0x0ab00000,0x00000000)}}, {VT_exponent,22,0x3a8382,{DOUBLEWITHTWODWORDINTREE(0x0ac00000,0x00000000)}}, {VT_exponent,22,0x3a8383,{DOUBLEWITHTWODWORDINTREE(0x0ad00000,0x00000000)}}, {VT_exponent,22,0x3a8384,{DOUBLEWITHTWODWORDINTREE(0x0ae00000,0x00000000)}}, {VT_exponent,22,0x3a8385,{DOUBLEWITHTWODWORDINTREE(0x0af00000,0x00000000)}}, {VT_exponent,22,0x3a8386,{DOUBLEWITHTWODWORDINTREE(0x0b000000,0x00000000)}}, {VT_exponent,22,0x3a8387,{DOUBLEWITHTWODWORDINTREE(0x0b100000,0x00000000)}}, {VT_exponent,22,0x3a8388,{DOUBLEWITHTWODWORDINTREE(0x0b200000,0x00000000)}}, {VT_exponent,22,0x3a8389,{DOUBLEWITHTWODWORDINTREE(0x0b300000,0x00000000)}}, {VT_exponent,22,0x3a838a,{DOUBLEWITHTWODWORDINTREE(0x0b400000,0x00000000)}}, {VT_exponent,22,0x3a838b,{DOUBLEWITHTWODWORDINTREE(0x0b500000,0x00000000)}}, {VT_exponent,22,0x3a838c,{DOUBLEWITHTWODWORDINTREE(0x0b600000,0x00000000)}}, {VT_exponent,22,0x3a838d,{DOUBLEWITHTWODWORDINTREE(0x0b700000,0x00000000)}}, {VT_exponent,22,0x3a838e,{DOUBLEWITHTWODWORDINTREE(0x0b800000,0x00000000)}}, {VT_exponent,22,0x3a838f,{DOUBLEWITHTWODWORDINTREE(0x0b900000,0x00000000)}}, {VT_exponent,22,0x3a8390,{DOUBLEWITHTWODWORDINTREE(0x0ba00000,0x00000000)}}, {VT_exponent,22,0x3a8391,{DOUBLEWITHTWODWORDINTREE(0x0bb00000,0x00000000)}}, {VT_exponent,22,0x3a8392,{DOUBLEWITHTWODWORDINTREE(0x0bc00000,0x00000000)}}, {VT_exponent,22,0x3a8393,{DOUBLEWITHTWODWORDINTREE(0x0bd00000,0x00000000)}}, {VT_exponent,22,0x3a8394,{DOUBLEWITHTWODWORDINTREE(0x0be00000,0x00000000)}}, {VT_exponent,22,0x3a8395,{DOUBLEWITHTWODWORDINTREE(0x0bf00000,0x00000000)}}, {VT_exponent,22,0x3a8396,{DOUBLEWITHTWODWORDINTREE(0x0c000000,0x00000000)}}, {VT_exponent,22,0x3a8397,{DOUBLEWITHTWODWORDINTREE(0x0c100000,0x00000000)}}, {VT_exponent,22,0x3a8398,{DOUBLEWITHTWODWORDINTREE(0x0c200000,0x00000000)}}, {VT_exponent,22,0x3a8399,{DOUBLEWITHTWODWORDINTREE(0x0c300000,0x00000000)}}, {VT_exponent,22,0x3a839a,{DOUBLEWITHTWODWORDINTREE(0x0c400000,0x00000000)}}, {VT_exponent,22,0x3a839b,{DOUBLEWITHTWODWORDINTREE(0x0c500000,0x00000000)}}, {VT_exponent,22,0x3a839c,{DOUBLEWITHTWODWORDINTREE(0x0c600000,0x00000000)}}, {VT_exponent,22,0x3a839d,{DOUBLEWITHTWODWORDINTREE(0x0c700000,0x00000000)}}, {VT_exponent,22,0x3a839e,{DOUBLEWITHTWODWORDINTREE(0x0c800000,0x00000000)}}, {VT_exponent,22,0x3a839f,{DOUBLEWITHTWODWORDINTREE(0x0c900000,0x00000000)}}, {VT_exponent,22,0x3a83a0,{DOUBLEWITHTWODWORDINTREE(0x0ca00000,0x00000000)}}, {VT_exponent,22,0x3a83a1,{DOUBLEWITHTWODWORDINTREE(0x0cb00000,0x00000000)}}, {VT_exponent,22,0x3a83a2,{DOUBLEWITHTWODWORDINTREE(0x0cc00000,0x00000000)}}, {VT_exponent,22,0x3a83a3,{DOUBLEWITHTWODWORDINTREE(0x0cd00000,0x00000000)}}, {VT_exponent,22,0x3a83a4,{DOUBLEWITHTWODWORDINTREE(0x0ce00000,0x00000000)}}, {VT_exponent,22,0x3a83a5,{DOUBLEWITHTWODWORDINTREE(0x0cf00000,0x00000000)}}, {VT_exponent,22,0x3a83a6,{DOUBLEWITHTWODWORDINTREE(0x0d000000,0x00000000)}}, {VT_exponent,22,0x3a83a7,{DOUBLEWITHTWODWORDINTREE(0x0d100000,0x00000000)}}, {VT_exponent,22,0x3a83a8,{DOUBLEWITHTWODWORDINTREE(0x0d200000,0x00000000)}}, {VT_exponent,22,0x3a83a9,{DOUBLEWITHTWODWORDINTREE(0x0d300000,0x00000000)}}, {VT_exponent,22,0x3a83aa,{DOUBLEWITHTWODWORDINTREE(0x0d400000,0x00000000)}}, {VT_exponent,22,0x3a83ab,{DOUBLEWITHTWODWORDINTREE(0x0d500000,0x00000000)}}, {VT_exponent,22,0x3a83ac,{DOUBLEWITHTWODWORDINTREE(0x0d600000,0x00000000)}}, {VT_exponent,22,0x3a83ad,{DOUBLEWITHTWODWORDINTREE(0x0d700000,0x00000000)}}, {VT_exponent,22,0x3a83ae,{DOUBLEWITHTWODWORDINTREE(0x0d800000,0x00000000)}}, {VT_exponent,22,0x3a83af,{DOUBLEWITHTWODWORDINTREE(0x0d900000,0x00000000)}}, {VT_exponent,22,0x3a83b0,{DOUBLEWITHTWODWORDINTREE(0x0da00000,0x00000000)}}, {VT_exponent,22,0x3a83b1,{DOUBLEWITHTWODWORDINTREE(0x0db00000,0x00000000)}}, {VT_exponent,22,0x3a83b2,{DOUBLEWITHTWODWORDINTREE(0x0dc00000,0x00000000)}}, {VT_exponent,22,0x3a83b3,{DOUBLEWITHTWODWORDINTREE(0x0dd00000,0x00000000)}}, {VT_exponent,22,0x3a83b4,{DOUBLEWITHTWODWORDINTREE(0x0de00000,0x00000000)}}, {VT_exponent,22,0x3a83b5,{DOUBLEWITHTWODWORDINTREE(0x0df00000,0x00000000)}}, {VT_exponent,22,0x3a83b6,{DOUBLEWITHTWODWORDINTREE(0x0e000000,0x00000000)}}, {VT_exponent,22,0x3a83b7,{DOUBLEWITHTWODWORDINTREE(0x0e100000,0x00000000)}}, {VT_exponent,22,0x3a83b8,{DOUBLEWITHTWODWORDINTREE(0x0e200000,0x00000000)}}, {VT_exponent,22,0x3a83b9,{DOUBLEWITHTWODWORDINTREE(0x0e300000,0x00000000)}}, {VT_exponent,22,0x3a83ba,{DOUBLEWITHTWODWORDINTREE(0x0e400000,0x00000000)}}, {VT_exponent,22,0x3a83bb,{DOUBLEWITHTWODWORDINTREE(0x0e500000,0x00000000)}}, {VT_exponent,22,0x3a83bc,{DOUBLEWITHTWODWORDINTREE(0x0e600000,0x00000000)}}, {VT_exponent,22,0x3a83bd,{DOUBLEWITHTWODWORDINTREE(0x0e700000,0x00000000)}}, {VT_exponent,22,0x3a83be,{DOUBLEWITHTWODWORDINTREE(0x0e800000,0x00000000)}}, {VT_exponent,22,0x3a83bf,{DOUBLEWITHTWODWORDINTREE(0x0e900000,0x00000000)}}, {VT_exponent,22,0x3a83c0,{DOUBLEWITHTWODWORDINTREE(0x0ea00000,0x00000000)}}, {VT_exponent,22,0x3a83c1,{DOUBLEWITHTWODWORDINTREE(0x0eb00000,0x00000000)}}, {VT_exponent,22,0x3a83c2,{DOUBLEWITHTWODWORDINTREE(0x0ec00000,0x00000000)}}, {VT_exponent,22,0x3a83c3,{DOUBLEWITHTWODWORDINTREE(0x0ed00000,0x00000000)}}, {VT_exponent,22,0x3a83c4,{DOUBLEWITHTWODWORDINTREE(0x0ee00000,0x00000000)}}, {VT_exponent,22,0x3a83c5,{DOUBLEWITHTWODWORDINTREE(0x0ef00000,0x00000000)}}, {VT_exponent,22,0x3a83c6,{DOUBLEWITHTWODWORDINTREE(0x0f000000,0x00000000)}}, {VT_exponent,22,0x3a83c7,{DOUBLEWITHTWODWORDINTREE(0x0f100000,0x00000000)}}, {VT_exponent,22,0x3a83c8,{DOUBLEWITHTWODWORDINTREE(0x0f200000,0x00000000)}}, {VT_exponent,22,0x3a83c9,{DOUBLEWITHTWODWORDINTREE(0x0f300000,0x00000000)}}, {VT_exponent,22,0x3a83ca,{DOUBLEWITHTWODWORDINTREE(0x0f400000,0x00000000)}}, {VT_exponent,22,0x3a83cb,{DOUBLEWITHTWODWORDINTREE(0x0f500000,0x00000000)}}, {VT_exponent,22,0x3a83cc,{DOUBLEWITHTWODWORDINTREE(0x0f600000,0x00000000)}}, {VT_exponent,22,0x3a83cd,{DOUBLEWITHTWODWORDINTREE(0x0f700000,0x00000000)}}, {VT_exponent,22,0x3a83ce,{DOUBLEWITHTWODWORDINTREE(0x0f800000,0x00000000)}}, {VT_exponent,22,0x3a83cf,{DOUBLEWITHTWODWORDINTREE(0x0f900000,0x00000000)}}, {VT_exponent,22,0x3a83d0,{DOUBLEWITHTWODWORDINTREE(0x0fa00000,0x00000000)}}, {VT_exponent,22,0x3a83d1,{DOUBLEWITHTWODWORDINTREE(0x0fb00000,0x00000000)}}, {VT_exponent,22,0x3a83d2,{DOUBLEWITHTWODWORDINTREE(0x0fc00000,0x00000000)}}, {VT_exponent,22,0x3a83d3,{DOUBLEWITHTWODWORDINTREE(0x0fd00000,0x00000000)}}, {VT_exponent,22,0x3a83d4,{DOUBLEWITHTWODWORDINTREE(0x0fe00000,0x00000000)}}, {VT_exponent,22,0x3a83d5,{DOUBLEWITHTWODWORDINTREE(0x0ff00000,0x00000000)}}, {VT_exponent,22,0x3a83d6,{DOUBLEWITHTWODWORDINTREE(0x10000000,0x00000000)}}, {VT_exponent,22,0x3a83d7,{DOUBLEWITHTWODWORDINTREE(0x10100000,0x00000000)}}, {VT_exponent,22,0x3a83d8,{DOUBLEWITHTWODWORDINTREE(0x10200000,0x00000000)}}, {VT_exponent,22,0x3a83d9,{DOUBLEWITHTWODWORDINTREE(0x10300000,0x00000000)}}, {VT_exponent,22,0x3a83da,{DOUBLEWITHTWODWORDINTREE(0x10400000,0x00000000)}}, {VT_exponent,22,0x3a83db,{DOUBLEWITHTWODWORDINTREE(0x10500000,0x00000000)}}, {VT_exponent,22,0x3a83dc,{DOUBLEWITHTWODWORDINTREE(0x10600000,0x00000000)}}, {VT_exponent,22,0x3a83dd,{DOUBLEWITHTWODWORDINTREE(0x10700000,0x00000000)}}, {VT_exponent,22,0x3a83de,{DOUBLEWITHTWODWORDINTREE(0x10800000,0x00000000)}}, {VT_exponent,22,0x3a83df,{DOUBLEWITHTWODWORDINTREE(0x10900000,0x00000000)}}, {VT_exponent,22,0x3a83e0,{DOUBLEWITHTWODWORDINTREE(0x10a00000,0x00000000)}}, {VT_exponent,22,0x3a83e1,{DOUBLEWITHTWODWORDINTREE(0x10b00000,0x00000000)}}, {VT_exponent,22,0x3a83e2,{DOUBLEWITHTWODWORDINTREE(0x10c00000,0x00000000)}}, {VT_exponent,22,0x3a83e3,{DOUBLEWITHTWODWORDINTREE(0x10d00000,0x00000000)}}, {VT_exponent,22,0x3a83e4,{DOUBLEWITHTWODWORDINTREE(0x10e00000,0x00000000)}}, {VT_exponent,22,0x3a83e5,{DOUBLEWITHTWODWORDINTREE(0x10f00000,0x00000000)}}, {VT_exponent,22,0x3a83e6,{DOUBLEWITHTWODWORDINTREE(0x11000000,0x00000000)}}, {VT_exponent,22,0x3a83e7,{DOUBLEWITHTWODWORDINTREE(0x11100000,0x00000000)}}, {VT_exponent,22,0x3a83e8,{DOUBLEWITHTWODWORDINTREE(0x11200000,0x00000000)}}, {VT_exponent,22,0x3a83e9,{DOUBLEWITHTWODWORDINTREE(0x11300000,0x00000000)}}, {VT_exponent,22,0x3a83ea,{DOUBLEWITHTWODWORDINTREE(0x11400000,0x00000000)}}, {VT_exponent,22,0x3a83eb,{DOUBLEWITHTWODWORDINTREE(0x11500000,0x00000000)}}, {VT_exponent,22,0x3a83ec,{DOUBLEWITHTWODWORDINTREE(0x11600000,0x00000000)}}, {VT_exponent,22,0x3a83ed,{DOUBLEWITHTWODWORDINTREE(0x11700000,0x00000000)}}, {VT_exponent,22,0x3a83ee,{DOUBLEWITHTWODWORDINTREE(0x11800000,0x00000000)}}, {VT_exponent,22,0x3a83ef,{DOUBLEWITHTWODWORDINTREE(0x11900000,0x00000000)}}, {VT_exponent,22,0x3a83f0,{DOUBLEWITHTWODWORDINTREE(0x11a00000,0x00000000)}}, {VT_exponent,22,0x3a83f1,{DOUBLEWITHTWODWORDINTREE(0x11b00000,0x00000000)}}, {VT_exponent,22,0x3a83f2,{DOUBLEWITHTWODWORDINTREE(0x11c00000,0x00000000)}}, {VT_exponent,22,0x3a83f3,{DOUBLEWITHTWODWORDINTREE(0x11d00000,0x00000000)}}, {VT_exponent,22,0x3a83f4,{DOUBLEWITHTWODWORDINTREE(0x11e00000,0x00000000)}}, {VT_exponent,22,0x3a83f5,{DOUBLEWITHTWODWORDINTREE(0x11f00000,0x00000000)}}, {VT_exponent,22,0x3a83f6,{DOUBLEWITHTWODWORDINTREE(0x12000000,0x00000000)}}, {VT_exponent,22,0x3a83f7,{DOUBLEWITHTWODWORDINTREE(0x12100000,0x00000000)}}, {VT_exponent,22,0x3a83f8,{DOUBLEWITHTWODWORDINTREE(0x12200000,0x00000000)}}, {VT_exponent,22,0x3a83f9,{DOUBLEWITHTWODWORDINTREE(0x12300000,0x00000000)}}, {VT_exponent,22,0x3a83fa,{DOUBLEWITHTWODWORDINTREE(0x12400000,0x00000000)}}, {VT_exponent,22,0x3a83fb,{DOUBLEWITHTWODWORDINTREE(0x12500000,0x00000000)}}, {VT_exponent,22,0x3a83fc,{DOUBLEWITHTWODWORDINTREE(0x12600000,0x00000000)}}, {VT_exponent,22,0x3a83fd,{DOUBLEWITHTWODWORDINTREE(0x12700000,0x00000000)}}, {VT_exponent,22,0x3a83fe,{DOUBLEWITHTWODWORDINTREE(0x12800000,0x00000000)}}, {VT_exponent,22,0x3a83ff,{DOUBLEWITHTWODWORDINTREE(0x12900000,0x00000000)}}, {VT_exponent,22,0x3a8400,{DOUBLEWITHTWODWORDINTREE(0x12a00000,0x00000000)}}, {VT_exponent,22,0x3a8401,{DOUBLEWITHTWODWORDINTREE(0x12b00000,0x00000000)}}, {VT_exponent,22,0x3a8402,{DOUBLEWITHTWODWORDINTREE(0x12c00000,0x00000000)}}, {VT_exponent,22,0x3a8403,{DOUBLEWITHTWODWORDINTREE(0x12d00000,0x00000000)}}, {VT_exponent,22,0x3a8404,{DOUBLEWITHTWODWORDINTREE(0x12e00000,0x00000000)}}, {VT_exponent,22,0x3a8405,{DOUBLEWITHTWODWORDINTREE(0x12f00000,0x00000000)}}, {VT_exponent,22,0x3a8406,{DOUBLEWITHTWODWORDINTREE(0x13000000,0x00000000)}}, {VT_exponent,22,0x3a8407,{DOUBLEWITHTWODWORDINTREE(0x13100000,0x00000000)}}, {VT_exponent,22,0x3a8408,{DOUBLEWITHTWODWORDINTREE(0x13200000,0x00000000)}}, {VT_exponent,22,0x3a8409,{DOUBLEWITHTWODWORDINTREE(0x13300000,0x00000000)}}, {VT_exponent,22,0x3a840a,{DOUBLEWITHTWODWORDINTREE(0x13400000,0x00000000)}}, {VT_exponent,22,0x3a840b,{DOUBLEWITHTWODWORDINTREE(0x13500000,0x00000000)}}, {VT_exponent,22,0x3a840c,{DOUBLEWITHTWODWORDINTREE(0x13600000,0x00000000)}}, {VT_exponent,22,0x3a840d,{DOUBLEWITHTWODWORDINTREE(0x13700000,0x00000000)}}, {VT_exponent,22,0x3a840e,{DOUBLEWITHTWODWORDINTREE(0x13800000,0x00000000)}}, {VT_exponent,22,0x3a840f,{DOUBLEWITHTWODWORDINTREE(0x13900000,0x00000000)}}, {VT_exponent,22,0x3a8410,{DOUBLEWITHTWODWORDINTREE(0x13a00000,0x00000000)}}, {VT_exponent,22,0x3a8411,{DOUBLEWITHTWODWORDINTREE(0x13b00000,0x00000000)}}, {VT_exponent,22,0x3a8412,{DOUBLEWITHTWODWORDINTREE(0x13c00000,0x00000000)}}, {VT_exponent,22,0x3a8413,{DOUBLEWITHTWODWORDINTREE(0x13d00000,0x00000000)}}, {VT_exponent,22,0x3a8414,{DOUBLEWITHTWODWORDINTREE(0x13e00000,0x00000000)}}, {VT_exponent,22,0x3a8415,{DOUBLEWITHTWODWORDINTREE(0x13f00000,0x00000000)}}, {VT_exponent,22,0x3a8416,{DOUBLEWITHTWODWORDINTREE(0x14000000,0x00000000)}}, {VT_exponent,22,0x3a8417,{DOUBLEWITHTWODWORDINTREE(0x14100000,0x00000000)}}, {VT_exponent,22,0x3a8418,{DOUBLEWITHTWODWORDINTREE(0x14200000,0x00000000)}}, {VT_exponent,22,0x3a8419,{DOUBLEWITHTWODWORDINTREE(0x14300000,0x00000000)}}, {VT_exponent,22,0x3a841a,{DOUBLEWITHTWODWORDINTREE(0x14400000,0x00000000)}}, {VT_exponent,22,0x3a841b,{DOUBLEWITHTWODWORDINTREE(0x14500000,0x00000000)}}, {VT_exponent,22,0x3a841c,{DOUBLEWITHTWODWORDINTREE(0x14600000,0x00000000)}}, {VT_exponent,22,0x3a841d,{DOUBLEWITHTWODWORDINTREE(0x14700000,0x00000000)}}, {VT_exponent,22,0x3a841e,{DOUBLEWITHTWODWORDINTREE(0x14800000,0x00000000)}}, {VT_exponent,22,0x3a841f,{DOUBLEWITHTWODWORDINTREE(0x14900000,0x00000000)}}, {VT_exponent,22,0x3a8420,{DOUBLEWITHTWODWORDINTREE(0x14a00000,0x00000000)}}, {VT_exponent,22,0x3a8421,{DOUBLEWITHTWODWORDINTREE(0x14b00000,0x00000000)}}, {VT_exponent,22,0x3a8422,{DOUBLEWITHTWODWORDINTREE(0x14c00000,0x00000000)}}, {VT_exponent,22,0x3a8423,{DOUBLEWITHTWODWORDINTREE(0x14d00000,0x00000000)}}, {VT_exponent,22,0x3a8424,{DOUBLEWITHTWODWORDINTREE(0x14e00000,0x00000000)}}, {VT_exponent,22,0x3a8425,{DOUBLEWITHTWODWORDINTREE(0x14f00000,0x00000000)}}, {VT_exponent,22,0x3a8426,{DOUBLEWITHTWODWORDINTREE(0x15000000,0x00000000)}}, {VT_exponent,22,0x3a8427,{DOUBLEWITHTWODWORDINTREE(0x15100000,0x00000000)}}, {VT_exponent,22,0x3a8428,{DOUBLEWITHTWODWORDINTREE(0x15200000,0x00000000)}}, {VT_exponent,22,0x3a8429,{DOUBLEWITHTWODWORDINTREE(0x15300000,0x00000000)}}, {VT_exponent,22,0x3a842a,{DOUBLEWITHTWODWORDINTREE(0x15400000,0x00000000)}}, {VT_exponent,22,0x3a842b,{DOUBLEWITHTWODWORDINTREE(0x15500000,0x00000000)}}, {VT_exponent,22,0x3a842c,{DOUBLEWITHTWODWORDINTREE(0x15600000,0x00000000)}}, {VT_exponent,22,0x3a842d,{DOUBLEWITHTWODWORDINTREE(0x15700000,0x00000000)}}, {VT_exponent,22,0x3a842e,{DOUBLEWITHTWODWORDINTREE(0x15800000,0x00000000)}}, {VT_exponent,22,0x3a842f,{DOUBLEWITHTWODWORDINTREE(0x15900000,0x00000000)}}, {VT_exponent,22,0x3a8430,{DOUBLEWITHTWODWORDINTREE(0x15a00000,0x00000000)}}, {VT_exponent,22,0x3a8431,{DOUBLEWITHTWODWORDINTREE(0x15b00000,0x00000000)}}, {VT_exponent,22,0x3a8432,{DOUBLEWITHTWODWORDINTREE(0x15c00000,0x00000000)}}, {VT_exponent,22,0x3a8433,{DOUBLEWITHTWODWORDINTREE(0x15d00000,0x00000000)}}, {VT_exponent,22,0x3a8434,{DOUBLEWITHTWODWORDINTREE(0x15e00000,0x00000000)}}, {VT_exponent,22,0x3a8435,{DOUBLEWITHTWODWORDINTREE(0x15f00000,0x00000000)}}, {VT_exponent,22,0x3a8436,{DOUBLEWITHTWODWORDINTREE(0x16000000,0x00000000)}}, {VT_exponent,22,0x3a8437,{DOUBLEWITHTWODWORDINTREE(0x16100000,0x00000000)}}, {VT_exponent,22,0x3a8438,{DOUBLEWITHTWODWORDINTREE(0x16200000,0x00000000)}}, {VT_exponent,22,0x3a8439,{DOUBLEWITHTWODWORDINTREE(0x16300000,0x00000000)}}, {VT_exponent,22,0x3a843a,{DOUBLEWITHTWODWORDINTREE(0x16400000,0x00000000)}}, {VT_exponent,22,0x3a843b,{DOUBLEWITHTWODWORDINTREE(0x16500000,0x00000000)}}, {VT_exponent,22,0x3a843c,{DOUBLEWITHTWODWORDINTREE(0x16600000,0x00000000)}}, {VT_exponent,22,0x3a843d,{DOUBLEWITHTWODWORDINTREE(0x16700000,0x00000000)}}, {VT_exponent,22,0x3a843e,{DOUBLEWITHTWODWORDINTREE(0x16800000,0x00000000)}}, {VT_exponent,22,0x3a843f,{DOUBLEWITHTWODWORDINTREE(0x16900000,0x00000000)}}, {VT_exponent,22,0x3a8440,{DOUBLEWITHTWODWORDINTREE(0x16a00000,0x00000000)}}, {VT_exponent,22,0x3a8441,{DOUBLEWITHTWODWORDINTREE(0x16b00000,0x00000000)}}, {VT_exponent,22,0x3a8442,{DOUBLEWITHTWODWORDINTREE(0x16c00000,0x00000000)}}, {VT_exponent,22,0x3a8443,{DOUBLEWITHTWODWORDINTREE(0x16d00000,0x00000000)}}, {VT_exponent,22,0x3a8444,{DOUBLEWITHTWODWORDINTREE(0x16e00000,0x00000000)}}, {VT_exponent,22,0x3a8445,{DOUBLEWITHTWODWORDINTREE(0x16f00000,0x00000000)}}, {VT_exponent,22,0x3a8446,{DOUBLEWITHTWODWORDINTREE(0x17000000,0x00000000)}}, {VT_exponent,22,0x3a8447,{DOUBLEWITHTWODWORDINTREE(0x17100000,0x00000000)}}, {VT_exponent,22,0x3a8448,{DOUBLEWITHTWODWORDINTREE(0x17200000,0x00000000)}}, {VT_exponent,22,0x3a8449,{DOUBLEWITHTWODWORDINTREE(0x17300000,0x00000000)}}, {VT_exponent,22,0x3a844a,{DOUBLEWITHTWODWORDINTREE(0x17400000,0x00000000)}}, {VT_exponent,22,0x3a844b,{DOUBLEWITHTWODWORDINTREE(0x17500000,0x00000000)}}, {VT_exponent,22,0x3a844c,{DOUBLEWITHTWODWORDINTREE(0x17600000,0x00000000)}}, {VT_exponent,22,0x3a844d,{DOUBLEWITHTWODWORDINTREE(0x17700000,0x00000000)}}, {VT_exponent,22,0x3a844e,{DOUBLEWITHTWODWORDINTREE(0x17800000,0x00000000)}}, {VT_exponent,22,0x3a844f,{DOUBLEWITHTWODWORDINTREE(0x17900000,0x00000000)}}, {VT_exponent,22,0x3a8450,{DOUBLEWITHTWODWORDINTREE(0x17a00000,0x00000000)}}, {VT_exponent,22,0x3a8451,{DOUBLEWITHTWODWORDINTREE(0x17b00000,0x00000000)}}, {VT_exponent,22,0x3a8452,{DOUBLEWITHTWODWORDINTREE(0x17c00000,0x00000000)}}, {VT_exponent,22,0x3a8453,{DOUBLEWITHTWODWORDINTREE(0x17d00000,0x00000000)}}, {VT_exponent,22,0x3a8454,{DOUBLEWITHTWODWORDINTREE(0x17e00000,0x00000000)}}, {VT_exponent,22,0x3a8455,{DOUBLEWITHTWODWORDINTREE(0x17f00000,0x00000000)}}, {VT_exponent,22,0x3a8456,{DOUBLEWITHTWODWORDINTREE(0x18000000,0x00000000)}}, {VT_exponent,22,0x3a8457,{DOUBLEWITHTWODWORDINTREE(0x18100000,0x00000000)}}, {VT_exponent,22,0x3a8458,{DOUBLEWITHTWODWORDINTREE(0x18200000,0x00000000)}}, {VT_exponent,22,0x3a8459,{DOUBLEWITHTWODWORDINTREE(0x18300000,0x00000000)}}, {VT_exponent,22,0x3a845a,{DOUBLEWITHTWODWORDINTREE(0x18400000,0x00000000)}}, {VT_exponent,22,0x3a845b,{DOUBLEWITHTWODWORDINTREE(0x18500000,0x00000000)}}, {VT_exponent,22,0x3a845c,{DOUBLEWITHTWODWORDINTREE(0x18600000,0x00000000)}}, {VT_exponent,22,0x3a845d,{DOUBLEWITHTWODWORDINTREE(0x18700000,0x00000000)}}, {VT_exponent,22,0x3a845e,{DOUBLEWITHTWODWORDINTREE(0x18800000,0x00000000)}}, {VT_exponent,22,0x3a845f,{DOUBLEWITHTWODWORDINTREE(0x18900000,0x00000000)}}, {VT_exponent,22,0x3a8460,{DOUBLEWITHTWODWORDINTREE(0x18a00000,0x00000000)}}, {VT_exponent,22,0x3a8461,{DOUBLEWITHTWODWORDINTREE(0x18b00000,0x00000000)}}, {VT_exponent,22,0x3a8462,{DOUBLEWITHTWODWORDINTREE(0x18c00000,0x00000000)}}, {VT_exponent,22,0x3a8463,{DOUBLEWITHTWODWORDINTREE(0x18d00000,0x00000000)}}, {VT_exponent,22,0x3a8464,{DOUBLEWITHTWODWORDINTREE(0x18e00000,0x00000000)}}, {VT_exponent,22,0x3a8465,{DOUBLEWITHTWODWORDINTREE(0x18f00000,0x00000000)}}, {VT_exponent,22,0x3a8466,{DOUBLEWITHTWODWORDINTREE(0x19000000,0x00000000)}}, {VT_exponent,22,0x3a8467,{DOUBLEWITHTWODWORDINTREE(0x19100000,0x00000000)}}, {VT_exponent,22,0x3a8468,{DOUBLEWITHTWODWORDINTREE(0x19200000,0x00000000)}}, {VT_exponent,22,0x3a8469,{DOUBLEWITHTWODWORDINTREE(0x19300000,0x00000000)}}, {VT_exponent,22,0x3a846a,{DOUBLEWITHTWODWORDINTREE(0x19400000,0x00000000)}}, {VT_exponent,22,0x3a846b,{DOUBLEWITHTWODWORDINTREE(0x19500000,0x00000000)}}, {VT_exponent,22,0x3a846c,{DOUBLEWITHTWODWORDINTREE(0x19600000,0x00000000)}}, {VT_exponent,22,0x3a846d,{DOUBLEWITHTWODWORDINTREE(0x19700000,0x00000000)}}, {VT_exponent,22,0x3a846e,{DOUBLEWITHTWODWORDINTREE(0x19800000,0x00000000)}}, {VT_exponent,22,0x3a846f,{DOUBLEWITHTWODWORDINTREE(0x19900000,0x00000000)}}, {VT_exponent,22,0x3a8470,{DOUBLEWITHTWODWORDINTREE(0x19a00000,0x00000000)}}, {VT_exponent,22,0x3a8471,{DOUBLEWITHTWODWORDINTREE(0x19b00000,0x00000000)}}, {VT_exponent,22,0x3a8472,{DOUBLEWITHTWODWORDINTREE(0x19c00000,0x00000000)}}, {VT_exponent,22,0x3a8473,{DOUBLEWITHTWODWORDINTREE(0x19d00000,0x00000000)}}, {VT_exponent,22,0x3a8474,{DOUBLEWITHTWODWORDINTREE(0x19e00000,0x00000000)}}, {VT_exponent,22,0x3a8475,{DOUBLEWITHTWODWORDINTREE(0x19f00000,0x00000000)}}, {VT_exponent,22,0x3a8476,{DOUBLEWITHTWODWORDINTREE(0x1a000000,0x00000000)}}, {VT_exponent,22,0x3a8477,{DOUBLEWITHTWODWORDINTREE(0x1a100000,0x00000000)}}, {VT_exponent,22,0x3a8478,{DOUBLEWITHTWODWORDINTREE(0x1a200000,0x00000000)}}, {VT_exponent,22,0x3a8479,{DOUBLEWITHTWODWORDINTREE(0x1a300000,0x00000000)}}, {VT_exponent,22,0x3a847a,{DOUBLEWITHTWODWORDINTREE(0x1a400000,0x00000000)}}, {VT_exponent,22,0x3a847b,{DOUBLEWITHTWODWORDINTREE(0x1a500000,0x00000000)}}, {VT_exponent,22,0x3a847c,{DOUBLEWITHTWODWORDINTREE(0x1a600000,0x00000000)}}, {VT_exponent,22,0x3a847d,{DOUBLEWITHTWODWORDINTREE(0x1a700000,0x00000000)}}, {VT_exponent,22,0x3a847e,{DOUBLEWITHTWODWORDINTREE(0x1a800000,0x00000000)}}, {VT_exponent,22,0x3a847f,{DOUBLEWITHTWODWORDINTREE(0x1a900000,0x00000000)}}, {VT_exponent,22,0x3a8480,{DOUBLEWITHTWODWORDINTREE(0x1aa00000,0x00000000)}}, {VT_exponent,22,0x3a8481,{DOUBLEWITHTWODWORDINTREE(0x1ab00000,0x00000000)}}, {VT_exponent,22,0x3a8482,{DOUBLEWITHTWODWORDINTREE(0x1ac00000,0x00000000)}}, {VT_exponent,22,0x3a8483,{DOUBLEWITHTWODWORDINTREE(0x1ad00000,0x00000000)}}, {VT_exponent,22,0x3a8484,{DOUBLEWITHTWODWORDINTREE(0x1ae00000,0x00000000)}}, {VT_exponent,22,0x3a8485,{DOUBLEWITHTWODWORDINTREE(0x1af00000,0x00000000)}}, {VT_exponent,22,0x3a8486,{DOUBLEWITHTWODWORDINTREE(0x1b000000,0x00000000)}}, {VT_exponent,22,0x3a8487,{DOUBLEWITHTWODWORDINTREE(0x1b100000,0x00000000)}}, {VT_exponent,22,0x3a8488,{DOUBLEWITHTWODWORDINTREE(0x1b200000,0x00000000)}}, {VT_exponent,22,0x3a8489,{DOUBLEWITHTWODWORDINTREE(0x1b300000,0x00000000)}}, {VT_exponent,22,0x3a848a,{DOUBLEWITHTWODWORDINTREE(0x1b400000,0x00000000)}}, {VT_exponent,22,0x3a848b,{DOUBLEWITHTWODWORDINTREE(0x1b500000,0x00000000)}}, {VT_exponent,22,0x3a848c,{DOUBLEWITHTWODWORDINTREE(0x1b600000,0x00000000)}}, {VT_exponent,22,0x3a848d,{DOUBLEWITHTWODWORDINTREE(0x1b700000,0x00000000)}}, {VT_exponent,22,0x3a848e,{DOUBLEWITHTWODWORDINTREE(0x1b800000,0x00000000)}}, {VT_exponent,22,0x3a848f,{DOUBLEWITHTWODWORDINTREE(0x1b900000,0x00000000)}}, {VT_exponent,22,0x3a8490,{DOUBLEWITHTWODWORDINTREE(0x1ba00000,0x00000000)}}, {VT_exponent,22,0x3a8491,{DOUBLEWITHTWODWORDINTREE(0x1bb00000,0x00000000)}}, {VT_exponent,22,0x3a8492,{DOUBLEWITHTWODWORDINTREE(0x1bc00000,0x00000000)}}, {VT_exponent,22,0x3a8493,{DOUBLEWITHTWODWORDINTREE(0x1bd00000,0x00000000)}}, {VT_exponent,22,0x3a8494,{DOUBLEWITHTWODWORDINTREE(0x1be00000,0x00000000)}}, {VT_exponent,22,0x3a8495,{DOUBLEWITHTWODWORDINTREE(0x1bf00000,0x00000000)}}, {VT_exponent,22,0x3a8496,{DOUBLEWITHTWODWORDINTREE(0x1c000000,0x00000000)}}, {VT_exponent,22,0x3a8497,{DOUBLEWITHTWODWORDINTREE(0x1c100000,0x00000000)}}, {VT_exponent,22,0x3a8498,{DOUBLEWITHTWODWORDINTREE(0x1c200000,0x00000000)}}, {VT_exponent,22,0x3a8499,{DOUBLEWITHTWODWORDINTREE(0x1c300000,0x00000000)}}, {VT_exponent,22,0x3a849a,{DOUBLEWITHTWODWORDINTREE(0x1c400000,0x00000000)}}, {VT_exponent,22,0x3a849b,{DOUBLEWITHTWODWORDINTREE(0x1c500000,0x00000000)}}, {VT_exponent,22,0x3a849c,{DOUBLEWITHTWODWORDINTREE(0x1c600000,0x00000000)}}, {VT_exponent,22,0x3a849d,{DOUBLEWITHTWODWORDINTREE(0x1c700000,0x00000000)}}, {VT_exponent,22,0x3a849e,{DOUBLEWITHTWODWORDINTREE(0x1c800000,0x00000000)}}, {VT_exponent,22,0x3a849f,{DOUBLEWITHTWODWORDINTREE(0x1c900000,0x00000000)}}, {VT_exponent,22,0x3a84a0,{DOUBLEWITHTWODWORDINTREE(0x1ca00000,0x00000000)}}, {VT_exponent,22,0x3a84a1,{DOUBLEWITHTWODWORDINTREE(0x1cb00000,0x00000000)}}, {VT_exponent,22,0x3a84a2,{DOUBLEWITHTWODWORDINTREE(0x1cc00000,0x00000000)}}, {VT_exponent,22,0x3a84a3,{DOUBLEWITHTWODWORDINTREE(0x1cd00000,0x00000000)}}, {VT_exponent,22,0x3a84a4,{DOUBLEWITHTWODWORDINTREE(0x1ce00000,0x00000000)}}, {VT_exponent,22,0x3a84a5,{DOUBLEWITHTWODWORDINTREE(0x1cf00000,0x00000000)}}, {VT_exponent,22,0x3a84a6,{DOUBLEWITHTWODWORDINTREE(0x1d000000,0x00000000)}}, {VT_exponent,22,0x3a84a7,{DOUBLEWITHTWODWORDINTREE(0x1d100000,0x00000000)}}, {VT_exponent,22,0x3a84a8,{DOUBLEWITHTWODWORDINTREE(0x1d200000,0x00000000)}}, {VT_exponent,22,0x3a84a9,{DOUBLEWITHTWODWORDINTREE(0x1d300000,0x00000000)}}, {VT_exponent,22,0x3a84aa,{DOUBLEWITHTWODWORDINTREE(0x1d400000,0x00000000)}}, {VT_exponent,22,0x3a84ab,{DOUBLEWITHTWODWORDINTREE(0x1d500000,0x00000000)}}, {VT_exponent,22,0x3a84ac,{DOUBLEWITHTWODWORDINTREE(0x1d600000,0x00000000)}}, {VT_exponent,22,0x3a84ad,{DOUBLEWITHTWODWORDINTREE(0x1d700000,0x00000000)}}, {VT_exponent,22,0x3a84ae,{DOUBLEWITHTWODWORDINTREE(0x1d800000,0x00000000)}}, {VT_exponent,22,0x3a84af,{DOUBLEWITHTWODWORDINTREE(0x1d900000,0x00000000)}}, {VT_exponent,22,0x3a84b0,{DOUBLEWITHTWODWORDINTREE(0x1da00000,0x00000000)}}, {VT_exponent,22,0x3a84b1,{DOUBLEWITHTWODWORDINTREE(0x1db00000,0x00000000)}}, {VT_exponent,22,0x3a84b2,{DOUBLEWITHTWODWORDINTREE(0x1dc00000,0x00000000)}}, {VT_exponent,22,0x3a84b3,{DOUBLEWITHTWODWORDINTREE(0x1dd00000,0x00000000)}}, {VT_exponent,22,0x3a84b4,{DOUBLEWITHTWODWORDINTREE(0x1de00000,0x00000000)}}, {VT_exponent,22,0x3a84b5,{DOUBLEWITHTWODWORDINTREE(0x1df00000,0x00000000)}}, {VT_exponent,22,0x3a84b6,{DOUBLEWITHTWODWORDINTREE(0x1e000000,0x00000000)}}, {VT_exponent,22,0x3a84b7,{DOUBLEWITHTWODWORDINTREE(0x1e100000,0x00000000)}}, {VT_exponent,22,0x3a84b8,{DOUBLEWITHTWODWORDINTREE(0x1e200000,0x00000000)}}, {VT_exponent,22,0x3a84b9,{DOUBLEWITHTWODWORDINTREE(0x1e300000,0x00000000)}}, {VT_exponent,22,0x3a84ba,{DOUBLEWITHTWODWORDINTREE(0x1e400000,0x00000000)}}, {VT_exponent,22,0x3a84bb,{DOUBLEWITHTWODWORDINTREE(0x1e500000,0x00000000)}}, {VT_exponent,22,0x3a84bc,{DOUBLEWITHTWODWORDINTREE(0x1e600000,0x00000000)}}, {VT_exponent,22,0x3a84bd,{DOUBLEWITHTWODWORDINTREE(0x1e700000,0x00000000)}}, {VT_exponent,22,0x3a84be,{DOUBLEWITHTWODWORDINTREE(0x1e800000,0x00000000)}}, {VT_exponent,22,0x3a84bf,{DOUBLEWITHTWODWORDINTREE(0x1e900000,0x00000000)}}, {VT_exponent,22,0x3a84c0,{DOUBLEWITHTWODWORDINTREE(0x1ea00000,0x00000000)}}, {VT_exponent,22,0x3a84c1,{DOUBLEWITHTWODWORDINTREE(0x1eb00000,0x00000000)}}, {VT_exponent,22,0x3a84c2,{DOUBLEWITHTWODWORDINTREE(0x1ec00000,0x00000000)}}, {VT_exponent,22,0x3a84c3,{DOUBLEWITHTWODWORDINTREE(0x1ed00000,0x00000000)}}, {VT_exponent,22,0x3a84c4,{DOUBLEWITHTWODWORDINTREE(0x1ee00000,0x00000000)}}, {VT_exponent,22,0x3a84c5,{DOUBLEWITHTWODWORDINTREE(0x1ef00000,0x00000000)}}, {VT_exponent,22,0x3a84c6,{DOUBLEWITHTWODWORDINTREE(0x1f000000,0x00000000)}}, {VT_exponent,22,0x3a84c7,{DOUBLEWITHTWODWORDINTREE(0x1f100000,0x00000000)}}, {VT_exponent,22,0x3a84c8,{DOUBLEWITHTWODWORDINTREE(0x1f200000,0x00000000)}}, {VT_exponent,22,0x3a84c9,{DOUBLEWITHTWODWORDINTREE(0x1f300000,0x00000000)}}, {VT_exponent,22,0x3a84ca,{DOUBLEWITHTWODWORDINTREE(0x1f400000,0x00000000)}}, {VT_exponent,22,0x3a84cb,{DOUBLEWITHTWODWORDINTREE(0x1f500000,0x00000000)}}, {VT_exponent,22,0x3a84cc,{DOUBLEWITHTWODWORDINTREE(0x1f600000,0x00000000)}}, {VT_exponent,22,0x3a84cd,{DOUBLEWITHTWODWORDINTREE(0x1f700000,0x00000000)}}, {VT_exponent,22,0x3a84ce,{DOUBLEWITHTWODWORDINTREE(0x1f800000,0x00000000)}}, {VT_exponent,22,0x3a84cf,{DOUBLEWITHTWODWORDINTREE(0x1f900000,0x00000000)}}, {VT_exponent,22,0x3a84d0,{DOUBLEWITHTWODWORDINTREE(0x1fa00000,0x00000000)}}, {VT_exponent,22,0x3a84d1,{DOUBLEWITHTWODWORDINTREE(0x1fb00000,0x00000000)}}, {VT_exponent,22,0x3a84d2,{DOUBLEWITHTWODWORDINTREE(0x1fc00000,0x00000000)}}, {VT_exponent,22,0x3a84d3,{DOUBLEWITHTWODWORDINTREE(0x1fd00000,0x00000000)}}, {VT_exponent,22,0x3a84d4,{DOUBLEWITHTWODWORDINTREE(0x1fe00000,0x00000000)}}, {VT_exponent,22,0x3a84d5,{DOUBLEWITHTWODWORDINTREE(0x1ff00000,0x00000000)}}, {VT_exponent,22,0x3a84d6,{DOUBLEWITHTWODWORDINTREE(0x20000000,0x00000000)}}, {VT_exponent,22,0x3a84d7,{DOUBLEWITHTWODWORDINTREE(0x20100000,0x00000000)}}, {VT_exponent,22,0x3a84d8,{DOUBLEWITHTWODWORDINTREE(0x20200000,0x00000000)}}, {VT_exponent,22,0x3a84d9,{DOUBLEWITHTWODWORDINTREE(0x20300000,0x00000000)}}, {VT_exponent,22,0x3a84da,{DOUBLEWITHTWODWORDINTREE(0x20400000,0x00000000)}}, {VT_exponent,22,0x3a84db,{DOUBLEWITHTWODWORDINTREE(0x20500000,0x00000000)}}, {VT_exponent,22,0x3a84dc,{DOUBLEWITHTWODWORDINTREE(0x20600000,0x00000000)}}, {VT_exponent,22,0x3a84dd,{DOUBLEWITHTWODWORDINTREE(0x20700000,0x00000000)}}, {VT_exponent,22,0x3a84de,{DOUBLEWITHTWODWORDINTREE(0x20800000,0x00000000)}}, {VT_exponent,22,0x3a84df,{DOUBLEWITHTWODWORDINTREE(0x20900000,0x00000000)}}, {VT_exponent,22,0x3a84e0,{DOUBLEWITHTWODWORDINTREE(0x20a00000,0x00000000)}}, {VT_exponent,22,0x3a84e1,{DOUBLEWITHTWODWORDINTREE(0x20b00000,0x00000000)}}, {VT_exponent,22,0x3a84e2,{DOUBLEWITHTWODWORDINTREE(0x20c00000,0x00000000)}}, {VT_exponent,22,0x3a84e3,{DOUBLEWITHTWODWORDINTREE(0x20d00000,0x00000000)}}, {VT_exponent,22,0x3a84e4,{DOUBLEWITHTWODWORDINTREE(0x20e00000,0x00000000)}}, {VT_exponent,22,0x3a84e5,{DOUBLEWITHTWODWORDINTREE(0x20f00000,0x00000000)}}, {VT_exponent,22,0x3a84e6,{DOUBLEWITHTWODWORDINTREE(0x21000000,0x00000000)}}, {VT_exponent,22,0x3a84e7,{DOUBLEWITHTWODWORDINTREE(0x21100000,0x00000000)}}, {VT_exponent,22,0x3a84e8,{DOUBLEWITHTWODWORDINTREE(0x21200000,0x00000000)}}, {VT_exponent,22,0x3a84e9,{DOUBLEWITHTWODWORDINTREE(0x21300000,0x00000000)}}, {VT_exponent,22,0x3a84ea,{DOUBLEWITHTWODWORDINTREE(0x21400000,0x00000000)}}, {VT_exponent,22,0x3a84eb,{DOUBLEWITHTWODWORDINTREE(0x21500000,0x00000000)}}, {VT_exponent,22,0x3a84ec,{DOUBLEWITHTWODWORDINTREE(0x21600000,0x00000000)}}, {VT_exponent,22,0x3a84ed,{DOUBLEWITHTWODWORDINTREE(0x21700000,0x00000000)}}, {VT_exponent,22,0x3a84ee,{DOUBLEWITHTWODWORDINTREE(0x21800000,0x00000000)}}, {VT_exponent,22,0x3a84ef,{DOUBLEWITHTWODWORDINTREE(0x21900000,0x00000000)}}, {VT_exponent,22,0x3a84f0,{DOUBLEWITHTWODWORDINTREE(0x21a00000,0x00000000)}}, {VT_exponent,22,0x3a84f1,{DOUBLEWITHTWODWORDINTREE(0x21b00000,0x00000000)}}, {VT_exponent,22,0x3a84f2,{DOUBLEWITHTWODWORDINTREE(0x21c00000,0x00000000)}}, {VT_exponent,22,0x3a84f3,{DOUBLEWITHTWODWORDINTREE(0x21d00000,0x00000000)}}, {VT_exponent,22,0x3a84f4,{DOUBLEWITHTWODWORDINTREE(0x21e00000,0x00000000)}}, {VT_exponent,22,0x3a84f5,{DOUBLEWITHTWODWORDINTREE(0x21f00000,0x00000000)}}, {VT_exponent,22,0x3a84f6,{DOUBLEWITHTWODWORDINTREE(0x22000000,0x00000000)}}, {VT_exponent,22,0x3a84f7,{DOUBLEWITHTWODWORDINTREE(0x22100000,0x00000000)}}, {VT_exponent,22,0x3a84f8,{DOUBLEWITHTWODWORDINTREE(0x22200000,0x00000000)}}, {VT_exponent,22,0x3a84f9,{DOUBLEWITHTWODWORDINTREE(0x22300000,0x00000000)}}, {VT_exponent,22,0x3a84fa,{DOUBLEWITHTWODWORDINTREE(0x22400000,0x00000000)}}, {VT_exponent,22,0x3a84fb,{DOUBLEWITHTWODWORDINTREE(0x22500000,0x00000000)}}, {VT_exponent,22,0x3a84fc,{DOUBLEWITHTWODWORDINTREE(0x22600000,0x00000000)}}, {VT_exponent,22,0x3a84fd,{DOUBLEWITHTWODWORDINTREE(0x22700000,0x00000000)}}, {VT_exponent,22,0x3a84fe,{DOUBLEWITHTWODWORDINTREE(0x22800000,0x00000000)}}, {VT_exponent,22,0x3a84ff,{DOUBLEWITHTWODWORDINTREE(0x22900000,0x00000000)}}, {VT_exponent,22,0x3a8500,{DOUBLEWITHTWODWORDINTREE(0x22a00000,0x00000000)}}, {VT_exponent,22,0x3a8501,{DOUBLEWITHTWODWORDINTREE(0x22b00000,0x00000000)}}, {VT_exponent,22,0x3a8502,{DOUBLEWITHTWODWORDINTREE(0x22c00000,0x00000000)}}, {VT_exponent,22,0x3a8503,{DOUBLEWITHTWODWORDINTREE(0x22d00000,0x00000000)}}, {VT_exponent,22,0x3a8504,{DOUBLEWITHTWODWORDINTREE(0x22e00000,0x00000000)}}, {VT_exponent,22,0x3a8505,{DOUBLEWITHTWODWORDINTREE(0x22f00000,0x00000000)}}, {VT_exponent,22,0x3a8506,{DOUBLEWITHTWODWORDINTREE(0x23000000,0x00000000)}}, {VT_exponent,22,0x3a8507,{DOUBLEWITHTWODWORDINTREE(0x23100000,0x00000000)}}, {VT_exponent,22,0x3a8508,{DOUBLEWITHTWODWORDINTREE(0x23200000,0x00000000)}}, {VT_exponent,22,0x3a8509,{DOUBLEWITHTWODWORDINTREE(0x23300000,0x00000000)}}, {VT_exponent,22,0x3a850a,{DOUBLEWITHTWODWORDINTREE(0x23400000,0x00000000)}}, {VT_exponent,22,0x3a850b,{DOUBLEWITHTWODWORDINTREE(0x23500000,0x00000000)}}, {VT_exponent,22,0x3a850c,{DOUBLEWITHTWODWORDINTREE(0x23600000,0x00000000)}}, {VT_exponent,22,0x3a850d,{DOUBLEWITHTWODWORDINTREE(0x23700000,0x00000000)}}, {VT_exponent,22,0x3a850e,{DOUBLEWITHTWODWORDINTREE(0x23800000,0x00000000)}}, {VT_exponent,22,0x3a850f,{DOUBLEWITHTWODWORDINTREE(0x23900000,0x00000000)}}, {VT_exponent,22,0x3a8510,{DOUBLEWITHTWODWORDINTREE(0x23a00000,0x00000000)}}, {VT_exponent,22,0x3a8511,{DOUBLEWITHTWODWORDINTREE(0x23b00000,0x00000000)}}, {VT_exponent,22,0x3a8512,{DOUBLEWITHTWODWORDINTREE(0x23c00000,0x00000000)}}, {VT_exponent,22,0x3a8513,{DOUBLEWITHTWODWORDINTREE(0x23d00000,0x00000000)}}, {VT_exponent,22,0x3a8514,{DOUBLEWITHTWODWORDINTREE(0x23e00000,0x00000000)}}, {VT_exponent,22,0x3a8515,{DOUBLEWITHTWODWORDINTREE(0x23f00000,0x00000000)}}, {VT_exponent,22,0x3a8516,{DOUBLEWITHTWODWORDINTREE(0x24000000,0x00000000)}}, {VT_exponent,22,0x3a8517,{DOUBLEWITHTWODWORDINTREE(0x24100000,0x00000000)}}, {VT_exponent,22,0x3a8518,{DOUBLEWITHTWODWORDINTREE(0x24200000,0x00000000)}}, {VT_exponent,22,0x3a8519,{DOUBLEWITHTWODWORDINTREE(0x24300000,0x00000000)}}, {VT_exponent,22,0x3a851a,{DOUBLEWITHTWODWORDINTREE(0x24400000,0x00000000)}}, {VT_exponent,22,0x3a851b,{DOUBLEWITHTWODWORDINTREE(0x24500000,0x00000000)}}, {VT_exponent,22,0x3a851c,{DOUBLEWITHTWODWORDINTREE(0x24600000,0x00000000)}}, {VT_exponent,22,0x3a851d,{DOUBLEWITHTWODWORDINTREE(0x24700000,0x00000000)}}, {VT_exponent,22,0x3a851e,{DOUBLEWITHTWODWORDINTREE(0x24800000,0x00000000)}}, {VT_exponent,22,0x3a851f,{DOUBLEWITHTWODWORDINTREE(0x24900000,0x00000000)}}, {VT_exponent,22,0x3a8520,{DOUBLEWITHTWODWORDINTREE(0x24a00000,0x00000000)}}, {VT_exponent,22,0x3a8521,{DOUBLEWITHTWODWORDINTREE(0x24b00000,0x00000000)}}, {VT_exponent,22,0x3a8522,{DOUBLEWITHTWODWORDINTREE(0x24c00000,0x00000000)}}, {VT_exponent,22,0x3a8523,{DOUBLEWITHTWODWORDINTREE(0x24d00000,0x00000000)}}, {VT_exponent,22,0x3a8524,{DOUBLEWITHTWODWORDINTREE(0x24e00000,0x00000000)}}, {VT_exponent,22,0x3a8525,{DOUBLEWITHTWODWORDINTREE(0x24f00000,0x00000000)}}, {VT_exponent,22,0x3a8526,{DOUBLEWITHTWODWORDINTREE(0x25000000,0x00000000)}}, {VT_exponent,22,0x3a8527,{DOUBLEWITHTWODWORDINTREE(0x25100000,0x00000000)}}, {VT_exponent,22,0x3a8528,{DOUBLEWITHTWODWORDINTREE(0x25200000,0x00000000)}}, {VT_exponent,22,0x3a8529,{DOUBLEWITHTWODWORDINTREE(0x25300000,0x00000000)}}, {VT_exponent,22,0x3a852a,{DOUBLEWITHTWODWORDINTREE(0x25400000,0x00000000)}}, {VT_exponent,22,0x3a852b,{DOUBLEWITHTWODWORDINTREE(0x25500000,0x00000000)}}, {VT_exponent,22,0x3a852c,{DOUBLEWITHTWODWORDINTREE(0x25600000,0x00000000)}}, {VT_exponent,22,0x3a852d,{DOUBLEWITHTWODWORDINTREE(0x25700000,0x00000000)}}, {VT_exponent,22,0x3a852e,{DOUBLEWITHTWODWORDINTREE(0x25800000,0x00000000)}}, {VT_exponent,22,0x3a852f,{DOUBLEWITHTWODWORDINTREE(0x25900000,0x00000000)}}, {VT_exponent,22,0x3a8530,{DOUBLEWITHTWODWORDINTREE(0x25a00000,0x00000000)}}, {VT_exponent,22,0x3a8531,{DOUBLEWITHTWODWORDINTREE(0x25b00000,0x00000000)}}, {VT_exponent,22,0x3a8532,{DOUBLEWITHTWODWORDINTREE(0x25c00000,0x00000000)}}, {VT_exponent,22,0x3a8533,{DOUBLEWITHTWODWORDINTREE(0x25d00000,0x00000000)}}, {VT_exponent,22,0x3a8534,{DOUBLEWITHTWODWORDINTREE(0x25e00000,0x00000000)}}, {VT_exponent,22,0x3a8535,{DOUBLEWITHTWODWORDINTREE(0x25f00000,0x00000000)}}, {VT_exponent,22,0x3a8536,{DOUBLEWITHTWODWORDINTREE(0x26000000,0x00000000)}}, {VT_exponent,22,0x3a8537,{DOUBLEWITHTWODWORDINTREE(0x26100000,0x00000000)}}, {VT_exponent,22,0x3a8538,{DOUBLEWITHTWODWORDINTREE(0x26200000,0x00000000)}}, {VT_exponent,22,0x3a8539,{DOUBLEWITHTWODWORDINTREE(0x26300000,0x00000000)}}, {VT_exponent,22,0x3a853a,{DOUBLEWITHTWODWORDINTREE(0x26400000,0x00000000)}}, {VT_exponent,22,0x3a853b,{DOUBLEWITHTWODWORDINTREE(0x26500000,0x00000000)}}, {VT_exponent,22,0x3a853c,{DOUBLEWITHTWODWORDINTREE(0x26600000,0x00000000)}}, {VT_exponent,22,0x3a853d,{DOUBLEWITHTWODWORDINTREE(0x26700000,0x00000000)}}, {VT_exponent,22,0x3a853e,{DOUBLEWITHTWODWORDINTREE(0x26800000,0x00000000)}}, {VT_exponent,22,0x3a853f,{DOUBLEWITHTWODWORDINTREE(0x26900000,0x00000000)}}, {VT_exponent,22,0x3a8540,{DOUBLEWITHTWODWORDINTREE(0x26a00000,0x00000000)}}, {VT_exponent,22,0x3a8541,{DOUBLEWITHTWODWORDINTREE(0x26b00000,0x00000000)}}, {VT_exponent,22,0x3a8542,{DOUBLEWITHTWODWORDINTREE(0x26c00000,0x00000000)}}, {VT_exponent,22,0x3a8543,{DOUBLEWITHTWODWORDINTREE(0x26d00000,0x00000000)}}, {VT_exponent,22,0x3a8544,{DOUBLEWITHTWODWORDINTREE(0x26e00000,0x00000000)}}, {VT_exponent,22,0x3a8545,{DOUBLEWITHTWODWORDINTREE(0x26f00000,0x00000000)}}, {VT_exponent,22,0x3a8546,{DOUBLEWITHTWODWORDINTREE(0x27000000,0x00000000)}}, {VT_exponent,22,0x3a8547,{DOUBLEWITHTWODWORDINTREE(0x27100000,0x00000000)}}, {VT_exponent,22,0x3a8548,{DOUBLEWITHTWODWORDINTREE(0x27200000,0x00000000)}}, {VT_exponent,22,0x3a8549,{DOUBLEWITHTWODWORDINTREE(0x27300000,0x00000000)}}, {VT_exponent,22,0x3a854a,{DOUBLEWITHTWODWORDINTREE(0x27400000,0x00000000)}}, {VT_exponent,22,0x3a854b,{DOUBLEWITHTWODWORDINTREE(0x27500000,0x00000000)}}, {VT_exponent,22,0x3a854c,{DOUBLEWITHTWODWORDINTREE(0x27600000,0x00000000)}}, {VT_exponent,22,0x3a854d,{DOUBLEWITHTWODWORDINTREE(0x27700000,0x00000000)}}, {VT_exponent,22,0x3a854e,{DOUBLEWITHTWODWORDINTREE(0x27800000,0x00000000)}}, {VT_exponent,22,0x3a854f,{DOUBLEWITHTWODWORDINTREE(0x27900000,0x00000000)}}, {VT_exponent,22,0x3a8550,{DOUBLEWITHTWODWORDINTREE(0x27a00000,0x00000000)}}, {VT_exponent,22,0x3a8551,{DOUBLEWITHTWODWORDINTREE(0x27b00000,0x00000000)}}, {VT_exponent,22,0x3a8552,{DOUBLEWITHTWODWORDINTREE(0x27c00000,0x00000000)}}, {VT_exponent,22,0x3a8553,{DOUBLEWITHTWODWORDINTREE(0x27d00000,0x00000000)}}, {VT_exponent,22,0x3a8554,{DOUBLEWITHTWODWORDINTREE(0x27e00000,0x00000000)}}, {VT_exponent,22,0x3a8555,{DOUBLEWITHTWODWORDINTREE(0x27f00000,0x00000000)}}, {VT_exponent,22,0x3a8556,{DOUBLEWITHTWODWORDINTREE(0x28000000,0x00000000)}}, {VT_exponent,22,0x3a8557,{DOUBLEWITHTWODWORDINTREE(0x28100000,0x00000000)}}, {VT_exponent,22,0x3a8558,{DOUBLEWITHTWODWORDINTREE(0x28200000,0x00000000)}}, {VT_exponent,22,0x3a8559,{DOUBLEWITHTWODWORDINTREE(0x28300000,0x00000000)}}, {VT_exponent,22,0x3a855a,{DOUBLEWITHTWODWORDINTREE(0x28400000,0x00000000)}}, {VT_exponent,22,0x3a855b,{DOUBLEWITHTWODWORDINTREE(0x28500000,0x00000000)}}, {VT_exponent,22,0x3a855c,{DOUBLEWITHTWODWORDINTREE(0x28600000,0x00000000)}}, {VT_exponent,22,0x3a855d,{DOUBLEWITHTWODWORDINTREE(0x28700000,0x00000000)}}, {VT_exponent,22,0x3a855e,{DOUBLEWITHTWODWORDINTREE(0x28800000,0x00000000)}}, {VT_exponent,22,0x3a855f,{DOUBLEWITHTWODWORDINTREE(0x28900000,0x00000000)}}, {VT_exponent,22,0x3a8560,{DOUBLEWITHTWODWORDINTREE(0x28a00000,0x00000000)}}, {VT_exponent,22,0x3a8561,{DOUBLEWITHTWODWORDINTREE(0x28b00000,0x00000000)}}, {VT_exponent,22,0x3a8562,{DOUBLEWITHTWODWORDINTREE(0x28c00000,0x00000000)}}, {VT_exponent,22,0x3a8563,{DOUBLEWITHTWODWORDINTREE(0x28d00000,0x00000000)}}, {VT_exponent,22,0x3a8564,{DOUBLEWITHTWODWORDINTREE(0x28e00000,0x00000000)}}, {VT_exponent,22,0x3a8565,{DOUBLEWITHTWODWORDINTREE(0x28f00000,0x00000000)}}, {VT_exponent,22,0x3a8566,{DOUBLEWITHTWODWORDINTREE(0x29000000,0x00000000)}}, {VT_exponent,22,0x3a8567,{DOUBLEWITHTWODWORDINTREE(0x29100000,0x00000000)}}, {VT_exponent,22,0x3a8568,{DOUBLEWITHTWODWORDINTREE(0x29200000,0x00000000)}}, {VT_exponent,22,0x3a8569,{DOUBLEWITHTWODWORDINTREE(0x29300000,0x00000000)}}, {VT_exponent,22,0x3a856a,{DOUBLEWITHTWODWORDINTREE(0x29400000,0x00000000)}}, {VT_exponent,22,0x3a856b,{DOUBLEWITHTWODWORDINTREE(0x29500000,0x00000000)}}, {VT_exponent,22,0x3a856c,{DOUBLEWITHTWODWORDINTREE(0x29600000,0x00000000)}}, {VT_exponent,22,0x3a856d,{DOUBLEWITHTWODWORDINTREE(0x29700000,0x00000000)}}, {VT_exponent,22,0x3a856e,{DOUBLEWITHTWODWORDINTREE(0x29800000,0x00000000)}}, {VT_exponent,22,0x3a856f,{DOUBLEWITHTWODWORDINTREE(0x29900000,0x00000000)}}, {VT_exponent,22,0x3a8570,{DOUBLEWITHTWODWORDINTREE(0x29a00000,0x00000000)}}, {VT_exponent,22,0x3a8571,{DOUBLEWITHTWODWORDINTREE(0x29b00000,0x00000000)}}, {VT_exponent,22,0x3a8572,{DOUBLEWITHTWODWORDINTREE(0x29c00000,0x00000000)}}, {VT_exponent,22,0x3a8573,{DOUBLEWITHTWODWORDINTREE(0x29d00000,0x00000000)}}, {VT_exponent,22,0x3a8574,{DOUBLEWITHTWODWORDINTREE(0x29e00000,0x00000000)}}, {VT_exponent,22,0x3a8575,{DOUBLEWITHTWODWORDINTREE(0x29f00000,0x00000000)}}, {VT_exponent,22,0x3a8576,{DOUBLEWITHTWODWORDINTREE(0x2a000000,0x00000000)}}, {VT_exponent,22,0x3a8577,{DOUBLEWITHTWODWORDINTREE(0x2a100000,0x00000000)}}, {VT_exponent,22,0x3a8578,{DOUBLEWITHTWODWORDINTREE(0x2a200000,0x00000000)}}, {VT_exponent,22,0x3a8579,{DOUBLEWITHTWODWORDINTREE(0x2a300000,0x00000000)}}, {VT_exponent,22,0x3a857a,{DOUBLEWITHTWODWORDINTREE(0x2a400000,0x00000000)}}, {VT_exponent,22,0x3a857b,{DOUBLEWITHTWODWORDINTREE(0x2a500000,0x00000000)}}, {VT_exponent,22,0x3a857c,{DOUBLEWITHTWODWORDINTREE(0x2a600000,0x00000000)}}, {VT_exponent,22,0x3a857d,{DOUBLEWITHTWODWORDINTREE(0x2a700000,0x00000000)}}, {VT_exponent,22,0x3a857e,{DOUBLEWITHTWODWORDINTREE(0x2a800000,0x00000000)}}, {VT_exponent,22,0x3a857f,{DOUBLEWITHTWODWORDINTREE(0x2a900000,0x00000000)}}, {VT_exponent,22,0x3a8580,{DOUBLEWITHTWODWORDINTREE(0x2aa00000,0x00000000)}}, {VT_exponent,22,0x3a8581,{DOUBLEWITHTWODWORDINTREE(0x2ab00000,0x00000000)}}, {VT_exponent,22,0x3a8582,{DOUBLEWITHTWODWORDINTREE(0x2ac00000,0x00000000)}}, {VT_exponent,22,0x3a8583,{DOUBLEWITHTWODWORDINTREE(0x2ad00000,0x00000000)}}, {VT_exponent,22,0x3a8584,{DOUBLEWITHTWODWORDINTREE(0x2ae00000,0x00000000)}}, {VT_exponent,22,0x3a8585,{DOUBLEWITHTWODWORDINTREE(0x2af00000,0x00000000)}}, {VT_exponent,22,0x3a8586,{DOUBLEWITHTWODWORDINTREE(0x2b000000,0x00000000)}}, {VT_exponent,22,0x3a8587,{DOUBLEWITHTWODWORDINTREE(0x2b100000,0x00000000)}}, {VT_exponent,22,0x3a8588,{DOUBLEWITHTWODWORDINTREE(0x2b200000,0x00000000)}}, {VT_exponent,22,0x3a8589,{DOUBLEWITHTWODWORDINTREE(0x2b300000,0x00000000)}}, {VT_exponent,22,0x3a858a,{DOUBLEWITHTWODWORDINTREE(0x2b400000,0x00000000)}}, {VT_exponent,22,0x3a858b,{DOUBLEWITHTWODWORDINTREE(0x2b500000,0x00000000)}}, {VT_exponent,22,0x3a858c,{DOUBLEWITHTWODWORDINTREE(0x2b600000,0x00000000)}}, {VT_exponent,22,0x3a858d,{DOUBLEWITHTWODWORDINTREE(0x2b700000,0x00000000)}}, {VT_exponent,22,0x3a858e,{DOUBLEWITHTWODWORDINTREE(0x2b800000,0x00000000)}}, {VT_exponent,22,0x3a858f,{DOUBLEWITHTWODWORDINTREE(0x2b900000,0x00000000)}}, {VT_exponent,22,0x3a8590,{DOUBLEWITHTWODWORDINTREE(0x2ba00000,0x00000000)}}, {VT_exponent,22,0x3a8591,{DOUBLEWITHTWODWORDINTREE(0x2bb00000,0x00000000)}}, {VT_exponent,22,0x3a8592,{DOUBLEWITHTWODWORDINTREE(0x2bc00000,0x00000000)}}, {VT_exponent,22,0x3a8593,{DOUBLEWITHTWODWORDINTREE(0x2bd00000,0x00000000)}}, {VT_exponent,22,0x3a8594,{DOUBLEWITHTWODWORDINTREE(0x2be00000,0x00000000)}}, {VT_exponent,22,0x3a8595,{DOUBLEWITHTWODWORDINTREE(0x2bf00000,0x00000000)}}, {VT_exponent,22,0x3a8596,{DOUBLEWITHTWODWORDINTREE(0x2c000000,0x00000000)}}, {VT_exponent,22,0x3a8597,{DOUBLEWITHTWODWORDINTREE(0x2c100000,0x00000000)}}, {VT_exponent,22,0x3a8598,{DOUBLEWITHTWODWORDINTREE(0x2c200000,0x00000000)}}, {VT_exponent,22,0x3a8599,{DOUBLEWITHTWODWORDINTREE(0x2c300000,0x00000000)}}, {VT_exponent,22,0x3a859a,{DOUBLEWITHTWODWORDINTREE(0x2c400000,0x00000000)}}, {VT_exponent,22,0x3a859b,{DOUBLEWITHTWODWORDINTREE(0x2c500000,0x00000000)}}, {VT_exponent,22,0x3a859c,{DOUBLEWITHTWODWORDINTREE(0x2c600000,0x00000000)}}, {VT_exponent,22,0x3a859d,{DOUBLEWITHTWODWORDINTREE(0x2c700000,0x00000000)}}, {VT_exponent,22,0x3a859e,{DOUBLEWITHTWODWORDINTREE(0x2c800000,0x00000000)}}, {VT_exponent,22,0x3a859f,{DOUBLEWITHTWODWORDINTREE(0x2c900000,0x00000000)}}, {VT_exponent,22,0x3a85a0,{DOUBLEWITHTWODWORDINTREE(0x2ca00000,0x00000000)}}, {VT_exponent,22,0x3a85a1,{DOUBLEWITHTWODWORDINTREE(0x2cb00000,0x00000000)}}, {VT_exponent,22,0x3a85a2,{DOUBLEWITHTWODWORDINTREE(0x2cc00000,0x00000000)}}, {VT_exponent,22,0x3a85a3,{DOUBLEWITHTWODWORDINTREE(0x2cd00000,0x00000000)}}, {VT_exponent,22,0x3a85a4,{DOUBLEWITHTWODWORDINTREE(0x2ce00000,0x00000000)}}, {VT_exponent,22,0x3a85a5,{DOUBLEWITHTWODWORDINTREE(0x2cf00000,0x00000000)}}, {VT_exponent,22,0x3a85a6,{DOUBLEWITHTWODWORDINTREE(0x2d000000,0x00000000)}}, {VT_exponent,22,0x3a85a7,{DOUBLEWITHTWODWORDINTREE(0x2d100000,0x00000000)}}, {VT_exponent,22,0x3a85a8,{DOUBLEWITHTWODWORDINTREE(0x2d200000,0x00000000)}}, {VT_exponent,22,0x3a85a9,{DOUBLEWITHTWODWORDINTREE(0x2d300000,0x00000000)}}, {VT_exponent,22,0x3a85aa,{DOUBLEWITHTWODWORDINTREE(0x2d400000,0x00000000)}}, {VT_exponent,22,0x3a85ab,{DOUBLEWITHTWODWORDINTREE(0x2d500000,0x00000000)}}, {VT_exponent,22,0x3a85ac,{DOUBLEWITHTWODWORDINTREE(0x2d600000,0x00000000)}}, {VT_exponent,22,0x3a85ad,{DOUBLEWITHTWODWORDINTREE(0x2d700000,0x00000000)}}, {VT_exponent,22,0x3a85ae,{DOUBLEWITHTWODWORDINTREE(0x2d800000,0x00000000)}}, {VT_exponent,22,0x3a85af,{DOUBLEWITHTWODWORDINTREE(0x2d900000,0x00000000)}}, {VT_exponent,22,0x3a85b0,{DOUBLEWITHTWODWORDINTREE(0x2da00000,0x00000000)}}, {VT_exponent,22,0x3a85b1,{DOUBLEWITHTWODWORDINTREE(0x2db00000,0x00000000)}}, {VT_exponent,22,0x3a85b2,{DOUBLEWITHTWODWORDINTREE(0x2dc00000,0x00000000)}}, {VT_exponent,22,0x3a85b3,{DOUBLEWITHTWODWORDINTREE(0x2dd00000,0x00000000)}}, {VT_exponent,22,0x3a85b4,{DOUBLEWITHTWODWORDINTREE(0x2de00000,0x00000000)}}, {VT_exponent,22,0x3a85b5,{DOUBLEWITHTWODWORDINTREE(0x2df00000,0x00000000)}}, {VT_exponent,22,0x3a85b6,{DOUBLEWITHTWODWORDINTREE(0x2e000000,0x00000000)}}, {VT_exponent,22,0x3a85b7,{DOUBLEWITHTWODWORDINTREE(0x2e100000,0x00000000)}}, {VT_exponent,22,0x3a85b8,{DOUBLEWITHTWODWORDINTREE(0x2e200000,0x00000000)}}, {VT_exponent,22,0x3a85b9,{DOUBLEWITHTWODWORDINTREE(0x2e300000,0x00000000)}}, {VT_exponent,22,0x3a85ba,{DOUBLEWITHTWODWORDINTREE(0x2e400000,0x00000000)}}, {VT_exponent,22,0x3a85bb,{DOUBLEWITHTWODWORDINTREE(0x2e500000,0x00000000)}}, {VT_exponent,22,0x3a85bc,{DOUBLEWITHTWODWORDINTREE(0x2e600000,0x00000000)}}, {VT_exponent,22,0x3a85bd,{DOUBLEWITHTWODWORDINTREE(0x2e700000,0x00000000)}}, {VT_exponent,22,0x3a85be,{DOUBLEWITHTWODWORDINTREE(0x2e800000,0x00000000)}}, {VT_exponent,22,0x3a85bf,{DOUBLEWITHTWODWORDINTREE(0x2e900000,0x00000000)}}, {VT_exponent,22,0x3a85c0,{DOUBLEWITHTWODWORDINTREE(0x2ea00000,0x00000000)}}, {VT_exponent,22,0x3a85c1,{DOUBLEWITHTWODWORDINTREE(0x2eb00000,0x00000000)}}, {VT_exponent,22,0x3a85c2,{DOUBLEWITHTWODWORDINTREE(0x2ec00000,0x00000000)}}, {VT_exponent,22,0x3a85c3,{DOUBLEWITHTWODWORDINTREE(0x2ed00000,0x00000000)}}, {VT_exponent,22,0x3a85c4,{DOUBLEWITHTWODWORDINTREE(0x2ee00000,0x00000000)}}, {VT_exponent,22,0x3a85c5,{DOUBLEWITHTWODWORDINTREE(0x2ef00000,0x00000000)}}, {VT_exponent,22,0x3a85c6,{DOUBLEWITHTWODWORDINTREE(0x2f000000,0x00000000)}}, {VT_exponent,22,0x3a85c7,{DOUBLEWITHTWODWORDINTREE(0x2f100000,0x00000000)}}, {VT_exponent,22,0x3a85c8,{DOUBLEWITHTWODWORDINTREE(0x2f200000,0x00000000)}}, {VT_exponent,22,0x3a85c9,{DOUBLEWITHTWODWORDINTREE(0x2f300000,0x00000000)}}, {VT_exponent,22,0x3a85ca,{DOUBLEWITHTWODWORDINTREE(0x2f400000,0x00000000)}}, {VT_exponent,22,0x3a85cb,{DOUBLEWITHTWODWORDINTREE(0x2f500000,0x00000000)}}, {VT_exponent,22,0x3a85cc,{DOUBLEWITHTWODWORDINTREE(0x2f600000,0x00000000)}}, {VT_exponent,22,0x3a85cd,{DOUBLEWITHTWODWORDINTREE(0x2f700000,0x00000000)}}, {VT_exponent,22,0x3a85ce,{DOUBLEWITHTWODWORDINTREE(0x2f800000,0x00000000)}}, {VT_exponent,22,0x3a85cf,{DOUBLEWITHTWODWORDINTREE(0x2f900000,0x00000000)}}, {VT_exponent,22,0x3a85d0,{DOUBLEWITHTWODWORDINTREE(0x2fa00000,0x00000000)}}, {VT_exponent,22,0x3a85d1,{DOUBLEWITHTWODWORDINTREE(0x2fb00000,0x00000000)}}, {VT_exponent,22,0x3a85d2,{DOUBLEWITHTWODWORDINTREE(0x2fc00000,0x00000000)}}, {VT_exponent,22,0x3a85d3,{DOUBLEWITHTWODWORDINTREE(0x2fd00000,0x00000000)}}, {VT_exponent,22,0x3a85d4,{DOUBLEWITHTWODWORDINTREE(0x2fe00000,0x00000000)}}, {VT_exponent,22,0x3a85d5,{DOUBLEWITHTWODWORDINTREE(0x2ff00000,0x00000000)}}, {VT_exponent,22,0x3a85d6,{DOUBLEWITHTWODWORDINTREE(0x30000000,0x00000000)}}, {VT_exponent,22,0x3a85d7,{DOUBLEWITHTWODWORDINTREE(0x30100000,0x00000000)}}, {VT_exponent,22,0x3a85d8,{DOUBLEWITHTWODWORDINTREE(0x30200000,0x00000000)}}, {VT_exponent,22,0x3a85d9,{DOUBLEWITHTWODWORDINTREE(0x30300000,0x00000000)}}, {VT_exponent,22,0x3a85da,{DOUBLEWITHTWODWORDINTREE(0x30400000,0x00000000)}}, {VT_exponent,22,0x3a85db,{DOUBLEWITHTWODWORDINTREE(0x30500000,0x00000000)}}, {VT_exponent,22,0x3a85dc,{DOUBLEWITHTWODWORDINTREE(0x30600000,0x00000000)}}, {VT_exponent,22,0x3a85dd,{DOUBLEWITHTWODWORDINTREE(0x30700000,0x00000000)}}, {VT_exponent,22,0x3a85de,{DOUBLEWITHTWODWORDINTREE(0x30800000,0x00000000)}}, {VT_exponent,22,0x3a85df,{DOUBLEWITHTWODWORDINTREE(0x30900000,0x00000000)}}, {VT_exponent,22,0x3a85e0,{DOUBLEWITHTWODWORDINTREE(0x30a00000,0x00000000)}}, {VT_exponent,22,0x3a85e1,{DOUBLEWITHTWODWORDINTREE(0x30b00000,0x00000000)}}, {VT_exponent,22,0x3a85e2,{DOUBLEWITHTWODWORDINTREE(0x30c00000,0x00000000)}}, {VT_exponent,22,0x3a85e3,{DOUBLEWITHTWODWORDINTREE(0x30d00000,0x00000000)}}, {VT_exponent,22,0x3a85e4,{DOUBLEWITHTWODWORDINTREE(0x30e00000,0x00000000)}}, {VT_exponent,22,0x3a85e5,{DOUBLEWITHTWODWORDINTREE(0x30f00000,0x00000000)}}, {VT_exponent,22,0x3a85e6,{DOUBLEWITHTWODWORDINTREE(0x31000000,0x00000000)}}, {VT_exponent,22,0x3a85e7,{DOUBLEWITHTWODWORDINTREE(0x31100000,0x00000000)}}, {VT_exponent,22,0x3a85e8,{DOUBLEWITHTWODWORDINTREE(0x31200000,0x00000000)}}, {VT_exponent,22,0x3a85e9,{DOUBLEWITHTWODWORDINTREE(0x31300000,0x00000000)}}, {VT_exponent,22,0x3a85ea,{DOUBLEWITHTWODWORDINTREE(0x31400000,0x00000000)}}, {VT_exponent,22,0x3a85eb,{DOUBLEWITHTWODWORDINTREE(0x31500000,0x00000000)}}, {VT_exponent,22,0x3a85ec,{DOUBLEWITHTWODWORDINTREE(0x31600000,0x00000000)}}, {VT_exponent,22,0x3a85ed,{DOUBLEWITHTWODWORDINTREE(0x31700000,0x00000000)}}, {VT_exponent,22,0x3a85ee,{DOUBLEWITHTWODWORDINTREE(0x31800000,0x00000000)}}, {VT_exponent,22,0x3a85ef,{DOUBLEWITHTWODWORDINTREE(0x31900000,0x00000000)}}, {VT_exponent,22,0x3a85f0,{DOUBLEWITHTWODWORDINTREE(0x31a00000,0x00000000)}}, {VT_exponent,22,0x3a85f1,{DOUBLEWITHTWODWORDINTREE(0x31b00000,0x00000000)}}, {VT_exponent,22,0x3a85f2,{DOUBLEWITHTWODWORDINTREE(0x31c00000,0x00000000)}}, {VT_exponent,22,0x3a85f3,{DOUBLEWITHTWODWORDINTREE(0x31d00000,0x00000000)}}, {VT_exponent,22,0x3a85f4,{DOUBLEWITHTWODWORDINTREE(0x31e00000,0x00000000)}}, {VT_exponent,22,0x3a85f5,{DOUBLEWITHTWODWORDINTREE(0x31f00000,0x00000000)}}, {VT_exponent,22,0x3a85f6,{DOUBLEWITHTWODWORDINTREE(0x32000000,0x00000000)}}, {VT_exponent,22,0x3a85f7,{DOUBLEWITHTWODWORDINTREE(0x32100000,0x00000000)}}, {VT_exponent,22,0x3a85f8,{DOUBLEWITHTWODWORDINTREE(0x32200000,0x00000000)}}, {VT_exponent,22,0x3a85f9,{DOUBLEWITHTWODWORDINTREE(0x32300000,0x00000000)}}, {VT_exponent,22,0x3a85fa,{DOUBLEWITHTWODWORDINTREE(0x32400000,0x00000000)}}, {VT_exponent,22,0x3a85fb,{DOUBLEWITHTWODWORDINTREE(0x32500000,0x00000000)}}, {VT_exponent,22,0x3a85fc,{DOUBLEWITHTWODWORDINTREE(0x32600000,0x00000000)}}, {VT_exponent,22,0x3a85fd,{DOUBLEWITHTWODWORDINTREE(0x32700000,0x00000000)}}, {VT_exponent,22,0x3a85fe,{DOUBLEWITHTWODWORDINTREE(0x32800000,0x00000000)}}, {VT_exponent,22,0x3a85ff,{DOUBLEWITHTWODWORDINTREE(0x32900000,0x00000000)}}, {VT_exponent,22,0x3a8600,{DOUBLEWITHTWODWORDINTREE(0x32a00000,0x00000000)}}, {VT_exponent,22,0x3a8601,{DOUBLEWITHTWODWORDINTREE(0x32b00000,0x00000000)}}, {VT_exponent,22,0x3a8602,{DOUBLEWITHTWODWORDINTREE(0x32c00000,0x00000000)}}, {VT_exponent,22,0x3a8603,{DOUBLEWITHTWODWORDINTREE(0x32d00000,0x00000000)}}, {VT_exponent,22,0x3a8604,{DOUBLEWITHTWODWORDINTREE(0x32e00000,0x00000000)}}, {VT_exponent,22,0x3a8605,{DOUBLEWITHTWODWORDINTREE(0x32f00000,0x00000000)}}, {VT_exponent,22,0x3a8606,{DOUBLEWITHTWODWORDINTREE(0x33000000,0x00000000)}}, {VT_exponent,22,0x3a8607,{DOUBLEWITHTWODWORDINTREE(0x33100000,0x00000000)}}, {VT_exponent,22,0x3a8608,{DOUBLEWITHTWODWORDINTREE(0x33200000,0x00000000)}}, {VT_exponent,22,0x3a8609,{DOUBLEWITHTWODWORDINTREE(0x33300000,0x00000000)}}, {VT_exponent,22,0x3a860a,{DOUBLEWITHTWODWORDINTREE(0x33400000,0x00000000)}}, {VT_exponent,22,0x3a860b,{DOUBLEWITHTWODWORDINTREE(0x33500000,0x00000000)}}, {VT_exponent,22,0x3a860c,{DOUBLEWITHTWODWORDINTREE(0x33600000,0x00000000)}}, {VT_exponent,22,0x3a860d,{DOUBLEWITHTWODWORDINTREE(0x33700000,0x00000000)}}, {VT_exponent,22,0x3a860e,{DOUBLEWITHTWODWORDINTREE(0x33800000,0x00000000)}}, {VT_exponent,22,0x3a860f,{DOUBLEWITHTWODWORDINTREE(0x33900000,0x00000000)}}, {VT_exponent,22,0x3a8610,{DOUBLEWITHTWODWORDINTREE(0x33a00000,0x00000000)}}, {VT_exponent,22,0x3a8611,{DOUBLEWITHTWODWORDINTREE(0x33b00000,0x00000000)}}, {VT_exponent,22,0x3a8612,{DOUBLEWITHTWODWORDINTREE(0x33c00000,0x00000000)}}, {VT_exponent,22,0x3a8613,{DOUBLEWITHTWODWORDINTREE(0x33d00000,0x00000000)}}, {VT_exponent,22,0x3a8614,{DOUBLEWITHTWODWORDINTREE(0x33e00000,0x00000000)}}, {VT_exponent,22,0x3a8615,{DOUBLEWITHTWODWORDINTREE(0x33f00000,0x00000000)}}, {VT_exponent,22,0x3a8616,{DOUBLEWITHTWODWORDINTREE(0x34000000,0x00000000)}}, {VT_exponent,22,0x3a8617,{DOUBLEWITHTWODWORDINTREE(0x34100000,0x00000000)}}, {VT_exponent,22,0x3a8618,{DOUBLEWITHTWODWORDINTREE(0x34200000,0x00000000)}}, {VT_exponent,22,0x3a8619,{DOUBLEWITHTWODWORDINTREE(0x34300000,0x00000000)}}, {VT_exponent,22,0x3a861a,{DOUBLEWITHTWODWORDINTREE(0x34400000,0x00000000)}}, {VT_exponent,22,0x3a861b,{DOUBLEWITHTWODWORDINTREE(0x34500000,0x00000000)}}, {VT_exponent,22,0x3a861c,{DOUBLEWITHTWODWORDINTREE(0x34600000,0x00000000)}}, {VT_exponent,22,0x3a861d,{DOUBLEWITHTWODWORDINTREE(0x34700000,0x00000000)}}, {VT_exponent,22,0x3a861e,{DOUBLEWITHTWODWORDINTREE(0x34800000,0x00000000)}}, {VT_exponent,22,0x3a861f,{DOUBLEWITHTWODWORDINTREE(0x34900000,0x00000000)}}, {VT_exponent,22,0x3a8620,{DOUBLEWITHTWODWORDINTREE(0x34a00000,0x00000000)}}, {VT_exponent,22,0x3a8621,{DOUBLEWITHTWODWORDINTREE(0x34b00000,0x00000000)}}, {VT_exponent,22,0x3a8622,{DOUBLEWITHTWODWORDINTREE(0x34c00000,0x00000000)}}, {VT_exponent,22,0x3a8623,{DOUBLEWITHTWODWORDINTREE(0x34d00000,0x00000000)}}, {VT_exponent,22,0x3a8624,{DOUBLEWITHTWODWORDINTREE(0x34e00000,0x00000000)}}, {VT_exponent,22,0x3a8625,{DOUBLEWITHTWODWORDINTREE(0x34f00000,0x00000000)}}, {VT_exponent,22,0x3a8626,{DOUBLEWITHTWODWORDINTREE(0x35000000,0x00000000)}}, {VT_exponent,22,0x3a8627,{DOUBLEWITHTWODWORDINTREE(0x35100000,0x00000000)}}, {VT_exponent,22,0x3a8628,{DOUBLEWITHTWODWORDINTREE(0x35200000,0x00000000)}}, {VT_exponent,22,0x3a8629,{DOUBLEWITHTWODWORDINTREE(0x35300000,0x00000000)}}, {VT_exponent,18,0xf787,{DOUBLEWITHTWODWORDINTREE(0x35400000,0x00000000)}}, {VT_exponent,18,0xd1d4,{DOUBLEWITHTWODWORDINTREE(0x35500000,0x00000000)}}, {VT_exponent,19,0x77f9f,{DOUBLEWITHTWODWORDINTREE(0x35600000,0x00000000)}}, {VT_exponent,18,0x3b8fb,{DOUBLEWITHTWODWORDINTREE(0x35700000,0x00000000)}}, {VT_exponent,19,0x1ef1a,{DOUBLEWITHTWODWORDINTREE(0x35800000,0x00000000)}}, {VT_exponent,21,0x1d4315,{DOUBLEWITHTWODWORDINTREE(0x35900000,0x00000000)}}, {VT_exponent,16,0x3de2,{DOUBLEWITHTWODWORDINTREE(0x35a00000,0x00000000)}}, {VT_exponent,22,0x3a862c,{DOUBLEWITHTWODWORDINTREE(0x35b00000,0x00000000)}}, {VT_exponent,22,0x3a862d,{DOUBLEWITHTWODWORDINTREE(0x35c00000,0x00000000)}}, {VT_exponent,22,0x3a862e,{DOUBLEWITHTWODWORDINTREE(0x35d00000,0x00000000)}}, {VT_exponent,22,0x3a862f,{DOUBLEWITHTWODWORDINTREE(0x35e00000,0x00000000)}}, {VT_exponent,22,0x3a8630,{DOUBLEWITHTWODWORDINTREE(0x35f00000,0x00000000)}}, {VT_exponent,22,0x3a8631,{DOUBLEWITHTWODWORDINTREE(0x36000000,0x00000000)}}, {VT_exponent,22,0x3a8632,{DOUBLEWITHTWODWORDINTREE(0x36100000,0x00000000)}}, {VT_exponent,22,0x3a8633,{DOUBLEWITHTWODWORDINTREE(0x36200000,0x00000000)}}, {VT_exponent,22,0x3a8634,{DOUBLEWITHTWODWORDINTREE(0x36300000,0x00000000)}}, {VT_exponent,22,0x3a8635,{DOUBLEWITHTWODWORDINTREE(0x36400000,0x00000000)}}, {VT_exponent,22,0x3a8636,{DOUBLEWITHTWODWORDINTREE(0x36500000,0x00000000)}}, {VT_exponent,22,0x3a8637,{DOUBLEWITHTWODWORDINTREE(0x36600000,0x00000000)}}, {VT_exponent,22,0x3a8638,{DOUBLEWITHTWODWORDINTREE(0x36700000,0x00000000)}}, {VT_exponent,21,0x1d431d,{DOUBLEWITHTWODWORDINTREE(0x36800000,0x00000000)}}, {VT_exponent,22,0x3a8639,{DOUBLEWITHTWODWORDINTREE(0x36900000,0x00000000)}}, {VT_exponent,22,0x3a863c,{DOUBLEWITHTWODWORDINTREE(0x36a00000,0x00000000)}}, {VT_exponent,16,0x3de0,{DOUBLEWITHTWODWORDINTREE(0x36b00000,0x00000000)}}, {VT_exponent,18,0x3a95e,{DOUBLEWITHTWODWORDINTREE(0x36c00000,0x00000000)}}, {VT_exponent,21,0x1d431f,{DOUBLEWITHTWODWORDINTREE(0x36d00000,0x00000000)}}, {VT_exponent,22,0x3a863d,{DOUBLEWITHTWODWORDINTREE(0x36e00000,0x00000000)}}, {VT_exponent,22,0x3a8640,{DOUBLEWITHTWODWORDINTREE(0x36f00000,0x00000000)}}, {VT_exponent,20,0x34749,{DOUBLEWITHTWODWORDINTREE(0x37000000,0x00000000)}}, {VT_exponent,20,0x3474d,{DOUBLEWITHTWODWORDINTREE(0x37100000,0x00000000)}}, {VT_exponent,22,0x3a8641,{DOUBLEWITHTWODWORDINTREE(0x37200000,0x00000000)}}, {VT_exponent,22,0x3a8642,{DOUBLEWITHTWODWORDINTREE(0x37300000,0x00000000)}}, {VT_exponent,22,0x3a8643,{DOUBLEWITHTWODWORDINTREE(0x37400000,0x00000000)}}, {VT_exponent,22,0x3a8644,{DOUBLEWITHTWODWORDINTREE(0x37500000,0x00000000)}}, {VT_exponent,22,0x3a8645,{DOUBLEWITHTWODWORDINTREE(0x37600000,0x00000000)}}, {VT_exponent,22,0x3a8646,{DOUBLEWITHTWODWORDINTREE(0x37700000,0x00000000)}}, {VT_exponent,22,0x3a8647,{DOUBLEWITHTWODWORDINTREE(0x37800000,0x00000000)}}, {VT_exponent,22,0x3a8648,{DOUBLEWITHTWODWORDINTREE(0x37900000,0x00000000)}}, {VT_exponent,22,0x3a8649,{DOUBLEWITHTWODWORDINTREE(0x37a00000,0x00000000)}}, {VT_exponent,22,0x3a864a,{DOUBLEWITHTWODWORDINTREE(0x37b00000,0x00000000)}}, {VT_exponent,22,0x3a864b,{DOUBLEWITHTWODWORDINTREE(0x37c00000,0x00000000)}}, {VT_exponent,22,0x3a864c,{DOUBLEWITHTWODWORDINTREE(0x37d00000,0x00000000)}}, {VT_exponent,22,0x3a864d,{DOUBLEWITHTWODWORDINTREE(0x37e00000,0x00000000)}}, {VT_exponent,22,0x3a864e,{DOUBLEWITHTWODWORDINTREE(0x37f00000,0x00000000)}}, {VT_exponent,22,0x3a864f,{DOUBLEWITHTWODWORDINTREE(0x38000000,0x00000000)}}, {VT_exponent,22,0x3a8650,{DOUBLEWITHTWODWORDINTREE(0x38100000,0x00000000)}}, {VT_exponent,22,0x3a8651,{DOUBLEWITHTWODWORDINTREE(0x38200000,0x00000000)}}, {VT_exponent,22,0x3a8652,{DOUBLEWITHTWODWORDINTREE(0x38300000,0x00000000)}}, {VT_exponent,22,0x3a8653,{DOUBLEWITHTWODWORDINTREE(0x38400000,0x00000000)}}, {VT_exponent,22,0x3a8654,{DOUBLEWITHTWODWORDINTREE(0x38500000,0x00000000)}}, {VT_exponent,22,0x3a8655,{DOUBLEWITHTWODWORDINTREE(0x38600000,0x00000000)}}, {VT_exponent,22,0x3a8656,{DOUBLEWITHTWODWORDINTREE(0x38700000,0x00000000)}}, {VT_exponent,22,0x3a8657,{DOUBLEWITHTWODWORDINTREE(0x38800000,0x00000000)}}, {VT_exponent,22,0x3a8658,{DOUBLEWITHTWODWORDINTREE(0x38900000,0x00000000)}}, {VT_exponent,22,0x3a8659,{DOUBLEWITHTWODWORDINTREE(0x38a00000,0x00000000)}}, {VT_exponent,22,0x3a865a,{DOUBLEWITHTWODWORDINTREE(0x38b00000,0x00000000)}}, {VT_exponent,22,0x3a865b,{DOUBLEWITHTWODWORDINTREE(0x38c00000,0x00000000)}}, {VT_exponent,22,0x3a865c,{DOUBLEWITHTWODWORDINTREE(0x38d00000,0x00000000)}}, {VT_exponent,22,0x3a865d,{DOUBLEWITHTWODWORDINTREE(0x38e00000,0x00000000)}}, {VT_exponent,21,0x1d432f,{DOUBLEWITHTWODWORDINTREE(0x38f00000,0x00000000)}}, {VT_exponent,22,0x3a8660,{DOUBLEWITHTWODWORDINTREE(0x39000000,0x00000000)}}, {VT_exponent,22,0x3a8661,{DOUBLEWITHTWODWORDINTREE(0x39100000,0x00000000)}}, {VT_exponent,22,0x3a8662,{DOUBLEWITHTWODWORDINTREE(0x39200000,0x00000000)}}, {VT_exponent,21,0x1d4332,{DOUBLEWITHTWODWORDINTREE(0x39300000,0x00000000)}}, {VT_exponent,18,0xd1d5,{DOUBLEWITHTWODWORDINTREE(0x39400000,0x00000000)}}, {VT_exponent,18,0x3bfda,{DOUBLEWITHTWODWORDINTREE(0x39500000,0x00000000)}}, {VT_exponent,15,0x7528,{DOUBLEWITHTWODWORDINTREE(0x39600000,0x00000000)}}, {VT_exponent,15,0x7529,{DOUBLEWITHTWODWORDINTREE(0x39700000,0x00000000)}}, {VT_exponent,18,0x3a95f,{DOUBLEWITHTWODWORDINTREE(0x39800000,0x00000000)}}, {VT_exponent,17,0x1d434,{DOUBLEWITHTWODWORDINTREE(0x39900000,0x00000000)}}, {VT_exponent,19,0x750cd,{DOUBLEWITHTWODWORDINTREE(0x39a00000,0x00000000)}}, {VT_exponent,18,0x3a867,{DOUBLEWITHTWODWORDINTREE(0x39b00000,0x00000000)}}, {VT_exponent,19,0x771fd,{DOUBLEWITHTWODWORDINTREE(0x39c00000,0x00000000)}}, {VT_exponent,15,0x7764,{DOUBLEWITHTWODWORDINTREE(0x39d00000,0x00000000)}}, {VT_exponent,20,0xee3f9,{DOUBLEWITHTWODWORDINTREE(0x39e00000,0x00000000)}}, {VT_exponent,18,0x3bfdb,{DOUBLEWITHTWODWORDINTREE(0x39f00000,0x00000000)}}, {VT_exponent,16,0xeff7,{DOUBLEWITHTWODWORDINTREE(0x3a000000,0x00000000)}}, {VT_exponent,18,0xd1d6,{DOUBLEWITHTWODWORDINTREE(0x3a100000,0x00000000)}}, {VT_exponent,22,0x3a8663,{DOUBLEWITHTWODWORDINTREE(0x3a200000,0x00000000)}}, {VT_exponent,22,0x3a8666,{DOUBLEWITHTWODWORDINTREE(0x3a300000,0x00000000)}}, {VT_exponent,18,0x3b8fa,{DOUBLEWITHTWODWORDINTREE(0x3a400000,0x00000000)}}, {VT_exponent,17,0x1d435,{DOUBLEWITHTWODWORDINTREE(0x3a500000,0x00000000)}}, {VT_exponent,17,0x1dfe4,{DOUBLEWITHTWODWORDINTREE(0x3a600000,0x00000000)}}, {VT_exponent,19,0x750d8,{DOUBLEWITHTWODWORDINTREE(0x3a700000,0x00000000)}}, {VT_exponent,18,0x3a95b,{DOUBLEWITHTWODWORDINTREE(0x3a800000,0x00000000)}}, {VT_exponent,19,0x77f9e,{DOUBLEWITHTWODWORDINTREE(0x3a900000,0x00000000)}}, {VT_exponent,19,0x750d9,{DOUBLEWITHTWODWORDINTREE(0x3aa00000,0x00000000)}}, {VT_exponent,18,0xd1d7,{DOUBLEWITHTWODWORDINTREE(0x3ab00000,0x00000000)}}, {VT_exponent,18,0x3b8ff,{DOUBLEWITHTWODWORDINTREE(0x3ac00000,0x00000000)}}, {VT_exponent,17,0x1dc7c,{DOUBLEWITHTWODWORDINTREE(0x3ad00000,0x00000000)}}, {VT_exponent,19,0x750da,{DOUBLEWITHTWODWORDINTREE(0x3ae00000,0x00000000)}}, {VT_exponent,17,0x7bc2,{DOUBLEWITHTWODWORDINTREE(0x3af00000,0x00000000)}}, {VT_exponent,18,0x3bfca,{DOUBLEWITHTWODWORDINTREE(0x3b000000,0x00000000)}}, {VT_exponent,19,0x1a3a5,{DOUBLEWITHTWODWORDINTREE(0x3b100000,0x00000000)}}, {VT_exponent,17,0x1d4ac,{DOUBLEWITHTWODWORDINTREE(0x3b200000,0x00000000)}}, {VT_exponent,18,0x3a86e,{DOUBLEWITHTWODWORDINTREE(0x3b300000,0x00000000)}}, {VT_exponent,17,0x1d438,{DOUBLEWITHTWODWORDINTREE(0x3b400000,0x00000000)}}, {VT_exponent,18,0x3bfcb,{DOUBLEWITHTWODWORDINTREE(0x3b500000,0x00000000)}}, {VT_exponent,19,0x1a3a7,{DOUBLEWITHTWODWORDINTREE(0x3b600000,0x00000000)}}, {VT_exponent,17,0x1d4ae,{DOUBLEWITHTWODWORDINTREE(0x3b700000,0x00000000)}}, {VT_exponent,18,0x3bfce,{DOUBLEWITHTWODWORDINTREE(0x3b800000,0x00000000)}}, {VT_exponent,18,0xf78c,{DOUBLEWITHTWODWORDINTREE(0x3b900000,0x00000000)}}, {VT_exponent,17,0x1dfec,{DOUBLEWITHTWODWORDINTREE(0x3ba00000,0x00000000)}}, {VT_exponent,17,0x1d439,{DOUBLEWITHTWODWORDINTREE(0x3bb00000,0x00000000)}}, {VT_exponent,17,0x68e8,{DOUBLEWITHTWODWORDINTREE(0x3bc00000,0x00000000)}}, {VT_exponent,18,0xf786,{DOUBLEWITHTWODWORDINTREE(0x3bd00000,0x00000000)}}, {VT_exponent,15,0x771e,{DOUBLEWITHTWODWORDINTREE(0x3be00000,0x00000000)}}, {VT_exponent,17,0x1dfe6,{DOUBLEWITHTWODWORDINTREE(0x3bf00000,0x00000000)}}, {VT_exponent,15,0x77f8,{DOUBLEWITHTWODWORDINTREE(0x3c000000,0x00000000)}}, {VT_exponent,14,0x3bb3,{DOUBLEWITHTWODWORDINTREE(0x3c100000,0x00000000)}}, {VT_exponent,14,0x3b8e,{DOUBLEWITHTWODWORDINTREE(0x3c200000,0x00000000)}}, {VT_exponent,14,0x3a82,{DOUBLEWITHTWODWORDINTREE(0x3c300000,0x00000000)}}, {VT_exponent,14,0x3b96,{DOUBLEWITHTWODWORDINTREE(0x3c400000,0x00000000)}}, {VT_exponent,13,0x68f,{DOUBLEWITHTWODWORDINTREE(0x3c500000,0x00000000)}}, {VT_exponent,12,0x3d4,{DOUBLEWITHTWODWORDINTREE(0x3c600000,0x00000000)}}, {VT_exponent,13,0x1dca,{DOUBLEWITHTWODWORDINTREE(0x3c700000,0x00000000)}}, {VT_exponent,12,0x346,{DOUBLEWITHTWODWORDINTREE(0x3c800000,0x00000000)}}, {VT_exponent,12,0xee7,{DOUBLEWITHTWODWORDINTREE(0x3c900000,0x00000000)}}, {VT_exponent,12,0xeea,{DOUBLEWITHTWODWORDINTREE(0x3ca00000,0x00000000)}}, {VT_exponent,11,0x1ed,{DOUBLEWITHTWODWORDINTREE(0x3cb00000,0x00000000)}}, {VT_exponent,12,0x3df,{DOUBLEWITHTWODWORDINTREE(0x3cc00000,0x00000000)}}, {VT_exponent,11,0x1a2,{DOUBLEWITHTWODWORDINTREE(0x3cd00000,0x00000000)}}, {VT_exponent,11,0x56f,{DOUBLEWITHTWODWORDINTREE(0x3ce00000,0x00000000)}}, {VT_exponent,11,0xb9,{DOUBLEWITHTWODWORDINTREE(0x3cf00000,0x00000000)}}, {VT_exponent,13,0x7b2,{DOUBLEWITHTWODWORDINTREE(0x3d000000,0x00000000)}}, {VT_exponent,13,0x1dd8,{DOUBLEWITHTWODWORDINTREE(0x3d100000,0x00000000)}}, {VT_exponent,13,0x15ba,{DOUBLEWITHTWODWORDINTREE(0x3d200000,0x00000000)}}, {VT_exponent,12,0xee6,{DOUBLEWITHTWODWORDINTREE(0x3d300000,0x00000000)}}, {VT_exponent,13,0x15b8,{DOUBLEWITHTWODWORDINTREE(0x3d400000,0x00000000)}}, {VT_exponent,14,0xf79,{DOUBLEWITHTWODWORDINTREE(0x3d500000,0x00000000)}}, {VT_exponent,14,0x3a81,{DOUBLEWITHTWODWORDINTREE(0x3d600000,0x00000000)}}, {VT_exponent,14,0xd1c,{DOUBLEWITHTWODWORDINTREE(0x3d700000,0x00000000)}}, {VT_exponent,15,0x7765,{DOUBLEWITHTWODWORDINTREE(0x3d800000,0x00000000)}}, {VT_exponent,14,0xf54,{DOUBLEWITHTWODWORDINTREE(0x3d900000,0x00000000)}}, {VT_exponent,13,0x15b9,{DOUBLEWITHTWODWORDINTREE(0x3da00000,0x00000000)}}, {VT_exponent,13,0x7ab,{DOUBLEWITHTWODWORDINTREE(0x3db00000,0x00000000)}}, {VT_exponent,15,0x7500,{DOUBLEWITHTWODWORDINTREE(0x3dc00000,0x00000000)}}, {VT_exponent,15,0x1eaa,{DOUBLEWITHTWODWORDINTREE(0x3dd00000,0x00000000)}}, {VT_exponent,15,0x7501,{DOUBLEWITHTWODWORDINTREE(0x3de00000,0x00000000)}}, {VT_exponent,15,0x1eab,{DOUBLEWITHTWODWORDINTREE(0x3df00000,0x00000000)}}, {VT_exponent,14,0x3b97,{DOUBLEWITHTWODWORDINTREE(0x3e000000,0x00000000)}}, {VT_exponent,15,0x752a,{DOUBLEWITHTWODWORDINTREE(0x3e100000,0x00000000)}}, {VT_exponent,15,0x77fa,{DOUBLEWITHTWODWORDINTREE(0x3e200000,0x00000000)}}, {VT_double,10,0xf4,{DOUBLEWITHTWODWORDINTREE(0x3e35798e,0xe2308c3a)}}, {VT_exponent,14,0x3a93,{DOUBLEWITHTWODWORDINTREE(0x3e300000,0x00000000)}}, {VT_double,11,0x77c,{DOUBLEWITHTWODWORDINTREE(0x3e45798e,0xe2308c3a)}}, {VT_exponent,13,0x1dc6,{DOUBLEWITHTWODWORDINTREE(0x3e400000,0x00000000)}}, {VT_exponent,13,0x7bd,{DOUBLEWITHTWODWORDINTREE(0x3e500000,0x00000000)}}, {VT_exponent,13,0x1dff,{DOUBLEWITHTWODWORDINTREE(0x3e600000,0x00000000)}}, {VT_exponent,12,0xefe,{DOUBLEWITHTWODWORDINTREE(0x3e700000,0x00000000)}}, {VT_double,8,0xaf,{DOUBLEWITHTWODWORDINTREE(0x3e8ad7f2,0x9abcaf4a)}}, {VT_exponent,12,0xeed,{DOUBLEWITHTWODWORDINTREE(0x3e800000,0x00000000)}}, {VT_exponent,11,0xb8,{DOUBLEWITHTWODWORDINTREE(0x3e900000,0x00000000)}}, {VT_exponent,12,0x3d8,{DOUBLEWITHTWODWORDINTREE(0x3ea00000,0x00000000)}}, {VT_exponent,11,0x1eb,{DOUBLEWITHTWODWORDINTREE(0x3eb00000,0x00000000)}}, {VT_double,9,0x1d2,{DOUBLEWITHTWODWORDINTREE(0x3ec0c6f7,0xa0b5ed8e)}}, {VT_exponent,13,0x1d4b,{DOUBLEWITHTWODWORDINTREE(0x3ec00000,0x00000000)}}, {VT_exponent,13,0x7b3,{DOUBLEWITHTWODWORDINTREE(0x3ed00000,0x00000000)}}, {VT_exponent,10,0x5d,{DOUBLEWITHTWODWORDINTREE(0x3ee00000,0x00000000)}}, {VT_exponent,12,0xeeb,{DOUBLEWITHTWODWORDINTREE(0x3ef00000,0x00000000)}}, {VT_exponent,11,0x1ee,{DOUBLEWITHTWODWORDINTREE(0x3f000000,0x00000000)}}, {VT_exponent,10,0x5f,{DOUBLEWITHTWODWORDINTREE(0x3f100000,0x00000000)}}, {VT_exponent,10,0x2b6,{DOUBLEWITHTWODWORDINTREE(0x3f200000,0x00000000)}}, {VT_exponent,9,0x1de,{DOUBLEWITHTWODWORDINTREE(0x3f300000,0x00000000)}}, {VT_double,10,0xd0,{DOUBLEWITHTWODWORDINTREE(0x3f454c98,0x5f06f694)}}, {VT_double,6,0x9,{DOUBLEWITHTWODWORDINTREE(0x3f4a36e2,0xeb1c432d)}}, {VT_exponent,8,0xe8,{DOUBLEWITHTWODWORDINTREE(0x3f400000,0x00000000)}}, {VT_double,4,0xf,{DOUBLEWITHTWODWORDINTREE(0x3f50624d,0xd2f1a9fc)}}, {VT_exponent,8,0xae,{DOUBLEWITHTWODWORDINTREE(0x3f500000,0x00000000)}}, {VT_double,5,0x16,{DOUBLEWITHTWODWORDINTREE(0x3f60624d,0xd2f1a9fc)}}, {VT_exponent,7,0x1b,{DOUBLEWITHTWODWORDINTREE(0x3f600000,0x00000000)}}, {VT_exponent,7,0x76,{DOUBLEWITHTWODWORDINTREE(0x3f700000,0x00000000)}}, {VT_exponent,7,0xa,{DOUBLEWITHTWODWORDINTREE(0x3f800000,0x00000000)}}, {VT_exponent,6,0x8,{DOUBLEWITHTWODWORDINTREE(0x3f900000,0x00000000)}}, {VT_exponent,6,0xe,{DOUBLEWITHTWODWORDINTREE(0x3fa00000,0x00000000)}}, {VT_double,11,0x751,{DOUBLEWITHTWODWORDINTREE(0x3fbe69ad,0x42c3c9ee)}}, {VT_exponent,6,0x4,{DOUBLEWITHTWODWORDINTREE(0x3fb00000,0x00000000)}}, {VT_exponent,6,0xc,{DOUBLEWITHTWODWORDINTREE(0x3fc00000,0x00000000)}}, {VT_exponent,5,0x3,{DOUBLEWITHTWODWORDINTREE(0x3fd00000,0x00000000)}}, {VT_double,11,0x777,{DOUBLEWITHTWODWORDINTREE(0x3fe00000,0x00000000)}}, {VT_double,9,0x1d6,{DOUBLEWITHTWODWORDINTREE(0x3fefffff,0xf8000002)}}, {VT_exponent,4,0x8,{DOUBLEWITHTWODWORDINTREE(0x3fe00000,0x00000000)}}, {VT_double,4,0x0,{DOUBLEWITHTWODWORDINTREE(0x3ff00000,0x00000000)}}, {VT_exponent,5,0x13,{DOUBLEWITHTWODWORDINTREE(0x3ff00000,0x00000000)}}, {VT_exponent,5,0x1b,{DOUBLEWITHTWODWORDINTREE(0x40000000,0x00000000)}}, {VT_double,9,0x15a,{DOUBLEWITHTWODWORDINTREE(0x401921fb,0x54442d18)}}, {VT_exponent,5,0x17,{DOUBLEWITHTWODWORDINTREE(0x40100000,0x00000000)}}, {VT_exponent,5,0x12,{DOUBLEWITHTWODWORDINTREE(0x40200000,0x00000000)}}, {VT_double,11,0x774,{DOUBLEWITHTWODWORDINTREE(0x4035ee14,0x80000000)}}, {VT_exponent,5,0x19,{DOUBLEWITHTWODWORDINTREE(0x40300000,0x00000000)}}, {VT_double,9,0x1d3,{DOUBLEWITHTWODWORDINTREE(0x404ca5dc,0x1a63c1f8)}}, {VT_exponent,5,0x1a,{DOUBLEWITHTWODWORDINTREE(0x40400000,0x00000000)}}, {VT_double,11,0x77e,{DOUBLEWITHTWODWORDINTREE(0x405bb32f,0xe0000000)}}, {VT_double,10,0x5e,{DOUBLEWITHTWODWORDINTREE(0x405c332f,0xe0000000)}}, {VT_exponent,5,0x18,{DOUBLEWITHTWODWORDINTREE(0x40500000,0x00000000)}}, {VT_double,9,0x1d7,{DOUBLEWITHTWODWORDINTREE(0x40668000,0x00000000)}}, {VT_exponent,5,0x1c,{DOUBLEWITHTWODWORDINTREE(0x40600000,0x00000000)}}, {VT_double,9,0x1d5,{DOUBLEWITHTWODWORDINTREE(0x40768000,0x00000000)}}, {VT_exponent,5,0x14,{DOUBLEWITHTWODWORDINTREE(0x40700000,0x00000000)}}, {VT_double,11,0x77d,{DOUBLEWITHTWODWORDINTREE(0x408f4000,0x00000000)}}, {VT_exponent,5,0x5,{DOUBLEWITHTWODWORDINTREE(0x40800000,0x00000000)}}, {VT_double,10,0xd2,{DOUBLEWITHTWODWORDINTREE(0x409233ff,0xffffffff)}}, {VT_double,8,0x3c,{DOUBLEWITHTWODWORDINTREE(0x40923400,0x00000000)}}, {VT_double,11,0x753,{DOUBLEWITHTWODWORDINTREE(0x40923400,0x00000001)}}, {VT_double,10,0xd3,{DOUBLEWITHTWODWORDINTREE(0x4092abff,0xffffffff)}}, {VT_double,8,0x35,{DOUBLEWITHTWODWORDINTREE(0x4092ac00,0x00000000)}}, {VT_double,11,0x770,{DOUBLEWITHTWODWORDINTREE(0x4092ac00,0x00000001)}}, {VT_exponent,8,0x16,{DOUBLEWITHTWODWORDINTREE(0x40900000,0x00000000)}}, {VT_exponent,12,0xee2,{DOUBLEWITHTWODWORDINTREE(0x40a00000,0x00000000)}}, {VT_exponent,12,0xee4,{DOUBLEWITHTWODWORDINTREE(0x40b00000,0x00000000)}}, {VT_double,7,0x1f,{DOUBLEWITHTWODWORDINTREE(0x40c81c80,0x00000000)}}, {VT_exponent,8,0xac,{DOUBLEWITHTWODWORDINTREE(0x40c00000,0x00000000)}}, {VT_exponent,13,0x15bb,{DOUBLEWITHTWODWORDINTREE(0x40d00000,0x00000000)}}, {VT_exponent,22,0x3a8667,{DOUBLEWITHTWODWORDINTREE(0x40e00000,0x00000000)}}, {VT_exponent,22,0x3a86d8,{DOUBLEWITHTWODWORDINTREE(0x40f00000,0x00000000)}}, {VT_exponent,22,0x3a86d9,{DOUBLEWITHTWODWORDINTREE(0x41000000,0x00000000)}}, {VT_exponent,22,0x3a86da,{DOUBLEWITHTWODWORDINTREE(0x41100000,0x00000000)}}, {VT_exponent,17,0x1dc7e,{DOUBLEWITHTWODWORDINTREE(0x41200000,0x00000000)}}, {VT_exponent,22,0x3a86db,{DOUBLEWITHTWODWORDINTREE(0x41300000,0x00000000)}}, {VT_exponent,22,0x3a86dc,{DOUBLEWITHTWODWORDINTREE(0x41400000,0x00000000)}}, {VT_exponent,22,0x3a86dd,{DOUBLEWITHTWODWORDINTREE(0x41500000,0x00000000)}}, {VT_exponent,22,0x3a86de,{DOUBLEWITHTWODWORDINTREE(0x41600000,0x00000000)}}, {VT_exponent,22,0x3a86df,{DOUBLEWITHTWODWORDINTREE(0x41700000,0x00000000)}}, {VT_exponent,22,0x3a86f0,{DOUBLEWITHTWODWORDINTREE(0x41800000,0x00000000)}}, {VT_exponent,22,0x3a86f1,{DOUBLEWITHTWODWORDINTREE(0x41900000,0x00000000)}}, {VT_exponent,22,0x3a86f2,{DOUBLEWITHTWODWORDINTREE(0x41a00000,0x00000000)}}, {VT_exponent,22,0x3a86f3,{DOUBLEWITHTWODWORDINTREE(0x41b00000,0x00000000)}}, {VT_double,6,0x2a,{DOUBLEWITHTWODWORDINTREE(0x41cdcd64,0xff800000)}}, {VT_exponent,22,0x3a86f4,{DOUBLEWITHTWODWORDINTREE(0x41c00000,0x00000000)}}, {VT_exponent,22,0x3a86f5,{DOUBLEWITHTWODWORDINTREE(0x41d00000,0x00000000)}}, {VT_exponent,22,0x3a86f6,{DOUBLEWITHTWODWORDINTREE(0x41e00000,0x00000000)}}, {VT_exponent,22,0x3a86f7,{DOUBLEWITHTWODWORDINTREE(0x41f00000,0x00000000)}}, {VT_exponent,22,0x3a86f8,{DOUBLEWITHTWODWORDINTREE(0x42000000,0x00000000)}}, {VT_exponent,22,0x3a86f9,{DOUBLEWITHTWODWORDINTREE(0x42100000,0x00000000)}}, {VT_exponent,22,0x3a86fa,{DOUBLEWITHTWODWORDINTREE(0x42200000,0x00000000)}}, {VT_exponent,22,0x3a86fb,{DOUBLEWITHTWODWORDINTREE(0x42300000,0x00000000)}}, {VT_exponent,22,0x3a86fc,{DOUBLEWITHTWODWORDINTREE(0x42400000,0x00000000)}}, {VT_exponent,22,0x3a86fd,{DOUBLEWITHTWODWORDINTREE(0x42500000,0x00000000)}}, {VT_exponent,22,0x3a86fe,{DOUBLEWITHTWODWORDINTREE(0x42600000,0x00000000)}}, {VT_exponent,22,0x3a86ff,{DOUBLEWITHTWODWORDINTREE(0x42700000,0x00000000)}}, {VT_exponent,22,0x3a8740,{DOUBLEWITHTWODWORDINTREE(0x42800000,0x00000000)}}, {VT_exponent,22,0x3a8741,{DOUBLEWITHTWODWORDINTREE(0x42900000,0x00000000)}}, {VT_exponent,22,0x3a8742,{DOUBLEWITHTWODWORDINTREE(0x42a00000,0x00000000)}}, {VT_exponent,22,0x3a8743,{DOUBLEWITHTWODWORDINTREE(0x42b00000,0x00000000)}}, {VT_exponent,22,0x3a8744,{DOUBLEWITHTWODWORDINTREE(0x42c00000,0x00000000)}}, {VT_exponent,22,0x3a8745,{DOUBLEWITHTWODWORDINTREE(0x42d00000,0x00000000)}}, {VT_exponent,22,0x3a8746,{DOUBLEWITHTWODWORDINTREE(0x42e00000,0x00000000)}}, {VT_exponent,22,0x3a8747,{DOUBLEWITHTWODWORDINTREE(0x42f00000,0x00000000)}}, {VT_exponent,22,0x3a8748,{DOUBLEWITHTWODWORDINTREE(0x43000000,0x00000000)}}, {VT_exponent,22,0x3a8749,{DOUBLEWITHTWODWORDINTREE(0x43100000,0x00000000)}}, {VT_exponent,22,0x3a874a,{DOUBLEWITHTWODWORDINTREE(0x43200000,0x00000000)}}, {VT_exponent,22,0x3a874b,{DOUBLEWITHTWODWORDINTREE(0x43300000,0x00000000)}}, {VT_exponent,22,0x3a874c,{DOUBLEWITHTWODWORDINTREE(0x43400000,0x00000000)}}, {VT_exponent,22,0x3a874d,{DOUBLEWITHTWODWORDINTREE(0x43500000,0x00000000)}}, {VT_exponent,22,0x3a874e,{DOUBLEWITHTWODWORDINTREE(0x43600000,0x00000000)}}, {VT_exponent,22,0x3a874f,{DOUBLEWITHTWODWORDINTREE(0x43700000,0x00000000)}}, {VT_exponent,22,0x3a8750,{DOUBLEWITHTWODWORDINTREE(0x43800000,0x00000000)}}, {VT_exponent,22,0x3a8751,{DOUBLEWITHTWODWORDINTREE(0x43900000,0x00000000)}}, {VT_exponent,22,0x3a8752,{DOUBLEWITHTWODWORDINTREE(0x43a00000,0x00000000)}}, {VT_exponent,22,0x3a8753,{DOUBLEWITHTWODWORDINTREE(0x43b00000,0x00000000)}}, {VT_exponent,22,0x3a8754,{DOUBLEWITHTWODWORDINTREE(0x43c00000,0x00000000)}}, {VT_exponent,22,0x3a8755,{DOUBLEWITHTWODWORDINTREE(0x43d00000,0x00000000)}}, {VT_exponent,22,0x3a8756,{DOUBLEWITHTWODWORDINTREE(0x43e00000,0x00000000)}}, {VT_exponent,22,0x3a8757,{DOUBLEWITHTWODWORDINTREE(0x43f00000,0x00000000)}}, {VT_exponent,22,0x3a8758,{DOUBLEWITHTWODWORDINTREE(0x44000000,0x00000000)}}, {VT_exponent,15,0x1a3b,{DOUBLEWITHTWODWORDINTREE(0x44100000,0x00000000)}}, {VT_exponent,22,0x3a8759,{DOUBLEWITHTWODWORDINTREE(0x44200000,0x00000000)}}, {VT_exponent,22,0x3a875a,{DOUBLEWITHTWODWORDINTREE(0x44300000,0x00000000)}}, {VT_exponent,22,0x3a875b,{DOUBLEWITHTWODWORDINTREE(0x44400000,0x00000000)}}, {VT_exponent,22,0x3a875c,{DOUBLEWITHTWODWORDINTREE(0x44500000,0x00000000)}}, {VT_exponent,22,0x3a875d,{DOUBLEWITHTWODWORDINTREE(0x44600000,0x00000000)}}, {VT_exponent,22,0x3a875e,{DOUBLEWITHTWODWORDINTREE(0x44700000,0x00000000)}}, {VT_exponent,22,0x3a875f,{DOUBLEWITHTWODWORDINTREE(0x44800000,0x00000000)}}, {VT_exponent,22,0x3a8760,{DOUBLEWITHTWODWORDINTREE(0x44900000,0x00000000)}}, {VT_exponent,22,0x3a8761,{DOUBLEWITHTWODWORDINTREE(0x44a00000,0x00000000)}}, {VT_exponent,22,0x3a8762,{DOUBLEWITHTWODWORDINTREE(0x44b00000,0x00000000)}}, {VT_exponent,22,0x3a8763,{DOUBLEWITHTWODWORDINTREE(0x44c00000,0x00000000)}}, {VT_exponent,22,0x3a8764,{DOUBLEWITHTWODWORDINTREE(0x44d00000,0x00000000)}}, {VT_exponent,22,0x3a8765,{DOUBLEWITHTWODWORDINTREE(0x44e00000,0x00000000)}}, {VT_exponent,22,0x3a8766,{DOUBLEWITHTWODWORDINTREE(0x44f00000,0x00000000)}}, {VT_exponent,22,0x3a8767,{DOUBLEWITHTWODWORDINTREE(0x45000000,0x00000000)}}, {VT_exponent,22,0x3a8768,{DOUBLEWITHTWODWORDINTREE(0x45100000,0x00000000)}}, {VT_exponent,22,0x3a8769,{DOUBLEWITHTWODWORDINTREE(0x45200000,0x00000000)}}, {VT_exponent,22,0x3a876a,{DOUBLEWITHTWODWORDINTREE(0x45300000,0x00000000)}}, {VT_exponent,22,0x3a876b,{DOUBLEWITHTWODWORDINTREE(0x45400000,0x00000000)}}, {VT_exponent,22,0x3a876c,{DOUBLEWITHTWODWORDINTREE(0x45500000,0x00000000)}}, {VT_exponent,22,0x3a876d,{DOUBLEWITHTWODWORDINTREE(0x45600000,0x00000000)}}, {VT_exponent,22,0x3a876e,{DOUBLEWITHTWODWORDINTREE(0x45700000,0x00000000)}}, {VT_exponent,22,0x3a876f,{DOUBLEWITHTWODWORDINTREE(0x45800000,0x00000000)}}, {VT_exponent,22,0x3a8770,{DOUBLEWITHTWODWORDINTREE(0x45900000,0x00000000)}}, {VT_exponent,22,0x3a8771,{DOUBLEWITHTWODWORDINTREE(0x45a00000,0x00000000)}}, {VT_exponent,22,0x3a8772,{DOUBLEWITHTWODWORDINTREE(0x45b00000,0x00000000)}}, {VT_exponent,22,0x3a8773,{DOUBLEWITHTWODWORDINTREE(0x45c00000,0x00000000)}}, {VT_exponent,22,0x3a8774,{DOUBLEWITHTWODWORDINTREE(0x45d00000,0x00000000)}}, {VT_exponent,22,0x3a8775,{DOUBLEWITHTWODWORDINTREE(0x45e00000,0x00000000)}}, {VT_exponent,22,0x3a8776,{DOUBLEWITHTWODWORDINTREE(0x45f00000,0x00000000)}}, {VT_exponent,22,0x3a8777,{DOUBLEWITHTWODWORDINTREE(0x46000000,0x00000000)}}, {VT_exponent,22,0x3a8778,{DOUBLEWITHTWODWORDINTREE(0x46100000,0x00000000)}}, {VT_exponent,22,0x3a8779,{DOUBLEWITHTWODWORDINTREE(0x46200000,0x00000000)}}, {VT_exponent,22,0x3a877a,{DOUBLEWITHTWODWORDINTREE(0x46300000,0x00000000)}}, {VT_exponent,22,0x3a877b,{DOUBLEWITHTWODWORDINTREE(0x46400000,0x00000000)}}, {VT_exponent,22,0x3a877c,{DOUBLEWITHTWODWORDINTREE(0x46500000,0x00000000)}}, {VT_exponent,22,0x3a877d,{DOUBLEWITHTWODWORDINTREE(0x46600000,0x00000000)}}, {VT_exponent,22,0x3a877e,{DOUBLEWITHTWODWORDINTREE(0x46700000,0x00000000)}}, {VT_exponent,22,0x3a877f,{DOUBLEWITHTWODWORDINTREE(0x46800000,0x00000000)}}, {VT_exponent,22,0x3a8780,{DOUBLEWITHTWODWORDINTREE(0x46900000,0x00000000)}}, {VT_exponent,22,0x3a8781,{DOUBLEWITHTWODWORDINTREE(0x46a00000,0x00000000)}}, {VT_exponent,22,0x3a8782,{DOUBLEWITHTWODWORDINTREE(0x46b00000,0x00000000)}}, {VT_exponent,22,0x3a8783,{DOUBLEWITHTWODWORDINTREE(0x46c00000,0x00000000)}}, {VT_exponent,22,0x3a8784,{DOUBLEWITHTWODWORDINTREE(0x46d00000,0x00000000)}}, {VT_exponent,22,0x3a8785,{DOUBLEWITHTWODWORDINTREE(0x46e00000,0x00000000)}}, {VT_exponent,22,0x3a8786,{DOUBLEWITHTWODWORDINTREE(0x46f00000,0x00000000)}}, {VT_exponent,22,0x3a8787,{DOUBLEWITHTWODWORDINTREE(0x47000000,0x00000000)}}, {VT_exponent,22,0x3a8788,{DOUBLEWITHTWODWORDINTREE(0x47100000,0x00000000)}}, {VT_exponent,22,0x3a8789,{DOUBLEWITHTWODWORDINTREE(0x47200000,0x00000000)}}, {VT_exponent,22,0x3a878a,{DOUBLEWITHTWODWORDINTREE(0x47300000,0x00000000)}}, {VT_exponent,22,0x3a878b,{DOUBLEWITHTWODWORDINTREE(0x47400000,0x00000000)}}, {VT_exponent,22,0x3a878c,{DOUBLEWITHTWODWORDINTREE(0x47500000,0x00000000)}}, {VT_exponent,22,0x3a878d,{DOUBLEWITHTWODWORDINTREE(0x47600000,0x00000000)}}, {VT_exponent,22,0x3a878e,{DOUBLEWITHTWODWORDINTREE(0x47700000,0x00000000)}}, {VT_exponent,22,0x3a878f,{DOUBLEWITHTWODWORDINTREE(0x47800000,0x00000000)}}, {VT_exponent,22,0x3a8790,{DOUBLEWITHTWODWORDINTREE(0x47900000,0x00000000)}}, {VT_exponent,22,0x3a8791,{DOUBLEWITHTWODWORDINTREE(0x47a00000,0x00000000)}}, {VT_exponent,22,0x3a8792,{DOUBLEWITHTWODWORDINTREE(0x47b00000,0x00000000)}}, {VT_exponent,22,0x3a8793,{DOUBLEWITHTWODWORDINTREE(0x47c00000,0x00000000)}}, {VT_exponent,22,0x3a8794,{DOUBLEWITHTWODWORDINTREE(0x47d00000,0x00000000)}}, {VT_exponent,22,0x3a8795,{DOUBLEWITHTWODWORDINTREE(0x47e00000,0x00000000)}}, {VT_exponent,22,0x3a8796,{DOUBLEWITHTWODWORDINTREE(0x47f00000,0x00000000)}}, {VT_exponent,22,0x3a8797,{DOUBLEWITHTWODWORDINTREE(0x48000000,0x00000000)}}, {VT_exponent,22,0x3a8798,{DOUBLEWITHTWODWORDINTREE(0x48100000,0x00000000)}}, {VT_exponent,22,0x3a8799,{DOUBLEWITHTWODWORDINTREE(0x48200000,0x00000000)}}, {VT_exponent,22,0x3a879a,{DOUBLEWITHTWODWORDINTREE(0x48300000,0x00000000)}}, {VT_exponent,22,0x3a879b,{DOUBLEWITHTWODWORDINTREE(0x48400000,0x00000000)}}, {VT_exponent,22,0x3a879c,{DOUBLEWITHTWODWORDINTREE(0x48500000,0x00000000)}}, {VT_exponent,22,0x3a879d,{DOUBLEWITHTWODWORDINTREE(0x48600000,0x00000000)}}, {VT_exponent,22,0x3a879e,{DOUBLEWITHTWODWORDINTREE(0x48700000,0x00000000)}}, {VT_exponent,22,0x3a879f,{DOUBLEWITHTWODWORDINTREE(0x48800000,0x00000000)}}, {VT_exponent,22,0x3a87a0,{DOUBLEWITHTWODWORDINTREE(0x48900000,0x00000000)}}, {VT_exponent,22,0x3a87a1,{DOUBLEWITHTWODWORDINTREE(0x48a00000,0x00000000)}}, {VT_exponent,22,0x3a87a2,{DOUBLEWITHTWODWORDINTREE(0x48b00000,0x00000000)}}, {VT_exponent,22,0x3a87a3,{DOUBLEWITHTWODWORDINTREE(0x48c00000,0x00000000)}}, {VT_exponent,22,0x3a87a4,{DOUBLEWITHTWODWORDINTREE(0x48d00000,0x00000000)}}, {VT_exponent,22,0x3a87a5,{DOUBLEWITHTWODWORDINTREE(0x48e00000,0x00000000)}}, {VT_exponent,22,0x3a87a6,{DOUBLEWITHTWODWORDINTREE(0x48f00000,0x00000000)}}, {VT_exponent,22,0x3a87a7,{DOUBLEWITHTWODWORDINTREE(0x49000000,0x00000000)}}, {VT_exponent,22,0x3a87a8,{DOUBLEWITHTWODWORDINTREE(0x49100000,0x00000000)}}, {VT_exponent,22,0x3a87a9,{DOUBLEWITHTWODWORDINTREE(0x49200000,0x00000000)}}, {VT_exponent,22,0x3a87aa,{DOUBLEWITHTWODWORDINTREE(0x49300000,0x00000000)}}, {VT_exponent,22,0x3a87ab,{DOUBLEWITHTWODWORDINTREE(0x49400000,0x00000000)}}, {VT_exponent,22,0x3a87ac,{DOUBLEWITHTWODWORDINTREE(0x49500000,0x00000000)}}, {VT_exponent,22,0x3a87ad,{DOUBLEWITHTWODWORDINTREE(0x49600000,0x00000000)}}, {VT_exponent,22,0x3a87ae,{DOUBLEWITHTWODWORDINTREE(0x49700000,0x00000000)}}, {VT_exponent,22,0x3a87af,{DOUBLEWITHTWODWORDINTREE(0x49800000,0x00000000)}}, {VT_exponent,22,0x3a87b0,{DOUBLEWITHTWODWORDINTREE(0x49900000,0x00000000)}}, {VT_exponent,22,0x3a87b1,{DOUBLEWITHTWODWORDINTREE(0x49a00000,0x00000000)}}, {VT_exponent,22,0x3a87b2,{DOUBLEWITHTWODWORDINTREE(0x49b00000,0x00000000)}}, {VT_exponent,22,0x3a87b3,{DOUBLEWITHTWODWORDINTREE(0x49c00000,0x00000000)}}, {VT_exponent,22,0x3a87b4,{DOUBLEWITHTWODWORDINTREE(0x49d00000,0x00000000)}}, {VT_exponent,22,0x3a87b5,{DOUBLEWITHTWODWORDINTREE(0x49e00000,0x00000000)}}, {VT_exponent,22,0x3a87b6,{DOUBLEWITHTWODWORDINTREE(0x49f00000,0x00000000)}}, {VT_exponent,22,0x3a87b7,{DOUBLEWITHTWODWORDINTREE(0x4a000000,0x00000000)}}, {VT_exponent,22,0x3a87b8,{DOUBLEWITHTWODWORDINTREE(0x4a100000,0x00000000)}}, {VT_exponent,22,0x3a87b9,{DOUBLEWITHTWODWORDINTREE(0x4a200000,0x00000000)}}, {VT_exponent,22,0x3a87ba,{DOUBLEWITHTWODWORDINTREE(0x4a300000,0x00000000)}}, {VT_exponent,22,0x3a87bb,{DOUBLEWITHTWODWORDINTREE(0x4a400000,0x00000000)}}, {VT_exponent,22,0x3a87bc,{DOUBLEWITHTWODWORDINTREE(0x4a500000,0x00000000)}}, {VT_exponent,22,0x3a87bd,{DOUBLEWITHTWODWORDINTREE(0x4a600000,0x00000000)}}, {VT_exponent,22,0x3a87be,{DOUBLEWITHTWODWORDINTREE(0x4a700000,0x00000000)}}, {VT_exponent,22,0x3a87bf,{DOUBLEWITHTWODWORDINTREE(0x4a800000,0x00000000)}}, {VT_exponent,22,0x3a87c0,{DOUBLEWITHTWODWORDINTREE(0x4a900000,0x00000000)}}, {VT_exponent,22,0x3a87c1,{DOUBLEWITHTWODWORDINTREE(0x4aa00000,0x00000000)}}, {VT_exponent,22,0x3a87c2,{DOUBLEWITHTWODWORDINTREE(0x4ab00000,0x00000000)}}, {VT_exponent,22,0x3a87c3,{DOUBLEWITHTWODWORDINTREE(0x4ac00000,0x00000000)}}, {VT_exponent,22,0x3a87c4,{DOUBLEWITHTWODWORDINTREE(0x4ad00000,0x00000000)}}, {VT_exponent,22,0x3a87c5,{DOUBLEWITHTWODWORDINTREE(0x4ae00000,0x00000000)}}, {VT_exponent,22,0x3a87c6,{DOUBLEWITHTWODWORDINTREE(0x4af00000,0x00000000)}}, {VT_exponent,22,0x3a87c7,{DOUBLEWITHTWODWORDINTREE(0x4b000000,0x00000000)}}, {VT_exponent,22,0x3a87c8,{DOUBLEWITHTWODWORDINTREE(0x4b100000,0x00000000)}}, {VT_exponent,22,0x3a87c9,{DOUBLEWITHTWODWORDINTREE(0x4b200000,0x00000000)}}, {VT_exponent,22,0x3a87ca,{DOUBLEWITHTWODWORDINTREE(0x4b300000,0x00000000)}}, {VT_exponent,22,0x3a87cb,{DOUBLEWITHTWODWORDINTREE(0x4b400000,0x00000000)}}, {VT_exponent,22,0x3a87cc,{DOUBLEWITHTWODWORDINTREE(0x4b500000,0x00000000)}}, {VT_exponent,22,0x3a87cd,{DOUBLEWITHTWODWORDINTREE(0x4b600000,0x00000000)}}, {VT_exponent,22,0x3a87ce,{DOUBLEWITHTWODWORDINTREE(0x4b700000,0x00000000)}}, {VT_exponent,22,0x3a87cf,{DOUBLEWITHTWODWORDINTREE(0x4b800000,0x00000000)}}, {VT_exponent,22,0x3a87d0,{DOUBLEWITHTWODWORDINTREE(0x4b900000,0x00000000)}}, {VT_exponent,22,0x3a87d1,{DOUBLEWITHTWODWORDINTREE(0x4ba00000,0x00000000)}}, {VT_exponent,22,0x3a87d2,{DOUBLEWITHTWODWORDINTREE(0x4bb00000,0x00000000)}}, {VT_exponent,22,0x3a87d3,{DOUBLEWITHTWODWORDINTREE(0x4bc00000,0x00000000)}}, {VT_exponent,22,0x3a87d4,{DOUBLEWITHTWODWORDINTREE(0x4bd00000,0x00000000)}}, {VT_exponent,22,0x3a87d5,{DOUBLEWITHTWODWORDINTREE(0x4be00000,0x00000000)}}, {VT_exponent,22,0x3a87d6,{DOUBLEWITHTWODWORDINTREE(0x4bf00000,0x00000000)}}, {VT_exponent,22,0x3a87d7,{DOUBLEWITHTWODWORDINTREE(0x4c000000,0x00000000)}}, {VT_exponent,22,0x3a87d8,{DOUBLEWITHTWODWORDINTREE(0x4c100000,0x00000000)}}, {VT_exponent,22,0x3a87d9,{DOUBLEWITHTWODWORDINTREE(0x4c200000,0x00000000)}}, {VT_exponent,22,0x3a87da,{DOUBLEWITHTWODWORDINTREE(0x4c300000,0x00000000)}}, {VT_exponent,22,0x3a87db,{DOUBLEWITHTWODWORDINTREE(0x4c400000,0x00000000)}}, {VT_exponent,22,0x3a87dc,{DOUBLEWITHTWODWORDINTREE(0x4c500000,0x00000000)}}, {VT_exponent,22,0x3a87dd,{DOUBLEWITHTWODWORDINTREE(0x4c600000,0x00000000)}}, {VT_exponent,22,0x3a87de,{DOUBLEWITHTWODWORDINTREE(0x4c700000,0x00000000)}}, {VT_exponent,22,0x3a87df,{DOUBLEWITHTWODWORDINTREE(0x4c800000,0x00000000)}}, {VT_exponent,22,0x3a87e0,{DOUBLEWITHTWODWORDINTREE(0x4c900000,0x00000000)}}, {VT_exponent,22,0x3a87e1,{DOUBLEWITHTWODWORDINTREE(0x4ca00000,0x00000000)}}, {VT_exponent,22,0x3a87e2,{DOUBLEWITHTWODWORDINTREE(0x4cb00000,0x00000000)}}, {VT_exponent,22,0x3a87e3,{DOUBLEWITHTWODWORDINTREE(0x4cc00000,0x00000000)}}, {VT_exponent,22,0x3a87e4,{DOUBLEWITHTWODWORDINTREE(0x4cd00000,0x00000000)}}, {VT_exponent,22,0x3a87e5,{DOUBLEWITHTWODWORDINTREE(0x4ce00000,0x00000000)}}, {VT_exponent,22,0x3a87e6,{DOUBLEWITHTWODWORDINTREE(0x4cf00000,0x00000000)}}, {VT_exponent,22,0x3a87e7,{DOUBLEWITHTWODWORDINTREE(0x4d000000,0x00000000)}}, {VT_exponent,22,0x3a87e8,{DOUBLEWITHTWODWORDINTREE(0x4d100000,0x00000000)}}, {VT_exponent,22,0x3a87e9,{DOUBLEWITHTWODWORDINTREE(0x4d200000,0x00000000)}}, {VT_exponent,22,0x3a87ea,{DOUBLEWITHTWODWORDINTREE(0x4d300000,0x00000000)}}, {VT_exponent,22,0x3a87eb,{DOUBLEWITHTWODWORDINTREE(0x4d400000,0x00000000)}}, {VT_exponent,22,0x3a87ec,{DOUBLEWITHTWODWORDINTREE(0x4d500000,0x00000000)}}, {VT_exponent,22,0x3a87ed,{DOUBLEWITHTWODWORDINTREE(0x4d600000,0x00000000)}}, {VT_exponent,22,0x3a87ee,{DOUBLEWITHTWODWORDINTREE(0x4d700000,0x00000000)}}, {VT_exponent,22,0x3a87ef,{DOUBLEWITHTWODWORDINTREE(0x4d800000,0x00000000)}}, {VT_exponent,22,0x3a87f0,{DOUBLEWITHTWODWORDINTREE(0x4d900000,0x00000000)}}, {VT_exponent,22,0x3a87f1,{DOUBLEWITHTWODWORDINTREE(0x4da00000,0x00000000)}}, {VT_exponent,22,0x3a87f2,{DOUBLEWITHTWODWORDINTREE(0x4db00000,0x00000000)}}, {VT_exponent,22,0x3a87f3,{DOUBLEWITHTWODWORDINTREE(0x4dc00000,0x00000000)}}, {VT_exponent,22,0x3a87f4,{DOUBLEWITHTWODWORDINTREE(0x4dd00000,0x00000000)}}, {VT_exponent,22,0x3a87f5,{DOUBLEWITHTWODWORDINTREE(0x4de00000,0x00000000)}}, {VT_exponent,22,0x3a87f6,{DOUBLEWITHTWODWORDINTREE(0x4df00000,0x00000000)}}, {VT_exponent,22,0x3a87f7,{DOUBLEWITHTWODWORDINTREE(0x4e000000,0x00000000)}}, {VT_exponent,22,0x3a87f8,{DOUBLEWITHTWODWORDINTREE(0x4e100000,0x00000000)}}, {VT_exponent,22,0x3a87f9,{DOUBLEWITHTWODWORDINTREE(0x4e200000,0x00000000)}}, {VT_exponent,22,0x3a87fa,{DOUBLEWITHTWODWORDINTREE(0x4e300000,0x00000000)}}, {VT_exponent,22,0x3a87fb,{DOUBLEWITHTWODWORDINTREE(0x4e400000,0x00000000)}}, {VT_exponent,22,0x3a87fc,{DOUBLEWITHTWODWORDINTREE(0x4e500000,0x00000000)}}, {VT_exponent,22,0x3a87fd,{DOUBLEWITHTWODWORDINTREE(0x4e600000,0x00000000)}}, {VT_exponent,22,0x3a87fe,{DOUBLEWITHTWODWORDINTREE(0x4e700000,0x00000000)}}, {VT_exponent,22,0x3a87ff,{DOUBLEWITHTWODWORDINTREE(0x4e800000,0x00000000)}}, {VT_exponent,22,0x3a9000,{DOUBLEWITHTWODWORDINTREE(0x4e900000,0x00000000)}}, {VT_exponent,22,0x3a9001,{DOUBLEWITHTWODWORDINTREE(0x4ea00000,0x00000000)}}, {VT_exponent,22,0x3a9002,{DOUBLEWITHTWODWORDINTREE(0x4eb00000,0x00000000)}}, {VT_exponent,22,0x3a9003,{DOUBLEWITHTWODWORDINTREE(0x4ec00000,0x00000000)}}, {VT_exponent,22,0x3a9004,{DOUBLEWITHTWODWORDINTREE(0x4ed00000,0x00000000)}}, {VT_exponent,22,0x3a9005,{DOUBLEWITHTWODWORDINTREE(0x4ee00000,0x00000000)}}, {VT_exponent,22,0x3a9006,{DOUBLEWITHTWODWORDINTREE(0x4ef00000,0x00000000)}}, {VT_exponent,22,0x3a9007,{DOUBLEWITHTWODWORDINTREE(0x4f000000,0x00000000)}}, {VT_exponent,22,0x3a9008,{DOUBLEWITHTWODWORDINTREE(0x4f100000,0x00000000)}}, {VT_exponent,22,0x3a9009,{DOUBLEWITHTWODWORDINTREE(0x4f200000,0x00000000)}}, {VT_exponent,22,0x3a900a,{DOUBLEWITHTWODWORDINTREE(0x4f300000,0x00000000)}}, {VT_exponent,22,0x3a900b,{DOUBLEWITHTWODWORDINTREE(0x4f400000,0x00000000)}}, {VT_exponent,22,0x3a900c,{DOUBLEWITHTWODWORDINTREE(0x4f500000,0x00000000)}}, {VT_exponent,22,0x3a900d,{DOUBLEWITHTWODWORDINTREE(0x4f600000,0x00000000)}}, {VT_exponent,22,0x3a900e,{DOUBLEWITHTWODWORDINTREE(0x4f700000,0x00000000)}}, {VT_exponent,22,0x3a900f,{DOUBLEWITHTWODWORDINTREE(0x4f800000,0x00000000)}}, {VT_exponent,22,0x3a9010,{DOUBLEWITHTWODWORDINTREE(0x4f900000,0x00000000)}}, {VT_exponent,22,0x3a9011,{DOUBLEWITHTWODWORDINTREE(0x4fa00000,0x00000000)}}, {VT_exponent,22,0x3a9012,{DOUBLEWITHTWODWORDINTREE(0x4fb00000,0x00000000)}}, {VT_exponent,22,0x3a9013,{DOUBLEWITHTWODWORDINTREE(0x4fc00000,0x00000000)}}, {VT_exponent,22,0x3a9014,{DOUBLEWITHTWODWORDINTREE(0x4fd00000,0x00000000)}}, {VT_exponent,22,0x3a9015,{DOUBLEWITHTWODWORDINTREE(0x4fe00000,0x00000000)}}, {VT_exponent,22,0x3a9016,{DOUBLEWITHTWODWORDINTREE(0x4ff00000,0x00000000)}}, {VT_exponent,22,0x3a9017,{DOUBLEWITHTWODWORDINTREE(0x50000000,0x00000000)}}, {VT_exponent,22,0x3a9018,{DOUBLEWITHTWODWORDINTREE(0x50100000,0x00000000)}}, {VT_exponent,22,0x3a9019,{DOUBLEWITHTWODWORDINTREE(0x50200000,0x00000000)}}, {VT_exponent,22,0x3a901a,{DOUBLEWITHTWODWORDINTREE(0x50300000,0x00000000)}}, {VT_exponent,22,0x3a901b,{DOUBLEWITHTWODWORDINTREE(0x50400000,0x00000000)}}, {VT_exponent,22,0x3a901c,{DOUBLEWITHTWODWORDINTREE(0x50500000,0x00000000)}}, {VT_exponent,22,0x3a901d,{DOUBLEWITHTWODWORDINTREE(0x50600000,0x00000000)}}, {VT_exponent,22,0x3a901e,{DOUBLEWITHTWODWORDINTREE(0x50700000,0x00000000)}}, {VT_exponent,22,0x3a901f,{DOUBLEWITHTWODWORDINTREE(0x50800000,0x00000000)}}, {VT_exponent,22,0x3a9020,{DOUBLEWITHTWODWORDINTREE(0x50900000,0x00000000)}}, {VT_exponent,22,0x3a9021,{DOUBLEWITHTWODWORDINTREE(0x50a00000,0x00000000)}}, {VT_exponent,22,0x3a9022,{DOUBLEWITHTWODWORDINTREE(0x50b00000,0x00000000)}}, {VT_exponent,22,0x3a9023,{DOUBLEWITHTWODWORDINTREE(0x50c00000,0x00000000)}}, {VT_exponent,22,0x3a9024,{DOUBLEWITHTWODWORDINTREE(0x50d00000,0x00000000)}}, {VT_exponent,22,0x3a9025,{DOUBLEWITHTWODWORDINTREE(0x50e00000,0x00000000)}}, {VT_exponent,22,0x3a9026,{DOUBLEWITHTWODWORDINTREE(0x50f00000,0x00000000)}}, {VT_exponent,22,0x3a9027,{DOUBLEWITHTWODWORDINTREE(0x51000000,0x00000000)}}, {VT_exponent,22,0x3a9028,{DOUBLEWITHTWODWORDINTREE(0x51100000,0x00000000)}}, {VT_exponent,22,0x3a9029,{DOUBLEWITHTWODWORDINTREE(0x51200000,0x00000000)}}, {VT_exponent,22,0x3a902a,{DOUBLEWITHTWODWORDINTREE(0x51300000,0x00000000)}}, {VT_exponent,22,0x3a902b,{DOUBLEWITHTWODWORDINTREE(0x51400000,0x00000000)}}, {VT_exponent,22,0x3a902c,{DOUBLEWITHTWODWORDINTREE(0x51500000,0x00000000)}}, {VT_exponent,22,0x3a902d,{DOUBLEWITHTWODWORDINTREE(0x51600000,0x00000000)}}, {VT_exponent,22,0x3a902e,{DOUBLEWITHTWODWORDINTREE(0x51700000,0x00000000)}}, {VT_exponent,22,0x3a902f,{DOUBLEWITHTWODWORDINTREE(0x51800000,0x00000000)}}, {VT_exponent,22,0x3a9030,{DOUBLEWITHTWODWORDINTREE(0x51900000,0x00000000)}}, {VT_exponent,22,0x3a9031,{DOUBLEWITHTWODWORDINTREE(0x51a00000,0x00000000)}}, {VT_exponent,22,0x3a9032,{DOUBLEWITHTWODWORDINTREE(0x51b00000,0x00000000)}}, {VT_exponent,22,0x3a9033,{DOUBLEWITHTWODWORDINTREE(0x51c00000,0x00000000)}}, {VT_exponent,22,0x3a9034,{DOUBLEWITHTWODWORDINTREE(0x51d00000,0x00000000)}}, {VT_exponent,22,0x3a9035,{DOUBLEWITHTWODWORDINTREE(0x51e00000,0x00000000)}}, {VT_exponent,22,0x3a9036,{DOUBLEWITHTWODWORDINTREE(0x51f00000,0x00000000)}}, {VT_exponent,22,0x3a9037,{DOUBLEWITHTWODWORDINTREE(0x52000000,0x00000000)}}, {VT_exponent,22,0x3a9038,{DOUBLEWITHTWODWORDINTREE(0x52100000,0x00000000)}}, {VT_exponent,22,0x3a9039,{DOUBLEWITHTWODWORDINTREE(0x52200000,0x00000000)}}, {VT_exponent,22,0x3a903a,{DOUBLEWITHTWODWORDINTREE(0x52300000,0x00000000)}}, {VT_exponent,22,0x3a903b,{DOUBLEWITHTWODWORDINTREE(0x52400000,0x00000000)}}, {VT_exponent,22,0x3a903c,{DOUBLEWITHTWODWORDINTREE(0x52500000,0x00000000)}}, {VT_exponent,22,0x3a903d,{DOUBLEWITHTWODWORDINTREE(0x52600000,0x00000000)}}, {VT_exponent,22,0x3a903e,{DOUBLEWITHTWODWORDINTREE(0x52700000,0x00000000)}}, {VT_exponent,22,0x3a903f,{DOUBLEWITHTWODWORDINTREE(0x52800000,0x00000000)}}, {VT_exponent,22,0x3a9040,{DOUBLEWITHTWODWORDINTREE(0x52900000,0x00000000)}}, {VT_exponent,22,0x3a9041,{DOUBLEWITHTWODWORDINTREE(0x52a00000,0x00000000)}}, {VT_exponent,22,0x3a9042,{DOUBLEWITHTWODWORDINTREE(0x52b00000,0x00000000)}}, {VT_exponent,22,0x3a9043,{DOUBLEWITHTWODWORDINTREE(0x52c00000,0x00000000)}}, {VT_exponent,22,0x3a9044,{DOUBLEWITHTWODWORDINTREE(0x52d00000,0x00000000)}}, {VT_exponent,22,0x3a9045,{DOUBLEWITHTWODWORDINTREE(0x52e00000,0x00000000)}}, {VT_exponent,22,0x3a9046,{DOUBLEWITHTWODWORDINTREE(0x52f00000,0x00000000)}}, {VT_exponent,22,0x3a9047,{DOUBLEWITHTWODWORDINTREE(0x53000000,0x00000000)}}, {VT_exponent,22,0x3a9048,{DOUBLEWITHTWODWORDINTREE(0x53100000,0x00000000)}}, {VT_exponent,22,0x3a9049,{DOUBLEWITHTWODWORDINTREE(0x53200000,0x00000000)}}, {VT_exponent,22,0x3a904a,{DOUBLEWITHTWODWORDINTREE(0x53300000,0x00000000)}}, {VT_exponent,22,0x3a904b,{DOUBLEWITHTWODWORDINTREE(0x53400000,0x00000000)}}, {VT_exponent,22,0x3a904c,{DOUBLEWITHTWODWORDINTREE(0x53500000,0x00000000)}}, {VT_exponent,22,0x3a904d,{DOUBLEWITHTWODWORDINTREE(0x53600000,0x00000000)}}, {VT_exponent,22,0x3a904e,{DOUBLEWITHTWODWORDINTREE(0x53700000,0x00000000)}}, {VT_exponent,22,0x3a904f,{DOUBLEWITHTWODWORDINTREE(0x53800000,0x00000000)}}, {VT_exponent,22,0x3a9050,{DOUBLEWITHTWODWORDINTREE(0x53900000,0x00000000)}}, {VT_exponent,22,0x3a9051,{DOUBLEWITHTWODWORDINTREE(0x53a00000,0x00000000)}}, {VT_exponent,22,0x3a9052,{DOUBLEWITHTWODWORDINTREE(0x53b00000,0x00000000)}}, {VT_exponent,22,0x3a9053,{DOUBLEWITHTWODWORDINTREE(0x53c00000,0x00000000)}}, {VT_exponent,22,0x3a9054,{DOUBLEWITHTWODWORDINTREE(0x53d00000,0x00000000)}}, {VT_exponent,22,0x3a9055,{DOUBLEWITHTWODWORDINTREE(0x53e00000,0x00000000)}}, {VT_exponent,22,0x3a9056,{DOUBLEWITHTWODWORDINTREE(0x53f00000,0x00000000)}}, {VT_exponent,22,0x3a9057,{DOUBLEWITHTWODWORDINTREE(0x54000000,0x00000000)}}, {VT_exponent,22,0x3a9058,{DOUBLEWITHTWODWORDINTREE(0x54100000,0x00000000)}}, {VT_exponent,22,0x3a9059,{DOUBLEWITHTWODWORDINTREE(0x54200000,0x00000000)}}, {VT_exponent,22,0x3a905a,{DOUBLEWITHTWODWORDINTREE(0x54300000,0x00000000)}}, {VT_exponent,22,0x3a905b,{DOUBLEWITHTWODWORDINTREE(0x54400000,0x00000000)}}, {VT_exponent,22,0x3a905c,{DOUBLEWITHTWODWORDINTREE(0x54500000,0x00000000)}}, {VT_exponent,22,0x3a905d,{DOUBLEWITHTWODWORDINTREE(0x54600000,0x00000000)}}, {VT_exponent,22,0x3a905e,{DOUBLEWITHTWODWORDINTREE(0x54700000,0x00000000)}}, {VT_exponent,22,0x3a905f,{DOUBLEWITHTWODWORDINTREE(0x54800000,0x00000000)}}, {VT_exponent,22,0x3a9060,{DOUBLEWITHTWODWORDINTREE(0x54900000,0x00000000)}}, {VT_exponent,22,0x3a9061,{DOUBLEWITHTWODWORDINTREE(0x54a00000,0x00000000)}}, {VT_exponent,22,0x3a9062,{DOUBLEWITHTWODWORDINTREE(0x54b00000,0x00000000)}}, {VT_exponent,22,0x3a9063,{DOUBLEWITHTWODWORDINTREE(0x54c00000,0x00000000)}}, {VT_exponent,22,0x3a9064,{DOUBLEWITHTWODWORDINTREE(0x54d00000,0x00000000)}}, {VT_exponent,22,0x3a9065,{DOUBLEWITHTWODWORDINTREE(0x54e00000,0x00000000)}}, {VT_exponent,22,0x3a9066,{DOUBLEWITHTWODWORDINTREE(0x54f00000,0x00000000)}}, {VT_exponent,22,0x3a9067,{DOUBLEWITHTWODWORDINTREE(0x55000000,0x00000000)}}, {VT_exponent,22,0x3a9068,{DOUBLEWITHTWODWORDINTREE(0x55100000,0x00000000)}}, {VT_exponent,22,0x3a9069,{DOUBLEWITHTWODWORDINTREE(0x55200000,0x00000000)}}, {VT_exponent,22,0x3a906a,{DOUBLEWITHTWODWORDINTREE(0x55300000,0x00000000)}}, {VT_exponent,22,0x3a906b,{DOUBLEWITHTWODWORDINTREE(0x55400000,0x00000000)}}, {VT_exponent,22,0x3a906c,{DOUBLEWITHTWODWORDINTREE(0x55500000,0x00000000)}}, {VT_exponent,22,0x3a906d,{DOUBLEWITHTWODWORDINTREE(0x55600000,0x00000000)}}, {VT_exponent,22,0x3a906e,{DOUBLEWITHTWODWORDINTREE(0x55700000,0x00000000)}}, {VT_exponent,22,0x3a906f,{DOUBLEWITHTWODWORDINTREE(0x55800000,0x00000000)}}, {VT_exponent,22,0x3a9070,{DOUBLEWITHTWODWORDINTREE(0x55900000,0x00000000)}}, {VT_exponent,22,0x3a9071,{DOUBLEWITHTWODWORDINTREE(0x55a00000,0x00000000)}}, {VT_exponent,22,0x3a9072,{DOUBLEWITHTWODWORDINTREE(0x55b00000,0x00000000)}}, {VT_exponent,22,0x3a9073,{DOUBLEWITHTWODWORDINTREE(0x55c00000,0x00000000)}}, {VT_exponent,22,0x3a9074,{DOUBLEWITHTWODWORDINTREE(0x55d00000,0x00000000)}}, {VT_exponent,22,0x3a9075,{DOUBLEWITHTWODWORDINTREE(0x55e00000,0x00000000)}}, {VT_exponent,22,0x3a9076,{DOUBLEWITHTWODWORDINTREE(0x55f00000,0x00000000)}}, {VT_exponent,22,0x3a9077,{DOUBLEWITHTWODWORDINTREE(0x56000000,0x00000000)}}, {VT_exponent,22,0x3a9078,{DOUBLEWITHTWODWORDINTREE(0x56100000,0x00000000)}}, {VT_exponent,22,0x3a9079,{DOUBLEWITHTWODWORDINTREE(0x56200000,0x00000000)}}, {VT_exponent,22,0x3a907a,{DOUBLEWITHTWODWORDINTREE(0x56300000,0x00000000)}}, {VT_exponent,22,0x3a907b,{DOUBLEWITHTWODWORDINTREE(0x56400000,0x00000000)}}, {VT_exponent,22,0x3a907c,{DOUBLEWITHTWODWORDINTREE(0x56500000,0x00000000)}}, {VT_exponent,22,0x3a907d,{DOUBLEWITHTWODWORDINTREE(0x56600000,0x00000000)}}, {VT_exponent,22,0x3a907e,{DOUBLEWITHTWODWORDINTREE(0x56700000,0x00000000)}}, {VT_exponent,22,0x3a907f,{DOUBLEWITHTWODWORDINTREE(0x56800000,0x00000000)}}, {VT_exponent,22,0x3a9080,{DOUBLEWITHTWODWORDINTREE(0x56900000,0x00000000)}}, {VT_exponent,22,0x3a9081,{DOUBLEWITHTWODWORDINTREE(0x56a00000,0x00000000)}}, {VT_exponent,22,0x3a9082,{DOUBLEWITHTWODWORDINTREE(0x56b00000,0x00000000)}}, {VT_exponent,22,0x3a9083,{DOUBLEWITHTWODWORDINTREE(0x56c00000,0x00000000)}}, {VT_exponent,22,0x3a9084,{DOUBLEWITHTWODWORDINTREE(0x56d00000,0x00000000)}}, {VT_exponent,22,0x3a9085,{DOUBLEWITHTWODWORDINTREE(0x56e00000,0x00000000)}}, {VT_exponent,22,0x3a9086,{DOUBLEWITHTWODWORDINTREE(0x56f00000,0x00000000)}}, {VT_exponent,22,0x3a9087,{DOUBLEWITHTWODWORDINTREE(0x57000000,0x00000000)}}, {VT_exponent,22,0x3a9088,{DOUBLEWITHTWODWORDINTREE(0x57100000,0x00000000)}}, {VT_exponent,22,0x3a9089,{DOUBLEWITHTWODWORDINTREE(0x57200000,0x00000000)}}, {VT_exponent,22,0x3a908a,{DOUBLEWITHTWODWORDINTREE(0x57300000,0x00000000)}}, {VT_exponent,22,0x3a908b,{DOUBLEWITHTWODWORDINTREE(0x57400000,0x00000000)}}, {VT_exponent,22,0x3a908c,{DOUBLEWITHTWODWORDINTREE(0x57500000,0x00000000)}}, {VT_exponent,22,0x3a908d,{DOUBLEWITHTWODWORDINTREE(0x57600000,0x00000000)}}, {VT_exponent,22,0x3a908e,{DOUBLEWITHTWODWORDINTREE(0x57700000,0x00000000)}}, {VT_exponent,22,0x3a908f,{DOUBLEWITHTWODWORDINTREE(0x57800000,0x00000000)}}, {VT_exponent,22,0x3a9090,{DOUBLEWITHTWODWORDINTREE(0x57900000,0x00000000)}}, {VT_exponent,22,0x3a9091,{DOUBLEWITHTWODWORDINTREE(0x57a00000,0x00000000)}}, {VT_exponent,22,0x3a9092,{DOUBLEWITHTWODWORDINTREE(0x57b00000,0x00000000)}}, {VT_exponent,22,0x3a9093,{DOUBLEWITHTWODWORDINTREE(0x57c00000,0x00000000)}}, {VT_exponent,22,0x3a9094,{DOUBLEWITHTWODWORDINTREE(0x57d00000,0x00000000)}}, {VT_exponent,22,0x3a9095,{DOUBLEWITHTWODWORDINTREE(0x57e00000,0x00000000)}}, {VT_exponent,22,0x3a9096,{DOUBLEWITHTWODWORDINTREE(0x57f00000,0x00000000)}}, {VT_exponent,22,0x3a9097,{DOUBLEWITHTWODWORDINTREE(0x58000000,0x00000000)}}, {VT_exponent,22,0x3a9098,{DOUBLEWITHTWODWORDINTREE(0x58100000,0x00000000)}}, {VT_exponent,22,0x3a9099,{DOUBLEWITHTWODWORDINTREE(0x58200000,0x00000000)}}, {VT_exponent,22,0x3a909a,{DOUBLEWITHTWODWORDINTREE(0x58300000,0x00000000)}}, {VT_exponent,22,0x3a909b,{DOUBLEWITHTWODWORDINTREE(0x58400000,0x00000000)}}, {VT_exponent,22,0x3a909c,{DOUBLEWITHTWODWORDINTREE(0x58500000,0x00000000)}}, {VT_exponent,22,0x3a909d,{DOUBLEWITHTWODWORDINTREE(0x58600000,0x00000000)}}, {VT_exponent,22,0x3a909e,{DOUBLEWITHTWODWORDINTREE(0x58700000,0x00000000)}}, {VT_exponent,22,0x3a909f,{DOUBLEWITHTWODWORDINTREE(0x58800000,0x00000000)}}, {VT_exponent,22,0x3a90a0,{DOUBLEWITHTWODWORDINTREE(0x58900000,0x00000000)}}, {VT_exponent,22,0x3a90a1,{DOUBLEWITHTWODWORDINTREE(0x58a00000,0x00000000)}}, {VT_exponent,22,0x3a90a2,{DOUBLEWITHTWODWORDINTREE(0x58b00000,0x00000000)}}, {VT_exponent,22,0x3a90a3,{DOUBLEWITHTWODWORDINTREE(0x58c00000,0x00000000)}}, {VT_exponent,22,0x3a90a4,{DOUBLEWITHTWODWORDINTREE(0x58d00000,0x00000000)}}, {VT_exponent,22,0x3a90a5,{DOUBLEWITHTWODWORDINTREE(0x58e00000,0x00000000)}}, {VT_exponent,22,0x3a90a6,{DOUBLEWITHTWODWORDINTREE(0x58f00000,0x00000000)}}, {VT_exponent,22,0x3a90a7,{DOUBLEWITHTWODWORDINTREE(0x59000000,0x00000000)}}, {VT_exponent,22,0x3a90a8,{DOUBLEWITHTWODWORDINTREE(0x59100000,0x00000000)}}, {VT_exponent,22,0x3a90a9,{DOUBLEWITHTWODWORDINTREE(0x59200000,0x00000000)}}, {VT_exponent,22,0x3a90aa,{DOUBLEWITHTWODWORDINTREE(0x59300000,0x00000000)}}, {VT_exponent,22,0x3a90ab,{DOUBLEWITHTWODWORDINTREE(0x59400000,0x00000000)}}, {VT_exponent,22,0x3a90ac,{DOUBLEWITHTWODWORDINTREE(0x59500000,0x00000000)}}, {VT_exponent,22,0x3a90ad,{DOUBLEWITHTWODWORDINTREE(0x59600000,0x00000000)}}, {VT_exponent,22,0x3a90ae,{DOUBLEWITHTWODWORDINTREE(0x59700000,0x00000000)}}, {VT_exponent,22,0x3a90af,{DOUBLEWITHTWODWORDINTREE(0x59800000,0x00000000)}}, {VT_exponent,22,0x3a90b0,{DOUBLEWITHTWODWORDINTREE(0x59900000,0x00000000)}}, {VT_exponent,22,0x3a90b1,{DOUBLEWITHTWODWORDINTREE(0x59a00000,0x00000000)}}, {VT_exponent,22,0x3a90b2,{DOUBLEWITHTWODWORDINTREE(0x59b00000,0x00000000)}}, {VT_exponent,22,0x3a90b3,{DOUBLEWITHTWODWORDINTREE(0x59c00000,0x00000000)}}, {VT_exponent,22,0x3a90b4,{DOUBLEWITHTWODWORDINTREE(0x59d00000,0x00000000)}}, {VT_exponent,22,0x3a90b5,{DOUBLEWITHTWODWORDINTREE(0x59e00000,0x00000000)}}, {VT_exponent,22,0x3a90b6,{DOUBLEWITHTWODWORDINTREE(0x59f00000,0x00000000)}}, {VT_exponent,22,0x3a90b7,{DOUBLEWITHTWODWORDINTREE(0x5a000000,0x00000000)}}, {VT_exponent,22,0x3a90b8,{DOUBLEWITHTWODWORDINTREE(0x5a100000,0x00000000)}}, {VT_exponent,22,0x3a90b9,{DOUBLEWITHTWODWORDINTREE(0x5a200000,0x00000000)}}, {VT_exponent,22,0x3a90ba,{DOUBLEWITHTWODWORDINTREE(0x5a300000,0x00000000)}}, {VT_exponent,22,0x3a90bb,{DOUBLEWITHTWODWORDINTREE(0x5a400000,0x00000000)}}, {VT_exponent,22,0x3a90bc,{DOUBLEWITHTWODWORDINTREE(0x5a500000,0x00000000)}}, {VT_exponent,22,0x3a90bd,{DOUBLEWITHTWODWORDINTREE(0x5a600000,0x00000000)}}, {VT_exponent,22,0x3a90be,{DOUBLEWITHTWODWORDINTREE(0x5a700000,0x00000000)}}, {VT_exponent,22,0x3a90bf,{DOUBLEWITHTWODWORDINTREE(0x5a800000,0x00000000)}}, {VT_exponent,22,0x3a90c0,{DOUBLEWITHTWODWORDINTREE(0x5a900000,0x00000000)}}, {VT_exponent,22,0x3a90c1,{DOUBLEWITHTWODWORDINTREE(0x5aa00000,0x00000000)}}, {VT_exponent,22,0x3a90c2,{DOUBLEWITHTWODWORDINTREE(0x5ab00000,0x00000000)}}, {VT_exponent,22,0x3a90c3,{DOUBLEWITHTWODWORDINTREE(0x5ac00000,0x00000000)}}, {VT_exponent,22,0x3a90c4,{DOUBLEWITHTWODWORDINTREE(0x5ad00000,0x00000000)}}, {VT_exponent,22,0x3a90c5,{DOUBLEWITHTWODWORDINTREE(0x5ae00000,0x00000000)}}, {VT_exponent,22,0x3a90c6,{DOUBLEWITHTWODWORDINTREE(0x5af00000,0x00000000)}}, {VT_exponent,22,0x3a90c7,{DOUBLEWITHTWODWORDINTREE(0x5b000000,0x00000000)}}, {VT_exponent,22,0x3a90c8,{DOUBLEWITHTWODWORDINTREE(0x5b100000,0x00000000)}}, {VT_exponent,22,0x3a90c9,{DOUBLEWITHTWODWORDINTREE(0x5b200000,0x00000000)}}, {VT_exponent,22,0x3a90ca,{DOUBLEWITHTWODWORDINTREE(0x5b300000,0x00000000)}}, {VT_exponent,22,0x3a90cb,{DOUBLEWITHTWODWORDINTREE(0x5b400000,0x00000000)}}, {VT_exponent,22,0x3a90cc,{DOUBLEWITHTWODWORDINTREE(0x5b500000,0x00000000)}}, {VT_exponent,22,0x3a90cd,{DOUBLEWITHTWODWORDINTREE(0x5b600000,0x00000000)}}, {VT_exponent,22,0x3a90ce,{DOUBLEWITHTWODWORDINTREE(0x5b700000,0x00000000)}}, {VT_exponent,22,0x3a90cf,{DOUBLEWITHTWODWORDINTREE(0x5b800000,0x00000000)}}, {VT_exponent,22,0x3a90d0,{DOUBLEWITHTWODWORDINTREE(0x5b900000,0x00000000)}}, {VT_exponent,22,0x3a90d1,{DOUBLEWITHTWODWORDINTREE(0x5ba00000,0x00000000)}}, {VT_exponent,22,0x3a90d2,{DOUBLEWITHTWODWORDINTREE(0x5bb00000,0x00000000)}}, {VT_exponent,22,0x3a90d3,{DOUBLEWITHTWODWORDINTREE(0x5bc00000,0x00000000)}}, {VT_exponent,22,0x3a90d4,{DOUBLEWITHTWODWORDINTREE(0x5bd00000,0x00000000)}}, {VT_exponent,22,0x3a90d5,{DOUBLEWITHTWODWORDINTREE(0x5be00000,0x00000000)}}, {VT_exponent,22,0x3a90d6,{DOUBLEWITHTWODWORDINTREE(0x5bf00000,0x00000000)}}, {VT_exponent,22,0x3a90d7,{DOUBLEWITHTWODWORDINTREE(0x5c000000,0x00000000)}}, {VT_exponent,22,0x3a90d8,{DOUBLEWITHTWODWORDINTREE(0x5c100000,0x00000000)}}, {VT_exponent,22,0x3a90d9,{DOUBLEWITHTWODWORDINTREE(0x5c200000,0x00000000)}}, {VT_exponent,22,0x3a90da,{DOUBLEWITHTWODWORDINTREE(0x5c300000,0x00000000)}}, {VT_exponent,22,0x3a90db,{DOUBLEWITHTWODWORDINTREE(0x5c400000,0x00000000)}}, {VT_exponent,22,0x3a90dc,{DOUBLEWITHTWODWORDINTREE(0x5c500000,0x00000000)}}, {VT_exponent,22,0x3a90dd,{DOUBLEWITHTWODWORDINTREE(0x5c600000,0x00000000)}}, {VT_exponent,22,0x3a90de,{DOUBLEWITHTWODWORDINTREE(0x5c700000,0x00000000)}}, {VT_exponent,22,0x3a90df,{DOUBLEWITHTWODWORDINTREE(0x5c800000,0x00000000)}}, {VT_exponent,22,0x3a90e0,{DOUBLEWITHTWODWORDINTREE(0x5c900000,0x00000000)}}, {VT_exponent,22,0x3a90e1,{DOUBLEWITHTWODWORDINTREE(0x5ca00000,0x00000000)}}, {VT_exponent,22,0x3a90e2,{DOUBLEWITHTWODWORDINTREE(0x5cb00000,0x00000000)}}, {VT_exponent,22,0x3a90e3,{DOUBLEWITHTWODWORDINTREE(0x5cc00000,0x00000000)}}, {VT_exponent,22,0x3a90e4,{DOUBLEWITHTWODWORDINTREE(0x5cd00000,0x00000000)}}, {VT_exponent,22,0x3a90e5,{DOUBLEWITHTWODWORDINTREE(0x5ce00000,0x00000000)}}, {VT_exponent,22,0x3a90e6,{DOUBLEWITHTWODWORDINTREE(0x5cf00000,0x00000000)}}, {VT_exponent,22,0x3a90e7,{DOUBLEWITHTWODWORDINTREE(0x5d000000,0x00000000)}}, {VT_exponent,22,0x3a90e8,{DOUBLEWITHTWODWORDINTREE(0x5d100000,0x00000000)}}, {VT_exponent,22,0x3a90e9,{DOUBLEWITHTWODWORDINTREE(0x5d200000,0x00000000)}}, {VT_exponent,22,0x3a90ea,{DOUBLEWITHTWODWORDINTREE(0x5d300000,0x00000000)}}, {VT_exponent,22,0x3a90eb,{DOUBLEWITHTWODWORDINTREE(0x5d400000,0x00000000)}}, {VT_exponent,22,0x3a90ec,{DOUBLEWITHTWODWORDINTREE(0x5d500000,0x00000000)}}, {VT_exponent,22,0x3a90ed,{DOUBLEWITHTWODWORDINTREE(0x5d600000,0x00000000)}}, {VT_exponent,22,0x3a90ee,{DOUBLEWITHTWODWORDINTREE(0x5d700000,0x00000000)}}, {VT_exponent,22,0x3a90ef,{DOUBLEWITHTWODWORDINTREE(0x5d800000,0x00000000)}}, {VT_exponent,22,0x3a90f0,{DOUBLEWITHTWODWORDINTREE(0x5d900000,0x00000000)}}, {VT_exponent,22,0x3a90f1,{DOUBLEWITHTWODWORDINTREE(0x5da00000,0x00000000)}}, {VT_exponent,22,0x3a90f2,{DOUBLEWITHTWODWORDINTREE(0x5db00000,0x00000000)}}, {VT_exponent,22,0x3a90f3,{DOUBLEWITHTWODWORDINTREE(0x5dc00000,0x00000000)}}, {VT_exponent,22,0x3a90f4,{DOUBLEWITHTWODWORDINTREE(0x5dd00000,0x00000000)}}, {VT_exponent,22,0x3a90f5,{DOUBLEWITHTWODWORDINTREE(0x5de00000,0x00000000)}}, {VT_exponent,22,0x3a90f6,{DOUBLEWITHTWODWORDINTREE(0x5df00000,0x00000000)}}, {VT_exponent,22,0x3a90f7,{DOUBLEWITHTWODWORDINTREE(0x5e000000,0x00000000)}}, {VT_exponent,22,0x3a90f8,{DOUBLEWITHTWODWORDINTREE(0x5e100000,0x00000000)}}, {VT_exponent,22,0x3a90f9,{DOUBLEWITHTWODWORDINTREE(0x5e200000,0x00000000)}}, {VT_exponent,22,0x3a90fa,{DOUBLEWITHTWODWORDINTREE(0x5e300000,0x00000000)}}, {VT_exponent,22,0x3a90fb,{DOUBLEWITHTWODWORDINTREE(0x5e400000,0x00000000)}}, {VT_exponent,22,0x3a90fc,{DOUBLEWITHTWODWORDINTREE(0x5e500000,0x00000000)}}, {VT_exponent,22,0x3a90fd,{DOUBLEWITHTWODWORDINTREE(0x5e600000,0x00000000)}}, {VT_exponent,22,0x3a90fe,{DOUBLEWITHTWODWORDINTREE(0x5e700000,0x00000000)}}, {VT_exponent,22,0x3a90ff,{DOUBLEWITHTWODWORDINTREE(0x5e800000,0x00000000)}}, {VT_exponent,22,0x3a9100,{DOUBLEWITHTWODWORDINTREE(0x5e900000,0x00000000)}}, {VT_exponent,22,0x3a9101,{DOUBLEWITHTWODWORDINTREE(0x5ea00000,0x00000000)}}, {VT_exponent,22,0x3a9102,{DOUBLEWITHTWODWORDINTREE(0x5eb00000,0x00000000)}}, {VT_exponent,22,0x3a9103,{DOUBLEWITHTWODWORDINTREE(0x5ec00000,0x00000000)}}, {VT_exponent,22,0x3a9104,{DOUBLEWITHTWODWORDINTREE(0x5ed00000,0x00000000)}}, {VT_exponent,22,0x3a9105,{DOUBLEWITHTWODWORDINTREE(0x5ee00000,0x00000000)}}, {VT_exponent,22,0x3a9106,{DOUBLEWITHTWODWORDINTREE(0x5ef00000,0x00000000)}}, {VT_exponent,22,0x3a9107,{DOUBLEWITHTWODWORDINTREE(0x5f000000,0x00000000)}}, {VT_exponent,22,0x3a9108,{DOUBLEWITHTWODWORDINTREE(0x5f100000,0x00000000)}}, {VT_exponent,22,0x3a9109,{DOUBLEWITHTWODWORDINTREE(0x5f200000,0x00000000)}}, {VT_exponent,22,0x3a910a,{DOUBLEWITHTWODWORDINTREE(0x5f300000,0x00000000)}}, {VT_exponent,22,0x3a910b,{DOUBLEWITHTWODWORDINTREE(0x5f400000,0x00000000)}}, {VT_exponent,22,0x3a910c,{DOUBLEWITHTWODWORDINTREE(0x5f500000,0x00000000)}}, {VT_exponent,22,0x3a910d,{DOUBLEWITHTWODWORDINTREE(0x5f600000,0x00000000)}}, {VT_exponent,22,0x3a910e,{DOUBLEWITHTWODWORDINTREE(0x5f700000,0x00000000)}}, {VT_exponent,22,0x3a910f,{DOUBLEWITHTWODWORDINTREE(0x5f800000,0x00000000)}}, {VT_exponent,22,0x3a9110,{DOUBLEWITHTWODWORDINTREE(0x5f900000,0x00000000)}}, {VT_exponent,22,0x3a9111,{DOUBLEWITHTWODWORDINTREE(0x5fa00000,0x00000000)}}, {VT_exponent,22,0x3a9112,{DOUBLEWITHTWODWORDINTREE(0x5fb00000,0x00000000)}}, {VT_exponent,22,0x3a9113,{DOUBLEWITHTWODWORDINTREE(0x5fc00000,0x00000000)}}, {VT_exponent,22,0x3a9114,{DOUBLEWITHTWODWORDINTREE(0x5fd00000,0x00000000)}}, {VT_exponent,22,0x3a9115,{DOUBLEWITHTWODWORDINTREE(0x5fe00000,0x00000000)}}, {VT_exponent,22,0x3a9116,{DOUBLEWITHTWODWORDINTREE(0x5ff00000,0x00000000)}}, {VT_exponent,22,0x3a9117,{DOUBLEWITHTWODWORDINTREE(0x60000000,0x00000000)}}, {VT_exponent,22,0x3a9118,{DOUBLEWITHTWODWORDINTREE(0x60100000,0x00000000)}}, {VT_exponent,22,0x3a9119,{DOUBLEWITHTWODWORDINTREE(0x60200000,0x00000000)}}, {VT_exponent,22,0x3a911a,{DOUBLEWITHTWODWORDINTREE(0x60300000,0x00000000)}}, {VT_exponent,22,0x3a911b,{DOUBLEWITHTWODWORDINTREE(0x60400000,0x00000000)}}, {VT_exponent,22,0x3a911c,{DOUBLEWITHTWODWORDINTREE(0x60500000,0x00000000)}}, {VT_exponent,22,0x3a911d,{DOUBLEWITHTWODWORDINTREE(0x60600000,0x00000000)}}, {VT_exponent,22,0x3a911e,{DOUBLEWITHTWODWORDINTREE(0x60700000,0x00000000)}}, {VT_exponent,22,0x3a911f,{DOUBLEWITHTWODWORDINTREE(0x60800000,0x00000000)}}, {VT_exponent,22,0x3a9120,{DOUBLEWITHTWODWORDINTREE(0x60900000,0x00000000)}}, {VT_exponent,22,0x3a9121,{DOUBLEWITHTWODWORDINTREE(0x60a00000,0x00000000)}}, {VT_exponent,22,0x3a9122,{DOUBLEWITHTWODWORDINTREE(0x60b00000,0x00000000)}}, {VT_exponent,22,0x3a9123,{DOUBLEWITHTWODWORDINTREE(0x60c00000,0x00000000)}}, {VT_exponent,22,0x3a9124,{DOUBLEWITHTWODWORDINTREE(0x60d00000,0x00000000)}}, {VT_exponent,22,0x3a9125,{DOUBLEWITHTWODWORDINTREE(0x60e00000,0x00000000)}}, {VT_exponent,22,0x3a9126,{DOUBLEWITHTWODWORDINTREE(0x60f00000,0x00000000)}}, {VT_exponent,22,0x3a9127,{DOUBLEWITHTWODWORDINTREE(0x61000000,0x00000000)}}, {VT_exponent,22,0x3a9128,{DOUBLEWITHTWODWORDINTREE(0x61100000,0x00000000)}}, {VT_exponent,22,0x3a9129,{DOUBLEWITHTWODWORDINTREE(0x61200000,0x00000000)}}, {VT_exponent,22,0x3a912a,{DOUBLEWITHTWODWORDINTREE(0x61300000,0x00000000)}}, {VT_exponent,22,0x3a912b,{DOUBLEWITHTWODWORDINTREE(0x61400000,0x00000000)}}, {VT_exponent,22,0x3a912c,{DOUBLEWITHTWODWORDINTREE(0x61500000,0x00000000)}}, {VT_exponent,22,0x3a912d,{DOUBLEWITHTWODWORDINTREE(0x61600000,0x00000000)}}, {VT_exponent,22,0x3a912e,{DOUBLEWITHTWODWORDINTREE(0x61700000,0x00000000)}}, {VT_exponent,22,0x3a912f,{DOUBLEWITHTWODWORDINTREE(0x61800000,0x00000000)}}, {VT_exponent,22,0x3a9130,{DOUBLEWITHTWODWORDINTREE(0x61900000,0x00000000)}}, {VT_exponent,22,0x3a9131,{DOUBLEWITHTWODWORDINTREE(0x61a00000,0x00000000)}}, {VT_exponent,22,0x3a9132,{DOUBLEWITHTWODWORDINTREE(0x61b00000,0x00000000)}}, {VT_exponent,22,0x3a9133,{DOUBLEWITHTWODWORDINTREE(0x61c00000,0x00000000)}}, {VT_exponent,22,0x3a9134,{DOUBLEWITHTWODWORDINTREE(0x61d00000,0x00000000)}}, {VT_exponent,22,0x3a9135,{DOUBLEWITHTWODWORDINTREE(0x61e00000,0x00000000)}}, {VT_exponent,22,0x3a9136,{DOUBLEWITHTWODWORDINTREE(0x61f00000,0x00000000)}}, {VT_exponent,22,0x3a9137,{DOUBLEWITHTWODWORDINTREE(0x62000000,0x00000000)}}, {VT_exponent,22,0x3a9138,{DOUBLEWITHTWODWORDINTREE(0x62100000,0x00000000)}}, {VT_exponent,22,0x3a9139,{DOUBLEWITHTWODWORDINTREE(0x62200000,0x00000000)}}, {VT_exponent,22,0x3a913a,{DOUBLEWITHTWODWORDINTREE(0x62300000,0x00000000)}}, {VT_exponent,22,0x3a913b,{DOUBLEWITHTWODWORDINTREE(0x62400000,0x00000000)}}, {VT_exponent,22,0x3a913c,{DOUBLEWITHTWODWORDINTREE(0x62500000,0x00000000)}}, {VT_exponent,22,0x3a913d,{DOUBLEWITHTWODWORDINTREE(0x62600000,0x00000000)}}, {VT_exponent,22,0x3a913e,{DOUBLEWITHTWODWORDINTREE(0x62700000,0x00000000)}}, {VT_exponent,22,0x3a913f,{DOUBLEWITHTWODWORDINTREE(0x62800000,0x00000000)}}, {VT_exponent,22,0x3a9140,{DOUBLEWITHTWODWORDINTREE(0x62900000,0x00000000)}}, {VT_exponent,22,0x3a9141,{DOUBLEWITHTWODWORDINTREE(0x62a00000,0x00000000)}}, {VT_exponent,22,0x3a9142,{DOUBLEWITHTWODWORDINTREE(0x62b00000,0x00000000)}}, {VT_exponent,22,0x3a9143,{DOUBLEWITHTWODWORDINTREE(0x62c00000,0x00000000)}}, {VT_exponent,22,0x3a9144,{DOUBLEWITHTWODWORDINTREE(0x62d00000,0x00000000)}}, {VT_exponent,22,0x3a9145,{DOUBLEWITHTWODWORDINTREE(0x62e00000,0x00000000)}}, {VT_exponent,22,0x3a9146,{DOUBLEWITHTWODWORDINTREE(0x62f00000,0x00000000)}}, {VT_exponent,22,0x3a9147,{DOUBLEWITHTWODWORDINTREE(0x63000000,0x00000000)}}, {VT_exponent,22,0x3a9148,{DOUBLEWITHTWODWORDINTREE(0x63100000,0x00000000)}}, {VT_exponent,22,0x3a9149,{DOUBLEWITHTWODWORDINTREE(0x63200000,0x00000000)}}, {VT_exponent,22,0x3a914a,{DOUBLEWITHTWODWORDINTREE(0x63300000,0x00000000)}}, {VT_exponent,22,0x3a914b,{DOUBLEWITHTWODWORDINTREE(0x63400000,0x00000000)}}, {VT_exponent,22,0x3a914c,{DOUBLEWITHTWODWORDINTREE(0x63500000,0x00000000)}}, {VT_exponent,22,0x3a914d,{DOUBLEWITHTWODWORDINTREE(0x63600000,0x00000000)}}, {VT_exponent,22,0x3a914e,{DOUBLEWITHTWODWORDINTREE(0x63700000,0x00000000)}}, {VT_exponent,22,0x3a914f,{DOUBLEWITHTWODWORDINTREE(0x63800000,0x00000000)}}, {VT_exponent,22,0x3a9150,{DOUBLEWITHTWODWORDINTREE(0x63900000,0x00000000)}}, {VT_exponent,22,0x3a9151,{DOUBLEWITHTWODWORDINTREE(0x63a00000,0x00000000)}}, {VT_exponent,22,0x3a9152,{DOUBLEWITHTWODWORDINTREE(0x63b00000,0x00000000)}}, {VT_exponent,22,0x3a9153,{DOUBLEWITHTWODWORDINTREE(0x63c00000,0x00000000)}}, {VT_exponent,22,0x3a9154,{DOUBLEWITHTWODWORDINTREE(0x63d00000,0x00000000)}}, {VT_exponent,22,0x3a9155,{DOUBLEWITHTWODWORDINTREE(0x63e00000,0x00000000)}}, {VT_exponent,22,0x3a9156,{DOUBLEWITHTWODWORDINTREE(0x63f00000,0x00000000)}}, {VT_exponent,22,0x3a9157,{DOUBLEWITHTWODWORDINTREE(0x64000000,0x00000000)}}, {VT_exponent,22,0x3a9158,{DOUBLEWITHTWODWORDINTREE(0x64100000,0x00000000)}}, {VT_exponent,22,0x3a9159,{DOUBLEWITHTWODWORDINTREE(0x64200000,0x00000000)}}, {VT_exponent,22,0x3a915a,{DOUBLEWITHTWODWORDINTREE(0x64300000,0x00000000)}}, {VT_exponent,22,0x3a915b,{DOUBLEWITHTWODWORDINTREE(0x64400000,0x00000000)}}, {VT_exponent,22,0x3a915c,{DOUBLEWITHTWODWORDINTREE(0x64500000,0x00000000)}}, {VT_exponent,22,0x3a915d,{DOUBLEWITHTWODWORDINTREE(0x64600000,0x00000000)}}, {VT_exponent,22,0x3a915e,{DOUBLEWITHTWODWORDINTREE(0x64700000,0x00000000)}}, {VT_exponent,22,0x3a915f,{DOUBLEWITHTWODWORDINTREE(0x64800000,0x00000000)}}, {VT_exponent,22,0x3a9160,{DOUBLEWITHTWODWORDINTREE(0x64900000,0x00000000)}}, {VT_exponent,22,0x3a9161,{DOUBLEWITHTWODWORDINTREE(0x64a00000,0x00000000)}}, {VT_exponent,22,0x3a9162,{DOUBLEWITHTWODWORDINTREE(0x64b00000,0x00000000)}}, {VT_exponent,22,0x3a9163,{DOUBLEWITHTWODWORDINTREE(0x64c00000,0x00000000)}}, {VT_exponent,22,0x3a9164,{DOUBLEWITHTWODWORDINTREE(0x64d00000,0x00000000)}}, {VT_exponent,22,0x3a9165,{DOUBLEWITHTWODWORDINTREE(0x64e00000,0x00000000)}}, {VT_exponent,22,0x3a9166,{DOUBLEWITHTWODWORDINTREE(0x64f00000,0x00000000)}}, {VT_exponent,22,0x3a9167,{DOUBLEWITHTWODWORDINTREE(0x65000000,0x00000000)}}, {VT_exponent,22,0x3a9168,{DOUBLEWITHTWODWORDINTREE(0x65100000,0x00000000)}}, {VT_exponent,22,0x3a9169,{DOUBLEWITHTWODWORDINTREE(0x65200000,0x00000000)}}, {VT_exponent,22,0x3a916a,{DOUBLEWITHTWODWORDINTREE(0x65300000,0x00000000)}}, {VT_exponent,22,0x3a916b,{DOUBLEWITHTWODWORDINTREE(0x65400000,0x00000000)}}, {VT_exponent,22,0x3a916c,{DOUBLEWITHTWODWORDINTREE(0x65500000,0x00000000)}}, {VT_exponent,22,0x3a916d,{DOUBLEWITHTWODWORDINTREE(0x65600000,0x00000000)}}, {VT_exponent,22,0x3a916e,{DOUBLEWITHTWODWORDINTREE(0x65700000,0x00000000)}}, {VT_exponent,22,0x3a916f,{DOUBLEWITHTWODWORDINTREE(0x65800000,0x00000000)}}, {VT_exponent,22,0x3a9170,{DOUBLEWITHTWODWORDINTREE(0x65900000,0x00000000)}}, {VT_exponent,22,0x3a9171,{DOUBLEWITHTWODWORDINTREE(0x65a00000,0x00000000)}}, {VT_exponent,22,0x3a9172,{DOUBLEWITHTWODWORDINTREE(0x65b00000,0x00000000)}}, {VT_exponent,22,0x3a9173,{DOUBLEWITHTWODWORDINTREE(0x65c00000,0x00000000)}}, {VT_exponent,22,0x3a9174,{DOUBLEWITHTWODWORDINTREE(0x65d00000,0x00000000)}}, {VT_exponent,22,0x3a9175,{DOUBLEWITHTWODWORDINTREE(0x65e00000,0x00000000)}}, {VT_exponent,22,0x3a9176,{DOUBLEWITHTWODWORDINTREE(0x65f00000,0x00000000)}}, {VT_exponent,22,0x3a9177,{DOUBLEWITHTWODWORDINTREE(0x66000000,0x00000000)}}, {VT_exponent,22,0x3a9178,{DOUBLEWITHTWODWORDINTREE(0x66100000,0x00000000)}}, {VT_exponent,22,0x3a9179,{DOUBLEWITHTWODWORDINTREE(0x66200000,0x00000000)}}, {VT_exponent,22,0x3a917a,{DOUBLEWITHTWODWORDINTREE(0x66300000,0x00000000)}}, {VT_exponent,22,0x3a917b,{DOUBLEWITHTWODWORDINTREE(0x66400000,0x00000000)}}, {VT_exponent,22,0x3a917c,{DOUBLEWITHTWODWORDINTREE(0x66500000,0x00000000)}}, {VT_exponent,22,0x3a917d,{DOUBLEWITHTWODWORDINTREE(0x66600000,0x00000000)}}, {VT_exponent,22,0x3a917e,{DOUBLEWITHTWODWORDINTREE(0x66700000,0x00000000)}}, {VT_exponent,22,0x3a917f,{DOUBLEWITHTWODWORDINTREE(0x66800000,0x00000000)}}, {VT_exponent,22,0x3a9180,{DOUBLEWITHTWODWORDINTREE(0x66900000,0x00000000)}}, {VT_exponent,22,0x3a9181,{DOUBLEWITHTWODWORDINTREE(0x66a00000,0x00000000)}}, {VT_exponent,22,0x3a9182,{DOUBLEWITHTWODWORDINTREE(0x66b00000,0x00000000)}}, {VT_exponent,22,0x3a9183,{DOUBLEWITHTWODWORDINTREE(0x66c00000,0x00000000)}}, {VT_exponent,22,0x3a9184,{DOUBLEWITHTWODWORDINTREE(0x66d00000,0x00000000)}}, {VT_exponent,22,0x3a9185,{DOUBLEWITHTWODWORDINTREE(0x66e00000,0x00000000)}}, {VT_exponent,22,0x3a9186,{DOUBLEWITHTWODWORDINTREE(0x66f00000,0x00000000)}}, {VT_exponent,22,0x3a9187,{DOUBLEWITHTWODWORDINTREE(0x67000000,0x00000000)}}, {VT_exponent,22,0x3a9188,{DOUBLEWITHTWODWORDINTREE(0x67100000,0x00000000)}}, {VT_exponent,22,0x3a9189,{DOUBLEWITHTWODWORDINTREE(0x67200000,0x00000000)}}, {VT_exponent,22,0x3a918a,{DOUBLEWITHTWODWORDINTREE(0x67300000,0x00000000)}}, {VT_exponent,22,0x3a918b,{DOUBLEWITHTWODWORDINTREE(0x67400000,0x00000000)}}, {VT_exponent,22,0x3a918c,{DOUBLEWITHTWODWORDINTREE(0x67500000,0x00000000)}}, {VT_exponent,22,0x3a918d,{DOUBLEWITHTWODWORDINTREE(0x67600000,0x00000000)}}, {VT_exponent,22,0x3a918e,{DOUBLEWITHTWODWORDINTREE(0x67700000,0x00000000)}}, {VT_exponent,22,0x3a918f,{DOUBLEWITHTWODWORDINTREE(0x67800000,0x00000000)}}, {VT_exponent,22,0x3a9190,{DOUBLEWITHTWODWORDINTREE(0x67900000,0x00000000)}}, {VT_exponent,22,0x3a9191,{DOUBLEWITHTWODWORDINTREE(0x67a00000,0x00000000)}}, {VT_exponent,22,0x3a9192,{DOUBLEWITHTWODWORDINTREE(0x67b00000,0x00000000)}}, {VT_exponent,22,0x3a9193,{DOUBLEWITHTWODWORDINTREE(0x67c00000,0x00000000)}}, {VT_exponent,22,0x3a9194,{DOUBLEWITHTWODWORDINTREE(0x67d00000,0x00000000)}}, {VT_exponent,22,0x3a9195,{DOUBLEWITHTWODWORDINTREE(0x67e00000,0x00000000)}}, {VT_exponent,22,0x3a9196,{DOUBLEWITHTWODWORDINTREE(0x67f00000,0x00000000)}}, {VT_exponent,22,0x3a9197,{DOUBLEWITHTWODWORDINTREE(0x68000000,0x00000000)}}, {VT_exponent,22,0x3a9198,{DOUBLEWITHTWODWORDINTREE(0x68100000,0x00000000)}}, {VT_exponent,22,0x3a9199,{DOUBLEWITHTWODWORDINTREE(0x68200000,0x00000000)}}, {VT_exponent,22,0x3a919a,{DOUBLEWITHTWODWORDINTREE(0x68300000,0x00000000)}}, {VT_exponent,22,0x3a919b,{DOUBLEWITHTWODWORDINTREE(0x68400000,0x00000000)}}, {VT_exponent,22,0x3a919c,{DOUBLEWITHTWODWORDINTREE(0x68500000,0x00000000)}}, {VT_exponent,22,0x3a919d,{DOUBLEWITHTWODWORDINTREE(0x68600000,0x00000000)}}, {VT_exponent,22,0x3a919e,{DOUBLEWITHTWODWORDINTREE(0x68700000,0x00000000)}}, {VT_exponent,22,0x3a919f,{DOUBLEWITHTWODWORDINTREE(0x68800000,0x00000000)}}, {VT_exponent,22,0x3a91a0,{DOUBLEWITHTWODWORDINTREE(0x68900000,0x00000000)}}, {VT_exponent,22,0x3a91a1,{DOUBLEWITHTWODWORDINTREE(0x68a00000,0x00000000)}}, {VT_exponent,22,0x3a91a2,{DOUBLEWITHTWODWORDINTREE(0x68b00000,0x00000000)}}, {VT_exponent,22,0x3a91a3,{DOUBLEWITHTWODWORDINTREE(0x68c00000,0x00000000)}}, {VT_exponent,22,0x3a91a4,{DOUBLEWITHTWODWORDINTREE(0x68d00000,0x00000000)}}, {VT_exponent,22,0x3a91a5,{DOUBLEWITHTWODWORDINTREE(0x68e00000,0x00000000)}}, {VT_exponent,22,0x3a91a6,{DOUBLEWITHTWODWORDINTREE(0x68f00000,0x00000000)}}, {VT_exponent,22,0x3a91a7,{DOUBLEWITHTWODWORDINTREE(0x69000000,0x00000000)}}, {VT_exponent,22,0x3a91a8,{DOUBLEWITHTWODWORDINTREE(0x69100000,0x00000000)}}, {VT_exponent,22,0x3a91a9,{DOUBLEWITHTWODWORDINTREE(0x69200000,0x00000000)}}, {VT_exponent,22,0x3a91aa,{DOUBLEWITHTWODWORDINTREE(0x69300000,0x00000000)}}, {VT_exponent,22,0x3a91ab,{DOUBLEWITHTWODWORDINTREE(0x69400000,0x00000000)}}, {VT_exponent,22,0x3a91ac,{DOUBLEWITHTWODWORDINTREE(0x69500000,0x00000000)}}, {VT_exponent,22,0x3a91ad,{DOUBLEWITHTWODWORDINTREE(0x69600000,0x00000000)}}, {VT_exponent,22,0x3a91ae,{DOUBLEWITHTWODWORDINTREE(0x69700000,0x00000000)}}, {VT_exponent,22,0x3a91af,{DOUBLEWITHTWODWORDINTREE(0x69800000,0x00000000)}}, {VT_exponent,22,0x3a91b0,{DOUBLEWITHTWODWORDINTREE(0x69900000,0x00000000)}}, {VT_exponent,22,0x3a91b1,{DOUBLEWITHTWODWORDINTREE(0x69a00000,0x00000000)}}, {VT_exponent,22,0x3a91b2,{DOUBLEWITHTWODWORDINTREE(0x69b00000,0x00000000)}}, {VT_exponent,22,0x3a91b3,{DOUBLEWITHTWODWORDINTREE(0x69c00000,0x00000000)}}, {VT_exponent,22,0x3a91b4,{DOUBLEWITHTWODWORDINTREE(0x69d00000,0x00000000)}}, {VT_exponent,22,0x3a91b5,{DOUBLEWITHTWODWORDINTREE(0x69e00000,0x00000000)}}, {VT_exponent,22,0x3a91b6,{DOUBLEWITHTWODWORDINTREE(0x69f00000,0x00000000)}}, {VT_exponent,22,0x3a91b7,{DOUBLEWITHTWODWORDINTREE(0x6a000000,0x00000000)}}, {VT_exponent,22,0x3a91b8,{DOUBLEWITHTWODWORDINTREE(0x6a100000,0x00000000)}}, {VT_exponent,22,0x3a91b9,{DOUBLEWITHTWODWORDINTREE(0x6a200000,0x00000000)}}, {VT_exponent,22,0x3a91ba,{DOUBLEWITHTWODWORDINTREE(0x6a300000,0x00000000)}}, {VT_exponent,22,0x3a91bb,{DOUBLEWITHTWODWORDINTREE(0x6a400000,0x00000000)}}, {VT_exponent,22,0x3a91bc,{DOUBLEWITHTWODWORDINTREE(0x6a500000,0x00000000)}}, {VT_exponent,22,0x3a91bd,{DOUBLEWITHTWODWORDINTREE(0x6a600000,0x00000000)}}, {VT_exponent,22,0x3a91be,{DOUBLEWITHTWODWORDINTREE(0x6a700000,0x00000000)}}, {VT_exponent,22,0x3a91bf,{DOUBLEWITHTWODWORDINTREE(0x6a800000,0x00000000)}}, {VT_exponent,22,0x3a91c0,{DOUBLEWITHTWODWORDINTREE(0x6a900000,0x00000000)}}, {VT_exponent,22,0x3a91c1,{DOUBLEWITHTWODWORDINTREE(0x6aa00000,0x00000000)}}, {VT_exponent,22,0x3a91c2,{DOUBLEWITHTWODWORDINTREE(0x6ab00000,0x00000000)}}, {VT_exponent,22,0x3a91c3,{DOUBLEWITHTWODWORDINTREE(0x6ac00000,0x00000000)}}, {VT_exponent,22,0x3a91c4,{DOUBLEWITHTWODWORDINTREE(0x6ad00000,0x00000000)}}, {VT_exponent,22,0x3a91c5,{DOUBLEWITHTWODWORDINTREE(0x6ae00000,0x00000000)}}, {VT_exponent,22,0x3a91c6,{DOUBLEWITHTWODWORDINTREE(0x6af00000,0x00000000)}}, {VT_exponent,22,0x3a91c7,{DOUBLEWITHTWODWORDINTREE(0x6b000000,0x00000000)}}, {VT_exponent,22,0x3a91c8,{DOUBLEWITHTWODWORDINTREE(0x6b100000,0x00000000)}}, {VT_exponent,22,0x3a91c9,{DOUBLEWITHTWODWORDINTREE(0x6b200000,0x00000000)}}, {VT_exponent,22,0x3a91ca,{DOUBLEWITHTWODWORDINTREE(0x6b300000,0x00000000)}}, {VT_exponent,22,0x3a91cb,{DOUBLEWITHTWODWORDINTREE(0x6b400000,0x00000000)}}, {VT_exponent,22,0x3a91cc,{DOUBLEWITHTWODWORDINTREE(0x6b500000,0x00000000)}}, {VT_exponent,22,0x3a91cd,{DOUBLEWITHTWODWORDINTREE(0x6b600000,0x00000000)}}, {VT_exponent,22,0x3a91ce,{DOUBLEWITHTWODWORDINTREE(0x6b700000,0x00000000)}}, {VT_exponent,22,0x3a91cf,{DOUBLEWITHTWODWORDINTREE(0x6b800000,0x00000000)}}, {VT_exponent,22,0x3a91d0,{DOUBLEWITHTWODWORDINTREE(0x6b900000,0x00000000)}}, {VT_exponent,22,0x3a91d1,{DOUBLEWITHTWODWORDINTREE(0x6ba00000,0x00000000)}}, {VT_exponent,22,0x3a91d2,{DOUBLEWITHTWODWORDINTREE(0x6bb00000,0x00000000)}}, {VT_exponent,22,0x3a91d3,{DOUBLEWITHTWODWORDINTREE(0x6bc00000,0x00000000)}}, {VT_exponent,22,0x3a91d4,{DOUBLEWITHTWODWORDINTREE(0x6bd00000,0x00000000)}}, {VT_exponent,22,0x3a91d5,{DOUBLEWITHTWODWORDINTREE(0x6be00000,0x00000000)}}, {VT_exponent,22,0x3a91d6,{DOUBLEWITHTWODWORDINTREE(0x6bf00000,0x00000000)}}, {VT_exponent,22,0x3a91d7,{DOUBLEWITHTWODWORDINTREE(0x6c000000,0x00000000)}}, {VT_exponent,22,0x3a91d8,{DOUBLEWITHTWODWORDINTREE(0x6c100000,0x00000000)}}, {VT_exponent,22,0x3a91d9,{DOUBLEWITHTWODWORDINTREE(0x6c200000,0x00000000)}}, {VT_exponent,22,0x3a91da,{DOUBLEWITHTWODWORDINTREE(0x6c300000,0x00000000)}}, {VT_exponent,22,0x3a91db,{DOUBLEWITHTWODWORDINTREE(0x6c400000,0x00000000)}}, {VT_exponent,22,0x3a91dc,{DOUBLEWITHTWODWORDINTREE(0x6c500000,0x00000000)}}, {VT_exponent,22,0x3a91dd,{DOUBLEWITHTWODWORDINTREE(0x6c600000,0x00000000)}}, {VT_exponent,22,0x3a91de,{DOUBLEWITHTWODWORDINTREE(0x6c700000,0x00000000)}}, {VT_exponent,22,0x3a91df,{DOUBLEWITHTWODWORDINTREE(0x6c800000,0x00000000)}}, {VT_exponent,22,0x3a91e0,{DOUBLEWITHTWODWORDINTREE(0x6c900000,0x00000000)}}, {VT_exponent,22,0x3a91e1,{DOUBLEWITHTWODWORDINTREE(0x6ca00000,0x00000000)}}, {VT_exponent,22,0x3a91e2,{DOUBLEWITHTWODWORDINTREE(0x6cb00000,0x00000000)}}, {VT_exponent,22,0x3a91e3,{DOUBLEWITHTWODWORDINTREE(0x6cc00000,0x00000000)}}, {VT_exponent,22,0x3a91e4,{DOUBLEWITHTWODWORDINTREE(0x6cd00000,0x00000000)}}, {VT_exponent,22,0x3a91e5,{DOUBLEWITHTWODWORDINTREE(0x6ce00000,0x00000000)}}, {VT_exponent,22,0x3a91e6,{DOUBLEWITHTWODWORDINTREE(0x6cf00000,0x00000000)}}, {VT_exponent,22,0x3a91e7,{DOUBLEWITHTWODWORDINTREE(0x6d000000,0x00000000)}}, {VT_exponent,22,0x3a91e8,{DOUBLEWITHTWODWORDINTREE(0x6d100000,0x00000000)}}, {VT_exponent,22,0x3a91e9,{DOUBLEWITHTWODWORDINTREE(0x6d200000,0x00000000)}}, {VT_exponent,22,0x3a91ea,{DOUBLEWITHTWODWORDINTREE(0x6d300000,0x00000000)}}, {VT_exponent,22,0x3a91eb,{DOUBLEWITHTWODWORDINTREE(0x6d400000,0x00000000)}}, {VT_exponent,22,0x3a91ec,{DOUBLEWITHTWODWORDINTREE(0x6d500000,0x00000000)}}, {VT_exponent,22,0x3a91ed,{DOUBLEWITHTWODWORDINTREE(0x6d600000,0x00000000)}}, {VT_exponent,22,0x3a91ee,{DOUBLEWITHTWODWORDINTREE(0x6d700000,0x00000000)}}, {VT_exponent,22,0x3a91ef,{DOUBLEWITHTWODWORDINTREE(0x6d800000,0x00000000)}}, {VT_exponent,22,0x3a91f0,{DOUBLEWITHTWODWORDINTREE(0x6d900000,0x00000000)}}, {VT_exponent,22,0x3a91f1,{DOUBLEWITHTWODWORDINTREE(0x6da00000,0x00000000)}}, {VT_exponent,22,0x3a91f2,{DOUBLEWITHTWODWORDINTREE(0x6db00000,0x00000000)}}, {VT_exponent,22,0x3a91f3,{DOUBLEWITHTWODWORDINTREE(0x6dc00000,0x00000000)}}, {VT_exponent,22,0x3a91f4,{DOUBLEWITHTWODWORDINTREE(0x6dd00000,0x00000000)}}, {VT_exponent,22,0x3a91f5,{DOUBLEWITHTWODWORDINTREE(0x6de00000,0x00000000)}}, {VT_exponent,22,0x3a91f6,{DOUBLEWITHTWODWORDINTREE(0x6df00000,0x00000000)}}, {VT_exponent,22,0x3a91f7,{DOUBLEWITHTWODWORDINTREE(0x6e000000,0x00000000)}}, {VT_exponent,22,0x3a91f8,{DOUBLEWITHTWODWORDINTREE(0x6e100000,0x00000000)}}, {VT_exponent,22,0x3a91f9,{DOUBLEWITHTWODWORDINTREE(0x6e200000,0x00000000)}}, {VT_exponent,22,0x3a91fa,{DOUBLEWITHTWODWORDINTREE(0x6e300000,0x00000000)}}, {VT_exponent,22,0x3a91fb,{DOUBLEWITHTWODWORDINTREE(0x6e400000,0x00000000)}}, {VT_exponent,22,0x3a91fc,{DOUBLEWITHTWODWORDINTREE(0x6e500000,0x00000000)}}, {VT_exponent,22,0x3a91fd,{DOUBLEWITHTWODWORDINTREE(0x6e600000,0x00000000)}}, {VT_exponent,22,0x3a91fe,{DOUBLEWITHTWODWORDINTREE(0x6e700000,0x00000000)}}, {VT_exponent,22,0x3a91ff,{DOUBLEWITHTWODWORDINTREE(0x6e800000,0x00000000)}}, {VT_exponent,22,0x3a9200,{DOUBLEWITHTWODWORDINTREE(0x6e900000,0x00000000)}}, {VT_exponent,22,0x3a9201,{DOUBLEWITHTWODWORDINTREE(0x6ea00000,0x00000000)}}, {VT_exponent,22,0x3a9202,{DOUBLEWITHTWODWORDINTREE(0x6eb00000,0x00000000)}}, {VT_exponent,22,0x3a9203,{DOUBLEWITHTWODWORDINTREE(0x6ec00000,0x00000000)}}, {VT_exponent,22,0x3a9204,{DOUBLEWITHTWODWORDINTREE(0x6ed00000,0x00000000)}}, {VT_exponent,22,0x3a9205,{DOUBLEWITHTWODWORDINTREE(0x6ee00000,0x00000000)}}, {VT_exponent,22,0x3a9206,{DOUBLEWITHTWODWORDINTREE(0x6ef00000,0x00000000)}}, {VT_exponent,22,0x3a9207,{DOUBLEWITHTWODWORDINTREE(0x6f000000,0x00000000)}}, {VT_exponent,22,0x3a9208,{DOUBLEWITHTWODWORDINTREE(0x6f100000,0x00000000)}}, {VT_exponent,22,0x3a9209,{DOUBLEWITHTWODWORDINTREE(0x6f200000,0x00000000)}}, {VT_exponent,22,0x3a920a,{DOUBLEWITHTWODWORDINTREE(0x6f300000,0x00000000)}}, {VT_exponent,22,0x3a920b,{DOUBLEWITHTWODWORDINTREE(0x6f400000,0x00000000)}}, {VT_exponent,22,0x3a920c,{DOUBLEWITHTWODWORDINTREE(0x6f500000,0x00000000)}}, {VT_exponent,22,0x3a920d,{DOUBLEWITHTWODWORDINTREE(0x6f600000,0x00000000)}}, {VT_exponent,22,0x3a920e,{DOUBLEWITHTWODWORDINTREE(0x6f700000,0x00000000)}}, {VT_exponent,22,0x3a920f,{DOUBLEWITHTWODWORDINTREE(0x6f800000,0x00000000)}}, {VT_exponent,22,0x3a9210,{DOUBLEWITHTWODWORDINTREE(0x6f900000,0x00000000)}}, {VT_exponent,22,0x3a9211,{DOUBLEWITHTWODWORDINTREE(0x6fa00000,0x00000000)}}, {VT_exponent,22,0x3a9212,{DOUBLEWITHTWODWORDINTREE(0x6fb00000,0x00000000)}}, {VT_exponent,22,0x3a9213,{DOUBLEWITHTWODWORDINTREE(0x6fc00000,0x00000000)}}, {VT_exponent,22,0x3a9214,{DOUBLEWITHTWODWORDINTREE(0x6fd00000,0x00000000)}}, {VT_exponent,22,0x3a9215,{DOUBLEWITHTWODWORDINTREE(0x6fe00000,0x00000000)}}, {VT_exponent,22,0x3a9216,{DOUBLEWITHTWODWORDINTREE(0x6ff00000,0x00000000)}}, {VT_exponent,22,0x3a9217,{DOUBLEWITHTWODWORDINTREE(0x70000000,0x00000000)}}, {VT_exponent,22,0x3a9218,{DOUBLEWITHTWODWORDINTREE(0x70100000,0x00000000)}}, {VT_exponent,22,0x3a9219,{DOUBLEWITHTWODWORDINTREE(0x70200000,0x00000000)}}, {VT_exponent,22,0x3a921a,{DOUBLEWITHTWODWORDINTREE(0x70300000,0x00000000)}}, {VT_exponent,22,0x3a921b,{DOUBLEWITHTWODWORDINTREE(0x70400000,0x00000000)}}, {VT_exponent,22,0x3a921c,{DOUBLEWITHTWODWORDINTREE(0x70500000,0x00000000)}}, {VT_exponent,22,0x3a921d,{DOUBLEWITHTWODWORDINTREE(0x70600000,0x00000000)}}, {VT_exponent,22,0x3a921e,{DOUBLEWITHTWODWORDINTREE(0x70700000,0x00000000)}}, {VT_exponent,22,0x3a921f,{DOUBLEWITHTWODWORDINTREE(0x70800000,0x00000000)}}, {VT_exponent,22,0x3a9220,{DOUBLEWITHTWODWORDINTREE(0x70900000,0x00000000)}}, {VT_exponent,22,0x3a9221,{DOUBLEWITHTWODWORDINTREE(0x70a00000,0x00000000)}}, {VT_exponent,22,0x3a9222,{DOUBLEWITHTWODWORDINTREE(0x70b00000,0x00000000)}}, {VT_exponent,22,0x3a9223,{DOUBLEWITHTWODWORDINTREE(0x70c00000,0x00000000)}}, {VT_exponent,22,0x3a9224,{DOUBLEWITHTWODWORDINTREE(0x70d00000,0x00000000)}}, {VT_exponent,22,0x3a9225,{DOUBLEWITHTWODWORDINTREE(0x70e00000,0x00000000)}}, {VT_exponent,22,0x3a9226,{DOUBLEWITHTWODWORDINTREE(0x70f00000,0x00000000)}}, {VT_exponent,22,0x3a9227,{DOUBLEWITHTWODWORDINTREE(0x71000000,0x00000000)}}, {VT_exponent,22,0x3a9228,{DOUBLEWITHTWODWORDINTREE(0x71100000,0x00000000)}}, {VT_exponent,22,0x3a9229,{DOUBLEWITHTWODWORDINTREE(0x71200000,0x00000000)}}, {VT_exponent,22,0x3a922a,{DOUBLEWITHTWODWORDINTREE(0x71300000,0x00000000)}}, {VT_exponent,22,0x3a922b,{DOUBLEWITHTWODWORDINTREE(0x71400000,0x00000000)}}, {VT_exponent,22,0x3a922c,{DOUBLEWITHTWODWORDINTREE(0x71500000,0x00000000)}}, {VT_exponent,22,0x3a922d,{DOUBLEWITHTWODWORDINTREE(0x71600000,0x00000000)}}, {VT_exponent,22,0x3a922e,{DOUBLEWITHTWODWORDINTREE(0x71700000,0x00000000)}}, {VT_exponent,22,0x3a922f,{DOUBLEWITHTWODWORDINTREE(0x71800000,0x00000000)}}, {VT_exponent,22,0x3a9230,{DOUBLEWITHTWODWORDINTREE(0x71900000,0x00000000)}}, {VT_exponent,22,0x3a9231,{DOUBLEWITHTWODWORDINTREE(0x71a00000,0x00000000)}}, {VT_exponent,22,0x3a9232,{DOUBLEWITHTWODWORDINTREE(0x71b00000,0x00000000)}}, {VT_exponent,22,0x3a9233,{DOUBLEWITHTWODWORDINTREE(0x71c00000,0x00000000)}}, {VT_exponent,22,0x3a9234,{DOUBLEWITHTWODWORDINTREE(0x71d00000,0x00000000)}}, {VT_exponent,22,0x3a9235,{DOUBLEWITHTWODWORDINTREE(0x71e00000,0x00000000)}}, {VT_exponent,22,0x3a9236,{DOUBLEWITHTWODWORDINTREE(0x71f00000,0x00000000)}}, {VT_exponent,22,0x3a9237,{DOUBLEWITHTWODWORDINTREE(0x72000000,0x00000000)}}, {VT_exponent,22,0x3a9238,{DOUBLEWITHTWODWORDINTREE(0x72100000,0x00000000)}}, {VT_exponent,22,0x3a9239,{DOUBLEWITHTWODWORDINTREE(0x72200000,0x00000000)}}, {VT_exponent,22,0x3a923a,{DOUBLEWITHTWODWORDINTREE(0x72300000,0x00000000)}}, {VT_exponent,22,0x3a923b,{DOUBLEWITHTWODWORDINTREE(0x72400000,0x00000000)}}, {VT_exponent,22,0x3a923c,{DOUBLEWITHTWODWORDINTREE(0x72500000,0x00000000)}}, {VT_exponent,22,0x3a923d,{DOUBLEWITHTWODWORDINTREE(0x72600000,0x00000000)}}, {VT_exponent,22,0x3a923e,{DOUBLEWITHTWODWORDINTREE(0x72700000,0x00000000)}}, {VT_exponent,22,0x3a923f,{DOUBLEWITHTWODWORDINTREE(0x72800000,0x00000000)}}, {VT_exponent,22,0x3a9240,{DOUBLEWITHTWODWORDINTREE(0x72900000,0x00000000)}}, {VT_exponent,22,0x3a9241,{DOUBLEWITHTWODWORDINTREE(0x72a00000,0x00000000)}}, {VT_exponent,22,0x3a9242,{DOUBLEWITHTWODWORDINTREE(0x72b00000,0x00000000)}}, {VT_exponent,22,0x3a9243,{DOUBLEWITHTWODWORDINTREE(0x72c00000,0x00000000)}}, {VT_exponent,22,0x3a9244,{DOUBLEWITHTWODWORDINTREE(0x72d00000,0x00000000)}}, {VT_exponent,22,0x3a9245,{DOUBLEWITHTWODWORDINTREE(0x72e00000,0x00000000)}}, {VT_exponent,22,0x3a9246,{DOUBLEWITHTWODWORDINTREE(0x72f00000,0x00000000)}}, {VT_exponent,22,0x3a9247,{DOUBLEWITHTWODWORDINTREE(0x73000000,0x00000000)}}, {VT_exponent,22,0x3a9248,{DOUBLEWITHTWODWORDINTREE(0x73100000,0x00000000)}}, {VT_exponent,22,0x3a9249,{DOUBLEWITHTWODWORDINTREE(0x73200000,0x00000000)}}, {VT_exponent,22,0x3a924a,{DOUBLEWITHTWODWORDINTREE(0x73300000,0x00000000)}}, {VT_exponent,22,0x3a924b,{DOUBLEWITHTWODWORDINTREE(0x73400000,0x00000000)}}, {VT_exponent,22,0x3a924c,{DOUBLEWITHTWODWORDINTREE(0x73500000,0x00000000)}}, {VT_exponent,22,0x3a924d,{DOUBLEWITHTWODWORDINTREE(0x73600000,0x00000000)}}, {VT_exponent,22,0x3a924e,{DOUBLEWITHTWODWORDINTREE(0x73700000,0x00000000)}}, {VT_exponent,22,0x3a924f,{DOUBLEWITHTWODWORDINTREE(0x73800000,0x00000000)}}, {VT_exponent,22,0x3a9250,{DOUBLEWITHTWODWORDINTREE(0x73900000,0x00000000)}}, {VT_exponent,22,0x3a9251,{DOUBLEWITHTWODWORDINTREE(0x73a00000,0x00000000)}}, {VT_exponent,22,0x3a9252,{DOUBLEWITHTWODWORDINTREE(0x73b00000,0x00000000)}}, {VT_exponent,22,0x3a9253,{DOUBLEWITHTWODWORDINTREE(0x73c00000,0x00000000)}}, {VT_exponent,22,0x3a9254,{DOUBLEWITHTWODWORDINTREE(0x73d00000,0x00000000)}}, {VT_exponent,22,0x3a9255,{DOUBLEWITHTWODWORDINTREE(0x73e00000,0x00000000)}}, {VT_exponent,22,0x3a9256,{DOUBLEWITHTWODWORDINTREE(0x73f00000,0x00000000)}}, {VT_exponent,22,0x3a9257,{DOUBLEWITHTWODWORDINTREE(0x74000000,0x00000000)}}, {VT_exponent,22,0x3a9258,{DOUBLEWITHTWODWORDINTREE(0x74100000,0x00000000)}}, {VT_exponent,22,0x3a9259,{DOUBLEWITHTWODWORDINTREE(0x74200000,0x00000000)}}, {VT_exponent,22,0x3a925a,{DOUBLEWITHTWODWORDINTREE(0x74300000,0x00000000)}}, {VT_exponent,22,0x3a925b,{DOUBLEWITHTWODWORDINTREE(0x74400000,0x00000000)}}, {VT_exponent,22,0x3a925c,{DOUBLEWITHTWODWORDINTREE(0x74500000,0x00000000)}}, {VT_exponent,22,0x3a925d,{DOUBLEWITHTWODWORDINTREE(0x74600000,0x00000000)}}, {VT_exponent,22,0x3a925e,{DOUBLEWITHTWODWORDINTREE(0x74700000,0x00000000)}}, {VT_exponent,22,0x3a925f,{DOUBLEWITHTWODWORDINTREE(0x74800000,0x00000000)}}, {VT_exponent,22,0x3a9260,{DOUBLEWITHTWODWORDINTREE(0x74900000,0x00000000)}}, {VT_exponent,22,0x3a9261,{DOUBLEWITHTWODWORDINTREE(0x74a00000,0x00000000)}}, {VT_exponent,22,0x3a9262,{DOUBLEWITHTWODWORDINTREE(0x74b00000,0x00000000)}}, {VT_exponent,22,0x3a9263,{DOUBLEWITHTWODWORDINTREE(0x74c00000,0x00000000)}}, {VT_exponent,22,0x3a9264,{DOUBLEWITHTWODWORDINTREE(0x74d00000,0x00000000)}}, {VT_exponent,22,0x3a9265,{DOUBLEWITHTWODWORDINTREE(0x74e00000,0x00000000)}}, {VT_exponent,22,0x3a9266,{DOUBLEWITHTWODWORDINTREE(0x74f00000,0x00000000)}}, {VT_exponent,22,0x3a9267,{DOUBLEWITHTWODWORDINTREE(0x75000000,0x00000000)}}, {VT_exponent,22,0x3a9268,{DOUBLEWITHTWODWORDINTREE(0x75100000,0x00000000)}}, {VT_exponent,22,0x3a9269,{DOUBLEWITHTWODWORDINTREE(0x75200000,0x00000000)}}, {VT_exponent,22,0x3a926a,{DOUBLEWITHTWODWORDINTREE(0x75300000,0x00000000)}}, {VT_exponent,22,0x3a926b,{DOUBLEWITHTWODWORDINTREE(0x75400000,0x00000000)}}, {VT_exponent,22,0x3a926c,{DOUBLEWITHTWODWORDINTREE(0x75500000,0x00000000)}}, {VT_exponent,22,0x3a926d,{DOUBLEWITHTWODWORDINTREE(0x75600000,0x00000000)}}, {VT_exponent,22,0x3a926e,{DOUBLEWITHTWODWORDINTREE(0x75700000,0x00000000)}}, {VT_exponent,22,0x3a926f,{DOUBLEWITHTWODWORDINTREE(0x75800000,0x00000000)}}, {VT_exponent,22,0x3a9270,{DOUBLEWITHTWODWORDINTREE(0x75900000,0x00000000)}}, {VT_exponent,22,0x3a9271,{DOUBLEWITHTWODWORDINTREE(0x75a00000,0x00000000)}}, {VT_exponent,22,0x3a9272,{DOUBLEWITHTWODWORDINTREE(0x75b00000,0x00000000)}}, {VT_exponent,22,0x3a9273,{DOUBLEWITHTWODWORDINTREE(0x75c00000,0x00000000)}}, {VT_exponent,22,0x3a9274,{DOUBLEWITHTWODWORDINTREE(0x75d00000,0x00000000)}}, {VT_exponent,22,0x3a9275,{DOUBLEWITHTWODWORDINTREE(0x75e00000,0x00000000)}}, {VT_exponent,22,0x3a9276,{DOUBLEWITHTWODWORDINTREE(0x75f00000,0x00000000)}}, {VT_exponent,22,0x3a9277,{DOUBLEWITHTWODWORDINTREE(0x76000000,0x00000000)}}, {VT_exponent,22,0x3a9278,{DOUBLEWITHTWODWORDINTREE(0x76100000,0x00000000)}}, {VT_exponent,22,0x3a9279,{DOUBLEWITHTWODWORDINTREE(0x76200000,0x00000000)}}, {VT_exponent,22,0x3a927a,{DOUBLEWITHTWODWORDINTREE(0x76300000,0x00000000)}}, {VT_exponent,22,0x3a927b,{DOUBLEWITHTWODWORDINTREE(0x76400000,0x00000000)}}, {VT_exponent,22,0x3a927c,{DOUBLEWITHTWODWORDINTREE(0x76500000,0x00000000)}}, {VT_exponent,22,0x3a927d,{DOUBLEWITHTWODWORDINTREE(0x76600000,0x00000000)}}, {VT_exponent,22,0x3a927e,{DOUBLEWITHTWODWORDINTREE(0x76700000,0x00000000)}}, {VT_exponent,22,0x3a927f,{DOUBLEWITHTWODWORDINTREE(0x76800000,0x00000000)}}, {VT_exponent,22,0x3a9280,{DOUBLEWITHTWODWORDINTREE(0x76900000,0x00000000)}}, {VT_exponent,22,0x3a9281,{DOUBLEWITHTWODWORDINTREE(0x76a00000,0x00000000)}}, {VT_exponent,22,0x3a9282,{DOUBLEWITHTWODWORDINTREE(0x76b00000,0x00000000)}}, {VT_exponent,22,0x3a9283,{DOUBLEWITHTWODWORDINTREE(0x76c00000,0x00000000)}}, {VT_exponent,22,0x3a9284,{DOUBLEWITHTWODWORDINTREE(0x76d00000,0x00000000)}}, {VT_exponent,22,0x3a9285,{DOUBLEWITHTWODWORDINTREE(0x76e00000,0x00000000)}}, {VT_exponent,22,0x3a9286,{DOUBLEWITHTWODWORDINTREE(0x76f00000,0x00000000)}}, {VT_exponent,22,0x3a9287,{DOUBLEWITHTWODWORDINTREE(0x77000000,0x00000000)}}, {VT_exponent,22,0x3a9288,{DOUBLEWITHTWODWORDINTREE(0x77100000,0x00000000)}}, {VT_exponent,22,0x3a9289,{DOUBLEWITHTWODWORDINTREE(0x77200000,0x00000000)}}, {VT_exponent,22,0x3a928a,{DOUBLEWITHTWODWORDINTREE(0x77300000,0x00000000)}}, {VT_exponent,22,0x3a928b,{DOUBLEWITHTWODWORDINTREE(0x77400000,0x00000000)}}, {VT_exponent,22,0x3a928c,{DOUBLEWITHTWODWORDINTREE(0x77500000,0x00000000)}}, {VT_exponent,22,0x3a928d,{DOUBLEWITHTWODWORDINTREE(0x77600000,0x00000000)}}, {VT_exponent,22,0x3a928e,{DOUBLEWITHTWODWORDINTREE(0x77700000,0x00000000)}}, {VT_exponent,22,0x3a928f,{DOUBLEWITHTWODWORDINTREE(0x77800000,0x00000000)}}, {VT_exponent,22,0x3a9290,{DOUBLEWITHTWODWORDINTREE(0x77900000,0x00000000)}}, {VT_exponent,22,0x3a9291,{DOUBLEWITHTWODWORDINTREE(0x77a00000,0x00000000)}}, {VT_exponent,22,0x3a9292,{DOUBLEWITHTWODWORDINTREE(0x77b00000,0x00000000)}}, {VT_exponent,22,0x3a9293,{DOUBLEWITHTWODWORDINTREE(0x77c00000,0x00000000)}}, {VT_exponent,22,0x3a9294,{DOUBLEWITHTWODWORDINTREE(0x77d00000,0x00000000)}}, {VT_exponent,22,0x3a9295,{DOUBLEWITHTWODWORDINTREE(0x77e00000,0x00000000)}}, {VT_exponent,22,0x3a9296,{DOUBLEWITHTWODWORDINTREE(0x77f00000,0x00000000)}}, {VT_exponent,22,0x3a9297,{DOUBLEWITHTWODWORDINTREE(0x78000000,0x00000000)}}, {VT_exponent,22,0x3a9298,{DOUBLEWITHTWODWORDINTREE(0x78100000,0x00000000)}}, {VT_exponent,22,0x3a9299,{DOUBLEWITHTWODWORDINTREE(0x78200000,0x00000000)}}, {VT_exponent,22,0x3a929a,{DOUBLEWITHTWODWORDINTREE(0x78300000,0x00000000)}}, {VT_exponent,22,0x3a929b,{DOUBLEWITHTWODWORDINTREE(0x78400000,0x00000000)}}, {VT_exponent,22,0x3a929c,{DOUBLEWITHTWODWORDINTREE(0x78500000,0x00000000)}}, {VT_exponent,22,0x3a929d,{DOUBLEWITHTWODWORDINTREE(0x78600000,0x00000000)}}, {VT_exponent,22,0x3a929e,{DOUBLEWITHTWODWORDINTREE(0x78700000,0x00000000)}}, {VT_exponent,22,0x3a929f,{DOUBLEWITHTWODWORDINTREE(0x78800000,0x00000000)}}, {VT_exponent,22,0x3a92a0,{DOUBLEWITHTWODWORDINTREE(0x78900000,0x00000000)}}, {VT_exponent,22,0x3a92a1,{DOUBLEWITHTWODWORDINTREE(0x78a00000,0x00000000)}}, {VT_exponent,22,0x3a92a2,{DOUBLEWITHTWODWORDINTREE(0x78b00000,0x00000000)}}, {VT_exponent,22,0x3a92a3,{DOUBLEWITHTWODWORDINTREE(0x78c00000,0x00000000)}}, {VT_exponent,22,0x3a92a4,{DOUBLEWITHTWODWORDINTREE(0x78d00000,0x00000000)}}, {VT_exponent,22,0x3a92a5,{DOUBLEWITHTWODWORDINTREE(0x78e00000,0x00000000)}}, {VT_exponent,22,0x3a92a6,{DOUBLEWITHTWODWORDINTREE(0x78f00000,0x00000000)}}, {VT_exponent,22,0x3a92a7,{DOUBLEWITHTWODWORDINTREE(0x79000000,0x00000000)}}, {VT_exponent,22,0x3a92a8,{DOUBLEWITHTWODWORDINTREE(0x79100000,0x00000000)}}, {VT_exponent,22,0x3a92a9,{DOUBLEWITHTWODWORDINTREE(0x79200000,0x00000000)}}, {VT_exponent,22,0x3a92aa,{DOUBLEWITHTWODWORDINTREE(0x79300000,0x00000000)}}, {VT_exponent,22,0x3a92ab,{DOUBLEWITHTWODWORDINTREE(0x79400000,0x00000000)}}, {VT_exponent,22,0x3a92ac,{DOUBLEWITHTWODWORDINTREE(0x79500000,0x00000000)}}, {VT_exponent,22,0x3a92ad,{DOUBLEWITHTWODWORDINTREE(0x79600000,0x00000000)}}, {VT_exponent,22,0x3a92ae,{DOUBLEWITHTWODWORDINTREE(0x79700000,0x00000000)}}, {VT_exponent,22,0x3a92af,{DOUBLEWITHTWODWORDINTREE(0x79800000,0x00000000)}}, {VT_exponent,22,0x3a92b0,{DOUBLEWITHTWODWORDINTREE(0x79900000,0x00000000)}}, {VT_exponent,22,0x3a92b1,{DOUBLEWITHTWODWORDINTREE(0x79a00000,0x00000000)}}, {VT_exponent,22,0x3a92b2,{DOUBLEWITHTWODWORDINTREE(0x79b00000,0x00000000)}}, {VT_exponent,22,0x3a92b3,{DOUBLEWITHTWODWORDINTREE(0x79c00000,0x00000000)}}, {VT_exponent,22,0x3a92b4,{DOUBLEWITHTWODWORDINTREE(0x79d00000,0x00000000)}}, {VT_exponent,22,0x3a92b5,{DOUBLEWITHTWODWORDINTREE(0x79e00000,0x00000000)}}, {VT_exponent,22,0x3a92b6,{DOUBLEWITHTWODWORDINTREE(0x79f00000,0x00000000)}}, {VT_exponent,22,0x3a92b7,{DOUBLEWITHTWODWORDINTREE(0x7a000000,0x00000000)}}, {VT_exponent,22,0x3a92b8,{DOUBLEWITHTWODWORDINTREE(0x7a100000,0x00000000)}}, {VT_exponent,22,0x3a92b9,{DOUBLEWITHTWODWORDINTREE(0x7a200000,0x00000000)}}, {VT_exponent,22,0x3a92ba,{DOUBLEWITHTWODWORDINTREE(0x7a300000,0x00000000)}}, {VT_exponent,22,0x3a92bb,{DOUBLEWITHTWODWORDINTREE(0x7a400000,0x00000000)}}, {VT_exponent,22,0x3a92bc,{DOUBLEWITHTWODWORDINTREE(0x7a500000,0x00000000)}}, {VT_exponent,22,0x3a92bd,{DOUBLEWITHTWODWORDINTREE(0x7a600000,0x00000000)}}, {VT_exponent,22,0x3a92be,{DOUBLEWITHTWODWORDINTREE(0x7a700000,0x00000000)}}, {VT_exponent,22,0x3a92bf,{DOUBLEWITHTWODWORDINTREE(0x7a800000,0x00000000)}}, {VT_exponent,22,0x3a92c0,{DOUBLEWITHTWODWORDINTREE(0x7a900000,0x00000000)}}, {VT_exponent,22,0x3a92c1,{DOUBLEWITHTWODWORDINTREE(0x7aa00000,0x00000000)}}, {VT_exponent,22,0x3a92c2,{DOUBLEWITHTWODWORDINTREE(0x7ab00000,0x00000000)}}, {VT_exponent,22,0x3a92c3,{DOUBLEWITHTWODWORDINTREE(0x7ac00000,0x00000000)}}, {VT_exponent,22,0x3a92c4,{DOUBLEWITHTWODWORDINTREE(0x7ad00000,0x00000000)}}, {VT_exponent,22,0x3a92c5,{DOUBLEWITHTWODWORDINTREE(0x7ae00000,0x00000000)}}, {VT_exponent,22,0x3a92c6,{DOUBLEWITHTWODWORDINTREE(0x7af00000,0x00000000)}}, {VT_exponent,22,0x3a92c7,{DOUBLEWITHTWODWORDINTREE(0x7b000000,0x00000000)}}, {VT_exponent,22,0x3a92c8,{DOUBLEWITHTWODWORDINTREE(0x7b100000,0x00000000)}}, {VT_exponent,22,0x3a92c9,{DOUBLEWITHTWODWORDINTREE(0x7b200000,0x00000000)}}, {VT_exponent,22,0x3a92ca,{DOUBLEWITHTWODWORDINTREE(0x7b300000,0x00000000)}}, {VT_exponent,22,0x3a92cb,{DOUBLEWITHTWODWORDINTREE(0x7b400000,0x00000000)}}, {VT_exponent,22,0x3a92cc,{DOUBLEWITHTWODWORDINTREE(0x7b500000,0x00000000)}}, {VT_exponent,22,0x3a92cd,{DOUBLEWITHTWODWORDINTREE(0x7b600000,0x00000000)}}, {VT_exponent,22,0x3a92ce,{DOUBLEWITHTWODWORDINTREE(0x7b700000,0x00000000)}}, {VT_exponent,22,0x3a92cf,{DOUBLEWITHTWODWORDINTREE(0x7b800000,0x00000000)}}, {VT_exponent,22,0x3a92d0,{DOUBLEWITHTWODWORDINTREE(0x7b900000,0x00000000)}}, {VT_exponent,22,0x3a92d1,{DOUBLEWITHTWODWORDINTREE(0x7ba00000,0x00000000)}}, {VT_exponent,22,0x3a92d2,{DOUBLEWITHTWODWORDINTREE(0x7bb00000,0x00000000)}}, {VT_exponent,22,0x3a92d3,{DOUBLEWITHTWODWORDINTREE(0x7bc00000,0x00000000)}}, {VT_exponent,22,0x3a92d4,{DOUBLEWITHTWODWORDINTREE(0x7bd00000,0x00000000)}}, {VT_exponent,22,0x3a92d5,{DOUBLEWITHTWODWORDINTREE(0x7be00000,0x00000000)}}, {VT_exponent,22,0x3a92d6,{DOUBLEWITHTWODWORDINTREE(0x7bf00000,0x00000000)}}, {VT_exponent,22,0x3a92d7,{DOUBLEWITHTWODWORDINTREE(0x7c000000,0x00000000)}}, {VT_exponent,22,0x3a92d8,{DOUBLEWITHTWODWORDINTREE(0x7c100000,0x00000000)}}, {VT_exponent,22,0x3a92d9,{DOUBLEWITHTWODWORDINTREE(0x7c200000,0x00000000)}}, {VT_exponent,22,0x3a92da,{DOUBLEWITHTWODWORDINTREE(0x7c300000,0x00000000)}}, {VT_exponent,22,0x3a92db,{DOUBLEWITHTWODWORDINTREE(0x7c400000,0x00000000)}}, {VT_exponent,22,0x3a92dc,{DOUBLEWITHTWODWORDINTREE(0x7c500000,0x00000000)}}, {VT_exponent,22,0x3a92dd,{DOUBLEWITHTWODWORDINTREE(0x7c600000,0x00000000)}}, {VT_exponent,22,0x3a92de,{DOUBLEWITHTWODWORDINTREE(0x7c700000,0x00000000)}}, {VT_exponent,22,0x3a92df,{DOUBLEWITHTWODWORDINTREE(0x7c800000,0x00000000)}}, {VT_exponent,22,0x3a92e0,{DOUBLEWITHTWODWORDINTREE(0x7c900000,0x00000000)}}, {VT_exponent,22,0x3a92e1,{DOUBLEWITHTWODWORDINTREE(0x7ca00000,0x00000000)}}, {VT_exponent,22,0x3a92e2,{DOUBLEWITHTWODWORDINTREE(0x7cb00000,0x00000000)}}, {VT_exponent,22,0x3a92e3,{DOUBLEWITHTWODWORDINTREE(0x7cc00000,0x00000000)}}, {VT_exponent,22,0x3a92e4,{DOUBLEWITHTWODWORDINTREE(0x7cd00000,0x00000000)}}, {VT_exponent,22,0x3a92e5,{DOUBLEWITHTWODWORDINTREE(0x7ce00000,0x00000000)}}, {VT_exponent,22,0x3a92e6,{DOUBLEWITHTWODWORDINTREE(0x7cf00000,0x00000000)}}, {VT_exponent,22,0x3a92e7,{DOUBLEWITHTWODWORDINTREE(0x7d000000,0x00000000)}}, {VT_exponent,22,0x3a92e8,{DOUBLEWITHTWODWORDINTREE(0x7d100000,0x00000000)}}, {VT_exponent,22,0x3a92e9,{DOUBLEWITHTWODWORDINTREE(0x7d200000,0x00000000)}}, {VT_exponent,22,0x3a92ea,{DOUBLEWITHTWODWORDINTREE(0x7d300000,0x00000000)}}, {VT_exponent,22,0x3a92eb,{DOUBLEWITHTWODWORDINTREE(0x7d400000,0x00000000)}}, {VT_exponent,22,0x3a92ec,{DOUBLEWITHTWODWORDINTREE(0x7d500000,0x00000000)}}, {VT_exponent,22,0x3a92ed,{DOUBLEWITHTWODWORDINTREE(0x7d600000,0x00000000)}}, {VT_exponent,22,0x3a92ee,{DOUBLEWITHTWODWORDINTREE(0x7d700000,0x00000000)}}, {VT_exponent,22,0x3a92ef,{DOUBLEWITHTWODWORDINTREE(0x7d800000,0x00000000)}}, {VT_exponent,22,0x3a92f0,{DOUBLEWITHTWODWORDINTREE(0x7d900000,0x00000000)}}, {VT_exponent,22,0x3a92f1,{DOUBLEWITHTWODWORDINTREE(0x7da00000,0x00000000)}}, {VT_exponent,22,0x3a92f2,{DOUBLEWITHTWODWORDINTREE(0x7db00000,0x00000000)}}, {VT_exponent,22,0x3a92f3,{DOUBLEWITHTWODWORDINTREE(0x7dc00000,0x00000000)}}, {VT_exponent,22,0x3a92f4,{DOUBLEWITHTWODWORDINTREE(0x7dd00000,0x00000000)}}, {VT_exponent,22,0x3a92f5,{DOUBLEWITHTWODWORDINTREE(0x7de00000,0x00000000)}}, {VT_exponent,22,0x3a92f6,{DOUBLEWITHTWODWORDINTREE(0x7df00000,0x00000000)}}, {VT_exponent,22,0x3a92f7,{DOUBLEWITHTWODWORDINTREE(0x7e000000,0x00000000)}}, {VT_exponent,22,0x3a92f8,{DOUBLEWITHTWODWORDINTREE(0x7e100000,0x00000000)}}, {VT_exponent,22,0x3a92f9,{DOUBLEWITHTWODWORDINTREE(0x7e200000,0x00000000)}}, {VT_exponent,22,0x3a92fa,{DOUBLEWITHTWODWORDINTREE(0x7e300000,0x00000000)}}, {VT_exponent,22,0x3a92fb,{DOUBLEWITHTWODWORDINTREE(0x7e400000,0x00000000)}}, {VT_exponent,22,0x3a92fc,{DOUBLEWITHTWODWORDINTREE(0x7e500000,0x00000000)}}, {VT_exponent,22,0x3a92fd,{DOUBLEWITHTWODWORDINTREE(0x7e600000,0x00000000)}}, {VT_exponent,22,0x3a92fe,{DOUBLEWITHTWODWORDINTREE(0x7e700000,0x00000000)}}, {VT_exponent,22,0x3a92ff,{DOUBLEWITHTWODWORDINTREE(0x7e800000,0x00000000)}}, {VT_exponent,22,0x3a95a0,{DOUBLEWITHTWODWORDINTREE(0x7e900000,0x00000000)}}, {VT_exponent,22,0x3a95a1,{DOUBLEWITHTWODWORDINTREE(0x7ea00000,0x00000000)}}, {VT_exponent,22,0x3a95a2,{DOUBLEWITHTWODWORDINTREE(0x7eb00000,0x00000000)}}, {VT_exponent,22,0x3a95a3,{DOUBLEWITHTWODWORDINTREE(0x7ec00000,0x00000000)}}, {VT_exponent,22,0x3a95a4,{DOUBLEWITHTWODWORDINTREE(0x7ed00000,0x00000000)}}, {VT_exponent,22,0x3a95a5,{DOUBLEWITHTWODWORDINTREE(0x7ee00000,0x00000000)}}, {VT_exponent,22,0x3a95a6,{DOUBLEWITHTWODWORDINTREE(0x7ef00000,0x00000000)}}, {VT_exponent,22,0x3a95a7,{DOUBLEWITHTWODWORDINTREE(0x7f000000,0x00000000)}}, {VT_exponent,22,0x3a95a8,{DOUBLEWITHTWODWORDINTREE(0x7f100000,0x00000000)}}, {VT_exponent,22,0x3a95a9,{DOUBLEWITHTWODWORDINTREE(0x7f200000,0x00000000)}}, {VT_exponent,22,0x3a95aa,{DOUBLEWITHTWODWORDINTREE(0x7f300000,0x00000000)}}, {VT_exponent,22,0x3a95ab,{DOUBLEWITHTWODWORDINTREE(0x7f400000,0x00000000)}}, {VT_exponent,22,0x3a95ac,{DOUBLEWITHTWODWORDINTREE(0x7f500000,0x00000000)}}, {VT_exponent,22,0x3a95ad,{DOUBLEWITHTWODWORDINTREE(0x7f600000,0x00000000)}}, {VT_exponent,22,0x3a95ae,{DOUBLEWITHTWODWORDINTREE(0x7f700000,0x00000000)}}, {VT_exponent,22,0x3a95af,{DOUBLEWITHTWODWORDINTREE(0x7f800000,0x00000000)}}, {VT_exponent,22,0x3b8fe0,{DOUBLEWITHTWODWORDINTREE(0x7f900000,0x00000000)}}, {VT_exponent,22,0x3b8fe1,{DOUBLEWITHTWODWORDINTREE(0x7fa00000,0x00000000)}}, {VT_exponent,22,0x3b8fe2,{DOUBLEWITHTWODWORDINTREE(0x7fb00000,0x00000000)}}, {VT_exponent,22,0x3b8fe3,{DOUBLEWITHTWODWORDINTREE(0x7fc00000,0x00000000)}}, {VT_exponent,21,0x68e90,{DOUBLEWITHTWODWORDINTREE(0x7fd00000,0x00000000)}}, {VT_exponent,21,0x68e91,{DOUBLEWITHTWODWORDINTREE(0x7fe00000,0x00000000)}}, {VT_exponent,21,0x68e98,{DOUBLEWITHTWODWORDINTREE(0x7ff80000,0x00000000)}}, }; // End of acofdoe array ./asymptote-2.41/prc/PRC.h0000644000175000017500000007300013064427076015124 0ustar norbertnorbert#ifndef __PRC_H #define __PRC_H #ifdef _MSC_VER #if _MSC_VER >= 1600 #include #else typedef signed char int8_t; typedef signed short int16_t; typedef signed long int32_t; typedef unsigned char uint8_t; typedef unsigned short uint16_t; typedef unsigned long uint32_t; #endif // _MSC_VER >= 1600 #else #include #endif // _MSC_VER //const uint32_t PRCVersion=7094; // For Adobe Reader 8 or later const uint32_t PRCVersion=8137; // For Adobe Reader 9 or later // from Adobe's documentation #define PRC_TYPE_Unknown ( (uint32_t)-1 ) #define PRC_TYPE_ROOT 0 // This type does not correspond to any entity #define PRC_TYPE_ROOT_PRCBase ( PRC_TYPE_ROOT + 1 ) // Abstract root type for any PRC entity. #define PRC_TYPE_ROOT_PRCBaseWithGraphics ( PRC_TYPE_ROOT + 2 ) // Abstract root type for any PRC entity which can bear graphics. #define PRC_TYPE_CRV ( PRC_TYPE_ROOT + 10 ) // Types for PRC geometrical curves #define PRC_TYPE_SURF ( PRC_TYPE_ROOT + 75 ) // Types for PRC geometrical surfaces #define PRC_TYPE_TOPO ( PRC_TYPE_ROOT + 140 ) // Types for PRC topology #define PRC_TYPE_TESS ( PRC_TYPE_ROOT + 170 ) // Types for PRC tessellation #define PRC_TYPE_MISC ( PRC_TYPE_ROOT + 200 ) // Types for PRC global data #define PRC_TYPE_RI ( PRC_TYPE_ROOT + 230 ) // Types for PRC representation items #define PRC_TYPE_ASM ( PRC_TYPE_ROOT + 300 ) // Types for PRC assembly #define PRC_TYPE_MKP ( PRC_TYPE_ROOT + 500 ) // Types for PRC markup #define PRC_TYPE_GRAPH ( PRC_TYPE_ROOT + 700 ) // Types for PRC graphics #define PRC_TYPE_MATH ( PRC_TYPE_ROOT + 900 ) // Types for PRC mathematical operators #define PRC_TYPE_CRV_Base ( PRC_TYPE_CRV + 1 ) // Abstract type for all geometric curves. #define PRC_TYPE_CRV_Blend02Boundary ( PRC_TYPE_CRV + 2 ) // Boundary Curve. #define PRC_TYPE_CRV_NURBS ( PRC_TYPE_CRV + 3 ) // Non Uniform BSpline curve. #define PRC_TYPE_CRV_Circle ( PRC_TYPE_CRV + 4 ) // Circle. #define PRC_TYPE_CRV_Composite ( PRC_TYPE_CRV + 5 ) // Array of oriented curves. #define PRC_TYPE_CRV_OnSurf ( PRC_TYPE_CRV + 6 ) // Curve defined by a UV curve on a surface. #define PRC_TYPE_CRV_Ellipse ( PRC_TYPE_CRV + 7 ) // Ellipse. #define PRC_TYPE_CRV_Equation ( PRC_TYPE_CRV + 8 ) // curve described by specific law elements #define PRC_TYPE_CRV_Helix ( PRC_TYPE_CRV + 9 ) // Helix curve. #define PRC_TYPE_CRV_Hyperbola ( PRC_TYPE_CRV + 10 ) // Hyperbola. #define PRC_TYPE_CRV_Intersection ( PRC_TYPE_CRV + 11 ) // Intersection between 2 surfaces. #define PRC_TYPE_CRV_Line ( PRC_TYPE_CRV + 12 ) // Line. #define PRC_TYPE_CRV_Offset ( PRC_TYPE_CRV + 13 ) // Offset curve. #define PRC_TYPE_CRV_Parabola ( PRC_TYPE_CRV + 14 ) // Parabola. #define PRC_TYPE_CRV_PolyLine ( PRC_TYPE_CRV + 15 ) // Polyedric curve. #define PRC_TYPE_CRV_Transform ( PRC_TYPE_CRV + 16 ) // Transformed curve. #define PRC_TYPE_SURF_Base ( PRC_TYPE_SURF + 1 ) // Abstract type for all geometric surfaces. #define PRC_TYPE_SURF_Blend01 ( PRC_TYPE_SURF + 2 ) // Blend surface. #define PRC_TYPE_SURF_Blend02 ( PRC_TYPE_SURF + 3 ) // Blend Surface. #define PRC_TYPE_SURF_Blend03 ( PRC_TYPE_SURF + 4 ) // Blend Surface. #define PRC_TYPE_SURF_NURBS ( PRC_TYPE_SURF + 5 ) // Non Uniform BSpline surface. #define PRC_TYPE_SURF_Cone ( PRC_TYPE_SURF + 6 ) // Cone. #define PRC_TYPE_SURF_Cylinder ( PRC_TYPE_SURF + 7 ) // Cylinder. #define PRC_TYPE_SURF_Cylindrical ( PRC_TYPE_SURF + 8 ) // Surface who is defined in cylindrical space. #define PRC_TYPE_SURF_Offset ( PRC_TYPE_SURF + 9 ) // Offset surface. #define PRC_TYPE_SURF_Pipe ( PRC_TYPE_SURF + 10 ) // Pipe. #define PRC_TYPE_SURF_Plane ( PRC_TYPE_SURF + 11 ) // Plane. #define PRC_TYPE_SURF_Ruled ( PRC_TYPE_SURF + 12 ) // Ruled surface. #define PRC_TYPE_SURF_Sphere ( PRC_TYPE_SURF + 13 ) // Sphere. #define PRC_TYPE_SURF_Revolution ( PRC_TYPE_SURF + 14 ) // Surface of revolution. #define PRC_TYPE_SURF_Extrusion ( PRC_TYPE_SURF + 15 ) // Surface of extrusion. #define PRC_TYPE_SURF_FromCurves ( PRC_TYPE_SURF + 16 ) // Surface from two curves. #define PRC_TYPE_SURF_Torus ( PRC_TYPE_SURF + 17 ) // Torus. #define PRC_TYPE_SURF_Transform ( PRC_TYPE_SURF + 18 ) // Transformed surface. #define PRC_TYPE_SURF_Blend04 ( PRC_TYPE_SURF + 19 ) // defined for future use. #define PRC_TYPE_TOPO_Context ( PRC_TYPE_TOPO + 1 ) // Self-containing set of topological entities. #define PRC_TYPE_TOPO_Item ( PRC_TYPE_TOPO + 2 ) // Abstract root type for any topological entity (body or single item). #define PRC_TYPE_TOPO_MultipleVertex ( PRC_TYPE_TOPO + 3 ) // Vertex whose position is the average of all edges' extremity positions to whom it belongs. #define PRC_TYPE_TOPO_UniqueVertex ( PRC_TYPE_TOPO + 4 ) // Vertex with one set of coordinates (absolute position). #define PRC_TYPE_TOPO_WireEdge ( PRC_TYPE_TOPO + 5 ) // Edge belonging to a wire body / single wire body. #define PRC_TYPE_TOPO_Edge ( PRC_TYPE_TOPO + 6 ) // Edge belonging to a brep data. #define PRC_TYPE_TOPO_CoEdge ( PRC_TYPE_TOPO + 7 ) // Usage of an edge in a loop. #define PRC_TYPE_TOPO_Loop ( PRC_TYPE_TOPO + 8 ) // Array of co edges which delimits a face. #define PRC_TYPE_TOPO_Face ( PRC_TYPE_TOPO + 9 ) // Topological face delimiting a shell. #define PRC_TYPE_TOPO_Shell ( PRC_TYPE_TOPO + 10 ) // Topological shell (open or closed). #define PRC_TYPE_TOPO_Connex ( PRC_TYPE_TOPO + 11 ) // Topological region delimited by one or several shells. #define PRC_TYPE_TOPO_Body ( PRC_TYPE_TOPO + 12 ) // Abstract root type for any topological body. #define PRC_TYPE_TOPO_SingleWireBody ( PRC_TYPE_TOPO + 13 ) // Single wire body. #define PRC_TYPE_TOPO_BrepData ( PRC_TYPE_TOPO + 14 ) // Main entry to solid and surface topology (regular form). #define PRC_TYPE_TOPO_SingleWireBodyCompress ( PRC_TYPE_TOPO + 15 ) // Single wire body. (ultra compressed form). #define PRC_TYPE_TOPO_BrepDataCompress ( PRC_TYPE_TOPO + 16 ) // Main entry to solid and surface topology (ultra compressed form). #define PRC_TYPE_TOPO_WireBody ( PRC_TYPE_TOPO + 17 ) // This type is the main entry to wire topology. #define PRC_TYPE_TESS_Base ( PRC_TYPE_TESS + 1 ) // Abstract root type for any tessellated entity. #define PRC_TYPE_TESS_3D ( PRC_TYPE_TESS + 2 ) // Tessellated faceted data; regular form. #define PRC_TYPE_TESS_3D_Compressed ( PRC_TYPE_TESS + 3 ) // Tessellated faceted data; highly compressed form. #define PRC_TYPE_TESS_Face ( PRC_TYPE_TESS + 4 ) // Tessellated face. #define PRC_TYPE_TESS_3D_Wire ( PRC_TYPE_TESS + 5 ) // Tessellated wireframe. #define PRC_TYPE_TESS_Markup ( PRC_TYPE_TESS + 6 ) // Tessellated markup. #define PRC_TYPE_MISC_Attribute ( PRC_TYPE_MISC + 1 ) // Entity attribute. #define PRC_TYPE_MISC_CartesianTransformation ( PRC_TYPE_MISC + 2 ) // Cartesian transformation. #define PRC_TYPE_MISC_EntityReference ( PRC_TYPE_MISC + 3 ) // Entity reference. #define PRC_TYPE_MISC_MarkupLinkedItem ( PRC_TYPE_MISC + 4 ) // Link between a markup and an entity. #define PRC_TYPE_MISC_ReferenceOnPRCBase ( PRC_TYPE_MISC + 5 ) // Reference pointing on a regular entity (not topological). #define PRC_TYPE_MISC_ReferenceOnTopology ( PRC_TYPE_MISC + 6 ) // Reference pointing on a topological entity. #define PRC_TYPE_MISC_GeneralTransformation ( PRC_TYPE_MISC + 7 ) // General transformation. #define PRC_TYPE_RI_RepresentationItem ( PRC_TYPE_RI + 1 ) // Basic abstract type for representation items. #define PRC_TYPE_RI_BrepModel ( PRC_TYPE_RI + 2 ) // Basic type for surfaces and solids. #define PRC_TYPE_RI_Curve ( PRC_TYPE_RI + 3 ) // Basic type for curves. #define PRC_TYPE_RI_Direction ( PRC_TYPE_RI + 4 ) // Optional point + vector. #define PRC_TYPE_RI_Plane ( PRC_TYPE_RI + 5 ) // Construction plane, as opposed to planar surface. #define PRC_TYPE_RI_PointSet ( PRC_TYPE_RI + 6 ) // Set of points. #define PRC_TYPE_RI_PolyBrepModel ( PRC_TYPE_RI + 7 ) // Basic type to polyhedral surfaces and solids. #define PRC_TYPE_RI_PolyWire ( PRC_TYPE_RI + 8 ) // Polyedric wireframe entity. #define PRC_TYPE_RI_Set ( PRC_TYPE_RI + 9 ) // Logical grouping of arbitrary number of representation items. #define PRC_TYPE_RI_CoordinateSystem ( PRC_TYPE_RI + 10 ) // Coordinate system. #define PRC_TYPE_ASM_ModelFile ( PRC_TYPE_ASM + 1 ) // Basic entry type for PRC. #define PRC_TYPE_ASM_FileStructure ( PRC_TYPE_ASM + 2 ) // Basic structure for PRC files. #define PRC_TYPE_ASM_FileStructureGlobals ( PRC_TYPE_ASM + 3 ) // Basic structure for PRC files : globals. #define PRC_TYPE_ASM_FileStructureTree ( PRC_TYPE_ASM + 4 ) // Basic structure for PRC files : tree. #define PRC_TYPE_ASM_FileStructureTessellation ( PRC_TYPE_ASM + 5 ) // Basic structure for PRC files : tessellation. #define PRC_TYPE_ASM_FileStructureGeometry ( PRC_TYPE_ASM + 6 ) // Basic structure for PRC files : geometry. #define PRC_TYPE_ASM_FileStructureExtraGeometry ( PRC_TYPE_ASM + 7 ) // Basic structure for PRC files : extra geometry data. #define PRC_TYPE_ASM_ProductOccurence ( PRC_TYPE_ASM + 10 ) // Basic contruct for assemblies. #define PRC_TYPE_ASM_PartDefinition ( PRC_TYPE_ASM + 11 ) // Basic construct for parts. #define PRC_TYPE_ASM_Filter ( PRC_TYPE_ASM + 20 ) #define PRC_TYPE_MKP_View ( PRC_TYPE_MKP + 1 ) // Grouping of markup by views. #define PRC_TYPE_MKP_Markup ( PRC_TYPE_MKP + 2 ) // Basic type for simple markups. #define PRC_TYPE_MKP_Leader ( PRC_TYPE_MKP + 3 ) // basic type for markup leader #define PRC_TYPE_MKP_AnnotationItem ( PRC_TYPE_MKP + 4 ) // Usage of a markup. #define PRC_TYPE_MKP_AnnotationSet ( PRC_TYPE_MKP + 5 ) // Group of annotations. #define PRC_TYPE_MKP_AnnotationReference ( PRC_TYPE_MKP + 6 ) // Logical grouping of annotations for reference. #define PRC_TYPE_GRAPH_Style ( PRC_TYPE_GRAPH + 1 ) // Display style. #define PRC_TYPE_GRAPH_Material ( PRC_TYPE_GRAPH + 2 ) // Display material properties. #define PRC_TYPE_GRAPH_Picture ( PRC_TYPE_GRAPH + 3 ) // Picture. #define PRC_TYPE_GRAPH_TextureApplication ( PRC_TYPE_GRAPH + 11 ) // Texture application. #define PRC_TYPE_GRAPH_TextureDefinition ( PRC_TYPE_GRAPH + 12 ) // Texture definition. #define PRC_TYPE_GRAPH_TextureTransformation ( PRC_TYPE_GRAPH + 13 ) // Texture transformation. #define PRC_TYPE_GRAPH_LinePattern ( PRC_TYPE_GRAPH + 21 ) // One dimensional display style. #define PRC_TYPE_GRAPH_FillPattern ( PRC_TYPE_GRAPH + 22 ) // Abstract class for two-dimensional display style. #define PRC_TYPE_GRAPH_DottingPattern ( PRC_TYPE_GRAPH + 23 ) // Two-dimensional filling with dots. #define PRC_TYPE_GRAPH_HatchingPattern ( PRC_TYPE_GRAPH + 24 ) // Two-dimensional filling with hatches. #define PRC_TYPE_GRAPH_SolidPattern ( PRC_TYPE_GRAPH + 25 ) // Two-dimensional filling with particular style (color, material, texture). #define PRC_TYPE_GRAPH_VPicturePattern ( PRC_TYPE_GRAPH + 26 ) // Two-dimensional filling with vectorised picture. #define PRC_TYPE_GRAPH_AmbientLight ( PRC_TYPE_GRAPH + 31 ) // Scene ambient illumination. #define PRC_TYPE_GRAPH_PointLight ( PRC_TYPE_GRAPH + 32 ) // Scene point illumination. #define PRC_TYPE_GRAPH_DirectionalLight ( PRC_TYPE_GRAPH + 33 ) // Scene directional illumination. #define PRC_TYPE_GRAPH_SpotLight ( PRC_TYPE_GRAPH + 34 ) // Scene spot illumination. #define PRC_TYPE_GRAPH_SceneDisplayParameters ( PRC_TYPE_GRAPH + 41 ) // Parameters for scene visualisation. #define PRC_TYPE_GRAPH_Camera ( PRC_TYPE_GRAPH + 42 ) // #define PRC_TYPE_MATH_FCT_1D ( PRC_TYPE_MATH + 1 ) // Basic type for one degree equation object. #define PRC_TYPE_MATH_FCT_1D_Polynom ( PRC_TYPE_MATH_FCT_1D + 1 ) // Polynomial equation. #define PRC_TYPE_MATH_FCT_1D_Trigonometric ( PRC_TYPE_MATH_FCT_1D + 2 ) // Cosinus based equation. #define PRC_TYPE_MATH_FCT_1D_Fraction ( PRC_TYPE_MATH_FCT_1D + 3 ) // Fraction between 2 one degree equation object. #define PRC_TYPE_MATH_FCT_1D_ArctanCos ( PRC_TYPE_MATH_FCT_1D + 4 ) // Specific equation. #define PRC_TYPE_MATH_FCT_1D_Combination ( PRC_TYPE_MATH_FCT_1D + 5 ) // Combination of one degree equation object. #define PRC_TYPE_MATH_FCT_3D ( PRC_TYPE_MATH + 10 ) // Basic type for 3rd degree equation object. #define PRC_TYPE_MATH_FCT_3D_Linear ( PRC_TYPE_MATH_FCT_3D + 1 ) // Linear transformation ( with a matrix ). #define PRC_TYPE_MATH_FCT_3D_NonLinear ( PRC_TYPE_MATH_FCT_3D + 2 ) // Specific transformation. #define PRC_PRODUCT_FLAG_DEFAULT 0x0001 #define PRC_PRODUCT_FLAG_INTERNAL 0x0002 #define PRC_PRODUCT_FLAG_CONTAINER 0x0004 #define PRC_PRODUCT_FLAG_CONFIG 0x0008 #define PRC_PRODUCT_FLAG_VIEW 0x0010 #define PRC_TRANSFORMATION_Identity 0x00 #define PRC_TRANSFORMATION_Translate 0x01 #define PRC_TRANSFORMATION_Rotate 0x02 #define PRC_TRANSFORMATION_Mirror 0x04 #define PRC_TRANSFORMATION_Scale 0x08 #define PRC_TRANSFORMATION_NonUniformScale 0x10 #define PRC_TRANSFORMATION_NonOrtho 0x20 #define PRC_TRANSFORMATION_Homogeneous 0x40 #define PRC_FACETESSDATA_Polyface 0x0001 #define PRC_FACETESSDATA_Triangle 0x0002 #define PRC_FACETESSDATA_TriangleFan 0x0004 #define PRC_FACETESSDATA_TriangleStripe 0x0008 #define PRC_FACETESSDATA_PolyfaceOneNormal 0x0010 #define PRC_FACETESSDATA_TriangleOneNormal 0x0020 #define PRC_FACETESSDATA_TriangleFanOneNormal 0x0040 #define PRC_FACETESSDATA_TriangleStripeOneNormal 0x0080 #define PRC_FACETESSDATA_PolyfaceTextured 0x0100 #define PRC_FACETESSDATA_TriangleTextured 0x0200 #define PRC_FACETESSDATA_TriangleFanTextured 0x0400 #define PRC_FACETESSDATA_TriangleStripeTextured 0x0800 #define PRC_FACETESSDATA_PolyfaceOneNormalTextured 0x1000 #define PRC_FACETESSDATA_TriangleOneNormalTextured 0x2000 #define PRC_FACETESSDATA_TriangleFanOneNormalTextured 0x4000 #define PRC_FACETESSDATA_TriangleStripeOneNormalTextured 0x8000 #define PRC_FACETESSDATA_NORMAL_Single 0x40000000 #define PRC_FACETESSDATA_NORMAL_Mask 0x3FFFFFFF #define PRC_FACETESSDATA_WIRE_IsNotDrawn 0x4000 // Indicates that the edge should not be drawn (its neighbor will be drawn). #define PRC_FACETESSDATA_WIRE_IsClosing 0x8000 // Indicates that this is the last edge of a loop. #define PRC_3DWIRETESSDATA_IsClosing 0x10000000 // Indicates that the first point is implicitely repeated after the last one to close the wire edge. #define PRC_3DWIRETESSDATA_IsContinuous 0x20000000 // Indicates that the last point of the preceding wire should be linked with the first point of the current one. #define PRC_TEXTURE_MAPPING_DIFFUSE 0x0001 // Diffuse texture mapping attribute. Default value. #define PRC_TEXTURE_MAPPING_BUMP 0x0002 // Bump texture mapping attribute. #define PRC_TEXTURE_MAPPING_OPACITY 0x0004 // Opacity texture mapping attribute. #define PRC_TEXTURE_MAPPING_SPHERICAL_REFLECTION 0x0008 // Spherical reflection texture mapping attribute (used for environment mapping). #define PRC_TEXTURE_MAPPING_CUBICAL_REFLECTION 0x0010 // Cubical reflection texture mapping attribute (used for environment mapping). #define PRC_TEXTURE_MAPPING_REFRACTION 0x0020 // Refraction texture mapping attribute. #define PRC_TEXTURE_MAPPING_SPECULAR 0x0040 // Specular texture mapping attribute. #define PRC_TEXTURE_MAPPING_AMBIENT 0x0080 // Ambient texture mapping attribute. #define PRC_TEXTURE_MAPPING_EMISSION 0x0100 // Emission texture mapping attribute. #define PRC_TEXTURE_APPLYING_MODE_NONE 0x00 // let the application choose #define PRC_TEXTURE_APPLYING_MODE_LIGHTING 0x01 // use lighting mode #define PRC_TEXTURE_APPLYING_MODE_ALPHATEST 0x02 // use alpha test #define PRC_TEXTURE_APPLYING_MODE_VERTEXCOLOR 0x04 // combine a texture with one-color-per-vertex mode #define PRC_TEXTURE_MAPPING_COMPONENTS_RED 0x0001 // Red texture mapping component. #define PRC_TEXTURE_MAPPING_COMPONENTS_GREEN 0x0002 // Green texture mapping component. #define PRC_TEXTURE_MAPPING_COMPONENTS_BLUE 0x0004 // Blue texture mapping component. #define PRC_TEXTURE_MAPPING_COMPONENTS_RGB 0x0007 // RGB texture mapping component. #define PRC_TEXTURE_MAPPING_COMPONENTS_ALPHA 0x0008 // Alpha texture mapping component. #define PRC_TEXTURE_MAPPING_COMPONENTS_RGBA 0x000F // RGBA texture mapping component. enum EPRCModellerAttributeType { KEPRCModellerAttributeTypeNull = 0, KEPRCModellerAttributeTypeInt = 1, KEPRCModellerAttributeTypeReal = 2, KEPRCModellerAttributeTypeTime = 3, KEPRCModellerAttributeTypeString = 4 }; enum EPRCPictureDataFormat { KEPRCPicture_PNG, KEPRCPicture_JPG, KEPRCPicture_BITMAP_RGB_BYTE, KEPRCPicture_BITMAP_RGBA_BYTE, KEPRCPicture_BITMAP_GREY_BYTE, KEPRCPicture_BITMAP_GREYA_BYTE }; enum EPRCProductLoadStatus { KEPRCProductLoadStatus_Unknown = 0, KEPRCProductLoadStatus_Error, KEPRCProductLoadStatus_NotLoaded, KEPRCProductLoadStatus_NotLoadable, KEPRCProductLoadStatus_Loaded }; enum EPRCExtendType { KEPRCExtendTypeNone = 0, // Discontinuous position. KEPRCExtendTypeExt1 = 2, // Same as EPRCExtendTypeCInfinity. KEPRCExtendTypeExt2 = 4, // Same as EPRCExtendTypeG1R for surface, and EPRCExtendTypeG1 for curve. KEPRCExtendTypeG1 = 6, // Continuous in direction but not magnitude of first derivative. KEPRCExtendTypeG1R = 8, // Surface extended with a ruled surface that connects with G1-continuity. KEPRCExtendTypeG1_G2 = 10, // Extended by reflection, yielding a G2 continuous extension. KEPRCExtendTypeCInfinity = 12 // Unlimited continuity. }; enum EPRCKnotType { // Knot vector type KEPRCKnotTypeUniformKnots, // Uniform knot vector. KEPRCKnotTypeUnspecified, // Unspecified knot type. KEPRCKnotTypeQuasiUniformKnots, // Quasi-uniform knot vector. KEPRCKnotTypePiecewiseBezierKnots // Extrema with multiplicities of degree +1. }; // Note : this value is currently unused and should be set to KEPRCKnotTypeUnspecified. enum EPRCBSplineSurfaceForm { KEPRCBSplineSurfaceFormPlane, // Planar surface. KEPRCBSplineSurfaceFormCylindrical, // Cylindrical surface. KEPRCBSplineSurfaceFormConical, // Conical surface. KEPRCBSplineSurfaceFormSpherical, // Spherical surface. KEPRCBSplineSurfaceFormRevolution, // Surface of revolution. KEPRCBSplineSurfaceFormRuled, // Ruled surface. KEPRCBSplineSurfaceFormGeneralizedCone, // Cone. KEPRCBSplineSurfaceFormQuadric, // Quadric surface. KEPRCBSplineSurfaceFormLinearExtrusion, // Surface of extrusion. KEPRCBSplineSurfaceFormUnspecified, // Unspecified surface. KEPRCBSplineSurfaceFormPolynomial // Polynomial surface. }; enum EPRCBSplineCurveForm { // NURBS curve form KEPRCBSplineCurveFormUnspecified, // Unspecified curve form. KEPRCBSplineCurveFormPolyline, // Polygon. KEPRCBSplineCurveFormCircularArc, // Circle arc. KEPRCBSplineCurveFormEllipticArc, // Elliptical arc. KEPRCBSplineCurveFormParabolicArc, // Parabolic arc. KEPRCBSplineCurveFormHyperbolicArc // Hyperbolic arc. }; // Note : this value is currently unused and should be set to KEPRCBSplineCurveFormUnspecified. enum EPRCTextureMappingType { // Defines how to retrieve mapping coordinates. KEPRCTextureMappingType_Unknown, // Let the application choose. KEPRCTextureMappingType_Stored, // Use the mapping coordinates that are stored on a 3D tessellation object KEPRCTextureMappingType_Parametric, // Retrieve the UV coordinates on the surface as mapping coordinates KEPRCTextureMappingType_Operator // Use the defined Texture mapping operator to calculate mapping coordinates }; enum EPRCTextureFunction { // Defines how to paint a texture on the surface being rendered. KEPRCTextureFunction_Unknown, // Let the application choose. KEPRCTextureFunction_Modulate, // Combine lighting with texturing. This is the default value. KEPRCTextureFunction_Replace, // Replace the object color with texture color data. KEPRCTextureFunction_Blend, // Reserved for future use. KEPRCTextureFunction_Decal // Reserved for future use. }; enum EPRCTextureMappingOperator { // The operator to use when computing mapping coordinates. KEPRCTextureMappingOperator_Unknown, // Default value KEPRCTextureMappingOperator_Planar, // Reserved for future use KEPRCTextureMappingOperator_Cylindrical, // Reserved for future use KEPRCTextureMappingOperator_Spherical, // Reserved for future use KEPRCTextureMappingOperator_Cubical // Reserved for future use }; enum EPRCTextureBlendParameter { // Reserved for future use. Defines how to apply blending. KEPRCTextureBlendParameter_Unknown, // Default value. KEPRCTextureBlendParameter_Zero, // Reserved for future use. KEPRCTextureBlendParameter_One, // Reserved for future use. KEPRCTextureBlendParameter_SrcColor, // Reserved for future use. KEPRCTextureBlendParameter_OneMinusSrcColor, // Reserved for future use. KEPRCTextureBlendParameter_DstColor, // Reserved for future use. KEPRCTextureBlendParameter_OneMinusDstColor, // Reserved for future use. KEPRCTextureBlendParameter_SrcAlpha, // Reserved for future use. KEPRCTextureBlendParameter_OneMinusSrcAlpha, // Reserved for future use. KEPRCTextureBlendParameter_DstAlpha, // Reserved for future use. KEPRCTextureBlendParameter_OneMinusDstAlpha, // Reserved for future use. KEPRCTextureBlendParameter_SrcAlphaSaturate // Reserved for future use. }; enum EPRCTextureWrappingMode { // Defines repeating and clamping texture modes. KEPRCTextureWrappingMode_Unknown, // Let the application choose. KEPRCTextureWrappingMode_Repeat, // Display the repeated texture on the surface. KEPRCTextureWrappingMode_ClampToBorder, // Clamp the texture to the border. Display the surface color along the texture limits. KEPRCTextureWrappingMode_Clamp, // Reserved for future use. KEPRCTextureWrappingMode_ClampToEdge, // Reserved for future use. KEPRCTextureWrappingMode_MirroredRepeat // Reserved for future use. }; enum EPRCTextureAlphaTest { // Reserved for future use. Defines how to use a texture alpha test. KEPRCTextureAlphaTest_Unknown, // Default value. KEPRCTextureAlphaTest_Never, // Reserved for future use. KEPRCTextureAlphaTest_Less, // Reserved for future use. KEPRCTextureAlphaTest_Equal, // Reserved for future use. KEPRCTextureAlphaTest_Lequal, // Reserved for future use. KEPRCTextureAlphaTest_Greater, // Reserved for future use. KEPRCTextureAlphaTest_Notequal, // Reserved for future use. KEPRCTextureAlphaTest_Gequal, // Reserved for future use. KEPRCTextureAlphaTest_Always // Reserved for future use. }; // Bit field for graphics behavior #define PRC_GRAPHICS_Show 0x0001 // The entity is shown. #define PRC_GRAPHICS_SonHeritShow 0x0002 // Shown entity son inheritance. #define PRC_GRAPHICS_FatherHeritShow 0x0004 // Shown entity father inheritance. #define PRC_GRAPHICS_SonHeritColor 0x0008 // Color/material son inheritance. #define PRC_GRAPHICS_FatherHeritColor 0x0010 // Color/material father inheritance. #define PRC_GRAPHICS_SonHeritLayer 0x0020 // Layer son inheritance. #define PRC_GRAPHICS_FatherHeritLayer 0x0040 // Layer father inheritance. #define PRC_GRAPHICS_SonHeritTransparency 0x0080 // Transparency son inheritance. #define PRC_GRAPHICS_FatherHeritTransparency 0x0100 // Transparency father inheritance. #define PRC_GRAPHICS_SonHeritLinePattern 0x0200 // Line pattern son inheritance. #define PRC_GRAPHICS_FatherHeritLinePattern 0x0400 // Line pattern father inheritance. #define PRC_GRAPHICS_SonHeritLineWidth 0x0800 // Line width son inheritance. #define PRC_GRAPHICS_FatherHeritLineWidth 0x1000 // Line width father inheritance. #define PRC_GRAPHICS_Removed 0x2000 // The entity has been removed and no longer appears in the tree. enum EPRCMarkupType { KEPRCMarkupType_Unknown = 0, KEPRCMarkupType_Text, KEPRCMarkupType_Dimension, KEPRCMarkupType_Arrow, KEPRCMarkupType_Balloon, KEPRCMarkupType_CircleCenter, KEPRCMarkupType_Coordinate, KEPRCMarkupType_Datum, KEPRCMarkupType_Fastener, KEPRCMarkupType_Gdt, KEPRCMarkupType_Locator, KEPRCMarkupType_MeasurementPoint, KEPRCMarkupType_Roughness, KEPRCMarkupType_Welding, KEPRCMarkupType_Table, KEPRCMarkupType_Other }; enum EPRCMarkupSubType { KEPRCMarkupSubType_Unknown = 0, KEPRCMarkupSubType_EnumMax, KEPRCMarkupSubType_Datum_Ident = 1 , KEPRCMarkupSubType_Datum_EnumMax, KEPRCMarkupSubType_Dimension_Distance = 1, KEPRCMarkupSubType_Dimension_Radius_Tangent, KEPRCMarkupSubType_Dimension_Radius_Cylinder, KEPRCMarkupSubType_Dimension_Radius_Edge, KEPRCMarkupSubType_Dimension_Diameter, KEPRCMarkupSubType_Dimension_Diameter_Tangent, KEPRCMarkupSubType_Dimension_Diameter_Cylinder, KEPRCMarkupSubType_Dimension_Diameter_Edge, KEPRCMarkupSubType_Dimension_Diameter_Cone, KEPRCMarkupSubType_Dimension_Length, KEPRCMarkupSubType_Dimension_Length_Curvilinear, KEPRCMarkupSubType_Dimension_Length_Circular, KEPRCMarkupSubType_Dimension_Angle, KEPRCMarkupSubType_Dimension_EnumMax, KEPRCMarkupSubType_Gdt_Fcf = 1, KEPRCMarkupSubType_Gdt_EnumMax, KEPRCMarkupSubType_Welding_Line = 1, KEPRCMarkupSubType_Welding_EnumMax, KEPRCMarkupSubType_Other_Symbol_User = 1, KEPRCMarkupSubType_Other_EnumMax }; #define PRC_MARKUP_IsHidden 0x01 // The tessellation is hidden. #define PRC_MARKUP_HasFrame 0x02 // The tessellation has a frame. #define PRC_MARKUP_IsNotModifiable 0x04 // The tessellation is given and should not be modified. #define PRC_MARKUP_IsZoomable 0x08 // The tessellation has zoom capability. #define PRC_MARKUP_IsOnTop 0x10 // The tessellation is on top of the geometry. #define PRC_MARKUP_IsFlipable 0x20 // The text tessellation can be flipped to always be readable on screen. This value is currently unused. #define PRC_RENDERING_PARAMETER_SPECIAL_CULLING 0x0001 // special culling strategy to apply #define PRC_RENDERING_PARAMETER_FRONT_CULLING 0x0002 // apply front culling (ignored if no special culling strategy) #define PRC_RENDERING_PARAMETER_BACK_CULLING 0x0004 // apply back culling (ignored if no special culling strategy) #define PRC_RENDERING_PARAMETER_NO_LIGHT 0x0008 // if set, no light will apply on corresponding object #define PRC_MARKUP_IsMatrix 0x08000000 // Bit to denote that the current entity is a matrix. #define PRC_MARKUP_IsExtraData 0x04000000 // Bit to denote that the current entity is extra data (it is neither a matrix nor a polyline). #define PRC_MARKUP_IntegerMask 0xFFFFF // Integer mask to retrieve sizes. #define PRC_MARKUP_ExtraDataType 0x3E00000 // Mask to retrieve the integer type of the entity. #define PRC_MARKUP_ExtraDataType_Pattern (( 0<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Picture (( 1<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Triangles (( 2<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Quads (( 3<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_FaceViewMode (( 6<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_FrameDrawMode (( 7<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_FixedSizeMode (( 8<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Symbol (( 9<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Cylinder ((10<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Color ((11<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_LineStipple ((12<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Font ((13<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Text ((14<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Points ((15<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_Polygon ((16<<21)|PRC_MARKUP_IsExtraData) #define PRC_MARKUP_ExtraDataType_LineWidth ((17<<21)|PRC_MARKUP_IsExtraData) enum EPRCCharSet { KEPRCCharsetUnknown = -1, KEPRCCharsetRoman = 0, KEPRCCharsetJapanese, KEPRCCharsetTraditionalChinese, KEPRCCharsetKorean, KEPRCCharsetArabic, KEPRCCharsetHebrew, KEPRCCharsetGreek, KEPRCCharsetCyrillic, KEPRCCharsetRightLeft, KEPRCCharsetDevanagari, KEPRCCharsetGurmukhi, KEPRCCharsetGujarati, KEPRCCharsetOriya, KEPRCCharsetBengali, KEPRCCharsetTamil, KEPRCCharsetTelugu, KEPRCCharsetKannada, KEPRCCharsetMalayalam, KEPRCCharsetSinhalese, KEPRCCharsetBurmese, KEPRCCharsetKhmer, KEPRCCharsetThai, KEPRCCharsetLaotian, KEPRCCharsetGeorgian, KEPRCCharsetArmenian, KEPRCCharsetSimplifiedChinese, KEPRCCharsetTibetan, KEPRCCharsetMongolian, KEPRCCharsetGeez, KEPRCCharsetEastEuropeanRoman, KEPRCCharsetVietnamese, KEPRCCharsetExtendedArabic }; #define PRC_Font_Bold 0x02 /*!< Bold. */ #define PRC_Font_Italic 0x04 /*!< Italic. */ #define PRC_Font_Underlined 0x08 /*!< Underlined. */ #define PRC_Font_StrikedOut 0x10 /*!< Striked-out. */ #define PRC_Font_Overlined 0x20 /*!< Overlined. */ #define PRC_Font_Streched 0x40 /*!< Streched. In case the font used is not the original font, it indicates that the text needs to be stretched to fit its bounding box. */ #define PRC_Font_Wired 0x80 /*!< Wired. Indicates that the original font is a wirefame font. */ #define PRC_Font_FixedWidth 0x100 /*!< Fixed width. Indicates that the original font is not proportional (each glyph has the same width). */ #define PRC_CONTEXT_OuterLoopFirst 0x0001 // Outer loops are always first loops (specific to PRC_TYPE_TOPO_BrepData). #define PRC_CONTEXT_NoClamp 0x0002 // UV curves are clamped on the surface (specific to PRC_TYPE_TOPO_BrepData). #define PRC_CONTEXT_NoSplit 0x0004 // Faces are split (specific to PRC_TYPE_TOPO_BrepData). #define PRC_BODY_BBOX_Evaluation 0x0001 // Bounding box based on geometry. #define PRC_BODY_BBOX_Precise 0x0002 // Bounding box based on tessellation. #define PRC_BODY_BBOX_CADData 0x0003 // Bounding box given by a CAD data file. #endif // __PRC_H ./asymptote-2.41/prc/Makefile0000644000175000017500000000171613064427076015774 0ustar norbertnorbert# Makefile. CFLAGS = -O3 -g -Wall CXX = g++ MAKEDEPEND = $(CFLAGS) -O0 -M -DDEPEND FILES = PRCbitStream oPRCFile PRCdouble writePRC all: $(FILES:=.o) #test: $(FILES:=.o) test.o # $(CXX) $(CFLAGS) -o test $(FILES:=.o) test.o -lz #test_tess: $(FILES:=.o) test_tess.o # $(CXX) $(CFLAGS) -o test_tess $(FILES:=.o) test_tess.o -lz #test_mesh: $(FILES:=.o) test_mesh.o # $(CXX) $(CFLAGS) -o test_mesh $(FILES:=.o) test_mesh.o -lz .SUFFIXES: .c .cc .o .d .cc.o: $(CXX) $(CFLAGS) $(INCL) -o $@ -c $< .cc.d: @echo Creating $@; \ rm -f $@; \ ${CXX} $(MAKEDEPEND) $(INCL) $(MDOPTS) $< > $@.$$$$ 2>/dev/null && \ sed 's,\($*\)\.o[ :]*,\1.o $@ : ,g' < $@.$$$$ > $@; \ rm -f $@.$$$$ .c.d: @echo Creating $@; \ rm -f $@; \ ${CC} $(MAKEDEPEND) $(INCL) $(MDOPTS) $< > $@.$$$$ 2>/dev/null && \ sed 's,\($*\)\.o[ :]*,\1.o $@ : ,g' < $@.$$$$ > $@; \ rm -f $@.$$$$ ifeq (,$(findstring clean,${MAKECMDGOALS})) -include $(FILES:=.d) endif clean: rm -f *.o *.d test test_tess ./asymptote-2.41/prc/PRCbitStream.cc0000644000175000017500000002026313064427076017140 0ustar norbertnorbert/************ * * This file is part of a tool for producing 3D content in the PRC format. * Copyright (C) 2008 Orest Shardt and * Michail Vidiassov * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include #include #include #include "PRCbitStream.h" #include "PRCdouble.h" using std::string; using std::cerr; using std::endl; void PRCbitStream::compress() { const int CHUNK= 1024; // is this reasonable? compressedDataSize = 0; z_stream strm; strm.zalloc = Z_NULL; strm.zfree = Z_NULL; strm.opaque = Z_NULL; if(deflateInit(&strm,Z_DEFAULT_COMPRESSION) != Z_OK) { cerr << "Compression initialization failed" << endl; return; } unsigned int sizeAvailable = deflateBound(&strm,getSize()); uint8_t *compressedData = (uint8_t*) malloc(sizeAvailable); strm.avail_in = getSize(); strm.next_in = (unsigned char*)data; strm.next_out = (unsigned char*)compressedData; strm.avail_out = sizeAvailable; int code; unsigned int chunks = 0; while((code = deflate(&strm,Z_FINISH)) == Z_OK) { ++chunks; // strm.avail_out should be 0 if we got Z_OK compressedDataSize = sizeAvailable - strm.avail_out; compressedData = (uint8_t*) realloc(compressedData,CHUNK*chunks); strm.next_out = (Bytef*)(compressedData + compressedDataSize); strm.avail_out += CHUNK; sizeAvailable += CHUNK; } compressedDataSize = sizeAvailable-strm.avail_out; if(code != Z_STREAM_END) { cerr << "Compression error" << endl; deflateEnd(&strm); free(compressedData); return; } compressed = true; free(data); data = compressedData; deflateEnd(&strm); } void PRCbitStream::write(std::ostream &out) const { if(compressed) { out.write((char*)data,compressedDataSize); } else { cerr << "Attempt to write stream before compression." << endl; exit(1); } } unsigned int PRCbitStream::getSize() const { if(compressed) return compressedDataSize; else return byteIndex+1; } uint8_t* PRCbitStream::getData() { return data; } PRCbitStream& PRCbitStream::operator <<(bool b) { writeBit(b); return *this; } PRCbitStream& PRCbitStream::operator <<(uint32_t u) { while(u != 0) { writeBit(1); writeByte(u & 0xFF); u >>= 8; } writeBit(0); return *this; } PRCbitStream& PRCbitStream::operator <<(uint8_t u) { writeByte(u); return *this; } PRCbitStream& PRCbitStream::operator <<(int32_t i) { uint8_t lastByte = 0; //while(!((current value is 0 and last byte was positive) OR (current value is -1 and last value was negative))) while(!(((i == 0)&&((lastByte & 0x80)==0))||((i == -1)&&((lastByte & 0x80) != 0)))) { writeBit(1); lastByte = i & 0xFF; writeByte(lastByte); i >>= 8; } writeBit(0); return *this; } PRCbitStream& PRCbitStream::operator <<(double value) { // write a double if(compressed) { cerr << "Cannot write to a stream that has been compressed." << endl; return *this; } union ieee754_double *pid=(union ieee754_double *)&value; int i, fSaveAtEnd; PRCbyte *pb, *pbStart, *pbStop, *pbEnd, *pbResult, bSaveAtEnd = 0; struct sCodageOfFrequentDoubleOrExponent cofdoe, *pcofdoe; cofdoe.u2uod.Value=value; pcofdoe = (struct sCodageOfFrequentDoubleOrExponent *)bsearch( &cofdoe, acofdoe, sizeof(acofdoe)/sizeof(pcofdoe[0]), sizeof(pcofdoe[0]), stCOFDOECompare); while(pcofdoe>acofdoe && EXPONENT(pcofdoe->u2uod.Value)==EXPONENT((pcofdoe-1)->u2uod.Value)) pcofdoe--; assert(pcofdoe); while(pcofdoe->Type==VT_double) { if(fabs(value)==pcofdoe->u2uod.Value) break; pcofdoe++; } for(i=1<<(pcofdoe->NumberOfBits-1);i>=1;i>>=1) writeBit((pcofdoe->Bits&i)!=0); if ( !memcmp(&value,stadwZero,sizeof(value)) || !memcmp(&value,stadwNegativeZero,sizeof(value)) ) return *this; writeBit(pid->ieee.negative); if(pcofdoe->Type==VT_double) return *this; if(pid->ieee.mantissa0==0 && pid->ieee.mantissa1==0) { writeBit(0); return *this; } writeBit(1); #ifdef WORDS_BIGENDIAN pb=((PRCbyte *)&value)+1; #else pb=((PRCbyte *)&value)+6; #endif //add_bits((*pb)&0x0f,4 STAT_V STAT_DOUBLE); writeBits((*pb)&0x0F,4); NEXTBYTE(pb); pbStart=pb; #ifdef WORDS_BIGENDIAN pbEnd= pbStop= ((PRCbyte *)(&value+1))-1; #else pbEnd= pbStop= ((PRCbyte *)&value); #endif if((fSaveAtEnd=(*pbStop!=*BEFOREBYTE(pbStop)))!=0) bSaveAtEnd=*pbEnd; PREVIOUSBYTE(pbStop); while(*pbStop==*BEFOREBYTE(pbStop)) PREVIOUSBYTE(pbStop); for(;MOREBYTE(pb,pbStop);NEXTBYTE(pb)) { if(pb!=pbStart && (pbResult=SEARCHBYTE(BEFOREBYTE(pb),*pb,DIFFPOINTERS(pb,pbStart)))!=NULL) { writeBit(0); writeBits(DIFFPOINTERS(pb,pbResult),3); } else { writeBit(1); writeByte(*pb); } } if(!MOREBYTE(BEFOREBYTE(pbEnd),pbStop)) { if(fSaveAtEnd) { writeBit(0); writeBits(6,3); writeByte(bSaveAtEnd); } else { writeBit(0); writeBits(0,3); } } else { if((pbResult=SEARCHBYTE(BEFOREBYTE(pb),*pb,DIFFPOINTERS(pb,pbStart)))!=NULL) { writeBit(0); writeBits(DIFFPOINTERS(pb,pbResult),3); } else { writeBit(1); writeByte(*pb); } } return *this; } PRCbitStream& PRCbitStream::operator <<(const char* s) { if (s == NULL) { writeBit(false); // string is NULL return *this; } string str(s); *this << str; return *this; } PRCbitStream& PRCbitStream::operator <<(const string& s) { if(s == "") { writeBit(false); // string is NULL return *this; } writeBit(true); size_t l = s.length(); *this << static_cast(l); for(size_t i = 0; i < l; ++i) writeByte(s[i]); return *this; } void PRCbitStream::writeBit(bool b) { if(compressed) { cerr << "Cannot write to a stream that has been compressed." << endl; return; } if(b) { data[byteIndex] |= (0x80 >> bitIndex); } nextBit(); } void PRCbitStream::writeBits(uint32_t u, uint8_t bits) { if(bits > 32) return; else { for(uint32_t mask = (1 << (bits-1)); mask != 0; mask >>= 1) { writeBit((u&mask) != 0); } } } void PRCbitStream::writeByte(uint8_t u) { if(compressed) { cerr << "Cannot write to a stream that has been compressed." << endl; return; } if(bitIndex == 0) { data[byteIndex] = u; nextByte(); } else { data[byteIndex] |= (u >> bitIndex); unsigned int obi = bitIndex; nextByte(); data[byteIndex] |= (u << (8-obi)); bitIndex = obi; // bit index is not changed by writing 8 bits } } void PRCbitStream::nextBit() { ++bitIndex; if(bitIndex == 8) { nextByte(); } } void PRCbitStream::nextByte() { ++byteIndex; if(byteIndex >= allocatedLength) getAChunk(); data[byteIndex] = 0; // clear the garbage data bitIndex = 0; } void PRCbitStream::getAChunk() { if(allocatedLength==0) data = (uint8_t*)realloc((void*)data,CHUNK_SIZE); else data = (uint8_t*)realloc((void*)data,2*allocatedLength); if(data != NULL) { if(allocatedLength==0) { allocatedLength = CHUNK_SIZE; *data = 0; // clear first byte } else allocatedLength *= 2; } else { // warn about memory problem! cerr << "Memory allocation error." << endl; exit(1); } } ./asymptote-2.41/runstring.symbols.h0000644000175000017500000000160013064427143017426 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(ascii); ADDSYMBOL(digits); ADDSYMBOL(downcase); ADDSYMBOL(erase); ADDSYMBOL(find); ADDSYMBOL(format); ADDSYMBOL(hex); ADDSYMBOL(insert); ADDSYMBOL(length); ADDSYMBOL(locale); ADDSYMBOL(n); ADDSYMBOL(pos); ADDSYMBOL(replace); ADDSYMBOL(reverse); ADDSYMBOL(rfind); ADDSYMBOL(s); ADDSYMBOL(seconds); ADDSYMBOL(separator); ADDSYMBOL(string); ADDSYMBOL(substr); ADDSYMBOL(t); ADDSYMBOL(time); ADDSYMBOL(translate); ADDSYMBOL(upcase); ADDSYMBOL(x); ./asymptote-2.41/program.cc0000644000175000017500000000631313064427076015524 0ustar norbertnorbert/***** * program.cc * Tom Prince * * The list of instructions used by the virtual machine. *****/ #include #include "util.h" #include "callable.h" #include "program.h" namespace vm { static const char* opnames[] = { #define OPCODE(name, type) #name, #include "opcodes.h" #undef OPCODE }; static const Int numOps = (Int)(sizeof(opnames)/sizeof(char *)); static const char optypes[] = { #define OPCODE(name, type) type, #include "opcodes.h" #undef OPCODE }; #ifdef DEBUG_BLTIN mem::map bltinRegistry; void registerBltin(bltin b, string s) { bltinRegistry[b] = s; } string lookupBltin(bltin b) { return bltinRegistry[b]; } #endif ostream& operator<< (ostream& out, const item& i) { if (i.empty()) return out << "empty"; if (isdefault(i)) return out << "default"; #if COMPACT // TODO: Try to guess the type from the value. Int n = get(i); double x = get(i); void *p = get(i); if (n == BoolTruthValue) return out << "true"; if (n == BoolFalseValue) return out << "false"; if (std::abs(n) < 1000000) return out << n; if (fabs(x) < 1e30 and fabs(x) > 1e-30) return out << x; return out << ""; #else // TODO: Make a data structure mapping typeids to print functions. else if (i.type() == typeid(Int)) out << "Int, value = " << get(i); else if (i.type() == typeid(double)) out << "real, value = " << get(i); else if (i.type() == typeid(string)) out << "string, value = " << get(i); else if (i.type() == typeid(callable)) out << *(get(i)); else if (i.type() == typeid(frame)) { out << "frame"; # ifdef DEBUG_FRAME { frame *f = get(i); if (f) out << " " << f->getName(); else out << " "; } # endif } else out << "type " << demangle(i.type().name()); #endif return out; } void printInst(ostream& out, const program::label& code, const program::label& base) { out.width(4); out << offset(base,code) << " "; Int i = (Int)code->op; if (i < 0 || i >= numOps) { out << "<>" << i; return; } out << opnames[i]; switch (optypes[i]) { case 'n': { out << " " << get(*code); break; } case 't': { item c = code->ref; out << " " << c; break; } case 'b': { #ifdef DEBUG_BLTIN string s=lookupBltin(get(*code)); out << " " << (!s.empty() ? s : "") << " "; #endif break; } case 'o': { char f = out.fill('0'); out << " i"; out.width(4); out << offset(base,get(*code)); out.fill(f); break; } case 'l': { #ifdef DEBUG_FRAME out << " " << get(*code)->name << " "; #endif break; } default: { /* nothing else to do */ break; } }; } void print(ostream& out, program *base) { program::label code = base->begin(); bool active = true; while (active) { if (code->op == inst::ret || code->op < 0 || code->op >= numOps) active = false; printInst(out, code, base->begin()); out << '\n'; ++code; } } } // namespace vm ./asymptote-2.41/array.cc0000644000175000017500000001102013064427076015162 0ustar norbertnorbert/***** * array.cc * Andy Hammerlindl 2008/01/26 * * Array type used by virtual machine. *****/ #include "array.h" #include "mod.h" namespace vm { inline void checkBackSlice(Int left, Int right) { if (right < left) // There isn't a clear behaviour for slices of the form A[5:2], so we don't // allow them. (Atleast, not until we can figure out what the behaviour // should be.) vm::error("slice ends before it begins"); } inline size_t sliceIndex(Int in, size_t len) { if (in < 0) // The Python behaviour here would simply be // in += len; // but this is inconsistent with Asymptote issuing an error for A[-1] if A // is a non-cyclic array, so we also issue an error here. vm::error("invalid negative index in slice of non-cyclic array"); if (in < 0) return 0; size_t index = (size_t)in; return index < len ? index : len; } array *array::slice(Int left, Int right) { checkBackSlice(left, right); if (left == right) return new array(); size_t length=size(); if (length == 0) return new array(); if (cycle) { size_t resultLength = (size_t)(right - left); array *result = new array(resultLength); size_t i = (size_t)imod(left, length), ri = 0; while (ri < resultLength) { (*result)[ri] = (*this)[i]; ++ri; ++i; if (i >= length) i -= length; } return result; } else { // Non-cyclic size_t l = sliceIndex(left, length); size_t r = sliceIndex(right, length); size_t resultLength = r - l; array *result = new array(resultLength); std::copy(this->begin()+l, this->begin()+r, result->begin()); return result; } } void array::setNonBridgingSlice(size_t l, size_t r, mem::vector *a) { assert(0 <= l); assert(l <= r); size_t asize=a->size(); if (asize == r-l) { // In place std::copy(a->begin(), a->end(), this->begin()+l); } else if (asize < r-l) { // Shrinking std::copy(a->begin(), a->end(), this->begin()+l); this->erase(this->begin()+l+a->size(), this->begin()+r); } else { // Expanding // NOTE: As a speed optimization, we could check capacity() to see if the // array can fit the new entries, and build the new array from scratch // (using swap()) if a new allocation is necessary. std::copy(a->begin(), a->begin()+r-l, this->begin()+l); this->insert(this->begin()+r, a->begin()+r-l, a->end()); } } void array::setBridgingSlice(size_t l, size_t r, mem::vector *a) { size_t len=this->size(); assert(r<=l); assert(r+len-l == a->size()); std::copy(a->begin(), a->begin()+(len-l), this->begin()+l); std::copy(a->begin()+(len-l), a->end(), this->begin()); } void array::setSlice(Int left, Int right, array *a) { checkBackSlice(left, right); // If we are slicing an array into itself, slice in a copy instead, to ensure // the proper result. mem::vector *v = (a == this) ? new mem::vector(*a) : a; size_t length=size(); if (cycle) { if (right == left) { // Notice that assigning to the slice A[A.length:A.length] is the same as // assigning to the slice A[0:0] for a cyclic array. size_t l = (size_t)imod(left, length); setNonBridgingSlice(l, l, v); } else { if (left + (Int) length < right) vm::error("assigning to cyclic slice with repeated entries"); size_t l = (size_t)imod(left, length); // Set r to length instead of zero, so that slices that go to the end of // the array are properly treated as non-bridging. size_t r = (size_t)imod(right, length); if (r == 0) r = length; if (l < r) setNonBridgingSlice(l, r, v); else { if (r + length - l == v->size()) setBridgingSlice(l, r, v); else vm::error("assignment to cyclic slice is not well defined"); } } } else { size_t l=sliceIndex(left, length); size_t r=sliceIndex(right, length); setNonBridgingSlice(l, r, v); } } item copyItemToDepth(item i, size_t depth) { if (depth == 0) return i; else return get(i)->copyToDepth(depth); } array *array::copyToDepth(size_t depth) { if (depth == 0) { return this; } else { size_t n=this->size(); array *a=new array(n); a->cycle = this->cycle; for (size_t i=0; i(n), cycle(false) { for (size_t k=0; k(s); s->push(*p); } void itemPointerWrite(stack *s) { item *p=pop(s); item value=pop(s); *p=value; s->push(value); } void itemRefAccess::encode(action act, position, coder &e) { REGISTER_BLTIN(itemPointerRead, "itemPointerRead"); REGISTER_BLTIN(itemPointerWrite, "itemPointerWrite"); e.encode(inst::constpush, (item)ref); switch (act) { case READ: e.encode(inst::builtin, itemPointerRead); break; case WRITE: e.encode(inst::builtin, itemPointerWrite); break; case CALL: e.encode(inst::builtin, itemPointerRead); e.encode(inst::popcall); break; }; } void itemRefAccess::encode(action act, position pos, coder &e, frame *) { // Get rid of the useless top frame. e.encode(inst::pop); encode(act, pos, e); } } ./asymptote-2.41/keywords.pl0000755000175000017500000000234513064427076015756 0ustar norbertnorbert#!/usr/bin/env perl ##### # keywords.pl # Andy Hammerlindl 2006/07/31 # # Extract keywords from camp.l and list them in a keywords file. These # keywords are used in autocompletion at the interactive prompt. ##### # Extra keywords to add that aren't automatically extracted, currently none. @extrawords = (); open(keywords, ">keywords.cc") || die("Couldn't open keywords.out for writing."); print keywords <) { if (/^%%\s*$/) { last; # Break out of the loop. } } # Grab simple keyword definitions from camp.l while () { if (/^%%\s*$/) { last; # A second %% indicates the end of definitions. } if (/^([A-Za-z_][A-Za-z0-9_]*)\s*\{/) { add($1); } } # Grab the special commands from the interactive prompt. open(process, "process.cc") || dir("Couldn't open process.cc"); while () { if (/^\s*ADDCOMMAND\(\s*([A-Za-z_][A-Za-z0-9_]*),/) { add($1); } } ./asymptote-2.41/beziercurve.cc0000644000175000017500000000345713064427076016410 0ustar norbertnorbert/***** * drawbezierpatch.cc * Author: John C. Bowman * * Render a Bezier curve. *****/ #include "beziercurve.h" namespace camp { #ifdef HAVE_GL std::vector BezierCurve::buffer; std::vector BezierCurve::indices; void BezierCurve::init(double res, const triple& Min, const triple& Max) { this->res=res; res2=res*res; this->Min=Min; this->Max=Max; const size_t nbuffer=10000; buffer.reserve(nbuffer); indices.reserve(nbuffer); } // Use a uniform partition to draw a Bezier patch. // p is an array of 4 triples representing the control points. // Ii are the vertices indices. void BezierCurve::render(const triple *p, GLuint I0, GLuint I1) { triple p0=p[0]; triple p1=p[1]; triple p2=p[2]; triple p3=p[3]; if(Distance1(p0,p1,p2,p3) < res2) { // Segment is flat triple P[]={p0,p3}; if(!offscreen(2,P)) { indices.push_back(I0); indices.push_back(I1); } } else { // Segment is not flat if(offscreen(4,p)) return; triple m0=0.5*(p0+p1); triple m1=0.5*(p1+p2); triple m2=0.5*(p2+p3); triple m3=0.5*(m0+m1); triple m4=0.5*(m1+m2); triple m5=0.5*(m3+m4); triple s0[]={p0,m0,m3,m5}; triple s1[]={m5,m4,m2,p3}; GLuint i0=vertex(m5); render(s0,I0,i0); render(s1,i0,I1); } } void BezierCurve::render(const triple *p, bool straight) { GLuint i0=vertex(p[0]); GLuint i3=vertex(p[3]); if(straight) { indices.push_back(i0); indices.push_back(i3); } else render(p,i0,i3); } void BezierCurve::draw() { size_t stride=3*sizeof(GLfloat); glEnableClientState(GL_VERTEX_ARRAY); glVertexPointer(3,GL_FLOAT,stride,&buffer[0]); glDrawElements(GL_LINES,indices.size(),GL_UNSIGNED_INT,&indices[0]); glDisableClientState(GL_VERTEX_ARRAY); clear(); } #endif } //namespace camp ./asymptote-2.41/drawpath.h0000644000175000017500000000116613064427076015532 0ustar norbertnorbert/***** * drawpath.h * Andy Hammerlindl 2002/06/06 * * Stores a path that has been added to a picture. *****/ #ifndef DRAWPATH_H #define DRAWPATH_H #include "drawelement.h" #include "path.h" namespace camp { class drawPath : public drawPathPenBase { public: drawPath(path src, pen pentype) : drawPathPenBase(src, pentype) {} virtual ~drawPath() {} void bounds(bbox& b, iopipestream&, boxvector&, bboxlist&) { strokebounds(b,p); } bool svg() {return true;} bool draw(psfile *out); drawElement *transformed(const transform& t); }; pen adjustdash(pen& p, double arclength, bool cyclic); } #endif ./asymptote-2.41/examples/0000755000175000017500000000000013064427076015361 5ustar norbertnorbert./asymptote-2.41/examples/clockarray.asy0000644000175000017500000000137213064427076020234 0ustar norbertnorbertint nx=3; int ny=4; real xmargin=1cm; real ymargin=xmargin; size(settings.paperwidth,settings.paperheight); picture pic; real width=settings.paperwidth/nx-xmargin; real height=settings.paperheight/ny-ymargin; if(width <= 0 || height <= 0) abort("margin too big"); size(pic,width,height); pen p=linewidth(0.5mm); draw(pic,unitcircle,p); real h=0.08; real m=0.05; for(int hour=1; hour <= 12; ++hour) { pair z=dir((12-hour+3)*30); label(pic,string(hour),z,z); draw(pic,z--(1-h)*z,p); } for(int minutes=0; minutes < 60; ++minutes) { pair z=dir(6*minutes); draw(pic,z--(1-m)*z); } dot(pic,(0,0)); frame f=pic.fit(); pair size=size(f)+(xmargin,ymargin); for(int i=0; i < nx; ++i) for(int j=0; j < ny; ++j) add(shift(realmult(size,(i,j)))*f); ./asymptote-2.41/examples/transparency.asy0000644000175000017500000000036613064427076020615 0ustar norbertnorbertsize(0,150); if(settings.outformat == "") settings.outformat="pdf"; begingroup(); fill(shift(1.5dir(120))*unitcircle,green+opacity(0.75)); fill(shift(1.5dir(60))*unitcircle,red+opacity(0.75)); fill(unitcircle,blue+opacity(0.75)); endgroup(); ./asymptote-2.41/examples/Sierpinski.asy0000644000175000017500000000063013064427076020216 0ustar norbertnorbertsize(10cm); // Draw Sierpinski triangle with top vertex A, side s, and depth q. void Sierpinski(pair A, real s, int q, bool top=true) { pair B=A-(1,sqrt(2))*s/2; pair C=B+s; if(top) draw(A--B--C--cycle); draw((A+B)/2--(B+C)/2--(A+C)/2--cycle); if(q > 0) { Sierpinski(A,s/2,q-1,false); Sierpinski((A+B)/2,s/2,q-1,false); Sierpinski((A+C)/2,s/2,q-1,false); } } Sierpinski((0,1),1,5); ./asymptote-2.41/examples/shellmethod.asy0000644000175000017500000000205213064427076020406 0ustar norbertnorbertimport graph3; import solids; size(400); currentprojection=perspective(0,-1,30,up=Y); currentlight=light(gray(0.75),(0.25,-0.25,1),(0,1,0)); pen color=green; real alpha=240; real f(real x) {return 2x^2-x^3;} pair F(real x) {return (x,f(x));} triple F3(real x) {return (x,f(x),0);} int n=10; path3[] blocks=new path3[n]; for(int i=1; i <= n; ++i) { real height=f((i-0.5)*2/n); real left=(i-1)*2/n; real right=i*2/n; blocks[i-1]= (left,0,0)--(left,height,0)--(right,height,0)--(right,0,0)--cycle; } path p=graph(F,0,2,n,operator ..)--cycle; surface s=surface(p); path3 p3=path3(p); render render=render(compression=0,merge=true); revolution a=revolution(p3,Y,0,alpha); draw(surface(a),color,render); draw(rotate(alpha,Y)*s,color,render); for(int i=0; i < n; ++i) draw(surface(blocks[i]),color+opacity(0.5),black,render); draw(p3); xaxis3(Label("$x$",1,align=2X),Arrow3); yaxis3(Label("$y$",1,align=2Y),ymax=1.4,dashed,Arrow3); arrow("$y=2x^2-x^3$",XYplane(F(1.8)),X+Z,1.5cm,red,Arrow3(DefaultHead2)); draw(arc(1.17Y,0.3,90,0,7.5,180),ArcArrow3); ./asymptote-2.41/examples/sphereskeleton.asy0000644000175000017500000000024513064427076021133 0ustar norbertnorbertsize(100); import solids; currentprojection=orthographic(5,4,2); revolution sphere=sphere(1); draw(surface(sphere),green+opacity(0.2)); draw(sphere,m=7,blue); ./asymptote-2.41/examples/jump.asy0000644000175000017500000000044313064427076017053 0ustar norbertnorbertimport graph; size(4inches,0); real f1(real x) {return (1+x^2);} real f2(real x) {return (4-x);} xaxis("$x$",LeftTicks,Arrow); yaxis("$y$",RightTicks,Arrow); draw("$y=1+x^2$",graph(f1,-2,1)); dot((1,f1(1)),UnFill); draw("$y=4-x$",graph(f2,1,5),LeftSide,red,Arrow); dot((1,f2(1)),red); ./asymptote-2.41/examples/exp3.asy0000644000175000017500000000110313064427076016751 0ustar norbertnorbertimport graph3; import palette; size(12cm,IgnoreAspect); currentprojection=orthographic(1,-2,1); real f(pair z) {return abs(exp(z));} real Arg(triple v) {return degrees(exp((v.x,v.y)),warn=false);} surface s=surface(f,(-2,-pi),(2,pi),20,Spline); s.colors(palette(s.map(Arg),Wheel())); draw(s,render(compression=Low,merge=true)); real xmin=point((-1,-1,-1)).x; real xmax=point((1,1,1)).x; draw((xmin,0,0)--(xmax,0,0),dashed); xaxis3("$\mathop{\rm Re} z$",Bounds,InTicks); yaxis3("$\mathop{\rm Im} z$",Bounds,InTicks(beginlabel=false)); zaxis3("$|\exp(z)|$",Bounds,InTicks); ./asymptote-2.41/examples/dragon.asy0000644000175000017500000000230013064427076017344 0ustar norbertnorbertpair crease(pair z1, pair z2, bool left) { pair dz = z2 - z1; if (left) return z1 + dz * (0.5, 0.5); else return z1 + dz * (0.5, -0.5); } pair[] fold(pair[] oldz) { int n = oldz.length; pair[] newz = new pair[2n-1]; for (int i = 0; i < n-1; ++i) { newz[2i] = oldz[i]; newz[2i+1] = crease(oldz[i], oldz[i+1], i%2==0); } newz[2(n-1)] = oldz[n-1]; return newz; } pair[] dragon(int n, pair[] base={}) { if (base.length == 0) if (n%2 == 0) base = new pair[] {(0,0), (1,1) }; else base = new pair[] {(0,0), (1,0) }; pair[] z = base; for (int i = 1; i < n; ++i) z = fold(z); return z; } void drawtris(pair[] z, pen p = currentpen) { int n = z.length; for (int i = 0; i < n-2; i+=2) fill(z[i]--z[i+1]--z[i+2]--cycle, p); } void drawtris(pair[] z, pen p1, pen p2) { int n = z.length; for (int i = 0; i < n-2; i+=2) fill(z[i]--z[i+1]--z[i+2]--cycle, 2i < n-1 ? p1 : p2); } size(500,0); int n = 10; drawtris(dragon(n, new pair[] {(0,0), (1,0)}), black); drawtris(dragon(n, new pair[] {(0,0), (0,-1)}), blue); drawtris(dragon(n, new pair[] {(0,0), (-1,0)}), red); drawtris(dragon(n, new pair[] {(0,0), (0,1)}), green); ./asymptote-2.41/examples/cyclohexane.asy0000644000175000017500000000345313064427076020406 0ustar norbertnorbertimport three; currentprojection=perspective(300,-650,500); currentlight.background=palecyan; surface carbon=scale3(70)*unitsphere; // 70 pm surface hydrogen=scale3(25)*unitsphere; // 25 pm real alpha=90+aSin(1/3); real CCbond=156; // 156 pm real CHbond=110; // 110 pm triple c1=(0,0,0); triple h1=c1+CHbond*Z; triple c2=rotate(alpha,c1,c1+Y)*(CCbond*Z); triple h2=rotate(120,c1,c2)*h1; triple h3=c2-CHbond*Z; triple h4=rotate(120,c2,c1)*h3; triple c3=rotate(120,c2,h3)*c1; triple h5=c3+CHbond*Z; triple h6=rotate(-120,c3,c2)*h5; triple c4=rotate(-120,c3,h5)*c2; triple h7=c4-CHbond*Z; triple h8=rotate(120,c4,c3)*h7; triple c5=rotate(120,c4,h7)*c3; triple h9=c5+CHbond*Z; triple h10=rotate(-120,c5,c4)*h9; triple c6=rotate(-120,c5,h9)*c4; triple h11=c6-CHbond*Z; triple h12=rotate(120,c6,c5)*h11; pen Black=gray(0.4); defaultrender=render(compression=Zero,merge=true); draw(shift(c1)*carbon,Black); draw(shift(c2)*carbon,Black); draw(shift(c3)*carbon,Black); draw(shift(c4)*carbon,Black); draw(shift(c5)*carbon,Black); draw(shift(c6)*carbon,Black); material White=material(diffusepen=gray(0.4),emissivepen=gray(0.6)); draw(shift(h1)*hydrogen,White); draw(shift(h2)*hydrogen,White); draw(shift(h3)*hydrogen,White); draw(shift(h4)*hydrogen,White); draw(shift(h5)*hydrogen,White); draw(shift(h6)*hydrogen,White); draw(shift(h7)*hydrogen,White); draw(shift(h8)*hydrogen,White); draw(shift(h9)*hydrogen,White); draw(shift(h10)*hydrogen,White); draw(shift(h11)*hydrogen,White); draw(shift(h12)*hydrogen,White); pen thick=linewidth(10); draw(c1--c2--c3--c4--c5--c6--cycle,thick); draw(c1--h1,thick); draw(c1--h2,thick); draw(c2--h3,thick); draw(c2--h4,thick); draw(c3--h5,thick); draw(c3--h6,thick); draw(c4--h7,thick); draw(c4--h8,thick); draw(c5--h9,thick); draw(c5--h10,thick); draw(c6--h11,thick); draw(c6--h12,thick); ./asymptote-2.41/examples/sin3.asy0000644000175000017500000000110313064427076016746 0ustar norbertnorbertimport graph3; import palette; size(12cm,IgnoreAspect); currentprojection=orthographic(1,-2,1); real f(pair z) {return abs(sin(z));} real Arg(triple v) {return degrees(cos((v.x,v.y)),warn=false);} surface s=surface(f,(-pi,-2),(pi,2),20,Spline); s.colors(palette(s.map(Arg),Wheel())); draw(s,render(compression=Low,merge=true)); real xmin=point((-1,-1,-1)).x; real xmax=point((1,1,1)).x; draw((xmin,0,0)--(xmax,0,0),dashed); xaxis3("$\mathop{\rm Re} z$",Bounds,InTicks); yaxis3("$\mathop{\rm Im} z$",Bounds,InTicks(beginlabel=false)); zaxis3("$|\sin(z)|$",Bounds,InTicks); ./asymptote-2.41/examples/markregular.asy0000644000175000017500000000150113064427076020410 0ustar norbertnorbertimport graph; size(10cm,0); real xmin=-4,xmax=4; real ymin=-2,ymax=10; real f(real x) {return x^2;} marker cross=marker(scale(4)*rotate(45)*cross(4), markuniform(new pair(real t) {return Scale((t,f(t)));}, xmin,xmax,round(2*(xmax-xmin))),1bp+red); draw(graph(f,xmin,xmax,n=400),linewidth(1bp),cross); ylimits(-2.5,10,Crop); xaxis(Label("$x$",position=EndPoint, align=NE),xmin=xmin,xmax=xmax, Ticks(scale(.7)*Label(align=E),NoZero,begin=false,beginlabel=false, end=false,endlabel=false,Step=1,step=.25, Size=1mm, size=.5mm,pTick=black,ptick=gray),Arrow); yaxis(Label("$y$",position=EndPoint, align=NE),ymin=ymin,ymax=ymax, Ticks(scale(.7)*Label(),NoZero,begin=false,beginlabel=false, end=false,endlabel=false,Step=1,step=.25,Size=1mm,size=.5mm, pTick=black,ptick=gray),Arrow); ./asymptote-2.41/examples/sphericalharmonic.asy0000644000175000017500000000057013064427076021574 0ustar norbertnorbertimport graph3; import palette; size(200); currentprojection=orthographic(4,2,4); currentlight=Viewport; real r(real theta, real phi) {return 1+0.5*(sin(2*theta)*sin(2*phi))^2;} triple f(pair z) {return r(z.x,z.y)*expi(z.x,z.y);} surface s=surface(f,(0,0),(pi,2pi),50,Spline); s.colors(palette(s.map(abs),Gradient(yellow,red))); draw(s,render(compression=Low,merge=true)); ./asymptote-2.41/examples/strokepath.asy0000644000175000017500000000047313064427076020267 0ustar norbertnorbertpath g=scale(100)*unitcircle; pen p=linewidth(1cm); frame f; // Equivalent to draw(f,g,p): fill(f,strokepath(g,p),red); shipout("strokepathframe",f); shipped=false; size(400); // Equivalent to draw(g,p): add(new void(frame f, transform t) { fill(f,strokepath(t*g,p),red); }); currentpicture.addPath(g,p); ./asymptote-2.41/examples/pipes.asy0000644000175000017500000000743413064427076017227 0ustar norbertnorbertimport solids; import tube; import graph3; import palette; size(8cm); currentprojection=perspective( camera=(13.3596389245356,8.01038090435314,14.4864483364785), up=(-0.0207054323419367,-0.00472438375047319,0.0236460907598947), target=(-1.06042550499095,2.68154529985845,0.795007562120261)); defaultpen(fontsize(6pt)); // draw coordinates and frames // axis1 is defined by z axis of TBase // axis2 is defined by z axis of TEnd void DrawFrame(transform3 TBase, transform3 TEnd, string s) { triple p1,v1,p2,v2; p1=TBase*O; v1=TBase*Z-p1; p2=TEnd*O; v2=TEnd*Z-p2; triple n=cross(v1,v2); real[][] A= { {v1.x,-v2.x,-n.x}, {v1.y,-v2.y,-n.y}, {v1.z,-v2.z,-n.z} }; triple vb=p2-p1; real[] b={vb.x,vb.y,vb.z}; // Get the extention along vector v1 and v2, // so, we can get the common normal between two axis real[] x=solve(A,b); real s1=x[0]; real s2=x[1]; // get foot of a perpendicular on both axies triple foot1=p1+s1*v1; triple foot2=p2+s2*v2; // draw two axis triple axis_a,axis_b; axis_a=p1+s1*v1*1.5; axis_b=p1-s1*v1*1.5; draw(axis_a--axis_b); axis_a=p2+s2*v2*1.5; axis_b=p2-s2*v2*1.5; draw(axis_a--axis_b); // draw "a"(common normal) draw(Label("$a_{"+s+"}$"),foot1--foot2,linewidth(1pt)); // draw the coordinates frame triple dx,dy,dz,org; real length=0.8; org=foot1; dx =length*unit(foot2-foot1); // define the x axis of the frame on "a" dz =length*unit(v1); // define the z axis which is along axis1 dy =length*unit(cross(dz,dx)); draw(Label("$X_{"+s+"}$",1,align=-dy-dz),org--(org+dx),red+linewidth(1.5pt), Arrow3(8)); draw(Label("$Y_{"+s+"}$",1,align=2dy-dz-dx),org--(org+dy), green+linewidth(1.5pt), Arrow3(8)); draw(Label("$Z_{"+s+"}$",1,align=-2dx-dy),org--(org+dz), blue+linewidth(1.5pt), Arrow3(8)); dot(Label("$O_{"+s+"}$",align =-dx-dz,black),org,black); // origin } void DrawLink(transform3 TBase, transform3 TEnd, pen objStyle,string s) { real h=1; real r=0.5; path3 generator=(0.5*r,0,h)--(r,0,h)--(r,0,0)--(0.5*r,0,0); revolution vase=revolution(O,generator,0,360); surface objSurface=surface(vase); render render=render(merge=true); // draw two cylinders draw(TBase*objSurface,objStyle,render); draw(TEnd*shift((0,0,-h))*objSurface,objStyle,render); // draw the link between two cylinders triple pStart=TBase*(0.5*h*Z); triple pEnd =TEnd*(-0.5*h*Z); triple pControl1=0.25*(pEnd-pStart)+TBase*(0,0,h); triple pControl2=-0.25*(pEnd-pStart)+TEnd*(0,0,-h); path3 p=pStart..controls pControl1 and pControl2..pEnd; draw(tube(p,scale(0.2)*unitsquare),objStyle,render); } // t1 and t2 define the starting frame and ending frame of the first link(i-1) transform3 t1=shift((0,0,1)); transform3 t2=shift((0,0,-1))*rotate(-20,Y)*shift((0,3,2)); // as, the two links were connected, so t2 is also the starting frame of link(i) // t3 defines the ending frame of link(i) transform3 t3=t2*rotate(40,Z)*shift((0,3,1.5))*rotate(-15,Y)*shift(-1.5*Z); // draw link(i-1) DrawLink(t1,t2,palegreen,"i-1"); DrawFrame(t1,t2,"i-1"); // draw link(i) DrawLink(t2,t3,lightmagenta,"i"); DrawFrame(t2,t3,"i"); // draw angle alpha, which is the angle between axis(i-1) and axis(i) triple p0=(0,0,-1); triple p1=(0,0,2.3); triple p2=shift((0,0,-1))*rotate(-20,Y)*(0,0,4); draw(p0--p2,cyan); draw("$\alpha_{i-1}$",arc(p0,p1,p2,Y,CW),ArcArrow3(3)); // draw angle theta, which is the angle between a_i and a_{i-1} transform3 tx=shift((0,0,-1))*rotate(-20,Y)*shift((0,3,0)); p0=tx*O; p1=tx*(0,3,0); p2=tx*rotate(40,Z)*(0,3,0); draw(p0--p1,cyan); draw(p0--p2,cyan); triple p1a=tx*(0,1.5,0); draw("$\theta_{i}$",arc(p0,p1a,p2),ArcArrow3(3)); // draw d_{i-1} triple org_i =t2*shift((0,0,1.5))*O; draw(Label("$d_{i}$",0.13),p0--org_i,linewidth(1pt)); ./asymptote-2.41/examples/conicurv.asy0000644000175000017500000000336413064427076017735 0ustar norbertnorbert// Original name : conicurv.mp // Author : L. Nobre G. // Translators : J. Pienaar (2004) and John Bowman (2005) import three; texpreamble("\usepackage{bm}"); size(300,0); currentprojection=perspective(10,-5,5.44); real theta=30, width=3, shortradius=2, bord=2, refsize=1, vecsize=2; real height=0.3, anglar=1.75, totup=3; real longradius=shortradius+width*Cos(theta), updiff=width*Sin(theta); triple iplow=(0,shortradius,0), iphig=(0,longradius,updiff); triple oplow=(-shortradius,0,0), ophig=(-longradius,0,updiff); triple aplow=-iplow, aphig=(0,-longradius,updiff); triple eplow=-oplow, ephig=(longradius,0,updiff); triple anglebase=(0,longradius,0), centre=interp(iplow,iphig,0.5)+(0,0,height); triple central=(0,0,centre.z), refo=(0,0.5*centre.y,centre.z); triple refx=refsize*(0,Cos(theta),Sin(theta)); triple refy=refsize*(0,-Sin(theta),Cos(theta)); draw("$\theta$",arc(iplow,iplow+0.58*(iphig-iplow),anglebase),E); draw(central,linewidth(2bp)); draw(iplow--iphig); draw(oplow--ophig); draw(aplow--aphig); draw(eplow--ephig); draw(iphig--anglebase--aplow,dashed); draw(oplow--eplow,dashed); draw(central--centre,dashed); draw((0,0,-bord)--(0,longradius+bord,-bord)--(0,longradius+bord,totup) --(0,0,totup)--cycle); draw(Label("$y$",1),refo--refo+refy,SW,Arrow3); draw(Label("$x$",1),refo--refo+refx,SE,Arrow3); draw(Label("$\vec{R}_N$",1),centre--centre+vecsize*refy,E,Arrow3); draw(Label("$\vec{F}_a$",1),centre--centre+vecsize*refx,N,Arrow3); draw(Label("$\vec{F}_c$",1),centre--centre+vecsize*Y,NE,Arrow3); draw(Label("$\vec{P}$",1),centre--centre-vecsize*Z,E,Arrow3); draw(Label("$\vec{v}$",1),centre--centre+vecsize*X,E,Arrow3); draw(centre,10pt+blue); draw(circle((0,0,updiff),longradius),linewidth(2bp)); draw(circle(O,shortradius),linewidth(2bp)); ./asymptote-2.41/examples/star.asy0000644000175000017500000000022113064427076017043 0ustar norbertnorbertsize(100); import math; int n=5; path p; int i=0; do { p=p--unityroot(n,i); i=(i+2) % n; } while(i != 0); filldraw(p--cycle,red+evenodd); ./asymptote-2.41/examples/twistedtubes.asy0000644000175000017500000000156513064427076020634 0ustar norbertnorbertimport graph3; import palette; size(300,300,keepAspect=true); real w=0.4; real f(triple t) {return sin(t.x);} triple f1(pair t) {return (cos(t.x)-2cos(w*t.y),sin(t.x)-2sin(w*t.y),t.y);} triple f2(pair t) {return (cos(t.x)+2cos(w*t.y),sin(t.x)+2sin(w*t.y),t.y);} triple f3(pair t) {return (cos(t.x)+2sin(w*t.y),sin(t.x)-2cos(w*t.y),t.y);} triple f4(pair t) {return (cos(t.x)-2sin(w*t.y),sin(t.x)+2cos(w*t.y),t.y);} surface s1=surface(f1,(0,0),(2pi,10),8,8,Spline); surface s2=surface(f2,(0,0),(2pi,10),8,8,Spline); surface s3=surface(f3,(0,0),(2pi,10),8,8,Spline); surface s4=surface(f4,(0,0),(2pi,10),8,8,Spline); pen[] Rainbow=Rainbow(); s1.colors(palette(s1.map(f),Rainbow)); s2.colors(palette(s2.map(f),Rainbow)); s3.colors(palette(s3.map(f),Rainbow)); s4.colors(palette(s4.map(f),Rainbow)); defaultrender.merge=true; draw(s1); draw(s2); draw(s3); draw(s4); ./asymptote-2.41/examples/sinxlex.asy0000644000175000017500000000060113064427076017566 0ustar norbertnorbertimport geometry; size(0,100); real theta=30; pair A=(0,0); pair B=dir(theta); pair C=(1,0); pair D=(1,Tan(theta)); pair E=(Cos(theta),0); filldraw(A--C{N}..B--cycle,lightgrey); draw(B--C--D--cycle); draw(B--E); draw("$x$",arc(C,A,B,0.7),RightSide,Arrow,PenMargin); dot("$A$",A,W); dot("$B$",B,NW); dot("$C$",C); dot("$D$",D); dot(("$E$"),E,S); label("$1$",A--B,LeftSide); ./asymptote-2.41/examples/BezierTriangle.asy0000644000175000017500000000030713064427076021005 0ustar norbertnorbertimport three; currentprojection=perspective(-2,5,1); size(10cm); surface s=surface((0,0,0)--(3,0,0)--(1.5,3*sqrt(3)/2,0)--cycle, new triple[] {(1.5,sqrt(3)/2,2)}); draw(s,red); ./asymptote-2.41/examples/tensor.asy0000644000175000017500000000045713064427076017417 0ustar norbertnorbertsize(200); pen[][] p={{red,green,blue,cyan},{blue,green,magenta,rgb(black)}}; path G=(0,0){dir(-120)}..(1,0)..(1,1)..(0,1)..cycle; path[] g={G,subpath(G,2,1)..(2,0)..(2,1)..cycle}; pair[][] z={{(0.5,0.5),(0.5,0.5),(0.5,0.5),(0.5,0.5)},{(2,0.5),(2,0.5),(1.5,0.5),(2,0.5)}}; tensorshade(g,p,z); dot(g); ./asymptote-2.41/examples/unitoctant.asy0000644000175000017500000000131113064427076020263 0ustar norbertnorbertimport graph3; currentprojection=orthographic(5,4,2); size(0,150); patch s=octant1; draw(surface(s),green+opacity(0.5)); draw(s.external(),blue); triple[][] P=s.P; for(int i=0; i < 4; ++i) dot(P[i],red); axes3("$x$","$y$",Label("$z$",align=Z)); triple P00=P[0][0]; triple P10=P[1][0]; triple P01=P[0][1]; triple P02=P[0][2]; triple P11=P[1][1]; triple P12=P[1][2]; triple Q11=XYplane(xypart(P11)); triple Q12=XYplane(xypart(P12)); draw(P11--Q11,dashed); draw(P12--Q12,dashed); draw(O--Q12--Q11--(Q11.x,0,0)); draw(Q12--(Q12.x,0,0)); label("$(1,0,0)$",P00,-2Y); label("$(1,a,0)$",P10,-Z); label("$(1,0,a)$",P01,-2Y); label("$(a,0,1)$",P02,Z+X-Y); label("$(1,a,a)$",P11,3X); label("$(a,a^2,1)$",P12,7X+Y); ./asymptote-2.41/examples/Gouraud.asy0000644000175000017500000000060013064427076017501 0ustar norbertnorbertsize(200); pen[] p={red,green,blue,magenta}; pair[] z={(-1,0),(0,0),(0,1),(1,0)}; int[] edges={0,0,0,1}; gouraudshade(z[0]--z[2]--z[3]--cycle,p,z,edges); draw(z[0]--z[1]--z[2]--cycle); draw(z[1]--z[3]--z[2],dashed); dot(Label,z[0],W); dot(Label,z[1],S); dot(Label,z[2],N); dot(Label,z[3],E); label("0",z[0]--z[1],S,red); label("1",z[1]--z[2],E,red); label("2",z[2]--z[0],NW,red); ./asymptote-2.41/examples/triceratops.asy0000644000175000017500000000037313064427076020441 0ustar norbertnorbertimport obj; size(15cm); currentprojection=orthographic(0,2,5,up=Y); // A compressed version of the required data file may be obtained from: // http://www.cs.technion.ac.il/~irit/data/Viewpoint/triceratops.obj.gz draw(obj("triceratops.obj",brown)); ./asymptote-2.41/examples/near_earth.asy0000644000175000017500000000304113064427076020205 0ustar norbertnorbertimport three; import math; texpreamble("\usepackage{bm}"); size(300,0); pen thickp=linewidth(0.5mm); real radius=0.8, lambda=37, aux=60; currentprojection=perspective(4,1,2); // Planes pen bg=gray(0.9)+opacity(0.5); draw(surface((1.2,0,0)--(1.2,0,1.2)--(0,0,1.2)--(0,0,0)--cycle),bg); draw(surface((0,1.2,0)--(0,1.2,1.2)--(0,0,1.2)--(0,0,0)--cycle),bg); draw(surface((1.2,0,0)--(1.2,1.2,0)--(0,1.2,0)--(0,0,0)--cycle),bg); real r=1.5; pen p=rgb(0,0.7,0); draw(Label("$x$",1),O--r*X,p,Arrow3); draw(Label("$y$",1),O--r*Y,p,Arrow3); draw(Label("$z$",1),O--r*Z,p,Arrow3); label("$\rm O$",(0,0,0),W); // Point Q triple pQ=radius*dir(lambda,aux); draw(O--radius*dir(90,aux),dashed); label("$\rm Q$",pQ,N+3*W); draw("$\lambda$",arc(O,0.15pQ,0.15*Z),N+0.3E); // Particle triple m=pQ-(0.26,-0.4,0.28); real width=5; dot("$m$",m,SE,linewidth(width)); draw("$\bm{\rho}$",(0,0,0)--m,Arrow3,PenMargin3(0,width)); draw("$\bm{r}$",pQ--m,Arrow3,PenMargin3(0,width)); // Spherical octant real r=sqrt(pQ.x^2+pQ.y^2); draw(arc((0,0,pQ.z),(r,0,pQ.z),(0,r,pQ.z)),dashed); draw(arc(O,radius*Z,radius*dir(90,aux)),dashed); draw(arc(O,radius*Z,radius*X),thickp); draw(arc(O,radius*Z,radius*Y),thickp); draw(arc(O,radius*X,radius*Y),thickp); // Moving axes triple i=dir(90+lambda,aux); triple k=unit(pQ); triple j=cross(k,i); draw(Label("$x$",1),pQ--pQ+0.2*i,2W,red,Arrow3); draw(Label("$y$",1),pQ--pQ+0.32*j,red,Arrow3); draw(Label("$z$",1),pQ--pQ+0.26*k,red,Arrow3); draw("$\bm{R}$",O--pQ,Arrow3,PenMargin3); draw("$\omega\bm{K}$",arc(0.9Z,0.2,90,-120,90,160,CW),1.2N,Arrow3); ./asymptote-2.41/examples/interpolate1.asy0000644000175000017500000001133113064427076020505 0ustar norbertnorbert// Lagrange and Hermite interpolation in Asymptote // Author: Olivier Guibé import interpolate; import graph; // Test 1: The Runge effect in the Lagrange interpolation of 1/(x^2+1). unitsize(2cm); real f(real x) {return(1/(x^2+1));} real df(real x) {return(-2*x/(x^2+1)^2);} real a=-5, b=5; int n=15; real[] x,y,dy; x=a+(b-a)*sequence(n+1)/n; y=map(f,x); dy=map(df,x); for(int i=0; i <= n; ++i) dot((x[i],y[i]),5bp+blue); horner h=diffdiv(x,y); fhorner p=fhorner(h); draw(graph(p,a,b,n=500),"$x\longmapsto{}L_{"+string(n)+"}$"); draw(graph(f,a,b),red,"$x\longmapsto{}\frac{1}{x^2+1}$"); xlimits(-5,5); ylimits(-1,1,Crop); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); attach(legend(),point(10S),30S); shipout("runge1"); erase(); // Test 2: The Runge effect in the Hermite interpolation of 1/(x^2+1). real f(real x) {return(1/(x^2+1));} real df(real x) {return(-2*x/(x^2+1)^2);} real a=-5, b=5; int n=16; real[] x,y,dy; x=a+(b-a)*sequence(n+1)/n; y=map(f,x); dy=map(df,x); for(int i=0; i <= n; ++i) dot((x[i],y[i]),5bp+blue); horner h=hdiffdiv(x,y,dy); fhorner ph=fhorner(h); draw(graph(p,a,b,n=500),"$x\longmapsto{}H_{"+string(n)+"}$"); draw(graph(f,a,b),red,"$x\longmapsto{}\frac{1}{x^2+1}$"); unitsize(2cm); xlimits(-5,5); ylimits(-1,5,Crop); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); attach(legend(),point(10S),30S); shipout("runge2"); erase(); // Test 3: The Runge effect does not occur for all functions: // Lagrange interpolation of a function whose successive derivatives // are bounded by a constant M (here M=1) is shown here to converge. real f(real x) {return(sin(x));} real df(real x) {return(cos(x));} real a=-5, b=5; int n=16; real[] x,y,dy; x=a+(b-a)*sequence(n+1)/n; y=map(f,x); dy=map(df,x); for(int i=0; i <= n; ++i) dot((x[i],y[i]),5bp+blue); horner h=diffdiv(x,y); fhorner p=fhorner(h); draw(graph(p,a,b,n=500),"$x\longmapsto{}L_{"+string(n)+"}$"); draw(graph(f,a,b),red,"$x\longmapsto{}\cos(x)$"); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); attach(legend(),point(10S),30S); shipout("runge3"); erase(); // Test 4: However, one notes here that numerical artifacts may arise // from limit precision (typically 1e-16). real f(real x) {return(sin(x));} real df(real x) {return(cos(x));} real a=-5, b=5; int n=72; real[] x,y,dy; x=a+(b-a)*sequence(n+1)/n; y=map(f,x); dy=map(df,x); for(int i=0; i <= n; ++i) dot((x[i],y[i]),5bp+blue); horner h=diffdiv(x,y); fhorner p=fhorner(h); draw(graph(p,a,b,n=500),"$x\longmapsto{}L_{"+string(n)+"}$"); draw(graph(f,a,b),red,"$x\longmapsto{}\cos(x)$"); ylimits(-1,5,Crop); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); attach(legend(),point(10S),30S); shipout("runge4"); erase(); // Test 5: The situation is much better using Tchebychev points. unitsize(2cm); real f(real x) {return(1/(x^2+1));} real df(real x) {return(-2*x/(x^2+1)^2);} real a=-5, b=5; int n=16; real[] x,y,dy; fhorner p,ph,ph1; for(int i=0; i <= n; ++i) x[i]=(a+b)/2+(b-a)/2*cos((2*i+1)/(2*n+2)*pi); y=map(f,x); dy=map(df,x); for(int i=0; i <= n; ++i) dot((x[i],y[i]),5bp+blue); horner h=diffdiv(x,y); fhorner p=fhorner(h); draw(graph(p,a,b,n=500),"$x\longmapsto{}T_{"+string(n)+"}$"); draw(graph(f,a,b),red,"$x\longmapsto{}\frac{1}{x^2+1}$"); xlimits(-5,5); ylimits(-1,2,Crop); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); attach(legend(),point(10S),30S); shipout("runge5"); erase(); // Test 6: Adding a few more Tchebychev points yields a very good result. unitsize(2cm); real f(real x) {return(1/(x^2+1));} real df(real x) {return(-2*x/(x^2+1)^2);} real a=-5, b=5; int n=26; real[] x,y,dy; for(int i=0; i <= n; ++i) x[i]=(a+b)/2+(b-a)/2*cos((2*i+1)/(2*n+2)*pi); y=map(f,x); dy=map(df,x); for(int i=0; i <= n; ++i) dot((x[i],y[i]),5bp+blue); horner h=diffdiv(x,y); fhorner p=fhorner(h); draw(graph(p,a,b,n=500),"$x\longmapsto{}T_{"+string(n)+"}$"); draw(graph(f,a,b),red,"$x\longmapsto{}\frac{1}{x^2+1}$"); xlimits(-5,5); ylimits(-1,2,Crop); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); attach(legend(),point(10S),30S); shipout("runge6"); erase(); // Test 7: Another Tchebychev example. unitsize(2cm); real f(real x) {return(sqrt(abs(x-1)));} real a=-2, b=2; int n=30; real[] x,y,dy; for(int i=0; i <= n; ++i) x[i]=(a+b)/2+(b-a)/2*cos((2*i+1)/(2*n+2)*pi); y=map(f,x); dy=map(df,x); for(int i=0; i <= n; ++i) dot((x[i],y[i]),5bp+blue); horner h=diffdiv(x,y); fhorner p=fhorner(h); draw(graph(p,a,b,n=500),"$x\longmapsto{}T_{"+string(n)+"}$"); draw(graph(f,a,b),red,"$x\longmapsto{}\sqrt{|x-1|}$"); xlimits(-2,2); ylimits(-0.5,2,Crop); xaxis("$x$",BottomTop,LeftTicks); yaxis("$y$",LeftRight,RightTicks); attach(legend(),point(10S),30S); shipout("runge7"); ./asymptote-2.41/examples/label3zoom.asy0000644000175000017500000000107013064427076020144 0ustar norbertnorbertimport three; currentlight=Headlamp; size(469.75499pt,0); currentprojection=perspective( camera=(160.119024441391,136.348802919248,253.822628496226), up=(-0.188035408976828,0.910392236102215,-0.368549401594584), target=(25.5462739598034,1.77605243766079,-9.93996244768584), zoom=5.59734733413271, angle=5.14449021168139, viewportshift=(0.813449720559684,-0.604674743165144), autoadjust=false); draw(scale3(4)*extrude("$\displaystyle\int\limits_{-\infty}^{+\infty}\!\! e^{-\alpha x^2}\!\!=\sqrt{\frac{\pi}{\alpha}}$",2Z), material(blue,ambientpen=mediumgray)); ./asymptote-2.41/examples/bars3.asy0000644000175000017500000000076113064427076017115 0ustar norbertnorbertimport three; import palette; import graph3; size(300); currentprojection=perspective(-30,-30,30,up=Z); surface s; for(int i = 0; i < 10; ++i) { for(int j = 0; j < 10; ++j) { s.append(shift(i,j,0)*scale(1,1,i+j)*unitcube); } } s.colors(palette(s.map(zpart),Rainbow())); draw(s,meshpen=black+thick(),nolight,render(merge=true)); xaxis3("$x$",Bounds,InTicks(endlabel=false,Label,2,2)); yaxis3(YZ()*"$y$",Bounds,InTicks(beginlabel=false,Label,2,2)); zaxis3(XZ()*"$z$",Bounds,InTicks); ./asymptote-2.41/examples/venn.asy0000644000175000017500000000122013064427076017040 0ustar norbertnorbertsize(0,150); pen colour1=red; pen colour2=green; pair z0=(0,0); pair z1=(-1,0); pair z2=(1,0); real r=1.5; path c1=circle(z1,r); path c2=circle(z2,r); fill(c1,colour1); fill(c2,colour2); picture intersection; fill(intersection,c1,colour1+colour2); clip(intersection,c2); add(intersection); draw(c1); draw(c2); label("$A$",z1); label("$B$",z2); pair z=(0,-2); real m=3; margin BigMargin=Margin(0,m*dot(unit(z1-z),unit(z0-z))); draw(Label("$A\cap B$",0),conj(z)--z0,Arrow,BigMargin); draw(Label("$A\cup B$",0),z--z0,Arrow,BigMargin); draw(z--z1,Arrow,Margin(0,m)); draw(z--z2,Arrow,Margin(0,m)); shipout(bbox(0.25cm)); currentpicture.uptodate=true; ./asymptote-2.41/examples/orthocenter.asy0000644000175000017500000000142413064427076020434 0ustar norbertnorbertimport geometry; import math; size(7cm,0); real theta=degrees(asin(0.5/sqrt(7))); pair B=(0,sqrt(7)); pair A=B+2sqrt(3)*dir(270-theta); pair C=A+sqrt(21); pair O=0; pair Ap=extension(A,O,B,C); pair Bp=extension(B,O,C,A); pair Cp=extension(C,O,A,B); perpendicular(Ap,NE,Ap--O,blue); perpendicular(Bp,NE,Bp--C,blue); perpendicular(Cp,NE,Cp--O,blue); draw(A--B--C--cycle); currentpen=black; draw("1",A--O,-0.25*I*dir(A--O)); draw(O--Ap); draw("$\sqrt{7}$",B--O,LeftSide); draw(O--Bp); draw("4",C--O); draw(O--Cp); dot("$O$",O,dir(B--Bp,Cp--C),red); dot("$A$",A,dir(C--A,B--A),red); dot("$B$",B,NW,red); dot("$C$",C,dir(A--C,B--C),red); dot("$A'$",Ap,dir(A--Ap),red); dot("$B'$",Bp,dir(B--Bp),red); dot("$C'$",Cp,dir(C--Cp),red); label(graphic("piicon","width=2.5cm"),Ap,5ENE,red); ./asymptote-2.41/examples/fermi.asy0000644000175000017500000000132713064427076017204 0ustar norbertnorbertimport feynman; // set default line width to 0.8bp currentpen = linewidth(0.8); // scale all other defaults of the feynman module appropriately fmdefaults(); // disable middle arrows currentarrow = None; // define vertex and external points pair xu = (-40,+45); pair xl = (-40,-45); pair yu = (+40,+45); pair yl = (+40,-45); pair zu = ( 0,+ 5); pair zl = ( 0,- 5); // define mid points pair mxu = (xu+zu)/2; pair mxl = (xl+zl)/2; pair myu = (yu+zu)/2; pair myl = (yl+zl)/2; // draw fermion lines drawFermion(xu--zu--yu); drawFermion(xl--zl--yl); // draw vertices drawVertexOX(zu); drawVertexOX(zl); // draw gluon. Note that the underlying fermion line is blotted out. drawGluon(arc((0,0),mxu,myl,CW)); // shipout ./asymptote-2.41/examples/colorpatch.asy0000644000175000017500000000065013064427076020236 0ustar norbertnorbertimport three; currentlight=Viewport; size(10cm); surface s=surface(patch(new triple[][] { {(0,0,0),(1,0,0),(1,0,0),(2,0,0)}, {(0,1,0),(1,0,1),(1,0,1),(2,1,0)}, {(0,1,0),(1,0,-1),(1,0,-1),(2,1,0)}, {(0,2,0),(1,2,0),(1,2,0),(2,2,0)}})); s.s[0].colors=new pen[] {red,green,blue,black}; draw(s,nolight); surface t=shift(Z)*unitplane; t.s[0].colors=new pen[] {red,green,blue,black}; draw(t,nolight); ./asymptote-2.41/examples/threeviews.asy0000644000175000017500000000113513064427076020264 0ustar norbertnorbertimport three; picture pic; unitsize(pic,5cm); currentlight.viewport=false; if(settings.render < 0) settings.render=4; settings.toolbar=false; viewportmargin=(1cm,1cm); draw(pic,scale3(0.5)*unitsphere,green,render(compression=Low,merge=true)); draw(pic,Label("$x$",1),O--X); draw(pic,Label("$y$",1),O--Y); draw(pic,Label("$z$",1),O--Z); // Europe and Asia: //addViews(pic,ThreeViewsFR); //addViews(pic,SixViewsFR); // United Kingdom, United States, Canada, and Australia: addViews(pic,ThreeViewsUS); //addViews(pic,SixViewsUS); // Front, Top, Right, // Back, Bottom, Left: //addViews(pic,SixViews); ./asymptote-2.41/examples/roll.asy0000644000175000017500000000026613064427076017053 0ustar norbertnorbertimport graph3; size(200,0); triple f(pair t) { return(t.x+t.y/4+sin(t.y),cos(t.y),sin(t.y)); } surface s=surface(f,(0,0),(2pi,2pi),7,20,Spline); draw(s,olive,render(merge=true)); ./asymptote-2.41/examples/treetest.asy0000644000175000017500000000113213064427076017733 0ustar norbertnorbertimport drawtree; treeLevelStep = 2cm; TreeNode root = makeNode( "Root" ); TreeNode child1 = makeNode( root, "Child\_1" ); TreeNode child2 = makeNode( root, "Child\_2" ); TreeNode gchild1 = makeNode( child1, "Grandchild\_1" ); TreeNode gchild2 = makeNode( child1, "Grandchild\_2" ); TreeNode gchild3 = makeNode( child1, "Grandchild\_3" ); TreeNode gchild4 = makeNode( child1, "Grandchild\_4" ); TreeNode gchild11 = makeNode( child2, "Grandchild\_1" ); TreeNode gchild22 = makeNode( child2, "Grandchild\_2" ); TreeNode ggchild1 = makeNode( gchild1, "Great Grandchild\_1" ); draw( root, (0,0) ); ./asymptote-2.41/examples/slidedemo_.bbl0000644000175000017500000000052513064427076020150 0ustar norbertnorbert\begin{thebibliography}{Knu86} \bibitem[Hob86]{Hobby86} John~D. Hobby. \newblock Smooth, easy to compute interpolating splines. \newblock {\em Discrete Comput. Geom.}, 1:123--140, 1986. \bibitem[Knu86]{Knuth86b} Donald~E. Knuth. \newblock {\em The \MF{}book}. \newblock Addison-Wesley, Reading, Massachusetts, 1986. \end{thebibliography} ./asymptote-2.41/examples/splitpatch.asy0000644000175000017500000000420413064427076020252 0ustar norbertnorbertimport three; size(300); // A structure to subdivide two intersecting patches about their intersection. struct split { surface[] S={new surface}; surface[] T={new surface}; struct tree { tree[] tree=new tree[2]; } // Default subdivision depth. int n=20; // Subdivide p and q to depth n if they overlap. void write(tree pt, tree qt, triple[][] p, triple[][] q, int depth=n) { --depth; triple[][][] Split(triple[][] P, real u=0)=depth % 2 == 0 ? hsplit : vsplit; triple[][][] P=Split(p); triple[][][] Q=Split(q); for(int i=0; i < 2; ++i) { triple[][] Pi=P[i]; for(int j=0; j < 2; ++j) { triple[][] Qj=Q[j]; if(overlap(Pi,Qj)) { if(!pt.tree.initialized(i)) pt.tree[i]=new tree; if(!qt.tree.initialized(j)) qt.tree[j]=new tree; if(depth > 0) write(pt.tree[i],qt.tree[j],Pi,Qj,depth); } } } } // Output the subpatches of p from subdivision. void read(surface[] S, tree t, triple[][] p, int depth=n) { --depth; triple[][][] Split(triple[][] P, real u=0)=depth % 2 == 0 ? hsplit : vsplit; triple[][][] P=Split(p); for(int i=0; i < 2; ++i) { if(t.tree.initialized(i)) read(S,t.tree[i],P[i],depth); else { S[0].push(patch(P[i])); } } } void operator init(triple[][] p, triple[][] q, int depth=n) { tree ptrunk,qtrunk; write(ptrunk,qtrunk,p,q,depth); read(T,ptrunk,p,depth); read(S,qtrunk,q,depth); } } currentprojection=orthographic(0,0,1); triple[][] A={ {(0,0,0),(1,0,0),(1,0,0),(2,0,0)}, {(0,4/3,0),(2/3,4/3,2),(4/3,4/3,2),(2,4/3,0)}, {(0,2/3,0),(2/3,2/3,0),(4/3,2/3,0),(2,2/3,0)}, {(0,2,0),(2/3,2,0),(4/3,2,0),(2,2,0)} }; triple[][] B={ {(0.5,0,-1),(0.5,1,-1),(0.5,2,-1),(0.5,3,-1)}, {(0.5,0,0),(0.5,1,0),(0.5,2,0),(0.5,3,0)}, {(0.5,0,1),(0.5,1,1),(0.5,2,1),(0.5,3,1)}, {(0.5,0,2),(0.5,1,2),(0.5,2,2),(0.5,3,2)} }; split S=split(B,A); defaultrender.merge=true; for(int i=0; i < S.S[0].s.length; ++i) draw(surface(S.S[0].s[i]),Pen(i)); for(int i=0; i < S.T[0].s.length; ++i) draw(surface(S.T[0].s[i]),Pen(i)); ./asymptote-2.41/examples/arrows3.asy0000644000175000017500000000124413064427076017500 0ustar norbertnorbertimport three; size(15cm); defaultrender.merge=true; currentprojection=perspective(24,14,13); currentlight=light(gray(0.5),specularfactor=3,viewport=false, (0.5,-0.5,-0.25),(0.5,0.5,0.25),(0.5,0.5,1),(-0.5,-0.5,-1)); defaultpen(0.75mm); path3 g=arc(O,1,90,-60,90,60); transform3 t=shift(invert(3S,O)); draw(g,blue,Arrows3(TeXHead3),currentlight); draw(scale3(3)*g,green,ArcArrows3(HookHead3),currentlight); draw(scale3(6)*g,red,Arrows3(DefaultHead3),currentlight); draw(t*g,blue,Arrows3(TeXHead2),currentlight); draw(t*scale3(3)*g,green,ArcArrows3(HookHead2,NoFill),currentlight); draw(t*scale3(6)*g,red,Arrows3(DefaultHead2(normal=Z)),currentlight); ./asymptote-2.41/examples/extrudedcontour.asy0000644000175000017500000000110513064427076021332 0ustar norbertnorbertimport contour; import palette; import graph3; defaultrender.merge=true; currentprojection=orthographic(25,10,10); size(0,12cm); real a=3; real b=4; real f(pair z) {return (z.x+z.y)/(2+cos(z.x)*sin(z.y));} guide[][] g=contour(f,(-10,-10),(10,10),new real[]{8},150); render render=render(merge=true); for(guide p:g[0]){ draw(extrude(p,8Z),palered,render); draw(path3(p),red+2pt,render); } draw(lift(f,g),red+2pt,render); surface s=surface(f,(0,0),(10,10),20,Spline); s.colors(palette(s.map(zpart),Rainbow()+opacity(0.5))); draw(s,render); axes3("$x$","$y$","$z$",Arrow3); ./asymptote-2.41/examples/spheresilhouette.asy0000644000175000017500000000022613064427076021473 0ustar norbertnorbertimport solids; settings.render=0; settings.prc=false; size(200); revolution r=sphere(O,1); draw(r,1,longitudinalpen=nullpen); draw(r.silhouette()); ./asymptote-2.41/examples/ring.asy0000644000175000017500000000021513064427076017034 0ustar norbertnorbertsize(0,100); path g=scale(2)*unitcircle; label("$a \le r \le b$"); radialshade(unitcircle^^g,yellow+evenodd,(0,0),1.0,yellow+brown,(0,0),2); ./asymptote-2.41/examples/log.asy0000644000175000017500000000031613064427076016660 0ustar norbertnorbertimport graph; size(150,0); real f(real x) {return log(x);} pair F(real x) {return (x,f(x));} xaxis("$x$",0); yaxis("$y$"); draw(graph(f,0.01,10,operator ..)); labelx(1,SSE); label("$\log x$",F(7),SE); ./asymptote-2.41/examples/cards.asy0000644000175000017500000000074513064427076017201 0ustar norbertnorbertpicture rect; size(rect,0,2.5cm); real x=1; real y=1.25; filldraw(rect,box((-x,-y)/2,(x,y)/2),lightolive); label(rect,"1",(-x,y)*0.45,SE); label(rect,"2",(x,y)*0.45,SW); label(rect,"3",(-x,-y)*0.45,NE); label(rect,"4",(x,-y)*0.45,NW); frame rectf=rect.fit(); frame toplef=rectf; frame toprig=xscale(-1)*rectf; frame botlef=yscale(-1)*rectf; frame botrig=xscale(-1)*yscale(-1)*rectf; size(0,7.5cm); add(toplef,(-x,y)); add(toprig,(x,y)); add(botlef,(-x,-y)); add(botrig,(x,-y)); ./asymptote-2.41/examples/projectrevolution.asy0000644000175000017500000000066613064427076021704 0ustar norbertnorbertimport solids; import palette; currentprojection=orthographic(20,0,3); size(400,300,IgnoreAspect); revolution r=revolution(graph(new triple(real x) { return (x,0,sin(x)*exp(-x/2));},0,2pi,operator ..),axis=Z); surface s=surface(r); surface S=planeproject(shift(-Z)*unitsquare3)*s; S.colors(palette(s.map(zpart),Rainbow())); render render=render(compression=Low,merge=true); draw(S,render); draw(s,lightgray,render); ./asymptote-2.41/examples/BezierSurface.asy0000644000175000017500000000276613064427076020643 0ustar norbertnorbertimport three; string viewpoint=" COO=-684.0787963867188 206.90650939941406 218.13809204101562 C2C=0.8244762420654297 -0.563306450843811 0.0540805421769619 ROO=1009.7407942621448 ROLL=17.39344555165265 "; // viewpoint=getstring("viewpoint",viewpoint); currentprojection=perspective(viewpoint); triple[][][] P={ { {(-1.6,0,1.875),(-2.3,0,1.875),(-2.7,0,1.875),(-2.7,0,1.65),}, {(-1.6,-0.3,1.875),(-2.3,-0.3,1.875),(-2.7,-0.3,1.875),(-2.7,-0.3,1.65),}, {(-1.5,-0.3,2.1),(-2.5,-0.3,2.1),(-3,-0.3,2.1),(-3,-0.3,1.65),}, {(-1.5,0,2.1),(-2.5,0,2.1),(-3,0,2.1),(-3,0,1.65),} },{ {(-2.7,0,1.65),(-2.7,0,1.425),(-2.5,0,0.975),(-2,0,0.75),}, {(-2.7,-0.3,1.65),(-2.7,-0.3,1.425),(-2.5,-0.3,0.975),(-2,-0.3,0.75),}, {(-3,-0.3,1.65),(-3,-0.3,1.2),(-2.65,-0.3,0.7275),(-1.9,-0.3,0.45),}, {(-3,0,1.65),(-3,0,1.2),(-2.65,0,0.7275),(-1.9,0,0.45),} },{ {(-2.7,0,1.65),(-2.7,0,1.875),(-2.3,0,1.875),(-1.6,0,1.875),}, {(-2.7,0.3,1.65),(-2.7,0.3,1.875),(-2.3,0.3,1.875),(-1.6,0.3,1.875),}, {(-3,0.3,1.65),(-3,0.3,2.1),(-2.5,0.3,2.1),(-1.5,0.3,2.1),}, {(-3,0,1.65),(-3,0,2.1),(-2.5,0,2.1),(-1.5,0,2.1),} },{ {(-2,0,0.75),(-2.5,0,0.975),(-2.7,0,1.425),(-2.7,0,1.65),}, {(-2,0.3,0.75),(-2.5,0.3,0.975),(-2.7,0.3,1.425),(-2.7,0.3,1.65),}, {(-1.9,0.3,0.45),(-2.65,0.3,0.7275),(-3,0.3,1.2),(-3,0.3,1.65),}, {(-1.9,0,0.45),(-2.65,0,0.7275),(-3,0,1.2),(-3,0,1.65),} } }; picture pic; size(pic,15cm); size3(pic,10cm); draw(pic,surface(P),blue); add(embed("label",pic),(0,0),N); ./asymptote-2.41/examples/lines.asy0000644000175000017500000000025013064427076017206 0ustar norbertnorbertimport math; int n=7; size(200,0); draw(unitcircle,red); for (int i=0; i < n-1; ++i) for (int j=i+1; j < n; ++j) drawline(unityroot(n,i),unityroot(n,j),blue); ./asymptote-2.41/examples/mosquito.asy0000644000175000017500000000472013064427076017762 0ustar norbertnorbertsize(9cm,10cm,IgnoreAspect); pair d=(1,0.25); real s=1.6d.x; real y=0.6; defaultpen(fontsize(8pt)); picture box(string s, pair z=(0,0)) { picture pic; draw(pic,box(-d/2,d/2)); label(pic,s,(0,0)); return shift(z)*pic; } label("Birds",(0,y)); picture removed=box("Removed ($R_B$)"); picture infectious=box("Infectious ($I_B$)",(0,-1.5)); picture susceptible=box("Susceptible ($S_B$)",(0,-3)); add(removed); add(infectious); add(susceptible); label("Mosquitoes",(s,y)); picture larval=box("Larval ($L_M$)",(s,0)); picture susceptibleM=box("Susceptible ($S_M$)",(s,-1)); picture exposed=box("Exposed ($E_M$)",(s,-2)); picture infectiousM=box("Infectious ($I_M$)",(s,-3)); add(larval); add(susceptibleM); add(exposed); add(infectiousM); path ls=point(larval,S)--point(susceptibleM,N); path se=point(susceptibleM,S)--point(exposed,N); path ei=point(exposed,S)--point(infectiousM,N); path si=point(susceptible,N)--point(infectious,S); draw(minipage("\flushright{recovery rate ($g$) \& death rate from virus ($\mu_V$)}",40pt),point(infectious,N)--point(removed,S),LeftSide,Arrow, PenMargin); draw(si,LeftSide,Arrow,PenMargin); draw(minipage("\flushright{maturation rate ($m$)}",50pt),ls,RightSide, Arrow,PenMargin); draw(minipage("\flushright{viral incubation rate ($k$)}",40pt),ei, RightSide,Arrow,PenMargin); path ise=point(infectious,E)--point(se,0.5); draw("$(ac)$",ise,LeftSide,dashed,Arrow,PenMargin); label(minipage("\flushleft{biting rate $\times$ transmission probability}",50pt),point(infectious,SE),dir(-60)+S); path isi=point(infectiousM,W)--point(si,2.0/3); draw("$(ab)$",isi,LeftSide,dashed,Arrow,PenMargin); draw(se,LeftSide,Arrow,PenMargin); real t=2.0; draw("$\beta_M$", point(susceptibleM,E){right}..tension t..{left}point(larval,E), 2*(S+SE),red,Arrow(Fill,0.5)); draw(minipage("\flushleft{birth rate ($\beta_M$)}",20pt), point(exposed,E){right}..tension t..{left}point(larval,E),2SW,red, Arrow(Fill,0.5)); draw("$\beta_M$", point(infectiousM,E){right}..tension t..{left}point(larval,E),2SW, red,Arrow(Fill,0.5)); path arrow=(0,0)--0.75cm*dir(35); draw(point(larval,NNE), Label(minipage("\flushleft{larval death rate ($\mu_L$)}",45pt),1), arrow,blue,Arrow); draw(point(susceptibleM,NNE), Label(minipage("\flushleft{adult death rate ($\mu_A$)}",20pt),1), arrow,N,blue,Arrow); draw(point(exposed,NNE),Label("$\mu_A$",1),arrow,blue,Arrow); draw(point(infectiousM,NNE),Label("$\mu_A$",1),arrow,blue,Arrow); ./asymptote-2.41/examples/hyperboloidsilhouette.asy0000644000175000017500000000041313064427076022523 0ustar norbertnorbertsize(200); import solids; settings.render=0; settings.prc=false; currentprojection=perspective(4,4,3); revolution hyperboloid=revolution(graph(new triple(real z) { return (sqrt(1+z*z),0,z);},-2,2,20,operator ..),axis=Z); draw(hyperboloid.silhouette(64),blue); ./asymptote-2.41/examples/RiemannSurface.asy0000644000175000017500000000056113064427076021003 0ustar norbertnorbertimport graph3; import palette; size(200,300,keepAspect=false); //settings.nothin=true; currentprojection=orthographic(10,10,30); currentlight=(10,10,5); triple f(pair t) {return (exp(t.x)*cos(t.y),exp(t.x)*sin(t.y),t.y);} surface s=surface(f,(-4,-2pi),(0,4pi),8,16,Spline); s.colors(palette(s.map(zpart),Rainbow())); draw(s,render(merge=true)); ./asymptote-2.41/examples/washer.asy0000644000175000017500000000055013064427076017370 0ustar norbertnorbertimport three; size(10cm); path3[] p=reverse(unitcircle3)^^scale3(0.5)*unitcircle3; path[] g=reverse(unitcircle)^^scale(0.5)*unitcircle; triple H=-0.4Z; render render=render(merge=true); draw(surface(p,planar=true),render); draw(surface(shift(H)*p,planar=true),render); material m=material(lightgray,shininess=1.0); for(path pp : g) draw(extrude(pp,H),m); ./asymptote-2.41/examples/labelbox.asy0000644000175000017500000000041013064427076017662 0ustar norbertnorbertsize(0,100); real margin=2mm; pair z1=(0,1); pair z0=(0,0); object Box=draw("small box",box,z1,margin); object Ellipse=draw("LARGE ELLIPSE",ellipse,z0,margin); add(new void(frame f, transform t) { draw(f,point(Box,SW,t){SW}..{SW}point(Ellipse,NNE,t)); }); ./asymptote-2.41/examples/cones.asy0000644000175000017500000000067513064427076017216 0ustar norbertnorbertimport solids; size(200); currentprojection=orthographic(5,4,2); render render=render(compression=Low,merge=true); revolution upcone=cone(-Z,1,1); revolution downcone=cone(Z,1,-1); draw(surface(upcone),green,render); draw(surface(downcone),green,render); draw(upcone,5,blue,longitudinalpen=nullpen); draw(downcone,5,blue,longitudinalpen=nullpen); revolution cone=shift(2Y-2X)*cone(1,1); draw(surface(cone),green,render); draw(cone,5,blue); ./asymptote-2.41/examples/mosaic.asy0000644000175000017500000001221213064427076017350 0ustar norbertnorbert// Calendar example contributed by Jens Schwaiger // transformations path similarpath(pair a, pair b, path p) { // transform p into a path starting at a and ending at b pair first; pair last; path p_; first=point(p,0); last=point(p,length(p)); p_=shift(-first)*p; p_=rotate(degrees(b-a))*p_; p_=scale(abs(b-a)/abs(last-first))*p_; p_=shift(a)*p_; return p_; } path c_line(path p) { // returns the path obtained by adding to p a copy rotated // around the endpoint of p by 180 degrees // works only if the initial point and the endpoint of p are different // a c_line is symetric with respect to the center of // the straight line between its endpoints // return p..rotate(180,point(p,length(p)))*reverse(p); } path tounitcircle(path p, int n=300) { // the transformation pair x --> x/sqrt(1+abs(x)^2) // is a bijection from the plane to the open unitdisk real l=arclength(p); path ghlp; for(int i=0; i <= n; ++i) { real at=arctime(p,l/n*i); pair phlp=point(p,at); real trhlp=1/(1+abs(phlp)^2)^(1/2); ghlp=ghlp--trhlp*phlp; } if(cyclic(p)) {ghlp=ghlp--cycle;} return ghlp; } void centershade(picture pic=currentpicture, path p, pen in, pen out, pen drawpen=currentpen) { pair center=0.5(max(p)+min(p)); real radius=0.5abs(max(p)-min(p)); radialshade(pic,p,in,center,0,out,center,radius); draw(pic,p,drawpen); } pair zentrum(path p) {return 0.5(min(p)+max(p));} //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% real scalefactor=19/13; // For output: height=scalefactor*width real outputwidth=13cm; picture kalender;// at first we produce a calendar for february 2006 texpreamble("\usepackage[latin1]{inputenc}"); size(outputwidth,0); real yc=0.5; pair diff=(-3.5,5*yc); pen farbe(int j) { pen hlp=0.8white; if(j % 7 == 6) {hlp=red+white;} return hlp;} // farbe=German word for color path kasten=yscale(yc)*unitsquare; // Kasten is a German word meaning something like box path Gkasten=shift((0,2*yc)+diff)*xscale(7)*yscale(2)*kasten; path tage[]= new path[7]; // Tag=day string wochentag[]={"MO","DI","MI","DO","FR","SA","SO"}; path[][] bx= new path[6][7]; string[][] entry= new string[6][7]; bool[][] holiday=new bool[6][7]; // Now the necessary information for February 2006 int start=2; int days=28; for(int i=0; i < entry.length; ++i) { for(int j=0; j < entry[0].length; ++j) { int day=i*7+j-start+1; entry[i][j]=(day > 0 && day <= days ? (string) day : ""); holiday[i][j]=false; } } for(int j=0; j < 7; ++j) { tage[j]=shift((j,yc)+diff)*kasten; filldraw(tage[j],farbe(j),black+2bp); label(wochentag[j],zentrum(tage[j]),Palatino()); for(int i=0; i < 6; ++i) {bx[i][j]=shift((j,-yc*i)+diff)*kasten; filldraw(bx[i][j],farbe(j),black+2bp); if(holiday[i][j]) {filldraw(bx[i][j],farbe(6),black+2bp);}; }; }; filldraw(Gkasten,0.3white,black+2bp); for(int j=0; j < 7; ++j) for(int i=0; i < 6 ; ++i) {label(entry[i][j],zentrum(bx[i][j]),Palatino());} label("\Huge Februar 2006",zentrum(Gkasten),Palatino()+white); // Zentrum=center; Februar=february add(kalender,currentpicture); erase(); // Now the mosaic is constructed pair a[]=new pair[4]; path p[]=new path[4]; path q[]=new path[4]; path kontur[]=new path[5]; picture temppic; a[1]=(0,0); a[2]=(1,0); a[3]=(0,1); // a triangle with abs(a[2]-a[1])=abs(a[3]-a[1] // and a right angle at a[1]; q[1]=(0,0){dir(-20)}::{dir(20)}(0.2,0){dir(-140)}..{dir(0)}(0.3,-0.2){dir(0)}.. {dir(140)}(0.4,0){dir(20)}..{dir(-20)}(1,0); q[2]=(0,0){dir(20)}..{dir(-20)}(0.8,0){dir(-140)}..{dir(0)}(0.9,-0.3){dir(0)}.. {dir(140)}(1,0); q[2]=c_line(q[2]); p[1]=similarpath(a[1],a[2],q[1]);// arbitrary path from a[1] to a[2] p[2]=similarpath(a[2],a[3],q[2]);// arbitrary c_line from a[2] to a[3] p[3]=rotate(90,a[1])*reverse(p[1]);// kontur[1]=p[1]..p[2]..p[3]..cycle;// first tile kontur[2]=rotate(90,a[1])*kontur[1];// second kontur[3]=rotate(180,a[1])*kontur[1];// third kontur[4]=rotate(270,a[1])*kontur[1];// fourth pair tri=2*(interp(a[2],a[3],0.5)-a[1]); pair trii=rotate(90)*tri; // translations of kontur[i], i=1,2,3,4, with respect to // j*tri+k*trii // fill the plane for(int j=-4; j < 4; ++j) for(int k=-4; k < 4; ++k) { transform tr=shift(j*tri+k*trii); for(int i=1; i < 5; ++i) { centershade(temppic,tr*kontur[i],(1-i/10)*white, (1-i/10)*chartreuse,black+2bp); } } // Now we produce the bijective images inside // a suitably scaled unitcircle for(int k=-1; k < 2; ++k) for(int l=-1; l < 2; ++l) { transform tr=shift(k*tri+l*trii); for(int i=1; i < 5; ++i) { centershade(temppic,scale(2.5)*tounitcircle(tr*kontur[i],380), (1-i/10)*white,(1-i/10)*orange,black+2bp); } } add(temppic); // We clip the picture to a suitable box pair piccenter=0.5*(temppic.min()+temppic.max()); pair picbox=temppic.max()-temppic.min(); real picwidth=picbox.x; transform trialtrans=shift(0,-1.5)*shift(piccenter)*yscale(scalefactor)* scale(0.25picwidth)*shift((-0.5,-0.5))*identity(); clip(trialtrans*unitsquare); // add the calendar at a suitable position add(kalender.fit(0.75*outputwidth),interp(point(S),point(N),1/13)); ./asymptote-2.41/examples/RiemannSphere.asy0000644000175000017500000000174113064427076020642 0ustar norbertnorbertimport graph3; import solids; currentlight=White; defaultrender.merge=true; size(10cm,0); pair k=(1,0.2); real r=abs(k); real theta=angle(k); real x(real t) { return r^t*cos(t*theta); } real y(real t) { return r^t*sin(t*theta); } real z(real t) { return 0; } real u(real t) { return x(t)/(x(t)^2+y(t)^2+1); } real v(real t) { return y(t)/(x(t)^2+y(t)^2+1); } real w(real t) { return (x(t)^2+y(t)^2)/(x(t)^2+y(t)^2+1); } real nb=3; for (int i=0; i<12; ++i) draw((0,0,0)--nb*(Cos(i*30),Sin(i*30),0),yellow); for (int i=0; i<=nb; ++i) draw(circle((0,0,0),i),lightgreen+white); path3 p=graph(x,y,z,-200,40,operator ..); path3 q=graph(u,v,w,-200,40,operator ..); revolution sph=sphere((0,0,0.5),0.5); draw(surface(sph),green+white+opacity(0.5)); draw(p,1bp+heavyred); draw(q,1bp+heavyblue); triple A=(0,0,1), B=(u(40),v(40),w(40)), C=(x(40),y(40),z(40)); path3 L=A--C; draw(L,1bp+black); pen p=fontsize(8pt); dot("$(0,0,1)$",A,N,p); dot("$(u,v,w)$",B,E,p); dot("$(x,y,0)$",C,E,p); ./asymptote-2.41/examples/Coons.asy0000644000175000017500000000017313064427076017161 0ustar norbertnorbertsize(200); pen[] p={red,green,blue,magenta}; path g=(0,0){dir(45)}..(1,0)..(1,1)..(0,1)..cycle; tensorshade(g,p); dot(g); ./asymptote-2.41/examples/lmfit1.asy0000644000175000017500000000172413064427076017277 0ustar norbertnorbertimport lmfit; import graph; size(10cm, 7cm, IgnoreAspect); real[] date = { 1790, 1800, 1810, 1820, 1830, 1840, 1850, 1860, 1870, 1880, 1890, 1900, 1910, 1920, 1930, 1940, 1950, 1960, 1970, 1980, 1990 }; real[] population = { 3.929, 5.308, 7.240, 9.638, 12.866, 17.069, 23.192, 31.443, 38.558, 50.156, 62.948, 75.996, 91.972, 105.711, 122.775, 131.669, 150.697, 179.323, 203.185, 226.546, 248.710 }; real t0 = 1776; real P(real[] params, real t) { real P0 = params[0]; real K = params[1]; real r = params[2]; return (K * P0) / (P0 + (K - P0) * exp(-r * (t - t0))); } real[] params = { 10, 500, 0.1 }; real res = lmfit.fit(date, population, P, params).norm; write("P_0 = ", params[0]); write("K = ", params[1]); write("r = ", params[2]); write("error = ", res); real P(real t) { return P(params, t); } draw(graph(date, population), blue); draw(graph(P, t0, 2000), red); xaxis("Year", BottomTop, LeftTicks); yaxis("Population in millions", LeftRight, RightTicks); ./asymptote-2.41/examples/oneoverx.asy0000644000175000017500000000046513064427076017751 0ustar norbertnorbertimport graph; size(200,IgnoreAspect); real f(real x) {return 1/x;}; bool3 branch(real x) { static int lastsign=0; if(x == 0) return false; int sign=sgn(x); bool b=lastsign == 0 || sign == lastsign; lastsign=sign; return b ? true : default; } draw(graph(f,-1,1,branch)); axes("$x$","$y$",red); ./asymptote-2.41/examples/integraltest.asy0000644000175000017500000000113513064427076020604 0ustar norbertnorbertimport graph; size(300,150,IgnoreAspect); real f(real x) {return 1/x^(1.1);} pair F(real x) {return (x,f(x));} dotfactor=7; void subinterval(real a, real b) { path g=box((a,0),(b,f(b))); filldraw(g,lightgray); draw(box((a,f(a)),(b,0))); } int a=1, b=9; xaxis("$x$",0,b); yaxis("$y$",0); draw(graph(f,a,b,operator ..),red); int n=2; for(int i=a; i <= b; ++i) { if(i < b) subinterval(i,i+1); if(i <= n) labelx(i); dot(F(i)); } int i=n; labelx("$\ldots$",++i); labelx("$k$",++i); labelx("$k+1$",++i); labelx("$\ldots$",++i); arrow("$f(x)$",F(i-1.5),NE,1.5cm,red,Margin(0,0.5)); ./asymptote-2.41/examples/parametricsurface.asy0000644000175000017500000000062713064427076021604 0ustar norbertnorbertimport graph3; size(200,0); currentprojection=orthographic(4,0,2); real R=2; real a=1.9; triple f(pair t) { return ((R+a*cos(t.y))*cos(t.x),(R+a*cos(t.y))*sin(t.x),a*sin(t.y)); } pen p=rgb(0.2,0.5,0.7); surface s=surface(f,(0,0),(2pi,2pi),8,8,Spline); // surface only //draw(s,lightgray); // mesh only // draw(s,nullpen,meshpen=p); // surface & mesh draw(s,lightgray,meshpen=p,render(merge=true)); ./asymptote-2.41/examples/partialsurface.asy0000644000175000017500000000130713064427076021105 0ustar norbertnorbertimport graph3; import palette; size(0,300); currentprojection=perspective(3,-2,2); real V(real r) {return r^4-r^2;} real V(pair pos) {return V(abs(pos));} real R=1/sqrt(2); real z=-0.2; bool active(pair pos) {return abs(pos) < R;} bool above(pair pos) {return V(pos) >= z;} pair a=(-1.5,-1); pair b=(0.5,1); real f=1.2; draw(plane(f*(b.x-a.x,0,z),(0,f*(b.y-a.y),z),(a.x,a.y,z)), lightgrey+opacity(0.5)); surface s=surface(V,a,b,40,Spline,active); draw(s,mean(palette(s.map(new real(triple v) { return above((v.x,v.y)) ? 1 : 0;}), new pen[] {lightblue,lightgreen})),black); xaxis3(Label("$\phi^\dagger\phi$",1),red,Arrow3); zaxis3(Label("$V(\phi^\dagger\phi)$",1),0,0.3,red,Arrow3); ./asymptote-2.41/examples/hierarchy.asy0000644000175000017500000000071313064427076020056 0ustar norbertnorberttexpreamble("\def\Ham{\mathop {\rm Ham}\nolimits}"); pair align=2N; frame f; ellipse(f,Label("$\Ham(r,2)$",(0,0)),lightblue,Fill,above=false); ellipse(f,Label("BCH Codes",point(f,N),align),green,Fill,above=false); ellipse(f,Label("Cyclic Codes",point(f,N),align),lightmagenta,Fill,above=false); ellipse(f,Label("Linear Codes",point(f,N),align),-4mm,orange,Fill,above=false); box(f,Label("General Codes",point(f,N),align),2mm,yellow,Fill,above=false); add(f); ./asymptote-2.41/examples/genustwo.asy0000644000175000017500000000216013064427076017751 0ustar norbertnorbertsize(10cm,0); import smoothcontour3; currentprojection=perspective((18,20,10)); if(settings.render < 0) settings.render=8; real tuberadius = 0.69; // Convert to cylindrical coordinates to draw // a circle revolved about the z axis. real toruscontour(real x, real y, real z) { real r = sqrt(x^2 + y^2); return (r-2)^2 + z^2 - tuberadius^2; } // Take the union of the two tangent tori (by taking // the product of the functions defining them). Then // add (or subtract) a bit of noise to smooth things // out. real f(real x, real y, real z) { real f1 = toruscontour(x - 2 - tuberadius, y, z); real f2 = toruscontour(x + 2 + tuberadius, y, z); return f1 * f2 - 0.1; } // The noisy function extends a bit farther than the union of // the two tori, so include a bit of extra space in the box. triple max = (2*(2+tuberadius), 2+tuberadius, tuberadius) + (0.1, 0.1, 0.1); triple min = -max; // Draw the implicit surface. draw(implicitsurface(f, min, max, overlapedges=true, nx=20, nz=5), surfacepen=material(diffusepen=gray(0.6), emissivepen=gray(0.3), specularpen=gray(0.1))); ./asymptote-2.41/examples/slidedemo.asy0000644000175000017500000000641413064427076020051 0ustar norbertnorbert// Slide demo. // Command-line options to enable stepping and/or reverse video: // asy [-u stepping=true] [-u reverse=true] [-u itemstep=true] slidedemo orientation=Landscape; import slide; import three; viewportsize=pagewidth-2pagemargin; usersetting(); // Commands to generate optional bibtex citations: // asy slidedemo // bibtex slidedemo_ // asy slidedemo // bibliographystyle("alpha"); // Generated needed files if they don't already exist. asy(nativeformat(),"Pythagoras","log","PythagoreanTree"); usepackage("mflogo"); // Optional background color or header: // import x11colors; // fill(background,box((-1,-1),(1,1)),Azure); // label(background,"Header",(0,startposition.y)); titlepage(title="Slides with {\tt Asymptote}: A Demo", author="John C. Bowman", institution="University of Alberta", date="\today", url="http://asymptote.sf.net"); outline("Basic Commands"); item("item"); subitem("subitem"); remark("remark"); item("draw \cite{Hobby86,Knuth86b}"); item("figure"); item("embedded and external animations: see {\tt slidemovie.asy}"); title("Items"); item("First item."); subitem("First subitem."); subitem("Second subitem."); item("Second item."); equation("a^2+b^2=c^2."); equations("\frac{\sin^2\theta+\cos^2\theta}{\cos^2\theta} &=&\frac{1}{\cos^2\theta}\nonumber\\ &=&\sec^2\theta."); remark("A remark."); item("To enable pausing between bullets:"); remark("{\tt asy -u stepping=true}"); item("To enable reverse video:"); remark("{\tt asy -u reverse=true}"); title("Can draw on a slide, preserving the aspect ratio:"); picture pic,pic2; draw(pic,unitcircle); add(pic.fit(15cm)); step(); fill(pic2,unitcircle,paleblue); label(pic2,"$\pi$",(0,0),fontsize(500pt)); add(pic2.fit(15cm)); newslide(); item("The slide \Red{title} \Green{can} \Blue{be} omitted."); figure("Pythagoras","height=12cm", "A simple proof of Pythagoras' Theorem."); newslide(); item("Single skip:"); skip(); item("Double skip:"); skip(2); figure(new string[] {"log."+nativeformat(),"PythagoreanTree."+nativeformat()}, "width=10cm",new string[] {"{\tt log.asy}","{\tt PythagoreanTree.asy}"}, "Examples of {\tt Asymptote} output."); title("Embedded Interactive 3D Graphics"); picture pic; import graph3; import solids; viewportmargin=(0,1cm); currentprojection=orthographic(1,0,10,up=Y); pen color=green; real alpha=-240; real f(real x) {return sqrt(x);} pair F(real x) {return (x,f(x));} triple F3(real x) {return (x,f(x),0);} path p=graph(pic,F,0,1,n=30,operator ..)--(1,0)--cycle; path3 p3=path3(p); revolution a=revolution(p3,X,alpha,0); render render=render(compression=0,merge=true); draw(pic,surface(a),color,render); draw(pic,p3,blue); surface s=surface(p); draw(pic,s,color,render); draw(pic,rotate(alpha,X)*s,color,render); xaxis3(pic,Label("$x$",1),xmax=1.25,dashed,Arrow3); yaxis3(pic,Label("$y$",1),Arrow3); dot(pic,"$(1,1)$",(1,1,0)); arrow(pic,"$y=\sqrt{x}$",F3(0.8),Y,0.75cm,red); real r=0.4; draw(pic,F3(r)--(1,f(r),0),red); real x=(1+r)/2; draw(pic,"$r$",(x,0,0)--(x,f(r),0),X+0.2Z,red,Arrow3); draw(pic,arc(1.1X,0.4,90,90,3,-90),Arrow3); add(pic.fit(0,14cm)); title("\mbox{Asymptote: 2D \& 3D Vector Graphics Language}"); asyinclude("logo3"); center("\tt http://asymptote.sf.net"); center("(freely available under the LGPL license)"); bibliography("refs"); ./asymptote-2.41/examples/spring2.asy0000644000175000017500000000005313064427076017461 0ustar norbertnorbertimport spring; drawspring(40.0,"$L+x$"); ./asymptote-2.41/examples/unitcircle.asy0000644000175000017500000000050213064427076020235 0ustar norbertnorbertsize(0,150); pair z0=0; pair z1=1; real theta=30; pair z=dir(theta); draw(circle(z0,1)); filldraw(z0--arc(z0,1,0,theta)--cycle,lightgrey); dot(z0); dot(Label,z1); dot("$(x,y)=(\cos\theta,\sin\theta)$",z); arrow("area $\frac{\theta}{2}$",dir(0.5*theta),2E); draw("$\theta$",arc(z0,0.7,0,theta),LeftSide,Arrow,PenMargin); ./asymptote-2.41/examples/buildcycle.asy0000644000175000017500000000100113064427076020206 0ustar norbertnorbertsize(200); real w=1.35; path[] p; for(int k=0; k < 2; ++k) { int i=2+2*k; int ii=i^2; p[k]=(w/ii,1){1,-ii}::(w/i,1/i)::(w,1/ii){ii,-1}; } path q0=(0,0)--(w,0.5); path q1=(0,0)--(w,1.5); draw(q0); draw(p[0]); draw(q1); draw(p[1]); path s=buildcycle(q0,p[0],q1,p[1]); fill(s,mediumgrey); label("$P$",intersectionpoint(p[0],q0),N); label("$Q$",intersectionpoint(p[0],q1),E); label("$R$",intersectionpoint(p[1],q1),W); label("$S$",intersectionpoint(p[1],q0),S); label("$f > 0$",0.5*(min(s)+max(s)),UnFill); ./asymptote-2.41/examples/logdown.asy0000644000175000017500000000053513064427076017553 0ustar norbertnorbertimport graph; size(200,IgnoreAspect); real log10Down(real x) {return -log10(x);} real pow10Down(real x) {return pow10(-x);} scaleT LogDown=scaleT(log10Down,pow10Down,logarithmic=true); scale(Linear,LogDown); draw(graph(exp,-5,5)); yaxis("$y$",RightTicks(Label(Fill(white)),DefaultLogFormat),BeginArrow); xaxis("$x$",LeftTicks(NoZero),EndArrow); ./asymptote-2.41/examples/equilateral.asy0000644000175000017500000000036213064427076020410 0ustar norbertnorbertsize(10cm,0); import math; pair b=(0,0), c=(1,0); pair a=extension(b,b+dir(60),c,c+dir(120)); pair d=extension(b,b+dir(30),a,a+dir(270)); draw(a--b--c--a--d--b^^d--c); label("$A$",a,N); label("$B$",b,W); label("$C$",c,E); label("$D$",d,S); ./asymptote-2.41/examples/grid.asy0000644000175000017500000000011413064427076017020 0ustar norbertnorbertimport math; size(100,0); add(shift(-5,-5)*grid(10,10)); dot((0,0),red); ./asymptote-2.41/examples/magnetic.asy0000644000175000017500000000073713064427076017675 0ustar norbertnorbertimport graph3; import contour3; size(200,0); currentprojection=orthographic((6,8,2),up=Y); real a(real z) {return (z < 6) ? 1 : exp((abs(z)-6)/4);} real b(real z) {return 1/a(z);} real B(real z) {return 1-0.5cos(pi*z/10);} real f(real x, real y, real z) {return 0.5B(z)*(a(z)*x^2+b(z)*y^2)-1;} draw(surface(contour3(f,(-2,-2,-10),(2,2,10),10)),blue+opacity(0.75), render(merge=true)); xaxis3(Label("$x$",1),red); yaxis3(Label("$y$",1),red); zaxis3(Label("$z$",1),red); ./asymptote-2.41/examples/alignedaxis.asy0000644000175000017500000000542013064427076020370 0ustar norbertnorbertimport graph; real Freq=60.0; real margin=5mm; pair exp(pair x) { return exp(x.x)*(cos(x.y)+I*sin(x.y)); } real Merr(real x, real w) { real tau=x/(2*Freq); return 20*log(abs((tau*w+tau/(exp(I*2*pi*Freq*tau)-1))*(I*2*pi*Freq))); } real Aerr(real x, real w) { real tau=x/(2*Freq); return degrees((tau*w+tau/(exp(I*2*pi*Freq*tau)-1))*(I*2*pi*Freq)); } picture pic1; scale(pic1,Log,Linear); real Merr1(real x){return Merr(x,1);} draw(pic1,graph(pic1,Merr1,1e-4,1),black+1.2); ylimits(pic1,-60,20); yaxis(pic1,"magnitude (dB)",LeftRight,RightTicks(new real[] {-60,-40,-20,0,20})); xaxis(pic1,"$f/f_\mathrm{Ny}$",BottomTop,LeftTicks(N=5)); yequals(pic1,0,Dotted); yequals(pic1,-20,Dotted); yequals(pic1,-40,Dotted); xequals(pic1,1e-3,Dotted); xequals(pic1,1e-2,Dotted); xequals(pic1,1e-1,Dotted); size(pic1,100,100,point(pic1,SW),point(pic1,NE)); label(pic1,"$\theta=1$",point(pic1,N),2N); frame f1=pic1.fit(); add(f1); picture pic1p; scale(pic1p,Log,Linear); real Aerr1(real x){return Aerr(x,1);} draw(pic1p,graph(pic1p,Aerr1,1e-4,1),black+1.2); ylimits(pic1p,-5,95); yaxis(pic1p,"phase (deg)",LeftRight,RightTicks(new real[] {0,45,90})); xaxis(pic1p,"$f/f_\mathrm{Ny}$",BottomTop,LeftTicks(N=5)); yequals(pic1p,0,Dotted); yequals(pic1p,45,Dotted); yequals(pic1p,90,Dotted); xequals(pic1p,1e-3,Dotted); xequals(pic1p,1e-2,Dotted); xequals(pic1p,1e-1,Dotted); size(pic1p,100,100,point(pic1p,SW),point(pic1p,NE)); frame f1p=pic1p.fit(); f1p=shift(0,min(f1).y-max(f1p).y-margin)*f1p; add(f1p); picture pic2; scale(pic2,Log,Linear); real Merr2(real x){return Merr(x,0.75);} draw(pic2,graph(pic2,Merr2,1e-4,1),black+1.2); ylimits(pic2,-60,20); yaxis(pic2,"magnitude (dB)",LeftRight,RightTicks(new real[] {-60,-40,-20,0,20})); xaxis(pic2,"$f/f_\mathrm{Ny}$",BottomTop,LeftTicks(N=5)); yequals(pic2,0,Dotted); yequals(pic2,-20,Dotted); yequals(pic2,-40,Dotted); xequals(pic2,1e-3,Dotted); xequals(pic2,1e-2,Dotted); xequals(pic2,1e-1,Dotted); size(pic2,100,100,point(pic2,SW),point(pic2,NE)); label(pic2,"$\theta=0.75$",point(pic2,N),2N); frame f2=pic2.fit(); f2=shift(max(f1).x-min(f2).x+margin)*f2; add(f2); picture pic2p; scale(pic2p,Log,Linear); real Aerr2(real x){return Aerr(x,0.75);} draw(pic2p,graph(pic2p,Aerr2,1e-4,1),black+1.2); ylimits(pic2p,-5,95); yaxis(pic2p,"phase (deg)",LeftRight,RightTicks(new real[] {0,45.1,90})); xaxis(pic2p,"$f/f_\mathrm{Ny}$",BottomTop,LeftTicks(N=5)); yequals(pic2p,0,Dotted); yequals(pic2p,45,Dotted); yequals(pic2p,90,Dotted); xequals(pic2p,1e-3,Dotted); xequals(pic2p,1e-2,Dotted); xequals(pic2p,1e-1,Dotted); size(pic2p,100,100,point(pic2p,SW),point(pic2p,NE)); frame f2p=pic2p.fit(); f2p=shift(max(f1p).x-min(f2p).x+margin,min(f2).y-max(f2p).y-margin)*f2p; add(f2p); ./asymptote-2.41/examples/parametricelevation.asy0000644000175000017500000000037613064427076022143 0ustar norbertnorbertimport graph3; import palette; size(200); currentprojection=orthographic(4,2,4); triple f(pair z) {return expi(z.x,z.y);} surface s=surface(f,(0,0),(pi,2pi),10,Spline); draw(s,mean(palette(s.map(zpart),BWRainbow())),black,nolight,render(merge=true)); ./asymptote-2.41/examples/coag.asy0000644000175000017500000000041013064427076017003 0ustar norbertnorbertsize(0,200); import graph; pair z0=(0,0); pair m0=(0,1); pair tg=(1.5,0); pair mt=m0+tg; pair tf=(3,0); draw(m0--mt{dir(-70)}..{dir(0)}2tg+m0/4); xtick("$T_g$",tg,N); label("$M(t)$",mt,2NE); labely("$M_0$",m0); xaxis(Label("$t$",align=2S),Arrow); yaxis(Arrow); ./asymptote-2.41/examples/contextfonts.asy0000644000175000017500000000037713064427076020644 0ustar norbertnorbertsettings.tex="context"; // Work around ConTeXT bug for font sizes less than 12pt: texpreamble("\setupbodyfont[8pt]"); usetypescript("iwona"); usetypescript("antykwa-torunska"); label("$A$",0,N,font("iwona")); label("$A$",0,S,font("antykwa",8pt)+red); ./asymptote-2.41/examples/vertexshading.asy0000644000175000017500000000103313064427076020747 0ustar norbertnorbertimport three; size(200); currentprojection=perspective(4,5,5); draw(surface(unitcircle3,new pen[] {red,green,blue,black})); draw(surface(shift(Z)*unitsquare3, new pen[] {red,green+opacity(0.5),blue,black})); draw(surface(shift(X)*((0,0,0)..controls (1,0,0) and (2,0,0)..(3,0,0).. controls (2.5,sqrt(3)/2,0) and (2,sqrt(3),0).. (1.5,3*sqrt(3)/2,0).. controls (1,sqrt(3),0) and (0.5,sqrt(3)/2,0)..cycle), new triple[] {(1.5,sqrt(3)/2,2)},new pen[] {red,green,blue})); ./asymptote-2.41/examples/logo3.asy0000644000175000017500000000221713064427076017124 0ustar norbertnorbertimport three; size(560,320,IgnoreAspect); size3(140,80,15); currentprojection=perspective(-2,20,10,up=Y); currentlight=White; real a=-0.4; real b=0.95; real y1=-5; real y2=-3y1/2; path A=(a,0){dir(10)}::{dir(89.5)}(0,y2); path B=(0,y1){dir(88.3)}::{dir(20)}(b,0); real c=0.5*a; pair z=(0,2.5); transform t=scale(1,15); transform T=inverse(scale(t.yy,t.xx)); path[] g=shift(0,1.979)*scale(0.01)*t* texpath(Label("{\it symptote}",z,0.25*E+0.169S,fontsize(24pt))); pair w=(0,1.7); pair u=intersectionpoint(A,w-1--w); real h=0.25*linewidth(); real hy=(T*(h,h)).x; g.push(t*((a,hy)--(b,hy)..(b+hy,0)..(b,-hy)--(a,-hy)..(a-hy,0)..cycle)); g.push(T*((h,y1)--(h,y2)..(0,y2+h)..(-h,y2)--(-h,y1)..(0,y1-h)..cycle)); g.push(shift(0,w.y)*t*((u.x,hy)--(w.x,hy)..(w.x+hy,0)..(w.x,-hy)--(u.x,-hy)..(u.x-hy,0)..cycle)); real f=0.75; g.push(point(A,0)--shift(-f*hy,f*h)*A--point(A,1)--shift(f*hy,-f*h)*reverse(A)--cycle); g.push(point(B,0)--shift(f*hy,-f*h)*B--point(B,1)--shift(-f*hy,f*h)*reverse(B)--cycle); triple H=-0.1Z; material m=material(lightgray,shininess=1.0); for(path p : g) draw(extrude(p,H),m); surface s=surface(g); draw(s,red,nolight); draw(shift(H)*s,m); ./asymptote-2.41/examples/functionshading.asy0000644000175000017500000000224113064427076021261 0ustar norbertnorbertsize(200); settings.tex="pdflatex"; // PostScript Calculator routine to convert from [0,1]x[0,1] to RG: string redgreen="0"; // PostScript Calculator routine to convert from [0,1]x[0,1] to HS to RGB: // (http://www.texample.net/tikz/examples/hsv-shading): string hsv="0.5 sub exch 0.5 sub exch 2 copy 2 copy 0 eq exch 0 eq and { pop pop 0.0 } {atan 360.0 div} ifelse dup 360 eq { pop 0.0 }{} ifelse 3 1 roll dup mul exch dup mul add sqrt 2.5 mul 0.25 sub 1 1 index 1.0 eq { 3 1 roll pop pop dup dup } { 3 -1 roll 6.0 mul dup 4 1 roll floor dup 5 1 roll 3 index sub neg 1.0 3 index sub 2 index mul 6 1 roll dup 3 index mul neg 1.0 add 2 index mul 7 1 roll neg 1.0 add 2 index mul neg 1.0 add 1 index mul 7 2 roll pop pop dup 0 eq { pop exch pop } { dup 1 eq { pop exch 4 1 roll exch pop } { dup 2 eq { pop 4 1 roll pop } { dup 3 eq { pop exch 4 2 roll pop } { dup 4 eq { pop exch pop 3 -1 roll } { pop 3 1 roll exch pop } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse cvr 3 1 roll cvr 3 1 roll cvr 3 1 roll"; path p=unitcircle; functionshade(p,rgb(zerowinding),redgreen); layer(); draw(p); path g=shift(2*dir(-45))*p; functionshade(g,rgb(zerowinding),hsv); layer(); draw(g); ./asymptote-2.41/examples/alignbox.asy0000644000175000017500000000036513064427076017706 0ustar norbertnorbertreal margin=1.5mm; object left=align(object("$x^2$",ellipse,margin),W); add(left); object right=align(object("$\sin x$",ellipse,margin),4E); add(right); add(new void(frame f, transform t) { draw(f,point(left,NE,t)--point(right,W,t)); }); ./asymptote-2.41/examples/partitionExample.asy0000644000175000017500000000203713064427076021426 0ustar norbertnorbertsize(15cm); import bezulate; path[] p = texpath("$\sigma \Theta$"); pair m = min(p); pair M = max(p); real midy = 0.5(M.y+m.y); path[] alpha = p[0:2]; path[] theta = p[2:5]; filldraw(p,lightgrey,black); draw("{\tt partition}",(M.x+1mm,midy)--(M.x+5mm,midy),Arrow); draw((M.x+1mm,midy+1mm)--(M.x+5mm,midy+2mm),Arrow); draw((M.x+1mm,midy-1mm)--(M.x+5mm,midy-2mm),Arrow); filldraw(shift((M.x+8.5mm,midy+3.5mm))*alpha,lightgrey,black); filldraw(shift((M.x+5.5mm,0))*theta[0:2],lightgrey,black); filldraw(shift(M.x+5.5mm,midy-2.5mm)*theta[2:3],lightgrey,black); draw("{\tt merge}, {\tt bezulate}",(M.x+9mm,midy+3mm)--(M.x+15mm,midy+3mm),Arrow); draw("{\tt merge}, {\tt bezulate}",(M.x+9mm,midy)--(M.x+15mm,midy),Arrow); draw("{\tt bezulate}",(M.x+9mm,midy-2.5mm)--(M.x+15mm,midy-2.5mm),Arrow); filldraw(shift(M.x+16mm-min(alpha).x,midy+3.5mm)*bezulate(alpha),lightgrey,black); filldraw(shift(M.x+16mm-min(theta[0:2]).x,0)*bezulate(theta[0:2]),lightgrey,black); filldraw(shift(M.x+16mm-min(theta[0:2]).x,midy-2.5mm)*bezulate(theta[2:3]),lightgrey,black); ./asymptote-2.41/examples/sin1x.asy0000644000175000017500000000050713064427076017143 0ustar norbertnorbertimport graph; size(200,0); real f(real x) {return (x != 0) ? sin(1/x) : 0;} real T(real x) {return 2/(x*pi);} real a=-4/pi, b=4/pi; int n=150,m=5; xaxis("$x$",red); yaxis(red); draw(graph(f,a,-T(m),n)--graph(f,-m,-(m+n),n,T)--(0,f(0))--graph(f,m+n,m,n,T)-- graph(f,T(m),b,n)); label("$\sin\frac{1}{x}$",(b,f(b)),SW); ./asymptote-2.41/examples/washermethod.asy0000644000175000017500000000175413064427076020600 0ustar norbertnorbertimport graph3; import solids; size(0,150); currentprojection=perspective(0,0,11,up=Y); pen color1=green+opacity(0.25); pen color2=red; real alpha=240; real f(real x) {return 2x^2-x^3;} pair F(real x) {return (x,f(x));} triple F3(real x) {return (x,f(x),0);} ngraph=12; real x1=0.7476; real x2=1.7787; real x3=1.8043; path[] p={graph(F,x1,x2,Spline), graph(F,0.7,x1,Spline)--graph(F,x2,x3,Spline), graph(F,0,0.7,Spline)--graph(F,x3,2,Spline)}; pen[] pn=new pen[] {color1,color2,color1}; render render=render(compression=0); for(int i=0; i < p.length; ++i) { revolution a=revolution(path3(p[i]),Y,0,alpha); draw(surface(a),pn[i],render); surface s=surface(p[i]--cycle); draw(s,pn[i],render); draw(rotate(alpha,Y)*s,pn[i],render); } draw((4/3,0,0)--F3(4/3),dashed); xtick("$\frac{4}{3}$",(4/3,0,0)); xaxis3(Label("$x$",1),Arrow3); yaxis3(Label("$y$",1),ymax=1.25,dashed,Arrow3); arrow("$y=2x^2-x^3$",F3(1.6),X+Y,0.75cm,red); draw(arc(1.1Y,0.3,90,0,7.5,180),Arrow3); ./asymptote-2.41/examples/polarcircle.asy0000644000175000017500000000116413064427076020400 0ustar norbertnorbertimport math; import graph; size(0,100); real f(real t) {return 2*cos(t);} pair F(real x) {return (x,f(x));} draw(polargraph(f,0,pi,operator ..)); defaultpen(fontsize(10pt)); xaxis("$x$"); yaxis("$y$"); real theta=radians(50); real r=f(theta); draw("$\theta$",arc((0,0),0.5,0,degrees(theta)),red,Arrow,PenMargins); pair z=polar(r,theta); draw(z--(z.x,0),dotted+red); draw((0,0)--(z.x,0),dotted+red); label("$r\cos\theta$",(0.5*z.x,0),0.5*S,red); label("$r\sin\theta$",(z.x,0.5*z.y),0.5*E,red); dot("$(x,y)$",z,N); draw("r",(0,0)--z,0.5*unit(z)*I,blue,Arrow,DotMargin); dot("$(a,0)$",(1,0),NE); dot("$(2a,0)$",(2,0),NE); ./asymptote-2.41/examples/spline.asy0000644000175000017500000000115213064427076017370 0ustar norbertnorbertimport graph; import interpolate; size(15cm,15cm,IgnoreAspect); real a=1997, b=2002; int n=5; real[] xpt=a+sequence(n+1)*(b-a)/n; real[] ypt={31,36,26,22,21,24}; horner h=diffdiv(xpt,ypt); fhorner L=fhorner(h); scale(false,true); pen p=linewidth(1); draw(graph(L,a,b),dashed+black+p,"Lagrange interpolation"); draw(graph(xpt,ypt,Hermite(natural)),red+p,"natural spline"); draw(graph(xpt,ypt,Hermite(monotonic)),blue+p,"monotone spline"); xaxis("$x$",BottomTop,LeftTicks(Step=1,step=0.25)); yaxis("$y$",LeftRight,RightTicks(Step=5)); dot(pairs(xpt,ypt),4bp+gray(0.3)); attach(legend(),point(10S),30S); ./asymptote-2.41/examples/galleon.asy0000644000175000017500000000076313064427076017526 0ustar norbertnorbertimport obj; size(15cm); currentprojection=orthographic(0,2,5,up=Y); // A compressed version of the required data file may be obtained from: // http://www.cs.technion.ac.il/~irit/data/Viewpoint/galleon.obj.gz pen[] surfacepen={darkred,brown,darkred+orange,heavyred,heavyred,darkred+orange, palegreen+blue+lightgrey,darkred,darkred,yellow,darkred,white, white,white,white,white,white}; surfacepen.cyclic=true; draw(obj("galleon.obj",verbose=false,surfacepen)); ./asymptote-2.41/examples/cosaddition.asy0000644000175000017500000000071513064427076020402 0ustar norbertnorbertsize(0,200); import geometry; real A=130; real B=40; pair O=(0,0); pair R=(1,0); pair P=dir(A); pair Q=dir(B); draw(circle(O,1.0)); draw(Q--O--P); draw(P--Q,red); draw(O--Q--R--cycle); draw("$A$",arc(R,O,P,0.3),blue,Arrow,PenMargin); draw("$B$",arc(R,O,Q,0.6),blue,Arrow,PenMargin); pair S=(Cos(B),0); draw(Q--S,blue); perpendicular(S,NE,blue); dot(O); dot("$R=(1,0)$",R); dot("$P=(\cos A,\sin A)$",P,dir(O--P)+W); dot("$Q=(\cos B,\sin B)$",Q,dir(O--Q)); ./asymptote-2.41/examples/circumcircle.asy0000644000175000017500000000034413064427076020544 0ustar norbertnorbertunitsize(1inch); path tri=(0,0)--(1,0)--(2,1)--cycle; pair p1=point(tri,0.5); pair p2=point(tri,1.5); pair z0=extension(p1,p1+I*dir(tri,0.5),p2,p2+I*dir(tri,1.5)); dot(z0); draw(circle(z0,abs(z0-point(tri,0)))); draw(tri,red); ./asymptote-2.41/examples/triads.asy0000644000175000017500000000167713064427076017400 0ustar norbertnorbertimport graph; path p=(10,75)..(15,85)..(20,90)..(35,85)..(40,79)--(78,30)..(85,15)..(87,5); pair l=point(p,3.5); pair m=point(p,4.5); pair s=point(p,4.9); pen c=linewidth(1.5); pair o=(m.x,0.5(m.x+l.y)); pen d=c+darkgreen; void drawarrow(string s="", pair p, pair q, side side=RightSide, bool upscale=false, pen c) { path g=p{dir(-5)}..{dir(-85)}q; if(upscale) g=reverse(g); draw(s,g,side,c,Arrow(Fill,0.65)); } void spectrum(pair l,pair m, pair s) { draw(p,c); d += 4.0; dot("$p$",l,SW,d); dot("$q$",m,SW,d); dot("$k$",s,SW,d); xaxis("$k$",0); yaxis("$E(k)$",0); } drawarrow("$T_p$",l,m,true,blue); drawarrow("$T_k$",m,s,LeftSide,red); spectrum(l,m,s); shipout("triadpqk"); erase(); drawarrow("$-T_p$",l,m,LeftSide,red); drawarrow("$-T_q$",m,s,true,blue); spectrum(l,s,m); shipout("triadpkq"); erase(); drawarrow("$T_k$",l,m,true,blue); drawarrow("$T_q$",m,s,LeftSide,red); spectrum(m,s,l); shipout("triadkpq"); ./asymptote-2.41/examples/dimension.asy0000644000175000017500000000101113064427076020055 0ustar norbertnorbertsize(12cm,0); void distance(picture pic=currentpicture, pair A, pair B, Label L="", real n=0, pen p=currentpen) { real d=3mm; path g=A--B; transform T=shift(-n*d*unit(B-A)*I); pic.add(new void(frame f, transform t) { picture opic; path G=T*t*g; draw(opic,Label(L,Center,UnFill(1)),G,p,Arrows(NoFill),Bars,PenMargins); add(f,opic.fit()); }); pic.addBox(min(g),max(g),T*min(p),T*max(p)); } pair A=(0,0), B=(3,3); dot(A); dot(B); distance(A,B,"$\ell$",1); ./asymptote-2.41/examples/roundpath.asy0000644000175000017500000000243613064427076020110 0ustar norbertnorbert// example file for 'roundedpath.asy' // written by stefan knorr // import needed packages import roundedpath; // define open and closed path path A = (0,0)--(10,10)--(30,10)--(20,0)--(30,-10)--(10,-10); path B = A--cycle; draw(shift(-60,0)*A, green); draw(shift(-30,0)*roundedpath(A,1), red); // draw open path and some modifications for (int i = 1; i < 20; ++i) draw(roundedpath(A,i/4), rgb(1 - i*0.049, 0, i*0.049) + linewidth(0.5)); draw(shift(-60,-30)*B, green); draw(shift(-30,-30)*roundedpath(B,1), red); //draw closed path and some modifications for (int i = 1; i < 20; ++i) // only round edges draw(shift(0,-30)*roundedpath(B,i/4), rgb(0.5, i*0.049,0) + linewidth(0.5)); for (int i = 1; i < 20; ++i) // round edged and scale draw(shift(0,-60)*roundedpath(B,i/4,1-i/50), rgb(1, 1 - i*0.049,i*0.049) + linewidth(0.5)); for (int i = 1; i < 50; ++i) // shift (round edged und scaled shifted version) draw(shift(-30,-60)*shift(10,0)*roundedpath(shift(-10,0)*B,i/10,1-i/80), rgb( i*0.024, 1 - i*0.024,0) + linewidth(0.5)); for (int i = 1; i < 20; ++i) // shift (round edged und scaled shifted version) draw(shift(-60,-60)*shift(10,0)*roundedpath(shift(-10,0)*B,i/4,1-i/50), gray(i/40)); ./asymptote-2.41/examples/electromagnetic.asy0000644000175000017500000000245613064427076021253 0ustar norbertnorbertimport graph; import palette; texpreamble("\usepackage[amssymb,thinqspace,thinspace]{SIunits}"); size(800,200); real c=3e8; real nm=1e-9; real freq(real lambda) {return c/(lambda*nm);} real lambda(real f) {return c/(f*nm);} real fmin=10; real fmax=1e23; scale(Log(true),Linear(true)); xlimits(fmin,fmax); ylimits(0,1); real uv=freq(400); real ir=freq(700); bounds visible=bounds(Scale(uv).x,Scale(ir).x); palette(visible,uv,ir+(0,2),Bottom,Rainbow(),invisible); xaxis(Label("\hertz",1),Bottom,RightTicks,above=true); real log10Left(real x) {return -log10(x);} real pow10Left(real x) {return pow10(-x);} scaleT LogLeft=scaleT(log10Left,pow10Left,logarithmic=true); picture q=secondaryX(new void(picture p) { scale(p,LogLeft,Linear); xlimits(p,lambda(fmax),lambda(fmin)); ylimits(p,0,1); xaxis(p,Label("\nano\metre",1,0.01N),Top,LeftTicks(DefaultLogFormat,n=10)); }); add(q,above=true); margin margin=PenMargin(0,0); draw("radio",Scale((10,1))--Scale((5e12,1)),S,Arrow); draw("infrared",Scale((1e12,1.75))--Scale(shift(0,1.75)*ir),LeftSide,Arrows,margin); draw("UV",Scale(shift(0,1.75)*uv)--Scale((1e17,1.76)),LeftSide,Arrows,margin); draw("x-rays",Scale((1e16,1))--Scale((1e21,1)),RightSide,Arrows); draw("$\gamma$-rays",Scale((fmax,1.75))--Scale((2e18,1.75)),Arrow); ./asymptote-2.41/examples/NURBSsurface.asy0000644000175000017500000000266513064427076020352 0ustar norbertnorbertimport three; size(10cm); currentprojection=perspective(50,80,50); // Nonrational surface: // udegree=3, vdegree=3, nu=5, nv=6; real[] uknot={0,0,0,0,0.5,1,1,1,1}; real[] vknot={0,0,0,0,0.4,0.6,1,1,1,1}; triple[][] P={{ (-31.2061,12.001,6.45082), (-31.3952,14.7353,6.53707), (-31.5909,21.277,6.70051), (-31.4284,25.4933,6.76745), (-31.5413,30.3485,6.68777), (-31.4896,32.2839,6.58385) },{ (-28.279,12.001,7.89625), (-28.4187,14.7353,8.00954), (-28.5633,21.277,8.22422), (-28.4433,25.4933,8.31214), (-28.5266,30.3485,8.20749), (-28.4885,32.2839,8.07099) },{ (-20,12.001,10.0379), (-20,14.7353,10.2001), (-20,21.277,10.5076), (-20,25.4933,10.6335), (-20,30.3485,10.4836), (-20,32.2839,10.2881) },{ (-11.721,12.001,7.84024), (-11.5813,14.7353,7.95269), (-11.4367,21.277,8.16575), (-11.5567,25.4933,8.25302), (-11.4734,30.3485,8.14915), (-11.5115,32.2839,8.01367) },{ (-8.79391,12.001,6.39481), (-8.60483,14.7353,6.48022), (-8.40905,21.277,6.64204), (-8.57158,25.4933,6.70832), (-8.45874,30.3485,6.62943), (-8.51041,32.2839,6.52653) } }; draw(P,uknot,vknot,new pen[] {red,green,blue,magenta}); // Rational Bezier patch: // udegree=3, vdegree=3, nu=4, nv=4; real[] uknot={0,0,0,0,1,1,1,1}; real[] vknot={0,0,0,0,1,1,1,1}; triple[][] P=scale3(20)*octant1.P; // Optional weights: real[][] weights=array(P.length,array(P[0].length,1.0)); weights[0][2]=5.0; draw(P,uknot,vknot,weights,blue); ./asymptote-2.41/examples/Klein.asy0000644000175000017500000000246013064427076017143 0ustar norbertnorbertimport graph3; size(469pt); viewportmargin=0; currentprojection=perspective( camera=(25.0851928432063,-30.3337528952473,19.3728775115443), up=Z, target=(-0.590622314050054,0.692357205025578,-0.627122488455679), zoom=1, autoadjust=false); triple f(pair t) { real u=t.x; real v=t.y; real r=2-cos(u); real x=3*cos(u)*(1+sin(u))+r*cos(v)*(u < pi ? cos(u) : -1); real y=8*sin(u)+(u < pi ? r*sin(u)*cos(v) : 0); real z=r*sin(v); return (x,y,z); } surface s=surface(f,(0,0),(2pi,2pi),8,8,Spline); draw(s,lightolive+white,"bottle",render(merge=true)); string lo="$\displaystyle u\in[0,\pi]: \cases{x=3\cos u(1+\sin u)+(2-\cos u)\cos u\cos v,\cr y=8\sin u+(2-\cos u)\sin u\cos v,\cr z=(2-\cos u)\sin v.\cr}$"; string hi="$\displaystyle u\in[\pi,2\pi]:\\\cases{x=3\cos u(1+\sin u)-(2-\cos u)\cos v,\cr y=8\sin u,\cr z=(2-\cos u)\sin v.\cr}$"; real h=0.0125; begingroup3("parametrization"); draw(surface(xscale(-0.38)*yscale(-0.18)*lo,s,0,1.7,h,bottom=false), "[0,pi]"); draw(surface(xscale(0.26)*yscale(0.1)*rotate(90)*hi,s,4.9,1.4,h,bottom=false), "[pi,2pi]"); endgroup3(); begingroup3("boundary"); draw(s.uequals(0),blue+dashed); draw(s.uequals(pi),blue+dashed); endgroup3(); add(new void(frame f, transform3 t, picture pic, projection P) { draw(f,invert(box(min(f,P),max(f,P)),P),"frame"); }); ./asymptote-2.41/examples/vectorfieldsphere.asy0000644000175000017500000000053713064427076021621 0ustar norbertnorbertimport graph3; size(12cm); currentprojection=orthographic(1,-2,1); currentlight=(1,-1,0.5); triple f(pair z) {return expi(z.x,z.y);} path3 vector(pair z) { triple v=f(z); return O--(v.y,v.z,v.x); } add(vectorfield(vector,f,(0,0),(pi,2pi),10,0.25,red,render(merge=true))); draw(unitsphere,gray+opacity(0.5),render(compression=0,merge=true)); ./asymptote-2.41/examples/cpkcolors.asy0000644000175000017500000001315413064427076020102 0ustar norbertnorbert/* * Copyright (C) 2003-2005 Miguel, Jmol Development, www.jmol.org * * Contact: miguel@jmol.org * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. */ string[] Element={ "Xx", // 0 "H", // 1 "He", // 2 "Li", // 3 "Be", // 4 "B", // 5 "C", // 6 "N", // 7 "O", // 8 "F", // 9 "Ne", // 10 "Na", // 11 "Mg", // 12 "Al", // 13 "Si", // 14 "P", // 15 "S", // 16 "Cl", // 17 "Ar", // 18 "K", // 19 "Ca", // 20 "Sc", // 21 "Ti", // 22 "V", // 23 "Cr", // 24 "Mn", // 25 "Fe", // 26 "Co", // 27 "Ni", // 28 "Cu", // 29 "Zn", // 30 "Ga", // 31 "Ge", // 32 "As", // 33 "Se", // 34 "Br", // 35 "Kr", // 36 "Rb", // 37 "Sr", // 38 "Y", // 39 "Zr", // 40 "Nb", // 41 "Mo", // 42 "Tc", // 43 "Ru", // 44 "Rh", // 45 "Pd", // 46 "Ag", // 47 "Cd", // 48 "In", // 49 "Sn", // 50 "Sb", // 51 "Te", // 52 "I", // 53 "Xe", // 54 "Cs", // 55 "Ba", // 56 "La", // 57 "Ce", // 58 "Pr", // 59 "Nd", // 60 "Pm", // 61 "Sm", // 62 "Eu", // 63 "Gd", // 64 "Tb", // 65 "Dy", // 66 "Ho", // 67 "Er", // 68 "Tm", // 69 "Yb", // 70 "Lu", // 71 "Hf", // 72 "Ta", // 73 "W", // 74 "Re", // 75 "Os", // 76 "Ir", // 77 "Pt", // 78 "Au", // 79 "Hg", // 80 "Tl", // 81 "Pb", // 82 "Bi", // 83 "Po", // 84 "At", // 85 "Rn", // 86 "Fr", // 87 "Ra", // 88 "Ac", // 89 "Th", // 90 "Pa", // 91 "U", // 92 "Np", // 93 "Pu", // 94 "Am", // 95 "Cm", // 96 "Bk", // 97 "Cf", // 98 "Es", // 99 "Fm", // 100 "Md", // 101 "No", // 102 "Lr", // 103 "Rf", // 104 "Db", // 105 "Sg", // 106 "Bh", // 107 "Hs", // 108 "Mt", // 109 /* "Ds", // 110 "Uuu",// 111 "Uub",// 112 "Uut",// 113 "Uuq",// 114 "Uup",// 115 "Uuh",// 116 "Uus",// 117 "Uuo",// 118 */ }; // Default table of CPK atom colors // (ghemical colors with a few proposed modifications). string[] Hexcolor={ "FF1493", // Xx 0 "FFFFFF", // H 1 "D9FFFF", // He 2 "CC80FF", // Li 3 "C2FF00", // Be 4 "FFB5B5", // B 5 "909090", // C 6 - changed from ghemical "3050F8", // N 7 - changed from ghemical "FF0D0D", // O 8 "90E050", // F 9 - changed from ghemical "B3E3F5", // Ne 10 "AB5CF2", // Na 11 "8AFF00", // Mg 12 "BFA6A6", // Al 13 "F0C8A0", // Si 14 - changed from ghemical "FF8000", // P 15 "FFFF30", // S 16 "1FF01F", // Cl 17 "80D1E3", // Ar 18 "8F40D4", // K 19 "3DFF00", // Ca 20 "E6E6E6", // Sc 21 "BFC2C7", // Ti 22 "A6A6AB", // V 23 "8A99C7", // Cr 24 "9C7AC7", // Mn 25 "E06633", // Fe 26 - changed from ghemical "F090A0", // Co 27 - changed from ghemical "50D050", // Ni 28 - changed from ghemical "C88033", // Cu 29 - changed from ghemical "7D80B0", // Zn 30 "C28F8F", // Ga 31 "668F8F", // Ge 32 "BD80E3", // As 33 "FFA100", // Se 34 "A62929", // Br 35 "5CB8D1", // Kr 36 "702EB0", // Rb 37 "00FF00", // Sr 38 "94FFFF", // Y 39 "94E0E0", // Zr 40 "73C2C9", // Nb 41 "54B5B5", // Mo 42 "3B9E9E", // Tc 43 "248F8F", // Ru 44 "0A7D8C", // Rh 45 "006985", // Pd 46 "C0C0C0", // Ag 47 - changed from ghemical "FFD98F", // Cd 48 "A67573", // In 49 "668080", // Sn 50 "9E63B5", // Sb 51 "D47A00", // Te 52 "940094", // I 53 "429EB0", // Xe 54 "57178F", // Cs 55 "00C900", // Ba 56 "70D4FF", // La 57 "FFFFC7", // Ce 58 "D9FFC7", // Pr 59 "C7FFC7", // Nd 60 "A3FFC7", // Pm 61 "8FFFC7", // Sm 62 "61FFC7", // Eu 63 "45FFC7", // Gd 64 "30FFC7", // Tb 65 "1FFFC7", // Dy 66 "00FF9C", // Ho 67 "00E675", // Er 68 "00D452", // Tm 69 "00BF38", // Yb 70 "00AB24", // Lu 71 "4DC2FF", // Hf 72 "4DA6FF", // Ta 73 "2194D6", // W 74 "267DAB", // Re 75 "266696", // Os 76 "175487", // Ir 77 "D0D0E0", // Pt 78 - changed from ghemical "FFD123", // Au 79 - changed from ghemical "B8B8D0", // Hg 80 - changed from ghemical "A6544D", // Tl 81 "575961", // Pb 82 "9E4FB5", // Bi 83 "AB5C00", // Po 84 "754F45", // At 85 "428296", // Rn 86 "420066", // Fr 87 "007D00", // Ra 88 "70ABFA", // Ac 89 "00BAFF", // Th 90 "00A1FF", // Pa 91 "008FFF", // U 92 "0080FF", // Np 93 "006BFF", // Pu 94 "545CF2", // Am 95 "785CE3", // Cm 96 "8A4FE3", // Bk 97 "A136D4", // Cf 98 "B31FD4", // Es 99 "B31FBA", // Fm 100 "B30DA6", // Md 101 "BD0D87", // No 102 "C70066", // Lr 103 "CC0059", // Rf 104 "D1004F", // Db 105 "D90045", // Sg 106 "E00038", // Bh 107 "E6002E", // Hs 108 "EB0026" // Mt 109 }; ./asymptote-2.41/examples/sqrtx01.asy0000644000175000017500000000124213064427076017420 0ustar norbertnorbertimport graph3; import solids; size(0,150); currentprojection=perspective(1.5,0,10,Y); pen color=green+opacity(0.75); real f(real x){return sqrt(x);} pair F(real x){return (x,f(x));} triple F3(real x){return (x,f(x),0);} path p=graph(F,0,1,n=20,operator ..); path3 p3=path3(p); revolution a=revolution(p3,X,0,360); draw(surface(a),color,render(compression=Low,merge=true)); draw(p3,blue); real x=relpoint(p,0.5).x; xaxis3(Label("$x$",1),xmax=1.5,dashed,Arrow3); yaxis3(Label("$y$",1),Arrow3); dot(Label("$(1,1)$"),(1,1,0)); arrow(Label("$y=\sqrt{x}$"),F3(0.7),Y,0.75cm,red); draw(arc(1.2X,0.4,90,90,175,-40,CW),Arrow3); draw("$r$",(x,0,0)--F3(x),red,Arrow3,PenMargin3); ./asymptote-2.41/examples/impact.asy0000644000175000017500000000114213064427076017352 0ustar norbertnorbert// Contributed by Philippe Ivaldi. // http://www.piprime.fr/ import graph3 ; import contour; size (6cm,0); currentprojection=orthographic(1,1,1) ; real rc=1, hc=2, c=rc/hc; draw(shift(hc*Z)*scale(rc,rc,-hc)*unitcone,blue); triple Os=(0.5,0.5,1); real r=0.5; draw(shift(Os)*scale3(r)*unitsphere,red); real a=1+1/c^2; real b=abs(Os)^2-r^2; real f(pair z) { real x=z.x, y=z.y; return a*x^2-2*Os.x*x+a*y^2-2*Os.y*y-2*Os.z*sqrt(x^2+y^2)/c+b; } real g(pair z){return (sqrt(z.x^2+z.y^2))/c;} draw(lift(g,contour(f,(-rc,-rc),(rc,rc),new real[]{0})),linewidth(2bp)+yellow); axes3("$x$","$y$","$z$",Arrow3); ./asymptote-2.41/examples/epix.asy0000644000175000017500000000061613064427076017047 0ustar norbertnorbertimport graph3; size(200,200,IgnoreAspect); currentprojection=perspective(4,2,3); real f(pair z) {return z.y^3/2-3z.x^2*z.y;} draw(surface(f,(-1,-1),(1,1),nx=10,Spline),green,render(merge=true)); draw(Label("$y$",1),(0,0,0)--(0,2,0),red,Arrow3); draw(Label("$x$",1),(0,0,0)--(2,0,0),red,Arrow3); draw(Label("$z$",1),(0,0,0)--(0,0,2.5),red,Arrow3); label("$z=\frac{1}{2}y^3-3x^2y$",(1,1,1),NE); ./asymptote-2.41/examples/filesurface.dat0000644000175000017500000001264713064427076020355 0ustar norbertnorbert1 12 24 36 60 84 120 180 240 360 2005 2005.083333 2005.166667 2005.25 2005.333333 2005.416667 2005.5 2005.583333 2005.666667 2005.75 2005.833333 2005.916667 2006 2006.083333 2006.166667 2006.25 2006.333333 2006.416667 2006.5 2006.583333 2006.666667 2006.75 2006.833333 2006.916667 2007 2007.083333 2007.166667 2007.25 2007.333333 2007.416667 2007.5 2007.583333 2007.666667 2007.75 2007.833333 2007.916667 2008 2008.083333 2008.166667 2008.25 2008.333333 2008.416667 2008.5 2008.583333 2008.666667 2008.75 2008.833333 2008.916667 2.111 2.1039 2.103 2.1047 2.1041 2.1039 2.1064 2.1126 2.1152 2.1209 2.2225 2.4112 2.3885 2.4586 2.6333 2.6489 2.6926 2.8691 2.9389 3.0941 3.1572 3.3501 3.4214 3.64 3.6159 3.6511 3.8439 3.859 3.9194 4.0982 4.105 4.3081 4.4339 4.2355 4.216 4.7114 4.1973 4.1821 4.3046 4.3691 4.3874 4.4724 4.4716 4.4875 4.6599 4.8313 3.8433 2.9929 2.223809524 2.228 2.246190476 2.165238095 2.092727273 1.997272727 2.07185 2.14 2.128636364 2.327619048 2.577272727 2.67 2.717727273 2.793 2.978695652 3.094210526 3.175 3.271363636 3.415238095 3.489565217 3.573333333 3.664090909 3.723636364 3.773157895 3.914090909 3.9605 3.982727273 4.132105263 4.254545455 4.398095238 4.44 4.228695652 4.088 4.09 4.044090909 4.0855 3.870909091 3.631904762 3.711052632 3.955909091 4.141428571 4.562380952 4.575217391 4.36952381 4.210909091 2.93173913 2.3795 2.007727273 2.431904762 2.4595 2.517142857 2.367619048 2.237272727 2.077727273 2.18235 2.253913043 2.222727273 2.484761905 2.743636364 2.804285714 2.862272727 2.968 3.192173913 3.343157895 3.381818182 3.462727273 3.574285714 3.575652174 3.602380952 3.657272727 3.677727273 3.744210526 3.926818182 3.954 3.922272727 4.105263158 4.255454545 4.464285714 4.475 4.183478261 4.0595 4.090434783 3.898636364 3.9975 3.68 3.334761905 3.402105263 3.781818182 4.07047619 4.624761905 4.542608696 4.178095238 4.008636364 3.151304348 2.641 2.375 2.638095238 2.6685 2.735714286 2.562380952 2.416818182 2.241363636 2.33035 2.400869565 2.340454545 2.60952381 2.865454545 2.895238095 2.949545455 3.0775 3.297826087 3.477368421 3.521363636 3.589545455 3.685714286 3.640434783 3.614761905 3.674545455 3.668636364 3.742631579 3.938636364 3.9625 3.91 4.106842105 4.258636364 4.496666667 4.496818182 4.210869565 4.0975 4.138695652 3.933181818 4.027 3.719090909 3.413809524 3.434210526 3.818636364 4.071428571 4.622380952 4.56826087 4.157619048 3.993181818 3.358695652 2.8285 2.594090909 2.996190476 3.015 3.124761905 2.920952381 2.753181818 2.581818182 2.6606 2.710869565 2.595 2.829047619 3.082272727 3.056190476 3.080909091 3.2445 3.45173913 3.664736842 3.703181818 3.74 3.82047619 3.726956522 3.655714286 3.712727273 3.669090909 3.753157895 3.970454545 4.0055 3.914090909 4.126315789 4.273181818 4.538095238 4.537727273 4.25826087 4.1655 4.210869565 3.982727273 4.1085 3.829545455 3.600952381 3.591578947 3.941363636 4.137619048 4.65952381 4.622173913 4.201428571 4.126363636 3.774782609 3.2075 2.983181818 3.265714286 3.2665 3.405238095 3.21 3.04 2.87 2.9277 2.959565217 2.819545455 3.021428571 3.238636364 3.144761905 3.143636364 3.3225 3.536086957 3.798421053 3.85 3.867727273 3.91047619 3.803043478 3.706666667 3.757727273 3.700454545 3.775263158 4.003181818 4.037368421 3.938181818 4.156315789 4.288636364 4.566190476 4.546363636 4.31173913 4.23 4.27 4.076818182 4.185 3.949545455 3.793333333 3.730526316 4.043636364 4.219047619 4.636190476 4.62173913 4.258095238 4.190454545 3.967826087 3.53 3.192272727 3.593809524 3.5845 3.745238095 3.543333333 3.381363636 3.209545455 3.249 3.282173913 3.122272727 3.285714286 3.488181818 3.380952381 3.344545455 3.497 3.674347826 3.935789474 4.004090909 4.004545455 4.029047619 3.906956522 3.778095238 3.817272727 3.75 3.811052632 4.055909091 4.091 3.99 4.203157895 4.330454545 4.614285714 4.590454545 4.393913043 4.344 4.397391304 4.234545455 4.346 4.165 4.105238095 4.044210526 4.252727273 4.398571429 4.718571429 4.705217391 4.407142857 4.379090909 4.255652174 3.998 3.514545455 3.78952381 3.7435 3.9255 3.75 3.582272727 3.451363636 3.50775 3.513913043 3.359545455 3.494761905 3.665909091 3.551428571 3.504545455 3.6535 3.812608696 4.098421053 4.167272727 4.175909091 4.186666667 4.056086957 3.908571429 3.916363636 3.824545455 3.882105263 4.12 4.162 4.089090909 4.306315789 4.423181818 4.699047619 4.661818182 4.504782609 4.4985 4.519565217 4.402272727 4.5115 4.382727273 4.366666667 4.336842105 4.509545455 4.613809524 4.861428571 4.877391304 4.636666667 4.659545455 4.482173913 4.2535 3.744545455 3.99 3.9085 4.098571429 3.944285714 3.771363636 3.609090909 3.6536 3.640869565 3.488181818 3.604761905 3.755454545 3.634285714 3.565909091 3.7165 3.866521739 4.151052632 4.235454545 4.235909091 4.249047619 4.116086957 3.961904762 3.953333333 3.855714286 3.92 4.153636364 4.1985 4.139090909 4.365789474 4.471818182 4.747142857 4.695454545 4.55 4.572 4.590434783 4.500909091 4.602 4.504090909 4.513809524 4.521052632 4.656818182 4.733809524 4.899047619 4.935652174 4.746190476 4.776818182 4.598695652 4.4835 3.900454545 4.137142857 4.0305 4.213333333 4.08 3.902727273 3.739090909 3.774285714 3.757391304 3.598181818 3.706190476 3.842272727 3.712 3.629545455 3.771 3.919565217 4.231111111 4.295909091 4.306818182 4.31 4.170434783 4.000952381 3.99 3.881818182 3.943684211 4.176818182 4.2195 4.163636364 4.387368421 4.480454545 4.758095238 4.710454545 4.559565217 4.595 4.612173913 4.544090909 4.64 4.57 4.58 4.614736842 4.702727273 4.768571429 4.884761905 4.905652174 4.741904762 4.775454545 4.496521739 4.3585 3.738636364 ./asymptote-2.41/examples/floatingdisk.asy0000644000175000017500000000104413064427076020554 0ustar norbertnorbertimport trembling; settings.outformat="pdf"; size(6cm,0); real R=1/5; real h=0.5; real d=1/12; real l=.7; pair pA=(-l,0); pair pB=(l,0); tremble tr=tremble(angle=10,frequency=0.1,random=50,fuzz=1); path waterline=tr.deform(pA..pB); path disk=shift(0,-d)*scale(R)*unitcircle; path water=waterline--(l,-h)--(-l,-h)--(-l,0)--cycle; path container=(l,1/7)--(l,-h)--(-l,-h)--(-l,1/7); filldraw(disk,red,linewidth(.3)); fill(water,mediumgrey+opacity(0.5)); draw(waterline); draw(container,linewidth(1.5)); shipout(bbox(2mm)); ./asymptote-2.41/examples/Pythagoras.asy0000644000175000017500000000105513064427076020221 0ustar norbertnorbertsize(0,150); import geometry; real a=3; real b=4; real c=hypot(a,b); pair z1=(0,b); pair z2=(a,0); pair z3=(a+b,0); perpendicular(z1,NE,z1--z2,blue); perpendicular(z3,NW,blue); draw(square((0,0),z3)); draw(square(z1,z2)); real d=0.3; pair v=unit(z2-z1); draw(baseline("$a$"),-d*I--z2-d*I,red,Bars,Arrows,PenMargins); draw(baseline("$b$"),z2-d*I--z3-d*I,red,Arrows,Bars,PenMargins); draw("$c$",z3+z2*I-d*v--z2-d*v,red,Arrows,PenMargins); draw("$a$",z3+d--z3+z2*I+d,red,Arrows,Bars,PenMargins); draw("$b$",z3+z2*I+d--z3+z3*I+d,red,Arrows,Bars,PenMargins); ./asymptote-2.41/examples/quilt.asy0000644000175000017500000000133613064427076017240 0ustar norbertnorbertimport math; int n=8, skip=3; pair r(int k) { return unityroot(n,k); } pen col=blue, col2=purple; guide square=box((1,1),(-1,-1)); guide step(int mult) { guide g; for(int k=0; k epsilon) {startv=endv; endv=nwtn(startv,y);}; return endv; } pair mollweide(real lambda, real phi, real lambda0=0){ // calculate the Mollweide projection centered at lambda0 for the point // with coordinates(phi,lambda) static real c1=2*sqrt(2)/pi; static real c2=sqrt(2); real theta=findtheta(phi); return(c1*(lambda-lambda0)*cos(theta), c2*sin(theta)); } guide gfrompairs(pair[] data){ guide gtmp; for(int i=0; i < data.length; ++i) { pair tmp=mollweide(radians(data[i].y),radians(data[i].x)); gtmp=gtmp--tmp; } return gtmp; } string datafile="worldmap.dat"; file in=input(datafile,comment="/").line(); // new commentchar since "#" is contained in the file pair[][] arrarrpair=new pair[][] ; int cnt=-1; bool newseg=false; while(true) { if(eof(in)) break; string str=in; string[] spstr=split(str,""); if(spstr[0] == "#") {++cnt; arrarrpair[cnt]=new pair[] ; newseg=true;} if(spstr[0] != "#" && newseg) { string[] spstr1=split(str,'\t'); // separator is TAB not SPACE pair tmp=((real) spstr1[1],(real) spstr1[0]); arrarrpair[cnt].push(tmp); } } for(int i=0; i < arrarrpair.length; ++i) draw(gfrompairs(arrarrpair[i]),1bp+black); // lines of longitude and latitude pair[] constlong(real lambda, int np=100) { pair[] tmp; for(int i=0; i <= np; ++i) tmp.push((-90+i*180/np,lambda)); return tmp; } pair[] constlat(real phi, int np=100) { pair[] tmp; for(int i=0; i <= 2*np; ++i) tmp.push((phi,-180+i*180/np)); return tmp; } for(int j=1; j <= 5; ++j) draw(gfrompairs(constlong(-180+j/6*360)),white); draw(gfrompairs(constlong(-180)),1.5bp+white); draw(gfrompairs(constlong(180)),1.5bp+white); for(int j=0; j <= 12; ++j) draw(gfrompairs(constlat(-90+j/6*180)),white); //draw(gfrompairs(constlong(10)),dotted); close(in); shipout(bbox(1mm,darkblue,Fill(lightblue)), view=true); ./asymptote-2.41/examples/strokeshade.asy0000644000175000017500000000025013064427076020410 0ustar norbertnorbertsize(100); guide g=(0,0)..controls(70,30) and (-40,30)..(30,0); latticeshade(g,stroke=true,linewidth(10), new pen[][] {{red,orange,yellow},{green,blue,purple}}); ./asymptote-2.41/examples/advection.asy0000644000175000017500000001007613064427076020057 0ustar norbertnorbertsize(0,22cm); texpreamble(" \usepackage{bm} \def\v{\bm} \def\grad{\v\nabla} \def\cross{{\v\times}} \def\curl{\grad\cross} \def\del{\nabla} "); defaultpen(fontsize(10pt)); real margin=1.5mm; object IC=draw("initial condition $\v U_0$",box,(0,1), margin,black,FillDraw(palegray)); object Adv0=draw("Lagrangian state $\v U(t)$",ellipse,(1,1), margin,red,FillDraw(palered)); object Adv=draw("Lagrangian prediction $\v U(t+\tau)$",ellipse,(1,0), margin,red,FillDraw(palered)); object AdvD=draw("diffused parcels",ellipse,(1.8,1), margin,red,FillDraw(palered)); object Ur=draw("rearranged $\v \widetilde U$",box,(0,0), margin,orange+gray,FillDraw(paleyellow)); object Ui=draw("interpolated $\v \widetilde U$",box,(1,-1), margin,blue,FillDraw(paleblue)); object Crank=draw("${\cal L}^{-1}(-\tau){\cal L}(\tau)\v \widetilde U$", box,(0.5,-1),margin,blue,FillDraw(paleblue)); object CrankR=draw("${\cal L}^{-1}(-\tau){\cal L}(\tau)\v \widetilde U$", box,(0,-1),margin,orange+gray,FillDraw(paleyellow)); object Urout=draw(minipage("\center{Lagrangian rearranged solution~$\v U_R$}", 100pt),box,(0,-2),margin,orange+gray, FillDraw(paleyellow)); object Diff=draw("$\v D\del^2 \v \widetilde U$",box,(0.75,-1.5), margin,blue,FillDraw(paleblue)); object UIout=draw(minipage("\center{semi-Lagrangian solution~$\v U_I$}",80pt), box,(0.5,-2),margin,FillDraw(palered+paleyellow)); object psi=draw("$\psi=\del^{-2}\omega$",box,(1.6,-1), margin,darkgreen,FillDraw(palegreen)); object vel=draw("$\v v=\v{\hat z} \cross\grad\psi$",box,(1.6,-0.5), margin,darkgreen,FillDraw(palegreen)); add(new void(frame f, transform t) { pair padv=0.5*(point(Adv0,S,t)+point(Adv,N,t)); picture pic; draw(pic,"initialize",point(IC,E,t)--point(Adv0,W,t),RightSide,Arrow, PenMargin); draw(pic,minipage("\flushright{advect: Runge-Kutta}",80pt), point(Adv0,S,t)--point(Adv,N,t),RightSide,red,Arrow,PenMargin); draw(pic,Label("Lagrange $\rightarrow$ Euler",0.45), point(Adv,W,t)--point(Ur,E,t),5LeftSide,orange+gray, Arrow,PenMargin); draw(pic,"Lagrange $\rightarrow$ Euler",point(Adv,S,t)--point(Ui,N,t), RightSide,blue,Arrow,PenMargin); draw(pic,point(Adv,E,t)--(point(AdvD,S,t).x,point(Adv,E,t).y),red, Arrow(Relative(0.7)),PenMargin); draw(pic,minipage("\flushleft{diffuse: multigrid Crank--Nicholson}",80pt), point(Ui,W,t)--point(Crank,E,t),5N,blue,MidArrow,PenMargin); draw(pic,minipage("\flushleft{diffuse: multigrid Crank--Nicholson}",80pt), point(Ur,S,t)--point(CrankR,N,t),LeftSide,orange+gray,Arrow,PenMargin); draw(pic,"output",point(CrankR,S,t)--point(Urout,N,t),RightSide, orange+gray,Arrow,PenMargin); draw(pic,point(Ui,S,t)--point(Diff,N,t),blue,MidArrow,PenMargin); draw(pic,point(Crank,S,t)--point(Diff,N,t),blue,MidArrow,PenMargin); label(pic,"subtract",point(Diff,N,t),12N,blue); draw(pic,Label("Euler $\rightarrow$ Lagrange",0.5), point(Diff,E,t)--(point(AdvD,S,t).x,point(Diff,E,t).y)-- (point(AdvD,S,t).x,point(Adv,E,t).y),RightSide,blue, Arrow(position=1.5),PenMargin); dot(pic,(point(AdvD,S,t).x,point(Adv,E,t).y),red); draw(pic,(point(AdvD,S,t).x,point(Adv,E,t).y)--point(AdvD,S,t),red,Arrow, PenMargin); draw(pic,"output",point(Crank,S,t)--point(UIout,N,t),RightSide,brown,Arrow, PenMargin); draw(pic,Label("$t+\tau\rightarrow t$",0.45), point(AdvD,W,t)--point(Adv0,E,t),2.5LeftSide,red,Arrow,PenMargin); draw(pic,point(psi,N,t)--point(vel,S,t),darkgreen,Arrow,PenMargin); draw(pic,Label("self-advection",4.5),point(vel,N,t)-- arc((point(vel,N,t).x,point(Adv,E,t).y),5,270,90)-- (point(vel,N,t).x,padv.y)-- padv,LeftSide,darkgreen,Arrow,PenMargin); draw(pic,Label("multigrid",0.5,S),point(Ui,E,t)--point(psi,W,t),darkgreen, Arrow,PenMargin); add(f,pic.fit()); }); ./asymptote-2.41/examples/SierpinskiSponge.asy0000644000175000017500000000456613064427076021406 0ustar norbertnorbertsize(200); import palette; import three; currentprojection=orthographic(1,1,1); triple[] M={ (-1,-1,-1),(0,-1,-1),(1,-1,-1),(1,0,-1), (1,1,-1),(0,1,-1),(-1,1,-1),(-1,0,-1), (-1,-1,0),(1,-1,0),(1,1,0),(-1,1,0), (-1,-1,1),(0,-1,1),(1,-1,1),(1,0,1),(1,1,1),(0,1,1),(-1,1,1),(-1,0,1) }; surface[] Squares={ surface((1,-1,-1)--(1,1,-1)--(1,1,1)--(1,-1,1)--cycle), surface((-1,-1,-1)--(-1,1,-1)--(-1,1,1)--(-1,-1,1)--cycle), surface((1,1,-1)--(-1,1,-1)--(-1,1,1)--(1,1,1)--cycle), surface((1,-1,-1)--(-1,-1,-1)--(-1,-1,1)--(1,-1,1)--cycle), surface((1,-1,1)--(1,1,1)--(-1,1,1)--(-1,-1,1)--cycle), surface((1,-1,-1)--(1,1,-1)--(-1,1,-1)--(-1,-1,-1)--cycle), }; int[][] SquaresPoints={ {2,3,4,10,16,15,14,9}, {0,7,6,11,18,19,12,8}, {4,5,6,11,18,17,16,10}, {2,1,0,8,12,13,14,9}, {12,13,14,15,16,17,18,19}, {0,1,2,3,4,5,6,7} }; int[][] index={ {0,2,4},{0,1},{1,2,4},{2,3},{1,3,4},{0,1},{0,3,4},{2,3}, {4,5},{4,5},{4,5},{4,5}, {0,2,5},{0,1},{1,2,5},{2,3},{1,3,5},{0,1},{0,3,5},{2,3} }; int[] Sponge0=array(n=6,value=1); int[] eraseFaces(int n, int[] Sponge0) { int[] temp=copy(Sponge0); for(int k : index[n]) { temp[k]=0; } return temp; } int[][] Sponge1=new int[20][]; for(int n=0; n < 20; ++n) { Sponge1[n]=eraseFaces(n,Sponge0); } int[][] eraseFaces(int n, int[][] Sponge1) { int[][] temp=copy(Sponge1); for(int k : index[n]) for(int n1 : SquaresPoints[k]) temp[n1][k]=0; return temp; } int[][][] Sponge2=new int[20][][]; for(int n=0; n < 20; ++n) Sponge2[n]=eraseFaces(n,Sponge1); int[][][] eraseFaces(int n, int[][][] Sponge2) { int[][][] temp=copy(Sponge2); for(int k : index[n]) for(int n2: SquaresPoints[k]) for(int n1: SquaresPoints[k]) temp[n2][n1][k]=0; return temp; } int[][][][] Sponge3=new int[20][][][]; for(int n=0; n < 20; ++n) Sponge3[n]=eraseFaces(n,Sponge2); surface s3; real u=2/3; for(int n3=0; n3 < 20; ++n3) { surface s2; for(int n2=0; n2 < 20; ++n2) { surface s1; for(int n1=0; n1 < 20; ++n1) { for(int k=0; k < 6; ++k){ transform3 T=scale3(u)*shift(M[n1])*scale3(0.5); if(Sponge3[n3][n2][n1][k] > 0) { s1.append(T*Squares[k]); } } } transform3 T=scale3(u)*shift(M[n2])*scale3(0.5); s2.append(T*s1); } transform3 T=scale3(u)*shift(M[n3])*scale3(0.5); s3.append(T*s2); } s3.colors(palette(s3.map(abs),Rainbow())); draw(s3); ./asymptote-2.41/examples/venn3.asy0000644000175000017500000000150713064427076017133 0ustar norbertnorbertsize(0,150); pen colour1=red; pen colour2=green; pen colour3=blue; real r=sqrt(3); pair z0=(0,0); pair z1=(-1,0); pair z2=(1,0); pair z3=(0,r); path c1=circle(z1,r); path c2=circle(z2,r); path c3=circle(z3,r); fill(c1,colour1); fill(c2,colour2); fill(c3,colour3); picture intersection12; fill(intersection12,c1,colour1+colour2); clip(intersection12,c2); picture intersection13; fill(intersection13,c1,colour1+colour3); clip(intersection13,c3); picture intersection23; fill(intersection23,c2,colour2+colour3); clip(intersection23,c3); picture intersection123; fill(intersection123,c1,colour1+colour2+colour3); clip(intersection123,c2); clip(intersection123,c3); add(intersection12); add(intersection13); add(intersection23); add(intersection123); draw(c1); draw(c2); draw(c3); label("$A$",z1); label("$B$",z2); label("$C$",z3); ./asymptote-2.41/examples/teapot.asy0000644000175000017500000003256513064427076017406 0ustar norbertnorbertimport three; size(20cm); currentprojection=perspective(250,-250,250); currentlight=Viewport; triple[][][] Q={ { {(39.68504,0,68.0315),(37.91339,0,71.75197),(40.74803,0,71.75197),(42.51969,0,68.0315)}, {(39.68504,-22.22362,68.0315),(37.91339,-21.2315,71.75197),(40.74803,-22.8189,71.75197),(42.51969,-23.81102,68.0315)}, {(22.22362,-39.68504,68.0315),(21.2315,-37.91339,71.75197),(22.8189,-40.74803,71.75197),(23.81102,-42.51969,68.0315)}, {(0,-39.68504,68.0315),(0,-37.91339,71.75197),(0,-40.74803,71.75197),(0,-42.51969,68.0315)} },{ {(0,-39.68504,68.0315),(0,-37.91339,71.75197),(0,-40.74803,71.75197),(0,-42.51969,68.0315)}, {(-22.22362,-39.68504,68.0315),(-21.2315,-37.91339,71.75197),(-22.8189,-40.74803,71.75197),(-23.81102,-42.51969,68.0315)}, {(-39.68504,-22.22362,68.0315),(-37.91339,-21.2315,71.75197),(-40.74803,-22.8189,71.75197),(-42.51969,-23.81102,68.0315)}, {(-39.68504,0,68.0315),(-37.91339,0,71.75197),(-40.74803,0,71.75197),(-42.51969,0,68.0315)} },{ {(-39.68504,0,68.0315),(-37.91339,0,71.75197),(-40.74803,0,71.75197),(-42.51969,0,68.0315)}, {(-39.68504,22.22362,68.0315),(-37.91339,21.2315,71.75197),(-40.74803,22.8189,71.75197),(-42.51969,23.81102,68.0315)}, {(-22.22362,39.68504,68.0315),(-21.2315,37.91339,71.75197),(-22.8189,40.74803,71.75197),(-23.81102,42.51969,68.0315)}, {(0,39.68504,68.0315),(0,37.91339,71.75197),(0,40.74803,71.75197),(0,42.51969,68.0315)} },{ {(0,39.68504,68.0315),(0,37.91339,71.75197),(0,40.74803,71.75197),(0,42.51969,68.0315)}, {(22.22362,39.68504,68.0315),(21.2315,37.91339,71.75197),(22.8189,40.74803,71.75197),(23.81102,42.51969,68.0315)}, {(39.68504,22.22362,68.0315),(37.91339,21.2315,71.75197),(40.74803,22.8189,71.75197),(42.51969,23.81102,68.0315)}, {(39.68504,0,68.0315),(37.91339,0,71.75197),(40.74803,0,71.75197),(42.51969,0,68.0315)} },{ {(42.51969,0,68.0315),(49.60629,0,53.1496),(56.69291,0,38.26771),(56.69291,0,25.51181)}, {(42.51969,-23.81102,68.0315),(49.60629,-27.77952,53.1496),(56.69291,-31.74803,38.26771),(56.69291,-31.74803,25.51181)}, {(23.81102,-42.51969,68.0315),(27.77952,-49.60629,53.1496),(31.74803,-56.69291,38.26771),(31.74803,-56.69291,25.51181)}, {(0,-42.51969,68.0315),(0,-49.60629,53.1496),(0,-56.69291,38.26771),(0,-56.69291,25.51181)} },{ {(0,-42.51969,68.0315),(0,-49.60629,53.1496),(0,-56.69291,38.26771),(0,-56.69291,25.51181)}, {(-23.81102,-42.51969,68.0315),(-27.77952,-49.60629,53.1496),(-31.74803,-56.69291,38.26771),(-31.74803,-56.69291,25.51181)}, {(-42.51969,-23.81102,68.0315),(-49.60629,-27.77952,53.1496),(-56.69291,-31.74803,38.26771),(-56.69291,-31.74803,25.51181)}, {(-42.51969,0,68.0315),(-49.60629,0,53.1496),(-56.69291,0,38.26771),(-56.69291,0,25.51181)} },{ {(-42.51969,0,68.0315),(-49.60629,0,53.1496),(-56.69291,0,38.26771),(-56.69291,0,25.51181)}, {(-42.51969,23.81102,68.0315),(-49.60629,27.77952,53.1496),(-56.69291,31.74803,38.26771),(-56.69291,31.74803,25.51181)}, {(-23.81102,42.51969,68.0315),(-27.77952,49.60629,53.1496),(-31.74803,56.69291,38.26771),(-31.74803,56.69291,25.51181)}, {(0,42.51969,68.0315),(0,49.60629,53.1496),(0,56.69291,38.26771),(0,56.69291,25.51181)} },{ {(0,42.51969,68.0315),(0,49.60629,53.1496),(0,56.69291,38.26771),(0,56.69291,25.51181)}, {(23.81102,42.51969,68.0315),(27.77952,49.60629,53.1496),(31.74803,56.69291,38.26771),(31.74803,56.69291,25.51181)}, {(42.51969,23.81102,68.0315),(49.60629,27.77952,53.1496),(56.69291,31.74803,38.26771),(56.69291,31.74803,25.51181)}, {(42.51969,0,68.0315),(49.60629,0,53.1496),(56.69291,0,38.26771),(56.69291,0,25.51181)} },{ {(56.69291,0,25.51181),(56.69291,0,12.7559),(42.51969,0,6.377957),(42.51969,0,4.251961)}, {(56.69291,-31.74803,25.51181),(56.69291,-31.74803,12.7559),(42.51969,-23.81102,6.377957),(42.51969,-23.81102,4.251961)}, {(31.74803,-56.69291,25.51181),(31.74803,-56.69291,12.7559),(23.81102,-42.51969,6.377957),(23.81102,-42.51969,4.251961)}, {(0,-56.69291,25.51181),(0,-56.69291,12.7559),(0,-42.51969,6.377957),(0,-42.51969,4.251961)} },{ {(0,-56.69291,25.51181),(0,-56.69291,12.7559),(0,-42.51969,6.377957),(0,-42.51969,4.251961)}, {(-31.74803,-56.69291,25.51181),(-31.74803,-56.69291,12.7559),(-23.81102,-42.51969,6.377957),(-23.81102,-42.51969,4.251961)}, {(-56.69291,-31.74803,25.51181),(-56.69291,-31.74803,12.7559),(-42.51969,-23.81102,6.377957),(-42.51969,-23.81102,4.251961)}, {(-56.69291,0,25.51181),(-56.69291,0,12.7559),(-42.51969,0,6.377957),(-42.51969,0,4.251961)} },{ {(-56.69291,0,25.51181),(-56.69291,0,12.7559),(-42.51969,0,6.377957),(-42.51969,0,4.251961)}, {(-56.69291,31.74803,25.51181),(-56.69291,31.74803,12.7559),(-42.51969,23.81102,6.377957),(-42.51969,23.81102,4.251961)}, {(-31.74803,56.69291,25.51181),(-31.74803,56.69291,12.7559),(-23.81102,42.51969,6.377957),(-23.81102,42.51969,4.251961)}, {(0,56.69291,25.51181),(0,56.69291,12.7559),(0,42.51969,6.377957),(0,42.51969,4.251961)} },{ {(0,56.69291,25.51181),(0,56.69291,12.7559),(0,42.51969,6.377957),(0,42.51969,4.251961)}, {(31.74803,56.69291,25.51181),(31.74803,56.69291,12.7559),(23.81102,42.51969,6.377957),(23.81102,42.51969,4.251961)}, {(56.69291,31.74803,25.51181),(56.69291,31.74803,12.7559),(42.51969,23.81102,6.377957),(42.51969,23.81102,4.251961)}, {(56.69291,0,25.51181),(56.69291,0,12.7559),(42.51969,0,6.377957),(42.51969,0,4.251961)} },{ {(-45.35433,0,57.40157),(-65.19685,0,57.40157),(-76.53543,0,57.40157),(-76.53543,0,51.02362)}, {(-45.35433,-8.503932,57.40157),(-65.19685,-8.503932,57.40157),(-76.53543,-8.503932,57.40157),(-76.53543,-8.503932,51.02362)}, {(-42.51969,-8.503932,63.77952),(-70.86614,-8.503932,63.77952),(-85.03937,-8.503932,63.77952),(-85.03937,-8.503932,51.02362)}, {(-42.51969,0,63.77952),(-70.86614,0,63.77952),(-85.03937,0,63.77952),(-85.03937,0,51.02362)} },{ {(-42.51969,0,63.77952),(-70.86614,0,63.77952),(-85.03937,0,63.77952),(-85.03937,0,51.02362)}, {(-42.51969,8.503932,63.77952),(-70.86614,8.503932,63.77952),(-85.03937,8.503932,63.77952),(-85.03937,8.503932,51.02362)}, {(-45.35433,8.503932,57.40157),(-65.19685,8.503932,57.40157),(-76.53543,8.503932,57.40157),(-76.53543,8.503932,51.02362)}, {(-45.35433,0,57.40157),(-65.19685,0,57.40157),(-76.53543,0,57.40157),(-76.53543,0,51.02362)} },{ {(-76.53543,0,51.02362),(-76.53543,0,44.64566),(-70.86614,0,31.88976),(-56.69291,0,25.51181)}, {(-76.53543,-8.503932,51.02362),(-76.53543,-8.503932,44.64566),(-70.86614,-8.503932,31.88976),(-56.69291,-8.503932,25.51181)}, {(-85.03937,-8.503932,51.02362),(-85.03937,-8.503932,38.26771),(-75.11811,-8.503932,26.5748),(-53.85826,-8.503932,17.00787)}, {(-85.03937,0,51.02362),(-85.03937,0,38.26771),(-75.11811,0,26.5748),(-53.85826,0,17.00787)} },{ {(-85.03937,0,51.02362),(-85.03937,0,38.26771),(-75.11811,0,26.5748),(-53.85826,0,17.00787)}, {(-85.03937,8.503932,51.02362),(-85.03937,8.503932,38.26771),(-75.11811,8.503932,26.5748),(-53.85826,8.503932,17.00787)}, {(-76.53543,8.503932,51.02362),(-76.53543,8.503932,44.64566),(-70.86614,8.503932,31.88976),(-56.69291,8.503932,25.51181)}, {(-76.53543,0,51.02362),(-76.53543,0,44.64566),(-70.86614,0,31.88976),(-56.69291,0,25.51181)} },{ {(48.18897,0,40.3937),(73.70078,0,40.3937),(65.19685,0,59.52755),(76.53543,0,68.0315)}, {(48.18897,-18.70866,40.3937),(73.70078,-18.70866,40.3937),(65.19685,-7.086619,59.52755),(76.53543,-7.086619,68.0315)}, {(48.18897,-18.70866,17.00787),(87.87401,-18.70866,23.38582),(68.0315,-7.086619,57.40157),(93.5433,-7.086619,68.0315)}, {(48.18897,0,17.00787),(87.87401,0,23.38582),(68.0315,0,57.40157),(93.5433,0,68.0315)} },{ {(48.18897,0,17.00787),(87.87401,0,23.38582),(68.0315,0,57.40157),(93.5433,0,68.0315)}, {(48.18897,18.70866,17.00787),(87.87401,18.70866,23.38582),(68.0315,7.086619,57.40157),(93.5433,7.086619,68.0315)}, {(48.18897,18.70866,40.3937),(73.70078,18.70866,40.3937),(65.19685,7.086619,59.52755),(76.53543,7.086619,68.0315)}, {(48.18897,0,40.3937),(73.70078,0,40.3937),(65.19685,0,59.52755),(76.53543,0,68.0315)} },{ {(76.53543,0,68.0315),(79.37007,0,70.15748),(82.20472,0,70.15748),(79.37007,0,68.0315)}, {(76.53543,-7.086619,68.0315),(79.37007,-7.086619,70.15748),(82.20472,-4.251961,70.15748),(79.37007,-4.251961,68.0315)}, {(93.5433,-7.086619,68.0315),(99.92125,-7.086619,70.68897),(97.79527,-4.251961,71.22047),(90.70866,-4.251961,68.0315)}, {(93.5433,0,68.0315),(99.92125,0,70.68897),(97.79527,0,71.22047),(90.70866,0,68.0315)} },{ {(93.5433,0,68.0315),(99.92125,0,70.68897),(97.79527,0,71.22047),(90.70866,0,68.0315)}, {(93.5433,7.086619,68.0315),(99.92125,7.086619,70.68897),(97.79527,4.251961,71.22047),(90.70866,4.251961,68.0315)}, {(76.53543,7.086619,68.0315),(79.37007,7.086619,70.15748),(82.20472,4.251961,70.15748),(79.37007,4.251961,68.0315)}, {(76.53543,0,68.0315),(79.37007,0,70.15748),(82.20472,0,70.15748),(79.37007,0,68.0315)} },{ {(0,0,89.29133),(22.67716,0,89.29133),(0,0,80.7874),(5.669294,0,76.53543)}, {(0,0,89.29133),(22.67716,-12.7559,89.29133),(0,0,80.7874),(5.669294,-3.174809,76.53543)}, {(0,0,89.29133),(12.7559,-22.67716,89.29133),(0,0,80.7874),(3.174809,-5.669294,76.53543)}, {(0,0,89.29133),(0,-22.67716,89.29133),(0,0,80.7874),(0,-5.669294,76.53543)} },{ {(0,0,89.29133),(0,-22.67716,89.29133),(0,0,80.7874),(0,-5.669294,76.53543)}, {(0,0,89.29133),(-12.7559,-22.67716,89.29133),(0,0,80.7874),(-3.174809,-5.669294,76.53543)}, {(0,0,89.29133),(-22.67716,-12.7559,89.29133),(0,0,80.7874),(-5.669294,-3.174809,76.53543)}, {(0,0,89.29133),(-22.67716,0,89.29133),(0,0,80.7874),(-5.669294,0,76.53543)} },{ {(0,0,89.29133),(-22.67716,0,89.29133),(0,0,80.7874),(-5.669294,0,76.53543)}, {(0,0,89.29133),(-22.67716,12.7559,89.29133),(0,0,80.7874),(-5.669294,3.174809,76.53543)}, {(0,0,89.29133),(-12.7559,22.67716,89.29133),(0,0,80.7874),(-3.174809,5.669294,76.53543)}, {(0,0,89.29133),(0,22.67716,89.29133),(0,0,80.7874),(0,5.669294,76.53543)} },{ {(0,0,89.29133),(0,22.67716,89.29133),(0,0,80.7874),(0,5.669294,76.53543)}, {(0,0,89.29133),(12.7559,22.67716,89.29133),(0,0,80.7874),(3.174809,5.669294,76.53543)}, {(0,0,89.29133),(22.67716,12.7559,89.29133),(0,0,80.7874),(5.669294,3.174809,76.53543)}, {(0,0,89.29133),(22.67716,0,89.29133),(0,0,80.7874),(5.669294,0,76.53543)} },{ {(5.669294,0,76.53543),(11.33858,0,72.28346),(36.85039,0,72.28346),(36.85039,0,68.0315)}, {(5.669294,-3.174809,76.53543),(11.33858,-6.349609,72.28346),(36.85039,-20.63622,72.28346),(36.85039,-20.63622,68.0315)}, {(3.174809,-5.669294,76.53543),(6.349609,-11.33858,72.28346),(20.63622,-36.85039,72.28346),(20.63622,-36.85039,68.0315)}, {(0,-5.669294,76.53543),(0,-11.33858,72.28346),(0,-36.85039,72.28346),(0,-36.85039,68.0315)} },{ {(0,-5.669294,76.53543),(0,-11.33858,72.28346),(0,-36.85039,72.28346),(0,-36.85039,68.0315)}, {(-3.174809,-5.669294,76.53543),(-6.349609,-11.33858,72.28346),(-20.63622,-36.85039,72.28346),(-20.63622,-36.85039,68.0315)}, {(-5.669294,-3.174809,76.53543),(-11.33858,-6.349609,72.28346),(-36.85039,-20.63622,72.28346),(-36.85039,-20.63622,68.0315)}, {(-5.669294,0,76.53543),(-11.33858,0,72.28346),(-36.85039,0,72.28346),(-36.85039,0,68.0315)}, },{ {(-5.669294,0,76.53543),(-11.33858,0,72.28346),(-36.85039,0,72.28346),(-36.85039,0,68.0315)}, {(-5.669294,3.174809,76.53543),(-11.33858,6.349609,72.28346),(-36.85039,20.63622,72.28346),(-36.85039,20.63622,68.0315)}, {(-3.174809,5.669294,76.53543),(-6.349609,11.33858,72.28346),(-20.63622,36.85039,72.28346),(-20.63622,36.85039,68.0315)}, {(0,5.669294,76.53543),(0,11.33858,72.28346),(0,36.85039,72.28346),(0,36.85039,68.0315)} },{ {(0,5.669294,76.53543),(0,11.33858,72.28346),(0,36.85039,72.28346),(0,36.85039,68.0315)}, {(3.174809,5.669294,76.53543),(6.349609,11.33858,72.28346),(20.63622,36.85039,72.28346),(20.63622,36.85039,68.0315)}, {(5.669294,3.174809,76.53543),(11.33858,6.349609,72.28346),(36.85039,20.63622,72.28346),(36.85039,20.63622,68.0315)}, {(5.669294,0,76.53543),(11.33858,0,72.28346),(36.85039,0,72.28346),(36.85039,0,68.0315)}, },{ {(0,0,0),(40.3937,0,0),(42.51969,0,2.12598),(42.51969,0,4.251961)}, {(0,0,0),(40.3937,22.62047,0),(42.51969,23.81102,2.12598),(42.51969,23.81102,4.251961)}, {(0,0,0),(22.62047,40.3937,0),(23.81102,42.51969,2.12598),(23.81102,42.51969,4.251961)}, {(0,0,0),(0,40.3937,0),(0,42.51969,2.12598),(0,42.51969,4.251961)} },{ {(0,0,0),(0,40.3937,0),(0,42.51969,2.12598),(0,42.51969,4.251961)}, {(0,0,0),(-22.62047,40.3937,0),(-23.81102,42.51969,2.12598),(-23.81102,42.51969,4.251961)}, {(0,0,0),(-40.3937,22.62047,0),(-42.51969,23.81102,2.12598),(-42.51969,23.81102,4.251961)}, {(0,0,0),(-40.3937,0,0),(-42.51969,0,2.12598),(-42.51969,0,4.251961)} },{ {(0,0,0),(-40.3937,0,0),(-42.51969,0,2.12598),(-42.51969,0,4.251961)}, {(0,0,0),(-40.3937,-22.62047,0),(-42.51969,-23.81102,2.12598),(-42.51969,-23.81102,4.251961)}, {(0,0,0),(-22.62047,-40.3937,0),(-23.81102,-42.51969,2.12598),(-23.81102,-42.51969,4.251961)}, {(0,0,0),(0,-40.3937,0),(0,-42.51969,2.12598),(0,-42.51969,4.251961)} },{ {(0,0,0),(0,-40.3937,0),(0,-42.51969,2.12598),(0,-42.51969,4.251961)}, {(0,0,0),(22.62047,-40.3937,0),(23.81102,-42.51969,2.12598),(23.81102,-42.51969,4.251961)}, {(0,0,0),(40.3937,-22.62047,0),(42.51969,-23.81102,2.12598),(42.51969,-23.81102,4.251961)}, {(0,0,0),(40.3937,0,0),(42.51969,0,2.12598),(42.51969,0,4.251961)} } }; draw(surface(Q),blue,render(compression=Low)); ./asymptote-2.41/examples/gamma.asy0000644000175000017500000000067013064427076017164 0ustar norbertnorbertimport graph; size(300,IgnoreAspect); bool3 branch(real x) { static int lastsign=0; if(x <= 0 && x == floor(x)) return false; int sign=sgn(gamma(x)); bool b=lastsign == 0 || sign == lastsign; lastsign=sign; return b ? true : default; } draw(graph(gamma,-4,4,n=2000,branch),red); scale(false); xlimits(-4,4); ylimits(-6,6); crop(); xaxis("$x$",RightTicks(NoZero)); yaxis(LeftTicks(NoZero)); label("$\Gamma(x)$",(1,2),red); ./asymptote-2.41/examples/cheese.asy0000644000175000017500000000050213064427076017330 0ustar norbertnorbertimport graph3; import palette; import contour3; size(400); real f(real x, real y, real z) { return cos(x)*sin(y)+cos(y)*sin(z)+cos(z)*sin(x); } surface sf=surface(contour3(f,(-2pi,-2pi,-2pi),(2pi,2pi,2pi),12)); sf.colors(palette(sf.map(abs),Gradient(red,yellow))); currentlight=nolight; draw(sf,render(merge=true)); ./asymptote-2.41/examples/sacylinder.asy0000644000175000017500000000062013064427076020232 0ustar norbertnorbertimport graph; size(0,100); real r=1; real h=3; yaxis(dashed); real m=0.475*h; draw((r,0)--(r,h)); label("$L$",(r,0.5*h),E); real s=4; pair z1=(s,0); pair z2=z1+(2*pi*r,h); filldraw(box(z1,z2),lightgreen); pair zm=0.5*(z1+z2); label("$L$",(z1.x,zm.y),W); label("$2\pi r$",(zm.x,z2.y),N); draw("$r$",(0,m)--(r,m),N,red,Arrows); draw((0,1.015h),yscale(0.5)*arc(0,0.25cm,-250,70),red,ArcArrow); ./asymptote-2.41/examples/worksheet.asy0000644000175000017500000000166713064427076020124 0ustar norbertnorbertimport fontsize; defaultpen(Helvetica()); picture pic; unitsize(pic,mm); pair z=(0,0); real length=88; real height=8; pair step=height*S; label(pic,"Word Wall Spelling",z,Align); z += step; frame f; label(f,"Name:"); pair z0=(max(f).x,min(f).y); draw(f,z0--z0+50mm); add(pic,f,z,Align); z += step; for(int i=1; i <= 15; ++i) { draw(pic,z--z+length); z += step; draw(pic,z--z+length,dashed+gray); z += step; void label(int i) { label(pic,string(i)+".",z,0.2NE,fontsize(0.8*1.5*2*height*mm)+gray); } if(i <= 10) label(i); else if(i == 11) { pair z0=z+length/2; pen p=fontsize(20pt); label(pic,"Challenge Word",z0+N*height,I*Align.y,p+basealign); label(pic,"(optional)",z0,I*Align.y,p); } else if(i == 12) label(1); else if(i == 13) label(2); else if(i == 14) label(3); } draw(pic,z--z+length); add(pic.fit(),(0,0),W); add(pic.fit(),(0,0),E); newpage(); add(pic.fit(),(0,0),W); add(pic.fit(),(0,0),E); ./asymptote-2.41/examples/NURBSsphere.asy0000644000175000017500000000177413064427076020210 0ustar norbertnorbertimport three; /* Reference: @article{Qin97, title={{Representing quadric surfaces using NURBS surfaces}}, author={Qin, K.}, journal={Journal of Computer Science and Technology}, volume={12}, number={3}, pages={210--216}, year={1997}, publisher={Springer} } */ size(10cm); currentprojection=perspective(5,4,2,autoadjust=false); // udegree=2, vdegree=3, nu=3, nv=4; real[] W={2/3,1/3,1}; real[] w={1,1/3,1/3,1}; // 10 distinct control points triple[][] P={{(0,0,1),(-2,-2,1),(-2,-2,-1),(0,0,-1)}, {(0,0,1),(2,-2,1),(2,-2,-1),(0,0,-1)}, {(0,0,1),(2,2,1),(2,2,-1),(0,0,-1)}, {(0,0,1),(-2,2,1),(-2,2,-1),(0,0,-1)}}; P.cyclic=true; real[][] weights=new real[3][4]; for(int i=0; i < 3; ++i) for(int j=0; j < 4; ++j) weights[i][j]=W[i]*w[j]; real[] uknot={0,0,1/3,1/2,1,1}; real[] vknot={0,0,0,0,1,1,1,1}; int N=1; for(int k=0; k < N; ++k) for(int i=0; i < 4; ++i) draw(shift(k*Z)*P[i:i+3],uknot,vknot,weights,blue); // draw(unitsphere,red+opacity(0.1)); ./asymptote-2.41/examples/equilchord.asy0000644000175000017500000000104513064427076020236 0ustar norbertnorbertimport graph3; size(0,150); currentprojection=perspective(5,-4,6); currentlight=(-1,-1,2); real t=0.5; real F(pair z) { return (z.x^2+z.y^2 <= 1) ? sqrt(3)*(sqrt(1-z.x^2)-abs(z.y)) : 0; } real a=1.5; draw((-a,-a,0)--(-a,a,0)--(a,a,0)--(a,-a,0)--cycle,lightgray); xaxis3(Label("$x$",1),red,Arrow3); yaxis3(Label("$y$",1),red,Arrow3); draw(circle((0,0,0),1),dashed); draw(surface(F,(-1,-1),(t,1),20,monotonic),green,black,render(merge=true)); real y=sqrt(1-t^2); draw((t,y,0)--(t,-y,0)--(t,0,sqrt(3)*y)--cycle,blue); label("$1$",(1,0,0),-Y+X); ./asymptote-2.41/examples/spiral.asy0000644000175000017500000000032213064427076017366 0ustar norbertnorbertsize(0,150); import graph; real f(real t) {return exp(-t/(2pi));} draw(polargraph(f,0,20*pi,operator ..)); xaxis("$x$",-infinity,1.3); yaxis("$y$",-infinity,1); labelx(1); labelx("$e^{-1}$",1.0/exp(1),SE); ./asymptote-2.41/examples/fillcontour.asy0000644000175000017500000000107613064427076020443 0ustar norbertnorbertimport graph; import palette; import contour; size(12cm,IgnoreAspect); pair a=(pi/2,0); pair b=(3pi/2,2pi); real f(real x, real y) {return cos(x)*sin(y);} int N=100; int Divs=10; defaultpen(1bp); bounds range=bounds(-1,1); real[] Cvals=uniform(range.min,range.max,Divs); guide[][] g=contour(f,a,b,Cvals,N,operator --); pen[] Palette=quantize(Rainbow(),Divs); pen[][] interior=interior(g,extend(Palette,grey,black)); fill(g,interior); draw(g); palette("$f(x,y)$",range,point(SE)+(0.5,0),point(NE)+(1,0),Right,Palette, PaletteTicks("$%+#0.1f$",N=Divs)); ./asymptote-2.41/examples/xxsq01.asy0000644000175000017500000000134713064427076017250 0ustar norbertnorbertimport graph3; import solids; size(0,150); currentprojection=perspective(0,0,10,up=Y); pen color=green; real alpha=250; real f(real x) {return x^2;} pair F(real x) {return (x,f(x));} triple F3(real x) {return (x,f(x),0);} path p=graph(F,0,1,n=10,operator ..)--cycle; path3 p3=path3(p); revolution a=revolution(p3,X,-alpha,0); render render=render(compression=0,merge=true); draw(surface(a),color,render); surface s=surface(p); draw(s,color,render); draw(rotate(-alpha,X)*s,color,render); draw(p3,blue); xaxis3(Label("$x$",1),xmax=1.25,dashed,Arrow3); yaxis3(Label("$y$",1),Arrow3); dot(Label("$(1,1)$"),(1,1,0),X+Y); arrow("$y=x$",(0.7,0.7,0),Y,0.75cm,red); arrow("$y=x^2$",F3(0.7),X,0.75cm,red); draw(arc(1.1X,0.3,90,90,3,-90),Arrow3); ./asymptote-2.41/examples/curvedlabel3.asy0000644000175000017500000000107513064427076020455 0ustar norbertnorbertsize(200); import labelpath3; path3 g=(1,0,0)..(0,1,1)..(-1,0,0)..(0,-1,1)..cycle; path3 g2=shift(-Z)*reverse(unitcircle3); string txt1="\hbox{This is a test of \emph{curved} 3D labels in \textbf{Asymptote} (implemented with {\tt texpath}).}"; string txt2="This is a test of curved labels in Asymptote\\(implemented without the {\tt PSTricks pstextpath} macro)."; draw(surface(g),paleblue+opacity(0.5)); draw(labelpath(txt1,subpath(g,0,reltime(g,0.95)),angle=-90),orange); draw(g2,1bp+red); draw(labelpath(txt2,subpath(g2,0,3.9),angle=180,optional=rotate(-70,X)*Z)); ./asymptote-2.41/examples/progrid.asy0000644000175000017500000000007213064427076017544 0ustar norbertnorbertlabel("$\displaystyle X_i = \sum_{j=1}^{N} a_{ij} f_j$"); ./asymptote-2.41/examples/lever.asy0000644000175000017500000000071413064427076017216 0ustar norbertnorbertsize(200,0); pair z0=(0,0); pair z1=(2,0); pair z2=(5,0); pair zf=z1+0.75*(z2-z1); draw(z1--z2); dot(z1,red+0.15cm); dot(z2,darkgreen+0.3cm); label("$m$",z1,1.2N,red); label("$M$",z2,1.5N,darkgreen); label("$\hat{\ }$",zf,0.2*S,fontsize(24pt)+blue); pair s=-0.2*I; draw("$x$",z0+s--z1+s,N,red,Arrows,Bars,PenMargins); s=-0.5*I; draw("$\bar{x}$",z0+s--zf+s,blue,Arrows,Bars,PenMargins); s=-0.95*I; draw("$X$",z0+s--z2+s,darkgreen,Arrows,Bars,PenMargins); ./asymptote-2.41/examples/animations/0000755000175000017500000000000013064427076017523 5ustar norbertnorbert./asymptote-2.41/examples/animations/dice.u3d0000644000175000017500000047164013064427076021060 0ustar norbertnorbertU3DRx sj CreatedBy"3dif.x3d 4.0.17.1382 (3.5.10.1242)RHAdobeUnitsMeters0ÿÿÿÿÿÿtobject0!ÿÿÿOobject0€?€?€?€?ÿÿÿt_dice!ÿÿÿT_diceobject0€?€?€?€?ÿÿÿ¸object44"ÿÿÿcobject44_dice€?€?€?€?object44Eÿÿÿ$object44Materialÿÿÿ|_sphere0!ÿÿÿW_sphere0object0€?€?€?€?ÿÿÿÀobject42"ÿÿÿfobject42_sphere0€?€?€?À@€À€?object42Eÿÿÿ%object42 Material1ÿÿÿ€ _sphere0_0!ÿÿÿY _sphere0_0object0€?€?€?€?ÿÿÿÀobject40"ÿÿÿhobject40 _sphere0_0€?€?€?@À€À€?object40Eÿÿÿ%object40 Material1ÿÿÿ€ _sphere0_1!ÿÿÿY _sphere0_1object0€?€?€?€?ÿÿÿÀobject38"ÿÿÿhobject38 _sphere0_1€?€?€?À@€@€?object38Eÿÿÿ%object38 Material2ÿÿÿ„ _sphere0_0_1!ÿÿÿ[ _sphere0_0_1object0€?€?€?€?ÿÿÿÄobject36"ÿÿÿjobject36 _sphere0_0_1€?€?€?@À€@€?object36Eÿÿÿ%object36 Material2ÿÿÿ„ _sphere0_1_2!ÿÿÿ[ _sphere0_1_2object0€?€?€?€?ÿÿÿÄobject34"ÿÿÿjobject34 _sphere0_1_2€?€?€?€@€?object34Eÿÿÿ%object34 Material2ÿÿÿ„ _sphere0_1_3!ÿÿÿ[ _sphere0_1_3object0€?€?€?€?ÿÿÿÄobject32"ÿÿÿjobject32 _sphere0_1_3€?€?€?€À@À?€?object32Eÿÿÿ%object32 Material3ÿÿÿˆ_sphere0_0_1_3!ÿÿÿ]_sphere0_0_1_3object0€?€?€?€?ÿÿÿÄobject30"ÿÿÿlobject30_sphere0_0_1_3€?€?€?€À@À¿€?object30Eÿÿÿ%object30 Material3ÿÿÿˆ_sphere0_1_3_4!ÿÿÿ]_sphere0_1_3_4object0€?€?€?€?ÿÿÿÄobject28"ÿÿÿlobject28_sphere0_1_3_4€?€?€?€ÀÀ?€?object28Eÿÿÿ%object28 Material3ÿÿÿŒ_sphere0_0_1_3_4!ÿÿÿ__sphere0_0_1_3_4object0€?€?€?€?ÿÿÿÈobject26"ÿÿÿnobject26_sphere0_0_1_3_4€?€?€?€ÀÀÀ¿€?object26Eÿÿÿ%object26 Material3ÿÿÿŒ_sphere0_1_2_3_4!ÿÿÿ__sphere0_1_2_3_4object0€?€?€?€?ÿÿÿÈobject24"ÿÿÿnobject24_sphere0_1_2_3_4€?€?€?€ÀÀÀ?€?object24Eÿÿÿ%object24 Material3ÿÿÿ_sphere0_1_2_3_5_6!ÿÿÿa_sphere0_1_2_3_5_6object0€?€?€?€?ÿÿÿÈobject22"ÿÿÿpobject22_sphere0_1_2_3_5_6€?€?€?€@€?object22Eÿÿÿ%object22 Material4ÿÿÿ_sphere0_1_2_3_5_7!ÿÿÿa_sphere0_1_2_3_5_7object0€?€?€?€?ÿÿÿÈobject20"ÿÿÿpobject20_sphere0_1_2_3_5_7€?€?€?@€@À€?object20Eÿÿÿ%object20 Material4ÿÿÿ”_sphere0_1_2_3_5_6_7!ÿÿÿc_sphere0_1_2_3_5_6_7object0€?€?€?€?ÿÿÿÌobject18"ÿÿÿrobject18_sphere0_1_2_3_5_6_7€?€?€?@€@@€?object18Eÿÿÿ%object18 Material4ÿÿÿ”_sphere0_1_2_3_5_7_8!ÿÿÿc_sphere0_1_2_3_5_7_8object0€?€?€?€?ÿÿÿÌobject16"ÿÿÿrobject16_sphere0_1_2_3_5_7_8€?€?€?À€ÀÀ€?object16Eÿÿÿ%object16 Material5ÿÿÿ˜_sphere0_1_2_3_5_6_7_8!ÿÿÿe_sphere0_1_2_3_5_6_7_8object0€?€?€?€?ÿÿÿÌobject14"ÿÿÿtobject14_sphere0_1_2_3_5_6_7_8€?€?€?À€À@€?object14Eÿÿÿ%object14 Material5ÿÿÿ”_sphere0_1_2_3_5_7_9!ÿÿÿc_sphere0_1_2_3_5_7_9object0€?€?€?€?ÿÿÿÌobject12"ÿÿÿrobject12_sphere0_1_2_3_5_7_9€?€?€?@€ÀÀ€?object12Eÿÿÿ%object12 Material5ÿÿÿ˜_sphere0_1_2_3_5_6_7_9!ÿÿÿe_sphere0_1_2_3_5_6_7_9object0€?€?€?€?ÿÿÿÌobject10"ÿÿÿtobject10_sphere0_1_2_3_5_6_7_9€?€?€?@€À@€?object10Eÿÿÿ%object10 Material5ÿÿÿ˜_sphere0_1_2_3_5_7_8_9!ÿÿÿe_sphere0_1_2_3_5_7_8_9object0€?€?€?€?ÿÿÿÈobject8"ÿÿÿrobject8_sphere0_1_2_3_5_7_8_9€?€?€?À€@À€?object8Eÿÿÿ$object8 Material4ÿÿÿœ_sphere0_1_2_3_5_6_7_8_9!ÿÿÿg_sphere0_1_2_3_5_6_7_8_9object0€?€?€?€?ÿÿÿÈobject6"ÿÿÿtobject6_sphere0_1_2_3_5_6_7_8_9€?€?€?À€@@€?object6Eÿÿÿ$object6 Material4ÿÿÿŒ_sphere0_1_3_10!ÿÿÿ^_sphere0_1_3_10object0€?€?€?€?ÿÿÿÀobject4"ÿÿÿkobject4_sphere0_1_3_10€?€?€?€@€?object4Eÿÿÿ$object4 Material6ÿÿÿŒ_sphere0_1_3_4_12!ÿÿÿ`_sphere0_1_3_4_12object0€?€?€?€?ÿÿÿÄobject2"ÿÿÿmobject2_sphere0_1_3_4_12€?€?€?€ÀÀ¿€?object2Eÿÿÿ$object2 Material3ÿÿÿŒ AmbientLight#ÿÿÿb AmbientLight€?€?€?€? AmbientLightÿÿÿœobject441ÿÿÿvobject44 èèèسÝ7€8€8€8€8Êh?¿\|?ÿÿÿœobject421ÿÿÿvobject42àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject401ÿÿÿvobject40àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject381ÿÿÿvobject38àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject361ÿÿÿvobject36àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject341ÿÿÿvobject34àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject321ÿÿÿvobject32àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject301ÿÿÿvobject30àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject281ÿÿÿvobject28àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject261ÿÿÿvobject26àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject241ÿÿÿvobject24àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject221ÿÿÿvobject22àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject201ÿÿÿvobject20àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject181ÿÿÿvobject18àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject161ÿÿÿvobject16àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject141ÿÿÿvobject14àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject121ÿÿÿvobject12àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject101ÿÿÿvobject10àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject81ÿÿÿuobject8àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject61ÿÿÿuobject6àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject41ÿÿÿuobject4àrr™rrèèè€6€8€8€8€8Êh?¿\|?ÿÿÿœobject21ÿÿÿuobject2àrr™rrèèè€6€8€8€8€8Êh?¿\|?Sÿÿÿ0MaterialMaterialSÿÿÿ2 Material1 Material1Sÿÿÿ2 Material2 Material2Sÿÿÿ2 Material3 Material3Sÿÿÿ2 Material4 Material4Sÿÿÿ2 Material5 Material5Sÿÿÿ2 Material6 Material6TÿÿÿFMaterial?òðð=òðð=òðð=ÂÀ@?ÂÀ@?ÂÀ@?ÂÀ@?ÂÀ@?ÂÀ@?ÍÌL>€?TÿÿÿG Material1?ÍÌL>ÍÌL>ÍÌL>ÍÌL>ÍÌL?ÍÌL>ÍÌL>ÍÌL>ÍÌL>9Q¼>€?TÿÿÿG Material2?ÍÌL>ÍÌL>ÍÌL>€??ÍÌL?ÍÌL>ÍÌL>ÍÌL>9Q¼>€?TÿÿÿG Material3?ÍÌL>ÍÌL>ÍÌL>š™™>š™™>€?ÍÌL>ÍÌL>ÍÌL>9Q¼>€?TÿÿÿG Material4?ÍÌL>ÍÌL>ÍÌL>€?€?ÍÌL>ÍÌL>ÍÌL>9Q¼>€?TÿÿÿG Material5?ÍÌL>ÍÌL>ÍÌL>€?ÍÌL>ÍÌL>ÍÌL>9Q¼>€?TÿÿÿG Material6?ÍÌL>ÍÌL>ÍÌL>€?€?ÍÌL>ÍÌL>ÍÌL>9Q¼>€?Qÿÿÿ7 AmbientLightÍÌL>ÍÌL>ÍÌL>€?€?4C€?ÿÿÿ;ÿÿÿ=object44 €À€@€@€À€@€À€@€@€À€@€@€@€À€À€@€À€À€À€@€À€À€@€À€@€?€?€¿€¿€?€¿€?€?€?€?€?Á©hŠû«$±º«—ÚˆäòM°l5§Ažr“ZQÍ«Ÿ;ÿÿÿRobject42àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=>@>€> >À>à>?? ?0?@?P?`?p?€?>€=>>>@>>€>> >>À>>à>>?>?> ?>0?>@?>P?>`?>p?>€?>€>€=€>>€>@>€>€>€> >€>À>€>à>€>?€>?€> ?€>0?€>@?€>P?€>`?€>p?€>€?€>À>€=À>>À>@>À>€>À> >À>À>À>à>À>?À>?À> ?À>0?À>@?À>P?À>`?À>p?À>€?À>?€=?>?@>?€>? >?À>?à>????? ??0??@??P??`??p??€?? ?€= ?> ?@> ?€> ? > ?À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>@?@>@?€>@? >@?À>@?à>@??@??@? ?@?0?@?@?@?P?@?`?@?p?@?€?@?`?€=`?>`?@>`?€>`? >`?À>`?à>`??`??`? ?`?0?`?@?`?P?`?`?`?p?`?€?`?€?€=€?>€?@>€?€>€? >€?À>€?à>€??€??€? ?€?0?€?@?€?P?€?`?€?p?€?€?€?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject40àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿ €= > @>€>  >À> à> ?? ?0? @? P?`?p?€? > €=>>>@>>€>>  >> À>>à>>/?>?> ?> 0?>@?>P?>`?> p?> €?>€>€=€>>€> @>€> €>€> >€>À>€>à>€> ?€> ?€> ?€>0?€>@?€> P?€> `?€>p?€>€?€>À> €=À> >À>@>À>€>À> >À> À>À> à>À>?À>?À> ?À> 0?À> @?À>P?À> `?À>p?À> €?À> ?€=?">?@>? €>?  >?À>?$à>??? ?? ??0??&@??P?? `?? p??€??( ?€= ? > ? @> ?€> ?* > ?À> ? à> ? ? ?? ?, ? ?0? ? @? ? P? ?`? ?.p? ?€? ? @? €=@?>@?O@>@?€>@?  >@? À>@?à>@?2?@??@? ?@? 0?@?@?@?4P?@?`?@? p?@? €?@?`?6€=`?>`? @>`? €>`? >`?8À>`?à>`? ?`? ?`? ?`?:0?`?@?`? P?`? `?`?p?`?<€?`?€? €=€? >€?@>€?>€>€? >€? À>€? à>€??€?@?€? ?€? 0?€? @?€?P?€?B`?€?p?€? €?€? Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject38àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿i€=Z>Z@>k€>\ >\À>mà>^?^?o ?`0?`@?bP?b`?qp?f€?f>q€=>j>>j@>>q€>>n >>nÀ>>qà>> ?>?> ?>$øô 0?>@?>P?>`?>p?>$øô €?>€>€=€>>€>@>€>$øô €>€> >€>À>€>à>€>?€>$øô ?€> ?€>0?€>@?€>P?€>$øô `?€>p?€>€?€>À>€=À>$øô >À>@>À>€>À> >À>À>À>$øô à>À>?À>?À> ?À>0?À>$øô @?À>P?À>`?À>p?À>€?À>$øô ?€=?>?@>?€>?$øô  >?À>?à>?????$øô ??0??@??P??`??$øô p??€?? ?€= ?> ?$øô @> ?€> ? > ?À> ?à> ?$øô ? ?? ? ? ?0? ?@? ?$øô P? ?`? ?p? ?€? ?@?$øô €=@?>@?@>@?€>@? >@?$øô À>@?à>@??@??@? ?@?$øô 0?@?@?@?P?@?`?@?p?@?$øô €?@?`?€=`?>`?@>`?$øô €>`? >`?À>`?à>`??`?$øô ?`? ?`?0?`?@?`?P?`?$øô `?`?p?`?€?`?€?€=€?$øô >€?@>€?€>€? >€?À>€?$øô à>€??€??€? ?€?0?€?$øô @?€?P?€?`?€?p?€?€?€?$øô Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject36àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=$øô >@>€> >À>$øô à>?? ?0?$øô @?P?`?p?€?$øô >€=>>>@>>€>>$øô  >>À>>à>>?>?>$øô ?>0?>@?>P?>`?>$øô p?>€?>€>€=€>>€>$øô @>€>€>€> >€>À>€>à>€>$øô ?€>?€> ?€>0?€>@?€>$øô P?€>`?€>p?€>€?€>À>$øô €=À>>À>@>À>€>À> >À>hÀ>À>à>À>?À>?À> ?À>0?À>@?À>P?À>`?À>p?À>€?À>?€=?>?@>?€>? >?À>?>à>?>??>??> ??>0??>@??>P??>`??>p??>€??> ?>€= ?>> ?>@> ?>€> ?> > ?>À> ?€>à> ?€>? ?€>? ?€> ? ?€>0? ?€>@? ?€>P? ?€>`? ?€>p? ?€>€? ?€>@?€>€=@?€>>@?€>@>@?€>€>@?€> >@?€>À>@?À>à>@?À>?@?À>?@?À> ?@?À>0?@?À>@?@?À>P?@?À>`?@?À>p?@?À>€?@?À>`?À>€=`?À>>`?À>@>`?À>€>`?À> >`?À>À>`??à>`???`???`?? ?`??0?`??@?`??P?`??`?`??p?`??€?`??€??€=€??>€??@>€??€>€?? >€??À>€? ?à>€? ??€? ??€? ? ?€? ?0?€? ?@?€? ?P?€? ?`?€? ?p?€? ?€?€? ?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject34àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿2€=#>#@>4€>% >%À>6à>'?'?8 ?)0?)@?:P?+`?+p?<€?->-€=>>>>/@>>/€>>@ >>!À>>1à>>B?>3?>3 ?>D0?>5@?>5P?>F`?>7p?>7€?>H€>9€=€>9>€>J@>€>;€>€>; >€>LÀ>€>=à>€>=?€>N?€>? ?€>?0?€>P@?€>1P?€>A`?€>Rp?€>C€?€>CÀ>T€=À>E>À>E@>À>V€>À>G >À>GÀ>À>Xà>À>I?À>I?À>Z ?À>K0?À>K@?À>\P?À>M`?À>Mp?À>^€?À>O?O€=?`>?A@>?Q€>?b >?SÀ>?Sà>?d??U??U ??f0??W@??WP??h`??Yp??Y€??j ?[€= ?[> ?l@> ?]€> ?] > ?nÀ> ?_à> ?_? ?p? ?Q ? ?q0? ?d@? ?dP? ?q`? ?hp? ?h€? ?q@?l€=@?l>@?q@>@?p€>@?p >@?Pû À>@?^ƒl?à>@?Ô‹Š>?@?ôµ>?@?^ƒl? ?@?Õ‹Š¾0?@?ö>@?@?^ƒl?P?@?Ö‹Š¾`?@?òµ¾p?@?^ƒl?€?@?Ö‹Š>`?ö¾€=`?ó5?>`?ÿÿÿ>@>`?u='?€>`?ó5? >`?¿À>`?Ó‹Š>à>`?ó5??`?¿?`?s='¿ ?`?ó5?0?`??@?`?Ì‹Š¾P?`?ïÃ>`?`?t='?p?`?y‚Z?€?`?ïÃ>€?u='¿€=€?òµ>>€?ïÃ>@>€?w='¿€>€?w‚Z¿ >€?ïÃ>À>€?v='?à>€?éµ¾?€?.½;³?€?ó5? ?€?_ƒl?0?€?.½;³@?€?ô5¿P?€?ïÃ>`?€?.½;³p?€?ö5¿€?€?]ƒl¿Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject32àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿…ýG2€=zmh?>e>@>ÆaÊ>€>zmh? >©Ÿ¾À>ŸÂ>à>zmh??e¾?Äaʾ ?zmh?0?©Ÿ>@?™Â¾P?6%5?`?°|ü>p?Ž(?€?6%5?>„Ž¿€=>õ†>>>6%5?@>>°|ü¾€>>(¿ >>5%5?À>>„Ž?à>>ñ†¾?>è,Ä>?>EQ&? ?>tðZ?0?>è,Ä>@?>R(¿P?>‹ª²>`?>è,Ä>p?>GQ&¿€?>rðZ¿€>è,Ä>€=€>U(?>€>‡ª²¾@>€> !›2€>€>ô5? >€>_ƒl?À>€>mJ±2à>€>ô5¿?€>ïÃ>?€>»sÇ2 ?€>ö5¿0?€>^ƒl¿@?€>mJ±2P?€>ö5?`?€>ïþp?€>ê,ľ€?€>S(?À>AûY?€=À>ì,ľ>À>EQ&¿@>À>rJ·>€>À>ì,ľ >À>T(¿À>À>@ûY¿à>À>ì,ľ?À>FQ&??À>jJ·¾ ?À>6%5¿0?À>ƒŽ?@?À>‡6&?P?À>6%5¿`?À>°|ü¾p?À>UÄŽ>€?À>6%5¿?„Ž¿€=?†6&¿>?6%5¿@>?°|ü>€>?QÄŽ¾ >?zmh¿À>?©Ÿ>à>?8”Á>??zmh¿??e¾ ??·C9>0??zmh¿@??©Ÿ¾P??7”Á¾`??zmh¿p??e>€??³C9¾ ?€¿€= ?xø > ?@> ?€> ? > ?À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>>@?>@>@?>€>@?> >@?>À>@?>à>@?>?@?>?@?> ?@?>0?@?>@?@?>P?@?>`?@?>p?@?>€?@?>`?>€=`?€>>`?€>@>`?€>€>`?€> >`?€>À>`?€>à>`?€>?`?€>?`?€> ?`?€>0?`?€>@?`?€>P?`?€>`?`?€>p?`?€>€?`?€>€?€>€=€?À>>€?À>@>€?À>€>€?À> >€?À>À>€?À>à>€?À>?€?À>?€?À> ?€?À>0?€?À>@?€?À>P?€?À>`?€?À>p?€?À>€?€?À>Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject30àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=>@>€> >À>à>?? ?0?@?P?`?p?€?>€=>>>@>>€>> >>À>>à>>?>?> ?>0?>@?>P?>`?>p?>€?>€>€=€>>€>@>€>€>€> >€>À>€>à>€>?€>?€> ?€>0?€>@?€>P?€>`?€>p?€>€?€>À>€=À>>À>@>À>€>À> >À>À>À>à>À>?À>?À> ?À>0?À>@?À>P?À>`?À>p?À>€?À>?€=?>?@>?€>? >?À>?à>????? ??0??@??P??`??p??€?? ?€= ?> ?@> ?€> ? > ?À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>@?@>@?€>@? >@?À>@?à>@??@??@? ?@?0?@?@?@?P?@?`?@?p?@?€?@?`?€=`?>`?@>`?€>`? >`?À>`?à>`??`??`? ?`?0?`?@?`?P?`?`?`?p?`?€?`?€?€=€?>€?@>€?€>€? >€?À>€?à>€??€??€? ?€?0?€?@?€?P?€?`?€?p?€?€?€?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject28àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=>$øô @>€> >À>à>$øô ?? ?0?@?$øô P?`?p?€?>$øô €=>>>@>>€>> >>$øô À>>à>>?>?> ?>$øô 0?>@?>P?>`?>p?>$øô €?>€>€=€>>€>@>€>$øô €>€> >€>À>€>à>€>?€>$øô ?€> ?€>0?€>@?€>P?€>$øô `?€>p?€>€?€>À>€=À>$øô >À>@>À>€>À> >À>À>À>$øô à>À>?À>?À> ?À>0?À>$øô @?À>P?À>`?À>p?À>€?À>$øô ?€=?>?@>?€>?$øô  >?À>?à>?????$øô ??0??@??P??`??$øô p??€?? ?€= ?> ?$øô @> ?€> ? > ?À> ?à> ?$øô ? ?? ? ? ?0? ?@? ?$øô P? ?`? ?p? ?€? ?@?$øô €=@?>@?@>@?€>@? >@?$øô À>@?à>@??@??@? ?@?$øô 0?@?@?@?P?@?`?@?p?@?$øô €?@?`?€=`?>`?@>`?$øô €>`? >`?À>`?à>`??`?$øô ?`? ?`?0?`?@?`?P?`?$øô `?`?p?`?€?`?€?€=€?$øô >€?@>€?€>€? >€?À>€?à>€?…ýG2?€?zmh??€?e> ?€?ÆaÊ>0?€?zmh?@?€?©Ÿ¾P?€?ŸÂ>`?€?zmh?p?€?e¾€?€?ÄaʾÈðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject26àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿áJÖ>€=·C9>>zmh?@>w¸¼€>8”Á> >zmh?À>áJÖ¾à>´C9¾?zmh??T¸< ?8”Á¾0?zmh?@?Èà4?P?WÄŽ>`?5%5?p?ùï¼€?‡6&?>5%5?€=>Èà4¿>>QÄŽ¾@>>7%5?€>>jï< >>‡6&¿À>>5%5?à>>µul??>rJ·>?>é,Ä> ?>õ- »0?>AûY?@?>è,Ä>P?>µul¿`?>kJ·¾p?>ë,Ä>€?>©, ;€>CûY¿€=€>é,Ä>>€>€?@>€>ïÃ>€>€>!!›² >€>mJ1³À>€>^ƒl?à>€>¼sDz?€>€¿?€>ïþ ?€> !›²0?€>WÆó³@?€>^ƒl¿P?€>Ó÷„²`?€>´ul?p?€>Žª²>€?€>ë,ľÀ>®- ;€=À>rðZ?>À>ë,ľ@>À>µul¿€>À>ˆª²¾ >À>ë,ľÀ>À>ã. »à>À>rðZ¿?À>ë,ľ?À>Èà4? ?À>÷†>0?À>6%5¿@?À>Ÿï<P?À>Ž(?`?À>6%5¿p?À>Èà4¿€?À>ó†¾?6%5¿€=?7ð¼>?Ž(¿@>?6%5¿€>?ãJÖ> >? Â>À>?zmh¿à>?n¸<??ÅaÊ>??zmh¿ ??ãJÖ¾0??›Â¾@??zmh¿P??¦¸¼`??Çaʾp??zmh¿€??¬èC± ?€= ?> ?@> ?$øô €> ? > ?À> ?à> ?? ?$øô ? ? ? ?0? ?@? ?P? ?$øô `? ?p? ?€? ?@?€=@?$øô >@?@>@?€>@? >@?À>@?$øô à>@??@??@? ?@?0?@?$øô @?@?P?@?`?@?p?@?€?@?$øô `?€=`?>`?@>`?€>`?$øô  >`?À>`?à>`??`??`?$øô ?`?0?`?@?`?P?`?`?`?$øô p?`?€?`?€?€=€?>€?$øô @>€?€>€? >€?À>€?à>€?$øô ?€??€? ?€?0?€?@?€?$øô P?€?`?€?p?€?€?€?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject24àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=>@>€> >À>à>?? ?0?@?P?`?p?€?>€=>>>@>>€>> >>À>>à>>?>?> ?>0?>@?>P?>`?>p?>€?>€>€=€>>€>@>€>€>€> >€>À>€>à>€>?€>?€> ?€>0?€>@?€>P?€>`?€>p?€>€?€>À>€=À>>À>@>À>€>À> >À>À>À>à>À>?À>?À> ?À>0?À>@?À>P?À>`?À>p?À>€?À>?€=?>?@>?€>? >?À>?à>????? ??0??@??P??`??p??€?? ?€= ?> ?@> ?€> ? > ?À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>@?@>@?€>@? >@?À>@?à>@??@??@? ?@?0?@?@?@?P?@?`?@?p?@?€?@?`?€=`?>`?@>`?€>`? >`?À>`?à>`??`??`? ?`?0?`?@?`?P?`?`?`?p?`?€?`?€?€=€?>€?@>€?€>€? >€?À>€?à>€??€??€? ?€?0?€?@?€?P?€?`?€?p?€?€?€?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject22àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=>@>€> >À>à>?? ?0?@?P?`?p?€?>€=>>>@>>€>> >>À>>à>>?>?> ?>0?>@?>P?>`?>p?>€?>€>€=€>>€>@>€>€>€> >€>À>€>à>€>?€>?€> ?€>0?€>@?€>P?€>`?€>p?€>€?€>À>€=À>>À>@>À>€>À> >À>À>À>à>À>?À>?À> ?À>0?À>@?À>P?À>`?À>p?À>€?À>?€=?>?@>?€>? >?À>?à>????? ??0??@??P??`??p??€?? ?€= ?> ?@> ?€> ? > ?À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>@?@>@?€>@? >@?À>@?à>@??@??@? ?@?0?@?@?@?P?@?`?@?p?@?€?@?`?€=`?>`?@>`?€>`? >`?À>`?à>`??`??`? ?`?0?`?@?`?P?`?`?`?p?`?€?`?€?€=€?>€?@>€?€>€? >€?À>€?à>€??€??€? ?€?0?€?@?€?P?€?`?€?p?€?€?€?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject20àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿áJÖ>€=·C9>>zmh?@>w¸¼€>8”Á> >zmh?À>áJÖ¾à>´C9¾?zmh??T¸< ?8”Á¾0?zmh?@?Èà4?P?WÄŽ>`?5%5?p?ùï¼€?‡6&?>5%5?€=>Èà4¿>>QÄŽ¾@>>7%5?€>>jï< >>‡6&¿À>>5%5?à>>µul??>rJ·>?>é,Ä> ?>õ- »0?>AûY?@?>è,Ä>P?>µul¿`?>kJ·¾p?>ë,Ä>€?>©, ;€>CûY¿€=€>é,Ä>>€>€?@>€>ïÃ>€>€>!!›² >€>mJ1³À>€>^ƒl?à>€>¼sDz?€>€¿?€>ïþ ?€> !›²0?€>WÆó³@?€>^ƒl¿P?€>Ó÷„²`?€>´ul?p?€>Žª²>€?€>ë,ľÀ>®- ;€=À>rðZ?>À>ë,ľ@>À>µul¿€>À>ˆª²¾ >À>ë,ľÀ>À>ã. »à>À>rðZ¿?À>ë,ľ?À>Èà4? ?À>÷†>0?À>6%5¿@?À>Ÿï<P?À>Ž(?`?À>6%5¿p?À>Èà4¿€?À>ó†¾?6%5¿€=?7ð¼>?Ž(¿@>?6%5¿€>?ãJÖ> >? Â>À>?zmh¿à>?n¸<??ÅaÊ>??zmh¿ ??ãJÖ¾0??›Â¾@??zmh¿P??¦¸¼`??Çaʾp??zmh¿€??¬èC± ?€= ?> ?@> ?€> ? > ?À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>@?@>@?€>@? >@?À>@?à>@??@??@? ?@?0?@?@?@?P?@?`?@?p?@?€?@?`?€=`?>`?@>`?€>`? >`?À>`?à>`??`??`? ?`?0?`?@?`?P?`?`?`?p?`?€?`?€?€=€?>€?@>€?€>€? >€?À>€?à>€??€??€? ?€?0?€?@?€?P?€?`?€?p?€?€?€?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject18àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿áJÖ>€=·C9>>zmh?@>w¸¼€>8”Á> >zmh?À>áJÖ¾à>´C9¾?zmh??T¸< ?8”Á¾0?zmh?@?Èà4?P?WÄŽ>`?5%5?p?ùï¼€?‡6&?>5%5?€=>Èà4¿>>QÄŽ¾@>>7%5?€>>jï< >>‡6&¿À>>5%5?à>>µul??>rJ·>?>é,Ä> ?>õ- »0?>AûY?@?>è,Ä>P?>µul¿`?>kJ·¾p?>ë,Ä>€?>©, ;€>CûY¿€=€>é,Ä>>€>€?@>€>ïÃ>€>€>!!›² >€>mJ1³À>€>^ƒl?à>€>¼sDz?€>€¿?€>ïþ ?€> !›²0?€>WÆó³@?€>^ƒl¿P?€>Ó÷„²`?€>´ul?p?€>Žª²>€?€>ë,ľÀ>®- ;€=À>rðZ?>À>ë,ľ@>À>µul¿€>À>ˆª²¾ >À>ë,ľÀ>À>ã. »à>À>rðZ¿?À>ë,ľ?À>Èà4? ?À>÷†>0?À>6%5¿@?À>Ÿï<P?À>Ž(?`?À>6%5¿p?À>Èà4¿€?À>ó†¾?6%5¿€=?7ð¼>?Ž(¿@>?6%5¿€>?ãJÖ> >? Â>À>?zmh¿à>?n¸<??ÅaÊ>??zmh¿ ??ãJÖ¾0??›Â¾@??zmh¿P??¦¸¼`??Çaʾp??zmh¿€??¬èC± ?€= ?> ?@> ?€> ? > ?À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>@?@>@?€>@? >@?À>@?à>@??@??@? ?@?0?@?@?@?P?@?`?@?p?@?€?@?`?€=`?>`?@>`?€>`? >`?À>`?à>`??`??`? ?`?0?`?@?`?P?`?`?`?p?`?€?`?€?€=€?>€?@>€?€>€? >€?À>€?à>€??€??€? ?€?0?€?@?€?P?€?`?€?p?€?€?€?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject16àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=>$øô @>€> >À>à>$øô ?? ?0?@?$øô P?`?p?€?>$øô €=>>>@>>€>> >>$øô À>>à>>?>?> ?>$øô 0?>@?>P?>`?>p?>$øô €?>€>€=€>>€>@>€>$øô €>€> >€>À>€>à>€>?€>$øô ?€> ?€>0?€>@?€>P?€>$øô `?€>p?€>€?€>À>€=À>$øô >À>@>À>€>À> >À>À>À>$øô à>À>?À>?À> ?À>0?À>$øô @?À>P?À>`?À>p?À>€?À>$øô ?€=?>?@>?€>?$øô  >?À>?à>?????$øô ??0??@??P??`??$øô p??€?? ?€= ?> ?$øô @> ?€> ? > ?À> ?à> ?$øô ? ?? ? ? ?0? ?@? ?$øô P? ?`? ?p? ?€? ?@?$øô €=@?>@?@>@?€>@? >@?$øô À>@?à>@??@??@? ?@?$øô 0?@?@?@?P?@?`?@?p?@?$øô €?@?`?€=`?>`?@>`?$øô €>`? >`?À>`?à>`??`?$øô ?`? ?`?0?`?@?`?P?`?$øô `?`?p?`?€?`?€?€=€?$øô >€?@>€?€>€? >€?À>€?à>€?…ýG2?€?zmh??€?e> ?€?ÆaÊ>0?€?zmh?@?€?©Ÿ¾P?€?ŸÂ>`?€?zmh?p?€?e¾€?€?ÄaʾÈðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject14àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=>@>€> >À>à>?? ?0?@?P?`?p?€?>€=>>>@>>€>> >>À>>à>>?>?> ?>0?>@?>P?>`?>p?>€?>€>€=€>>€>@>€>€>€> >€>À>€>à>€>?€>?€> ?€>0?€>@?€>P?€>`?€>p?€>€?€>À>€=À>>À>@>À>€>À> >À>À>À>à>À>?À>?À> ?À>0?À>@?À>P?À>`?À>p?À>€?À>?€=?>?@>?€>? >?À>?à>????? ??0??@??P??`??p??€?? ?€= ?> ?@> ?€> ? > ?À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>@?@>@?€>@? >@?À>@?à>@??@??@? ?@?0?@? @?@?P?@?`?@?p?@?€?@?`?€=`?>`?@>`?€>`? >`?À>`?à>`??`??`? ?`?0?`?@?`?P?`?`?`?p?`?€?`?€?€=€?>€?@>€?€>€? >€?À>€?à>€??€??€? ?€?0?€?@?€?P?€?`?€?p?€?€?€? Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject12àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=>$øô @>€> >À>à>$øô ?? ?0?@?$øô P?`?p?€?>$øô €=>>>@>>€>> >>$øô À>>à>>?>?> ?>$øô 0?>@?>P?>`?>p?>$øô €?>€>€=€>>€>@>€>$øô €>€> >€>À>€>à>€>?€>$øô ?€> ?€>0?€>@?€>P?€>$øô `?€>p?€>€?€>À>€=À>$øô >À>@>À>€>À> >À>À>À>$øô à>À>?À>?À> ?À>0?À>$øô @?À>P?À>`?À>p?À>€?À>$øô ?€=?>?@>?€>?$øô  >?À>?à>?????$øô ??0??@??P??`??$øô p??€?? ?€= ?> ?$øô @> ?€> ? > ?À> ?à> ?$øô ? ?? ? ? ?0? ?@? ?$øô P? ?`? ?p? ?€? ?@?$øô €=@?>@?@>@?€>@? >@?$øô À>@?à>@??@??@? ?@?$øô 0?@?@?@?P?@?`?@?p?@?$øô €?@?`?€=`?>`?@>`?$øô €>`? >`?À>`?à>`??`?$øô ?`? ?`?0?`?@?`?P?`?$øô `?`?p?`?€?`?€?€=€?$øô >€?@>€?€>€? >€?À>€?à>€?…ýG2?€?zmh??€?e> ?€?ÆaÊ>0?€?zmh?@?€?©Ÿ¾P?€?ŸÂ>`?€?zmh?p?€?e¾€?€?ÄaʾÈðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿRobject10àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=>@>€> >À>à>?? ?0?@?P?`?p?€?>€=>>>@>>€>> >>À>>à>>?>?> ?>0?>@?>P?>`?>p?>€?>€>€=€>>€>@>€>€>€> >€>À>€>à>€>?€>?€> ?€>0?€>@?€>P?€>`?€>p?€>€?€>À>€=À>>À>@>À>€>À> >À>À>À>à>À>?À>?À> ?À>0?À>@?À>P?À>`?À>p?À>€?À>?€=?>?@>?€>? >?À>?à>????? ??0??@??P??`??p??€?? ?€= ?> ?@> ?€> ? > ?À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>@?@>@?€>@? >@?À>@?à>@??@??@? ?@?0?@?@?@?P?@?`?@?p?@?€?@?`?€=`?>`?@>`?€>`? >`?À>`?à>`??`??`? ?`?0?`?@?`?P?`?`?`?p?`?€?`?€?€=€?>€?@>€?€>€? >€?À>€?à>€??€??€? ?€?0?€?@?€?P?€?`?€?p?€?€?€?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿQobject8àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿€=o>o@>€>q >qÀ>ƒà>s?s?… ?u0?u@?xP?x`?‹p?|€?|>€=>€>>€@>>“€>>„ >>„À>>—à>>?>?> ?> 0?>@?>P?>`?>p?>€?>#€>'€=€>+>€>/@>€>3€>€>7 >€>;À>€>?à>€>C?€>G?€>K ?€>O0?€>S@?€>WP?€>[`?€>_p?€>c€?€>gÀ>k€=À>o>À>s@>À>w€>À>{ >À>À>À>ƒà>À>‡?À>‹?À> ?À>“0?À>—@?À>›P?À>Ÿ`?À>£p?À>§€?À>«?¯€=?³>?·@>?»€>?¿ >?ÃÀ>?Çà>?Ë??Ï??Ó ??×0??Û@??ßP??`??p??€?? ?€= ?> ? @> ? €> ? > ? À> ?à> ?? ?? ? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@?€=@?>@?@>@?€>@?  >@? À>@?à>@? ?@? ?@? ?@?0?@?@?@?P?@?`?@?p?@?!€?@?`?€=`?#>`?@>`?€>`?% >`?À>`?à>`?'?`??`? ?`?)0?`?@?`?P?`?+`?`?p?`?€?`?-€?€=€?>€?/@>€? €>€?  >€?1À>€?"à>€?"?€?3?€?$ ?€?$0?€?5@?€?&P?€?&`?€?7p?€?(€?€?(Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿQobject6àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿Ô‹Š>€=ó5¿>¦÷(²@>t='?€>ó5¿ >ó5¿À>Ñ‹Š¾à>ó5¿?Ž*г?t='¿ ?ó5¿0?ïÃ>@?ö>P?^ƒl¿`?–㶱p?õµ>€?^ƒl¿>ïþ€=>ö¾>>^ƒl¿@>>JQa³€>>õµ¾ >>^ƒl¿À>>à>> ?>?> ?>$øô 0?>@?>P?>`?>p?>$øô €?>€>€=€>>€>@>€>$øô €>€> >€>À>€>à>€>?€>$øô ?€> ?€>0?€>@?€>P?€>$øô `?€>p?€>€?€>À>€=À>$øô >À>@>À>€>À> >À>À>À>$øô à>À>?À>?À> ?À>0?À>$øô @?À>P?À>`?À>p?À>€?À>$øô ?€=?>?@>?€>?$øô  >?À>?à>?????$øô ??0??@??P??`??$øô p??€?? ?€= ?> ?$øô @> ?€> ? > ?À> ?à> ?$øô ? ?? ? ? ?0? ?@? ?$øô P? ?`? ?p? ?€? ?@?$øô €=@?>@?@>@?€>@? >@?$øô À>@?à>@??@??@? ?@?$øô 0?@?@?@?P?@?`?@?p?@?$øô €?@?`?€=`?>`?@>`?$øô €>`? >`?À>`?à>`??`?$øô ?`? ?`?0?`?@?`?P?`?$øô `?`?p?`?€?`?€?€=€?$øô >€?@>€?€>€? >€?À>€?$øô à>€??€??€? ?€?0?€?$øô @?€?P?€?`?€?p?€?€?€?$øô Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿQobject4àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿i€=Z>Z@>k€>\ >\À>mà>^?^?o ?`0?`@?bP?b`?qp?f€?f>q€=>j>>j@>>q€>>n >>nÀ>>qà>>?>ïÃ>?>ö> ?>^ƒl?0?>•ã¶±@?>ôµ>P?>^ƒl?`?>ïþp?>ö¾€?>^ƒl?€>IQa³€=€>ôµ¾>€>^ƒl?@>€>ó5?€>€>Ô‹Š> >€>ó5?À>€>¦÷(²à>€>t='??€>ó5??€>ó5¿ ?€>Ñ‹Š¾0?€>ó5?@?€>Ž*гP?€>t='¿`?€>ó5?p?€>^ƒl?€?€>óµ>À>ïÃ>€=À>:Ä\²>À>y‚Z?@>À>ïÃ>€>À>^ƒl¿ >À>ïµ¾À>À>ïÃ>à>À>¼ý´?À>y‚Z¿?À>ïÃ> ?À>€?0?À>ïÃ>@?À>.½;³P?À>ºôn²`?À>^ƒl?p?À>.½;³€?À>€¿?ïþ€=?.½;³>?2´@>?^ƒl¿€>?.½;³ >?^ƒl?À>?óµ>à>?ïþ??:Ä\²??y‚Z? ??ïþ0??^ƒl¿@??ïµ¾P??ïþ`??¼ý´p??y‚Z¿€??ïþ ?ó5?€= ?Ô‹Š>> ?ó5¿@> ?¦÷(²€> ?t='? > ?ó5¿À> ?ó5¿à> ?Ñ‹Š¾? ?ó5¿? ?Ž*г ? ?t='¿0? ?ó5¿@? ?ïÃ>P? ?ö>`? ?^ƒl¿p? ?–㶱€? ?õµ>@?^ƒl¿€=@?ïþ>@?ö¾@>@?^ƒl¿€>@?JQa³ >@?õµ¾À>@?^ƒl¿à>@??@? ?@? ?@?0?@?$øô @?@?P?@?`?@?p?@?€?@?$øô `?€=`?>`?@>`?€>`?$øô  >`?À>`?à>`??`??`?$øô ?`?0?`?@?`?P?`?`?`?$øô p?`?€?`?€?€=€?>€?$øô @>€?€>€? >€?À>€?à>€?$øô ?€??€? ?€?0?€?@?€?$øô P?€?`?€?p?€?€?€?Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿;ÿÿÿQobject2àrr™€?ïÃ>^ƒl?ôµ>ö>^ƒl?Ô‹Š>Õ‹Š>^ƒl?ö>ôµ>^ƒl?•ã¶±ïÃ>^ƒl?ö¾ôµ>^ƒl?Õ‹Š¾Ô‹Š>^ƒl?ôµ¾ö>^ƒl?ïþ×tÊ2^ƒl?õµ¾ö¾^ƒl?Ö‹Š¾Ò‹Š¾^ƒl?!ö¾òµ¾^ƒl?IQa³ïþ^ƒl?ö>ôµ¾^ƒl?Ö‹Š>Ó‹Š¾^ƒl?öµ>ö¾^ƒl?ó5?ó5?t='?Ô‹Š>ó5?ÿÿÿ>?ó5?Ó‹Š>u='?ó5?¦÷(²ó5?ó5?Õ‹Š¾t='?ó5?¿þÿÿ>ó5?t='¿Ó‹Š>ó5?ó5¿™ ;3ó5?u='¿Ñ‹Š¾ó5?¿üÿÿ¾ó5?Ú‹Š¾s='¿ó5?Ž*гó5¿ó5?Ô‹Š>t='¿ó5??ýÿÿ¾ó5?v='?Ì‹Š¾ó5?^ƒl?ïÃ>y‚Z?óµ>ïÃ>t='?t='?ïÃ>òµ>y‚Z?ïÃ>:Ä\²^ƒl?ïÃ>ôµ¾y‚Z?ïÃ>u='¿s='?ïÃ>y‚Z¿òµ>ïÃ>^ƒl¿ðbt3ïÃ>z‚Z¿ïµ¾ïÃ>w='¿r='¿ïÃ>ûµ¾w‚Z¿ïÃ>¼ý´^ƒl¿ïÃ>óµ>y‚Z¿ïÃ>v='?r='¿ïÃ>{‚Z?éµ¾ïÃ>€?.½;³^ƒl?ïÃ>.½;³ó5?ó5?.½;³ïÃ>_ƒl?.½;³ºôn²€?.½;³ïþ^ƒl?.½;³ô5¿ò5?.½;³_ƒl¿ïÃ>.½;³€¿ÒB„3.½;³_ƒl¿ïþ.½;³ö5¿ñ5¿.½;³ïþ]ƒl¿.½;³2´€¿.½;³ïÃ>^ƒl¿.½;³õ5?ñ5¿.½;³aƒl? ïþ.½;³^ƒl?ïþy‚Z?óµ>ïþt='?t='?ïþòµ>y‚Z?ïþ:Ä\²^ƒl?ïþôµ¾y‚Z?ïþu='¿s='?ïþy‚Z¿òµ>ïþ^ƒl¿ðbt3ïþz‚Z¿ïµ¾ïþw='¿r='¿ïþûµ¾w‚Z¿ïþ¼ý´^ƒl¿ïþóµ>y‚Z¿ïþv='?r='¿ïþ{‚Z?éµ¾ïþó5?ó5¿t='?Ô‹Š>ó5¿ÿÿÿ>?ó5¿Ó‹Š>u='?ó5¿¦÷(²ó5?ó5¿Õ‹Š¾t='?ó5¿¿þÿÿ>ó5¿t='¿Ó‹Š>ó5¿ó5¿™ ;3ó5¿u='¿Ñ‹Š¾ó5¿¿üÿÿ¾ó5¿Ú‹Š¾s='¿ó5¿Ž*гó5¿ó5¿Ô‹Š>t='¿ó5¿?ýÿÿ¾ó5¿v='?Ì‹Š¾ó5¿ïÃ>^ƒl¿õµ>ö>^ƒl¿Õ‹Š>Õ‹Š>^ƒl¿ö>õµ>^ƒl¿–㶱ïÃ>^ƒl¿ö¾õµ>^ƒl¿Ö‹Š¾Ô‹Š>^ƒl¿õµ¾ö>^ƒl¿ïþØtÊ2^ƒl¿öµ¾ö¾^ƒl¿×‹Š¾Ó‹Š¾^ƒl¿"ö¾óµ¾^ƒl¿JQa³ïþ^ƒl¿ö>õµ¾^ƒl¿×‹Š>Ó‹Š¾^ƒl¿÷µ>ö¾^ƒl¿€¿›²…ýG2€?áJÖ>¸·C9>zmh?e>©Ÿ>zmh?Â>ÆaÊ>zmh?w¸¼áJÖ>zmh?¸C9¾8”Á>zmh?©Ÿ¾e>zmh?ÆaʾŸÂ>zmh?áJÖ¾_¸¼zmh?9”Á¾´C9¾zmh?e¾©Ÿ¾zmh?¦Â¾Äaʾzmh?T¸<áJÖ¾zmh?¸C9>8”Á¾zmh?©Ÿ>e¾zmh?ÇaÊ>™Â¾zmh?Èà4?(ð<6%5?‡6&?WÄŽ>6%5?°|ü>ƒŽ?5%5?õ†>Ž(?6%5?ùï¼Èà4?6%5?WÄŽ¾‡6&?6%5?„Ž¿­|ü>5%5?Ž(¿õ†>6%5?Èà4¿€ï¼6%5?ˆ6&¿QÄŽ¾6%5?°|ü¾Ž¿7%5?û†¾(¿6%5?jï<Èà4¿5%5?VÄŽ>‡6&¿6%5?„Ž?¬|ü¾5%5?(?ñ†¾5%5?µul?. ;è,Ä>CûY?rJ·>é,Ä>EQ&?S(?é,Ä>ª²>tðZ?è,Ä>õ- »µul?è,Ä>rJ·¾AûY?è,Ä>R(¿DQ&?è,Ä>tðZ¿‹ª²>é,Ä>µul¿.- »è,Ä>CûY¿kJ·¾è,Ä>GQ&¿P(¿ë,Ä>“ª²¾rðZ¿é,Ä>©, ;µul¿è,Ä>rJ·>CûY¿é,Ä>U(?CQ&¿é,Ä>tðZ?‡ª²¾è,Ä>€?¨24 !›2^ƒl?ïÃ>mJ1±ô5?ó5?!!›²ïÃ>_ƒl?mJ1³€?mJ±2ïþ^ƒl?mJ1±ô5¿ó5?¼sDz_ƒl¿ïÃ>€¿ Ý2»sÇ2_ƒl¿ïþmJ±1ö5¿ñ5¿ !›²ïþ^ƒl¿WÆ󳀿mJ±2ïÃ>^ƒl¿mJ1±ö5?ò5¿Ó÷„²`ƒl?ïþnJ1±´ul?ö, »ê,ľrðZ?Žª²>ì,ľS(?EQ&?ë,ľqJ·>AûY?ë,ľ®- ;µul?ì,ľŽª²¾rðZ?ì,ľEQ&¿Q(?ë,ľAûY¿rJ·>ì,ľµul¿N. ;ì,ľtðZ¿ˆª²¾ë,ľT(¿CQ&¿ë,ľuJ·¾@ûY¿ë,ľã. »µul¿ì,ľŽª²>rðZ¿ì,ľFQ&?P(¿ë,ľCûY?jJ·¾ì,ľÈà4?sï¼6%5¿Ž(?÷†>6%5¿ƒŽ?¯|ü>6%5¿UÄŽ>‡6&?6%5¿Ÿï<Èà4?6%5¿÷†¾Ž(?6%5¿°|ü¾Ž?6%5¿‡6&¿UÄŽ>6%5¿Èà4¿ð<6%5¿Ž(¿ó†¾6%5¿„Ž¿¨|ü¾6%5¿YÄŽ¾†6&¿6%5¿7ð¼Èà4¿6%5¿÷†>Ž(¿6%5¿°|ü>Ž¿6%5¿ˆ6&?QÄŽ¾6%5¿ãJÖ>W¸¼zmh¿ÆaÊ> Â>zmh¿©Ÿ>e>zmh¿¸C9>8”Á>zmh¿n¸<áJÖ>zmh¿¡Â¾ÅaÊ>zmh¿e¾©Ÿ>zmh¿:”Á¾·C9>zmh¿ãJÖ¾¸Çaʾzmh¿e>©Ÿ¾zmh¿;”Á>³C9¾zmh¿¬èC±±€2€¿À>€=À>>À>@>À>€>À> >À>À>À>à>À>?À>?À> ??0??@??P??`??p??€??>?€=>?>>?@>>?€>>? >>?À>>?à>>??>??>? ?> ?0?> ?@?> ?P?> ?`?> ?p?> ?€?> ?€> ?€=€> ?>€> ?@>€> ?€>€> ? >€> ?À>€> ?à>€> ??€> ??€> ? ?€>@?0?€>@?@?€>@?P?€>@?`?€>@?p?€>@?€?€>@?À>@?€=À>@?>À>@?@>À>@?€>À>@? >À>@?À>À>@?à>À>@??À>@??À>@? ?À>`?0?À>`?@?À>`?P?À>`?`?À>`?p?À>`?€?À>`??`?€=?`?>?`?@>?`?€>?`? >?`?À>?`?à>?`???`???`? ??€?0??€?@??€?P??€?`??€?p??€?€??€? ?€?€= ?€?> ?€?@> ?€?€> ?€? > ?€?À> ?€?à> ?€?? ?€?? ?€? ? ?0? ?@? ?P? ?`? ?p? ?€? ?@? €=@?>@?@>@? €>@? >@?!À>@?à>@?#?@??@? ?@?%0?@?@?@?P?@?'`?@?p?@?€?@?)`?€=`?>`?+@>`?€>`? >`?-À>`?à>`??`?/?`? ?`?0?`?1@?`?!P?`?"`?`?4p?`?$€?`?$€?6€=€?&>€?&@>€?8€>€?( >€?(À>€?:à>€?*?€?*?€?< ?€?,0?€?,@?€?>P?€?.`?€?.p?€?@€?€?0Èðh®¶ `¥©Ãìqð1OP£&Ú`í[¹>¨- ±9…*¹¼D€”W·ÑNÕSE«†D,Ř¡â³D&Où.Ð’Ä)8ìUâï¢g> r,Ä¡‡Ž .\1ó€˜O¿'aÍEóìAÔY 3®%ý§]¬”ö<¢/’|B—0ˆ?%Ú•²®<¤Ì3S MU²›¹µ^F!ïYï[Û4ävAŠ´ÍkËÒäeŸu¿åŸ08râ¾xÂìSn ÈJVȬ¡„˜…ß̬³Íç­TÖ ˆûÉ´–eq#î»’bpOðVà®p†ÔÛÍ* þ±íl ’`ÿ›5ðòdN–ë'ëd³‰MPòÀ>Ûg†èènd™ÃHÚ‚+²jë gæŽÄÝåÞ!”’Yæe^¯j…ìÿÞê(àا”!äégQ˜JÕE6EÙ[øpR6d›ÕÏ0£jìÏKÒá(T ¤ÏÞ‘ ÷.ñÆÑqw‹W8F²-{hº_Sx T´BôxE™B}ó„Å—²ã´¾þž|^Õárt-°+ Y¾ÿŠYà(à9ÄM€WÂô…)ÁôrmÆQ'JÉãª_([3Â!®ÙazõëBoR““Ÿ‚‡(§Š®™q ïHsš‰˜ô?‚:]0¡È‡?kK|§ÎÎð«M6ÔOˆÄ8˜Äs´Ûkä_\ˆP®&^‰âÈV§¦üíÿ(K;öņM¸fx³˜†h°e[.¡hµI^L•bÛDÅú-3fz¢Øü©¾žy BVj™O~˦.<ãöQT=9âbõЧ÷ù™þ¿²¬ïݳ8Þ‘?KUë›õ…þUƒ°?@°3¬65¨Ê@F|f ˆ1UÉŽ\ö_ÖL°ÌÖ³{‹mœSlÄùeF9oƒ†³\äëŽõ}"n¯¶øîçž ×-!s_L)4/I=Í=×ÖšZ°òzô$^½yàÓ<|Û¾Øäyç`Æ7îÂÓÑYÎK/Å3gK„á_ƒ‰A|ž ÂR ü¾ÿ €·Œ‡ê}Ç?Ë‚X_`ö"£ÁÀò[ŽHO“"”Ž8èI›owšc‰¨·Uº½õHVº!¡«Uw~×<Ýl7_oûž}UG’)%àÞŠa?sôš2B5ÂpVŒpÞ,}‹Àv&ENqîúÖ½<_ùúc’í«6›ç‘êƳA¯gâµrHÐÆ]8ð …Û…@×”¡…"(ÝßÂmª_ÝY×_–ÎÏüøJ¯é¹àRA‹“ˆ#–ïø;l¹¯^ÿÓKV&œy7ðC;wžåefo®Þ€§^âNïþÝ€0ŸÃÕJñÀÑÎâÄ.ZIʸŸCV³«?½”ª«_l2-h[fî8ý×È[MÓ±È+lð%ÜcÌbôk6aØ.…ùE»¾Räi ßÜ5¸iΆúÊ¡Ÿ@KŠž…é ÌØhñWÎHig«¥šk*Ñ?êRç«/@^egÖ«å“U$ƦJ~æí¹(ˆ·š6CH½MÖ4”m _Öß›Ms åy‡ïÊ„À3îH@#²µ¹"[ª;ÓÇF¹:Å5ÖÚÞ=¢ Ÿy›xî]O‚·Ë£]àu–οØ^Ó¦öˆ ù‚"*Ö‹ÚZA¸h–æ5UY3|è%Ì.Âì_…l¾/oBµü6åû5 î?T­ÆÞ?"Ô€õÚ[&zÀÇ|ºô(#¼5¶\àa•àúï{ËéT5½ƒ²ëÊ0©ÿ7˜ÄœðԂ c “ ÙƲù§/GQ,*Pcç¬Ør³®ýÈzl%”ch-owJƆxʃw†¾:k£ç×Ð"óÌ.0G& îm“ZqÓ'|àpÞÖVL(ȘÞÿÝÄŽŽÆNþÿ¶Š²Ì‘âs~êÒ.«ò¿QWÁÔfRýß@Fh‹üoXŽñ)ÌÃþ7£VH^„ÿ;ÈÎÚª;ïÿƒk4öÿyw$]ëùÿþˆ†ÈI¿./asymptote-2.41/examples/animations/embeddedmovie.asy0000644000175000017500000000076713064427076023044 0ustar norbertnorbert// An embedded movie; // // See http://mirror.ctan.org/macros/latex/contrib/media9/doc/media9.pdf // for documentation of the options. import embed; // Add embedded movie //import external; // Add external movie (use this form under Linux). // Generated needed mp4 file if it doesn't already exist. asy("mp4","wheel"); // Produce a pdf file. settings.outformat="pdf"; settings.twice=true; // An embedded movie: label(embed("wheel.mp4",20cm,5.6cm),(0,0),N); label(link("wheel.mp4"),(0,0),S); ./asymptote-2.41/examples/animations/torusanimation.asy0000644000175000017500000000143613064427076023321 0ustar norbertnorbertimport graph3; import animation; import solids; currentprojection=perspective(50,40,20); currentlight=(0,5,5); real R=3; real a=1; int n=8; path3[] p=new path3[n]; animation A; for(int i=0; i < n; ++i) { triple g(real s) { real twopi=2*pi; real u=twopi*s; real v=twopi/(1+i+s); real cosu=cos(u); return((R-a*cosu)*cos(v),(R-a*cosu)*sin(v),-a*sin(u)); } p[i]=graph(g,0,1,operator ..); } triple f(pair t) { real costy=cos(t.y); return((R+a*costy)*cos(t.x),(R+a*costy)*sin(t.x),a*sin(t.y)); } surface s=surface(f,(0,0),(2pi,2pi),8,8,Spline); for(int i=0; i < n; ++i){ picture fig; size(fig,20cm); draw(fig,s,yellow); for(int j=0; j <= i; ++j) draw(fig,p[j],blue+linewidth(4)); A.add(fig); } A.movie(BBox(10,Fill(rgb(0.98,0.98,0.9))),delay=100); ./asymptote-2.41/examples/animations/earthmoon.asy0000644000175000017500000000361513064427076022242 0ustar norbertnorbertimport graph3; import solids; import three; import animate; settings.render=2; settings.tex="pdflatex"; settings.prc=false; settings.thick=false; settings.outformat="mpg"; currentprojection=orthographic(5,4,2); currentlight=light(specular=black,(0.1,-0.1,1),viewport=true); size(15cm,0); animation A; real Rst=20, Rl=0.7, Rtl=5; real ast=20, est=0.3, bst=ast*sqrt(1-est^2), cst=ast*est; real atl=5, etl=0.8, btl=atl*sqrt(1-etl^2), ctl=atl*etl; real xST(real t) {return ast*cos(t)+cst;} real yST(real t) {return bst*sin(t);} real zST(real t) {return 0;} real xTL(real t) {return atl*cos(27t);} real yTL(real t) {return btl*sin(27t);} real zTL(real t) {return 0;} real xLl(real t) {return Rl*cos(27t);} real yLl(real t) {return Rl*sin(27t);} real zLl(real t) {return 0;} real xTt(real t) {return Rtl*cos(100t)/5;} real yTt(real t) {return Rtl*sin(100t)/5;} real zTt(real t) {return 0;} real xl(real t) {return xST(t)+xTL(t)+xLl(t);} real yl(real t) {return yST(t)+yTL(t)+yLl(t);} real zl(real t) {return 0;} real xt(real t) {return xST(t)+xTt(t);} real yt(real t) {return yST(t)+yTt(t);} real zt(real t) {return 0;} real xL(real t) {return xST(t)+xTL(t);} real yL(real t) {return yST(t)+yTL(t);} real zL(real t) {return 0;} path3 Pl=graph(xl,yl,zl,0,2pi,1000),Pt=graph(xt,yt,zt,0,2pi,3000), Pts=graph(xST,yST,zST,0,2pi,500); picture pic; draw(pic,Pl,lightgray); draw(pic,Pt,lightblue); draw(pic,Pts,blue+dashed); draw(pic,shift(cst,0,0)*scale3(Rtl/2)*unitsphere,yellow); surface terre=scale3(Rtl/5)*unitsphere; surface lune=scale3(Rl)*unitsphere; int n=50; real step=2pi/n; for(int i=0; i < n; ++i) { real k=i*step; add(pic); draw(shift(xL(k),yL(k),0)*lune,lightgray); draw(shift(xST(k),yST(k),0)*terre,lightblue+lightgreen); A.add(); erase(); } A.movie(BBox(1mm,Fill(Black)),delay=500, options="-density 288x288 -geometry 50%x"); ./asymptote-2.41/examples/animations/inlinemovie3.tex0000644000175000017500000000201513064427076022644 0ustar norbertnorbert\documentclass{article} \usepackage[inline]{asymptote} %\usepackage{asymptote} \usepackage{animate} \begin{document} Here is an inline 3D PDF movie, generated with the commands \begin{verbatim} pdflatex inlinemovie3 asy inlinemovie3-*.asy pdflatex inlinemovie3 \end{verbatim} or equivalently, \begin{verbatim} latexmk -pdf inlinemovie3 \end{verbatim} \begin{center} \begin{asy} settings.render=4; settings.prc=false; import graph3; import animate; currentprojection=orthographic(1,-2,0.5); animation A=animation("movie3"); int n=20; for(int i=0; i < n; ++i) { picture pic; size3(pic,12cm,12cm,8cm); real k=i/n*pi; real f(pair z) {return 4cos(abs(z)-k)*exp(-abs(z)/6);} draw(pic,surface(f,(-4pi,-4pi),(4pi,4pi),Spline),paleblue); draw(pic,shift(i*6Z/n)*unitsphere,yellow); A.add(pic); } label(A.pdf("autoplay,loop",delay=20,keep=!settings.inlinetex)); \end{asy} %Uncomment the following line when not using the [inline] package option: %\ASYanimategraphics[autoplay,loop]{50}{movie3}{}{} \end{center} \end{document} ./asymptote-2.41/examples/animations/inlinemovie.tex0000644000175000017500000000232313064427076022563 0ustar norbertnorbert\documentclass{article} \usepackage[inline]{asymptote} %\usepackage{asymptote} \usepackage{animate} \begin{document} Here is an inline PDF movie, generated with the commands \begin{verbatim} pdflatex inlinemovie asy inlinemovie-*.asy pdflatex inlinemovie \end{verbatim} or equivalently, \begin{verbatim} latexmk -pdf inlinemovie \end{verbatim} \begin{center} \begin{asy} import animate; animation A=animation("movie1"); real h=2pi/10; picture pic; unitsize(pic,2cm); for(int i=0; i < 10; ++i) { draw(pic,expi(i*h)--expi((i+1)*h)); A.add(pic); } label(A.pdf("controls",delay=50,keep=!settings.inlinetex)); \end{asy} %Uncomment the following line when not using the [inline] package option: %\ASYanimategraphics[controls]{50}{movie1}{}{} \end{center} And here is another one, clickable but without the control panel: \begin{center} \begin{asy} import animate; animation A=animation("movie2"); real h=2pi/10; picture pic; unitsize(pic,2cm); for(int i=0; i < 10; ++i) { draw(pic,expi(-i*h)--expi(-(i+1)*h),red); A.add(pic); } label(A.pdf(keep=!settings.inlinetex)); \end{asy} %Uncomment the following line when not using the [inline] package option: %\ASYanimategraphics[controls]{10}{movie2}{}{} \end{center} \end{document} ./asymptote-2.41/examples/animations/heatequation.asy0000644000175000017500000000334013064427076022730 0ustar norbertnorbertimport graph3; import palette; import animate; settings.tex="pdflatex"; settings.render=0; settings.prc=false; unitsize(1cm); animation a; currentprojection=perspective(-20,-18,18); currentlight=light(1,1,10); int n=26; real L=2.5; real dx=2*L/n; real CFL=0.125; real dt=CFL*dx^2; real[][] Z=new real[n][n]; real[][] W=new real[n][n]; guide initcond1=shift((-1,-1))*scale(0.5)*unitcircle; guide initcond2=shift((0.5,0))*yscale(1.2)*unitcircle; real f(pair p) {return (inside(initcond1,p)||inside(initcond2,p)) ? 2 : 0;} //Initialize for(int i=0; i < n; ++i) for (int j=0; j < n; ++j) Z[i][j]=f((-L,-L)+(2*L/n)*(i,j)); real f(pair t) { int i=round((n/2)*(t.x/L+1)); int j=round((n/2)*(t.y/L+1)); if(i > n-1) i=n-1; if(j > n-1) j=n-1; return Z[i][j]; } surface sf; void advanceZ(int iter=20) { for(int k=0; k < iter; ++k) { for(int i=0; i < n; ++i) for(int j=0; j < n; ++j) W[i][j]=0; for(int i=1; i < n-1; ++i) for(int j=1; j< n-1; ++j) W[i][j]=Z[i][j]+(dt/dx^2)*(Z[i+1][j]+Z[i-1][j]+Z[i][j-1]+Z[i][j+1] -4*Z[i][j]); for(int i=0; i < n; ++i) for(int j=0; j < n; ++j) Z[i][j]=W[i][j]; }; } pen[] Pal=Rainbow(96); int endframe=40; for(int fr=0; fr < endframe; ++fr) { if(fr == 0) {// smoothing of initial state; no Spline, but full grid advanceZ(3); sf=surface(f,(-L,-L),(L,L),nx=n); } else // use Spline and fewer grid points to save memory sf=surface(f,(-L,-L),(L,L),nx=round(n/2),Spline); sf.colors(palette(sf.map(zpart),Pal[0:round(48*max(sf).z)])); draw(sf); a.add(); erase(); advanceZ(30); }; label(a.pdf(delay=400,"controls,loop")); shipout(bbox(3mm,darkblue+3bp+miterjoin,FillDraw(fillpen=paleblue)),"pdf"); ./asymptote-2.41/examples/animations/externalmovie.asy0000644000175000017500000000063313064427076023125 0ustar norbertnorbert// Embed a movie to be run in an external window. import external; // External movies require the pdflatex engine. settings.tex="pdflatex"; // Generated needed mpeg file if it doesn't already exist. asy("mp4","wheel"); // Produce a pdf file. settings.outformat="pdf"; // External movie: viewable even with the Linux version of acroread. label(embed("wheel.mp4"),(0,0),N); label(link("wheel.mp4"),(0,0),S); ./asymptote-2.41/examples/animations/wavepacket.asy0000644000175000017500000000273213064427076022377 0ustar norbertnorbert// Author : Philippe Ivaldi // http://www.piprime.fr/ // 2006/11/10 import animation; import graph; unitsize(x=2cm,y=1.5cm); typedef real realfcn(real); real lambda=4; real T=2; real [] k=new real[3]; real [] w=new real[3]; k[0]=2pi/lambda; w[0]=2pi/T; real dk=-.5; k[1]=k[0]-dk; k[2]=k[0]+dk; real dw=1; w[1]=w[0]-dw; w[2]=w[0]+dw; real vp=w[1]/k[1]; real vg=dw/dk; realfcn F(real x) { return new real(real t) { return cos(k[1]*x-w[1]*t)+cos(k[2]*x-w[2]*t); }; }; realfcn G(real x) { return new real(real t) { return 2*cos(0.5*(k[2]-k[1])*x+0.5*(w[1]-w[2])*t); }; }; realfcn operator -(realfcn f) {return new real(real t) {return -f(t);};}; animation A; real tmax=abs(2pi/dk); real xmax=abs(2pi/dw); pen envelope=0.8*blue; pen fillpen=lightgrey; int n=50; real step=tmax/(n-1); for(int i=0; i < n; ++i) { save(); real t=i*step; real a=xmax*t/tmax-xmax/pi; real b=xmax*t/tmax; path f=graph(F(t),a,b); path g=graph(G(t),a,b); path h=graph(-G(t),a,b); fill(buildcycle(reverse(f),g),fillpen); draw(f); draw(g,envelope); draw(h,envelope); A.add(); restore(); } for(int i=0; i < n; ++i) { save(); real t=i*step; real a=-xmax/pi; real b=xmax; path f=graph(F(t),a,b); path g=graph(G(t),a,b); path h=graph(-G(t),a,b); path B=box((-xmax/pi,-2),(xmax,2)); fill(buildcycle(reverse(f),g,B),fillpen); fill(buildcycle(f,g,reverse(B)),fillpen); draw(f); draw(g,envelope); draw(h,envelope); A.add(); restore(); } A.movie(0,10); ./asymptote-2.41/examples/animations/wheel.asy0000644000175000017500000000214013064427076021342 0ustar norbertnorbertimport graph; // Uncomment the following 2 lines to support pdf animations: // usepackage("animate"); // settings.tex="pdflatex"; import animation; size(0,200); defaultpen(3); dotfactor=4; pair wheelpoint(real t) { return (t+cos(t),-sin(t)); } guide wheel(guide g=nullpath, real a, real b, int n) { real width=(b-a)/n; for(int i=0; i <= n; ++i) { real t=a+width*i; g=g--wheelpoint(t); } return g; } real t1=0; real t2=t1+2*pi; animation a; draw(circle((0,0),1)); draw(wheel(t1,t2,100),linetype("0 2")); yequals(Label("$y=-1$",1.0),-1,extend=true,linetype("4 4")); xaxis(Label("$x$",align=3SW),0); yaxis("$y$",0,1.2); pair z1=wheelpoint(t1); pair z2=wheelpoint(t2); dot(z1); dot(z2); int n=10; real dt=(t2-t1)/n; for(int i=0; i <= n; ++i) { save(); real t=t1+dt*i; draw(circle((t,0),1),red); dot(wheelpoint(t)); a.add(); // Add currentpicture to animation. restore(); } erase(); // Merge the images into a gif animation. a.movie(BBox(0.25cm),loops=10,delay=250); // Merge the images into a pdf animation. // label(a.pdf(BBox(0.25cm),delay=250,"controls",multipage=false)); ./asymptote-2.41/examples/animations/glmovie.asy0000644000175000017500000000063613064427076021710 0ustar norbertnorbertsettings.autoplay=true; settings.loop=true; import graph3; import animate; currentprojection=orthographic(1,-2,0.5); animation A; int n=25; for(int i=0; i < n; ++i) { picture pic; size3(pic,6cm); real k=i/n*pi; real f(pair z) {return 4cos(abs(z)-k)*exp(-abs(z)/6);} draw(pic,surface(f,(-4pi,-4pi),(4pi,4pi),Spline),paleblue); draw(pic,shift(i*6Z/n)*unitsphere,yellow); A.add(pic); } A.glmovie(); ./asymptote-2.41/examples/animations/sphere.asy0000644000175000017500000000150013064427076021523 0ustar norbertnorbertimport solids; import animation; currentprojection=orthographic((0,5,2)); currentlight=(0,5,5); settings.thick=false; settings.render=0; int nbpts=200; real step=2*pi/nbpts; int angle=10; unitsize(1cm); triple[] P=new triple[nbpts]; for(int i=0; i < nbpts; ++i) { real t=-pi+i*step; P[i]=(3sin(t)*cos(2t),3sin(t)*sin(2t),3cos(t)); } transform3 t=rotate(angle,(0,0,0),(1,0.25,0.25)); revolution r=sphere(O,3); draw(surface(r),lightgrey); draw(r,backpen=linetype("8 8",8)); animation A; for(int phi=0; phi < 360; phi += angle) { bool[] front=new bool[nbpts]; save(); for(int i=0; i < nbpts; ++i) { P[i]=t*P[i]; front[i]=dot(P[i],currentprojection.camera) > 0; } draw(segment(P,front,operator ..),1mm+blue+extendcap); draw(segment(P,!front,operator ..),grey); A.add(); restore(); } A.movie(0,200); ./asymptote-2.41/examples/animations/cube.asy0000644000175000017500000000166213064427076021164 0ustar norbertnorbertimport math; import bsp; import animation; size(100,100); animation a; void face(face[] faces, path3 p, int j, int k) { picture pic=faces.push(p); filldraw(pic,project(p),Pen(j)); int sign=(k % 2 == 0) ? 1 : -1; transform t=scale(4)*transform(dir(p,0,sign),dir(p,0,-sign)); label(pic,t*(string) j,project(0.5*(min(p)+max(p)))); } void snapshot(transform3 t) { static transform3 s=shift(-0.5*(X+Y+Z)); save(); face[] faces; int j=-1; transform3 T=t*s; for(int k=0; k < 2; ++k) { face(faces,T*plane((1,0,0),(0,1,0),(0,0,k)),++j,k); face(faces,T*plane((0,1,0),(0,0,1),(k,0,0)),++j,k); face(faces,T*plane((0,0,1),(1,0,0),(0,k,0)),++j,k); } add(faces); a.add(); restore(); } int n=50; real step=360/n; for(int i=0; i < n; ++i) snapshot(rotate(i*step,X)); for(int i=0; i < n; ++i) snapshot(rotate(i*step,Y)); for(int i=0; i < n; ++i) snapshot(rotate(i*step,Z)); a.movie(loops=10,delay=50); ./asymptote-2.41/examples/animations/embeddedu3d.asy0000644000175000017500000000030413064427076022403 0ustar norbertnorbert// An embedded U3D object; // import embed; settings.tex="pdflatex"; label(embedplayer("dice.u3d","dice","activate=pagevisible,3Droo=27", settings.paperwidth,settings.paperheight)); ./asymptote-2.41/examples/animations/pdfmovie.asy0000644000175000017500000000050613064427076022053 0ustar norbertnorbertimport animate; import patterns; settings.tex="pdflatex"; animation a; add("brick",brick(black)); int n=20; for(int i=0; i < 3.5n; ++i) { picture pic; size(pic,100); path g=circle((0,sin(pi/n*i)),1); fill(pic,g,mediumred); fill(pic,g,pattern("brick")); a.add(pic); } label(a.pdf("controls",multipage=false)); ./asymptote-2.41/examples/animations/slidemovies.asy0000644000175000017500000000232613064427076022567 0ustar norbertnorbert// Slide demo. // Command-line options to enable stepping and/or reverse video: // asy [-u stepping=true] [-u reverse=true] slidedemo orientation=Landscape; settings.tex="pdflatex"; import slide; // Optional movie modules: import animate; // For portable embedded PDF movies access external; // For portable external movies access embed; // For non-portable embedded movies usersetting(); titlepage("Slides with {\tt Asymptote}: Animations","John C. Bowman", "University of Alberta","\today","http://asymptote.sf.net"); title("Embedded PDF movies (portable)"); animation a=animation("A"); animation b=animation("B"); int n=20; for(int i=0; i < 2n; ++i) { picture pic; size(pic,100); draw(pic,shift(0,sin(pi/n*i))*unitsquare); a.add(pic); if(i < 1.5n) b.add(rotate(45)*pic); } display(a.pdf("autoplay,loop,controls",multipage=false)); display(b.pdf("controls",multipage=false)); // Generated needed files if they don't already exist. asy("mp4","wheel"); title("External Movie (portable)"); display(external.embed("wheel.mp4",20cm,5.6cm)); display(external.link("wheel.mp4")); title("Embedded Movie (not portable)"); display(embed.embed("wheel.mp4",20cm,5.6cm)); display(embed.link("wheel.mp4")); ./asymptote-2.41/examples/mergeExample.asy0000644000175000017500000000363613064427076020522 0ustar norbertnorbertsize(16cm); import bezulate; pen edgepen=linewidth(1)+blue; pen dotpen=deepgreen; pen labelpen=fontsize(8pt); path outer = (0.5,5){E}..(5,-1){S}..{W}(4,-4)..{W}(2.5,-1.5){W}..(-0.3,-2.5){W}..(-3,0)..cycle; outer = subdivide(outer); path[] p = {outer,shift(-0.5,1.0)*rotate(-22)*scale(1.5,2.4)*subdivide(unitcircle),shift(2.3,0.3)*scale(0.7)*unitcircle}; // a filldraw(p,lightgrey+evenodd); real w = 1.1*(max(p).x-min(p).x); // b p = shift(w)*p; draw(p); path l = point(p[1],2)--point(p[0],4); draw(l,red); for(int i = 0; i < p.length; ++i) { real[][] ts = intersections(l,p[i]); for(real[] t:ts) dot(point(l,t[0])); } path l2 = point(l,intersections(l,p[0])[0][0])--point(l,intersections(l,p[2])[1][0]); real to = intersections(l,p[0])[0][1]; real ti = intersections(l,p[2])[1][1]; draw(l2,edgepen); label("$A$",point(l2,1),2E,labelpen); label("$B$",point(l2,0),1.5E,labelpen); // c p = shift(w)*p; l2 = shift(w)*l2; draw(p); real timeoffset=2; path t1=subpath(p[0],to,to+timeoffset); t1=t1--point(p[2],ti)--cycle; fill(t1,lightgrey); draw(point(p[2],ti)--point(p[0],to+4),red); dot(Label("$A$",labelpen),point(p[2],ti),2E,dotpen); dot(Label("$B$",labelpen),point(p[0],to),1.5E,dotpen); dot(Label("$C$",labelpen),point(p[0],to+timeoffset),1.5S,dotpen); draw(t1,edgepen); dot(point(p[0],to+4)); draw(shift(-0.5,-0.5)*subpath(p[0],to+4,to+timeoffset+0.5),Arrow(4)); // d p = shift(w)*p; p[0] = subpath(p[0],to+timeoffset,to+length(p[0]))--uncycle(p[2],ti)--cycle; p.delete(2); draw(p); // e p = shift(w)*p; path q=point(p[1],0)--subpath(p[0],15.4,16)--cycle; p[0] = subpath(p[0],16,15.4+length(p[0]))--uncycle(p[1],0)--cycle; p.delete(1); filldraw(p,lightgrey); // f p = shift(w)*p; filldraw(bezulate(p),lightgrey); filldraw(shift(3w)*t1,lightgrey); filldraw(shift(w)*q,lightgrey); real x = min(p).x - 4.5w; string l = "abcdef"; for(int i = 0; i < 6; ++i) { label("("+substr(l,i,1)+")",(x,min(p).y),3S,fontsize(10pt)); x += w; } ./asymptote-2.41/examples/condor.asy0000644000175000017500000000134313064427076017364 0ustar norbertnorbert// Peter Luschny's Condor function // http://www.luschny.de/math/asy/ElCondorYElGamma.html import palette; import graph3; size(300,300,IgnoreAspect); currentprojection=orthographic(0,-1,0,center=true); currentlight=White; real K=7; triple condor(pair t) { real y=t.y; real x=t.x*y; real e=gamma(y+1); real ymx=y-x; real ypx=y+x; real a=gamma((ymx+1)/2); real b=gamma((ymx+2)/2); real c=gamma((ypx+1)/2); real d=gamma((ypx+2)/2); real A=cos(pi*ymx); real B=cos(pi*ypx); return (x,y,log(e)+log(a)*((A-1)/2)+log(b)*((-A-1)/2)+log(c)*((B-1)/2)+ log(d)*((-B-1)/2)); } surface s=surface(condor,(-1,0),(1,K),16,Spline); s.colors(palette(s.map(zpart),Rainbow())); draw(s,render(compression=Low,merge=true)); ./asymptote-2.41/examples/phase.asy0000644000175000017500000000055113064427076017200 0ustar norbertnorbertimport graph; size(8cm,6cm,IgnoreAspect); pair S0=(4,0.2); pair S1=(2,3); pair S8=(0.5,0); xaxis("$S$"); yaxis(Label("$I$",0.5)); draw(S0{curl 0}..tension 1.5..S1{W}..tension 1.5..{curl 0}S8,Arrow(Fill,0.4)); draw((S1.x,0)..S1,dashed); draw((0,S1.y)..S1,dotted); labelx("$\frac{\gamma}{\beta}$",S1.x); labelx("$S_\infty$",S8.x); labely("$I_{\max}$",S1.y); ./asymptote-2.41/examples/tanh.asy0000644000175000017500000000030613064427076017030 0ustar norbertnorbertimport graph; size(100,0); real f(real x) {return tanh(x);} pair F(real x) {return (x,f(x));} xaxis("$x$"); yaxis("$y$"); draw(graph(f,-2.5,2.5,operator ..)); label("$\tanh x$",F(1.5),1.25*N); ./asymptote-2.41/examples/BezierPatch.asy0000644000175000017500000000061313064427076020277 0ustar norbertnorbertimport three; size(10cm); currentlight=Headlamp; surface s=surface(patch(new triple[][] { {(0,0,0),(1,0,0),(1,0,0),(2,0,0)}, {(0,1,0),(1,0,1),(1,0,1),(2,1,0)}, {(0,1,0),(1,0,-1),(1,0,-1),(2,1,0)}, {(0,2,0),(1,2,0),(1,2,0),(2,2,0)}})); draw(s,yellow); draw(s.s[0].vequals(0.5),squarecap+2bp+blue,currentlight); draw(s.s[0].uequals(0.5),squarecap+2bp+red,currentlight); ./asymptote-2.41/examples/cardioid.asy0000644000175000017500000000035113064427076017654 0ustar norbertnorbertimport graph; size(0,100); real f(real t) {return 1+cos(t);} path g=polargraph(f,0,2pi,operator ..)--cycle; filldraw(g,pink); xaxis("$x$",above=true); yaxis("$y$",above=true); dot("$(a,0)$",(1,0),N); dot("$(2a,0)$",(2,0),N+E); ./asymptote-2.41/examples/lowint.asy0000644000175000017500000000030413064427076017410 0ustar norbertnorbertsize(100,0); import graph; import lowupint; real a=-0.8, b=1.2; real c=1.0/sqrt(3.0); partition(a,b,c,min); arrow("$f(x)$",F(0.5*(a+b)),NNE,red); label("$\cal{L}$",(0.5*(a+b),f(0.5*(a+b))/2)); ./asymptote-2.41/examples/layers.asy0000644000175000017500000000126013064427076017375 0ustar norbertnorbertusepackage("ocg"); settings.tex="pdflatex"; size(0,150); pen colour1=red; pen colour2=green; pair z0=(0,0); pair z1=(-1,0); pair z2=(1,0); real r=1.5; path c1=circle(z1,r); path c2=circle(z2,r); begin("A"); fill(c1,colour1); end(); fill(c2,colour2); picture intersection; fill(intersection,c1,colour1+colour2); clip(intersection,c2); add(intersection); draw(c1); draw(c2); label("$A$",z1); begin("B"); label("$B$",z2); end(); pair z=(0,-2); real m=3; margin BigMargin=Margin(0,m*dot(unit(z1-z),unit(z0-z))); draw(Label("$A\cap B$",0),conj(z)--z0,Arrow,BigMargin); draw(Label("$A\cup B$",0),z--z0,Arrow,BigMargin); draw(z--z1,Arrow,Margin(0,m)); draw(z--z2,Arrow,Margin(0,m)); ./asymptote-2.41/examples/hyperboloid.asy0000644000175000017500000000046413064427076020423 0ustar norbertnorbertsize(200); import solids; currentprojection=perspective(4,4,3); revolution hyperboloid=revolution(graph(new triple(real z) { return (sqrt(1+z*z),0,z);},-2,2,20,operator ..),axis=Z); draw(surface(hyperboloid),green,render(compression=Low,merge=true)); draw(hyperboloid,6,blue,longitudinalpen=nullpen); ./asymptote-2.41/examples/sphere.asy0000644000175000017500000000017613064427076017371 0ustar norbertnorbertimport three; size(200); currentprojection=orthographic(5,4,3); draw(unitsphere,green,render(compression=Zero,merge=true)); ./asymptote-2.41/examples/spring0.asy0000644000175000017500000000004613064427076017461 0ustar norbertnorbertimport spring; drawspring(0,"$L$"); ./asymptote-2.41/examples/rainbow.asy0000644000175000017500000000050513064427076017540 0ustar norbertnorbertsize(200); pen indigo=rgb(102/255,0,238/255); void rainbow(path g) { draw(new path[] {scale(1.3)*g,scale(1.2)*g,scale(1.1)*g,g, scale(0.9)*g,scale(0.8)*g,scale(0.7)*g}, new pen[] {red,orange,yellow,green,blue,indigo,purple}); } rainbow((1,0){N}..(0,1){W}..{S}(-1,0)); rainbow(scale(4)*shift(-0.5,-0.5)*unitsquare); ./asymptote-2.41/examples/tvgen.asy0000644000175000017500000011660613064427076017234 0ustar norbertnorbert/* tvgen - draw pm5544-like television test cards. * Copyright (C) 2007, 2009, 2012, Servaas Vandenberghe. * * The tvgen code below is free software: you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public License as * published by the Free Software Foundation, either version 3 of the * License, or (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with tvgen: see the file COPYING. If not, write to the * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, * Boston, MA 02110-1301, USA. * * tvgen-1.2/tvgen.asy http://picaros.org/ftp/soft/tvgen-1.2.tgz * This asy script generates pm5544-like television test cards. The image * parameters were derived from a 1990 recording. The basic parameters * conform to itu-r bt.470, bt.601, and bt.709. There is no unique image * since local variants exist and parameters have varied over time. */ //papertype="a4"; import plain; int verbose=settings.verbose/*+2*/; /* uncomment for debug info */ /* tv dot coordinates --> PS points */ pair tvps(real col, real row, real xd, real yd, int Nv) { real psx, psy; psx=col*xd; psy=(Nv-row)*yd; return (psx,psy); } path tvrect(int lc, int tr, int rc, int br, real xd, real yd, int Nv) { real lx, ty, rx, by; pair[] z; lx=lc*xd; ty=(Nv-tr)*yd; rx=rc*xd; by=(Nv-br)*yd; /* bl br tr tl */ z[0]=(lx, by); z[1]=(rx, by); z[2]=(rx, ty); z[3]=(lx, ty); return z[0]--z[1]--z[2]--z[3]--cycle; } /********************* horizontal castellations ********************/ /* Draw a horizontal red line in the top left and the bottom right * castellation. These testlines disappear if the monitor is not set * in a dot-exact mode. An example is image crop due to overscan. * * For 625 line systems any analog-compatible processing removes * these red testlines since the first halfline of the odd field and * the last halfline of the even field are ignored. A full 576 * visible line frame often results via a final copy paste operation. */ void castelhor(int colortv, int[] rccoll, int[] rccolr, int cmaxi, int Nh, int topdist, int botdist, pen pdef, real xd, real yd, int Nv) { pen pblack, pwhite, pred; int i; pblack = pdef+gray(0.0); pwhite = pdef+gray(1.0); pred = pdef+rgb(0.75, 0, 0); /** top and bottom: white corners. **/ for (i=-1; i<=cmaxi; ++i) { pen pcast; int inext, lc, rc, tr, br; path zzc; inext = i+1; if (inext%2 == 0) { pcast = pwhite; } else { pcast = pblack; } if (i >= 0) { lc = rccolr[i]; } else { lc = 0; } if (inext <= cmaxi) { rc = rccoll[inext]; } else { rc = Nh; } if (i == 0 && colortv > 0 && topdist > 1) { path zzr; zzr = tvrect(lc,0, rc,1, xd,yd,Nv); fill(zzr, p=pred); tr = 1; } else { tr = 0; } zzc = tvrect(lc,tr, rc,topdist, xd,yd,Nv); fill(zzc, p=pcast); if (inext == cmaxi && colortv > 0 && botdist+1 < Nv) { path zzr; zzr = tvrect(lc,Nv-1, rc,Nv, xd,yd,Nv); fill(zzr, p=pred); br = Nv-1; } else { br = Nv; } zzc = tvrect(lc,botdist, rc,br, xd,yd,Nv); fill(zzc, p=pcast); } return; } /********************* vertical castellations ********************/ /* The bottom right red rectangle tests for a non causal color FIR * filter in the receiver. The last 2..4 dots then typically appear * colorless, green, or cyan. * * This stems from the fact that the chroma subcarrier is of lower * bandwidth than luma and thus continues after the last active sample. * These trailing (y,u,v) samples result from an abrupt signal to zero * transition and depend on the transmit and receive filters. Samples * from VHS, system B/G/D/K, system I, or a DVD player output are * different. Nevertheless, a sharpening filter uses this data and so * adds false color to the last dots. */ void castelver(int colortv, int leftdist, int rightdist, int Nh, int[] rcrowb, int[] rcrowt, int rmaxi, pen pdef, real xd, real yd, int Nv) { pen pblack, pwhite; int i; pblack = pdef+gray(0.0); pwhite = pdef+gray(1.0); for (i=0; i0) { pcastr = pdef+rgb(0.75,0.0,0); } else { pcastr = pcastl; } tr=rcrowb[i]; br=rcrowt[i+1]; zzc=tvrect( 0,tr, leftdist,br, xd,yd,Nv); fill(zzc, p=pcastl); zzc=tvrect(rightdist,tr, Nh,br, xd,yd,Nv); fill(zzc, p=pcastr); } return; } /********************* image aspect ratio markers ********************/ void rimarkers(real rimage, int Nh, int Nhc, int os, int Nvc, int Nsy, pen pdef, real xd, real yd, int Nv) { int[] ridefN={ 4, 16 }; int[] ridefD={ 3, 9 }; int i; for (i=0; i<2; ++i) { real rid=ridefN[i]/ridefD[i]; if (rimage>rid) { int off, offa, offb; /* Nhdef=Nh*rid/rimage */ off=round(Nh*rid/rimage/2); offa=off+os; offb=off-os; // write(offa,offb); if (2*offa 0) { /* black, vertical gridlines redrawn below */ pair[] z; int col; z[0]=rcright[divsy]; col = rccolc[divsx+1]; z[1]=tvps(col,rcrowc[divsy], xd,yd,Nv); z[2]=tvps(col,rcrowc[divsy-1], xd,yd,Nv); col = rccolc[divsx]; z[3]=tvps(col,rcrowc[divsy-1], xd,yd,Nv); z[4]=tvps(col,rcrowc[divsy], xd,yd,Nv); z[5]=rcleft[divsy]; z[6]=rcleft[divsy+1]; z[7]=tvps(col,rcrowc[divsy+1], xd,yd,Nv); z[8]=tvps(col,rcrowc[divsy+2], xd,yd,Nv); col = rccolc[divsx+1]; z[9]=tvps(col,rcrowc[divsy+2], xd,yd,Nv); z[10]=tvps(col,rcrowc[divsy+1], xd,yd,Nv); z[11]=rcright[divsy+1]; fill(z[1]--z[2]--z[3]--z[4] //--z[5]--z[6] --arc(ccenter, z[5], z[6]) --z[7]--z[8]--z[9]--z[10] //--z[11]--z[0] --arc(ccenter,z[11], z[0]) --cycle, p=pblack); } else { /* 3 rows of black squares inside the gratings */ int i, imax = divsy+1; for (i=divsy-1; i<=imax; ++i) { /* all 3 rows */ int lmaxoff, lmincol, lmaxcol; int inext = i+1; int tr, br, j; /* XXX rcoff is relative to ccenter */ lmaxoff = min(floor(rcoff[i]), floor(rcoff[inext])); lmincol = Nhc-lmaxoff; lmaxcol = Nhc+lmaxoff; /* square top and bottom */ tr = rcrowb[i]; br = rcrowt[inext]; for (j=0; j 1) { write("centerline long : rows tr br ", rows, tr, br); } zz=tvrect(Nhc-os, tr, Nhc+os, br, xd,yd,Nv); fill(zz, p=pwhite); zz=tvrect(Nhc-maxoff,Nvc-1, Nhc+maxoff,Nvc+1, xd,yd,Nv); fill(zz, p=pwhite); /* vertical short lines */ rows=min(Nvc-rcrowc[divsy], rcrowc[divsy+1]-Nvc); tr=Nvc-rows; br=Nvc+rows; if (verbose > 1) { write("centerline short: rows tr br ", rows, tr, br); } if (colortv > 0) { int i; for (i=0; i<=cmaxi; ++i) { int coll, colr; coll=rccoll[i]; colr=rccolr[i]; if (mincol<=coll && colr<=maxcol) { path zzv; zzv=tvrect(coll, tr, colr, br, xd,yd,Nv); fill(zzv, p=pwhite); } } } return; } /************************ topbw **************************************/ void topbw(int[] coff, int Nhc, int os, int urow, int trow, int brow, pair ccenter, pair rclt, pair rclb, pair rcrt, pair rcrb, pen pdef, real xd, real yd, int Nv) { pen pblack=pdef+gray(0.0), pwhite=pdef+gray(1.0); pair[] ze; path zext, zref, zint; int off, col, cr; off=ceil((coff[2]+coff[3])/2); ze[0]=tvps(Nhc+off,trow, xd,yd,Nv); ze[1]=rcrt; ze[2]=rclt; ze[3]=tvps(Nhc-off,trow, xd,yd,Nv); ze[4]=tvps(Nhc-off,brow, xd,yd,Nv); col=Nhc-coff[2]-os; ze[5]=tvps(col,brow, xd,yd,Nv); ze[6]=tvps(col,trow, xd,yd,Nv); cr=col+3*os; /* reflection test black pulse */ zref=tvrect(col,trow, cr,brow, xd,yd,Nv); ze[7]=tvps(cr,trow, xd,yd,Nv); ze[8]=tvps(cr,brow, xd,yd,Nv); ze[9]=tvps(Nhc+off,brow, xd,yd,Nv); //dot(ze); zext=ze[0] // --ze[1]--ze[2] --arc(ccenter, ze[1], ze[2]) --ze[3]--ze[4]--ze[5]--ze[6]--ze[7]--ze[8]--ze[9]--cycle; off=ceil((coff[1]+coff[2])/2); zint=tvrect(Nhc-off,urow, Nhc+off,trow, xd,yd,Nv); /* paths are completely resolved; no free endpoint conditions */ fill(zext^^reverse(zint), p=pwhite); fill(zint, p=pblack); fill(zref, p=pblack); fill(arc(ccenter,rclt,rclb)--ze[4]--ze[3]--cycle, p=pblack); fill(arc(ccenter,rcrb,rcrt)--ze[0]--ze[9]--cycle, p=pblack); return; } /************************ testtone **************************************/ /* x on circle -> return y>=0 * in: * x x-coordinate relative to origin * crad circle radius in y units, true size=crad*yd */ real testcircx(real x, real crad, real xd, real yd) { real relx, ph, y; relx=x*xd/yd/crad; if (relx>1) { ph=0; } else { ph=acos(relx); } y=crad*sin(ph); // or (x*xd)^2+(y*yd)^2=(crad*yd)^2 return y; } /* y on circle -> return x>=0 */ real testcircy(real y, real crad, real xd, real yd) { real rely, ph, x; rely=y/crad; if (rely>1) { ph=pi/2; } else { ph=asin(rely); } x=crad*cos(ph)*yd/xd; // or (x*xd)^2+(y*yd)^2=(crad*yd)^2 return x; } /* brow>trow && xb>xt */ void testtone(real Tt, int trow, int brow, real ccol, real crow, real crad, pen pdef, real xd, real yd, int Nv) { int blocks, i; real yt, xt, yb, xb, Ttt=Tt/2; pair ccenter; yt=crow-trow; xt=testcircy(yt, crad, xd, yd); yb=crow-brow; xb=testcircy(yb, crad, xd, yd); //write('#xt yt\t',xt,yt); write('#xb yb\t',xb,yb); ccenter=tvps(ccol,crow, xd,yd,Nv); blocks=floor(2*xb/Tt); for (i=-blocks-1; i<=blocks; ++i) { real tl, tr; path zz; tl=max(-xb,min(i*Ttt,xb)); /* limit [-xb..xb] */ tr=max(-xb,min((i+1)*Ttt,xb)); if (tl<-xt && tr<=-xt || tr>xt && tl>=xt) { /* top full circle */ pair[] z; real yl, yr; yl=testcircx(tl, crad, xd, yd); yr=testcircx(tr, crad, xd, yd); z[0]=tvps(ccol+tl,brow, xd,yd,Nv); z[1]=tvps(ccol+tr,brow, xd,yd,Nv); z[2]=tvps(ccol+tr,crow-yr, xd,yd,Nv); z[3]=tvps(ccol+tl,crow-yl, xd,yd,Nv); zz=z[0]--z[1]--arc(ccenter,z[2],z[3])--cycle; } else if(tl<-xt) { /* tl in circel, tr not, partial */ pair[] z; real yl; yl=testcircx(tl, crad, xd, yd); z[0]=tvps(ccol+tl,brow, xd,yd,Nv); z[1]=tvps(ccol+tr,brow, xd,yd,Nv); z[2]=tvps(ccol+tr,trow, xd,yd,Nv); z[3]=tvps(ccol-xt,trow, xd,yd,Nv); z[4]=tvps(ccol+tl,crow-yl, xd,yd,Nv); zz=z[0]--z[1]--z[2]--arc(ccenter,z[3],z[4])--cycle; } else if(tr>xt) { /* tr in circle, tl not, partial */ pair[] z; real yr; yr=testcircx(tr, crad, xd, yd); z[0]=tvps(ccol+tl,brow, xd,yd,Nv); z[1]=tvps(ccol+tr,brow, xd,yd,Nv); z[2]=tvps(ccol+tr,crow-yr, xd,yd,Nv); z[3]=tvps(ccol+xt,trow, xd,yd,Nv); z[4]=tvps(ccol+tl,trow, xd,yd,Nv); zz=z[0]--z[1]--arc(ccenter,z[2],z[3])--z[4]--cycle; } else { /* full block */ pair[] z; z[0]=tvps(ccol+tr,trow, xd,yd,Nv); z[1]=tvps(ccol+tl,trow, xd,yd,Nv); z[2]=tvps(ccol+tl,brow, xd,yd,Nv); z[3]=tvps(ccol+tr,brow, xd,yd,Nv); zz=z[0]--z[1]--z[2]--z[3]--cycle; } if (tl1) { thetaret=0; } else { real dpi=2*pi; cycles-=coverflow*sgn(cycles); thetaret=theta+cycles*dpi; /* cycles=(-1 .. 1) */ if (thetaret>pi) { thetaret-=dpi; } else if (thetaret<-pi) { thetaret-=dpi; } } //write("addphase: ", step, theta, thetaret); return thetaret; } void testfreqs(real[] ftones, int[] coff, int Nhc, int trow,int crow,int brow, pair ccenter, pair rclt, pair rclb, pair rcrt, pair rcrb, pen pdef, real xd, real yd, int Nv) { int[] divc; real[] divfl, divfr; int i, divs, coffmax, off, divnext; real fl, fr, thr, thl; /* Segment info for PAL continental test card * segment i extends from (divc[i] .. divc[i+1]) with frequency divf[i] */ divs=2; // the number of segments to the right, total=2*divs+1 divc[0]=0; for (i=0; i<=divs; ++i) { int ii=i*2, il=divs-i, ir=divs+i; divc[i+1]=ceil((coff[ii]+coff[ii+1])/2); /* xdot distance to center */ divfl[i]=ftones[divs-i]; divfr[i]=ftones[divs+i]; } coffmax=divc[divs+1]; int trowlim=coff[0]; int tr; tr=crow; divnext=0; fl=0; fr=0; thl=0; /* ={ 0, -pi/2 } : initial angle at center vertical line Nhc */ thr=thl; /* draw a vertical line at off..off+1, use theta for off+1/2 */ for (off=0; off0) { if (verbose > 1) write("right ears"); cy=cyr; cu=cur; cv=cvr; } else { if (verbose > 1) write("left ears"); cy=cyl; cu=cul; cv=cvl; } lcol=Nhc+dright*coffa[5]; ccol=Nhc+dright*coff[6]; cicol=Nhc+dright*coffa[6]; rcol=Nhc+dright*coffb[7]; int urow, trow, crow, brow, arow; urow=rcrowb[divsy-5]; trow=rcrowt[divsy-3]; crow=Nvc; brow=rcrowb[divsy+4]; arow=rcrowt[divsy+6]; z[0]=tvps(ccol,urow, xd,yd,Nv); z[1]=tvps(ccol,trow, xd,yd,Nv); z[2]=tvps(cicol,trow, xd,yd,Nv); z[3]=tvps(cicol,crow, xd,yd,Nv); z[4]=tvps(rcol,crow, xd,yd,Nv); z[5]=tvps(rcol,urow, xd,yd,Nv); zz[0]=z[0]--z[1]--z[2]--z[3]--z[4]--z[5]--cycle; zz[1]=tvrect(lcol,urow, ccol,trow, xd,yd,Nv); zz[2]=tvrect(lcol,brow, ccol,arow, xd,yd,Nv); z[0]=tvps(ccol,arow, xd,yd,Nv); z[1]=tvps(ccol,brow, xd,yd,Nv); z[2]=tvps(cicol,brow, xd,yd,Nv); z[3]=tvps(cicol,crow, xd,yd,Nv); z[4]=tvps(rcol,crow, xd,yd,Nv); z[5]=tvps(rcol,arow, xd,yd,Nv); zz[3]=z[0]--z[1]--z[2]--z[3]--z[4]--z[5]--cycle; for (i=0; i<4; ++i) { real y, u, v, A, ph, By, Ry, Gy, R, G, B; y=cy[i]; u=cu[i]; v=cv[i]; A=hypot(u,v); ph= (u!=0 || v!=0) ? atan2(v,u) : 0.0; if (v>=0) { if (ph<0) ph=ph+pi; } else { if (ph>0) ph=ph-pi; } if (A>0) { u=u/A*cI; v=v/A*cI; } By=u/wu; Ry=v/wv; Gy=(-wr*Ry-wb*By)/wg; //write(y,Gy,A,ph*180/pi); R=Ry+y; G=Gy+y; B=By+y; if (verbose > 1) write(y*1000, round(R*1000), round(G*1000), round(B*1000)); fill(zz[i], p=pdef+rgb(R,G,B)); } return; } /****************************** NTSC bars ***********************************/ /* amplitude equals color burst smpte (pm: -V +U) * y campl sat R G B * left 0.5 0.21 70% -I? * right 0.5 0.17 60% +Q? */ void ntscbars(int[] rccoll, int[] rccolr, int divsx, int[] rcrowt, int[] rcrowb, int divsy, int dright, pen pdef, real xd, real yd, int Nv) { /* The amplitude of (i,q) as seen on a vectorscope, * max 0.292 Vn for 100% saturation in I==0 ears. * burst: 0.143 Vcvbs, 20 IRE or 0.200 V normalized. * pedestal: (yp,up,vp)=(p,0,0)+(1-p)*(y,u,v), p=0.075. * choice: equal amplitude for colorburst and subcarrier. */ real campl=0.200/0.925; /* wg=0.587, y=wr*R+wg*G+wb*B */ real wr=0.299, wb=0.114, wg=1-wr-wb; /* iT : iq -> RyBy : rotation+scaling */ real iT11=0.95, iT12=0.62, iT21=-1.11, iT22=1.71; /* bars -2 -1 0 1 2 */ real[] cyl={ 0.50, 0.50, 1, 0.50, 0.50 }; real[] cil={ 0, 0, 0, -1, 1 }; real[] cql={ -1, 1, 0, 0, 0 }; int[] indl={ -7, -8, 0, 8, 7 }; real cy, ci, cq; int rmaxi, dri, ind, ibase, lcol, rcol, i; rmaxi=2*divsy+1; if (dright<-2 || dright>2) { dri=2; } else { dri=2+dright; } cy=cyl[dri]; ci=cil[dri]; cq=cql[dri]; ind=indl[dri]; ibase=divsx+ind; lcol=rccolr[ibase]; rcol=rccoll[ibase+1]; real A, By, Ry, Gy, R, G, B; A=hypot(ci,cq); if (A>0) { ci=ci/A*campl; cq=cq/A*campl; } Ry=iT11*ci+iT12*cq; By=iT21*ci+iT22*cq; Gy=(-wr*Ry-wb*By)/wg; //write(cy,Ry,Gy,By); R=Ry+cy; G=Gy+cy; B=By+cy; if (verbose > 1) write(ind, cy*1000, round(ci*1000), round(cq*1000), round(R*1000), round(G*1000), round(B*1000)); for (i=0; i0) { trow=rcrowb[i]; } else { trow=floor((rcrowb[i]+rcrowt[inext])/2); } if (inext768 rerastering * 16 720->768 rerastering */ access settings; usersetting(); if (bsys<0 || bsys>12 || colortv<0 || colortv>3 || os<=0 || os>16) { write("Error: bad user input: bsys, colortv, os=\t", bsys, colortv, os); abort("Bad option -u bsys=N ?"); } int[] bNdot= { 12, 16, 12, 16, 1, 1, 1, 64, 10, 8, 10, 1, 1 }; int[] bDdot= { 11, 15, 11, 11, 1, 1, 1, 45, 11, 9, 11, 1, 1 }; int[] bNh= { 704, 720, 720, 720, 768, 768, 786, 720, 704, 720, 720, 1920, 1600 }; int[] bNv= { 576, 576, 576, 576, 576, 576, 576, 576, 480, 480, 480, 1080, 1200 }; real[] bfs= { 13.5,13.5,13.5,13.5, 14.75,14.4,14.75,13.5, 13.5,13.5,13.5, 36, 30 }; int[] bNsy= { 42, 42, 42, 42, 42, 42, 42, 42, 34, 34, 34, 78, 90 }; int[] bNsh= { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; /* active lines for a 625 line frame * The number of active video lines decreased around 1997. * old: 3 run in + 575 visible + 3 run out = 581 lines * new: 6 teletext and WSS + 575 visible * Hence the image center shifted down by 3 lines. Thus * old TV + new testcard = bottom is cut off, * new TV + old testcard = top is cut off. * * To generate the old testcard either use Nv=582 Nsh=0 or Nv=576 Nsh=3. * * aspect ratio * rimage=xsize/ysize rimage=rdot*Nh/Nv * Nh=704 dots * Nv=576 lines * rd=ri*Nv/Nh=4/3*9/11=12/11 * * Nv: 480=2^5*3*5 576=2^6*3^2 * Nh: 704=2^6*11 720=2^4*3^2*5 * * horizontal line distance for pre 1997 test pattern * top 8 lines, 13 squares of Ny=43 lines, bottom 9 lines * top 12 lines, 13 squares of Ny=42 lines, bottom 18 lines * pairs are from odd even field * Interlace test: Ny must be odd for a cross-hatch without centerline. * * squares: ly=Nsy, lx=rd*Nsx, lx=ly ==> Nsx=Nsy/rd={ 39.4, 38.5 } * x line width 230 ns -> 3 dots * bottom 2.9us red -> 39.15 dots * * resolution DPI from image aspect ratio * Rv=Nv/ly, ly=4in * ri=Ni/Di, Ni={ 4, 15, 16} Di={ 3, 11, 9} * lx=ri*ly * * Rh=Nh/lx=Di*(Nh/(Ni*ly)) * integer Rh: * Ni=4 ri=4/Di => Nh=k*16 * Ni=15 ri=15/Di => Nh=k*60 * Ni=16 ri=16/Di => Nh=k*64 * * resolution DPI from dot aspect ratio, general algorithm, * * rd=Nd/Dd=ldx/ldy * * assume 1 dot = Nd x Dd square subdots at a resolution of k, in dpi, then * * ldx=Nd/k, ldy=Dd/k ==> Rh=k/Nd, Rv=k/Dd * * choosing k=m*Nd*Dd for integer Rh and Rv gives * * ldx=1/(m*Dd), ldy=1/(m*Nd), Rh=m*Dd, Rv=m*Nd * * and * * lx=Nh*ldx=Nh/(m*Dd), ly=Nv*ldy=Nv/(m*Nd) * * so choose m for the intended height Ly, in inch, as * * m=round(Nv/(Ly*Nd)) * * which limits Ly<=Nv/Nd since Rv>=Nd. */ //cm=72/2.540005; real Ly, ly, lx, ysize, xsize, rimage, xd, yd, pwidth; int Nd, Dd, m, Nh, Nv, Nshift, Na, Nsy; real fs, Ttone; Nd=bNdot[bsys]; Dd=bDdot[bsys]*os; Nh=bNh[bsys]*os; Nv=bNv[bsys]; Ly=4; // 4 inch vertical size m=floor(0.5+Nv/(Ly*Nd)); if (m < 1) m=1; ly=Nv/(m*Nd); lx=Nh/(m*Dd); ysize=ly*1inch; xsize=lx*1inch; rimage=xsize/ysize; if (verbose > 1) { write("#Nd Dd m ri:\t", Nd, Dd, m, rimage); } //size(xsize, ysize, Aspect); // should not have any effect Nsy=bNsy[bsys]; // grating size in lines 42,43 or 34,35 Nshift=bNsh[bsys]; // shift image up: pre 1997 =3, 2007 =0 fs=1e6*bfs[bsys]*os; Na=0; // add 1,0,-1 to height of hor center squares for even Na+Nsy Ttone=fs/250e3; // period of ft=250 kHz, fs/ft=54 real[] ftones={0.8e6/fs, 1.8e6/fs, 2.8e6/fs, 3.8e6/fs, 4.8e6/fs}; xd=xsize/Nh; yd=ysize/Nv; pwidth=min(abs(xd),abs(yd)); pen pdefault = squarecap+linewidth(pwidth); pen pblack = pdefault+gray(0.0); pen pwhite = pdefault+gray(1.0); /**** calculate grating repeats and size in tv dots ****/ /* horizontal lines */ int divsy, rdisty, Nvc, Nt, Nb, rmaxi; Nvc=floor(Nv/2)-Nshift; /* top half picture (Nv-2)/2-(Nsy+Na)/2 dots for divisions of Nsy dots */ divsy=floor(((Nv-2-Na)/Nsy-1)/2); rdisty=Na+Nsy*(1+2*divsy); /* first guess free lines top and bottom */ Nt=Nvc-ceil(rdisty/2); Nb=Nv-Nt-rdisty; if (verbose > 1) { write('#divsy t b: \t', divsy, Nt, Nb); } rmaxi=2*divsy+1; /* Nsyc: center square height * line pairing test: verify distance of center to top and bot * distance is odd ==> top=even/odd, cent=odd/even, bot=even/odd * * Nsyc odd: not possible * * Nsyc even: * Nsyc/2 odd --> OK * Nsyc/2 even --> stagger the raster one line upwards * * rcrowt top dist of hor line * rcrowc true center for color info, distance to top of image. * rcrowb bot dist of hor line * * offd = offu-Nsyc * Nt = Nvc-(offu+divsy*Nsy); * Nb = Nv-( Nvc-(offd-divsy*Nsy) ); * ==> Nt+Nb = Nv-Nsyc-2*divsy*Nsy */ int Nsyc, offu, offd, Nyst=0, i; int[] rcrowt, rcrowc, rcrowb; Nsyc=Nsy+Na; offu=floor(Nsyc/2); offd=offu-Nsyc; if (Nsyc%2 != 0) { Nyst=1; } else if (Nsyc%4 == 0) { Nyst=1; /* stagger */ } for (i=0; i<=divsy; ++i) { int iu, id, ou, od, ru, rd; iu=divsy-i; id=divsy+i+1; ou=offu+Nsy*i; od=offd-Nsy*i; if (verbose > 1) { write(ou,od); } rcrowc[iu]=Nvc-ou; rcrowc[id]=Nvc-od; ru=Nvc-(ou+Nyst); rd=Nvc-(od+Nyst); rcrowt[iu]=ru-1; rcrowb[iu]=ru+1; rcrowt[id]=rd-1; rcrowb[id]=rd+1; } Nt=floor((rcrowt[0]+rcrowb[0])/2); Nb=Nv-Nt-Nsyc-2*Nsy*divsy; if (verbose > 1) { write('#st t b: \t', Nyst, Nt, Nb); } /* vertical lines * (Nh-2*os)/2-Nsx/2 dots available for divisions of Nsx dots. * At least 5 dots margin left and right ==> use -10*os */ real lsq, Nsx, rdistx; int divsx, Nhc, Nl, Nr, cmaxi; lsq=Nsy*yd; Nsx=lsq/xd; /* floating point */ divsx=floor(((Nh-10*os)/Nsx-1)/2); Nhc=round(Nh/2); rdistx=(1+2*divsx)*Nsx; Nl=Nhc-round(rdistx/2); if (verbose > 1) { write('#divsx Nsx l:\t', divsx, Nsx, Nl); } cmaxi=2*divsx+1; int[] coff, coffl, coffr; int[] rccoll, rccolc, rccolr; for (i=0; i<=divsx; ++i) { int off, offl, offr, il, ir; real cdist; cdist=Nsx*(1+2*i); /* horizontal distance 2 symmetrical vert lines */ off=round(cdist/2); // write(cdist, off); offl=off-os; offr=off+os; coff[i]=off; coffl[i]=offl; coffr[i]=offr; if (verbose > 1) { write(cdist, off); } il=divsx-i; ir=divsx+i+1; rccoll[il]=Nhc-offr; rccolc[il]=Nhc-off; rccolr[il]=Nhc-offl; rccoll[ir]=Nhc+offl; rccolc[ir]=Nhc+off; rccolr[ir]=Nhc+offr; } Nl=rccolc[0]; Nr=Nh-rccolc[cmaxi]; if (verbose > 1) { write('#divsx Nsx l r:\t', divsx, Nsx, Nl, Nr); } /**** draw gray background ****/ { path zz; //zz=tvrect(0,0, Nh,Nv, xd,yd,Nv); /* keep white canvas for castellations */ zz=tvrect(rccoll[0],rcrowt[0], rccolr[cmaxi],rcrowb[rmaxi], xd,yd,Nv); fill(zz, p=pdefault+gray(0.5)); //dot(zz); } /**** draw center circle ****/ real cx, cy, crad; pair ccenter; path ccirc; cx=Nh/2; cy=Nv/2-Nshift; crad=6*Nsy; if (Nv%2 != 0) { crad+=0.5; } ccenter=tvps(cx,cy, xd,yd,Nv); ccirc=circle(ccenter, crad*yd); if (colortv<=0) { draw(ccirc, p=pwhite+linewidth(2*yd)); } /**** draw 2*divsy+2 horizontal gridlines ****/ real[] rcang, rcoff; pair[] rcright, rcleft; int i; for (i=0; i<=rmaxi; ++i) { real y, ph, x; path zzh; pair zd; zzh=tvrect(0,rcrowt[i], Nh,rcrowb[i], xd,yd,Nv); fill(zzh, p=pwhite); y=cy-rcrowc[i]; if (abs(y)4/3) { rimarkers(rimage, Nh, Nhc, os, Nvc, Nsy, pwhite, xd, yd, Nv); } /****** line pairing center ******/ centerline(colortv, rccoll, rccolc, rccolr, divsx, Nhc, os, rcrowt, rcrowc, rcrowb, divsy, Nvc, ccenter, rcoff, rcright, rcleft, pdefault, xd, yd, Nv); if (colortv>0) { /* topbw structure */ topbw(coff, Nhc, os, rcrowc[divsy-5], rcrowc[divsy-4], rcrowc[divsy-3], ccenter, rcleft[divsy-4], rcleft[divsy-3], rcright[divsy-4], rcright[divsy-3], pdefault, xd, yd, Nv); /* 250 kHz */ testtone(Ttone, rcrowc[divsy-3], rcrowc[divsy-2], cx, cy, crad, pdefault, xd, yd, Nv); /* color bars */ colorbars(coff, Nhc, rcrowc[divsy-2], rcrowc[divsy-1], rcrowc[divsy], ccenter, rcleft[divsy-2], rcleft[divsy], rcright[divsy-2], rcright[divsy], pdefault, xd, yd, Nv); /* test frequencies */ testfreqs(ftones, coff, Nhc, rcrowc[divsy+1], rcrowc[divsy+2], rcrowc[divsy+3], ccenter, rcleft[divsy+1], rcleft[divsy+3], rcright[divsy+1],rcright[divsy+3], pdefault, xd, yd, Nv); /* gray bars */ graybars(coff, Nhc, rcrowc[divsy+3], rcrowc[divsy+4], ccenter, rcleft[divsy+3], rcleft[divsy+4], rcright[divsy+3], rcright[divsy+4], pdefault, xd,yd,Nv); /* PAL ears */ if (colortv == 1) { palears(coff,coffr,coffl, Nhc, rcrowt, rcrowb, Nvc, divsy, -1, pdefault, xd, yd, Nv); palears(coff,coffr,coffl, Nhc, rcrowt, rcrowb, Nvc, divsy, 1, pdefault, xd, yd, Nv); } else if (colortv == 2) { ntscbars(rccoll, rccolr, divsx, rcrowt, rcrowb, divsy, -1, pdefault, xd, yd, Nv); ntscbars(rccoll, rccolr, divsx, rcrowt, rcrowb, divsy, 1, pdefault, xd, yd, Nv); ntscbars(rccoll, rccolr, divsx, rcrowt, rcrowb, divsy, -2, pdefault, xd, yd, Nv); ntscbars(rccoll, rccolr, divsx, rcrowt, rcrowb, divsy, 2, pdefault, xd, yd, Nv); } /* bottom wh - black - wh */ bottombw(round((coff[2]+coff[3])/2), Nhc, rcrowc[divsy+4], rcrowc[divsy+5], ccenter, rcleft[divsy+4], rcleft[divsy+5], rcright[divsy+4], rcright[divsy+5], pdefault, xd, yd, Nv); /* bottom yellow red circle */ bottomcirc(coff[0], Nhc, rcrowc[divsy+5], cx, cy, crad, ccenter, rcleft[divsy+5], rcright[divsy+5], pdefault, xd, yd, Nv); } /********************** set id *********************/ { /* dpi */ pair rpos=tvps(Nhc,round((rcrowc[divsy-4]+rcrowc[divsy-5])/2), xd,yd,Nv); string iRhor, iRver, ires; real Rh, Rv; Rh=Nh/xsize*inch; Rv=Nv/ysize*inch; iRhor=format("%.4gx", Rh); iRver=format("%.4gdpi", Rv); ires=insert(iRver,0, iRhor); /* size info */ int rowbot=round((rcrowc[divsy+4]+rcrowc[divsy+5])/2); pair tpos=tvps(Nhc,rowbot, xd,yd,Nv); string ihor, iver, itot, iasp, ifm; real asp, fm; ihor=format("%ix",Nh); iver=format("%i ",Nv); itot=insert(iver,0, ihor); asp=xsize/ysize; iasp=format("%.3g ",asp); fm=fs/1e6; ifm=format("%.4gMHz",fm); itot=insert(iasp,0, itot); itot=insert(ifm,0, itot); /* size of square */ int rowNsy, colNsy; pair Npos; string iNsy; pen pbw; rowNsy = round((rcrowc[divsy+5]+rcrowc[divsy+6])/2); colNsy = round((rccolc[divsx+5]+rccolc[divsx+6])/2); Npos = tvps(colNsy,rowNsy, xd,yd,Nv); iNsy = format("%i", Nsy); if (colortv>0) { pbw=pdefault+gray(1.0); } else { pbw=pdefault+gray(0.0); } label(ires, rpos, p=pbw); label(itot, tpos, p=pbw); label(iNsy, Npos, p=pbw); if (verbose > 1) write('#res:\t', ires, itot, iNsy); } ./asymptote-2.41/examples/wedge.asy0000644000175000017500000000116413064427076017174 0ustar norbertnorbertimport graph3; import solids; size(0,150); currentprojection=perspective(8,10,2); currentlight=White; draw(circle(O,4,Z)); draw(shift(-4Z)*scale(4,4,8)*unitcylinder,green+opacity(0.2)); triple F(real x){return (x,sqrt(16-x^2),sqrt((16-x^2)/3));} path3 p=graph(F,0,4,operator ..); path3 q=reverse(p)--rotate(180,(0,4,4/sqrt(3)))*p--cycle; render render=render(merge=true); draw(surface(q--cycle),red,render); real t=2; path3 triangle=(t,0,0)--(t,sqrt(16-t^2),0)--F(t)--cycle; draw(surface(triangle),blue,render); xaxis3("$x$",Arrow3,PenMargin3(0,0.25)); yaxis3("$y$",Arrow3,PenMargin3(0,0.25)); zaxis3("$z$",dashed,Arrow3); ./asymptote-2.41/examples/spring.asy0000644000175000017500000000123713064427076017404 0ustar norbertnorbertpair coilpoint(real lambda, real r, real t) { return (2.0*lambda*t+r*cos(t),r*sin(t)); } guide coil(guide g=nullpath, real lambda, real r, real a, real b, int n) { real width=(b-a)/n; for(int i=0; i <= n; ++i) { real t=a+width*i; g=g..coilpoint(lambda,r,t); } return g; } void drawspring(real x, string label) { real r=8; real t1=-pi; real t2=10*pi; real lambda=(t2-t1+x)/(t2-t1); pair b=coilpoint(lambda,r,t1); pair c=coilpoint(lambda,r,t2); pair a=b-20; pair d=c+20; draw(a--b,BeginBar(2*barsize())); draw(c--d); draw(coil(lambda,r,t1,t2,100)); dot(d); pair h=20*I; draw(label,a-h--d-h,red,Arrow,Bars,PenMargin); } ./asymptote-2.41/examples/colorplanes.asy0000644000175000017500000000072113064427076020420 0ustar norbertnorbertsize(6cm,0); import bsp; real u=2.5; real v=1; currentprojection=oblique; path3 y=plane((2u,0,0),(0,2v,0),(-u,-v,0)); path3 l=rotate(90,Z)*rotate(90,Y)*y; path3 g=rotate(90,X)*rotate(90,Y)*y; face[] faces; pen[] p={red,green,blue,black}; int[] edges={0,0,0,2}; gouraudshade(faces.push(y),project(y),p,edges); gouraudshade(faces.push(l),project(l),p,edges); gouraudshade(faces.push(g),project(g),new pen[]{cyan,magenta,yellow,black}, edges); add(faces); ./asymptote-2.41/examples/thermodynamics.asy0000644000175000017500000002374213064427076021135 0ustar norbertnorbert// example file for roundedpath() in roundedpath.asy // written by stefan knorr // import needed packages import roundedpath; // function definition picture CreateKOOS(real Scale, string legend) // draw labeled coordinate system as picture { picture ReturnPic; real S = 1.2*Scale; draw(ReturnPic, ((-S,0)--(S,0)), bar = EndArrow); // x axis draw(ReturnPic, ((0,-S)--(0,S)), bar = EndArrow); // y axis label(ReturnPic, "$\varepsilon$", (S,0), SW); // x axis label label(ReturnPic, "$\sigma$", (0,S), SW); // y axis label label(ReturnPic, legend, (0.7S, -S), NW); // add label 'legend' return ReturnPic; // return picture } // some global definitions real S = 13mm; // universal scale factor for the whole file real grad = 0.25; // gradient for lines real radius = 0.04; // radius for the rounded path' real lw = 2; // linewidth pair A = (-1, -1); // start point for graphs pair E = ( 1, 1); // end point for graphs path graph; // local graph pen ActPen; // actual pen for each drawing picture T[]; // vector of all four diagrams real inc = 2.8; // increment-offset for combining pictures //////////////////////////////////////// 1st diagram T[1] = CreateKOOS(S, "$T_1$"); // initialise T[1] as empty diagram with label $T_1$ graph = A; // # pointwise definition of current path 'graph' graph = graph -- (A.x + grad*1.6, A.y + 1.6); // # graph = graph -- (E.x - grad*0.4, E.y - 0.4); // # graph = graph -- E; // # graph = roundedpath(graph, radius, S); // round edges of 'graph' using roundedpath() in roundedpath.asy ActPen = rgb(0,0,0.6) + linewidth(lw); // define pen for drawing in 1st diagram draw(T[1], graph, ActPen); // draw 'graph' with 'ActPen' into 'T[1]' (1st hysteresis branch) draw(T[1], rotate(180,(0,0))*graph, ActPen); // draw rotated 'graph' (2nd hysteresis branch) graph = (0,0) -- (grad*0.6, 0.6) -- ( (grad*0.6, 0.6) + (0.1, 0) ); // define branch from origin to hysteresis graph = roundedpath(graph, radius, S); // round this path draw(T[1], graph, ActPen); // draw this path into 'T[1]' //////////////////////////////////////// 2nd diagram T[2] = CreateKOOS(S, "$T_2$"); // initialise T[2] as empty diagram with label $T_2$ graph = A; // # pointwise definition of current path 'graph' graph = graph -- (A.x + grad*1.3, A.y + 1.3); // # graph = graph -- (E.x - grad*0.7 , E.y - 0.7); // # graph = graph -- E; // # graph = roundedpath(graph, radius, S); // round edges of 'graph' using roundedpath() in roundedpath.asy ActPen = rgb(0.2,0,0.4) + linewidth(lw); // define pen for drawing in 2nd diagram draw(T[2], graph, ActPen); // draw 'graph' with 'ActPen' into 'T[2]' (1st hysteresis branch) draw(T[2], rotate(180,(0,0))*graph, ActPen); // draw rotated 'graph' (2nd hysteresis branch) graph = (0,0) -- (grad*0.3, 0.3) -- ( (grad*0.3, 0.3) + (0.1, 0) ); // define branch from origin to hysteresis graph = roundedpath(graph, radius, S); // round this path draw(T[2], graph, ActPen); // draw this path into 'T[2]' //////////////////////////////////////// 3rd diagram T[3] = CreateKOOS(S, "$T_3$"); // initialise T[3] as empty diagram with label $T_3$ graph = A; // # pointwise definition of current path 'graph' graph = graph -- (A.x + grad*0.7, A.y + 0.7); // # graph = graph -- ( - grad*0.3 , - 0.3); // # graph = graph -- (0,0); // # graph = graph -- (grad*0.6, 0.6); // # graph = graph -- (E.x - grad*0.4, E.y - 0.4); // # graph = graph -- E; // # graph = roundedpath(graph, radius, S); // round edges of 'graph' using roundedpath() in roundedpath.asy ActPen = rgb(0.6,0,0.2) + linewidth(lw); // define pen for drawing in 3rd diagram draw(T[3], graph, ActPen); // draw 'graph' with 'ActPen' into 'T[3]' (1st hysteresis branch) draw(T[3], rotate(180,(0,0))*graph, ActPen); // draw rotated 'graph' (2nd hysteresis branch) //////////////////////////////////////// 4th diagram T[4] = CreateKOOS(S, "$T_4$"); // initialise T[4] as empty diagram with label $T_4$ graph = A; // # pointwise definition of current path 'graph' graph = graph -- (A.x + grad*0.4, A.y + 0.4); // # graph = graph -- ( - grad*0.6 , - 0.6); // # graph = graph -- (0,0); // # graph = graph -- (grad*0.9, 0.9); // # graph = graph -- (E.x - grad*0.1, E.y - 0.1); // # graph = graph -- E; // # graph = roundedpath(graph, radius, S); // round edges of 'graph' using roundedpath() in roundedpath.asy ActPen = rgb(0.6,0,0) + linewidth(lw); // define pen for drawing in 4th diagram draw(T[4], graph, ActPen); // draw 'graph' with 'ActPen' into 'T[4]' (1st hysteresis branch) draw(T[4], rotate(180,(0,0))*graph, ActPen); // draw rotated 'graph' (3nd hysteresis branch) // add some labels and black dots to the first two pictures pair SWW = (-0.8, -0.6); label(T[1], "$\sigma_f$", (0, 0.6S), NE); // sigma_f draw(T[1], (0, 0.6S), linewidth(3) + black); label(T[2], "$\sigma_f$", (0, 0.3S), NE); // sigma_f draw(T[2], (0, 0.3S), linewidth(3) + black); label(T[1], "$\varepsilon_p$", (0.7S, 0), SWW); // epsilon_p draw(T[1], (0.75S, 0), linewidth(3) + black); label(T[2], "$\varepsilon_p$", (0.7S, 0), SWW); // epsilon_p draw(T[2], (0.75S, 0), linewidth(3) + black); // add all pictures T[1...4] to the current one add(T[1],(0,0)); add(T[2],(1*inc*S,0)); add(T[3],(2*inc*S,0)); add(T[4],(3*inc*S,0)); // draw line of constant \sigma and all intersection points with the graphs in T[1...4] ActPen = linewidth(1) + dashed + gray(0.5); // pen definition draw((-S, 0.45*S)--((3*inc+1)*S, 0.45*S), ActPen); // draw backgoundline label("$\sigma_s$", (-S, 0.45S), W); // label 'sigma_s' path mark = scale(2)*unitcircle; // define mark-symbol to be used for intersections ActPen = linewidth(1) + gray(0.5); // define pen for intersection mark draw(shift(( 1 - grad*0.55 + 0*inc)*S, 0.45*S)*mark, ActPen); // # draw all intersections draw(shift((-1 + grad*1.45 + 0*inc)*S, 0.45*S)*mark, ActPen); // # draw(shift(( 1 - grad*0.55 + 1*inc)*S, 0.45*S)*mark, ActPen); // # draw(shift(( 1 - grad*0.55 + 2*inc)*S, 0.45*S)*mark, ActPen); // # draw(shift(( grad*0.45 + 2*inc)*S, 0.45*S)*mark, ActPen); // # draw(shift(( grad*0.45 + 3*inc)*S, 0.45*S)*mark, ActPen); // # ./asymptote-2.41/examples/SierpinskiGasket.asy0000644000175000017500000000152113064427076021355 0ustar norbertnorbertsize(200); import palette; import three; currentprojection=perspective(8,2,1); triple[] M={(0,0,1),1/3*(sqrt(8),0,-1), 1/3*((sqrt(8))*Cos(120),(sqrt(8))*Sin(120),-1), 1/3*((sqrt(8))*Cos(240),(sqrt(8))*Sin(240),-1)}; int level=5; surface s; void recur(triple p, real u, int l) { if(l < level) for(triple V : M) recur(p+u*V,u/2,l+1); else for(triple V : M) { s.append(surface((p+u*(V+M[0]))--(p+u*(V+M[1]))--(p+u*(V+M[2]))--cycle)); s.append(surface((p+u*(V+M[0]))--(p+u*(V+M[2]))--(p+u*(V+M[3]))--cycle)); s.append(surface((p+u*(V+M[0]))--(p+u*(V+M[3]))--(p+u*(V+M[1]))--cycle)); s.append(surface((p+u*(V+M[3]))--(p+u*(V+M[2]))--(p+u*(V+M[1]))--cycle)); } } recur(O,0.5,1); s.colors(palette(s.map(zpart),Rainbow())); draw(s,render(merge=true)); ./asymptote-2.41/examples/polararea.asy0000644000175000017500000000164213064427076020050 0ustar norbertnorbertimport math; import graph; size(0,150); real f(real t) {return 5+cos(10*t);} xaxis("$x$"); yaxis("$y$"); real theta1=pi/8; real theta2=pi/3; path k=graph(f,theta1,theta2,operator ..); real rmin=min(k).y; real rmax=max(k).y; draw((0,0)--rmax*expi(theta1),dotted); draw((0,0)--rmax*expi(theta2),dotted); path g=polargraph(f,theta1,theta2,operator ..); path h=(0,0)--g--cycle; fill(h,lightgray); draw(h); real thetamin=3*pi/10; real thetamax=2*pi/10; pair zmin=polar(f(thetamin),thetamin); pair zmax=polar(f(thetamax),thetamax); draw((0,0)--zmin,dotted+red); draw((0,0)--zmax,dotted+blue); draw("$\theta_*$",arc((0,0),0.5*rmin,0,degrees(thetamin)),red+fontsize(10pt), PenMargins); draw("$\theta^*$",arc((0,0),0.5*rmax,0,degrees(thetamax)),blue+fontsize(10pt), PenMargins); draw(arc((0,0),rmin,degrees(theta1),degrees(theta2)),red,PenMargins); draw(arc((0,0),rmax,degrees(theta1),degrees(theta2)),blue,PenMargins); ./asymptote-2.41/examples/upint.asy0000644000175000017500000000030713064427076017236 0ustar norbertnorbertimport graph; import lowupint; size(100,0); real a=-0.8, b=1.2; real c=-1.0/sqrt(3.0); partition(a,b,c,max); arrow("$f(x)$",F(0.5*(a+b)),NNE,red); label("$\cal{U}$",(0.5*(a+b),f(0.5*(a+b))/2)); ./asymptote-2.41/examples/planeproject.asy0000644000175000017500000000064213064427076020567 0ustar norbertnorbertimport graph3; size3(200,IgnoreAspect); currentprojection=orthographic(4,6,3); real x(real t) {return 1+cos(2pi*t);} real y(real t) {return 1+sin(2pi*t);} real z(real t) {return t;} path3 p=graph(x,y,z,0,1,operator ..); draw(p,Arrow3); draw(planeproject(XY*unitsquare3)*p,red,Arrow3); draw(planeproject(YZ*unitsquare3)*p,green,Arrow3); draw(planeproject(ZX*unitsquare3)*p,blue,Arrow3); axes3("$x$","$y$","$z$"); ./asymptote-2.41/examples/sacylinder3D.asy0000644000175000017500000000052513064427076020425 0ustar norbertnorbertimport solids; size(0,100); real r=1; real h=3; revolution R=cylinder(-h/2*Z,r,h); draw(surface(R),lightgreen+opacity(0.5),render(compression=Low)); draw((0,0,-h/2)--(0,0,h/2),dashed); dot((0,0,-h/2)); dot((0,0,h/2)); draw("$L$",(0,r,-h/2)--(0,r,h/2),W,black); draw("$r$",(0,0,-h/2)--(0,r,-h/2),red); draw(arc(O,1,90,90,90,0),red,Arrow3); ./asymptote-2.41/examples/NURBScurve.asy0000644000175000017500000000121113064427076020030 0ustar norbertnorbertimport three; size(10cm); currentprojection=perspective(50,80,50); // Nonrational curve: // udegree=3, nu=6; real[] knot={0,0,0,0,0.4,0.6,1,1,1,1}; triple[] P={ (-31.2061,12.001,6.45082), (-31.3952,14.7353,6.53707), (-31.5909,21.277,6.70051), (-31.4284,25.4933,6.76745), (-31.5413,30.3485,6.68777), (-31.4896,32.2839,6.58385) }; draw(P,knot,green); // Rational Bezier curve: // udegree=3, nu=4; real[] knot={0,0,0,0,1,1,1,1}; path3 g=scale3(20)*(X{Y}..{-X}Y); triple[] P={point(g,0),postcontrol(g,0),precontrol(g,1),point(g,1)}; // Optional weights: real[] weights=array(P.length,1.0); weights[2]=5; draw(P,knot,weights,red); ./asymptote-2.41/examples/poster.asy0000644000175000017500000000167413064427076017423 0ustar norbertnorbertorientation=Landscape; import slide; import graph; defaultpen(deepblue); pagenumberpen=invisible; real f(real x) {return (x != 0) ? x*sin(1/x) : 0;} pair F(real x) {return (x,f(x));} xaxis(background,grey); yaxis(background,-0.25,0.25,grey); real a=1.2/pi; draw(background,graph(background,f,-a,a,10000),grey); label(background,"$x\sin\frac{1}{x}$",F(0.92/pi),3SE,grey+fontsize(14pt)); frame f=background.fit(); box(f,RadialShade(yellow,0.6*yellow+red),above=false); background.erase(); add(background,f); title("Young Researchers' Conference",align=3S,fontsize(48pt)); center("University of Alberta, Edmonton, April 1--2, 2006"); skip(4); center("A general conference for\\ the mathematical and statistical sciences\\ for graduate students, by graduate students.",fontsize(32pt)); label("Registration and abstract submission online.",(0,-0.5)); label("\tt http://www.pims.math.ca/science/2006/06yrc/",point(SW),2NE, black+fontsize(18pt)); ./asymptote-2.41/examples/truncatedIcosahedron.asy0000644000175000017500000000404413064427076022251 0ustar norbertnorbertimport graph3; size(200); defaultrender.merge=true; real c=(1+sqrt(5))/2; triple[] z={(c,1,0),(-c,1,0),(-c,-1,0),(c,-1,0)}; triple[] x={(0,c,1),(0,-c,1),(0,-c,-1),(0,c,-1)}; triple[] y={(1,0,c),(1,0,-c),(-1,0,-c),(-1,0,c)}; triple[][] Q={ {(c,1,0),(1,0,-c),(0,c,-1),(0,c,1),(1,0,c),(c,-1,0)}, {(-c,1,0),(0,c,1),(0,c,-1),(-1,0,-c),(-c,-1,0),(-1,0,c)}, {(-c,-1,0),(-c,1,0),(-1,0,-c),(0,-c,-1),(0,-c,1),(-1,0,c)}, {(c,-1,0),(c,1,0),(1,0,c),(0,-c,1),(0,-c,-1),(1,0,-c)}, {(0,c,1),(0,c,-1),(-c,1,0),(-1,0,c),(1,0,c),(c,1,0)}, {(0,-c,1),(0,-c,-1),(-c,-1,0),(-1,0,c),(1,0,c),(c,-1,0)}, {(0,-c,-1),(0,-c,1),(c,-1,0),(1,0,-c),(-1,0,-c),(-c,-1,0)}, {(0,c,-1),(0,c,1),(c,1,0),(1,0,-c),(-1,0,-c),(-c,1,0)}, {(1,0,c),(-1,0,c),(0,-c,1),(c,-1,0),(c,1,0),(0,c,1)}, {(1,0,-c),(-1,0,-c),(0,-c,-1),(c,-1,0),(c,1,0),(0,c,-1)}, {(-1,0,-c),(1,0,-c),(0,c,-1),(-c,1,0),(-c,-1,0),(0,-c,-1)}, {(-1,0,c),(1,0,c),(0,c,1),(-c,1,0),(-c,-1,0),(0,-c,1)} }; real R=abs(interp(Q[0][0],Q[0][1],1/3)); triple[][] P; for(int i=0; i < Q.length; ++i) { P[i]=new triple[] ; for(int j=0; j < Q[i].length; ++j) { P[i][j]=Q[i][j]/R; } } for(int i=0; i < P.length; ++i) { for(int j=1; j < P[i].length; ++j) { triple C=P[i][0]; triple A=P[i][j]; triple B=P[i][j % 5+1]; triple[] sixout=new triple[] {interp(C,A,1/3),interp(C,A,2/3),interp(A,B,1/3),interp(A,B,2/3), interp(B,C,1/3),interp(B,C,2/3)}; triple M=(sum(sixout))/6; triple[] sixin=sequence(new triple(int k) { return interp(sixout[k],M,0.1); },6); draw(surface(reverse(operator--(...sixout)--cycle)^^ operator--(...sixin)--cycle,planar=true),magenta); } } for(int i=0; i < P.length; ++i) { triple[] fiveout=sequence(new triple(int k) { return interp(P[i][0],P[i][k+1],1/3); },5); triple M=(sum(fiveout))/5; triple[] fivein=sequence(new triple(int k) { return interp(fiveout[k],M,0.1); },5); draw(surface(reverse(operator--(...fiveout)--cycle)^^ operator--(...fivein)--cycle,planar=true),cyan); } ./asymptote-2.41/examples/lowupint.asy0000644000175000017500000000122313064427076017756 0ustar norbertnorbertimport graph; real f(real x) {return x^3-x+2;} pair F(real x) {return (x,f(x));} void rectangle(real a, real b, real c, real h(real,real)) { real height=(a < c && c < b) ? f(c) : h(f(a),f(b)); pair p=(a,0), q=(b,height); path g=box(p,q); fill(g,lightgray); draw(g); } void partition(real a, real b, real c, real h(real,real)) { rectangle(a,a+.4,c,h); rectangle(a+.4,a+.6,c,h); rectangle(a+.6,a+1.2,c,h); rectangle(a+1.2,a+1.6,c,h); rectangle(a+1.6,a+1.8,c,h); rectangle(a+1.8,b,c,h); draw((a,0)--(F(a))); draw((b,0)--(F(b))); draw(graph(f,a,b,operator ..),red); draw((a,0)--(b,0)); labelx("$a$",a); labelx("$b$",b); } ./asymptote-2.41/examples/genusthree.asy0000644000175000017500000000124713064427076020254 0ustar norbertnorbertsize(8cm); import smoothcontour3; // Erdos lemniscate of order n: real erdos(pair z, int n) { return abs(z^n-1)^2 - 1; } real h = 0.12; // Erdos lemniscate of order 3: real lemn3(real x, real y) { return erdos((x,y), 3); } // "Inflate" the order 3 (planar) lemniscate into a // smooth surface: real f(real x, real y, real z) { return lemn3(x,y)^2 + (16*abs((x,y))^4 + 1) * (z^2 - h^2); } // Draw the implicit surface on a box with diagonally opposite // corners at (-3,-3,-3), (3,3,3). draw(implicitsurface(f,a=(-3,-3,-3),b=(3,3,3),overlapedges=true), surfacepen=material(diffusepen=gray(0.5),emissivepen=gray(0.4), specularpen=gray(0.1))); ./asymptote-2.41/examples/tetra.asy0000644000175000017500000000104313064427076017214 0ustar norbertnorbertimport graph3; unitsize(1cm); currentprojection=orthographic(10,5,5); triple O=(0,0,0),N=(0,0,10),A=(8.66,0,-5), B=(-4.33,7.5,-5),C=(-4.33,-7.5,-5); path3[] D=N--A--B--C--N--B^^A--C; draw(surface(A--B--C--cycle),.5*blue+.5*white+opacity(.5)); draw(surface(N--B--C--cycle),.5*green+.5*white+opacity(.5)); draw(surface(N--C--A--cycle),.5*yellow+.5*white+opacity(.5)); draw(surface(N--A--B--cycle),.5*red+.5*white+opacity(.5)); draw(D,blue+1bp); dot(D);dot(O); label("$O$",O,E);label("$N$",N,N);label("$A$",A,SE);label("$B$",B,E);label("$C$",C,W+S); ./asymptote-2.41/examples/filesurface.asy0000644000175000017500000000171313064427076020371 0ustar norbertnorbertimport graph3; import palette; size3(200,IgnoreAspect); file in=input("filesurface.dat").line(); real[] x=in; real[] y=in; real[][] f=in; triple f(pair t) { int i=round(t.x); int j=round(t.y); return (x[i],y[j],f[i][j]); } surface s=surface(f,(0,0),(x.length-1,y.length-1),x.length-1,y.length-1); real[] level=uniform(min(f)*(1-sqrtEpsilon),max(f)*(1+sqrtEpsilon),4); s.colors(palette(s.map(new real(triple v) {return find(level >= v.z);}), Rainbow())); draw(s,meshpen=thick(),render(merge=true)); triple m=currentpicture.userMin(); triple M=currentpicture.userMax(); triple target=0.5*(m+M); xaxis3("$x$",Bounds,InTicks); yaxis3("$y$",Bounds,InTicks(Step=1,step=0.1)); zaxis3("$z$",Bounds,InTicks); /* picture palette; size3(palette,1cm); draw(palette,unitcube,red); frame F=palette.fit3(); add(F,(M.x,m.y,m.z)); */ currentprojection=perspective(camera=target+realmult(dir(68,225),M-m), target=target); ./asymptote-2.41/examples/shellsqrtx01.asy0000644000175000017500000000147513064427076020460 0ustar norbertnorbertimport graph3; import solids; size(0,150); currentprojection=orthographic(1,0,10,up=Y); pen color=green; real alpha=-240; real f(real x) {return sqrt(x);} pair F(real x) {return (x,f(x));} triple F3(real x) {return (x,f(x),0);} path p=graph(F,0,1,n=30,operator ..)--(1,0)--cycle; path3 p3=path3(p); revolution a=revolution(p3,X,alpha,0); render render=render(compression=0,merge=true); draw(surface(a),color,render); draw(p3,blue); surface s=surface(p); draw(s,color,render); draw(rotate(alpha,X)*s,color,render); xaxis3(Label("$x$",1),xmax=1.25,dashed,Arrow3); yaxis3(Label("$y$",1),Arrow3); dot("$(1,1)$",(1,1,0)); arrow("$y=\sqrt{x}$",F3(0.8),Y,0.75cm,red); real r=0.4; draw(F3(r)--(1,f(r),0),red); real x=(1+r)/2; draw("$r$",(x,0,0)--(x,f(r),0),X+0.2Z,red,Arrow3,PenMargin3); draw(arc(1.1X,0.4,90,90,3,-90),Arrow3); ./asymptote-2.41/examples/limit.asy0000644000175000017500000000121613064427076017215 0ustar norbertnorbertsize(200,200,IgnoreAspect); import graph; real L=1; real epsilon=0.25; real a(int n) {return L+1/n;} for(int i=1; i < 20; ++i) dot((i,a(i))); real N=1/epsilon; xaxis(Label("$n$",align=2S)); yaxis(Label("$a_n$",0.85)); xtick("$2$",2); ytick("$\frac{3}{2}$",3/2); ytick("$2$",2); yequals(Label("$L$",0,up),L,extend=true,blue); yequals(Label("$L+\epsilon$",1,NW),L+epsilon,extend=true,red+dashed); yequals(Label("$L-\epsilon$",1,SW),L-epsilon,extend=true,red+dashed); xequals(N,extend=true,darkgreen+dashed); labelx(shift(0,-10)*"$N=\frac{1}{\epsilon}$",N,E,darkgreen); label("$a_n=1+\frac{1}{n},\quad \epsilon=\frac{1}{4}$",point((0,1)),10S+E); ./asymptote-2.41/examples/shade.asy0000644000175000017500000000010213064427076017154 0ustar norbertnorbertsize(100,0); radialshade(unitsquare,yellow,(0,0),0,red,(0,0),1); ./asymptote-2.41/examples/latticeshading.asy0000644000175000017500000000021013064427076021053 0ustar norbertnorbertsize(200); pen[][] p={{white,grey,black}, {red,green,blue}, {cyan,magenta,yellow}}; latticeshade(unitsquare,p); ./asymptote-2.41/examples/randompath3.asy0000644000175000017500000000010313064427076020311 0ustar norbertnorbertimport three; size(300); draw(randompath3(100),red,currentlight); ./asymptote-2.41/examples/p-orbital.asy0000644000175000017500000000116613064427076017774 0ustar norbertnorbertimport graph3; import palette; size(200); currentprojection=orthographic(6,8,2); viewportmargin=(1cm,0); real c0=0.1; real f(real r) {return r*(1-r/6)*exp(-r/3);} triple f(pair t) { real r=t.x; real phi=t.y; real f=f(r); real s=max(min(c0/f,1),-1); real R=r*sqrt(1-s^2); return (R*cos(phi),R*sin(phi),r*s); } bool cond(pair t) {return f(t.x) != 0;} real R=abs((20,20,20)); surface s=surface(f,(0,0),(R,2pi),100,8,Spline,cond); s.colors(palette(s.map(abs),Gradient(palegreen,heavyblue))); render render=render(compression=Low,merge=true); draw(s,render); draw(zscale3(-1)*s); axes3("$x$","$y$","$z$",Arrow3); ./asymptote-2.41/examples/centroidfg.asy0000644000175000017500000000126313064427076020225 0ustar norbertnorbertimport graph; size(0,150); int a=-1, b=1; real f(real x) {return x^3-x+2;} real g(real x) {return x^2;} draw(graph(f,a,b,operator ..),red); draw(graph(g,a,b,operator ..),blue); xaxis(); int n=5; real width=(b-a)/(real) n; for(int i=0; i <= n; ++i) { real x=a+width*i; draw((x,g(x))--(x,f(x))); } labelx("$a$",a); labelx("$b$",b); draw((a,0)--(a,g(a)),dotted); draw((b,0)--(b,g(b)),dotted); real m=a+0.73*(b-a); arrow("$f(x)$",(m,f(m)),N,red); arrow("$g(x)$",(m,g(m)),E,0.8cm,blue); int j=2; real xi=b-j*width; real xp=xi+width; real xm=0.5*(xi+xp); pair dot=(xm,0.5*(f(xm)+g(xm))); dot(dot,darkgreen+4.0); arrow("$\left(x,\frac{f(x)+g(x)}{2}\right)$",dot,NE,2cm,darkgreen); ./asymptote-2.41/examples/label3ribbon.asy0000644000175000017500000000030413064427076020432 0ustar norbertnorbertimport three; currentprojection=perspective(100,100,200,up=Y); draw(scale3(4)*extrude(texpath("$\displaystyle\int_{-\infty}^{+\infty} e^{-\alpha x^2}\,dx=\sqrt{\frac{\pi}{\alpha}}$"),2Z),blue); ./asymptote-2.41/examples/refs.bib0000644000175000017500000000300113064427076016770 0ustar norbertnorbert@ARTICLE{Hobby86, AUTHOR = "John D. Hobby", TITLE = "Smooth, Easy to Compute Interpolating Splines", JOURNAL = "Discrete Comput. Geom.", YEAR = 1986, VOLUME = 1, PAGES = "123-140"} @BOOK{Knuth86b, AUTHOR = "Donald E. Knuth", TITLE = "The \MF{}book", PUBLISHER = "Addison-Wesley", YEAR = 1986, ADDRESS = "Reading, Massachusetts"} @article{Bowman07, title={{The 3D {A}symptote generalization of MetaPost B\'ezier interpolation}}, author={John C. Bowman}, journal={Proceedings in Applied Mathematics and Mechanics}, volume={7}, number={1}, pages={2010021-2010022}, year={2007} } @article{Bowman08, title={Asymptote: A vector graphics language}, author={John C. Bowman and Andy Hammerlindl}, journal={TUGboat: The Communications of the \TeX\ Users Group}, volume={29}, number={2}, pages={288-294}, year={2008} } @article{Bowman09, title={Asymptote: Lifting {\TeX} to three dimensions}, author={John C. Bowman and Orest Shardt}, journal={TUGboat: The Communications of the \TeX\ Users Group}, volume={30}, number={1}, pages={58-63}, year={2009} } @article{Shardt12, title={Surface Parametrization of Nonsimply Connected Planar {B\'ezier} Regions}, author={Orest Shardt and John C. Bowman}, journal = {Computer-Aided Design}, volume={44}, number={5}, pages={484.e1-10}, year={2012}, } ./asymptote-2.41/examples/imagehistogram.asy0000644000175000017500000000216413064427076021102 0ustar norbertnorbertimport stats; import graph; import palette; import contour; size(20cm); scale(false); pair[] data=new pair[50000]; for(int i=0; i < data.length; ++i) data[i]=Gaussrandpair(); // Histogram limits and number of bins pair datamin=(-0.15,-0.15); pair datamax=(0.15,0.15); int Nx=30; int Ny=30; int[][] bins=frequency(data,datamin,datamax,Nx,Ny); real[] values=new real[Nx*Ny]; pair[] points=new pair[Nx*Ny]; int k=0; real dx=(datamax.x-datamin.x)/Nx; real dy=(datamax.y-datamin.y)/Ny; for(int i=0; i < Nx; ++i) { for(int j=0; j < Ny; ++j) { values[k]=bins[i][j]; points[k]=(datamin.x+(i+0.5)*dx,datamin.y+(j+0.5)*dy); ++k; } } // Create a color palette pen[] InvGrayscale(int NColors=256) { real ninv=1.0/(NColors-1.0); return sequence(new pen(int i) {return gray(1-17*i*ninv);},NColors); } // Draw the histogram, with axes bounds range=image(points,values,Range(0,40),InvGrayscale()); draw(contour(points,values,new real[] {1,2,3,4,8,12,16,20,24,28,32,36,40}, operator--),blue); xaxis("$x$",BottomTop,LeftTicks,above=true); yaxis("$y$",LeftRight,RightTicks,above=true); ./asymptote-2.41/examples/basealign.asy0000644000175000017500000000201113064427076020016 0ustar norbertnorbertimport fontsize; import three; settings.autobillboard=false; settings.embed=false; currentprojection=orthographic(Z); defaultpen(fontsize(100pt)); dot(O); label("acg",O,align=N,basealign); label("ace",O,align=N,red); label("acg",O,align=S,basealign); label("ace",O,align=S,red); label("acg",O,align=E,basealign); label("ace",O,align=E,red); label("acg",O,align=W,basealign); label("ace",O,align=W,red); picture pic; dot(pic,(labelmargin(),0,0),blue); dot(pic,(-labelmargin(),0,0),blue); dot(pic,(0,labelmargin(),0),blue); dot(pic,(0,-labelmargin(),0),blue); add(pic,O); dot((0,0)); label("acg",(0,0),align=N,basealign); label("ace",(0,0),align=N,red); label("acg",(0,0),align=S,basealign); label("ace",(0,0),align=S,red); label("acg",(0,0),align=E,basealign); label("ace",(0,0),align=E,red); label("acg",(0,0),align=W,basealign); label("ace",(0,0),align=W,red); picture pic; dot(pic,(labelmargin(),0),blue); dot(pic,(-labelmargin(),0),blue); dot(pic,(0,labelmargin()),blue); dot(pic,(0,-labelmargin()),blue); add(pic,(0,0)); ./asymptote-2.41/examples/projectelevation.asy0000644000175000017500000000056513064427076021462 0ustar norbertnorbertimport graph3; import grid3; import palette; currentprojection=orthographic(0.8,1,2); size(400,300,IgnoreAspect); real f(pair z) {return cos(2*pi*z.x)*sin(2*pi*z.y);} surface s=surface(f,(-1/2,-1/2),(1/2,1/2),50,Spline); surface S=planeproject(unitsquare3)*s; S.colors(palette(s.map(zpart),Rainbow())); draw(S,nolight); draw(s,lightgray+opacity(0.7)); grid3(XYZgrid); ./asymptote-2.41/examples/PythagoreanTree.asy0000644000175000017500000000064413064427076021204 0ustar norbertnorbertsize(250); real a=3; real b=4; real c=hypot(a,b); transform ta=shift(c,c)*rotate(-aCos(a/c))*scale(a/c)*shift(-c); transform tb=shift(0,c)*rotate(aCos(b/c))*scale(b/c); picture Pythagorean(int n) { picture pic; fill(pic,scale(c)*unitsquare,1/(n+1)*green+n/(n+1)*brown); if(n == 0) return pic; picture branch=Pythagorean(--n); add(pic,ta*branch); add(pic,tb*branch); return pic; } add(Pythagorean(12)); ./asymptote-2.41/examples/cos3.asy0000644000175000017500000000110613064427076016744 0ustar norbertnorbertimport graph3; import palette; size(12cm,IgnoreAspect); currentprojection=orthographic(1,-2,1); real f(pair z) {return abs(cos(z));} real Arg(triple v) {return degrees(cos((v.x,v.y)),warn=false);} surface s=surface(f,(-pi,-2),(pi,2),20,Spline); s.colors(palette(s.map(Arg),Wheel())); draw(s,render(compression=Low,merge=true)); real xmin=point((-1,-1,-1)).x; real xmax=point((1,1,1)).x; draw((xmin,0,0)--(xmax,0,0),dashed); xaxis3("$\mathop{\rm Re} z$",Bounds,InTicks); yaxis3("$\mathop{\rm Im} z$",Bounds,InTicks(beginlabel=false)); zaxis3("$|\cos(z)|$",Bounds,InTicks); ./asymptote-2.41/examples/fin.asy0000644000175000017500000001015313064427076016653 0ustar norbertnorbertimport three; import palette; int N = 26; real[] C = array(N,0); real[][] A = new real[N][N]; for(int i = 0; i < N; ++i) for(int j = 0; j < N; ++j) A[i][j] = 0; real Tb = 100; // deg C real h = 240; // 240 W/m^2 K real k = 240; // W/m K real Tinf = 20; // deg C real L = 12; // cm real t = 2; // cm real delta = 0.01; // 1 cm = 0.01 m // (1,2)-(2,2)-(3,2)-...-(13,2) // | | | | // (1,1)-(2,1)-(3,1)-...-(13,1) // // | // \ / // V // // 13-14-15-...-24-25 // | | | ... | | // 0- 1- 2-...-11-12 // but, note zero-based array indexing, so counting starts at 0 int indexof(int m, int n) { return 13(n-1)+m-1; } int i = 0; // fixed temperature bottom left A[i][indexof(1,1)] = 1; C[i] = Tb; ++i; // fixed temperature middle left A[i][indexof(1,2)] = 1; C[i] = Tb; ++i; // interior nodes for(int m = 2; m<13; ++m) { A[i][indexof(m,2)] = -4; A[i][indexof(m-1,2)] = A[i][indexof(m+1,2)] = 1; A[i][indexof(m,1)] = 2; C[i] = 0; ++i; } // convective bottom side nodes for(int m = 2; m<13; ++m) { A[i][indexof(m,1)] = -(2+h*delta/k); A[i][indexof(m-1,1)] = A[i][indexof(m+1,1)] = 0.5; A[i][indexof(m,2)] = 1; C[i] = -h*delta*Tinf/k; ++i; } // convective bottom right corner node A[i][indexof(13,2)] = A[i][indexof(12,1)] = 0.5; A[i][indexof(13,1)] = -(1+h*delta/k); C[i] = -h*delta*Tinf/k; ++i; // convective middle right side node A[i][indexof(13,2)] = -(2+h*delta/k); A[i][indexof(13,1)] = 1; A[i][indexof(12,2)] = 1; C[i] = -h*delta*Tinf/k; ++i; real[] T = solve(A,C); pen[] Palette = Gradient(256,blue,cyan,yellow,orange,red); real[][] T = {T[0:13],T[13:26],T[0:13]}; T = transpose(T); size3(15cm); real w = 10; real h = 5; currentprojection = orthographic(2*(L,h,w),Y); draw((L,t,0)--(L,0,0)--(L,0,w)--(0,0,w)--(0,-h,w)); draw((0,t,w)--(0,t+h,w)--(0,t+h,0)--(0,t,0)); draw((L,0,w)--(L,t,w)--(0,t,w)--(0,t,0)--(L,t,0)--(L,t,w)); real wo2 = 0.5*w; draw((0,0,wo2)--(0,t,wo2)--(L,t,wo2)--(L,0,wo2)--cycle); // centre points surface square = surface(shift(-0.5,-0.5,wo2)*unitsquare3); surface bottomsquare = surface(shift(-0.5,-0.5,wo2)*scale(1,0.5,1)*unitsquare3); surface topsquare = surface(shift(-0.5,0,wo2)*scale(1,0.5,1)*unitsquare3); surface leftsquare = surface(shift(-0.5,-0.5,wo2)*scale(0.5,1,1)*unitsquare3); surface rightsquare = surface(shift(0,-0.5,wo2)*scale(0.5,1,1)*unitsquare3); surface NEcorner = surface(shift(0,0,wo2)*scale(0.5,0.5,1)*unitsquare3); surface SEcorner = surface(shift(0,-0.5,wo2)*scale(0.5,0.5,1)*unitsquare3); surface SWcorner = surface(shift(-0.5,-0.5,wo2)*scale(0.5,0.5,1)*unitsquare3); surface NWcorner = surface(shift(-0.5,0,wo2)*scale(0.5,0.5,1)*unitsquare3); material lookupColour(int m,int n) { int index = round(Palette.length*(T[m-1][n-1]-60)/(100-60)); if(index >= Palette.length) index = Palette.length-1; return emissive(Palette[index]); } draw(shift(0,1,0)*rightsquare,lookupColour(1,2)); for(int i = 2; i < 13; ++i) { draw(shift(i-1,1,0)*square,lookupColour(i,2)); } draw(shift(12,1,0)*leftsquare,lookupColour(13,2)); draw(shift(0,2,0)*SEcorner,lookupColour(1,3)); draw(shift(0,0,0)*NEcorner,lookupColour(1,1)); for(int i = 2; i < 13; ++i) { draw(shift(i-1,0,0)*topsquare,lookupColour(i,1)); draw(shift(i-1,2,0)*bottomsquare,lookupColour(i,3)); } draw(shift(12,2,0)*SWcorner,lookupColour(13,3)); draw(shift(12,0,0)*NWcorner,lookupColour(13,1)); // annotations draw("$x$",(0,-h/2,w)--(L/4,-h/2,w),Y,Arrow3(HookHead2(normal=Z)),BeginBar3(Y)); draw("$y$",(0,0,1.05*w)--(0,2t,1.05*w),Z,Arrow3(HookHead2(normal=X)), BeginBar3(Z)); draw("$z$",(L,-h/2,0)--(L,-h/2,w/4),Y,Arrow3(HookHead2(normal=X)),BeginBar3(Y)); draw("$L$",(0,-h/4,w)--(L,-h/4,w),-Y,Arrows3(HookHead2(normal=Z)), Bars3(Y),PenMargins2); draw("$w$",(L,-h/4,0)--(L,-h/4,w),-Y,Arrows3(HookHead2(normal=X)), Bars3(Y),PenMargins2); draw("$t$",(1.05*L,0,0)--(1.05*L,t,0),-2Z,Arrows3(HookHead2(normal=Z)), Bars3(X),PenMargins2); label(ZY()*"$T_b$",(0,t+h/2,wo2)); label("$h$,$T_\infty$",(L/2,t+h/2,0),Y); path3 air = (L/2,t+h/3,w/3.5)--(1.5*L/2,t+2*h/3,w/8); draw(air,EndArrow3(TeXHead2)); draw(shift(0.5,0,0)*air,EndArrow3(TeXHead2)); draw(shift(1.0,0,0)*air,EndArrow3(TeXHead2)); ./asymptote-2.41/examples/trumpet.asy0000644000175000017500000000044313064427076017600 0ustar norbertnorbertimport graph3; size(200,0); currentlight=Viewport; triple f(pair t) { real u=log(abs(tan(t.y/2))); return (10*sin(t.y),cos(t.x)*(cos(t.y)+u),sin(t.x)*(cos(t.y)+u)); } surface s=surface(f,(0,pi/2),(2pi,pi-0.1),7,15,Spline); draw(s,olive+0.25*white,render(compression=Low,merge=true)); ./asymptote-2.41/examples/sqrtx01y1.asy0000644000175000017500000000110313064427076017666 0ustar norbertnorbertimport graph3; import solids; size(0,150); currentprojection=perspective(0,1,10,up=Y); currentlight=White; real f(real x) {return sqrt(x);} pair F(real x) {return (x,f(x));} triple F3(real x) {return (x,f(x),0);} path p=graph(F,0,1,n=25,operator ..); path3 p3=path3(p); revolution a=revolution(p3,Y,0,360); draw(surface(a),green,render(compression=Low,merge=true)); draw(p3,blue); xaxis3(Label("$x$",1),Arrow3); yaxis3(Label("$y$",1),ymax=1.5,dashed,Arrow3); dot(Label("$(1,1)$"),(1,1,0)); arrow("$y=\sqrt{x}$",F3(0.5),X,0.75cm,red); draw(arc(1.2Y,0.3,90,0,7.5,140),Arrow3); ./asymptote-2.41/examples/Gouraudcontour.asy0000644000175000017500000000115013064427076021114 0ustar norbertnorbertimport graph; import palette; import contour; size(200); int n=100; real[] x=new real[n]; real[] y=new real[n]; real[] f=new real[n]; real F(real a, real b) {return a^2+b^2;} real r() {return 1.1*(rand()/randMax*2-1);} for(int i=0; i < n; ++i) { x[i]=r(); y[i]=r(); f[i]=F(x[i],y[i]); } pen Tickpen=black; pen tickpen=gray+0.5*linewidth(currentpen); pen[] Palette=BWRainbow(); bounds range=image(x,y,f,Range(0,2),Palette); draw(contour(pairs(x,y),f,new real[]{0.25,0.5,1},operator ..)); palette("$f(x,y)$",range,point(NW)+(0,0.5),point(NE)+(0,0.8),Top,Palette, PaletteTicks(Tickpen,tickpen)); ./asymptote-2.41/examples/soccerball.asy0000644000175000017500000000504613064427076020215 0ustar norbertnorbertimport graph3; size(400); currentlight.background=palegreen; defaultrender=render(compression=Zero,merge=true); real c=(1+sqrt(5))/2; triple[] z={(c,1,0),(-c,1,0),(-c,-1,0),(c,-1,0)}; triple[] x={(0,c,1),(0,-c,1),(0,-c,-1),(0,c,-1)}; triple[] y={(1,0,c),(1,0,-c),(-1,0,-c),(-1,0,c)}; triple[][] Q={ {z[0],y[1],x[3],x[0],y[0],z[3]}, {z[1],x[0],x[3],y[2],z[2],y[3]}, {z[2],z[1],y[2],x[2],x[1],y[3]}, {z[3],z[0],y[0],x[1],x[2],y[1]}, {x[0],x[3],z[1],y[3],y[0],z[0]}, {x[1],x[2],z[2],y[3],y[0],z[3]}, {x[2],x[1],z[3],y[1],y[2],z[2]}, {x[3],x[0],z[0],y[1],y[2],z[1]}, {y[0],y[3],x[1],z[3],z[0],x[0]}, {y[1],y[2],x[2],z[3],z[0],x[3]}, {y[2],y[1],x[3],z[1],z[2],x[2]}, {y[3],y[0],x[0],z[1],z[2],x[1]} }; path3 p=arc(O,Q[0][0],Q[0][1]); real R=abs(point(p,reltime(p,1/3))); triple[][] P; for(int i=0; i < Q.length; ++i){ P[i]=new triple[] ; for(int j=0; j < Q[i].length; ++j){ P[i][j]=Q[i][j]/R; } } surface sphericaltriangle(triple center, triple A, triple B, triple C, int nu=3, int nv=nu) { path3 tri1=arc(center,A,B); path3 tri2=arc(center,A,C); path3 tri3=arc(center,B,C); triple tri(pair p) { path3 cr=arc(O,relpoint(tri2,p.x),relpoint(tri3,p.x)); return relpoint(cr,p.y); }; return surface(tri,(0,0),(1-sqrtEpsilon,1),nu,nv,Spline); } for(int i=0; i < P.length; ++i){ triple[] pentagon=sequence(new triple(int k) { path3 p=arc(O,P[i][0],P[i][k+1]); return point(p,reltime(p,1/3)); },5); pentagon.cyclic=true; draw(sequence(new path3(int k) { return arc(O,pentagon[k],pentagon[k+1]);},5),linewidth(2pt)); triple M=unit(sum(pentagon)/5); for(int i=0; i < 5; ++i){ surface sf=sphericaltriangle(O,pentagon[i],M,pentagon[i+1]); draw(sf,black); } } for(int i=0; i < P.length; ++i){ for(int j=1; j <= 5; ++j){ triple K=P[i][0]; triple A=P[i][j]; triple B=P[i][(j % 5)+1]; path3[] p={arc(O,K,A),arc(O,A,B),arc(O,B,K)}; draw(subpath(p[0],reltime(p[0],1/3),reltime(p[0],2/3)),linewidth(4pt)); triple[] hexagon={point(p[0],reltime(p[0],1/3)), point(p[0],reltime(p[0],2/3)), point(p[1],reltime(p[1],1/3)), point(p[1],reltime(p[1],2/3)), point(p[2],reltime(p[2],1/3)), point(p[2],reltime(p[2],2/3))}; hexagon.cyclic=true; triple M=unit(sum(hexagon)/6); for(int i=0; i < 6; ++i){ surface sf=sphericaltriangle(O,hexagon[i],M,hexagon[i+1]); draw(sf,white); } } } ./asymptote-2.41/examples/xstitch.asy0000644000175000017500000000724213064427076017572 0ustar norbertnorbertpair c=(0,0.8); int iters(pair z, int max=160) { int n=0; while(abs(z) < 2 && n < max) { z=z*z+c; ++n; } return n; } int[] cutoffs={12,15,20,30,40,60,200}; int key(pair z) { int i=iters(z); int j=0; while(cutoffs[j] < i) ++j; return j; } int width=210; int height=190; real zoom=2.5/200; int[][] values=new int[width][height]; int[] histogram; for(int v=0; v < 10; ++v) histogram.push(0); for(int i=0; i < width; ++i) { real x=zoom*(i-width/2); for(int j=0; j < height; ++j) { real y=zoom*(j-height/2); int v=key((x,y)); values[i][j]=v; ++histogram[v]; } } // Print out a histogram. write("histogram: "); write(histogram); pen linepen(int i, int max) { real w=i == -1 || i == max+1 ? 2.0 : i % 10 == 0 || i == max ? 1.0 : i % 5 == 0 ? 0.8 : 0.25; return linewidth(w); } pen xpen(int i) { return linepen(i,width)+(i == width/2 ? red : i == 75 || i == width-75 ? dashed : black); } pen ypen(int i) { return linepen(i,height)+(i == height/2 ? red : i == 75 || i == height-75 ? dashed : black); } // The length of the side of a cross stitch cell. real cell=2.3mm; transform t=scale(cell); picture tick; draw(tick,(0,0)--(1,1)); picture ell; draw(ell,(0,1)--(0,0)--(0.7,0)); picture cross; draw(cross,(0,0)--(1,1)); draw(cross,(1,0)--(0,1)); picture star; draw(star,(0.15,0.15)--(0.85,0.85)); draw(star,(0.85,0.15)--(0.15,0.85)); draw(star,(.5,0)--(.5,1)); draw(star,(0,.5)--(1,.5)); picture triangle; draw(triangle,(0,0)--(2,0)--(1,1.5)--cycle); picture circle; fill(circle,shift(1,1)*unitcircle); picture ocircle; draw(ocircle,shift(1,1)*unitcircle); picture spare; fill(spare,(0,0)--(1,1)--(0,1)--cycle); picture[] pics={tick,ell,cross,star,triangle,circle}; pen[] colors={black,0.2purple,0.4purple,0.6purple,0.8purple,purple, 0.8purple+0.2white}; frame[] icons; icons.push(newframe); for(picture pic : pics) { // Scaling factor, so that we don't need weird line widths. real X=1.0; frame f=pic.fit(.8X*cell,.8X*cell,Aspect); f=scale(1/X)*f; // Center the icon in the cell. f=shift((cell/2,cell/2)-0.5(max(f)-min(f)))*f; icons.push(f); } void drawSection(int xmin, int xmax, int ymin, int ymax) { static int shipoutNumber=0; // Draw directly to a frame for speed reasons. frame pic; for(int i=xmin; i <= xmax; ++i) { draw(pic,t*((i,ymin)--(i,ymax)),xpen(i)); if(i%10 == 0) { label(pic,string(i),t*(i,ymin),align=S); label(pic,string(i),t*(i,ymax),align=N); } } for(int j=ymin; j <= ymax; ++j) { draw(pic,t*((xmin,j)--(xmax,j)),ypen(j)); if(j%10 == 0) { label(pic,string(j),t*(xmin,j),align=W); label(pic,string(j),t*(xmax,j),align=E); } } if(xmin < 0) xmin=0; if(xmax >= width) xmax=width-1; if(ymin < 0) ymin=0; if(ymax >= height) ymax=height-1; int stitchCount=0; path box=scale(cell) *((0,0)--(1,0)--(1,1)--(0,1)--cycle); for(int i=xmin; i < xmax; ++i) for(int j=ymin; j < ymax; ++j) { int v=values[i][j]; add(pic,icons[v],(i*cell,j*cell)); //fill(pic,shift(i*cell,j*cell)*box,colors[v]); if(v != 0) ++stitchCount; } write("stitch count: ",stitchCount); // shipout("xstitch"+string(shipoutNumber),pic); shipout(pic); ++shipoutNumber; } //drawSection(-1,width+1,-1,height+1); //drawSection(-1,80,height-80,height+1); //drawSection(70,150,height-80,height+1); drawSection(quotient(width,2)-40,quotient(width,2)+40,quotient(height,2)-40,quotient(height,2)+40); //drawSection(width-150,width-70,-1,80); //drawSection(width-80,width+1,-1,80); ./asymptote-2.41/examples/yingyang.asy0000644000175000017500000000033713064427076017727 0ustar norbertnorbertsize(0,25cm); guide center=(0,1){W}..tension 0.8..(0,0){(1,-.5)}..tension 0.8..{W}(0,-1); draw((0,1)..(-1,0)..(0,-1)); filldraw(center{E}..{N}(1,0)..{W}cycle); unfill(circle((0,0.5),0.125)); fill(circle((0,-0.5),0.125)); ./asymptote-2.41/examples/xsin1x.asy0000644000175000017500000000110413064427076017325 0ustar norbertnorbertimport graph; size(300,0); real f(real x) {return (x != 0.0) ? x * sin(1.0 / x) : 0.0;} pair F(real x) {return (x,f(x));} xaxis("$x$",red); yaxis(red); draw(graph(f,-1.2/pi,1.2/pi,1000)); label("$x\sin\frac{1}{x}$",F(1.1/pi),NW); picture pic; size(pic,50,IgnoreAspect); xaxis(pic,red); yaxis(pic,red); draw(pic,graph(pic,f,-0.1/pi,0.1/pi,1000)); add(new void(frame f, transform t) { frame G=shift(point(f,N+0.85W))*align(bbox(pic,blue),10SE); add(f,G); draw(f,t*box(min(pic,user=true),max(pic,user=true)),blue); draw(f,point(G,E)--t*point(pic,W),blue); }); ./asymptote-2.41/examples/vectorfield3.asy0000644000175000017500000000101513064427076020465 0ustar norbertnorbertimport graph3; size(12cm,0); currentprojection=orthographic(1,-2,1); currentlight=(1,-1,0.5); real f(pair z) {return abs(z)^2;} path3 gradient(pair z) { static real dx=sqrtEpsilon, dy=dx; return O--((f(z+dx)-f(z-dx))/2dx,(f(z+I*dy)-f(z-I*dy))/2dy,0); } pair a=(-1,-1); pair b=(1,1); triple F(pair z) {return (z.x,z.y,0);} add(vectorfield(gradient,F,a,b,red)); draw(surface(f,a,b,Spline),gray+opacity(0.5)); xaxis3(XY()*"$x$",OutTicks(XY()*Label)); yaxis3(XY()*"$y$",InTicks(YX()*Label)); zaxis3("$z$",OutTicks); ./asymptote-2.41/examples/triangle.asy0000644000175000017500000000032113064427076017700 0ustar norbertnorbertsize(0,100); import geometry; triangle t=triangle(b=3,alpha=90,c=4); dot((0,0)); draw(t); draw(rotate(90)*t,red); draw(shift((-4,0))*t,blue); draw(reflect((0,0),(1,0))*t,green); draw(slant(2)*t,magenta); ./asymptote-2.41/examples/pathintersectsurface.asy0000644000175000017500000000065213064427076022330 0ustar norbertnorbertsize(500); import graph3; currentprojection=perspective(-5,-4,2); path3 g=randompath3(10); draw(g,red+thin()); triple[][] P={ {(0,0,0),(1,0,0),(1,0,0),(2,0,0)}, {(0,4/3,0),(2/3,4/3,2),(4/3,4/3,2),(2,4/3,0)}, {(0,2/3,0),(2/3,2/3,0),(4/3,2/3,0),(2,2/3,0)}, {(0,2,0),(2/3,2,0),(4/3,2,0),(2,2,0)}}; surface s=surface(patch(P)); s.append(unitplane); draw(s,lightgray+opacity(0.9)); dot(intersectionpoints(g,s),blue); ./asymptote-2.41/examples/piicon.eps0000644000175000017500000024264213064427076017365 0ustar norbertnorbert%!PS-Adobe-3.0 EPSF-3.0 %%BoundingBox: 0 0 147 144 %%HiResBoundingBox: 0.000000 0.000000 147.000000 144.000000 %......................................... %%Creator: AFPL Ghostscript 814 (epswrite) %%CreationDate: 2005/05/07 23:32:22 %%DocumentData: Clean7Bit %%LanguageLevel: 2 %%EndComments %%BeginProlog % This copyright applies to everything between here and the %%EndProlog: % Copyright (C) 2004 artofcode LLC, Benicia, CA. All rights reserved. %%BeginResource: procset GS_epswrite_2_0_1001 /GS_epswrite_2_0_1001 80 dict dup begin /PageSize 2 array def/setpagesize{ PageSize aload pop 3 index eq exch 4 index eq and{ pop pop pop}{ PageSize dup 1 5 -1 roll put 0 4 -1 roll put dup null eq {false} {dup where} ifelse{ exch get exec} { pop/setpagedevice where { pop 1 dict dup /PageSize PageSize put setpagedevice} { /setpage where{ pop PageSize aload pop pageparams 3 {exch pop} repeat setpage}if}ifelse}ifelse}ifelse} bind def /!{bind def}bind def/#{load def}!/N/counttomark # /rG{3{3 -1 roll 255 div}repeat setrgbcolor}!/G{255 div setgray}!/K{0 G}! /r6{dup 3 -1 roll rG}!/r5{dup 3 1 roll rG}!/r3{dup rG}! /w/setlinewidth #/J/setlinecap # /j/setlinejoin #/M/setmiterlimit #/d/setdash #/i/setflat # /m/moveto #/l/lineto #/c/rcurveto # /p{N 2 idiv{N -2 roll rlineto}repeat}! /P{N 0 gt{N -2 roll moveto p}if}! /h{p closepath}!/H{P closepath}! /lx{0 rlineto}!/ly{0 exch rlineto}!/v{0 0 6 2 roll c}!/y{2 copy c}! /re{4 -2 roll m exch dup lx exch ly neg lx h}! /^{3 index neg 3 index neg}! /f{P fill}!/f*{P eofill}!/s{H stroke}!/S{P stroke}! /q/gsave #/Q/grestore #/rf{re fill}! /Y{P clip newpath}!/Y*{P eoclip newpath}!/rY{re Y}! /|={pop exch 4 1 roll 1 array astore cvx 3 array astore cvx exch 1 index def exec}! /|{exch string readstring |=}! /+{dup type/nametype eq{2 index 7 add -3 bitshift 2 index mul}if}! /@/currentfile #/${+ @ |}! /B{{2 copy string{readstring pop}aload pop 4 array astore cvx 3 1 roll}repeat pop pop true}! /Ix{[1 0 0 1 11 -2 roll exch neg exch neg]exch}! /,{true exch Ix imagemask}!/If{false exch Ix imagemask}!/I{exch Ix image}! /Ic{exch Ix false 3 colorimage}! /F{/Columns counttomark 3 add -2 roll/Rows exch/K -1/BlackIs1 true>> /CCITTFaxDecode filter}!/FX{<Y#U0HO],N3WK,= aI!gMUk8XHs8;cjs8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2oss8Vfco#@%As6tC0iGZDf&oh%mnF5uJs8W)trr<#u s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! rr2oss8VNUn6AL!Wd>3;]fH,mNQ@M*[&/KUs8W#oqZ$Tqs8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#ss8W,mo^^"g,QI7\ pYfu%M\9r3)=[.cs8W,urr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8N#ss8W,en*jRQ'rlTik.NeTs,G-g)7QPss8W,sr;-Hns8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W)trr<#up@\!rR3_h&IJ;Z3]S[5<=;p\unc/Xhrr2oss8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr<#umdKXM8/8.O%Hb>a s8S)$RMiW6KE(uOr;?Eks8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr)lss7,UF`0_bKnUC5hB"Ea,CfVJCnF?PYs8N#s s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W,urr2rts6f@F>Y#U0HO],N3WK,=c(,`_W.Y-Ms8;fks8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!r;6?js8T$jM6ML5 s7h3;]fH,mNm4+4\Z1;^s8W#pqZ$Tq s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8;cjs8W+uSV"1u"981Qp"EibL(8$")Xm1cs8W,urr2rts8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#ss8W,en*jRQ'rlWj k.t>qnc/Xh rr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W)trr<#un*faK8/8+O%Hb;`s8S5+Sf5/>KE(uOr;?Eks8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,sqtg?ms0/;O \:Y"cq2+[p?FGLsAPsH7n+$GXs8N#ss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2rts6oFG=\9F.HO],L3WK,Ac(5iaWe:?Os8;fk s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!r;6?js8T@"K=HXAs8.]Fe6]J7%:`6Rn*ffHs8W)trr<#us8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2oss8VQVn5r3r WI,0;]K-#lOj0I9\>k2]s8W#pqZ$Tqs8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8;cjs8W,+Vh;O:#ljd[o$gmNK+2?f)Xm.b s8W,urr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8N#ss8W,emdO4H'rlWjk.pq q"OL^s8W)ts8N#qrVZNkrr2rts8W-!s8W)us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr<#u mdBRE7hr%O%Hb5^s8S5,Sf58BKE(uOr;?Eks8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,sr;-Hns1PLg^lAj'rfH^!;71rb >"KOtmdL2Us8N#ss8W-!s8W-!s8W-!s8N#srr2rts8Doos8W,pq"XIOnc&Oes8W,urr2lpr;Q]p s8W,urr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#ss8W,urr2inqu?]r e^;=:O@[*C#j/r`gUJuhW@c,U+j$NXcF8GTb-h9Ls8N#srr2oqrVQTnrVuots8W-!s8N&us8W-! s8W-!s8W-!s8W-!s8W,urr2rts6f=EmI'HCs8W)trr2orrVc`prr2orrr2orrr2opr;-Hns5;SM W/jN?H6LM?I,NShp\=X`r;?QnrVlfprr2orrr2orrr2orrr2orrr2orrr2orrr2orrr2orrr2or rr2orrr2orrr)fpr;?Hks8UBc[W>CRY'^QLb=)C-KDtn7rr%fUomcYi?/2nBaI!gkX&RWbP4J,- s8W,urr2loqYpKmrr2orrr2orrr2orrr2orrr2orrr2orrVc]ps8VKSmo2alWI#*9]/fokOj0I9 ]W6\bs8Vunq>UBmrr2orrr2orrr2orrr2orrr2orrr2orrr2orrr2orrr2orrr2orrr2orrr2or s8W,urr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr<#u rr2orrr2inrV?9dqYL-dqY^3dr:p$\s8W,1WeAaR)!L5Os8N&oq>:*frVuot rr2oss8W)trr)fns8W,Ncb"mA$aYEkeY+,8TbP\<)Ph]tfZpl(s8W)trVlfqs8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2rtrr2rtLO3$79*'r`'<[$.e"nGHX=E,2/a^D> q:]3Unp:<7PQ1T?p#0?8ZR+s8W,sr;-Hns8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8N#ss8W,urr2cjr;6Birr2oss8W)trr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8N#ss8W,urr2flrVHBgrr2oss8W)trr<#us8W-!s8W#pqZ$Tq]W?k*NXYscORCCk YCI*d7i:X]nGiOgs8W,oq"O=Kn+-&>o()>@nF-)FqqTW1F&`O)B+)>2*oQ]# ]:W6to_%SAoC;ABnaZ2?nac5?oC;ABnaZ5@nal;@oC;ABnF,oBq>SUV[:)N- E`Wm0AdOT:%\n=^UNmEJHk3Z@'ul@Sd@MH?ZS;$t;#^!3s8S>]np'3-0ufP*`3P'Zl1=B4p[RbB nF,u#[dc<9`P/i 82VZWE!3_/);D2CpYTEZs-!?MHJ>GCT6M/$,>naPEs`7b#RP/M$"jPNBF5)]$41MT$#U%VE!Zki #mtVY$?-=ZE!cqk$Oh%[#@R`=@fusG1FPUr6kW`o&5"nk<'Lt1:C2GR!0qL-Xah(uN#0m5*p^L# r9//#s-NQGDq:a!LLVnJ&pY'(KbG/G&JKL('71?*HP.!?&efa-'7LQ.Ih<5Bo"'A6.,q?__0!QoXZ8FPT 5=!CS4ioiOaZr275XELY7*J"ec::CNA5uNZ@L&o^&BBqNkIWSLoRQu[?&i?J/OffN__@ =&uD3>)6Tc;dr?&Kk(@ZGSIQ>(!rBfm__3foR[#APk)s^TlguM;P@/qpKq:g?XN#)?ftg(k[7c^ ?si/+?g1s*l!n2h@:AM1@-h9.l=")e@:8A.?g(m)l!Rl_?si/+?g1s*kZqKW?!c`$?fta%jBc-Q >@$>q?0,6oi)a%=BA5a&-)Hc m`JD/IfNnVGuI`/='!jO)Gm4It"9`rM"*aeIGQ7eh!!%'?!H8#?E<#uW !!$s"aC(OJcl3V *uZ5(6j\lj(9`B-c^GgHdo$/FQi,]C]8-h:(et&2C]OQF!!$L/!+Q!/@fQL=!!$L/!+#X*?N:(; !!$U2!+Gp.?iU1:!!$L/!+Z'0@fQLB!!$j9!,MW8C]FHO!!$g8!,MW8CB+?M!!$m:!,qo@->9-`I7RIK0@a!!$L/!*K:%9E5&V!!#1a!B^>^4?tPDfqoeipPA4X9X'0_82q"X!&O]V3<0%= !!"tY!&srY2ZNhN!!#Oi!'pSb8cSic!!#Uk!&srY2#mV=m$qL@!63%!O!!"YP!%n6O/cYl( !!"VO!&"

    c#!!"DI!%%[G0`V2(!!!*B&ccfF#H!"had!_:bt7s7PPsBC]8I7J*BFZBs8W)ts8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2oss8W)trqu]m rVc]fp%LmEOT>N<@V"b>C[`c&XT8NN!!$j:!au'/57%WU"pQeO7UM"/SUGpLJ:E`3Jsq7/:=#@E s7qH=Da]!2b5a a,q/2b";X5QMB08["Ah-^T@>2s6oCCnaZ/@oCV;3lCaJn`N+"5[QaEQHIT6#cH!Njq"jLKn*f`6 qYL&u\@Qj,H@^X$It**#ItN6#K7AB(It*-$ItrN'LOXf/JUrc+HA<"A2uiqQ!!$dP)OG/PnLH,\ jlPe-s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W)trr<#urVc`lqY^Bns08iO"U/fr0=5tKr('E(#RQ4c!,;Q:@K6Bm!!"3,5$#M9`:s#u p@e.Ys8W)trqu]js8W,5Y(afT%KH?]m`A,)J.GXK([UPXs8W,urr2oqr;Zfskhj>,T,7P%HN3V^ jKB\[?N?adJH,ZLr;6Bjrr2orrr<#up\F`3C.FJ%"Q6L7s88&Oem,J3&Du0[s8W,trVZ]qs8W-! s8W-!s8W&qqZ$Tq`jh8JL]mbHEW>ZZhk_-FC)ld6o)Jairr2oss8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W)trr<#uq"aeq>YA-]!2k>daHRP9cqOK>QhAd'X*bE-d(o\]s8;fls8W,dmdX4=%B+CL l+f=Zs,kEi&@A3Ys8W,sqtg?ms8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trqcKf s8W+EH$fSl-3OH]!WmaU?f'm`qYU'^pAb0m\u^P&Nt)-eL[N8WY^d6b72G(Mm/R+c q"XX`s8VWYm\kRKnBao0qiTmA0Vit)@8.^)l0SHMs7uKdqYL'bqYKs\p](9n]=b^g:CY.#')(@" s7VAhOq0saqYL'bq>'jcrr;6Jl\K6lgSu_&r/U3h9:Tl#Wh>+Hs8VlgpA4X^ qYL'bqYL'bqYL'bqYL'bqYL'bqYL'bqYL'bqYL$`q>UBlq"jkt>YA9c!3(MgcBfFDd8L#ERHqjU a.Pp"r;QZnqu?]rmdKUO9GsmY&EUSds8S)"R2`N2L&_2Qqtp3frVlfqrqu]lq>'m`qYL'bqYL'b qYL'bqYL'bqYL'bqYL'bqYKs\q#CBo\@B$K!%%^H=9&>@7S(Z_43`/$\,ZL.s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr<#urVc]nrVl`mqaa86 "9a9`@-D68lkUJ-!!$d;"ChH54:)a8p!$4PP8\L?!0rXrs8W,rqtg<70!:TjgR(-CDZI/n,NFfrr2orrr2orrqu]ks8W,#TnT@e!;kY` s7_6"V&tA$(?t)Js8W,urr)lss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2oss8W&rrVlfp q"jl#?V4iu!N^klc^>[GfNA1RRd7jLcDX_tPm4HO],N3WK,=aI*pPVM"pKs8;cj s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2orrr2rts7#OH%1Off!)3FnD)OAd :/9V78(1CsSLg P&(Lo2>mJm4drr2lqrr2rts8W-!rr2orrr2rts6T+;N,'6\U`]X5NUkIsW-Jfub.RcSs8Doo rr2orrr2rts6Aq;L1_O^W?_H@MY,G"XaC;%E(Kp*s8W,urr2orrr2rts8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!rr2oss8W&rrVc]nqtp:r3;]fH,mNQIS+[]"iYs8W#pqZ$Tqs8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s rVc]ps8VHPl3n(H!!#[m!,aeY^JRqd%M3:BnF-DWs8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W)trr<#urVc]nrVl`mr'Ec3&JLRYHMp?*c3"5t!!$[4!)^Kp \>b1oM@BO^J*tTSZ@NNi8J^[[mem(aZB.H3ZRPqSRIA!Z^Ps+;5lch"J,fQKqYL'gs8W)trr<#u s8W-!s8W-!s8N#sr;?Eks8T3pJ"^f]o\!IKqN0:(+FIZ@mdTfIs8W&rrVuotlg*qmBcZ!.,QI\" o[['HIKkXP9)JSes8Murrr2orrr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! rr2oss8Vunqu?]r['[1f)Zk7f%BP0ueY+&]iFr8kSEIXB]9u/m8K+XW%Hb5]s8S5+Sf52>KE(uO qtp3grr2orrr2orrr2orrr2orrr2orrr2orrr2orrr)fpqYL*bq>:$bqu?]rZEgh;!'1)[A.9'/ DJo"\(RobuV>pSqs8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr<#u rVc]nrVl`mqa3c9+'paqY^3dr;Q]ps8W,sqtg?ms0nq^\:k4gpNH,Q9=9?^>Y#S&qZ"L?L;o;Zs87ZNk%iJ;)hqf* Cgfj1qu-Qps82]kqtp:$br:]jYs8W+dP_Xos!:%?^s8SJL]fVd0([UMR rVccjp\4^fs/DZGTPso+g0agQM:ngTHs$Zj^:4.Bs7lBbqYL*cqYU-cqtg0dqYL*cqYU-cr;HTn s8W-!s8W-!s8DoqqYL*cqYU-cqtg0dqYL*cqY^'\p](9nYHP2T)$"h_$a,1!eY+&\i+E#hRcqUL Tlpp:FV3lN2#mT7e"RhqXb6ZRs8;fks8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s rVc`qs8TF3]*&6j!!$4'!I%./cXg\T!kIE=etXXcGSa(7#.(\Cs8W,dmI'cEq#CBorr2oqrVl`mrVuotrr2oss8W)trr<#u o()=,Bc#3g)?9Ggr7u%^Er`D@N;rqXs8W,Vf5S3ns8W,rqtpEns82]kr;?Nns8W-!s7Z0\qYL)u\&`T1S:5phF*"8h%UfMF@gWNR !<[3m,<*T+'*%0%o#aD2L^um0.f]QS#R+E>$>9_M@0H[;!!$:,"'uHICBk)U!X))^Q;*HGFN=PX@C]F!]aHI'dE`m^:[!-\f75Ql37kf=2@s`K= D,NGY.4.ndF+].PH$Q65H_l(9V0mWdI!_];I&24X`\mb-7>_l!,i#EA,lT[8kN4_qtg9irqu]lqtp?ir;HZqs8)TgkND5iMmGQ1L&_9h #mteT!-\VPM\d8)0JU'r35.F9_Dsd"7Rau!MBr5R8b0k_Z%O,m:OmV03;(/92j[[4!K*-n2;L/@$iZYV.Z:0f$9p1V#G(^,\9k4?peP7*.qicV73d >[?Au@d%B6l"Ol"AS1?i42D%'HiX7K[C"0Xs8W#prVuots8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8N#srr2oqrVl`mqEdN.)&]&jGlB*@XT/?="U/B9!%1B2:*frVlfq s8W,6^="r!Jcl6u"p]i--`p-=eR;qOCM`KZEV='[mo39=:/BA4:!lR,e4E6LY(@_e`&I(t0s6*O 5XNFW7En1gb!eeC7nLlo8]jRqb=bLR92l!\/h@qG%>B'a)?l==Mk AnUIBB'j)=l=+8j?=)h_3C%[f!3(Dbb*i8[dhH3k8 ;cMLK;UnQ>eOiQ`7nLom7`mq]`B$)p2)Vfs19_fDTEPLL!!$70#Z7t9`rH)=qYL*hs8W)trr<#u s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2rts7uKfs8W+FHDUlNKm7nC2)`#G!-&/G@fQKY 8kN.^r;-?hrVHBfrr2oss8KaHe2]RF!!%'c-)t-PiG`c.@V+k!:!kaT\/l``',?T;%>P,lI0'Ot !!.$=!,VlBB:sJejKC,lX=LE*'I"Dq!!%*A!Gqf:E<#uT!!$d7!,DQ7C]FHN!<[aT?fj+"ZiC). <)e!38Uq'QM/-qt+8'Lr-'DbX$W ;,Z![(RZ$4;Ci#_E6dI0Bh$"U02R!d4PDC]FHO!!$d7!,)?4@fQL>!!$"#!_WLn92/-# p%A%WrVcZlrVuotrr2orrr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#ss8W,sr;HZqs0oJ` $4MJuB^J;]c2[ig!s2s4!%gf8=oA3pqtplXk"!!#1_!&srY0*__J%hDVJ$V>VH&&XSR_iu@EIh,OD)Z]q)&.Co/"#^Pr8Ic5) %Ll,D%o<6+<#m!KCi/eZ(7,"$7!!F"*?ArB-EC`km03fF!!$%"!'pSb4ok[M!!#P=*?qY;%HbAf s641OW?m+%'*!!$1&!([(i7fWNZ!!#Oi!([(i8,rW\!!#Oi!(R"h8,rW^!!#pt!+,^+>Q=bE ?j-9)nrK&.h>8"YN;8@Yor2It*B"G'pg0])):"nF?1*E^u4'!j74s P&D(04:H+,%VJ<4@9cLsoCVPAnFcJHhr!Ds"_'AK]O"t+!!%3U&m@Re?iU17:J]G6:X]:DD?pJ0 H$P3tJsUt:PCS4TJUN3(A.cqK)W%PCbF9W?EY18]&N_TqI!_'.JXV+=Q[jUTJ:O/?J=M.?S:H-[ J:O/=I[Z+MVFX3h!!"/B!)a::MIpMf)]YIi*+a24GlRh2&.st7BC$`aUBh-+I!h93JY%CARt-$Z J:O,>J=(k;R"0^SJ:O&X8?o8fE&'Lk1,?It*N/Iuf)/Mgp58 It*?,JVnVoHapSsqYL*Xn*ff:naZ/>naZ,NnMN8:#mu@d!,V]9=onag"9^YP7:)"8QKdYunaZ)Bp\+Xes8N#s s8W-!s8W#pr;Zfs^V76J3"8A6!\PMo(C^@@3rs,.;"jY[s8W,pq>:3ls+cB*!!$D2?/n:@a8c3N ,U?'&E0^J(Eb&eJ1H)]B!*MlbDZBb8rr2rsrr2rtrr<#uIr7c?C'D/+)m4f.M/!bj/-)oKJcGcM r;6Bjrr2rts8W-!s8W-!s8W-!s8W-!rr2ooqu$Kos*fE]!!#S:-`Cj!o)JcB=BLQ5J'dbs8W)trr<#ur;?Nhq>0saqYBs`r;?Klrr2lprVc]nkj%MlM1pY:ItWAr]=YQNrr;ooqu-Kl qYL-is8R4aUAt:BD/Sqi,c1PA=?SfP&eS7\(78rUnJN75!!#97J;XC,s7Q'YqYL*`p\=dgs2Dme :cel1>RZ'pfs8>M\FoVMJ 5XE@q?KD.eATMpQ.4J!l!*qE=[q0.;!!$PYI[gB;s7Q'ZqYL*cqYU-cqtg0dqYL*cqYU-cqtg0d qYL*cqYU*aqY^9hs8W,urr2rts8N#sqYL*cqYL'bqYL'bqYL'bqYL'bqYL'bq>'mbr;?Qnrr)fp rr2orrr2orrr)fprr2oss8W)trr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W,urr2orrr)fpr;?FU5E%]ga(8iI"p]\[!Fu014%i4Ms8W,ko^mQZV[Eod<`\*kC@<#YRfEG, !:3ls*/dh',-[UGPiI'TE"t,!!#\(&1Hl1li7"b 7Rht0!,l7QkZqNT#RZ=e!,;W>6"XM['[4?s8PDPK`hR1C2<9@=l'AgK)bmb!Wl.""!OtU\,ZL.rVc]kqYU6irVuot s8W,urr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s qYL-is8R:eQiI,'B5-fe0s^i[?R[EuCi#=9!-W$iln:&r!!#c>H'\L1s82]krr2oss8W)trr2or s8W,sr;?Qnrr<#urr2opr;?Tps8N#srr2oss8W-!s8W-!s8W-!s8W-!s8N#srr2rts85>UC]FH> 3BOo`A*EsnD-:"rIt)tK!'Lf%NFZVe+XXdXmf3=erVc`qs8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! rr2orrr2lprqu]l56"X$77E"<#_d28oM/33!sO2V!GVT78HT&8 ['[7@s8VrlqYgBks8W-!s8W)trr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W)trr<#uoCMMa&R67qSn`*4',?Z1!(:sPJg2LZ()`QVD=S>TOoPJM L5)#os8Vrlqu?]rs8W-!s8W)trr<#us8W,trVcZlr;Q]prr2oss8W)trr<#us8W-!s8W-!s8W-! s8W-!s8W)trr<#unaZ#W%7L6sFB;W#84h,-!)B#QYEkKQ!!#A-+.[7co*,MX6:,qss8Drrs8N#s s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W)trr<#uq>'pfs8R=gWtQ59G''mdrr2rts8N#ss8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2orrr2rts6Ak9"pSd(5/g]/hZ*Y! #R=(EEe+;p@lZTb>?p.f!-ASV;![H5s8W,trVlfqrr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2opr;?Tps0oJO!!#b#$]/J.lm!dQ"U/6#mHR>;CB+?6 /M=/CD=RZ,EIWJ:s8W,qqYU8S7nNK1V !!%!>!F#O(+iVF:]tN&#"aXZgl;:I0!!+9,>j?c8T!!$OE'h@lenGiOgrr2oss8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!qYL'gs8RV"NrT/L -7>X*D=Io>MA6k-jQ,).&NKgkB0&/h?!ZCh!*al"PlLd`qYL*grr2rts8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s rr2oqrVl`mr'*E*5![1t@d4+$J-#d_!!"oe@r&lqeGoSc:/KMN@d"%&K`V^Kp qtp9js8W)trr2ors8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W)trr2oss8W*c6@B:PNc8n.)B>4H!).`dOB,D>!!%RcC@3GuW;lok H?teTs8Vrlqu6Tos8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W)trr2oss8W$h8T4Y0=ueXT@:JI$!+pV+U&Y/l$O]Q,!,YS1e4E<\!!$<8\\nIIs8;fm s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W,urr2rts7uKgs8W+DGcDDkQ[!`O*$1[O!,2E58KAg)X/j)=!c:Csb\V1g &/1-*!,MW88J)O]mHs<@s8W#pr;Zfss8W,urr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2orrr2rts6An8"pS"Y[f?C-qtp9js8W)trr<#us8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s qYL*hs8Rh-V>pU+?!lYW6,N[&AJl=SUSFpk!,"J]aAuC"!!$sH$V]mPlMpnarVc`prr2rts8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#srVc`qs8VENljXA( !!.LXAEbd'[/pGGK:%7Z>s8W,trVliss8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr2or rVc`nr;8`CO$5hLAS(-2#D)sWA,lTj:/4ti;Oo0aZ#OgZ*?C^O!,_i>6PgW,BPQuN(RYC/9)nqkL5)6!!(IqLSSN*5"pp,Q6?rP1rVlfr rr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!rr2orrr2lprr<#t6puhO*MR\!q]-`K!!$a6!(SUm3coJ:$4Mi6FS[I;WrN-: !s;^0"=pjd\c;^0qYL'gs8W)trr2ors8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2orrr2rts6An7"U8-c1V."(k6D9E !!#6@MNV(DP6(i.!-/)@?iU0UZEgq=s8VrlqZ$Tqrr2orrr2rts8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s qYL*hs8Rh-UAt:'>[HJX7)o9-BFthChVQrp$sb5-WbH28#mu=c!)0r6_#OH7r;?Kms8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2oss8VWZmM$@( !!$Xu7)i;1huEa[K7fcqs83001&q;c3B=i]?fqCh?%%*ds8W,qqYU9krr<#us8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr<#u r;?CW6'=l6do]f2!!@ZO!Fu01/Pf/G8P5-s0",P2mg9DV!Q=a'r;?Klrr2orrr2or s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W)trr2oss8W*c6@/nBMJ[8'+!R?X!)ZZnE4rs,!!$Iu8^(%1f)Peh %Ltqtna?GWs8N#srr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8N#ss8W,hnaR%t:&k9:?!cJS5K3['>J%MgrVcU&%8$U#C.q@K9MNt9!+*4H`W,u< r;?Kms8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W,qqYU#RG,8oC`.`s8N#ss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!qYL-is8R+\YX(V#;,YmD!-/&>pU+?=2bZ6cT0,BFk_Ahr!-'(0V4\O_\b'*$1UM!(DEgNrT.ZqYL'gs8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,qqYU_Z0Z9 IX[[b!(eIaVf$JK!!%=nI&R)Fs8)Ths8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,rqu-Qps0]8[$4DGn?fu0>nQK2Y @V"_;B^Zr^T)\k1!WlC)"!b1[[K$:,r;?Kms8W)trr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s qYL-is8Re+W;lp4?t&+Z5/R@#BF>21qu#u3H`$iDD.RDK1,ZN@!*;``CB+>2rr2rsrr2rts8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2opr;?Tps0oJO !!#b#$]/J.lm!dS"p\6#nac_[s$fIm!!$.W1:(\/mJm6$I!_Ufs8Vrlqu6Tos8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! rr2orrr2rts%?"D!!$[S+eh(]^,J*e&/($)!ce8@MfD\?A4*, s8W,qqYUhuEe% !!#R']u9[>q#^_,1GlUL@H@UpHiO.7[^N^Gs8W#pr;Q]ps8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr2oss8W!g8T=_1?9:?c?t&*r!+^P-V#UJp mHsH'\L1s82]krr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8N#sr;?Kms8TX?^&S.,$42AuB'^imX9Ac4kND+0s8Rb*NrT/C$4DW!AEbNmXp,,7 o()AOs8W)trr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr<#us8W,trVlZiqtg0dqYL*cqYL0hrVuot s8W,urr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2opr;HZqs1#S]!!$P-;:eWAeGoSi !!#9r]YFLHrsTTOoPJML5)#os8Vrlqu?]rs8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8)Tgs8W+LJ;XC-6QmYICM`PN%ZV&2<:B;D s8W+JIZOO05nk&uBP6ZJ)4:sE;tT_Ps8W,urr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr2or rr2rts8PGRF9;YtDf,+o-`-kD?4ml4rr2c*]#F^M=$Agc>?g%d!-ASV;![H5s8W,trVlfqrr<#u s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2cjr;Zfs I!hC`!)ba7\7]I?!!$e\HD1B=s8W-!J:O'g!(S1VT5SZA!!%OlFe\p9s8)Tirr2oss8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W&rrr<#um-F!C#[B,?\79+9#muFf!(2*[NW9%YH[D%Y!*ru>j?c8T !!$OE'h@lenGiOgrr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!rr2oss8VWZmh6@*!!$_'9$U@7g&M+PJ:Npbs8W-!s*B!Y!!#bF/Zs#1oDel2 I=8!ms8Vrlqu?]rs8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2ooqu$Kos*fEk!!$_A@H9[>`W-!Q %LteilKJ9Js$T8&!<[siC@3GtW;lokH?teTs8Vrlqu6Tos8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#ss8W,hnaR%t:]LK=?XMnX5/R@#=1GcU s8W,gnEgo(5QCdm1,HCLAa9$Bha!*4T!OoPI]qYL*hs8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W,urr2inr;Zfs\@BT[!+/;hcW+$&!!%0B!(jT+^An65[C*pQ!+J5]b#MKu !!%!I$UsCIkPtS^rVc]orr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W,qqYL6ls+#W[!!#G5-DYHpo*c%d&.hV+nF$>Vs7#OH%Lu&1!,>,!cV@6b !!$E;\\nIIs8;fms8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#srr2onqYUjR@8P+%(s8N#ss8N#ss8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#srr2rts8>M\D#aQ>2E/-WAa9#[K,>[qTXG #RcCf!Dp88^An65r;?Klrr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W,trVliss6T+>$kQYH#(UB%lSLK0#7G22m-juSrr<#uL51ij!'U`!M.^Me 1,QNH$Y8i!oDejjrr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#srr2oss8V]_ndc=:*ZgqpFSHjuSH&Xl 7n@CnrVHQos+Q9)!!$>.=PZqTfDknj%1ktuna?GWs8N#ss8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#sqYL*hs8Rb,PQ1\R+!@+mDtOteSI#[% o'u2Jrr<#us+#WZ!!#=s&s$dAm3sKd#74T)o()h\s8N#ss8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trqu]m s8W,/\]OmPBhM1I?'sgs8RV$PlLeS(DrBPC[iJgU(.f=o^q_Ss8W)trr<#u s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W,urr2cjr;ZfsGB]VY!-rR)oeSD2!!$[I),0;[kPtS^oCMPa'4)UuS8`NC *?L^N!(MKhMuWhWqYL'gs8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W,urr2ors8W,t7nR_#!+J5\`+3B@!!$Y\J#32Fs7Q'[s8W+LJsZN<8KAkA DK,@U$B0+OVuQesqYL-hrr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#srr2oss8VENmLKqE/haPIDY+MSO8o8O H?tGJs8W)trp&b8"UJm%3PK'9lN@KH!!#Nt\%2P=s8;fmrr2oss8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2oss8VWYljXIi!!%%=<7b)Kg&M+W K8-'!s8Vcbq#CBoJ:a6j!)+U_TlY;M!1-ks+#]k!!#e@.&V62q#CGIH[Vmns8Vrlr;Q]p s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!rr2orrr2ors8W-!6:?G9&!D-ZqB[Ja!!$+k88eJ-rr2oss8Vs`7!Sb6Jo5Gq 0f--9!)e)gRK*2i/M=:5$Y/buo`+skq>'mes8RV$S,`Oc .kIfFG5M=?I!gCBs8W,qqY^Bns8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!r;?Kms8TX?_Z0[=6q#.,AEF.*K)bm@ L51ums8W)ts75^L#mscY,c5U&o+i41!!#KCLmA#?s8)Ths8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,qqYL6ls+Z>j!!#A&)4"rOoGo$J #RXf+nac_[s7uKes8W+LJtE#C;(aQ*FERBZ!.0*BWW3"uqYL-is8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trqlTj s8W+CGb"g7F)>g`4?^=W!,2rU6KmXos8W-!s8TR<`W-!J6Uf+(?fM+eGmb'\lg!g9s8W&rrr2or s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s qYL*hs8RS!PlLeV,:0+'EVC%YPRnL/oCVVRs8VojqZ$TqJ:aHp!)tU*Y]Y*b!!%@nI]^MBI"&'ps8Vrlr;Zfss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#sr;?Nns8TU>bQ%WYoI;Dl!!#oCHBnO1s8)Thrr2oss8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2cjr;ZfsH@24_!*;9H^hINN !!$e`JZ&PJs8)ThqYL*hs8RV$T)\jf/hjGMFnl";H[L:As8W,qqY^Bns8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2orrr2os s8W*d7!o:IMK(?irB'eIt+0ls8Vrlqtg0ds8W+LJt)f@:b40#Fa!Z_!.90CWW3"u qYL-is8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!rr2oqrVliss6K";#n(<+4ht`EljOAZ!!#T?JWTp3s7lBcs8W,0]#t'RCJ7IN ='4;Z!-\h]8*fI's8W,trVc`prr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8N#ss8W,hna?nt8H8a1<*.^L;V1sL@KE,t^V#)R_UXT/>#qYL-is8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr2orrVc`qs8GARKaS?NF`mO..BXqA) s8W&rrVlZiqu?]rKnlE'!*rc3hbmA(!!$sI&4Q-Zmf3=err2oss8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8)Tgs8W+LJ;=1*66IGC D/T%`)4Cm?;"F/Fs8W,urr2cjqu?]rJ:a-g!(\1RS8E0<&.t'l7="q5rVlfrrr2oss8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2inr;Zfs \@K]]!*r)bb[FuC#Rc:c!(2HpPQ1[_qYL*cqY^Bns)rU^!!%4[D=BPF\,ZM88P="%s82fps8N#s s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W,urr2cjqu?]rJqTTn!)4mmW,m(T"UKoN7XP18rr2osrr2onqYU^ EH:gn*1Hp.7Y$#Is8W,qqYL6ls8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,qqYU$Kqc!+15+U&Y/mqYL*hs8VrlqZ$TqJ:N7P!'Li)NbE.p .4_P+$XN>ooDejjrr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!rVc`qs8VNTn-on?-Rc!8EV(%aQ2gnb7nHtcs8W)ts8N#srr2rts85;VJ-Q@5 DfG>$0!50S;L*SSs8W,rqu$Hmrr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2rts7,UI%1c)3!-2(@g/:l&!!$&SLn=YHs8)Th s8W,sr;?Tps1#YR!!#[s$AN8/l8:K0"q"r4o(;t^s8N#ss8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trqlTjs8W+JJ>3)EC1(K3:/B7;!d4PE6+FG8 s8W,sr;?Qnrr<#unaZ)S$[?8W8'V>HDY!Aks8W,urr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8N#sr;?Nns8TU=bQ%WY:f>qL>MfD`I/j7@\@B?Ss8W#pr;Q]pqYL-is8R=gRfEG) Bkcs"6Grj(?qF%9s8W)trr;usrr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8Vrlqu?]rL5;&o!(IqJRVcm5)]YFU$XsH!+`UNa8c2>r;?Kms8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2orrr)fps8W*d7=PRMMK[?8_:XT4CD@R4EnaYuGs8W)trr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8)Ths8W+LJtW/E<&m"PD/AV?!-*ISu0f$!6!*Vl`B`J,1rr2rsrr2rts8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8Vrlqu?]r J:aEo!*2`GIs8)Thrr2oss8W-!s8)Ths8W+NKU`#B:*M!XEH:d\%$!YCI/j6G rr2rsrr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2onqY^Bns*oTt !!$qNBBr#VaT)<`!!,3l\@;MMfD\G7+mRl07@1s8W)trr2ors8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!qYL*hs8RV$U&Y0q6q#+)@d!dl@t0') s8W,qqYUTu?sr*s!+UM0V#UJpqYL*hs8W-!s8W-!rr2oss8VW[ndQ14!!%:TA*--H`rlZ_ m-O3@s8W&rrr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#srr2oqrVlisr^0). $P&8@Fnm=2VZ6^,'c0.*naHMXs8N#srr2orrr2rts7>jR&J\[m*1:bdq&giR!!#Q?J<0a1s8)Th rr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W,urr2cjqu?]rJ:aQs!*Vc\a^AK;!!$JXJY`>Gs8)Ths8W-!s8W-!s8Doq s8W,fn*UVq8cSj0;Gu%F=53cU>(qa's8W,qqYU9krr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W)trqu]ls8W,/\]=aN?V*i8@:A4&$A&6X7"9`Gs8W,rqtpBlrr2orr;?Kms8TR;_Z0[C 4[-eqAa'@)K)bmD[^WmKs8W#pr;Q]ps8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,qqYUpSqqYL*hs8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2orrr2ors8W-!77MP*#(gl8oeSJ7!!$XE'M.WYlMpna rVc`qs8W)trqcKgs8W+KJ"6Q>AR]3484h#*!,NDh:\42Js8W,urr2rts8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s qYL-is8R@lT)\js9MNi=>MoJ]@"3a%s8W,qqYU$&ieBoI;Do!!#i@HB%t)s82]j rr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W)trr<#uoCMA`(IA*%D+m[O='+5Y!*t)*U&Y/mqYL*hs8W-!s8W-! s8W,qqYU[6:h!*t)(RfEEfqYL*hs8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W,urr2orrr<#unac5^&muXuS98uM,:'&b!*2T\BE/#2rVc`prr2orrr2orrVc`qs8VENklqGs ,q,^3EV't^Q2gnWL5;5ss8Vrlqu?]rs8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr<#unaZ)X&P)m%E*?K% ;c;3I!*"K#R/d3dqYL*hs8W-!s8W-!s8W,urr2ors8W,s8PF"%!+.TAZuL*X!!%1fH_pcBs8)Ti rr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2opr;HZqs1#Sa!!$e3;:\uWhuEn.!!#d(\AJ:Gs8;fm rr2oss8W-!s8)Ths8W+RLn+MG>Yn8G>?p(d!-ek]9Bk^'s8W,urr2orrr<#us8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W,urr2rts75aL%hhG5!,u+Gh,@5&!!#uKJt)f?s8)Ths8W-!s8W-!s8W-!s8W,qqYL6ls+#W\ !!#S6,GK-rp(nO4%hi:@o^r1`s8N#ss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr2orrVc`qs8PGTJHuXA FER@//?8aNB,)4MnaZ&Is8W)trr2ors8W,urr2flr;ZfsGB]h_!-2jkmQEeL!!$@t9QpI9rr2os rr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2oss8VWZljXId!!%(B=kZePec5\NJ:a?ls8Vrlqu?]r s8W-!s8W-!s8N#sr;?Kms8TR<]`8(0#n)T(C@*i8[g!(Jlg+!=s8W&rrr2ors8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W,urr2inrVuot\@BZ]!+JMkc"(AJ$4MUg!(MHgNrT.Zqtp9irr2rts8N#srr2oss8V]^oFM[H *$(VjEVU[uT)\j^J:N[[s8VrlqYpKns8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#srr2rts8>DYF8u;T ='"'S<7h0N_\'1 s8W,qqYUu4DK<`e)W!*t#&U&Y/mqYL*grr2rts8W-!s8W-!s8W)trr2os s8W!g961(5@66WdCi/P>!-*4,UAt8nqtp6"X&rr2rsrr2orrr<#us8W,urr2cjqu?]rKnu].!+oG>hbm>&!!$pQ)HQG"nc/Xh rr2orrr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2orrr<#urC0D'!!$nB?/\RWe,TJN J:OBos8Vrlqu?]rs8W-!s8W-!s8W-!s8W,urr2flr;ZfsJ:a6j!*1KuXE/LX'Gd#B$ruQVkl:\_ rr2orrr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! rr2ooqu$Kos*fHm!!$bDA*HQXci=)i!!,6m\@MY>s8;fmrr2oss8W-!s8W-!rr2orrr<#us$K5* "pTa"E:bk?Z2al$H$YYRs8Vunqu6Tos8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! qYL*hs8RV"T`>'p7S([/@,q:fDad3Cs8W#rrr;usrr<#us8W-!s8W-!s8W-!s8W,trVliss6K"9 $4Kl9#D6Z&l:+4a!!$,VM51+Ns8)Thrr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W)trr2ors8W,ho(!>(@3-J`Ec_$t+J/W6<_#\ks8W)srVlfqrr2or s8W-!s8W)trr2ors8W,`l0AQ\>q@S3D/SqS%ugPhbH%:\!uDs8W,urr2rts8W-! s8W-!s8W-!s8N#srr2orrr<#us$oV'!!$Ot7`]:Xkl:^*77M_*s8N#ss8N#ss8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2inrVuot\@Kf`!,>D1fNVS9 !!@NI!)0o4_#OH7r;?Klrr2rts8W-!s8W,urr2cjr;ZfsKnlT,!+K&5gf%/)!!%'O&kDH\mJm4d rr2orrr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W&rrr<#ulg*pD$==ScQZ-m9 *[%*U!*-M<_>jQ8r;?Klrr2rts8W-!s8W-!s8W-!s8N#sqYL*hs8Rh0S,`Ob+jQ&f+OM"Fk)uks.SQ!!#fFJ<^*6s8)Thrr2oss8W-!s8W-!s8W-!s8W)trr2or s8W,`l0&Ka:B1HF@:A1i9[<\=>)%j,s8W,qqYU9krr<#us8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8Doqs8W,blg5#eB0JQ!BP?]?%Yk#a8:Q2Rs8W,rqu$Hmrr<#u s8W-!s8W)trqu]ls8W,0\\8%D;)0o6Ci/_Q&<6_j;7O0Ss8W,sr;?Tps8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2onqY^Bns*8m^!!$D,=4pVTg&M+c8PF@.s8N#ss8N#s s8W-!s8W-!s8W-!s8W-!s8W)trr2oss8W'g8p(+6@m3/rBPHl7!,R+5W;lntqYL*hs8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,urr2cjr;ZfsJqU-(!-E'omliqP !!$aB%S5pOlMpnarVc`qs8W-!s8W-!rr2orrr2cjqu?]rH$YbV!+K2;iDNV+!!$pQ)HZFunGiOg rr2orrr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!qYL*hs8Rk2T)\jj 3'+]fD!hH4KF/,[l07=0s8W)trr2ors8W-!s8W-!s8W-!s8W,urr2cjqu?]rJ:a?m!)Y-oWH37[ !!@muGcC`Cs8)Tirr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W,qqY^Bns*B!n&J::NG52pkQ2gnj*?d]@p%&._s8N#srr2oss8W-!s8N#srVc`qs8VKRlk'q= %M4_>E:Y\8Z2al&H?tbSs8Vunqu6Tos8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W)trr)fps8W,blg"f`=;MmCEH1Up,bb8=98A=hs8W,qqYU9krr<#us8W-!s8W-!s8W-! rr2onqYURM_Hru@q4U($%N!U9gD'HrVcTms8W)trr2or s8W,urr2rts7uKfs8W+LJsQH;<'Xua9";FGs8W,sr;?Tps8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr2oss8W*f7XtI=G\_$Z6UScl!+/5eDZBb8 rr2rsrr2orrr<#us8W-!s8W)trr2orrVc`qs8>G[?2st&%1e>2C$I6%Z3q1FoCVSQs8W)trr<#u s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W)trr<#uo'u)P$!9hoeko>q !!%-A!Dj7;,4P*hs8W,trVccrs8N#srr2onqYUkcX1)@!!7HS%8#mOl2Ue`rVc`prr2rts8N#ss8W-!s8VrlqZ$Tq\@K!I!#tt?@1Np- D/JbY(nYkkW;lntqYL-hrr2rts8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W,urr2ors8W,u77WD+7*SV.ec5\m!!HF)"!FnUZ2ak(qYL'aq>0saqu6Tos8W,rqtNfZC]FH? /1muDEVC:gR/d4b\@BKWs8W#prVlfqs8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!rr2orrr2rts68e5#n(&^+es+"pDtHK!!#iHK:)]=s7uKfs8W,urr2orrr2or qtp9irr;ooqaEtG!!#"Z!c9)*TQPDR#766=KWb@Ts8)Tis8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W,qqY^Bns*/gi.4hi7A*F%!IfKUZ!!>"Z"p_H?ZiC(* rVc]lqu$9cp;+Va4[30O!(R8"Jm`!H;,YsF!,4qpGQ7^BrVc`prr2orrr<#us8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2orrr<#us$]G&!!%:WB'MiUaoDEX &en%,md0uRs7lBbqYL'bqYL3jrr)fpp%@rM9i(fi+9MjX!!.148',1KkReGPl07R7s8W&rrr2or s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#sr;?Nns8T:-bTeF0 D/]%[(6ee"B`SE9!sC:X!!u.f:Pt*jGBn]R));@#1B7DO!!.=(3Os3Qq&(-@!!#g)\]+UKs8;fn rr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8N#s r;?Kms8TU>a8c3H3]t2jB^?3@NW9&W9200uqtU3ks8N#sqtp9hrVNn,ZO%'U!YS%>s8W&srr2orrr2ors8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W)trr2orrVc`qs8PMWIfot-Ci&W"34f.kF8u;)7S$jAMMlt8JpD]j 'Gr(u"s3gF3k,fD$1,W":/?:#\!c:B)hsM!oAS13N,GYPOJH?"% !X*oX$AKZIU/+V7F`dIO8_+OhNdQ;Xo^qhVs8W)trr<#urr2oss8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!rr2oss8W)trqcKhs8W,-\'8`,XXl,r -7>T/*i'\nSf]/C(`Rp1faE,bSgC@#)*gg"+@CMN6UDtd..h]qsJu[trmITrBrVc`qs8W#prVQKis8W,urr2orrr<#u s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!rr2oss8W&rrVuoto_%p(IAmnsHl!Zf,q$&U1r(t-_'gh<+C*cr;$3eqYL-grVlfqrr<#u rr2oss8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!s8W-! s8W-!s8W-!s8W-!s8W-!s8W-!s8W-!~> Q cleartomark end end pagesave restore showpage %%PageTrailer %%Trailer %%Pages: 1 ./asymptote-2.41/examples/laserlattice.asy0000644000175000017500000000213213064427076020551 0ustar norbertnorbertimport graph; import palette; int n=256; pen[] Palette=BWRainbow(); real w(real w0, real z0, real z) {return w0*sqrt(1+(z/z0)^2);} real pot(real lambda, real w0, real r, real z) { real z0=pi*w0^2/lambda, kappa=2pi/lambda; return exp(-2*(r/w(w0,z0,z))^2)*cos(kappa*z)^2; } picture make_field(real lambda, real w0) { real[][] v=new real[n][n]; for(int i=0; i < n; ++i) for(int j=0; j < n; ++j) v[i][j]=pot(lambda,w0,i-n/2,abs(j-n/2)); picture p=new picture; size(p,250,250,IgnoreAspect); real xm=-n/lambda, ym=-n/(2*w0), xx=n/lambda, yx=n/(2*w0); image(p,v,(xm,ym),(xx,yx),Palette); xlimits(p,xm,xx); ylimits(p,ym,yx); xaxis(p,"{\Large $z/\frac{\lambda}{2}$}",BottomTop,LeftTicks); yaxis(p,"{\Large $r/w_0$}",LeftRight,RightTicks); label(p,format("{\LARGE $w_0/\lambda=%.2f$}",w0/lambda),point(p,NW),5N); return p; } picture p=make_field(160,80); picture q=make_field(80,80); picture r=make_field(16,80); picture s=make_field(2,80); real margin=1cm; add(p.fit(),(0,0),margin*NW); add(q.fit(),(0,0),margin*NE); add(r.fit(),(0,0),margin*SW); add(s.fit(),(0,0),margin*SE); ./asymptote-2.41/examples/cylinder.asy0000644000175000017500000000022213064427076017704 0ustar norbertnorbertimport solids; size(0,100); currentlight=Viewport; revolution r=cylinder(O,1,1.5,Y+Z); draw(surface(r),green,render(merge=true)); draw(r,blue); ./asymptote-2.41/examples/delu.asy0000644000175000017500000000077213064427076017036 0ustar norbertnorbertsize(7cm,0); pair z1=(1,-0.25); pair v1=dir(45); pair z2=-z1; pair v2=0.75*dir(260); pair z3=(z1.x,-3); // A centered random number real crand() {return unitrand()-0.5;} guide g; pair lastz; for(int i=0; i < 60; ++i) { pair z=0.75*lastz+(crand(),crand()); g=g..2.5*z; lastz=z; } g=shift(0,-.5)*g..cycle; draw(g,gray(0.7)); draw("$r$",z1--z2,RightSide,red,Arrows,DotMargins); draw(z1--z1+v1,Arrow); draw(z2--z2+v2,Arrow); draw(z3--z3+v1-v2,green,Arrow); dot("1",z1,S,blue); dot("2",z2,NW,blue); ./asymptote-2.41/examples/fractaltree.asy0000644000175000017500000000125313064427076020374 0ustar norbertnorbertsize(200); path ltrans(path p,int d) { path a=rotate(65)*scale(0.4)*p; return shift(point(p,(1/d)*length(p))-point(a,0))*a; } path rtrans(path p, int d) { path a=reflect(point(p,0),point(p,length(p)))*rotate(65)*scale(0.35)*p; return shift(point(p,(1/d)*length(p))-point(a,0))*a; } void drawtree(int depth, path branch) { if(depth == 0) return; real breakp=(1/depth)*length(branch); draw(subpath(branch,0,breakp),deepgreen); drawtree(depth-1,subpath(branch,breakp,length(branch))); drawtree(depth-1,ltrans(branch,depth)); drawtree(depth-1,rtrans(branch,depth)); return; } path start=(0,0)..controls (-1/10,1/3) and (-1/20,2/3)..(1/20,1); drawtree(6,start); ./asymptote-2.41/examples/pdb.asy0000644000175000017500000000641213064427076016647 0ustar norbertnorbertimport three; import cpkcolors; // A sample Protein Data Bank file for this example is available from // http://ndbserver.rutgers.edu/ftp/NDB/coordinates/na-biol/100d.pdb1 currentlight=White; //currentlight=nolight; defaultrender.merge=true; // Fast low-quality rendering //defaultrender.merge=false; // Slow high-quality rendering bool pixel=false; // Set to true to draw dots as pixels. real width=10*linewidth(currentpen); size(200); currentprojection=perspective(30,30,15); pen chainpen=green; pen hetpen=purple; string filename="100d.pdb1"; //string filename=getstring("filename"); string prefix=stripextension(filename); file data=input(filename); pen color(string e) { e=replace(e," ",""); int n=length(e); if(n < 1) return currentpen; if(n > 1) e=substr(e,0,1)+downcase(substr(e,1,n-1)); int index=find(Element == e); if(index < 0) return currentpen; return rgb(Hexcolor[index]); } // ATOM string[] name,altLoc,resName,chainID,iCode,element,charge; int[] serial,resSeq; real[][] occupancy,tempFactor; bool newchain=true; struct bond { int i,j; void operator init(int i, int j) { this.i=i; this.j=j; } } bond[] bonds; struct atom { string name; triple v; void operator init(string name, triple v) { this.name=name; this.v=v; } } struct chain { int[] serial; atom[] a; } int[] serials; chain[] chains; atom[] atoms; while(true) { string line=data; if(eof(data)) break; string record=replace(substr(line,0,6)," ",""); if(record == "TER") {newchain=true; continue;} bool ATOM=record == "ATOM"; bool HETATOM=record == "HETATM"; int serial; atom a; if(ATOM || HETATOM) { serial=(int) substr(line,6,5); a.name=substr(line,76,2); a.v=((real) substr(line,30,8), (real) substr(line,38,8), (real) substr(line,46,8)); } if(ATOM) { if(newchain) { chains.push(new chain); newchain=false; } chain c=chains[chains.length-1]; c.serial.push(serial); c.a.push(a); continue; } if(HETATOM) { serials.push(serial); atoms.push(a); } if(record == "CONECT") { int k=0; int i=(int) substr(line,6,5); while(true) { string s=replace(substr(line,11+k,5)," ",""); if(s == "") break; k += 5; int j=(int) s; if(j <= i) continue; bonds.push(bond(i,j)); } } } write("Number of atomic chains: ",chains.length); int natoms; begingroup3("chained"); for(chain c : chains) { for(int i=0; i < c.a.length-1; ++i) draw(c.a[i].v--c.a[i+1].v,chainpen,currentlight); for(atom a : c.a) if(pixel) pixel(a.v,color(a.name),width); else dot(a.v,color(a.name),currentlight); natoms += c.a.length; } endgroup3(); write("Number of chained atoms: ",natoms); write("Number of hetero atoms: ",atoms.length); begingroup3("hetero"); for(atom h : atoms) if(pixel) pixel(h.v,color(h.name),width); else dot(h.v,color(h.name),currentlight); endgroup3(); write("Number of hetero bonds: ",bonds.length); begingroup3("bonds"); for(bond b : bonds) { triple v(int i) {return atoms[find(serials == i)].v;} draw(v(b.i)--v(b.j),hetpen,currentlight); } endgroup3(); string options; string viewfilename=prefix+".views"; if(!error(input(viewfilename,check=false))) options="3Dviews="+viewfilename; shipout(prefix,options=options); ./asymptote-2.41/examples/smoothelevation.asy0000644000175000017500000000101013064427076021307 0ustar norbertnorbertimport graph3; import grid3; import palette; currentlight=Viewport; if(settings.render <= 0) settings.prc=false; currentprojection=orthographic(1,2,13); size(400,300,IgnoreAspect); real f(pair z) {return cos(2*pi*z.x)*sin(2*pi*z.y);} surface s=surface(f,(-1/2,-1/2),(1/2,1/2),20,Spline); s.colors(palette(s.map(zpart),Rainbow())); draw(s); scale(true); xaxis3(Label("$x$",0.5),Bounds,InTicks); yaxis3(Label("$y$",0.5),Bounds,InTicks); zaxis3(Label("$z$",0.5),Bounds,InTicks(beginlabel=false)); grid3(XYZgrid); ./asymptote-2.41/examples/fjortoft.asy0000644000175000017500000000130613064427076017734 0ustar norbertnorbertsize(15cm,0); pair d=(1.5,1); real s=d.x+1; picture box(string s) { picture pic; draw(pic,box(0,d)); label(pic,s,d/2); return pic; } add(box("$k_1$")); add(shift(s)*box("$k_2$")); add(shift(s)^2*box("$k_3$")); path g=(d.x,d.y/2)--(s,d.y/2); path G=(d.x/2,-(s-d.x))--(d.x/2,0); draw(Label(baseline("$\ldots$")),shift(-s)*g,BeginArrow,BeginPenMargin); draw(Label("$Z_1$"),g,BeginArrow,BeginPenMargin); draw(Label("$E_1$",LeftSide),g,Blank); draw(Label("$Z_3$"),shift(s)*g,Arrow,PenMargin); draw(Label("$E_3$",LeftSide),shift(s)*g,Blank); draw(Label("$Z_2$"),shift(s)*G,Arrow,PenMargin); draw(Label("$E_2$",LeftSide),shift(s)*G,Blank); draw(Label(baseline("$\ldots$")),shift(s)^2*g,Arrow,PenMargin); ./asymptote-2.41/examples/circles.asy0000644000175000017500000000110013064427076017513 0ustar norbertnorbertsize(6cm,0); import math; currentpen=magenta; real r1=1; real r2=sqrt(7); real r3=4; pair O=0; path c1=circle(O,r1); draw(c1,green); draw(circle(O,r2),green); draw(circle(O,r3),green); real x=-0.6; real y=-0.8; real yD=0.3; pair A=(sqrt(r1^2-y^2),y); pair B=(-sqrt(r2^2-y^2),y); pair C=(x,sqrt(r3^2-x^2)); pair d=A+r2*dir(B--C); pair D=intersectionpoint(c1,A--d); draw(A--B--C--cycle); draw(interp(A,D,-0.5)--interp(A,D,1.5),blue); dot("$O$",O,S,red); dot("$A$",A,dir(C--A,B--A),red); dot("$B$",B,dir(C--B,A--B),red); dot("$C$",C,dir(A--C,B--C),red); dot("$D$",D,red); ./asymptote-2.41/examples/pseudosphere.asy0000644000175000017500000000135313064427076020607 0ustar norbertnorbert// Pseudosphere: // x = a sin(u) cos(v); // y = a sin(u) sin(v); // z = a (ln(tg(u/2))+cos(u)); import three; import solids; import graph3; import palette; triple pseudosphere(real x) { return (sin(x),0,cos(x)+log(tan(x/2))); } size(20cm,IgnoreAspect); currentprojection=orthographic(160,40,100); currentlight=(50,50,50); path3 G=graph(pseudosphere,0.5pi,0.965pi,10,Spline); revolution r=revolution(O,G,Z); draw(r,1,longitudinalpen=nullpen); surface s=surface(r); s.colors(palette(s.map(zpart),Gradient(cyan+white+opacity(0.9), magenta+white+opacity(0.9)))); draw(s); draw(r,6,backpen=linetype("10 10",10),longitudinalpen=nullpen); int n=10; for(int i=0; i < n; ++i) draw(rotate(i*360/n,O,Z)*G); ./asymptote-2.41/examples/textpath.asy0000644000175000017500000000047013064427076017741 0ustar norbertnorbertsize(300); fill(texpath(Label("test",TimesRoman())),pink); fill(texpath(Label("test",fontcommand('.fam T\n.ps 12')),tex=false),red); pair z=10S; fill(texpath(Label("$ \sqrt{x^2} $",z,TimesRoman())),pink); fill(texpath(Label("$ sqrt {x sup 2} $",z,fontcommand('.fam T\n.ps 12')), tex=false),red); ./asymptote-2.41/examples/100d.views0000644000175000017500000000122113064427076017100 0ustar norbertnorbertVIEW={View A} COO=95.703857421875 -26.603919982910156 122.73419952392578 C2C=-0.4144790768623352 0.7603927254676819 0.5000100135803223 ROO=141.69743417830577 ROLL=13.566625455930614 AAC=34.903342413559436 END VIEW={View B} COO=15.9437837600708 -12.494922637939453 67.1521987915039 C2C=0.9024380445480347 0.3321097493171692 0.27442431449890137 ROO=303.7409567061654 ROLL=66.40207458248847 AAC=34.903342413559436 END VIEW={View C} COO=-42.11725616455078 -13.32657241821289 18.372915267944336 C2C=0.6989848017692566 -0.009704185649752617 0.7150706648826599 ROO=444.70718853041143 ROLL=78.84753985408712 AAC=34.903342413559436 END ./asymptote-2.41/examples/sinc.asy0000644000175000017500000000111713064427076017033 0ustar norbertnorbertimport graph3; import contour; currentprojection=orthographic(1,-2,1); currentlight=White; size(12cm,0); real sinc(pair z) { real r=2pi*abs(z); return r != 0 ? sin(r)/r : 1; } render render=render(compression=Low,merge=true); draw(lift(sinc,contour(sinc,(-2,-2),(2,2),new real[] {0})),red); draw(surface(sinc,(-2,-2),(2,2),Spline),lightgray,render); draw(scale3(2*sqrt(2))*unitdisk,paleyellow+opacity(0.25),nolight,render); draw(scale3(2*sqrt(2))*unitcircle3,red,render); xaxis3("$x$",Bounds,InTicks); yaxis3("$y$",Bounds,InTicks(beginlabel=false)); zaxis3("$z$",Bounds,InTicks); ./asymptote-2.41/examples/BezierSaddle.asy0000644000175000017500000000110513064427076020431 0ustar norbertnorbertimport three; size(300); patch p=patch(unstraighten(unitplane.s[0].external())); p.P[3][0]+=(0,0,1); p.P[1][0]+=(0,0,1/3); p.P[2][0]+=(0,0,2/3); p.P[3][1]+=(0,0,2/3); p.P[3][2]+=(0,0,1/3); p.P[2][1]=interp(p.P[2][0],p.P[2][3],1/3); p.P[2][2]=interp(p.P[2][0],p.P[2][3],2/3); p.P[1][1]=interp(p.P[1][0],p.P[1][3],1/3); p.P[1][2]=interp(p.P[1][0],p.P[1][3],2/3); draw(surface(p),red+opacity(0.75)); void dot(triple[][] P) { for(int i=0; i < 4; ++i) for(int j=0; j < 4; ++j) { draw(string(i)+","+string(j),P[i][j],linewidth(1mm)); } } dot(surface(p).s[0].P); ./asymptote-2.41/examples/trefoilknot.asy0000644000175000017500000000111513064427076020435 0ustar norbertnorbertimport tube; import graph3; import palette; currentlight=White; size(0,8cm); currentprojection=perspective(1,1,1,up=-Y); int e=1; real x(real t) {return cos(t)+2*cos(2t);} real y(real t) {return sin(t)-2*sin(2t);} real z(real t) {return 2*e*sin(3t);} path3 p=scale3(2)*graph(x,y,z,0,2pi,50,operator ..)&cycle; pen[] pens=Gradient(6,red,blue,purple); pens.push(yellow); for (int i=pens.length-2; i >= 0 ; --i) pens.push(pens[i]); path sec=scale(0.25)*texpath("$\pi$")[0]; coloredpath colorsec=coloredpath(sec, pens,colortype=coloredNodes); draw(tube(p,colorsec),render(merge=true)); ./asymptote-2.41/examples/shadestroke.asy0000644000175000017500000000015013064427076020407 0ustar norbertnorbertsize(100); radialshade(W..N..E--(0,0),stroke=true, red+linewidth(30),(0,0),0.25,yellow,(0,0),1); ./asymptote-2.41/examples/spectrum.asy0000644000175000017500000000447213064427076017750 0ustar norbertnorbertimport graph; usepackage("ocg"); settings.tex="pdflatex"; // Dan Bruton algorithm pen nm2rgb(real wl, real gamma=0.8, bool intensity=true) { triple rgb; if(wl >= 380 && wl <= 440) {rgb=((440-wl)/60,0,1);} if(wl > 440 && wl <= 490) {rgb=(0,(wl-440)/50,1);} if(wl > 490 && wl <= 510) {rgb=(0,1,(510-wl)/20);} if(wl > 510 && wl <= 580) {rgb=((wl-510)/70,1,0);} if(wl > 580 && wl <= 645) {rgb=(1,(645-wl)/65,0);} if(wl > 645 && wl <= 780) {rgb=(1,0,0);} real Intensity=1; if(intensity) { if(wl >= 700) {Intensity=0.3+0.7*(780-wl)/80;} else if(wl <= 420) {Intensity=0.3+0.7*(wl-380)/40;} } return rgb((Intensity*rgb.x)**gamma,(Intensity*rgb.y)**gamma, (Intensity*rgb.z)**gamma); } real width=1; real height=50; begin("spectrum"); for(real i=380 ; i <= 780 ; i += width) { draw((i,0)--(i,height),width+nm2rgb(wl=i,false)+squarecap); } begin("Extinction",false); // nested for(real i=380 ; i <= 780 ; i += width) { draw((i,0)--(i,height),width+nm2rgb(wl=i,true)+squarecap); } end(); end(); begin("Wavelength"); xaxis(scale(0.5)*"$\lambda$(nm)",BottomTop,380,780, RightTicks(scale(0.5)*rotate(90)*Label(),step=2,Step=10),above=true); end(); // From Astronomical Data Center(NASA) // Neutral only real[] Na={423.899, 424.208, 427.364, 427.679, 428.784, 429.101, 432.14, 432.462, 434.149, 434.474, 439.003, 439.334, 441.989, 442.325, 449.418, 449.766, 454.163, 454.519, 568.2633, 568.8204, 588.995, 589.5924}; begin("Na absorption"); for(int i=0; i < Na.length; ++i) { draw((Na[i],0)--(Na[i],height),0.1*width+squarecap); } end(); begin("Na emission"); for(int i=0; i < Na.length; ++i) { draw((Na[i],0)--(Na[i],-height),0.1*width+nm2rgb(Na[i],false)+squarecap); } end(); // Neutral only real[] Zn={388.334, 396.543, 411.321, 429.288, 429.833, 462.981, 468.014, 472.215, 481.053 , 506.866, 506.958, 518.198, 530.865, 531.024, 531.102, 577.21, 577.55, 577.711, 623.79, 623.917, 636.234, 647.918, 692.832, 693.847, 694.32, 779.936}; begin("Zn absorption",false); for(int i=0; i < Zn.length; ++i) { draw((Zn[i],0)--(Zn[i],height),width+squarecap); } end(); begin("Zn emission",false); for(int i=0; i < Zn.length; ++i) { draw((Zn[i],0)--(Zn[i],-height),width+nm2rgb(Zn[i],false)+squarecap); } end(); shipout(bbox(2mm,Fill(white))); ./asymptote-2.41/examples/billboard.asy0000644000175000017500000000023213064427076020026 0ustar norbertnorbertimport three; size(100); currentprojection=perspective(1,-2,1); draw(unitbox); label("Billboard",X,red,Billboard); label("Embedded",Y,blue,Embedded); ./asymptote-2.41/examples/controlsystem.asy0000644000175000017500000000141213064427076021022 0ustar norbertnorbertsize(0,4cm); import flowchart; block delay=roundrectangle("$e^{-sT_t}$",(0.33,0)); block system=roundrectangle("$\frac{s+3}{s^2+0.3s+1}$",(0.6,0)); block controller=roundrectangle("$0.06\left( 1 + \frac{1}{s}\right)$", (0.45,-0.25)); block sum1=circle("",(0.15,0),mindiameter=0.3cm); block junction1=circle("",(0.75,0),fillpen=currentpen); draw(delay); draw(system); draw(controller); draw(sum1); draw(junction1); add(new void(picture pic, transform t) { blockconnector operator --=blockconnector(pic,t); block(0,0)--Label("$u$",align=N)--Arrow--sum1--Arrow--delay--Arrow-- system--junction1--Label("$y$",align=N)--Arrow--block(1,0); junction1--Down--Left--Arrow--controller--Left--Up-- Label("$-$",position=3,align=ESE)--Arrow--sum1; }); ./asymptote-2.41/examples/stereoscopic.asy0000644000175000017500000000025213064427076020600 0ustar norbertnorbertimport three; currentprojection=perspective(50*dir(70,15)); picture pic; unitsize(pic,1cm); draw(pic,xscale3(10)*unitcube,yellow,blue); addStereoViews(pic); ./asymptote-2.41/examples/gamma3.asy0000644000175000017500000000131213064427076017241 0ustar norbertnorbertimport graph3; import palette; size(12cm,IgnoreAspect); currentprojection=orthographic(1,-2,1); real X=4.5; real M=abs(gamma((X,0))); pair Gamma(pair z) { return (z.x > 0 || z != floor(z.x)) ? gamma(z) : M; } real f(pair z) {return min(abs(Gamma(z)),M);} surface s=surface(f,(-2.1,-2),(X,2),70,Spline); real Arg(triple v) { return degrees(Gamma((v.x,v.y)),warn=false); } s.colors(palette(s.map(Arg),Wheel())); draw(s,render(compression=Low,merge=true)); real xmin=point((-1,-1,-1)).x; real xmax=point((1,1,1)).x; draw((xmin,0,0)--(xmax,0,0),dashed); xaxis3("$\mathop{\rm Re} z$",Bounds,InTicks); yaxis3("$\mathop{\rm Im} z$",Bounds,InTicks(beginlabel=false)); zaxis3("$|\Gamma(z)|$",Bounds,InTicks); ./asymptote-2.41/examples/xxsq01x-1.asy0000644000175000017500000000154413064427076017575 0ustar norbertnorbertimport graph3; import solids; size(300); currentprojection=perspective(0,2,10,up=Y); currentlight=Viewport; pen color=green; real f(real x) {return x^2;} pair F(real x) {return (x,f(x));} triple F3(real x) {return (x,f(x),0);} path p=graph(F,0,1,n=10,operator ..)--cycle; path3 p3=path3(p); revolution a=revolution(-X,p3,Y,0,180); render render=render(merge=true); draw(surface(a),color); surface s=surface(p); draw(s,color); transform3 t=shift(-2X)*rotate(180,Y); draw(t*s,color); draw(p3); draw(t*p3); draw((-1,0,0)--(-1,1,0),dashed); xaxis3(Label("$x$",1),Arrow3); yaxis3(Label("$y$",1),Arrow3); dot(Label("$(1,1)$"),(1,1,0)); dot(Label("$(-1,1)$"),(-1,1,0),W); arrow("$y=x^{2}$",F3(0.7),X,1cm,red); arrow("$y=x$",(0.3,0.3,0),X,1.5cm,red); draw(circle((-1,1,0),2,Y),dashed); draw((-1,1,0)--(1,1,0),dashed); draw(shift(-X)*arc(0.02Y,0.3,90,0,0,0,CW),Arrow3); ./asymptote-2.41/examples/annotation.asy0000644000175000017500000000035413064427076020253 0ustar norbertnorbertimport annotate; settings.outformat="pdf"; size(200); draw(unitcircle); dot((0,0)); annotate("O","(0,0)",(0,0)); annotate("A","(1,0)",(1,0)); annotate("B","(0,1)",(0,1)); annotate("C","(-1,0)",(-1,0)); annotate("D","(0,-1)",(0,-1)); ./asymptote-2.41/examples/xxsq01y.asy0000644000175000017500000000147313064427076017441 0ustar norbertnorbertimport solids; size(0,150); currentprojection=perspective(0,0,10,up=Y); pen color=green; real alpha=240; real f(real x) {return x^2;} pair F(real x) {return (x,f(x));} triple F3(real x) {return (x,f(x),0);} path p=graph(F,0,1,n=10,operator ..)--cycle; path3 p3=path3(p); render render=render(compression=0,merge=true); draw(surface(revolution(p3,Y,0,alpha)),color,render); surface s=surface(p); draw(s,color,render); draw(rotate(alpha,Y)*s,color,render); draw(p3,blue); xaxis3(Label("$x$",1),Arrow3); yaxis3(Label("$y$",1),ymax=1.25,dashed,Arrow3); dot("$(1,1)$",(1,1,0),X); arrow("$y=x^{2}$",F3(0.7),X,0.75cm,red); arrow("$y=x$",(0.8,0.8,0),Y,1cm,red); real r=0.4; draw((r,f(r),0)--(r,r,0),red); draw("$r$",(0,(f(r)+r)*0.5,0)--(r,(f(r)+r)*0.5,0),N,red,Arrows3,PenMargins3); draw(arc(1.1Y,0.3,90,0,7.5,180),Arrow3); ./asymptote-2.41/examples/sacone3D.asy0000644000175000017500000000044013064427076017534 0ustar norbertnorbertimport solids; size(0,75); real r=1; real h=1; revolution R=cone(r,h); draw(surface(R),lightgreen+opacity(0.5),render(compression=Low)); pen edge=blue+0.25mm; draw("$\ell$",(0,r,0)--(0,0,h),W,edge); draw("$r$",(0,0,0)--(r,0,0),red+dashed); draw((0,0,0)--(0,0,h),red+dashed); dot(h*Z); ./asymptote-2.41/examples/odetest.asy0000644000175000017500000000234313064427076017550 0ustar norbertnorbertimport ode; write("integration test"); real f(real t, real x) {return cos(x);} write(integrate(1,f,0,10,0.1,dynamic=true,0.0002,0.0004,RK3BS,verbose=true)); write(); write("system integration test"); real[] f(real t, real[] x) {return new real[] {x[1],1.5*x[0]^2};} write(integrate(new real[] {4,-8},f,0,1,n=100,dynamic=true,tolmin=0.0002, tolmax=0.0004,RK3BS,verbose=false)); write(); write("simultaneous newton test"); real[] function(real[] x) { return new real[] {x[0]^2+x[1]^2-25,(x[0]-6)^2+x[1]^2-25}; } real[][] fJac(real[] x) { return new real[][] {{2*x[0],2*x[1]},{2*(x[0]-6),2*x[1]}}; } write(newton(function,fJac,new real[] {0,-1})); write(); write("BVP solver test"); write("Finding initial conditions that solve w''(t)=1.5*w(t), w(0)=4, w(1)=1"); real[] initial(real[] x) { return new real[] {4,x[0]}; } real[] discrepancy(real[] x) { real error=x[0]-1; write("Error: ",error); return new real[] {error}; } real[] w0=solveBVP(f,0,1,n=10,dynamic=true,tolmin=0.0002,tolmax=0.0004,RK3BS, initial,discrepancy,guess=new real[] {-30},iterations=10); write(w0); write(); write(integrate(w0,f,0,1,n=10,dynamic=true,tolmin=0.0002,tolmax=0.0004,RK3BS, verbose=false)); write(); ./asymptote-2.41/examples/fequlogo.asy0000644000175000017500000000212513064427076017720 0ustar norbertnorbert// A compressed version of the required data file may be obtained from: // http://www-roc.inria.fr/gamma/download/counter.php?dir=ARCHITEC/&get_obj=uhrturm.obj.gz import graph3; import obj; size(200,0); size3(200); if(settings.render < 0) settings.render=8; texpreamble("\usepackage[T1]{fontenc}"); texpreamble("\usepackage{ccfonts,eulervm}"); currentprojection=perspective(4,1,2); currentlight=(4,0,2); currentlight.background=blue; real R=4; triple f1(pair t) {return (R*cos(t.x),R*sin(t.x),t.y);} draw(shift(-0.6Z)*scale3(0.66)*rotate(55,Z)*rotate(90,X)* obj("uhrturm.obj",orange)); surface s=surface(f1,(0,0),(2pi,2),8,8,Spline); string lo="$\displaystyle f(x+y)=f(x)+f(y)$"; string hi="$\displaystyle F_{t+s}=F_t\circ F_s$"; real h=0.0125; draw(surface(rotate(2)*xscale(0.32)*yscale(0.6)*lo,s,-pi/4-1.5*pi/20,0.5,h)); draw(surface(rotate(0)*xscale(-0.45)*yscale(0.3)*hi,s,0.8*pi,0.25,h),blue); add(new void(frame f, transform3 t, picture pic, projection P) { draw(f,surface(invert(box(min(f,P),max(f,P)),min3(f),P), new pen[] {orange,red,yellow,brown})); } ); ./asymptote-2.41/examples/triangles.asy0000644000175000017500000000070713064427076020073 0ustar norbertnorbertimport three; size(10cm); triple[] v={O,X,X+Y,Y}; triple[] n={Z,X}; int[][] vi={{0,1,2},{2,3,0}}; int[][] ni={{0,0,0},{1,1,1}}; pen[] p={red+opacity(0.5),green+opacity(0.5),blue+opacity(0.5), black+opacity(0.5)}; // Adobe Reader exhibits a PRC rendering bug for opacities in (0.5,1): //pen[] p={red+opacity(0.9),green+opacity(0.9),blue+opacity(0.9),black+opacity(0.9)}; int[][] pi={{0,1,2},{2,3,0}}; draw(v,vi,n,ni,red); draw(v+Z,vi,p,pi); ./asymptote-2.41/examples/label3.asy0000644000175000017500000000026613064427076017245 0ustar norbertnorbertimport three; currentprojection=perspective(0,0,1,up=Y); label(scale(4)*"$\displaystyle\int_{-\infty}^{+\infty} e^{-\alpha x^2}\,dx= \sqrt{\frac{\pi}{\alpha}}$",O,blue,Embedded); ./asymptote-2.41/examples/pipeintersection.asy0000644000175000017500000000055213064427076021465 0ustar norbertnorbertimport graph3; currentprojection=orthographic(5,4,2); size(12cm,0); real f(pair z) {return min(sqrt(1-z.x^2),sqrt(1-z.y^2));} surface s=surface(f,(0,0),(1,1),40,Spline); transform3 t=rotate(90,O,Z), t2=t*t, t3=t2*t, i=xscale3(-1)*zscale3(-1); draw(surface(s,t*s,t2*s,t3*s,i*s,i*t*s,i*t2*s,i*t3*s),blue, render(compression=Low,closed=true,merge=true)); ./asymptote-2.41/examples/sacone.asy0000644000175000017500000000067513064427076017357 0ustar norbertnorbertsize(0,150); pair z0=(0,0); real r=1; real h=1; real l=sqrt(r^2+h^2); real a=(1-r/l)*360; real a1=a/2; real a2=360-a/2; path g=arc(z0,r,a1,a2); fill((0,0)--g--cycle,lightgreen); draw(g); pair z1=point(g,0); pair z2=point(g,length(g)); real r2=1.1*r; path c=arc(0,r2,a1,a2); draw("$2\pi r$",c,red,Arrows,Bars,PenMargins); pen edge=blue+0.5mm; draw("$\ell$",z0--z1,0.5*SE,edge); draw(z0--z2,edge); draw(arc(z0,r,a2-360,a1),grey+dashed); dot(0); ./asymptote-2.41/examples/curvedlabel.asy0000644000175000017500000000026113064427076020366 0ustar norbertnorbertsize(200); import labelpath; labelpath("This is a test of curved labels in Asymptote (implemented with the {\tt PSTricks pstextpath} macro).",reverse(rotate(-90)*unitcircle)); ./asymptote-2.41/examples/cos2theta.asy0000644000175000017500000000035313064427076017774 0ustar norbertnorbertimport graph; size(0,100); real f(real t) {return cos(2*t);} path g=polargraph(f,0,2pi,operator ..)--cycle; fill(g,green+white); xaxis("$x$",above=true); yaxis("$y$",above=true); draw(g); dot(Label,(1,0),NE); dot(Label,(0,1),NE); ./asymptote-2.41/examples/1overx.asy0000644000175000017500000000046513064427076017330 0ustar norbertnorbertimport graph; size(200,IgnoreAspect); real f(real x) {return 1/x;}; bool3 branch(real x) { static int lastsign=0; if(x == 0) return false; int sign=sgn(x); bool b=lastsign == 0 || sign == lastsign; lastsign=sign; return b ? true : default; } draw(graph(f,-1,1,branch)); axes("$x$","$y$",red); ./asymptote-2.41/examples/elevation.asy0000644000175000017500000000050313064427076020063 0ustar norbertnorbertimport graph3; import grid3; import palette; currentprojection=orthographic(0.8,1,1); size(400,300,IgnoreAspect); defaultrender.merge=true; real f(pair z) {return cos(2*pi*z.x)*sin(2*pi*z.y);} surface s=surface(f,(-1/2,-1/2),(1/2,1/2),50,Spline); draw(s,mean(palette(s.map(zpart),Rainbow())),black); grid3(XYZgrid); ./asymptote-2.41/examples/fano.asy0000644000175000017500000000076213064427076017027 0ustar norbertnorbertimport math; size(100,0); pair z4=(0,0); pair z7=(2,0); pair z1=point(rotate(60)*(z4--z7),1); pair z5=interp(z4,z7,0.5); pair z3=interp(z7,z1,0.5); pair z2=interp(z1,z4,0.5); pair z6=extension(z4,z3,z7,z2); draw(z4--z7--z1--cycle); draw(z4--z3); draw(z7--z2); draw(z1--z5); draw(circle(z6,abs(z3-z6))); label("1",z1,dir(z5--z1)); label("2",z2,dir(z7--z2)); label("3",z3,dir(z4--z3)); label("4",z4,dir(z3--z4)); label("5",z5,dir(z1--z5)); label("6",z6,2.5E+0.1*N); label("7",z7,dir(z2--z7)); ./asymptote-2.41/examples/stroke3.asy0000644000175000017500000000007313064427076017471 0ustar norbertnorbertimport three; size(5cm); draw(O--X,red+1cm,currentlight); ./asymptote-2.41/examples/RiemannSurfaceRoot.asy0000644000175000017500000000060213064427076021643 0ustar norbertnorbert// Riemann surface of z^{1/n} import graph3; import palette; int n=3; size(200,300,keepAspect=false); currentprojection=orthographic(10,10,30); currentlight=(10,10,5); triple f(pair t) {return (t.x*cos(t.y),t.x*sin(t.y),t.x^(1/n)*sin(t.y/n));} surface s=surface(f,(0,0),(1,2pi*n),8,16,Spline); s.colors(palette(s.map(zpart),Rainbow())); draw(s,meshpen=black,render(merge=true)); ./asymptote-2.41/examples/workcone.asy0000644000175000017500000000167413064427076017736 0ustar norbertnorbertimport solids; size(0,150); currentprojection=orthographic(0,-30,5); real r=4; real h=10; real s=8; real x=r*s/h; real sr=5; real xr=r*sr/h; real s1=sr-0.1; real x1=r*s1/h; real s2=sr+0.2; real x2=r*s2/h; render render=render(compression=0,merge=true); path3 p=(0,0,0)--(x,0,s); revolution a=revolution(p,Z); draw(surface(a,4),lightblue+opacity(0.5),render); path3 q=(x,0,s)--(r,0,h); revolution b=revolution(q,Z); draw(surface(b),white+opacity(0.5),render); draw((-r-1,0,0)--(r+1,0,0)); draw((0,0,0)--(0,0,h+1),dashed); path3 w=(x1,0,s1)--(x2,0,s2)--(0,0,s2); revolution b=revolution(w,Z); draw(surface(b),blue+opacity(0.5),render); draw(circle((0,0,s2),x2)); draw(circle((0,0,s1),x1)); draw("$x$",(xr,0,0)--(xr,0,sr),red,Arrow3,PenMargin3); draw("$r$",(0,0,sr)--(xr,0,sr),N,red); draw((string) r,(0,0,h)--(r,0,h),N,red); draw((string) h,(r,0,0)--(r,0,h),red,Arrow3,PenMargin3); draw((string) s,(-x,0,0)--(-x,0,s),W,red,Arrow3,Bar3,PenMargin3); ./asymptote-2.41/examples/floor.asy0000644000175000017500000000076613064427076017231 0ustar norbertnorbertimport graph; unitsize(1cm); real Floor(real x) {return floor(x);} pair[] Close; pair[] Open; bool3 branch(real x) { static real lasty; static bool first=true; real y=floor(x); bool samebranch=first || lasty == y; first=false; if(samebranch) lasty=x; else { Close.push((x,lasty)); Open.push((x,y)); } lasty=y; return samebranch ? true : default; }; draw(graph(Floor,-5.5,5.5,500,branch)); axes("$x$",rotate(0)*"$\lfloor x\rfloor$",red); dot(Close); dot(Open,UnFill); ./asymptote-2.41/examples/label3solid.asy0000644000175000017500000000027313064427076020276 0ustar norbertnorbertimport three; currentprojection=perspective(100,100,200,up=Y); draw(scale3(4)*extrude("$\displaystyle\int_{-\infty}^{+\infty} e^{-\alpha x^2}\,dx=\sqrt{\frac{\pi}{\alpha}}$",2Z),blue); ./asymptote-2.41/examples/polardatagraph.asy0000644000175000017500000000050613064427076021071 0ustar norbertnorbertimport graph; size(100); int n=30; real minRadius=0.2; real angles[]=uniform(0,2pi,n); angles.delete(angles.length-1); real[] r=new real[n]; for(int i=0; i < n; ++i) r[i]=unitrand()*(1-minRadius)+minRadius; interpolate join=operator ..(operator tension(10,true)); draw(join(polargraph(r,angles,join),cycle),dot(red)); ./asymptote-2.41/examples/torus.asy0000644000175000017500000000063513064427076017257 0ustar norbertnorbertsize(200); import graph3; currentprojection=perspective(5,4,4); real R=3; real a=1; /* import solids; revolution torus=revolution(reverse(Circle(R*X,a,Y,32)),Z,90,345); surface s=surface(torus); */ triple f(pair t) { return ((R+a*cos(t.y))*cos(t.x),(R+a*cos(t.y))*sin(t.x),a*sin(t.y)); } surface s=surface(f,(radians(90),0),(radians(345),2pi),8,8,Spline); draw(s,green,render(compression=Low,merge=true)); ./asymptote-2.41/examples/spiral3.asy0000644000175000017500000000065213064427076017457 0ustar norbertnorbertimport graph3; import palette; size3(10cm); currentprojection=orthographic(5,4,2); viewportmargin=(2cm,0); real r(real t) {return 3exp(-0.1*t);} real x(real t) {return r(t)*cos(t);} real y(real t) {return r(t)*sin(t);} real z(real t) {return t;} path3 p=graph(x,y,z,0,6*pi,50,operator ..); tube T=tube(p,2); surface s=T.s; s.colors(palette(s.map(zpart),BWRainbow())); draw(s,render(merge=true)); draw(T.center,thin()); ./asymptote-2.41/pen.cc0000644000175000017500000000317313064427076014640 0ustar norbertnorbert/***** * pen.cc * John Bowman * *****/ #include "pen.h" #include "drawelement.h" namespace camp { const double tex2ps=72.0/72.27; const double ps2tex=1.0/tex2ps; const char* DEFPAT=""; const char* DEFLATEXFONT="\\usefont{\\ASYencoding}{\\ASYfamily}{\\ASYseries}{\\ASYshape}"; const char* DEFCONTEXTFONT="modern"; const char* DEFTEXFONT="cmr12"; const double DEFWIDTH=-1; const Int DEFCAP=-1; const Int DEFJOIN=-1; const double DEFMITER=0; const transform nullTransform=transform(0.0,0.0,0.0,0.0,0.0,0.0); const char* PSCap[]={"butt","round","square"}; const char* Cap[]={"square","round","extended"}; const Int nCap=sizeof(Cap)/sizeof(char*); const char* Join[]={"miter","round","bevel"}; const Int nJoin=sizeof(Join)/sizeof(char*); const char* OverwriteTag[]={"Allow","Suppress","SupressQuiet", "Move","MoveQuiet"}; const Int nOverwrite=sizeof(OverwriteTag)/sizeof(char*); const char* FillRuleTag[]={"ZeroWinding","EvenOdd"}; const Int nFill=sizeof(FillRuleTag)/sizeof(char*); const char* BaseLineTag[]={"NoAlign","Align"}; const Int nBaseLine=sizeof(BaseLineTag)/sizeof(char*); const char* ColorDeviceSuffix[]={"","","Gray","RGB","CMYK",""}; const unsigned nColorSpace=sizeof(ColorDeviceSuffix)/sizeof(char*); const char* BlendMode[]={"Compatible","Normal","Multiply","Screen", "Overlay","SoftLight","HardLight", "ColorDodge","ColorBurn","Darken", "Lighten","Difference","Exclusion", "Hue","Saturation","Color","Luminosity"}; const Int nBlendMode=sizeof(BlendMode)/sizeof(char*); pen drawElement::lastpen; } ./asymptote-2.41/runfile.h0000644000175000017500000000171113064427126015354 0ustar norbertnorbert/***** Autogenerated from runfile.in; changes will be overwritten *****/ #ifndef runfile_H #define runfile_H namespace run { void nullFile(vm::stack *); void namePart(vm::stack *); void modePart(vm::stack *); void dimensionSetHelper(vm::stack *); void dimensionSet(vm::stack *); void dimensionPart(vm::stack *); void lineSetHelper(vm::stack *); void lineSet(vm::stack *); void linePart(vm::stack *); void csvSetHelper(vm::stack *); void csvSet(vm::stack *); void csvPart(vm::stack *); void wordSetHelper(vm::stack *); void wordSet(vm::stack *); void wordPart(vm::stack *); void singlerealSetHelper(vm::stack *); void singlerealSet(vm::stack *); void singlerealPart(vm::stack *); void singleintSetHelper(vm::stack *); void singleintSet(vm::stack *); void singleintPart(vm::stack *); void signedintSetHelper(vm::stack *); void signedintSet(vm::stack *); void signedintPart(vm::stack *); void readSetHelper(vm::stack *); void readSet(vm::stack *); } #endif // runfile_H ./asymptote-2.41/process.cc0000644000175000017500000006011713064427076015535 0ustar norbertnorbert/***** * process.cc * Andy Hammerlindl 2006/08/19 * * Handles processing blocks of code (including files, strings, and the * interactive prompt, for listing and parse-only modes as well as actually * running it. *****/ #include "types.h" #include "errormsg.h" #include "genv.h" #include "stm.h" #include "settings.h" #include "vm.h" #include "program.h" #include "interact.h" #include "envcompleter.h" #include "parser.h" #include "fileio.h" #include "stack.h" #include "runtime.h" #include "texfile.h" #include "process.h" namespace camp { pen& defaultpen() { return processData().defaultpen; } } namespace run { void cleanup(); void exitFunction(vm::stack *Stack); void updateFunction(vm::stack *Stack); void purge(Int divisor=0); } namespace vm { bool indebugger; } using namespace settings; using absyntax::file; using trans::genv; using trans::coenv; using trans::env; using trans::coder; using types::record; using interact::interactive; using interact::uptodate; using absyntax::runnable; using absyntax::block; mem::stack processDataStack; // Exception-safe way to push and pop the process data. class withProcessData { // Do not let this object be dynamically allocated. void *operator new(size_t); processDataStruct *pd_ptr; public: withProcessData(processDataStruct *pd_ptr) : pd_ptr(pd_ptr) { processDataStack.push(pd_ptr); } ~withProcessData() { assert(processDataStack.top() == pd_ptr); processDataStack.pop(); } }; processDataStruct &processData() { assert(!processDataStack.empty()); return *processDataStack.top(); } // A process environment. Basically this just serves as short-hand to start a // new global environment (genv) and new process data at the same time. When // it goes out of scope, the process data is popped off the stack. This also // ensures that the data is popped even if an exception is thrown. class penv { genv *_ge; processDataStruct _pd; // Do not let this object be dynamically allocated. void *operator new(size_t); public: penv() : _ge(0), _pd() { // Push the processData first, as it needs to be on the stack before genv // is initialized. processDataStack.push(&_pd); _ge = new genv; } virtual ~penv() { processDataStack.pop(); delete _ge; } genv &ge() { return *_ge; } processDataStruct *pd() { return &_pd; } }; void init(bool resetpath=true) { vm::indebugger=false; uptodate=false; if(resetpath) setPath(""); /* On second and subsequent calls, sets the path to what it was when the program started. */ } // This helper class does nothing but call the interactiveTrans method of the // base object in place of trans, so that the runnable can exhibit special // behaviour when run at the interactive prompt. class interactiveRunnable : public runnable { runnable *base; public: interactiveRunnable(runnable *base) : runnable(base->getPos()), base(base) {} void prettyprint(ostream &out, Int indent) { absyntax::prettyname(out, "interactiveRunnable", indent); base->prettyprint(out, indent+1); } void trans(coenv &e) { base->interactiveTrans(e); } void transAsField(coenv &e, types::record *r) { // There is no interactiveTransAsField, as fields aren't declared at the top // level of the interactive prompt. base->transAsField(e, r); } }; enum transMode { TRANS_INTERACTIVE, TRANS_NORMAL }; // How to run a runnable in runnable-at-a-time mode. bool runRunnable(runnable *r, coenv &e, istack &s, transMode tm=TRANS_NORMAL) { e.e.beginScope(); lambda *codelet= tm==TRANS_INTERACTIVE ? interactiveRunnable(r).transAsCodelet(e) : r->transAsCodelet(e); em.sync(); if(!em.errors()) { if(getSetting("translate")) print(cout,codelet->code); s.run(codelet); // Commits the changes made to the environment. e.e.collapseScope(); } else { e.e.endScope(); // Remove any changes to the environment. // Should an interactive error hurt the status? em.statusError(); return false; } return true; } void runAutoplain(coenv &e, istack &s) { absyntax::runnable *r=absyntax::autoplainRunnable(); runRunnable(r,e,s); } // Abstract base class for the core object being run in line-at-a-time mode, it // may be a block of code, file, or interactive prompt. struct icore { virtual ~icore() {} virtual void doParse() = 0; virtual void doList() = 0; public: // preRun and postRun are the optional activities that take place before and // after running the code specified. They can be overridden by a derived // class that wishes different behaviour. virtual void preRun(coenv &e, istack &s) { if(getSetting("autoplain")) runAutoplain(e,s); } virtual void run(coenv &e, istack &s, transMode tm=TRANS_NORMAL) = 0; virtual void postRun(coenv &, istack &s) { run::exitFunction(&s); } virtual void doRun(bool purge=false, transMode tm=TRANS_NORMAL) { em.sync(); if(em.errors()) return; try { if(purge) run::purge(); penv pe; env base_env(pe.ge()); coder base_coder(nullPos, "icore::doRun"); coenv e(base_coder,base_env); vm::interactiveStack s; s.setInitMap(pe.ge().getInitMap()); s.setEnvironment(&e); preRun(e,s); if(purge) run::purge(); // Now that everything is set up, run the core. run(e,s,tm); postRun(e,s); } catch(std::bad_alloc&) { outOfMemory(); } catch(quit) { // Exception to quit running the current code. Nothing more to do. } catch(handled_error) { em.statusError(); } run::cleanup(); em.clear(); } virtual void process(bool purge=false) { if (!interactive && getSetting("parseonly")) doParse(); else if (getSetting("listvariables")) doList(); else doRun(purge); } }; // Abstract base class for one-time processing of an abstract syntax tree. class itree : public icore { string name; block *cachedTree; public: itree(string name="") : name(name), cachedTree(0) {} // Build the tree, possibly throwing a handled_error if it cannot be built. virtual block *buildTree() = 0; virtual block *getTree() { if (cachedTree==0) { try { cachedTree=buildTree(); } catch(handled_error) { em.statusError(); return 0; } } return cachedTree; } virtual string getName() { return name; } void doParse() { block *tree=getTree(); em.sync(); if(tree && !em.errors()) tree->prettyprint(cout, 0); } void doList() { block *tree=getTree(); if (tree) { penv pe; record *r=tree->transAsFile(pe.ge(), symbol::trans(getName())); r->e.list(r); } } void run(coenv &e, istack &s, transMode tm=TRANS_NORMAL) { block *tree=getTree(); if (tree) { for(mem::list::iterator r=tree->stms.begin(); r != tree->stms.end(); ++r) if(!em.errors() || getSetting("debug")) runRunnable(*r,e,s,tm); } } void doExec(transMode tm=TRANS_NORMAL) { // Don't prepare an environment to run the code if there isn't any code. if (getTree()) icore::doRun(false,tm); } }; class icode : public itree { block *tree; public: icode(block *tree, string name="") : itree(name), tree(tree) {} block *buildTree() { return tree; } }; class istring : public itree { string str; public: istring(const string& str, string name="") : itree(name), str(str) {} block *buildTree() { return parser::parseString(str, getName()); } }; void printGreeting(bool interactive) { if(!getSetting("quiet")) { cout << "Welcome to " << PROGRAM << " version " << REVISION; if(interactive) cout << " (to view the manual, type help)"; cout << endl; } } class ifile : public itree { string filename; string outname; string outname_save; public: ifile(const string& filename) : itree(filename), filename(filename), outname((string) (filename == "-" ? settings::outname() : stripDir(stripExt(string(filename), suffix)))) {} block *buildTree() { return !filename.empty() ? parser::parseFile(filename,"Loading") : 0; } void preRun(coenv& e, istack& s) { outname_save=getSetting("outname"); if(stripDir(outname_save).empty()) Setting("outname")=outname_save+outname; itree::preRun(e, s); } void postRun(coenv &e, istack& s) { itree::postRun(e, s); Setting("outname")=outname_save; } void process(bool purge=false) { if(verbose > 1) printGreeting(false); try { init(); } catch(handled_error) { } if (verbose >= 1) cout << "Processing " << outname << endl; try { icore::process(purge); } catch(handled_error) { em.statusError(); } } }; // Add a semi-colon terminator, if one is not there. string terminateLine(const string line) { return (!line.empty() && *(line.rbegin())!=';') ? (line+";") : line; } // cleanLine changes a C++ style comment (//) into a C-style comment (/* */) so // that comments don't absorb subsequent lines of code when multiline input is // collapsed to a single line in the history. // // ex. if (x==1) // test x // x=2; // becomes // if (x==1) /* test x */ x=2 (all on one line) // // cleanLine is a mess because we have to check that the // is not in a string // or c-style comment, which entails re-inventing much of the lexer. The // routine handles most cases, but multiline strings lose their newlines when // recorded in the history. typedef string::size_type size_type; const size_type npos=string::npos; inline size_type min(size_type a, size_type b) { return a < b ? a : b; } // If start is an offset somewhere within a string, this returns the first // offset outside of the string. sym is the character used to start the string, // ' or ". size_type endOfString(const char sym, const string line, size_type start) { size_type endString=line.find(sym, start); if (endString == npos) return npos; size_type escapeInString=min(line.find(string("\\")+sym, start), line.find("\\\\", start)); if (endString < escapeInString) return endString+1; else return endOfString(sym, line, escapeInString+2); } // If start is an offset somewhere within a C-style comment, this returns the // first offset outside of the comment. size_type endOfComment(const string line, size_type start) { size_type endComment=line.find("*/", start); if (endComment == npos) return npos; else return endComment+2; } // Find the start of a string literal in the line. size_type stringPos(const string line, size_type start) { if (start == npos) return npos; size_type pos=line.find_first_of("\'\"", start); if (pos == npos) return npos; // Skip over comments /* */ and ignore anything after // size_type startComment=line.find("/*", start); size_type startLineComment=line.find("//", start); if (min(startComment,startLineComment) < pos) return stringPos(line, startComment < startLineComment ? endOfComment(line, startComment+2) : npos); else // Nothing to skip over - the symbol actually starts a string. return pos; } // A multiline string should retain its newlines when collapsed to a single // line. This converts // 'hello // there' // to // 'hello\nthere' // and // "hello // there" // to // "hello" '\n' "there" // If the line doesn't end mid-string, this adds a space to the end to preserve // whitespace, since it is the last function to touch the line. string endString(const string line, size_type start) { assert(start!=npos); size_type pos=stringPos(line, start); if (pos==npos) // String ends in normal code. return line+" "; else { char sym=line[pos]; size_type eos=endOfString(sym, line, pos+1); if (eos==npos) { // Line ends while in a string, attach a newline symbol. switch (line[pos]) { case '\'': return line+"\\n"; case '\"': return line+"\" \'\\n\' \""; default: assert(False); return line; } } else { return endString(line, eos+1); } } } // Find the first // that isn't in a C-style comment or a string. size_type slashPos(const string line, size_type start) { if (start == npos) return npos; size_type pos=line.find("//", start); if (pos == npos) return npos; // Skip over comments /* */ and strings both " " and ' ' size_type startComment=line.find("/*", start); size_type startString=line.find_first_of("\'\"", start); if (min(startComment,startString) < pos) return slashPos(line, startComment < startString ? endOfComment(line, startComment+2) : endOfString(line[startString], line, startString+1)); else // Nothing to skip over - the // actually starts a comment. return pos; } string endCommentOrString(const string line) { size_type pos=slashPos(line, 0); if (pos == npos) return endString(line, 0); else { string sub=line; // Replace the first // by /* sub[pos+1]='*'; // Replace any */ in the comment by *! while ((pos = line.find("*/", pos+2)) != npos) sub[pos+1]='!'; // Tack on a */ at the end. sub.append(" */ "); return sub; } } bool isSlashed(const string line) { // NOTE: This doesn't fully handle escaped slashed in a string literal. return line[line.size()-1]=='\\'; } string deslash(const string line) { return isSlashed(line) ? line.substr(0,line.size()-1) : line; } // This transforms a line in to the history, so that when more code is added // after it, the code behaves the same as if there was a newline between the // two lines. This involves changing // style comments to /* */ style comments, // and adding explicit newlines to multiline strings. string cleanLine(const string line) { // First remove a trailing slash, if there is one. return endCommentOrString(deslash(line)); } class iprompt : public icore { // Flag that is set to false to signal the prompt to exit. bool running; // Flag that is set to restart the main loop once it has exited. bool restart; // Code ran at start-up. string startline; void postRun(coenv &, istack &) { } // Commands are chopped into the starting word and the rest of the line. struct commandLine { string line; string word; string rest; commandLine(string line) : line(line) { string::iterator c=line.begin(); // Skip leading whitespace while (c != line.end() && isspace(*c)) ++c; // Only handle identifiers starting with a letter. if (c != line.end() && isalpha(*c)) { // Store the command name. while (c != line.end() && (isalnum(*c) || *c=='_')) { word.push_back(*c); ++c; } } // Copy the rest to rest. while (c != line.end()) { rest.push_back(*c); ++c; } #if 0 cerr << "line: " << line << endl; cerr << "word: " << word << endl; cerr << "rest: " << rest << endl; cerr << "simple: " << simple() << endl; #endif } // Simple commands have at most spaces or semicolons after the command word. bool simple() { for (string::iterator c=rest.begin(); c != rest.end(); ++c) if (!isspace(*c) && *c != ';') return false; return true; } }; // The interactive prompt has special functions that cannot be implemented as // normal functions. These special funtions take a commandLine as an argument // and return true if they can handle the command. If false is returned, the // line is treated as a normal line of code. // commands is a map of command names to methods which implement the commands. typedef bool (iprompt::*command)(coenv &, istack &, commandLine); typedef mem::map commandMap; commandMap commands; bool exit(coenv &, istack &, commandLine cl) { if (cl.simple()) { // Don't store exit commands in the history file. interact::deleteLastLine(); running=false; return true; } else return false; } bool q(coenv &e, istack &s, commandLine cl) { if(e.e.ve.getType(symbol::trans("q"))) return false; return exit(e,s,cl); } bool reset(coenv &, istack &, commandLine cl) { if (cl.simple()) { running=false; restart=true; startline=""; run::purge(); return true; } else return false; } bool help(coenv &, istack &, commandLine cl) { if (cl.simple()) { popupHelp(); return true; } else return false; } bool erase(coenv &e, istack &s, commandLine cl) { if (cl.simple()) { runLine(e,s,"erase();"); return true; } else return false; } bool input(coenv &, istack &, commandLine cl) { running=false; restart=true; startline="include "+cl.rest; return true; } void initCommands() { #define ADDCOMMAND(name, func) \ commands[#name]=&iprompt::func // keywords.pl looks for ADDCOMMAND to identify special commands in the // auto-completion. ADDCOMMAND(quit,exit); ADDCOMMAND(q,q); ADDCOMMAND(exit,exit); ADDCOMMAND(reset,reset); ADDCOMMAND(erase,erase); ADDCOMMAND(help,help); ADDCOMMAND(input,input); #undef ADDCOMMAND } bool handleCommand(coenv &e, istack &s, string line) { commandLine cl(line); if (cl.word != "") { commandMap::iterator p=commands.find(cl.word); if (p != commands.end()) { // Execute the command. command &com=p->second; return (this->*com)(e,s,cl); } else return false; } else return false; } void addToHistory(string line) { interact::addToHistory(line); } void addToLastLine(string line) { // Here we clean a line at the last possible point, when we know that more // code is going to be appended to it. string last=interact::getLastHistoryLine(); interact::setLastHistoryLine(cleanLine(last)+line); } void terminateLastHistoryLine() { string last=interact::getLastHistoryLine(); interact::setLastHistoryLine(terminateLine(last)); } // Get input from the interactive prompt. Such input may be over several // user-typed lines if he/she ends a line a with backslash to continue input // on the next line. If continuation is true, the input started on a previous // line and is being continued (either because of a backslash or the parser // detecting it in multiline mode). string getline(bool continuation) { string prompt=getSetting(continuation ? "prompt2" : "prompt"); string line=interact::simpleline(prompt); if (continuation) addToLastLine(line); else addToHistory(line); // If the line ends in a slash, get more input. return isSlashed(line) ? line+"\n"+getline(true) : line; } // Continue taking input for a line until it properly parses, or a syntax // error occurs. Returns the parsed code on success, and throws a // handled_error exception on failure. block *parseExtendableLine(string line) { block *code=parser::parseString(line, "-", true); if (code) { return code; } else { string nextline=getline(true); return parseExtendableLine(line+"\n"+nextline); } } void runLine(coenv &e, istack &s, string line) { try { if (getSetting("multiline")) { block *code=parseExtendableLine(line); icode i(code); i.run(e,s,TRANS_INTERACTIVE); } else { // Add a semi-colon to the end of the line if one is not there. Do this // to the history as well, so the transcript can be run as regular asy // code. This also makes the history work correctly if the multiline // setting is changed within an interactive session. // It is added to the history at the last possible moment to avoid // tampering with other features, such as using a slash to extend a // line. terminateLastHistoryLine(); istring i(terminateLine(line), "-"); i.run(e,s,TRANS_INTERACTIVE); } run::updateFunction(&s); uptodate=false; } catch(handled_error) { vm::indebugger=false; } catch(interrupted&) { // Turn off the interrupted flag. em.Interrupt(false); uptodate=true; cout << endl; } catch(quit&) { } // Ignore errors from this line when trying to run subsequent lines. em.clear(); } void runStartCode(coenv &e, istack &s) { if (!startline.empty()) runLine(e, s, startline); } public: iprompt() : running(false), restart(false), startline("") { initCommands(); } void doParse() {} void doList() {} void run(coenv &e, istack &s, transMode=TRANS_NORMAL) { running=true; interact::setCompleter(new trans::envCompleter(e.e)); runStartCode(e, s); while (running) { // Read a line from the prompt. string line=getline(false); // Check if it is a special command. if (handleCommand(e,s,line)) continue; else runLine(e, s, line); } } void process(bool purge=false) { printGreeting(true); interact::init_interactive(); try { setPath("",true); } catch(handled_error) { } do { try { init(false); restart=false; icore::process(); } catch(interrupted&) { em.Interrupt(false); restart=true; } catch(eof&) { restart=false; } } while(restart); interact::cleanup_interactive(); } }; void processCode(absyntax::block *code) { icode(code).process(); } void processFile(const string& filename, bool purge) { ifile(filename).process(purge); } void processPrompt() { iprompt().process(); } void runCode(absyntax::block *code) { icode(code).doExec(); } void runString(const string& s, bool interactiveWrite) { istring(s).doExec(interactiveWrite ? TRANS_INTERACTIVE : TRANS_NORMAL); } void runFile(const string& filename) { ifile(filename).doExec(); } void runPrompt() { iprompt().doRun(); } void runCodeEmbedded(absyntax::block *code, trans::coenv &e, istack &s) { icode(code).run(e,s); } void runStringEmbedded(const string& str, trans::coenv &e, istack &s) { istring(str).run(e,s); } void runPromptEmbedded(trans::coenv &e, istack &s) { iprompt().run(e,s); } void doUnrestrictedList() { penv pe; env base_env(pe.ge()); coder base_coder(nullPos, "doUnrestictedList"); coenv e(base_coder,base_env); if (getSetting("autoplain")) absyntax::autoplainRunnable()->trans(e); e.e.list(0); } // Environment class used by external programs linking to the shared library. class fullenv : public gc { penv pe; env base_env; coder base_coder; coenv e; vm::interactiveStack s; public: fullenv() : pe(), base_env(pe.ge()), base_coder(nullPos, "fullenv"), e(base_coder, base_env), s() { s.setInitMap(pe.ge().getInitMap()); s.setEnvironment(&e); // TODO: Add way to not run autoplain. runAutoplain(e, s); } coenv &getCoenv() { return e; } void runRunnable(runnable *r) { assert(!em.errors()); // TODO: Decide how to handle prior errors. try { { withProcessData token(pe.pd()); ::runRunnable(r, e, s, TRANS_INTERACTIVE); } } catch(std::bad_alloc&) { // TODO: give calling application useful message. cerr << "out of memory" << endl; } catch (quit) { // I'm not sure whether this counts as successfully running the code or // not. cerr << "quit exception" << endl; } catch (handled_error) { // Normally, this is the result of an error that changes the return code // of the free-standing asymptote program. // An error should probably be reported to the application calling the // asymptote library. cerr << "handled error" << endl; } em.clear(); } }; fullenv &getFullEnv() { static fullenv fe; return fe; } coenv &coenvInOngoingProcess() { return getFullEnv().getCoenv(); } void runInOngoingProcess(runnable *r) { getFullEnv().runRunnable(r); } ./asymptote-2.41/mod.h0000644000175000017500000000132013064427076014467 0ustar norbertnorbert/***** * mod.h * Andy Hammerlindl 2005/03/16 * * Definition of implementation-independent mod function. *****/ #ifndef MOD_H #define MOD_H #include #include "common.h" using std::fmod; inline Int Mod(Int x, Int y) {return x % y;} inline double Mod(double x, double y) {return fmod(x,y);} template inline T portableMod(T x,T y) { // Implementation-independent definition of mod; ensure that result has // same sign as divisor T val=Mod(x,y); if((y > 0 && val < 0) || (y < 0 && val > 0)) val += y; return val; } inline Int imod(Int x, Int y) { return portableMod(x,y); } inline Int imod(Int i, size_t n) { i %= (Int) n; if(i < 0) i += (Int) n; return i; } #endif ./asymptote-2.41/runtriple.cc0000644000175000017500000003260413064427126016077 0ustar norbertnorbert/***** Autogenerated from runtriple.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runtriple.in" /***** * runtriple.in * * Runtime functions for triple operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 10 "runtriple.in" #include "triple.h" #include "path3.h" using namespace camp; // Autogenerated routines: #ifndef NOSYM #include "runtriple.symbols.h" #endif namespace run { #line 18 "runtriple.in" void tripleZero(stack *Stack) { #line 19 "runtriple.in" static triple zero; {Stack->push(zero); return;} } #line 24 "runtriple.in" void realRealRealToTriple(stack *Stack) { real z=vm::pop(Stack); real y=vm::pop(Stack); real x=vm::pop(Stack); #line 25 "runtriple.in" {Stack->push(triple(x,y,z)); return;} } #line 29 "runtriple.in" // real xpart(triple v); void tripleXPart(stack *Stack) { triple v=vm::pop(Stack); #line 30 "runtriple.in" {Stack->push(v.getx()); return;} } #line 34 "runtriple.in" // real ypart(triple v); void tripleYPart(stack *Stack) { triple v=vm::pop(Stack); #line 35 "runtriple.in" {Stack->push(v.gety()); return;} } #line 39 "runtriple.in" // real zpart(triple v); void tripleZPart(stack *Stack) { triple v=vm::pop(Stack); #line 40 "runtriple.in" {Stack->push(v.getz()); return;} } #line 44 "runtriple.in" // triple *(real x, triple v); void gen_runtriple5(stack *Stack) { triple v=vm::pop(Stack); real x=vm::pop(Stack); #line 45 "runtriple.in" {Stack->push(x*v); return;} } #line 49 "runtriple.in" // triple *(triple v, real x); void gen_runtriple6(stack *Stack) { real x=vm::pop(Stack); triple v=vm::pop(Stack); #line 50 "runtriple.in" {Stack->push(v*x); return;} } #line 54 "runtriple.in" // triple /(triple v, real x); void gen_runtriple7(stack *Stack) { real x=vm::pop(Stack); triple v=vm::pop(Stack); #line 55 "runtriple.in" {Stack->push(v/x); return;} } #line 59 "runtriple.in" // real length(triple v); void gen_runtriple8(stack *Stack) { triple v=vm::pop(Stack); #line 60 "runtriple.in" {Stack->push(v.length()); return;} } #line 64 "runtriple.in" // real abs(triple v); void gen_runtriple9(stack *Stack) { triple v=vm::pop(Stack); #line 65 "runtriple.in" {Stack->push(v.length()); return;} } #line 69 "runtriple.in" // real polar(triple v, bool warn=true); void gen_runtriple10(stack *Stack) { bool warn=vm::pop(Stack,true); triple v=vm::pop(Stack); #line 70 "runtriple.in" if(!warn && v.getx() == 0.0 && v.gety() == 0.0 && v.getz() == 0.0) {Stack->push(0.0); return;} {Stack->push(v.polar()); return;} } #line 75 "runtriple.in" // real azimuth(triple v, bool warn=true); void gen_runtriple11(stack *Stack) { bool warn=vm::pop(Stack,true); triple v=vm::pop(Stack); #line 76 "runtriple.in" if(!warn && v.getx() == 0.0 && v.gety() == 0.0) {Stack->push(0.0); return;} {Stack->push(v.azimuth()); return;} } #line 81 "runtriple.in" // real colatitude(triple v, bool warn=true); void gen_runtriple12(stack *Stack) { bool warn=vm::pop(Stack,true); triple v=vm::pop(Stack); #line 82 "runtriple.in" if(!warn && v.getx() == 0.0 && v.gety() == 0.0 && v.getz() == 0.0) {Stack->push(0.0); return;} {Stack->push(degrees(v.polar())); return;} } #line 87 "runtriple.in" // real latitude(triple v, bool warn=true); void gen_runtriple13(stack *Stack) { bool warn=vm::pop(Stack,true); triple v=vm::pop(Stack); #line 88 "runtriple.in" if(!warn && v.getx() == 0.0 && v.gety() == 0.0 && v.getz() == 0.0) {Stack->push(0.0); return;} {Stack->push(90.0-degrees(v.polar())); return;} } // Return the longitude of v in [0,360). #line 94 "runtriple.in" // real longitude(triple v, bool warn=true); void gen_runtriple14(stack *Stack) { bool warn=vm::pop(Stack,true); triple v=vm::pop(Stack); #line 95 "runtriple.in" if(!warn && v.getx() == 0.0 && v.gety() == 0.0) {Stack->push(0.0); return;} {Stack->push(principalBranch(degrees(v.azimuth()))); return;} } #line 100 "runtriple.in" // triple unit(triple v); void gen_runtriple15(stack *Stack) { triple v=vm::pop(Stack); #line 101 "runtriple.in" {Stack->push(unit(v)); return;} } #line 105 "runtriple.in" // real dot(triple u, triple v); void gen_runtriple16(stack *Stack) { triple v=vm::pop(Stack); triple u=vm::pop(Stack); #line 106 "runtriple.in" {Stack->push(dot(u,v)); return;} } #line 110 "runtriple.in" // triple cross(triple u, triple v); void gen_runtriple17(stack *Stack) { triple v=vm::pop(Stack); triple u=vm::pop(Stack); #line 111 "runtriple.in" {Stack->push(cross(u,v)); return;} } #line 115 "runtriple.in" // triple dir(explicit triple z); void gen_runtriple18(stack *Stack) { triple z=vm::pop(Stack); #line 116 "runtriple.in" {Stack->push(unit(z)); return;} } #line 120 "runtriple.in" // triple expi(real polar, real azimuth); void gen_runtriple19(stack *Stack) { real azimuth=vm::pop(Stack); real polar=vm::pop(Stack); #line 121 "runtriple.in" {Stack->push(expi(polar,azimuth)); return;} } #line 125 "runtriple.in" // triple dir(real colatitude, real longitude); void gen_runtriple20(stack *Stack) { real longitude=vm::pop(Stack); real colatitude=vm::pop(Stack); #line 126 "runtriple.in" {Stack->push(expi(radians(colatitude),radians(longitude))); return;} } #line 130 "runtriple.in" // triple realmult(triple u, triple v); void gen_runtriple21(stack *Stack) { triple v=vm::pop(Stack); triple u=vm::pop(Stack); #line 131 "runtriple.in" {Stack->push(triple (u.getx()*v.getx(),u.gety()*v.gety(),u.getz()*v.getz())); return;} } // Return the component of vector v perpendicular to a unit vector u. #line 136 "runtriple.in" // triple perp(triple v, triple u); void gen_runtriple22(stack *Stack) { triple u=vm::pop(Stack); triple v=vm::pop(Stack); #line 137 "runtriple.in" {Stack->push(perp(v,u)); return;} } #line 141 "runtriple.in" // triple bezier(triple a, triple b, triple c, triple d, real t); void gen_runtriple23(stack *Stack) { real t=vm::pop(Stack); triple d=vm::pop(Stack); triple c=vm::pop(Stack); triple b=vm::pop(Stack); triple a=vm::pop(Stack); #line 142 "runtriple.in" real onemt=1-t; real onemt2=onemt*onemt; {Stack->push(onemt2*onemt*a+t*(3.0*(onemt2*b+t*onemt*c)+t*t*d)); return;} } #line 148 "runtriple.in" // triple bezierP(triple a, triple b, triple c, triple d, real t); void gen_runtriple24(stack *Stack) { real t=vm::pop(Stack); triple d=vm::pop(Stack); triple c=vm::pop(Stack); triple b=vm::pop(Stack); triple a=vm::pop(Stack); #line 149 "runtriple.in" {Stack->push(3.0*(t*t*(d-a+3.0*(b-c))+t*(2.0*(a+c)-4.0*b)+b-a)); return;} } #line 153 "runtriple.in" // triple bezierPP(triple a, triple b, triple c, triple d, real t); void gen_runtriple25(stack *Stack) { real t=vm::pop(Stack); triple d=vm::pop(Stack); triple c=vm::pop(Stack); triple b=vm::pop(Stack); triple a=vm::pop(Stack); #line 154 "runtriple.in" {Stack->push(6.0*(t*(d-a+3.0*(b-c))+a+c-2.0*b)); return;} } #line 158 "runtriple.in" // triple bezierPPP(triple a, triple b, triple c, triple d); void gen_runtriple26(stack *Stack) { triple d=vm::pop(Stack); triple c=vm::pop(Stack); triple b=vm::pop(Stack); triple a=vm::pop(Stack); #line 159 "runtriple.in" {Stack->push(6.0*(d-a+3.0*(b-c))); return;} } } // namespace run namespace trans { void gen_runtriple_venv(venv &ve) { #line 18 "runtriple.in" REGISTER_BLTIN(run::tripleZero,"tripleZero"); #line 24 "runtriple.in" REGISTER_BLTIN(run::realRealRealToTriple,"realRealRealToTriple"); #line 29 "runtriple.in" addFunc(ve, run::tripleXPart, primReal(), SYM(xpart), formal(primTriple(), SYM(v), false, false)); #line 34 "runtriple.in" addFunc(ve, run::tripleYPart, primReal(), SYM(ypart), formal(primTriple(), SYM(v), false, false)); #line 39 "runtriple.in" addFunc(ve, run::tripleZPart, primReal(), SYM(zpart), formal(primTriple(), SYM(v), false, false)); #line 44 "runtriple.in" addFunc(ve, run::gen_runtriple5, primTriple(), SYM_TIMES, formal(primReal(), SYM(x), false, false), formal(primTriple(), SYM(v), false, false)); #line 49 "runtriple.in" addFunc(ve, run::gen_runtriple6, primTriple(), SYM_TIMES, formal(primTriple(), SYM(v), false, false), formal(primReal(), SYM(x), false, false)); #line 54 "runtriple.in" addFunc(ve, run::gen_runtriple7, primTriple(), SYM_DIVIDE, formal(primTriple(), SYM(v), false, false), formal(primReal(), SYM(x), false, false)); #line 59 "runtriple.in" addFunc(ve, run::gen_runtriple8, primReal(), SYM(length), formal(primTriple(), SYM(v), false, false)); #line 64 "runtriple.in" addFunc(ve, run::gen_runtriple9, primReal(), SYM(abs), formal(primTriple(), SYM(v), false, false)); #line 69 "runtriple.in" addFunc(ve, run::gen_runtriple10, primReal(), SYM(polar), formal(primTriple(), SYM(v), false, false), formal(primBoolean(), SYM(warn), true, false)); #line 75 "runtriple.in" addFunc(ve, run::gen_runtriple11, primReal(), SYM(azimuth), formal(primTriple(), SYM(v), false, false), formal(primBoolean(), SYM(warn), true, false)); #line 81 "runtriple.in" addFunc(ve, run::gen_runtriple12, primReal(), SYM(colatitude), formal(primTriple(), SYM(v), false, false), formal(primBoolean(), SYM(warn), true, false)); #line 87 "runtriple.in" addFunc(ve, run::gen_runtriple13, primReal(), SYM(latitude), formal(primTriple(), SYM(v), false, false), formal(primBoolean(), SYM(warn), true, false)); #line 93 "runtriple.in" addFunc(ve, run::gen_runtriple14, primReal(), SYM(longitude), formal(primTriple(), SYM(v), false, false), formal(primBoolean(), SYM(warn), true, false)); #line 100 "runtriple.in" addFunc(ve, run::gen_runtriple15, primTriple(), SYM(unit), formal(primTriple(), SYM(v), false, false)); #line 105 "runtriple.in" addFunc(ve, run::gen_runtriple16, primReal(), SYM(dot), formal(primTriple(), SYM(u), false, false), formal(primTriple(), SYM(v), false, false)); #line 110 "runtriple.in" addFunc(ve, run::gen_runtriple17, primTriple(), SYM(cross), formal(primTriple(), SYM(u), false, false), formal(primTriple(), SYM(v), false, false)); #line 115 "runtriple.in" addFunc(ve, run::gen_runtriple18, primTriple(), SYM(dir), formal(primTriple(), SYM(z), false, true)); #line 120 "runtriple.in" addFunc(ve, run::gen_runtriple19, primTriple(), SYM(expi), formal(primReal(), SYM(polar), false, false), formal(primReal(), SYM(azimuth), false, false)); #line 125 "runtriple.in" addFunc(ve, run::gen_runtriple20, primTriple(), SYM(dir), formal(primReal(), SYM(colatitude), false, false), formal(primReal(), SYM(longitude), false, false)); #line 130 "runtriple.in" addFunc(ve, run::gen_runtriple21, primTriple(), SYM(realmult), formal(primTriple(), SYM(u), false, false), formal(primTriple(), SYM(v), false, false)); #line 135 "runtriple.in" addFunc(ve, run::gen_runtriple22, primTriple(), SYM(perp), formal(primTriple(), SYM(v), false, false), formal(primTriple(), SYM(u), false, false)); #line 141 "runtriple.in" addFunc(ve, run::gen_runtriple23, primTriple(), SYM(bezier), formal(primTriple(), SYM(a), false, false), formal(primTriple(), SYM(b), false, false), formal(primTriple(), SYM(c), false, false), formal(primTriple(), SYM(d), false, false), formal(primReal(), SYM(t), false, false)); #line 148 "runtriple.in" addFunc(ve, run::gen_runtriple24, primTriple(), SYM(bezierP), formal(primTriple(), SYM(a), false, false), formal(primTriple(), SYM(b), false, false), formal(primTriple(), SYM(c), false, false), formal(primTriple(), SYM(d), false, false), formal(primReal(), SYM(t), false, false)); #line 153 "runtriple.in" addFunc(ve, run::gen_runtriple25, primTriple(), SYM(bezierPP), formal(primTriple(), SYM(a), false, false), formal(primTriple(), SYM(b), false, false), formal(primTriple(), SYM(c), false, false), formal(primTriple(), SYM(d), false, false), formal(primReal(), SYM(t), false, false)); #line 158 "runtriple.in" addFunc(ve, run::gen_runtriple26, primTriple(), SYM(bezierPPP), formal(primTriple(), SYM(a), false, false), formal(primTriple(), SYM(b), false, false), formal(primTriple(), SYM(c), false, false), formal(primTriple(), SYM(d), false, false)); } } // namespace trans ./asymptote-2.41/lnkX64IconFix.nsh0000644000175000017500000000531613064427076016630 0ustar norbertnorbert/****************************************************************************** WORKAROUND - lnkX64IconFix This snippet was developed to address an issue with Windows x64 incorrectly redirecting the shortcuts icon from $PROGRAMFILES32 to $PROGRAMFILES64. See Forum post: http://forums.winamp.com/newreply.php?do=postreply&t=327806 Example: CreateShortcut "$SMPROGRAMS\My App\My App.lnk" "$INSTDIR\My App.exe" "" "$INSTDIR\My App.exe" ${lnkX64IconFix} "$SMPROGRAMS\My App\My App.lnk" Original Code by Anders [http://forums.winamp.com/member.php?u=70852] ******************************************************************************/ !ifndef ___lnkX64IconFix___ !verbose push !verbose 0 !include "LogicLib.nsh" !include "x64.nsh" !define ___lnkX64IconFix___ !define lnkX64IconFix `!insertmacro _lnkX64IconFix` !macro _lnkX64IconFix _lnkPath !verbose push !verbose 0 ${If} ${RunningX64} DetailPrint "WORKAROUND: 64bit OS Detected, Attempting to apply lnkX64IconFix" Push "${_lnkPath}" Call lnkX64IconFix ${EndIf} !verbose pop !macroend Function lnkX64IconFix ; _lnkPath Exch $5 Push $0 Push $1 Push $2 Push $3 Push $4 System::Call 'OLE32::CoCreateInstance(g "{00021401-0000-0000-c000-000000000046}",i 0,i 1,g "{000214ee-0000-0000-c000-000000000046}",*i.r1)i' ${If} $1 <> 0 System::Call '$1->0(g "{0000010b-0000-0000-C000-000000000046}",*i.r2)' ${If} $2 <> 0 System::Call '$2->5(w r5,i 2)i.r0' ${If} $0 = 0 System::Call '$1->0(g "{45e2b4ae-b1c3-11d0-b92f-00a0c90312e1}",*i.r3)i.r0' ${If} $3 <> 0 System::Call '$3->5(i 0xA0000007)i.r0' System::Call '$3->6(*i.r4)i.r0' ${If} $0 = 0 IntOp $4 $4 & 0xffffBFFF System::Call '$3->7(ir4)i.r0' ${If} $0 = 0 System::Call '$2->6(i0,i0)' DetailPrint "WORKAROUND: lnkX64IconFix Applied successfully" ${EndIf} ${EndIf} System::Call $3->2() ${EndIf} ${EndIf} System::Call $2->2() ${EndIf} System::Call $1->2() ${EndIf} Pop $4 Pop $3 Pop $2 Pop $1 Pop $0 FunctionEnd !verbose pop !endif ./asymptote-2.41/stack.h0000644000175000017500000000640013064427076015021 0ustar norbertnorbert/***** * stack.h * Andy Hammerlindl 2002/06/27 * * The general stack machine used to run compiled camp code. *****/ #ifndef STACK_H #define STACK_H #include #include "errormsg.h" #include "vm.h" #include "item.h" #include "absyn.h" namespace vm { struct func; class program; struct lambda; class importInitMap; struct bpinfo : public gc { fileinfo f; absyntax::runnable *r; bpinfo(const string& filename, size_t lineNum, absyntax::runnable *r=NULL) : f(fileinfo(filename,lineNum)), r(r) {} }; inline bool operator == (const bpinfo& a, const bpinfo& b) { return a.f == b.f; } extern mem::list bplist; class runnable; extern bool indebugger; class stack { public: typedef frame* vars_t; struct importInitMap { virtual ~importInitMap() {} virtual lambda *operator[](string) = 0; }; private: // stack for operands typedef mem::vector stack_t; stack_t theStack; void draw(ostream& out); // The initializer functions for imports, indexed by name. importInitMap *initMap; // The stack stores a map of initialized imported modules by name, so that // each module is initialized only once and each import refers to the same // instance. typedef mem::map importInstanceMap; importInstanceMap instMap; // One can associate an environment to embedded code while running. trans::coenv *e; // Debugger variables: char debugOp; position lastPos, breakPos; bool newline; // Move arguments from stack to frame. void marshall(size_t args, stack::vars_t vars); public: stack() : e(0), debugOp(0), lastPos(nullPos), breakPos(nullPos), newline(false) {}; virtual ~stack() {}; void setInitMap(importInitMap *i) { initMap=i; } void setEnvironment(trans::coenv *e) { this->e=e; } trans::coenv *getEnvironment() { return e; } // Runs a lambda. If vars is non-null, it is used to store the variables of // the lambda. Otherwise, the method allocates a closure only if needed. void runWithOrWithoutClosure(lambda *l, vars_t vars, vars_t parent); // Executes a function on top of the stack. void run(func *f); void breakpoint(absyntax::runnable *r=NULL); void debug(); // Put an import (indexed by name) on top of the stack, initializing it if // necessary. void load(string index); // These are so that built-in functions can easily manipulate the stack void push(item next) { theStack.push_back(next); } template void push(T next) { push((item)next); } item top() { return theStack.back(); } item pop() { item ret = theStack.back(); theStack.pop_back(); return ret; } template T pop() { return get(pop()); } }; inline item pop(stack* s) { return s->pop(); } template inline T pop(stack* s) { return get(pop(s)); } template inline T pop(stack* s, T defval) { item it=pop(s); return isdefault(it) ? defval : get(it); } class interactiveStack : public stack { vars_t globals; size_t globals_size; public: interactiveStack(); // Run a codelet, a small piece of code that uses globals as its frame. void run(lambda *codelet); }; } // namespace vm #endif // STACK_H ./asymptote-2.41/runsystem.cc0000644000175000017500000003035213064427126016122 0ustar norbertnorbert/***** Autogenerated from runsystem.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runsystem.in" /***** * runsystem.in * * Runtime functions for system operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 12 "runsystem.in" #include "process.h" #include "stack.h" #include "locate.h" using namespace camp; using namespace settings; using vm::bpinfo; using vm::bplist; using vm::getPos; using vm::Default; using vm::nullfunc; using vm::item; using absyntax::runnable; typedef callable callableBp; namespace run { extern string emptystring; } function *voidFunction() { return new function(primVoid()); } function *breakpointFunction() { return new function(primString(),primString(),primInt(),primInt(), primCode()); } void clear(string file, Int line, bool warn=false) { bpinfo bp(file,line); for(mem::list::iterator p=bplist.begin(); p != bplist.end(); ++p) { if(*p == bp) { cout << "cleared breakpoint at " << file << ": " << line << endl; bplist.remove(bp); return; } } if(warn) cout << "No such breakpoint at " << file << ": " << line << endl; } namespace run { void breakpoint(stack *Stack, runnable *r) { callable *atBreakpointFunction=processData().atBreakpointFunction; if(atBreakpointFunction && !nullfunc::instance()->compare(atBreakpointFunction)) { position curPos=getPos(); Stack->push(curPos.filename()); Stack->push((Int) curPos.Line()); Stack->push((Int) curPos.Column()); Stack->push(r ? r : vm::Default); atBreakpointFunction->call(Stack); // returns a string } else Stack->push(""); } } string convertname(string name, const string& format) { if(name.empty()) return buildname(outname(),format,""); name=outpath(name); return format.empty() ? name : format+":"+name; } namespace run { void purge(Int divisor=0) { #ifdef USEGC if(divisor > 0) GC_set_free_space_divisor((GC_word) divisor); GC_gcollect(); #endif } void updateFunction(stack *Stack) { callable *atUpdateFunction=processData().atUpdateFunction; if(atUpdateFunction && !nullfunc::instance()->compare(atUpdateFunction)) atUpdateFunction->call(Stack); } void exitFunction(stack *Stack) { callable *atExitFunction=processData().atExitFunction; if(atExitFunction && !nullfunc::instance()->compare(atExitFunction)) atExitFunction->call(Stack); } } // Autogenerated routines: #ifndef NOSYM #include "runsystem.symbols.h" #endif namespace run { #line 107 "runsystem.in" // string outname(); void gen_runsystem0(stack *Stack) { #line 108 "runsystem.in" {Stack->push(outname()); return;} } #line 112 "runsystem.in" // void atupdate(callable *f); void gen_runsystem1(stack *Stack) { callable * f=vm::pop(Stack); #line 113 "runsystem.in" processData().atUpdateFunction=f; } #line 117 "runsystem.in" // callable* atupdate(); void gen_runsystem2(stack *Stack) { #line 118 "runsystem.in" {Stack->push(processData().atUpdateFunction); return;} } #line 122 "runsystem.in" // void atexit(callable *f); void gen_runsystem3(stack *Stack) { callable * f=vm::pop(Stack); #line 123 "runsystem.in" processData().atExitFunction=f; } #line 127 "runsystem.in" // callable* atexit(); void gen_runsystem4(stack *Stack) { #line 128 "runsystem.in" {Stack->push(processData().atExitFunction); return;} } #line 132 "runsystem.in" // void atbreakpoint(callableBp *f); void gen_runsystem5(stack *Stack) { callableBp * f=vm::pop(Stack); #line 133 "runsystem.in" processData().atBreakpointFunction=f; } #line 137 "runsystem.in" // void breakpoint(runnable *s=NULL); void gen_runsystem6(stack *Stack) { runnable * s=vm::pop(Stack,NULL); #line 138 "runsystem.in" breakpoint(Stack,s); } #line 142 "runsystem.in" // string locatefile(string file); void gen_runsystem7(stack *Stack) { string file=vm::pop(Stack); #line 143 "runsystem.in" {Stack->push(locateFile(file)); return;} } #line 147 "runsystem.in" // void stop(string file, Int line, runnable *s=NULL); void gen_runsystem8(stack *Stack) { runnable * s=vm::pop(Stack,NULL); Int line=vm::pop(Stack); string file=vm::pop(Stack); #line 148 "runsystem.in" file=locateFile(file); clear(file,line); cout << "setting breakpoint at " << file << ": " << line << endl; bplist.push_back(bpinfo(file,line,s)); } #line 155 "runsystem.in" // void breakpoints(); void gen_runsystem9(stack *) { #line 156 "runsystem.in" for(mem::list::iterator p=bplist.begin(); p != bplist.end(); ++p) cout << p->f.name() << ": " << p->f.line() << endl; } #line 161 "runsystem.in" // void clear(string file, Int line); void gen_runsystem10(stack *Stack) { Int line=vm::pop(Stack); string file=vm::pop(Stack); #line 162 "runsystem.in" file=locateFile(file); clear(file,line,true); } #line 167 "runsystem.in" // void clear(); void gen_runsystem11(stack *) { #line 168 "runsystem.in" bplist.clear(); } #line 172 "runsystem.in" // void warn(string s); void gen_runsystem12(stack *Stack) { string s=vm::pop(Stack); #line 173 "runsystem.in" Warn(s); } #line 177 "runsystem.in" // void nowarn(string s); void gen_runsystem13(stack *Stack) { string s=vm::pop(Stack); #line 178 "runsystem.in" noWarn(s); } #line 182 "runsystem.in" // void warning(string s, string t, bool position=false); void gen_runsystem14(stack *Stack) { bool position=vm::pop(Stack,false); string t=vm::pop(Stack); string s=vm::pop(Stack); #line 183 "runsystem.in" if(settings::warn(s)) { em.warning(position ? getPos() : nullPos,s); em << t; } } // Strip directory from string #line 191 "runsystem.in" // string stripdirectory(string *s); void gen_runsystem15(stack *Stack) { string * s=vm::pop(Stack); #line 192 "runsystem.in" {Stack->push(stripDir(*s)); return;} } // Strip directory from string #line 197 "runsystem.in" // string stripfile(string *s); void gen_runsystem16(stack *Stack) { string * s=vm::pop(Stack); #line 198 "runsystem.in" {Stack->push(stripFile(*s)); return;} } // Strip file extension from string #line 203 "runsystem.in" // string stripextension(string *s); void gen_runsystem17(stack *Stack) { string * s=vm::pop(Stack); #line 204 "runsystem.in" {Stack->push(stripExt(*s)); return;} } // Call ImageMagick convert. #line 209 "runsystem.in" // Int convert(string args=emptystring, string file=emptystring, string format=emptystring); void gen_runsystem18(stack *Stack) { string format=vm::pop(Stack,emptystring); string file=vm::pop(Stack,emptystring); string args=vm::pop(Stack,emptystring); #line 211 "runsystem.in" string name=convertname(file,format); mem::vector cmd; cmd.push_back(getSetting("convert")); push_split(cmd,args); cmd.push_back(name); bool quiet=verbose <= 1; char *oldPath=NULL; string dir=stripFile(outname()); if(!dir.empty()) { oldPath=getPath(); setPath(dir.c_str()); } Int ret=System(cmd,quiet ? 1 : 0,true,"convert", "your ImageMagick convert utility"); if(oldPath != NULL) setPath(oldPath); if(ret == 0 && verbose > 0) cout << "Wrote " << (file.empty() ? name : file) << endl; {Stack->push(ret); return;} } // Call ImageMagick animate. #line 237 "runsystem.in" // Int animate(string args=emptystring, string file=emptystring, string format=emptystring); void gen_runsystem19(stack *Stack) { string format=vm::pop(Stack,emptystring); string file=vm::pop(Stack,emptystring); string args=vm::pop(Stack,emptystring); #line 239 "runsystem.in" #ifndef __MSDOS__ string name=convertname(file,format); if(view()) { mem::vector cmd; cmd.push_back(getSetting("animate")); push_split(cmd,args); cmd.push_back(name); {Stack->push(System(cmd,0,false,"animate","your animated GIF viewer")); return;} } #endif {Stack->push(0); return;} } #line 253 "runsystem.in" // void purge(Int divisor=0); void gen_runsystem20(stack *Stack) { Int divisor=vm::pop(Stack,0); #line 254 "runsystem.in" purge(divisor); } } // namespace run namespace trans { void gen_runsystem_venv(venv &ve) { #line 107 "runsystem.in" addFunc(ve, run::gen_runsystem0, primString() , SYM(outname)); #line 112 "runsystem.in" addFunc(ve, run::gen_runsystem1, primVoid(), SYM(atupdate), formal(voidFunction(), SYM(f), false, false)); #line 117 "runsystem.in" addFunc(ve, run::gen_runsystem2, voidFunction(), SYM(atupdate)); #line 122 "runsystem.in" addFunc(ve, run::gen_runsystem3, primVoid(), SYM(atexit), formal(voidFunction(), SYM(f), false, false)); #line 127 "runsystem.in" addFunc(ve, run::gen_runsystem4, voidFunction(), SYM(atexit)); #line 132 "runsystem.in" addFunc(ve, run::gen_runsystem5, primVoid(), SYM(atbreakpoint), formal(breakpointFunction(), SYM(f), false, false)); #line 137 "runsystem.in" addFunc(ve, run::gen_runsystem6, primVoid(), SYM(breakpoint), formal(primCode(), SYM(s), true, false)); #line 142 "runsystem.in" addFunc(ve, run::gen_runsystem7, primString() , SYM(locatefile), formal(primString() , SYM(file), false, false)); #line 147 "runsystem.in" addFunc(ve, run::gen_runsystem8, primVoid(), SYM(stop), formal(primString() , SYM(file), false, false), formal(primInt(), SYM(line), false, false), formal(primCode(), SYM(s), true, false)); #line 155 "runsystem.in" addFunc(ve, run::gen_runsystem9, primVoid(), SYM(breakpoints)); #line 161 "runsystem.in" addFunc(ve, run::gen_runsystem10, primVoid(), SYM(clear), formal(primString() , SYM(file), false, false), formal(primInt(), SYM(line), false, false)); #line 167 "runsystem.in" addFunc(ve, run::gen_runsystem11, primVoid(), SYM(clear)); #line 172 "runsystem.in" addFunc(ve, run::gen_runsystem12, primVoid(), SYM(warn), formal(primString() , SYM(s), false, false)); #line 177 "runsystem.in" addFunc(ve, run::gen_runsystem13, primVoid(), SYM(nowarn), formal(primString() , SYM(s), false, false)); #line 182 "runsystem.in" addFunc(ve, run::gen_runsystem14, primVoid(), SYM(warning), formal(primString() , SYM(s), false, false), formal(primString() , SYM(t), false, false), formal(primBoolean(), SYM(position), true, false)); #line 190 "runsystem.in" addFunc(ve, run::gen_runsystem15, primString() , SYM(stripdirectory), formal(primString(), SYM(s), false, false)); #line 196 "runsystem.in" addFunc(ve, run::gen_runsystem16, primString() , SYM(stripfile), formal(primString(), SYM(s), false, false)); #line 202 "runsystem.in" addFunc(ve, run::gen_runsystem17, primString() , SYM(stripextension), formal(primString(), SYM(s), false, false)); #line 208 "runsystem.in" addFunc(ve, run::gen_runsystem18, primInt(), SYM(convert), formal(primString() , SYM(args), true, false), formal(primString() , SYM(file), true, false), formal(primString() , SYM(format), true, false)); #line 236 "runsystem.in" addFunc(ve, run::gen_runsystem19, primInt(), SYM(animate), formal(primString() , SYM(args), true, false), formal(primString() , SYM(file), true, false), formal(primString() , SYM(format), true, false)); #line 253 "runsystem.in" addFunc(ve, run::gen_runsystem20, primVoid(), SYM(purge), formal(primInt(), SYM(divisor), true, false)); } } // namespace trans ./asymptote-2.41/knot.h0000644000175000017500000003001413064427076014665 0ustar norbertnorbert/***** * knot.h * Andy Hammerlindl 200/02/10 * * Describes a knot, a point and its neighbouring specifiers, used as an * intermediate structure in solving paths. *****/ #ifndef KNOT_H #define KNOT_H #include #include #include #include "mod.h" #include "pair.h" #include "path.h" namespace camp { using mem::vector; // The choice of branch cuts of atan2 disguishes between y=+0.0 and y=-0.0 in // the case where x<0. This can lead to strange looking paths being // calculated from guides of the form a..b..cycle. To avoid these degenerate // cases, the niceAngle routine moves the branch cut so that the sign of a // zero won't matter. double niceAngle(pair z); // A cyclic vector: ie. a vector where the index is taken mod the size of the // vector. template class cvector : public vector { public: cvector() {} cvector(size_t n) : vector(n) {} cvector(size_t n, const T& t) : vector(n,t) {} cvector(const vector& v) : vector(v) {} T& operator[](Int j) { return vector::operator[](imod(j,(Int) this->size())); } const T& operator[](Int j) const { return vector::operator[](imod(j,(Int) this->size())); } }; // Forward declaration. class knotlist; /* A linear equation (one of a set of equations to solve for direction through knots in a path). The i-th equation is: pre*theta[i-1] + piv*theta[i] + post*theta[i+1] = aug where indices are taken mod n. */ struct eqn { double pre,piv,post,aug; eqn(double pre, double piv, double post, double aug) : pre(pre), piv(piv), post(post), aug(aug) {} friend ostream& operator<< (ostream& out, const eqn& e) { return out << e.pre << " * pre + " << e.piv << " * piv + " << e.post << " * post = " << e.aug; } }; // A direction specifier, telling how the path behaves coming in or out of a // point. The base class represents the "open" specifier. class spec : public gc { public: virtual ~spec() {} // If the knot is open, it gives no restriction on the behavior of the // path. virtual bool open() { return true; } virtual bool controlled() { return false; } virtual pair control() {return pair(0.0,0.0);} virtual double curl() { return -1.0; } virtual pair dir() { return pair(0.0,0.0); } // When a knot has a restriction on one side but is open on the other, the // restriction implies a restriction on the other side. This is the partner // restriction defined here, where the pair argument is for the location of // the knot. virtual spec *outPartner(pair) { return this; } virtual spec *inPartner(pair) { return this; } virtual void print(ostream&) const {} }; inline ostream& operator<< (ostream& out, spec& s) { s.print(out); return out; } // Specifier used at an endpoint. class endSpec : public spec { public: bool open() { return false; } // Returns an equation used to solve for the thetas along the knot. These are // called by eqnprop in the non-cyclic case for the first and last equations. virtual eqn eqnOut(Int j, knotlist& l, cvector& d, cvector& psi) = 0; virtual eqn eqnIn (Int j, knotlist& l, cvector& d, cvector& psi) = 0; }; // A specifier with a given direction (in radians). class dirSpec : public endSpec { double given; public: // Direction should be given in the range [-PI,PI] dirSpec(double given) : given(given) {} dirSpec(pair z) : given(niceAngle(z)) {} pair dir() { return expi(given); } eqn eqnOut(Int j, knotlist& l, cvector& d, cvector& psi); eqn eqnIn (Int j, knotlist& l, cvector& d, cvector& psi); void print(ostream& out) const { out << "{dir(" << degrees(given) << ")}"; } }; // A curl specifier. The curvature at the end knot should be gamma times the // curvature at the neighbouring knot. class curlSpec : public endSpec { double gamma; public: // Gamma should be non-negative. curlSpec(double gamma=1.0) : gamma(gamma) { if(gamma < 0) reportError("curl cannot be less than 0"); } double curl() { return gamma; } eqn eqnOut(Int j, knotlist& l, cvector& d, cvector& psi); eqn eqnIn (Int j, knotlist& l, cvector& d, cvector& psi); void print(ostream& out) const { out << "{curl " << gamma << "}"; } }; // A specifier with a control point. All information for this portion of the // curve has been determined. class controlSpec : public spec { public: pair cz; bool straight; controlSpec(pair cz, bool straight=false) : cz(cz), straight(straight) {} bool open() { return false; } bool controlled() { return true; } pair control() { return cz; } // The partner spec will be a dirSpec in the same direction the specifier // takes the path, unless the velocity is zero, then it uses a curl // specifier. spec *outPartner(pair); spec *inPartner(pair); void print(ostream& out) const { // NOTE: This format cannot be read back in. out << "{control " << cz << "}"; } }; // The tension information for one side of a knot. struct tension { double val; bool atleast; tension(double val=1.0, bool atleast=false) : val(val), atleast(atleast) { if(val < 0.75) reportError("tension cannot be less than 3/4"); } }; inline ostream& operator<<(ostream& out, tension t) { return out << "tension" << (t.atleast ? " atleast " : " ") << t.val; } // A knot, a point with specifiers to double the path coming in and going out // of the knot. struct knot { pair z; spec *in; spec *out; tension tin, tout; knot() {} knot(pair z, spec *in, spec *out, tension tin=tension(), tension tout=tension()) : z(z), in(in), out(out), tin(tin), tout(tout) {} double alpha() { return 1.0/tout.val; } double beta() { return 1.0/tin.val; } }; ostream& operator<<(ostream& out, const knot& k); // Abstract base class for a section of a guide. class knotlist { public: virtual ~knotlist() {} virtual Int length() = 0; virtual bool cyclic() = 0; // Returns the number of knots. Int size() { return cyclic() ? length() : length() + 1; } bool empty() { return size()==0; } virtual knot& cell(Int) = 0; virtual knot& operator[] (Int i) { #if 0 assert(cyclic() || (0 <= i && i <= length())); // Bounds check. #endif return cell(i); } knot& front() { return (*this)[0]; } knot& back() { return (*this)[length()]; } }; // Defines a knotlist as a piece of another knotlist. class subknotlist : public knotlist { knotlist& l; Int a,b; public: subknotlist(knotlist& l, Int a, Int b) : l(l), a(a), b(b) {} Int length() { return b-a; } bool cyclic() { return false; } knot& cell(Int i) { return l[a+i]; } }; struct simpleknotlist : public knotlist { cvector nodes; bool cycles; simpleknotlist(cvector nodes, bool cycles=false) : nodes(nodes), cycles(cycles) {} Int length() { return cycles ? (Int) nodes.size() : (Int) nodes.size() - 1; } bool cyclic() { return cycles; } knot& cell(Int j) { return nodes[j]; } }; // A protopath is a path being made. struct protopath { bool cycles; Int n; mem::vector nodes; protopath(Int n, bool cycles) : cycles(cycles), n(n), nodes(n) {} solvedKnot& operator[](Int j) { return nodes[imod(j,n)]; } bool& straight(Int j) { return (*this)[j].straight; } pair& pre(Int j) { return (*this)[j].pre; } pair& point(Int j) { return (*this)[j].point; } pair& post(Int j) { return (*this)[j].post; } void controlEnds() { if (!cycles) { solvedKnot& start=(*this)[0]; solvedKnot& end=(*this)[n-1]; start.pre=start.point; end.post=end.point; } } // Once all the controls are set, return the final (constant) path. path fix() { return path(nodes,n,cycles); } }; // Represents properties that can be computed along a knotlist. // Examples include distances (d), turning angles (psi), and the linear // equations used to solve for the thetas. template class knotprop { protected: knotlist& l; // Calculate the property for the usual case in the iteration (and for a // cyclic knot, the only case), at the index given. virtual T mid(Int) = 0; // The special cases, these default to the usual case: mid. virtual T solo(Int j) // Calculates the property for a list of length 0. { return mid(j); } virtual T start(Int j) // Calculates it at the start of the list. { return mid(j); } virtual T end(Int j) // Calculate it at the end. { return mid(j); } virtual cvector linearCompute() { Int n=l.length(); cvector v; if (n==0) v.push_back(solo(0)); else { v.push_back(start(0)); for (Int j=1; j cyclicCompute() { Int n=l.length(); cvector v; for (Int j=0; j linearBackCompute() { Int n=l.length(); cvector v; if (n==0) v.push_back(solo(0)); else { v.push_back(end(n)); for (Int j=1; j cyclicBackCompute() { Int n=l.length(); cvector v; for (Int j=1; j<=n; ++j) v.push_back(mid(n-j)); return v; } public: virtual ~knotprop() {} virtual cvector compute() { return l.cyclic() ? cyclicCompute() : linearCompute(); } // Compute the values in the opposite order. This is needed for instance if // the i-th calculation needed a result computed in the i+1-th, such as in the // back substitution for solving thetas. virtual cvector backCompute() { cvector v=l.cyclic() ? cyclicBackCompute() : linearBackCompute(); // Even though they are computed in the backwards order, return them in the // standard order. reverse(v.begin(),v.end()); return v; } knotprop(knotlist& l) : l(l) {} }; // A knot transforms, it takes in one knotlist and transforms it knot for knot // into a new one. class knottrans : public knotprop { protected: virtual knot mid(Int j) { /* By default, just copy the knot. */ return l[j]; } public: virtual ~knottrans() {} knottrans(knotlist& l) : knotprop(l) {} virtual simpleknotlist trans() { return simpleknotlist(compute(),l.cyclic()); } }; // Like a knotprop, but it doesn't compute a vector of values for the knot. It // iterates over the knotlist calling method for side-effect. For instance, // this is used to plug control points into protopaths. class knoteffect { protected: knotlist& l; virtual void mid(Int) = 0; // The special cases, these default to the usual case: mid. virtual void solo(Int j) { mid(j); } virtual void start(Int j) { mid(j); } virtual void end(Int j) { mid(j); } virtual void linearExec() { Int n=l.length(); if (n==0) solo(0); else { start(0); for (Int j=1; j& z); double velocity(double theta, double phi, tension t); } // namespace camp GC_DECLARE_PTRFREE(camp::eqn); GC_DECLARE_PTRFREE(camp::tension); #endif // KNOT_H ./asymptote-2.41/virtualfieldaccess.cc0000644000175000017500000000160513064427076017730 0ustar norbertnorbert/***** * virtualfieldaccess.cc * Andy Hammerlindl 2009/07/23 * * Implements the access subclass used to read and write virtual fields. *****/ #include "virtualfieldaccess.h" #include "coder.h" namespace trans { void virtualFieldAccess::encode(action act, position pos, coder &e) { switch(act) { case CALL: if (caller) { caller->encode(CALL, pos, e); } else { this->encode(READ, pos, e); e.encode(inst::popcall); } return; case READ: assert(getter); getter->encode(CALL, pos, e); return; case WRITE: if (setter) setter->encode(CALL, pos, e); else { em.error(pos); em << "virtual field is read-only"; } return; } } void virtualFieldAccess::encode(action act, position pos, coder &e, frame *) { e.encode(inst::pop); encode(act, pos, e); } } // namespace trans ./asymptote-2.41/guide.h0000644000175000017500000001517713064427076015024 0ustar norbertnorbert/***** * guide.h * Andy Hammerlindl 2005/02/23 * *****/ #ifndef GUIDE_H #define GUIDE_H #include #include "knot.h" #include "flatguide.h" #include "settings.h" namespace camp { // Abstract base class for guides. class guide : public gc { protected: public: virtual ~guide() {} // Returns the path that the guide represents. virtual path solve() { return path(); } // Add the information in the guide to the flatguide, so that it can be // solved via the knotlist solving routines. // Returns true if guide has an interior cycle token. virtual void flatten(flatguide&, bool allowsolve=true)=0; virtual bool cyclic() {return false;} virtual void print(ostream& out) const { out << "nullpath"; } // Needed so that multiguide can know where to put in ".." symbols. virtual side printLocation() const { return END; } }; inline ostream& operator<< (ostream& out, const guide& g) { g.print(out); return out; } // Draws dots between two printings of guides, if their locations are such that // the dots are necessary. inline void adjustLocation(ostream& out, side l1, side l2) { if (l1 == END) out << endl; if ((l1 == END || l1 == OUT) && (l2 == IN || l2 == END)) out << ".."; } // A guide representing a pair. class pairguide : public guide { pair z; public: void flatten(flatguide& g, bool=true) { g.add(z); } pairguide(pair z) : z(z) {} path solve() { return path(z); } void print(ostream& out) const { out << z; } side printLocation() const { return END; } }; // A guide representing a path. class pathguide : public guide { path p; public: void flatten(flatguide& g, bool allowsolve=true) { g.add(p,allowsolve); } pathguide(path p) : p(p) {} path solve() { return p; } bool cyclic() {return p.cyclic();} void print(ostream& out) const { out << p; } side printLocation() const { return END; } }; // Tension expressions are evaluated to this class before being cast to a guide, // so that they can be cast to other types (such as guide3) instead. class tensionSpecifier : public gc { double out,in; bool atleast; public: tensionSpecifier(double val, bool atleast=false) : out(val), in(val), atleast(atleast) {} tensionSpecifier(double out, double in, bool atleast=false) : out(out), in(in), atleast(atleast) {} double getOut() const { return out; } double getIn() const { return in; } bool getAtleast() const { return atleast; } }; // A guide giving tension information (as part of a join). class tensionguide : public guide { tension tout,tin; public: void flatten(flatguide& g, bool=true) { g.setTension(tin,IN); g.setTension(tout,OUT); } tensionguide(tensionSpecifier spec) : tout(spec.getOut(), spec.getAtleast()), tin(spec.getIn(), spec.getAtleast()) {} void print(ostream& out) const { out << (tout.atleast ? ".. tension atleast " : ".. tension ") << tout.val << " and " << tin.val << " .."; } side printLocation() const { return JOIN; } }; // Similar to tensionSpecifier, curl expression are evaluated to this type // before being cast to guides. class curlSpecifier : public gc { double value; side s; public: curlSpecifier(double value, side s) : value(value), s(s) {} double getValue() const { return value; } side getSide() const { return s; } }; // A guide giving a specifier. class specguide : public guide { spec *p; side s; public: void flatten(flatguide& g, bool=true) { g.setSpec(p,s); } specguide(spec *p, side s) : p(p), s(s) {} specguide(curlSpecifier spec) : p(new curlSpec(spec.getValue())), s(spec.getSide()) {} void print(ostream& out) const { out << *p; } side printLocation() const { return s; } }; // A guide for explicit control points between two knots. This could be done // with two specguides, instead, but this prints nicer, and is easier to encode. class controlguide : public guide { pair zout, zin; public: void flatten(flatguide& g, bool=true) { g.setSpec(new controlSpec(zout), OUT); g.setSpec(new controlSpec(zin), IN); } controlguide(pair zout,pair zin) : zout(zout),zin(zin) {} controlguide(pair z) : zout(z),zin(z) {} void print(ostream& out) const { out << ".. controls " << zout << " and " << zin << " .."; } side printLocation() const { return JOIN; } }; // A guide that is a sequence of other guides. This is used, for instance is // joins, where we have the left and right guide, and possibly specifiers and // tensions in between. typedef mem::vector guidevector; // A multiguide represents a guide given by the first "length" items of // the vector pointed to by "base". // The constructor, if given another multiguide as a first argument, // will try to avoid allocating a new "base" array. class multiguide : public guide { guidevector *base; size_t length; guide *subguide(size_t i) const { assert(i < length); assert(length <= base->size()); return (*base)[i]; } public: multiguide(guidevector& v); void flatten(flatguide&, bool=true); bool cyclic() { size_t n=length; if(n < 1) return false; return subguide(n-1)->cyclic(); } path solve() { if (settings::verbose>3) { cerr << "solving guide:\n"; print(cerr); cerr << "\n\n"; } flatguide g; this->flatten(g); path p=g.solve(false); if (settings::verbose>3) cerr << "solved as:\n" << p << "\n\n"; return p; } void print(ostream& out) const; side printLocation() const { int n = length; return subguide(n-1)->printLocation(); } }; struct cycleToken : public gc {}; // A guide representing the cycle token. class cycletokguide : public guide { public: void flatten(flatguide& g, bool allowsolve=true) { // If cycles occur in the midst of a guide, the guide up to that point // should be solved as a path. Any subsequent guide will work with that // path locked in place. if(allowsolve) g.solve(true); else g.close(); } bool cyclic() {return true;} path solve() { // Just a cycle on it's own makes an empty guide. return path(); } void print(ostream& out) const { out << "cycle"; } side printLocation() const { return END; } }; } // namespace camp GC_DECLARE_PTRFREE(camp::pairguide); GC_DECLARE_PTRFREE(camp::tensionSpecifier); GC_DECLARE_PTRFREE(camp::tensionguide); GC_DECLARE_PTRFREE(camp::curlSpecifier); GC_DECLARE_PTRFREE(camp::controlguide); GC_DECLARE_PTRFREE(camp::cycleToken); GC_DECLARE_PTRFREE(camp::cycletokguide); #endif // GUIDE_H ./asymptote-2.41/texfile.h0000644000175000017500000002456513064427076015370 0ustar norbertnorbert/***** * texfile.h * John Bowman 2003/03/14 * * Encapsulates the writing of commands to a TeX file. *****/ #ifndef TEXFILE_H #define TEXFILE_H #include #include #include #include "common.h" #include "pair.h" #include "bbox.h" #include "pen.h" #include "util.h" #include "interact.h" #include "path.h" #include "array.h" #include "psfile.h" #include "settings.h" #include "process.h" namespace camp { template void texdocumentclass(T& out, bool pipe=false) { if(settings::latex(settings::getSetting("tex")) && (pipe || !settings::getSetting("inlinetex"))) out << "\\documentclass[12pt]{article}" << newl; } template void texuserpreamble(T& out, mem::list& preamble=processData().TeXpreamble) { for(mem::list::iterator p=preamble.begin(); p != preamble.end(); ++p) out << stripblanklines(*p); } template void latexfontencoding(T& out) { out << "\\makeatletter%" << newl << "\\let\\ASYencoding\\f@encoding%" << newl << "\\let\\ASYfamily\\f@family%" << newl << "\\let\\ASYseries\\f@series%" << newl << "\\let\\ASYshape\\f@shape%" << newl << "\\makeatother%" << newl; } template void texpreamble(T& out, mem::list& preamble=processData().TeXpreamble, bool ASYalign=true, bool ASYbox=true) { texuserpreamble(out,preamble); string texengine=settings::getSetting("tex"); if(settings::context(texengine)) out << "\\disabledirectives[system.errorcontext]%" << newl; if(ASYbox) out << "\\newbox\\ASYbox" << newl << "\\newdimen\\ASYdimen" << newl; out << "\\def\\ASYprefix{" << stripFile(settings::outname()) << "}" << newl << "\\long\\def\\ASYbase#1#2{\\leavevmode\\setbox\\ASYbox=\\hbox{#1}%" << "\\ASYdimen=\\ht\\ASYbox%" << newl << "\\setbox\\ASYbox=\\hbox{#2}\\lower\\ASYdimen\\box\\ASYbox}" << newl; if(ASYalign) out << "\\long\\def\\ASYaligned(#1,#2)(#3,#4)#5#6#7{\\leavevmode%" << newl << "\\setbox\\ASYbox=\\hbox{#7}%" << newl << "\\setbox\\ASYbox\\hbox{\\ASYdimen=\\ht\\ASYbox%" << newl << "\\advance\\ASYdimen by\\dp\\ASYbox\\kern#3\\wd\\ASYbox" << "\\raise#4\\ASYdimen\\box\\ASYbox}%" << newl << "\\setbox\\ASYbox=\\hbox{#5\\wd\\ASYbox 0pt\\dp\\ASYbox 0pt\\ht\\ASYbox 0pt\\box\\ASYbox#6}%" << newl << "\\hbox to 0pt{\\kern#1pt\\raise#2pt\\box\\ASYbox\\hss}}%" << newl << "\\long\\def\\ASYalignT(#1,#2)(#3,#4)#5#6{%" << newl << "\\ASYaligned(#1,#2)(#3,#4){%" << newl << settings::beginlabel(texengine) << "%" << newl << "}{%" << newl << settings::endlabel(texengine) << "%" << newl << "}{#6}}" << newl << "\\long\\def\\ASYalign(#1,#2)(#3,#4)#5{" << "\\ASYaligned(#1,#2)(#3,#4){}{}{#5}}" << newl << settings::rawpostscript(texengine) << newl; } // Work around bug in dvips.def: allow spaces in file names. template void dvipsfix(T &out) { if(!settings::pdf(settings::getSetting("tex"))) { out << "\\makeatletter" << newl << "\\def\\Ginclude@eps#1{%" << newl << " \\message{<#1>}%" << newl << " \\bgroup" << newl << " \\def\\@tempa{!}%" << newl << " \\dimen@\\Gin@req@width" << newl << " \\dimen@ii.1bp%" << newl << " \\divide\\dimen@\\dimen@ii" << newl << " \\@tempdima\\Gin@req@height" << newl << " \\divide\\@tempdima\\dimen@ii" << newl << " \\special{PSfile=#1\\space" << newl << " llx=\\Gin@llx\\space" << newl << " lly=\\Gin@lly\\space" << newl << " urx=\\Gin@urx\\space" << newl << " ury=\\Gin@ury\\space" << newl << " \\ifx\\Gin@scalex\\@tempa\\else rwi=\\number\\dimen@\\space\\fi" << newl << " \\ifx\\Gin@scaley\\@tempa\\else rhi=\\number\\@tempdima\\space\\fi" << newl << " \\ifGin@clip clip\\fi}%" << newl << " \\egroup}" << newl << "\\makeatother" << newl; } } template void texdefines(T& out, mem::list& preamble=processData().TeXpreamble, bool pipe=false) { if(pipe || !settings::getSetting("inlinetex")) texpreamble(out,preamble,!pipe); if(pipe) { // Make tex pipe aware of a previously generated aux file. string name=auxname(settings::outname(),"aux"); std::ifstream fin(name.c_str()); if(fin) { std::ofstream fout("texput.aux"); string s; while(getline(fin,s)) fout << s << endl; } } string texengine=settings::getSetting("tex"); if(settings::latex(texengine)) { if(pipe || !settings::getSetting("inlinetex")) { out << "\\usepackage{graphicx}" << newl; if(!pipe) { dvipsfix(out); out << "\\usepackage{color}" << newl; } } if(pipe) { out << "\\begin{document}" << newl; latexfontencoding(out); } } else if(!settings::context(texengine)) { out << "\\input graphicx" << newl // Fix miniltx path parsing bug: << "\\makeatletter" << newl << "\\def\\filename@parse#1{%" << newl << " \\let\\filename@area\\@empty" << newl << " \\expandafter\\filename@path#1/\\\\}" << newl << "\\def\\filename@path#1/#2\\\\{%" << newl << " \\ifx\\\\#2\\\\%" << newl << " \\def\\reserved@a{\\filename@simple#1.\\\\}%" << newl << " \\else" << newl << " \\edef\\filename@area{\\filename@area#1/}%" << newl << " \\def\\reserved@a{\\filename@path#2\\\\}%" << newl << " \\fi" << newl << " \\reserved@a}" << newl << "\\makeatother" << newl; dvipsfix(out); if(!pipe) out << "\\input picture" << newl; } } template bool setlatexfont(T& out, const pen& p, const pen& lastpen) { if(p.size() != lastpen.size() || p.Lineskip() != lastpen.Lineskip()) { out << "\\fontsize{" << p.size()*ps2tex << "}{" << p.Lineskip()*ps2tex << "}\\selectfont\n"; return true; } return false; } template bool settexfont(T& out, const pen& p, const pen& lastpen, bool latex) { string font=p.Font(); if(font != lastpen.Font() || (!latex && p.size() != lastpen.size())) { out << font << "%" << newl; return true; } return false; } class texfile : public psfile { protected: bbox box; bool inlinetex; double Hoffset; int level; public: string texengine; texfile(const string& texname, const bbox& box, bool pipe=false); virtual ~texfile(); void prologue(); virtual void beginpage() {} void epilogue(bool pipe=false); virtual void endpage() {} void setlatexcolor(pen p); void setpen(pen p); void setfont(pen p); void gsave(bool tex=true); void grestore(bool tex=true); void beginspecial(); void endspecial(); void beginraw(); void endraw(); void begingroup() {++level;} void endgroup() {--level;} bool toplevel() {return level == 0;} void beginpicture(const bbox& b); void endpicture(const bbox& b); void writepair(pair z) { *out << z; } void miniprologue(); void writeshifted(path p, bool newPath=true); double hoffset() {return Hoffset;} // Draws label transformed by T at position z. void put(const string& label, const transform& T, const pair& z, const pair& Align); void beginlayer(const string& psname, bool postscript); void endlayer(); }; class svgtexfile : public texfile { mem::stack clipstack; size_t clipcount; size_t gradientcount; size_t gouraudcount; size_t tensorcount; bool inspecial; static string nl; public: svgtexfile(const string& texname, const bbox& box, bool pipe=false) : texfile(texname,box,pipe) { clipcount=0; gradientcount=0; gouraudcount=0; tensorcount=0; inspecial=false; } void writeclip(path p, bool newPath=true) { write(p,false); } void dot(path p, pen, bool newPath=true); void writeshifted(pair z) { write(conj(z)*ps2tex); } void translate(pair z) {} void concat(transform t) {} void beginspecial(); void endspecial(); // Prevent unwanted page breaks. void beginpage() { beginpicture(box); } void endpage() { endpicture(box); } void begintransform(); void endtransform(); void clippath(); void beginpath(); void endpath(); void newpath() { beginspecial(); begintransform(); beginpath(); } void moveto(pair z) { *out << "M"; writeshifted(z); } void lineto(pair z) { *out << "L"; writeshifted(z); } void curveto(pair zp, pair zm, pair z1) { *out << "C"; writeshifted(zp); writeshifted(zm); writeshifted(z1); } void closepath() { *out << "Z"; } string rgbhex(pen p) { p.torgb(); return p.hex(); } void properties(const pen& p); void color(const pen &p, const string& type); void stroke(const pen &p, bool dot=false); void strokepath(); void fillrule(const pen& p, const string& type="fill"); void fill(const pen &p); void begingradientshade(bool axial, ColorSpace colorspace, const pen& pena, const pair& a, double ra, const pen& penb, const pair& b, double rb); void gradientshade(bool axial, ColorSpace colorspace, const pen& pena, const pair& a, double ra, bool extenda, const pen& penb, const pair& b, double rb, bool extendb); void gouraudshade(const pen& p0, const pair& z0, const pen& p1, const pair& z1, const pen& p2, const pair& z2); void begingouraudshade(const vm::array& pens, const vm::array& vertices, const vm::array& edges); void gouraudshade(const pen& pentype, const vm::array& pens, const vm::array& vertices, const vm::array& edges); void begintensorshade(const vm::array& pens, const vm::array& boundaries, const vm::array& z); void tensorshade(const pen& pentype, const vm::array& pens, const vm::array& boundaries, const vm::array& z); void beginclip(); void endclip0(const pen &p); void endclip(const pen &p); void endpsclip(const pen &p) {} void setpen(pen p) {if(!inspecial) texfile::setpen(p);} void gsave(bool tex=false); void grestore(bool tex=false); }; } //namespace camp #endif ./asymptote-2.41/transform.h0000644000175000017500000001405113064427076015730 0ustar norbertnorbert/***** * transform.h * Andy Hammerlindl 2002/05/22 * * The transform datatype stores an affine transformation on the plane * The datamembers are x, y, xx, xy, yx, and yy. A pair (x,y) is * transformed as * x' = t.x + t.xx * x + t.xy * y * y' = t.y + t.yx * x + t.yy * y *****/ #ifndef TRANSFORM_H #define TRANSFORM_H #include #include "pair.h" namespace camp { class transform : public gc { double x; double y; double xx; double xy; double yx; double yy; public: transform() : x(0.0), y(0.0), xx(1.0), xy(0.0), yx(0.0), yy(1.0) {} virtual ~transform() {} transform(double x, double y, double xx, double xy, double yx, double yy) : x(x), y(y), xx(xx), xy(xy), yx(yx), yy(yy) {} double getx() const { return x; } double gety() const { return y; } double getxx() const { return xx; } double getxy() const { return xy; } double getyx() const { return yx; } double getyy() const { return yy; } friend transform operator+ (const transform& t, const transform& s) { return transform(t.x + s.x, t.y + s.y, t.xx + s.xx, t.xy + s.xy, t.yx + s.yx, t.yy + s.yy); } friend transform operator- (const transform& t, const transform& s) { return transform(t.x - s.x, t.y - s.y, t.xx - s.xx, t.xy - s.xy, t.yx - s.yx, t.yy - s.yy); } friend transform operator- (const transform& t) { return transform(-t.x, -t.y, -t.xx, -t.xy, -t.yx, -t.yy); } friend pair operator* (const transform& t, const pair& z) { double x = z.getx(), y = z.gety(); return pair(t.x + t.xx * x + t.xy * y, t.y + t.yx * x + t.yy * y); } // Calculates the composition of t and s, so for a pair, z, // t * (s * z) == (t * s) * z // Can be thought of as matrix multiplication. friend transform operator* (const transform& t, const transform& s) { return transform(t.x + t.xx * s.x + t.xy * s.y, t.y + t.yx * s.x + t.yy * s.y, t.xx * s.xx + t.xy * s.yx, t.xx * s.xy + t.xy * s.yy, t.yx * s.xx + t.yy * s.yx, t.yx * s.xy + t.yy * s.yy); } friend bool operator== (const transform& t1, const transform& t2) { return t1.x == t2.x && t1.y == t2.y && t1.xx == t2.xx && t1.xy == t2.xy && t1.yx == t2.yx && t1.yy == t2.yy; } friend bool operator!= (const transform& t1, const transform& t2) { return !(t1 == t2); } bool isIdentity() const { return x == 0.0 && y == 0.0 && xx == 1.0 && xy == 0.0 && yx == 0.0 && yy == 1.0; } bool isNull() const { return x == 0.0 && y == 0.0 && xx == 0.0 && xy == 0.0 && yx == 0.0 && yy == 0.0; } // Calculates the determinant, as if it were a matrix. friend double det(const transform& t) { return t.xx * t.yy - t.xy * t.yx; } // Tells if the transformation is invertible (bijective). bool invertible() const { return det(*this) != 0.0; } friend transform inverse(const transform& t) { double d = det(t); if (d == 0.0) reportError("inverting singular transform"); d=1.0/d; return transform((t.xy * t.y - t.yy * t.x)*d, (t.yx * t.x - t.xx * t.y)*d, t.yy*d, -t.xy*d, -t.yx*d, t.xx*d); } friend ostream& operator<< (ostream& out, const transform& t) { return out << "(" << t.x << "," << t.y << "," << t.xx << "," << t.xy << "," << t.yx << "," << t.yy << ")"; } }; // The common transforms static const transform identity; inline transform shift(pair z) { return transform (z.getx(), z.gety(), 1.0, 0.0, 0.0, 1.0); } inline transform xscale(double s) { return transform (0.0, 0.0, s, 0.0, 0.0, 1.0); } inline transform yscale(double s) { return transform (0.0, 0.0, 1.0, 0.0, 0.0, s); } inline transform scale(double s) { return transform (0.0, 0.0, s, 0.0, 0.0, s); } inline transform scale(double x, double y) { return transform (0.0, 0.0, x, 0.0, 0.0, y); } inline transform scale(pair z) { // Equivalent to multiplication by z. double x = z.getx(), y = z.gety(); return transform (0.0, 0.0, x, -y, y, x); } inline transform slant(double s) { return transform (0.0, 0.0, 1.0, s, 0.0, 1.0); } inline transform rotate(double theta) { double s = sin(theta), c = cos(theta); return transform (0.0, 0.0, c, -s, s, c); } // return rotate(angle(v)) if z != (0,0); otherwise return identity. inline transform rotate(pair z) { double d=z.length(); if(d == 0.0) return identity; d=1.0/d; return transform (0.0, 0.0, d*z.getx(), -d*z.gety(), d*z.gety(), d*z.getx()); } inline transform rotatearound(pair z, double theta) { // Notice the operators are applied from right to left. // Could be optimized. return shift(z) * rotate(theta) * shift(-z); } inline transform reflectabout(pair z, pair w) { if (z == w) reportError("points determining line to reflect about must be distinct"); // Also could be optimized. transform basis = shift(z) * scale(w-z); transform flip = yscale(-1.0); return basis * flip * inverse(basis); } // Return the rotational part of t. inline transform rotation(transform t) { pair z(2.0*t.getxx()*t.getyy(),t.getyx()*t.getyy()-t.getxx()*t.getxy()); if(t.getxx() < 0) z=-z; return rotate(atan2(z.gety(),z.getx())); } // Remove the x and y components, so that the new transform maps zero to zero. inline transform shiftless(transform t) { return transform(0, 0, t.getxx(), t.getxy(), t.getyx(), t.getyy()); } // Return the translational component of t. inline transform shift(transform t) { return transform(t.getx(), t.gety(), 1.0, 0, 0, 1.0); } // Return the translational pair of t. inline pair shiftpair(transform t) { return pair(t.getx(), t.gety()); } inline transform matrix(pair lb, pair rt) { pair size=rt-lb; return transform(lb.getx(),lb.gety(),size.getx(),0,0,size.gety()); } } //namespace camp GC_DECLARE_PTRFREE(camp::transform); #endif ./asymptote-2.41/angle.h0000644000175000017500000000147513064427076015011 0ustar norbertnorbert/***** * angle.h * Andy Hammerlindl 2004/04/29 * * For degree to radian conversion and visa versa. *****/ #ifndef ANGLE_H #define ANGLE_H #include #include "camperror.h" namespace camp { const double PI=acos(-1.0); const double Cpiby180=PI/180.0; const double C180bypi=180.0/PI; inline double radians(double theta) { return theta*Cpiby180; } inline double degrees(double theta) { return theta*C180bypi; } // Wrapper for atan2 with sensible (lexical) argument order and (0,0) check inline double angle(double x, double y) { if(x == 0.0 && y == 0.0) reportError("taking angle of (0,0)"); return atan2(y,x); } // Return an angle in the interval [0,360). inline double principalBranch(double deg) { deg=fmod(deg,360.0); if(deg < 0) deg += 360.0; return deg; } } //namespace camp #endif ./asymptote-2.41/path3.h0000644000175000017500000002451613064427076014743 0ustar norbertnorbert/***** * path.h * John Bowman * * Stores a 3D piecewise cubic spline with known control points. * *****/ #ifndef PATH3_H #define PATH3_H #include #include "mod.h" #include "triple.h" #include "bbox3.h" #include "path.h" #include "arrayop.h" namespace camp { void checkEmpty3(Int n); // Used in the storage of solved path3 knots. struct solvedKnot3 : public gc { triple pre; triple point; triple post; bool straight; solvedKnot3() : straight(false) {} friend bool operator== (const solvedKnot3& p, const solvedKnot3& q) { return p.pre == q.pre && p.point == q.point && p.post == q.post; } }; extern const double BigFuzz; extern const double Fuzz; extern const double Fuzz2; extern const double sqrtFuzz; class path3 : public gc { bool cycles; // If the path3 is closed in a loop Int n; // The number of knots mem::vector nodes; mutable double cached_length; // Cache length since path3 is immutable. mutable bbox3 box; mutable bbox3 times; // Times where minimum and maximum extents are attained. public: path3() : cycles(false), n(0), nodes(), cached_length(-1) {} // Create a path3 of a single point path3(triple z, bool = false) : cycles(false), n(1), nodes(1), cached_length(-1) { nodes[0].pre = nodes[0].point = nodes[0].post = z; nodes[0].straight = false; } // Creates path3 from a list of knots. This will be used by camp // methods such as the guide solver, but should probably not be used by a // user of the system unless he knows what he is doing. path3(mem::vector& nodes, Int n, bool cycles = false) : cycles(cycles), n(n), nodes(nodes), cached_length(-1) { } friend bool operator== (const path3& p, const path3& q) { return p.cycles == q.cycles && p.nodes == q.nodes; } public: path3(solvedKnot3 n1, solvedKnot3 n2) : cycles(false), n(2), nodes(2), cached_length(-1) { nodes[0] = n1; nodes[1] = n2; nodes[0].pre = nodes[0].point; nodes[1].post = nodes[1].point; } // Copy constructor path3(const path3& p) : cycles(p.cycles), n(p.n), nodes(p.nodes), cached_length(p.cached_length), box(p.box) {} path3 unstraighten() const { path3 P=path3(*this); for(int i=0; i < n; ++i) P.nodes[i].straight=false; return P; } virtual ~path3() { } // Getting control points Int size() const { return n; } bool empty() const { return n == 0; } Int length() const { return cycles ? n : n-1; } bool cyclic() const { return cycles; } mem::vector& Nodes() { return nodes; } bool straight(Int t) const { if (cycles) return nodes[imod(t,n)].straight; return (t >= 0 && t < n) ? nodes[t].straight : false; } bool piecewisestraight() const { Int L=length(); for(Int i=0; i < L; ++i) if(!straight(i)) return false; return true; } triple point(Int t) const { return nodes[adjustedIndex(t,n,cycles)].point; } triple point(double t) const; triple precontrol(Int t) const { return nodes[adjustedIndex(t,n,cycles)].pre; } triple precontrol(double t) const; triple postcontrol(Int t) const { return nodes[adjustedIndex(t,n,cycles)].post; } triple postcontrol(double t) const; inline double norm(const triple& z0, const triple& c0, const triple& c1, const triple& z1) const { return Fuzz2*camp::max((c0-z0).abs2(), camp::max((c1-z0).abs2(),(z1-z0).abs2())); } triple predir(Int t, bool normalize=true) const { if(!cycles && t <= 0) return triple(0,0,0); triple z1=point(t); triple c1=precontrol(t); triple dir=3.0*(z1-c1); if(!normalize) return dir; triple z0=point(t-1); triple c0=postcontrol(t-1); double epsilon=norm(z0,c0,c1,z1); if(dir.abs2() > epsilon) return unit(dir); dir=2.0*c1-c0-z1; if(dir.abs2() > epsilon) return unit(dir); return unit(z1-z0+3.0*(c0-c1)); } triple postdir(Int t, bool normalize=true) const { if(!cycles && t >= n-1) return triple(0,0,0); triple c0=postcontrol(t); triple z0=point(t); triple dir=3.0*(c0-z0); triple z1=point(t+1); triple c1=precontrol(t+1); double epsilon=norm(z0,c0,c1,z1); if(!normalize) return dir; if(dir.abs2() > epsilon) return unit(dir); dir=z0-2.0*c0+c1; if(dir.abs2() > epsilon) return unit(dir); return unit(z1-z0+3.0*(c0-c1)); } triple dir(Int t, Int sign, bool normalize=true) const { if(sign == 0) { triple v=predir(t,normalize)+postdir(t,normalize); return normalize ? unit(v) : 0.5*v; } if(sign > 0) return postdir(t,normalize); return predir(t,normalize); } triple dir(double t, bool normalize=true) const { if(!cycles) { if(t <= 0) return postdir((Int) 0,normalize); if(t >= n-1) return predir(n-1,normalize); } Int i=Floor(t); t -= i; if(t == 0) return dir(i,0,normalize); triple z0=point(i); triple c0=postcontrol(i); triple c1=precontrol(i+1); triple z1=point(i+1); triple a=3.0*(z1-z0)+9.0*(c0-c1); triple b=6.0*(z0+c1)-12.0*c0; triple c=3.0*(c0-z0); triple dir=a*t*t+b*t+c; if(!normalize) return dir; double epsilon=norm(z0,c0,c1,z1); if(dir.abs2() > epsilon) return unit(dir); dir=2.0*a*t+b; if(dir.abs2() > epsilon) return unit(dir); return unit(a); } triple postaccel(Int t) const { if(!cycles && t >= n-1) return triple(0,0,0); triple z0=point(t); triple c0=postcontrol(t); triple c1=precontrol(t+1); return 6.0*(z0+c1)-12.0*c0; } triple preaccel(Int t) const { if(!cycles && t <= 0) return triple(0,0,0); triple z0=point(t-1); triple c0=postcontrol(t-1); triple c1=precontrol(t); triple z1=point(t); return 6.0*(z1+c0)-12.0*c1; } triple accel(Int t, Int sign) const { if(sign == 0) return 0.5*(preaccel(t)+postaccel(t)); if(sign > 0) return postaccel(t); return preaccel(t); } triple accel(double t) const { if(!cycles) { if(t <= 0) return postaccel((Int) 0); if(t >= n-1) return preaccel(n-1); } Int i=Floor(t); t -= i; if(t == 0) return 0.5*(postaccel(i)+preaccel(i)); triple z0=point(i); triple c0=postcontrol(i); triple c1=precontrol(i+1); triple z1=point(i+1); return 6.0*t*(z1-z0+3.0*(c0-c1))+6.0*(z0+c1)-12.0*c0; } // Returns the path3 traced out in reverse. path3 reverse() const; // Generates a path3 that is a section of the old path3, using the time // interval given. path3 subpath(Int start, Int end) const; path3 subpath(double start, double end) const; // Special case of subpath used by intersect. void halve(path3 &first, path3 &second) const; // Used by picture to determine bounding box. bbox3 bounds() const; triple mintimes() const { checkEmpty3(n); bounds(); return camp::triple(times.left,times.bottom,times.lower); } triple maxtimes() const { checkEmpty3(n); bounds(); return camp::triple(times.right,times.top,times.upper); } template void addpoint(bbox3& box, T i) const { box.addnonempty(point(i),times,(double) i); } double cubiclength(Int i, double goal=-1) const; double arclength () const; double arctime (double l) const; triple max() const { checkEmpty3(n); return bounds().Max(); } triple min() const { checkEmpty3(n); return bounds().Min(); } pair ratio(double (*m)(double, double)) const; // Increment count if the path3 has a vertical component at t. bool Count(Int& count, double t) const; // Count if t is in (begin,end] and z lies to the left of point(i+t). void countleft(Int& count, double x, Int i, double t, double begin, double end, double& mint, double& maxt) const; // Return the winding number of the region bounded by the (cyclic) path3 // relative to the point z. Int windingnumber(const triple& z) const; }; path3 transformed(const vm::array& t, const path3& p); path3 transformed(const double* t, const path3& p); extern path3 nullpath3; extern const unsigned maxdepth; bool intersect(double& S, double& T, path3& p, path3& q, double fuzz, unsigned depth=maxdepth); bool intersections(double& s, double& t, std::vector& S, std::vector& T, path3& p, path3& q, double fuzz, bool single, bool exact, unsigned depth=maxdepth); void intersections(std::vector& S, path3& g, const triple& p, const triple& q, double fuzz); bool intersections(std::vector& T, std::vector& U, std::vector& V, path3& p, triple *P, double fuzz, bool single, unsigned depth=maxdepth); bool intersections(double& U, double& V, const triple& v, triple *P, double fuzz, unsigned depth=maxdepth); // Concatenates two path3s into a new one. path3 concat(const path3& p1, const path3& p2); // return the perpendicular displacement of a point z from the line through // points p and q. inline triple displacement(const triple& z, const triple& p, const triple& q) { triple Z=z-p; triple Q=unit(q-p); return Z-dot(Z,Q)*Q; } typedef double bound_double(double *P, double (*m)(double, double), double b, double fuzz, int depth); typedef double bound_triple(triple *P, double (*m)(double, double), double (*f)(const triple&), double b, double fuzz, int depth); bound_double bound,boundtri; double bound(triple z0, triple c0, triple c1, triple z1, double (*m)(double, double), double (*f)(const triple&), double b, double fuzz, int depth=maxdepth); double bound(double *p, double (*m)(double, double), double b, double fuzz, int depth); double bound(triple *P, double (*m)(double, double), double (*f)(const triple&), double b, double fuzz, int depth); double boundtri(double *P, double (*m)(double, double), double b, double fuzz, int depth); double boundtri(triple *P, double (*m)(double, double), double (*f)(const triple&), double b, double fuzz, int depth); } #ifndef BROKEN_COMPILER // Delete the following line to work around problems with old broken compilers. GC_DECLARE_PTRFREE(camp::solvedKnot3); #endif #endif ./asymptote-2.41/path.cc0000644000175000017500000010222213064427076015005 0ustar norbertnorbert/***** * path.cc * Andy Hammerlindl 2002/06/06 * * Stores and returns information on a predefined path. * * When changing the path algorithms, also update the corresponding * three-dimensional algorithms in path3.cc. *****/ #include "path.h" #include "util.h" #include "angle.h" #include "camperror.h" #include "mathop.h" #include "predicates.h" #include "rounding.h" namespace camp { const double Fuzz=1000.0*DBL_EPSILON; const double BigFuzz=10.0*Fuzz; const double Fuzz2=Fuzz*Fuzz; const double sqrtFuzz=sqrt(Fuzz); const double fuzzFactor=10.0; const double third=1.0/3.0; path nullpath; const char *nopoints="nullpath has no points"; void checkEmpty(Int n) { if(n == 0) reportError(nopoints); } // Accurate computation of sqrt(1+x)-1. inline double sqrt1pxm1(double x) { return x/(sqrt(1.0+x)+1.0); } inline pair sqrt1pxm1(pair x) { return x/(Sqrt(1.0+x)+1.0); } // Solve for the real roots of the quadratic equation ax^2+bx+c=0. quadraticroots::quadraticroots(double a, double b, double c) { // Remove roots at numerical infinity. if(fabs(a) <= Fuzz*(fabs(b)+fabs(c)*Fuzz)) { if(fabs(b) > Fuzz*fabs(c)) { distinct=quadraticroots::ONE; roots=1; t1=-c/b; } else if(c == 0.0) { distinct=quadraticroots::MANY; roots=1; t1=0.0; } else { distinct=quadraticroots::NONE; roots=0; } } else { double factor=0.5*b/a; double denom=b*factor; if(fabs(denom) <= Fuzz*fabs(c)) { double x=-c/a; if(x >= 0.0) { distinct=quadraticroots::TWO; roots=2; t2=sqrt(x); t1=-t2; } else { distinct=quadraticroots::NONE; roots=0; } } else { double x=-2.0*c/denom; if(x > -1.0) { distinct=quadraticroots::TWO; roots=2; double r2=factor*sqrt1pxm1(x); double r1=-r2-2.0*factor; if(r1 <= r2) { t1=r1; t2=r2; } else { t1=r2; t2=r1; } } else if(x == -1.0) { distinct=quadraticroots::ONE; roots=2; t1=t2=-factor; } else { distinct=quadraticroots::NONE; roots=0; } } } } // Solve for the complex roots of the quadratic equation ax^2+bx+c=0. Quadraticroots::Quadraticroots(pair a, pair b, pair c) { if(a == 0.0) { if(b != 0.0) { roots=1; z1=-c/b; } else if(c == 0.0) { roots=1; z1=0.0; } else roots=0; } else { roots=2; pair factor=0.5*b/a; pair denom=b*factor; if(denom == 0.0) { z1=Sqrt(-c/a); z2=-z1; } else { z1=factor*sqrt1pxm1(-2.0*c/denom); z2=-z1-2.0*factor; } } } inline bool goodroot(double a, double b, double c, double t) { return goodroot(t) && quadratic(a,b,c,t) >= 0.0; } // Accurate computation of cbrt(sqrt(1+x)+1)-cbrt(sqrt(1+x)-1). inline double cbrtsqrt1pxm(double x) { double s=sqrt1pxm1(x); return 2.0/(cbrt(x+2.0*(sqrt(1.0+x)+1.0))+cbrt(x)+cbrt(s*s)); } // Taylor series of cos((atan(1.0/w)+pi)/3.0). static inline double costhetapi3(double w) { static const double c1=1.0/3.0; static const double c3=-19.0/162.0; static const double c5=425.0/5832.0; static const double c7=-16829.0/314928.0; double w2=w*w; double w3=w2*w; double w5=w3*w2; return c1*w+c3*w3+c5*w5+c7*w5*w2; } // Solve for the real roots of the cubic equation ax^3+bx^2+cx+d=0. cubicroots::cubicroots(double a, double b, double c, double d) { static const double ninth=1.0/9.0; static const double fiftyfourth=1.0/54.0; // Remove roots at numerical infinity. if(fabs(a) <= Fuzz*(fabs(b)+fabs(c)*Fuzz+fabs(d)*Fuzz2)) { quadraticroots q(b,c,d); roots=q.roots; if(q.roots >= 1) t1=q.t1; if(q.roots == 2) t2=q.t2; return; } // Detect roots at numerical zero. if(fabs(d) <= Fuzz*(fabs(c)+fabs(b)*Fuzz+fabs(a)*Fuzz2)) { quadraticroots q(a,b,c); roots=q.roots+1; t1=0; if(q.roots >= 1) t2=q.t1; if(q.roots == 2) t3=q.t2; return; } b /= a; c /= a; d /= a; double b2=b*b; double Q=3.0*c-b2; if(fabs(Q) < Fuzz*(3.0*fabs(c)+fabs(b2))) Q=0.0; double R=(3.0*Q+b2)*b-27.0*d; if(fabs(R) < Fuzz*((3.0*fabs(Q)+fabs(b2))*fabs(b)+27.0*fabs(d))) R=0.0; Q *= ninth; R *= fiftyfourth; double Q3=Q*Q*Q; double R2=R*R; double D=Q3+R2; double mthirdb=-b*third; if(D > 0.0) { roots=1; t1=mthirdb; if(R2 != 0.0) t1 += cbrt(R)*cbrtsqrt1pxm(Q3/R2); } else { roots=3; double v=0.0,theta; if(R2 > 0.0) { v=sqrt(-D/R2); theta=atan(v); } else theta=0.5*PI; double factor=2.0*sqrt(-Q)*(R >= 0 ? 1 : -1); t1=mthirdb+factor*cos(third*theta); t2=mthirdb-factor*cos(third*(theta-PI)); t3=mthirdb; if(R2 > 0.0) t3 -= factor*((v < 100.0) ? cos(third*(theta+PI)) : costhetapi3(1.0/v)); } } pair path::point(double t) const { checkEmpty(n); Int i = Floor(t); Int iplus; t = fmod(t,1); if (t < 0) t += 1; if (cycles) { i = imod(i,n); iplus = imod(i+1,n); } else if (i < 0) return nodes[0].point; else if (i >= n-1) return nodes[n-1].point; else iplus = i+1; double one_t = 1.0-t; pair a = nodes[i].point, b = nodes[i].post, c = nodes[iplus].pre, d = nodes[iplus].point, ab = one_t*a + t*b, bc = one_t*b + t*c, cd = one_t*c + t*d, abc = one_t*ab + t*bc, bcd = one_t*bc + t*cd, abcd = one_t*abc + t*bcd; return abcd; } pair path::precontrol(double t) const { checkEmpty(n); Int i = Floor(t); Int iplus; t = fmod(t,1); if (t < 0) t += 1; if (cycles) { i = imod(i,n); iplus = imod(i+1,n); } else if (i < 0) return nodes[0].pre; else if (i >= n-1) return nodes[n-1].pre; else iplus = i+1; double one_t = 1.0-t; pair a = nodes[i].point, b = nodes[i].post, c = nodes[iplus].pre, ab = one_t*a + t*b, bc = one_t*b + t*c, abc = one_t*ab + t*bc; return (abc == a) ? nodes[i].pre : abc; } pair path::postcontrol(double t) const { checkEmpty(n); Int i = Floor(t); Int iplus; t = fmod(t,1); if (t < 0) t += 1; if (cycles) { i = imod(i,n); iplus = imod(i+1,n); } else if (i < 0) return nodes[0].post; else if (i >= n-1) return nodes[n-1].post; else iplus = i+1; double one_t = 1.0-t; pair b = nodes[i].post, c = nodes[iplus].pre, d = nodes[iplus].point, bc = one_t*b + t*c, cd = one_t*c + t*d, bcd = one_t*bc + t*cd; return (bcd == d) ? nodes[iplus].post : bcd; } path path::reverse() const { mem::vector nodes(n); Int len=length(); for (Int i = 0, j = len; i < n; i++, j--) { nodes[i].pre = postcontrol(j); nodes[i].point = point(j); nodes[i].post = precontrol(j); nodes[i].straight = straight(j-1); } return path(nodes, n, cycles); } path path::subpath(Int a, Int b) const { if(empty()) return path(); if (a > b) { const path &rp = reverse(); Int len=length(); path result = rp.subpath(len-a, len-b); return result; } if (!cycles) { if (a < 0) { a = 0; if(b < 0) b = 0; } if (b > n-1) { b = n-1; if(a > b) a = b; } } Int sn = b-a+1; mem::vector nodes(sn); for (Int i = 0, j = a; j <= b; i++, j++) { nodes[i].pre = precontrol(j); nodes[i].point = point(j); nodes[i].post = postcontrol(j); nodes[i].straight = straight(j); } nodes[0].pre = nodes[0].point; nodes[sn-1].post = nodes[sn-1].point; return path(nodes, sn); } inline pair split(double t, const pair& x, const pair& y) { return x+(y-x)*t; } inline void splitCubic(solvedKnot sn[], double t, const solvedKnot& left_, const solvedKnot& right_) { solvedKnot &left=(sn[0]=left_), &mid=sn[1], &right=(sn[2]=right_); if(left.straight) { mid.point=split(t,left.point,right.point); pair deltaL=third*(mid.point-left.point); left.post=left.point+deltaL; mid.pre=mid.point-deltaL; pair deltaR=third*(right.point-mid.point); mid.post=mid.point+deltaR; right.pre=right.point-deltaR; mid.straight=true; } else { pair x=split(t,left.post,right.pre); // m1 left.post=split(t,left.point,left.post); // m0 right.pre=split(t,right.pre,right.point); // m2 mid.pre=split(t,left.post,x); // m3 mid.post=split(t,x,right.pre); // m4 mid.point=split(t,mid.pre,mid.post); // m5 } } path path::subpath(double a, double b) const { if(empty()) return path(); if (a > b) { const path &rp = reverse(); Int len=length(); return rp.subpath(len-a, len-b); } solvedKnot aL, aR, bL, bR; if (!cycles) { if (a < 0) { a = 0; if (b < 0) b = 0; } if (b > n-1) { b = n-1; if (a > b) a = b; } aL = nodes[(Int)floor(a)]; aR = nodes[(Int)ceil(a)]; bL = nodes[(Int)floor(b)]; bR = nodes[(Int)ceil(b)]; } else { if(run::validInt(a) && run::validInt(b)) { aL = nodes[imod((Int) floor(a),n)]; aR = nodes[imod((Int) ceil(a),n)]; bL = nodes[imod((Int) floor(b),n)]; bR = nodes[imod((Int) ceil(b),n)]; } else reportError("invalid path index"); } if (a == b) return path(point(a)); solvedKnot sn[3]; path p = subpath(Ceil(a), Floor(b)); if (a > floor(a)) { if (b < ceil(a)) { splitCubic(sn,a-floor(a),aL,aR); splitCubic(sn,(b-a)/(ceil(b)-a),sn[1],sn[2]); return path(sn[0],sn[1]); } splitCubic(sn,a-floor(a),aL,aR); p=concat(path(sn[1],sn[2]),p); } if (ceil(b) > b) { splitCubic(sn,b-floor(b),bL,bR); p=concat(p,path(sn[0],sn[1])); } return p; } // Special case of subpath for paths of length 1 used by intersect. void path::halve(path &first, path &second) const { solvedKnot sn[3]; splitCubic(sn,0.5,nodes[0],nodes[1]); first=path(sn[0],sn[1]); second=path(sn[1],sn[2]); } // Calculate the coefficients of a Bezier derivative divided by 3. static inline void derivative(pair& a, pair& b, pair& c, const pair& z0, const pair& c0, const pair& c1, const pair& z1) { a=z1-z0+3.0*(c0-c1); b=2.0*(z0+c1)-4.0*c0; c=c0-z0; } bbox path::bounds() const { if(!box.empty) return box; if (empty()) { // No bounds return bbox(); } Int len=length(); box.add(point(len)); times=bbox(len,len,len,len); for (Int i = 0; i < len; i++) { addpoint(box,i); if(straight(i)) continue; pair a,b,c; derivative(a,b,c,point(i),postcontrol(i),precontrol(i+1),point(i+1)); // Check x coordinate quadraticroots x(a.getx(),b.getx(),c.getx()); if(x.distinct != quadraticroots::NONE && goodroot(x.t1)) addpoint(box,i+x.t1); if(x.distinct == quadraticroots::TWO && goodroot(x.t2)) addpoint(box,i+x.t2); // Check y coordinate quadraticroots y(a.gety(),b.gety(),c.gety()); if(y.distinct != quadraticroots::NONE && goodroot(y.t1)) addpoint(box,i+y.t1); if(y.distinct == quadraticroots::TWO && goodroot(y.t2)) addpoint(box,i+y.t2); } return box; } bbox path::bounds(double min, double max) const { bbox box; Int len=length(); for (Int i = 0; i < len; i++) { addpoint(box,i,min,max); if(straight(i)) continue; pair a,b,c; derivative(a,b,c,point(i),postcontrol(i),precontrol(i+1),point(i+1)); // Check x coordinate quadraticroots x(a.getx(),b.getx(),c.getx()); if(x.distinct != quadraticroots::NONE && goodroot(x.t1)) addpoint(box,i+x.t1,min,max); if(x.distinct == quadraticroots::TWO && goodroot(x.t2)) addpoint(box,i+x.t2,min,max); // Check y coordinate quadraticroots y(a.gety(),b.gety(),c.gety()); if(y.distinct != quadraticroots::NONE && goodroot(y.t1)) addpoint(box,i+y.t1,min,max); if(y.distinct == quadraticroots::TWO && goodroot(y.t2)) addpoint(box,i+y.t2,min,max); } addpoint(box,len,min,max); return box; } inline void add(bbox& box, const pair& z, const pair& min, const pair& max) { box += z+min; box += z+max; } bbox path::internalbounds(const bbox& padding) const { bbox box; // Check interior nodes. Int len=length(); for (Int i = 1; i < len; i++) { pair pre=point(i)-precontrol(i); pair post=postcontrol(i)-point(i); // Check node x coordinate if((pre.getx() >= 0.0) ^ (post.getx() >= 0)) add(box,point(i),padding.left,padding.right); // Check node y coordinate if((pre.gety() >= 0.0) ^ (post.gety() >= 0)) add(box,point(i),pair(0,padding.bottom),pair(0,padding.top)); } // Check interior segments. for (Int i = 0; i < len; i++) { if(straight(i)) continue; pair a,b,c; derivative(a,b,c,point(i),postcontrol(i),precontrol(i+1),point(i+1)); // Check x coordinate quadraticroots x(a.getx(),b.getx(),c.getx()); if(x.distinct != quadraticroots::NONE && goodroot(x.t1)) add(box,point(i+x.t1),padding.left,padding.right); if(x.distinct == quadraticroots::TWO && goodroot(x.t2)) add(box,point(i+x.t2),padding.left,padding.right); // Check y coordinate quadraticroots y(a.gety(),b.gety(),c.gety()); if(y.distinct != quadraticroots::NONE && goodroot(y.t1)) add(box,point(i+y.t1),pair(0,padding.bottom),pair(0,padding.top)); if(y.distinct == quadraticroots::TWO && goodroot(y.t2)) add(box,point(i+y.t2),pair(0,padding.bottom),pair(0,padding.top)); } return box; } // {{{ Arclength Calculations static pair a,b,c; static double ds(double t) { double dx=quadratic(a.getx(),b.getx(),c.getx(),t); double dy=quadratic(a.gety(),b.gety(),c.gety(),t); return sqrt(dx*dx+dy*dy); } // Calculates arclength of a cubic using adaptive simpson integration. double path::cubiclength(Int i, double goal) const { const pair& z0=point(i); const pair& z1=point(i+1); double L; if(straight(i)) { L=(z1-z0).length(); return (goal < 0 || goal >= L) ? L : -goal/L; } const pair& c0=postcontrol(i); const pair& c1=precontrol(i+1); double integral; derivative(a,b,c,z0,c0,c1,z1); if(!simpson(integral,ds,0.0,1.0,DBL_EPSILON,1.0)) reportError("nesting capacity exceeded in computing arclength"); L=3.0*integral; if(goal < 0 || goal >= L) return L; double t=goal/L; goal *= third; static double dxmin=sqrt(DBL_EPSILON); if(!unsimpson(goal,ds,0.0,t,100.0*DBL_EPSILON,integral,1.0,dxmin)) reportError("nesting capacity exceeded in computing arctime"); return -t; } double path::arclength() const { if (cached_length != -1) return cached_length; double L=0.0; for (Int i = 0; i < n-1; i++) { L += cubiclength(i); } if(cycles) L += cubiclength(n-1); cached_length = L; return cached_length; } double path::arctime(double goal) const { if (cycles) { if (goal == 0 || cached_length == 0) return 0; if (goal < 0) { const path &rp = this->reverse(); double result = -rp.arctime(-goal); return result; } if (cached_length > 0 && goal >= cached_length) { Int loops = (Int)(goal / cached_length); goal -= loops*cached_length; return loops*n+arctime(goal); } } else { if (goal <= 0) return 0; if (cached_length > 0 && goal >= cached_length) return n-1; } double l,L=0; for (Int i = 0; i < n-1; i++) { l = cubiclength(i,goal); if (l < 0) return (-l+i); else { L += l; goal -= l; if (goal <= 0) return i+1; } } if (cycles) { l = cubiclength(n-1,goal); if (l < 0) return -l+n-1; if (cached_length > 0 && cached_length != L+l) { reportError("arclength != length.\n" "path::arclength(double) must have broken semantics.\n" "Please report this error."); } cached_length = L += l; goal -= l; return arctime(goal)+n; } else { cached_length = L; return length(); } } // }}} // {{{ Direction Time Calulation // Algorithm Stolen from Knuth's MetaFont inline double cubicDir(const solvedKnot& left, const solvedKnot& right, const pair& rot) { pair a,b,c; derivative(a,b,c,left.point,left.post,right.pre,right.point); a *= rot; b *= rot; c *= rot; quadraticroots ret(a.gety(),b.gety(),c.gety()); switch(ret.distinct) { case quadraticroots::MANY: case quadraticroots::ONE: { if(goodroot(a.getx(),b.getx(),c.getx(),ret.t1)) return ret.t1; } break; case quadraticroots::TWO: { if(goodroot(a.getx(),b.getx(),c.getx(),ret.t1)) return ret.t1; if(goodroot(a.getx(),b.getx(),c.getx(),ret.t2)) return ret.t2; } break; case quadraticroots::NONE: break; } return -1; } // TODO: Check that we handle corner cases. // Velocity(t) == (0,0) double path::directiontime(const pair& dir) const { if (dir == pair(0,0)) return 0; pair rot = pair(1,0)/unit(dir); double t; double pre,post; for (Int i = 0; i < n-1+cycles; ) { t = cubicDir(this->nodes[i],(cycles && i==n-1) ? nodes[0]:nodes[i+1],rot); if (t >= 0) return i+t; i++; if (cycles || i != n-1) { pair Pre = (point(i)-precontrol(i))*rot; pair Post = (postcontrol(i)-point(i))*rot; static pair zero(0.0,0.0); if(Pre != zero && Post != zero) { pre = angle(Pre); post = angle(Post); if ((pre <= 0 && post >= 0 && pre >= post - PI) || (pre >= 0 && post <= 0 && pre <= post + PI)) return i; } } } return -1; } // }}} // {{{ Path Intersection Calculations const unsigned maxdepth=DBL_MANT_DIG; const unsigned mindepth=maxdepth-16; void roots(std::vector &roots, double a, double b, double c, double d) { cubicroots r(a,b,c,d); if(r.roots >= 1) roots.push_back(r.t1); if(r.roots >= 2) roots.push_back(r.t2); if(r.roots == 3) roots.push_back(r.t3); } void roots(std::vector &r, double x0, double c0, double c1, double x1, double x) { double a=x1-x0+3.0*(c0-c1); double b=3.0*(x0+c1)-6.0*c0; double c=3.0*(c0-x0); double d=x0-x; roots(r,a,b,c,d); } // Return all intersection times of path g with the pair z. void intersections(std::vector& T, const path& g, const pair& z, double fuzz) { double fuzz2=fuzz*fuzz; Int n=g.length(); bool cycles=g.cyclic(); for(Int i=0; i < n; ++i) { // Check both directions to circumvent degeneracy. std::vector r; roots(r,g.point(i).getx(),g.postcontrol(i).getx(), g.precontrol(i+1).getx(),g.point(i+1).getx(),z.getx()); roots(r,g.point(i).gety(),g.postcontrol(i).gety(), g.precontrol(i+1).gety(),g.point(i+1).gety(),z.gety()); size_t m=r.size(); for(size_t j=0 ; j < m; ++j) { double t=r[j]; if(t >= -Fuzz && t <= 1.0+Fuzz) { double s=i+t; if((g.point(s)-z).abs2() <= fuzz2) { if(cycles && s >= n-Fuzz) s=0; T.push_back(s); } } } } } inline bool online(const pair&p, const pair& q, const pair& z, double fuzz) { if(p == q) return (z-p).abs2() <= fuzz*fuzz; return (z.getx()-p.getx())*(q.gety()-p.gety()) == (q.getx()-p.getx())*(z.gety()-p.gety()); } // Return all intersection times of path g with the (infinite) // line through p and q; if there are an infinite number of intersection points, // the returned list is guaranteed to include the endpoint times of // the intersection if endpoints=true. void lineintersections(std::vector& T, const path& g, const pair& p, const pair& q, double fuzz, bool endpoints=false) { Int n=g.length(); if(n == 0) { if(online(p,q,g.point((Int) 0),fuzz)) T.push_back(0.0); return; } bool cycles=g.cyclic(); double dx=q.getx()-p.getx(); double dy=q.gety()-p.gety(); double det=p.gety()*q.getx()-p.getx()*q.gety(); for(Int i=0; i < n; ++i) { pair z0=g.point(i); pair c0=g.postcontrol(i); pair c1=g.precontrol(i+1); pair z1=g.point(i+1); pair t3=z1-z0+3.0*(c0-c1); pair t2=3.0*(z0+c1)-6.0*c0; pair t1=3.0*(c0-z0); double a=dy*t3.getx()-dx*t3.gety(); double b=dy*t2.getx()-dx*t2.gety(); double c=dy*t1.getx()-dx*t1.gety(); double d=dy*z0.getx()-dx*z0.gety()+det; std::vector r; if(max(max(max(a*a,b*b),c*c),d*d) > Fuzz2*max(max(max(z0.abs2(),z1.abs2()),c0.abs2()),c1.abs2())) roots(r,a,b,c,d); else r.push_back(0.0); if(endpoints) { path h=g.subpath(i,i+1); intersections(r,h,p,fuzz); intersections(r,h,q,fuzz); if(online(p,q,z0,fuzz)) r.push_back(0.0); if(online(p,q,z1,fuzz)) r.push_back(1.0); } size_t m=r.size(); for(size_t j=0 ; j < m; ++j) { double t=r[j]; if(t >= -Fuzz && t <= 1.0+Fuzz) { double s=i+t; if(cycles && s >= n-Fuzz) s=0; T.push_back(s); } } } } // An optimized implementation of intersections(g,p--q); // if there are an infinite number of intersection points, the returned list is // only guaranteed to include the endpoint times of the intersection. void intersections(std::vector& S, std::vector& T, const path& g, const pair& p, const pair& q, double fuzz) { double length2=(q-p).abs2(); if(length2 == 0.0) { std::vector S1; intersections(S1,g,p,fuzz); size_t n=S1.size(); for(size_t i=0; i < n; ++i) { S.push_back(S1[i]); T.push_back(0.0); } } else { pair factor=(q-p)/length2; std::vector S1; lineintersections(S1,g,p,q,fuzz,true); size_t n=S1.size(); for(size_t i=0; i < n; ++i) { double s=S1[i]; double t=dot(g.point(s)-p,factor); if(t >= -Fuzz && t <= 1.0+Fuzz) { S.push_back(s); T.push_back(t); } } } } void add(std::vector& S, double s, const path& p, double fuzz2) { pair z=p.point(s); size_t n=S.size(); for(size_t i=0; i < n; ++i) if((p.point(S[i])-z).abs2() <= fuzz2) return; S.push_back(s); } void add(std::vector& S, std::vector& T, double s, double t, const path& p, double fuzz2) { pair z=p.point(s); size_t n=S.size(); for(size_t i=0; i < n; ++i) if((p.point(S[i])-z).abs2() <= fuzz2) return; S.push_back(s); T.push_back(t); } void add(double& s, double& t, std::vector& S, std::vector& T, std::vector& S1, std::vector& T1, double pscale, double qscale, double poffset, double qoffset, const path& p, double fuzz2, bool single) { if(single) { s=s*pscale+poffset; t=t*qscale+qoffset; } else { size_t n=S1.size(); for(size_t i=0; i < n; ++i) add(S,T,pscale*S1[i]+poffset,qscale*T1[i]+qoffset,p,fuzz2); } } void add(double& s, double& t, std::vector& S, std::vector& T, std::vector& S1, std::vector& T1, const path& p, double fuzz2, bool single) { size_t n=S1.size(); if(single) { if(n > 0) { s=S1[0]; t=T1[0]; } } else { for(size_t i=0; i < n; ++i) add(S,T,S1[i],T1[i],p,fuzz2); } } void intersections(std::vector& S, path& g, const pair& p, const pair& q, double fuzz) { double fuzz2=max(fuzzFactor*fuzz,Fuzz); fuzz2=fuzz2*fuzz2; std::vector S1; lineintersections(S1,g,p,q,fuzz); size_t n=S1.size(); for(size_t i=0; i < n; ++i) add(S,S1[i],g,fuzz2); } bool intersections(double &s, double &t, std::vector& S, std::vector& T, path& p, path& q, double fuzz, bool single, bool exact, unsigned depth) { if(errorstream::interrupt) throw interrupted(); double fuzz2=max(fuzzFactor*fuzz,Fuzz); fuzz2=fuzz2*fuzz2; Int lp=p.length(); if(((lp == 1 && p.straight(0)) || lp == 0) && exact) { std::vector T1,S1; intersections(T1,S1,q,p.point((Int) 0),p.point(lp),fuzz); add(s,t,S,T,S1,T1,p,fuzz2,single); return S1.size() > 0; } Int lq=q.length(); if(((lq == 1 && q.straight(0)) || lq == 0) && exact) { std::vector S1,T1; intersections(S1,T1,p,q.point((Int) 0),q.point(lq),fuzz); add(s,t,S,T,S1,T1,p,fuzz2,single); return S1.size() > 0; } pair maxp=p.max(); pair minp=p.min(); pair maxq=q.max(); pair minq=q.min(); if(maxp.getx()+fuzz >= minq.getx() && maxp.gety()+fuzz >= minq.gety() && maxq.getx()+fuzz >= minp.getx() && maxq.gety()+fuzz >= minp.gety()) { // Overlapping bounding boxes --depth; if((maxp-minp).length()+(maxq-minq).length() <= fuzz || depth == 0) { if(single) { s=0.5; t=0.5; } else { S.push_back(0.5); T.push_back(0.5); } return true; } path p1,p2; double pscale,poffset; std::vector S1,T1; if(lp <= 1) { if(lp == 1) p.halve(p1,p2); if(lp == 0 || p1 == p || p2 == p) { intersections(T1,S1,q,p.point((Int) 0),p.point((Int) 0),fuzz); add(s,t,S,T,S1,T1,p,fuzz2,single); return S1.size() > 0; } pscale=poffset=0.5; } else { Int tp=lp/2; p1=p.subpath(0,tp); p2=p.subpath(tp,lp); poffset=tp; pscale=1.0; } path q1,q2; double qscale,qoffset; if(lq <= 1) { if(lq == 1) q.halve(q1,q2); if(lq == 0 || q1 == q || q2 == q) { intersections(S1,T1,p,q.point((Int) 0),q.point((Int) 0),fuzz); add(s,t,S,T,S1,T1,p,fuzz2,single); return S1.size() > 0; } qscale=qoffset=0.5; } else { Int tq=lq/2; q1=q.subpath(0,tq); q2=q.subpath(tq,lq); qoffset=tq; qscale=1.0; } bool Short=lp == 1 && lq == 1; static size_t maxcount=9; size_t count=0; if(intersections(s,t,S1,T1,p1,q1,fuzz,single,exact,depth)) { add(s,t,S,T,S1,T1,pscale,qscale,0.0,0.0,p,fuzz2,single); if(single || depth <= mindepth) return true; count += S1.size(); if(Short && count > maxcount) return true; } S1.clear(); T1.clear(); if(intersections(s,t,S1,T1,p1,q2,fuzz,single,exact,depth)) { add(s,t,S,T,S1,T1,pscale,qscale,0.0,qoffset,p,fuzz2,single); if(single || depth <= mindepth) return true; count += S1.size(); if(Short && count > maxcount) return true; } S1.clear(); T1.clear(); if(intersections(s,t,S1,T1,p2,q1,fuzz,single,exact,depth)) { add(s,t,S,T,S1,T1,pscale,qscale,poffset,0.0,p,fuzz2,single); if(single || depth <= mindepth) return true; count += S1.size(); if(Short && count > maxcount) return true; } S1.clear(); T1.clear(); if(intersections(s,t,S1,T1,p2,q2,fuzz,single,exact,depth)) { add(s,t,S,T,S1,T1,pscale,qscale,poffset,qoffset,p,fuzz2,single); if(single || depth <= mindepth) return true; count += S1.size(); if(Short && count > maxcount) return true; } return S.size() > 0; } return false; } // }}} ostream& operator<< (ostream& out, const path& p) { Int n = p.length(); if(n < 0) out << ""; else { for(Int i = 0; i < n; i++) { out << p.point(i); if(p.straight(i)) out << "--"; else out << ".. controls " << p.postcontrol(i) << " and " << p.precontrol(i+1) << newl << " .."; } if(p.cycles) out << "cycle"; else out << p.point(n); } return out; } path concat(const path& p1, const path& p2) { Int n1 = p1.length(), n2 = p2.length(); if (n1 == -1) return p2; if (n2 == -1) return p1; mem::vector nodes(n1+n2+1); Int i = 0; nodes[0].pre = p1.point((Int) 0); for (Int j = 0; j < n1; j++) { nodes[i].point = p1.point(j); nodes[i].straight = p1.straight(j); nodes[i].post = p1.postcontrol(j); nodes[i+1].pre = p1.precontrol(j+1); i++; } for (Int j = 0; j < n2; j++) { nodes[i].point = p2.point(j); nodes[i].straight = p2.straight(j); nodes[i].post = p2.postcontrol(j); nodes[i+1].pre = p2.precontrol(j+1); i++; } nodes[i].point = nodes[i].post = p2.point(n2); return path(nodes, i+1); } // Interface to orient2d predicate optimized for pairs. double orient2d(const pair& a, const pair& b, const pair& c) { double detleft, detright, det; double detsum, errbound; double orient; FPU_ROUND_DOUBLE; detleft = (a.getx() - c.getx()) * (b.gety() - c.gety()); detright = (a.gety() - c.gety()) * (b.getx() - c.getx()); det = detleft - detright; if (detleft > 0.0) { if (detright <= 0.0) { FPU_RESTORE; return det; } else { detsum = detleft + detright; } } else if (detleft < 0.0) { if (detright >= 0.0) { FPU_RESTORE; return det; } else { detsum = -detleft - detright; } } else { FPU_RESTORE; return det; } errbound = ccwerrboundA * detsum; if ((det >= errbound) || (-det >= errbound)) { FPU_RESTORE; return det; } double pa[]={a.getx(),a.gety()}; double pb[]={b.getx(),b.gety()}; double pc[]={c.getx(),c.gety()}; orient = orient2dadapt(pa, pb, pc, detsum); FPU_RESTORE; return orient; } // Returns true iff the point z lies in or on the bounding box // of a,b,c, and d. bool insidebbox(const pair& a, const pair& b, const pair& c, const pair& d, const pair& z) { bbox B(a); B.addnonempty(b); B.addnonempty(c); B.addnonempty(d); return B.left <= z.getx() && z.getx() <= B.right && B.bottom <= z.gety() && z.gety() <= B.top; } inline bool inrange(double x0, double x1, double x) { return (x0 <= x && x <= x1) || (x1 <= x && x <= x0); } // Return true if point z is on z0--z1; otherwise compute contribution to // winding number. bool checkstraight(const pair& z0, const pair& z1, const pair& z, Int& count) { if(z0.gety() <= z.gety() && z.gety() <= z1.gety()) { double side=orient2d(z0,z1,z); if(side == 0.0 && inrange(z0.getx(),z1.getx(),z.getx())) return true; if(z.gety() < z1.gety() && side > 0) ++count; } else if(z1.gety() <= z.gety() && z.gety() <= z0.gety()) { double side=orient2d(z0,z1,z); if(side == 0.0 && inrange(z0.getx(),z1.getx(),z.getx())) return true; if(z.gety() < z0.gety() && side < 0) --count; } return false; } // returns true if point is on curve; otherwise compute contribution to // winding number. bool checkcurve(const pair& z0, const pair& c0, const pair& c1, const pair& z1, const pair& z, Int& count, unsigned depth) { if(depth == 0) return true; --depth; if(insidebbox(z0,c0,c1,z1,z)) { const pair m0=0.5*(z0+c0); const pair m1=0.5*(c0+c1); const pair m2=0.5*(c1+z1); const pair m3=0.5*(m0+m1); const pair m4=0.5*(m1+m2); const pair m5=0.5*(m3+m4); if(checkcurve(z0,m0,m3,m5,z,count,depth) || checkcurve(m5,m4,m2,z1,z,count,depth)) return true; } else if(checkstraight(z0,z1,z,count)) return true; return false; } // Return the winding number of the region bounded by the (cyclic) path // relative to the point z, or the largest odd integer if the point lies on // the path. Int path::windingnumber(const pair& z) const { static const Int undefined=Int_MAX % 2 ? Int_MAX : Int_MAX-1; if(!cycles) reportError("path is not cyclic"); bbox b=bounds(); if(z.getx() < b.left || z.getx() > b.right || z.gety() < b.bottom || z.gety() > b.top) return 0; Int count=0; for(Int i=0; i < n; ++i) if(straight(i)) { if(checkstraight(point(i),point(i+1),z,count)) return undefined; } else if(checkcurve(point(i),postcontrol(i),precontrol(i+1),point(i+1),z,count, maxdepth)) return undefined; return count; } path path::transformed(const transform& t) const { mem::vector nodes(n); for (Int i = 0; i < n; ++i) { nodes[i].pre = t * this->nodes[i].pre; nodes[i].point = t * this->nodes[i].point; nodes[i].post = t * this->nodes[i].post; nodes[i].straight = this->nodes[i].straight; } path p(nodes, n, cyclic()); return p; } path transformed(const transform& t, const path& p) { Int n = p.size(); mem::vector nodes(n); for (Int i = 0; i < n; ++i) { nodes[i].pre = t * p.precontrol(i); nodes[i].point = t * p.point(i); nodes[i].post = t * p.postcontrol(i); nodes[i].straight = p.straight(i); } return path(nodes, n, p.cyclic()); } path nurb(pair z0, pair z1, pair z2, pair z3, double w0, double w1, double w2, double w3, Int m) { mem::vector nodes(m+1); if(m < 1) reportError("invalid sampling interval"); double step=1.0/m; for(Int i=0; i <= m; ++i) { double t=i*step; double t2=t*t; double onemt=1.0-t; double onemt2=onemt*onemt; double W0=w0*onemt2*onemt; double W1=w1*3.0*t*onemt2; double W2=w2*3.0*t2*onemt; double W3=w3*t2*t; nodes[i].point=(W0*z0+W1*z1+W2*z2+W3*z3)/(W0+W1+W2+W3); } static const double twothirds=2.0/3.0; pair z=nodes[0].point; nodes[0].pre=z; nodes[0].post=twothirds*z+third*nodes[1].point; for(int i=1; i < m; ++i) { pair z0=nodes[i].point; pair zm=nodes[i-1].point; pair zp=nodes[i+1].point; pair pre=twothirds*z0+third*zm; pair pos=twothirds*z0+third*zp; pair dir=unit(pos-pre); nodes[i].pre=z0-length(z0-pre)*dir; nodes[i].post=z0+length(pos-z0)*dir; } z=nodes[m].point; nodes[m].pre=twothirds*z+third*nodes[m-1].point; nodes[m].post=z; return path(nodes,m+1); } } //namespace camp ./asymptote-2.41/application.cc0000644000175000017500000004414613064427076016366 0ustar norbertnorbert/***** * application.cc * Andy Hammerlindl 2005/05/20 * * An application is a matching of arguments in a call expression to formal * parameters of a function. Since the language allows default arguments, * keyword arguments, rest arguments, and anything else we think of, this * is not a simple mapping. *****/ #include "application.h" #include "exp.h" #include "coenv.h" #include "runtime.h" #include "runarray.h" using namespace types; using absyntax::varinit; using absyntax::arrayinit; using absyntax::arglist; namespace trans { // Lower scores are better. Packed is added onto the other qualifiers so // we may score both exact and casted packed arguments. const score FAIL=0, EXACT=1, CAST=2; const score PACKED=2; bool castable(env &e, formal& target, formal& source) { return target.Explicit ? equivalent(target.t,source.t) : e.castable(target.t,source.t, symbol::castsym); } score castScore(env &e, formal& target, formal& source) { return equivalent(target.t,source.t) ? EXACT : (!target.Explicit && e.fastCastable(target.t,source.t)) ? CAST : FAIL; } void restArg::transMaker(coenv &e, Int size, bool rest) { // Push the number of cells and call the array maker. e.c.encode(inst::intpush, size); e.c.encode(inst::builtin, rest ? run::newAppendedArray : run::newInitializedArray); } void restArg::trans(coenv &e, temp_vector &temps) { // Push the values on the stack. for (mem::list::iterator p = inits.begin(); p != inits.end(); ++p) (*p)->trans(e, temps); if (rest) rest->trans(e, temps); transMaker(e, (Int)inits.size(), (bool)rest); } class maximizer { app_list l; // Tests if x is as good (or better) an application as y. bool asgood(application *x, application *y) { // Matches to open signatures are always worse than matches to normal // signatures. if (x->sig->isOpen) return y->sig->isOpen; else if (y->sig->isOpen) return true; assert (x->scores.size() == y->scores.size()); // Test if each score in x is no higher than the corresponding score in // y. return std::equal(x->scores.begin(), x->scores.end(), y->scores.begin(), std::less_equal()); } bool better(application *x, application *y) { return asgood(x,y) && !asgood(y,x); } // Add an application that has already been determined to be maximal. // Remove any other applications that are now not maximal because of its // addition. void addMaximal(application *x) { app_list::iterator y=l.begin(); while (y!=l.end()) if (better(x,*y)) y=l.erase(y); else ++y; l.push_front(x); } // Tests if x is maximal. bool maximal(application *x) { for (app_list::iterator y=l.begin(); y!=l.end(); ++y) if (better(*y,x)) return false; return true; } public: maximizer() {} void add(application *x) { if (maximal(x)) addMaximal(x); } app_list result() { return l; } }; ty *restCellType(signature *sig) { formal& f=sig->getRest(); if (f.t) { array *a=dynamic_cast(f.t); if (a) return a->celltype; } return 0; } void application::initRest() { formal& f=sig->getRest(); if (f.t) { ty *ct = restCellType(sig); if (!ct) vm::error("formal rest argument must be an array"); rf=formal(ct, symbol::nullsym, false, f.Explicit); } if (f.t || sig->isOpen) { rest=new restArg(); } } //const Int REST=-1; const Int NOMATCH=-2; Int application::find(symbol name) { formal_vector &f=sig->formals; for (size_t i=index; iadd(seq.addArg(a, rf.t, evalIndex)); scores.push_back(s+PACKED); return true; } } return false; } bool application::matchAtSpot(size_t spot, env &e, formal &source, varinit *a, size_t evalIndex) { formal &target=sig->getFormal(spot); score s=castScore(e, target, source); if (s == FAIL) return false; else if (sig->formalIsKeywordOnly(spot) && source.name == symbol::nullsym) return false; else { // The argument matches. args[spot]=seq.addArg(a, target.t, evalIndex); if (spot==index) advanceIndex(); scores.push_back(s); return true; } } bool application::matchArgument(env &e, formal &source, varinit *a, size_t evalIndex) { assert(!source.name); if (index==args.size()) // Try to pack into the rest array. return matchArgumentToRest(e, source, a, evalIndex); else // Match here, or failing that use a default and try to match at the next // spot. return matchAtSpot(index, e, source, a, evalIndex) || (matchDefault() && matchArgument(e, source, a, evalIndex)); } bool application::matchNamedArgument(env &e, formal &source, varinit *a, size_t evalIndex) { assert(source.name); Int spot=find(source.name); return spot!=NOMATCH && matchAtSpot(spot, e, source, a, evalIndex); } bool application::complete() { if (index==args.size()) return true; else if (matchDefault()) return complete(); else return false; } bool application::matchRest(env &e, formal &source, varinit *a, size_t evalIndex) { // First make sure all non-rest arguments are matched (matching to defaults // if necessary). if (complete()) // Match rest to rest. if (rest) { formal &target=sig->getRest(); score s=castScore(e, target, source); if (s!=FAIL) { rest->addRest(seq.addArg(a, target.t, evalIndex)); scores.push_back(s); return true; } } return false; } // When the argument should be evaluated, possibly adjusting for a rest // argument which occurs before named arguments. size_t adjustIndex(size_t i, size_t ri) { return i < ri ? i : i+1; } bool application::matchSignature(env &e, types::signature *source, arglist &al) { formal_vector &f=source->formals; #if 0 cout << "num args: " << f.size() << endl; cout << "num keyword-only: " << sig->numKeywordOnly << endl; #endif size_t ri = al.rest.val ? al.restPosition : f.size(); // First, match all of the named (non-rest) arguments. for (size_t i=0; ihasRest()) if (!matchRest(e, source->getRest(), al.rest.val, ri)) return false; // Fill in any remaining arguments with their defaults. return complete(); } bool application::matchOpen(env &e, signature *source, arglist &al) { assert(rest); // Pack all given parameters into the rest argument. formal_vector &f=source->formals; for (size_t i = 0; i < f.size(); ++i) if (al[i].name) // Named arguments are not handled by open signatures. return false; else rest->add(seq.addArg(al[i].val, f[i].t, i)); if (source->hasRest()) rest->addRest(new varinitArg(al.rest.val, source->getRest().t)); return true; } application *application::match(env &e, function *t, signature *source, arglist &al) { assert(t->kind==ty_function); application *app=new application(t); bool success = t->getSignature()->isOpen ? app->matchOpen(e, source, al) : app->matchSignature(e, source, al); //cout << "MATCH " << success << endl; return success ? app : 0; } void application::transArgs(coenv &e) { temp_vector temps; for(arg_vector::iterator a=args.begin(); a != args.end(); ++a) (*a)->trans(e,temps); if (rest) rest->trans(e,temps); } bool application::exact() { if (sig->isOpen) return false; for (score_vector::iterator p = scores.begin(); p != scores.end(); ++p) if (*p != EXACT) return false; return true; } bool application::halfExact() { if (sig->isOpen) return false; if (scores.size() != 2) return false; if (scores[0] == EXACT && scores[1] == CAST) return true; if (scores[0] == CAST && scores[1] == EXACT) return true; return false; } // True if any of the formals have names. bool namedFormals(signature *sig) { formal_vector& formals = sig->formals; size_t n = formals.size(); for (size_t i = 0; i < n; ++i) { if (formals[i].name) return true; } return false; } // Tests if arguments in the source signature can be matched to the formals // in the target signature with no casting or packing. // This allows overloaded args, but not named args. bool exactMightMatch(signature *target, signature *source) { // Open signatures never exactly match. if (target->isOpen) return false; #if 0 assert(!namedFormals(source)); #endif formal_vector& formals = target->formals; formal_vector& args = source->formals; // Sizes of the two lists. size_t fn = formals.size(), an = args.size(); // Indices for the two lists. size_t fi = 0, ai = 0; while (fi < fn && ai < an) { if (equivalent(formals[fi].t, args[ai].t)) { // Arguments match, move to the next. ++fi; ++ai; } else if (formals[fi].defval) { // Match formal to default value. ++fi; } else { // Failed to match formal. return false; } } assert(fi == fn || ai == an); // Packing array arguments into the rest formal is inexact. Do not allow it // here. if (ai < an) return false; assert(ai == an); // Match any remaining formal to defaults. while (fi < fn) if (formals[fi].defval) { // Match formal to default value. ++fi; } else { // Failed to match formal. return false; } // Non-rest arguments have matched. assert(fi == fn && ai == an); // Try to match the rest argument if given. if (source->hasRest()) { if (!target->hasRest()) return false; if (!equivalent(source->getRest().t, target->getRest().t)) return false; } // All arguments have matched. return true; } // Tries to match applications without casting. If an application matches // here, we need not attempt to match others with the slower, more general // techniques. app_list exactMultimatch(env &e, types::overloaded *o, types::signature *source, arglist &al) { assert(source); app_list l; // This can't handle named arguments. if (namedFormals(source)) return l; /* empty */ for (ty_vector::iterator t=o->sub.begin(); t!=o->sub.end(); ++t) { if ((*t)->kind != ty_function) continue; function *ft = (function *)*t; // First we run a test to see if all arguments could be exactly matched. // If this returns false, no such match is possible. // If it returns true, an exact match may or may not be possible. if (!exactMightMatch(ft->getSignature(), source)) continue; application *a=application::match(e, ft, source, al); // Consider calling // void f(A a=new A, int y) // with // f(3) // This matches exactly if there is no implicit cast from int to A. // Otherwise, it does not match. // Thus, there is no way to know if the // match truly is exact without looking at the environment. // In such a case, exactMightMatch() must return true, but there is no // exact match. Such false positives are eliminated here. // // Consider calling // void f(int x, real y=0.0, int z=0) // with // f(1,2) // exactMightMatch() will return true, matching 1 to x and 2 to z, but the // application::match will give an inexact match of 1 to x to 2 to y, due // to the cast from int to real. Therefore, we must test for exactness // even after matching. if (a && a->exact()) l.push_back(a); } //cout << "EXACTMATCH " << (!l.empty()) << endl; return l; } bool halfExactMightMatch(env &e, signature *target, types::ty *t1, types::ty *t2) { formal_vector& formals = target->formals; if (formals.size() < 2) return false; if (formals.size() > 2) { // We should probably abort the whole matching in this case. For now, // return true and let the usual matching handle it. return true; } assert(formals[0].t); assert(formals[1].t); // These casting tests if successful will be repeated again by // application::match. It would be nice to avoid this somehow, but the // additional complexity is probably not worth the minor speed improvement. if (equivalent(formals[0].t, t1)) return e.fastCastable(formals[1].t, t2); else return equivalent(formals[1].t, t2) && e.fastCastable(formals[0].t, t1); } // Most common after exact matches are cases such as // 2 + 3.4 (int, real) --> (real, real) // that is, binary operations where one of the operands matches exactly and the // other does not. This function searches for these so-called "half-exact" // matches. This should only be called after exactMultimatch has failed. app_list halfExactMultimatch(env &e, types::overloaded *o, types::signature *source, arglist &al) { assert(source); app_list l; // Half exact is only in the case of two arguments. formal_vector& formals = source->formals; if (formals.size() != 2 || source->hasRest()) return l; /* empty */ // This can't handle named arguments. if (namedFormals(source)) return l; /* empty */ // Alias the two argument types. types::ty *t1 = formals[0].t; types::ty *t2 = formals[1].t; assert(t1); assert(t2); for (ty_vector::iterator t=o->sub.begin(); t!=o->sub.end(); ++t) { if ((*t)->kind != ty_function) continue; function *ft = (function *)*t; #if 1 if (!halfExactMightMatch(e, ft->getSignature(), t1, t2)) continue; #endif application *a=application::match(e, ft, source, al); #if 1 if (a && a->halfExact()) l.push_back(a); #endif } return l; } // Simple check if there are too many arguments to match the candidate // function. // A "tooFewArgs" variant was also implemented at some point, but did // not give any speed-up. bool tooManyArgs(types::signature *target, types::signature *source) { return source->getNumFormals() > target->getNumFormals() && !target->hasRest(); } // The full overloading resolution system, which handles casting of arguments, // packing into rest arguments, named arguments, etc. app_list inexactMultimatch(env &e, types::overloaded *o, types::signature *source, arglist &al) { assert(source); app_list l; #define DEBUG_GETAPP 0 #if DEBUG_GETAPP //cout << "source: " << *source << endl; //cout << "ARGS: " << source->getNumFormals() << endl; bool perfect=false; bool exact=false; bool halfExact=false; #endif for(ty_vector::iterator t=o->sub.begin(); t!=o->sub.end(); ++t) { if ((*t)->kind==ty_function) { #if DEBUG_GETAPP function *ft = dynamic_cast(*t); signature *target = ft->getSignature(); if (equivalent(target, source)) perfect = true; #endif // Check if there are two many arguments to match. if (tooManyArgs((*t)->getSignature(), source)) continue; application *a=application::match(e, (function *)(*t), source, al); if (a) l.push_back(a); #if DEBUG_GETAPP if (a && !namedFormals(source)) { assert(a->exact() == exactlyMatchable(ft->getSignature(), source)); if (a->halfExact() && !namedFormals(source)) { assert(halfExactMightMatch(e, target, source->getFormal(0).t, source->getFormal(1).t)); } } if (a && a->exact()) exact = true; if (a && a->halfExact()) halfExact = true; #endif } } #if DEBUG_GETAPP cout << (perfect ? "PERFECT" : exact ? "EXACT" : halfExact ? "HALFEXACT" : "IMPERFECT") << endl; #endif if (l.size() > 1) { // Return the most specific candidates. maximizer m; for (app_list::iterator x=l.begin(); x!=l.end(); ++x) { assert(*x); m.add(*x); } return m.result(); } else return l; } enum testExactType { TEST_EXACT, DONT_TEST_EXACT, }; // Sanity check for multimatch optimizations. void sameApplications(app_list a, app_list b, testExactType te) { assert(a.size() == b.size()); if (te == TEST_EXACT) { for (app_list::iterator i = a.begin(); i != a.end(); ++i) { if (!(*i)->exact()) { cout << *(*i)->getType() << endl; } assert((*i)->exact()); } for (app_list::iterator i = b.begin(); i != b.end(); ++i) assert((*i)->exact()); } if (a.size() == 1) assert(equivalent(a.front()->getType(), b.front()->getType())); } app_list multimatch(env &e, types::overloaded *o, types::signature *source, arglist &al) { app_list a = exactMultimatch(e, o, source, al); if (!a.empty()) { #if DEBUG_CACHE // Make sure that exactMultimatch and the fallback return the same // application(s). sameApplications(a, inexactMultimatch(e, o, source, al), TEST_EXACT); #endif return a; } a = halfExactMultimatch(e, o, source, al); if (!a.empty()) { #if DEBUG_CACHE sameApplications(a, inexactMultimatch(e, o, source, al), DONT_TEST_EXACT); #endif return a; } // Slow but most general method. return inexactMultimatch(e, o, source, al); } } // namespace trans ./asymptote-2.41/lex.yy.cc0000644000175000017500000024334013064427112015277 0ustar norbertnorbert#line 2 "lex.yy.cc" #line 4 "lex.yy.cc" #define YY_INT_ALIGNED short int /* A lexical scanner generated by flex */ /* %not-for-header */ /* %if-c-only */ /* %if-not-reentrant */ /* %endif */ /* %endif */ /* %ok-for-header */ #define FLEX_SCANNER #define YY_FLEX_MAJOR_VERSION 2 #define YY_FLEX_MINOR_VERSION 6 #define YY_FLEX_SUBMINOR_VERSION 0 #if YY_FLEX_SUBMINOR_VERSION > 0 #define FLEX_BETA #endif /* %if-c++-only */ /* %endif */ /* %if-c-only */ /* %endif */ /* %if-c-only */ /* %endif */ /* First, we deal with platform-specific or compiler-specific issues. */ /* begin standard C headers. */ /* %if-c-only */ #include #include #include #include /* %endif */ /* %if-tables-serialization */ /* %endif */ /* end standard C headers. */ /* %if-c-or-c++ */ /* flex integer type definitions */ #ifndef FLEXINT_H #define FLEXINT_H /* C99 systems have . Non-C99 systems may or may not. */ #if defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L /* C99 says to define __STDC_LIMIT_MACROS before including stdint.h, * if you want the limit (max/min) macros for int types. */ #ifndef __STDC_LIMIT_MACROS #define __STDC_LIMIT_MACROS 1 #endif #include typedef int8_t flex_int8_t; typedef uint8_t flex_uint8_t; typedef int16_t flex_int16_t; typedef uint16_t flex_uint16_t; typedef int32_t flex_int32_t; typedef uint32_t flex_uint32_t; #else typedef signed char flex_int8_t; typedef short int flex_int16_t; typedef int flex_int32_t; typedef unsigned char flex_uint8_t; typedef unsigned short int flex_uint16_t; typedef unsigned int flex_uint32_t; /* Limits of integral types. */ #ifndef INT8_MIN #define INT8_MIN (-128) #endif #ifndef INT16_MIN #define INT16_MIN (-32767-1) #endif #ifndef INT32_MIN #define INT32_MIN (-2147483647-1) #endif #ifndef INT8_MAX #define INT8_MAX (127) #endif #ifndef INT16_MAX #define INT16_MAX (32767) #endif #ifndef INT32_MAX #define INT32_MAX (2147483647) #endif #ifndef UINT8_MAX #define UINT8_MAX (255U) #endif #ifndef UINT16_MAX #define UINT16_MAX (65535U) #endif #ifndef UINT32_MAX #define UINT32_MAX (4294967295U) #endif #endif /* ! C99 */ #endif /* ! FLEXINT_H */ /* %endif */ /* %if-c++-only */ /* %endif */ #ifdef __cplusplus /* The "const" storage-class-modifier is valid. */ #define YY_USE_CONST #else /* ! __cplusplus */ /* C99 requires __STDC__ to be defined as 1. */ #if defined (__STDC__) #define YY_USE_CONST #endif /* defined (__STDC__) */ #endif /* ! __cplusplus */ #ifdef YY_USE_CONST #define yyconst const #else #define yyconst #endif /* %not-for-header */ /* Returned upon end-of-file. */ #define YY_NULL 0 /* %ok-for-header */ /* %not-for-header */ /* Promotes a possibly negative, possibly signed char to an unsigned * integer for use as an array index. If the signed char is negative, * we want to instead treat it as an 8-bit unsigned char, hence the * double cast. */ #define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c) /* %ok-for-header */ /* %if-reentrant */ /* %endif */ /* %if-not-reentrant */ /* %endif */ /* Enter a start condition. This macro really ought to take a parameter, * but we do it the disgusting crufty way forced on us by the ()-less * definition of BEGIN. */ #define BEGIN (yy_start) = 1 + 2 * /* Translate the current start state into a value that can be later handed * to BEGIN to return to the state. The YYSTATE alias is for lex * compatibility. */ #define YY_START (((yy_start) - 1) / 2) #define YYSTATE YY_START /* Action number for EOF rule of a given start state. */ #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1) /* Special action meaning "start processing a new file". */ #define YY_NEW_FILE yyrestart(yyin ) #define YY_END_OF_BUFFER_CHAR 0 /* Size of default input buffer. */ #ifndef YY_BUF_SIZE #ifdef __ia64__ /* On IA-64, the buffer size is 16k, not 8k. * Moreover, YY_BUF_SIZE is 2*YY_READ_BUF_SIZE in the general case. * Ditto for the __ia64__ case accordingly. */ #define YY_BUF_SIZE 32768 #else #define YY_BUF_SIZE 16384 #endif /* __ia64__ */ #endif /* The state buf must be large enough to hold one state per character in the main buffer. */ #define YY_STATE_BUF_SIZE ((YY_BUF_SIZE + 2) * sizeof(yy_state_type)) #ifndef YY_TYPEDEF_YY_BUFFER_STATE #define YY_TYPEDEF_YY_BUFFER_STATE typedef struct yy_buffer_state *YY_BUFFER_STATE; #endif #ifndef YY_TYPEDEF_YY_SIZE_T #define YY_TYPEDEF_YY_SIZE_T typedef size_t yy_size_t; #endif /* %if-not-reentrant */ extern yy_size_t yyleng; /* %endif */ /* %if-c-only */ /* %if-not-reentrant */ extern FILE *yyin, *yyout; /* %endif */ /* %endif */ #define EOB_ACT_CONTINUE_SCAN 0 #define EOB_ACT_END_OF_FILE 1 #define EOB_ACT_LAST_MATCH 2 #define YY_LESS_LINENO(n) #define YY_LINENO_REWIND_TO(ptr) /* Return all but the first "n" matched characters back to the input stream. */ #define yyless(n) \ do \ { \ /* Undo effects of setting up yytext. */ \ yy_size_t yyless_macro_arg = (n); \ YY_LESS_LINENO(yyless_macro_arg);\ *yy_cp = (yy_hold_char); \ YY_RESTORE_YY_MORE_OFFSET \ (yy_c_buf_p) = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \ YY_DO_BEFORE_ACTION; /* set up yytext again */ \ } \ while ( 0 ) #define unput(c) yyunput( c, (yytext_ptr) ) #ifndef YY_STRUCT_YY_BUFFER_STATE #define YY_STRUCT_YY_BUFFER_STATE struct yy_buffer_state { /* %if-c-only */ FILE *yy_input_file; /* %endif */ /* %if-c++-only */ /* %endif */ char *yy_ch_buf; /* input buffer */ char *yy_buf_pos; /* current position in input buffer */ /* Size of input buffer in bytes, not including room for EOB * characters. */ yy_size_t yy_buf_size; /* Number of characters read into yy_ch_buf, not including EOB * characters. */ yy_size_t yy_n_chars; /* Whether we "own" the buffer - i.e., we know we created it, * and can realloc() it to grow it, and should free() it to * delete it. */ int yy_is_our_buffer; /* Whether this is an "interactive" input source; if so, and * if we're using stdio for input, then we want to use getc() * instead of fread(), to make sure we stop fetching input after * each newline. */ int yy_is_interactive; /* Whether we're considered to be at the beginning of a line. * If so, '^' rules will be active on the next match, otherwise * not. */ int yy_at_bol; int yy_bs_lineno; /**< The line count. */ int yy_bs_column; /**< The column count. */ /* Whether to try to fill the input buffer when we reach the * end of it. */ int yy_fill_buffer; int yy_buffer_status; #define YY_BUFFER_NEW 0 #define YY_BUFFER_NORMAL 1 /* When an EOF's been seen but there's still some text to process * then we mark the buffer as YY_EOF_PENDING, to indicate that we * shouldn't try reading from the input source any more. We might * still have a bunch of tokens to match, though, because of * possible backing-up. * * When we actually see the EOF, we change the status to "new" * (via yyrestart()), so that the user can continue scanning by * just pointing yyin at a new input file. */ #define YY_BUFFER_EOF_PENDING 2 }; #endif /* !YY_STRUCT_YY_BUFFER_STATE */ /* %if-c-only Standard (non-C++) definition */ /* %not-for-header */ /* %if-not-reentrant */ /* Stack of input buffers. */ static size_t yy_buffer_stack_top = 0; /**< index of top of stack. */ static size_t yy_buffer_stack_max = 0; /**< capacity of stack. */ static YY_BUFFER_STATE * yy_buffer_stack = 0; /**< Stack as an array. */ /* %endif */ /* %ok-for-header */ /* %endif */ /* We provide macros for accessing buffer states in case in the * future we want to put the buffer states in a more general * "scanner state". * * Returns the top of the stack, or NULL. */ #define YY_CURRENT_BUFFER ( (yy_buffer_stack) \ ? (yy_buffer_stack)[(yy_buffer_stack_top)] \ : NULL) /* Same as previous macro, but useful when we know that the buffer stack is not * NULL or when we need an lvalue. For internal use only. */ #define YY_CURRENT_BUFFER_LVALUE (yy_buffer_stack)[(yy_buffer_stack_top)] /* %if-c-only Standard (non-C++) definition */ /* %if-not-reentrant */ /* %not-for-header */ /* yy_hold_char holds the character lost when yytext is formed. */ static char yy_hold_char; static yy_size_t yy_n_chars; /* number of characters read into yy_ch_buf */ yy_size_t yyleng; /* Points to current character in buffer. */ static char *yy_c_buf_p = (char *) 0; static int yy_init = 0; /* whether we need to initialize */ static int yy_start = 0; /* start state number */ /* Flag which is used to allow yywrap()'s to do buffer switches * instead of setting up a fresh yyin. A bit of a hack ... */ static int yy_did_buffer_switch_on_eof; /* %ok-for-header */ /* %endif */ void yyrestart (FILE *input_file ); void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer ); YY_BUFFER_STATE yy_create_buffer (FILE *file,int size ); void yy_delete_buffer (YY_BUFFER_STATE b ); void yy_flush_buffer (YY_BUFFER_STATE b ); void yypush_buffer_state (YY_BUFFER_STATE new_buffer ); void yypop_buffer_state (void ); static void yyensure_buffer_stack (void ); static void yy_load_buffer_state (void ); static void yy_init_buffer (YY_BUFFER_STATE b,FILE *file ); #define YY_FLUSH_BUFFER yy_flush_buffer(YY_CURRENT_BUFFER ) YY_BUFFER_STATE yy_scan_buffer (char *base,yy_size_t size ); YY_BUFFER_STATE yy_scan_string (yyconst char *yy_str ); YY_BUFFER_STATE yy_scan_bytes (yyconst char *bytes,yy_size_t len ); /* %endif */ void *yyalloc (yy_size_t ); void *yyrealloc (void *,yy_size_t ); void yyfree (void * ); #define yy_new_buffer yy_create_buffer #define yy_set_interactive(is_interactive) \ { \ if ( ! YY_CURRENT_BUFFER ){ \ yyensure_buffer_stack (); \ YY_CURRENT_BUFFER_LVALUE = \ yy_create_buffer(yyin,YY_BUF_SIZE ); \ } \ YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \ } #define yy_set_bol(at_bol) \ { \ if ( ! YY_CURRENT_BUFFER ){\ yyensure_buffer_stack (); \ YY_CURRENT_BUFFER_LVALUE = \ yy_create_buffer(yyin,YY_BUF_SIZE ); \ } \ YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \ } #define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol) /* %% [1.0] yytext/yyin/yyout/yy_state_type/yylineno etc. def's & init go here */ #define FLEX_DEBUG typedef unsigned char YY_CHAR; FILE *yyin = (FILE *) 0, *yyout = (FILE *) 0; typedef int yy_state_type; extern int yylineno; int yylineno = 1; extern char *yytext; #ifdef yytext_ptr #undef yytext_ptr #endif #define yytext_ptr yytext /* %% [1.5] DFA */ /* %if-c-only Standard (non-C++) definition */ static yy_state_type yy_get_previous_state (void ); static yy_state_type yy_try_NUL_trans (yy_state_type current_state ); static int yy_get_next_buffer (void ); #if defined(__GNUC__) && __GNUC__ >= 3 __attribute__((__noreturn__)) #endif static void yy_fatal_error (yyconst char msg[] ); /* %endif */ /* Done after the current pattern has been matched and before the * corresponding action - sets up yytext. */ #define YY_DO_BEFORE_ACTION \ (yytext_ptr) = yy_bp; \ /* %% [2.0] code to fiddle yytext and yyleng for yymore() goes here \ */\ yyleng = (size_t) (yy_cp - yy_bp); \ (yy_hold_char) = *yy_cp; \ *yy_cp = '\0'; \ /* %% [3.0] code to copy yytext_ptr to yytext[] goes here, if %array \ */\ (yy_c_buf_p) = yy_cp; /* %% [4.0] data tables for the DFA and the user's section 1 definitions go here */ #define YY_NUM_RULES 124 #define YY_END_OF_BUFFER 125 /* This struct is not used in this scanner, but its presence is necessary. */ struct yy_trans_info { flex_int32_t yy_verify; flex_int32_t yy_nxt; }; static yyconst flex_int16_t yy_accept[337] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 125, 123, 28, 29, 29, 60, 121, 46, 69, 47, 67, 122, 34, 35, 44, 42, 31, 43, 40, 45, 105, 32, 33, 54, 51, 56, 50, 69, 119, 36, 123, 37, 48, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 38, 68, 39, 69, 4, 3, 3, 4, 4, 10, 7, 7, 6, 10, 27, 13, 13, 12, 27, 124, 118, 113, 114, 113, 116, 116, 116, 116, 116, 116, 118, 118, 116, 118, 116, 116, 117, 118, 116, 116, 29, 53, 74, 69, 75, 58, 49, 72, 63, 70, 65, 71, 64, 106, 120, 30, 73, 106, 105, 0, 62, 55, 52, 57, 119, 29, 76, 61, 119, 119, 119, 119, 119, 119, 119, 86, 119, 119, 119, 119, 119, 82, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 59, 3, 2, 1, 7, 0, 0, 5, 0, 7, 9, 8, 13, 0, 0, 11, 0, 13, 14, 22, 22, 15, 16, 17, 18, 19, 20, 21, 0, 114, 116, 116, 115, 116, 117, 114, 66, 41, 0, 30, 0, 106, 0, 0, 106, 119, 77, 119, 119, 119, 119, 119, 119, 119, 119, 85, 119, 119, 119, 92, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 0, 0, 23, 23, 25, 0, 0, 106, 119, 119, 119, 119, 81, 119, 83, 119, 119, 96, 119, 119, 119, 109, 119, 119, 119, 119, 119, 119, 119, 119, 119, 103, 107, 119, 119, 119, 24, 26, 0, 106, 119, 119, 88, 119, 119, 110, 119, 108, 119, 119, 119, 119, 119, 119, 98, 119, 119, 119, 119, 119, 119, 119, 84, 93, 119, 119, 119, 119, 94, 119, 119, 119, 119, 100, 119, 87, 99, 90, 119, 119, 119, 80, 119, 119, 119, 97, 119, 119, 101, 119, 79, 91, 95, 89, 78, 104, 111, 112, 119, 119, 102, 0 } ; static yyconst YY_CHAR yy_ec[256] = { 0, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 1, 1, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 20, 20, 20, 21, 21, 21, 21, 22, 22, 23, 24, 25, 26, 27, 28, 29, 30, 30, 30, 30, 30, 30, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 32, 33, 34, 35, 31, 1, 36, 37, 38, 39, 40, 41, 31, 42, 43, 31, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 31, 59, 60, 61, 62, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 } ; static yyconst YY_CHAR yy_meta[63] = { 0, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 3, 1, 1, 1, 1, 1, 1, 1, 3, 3, 1, 1, 1, 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 1, 1, 1, 1 } ; static yyconst flex_uint16_t yy_base[344] = { 0, 0, 0, 60, 62, 64, 69, 74, 79, 0, 0, 112, 0, 539, 540, 540, 540, 535, 511, 540, 510, 527, 508, 523, 540, 540, 540, 66, 69, 540, 70, 83, 72, 157, 509, 540, 63, 505, 67, 540, 501, 0, 540, 96, 540, 150, 142, 478, 133, 480, 137, 148, 157, 146, 478, 55, 472, 485, 471, 150, 476, 480, 540, 461, 540, 540, 540, 540, 517, 500, 504, 540, 540, 514, 203, 207, 540, 540, 513, 213, 244, 540, 540, 540, 540, 512, 488, 540, 505, 498, 496, 493, 491, 485, 85, 481, 194, 477, 0, 219, 470, 540, 540, 540, 540, 540, 540, 540, 540, 540, 540, 540, 487, 540, 207, 211, 540, 0, 540, 217, 223, 239, 540, 540, 540, 540, 0, 500, 540, 540, 464, 462, 455, 459, 451, 446, 458, 0, 443, 445, 448, 441, 443, 0, 441, 451, 432, 442, 446, 442, 447, 435, 200, 198, 435, 438, 426, 430, 427, 434, 540, 540, 540, 540, 540, 265, 300, 540, 270, 473, 540, 540, 540, 306, 312, 540, 275, 472, 540, 262, 266, 540, 540, 540, 540, 540, 540, 540, 304, 540, 540, 540, 540, 457, 0, 470, 540, 272, 307, 0, 320, 310, 331, 339, 315, 432, 0, 431, 434, 416, 423, 422, 426, 420, 412, 0, 417, 414, 416, 419, 414, 407, 402, 411, 402, 401, 399, 399, 397, 398, 397, 408, 407, 410, 400, 360, 366, 268, 540, 358, 369, 380, 361, 392, 407, 398, 175, 0, 401, 0, 397, 399, 0, 387, 383, 385, 0, 399, 398, 390, 392, 380, 379, 386, 389, 364, 0, 0, 367, 349, 358, 540, 540, 388, 391, 344, 342, 0, 345, 339, 0, 347, 0, 323, 336, 337, 314, 312, 320, 0, 314, 308, 311, 291, 295, 282, 281, 0, 0, 266, 259, 262, 262, 0, 260, 250, 236, 235, 0, 232, 0, 0, 0, 219, 221, 213, 0, 202, 178, 159, 0, 162, 142, 0, 135, 0, 0, 0, 0, 0, 0, 0, 0, 143, 69, 0, 540, 413, 416, 419, 422, 68, 66, 425 } ; static yyconst flex_int16_t yy_def[344] = { 0, 336, 1, 337, 337, 338, 338, 339, 339, 340, 340, 336, 11, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 341, 336, 336, 336, 336, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 342, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 343, 336, 336, 336, 336, 336, 336, 336, 336, 341, 336, 336, 336, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 342, 336, 336, 336, 336, 343, 336, 336, 336, 336, 336, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 336, 336, 336, 336, 336, 336, 336, 336, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 336, 336, 336, 336, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 341, 0, 336, 336, 336, 336, 336, 336, 336 } ; static yyconst flex_uint16_t yy_nxt[603] = { 0, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 33, 33, 34, 35, 36, 37, 38, 39, 40, 41, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 41, 52, 41, 41, 41, 53, 54, 55, 56, 57, 58, 59, 60, 41, 61, 41, 41, 62, 63, 64, 65, 67, 68, 67, 68, 72, 73, 194, 74, 126, 72, 73, 69, 74, 69, 77, 78, 70, 108, 70, 77, 78, 110, 79, 116, 112, 105, 123, 79, 117, 109, 125, 105, 111, 113, 75, 118, 102, 127, 114, 75, 115, 115, 115, 149, 80, 335, 150, 191, 190, 80, 82, 83, 84, 85, 86, 82, 87, 88, 87, 87, 82, 82, 82, 89, 90, 82, 91, 92, 87, 82, 82, 82, 93, 82, 94, 95, 96, 82, 97, 98, 98, 82, 99, 82, 100, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 98, 82, 87, 82, 101, 119, 128, 120, 120, 120, 130, 134, 138, 334, 140, 129, 146, 135, 333, 131, 154, 136, 155, 332, 139, 132, 141, 121, 143, 142, 147, 156, 331, 144, 145, 165, 165, 166, 157, 167, 164, 169, 330, 170, 167, 173, 173, 174, 278, 175, 190, 191, 189, 195, 175, 197, 279, 198, 198, 198, 329, 115, 115, 115, 227, 200, 168, 201, 201, 201, 171, 119, 328, 120, 120, 120, 176, 172, 177, 228, 178, 121, 225, 226, 203, 178, 203, 202, 327, 204, 204, 204, 326, 121, 179, 180, 325, 165, 165, 166, 324, 167, 178, 165, 166, 323, 167, 178, 173, 174, 181, 182, 237, 237, 322, 183, 238, 238, 271, 271, 200, 184, 198, 198, 198, 185, 321, 186, 168, 187, 320, 188, 165, 235, 166, 319, 167, 318, 173, 173, 174, 167, 175, 317, 173, 236, 174, 175, 175, 316, 239, 315, 314, 175, 239, 239, 239, 198, 198, 198, 201, 201, 201, 168, 239, 204, 204, 204, 200, 176, 198, 198, 198, 313, 312, 176, 241, 121, 241, 311, 240, 242, 242, 242, 203, 310, 203, 309, 308, 204, 204, 204, 165, 165, 166, 307, 167, 306, 173, 173, 174, 167, 175, 305, 272, 304, 303, 175, 272, 272, 272, 242, 242, 242, 273, 302, 273, 301, 272, 274, 274, 274, 300, 168, 299, 241, 298, 241, 297, 176, 242, 242, 242, 273, 296, 273, 295, 294, 274, 274, 274, 274, 274, 274, 66, 66, 66, 71, 71, 71, 76, 76, 76, 81, 81, 81, 199, 293, 199, 292, 291, 290, 289, 288, 287, 286, 285, 284, 283, 282, 281, 280, 277, 276, 275, 270, 269, 268, 267, 266, 265, 264, 263, 262, 261, 260, 259, 258, 257, 256, 255, 254, 253, 252, 251, 250, 249, 248, 247, 246, 245, 244, 243, 189, 190, 172, 164, 234, 233, 232, 231, 230, 229, 224, 223, 222, 221, 220, 219, 218, 217, 216, 215, 214, 213, 212, 211, 210, 209, 208, 207, 206, 205, 102, 196, 190, 191, 190, 190, 190, 193, 190, 192, 191, 190, 189, 172, 164, 163, 162, 161, 160, 159, 158, 153, 152, 151, 148, 137, 133, 105, 124, 122, 107, 106, 105, 104, 103, 102, 336, 13, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336 } ; static yyconst flex_int16_t yy_chk[603] = { 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 4, 4, 5, 5, 342, 5, 341, 6, 6, 3, 6, 4, 7, 7, 3, 27, 4, 8, 8, 28, 7, 32, 30, 36, 36, 8, 32, 27, 38, 38, 28, 30, 5, 32, 43, 43, 31, 6, 31, 31, 31, 55, 7, 334, 55, 94, 94, 8, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 33, 45, 33, 33, 33, 46, 48, 50, 333, 51, 45, 53, 48, 324, 46, 59, 48, 59, 322, 50, 46, 51, 33, 52, 51, 53, 59, 321, 52, 52, 74, 74, 74, 59, 74, 75, 75, 319, 75, 74, 79, 79, 79, 246, 79, 96, 96, 99, 99, 79, 114, 246, 114, 114, 114, 318, 115, 115, 115, 153, 119, 74, 119, 119, 119, 75, 120, 317, 120, 120, 120, 79, 80, 80, 153, 80, 115, 152, 152, 121, 80, 121, 119, 315, 121, 121, 121, 314, 120, 80, 80, 313, 165, 165, 165, 309, 165, 80, 168, 168, 307, 165, 80, 176, 176, 80, 80, 179, 179, 306, 80, 180, 180, 237, 237, 197, 80, 197, 197, 197, 80, 305, 80, 165, 80, 304, 80, 166, 166, 166, 302, 166, 301, 173, 173, 173, 166, 173, 300, 174, 174, 174, 173, 174, 299, 188, 296, 295, 174, 188, 188, 188, 198, 198, 198, 201, 201, 201, 166, 188, 204, 204, 204, 200, 173, 200, 200, 200, 294, 293, 174, 202, 198, 202, 292, 201, 202, 202, 202, 203, 291, 203, 290, 288, 203, 203, 203, 235, 235, 235, 287, 235, 286, 236, 236, 236, 235, 236, 285, 239, 284, 283, 236, 239, 239, 239, 242, 242, 242, 240, 281, 240, 279, 239, 240, 240, 240, 278, 235, 276, 241, 275, 241, 270, 236, 241, 241, 241, 273, 269, 273, 268, 265, 273, 273, 273, 274, 274, 274, 337, 337, 337, 338, 338, 338, 339, 339, 339, 340, 340, 340, 343, 264, 343, 263, 262, 261, 260, 259, 258, 257, 255, 254, 253, 251, 250, 248, 245, 244, 243, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 223, 222, 221, 220, 219, 218, 217, 216, 214, 213, 212, 211, 210, 209, 208, 207, 205, 195, 193, 177, 169, 159, 158, 157, 156, 155, 154, 151, 150, 149, 148, 147, 146, 145, 144, 142, 141, 140, 139, 138, 136, 135, 134, 133, 132, 131, 130, 127, 112, 100, 97, 95, 93, 92, 91, 90, 89, 88, 86, 85, 78, 73, 70, 69, 68, 63, 61, 60, 58, 57, 56, 54, 49, 47, 40, 37, 34, 23, 22, 21, 20, 18, 17, 13, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336, 336 } ; static yy_state_type yy_last_accepting_state; static char *yy_last_accepting_cpos; extern int yy_flex_debug; int yy_flex_debug = 1; static yyconst flex_int16_t yy_rule_linenum[124] = { 0, 212, 213, 215, 221, 225, 226, 236, 237, 238, 239, 243, 244, 254, 255, 256, 257, 258, 259, 260, 261, 262, 263, 268, 273, 279, 285, 293, 296, 297, 298, 299, 300, 301, 302, 303, 304, 305, 306, 307, 308, 309, 311, 312, 313, 314, 315, 316, 317, 318, 319, 320, 321, 322, 323, 324, 325, 326, 327, 328, 329, 330, 331, 332, 333, 334, 335, 336, 337, 338, 340, 341, 342, 343, 344, 345, 346, 348, 349, 350, 351, 352, 354, 355, 356, 357, 358, 359, 360, 361, 362, 363, 364, 365, 366, 367, 368, 369, 370, 371, 373, 374, 375, 376, 377, 380, 387, 394, 396, 398, 400, 402, 405, 407, 408, 414, 418, 422, 426, 429, 433, 434, 435, 439 } ; /* The intent behind this definition is that it'll catch * any uses of REJECT which flex missed. */ #define REJECT reject_used_but_not_detected #define yymore() yymore_used_but_not_detected #define YY_MORE_ADJ 0 #define YY_RESTORE_YY_MORE_OFFSET char *yytext; #line 1 "camp.l" #line 2 "camp.l" /***** * camp.l * Andy Hammerlindl 2002/06/14 * * The lexical analyzer of the Asymptote language. *****/ #include #include #include #include #include "util.h" #include "modifier.h" #include "exp.h" #include "stm.h" #include "fundec.h" #include "errormsg.h" #include "interact.h" #include "lexical.h" using namespace absyntax; using mem::string; #include "camp.tab.h" #include "opsymbols.h" #define YY_NO_INPUT static void yyunput(int, char *); void (*unused)(int,char *) = yyunput; fileinfo* fi; Int tokPos; Int charPos; //int commentDepth = 0; bool eof; string eofMessage; extern errorstream em; extern "C" int yywrap(void) { charPos=1; return 1; } typedef size_t (*input_f) (char* bif, size_t max_size); input_f yy_input = NULL; void setlexer(input_f input, string filename) { YY_FLUSH_BUFFER; yywrap(); fi = new fileinfo(filename); yy_input = input; tokPos = charPos = 1; eof=false; eofMessage=""; } #define YY_INPUT(buf,result,max_size) {result=yy_input(buf,max_size);} position lexerPos() { position p; p.init(fi, tokPos); return p; } namespace { position here() { return lexerPos(); } void adjust() { tokPos = charPos; charPos += yyleng; yylval.pos = here(); } void savesymbol(symbol name) { adjust(); yylval.ps.pos=yylval.pos; // avoid invoking here() twice yylval.ps.sym=name; } /* For optimization reasons, the operator names are translated into symbols * just once, and can be accessed throughout the code as SYM_PLUS, SYM_DASHES, * etc. Following the Don't Repeat Yourself principle, the mapping from * strings to names is defined only here in camp.l (because we can't produce * lex rules from a C style macro). * The script opsymbols.pl reads this file scanning for rules using DEFSYMBOL * and creates opsymbols.h which defines the names for use in C++ code. */ #define DEFSYMBOL(name) \ savesymbol(name) /* Extra symbols can be added by EXTRASYMBOL */ #define EXTRASYMBOL(chars, codename) /* blank */ EXTRASYMBOL(tuple, SYM_TUPLE); void makesymbol() { assert(strlen(yytext) == (size_t)yyleng); savesymbol(symbol::rawTrans(yytext, yyleng+1)); } void makeopsymbol() { savesymbol(symbol::opTrans(yytext)); } void makemod(trans::modifier mod) { yylval.mod.pos=here(); yylval.mod.val=mod; } void makeperm(trans::permission perm) { yylval.perm.pos=here(); yylval.perm.val=perm; } void newline() { fi->newline(); charPos = tokPos = 1; } void error(void) { em.error(here()); } } // Used by the lexer rules to flag an unexpected end of input. The message is // the error message that should be reported, and may differ if, say the input // ends in the middle of a string or comment. void setEOF(string message) { eof=true; eofMessage=message; } // Called by code outside of the lexer to see if a parse error was caused by // running out of input. bool lexerEOF() { return eof; } // Called by code outside of the lexer when it wants to report the unexpected // eof as an error (instead of looking for more input). void reportEOF() { assert(eof); error(); em << eofMessage; em.sync(); } position stringpos; // The position of the start of the string. string stringbuild; // Stores the string literal as it is read. namespace { void startstring() { adjust(); stringpos = here(); } void append(char c) { stringbuild.push_back(c); yylval.pos = here(); } void getstring(void) { // NOTE: Replace here() with a position at the start of the string. yylval.stre = new stringExp(stringpos, stringbuild); string().swap(stringbuild); } } #line 1016 "lex.yy.cc" #define INITIAL 0 #define lexcomment 1 #define texstring 2 #define cstring 3 #define lexformat 4 #define opname 5 #ifndef YY_NO_UNISTD_H /* Special case for "unistd.h", since it is non-ANSI. We include it way * down here because we want the user's section 1 to have been scanned first. * The user has a chance to override it with an option. */ /* %if-c-only */ #include /* %endif */ /* %if-c++-only */ /* %endif */ #endif #ifndef YY_EXTRA_TYPE #define YY_EXTRA_TYPE void * #endif /* %if-c-only Reentrant structure and macros (non-C++). */ /* %if-reentrant */ /* %if-c-only */ static int yy_init_globals (void ); /* %endif */ /* %if-reentrant */ /* %endif */ /* %endif End reentrant structures and macros. */ /* Accessor methods to globals. These are made visible to non-reentrant scanners for convenience. */ int yylex_destroy (void ); int yyget_debug (void ); void yyset_debug (int debug_flag ); YY_EXTRA_TYPE yyget_extra (void ); void yyset_extra (YY_EXTRA_TYPE user_defined ); FILE *yyget_in (void ); void yyset_in (FILE * _in_str ); FILE *yyget_out (void ); void yyset_out (FILE * _out_str ); yy_size_t yyget_leng (void ); char *yyget_text (void ); int yyget_lineno (void ); void yyset_lineno (int _line_number ); /* %if-bison-bridge */ /* %endif */ /* Macros after this point can all be overridden by user definitions in * section 1. */ #ifndef YY_SKIP_YYWRAP #ifdef __cplusplus extern "C" int yywrap (void ); #else extern int yywrap (void ); #endif #endif /* %not-for-header */ #ifndef YY_NO_UNPUT static void yyunput (int c,char *buf_ptr ); #endif /* %ok-for-header */ /* %endif */ #ifndef yytext_ptr static void yy_flex_strncpy (char *,yyconst char *,int ); #endif #ifdef YY_NEED_STRLEN static int yy_flex_strlen (yyconst char * ); #endif #ifndef YY_NO_INPUT /* %if-c-only Standard (non-C++) definition */ /* %not-for-header */ #ifdef __cplusplus static int yyinput (void ); #else static int input (void ); #endif /* %ok-for-header */ /* %endif */ #endif /* %if-c-only */ /* %endif */ /* Amount of stuff to slurp up with each read. */ #ifndef YY_READ_BUF_SIZE #ifdef __ia64__ /* On IA-64, the buffer size is 16k, not 8k */ #define YY_READ_BUF_SIZE 16384 #else #define YY_READ_BUF_SIZE 8192 #endif /* __ia64__ */ #endif /* Copy whatever the last rule matched to the standard output. */ #ifndef ECHO /* %if-c-only Standard (non-C++) definition */ /* This used to be an fputs(), but since the string might contain NUL's, * we now use fwrite(). */ #define ECHO do { if (fwrite( yytext, yyleng, 1, yyout )) {} } while (0) /* %endif */ /* %if-c++-only C++ definition */ /* %endif */ #endif /* Gets input and stuffs it into "buf". number of characters read, or YY_NULL, * is returned in "result". */ #ifndef YY_INPUT #define YY_INPUT(buf,result,max_size) \ /* %% [5.0] fread()/read() definition of YY_INPUT goes here unless we're doing C++ \ */\ if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \ { \ int c = '*'; \ size_t n; \ for ( n = 0; n < max_size && \ (c = getc( yyin )) != EOF && c != '\n'; ++n ) \ buf[n] = (char) c; \ if ( c == '\n' ) \ buf[n++] = (char) c; \ if ( c == EOF && ferror( yyin ) ) \ YY_FATAL_ERROR( "input in flex scanner failed" ); \ result = n; \ } \ else \ { \ errno=0; \ while ( (result = fread(buf, 1, max_size, yyin))==0 && ferror(yyin)) \ { \ if( errno != EINTR) \ { \ YY_FATAL_ERROR( "input in flex scanner failed" ); \ break; \ } \ errno=0; \ clearerr(yyin); \ } \ }\ \ /* %if-c++-only C++ definition \ */\ /* %endif */ #endif /* No semi-colon after return; correct usage is to write "yyterminate();" - * we don't want an extra ';' after the "return" because that will cause * some compilers to complain about unreachable statements. */ #ifndef yyterminate #define yyterminate() return YY_NULL #endif /* Number of entries by which start-condition stack grows. */ #ifndef YY_START_STACK_INCR #define YY_START_STACK_INCR 25 #endif /* Report a fatal error. */ #ifndef YY_FATAL_ERROR /* %if-c-only */ #define YY_FATAL_ERROR(msg) yy_fatal_error( msg ) /* %endif */ /* %if-c++-only */ /* %endif */ #endif /* %if-tables-serialization structures and prototypes */ /* %not-for-header */ /* %ok-for-header */ /* %not-for-header */ /* %tables-yydmap generated elements */ /* %endif */ /* end tables serialization structures and prototypes */ /* %ok-for-header */ /* Default declaration of generated scanner - a define so the user can * easily add parameters. */ #ifndef YY_DECL #define YY_DECL_IS_OURS 1 /* %if-c-only Standard (non-C++) definition */ extern int yylex (void); #define YY_DECL int yylex (void) /* %endif */ /* %if-c++-only C++ definition */ /* %endif */ #endif /* !YY_DECL */ /* Code executed at the beginning of each rule, after yytext and yyleng * have been set up. */ #ifndef YY_USER_ACTION #define YY_USER_ACTION #endif /* Code executed at the end of each rule. */ #ifndef YY_BREAK #define YY_BREAK /*LINTED*/break; #endif /* %% [6.0] YY_RULE_SETUP definition goes here */ #define YY_RULE_SETUP \ YY_USER_ACTION /* %not-for-header */ /** The main scanner function which does all the work. */ YY_DECL { yy_state_type yy_current_state; char *yy_cp, *yy_bp; int yy_act; if ( !(yy_init) ) { (yy_init) = 1; #ifdef YY_USER_INIT YY_USER_INIT; #endif if ( ! (yy_start) ) (yy_start) = 1; /* first start state */ if ( ! yyin ) /* %if-c-only */ yyin = stdin; /* %endif */ /* %if-c++-only */ /* %endif */ if ( ! yyout ) /* %if-c-only */ yyout = stdout; /* %endif */ /* %if-c++-only */ /* %endif */ if ( ! YY_CURRENT_BUFFER ) { yyensure_buffer_stack (); YY_CURRENT_BUFFER_LVALUE = yy_create_buffer(yyin,YY_BUF_SIZE ); } yy_load_buffer_state( ); } { /* %% [7.0] user's declarations go here */ #line 209 "camp.l" #line 1309 "lex.yy.cc" while ( /*CONSTCOND*/1 ) /* loops until end-of-file is reached */ { /* %% [8.0] yymore()-related code goes here */ yy_cp = (yy_c_buf_p); /* Support of yytext. */ *yy_cp = (yy_hold_char); /* yy_bp points to the position in yy_ch_buf of the start of * the current run. */ yy_bp = yy_cp; /* %% [9.0] code to set up and find next match goes here */ yy_current_state = (yy_start); yy_match: do { YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)] ; if ( yy_accept[yy_current_state] ) { (yy_last_accepting_state) = yy_current_state; (yy_last_accepting_cpos) = yy_cp; } while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) { yy_current_state = (int) yy_def[yy_current_state]; if ( yy_current_state >= 337 ) yy_c = yy_meta[(unsigned int) yy_c]; } yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; ++yy_cp; } while ( yy_base[yy_current_state] != 540 ); yy_find_action: /* %% [10.0] code to find the action number goes here */ yy_act = yy_accept[yy_current_state]; if ( yy_act == 0 ) { /* have to back up */ yy_cp = (yy_last_accepting_cpos); yy_current_state = (yy_last_accepting_state); yy_act = yy_accept[yy_current_state]; } YY_DO_BEFORE_ACTION; /* %% [11.0] code for yylineno update goes here */ do_action: /* This label is used only to access EOF actions. */ /* %% [12.0] debug code goes here */ if ( yy_flex_debug ) { if ( yy_act == 0 ) fprintf( stderr, "--scanner backing up\n" ); else if ( yy_act < 124 ) fprintf( stderr, "--accepting rule at line %ld (\"%s\")\n", (long)yy_rule_linenum[yy_act], yytext ); else if ( yy_act == 124 ) fprintf( stderr, "--accepting default rule (\"%s\")\n", yytext ); else if ( yy_act == 125 ) fprintf( stderr, "--(end of buffer or a NUL)\n" ); else fprintf( stderr, "--EOF (start condition %d)\n", YY_START ); } switch ( yy_act ) { /* beginning of action switch */ /* %% [13.0] actions go here */ case 0: /* must back up */ /* undo the effects of YY_DO_BEFORE_ACTION */ *yy_cp = (yy_hold_char); yy_cp = (yy_last_accepting_cpos); yy_current_state = (yy_last_accepting_state); goto yy_find_action; case 1: YY_RULE_SETUP #line 212 "camp.l" {adjust(); /*commentDepth++;*/} YY_BREAK case 2: YY_RULE_SETUP #line 213 "camp.l" {adjust(); /*commentDepth--;*/ /*if (commentDepth == 0)*/ BEGIN INITIAL; } YY_BREAK case 3: /* rule 3 can match eol */ YY_RULE_SETUP #line 215 "camp.l" {adjust(); newline(); continue; } YY_BREAK case YY_STATE_EOF(lexcomment): #line 216 "camp.l" {adjust(); setEOF("comment not terminated"); BEGIN INITIAL; return GARBAGE; } YY_BREAK case 4: YY_RULE_SETUP #line 221 "camp.l" {adjust(); continue; } YY_BREAK case 5: /* rule 5 can match eol */ *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ YY_LINENO_REWIND_TO(yy_bp + 1); (yy_c_buf_p) = yy_cp = yy_bp + 1; YY_DO_BEFORE_ACTION; /* set up yytext again */ YY_RULE_SETUP #line 225 "camp.l" {adjust(); BEGIN INITIAL;} YY_BREAK case 6: YY_RULE_SETUP #line 226 "camp.l" {adjust(); BEGIN INITIAL; getstring(); return STRING; } YY_BREAK case YY_STATE_EOF(texstring): #line 230 "camp.l" {adjust(); setEOF("string not terminated"); BEGIN INITIAL; getstring(); return GARBAGE; } YY_BREAK case 7: /* rule 7 can match eol */ YY_RULE_SETUP #line 236 "camp.l" {adjust(); newline(); append('\n'); continue; } YY_BREAK case 8: YY_RULE_SETUP #line 237 "camp.l" {adjust(); append('\\'); append('\\'); continue; } YY_BREAK case 9: YY_RULE_SETUP #line 238 "camp.l" {adjust(); append('\"'); continue; } YY_BREAK case 10: YY_RULE_SETUP #line 239 "camp.l" {adjust(); append(*yytext); } YY_BREAK case 11: /* rule 11 can match eol */ *yy_cp = (yy_hold_char); /* undo effects of setting up yytext */ YY_LINENO_REWIND_TO(yy_bp + 1); (yy_c_buf_p) = yy_cp = yy_bp + 1; YY_DO_BEFORE_ACTION; /* set up yytext again */ YY_RULE_SETUP #line 243 "camp.l" {adjust(); BEGIN INITIAL;} YY_BREAK case 12: YY_RULE_SETUP #line 244 "camp.l" {adjust(); BEGIN INITIAL; getstring(); return STRING; } YY_BREAK case YY_STATE_EOF(cstring): #line 248 "camp.l" {adjust(); setEOF("string not terminated"); BEGIN INITIAL; getstring(); return GARBAGE; } YY_BREAK case 13: /* rule 13 can match eol */ YY_RULE_SETUP #line 254 "camp.l" {adjust(); newline(); append('\n'); continue; } YY_BREAK case 14: YY_RULE_SETUP #line 255 "camp.l" {adjust(); append(yytext[1]); continue; } YY_BREAK case 15: YY_RULE_SETUP #line 256 "camp.l" {adjust(); append('\a'); continue; } YY_BREAK case 16: YY_RULE_SETUP #line 257 "camp.l" {adjust(); append('\b'); continue; } YY_BREAK case 17: YY_RULE_SETUP #line 258 "camp.l" {adjust(); append('\f'); continue; } YY_BREAK case 18: YY_RULE_SETUP #line 259 "camp.l" {adjust(); append('\n'); continue; } YY_BREAK case 19: YY_RULE_SETUP #line 260 "camp.l" {adjust(); append('\r'); continue; } YY_BREAK case 20: YY_RULE_SETUP #line 261 "camp.l" {adjust(); append('\t'); continue; } YY_BREAK case 21: YY_RULE_SETUP #line 262 "camp.l" {adjust(); append('\v'); continue; } YY_BREAK case 22: YY_RULE_SETUP #line 263 "camp.l" {adjust(); char x=(char)(yytext[1]-'0'); append(x); continue; } YY_BREAK case 23: YY_RULE_SETUP #line 268 "camp.l" {adjust(); char x=(char)((yytext[1]-'0')*8+yytext[2]-'0'); append(x); continue; } YY_BREAK case 24: YY_RULE_SETUP #line 273 "camp.l" {adjust(); char x=(char)((yytext[1]-'0')*64+(yytext[2]-'0')*8 +yytext[3]-'0'); append(x); continue; } YY_BREAK case 25: YY_RULE_SETUP #line 279 "camp.l" {adjust(); char x=(char) (yytext[2] <= '9' ? yytext[2]-'0' : 10+yytext[2]-'A'); append(x); continue; } YY_BREAK case 26: YY_RULE_SETUP #line 285 "camp.l" {adjust(); char x=(char) ((yytext[2] <= '9' ? yytext[2]-'0' : 10+yytext[2]-'A')*16 +(yytext[3] <= '9' ? yytext[3]-'0' : 10+yytext[3]-'A')); append(x); continue; } YY_BREAK case 27: YY_RULE_SETUP #line 293 "camp.l" {adjust(); append(*yytext); } YY_BREAK case 28: YY_RULE_SETUP #line 296 "camp.l" {adjust(); continue;} YY_BREAK case 29: /* rule 29 can match eol */ YY_RULE_SETUP #line 297 "camp.l" {adjust(); newline(); continue;} YY_BREAK case 30: YY_RULE_SETUP #line 298 "camp.l" {adjust(); continue;} YY_BREAK case 31: YY_RULE_SETUP #line 299 "camp.l" {adjust(); return ','; } YY_BREAK case 32: YY_RULE_SETUP #line 300 "camp.l" {adjust(); return ':'; } YY_BREAK case 33: YY_RULE_SETUP #line 301 "camp.l" {adjust(); return ';'; } YY_BREAK case 34: YY_RULE_SETUP #line 302 "camp.l" {adjust(); return '('; } YY_BREAK case 35: YY_RULE_SETUP #line 303 "camp.l" {adjust(); return ')'; } YY_BREAK case 36: YY_RULE_SETUP #line 304 "camp.l" {adjust(); return '['; } YY_BREAK case 37: YY_RULE_SETUP #line 305 "camp.l" {adjust(); return ']'; } YY_BREAK case 38: YY_RULE_SETUP #line 306 "camp.l" {adjust(); return '{'; } YY_BREAK case 39: YY_RULE_SETUP #line 307 "camp.l" {adjust(); return '}'; } YY_BREAK case 40: YY_RULE_SETUP #line 308 "camp.l" {adjust(); return '.'; } YY_BREAK case 41: YY_RULE_SETUP #line 309 "camp.l" {adjust(); return ELLIPSIS; } YY_BREAK case 42: YY_RULE_SETUP #line 311 "camp.l" {DEFSYMBOL(SYM_PLUS); return '+'; } YY_BREAK case 43: YY_RULE_SETUP #line 312 "camp.l" {DEFSYMBOL(SYM_MINUS); return '-'; } YY_BREAK case 44: YY_RULE_SETUP #line 313 "camp.l" {DEFSYMBOL(SYM_TIMES); return '*'; } YY_BREAK case 45: YY_RULE_SETUP #line 314 "camp.l" {DEFSYMBOL(SYM_DIVIDE); return '/'; } YY_BREAK case 46: YY_RULE_SETUP #line 315 "camp.l" {DEFSYMBOL(SYM_QUOTIENT); return '#'; } YY_BREAK case 47: YY_RULE_SETUP #line 316 "camp.l" {DEFSYMBOL(SYM_MOD); return '%'; } YY_BREAK case 48: YY_RULE_SETUP #line 317 "camp.l" {DEFSYMBOL(SYM_CARET); return '^'; } YY_BREAK case 49: YY_RULE_SETUP #line 318 "camp.l" {savesymbol(SYM_CARET); return '^'; } YY_BREAK case 50: YY_RULE_SETUP #line 319 "camp.l" {adjust(); return '?'; } YY_BREAK case 51: YY_RULE_SETUP #line 320 "camp.l" {adjust(); return ASSIGN; } YY_BREAK case 52: YY_RULE_SETUP #line 321 "camp.l" {DEFSYMBOL(SYM_EQ); return EQ; } YY_BREAK case 53: YY_RULE_SETUP #line 322 "camp.l" {DEFSYMBOL(SYM_NEQ); return NEQ; } YY_BREAK case 54: YY_RULE_SETUP #line 323 "camp.l" {DEFSYMBOL(SYM_LT); return LT; } YY_BREAK case 55: YY_RULE_SETUP #line 324 "camp.l" {DEFSYMBOL(SYM_LE); return LE; } YY_BREAK case 56: YY_RULE_SETUP #line 325 "camp.l" {DEFSYMBOL(SYM_GT); return GT; } YY_BREAK case 57: YY_RULE_SETUP #line 326 "camp.l" {DEFSYMBOL(SYM_GE); return GE; } YY_BREAK case 58: YY_RULE_SETUP #line 327 "camp.l" {DEFSYMBOL(SYM_CAND); return CAND; } YY_BREAK case 59: YY_RULE_SETUP #line 328 "camp.l" {DEFSYMBOL(SYM_COR); return COR; } YY_BREAK case 60: YY_RULE_SETUP #line 329 "camp.l" {DEFSYMBOL(SYM_LOGNOT); return OPERATOR; } YY_BREAK case 61: YY_RULE_SETUP #line 330 "camp.l" {DEFSYMBOL(SYM_CARETS); return CARETS; } YY_BREAK case 62: YY_RULE_SETUP #line 331 "camp.l" {DEFSYMBOL(SYM_COLONS); return COLONS; } YY_BREAK case 63: YY_RULE_SETUP #line 332 "camp.l" {DEFSYMBOL(SYM_INCR); return INCR; } YY_BREAK case 64: YY_RULE_SETUP #line 333 "camp.l" {DEFSYMBOL(SYM_DOTS); return DOTS; } YY_BREAK case 65: YY_RULE_SETUP #line 334 "camp.l" {DEFSYMBOL(SYM_DASHES); return DASHES; } YY_BREAK case 66: YY_RULE_SETUP #line 335 "camp.l" {DEFSYMBOL(SYM_LONGDASH); return LONGDASH; } YY_BREAK case 67: YY_RULE_SETUP #line 336 "camp.l" {DEFSYMBOL(SYM_AMPERSAND); return AMPERSAND; } YY_BREAK case 68: YY_RULE_SETUP #line 337 "camp.l" {DEFSYMBOL(SYM_BAR); return BAR; } YY_BREAK case 69: YY_RULE_SETUP #line 338 "camp.l" {makeopsymbol(); return OPERATOR; } YY_BREAK case 70: YY_RULE_SETUP #line 340 "camp.l" {savesymbol(SYM_PLUS); return SELFOP; } YY_BREAK case 71: YY_RULE_SETUP #line 341 "camp.l" {savesymbol(SYM_MINUS); return SELFOP; } YY_BREAK case 72: YY_RULE_SETUP #line 342 "camp.l" {savesymbol(SYM_TIMES); return SELFOP; } YY_BREAK case 73: YY_RULE_SETUP #line 343 "camp.l" {savesymbol(SYM_DIVIDE); return SELFOP; } YY_BREAK case 74: YY_RULE_SETUP #line 344 "camp.l" {savesymbol(SYM_QUOTIENT); return SELFOP; } YY_BREAK case 75: YY_RULE_SETUP #line 345 "camp.l" {savesymbol(SYM_MOD); return SELFOP; } YY_BREAK case 76: YY_RULE_SETUP #line 346 "camp.l" {savesymbol(SYM_CARET); return SELFOP; } YY_BREAK case 77: YY_RULE_SETUP #line 348 "camp.l" {adjust(); return AND; } YY_BREAK case 78: YY_RULE_SETUP #line 349 "camp.l" {DEFSYMBOL(SYM_CONTROLS); return CONTROLS; } YY_BREAK case 79: YY_RULE_SETUP #line 350 "camp.l" {DEFSYMBOL(SYM_TENSION); return TENSION; } YY_BREAK case 80: YY_RULE_SETUP #line 351 "camp.l" {DEFSYMBOL(SYM_ATLEAST); return ATLEAST; } YY_BREAK case 81: YY_RULE_SETUP #line 352 "camp.l" {DEFSYMBOL(SYM_CURL); return CURL; } YY_BREAK case 82: YY_RULE_SETUP #line 354 "camp.l" {adjust(); return IF; } YY_BREAK case 83: YY_RULE_SETUP #line 355 "camp.l" {adjust(); return ELSE; } YY_BREAK case 84: YY_RULE_SETUP #line 356 "camp.l" {adjust(); return WHILE; } YY_BREAK case 85: YY_RULE_SETUP #line 357 "camp.l" {adjust(); return FOR; } YY_BREAK case 86: YY_RULE_SETUP #line 358 "camp.l" {adjust(); return DO; } YY_BREAK case 87: YY_RULE_SETUP #line 359 "camp.l" {adjust(); return RETURN_; } YY_BREAK case 88: YY_RULE_SETUP #line 360 "camp.l" {adjust(); return BREAK; } YY_BREAK case 89: YY_RULE_SETUP #line 361 "camp.l" {adjust(); return CONTINUE; } YY_BREAK case 90: YY_RULE_SETUP #line 362 "camp.l" {adjust(); return STRUCT; } YY_BREAK case 91: YY_RULE_SETUP #line 363 "camp.l" {adjust(); return TYPEDEF; } YY_BREAK case 92: YY_RULE_SETUP #line 364 "camp.l" {adjust(); return NEW; } YY_BREAK case 93: YY_RULE_SETUP #line 365 "camp.l" {adjust(); return ACCESS; } YY_BREAK case 94: YY_RULE_SETUP #line 366 "camp.l" {adjust(); return IMPORT; } YY_BREAK case 95: YY_RULE_SETUP #line 367 "camp.l" {adjust(); return UNRAVEL; } YY_BREAK case 96: YY_RULE_SETUP #line 368 "camp.l" {adjust(); return FROM; } YY_BREAK case 97: YY_RULE_SETUP #line 369 "camp.l" {adjust(); return INCLUDE; } YY_BREAK case 98: YY_RULE_SETUP #line 370 "camp.l" {adjust(); return QUOTE; } YY_BREAK case 99: YY_RULE_SETUP #line 371 "camp.l" {adjust(); makemod(trans::EXPLICIT_STATIC); return MODIFIER; } YY_BREAK case 100: YY_RULE_SETUP #line 373 "camp.l" {adjust(); makeperm(trans::PUBLIC); return PERM; } YY_BREAK case 101: YY_RULE_SETUP #line 374 "camp.l" {adjust(); makeperm(trans::PRIVATE); return PERM; } YY_BREAK case 102: YY_RULE_SETUP #line 375 "camp.l" {adjust(); makeperm(trans::RESTRICTED); return PERM; } YY_BREAK case 103: YY_RULE_SETUP #line 376 "camp.l" {adjust(); return THIS; } YY_BREAK case 104: YY_RULE_SETUP #line 377 "camp.l" {adjust(); return EXPLICIT; } YY_BREAK case 105: YY_RULE_SETUP #line 380 "camp.l" try { adjust(); yylval.e= new intExp(here(), lexical::cast(yytext)); } catch (lexical::bad_cast&) { error(); em << "invalid integer"; yylval.e= new intExp(here(), 0); } return LIT; YY_BREAK case 106: YY_RULE_SETUP #line 387 "camp.l" try { adjust(); yylval.e= new realExp(here(), lexical::cast(yytext)); } catch (lexical::bad_cast&) { error(); em << "invalid real"; yylval.e= new realExp(here(), 0); } return LIT; YY_BREAK case 107: YY_RULE_SETUP #line 394 "camp.l" { adjust(); yylval.e= new booleanExp(here(), true); return LIT; } YY_BREAK case 108: YY_RULE_SETUP #line 396 "camp.l" { adjust(); yylval.e= new booleanExp(here(), false); return LIT; } YY_BREAK case 109: YY_RULE_SETUP #line 398 "camp.l" { adjust(); yylval.e= new nullExp(here()); return LIT; } YY_BREAK case 110: YY_RULE_SETUP #line 400 "camp.l" { adjust(); yylval.e= new cycleExp(here()); return LIT; } YY_BREAK case 111: YY_RULE_SETUP #line 402 "camp.l" { adjust(); yylval.e= new newPictureExp(here()); return LIT; } YY_BREAK case 112: YY_RULE_SETUP #line 405 "camp.l" {adjust(); BEGIN opname; } YY_BREAK case 113: YY_RULE_SETUP #line 407 "camp.l" {adjust(); continue;} YY_BREAK case 114: /* rule 114 can match eol */ YY_RULE_SETUP #line 408 "camp.l" {adjust(); newline(); continue;} YY_BREAK case YY_STATE_EOF(opname): #line 409 "camp.l" {adjust(); setEOF("missing operator name"); BEGIN INITIAL; return GARBAGE; } YY_BREAK case 115: YY_RULE_SETUP #line 414 "camp.l" { savesymbol(SYM_CARET); BEGIN INITIAL; return ID; } YY_BREAK case 116: YY_RULE_SETUP #line 418 "camp.l" { makeopsymbol(); BEGIN INITIAL; return ID;} YY_BREAK case 117: YY_RULE_SETUP #line 422 "camp.l" { makeopsymbol(); BEGIN INITIAL; return ID; } YY_BREAK case 118: YY_RULE_SETUP #line 426 "camp.l" {} YY_BREAK case 119: YY_RULE_SETUP #line 429 "camp.l" { makesymbol(); return ID; } YY_BREAK case 120: YY_RULE_SETUP #line 433 "camp.l" {adjust(); /*commentDepth = 1;*/ BEGIN lexcomment; } YY_BREAK case 121: YY_RULE_SETUP #line 434 "camp.l" {startstring(); BEGIN texstring; } YY_BREAK case 122: YY_RULE_SETUP #line 435 "camp.l" {startstring(); BEGIN cstring; } YY_BREAK case YY_STATE_EOF(INITIAL): case YY_STATE_EOF(lexformat): #line 437 "camp.l" { setEOF("unexpected end of input"); yyterminate(); } YY_BREAK case 123: YY_RULE_SETUP #line 439 "camp.l" {adjust(); error(); em << "invalid token"; if (isgraph(yytext[0])) em << " '" << yytext[0] << "'"; } YY_BREAK case 124: YY_RULE_SETUP #line 445 "camp.l" ECHO; YY_BREAK #line 2136 "lex.yy.cc" case YY_END_OF_BUFFER: { /* Amount of text matched not including the EOB char. */ int yy_amount_of_matched_text = (int) (yy_cp - (yytext_ptr)) - 1; /* Undo the effects of YY_DO_BEFORE_ACTION. */ *yy_cp = (yy_hold_char); YY_RESTORE_YY_MORE_OFFSET if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW ) { /* We're scanning a new file or input source. It's * possible that this happened because the user * just pointed yyin at a new source and called * yylex(). If so, then we have to assure * consistency between YY_CURRENT_BUFFER and our * globals. Here is the right place to do so, because * this is the first action (other than possibly a * back-up) that will match for the new input source. */ (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; /* %if-c-only */ YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin; /* %endif */ /* %if-c++-only */ /* %endif */ YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL; } /* Note that here we test for yy_c_buf_p "<=" to the position * of the first EOB in the buffer, since yy_c_buf_p will * already have been incremented past the NUL character * (since all states make transitions on EOB to the * end-of-buffer state). Contrast this with the test * in input(). */ if ( (yy_c_buf_p) <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] ) { /* This was really a NUL. */ yy_state_type yy_next_state; (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text; yy_current_state = yy_get_previous_state( ); /* Okay, we're now positioned to make the NUL * transition. We couldn't have * yy_get_previous_state() go ahead and do it * for us because it doesn't know how to deal * with the possibility of jamming (and we don't * want to build jamming into it because then it * will run more slowly). */ yy_next_state = yy_try_NUL_trans( yy_current_state ); yy_bp = (yytext_ptr) + YY_MORE_ADJ; if ( yy_next_state ) { /* Consume the NUL. */ yy_cp = ++(yy_c_buf_p); yy_current_state = yy_next_state; goto yy_match; } else { /* %% [14.0] code to do back-up for compressed tables and set up yy_cp goes here */ yy_cp = (yy_c_buf_p); goto yy_find_action; } } else switch ( yy_get_next_buffer( ) ) { case EOB_ACT_END_OF_FILE: { (yy_did_buffer_switch_on_eof) = 0; if ( yywrap( ) ) { /* Note: because we've taken care in * yy_get_next_buffer() to have set up * yytext, we can now set up * yy_c_buf_p so that if some total * hoser (like flex itself) wants to * call the scanner after we return the * YY_NULL, it'll still work - another * YY_NULL will get returned. */ (yy_c_buf_p) = (yytext_ptr) + YY_MORE_ADJ; yy_act = YY_STATE_EOF(YY_START); goto do_action; } else { if ( ! (yy_did_buffer_switch_on_eof) ) YY_NEW_FILE; } break; } case EOB_ACT_CONTINUE_SCAN: (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text; yy_current_state = yy_get_previous_state( ); yy_cp = (yy_c_buf_p); yy_bp = (yytext_ptr) + YY_MORE_ADJ; goto yy_match; case EOB_ACT_LAST_MATCH: (yy_c_buf_p) = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)]; yy_current_state = yy_get_previous_state( ); yy_cp = (yy_c_buf_p); yy_bp = (yytext_ptr) + YY_MORE_ADJ; goto yy_find_action; } break; } default: YY_FATAL_ERROR( "fatal flex scanner internal error--no action found" ); } /* end of action switch */ } /* end of scanning one token */ } /* end of user's declarations */ } /* end of yylex */ /* %ok-for-header */ /* %if-c++-only */ /* %not-for-header */ /* %ok-for-header */ /* %endif */ /* yy_get_next_buffer - try to read in a new buffer * * Returns a code representing an action: * EOB_ACT_LAST_MATCH - * EOB_ACT_CONTINUE_SCAN - continue scanning from current position * EOB_ACT_END_OF_FILE - end of file */ /* %if-c-only */ static int yy_get_next_buffer (void) /* %endif */ /* %if-c++-only */ /* %endif */ { char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf; char *source = (yytext_ptr); yy_size_t number_to_move, i; int ret_val; if ( (yy_c_buf_p) > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] ) YY_FATAL_ERROR( "fatal flex scanner internal error--end of buffer missed" ); if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 ) { /* Don't try to fill the buffer, so this is an EOF. */ if ( (yy_c_buf_p) - (yytext_ptr) - YY_MORE_ADJ == 1 ) { /* We matched a single character, the EOB, so * treat this as a final EOF. */ return EOB_ACT_END_OF_FILE; } else { /* We matched some text prior to the EOB, first * process it. */ return EOB_ACT_LAST_MATCH; } } /* Try to read more data. */ /* First move last chars to start of buffer. */ number_to_move = (yy_size_t) ((yy_c_buf_p) - (yytext_ptr)) - 1; for ( i = 0; i < number_to_move; ++i ) *(dest++) = *(source++); if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING ) /* don't do the read, it's not guaranteed to return an EOF, * just force an EOF */ YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars) = 0; else { int num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1; while ( num_to_read <= 0 ) { /* Not enough room in the buffer - grow it. */ /* just a shorter name for the current buffer */ YY_BUFFER_STATE b = YY_CURRENT_BUFFER_LVALUE; int yy_c_buf_p_offset = (int) ((yy_c_buf_p) - b->yy_ch_buf); if ( b->yy_is_our_buffer ) { yy_size_t new_size = b->yy_buf_size * 2; if ( new_size <= 0 ) b->yy_buf_size += b->yy_buf_size / 8; else b->yy_buf_size *= 2; b->yy_ch_buf = (char *) /* Include room in for 2 EOB chars. */ yyrealloc((void *) b->yy_ch_buf,b->yy_buf_size + 2 ); } else /* Can't grow it, we don't own it. */ b->yy_ch_buf = 0; if ( ! b->yy_ch_buf ) YY_FATAL_ERROR( "fatal error - scanner input buffer overflow" ); (yy_c_buf_p) = &b->yy_ch_buf[yy_c_buf_p_offset]; num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1; } if ( num_to_read > YY_READ_BUF_SIZE ) num_to_read = YY_READ_BUF_SIZE; /* Read in more data. */ YY_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]), (yy_n_chars), num_to_read ); YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars); } if ( (yy_n_chars) == 0 ) { if ( number_to_move == YY_MORE_ADJ ) { ret_val = EOB_ACT_END_OF_FILE; yyrestart(yyin ); } else { ret_val = EOB_ACT_LAST_MATCH; YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_EOF_PENDING; } } else ret_val = EOB_ACT_CONTINUE_SCAN; if ((yy_size_t) ((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) { /* Extend the array by 50%, plus the number we really need. */ yy_size_t new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1); YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) yyrealloc((void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf,new_size ); if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf ) YY_FATAL_ERROR( "out of dynamic memory in yy_get_next_buffer()" ); } (yy_n_chars) += number_to_move; YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] = YY_END_OF_BUFFER_CHAR; YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] = YY_END_OF_BUFFER_CHAR; (yytext_ptr) = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0]; return ret_val; } /* yy_get_previous_state - get the state just before the EOB char was reached */ /* %if-c-only */ /* %not-for-header */ static yy_state_type yy_get_previous_state (void) /* %endif */ /* %if-c++-only */ /* %endif */ { yy_state_type yy_current_state; char *yy_cp; /* %% [15.0] code to get the start state into yy_current_state goes here */ yy_current_state = (yy_start); for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp ) { /* %% [16.0] code to find the next state goes here */ YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1); if ( yy_accept[yy_current_state] ) { (yy_last_accepting_state) = yy_current_state; (yy_last_accepting_cpos) = yy_cp; } while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) { yy_current_state = (int) yy_def[yy_current_state]; if ( yy_current_state >= 337 ) yy_c = yy_meta[(unsigned int) yy_c]; } yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; } return yy_current_state; } /* yy_try_NUL_trans - try to make a transition on the NUL character * * synopsis * next_state = yy_try_NUL_trans( current_state ); */ /* %if-c-only */ static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state ) /* %endif */ /* %if-c++-only */ /* %endif */ { int yy_is_jam; /* %% [17.0] code to find the next state, and perhaps do backing up, goes here */ char *yy_cp = (yy_c_buf_p); YY_CHAR yy_c = 1; if ( yy_accept[yy_current_state] ) { (yy_last_accepting_state) = yy_current_state; (yy_last_accepting_cpos) = yy_cp; } while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) { yy_current_state = (int) yy_def[yy_current_state]; if ( yy_current_state >= 337 ) yy_c = yy_meta[(unsigned int) yy_c]; } yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; yy_is_jam = (yy_current_state == 336); return yy_is_jam ? 0 : yy_current_state; } #ifndef YY_NO_UNPUT /* %if-c-only */ static void yyunput (int c, char * yy_bp ) /* %endif */ /* %if-c++-only */ /* %endif */ { char *yy_cp; yy_cp = (yy_c_buf_p); /* undo effects of setting up yytext */ *yy_cp = (yy_hold_char); if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 ) { /* need to shift things up to make room */ /* +2 for EOB chars. */ yy_size_t number_to_move = (yy_n_chars) + 2; char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[ YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2]; char *source = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]; while ( source > YY_CURRENT_BUFFER_LVALUE->yy_ch_buf ) *--dest = *--source; yy_cp += (int) (dest - source); yy_bp += (int) (dest - source); YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_buf_size; if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 ) YY_FATAL_ERROR( "flex scanner push-back overflow" ); } *--yy_cp = (char) c; /* %% [18.0] update yylineno here */ (yytext_ptr) = yy_bp; (yy_hold_char) = *yy_cp; (yy_c_buf_p) = yy_cp; } /* %if-c-only */ /* %endif */ #endif /* %if-c-only */ #ifndef YY_NO_INPUT #ifdef __cplusplus static int yyinput (void) #else static int input (void) #endif /* %endif */ /* %if-c++-only */ /* %endif */ { int c; *(yy_c_buf_p) = (yy_hold_char); if ( *(yy_c_buf_p) == YY_END_OF_BUFFER_CHAR ) { /* yy_c_buf_p now points to the character we want to return. * If this occurs *before* the EOB characters, then it's a * valid NUL; if not, then we've hit the end of the buffer. */ if ( (yy_c_buf_p) < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] ) /* This was really a NUL. */ *(yy_c_buf_p) = '\0'; else { /* need more input */ yy_size_t offset = (yy_c_buf_p) - (yytext_ptr); ++(yy_c_buf_p); switch ( yy_get_next_buffer( ) ) { case EOB_ACT_LAST_MATCH: /* This happens because yy_g_n_b() * sees that we've accumulated a * token and flags that we need to * try matching the token before * proceeding. But for input(), * there's no matching to consider. * So convert the EOB_ACT_LAST_MATCH * to EOB_ACT_END_OF_FILE. */ /* Reset buffer status. */ yyrestart(yyin ); /*FALLTHROUGH*/ case EOB_ACT_END_OF_FILE: { if ( yywrap( ) ) return EOF; if ( ! (yy_did_buffer_switch_on_eof) ) YY_NEW_FILE; #ifdef __cplusplus return yyinput(); #else return input(); #endif } case EOB_ACT_CONTINUE_SCAN: (yy_c_buf_p) = (yytext_ptr) + offset; break; } } } c = *(unsigned char *) (yy_c_buf_p); /* cast for 8-bit char's */ *(yy_c_buf_p) = '\0'; /* preserve yytext */ (yy_hold_char) = *++(yy_c_buf_p); /* %% [19.0] update BOL and yylineno */ return c; } /* %if-c-only */ #endif /* ifndef YY_NO_INPUT */ /* %endif */ /** Immediately switch to a different input stream. * @param input_file A readable stream. * * @note This function does not reset the start condition to @c INITIAL . */ /* %if-c-only */ void yyrestart (FILE * input_file ) /* %endif */ /* %if-c++-only */ /* %endif */ { if ( ! YY_CURRENT_BUFFER ){ yyensure_buffer_stack (); YY_CURRENT_BUFFER_LVALUE = yy_create_buffer(yyin,YY_BUF_SIZE ); } yy_init_buffer(YY_CURRENT_BUFFER,input_file ); yy_load_buffer_state( ); } /* %if-c++-only */ /* %endif */ /** Switch to a different input buffer. * @param new_buffer The new input buffer. * */ /* %if-c-only */ void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer ) /* %endif */ /* %if-c++-only */ /* %endif */ { /* TODO. We should be able to replace this entire function body * with * yypop_buffer_state(); * yypush_buffer_state(new_buffer); */ yyensure_buffer_stack (); if ( YY_CURRENT_BUFFER == new_buffer ) return; if ( YY_CURRENT_BUFFER ) { /* Flush out information for old buffer. */ *(yy_c_buf_p) = (yy_hold_char); YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p); YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars); } YY_CURRENT_BUFFER_LVALUE = new_buffer; yy_load_buffer_state( ); /* We don't actually know whether we did this switch during * EOF (yywrap()) processing, but the only time this flag * is looked at is after yywrap() is called, so it's safe * to go ahead and always set it. */ (yy_did_buffer_switch_on_eof) = 1; } /* %if-c-only */ static void yy_load_buffer_state (void) /* %endif */ /* %if-c++-only */ /* %endif */ { (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos; /* %if-c-only */ yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file; /* %endif */ /* %if-c++-only */ /* %endif */ (yy_hold_char) = *(yy_c_buf_p); } /** Allocate and initialize an input buffer state. * @param file A readable stream. * @param size The character buffer size in bytes. When in doubt, use @c YY_BUF_SIZE. * * @return the allocated buffer state. */ /* %if-c-only */ YY_BUFFER_STATE yy_create_buffer (FILE * file, int size ) /* %endif */ /* %if-c++-only */ /* %endif */ { YY_BUFFER_STATE b; b = (YY_BUFFER_STATE) yyalloc(sizeof( struct yy_buffer_state ) ); if ( ! b ) YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" ); b->yy_buf_size = (yy_size_t)size; /* yy_ch_buf has to be 2 characters longer than the size given because * we need to put in 2 end-of-buffer characters. */ b->yy_ch_buf = (char *) yyalloc(b->yy_buf_size + 2 ); if ( ! b->yy_ch_buf ) YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" ); b->yy_is_our_buffer = 1; yy_init_buffer(b,file ); return b; } /* %if-c++-only */ /* %endif */ /** Destroy the buffer. * @param b a buffer created with yy_create_buffer() * */ /* %if-c-only */ void yy_delete_buffer (YY_BUFFER_STATE b ) /* %endif */ /* %if-c++-only */ /* %endif */ { if ( ! b ) return; if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */ YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0; if ( b->yy_is_our_buffer ) yyfree((void *) b->yy_ch_buf ); yyfree((void *) b ); } /* Initializes or reinitializes a buffer. * This function is sometimes called more than once on the same buffer, * such as during a yyrestart() or at EOF. */ /* %if-c-only */ static void yy_init_buffer (YY_BUFFER_STATE b, FILE * file ) /* %endif */ /* %if-c++-only */ /* %endif */ { int oerrno = errno; yy_flush_buffer(b ); /* %if-c-only */ b->yy_input_file = file; /* %endif */ /* %if-c++-only */ /* %endif */ b->yy_fill_buffer = 1; /* If b is the current buffer, then yy_init_buffer was _probably_ * called from yyrestart() or through yy_get_next_buffer. * In that case, we don't want to reset the lineno or column. */ if (b != YY_CURRENT_BUFFER){ b->yy_bs_lineno = 1; b->yy_bs_column = 0; } /* %if-c-only */ b->yy_is_interactive = file ? (isatty( fileno(file) ) > 0) : 0; /* %endif */ /* %if-c++-only */ /* %endif */ errno = oerrno; } /** Discard all buffered characters. On the next scan, YY_INPUT will be called. * @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER. * */ /* %if-c-only */ void yy_flush_buffer (YY_BUFFER_STATE b ) /* %endif */ /* %if-c++-only */ /* %endif */ { if ( ! b ) return; b->yy_n_chars = 0; /* We always need two end-of-buffer characters. The first causes * a transition to the end-of-buffer state. The second causes * a jam in that state. */ b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR; b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR; b->yy_buf_pos = &b->yy_ch_buf[0]; b->yy_at_bol = 1; b->yy_buffer_status = YY_BUFFER_NEW; if ( b == YY_CURRENT_BUFFER ) yy_load_buffer_state( ); } /* %if-c-or-c++ */ /** Pushes the new state onto the stack. The new state becomes * the current state. This function will allocate the stack * if necessary. * @param new_buffer The new state. * */ /* %if-c-only */ void yypush_buffer_state (YY_BUFFER_STATE new_buffer ) /* %endif */ /* %if-c++-only */ /* %endif */ { if (new_buffer == NULL) return; yyensure_buffer_stack(); /* This block is copied from yy_switch_to_buffer. */ if ( YY_CURRENT_BUFFER ) { /* Flush out information for old buffer. */ *(yy_c_buf_p) = (yy_hold_char); YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p); YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars); } /* Only push if top exists. Otherwise, replace top. */ if (YY_CURRENT_BUFFER) (yy_buffer_stack_top)++; YY_CURRENT_BUFFER_LVALUE = new_buffer; /* copied from yy_switch_to_buffer. */ yy_load_buffer_state( ); (yy_did_buffer_switch_on_eof) = 1; } /* %endif */ /* %if-c-or-c++ */ /** Removes and deletes the top of the stack, if present. * The next element becomes the new top. * */ /* %if-c-only */ void yypop_buffer_state (void) /* %endif */ /* %if-c++-only */ /* %endif */ { if (!YY_CURRENT_BUFFER) return; yy_delete_buffer(YY_CURRENT_BUFFER ); YY_CURRENT_BUFFER_LVALUE = NULL; if ((yy_buffer_stack_top) > 0) --(yy_buffer_stack_top); if (YY_CURRENT_BUFFER) { yy_load_buffer_state( ); (yy_did_buffer_switch_on_eof) = 1; } } /* %endif */ /* %if-c-or-c++ */ /* Allocates the stack if it does not exist. * Guarantees space for at least one push. */ /* %if-c-only */ static void yyensure_buffer_stack (void) /* %endif */ /* %if-c++-only */ /* %endif */ { yy_size_t num_to_alloc; if (!(yy_buffer_stack)) { /* First allocation is just for 2 elements, since we don't know if this * scanner will even need a stack. We use 2 instead of 1 to avoid an * immediate realloc on the next call. */ num_to_alloc = 1; /* After all that talk, this was set to 1 anyways... */ (yy_buffer_stack) = (struct yy_buffer_state**)yyalloc (num_to_alloc * sizeof(struct yy_buffer_state*) ); if ( ! (yy_buffer_stack) ) YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" ); memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*)); (yy_buffer_stack_max) = num_to_alloc; (yy_buffer_stack_top) = 0; return; } if ((yy_buffer_stack_top) >= ((yy_buffer_stack_max)) - 1){ /* Increase the buffer to prepare for a possible push. */ yy_size_t grow_size = 8 /* arbitrary grow size */; num_to_alloc = (yy_buffer_stack_max) + grow_size; (yy_buffer_stack) = (struct yy_buffer_state**)yyrealloc ((yy_buffer_stack), num_to_alloc * sizeof(struct yy_buffer_state*) ); if ( ! (yy_buffer_stack) ) YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" ); /* zero only the new slots.*/ memset((yy_buffer_stack) + (yy_buffer_stack_max), 0, grow_size * sizeof(struct yy_buffer_state*)); (yy_buffer_stack_max) = num_to_alloc; } } /* %endif */ /* %if-c-only */ /** Setup the input buffer state to scan directly from a user-specified character buffer. * @param base the character buffer * @param size the size in bytes of the character buffer * * @return the newly allocated buffer state object. */ YY_BUFFER_STATE yy_scan_buffer (char * base, yy_size_t size ) { YY_BUFFER_STATE b; if ( size < 2 || base[size-2] != YY_END_OF_BUFFER_CHAR || base[size-1] != YY_END_OF_BUFFER_CHAR ) /* They forgot to leave room for the EOB's. */ return 0; b = (YY_BUFFER_STATE) yyalloc(sizeof( struct yy_buffer_state ) ); if ( ! b ) YY_FATAL_ERROR( "out of dynamic memory in yy_scan_buffer()" ); b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */ b->yy_buf_pos = b->yy_ch_buf = base; b->yy_is_our_buffer = 0; b->yy_input_file = 0; b->yy_n_chars = b->yy_buf_size; b->yy_is_interactive = 0; b->yy_at_bol = 1; b->yy_fill_buffer = 0; b->yy_buffer_status = YY_BUFFER_NEW; yy_switch_to_buffer(b ); return b; } /* %endif */ /* %if-c-only */ /** Setup the input buffer state to scan a string. The next call to yylex() will * scan from a @e copy of @a str. * @param yystr a NUL-terminated string to scan * * @return the newly allocated buffer state object. * @note If you want to scan bytes that may contain NUL values, then use * yy_scan_bytes() instead. */ YY_BUFFER_STATE yy_scan_string (yyconst char * yystr ) { return yy_scan_bytes(yystr,strlen(yystr) ); } /* %endif */ /* %if-c-only */ /** Setup the input buffer state to scan the given bytes. The next call to yylex() will * scan from a @e copy of @a bytes. * @param yybytes the byte buffer to scan * @param _yybytes_len the number of bytes in the buffer pointed to by @a bytes. * * @return the newly allocated buffer state object. */ YY_BUFFER_STATE yy_scan_bytes (yyconst char * yybytes, yy_size_t _yybytes_len ) { YY_BUFFER_STATE b; char *buf; yy_size_t n; yy_size_t i; /* Get memory for full buffer, including space for trailing EOB's. */ n = _yybytes_len + 2; buf = (char *) yyalloc(n ); if ( ! buf ) YY_FATAL_ERROR( "out of dynamic memory in yy_scan_bytes()" ); for ( i = 0; i < _yybytes_len; ++i ) buf[i] = yybytes[i]; buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR; b = yy_scan_buffer(buf,n ); if ( ! b ) YY_FATAL_ERROR( "bad buffer in yy_scan_bytes()" ); /* It's okay to grow etc. this buffer, and we should throw it * away when we're done. */ b->yy_is_our_buffer = 1; return b; } /* %endif */ #ifndef YY_EXIT_FAILURE #define YY_EXIT_FAILURE 2 #endif /* %if-c-only */ static void yy_fatal_error (yyconst char* msg ) { (void) fprintf( stderr, "%s\n", msg ); exit( YY_EXIT_FAILURE ); } /* %endif */ /* %if-c++-only */ /* %endif */ /* Redefine yyless() so it works in section 3 code. */ #undef yyless #define yyless(n) \ do \ { \ /* Undo effects of setting up yytext. */ \ yy_size_t yyless_macro_arg = (n); \ YY_LESS_LINENO(yyless_macro_arg);\ yytext[yyleng] = (yy_hold_char); \ (yy_c_buf_p) = yytext + yyless_macro_arg; \ (yy_hold_char) = *(yy_c_buf_p); \ *(yy_c_buf_p) = '\0'; \ yyleng = yyless_macro_arg; \ } \ while ( 0 ) /* Accessor methods (get/set functions) to struct members. */ /* %if-c-only */ /* %if-reentrant */ /* %endif */ /** Get the current line number. * */ int yyget_lineno (void) { return yylineno; } /** Get the input stream. * */ FILE *yyget_in (void) { return yyin; } /** Get the output stream. * */ FILE *yyget_out (void) { return yyout; } /** Get the length of the current token. * */ yy_size_t yyget_leng (void) { return yyleng; } /** Get the current token. * */ char *yyget_text (void) { return yytext; } /* %if-reentrant */ /* %endif */ /** Set the current line number. * @param _line_number line number * */ void yyset_lineno (int _line_number ) { yylineno = _line_number; } /** Set the input stream. This does not discard the current * input buffer. * @param _in_str A readable stream. * * @see yy_switch_to_buffer */ void yyset_in (FILE * _in_str ) { yyin = _in_str ; } void yyset_out (FILE * _out_str ) { yyout = _out_str ; } int yyget_debug (void) { return yy_flex_debug; } void yyset_debug (int _bdebug ) { yy_flex_debug = _bdebug ; } /* %endif */ /* %if-reentrant */ /* %if-bison-bridge */ /* %endif */ /* %endif if-c-only */ /* %if-c-only */ static int yy_init_globals (void) { /* Initialization is the same as for the non-reentrant scanner. * This function is called from yylex_destroy(), so don't allocate here. */ (yy_buffer_stack) = 0; (yy_buffer_stack_top) = 0; (yy_buffer_stack_max) = 0; (yy_c_buf_p) = (char *) 0; (yy_init) = 0; (yy_start) = 0; /* Defined in main.c */ #ifdef YY_STDINIT yyin = stdin; yyout = stdout; #else yyin = (FILE *) 0; yyout = (FILE *) 0; #endif /* For future reference: Set errno on error, since we are called by * yylex_init() */ return 0; } /* %endif */ /* %if-c-only SNIP! this currently causes conflicts with the c++ scanner */ /* yylex_destroy is for both reentrant and non-reentrant scanners. */ int yylex_destroy (void) { /* Pop the buffer stack, destroying each element. */ while(YY_CURRENT_BUFFER){ yy_delete_buffer(YY_CURRENT_BUFFER ); YY_CURRENT_BUFFER_LVALUE = NULL; yypop_buffer_state(); } /* Destroy the stack itself. */ yyfree((yy_buffer_stack) ); (yy_buffer_stack) = NULL; /* Reset the globals. This is important in a non-reentrant scanner so the next time * yylex() is called, initialization will occur. */ yy_init_globals( ); /* %if-reentrant */ /* %endif */ return 0; } /* %endif */ /* * Internal utility routines. */ #ifndef yytext_ptr static void yy_flex_strncpy (char* s1, yyconst char * s2, int n ) { int i; for ( i = 0; i < n; ++i ) s1[i] = s2[i]; } #endif #ifdef YY_NEED_STRLEN static int yy_flex_strlen (yyconst char * s ) { int n; for ( n = 0; s[n]; ++n ) ; return n; } #endif void *yyalloc (yy_size_t size ) { return (void *) malloc( size ); } void *yyrealloc (void * ptr, yy_size_t size ) { /* The cast to (char *) in the following accommodates both * implementations that use char* generic pointers, and those * that use void* generic pointers. It works with the latter * because both ANSI C and C++ allow castless assignment from * any pointer type to void*, and deal with argument conversions * as though doing an assignment. */ return (void *) realloc( (char *) ptr, size ); } void yyfree (void * ptr ) { free( (char *) ptr ); /* see yyrealloc() for (char *) cast */ } /* %if-tables-serialization definitions */ /* %define-yytables The name for this specific scanner's tables. */ #define YYTABLES_NAME "yytables" /* %endif */ /* %ok-for-header */ #line 445 "camp.l" ./asymptote-2.41/rounding.h0000644000175000017500000000674113064427076015551 0ustar norbertnorbert/* GTS - Library for the manipulation of triangulated surfaces * Copyright (C) 1999 Stéphane Popinet * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Library General Public * License as published by the Free Software Foundation; either * version 2 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Library General Public License for more details. * * You should have received a copy of the GNU Library General Public * License along with this library; if not, write to the * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307, USA. */ #ifdef HAVE_CONFIG_H #include "config.h" #endif #ifdef HAVE_FPU_CONTROL_H # include # ifdef _FPU_EXTENDED # if !defined(__alpha__) || !defined(__GLIBC__) # if defined(__arm__) static fpu_control_t fpu_round_double = _FPU_DEFAULT; # else static fpu_control_t fpu_round_double = (_FPU_DEFAULT & ~ _FPU_EXTENDED)|_FPU_DOUBLE; # endif static fpu_control_t fpu_init; # define FPU_ROUND_DOUBLE { _FPU_GETCW(fpu_init);\ _FPU_SETCW(fpu_round_double); } # define FPU_RESTORE {_FPU_SETCW(fpu_init);} # else /* __alpha__ && __GLIBC__ */ # define FPU_ROUND_DOUBLE # define FPU_RESTORE # endif /* __alpha__ && __GLIBC__ */ # else /* not FPU_EXTENDED */ # define FPU_ROUND_DOUBLE # define FPU_RESTORE # endif /* not FPU_EXTENDED */ #else /* not HAVE_FPU_CONTROL_H */ # ifdef __FreeBSD__ # include # define FPU_ROUND_DOUBLE (fpsetprec(FP_PD)) # define FPU_RESTORE (fpsetprec(FP_PE)) # else /* not __FreeBSD__ */ # ifdef WIN32 # ifdef _MSC_VER # include static unsigned int fpu_init; # define FPU_ROUND_DOUBLE (fpu_init = _controlfp (0, 0),\ _controlfp (_PC_53, MCW_PC)) # define FPU_RESTORE (_controlfp (fpu_init, 0xfffff)) # elif __MINGW32__ # include static unsigned int fpu_init; # define FPU_ROUND_DOUBLE (fpu_init = _controlfp (0, 0),\ _controlfp (_PC_53, _MCW_PC)) # define FPU_RESTORE (_controlfp (fpu_init, 0xfffff)) # else /* not _MSC_VER or __MINGW32__ */ # error "You need MSVC or MinGW for the Win32 version" # endif /* not _MSC_VER or __MINGW32__ */ # else /* not WIN32 */ # ifdef __CYGWIN__ typedef unsigned int fpu_control_t __attribute__ ((__mode__ (__HI__))); static fpu_control_t fpu_round_double = 0x027f; static fpu_control_t fpu_init; # define _FPU_GETCW(cw) __asm__ ("fnstcw %0" : "=m" (*&cw)) # define _FPU_SETCW(cw) __asm__ ("fldcw %0" : : "m" (*&cw)) # define FPU_ROUND_DOUBLE { _FPU_GETCW(fpu_init);\ _FPU_SETCW(fpu_round_double); } # define FPU_RESTORE { _FPU_SETCW(fpu_init);} # else /* not __CYGWIN__ */ # ifdef CPP_HAS_WARNING # warning "Unknown CPU: assuming default double precision rounding" # endif /* CPP_HAS_WARNING */ # define FPU_ROUND_DOUBLE # define FPU_RESTORE # endif /* not __CYGWIN__ */ # endif /* not WIN32 */ # endif /* not __FreeBSD__ */ #endif /* not HAVE_FPU_CONTROL_H */ ./asymptote-2.41/configure0000755000175000017500000101155413064427104015451 0ustar norbertnorbert#! /bin/sh # Guess values for system-dependent variables and create Makefiles. # Generated by GNU Autoconf 2.69 for Asymptote 2.41. # # Report bugs to . # # # Copyright (C) 1992-1996, 1998-2012 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 # Use a proper internal environment variable to ensure we don't fall # into an infinite loop, continuously re-executing ourselves. if test x"${_as_can_reexec}" != xno && test "x$CONFIG_SHELL" != x; then _as_can_reexec=no; export _as_can_reexec; # 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 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+"$@"} # Admittedly, this is quite paranoid, since all the known shells bail # out after a failed `exec'. $as_echo "$0: could not re-execute with $CONFIG_SHELL" >&2 as_fn_exit 255 fi # We don't want this to propagate to other subprocesses. { _as_can_reexec=; unset _as_can_reexec;} 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 test -x / || 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 test \$(( 1 + 1 )) = 2 || 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 : export CONFIG_SHELL # 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 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+"$@"} # Admittedly, this is quite paranoid, since all the known shells bail # out after a failed `exec'. $as_echo "$0: could not re-execute with $CONFIG_SHELL" >&2 exit 255 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 $0: http://sourceforge.net/projects/asymptote about your $0: system, including any error possibly output before this $0: message. Then install a modern shell, or manually run $0: the script under such a shell if you do 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_executable_p FILE # ----------------------- # Test if FILE is an executable regular file. as_fn_executable_p () { test -f "$1" && test -x "$1" } # as_fn_executable_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; } # If we had to re-execute with $CONFIG_SHELL, we're ensured to have # already done that, so ensure we don't try to do so again and fall # in an infinite loop. This has already happened in practice. _as_can_reexec=no; export _as_can_reexec # 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 -pR'. ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe || as_ln_s='cp -pR' elif ln conf$$.file conf$$ 2>/dev/null; then as_ln_s=ln else as_ln_s='cp -pR' fi else as_ln_s='cp -pR' 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 as_test_x='test -x' as_executable_p=as_fn_executable_p # 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='Asymptote' PACKAGE_TARNAME='asymptote' PACKAGE_VERSION='2.41' PACKAGE_STRING='Asymptote 2.41' PACKAGE_BUGREPORT='http://sourceforge.net/projects/asymptote' PACKAGE_URL='' # Factoring default headers for most tests. ac_includes_default="\ #include #ifdef HAVE_SYS_TYPES_H # include #endif #ifdef HAVE_SYS_STAT_H # include #endif #ifdef STDC_HEADERS # include # include #else # ifdef HAVE_STDLIB_H # include # endif #endif #ifdef HAVE_STRING_H # if !defined STDC_HEADERS && defined HAVE_MEMORY_H # include # endif # include #endif #ifdef HAVE_STRINGS_H # include #endif #ifdef HAVE_INTTYPES_H # include #endif #ifdef HAVE_STDINT_H # include #endif #ifdef HAVE_UNISTD_H # include #endif" ac_unique_file="absyn.cc" ac_subst_vars='LTLIBOBJS LIBOBJS PTHREAD_CFLAGS PTHREAD_LIBS PTHREAD_CC ax_pthread_config host_os host_vendor host_cpu host build_os build_vendor build_cpu build OPTIONS INCL GCPPLIB GCLIB GCOPTIONS ATOMICVERSION GCVERSION getopt CXXCPP YFLAGS YACC SET_MAKE INSTALL_DATA INSTALL_SCRIPT INSTALL_PROGRAM LEXLIB ac_ct_CXX CXXFLAGS CXX LEX_OUTPUT_ROOT LEX contextdir latexdir TEXI2DVI kpsewhich Datadir EGREP GREP CPP OBJEXT EXEEXT ac_ct_CC CPPFLAGS LDFLAGS CFLAGS CC VERSION 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_latex with_context with_docdir enable_texlive_build enable_gc enable_gc_debug enable_gc_full_debug enable_sigsegv enable_readline enable_gsl enable_fftw enable_gl enable_offscreen ' ac_precious_vars='build_alias host_alias target_alias CC CFLAGS LDFLAGS LIBS CPPFLAGS CPP CXX CXXFLAGS CCC YACC YFLAGS CXXCPP' # 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 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 Asymptote 2.41 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/asymptote] --htmldir=DIR html documentation [DOCDIR] --dvidir=DIR dvi documentation [DOCDIR] --pdfdir=DIR pdf documentation [DOCDIR] --psdir=DIR ps documentation [DOCDIR] _ACEOF cat <<\_ACEOF System types: --build=BUILD configure for building on BUILD [guessed] --host=HOST cross-compile to build programs to run on HOST [BUILD] _ACEOF fi if test -n "$ac_init_help"; then case $ac_init_help in short | recursive ) echo "Configuration of Asymptote 2.41:";; esac cat <<\_ACEOF Optional Features: --disable-option-checking ignore unrecognized --enable/--with options --disable-FEATURE do not include FEATURE (same as --enable-FEATURE=no) --enable-FEATURE[=ARG] include FEATURE [ARG=yes] --enable-texlive-build automatically determine sysdir from kpsewhich --enable-gc[=system] enable system Boehm garbage collector [=VERSION] enable local VERSION of Boehm garbage collector [=PREFIX] use Boehm garbage collector installed in PREFIX --enable-gc-debug enable (slow) garbage collector debugging --enable-gc-full-debug enable (very slow) garbage collector backtrace --enable-sigsegv[=yes] enable GNU Stack Overflow Handler --enable-readline[=yes] enable GNU Readline Library --enable-gsl[=yes] enable GNU Scientific Library --enable-fftw[=yes] enable FFTW Library --enable-gl[=yes] enable OpenGL Library --enable-offscreen[=yes] enable offscreen rendering using OSMesa library Optional Packages: --with-PACKAGE[=ARG] use PACKAGE [ARG=yes] --without-PACKAGE do not use PACKAGE (same as --with-PACKAGE=no) --with-latex=PATH specify path to LaTeX installation --with-context=PATH specify path to ConTeXt installation --with-docdir=PATH alternate documentation installation directory Some influential environment variables: 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 CPP C preprocessor CXX C++ compiler command CXXFLAGS C++ compiler flags YACC The `Yet Another Compiler Compiler' implementation to use. Defaults to the first program found out of: `bison -y', `byacc', `yacc'. YFLAGS The list of arguments that will be passed by default to $YACC. This script will default YFLAGS to the empty string to avoid a default value of `-d' given by some make applications. CXXCPP C++ preprocessor 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 Asymptote configure 2.41 generated by GNU Autoconf 2.69 Copyright (C) 2012 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_c_try_run LINENO # ---------------------- # Try to link conftest.$ac_ext, and return whether this succeeded. Assumes # that executables *can* be run. ac_fn_c_try_run () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack 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; } && { ac_try='./conftest$ac_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 : ac_retval=0 else $as_echo "$as_me: program exited with status $ac_status" >&5 $as_echo "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 ac_retval=$ac_status fi 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_run # ac_fn_c_try_cpp LINENO # ---------------------- # Try to preprocess conftest.$ac_ext, and return whether this succeeded. ac_fn_c_try_cpp () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack if { { ac_try="$ac_cpp conftest.$ac_ext" 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_cpp conftest.$ac_ext") 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; } > conftest.i && { test -z "$ac_c_preproc_warn_flag$ac_c_werror_flag" || test ! -s conftest.err }; 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_cpp # ac_fn_c_check_header_compile LINENO HEADER VAR INCLUDES # ------------------------------------------------------- # Tests whether HEADER exists and can be compiled using the include files in # INCLUDES, setting the cache variable VAR accordingly. ac_fn_c_check_header_compile () { 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. */ $4 #include <$2> _ACEOF if ac_fn_c_try_compile "$LINENO"; then : eval "$3=yes" else eval "$3=no" fi rm -f core conftest.err conftest.$ac_objext 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_header_compile # ac_fn_cxx_try_compile LINENO # ---------------------------- # Try to compile conftest.$ac_ext, and return whether this succeeded. ac_fn_cxx_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_cxx_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_cxx_try_compile # ac_fn_cxx_try_link LINENO # ------------------------- # Try to link conftest.$ac_ext, and return whether this succeeded. ac_fn_cxx_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_cxx_werror_flag" || test ! -s conftest.err } && test -s conftest$ac_exeext && { test "$cross_compiling" = yes || 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_cxx_try_link # ac_fn_cxx_try_cpp LINENO # ------------------------ # Try to preprocess conftest.$ac_ext, and return whether this succeeded. ac_fn_cxx_try_cpp () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack if { { ac_try="$ac_cpp conftest.$ac_ext" 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_cpp conftest.$ac_ext") 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; } > conftest.i && { test -z "$ac_cxx_preproc_warn_flag$ac_cxx_werror_flag" || test ! -s conftest.err }; 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_cxx_try_cpp # ac_fn_cxx_check_header_mongrel LINENO HEADER VAR INCLUDES # --------------------------------------------------------- # Tests whether HEADER exists, giving a warning if it cannot be compiled using # the include files in INCLUDES and setting the cache variable VAR # accordingly. ac_fn_cxx_check_header_mongrel () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack if eval \${$3+:} false; then : { $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 fi eval ac_res=\$$3 { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 $as_echo "$ac_res" >&6; } else # Is the header compilable? { $as_echo "$as_me:${as_lineno-$LINENO}: checking $2 usability" >&5 $as_echo_n "checking $2 usability... " >&6; } cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 #include <$2> _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : ac_header_compiler=yes else ac_header_compiler=no fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_header_compiler" >&5 $as_echo "$ac_header_compiler" >&6; } # Is the header present? { $as_echo "$as_me:${as_lineno-$LINENO}: checking $2 presence" >&5 $as_echo_n "checking $2 presence... " >&6; } cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include <$2> _ACEOF if ac_fn_cxx_try_cpp "$LINENO"; then : ac_header_preproc=yes else ac_header_preproc=no fi rm -f conftest.err conftest.i conftest.$ac_ext { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_header_preproc" >&5 $as_echo "$ac_header_preproc" >&6; } # So? What about this header? case $ac_header_compiler:$ac_header_preproc:$ac_cxx_preproc_warn_flag in #(( yes:no: ) { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: accepted by the compiler, rejected by the preprocessor!" >&5 $as_echo "$as_me: WARNING: $2: accepted by the compiler, rejected by the preprocessor!" >&2;} { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: proceeding with the compiler's result" >&5 $as_echo "$as_me: WARNING: $2: proceeding with the compiler's result" >&2;} ;; no:yes:* ) { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: present but cannot be compiled" >&5 $as_echo "$as_me: WARNING: $2: present but cannot be compiled" >&2;} { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: check for missing prerequisite headers?" >&5 $as_echo "$as_me: WARNING: $2: check for missing prerequisite headers?" >&2;} { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: see the Autoconf documentation" >&5 $as_echo "$as_me: WARNING: $2: see the Autoconf documentation" >&2;} { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: section \"Present But Cannot Be Compiled\"" >&5 $as_echo "$as_me: WARNING: $2: section \"Present But Cannot Be Compiled\"" >&2;} { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $2: proceeding with the compiler's result" >&5 $as_echo "$as_me: WARNING: $2: proceeding with the compiler's result" >&2;} ( $as_echo "## -------------------------------------------------------- ## ## Report this to http://sourceforge.net/projects/asymptote ## ## -------------------------------------------------------- ##" ) | sed "s/^/$as_me: WARNING: /" >&2 ;; esac { $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 eval "$3=\$ac_header_compiler" fi eval ac_res=\$$3 { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 $as_echo "$ac_res" >&6; } fi eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno } # ac_fn_cxx_check_header_mongrel # ac_fn_cxx_check_func LINENO FUNC VAR # ------------------------------------ # Tests whether FUNC exists, setting the cache variable VAR accordingly ac_fn_cxx_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_cxx_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_cxx_check_func # 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 || 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_cxx_check_type LINENO TYPE VAR INCLUDES # --------------------------------------------- # Tests whether TYPE exists after having included INCLUDES, setting cache # variable VAR accordingly. ac_fn_cxx_check_type () { 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 eval "$3=no" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main () { if (sizeof ($2)) return 0; ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main () { if (sizeof (($2))) return 0; ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : else eval "$3=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 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_cxx_check_type # ac_fn_cxx_try_run LINENO # ------------------------ # Try to link conftest.$ac_ext, and return whether this succeeded. Assumes # that executables *can* be run. ac_fn_cxx_try_run () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack 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; } && { ac_try='./conftest$ac_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 : ac_retval=0 else $as_echo "$as_me: program exited with status $ac_status" >&5 $as_echo "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 ac_retval=$ac_status fi 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_cxx_try_run 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 Asymptote $as_me 2.41, which was generated by GNU Autoconf 2.69. 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 VERSION=$PACKAGE_VERSION # =========================================================================== # http://www.gnu.org/software/autoconf-archive/ax_pthread.html # =========================================================================== # # SYNOPSIS # # AX_PTHREAD([ACTION-IF-FOUND[, ACTION-IF-NOT-FOUND]]) # # DESCRIPTION # # This macro figures out how to build C programs using POSIX threads. It # sets the PTHREAD_LIBS output variable to the threads library and linker # flags, and the PTHREAD_CFLAGS output variable to any special C compiler # flags that are needed. (The user can also force certain compiler # flags/libs to be tested by setting these environment variables.) # # Also sets PTHREAD_CC to any special C compiler that is needed for # multi-threaded programs (defaults to the value of CC otherwise). (This # is necessary on AIX to use the special cc_r compiler alias.) # # NOTE: You are assumed to not only compile your program with these flags, # but also link it with them as well. e.g. you should link with # $PTHREAD_CC $CFLAGS $PTHREAD_CFLAGS $LDFLAGS ... $PTHREAD_LIBS $LIBS # # If you are only building threads programs, you may wish to use these # variables in your default LIBS, CFLAGS, and CC: # # LIBS="$PTHREAD_LIBS $LIBS" # CFLAGS="$CFLAGS $PTHREAD_CFLAGS" # CC="$PTHREAD_CC" # # In addition, if the PTHREAD_CREATE_JOINABLE thread-attribute constant # has a nonstandard name, defines PTHREAD_CREATE_JOINABLE to that name # (e.g. PTHREAD_CREATE_UNDETACHED on AIX). # # Also HAVE_PTHREAD_PRIO_INHERIT is defined if pthread is found and the # PTHREAD_PRIO_INHERIT symbol is defined when compiling with # PTHREAD_CFLAGS. # # ACTION-IF-FOUND is a list of shell commands to run if a threads library # is found, and ACTION-IF-NOT-FOUND is a list of commands to run it if it # is not found. If ACTION-IF-FOUND is not specified, the default action # will define HAVE_PTHREAD. # # Please let the authors know if this macro fails on any platform, or if # you have any other suggestions or comments. This macro was based on work # by SGJ on autoconf scripts for FFTW (http://www.fftw.org/) (with help # from M. Frigo), as well as ac_pthread and hb_pthread macros posted by # Alejandro Forero Cuervo to the autoconf macro repository. We are also # grateful for the helpful feedback of numerous users. # # Updated for Autoconf 2.68 by Daniel Richard G. # # LICENSE # # Copyright (c) 2008 Steven G. Johnson # Copyright (c) 2011 Daniel Richard G. # # This program is free software: you can redistribute it and/or modify it # under the terms of the GNU General Public License as published by the # Free Software Foundation, either version 3 of the License, or (at your # option) any later version. # # This program is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General # Public License for more details. # # You should have received a copy of the GNU General Public License along # with this program. If not, see . # # As a special exception, the respective Autoconf Macro's copyright owner # gives unlimited permission to copy, distribute and modify the configure # scripts that are the output of Autoconf when processing the Macro. You # need not follow the terms of the GNU General Public License when using # or distributing such scripts, even though portions of the text of the # Macro appear in them. The GNU General Public License (GPL) does govern # all other use of the material that constitutes the Autoconf Macro. # # This special exception to the GPL applies to versions of the Autoconf # Macro released by the Autoconf Archive. When you make and distribute a # modified version of the Autoconf Macro, you may extend this special # exception to the GPL to apply to your modified version as well. #serial 18 # This is what autoupdate's m4 run will expand. It fires # the warning (with _au_warn_XXX), outputs it into the # updated configure.ac (with AC_DIAGNOSE), and then outputs # the replacement expansion. # This is an auxiliary macro that is also run when # autoupdate runs m4. It simply calls m4_warning, but # we need a wrapper so that each warning is emitted only # once. We break the quoting in m4_warning's argument in # order to expand this macro's arguments, not AU_DEFUN's. # Finally, this is the expansion that is picked up by # autoconf. It tells the user to run autoupdate, and # then outputs the replacement expansion. We do not care # about autoupdate's warning because that contains # information on what to do *after* running autoupdate. test "$CXXFLAGS" || CXXFLAGS="-std=c++11" test "$CFLAGS" || CFLAGS="-g -O3" 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 as_fn_executable_p "$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 as_fn_executable_p "$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 as_fn_executable_p "$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 as_fn_executable_p "$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 as_fn_executable_p "$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 as_fn_executable_p "$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 struct stat; /* 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=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 { $as_echo "$as_me:${as_lineno-$LINENO}: checking how to run the C preprocessor" >&5 $as_echo_n "checking how to run the C preprocessor... " >&6; } # On Suns, sometimes $CPP names a directory. if test -n "$CPP" && test -d "$CPP"; then CPP= fi if test -z "$CPP"; then if ${ac_cv_prog_CPP+:} false; then : $as_echo_n "(cached) " >&6 else # Double quotes because CPP needs to be expanded for CPP in "$CC -E" "$CC -E -traditional-cpp" "/lib/cpp" do ac_preproc_ok=false for ac_c_preproc_warn_flag in '' yes do # Use a header file that comes with gcc, so configuring glibc # with a fresh cross-compiler works. # Prefer to if __STDC__ is defined, since # exists even on freestanding compilers. # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. "Syntax error" is here to catch this case. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __STDC__ # include #else # include #endif Syntax error _ACEOF if ac_fn_c_try_cpp "$LINENO"; then : else # Broken: fails on valid input. continue fi rm -f conftest.err conftest.i conftest.$ac_ext # OK, works on sane cases. Now check whether nonexistent headers # can be detected and how. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_c_try_cpp "$LINENO"; then : # Broken: success on invalid input. continue else # Passes both tests. ac_preproc_ok=: break fi rm -f conftest.err conftest.i conftest.$ac_ext done # Because of `break', _AC_PREPROC_IFELSE's cleaning code was skipped. rm -f conftest.i conftest.err conftest.$ac_ext if $ac_preproc_ok; then : break fi done ac_cv_prog_CPP=$CPP fi CPP=$ac_cv_prog_CPP else ac_cv_prog_CPP=$CPP fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CPP" >&5 $as_echo "$CPP" >&6; } ac_preproc_ok=false for ac_c_preproc_warn_flag in '' yes do # Use a header file that comes with gcc, so configuring glibc # with a fresh cross-compiler works. # Prefer to if __STDC__ is defined, since # exists even on freestanding compilers. # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. "Syntax error" is here to catch this case. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __STDC__ # include #else # include #endif Syntax error _ACEOF if ac_fn_c_try_cpp "$LINENO"; then : else # Broken: fails on valid input. continue fi rm -f conftest.err conftest.i conftest.$ac_ext # OK, works on sane cases. Now check whether nonexistent headers # can be detected and how. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_c_try_cpp "$LINENO"; then : # Broken: success on invalid input. continue else # Passes both tests. ac_preproc_ok=: break fi rm -f conftest.err conftest.i conftest.$ac_ext done # Because of `break', _AC_PREPROC_IFELSE's cleaning code was skipped. rm -f conftest.i conftest.err conftest.$ac_ext if $ac_preproc_ok; then : 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 $? "C preprocessor \"$CPP\" fails sanity check See \`config.log' for more details" "$LINENO" 5; } 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 { $as_echo "$as_me:${as_lineno-$LINENO}: checking for grep that handles long lines and -e" >&5 $as_echo_n "checking for grep that handles long lines and -e... " >&6; } if ${ac_cv_path_GREP+:} false; then : $as_echo_n "(cached) " >&6 else if test -z "$GREP"; then ac_path_GREP_found=false # Loop through the user's path and test for each of PROGNAME-LIST as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin do IFS=$as_save_IFS test -z "$as_dir" && as_dir=. for ac_prog in grep ggrep; do for ac_exec_ext in '' $ac_executable_extensions; do ac_path_GREP="$as_dir/$ac_prog$ac_exec_ext" as_fn_executable_p "$ac_path_GREP" || continue # Check for GNU ac_path_GREP and select it if it is found. # Check for GNU $ac_path_GREP case `"$ac_path_GREP" --version 2>&1` in *GNU*) ac_cv_path_GREP="$ac_path_GREP" ac_path_GREP_found=:;; *) ac_count=0 $as_echo_n 0123456789 >"conftest.in" while : do cat "conftest.in" "conftest.in" >"conftest.tmp" mv "conftest.tmp" "conftest.in" cp "conftest.in" "conftest.nl" $as_echo 'GREP' >> "conftest.nl" "$ac_path_GREP" -e 'GREP$' -e '-(cannot match)-' < "conftest.nl" >"conftest.out" 2>/dev/null || break diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break as_fn_arith $ac_count + 1 && ac_count=$as_val if test $ac_count -gt ${ac_path_GREP_max-0}; then # Best one so far, save it but keep looking for a better one ac_cv_path_GREP="$ac_path_GREP" ac_path_GREP_max=$ac_count fi # 10*(2^10) chars as input seems more than enough test $ac_count -gt 10 && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out;; esac $ac_path_GREP_found && break 3 done done done IFS=$as_save_IFS if test -z "$ac_cv_path_GREP"; then as_fn_error $? "no acceptable grep could be found in $PATH$PATH_SEPARATOR/usr/xpg4/bin" "$LINENO" 5 fi else ac_cv_path_GREP=$GREP fi fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_GREP" >&5 $as_echo "$ac_cv_path_GREP" >&6; } GREP="$ac_cv_path_GREP" { $as_echo "$as_me:${as_lineno-$LINENO}: checking for egrep" >&5 $as_echo_n "checking for egrep... " >&6; } if ${ac_cv_path_EGREP+:} false; then : $as_echo_n "(cached) " >&6 else if echo a | $GREP -E '(a|b)' >/dev/null 2>&1 then ac_cv_path_EGREP="$GREP -E" else if test -z "$EGREP"; then ac_path_EGREP_found=false # Loop through the user's path and test for each of PROGNAME-LIST as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin do IFS=$as_save_IFS test -z "$as_dir" && as_dir=. for ac_prog in egrep; do for ac_exec_ext in '' $ac_executable_extensions; do ac_path_EGREP="$as_dir/$ac_prog$ac_exec_ext" as_fn_executable_p "$ac_path_EGREP" || continue # Check for GNU ac_path_EGREP and select it if it is found. # Check for GNU $ac_path_EGREP case `"$ac_path_EGREP" --version 2>&1` in *GNU*) ac_cv_path_EGREP="$ac_path_EGREP" ac_path_EGREP_found=:;; *) ac_count=0 $as_echo_n 0123456789 >"conftest.in" while : do cat "conftest.in" "conftest.in" >"conftest.tmp" mv "conftest.tmp" "conftest.in" cp "conftest.in" "conftest.nl" $as_echo 'EGREP' >> "conftest.nl" "$ac_path_EGREP" 'EGREP$' < "conftest.nl" >"conftest.out" 2>/dev/null || break diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break as_fn_arith $ac_count + 1 && ac_count=$as_val if test $ac_count -gt ${ac_path_EGREP_max-0}; then # Best one so far, save it but keep looking for a better one ac_cv_path_EGREP="$ac_path_EGREP" ac_path_EGREP_max=$ac_count fi # 10*(2^10) chars as input seems more than enough test $ac_count -gt 10 && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out;; esac $ac_path_EGREP_found && break 3 done done done IFS=$as_save_IFS if test -z "$ac_cv_path_EGREP"; then as_fn_error $? "no acceptable egrep could be found in $PATH$PATH_SEPARATOR/usr/xpg4/bin" "$LINENO" 5 fi else ac_cv_path_EGREP=$EGREP fi fi fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_EGREP" >&5 $as_echo "$ac_cv_path_EGREP" >&6; } EGREP="$ac_cv_path_EGREP" { $as_echo "$as_me:${as_lineno-$LINENO}: checking for ANSI C header files" >&5 $as_echo_n "checking for ANSI C header files... " >&6; } if ${ac_cv_header_stdc+:} false; then : $as_echo_n "(cached) " >&6 else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #include #include int main () { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO"; then : ac_cv_header_stdc=yes else ac_cv_header_stdc=no fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext if test $ac_cv_header_stdc = yes; then # SunOS 4.x string.h does not declare mem*, contrary to ANSI. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP "memchr" >/dev/null 2>&1; then : else ac_cv_header_stdc=no fi rm -f conftest* fi if test $ac_cv_header_stdc = yes; then # ISC 2.0.2 stdlib.h does not declare free, contrary to ANSI. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP "free" >/dev/null 2>&1; then : else ac_cv_header_stdc=no fi rm -f conftest* fi if test $ac_cv_header_stdc = yes; then # /bin/cc in Irix-4.0.5 gets non-ANSI ctype macros unless using -ansi. if test "$cross_compiling" = yes; then : : else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if ((' ' & 0x0FF) == 0x020) # define ISLOWER(c) ('a' <= (c) && (c) <= 'z') # define TOUPPER(c) (ISLOWER(c) ? 'A' + ((c) - 'a') : (c)) #else # define ISLOWER(c) \ (('a' <= (c) && (c) <= 'i') \ || ('j' <= (c) && (c) <= 'r') \ || ('s' <= (c) && (c) <= 'z')) # define TOUPPER(c) (ISLOWER(c) ? ((c) | 0x40) : (c)) #endif #define XOR(e, f) (((e) && !(f)) || (!(e) && (f))) int main () { int i; for (i = 0; i < 256; i++) if (XOR (islower (i), ISLOWER (i)) || toupper (i) != TOUPPER (i)) return 2; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO"; then : else ac_cv_header_stdc=no fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext fi fi fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_header_stdc" >&5 $as_echo "$ac_cv_header_stdc" >&6; } if test $ac_cv_header_stdc = yes; then $as_echo "#define STDC_HEADERS 1" >>confdefs.h fi # On IRIX 5.3, sys/types and inttypes.h are conflicting. for ac_header in sys/types.h sys/stat.h stdlib.h string.h memory.h strings.h \ inttypes.h stdint.h unistd.h do : as_ac_Header=`$as_echo "ac_cv_header_$ac_header" | $as_tr_sh` ac_fn_c_check_header_compile "$LINENO" "$ac_header" "$as_ac_Header" "$ac_includes_default " if eval test \"x\$"$as_ac_Header"\" = x"yes"; then : cat >>confdefs.h <<_ACEOF #define `$as_echo "HAVE_$ac_header" | $as_tr_cpp` 1 _ACEOF fi done { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether byte ordering is bigendian" >&5 $as_echo_n "checking whether byte ordering is bigendian... " >&6; } if ${ac_cv_c_bigendian+:} false; then : $as_echo_n "(cached) " >&6 else ac_cv_c_bigendian=unknown # See if we're dealing with a universal compiler. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifndef __APPLE_CC__ not a universal capable compiler #endif typedef int dummy; _ACEOF if ac_fn_c_try_compile "$LINENO"; then : # Check for potential -arch flags. It is not universal unless # there are at least two -arch flags with different values. ac_arch= ac_prev= for ac_word in $CC $CFLAGS $CPPFLAGS $LDFLAGS; do if test -n "$ac_prev"; then case $ac_word in i?86 | x86_64 | ppc | ppc64) if test -z "$ac_arch" || test "$ac_arch" = "$ac_word"; then ac_arch=$ac_word else ac_cv_c_bigendian=universal break fi ;; esac ac_prev= elif test "x$ac_word" = "x-arch"; then ac_prev=arch fi done fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext if test $ac_cv_c_bigendian = unknown; then # See if sys/param.h defines the BYTE_ORDER macro. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include int main () { #if ! (defined BYTE_ORDER && defined BIG_ENDIAN \ && defined LITTLE_ENDIAN && BYTE_ORDER && BIG_ENDIAN \ && LITTLE_ENDIAN) bogus endian macros #endif ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO"; then : # It does; now see whether it defined to BIG_ENDIAN or not. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include int main () { #if BYTE_ORDER != BIG_ENDIAN not big endian #endif ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO"; then : ac_cv_c_bigendian=yes else ac_cv_c_bigendian=no 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 if test $ac_cv_c_bigendian = unknown; then # See if defines _LITTLE_ENDIAN or _BIG_ENDIAN (e.g., Solaris). cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main () { #if ! (defined _LITTLE_ENDIAN || defined _BIG_ENDIAN) bogus endian macros #endif ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO"; then : # It does; now see whether it defined to _BIG_ENDIAN or not. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main () { #ifndef _BIG_ENDIAN not big endian #endif ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO"; then : ac_cv_c_bigendian=yes else ac_cv_c_bigendian=no 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 if test $ac_cv_c_bigendian = unknown; then # Compile a test program. if test "$cross_compiling" = yes; then : # Try to guess by grepping values from an object file. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ short int ascii_mm[] = { 0x4249, 0x4765, 0x6E44, 0x6961, 0x6E53, 0x7953, 0 }; short int ascii_ii[] = { 0x694C, 0x5454, 0x656C, 0x6E45, 0x6944, 0x6E61, 0 }; int use_ascii (int i) { return ascii_mm[i] + ascii_ii[i]; } short int ebcdic_ii[] = { 0x89D3, 0xE3E3, 0x8593, 0x95C5, 0x89C4, 0x9581, 0 }; short int ebcdic_mm[] = { 0xC2C9, 0xC785, 0x95C4, 0x8981, 0x95E2, 0xA8E2, 0 }; int use_ebcdic (int i) { return ebcdic_mm[i] + ebcdic_ii[i]; } extern int foo; int main () { return use_ascii (foo) == use_ebcdic (foo); ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO"; then : if grep BIGenDianSyS conftest.$ac_objext >/dev/null; then ac_cv_c_bigendian=yes fi if grep LiTTleEnDian conftest.$ac_objext >/dev/null ; then if test "$ac_cv_c_bigendian" = unknown; then ac_cv_c_bigendian=no else # finding both strings is unlikely to happen, but who knows? ac_cv_c_bigendian=unknown fi fi fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $ac_includes_default int main () { /* Are we little or big endian? From Harbison&Steele. */ union { long int l; char c[sizeof (long int)]; } u; u.l = 1; return u.c[sizeof (long int) - 1] == 1; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO"; then : ac_cv_c_bigendian=no else ac_cv_c_bigendian=yes fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext fi fi fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_bigendian" >&5 $as_echo "$ac_cv_c_bigendian" >&6; } case $ac_cv_c_bigendian in #( yes) $as_echo "#define WORDS_BIGENDIAN 1" >>confdefs.h ;; #( no) ;; #( universal) $as_echo "#define AC_APPLE_UNIVERSAL_BUILD 1" >>confdefs.h ;; #( *) as_fn_error $? "unknown endianness presetting ac_cv_c_bigendian=no (or yes) will help" "$LINENO" 5 ;; esac test "$prefix" = NONE && prefix=/usr/local Datadir=$datadir test "$Datadir" = '${datarootdir}' && Datadir=$datarootdir test "$Datadir" = '${prefix}/share' && Datadir=$prefix/share # Check whether --with-latex was given. if test "${with_latex+set}" = set; then : withval=$with_latex; if test "x$withval" != "x" ; then latexdir=$withval fi else # Extract the first word of "kpsewhich", so it can be a program name with args. set dummy kpsewhich; 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_kpsewhich+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$kpsewhich"; then ac_cv_prog_kpsewhich="$kpsewhich" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_kpsewhich="true" $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 kpsewhich=$ac_cv_prog_kpsewhich if test -n "$kpsewhich"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $kpsewhich" >&5 $as_echo "$kpsewhich" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi if test "x$kpsewhich" = "xtrue"; then latexdir=`kpsewhich -expand-var='$TEXMFLOCAL'/tex/latex` else latexdir=$prefix/share/texmf/tex/latex as_ac_File=`$as_echo "ac_cv_file_$latexdir/base/latex.ltx" | $as_tr_sh` { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $latexdir/base/latex.ltx" >&5 $as_echo_n "checking for $latexdir/base/latex.ltx... " >&6; } if eval \${$as_ac_File+:} false; then : $as_echo_n "(cached) " >&6 else test "$cross_compiling" = yes && as_fn_error $? "cannot check for file existence when cross compiling" "$LINENO" 5 if test -r "$latexdir/base/latex.ltx"; then eval "$as_ac_File=yes" else eval "$as_ac_File=no" fi fi eval ac_res=\$$as_ac_File { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 $as_echo "$ac_res" >&6; } if eval test \"x\$"$as_ac_File"\" = x"yes"; then : else latexdir=/usr/share/texmf/tex/latex as_ac_File=`$as_echo "ac_cv_file_$latexdir/base/latex.ltx" | $as_tr_sh` { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $latexdir/base/latex.ltx" >&5 $as_echo_n "checking for $latexdir/base/latex.ltx... " >&6; } if eval \${$as_ac_File+:} false; then : $as_echo_n "(cached) " >&6 else test "$cross_compiling" = yes && as_fn_error $? "cannot check for file existence when cross compiling" "$LINENO" 5 if test -r "$latexdir/base/latex.ltx"; then eval "$as_ac_File=yes" else eval "$as_ac_File=no" fi fi eval ac_res=\$$as_ac_File { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 $as_echo "$ac_res" >&6; } if eval test \"x\$"$as_ac_File"\" = x"yes"; then : fi fi fi fi # Check whether --with-context was given. if test "${with_context+set}" = set; then : withval=$with_context; if test "x$withval" != "x" ; then contextdir=$withval fi else # Extract the first word of "kpsewhich", so it can be a program name with args. set dummy kpsewhich; 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_kpsewhich+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$kpsewhich"; then ac_cv_prog_kpsewhich="$kpsewhich" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_kpsewhich="true" $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 kpsewhich=$ac_cv_prog_kpsewhich if test -n "$kpsewhich"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $kpsewhich" >&5 $as_echo "$kpsewhich" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi if test "x$kpsewhich" = "xtrue"; then contextdir=`kpsewhich -expand-var='$TEXMFLOCAL'/tex/context/third` else contextdir=$prefix/share/texmf/tex/context/third fi fi for ac_prog in texi2dvi 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_TEXI2DVI+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$TEXI2DVI"; then ac_cv_prog_TEXI2DVI="$TEXI2DVI" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_TEXI2DVI="$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 TEXI2DVI=$ac_cv_prog_TEXI2DVI if test -n "$TEXI2DVI"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $TEXI2DVI" >&5 $as_echo "$TEXI2DVI" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi test -n "$TEXI2DVI" && break done test -n "$TEXI2DVI" || TEXI2DVI="echo texi2dvi is missing! Please put http://asymptote.sourceforge.net/asymptote.pdf in the doc directory, touch doc/asymptote.pdf, and run configure again; exit 1;" latexdir=$latexdir/asymptote contextdir=$contextdir/asymptote { $as_echo "$as_me:${as_lineno-$LINENO}: Using $latexdir for LaTeX style file" >&5 $as_echo "$as_me: Using $latexdir for LaTeX style file" >&6;} { $as_echo "$as_me:${as_lineno-$LINENO}: Using $contextdir for ConTeXT style file" >&5 $as_echo "$as_me: Using $contextdir for ConTeXT style file" >&6;} docdir=$Datadir/doc/asymptote # Check whether --with-docdir was given. if test "${with_docdir+set}" = set; then : withval=$with_docdir; if test "x$withval" != "x" ; then docdir=$withval fi fi sysdir=$Datadir/asymptote # Check whether --enable-texlive-build was given. if test "${enable_texlive_build+set}" = set; then : enableval=$enable_texlive_build; if test "x$enableval" = "xyes" ; then sysdir="" fi fi cat >>confdefs.h <<_ACEOF #define ASYMPTOTE_SYSDIR "$sysdir" _ACEOF cat >>confdefs.h <<_ACEOF #define ASYMPTOTE_DOCDIR "$docdir" _ACEOF ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu # Checks for programs. ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu if test -z "$CXX"; then if test -n "$CCC"; then CXX=$CCC else if test -n "$ac_tool_prefix"; then for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl.exe FCC KCC RCC xlC_r xlC 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_CXX+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$CXX"; then ac_cv_prog_CXX="$CXX" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_CXX="$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 CXX=$ac_cv_prog_CXX if test -n "$CXX"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CXX" >&5 $as_echo "$CXX" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi test -n "$CXX" && break done fi if test -z "$CXX"; then ac_ct_CXX=$CXX for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl.exe FCC KCC RCC xlC_r xlC 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_CXX+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$ac_ct_CXX"; then ac_cv_prog_ac_ct_CXX="$ac_ct_CXX" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_CXX="$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_CXX=$ac_cv_prog_ac_ct_CXX if test -n "$ac_ct_CXX"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CXX" >&5 $as_echo "$ac_ct_CXX" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi test -n "$ac_ct_CXX" && break done if test "x$ac_ct_CXX" = x; then CXX="g++" 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 CXX=$ac_ct_CXX fi fi fi fi # 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 { $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_cxx_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_cxx_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_cxx_compiler_gnu=$ac_compiler_gnu fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_cxx_compiler_gnu" >&5 $as_echo "$ac_cv_cxx_compiler_gnu" >&6; } if test $ac_compiler_gnu = yes; then GXX=yes else GXX= fi ac_test_CXXFLAGS=${CXXFLAGS+set} ac_save_CXXFLAGS=$CXXFLAGS { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $CXX accepts -g" >&5 $as_echo_n "checking whether $CXX accepts -g... " >&6; } if ${ac_cv_prog_cxx_g+:} false; then : $as_echo_n "(cached) " >&6 else ac_save_cxx_werror_flag=$ac_cxx_werror_flag ac_cxx_werror_flag=yes ac_cv_prog_cxx_g=no CXXFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main () { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : ac_cv_prog_cxx_g=yes else CXXFLAGS="" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main () { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : else ac_cxx_werror_flag=$ac_save_cxx_werror_flag CXXFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main () { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : ac_cv_prog_cxx_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_cxx_werror_flag=$ac_save_cxx_werror_flag fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cxx_g" >&5 $as_echo "$ac_cv_prog_cxx_g" >&6; } if test "$ac_test_CXXFLAGS" = set; then CXXFLAGS=$ac_save_CXXFLAGS elif test $ac_cv_prog_cxx_g = yes; then if test "$GXX" = yes; then CXXFLAGS="-g -O2" else CXXFLAGS="-g" fi else if test "$GXX" = yes; then CXXFLAGS="-O2" else CXXFLAGS= fi fi ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu for ac_prog in flex lex 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_LEX+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$LEX"; then ac_cv_prog_LEX="$LEX" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_LEX="$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 LEX=$ac_cv_prog_LEX if test -n "$LEX"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $LEX" >&5 $as_echo "$LEX" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi test -n "$LEX" && break done test -n "$LEX" || LEX=":" if test "x$LEX" != "x:"; then cat >conftest.l <<_ACEOF %% a { ECHO; } b { REJECT; } c { yymore (); } d { yyless (1); } e { /* IRIX 6.5 flex 2.5.4 underquotes its yyless argument. */ yyless ((input () != 0)); } f { unput (yytext[0]); } . { BEGIN INITIAL; } %% #ifdef YYTEXT_POINTER extern char *yytext; #endif int main (void) { return ! yylex () + ! yywrap (); } _ACEOF { { ac_try="$LEX conftest.l" 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 "$LEX conftest.l") 2>&5 ac_status=$? $as_echo "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } { $as_echo "$as_me:${as_lineno-$LINENO}: checking lex output file root" >&5 $as_echo_n "checking lex output file root... " >&6; } if ${ac_cv_prog_lex_root+:} false; then : $as_echo_n "(cached) " >&6 else if test -f lex.yy.c; then ac_cv_prog_lex_root=lex.yy elif test -f lexyy.c; then ac_cv_prog_lex_root=lexyy else as_fn_error $? "cannot find output from $LEX; giving up" "$LINENO" 5 fi fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_lex_root" >&5 $as_echo "$ac_cv_prog_lex_root" >&6; } LEX_OUTPUT_ROOT=$ac_cv_prog_lex_root if test -z "${LEXLIB+set}"; then { $as_echo "$as_me:${as_lineno-$LINENO}: checking lex library" >&5 $as_echo_n "checking lex library... " >&6; } if ${ac_cv_lib_lex+:} false; then : $as_echo_n "(cached) " >&6 else ac_save_LIBS=$LIBS ac_cv_lib_lex='none needed' for ac_lib in '' -lfl -ll; do LIBS="$ac_lib $ac_save_LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ `cat $LEX_OUTPUT_ROOT.c` _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_lex=$ac_lib fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext test "$ac_cv_lib_lex" != 'none needed' && break done LIBS=$ac_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_lex" >&5 $as_echo "$ac_cv_lib_lex" >&6; } test "$ac_cv_lib_lex" != 'none needed' && LEXLIB=$ac_cv_lib_lex fi { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether yytext is a pointer" >&5 $as_echo_n "checking whether yytext is a pointer... " >&6; } if ${ac_cv_prog_lex_yytext_pointer+:} false; then : $as_echo_n "(cached) " >&6 else # POSIX says lex can declare yytext either as a pointer or an array; the # default is implementation-dependent. Figure out which it is, since # not all implementations provide the %pointer and %array declarations. ac_cv_prog_lex_yytext_pointer=no ac_save_LIBS=$LIBS LIBS="$LEXLIB $ac_save_LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define YYTEXT_POINTER 1 `cat $LEX_OUTPUT_ROOT.c` _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_prog_lex_yytext_pointer=yes fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_lex_yytext_pointer" >&5 $as_echo "$ac_cv_prog_lex_yytext_pointer" >&6; } if test $ac_cv_prog_lex_yytext_pointer = yes; then $as_echo "#define YYTEXT_POINTER 1" >>confdefs.h fi rm -f conftest.l $LEX_OUTPUT_ROOT.c fi ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu if test -z "$CXX"; then if test -n "$CCC"; then CXX=$CCC else if test -n "$ac_tool_prefix"; then for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl.exe FCC KCC RCC xlC_r xlC 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_CXX+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$CXX"; then ac_cv_prog_CXX="$CXX" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_CXX="$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 CXX=$ac_cv_prog_CXX if test -n "$CXX"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CXX" >&5 $as_echo "$CXX" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi test -n "$CXX" && break done fi if test -z "$CXX"; then ac_ct_CXX=$CXX for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl.exe FCC KCC RCC xlC_r xlC 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_CXX+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$ac_ct_CXX"; then ac_cv_prog_ac_ct_CXX="$ac_ct_CXX" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_CXX="$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_CXX=$ac_cv_prog_ac_ct_CXX if test -n "$ac_ct_CXX"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CXX" >&5 $as_echo "$ac_ct_CXX" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi test -n "$ac_ct_CXX" && break done if test "x$ac_ct_CXX" = x; then CXX="g++" 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 CXX=$ac_ct_CXX fi fi fi fi # 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 { $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_cxx_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_cxx_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_cxx_compiler_gnu=$ac_compiler_gnu fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_cxx_compiler_gnu" >&5 $as_echo "$ac_cv_cxx_compiler_gnu" >&6; } if test $ac_compiler_gnu = yes; then GXX=yes else GXX= fi ac_test_CXXFLAGS=${CXXFLAGS+set} ac_save_CXXFLAGS=$CXXFLAGS { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $CXX accepts -g" >&5 $as_echo_n "checking whether $CXX accepts -g... " >&6; } if ${ac_cv_prog_cxx_g+:} false; then : $as_echo_n "(cached) " >&6 else ac_save_cxx_werror_flag=$ac_cxx_werror_flag ac_cxx_werror_flag=yes ac_cv_prog_cxx_g=no CXXFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main () { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : ac_cv_prog_cxx_g=yes else CXXFLAGS="" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main () { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : else ac_cxx_werror_flag=$ac_save_cxx_werror_flag CXXFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main () { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : ac_cv_prog_cxx_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_cxx_werror_flag=$ac_save_cxx_werror_flag fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cxx_g" >&5 $as_echo "$ac_cv_prog_cxx_g" >&6; } if test "$ac_test_CXXFLAGS" = set; then CXXFLAGS=$ac_save_CXXFLAGS elif test $ac_cv_prog_cxx_g = yes; then if test "$GXX" = yes; then CXXFLAGS="-g -O2" else CXXFLAGS="-g" fi else if test "$GXX" = yes; then CXXFLAGS="-O2" else CXXFLAGS= fi fi ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu 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 as_fn_executable_p "$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' 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 as_fn_executable_p "$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 as_fn_executable_p "$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 as_fn_executable_p "$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 as_fn_executable_p "$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 as_fn_executable_p "$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 as_fn_executable_p "$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 { $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 struct stat; /* 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=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether ${MAKE-make} sets \$(MAKE)" >&5 $as_echo_n "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; } set x ${MAKE-make} ac_make=`$as_echo "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'` if eval \${ac_cv_prog_make_${ac_make}_set+:} false; then : $as_echo_n "(cached) " >&6 else cat >conftest.make <<\_ACEOF SHELL = /bin/sh all: @echo '@@@%%%=$(MAKE)=@@@%%%' _ACEOF # GNU make sometimes prints "make[1]: Entering ...", which would confuse us. case `${MAKE-make} -f conftest.make 2>/dev/null` in *@@@%%%=?*=@@@%%%*) eval ac_cv_prog_make_${ac_make}_set=yes;; *) eval ac_cv_prog_make_${ac_make}_set=no;; esac rm -f conftest.make fi if eval test \$ac_cv_prog_make_${ac_make}_set = yes; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5 $as_echo "yes" >&6; } SET_MAKE= else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } SET_MAKE="MAKE=${MAKE-make}" fi for ac_prog in 'bison -y' byacc 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_YACC+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$YACC"; then ac_cv_prog_YACC="$YACC" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_YACC="$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 YACC=$ac_cv_prog_YACC if test -n "$YACC"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $YACC" >&5 $as_echo "$YACC" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi test -n "$YACC" && break done test -n "$YACC" || YACC="yacc" if test "$GXX" = yes ; then ac_gcc_version=`echo __GNUC__ | $CC -E - | grep -v ^\#` ac_clang=`echo __clang__ | $CC -E - | grep -v ^\#` if test "$ac_gcc_version" -lt 4; then CFLAGS=$CFLAGS" -finline-limit=400" else if test "$ac_clang" != 1; then CFLAGS=$CFLAGS" -fno-var-tracking" fi fi fi ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu { $as_echo "$as_me:${as_lineno-$LINENO}: checking how to run the C++ preprocessor" >&5 $as_echo_n "checking how to run the C++ preprocessor... " >&6; } if test -z "$CXXCPP"; then if ${ac_cv_prog_CXXCPP+:} false; then : $as_echo_n "(cached) " >&6 else # Double quotes because CXXCPP needs to be expanded for CXXCPP in "$CXX -E" "/lib/cpp" do ac_preproc_ok=false for ac_cxx_preproc_warn_flag in '' yes do # Use a header file that comes with gcc, so configuring glibc # with a fresh cross-compiler works. # Prefer to if __STDC__ is defined, since # exists even on freestanding compilers. # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. "Syntax error" is here to catch this case. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __STDC__ # include #else # include #endif Syntax error _ACEOF if ac_fn_cxx_try_cpp "$LINENO"; then : else # Broken: fails on valid input. continue fi rm -f conftest.err conftest.i conftest.$ac_ext # OK, works on sane cases. Now check whether nonexistent headers # can be detected and how. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_cxx_try_cpp "$LINENO"; then : # Broken: success on invalid input. continue else # Passes both tests. ac_preproc_ok=: break fi rm -f conftest.err conftest.i conftest.$ac_ext done # Because of `break', _AC_PREPROC_IFELSE's cleaning code was skipped. rm -f conftest.i conftest.err conftest.$ac_ext if $ac_preproc_ok; then : break fi done ac_cv_prog_CXXCPP=$CXXCPP fi CXXCPP=$ac_cv_prog_CXXCPP else ac_cv_prog_CXXCPP=$CXXCPP fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $CXXCPP" >&5 $as_echo "$CXXCPP" >&6; } ac_preproc_ok=false for ac_cxx_preproc_warn_flag in '' yes do # Use a header file that comes with gcc, so configuring glibc # with a fresh cross-compiler works. # Prefer to if __STDC__ is defined, since # exists even on freestanding compilers. # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. "Syntax error" is here to catch this case. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __STDC__ # include #else # include #endif Syntax error _ACEOF if ac_fn_cxx_try_cpp "$LINENO"; then : else # Broken: fails on valid input. continue fi rm -f conftest.err conftest.i conftest.$ac_ext # OK, works on sane cases. Now check whether nonexistent headers # can be detected and how. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_cxx_try_cpp "$LINENO"; then : # Broken: success on invalid input. continue else # Passes both tests. ac_preproc_ok=: break fi rm -f conftest.err conftest.i conftest.$ac_ext done # Because of `break', _AC_PREPROC_IFELSE's cleaning code was skipped. rm -f conftest.i conftest.err conftest.$ac_ext if $ac_preproc_ok; then : 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 $? "C++ preprocessor \"$CXXCPP\" fails sanity check See \`config.log' for more details" "$LINENO" 5; } fi ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu ac_fn_cxx_check_header_mongrel "$LINENO" "unordered_map" "ac_cv_header_unordered_map" "$ac_includes_default" if test "x$ac_cv_header_unordered_map" = xyes; then : $as_echo "#define HAVE_UNORDERED_MAP 1" >>confdefs.h else ac_fn_cxx_check_header_mongrel "$LINENO" "tr1/unordered_map" "ac_cv_header_tr1_unordered_map" "$ac_includes_default" if test "x$ac_cv_header_tr1_unordered_map" = xyes; then : $as_echo "#define HAVE_TR1_UNORDERED_MAP 1" >>confdefs.h else ac_fn_cxx_check_header_mongrel "$LINENO" "ext/hash_map" "ac_cv_header_ext_hash_map" "$ac_includes_default" if test "x$ac_cv_header_ext_hash_map" = xyes; then : else OPTIONS=$OPTIONS"-DNOHASH " fi fi fi GCVERSION=7.6.0 ATOMICVERSION=7.4.4 GCFILE=gc-$GCVERSION ac_cv_use_gc="system" as_ac_File=`$as_echo "ac_cv_file_$GCFILE.tar.gz" | $as_tr_sh` { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $GCFILE.tar.gz" >&5 $as_echo_n "checking for $GCFILE.tar.gz... " >&6; } if eval \${$as_ac_File+:} false; then : $as_echo_n "(cached) " >&6 else test "$cross_compiling" = yes && as_fn_error $? "cannot check for file existence when cross compiling" "$LINENO" 5 if test -r "$GCFILE.tar.gz"; then eval "$as_ac_File=yes" else eval "$as_ac_File=no" fi fi eval ac_res=\$$as_ac_File { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 $as_echo "$ac_res" >&6; } if eval test \"x\$"$as_ac_File"\" = x"yes"; then : ac_cv_use_gc=$GCVERSION fi # Check whether --enable-gc was given. if test "${enable_gc+set}" = set; then : enableval=$enable_gc; if test "x$enableval" != "xyes" ; then ac_cv_use_gc=$enableval fi fi OPTIONS="-D_FILE_OFFSET_BITS=64 " GCLIB= GCPPLIB= GCNAME="Boehm Garbage Collector" GCOPTIONS="--disable-shared --enable-large-config" if test "x$ac_cv_use_gc" != "xno" ; then OPTIONS=$OPTIONS"-DUSEGC " case _$ac_cv_use_gc in _|_system|_*[\\/]*) if test "x$ac_cv_use_gc" = "xsystem" ; then INCL="-I$prefix/include/gc -I/usr/include/gc" LIBS=$LIBS"-L$prefix/lib " else INCL="-I$ac_cv_use_gc/include/gc" LIBS=$LIBS"-L$ac_cv_use_gc/lib " fi CPPFLAGS_SAVE=$CPPFLAGS CPPFLAGS=$CPPFLAGS" $INCL" ac_fn_cxx_check_header_mongrel "$LINENO" "gc.h" "ac_cv_header_gc_h" "$ac_includes_default" if test "x$ac_cv_header_gc_h" = xyes; then : { $as_echo "$as_me:${as_lineno-$LINENO}: checking for GC_malloc in -lgc" >&5 $as_echo_n "checking for GC_malloc in -lgc... " >&6; } if ${ac_cv_lib_gc_GC_malloc+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lgc $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 GC_malloc (); int main () { return GC_malloc (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_gc_GC_malloc=yes else ac_cv_lib_gc_GC_malloc=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_gc_GC_malloc" >&5 $as_echo "$ac_cv_lib_gc_GC_malloc" >&6; } if test "x$ac_cv_lib_gc_GC_malloc" = xyes; then : LIBS=$LIBS"-lgc " { $as_echo "$as_me:${as_lineno-$LINENO}: enabling system $GCNAME" >&5 $as_echo "$as_me: enabling system $GCNAME" >&6;} else GCDIR=$GCFILE INCL="-I\$(GC)/include" GCLIB="\$(GC)/.libs/libgc.a" { $as_echo "$as_me:${as_lineno-$LINENO}: $GCNAME library not found" >&5 $as_echo "$as_me: $GCNAME library not found" >&6;} fi else GCDIR=$GCFILE GCLIB="\$(GC)/.libs/libgc.a" INCL="-I\$(GC)/include" { $as_echo "$as_me:${as_lineno-$LINENO}: $GCNAME header file not found" >&5 $as_echo "$as_me: $GCNAME header file not found" >&6;} fi CPPFLAGS=$CPPFLAGS_SAVE ;; *) GCVERSION=$ac_cv_use_gc GCFILE=gc-$GCVERSION GCDIR=$GCFILE { $as_echo "$as_me:${as_lineno-$LINENO}: enabling local $GCNAME $GCDIR" >&5 $as_echo "$as_me: enabling local $GCNAME $GCDIR" >&6;} GCLIB="\$(GC)/.libs/libgc.a" INCL="-I\$(GC)/include" ;; esac else { $as_echo "$as_me:${as_lineno-$LINENO}: disabling the $GCNAME" >&5 $as_echo "$as_me: disabling the $GCNAME" >&6;} fi # Check whether --enable-gc-debug was given. if test "${enable_gc_debug+set}" = set; then : enableval=$enable_gc_debug; if test "x$ac_cv_use_gc" != "xno" ; then if test "x$enableval" = "xyes" ; then OPTIONS=$OPTIONS"-DGC_DEBUG " { $as_echo "$as_me:${as_lineno-$LINENO}: *** Enabling GC debugging: remember to make clean ***" >&5 $as_echo "$as_me: *** Enabling GC debugging: remember to make clean ***" >&6;} { $as_echo "$as_me:${as_lineno-$LINENO}: *** Set the environment variable GC_FIND_LEAK at runtime ***" >&5 $as_echo "$as_me: *** Set the environment variable GC_FIND_LEAK at runtime ***" >&6;} fi fi fi # Check whether --enable-gc-full-debug was given. if test "${enable_gc_full_debug+set}" = set; then : enableval=$enable_gc_full_debug; if test "x$ac_cv_use_gc" != "xno" ; then if test "x$enableval" = "xyes" ; then OPTIONS=$OPTIONS"-DGC_DEBUG -DGC_BACKTRACE " GCOPTIONS=$GCOPTIONS"--enable-gc-debug " { $as_echo "$as_me:${as_lineno-$LINENO}: *** Enabling GC backtrace debugging; remember to make gc-clean ***" >&5 $as_echo "$as_me: *** Enabling GC backtrace debugging; remember to make gc-clean ***" >&6;} fi fi fi if test "$OSTYPE" = "msdos"; then INCL=$INCL" -I/usr/include/tirpc" CPPFLAGS=$CPPFLAGS" -D__MSDOS__ $INCL" fi ac_fn_cxx_check_func "$LINENO" "getopt_long_only" "ac_cv_func_getopt_long_only" if test "x$ac_cv_func_getopt_long_only" = xyes; then : $as_echo "#define HAVE_GNU_GETOPT_H 1" >>confdefs.h else getopt="getopt getopt1" fi # Checks for libraries. { $as_echo "$as_me:${as_lineno-$LINENO}: checking for sqrt in -lm" >&5 $as_echo_n "checking for sqrt in -lm... " >&6; } if ${ac_cv_lib_m_sqrt+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lm $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 sqrt (); int main () { return sqrt (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_m_sqrt=yes else ac_cv_lib_m_sqrt=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_m_sqrt" >&5 $as_echo "$ac_cv_lib_m_sqrt" >&6; } if test "x$ac_cv_lib_m_sqrt" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBM 1 _ACEOF LIBS="-lm $LIBS" else as_fn_error $? "*** Please install libm on your system ***" "$LINENO" 5 fi { $as_echo "$as_me:${as_lineno-$LINENO}: checking for deflate in -lz" >&5 $as_echo_n "checking for deflate in -lz... " >&6; } if ${ac_cv_lib_z_deflate+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lz $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 deflate (); int main () { return deflate (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_z_deflate=yes else ac_cv_lib_z_deflate=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_z_deflate" >&5 $as_echo "$ac_cv_lib_z_deflate" >&6; } if test "x$ac_cv_lib_z_deflate" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBZ 1 _ACEOF LIBS="-lz $LIBS" else as_fn_error $? "*** Please install libz or zlib-devel on your system ***" "$LINENO" 5 fi # Make sure we can run config.sub. $SHELL "$ac_aux_dir/config.sub" sun4 >/dev/null 2>&1 || as_fn_error $? "cannot run $SHELL $ac_aux_dir/config.sub" "$LINENO" 5 { $as_echo "$as_me:${as_lineno-$LINENO}: checking build system type" >&5 $as_echo_n "checking build system type... " >&6; } if ${ac_cv_build+:} false; then : $as_echo_n "(cached) " >&6 else ac_build_alias=$build_alias test "x$ac_build_alias" = x && ac_build_alias=`$SHELL "$ac_aux_dir/config.guess"` test "x$ac_build_alias" = x && as_fn_error $? "cannot guess build type; you must specify one" "$LINENO" 5 ac_cv_build=`$SHELL "$ac_aux_dir/config.sub" $ac_build_alias` || as_fn_error $? "$SHELL $ac_aux_dir/config.sub $ac_build_alias failed" "$LINENO" 5 fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_build" >&5 $as_echo "$ac_cv_build" >&6; } case $ac_cv_build in *-*-*) ;; *) as_fn_error $? "invalid value of canonical build" "$LINENO" 5;; esac build=$ac_cv_build ac_save_IFS=$IFS; IFS='-' set x $ac_cv_build shift build_cpu=$1 build_vendor=$2 shift; shift # Remember, the first character of IFS is used to create $*, # except with old shells: build_os=$* IFS=$ac_save_IFS case $build_os in *\ *) build_os=`echo "$build_os" | sed 's/ /-/g'`;; esac { $as_echo "$as_me:${as_lineno-$LINENO}: checking host system type" >&5 $as_echo_n "checking host system type... " >&6; } if ${ac_cv_host+:} false; then : $as_echo_n "(cached) " >&6 else if test "x$host_alias" = x; then ac_cv_host=$ac_cv_build else ac_cv_host=`$SHELL "$ac_aux_dir/config.sub" $host_alias` || as_fn_error $? "$SHELL $ac_aux_dir/config.sub $host_alias failed" "$LINENO" 5 fi fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_host" >&5 $as_echo "$ac_cv_host" >&6; } case $ac_cv_host in *-*-*) ;; *) as_fn_error $? "invalid value of canonical host" "$LINENO" 5;; esac host=$ac_cv_host ac_save_IFS=$IFS; IFS='-' set x $ac_cv_host shift host_cpu=$1 host_vendor=$2 shift; shift # Remember, the first character of IFS is used to create $*, # except with old shells: host_os=$* IFS=$ac_save_IFS case $host_os in *\ *) host_os=`echo "$host_os" | sed 's/ /-/g'`;; esac 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 ax_pthread_ok=no # We used to check for pthread.h first, but this fails if pthread.h # requires special compiler flags (e.g. on True64 or Sequent). # It gets checked for in the link test anyway. # First of all, check if the user has set any of the PTHREAD_LIBS, # etcetera environment variables, and if threads linking works using # them: if test x"$PTHREAD_LIBS$PTHREAD_CFLAGS" != x; then save_CFLAGS="$CFLAGS" CFLAGS="$CFLAGS $PTHREAD_CFLAGS" save_LIBS="$LIBS" LIBS="$PTHREAD_LIBS $LIBS" { $as_echo "$as_me:${as_lineno-$LINENO}: checking for pthread_join in LIBS=$PTHREAD_LIBS with CFLAGS=$PTHREAD_CFLAGS" >&5 $as_echo_n "checking for pthread_join in LIBS=$PTHREAD_LIBS with CFLAGS=$PTHREAD_CFLAGS... " >&6; } cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 pthread_join (); int main () { return pthread_join (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO"; then : ax_pthread_ok=yes fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ax_pthread_ok" >&5 $as_echo "$ax_pthread_ok" >&6; } if test x"$ax_pthread_ok" = xno; then PTHREAD_LIBS="" PTHREAD_CFLAGS="" fi LIBS="$save_LIBS" CFLAGS="$save_CFLAGS" fi # We must check for the threads library under a number of different # names; the ordering is very important because some systems # (e.g. DEC) have both -lpthread and -lpthreads, where one of the # libraries is broken (non-POSIX). # Create a list of thread flags to try. Items starting with a "-" are # C compiler flags, and other items are library names, except for "none" # which indicates that we try without any flags at all, and "pthread-config" # which is a program returning the flags for the Pth emulation library. ax_pthread_flags="pthreads none -Kthread -kthread lthread -pthread -pthreads -mthreads pthread --thread-safe -mt pthread-config" # The ordering *is* (sometimes) important. Some notes on the # individual items follow: # pthreads: AIX (must check this before -lpthread) # none: in case threads are in libc; should be tried before -Kthread and # other compiler flags to prevent continual compiler warnings # -Kthread: Sequent (threads in libc, but -Kthread needed for pthread.h) # -kthread: FreeBSD kernel threads (preferred to -pthread since SMP-able) # lthread: LinuxThreads port on FreeBSD (also preferred to -pthread) # -pthread: Linux/gcc (kernel threads), BSD/gcc (userland threads) # -pthreads: Solaris/gcc # -mthreads: Mingw32/gcc, Lynx/gcc # -mt: Sun Workshop C (may only link SunOS threads [-lthread], but it # doesn't hurt to check since this sometimes defines pthreads too; # also defines -D_REENTRANT) # ... -mt is also the pthreads flag for HP/aCC # pthread: Linux, etcetera # --thread-safe: KAI C++ # pthread-config: use pthread-config program (for GNU Pth library) case ${host_os} in solaris*) # On Solaris (at least, for some versions), libc contains stubbed # (non-functional) versions of the pthreads routines, so link-based # tests will erroneously succeed. (We need to link with -pthreads/-mt/ # -lpthread.) (The stubs are missing pthread_cleanup_push, or rather # a function called by this macro, so we could check for that, but # who knows whether they'll stub that too in a future libc.) So, # we'll just look for -pthreads and -lpthread first: ax_pthread_flags="-pthreads pthread -mt -pthread $ax_pthread_flags" ;; darwin*) ax_pthread_flags="-pthread $ax_pthread_flags" ;; esac if test x"$ax_pthread_ok" = xno; then for flag in $ax_pthread_flags; do case $flag in none) { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether pthreads work without any flags" >&5 $as_echo_n "checking whether pthreads work without any flags... " >&6; } ;; -*) { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether pthreads work with $flag" >&5 $as_echo_n "checking whether pthreads work with $flag... " >&6; } PTHREAD_CFLAGS="$flag" ;; pthread-config) # Extract the first word of "pthread-config", so it can be a program name with args. set dummy pthread-config; 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_ax_pthread_config+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$ax_pthread_config"; then ac_cv_prog_ax_pthread_config="$ax_pthread_config" # 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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_ax_pthread_config="yes" $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 test -z "$ac_cv_prog_ax_pthread_config" && ac_cv_prog_ax_pthread_config="no" fi fi ax_pthread_config=$ac_cv_prog_ax_pthread_config if test -n "$ax_pthread_config"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ax_pthread_config" >&5 $as_echo "$ax_pthread_config" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi if test x"$ax_pthread_config" = xno; then continue; fi PTHREAD_CFLAGS="`pthread-config --cflags`" PTHREAD_LIBS="`pthread-config --ldflags` `pthread-config --libs`" ;; *) { $as_echo "$as_me:${as_lineno-$LINENO}: checking for the pthreads library -l$flag" >&5 $as_echo_n "checking for the pthreads library -l$flag... " >&6; } PTHREAD_LIBS="-l$flag" ;; esac save_LIBS="$LIBS" save_CFLAGS="$CFLAGS" LIBS="$PTHREAD_LIBS $LIBS" CFLAGS="$CFLAGS $PTHREAD_CFLAGS" # Check for various functions. We must include pthread.h, # since some functions may be macros. (On the Sequent, we # need a special flag -Kthread to make this header compile.) # We check for pthread_join because it is in -lpthread on IRIX # while pthread_create is in libc. We check for pthread_attr_init # due to DEC craziness with -lpthreads. We check for # pthread_cleanup_push because it is one of the few pthread # functions on Solaris that doesn't have a non-functional libc stub. # We try pthread_create on general principles. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include static void routine(void *a) { a = 0; } static void *start_routine(void *a) { return a; } int main () { pthread_t th; pthread_attr_t attr; pthread_create(&th, 0, start_routine, 0); pthread_join(th, 0); pthread_attr_init(&attr); pthread_cleanup_push(routine, 0); pthread_cleanup_pop(0) /* ; */ ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO"; then : ax_pthread_ok=yes fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS="$save_LIBS" CFLAGS="$save_CFLAGS" { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ax_pthread_ok" >&5 $as_echo "$ax_pthread_ok" >&6; } if test "x$ax_pthread_ok" = xyes; then break; fi PTHREAD_LIBS="" PTHREAD_CFLAGS="" done fi # Various other checks: if test "x$ax_pthread_ok" = xyes; then save_LIBS="$LIBS" LIBS="$PTHREAD_LIBS $LIBS" save_CFLAGS="$CFLAGS" CFLAGS="$CFLAGS $PTHREAD_CFLAGS" # Detect AIX lossage: JOINABLE attribute is called UNDETACHED. { $as_echo "$as_me:${as_lineno-$LINENO}: checking for joinable pthread attribute" >&5 $as_echo_n "checking for joinable pthread attribute... " >&6; } attr_name=unknown for attr in PTHREAD_CREATE_JOINABLE PTHREAD_CREATE_UNDETACHED; do cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main () { int attr = $attr; return attr /* ; */ ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO"; then : attr_name=$attr; break fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext done { $as_echo "$as_me:${as_lineno-$LINENO}: result: $attr_name" >&5 $as_echo "$attr_name" >&6; } if test "$attr_name" != PTHREAD_CREATE_JOINABLE; then cat >>confdefs.h <<_ACEOF #define PTHREAD_CREATE_JOINABLE $attr_name _ACEOF fi { $as_echo "$as_me:${as_lineno-$LINENO}: checking if more special flags are required for pthreads" >&5 $as_echo_n "checking if more special flags are required for pthreads... " >&6; } flag=no case ${host_os} in aix* | freebsd* | darwin*) flag="-D_THREAD_SAFE";; osf* | hpux*) flag="-D_REENTRANT";; solaris*) if test "$GCC" = "yes"; then flag="-D_REENTRANT" else flag="-mt -D_REENTRANT" fi ;; esac { $as_echo "$as_me:${as_lineno-$LINENO}: result: ${flag}" >&5 $as_echo "${flag}" >&6; } if test "x$flag" != xno; then PTHREAD_CFLAGS="$flag $PTHREAD_CFLAGS" fi { $as_echo "$as_me:${as_lineno-$LINENO}: checking for PTHREAD_PRIO_INHERIT" >&5 $as_echo_n "checking for PTHREAD_PRIO_INHERIT... " >&6; } if ${ax_cv_PTHREAD_PRIO_INHERIT+:} false; then : $as_echo_n "(cached) " >&6 else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main () { int i = PTHREAD_PRIO_INHERIT; ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO"; then : ax_cv_PTHREAD_PRIO_INHERIT=yes else ax_cv_PTHREAD_PRIO_INHERIT=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ax_cv_PTHREAD_PRIO_INHERIT" >&5 $as_echo "$ax_cv_PTHREAD_PRIO_INHERIT" >&6; } if test "x$ax_cv_PTHREAD_PRIO_INHERIT" = "xyes"; then : $as_echo "#define HAVE_PTHREAD_PRIO_INHERIT 1" >>confdefs.h fi LIBS="$save_LIBS" CFLAGS="$save_CFLAGS" # More AIX lossage: must compile with xlc_r or cc_r if test x"$GCC" != xyes; then for ac_prog in xlc_r cc_r 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_PTHREAD_CC+:} false; then : $as_echo_n "(cached) " >&6 else if test -n "$PTHREAD_CC"; then ac_cv_prog_PTHREAD_CC="$PTHREAD_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 as_fn_executable_p "$as_dir/$ac_word$ac_exec_ext"; then ac_cv_prog_PTHREAD_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 PTHREAD_CC=$ac_cv_prog_PTHREAD_CC if test -n "$PTHREAD_CC"; then { $as_echo "$as_me:${as_lineno-$LINENO}: result: $PTHREAD_CC" >&5 $as_echo "$PTHREAD_CC" >&6; } else { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 $as_echo "no" >&6; } fi test -n "$PTHREAD_CC" && break done test -n "$PTHREAD_CC" || PTHREAD_CC="${CC}" else PTHREAD_CC=$CC fi else PTHREAD_CC="$CC" fi # Finally, execute ACTION-IF-FOUND/ACTION-IF-NOT-FOUND: if test x"$ax_pthread_ok" = xyes; then $as_echo "#define HAVE_PTHREAD 1" >>confdefs.h : else ax_pthread_ok=no fi ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu # Check whether --enable-sigsegv was given. if test "${enable_sigsegv+set}" = set; then : enableval=$enable_sigsegv; fi if test "x$enable_sigsegv" != "xno"; then { $as_echo "$as_me:${as_lineno-$LINENO}: checking for stackoverflow_install_handler in -lsigsegv" >&5 $as_echo_n "checking for stackoverflow_install_handler in -lsigsegv... " >&6; } if ${ac_cv_lib_sigsegv_stackoverflow_install_handler+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lsigsegv $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 stackoverflow_install_handler (); int main () { return stackoverflow_install_handler (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_sigsegv_stackoverflow_install_handler=yes else ac_cv_lib_sigsegv_stackoverflow_install_handler=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_sigsegv_stackoverflow_install_handler" >&5 $as_echo "$ac_cv_lib_sigsegv_stackoverflow_install_handler" >&6; } if test "x$ac_cv_lib_sigsegv_stackoverflow_install_handler" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBSIGSEGV 1 _ACEOF LIBS="-lsigsegv $LIBS" fi fi { $as_echo "$as_me:${as_lineno-$LINENO}: checking for sched_yield in -lrt" >&5 $as_echo_n "checking for sched_yield in -lrt... " >&6; } if ${ac_cv_lib_rt_sched_yield+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lrt $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 sched_yield (); int main () { return sched_yield (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_rt_sched_yield=yes else ac_cv_lib_rt_sched_yield=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_rt_sched_yield" >&5 $as_echo "$ac_cv_lib_rt_sched_yield" >&6; } if test "x$ac_cv_lib_rt_sched_yield" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBRT 1 _ACEOF LIBS="-lrt $LIBS" fi # Check whether --enable-readline was given. if test "${enable_readline+set}" = set; then : enableval=$enable_readline; fi if test "x$enable_readline" != "xno"; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #include int main () { #ifndef RL_READLINE_VERSION abort #endif ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : { $as_echo "$as_me:${as_lineno-$LINENO}: checking for history_list in -lreadline" >&5 $as_echo_n "checking for history_list in -lreadline... " >&6; } if ${ac_cv_lib_readline_history_list+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lreadline $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 history_list (); int main () { return history_list (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_readline_history_list=yes else ac_cv_lib_readline_history_list=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_readline_history_list" >&5 $as_echo "$ac_cv_lib_readline_history_list" >&6; } if test "x$ac_cv_lib_readline_history_list" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBREADLINE 1 _ACEOF LIBS="-lreadline $LIBS" else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find GNU libreadline 4.3 or later: will compile without readline support ***" >&5 $as_echo "$as_me: *** Could not find GNU libreadline 4.3 or later: will compile without readline support ***" >&6;} fi else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find GNU readline 4.3 or later: will compile without readline support ***" >&5 $as_echo "$as_me: *** Could not find GNU readline 4.3 or later: will compile without readline support ***" >&6;} fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext for ac_header in ncurses/curses.h ncurses.h curses.h do : as_ac_Header=`$as_echo "ac_cv_header_$ac_header" | $as_tr_sh` ac_fn_cxx_check_header_mongrel "$LINENO" "$ac_header" "$as_ac_Header" "$ac_includes_default" if eval test \"x\$"$as_ac_Header"\" = x"yes"; then : cat >>confdefs.h <<_ACEOF #define `$as_echo "HAVE_$ac_header" | $as_tr_cpp` 1 _ACEOF break fi done { $as_echo "$as_me:${as_lineno-$LINENO}: checking for setupterm in -lncurses" >&5 $as_echo_n "checking for setupterm in -lncurses... " >&6; } if ${ac_cv_lib_ncurses_setupterm+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lncurses $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 setupterm (); int main () { return setupterm (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_ncurses_setupterm=yes else ac_cv_lib_ncurses_setupterm=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_ncurses_setupterm" >&5 $as_echo "$ac_cv_lib_ncurses_setupterm" >&6; } if test "x$ac_cv_lib_ncurses_setupterm" = xyes; then : $as_echo "#define HAVE_LIBCURSES 1" >>confdefs.h LIBS=$LIBS"-lncurses " else { $as_echo "$as_me:${as_lineno-$LINENO}: checking for setupterm in -lcurses" >&5 $as_echo_n "checking for setupterm in -lcurses... " >&6; } if ${ac_cv_lib_curses_setupterm+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lcurses $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 setupterm (); int main () { return setupterm (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_curses_setupterm=yes else ac_cv_lib_curses_setupterm=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_curses_setupterm" >&5 $as_echo "$ac_cv_lib_curses_setupterm" >&6; } if test "x$ac_cv_lib_curses_setupterm" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBCURSES 1 _ACEOF LIBS="-lcurses $LIBS" fi fi fi # Checks for header files. { $as_echo "$as_me:${as_lineno-$LINENO}: checking for sys/wait.h that is POSIX.1 compatible" >&5 $as_echo_n "checking for sys/wait.h that is POSIX.1 compatible... " >&6; } if ${ac_cv_header_sys_wait_h+:} false; then : $as_echo_n "(cached) " >&6 else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #ifndef WEXITSTATUS # define WEXITSTATUS(stat_val) ((unsigned int) (stat_val) >> 8) #endif #ifndef WIFEXITED # define WIFEXITED(stat_val) (((stat_val) & 255) == 0) #endif int main () { int s; wait (&s); s = WIFEXITED (s) ? WEXITSTATUS (s) : 1; ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : ac_cv_header_sys_wait_h=yes else ac_cv_header_sys_wait_h=no fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_header_sys_wait_h" >&5 $as_echo "$ac_cv_header_sys_wait_h" >&6; } if test $ac_cv_header_sys_wait_h = yes; then $as_echo "#define HAVE_SYS_WAIT_H 1" >>confdefs.h fi for ac_header in fenv.h stddef.h libintl.h do : as_ac_Header=`$as_echo "ac_cv_header_$ac_header" | $as_tr_sh` ac_fn_cxx_check_header_mongrel "$LINENO" "$ac_header" "$as_ac_Header" "$ac_includes_default" if eval test \"x\$"$as_ac_Header"\" = x"yes"; then : cat >>confdefs.h <<_ACEOF #define `$as_echo "HAVE_$ac_header" | $as_tr_cpp` 1 _ACEOF fi done for ac_header in fpu_control.h do : ac_fn_cxx_check_header_mongrel "$LINENO" "fpu_control.h" "ac_cv_header_fpu_control_h" "$ac_includes_default" if test "x$ac_cv_header_fpu_control_h" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_FPU_CONTROL_H 1 _ACEOF fi done cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include "xstream.h" int main () { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : { $as_echo "$as_me:${as_lineno-$LINENO}: checking for library containing xdrstdio_create" >&5 $as_echo_n "checking for library containing xdrstdio_create... " >&6; } if ${ac_cv_search_xdrstdio_create+:} false; then : $as_echo_n "(cached) " >&6 else ac_func_search_save_LIBS=$LIBS cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 xdrstdio_create (); int main () { return xdrstdio_create (); ; return 0; } _ACEOF for ac_lib in '' nsl rpc; do if test -z "$ac_lib"; then ac_res="none required" else ac_res=-l$ac_lib LIBS="-l$ac_lib $ac_func_search_save_LIBS" fi if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_search_xdrstdio_create=$ac_res fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext if ${ac_cv_search_xdrstdio_create+:} false; then : break fi done if ${ac_cv_search_xdrstdio_create+:} false; then : else ac_cv_search_xdrstdio_create=no fi rm conftest.$ac_ext LIBS=$ac_func_search_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_search_xdrstdio_create" >&5 $as_echo "$ac_cv_search_xdrstdio_create" >&6; } ac_res=$ac_cv_search_xdrstdio_create if test "$ac_res" != no; then : test "$ac_res" = "none required" || LIBS="$ac_res $LIBS" fi $as_echo "#define HAVE_RPC_RPC_H 1" >>confdefs.h else { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: *** Broken rpc headers; XDR support disabled ***" >&5 $as_echo "$as_me: WARNING: *** Broken rpc headers; XDR support disabled ***" >&2;} fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext # Check whether --enable-gsl was given. if test "${enable_gsl+set}" = set; then : enableval=$enable_gsl; fi if test "x$enable_gsl" != "xno"; then ac_fn_cxx_check_header_mongrel "$LINENO" "gsl/gsl_sf.h" "ac_cv_header_gsl_gsl_sf_h" "$ac_includes_default" if test "x$ac_cv_header_gsl_gsl_sf_h" = xyes; then : { $as_echo "$as_me:${as_lineno-$LINENO}: checking for gsl_sf_debye_6 in -lgsl" >&5 $as_echo_n "checking for gsl_sf_debye_6 in -lgsl... " >&6; } if ${ac_cv_lib_gsl_gsl_sf_debye_6+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lgsl -lgslcblas $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 gsl_sf_debye_6 (); int main () { return gsl_sf_debye_6 (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_gsl_gsl_sf_debye_6=yes else ac_cv_lib_gsl_gsl_sf_debye_6=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_gsl_gsl_sf_debye_6" >&5 $as_echo "$ac_cv_lib_gsl_gsl_sf_debye_6" >&6; } if test "x$ac_cv_lib_gsl_gsl_sf_debye_6" = xyes; then : $as_echo "#define HAVE_LIBGSL 1" >>confdefs.h LIBS=$LIBS"-lgsl -lgslcblas " else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find libgsl: will compile without optional special functions. ***" >&5 $as_echo "$as_me: *** Could not find libgsl: will compile without optional special functions. ***" >&6;} fi else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Header file gsl_sf.h not found: will compile without optional special functions. ***" >&5 $as_echo "$as_me: *** Header file gsl_sf.h not found: will compile without optional special functions. ***" >&6;} fi fi # Check whether --enable-fftw was given. if test "${enable_fftw+set}" = set; then : enableval=$enable_fftw; fi if test "x$enable_fftw" != "xno"; then ac_fn_cxx_check_header_mongrel "$LINENO" "fftw3.h" "ac_cv_header_fftw3_h" "$ac_includes_default" if test "x$ac_cv_header_fftw3_h" = xyes; then : { $as_echo "$as_me:${as_lineno-$LINENO}: checking for fftw_execute in -lfftw3" >&5 $as_echo_n "checking for fftw_execute in -lfftw3... " >&6; } if ${ac_cv_lib_fftw3_fftw_execute+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lfftw3 $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 fftw_execute (); int main () { return fftw_execute (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_fftw3_fftw_execute=yes else ac_cv_lib_fftw3_fftw_execute=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_fftw3_fftw_execute" >&5 $as_echo "$ac_cv_lib_fftw3_fftw_execute" >&6; } if test "x$ac_cv_lib_fftw3_fftw_execute" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBFFTW3 1 _ACEOF LIBS="-lfftw3 $LIBS" else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find libfftw3: will compile without optional fast Fourier transforms. ***" >&5 $as_echo "$as_me: *** Could not find libfftw3: will compile without optional fast Fourier transforms. ***" >&6;} fi else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Header file fftw3.h not found: will compile without optional fast Fourier transforms. ***" >&5 $as_echo "$as_me: *** Header file fftw3.h not found: will compile without optional fast Fourier transforms. ***" >&6;} fi fi # Check whether --enable-gl was given. if test "${enable_gl+set}" = set; then : enableval=$enable_gl; fi # Check whether --enable-offscreen was given. if test "${enable_offscreen+set}" = set; then : enableval=$enable_offscreen; fi if test "x$enable_gl" != "xno"; then case "$OSTYPE" in msdos) ac_fn_cxx_check_header_mongrel "$LINENO" "GL/gl.h" "ac_cv_header_GL_gl_h" "$ac_includes_default" if test "x$ac_cv_header_GL_gl_h" = xyes; then : $as_echo "#define HAVE_LIBGL 1" >>confdefs.h LIBS=$LIBS"-lopengl32 " else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find libopengl32: will compile without OpenGL support ***" >&5 $as_echo "$as_me: *** Could not find libopengl32: will compile without OpenGL support ***" >&6;} fi { $as_echo "$as_me:${as_lineno-$LINENO}: checking for gluNewNurbsRenderer in -lGLU" >&5 $as_echo_n "checking for gluNewNurbsRenderer in -lGLU... " >&6; } if ${ac_cv_lib_GLU_gluNewNurbsRenderer+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lGLU $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 gluNewNurbsRenderer (); int main () { return gluNewNurbsRenderer (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_GLU_gluNewNurbsRenderer=yes else ac_cv_lib_GLU_gluNewNurbsRenderer=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_GLU_gluNewNurbsRenderer" >&5 $as_echo "$ac_cv_lib_GLU_gluNewNurbsRenderer" >&6; } if test "x$ac_cv_lib_GLU_gluNewNurbsRenderer" = xyes; then : $as_echo "#define HAVE_LIBGLU 1" >>confdefs.h LIBS=$LIBS"-lglu32 " else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find libglu32: will compile without OpenGL support ***" >&5 $as_echo "$as_me: *** Could not find libglu32: will compile without OpenGL support ***" >&6;} fi ac_fn_cxx_check_header_mongrel "$LINENO" "GL/glut.h" "ac_cv_header_GL_glut_h" "$ac_includes_default" if test "x$ac_cv_header_GL_glut_h" = xyes; then : $as_echo "#define HAVE_LIBGLUT 1" >>confdefs.h LIBS=$LIBS"-lfreeglut " else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find libfreeglut: will compile without GLUT support ***" >&5 $as_echo "$as_me: *** Could not find libfreeglut: will compile without GLUT support ***" >&6;} fi ;; darwin*) ac_fn_cxx_check_header_mongrel "$LINENO" "OpenGL/gl.h" "ac_cv_header_OpenGL_gl_h" "$ac_includes_default" if test "x$ac_cv_header_OpenGL_gl_h" = xyes; then : $as_echo "#define HAVE_LIBGL 1" >>confdefs.h fi ac_fn_cxx_check_header_mongrel "$LINENO" "OpenGL/glu.h" "ac_cv_header_OpenGL_glu_h" "$ac_includes_default" if test "x$ac_cv_header_OpenGL_glu_h" = xyes; then : $as_echo "#define HAVE_LIBGLU 1" >>confdefs.h fi ac_fn_cxx_check_header_mongrel "$LINENO" "GLUT/glut.h" "ac_cv_header_GLUT_glut_h" "$ac_includes_default" if test "x$ac_cv_header_GLUT_glut_h" = xyes; then : $as_echo "#define HAVE_LIBGLUT 1" >>confdefs.h cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #ifndef GLU_TESS_CALLBACK_TRIPLEDOT typedef GLvoid (* _GLUfuncptr)(...); void f(void) { gluNurbsCallback(gluNewNurbsRenderer(),GLU_NURBS_BEGIN,(_GLUfuncptr) glBegin); } #endif int main () { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : $as_echo "#define GLU_TESS_CALLBACK_TRIPLEDOT 1" >>confdefs.h fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext LIBS=$LIBS"-framework GLUT -framework OpenGL -framework Cocoa" else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find glut: will compile without GLUT support ***" >&5 $as_echo "$as_me: *** Could not find glut: will compile without GLUT support ***" >&6;} fi ;; *) { $as_echo "$as_me:${as_lineno-$LINENO}: checking for glDepthMask in -lGL" >&5 $as_echo_n "checking for glDepthMask in -lGL... " >&6; } if ${ac_cv_lib_GL_glDepthMask+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lGL $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 glDepthMask (); int main () { return glDepthMask (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_GL_glDepthMask=yes else ac_cv_lib_GL_glDepthMask=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_GL_glDepthMask" >&5 $as_echo "$ac_cv_lib_GL_glDepthMask" >&6; } if test "x$ac_cv_lib_GL_glDepthMask" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBGL 1 _ACEOF LIBS="-lGL $LIBS" fi { $as_echo "$as_me:${as_lineno-$LINENO}: checking for gluNewNurbsRenderer in -lGLU" >&5 $as_echo_n "checking for gluNewNurbsRenderer in -lGLU... " >&6; } if ${ac_cv_lib_GLU_gluNewNurbsRenderer+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lGLU $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 gluNewNurbsRenderer (); int main () { return gluNewNurbsRenderer (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_GLU_gluNewNurbsRenderer=yes else ac_cv_lib_GLU_gluNewNurbsRenderer=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_GLU_gluNewNurbsRenderer" >&5 $as_echo "$ac_cv_lib_GLU_gluNewNurbsRenderer" >&6; } if test "x$ac_cv_lib_GLU_gluNewNurbsRenderer" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBGLU 1 _ACEOF LIBS="-lGLU $LIBS" else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find libGLU: will compile without OpenGL support ***" >&5 $as_echo "$as_me: *** Could not find libGLU: will compile without OpenGL support ***" >&6;} fi { $as_echo "$as_me:${as_lineno-$LINENO}: checking for glutMainLoop in -lglut" >&5 $as_echo_n "checking for glutMainLoop in -lglut... " >&6; } if ${ac_cv_lib_glut_glutMainLoop+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lglut $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 glutMainLoop (); int main () { return glutMainLoop (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_glut_glutMainLoop=yes else ac_cv_lib_glut_glutMainLoop=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_glut_glutMainLoop" >&5 $as_echo "$ac_cv_lib_glut_glutMainLoop" >&6; } if test "x$ac_cv_lib_glut_glutMainLoop" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBGLUT 1 _ACEOF LIBS="-lglut $LIBS" else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find libglut: will compile without GLUT support ***" >&5 $as_echo "$as_me: *** Could not find libglut: will compile without GLUT support ***" >&6;} fi esac if test "x$enable_offscreen" != "xno"; then { $as_echo "$as_me:${as_lineno-$LINENO}: checking for OSMesaCreateContext in -lOSMesa" >&5 $as_echo_n "checking for OSMesaCreateContext in -lOSMesa... " >&6; } if ${ac_cv_lib_OSMesa_OSMesaCreateContext+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lOSMesa $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 OSMesaCreateContext (); int main () { return OSMesaCreateContext (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_OSMesa_OSMesaCreateContext=yes else ac_cv_lib_OSMesa_OSMesaCreateContext=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_OSMesa_OSMesaCreateContext" >&5 $as_echo "$ac_cv_lib_OSMesa_OSMesaCreateContext" >&6; } if test "x$ac_cv_lib_OSMesa_OSMesaCreateContext" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LIBOSMESA 1 _ACEOF LIBS="-lOSMesa $LIBS" else { $as_echo "$as_me:${as_lineno-$LINENO}: *** Could not find libOSMesa: will compile without offscreen rendering support ***" >&5 $as_echo "$as_me: *** Could not find libOSMesa: will compile without offscreen rendering support ***" >&6;} fi fi fi # Checks for typedefs, structures, and compiler characteristics. ac_fn_cxx_check_type "$LINENO" "pid_t" "ac_cv_type_pid_t" "$ac_includes_default" if test "x$ac_cv_type_pid_t" = xyes; then : else cat >>confdefs.h <<_ACEOF #define pid_t int _ACEOF fi ac_fn_cxx_check_type "$LINENO" "size_t" "ac_cv_type_size_t" "$ac_includes_default" if test "x$ac_cv_type_size_t" = xyes; then : else cat >>confdefs.h <<_ACEOF #define size_t unsigned int _ACEOF fi ac_fn_cxx_check_type "$LINENO" "ptrdiff_t" "ac_cv_type_ptrdiff_t" "$ac_includes_default" if test "x$ac_cv_type_ptrdiff_t" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_PTRDIFF_T 1 _ACEOF fi ac_fn_cxx_check_type "$LINENO" "long long" "ac_cv_type_long_long" "$ac_includes_default" if test "x$ac_cv_type_long_long" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LONG_LONG 1 _ACEOF fi ac_fn_cxx_check_type "$LINENO" "long" "ac_cv_type_long" "$ac_includes_default" if test "x$ac_cv_type_long" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_LONG 1 _ACEOF 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 () { #ifndef __cplusplus /* Ultrix mips cc rejects this sort of thing. */ typedef int charset[2]; const charset cs = { 0, 0 }; /* 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 sort of thing. */ char tx; char *t = &tx; 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 sort of thing, saying "k.c", line 2.27: 1506-025 (S) Operand must be a modifiable lvalue. */ struct s { int j; const int *ap[3]; } bx; struct s *b = &bx; 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_cxx_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_cxx_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 return type of signal handlers" >&5 $as_echo_n "checking return type of signal handlers... " >&6; } if ${ac_cv_type_signal+:} false; then : $as_echo_n "(cached) " >&6 else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include int main () { return *(signal (0, 0)) (0) == 1; ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO"; then : ac_cv_type_signal=int else ac_cv_type_signal=void fi rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_type_signal" >&5 $as_echo "$ac_cv_type_signal" >&6; } cat >>confdefs.h <<_ACEOF #define RETSIGTYPE $ac_cv_type_signal _ACEOF # Checks for library functions. for ac_header in vfork.h do : ac_fn_cxx_check_header_mongrel "$LINENO" "vfork.h" "ac_cv_header_vfork_h" "$ac_includes_default" if test "x$ac_cv_header_vfork_h" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_VFORK_H 1 _ACEOF fi done for ac_func in fork vfork do : as_ac_var=`$as_echo "ac_cv_func_$ac_func" | $as_tr_sh` ac_fn_cxx_check_func "$LINENO" "$ac_func" "$as_ac_var" if eval test \"x\$"$as_ac_var"\" = x"yes"; then : cat >>confdefs.h <<_ACEOF #define `$as_echo "HAVE_$ac_func" | $as_tr_cpp` 1 _ACEOF fi done if test "x$ac_cv_func_fork" = xyes; then { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working fork" >&5 $as_echo_n "checking for working fork... " >&6; } if ${ac_cv_func_fork_works+:} false; then : $as_echo_n "(cached) " >&6 else if test "$cross_compiling" = yes; then : ac_cv_func_fork_works=cross else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $ac_includes_default int main () { /* By Ruediger Kuhlmann. */ return fork () < 0; ; return 0; } _ACEOF if ac_fn_cxx_try_run "$LINENO"; then : ac_cv_func_fork_works=yes else ac_cv_func_fork_works=no fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext fi fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_func_fork_works" >&5 $as_echo "$ac_cv_func_fork_works" >&6; } else ac_cv_func_fork_works=$ac_cv_func_fork fi if test "x$ac_cv_func_fork_works" = xcross; then case $host in *-*-amigaos* | *-*-msdosdjgpp*) # Override, as these systems have only a dummy fork() stub ac_cv_func_fork_works=no ;; *) ac_cv_func_fork_works=yes ;; esac { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: result $ac_cv_func_fork_works guessed because of cross compilation" >&5 $as_echo "$as_me: WARNING: result $ac_cv_func_fork_works guessed because of cross compilation" >&2;} fi ac_cv_func_vfork_works=$ac_cv_func_vfork if test "x$ac_cv_func_vfork" = xyes; then { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working vfork" >&5 $as_echo_n "checking for working vfork... " >&6; } if ${ac_cv_func_vfork_works+:} false; then : $as_echo_n "(cached) " >&6 else if test "$cross_compiling" = yes; then : ac_cv_func_vfork_works=cross else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Thanks to Paul Eggert for this test. */ $ac_includes_default #include #ifdef HAVE_VFORK_H # include #endif /* On some sparc systems, changes by the child to local and incoming argument registers are propagated back to the parent. The compiler is told about this with #include , but some compilers (e.g. gcc -O) don't grok . Test for this by using a static variable whose address is put into a register that is clobbered by the vfork. */ static void #ifdef __cplusplus sparc_address_test (int arg) # else sparc_address_test (arg) int arg; #endif { static pid_t child; if (!child) { child = vfork (); if (child < 0) { perror ("vfork"); _exit(2); } if (!child) { arg = getpid(); write(-1, "", 0); _exit (arg); } } } int main () { pid_t parent = getpid (); pid_t child; sparc_address_test (0); child = vfork (); if (child == 0) { /* Here is another test for sparc vfork register problems. This test uses lots of local variables, at least as many local variables as main has allocated so far including compiler temporaries. 4 locals are enough for gcc 1.40.3 on a Solaris 4.1.3 sparc, but we use 8 to be safe. A buggy compiler should reuse the register of parent for one of the local variables, since it will think that parent can't possibly be used any more in this routine. Assigning to the local variable will thus munge parent in the parent process. */ pid_t p = getpid(), p1 = getpid(), p2 = getpid(), p3 = getpid(), p4 = getpid(), p5 = getpid(), p6 = getpid(), p7 = getpid(); /* Convince the compiler that p..p7 are live; otherwise, it might use the same hardware register for all 8 local variables. */ if (p != p1 || p != p2 || p != p3 || p != p4 || p != p5 || p != p6 || p != p7) _exit(1); /* On some systems (e.g. IRIX 3.3), vfork doesn't separate parent from child file descriptors. If the child closes a descriptor before it execs or exits, this munges the parent's descriptor as well. Test for this by closing stdout in the child. */ _exit(close(fileno(stdout)) != 0); } else { int status; struct stat st; while (wait(&status) != child) ; return ( /* Was there some problem with vforking? */ child < 0 /* Did the child fail? (This shouldn't happen.) */ || status /* Did the vfork/compiler bug occur? */ || parent != getpid() /* Did the file descriptor bug occur? */ || fstat(fileno(stdout), &st) != 0 ); } } _ACEOF if ac_fn_cxx_try_run "$LINENO"; then : ac_cv_func_vfork_works=yes else ac_cv_func_vfork_works=no fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext fi fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_func_vfork_works" >&5 $as_echo "$ac_cv_func_vfork_works" >&6; } fi; if test "x$ac_cv_func_fork_works" = xcross; then ac_cv_func_vfork_works=$ac_cv_func_vfork { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: result $ac_cv_func_vfork_works guessed because of cross compilation" >&5 $as_echo "$as_me: WARNING: result $ac_cv_func_vfork_works guessed because of cross compilation" >&2;} fi if test "x$ac_cv_func_vfork_works" = xyes; then $as_echo "#define HAVE_WORKING_VFORK 1" >>confdefs.h else $as_echo "#define vfork fork" >>confdefs.h fi if test "x$ac_cv_func_fork_works" = xyes; then $as_echo "#define HAVE_WORKING_FORK 1" >>confdefs.h fi for ac_func in dup2 floor memset pow sqrt strchr tgamma memrchr do : as_ac_var=`$as_echo "ac_cv_func_$ac_func" | $as_tr_sh` ac_fn_cxx_check_func "$LINENO" "$ac_func" "$as_ac_var" if eval test \"x\$"$as_ac_var"\" = x"yes"; then : cat >>confdefs.h <<_ACEOF #define `$as_echo "HAVE_$ac_func" | $as_tr_cpp` 1 _ACEOF fi done for ac_func in strftime do : ac_fn_cxx_check_func "$LINENO" "strftime" "ac_cv_func_strftime" if test "x$ac_cv_func_strftime" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_STRFTIME 1 _ACEOF else # strftime is in -lintl on SCO UNIX. { $as_echo "$as_me:${as_lineno-$LINENO}: checking for strftime in -lintl" >&5 $as_echo_n "checking for strftime in -lintl... " >&6; } if ${ac_cv_lib_intl_strftime+:} false; then : $as_echo_n "(cached) " >&6 else ac_check_lib_save_LIBS=$LIBS LIBS="-lintl $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* 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 strftime (); int main () { return strftime (); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_intl_strftime=yes else ac_cv_lib_intl_strftime=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_intl_strftime" >&5 $as_echo "$ac_cv_lib_intl_strftime" >&6; } if test "x$ac_cv_lib_intl_strftime" = xyes; then : $as_echo "#define HAVE_STRFTIME 1" >>confdefs.h LIBS="-lintl $LIBS" fi fi done for ac_func in strptime do : ac_fn_cxx_check_func "$LINENO" "strptime" "ac_cv_func_strptime" if test "x$ac_cv_func_strptime" = xyes; then : cat >>confdefs.h <<_ACEOF #define HAVE_STRPTIME 1 _ACEOF fi done { $as_echo "$as_me:${as_lineno-$LINENO}: checking for error_at_line" >&5 $as_echo_n "checking for error_at_line... " >&6; } if ${ac_cv_lib_error_at_line+:} false; then : $as_echo_n "(cached) " >&6 else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main () { error_at_line (0, 0, "", 0, "an error occurred"); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_lib_error_at_line=yes else ac_cv_lib_error_at_line=no fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_error_at_line" >&5 $as_echo "$ac_cv_lib_error_at_line" >&6; } if test $ac_cv_lib_error_at_line = no; then case " $LIBOBJS " in *" error.$ac_objext "* ) ;; *) LIBOBJS="$LIBOBJS error.$ac_objext" ;; esac fi { $as_echo "$as_me:${as_lineno-$LINENO}: checking for _LARGEFILE_SOURCE value needed for large files" >&5 $as_echo_n "checking for _LARGEFILE_SOURCE value needed for large files... " >&6; } if ${ac_cv_sys_largefile_source+:} false; then : $as_echo_n "(cached) " >&6 else while :; do cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include /* for off_t */ #include int main () { int (*fp) (FILE *, off_t, int) = fseeko; return fseeko (stdin, 0, 0) && fp (stdin, 0, 0); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_sys_largefile_source=no; break fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define _LARGEFILE_SOURCE 1 #include /* for off_t */ #include int main () { int (*fp) (FILE *, off_t, int) = fseeko; return fseeko (stdin, 0, 0) && fp (stdin, 0, 0); ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO"; then : ac_cv_sys_largefile_source=1; break fi rm -f core conftest.err conftest.$ac_objext \ conftest$ac_exeext conftest.$ac_ext ac_cv_sys_largefile_source=unknown break done fi { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_sys_largefile_source" >&5 $as_echo "$ac_cv_sys_largefile_source" >&6; } case $ac_cv_sys_largefile_source in #( no | unknown) ;; *) cat >>confdefs.h <<_ACEOF #define _LARGEFILE_SOURCE $ac_cv_sys_largefile_source _ACEOF ;; esac rm -rf conftest* # We used to try defining _XOPEN_SOURCE=500 too, to work around a bug # in glibc 2.1.3, but that breaks too many other things. # If you want fseeko and ftello with glibc, upgrade to a fixed glibc. if test $ac_cv_sys_largefile_source != unknown; then $as_echo "#define HAVE_FSEEKO 1" >>confdefs.h fi ac_config_headers="$ac_config_headers config.h" ac_config_files="$ac_config_files Makefile doc/Makefile doc/png/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 -pR'. ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe || as_ln_s='cp -pR' elif ln conf$$.file conf$$ 2>/dev/null; then as_ln_s=ln else as_ln_s='cp -pR' fi else as_ln_s='cp -pR' 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 # as_fn_executable_p FILE # ----------------------- # Test if FILE is an executable regular file. as_fn_executable_p () { test -f "$1" && test -x "$1" } # as_fn_executable_p as_test_x='test -x' as_executable_p=as_fn_executable_p # 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 Asymptote $as_me 2.41, which was generated by GNU Autoconf 2.69. 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="\\ Asymptote config.status 2.41 configured by $0, generated by GNU Autoconf 2.69, with options \\"\$ac_cs_config\\" Copyright (C) 2012 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" ;; "doc/Makefile") CONFIG_FILES="$CONFIG_FILES doc/Makefile" ;; "doc/png/Makefile") CONFIG_FILES="$CONFIG_FILES doc/png/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 if test "x$GCDIR" != "x" ; then as_ac_File=`$as_echo "ac_cv_file_$GCDIR.tar.gz" | $as_tr_sh` { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $GCDIR.tar.gz" >&5 $as_echo_n "checking for $GCDIR.tar.gz... " >&6; } if eval \${$as_ac_File+:} false; then : $as_echo_n "(cached) " >&6 else test "$cross_compiling" = yes && as_fn_error $? "cannot check for file existence when cross compiling" "$LINENO" 5 if test -r "$GCDIR.tar.gz"; then eval "$as_ac_File=yes" else eval "$as_ac_File=no" fi fi eval ac_res=\$$as_ac_File { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 $as_echo "$ac_res" >&6; } if eval test \"x\$"$as_ac_File"\" = x"yes"; then : else echo echo Please put the Boehm garbage collector tar.gz files in the current directory. echo FOR EXAMPLE, USE THE COMMANDS: echo echo wget http://hboehm.info/gc/gc_source/$GCFILE.tar.gz echo wget http://www.ivmaisoft.com/_bin/atomic_ops/libatomic_ops-$ATOMICVERSION.tar.gz echo exit 1 fi fi ./asymptote-2.41/mathop.h0000644000175000017500000001445213064427076015212 0ustar norbertnorbert/***** * mathop.h * Tom Prince 2005/3/18 * * Defines some runtime functions used by the stack machine. * *****/ #ifndef MATHOP_H #define MATHOP_H #include #include "stack.h" #include "mod.h" #include "triple.h" namespace run { template struct less { bool operator() (T x, T y, size_t=0) {return x < y;} }; template struct lessequals { bool operator() (T x, T y, size_t=0) {return x <= y;} }; template struct equals { bool operator() (T x, T y, size_t=0) {return x == y;} }; template struct greaterequals { bool operator() (T x, T y, size_t=0) {return x >= y;} }; template struct greater { bool operator() (T x, T y, size_t=0) {return x > y;} }; template struct notequals { bool operator() (T x, T y, size_t=0) {return x != y;} }; template struct And { bool operator() (T x, T y, size_t=0) {return x && y;} }; template struct Or { bool operator() (T x, T y, size_t=0) {return x || y;} }; template struct Xor { bool operator() (T x, T y, size_t=0) {return x ^ y;} }; template struct plus { T operator() (T x, T y, size_t=0) {return x+y;} }; template struct minus { T operator() (T x, T y, size_t=0) {return x-y;} }; template struct times { T operator() (T x, T y, size_t=0) {return x*y;} }; template <> struct times { camp::triple operator() (double x, camp::triple y, size_t=0) {return x*y;} }; template struct timesR { T operator () (T y, double x, size_t=0) {return x*y;} }; extern void dividebyzero(size_t i=0); extern void integeroverflow(size_t i=0); template struct divide { T operator() (T x, T y, size_t i=0) { if(y == 0) dividebyzero(i); return x/y; } }; template <> struct divide { camp::triple operator() (camp::triple x, double y, size_t=0) {return x/y;} }; inline bool validInt(double x) { return x > Int_MIN-0.5 && x < Int_MAX+0.5; } inline void checkInt(double x, size_t i) { if(validInt(x)) return; integeroverflow(i); } inline Int Intcast(double x) { if(validInt(x)) return (Int) x; integeroverflow(0); return 0; } template<> struct plus { Int operator() (Int x, Int y, size_t i=0) { if((y > 0 && x > Int_MAX-y) || (y < 0 && x < Int_MIN-y)) integeroverflow(i); return x+y; } }; template<> struct minus { Int operator() (Int x, Int y, size_t i=0) { if((y < 0 && x > Int_MAX+y) || (y > 0 && x < Int_MIN+y)) integeroverflow(i); return x-y; } }; template<> struct times { Int operator() (Int x, Int y, size_t i=0) { if(y == 0) return 0; if(y < 0) {y=-y; x=-x;} if((y > int_MAX || x > int_MAX/(int) y || x < int_MIN/(int) y) && (x > Int_MAX/y || x < Int_MIN/y)) integeroverflow(i); return x*y; } }; template<> struct divide { double operator() (Int x, Int y, size_t i=0) { if(y == 0) dividebyzero(i); return ((double) x)/(double) y; } }; template void Negate(vm::stack *s) { T a=vm::pop(s); s->push(-a); } inline Int Negate(Int x, size_t i=0) { if(x < -Int_MAX) integeroverflow(i); return -x; } template<> inline void Negate(vm::stack *s) { s->push(Negate(vm::pop(s))); } inline double pow(double x, double y) { #ifndef HAVE_POW return exp(y*log(x)); #else return ::pow(x,y); #endif } template T pow(T x, Int y) { if(y == 0) return 1.0; if(x == 0.0 && y > 0) return 0.0; if(y < 0) {y=-y; x=1/x;} T r=1.0; for(;;) { if(y & 1) r *= x; if((y >>= 1) == 0) return r; x *= x; } } template struct power { T operator() (T x, T y, size_t=0) {return pow(x,y);} }; template <> struct power { Int operator() (Int x, Int p, size_t i=0) { if(p == 0) return 1; Int sign=1; if(x < 0) { if(p % 2) sign=-1; x=-x; } if(p > 0) { if(x == 0) return 0; Int r = 1; for(;;) { if(p & 1) { if(r > Int_MAX/x) integeroverflow(i); r *= x; } if((p >>= 1) == 0) return sign*r; if(x > Int_MAX/x) integeroverflow(i); x *= x; } } else { if(x == 1) return sign; ostringstream buf; if(i > 0) buf << "array element " << i << ": "; buf << "Only 1 and -1 can be raised to negative exponents as integers."; vm::error(buf); return 0; } } }; template struct mod { T operator() (T x, T y, size_t i=0) { if(y == 0) dividebyzero(i); return portableMod(x,y); } }; template struct quotient { T operator() (T x, T y, size_t i=0) { if(y == 0) dividebyzero(i); if(y == -1) return Negate(x); // Implementation-independent definition of integer division: round down return (x-portableMod(x,y))/y; } }; template struct min { T operator() (T x, T y, size_t=0) {return x < y ? x : y;} }; template struct max { T operator() (T x, T y, size_t=0) {return x > y ? x : y;} }; template inline T Min(T a, T b) { return (a < b) ? a : b; } template inline T Max(T a, T b) { return (a > b) ? a : b; } template struct minbound { camp::pair operator() (camp::pair z, camp::pair w) { return camp::pair(Min(z.getx(),w.getx()),Min(z.gety(),w.gety())); } camp::triple operator() (camp::triple u, camp::triple v) { return camp::triple(Min(u.getx(),v.getx()),Min(u.gety(),v.gety()), Min(u.getz(),v.getz())); } }; template struct maxbound { camp::pair operator() (camp::pair z, camp::pair w) { return camp::pair(Max(z.getx(),w.getx()),Max(z.gety(),w.gety())); } camp::triple operator() (camp::triple u, camp::triple v) { return camp::triple(Max(u.getx(),v.getx()),Max(u.gety(),v.gety()), Max(u.getz(),v.getz())); } }; template void realReal(vm::stack *s) { double x=vm::pop(s); s->push(func(x)); } template class op> void binaryOp(vm::stack *s) { T b=vm::pop(s); T a=vm::pop(s); s->push(op()(a,b)); } template void interp(vm::stack *s) { double t=vm::pop(s); T b=vm::pop(s); T a=vm::pop(s); s->push((1-t)*a+t*b); } } // namespace run #endif //MATHOP_H ./asymptote-2.41/LICENSE0000644000175000017500000010451313064427076014554 0ustar norbertnorbert GNU 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. Preamble The GNU General Public License is a free, copyleft license for software and other kinds of works. The licenses for most software and other practical works are designed to take away your freedom to share and change the works. By contrast, the GNU General Public License is intended to guarantee your freedom to share and change all versions of a program--to make sure it remains free software for all its users. We, the Free Software Foundation, use the GNU General Public License for most of our software; it applies also to any other work released this way by its authors. You can apply it to your programs, too. When we speak of free software, we are referring to freedom, not price. Our General Public Licenses are designed to make sure that you have the freedom to distribute copies of free software (and charge for them if you wish), that you receive source code or can get it if you want it, that you can change the software or use pieces of it in new free programs, and that you know you can do these things. To protect your rights, we need to prevent others from denying you these rights or asking you to surrender the rights. Therefore, you have certain responsibilities if you distribute copies of the software, or if you modify it: responsibilities to respect the freedom of others. For example, if you distribute copies of such a program, whether gratis or for a fee, you must pass on to the recipients the same freedoms that you received. You must make sure that they, too, receive or can get the source code. And you must show them these terms so they know their rights. Developers that use the GNU GPL protect your rights with two steps: (1) assert copyright on the software, and (2) offer you this License giving you legal permission to copy, distribute and/or modify it. For the developers' and authors' protection, the GPL clearly explains that there is no warranty for this free software. For both users' and authors' sake, the GPL requires that modified versions be marked as changed, so that their problems will not be attributed erroneously to authors of previous versions. Some devices are designed to deny users access to install or run modified versions of the software inside them, although the manufacturer can do so. This is fundamentally incompatible with the aim of protecting users' freedom to change the software. The systematic pattern of such abuse occurs in the area of products for individuals to use, which is precisely where it is most unacceptable. Therefore, we have designed this version of the GPL to prohibit the practice for those products. If such problems arise substantially in other domains, we stand ready to extend this provision to those domains in future versions of the GPL, as needed to protect the freedom of users. Finally, every program is threatened constantly by software patents. States should not allow patents to restrict development and use of software on general-purpose computers, but in those that do, we wish to avoid the special danger that patents applied to a free program could make it effectively proprietary. To prevent this, the GPL assures that patents cannot be used to render the program non-free. The precise terms and conditions for copying, distribution and modification follow. TERMS AND CONDITIONS 0. Definitions. "This License" refers to version 3 of the GNU General Public License. "Copyright" also means copyright-like laws that apply to other kinds of works, such as semiconductor masks. "The Program" refers to any copyrightable work licensed under this License. Each licensee is addressed as "you". "Licensees" and "recipients" may be individuals or organizations. To "modify" a work means to copy from or adapt all or part of the work in a fashion requiring copyright permission, other than the making of an exact copy. The resulting work is called a "modified version" of the earlier work or a work "based on" the earlier work. A "covered work" means either the unmodified Program or a work based on the Program. To "propagate" a work means to do anything with it that, without permission, would make you directly or secondarily liable for infringement under applicable copyright law, except executing it on a computer or modifying a private copy. Propagation includes copying, distribution (with or without modification), making available to the public, and in some countries other activities as well. To "convey" a work means any kind of propagation that enables other parties to make or receive copies. Mere interaction with a user through a computer network, with no transfer of a copy, is not conveying. An interactive user interface displays "Appropriate Legal Notices" to the extent that it includes a convenient and prominently visible feature that (1) displays an appropriate copyright notice, and (2) tells the user that there is no warranty for the work (except to the extent that warranties are provided), that licensees may convey the work under this License, and how to view a copy of this License. If the interface presents a list of user commands or options, such as a menu, a prominent item in the list meets this criterion. 1. Source Code. The "source code" for a work means the preferred form of the work for making modifications to it. "Object code" means any non-source form of a work. A "Standard Interface" means an interface that either is an official standard defined by a recognized standards body, or, in the case of interfaces specified for a particular programming language, one that is widely used among developers working in that language. The "System Libraries" of an executable work include anything, other than the work as a whole, that (a) is included in the normal form of packaging a Major Component, but which is not part of that Major Component, and (b) serves only to enable use of the work with that Major Component, or to implement a Standard Interface for which an implementation is available to the public in source code form. A "Major Component", in this context, means a major essential component (kernel, window system, and so on) of the specific operating system (if any) on which the executable work runs, or a compiler used to produce the work, or an object code interpreter used to run it. The "Corresponding Source" for a work in object code form means all the source code needed to generate, install, and (for an executable work) run the object code and to modify the work, including scripts to control those activities. However, it does not include the work's System Libraries, or general-purpose tools or generally available free programs which are used unmodified in performing those activities but which are not part of the work. For example, Corresponding Source includes interface definition files associated with source files for the work, and the source code for shared libraries and dynamically linked subprograms that the work is specifically designed to require, such as by intimate data communication or control flow between those subprograms and other parts of the work. The Corresponding Source need not include anything that users can regenerate automatically from other parts of the Corresponding Source. The Corresponding Source for a work in source code form is that same work. 2. Basic Permissions. All rights granted under this License are granted for the term of copyright on the Program, and are irrevocable provided the stated conditions are met. This License explicitly affirms your unlimited permission to run the unmodified Program. The output from running a covered work is covered by this License only if the output, given its content, constitutes a covered work. This License acknowledges your rights of fair use or other equivalent, as provided by copyright law. You may make, run and propagate covered works that you do not convey, without conditions so long as your license otherwise remains in force. You may convey covered works to others for the sole purpose of having them make modifications exclusively for you, or provide you with facilities for running those works, provided that you comply with the terms of this License in conveying all material for which you do not control copyright. Those thus making or running the covered works for you must do so exclusively on your behalf, under your direction and control, on terms that prohibit them from making any copies of your copyrighted material outside their relationship with you. Conveying under any other circumstances is permitted solely under the conditions stated below. Sublicensing is not allowed; section 10 makes it unnecessary. 3. Protecting Users' Legal Rights From Anti-Circumvention Law. No covered work shall be deemed part of an effective technological measure under any applicable law fulfilling obligations under article 11 of the WIPO copyright treaty adopted on 20 December 1996, or similar laws prohibiting or restricting circumvention of such measures. When you convey a covered work, you waive any legal power to forbid circumvention of technological measures to the extent such circumvention is effected by exercising rights under this License with respect to the covered work, and you disclaim any intention to limit operation or modification of the work as a means of enforcing, against the work's users, your or third parties' legal rights to forbid circumvention of technological measures. 4. Conveying Verbatim Copies. You may convey verbatim copies of the Program's source code as you receive it, in any medium, provided that you conspicuously and appropriately publish on each copy an appropriate copyright notice; keep intact all notices stating that this License and any non-permissive terms added in accord with section 7 apply to the code; keep intact all notices of the absence of any warranty; and give all recipients a copy of this License along with the Program. You may charge any price or no price for each copy that you convey, and you may offer support or warranty protection for a fee. 5. Conveying Modified Source Versions. You may convey a work based on the Program, or the modifications to produce it from the Program, in the form of source code under the terms of section 4, provided that you also meet all of these conditions: a) The work must carry prominent notices stating that you modified it, and giving a relevant date. b) The work must carry prominent notices stating that it is released under this License and any conditions added under section 7. This requirement modifies the requirement in section 4 to "keep intact all notices". c) You must license the entire work, as a whole, under this License to anyone who comes into possession of a copy. This License will therefore apply, along with any applicable section 7 additional terms, to the whole of the work, and all its parts, regardless of how they are packaged. This License gives no permission to license the work in any other way, but it does not invalidate such permission if you have separately received it. d) If the work has interactive user interfaces, each must display Appropriate Legal Notices; however, if the Program has interactive interfaces that do not display Appropriate Legal Notices, your work need not make them do so. A compilation of a covered work with other separate and independent works, which are not by their nature extensions of the covered work, and which are not combined with it such as to form a larger program, in or on a volume of a storage or distribution medium, is called an "aggregate" if the compilation and its resulting copyright are not used to limit the access or legal rights of the compilation's users beyond what the individual works permit. Inclusion of a covered work in an aggregate does not cause this License to apply to the other parts of the aggregate. 6. Conveying Non-Source Forms. You may convey a covered work in object code form under the terms of sections 4 and 5, provided that you also convey the machine-readable Corresponding Source under the terms of this License, in one of these ways: a) Convey the object code in, or embodied in, a physical product (including a physical distribution medium), accompanied by the Corresponding Source fixed on a durable physical medium customarily used for software interchange. b) Convey the object code in, or embodied in, a physical product (including a physical distribution medium), accompanied by a written offer, valid for at least three years and valid for as long as you offer spare parts or customer support for that product model, to give anyone who possesses the object code either (1) a copy of the Corresponding Source for all the software in the product that is covered by this License, on a durable physical medium customarily used for software interchange, for a price no more than your reasonable cost of physically performing this conveying of source, or (2) access to copy the Corresponding Source from a network server at no charge. c) Convey individual copies of the object code with a copy of the written offer to provide the Corresponding Source. This alternative is allowed only occasionally and noncommercially, and only if you received the object code with such an offer, in accord with subsection 6b. d) Convey the object code by offering access from a designated place (gratis or for a charge), and offer equivalent access to the Corresponding Source in the same way through the same place at no further charge. You need not require recipients to copy the Corresponding Source along with the object code. If the place to copy the object code is a network server, the Corresponding Source may be on a different server (operated by you or a third party) that supports equivalent copying facilities, provided you maintain clear directions next to the object code saying where to find the Corresponding Source. Regardless of what server hosts the Corresponding Source, you remain obligated to ensure that it is available for as long as needed to satisfy these requirements. e) Convey the object code using peer-to-peer transmission, provided you inform other peers where the object code and Corresponding Source of the work are being offered to the general public at no charge under subsection 6d. A separable portion of the object code, whose source code is excluded from the Corresponding Source as a System Library, need not be included in conveying the object code work. A "User Product" is either (1) a "consumer product", which means any tangible personal property which is normally used for personal, family, or household purposes, or (2) anything designed or sold for incorporation into a dwelling. In determining whether a product is a consumer product, doubtful cases shall be resolved in favor of coverage. For a particular product received by a particular user, "normally used" refers to a typical or common use of that class of product, regardless of the status of the particular user or of the way in which the particular user actually uses, or expects or is expected to use, the product. A product is a consumer product regardless of whether the product has substantial commercial, industrial or non-consumer uses, unless such uses represent the only significant mode of use of the product. "Installation Information" for a User Product means any methods, procedures, authorization keys, or other information required to install and execute modified versions of a covered work in that User Product from a modified version of its Corresponding Source. The information must suffice to ensure that the continued functioning of the modified object code is in no case prevented or interfered with solely because modification has been made. If you convey an object code work under this section in, or with, or specifically for use in, a User Product, and the conveying occurs as part of a transaction in which the right of possession and use of the User Product is transferred to the recipient in perpetuity or for a fixed term (regardless of how the transaction is characterized), the Corresponding Source conveyed under this section must be accompanied by the Installation Information. But this requirement does not apply if neither you nor any third party retains the ability to install modified object code on the User Product (for example, the work has been installed in ROM). The requirement to provide Installation Information does not include a requirement to continue to provide support service, warranty, or updates for a work that has been modified or installed by the recipient, or for the User Product in which it has been modified or installed. Access to a network may be denied when the modification itself materially and adversely affects the operation of the network or violates the rules and protocols for communication across the network. Corresponding Source conveyed, and Installation Information provided, in accord with this section must be in a format that is publicly documented (and with an implementation available to the public in source code form), and must require no special password or key for unpacking, reading or copying. 7. Additional Terms. "Additional permissions" are terms that supplement the terms of this License by making exceptions from one or more of its conditions. Additional permissions that are applicable to the entire Program shall be treated as though they were included in this License, to the extent that they are valid under applicable law. If additional permissions apply only to part of the Program, that part may be used separately under those permissions, but the entire Program remains governed by this License without regard to the additional permissions. When you convey a copy of a covered work, you may at your option remove any additional permissions from that copy, or from any part of it. (Additional permissions may be written to require their own removal in certain cases when you modify the work.) You may place additional permissions on material, added by you to a covered work, for which you have or can give appropriate copyright permission. Notwithstanding any other provision of this License, for material you add to a covered work, you may (if authorized by the copyright holders of that material) supplement the terms of this License with terms: a) Disclaiming warranty or limiting liability differently from the terms of sections 15 and 16 of this License; or b) Requiring preservation of specified reasonable legal notices or author attributions in that material or in the Appropriate Legal Notices displayed by works containing it; or c) Prohibiting misrepresentation of the origin of that material, or requiring that modified versions of such material be marked in reasonable ways as different from the original version; or d) Limiting the use for publicity purposes of names of licensors or authors of the material; or e) Declining to grant rights under trademark law for use of some trade names, trademarks, or service marks; or f) Requiring indemnification of licensors and authors of that material by anyone who conveys the material (or modified versions of it) with contractual assumptions of liability to the recipient, for any liability that these contractual assumptions directly impose on those licensors and authors. All other non-permissive additional terms are considered "further restrictions" within the meaning of section 10. If the Program as you received it, or any part of it, contains a notice stating that it is governed by this License along with a term that is a further restriction, you may remove that term. If a license document contains a further restriction but permits relicensing or conveying under this License, you may add to a covered work material governed by the terms of that license document, provided that the further restriction does not survive such relicensing or conveying. If you add terms to a covered work in accord with this section, you must place, in the relevant source files, a statement of the additional terms that apply to those files, or a notice indicating where to find the applicable terms. Additional terms, permissive or non-permissive, may be stated in the form of a separately written license, or stated as exceptions; the above requirements apply either way. 8. Termination. You may not propagate or modify a covered work except as expressly provided under this License. Any attempt otherwise to propagate or modify it is void, and will automatically terminate your rights under this License (including any patent licenses granted under the third paragraph of section 11). However, if you cease all violation of this License, then your license from a particular copyright holder is reinstated (a) provisionally, unless and until the copyright holder explicitly and finally terminates your license, and (b) permanently, if the copyright holder fails to notify you of the violation by some reasonable means prior to 60 days after the cessation. Moreover, your license from a particular copyright holder is reinstated permanently if the copyright holder notifies you of the violation by some reasonable means, this is the first time you have received notice of violation of this License (for any work) from that copyright holder, and you cure the violation prior to 30 days after your receipt of the notice. Termination of your rights under this section does not terminate the licenses of parties who have received copies or rights from you under this License. If your rights have been terminated and not permanently reinstated, you do not qualify to receive new licenses for the same material under section 10. 9. Acceptance Not Required for Having Copies. You are not required to accept this License in order to receive or run a copy of the Program. Ancillary propagation of a covered work occurring solely as a consequence of using peer-to-peer transmission to receive a copy likewise does not require acceptance. However, nothing other than this License grants you permission to propagate or modify any covered work. These actions infringe copyright if you do not accept this License. Therefore, by modifying or propagating a covered work, you indicate your acceptance of this License to do so. 10. Automatic Licensing of Downstream Recipients. Each time you convey a covered work, the recipient automatically receives a license from the original licensors, to run, modify and propagate that work, subject to this License. You are not responsible for enforcing compliance by third parties with this License. An "entity transaction" is a transaction transferring control of an organization, or substantially all assets of one, or subdividing an organization, or merging organizations. If propagation of a covered work results from an entity transaction, each party to that transaction who receives a copy of the work also receives whatever licenses to the work the party's predecessor in interest had or could give under the previous paragraph, plus a right to possession of the Corresponding Source of the work from the predecessor in interest, if the predecessor has it or can get it with reasonable efforts. You may not impose any further restrictions on the exercise of the rights granted or affirmed under this License. For example, you may not impose a license fee, royalty, or other charge for exercise of rights granted under this License, and you may not initiate litigation (including a cross-claim or counterclaim in a lawsuit) alleging that any patent claim is infringed by making, using, selling, offering for sale, or importing the Program or any portion of it. 11. Patents. A "contributor" is a copyright holder who authorizes use under this License of the Program or a work on which the Program is based. The work thus licensed is called the contributor's "contributor version". A contributor's "essential patent claims" are all patent claims owned or controlled by the contributor, whether already acquired or hereafter acquired, that would be infringed by some manner, permitted by this License, of making, using, or selling its contributor version, but do not include claims that would be infringed only as a consequence of further modification of the contributor version. For purposes of this definition, "control" includes the right to grant patent sublicenses in a manner consistent with the requirements of this License. Each contributor grants you a non-exclusive, worldwide, royalty-free patent license under the contributor's essential patent claims, to make, use, sell, offer for sale, import and otherwise run, modify and propagate the contents of its contributor version. In the following three paragraphs, a "patent license" is any express agreement or commitment, however denominated, not to enforce a patent (such as an express permission to practice a patent or covenant not to sue for patent infringement). To "grant" such a patent license to a party means to make such an agreement or commitment not to enforce a patent against the party. If you convey a covered work, knowingly relying on a patent license, and the Corresponding Source of the work is not available for anyone to copy, free of charge and under the terms of this License, through a publicly available network server or other readily accessible means, then you must either (1) cause the Corresponding Source to be so available, or (2) arrange to deprive yourself of the benefit of the patent license for this particular work, or (3) arrange, in a manner consistent with the requirements of this License, to extend the patent license to downstream recipients. "Knowingly relying" means you have actual knowledge that, but for the patent license, your conveying the covered work in a country, or your recipient's use of the covered work in a country, would infringe one or more identifiable patents in that country that you have reason to believe are valid. If, pursuant to or in connection with a single transaction or arrangement, you convey, or propagate by procuring conveyance of, a covered work, and grant a patent license to some of the parties receiving the covered work authorizing them to use, propagate, modify or convey a specific copy of the covered work, then the patent license you grant is automatically extended to all recipients of the covered work and works based on it. A patent license is "discriminatory" if it does not include within the scope of its coverage, prohibits the exercise of, or is conditioned on the non-exercise of one or more of the rights that are specifically granted under this License. You may not convey a covered work if you are a party to an arrangement with a third party that is in the business of distributing software, under which you make payment to the third party based on the extent of your activity of conveying the work, and under which the third party grants, to any of the parties who would receive the covered work from you, a discriminatory patent license (a) in connection with copies of the covered work conveyed by you (or copies made from those copies), or (b) primarily for and in connection with specific products or compilations that contain the covered work, unless you entered into that arrangement, or that patent license was granted, prior to 28 March 2007. Nothing in this License shall be construed as excluding or limiting any implied license or other defenses to infringement that may otherwise be available to you under applicable patent law. 12. No Surrender of Others' Freedom. If conditions are imposed on you (whether by court order, agreement or otherwise) that contradict the conditions of this License, they do not excuse you from the conditions of this License. If you cannot convey a covered work so as to satisfy simultaneously your obligations under this License and any other pertinent obligations, then as a consequence you may not convey it at all. For example, if you agree to terms that obligate you to collect a royalty for further conveying from those to whom you convey the Program, the only way you could satisfy both those terms and this License would be to refrain entirely from conveying the Program. 13. Use with the GNU Affero General Public License. Notwithstanding any other provision of this License, you have permission to link or combine any covered work with a work licensed under version 3 of the GNU Affero General Public License into a single combined work, and to convey the resulting work. The terms of this License will continue to apply to the part which is the covered work, but the special requirements of the GNU Affero General Public License, section 13, concerning interaction through a network will apply to the combination as such. 14. Revised Versions of this License. The Free Software Foundation may publish revised and/or new versions of the GNU 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 Program specifies that a certain numbered version of the GNU General Public License "or any later version" applies to it, you have the option of following the terms and conditions either of that numbered version or of any later version published by the Free Software Foundation. If the Program does not specify a version number of the GNU General Public License, you may choose any version ever published by the Free Software Foundation. If the Program specifies that a proxy can decide which future versions of the GNU General Public License can be used, that proxy's public statement of acceptance of a version permanently authorizes you to choose that version for the Program. Later license versions may give you additional or different permissions. However, no additional obligations are imposed on any author or copyright holder as a result of your choosing to follow a later version. 15. Disclaimer of Warranty. THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION. 16. Limitation of Liability. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. 17. Interpretation of Sections 15 and 16. If the disclaimer of warranty and limitation of liability provided above cannot be given local legal effect according to their terms, reviewing courts shall apply local law that most closely approximates an absolute waiver of all civil liability in connection with the Program, unless a warranty or assumption of liability accompanies a copy of the Program in return for a fee. END OF TERMS AND CONDITIONS How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest possible use to the public, the best way to achieve this is to make it free software which everyone can redistribute and change under these terms. To do so, attach the following notices to the program. It is safest to attach them to the start of each source file to most effectively state the exclusion of warranty; and each file should have at least the "copyright" line and a pointer to where the full notice is found. Copyright (C) This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . Also add information on how to contact you by electronic and paper mail. If the program does terminal interaction, make it output a short notice like this when it starts in an interactive mode: Copyright (C) This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it under certain conditions; type `show c' for details. The hypothetical commands `show w' and `show c' should show the appropriate parts of the General Public License. Of course, your program's commands might be different; for a GUI interface, you would use an "about box". You should also get your employer (if you work as a programmer) or school, if any, to sign a "copyright disclaimer" for the program, if necessary. For more information on this, and how to apply and follow the GNU GPL, see . The GNU General Public License does not permit incorporating your program into proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the library. If this is what you want to do, use the GNU Lesser General Public License instead of this License. But first, please read . ./asymptote-2.41/runpair.in0000644000175000017500000001022613064427076015554 0ustar norbertnorbert/***** * runpair.in * * Runtime functions for pair operations. * *****/ pair => primPair() #include "pair.h" using namespace camp; namespace run { extern pair zero; } pair sin(pair z) { return pair(sin(z.getx())*cosh(z.gety()),cos(z.getx())*sinh(z.gety())); } pair exp(pair z) { return exp(z.getx())*expi(z.gety()); } pair gamma(pair z) { static double p[]={0.99999999999980993,676.5203681218851,-1259.1392167224028, 771.32342877765313,-176.61502916214059,12.507343278686905, -0.13857109526572012,9.9843695780195716e-6, 1.5056327351493116e-7}; static int n=sizeof(p)/sizeof(double); static double root2pi=sqrt(2*PI); if(z.getx() < 0.5) return PI/(sin(PI*z)*gamma(1.0-z)); z -= 1.0; pair x=p[0]; for(int i=1; i < n; ++i) x += p[i]/(z+i); pair t=n-1.5+z; return root2pi*pow(t,z+0.5)*exp(-t)*x; } // Autogenerated routines: pair :pairZero() { return zero; } pair :realRealToPair(real x, real y) { return pair(x,y); } pair :pairNegate(pair z) { return -z; } real xpart:pairXPart(pair z) { return z.getx(); } real ypart:pairYPart(pair z) { return z.gety(); } real length(pair z) { return z.length(); } real abs(pair z) { return z.length(); } pair sqrt(explicit pair z) { return Sqrt(z); } // Return the angle of z in radians. real angle(pair z, bool warn=true) { if(!warn && z.getx() == 0.0 && z.gety() == 0.0) return 0.0; return z.angle(); } // Return the angle of z in degrees in the interval [0,360). real degrees(pair z, bool warn=true) { if(!warn && z.getx() == 0.0 && z.gety() == 0.0) return 0.0; return principalBranch(degrees(z.angle())); } // Convert degrees to radians. real radians(real degrees) { return radians(degrees); } // Convert radians to degrees. real degrees(real radians) { return degrees(radians); } // Convert radians to degrees in [0,360). real Degrees(real radians) { return principalBranch(degrees(radians)); } real Sin(real deg) { int n=(int) (deg/90.0); if(deg == n*90.0) { int m=n % 4; if(m < 0) m += 4; if(m == 1) return 1; if(m == 3) return -1; return 0.0; } return sin(radians(deg)); } real Cos(real deg) { int n=(int) (deg/90.0); if(deg == n*90.0) { int m=n % 4; if(m < 0) m += 4; if(m == 0) return 1; if(m == 2) return -1; return 0.0; } return cos(radians(deg)); } real Tan(real deg) { int n=(int) (deg/90.0); if(deg == n*90.0) { int m=n % 4; if(m < 0) m += 4; if(m == 1) return HUGE_VAL; if(m == 3) return -HUGE_VAL; return 0.0; } return tan(radians(deg)); } real aSin(real x) { return degrees(asin(x)); } real aCos(real x) { return degrees(acos(x)); } real aTan(real x) { return degrees(atan(x)); } pair unit(pair z) { return unit(z); } pair dir(real degrees) { return expi(radians(degrees)); } pair dir(explicit pair z) { return unit(z); } pair expi(real angle) { return expi(angle); } pair exp(explicit pair z) { return exp(z); } pair log(explicit pair z) { return pair(log(z.length()),z.angle()); } pair sin(explicit pair z) { return sin(z); } pair cos(explicit pair z) { return pair(cos(z.getx())*cosh(z.gety()),-sin(z.getx())*sinh(z.gety())); } // Complex Gamma function pair gamma(explicit pair z) { return gamma(z); } pair conj(pair z) { return conj(z); } pair realmult(pair z, pair w) { return pair(z.getx()*w.getx(),z.gety()*w.gety()); } // To avoid confusion, a dot product requires explicit pair arguments. real dot(explicit pair z, explicit pair w) { return dot(z,w); } // Return the 2D scalar cross product z.x*w.y-z.y*w.x. real cross(explicit pair z, explicit pair w) { return cross(z,w); } pair bezier(pair a, pair b, pair c, pair d, real t) { real onemt=1-t; real onemt2=onemt*onemt; return onemt2*onemt*a+t*(3.0*(onemt2*b+t*onemt*c)+t*t*d); } pair bezierP(pair a, pair b, pair c, pair d, real t) { return 3.0*(t*t*(d-a+3.0*(b-c))+t*(2.0*(a+c)-4.0*b)+b-a); } pair bezierPP(pair a, pair b, pair c, pair d, real t) { return 6.0*(t*(d-a+3.0*(b-c))+a+c-2.0*b); } pair bezierPPP(pair a, pair b, pair c, pair d) { return 6.0*(d-a+3.0*(b-c)); } ./asymptote-2.41/table.h0000644000175000017500000000521113064427076015002 0ustar norbertnorbert/***** * table.h * Andy Hammerlindl 2002/06/18 * * Table used to bind symbols to vars and types in a namespace. *****/ #ifndef TABLE_H #define TABLE_H #include #include #include "symbol.h" #include "common.h" namespace sym { template class table; template std::ostream& operator<< (std::ostream& out, const table& t); template class table { protected: typedef mem::multimap scope_t; typedef typename scope_t::iterator scope_iterator; typedef mem::list scopes_t; typedef mem::list name_t; typedef typename name_t::iterator name_iterator; typedef mem::map names_t; typedef typename names_t::iterator names_iterator; scopes_t scopes; names_t names; void remove(symbol key); public : table(); void enter(symbol key, B value); B look(symbol key); // Allows scoping and overloading of symbols of the same name void beginScope(); void endScope(); // Copies all bindings in the top scope to the scope underneath it, and // removes the the top scope. void collapseScope(); // Adds to l, all names prefixed by start. void completions(mem::list& l, string start); friend std::ostream& operator<< (std::ostream& out, const table& t); }; template inline table::table() { beginScope(); } template inline void table::enter(symbol key, B value) { scopes.front().insert(std::make_pair(key,value)); names[key].push_front(value); } template inline B table::look(symbol key) { if (!names[key].empty()) return names[key].front(); return 0; } template inline void table::beginScope() { scopes.push_front(scope_t()); } template inline void table::remove(symbol key) { if (!names[key].empty()) names[key].pop_front(); } template inline void table::endScope() { scope_t &scope = scopes.front(); for (scope_iterator p = scope.begin(); p != scope.end(); ++p) remove(p->first); scopes.pop_front(); } template inline void table::collapseScope() { scope_t scope = scopes.front(); scopes.pop_front(); scopes.front().insert(scope.begin(), scope.end()); } // Returns true if start is a prefix for name; eg, mac is a prefix of machine. inline bool prefix(string start, string name) { return equal(start.begin(), start.end(), name.begin()); } template inline void table::completions(mem::list& l, string start) { for (names_iterator p = names.begin(); p != names.end(); ++p) if (prefix(start, p->first) && !p->second.empty()) l.push_back(p->first); } } // namespace sym #endif ./asymptote-2.41/gsl.symbols.h0000644000175000017500000002102113064427142016156 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(Ai); ADDSYMBOL(Ai_deriv); ADDSYMBOL(Ai_deriv_scaled); ADDSYMBOL(Ai_scaled); ADDSYMBOL(Bi); ADDSYMBOL(Bi_deriv); ADDSYMBOL(Bi_deriv_scaled); ADDSYMBOL(Bi_scaled); ADDSYMBOL(Chi); ADDSYMBOL(Ci); ADDSYMBOL(D); ADDSYMBOL(E); ADDSYMBOL(E1); ADDSYMBOL(E2); ADDSYMBOL(Ei); ADDSYMBOL(Ei3); ADDSYMBOL(F); ADDSYMBOL(FermiDirac); ADDSYMBOL(FermiDirac0); ADDSYMBOL(FermiDirac1); ADDSYMBOL(FermiDirac2); ADDSYMBOL(FermiDirac3Half); ADDSYMBOL(FermiDiracHalf); ADDSYMBOL(FermiDiracInc0); ADDSYMBOL(FermiDiracM1); ADDSYMBOL(FermiDiracMHalf); ADDSYMBOL(H3d); ADDSYMBOL(H3d0); ADDSYMBOL(H3d1); ADDSYMBOL(I); ADDSYMBOL(I0); ADDSYMBOL(I0_scaled); ADDSYMBOL(I1); ADDSYMBOL(I1_scaled); ADDSYMBOL(I_scaled); ADDSYMBOL(J); ADDSYMBOL(J0); ADDSYMBOL(J1); ADDSYMBOL(Jn); ADDSYMBOL(K); ADDSYMBOL(K0); ADDSYMBOL(K0_scaled); ADDSYMBOL(K1); ADDSYMBOL(K1_scaled); ADDSYMBOL(K_scaled); ADDSYMBOL(L); ADDSYMBOL(L1); ADDSYMBOL(L2); ADDSYMBOL(L3); ADDSYMBOL(P); ADDSYMBOL(P1); ADDSYMBOL(P2); ADDSYMBOL(P3); ADDSYMBOL(Pl); ADDSYMBOL(Plm); ADDSYMBOL(Q); ADDSYMBOL(Q0); ADDSYMBOL(Q1); ADDSYMBOL(Ql); ADDSYMBOL(RC); ADDSYMBOL(RD); ADDSYMBOL(RF); ADDSYMBOL(RJ); ADDSYMBOL(Shi); ADDSYMBOL(Si); ADDSYMBOL(U); ADDSYMBOL(W0); ADDSYMBOL(Wm1); ADDSYMBOL(Y); ADDSYMBOL(Y0); ADDSYMBOL(Y1); ADDSYMBOL(Yn); ADDSYMBOL(Z); ADDSYMBOL(a); ADDSYMBOL(aI); ADDSYMBOL(aR); ADDSYMBOL(alpha); ADDSYMBOL(atanint); ADDSYMBOL(b); ADDSYMBOL(beta); ADDSYMBOL(c); ADDSYMBOL(cdf_beta_P); ADDSYMBOL(cdf_beta_Pinv); ADDSYMBOL(cdf_beta_Q); ADDSYMBOL(cdf_beta_Qinv); ADDSYMBOL(cdf_binomial_P); ADDSYMBOL(cdf_binomial_Q); ADDSYMBOL(cdf_cauchy_P); ADDSYMBOL(cdf_cauchy_Pinv); ADDSYMBOL(cdf_cauchy_Q); ADDSYMBOL(cdf_cauchy_Qinv); ADDSYMBOL(cdf_chisq_P); ADDSYMBOL(cdf_chisq_Pinv); ADDSYMBOL(cdf_chisq_Q); ADDSYMBOL(cdf_chisq_Qinv); ADDSYMBOL(cdf_exponential_P); ADDSYMBOL(cdf_exponential_Pinv); ADDSYMBOL(cdf_exponential_Q); ADDSYMBOL(cdf_exponential_Qinv); ADDSYMBOL(cdf_exppow_P); ADDSYMBOL(cdf_exppow_Q); ADDSYMBOL(cdf_fdist_P); ADDSYMBOL(cdf_fdist_Pinv); ADDSYMBOL(cdf_fdist_Q); ADDSYMBOL(cdf_fdist_Qinv); ADDSYMBOL(cdf_flat_P); ADDSYMBOL(cdf_flat_Pinv); ADDSYMBOL(cdf_flat_Q); ADDSYMBOL(cdf_flat_Qinv); ADDSYMBOL(cdf_gamma_P); ADDSYMBOL(cdf_gamma_Pinv); ADDSYMBOL(cdf_gamma_Q); ADDSYMBOL(cdf_gamma_Qinv); ADDSYMBOL(cdf_gaussian_P); ADDSYMBOL(cdf_gaussian_Pinv); ADDSYMBOL(cdf_gaussian_Q); ADDSYMBOL(cdf_gaussian_Qinv); ADDSYMBOL(cdf_geometric_P); ADDSYMBOL(cdf_geometric_Q); ADDSYMBOL(cdf_gumbel1_P); ADDSYMBOL(cdf_gumbel1_Pinv); ADDSYMBOL(cdf_gumbel1_Q); ADDSYMBOL(cdf_gumbel1_Qinv); ADDSYMBOL(cdf_gumbel2_P); ADDSYMBOL(cdf_gumbel2_Pinv); ADDSYMBOL(cdf_gumbel2_Q); ADDSYMBOL(cdf_gumbel2_Qinv); ADDSYMBOL(cdf_hypergeometric_P); ADDSYMBOL(cdf_hypergeometric_Q); ADDSYMBOL(cdf_laplace_P); ADDSYMBOL(cdf_laplace_Pinv); ADDSYMBOL(cdf_laplace_Q); ADDSYMBOL(cdf_laplace_Qinv); ADDSYMBOL(cdf_logistic_P); ADDSYMBOL(cdf_logistic_Pinv); ADDSYMBOL(cdf_logistic_Q); ADDSYMBOL(cdf_logistic_Qinv); ADDSYMBOL(cdf_lognormal_P); ADDSYMBOL(cdf_lognormal_Pinv); ADDSYMBOL(cdf_lognormal_Q); ADDSYMBOL(cdf_lognormal_Qinv); ADDSYMBOL(cdf_negative_binomial_P); ADDSYMBOL(cdf_negative_binomial_Q); ADDSYMBOL(cdf_pareto_P); ADDSYMBOL(cdf_pareto_Pinv); ADDSYMBOL(cdf_pareto_Q); ADDSYMBOL(cdf_pareto_Qinv); ADDSYMBOL(cdf_poisson_P); ADDSYMBOL(cdf_poisson_Q); ADDSYMBOL(cdf_rayleigh_P); ADDSYMBOL(cdf_rayleigh_Pinv); ADDSYMBOL(cdf_rayleigh_Q); ADDSYMBOL(cdf_rayleigh_Qinv); ADDSYMBOL(cdf_tdist_P); ADDSYMBOL(cdf_tdist_Pinv); ADDSYMBOL(cdf_tdist_Q); ADDSYMBOL(cdf_tdist_Qinv); ADDSYMBOL(cdf_weibull_P); ADDSYMBOL(cdf_weibull_Pinv); ADDSYMBOL(cdf_weibull_Q); ADDSYMBOL(cdf_weibull_Qinv); ADDSYMBOL(choose); ADDSYMBOL(clausen); ADDSYMBOL(conicalP_0); ADDSYMBOL(conicalP_1); ADDSYMBOL(conicalP_cyl_reg); ADDSYMBOL(conicalP_half); ADDSYMBOL(conicalP_mhalf); ADDSYMBOL(conicalP_sph_reg); ADDSYMBOL(coupling_3j); ADDSYMBOL(coupling_6j); ADDSYMBOL(coupling_9j); ADDSYMBOL(dawson); ADDSYMBOL(debye_1); ADDSYMBOL(debye_2); ADDSYMBOL(debye_3); ADDSYMBOL(debye_4); ADDSYMBOL(debye_5); ADDSYMBOL(debye_6); ADDSYMBOL(dilog); ADDSYMBOL(doublefact); ADDSYMBOL(epsilon); ADDSYMBOL(erf); ADDSYMBOL(erf_Q); ADDSYMBOL(erf_Z); ADDSYMBOL(erfc); ADDSYMBOL(eta); ADDSYMBOL(exp_mult); ADDSYMBOL(exprel); ADDSYMBOL(exprel_2); ADDSYMBOL(fact); ADDSYMBOL(fcmp); ADDSYMBOL(gamma); ADDSYMBOL(gamma_P); ADDSYMBOL(gamma_Q); ADDSYMBOL(gammainv); ADDSYMBOL(gammastar); ADDSYMBOL(gegenpoly); ADDSYMBOL(gegenpoly_1); ADDSYMBOL(gegenpoly_2); ADDSYMBOL(gegenpoly_3); ADDSYMBOL(gsl); ADDSYMBOL(hazard); ADDSYMBOL(hy0F1); ADDSYMBOL(hy1F1); ADDSYMBOL(hy2F0); ADDSYMBOL(hy2F1); ADDSYMBOL(hy2F1_conj); ADDSYMBOL(hy2F1_conj_renorm); ADDSYMBOL(hy2F1_renorm); ADDSYMBOL(hydrogenicR); ADDSYMBOL(hydrogenicR_1); ADDSYMBOL(hypot); ADDSYMBOL(hzeta); ADDSYMBOL(i0_scaled); ADDSYMBOL(i1_scaled); ADDSYMBOL(i2_scaled); ADDSYMBOL(i_scaled); ADDSYMBOL(j); ADDSYMBOL(j0); ADDSYMBOL(j1); ADDSYMBOL(j2); ADDSYMBOL(k); ADDSYMBOL(k0_scaled); ADDSYMBOL(k1_scaled); ADDSYMBOL(k2_scaled); ADDSYMBOL(k_scaled); ADDSYMBOL(l); ADDSYMBOL(lambda); ADDSYMBOL(lnK); ADDSYMBOL(lnbeta); ADDSYMBOL(lnchoose); ADDSYMBOL(lncosh); ADDSYMBOL(lndoublefact); ADDSYMBOL(lnfact); ADDSYMBOL(lngamma); ADDSYMBOL(lnpoch); ADDSYMBOL(lnsinh); ADDSYMBOL(log1pm); ADDSYMBOL(log_erfc); ADDSYMBOL(logabs); ADDSYMBOL(m); ADDSYMBOL(method); ADDSYMBOL(mu); ADDSYMBOL(n); ADDSYMBOL(n1); ADDSYMBOL(n2); ADDSYMBOL(name); ADDSYMBOL(nu); ADDSYMBOL(nu1); ADDSYMBOL(nu2); ADDSYMBOL(p); ADDSYMBOL(pdf_bernoulli); ADDSYMBOL(pdf_beta); ADDSYMBOL(pdf_binomial); ADDSYMBOL(pdf_bivariate_gaussian); ADDSYMBOL(pdf_cauchy); ADDSYMBOL(pdf_chisq); ADDSYMBOL(pdf_dirichlet); ADDSYMBOL(pdf_exponential); ADDSYMBOL(pdf_exppow); ADDSYMBOL(pdf_fdist); ADDSYMBOL(pdf_flat); ADDSYMBOL(pdf_gamma); ADDSYMBOL(pdf_gaussian); ADDSYMBOL(pdf_gaussian_tail); ADDSYMBOL(pdf_geometric); ADDSYMBOL(pdf_gumbel1); ADDSYMBOL(pdf_gumbel2); ADDSYMBOL(pdf_hypergeometric); ADDSYMBOL(pdf_landau); ADDSYMBOL(pdf_laplace); ADDSYMBOL(pdf_logarithmic); ADDSYMBOL(pdf_logistic); ADDSYMBOL(pdf_lognormal); ADDSYMBOL(pdf_multinomial); ADDSYMBOL(pdf_negative_binomial); ADDSYMBOL(pdf_pareto); ADDSYMBOL(pdf_poisson); ADDSYMBOL(pdf_rayleigh); ADDSYMBOL(pdf_rayleigh_tail); ADDSYMBOL(pdf_tdist); ADDSYMBOL(pdf_weibull); ADDSYMBOL(phi); ADDSYMBOL(poch); ADDSYMBOL(pochrel); ADDSYMBOL(pow); ADDSYMBOL(psi); ADDSYMBOL(psi1); ADDSYMBOL(psi_1piy); ADDSYMBOL(q); ADDSYMBOL(r); ADDSYMBOL(rho); ADDSYMBOL(rng_bernoulli); ADDSYMBOL(rng_beta); ADDSYMBOL(rng_binomial); ADDSYMBOL(rng_bivariate_gaussian); ADDSYMBOL(rng_cauchy); ADDSYMBOL(rng_chisq); ADDSYMBOL(rng_dir); ADDSYMBOL(rng_dir2d); ADDSYMBOL(rng_dir3d); ADDSYMBOL(rng_dirichlet); ADDSYMBOL(rng_exponential); ADDSYMBOL(rng_exppow); ADDSYMBOL(rng_fdist); ADDSYMBOL(rng_flat); ADDSYMBOL(rng_gamma); ADDSYMBOL(rng_gaussian); ADDSYMBOL(rng_gaussian_tail); ADDSYMBOL(rng_geometric); ADDSYMBOL(rng_get); ADDSYMBOL(rng_gumbel1); ADDSYMBOL(rng_gumbel2); ADDSYMBOL(rng_hypergeometric); ADDSYMBOL(rng_init); ADDSYMBOL(rng_landau); ADDSYMBOL(rng_laplace); ADDSYMBOL(rng_levy); ADDSYMBOL(rng_list); ADDSYMBOL(rng_logarithmic); ADDSYMBOL(rng_logistic); ADDSYMBOL(rng_lognormal); ADDSYMBOL(rng_max); ADDSYMBOL(rng_min); ADDSYMBOL(rng_multinomial); ADDSYMBOL(rng_name); ADDSYMBOL(rng_negative_binomial); ADDSYMBOL(rng_pareto); ADDSYMBOL(rng_poisson); ADDSYMBOL(rng_rayleigh); ADDSYMBOL(rng_rayleigh_tail); ADDSYMBOL(rng_set); ADDSYMBOL(rng_tdist); ADDSYMBOL(rng_uniform); ADDSYMBOL(rng_uniform_int); ADDSYMBOL(rng_uniform_pos); ADDSYMBOL(rng_weibull); ADDSYMBOL(s); ADDSYMBOL(seed); ADDSYMBOL(sigma); ADDSYMBOL(sinc); ADDSYMBOL(sncndn); ADDSYMBOL(sphPlm); ADDSYMBOL(synchrotron_1); ADDSYMBOL(synchrotron_2); ADDSYMBOL(t); ADDSYMBOL(taylorcoeff); ADDSYMBOL(theta); ADDSYMBOL(transport_2); ADDSYMBOL(transport_3); ADDSYMBOL(transport_4); ADDSYMBOL(transport_5); ADDSYMBOL(two_ja); ADDSYMBOL(two_jb); ADDSYMBOL(two_jc); ADDSYMBOL(two_jd); ADDSYMBOL(two_je); ADDSYMBOL(two_jf); ADDSYMBOL(two_jg); ADDSYMBOL(two_jh); ADDSYMBOL(two_ji); ADDSYMBOL(two_ma); ADDSYMBOL(two_mb); ADDSYMBOL(two_mc); ADDSYMBOL(u); ADDSYMBOL(x); ADDSYMBOL(y); ADDSYMBOL(y0); ADDSYMBOL(y1); ADDSYMBOL(y2); ADDSYMBOL(z); ADDSYMBOL(zero_Ai); ADDSYMBOL(zero_Ai_deriv); ADDSYMBOL(zero_Bi); ADDSYMBOL(zero_Bi_deriv); ADDSYMBOL(zero_J); ADDSYMBOL(zero_J0); ADDSYMBOL(zero_J1); ADDSYMBOL(zeta); ADDSYMBOL(zetam1); ./asymptote-2.41/errors0000644000175000017500000002204313064427076015003 0ustar norbertnorberterrortest.asy: 476.34: unnamed argument after rest argument errortest.asy: 477.37: additional rest argument errortest.asy: 478.28: unnamed argument after rest argument errortest.asy: 479.31: additional rest argument errortest.asy: 482.22: normal parameter after rest parameter errortest.asy: 483.22: normal parameter after rest parameter errortest.asy: 484.31: normal parameter after rest parameter errortest.asy: 485.31: normal parameter after rest parameter errortest.asy: 486.24: normal parameter after keyword-only parameter errortest.asy: 487.24: normal parameter after keyword-only parameter errortest.asy: 488.24: normal parameter after keyword-only parameter errortest.asy: 488.31: normal parameter after keyword-only parameter errortest.asy: 489.24: normal parameter after keyword-only parameter errortest.asy: 489.31: normal parameter after keyword-only parameter errortest.asy: 490.32: normal parameter after keyword-only parameter errortest.asy: 491.32: normal parameter after keyword-only parameter errortest.asy: 492.32: normal parameter after keyword-only parameter errortest.asy: 492.39: normal parameter after keyword-only parameter errortest.asy: 493.32: normal parameter after keyword-only parameter errortest.asy: 493.39: normal parameter after keyword-only parameter errortest.asy: 496.13: expected 'keyword' here errortest.asy: 497.13: expected 'keyword' here errortest.asy: 498.21: expected 'keyword' here errortest.asy: 499.21: expected 'keyword' here errortest.asy: 500.36: expected 'keyword' here errortest.asy: 500.32: normal parameter after keyword-only parameter errortest.asy: 501.36: expected 'keyword' here errortest.asy: 501.32: normal parameter after keyword-only parameter errortest.asy: 502.21: expected 'keyword' here errortest.asy: 503.21: expected 'keyword' here errortest.asy: 504.13: expected 'keyword' here errortest.asy: 505.13: expected 'keyword' here errortest.asy: 506.13: expected 'keyword' here errortest.asy: 507.13: expected 'keyword' here errortest.asy: 508.13: expected 'keyword' here errortest.asy: 509.13: expected 'keyword' here errortest.asy: 510.21: expected 'keyword' here errortest.asy: 511.21: expected 'keyword' here errortest.asy: 512.21: expected 'keyword' here errortest.asy: 513.21: expected 'keyword' here errortest.asy: 12.4: no matching variable 'x.y' errortest.asy: 16.11: no matching variable of name 'z' errortest.asy: 20.3: no matching variable 'x' errortest.asy: 27.3: no type of name 'x' errortest.asy: 28.3: no type of name 'x' errortest.asy: 29.3: no type of name 'x' errortest.asy: 30.10: no type of name 'x' errortest.asy: 32.5: no type of name 'x' errortest.asy: 33.5: no type of name 'x' errortest.asy: 34.5: no type of name 'x' errortest.asy: 35.12: no type of name 'x' errortest.asy: 41.4: no matching variable 'x.y' errortest.asy: 48.6: no matching variable 'm.u.v' errortest.asy: 55.12: no matching field of name 'z' in 'm' errortest.asy: 62.4: no matching variable 'm.z' errortest.asy: 75.4: no matching field or type of name 'u' in 'm' errortest.asy: 77.5: no matching field or type of name 'u' in 'm' errortest.asy: 84.3: expression cannot be used as an address errortest.asy: 89.3: use of variable 'f' is ambiguous errortest.asy: 91.4: use of variable 'm.f' is ambiguous errortest.asy: 97.11: array initializer used for non-array errortest.asy: 98.12: array initializer used for non-array errortest.asy: 103.4: no matching variable 'f.m' errortest.asy: 108.4: no matching variable 'x.m' errortest.asy: 116.12: no matching field of name 'z' in 'point' errortest.asy: 124.4: no matching variable 'p.z' errortest.asy: 132.4: use of variable 'p.f' is ambiguous errortest.asy: 140.4: no matching variable 'p.z' errortest.asy: 151.4: no matching function 'f()' errortest.asy: 152.4: no matching function 'f(string)' errortest.asy: 160.4: cannot call 'void f(int)' without parameters errortest.asy: 168.7: no matching function 'operator +(point)' errortest.asy: 173.10: types in conditional expression do not match errortest.asy: 178.10: type of conditional expression is ambiguous errortest.asy: 183.5: cannot convert 'int()' to 'int' in assignment errortest.asy: 188.5: assignment is ambiguous errortest.asy: 194.24: function must return a value errortest.asy: 200.11: type 'int' is not a structure errortest.asy: 209.3: allocation of struct 'b' is not in a valid scope errortest.asy: 219.3: break statement outside of a loop errortest.asy: 223.3: continue statement outside of a loop errortest.asy: 228.5: function cannot return a value errortest.asy: 234.5: function must return a value errortest.asy: 241.11: function must return a value errortest.asy: 244.11: function must return a value errortest.asy: 290.3: built-in functions cannot be modified errortest.asy: 298.11: cannot cast 'string' to 'int' errortest.asy: 312.4: accessing private field outside of structure errortest.asy: 313.4: accessing private field outside of structure errortest.asy: 314.4: accessing private field outside of structure errortest.asy: 314.4: accessing private field outside of structure errortest.asy: 315.4: modifying non-public field outside of structure errortest.asy: 316.4: modifying non-public field outside of structure errortest.asy: 318.4: accessing private field outside of structure errortest.asy: 319.4: accessing private field outside of structure errortest.asy: 320.4: accessing private field outside of structure errortest.asy: 321.4: modifying non-public field outside of structure errortest.asy: 330.18: no matching types or fields of name 'x' errortest.asy: 331.18: no matching types or fields of name 'f' errortest.asy: 341.3: modifying non-public field outside of structure errortest.asy: 342.3: modifying non-public field outside of structure errortest.asy: 344.3: modifying non-public field outside of structure errortest.asy: 350.4: accessing private field outside of structure errortest.asy: 351.4: accessing private field outside of structure errortest.asy: 353.4: accessing private field outside of structure errortest.asy: 354.4: accessing private field outside of structure errortest.asy: 360.18: no matching types or fields of name 'T' errortest.asy: 367.4: accessing private field outside of structure errortest.asy: 368.4: accessing private field outside of structure errortest.asy: 370.4: accessing private field outside of structure errortest.asy: 371.4: accessing private field outside of structure errortest.asy: 378.18: no matching types or fields of name 'T' errortest.asy: 386.11: modifying non-public field outside of structure errortest.asy: 387.11: modifying non-public field outside of structure errortest.asy: 388.11: modifying non-public field outside of structure errortest.asy: 389.11: modifying non-public field outside of structure errortest.asy: 393.3: modifying non-public field outside of structure errortest.asy: 394.3: modifying non-public field outside of structure errortest.asy: 395.3: modifying non-public field outside of structure errortest.asy: 396.3: modifying non-public field outside of structure errortest.asy: 400.3: modifying non-public field outside of structure errortest.asy: 401.3: modifying non-public field outside of structure errortest.asy: 402.3: modifying non-public field outside of structure errortest.asy: 403.3: modifying non-public field outside of structure errortest.asy: 407.11: modifying non-public field outside of structure errortest.asy: 408.11: modifying non-public field outside of structure errortest.asy: 409.11: modifying non-public field outside of structure errortest.asy: 410.11: modifying non-public field outside of structure errortest.asy: 411.3: modifying non-public field outside of structure errortest.asy: 412.3: modifying non-public field outside of structure errortest.asy: 413.3: modifying non-public field outside of structure errortest.asy: 414.3: modifying non-public field outside of structure errortest.asy: 419.7: inferred variable declaration without initializer errortest.asy: 422.20: cannot cast 'int' to 'var' errortest.asy: 425.4: cannot cast 'int' to 'var' errortest.asy: 426.12: cannot cast 'int' to 'var' errortest.asy: 427.12: cannot cast 'var' to 'int' errortest.asy: 430.25: cannot cast 'int' to 'var' errortest.asy: 430.28: cannot cast 'int' to 'var' errortest.asy: 430.31: cannot cast 'int' to 'var' errortest.asy: 431.13: cannot cast 'int[]' to 'var[]' errortest.asy: 432.14: cannot cast 'int' to 'var' errortest.asy: 432.17: cannot cast 'int' to 'var' errortest.asy: 432.20: cannot cast 'int' to 'var' errortest.asy: 433.15: cannot cast 'int' to 'var' errortest.asy: 433.18: cannot cast 'int' to 'var' errortest.asy: 433.21: cannot cast 'int' to 'var' errortest.asy: 434.13: cannot cast 'var[]' to 'int[]' errortest.asy: 435.3: type 'var' is not a structure errortest.asy: 438.17: cannot cast 'int' to 'var' errortest.asy: 442.7: could not infer type of initializer errortest.asy: 446.7: could not infer type of initializer errortest.asy: 448.7: could not infer type of initializer errortest.asy: 452.16: expression is not an array of inferable type errortest.asy: 457.16: expression is not an array of inferable type errortest.asy: 463.16: expression is not an array of inferable type errortest.asy: 470.7: array expression cannot be used as an address ./asymptote-2.41/main.cc0000644000175000017500000001104713064427076015001 0ustar norbertnorbert/************ * * This file is part of the vector graphics language Asymptote * Copyright (C) 2004 Andy Hammerlindl, John C. Bowman, Tom Prince * http://asymptote.sourceforge.net * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Lesser General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public License * along with this program. If not, see . * *************/ #include #include #include #include #include #include "common.h" #ifdef HAVE_LIBSIGSEGV #include #endif #include "errormsg.h" #include "fpu.h" #include "settings.h" #include "locate.h" #include "interact.h" #include "process.h" #include "stack.h" using namespace settings; using interact::interactive; namespace run { void purge(); } #ifdef PROFILE namespace vm { extern void dumpProfile(); }; #endif #ifdef HAVE_LIBSIGSEGV void stackoverflow_handler (int, stackoverflow_context_t) { em.runtime(vm::getPos()); cerr << "Stack overflow" << endl; abort(); } int sigsegv_handler (void *, int emergency) { if(!emergency) return 0; // Really a stack overflow em.runtime(vm::getPos()); #ifdef HAVE_GL if(gl::glthread) cerr << "Stack overflow or segmentation fault: rerun with -nothreads" << endl; else #endif cerr << "Segmentation fault" << endl; abort(); } #endif void setsignal(RETSIGTYPE (*handler)(int)) { #ifdef HAVE_LIBSIGSEGV char mystack[16384]; stackoverflow_install_handler(&stackoverflow_handler, mystack,sizeof (mystack)); sigsegv_install_handler(&sigsegv_handler); #endif Signal(SIGBUS,handler); Signal(SIGFPE,handler); } void signalHandler(int) { // Print the position and trust the shell to print an error message. em.runtime(vm::getPos()); Signal(SIGBUS,SIG_DFL); Signal(SIGFPE,SIG_DFL); } void interruptHandler(int) { em.Interrupt(true); } struct Args { int argc; char **argv; Args(int argc, char **argv) : argc(argc), argv(argv) {} }; void *asymain(void *A) { setsignal(signalHandler); Args *args=(Args *) A; fpu_trap(trap()); if(interactive) { Signal(SIGINT,interruptHandler); processPrompt(); } else if (getSetting("listvariables") && numArgs()==0) { try { doUnrestrictedList(); } catch(handled_error) { em.statusError(); } } else { int n=numArgs(); if(n == 0) processFile("-"); else for(int ind=0; ind < n; ind++) { processFile(string(getArg(ind)),n > 1); try { if(ind < n-1) setOptions(args->argc,args->argv); } catch(handled_error) { em.statusError(); } } } #ifdef PROFILE vm::dumpProfile(); #endif if(getSetting("wait")) { int status; while(wait(&status) > 0); } #ifdef HAVE_GL #ifdef HAVE_PTHREAD if(gl::glthread && !getSetting("offscreen")) { pthread_kill(gl::mainthread,SIGUSR2); pthread_join(gl::mainthread,NULL); } #endif #endif exit(em.processStatus() || interact::interactive ? 0 : 1); } void exitHandler(int) { exit(0); } int main(int argc, char *argv[]) { #ifdef HAVE_LIBGSL unsetenv("GSL_RNG_SEED"); unsetenv("GSL_RNG_TYPE"); #endif setsignal(signalHandler); try { setOptions(argc,argv); } catch(handled_error) { em.statusError(); } Args args(argc,argv); #ifdef HAVE_GL #ifdef __APPLE__ bool usethreads=true; #else bool usethreads=view(); #endif gl::glthread=usethreads ? getSetting("threads") : false; #if HAVE_PTHREAD if(gl::glthread) { pthread_t thread; try { if(pthread_create(&thread,NULL,asymain,&args) == 0) { gl::mainthread=pthread_self(); sigset_t set; sigemptyset(&set); sigaddset(&set, SIGCHLD); pthread_sigmask(SIG_BLOCK, &set, NULL); while(true) { Signal(SIGUSR2,exitHandler); camp::glrenderWrapper(); gl::initialize=true; } } else gl::glthread=false; } catch(std::bad_alloc&) { outOfMemory(); } } #endif gl::glthread=false; #endif asymain(&args); } ./asymptote-2.41/runtime.pl0000755000175000017500000001607613064427076015600 0ustar norbertnorbert#!/usr/bin/env perl ###### # runtime.pl # Tom Prince 2004/4/15 # # Generate the runtime functions used by the vm::stack machine. # ##### $prefix = shift(@ARGV); if (not $prefix) { print STDERR "usage: ./runtime.pl module_name\n"; exit(1); } $stack = "Stack"; my $errors = 0; sub report_error { my $filename = shift; my $line = shift; my $error = shift; print STDERR "$filename:$line: $error\n"; $errors = 1; } sub assoc_error { my $filename = shift; my $line = shift; my $type = shift; report_error($filename, $line, "no asy type associated to '$type'"); } sub clean_type { for (@_) { s/\s//g; } } sub clean_params { for (@_) { s/\n//g; } } my %type_map; sub read_types { my @types = split /\n/, shift; my $filename = shift; my $line = shift; for (@types) { ++$line; # Remove // comments. s/\/\/.*//g; # Skip blank lines. next if /^\s*$/; my ($type,$code) = m|(\w*(?:\s*\*)?) \s*=>\s* (.*) |x; if (not $type) { report_error($filename, $line, "bad type declaration"); } clean_type($type); $type_map{$type} = $code; } } # Scrape the symbol names of the operators from opsymbols.h. my %opsymbols = (); open(opsyms, "opsymbols.h") || die("Couldn't open opsymbols.h"); while () { if (m/^OPSYMBOL\(\"(.*)\", ([A-Za-z_]+)\);/) { $opsymbols{ $1 } = $2; } } # Turn a name into a symbol. sub symbolize { my $name = shift; if ($name =~ /^[A-Za-z0-9_]+$/) { return "SYM($name)"; } if ($opsymbols{ $name }) { return $opsymbols{ $name }; } if ($name =~ /operator (\w+)/ && $opsymbols{ $1 }) { return $opsymbols{ $1 } } return "symbol::trans(\"" . $name . "\")" } sub asy_params { my $params = shift; my @params = split m/,\s*/, $params; my $filename = shift; my $line = shift; for (@params) { my ($explicit, $type, $name, $default) = m|^\s* (explicit)*\s*(\w*(?:\s*\*)?) \s* (\w*)(=*)|xs; clean_type($type); if (not $type_map{$type}) { assoc_error($filename, $line, $type); } $_ = "formal(" . $type_map{$type} . ", " . symbolize(lc($name)) . ", " . ($default ? "true" : "false") . ", " . ($explicit ? "true" : "false") . ")"; } return @params; } sub c_params { my @params = @_; for (@params) { my ($explicit, $type, $name, $default, $value) = m|^\s* (explicit)*\s*(\w*(?:\s*\*)?) \s* (\w*)(=*)([\w.+\-]*)|xs; $_ = " $type $name=vm::pop" . ($type =~ /^item$/ ? "" : "<$type>") . "($stack" . ($default ? "," . $value : "") . ");\n"; } reverse @params; } $/ = "\f\n"; open STDIN, "<$prefix.in" or die "can't open input file $prefix.in"; open BASE, "$prefix.cc" or die "can't open output file $prefix.cc"; my $autogenerated= "/***** Autogenerated from $prefix.in; changes will be overwritten *****/\n\n"; my $base_source_line = 1; my $source_line = 1; print $autogenerated; print "#line $base_source_line \"runtimebase.in\"\n"; $baseheader = ; print $baseheader; $basesource_line += ($baseheader =~ tr/\n//);; my $basesource_type_line = $basesource_line; print "#line $source_line \"$prefix.in\"\n"; $header = <>; print $header; $source_line += ($header =~ tr/\n//);; my $source_type_line = $source_line; $basetypes = ; $basesource_line += ($basetypes =~ tr/\n//);; $types = <>; $source_line += ($types =~ tr/\n//);; print "#line $base_source_line \"runtimebase.in\"\n"; $baseheader = ; print $baseheader; $basesource_line += ($baseheader =~ tr/\n//);; print "#line $source_line \"$prefix.in\"\n"; $header = <>; print $header; $source_line += ($header =~ tr/\n//);; print "\n#ifndef NOSYM"; print "\n#include \"$prefix.symbols.h\"\n"; print "\n#endif"; print "\nnamespace run {\n"; read_types($basetypes, "runtimebase.in", $basesource_type_line); read_types($types, "$prefix.in", $source_type_line); ### Begining of `$prefix.h' push @header, $autogenerated; # TODO: Capitalize prefix push @header, "#ifndef " . $prefix . "_H\n"; push @header, "#define " . $prefix . "_H\n"; push @header, "namespace run {\n"; my $count = 0; while (<>) { my ($comments,$type,$name,$cname,$params,$code) = m|^((?:\s*//[^\n]*\n)*) # comment lines \s* (\w*(?:\s*\*)?) # return type \s* ([^(:]*)\:*([^(]*) # function name \s* \(([\w\s*,=.+\-]*)\) # parameters \s* \{(.*)} # body |xs; if (not $type) { report_error("$prefix.in", $source_line, "bad function definition"); } if($cname) {push @header, "void $cname(vm::stack *);\n";} else {$cname="gen_$prefix${count}";} # Unique C++ function name clean_type($type); my @params = split m/,\s*/, $params; # Build addFunc call for asymptote if($name) { $name =~ s/Operator\s*//; if (not $type_map{$type}) { assoc_error("$prefix.in", $source_line, $type); } my @asy_params = asy_params($params, "$prefix.in", $source_line); push @builtin, "#line $source_line \"$prefix.in\"\n" . " addFunc(ve, run::" . $cname . ", " . $type_map{$type} . ", " . symbolize($name) . ( @params ? ", " . join(", ",@asy_params) : "" ) . ");\n"; } # Build REGISTER_BLTIN command for builtin functions which are not added to # the environment. if (not $name and $cname) { push @builtin, "#line $source_line \"$prefix.in\"\n" . " REGISTER_BLTIN(run::" . $cname . ',"' . $cname . '"' . ");\n"; } # Handle marshalling of values to/from stack $qualifier = ($type eq "item" ? "" : "<$type>"); $code =~ s/\breturn ([^;]*);/{$stack->push$qualifier($1); return;}/g; $args = join("",c_params(@params)); print $comments; $ncomments = ($comments =~ tr/\n//); $source_line += $ncomments; print "#line $source_line \"$prefix.in\"\n"; my $prototype=$type . " " . $name . "(" . $params . ");"; $nprototype = ($prototype =~ tr/\n//)+1; $source_line += $nprototype; if($name) { clean_params($prototype); print "// $prototype\n"; } print "void $cname(stack *"; if($type ne "void" or $params ne "") {print $stack;} print ")\n{\n$args"; print "#line $source_line \"$prefix.in\""; print "$code}\n\n"; $source_line -= $ncomments+$nprototype; $source_line += ($_ =~ tr/\n//); ++$count; } print "} // namespace run\n"; print "\nnamespace trans {\n\n"; print "void gen_${prefix}_venv(venv &ve)\n{\n"; print @builtin; print "}\n\n"; print "} // namespace trans\n"; ### End of `header.h' push @header, "}\n\n"; push @header, "#endif // ". $prefix . "_H\n"; undef $/; open HEADER, "<", "$prefix.h"; $orig_header =

    ; $new_header = join "", @header; if ($new_header ne $orig_header) { open HEADER, ">", "$prefix.h"; print HEADER $new_header; } if ($errors) { unlink("$prefix.h"); unlink("$prefix.cc"); } exit($errors); ./asymptote-2.41/EnvVarUpdate.nsh0000755000175000017500000002461013064427076016627 0ustar norbertnorbert/** * EnvVarUpdate.nsh * : Environmental Variables: append, prepend, and remove entries * * WARNING: If you use StrFunc.nsh header then include it before this file * with all required definitions. This is to avoid conflicts * * Usage: * ${EnvVarUpdate} "ResultVar" "EnvVarName" "Action" "RegLoc" "PathString" * * Credits: * Version 1.0 * * Cal Turney (turnec2) * * Amir Szekely (KiCHiK) and e-circ for developing the forerunners of this * function: AddToPath, un.RemoveFromPath, AddToEnvVar, un.RemoveFromEnvVar, * WriteEnvStr, and un.DeleteEnvStr * * Diego Pedroso (deguix) for StrTok * * Kevin English (kenglish_hi) for StrContains * * Hendri Adriaens (Smile2Me), Diego Pedroso (deguix), and Dan Fuhry * (dandaman32) for StrReplace * * Version 1.1 (compatibility with StrFunc.nsh) * * techtonik * * http://nsis.sourceforge.net/Environmental_Variables:_append%2C_prepend%2C_and_remove_entries * */ !ifndef ENVVARUPDATE_FUNCTION !define ENVVARUPDATE_FUNCTION !verbose push !verbose 3 !include "LogicLib.nsh" !include "WinMessages.NSH" !include "StrFunc.nsh" ; ---- Fix for conflict if StrFunc.nsh is already includes in main file ----------------------- !macro _IncludeStrFunction StrFuncName !ifndef ${StrFuncName}_INCLUDED ${${StrFuncName}} !endif !ifndef Un${StrFuncName}_INCLUDED ${Un${StrFuncName}} !endif !define un.${StrFuncName} "${Un${StrFuncName}}" !macroend !insertmacro _IncludeStrFunction StrTok !insertmacro _IncludeStrFunction StrStr !insertmacro _IncludeStrFunction StrRep ; ---------------------------------- Macro Definitions ---------------------------------------- !macro _EnvVarUpdateConstructor ResultVar EnvVarName Action Regloc PathString Push "${EnvVarName}" Push "${Action}" Push "${RegLoc}" Push "${PathString}" Call EnvVarUpdate Pop "${ResultVar}" !macroend !define EnvVarUpdate '!insertmacro "_EnvVarUpdateConstructor"' !macro _unEnvVarUpdateConstructor ResultVar EnvVarName Action Regloc PathString Push "${EnvVarName}" Push "${Action}" Push "${RegLoc}" Push "${PathString}" Call un.EnvVarUpdate Pop "${ResultVar}" !macroend !define un.EnvVarUpdate '!insertmacro "_unEnvVarUpdateConstructor"' ; ---------------------------------- Macro Definitions end------------------------------------- ;----------------------------------- EnvVarUpdate start---------------------------------------- !define hklm_all_users 'HKLM "SYSTEM\CurrentControlSet\Control\Session Manager\Environment"' !define hkcu_current_user 'HKCU "Environment"' !macro EnvVarUpdate UN Function ${UN}EnvVarUpdate Push $0 Exch 4 Exch $1 Exch 3 Exch $2 Exch 2 Exch $3 Exch Exch $4 Push $5 Push $6 Push $7 Push $8 Push $9 Push $R0 /* After this point: ------------------------- $0 = ResultVar (returned) $1 = EnvVarName (input) $2 = Action (input) $3 = RegLoc (input) $4 = PathString (input) $5 = Orig EnvVar (read from registry) $6 = Len of $0 (temp) $7 = tempstr1 (temp) $8 = Entry counter (temp) $9 = tempstr2 (temp) $R0 = tempChar (temp) */ ; Step 1: Read contents of EnvVarName from RegLoc ; ; Check for empty EnvVarName ${If} $1 == "" SetErrors DetailPrint "ERROR: EnvVarName is blank" Goto EnvVarUpdate_Restore_Vars ${EndIf} ; Check for valid Action ${If} $2 != "A" ${AndIf} $2 != "P" ${AndIf} $2 != "R" SetErrors DetailPrint "ERROR: Invalid Action - must be A, P, or R" Goto EnvVarUpdate_Restore_Vars ${EndIf} ${If} $3 == HKLM ReadRegStr $5 ${hklm_all_users} $1 ; Get EnvVarName from all users into $5 ${ElseIf} $3 == HKCU ReadRegStr $5 ${hkcu_current_user} $1 ; Read EnvVarName from current user into $5 ${Else} SetErrors DetailPrint 'ERROR: Action is [$3] but must be "HKLM" or HKCU"' Goto EnvVarUpdate_Restore_Vars ${EndIf} ; Check for empty PathString ${If} $4 == "" SetErrors DetailPrint "ERROR: PathString is blank" Goto EnvVarUpdate_Restore_Vars ${EndIf} ; Make sure we've got some work to do ${If} $5 == "" ${AndIf} $2 == "R" SetErrors DetailPrint "$1 is empty - Nothing to remove" Goto EnvVarUpdate_Restore_Vars ${EndIf} ; Step 2: Scrub EnvVar ; StrCpy $0 $5 ; Copy the contents to $0 ; Remove spaces around semicolons (NOTE: spaces before the 1st entry or ; after the last one are not removed here but instead in Step 3) ${If} $0 != "" ; If EnvVar is not empty ... ${Do} ${${UN}StrStr} $7 $0 " ;" ${If} $7 == "" ${ExitDo} ${EndIf} ${${UN}StrRep} $0 $0 " ;" ";" ; Remove ';' ${Loop} ${Do} ${${UN}StrStr} $7 $0 "; " ${If} $7 == "" ${ExitDo} ${EndIf} ${${UN}StrRep} $0 $0 "; " ";" ; Remove ';' ${Loop} ${Do} ${${UN}StrStr} $7 $0 ";;" ${If} $7 == "" ${ExitDo} ${EndIf} ${${UN}StrRep} $0 $0 ";;" ";" ${Loop} ; Remove a leading or trailing semicolon from EnvVar StrCpy $7 $0 1 0 ${If} $7 == ";" StrCpy $0 $0 "" 1 ; Change ';' to '' ${EndIf} StrLen $6 $0 IntOp $6 $6 - 1 StrCpy $7 $0 1 $6 ${If} $7 == ";" StrCpy $0 $0 $6 ; Change ';' to '' ${EndIf} ; DetailPrint "Scrubbed $1: [$0]" ; Uncomment to debug ${EndIf} /* Step 3. Remove all instances of the target path/string (even if "A" or "P") $6 = bool flag (1 = found and removed PathString) $7 = a string (e.g. path) delimited by semicolon(s) $8 = entry counter starting at 0 $9 = copy of $0 $R0 = tempChar */ ${If} $5 != "" ; If EnvVar is not empty ... StrCpy $9 $0 StrCpy $0 "" StrCpy $8 0 StrCpy $6 0 ${Do} ${${UN}StrTok} $7 $9 ";" $8 "0" ; $7 = next entry, $8 = entry counter ${If} $7 == "" ; If we've run out of entries, ${ExitDo} ; were done ${EndIf} ; ; Remove leading and trailing spaces from this entry (critical step for Action=Remove) ${Do} StrCpy $R0 $7 1 ${If} $R0 != " " ${ExitDo} ${EndIf} StrCpy $7 $7 "" 1 ; Remove leading space ${Loop} ${Do} StrCpy $R0 $7 1 -1 ${If} $R0 != " " ${ExitDo} ${EndIf} StrCpy $7 $7 -1 ; Remove trailing space ${Loop} ${If} $7 == $4 ; If string matches, remove it by not appending it StrCpy $6 1 ; Set 'found' flag ${ElseIf} $7 != $4 ; If string does NOT match ${AndIf} $0 == "" ; and the 1st string being added to $0, StrCpy $0 $7 ; copy it to $0 without a prepended semicolon ${ElseIf} $7 != $4 ; If string does NOT match ${AndIf} $0 != "" ; and this is NOT the 1st string to be added to $0, StrCpy $0 $0;$7 ; append path to $0 with a prepended semicolon ${EndIf} ; IntOp $8 $8 + 1 ; Bump counter ${Loop} ; Check for duplicates until we run out of paths ${EndIf} ; Step 4: Perform the requested Action ; ${If} $2 != "R" ; If Append or Prepend ${If} $6 == 1 ; And if we found the target DetailPrint "Target is already present in $1. It will be removed and" ${EndIf} ${If} $0 == "" ; If EnvVar is (now) empty StrCpy $0 $4 ; just copy PathString to EnvVar ${If} $6 == 0 ; If found flag is either 0 ${OrIf} $6 == "" ; or blank (if EnvVarName is empty) DetailPrint "$1 was empty and has been updated with the target" ${EndIf} ${ElseIf} $2 == "A" ; If Append (and EnvVar is not empty), StrCpy $0 $0;$4 ; append PathString ${If} $6 == 1 DetailPrint "appended to $1" ${Else} DetailPrint "Target was appended to $1" ${EndIf} ${Else} ; If Prepend (and EnvVar is not empty), StrCpy $0 $4;$0 ; prepend PathString ${If} $6 == 1 DetailPrint "prepended to $1" ${Else} DetailPrint "Target was prepended to $1" ${EndIf} ${EndIf} ${Else} ; If Action = Remove ${If} $6 == 1 ; and we found the target DetailPrint "Target was found and removed from $1" ${Else} DetailPrint "Target was NOT found in $1 (nothing to remove)" ${EndIf} ${If} $0 == "" DetailPrint "$1 is now empty" ${EndIf} ${EndIf} ; Step 5: Update the registry at RegLoc with the updated EnvVar and announce the change ; ClearErrors ${If} $3 == HKLM WriteRegExpandStr ${hklm_all_users} $1 $0 ; Write it in all users section ${ElseIf} $3 == HKCU WriteRegExpandStr ${hkcu_current_user} $1 $0 ; Write it to current user section ${EndIf} IfErrors 0 +4 MessageBox MB_OK|MB_ICONEXCLAMATION "Could not write updated $1 to $3" DetailPrint "Could not write updated $1 to $3" Goto EnvVarUpdate_Restore_Vars ; "Export" our change SendMessage ${HWND_BROADCAST} ${WM_WININICHANGE} 0 "STR:Environment" /TIMEOUT=5000 EnvVarUpdate_Restore_Vars: ; ; Restore the user's variables and return ResultVar Pop $R0 Pop $9 Pop $8 Pop $7 Pop $6 Pop $5 Pop $4 Pop $3 Pop $2 Pop $1 Push $0 ; Push my $0 (ResultVar) Exch Pop $0 ; Restore his $0 FunctionEnd !macroend ; EnvVarUpdate UN !insertmacro EnvVarUpdate "" !insertmacro EnvVarUpdate "un." ;----------------------------------- EnvVarUpdate end---------------------------------------- !verbose pop !endif ./asymptote-2.41/virtualfieldaccess.h0000644000175000017500000000443013064427076017571 0ustar norbertnorbert/***** * virtualfieldaccess.h * Andy Hammerlindl 2009/07/23 * * Implements the access subclass used to read and write virtual fields. *****/ #include "access.h" namespace trans { // In code such as // pair z; write(z.x); // to evaluate the expression z.x, first z is pushed onto the stack, then as // it is not a record, instead of accessing its field in the usual way for a // record, a builtin function is called which pops z off the stack and // replaces it with z.x. virtualFieldAccess provides the access for the // virtualField 'x', and 'getter' is the access to the builtin function which // replaces z with z.x. // // If the virtual field z.x were mutable, then setter would access a builtin // function, which pops a real number and then z off of the stack, sets the // z.x to that new value, and puts the value back on the stack. In this case, // pairs are immutable, but other virtual fields may not be. // // Some virtual fields are functions, such as a.push for an array a. In rare // cases, code such as // void f(int) = a.push; // requires an object representing a.push, and so a getter for the field must // be provided. Most of the time, however, these fields are just called. // As an optimization, a caller access can be provided. If this access is // given, then a call to the virtualFieldAccess just translates into a call to // caller. class virtualFieldAccess : public access { access *getter; access *setter; access *caller; public: virtualFieldAccess(access *getter, access *setter = 0, access *caller = 0) : getter(getter), setter(setter) {} virtualFieldAccess(vm::bltin getter, vm::bltin setter = 0, vm::bltin caller = 0) : getter(new bltinAccess(getter)), setter(setter ? new bltinAccess(setter) : 0), caller(caller ? new bltinAccess(caller) : 0) {} void encode(action act, position pos, coder &e); void encode(action act, position pos, coder &e, frame *); // Attempting to WRITE a read-only field will give an error, but if the // error is caught at a higher level, a better error message (including the // name of the field) can be given. This function allows such handling. bool readonly() { return (bool)setter; } }; } // namespace trans ./asymptote-2.41/config.sub0000644000175000017500000010527413064427076015534 0ustar norbertnorbert#! /bin/sh # Configuration validation subroutine script. # Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, # 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, # 2011, 2012 Free Software Foundation, Inc. timestamp='2012-04-18' # This file is (in principle) common to ALL GNU software. # The presence of a machine in this file suggests that SOME GNU software # can handle that machine. It does not imply ALL GNU software can. # # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, see . # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under # the same distribution terms that you use for the rest of that program. # Please send patches to . Submit a context # diff and a properly formatted GNU ChangeLog entry. # # Configuration subroutine to validate and canonicalize a configuration type. # Supply the specified configuration type as an argument. # If it is invalid, we print an error message on stderr and exit with code 1. # Otherwise, we print the canonical config type on stdout and succeed. # You can get the latest version of this script from: # http://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=config.sub;hb=HEAD # This file is supposed to be the same for all GNU packages # and recognize all the CPU types, system types and aliases # that are meaningful with *any* GNU software. # Each package is responsible for reporting which valid configurations # it does not support. The user should be able to distinguish # a failure to support a valid configuration from a meaningless # configuration. # The goal of this file is to map all the various variations of a given # machine specification into a single specification in the form: # CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM # or in some cases, the newer four-part form: # CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM # It is wrong to echo any other type of specification. me=`echo "$0" | sed -e 's,.*/,,'` usage="\ Usage: $0 [OPTION] CPU-MFR-OPSYS $0 [OPTION] ALIAS Canonicalize a configuration name. Operation modes: -h, --help print this help, then exit -t, --time-stamp print date of last modification, then exit -v, --version print version number, then exit Report bugs and patches to ." version="\ GNU config.sub ($timestamp) Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." help=" Try \`$me --help' for more information." # Parse command line while test $# -gt 0 ; do case $1 in --time-stamp | --time* | -t ) echo "$timestamp" ; exit ;; --version | -v ) echo "$version" ; exit ;; --help | --h* | -h ) echo "$usage"; exit ;; -- ) # Stop option processing shift; break ;; - ) # Use stdin as input. break ;; -* ) echo "$me: invalid option $1$help" exit 1 ;; *local*) # First pass through any local machine types. echo $1 exit ;; * ) break ;; esac done case $# in 0) echo "$me: missing argument$help" >&2 exit 1;; 1) ;; *) echo "$me: too many arguments$help" >&2 exit 1;; esac # Separate what the user gave into CPU-COMPANY and OS or KERNEL-OS (if any). # Here we must recognize all the valid KERNEL-OS combinations. maybe_os=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\2/'` case $maybe_os in nto-qnx* | linux-gnu* | linux-android* | linux-dietlibc | linux-newlib* | \ linux-uclibc* | uclinux-uclibc* | uclinux-gnu* | kfreebsd*-gnu* | \ knetbsd*-gnu* | netbsd*-gnu* | \ kopensolaris*-gnu* | \ storm-chaos* | os2-emx* | rtmk-nova*) os=-$maybe_os basic_machine=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\1/'` ;; android-linux) os=-linux-android basic_machine=`echo $1 | sed 's/^\(.*\)-\([^-]*-[^-]*\)$/\1/'`-unknown ;; *) basic_machine=`echo $1 | sed 's/-[^-]*$//'` if [ $basic_machine != $1 ] then os=`echo $1 | sed 's/.*-/-/'` else os=; fi ;; esac ### Let's recognize common machines as not being operating systems so ### that things like config.sub decstation-3100 work. We also ### recognize some manufacturers as not being operating systems, so we ### can provide default operating systems below. case $os in -sun*os*) # Prevent following clause from handling this invalid input. ;; -dec* | -mips* | -sequent* | -encore* | -pc532* | -sgi* | -sony* | \ -att* | -7300* | -3300* | -delta* | -motorola* | -sun[234]* | \ -unicom* | -ibm* | -next | -hp | -isi* | -apollo | -altos* | \ -convergent* | -ncr* | -news | -32* | -3600* | -3100* | -hitachi* |\ -c[123]* | -convex* | -sun | -crds | -omron* | -dg | -ultra | -tti* | \ -harris | -dolphin | -highlevel | -gould | -cbm | -ns | -masscomp | \ -apple | -axis | -knuth | -cray | -microblaze) os= basic_machine=$1 ;; -bluegene*) os=-cnk ;; -sim | -cisco | -oki | -wec | -winbond) os= basic_machine=$1 ;; -scout) ;; -wrs) os=-vxworks basic_machine=$1 ;; -chorusos*) os=-chorusos basic_machine=$1 ;; -chorusrdb) os=-chorusrdb basic_machine=$1 ;; -hiux*) os=-hiuxwe2 ;; -sco6) os=-sco5v6 basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -sco5) os=-sco3.2v5 basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -sco4) os=-sco3.2v4 basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -sco3.2.[4-9]*) os=`echo $os | sed -e 's/sco3.2./sco3.2v/'` basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -sco3.2v[4-9]*) # Don't forget version if it is 3.2v4 or newer. basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -sco5v6*) # Don't forget version if it is 3.2v4 or newer. basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -sco*) os=-sco3.2v2 basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -udk*) basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -isc) os=-isc2.2 basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -clix*) basic_machine=clipper-intergraph ;; -isc*) basic_machine=`echo $1 | sed -e 's/86-.*/86-pc/'` ;; -lynx*178) os=-lynxos178 ;; -lynx*5) os=-lynxos5 ;; -lynx*) os=-lynxos ;; -ptx*) basic_machine=`echo $1 | sed -e 's/86-.*/86-sequent/'` ;; -windowsnt*) os=`echo $os | sed -e 's/windowsnt/winnt/'` ;; -psos*) os=-psos ;; -mint | -mint[0-9]*) basic_machine=m68k-atari os=-mint ;; esac # Decode aliases for certain CPU-COMPANY combinations. case $basic_machine in # Recognize the basic CPU types without company name. # Some are omitted here because they have special meanings below. 1750a | 580 \ | a29k \ | aarch64 | aarch64_be \ | alpha | alphaev[4-8] | alphaev56 | alphaev6[78] | alphapca5[67] \ | alpha64 | alpha64ev[4-8] | alpha64ev56 | alpha64ev6[78] | alpha64pca5[67] \ | am33_2.0 \ | arc | arm | arm[bl]e | arme[lb] | armv[2345] | armv[345][lb] | avr | avr32 \ | be32 | be64 \ | bfin \ | c4x | clipper \ | d10v | d30v | dlx | dsp16xx \ | epiphany \ | fido | fr30 | frv \ | h8300 | h8500 | hppa | hppa1.[01] | hppa2.0 | hppa2.0[nw] | hppa64 \ | hexagon \ | i370 | i860 | i960 | ia64 \ | ip2k | iq2000 \ | le32 | le64 \ | lm32 \ | m32c | m32r | m32rle | m68000 | m68k | m88k \ | maxq | mb | microblaze | mcore | mep | metag \ | mips | mipsbe | mipseb | mipsel | mipsle \ | mips16 \ | mips64 | mips64el \ | mips64octeon | mips64octeonel \ | mips64orion | mips64orionel \ | mips64r5900 | mips64r5900el \ | mips64vr | mips64vrel \ | mips64vr4100 | mips64vr4100el \ | mips64vr4300 | mips64vr4300el \ | mips64vr5000 | mips64vr5000el \ | mips64vr5900 | mips64vr5900el \ | mipsisa32 | mipsisa32el \ | mipsisa32r2 | mipsisa32r2el \ | mipsisa64 | mipsisa64el \ | mipsisa64r2 | mipsisa64r2el \ | mipsisa64sb1 | mipsisa64sb1el \ | mipsisa64sr71k | mipsisa64sr71kel \ | mipstx39 | mipstx39el \ | mn10200 | mn10300 \ | moxie \ | mt \ | msp430 \ | nds32 | nds32le | nds32be \ | nios | nios2 \ | ns16k | ns32k \ | open8 \ | or32 \ | pdp10 | pdp11 | pj | pjl \ | powerpc | powerpc64 | powerpc64le | powerpcle \ | pyramid \ | rl78 | rx \ | score \ | sh | sh[1234] | sh[24]a | sh[24]aeb | sh[23]e | sh[34]eb | sheb | shbe | shle | sh[1234]le | sh3ele \ | sh64 | sh64le \ | sparc | sparc64 | sparc64b | sparc64v | sparc86x | sparclet | sparclite \ | sparcv8 | sparcv9 | sparcv9b | sparcv9v \ | spu \ | tahoe | tic4x | tic54x | tic55x | tic6x | tic80 | tron \ | ubicom32 \ | v850 | v850e | v850e1 | v850e2 | v850es | v850e2v3 \ | we32k \ | x86 | xc16x | xstormy16 | xtensa \ | z8k | z80) basic_machine=$basic_machine-unknown ;; c54x) basic_machine=tic54x-unknown ;; c55x) basic_machine=tic55x-unknown ;; c6x) basic_machine=tic6x-unknown ;; m6811 | m68hc11 | m6812 | m68hc12 | m68hcs12x | picochip) basic_machine=$basic_machine-unknown os=-none ;; m88110 | m680[12346]0 | m683?2 | m68360 | m5200 | v70 | w65 | z8k) ;; ms1) basic_machine=mt-unknown ;; strongarm | thumb | xscale) basic_machine=arm-unknown ;; xgate) basic_machine=$basic_machine-unknown os=-none ;; xscaleeb) basic_machine=armeb-unknown ;; xscaleel) basic_machine=armel-unknown ;; # We use `pc' rather than `unknown' # because (1) that's what they normally are, and # (2) the word "unknown" tends to confuse beginning users. i*86 | x86_64) basic_machine=$basic_machine-pc ;; # Object if more than one company name word. *-*-*) echo Invalid configuration \`$1\': machine \`$basic_machine\' not recognized 1>&2 exit 1 ;; # Recognize the basic CPU types with company name. 580-* \ | a29k-* \ | aarch64-* | aarch64_be-* \ | alpha-* | alphaev[4-8]-* | alphaev56-* | alphaev6[78]-* \ | alpha64-* | alpha64ev[4-8]-* | alpha64ev56-* | alpha64ev6[78]-* \ | alphapca5[67]-* | alpha64pca5[67]-* | arc-* \ | arm-* | armbe-* | armle-* | armeb-* | armv*-* \ | avr-* | avr32-* \ | be32-* | be64-* \ | bfin-* | bs2000-* \ | c[123]* | c30-* | [cjt]90-* | c4x-* \ | clipper-* | craynv-* | cydra-* \ | d10v-* | d30v-* | dlx-* \ | elxsi-* \ | f30[01]-* | f700-* | fido-* | fr30-* | frv-* | fx80-* \ | h8300-* | h8500-* \ | hppa-* | hppa1.[01]-* | hppa2.0-* | hppa2.0[nw]-* | hppa64-* \ | hexagon-* \ | i*86-* | i860-* | i960-* | ia64-* \ | ip2k-* | iq2000-* \ | le32-* | le64-* \ | lm32-* \ | m32c-* | m32r-* | m32rle-* \ | m68000-* | m680[012346]0-* | m68360-* | m683?2-* | m68k-* \ | m88110-* | m88k-* | maxq-* | mcore-* | metag-* | microblaze-* \ | mips-* | mipsbe-* | mipseb-* | mipsel-* | mipsle-* \ | mips16-* \ | mips64-* | mips64el-* \ | mips64octeon-* | mips64octeonel-* \ | mips64orion-* | mips64orionel-* \ | mips64r5900-* | mips64r5900el-* \ | mips64vr-* | mips64vrel-* \ | mips64vr4100-* | mips64vr4100el-* \ | mips64vr4300-* | mips64vr4300el-* \ | mips64vr5000-* | mips64vr5000el-* \ | mips64vr5900-* | mips64vr5900el-* \ | mipsisa32-* | mipsisa32el-* \ | mipsisa32r2-* | mipsisa32r2el-* \ | mipsisa64-* | mipsisa64el-* \ | mipsisa64r2-* | mipsisa64r2el-* \ | mipsisa64sb1-* | mipsisa64sb1el-* \ | mipsisa64sr71k-* | mipsisa64sr71kel-* \ | mipstx39-* | mipstx39el-* \ | mmix-* \ | mt-* \ | msp430-* \ | nds32-* | nds32le-* | nds32be-* \ | nios-* | nios2-* \ | none-* | np1-* | ns16k-* | ns32k-* \ | open8-* \ | orion-* \ | pdp10-* | pdp11-* | pj-* | pjl-* | pn-* | power-* \ | powerpc-* | powerpc64-* | powerpc64le-* | powerpcle-* \ | pyramid-* \ | rl78-* | romp-* | rs6000-* | rx-* \ | sh-* | sh[1234]-* | sh[24]a-* | sh[24]aeb-* | sh[23]e-* | sh[34]eb-* | sheb-* | shbe-* \ | shle-* | sh[1234]le-* | sh3ele-* | sh64-* | sh64le-* \ | sparc-* | sparc64-* | sparc64b-* | sparc64v-* | sparc86x-* | sparclet-* \ | sparclite-* \ | sparcv8-* | sparcv9-* | sparcv9b-* | sparcv9v-* | sv1-* | sx?-* \ | tahoe-* \ | tic30-* | tic4x-* | tic54x-* | tic55x-* | tic6x-* | tic80-* \ | tile*-* \ | tron-* \ | ubicom32-* \ | v850-* | v850e-* | v850e1-* | v850es-* | v850e2-* | v850e2v3-* \ | vax-* \ | we32k-* \ | x86-* | x86_64-* | xc16x-* | xps100-* \ | xstormy16-* | xtensa*-* \ | ymp-* \ | z8k-* | z80-*) ;; # Recognize the basic CPU types without company name, with glob match. xtensa*) basic_machine=$basic_machine-unknown ;; # Recognize the various machine names and aliases which stand # for a CPU type and a company and sometimes even an OS. 386bsd) basic_machine=i386-unknown os=-bsd ;; 3b1 | 7300 | 7300-att | att-7300 | pc7300 | safari | unixpc) basic_machine=m68000-att ;; 3b*) basic_machine=we32k-att ;; a29khif) basic_machine=a29k-amd os=-udi ;; abacus) basic_machine=abacus-unknown ;; adobe68k) basic_machine=m68010-adobe os=-scout ;; alliant | fx80) basic_machine=fx80-alliant ;; altos | altos3068) basic_machine=m68k-altos ;; am29k) basic_machine=a29k-none os=-bsd ;; amd64) basic_machine=x86_64-pc ;; amd64-*) basic_machine=x86_64-`echo $basic_machine | sed 's/^[^-]*-//'` ;; amdahl) basic_machine=580-amdahl os=-sysv ;; amiga | amiga-*) basic_machine=m68k-unknown ;; amigaos | amigados) basic_machine=m68k-unknown os=-amigaos ;; amigaunix | amix) basic_machine=m68k-unknown os=-sysv4 ;; apollo68) basic_machine=m68k-apollo os=-sysv ;; apollo68bsd) basic_machine=m68k-apollo os=-bsd ;; aros) basic_machine=i386-pc os=-aros ;; aux) basic_machine=m68k-apple os=-aux ;; balance) basic_machine=ns32k-sequent os=-dynix ;; blackfin) basic_machine=bfin-unknown os=-linux ;; blackfin-*) basic_machine=bfin-`echo $basic_machine | sed 's/^[^-]*-//'` os=-linux ;; bluegene*) basic_machine=powerpc-ibm os=-cnk ;; c54x-*) basic_machine=tic54x-`echo $basic_machine | sed 's/^[^-]*-//'` ;; c55x-*) basic_machine=tic55x-`echo $basic_machine | sed 's/^[^-]*-//'` ;; c6x-*) basic_machine=tic6x-`echo $basic_machine | sed 's/^[^-]*-//'` ;; c90) basic_machine=c90-cray os=-unicos ;; cegcc) basic_machine=arm-unknown os=-cegcc ;; convex-c1) basic_machine=c1-convex os=-bsd ;; convex-c2) basic_machine=c2-convex os=-bsd ;; convex-c32) basic_machine=c32-convex os=-bsd ;; convex-c34) basic_machine=c34-convex os=-bsd ;; convex-c38) basic_machine=c38-convex os=-bsd ;; cray | j90) basic_machine=j90-cray os=-unicos ;; craynv) basic_machine=craynv-cray os=-unicosmp ;; cr16 | cr16-*) basic_machine=cr16-unknown os=-elf ;; crds | unos) basic_machine=m68k-crds ;; crisv32 | crisv32-* | etraxfs*) basic_machine=crisv32-axis ;; cris | cris-* | etrax*) basic_machine=cris-axis ;; crx) basic_machine=crx-unknown os=-elf ;; da30 | da30-*) basic_machine=m68k-da30 ;; decstation | decstation-3100 | pmax | pmax-* | pmin | dec3100 | decstatn) basic_machine=mips-dec ;; decsystem10* | dec10*) basic_machine=pdp10-dec os=-tops10 ;; decsystem20* | dec20*) basic_machine=pdp10-dec os=-tops20 ;; delta | 3300 | motorola-3300 | motorola-delta \ | 3300-motorola | delta-motorola) basic_machine=m68k-motorola ;; delta88) basic_machine=m88k-motorola os=-sysv3 ;; dicos) basic_machine=i686-pc os=-dicos ;; djgpp) basic_machine=i586-pc os=-msdosdjgpp ;; dpx20 | dpx20-*) basic_machine=rs6000-bull os=-bosx ;; dpx2* | dpx2*-bull) basic_machine=m68k-bull os=-sysv3 ;; ebmon29k) basic_machine=a29k-amd os=-ebmon ;; elxsi) basic_machine=elxsi-elxsi os=-bsd ;; encore | umax | mmax) basic_machine=ns32k-encore ;; es1800 | OSE68k | ose68k | ose | OSE) basic_machine=m68k-ericsson os=-ose ;; fx2800) basic_machine=i860-alliant ;; genix) basic_machine=ns32k-ns ;; gmicro) basic_machine=tron-gmicro os=-sysv ;; go32) basic_machine=i386-pc os=-go32 ;; h3050r* | hiux*) basic_machine=hppa1.1-hitachi os=-hiuxwe2 ;; h8300hms) basic_machine=h8300-hitachi os=-hms ;; h8300xray) basic_machine=h8300-hitachi os=-xray ;; h8500hms) basic_machine=h8500-hitachi os=-hms ;; harris) basic_machine=m88k-harris os=-sysv3 ;; hp300-*) basic_machine=m68k-hp ;; hp300bsd) basic_machine=m68k-hp os=-bsd ;; hp300hpux) basic_machine=m68k-hp os=-hpux ;; hp3k9[0-9][0-9] | hp9[0-9][0-9]) basic_machine=hppa1.0-hp ;; hp9k2[0-9][0-9] | hp9k31[0-9]) basic_machine=m68000-hp ;; hp9k3[2-9][0-9]) basic_machine=m68k-hp ;; hp9k6[0-9][0-9] | hp6[0-9][0-9]) basic_machine=hppa1.0-hp ;; hp9k7[0-79][0-9] | hp7[0-79][0-9]) basic_machine=hppa1.1-hp ;; hp9k78[0-9] | hp78[0-9]) # FIXME: really hppa2.0-hp basic_machine=hppa1.1-hp ;; hp9k8[67]1 | hp8[67]1 | hp9k80[24] | hp80[24] | hp9k8[78]9 | hp8[78]9 | hp9k893 | hp893) # FIXME: really hppa2.0-hp basic_machine=hppa1.1-hp ;; hp9k8[0-9][13679] | hp8[0-9][13679]) basic_machine=hppa1.1-hp ;; hp9k8[0-9][0-9] | hp8[0-9][0-9]) basic_machine=hppa1.0-hp ;; hppa-next) os=-nextstep3 ;; hppaosf) basic_machine=hppa1.1-hp os=-osf ;; hppro) basic_machine=hppa1.1-hp os=-proelf ;; i370-ibm* | ibm*) basic_machine=i370-ibm ;; i*86v32) basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` os=-sysv32 ;; i*86v4*) basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` os=-sysv4 ;; i*86v) basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` os=-sysv ;; i*86sol2) basic_machine=`echo $1 | sed -e 's/86.*/86-pc/'` os=-solaris2 ;; i386mach) basic_machine=i386-mach os=-mach ;; i386-vsta | vsta) basic_machine=i386-unknown os=-vsta ;; iris | iris4d) basic_machine=mips-sgi case $os in -irix*) ;; *) os=-irix4 ;; esac ;; isi68 | isi) basic_machine=m68k-isi os=-sysv ;; m68knommu) basic_machine=m68k-unknown os=-linux ;; m68knommu-*) basic_machine=m68k-`echo $basic_machine | sed 's/^[^-]*-//'` os=-linux ;; m88k-omron*) basic_machine=m88k-omron ;; magnum | m3230) basic_machine=mips-mips os=-sysv ;; merlin) basic_machine=ns32k-utek os=-sysv ;; microblaze) basic_machine=microblaze-xilinx ;; mingw32) basic_machine=i386-pc os=-mingw32 ;; mingw32ce) basic_machine=arm-unknown os=-mingw32ce ;; miniframe) basic_machine=m68000-convergent ;; *mint | -mint[0-9]* | *MiNT | *MiNT[0-9]*) basic_machine=m68k-atari os=-mint ;; mips3*-*) basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'` ;; mips3*) basic_machine=`echo $basic_machine | sed -e 's/mips3/mips64/'`-unknown ;; monitor) basic_machine=m68k-rom68k os=-coff ;; morphos) basic_machine=powerpc-unknown os=-morphos ;; msdos) basic_machine=i386-pc os=-msdos ;; ms1-*) basic_machine=`echo $basic_machine | sed -e 's/ms1-/mt-/'` ;; msys) basic_machine=i386-pc os=-msys ;; mvs) basic_machine=i370-ibm os=-mvs ;; nacl) basic_machine=le32-unknown os=-nacl ;; ncr3000) basic_machine=i486-ncr os=-sysv4 ;; netbsd386) basic_machine=i386-unknown os=-netbsd ;; netwinder) basic_machine=armv4l-rebel os=-linux ;; news | news700 | news800 | news900) basic_machine=m68k-sony os=-newsos ;; news1000) basic_machine=m68030-sony os=-newsos ;; news-3600 | risc-news) basic_machine=mips-sony os=-newsos ;; necv70) basic_machine=v70-nec os=-sysv ;; next | m*-next ) basic_machine=m68k-next case $os in -nextstep* ) ;; -ns2*) os=-nextstep2 ;; *) os=-nextstep3 ;; esac ;; nh3000) basic_machine=m68k-harris os=-cxux ;; nh[45]000) basic_machine=m88k-harris os=-cxux ;; nindy960) basic_machine=i960-intel os=-nindy ;; mon960) basic_machine=i960-intel os=-mon960 ;; nonstopux) basic_machine=mips-compaq os=-nonstopux ;; np1) basic_machine=np1-gould ;; neo-tandem) basic_machine=neo-tandem ;; nse-tandem) basic_machine=nse-tandem ;; nsr-tandem) basic_machine=nsr-tandem ;; op50n-* | op60c-*) basic_machine=hppa1.1-oki os=-proelf ;; openrisc | openrisc-*) basic_machine=or32-unknown ;; os400) basic_machine=powerpc-ibm os=-os400 ;; OSE68000 | ose68000) basic_machine=m68000-ericsson os=-ose ;; os68k) basic_machine=m68k-none os=-os68k ;; pa-hitachi) basic_machine=hppa1.1-hitachi os=-hiuxwe2 ;; paragon) basic_machine=i860-intel os=-osf ;; parisc) basic_machine=hppa-unknown os=-linux ;; parisc-*) basic_machine=hppa-`echo $basic_machine | sed 's/^[^-]*-//'` os=-linux ;; pbd) basic_machine=sparc-tti ;; pbb) basic_machine=m68k-tti ;; pc532 | pc532-*) basic_machine=ns32k-pc532 ;; pc98) basic_machine=i386-pc ;; pc98-*) basic_machine=i386-`echo $basic_machine | sed 's/^[^-]*-//'` ;; pentium | p5 | k5 | k6 | nexgen | viac3) basic_machine=i586-pc ;; pentiumpro | p6 | 6x86 | athlon | athlon_*) basic_machine=i686-pc ;; pentiumii | pentium2 | pentiumiii | pentium3) basic_machine=i686-pc ;; pentium4) basic_machine=i786-pc ;; pentium-* | p5-* | k5-* | k6-* | nexgen-* | viac3-*) basic_machine=i586-`echo $basic_machine | sed 's/^[^-]*-//'` ;; pentiumpro-* | p6-* | 6x86-* | athlon-*) basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'` ;; pentiumii-* | pentium2-* | pentiumiii-* | pentium3-*) basic_machine=i686-`echo $basic_machine | sed 's/^[^-]*-//'` ;; pentium4-*) basic_machine=i786-`echo $basic_machine | sed 's/^[^-]*-//'` ;; pn) basic_machine=pn-gould ;; power) basic_machine=power-ibm ;; ppc | ppcbe) basic_machine=powerpc-unknown ;; ppc-* | ppcbe-*) basic_machine=powerpc-`echo $basic_machine | sed 's/^[^-]*-//'` ;; ppcle | powerpclittle | ppc-le | powerpc-little) basic_machine=powerpcle-unknown ;; ppcle-* | powerpclittle-*) basic_machine=powerpcle-`echo $basic_machine | sed 's/^[^-]*-//'` ;; ppc64) basic_machine=powerpc64-unknown ;; ppc64-*) basic_machine=powerpc64-`echo $basic_machine | sed 's/^[^-]*-//'` ;; ppc64le | powerpc64little | ppc64-le | powerpc64-little) basic_machine=powerpc64le-unknown ;; ppc64le-* | powerpc64little-*) basic_machine=powerpc64le-`echo $basic_machine | sed 's/^[^-]*-//'` ;; ps2) basic_machine=i386-ibm ;; pw32) basic_machine=i586-unknown os=-pw32 ;; rdos) basic_machine=i386-pc os=-rdos ;; rom68k) basic_machine=m68k-rom68k os=-coff ;; rm[46]00) basic_machine=mips-siemens ;; rtpc | rtpc-*) basic_machine=romp-ibm ;; s390 | s390-*) basic_machine=s390-ibm ;; s390x | s390x-*) basic_machine=s390x-ibm ;; sa29200) basic_machine=a29k-amd os=-udi ;; sb1) basic_machine=mipsisa64sb1-unknown ;; sb1el) basic_machine=mipsisa64sb1el-unknown ;; sde) basic_machine=mipsisa32-sde os=-elf ;; sei) basic_machine=mips-sei os=-seiux ;; sequent) basic_machine=i386-sequent ;; sh) basic_machine=sh-hitachi os=-hms ;; sh5el) basic_machine=sh5le-unknown ;; sh64) basic_machine=sh64-unknown ;; sparclite-wrs | simso-wrs) basic_machine=sparclite-wrs os=-vxworks ;; sps7) basic_machine=m68k-bull os=-sysv2 ;; spur) basic_machine=spur-unknown ;; st2000) basic_machine=m68k-tandem ;; stratus) basic_machine=i860-stratus os=-sysv4 ;; strongarm-* | thumb-*) basic_machine=arm-`echo $basic_machine | sed 's/^[^-]*-//'` ;; sun2) basic_machine=m68000-sun ;; sun2os3) basic_machine=m68000-sun os=-sunos3 ;; sun2os4) basic_machine=m68000-sun os=-sunos4 ;; sun3os3) basic_machine=m68k-sun os=-sunos3 ;; sun3os4) basic_machine=m68k-sun os=-sunos4 ;; sun4os3) basic_machine=sparc-sun os=-sunos3 ;; sun4os4) basic_machine=sparc-sun os=-sunos4 ;; sun4sol2) basic_machine=sparc-sun os=-solaris2 ;; sun3 | sun3-*) basic_machine=m68k-sun ;; sun4) basic_machine=sparc-sun ;; sun386 | sun386i | roadrunner) basic_machine=i386-sun ;; sv1) basic_machine=sv1-cray os=-unicos ;; symmetry) basic_machine=i386-sequent os=-dynix ;; t3e) basic_machine=alphaev5-cray os=-unicos ;; t90) basic_machine=t90-cray os=-unicos ;; tile*) basic_machine=$basic_machine-unknown os=-linux-gnu ;; tx39) basic_machine=mipstx39-unknown ;; tx39el) basic_machine=mipstx39el-unknown ;; toad1) basic_machine=pdp10-xkl os=-tops20 ;; tower | tower-32) basic_machine=m68k-ncr ;; tpf) basic_machine=s390x-ibm os=-tpf ;; udi29k) basic_machine=a29k-amd os=-udi ;; ultra3) basic_machine=a29k-nyu os=-sym1 ;; v810 | necv810) basic_machine=v810-nec os=-none ;; vaxv) basic_machine=vax-dec os=-sysv ;; vms) basic_machine=vax-dec os=-vms ;; vpp*|vx|vx-*) basic_machine=f301-fujitsu ;; vxworks960) basic_machine=i960-wrs os=-vxworks ;; vxworks68) basic_machine=m68k-wrs os=-vxworks ;; vxworks29k) basic_machine=a29k-wrs os=-vxworks ;; w65*) basic_machine=w65-wdc os=-none ;; w89k-*) basic_machine=hppa1.1-winbond os=-proelf ;; xbox) basic_machine=i686-pc os=-mingw32 ;; xps | xps100) basic_machine=xps100-honeywell ;; xscale-* | xscalee[bl]-*) basic_machine=`echo $basic_machine | sed 's/^xscale/arm/'` ;; ymp) basic_machine=ymp-cray os=-unicos ;; z8k-*-coff) basic_machine=z8k-unknown os=-sim ;; z80-*-coff) basic_machine=z80-unknown os=-sim ;; none) basic_machine=none-none os=-none ;; # Here we handle the default manufacturer of certain CPU types. It is in # some cases the only manufacturer, in others, it is the most popular. w89k) basic_machine=hppa1.1-winbond ;; op50n) basic_machine=hppa1.1-oki ;; op60c) basic_machine=hppa1.1-oki ;; romp) basic_machine=romp-ibm ;; mmix) basic_machine=mmix-knuth ;; rs6000) basic_machine=rs6000-ibm ;; vax) basic_machine=vax-dec ;; pdp10) # there are many clones, so DEC is not a safe bet basic_machine=pdp10-unknown ;; pdp11) basic_machine=pdp11-dec ;; we32k) basic_machine=we32k-att ;; sh[1234] | sh[24]a | sh[24]aeb | sh[34]eb | sh[1234]le | sh[23]ele) basic_machine=sh-unknown ;; sparc | sparcv8 | sparcv9 | sparcv9b | sparcv9v) basic_machine=sparc-sun ;; cydra) basic_machine=cydra-cydrome ;; orion) basic_machine=orion-highlevel ;; orion105) basic_machine=clipper-highlevel ;; mac | mpw | mac-mpw) basic_machine=m68k-apple ;; pmac | pmac-mpw) basic_machine=powerpc-apple ;; *-unknown) # Make sure to match an already-canonicalized machine name. ;; *) echo Invalid configuration \`$1\': machine \`$basic_machine\' not recognized 1>&2 exit 1 ;; esac # Here we canonicalize certain aliases for manufacturers. case $basic_machine in *-digital*) basic_machine=`echo $basic_machine | sed 's/digital.*/dec/'` ;; *-commodore*) basic_machine=`echo $basic_machine | sed 's/commodore.*/cbm/'` ;; *) ;; esac # Decode manufacturer-specific aliases for certain operating systems. if [ x"$os" != x"" ] then case $os in # First match some system type aliases # that might get confused with valid system types. # -solaris* is a basic system type, with this one exception. -auroraux) os=-auroraux ;; -solaris1 | -solaris1.*) os=`echo $os | sed -e 's|solaris1|sunos4|'` ;; -solaris) os=-solaris2 ;; -svr4*) os=-sysv4 ;; -unixware*) os=-sysv4.2uw ;; -gnu/linux*) os=`echo $os | sed -e 's|gnu/linux|linux-gnu|'` ;; # First accept the basic system types. # The portable systems comes first. # Each alternative MUST END IN A *, to match a version number. # -sysv* is not here because it comes later, after sysvr4. -gnu* | -bsd* | -mach* | -minix* | -genix* | -ultrix* | -irix* \ | -*vms* | -sco* | -esix* | -isc* | -aix* | -cnk* | -sunos | -sunos[34]*\ | -hpux* | -unos* | -osf* | -luna* | -dgux* | -auroraux* | -solaris* \ | -sym* | -kopensolaris* \ | -amigaos* | -amigados* | -msdos* | -newsos* | -unicos* | -aof* \ | -aos* | -aros* \ | -nindy* | -vxsim* | -vxworks* | -ebmon* | -hms* | -mvs* \ | -clix* | -riscos* | -uniplus* | -iris* | -rtu* | -xenix* \ | -hiux* | -386bsd* | -knetbsd* | -mirbsd* | -netbsd* \ | -openbsd* | -solidbsd* \ | -ekkobsd* | -kfreebsd* | -freebsd* | -riscix* | -lynxos* \ | -bosx* | -nextstep* | -cxux* | -aout* | -elf* | -oabi* \ | -ptx* | -coff* | -ecoff* | -winnt* | -domain* | -vsta* \ | -udi* | -eabi* | -lites* | -ieee* | -go32* | -aux* \ | -chorusos* | -chorusrdb* | -cegcc* \ | -cygwin* | -msys* | -pe* | -psos* | -moss* | -proelf* | -rtems* \ | -mingw32* | -linux-gnu* | -linux-android* \ | -linux-newlib* | -linux-uclibc* \ | -uxpv* | -beos* | -mpeix* | -udk* \ | -interix* | -uwin* | -mks* | -rhapsody* | -darwin* | -opened* \ | -openstep* | -oskit* | -conix* | -pw32* | -nonstopux* \ | -storm-chaos* | -tops10* | -tenex* | -tops20* | -its* \ | -os2* | -vos* | -palmos* | -uclinux* | -nucleus* \ | -morphos* | -superux* | -rtmk* | -rtmk-nova* | -windiss* \ | -powermax* | -dnix* | -nx6 | -nx7 | -sei* | -dragonfly* \ | -skyos* | -haiku* | -rdos* | -toppers* | -drops* | -es*) # Remember, each alternative MUST END IN *, to match a version number. ;; -qnx*) case $basic_machine in x86-* | i*86-*) ;; *) os=-nto$os ;; esac ;; -nto-qnx*) ;; -nto*) os=`echo $os | sed -e 's|nto|nto-qnx|'` ;; -sim | -es1800* | -hms* | -xray | -os68k* | -none* | -v88r* \ | -windows* | -osx | -abug | -netware* | -os9* | -beos* | -haiku* \ | -macos* | -mpw* | -magic* | -mmixware* | -mon960* | -lnews*) ;; -mac*) os=`echo $os | sed -e 's|mac|macos|'` ;; -linux-dietlibc) os=-linux-dietlibc ;; -linux*) os=`echo $os | sed -e 's|linux|linux-gnu|'` ;; -sunos5*) os=`echo $os | sed -e 's|sunos5|solaris2|'` ;; -sunos6*) os=`echo $os | sed -e 's|sunos6|solaris3|'` ;; -opened*) os=-openedition ;; -os400*) os=-os400 ;; -wince*) os=-wince ;; -osfrose*) os=-osfrose ;; -osf*) os=-osf ;; -utek*) os=-bsd ;; -dynix*) os=-bsd ;; -acis*) os=-aos ;; -atheos*) os=-atheos ;; -syllable*) os=-syllable ;; -386bsd) os=-bsd ;; -ctix* | -uts*) os=-sysv ;; -nova*) os=-rtmk-nova ;; -ns2 ) os=-nextstep2 ;; -nsk*) os=-nsk ;; # Preserve the version number of sinix5. -sinix5.*) os=`echo $os | sed -e 's|sinix|sysv|'` ;; -sinix*) os=-sysv4 ;; -tpf*) os=-tpf ;; -triton*) os=-sysv3 ;; -oss*) os=-sysv3 ;; -svr4) os=-sysv4 ;; -svr3) os=-sysv3 ;; -sysvr4) os=-sysv4 ;; # This must come after -sysvr4. -sysv*) ;; -ose*) os=-ose ;; -es1800*) os=-ose ;; -xenix) os=-xenix ;; -*mint | -mint[0-9]* | -*MiNT | -MiNT[0-9]*) os=-mint ;; -aros*) os=-aros ;; -kaos*) os=-kaos ;; -zvmoe) os=-zvmoe ;; -dicos*) os=-dicos ;; -nacl*) ;; -none) ;; *) # Get rid of the `-' at the beginning of $os. os=`echo $os | sed 's/[^-]*-//'` echo Invalid configuration \`$1\': system \`$os\' not recognized 1>&2 exit 1 ;; esac else # Here we handle the default operating systems that come with various machines. # The value should be what the vendor currently ships out the door with their # machine or put another way, the most popular os provided with the machine. # Note that if you're going to try to match "-MANUFACTURER" here (say, # "-sun"), then you have to tell the case statement up towards the top # that MANUFACTURER isn't an operating system. Otherwise, code above # will signal an error saying that MANUFACTURER isn't an operating # system, and we'll never get to this point. case $basic_machine in score-*) os=-elf ;; spu-*) os=-elf ;; *-acorn) os=-riscix1.2 ;; arm*-rebel) os=-linux ;; arm*-semi) os=-aout ;; c4x-* | tic4x-*) os=-coff ;; tic54x-*) os=-coff ;; tic55x-*) os=-coff ;; tic6x-*) os=-coff ;; # This must come before the *-dec entry. pdp10-*) os=-tops20 ;; pdp11-*) os=-none ;; *-dec | vax-*) os=-ultrix4.2 ;; m68*-apollo) os=-domain ;; i386-sun) os=-sunos4.0.2 ;; m68000-sun) os=-sunos3 ;; m68*-cisco) os=-aout ;; mep-*) os=-elf ;; mips*-cisco) os=-elf ;; mips*-*) os=-elf ;; or32-*) os=-coff ;; *-tti) # must be before sparc entry or we get the wrong os. os=-sysv3 ;; sparc-* | *-sun) os=-sunos4.1.1 ;; *-be) os=-beos ;; *-haiku) os=-haiku ;; *-ibm) os=-aix ;; *-knuth) os=-mmixware ;; *-wec) os=-proelf ;; *-winbond) os=-proelf ;; *-oki) os=-proelf ;; *-hp) os=-hpux ;; *-hitachi) os=-hiux ;; i860-* | *-att | *-ncr | *-altos | *-motorola | *-convergent) os=-sysv ;; *-cbm) os=-amigaos ;; *-dg) os=-dgux ;; *-dolphin) os=-sysv3 ;; m68k-ccur) os=-rtu ;; m88k-omron*) os=-luna ;; *-next ) os=-nextstep ;; *-sequent) os=-ptx ;; *-crds) os=-unos ;; *-ns) os=-genix ;; i370-*) os=-mvs ;; *-next) os=-nextstep3 ;; *-gould) os=-sysv ;; *-highlevel) os=-bsd ;; *-encore) os=-bsd ;; *-sgi) os=-irix ;; *-siemens) os=-sysv4 ;; *-masscomp) os=-rtu ;; f30[01]-fujitsu | f700-fujitsu) os=-uxpv ;; *-rom68k) os=-coff ;; *-*bug) os=-coff ;; *-apple) os=-macos ;; *-atari*) os=-mint ;; *) os=-none ;; esac fi # Here we handle the case where we know the os, and the CPU type, but not the # manufacturer. We pick the logical manufacturer. vendor=unknown case $basic_machine in *-unknown) case $os in -riscix*) vendor=acorn ;; -sunos*) vendor=sun ;; -cnk*|-aix*) vendor=ibm ;; -beos*) vendor=be ;; -hpux*) vendor=hp ;; -mpeix*) vendor=hp ;; -hiux*) vendor=hitachi ;; -unos*) vendor=crds ;; -dgux*) vendor=dg ;; -luna*) vendor=omron ;; -genix*) vendor=ns ;; -mvs* | -opened*) vendor=ibm ;; -os400*) vendor=ibm ;; -ptx*) vendor=sequent ;; -tpf*) vendor=ibm ;; -vxsim* | -vxworks* | -windiss*) vendor=wrs ;; -aux*) vendor=apple ;; -hms*) vendor=hitachi ;; -mpw* | -macos*) vendor=apple ;; -*mint | -mint[0-9]* | -*MiNT | -MiNT[0-9]*) vendor=atari ;; -vos*) vendor=stratus ;; esac basic_machine=`echo $basic_machine | sed "s/unknown/$vendor/"` ;; esac echo $basic_machine$os exit # Local variables: # eval: (add-hook 'write-file-hooks 'time-stamp) # time-stamp-start: "timestamp='" # time-stamp-format: "%:y-%02m-%02d" # time-stamp-end: "'" # End: ./asymptote-2.41/bezierpatch.cc0000644000175000017500000004665713064427076016374 0ustar norbertnorbert/***** * drawbezierpatch.cc * Authors: John C. Bowman and Jesse Frohlich * * Render Bezier patches and triangles. *****/ #include "bezierpatch.h" namespace camp { size_t tstride; GLfloat *B; #ifdef HAVE_GL std::vector BezierPatch::buffer; std::vector BezierPatch::Buffer; std::vector BezierPatch::indices; std::vector BezierPatch::Indices; std::vector BezierPatch::tbuffer; std::vector BezierPatch::tindices; std::vector BezierPatch::tBuffer; std::vector BezierPatch::tIndices; GLuint BezierPatch::nvertices=0; GLuint BezierPatch::ntvertices=0; GLuint BezierPatch::Nvertices=0; GLuint BezierPatch::Ntvertices=0; extern const double Fuzz2; const double FillFactor=0.1; const double BezierFactor=0.4; // Partially work around OpenGL transparency bug by sorting transparent // triangles by their centroid depth. int compare(const void *a, const void *b) { size_t a0=tstride*((GLuint *) a)[0]; size_t a1=tstride*((GLuint *) a)[1]; size_t a2=tstride*((GLuint *) a)[2]; size_t b0=tstride*((GLuint *) b)[0]; size_t b1=tstride*((GLuint *) b)[1]; size_t b2=tstride*((GLuint *) b)[2]; double x= T[0]*(B[a0]+B[a1]+B[a2]-B[b0]-B[b1]-B[b2])+ T[1]*(B[a0+1]+B[a1+1]+B[a2+1]-B[b0+1]-B[b1+1]-B[b2+1])+ T[2]*(B[a0+2]+B[a1+2]+B[a2+2]-B[b0+2]-B[b1+2]-B[b2+2]); if(x > 0.0) return 1; if(x < 0.0) return -1; return 0; } void BezierPatch::init(double res, const triple& Min, const triple& Max, bool transparent, GLfloat *colors) { empty=false; res2=res*res; Res2=BezierFactor*BezierFactor*res2; Epsilon=FillFactor*res; this->Min=Min; this->Max=Max; const size_t nbuffer=10000; if(transparent) { tbuffer.reserve(nbuffer); tindices.reserve(nbuffer); pindices=&tindices; pvertex=&tvertex; if(colors) { tBuffer.reserve(nbuffer); tIndices.reserve(nbuffer); pindices=&tIndices; pVertex=&tVertex; } } else { buffer.reserve(nbuffer); indices.reserve(nbuffer); pindices=&indices; pvertex=&vertex; if(colors) { Buffer.reserve(nbuffer); Indices.reserve(nbuffer); pindices=&Indices; pVertex=&Vertex; } } } // Use a uniform partition to draw a Bezier patch. // p is an array of 16 triples representing the control points. // Pi are the (possibly) adjusted vertices indexed by Ii. // The 'flati' are flatness flags for each boundary. void BezierPatch::render(const triple *p, GLuint I0, GLuint I1, GLuint I2, GLuint I3, triple P0, triple P1, triple P2, triple P3, bool flat0, bool flat1, bool flat2, bool flat3, GLfloat *C0, GLfloat *C1, GLfloat *C2, GLfloat *C3) { if(Distance(p) < res2) { // Patch is flat triple P[]={P0,P1,P2,P3}; if(!offscreen(4,P)) { std::vector &p=*pindices; p.push_back(I0); p.push_back(I1); p.push_back(I2); p.push_back(I0); p.push_back(I2); p.push_back(I3); } } else { // Patch is not flat if(offscreen(16,p)) return; /* Control points are indexed as follows: Coordinate +----- Index 03 13 23 33 +-----+-----+-----+ |3 |7 |11 |15 | | | | |02 |12 |22 |32 +-----+-----+-----+ |2 |6 |10 |14 | | | | |01 |11 |21 |31 +-----+-----+-----+ |1 |5 |9 |13 | | | | |00 |10 |20 |30 +-----+-----+-----+ 0 4 8 12 Subdivision: P refers to a corner m refers to a midpoint s refers to a subpatch m2 +--------+--------+ |P3 | P2| | | | | s3 | s2 | | | | | |m4 | m3+--------+--------+m1 | | | | | | | s0 | s1 | | | | |P0 | P1| +--------+--------+ m0 */ // Subdivide patch: triple p0=p[0]; triple p3=p[3]; triple p12=p[12]; triple p15=p[15]; Split3 c0(p0,p[1],p[2],p3); Split3 c1(p[4],p[5],p[6],p[7]); Split3 c2(p[8],p[9],p[10],p[11]); Split3 c3(p12,p[13],p[14],p15); Split3 c4(p0,p[4],p[8],p12); Split3 c5(c0.m0,c1.m0,c2.m0,c3.m0); Split3 c6(c0.m3,c1.m3,c2.m3,c3.m3); Split3 c7(c0.m5,c1.m5,c2.m5,c3.m5); Split3 c8(c0.m4,c1.m4,c2.m4,c3.m4); Split3 c9(c0.m2,c1.m2,c2.m2,c3.m2); Split3 c10(p3,p[7],p[11],p15); triple s0[]={p0,c0.m0,c0.m3,c0.m5,c4.m0,c5.m0,c6.m0,c7.m0, c4.m3,c5.m3,c6.m3,c7.m3,c4.m5,c5.m5,c6.m5,c7.m5}; triple s1[]={c4.m5,c5.m5,c6.m5,c7.m5,c4.m4,c5.m4,c6.m4,c7.m4, c4.m2,c5.m2,c6.m2,c7.m2,p12,c3.m0,c3.m3,c3.m5}; triple s2[]={c7.m5,c8.m5,c9.m5,c10.m5,c7.m4,c8.m4,c9.m4,c10.m4, c7.m2,c8.m2,c9.m2,c10.m2,c3.m5,c3.m4,c3.m2,p15}; triple s3[]={c0.m5,c0.m4,c0.m2,p3,c7.m0,c8.m0,c9.m0,c10.m0, c7.m3,c8.m3,c9.m3,c10.m3,c7.m5,c8.m5,c9.m5,c10.m5}; triple m4=s0[15]; triple n0=normal(s0[0],s0[4],s0[8],s0[12],s0[13],s0[14],s0[15]); if(n0 == 0.0) { n0=normal(s0[0],s0[4],s0[8],s0[12],s0[11],s0[7],s0[3]); if(n0 == 0.0) n0=normal(s0[3],s0[2],s0[1],s0[0],s0[13],s0[14],s0[15]); } triple n1=normal(s1[12],s1[13],s1[14],s1[15],s1[11],s1[7],s1[3]); if(n1 == 0.0) { n1=normal(s1[12],s1[13],s1[14],s1[15],s1[2],s1[1],s1[0]); if(n1 == 0.0) n1=normal(s1[0],s1[4],s1[8],s1[12],s1[11],s1[7],s1[3]); } triple n2=normal(s2[15],s2[11],s2[7],s2[3],s2[2],s2[1],s2[0]); if(n2 == 0.0) { n2=normal(s2[15],s2[11],s2[7],s2[3],s2[4],s2[8],s2[12]); if(n2 == 0.0) n2=normal(s2[12],s2[13],s2[14],s2[15],s2[2],s2[1],s2[0]); } triple n3=normal(s3[3],s3[2],s3[1],s3[0],s3[4],s3[8],s3[12]); if(n3 == 0.0) { n3=normal(s3[3],s3[2],s3[1],s3[0],s3[13],s3[14],s3[15]); if(n3 == 0.0) n3=normal(s3[15],s3[11],s3[7],s3[3],s3[4],s3[8],s3[12]); } triple n4=normal(s2[3],s2[2],s2[1],m4,s2[4],s2[8],s2[12]); // A kludge to remove subdivision cracks, only applied the first time // an edge is found to be flat before the rest of the subpatch is. triple m0=0.5*(P0+P1); if(!flat0) { if((flat0=Straightness(p0,p[4],p[8],p12) < res2)) m0 -= Epsilon*unit(derivative(s1[0],s1[1],s1[2],s1[3])); else m0=s0[12]; } triple m1=0.5*(P1+P2); if(!flat1) { if((flat1=Straightness(p12,p[13],p[14],p15) < res2)) m1 -= Epsilon*unit(derivative(s2[12],s2[8],s2[4],s2[0])); else m1=s1[15]; } triple m2=0.5*(P2+P3); if(!flat2) { if((flat2=Straightness(p15,p[11],p[7],p3) < res2)) m2 -= Epsilon*unit(derivative(s3[15],s2[14],s2[13],s1[12])); else m2=s2[3]; } triple m3=0.5*(P3+P0); if(!flat3) { if((flat3=Straightness(p0,p[1],p[2],p3) < res2)) m3 -= Epsilon*unit(derivative(s0[3],s0[7],s0[11],s0[15])); else m3=s3[0]; } if(C0) { GLfloat c0[4],c1[4],c2[4],c3[4],c4[4]; for(size_t i=0; i < 4; ++i) { c0[i]=0.5*(C0[i]+C1[i]); c1[i]=0.5*(C1[i]+C2[i]); c2[i]=0.5*(C2[i]+C3[i]); c3[i]=0.5*(C3[i]+C0[i]); c4[i]=0.5*(c0[i]+c2[i]); } GLuint i0=pVertex(m0,n0,c0); GLuint i1=pVertex(m1,n1,c1); GLuint i2=pVertex(m2,n2,c2); GLuint i3=pVertex(m3,n3,c3); GLuint i4=pVertex(m4,n4,c4); render(s0,I0,i0,i4,i3,P0,m0,m4,m3,flat0,false,false,flat3, C0,c0,c4,c3); render(s1,i0,I1,i1,i4,m0,P1,m1,m4,flat0,flat1,false,false, c0,C1,c1,c4); render(s2,i4,i1,I2,i2,m4,m1,P2,m2,false,flat1,flat2,false, c4,c1,C2,c2); render(s3,i3,i4,i2,I3,m3,m4,m2,P3,false,false,flat2,flat3, c3,c4,c2,C3); } else { GLuint i0=pvertex(m0,n0); GLuint i1=pvertex(m1,n1); GLuint i2=pvertex(m2,n2); GLuint i3=pvertex(m3,n3); GLuint i4=pvertex(m4,n4); render(s0,I0,i0,i4,i3,P0,m0,m4,m3,flat0,false,false,flat3); render(s1,i0,I1,i1,i4,m0,P1,m1,m4,flat0,flat1,false,false); render(s2,i4,i1,I2,i2,m4,m1,P2,m2,false,flat1,flat2,false); render(s3,i3,i4,i2,I3,m3,m4,m2,P3,false,false,flat2,flat3); } } } void BezierPatch::render(const triple *p, bool straight, GLfloat *c0) { triple p0=p[0]; epsilon=0; for(unsigned i=1; i < 16; ++i) epsilon=max(epsilon,abs2(p[i]-p0)); epsilon *= Fuzz2; triple p3=p[3]; triple p12=p[12]; triple p15=p[15]; triple n0=normal(p3,p[2],p[1],p0,p[4],p[8],p12); if(n0 == 0.0) n0=normal(p3,p[2],p[1],p0,p[13],p[14],p15); if(n0 == 0.0) n0=normal(p15,p[11],p[7],p3,p[4],p[8],p12); triple n1=normal(p0,p[4],p[8],p12,p[13],p[14],p15); if(n1 == 0.0) n1=normal(p0,p[4],p[8],p12,p[11],p[7],p3); if(n1 == 0.0) n1=normal(p3,p[2],p[1],p0,p[13],p[14],p15); triple n2=normal(p12,p[13],p[14],p15,p[11],p[7],p3); if(n2 == 0.0) n2=normal(p12,p[13],p[14],p15,p[2],p[1],p0); if(n2 == 0.0) n2=normal(p0,p[4],p[8],p12,p[11],p[7],p3); triple n3=normal(p15,p[11],p[7],p3,p[2],p[1],p0); if(n3 == 0.0) n3=normal(p15,p[11],p[7],p3,p[4],p[8],p12); if(n3 == 0.0) n3=normal(p12,p[13],p[14],p15,p[2],p[1],p0); GLuint I0,I1,I2,I3; if(c0) { GLfloat *c1=c0+4; GLfloat *c2=c0+8; GLfloat *c3=c0+12; I0=pVertex(p0,n0,c0); I1=pVertex(p12,n1,c1); I2=pVertex(p15,n2,c2); I3=pVertex(p3,n3,c3); if(!straight) render(p,I0,I1,I2,I3,p0,p12,p15,p3,false,false,false,false, c0,c1,c2,c3); } else { I0=pvertex(p0,n0); I1=pvertex(p12,n1); I2=pvertex(p15,n2); I3=pvertex(p3,n3); if(!straight) render(p,I0,I1,I2,I3,p0,p12,p15,p3,false,false,false,false); } if(straight) { pindices->push_back(I0); pindices->push_back(I1); pindices->push_back(I2); pindices->push_back(I0); pindices->push_back(I2); pindices->push_back(I3); } } // Use a uniform partition to draw a Bezier triangle. // p is an array of 10 triples representing the control points. // Pi are the (possibly) adjusted vertices indexed by Ii. // The 'flati' are flatness flags for each boundary. void BezierTriangle::render(const triple *p, GLuint I0, GLuint I1, GLuint I2, triple P0, triple P1, triple P2, bool flat0, bool flat1, bool flat2, GLfloat *C0, GLfloat *C1, GLfloat *C2) { if(Distance(p) < Res2) { // Triangle is flat triple P[]={P0,P1,P2}; if(!offscreen(3,P)) { std::vector &p=*pindices; p.push_back(I0); p.push_back(I1); p.push_back(I2); } } else { // Triangle is not flat if(offscreen(10,p)) return; /* Control points are indexed as follows: Coordinate Index 030 9 /\ / \ / \ / \ / \ 021 + + 120 5 / \ 8 / \ / \ / \ / \ 012 + + + 210 2 / 111 \ 7 / 4 \ / \ / \ / \ /__________________________________\ 003 102 201 300 0 1 3 6 Subdivision: P2 030 /\ / \ / \ / \ / \ / up \ / \ / \ p1 /________________\ p0 /\ / \ / \ / \ / \ / \ / \ center / \ / \ / \ / \ / \ / left \ / right \ / \ / \ /________________V_________________\ 003 p2 300 P0 P1 */ // Subdivide triangle: triple l003=p[0]; triple p102=p[1]; triple p012=p[2]; triple p201=p[3]; triple p111=p[4]; triple p021=p[5]; triple r300=p[6]; triple p210=p[7]; triple p120=p[8]; triple u030=p[9]; triple u021=0.5*(u030+p021); triple u120=0.5*(u030+p120); triple p033=0.5*(p021+p012); triple p231=0.5*(p120+p111); triple p330=0.5*(p120+p210); triple p123=0.5*(p012+p111); triple l012=0.5*(p012+l003); triple p312=0.5*(p111+p201); triple r210=0.5*(p210+r300); triple l102=0.5*(l003+p102); triple p303=0.5*(p102+p201); triple r201=0.5*(p201+r300); triple u012=0.5*(u021+p033); triple u210=0.5*(u120+p330); triple l021=0.5*(p033+l012); triple p4xx=0.5*p231+0.25*(p111+p102); triple r120=0.5*(p330+r210); triple px4x=0.5*p123+0.25*(p111+p210); triple pxx4=0.25*(p021+p111)+0.5*p312; triple l201=0.5*(l102+p303); triple r102=0.5*(p303+r201); triple l210=0.5*(px4x+l201); // =c120 triple r012=0.5*(px4x+r102); // =c021 triple l300=0.5*(l201+r102); // =r003=c030 triple r021=0.5*(pxx4+r120); // =c012 triple u201=0.5*(u210+pxx4); // =c102 triple r030=0.5*(u210+r120); // =u300=c003 triple u102=0.5*(u012+p4xx); // =c201 triple l120=0.5*(l021+p4xx); // =c210 triple l030=0.5*(u012+l021); // =u003=c300 triple l111=0.5*(p123+l102); triple r111=0.5*(p312+r210); triple u111=0.5*(u021+p231); triple c111=0.25*(p033+p330+p303+p111); triple l[]={l003,l102,l012,l201,l111,l021,l300,l210,l120,l030}; // left triple r[]={l300,r102,r012,r201,r111,r021,r300,r210,r120,r030}; // right triple u[]={l030,u102,u012,u201,u111,u021,r030,u210,u120,u030}; // up triple c[]={r030,u201,r021,u102,c111,r012,l030,l120,l210,l300}; // center triple n0=normal(l300,r012,r021,r030,u201,u102,l030); triple n1=normal(r030,u201,u102,l030,l120,l210,l300); triple n2=normal(l030,l120,l210,l300,r012,r021,r030); // A kludge to remove subdivision cracks, only applied the first time // an edge is found to be flat before the rest of the subpatch is. triple p0=0.5*(P1+P2); if(!flat0) { if((flat0=Straightness(r300,p210,p120,u030) < res2)) p0 -= Epsilon*unit(derivative(c[0],c[2],c[5],c[9])+ derivative(c[0],c[1],c[3],c[6])); else p0=r030; } triple p1=0.5*(P2+P0); if(!flat1) { if((flat1=Straightness(l003,p012,p021,u030) < res2)) p1 -= Epsilon*unit(derivative(c[6],c[3],c[1],c[0])+ derivative(c[6],c[7],c[8],c[9])); else p1=l030; } triple p2=0.5*(P0+P1); if(!flat2) { if((flat2=Straightness(l003,p102,p201,r300) < res2)) p2 -= Epsilon*unit(derivative(c[9],c[8],c[7],c[6])+ derivative(c[9],c[5],c[2],c[0])); else p2=l300; } if(C0) { GLfloat c0[4],c1[4],c2[4]; for(int i=0; i < 4; ++i) { c0[i]=0.5*(C1[i]+C2[i]); c1[i]=0.5*(C0[i]+C2[i]); c2[i]=0.5*(C0[i]+C1[i]); } GLuint i0=pVertex(p0,n0,c0); GLuint i1=pVertex(p1,n1,c1); GLuint i2=pVertex(p2,n2,c2); render(l,I0,i2,i1,P0,p2,p1,false,flat1,flat2,C0,c2,c1); render(r,i2,I1,i0,p2,P1,p0,flat0,false,flat2,c2,C1,c0); render(u,i1,i0,I2,p1,p0,P2,flat0,flat1,false,c1,c0,C2); render(c,i0,i1,i2,p0,p1,p2,false,false,false,c0,c1,c2); } else { GLuint i0=pvertex(p0,n0); GLuint i1=pvertex(p1,n1); GLuint i2=pvertex(p2,n2); render(l,I0,i2,i1,P0,p2,p1,false,flat1,flat2); render(r,i2,I1,i0,p2,P1,p0,flat0,false,flat2); render(u,i1,i0,I2,p1,p0,P2,flat0,flat1,false); render(c,i0,i1,i2,p0,p1,p2,false,false,false); } } } void BezierTriangle::render(const triple *p, bool straight, GLfloat *c0) { triple p0=p[0]; epsilon=0; for(int i=1; i < 10; ++i) epsilon=max(epsilon,abs2(p[i]-p0)); epsilon *= Fuzz2; GLuint I0,I1,I2; triple p6=p[6]; triple p9=p[9]; triple n0=normal(p9,p[5],p[2],p0,p[1],p[3],p6); triple n1=normal(p0,p[1],p[3],p6,p[7],p[8],p9); triple n2=normal(p6,p[7],p[8],p9,p[5],p[2],p0); if(c0) { GLfloat *c1=c0+4; GLfloat *c2=c0+8; I0=pVertex(p0,n0,c0); I1=pVertex(p6,n1,c1); I2=pVertex(p9,n2,c2); if(!straight) render(p,I0,I1,I2,p0,p6,p9,false,false,false,c0,c1,c2); } else { I0=pvertex(p0,n0); I1=pvertex(p6,n1); I2=pvertex(p9,n2); if(!straight) render(p,I0,I1,I2,p0,p6,p9,false,false,false); } if(straight) { pindices->push_back(I0); pindices->push_back(I1); pindices->push_back(I2); } } void BezierPatch::draw() { if(empty) return; size_t stride=6; size_t Stride=10; size_t size=sizeof(GLfloat); size_t bytestride=stride*size; size_t Bytestride=Stride*size; glEnableClientState(GL_NORMAL_ARRAY); glEnableClientState(GL_VERTEX_ARRAY); if(indices.size()) { glVertexPointer(3,GL_FLOAT,bytestride,&buffer[0]); glNormalPointer(GL_FLOAT,bytestride,&buffer[3]); glDrawElements(GL_TRIANGLES,indices.size(),GL_UNSIGNED_INT,&indices[0]); } if(Indices.size()) { glEnableClientState(GL_COLOR_ARRAY); glEnable(GL_COLOR_MATERIAL); glVertexPointer(3,GL_FLOAT,Bytestride,&Buffer[0]); glNormalPointer(GL_FLOAT,Bytestride,&Buffer[3]); glColorPointer(4,GL_FLOAT,Bytestride,&Buffer[6]); glDrawElements(GL_TRIANGLES,Indices.size(),GL_UNSIGNED_INT,&Indices[0]); glDisable(GL_COLOR_MATERIAL); glDisableClientState(GL_COLOR_ARRAY); } if(tindices.size()) { B=&tbuffer[0]; tstride=stride; qsort(&tindices[0],tindices.size()/3,3*sizeof(GLuint),compare); glVertexPointer(3,GL_FLOAT,bytestride,&tbuffer[0]); glNormalPointer(GL_FLOAT,bytestride,&tbuffer[3]); glDrawElements(GL_TRIANGLES,tindices.size(),GL_UNSIGNED_INT,&tindices[0]); } if(tIndices.size()) { B=&tBuffer[0]; tstride=Stride; qsort(&tIndices[0],tIndices.size()/3,3*sizeof(GLuint),compare); glEnableClientState(GL_COLOR_ARRAY); glEnable(GL_COLOR_MATERIAL); glVertexPointer(3,GL_FLOAT,Bytestride,&tBuffer[0]); glNormalPointer(GL_FLOAT,Bytestride,&tBuffer[3]); glColorPointer(4,GL_FLOAT,Bytestride,&tBuffer[6]); glDrawElements(GL_TRIANGLES,tIndices.size(),GL_UNSIGNED_INT,&tIndices[0]); glDisable(GL_COLOR_MATERIAL); glDisableClientState(GL_COLOR_ARRAY); } glDisableClientState(GL_VERTEX_ARRAY); glDisableClientState(GL_NORMAL_ARRAY); clear(); } #endif } //namespace camp ./asymptote-2.41/getopt.c0000644000175000017500000007270313064427076015222 0ustar norbertnorbert/* Getopt for GNU. NOTE: getopt is now part of the C library, so if you don't know what "Keep this file name-space clean" means, talk to drepper@gnu.org before changing it! Copyright (C) 1987,88,89,90,91,92,93,94,95,96,98,99,2000,2001 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. */ /* This tells Alpha OSF/1 not to define a getopt prototype in . Ditto for AIX 3.2 and . */ #ifndef _NO_PROTO # define _NO_PROTO #endif #ifdef HAVE_CONFIG_H # include #endif #if !defined __STDC__ || !__STDC__ /* This is a separate conditional since some stdc systems reject `defined (const)'. */ # ifndef const # define const # endif #endif #include /* Comment out all this code if we are using the GNU C Library, and are not actually compiling the library itself. This code is part of the GNU C Library, but also included in many other GNU distributions. Compiling and linking in this code is a waste when using the GNU C library (especially if it is a shared library). Rather than having every GNU program understand `configure --with-gnu-libc' and omit the object files, it is simpler to just do this in the source for each such file. */ #define GETOPT_INTERFACE_VERSION 2 #if !defined _LIBC && defined __GLIBC__ && __GLIBC__ >= 2 # include # if _GNU_GETOPT_INTERFACE_VERSION == GETOPT_INTERFACE_VERSION # define ELIDE_CODE # endif #endif #ifndef ELIDE_CODE /* This needs to come after some library #include to get __GNU_LIBRARY__ defined. */ #ifdef __GNU_LIBRARY__ /* Don't include stdlib.h for non-GNU C libraries because some of them contain conflicting prototypes for getopt. */ # include # include #endif /* GNU C library. */ #ifdef VMS # include # if HAVE_STRING_H - 0 # include # endif #endif #ifndef _ /* This is for other GNU distributions with internationalized messages. */ # if defined HAVE_LIBINTL_H || defined _LIBC # include # ifndef _ # define _(msgid) gettext (msgid) # endif # else # define _(msgid) (msgid) # endif #endif /* This version of `getopt' appears to the caller like standard Unix `getopt' but it behaves differently for the user, since it allows the user to intersperse the options with the other arguments. As `getopt' works, it permutes the elements of ARGV so that, when it is done, all the options precede everything else. Thus all application programs are extended to handle flexible argument order. Setting the environment variable POSIXLY_CORRECT disables permutation. Then the behavior is completely standard. GNU application programs can use a third alternative mode in which they can distinguish the relative order of options and other arguments. */ #include "getopt.h" /* For communication from `getopt' to the caller. When `getopt' finds an option that takes an argument, the argument value is returned here. Also, when `ordering' is RETURN_IN_ORDER, each non-option ARGV-element is returned here. */ char *optarg; /* Index in ARGV of the next element to be scanned. This is used for communication to and from the caller and for communication between successive calls to `getopt'. On entry to `getopt', zero means this is the first call; initialize. When `getopt' returns -1, this is the index of the first of the non-option elements that the caller should itself scan. Otherwise, `optind' communicates from one call to the next how much of ARGV has been scanned so far. */ /* 1003.2 says this must be 1 before any call. */ int optind = 1; /* Formerly, initialization of getopt depended on optind==0, which causes problems with re-calling getopt as programs generally don't know that. */ int __getopt_initialized; /* The next char to be scanned in the option-element in which the last option character we returned was found. This allows us to pick up the scan where we left off. If this is zero, or a null string, it means resume the scan by advancing to the next ARGV-element. */ static char *nextchar; /* Callers store zero here to inhibit the error message for unrecognized options. */ int opterr = 1; /* Set to an option character which was unrecognized. This must be initialized on some systems to avoid linking in the system's own getopt implementation. */ int optopt = '?'; /* Describe how to deal with options that follow non-option ARGV-elements. If the caller did not specify anything, the default is REQUIRE_ORDER if the environment variable POSIXLY_CORRECT is defined, PERMUTE otherwise. REQUIRE_ORDER means don't recognize them as options; stop option processing when the first non-option is seen. This is what Unix does. This mode of operation is selected by either setting the environment variable POSIXLY_CORRECT, or using `+' as the first character of the list of option characters. PERMUTE is the default. We permute the contents of ARGV as we scan, so that eventually all the non-options are at the end. This allows options to be given in any order, even with programs that were not written to expect this. RETURN_IN_ORDER is an option available to programs that were written to expect options and other ARGV-elements in any order and that care about the ordering of the two. We describe each non-option ARGV-element as if it were the argument of an option with character code 1. Using `-' as the first character of the list of option characters selects this mode of operation. The special argument `--' forces an end of option-scanning regardless of the value of `ordering'. In the case of RETURN_IN_ORDER, only `--' can cause `getopt' to return -1 with `optind' != ARGC. */ static enum { REQUIRE_ORDER, PERMUTE, RETURN_IN_ORDER } ordering; /* Value of POSIXLY_CORRECT environment variable. */ static char *posixly_correct; #ifdef __GNU_LIBRARY__ /* We want to avoid inclusion of string.h with non-GNU libraries because there are many ways it can cause trouble. On some systems, it contains special magic macros that don't work in GCC. */ # include # define my_index strchr #else # if HAVE_STRING_H # include # else # include # endif /* Avoid depending on library functions or files whose names are inconsistent. */ #ifndef getenv extern char *getenv (); #endif static char * my_index (str, chr) const char *str; int chr; { while (*str) { if (*str == chr) return (char *) str; str++; } return 0; } /* If using GCC, we can safely declare strlen this way. If not using GCC, it is ok not to declare it. */ #ifdef __GNUC__ /* Note that Motorola Delta 68k R3V7 comes with GCC but not stddef.h. That was relevant to code that was here before. */ # if (!defined __STDC__ || !__STDC__) && !defined strlen /* gcc with -traditional declares the built-in strlen to return int, and has done so at least since version 2.4.5. -- rms. */ extern int strlen (const char *); # endif /* not __STDC__ */ #endif /* __GNUC__ */ #endif /* not __GNU_LIBRARY__ */ /* Handle permutation of arguments. */ /* Describe the part of ARGV that contains non-options that have been skipped. `first_nonopt' is the index in ARGV of the first of them; `last_nonopt' is the index after the last of them. */ static int first_nonopt; static int last_nonopt; #ifdef _LIBC /* Stored original parameters. XXX This is no good solution. We should rather copy the args so that we can compare them later. But we must not use malloc(3). */ extern int __libc_argc; extern char **__libc_argv; /* Bash 2.0 gives us an environment variable containing flags indicating ARGV elements that should not be considered arguments. */ # ifdef USE_NONOPTION_FLAGS /* Defined in getopt_init.c */ extern char *__getopt_nonoption_flags; static int nonoption_flags_max_len; static int nonoption_flags_len; # endif # ifdef USE_NONOPTION_FLAGS # define SWAP_FLAGS(ch1, ch2) \ if (nonoption_flags_len > 0) \ { \ char __tmp = __getopt_nonoption_flags[ch1]; \ __getopt_nonoption_flags[ch1] = __getopt_nonoption_flags[ch2]; \ __getopt_nonoption_flags[ch2] = __tmp; \ } # else # define SWAP_FLAGS(ch1, ch2) # endif #else /* !_LIBC */ # define SWAP_FLAGS(ch1, ch2) #endif /* _LIBC */ /* Exchange two adjacent subsequences of ARGV. One subsequence is elements [first_nonopt,last_nonopt) which contains all the non-options that have been skipped so far. The other is elements [last_nonopt,optind), which contains all the options processed since those non-options were skipped. `first_nonopt' and `last_nonopt' are relocated so that they describe the new indices of the non-options in ARGV after they are moved. */ #if defined __STDC__ && __STDC__ static void exchange (char **); #endif static void exchange (argv) char **argv; { int bottom = first_nonopt; int middle = last_nonopt; int top = optind; char *tem; /* Exchange the shorter segment with the far end of the longer segment. That puts the shorter segment into the right place. It leaves the longer segment in the right place overall, but it consists of two parts that need to be swapped next. */ #if defined _LIBC && defined USE_NONOPTION_FLAGS /* First make sure the handling of the `__getopt_nonoption_flags' string can work normally. Our top argument must be in the range of the string. */ if (nonoption_flags_len > 0 && top >= nonoption_flags_max_len) { /* We must extend the array. The user plays games with us and presents new arguments. */ char *new_str = malloc (top + 1); if (new_str == NULL) nonoption_flags_len = nonoption_flags_max_len = 0; else { memset (__mempcpy (new_str, __getopt_nonoption_flags, nonoption_flags_max_len), '\0', top + 1 - nonoption_flags_max_len); nonoption_flags_max_len = top + 1; __getopt_nonoption_flags = new_str; } } #endif while (top > middle && middle > bottom) { if (top - middle > middle - bottom) { /* Bottom segment is the short one. */ int len = middle - bottom; register int i; /* Swap it with the top part of the top segment. */ for (i = 0; i < len; i++) { tem = argv[bottom + i]; argv[bottom + i] = argv[top - (middle - bottom) + i]; argv[top - (middle - bottom) + i] = tem; SWAP_FLAGS (bottom + i, top - (middle - bottom) + i); } /* Exclude the moved bottom segment from further swapping. */ top -= len; } else { /* Top segment is the short one. */ int len = top - middle; register int i; /* Swap it with the bottom part of the bottom segment. */ for (i = 0; i < len; i++) { tem = argv[bottom + i]; argv[bottom + i] = argv[middle + i]; argv[middle + i] = tem; SWAP_FLAGS (bottom + i, middle + i); } /* Exclude the moved top segment from further swapping. */ bottom += len; } } /* Update records for the slots the non-options now occupy. */ first_nonopt += (optind - last_nonopt); last_nonopt = optind; } /* Initialize the internal data when the first call is made. */ #if defined __STDC__ && __STDC__ static const char *_getopt_initialize (int, char *const *, const char *); #endif static const char * _getopt_initialize (argc, argv, optstring) int argc; char *const *argv; const char *optstring; { /* Start processing options with ARGV-element 1 (since ARGV-element 0 is the program name); the sequence of previously skipped non-option ARGV-elements is empty. */ first_nonopt = last_nonopt = optind; nextchar = NULL; posixly_correct = getenv ("POSIXLY_CORRECT"); /* Determine how to handle the ordering of options and nonoptions. */ if (optstring[0] == '-') { ordering = RETURN_IN_ORDER; ++optstring; } else if (optstring[0] == '+') { ordering = REQUIRE_ORDER; ++optstring; } else if (posixly_correct != NULL) ordering = REQUIRE_ORDER; else ordering = PERMUTE; #if defined _LIBC && defined USE_NONOPTION_FLAGS if (posixly_correct == NULL && argc == __libc_argc && argv == __libc_argv) { if (nonoption_flags_max_len == 0) { if (__getopt_nonoption_flags == NULL || __getopt_nonoption_flags[0] == '\0') nonoption_flags_max_len = -1; else { const char *orig_str = __getopt_nonoption_flags; int len = nonoption_flags_max_len = strlen (orig_str); if (nonoption_flags_max_len < argc) nonoption_flags_max_len = argc; __getopt_nonoption_flags = (char *) malloc (nonoption_flags_max_len); if (__getopt_nonoption_flags == NULL) nonoption_flags_max_len = -1; else memset (__mempcpy (__getopt_nonoption_flags, orig_str, len), '\0', nonoption_flags_max_len - len); } } nonoption_flags_len = nonoption_flags_max_len; } else nonoption_flags_len = 0; #endif return optstring; } /* Scan elements of ARGV (whose length is ARGC) for option characters given in OPTSTRING. If an element of ARGV starts with '-', and is not exactly "-" or "--", then it is an option element. The characters of this element (aside from the initial '-') are option characters. If `getopt' is called repeatedly, it returns successively each of the option characters from each of the option elements. If `getopt' finds another option character, it returns that character, updating `optind' and `nextchar' so that the next call to `getopt' can resume the scan with the following option character or ARGV-element. If there are no more option characters, `getopt' returns -1. Then `optind' is the index in ARGV of the first ARGV-element that is not an option. (The ARGV-elements have been permuted so that those that are not options now come last.) OPTSTRING is a string containing the legitimate option characters. If an option character is seen that is not listed in OPTSTRING, return '?' after printing an error message. If you set `opterr' to zero, the error message is suppressed but we still return '?'. If a char in OPTSTRING is followed by a colon, that means it wants an arg, so the following text in the same ARGV-element, or the text of the following ARGV-element, is returned in `optarg'. Two colons mean an option that wants an optional arg; if there is text in the current ARGV-element, it is returned in `optarg', otherwise `optarg' is set to zero. If OPTSTRING starts with `-' or `+', it requests different methods of handling the non-option ARGV-elements. See the comments about RETURN_IN_ORDER and REQUIRE_ORDER, above. Long-named options begin with `--' instead of `-'. Their names may be abbreviated as long as the abbreviation is unique or is an exact match for some defined option. If they have an argument, it follows the option name in the same ARGV-element, separated from the option name by a `=', or else the in next ARGV-element. When `getopt' finds a long-named option, it returns 0 if that option's `flag' field is nonzero, the value of the option's `val' field if the `flag' field is zero. The elements of ARGV aren't really const, because we permute them. But we pretend they're const in the prototype to be compatible with other systems. LONGOPTS is a vector of `struct option' terminated by an element containing a name which is zero. LONGIND returns the index in LONGOPT of the long-named option found. It is only valid when a long-named option has been found by the most recent call. If LONG_ONLY is nonzero, '-' as well as '--' can introduce long-named options. */ int _getopt_internal (argc, argv, optstring, longopts, longind, long_only) int argc; char *const *argv; const char *optstring; const struct option *longopts; int *longind; int long_only; { int print_errors = opterr; if (optstring[0] == ':') print_errors = 0; if (argc < 1) return -1; optarg = NULL; if (optind == 0 || !__getopt_initialized) { if (optind == 0) optind = 1; /* Don't scan ARGV[0], the program name. */ optstring = _getopt_initialize (argc, argv, optstring); __getopt_initialized = 1; } /* Test whether ARGV[optind] points to a non-option argument. Either it does not have option syntax, or there is an environment flag from the shell indicating it is not an option. The later information is only used when the used in the GNU libc. */ #if defined _LIBC && defined USE_NONOPTION_FLAGS # define NONOPTION_P (argv[optind][0] != '-' || argv[optind][1] == '\0' \ || (optind < nonoption_flags_len \ && __getopt_nonoption_flags[optind] == '1')) #else # define NONOPTION_P (argv[optind][0] != '-' || argv[optind][1] == '\0') #endif if (nextchar == NULL || *nextchar == '\0') { /* Advance to the next ARGV-element. */ /* Give FIRST_NONOPT & LAST_NONOPT rational values if OPTIND has been moved back by the user (who may also have changed the arguments). */ if (last_nonopt > optind) last_nonopt = optind; if (first_nonopt > optind) first_nonopt = optind; if (ordering == PERMUTE) { /* If we have just processed some options following some non-options, exchange them so that the options come first. */ if (first_nonopt != last_nonopt && last_nonopt != optind) exchange ((char **) argv); else if (last_nonopt != optind) first_nonopt = optind; /* Skip any additional non-options and extend the range of non-options previously skipped. */ while (optind < argc && NONOPTION_P) optind++; last_nonopt = optind; } /* The special ARGV-element `--' means premature end of options. Skip it like a null option, then exchange with previous non-options as if it were an option, then skip everything else like a non-option. */ if (optind != argc && !strcmp (argv[optind], "--")) { optind++; if (first_nonopt != last_nonopt && last_nonopt != optind) exchange ((char **) argv); else if (first_nonopt == last_nonopt) first_nonopt = optind; last_nonopt = argc; optind = argc; } /* If we have done all the ARGV-elements, stop the scan and back over any non-options that we skipped and permuted. */ if (optind == argc) { /* Set the next-arg-index to point at the non-options that we previously skipped, so the caller will digest them. */ if (first_nonopt != last_nonopt) optind = first_nonopt; return -1; } /* If we have come to a non-option and did not permute it, either stop the scan or describe it to the caller and pass it by. */ if (NONOPTION_P) { if (ordering == REQUIRE_ORDER) return -1; optarg = argv[optind++]; return 1; } /* We have found another option-ARGV-element. Skip the initial punctuation. */ nextchar = (argv[optind] + 1 + (longopts != NULL && argv[optind][1] == '-')); } /* Decode the current option-ARGV-element. */ /* Check whether the ARGV-element is a long option. If long_only and the ARGV-element has the form "-f", where f is a valid short option, don't consider it an abbreviated form of a long option that starts with f. Otherwise there would be no way to give the -f short option. On the other hand, if there's a long option "fubar" and the ARGV-element is "-fu", do consider that an abbreviation of the long option, just like "--fu", and not "-f" with arg "u". This distinction seems to be the most useful approach. */ if (longopts != NULL && (argv[optind][1] == '-' || (long_only && (argv[optind][2] || !my_index (optstring, argv[optind][1]))))) { char *nameend; const struct option *p; const struct option *pfound = NULL; int exact = 0; int ambig = 0; int indfound = -1; int option_index; for (nameend = nextchar; *nameend && *nameend != '='; nameend++) /* Do nothing. */ ; /* Test all long options for either exact match or abbreviated matches. */ for (p = longopts, option_index = 0; p->name; p++, option_index++) if (!strncmp (p->name, nextchar, nameend - nextchar)) { if ((unsigned int) (nameend - nextchar) == (unsigned int) strlen (p->name)) { /* Exact match found. */ pfound = p; indfound = option_index; exact = 1; break; } else if (pfound == NULL) { /* First nonexact match found. */ pfound = p; indfound = option_index; } else if (long_only || pfound->has_arg != p->has_arg || pfound->flag != p->flag || pfound->val != p->val) /* Second or later nonexact match found. */ ambig = 1; } if (ambig && !exact) { if (print_errors) fprintf (stderr, _("%s: option `%s' is ambiguous\n"), argv[0], argv[optind]); nextchar += strlen (nextchar); optind++; optopt = 0; return '?'; } if (pfound != NULL) { option_index = indfound; optind++; if (*nameend) { /* Don't test has_arg with >, because some C compilers don't allow it to be used on enums. */ if (pfound->has_arg) optarg = nameend + 1; else { if (print_errors) { if (argv[optind - 1][1] == '-') /* --option */ fprintf (stderr, _("%s: option `--%s' doesn't allow an argument\n"), argv[0], pfound->name); else /* +option or -option */ fprintf (stderr, _("%s: option `%c%s' doesn't allow an argument\n"), argv[0], argv[optind - 1][0], pfound->name); } nextchar += strlen (nextchar); optopt = pfound->val; return '?'; } } else if (pfound->has_arg == 1) { if (optind < argc) optarg = argv[optind++]; else { if (print_errors) fprintf (stderr, _("%s: option `%s' requires an argument\n"), argv[0], argv[optind - 1]); nextchar += strlen (nextchar); optopt = pfound->val; return optstring[0] == ':' ? ':' : '?'; } } nextchar += strlen (nextchar); if (longind != NULL) *longind = option_index; if (pfound->flag) { *(pfound->flag) = pfound->val; return 0; } return pfound->val; } /* Can't find it as a long option. If this is not getopt_long_only, or the option starts with '--' or is not a valid short option, then it's an error. Otherwise interpret it as a short option. */ if (!long_only || argv[optind][1] == '-' || my_index (optstring, *nextchar) == NULL) { if (print_errors) { if (argv[optind][1] == '-') /* --option */ fprintf (stderr, _("%s: unrecognized option `--%s'\n"), argv[0], nextchar); else /* +option or -option */ fprintf (stderr, _("%s: unrecognized option `%c%s'\n"), argv[0], argv[optind][0], nextchar); } nextchar = (char *) ""; optind++; optopt = 0; return '?'; } } /* Look at and handle the next short option-character. */ { char c = *nextchar++; char *temp = my_index (optstring, c); /* Increment `optind' when we start to process its last character. */ if (*nextchar == '\0') ++optind; if (temp == NULL || c == ':') { if (print_errors) { if (posixly_correct) /* 1003.2 specifies the format of this message. */ fprintf (stderr, _("%s: illegal option -- %c\n"), argv[0], c); else fprintf (stderr, _("%s: invalid option -- %c\n"), argv[0], c); } optopt = c; return '?'; } /* Convenience. Treat POSIX -W foo same as long option --foo */ if (temp[0] == 'W' && temp[1] == ';') { char *nameend; const struct option *p; const struct option *pfound = NULL; int exact = 0; int ambig = 0; int indfound = 0; int option_index; /* This is an option that requires an argument. */ if (*nextchar != '\0') { optarg = nextchar; /* If we end this ARGV-element by taking the rest as an arg, we must advance to the next element now. */ optind++; } else if (optind == argc) { if (print_errors) { /* 1003.2 specifies the format of this message. */ fprintf (stderr, _("%s: option requires an argument -- %c\n"), argv[0], c); } optopt = c; if (optstring[0] == ':') c = ':'; else c = '?'; return c; } else /* We already incremented `optind' once; increment it again when taking next ARGV-elt as argument. */ optarg = argv[optind++]; /* optarg is now the argument, see if it's in the table of longopts. */ for (nextchar = nameend = optarg; *nameend && *nameend != '='; nameend++) /* Do nothing. */ ; /* Test all long options for either exact match or abbreviated matches. */ for (p = longopts, option_index = 0; p->name; p++, option_index++) if (!strncmp (p->name, nextchar, nameend - nextchar)) { if ((unsigned int) (nameend - nextchar) == strlen (p->name)) { /* Exact match found. */ pfound = p; indfound = option_index; exact = 1; break; } else if (pfound == NULL) { /* First nonexact match found. */ pfound = p; indfound = option_index; } else /* Second or later nonexact match found. */ ambig = 1; } if (ambig && !exact) { if (print_errors) fprintf (stderr, _("%s: option `-W %s' is ambiguous\n"), argv[0], argv[optind]); nextchar += strlen (nextchar); optind++; return '?'; } if (pfound != NULL) { option_index = indfound; if (*nameend) { /* Don't test has_arg with >, because some C compilers don't allow it to be used on enums. */ if (pfound->has_arg) optarg = nameend + 1; else { if (print_errors) fprintf (stderr, _("\ %s: option `-W %s' doesn't allow an argument\n"), argv[0], pfound->name); nextchar += strlen (nextchar); return '?'; } } else if (pfound->has_arg == 1) { if (optind < argc) optarg = argv[optind++]; else { if (print_errors) fprintf (stderr, _("%s: option `%s' requires an argument\n"), argv[0], argv[optind - 1]); nextchar += strlen (nextchar); return optstring[0] == ':' ? ':' : '?'; } } nextchar += strlen (nextchar); if (longind != NULL) *longind = option_index; if (pfound->flag) { *(pfound->flag) = pfound->val; return 0; } return pfound->val; } nextchar = NULL; return 'W'; /* Let the application handle it. */ } if (temp[1] == ':') { if (temp[2] == ':') { /* This is an option that accepts an argument optionally. */ if (*nextchar != '\0') { optarg = nextchar; optind++; } else optarg = NULL; nextchar = NULL; } else { /* This is an option that requires an argument. */ if (*nextchar != '\0') { optarg = nextchar; /* If we end this ARGV-element by taking the rest as an arg, we must advance to the next element now. */ optind++; } else if (optind == argc) { if (print_errors) { /* 1003.2 specifies the format of this message. */ fprintf (stderr, _("%s: option requires an argument -- %c\n"), argv[0], c); } optopt = c; if (optstring[0] == ':') c = ':'; else c = '?'; } else /* We already incremented `optind' once; increment it again when taking next ARGV-elt as argument. */ optarg = argv[optind++]; nextchar = NULL; } } return c; } } int getopt (argc, argv, optstring) int argc; char *const *argv; const char *optstring; { return _getopt_internal (argc, argv, optstring, (const struct option *) 0, (int *) 0, 0); } #endif /* Not ELIDE_CODE. */ #ifdef TEST /* Compile with -DTEST to make an executable for use in testing the above definition of `getopt'. */ int main (argc, argv) int argc; char **argv; { int c; int digit_optind = 0; while (1) { int this_option_optind = optind ? optind : 1; c = getopt (argc, argv, "abc:d:0123456789"); if (c == -1) break; switch (c) { case '0': case '1': case '2': case '3': case '4': case '5': case '6': case '7': case '8': case '9': if (digit_optind != 0 && digit_optind != this_option_optind) printf ("digits occur in two different argv-elements.\n"); digit_optind = this_option_optind; printf ("option %c\n", c); break; case 'a': printf ("option a\n"); break; case 'b': printf ("option b\n"); break; case 'c': printf ("option c with value `%s'\n", optarg); break; case '?': break; default: printf ("?? getopt returned character code 0%o ??\n", c); } } if (optind < argc) { printf ("non-option ARGV-elements: "); while (optind < argc) printf ("%s ", argv[optind++]); printf ("\n"); } exit (0); } #endif /* TEST */ ./asymptote-2.41/settings.cc0000644000175000017500000013653613064427076015730 0ustar norbertnorbert/***** * settings.cc * Andy Hammerlindl 2004/05/10 * * Declares a list of global variables that act as settings in the system. *****/ #include #include #include #include #include #include #include #include #include #include "common.h" #if HAVE_GNU_GETOPT_H #include #else #include "getopt.h" #endif #include "util.h" #include "settings.h" #include "interact.h" #include "locate.h" #include "lexical.h" #include "record.h" #include "env.h" #include "item.h" #include "refaccess.h" #include "pipestream.h" #include "array.h" #ifdef HAVE_LIBCURSES extern "C" { #ifdef HAVE_NCURSES_CURSES_H #include #include #elif HAVE_NCURSES_H #include #include #elif HAVE_CURSES_H #include #include #endif } #endif // Workaround broken curses.h files: #ifdef clear #undef clear #endif // Workaround broken header file on i386-solaris with g++ 3.4.3. #ifdef erase #undef erase #endif using vm::item; using trans::itemRefAccess; using trans::refAccess; using trans::varEntry; using vm::array; void runFile(const string& filename); namespace settings { using camp::pair; #ifdef HAVE_GL const bool havegl=true; #else const bool havegl=false; #endif mode_t mask; string systemDir=ASYMPTOTE_SYSDIR; string defaultEPSdriver="eps2write"; #ifndef __MSDOS__ bool msdos=false; string HOME="HOME"; string docdir=ASYMPTOTE_DOCDIR; const char pathSeparator=':'; string defaultPSViewer="gv"; #ifdef __APPLE__ string defaultPDFViewer="open"; #else string defaultPDFViewer="acroread"; #endif string defaultGhostscript="gs"; string defaultGhostscriptLibrary="/usr/lib/libgs.so"; string defaultDisplay="display"; string defaultAnimate="animate"; void queryRegistry() {} const string dirsep="/"; #else bool msdos=true; string HOME="USERPROFILE"; string docdir="c:\\Program Files\\Asymptote"; const char pathSeparator=';'; //string defaultPSViewer="gsview32.exe"; string defaultPSViewer="cmd"; //string defaultPDFViewer="AcroRd32.exe"; string defaultPDFViewer="cmd"; string defaultGhostscript; string defaultGhostscriptLibrary; //string defaultDisplay="imdisplay"; string defaultDisplay="cmd"; //string defaultAnimate="animate"; string defaultAnimate="cmd"; const string dirsep="\\"; #include // Use key to look up an entry in the MSWindows registry, respecting wild cards string getEntry(const string& location, const string& key) { string path="/proc/registry"+location+key; size_t star; string head; while((star=path.find("*")) < string::npos) { string prefix=path.substr(0,star); string suffix=path.substr(star+1); size_t slash=suffix.find("/"); if(slash < string::npos) { path=suffix.substr(slash); suffix=suffix.substr(0,slash); } else { path=suffix; suffix=""; } string directory=head+stripFile(prefix); string file=stripDir(prefix); DIR *dir=opendir(directory.c_str()); if(dir == NULL) return ""; dirent *p; string rsuffix=suffix; reverse(rsuffix.begin(),rsuffix.end()); while((p=readdir(dir)) != NULL) { string dname=p->d_name; string rdname=dname; reverse(rdname.begin(),rdname.end()); if(dname != "." && dname != ".." && dname.substr(0,file.size()) == file && rdname.substr(0,suffix.size()) == rsuffix) { head=directory+p->d_name; break; } } if(p == NULL) return ""; } std::ifstream fin((head+path).c_str()); if(fin) { string s; getline(fin,s); size_t end=s.find('\0'); if(end < string::npos) return s.substr(0,end); } return ""; } // Use key to look up an entry in the MSWindows registry, respecting wild cards string getEntry(const string& key) { string entry=getEntry("64/HKEY_CURRENT_USER/Software/",key); if(entry.empty()) entry=getEntry("64/HKEY_LOCAL_MACHINE/SOFTWARE/",key); if(entry.empty()) entry=getEntry("/HKEY_CURRENT_USER/Software/",key); if(entry.empty()) entry=getEntry("/HKEY_LOCAL_MACHINE/SOFTWARE/",key); return entry; } void queryRegistry() { defaultGhostscriptLibrary=getEntry("GPL Ghostscript/*/GS_DLL"); if(defaultGhostscriptLibrary.empty()) defaultGhostscriptLibrary=getEntry("AFPL Ghostscript/*/GS_DLL"); string gslib=stripDir(defaultGhostscriptLibrary); defaultGhostscript=stripFile(defaultGhostscriptLibrary)+ ((gslib.empty() || gslib.substr(5,2) == "32") ? "gswin32c.exe" : "gswin64c.exe"); if(defaultPDFViewer != "cmd") defaultPDFViewer=getEntry("Adobe/Acrobat Reader/*/InstallPath/@")+"\\"+ defaultPDFViewer; if(defaultPSViewer != "cmd") defaultPSViewer=getEntry("Ghostgum/GSview/*")+"\\gsview\\"+defaultPSViewer; string s; s=getEntry("Microsoft/Windows/CurrentVersion/App Paths/Asymptote/Path"); if(!s.empty()) docdir=s; // An empty systemDir indicates a TeXLive build if(!systemDir.empty() && !docdir.empty()) systemDir=docdir; } #endif const char PROGRAM[]=PACKAGE_NAME; const char VERSION[]=PACKAGE_VERSION; const char BUGREPORT[]=PACKAGE_BUGREPORT; // The name of the program (as called). Used when displaying help info. char *argv0; // The verbosity setting, a global variable. Int verbose; // Conserve memory at the expense of speed. bool compact; // Colorspace conversion flags (stored in global variables for efficiency). bool gray; bool bw; bool rgb; bool cmyk; // Disable system calls. bool safe=true; // Enable writing to (or changing to) other directories bool globaloption=false; bool globalwrite() {return globaloption || !safe;} const string suffix="asy"; const string guisuffix="gui"; const string standardprefix="out"; string initdir; string historyname; // Local versions of the argument list. int argCount = 0; char **argList = 0; typedef ::option c_option; types::dummyRecord *settingsModule; types::record *getSettingsModule() { return settingsModule; } void noWarn(const string& s) { array *Warn=getSetting("suppress"); size_t size=checkArray(Warn); if(s.empty()) return; for(size_t i=0; i < size; i++) if(vm::read(Warn,i) == s) return; Warn->push(s); } void Warn(const string& s) { array *Warn=getSetting("suppress"); size_t size=checkArray(Warn); for(size_t i=0; i < size; i++) if(vm::read(Warn,i) == s) (*Warn).erase((*Warn).begin()+i,(*Warn).begin()+i+1); } bool warn(const string& s) { if(getSetting("debug")) return true; array *Warn=getSetting("suppress"); size_t size=checkArray(Warn); for(size_t i=0; i < size; i++) if(vm::read(Warn,i) == s) return false; return true; } // The dictionaries of long options and short options. struct option; typedef mem::map optionsMap_t; optionsMap_t optionsMap; typedef mem::map codeMap_t; codeMap_t codeMap; struct option : public gc { string name; char code; // Command line option, i.e. 'V' for -V. bool argument; // If it takes an argument on the command line. This is set // based on whether argname is empty. string argname; // The argument name for printing the description. string desc; // One line description of what the option does. bool cmdlineonly; // If it is only available on the command line. string Default; // A string containing an optional default value. option(string name, char code, string argname, string desc, bool cmdlineonly=false, string Default="") : name(name), code(code), argument(!argname.empty()), argname(argname), desc(desc), cmdlineonly(cmdlineonly), Default(Default) {} virtual ~option() {} // Builds this option's contribution to the optstring argument of get_opt(). virtual string optstring() { if (code) { string base; base.push_back(code); if(argument) base.push_back(':'); return base; } else return ""; } // Sets the contribution to the longopt array. virtual void longopt(c_option &o) { o.name=name.c_str(); o.has_arg=argument ? 1 : 0; o.flag=0; o.val=0; } // Add to the dictionaries of options. virtual void add() { optionsMap[name]=this; if (code) codeMap[code]=this; } // Set the option from the command-line argument. Return true if the option // was correctly parsed. virtual bool getOption() = 0; void error(string msg) { cerr << endl << argv0 << ": "; if (code) cerr << "-" << code << " "; cerr << "(-" << name << ") " << msg << endl; } // The "-f,-outformat format" part of the option. virtual string describeStart() { ostringstream ss; if (code) ss << "-" << code << ","; ss << "-" << name; if (argument) ss << " " << argname; return ss.str(); } // Outputs description of the command for the -help option. virtual void describe() { // Don't show the option if it has no desciption. if (!desc.empty()) { const unsigned WIDTH=22; string start=describeStart(); cerr << std::left << std::setw(WIDTH) << start; if (start.size() >= WIDTH) { cerr << endl; cerr << std::left << std::setw(WIDTH) << ""; } cerr << " " << desc; if(cmdlineonly) cerr << "; command-line only"; if(Default != "") cerr << " [" << Default << "]"; cerr << endl; } } virtual void reset() { } }; const string noarg; struct setting : public option { types::ty *t; private: trans::permission perm; bool added; // Flag the setting as secure, so that it can only be set on the command-line, // though it can still be read in Asymptote code. void secure() { assert(!added); perm = trans::RESTRICTED; } public: setting(string name, char code, string argname, string desc, types::ty *t, string Default) : option(name, code, argname, desc, false,Default), t(t), perm(trans::PUBLIC), added(false) {} void reset() = 0; virtual trans::access *buildAccess() = 0; // Add to the dictionaries of options and to the settings module. virtual void add() { assert(!added); option::add(); settingsModule->add(name, t, buildAccess(), perm); added=true; } friend void addSecureSetting(setting *s) { s->secure(); s->add(); } }; struct itemSetting : public setting { item defaultValue; item value; itemSetting(string name, char code, string argname, string desc, types::ty *t, item defaultValue, string Default="") : setting(name, code, argname, desc, t, Default), defaultValue(defaultValue) {reset();} void reset() { value=defaultValue; } trans::access *buildAccess() { return new itemRefAccess(&(value)); } }; item& Setting(string name) { itemSetting *s=dynamic_cast(optionsMap[name]); if(!s) { cerr << "Cannot find setting named '" << name << "'" << endl; exit(-1); } return s->value; } struct boolSetting : public itemSetting { boolSetting(string name, char code, string desc, bool defaultValue=false) : itemSetting(name, code, noarg, desc, types::primBoolean(), (item)defaultValue, defaultValue ? "true" : "false") {} bool getOption() { value=(item)true; return true; } option *negation(string name) { struct negOption : public option { boolSetting &base; negOption(boolSetting &base, string name) : option(name, 0, noarg, ""), base(base) {} bool getOption() { base.value=(item)false; return true; } }; return new negOption(*this, name); } void add() { setting::add(); negation("no"+name)->add(); if (code) { string nocode="no"; nocode.push_back(code); negation(nocode)->add(); } } // Set several related boolean options at once. Used for view and trap which // have batch and interactive settings. struct multiOption : public option { typedef mem::list setlist; setlist set; multiOption(string name, char code, string desc) : option(name, code, noarg, desc, true) {} void add(boolSetting *s) { set.push_back(s); } void setValue(bool value) { for (setlist::iterator s=set.begin(); s!=set.end(); ++s) (*s)->value=(item)value; } bool getOption() { setValue(true); return true; } option *negation(string name) { struct negOption : public option { multiOption &base; negOption(multiOption &base, string name) : option(name, 0, noarg, ""), base(base) {} bool getOption() { base.setValue(false); return true; } }; return new negOption(*this, name); } void add() { option::add(); negation("no"+name)->add(); if (code) { string nocode="no"; nocode.push_back(code); negation(nocode)->add(); } for (multiOption::setlist::iterator s=set.begin(); s!=set.end(); ++s) (*s)->add(); } }; }; typedef boolSetting::multiOption multiOption; struct argumentSetting : public itemSetting { argumentSetting(string name, char code, string argname, string desc, types::ty *t, item defaultValue) : itemSetting(name, code, argname, desc, t, defaultValue) { assert(!argname.empty()); } }; struct stringSetting : public argumentSetting { stringSetting(string name, char code, string argname, string desc, string defaultValue="") : argumentSetting(name, code, argname, desc.empty() ? "" : desc+(defaultValue.empty() ? "" : " ["+defaultValue+"]"), types::primString(), (item)defaultValue) {} bool getOption() { value=(item)(string)optarg; return true; } }; struct userSetting : public argumentSetting { userSetting(string name, char code, string argname, string desc, string defaultValue="") : argumentSetting(name, code, argname, desc, types::primString(), (item)defaultValue) {} bool getOption() { string s=vm::get(value)+string(optarg); s.push_back(';'); value=(item) s; return true; } }; struct warnSetting : public option { warnSetting(string name, char code, string argname, string desc) : option(name, code, argname, desc, true) {} bool getOption() { Warn(string(optarg)); return true; } option *negation(string name) { struct negOption : public option { warnSetting &base; negOption(warnSetting &base, string name, string argname) : option(name, 0, argname, ""), base(base) {} bool getOption() { noWarn(string(optarg)); return true; } }; return new negOption(*this, name, argname); } void add() { option::add(); negation("no"+name)->add(); if (code) { string nocode="no"; nocode.push_back(code); negation(nocode)->add(); } } }; string GetEnv(string s, string Default) { transform(s.begin(), s.end(), s.begin(), toupper); string t=Getenv(("ASYMPTOTE_"+s).c_str(),msdos); return t.empty() ? Default : t; } struct envSetting : public stringSetting { envSetting(string name, string Default) : stringSetting(name, 0, " ", "", GetEnv(name,Default)) {} }; template struct dataSetting : public argumentSetting { string text; dataSetting(const char *text, string name, char code, string argname, string desc, types::ty *type, T defaultValue) : argumentSetting(name, code, argname, desc, type, (item)defaultValue), text(text) {} bool getOption() { try { value=(item)lexical::cast(optarg); } catch (lexical::bad_cast&) { error("option requires " + text + " as an argument"); return false; } return true; } }; template string description(string desc, T defaultValue) { return desc.empty() ? "" : desc+" ["+String(defaultValue)+"]"; } struct IntSetting : public dataSetting { IntSetting(string name, char code, string argname, string desc, Int defaultValue=0) : dataSetting("an int", name, code, argname, description(desc,defaultValue), types::primInt(), defaultValue) {} }; struct realSetting : public dataSetting { realSetting(string name, char code, string argname, string desc, double defaultValue=0.0) : dataSetting("a real", name, code, argname, description(desc,defaultValue), types::primReal(), defaultValue) {} }; struct pairSetting : public dataSetting { pairSetting(string name, char code, string argname, string desc, pair defaultValue=0.0) : dataSetting("a pair", name, code, argname, description(desc,defaultValue), types::primPair(), defaultValue) {} }; // For setting the alignment of a figure on the page. struct alignSetting : public argumentSetting { alignSetting(string name, char code, string argname, string desc, string defaultValue) : argumentSetting(name, code, argname, description(desc,defaultValue), types::primString(), (item)defaultValue) {} bool getOption() { string str=optarg; if(str == "C" || str == "T" || str == "B" || str == "Z") { value=str; return true; } error("invalid argument for option"); return false; } }; struct stringArraySetting : public itemSetting { stringArraySetting(string name, array *defaultValue) : itemSetting(name, 0, "", "", types::stringArray(), (item) defaultValue) {} bool getOption() {return true;} }; struct engineSetting : public argumentSetting { engineSetting(string name, char code, string argname, string desc, string defaultValue) : argumentSetting(name, code, argname, description(desc,defaultValue), types::primString(), (item)defaultValue) {} bool getOption() { string str=optarg; if(str == "latex" || str == "pdflatex" || str == "xelatex" || str == "tex" || str == "pdftex" || str == "luatex" || str == "lualatex" || str == "context" || str == "none") { value=str; return true; } error("invalid argument for option"); return false; } }; template string stringCast(T x) { ostringstream buf; buf.precision(DBL_DIG); buf.setf(std::ios::boolalpha); buf << x; return string(buf.str()); } template struct refSetting : public setting { T *ref; T defaultValue; string text; refSetting(string name, char code, string argname, string desc, types::ty *t, T *ref, T defaultValue, const char *text="") : setting(name, code, argname, desc, t, stringCast(defaultValue)), ref(ref), defaultValue(defaultValue), text(text) { reset(); } virtual bool getOption() { try { *ref=lexical::cast(optarg); } catch (lexical::bad_cast&) { error("option requires " + text + " as an argument"); return false; } return true; } virtual void reset() { *ref=defaultValue; } trans::access *buildAccess() { return new refAccess(ref); } }; struct boolrefSetting : public refSetting { boolrefSetting(string name, char code, string desc, bool *ref, bool Default=false) : refSetting(name, code, noarg, desc, types::primBoolean(), ref, Default) {} virtual bool getOption() { *ref=true; return true; } virtual option *negation(string name) { struct negOption : public option { boolrefSetting &base; negOption(boolrefSetting &base, string name) : option(name, 0, noarg, ""), base(base) {} bool getOption() { *(base.ref)=false; return true; } }; return new negOption(*this, name); } void add() { setting::add(); negation("no"+name)->add(); if (code) { string nocode="no"; nocode.push_back(code); negation(nocode)->add(); } } }; struct compactSetting : public boolrefSetting { compactSetting(string name, char code, string desc, bool *ref, bool Default=false) : boolrefSetting(name,code,desc,ref,Default) {} bool getOption() { mem::compact(1); return boolrefSetting::getOption(); } option *negation(string name) { mem::compact(0); return boolrefSetting::negation(name); } }; struct incrementSetting : public refSetting { incrementSetting(string name, char code, string desc, Int *ref) : refSetting(name, code, noarg, desc, types::primInt(), ref, 0) {} bool getOption() { // Increment the value. ++(*ref); return true; } option *negation(string name) { struct negOption : public option { incrementSetting &base; negOption(incrementSetting &base, string name) : option(name, 0, noarg, ""), base(base) {} bool getOption() { if(*base.ref) --(*base.ref); return true; } }; return new negOption(*this, name); } void add() { setting::add(); negation("no"+name)->add(); if (code) { string nocode="no"; nocode.push_back(code); negation(nocode)->add(); } } }; struct incrementOption : public option { Int *ref; Int level; incrementOption(string name, char code, string desc, Int *ref, Int level=1) : option(name, code, noarg, desc, true), ref(ref), level(level) {} bool getOption() { // Increment the value. (*ref) += level; return true; } }; void addOption(option *o) { o->add(); } void version() { cerr << PROGRAM << " version " << REVISION << " [(C) 2004 Andy Hammerlindl, John C. Bowman, Tom Prince]" << endl; } void usage(const char *program) { version(); cerr << "\t\t\t" << "http://asymptote.sourceforge.net/" << endl << "Usage: " << program << " [options] [file ...]" << endl; } void reportSyntax() { cerr << endl; usage(argv0); cerr << endl << "Type '" << argv0 << " -h' for a description of options." << endl; exit(1); } void displayOptions() { cerr << endl; cerr << "Options (negate by replacing - with -no): " << endl << endl; for (optionsMap_t::iterator opt=optionsMap.begin(); opt!=optionsMap.end(); ++opt) opt->second->describe(); } struct helpOption : public option { helpOption(string name, char code, string desc) : option(name, code, noarg, desc, true) {} bool getOption() { usage(argv0); displayOptions(); cerr << endl; exit(0); // Unreachable code. return true; } }; struct versionOption : public option { versionOption(string name, char code, string desc) : option(name, code, noarg, desc, true) {} bool getOption() { version(); exit(0); // Unreachable code. return true; } }; struct divisorOption : public option { divisorOption(string name, char code, string argname, string desc) : option(name, code, argname, desc) {} bool getOption() { try { #ifdef USEGC Int n=lexical::cast(optarg); if(n > 0) GC_set_free_space_divisor((GC_word) n); #endif } catch (lexical::bad_cast&) { error("option requires an int as an argument"); return false; } return true; } }; // For security reasons, these options aren't fields of the settings module. struct stringOption : public option { char **variable; stringOption(string name, char code, string argname, string desc, char **variable) : option(name, code, argname, desc, true), variable(variable) {} bool getOption() { *variable=optarg; return true; } }; string build_optstring() { string s; for (codeMap_t::iterator p=codeMap.begin(); p !=codeMap.end(); ++p) s +=p->second->optstring(); return s; } c_option *build_longopts() { size_t n=optionsMap.size(); c_option *longopts=new(UseGC) c_option[n+1]; Int i=0; for (optionsMap_t::iterator p=optionsMap.begin(); p !=optionsMap.end(); ++p, ++i) p->second->longopt(longopts[i]); longopts[n].name=NULL; longopts[n].has_arg=0; longopts[n].flag=NULL; longopts[n].val=0; return longopts; } void resetOptions() { for(optionsMap_t::iterator opt=optionsMap.begin(); opt != optionsMap.end(); ++opt) if(opt->first != "config" && opt->first != "dir" && opt->first != "sysdir") opt->second->reset(); } void getOptions(int argc, char *argv[]) { bool syntax=false; optind=0; string optstring=build_optstring(); //cerr << "optstring: " << optstring << endl; c_option *longopts=build_longopts(); int long_index = 0; errno=0; for(;;) { int c = getopt_long_only(argc,argv, optstring.c_str(), longopts, &long_index); if (c == -1) break; if (c == 0) { const char *name=longopts[long_index].name; //cerr << "long option: " << name << endl; if (!optionsMap[name]->getOption()) syntax=true; } else if (codeMap.find((char)c) != codeMap.end()) { //cerr << "char option: " << (char)c << endl; if (!codeMap[(char)c]->getOption()) syntax=true; } else { syntax=true; } errno=0; } if (syntax) reportSyntax(); } #ifdef USEGC void no_GCwarn(char *, GC_word) { } #endif array* stringArray(const char **s) { size_t count=0; while(s[count]) ++count; array *a=new array(count); for(size_t i=0; i < count; ++i) (*a)[i]=string(s[i]); return a; } void initSettings() { static bool initialize=true; if(initialize) { queryRegistry(); initialize=false; } settingsModule=new types::dummyRecord(symbol::trans("settings")); // Default mouse bindings // LEFT: rotate // SHIFT LEFT: zoom // CTRL LEFT: shift // ALT LEFT: pan const char *leftbutton[]={"rotate","zoom","shift","pan",NULL}; // MIDDLE: menu (must be unmodified; ignores Shift, Ctrl, and Alt) const char *middlebutton[]={"menu",NULL}; // RIGHT: zoom/menu (must be unmodified) // SHIFT RIGHT: rotateX // CTRL RIGHT: rotateY // ALT RIGHT: rotateZ const char *rightbutton[]={"zoom/menu","rotateX","rotateY","rotateZ",NULL}; // WHEEL_UP: zoomin const char *wheelup[]={"zoomin",NULL}; // WHEEL_DOWN: zoomout const char *wheeldown[]={"zoomout",NULL}; addOption(new stringArraySetting("leftbutton", stringArray(leftbutton))); addOption(new stringArraySetting("middlebutton", stringArray(middlebutton))); addOption(new stringArraySetting("rightbutton", stringArray(rightbutton))); addOption(new stringArraySetting("wheelup", stringArray(wheelup))); addOption(new stringArraySetting("wheeldown", stringArray(wheeldown))); addOption(new stringArraySetting("suppress", new array)); addOption(new warnSetting("warn", 0, "string", "Enable warning")); multiOption *view=new multiOption("View", 'V', "View output"); view->add(new boolSetting("batchView", 0, "View output in batch mode", msdos)); view->add(new boolSetting("multipleView", 0, "View output from multiple batch-mode files", false)); view->add(new boolSetting("interactiveView", 0, "View output in interactive mode", true)); addOption(view); addOption(new stringSetting("outformat", 'f', "format", "Convert each output file to specified format", "")); addOption(new boolSetting("svgemulation", 0, "Emulate unimplemented SVG shading", false)); addOption(new boolSetting("prc", 0, "Embed 3D PRC graphics in PDF output", true)); addOption(new boolSetting("toolbar", 0, "Show 3D toolbar in PDF output", true)); addOption(new boolSetting("axes3", 0, "Show 3D axes in PDF output", true)); addOption(new realSetting("render", 0, "n", "Render 3D graphics using n pixels per bp (-1=auto)", havegl ? -1.0 : 0.0)); addOption(new IntSetting("antialias", 0, "n", "Antialiasing width for rasterized output", 2)); addOption(new IntSetting("multisample", 0, "n", "Multisampling width for screen images", 4)); addOption(new boolSetting("offscreen", 0, "Use offscreen rendering",false)); addOption(new boolSetting("twosided", 0, "Use two-sided 3D lighting model for rendering", true)); addOption(new pairSetting("position", 0, "pair", "Initial 3D rendering screen position")); addOption(new pairSetting("maxviewport", 0, "pair", "Maximum viewport size",pair(2048,2048))); addOption(new pairSetting("maxtile", 0, "pair", "Maximum rendering tile size",pair(1024,768))); addOption(new boolSetting("iconify", 0, "Iconify rendering window", false)); addOption(new boolSetting("thick", 0, "Render thick 3D lines", true)); addOption(new boolSetting("thin", 0, "Render thin 3D lines", true)); addOption(new boolSetting("autobillboard", 0, "3D labels always face viewer by default", true)); addOption(new boolSetting("threads", 0, "Use POSIX threads for 3D rendering", !msdos)); addOption(new boolSetting("fitscreen", 0, "Fit rendered image to screen", true)); addOption(new boolSetting("interactiveWrite", 0, "Write expressions entered at the prompt to stdout", true)); addOption(new helpOption("help", 'h', "Show summary of options")); addOption(new versionOption("version", 0, "Show version")); addOption(new pairSetting("offset", 'O', "pair", "PostScript offset")); addOption(new pairSetting("aligndir", 0, "pair", "Directional page alignment (overrides align)")); addOption(new alignSetting("align", 'a', "C|B|T|Z", "Center, Bottom, Top, or Zero page alignment", "C")); addOption(new boolSetting("debug", 'd', "Enable debugging messages")); addOption(new incrementSetting("verbose", 'v', "Increase verbosity level (can specify multiple times)", &verbose)); // Resolve ambiguity with --version addOption(new incrementOption("vv", 0,"", &verbose,2)); addOption(new incrementOption("novv", 0,"", &verbose,-2)); addOption(new boolSetting("keep", 'k', "Keep intermediate files")); addOption(new boolSetting("keepaux", 0, "Keep intermediate LaTeX .aux files")); addOption(new engineSetting("tex", 0, "engine", "latex|pdflatex|xelatex|lualatex|tex|pdftex|luatex|context|none", "latex")); addOption(new boolSetting("twice", 0, "Run LaTeX twice (to resolve references)")); addOption(new boolSetting("inlinetex", 0, "Generate inline TeX code")); addOption(new boolSetting("embed", 0, "Embed rendered preview image", true)); addOption(new boolSetting("auto3D", 0, "Automatically activate 3D scene", true)); addOption(new boolSetting("autoplay", 0, "Autoplay 3D animations", false)); addOption(new boolSetting("loop", 0, "Loop 3D animations", false)); addOption(new boolSetting("interrupt", 0, "", false)); addOption(new boolSetting("animating", 0, "", false)); addOption(new boolSetting("reverse", 0, "reverse 3D animations", false)); addOption(new boolSetting("inlineimage", 0, "Generate inline embedded image")); addOption(new boolSetting("parseonly", 'p', "Parse file")); addOption(new boolSetting("translate", 's', "Show translated virtual machine code")); addOption(new boolSetting("tabcompletion", 0, "Interactive prompt auto-completion", true)); addOption(new boolSetting("listvariables", 'l', "List available global functions and variables")); addOption(new boolSetting("where", 0, "Show where listed variables are declared")); multiOption *mask=new multiOption("mask", 'm', "Mask fpu exceptions"); mask->add(new boolSetting("batchMask", 0, "Mask fpu exceptions in batch mode", false)); mask->add(new boolSetting("interactiveMask", 0, "Mask fpu exceptions in interactive mode", true)); addOption(mask); addOption(new boolrefSetting("bw", 0, "Convert all colors to black and white",&bw)); addOption(new boolrefSetting("gray", 0, "Convert all colors to grayscale", &gray)); addOption(new boolrefSetting("rgb", 0, "Convert cmyk colors to rgb",&rgb)); addOption(new boolrefSetting("cmyk", 0, "Convert rgb colors to cmyk",&cmyk)); addSecureSetting(new boolrefSetting("safe", 0, "Disable system call", &safe, true)); addSecureSetting(new boolrefSetting("globalwrite", 0, "Allow write to other directory", &globaloption, false)); addSecureSetting(new stringSetting("outname", 'o', "name", "Alternative output directory/filename")); addOption(new stringOption("cd", 0, "directory", "Set current directory", &startpath)); #ifdef USEGC addOption(new compactSetting("compact", 0, "Conserve memory at the expense of speed", &compact)); addOption(new divisorOption("divisor", 0, "n", "Garbage collect using purge(divisor=n) [2]")); #endif addOption(new stringSetting("prompt", 0,"string","Prompt","> ")); addOption(new stringSetting("prompt2", 0,"string", "Continuation prompt for multiline input ", "..")); addOption(new boolSetting("multiline", 0, "Input code over multiple lines at the prompt")); addOption(new boolSetting("wait", 0, "Wait for child processes to finish before exiting")); addOption(new IntSetting("inpipe", 0, "n","",-1)); addOption(new IntSetting("outpipe", 0, "n","",-1)); addOption(new boolSetting("exitonEOF", 0, "Exit interactive mode on EOF", true)); addOption(new boolSetting("quiet", 'q', "Suppress welcome text and noninteractive stdout")); addOption(new boolSetting("localhistory", 0, "Use a local interactive history file")); addOption(new IntSetting("historylines", 0, "n", "Retain n lines of history",1000)); addOption(new IntSetting("scroll", 0, "n", "Scroll standard output n lines at a time",0)); addOption(new IntSetting("level", 0, "n", "Postscript level",3)); addOption(new boolSetting("autoplain", 0, "Enable automatic importing of plain", true)); addOption(new boolSetting("autorotate", 0, "Enable automatic PDF page rotation", false)); addOption(new boolSetting("pdfreload", 0, "Automatically reload document in pdfviewer", false)); addOption(new IntSetting("pdfreloaddelay", 0, "usec", "Delay before attempting initial pdf reload" ,750000)); addOption(new stringSetting("autoimport", 0, "string", "Module to automatically import")); addOption(new userSetting("command", 'c', "string", "Command to autoexecute")); addOption(new userSetting("user", 'u', "string", "General purpose user string")); addOption(new realSetting("zoomfactor", 0, "factor", "Zoom step factor", 1.05)); addOption(new realSetting("zoomstep", 0, "step", "Mouse motion zoom step", 0.1)); addOption(new realSetting("spinstep", 0, "deg/s", "Spin speed", 60.0)); addOption(new realSetting("framerate", 0, "frames/s", "Animation speed", 30.0)); addOption(new realSetting("framedelay", 0, "ms", "Additional frame delay", 0.0)); addOption(new realSetting("arcballradius", 0, "pixels", "Arcball radius", 750.0)); addOption(new realSetting("resizestep", 0, "step", "Resize step", 1.2)); addOption(new IntSetting("doubleclick", 0, "ms", "Emulated double-click timeout", 200)); addOption(new realSetting("paperwidth", 0, "bp", "")); addOption(new realSetting("paperheight", 0, "bp", "")); addOption(new stringSetting("dvipsOptions", 0, "string", "")); addOption(new stringSetting("dvisvgmOptions", 0, "string", "")); addOption(new stringSetting("convertOptions", 0, "string", "")); addOption(new stringSetting("gsOptions", 0, "string", "")); addOption(new stringSetting("psviewerOptions", 0, "string", "")); addOption(new stringSetting("pdfviewerOptions", 0, "string", "")); addOption(new stringSetting("pdfreloadOptions", 0, "string", "")); addOption(new stringSetting("glOptions", 0, "string", "")); addOption(new stringSetting("hyperrefOptions", 0, "str", "","setpagesize=false,unicode,pdfborder=0 0 0")); addOption(new envSetting("config","config."+suffix)); addOption(new envSetting("pdfviewer", defaultPDFViewer)); addOption(new envSetting("psviewer", defaultPSViewer)); addOption(new envSetting("gs", defaultGhostscript)); addOption(new envSetting("libgs", defaultGhostscriptLibrary)); addOption(new envSetting("epsdriver", defaultEPSdriver)); addOption(new envSetting("texpath", "")); addOption(new envSetting("texcommand", "")); addOption(new envSetting("dvips", "dvips")); addOption(new envSetting("dvisvgm", "dvisvgm")); addOption(new envSetting("convert", "convert")); addOption(new envSetting("display", defaultDisplay)); addOption(new envSetting("animate", defaultAnimate)); addOption(new envSetting("papertype", "letter")); addOption(new envSetting("dir", "")); addOption(new envSetting("sysdir", systemDir)); addOption(new envSetting("textcommand","groff")); addOption(new envSetting("textcommandOptions","-e -P -b16")); addOption(new envSetting("textextension", "roff")); addOption(new envSetting("textoutformat", "ps")); addOption(new envSetting("textprologue", ".EQ\ndelim $$\n.EN")); addOption(new envSetting("textinitialfont", ".fam T\n.ps 12")); addOption(new envSetting("textepilogue", ".bp")); } // Access the arguments once options have been parsed. int numArgs() { return argCount; } char *getArg(int n) { return argList[n]; } void setInteractive() { if(numArgs() == 0 && !getSetting("listvariables") && getSetting("command").empty() && (isatty(STDIN_FILENO) || getSetting("inpipe") >= 0)) interact::interactive=true; if(getSetting("localhistory")) historyname=string(getPath())+dirsep+"."+suffix+"_history"; else { if(mkdir(initdir.c_str(),0777) != 0 && errno != EEXIST) cerr << "failed to create directory "+initdir+"." << endl; historyname=initdir+"/history"; } if(verbose > 1) cerr << "Using history " << historyname << endl; } bool view() { if (interact::interactive) return getSetting("interactiveView"); else return getSetting("batchView") && (numArgs() == 1 || getSetting("multipleView")); } bool trap() { if (interact::interactive) return !getSetting("interactiveMask"); else return !getSetting("batchMask"); } string outname() { string name=getSetting("outname"); if(name.empty() && interact::interactive) return standardprefix; if(msdos) backslashToSlash(name); return name; } string lookup(const string& symbol) { string s; mem::vector cmd; string kpsewhich="kpsewhich"; string fullname=stripFile(argv0)+kpsewhich; std::ifstream exists(fullname.c_str()); if(!exists) fullname=kpsewhich; cmd.push_back(fullname); cmd.push_back("--var-value="+symbol); iopipestream pipe(cmd); pipe >> s; size_t n=s.find('\r'); if(n != string::npos) s.erase(n,1); n=s.find('\n'); if(n != string::npos) s.erase(n,1); return s; } void initDir() { if(getSetting("sysdir").empty()) { string s=lookup("TEXMFMAIN"); if(s.size() > 1) { string texmf=s+dirsep; docdir=texmf+"doc"+dirsep+"asymptote"; Setting("sysdir")=texmf+"asymptote"; s=lookup("ASYMPTOTE_HOME"); if(s.size() > 1) initdir=s; } } if(initdir.empty()) initdir=Getenv("ASYMPTOTE_HOME",msdos); if(initdir.empty()) initdir=Getenv(HOME.c_str(),msdos)+dirsep+"."+suffix; #ifdef __MSDOS__ mask=umask(0); if(mask == 0) mask=0027; umask(mask); #endif if(access(initdir.c_str(),F_OK) == 0) { if(verbose > 1) cerr << "Using configuration directory " << initdir << endl; } } void setPath() { searchPath.clear(); searchPath.push_back("."); string asydir=getSetting("dir"); if(asydir != "") { size_t p,i=0; while((p=asydir.find(pathSeparator,i)) < string::npos) { if(p > i) searchPath.push_back(asydir.substr(i,p-i)); i=p+1; } if(i < asydir.length()) searchPath.push_back(asydir.substr(i)); } if(access(initdir.c_str(),F_OK) == 0) searchPath.push_back(initdir); string sysdir=getSetting("sysdir"); if(sysdir != "") searchPath.push_back(sysdir); } void SetPageDimensions() { string paperType=getSetting("papertype"); if(paperType.empty() && getSetting("paperwidth") != 0.0 && getSetting("paperheight") != 0.0) return; if(paperType == "letter") { Setting("paperwidth")=8.5*inches; Setting("paperheight")=11.0*inches; } else { Setting("paperwidth")=21.0*cm; Setting("paperheight")=29.7*cm; if(paperType != "a4") { cerr << "Unknown paper size \'" << paperType << "\'; assuming a4." << endl; Setting("papertype")=string("a4"); } } } bool xe(const string& texengine) { return texengine == "xelatex"; } bool lua(const string& texengine) { return texengine == "luatex" || texengine == "lualatex"; } bool context(const string& texengine) { return texengine == "context"; } bool pdf(const string& texengine) { return texengine == "pdflatex" || texengine == "pdftex" || xe(texengine) || lua(texengine) || context(texengine); } bool latex(const string& texengine) { return texengine == "latex" || texengine == "pdflatex" || texengine == "xelatex" || texengine == "lualatex"; } string nativeformat() { return pdf(getSetting("tex")) ? "pdf" : "eps"; } string defaultformat() { string format=getSetting("outformat"); return (format.empty()) ? nativeformat() : format; } // TeX special command to set up currentmatrix for typesetting labels. const char *beginlabel(const string& texengine) { if(pdf(texengine)) return xe(texengine) ? "\\special{pdf:literal q #5 0 0 cm}" : "\\special{pdf:q #5 0 0 cm}"; else return "\\special{ps:gsave currentpoint currentpoint translate [#5 0 0] " "concat neg exch neg exch translate}"; } // TeX special command to restore currentmatrix after typesetting labels. const char *endlabel(const string& texengine) { if(pdf(texengine)) return xe(texengine) ? "\\special{pdf:literal Q}" : "\\special{pdf:Q}"; else return "\\special{ps:currentpoint grestore moveto}"; } // TeX macro to typeset raw postscript code const char *rawpostscript(const string& texengine) { if(pdf(texengine)) return "\\def\\ASYraw#1{#1}"; else return "\\def\\ASYraw#1{\n" "currentpoint currentpoint translate matrix currentmatrix\n" "100 12 div -100 12 div scale\n" "#1\n" "setmatrix neg exch neg exch translate}"; } // TeX macro to begin picture const char *beginpicture(const string& texengine) { if(latex(texengine)) return "\\begin{picture}"; if(context(texengine)) return ""; else return "\\picture"; } // TeX macro to end picture const char *endpicture(const string& texengine) { if(latex(texengine)) return "\\end{picture}%"; else if(context(texengine)) return "%"; else return "\\endpicture%"; } // Begin TeX special command. const char *beginspecial(const string& texengine) { if(pdf(texengine)) return xe(texengine) ? "\\special{pdf:literal " : "\\special{pdf:"; else return "\\special{ps:"; } // End TeX special command. const char *endspecial() { return "}%"; } string texcommand() { string command=getSetting("texcommand"); return command.empty() ? getSetting("tex") : command; } string texprogram() { string path=getSetting("texpath"); string engine=texcommand(); return path.empty() ? engine : (string) (path+"/"+engine); } Int getScroll() { Int scroll=settings::getSetting("scroll"); if(scroll < 0) { #ifdef HAVE_LIBCURSES static char *terminal=NULL; if(!terminal) terminal=getenv("TERM"); if(terminal) { #ifndef __MSDOS__ int error=setupterm(terminal,1,&error); if(error == 0) scroll=lines > 2 ? lines-1 : 1; else #endif scroll=0; } else scroll=0; #else scroll=0; #endif } return scroll; } void doConfig(string file) { bool autoplain=getSetting("autoplain"); bool listvariables=getSetting("listvariables"); if(autoplain) Setting("autoplain")=false; // Turn off for speed. if(listvariables) Setting("listvariables")=false; runFile(file); if(autoplain) Setting("autoplain")=true; if(listvariables) Setting("listvariables")=true; } void setOptions(int argc, char *argv[]) { argv0=argv[0]; cout.precision(DBL_DIG); // Build settings module. initSettings(); // Read command-line options initially to obtain config, dir, sysdir, verbose. getOptions(argc,argv); // Make configuration and history directory initDir(); Int Verbose=verbose; string sysdir=getSetting("sysdir"); resetOptions(); // Read user configuration file. setPath(); string filename=getSetting("config"); if(!filename.empty()) { string file=locateFile(filename); if(!file.empty()) { if(Verbose > 1) cerr << "Loading " << filename << " from " << file << endl; doConfig(file); } } // Read command-line options again to override configuration file defaults. getOptions(argc,argv); if(getSetting("outpipe") == 2) // Redirect cerr to cout std::cerr.rdbuf(std::cout.rdbuf()); Setting("sysdir")=sysdir; if(docdir.empty()) docdir=getSetting("dir"); #ifdef USEGC if(verbose == 0 && !getSetting("debug")) GC_set_warn_proc(no_GCwarn); #endif if(setlocale (LC_ALL, "") == NULL && getSetting("debug")) perror("setlocale"); // Set variables for the file arguments. argCount = argc - optind; argList = argv + optind; // Recompute search path. setPath(); if(getSetting("paperwidth") != 0.0 && getSetting("paperheight") != 0.0) Setting("papertype")=string(""); SetPageDimensions(); setInteractive(); } } ./asymptote-2.41/constructor.cc0000644000175000017500000000713113064427076016441 0ustar norbertnorbert/***** * constructor.cc * Andy Hammerlindl 2007/05/12 * * Using * * void operator init() * * as a field in the definition structure named Foo implicitly creates a * function that could be explicitly defined with code similar to * * static Foo Foo() { * Foo a=new Foo; * a.operator init(); * return a; * } * * This function is usable within further code in the structure definition and, * after the end of the structure definition, is carried over into the enclosing * scope so that it lasts as long as the type definition. *****/ #include "stack.h" #include "entry.h" #include "coenv.h" #include "dec.h" #include "newexp.h" namespace absyntax { using namespace trans; using namespace types; // Defined in dec.cc. varEntry *makeVarEntry(position pos, coenv &e, record *r, types::ty *t); bool definesImplicitConstructor(coenv &e, record *r, varEntry *v, symbol id) { if (id == symbol::initsym && r != 0 && v->getType()->kind == ty_function && e.c.isStatic() == false && e.c.isTopLevel() == false) { function *ft=dynamic_cast(v->getType()); if (ft->getResult()->kind == ty_void) return true; } return false; } // Given the coenv of the body of the constructor, encode the neccessary // instructions to make a new initialized object. void transConstructorBody(position pos, coenv &e, record *r, varEntry *init) { assert(r); assert(init); // Create a varEntry to hold the new object. Foo a; varEntry *v=makeVarEntry(pos, e, 0 /* not a field */, r); // Initialize the object. a=new Foo; newRecordExp::transFromTyEntry(pos, e, new tyEntry(r, 0, 0, position())); v->encode(WRITE, pos, e.c); e.c.encodePop(); // Push the args onto the stack. size_t numArgs=init->getSignature()->getNumFormals(); for (size_t i=0; iencode(READ, pos, e.c); } // Push the object on the stack. v->encode(READ, pos, e.c); // Call the 'operator init' field of the object. init->encode(CALL, pos, e.c, v->getLevel()); // Push the object again. v->encode(READ, pos, e.c); // Return the initialized object. e.c.encode(inst::ret); } varEntry *constructorFromInitializer(position pos, coenv &e, record *r, varEntry *init) { assert(r); types::function *ft=new types::function(r, init->getSignature()); ostringstream out; ft->printVar(out, symbol::trans("")); // Create a new function environment. coder fc = e.c.newFunction(pos, out.str(), ft); coenv fe(fc,e.e); // Translate the function. fe.e.beginScope(); transConstructorBody(pos, fe, r, init); fe.e.endScope(); // Put an instance of the new function on the stack. vm::lambda *l = fe.c.close(); e.c.encode(inst::pushclosure); e.c.encode(inst::makefunc, l); // Save it into a varEntry. varEntry *v=makeVarEntry(pos, e, r, ft); v->encode(WRITE, pos, e.c); e.c.encodePop(); return v; } void addConstructorFromInitializer(position pos, coenv &e, record *r, varEntry *init) { assert(r); // Constructors are declared statically. e.c.pushModifier(EXPLICIT_STATIC); varEntry *v=constructorFromInitializer(pos, e, r, init); // Add the constructor function under the same name as the record. addVar(e, r, v, r->getName()); // Add to the "post definition environment" of the record, so it will also be // added to the enclosing scope when the record definition ends. r->postdefenv.addVar(r->getName(), v); e.c.popModifier(); } } // namespace absyntax ./asymptote-2.41/path.h0000644000175000017500000002644113064427076014657 0ustar norbertnorbert/***** * path.h * Andy Hammerlindl 2002/05/16 * * Stores a piecewise cubic spline with known control points. * * When changing the path algorithms, also update the corresponding * three-dimensional algorithms in path3.cc and three.asy. *****/ #ifndef PATH_H #define PATH_H #include #include "mod.h" #include "pair.h" #include "transform.h" #include "bbox.h" inline double Intcap(double t) { if(t <= Int_MIN) return Int_MIN; if(t >= Int_MAX) return Int_MAX; return t; } // The are like floor and ceil, except they return an integer; // if the argument cannot be converted to a valid integer, they return // Int_MAX (for positive arguments) or Int_MIN (for negative arguments). inline Int Floor(double t) {return (Int) floor(Intcap(t));} inline Int Ceil(double t) {return (Int) ceil(Intcap(t));} bool simpson(double& integral, double (*)(double), double a, double b, double acc, double dxmax); bool unsimpson(double integral, double (*)(double), double a, double& b, double acc, double& area, double dxmax, double dxmin=0); namespace camp { void checkEmpty(Int n); inline Int adjustedIndex(Int i, Int n, bool cycles) { checkEmpty(n); if(cycles) return imod(i,n); else if(i < 0) return 0; else if(i >= n) return n-1; else return i; } // Used in the storage of solved path knots. struct solvedKnot : public gc { pair pre; pair point; pair post; bool straight; solvedKnot() : straight(false) {} friend bool operator== (const solvedKnot& p, const solvedKnot& q) { return p.pre == q.pre && p.point == q.point && p.post == q.post; } }; extern const double Fuzz; extern const double BigFuzz; extern const double Fuzz2; extern const double sqrtFuzz; extern const double fuzzFactor; class path : public gc { bool cycles; // If the path is closed in a loop Int n; // The number of knots mem::vector nodes; mutable double cached_length; // Cache length since path is immutable. mutable bbox box; mutable bbox times; // Times where minimum and maximum extents are attained. public: path() : cycles(false), n(0), nodes(), cached_length(-1) {} // Create a path of a single point path(pair z, bool = false) : cycles(false), n(1), nodes(1), cached_length(-1) { nodes[0].pre = nodes[0].point = nodes[0].post = z; nodes[0].straight = false; } // Creates path from a list of knots. This will be used by camp // methods such as the guide solver, but should probably not be used by a // user of the system unless he knows what he is doing. path(mem::vector& nodes, Int n, bool cycles = false) : cycles(cycles), n(n), nodes(nodes), cached_length(-1) { } friend bool operator== (const path& p, const path& q) { return p.cycles == q.cycles && p.nodes == q.nodes; } public: path(solvedKnot n1, solvedKnot n2) : cycles(false), n(2), nodes(2), cached_length(-1) { nodes[0] = n1; nodes[1] = n2; nodes[0].pre = nodes[0].point; nodes[1].post = nodes[1].point; } // Copy constructor path(const path& p) : cycles(p.cycles), n(p.n), nodes(p.nodes), cached_length(p.cached_length), box(p.box) {} path unstraighten() const { path P=path(*this); for(int i=0; i < n; ++i) P.nodes[i].straight=false; return P; } virtual ~path() { } // Getting control points Int size() const { return n; } bool empty() const { return n == 0; } Int length() const { return cycles ? n : n-1; } bool cyclic() const { return cycles; } mem::vector& Nodes() { return nodes; } bool straight(Int t) const { if (cycles) return nodes[imod(t,n)].straight; return (t >= 0 && t < n) ? nodes[t].straight : false; } bool piecewisestraight() const { Int L=length(); for(Int i=0; i < L; ++i) if(!straight(i)) return false; return true; } pair point(Int t) const { return nodes[adjustedIndex(t,n,cycles)].point; } pair point(double t) const; pair precontrol(Int t) const { return nodes[adjustedIndex(t,n,cycles)].pre; } pair precontrol(double t) const; pair postcontrol(Int t) const { return nodes[adjustedIndex(t,n,cycles)].post; } pair postcontrol(double t) const; inline double norm(const pair& z0, const pair& c0, const pair& c1, const pair& z1) const { return Fuzz2*camp::max((c0-z0).abs2(), camp::max((c1-z0).abs2(),(z1-z0).abs2())); } pair predir(Int t, bool normalize=true) const { if(!cycles && t <= 0) return pair(0,0); pair z1=point(t); pair c1=precontrol(t); pair dir=3.0*(z1-c1); if(!normalize) return dir; pair z0=point(t-1); pair c0=postcontrol(t-1); double epsilon=norm(z0,c0,c1,z1); if(dir.abs2() > epsilon) return unit(dir); dir=2.0*c1-c0-z1; if(dir.abs2() > epsilon) return unit(dir); return unit(z1-z0+3.0*(c0-c1)); } pair postdir(Int t, bool normalize=true) const { if(!cycles && t >= n-1) return pair(0,0); pair c0=postcontrol(t); pair z0=point(t); pair dir=3.0*(c0-z0); if(!normalize) return dir; pair z1=point(t+1); pair c1=precontrol(t+1); double epsilon=norm(z0,c0,c1,z1); if(dir.abs2() > epsilon) return unit(dir); dir=z0-2.0*c0+c1; if(dir.abs2() > epsilon) return unit(dir); return unit(z1-z0+3.0*(c0-c1)); } pair dir(Int t, Int sign, bool normalize=true) const { if(sign == 0) { pair v=predir(t,normalize)+postdir(t,normalize); return normalize ? unit(v) : 0.5*v; } if(sign > 0) return postdir(t,normalize); return predir(t,normalize); } pair dir(double t, bool normalize=true) const { if(!cycles) { if(t <= 0) return postdir((Int) 0,normalize); if(t >= n-1) return predir(n-1,normalize); } Int i=Floor(t); t -= i; if(t == 0) return dir(i,0,normalize); pair z0=point(i); pair c0=postcontrol(i); pair c1=precontrol(i+1); pair z1=point(i+1); pair a=3.0*(z1-z0)+9.0*(c0-c1); pair b=6.0*(z0+c1)-12.0*c0; pair c=3.0*(c0-z0); pair dir=a*t*t+b*t+c; if(!normalize) return dir; double epsilon=norm(z0,c0,c1,z1); if(dir.abs2() > epsilon) return unit(dir); dir=2.0*a*t+b; if(dir.abs2() > epsilon) return unit(dir); return unit(a); } pair postaccel(Int t) const { if(!cycles && t >= n-1) return pair(0,0); pair z0=point(t); pair c0=postcontrol(t); pair c1=precontrol(t+1); return 6.0*(z0+c1)-12.0*c0; } pair preaccel(Int t) const { if(!cycles && t <= 0) return pair(0,0); pair c0=postcontrol(t-1); pair c1=precontrol(t); pair z1=point(t); return 6.0*(z1+c0)-12.0*c1; } pair accel(Int t, Int sign) const { if(sign == 0) return 0.5*(preaccel(t)+postaccel(t)); if(sign > 0) return postaccel(t); return preaccel(t); } pair accel(double t) const { if(!cycles) { if(t <= 0) return postaccel((Int) 0); if(t >= n-1) return preaccel(n-1); } Int i=Floor(t); t -= i; if(t == 0) return 0.5*(postaccel(i)+preaccel(i)); pair z0=point(i); pair c0=postcontrol(i); pair c1=precontrol(i+1); pair z1=point(i+1); return 6.0*t*(z1-z0+3.0*(c0-c1))+6.0*(z0+c1)-12.0*c0; } // Returns the path traced out in reverse. path reverse() const; // Generates a path that is a section of the old path, using the time // interval given. path subpath(Int start, Int end) const; path subpath(double start, double end) const; // Special case of subpath used by intersect. void halve(path &first, path &second) const; // Used by picture to determine bounding box. bbox bounds() const; pair mintimes() const { checkEmpty(n); bounds(); return camp::pair(times.left,times.bottom); } pair maxtimes() const { checkEmpty(n); bounds(); return camp::pair(times.right,times.top); } template void addpoint(bbox& box, T i) const { box.addnonempty(point(i),times,(double) i); } template void addpoint(bbox& box, T i, double min, double max) const { static const pair I(0,1); pair v=I*dir(i); pair z=point(i); box.add(z+min*v); box.addnonempty(z+max*v); } // Return bounding box accounting for padding perpendicular to path. bbox bounds(double min, double max) const; // Return bounding box accounting for internal pen padding (but not pencap). bbox internalbounds(const bbox &padding) const; double cubiclength(Int i, double goal=-1) const; double arclength () const; double arctime (double l) const; double directiontime(const pair& z) const; pair max() const { checkEmpty(n); return bounds().Max(); } pair min() const { checkEmpty(n); return bounds().Min(); } // Debugging output friend std::ostream& operator<< (std::ostream& out, const path& p); // Increment count if the path has a vertical component at t. bool Count(Int& count, double t) const; // Count if t is in (begin,end] and z lies to the left of point(i+t). void countleft(Int& count, double x, Int i, double t, double begin, double end, double& mint, double& maxt) const; // Return the winding number of the region bounded by the (cyclic) path // relative to the point z. Int windingnumber(const pair& z) const; // Transformation path transformed(const transform& t) const; }; extern path nullpath; extern const unsigned maxdepth; extern const unsigned mindepth; extern const char *nopoints; bool intersect(double& S, double& T, path& p, path& q, double fuzz, unsigned depth=maxdepth); bool intersections(double& s, double& t, std::vector& S, std::vector& T, path& p, path& q, double fuzz, bool single, bool exact, unsigned depth=maxdepth); void intersections(std::vector& S, path& g, const pair& p, const pair& q, double fuzz); // Concatenates two paths into a new one. path concat(const path& p1, const path& p2); // Applies a transformation to the path path transformed(const transform& t, const path& p); inline double quadratic(double a, double b, double c, double x) { return a*x*x+b*x+c; } class quadraticroots { public: enum {NONE=0, ONE=1, TWO=2, MANY} distinct; // Number of distinct real roots. unsigned roots; // Total number of real roots. double t1,t2; // Real roots quadraticroots(double a, double b, double c); }; class Quadraticroots { public: unsigned roots; // Total number of roots. pair z1,z2; // Complex roots Quadraticroots(pair a, pair b, pair c); }; class cubicroots { public: unsigned roots; // Total number of real roots. double t1,t2,t3; cubicroots(double a, double b, double c, double d); }; path nurb(pair z0, pair z1, pair z2, pair z3, double w0, double w1, double w2, double w3, Int m); double orient2d(const pair& a, const pair& b, const pair& c); void roots(std::vector &roots, double a, double b, double c, double d); void roots(std::vector &r, double x0, double c0, double c1, double x1, double x); inline bool goodroot(double t) { return 0.0 <= t && t <= 1.0; } extern const double third; } #ifndef BROKEN_COMPILER // Delete the following line to work around problems with old broken compilers. GC_DECLARE_PTRFREE(camp::solvedKnot); #endif #endif ./asymptote-2.41/BUGS0000644000175000017500000000037713064427076014235 0ustar norbertnorbertIf you find a bug in Asymptote, please check (if possible) whether the bug is still present in the latest git developmental code before submitting a bug report. New bugs can be submitted using the Bug Tracking System at http://asymptote.sourceforge.net/ ./asymptote-2.41/runarray.in0000644000175000017500000012767513064427076015760 0ustar norbertnorbert/***** * runarray.in * * Runtime functions for array operations. * *****/ pair => primPair() triple => primTriple() boolarray* => booleanArray() Intarray* => IntArray() Intarray2* => IntArray2() realarray* => realArray() realarray2* => realArray2() pairarray* => pairArray() pairarray2* => pairArray2() triplearray2* => tripleArray2() callableReal* => realRealFunction() #include "array.h" #include "arrayop.h" #include "triple.h" #include "path3.h" #include "Delaunay.h" #include "glrender.h" #ifdef HAVE_LIBFFTW3 #include "fftw++.h" #endif using namespace camp; using namespace vm; namespace run { extern pair zero; } typedef array boolarray; typedef array Intarray; typedef array Intarray2; typedef array realarray; typedef array realarray2; typedef array pairarray; typedef array pairarray2; typedef array triplearray2; using types::booleanArray; using types::IntArray; using types::IntArray2; using types::realArray; using types::realArray2; using types::pairArray; using types::pairArray2; using types::tripleArray2; typedef callable callableReal; void outOfBounds(const char *op, size_t len, Int n) { ostringstream buf; buf << op << " array of length " << len << " with out-of-bounds index " << n; error(buf); } inline item& arrayRead(array *a, Int n) { size_t len=checkArray(a); bool cyclic=a->cyclic(); if(cyclic && len > 0) n=imod(n,len); else if(n < 0 || n >= (Int) len) outOfBounds("reading",len,n); return (*a)[(unsigned) n]; } // Helper function to create deep arrays. static array* deepArray(Int depth, Int *dims) { assert(depth > 0); if (depth == 1) { return new array(dims[0]); } else { Int length = dims[0]; depth--; dims++; array *a = new array(length); for (Int index = 0; index < length; index++) { (*a)[index] = deepArray(depth, dims); } return a; } } namespace run { array *Identity(Int n) { size_t N=(size_t) n; array *c=new array(N); for(size_t i=0; i < N; ++i) { array *ci=new array(N); (*c)[i]=ci; for(size_t j=0; j < N; ++j) (*ci)[j]=0.0; (*ci)[i]=1.0; } return c; } } static const char *incommensurate="Incommensurate matrices"; static const char *singular="Singular matrix"; static const char *invalidarraylength="Invalid array length: "; static size_t *pivot,*Row,*Col; bound_double *bounddouble(int N) { if(N == 16) return bound; if(N == 10) return boundtri; ostringstream buf; buf << invalidarraylength << " " << N; error(buf); return NULL; } bound_triple *boundtriple(int N) { if(N == 16) return bound; if(N == 10) return boundtri; ostringstream buf; buf << invalidarraylength << " " << N; error(buf); return NULL; } static inline void inverseAllocate(size_t n) { pivot=new size_t[n]; Row=new size_t[n]; Col=new size_t[n]; } static inline void inverseDeallocate() { delete[] pivot; delete[] Row; delete[] Col; } namespace run { array *copyArray(array *a) { size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; i++) (*c)[i]=(*a)[i]; return c; } array *copyArray2(array *a) { size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; i++) { array *ai=read(a,i); size_t aisize=checkArray(ai); array *ci=new array(aisize); (*c)[i]=ci; for(size_t j=0; j < aisize; j++) (*ci)[j]=(*ai)[j]; } return c; } double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement) { size_t n=checkArray(a); N=0; for(size_t i=0; i < n; i++) N += checkArray(read(a,i)); double *A=(placement == NoGC) ? new double [3*N] : new(placement) double[3*N]; double *p=A; for(size_t i=0; i < n; i++) { array *ai=read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; j++) { triple v=read(ai,j); *p=v.getx(); *(p+N)=v.gety(); *(p+2*N)=v.getz(); ++p; } } return A; } triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement) { size_t n=checkArray(a); N=0; for(size_t i=0; i < n; i++) N += checkArray(read(a,i)); triple *A=(placement == NoGC) ? new triple [N] : new(placement) triple[N]; triple *p=A; for(size_t i=0; i < n; i++) { array *ai=read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; j++) *(p++)=read(ai,j); } return A; } triple operator *(const array& t, const triple& v) { size_t n=checkArray(&t); if(n != 4) error(incommensurate); array *t0=read(t,0); array *t1=read(t,1); array *t2=read(t,2); array *t3=read(t,3); if(checkArray(t0) != 4 || checkArray(t1) != 4 || checkArray(t2) != 4 || checkArray(t3) != 4) error(incommensurate); double x=v.getx(); double y=v.gety(); double z=v.getz(); double f=read(t3,0)*x+read(t3,1)*y+read(t3,2)*z+ read(t3,3); if(f == 0.0) run::dividebyzero(); f=1.0/f; return triple((read(t0,0)*x+read(t0,1)*y+read(t0,2)*z+ read(t0,3))*f, (read(t1,0)*x+read(t1,1)*y+read(t1,2)*z+ read(t1,3))*f, (read(t2,0)*x+read(t2,1)*y+read(t2,2)*z+ read(t2,3))*f); } template array *mult(array *a, array *b) { size_t n=checkArray(a); size_t nb=checkArray(b); size_t na0=n == 0 ? 0 : checkArray(read(a,0)); if(na0 != nb) error(incommensurate); size_t nb0=nb == 0 ? 0 : checkArray(read(b,0)); array *c=new array(n); T *A,*B; copyArray2C(A,a,false); copyArray2C(B,b,false); for(size_t i=0; i < n; ++i) { T *Ai=A+i*nb; array *ci=new array(nb0); (*c)[i]=ci; for(size_t j=0; j < nb0; ++j) { T sum=T(); size_t kj=j; for(size_t k=0; k < nb; ++k, kj += nb0) sum += Ai[k]*B[kj]; (*ci)[j]=sum; } } delete[] B; delete[] A; return c; } // Compute transpose(A)*A where A is an n x m matrix. template array *AtA(array *a) { size_t n=checkArray(a); size_t m=n == 0 ? 0 : checkArray(read(a,0)); array *c=new array(m); T *A; copyArray2C(A,a,false); for(size_t i=0; i < m; ++i) { array *ci=new array(m); (*c)[i]=ci; for(size_t j=0; j < m; ++j) { T sum=T(); size_t kj=j; size_t ki=i; for(size_t k=0; k < n; ++k, kj += m, ki += m) sum += A[ki]*A[kj]; (*ci)[j]=sum; } } delete[] A; return c; } double norm(double *a, size_t n) { if(n == 0) return 0.0; double M=fabs(a[0]); for(size_t i=1; i < n; ++i) M=::max(M,fabs(a[i])); return M; } double norm(triple *a, size_t n) { if(n == 0) return 0.0; double M=a[0].abs2(); for(size_t i=1; i < n; ++i) M=::max(M,a[i].abs2()); return sqrt(M); } // Transpose an n x n matrix in place. void transpose(double *a, size_t n) { for(size_t i=1; i < n; i++) { for(size_t j=0; j < i; j++) { size_t ij=n*i+j; size_t ji=n*j+i; double temp=a[ij]; a[ij]=a[ji]; a[ji]=temp; } } } // Invert an n x n array in place. void inverse(double *a, size_t n) { inverseAllocate(n); for(size_t i=0; i < n; i++) pivot[i]=0; size_t col=0, row=0; // This is the main loop over the columns to be reduced. for(size_t i=0; i < n; i++) { real big=0.0; // This is the outer loop of the search for a pivot element. for(size_t j=0; j < n; j++) { double *aj=a+n*j; if(pivot[j] != 1) { for(size_t k=0; k < n; k++) { if(pivot[k] == 0) { real temp=fabs(aj[k]); if(temp >= big) { big=temp; row=j; col=k; } } else if(pivot[k] > 1) { inverseDeallocate(); error(singular); } } } } ++(pivot[col]); // Interchange rows, if needed, to put the pivot element on the diagonal. double *acol=a+n*col; if(row != col) { double *arow=a+n*row; for(size_t k=0; k < n; k++) { real temp=arow[k]; arow[k]=acol[k]; acol[k]=temp; } } Row[i]=row; Col[i]=col; // Divide the pivot row by the pivot element. real denom=acol[col]; if(denom == 0.0) { inverseDeallocate(); error(singular); } real pivinv=1.0/denom; acol[col]=1.0; for(size_t k=0; k < n; k++) acol[k]=acol[k]*pivinv; // Reduce all rows except for the pivoted one. for(size_t k=0; k < n; k++) { if(k != col) { double *ak=a+n*k; real akcol=ak[col]; ak[col]=0.0; for(size_t j=0; j < n; j++) ak[j] -= acol[j]*akcol; } } } // Unscramble the inverse matrix in view of the column interchanges. for(size_t k=n; k > 0;) { k--; size_t r=Row[k]; size_t c=Col[k]; if(r != c) { for(size_t j=0; j < n; j++) { double *aj=a+n*j; real temp=aj[r]; aj[r]=aj[c]; aj[c]=temp; } } } inverseDeallocate(); } } callable *Func; stack *FuncStack; double wrapFunction(double x) { FuncStack->push(x); Func->call(FuncStack); return pop(FuncStack); } callable *compareFunc; bool compareFunction(const vm::item& i, const vm::item& j) { FuncStack->push(i); FuncStack->push(j); compareFunc->call(FuncStack); return pop(FuncStack); } // Crout's algorithm for computing the LU decomposition of a square matrix. // cf. routine ludcmp (Press et al., Numerical Recipes, 1991). Int LUdecompose(double *a, size_t n, size_t* index, bool warn=true) { double *vv=new double[n]; Int swap=1; for(size_t i=0; i < n; ++i) { double big=0.0; double *ai=a+i*n; for(size_t j=0; j < n; ++j) { double temp=fabs(ai[j]); if(temp > big) big=temp; } if(big == 0.0) { delete[] vv; if(warn) error(singular); else return 0; } vv[i]=1.0/big; } for(size_t j=0; j < n; ++j) { for(size_t i=0; i < j; ++i) { double *ai=a+i*n; double sum=ai[j]; for(size_t k=0; k < i; ++k) { sum -= ai[k]*a[k*n+j]; } ai[j]=sum; } double big=0.0; size_t imax=j; for(size_t i=j; i < n; ++i) { double *ai=a+i*n; double sum=ai[j]; for(size_t k=0; k < j; ++k) sum -= ai[k]*a[k*n+j]; ai[j]=sum; double temp=vv[i]*fabs(sum); if(temp >= big) { big=temp; imax=i; } } double *aj=a+j*n; double *aimax=a+imax*n; if(j != imax) { for(size_t k=0; k < n; ++k) { double temp=aimax[k]; aimax[k]=aj[k]; aj[k]=temp; } swap *= -1; vv[imax]=vv[j]; } if(index) index[j]=imax; if(j != n) { double denom=aj[j]; if(denom == 0.0) { delete[] vv; if(warn) error(singular); else return 0; } for(size_t i=j+1; i < n; ++i) a[i*n+j] /= denom; } } delete[] vv; return swap; } namespace run { void dividebyzero(size_t i) { ostringstream buf; if(i > 0) buf << "array element " << i << ": "; buf << "Divide by zero"; error(buf); } void integeroverflow(size_t i) { ostringstream buf; if(i > 0) buf << "array element " << i << ": "; buf << "Integer overflow"; error(buf); } } // Autogenerated routines: // Create an empty array. array* :emptyArray() { return new array(0); } // Create a new array (technically a vector). // This array will be multidimensional. First the number of dimensions // is popped off the stack, followed by each dimension in reverse order. // The array itself is technically a one dimensional array of one // dimension arrays and so on. array* :newDeepArray(Int depth) { assert(depth > 0); Int *dims = new Int[depth]; for (Int index = depth-1; index >= 0; index--) { Int i=pop(Stack); if(i < 0) error("cannot create a negative length array"); dims[index]=i; } array *a=deepArray(depth, dims); delete[] dims; return a; } // Creates an array with elements already specified. First, the number // of elements is popped off the stack, followed by each element in // reverse order. array* :newInitializedArray(Int n) { assert(n >= 0); array *a = new array(n); for (Int index = n-1; index >= 0; index--) (*a)[index] = pop(Stack); return a; } // Similar to newInitializedArray, but after the n elements, append another // array to it. array* :newAppendedArray(array* tail, Int n) { assert(n >= 0); array *a = new array(n); for (Int index = n-1; index >= 0; index--) (*a)[index] = pop(Stack); copy(tail->begin(), tail->end(), back_inserter(*a)); return a; } // Produce an array of n deep copies of value. // typeDepth is the true depth of the array determined at compile-time when the // operations for the array type are added. This typeDepth argument is // automatically pushed on the stack and is not visible to the user. array* :copyArrayValue(Int n, item value, Int depth=Int_MAX, Int typeDepth) { if(n < 0) error("cannot create a negative length array"); if(depth < 0) error("cannot copy to a negative depth"); if(depth > typeDepth) depth=typeDepth; return new array((size_t) n, value, depth); } // Deep copy of array. // typeDepth is the true depth of the array determined at compile-time when the // operations for the array type are added. This typeDepth argument is // automatically pushed on the stack and is not visible to the user. array* :copyArray(array *a, Int depth=Int_MAX, Int typeDepth) { if(depth < 0) error("cannot copy to a negative depth"); if(depth > typeDepth) depth=typeDepth; return a->copyToDepth(depth); } // Read an element from an array. Checks for initialization & bounds. item :arrayRead(array *a, Int n) { item& i=arrayRead(a,n); if (i.empty()) { ostringstream buf; buf << "read uninitialized value from array at index " << n; error(buf); } return i; } // Slice a substring from an array. item :arraySliceRead(array *a, Int left, Int right) { checkArray(a); return a->slice(left, right); } // Slice a substring from an array. This implements the cases a[i:] and a[:] // where the endpoint is not given, and assumed to be the length of the array. item :arraySliceReadToEnd(array *a, Int left) { size_t len=checkArray(a); return a->slice(left, (Int)len); } // Read an element from an array of arrays. Check bounds and initialize // as necessary. item :arrayArrayRead(array *a, Int n) { item& i=arrayRead(a,n); if (i.empty()) i=new array(0); return i; } // Write an element to an array. Increase size if necessary. // TODO: Add arrayWriteAndPop item :arrayWrite(array *a, Int n, item value) { size_t len=checkArray(a); bool cyclic=a->cyclic(); if(cyclic && len > 0) n=imod(n,len); else { if(cyclic) outOfBounds("writing cyclic",len,n); if(n < 0) outOfBounds("writing",len,n); if(len <= (size_t) n) a->resize(n+1); } (*a)[n] = value; return value; } array * :arraySliceWrite(array *dest, Int left, Int right, array *src) { checkArray(src); checkArray(dest); dest->setSlice(left, right, src); return src; } array * :arraySliceWriteToEnd(array *dest, Int left, array *src) { checkArray(src); size_t len=checkArray(dest); dest->setSlice(left, (Int) len, src); return src; } // Returns the length of an array. Int :arrayLength(array *a) { return (Int) checkArray(a); } // Returns an array of integers representing the keys of the array. array * :arrayKeys(array *a) { size_t size=checkArray(a); array *keys=new array(); for (size_t i=0; ipush((Int)i); } return keys; } // Return the cyclic flag for an array. bool :arrayCyclicFlag(array *a) { checkArray(a); return a->cyclic(); } bool :arraySetCyclicFlag(bool b, array *a) { checkArray(a); a->cyclic(b); return b; } // Check to see if an array element is initialized. bool :arrayInitializedHelper(Int n, array *a) { size_t len=checkArray(a); bool cyclic=a->cyclic(); if(cyclic && len > 0) n=imod(n,len); else if(n < 0 || n >= (Int) len) return false; item&i=(*a)[(unsigned) n]; return !i.empty(); } // Returns the initialize method for an array. callable* :arrayInitialized(array *a) { return new thunk(new bfunc(arrayInitializedHelper),a); } // The helper function for the cyclic method that sets the cyclic flag. void :arrayCyclicHelper(bool b, array *a) { checkArray(a); a->cyclic(b); } // Set the cyclic flag for an array. callable* :arrayCyclic(array *a) { return new thunk(new bfunc(arrayCyclicHelper),a); } // The helper function for the push method that does the actual operation. item :arrayPushHelper(item x, array *a) { checkArray(a); a->push(x); return x; } // Returns the push method for an array. callable* :arrayPush(array *a) { return new thunk(new bfunc(arrayPushHelper),a); } // The helper function for the append method that appends b to a. void :arrayAppendHelper(array *b, array *a) { checkArray(a); size_t size=checkArray(b); for(size_t i=0; i < size; i++) a->push((*b)[i]); } // Returns the append method for an array. callable* :arrayAppend(array *a) { return new thunk(new bfunc(arrayAppendHelper),a); } // The helper function for the pop method. item :arrayPopHelper(array *a) { size_t asize=checkArray(a); if(asize == 0) error("cannot pop element from empty array"); return a->pop(); } // Returns the pop method for an array. callable* :arrayPop(array *a) { return new thunk(new bfunc(arrayPopHelper),a); } // The helper function for the insert method. item :arrayInsertHelper(Int i, array *x, array *a) { size_t asize=checkArray(a); checkArray(x); if(a->cyclic() && asize > 0) i=imod(i,asize); if(i < 0 || i > (Int) asize) outOfBounds("inserting",asize,i); (*a).insert((*a).begin()+i,(*x).begin(),(*x).end()); } // Returns the insert method for an array. callable* :arrayInsert(array *a) { return new thunk(new bfunc(arrayInsertHelper),a); } // Returns the delete method for an array. callable* :arrayDelete(array *a) { return new thunk(new bfunc(arrayDeleteHelper),a); } bool :arrayAlias(array *a, array *b) { return a==b; } // Return array formed by indexing array a with elements of integer array b array* :arrayIntArray(array *a, array *b) { size_t asize=checkArray(a); size_t bsize=checkArray(b); array *r=new array(bsize); bool cyclic=a->cyclic(); for(size_t i=0; i < bsize; i++) { Int index=read(b,i); if(cyclic && asize > 0) index=imod(index,asize); else if(index < 0 || index >= (Int) asize) outOfBounds("reading",asize,index); (*r)[i]=(*a)[index]; } return r; } // returns the complement of the integer array a in {0,2,...,n-1}, // so that b[complement(a,b.length)] yields the complement of b[a]. Intarray* complement(Intarray *a, Int n) { size_t asize=checkArray(a); array *r=new array(0); bool *keep=new bool[n]; for(Int i=0; i < n; ++i) keep[i]=true; for(size_t i=0; i < asize; ++i) { Int j=read(a,i); if(j >= 0 && j < n) keep[j]=false; } for(Int i=0; i < n; i++) if(keep[i]) r->push(i); delete[] keep; return r; } // Generate the sequence {f(i) : i=0,1,...n-1} given a function f and integer n Intarray* :arraySequence(callable *f, Int n) { if(n < 0) n=0; array *a=new array(n); for(Int i=0; i < n; ++i) { Stack->push(i); f->call(Stack); (*a)[i]=pop(Stack); } return a; } // Return the array {0,1,...n-1} Intarray *sequence(Int n) { if(n < 0) n=0; array *a=new array(n); for(Int i=0; i < n; ++i) { (*a)[i]=i; } return a; } // Apply a function to each element of an array array* :arrayFunction(callable *f, array *a) { size_t size=checkArray(a); array *b=new array(size); for(size_t i=0; i < size; ++i) { Stack->push((*a)[i]); f->call(Stack); (*b)[i]=pop(Stack); } return b; } array* :arraySort(array *a, callable *less) { array *c=copyArray(a); compareFunc=less; FuncStack=Stack; stable_sort(c->begin(),c->end(),compareFunction); return c; } Int :arraySearch(array *a, item key, callable *less) { size_t size=a->size(); compareFunc=less; FuncStack=Stack; if(size == 0 || compareFunction(key,(*a)[0])) return -1; size_t u=size-1; if(!compareFunction(key,(*a)[u])) return Intcast(u); size_t l=0; while (l < u) { size_t i=(l+u)/2; if(compareFunction(key,(*a)[i])) u=i; else if(compareFunction(key,(*a)[i+1])) return Intcast(i); else l=i+1; } return 0; } bool all(boolarray *a) { size_t size=checkArray(a); bool c=true; for(size_t i=0; i < size; i++) if(!get((*a)[i])) {c=false; break;} return c; } boolarray* !(boolarray* a) { size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; i++) (*c)[i]=!read(a,i); return c; } Int sum(boolarray *a) { size_t size=checkArray(a); Int sum=0; for(size_t i=0; i < size; i++) sum += read(a,i) ? 1 : 0; return sum; } array* :arrayConcat(array *a) { // a is an array of arrays to be concatenated together. // The signature is // T[] concat(... T[][] a); size_t numArgs=checkArray(a); size_t resultSize=0; for (size_t i=0; i < numArgs; ++i) { resultSize += checkArray(a->read(i)); } array *result=new array(resultSize); size_t ri=0; for (size_t i=0; i < numArgs; ++i) { array *arg=a->read(i); size_t size=checkArray(arg); for (size_t j=0; j < size; ++j) { (*result)[ri]=(*arg)[j]; ++ri; } } return result; } array* :array2Transpose(array *a) { size_t asize=checkArray(a); array *c=new array(0); for(size_t i=0; i < asize; i++) { size_t ip=i+1; array *ai=read(a,i); size_t aisize=checkArray(ai); size_t csize=checkArray(c); if(csize < aisize) { c->resize(aisize); for(size_t j=csize; j < aisize; j++) { (*c)[j]=new array(ip); } } for(size_t j=0; j < aisize; j++) { array *cj=read(c,j); if(checkArray(cj) < ip) cj->resize(ip); (*cj)[i]=(*ai)[j]; } } return c; } // a is a rectangular 3D array; perm is an Int array indicating the type of // permutation (021 or 120, etc; original is 012). // Transpose by sending respective members to the permutated locations: // return the array obtained by putting a[i][j][k] into position perm{ijk}. array* :array3Transpose(array *a, array *perm) { const size_t DIM=3; if(checkArray(perm) != DIM) { ostringstream buf; buf << "permutation array must have length " << DIM; error(buf); } size_t* size=new size_t[DIM]; for(size_t i=0; i < DIM; ++i) size[i]=DIM; for(size_t i=0; i < DIM; ++i) { Int p=read(perm,i); size_t P=(size_t) p; if(p < 0 || P >= DIM) { ostringstream buf; buf << "permutation index out of range: " << p; error(buf); } size[P]=P; } for(size_t i=0; i < DIM; ++i) if(size[i] == DIM) error("permutation indices must be distinct"); static const char *rectangular= "3D transpose implemented for rectangular matrices only"; size_t isize=size[0]=checkArray(a); array *a0=read(a,0); size[1]=checkArray(a0); array *a00=read(a0,0); size[2]=checkArray(a00); for(size_t i=0; i < isize; i++) { array *ai=read(a,i); size_t jsize=checkArray(ai); if(jsize != size[1]) error(rectangular); for(size_t j=0; j < jsize; j++) { array *aij=read(ai,j); if(checkArray(aij) != size[2]) error(rectangular); } } size_t perm0=(size_t) read(perm,0); size_t perm1=(size_t) read(perm,1); size_t perm2=(size_t) read(perm,2); size_t sizep0=size[perm0]; size_t sizep1=size[perm1]; size_t sizep2=size[perm2]; array *c=new array(sizep0); for(size_t i=0; i < sizep0; ++i) { array *ci=new array(sizep1); (*c)[i]=ci; for(size_t j=0; j < sizep1; ++j) { array *cij=new array(sizep2); (*ci)[j]=cij; } } size_t* i=new size_t[DIM]; for(i[0]=0; i[0] < size[0]; ++i[0]) { array *a0=read(a,i[0]); for(i[1]=0; i[1] < size[1]; ++i[1]) { array *a1=read(a0,i[1]); for(i[2]=0; i[2] < size[2]; ++i[2]) { array *c0=read(c,i[perm0]); array *c1=read(c0,i[perm1]); (*c1)[i[perm2]]=read(a1,i[2]); } } } delete[] i; delete[] size; return c; } // In a boolean array, find the index of the nth true value or -1 if not found // If n is negative, search backwards. Int find(boolarray *a, Int n=1) { size_t size=checkArray(a); Int j=-1; if(n > 0) for(size_t i=0; i < size; i++) if(read(a,i)) { n--; if(n == 0) {j=(Int) i; break;} } if(n < 0) for(size_t i=size; i > 0;) if(read(a,--i)) { n++; if(n == 0) {j=(Int) i; break;} } return j; } // construct vector obtained by replacing those elements of b for which the // corresponding elements of a are false by the corresponding element of c. array* :arrayConditional(array *a, array *b, array *c) { size_t size=checkArray(a); array *r=new array(size); if(b && c) { checkArrays(a,b); checkArrays(b,c); for(size_t i=0; i < size; i++) (*r)[i]=read(a,i) ? (*b)[i] : (*c)[i]; } else { r->clear(); if(b) { checkArrays(a,b); for(size_t i=0; i < size; i++) if(read(a,i)) r->push((*b)[i]); } else if(c) { checkArrays(a,c); for(size_t i=0; i < size; i++) if(!read(a,i)) r->push((*c)[i]); } } return r; } // Return an n x n identity matrix. realarray2 *identity(Int n) { return Identity(n); } // Return the inverse of an n x n matrix a using Gauss-Jordan elimination. realarray2 *inverse(realarray2 *a) { size_t n=checkArray(a); double *A; copyArray2C(A,a,true,0,NoGC); inverse(A,n); a=copyCArray2(n,n,A); delete[] A; return a; } // Solve the linear equation ax=b by LU decomposition, returning the // solution x, where a is an n x n matrix and b is an array of length n. // If no solution exists, return an empty array. realarray *solve(realarray2 *a, realarray *b, bool warn=true) { size_t n=checkArray(a); if(n == 0) return new array(0); size_t m=checkArray(b); if(m != n) error(incommensurate); real *A; copyArray2C(A,a); size_t *index=new size_t[n]; if(LUdecompose(A,n,index,warn) == 0) return new array(0); array *x=new array(n); real *B; copyArrayC(B,b); for(size_t i=0; i < n; ++i) { size_t ip=index[i]; real sum=B[ip]; B[ip]=B[i]; real *Ai=A+i*n; for(size_t j=0; j < i; ++j) sum -= Ai[j]*B[j]; B[i]=sum; } for(size_t i=n; i > 0;) { --i; real sum=B[i]; real *Ai=A+i*n; for(size_t j=i+1; j < n; ++j) sum -= Ai[j]*B[j]; B[i]=sum/Ai[i]; } for(size_t i=0; i < n; ++i) (*x)[i]=B[i]; delete[] index; delete[] B; delete[] A; return x; } // Solve the linear equation ax=b by LU decomposition, returning the // solution x, where a is an n x n matrix and b is an n x m matrix. // If no solution exists, return an empty array. realarray2 *solve(realarray2 *a, realarray2 *b, bool warn=true) { size_t n=checkArray(a); if(n == 0) return new array(0); if(checkArray(b) != n) error(incommensurate); size_t m=checkArray(read(b,0)); real *A,*B; copyArray2C(A,a); copyArray2C(B,b,false); size_t *index=new size_t[n]; if(LUdecompose(A,n,index,warn) == 0) return new array(0); array *x=new array(n); for(size_t i=0; i < n; ++i) { real *Ai=A+i*n; real *Bi=B+i*m; real *Bip=B+index[i]*m; for(size_t k=0; k < m; ++k) { real sum=Bip[k]; Bip[k]=Bi[k]; size_t jk=k; for(size_t j=0; j < i; ++j, jk += m) sum -= Ai[j]*B[jk]; Bi[k]=sum; } } for(size_t i=n; i > 0;) { --i; real *Ai=A+i*n; real *Bi=B+i*m; for(size_t k=0; k < m; ++k) { real sum=Bi[k]; size_t jk=(i+1)*m+k; for(size_t j=i+1; j < n; ++j, jk += m) sum -= Ai[j]*B[jk]; Bi[k]=sum/Ai[i]; } } for(size_t i=0; i < n; ++i) { real *Bi=B+i*m; array *xi=new array(m); (*x)[i]=xi; for(size_t j=0; j < m; ++j) (*xi)[j]=Bi[j]; } delete[] index; delete[] B; delete[] A; return x; } // Compute the determinant of an n x n matrix. real determinant(realarray2 *a) { real *A; copyArray2C(A,a); size_t n=checkArray(a); real det=LUdecompose(A,n,NULL,false); size_t n1=n+1; for(size_t i=0; i < n; ++i) det *= A[i*n1]; delete[] A; return det; } realarray *Operator *(realarray2 *a, realarray *b) { size_t n=checkArray(a); size_t m=checkArray(b); array *c=new array(n); real *B; copyArrayC(B,b); for(size_t i=0; i < n; ++i) { array *ai=read(a,i); if(checkArray(ai) != m) error(incommensurate); real sum=0.0; for(size_t j=0; j < m; ++j) sum += read(ai,j)*B[j]; (*c)[i]=sum; } delete[] B; return c; } realarray *Operator *(realarray *a, realarray2 *b) { size_t n=checkArray(a); if(n != checkArray(b)) error(incommensurate); real *A; copyArrayC(A,a); array **B=new array*[n]; array *bk=read(b,0); B[0]=bk; size_t m=bk->size(); for(size_t k=1; k < n; k++) { array *bk=read(b,k); if(bk->size() != m) error(incommensurate); B[k]=bk; } array *c=new array(m); for(size_t i=0; i < m; ++i) { real sum=0.0; for(size_t k=0; k < n; ++k) sum += A[k]*read(B[k],i); (*c)[i]=sum; } delete[] B; delete[] A; return c; } Intarray2 *Operator *(Intarray2 *a, Intarray2 *b) { return mult(a,b); } realarray2 *Operator *(realarray2 *a, realarray2 *b) { return mult(a,b); } pairarray2 *Operator *(pairarray2 *a, pairarray2 *b) { return mult(a,b); } triple Operator *(realarray2 *t, triple v) { return *t*v; } realarray2 *AtA(realarray2 *a) { return AtA(a); } pair project(triple v, realarray2 *t) { size_t n=checkArray(t); if(n != 4) error(incommensurate); array *t0=read(t,0); array *t1=read(t,1); array *t3=read(t,3); if(checkArray(t0) != 4 || checkArray(t1) != 4 || checkArray(t3) != 4) error(incommensurate); real x=v.getx(); real y=v.gety(); real z=v.getz(); real f=read(t3,0)*x+read(t3,1)*y+read(t3,2)*z+ read(t3,3); if(f == 0.0) dividebyzero(); f=1.0/f; return pair((read(t0,0)*x+read(t0,1)*y+read(t0,2)*z+ read(t0,3))*f, (read(t1,0)*x+read(t1,1)*y+read(t1,2)*z+ read(t1,3))*f); } // Compute the dot product of vectors a and b. real dot(realarray *a, realarray *b) { size_t n=checkArrays(a,b); real sum=0.0; for(size_t i=0; i < n; ++i) sum += read(a,i)*read(b,i); return sum; } // Compute the complex dot product of vectors a and b. pair dot(pairarray *a, pairarray *b) { size_t n=checkArrays(a,b); pair sum=zero; for(size_t i=0; i < n; ++i) sum += read(a,i)*conj(read(b,i)); return sum; } // Solve the problem L\inv f, where f is an n vector and L is the n x n matrix // // [ b[0] c[0] a[0] ] // [ a[1] b[1] c[1] ] // [ a[2] b[2] c[2] ] // [ ... ] // [ c[n-1] a[n-1] b[n-1] ] realarray *tridiagonal(realarray *a, realarray *b, realarray *c, realarray *f) { size_t n=checkArrays(a,b); checkEqual(n,checkArray(c)); checkEqual(n,checkArray(f)); array *up=new array(n); array& u=*up; if(n == 0) return up; // Special case: zero Dirichlet boundary conditions if(read(a,0) == 0.0 && read(c,n-1) == 0.0) { real temp=read(b,0); if(temp == 0.0) dividebyzero(); temp=1.0/temp; real *work=new real[n]; u[0]=read(f,0)*temp; work[0]=-read(c,0)*temp; for(size_t i=1; i < n; i++) { real temp=(read(b,i)+read(a,i)*work[i-1]); if(temp == 0.0) {delete[] work; dividebyzero();} temp=1.0/temp; u[i]=(read(f,i)-read(a,i)*read(u,i-1))*temp; work[i]=-read(c,i)*temp; } for(size_t i=n-1; i >= 1; i--) u[i-1]=read(u,i-1)+work[i-1]*read(u,i); delete[] work; return up; } real binv=read(b,0); if(binv == 0.0) dividebyzero(); binv=1.0/binv; if(n == 1) {u[0]=read(f,0)*binv; return up;} if(n == 2) { real factor=(read(b,0)*read(b,1)- read(a,0)*read(c,1)); if(factor== 0.0) dividebyzero(); factor=1.0/factor; real temp=(read(b,0)*read(f,1)- read(c,1)*read(f,0))*factor; u[0]=(read(b,1)*read(f,0)- read(a,0)*read(f,1))*factor; u[1]=temp; return up; } real *gamma=new real[n-2]; real *delta=new real[n-2]; gamma[0]=read(c,0)*binv; delta[0]=read(a,0)*binv; u[0]=read(f,0)*binv; real beta=read(c,n-1); real fn=read(f,n-1)-beta*read(u,0); real alpha=read(b,n-1)-beta*delta[0]; for(size_t i=1; i <= n-3; i++) { real alphainv=read(b,i)-read(a,i)*gamma[i-1]; if(alphainv == 0.0) {delete[] gamma; delete[] delta; dividebyzero();} alphainv=1.0/alphainv; beta *= -gamma[i-1]; gamma[i]=read(c,i)*alphainv; u[i]=(read(f,i)-read(a,i)*read(u,i-1))*alphainv; fn -= beta*read(u,i); delta[i]=-read(a,i)*delta[i-1]*alphainv; alpha -= beta*delta[i]; } real alphainv=read(b,n-2)-read(a,n-2)*gamma[n-3]; if(alphainv == 0.0) {delete[] gamma; delete[] delta; dividebyzero();} alphainv=1.0/alphainv; u[n-2]=(read(f,n-2)-read(a,n-2)*read(u,n-3)) *alphainv; beta=read(a,n-1)-beta*gamma[n-3]; real dnm1=(read(c,n-2)-read(a,n-2)*delta[n-3])*alphainv; real temp=alpha-beta*dnm1; if(temp == 0.0) {delete[] gamma; delete[] delta; dividebyzero();} u[n-1]=temp=(fn-beta*read(u,n-2))/temp; u[n-2]=read(u,n-2)-dnm1*temp; for(size_t i=n-2; i >= 1; i--) u[i-1]=read(u,i-1)-gamma[i-1]*read(u,i)-delta[i-1]*temp; delete[] delta; delete[] gamma; return up; } // Root solve by Newton-Raphson real newton(Int iterations=100, callableReal *f, callableReal *fprime, real x, bool verbose=false) { static const real fuzz=1000.0*DBL_EPSILON; Int i=0; size_t oldPrec=0; if(verbose) oldPrec=cout.precision(DBL_DIG); real diff=DBL_MAX; real lastdiff; do { real x0=x; Stack->push(x); fprime->call(Stack); real dfdx=pop(Stack); if(dfdx == 0.0) { x=DBL_MAX; break; } Stack->push(x); f->call(Stack); real fx=pop(Stack); x -= fx/dfdx; lastdiff=diff; if(verbose) cout << "Newton-Raphson: " << x << endl; diff=fabs(x-x0); if(++i == iterations) { x=DBL_MAX; break; } } while (diff != 0.0 && (diff < lastdiff || diff > fuzz*fabs(x))); if(verbose) cout.precision(oldPrec); return x; } // Root solve by Newton-Raphson bisection // cf. routine rtsafe (Press et al., Numerical Recipes, 1991). real newton(Int iterations=100, callableReal *f, callableReal *fprime, real x1, real x2, bool verbose=false) { static const real fuzz=1000.0*DBL_EPSILON; size_t oldPrec=0; if(verbose) oldPrec=cout.precision(DBL_DIG); Stack->push(x1); f->call(Stack); real f1=pop(Stack); if(f1 == 0.0) return x1; Stack->push(x2); f->call(Stack); real f2=pop(Stack); if(f2 == 0.0) return x2; if((f1 > 0.0 && f2 > 0.0) || (f1 < 0.0 && f2 < 0.0)) { ostringstream buf; buf << "root not bracketed, f(x1)=" << f1 << ", f(x2)=" << f2 << endl; error(buf); } real x=0.5*(x1+x2); real dxold=fabs(x2-x1); if(f1 > 0.0) { real temp=x1; x1=x2; x2=temp; } if(verbose) cout << "midpoint: " << x << endl; real dx=dxold; Stack->push(x); f->call(Stack); real y=pop(Stack); Stack->push(x); fprime->call(Stack); real dy=pop(Stack); Int j; for(j=0; j < iterations; j++) { if(((x-x2)*dy-y)*((x-x1)*dy-y) >= 0.0 || fabs(2.0*y) > fabs(dxold*dy)) { dxold=dx; dx=0.5*(x2-x1); x=x1+dx; if(verbose) cout << "bisection: " << x << endl; if(x1 == x) return x; } else { dxold=dx; dx=y/dy; real temp=x; x -= dx; if(verbose) cout << "Newton-Raphson: " << x << endl; if(temp == x) return x; } if(fabs(dx) < fuzz*fabs(x)) return x; Stack->push(x); f->call(Stack); y=pop(Stack); Stack->push(x); fprime->call(Stack); dy=pop(Stack); if(y < 0.0) x1=x; else x2=x; } if(verbose) cout.precision(oldPrec); return (j == iterations) ? DBL_MAX : x; } // Find a root for the specified continuous (but not necessarily // differentiable) function. Whatever value t is returned, it is guaranteed // that t is within [a, b] and within tolerance of a sign change. // An error is thrown if fa and fb are both positive or both negative. // // In this implementation, the binary search is interleaved // with a modified version of quadratic interpolation. // This is a C++ port of the Asymptote routine written by Charles Staats III. real _findroot(callableReal *f, real a, real b, real tolerance, real fa, real fb) { if(fa == 0.0) return a; if(fb == 0.0) return b; const char* oppsign="fa and fb must have opposite signs"; int sign; if(fa < 0.0) { if(fb < 0.0) error(oppsign); sign=1; } else { if(fb > 0.0) error(oppsign); fa=-fa; fb=-fb; sign=-1; } real t=a; real ft=fa; real twicetolerance=2.0*tolerance; while(b-a > tolerance) { t=(a+b)*0.5; Stack->push(t); f->call(Stack); ft=sign*pop(Stack); if(ft == 0.0) return t; // If halving the interval already puts us within tolerance, // don't bother with the interpolation step. if(b-a >= twicetolerance) { real factor=1.0/(b-a); real q_A=2.0*(fa-2.0*ft+fb)*factor*factor; real q_B=(fb-fa)*factor; quadraticroots Q=quadraticroots(q_A,q_B,ft); // If the interpolation somehow failed, continue on to the next binary // search step. This may or may not be possible, depending on what // theoretical guarantees are provided by the quadraticroots function. real root; bool found=Q.roots > 0; if(found) { root=t+Q.t1; if(root <= a || root >= b) { if(Q.roots == 1) found=false; else { root=t+Q.t2; if(root <= a || root >= b) found=false; } } } if(found) { if(ft > 0.0) { b=t; fb=ft; } else { a=t; fa=ft; } t=root; // If the interpolated value is close to one edge of // the interval, move it farther away from the edge in // an effort to catch the root in the middle. real margin=(b-a)*1.0e-3; if(t-a < margin) t=a+2.0*(t-a); else if(b-t < margin) t=b-2.0*(b-t); Stack->push(t); f->call(Stack); ft=sign*pop(Stack); if(ft == 0.0) return t; } } if(ft > 0.0) { b=t; fb=ft; } else if(ft < 0.0) { a=t; fa=ft; } } return a-(b-a)/(fb-fa)*fa; } real simpson(callableReal *f, real a, real b, real acc=DBL_EPSILON, real dxmax=0) { real integral; if(dxmax <= 0) dxmax=fabs(b-a); callable *oldFunc=Func; Func=f; FuncStack=Stack; if(!simpson(integral,wrapFunction,a,b,acc,dxmax)) error("nesting capacity exceeded in simpson"); Func=oldFunc; return integral; } // Compute the fast Fourier transform of a pair array pairarray* fft(pairarray *a, Int sign=1) { #ifdef HAVE_LIBFFTW3 unsigned n=(unsigned) checkArray(a); array *c=new array(n); if(n) { Complex *f=utils::ComplexAlign(n); fftwpp::fft1d Forward(n,intcast(sign),f); for(size_t i=0; i < n; i++) { pair z=read(a,i); f[i]=Complex(z.getx(),z.gety()); } Forward.fft(f); for(size_t i=0; i < n; i++) { Complex z=f[i]; (*c)[i]=pair(z.real(),z.imag()); } utils::deleteAlign(f); } #else unused(a); unused(&sign); array *c=new array(0); error("Please install fftw3, run ./configure, and recompile"); #endif // HAVE_LIBFFTW3 return c; } Intarray2 *triangulate(pairarray *z) { size_t nv=checkArray(z); // Call robust version of Gilles Dumoulin's port of Paul Bourke's // triangulation code. XYZ *pxyz=new XYZ[nv+3]; ITRIANGLE *V=new ITRIANGLE[4*nv]; for(size_t i=0; i < nv; ++i) { pair w=read(z,i); pxyz[i].p[0]=w.getx(); pxyz[i].p[1]=w.gety(); pxyz[i].i=(Int) i; } Int ntri; Triangulate((Int) nv,pxyz,V,ntri,true,false); size_t nt=(size_t) ntri; array *t=new array(nt); for(size_t i=0; i < nt; ++i) { array *ti=new array(3); (*t)[i]=ti; ITRIANGLE *Vi=V+i; (*ti)[0]=pxyz[Vi->p1].i; (*ti)[1]=pxyz[Vi->p2].i; (*ti)[2]=pxyz[Vi->p3].i; } delete[] V; delete[] pxyz; return t; } real norm(realarray *a) { size_t n=checkArray(a); real M=0.0; for(size_t i=0; i < n; ++i) { real x=fabs(vm::read(a,i)); if(x > M) M=x; } return M; } real norm(realarray2 *a) { size_t n=checkArray(a); real M=0.0; for(size_t i=0; i < n; ++i) { vm::array *ai=vm::read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; ++j) { real a=fabs(vm::read(ai,j)); if(a > M) M=a; } } return M; } real norm(triplearray2 *a) { size_t n=checkArray(a); real M=0.0; for(size_t i=0; i < n; ++i) { vm::array *ai=vm::read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; ++j) { real a=vm::read(ai,j).abs2(); if(a > M) M=a; } } return sqrt(M); } real change2(triplearray2 *a) { size_t n=checkArray(a); if(n == 0) return 0.0; vm::array *a0=vm::read(a,0); size_t m=checkArray(a0); if(m == 0) return 0.0; triple a00=vm::read(a0,0); real M=0.0; for(size_t i=0; i < n; ++i) { vm::array *ai=vm::read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; ++j) { real a=(vm::read(ai,j)-a00).abs2(); if(a > M) M=a; } } return M; } triple minbezier(triplearray2 *P, triple b) { size_t N; real *A=copyTripleArray2Components(P,N); bound_double *B=bounddouble(N); b=triple(B(A,::min,b.getx(),sqrtFuzz*norm(A,N),maxdepth), B(A+N,::min,b.gety(),sqrtFuzz*norm(A+N,N),maxdepth), B(A+2*N,::min,b.getz(),sqrtFuzz*norm(A+2*N,N),maxdepth)); delete[] A; return b; } triple maxbezier(triplearray2 *P, triple b) { size_t N; real *A=copyTripleArray2Components(P,N); bound_double *B=bounddouble(N); b=triple(B(A,::max,b.getx(),sqrtFuzz*norm(A,N),maxdepth), B(A+N,::max,b.gety(),sqrtFuzz*norm(A+N,N),maxdepth), B(A+2*N,::max,b.getz(),sqrtFuzz*norm(A+2*N,N),maxdepth)); delete[] A; return b; } pair minratio(triplearray2 *P, pair b) { size_t N; triple *A=copyTripleArray2C(P,N); real fuzz=sqrtFuzz*norm(A,N); bound_triple *B=boundtriple(N); b=pair(B(A,::min,xratio,b.getx(),fuzz,maxdepth), B(A,::min,yratio,b.gety(),fuzz,maxdepth)); delete[] A; return b; } pair maxratio(triplearray2 *P, pair b) { size_t N; triple *A=copyTripleArray2C(P,N); bound_triple *B=boundtriple(N); real fuzz=sqrtFuzz*norm(A,N); b=pair(B(A,::max,xratio,b.getx(),fuzz,maxdepth), B(A,::max,yratio,b.gety(),fuzz,maxdepth)); delete[] A; return b; } realarray *_projection() { #ifdef HAVE_GL array *a=new array(14); gl::projection P=gl::camera(); size_t k=0; (*a)[k++]=P.orthographic ? 1.0 : 0.0; triple camera=P.camera; (*a)[k++]=camera.getx(); (*a)[k++]=camera.gety(); (*a)[k++]=camera.getz(); triple up=P.up; (*a)[k++]=up.getx(); (*a)[k++]=up.gety(); (*a)[k++]=up.getz(); triple target=P.target; (*a)[k++]=target.getx(); (*a)[k++]=target.gety(); (*a)[k++]=target.getz(); (*a)[k++]=P.zoom; (*a)[k++]=P.angle; (*a)[k++]=P.viewportshift.getx(); (*a)[k++]=P.viewportshift.gety(); #endif return new array(0); } ./asymptote-2.41/exp.cc0000644000175000017500000010117613064427076014654 0ustar norbertnorbert/***** * exp.cc * andy hammerlindl 2002/8/19 * * represents the abstract syntax tree for the expressions in the * language. this is translated into virtual machine code using trans() * and with the aid of the environment class. *****/ #include "exp.h" #include "errormsg.h" #include "runtime.h" #include "runmath.h" #include "runpicture.h" #include "runarray.h" #include "runpair.h" #include "runtriple.h" #include "runpath.h" #include "coenv.h" #include "application.h" #include "dec.h" #include "stm.h" #include "inst.h" #include "opsymbols.h" namespace absyntax { using namespace types; using namespace trans; using vm::inst; using mem::vector; #if 0 void exp::prettyprint(ostream &out, Int indent) { prettyname(out, "exp",indent); } #endif void exp::transAsType(coenv &e, types::ty *target) { types::ty *t=trans(e); assert(t->kind==ty_error || equivalent(t,target)); } void exp::transToType(coenv &e, types::ty *target) { types::ty *ct=cgetType(e); if (equivalent(target, ct)) { transAsType(e, target); return; } // See if the cast can be handled by the fastLookupCast method, which does // less memory allocation. if (ct->kind != ty_overloaded && ct->kind != ty_error && target->kind != ty_error) { access *a = e.e.fastLookupCast(target, ct); if (a) { transAsType(e, ct); a->encode(CALL, getPos(), e.c); return; } } types::ty *source = e.e.castSource(target, ct, symbol::castsym); if (source==0) { if (target->kind != ty_error) { types::ty *sources=cgetType(e); em.error(getPos()); em << "cannot cast "; if (sources->kind==ty_overloaded) em << "expression"; else em << "'" << *sources << "'"; em << " to '" << *target << "'"; } } else if (source->kind==ty_overloaded) { if (target->kind != ty_error) { em.error(getPos()); em << "expression is ambiguous in cast to '" << *target << "'"; } } else { transAsType(e, source); e.implicitCast(getPos(), target, source); } } void exp::testCachedType(coenv &e) { if (ct != 0) { types::ty *t = getType(e); if (!equivalent(t, ct)) { em.compiler(getPos()); em << "cached type '" << *ct << "' doesn't match actual type '" << *t << "'"; em.sync(); } } } void exp::transCall(coenv &e, types::ty *target) { transAsType(e, target); e.c.encode(inst::popcall); } void exp::transConditionalJump(coenv &e, bool cond, label dest) { transToType(e, primBoolean()); e.c.useLabel(cond ? inst::cjmp : inst::njmp, dest); } exp *exp::evaluate(coenv &e, types::ty *target) { return new tempExp(e, this, target); } tempExp::tempExp(coenv &e, varinit *v, types::ty *t) : exp(v->getPos()), a(e.c.allocLocal()), t(t) { v->transToType(e, t); a->encode(WRITE, getPos(), e.c); e.c.encodePop(); } void tempExp::prettyprint(ostream &out, Int indent) { prettyname(out, "tempExp", indent); } types::ty *tempExp::trans(coenv &e) { a->encode(READ, getPos(), e.c); return t; } varEntryExp::varEntryExp(position pos, types::ty *t, access *a) : exp(pos), v(new trans::varEntry(t, a, 0, position())) {} varEntryExp::varEntryExp(position pos, types::ty *t, vm::bltin f) : exp(pos), v(new trans::varEntry(t, new bltinAccess(f), 0, position())) {} void varEntryExp::prettyprint(ostream &out, Int indent) { prettyname(out, "varEntryExp", indent); } types::ty *varEntryExp::getType(coenv &) { return v->getType(); } types::ty *varEntryExp::trans(coenv &e) { v->encode(READ, getPos(), e.c); return getType(e); } trans::varEntry *varEntryExp::getCallee(coenv &e, types::signature *sig) { return equivalent(sig, v->getType()->getSignature()) ? v : 0; } void varEntryExp::transAct(action act, coenv &e, types::ty *target) { assert(equivalent(getType(e),target)); v->encode(act, getPos(), e.c); } void varEntryExp::transAsType(coenv &e, types::ty *target) { transAct(READ, e, target); } void varEntryExp::transWrite(coenv &e, types::ty *target, exp *value) { value->transToType(e, target); transAct(WRITE, e, target); } void varEntryExp::transCall(coenv &e, types::ty *target) { transAct(CALL, e, target); } void nameExp::prettyprint(ostream &out, Int indent) { prettyname(out, "nameExp",indent); value->prettyprint(out, indent+1); } void fieldExp::pseudoName::prettyprint(ostream &out, Int indent) { // This should never be called. prettyindent(out, indent); out << "pseudoName" << "\n"; object->prettyprint(out, indent+1); } void fieldExp::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "fieldExp '" << field << "'\n"; object->prettyprint(out, indent+1); } types::ty *fieldExp::getObject(coenv& e) { types::ty *t = object->cgetType(e); if (t->kind == ty_overloaded) { t=((overloaded *)t)->signatureless(); if(!t) return primError(); } return t; } array *arrayExp::getArrayType(coenv &e) { types::ty *a = set->cgetType(e); if (a->kind == ty_overloaded) { a = ((overloaded *)a)->signatureless(); if (!a) return 0; } switch (a->kind) { case ty_array: return (array *)a; case ty_error: return 0; default: return 0; } } array *arrayExp::transArray(coenv &e) { types::ty *a = set->cgetType(e); if (a->kind == ty_overloaded) { a = ((overloaded *)a)->signatureless(); if (!a) { em.error(set->getPos()); em << "expression is not an array"; return 0; } } set->transAsType(e, a); switch (a->kind) { case ty_array: return (array *)a; case ty_error: return 0; default: em.error(set->getPos()); em << "expression is not an array"; return 0; } } // Checks if the expression can be translated as an array. bool isAnArray(coenv &e, exp *x) { types::ty *t=x->cgetType(e); if (t->kind == ty_overloaded) t=dynamic_cast(t)->signatureless(); return t && t->kind==ty_array; } void subscriptExp::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "subscriptExp\n"; set->prettyprint(out, indent+1); index->prettyprint(out, indent+1); } types::ty *subscriptExp::trans(coenv &e) { array *a = transArray(e); if (!a) return primError(); if (isAnArray(e, index)) { index->transToType(e, types::IntArray()); e.c.encode(inst::builtin, run::arrayIntArray); return getArrayType(e); } else { index->transToType(e, types::primInt()); e.c.encode(inst::builtin, a->celltype->kind==ty_array ? run::arrayArrayRead : run::arrayRead); return a->celltype; } } types::ty *subscriptExp::getType(coenv &e) { array *a = getArrayType(e); return a ? (isAnArray(e, index) ? a : a->celltype) : primError(); } void subscriptExp::transWrite(coenv &e, types::ty *t, exp *value) { // Put array, index, and value on the stack in that order, then call // arrayWrite. array *a = transArray(e); if (!a) return; if (!equivalent(a->celltype, t)) { em.error(getPos()); em << "array expression cannot be used as an address"; // Translate the value for errors. value->transToType(e, t); return; } index->transToType(e, types::primInt()); value->transToType(e, t); e.c.encode(inst::builtin, run::arrayWrite); } void slice::prettyprint(ostream &out, Int indent) { prettyname(out, "slice", indent); if (left) left->prettyprint(out, indent+1); else prettyname(out, "left omitted", indent+1); if (right) right->prettyprint(out, indent+1); else prettyname(out, "right omitted", indent+1); } void slice::trans(coenv &e) { if (left) left->transToType(e, types::primInt()); else // If the left index is omitted it can be assumed to be zero. e.c.encode(inst::intpush, (Int)0); if (right) right->transToType(e, types::primInt()); } void sliceExp::prettyprint(ostream &out, Int indent) { prettyname(out, "sliceExp", indent); set->prettyprint(out, indent+1); index->prettyprint(out, indent+1); } types::ty *sliceExp::trans(coenv &e) { array *a = transArray(e); if (!a) return primError(); index->trans(e); e.c.encode(inst::builtin, index->getRight() ? run::arraySliceRead : run::arraySliceReadToEnd); return a; } types::ty *sliceExp::getType(coenv &e) { array *a = getArrayType(e); return a ? a : primError(); } void sliceExp::transWrite(coenv &e, types::ty *t, exp *value) { array *a = transArray(e); if (!a) return; assert(equivalent(a, t)); index->trans(e); value->transToType(e, t); e.c.encode(inst::builtin, index->getRight() ? run::arraySliceWrite : run::arraySliceWriteToEnd); } void thisExp::prettyprint(ostream &out, Int indent) { prettyname(out, "thisExp", indent); } types::ty *thisExp::trans(coenv &e) { if (!e.c.encodeThis()) { em.error(getPos()); em << "static use of 'this' expression"; } return cgetType(e); } types::ty *thisExp::getType(coenv &e) { return e.c.thisType(); } void equalityExp::prettyprint(ostream &out, Int indent) { prettyname(out, "equalityExp", indent); callExp::prettyprint(out, indent+1); } types::ty *equalityExp::getType(coenv &e) { // Try to the resolve the expression as a function call first. types::ty *t = callExp::getType(e); assert(t); if (t->kind != ty_error) return t; else // Either an error or handled by the function equality methods. In the // first case, we may return whatever we like, and the second case always // returns bool. In either case, it is safe to return bool. return primBoolean(); } // From a possibly overloaded type, if there is a unique function type, return // it, otherwise 0. types::ty *uniqueFunction(types::ty *t) { if (t->kind == types::ty_function) return t; if (t->isOverloaded()) { types::ty *ft = 0; for (ty_iterator i = t->begin(); i != t->end(); ++i) { if ((*i)->kind != types::ty_function) continue; if (ft) { // Multiple function types. return 0; } ft = *i; } return ft; } // Not a function. return 0; } // From two possibly overloaded types, if there is a unique function type // common to both, return it, otherwise 0. types::ty *uniqueFunction(types::ty *t1, types::ty *t2) { if (t1->kind == types::ty_function) return equivalent(t1, t2) ? t1 : 0; if (t1->isOverloaded()) { types::ty *ft = 0; for (ty_iterator i = t1->begin(); i != t1->end(); ++i) { if ((*i)->kind != types::ty_function) continue; if (!equivalent(*i, t2)) continue; if (ft) { // Multiple function types. return 0; } ft = *i; } return ft; } // Not a function. return 0; } bltin bltinFromName(symbol name) { if (name == SYM_EQ) return run::boolFuncEq; assert(name == SYM_NEQ); return run::boolFuncNeq; } types::ty *equalityExp::trans(coenv &e) { // First, try to handle by normal function resolution. types::ty *t = callExp::getType(e); assert(t); if (t->kind != ty_error) return callExp::trans(e); // Then, check for the function equality case. exp *left = (*this->args)[0].val; exp *right = (*this->args)[1].val; types::ty *lt = left->getType(e); types::ty *rt = right->getType(e); // TODO: decide what null == null should do. // Check for function == null and null == function types::ty *ft = 0; if (rt->kind == types::ty_null) ft = uniqueFunction(lt); else if (lt->kind == types::ty_null) ft = uniqueFunction(rt); else ft = uniqueFunction(lt, rt); if (ft) { assert(ft->kind == ty_function); left->transToType(e, ft); right->transToType(e, ft); e.c.encode(inst::builtin, bltinFromName(callee->getName())); return primBoolean(); } else { // Let callExp report a "no such function" error. types::ty *t = callExp::trans(e); assert(t->kind == ty_error); return t; } } void scaleExp::prettyprint(ostream &out, Int indent) { exp *left=getLeft(); exp *right=getRight(); prettyname(out, "scaleExp",indent); left->prettyprint(out, indent+1); right->prettyprint(out, indent+1); } types::ty *scaleExp::trans(coenv &e) { exp *left=getLeft(); exp *right=getRight(); types::ty *lt = left->cgetType(e); if (lt->kind != types::ty_Int && lt->kind != types::ty_real) { if (lt->kind != types::ty_error) { em.error(left->getPos()); em << "only numeric constants can do implicit scaling"; } right->trans(e); return types::primError(); } if (!right->scalable()) { em.warning(right->getPos()); em << "implicit scaling may be unintentional"; } // Defer to the binaryExp for multiplication. return binaryExp::trans(e); } void intExp::prettyprint(ostream &out, Int indent) { prettyindent(out,indent); out << "intExp: " << value << "\n"; } types::ty *intExp::trans(coenv &e) { e.c.encode(inst::intpush,value); return types::primInt(); } void realExp::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "realExp: " << value << "\n"; } types::ty *realExp::trans(coenv &e) { e.c.encode(inst::constpush,(item)value); return types::primReal(); } void stringExp::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "stringExp '" << str << "'\n"; } types::ty *stringExp::trans(coenv &e) { e.c.encode(inst::constpush,(item) string(str)); return types::primString(); } void booleanExp::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "booleanExp: " << value << "\n"; } types::ty *booleanExp::trans(coenv &e) { e.c.encode(inst::constpush,(item)value); return types::primBoolean(); } void newPictureExp::prettyprint(ostream &out, Int indent) { prettyname(out, "newPictureExp",indent); } types::ty *newPictureExp::trans(coenv &e) { e.c.encode(inst::builtin, run::newPicture); return types::primPicture(); } void cycleExp::prettyprint(ostream &out, Int indent) { prettyname(out, "cycleExp",indent); } types::ty *cycleExp::trans(coenv &e) { e.c.encode(inst::builtin, run::newCycleToken); return types::primCycleToken(); } void nullPathExp::prettyprint(ostream &out, Int indent) { prettyname(out, "nullPathExp",indent); } types::ty *nullPathExp::trans(coenv &e) { e.c.encode(inst::builtin, run::nullPath); return types::primPath(); } void nullExp::prettyprint(ostream &out, Int indent) { prettyname(out, "nullExp",indent); } types::ty *nullExp::trans(coenv &) { // Things get put on the stack when ty_null // is cast to an appropriate type return types::primNull(); } void quoteExp::prettyprint(ostream &out, Int indent) { prettyname(out, "quoteExp", indent); value->prettyprint(out, indent+1); } types::ty *quoteExp::trans(coenv &e) { e.c.encode(inst::constpush,(item)value); return types::primCode(); } void explist::prettyprint(ostream &out, Int indent) { prettyname(out, "explist",indent); for (expvector::iterator p = exps.begin(); p != exps.end(); ++p) (*p)->prettyprint(out, indent+1); } void argument::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "explist"; if (name) out << " '" << name << "'"; out << '\n'; val->prettyprint(out, indent+1); } void arglist::prettyprint(ostream &out, Int indent) { prettyname(out, "arglist",indent); for (argvector::iterator p = args.begin(); p != args.end(); ++p) p->prettyprint(out, indent+1); } void callExp::prettyprint(ostream &out, Int indent) { prettyname(out, "callExp",indent); callee->prettyprint(out, indent+1); args->prettyprint(out, indent+1); } signature *callExp::argTypes(coenv &e, bool *searchable) { signature *source=new signature; // The signature is searchable unless one of the arguments is overloaded or // named. *searchable = true; size_t n = args->size(); for (size_t i = 0; i < n; i++) { argument a=(*args)[i]; types::ty *t = a.val->cgetType(e); if (t->kind == types::ty_error) return 0; if (t->kind == types::ty_overloaded || a.name) *searchable = false; source->add(types::formal(t,a.name)); } if (args->rest.val) { argument a=args->rest; types::ty *t = a.val->cgetType(e); if (t->kind == types::ty_error) return 0; if (t->kind == types::ty_overloaded || a.name) *searchable = false; source->addRest(types::formal(t,a.name)); } return source; } application *callExp::resolve(coenv &e, overloaded *o, signature *source, bool tacit) { app_list l=multimatch(e.e, o, source, *args); if (l.empty()) { //cerr << "l is empty\n"; if (!tacit) { em.error(getPos()); symbol s = callee->getName(); if (s) em << "no matching function \'" << s; else em << "no matching function for signature \'"; em << *source << "\'"; } return 0; } else if (l.size() > 1) { // This may take O(n) time. //cerr << "l is full\n"; if (!tacit) { em.error(getPos()); symbol s = callee->getName(); if(s) em << "call of function \'" << s; else em << "call with signature \'"; em << *source << "\' is ambiguous"; } return 0; } else { //cerr << "l is singleton\n"; return l.front(); } } bool hasNamedParameters(signature *sig) { for (size_t i=0; i < sig->getNumFormals(); ++i) if (sig->getFormal(i).name) return true; return false; } void callExp::reportMismatch(function *ft, signature *source) { symbol s = callee->getName(); const char *separator=ft->getSignature()->getNumFormals() > 1 ? "\n" : " "; em.error(getPos()); em << "cannot call" << separator << "'" << *ft->getResult() << " "; if(s) em << s; em << *ft->getSignature() << "'" << separator; if (ft->getSignature()->isOpen && hasNamedParameters(source)) em << "with named parameters"; else switch(source->getNumFormals()) { case 0: em << "without parameters"; break; case 1: em << "with parameter '" << *source << "'"; break; default: em << "with parameters\n'" << *source << "'"; } } void callExp::reportArgErrors(coenv &e) { // Cycle through the parameters to report all errors. // NOTE: This may report inappropriate ambiguity errors. for (size_t i = 0; i < args->size(); i++) { (*args)[i].val->trans(e); } if (args->rest.val) args->rest.val->trans(e); } void callExp::reportNonFunction() { em.error(getPos()); symbol s = callee->getName(); if (s) em << "\'" << s << "\' is not a function"; else em << "called expression is not a function"; } types::ty *callExp::cacheAppOrVarEntry(coenv &e, bool tacit) { assert(cachedVarEntry == 0 && cachedApp == 0); // First figure out the signature of what we want to call. bool searchable; signature *source=argTypes(e, &searchable); #ifdef DEBUG_GETAPP /* {{{ */ cout << "getApp for "; if (callee->getName()) cout << *callee->getName(); else cout << "unnamed"; cout << " at " << getPos() << endl; cout << "searchable: " << searchable << endl; #endif /* }}} */ if (!source) { return primError(); } // An attempt at speeding up compilation: See if the source arguments match // the (possibly overloaded) function exactly. if (searchable) { varEntry *ve = callee->getCallee(e, source); #ifdef DEBUG_GETAPP cout << "guessed: " << (ve!=0) << endl; #endif if (ve) { cachedVarEntry = ve; #ifndef DEBUG_CACHE // Normally DEBUG_CACHE is not defined and we return here for efficiency // reasons. If DEBUG_CACHE is defined, we instead proceed to resolve // the function by the normal techniques and make sure we get the same // result. return ((function *)ve->getType())->getResult(); #endif } } // Figure out what function types we can call. types::ty *ft = callee->cgetType(e); #ifdef DEBUG_GETAPP string name = callee->getName() ? string(*callee->getName()) : string("unnamed"); if (!callee->getName()) cout << getPos() << endl; #endif switch (ft->kind) { case ty_error: if (!tacit) // Report callee errors. callee->trans(e); break; case ty_function: //cout << "name " << name << endl; cachedApp = application::match(e.e, (function *)ft, source, *args); if (!cachedApp && !tacit) reportMismatch((function *)ft, source); break; case ty_overloaded: { #ifdef DEBUG_GETAPP int size = ((overloaded *)ft)->sub.size(); for (int i = 0; i < size; ++i) cout << "name " << name << endl; #endif cachedApp = resolve(e, (overloaded *)ft, source, tacit); break; } default: if (!tacit) reportNonFunction(); break; } #ifdef DEBUG_GETAPP cout << name << " " << *source << " --> " << *cachedApp->getType()->getSignature() << endl; #endif #if DEBUG_CACHE // Make sure cachedVarEntry is giving us the right function. if (cachedVarEntry) assert(equivalent(cachedVarEntry->getType(), cachedApp->getType())); #endif // getType relies on this method for the type. return cachedApp ? cachedApp->getType()->getResult() : primError(); } types::ty *callExp::transPerfectMatch(coenv &e) { // The varEntry of the callee. (No longer needed after translation.) varEntry *ve = cachedVarEntry; cachedVarEntry = 0; assert(ve); // Translate the arguments in turn. for (size_t i = 0; i < args->size(); ++i) (*args)[i].val->trans(e); if (args->rest.val) args->rest.val->trans(e); // Call the function. ve->encode(CALL, getPos(), e.c); // That's it. Return the return type of the function. return ct ? ct : dynamic_cast(ve->getType())->getResult(); } types::ty *callExp::trans(coenv &e) { if (cachedVarEntry == 0 && cachedApp == 0) cacheAppOrVarEntry(e, false); if (cachedVarEntry) return transPerfectMatch(e); // The cached data is no longer needed after translation, so let it be // garbage collected. application *a = cachedApp; cachedApp=0; if (!a) { reportArgErrors(e); return primError(); } // To simulate left-to-right order of evaluation, produce the // side-effects for the callee. assert(a); function *t=a->getType(); assert(t); exp *temp=callee->evaluate(e, t); // Let the application handle the argument translation. a->transArgs(e); // Translate the call. temp->transCall(e, t); return t->result; } types::ty *callExp::getType(coenv &e) { if (cachedApp) return cachedApp->getType()->getResult(); if (cachedVarEntry) { function *ft = dynamic_cast(cachedVarEntry->getType()); assert(ft); return ft->getResult(); } return cacheAppOrVarEntry(e, true); } bool callExp::resolved(coenv &e) { if (cachedApp == 0 && cachedVarEntry == 0) cacheAppOrVarEntry(e, true); return cachedApp || cachedVarEntry; } void pairExp::prettyprint(ostream &out, Int indent) { prettyname(out, "pairExp",indent); x->prettyprint(out, indent+1); y->prettyprint(out, indent+1); } types::ty *pairExp::trans(coenv &e) { x->transToType(e, types::primReal()); y->transToType(e, types::primReal()); e.c.encode(inst::builtin, run::realRealToPair); return types::primPair(); } void tripleExp::prettyprint(ostream &out, Int indent) { prettyname(out, "tripleExp",indent); x->prettyprint(out, indent+1); y->prettyprint(out, indent+1); z->prettyprint(out, indent+1); } types::ty *tripleExp::trans(coenv &e) { x->transToType(e, types::primReal()); y->transToType(e, types::primReal()); z->transToType(e, types::primReal()); e.c.encode(inst::builtin, run::realRealRealToTriple); return types::primTriple(); } void transformExp::prettyprint(ostream &out, Int indent) { prettyname(out, "transformExp",indent); x->prettyprint(out, indent+1); y->prettyprint(out, indent+1); xx->prettyprint(out, indent+1); xy->prettyprint(out, indent+1); yx->prettyprint(out, indent+1); yy->prettyprint(out, indent+1); } types::ty *transformExp::trans(coenv &e) { x->transToType(e, types::primReal()); y->transToType(e, types::primReal()); xx->transToType(e, types::primReal()); xy->transToType(e, types::primReal()); yx->transToType(e, types::primReal()); yy->transToType(e, types::primReal()); e.c.encode(inst::builtin, run::real6ToTransform); return types::primTransform(); } void castExp::prettyprint(ostream &out, Int indent) { prettyname(out, "castExp",indent); target->prettyprint(out, indent+1); castee->prettyprint(out, indent+1); } types::ty *castExp::tryCast(coenv &e, types::ty *t, types::ty *s, symbol csym) { types::ty *ss=e.e.castSource(t, s, csym); if (ss == 0) { return 0; } if (ss->kind == ty_overloaded) { em.error(getPos()); em << "cast is ambiguous"; return primError(); } else { castee->transAsType(e, ss); access *a=e.e.lookupCast(t, ss, csym); assert(a); a->encode(CALL, getPos(), e.c); return ss; } } types::ty *castExp::trans(coenv &e) { target->addOps(e, (record *)0); types::ty *t=target->trans(e); types::ty *s=castee->cgetType(e); if (!tryCast(e, t, s, symbol::ecastsym)) if (!tryCast(e, t, s, symbol::castsym)) { em.error(getPos()); em << "cannot cast '" << *s << "' to '" << *t << "'"; } return t; } types::ty *castExp::getType(coenv &e) { return target->trans(e, true); } void conditionalExp::prettyprint(ostream &out, Int indent) { prettyname(out, "conditionalExp",indent); test->prettyprint(out, indent+1); onTrue->prettyprint(out, indent+1); onFalse->prettyprint(out, indent+1); } void conditionalExp::baseTransToType(coenv &e, types::ty *target) { test->transToType(e, types::primBoolean()); label tlabel = e.c.fwdLabel(); e.c.useLabel(inst::cjmp,tlabel); onFalse->transToType(e, target); label end = e.c.fwdLabel(); e.c.useLabel(inst::jmp,end); e.c.defLabel(tlabel); onTrue->transToType(e, target); e.c.defLabel(end); } void conditionalExp::transToType(coenv &e, types::ty *target) { if (isAnArray(e, test)) { if (target->kind != ty_array) { em.error(getPos()); em << "cannot cast vectorized conditional to '" << *target << "'"; } test->transToType(e, types::booleanArray()); onTrue->transToType(e, target); onFalse->transToType(e, target); e.c.encode(inst::builtin, run::arrayConditional); } else { baseTransToType(e, target); } } types::ty *promote(coenv &e, types::ty *x, types::ty *y) { struct promoter : public collector { env &e; promoter(env &e) : e(e) {} types::ty *both (types::ty *x, types::ty *y) { overloaded *o=new overloaded; o->add(x); o->add(y); return o; } types::ty *base (types::ty *x, types::ty *y) { if (equivalent(x,y)) return x; else { bool castToFirst=e.castable(x, y, symbol::castsym); bool castToSecond=e.castable(y, x, symbol::castsym); return (castToFirst && castToSecond) ? both(x,y) : castToFirst ? x : castToSecond ? y : 0; } } }; promoter p(e.e); return p.collect(x,y); } types::ty *conditionalExp::trans(coenv &e) { types::ty *tt=onTrue->cgetType(e); types::ty *ft=onFalse->cgetType(e); if (tt->kind==ty_error) return onTrue->trans(e); if (ft->kind==ty_error) return onFalse->trans(e); types::ty *t=promote(e, tt, ft); if (!t) { em.error(getPos()); em << "types in conditional expression do not match"; return primError(); } else if (t->kind == ty_overloaded) { em.error(getPos()); em << "type of conditional expression is ambiguous"; return primError(); } transToType(e,t); return t; } types::ty *conditionalExp::getType(coenv &e) { types::ty *tt=onTrue->cgetType(e); types::ty *ft=onFalse->cgetType(e); if (tt->kind==ty_error || ft->kind==ty_error) return primError(); types::ty *t = promote(e, tt, ft); return t ? t : primError(); } void orExp::prettyprint(ostream &out, Int indent) { prettyname(out, "orExp", indent); left->prettyprint(out, indent+1); right->prettyprint(out, indent+1); } types::ty *orExp::trans(coenv &e) { // a || b // translates into // a ? true : b booleanExp be(pos, true); conditionalExp ce(pos, left, &be, right); ce.baseTransToType(e, primBoolean()); return getType(e); } void orExp::transConditionalJump(coenv &e, bool cond, label dest) { if (cond == true) { left->transConditionalJump(e, true, dest); right->transConditionalJump(e, true, dest); } else { /* cond == false */ label end = e.c.fwdLabel(); left->transConditionalJump(e, true, end); right->transConditionalJump(e, false, dest); e.c.defLabel(end); } } void andExp::prettyprint(ostream &out, Int indent) { prettyname(out, "andExp", indent); left->prettyprint(out, indent+1); right->prettyprint(out, indent+1); } types::ty *andExp::trans(coenv &e) { // a && b // translates into // a ? b : false booleanExp be(pos, false); conditionalExp ce(pos, left, right, &be); ce.baseTransToType(e, primBoolean()); return getType(e); } void andExp::transConditionalJump(coenv &e, bool cond, label dest) { if (cond == true) { label end = e.c.fwdLabel(); left->transConditionalJump(e, false, end); right->transConditionalJump(e, true, dest); e.c.defLabel(end); } else { /* cond == false */ left->transConditionalJump(e, false, dest); right->transConditionalJump(e, false, dest); } } void joinExp::prettyprint(ostream &out, Int indent) { prettyname(out, "joinExp",indent); callee->prettyprint(out, indent+1); args->prettyprint(out, indent+1); } void specExp::prettyprint(ostream &out, Int indent) { prettyindent(out,indent); out << "specExp '" << op << "' " << (s==camp::OUT ? "out" : s==camp::IN ? "in" : "invalid side") << '\n'; arg->prettyprint(out, indent+1); } types::ty *specExp::trans(coenv &e) { intExp ie(getPos(), (Int)s); binaryExp be(getPos(), arg, op, &ie); return be.trans(e); } types::ty *specExp::getType(coenv &e) { intExp ie(getPos(), (Int)s); binaryExp be(getPos(), arg, op, &ie); return be.cgetType(e); } void assignExp::prettyprint(ostream &out, Int indent) { prettyname(out, "assignExp",indent); dest->prettyprint(out, indent+1); value->prettyprint(out, indent+1); } void assignExp::transAsType(coenv &e, types::ty *target) { #if 0 // For left-to-right order, we have to evaluate the side-effects of the // destination first. exp *temp=dest->evaluate(e, target); ultimateValue(temp)->transToType(e, target); temp->transWrite(e, target); #endif // All of the heavy work is handled by transWrite. dest->transWrite(e, target, value); } types::ty *assignExp::trans(coenv &e) { exp *uvalue=ultimateValue(dest); types::ty *lt = dest->cgetType(e), *rt = uvalue->cgetType(e); if (lt->kind == ty_error) return dest->trans(e); if (rt->kind == ty_error) return uvalue->trans(e); types::ty *t = e.e.castTarget(lt, rt, symbol::castsym); if (!t) { em.error(getPos()); em << "cannot convert '" << *rt << "' to '" << *lt << "' in assignment"; return primError(); } else if (t->kind == ty_overloaded) { em.error(getPos()); em << "assignment is ambiguous"; return primError(); } else { transAsType(e, t); return t; } } types::ty *assignExp::getType(coenv &e) { types::ty *lt = dest->cgetType(e), *rt = ultimateValue(dest)->cgetType(e); if (lt->kind==ty_error || rt->kind==ty_error) return primError(); types::ty *t = e.e.castTarget(lt, rt, symbol::castsym); return t ? t : primError(); } void selfExp::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "selfExp '" << op << "'\n"; dest->prettyprint(out, indent+1); value->prettyprint(out, indent+1); } void selfExp::transAsType(coenv &e, types::ty *target) { // Create a temp expression for the destination, so it is not evaluated // twice. exp *temp=dest->evaluate(e, target); temp->transWrite(e, target, ultimateValue(temp)); } void prefixExp::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "prefixExp '" << op << "'\n"; dest->prettyprint(out, indent+1); } types::ty *prefixExp::trans(coenv &e) { // Convert into the operation and the assign. // NOTE: This can cause multiple evaluations. intExp ie(getPos(), 1); selfExp se(getPos(), dest, op, &ie); return se.trans(e); } types::ty *prefixExp::getType(coenv &e) { // Convert into the operation and the assign. intExp ie(getPos(), 1); selfExp se(getPos(), dest, op, &ie); return se.getType(e); } void postfixExp::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "postfixExp '" << op << "'\n"; dest->prettyprint(out, indent+1); } types::ty *postfixExp::trans(coenv &) { em.error(getPos()); em << "postfix expressions are not allowed"; return primError(); } } // namespace absyntax ./asymptote-2.41/runbacktrace.cc0000644000175000017500000000514513064427126016517 0ustar norbertnorbert/***** Autogenerated from runbacktrace.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runbacktrace.in" /***** * backtrace.in * Andy Hammerlindl 2009/07/28 * * Runtime functions for printing garbage collector backtraces. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 11 "runbacktrace.in" // No extra code for .cc file. // Autogenerated routines: #ifndef NOSYM #include "runbacktrace.symbols.h" #endif namespace run { #line 16 "runbacktrace.in" // void generate_random_backtrace(); void gen_runbacktrace0(stack *) { #line 17 "runbacktrace.in" #if defined(USEGC) && defined(GC_DEBUG) && defined(GC_BACKTRACE) GC_generate_random_backtrace(); #else error("generate_random_backtrace() requires ./configure --enable-gc-debug"); #endif } #line 25 "runbacktrace.in" // void print_random_addresses(Int n=1); void gen_runbacktrace1(stack *Stack) { Int n=vm::pop(Stack,1); #line 26 "runbacktrace.in" #if defined(USEGC) && defined(GC_DEBUG) && defined(GC_BACKTRACE) GC_gcollect(); for (Int i=0; i < n; ++i) GC_debug_print_heap_obj_proc(GC_base(GC_generate_random_valid_address())); #else error("print_random_addresses() requires ./configure --enable-gc-debug"); unused(&n); // Avoid unused variable warning message. #endif } } // namespace run namespace trans { void gen_runbacktrace_venv(venv &ve) { #line 16 "runbacktrace.in" addFunc(ve, run::gen_runbacktrace0, primVoid(), SYM(generate_random_backtrace)); #line 25 "runbacktrace.in" addFunc(ve, run::gen_runbacktrace1, primVoid(), SYM(print_random_addresses), formal(primInt(), SYM(n), true, false)); } } // namespace trans ./asymptote-2.41/runtriple.in0000644000175000017500000000524513064427076016125 0ustar norbertnorbert/***** * runtriple.in * * Runtime functions for triple operations. * *****/ triple => primTriple() #include "triple.h" #include "path3.h" using namespace camp; // Autogenerated routines: triple :tripleZero() { static triple zero; return zero; } triple :realRealRealToTriple(real x, real y, real z) { return triple(x,y,z); } real xpart:tripleXPart(triple v) { return v.getx(); } real ypart:tripleYPart(triple v) { return v.gety(); } real zpart:tripleZPart(triple v) { return v.getz(); } triple Operator *(real x, triple v) { return x*v; } triple Operator *(triple v, real x) { return v*x; } triple /(triple v, real x) { return v/x; } real length(triple v) { return v.length(); } real abs(triple v) { return v.length(); } real polar(triple v, bool warn=true) { if(!warn && v.getx() == 0.0 && v.gety() == 0.0 && v.getz() == 0.0) return 0.0; return v.polar(); } real azimuth(triple v, bool warn=true) { if(!warn && v.getx() == 0.0 && v.gety() == 0.0) return 0.0; return v.azimuth(); } real colatitude(triple v, bool warn=true) { if(!warn && v.getx() == 0.0 && v.gety() == 0.0 && v.getz() == 0.0) return 0.0; return degrees(v.polar()); } real latitude(triple v, bool warn=true) { if(!warn && v.getx() == 0.0 && v.gety() == 0.0 && v.getz() == 0.0) return 0.0; return 90.0-degrees(v.polar()); } // Return the longitude of v in [0,360). real longitude(triple v, bool warn=true) { if(!warn && v.getx() == 0.0 && v.gety() == 0.0) return 0.0; return principalBranch(degrees(v.azimuth())); } triple unit(triple v) { return unit(v); } real dot(triple u, triple v) { return dot(u,v); } triple cross(triple u, triple v) { return cross(u,v); } triple dir(explicit triple z) { return unit(z); } triple expi(real polar, real azimuth) { return expi(polar,azimuth); } triple dir(real colatitude, real longitude) { return expi(radians(colatitude),radians(longitude)); } triple realmult(triple u, triple v) { return triple (u.getx()*v.getx(),u.gety()*v.gety(),u.getz()*v.getz()); } // Return the component of vector v perpendicular to a unit vector u. triple perp(triple v, triple u) { return perp(v,u); } triple bezier(triple a, triple b, triple c, triple d, real t) { real onemt=1-t; real onemt2=onemt*onemt; return onemt2*onemt*a+t*(3.0*(onemt2*b+t*onemt*c)+t*t*d); } triple bezierP(triple a, triple b, triple c, triple d, real t) { return 3.0*(t*t*(d-a+3.0*(b-c))+t*(2.0*(a+c)-4.0*b)+b-a); } triple bezierPP(triple a, triple b, triple c, triple d, real t) { return 6.0*(t*(d-a+3.0*(b-c))+a+c-2.0*b); } triple bezierPPP(triple a, triple b, triple c, triple d) { return 6.0*(d-a+3.0*(b-c)); } ./asymptote-2.41/newexp.h0000644000175000017500000000237613064427076015232 0ustar norbertnorbert/***** * newexp.h * Andy Hammerlindl 2003/07/28 * * Handles the abstract syntax for expressions the create new objects, * such as record, array, and function constructors. *****/ #ifndef NEWEXP_H #define NEWEXP_H #include "exp.h" #include "dec.h" #include "fundec.h" #include "entry.h" namespace absyntax { typedef fundef newFunctionExp; class newRecordExp : public exp { ty *result; static bool encodeLevel(position pos, coenv &e, trans::tyEntry *ent); public: newRecordExp(position pos, ty *result) : exp(pos), result(result) {} void prettyprint(ostream &out, Int indent); static types::ty *transFromTyEntry(position pos, coenv &e, trans::tyEntry *ent); types::ty *trans(coenv &e); types::ty *getType(coenv &e); }; class newArrayExp : public exp { ty *celltype; explist *dimexps; dimensions *dims; arrayinit *ai; public: newArrayExp(position pos, ty *celltype, explist *dimexps, dimensions *dims, arrayinit *ai) : exp(pos), celltype(celltype), dimexps(dimexps), dims(dims), ai(ai) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &e); }; } // namespace absyntax #endif ./asymptote-2.41/runtime.symbols.h0000644000175000017500000000444513064427142017067 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(_cputime); ADDSYMBOL(_eval); ADDSYMBOL(a); ADDSYMBOL(abort); ADDSYMBOL(adjust); ADDSYMBOL(angle); ADDSYMBOL(arclength); ADDSYMBOL(assert); ADDSYMBOL(asydir); ADDSYMBOL(atleast); ADDSYMBOL(b); ADDSYMBOL(basealign); ADDSYMBOL(blend); ADDSYMBOL(byte); ADDSYMBOL(c); ADDSYMBOL(cd); ADDSYMBOL(cmyk); ADDSYMBOL(colorless); ADDSYMBOL(colors); ADDSYMBOL(colorspace); ADDSYMBOL(controlSpecifier); ADDSYMBOL(curlSpecifier); ADDSYMBOL(cyclic); ADDSYMBOL(defaultpen); ADDSYMBOL(dirSpecifier); ADDSYMBOL(embedded); ADDSYMBOL(exit); ADDSYMBOL(f); ADDSYMBOL(fillrule); ADDSYMBOL(font); ADDSYMBOL(fontcommand); ADDSYMBOL(fontsize); ADDSYMBOL(g); ADDSYMBOL(gamma); ADDSYMBOL(gray); ADDSYMBOL(hex); ADDSYMBOL(identity); ADDSYMBOL(imports); ADDSYMBOL(interactive); ADDSYMBOL(interactivewrite); ADDSYMBOL(interp); ADDSYMBOL(inverse); ADDSYMBOL(invisible); ADDSYMBOL(isnan); ADDSYMBOL(k); ADDSYMBOL(length); ADDSYMBOL(linecap); ADDSYMBOL(linejoin); ADDSYMBOL(lineskip); ADDSYMBOL(linetype); ADDSYMBOL(linewidth); ADDSYMBOL(list); ADDSYMBOL(locale); ADDSYMBOL(location); ADDSYMBOL(m); ADDSYMBOL(makepen); ADDSYMBOL(max); ADDSYMBOL(microseconds); ADDSYMBOL(min); ADDSYMBOL(miterlimit); ADDSYMBOL(n); ADDSYMBOL(nib); ADDSYMBOL(offset); ADDSYMBOL(opacity); ADDSYMBOL(overwrite); ADDSYMBOL(p); ADDSYMBOL(pattern); ADDSYMBOL(point); ADDSYMBOL(r); ADDSYMBOL(reflect); ADDSYMBOL(resetdefaultpen); ADDSYMBOL(reverse); ADDSYMBOL(rgb); ADDSYMBOL(rotate); ADDSYMBOL(s); ADDSYMBOL(scale); ADDSYMBOL(seconds); ADDSYMBOL(shift); ADDSYMBOL(shiftless); ADDSYMBOL(size); ADDSYMBOL(slant); ADDSYMBOL(sleep); ADDSYMBOL(spec); ADDSYMBOL(system); ADDSYMBOL(t); ADDSYMBOL(tensionSpecifier); ADDSYMBOL(tin); ADDSYMBOL(tok); ADDSYMBOL(tout); ADDSYMBOL(transform); ADDSYMBOL(uptodate); ADDSYMBOL(usleep); ADDSYMBOL(view); ADDSYMBOL(x); ADDSYMBOL(xscale); ADDSYMBOL(y); ADDSYMBOL(yscale); ADDSYMBOL(z); ADDSYMBOL(zin); ADDSYMBOL(zout); ./asymptote-2.41/settings.h0000644000175000017500000000457413064427076015566 0ustar norbertnorbert/***** * settings.h * Andy Hammerlindl 2004/05/10 * * Declares a list of global variables that act as settings in the system. *****/ #ifndef SETTINGS_H #define SETTINGS_H #include #include #include "common.h" #include "pair.h" #include "item.h" namespace types { class record; } namespace camp { void glrenderWrapper(); } namespace gl { extern bool glthread; extern bool initialize; #ifdef HAVE_PTHREAD extern pthread_t mainthread; extern pthread_cond_t initSignal; extern pthread_mutex_t initLock; extern pthread_cond_t readySignal; extern pthread_mutex_t readyLock; void wait(pthread_cond_t& signal, pthread_mutex_t& lock); void endwait(pthread_cond_t& signal, pthread_mutex_t& lock); #endif } namespace settings { extern const char PROGRAM[]; extern const char VERSION[]; extern const char BUGREPORT[]; extern char *argv0; void Warn(const string& s); void noWarn(const string& s); bool warn(const string& s); extern string systemDir; extern string docdir; extern const string dirsep; extern bool safe; bool globalwrite(); extern const string suffix; extern const string guisuffix; extern const string standardprefix; extern string historyname; void SetPageDimensions(); types::record *getSettingsModule(); vm::item& Setting(string name); template inline T getSetting(string name) { return vm::get(Setting(name)); } extern Int verbose; extern bool compact; extern bool gray; extern bool bw; extern bool rgb; extern bool cmyk; bool view(); bool trap(); string outname(); void setOptions(int argc, char *argv[]); // Access the arguments once options have been parsed. int numArgs(); char *getArg(int n); Int getScroll(); extern mode_t mask; bool xe(const string& texengine); bool lua(const string& texengine); bool pdf(const string& texengine); bool latex(const string& texengine); bool context(const string& texengine); string nativeformat(); string defaultformat(); const char *beginlabel(const string& texengine); const char *endlabel(const string& texengine); const char *rawpostscript(const string& texengine); const char *beginpicture(const string& texengine); const char *endpicture(const string& texengine); const char *beginspecial(const string& texengine); const char *endspecial(); string texcommand(); string texprogram(); const double inches=72; const double cm=inches/2.54; } extern const char *REVISION; #endif ./asymptote-2.41/errormsg.cc0000644000175000017500000000333113064427076015712 0ustar norbertnorbert/***** * errormsg.cc * Andy Hammerlindl 2002/06/17 * * Used in all phases of the compiler to give error messages. *****/ #include #include #include "errormsg.h" errorstream em; position nullPos; static nullPosInitializer nullPosInit; bool errorstream::interrupt=false; ostream& operator<< (ostream& out, const position& pos) { if (!pos) return out; out << pos.file->name() << ": "; out << pos.line << "." << pos.column << ": "; return out; } void errorstream::clear() { sync(); anyErrors = anyWarnings = false; } void errorstream::message(position pos, const string& s) { if (floating) out << endl; out << pos << s; floating = true; } void errorstream::compiler(position pos) { message(pos,"compiler: "); anyErrors = true; } void errorstream::compiler() { message(nullPos,"compiler: "); anyErrors = true; } void errorstream::runtime(position pos) { message(pos,"runtime: "); anyErrors = true; } void errorstream::error(position pos) { message(pos,""); anyErrors = true; } void errorstream::warning(position pos, string s) { message(pos,"warning ["+s+"]: "); anyWarnings = true; } void errorstream::warning(position pos) { message(pos,"warning: "); anyWarnings = true; } void errorstream::fatal(position pos) { message(pos,"abort: "); anyErrors = true; } void errorstream::trace(position pos) { static position lastpos; if(!pos || (pos.match(lastpos.filename()) && pos.match(lastpos.Line()))) return; lastpos=pos; message(pos,""); sync(); } void errorstream::cont() { floating = false; } void errorstream::sync() { if (floating) out << endl; floating = false; } void outOfMemory() { cerr << "error: out of memory" << endl; exit(1); } ./asymptote-2.41/drawverbatim.h0000644000175000017500000000237713064427076016414 0ustar norbertnorbert/***** * drawverbatim.h * John Bowman 2003/03/18 * * Add verbatim postscript to picture. *****/ #ifndef DRAWVERBATIM_H #define DRAWVERBATIM_H #include "drawelement.h" namespace camp { enum Language {PostScript,TeX}; class drawVerbatim : public drawElement { private: Language language; string text; bool userbounds; pair min,max; bool havebounds; public: drawVerbatim(Language language, const string& text) : language(language), text(text), userbounds(false), havebounds(false) {} drawVerbatim(Language language, const string& text, pair min, pair max) : language(language), text(text), userbounds(true), min(min), max(max), havebounds(false) {} virtual ~drawVerbatim() {} void bounds(bbox& b, iopipestream& tex, boxvector&, bboxlist&) { if(havebounds) return; havebounds=true; if(language == TeX) tex << text << "%" << newl; if(userbounds) { b += min; b += max; } } bool islabel() { return language == TeX; } bool draw(psfile *out) { if(language == PostScript) out->verbatimline(text); return true; } bool write(texfile *out, const bbox&) { if(language == TeX) out->verbatimline(stripblanklines(text)); return true; } }; } #endif ./asymptote-2.41/ReleaseNotes0000644000175000017500000032610713064407056016064 0ustar norbertnorbertRelease Notes for Version 2.41 The rendering of Bezier patches was improved. Minor improvements were made to perpendicular marks in the geometry package. A perl issue was addressed. Two unwanted temporary files are now removed after TeX processing. EPS output is now supported with all TeX engines. A workaround was implemented for the ImageMagick jpeg black background bug. Release Notes for Version 2.40 A partial workaround for the OpenGL transparency bug was implemented, by presorting transparent triangles of the same material. The examples were updated and a segmentation fault was fixed. Multisample detection, surface rendering, and crack filling algorithms were fixed. The default compilation flags now specify -std=c++11. Release Notes for Version 2.39 A workaround was implemented for the backwards incompatibility in the TeXLive 2016 graphicx package. Empty tick labels in graphs are now avoided. A paletteticks NoTicks option was added. Support for lualatex was improved. Renderers for Bezier patches and curves more efficient than those in the deprecated GLU library were implemented. Release Notes for Version 2.38 An integer division operator # was added. Control points in xasy are now correctly parsed. Longitudinal splitting in the revolution structure of the solids module was fixed. Portability fixes were implemented. The ncurses library is now only required with --enable-readline. A --disable-sigsegv configuration option was added. Release Notes for Version 2.37 The xasy graphical user interface now runs under both Python 2.7 and Python 3. Legacy versions (prior to 9.14) of Ghostscript can be supported by assigning settings.epsdriver="epswrite" (or by setting the environment variable ASYMPTOTE_EPSDRIVER to epswrite). The quiet flag suppresses noninteractive standard output when settings.verbosity <= 1. A progress function was added to the plain_strings module. The smoothcontour3 module was optimized to use Bezier triangles where appropriate, along with a built-in least-squares routine and an improved root finder based on quadratic interpolation. If settings.sysdir is empty, preference is given to a version of kpsewhich in the same directory as the executable for determining the correct sysdir. The handling of degenerate normals of Bezier triangles was fixed. Bugs in forking, integer formatting, dash adjustment, subpaths, and guide reversion were fixed. Version 1.30 of asymptote.sty (auto-generated) and version 0.35 (or later) of media9.sty are now required. Release Notes for Version 2.36 Bezier triangle patches have been implemented in place of degenerate Bezier tensor product patches. Surface rendering was improved. The configuration of the readline and gc libraries was fixed. The asy configuration directory is only created if localhistory=false. Patches are now sorted by projected distance. Animations were fixed by running LaTeX twice. The asy-mode.el headers were updated. Intermittent segmentation faults and floating point exceptions in the OpenGL renderer were fixed. Support for GSL 2.0 was added. A quite nan constant was added. Straight segments are no longer split in bezulate. Segmentation faults in tab completion were fixed. A work around for a clang 3.7.0 compiler bug was implemented. The smoothcontour routine was sped up. Several bugs in the file read routines were fixed. A bug in rest argument signature equivalence was fixed. Threads are no longer used in batch mode, except under MacOS X. A convenience function graphicscale was added for using graphic with the conTeXt tex engine. The splinetype detection for Spline surfaces was fixed. Release Notes for Version 2.35 A work around was implemented for a ghostscript eps2write bug that forces all postscript to the first page, breaking multiple 3D XeLaTeX and ConTeXt labels. Release Notes for Version 2.34 The readability of named pen colors was improved in the documentation. A surface cone(path3 base, triple vertex) routine was added for constructing an approximate cone over an arbitrary base. A test for Ghostscript 9.14 or later was added to the build process. The documentation was updated. A CYGWIN warning message under Windows 8 was fixed. Release Notes for Version 2.33 A work around was implemented for the missing epswrite driver in ghostscript-9.15. Deconstruction is now always done in the C locale. A work around for a unit change in dvisvgm-1.5.3 was implemented. The path arc(pair B, pair A, pair C, real r) function was fixed. The handling of the boolean condition in parametric surfaces was fixed. The default meshlight was changed to nolight so that mesh lines with positive width appear consistent with the default mesh lines. A nonsquare image dimension error was fixed. The definition of the SimpleHead arrowhead was fixed. The zoom/menu button and play option were fixed. An intersect(path, surface) function was implemented. A smoothcontour3 module written by Charles Staats and leminiscate example were added. The inline asymptote.sty option now works with xelatex. An obsolete workaround for an Adobe Reader transparency artifact was removed. An asylatexdir option was added to support the pdflatex -output-directory option. An aligndir option for aligning the picture to an arbitrary point of the page boundary was added. The garbage collector was updated to gc-7.4.2. The documentation was updated. Release Notes for Version 2.32 The libc++ stringstream workaround was also enabled for FreeBSD. The segment(bool[] b) function was fixed. The side(pair,pair,pair) function was renamed to orient(pair,pair,pair) and an error in its documentation was corrected. New functions orient(triple,triple,triple,triple) and insphere(triple,triple,triple,triple,triple) were implemented. A random number generator incompatibility on some platforms was fixed. Support was removed for the obsolete utility texi2dvi4a2ps. Compiler warnings were suppressed. Release Notes for Version 2.31 Hangs in 3D font generation and also in the "none" tex engine were fixed. Release Notes for Version 2.30 Compilation issues were addressed. A workaround for the broken stringstream container in MacOS 10.9 libc++ was implemented. The OpenGL zoom/menu button was fixed. Release Notes for Version 2.29 The TeX bidirectional pipe was overhauled to support the context tex engine again. The luatex and lualatex tex engines were enabled. The inline option used by the asymptote.sty LaTeX package and the inlineimage option used for generating external PRC files were fixed. Portability issues were addressed. Release Notes for Version 2.28 A locale bug that interfered with the 3D PRC camera transformation was fixed. Minimum OpenGL window constraints were removed in favour of the viewportsize variable. The transform(u,v,O) function, which projects onto the plane spanned by u and v through point O, was fixed. Numerical overflow issues in quadraticroots and cubicroots were fixed. The documentation was updated. Release Notes for Version 2.27 Move Adobe transparency workaround to C++ code to allow use of texpreamble again with the pdflatex tex engine. Release Notes for Version 2.26 The xasy graphical user interface now terminates the asy process on exit. The xasy code editor under MSWindows was fixed; the default code editor is now winpad. Degenerate HookHead and SimpleHead arrows were fixed. Portability issues were addressed. Release Notes for Version 2.25 A superfluous play button in rendered 3D images embedded by recent versions of media9 is now suppressed. The contour.asy module was reverted to a previous stable linearized version. A numerical precision issue in makepen was fixed. A routine for drawing braces was added. Deep recursion is now avoided in guide flattening. A workaround for an Adobe Reader transparency artifact was implemented for the pdflatex and xelatex tex engines. Raw PRC output can now be generated with the "-f prc" command-line option. Vector patches are now sorted to work around opacity artifacts in many rendering engines. The xasy code editor now accepts command-line options. Under MSWindows, the ghostscript library is searched for in both the 32 bit and 64 bit registries. The FAQ and documentation were updated. Release Notes for Version 2.24 A segmentation fault in drawSphere was fixed. Recursive calls to simpson are now supported. The explicit libglapi dependency was removed. A latexmkrc example file that shows how to store figures in a subdirectory is now included. Release Notes for Version 2.23 Compilation without the FFTW library is now supported again. Release Notes for Version 2.22 Self-defined unary operators are now allowed. Formatted strings instead of real values are compared in OmitFormat. The segment(bool[]) function was rewritten to use the more efficient segmentlimits(bool[]) call. Unnecessary buffering of surface and path3 data was removed. Portability tweaks were made. References to out-of-date trembling examples were removed. Vertex-colored triangles now work again in Adobe XI. The transformation of normal vectors was fixed. PostScript extend qualifiers were added for axial and radial shading. The TEXMFMAN environment variable is now used to find the TeXLive sysdir. Release Notes for Version 2.21 Explicitly transformed billboard labels now work correctly again. The alignment point of OpenGL billboard labels was fixed. An extend parameter was added to the axes (default true) and axes3 (default false) routines. A history recall bug was fixed. A typo was corrected in the documentation of the Jacobi elliptic functions sncndn. Release Notes for Version 2.20 A work around was implemented for a dvipdfmx bug that prevents the xelatex tex engine from properly embedding PRC objects. Billboard rotation is now disabled for explicitly transformed labels. Release Notes for Version 2.19 Numerical resolution issues with the PRC camera orientation and viewportshift were fixed. The lighting of NURBS surfaces was fixed. The special 8192 strlen NSIS build was now correctly reinstated, with stubs, to prevent the installer from overwriting Windows PATH environment variables > 1023 bytes. Release Notes for Version 2.18 A compilation issue on MacOSX was addressed. Secondary axes pictures now inherit the size of the primary picture, so that the markthin marker works properly. The special 8192 strlen NSIS build was reinstated to prevent the installer from overwriting extremely long Windows PATH environment variables. Release Notes for Version 2.17 A bug with non-square pen function images was fixed. Autoscaled logarithmic axes were fixed. Offscreen and non-offscreen rendering are now supported in a single binary (requiring OSMesa version 8), with settings.offscreen defaulting to false. The media9 LaTeX style file is now used to embed 3D PRC content instead of movie15. Local 3D coordinates are now used. PRC Part names are nolonger generated by default. A bug in bezulate was fixed. A settings.axes3 flag was added to control the visibility of PRC axes. An efficient 3D routine for drawing many triangles, with specified vertices and optional normals or vertex colors, was implemented. Release Notes for Version 2.16 Ticks are no longer autoscaled when the number of major intervals is specified and autoscale is false. Manual tick scaling was fixed. A bug in the palette range was fixed. A division by zero in constructing curved arrows was fixed. A numerical underflow was fixed. A picture bound error was fixed. The current value of currentpen is now always respected in default arguments. A default viewportwidth is no longer imposed for attached images. A routine for computing camera positions was added. The format command is now more consistent with C++ printf formatting. Named arguments can now appear in function calls after rest arguments. The wheel example was improved to support PDF animations. The erase command no longer resets the machine state. Pipes are now used for xasy communication. A new mode parameter to input and output replaces xinput, xoutput, binput, and boutput. The icon directory path for 64-bit MSWindows systems was fixed. Compilation of native CYGWIN binaries is now supported. Release Notes for Version 2.15 A compilation problem under MacOS X was fixed. Release Notes for Version 2.14 Minor problems in the geometry module were fixed. Billboard interaction is now disabled for offscreen rendering. A markthin(path) marker with opacity thinning was implemented. A locale string was added to format(string,int). The copy, map, and sequence functions were generalized to arbitrary depths. Asymptote can now be compiled as a shared library. A tuple operator was added. The draw(revolution) function now defers drawing until the final camera position is known. Nonrendered preview images can now be generated for fitted pictures. String reads from binary files were fixed. An int ascii(string) function and a bool isnan(real) function were implemented. Jacobi elliptic functions were implemented. A quick reference card was added. Compilation and static initialization issues under MacOS X Lion were addressed. Release Notes for Version 2.13 Compilation and installation issues were addressed. Release Notes for Version 2.12 Minor compilation issues were addressed. Release Notes for Version 2.11 A new offscreen (software) 3D rendering option supports rendering on machines that are remote or lack a working video graphics card. Shifted pens now work correctly. The handling of whitespace in word mode file reads was fixed. A transpose argument was added to the pen function image facility, for consistency with the other image functions. The limit calculation of parabola and hyperbola was fixed in the geometry module. Release Notes for Version 2.10 PRC vertex-shading for straight patches was implemented. A general image routine that uses a pen function of two integer parameters was implemented. A 3D pixel routine was added. A temporary expression is now used to avoid side effects in self operators. Keyword-only function arguments were implemented. The sizing routines were recoded. Bugs in drawline and geometry were fixed. The geometry module no longer overloads the built-in circle and ellipse functions. PDF TeX engines are now supported in xasy. Directory prefixes are no longer stripped from .js and .prc file names. The TeXShop instructions were updated. The asymptote.sty LaTeX style file was updated to allow leading spaces before \end{asy} and to introduce a keepAspect keyval option. Segmentation faults were fixed. Unwanted state-dependency was removed from the startTrembling function of the contributed trembling module by introducing a tremble structure (backwards incompatible change); see the example floatingdisk.asy. Release Notes for Version 2.08 Legend markers now work again. Release Notes for Version 2.07 The -P option required by ghostscript 9.00 was added. The limits command now works correctly with reversed axes. The asyinclude command of asymptote.sty was improved so that asy source files do not need to be sent to publishers; the asy extension is now optional. A mktemp function was implemented. Further MSWindows installer problems were addressed. Release Notes for Version 2.06 Compilation problems and build issues were fixed. Release Notes for Version 2.05 Arbitrary depth array constructors were re-instated. Profiling code was added. Spaces within file names and eps file attachments are now supported in inlinetex mode, and interference from any pre-existing aux file is avoided. A new auto-generated version (1.21) of asymptote.sty contributed by Will Robertson features a latexmk-compatible asyinclude command. Path-overwriting bugs in the NSIS MSWindows installer were circumvented. Release Notes for Version 2.04 Subdivision cracks in transparent labels are no longer filled. Warning messages from the FP package are suppressed. MSDOS line terminators are now handled; DOSendl and DOSnewl line terminators were added. Files generated in inlinetex mode can now be renamed without editing their contents (using asymptote.sty version 1.19). The man page was fixed. The documentation of render.merge was fixed. Release Notes for Version 2.03 An optional asydir parameter that allows asy files to be generated in a subdirectory was added to version 1.18 of asymptote.sty; XeLaTeX support was fixed. Nonrendered preview images via render=0 are now implemented. Blank 3D labels were fixed. Problems with arc directions and ellipses in the geometry module were fixed. The definition of the Dotted linetype was improved. Missing pen and margin parameters were added to the blockconnector function calls. Virtual methods were optimized. Makefile dependencies were fixed and autogenerated files are cleaned up. The dependence of the source tarball on perl was removed. Minor improvements were made to the documentation and man page. The Asymptote installation directory is now automatically added to the MSWindows path. Release Notes for Version 2.02 A global latexusage.asy file is no longer generated, in favour of individual latexusage-*.asy files (this is a backwards incompatible change). Global and local values can now be given for both the inline and attach asymptote.sty (version 1.15) options. Underscores were removed from the .pre and .tex file names in inlinetex mode. Latexmk support was added for compiling individually only those figures that have changed; this requires that the inline option be used for 3D figures. The asy() function was fixed. A multiple fraction bar bug in texpath was fixed. Warning messages and portability issues were addressed. A frame label alignment problem was fixed. PDF animations are now supported with the XeLaTeX TeX engine. Release Notes for Version 2.01 The normal vector for perspective projections was fixed. Individual processing of each figure within a LaTeX document is now supported. The fontsize package uses type1cm.sty again since fix-cm.sty does not appear to work as advertised. Uninitialized item bits are cleared. Extended for statements now support the var type. PenMargin is used in drawing a binarytree. Minor optimizations were made. Release Notes for Version 2.00 The construction of 3D TeX labels was sped up greatly. Plain TeX page numbers were suppressed. Dotted 3D lines and 3D sizing problems were fixed. A general search function for sorted structures was implemented; the lexorder functions in math.asy now return strict partial orders. Additional GSL functions were added. The correct PRC units (PostScript pt units, properly called bp) are now displayed in Adobe Reader. Release Notes for Version 1.99 A segmentation fault was fixed. Perspective animations were fixed. A bug in the bezulate topological sorting algorithm was fixed. A framedelay setting was added for working around OpenGL animation rendering buffer overruns. Further optimizations were made. A portability issue was addressed. Release Notes for Version 1.98 Memory usage and garbage collection were greatly improved, and many optimizations were made. Labels are now aligned using the rotational instead of the shiftless part of the transform. A portable CYGWIN memory limit fix was implemented. Noncyclic stokepaths are discarded to work around a bug in gs 8.71. Release Notes for Version 1.97 A new render.labelfill option (enabled by default) fills subdivision cracks in unlighted labels. The dependence on gcc-4.3 was removed. Offscreen detection and zoom bugs in the OpenGL renderer were fixed. Three-dimensional grouping was improved. The symbol table was replaced with a custom hash table. Portability updates were made. The Cygwin memory limit fix for MSWindows now works even on systems that lack a complete Cygwin installation. The examples were updated to exploit the new PRC rendering options. Release Notes for Version 1.96 The viewpoint function and some examples were updated. Release Notes for Version 1.95 The PRC driver has been overhauled to support model tree groups, lossy compression, efficient representations of elementary geometrical objects, and specialized rendering options. More efficient OpenGL thick tubes were implemented; the capping of 3D curves was improved. The SIGQUIT signal was replaced by SIGTERM. Under MSWindows, the 384MB Cygwin memory limit is now automatically disabled by the Asymptote installer. Inferred variable types were added and operator symbols are now pretranslated. Release Notes for Version 1.94 Workarounds for MSWindows registry problems and obsolete runtime libraries were implemented. The SimpleHead arrowhead was fixed. Additional matrix routines and casts were implemented. The pair dir(path, path) routine now returns a unit vector. Variable conflicts coming from the contour module were addressed. A RadialShadeDraw filltype was implemented. A guide bug was fixed. Redundant mismatched version warnings are avoided. Support for fitting one 3D picture within another was added. The documentation was updated. Release Notes for Version 1.93 Portability issues were addressed. Latticeshading bounds and behaviour under svgemulation were fixed. The initial SVG pen was fixed. A parallelogram block was added to the flowchart module. Temporary files are cleaned up even after TeX errors. The GUI export function was fixed; an SVG export option was added. The XeLaTex bounding box was fixed. Spaces in output directory names are now allowed for supporting drivers. One can cd to other directories, preserving the output directory. All output files are written to the directory part of settings.outname; if this is empty, the current directory is used. Release Notes for Version 1.92 Labels work correctly with oblique projections. Transformed Label alignment and pt scalings were fixed. Latticeshading is now properly clipped. The normal and true Circle calculations were fixed. The interface to the simpson integrator and an array index in contour.asy were fixed. In the flowchart module, the implicit cast from a pair to a virtual node was removed in favour of a block constructor. The ode integration routines now return a structure that includes the sampled time values; dynamic timestepping was implemented for solveBVP. New predefined tick modifiers were added. The CLZ and CTZ bit functions were implemented. PRC part names were fixed. The GL library is now explicitly linked. Memory usage was improved by configuring the garbage collector with --enable-large-config. Null 3D paths are ignored. Non-pdf output is supported for PDF tex engines. Portability changes for CYGWIN 1.7 were made. Release Notes for Version 1.91 The precision of the 3D perspective sizing routines were improved. The offset in transformed 3D labels with render=0 was fixed. 3D planar arrowhead gaps were fixed; a duplicate 3D arrow angle factor was removed. Pen width contributions to the box and ellipse envelopes were fixed. A more robust contour algorithm based on paraboloid approximation was implemented. A polargraph routine for arrays was implemented. Default font problems were fixed. The pdfborder={0 0 0} option was added to settings.hyperrefOptions; the hypersetup command is now used to avoid hyperref option clashes. The size of pngalpha images was fixed; the pngalpha driver is used only if antialias=2. The -alpha Off default convert option was removed in favour of convertOptions="-alpha Off". Inlinetex support for xelatex was updated. Picture transformations are now respected by latticeshade. The Bessel functions J and Y were renamed to Jn and Yn. An operator --(block, block) was implemented to simplify the flowchart syntax. The expression % expands to the last result returned at the interactive prompt. The GLU-1.3 library included in the MSWindows distribution was fixed. Release Notes for Version 1.90 SVG axial, radial, and emulated tensor-patch shading were fixed; the dependency on dvisvgm-0.8.7 was documented. Release Notes for Version 1.89 The draw, fill, and clip commands now pass raw SVG code directly to dvisvgm (version 0.8.6 required); zero-length paths are output as circles. Unsupported SVG elements are converted to PNG images; unimplemented SVG features such as Gouraud and tensor-patch shading can be (partially) emulated as vector elements using the -svgemulation option. The control point normalization of rational NURBS surfaces was fixed; 3D NURBS curves are now implemented. A problem with inlinemovie3 was fixed. The linetype pattern is now a real array: for backwards compatibility, a string is still accepted, but the return type of linetype(pen) is now real[] instead of string (backwards incompatible). The split routine was changed so that an empty delimiter splits on spaces, discarding duplicates. The palette routines are now guaranteed to generate at least the specified number of colours. PNG output produces a transparent background. Surface and path3 garbage collection was fixed. Release Notes for Version 1.88 Compilation without OpenGL was fixed. PRC billboard labels were implemented; settings.billboard was renamed to settings.autobillboard and by default enabled for all 3D labels. The surface constructor for embedding labels on surfaces now draws both the top and bottom faces by default. The meshpen, knot, weight, and color arrays are now properly cached. The example fequlogo.asy illustrates how to draw an arbitrary 3D background plane. The intermediate dvi file is now removed when producing SVG output. Improvements were made to the tutorial. Release Notes for Version 1.87 Support for SVG output was added (requires dvisvgm-0.8.4). Billboard labels were implemented for the OpenGL renderer. OpenGL animations were improved: reverse and step menu items were added, along with a framerate setting. An addStereoViews function and example stereoscopic.asy were added. The addViews function was generalized to handle any layout; the default layout was changed from ThreeViewsFR to SixViewsUS. PRC node names are now implemented for curves, surface, labels, and dots. OmitTick was generalized to omit both major and minor ticks. A graphicx.tex workaround was implemented to parse paths properly. A viewportsize bug was fixed. A memory deallocation bug was fixed. The ENDIAN test was fixed. The ucyclic and vcyclic parameters are no longer set for conditional surfaces. The erase() function clears the PostScript canvas again. A projection() function that returns the interactive camera parameters was implemented. A hyperrefOptions setting was implemented. The tutorial was improved. Release Notes for Version 1.86 PRC polygons were optimized. Surface memory usage was reduced. The automatic sizing of NURBS surfaces was fixed. A bug in the radius of curvature computation at nodes was fixed. The configuration test for the GNU readline library was improved. The naming of PRC parts was implemented. Release Notes for Version 1.85 Compilation is now supported again on platforms lacking OpenGL. Missing pen dimensions were added to a 3D picture sizing routine. The labelsurface routine was renamed to surface and extended to surfaces containing a single patch. Release Notes for Version 1.84 The perspective PRC viewportmargin was fixed. Unwanted spaces were removed from (version 1.10 of) asymptote.sty. Support for drawing PRC and OpenGL NURBS surfaces was added. Obsolete code, including an unwanted inline qualifier, was removed. A split structure that can be adapted for splitting intersecting patches was added, along with the example splitpatch.asy. Release Notes for Version 1.83 OpenGL animations, illustrated in glmovie.asy, were implemented. Viewportshift flicker was fixed. An empirical translation between OpenGL and PRC shininess was implemented. Splined parametric surfaces are now used to implement smooth thick lines and tubes. The projected bounding box calculation and angle calculations were fixed. A labelsurface function was added. The Headlamp light is now the default light; a light argument was added to shipout. Patches are now constructed with the usual orientation for a counterclockwise external path; the convention for tensor product shading was updated. Picture environments for TeX clipping are no longer nested. A texpath initialization bug was fixed. An ASYMPTOTE_HOME environment variable was added. Viewing was fixed for file names containing spaces. A picture sizing bug was fixed. An example of an inset graph was added. Type information for variables is now returned at the interactive prompt. Warning message suppression was improved; warnings in Asymptote code can now be disabled. The cyclic member of an array is now writeable; the obsolete cyclicflag and void cyclic(bool) functions were removed. File mode functions are now virtual members; this backwards incompatibility requires that line(file f) be changed to f.line(), etc. Release Notes for Version 1.82 Threaded exports were fixed. The texpath fontsize was fixed for PDF tex engines. A default currentprojection argument was added to transform3(projection). The -gray and -bw settings are now respected in PRC output. A consistent approximation is now used for drawing tube centers. Missing pt units were added to all fontsize examples. Release Notes for Version 1.81 A boolean targetsize option can now be used to draw 3D labels with the apparent size they would have on the target plane. The camera adjustment algorithms were fixed; the autoadjust flag is respected. Missing path3 functions such as endpoint(path3) were added. The doubleclick timeout under MSWindows was fixed. A workaround for a ConTeXT small font bug is illustrated in contextfonts.asy. File associations are now used under MSWindows for psviewer, pdfviewer, display, and animate. Single quotation marks are now allowed in filenames. Deconstruction is now only supported in PNG format; the xformat setting was removed. The example lmfit illustrates Levenberg-Marquardt nonlinear least-squares fitting. Release Notes for Version 1.80 The interface for changing the precision for XDR/binary files was simplified; file parameters can now be queried as virtual members. The zoom/menu action was improved to emulate a double-click and assigned again to the right mouse button; a left-button binding bug was fixed. New settings zoomfactor, zoomstep, spinstep, arcballradius, resizestep, and doubleclick were added. The OpenGL thread is now exited gracefully; idle state and other parameters are properly reset on quitting. Lighting is now initialized only in home(). Animations with global=false were fixed. An improved (and free) psview PostScript viewer is now suggested for MSDOS users. A mechanism for disabling annoying warnings like "writeoverloaded" was implemented. The documentation directory under TeXLive was fixed. Release Notes for Version 1.79 The perp vector calculation in the solids module was fixed. A bug in the mouse motion functions was fixed. A pan action (which differs from shift due to perspective distortion) was added to the OpenGl renderer; the Camera (c) menu item now outputs all camera settings. The default right mouse button mouse binding was changed from "zoom/menu" to "zoom". User-initiated exports no longer cause the renderer to quit. Dynamic time stepping was fixed in the ode module; the "integrate" routines now return the array of computed values. Operators == and != were added for all built-in arithmetic 2D arrays; a segmentation fault was fixed. The etc/fstab kludge for Cygwin 1.7 was removed. The configuration directory under TeXLive is now $TEXMFCONFIG/asymptote. Release Notes for Version 1.78 Thread locking issues were fixed. The linegranularity is now respected when drawing thick curved lines. A bug in FSAL ODE integrators when using a fixed time step was fixed. Missing miterlimit defaults were added. Xasy was updated to use Python 2.6.2 and Imaging-1.1.7b1 (which requires no alpha support patches). Obsolete patches were removed. More TeXLive build issues were addressed: the install-prebuilt target omits texhash and does not attempt to install PNG files for asymptote.info. A configuration problem with --disable-gc was fixed. The 3D mouse bindings are now customizable. Support was added for generating syntax highlighting for the KDE editor Kate. Release Notes for Version 1.77 Splined parametric surfaces were implemented; a bug in the Cartesian splined surface routines was fixed. An ode module for solving ordinary differential equations was added. A bug in maxtimes and mintimes was fixed. A Levenberg-Marquardt nonlinear fitting routine was added. The format command now returns TeX compatible output only in math mode. A path3 label alignment problem was fixed. The MSWindows support for TeXLive 2009 was fixed. Release Notes for Version 1.76 A bezulate bug was fixed. The resolution and caching of texpath were improved; for PDF tex engines, the basealign pen attribute is now respected. Support for OCG layers was added. Lights Headlamp and White were implemented; the predefined adobe light was removed. Holes are now handled in superpath-to-surface constructor when planar=true. A degenerate transform3 issue was fixed. The alignment of rendered and PRC images was improved; the angle for rendering absolute projections was fixed. Inaccurate TeX and ConTeXt font scalings were fixed. A texsize(string, pen=currentpen) function returns the raw TeX dimensions {width,height,depth}. A new version of asymptote.sty (1.07) fixes attach=true mode. Release Notes for Version 1.75 Issues with 3D labels and texpath, both in inlinetex mode and with the ConTeXt TeX engine, were resolved. A bug in bezulate was fixed. A partial workaround was added for the unimplememented -output-directory ConTeXt option (the current directory must still be writeable). The aspect ratio and viewportmargin calculation in module three was improved, with tighter 3D bounds. A bug in the intersections(path3, surface) routine was fixed. Release Notes for Version 1.74 An error in the surface bounding box routines was fixed. Path/surface intersection routines were added. PDF tex engines are now supported for 3D labels and texpath. The new ConTeXT tex engine can be used for both 2D and non-PRC 3D drawings. Projections LeftView, RightView, FrontView, BackView, BottomView, and TopView, along with an addViews function, were implemented. Portability fixes and various updates to support TeXLive builds were made. The dependence on currentprojection in label(Label, path3) was removed. The font command for LaTeX tex engines now requires all four NFSS (encoding, family, series, shape) arguments. Release Notes for Version 1.73 An alternative OpenGL background color can now be specified with the pen currentlight.background. A new textpath command allows 3D labels to be drawn with settings.texengine="none". Minor bugs in the geometry package were fixed. The interface to the vectorfield routines was improved. The autoadjust parameter was removed from orthographic projections; autoadjust=false is now always respected for perspective projections. Optional warn=true arguments were added to the polar, azimuth, colatitude, and latitude functions. A call to reportError interrupts execution again. A segmentation fault that can occur after file mode errors was fixed. Release Notes for Version 1.72 PostScript calculator function shading was implemented. Interactive camera parameters of the native OpenGL renderer can now be queried. The effective camera positions for oblique projections was fixed. Philippe Ivaldi's geometry_dev module was merged into geometry.asy; trembling_pi was added as trembling.asy. The GSL module was expanded. An extrude routine for labels was implemented. Rotated path label alignments were fixed. The alignment of 3D axis labels was fixed. The basealign pen now always typesets "ace" and "acg" at the same location. Arrow endpoint detection was fixed. A sysdir setting was added, along with an --enable-tetex-build configure option. The store argument of saveline is respected again. Left-justified trailingzero alignment was fixed; a signedtrailingzero specifier was added. Boolean conditions on linearly interpolated surfaces now suppress function evaluation. The adaptive algorithm used for rendering thick lines and tubes was improved. An ambiguity in the flowchart module was fixed. A patch is included to work around an MSWindows XP problem with 3Dgetview in the 2009/03/23 version of movie15.sty. A problem with spurious menu interaction zooming was fixed. The asy.bat MSWindows batch file now respects all command-line arguments. Release Notes for Version 1.70 A labelpath3 module for typesetting curved labels in 3D, contributed by Jens Schwaiger, was added. PenMargin2 was defined for use with planar arrowhead types like DefaultHead2. A center=false parameter was added to projections to allow one to automatically center the target within the bounding volume. The ambiguity in the surface function was resolved. Problems with spaces in filenames were fixed. Release Notes for Version 1.69 Internal patch degeneracies were removed by splitting. Bugs in the windingnumber and the intersection routines were fixed. The inside(path) routine was improved; a fillrule argument was added. The bezulate connect routine was improved. Bezulate is now automatically applied to path arrays: surfaces should be constructed directly, without first calling bezulate. A workaround for recent changes in the hyperref package was implemented. The divisor setting was replaced with purge(divisor=0). The calls to baseline in graph.asy were fixed. A miterlimit attribute was added to pens. Animation problems were fixed. Lighting problems with multiple exports and a quit deadlock were fixed. A new version of asymptote.sty (1.06) fixes an undefined \ASYbox. Release Notes for Version 1.68 Support for 3D inline pdf movies was added. Camera adjustment was fixed; the filesurface.asy example illustrates automated camera and target computation. A deadlock in the export loop was fixed. A new version of asymptote.sty (1.05) fixes the definition of \ASYanimategraphics. The handling of intersection fuzz was improved. The baseline routine was generalized. New paragraphs are now allowed in minipage labels. Some minor errors in the documentation were fixed. Release Notes for Version 1.67 Spurious annotation question marks in 3D PDF attachments were fixed; attached images are now printable. The asy environment defined in the new (1.04) version of asymptote.sty supports keyval options width, height, viewportwidth, viewportheight, and attach; the obsolete asyattach environment was removed. The default viewportwidth is the linewidth in inline mode and 0 in attached mode. Planar projected arrows were fixed. Automatic camera adjustment was improved. A minimum viewportsize can now be specified. The control points for cyclic segments produced by texpath were fixed. Overlap issues in planar surface patches were fixed. Surface constructors were simplified: the routine planar has been replaced by surface(path3) and in most cases there is no need to call bezulate directly. An Align constant was added. The parameter limits used in buildcycle were fixed. The intersection routines now respect the fuzz parameter. Segmentation faults involving null cyclic guides were fixed. Subpath now preserves the straight flag. Pictures containing graphs now transform correctly; unextended axes limits and tick selection were improved. Axial and radial shading respect now respect -gray. The animation prefix was fixed. An example of drawing a surface from irregular data was added. A work around was implemented for an intermittent hang on exit in the 3D native renderer. An auto3D option was added for controlling the poster option. The 2008/10/08 version of movie15.sty is now compulsory. The cd %USERPROFILE% command was removed from asy.bat. Release Notes for Version 1.66 An alignment problem with the pdflatex tex engine was fixed. Problems in the animations module were fixed, including a broken ImageMagick layers optimization. Optional direction arguments were added for three-dimensional bars. The appearance and alignment of the planar arrowheads DefaultHead2, HookHead2, and TeXHead2 was improved; they now accept an optional normal argument and respect the filltype. A transverse/longitudinal confusion was fixed in the solids module. The camera adjustment routine was improved and is now controlled by the autoadjust=true option for perspective projections; the user is notified when the camera is moved. The obsolete featpost3D.asy module was removed. Midpoint interpolation was reinstated for drawing contours. The Asymptote license was upgraded to the GNU Lesser General Public License. Release Notes for Version 1.65 The xelatex tex engine was implemented. Bugs in pdflatex output and the xelatex alignment were fixed. Release Notes for Version 1.64 Support was added for XeLaTeX PDF specials. The target point is not forced to be part of the control volume for absolute projections. The directory is now stripped from the animation prefix; generated PDF animations are no longer automatically deleted. New parameters xsize and ysize of the asyinclude function of the slide module are illustrated in interactive 3D examples in intro.asy. A Protein Data Bank example was added to illustrate the generation of predefined views. The slidedemo example was fixed. The license of the PRC code and tools was upgraded from GPL to LGPL. Release Notes for Version 1.63 Support was added for XeLaTeX (which requires a modified version of movie15.sty; note however that PDF specials are not yet implemented in dvipdfmx). The 2D contour routines were generalized to handle nonuiform lattices; interpolation artifacts are now avoided when the midpoint function values are unknown. The ncell parameter for 3D contours was replaced by nmesh. The complex gamma function was implemented. Interactive rendering of preview images is now properly synchronized. The bounding volume is now automatically expanded to include the target position. An interactive 3D surface of revolution example was added to slidedemo; rendered images are now automatically included when fitting non-PRC pictures. Duplicate beginclip/endclip functions in pstoedit.asy were removed and the pstoedit-3.45 patch was updated to fix compilation errors. Errors on EOF after reading 0 values are no longer reported. One-column legends are now handled correctly. Old-style constructors were replaced with operator init. An electromagnetic spectrum example was added. Release Notes for Version 1.62 Outputting PDF format to other directories was fixed. An int hex(string) function that casts a hexidecimal string to an integer and a pen rgb(string) routine that returns a pen corresponding to a given 6-character RGB hexidecimal string were added. In the dot routines, Label arguments were added and minor bugs were fixed. A parametric version of markuniform was added. Release Notes for Version 1.61 A workaround was implemented for a dvips misconfiguration in TeXlive 2008 that introduces unwanted %%BeginPaperSize commands into the EPS output. The -q option was reinstated; the asymptote.py Python module was fixed. The bezulate.asy module now enforces the same zerowinding fillrule as used by dvips. In solids.asy, a warning is issued if the silhouette routine is used in a fully 3d context. The freeglut extensions to support user-specified multisampling values were re-instated. A freeglut segmentation fault triggered by spurious window creation in the export loop was fixed. An aspect ratio problem was fixed. A string[] to int[] ecast was added. A Pentype function was added. The asydir() function was fixed under MSDOS. Release Notes for Version 1.60 An optional bool3 condition was added to the graph functions, allowing one to skip points or segment a graph into distinct branches, based on a user-supplied test (see the example gamma.asy). A gettriple routine was added. The interp function first promotes its pen arguments to the highest colorspace. Export exceptions are now caught gracefully. Under UNIX, xasy can now be run from a write-protected directory again. A work around was implemented for the inability of the movie15.sty package to handle spaces in filenames. Stack overflow diagnostics were improved. A read from pipe failure under MSDOS was fixed. Release Notes for Version 1.59 A missing filltype option for projected 2D arrowheads was added. The scaling of plain TeX fonts was fixed. Examples that mix 3D exporting and viewing now work properly. With the -nothreads option, the main process now waits for 3D exports to finish before proceeding. Conflicts in slide presentations were fixed; the asy(string) function assigns defaultfilename correctly. A bug in processing command-line options was fixed. Release Notes for Version 1.58 Two-dimensional arrowheads are now drawn automatically for 2D projections. ArcArrow3 routines were added. Standard pen arithmetic is now used in all colorspaces, so that interp(pen,pen,real) and Gradient(pen[] p) now work as expected. A Wheel palette was added and is used in the example gamma3 to indicate the phase of the complex Gamma function. A silhouette routine for solids of revolution is illustrated in the examples spheresilhouette.asy and hyperboloidsilhouette.asy. Problems with 3D axis label alignments were fixed. The example scaledgraph illustrates how to factor out an axis scaling. Interactive mode is now exited on EOF, unless exitonEOF=false. Support for open function signatures was added. A conflict between asymptote.sty and the breqn package was fixed. PNG images for the manual are now built in a separate directory so that they don't take precedence over PDF files. A problem with xasy under MSDOS was fixed. Release Notes for Version 1.57 The pdflatex texengine was fixed. The default MSDOS "start-in" directory is now %USERPROFILE%, for compatibility with the MSWindows Vista operating system. Temporary files are now generated in the directory specified by the -outname (-o) command-line option, so that write access to the current directory is no longer required. Various font size problems were fixed. The axis coverage calculation was improved. An object(Label, envelope, ...) constructor was added, along with support for object transformation and alignment. Clipping is now allowed across page boundaries; beginclip(picture, path[]) and endclip(picture) functions were implemented. Release Notes for Version 1.56 A bounding box bug in the latex texengine was fixed. The font scaling is now rounded to the nearest integer. The wait=true argument of shipout was fixed. The documentation of grid3 was fixed; examples of using grid3 with scale(true) were added. The handling of the asydef environment within Emacs lasy-mode was fixed. An asyinclude function for embedding 3D PRC graphs in slides was implemented. Release Notes for Version 1.55 A serious bug in drawing paths of length 0 that broke the dot(pair) routine was fixed. Problems in guide to path and path to guide conversions were fixed. A triple invert(pair) routine was added to invert a pair z onto the projection plane. The obsolete field of view factor was removed. Release Notes for Version 1.54 The filltype of three-dimensional labels is now respected when render=0. Multiple file batch mode under MSWindows was fixed. The reverse(guide) and guide examination routines were fixed. A reverse(guide3) routine was added. Curved cyclic paths of size 1 were fixed. Fork is now used by default under MSWindows pending stable CYGWIN POSIX thread support; this can be overridden with settings.threads=true. The need to remove latexusage_.pre along with latexusage-* and latexusage.aux when switching between latex and pdflatex usage was documented. Release Notes for Version 1.53 Forking problems under Windows 2000 were fixed and MS-DOS style path warnings were suppressed. Problems with PRC projection sizing and the rendering logic were fixed. The toolbar is now enabled by default within the asyattach environment. Two-dimensional transforms no longer prevent three-dimensional labels from being projected onto the initial viewing plane. Out-of-memory errors in the OpenGL renderer are caught again. The new tube module was documented and a trefoilknot example was added. Release Notes for Version 1.52 Support for generating PRC output on bigendian machines was added. Multisampling was improved: by updating the freeglut library to svn version 761, one can now specify an antialiasing pixel width with the parameter multisample, which is now an integer. The asymptote.sty and asycolors.sty files are now installed by default in $TEXMFLOCAL/tex/latex. The OpenGL renderer by default now uses POSIX threads instead of fork. A work around for the nonstandardized signature of gluNurbsCallback on various MacOS platforms was implemented. Planar vertex shading was fixed. A planar argument to surface was added. To work around rendering problems with some graphics cards, the window is now hidden only when iconify=true. A tube module was added. A setlocale segmentation fault was fixed. Now that we require a multithreaded version of the Boehm garbage collector, the installation instructions were updated for using the system version. An optional user=false argument was added to min(picture), max(picture), and size(picture). The dependency of asy-mode.el on the cc-mode.el source file was removed. Release Notes for Version 1.51 A separate multisample setting is used to control screen antialiasing; multisampling is now only enabled when viewing. The problem of multiple glInit calls is fixed. A more conservative multisampling patch for freeglut is supplied. The OpenGL process is now always forked for better performance. The last freeglut extension was removed. Release Notes for Version 1.50 Detection and support for the native glut library on MacOSX now allows Asymptote's adaptive OpenGL renderer to be used on all major platforms. The OpenGL renderer now supports antialiasing; a race condition and export problems were fixed. The new default value of maxtile=(0,0) denotes the screen dimensions. Lighting problems due to incorrect normal orientations were fixed. The up vector for embedded PRC output was fixed. A viewportmargin parameter was added to allow for a larger viewport. An iconify setting was added for UNIX systems that support rendering in an iconified state. An embed option (default true) was added to allow one to suppress the embedding of a rendered preview image. A new version of asymptote.sty (1.01) supports file attachments, which provide a better way of embedding 3D PRC files in a LaTeX document. The latexusage file prefix was renamed from latexusage_ to latexusage-. A numerical precision issue in the surface of revolution constructor was fixed. Support for three-dimensional dimension bars was added; PenMargin3 and DotMargin3 were fixed. The argument put=Above (put=Below) should now be replaced by above=true (above=false); this is a backwards incompatible change. Release Notes for Version 1.49 Issues with surface normals that led to incorrect lighting were fixed. By default, the mean(pen[]) routine now returns an interpolated pen with the minimum opacity of all given pens. A patch reverse(patch) function was added. The settings.keep flag is now handled correctly in texpath and strokepath. A cornermean function for surfaces was added. Several examples that illustrate patch and vertex shading were updated. Release Notes for Version 1.48 High-resolution OpenGL tiled rendering was implemented. Support for vertex-dependent colors was added. Centering of perspective projections was improved. Rendering artifacts in planar surfaces and thick lines were fixed. A Gradient palette that varies linearly over a specified range of pens was added. An improved surface constructor for convex three-dimensional paths was added; the planar constructor should now only be used for nonconvex paths. A DefaultHead2(filltype filltype=Fill) arrowhead was implemented, along with an optional filltype argument for HookHead2. New maxheight, hstretch, and vstretch parameters were added to legend(). A boolean user=true argument was added to the point(picture, pair) function; the framepoint routine was removed in favour of truepoint(picture, pair, user=false). A roundbox envelope routine was added. An antialias setting (default true) was added. A bug in xasy and an incorrect precontrol bug in write(path) was fixed. Compilation with standard glut for systems without freeglut is now supported. Release Notes for Version 1.47 Support for simple obj files and patch-specific surfacepens and meshpens was added. Surface constructors for triangles were added. Three-dimensional margins were implemented. Flat 3D arrowhead types HookHead2 and TeXHead2 were implemented. By default, 3D arrowheads are now always drawn with currentlight. A missing angle parameter in HookHead3 was added. Functions that construct a pen array from a given function and palette were added, as illustrated in the example elevation.asy. A bug in the cyclic path write functions was fixed. A strokepath(path g, pen p) function was implemented. A missing put argument in grid3 and a missing transform for projected 3D mesh lines were fixed. File prefix problems were fixed. Spurious "camera too close" errors were fixed. Tighter three-dimensional bounds are generated. Release Notes for Version 1.46 Support was added for embedding 3D PRC files within LaTeX even when settings.render=0. An error is now signalled if the user tries to render an image without freeglut library support. The Klein bottle example was updated to use lightgray instead of the new default surface color (black). The sphere animation example was updated to work with the new skeleton structure in the solids module. Release Notes for Version 1.45 Bugs in the solids of revolution and graph3 modules were fixed; longitudinal curves are split into front and back pieces. Min and max arguments were added to axes and axes3. Rendering artifacts are now avoided. When render=0, 2D and 3D objects are now sized consistently. The automatic camera adjustment was improved. Bugs in thick three-dimensional lines were fixed; thick lines are now drawn with fewer Bezier patches and 3D Linetype offsets are supported. The appearance of unitcones and arrows was improved. New arrowhead3 types HookHead3 and TeXHead3 were added. The default surface color is now black. New surface and path constructors were added. Secure options can now be queried as read-only settings. Release Notes for Version 1.44 Full interactive 3D support has been added to Asymptote, with the option of generating and embedding 3D PRC data in PDF files or rendering scenes directly with Asymptote's own fast OpenGL-based renderer. The implicit casts from 3D to 2D objects were removed (in favour of call explicit calls to project). A path[][] texpath(string s) routine was added to convert string into the paths that TeX would fill. Add boolean stroke parameter was added for shading (and clipping to) stroked paths. The Circle and Arc routines were fixed. Autoscaling of graph axes limits is now disabled by default. A path3 path3(path p, triple plane(pair)=XYplane) constructor was added; the path3 routines were moved to C++ code. Optimized and robust versions of the intersection, windingnumber, inside, and surface extrema routines were implemented. The lighting routines were replaced by the OpenGL model. Each Asymptote process once again uses a separate currentpen. A segmentation fault and an incorrect parameter in the Delaunay triangulation routine were fixed. This major overhaul of the three-dimensional graphics has necessitated a few backwards incompatibilities. The most significant change involves filldraw: filldraw(polygon(5),red); should be replaced by draw(surface(polygon(5)),red); Also, the solids module has been improved so that revolution a=revolution(O--X+Z,Z); a.filldraw(red,blue); is now more sensibly written as revolution a=revolution(O--X+Z,Z); draw(surface(a),red); draw(a,blue); Release Notes for Version 1.43 A new array(n, value) function returns an array consisting of n copies of value. Conditional drawing of surfaces meshes was implemented. Vector field support was improved. Graph tick selection without autoscaling was improved. By default, all 2D axes are drawn below existing objects. An interface for drawing contours on arbitrary nonoverlapping meshes was added. Optional support for Jonathan Shewchuk's more robust triangulation routines was added. The file precision setting can now be queried. A beep() function was added. The partialsum function now returns an array of the same length as its argument (backwards incompatible). Dash offset and font selection bugs were fixed. Modules to redefine LaTeX named fontsizes for 10pt and 11pt article documentclasses were added. Problems in asy-mode.el were fixed. A problem with label alignment was fixed. The international inch is now used instead of the U.S. survey inch. The code now compiles cleanly under gcc-4.3.0. Release Notes for Version 1.42 A routine was added for projecting a Label onto a given plane; an ambiguity in the three-dimensional scale routine was resolved. An inside(path p, path q, pen fillrule=currentpen) routine was added to determine if one path is strictly within another. Optional arrows were added to the slopefield routines. The movie function now generates multipage PDF animations when format="pdf" and global=true; a fit argument was added to support an optional filled bounding box for each movie frame. Casts were added between the hsv structure and pens. Bad casts from TeX bidirectional pipe are now caught. In inline latex mode, TeX headers are now output only when needed. A bug in the cancellation of text addition in xasy was fixed. The sticky bit is no longer set when creating the ~/.asy directory. The documentation and FAQ were updated. The dot(real[] a, real[] b) routine now returns the dot product of the vectors a and b; this introduced a backwards incompatibility: dot(x,y) should now be replaced with dot(pairs(x,y)). Release Notes for Version 1.41 Python-style array slices were added. The array virtual field A.keys returns the indices of initialized entries. The concat routine can now take an arbitrary number of arguments. The write functions now output nothing for uninitialized values instead of producing an error. A bounding path is stored in the object structure to allow connections to noncardinal boundary points. The buildcycle algorithm was improved. The expression dir(E) is a synonym for E. The visibility of unsplit solid slices is now properly resolved. A drawpen argument was added to FillDraw. The uniform(real a, real b, int n) function returns a uniform partition of [a,b] into n subintervals. Complex exp, log, sin, and cos functions were added. An interface to the internal adaptive simpson integration routine was added. History lines are now stored immediately after input (as well at exit, after stifling). Support for the HSV colorspace was added. The dependence of non-PDF animations on the animate.sty package was removed by renaming animate.asy to animation.asy (PDF animations still need to import animate.asy). Transparency groups are now respected by xasy. TeX diagnostics were improved. An obsolete function for drawing boxes on pictures was removed in favour of draw(Label,box). Release Notes for Version 1.40 Hatch widths for PDF output were fixed by disabling dynamic line width adjustment. A nurb-related bug in solid shading was also fixed. Release Notes for Version 1.39 In the animate module, a constructor bug was fixed and the temporary multipage pdf movie file is deleted by default. Release Notes for Version 1.38 For perspective projection, nonuniform rational B-splines (NURBS) are now approximated by adding additional control points to Bezier curves. Inline PDF movies can be generated directly within LaTeX files (requires animate package, version 2007/11/30 or later). SimpleHead, HookHead, and TeXHead (Computer Modern) arrow styles were added. FillDraw is automatically reduced to Draw for noncyclic paths. Empty clipping bounding boxes were fixed. The xasy diagnostic Console should now work reliably on all platforms. Graph and interpolation array length diagnostics were improved. The axes routines now take optional xlabel, ylabel, and zlabel arguments defaulting to empty strings. The autoformat axes tick label routines now try to add an extra digit of precision. Pen arguments were added to the flowchart block routines. A path&cycle operator was added. The read1, read2, and read3 routines now affect only the current operation. A -c (command) option and exit() command were implemented. Ambiguous expressions are now resolved by interactiveWrite (with a warning). A patch is included for fixing problems with the Asymptote backend for pstoedit-3.45. Release Notes for Version 1.37 The speed and useability of the graphical user interface has been greatly improved, including full transparency support under MSWindows. The intersections routine was fixed, and an optional fuzz parameter was added. A bug in the arrow routines was fixed. The 2D graph routines were improved when autoscaling is disabled, secondary axis bugs were fixed, and the automatic logarithmic axis coverage routine was re-enabled. Degenerate 3D reference vectors are now handled and the default 3D tick directions were improved. The array returned by intersections is now automatically sorted. A patch is applied to avoid out-of-memory segmentation faults with gc-7.0. A history(int n=1) function can be used to return the interactive history. Automatic semicolons are now added to the history. Locale bugs were fixed. A string[] split function was added. Installation, uninstallation, and diagnostics under MSWindows were improved. A marker dot routine was added. The output(s,update=true) function was fixed. Configure now uses a system version of Boehm GC if the recommended local version isn't present. Release Notes for Version 1.36 Recently introduced bugs in the tex(), postscript(), gsave(), and grestore() commands were fixed. Release Notes for Version 1.35 A hang in testing for the intersection of nearly identical paths in solids.asy was fixed. The numeric formatting of setdash arguments was fixed. Release Notes for Version 1.34 An innovative graphical front end to Asymptote (xasy) has been developed. Clipping of labels is done within a picture environment to avoid unwanted page breaks. The default LaTeX font is now package-dependent. The syntax was generalized to allow expressions such as (x). Comments are now supported when reading strings in csv mode. Nesting capacity overflows in arctime were fixed. The autoscaling of graphs for close minimum and maximum values was improved, the default tick format is automatically adjusted to make tick labels unique, and a general trailingzero format string was added. Improved, robust versions of intersect and intersectionpoints were implemented (based on a new routine intersections). A permissions bug was fixed. A filltype argument was added to the dot routines. Printer stack use was optimized by pruning unneeded gsave/grestore commands. Temporary EPS files are now removed in inline PDF mode. A discussion of the 3D generalization of Hobby's algorithm used in Asymptote was added (intro.asy). Release Notes for Version 1.33 Routines to find the 3D and projected 2D bounding boxes of Bezier surfaces were added to the surface module, along with the standard teapot example. Extended for loops were documented. The page numbering of slide presentations with stepping enabled was fixed. The int type is now a long long type (typically a 64-bit integer). Support for reading and writing 64-bit integers in binary and XDR modes and large file support were added. Input files are now opened in input-only mode. Multiple invocations of labelpath now work. A projection bug in the grid3 module was fixed. The search path order was changed: directories specified by the dir configuration variable are now examined before the .asy subdirectory in the user's home directory. User configuration files are ignored during installation. Some bugs in asy-mode.el were fixed. Texput files are removed again. A memory allocation incompatibility in the workaround for old, broken readline libraries was fixed. The framepoint and truepoint routines now work even when an exact picture size estimate is unavailable; a picture scaling bug was fixed. Writing to a file specified with -o /dir/file.eps is allowed again. A quarticroots solver was added, the cubicroots solver was improved, and a complex quadraticroots solver was added. A workaround for broken texi2dvi installations was implemented. Memory leaks were fixed. The garbage collector was update to gc-7.0; upgrading to gv-3.6.3 is also recommended. A segmentation fault in complement was fixed. Release Notes for Version 1.32 A recently introduced segmentation fault in subpath was fixed. The current directory can now be examined with cd() even if globalwrite is false. The cd path is now only written once in interactive mode. Further garbage collection improvements and leak fixes were made. Release Notes for Version 1.31 Garbage collection was dramatically improved, resulting in reduced memory usage and increased speed. The options -compact and -divisor and the function purge() were added to give the user more control over garbage collection. The array virtual member function delete() with no arguments explicitly deletes all elements of the array. An interpolate(real[][] f, pen[] palette) function was added for constructing the pen array needed by the latticeshade routine. A nullpath frame and picture sizing bug was fixed. LaTeX diagnostics were improved. A facility that does not rely on garbage collection finalizers was implemented for closing open files at the end of each asy process. Release Notes for Version 1.30 Constructors were added. Routines to allow access to guide components were added. The three-dimensional projection and contour routines were optimized. A tickmodifier NoZero and ticklabel format NoZeroFormat were added. A simplified gouraudshade interface was added. A linewidth bug was fixed. The array insert and delete routines were generalized. The new array virtual member "initialized" can be used to detect whether an element is initialized. All fonts are now automatically embedded in PDF files. Inline PDF animations now require version 2007/05/24 or later of the animate.sty package. General root solving routines were added. The implicit initializer for files is null. Boolean arguments were added to the image and shading routines to allow one to disable data buffering. The functionality of the readline routine was split into the routines history, readline, and saveline. Many fixes were made to the Emacs asy-mode.el. Release Notes for Version 1.29 Support for drawing surfaces described by the null space of real-valued functions of three variables was added. The dir command now works correctly for degenerate Bezier paths; an optional final argument can be used to examine incoming and outgoing tangent directions. Numerical overflow and precision issues were addressed. A piecewise monotonic spline type and example were added. Optional fillpen and legend entries were added to histogram. The "q" command quits in interactive mode only if there is no top-level variable of that name. Standard input of strings was fixed. Support for transparent PNG images in xasy was added. Animation support was upgraded to use the new animate.sty package rather than the interim pdfanim_temp.sty package. Release Notes for Version 1.28 TeX error handling was improved. A dvipsOptions configuration variable was added. A recently introduced bug in the XDR routine xinput was fixed. Compilation under the upcoming GCC 4.3 release is now supported. Nonglobal PDF animations, where each frame is separately scaled and written to a file, were implemented. Reading from standard input now works correctly even in the absence of a working readline library. A build problem under Fedora Core 5 was fixed. Parallel builds are now supported. Release Notes for Version 1.27 A Hermite spline graph interpolate type was added for smoothly joining sampled functions. The cycle3, tension3, and curl3 keywords were respectively renamed cycle, tension, and curl. Assignments no longer write the value at the prompt. A bug in longitudinal skeleton detection was fixed. The filloutside routine now works with paths that extend beyond the current boundary. The unit n-point cross function returns a cyclic path. The "append" argument of the output function was renamed to "update", which now allows both reads and writes to the data file. Negative arguments to seek mean relative to the end-of-file; a seekeof function was added. PDF animations can now be loaded from an external file. The TeX pipe handshaking was improved. TeXLive 2007 is now supported under MSWindows. A work around was implemented for a MikTeX bug in handling file names containing spaces. Release Notes for Version 1.26 The correct surface normal is now used when calculating lighting; a Klein bottle example was added. The front/back detection of the transverse skeleton of solids of revolution is fixed. A better camera-independent reference value for resolving path3 orientation is used. A 3D midpoint routine was added. Tick values for broken axes can now be autogenerated; broken logarithmic axes are also supported. A 2D aligned axes example was added. A patch that fixes a redisplay bug in gv-3.6.2 is included. Release Notes for Version 1.25 A new picture size routine, which maps specified user coordinates to a given final size, provides a convenient way of forcing the plotted subregion of a graph to have a fixed size. The correct surface normal is chosen when calculating lighting. The comment character can now be escaped when reading strings from data files (but is disabled when reading raw characters with getc). The new word file mode is useful for reading white space-delimited strings. PostScript output files are now explicitly designated as EPSF in the header line. The minimum width and height of flowchart blocks may now be controlled separately. Interpolation and knot theory modules were added. The usage of path vs. guide in the base files was standardized. Release Notes for Version 1.24 Structures now have implicit initializers. PDF animations are supported in inline tex mode by communicating the texpreamble to LaTeX. The asypreamble environment was removed in favour of corresponding Asymptote commands in the asydef environment. Default y tick values were fixed. The binary space partition now works correctly for projections from infinity; an arbitrary target point can be specified for perspective projections. A 3D version of the intersectionpoints routine was added. Unconditional binary logical operators & and | and bitwise integer functions AND, OR, XOR, and NOT were defined; the array boolean operators && and || were renamed to & and |. The PostScript clipping code was fixed. The angle(rotate(x)) routine now always returns x (mod 360). User debugging errors are now cleared. The fontsize package was updated to use fix-cm.sty instead of type1cm.sty. The Microsoft Windows registry is checked for both GPL and AFPL Ghostscript. A workaround was implemented for a pdflatex vertical offset bug. Segmentation faults in the Delaunay triangulation and image codes were fixed. Release Notes for Version 1.23 Microsoft Windows autoconfiguration has been implemented by querying the registry: Asymptote and the applications it depends on may now be installed in any location. The shipout command is allowed to write to other directories if and only if -global is true. An autoimport configuration setting was added. Importing the Gnu Scientific Library (gsl) now works on all platforms. A texpreamble environment to contain the LaTeX preamble for both LaTeX and Asymptote was added to asymptote.sty. A conflict with the French babel packages was fixed. Background picture sizing in the slide presentation package was fixed. Release Notes for Version 1.22 Problems with loading LaTeX packages and slide presentations were fixed. Non-static variables in every loop iteration are now allocated anew. Formatting under locales with nonperiod decimal separators was fixed, along with logarithmic tick labels near the machine epsilon. Concatenation of nullpaths was fixed. New path markers were added and the perpendicular symbol in the geometry module was improved. The skeleton routines in the solids module were split to provide finer control. Routines to facilitate drawing 3d contours were added. Reading portable XDR binary data into arrays works again; functions for reading and writing also in native binary formats were added. The TeX preamble is no longer output in inline mode. The TeX pipe is now aware of a previously generated aux file. Memory leaks were fixed. An inline limit is now imposed on old compilers to speed up compilation. Setlocale warnings are disabled unless debugging is on. A colorspace command for extracting the colorspace of a pen was added. An Asymptote introductory slide presentation was added and a user-written Asymptote tutorial is now cited in the manual. Release Notes for Version 1.21 Expressions entered at the interactive prompt are automatically evaluated and written to stdout. The routine intersectionpoints returns all intersection points of two paths. Bounding box computations of paths drawn with transformed pen nibs were fixed. Transparency and automatic colorspace promotion are supported when shading and drawing images. A grid3 module for drawing 3D grids and a binary tree module were added. Automatic tick computations were improved: the actual tick value is now passed to the ticklabel formatting routine, even for logarithmic axes. A tickmodifier routine gives users complete control over which of the auto-generated ticks actually get drawn. The contour drawing and filling routines were improved. A --where option makes --listvariables show where global functions and variables are declared. Emacs asy-mode was improved, including function source code lookup. An optional labelpath interface to the PSTricks pstextpath macro was implemented for drawing curved labels along paths. In inline latex usage, picture are no longer scaled by default (use \begin{asy}[\the\linewidth] to recover previous default of scaling to line width). A texcommand option was added to override the tex engine command name. The slide presentation module no longer forces pdflatex; bibliography support was added, figuremattpen was reimplemented, and the spurious vertical shifting of bullets was fixed. Compilation under AIX and IRIX systems is supported. Release Notes for Version 1.20 Explicit yaxis label angles were fixed. Loading and including diagnostics under the -vv option were improved. The Emacs asy-mode now respects TeX-electric-sub-and-superscript. The texpath configuration variable and diagnostics were fixed under MSWindows. Low-resolution palettes now display correctly. A routine to fill cyclic contours was added, along with the example fillcontour.asy. A command-line option to change the current working directory was added. The FAQ was updated. Release Notes for Version 1.19 Bezier surfaces were implemented, along with tensor and Coons patch shading. The cylinder function was changed to be consistent with the cone function. The intersect routine now returns an array of two reals. The unitsize, xunitsize, and yunitsize arguments of shipout have been replaced with a unitsize function. The seconds() function now works portably. Minor bugs in inside() were fixed; a winding number routine was added. The movie bounding box is set to the largest bounding box of all pictures. Portable high-quality embedded PDF movies are now supported, as well as portable external movies. An embedded U3D example was added. Alignment positioning transformation was fixed; a Rotate(pair) and a string(real x) routine was added. Flowchart routines and the labelbox and advection examples now work with pictures as well as frames. An add(picture pic=currentpicture, drawer d) wrapper was added; a picture rescaling bug was fixed. Tex error handling was improved. Optional bounds arguments were added to verbatim postscript and tex commands. Writing to only the local directory is allowed unless the -global (or -unsafe) option is specified. A final backslash continues a line on the interactive prompt; a new multiline option is convenient for cutting and pasting code in interactive mode. Clipping now sets the true size coordinates to 0. Memory usage was reduced. The documentation was updated, including a description of how to produce Debian binaries from RPM binaries. Release Notes for Version 1.18 A pen caching problem and clipping bugs were fixed. Bugs in interactive mode and in linemode string reads were fixed. The picture.scale() routine now guards against division by zero. The drawing of surface meshes was fixed. The minbound and maxbound functions were implemented also for arrays. The labelx, labely, xtick, and ytick routines respect the current graph scaling. The asycolors.sty file was updated to remove the pstricks dependency. The slide package now works with both latex and pdflatex; the colordvi dependency was removed. A nativeformat() function returns "eps" or "pdf", depending on the current tex engine. The pdf() and latex() functions are now visible. The usepackage and minilatex modules check for latex mode. Static variable allocation is now discussed in the FAQ. An image histogram and contour example was added. The diatom example was modified to illustrate interaction of fixed-sized and scaled coordinates. Release Notes for Version 1.17 A workaround for a garbage collection bus error under MacOS X was implemented. A uniform histogram routine was added to the stats module. New frequency binning routines were added. The argument order of the nonuniform frequency binning routines was interchanged for consistency (backwards incompatible). The FAQ was updated. Release Notes for Version 1.16 Inline LaTeX mode was fixed. The legend routine was generalized to allow multiple entries per line; an example was added. The truepoint function was renamed framepoint. A function truepoint that works like point but accounts for fixed-sized objects was added. The picture.calculateTransform function now returns the actual transform used for fitting in the case where only an approximate picture size was available. A 2d frequency binning routine was added to the stats module. A memory leak was fixed. Release Notes for Version 1.15 Graphics label bounds and incorrect path bounds in latticeshade were fixed. The LaTeX color package is now used for the latex and pdflatex engines, to keep them informed of the current color. A unitlength of 1pt is now enforced in inlinetex mode. In cases like 2D graphs where only an approximate picture size estimate is available, the transform is adjusted so that the fitted frame meets the size specification. The cube animation and binary space partition were fixed. The determinant of a singular matrix now returns 0 instead of an error. Temporary pdf files are removed. The gv patches were removed since these are included in the long-awaited gv-3.6.2 release. A workaround for a compilation problem under MacOS X 10.3.9 was implemented. A DIN 15 CAD package and new examples were added. Release Notes for Version 1.14 General affine transforms and clipping may be applied to TeX labels; bugs in label alignment transformation were fixed. The TeX engines latex, pdflatex, tex, and pdftex are supported. Separate xunitsize and yunitsize scalings are allowed. Graph axis bound communication was added to allow axes with ticks and unextended axes to be called on an empty picture. Path labels are drawn after the path (to support UnFill). Filltype definitions were standardized; a Draw filltype was added (for drawing a bounding box around a label). New filloutside routines were added. Images can be drawn for irregular mesh contours and two-dimensional pen arrays. Landscape slides automatically enable PDF autorotate option. A MetaPost buildcycle routine was added. Setlocale errors are ignored. The "Cannot write to venn_.tex" error under Windows XP was fixed. Very old readline libraries found on many MacOS X systems are detected. The editing mode asy-mode.el supports Emacs version 21. The option \usepackage[inline]{asymptote} is now supported under both latex and pdflatex. Release Notes for Version 1.13 Image and contour transposition conventions for matrices were standardized; resolution arguments were removed from the matrix contour routines. The bounding box is now correctly calculated for square pen caps. A bug in drawline was fixed. An up argument was added to the projection routines to specify the camera orientation. The definition and documentation of cone was fixed; surface function signatures were consolidated. New 3d examples were added. Legends and markers are now allowed when drawing superpaths. Zero page alignment no longer suppresses labels; bounding box fuzz was removed. Intelligent interactive auto-completion was added. If scroll is negative, an entire page is scrolled. Support for Adobe Reader annotations was added. Write without data arguments now works like write with data arguments. A list function displays all global functions and variables in a module. The Emacs asy-mode.el was improved. A FAQ was added. Release Notes for Version 1.12 PDF transparency was implemented. The documentation of Bezier curves was improved. Bounding box calculations now account for label scaling. A special case of the Step calculation in graph.asy was fixed. The function scroll(int) was changed to a setting; a quit (q) option was added to the scroll facility. To avoid an unwanted ghostscript window, gswin32c (rather than gswin32) is used by default for producing pdf files under MSDOS. Release Notes for Version 1.11 The defaultformat string is used again for graph tick labelling commands instead of an empty format string. A workaround for the broken libsigsegv-2.3 library that caused a premature exit(1) was implemented. An extra blank line at the end of 3D array writes was removed; 3D array transpose and copy functions were added. The realmult routine was moved to runtime and documented. The example embeddedmovie of embedding movies within PDF files was added. Overflow diagnostic messages during mpeg merges are now suppressed. A twice setting was added to resolve LaTeX references. The settings module is now globally accessible. Duplicate trace messages were pruned. Debugger breakpoints can now be set using a matching substring instead of a line number. Conditional breakpoints are now supported. Runtime errors and interrupts no longer reset the interactive environment. Release Notes for Version 1.10 Parametric surfaces were implemented and parametric graphs now respect picture scaling. Fill and FillDraw now work for markers and superpaths. A bug in reading strings from files was fixed. Support for MikTeX 2.5 and Autoconf > 2.59 was added. Asymptote and output filenames can now contain spaces. Interrupts are working again. A line-based debugger was implemented. Release Notes for Version 1.09 The workaround for the gv-3.6.1 option handling bug now supports earlier versions of gv, including gv-3.5.8. By default, Ghostscript version 8.54 is used by the MSWindows version to produce PDF files. Release Notes for Version 1.08 Resolution problems in the contour routines were fixed; null contour labels are now suppressed. Configuration problems were fixed; the malloc configuration checks were removed and the help command again knows the correct location of the manual. In the slides package, some stepping bugs were fixed, an institution field was added to the titlepage, and vbox support (say for aligned equations) was added. A colorless(pen) function that strips pen color attributes was added. A clean copy of the source files is now shipped. Release Notes for Version 1.07 This release implements uniform and irregular mesh contour drawing algorithms: contours can be individually labelled or filled using a colour density palette. The flowchart interface and alignment were improved. A slope fields package was added. The arrow size limiting code was fixed. Some bugs in makepen were fixed. Image and shading functions now respect the -gray, -rgb, -cmyk, and -bw options. Date arithmetic routines were added. Several small bugs in the graph routines were fixed. Custom three-dimensional projections can now be easily constructed. The public keyword is now the default permission modifer. A new keyword, restricted, makes variables readable but not writeable outside the structure in which they are defined (previous this was the default behaviour). A user-transparent work around for the backwards-incompatible command-line options of gv-3.6.1 was implemented. Various configuration problems were addressed to better support the Asymptote rpm for the Fedora Core Extras project. A cputime() function was added. Release Notes for Version 1.06 General flowchart routines and an example were added. Papersizes other than letter now work with -outformat pdf again. Performance was improved by avoiding unnecessary output flushing. An asycolors.sty package was added to make LaTeX aware of CMYK versions of predefined Asymptote colours. The default pdf viewer for MacOS is now "open". The -u option can now be specified multiple times on the command line. Optional x and y margin arguments were added to Fill. A reverse video option was added to slide.asy; titlepage and title by default call newslide, unless the currentpicture is empty. An argument was added to newslide to allow stepping to be turned off for that slide. The slidedemo example now generates any required eps files. A segmentation fault in eval was fixed. Release Notes for Version 1.05 Shaded and skeletal representations of surfaces of rotation were implemented. New oblique projections were added and bugs in the 3D graph routines were fixed. An argument reversal in one of the add routines was fixed. A clipping margin was added to unfill. General determinants were added. Sin, Cos, Tan, aSin, aCos, and aTan, which use degrees, are now built-in functions. The dash adjustment algorithm was improved. The cubicroots solver now works again when R=0. Internal operations are now added for all variable declarations of new arrays and functions. Automatic viewing can easily be turned off under MSDOS. Nonstandard paper sizes are now correctly handled. The C locale is always used when producing postscript patterns. Configuration problems were fixed. The editor customization files asy.vim and asy-mode.el were moved to the Asymptote system directory. Stepping of slide presentations can now be enabled from the command line. Many new tests were implemented. The examples were moved to the examples subdirectory of the documentation directory. RPM files are now released. Release Notes for Version 1.04 A convenient presentation slide package was developed. The misalignment of TeX and PostScript layers was fixed by giving includegraphics the exact bounding box. The overall bounding box was also fixed. The tension atleast command and the clipping of remote labels by unfill near the frame boundary were fixed. Permission checking for types was added. The new point-like truepoint function uses the actual current picture size. Locale support, the ', I, and F format specifiers, and custom pagewidth and pageheight settings were added. A Ticks specifier draws ticks on both sides of the path; format="%" also suppress tick labels for logarithmic axis. The linetype adjustment to the arclength was improved and can now be optionally disabled. Color names were systematized, including texcolors and x11colors. A general purpose user command-line option accepts arbitrary Asymptote code as a string. All duplicate path points in three.asy are now removed. A convenient fixedscaling picture sizing routine was added. Selected special functions from the GNU scientific library, DESTDIR support, and a Python module to access Asymptote commands were added. The legend skip is now based on the actual legend entry height, not the fontsize. A backwards incompatibility was introduced in attach, add, and legends (add and attach take arguments in the same order as label): attach(point(E),legend(20E),UnFill) -> attach(legend(),point(E),20E,UnFill). Release Notes for Version 1.03 Support was added for compiling under gcc-4.1.0. A memory leak in interactive mode was fixed. A procedure for using CJK fonts was documented. The return type of the three-dimensional intersectionpoint routines was fixed. A function for inverting 2D points projected from 3D back onto a specified plane was added, along with a solid geometry package with routines to draw cylinders. New xaxis(triple,real), min(guide3[]), and max(guide3[]) convenience functions were added. A Degrees function like degrees(pair), except that it returns 0 for a (0,0) argument rather than generating an error, was added. Interactive mode (without command-line editing or history) now works even in the absence of the GNU readline library. An upper limit (100000) on the number of calls to intersectcubics per cubic segment was imposed on the intersection routines. The documentation was updated. Release Notes for Version 1.02 Lighting was implemented for surfaces described by functions and matrices. A bug in the positioning of axis labels was fixed. The type of randMax was fixed. Configuration and diagnostics were improved; the "dir" setting in configuration files is respected. Under MSDOS, the configuration file is now %USERPROFILE%/.asy/config.asy; configuration settings now work as documented. On UNIX systems, installation can optionally be performed without root privileges. Errors thrown by the parser while reading the configuration file are now handled gracefully. The patches to pstoedit were removed since they are now included in pstoedit-3.44. Release Notes for Version 1.01 A bug in the surface plot of a matrix was fixed. A workaround was implemented for the broken GNU readline/history library under MacOS. Release Notes for Version 1.00 A pen bounds error was fixed. A bug in the linear equations solver was fixed. Images now transform properly and nonsquare images appear correctly. The legend argument of draw accepts a Label. An interface to the movie15 package for embedding movies, sounds, and 3D objects within a PDF file was added. A bug where nonsolid pen types were ignored was fixed. Missing xpart, ypart, and zpart functions were re-added. A segmentation fault in format was fixed. An interface to the GNU readline function was added to allow editing of input. A complement function was added. A bug in the 2D graph tick selection routines was fixed; xlimits and ylimits no longer crop data by default. For consistency, the "includegraphics" labeling function was renamed to "graphic". Release Notes for Version 0.99 A bus error and compilation error under MacOS X were fixed. If -debug is set, execution continues after the first error. The "make check" code was fixed. The contributed MacOS X binary site is now mentioned in the documentation. Release Notes for Version 0.98 Command-line options and configuration variables were reorganized into an Asymptote settings module, allowing default values to be set in ~/.asy/config.asy (~/.asy/options is obsolete). Command-line options can be negated by prepending -no to the option name. Type-dependent function and record operators are now added to the parent record. Execution stops after the first error in a runnable. Two- and three-dimensional array min/max functions for all ordered builtin types were implemented. Comments are now allowed within 3d data blocks. The base file plain.asy was split into many subfiles. The currentpen nib is respected. Warning messages are suppressed when shipping out an empty picture. The tick computation was fixed when xaxis and yaxis are called with explicit limits. The -t option was removed as it is no longer needed for generating inline tex files. Machine constants are now implemented as variables rather than functions. Release Notes for Version 0.97 An uninitialized pen transform bug was fixed. A workaround was added for a readline incompatibility under MacOS X 10.4.3. Incorrect and missing names for builtin function arguments were fixed. Duplicate functions were removed. Release Notes for Version 0.96 A MetaPost-style makepen function allows the default pen nib to be changed to any polygonal (possibly nonconvex) cyclic path. A unitsize argument was added to the shipout command. Three-dimensional lighting effects were added and illustrated with the Gouraud shading of a sphere. The MidArrow attribute was fixed. Builtin functions now have named arguments. Brackets are now part of the quote syntax. The write command was generalized to allow writing a list of vectors as columns. Drawing to standard output now works even when there are no labels. The -noView command was replace by -nView or -no View. Several segmentation faults were fixed. Custom axis types were documented. Release Notes for Version 0.95 A memory leak was fixed; garbage collection messages are now suppressed unless the -d option is given. In interactive mode, a reset keyword was implemented to restore the environment, except for the scroll setting. The interactive input command now does an automatic reset. A link was added to the GNU readline library documentation for customizing interactive key bindings. A hang in scroll mode on an end-of-file condition was fixed. To reduce LaTeX memory usage, the scalebox macro is used only where required. A legend problem was fixed. The documentation was updated. Release Notes for Version 0.94 A label bug arising from a conflict between some versions of the LaTeX pstricks and graphicx packages was fixed. Embedded LaTeX files are always run in quiet (-noView) mode. Frame loading issues with imported types (for example, with the triangle SAS constructor in the geometry module) was fixed. The command import graph is now an abbreviation for access graph; unravel graph. Release Notes for Version 0.93 The import scheme was completely redesigned, with new keywords access, unravel, from, and include. A true (rather than emulated) interactive mode and runtime imports have been implemented. The default pdf browser is now acroread; the pdf fuzz workaround for gv was removed. The tension3 and curl3 keywords were re-added; a surface graph routine for matrices was implemented. Problems with csv mode were fixed. The function defaultpen() was renamed to resetdefaultpen(). Integer division via quotient(int,int) is now consistent with the modulo (%) operator. Checks for integer overflow and erf, erfc, and gamma functions were added. More descriptive names latticeshade, axialshade, radialshade, and gouraudshade for the shading routines were chosen. Horizontal and vertical label scaling was implemented. Default command line style-parameters can now be stored in ~/.asy/options. The interactive history file is now ~/.asy/history by default unless -localhistory is specified. Outputting to standard output via "-o -" is now allowed. Release Notes for Version 0.92 Clipping now clips labels and all layers of a picture, not just the most recent one. A bug in precontrol and postcontrol was fixed. A ticklabel bug and precision errors at +/-1e-4 were fixed. An example of a "broken" x axis was added. A dot product now requires explicit pair arguments. The implicit cast from real to pen was removed. Straight flags are now preserved when using a path as part of a guide. An UnFill filltype was added for clipping underneath labels and legends. A struct marker was added to support arbitrary marker locations. Directories are no longer stripped from explicit output filenames. A function inside was implemented to test whether a point is inside a cyclic path. The routines inside, quadratic solver, and intersect in math.asy were replaced by internal C++ routines. A robust real cubic root solver was added. A floating point exception in complex powers when base is zero was fixed. Colinearity checks were added to the leastsquares routine. The interface to plane was changed to return a representation of the plane through point O with normal cross(u,v). The routine intersectionpoint was moved to plain.asy and a 3d version was added to three.asy. We now draw over existing TeX layers when doing 3d hidden surface removal. A 3d aspect ratio can now be specified. A gui() function and MSWindows support for xasy was added; this will require renaming "gui(" to "GUI(" in any existing .gui files. The dir argument of picture.fit() was moved to add(frame,pair) and attach(frame,pair): add(pic.fit(E)) -> add(pic.fit(),E). Release Notes for Version 0.91 Fixed GUI transforms: grouping should not depend on deconstruct flag. Release Notes for Version 0.90 Default function arguments are now evaluated in the scope where the function is defined, not in the scope of the caller. The depth handling of deferred TeX labels was fixed. The positioning of 3d axes labels was improved; an example showing tick and axis label rotation was added. A minimum value of fuzz in the intersect routines is enforced to prevent infinite loops. An error in the man page regarding the -t option was fixed. The write function was generalized to handle an arbitrary number of data values. Release Notes for Version 0.89 The processing of GUI files was fixed. User-specified ticks now work also with logarithmic axes. The arguments of LeftTicks and RightTicks were standardized; it is now possible to include a general string(real) routine to typeset each label. Logarithmic axes ranges of less than a decade are no longer upscaled when autoscaling is disabled. All references to the mailing list were removed from the documentation since the forum is now used in its place. The temporary included PostScript file suffix was renamed from "ps" to "eps". Release Notes for Version 0.88 The graph routines were overhauled to support both two- and three- dimensional axes, partitioning them uniformly in tick value space, not with respect to arclength. An empty format string is treated as defaultformat. A fuzz parameter was added to the intersect routines; these routines now work for points. Data file comments were implemented. The perpendicular routine now uses an alignment argument; scale(pair) was removed. An option was added to asymptote.sty to make all LaTeX symbols visible, along with a second optional string to Label for providing a size estimate for undefined labels. Numerous small bugs were fixed; the pstoedit patch was updated. The installation and instructions were improved. An environment variable for every external command was added. The argument order of the axes routines was standardized; a call like xaxis(min,max,"$x$",red,Bottom,LeftTicks); should now be written xaxis("$x$",Bottom,min,max,red,LeftTicks); Release Notes for Version 0.87 This release implements general hidden surface removal using a binary space partition and adds three-dimensional versions of the standard path functions (arclength, subpath, intersect, etc.), along with circle and arc functions. Hidden surfaces in regular mesh surface plots now are properly handled from any camera location. The arclength rather than the length is used for determining default label position on paths; Relative(real) and Relative(pair) functions were added for labelling paths relative to the total arclength and local path direction. Structure constructors and operators == and != were implemented and documented. The permissions of static functions within structures was fixed. A pen argument to filltype Fill to specify an interior pen distinct from the boundary pen was added. For convenience, array push members now return the pushed element. A missing shift in Label.out(frame) was added. The feynman module was updated to include a new function texshipout; MidArrow was moved to plain.asy. The optional position arguments of BeginArrow and related functions were fixed. A numerically robust quadratic equation solver was added. Release Notes for Version 0.86 Fixed make man problems. Release Notes for Version 0.85 A fully three-dimensional, rotationally invariant, generalization of the two-dimensional MetaPost path construction algorithms has been implemented. A tridiagonal solver was added. Adobe's automatic rotation of PDF files was disabled. Cyclic indices are now allowed only on arrays having the virtual cyclic flag set to true. The bug fix in simplex was generalized. An online help option was added to interactive mode; exit is now a synonym for quit. Microsoft Windows resource fields and an icon were added. ASYMPTOTE_DIR can now be a list of directories. Since some files were moved in this release, Microsoft users may wish to first uninstall the previous release to avoid duplicate files. Release Notes for Version 0.84 This release ports Asymptote to the Microsoft Windows operating system; an executable file is distributed. Label parameters are now in a structure called Label, to which strings are implicitly cast, and which can be rotated and shifted with a transform. Automatic sizing under picture transformation was fixed. A bug in the simplex method was fixed. Lattice and Gouraud shading were added. An array append method, virtual transform components, and transform 6-tuple notation were added. A pen and filltype were added to legend. The 2d graph and palette code were cleaned up. An extend option was added to draw ticks across the graph for producing a grid. Problems with nullguide3 were fixed, the arguments of 3d rotate were swapped, and 3d reflections were added. A spurious papersize comment inserted by newer versions of dvips was removed. Pstoedit support was updated. This release introduces a few minor backward incompatibilities. Here is a summary of the main changes: draw("text",(0,0)--(1,1),1.0) -> draw(Label("text",1.0),(0,0)--(1,1)) label("text",90,(0,0)) -> label(rotate(90)*"text",(0,0)) labeldot("text",(0,0)) -> dot("text",(0,0)) labeldot((0,0)) -> dot(Label,(0,0)) labelbox(2mm,2mm,"text",(0,0)) -> box(Label("text",(0,0)),2mm,2mm) xaxis("$x$",0.5) -> xaxis(Label("$x$",0.5)) labelxtick(1) -> xtick(Label,1) Release Notes for Version 0.83 This release extends Asymptote to three dimensions. A triple type (which replaces the old vector type in math.asy) and a guide3 type were added, along with the 3D projection routines in three.asy. Three-dimensional arrays can now be read in line mode, using blank lines as block delimiters. An array pop function was added. Math mode ($ delimiters) were moved to within the "defaultformat" string, to allow use of non-math mode fonts in tick labels (by overriding the default format). A pticklabel option for drawing tick labels with a different pen was added. Routines labelxtick and labelytick were added, and the tick size and shift in xtick were fixed. The autoscaling of unextended axes was fixed. The xline and yline routines were renamed to xequals and yequals, Dot was renamed to dot, Cross was renamed to cross, the function "Angle(pair)" was renamed to "degrees(pair)", and a "Degrees(pair)" function was added to math.asy. The Metapost --- operator and the replacement :: for the MetaPost ... operator were implemented. A segmentation fault involving controls points with direction specifiers and a bug in "string font(pen)" were fixed. Tensions in straight sections of paths are now handled as in MetaPost. The -l option was reimplemented. Release Notes for Version 0.82 Initializers for structures and general cast operators can be specified. Functions can be called with named (keyword) arguments, in any order. Rest arguments are supported. Size and aspect ratio arguments, which may be specified with "size", were removed from "shipout". The tick routines were standardized; custom tick locations and arrows on axes were implemented. The default frame initializer nullframe was renamed to newframe. A segmentation fault in the file garbage collection code and an optimization-related bug in fill were fixed. Unlike in the C and C++ languages, an assignment in a function argument is now interpreted as an assignment to a parameter of the same name in the function signature, not within the local scope. The command-line option -d may be used to check Asymptote code for cases where a named function argument may be mistaken for a local assignment. Release Notes for Version 0.81 A guide solver bug was fixed, allowing the construction of graphs with a single data point. Compilation under g++-4.0.0 is now supported. Release Notes for Version 0.80 A segmentation fault on the alpha (cxx) and mac platforms was fixed. All members of the picture structure are now deep copied. The latest Boehm garbage collector (version 6.5) is used by default. Release Notes for Version 0.79 Types are now cached to speed up parsing. All outstanding garbage collection issues were addressed. The autoscaling of scaled axes was fixed. Another example of a secondary axis was added to the documentation. A Pythagorean tree example illustrates picture transforms. Release Notes for Version 0.78 A binary search routine was added for sorted arrays. The handling of NAN values was fixed. The "checkaxis" test in graph.asy was improved. A problem with implicit closing of files was fixed. Minor changes were made to support compilation under Cygwin. A workaround for the garbage collection warning about repeated allocation of very large blocks was introduced, along with other miscellaneous garbage collection updates. A configuration option was added to request use of a (slower, multi-theaded) system version of the Boehm garbage collector. Release Notes for Version 0.77 Integer arguments are now converted to real values before dividing and a real quotient is returned. The "quotient(int, int)" function returns the integer part of that result. Garbage collection has been implemented to fix memory leaks. A knot solving bug was fixed. Pen "plabel" vs. "p" issues were addressed. The eval function was renamed to map and the new eval(string) function was documented. The concat function can be used to concatenate two arrays. Complex exponential and logarithmic functions were added. The new function reltime can be used to compute the label position argument for draw. A new geometry module includes a triangle structure and functions to draw interior arcs of triangles and perpendicular symbols. Release Notes for Version 0.76 Installation has been simplified by removing the last remaining dependency on the boost header files. A "plabel" argument was added to "draw" to allow labels and legends to use a different pen than the curve itself. The pen arguments in the axes routines were rearranged to be consistent with "draw". TeX errors in interactive mode and the TeX preamble are now handled properly. New functions "getstring" and "getreal" can get and remember user parameters. Marker frame arrays, a "Mark(int)" function, and "node", "value", and "slope" path computation functions were added. Problems with implicit scaling were addressed. The "without side-effect" warning was removed. An option was added to list all loaded global functions. The documentation of structures was improved. Release Notes for Version 0.75 This release fixes a number of bugs with the new parser controller, including a segmentation fault with the -p option, problems with interactive mode, and problems reading from standard input. The graph module now uses a better default value of axislabelmargin for positioning axis labels. The put argument of the axis routines was moved to the end of the argument list, for consistency with draw. Convenient xline and yline interfaces to the axis routines were added. The definition of the correlation coefficient in the least squares routine was fixed, and a fit function was added to the 'linefit' structure. A linear interpolation (with endpoint extrapolation) and a binary search routine were added to math.asy. Release Notes for Version 0.74 This release fixes a segmentation fault in version 0.73 and also reduces the default number of colors in image palettes to work around PostScript/PDF limitations (that can cause the manual not to print). Release Notes for Version 0.73 A more efficient type-safe union was used to speed up the virtual machine by roughly a factor of 5. New routines "ellipse" and "labelellipse" were added for drawing ovals around frames and labels. The function "bbox(frame)" was renamed "box(frame)". These routines now prepend to the frame for filling with a background color; they also return the boundary as a guide. A workaround was added for a bug in gcc version 3.3 to facilitate compilation under Darwin (MacOS). Many internal coding improvements were made. ./asymptote-2.41/config.guess0000644000175000017500000012753413064427076016074 0ustar norbertnorbert#! /bin/sh # Attempt to guess a canonical system name. # Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, # 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 # Free Software Foundation, Inc. timestamp='2008-01-23' # This file is free software; you can redistribute it and/or modify it # under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA # 02110-1301, USA. # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under # the same distribution terms that you use for the rest of that program. # Originally written by Per Bothner . # Please send patches to . Submit a context # diff and a properly formatted ChangeLog entry. # # This script attempts to guess a canonical system name similar to # config.sub. If it succeeds, it prints the system name on stdout, and # exits with 0. Otherwise, it exits with 1. # # The plan is that this can be called by configure scripts if you # don't specify an explicit build system type. me=`echo "$0" | sed -e 's,.*/,,'` usage="\ Usage: $0 [OPTION] Output the configuration name of the system \`$me' is run on. Operation modes: -h, --help print this help, then exit -t, --time-stamp print date of last modification, then exit -v, --version print version number, then exit Report bugs and patches to ." version="\ GNU config.guess ($timestamp) Originally written by Per Bothner. Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." help=" Try \`$me --help' for more information." # Parse command line while test $# -gt 0 ; do case $1 in --time-stamp | --time* | -t ) echo "$timestamp" ; exit ;; --version | -v ) echo "$version" ; exit ;; --help | --h* | -h ) echo "$usage"; exit ;; -- ) # Stop option processing shift; break ;; - ) # Use stdin as input. break ;; -* ) echo "$me: invalid option $1$help" >&2 exit 1 ;; * ) break ;; esac done if test $# != 0; then echo "$me: too many arguments$help" >&2 exit 1 fi trap 'exit 1' 1 2 15 # CC_FOR_BUILD -- compiler used by this script. Note that the use of a # compiler to aid in system detection is discouraged as it requires # temporary files to be created and, as you can see below, it is a # headache to deal with in a portable fashion. # Historically, `CC_FOR_BUILD' used to be named `HOST_CC'. We still # use `HOST_CC' if defined, but it is deprecated. # Portable tmp directory creation inspired by the Autoconf team. set_cc_for_build=' trap "exitcode=\$?; (rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null) && exit \$exitcode" 0 ; trap "rm -f \$tmpfiles 2>/dev/null; rmdir \$tmp 2>/dev/null; exit 1" 1 2 13 15 ; : ${TMPDIR=/tmp} ; { tmp=`(umask 077 && mktemp -d "$TMPDIR/cgXXXXXX") 2>/dev/null` && test -n "$tmp" && test -d "$tmp" ; } || { test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir $tmp) ; } || { tmp=$TMPDIR/cg-$$ && (umask 077 && mkdir $tmp) && echo "Warning: creating insecure temp directory" >&2 ; } || { echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; } ; dummy=$tmp/dummy ; tmpfiles="$dummy.c $dummy.o $dummy.rel $dummy" ; case $CC_FOR_BUILD,$HOST_CC,$CC in ,,) echo "int x;" > $dummy.c ; for c in cc gcc c89 c99 ; do if ($c -c -o $dummy.o $dummy.c) >/dev/null 2>&1 ; then CC_FOR_BUILD="$c"; break ; fi ; done ; if test x"$CC_FOR_BUILD" = x ; then CC_FOR_BUILD=no_compiler_found ; fi ;; ,,*) CC_FOR_BUILD=$CC ;; ,*,*) CC_FOR_BUILD=$HOST_CC ;; esac ; set_cc_for_build= ;' # This is needed to find uname on a Pyramid OSx when run in the BSD universe. # (ghazi@noc.rutgers.edu 1994-08-24) if (test -f /.attbin/uname) >/dev/null 2>&1 ; then PATH=$PATH:/.attbin ; export PATH fi UNAME_MACHINE=`(uname -m) 2>/dev/null` || UNAME_MACHINE=unknown UNAME_RELEASE=`(uname -r) 2>/dev/null` || UNAME_RELEASE=unknown UNAME_SYSTEM=`(uname -s) 2>/dev/null` || UNAME_SYSTEM=unknown UNAME_VERSION=`(uname -v) 2>/dev/null` || UNAME_VERSION=unknown # Note: order is significant - the case branches are not exclusive. case "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" in *:NetBSD:*:*) # NetBSD (nbsd) targets should (where applicable) match one or # more of the tupples: *-*-netbsdelf*, *-*-netbsdaout*, # *-*-netbsdecoff* and *-*-netbsd*. For targets that recently # switched to ELF, *-*-netbsd* would select the old # object file format. This provides both forward # compatibility and a consistent mechanism for selecting the # object file format. # # Note: NetBSD doesn't particularly care about the vendor # portion of the name. We always set it to "unknown". sysctl="sysctl -n hw.machine_arch" UNAME_MACHINE_ARCH=`(/sbin/$sysctl 2>/dev/null || \ /usr/sbin/$sysctl 2>/dev/null || echo unknown)` case "${UNAME_MACHINE_ARCH}" in armeb) machine=armeb-unknown ;; arm*) machine=arm-unknown ;; sh3el) machine=shl-unknown ;; sh3eb) machine=sh-unknown ;; sh5el) machine=sh5le-unknown ;; *) machine=${UNAME_MACHINE_ARCH}-unknown ;; esac # The Operating System including object format, if it has switched # to ELF recently, or will in the future. case "${UNAME_MACHINE_ARCH}" in arm*|i386|m68k|ns32k|sh3*|sparc|vax) eval $set_cc_for_build if echo __ELF__ | $CC_FOR_BUILD -E - 2>/dev/null \ | grep __ELF__ >/dev/null then # Once all utilities can be ECOFF (netbsdecoff) or a.out (netbsdaout). # Return netbsd for either. FIX? os=netbsd else os=netbsdelf fi ;; *) os=netbsd ;; esac # The OS release # Debian GNU/NetBSD machines have a different userland, and # thus, need a distinct triplet. However, they do not need # kernel version information, so it can be replaced with a # suitable tag, in the style of linux-gnu. case "${UNAME_VERSION}" in Debian*) release='-gnu' ;; *) release=`echo ${UNAME_RELEASE}|sed -e 's/[-_].*/\./'` ;; esac # Since CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM: # contains redundant information, the shorter form: # CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM is used. echo "${machine}-${os}${release}" exit ;; *:OpenBSD:*:*) UNAME_MACHINE_ARCH=`arch | sed 's/OpenBSD.//'` echo ${UNAME_MACHINE_ARCH}-unknown-openbsd${UNAME_RELEASE} exit ;; *:ekkoBSD:*:*) echo ${UNAME_MACHINE}-unknown-ekkobsd${UNAME_RELEASE} exit ;; *:SolidBSD:*:*) echo ${UNAME_MACHINE}-unknown-solidbsd${UNAME_RELEASE} exit ;; macppc:MirBSD:*:*) echo powerpc-unknown-mirbsd${UNAME_RELEASE} exit ;; *:MirBSD:*:*) echo ${UNAME_MACHINE}-unknown-mirbsd${UNAME_RELEASE} exit ;; alpha:OSF1:*:*) case $UNAME_RELEASE in *4.0) UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $3}'` ;; *5.*) UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $4}'` ;; esac # According to Compaq, /usr/sbin/psrinfo has been available on # OSF/1 and Tru64 systems produced since 1995. I hope that # covers most systems running today. This code pipes the CPU # types through head -n 1, so we only detect the type of CPU 0. ALPHA_CPU_TYPE=`/usr/sbin/psrinfo -v | sed -n -e 's/^ The alpha \(.*\) processor.*$/\1/p' | head -n 1` case "$ALPHA_CPU_TYPE" in "EV4 (21064)") UNAME_MACHINE="alpha" ;; "EV4.5 (21064)") UNAME_MACHINE="alpha" ;; "LCA4 (21066/21068)") UNAME_MACHINE="alpha" ;; "EV5 (21164)") UNAME_MACHINE="alphaev5" ;; "EV5.6 (21164A)") UNAME_MACHINE="alphaev56" ;; "EV5.6 (21164PC)") UNAME_MACHINE="alphapca56" ;; "EV5.7 (21164PC)") UNAME_MACHINE="alphapca57" ;; "EV6 (21264)") UNAME_MACHINE="alphaev6" ;; "EV6.7 (21264A)") UNAME_MACHINE="alphaev67" ;; "EV6.8CB (21264C)") UNAME_MACHINE="alphaev68" ;; "EV6.8AL (21264B)") UNAME_MACHINE="alphaev68" ;; "EV6.8CX (21264D)") UNAME_MACHINE="alphaev68" ;; "EV6.9A (21264/EV69A)") UNAME_MACHINE="alphaev69" ;; "EV7 (21364)") UNAME_MACHINE="alphaev7" ;; "EV7.9 (21364A)") UNAME_MACHINE="alphaev79" ;; esac # A Pn.n version is a patched version. # A Vn.n version is a released version. # A Tn.n version is a released field test version. # A Xn.n version is an unreleased experimental baselevel. # 1.2 uses "1.2" for uname -r. echo ${UNAME_MACHINE}-dec-osf`echo ${UNAME_RELEASE} | sed -e 's/^[PVTX]//' | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'` exit ;; Alpha\ *:Windows_NT*:*) # How do we know it's Interix rather than the generic POSIX subsystem? # Should we change UNAME_MACHINE based on the output of uname instead # of the specific Alpha model? echo alpha-pc-interix exit ;; 21064:Windows_NT:50:3) echo alpha-dec-winnt3.5 exit ;; Amiga*:UNIX_System_V:4.0:*) echo m68k-unknown-sysv4 exit ;; *:[Aa]miga[Oo][Ss]:*:*) echo ${UNAME_MACHINE}-unknown-amigaos exit ;; *:[Mm]orph[Oo][Ss]:*:*) echo ${UNAME_MACHINE}-unknown-morphos exit ;; *:OS/390:*:*) echo i370-ibm-openedition exit ;; *:z/VM:*:*) echo s390-ibm-zvmoe exit ;; *:OS400:*:*) echo powerpc-ibm-os400 exit ;; arm:RISC*:1.[012]*:*|arm:riscix:1.[012]*:*) echo arm-acorn-riscix${UNAME_RELEASE} exit ;; arm:riscos:*:*|arm:RISCOS:*:*) echo arm-unknown-riscos exit ;; SR2?01:HI-UX/MPP:*:* | SR8000:HI-UX/MPP:*:*) echo hppa1.1-hitachi-hiuxmpp exit ;; Pyramid*:OSx*:*:* | MIS*:OSx*:*:* | MIS*:SMP_DC-OSx*:*:*) # akee@wpdis03.wpafb.af.mil (Earle F. Ake) contributed MIS and NILE. if test "`(/bin/universe) 2>/dev/null`" = att ; then echo pyramid-pyramid-sysv3 else echo pyramid-pyramid-bsd fi exit ;; NILE*:*:*:dcosx) echo pyramid-pyramid-svr4 exit ;; DRS?6000:unix:4.0:6*) echo sparc-icl-nx6 exit ;; DRS?6000:UNIX_SV:4.2*:7* | DRS?6000:isis:4.2*:7*) case `/usr/bin/uname -p` in sparc) echo sparc-icl-nx7; exit ;; esac ;; sun4H:SunOS:5.*:*) echo sparc-hal-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` exit ;; sun4*:SunOS:5.*:* | tadpole*:SunOS:5.*:*) echo sparc-sun-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` exit ;; i86pc:SunOS:5.*:* | i86xen:SunOS:5.*:*) echo i386-pc-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` exit ;; sun4*:SunOS:6*:*) # According to config.sub, this is the proper way to canonicalize # SunOS6. Hard to guess exactly what SunOS6 will be like, but # it's likely to be more like Solaris than SunOS4. echo sparc-sun-solaris3`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` exit ;; sun4*:SunOS:*:*) case "`/usr/bin/arch -k`" in Series*|S4*) UNAME_RELEASE=`uname -v` ;; esac # Japanese Language versions have a version number like `4.1.3-JL'. echo sparc-sun-sunos`echo ${UNAME_RELEASE}|sed -e 's/-/_/'` exit ;; sun3*:SunOS:*:*) echo m68k-sun-sunos${UNAME_RELEASE} exit ;; sun*:*:4.2BSD:*) UNAME_RELEASE=`(sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null` test "x${UNAME_RELEASE}" = "x" && UNAME_RELEASE=3 case "`/bin/arch`" in sun3) echo m68k-sun-sunos${UNAME_RELEASE} ;; sun4) echo sparc-sun-sunos${UNAME_RELEASE} ;; esac exit ;; aushp:SunOS:*:*) echo sparc-auspex-sunos${UNAME_RELEASE} exit ;; # The situation for MiNT is a little confusing. The machine name # can be virtually everything (everything which is not # "atarist" or "atariste" at least should have a processor # > m68000). The system name ranges from "MiNT" over "FreeMiNT" # to the lowercase version "mint" (or "freemint"). Finally # the system name "TOS" denotes a system which is actually not # MiNT. But MiNT is downward compatible to TOS, so this should # be no problem. atarist[e]:*MiNT:*:* | atarist[e]:*mint:*:* | atarist[e]:*TOS:*:*) echo m68k-atari-mint${UNAME_RELEASE} exit ;; atari*:*MiNT:*:* | atari*:*mint:*:* | atarist[e]:*TOS:*:*) echo m68k-atari-mint${UNAME_RELEASE} exit ;; *falcon*:*MiNT:*:* | *falcon*:*mint:*:* | *falcon*:*TOS:*:*) echo m68k-atari-mint${UNAME_RELEASE} exit ;; milan*:*MiNT:*:* | milan*:*mint:*:* | *milan*:*TOS:*:*) echo m68k-milan-mint${UNAME_RELEASE} exit ;; hades*:*MiNT:*:* | hades*:*mint:*:* | *hades*:*TOS:*:*) echo m68k-hades-mint${UNAME_RELEASE} exit ;; *:*MiNT:*:* | *:*mint:*:* | *:*TOS:*:*) echo m68k-unknown-mint${UNAME_RELEASE} exit ;; m68k:machten:*:*) echo m68k-apple-machten${UNAME_RELEASE} exit ;; powerpc:machten:*:*) echo powerpc-apple-machten${UNAME_RELEASE} exit ;; RISC*:Mach:*:*) echo mips-dec-mach_bsd4.3 exit ;; RISC*:ULTRIX:*:*) echo mips-dec-ultrix${UNAME_RELEASE} exit ;; VAX*:ULTRIX*:*:*) echo vax-dec-ultrix${UNAME_RELEASE} exit ;; 2020:CLIX:*:* | 2430:CLIX:*:*) echo clipper-intergraph-clix${UNAME_RELEASE} exit ;; mips:*:*:UMIPS | mips:*:*:RISCos) eval $set_cc_for_build sed 's/^ //' << EOF >$dummy.c #ifdef __cplusplus #include /* for printf() prototype */ int main (int argc, char *argv[]) { #else int main (argc, argv) int argc; char *argv[]; { #endif #if defined (host_mips) && defined (MIPSEB) #if defined (SYSTYPE_SYSV) printf ("mips-mips-riscos%ssysv\n", argv[1]); exit (0); #endif #if defined (SYSTYPE_SVR4) printf ("mips-mips-riscos%ssvr4\n", argv[1]); exit (0); #endif #if defined (SYSTYPE_BSD43) || defined(SYSTYPE_BSD) printf ("mips-mips-riscos%sbsd\n", argv[1]); exit (0); #endif #endif exit (-1); } EOF $CC_FOR_BUILD -o $dummy $dummy.c && dummyarg=`echo "${UNAME_RELEASE}" | sed -n 's/\([0-9]*\).*/\1/p'` && SYSTEM_NAME=`$dummy $dummyarg` && { echo "$SYSTEM_NAME"; exit; } echo mips-mips-riscos${UNAME_RELEASE} exit ;; Motorola:PowerMAX_OS:*:*) echo powerpc-motorola-powermax exit ;; Motorola:*:4.3:PL8-*) echo powerpc-harris-powermax exit ;; Night_Hawk:*:*:PowerMAX_OS | Synergy:PowerMAX_OS:*:*) echo powerpc-harris-powermax exit ;; Night_Hawk:Power_UNIX:*:*) echo powerpc-harris-powerunix exit ;; m88k:CX/UX:7*:*) echo m88k-harris-cxux7 exit ;; m88k:*:4*:R4*) echo m88k-motorola-sysv4 exit ;; m88k:*:3*:R3*) echo m88k-motorola-sysv3 exit ;; AViiON:dgux:*:*) # DG/UX returns AViiON for all architectures UNAME_PROCESSOR=`/usr/bin/uname -p` if [ $UNAME_PROCESSOR = mc88100 ] || [ $UNAME_PROCESSOR = mc88110 ] then if [ ${TARGET_BINARY_INTERFACE}x = m88kdguxelfx ] || \ [ ${TARGET_BINARY_INTERFACE}x = x ] then echo m88k-dg-dgux${UNAME_RELEASE} else echo m88k-dg-dguxbcs${UNAME_RELEASE} fi else echo i586-dg-dgux${UNAME_RELEASE} fi exit ;; M88*:DolphinOS:*:*) # DolphinOS (SVR3) echo m88k-dolphin-sysv3 exit ;; M88*:*:R3*:*) # Delta 88k system running SVR3 echo m88k-motorola-sysv3 exit ;; XD88*:*:*:*) # Tektronix XD88 system running UTekV (SVR3) echo m88k-tektronix-sysv3 exit ;; Tek43[0-9][0-9]:UTek:*:*) # Tektronix 4300 system running UTek (BSD) echo m68k-tektronix-bsd exit ;; *:IRIX*:*:*) echo mips-sgi-irix`echo ${UNAME_RELEASE}|sed -e 's/-/_/g'` exit ;; ????????:AIX?:[12].1:2) # AIX 2.2.1 or AIX 2.1.1 is RT/PC AIX. echo romp-ibm-aix # uname -m gives an 8 hex-code CPU id exit ;; # Note that: echo "'`uname -s`'" gives 'AIX ' i*86:AIX:*:*) echo i386-ibm-aix exit ;; ia64:AIX:*:*) if [ -x /usr/bin/oslevel ] ; then IBM_REV=`/usr/bin/oslevel` else IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE} fi echo ${UNAME_MACHINE}-ibm-aix${IBM_REV} exit ;; *:AIX:2:3) if grep bos325 /usr/include/stdio.h >/dev/null 2>&1; then eval $set_cc_for_build sed 's/^ //' << EOF >$dummy.c #include main() { if (!__power_pc()) exit(1); puts("powerpc-ibm-aix3.2.5"); exit(0); } EOF if $CC_FOR_BUILD -o $dummy $dummy.c && SYSTEM_NAME=`$dummy` then echo "$SYSTEM_NAME" else echo rs6000-ibm-aix3.2.5 fi elif grep bos324 /usr/include/stdio.h >/dev/null 2>&1; then echo rs6000-ibm-aix3.2.4 else echo rs6000-ibm-aix3.2 fi exit ;; *:AIX:*:[456]) IBM_CPU_ID=`/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }'` if /usr/sbin/lsattr -El ${IBM_CPU_ID} | grep ' POWER' >/dev/null 2>&1; then IBM_ARCH=rs6000 else IBM_ARCH=powerpc fi if [ -x /usr/bin/oslevel ] ; then IBM_REV=`/usr/bin/oslevel` else IBM_REV=${UNAME_VERSION}.${UNAME_RELEASE} fi echo ${IBM_ARCH}-ibm-aix${IBM_REV} exit ;; *:AIX:*:*) echo rs6000-ibm-aix exit ;; ibmrt:4.4BSD:*|romp-ibm:BSD:*) echo romp-ibm-bsd4.4 exit ;; ibmrt:*BSD:*|romp-ibm:BSD:*) # covers RT/PC BSD and echo romp-ibm-bsd${UNAME_RELEASE} # 4.3 with uname added to exit ;; # report: romp-ibm BSD 4.3 *:BOSX:*:*) echo rs6000-bull-bosx exit ;; DPX/2?00:B.O.S.:*:*) echo m68k-bull-sysv3 exit ;; 9000/[34]??:4.3bsd:1.*:*) echo m68k-hp-bsd exit ;; hp300:4.4BSD:*:* | 9000/[34]??:4.3bsd:2.*:*) echo m68k-hp-bsd4.4 exit ;; 9000/[34678]??:HP-UX:*:*) HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'` case "${UNAME_MACHINE}" in 9000/31? ) HP_ARCH=m68000 ;; 9000/[34]?? ) HP_ARCH=m68k ;; 9000/[678][0-9][0-9]) if [ -x /usr/bin/getconf ]; then sc_cpu_version=`/usr/bin/getconf SC_CPU_VERSION 2>/dev/null` sc_kernel_bits=`/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null` case "${sc_cpu_version}" in 523) HP_ARCH="hppa1.0" ;; # CPU_PA_RISC1_0 528) HP_ARCH="hppa1.1" ;; # CPU_PA_RISC1_1 532) # CPU_PA_RISC2_0 case "${sc_kernel_bits}" in 32) HP_ARCH="hppa2.0n" ;; 64) HP_ARCH="hppa2.0w" ;; '') HP_ARCH="hppa2.0" ;; # HP-UX 10.20 esac ;; esac fi if [ "${HP_ARCH}" = "" ]; then eval $set_cc_for_build sed 's/^ //' << EOF >$dummy.c #define _HPUX_SOURCE #include #include int main () { #if defined(_SC_KERNEL_BITS) long bits = sysconf(_SC_KERNEL_BITS); #endif long cpu = sysconf (_SC_CPU_VERSION); switch (cpu) { case CPU_PA_RISC1_0: puts ("hppa1.0"); break; case CPU_PA_RISC1_1: puts ("hppa1.1"); break; case CPU_PA_RISC2_0: #if defined(_SC_KERNEL_BITS) switch (bits) { case 64: puts ("hppa2.0w"); break; case 32: puts ("hppa2.0n"); break; default: puts ("hppa2.0"); break; } break; #else /* !defined(_SC_KERNEL_BITS) */ puts ("hppa2.0"); break; #endif default: puts ("hppa1.0"); break; } exit (0); } EOF (CCOPTS= $CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null) && HP_ARCH=`$dummy` test -z "$HP_ARCH" && HP_ARCH=hppa fi ;; esac if [ ${HP_ARCH} = "hppa2.0w" ] then eval $set_cc_for_build # hppa2.0w-hp-hpux* has a 64-bit kernel and a compiler generating # 32-bit code. hppa64-hp-hpux* has the same kernel and a compiler # generating 64-bit code. GNU and HP use different nomenclature: # # $ CC_FOR_BUILD=cc ./config.guess # => hppa2.0w-hp-hpux11.23 # $ CC_FOR_BUILD="cc +DA2.0w" ./config.guess # => hppa64-hp-hpux11.23 if echo __LP64__ | (CCOPTS= $CC_FOR_BUILD -E - 2>/dev/null) | grep __LP64__ >/dev/null then HP_ARCH="hppa2.0w" else HP_ARCH="hppa64" fi fi echo ${HP_ARCH}-hp-hpux${HPUX_REV} exit ;; ia64:HP-UX:*:*) HPUX_REV=`echo ${UNAME_RELEASE}|sed -e 's/[^.]*.[0B]*//'` echo ia64-hp-hpux${HPUX_REV} exit ;; 3050*:HI-UX:*:*) eval $set_cc_for_build sed 's/^ //' << EOF >$dummy.c #include int main () { long cpu = sysconf (_SC_CPU_VERSION); /* The order matters, because CPU_IS_HP_MC68K erroneously returns true for CPU_PA_RISC1_0. CPU_IS_PA_RISC returns correct results, however. */ if (CPU_IS_PA_RISC (cpu)) { switch (cpu) { case CPU_PA_RISC1_0: puts ("hppa1.0-hitachi-hiuxwe2"); break; case CPU_PA_RISC1_1: puts ("hppa1.1-hitachi-hiuxwe2"); break; case CPU_PA_RISC2_0: puts ("hppa2.0-hitachi-hiuxwe2"); break; default: puts ("hppa-hitachi-hiuxwe2"); break; } } else if (CPU_IS_HP_MC68K (cpu)) puts ("m68k-hitachi-hiuxwe2"); else puts ("unknown-hitachi-hiuxwe2"); exit (0); } EOF $CC_FOR_BUILD -o $dummy $dummy.c && SYSTEM_NAME=`$dummy` && { echo "$SYSTEM_NAME"; exit; } echo unknown-hitachi-hiuxwe2 exit ;; 9000/7??:4.3bsd:*:* | 9000/8?[79]:4.3bsd:*:* ) echo hppa1.1-hp-bsd exit ;; 9000/8??:4.3bsd:*:*) echo hppa1.0-hp-bsd exit ;; *9??*:MPE/iX:*:* | *3000*:MPE/iX:*:*) echo hppa1.0-hp-mpeix exit ;; hp7??:OSF1:*:* | hp8?[79]:OSF1:*:* ) echo hppa1.1-hp-osf exit ;; hp8??:OSF1:*:*) echo hppa1.0-hp-osf exit ;; i*86:OSF1:*:*) if [ -x /usr/sbin/sysversion ] ; then echo ${UNAME_MACHINE}-unknown-osf1mk else echo ${UNAME_MACHINE}-unknown-osf1 fi exit ;; parisc*:Lites*:*:*) echo hppa1.1-hp-lites exit ;; C1*:ConvexOS:*:* | convex:ConvexOS:C1*:*) echo c1-convex-bsd exit ;; C2*:ConvexOS:*:* | convex:ConvexOS:C2*:*) if getsysinfo -f scalar_acc then echo c32-convex-bsd else echo c2-convex-bsd fi exit ;; C34*:ConvexOS:*:* | convex:ConvexOS:C34*:*) echo c34-convex-bsd exit ;; C38*:ConvexOS:*:* | convex:ConvexOS:C38*:*) echo c38-convex-bsd exit ;; C4*:ConvexOS:*:* | convex:ConvexOS:C4*:*) echo c4-convex-bsd exit ;; CRAY*Y-MP:*:*:*) echo ymp-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' exit ;; CRAY*[A-Z]90:*:*:*) echo ${UNAME_MACHINE}-cray-unicos${UNAME_RELEASE} \ | sed -e 's/CRAY.*\([A-Z]90\)/\1/' \ -e y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/ \ -e 's/\.[^.]*$/.X/' exit ;; CRAY*TS:*:*:*) echo t90-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' exit ;; CRAY*T3E:*:*:*) echo alphaev5-cray-unicosmk${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' exit ;; CRAY*SV1:*:*:*) echo sv1-cray-unicos${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' exit ;; *:UNICOS/mp:*:*) echo craynv-cray-unicosmp${UNAME_RELEASE} | sed -e 's/\.[^.]*$/.X/' exit ;; F30[01]:UNIX_System_V:*:* | F700:UNIX_System_V:*:*) FUJITSU_PROC=`uname -m | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'` FUJITSU_SYS=`uname -p | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz' | sed -e 's/\///'` FUJITSU_REL=`echo ${UNAME_RELEASE} | sed -e 's/ /_/'` echo "${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" exit ;; 5000:UNIX_System_V:4.*:*) FUJITSU_SYS=`uname -p | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz' | sed -e 's/\///'` FUJITSU_REL=`echo ${UNAME_RELEASE} | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz' | sed -e 's/ /_/'` echo "sparc-fujitsu-${FUJITSU_SYS}${FUJITSU_REL}" exit ;; i*86:BSD/386:*:* | i*86:BSD/OS:*:* | *:Ascend\ Embedded/OS:*:*) echo ${UNAME_MACHINE}-pc-bsdi${UNAME_RELEASE} exit ;; sparc*:BSD/OS:*:*) echo sparc-unknown-bsdi${UNAME_RELEASE} exit ;; *:BSD/OS:*:*) echo ${UNAME_MACHINE}-unknown-bsdi${UNAME_RELEASE} exit ;; *:FreeBSD:*:*) case ${UNAME_MACHINE} in pc98) echo i386-unknown-freebsd`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'` ;; amd64) echo x86_64-unknown-freebsd`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'` ;; *) echo ${UNAME_MACHINE}-unknown-freebsd`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'` ;; esac exit ;; i*:CYGWIN*:*) echo ${UNAME_MACHINE}-pc-cygwin exit ;; *:MINGW*:*) echo ${UNAME_MACHINE}-pc-mingw32 exit ;; i*:windows32*:*) # uname -m includes "-pc" on this system. echo ${UNAME_MACHINE}-mingw32 exit ;; i*:PW*:*) echo ${UNAME_MACHINE}-pc-pw32 exit ;; *:Interix*:[3456]*) case ${UNAME_MACHINE} in x86) echo i586-pc-interix${UNAME_RELEASE} exit ;; EM64T | authenticamd) echo x86_64-unknown-interix${UNAME_RELEASE} exit ;; IA64) echo ia64-unknown-interix${UNAME_RELEASE} exit ;; esac ;; [345]86:Windows_95:* | [345]86:Windows_98:* | [345]86:Windows_NT:*) echo i${UNAME_MACHINE}-pc-mks exit ;; i*:Windows_NT*:* | Pentium*:Windows_NT*:*) # How do we know it's Interix rather than the generic POSIX subsystem? # It also conflicts with pre-2.0 versions of AT&T UWIN. Should we # UNAME_MACHINE based on the output of uname instead of i386? echo i586-pc-interix exit ;; i*:UWIN*:*) echo ${UNAME_MACHINE}-pc-uwin exit ;; amd64:CYGWIN*:*:* | x86_64:CYGWIN*:*:*) echo x86_64-unknown-cygwin exit ;; p*:CYGWIN*:*) echo powerpcle-unknown-cygwin exit ;; prep*:SunOS:5.*:*) echo powerpcle-unknown-solaris2`echo ${UNAME_RELEASE}|sed -e 's/[^.]*//'` exit ;; *:GNU:*:*) # the GNU system echo `echo ${UNAME_MACHINE}|sed -e 's,[-/].*$,,'`-unknown-gnu`echo ${UNAME_RELEASE}|sed -e 's,/.*$,,'` exit ;; *:GNU/*:*:*) # other systems with GNU libc and userland echo ${UNAME_MACHINE}-unknown-`echo ${UNAME_SYSTEM} | sed 's,^[^/]*/,,' | tr '[A-Z]' '[a-z]'``echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'`-gnu exit ;; i*86:Minix:*:*) echo ${UNAME_MACHINE}-pc-minix exit ;; arm*:Linux:*:*) eval $set_cc_for_build if echo __ARM_EABI__ | $CC_FOR_BUILD -E - 2>/dev/null \ | grep -q __ARM_EABI__ then echo ${UNAME_MACHINE}-unknown-linux-gnu else echo ${UNAME_MACHINE}-unknown-linux-gnueabi fi exit ;; avr32*:Linux:*:*) echo ${UNAME_MACHINE}-unknown-linux-gnu exit ;; cris:Linux:*:*) echo cris-axis-linux-gnu exit ;; crisv32:Linux:*:*) echo crisv32-axis-linux-gnu exit ;; frv:Linux:*:*) echo frv-unknown-linux-gnu exit ;; ia64:Linux:*:*) echo ${UNAME_MACHINE}-unknown-linux-gnu exit ;; m32r*:Linux:*:*) echo ${UNAME_MACHINE}-unknown-linux-gnu exit ;; m68*:Linux:*:*) echo ${UNAME_MACHINE}-unknown-linux-gnu exit ;; mips:Linux:*:*) eval $set_cc_for_build sed 's/^ //' << EOF >$dummy.c #undef CPU #undef mips #undef mipsel #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL) CPU=mipsel #else #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB) CPU=mips #else CPU= #endif #endif EOF eval "`$CC_FOR_BUILD -E $dummy.c 2>/dev/null | sed -n ' /^CPU/{ s: ::g p }'`" test x"${CPU}" != x && { echo "${CPU}-unknown-linux-gnu"; exit; } ;; mips64:Linux:*:*) eval $set_cc_for_build sed 's/^ //' << EOF >$dummy.c #undef CPU #undef mips64 #undef mips64el #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL) CPU=mips64el #else #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB) CPU=mips64 #else CPU= #endif #endif EOF eval "`$CC_FOR_BUILD -E $dummy.c 2>/dev/null | sed -n ' /^CPU/{ s: ::g p }'`" test x"${CPU}" != x && { echo "${CPU}-unknown-linux-gnu"; exit; } ;; or32:Linux:*:*) echo or32-unknown-linux-gnu exit ;; ppc:Linux:*:*) echo powerpc-unknown-linux-gnu exit ;; ppc64:Linux:*:*) echo powerpc64-unknown-linux-gnu exit ;; alpha:Linux:*:*) case `sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' < /proc/cpuinfo` in EV5) UNAME_MACHINE=alphaev5 ;; EV56) UNAME_MACHINE=alphaev56 ;; PCA56) UNAME_MACHINE=alphapca56 ;; PCA57) UNAME_MACHINE=alphapca56 ;; EV6) UNAME_MACHINE=alphaev6 ;; EV67) UNAME_MACHINE=alphaev67 ;; EV68*) UNAME_MACHINE=alphaev68 ;; esac objdump --private-headers /bin/sh | grep ld.so.1 >/dev/null if test "$?" = 0 ; then LIBC="libc1" ; else LIBC="" ; fi echo ${UNAME_MACHINE}-unknown-linux-gnu${LIBC} exit ;; parisc:Linux:*:* | hppa:Linux:*:*) # Look for CPU level case `grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2` in PA7*) echo hppa1.1-unknown-linux-gnu ;; PA8*) echo hppa2.0-unknown-linux-gnu ;; *) echo hppa-unknown-linux-gnu ;; esac exit ;; parisc64:Linux:*:* | hppa64:Linux:*:*) echo hppa64-unknown-linux-gnu exit ;; s390:Linux:*:* | s390x:Linux:*:*) echo ${UNAME_MACHINE}-ibm-linux exit ;; sh64*:Linux:*:*) echo ${UNAME_MACHINE}-unknown-linux-gnu exit ;; sh*:Linux:*:*) echo ${UNAME_MACHINE}-unknown-linux-gnu exit ;; sparc:Linux:*:* | sparc64:Linux:*:*) echo ${UNAME_MACHINE}-unknown-linux-gnu exit ;; vax:Linux:*:*) echo ${UNAME_MACHINE}-dec-linux-gnu exit ;; x86_64:Linux:*:*) echo x86_64-unknown-linux-gnu exit ;; xtensa*:Linux:*:*) echo ${UNAME_MACHINE}-unknown-linux-gnu exit ;; i*86:Linux:*:*) # The BFD linker knows what the default object file format is, so # first see if it will tell us. cd to the root directory to prevent # problems with other programs or directories called `ld' in the path. # Set LC_ALL=C to ensure ld outputs messages in English. ld_supported_targets=`cd /; LC_ALL=C ld --help 2>&1 \ | sed -ne '/supported targets:/!d s/[ ][ ]*/ /g s/.*supported targets: *// s/ .*// p'` case "$ld_supported_targets" in elf32-i386) TENTATIVE="${UNAME_MACHINE}-pc-linux-gnu" ;; a.out-i386-linux) echo "${UNAME_MACHINE}-pc-linux-gnuaout" exit ;; coff-i386) echo "${UNAME_MACHINE}-pc-linux-gnucoff" exit ;; "") # Either a pre-BFD a.out linker (linux-gnuoldld) or # one that does not give us useful --help. echo "${UNAME_MACHINE}-pc-linux-gnuoldld" exit ;; esac # Determine whether the default compiler is a.out or elf eval $set_cc_for_build sed 's/^ //' << EOF >$dummy.c #include #ifdef __ELF__ # ifdef __GLIBC__ # if __GLIBC__ >= 2 LIBC=gnu # else LIBC=gnulibc1 # endif # else LIBC=gnulibc1 # endif #else #if defined(__INTEL_COMPILER) || defined(__PGI) || defined(__SUNPRO_C) || defined(__SUNPRO_CC) LIBC=gnu #else LIBC=gnuaout #endif #endif #ifdef __dietlibc__ LIBC=dietlibc #endif EOF eval "`$CC_FOR_BUILD -E $dummy.c 2>/dev/null | sed -n ' /^LIBC/{ s: ::g p }'`" test x"${LIBC}" != x && { echo "${UNAME_MACHINE}-pc-linux-${LIBC}" exit } test x"${TENTATIVE}" != x && { echo "${TENTATIVE}"; exit; } ;; i*86:DYNIX/ptx:4*:*) # ptx 4.0 does uname -s correctly, with DYNIX/ptx in there. # earlier versions are messed up and put the nodename in both # sysname and nodename. echo i386-sequent-sysv4 exit ;; i*86:UNIX_SV:4.2MP:2.*) # Unixware is an offshoot of SVR4, but it has its own version # number series starting with 2... # I am not positive that other SVR4 systems won't match this, # I just have to hope. -- rms. # Use sysv4.2uw... so that sysv4* matches it. echo ${UNAME_MACHINE}-pc-sysv4.2uw${UNAME_VERSION} exit ;; i*86:OS/2:*:*) # If we were able to find `uname', then EMX Unix compatibility # is probably installed. echo ${UNAME_MACHINE}-pc-os2-emx exit ;; i*86:XTS-300:*:STOP) echo ${UNAME_MACHINE}-unknown-stop exit ;; i*86:atheos:*:*) echo ${UNAME_MACHINE}-unknown-atheos exit ;; i*86:syllable:*:*) echo ${UNAME_MACHINE}-pc-syllable exit ;; i*86:LynxOS:2.*:* | i*86:LynxOS:3.[01]*:* | i*86:LynxOS:4.0*:*) echo i386-unknown-lynxos${UNAME_RELEASE} exit ;; i*86:*DOS:*:*) echo ${UNAME_MACHINE}-pc-msdosdjgpp exit ;; i*86:*:4.*:* | i*86:SYSTEM_V:4.*:*) UNAME_REL=`echo ${UNAME_RELEASE} | sed 's/\/MP$//'` if grep Novell /usr/include/link.h >/dev/null 2>/dev/null; then echo ${UNAME_MACHINE}-univel-sysv${UNAME_REL} else echo ${UNAME_MACHINE}-pc-sysv${UNAME_REL} fi exit ;; i*86:*:5:[678]*) # UnixWare 7.x, OpenUNIX and OpenServer 6. case `/bin/uname -X | grep "^Machine"` in *486*) UNAME_MACHINE=i486 ;; *Pentium) UNAME_MACHINE=i586 ;; *Pent*|*Celeron) UNAME_MACHINE=i686 ;; esac echo ${UNAME_MACHINE}-unknown-sysv${UNAME_RELEASE}${UNAME_SYSTEM}${UNAME_VERSION} exit ;; i*86:*:3.2:*) if test -f /usr/options/cb.name; then UNAME_REL=`sed -n 's/.*Version //p' /dev/null >/dev/null ; then UNAME_REL=`(/bin/uname -X|grep Release|sed -e 's/.*= //')` (/bin/uname -X|grep i80486 >/dev/null) && UNAME_MACHINE=i486 (/bin/uname -X|grep '^Machine.*Pentium' >/dev/null) \ && UNAME_MACHINE=i586 (/bin/uname -X|grep '^Machine.*Pent *II' >/dev/null) \ && UNAME_MACHINE=i686 (/bin/uname -X|grep '^Machine.*Pentium Pro' >/dev/null) \ && UNAME_MACHINE=i686 echo ${UNAME_MACHINE}-pc-sco$UNAME_REL else echo ${UNAME_MACHINE}-pc-sysv32 fi exit ;; pc:*:*:*) # Left here for compatibility: # uname -m prints for DJGPP always 'pc', but it prints nothing about # the processor, so we play safe by assuming i386. echo i386-pc-msdosdjgpp exit ;; Intel:Mach:3*:*) echo i386-pc-mach3 exit ;; paragon:*:*:*) echo i860-intel-osf1 exit ;; i860:*:4.*:*) # i860-SVR4 if grep Stardent /usr/include/sys/uadmin.h >/dev/null 2>&1 ; then echo i860-stardent-sysv${UNAME_RELEASE} # Stardent Vistra i860-SVR4 else # Add other i860-SVR4 vendors below as they are discovered. echo i860-unknown-sysv${UNAME_RELEASE} # Unknown i860-SVR4 fi exit ;; mini*:CTIX:SYS*5:*) # "miniframe" echo m68010-convergent-sysv exit ;; mc68k:UNIX:SYSTEM5:3.51m) echo m68k-convergent-sysv exit ;; M680?0:D-NIX:5.3:*) echo m68k-diab-dnix exit ;; M68*:*:R3V[5678]*:*) test -r /sysV68 && { echo 'm68k-motorola-sysv'; exit; } ;; 3[345]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0 | SHG2:*:4.0:3.0 | S7501*:*:4.0:3.0) OS_REL='' test -r /etc/.relid \ && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid` /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ && { echo i486-ncr-sysv4.3${OS_REL}; exit; } /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ && { echo i586-ncr-sysv4.3${OS_REL}; exit; } ;; 3[34]??:*:4.0:* | 3[34]??,*:*:4.0:*) /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ && { echo i486-ncr-sysv4; exit; } ;; m68*:LynxOS:2.*:* | m68*:LynxOS:3.0*:*) echo m68k-unknown-lynxos${UNAME_RELEASE} exit ;; mc68030:UNIX_System_V:4.*:*) echo m68k-atari-sysv4 exit ;; TSUNAMI:LynxOS:2.*:*) echo sparc-unknown-lynxos${UNAME_RELEASE} exit ;; rs6000:LynxOS:2.*:*) echo rs6000-unknown-lynxos${UNAME_RELEASE} exit ;; PowerPC:LynxOS:2.*:* | PowerPC:LynxOS:3.[01]*:* | PowerPC:LynxOS:4.0*:*) echo powerpc-unknown-lynxos${UNAME_RELEASE} exit ;; SM[BE]S:UNIX_SV:*:*) echo mips-dde-sysv${UNAME_RELEASE} exit ;; RM*:ReliantUNIX-*:*:*) echo mips-sni-sysv4 exit ;; RM*:SINIX-*:*:*) echo mips-sni-sysv4 exit ;; *:SINIX-*:*:*) if uname -p 2>/dev/null >/dev/null ; then UNAME_MACHINE=`(uname -p) 2>/dev/null` echo ${UNAME_MACHINE}-sni-sysv4 else echo ns32k-sni-sysv fi exit ;; PENTIUM:*:4.0*:*) # Unisys `ClearPath HMP IX 4000' SVR4/MP effort # says echo i586-unisys-sysv4 exit ;; *:UNIX_System_V:4*:FTX*) # From Gerald Hewes . # How about differentiating between stratus architectures? -djm echo hppa1.1-stratus-sysv4 exit ;; *:*:*:FTX*) # From seanf@swdc.stratus.com. echo i860-stratus-sysv4 exit ;; i*86:VOS:*:*) # From Paul.Green@stratus.com. echo ${UNAME_MACHINE}-stratus-vos exit ;; *:VOS:*:*) # From Paul.Green@stratus.com. echo hppa1.1-stratus-vos exit ;; mc68*:A/UX:*:*) echo m68k-apple-aux${UNAME_RELEASE} exit ;; news*:NEWS-OS:6*:*) echo mips-sony-newsos6 exit ;; R[34]000:*System_V*:*:* | R4000:UNIX_SYSV:*:* | R*000:UNIX_SV:*:*) if [ -d /usr/nec ]; then echo mips-nec-sysv${UNAME_RELEASE} else echo mips-unknown-sysv${UNAME_RELEASE} fi exit ;; BeBox:BeOS:*:*) # BeOS running on hardware made by Be, PPC only. echo powerpc-be-beos exit ;; BeMac:BeOS:*:*) # BeOS running on Mac or Mac clone, PPC only. echo powerpc-apple-beos exit ;; BePC:BeOS:*:*) # BeOS running on Intel PC compatible. echo i586-pc-beos exit ;; SX-4:SUPER-UX:*:*) echo sx4-nec-superux${UNAME_RELEASE} exit ;; SX-5:SUPER-UX:*:*) echo sx5-nec-superux${UNAME_RELEASE} exit ;; SX-6:SUPER-UX:*:*) echo sx6-nec-superux${UNAME_RELEASE} exit ;; SX-7:SUPER-UX:*:*) echo sx7-nec-superux${UNAME_RELEASE} exit ;; SX-8:SUPER-UX:*:*) echo sx8-nec-superux${UNAME_RELEASE} exit ;; SX-8R:SUPER-UX:*:*) echo sx8r-nec-superux${UNAME_RELEASE} exit ;; Power*:Rhapsody:*:*) echo powerpc-apple-rhapsody${UNAME_RELEASE} exit ;; *:Rhapsody:*:*) echo ${UNAME_MACHINE}-apple-rhapsody${UNAME_RELEASE} exit ;; *:Darwin:*:*) UNAME_PROCESSOR=`uname -p` || UNAME_PROCESSOR=unknown case $UNAME_PROCESSOR in unknown) UNAME_PROCESSOR=powerpc ;; esac echo ${UNAME_PROCESSOR}-apple-darwin${UNAME_RELEASE} exit ;; *:procnto*:*:* | *:QNX:[0123456789]*:*) UNAME_PROCESSOR=`uname -p` if test "$UNAME_PROCESSOR" = "x86"; then UNAME_PROCESSOR=i386 UNAME_MACHINE=pc fi echo ${UNAME_PROCESSOR}-${UNAME_MACHINE}-nto-qnx${UNAME_RELEASE} exit ;; *:QNX:*:4*) echo i386-pc-qnx exit ;; NSE-?:NONSTOP_KERNEL:*:*) echo nse-tandem-nsk${UNAME_RELEASE} exit ;; NSR-?:NONSTOP_KERNEL:*:*) echo nsr-tandem-nsk${UNAME_RELEASE} exit ;; *:NonStop-UX:*:*) echo mips-compaq-nonstopux exit ;; BS2000:POSIX*:*:*) echo bs2000-siemens-sysv exit ;; DS/*:UNIX_System_V:*:*) echo ${UNAME_MACHINE}-${UNAME_SYSTEM}-${UNAME_RELEASE} exit ;; *:Plan9:*:*) # "uname -m" is not consistent, so use $cputype instead. 386 # is converted to i386 for consistency with other x86 # operating systems. if test "$cputype" = "386"; then UNAME_MACHINE=i386 else UNAME_MACHINE="$cputype" fi echo ${UNAME_MACHINE}-unknown-plan9 exit ;; *:TOPS-10:*:*) echo pdp10-unknown-tops10 exit ;; *:TENEX:*:*) echo pdp10-unknown-tenex exit ;; KS10:TOPS-20:*:* | KL10:TOPS-20:*:* | TYPE4:TOPS-20:*:*) echo pdp10-dec-tops20 exit ;; XKL-1:TOPS-20:*:* | TYPE5:TOPS-20:*:*) echo pdp10-xkl-tops20 exit ;; *:TOPS-20:*:*) echo pdp10-unknown-tops20 exit ;; *:ITS:*:*) echo pdp10-unknown-its exit ;; SEI:*:*:SEIUX) echo mips-sei-seiux${UNAME_RELEASE} exit ;; *:DragonFly:*:*) echo ${UNAME_MACHINE}-unknown-dragonfly`echo ${UNAME_RELEASE}|sed -e 's/[-(].*//'` exit ;; *:*VMS:*:*) UNAME_MACHINE=`(uname -p) 2>/dev/null` case "${UNAME_MACHINE}" in A*) echo alpha-dec-vms ; exit ;; I*) echo ia64-dec-vms ; exit ;; V*) echo vax-dec-vms ; exit ;; esac ;; *:XENIX:*:SysV) echo i386-pc-xenix exit ;; i*86:skyos:*:*) echo ${UNAME_MACHINE}-pc-skyos`echo ${UNAME_RELEASE}` | sed -e 's/ .*$//' exit ;; i*86:rdos:*:*) echo ${UNAME_MACHINE}-pc-rdos exit ;; esac #echo '(No uname command or uname output not recognized.)' 1>&2 #echo "${UNAME_MACHINE}:${UNAME_SYSTEM}:${UNAME_RELEASE}:${UNAME_VERSION}" 1>&2 eval $set_cc_for_build cat >$dummy.c < # include #endif main () { #if defined (sony) #if defined (MIPSEB) /* BFD wants "bsd" instead of "newsos". Perhaps BFD should be changed, I don't know.... */ printf ("mips-sony-bsd\n"); exit (0); #else #include printf ("m68k-sony-newsos%s\n", #ifdef NEWSOS4 "4" #else "" #endif ); exit (0); #endif #endif #if defined (__arm) && defined (__acorn) && defined (__unix) printf ("arm-acorn-riscix\n"); exit (0); #endif #if defined (hp300) && !defined (hpux) printf ("m68k-hp-bsd\n"); exit (0); #endif #if defined (NeXT) #if !defined (__ARCHITECTURE__) #define __ARCHITECTURE__ "m68k" #endif int version; version=`(hostinfo | sed -n 's/.*NeXT Mach \([0-9]*\).*/\1/p') 2>/dev/null`; if (version < 4) printf ("%s-next-nextstep%d\n", __ARCHITECTURE__, version); else printf ("%s-next-openstep%d\n", __ARCHITECTURE__, version); exit (0); #endif #if defined (MULTIMAX) || defined (n16) #if defined (UMAXV) printf ("ns32k-encore-sysv\n"); exit (0); #else #if defined (CMU) printf ("ns32k-encore-mach\n"); exit (0); #else printf ("ns32k-encore-bsd\n"); exit (0); #endif #endif #endif #if defined (__386BSD__) printf ("i386-pc-bsd\n"); exit (0); #endif #if defined (sequent) #if defined (i386) printf ("i386-sequent-dynix\n"); exit (0); #endif #if defined (ns32000) printf ("ns32k-sequent-dynix\n"); exit (0); #endif #endif #if defined (_SEQUENT_) struct utsname un; uname(&un); if (strncmp(un.version, "V2", 2) == 0) { printf ("i386-sequent-ptx2\n"); exit (0); } if (strncmp(un.version, "V1", 2) == 0) { /* XXX is V1 correct? */ printf ("i386-sequent-ptx1\n"); exit (0); } printf ("i386-sequent-ptx\n"); exit (0); #endif #if defined (vax) # if !defined (ultrix) # include # if defined (BSD) # if BSD == 43 printf ("vax-dec-bsd4.3\n"); exit (0); # else # if BSD == 199006 printf ("vax-dec-bsd4.3reno\n"); exit (0); # else printf ("vax-dec-bsd\n"); exit (0); # endif # endif # else printf ("vax-dec-bsd\n"); exit (0); # endif # else printf ("vax-dec-ultrix\n"); exit (0); # endif #endif #if defined (alliant) && defined (i860) printf ("i860-alliant-bsd\n"); exit (0); #endif exit (1); } EOF $CC_FOR_BUILD -o $dummy $dummy.c 2>/dev/null && SYSTEM_NAME=`$dummy` && { echo "$SYSTEM_NAME"; exit; } # Apollos put the system type in the environment. test -d /usr/apollo && { echo ${ISP}-apollo-${SYSTYPE}; exit; } # Convex versions that predate uname can use getsysinfo(1) if [ -x /usr/convex/getsysinfo ] then case `getsysinfo -f cpu_type` in c1*) echo c1-convex-bsd exit ;; c2*) if getsysinfo -f scalar_acc then echo c32-convex-bsd else echo c2-convex-bsd fi exit ;; c34*) echo c34-convex-bsd exit ;; c38*) echo c38-convex-bsd exit ;; c4*) echo c4-convex-bsd exit ;; esac fi cat >&2 < in order to provide the needed information to handle your system. config.guess timestamp = $timestamp 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` /bin/uname -X = `(/bin/uname -X) 2>/dev/null` hostinfo = `(hostinfo) 2>/dev/null` /bin/universe = `(/bin/universe) 2>/dev/null` /usr/bin/arch -k = `(/usr/bin/arch -k) 2>/dev/null` /bin/arch = `(/bin/arch) 2>/dev/null` /usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null` /usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null` UNAME_MACHINE = ${UNAME_MACHINE} UNAME_RELEASE = ${UNAME_RELEASE} UNAME_SYSTEM = ${UNAME_SYSTEM} UNAME_VERSION = ${UNAME_VERSION} EOF exit 1 # Local variables: # eval: (add-hook 'write-file-hooks 'time-stamp) # time-stamp-start: "timestamp='" # time-stamp-format: "%:y-%02m-%02d" # time-stamp-end: "'" # End: ./asymptote-2.41/runbacktrace.in0000644000175000017500000000150113064427076016534 0ustar norbertnorbert/***** * backtrace.in * Andy Hammerlindl 2009/07/28 * * Runtime functions for printing garbage collector backtraces. * *****/ // No extra types defined. // No extra code for .cc file. // Autogenerated routines: void generate_random_backtrace() { #if defined(USEGC) && defined(GC_DEBUG) && defined(GC_BACKTRACE) GC_generate_random_backtrace(); #else error("generate_random_backtrace() requires ./configure --enable-gc-debug"); #endif } void print_random_addresses(Int n=1) { #if defined(USEGC) && defined(GC_DEBUG) && defined(GC_BACKTRACE) GC_gcollect(); for (Int i=0; i < n; ++i) GC_debug_print_heap_obj_proc(GC_base(GC_generate_random_valid_address())); #else error("print_random_addresses() requires ./configure --enable-gc-debug"); unused(&n); // Avoid unused variable warning message. #endif } ./asymptote-2.41/record.h0000644000175000017500000000526213064427076015177 0ustar norbertnorbert/***** * record.h * Andy Hammerlindl 2003/07/09 * * The type for records and modules in the language. *****/ #ifndef RECORD_H #define RECORD_H #include "types.h" #include "env.h" #include "frame.h" #include "access.h" namespace vm { struct lambda; } using trans::frame; using trans::protoenv; using trans::varEntry; using trans::tyEntry; namespace types { class record : public ty { // The base name of this type. symbol name; // The frame. Like a frame for a function, it allocates the accesses // for fields and specifies the size of the record. frame *level; // The runtime representation of the record used by the virtual machine. vm::lambda *init; public: // The name bindings for fields of the record. protoenv e; // These are name bindings that should be added to the enclosing environment // after translation of the record is completed. Constructors implicitly // defined by "operator init" are stored here. protoenv postdefenv; record(symbol name, frame *level); ~record(); symbol getName() { return name; } bool isReference() { return true; } size_t hash() const { // Use the pointer, as two records are equivalent only if they are the // same object. return (size_t)this; } // Initialize to null by default. trans::access *initializer(); frame *getLevel(bool statically = false) { if (statically) { frame *f=level->getParent(); return f ? f : level; } else return level; } vm::lambda *getInit() { return init; } // Allocates a new dynamic field in the record. trans::access *allocField(bool statically) { frame *underlevel = getLevel(statically); assert(underlevel); return underlevel->allocLocal(); } // Create a statically enclosed record from this record. record *newRecord(symbol id, bool statically); void print(ostream& out) const { out << name; } void debug(ostream& out) const { out << "struct " << name << endl; out << "types:" << endl; out << "re-implement" << endl; //out << te; out << "fields: " << endl; out << "re-implement" << endl; //out << ve; } }; // A record that is being used just for its fields and types, and has no real // initializer. This is for modules such as settings that are built into the // language. class dummyRecord : public record { public: dummyRecord(symbol name); dummyRecord(string s); // Convenient functions for adding fields. void add(string name, ty *t, trans::access *a, trans::permission perm=trans::PUBLIC); void add(string name, function *t, vm::bltin f, trans::permission perm=trans::PUBLIC); }; } //namespace types #endif ./asymptote-2.41/camperror.cc0000644000175000017500000000224713064427076016051 0ustar norbertnorbert/***** * camperror.cc * 2003/02/25 Andy Hammerlindl * * Provides a way for the classes in camp to report errors in * computation elegantly. After running a method on a camp object that * could encounter an error, the program should call camp::errors to see * if any errors were encountered. *****/ #include #include #include "camperror.h" #include "vm.h" #include "errormsg.h" namespace camp { // Used internally to report an error in an operation. void reportError(const string& desc) { em.runtime(vm::getPos()); em << desc; em.sync(); throw handled_error(); } // Used internally to report a warning in an operation. void reportWarning(const string& desc) { em.warning(vm::getPos()); em << desc; em.sync(); } void reportFatal(const string& desc) { em.fatal(vm::getPos()); em << desc; em.sync(); em.statusError(); try { throw quit(); } catch(handled_error) { } } void reportError(const ostringstream& desc) { reportError(desc.str()); } void reportWarning(const ostringstream& desc) { reportWarning(desc.str()); } void reportFatal(const ostringstream& desc) { reportFatal(desc.str()); } } // namespace camp ./asymptote-2.41/camperror.h0000644000175000017500000000146213064427076015711 0ustar norbertnorbert/***** * camperror.h * 2003/02/25 Andy Hammerlindl * * Provides a way for the classes in camp to report errors in * computation elegantly. After running a method on a camp object that * could encounter an error, the program should call camp::errors to see * if any errors were encountered. *****/ #ifndef CAMPERROR_H #define CAMPERROR_H #include #include "common.h" namespace camp { // Used internally to report an error in an operation. void reportError(const string& desc); void reportError(const ostringstream& desc); void reportWarning(const string& desc); void reportWarning(const ostringstream& desc); void reportFatal(const string& desc); void reportFatal(const ostringstream& desc); inline std::ostream& newl(std::ostream& s) {s << '\n'; return s;} } // namespace camp #endif ./asymptote-2.41/runtime.in0000644000175000017500000004754413064427076015574 0ustar norbertnorbert/***** * runtime.in * Tom Prince 2005/4/15 * * Generate the runtime functions used by the vm::stack machine. * *****/ /* Autogenerated routines are specified like this (separated by a formfeed): type asyname:cname(cparams) { C code } */ // Use Void f() instead of void f() to force an explicit Stack argument. pen => primPen() pair => primPair() triple => primTriple() path => primPath() path3 => primPath3() guide* => primGuide() cycleToken => primCycleToken() tensionSpecifier => primTensionSpecifier() curlSpecifier => primCurlSpecifier() file* => primFile() picture* => primPicture() transform => primTransform() callable* => voidFunction() callableBp* => breakpointFunction() callableReal* => realRealFunction() callableTransform* => transformFunction() runnable* => primCode() boolarray* => booleanArray() Intarray* => IntArray() Intarray2* => IntArray2() realarray* => realArray() realarray2* => realArray2() pairarray* => pairArray() pairarray2* => pairArray2() triplearray* => tripleArray() triplearray2* => tripleArray2() patharray* => pathArray() patharray2* => pathArray2() guidearray* => guideArray() transformarray* => transformArray() penarray* => penArray() penarray2* => penArray2() stringarray* => stringArray() stringarray2* => stringArray2() #include #include #include #include #include #include #include "angle.h" #include "pair.h" #include "triple.h" #include "transform.h" #include "path.h" #include "path3.h" #include "pen.h" #include "drawpath.h" #include "guide.h" #include "picture.h" #include "fileio.h" #include "genv.h" #include "builtin.h" #include "texfile.h" #include "pipestream.h" #include "parser.h" #include "stack.h" #include "util.h" #include "locate.h" #include "mathop.h" #include "callable.h" #include "stm.h" #include "lexical.h" #include "process.h" #include "arrayop.h" #ifdef __APPLE__ extern "C" int isnan(double); #endif #if defined(USEGC) && defined(GC_DEBUG) && defined(GC_BACKTRACE) extern "C" { void *GC_generate_random_valid_address(void); void GC_debug_print_heap_obj_proc(void *); } #endif using namespace vm; using namespace camp; using namespace settings; #undef OUT #undef IN namespace run { using camp::pair; using vm::array; using vm::frame; using vm::stack; using camp::transform; using absyntax::runnable; typedef array boolarray; typedef array Intarray; typedef array Intarray2; typedef array realarray; typedef array realarray2; typedef array pairarray; typedef array pairarray2; typedef array triplearray; typedef array triplearray2; typedef array patharray; typedef array patharray2; typedef array guidearray; typedef array transformarray; typedef array penarray; typedef array penarray2; typedef array stringarray; typedef array stringarray2; typedef callable callableBp; typedef callable callableReal; typedef callable callableTransform; } using vm::array; using types::function; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE using types::booleanArray; using types::IntArray; using types::IntArray2; using types::realArray; using types::realArray2; using types::pairArray; using types::pairArray2; using types::tripleArray; using types::tripleArray2; using types::pathArray; using types::pathArray2; using types::guideArray; using types::transformArray; using types::penArray; using types::penArray2; using types::stringArray; using types::stringArray2; using types::formal; function *realRealFunction() { return new function(primReal(),primReal()); } function *realTripleFunction() { return new function(primReal(),primTriple()); } const size_t camp::ColorComponents[]={0,0,1,3,4,0}; namespace vm { #if COMPACT const Int DefaultValue=0x7fffffffffffffffLL; const Int Undefined=0x7ffffffffffffffeLL; const Int BoolTruthValue=0xABABABABABABABACLL; const Int BoolFalseValue=0xABABABABABABABABLL; const item Default=DefaultValue; #else const item Default=item(default_t()); #endif } namespace run { const char *arrayempty="cannot take min or max of empty array"; const char *noruntime="no runtime environment for embedded eval"; void writestring(stack *s) { callable *suffix=pop(s,NULL); string S=pop(s); vm::item it=pop(s); bool defaultfile=isdefault(it); camp::file *f=defaultfile ? &camp::Stdout : vm::get(it); if(!f->isOpen()) return; if(S != "") f->write(S); if(f->text()) { if(suffix) { s->push(f); suffix->call(s); } else if(defaultfile) f->writeline(); } } string emptystring; pair zero; } static string defaulttransparency=string("Compatible"); void unused(void *) { } // Autogenerated routines: // Initializers Int :IntZero() { return 0; } real :realZero() { return 0.0; } bool :boolFalse() { return false; } bool isnan(real x) { return std::isnan(x); } array* :pushNullArray() { return 0; } frame* :pushNullRecord() { return 0; } item :pushNullFunction() { return nullfunc::instance(); } // Default operations // Put the default value token on the stack (in place of an argument when // making a function call). item :pushDefault() { return Default; } // Test if the value on the stack is the default value token. bool :isDefault(item i) { return isdefault(i); } // Casts guide* :pairToGuide(pair z) { return new pairguide(z); } guide* :pathToGuide(path p) { return new pathguide(p); } path :guideToPath(guide *g) { return g->solve(); } // Pen operations pen :newPen() { return pen(); } bool ==(pen a, pen b) { return a == b; } bool !=(pen a, pen b) { return a != b; } pen +(pen a, pen b) { return a+b; } pen Operator *(real a, pen b) { return a*b; } pen Operator *(pen a, real b) { return b*a; } pair max(pen p) { return p.bounds().Max(); } pair min(pen p) { return p.bounds().Min(); } // Reset the meaning of pen default attributes. void resetdefaultpen() { processData().defaultpen=camp::pen::initialpen(); } void defaultpen(pen p) { processData().defaultpen=pen(resolvepen,p); } pen defaultpen() { return processData().defaultpen; } bool invisible(pen p) { return p.invisible(); } pen invisible() { return pen(invisiblepen); } pen gray(pen p) { p.togrey(); return p; } pen rgb(pen p) { p.torgb(); return p; } pen cmyk(pen p) { p.tocmyk(); return p; } pen interp(pen a, pen b, real t) { return interpolate(a,b,t); } pen rgb(real r, real g, real b) { return pen(r,g,b); } pen cmyk(real c, real m, real y, real k) { return pen(c,m,y,k); } pen gray(real gray) { return pen(gray); } realarray *colors(pen p) { size_t n=ColorComponents[p.colorspace()]; array *a=new array(n); switch(n) { case 0: break; case 1: (*a)[0]=p.gray(); break; case 3: (*a)[0]=p.red(); (*a)[1]=p.green(); (*a)[2]=p.blue(); break; case 4: (*a)[0]=p.cyan(); (*a)[1]=p.magenta(); (*a)[2]=p.yellow(); (*a)[3]=p.black(); break; default: break; } return a; } string hex(pen p) { return p.hex(); } Int byte(real x) { return camp::byte(x); } string colorspace(pen p) { string s=ColorDeviceSuffix[p.colorspace()]; std::transform(s.begin(),s.end(),s.begin(),tolower); return s; } pen pattern(string *s) { return pen(setpattern,*s); } string pattern(pen p) { return p.fillpattern(); } pen fillrule(Int n) { return pen(n >= 0 && n < nFill ? (FillRule) n : DEFFILL); } Int fillrule(pen p) { return p.Fillrule(); } pen opacity(real opacity=1.0, string blend=defaulttransparency) { for(Int i=0; i < nBlendMode; ++i) if(blend == BlendMode[i]) return pen(Transparency(blend,opacity)); ostringstream buf; buf << "Unknown blend mode: " << "'" << blend << "'"; error(buf); } real opacity(pen p) { return p.opacity(); } string blend(pen p) { return p.blend(); } pen linetype(realarray *pattern, real offset=0, bool scale=true, bool adjust=true) { size_t size=checkArray(pattern); array *a=new array(size); for(size_t i=0; i < size; ++i) (*a)[i]=::max(vm::read(pattern,i),0.0); return pen(LineType(*a,offset,scale,adjust)); } realarray *linetype(pen p=CURRENTPEN) { array a=p.linetype()->pattern; return copyArray(&a); } real offset(pen p) { return p.linetype()->offset; } bool scale(pen p) { return p.linetype()->scale; } bool adjust(pen p) { return p.linetype()->adjust; } pen adjust(pen p, real arclength, bool cyclic) { return adjustdash(p,arclength,cyclic); } pen linecap(Int n) { return pen(setlinecap,n >= 0 && n < nCap ? n : DEFCAP); } Int linecap(pen p=CURRENTPEN) { return p.cap(); } pen linejoin(Int n) { return pen(setlinejoin,n >= 0 && n < nJoin ? n : DEFJOIN); } Int linejoin(pen p=CURRENTPEN) { return p.join(); } pen miterlimit(real x) { return pen(setmiterlimit,x >= 1.0 ? x : DEFJOIN); } real miterlimit(pen p=CURRENTPEN) { return p.miter(); } pen linewidth(real x) { return pen(setlinewidth,x >= 0.0 ? x : DEFWIDTH); } real linewidth(pen p=CURRENTPEN) { return p.width(); } pen fontcommand(string *s) { return pen(setfont,*s); } string font(pen p=CURRENTPEN) { return p.Font(); } pen fontsize(real size, real lineskip) { return pen(setfontsize,size > 0.0 ? size : 0.0, lineskip > 0.0 ? lineskip : 0.0); } real fontsize(pen p=CURRENTPEN) { return p.size(); } real lineskip(pen p=CURRENTPEN) { return p.Lineskip(); } pen overwrite(Int n) { return pen(setoverwrite,n >= 0 && n < nOverwrite ? (overwrite_t) n : DEFWRITE); } Int overwrite(pen p=CURRENTPEN) { return p.Overwrite(); } pen basealign(Int n) { return pen(n >= 0 && n < nBaseLine ? (BaseLine) n : DEFBASE); } Int basealign(pen p=CURRENTPEN) { return p.Baseline(); } transform transform(pen p) { return p.getTransform(); } path nib(pen p) { return p.Path(); } pen makepen(path p) { return pen(p); } pen colorless(pen p) { p.colorless(); return p; } // Interactive mode bool interactive() { return interact::interactive; } bool uptodate() { return interact::uptodate; } // System commands Int system(stringarray *s) { if(safe) error("system() call disabled; override with option -nosafe"); size_t size=checkArray(s); if(size == 0) return 0; mem::vector cmd; for(size_t i=0; i < size; ++i) cmd.push_back(read(s,i)); return System(cmd); } bool view() { return view(); } string asydir() { return systemDir; } string locale(string s=emptystring) { char *L=setlocale(LC_ALL,s.empty() ? NULL : s.c_str()); return L != NULL ? string(L) : ""; } void abort(string s=emptystring) { if(s.empty()) throw handled_error(); error(s.c_str()); } void exit() { throw quit(); } void assert(bool b, string s=emptystring) { flush(cout); if(!b) { ostringstream buf; buf << "assert FAILED"; if(s != "") buf << ": " << s; error(buf); } } void sleep(Int seconds) { if(seconds <= 0) return; sleep(seconds); } void usleep(Int microseconds) { if(microseconds <= 0) return; usleep((unsigned long) microseconds); } void _eval(string *s, bool embedded, bool interactiveWrite=false) { if(embedded) { trans::coenv *e=Stack->getEnvironment(); vm::interactiveStack *is=dynamic_cast(Stack); if(e && is) runStringEmbedded(*s, *e, *is); else error(noruntime); } else runString(*s,interactiveWrite); } void _eval(runnable *s, bool embedded) { absyntax::block *ast=new absyntax::block(s->getPos(), false); ast->add(s); if(embedded) { trans::coenv *e=Stack->getEnvironment(); vm::interactiveStack *is=dynamic_cast(Stack); if(e && is) runCodeEmbedded(ast, *e, *is); else error(noruntime); } else runCode(ast); } string location() { ostringstream buf; buf << getPos(); return buf.str(); } // Wrapper for the stack::load() method. void :loadModule(string *index) { Stack->load(*index); } string cd(string s=emptystring) { if(!s.empty() && !globalwrite()) { string outname=getSetting("outname"); string dir=stripDir(outname); if(dir.empty()) Setting("outname")=getPath()+dirsep+outname; } return setPath(s.c_str()); } void list(string *s, bool imports=false) { if(*s == "-") return; trans::genv ge; symbol name=symbol::trans(*s); record *r=ge.getModule(name,*s); r->e.list(imports ? 0 : r); } // Guide operations guide* :nullGuide() { return new pathguide(path()); } guide* :dotsGuide(guidearray *a) { guidevector v; size_t size=checkArray(a); for (size_t i=0; i < size; ++i) v.push_back(a->read(i)); return new multiguide(v); } guide* :dashesGuide(guidearray *a) { static camp::curlSpec curly; static camp::specguide curlout(&curly, camp::OUT); static camp::specguide curlin(&curly, camp::IN); size_t n=checkArray(a); // a--b is equivalent to a{curl 1}..{curl 1}b guidevector v; if (n > 0) v.push_back(a->read(0)); if (n==1) { v.push_back(&curlout); v.push_back(&curlin); } else for (size_t i=1; iread(i)); } return new multiguide(v); } cycleToken :newCycleToken() { return cycleToken(); } guide *operator cast(cycleToken tok) { // Avoid unused variable warning messages. unused(&tok); return new cycletokguide(); } guide* operator spec(pair z, Int p) { camp::side d=(camp::side) p; camp::dirSpec *sp=new camp::dirSpec(z); return new specguide(sp,d); } curlSpecifier operator curl(real gamma, Int p) { camp::side s=(camp::side) p; return curlSpecifier(gamma,s); } real :curlSpecifierValuePart(curlSpecifier spec) { return spec.getValue(); } Int :curlSpecifierSidePart(curlSpecifier spec) { return spec.getSide(); } guide *operator cast(curlSpecifier spec) { return new specguide(spec); } tensionSpecifier operator tension(real tout, real tin, bool atleast) { return tensionSpecifier(tout, tin, atleast); } real :tensionSpecifierOutPart(tensionSpecifier t) { return t.getOut(); } real :tensionSpecifierInPart(tensionSpecifier t) { return t.getIn(); } bool :tensionSpecifierAtleastPart(tensionSpecifier t) { return t.getAtleast(); } guide *operator cast(tensionSpecifier t) { return new tensionguide(t); } guide* operator controls(pair zout, pair zin) { return new controlguide(zout, zin); } Int size(guide *g) { flatguide f; g->flatten(f,false); return f.size(); } Int length(guide *g) { flatguide f; g->flatten(f,false); return g->cyclic() ? f.size() : f.size()-1; } bool cyclic(guide *g) { flatguide f; g->flatten(f,false); return g->cyclic(); } pair point(guide *g, Int t) { flatguide f; g->flatten(f,false); return f.Nodes(adjustedIndex(t,f.size(),g->cyclic())).z; } pairarray *dirSpecifier(guide *g, Int t) { flatguide f; g->flatten(f,false); Int n=f.size(); if(!g->cyclic() && (t < 0 || t >= n-1)) return new array(0); array *c=new array(2); (*c)[0]=f.Nodes(t).out->dir(); (*c)[1]=f.Nodes(t+1).in->dir(); return c; } pairarray *controlSpecifier(guide *g, Int t) { flatguide f; g->flatten(f,false); Int n=f.size(); if(!g->cyclic() && (t < 0 || t >= n-1)) return new array(0); knot curr=f.Nodes(t); knot next=f.Nodes(t+1); if(curr.out->controlled()) { assert(next.in->controlled()); array *c=new array(2); (*c)[0]=curr.out->control(); (*c)[1]=next.in->control(); return c; } else return new array(0); } tensionSpecifier tensionSpecifier(guide *g, Int t) { flatguide f; g->flatten(f,false); Int n=f.size(); if(!g->cyclic() && (t < 0 || t >= n-1)) return tensionSpecifier(1.0,1.0,false); knot curr=f.Nodes(t); return tensionSpecifier(curr.tout.val,f.Nodes(t+1).tin.val,curr.tout.atleast); } realarray *curlSpecifier(guide *g, Int t) { flatguide f; g->flatten(f,false); Int n=f.size(); if(!g->cyclic() && (t < 0 || t >= n-1)) return new array(0); array *c=new array(2); real c0=f.Nodes(t).out->curl(); real c1=f.Nodes(t+1).in->curl(); (*c)[0]=c0 >= 0.0 ? c0 : 1.0; (*c)[1]=c1 >= 0.0 ? c1 : 1.0; return c; } guide *reverse(guide *g) { flatguide f; g->flatten(f,false); if(f.precyclic()) return new pathguide(g->solve().reverse()); size_t n=f.size(); bool cyclic=g->cyclic(); guidevector v; size_t start=cyclic ? n : n-1; knot curr=f.Nodes(start); knot next=curr; for(size_t i=start; i > 0; --i) { next=f.Nodes(i-1); v.push_back(new pairguide(curr.z)); if(next.out->controlled()) { assert(curr.in->controlled()); v.push_back(new controlguide(curr.in->control(),next.out->control())); } else { pair d=curr.in->dir(); if(d != zero) v.push_back(new specguide(new dirSpec(-d),camp::OUT)); else { real C=curr.in->curl(); if(C >= 0.0) v.push_back(new specguide(new curlSpec(C),camp::OUT)); } real tout=curr.tin.val; real tin=next.tout.val; bool atleast=next.tout.atleast; if(tout != 1.0 || tin != 1.0 || next.tout.atleast) v.push_back(new tensionguide(tensionSpecifier(tout,tin,atleast))); d=next.out->dir(); if(d != zero) v.push_back(new specguide(new dirSpec(-d),camp::IN)); else { real C=next.out->curl(); if(C >= 0.0) v.push_back(new specguide(new curlSpec(C),camp::IN)); } } curr=next; } if(cyclic) v.push_back(new cycletokguide()); else v.push_back(new pairguide(next.z)); return new multiguide(v); } realarray *_cputime() { static const real ticktime=1.0/sysconf(_SC_CLK_TCK); struct tms buf; ::times(&buf); array *t=new array(4); (*t)[0] = ((real) buf.tms_utime)*ticktime; (*t)[1] = ((real) buf.tms_stime)*ticktime; (*t)[2] = ((real) buf.tms_cutime)*ticktime; (*t)[3] = ((real) buf.tms_cstime)*ticktime; return t; } // Transforms bool ==(transform a, transform b) { return a == b; } bool !=(transform a, transform b) { return a != b; } transform +(transform a, transform b) { return a+b; } transform Operator *(transform a, transform b) { return a*b; } pair Operator *(transform t, pair z) { return t*z; } path Operator *(transform t, path g) { return transformed(t,g); } pen Operator *(transform t, pen p) { return transformed(t,p); } picture * Operator *(transform t, picture *f) { return transformed(t,f); } picture * Operator *(realarray2 *t, picture *f) { return transformed(*t,f); } transform ^(transform t, Int n) { transform T; if(n < 0) { n=-n; t=inverse(t); } for(Int i=0; i < n; i++) T=T*t; return T; } real :transformXPart(transform t) { return t.getx(); } real :transformYPart(transform t) { return t.gety(); } real :transformXXPart(transform t) { return t.getxx(); } real :transformXYPart(transform t) { return t.getxy(); } real :transformYXPart(transform t) { return t.getyx(); } real :transformYYPart(transform t) { return t.getyy(); } transform :real6ToTransform(real x, real y, real xx, real xy, real yx, real yy) { return transform(x,y,xx,xy,yx,yy); } transform shift(transform t) { return transform(t.getx(),t.gety(),0,0,0,0); } transform shiftless(transform t) { return transform(0,0,t.getxx(),t.getxy(),t.getyx(),t.getyy()); } transform identity:transformIdentity() { return identity; } transform inverse(transform t) { return inverse(t); } transform shift(pair z) { return shift(z); } transform shift(real x, real y) { return shift(pair(x,y)); } transform xscale(real x) { return xscale(x); } transform yscale(real y) { return yscale(y); } transform scale(real x) { return scale(x); } transform scale(real x, real y) { return scale(x,y); } transform slant(real s) { return slant(s); } transform rotate(real angle, pair z=0) { return rotatearound(z,radians(angle)); } transform reflect(pair a, pair b) { return reflectabout(a,b); } ./asymptote-2.41/aspy.py0000644000175000017500000002637413064427076015105 0ustar norbertnorbert##### # # aspy.py # # Andy Hammerlindl 2011/09/03 # # Uses ctypes to interface with the shared library version of Python. # Asymptote can run and its datatypes inspected via Python. # # # To use the module: # 1. make asymptote.so # 2. Ensure that asymptote.so is visable to python, say adding its directory # to LD_LIBRARY_PATH # 3. Run this module. (See runExample for an example.) # ##### from ctypes import * asyInt = c_longlong handle_typ = c_void_p arguments_typ = c_void_p state_typ = c_void_p function_typ = CFUNCTYPE(None, state_typ, c_void_p) class string_typ(Structure): _fields_ = [ ("buf", c_char_p), # Should be NUL-terminated? Maybe replace with # POINTER(c_char). ("length", asyInt) ] ErrorCallbackFUNC = CFUNCTYPE(None, string_typ) NORMAL_ARG = 45000 REST_ARG = 45001 class Policy(Structure): _fields_ = [ ("version", asyInt), ("copyHandle", CFUNCTYPE(handle_typ, handle_typ)), ("releaseHandle", CFUNCTYPE(None, handle_typ)), ("handleFromInt", CFUNCTYPE(handle_typ, asyInt)), ("handleFromBool", CFUNCTYPE(handle_typ, asyInt)), ("handleFromDouble", CFUNCTYPE(handle_typ, c_double)), ("handleFromString", CFUNCTYPE(handle_typ, string_typ)), ("handleFromFunction", CFUNCTYPE(handle_typ, c_char_p, function_typ, c_void_p)), ("IntFromHandle", CFUNCTYPE(asyInt, handle_typ)), ("boolFromHandle", CFUNCTYPE(asyInt, handle_typ)), ("doubleFromHandle", CFUNCTYPE(c_double, handle_typ)), ("stringFromHandle", CFUNCTYPE(string_typ, handle_typ)), ("getField", CFUNCTYPE(handle_typ, handle_typ, c_char_p)), ("getCell", CFUNCTYPE(handle_typ, handle_typ, asyInt)), ("addField", CFUNCTYPE(None, handle_typ, c_char_p, handle_typ)), ("newArguments", CFUNCTYPE(arguments_typ)), ("releaseArguments", CFUNCTYPE(None, arguments_typ)), ("addArgument", CFUNCTYPE(None, arguments_typ, c_char_p, handle_typ, asyInt)), ("call", CFUNCTYPE(handle_typ, handle_typ, arguments_typ)), ("globals", CFUNCTYPE(handle_typ, state_typ)), ("numParams", CFUNCTYPE(asyInt, state_typ)), ("getParam", CFUNCTYPE(handle_typ, state_typ, asyInt)), ("setReturnValue", CFUNCTYPE(None, state_typ, handle_typ)), ("setErrorCallback", CFUNCTYPE(None, ErrorCallbackFUNC)), ] policy = None baseState = None def initPolicyAndBaseState(): global policy, baseState lib = CDLL("asymptote.so") getPolicy = lib._asy_getPolicy getPolicy.restype = POINTER(Policy) policy = getPolicy() getState = lib._asy_getState getState.restype = state_typ baseState = getState() initPolicyAndBaseState() def pyStringFromAsyString(st): #TODO: Handle strings with null-terminators. return str(st.buf) def pyStringFromHandle(h): #TODO: Handle strings with null-terminators. st = policy.contents.stringFromHandle(h) checkForErrors() return pyStringFromAsyString(st) def handleFromPyString(s): st = string_typ(s, len(s)) h = policy.contents.handleFromString(st) checkForErrors() return h def ensureDatum(val): return val if type(val) is Datum else Datum(val) # The error detection scheme. # policyError is set to a string when an error occurs. policyError = [] def pyErrorCallback(s): global policyError policyError.append(pyStringFromAsyString(s)) cErrorCallback = ErrorCallbackFUNC(pyErrorCallback) policy.contents.setErrorCallback(cErrorCallback) class AsyException(Exception): def __init__(self, msg): self.msg = msg def __str__(self): return self.msg def checkForErrors(): """Raises an exception if an error occured.""" global policyError if policyError != []: s = policyError[0] if len(policyError) > 1: s += ' (and other errors)' policyError = [] raise AsyException(s) class Datum(object): def _setHandle(self, handle): object.__setattr__(self, 'handle', handle) def __init__(self, val): self._setHandle(0) if val is None: return if type(val) is int: self._setHandle(policy.contents.handleFromInt(val)) checkForErrors() elif type(val) is bool: self._setHandle(policy.contents.handleFromBool(1 if val else 0)) checkForErrors() elif type(val) is float: self._setHandle(policy.contents.handleFromDouble(val)) elif type(val) is str: self._setHandle(handleFromPyString(val)) checkForErrors() elif type(val) is tuple: # Could do this more efficiently, and avoid a copyHandle ret = state.globals()["operator tuple"](*val) self._setHandle(policy.contents.copyHandle(ret.handle)) checkForErrors() elif type(val) is Datum: self._setHandle(policy.contents.copyHandle(val.handle)) checkForErrors() else: # TODO: check if val has a toDatum field raise TypeError("cannot initialize Datum from '%s'" % type(val).__name__) def __repr__(self): # TODO: Add type-checking to policy. return '' % hex(self.handle) def __int__(self): l = policy.contents.IntFromHandle(self.handle) checkForErrors() return int(l) def __nonzero__(self): # This will throw an exception for anything but an underlying bool # type. Perhaps we should be more pythonic. l = policy.contents.boolFromHandle(self.handle) checkForErrors() assert l in [0,1] return l == 1 def __float__(self): x = policy.contents.doubleFromHandle(self.handle) checkForErrors() return float(x) def __str__(self): return pyStringFromHandle(self.handle) def __getattr__(self, name): field = policy.contents.getField(self.handle, name) checkForErrors() return DatumFromHandle(field) def __getitem__(self, name): assert type(name) == str return self.__getattr__(name) #TODO: raise an IndexError when appropriate. #TODO: implement array indices def __setattr__(self, name, val): # TODO: Resolve setting versus declaring. # One idea: d.x = f or d["x"] = f sets and d["int x()"] = f declares # anew. policy.contents.addField(self.handle, name, ensureDatum(val).handle) checkForErrors() def __setitem__(self, name, val): assert type(name) == str self.__setattr__(name, val) #TODO: raise an IndexError when appropriate. #TODO: implement array indices def __call__(self, *args, **namedArgs): alist = policy.contents.newArguments() checkForErrors() for arg in args: d = ensureDatum(arg) policy.contents.addArgument(alist, "", d.handle, NORMAL_ARG) checkForErrors() for name,arg in namedArgs.items(): d = ensureDatum(arg) policy.contents.addArgument(alist, name, d.handle, NORMAL_ARG) checkForErrors() ret = policy.contents.call(self.handle, alist) checkForErrors() policy.contents.releaseArguments(alist) checkForErrors() if ret != None: return DatumFromHandle(ret) def __add__(self, other): return state.globals()["operator +"](self, other) def __sub__(self, other): return state.globals()["operator -"](self, other) def __mul__(self, other): return state.globals()["operator *"](self, other) def __div__(self, other): return state.globals()["operator /"](self, other) def __truediv__(self, other): return state.globals()["operator /"](self, other) def __mod__(self, other): return state.globals()["operator %"](self, other) def __pow__(self, other): return state.globals()["operator ^"](self, other) def __and__(self, other): return state.globals()["operator &"](self, other) def __or__(self, other): return state.globals()["operator |"](self, other) def __neg__(self, other): return state.globals()["operator -"](self) def __lt__(self, other): return state.globals()["operator <"](self, other) def __le__(self, other): return state.globals()["operator <="](self, other) def __eq__(self, other): return state.globals()["operator =="](self, other) def __ne__(self, other): return state.globals()["operator !="](self, other) def __gt__(self, other): return state.globals()["operator >"](self, other) def __ge__(self, other): return state.globals()["operator >="](self, other) def DatumFromHandle(handle): """Initializes a Datum from a given low-level handle. Does not invoke copyHandle.""" d = Datum(None) d._setHandle(handle) return d class State(object): def __init__(self, base): self.base = base def globals(self): handle = policy.contents.globals(self.base) checkForErrors() return DatumFromHandle(handle) def params(self): p = [] numParams = policy.contents.numParams(self.base) checkForErrors() for i in range(numParams): h = policy.contents.getParam(self.base, i) checkForErrors() p.append(DatumFromHandle(h)) assert len(p) == numParams return p def setReturnValue(self, val): policy.contents.setReturnValue(self.base, ensureDatum(val).handle) checkForErrors() # Keep a link to all of the callbacks created, so they aren't garbage # collected. TODO: See if this is neccessary. storedCallbacks = [] def DatumFromCallable(f): def wrapped(s, d): state = State(s) params = state.params() r = f(*params) if r != None: state.setReturnValue(r) cf = function_typ(wrapped) storedCallbacks.append(cf) h = policy.contents.handleFromFunction(f.__name__, cf, None) checkForErrors() return DatumFromHandle(h) print "version", policy.contents.version state = State(baseState) # An example def runExample(): g = state.globals() g.eval("path p = (0,0) -- (100,100) -- (200,0)", embedded=True) g.draw(g.p) g.shipout("frompython") g.draw(g.circle(100), g.red) ./asymptote-2.41/opcodes.h0000644000175000017500000000162513064427076015354 0ustar norbertnorbert/***** * opcodes.h * Andy Hammerlindl 2010/10/24 * * A list of the virtual machine opcodes, defined by the macro OPCODE. *****/ /* The first parameter is the name of the opcode. The second parameter is a * character indicating what additional information (if any) is encoded with * the opcode: * x - nothing * n - integer * t - item * b - builtin * l - lambda pointer * o - instruction offset */ OPCODE(nop, 'x') OPCODE(pop,'x') OPCODE(intpush,'n') OPCODE(constpush,'t') OPCODE(varpush,'n') OPCODE(varsave,'n') OPCODE(fieldpush,'n') OPCODE(fieldsave,'n') OPCODE(builtin,'b') OPCODE(jmp,'o') OPCODE(cjmp,'o') OPCODE(njmp,'o') OPCODE(popcall,'x') OPCODE(pushclosure,'x') OPCODE(makefunc,'l') OPCODE(ret,'x') OPCODE(pushframe,'n') OPCODE(popframe,'x') OPCODE(push_default,'x') OPCODE(jump_if_not_default,'o') #ifdef COMBO OPCODE(varpop,'n') OPCODE(fieldpop,'n') OPCODE(gejmp,'o') #endif ./asymptote-2.41/runhistory.symbols.h0000644000175000017500000000115113064427143017622 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(history); ADDSYMBOL(n); ADDSYMBOL(name); ADDSYMBOL(prompt); ADDSYMBOL(readline); ADDSYMBOL(saveline); ADDSYMBOL(store); ADDSYMBOL(tabcompletion); ADDSYMBOL(value); ./asymptote-2.41/callable.cc0000644000175000017500000000217713064427076015620 0ustar norbertnorbert/***** * callable.cc * Tom Prince 2005/06/19 * * Runtime representation of functions. *****/ #include "stack.h" #include "callable.h" namespace vm { callable::~callable() {} void func::call(stack *s) { s->run(this); } void nullfunc::print(ostream& out) { out << "nullfunc"; } bool func::compare(callable* F) { if (func* f=dynamic_cast(F)) return (body == f->body) && (closure == f->closure); else return false; } void func::print(ostream& out) { out << "func with lambda"; #ifdef DEBUG_FRAME out << " " << body->name; #endif } bool bfunc::compare(callable* F) { if (bfunc* f=dynamic_cast(F)) return (func == f->func); else return false; } void bfunc::print(ostream& out) { out << "bltin"; #ifdef DEBUG_BLTIN out << " " << lookupBltin(func); #endif } void thunk::call(stack *s) { s->push(arg); func->call(s); } void thunk::print(ostream& out) { out << "thunk on " << arg << " with "; func->print(out); } nullfunc nullfunc::func; void nullfunc::call(stack *) { error("dereference of null function"); } bool nullfunc::compare(callable* f) { return f == &func; } } // namespace vm ./asymptote-2.41/env.h0000644000175000017500000001073713064427076014514 0ustar norbertnorbert/***** * env.h * Andy Hammerlindl 2002/6/20 * * Keeps track of the namespaces of variables and types when traversing * the abstract syntax. *****/ #ifndef ENV_H #define ENV_H #include "errormsg.h" #include "entry.h" #include "types.h" #include "util.h" namespace types { class record; } namespace trans { using sym::symbol; using types::ty; using types::function; using types::record; class genv; // Keeps track of the name bindings of variables and types. This is used for // the fields of a record, whereas the derived class env is used for unqualified // names in translation. class protoenv { //protected: public: // These tables keep track of type and variable definitions. tenv te; venv ve; access *baseLookupCast(ty *target, ty *source, symbol name); public: // Start an environment for a file-level module. protoenv() {} protoenv(venv::file_env_tag tag) : ve(tag) {} protoenv(const protoenv&); void beginScope() { te.beginScope(); ve.beginScope(); } void endScope() { te.endScope(); ve.endScope(); } void collapseScope() { te.collapseScope(); ve.collapseScope(); } tyEntry *lookupTyEntry(symbol s) { return te.look(s); } ty *lookupType(symbol s) { tyEntry *ent=lookupTyEntry(s); return ent ? ent->t : 0; } varEntry *lookupVarByType(symbol name, ty *t) { // Search in local vars. return ve.lookByType(name, t); } varEntry *lookupVarBySignature(symbol name, types::signature *sig) { return ve.lookBySignature(name, sig); } access *lookupInitializer(ty *t) { // The initializer's type is a function returning the desired type. function *it=new function(t); varEntry *v=lookupVarByType(symbol::initsym,it); // If not in the environment, try the type itself. return v ? v->getLocation() : t->initializer(); } // Find the function that handles casting between the types. // The name is "operator cast" for implicit casting and "operator ecast" for // explicit. access *lookupCast(ty *target, ty *source, symbol name); bool castable(ty *target, ty *source, symbol name); // A cast lookup designed to work quickly with the application matching // code. The target type must not be overloaded. bool fastCastable(ty *target, ty *source); // For the lookup, neither target nor source may be overloaded. access *fastLookupCast(ty *target, ty *source); // Given overloaded types, this resolves which types should be the target and // the source of the cast. ty *castTarget(ty *target, ty *source, symbol name); ty *castSource(ty *target, ty *source, symbol name); ty *varGetType(symbol name) { return ve.getType(name); } void addType(symbol name, tyEntry *desc) { te.enter(name, desc); } void addVar(symbol name, varEntry *desc) { // Don't check for multiple variables, as this makes adding casts // and initializers harder. ve.enter(name, desc); } // Add another environment, say from a record. void add(protoenv &source, varEntry *qualifier, coder &c) { te.add(source.te, qualifier, c); ve.add(source.ve, qualifier, c); } // Add variables and types of name src from another environment under the // name dest in this environment. bool add(symbol src, symbol dest, protoenv &source, varEntry *qualifier, coder &c) { return te.add(src, dest, source.te, qualifier, c) | ve.add(src, dest, source.ve, qualifier, c); } // Add the standard functions for a new type. void addArrayOps(types::array *t); void addRecordOps(types::record *r); void addFunctionOps(types::function *f); void list(record *r=0) { ve.list(r); } // Adds to a list the keywords in the environment that start with the given // prefix. Used for automatic completion at the interactive prompt. typedef mem::list symbol_list; void completions(symbol_list &l, string start) { te.completions(l, start); ve.completions(l, start); } private: // Non-copyable void operator=(const protoenv&); }; // Environment used in translating statements and expressions at all scopes. As // opposed to protoenv which is suitable for keeping track of the fields of // records, this also keeps track of the global env, for loading modules. class env : public protoenv { // The global environment - keeps track of modules. genv ≥ public: // Start an environment for a file-level module. env(genv &ge); ~env(); record *getModule(symbol id, string filename); }; } // namespace trans #endif ./asymptote-2.41/pipestream.h0000644000175000017500000000510013064427076016061 0ustar norbertnorbert/* Pipestream: A simple C++ interface to UNIX pipes Version 0.05 Copyright (C) 2005-2014 John C. Bowman, with contributions from Mojca Miklavec This program is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #ifndef PIPESTREAM_H #define PIPESTREAM_H #include #include #include #include "common.h" // bidirectional stream for reading and writing to pipes class iopipestream { protected: int in[2]; int out[2]; static const int BUFSIZE=SHRT_MAX; char buffer[BUFSIZE]; string sbuffer; int pid; bool Running; bool pipeopen; bool pipein; public: void open(const mem::vector &command, const char *hint=NULL, const char *application="", int out_fileno=STDOUT_FILENO); bool isopen() {return pipeopen;} iopipestream(): pid(0), pipeopen(false) {} iopipestream(const mem::vector &command, const char *hint=NULL, const char *application="", int out_fileno=STDOUT_FILENO) : pid(0), pipeopen(false) { open(command,hint,application,out_fileno); } void eof(); virtual void pipeclose(); virtual ~iopipestream() { pipeclose(); } void block(bool write=false, bool read=true); ssize_t readbuffer(); string readline(); bool running() {return Running;} typedef iopipestream& (*imanip)(iopipestream&); iopipestream& operator << (imanip func) { return (*func)(*this); } iopipestream& operator >> (string& s) { readbuffer(); s=buffer; return *this; } bool tailequals(const char *buf, size_t len, const char *prompt, size_t plen); string getbuffer() {return sbuffer;} void wait(const char *prompt); int wait(); void Write(const string &s); iopipestream& operator << (const string& s) { Write(s); return *this; } template iopipestream& operator << (T x) { ostringstream os; os << x; Write(os.str()); return *this; } }; #endif ./asymptote-2.41/runsystem.symbols.h0000644000175000017500000000172013064427143017447 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(animate); ADDSYMBOL(args); ADDSYMBOL(atbreakpoint); ADDSYMBOL(atexit); ADDSYMBOL(atupdate); ADDSYMBOL(breakpoint); ADDSYMBOL(breakpoints); ADDSYMBOL(clear); ADDSYMBOL(convert); ADDSYMBOL(divisor); ADDSYMBOL(f); ADDSYMBOL(file); ADDSYMBOL(format); ADDSYMBOL(line); ADDSYMBOL(locatefile); ADDSYMBOL(nowarn); ADDSYMBOL(outname); ADDSYMBOL(position); ADDSYMBOL(purge); ADDSYMBOL(s); ADDSYMBOL(stop); ADDSYMBOL(stripdirectory); ADDSYMBOL(stripextension); ADDSYMBOL(stripfile); ADDSYMBOL(t); ADDSYMBOL(warn); ADDSYMBOL(warning); ./asymptote-2.41/runstring.h0000644000175000017500000000027413064427126015746 0ustar norbertnorbert/***** Autogenerated from runstring.in; changes will be overwritten *****/ #ifndef runstring_H #define runstring_H namespace run { void emptyString(vm::stack *); } #endif // runstring_H ./asymptote-2.41/runpath.cc0000644000175000017500000006326413064427126015542 0ustar norbertnorbert/***** Autogenerated from runpath.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runpath.in" /***** * runpicture.in * * Runtime functions for picture operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 17 "runpath.in" #include "path.h" #include "arrayop.h" #include "predicates.h" using namespace camp; using namespace vm; typedef array realarray; typedef array realarray2; typedef array patharray; using types::realArray; using types::realArray2; using types::pathArray; Int windingnumber(array *p, camp::pair z) { size_t size=checkArray(p); Int count=0; for(size_t i=0; i < size; i++) count += read(p,i)->windingnumber(z); return count; } // Autogenerated routines: #ifndef NOSYM #include "runpath.symbols.h" #endif namespace run { #line 44 "runpath.in" void nullPath(stack *Stack) { #line 45 "runpath.in" {Stack->push(nullpath); return;} } #line 49 "runpath.in" // bool ==(path a, path b); void gen_runpath1(stack *Stack) { path b=vm::pop(Stack); path a=vm::pop(Stack); #line 50 "runpath.in" {Stack->push(a == b); return;} } #line 54 "runpath.in" // bool !=(path a, path b); void gen_runpath2(stack *Stack) { path b=vm::pop(Stack); path a=vm::pop(Stack); #line 55 "runpath.in" {Stack->push(!(a == b)); return;} } #line 59 "runpath.in" // pair point(path p, Int t); void gen_runpath3(stack *Stack) { Int t=vm::pop(Stack); path p=vm::pop(Stack); #line 60 "runpath.in" {Stack->push(p.point((Int) t)); return;} } #line 64 "runpath.in" // pair point(path p, real t); void gen_runpath4(stack *Stack) { real t=vm::pop(Stack); path p=vm::pop(Stack); #line 65 "runpath.in" {Stack->push(p.point(t)); return;} } #line 69 "runpath.in" // pair precontrol(path p, Int t); void gen_runpath5(stack *Stack) { Int t=vm::pop(Stack); path p=vm::pop(Stack); #line 70 "runpath.in" {Stack->push(p.precontrol((Int) t)); return;} } #line 74 "runpath.in" // pair precontrol(path p, real t); void gen_runpath6(stack *Stack) { real t=vm::pop(Stack); path p=vm::pop(Stack); #line 75 "runpath.in" {Stack->push(p.precontrol(t)); return;} } #line 79 "runpath.in" // pair postcontrol(path p, Int t); void gen_runpath7(stack *Stack) { Int t=vm::pop(Stack); path p=vm::pop(Stack); #line 80 "runpath.in" {Stack->push(p.postcontrol((Int) t)); return;} } #line 84 "runpath.in" // pair postcontrol(path p, real t); void gen_runpath8(stack *Stack) { real t=vm::pop(Stack); path p=vm::pop(Stack); #line 85 "runpath.in" {Stack->push(p.postcontrol(t)); return;} } #line 89 "runpath.in" // pair dir(path p, Int t, Int sign=0, bool normalize=true); void gen_runpath9(stack *Stack) { bool normalize=vm::pop(Stack,true); Int sign=vm::pop(Stack,0); Int t=vm::pop(Stack); path p=vm::pop(Stack); #line 90 "runpath.in" {Stack->push(p.dir(t,sign,normalize)); return;} } #line 94 "runpath.in" // pair dir(path p, real t, bool normalize=true); void gen_runpath10(stack *Stack) { bool normalize=vm::pop(Stack,true); real t=vm::pop(Stack); path p=vm::pop(Stack); #line 95 "runpath.in" {Stack->push(p.dir(t,normalize)); return;} } #line 99 "runpath.in" // pair accel(path p, Int t, Int sign=0); void gen_runpath11(stack *Stack) { Int sign=vm::pop(Stack,0); Int t=vm::pop(Stack); path p=vm::pop(Stack); #line 100 "runpath.in" {Stack->push(p.accel(t,sign)); return;} } #line 104 "runpath.in" // pair accel(path p, real t); void gen_runpath12(stack *Stack) { real t=vm::pop(Stack); path p=vm::pop(Stack); #line 105 "runpath.in" {Stack->push(p.accel(t)); return;} } #line 109 "runpath.in" // real radius(path p, real t); void gen_runpath13(stack *Stack) { real t=vm::pop(Stack); path p=vm::pop(Stack); #line 110 "runpath.in" pair v=p.dir(t,false); pair a=p.accel(t); real d=dot(a,v); real v2=v.abs2(); real a2=a.abs2(); real denom=v2*a2-d*d; real r=v2*sqrt(v2); {Stack->push(denom > 0 ? r/sqrt(denom) : 0.0); return;} } #line 121 "runpath.in" // path reverse(path p); void gen_runpath14(stack *Stack) { path p=vm::pop(Stack); #line 122 "runpath.in" {Stack->push(p.reverse()); return;} } #line 126 "runpath.in" // path subpath(path p, Int a, Int b); void gen_runpath15(stack *Stack) { Int b=vm::pop(Stack); Int a=vm::pop(Stack); path p=vm::pop(Stack); #line 127 "runpath.in" {Stack->push(p.subpath((Int) a, (Int) b)); return;} } #line 131 "runpath.in" // path subpath(path p, real a, real b); void gen_runpath16(stack *Stack) { real b=vm::pop(Stack); real a=vm::pop(Stack); path p=vm::pop(Stack); #line 132 "runpath.in" {Stack->push(p.subpath(a,b)); return;} } #line 136 "runpath.in" // path nurb(pair z0, pair z1, pair z2, pair z3, real w0, real w1, real w2, real w3, Int m); void gen_runpath17(stack *Stack) { Int m=vm::pop(Stack); real w3=vm::pop(Stack); real w2=vm::pop(Stack); real w1=vm::pop(Stack); real w0=vm::pop(Stack); pair z3=vm::pop(Stack); pair z2=vm::pop(Stack); pair z1=vm::pop(Stack); pair z0=vm::pop(Stack); #line 138 "runpath.in" {Stack->push(nurb(z0,z1,z2,z3,w0,w1,w2,w3,m)); return;} } #line 142 "runpath.in" // Int length(path p); void gen_runpath18(stack *Stack) { path p=vm::pop(Stack); #line 143 "runpath.in" {Stack->push(p.length()); return;} } #line 147 "runpath.in" // bool cyclic(path p); void gen_runpath19(stack *Stack) { path p=vm::pop(Stack); #line 148 "runpath.in" {Stack->push(p.cyclic()); return;} } #line 152 "runpath.in" // bool straight(path p, Int t); void gen_runpath20(stack *Stack) { Int t=vm::pop(Stack); path p=vm::pop(Stack); #line 153 "runpath.in" {Stack->push(p.straight(t)); return;} } #line 157 "runpath.in" // path unstraighten(path p); void gen_runpath21(stack *Stack) { path p=vm::pop(Stack); #line 158 "runpath.in" {Stack->push(p.unstraighten()); return;} } #line 162 "runpath.in" // bool piecewisestraight(path p); void gen_runpath22(stack *Stack) { path p=vm::pop(Stack); #line 163 "runpath.in" {Stack->push(p.piecewisestraight()); return;} } #line 167 "runpath.in" // real arclength(path p); void gen_runpath23(stack *Stack) { path p=vm::pop(Stack); #line 168 "runpath.in" {Stack->push(p.arclength()); return;} } #line 172 "runpath.in" // real arctime(path p, real L); void gen_runpath24(stack *Stack) { real L=vm::pop(Stack); path p=vm::pop(Stack); #line 173 "runpath.in" {Stack->push(p.arctime(L)); return;} } #line 177 "runpath.in" // real dirtime(path p, pair z); void gen_runpath25(stack *Stack) { pair z=vm::pop(Stack); path p=vm::pop(Stack); #line 178 "runpath.in" {Stack->push(p.directiontime(z)); return;} } #line 182 "runpath.in" // realarray* intersect(path p, path q, real fuzz=-1); void gen_runpath26(stack *Stack) { real fuzz=vm::pop(Stack,-1); path q=vm::pop(Stack); path p=vm::pop(Stack); #line 183 "runpath.in" bool exact=fuzz <= 0.0; if(fuzz < 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(q.max()),length(q.min()))); std::vector S,T; real s,t; if(intersections(s,t,S,T,p,q,fuzz,true,exact)) { array *V=new array(2); (*V)[0]=s; (*V)[1]=t; {Stack->push(V); return;} } {Stack->push(new array(0)); return;} } #line 199 "runpath.in" // realarray2* intersections(path p, path q, real fuzz=-1); void gen_runpath27(stack *Stack) { real fuzz=vm::pop(Stack,-1); path q=vm::pop(Stack); path p=vm::pop(Stack); #line 200 "runpath.in" bool exact=fuzz <= 0.0; if(fuzz < 0.0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(q.max()),length(q.min()))); real s,t; std::vector S,T; intersections(s,t,S,T,p,q,fuzz,false,true); size_t n=S.size(); if(n == 0 && !exact) { if(intersections(s,t,S,T,p,q,fuzz,true,false)) { array *V=new array(1); array *Vi=new array(2); (*V)[0]=Vi; (*Vi)[0]=s; (*Vi)[1]=t; {Stack->push(V); return;} } } array *V=new array(n); for(size_t i=0; i < n; ++i) { array *Vi=new array(2); (*V)[i]=Vi; (*Vi)[0]=S[i]; (*Vi)[1]=T[i]; } stable_sort(V->begin(),V->end(),run::compare2()); {Stack->push(V); return;} } #line 230 "runpath.in" // realarray* intersections(path p, explicit pair a, explicit pair b, real fuzz=-1); void gen_runpath28(stack *Stack) { real fuzz=vm::pop(Stack,-1); pair b=vm::pop(Stack); pair a=vm::pop(Stack); path p=vm::pop(Stack); #line 231 "runpath.in" if(fuzz < 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(a),length(b))); std::vector S; intersections(S,p,a,b,fuzz); sort(S.begin(),S.end()); size_t n=S.size(); array *V=new array(n); for(size_t i=0; i < n; ++i) (*V)[i]=S[i]; {Stack->push(V); return;} } // Return the intersection point of the extensions of the line segments // PQ and pq. #line 247 "runpath.in" // pair extension(pair P, pair Q, pair p, pair q); void gen_runpath29(stack *Stack) { pair q=vm::pop(Stack); pair p=vm::pop(Stack); pair Q=vm::pop(Stack); pair P=vm::pop(Stack); #line 248 "runpath.in" pair ac=P-Q; pair bd=q-p; real det=ac.getx()*bd.gety()-ac.gety()*bd.getx(); if(det == 0) {Stack->push(pair(infinity,infinity)); return;} {Stack->push(P+((p.getx()-P.getx())*bd.gety()-(p.gety()-P.gety())*bd.getx())*ac/det); return;} } #line 256 "runpath.in" // Int size(path p); void gen_runpath30(stack *Stack) { path p=vm::pop(Stack); #line 257 "runpath.in" {Stack->push(p.size()); return;} } #line 261 "runpath.in" // path &(path p, path q); void gen_runpath31(stack *Stack) { path q=vm::pop(Stack); path p=vm::pop(Stack); #line 262 "runpath.in" {Stack->push(camp::concat(p,q)); return;} } #line 266 "runpath.in" // pair min(explicit path p); void gen_runpath32(stack *Stack) { path p=vm::pop(Stack); #line 267 "runpath.in" {Stack->push(p.min()); return;} } #line 271 "runpath.in" // pair max(explicit path p); void gen_runpath33(stack *Stack) { path p=vm::pop(Stack); #line 272 "runpath.in" {Stack->push(p.max()); return;} } #line 276 "runpath.in" // Int size(patharray *p); void gen_runpath34(stack *Stack) { patharray * p=vm::pop(Stack); #line 277 "runpath.in" size_t size=checkArray(p); Int count=0; for (size_t i = 0; i < size; i++) count += read(p,i)->size(); {Stack->push(count); return;} } #line 285 "runpath.in" // pair min(patharray *p); void gen_runpath35(stack *Stack) { patharray * p=vm::pop(Stack); #line 286 "runpath.in" size_t size=checkArray(p); if(size == 0) error(nopoints); path *g = p->read(0); pair z = g->min(); double minx = z.getx(), miny = z.gety(); for (size_t i = 1; i < size; ++i) { path *g = p->read(i); pair z = g->min(); double x = z.getx(), y = z.gety(); if (x < minx) minx = x; if (y < miny) miny = y; } {Stack->push(pair(minx, miny)); return;} } #line 309 "runpath.in" // pair max(patharray *p); void gen_runpath36(stack *Stack) { patharray * p=vm::pop(Stack); #line 310 "runpath.in" size_t size=checkArray(p); if(size == 0) error(nopoints); path *g = p->read(0); pair z = g->max(); double maxx = z.getx(), maxy = z.gety(); for (size_t i = 1; i < size; ++i) { path *g = p->read(i); pair z = g->max(); double x = z.getx(), y = z.gety(); if (x > maxx) maxx = x; if (y > maxy) maxy = y; } {Stack->push(pair(maxx, maxy)); return;} } #line 333 "runpath.in" // pair minAfterTransform(transform t, patharray *p); void gen_runpath37(stack *Stack) { patharray * p=vm::pop(Stack); transform t=vm::pop(Stack); #line 334 "runpath.in" size_t size=checkArray(p); if(size == 0) error(nopoints); path g = p->read(0)->transformed(t); pair z = g.min(); double minx = z.getx(), miny = z.gety(); for (size_t i = 1; i < size; ++i) { path g = p->read(i)->transformed(t); pair z = g.min(); double x = z.getx(), y = z.gety(); if (x < minx) minx = x; if (y < miny) miny = y; } {Stack->push(pair(minx, miny)); return;} } #line 357 "runpath.in" // pair maxAfterTransform(transform t, patharray *p); void gen_runpath38(stack *Stack) { patharray * p=vm::pop(Stack); transform t=vm::pop(Stack); #line 358 "runpath.in" size_t size=checkArray(p); if(size == 0) error(nopoints); path g = p->read(0)->transformed(t); pair z = g.max(); double maxx = z.getx(), maxy = z.gety(); for (size_t i = 1; i < size; ++i) { path g = p->read(i)->transformed(t); pair z = g.max(); double x = z.getx(), y = z.gety(); if (x > maxx) maxx = x; if (y > maxy) maxy = y; } {Stack->push(pair(maxx, maxy)); return;} } #line 381 "runpath.in" // realarray* mintimes(path p); void gen_runpath39(stack *Stack) { path p=vm::pop(Stack); #line 382 "runpath.in" array *V=new array(2); pair z=p.mintimes(); (*V)[0]=z.getx(); (*V)[1]=z.gety(); {Stack->push(V); return;} } #line 390 "runpath.in" // realarray* maxtimes(path p); void gen_runpath40(stack *Stack) { path p=vm::pop(Stack); #line 391 "runpath.in" array *V=new array(2); pair z=p.maxtimes(); (*V)[0]=z.getx(); (*V)[1]=z.gety(); {Stack->push(V); return;} } #line 399 "runpath.in" // real relativedistance(real theta, real phi, real t, bool atleast); void gen_runpath41(stack *Stack) { bool atleast=vm::pop(Stack); real t=vm::pop(Stack); real phi=vm::pop(Stack); real theta=vm::pop(Stack); #line 400 "runpath.in" {Stack->push(camp::velocity(theta,phi,tension(t,atleast))); return;} } #line 404 "runpath.in" // Int windingnumber(patharray *p, pair z); void gen_runpath42(stack *Stack) { pair z=vm::pop(Stack); patharray * p=vm::pop(Stack); #line 405 "runpath.in" {Stack->push(windingnumber(p,z)); return;} } #line 409 "runpath.in" // bool inside(explicit patharray *g, pair z, pen fillrule=CURRENTPEN); void gen_runpath43(stack *Stack) { pen fillrule=vm::pop(Stack,CURRENTPEN); pair z=vm::pop(Stack); patharray * g=vm::pop(Stack); #line 410 "runpath.in" {Stack->push(fillrule.inside(windingnumber(g,z))); return;} } #line 414 "runpath.in" // bool inside(path g, pair z, pen fillrule=CURRENTPEN); void gen_runpath44(stack *Stack) { pen fillrule=vm::pop(Stack,CURRENTPEN); pair z=vm::pop(Stack); path g=vm::pop(Stack); #line 415 "runpath.in" {Stack->push(fillrule.inside(g.windingnumber(z))); return;} } // Return a positive (negative) value if a--b--c--cycle is oriented // counterclockwise (clockwise) or zero if all three points are colinear. // Equivalently, return a positive (negative) value if c lies to the // left (right) of the line through a and b or zero if c lies on this line. // The value returned is the determinant // |a.x a.y 1| // |b.x b.y 1| // |c.x c.y 1| // #line 428 "runpath.in" // real orient(pair a, pair b, pair c); void gen_runpath45(stack *Stack) { pair c=vm::pop(Stack); pair b=vm::pop(Stack); pair a=vm::pop(Stack); #line 429 "runpath.in" {Stack->push(orient2d(a,b,c)); return;} } // Return a positive (negative) value if d lies inside (outside) // the circle passing through the counterclockwise-oriented points a,b,c // or zero if d lies on this circle. // The value returned is the determinant // |a.x a.y a.x^2+a.y^2 1| // |b.x b.y b.x^2+b.y^2 1| // |c.x c.y c.x^2+c.y^2 1| // |d.x d.y d.x^2+d.y^2 1| #line 441 "runpath.in" // real incircle(pair a, pair b, pair c, pair d); void gen_runpath46(stack *Stack) { pair d=vm::pop(Stack); pair c=vm::pop(Stack); pair b=vm::pop(Stack); pair a=vm::pop(Stack); #line 442 "runpath.in" {Stack->push(incircle(a.getx(),a.gety(),b.getx(),b.gety(),c.getx(),c.gety(), d.getx(),d.gety())); return;} } } // namespace run namespace trans { void gen_runpath_venv(venv &ve) { #line 44 "runpath.in" REGISTER_BLTIN(run::nullPath,"nullPath"); #line 49 "runpath.in" addFunc(ve, run::gen_runpath1, primBoolean(), SYM_EQ, formal(primPath(), SYM(a), false, false), formal(primPath(), SYM(b), false, false)); #line 54 "runpath.in" addFunc(ve, run::gen_runpath2, primBoolean(), SYM_NEQ, formal(primPath(), SYM(a), false, false), formal(primPath(), SYM(b), false, false)); #line 59 "runpath.in" addFunc(ve, run::gen_runpath3, primPair(), SYM(point), formal(primPath(), SYM(p), false, false), formal(primInt(), SYM(t), false, false)); #line 64 "runpath.in" addFunc(ve, run::gen_runpath4, primPair(), SYM(point), formal(primPath(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 69 "runpath.in" addFunc(ve, run::gen_runpath5, primPair(), SYM(precontrol), formal(primPath(), SYM(p), false, false), formal(primInt(), SYM(t), false, false)); #line 74 "runpath.in" addFunc(ve, run::gen_runpath6, primPair(), SYM(precontrol), formal(primPath(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 79 "runpath.in" addFunc(ve, run::gen_runpath7, primPair(), SYM(postcontrol), formal(primPath(), SYM(p), false, false), formal(primInt(), SYM(t), false, false)); #line 84 "runpath.in" addFunc(ve, run::gen_runpath8, primPair(), SYM(postcontrol), formal(primPath(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 89 "runpath.in" addFunc(ve, run::gen_runpath9, primPair(), SYM(dir), formal(primPath(), SYM(p), false, false), formal(primInt(), SYM(t), false, false), formal(primInt(), SYM(sign), true, false), formal(primBoolean(), SYM(normalize), true, false)); #line 94 "runpath.in" addFunc(ve, run::gen_runpath10, primPair(), SYM(dir), formal(primPath(), SYM(p), false, false), formal(primReal(), SYM(t), false, false), formal(primBoolean(), SYM(normalize), true, false)); #line 99 "runpath.in" addFunc(ve, run::gen_runpath11, primPair(), SYM(accel), formal(primPath(), SYM(p), false, false), formal(primInt(), SYM(t), false, false), formal(primInt(), SYM(sign), true, false)); #line 104 "runpath.in" addFunc(ve, run::gen_runpath12, primPair(), SYM(accel), formal(primPath(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 109 "runpath.in" addFunc(ve, run::gen_runpath13, primReal(), SYM(radius), formal(primPath(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 121 "runpath.in" addFunc(ve, run::gen_runpath14, primPath(), SYM(reverse), formal(primPath(), SYM(p), false, false)); #line 126 "runpath.in" addFunc(ve, run::gen_runpath15, primPath(), SYM(subpath), formal(primPath(), SYM(p), false, false), formal(primInt(), SYM(a), false, false), formal(primInt(), SYM(b), false, false)); #line 131 "runpath.in" addFunc(ve, run::gen_runpath16, primPath(), SYM(subpath), formal(primPath(), SYM(p), false, false), formal(primReal(), SYM(a), false, false), formal(primReal(), SYM(b), false, false)); #line 136 "runpath.in" addFunc(ve, run::gen_runpath17, primPath(), SYM(nurb), formal(primPair(), SYM(z0), false, false), formal(primPair(), SYM(z1), false, false), formal(primPair(), SYM(z2), false, false), formal(primPair(), SYM(z3), false, false), formal(primReal(), SYM(w0), false, false), formal(primReal(), SYM(w1), false, false), formal(primReal(), SYM(w2), false, false), formal(primReal(), SYM(w3), false, false), formal(primInt(), SYM(m), false, false)); #line 142 "runpath.in" addFunc(ve, run::gen_runpath18, primInt(), SYM(length), formal(primPath(), SYM(p), false, false)); #line 147 "runpath.in" addFunc(ve, run::gen_runpath19, primBoolean(), SYM(cyclic), formal(primPath(), SYM(p), false, false)); #line 152 "runpath.in" addFunc(ve, run::gen_runpath20, primBoolean(), SYM(straight), formal(primPath(), SYM(p), false, false), formal(primInt(), SYM(t), false, false)); #line 157 "runpath.in" addFunc(ve, run::gen_runpath21, primPath(), SYM(unstraighten), formal(primPath(), SYM(p), false, false)); #line 162 "runpath.in" addFunc(ve, run::gen_runpath22, primBoolean(), SYM(piecewisestraight), formal(primPath(), SYM(p), false, false)); #line 167 "runpath.in" addFunc(ve, run::gen_runpath23, primReal(), SYM(arclength), formal(primPath(), SYM(p), false, false)); #line 172 "runpath.in" addFunc(ve, run::gen_runpath24, primReal(), SYM(arctime), formal(primPath(), SYM(p), false, false), formal(primReal(), SYM(l), false, false)); #line 177 "runpath.in" addFunc(ve, run::gen_runpath25, primReal(), SYM(dirtime), formal(primPath(), SYM(p), false, false), formal(primPair(), SYM(z), false, false)); #line 182 "runpath.in" addFunc(ve, run::gen_runpath26, realArray(), SYM(intersect), formal(primPath(), SYM(p), false, false), formal(primPath(), SYM(q), false, false), formal(primReal(), SYM(fuzz), true, false)); #line 199 "runpath.in" addFunc(ve, run::gen_runpath27, realArray2(), SYM(intersections), formal(primPath(), SYM(p), false, false), formal(primPath(), SYM(q), false, false), formal(primReal(), SYM(fuzz), true, false)); #line 230 "runpath.in" addFunc(ve, run::gen_runpath28, realArray(), SYM(intersections), formal(primPath(), SYM(p), false, false), formal(primPair(), SYM(a), false, true), formal(primPair(), SYM(b), false, true), formal(primReal(), SYM(fuzz), true, false)); #line 245 "runpath.in" addFunc(ve, run::gen_runpath29, primPair(), SYM(extension), formal(primPair(), SYM(p), false, false), formal(primPair(), SYM(q), false, false), formal(primPair(), SYM(p), false, false), formal(primPair(), SYM(q), false, false)); #line 256 "runpath.in" addFunc(ve, run::gen_runpath30, primInt(), SYM(size), formal(primPath(), SYM(p), false, false)); #line 261 "runpath.in" addFunc(ve, run::gen_runpath31, primPath(), SYM_AMPERSAND, formal(primPath(), SYM(p), false, false), formal(primPath(), SYM(q), false, false)); #line 266 "runpath.in" addFunc(ve, run::gen_runpath32, primPair(), SYM(min), formal(primPath(), SYM(p), false, true)); #line 271 "runpath.in" addFunc(ve, run::gen_runpath33, primPair(), SYM(max), formal(primPath(), SYM(p), false, true)); #line 276 "runpath.in" addFunc(ve, run::gen_runpath34, primInt(), SYM(size), formal(pathArray() , SYM(p), false, false)); #line 285 "runpath.in" addFunc(ve, run::gen_runpath35, primPair(), SYM(min), formal(pathArray() , SYM(p), false, false)); #line 309 "runpath.in" addFunc(ve, run::gen_runpath36, primPair(), SYM(max), formal(pathArray() , SYM(p), false, false)); #line 333 "runpath.in" addFunc(ve, run::gen_runpath37, primPair(), SYM(minAfterTransform), formal(primTransform(), SYM(t), false, false), formal(pathArray() , SYM(p), false, false)); #line 357 "runpath.in" addFunc(ve, run::gen_runpath38, primPair(), SYM(maxAfterTransform), formal(primTransform(), SYM(t), false, false), formal(pathArray() , SYM(p), false, false)); #line 381 "runpath.in" addFunc(ve, run::gen_runpath39, realArray(), SYM(mintimes), formal(primPath(), SYM(p), false, false)); #line 390 "runpath.in" addFunc(ve, run::gen_runpath40, realArray(), SYM(maxtimes), formal(primPath(), SYM(p), false, false)); #line 399 "runpath.in" addFunc(ve, run::gen_runpath41, primReal(), SYM(relativedistance), formal(primReal(), SYM(theta), false, false), formal(primReal(), SYM(phi), false, false), formal(primReal(), SYM(t), false, false), formal(primBoolean(), SYM(atleast), false, false)); #line 404 "runpath.in" addFunc(ve, run::gen_runpath42, primInt(), SYM(windingnumber), formal(pathArray() , SYM(p), false, false), formal(primPair(), SYM(z), false, false)); #line 409 "runpath.in" addFunc(ve, run::gen_runpath43, primBoolean(), SYM(inside), formal(pathArray() , SYM(g), false, true), formal(primPair(), SYM(z), false, false), formal(primPen(), SYM(fillrule), true, false)); #line 414 "runpath.in" addFunc(ve, run::gen_runpath44, primBoolean(), SYM(inside), formal(primPath(), SYM(g), false, false), formal(primPair(), SYM(z), false, false), formal(primPen(), SYM(fillrule), true, false)); #line 419 "runpath.in" addFunc(ve, run::gen_runpath45, primReal(), SYM(orient), formal(primPair(), SYM(a), false, false), formal(primPair(), SYM(b), false, false), formal(primPair(), SYM(c), false, false)); #line 433 "runpath.in" addFunc(ve, run::gen_runpath46, primReal(), SYM(incircle), formal(primPair(), SYM(a), false, false), formal(primPair(), SYM(b), false, false), formal(primPair(), SYM(c), false, false), formal(primPair(), SYM(d), false, false)); } } // namespace trans ./asymptote-2.41/entry.cc0000644000175000017500000005040213064427076015214 0ustar norbertnorbert/***** * entry.cc * Andy Hammerlindl 2002/08/29 * * All variables, built-in functions and user-defined functions reside * within the same namespace. To keep track of all these, table of * "entries" is used. *****/ #include #include #include #include #include "entry.h" #include "coder.h" using std::memset; using types::ty; using types::signature; using types::overloaded; using types::ty_vector; using types::ty_iterator; namespace trans { bool entry::pr::check(action act, coder &c) { // We assume PUBLIC permissions and one's without an associated record are not // stored. assert(perm!=PUBLIC && r!=0); return c.inTranslation(r->getLevel()) || (perm == RESTRICTED && act != WRITE); } void entry::pr::report(action act, position pos, coder &c) { if (!c.inTranslation(r->getLevel())) { if (perm == PRIVATE) { em.error(pos); em << "accessing private field outside of structure"; } else if (perm == RESTRICTED && act == WRITE) { em.error(pos); em << "modifying non-public field outside of structure"; } } } entry::entry(entry &e1, entry &e2) : where(e2.where), pos(e2.pos) { perms.insert(perms.end(), e1.perms.begin(), e1.perms.end()); perms.insert(perms.end(), e2.perms.begin(), e2.perms.end()); } entry::entry(entry &base, permission perm, record *r) : where(base.where), pos(base.pos) { perms.insert(perms.end(), base.perms.begin(), base.perms.end()); addPerm(perm, r); } bool entry::checkPerm(action act, coder &c) { for (mem::list::iterator p=perms.begin(); p != perms.end(); ++p) if (!p->check(act, c)) return false; return true; } void entry::reportPerm(action act, position pos, coder &c) { for (mem::list::iterator p=perms.begin(); p != perms.end(); ++p) p->report(act, pos, c); } varEntry::varEntry(varEntry &qv, varEntry &v) : entry(qv,v), t(v.t), location(new qualifiedAccess(qv.location, qv.getLevel(), v.location)) {} frame *varEntry::getLevel() { record *r=dynamic_cast(t); assert(r); return r->getLevel(); } void varEntry::encode(action act, position pos, coder &c) { reportPerm(act, pos, c); getLocation()->encode(act, pos, c); } void varEntry::encode(action act, position pos, coder &c, frame *top) { reportPerm(act, pos, c); getLocation()->encode(act, pos, c, top); } varEntry *qualifyVarEntry(varEntry *qv, varEntry *v) { return qv ? (v ? new varEntry(*qv,*v) : qv) : v; } bool tenv::add(symbol dest, names_t::value_type &x, varEntry *qualifier, coder &c) { if (!x.second.empty()) { tyEntry *ent=x.second.front(); if (ent->checkPerm(READ, c)) { enter(dest, qualifyTyEntry(qualifier, ent)); return true; } } return false; } void tenv::add(tenv& source, varEntry *qualifier, coder &c) { // Enter each distinct (unshadowed) name,type pair. for(names_t::iterator p = source.names.begin(); p != source.names.end(); ++p) add(p->first, *p, qualifier, c); } bool tenv::add(symbol src, symbol dest, tenv& source, varEntry *qualifier, coder &c) { names_t::iterator p = source.names.find(src); if (p != source.names.end()) return add(dest, *p, qualifier, c); else return false; } #if 0 //{{{ /*NOHASH*/ void venv::add(venv& source, varEntry *qualifier, coder &c) /*NOHASH*/ { /*NOHASH*/ // Enter each distinct (unshadowed) name,type pair. /*NOHASH*/ for(names_t::iterator p = source.names.begin(); /*NOHASH*/ p != source.names.end(); /*NOHASH*/ ++p) /*NOHASH*/ add(p->first, p->first, source, qualifier, c); /*NOHASH*/ } /*NOHASH*/ /*NOHASH*/ bool venv::add(symbol src, symbol dest, /*NOHASH*/ venv& source, varEntry *qualifier, coder &c) /*NOHASH*/ { /*NOHASH*/ bool added=false; /*NOHASH*/ name_t &list=source.names[src]; /*NOHASH*/ types::overloaded set; // To keep track of what is shadowed. /*NOHASH*/ bool special = src.special(); /*NOHASH*/ /*NOHASH*/ for(name_iterator p = list.begin(); /*NOHASH*/ p != list.end(); /*NOHASH*/ ++p) { /*NOHASH*/ varEntry *v=*p; /*NOHASH*/ if (!equivalent(v->getType(), &set)) { /*NOHASH*/ set.addDistinct(v->getType(), special); /*NOHASH*/ if (v->checkPerm(READ, c)) { /*NOHASH*/ enter(dest, qualifyVarEntry(qualifier, v)); /*NOHASH*/ added=true; /*NOHASH*/ } /*NOHASH*/ } /*NOHASH*/ } /*NOHASH*/ /*NOHASH*/ return added; /*NOHASH*/ } /*NOHASH*/ /*NOHASH*/ varEntry *venv::lookByType(symbol name, ty *t) /*NOHASH*/ { /*NOHASH*/ // Find first applicable function. /*NOHASH*/ name_t &list = names[name]; /*NOHASH*/ for(name_iterator p = list.begin(); /*NOHASH*/ p != list.end(); /*NOHASH*/ ++p) { /*NOHASH*/ if (equivalent((*p)->getType(), t)) /*NOHASH*/ return *p; /*NOHASH*/ } /*NOHASH*/ return 0; /*NOHASH*/ } /*NOHASH*/ /*NOHASH*/ void venv::list(record *module) /*NOHASH*/ { /*NOHASH*/ bool where=settings::getSetting("where"); /*NOHASH*/ // List all functions and variables. /*NOHASH*/ for(names_t::iterator N = names.begin(); N != names.end(); ++N) { /*NOHASH*/ symbol s=N->first; /*NOHASH*/ name_t &list=names[s]; /*NOHASH*/ for(name_iterator p = list.begin(); p != list.end(); ++p) { /*NOHASH*/ if(!module || (*p)->whereDefined() == module) { /*NOHASH*/ if(where) cout << (*p)->getPos(); /*NOHASH*/ (*p)->getType()->printVar(cout, s); /*NOHASH*/ cout << ";\n"; /*NOHASH*/ } /*NOHASH*/ } /*NOHASH*/ } /*NOHASH*/ flush(cout); /*NOHASH*/ } /*NOHASH*/ /*NOHASH*/ ty *venv::getType(symbol name) /*NOHASH*/ { /*NOHASH*/ types::overloaded set; /*NOHASH*/ /*NOHASH*/ // Find all applicable functions in scope. /*NOHASH*/ name_t &list = names[name]; /*NOHASH*/ bool special = name.special(); /*NOHASH*/ /*NOHASH*/ for(name_iterator p = list.begin(); /*NOHASH*/ p != list.end(); /*NOHASH*/ ++p) { /*NOHASH*/ set.addDistinct((*p)->getType(), special); /*NOHASH*/ } /*NOHASH*/ /*NOHASH*/ return set.simplify(); /*NOHASH*/ } // }}} #else // To avoid writing qualifiers everywhere. typedef core_venv::cell cell; void core_venv::initTable(size_t capacity) { // Assert that capacity is a power of two. assert((capacity & (capacity-1)) == 0); this->capacity = capacity; size = 0; mask = capacity - 1; table = new (UseGC) cell[capacity]; memset(table, 0, sizeof(cell) * capacity); } void core_venv::clear() { if (size != 0) { memset(table, 0, sizeof(cell) * capacity); size = 0; } } void core_venv::resize() { size_t oldCapacity = capacity; size_t oldSize = size; cell *oldTable = table; initTable(capacity * 4); for (size_t i = 0; i < oldCapacity; ++i) { cell& b = oldTable[i]; if (!b.empty() && !b.isATomb()) { varEntry *old = store(b.name, b.ent); // We should not be shadowing anything when reconstructing the table. DEBUG_CACHE_ASSERT(old == 0); } } assert(size == oldSize); #if DEBUG_CACHE confirm_size(); for (size_t i = 0; i < oldCapacity; ++i) { cell& b = oldTable[i]; if (!b.empty() && !b.isATomb()) { assert(lookup(b.name, b.ent->getType()) == b.ent); } } #endif //cout << "resized from " << oldCapacity << " to " << capacity << endl; } cell& core_venv::cellByIndex(size_t i) { return table[i & mask]; } const cell& core_venv::cellByIndex(size_t i) const { return table[i & mask]; } void core_venv::confirm_size() { size_t sum = 0; for (size_t i = 0; i < capacity; ++i) { cell& b = table[i]; if (!b.empty() && !b.isATomb()) ++sum; } assert(sum == size); } varEntry *core_venv::storeNew(cell& cell, symbol name, varEntry *ent) { // Store the value into the cell. cell.storeNew(name, ent); // We now have a new entry. Update the size. ++size; // Check if the hash table has grown too big and needs to be expanded. if (2*size > capacity) resize(); // Nothing is shadowed. return 0; } varEntry *core_venv::storeNonSpecialAfterTomb(size_t tombIndex, symbol name, varEntry *ent) { DEBUG_CACHE_ASSERT(name.notSpecial()); DEBUG_CACHE_ASSERT(ent); DEBUG_CACHE_ASSERT(ent->getType()); signature *sig = ent->getSignature(); for (size_t i = tombIndex+1; ; ++i) { cell& b = cellByIndex(i); if (b.empty()) return storeNew(cellByIndex(tombIndex), name, ent); if (b.matches(name, sig)) return b.replaceWith(name, ent); } } varEntry *core_venv::storeSpecialAfterTomb(size_t tombIndex, symbol name, varEntry *ent) { DEBUG_CACHE_ASSERT(name.special()); DEBUG_CACHE_ASSERT(ent); DEBUG_CACHE_ASSERT(ent->getType()); ty *t = ent->getType(); for (size_t i = tombIndex+1; ; ++i) { cell& b = cellByIndex(i); if (b.empty()) return storeNew(cellByIndex(tombIndex), name, ent); if (b.matches(name, t)) return b.replaceWith(name, ent); } } size_t hashSig(const signature *sig) { return sig ? sig->hash() : 0; } size_t nonSpecialHash(symbol name, const signature *sig) { return name.hash() * 107 + hashSig(sig); } size_t nonSpecialHash(symbol name, const ty *t) { DEBUG_CACHE_ASSERT(t); return nonSpecialHash(name, t->getSignature()); } size_t specialHash(symbol name, const ty *t) { DEBUG_CACHE_ASSERT(t); return name.hash() * 107 + t->hash(); } varEntry *core_venv::storeNonSpecial(symbol name, varEntry *ent) { DEBUG_CACHE_ASSERT(name.notSpecial()); DEBUG_CACHE_ASSERT(ent); DEBUG_CACHE_ASSERT(ent->getType()); signature *sig = ent->getSignature(); for (size_t i = nonSpecialHash(name, sig); ; ++i) { cell& b = cellByIndex(i); if (b.empty()) return storeNew(b, name, ent); if (b.matches(name, sig)) return b.replaceWith(name, ent); if (b.isATomb()) return storeNonSpecialAfterTomb(i, name, ent); } } varEntry *core_venv::storeSpecial(symbol name, varEntry *ent) { DEBUG_CACHE_ASSERT(name.special()); DEBUG_CACHE_ASSERT(ent); DEBUG_CACHE_ASSERT(ent->getType()); ty *t = ent->getType(); for (size_t i = specialHash(name, t); ; ++i) { cell& b = cellByIndex(i); if (b.empty()) return storeNew(b, name, ent); if (b.matches(name, t)) return b.replaceWith(name, ent); if (b.isATomb()) return storeSpecialAfterTomb(i, name, ent); } } varEntry *core_venv::store(symbol name, varEntry *ent) { DEBUG_CACHE_ASSERT(ent); DEBUG_CACHE_ASSERT(ent->getType()); return name.special() ? storeSpecial(name, ent) : storeNonSpecial(name, ent); } varEntry *core_venv::lookupSpecial(symbol name, const ty *t) { DEBUG_CACHE_ASSERT(name.special()); DEBUG_CACHE_ASSERT(t); for (size_t i = specialHash(name, t); ; ++i) { cell& b = cellByIndex(i); if (b.matches(name, t)) return b.ent; if (b.empty()) return 0; } } varEntry *core_venv::lookupNonSpecial(symbol name, const signature *sig) { DEBUG_CACHE_ASSERT(name.notSpecial()); for (size_t i = nonSpecialHash(name, sig); ; ++i) { cell& b = cellByIndex(i); if (b.matches(name, sig)) return b.ent; if (b.empty()) return 0; } } varEntry *core_venv::lookup(symbol name, const ty *t) { DEBUG_CACHE_ASSERT(t); return name.special() ? lookupSpecial(name, t) : lookupNonSpecial(name, t->getSignature()); } void core_venv::removeNonSpecial(symbol name, const signature *sig) { DEBUG_CACHE_ASSERT(name.notSpecial()); for (size_t i = nonSpecialHash(name, sig); ; ++i) { cell& b = cellByIndex(i); if (b.matches(name, sig)) { b.remove(); --size; return; } DEBUG_CACHE_ASSERT(!b.empty()); } } void core_venv::removeSpecial(symbol name, const ty *t) { DEBUG_CACHE_ASSERT(name.special()); DEBUG_CACHE_ASSERT(t); for (size_t i = specialHash(name, t); ; ++i) { cell& b = cellByIndex(i); if (b.matches(name, t)) { b.remove(); --size; return; } DEBUG_CACHE_ASSERT(!b.empty()); } } void core_venv::remove(symbol name, const ty *t) { DEBUG_CACHE_ASSERT(t); if (name.special()) removeSpecial(name, t); else removeNonSpecial(name, t->getSignature()); } size_t numFormals(ty *t) { signature *sig = t->getSignature(); return sig ? sig->getNumFormals() : 0; } void venv::checkName(symbol name) { #if 0 // This size test is too slow, even for DEBUG_CACHE. core.confirm_size(); #endif // Get the type, and make it overloaded if it is not (for uniformity). overloaded o; ty *t = getType(name); if (!t) t = &o; if (!t->isOverloaded()) { o.add(t); t = &o; } assert(t->isOverloaded()); size_t maxFormals = names[name].maxFormals; size_t size = 0; for (ty_iterator i = t->begin(); i != t->end(); ++i) { assert(numFormals(*i) <= maxFormals); varEntry *v = lookByType(name, *i); assert(v); assert(equivalent(v->getType(), *i)); ++size; } size_t matches = 0; core_venv::const_iterator end = core.end(); for (core_venv::const_iterator p = core.begin(); p != end; ++p) { if (p->name == name) { ++matches; varEntry *v=p->ent; assert(v); assert(equivalent(t, v->getType())); } } assert(matches == size); } void rightKind(ty *t) { if (t && t->isOverloaded()) { ty_vector& set=((overloaded *)t)->sub; assert(set.size() > 1); } } #ifdef DEBUG_CACHE #define RIGHTKIND(t) (rightKind(t)) #define CHECKNAME(name) (checkName(name)) #else #define RIGHTKIND(t) (void)(t) #define CHECKNAME(name) (void)(name) #endif void venv::namevalue::addType(ty *s) { RIGHTKIND(t); #ifdef DEBUG_CACHE assert(!s->isOverloaded()); #endif if (t == 0) { maxFormals = numFormals(s); t = s; } else { if (!t->isOverloaded()) t = new overloaded(t); #ifdef DEBUG_CACHE assert(t->isOverloaded()); assert(!equivalent(t, s)); #endif ((overloaded *)t)->add(s); size_t n = numFormals(s); if (n > maxFormals) maxFormals = n; } RIGHTKIND(t); } void venv::namevalue::replaceType(ty *new_t, ty *old_t) { #ifdef DEBUG_CACHE assert(t != 0); RIGHTKIND(t); #endif // TODO: Test for equivalence. if (t->isOverloaded()) { for (ty_iterator i = t->begin(); i != t->end(); ++i) { if (equivalent(old_t, *i)) { *i = new_t; return; } } // An error, the type was not found. assert("unreachable code" == 0); } else { #ifdef DEBUG_CACHE assert(equivalent(old_t, t)); #endif t = new_t; } #ifdef DEBUG_CACHE assert(t != 0); RIGHTKIND(t); #endif } #ifdef DEBUG_CACHE void venv::namevalue::popType(ty *s) #else void venv::namevalue::popType() #endif { #ifdef DEBUG_CACHE assert(t); RIGHTKIND(t); assert(!s->isOverloaded()); #endif if (t->isOverloaded()) { ty_vector& set=((overloaded *)t)->sub; #ifdef DEBUG_CACHE assert(set.size() > 0); assert(equivalent(set.back(), s)); #endif // We are relying on the fact that this was the last type added to t, and // that type are added by pushing them on the end of the vector. set.pop_back(); if (set.size() == 1) t = set.front(); } else { #ifdef DEBUG_CACHE assert(equivalent(t, s)); #endif t = 0; } RIGHTKIND(t); // Don't try to reduce numFormals as I doubt it is worth the cost of // recalculating. } void venv::remove(const addition& a) { CHECKNAME(a.name); if (a.shadowed) { varEntry *popEnt = core.store(a.name, a.shadowed); DEBUG_CACHE_ASSERT(popEnt); // Unshadow the previously shadowed varEntry. names[a.name].replaceType(a.shadowed->getType(), popEnt->getType()); } else { // Remove the (name,sig) key completely. #if DEBUG_CACHE varEntry *popEnt = core.lookup(a.name, a.t); assert(popEnt); names[a.name].popType(popEnt->getType()); #else names[a.name].popType(); #endif core.remove(a.name, a.t); } CHECKNAME(a.name); } void venv::beginScope() { if (core.empty()) { assert(scopesizes.empty()); ++empty_scopes; } else { scopesizes.push(additions.size()); } } void venv::endScope() { if (scopesizes.empty()) { // The corresponding beginScope happened when the venv was empty, so // clear the hash tables to return to that state. core.clear(); names.clear(); assert(empty_scopes > 0); --empty_scopes; } else { size_t scopesize = scopesizes.top(); assert(additions.size() >= scopesize); while (additions.size() > scopesize) { remove(additions.top()); additions.pop(); } scopesizes.pop(); } } // Adds the definitions of the top-level scope to the level underneath, // and then removes the top scope. void venv::collapseScope() { if (scopesizes.empty()) { // Collapsing an empty scope. assert(empty_scopes > 0); --empty_scopes; } else { // As scopes are stored solely by the number of entries at the beginning // of the scope, popping the top size will put all of the entries into the // next scope down. scopesizes.pop(); } } void venv::enter(symbol name, varEntry *v) { CHECKNAME(name); // Store the new variable. If it shadows an older variable, that varEntry // will be returned. varEntry *shadowed = core.store(name, v); ty *t = v->getType(); // Record the addition, so it can be undone during endScope. if (!scopesizes.empty()) additions.push(addition(name, t, shadowed)); if (shadowed) // The new value shadows an old value. They have the same signature, but // possibly different return types. If necessary, update the type stored // by name. names[name].replaceType(t, shadowed->getType()); else // Add to the names hash table. names[name].addType(t); CHECKNAME(name); } varEntry *venv::lookBySignature(symbol name, signature *sig) { // Rest arguments are complicated and rare. Don't handle them here. if (sig->hasRest()) return 0; // Likewise with the special operators. if (name.special()) return 0; namevalue& nv = names[name]; // Avoid ambiguities with default parameters. if (nv.maxFormals != sig->getNumFormals()) return 0; // See if this exactly matches a function in the table. varEntry *ve = core.lookupNonSpecial(name, sig); if (!ve) return 0; // Keyword-only arguments may cause matching to fail. if (ve->getSignature()->numKeywordOnly > 0) return 0; // At this point, any function with an equivalent signature will be equal // to the result of the normal overloaded function resolution. We may // safely return it. return ve; } void venv::add(venv& source, varEntry *qualifier, coder &c) { core_venv::const_iterator end = source.core.end(); for (core_venv::const_iterator p = source.core.begin(); p != end; ++p) { DEBUG_CACHE_ASSERT(p->filled()); varEntry *v=p->ent; if (v->checkPerm(READ, c)) { enter(p->name, qualifyVarEntry(qualifier, v)); } } } bool venv::add(symbol src, symbol dest, venv& source, varEntry *qualifier, coder &c) { ty *t=source.getType(src); if (!t) return false; if (t->isOverloaded()) { bool added=false; for (ty_iterator i = t->begin(); i != t->end(); ++i) { varEntry *v=source.lookByType(src, *i); if (v->checkPerm(READ, c)) { enter(dest, qualifyVarEntry(qualifier, v)); added=true; } } return added; } else { varEntry *v=source.lookByType(src, t); if (v->checkPerm(READ, c)) { enter(dest, qualifyVarEntry(qualifier, v)); return true; } return false; } } ty *venv::getType(symbol name) { return names[name].t; } void listValue(symbol name, varEntry *v, record *module) { if (!module || v->whereDefined() == module) { if (settings::getSetting("where")) cout << v->getPos(); v->getType()->printVar(cout, name); cout << ";\n"; } } void venv::listValues(symbol name, record *module) { ty *t=getType(name); if (t->isOverloaded()) for (ty_iterator i = t->begin(); i != t->end(); ++i) listValue(name, lookByType(name, *i), module); else listValue(name, lookByType(name, t), module); flush(cout); } void venv::list(record *module) { // List all functions and variables. for (namemap::iterator N = names.begin(); N != names.end(); ++N) listValues(N->first, module); } void venv::completions(mem::list& l, string start) { for(namemap::iterator N = names.begin(); N != names.end(); ++N) if (prefix(start, N->first) && N->second.t) l.push_back(N->first); } #endif /* not NOHASH */ } // namespace trans ./asymptote-2.41/opsymbols.h0000644000175000017500000000223213064427112015731 0ustar norbertnorbert/***** * This file is automatically generated by opsymbols.pl * Changes will be overwritten. *****/ // If the OPSYMBOL macro is not defined for a specific purpose, define it with // the default purpose of using SYM_PLUS etc. as external pre-translated // symbols. #ifndef OPSYMBOL #define OPSYMBOL(str, name) extern sym::symbol name #endif OPSYMBOL("tuple", SYM_TUPLE); OPSYMBOL("+", SYM_PLUS); OPSYMBOL("-", SYM_MINUS); OPSYMBOL("*", SYM_TIMES); OPSYMBOL("/", SYM_DIVIDE); OPSYMBOL("#", SYM_QUOTIENT); OPSYMBOL("%", SYM_MOD); OPSYMBOL("^", SYM_CARET); OPSYMBOL("==", SYM_EQ); OPSYMBOL("!=", SYM_NEQ); OPSYMBOL("<", SYM_LT); OPSYMBOL("<=", SYM_LE); OPSYMBOL(">", SYM_GT); OPSYMBOL(">=", SYM_GE); OPSYMBOL("&&", SYM_CAND); OPSYMBOL("||", SYM_COR); OPSYMBOL("!", SYM_LOGNOT); OPSYMBOL("^^", SYM_CARETS); OPSYMBOL("::", SYM_COLONS); OPSYMBOL("++", SYM_INCR); OPSYMBOL("..", SYM_DOTS); OPSYMBOL("--", SYM_DASHES); OPSYMBOL("---", SYM_LONGDASH); OPSYMBOL("&", SYM_AMPERSAND); OPSYMBOL("|", SYM_BAR); OPSYMBOL("controls", SYM_CONTROLS); OPSYMBOL("tension", SYM_TENSION); OPSYMBOL("atleast", SYM_ATLEAST); OPSYMBOL("curl", SYM_CURL); /* This file is automatically generated. */ ./asymptote-2.41/texfile.cc0000644000175000017500000004732013064427076015520 0ustar norbertnorbert/***** * texfile.cc * John Bowman 2003/03/14 * * Encapsulates the writing of commands to a TeX file. *****/ #include #include #include "texfile.h" #include "errormsg.h" using std::ofstream; using settings::getSetting; using vm::array; using vm::read; namespace camp { texfile::texfile(const string& texname, const bbox& box, bool pipe) : box(box) { texengine=getSetting("tex"); inlinetex=getSetting("inlinetex"); Hoffset=inlinetex ? box.right : box.left; out=new ofstream(texname.c_str()); if(!out || !*out) reportError("Cannot write to "+texname); out->setf(std::ios::fixed); out->precision(6); texdocumentclass(*out,pipe); resetpen(); level=0; } texfile::~texfile() { if(out) { delete out; out=NULL; } } void texfile::miniprologue() { texpreamble(*out,processData().TeXpreamble,false); if(settings::latex(texengine)) { *out << "\\pagestyle{empty}" << newl << "\\textheight=2048pt" << newl << "\\textwidth=2048pt" << newl << "\\begin{document}" << newl; latexfontencoding(*out); } else if(settings::context(texengine)) { *out << "\\setuppagenumbering[location=]" << newl << "\\usetypescript[modern]" << newl << "\\starttext\\hbox{%" << newl; } else *out << "\\nopagenumbers" << newl; } void texfile::prologue() { if(inlinetex) { string prename=buildname(settings::outname(),"pre"); std::ofstream *outpreamble=new std::ofstream(prename.c_str()); texpreamble(*outpreamble,processData().TeXpreamble,true,false); outpreamble->close(); } texdefines(*out,processData().TeXpreamble,false); double width=box.right-box.left; double height=box.top-box.bottom; if(!inlinetex) { if(settings::context(texengine)) { *out << "\\definepapersize[asy][width=" << width << "bp,height=" << height << "bp]" << newl << "\\setuppapersize[asy][asy]" << newl; } else if(settings::pdf(texengine)) { double voffset=0.0; if(settings::latex(texengine)) { if(height < 12.0) voffset=height-12.0; } else if(height < 10.0) voffset=height-10.0; if(width > 0) *out << "\\pdfpagewidth=" << width << "bp" << newl; *out << "\\ifx\\pdfhorigin\\undefined" << newl << "\\hoffset=-1in" << newl << "\\voffset=" << voffset-72.0 << "bp" << newl; if(height > 0) *out << "\\pdfpageheight=" << height << "bp" << newl; *out << "\\else" << newl << "\\pdfhorigin=0bp" << newl << "\\pdfvorigin=" << voffset << "bp" << newl; if(height > 0) *out << "\\pdfpageheight=" << height << "bp" << newl; *out << "\\fi" << newl; } } if(settings::xe(texengine) && !inlinetex) *out << "\\usepackage{everypage}%" << newl; if(settings::latex(texengine)) { *out << "\\setlength{\\unitlength}{1pt}" << newl; if(!inlinetex) { *out << "\\pagestyle{empty}" << newl << "\\textheight=" << height+18.0 << "bp" << newl << "\\textwidth=" << width+18.0 << "bp" << newl; if(settings::pdf(texengine)) *out << "\\oddsidemargin=-17.61pt" << newl << "\\evensidemargin=\\oddsidemargin" << newl << "\\topmargin=-37.01pt" << newl; *out << "\\begin{document}" << newl; } latexfontencoding(*out); } else { if(!inlinetex) { if(settings::context(texengine)) { *out << "\\setuplayout[" << "backspace=0pt,topspace=0pt," << "header=0pt,headerdistance=0pt,footer=0pt]" << newl << "\\setuppagenumbering[location=]" << endl << "\\usetypescript[modern]" << newl << "\\starttext\\hbox{%" << newl; } else { *out << "\\footline={}" << newl; if(settings::pdf(texengine)) { *out << "\\hoffset=-20pt" << newl << "\\voffset=0pt" << newl; } else { *out << "\\hoffset=36.6pt" << newl << "\\voffset=54.0pt" << newl; } } } } beginpage(); } void texfile::beginlayer(const string& psname, bool postscript) { if(box.right > box.left && box.top > box.bottom) { if(postscript) { if(settings::context(texengine)) *out << "\\externalfigure[" << psname << "]%" << newl; else { *out << "{\\catcode`\"=12%" << newl << "\\includegraphics"; bool pdf=settings::pdf(texengine); string quote; string name=stripExt(psname); if(inlinetex) { size_t pos=name.rfind("-"); if(pos < string::npos) name="\\ASYprefix\\jobname"+name.substr(pos); } else { if(!pdf) name=psname; if(stripDir(name) != name) quote="\""; } if(pdf) *out << "{" << quote << name << quote << ".pdf}%" << newl; else { *out << "[bb=" << box.left << " " << box.bottom << " " << box.right << " " << box.top << "]" << "{" << quote << name << quote << "}%" << newl; } *out << "}%" << newl; } if(!inlinetex) *out << "\\kern " << (box.left-box.right)*ps2tex << "pt%" << newl; } else { *out << "\\leavevmode\\vbox to " << (box.top-box.bottom)*ps2tex << "pt{}%" << newl; if(inlinetex) *out << "\\kern " << (box.right-box.left)*ps2tex << "pt%" << newl; } } } void texfile::endlayer() { if(inlinetex && (box.right > box.left && box.top > box.bottom)) *out << "\\kern " << (box.left-box.right)*ps2tex << "pt%" << newl; } void texfile::writeshifted(path p, bool newPath) { write(p.transformed(shift(pair(-Hoffset,-box.bottom))),newPath); } void texfile::setlatexcolor(pen p) { if(p.cmyk() && (!lastpen.cmyk() || (p.cyan() != lastpen.cyan() || p.magenta() != lastpen.magenta() || p.yellow() != lastpen.yellow() || p.black() != lastpen.black()))) { *out << "\\definecolor{ASYcolor}{cmyk}{" << p.cyan() << "," << p.magenta() << "," << p.yellow() << "," << p.black() << "}\\color{ASYcolor}" << newl; } else if(p.rgb() && (!lastpen.rgb() || (p.red() != lastpen.red() || p.green() != lastpen.green() || p.blue() != lastpen.blue()))) { *out << "\\definecolor{ASYcolor}{rgb}{" << p.red() << "," << p.green() << "," << p.blue() << "}\\color{ASYcolor}" << newl; } else if(p.grayscale() && (!lastpen.grayscale() || p.gray() != lastpen.gray())) { *out << "\\definecolor{ASYcolor}{gray}{" << p.gray() << "}\\color{ASYcolor}" << newl; } } void texfile::setfont(pen p) { bool latex=settings::latex(texengine); if(latex) setlatexfont(*out,p,lastpen); settexfont(*out,p,lastpen,latex); lastpen.setfont(p); } void texfile::setpen(pen p) { bool latex=settings::latex(texengine); p.convert(); if(p == lastpen) return; if(latex) setlatexcolor(p); else setcolor(p,settings::beginspecial(texengine),settings::endspecial()); setfont(p); } void texfile::beginpicture(const bbox& b) { verbatim(settings::beginpicture(texengine)); if(!settings::context(texengine)) { verbatim("("); double width=b.right-b.left; double height=b.top-b.bottom; write(width*ps2tex); verbatim(","); write(height*ps2tex); verbatim(")"); } verbatimline("%"); } void texfile::endpicture(const bbox& b) { verbatimline(settings::endpicture(texengine)); verbatim("\\kern"); double width=b.right-b.left; write(-width*ps2tex); verbatimline("pt%"); } void texfile::gsave(bool) { *out << settings::beginspecial(texengine); psfile::gsave(true); *out << settings::endspecial() << newl; } void texfile::grestore(bool) { *out << settings::beginspecial(texengine); psfile::grestore(true); *out << settings::endspecial() << newl; } void texfile::beginspecial() { *out << settings::beginspecial(texengine); } void texfile::endspecial() { *out << settings::endspecial() << newl; } void texfile::beginraw() { *out << "\\ASYraw{" << newl; } void texfile::endraw() { *out << "}%" << newl; } void texfile::put(const string& label, const transform& T, const pair& z, const pair& align) { double sign=settings::pdf(texengine) ? 1.0 : -1.0; if(label.empty()) return; bool trans=!T.isIdentity(); *out << "\\ASYalign"; if(trans) *out << "T"; *out << "(" << (z.getx()-Hoffset)*ps2tex << "," << (z.gety()-box.bottom)*ps2tex << ")(" << align.getx() << "," << align.gety() << ")"; if(trans) *out << "{" << T.getxx() << " " << sign*T.getyx() << " " << sign*T.getxy() << " " << T.getyy() << "}"; *out << "{" << label << "}%" << newl; } void texfile::epilogue(bool pipe) { endpage(); if(settings::latex(texengine)) *out << "\\end{document}" << newl; else if(settings::context(texengine)) *out << "}\\stoptext" << newl; else *out << "\\bye" << newl; out->flush(); } string svgtexfile::nl="{?nl}%\n"; void svgtexfile::beginspecial() { inspecial=true; out->unsetf(std::ios::fixed); *out << "\\catcode`\\#=11%" << newl << "\\special{dvisvgm:raw" << nl; } void svgtexfile::endspecial() { inspecial=false; *out << "}\\catcode`\\#=6%" << newl; out->setf(std::ios::fixed); } void svgtexfile::begintransform() { *out << "" << nl; } void svgtexfile::endtransform() { *out << ""; } void svgtexfile::gsave(bool) { if(clipstack.size() < 1) clipstack.push(0); else clipstack.push(clipcount); *out << "\\special{dvisvgm:raw }%" << newl; pens.push(lastpen); } void svgtexfile::grestore(bool) { if(pens.size() < 1 || clipstack.size() < 1) reportError("grestore without matching gsave"); lastpen=pens.top(); pens.pop(); clipstack.pop(); *out << "\\special{dvisvgm:raw }%" << newl; } void svgtexfile::clippath() { if(clipstack.size() > 0) { size_t count=clipstack.top(); if(count > 0) *out << "clip-path='url(#clip" << count << ")' "; } } void svgtexfile::beginpath() { *out << "" << nl; beginpath(); if(clipstack.size() > 0) clipstack.pop(); clipstack.push(clipcount); } void svgtexfile::endclip0(const pen &p) { *out << "'"; fillrule(p,"clip"); endpath(); *out << "" << nl; } void svgtexfile::endclip(const pen &p) { endclip0(p); endtransform(); endspecial(); } void svgtexfile::fillrule(const pen& p, const string& type) { if(p.Fillrule() != lastpen.Fillrule()) *out << " " << type << "-rule='" << (p.evenodd() ? "evenodd" : "nonzero") << "'"; lastpen.setfillrule(p); } void svgtexfile::color(const pen &p, const string& type) { *out << "' " << type << "='#" << rgbhex(p) << "'"; double opacity=p.opacity(); if(opacity != 1.0) *out << " opacity='" << opacity << "'"; } void svgtexfile::fill(const pen &p) { color(p,"fill"); fillrule(p); endpath(); endtransform(); endspecial(); } void svgtexfile::properties(const pen& p) { if(p.cap() != lastpen.cap()) *out << " stroke-linecap='" << PSCap[p.cap()] << "'"; if(p.join() != lastpen.join()) *out << " stroke-linejoin='" << Join[p.join()] << "'"; if(p.miter() != lastpen.miter()) *out << " stroke-miterlimit='" << p.miter()*ps2tex << "'"; if(p.width() != lastpen.width()) *out << " stroke-width='" << p.width()*ps2tex << "'"; const LineType *linetype=p.linetype(); const LineType *lastlinetype=lastpen.linetype(); if(!(linetype->pattern == lastlinetype->pattern)) { size_t n=linetype->pattern.size(); if(n > 0) { *out << " stroke-dasharray='"; *out << vm::read(linetype->pattern,0)*ps2tex; for(size_t i=1; i < n; ++i) *out << "," << vm::read(linetype->pattern,i)*ps2tex; *out << "'"; } } if(linetype->offset != lastlinetype->offset) *out << " stroke-dashoffset='" << linetype->offset*ps2tex << "'"; lastpen=p; } void svgtexfile::stroke(const pen &p, bool dot) { if(dot) color(p,"fill"); else { color(p,"fill='none' stroke"); properties(p); } endpath(); endtransform(); endspecial(); } void svgtexfile::strokepath() { reportWarning("SVG does not support strokepath"); } void svgtexfile::begingradientshade(bool axial, ColorSpace colorspace, const pen& pena, const pair& a, double ra, const pen& penb, const pair& b, double rb) { string type=axial ? "linear" : "radial"; beginspecial(); *out << "<" << type << "Gradient id='grad" << gradientcount; if(axial) { *out << "' x1='" << a.getx()*ps2tex << "' y1='" << -a.gety()*ps2tex << "' x2='" << b.getx()*ps2tex << "' y2='" << -b.gety()*ps2tex; } else { *out << "' cx='" << b.getx()*ps2tex << "' cy='" << -b.gety()*ps2tex << "' r='" << rb*ps2tex; } *out <<"' gradientUnits='userSpaceOnUse'>" << nl << "" << nl << "" << nl << "" << nl; begintransform(); beginpath(); } void svgtexfile::gradientshade(bool axial, ColorSpace colorspace, const pen& pena, const pair& a, double ra, bool, const pen& penb, const pair& b, double rb, bool) { *out << "' fill='url(#grad" << gradientcount << ")'"; fillrule(pena); endpath(); ++gradientcount; endtransform(); endspecial(); } // Return the point on the line through p and q that is closest to z. pair closest(pair p, pair q, pair z) { pair u=q-p; double denom=dot(u,u); return denom == 0.0 ? p : p+dot(z-p,u)/denom*u; } void svgtexfile::gouraudshade(const pen& p0, const pair& z0, const pen& p1, const pair& z1, const pen& p2, const pair& z2) { string hex[]={rgbhex(p0),rgbhex(p1),rgbhex(p2)}; pair Z[]={z0,z1,z2}; *out << "" << nl << "" << nl << "" << nl << ""; for(size_t k=0; k < 3; ++k) { pair z=Z[k]; pair opp=closest(Z[(k+1) % 3],Z[(k+2) % 3],z); *out << "" << nl << "" << nl << "" << nl << "" << nl; } *out << "" << nl << "" << nl; *out << "" << nl << "" << nl << "" << nl; ++gouraudcount; } void svgtexfile::begingouraudshade(const vm::array& pens, const vm::array& vertices, const vm::array& edges) { size_t size=pens.size(); if(size == 0) return; beginclip(); } void svgtexfile::gouraudshade(const pen& pentype, const array& pens, const array& vertices, const array& edges) { size_t size=pens.size(); if(size == 0) return; endclip0(pentype); pen *p0=NULL,*p1=NULL,*p2=NULL; pair z0,z1,z2; for(size_t i=0; i < size; i++) { Int edge=read(edges,i); switch(edge) { case 0: p0=read(pens,i); z0=read(vertices,i); ++i; if(i < size) { p1=read(pens,i); z1=read(vertices,i); ++i; if(i < size) { p2=read(pens,i); z2=read(vertices,i); } } break; case 1: p0=read(pens,i); z0=read(vertices,i); break; case 2: p1=read(pens,i); z1=read(vertices,i); break; default: break; } if(p0 == NULL || p1 == NULL || p2 == NULL) reportError("invalid edge flag"); gouraudshade(*p0,z0,*p1,z1,*p2,z2); } endtransform(); endspecial(); } void svgtexfile::begintensorshade(const vm::array& pens, const vm::array& boundaries, const vm::array& z) { beginspecial(); *out << "" << nl; path g=read(boundaries,0); pair Z[]={g.point((Int) 0),g.point((Int) 3),g.point((Int) 2), g.point((Int) 1)}; array *pi=read(pens,0); if(checkArray(pi) != 4) reportError("specify 4 pens for each path"); string hex[]={rgbhex(read(pi,0)),rgbhex(read(pi,3)), rgbhex(read(pi,2)),rgbhex(read(pi,1))}; *out << "" << nl << "" << nl << ""; pair mean=0.25*(Z[0]+Z[1]+Z[2]+Z[3]); for(size_t k=0; k < 4; ++k) { pair opp=(k % 2 == 0) ? Z[(k+2) % 4] : mean; *out << "" << nl << "" << nl << "" << nl << "" << nl; } beginpath(); } void svgtexfile::tensorshade(const pen& pentype, const vm::array& pens, const vm::array& boundaries, const vm::array& z) { *out << "' id='path" << tensorcount << "'"; fillrule(pentype); endpath(); *out << "" << nl; begintransform(); *out << "" << nl << "" << nl << "" << nl << "" << nl; ++tensorcount; endspecial(); } } //namespace camp ./asymptote-2.41/psfile.h0000644000175000017500000002211413064427076015176 0ustar norbertnorbert/***** * psfile.h * Andy Hammerlindl 2002/06/10 * * Encapsulates the writing of commands to a PostScript file. * Allows identification and removal of redundant commands. *****/ #ifndef PSFILE_H #define PSFILE_H #include #include #include #include "pair.h" #include "path.h" #include "bbox.h" #include "pen.h" #include "array.h" #include "callable.h" namespace camp { inline void BoundingBox(std::ostream& s, const bbox& box) { s << "%%BoundingBox: " << std::setprecision(0) << std::fixed << box.LowRes() << newl; s.unsetf(std::ios::fixed); s << "%%HiResBoundingBox: " << std::setprecision(9) << box << newl; } // An ASCII85Encode filter. class encode85 { ostream *out; int tuple; int pos; int count; static const int width=72; public: encode85(ostream *out) : out(out), tuple(0), pos(0), count(0) {} ~encode85() { if(count > 0) encode(tuple, count); if(pos+2 > width) *out << '\n'; *out << "~>\n"; } private: void encode(unsigned int tuple, int count) { unsigned char buf[5], *s=buf; int i=5; do { *s++=tuple % 85; tuple /= 85; } while(--i > 0); i=count; do { *out << (unsigned char) (*--s + '!'); if(pos++ >= width) { pos=0; *out << '\n'; } } while(i-- > 0); } public: void put(unsigned char c) { switch (count++) { case 0: tuple |= (c << 24); break; case 1: tuple |= (c << 16); break; case 2: tuple |= (c << 8); break; case 3: tuple |= c; if(tuple == 0) { *out << 'z'; if(pos++ >= width) { pos=0; *out << '\n'; } } else encode(tuple, count); tuple=0; count=0; break; } } }; class psfile { protected: mem::stack pens; public: string filename; bool pdfformat; // Is final output format PDF? bool pdf; // Output direct PDF? bool transparency; // Is transparency used? unsigned char *buffer; size_t count; void write(pen *p, size_t ncomponents); void writefromRGB(unsigned char r, unsigned char g, unsigned char b, ColorSpace colorspace, size_t ncomponents); void writeCompressed(const unsigned char *a, size_t size); void dealias(unsigned char *a, size_t width, size_t height, size_t n, bool convertrgb=false, ColorSpace colorspace=DEFCOLOR); void beginImage(size_t n) { buffer=new unsigned char[n]; count=0; } void outImage(bool antialias, size_t width, size_t height, size_t ncomponents); void endImage(bool antialias, size_t width, size_t height, size_t ncomponents) { outImage(antialias,width,height,ncomponents); delete[] buffer; } void writeByte(unsigned char n) { buffer[count++]=n; } protected: pen lastpen; std::ostream *out; public: psfile(const string& filename, bool pdfformat); psfile() {pdf=settings::pdf(settings::getSetting("tex"));} virtual ~psfile(); void BoundingBox(const bbox& box) { camp::BoundingBox(*out,box); } void prologue(const bbox& box); void epilogue(); void header(); void close(); void write(double x) { *out << " " << x; } void writenewl() { *out << newl; } bool Transparency() { return transparency; } void write(pair z) { *out << " " << z.getx() << " " << z.gety(); } void write(transform t) { if(!pdf) *out << "["; *out << " " << t.getxx() << " " << t.getyx() << " " << t.getxy() << " " << t.getyy() << " " << t.getx() << " " << t.gety(); if(!pdf) *out << "]"; } void resetpen() { lastpen=pen(initialpen); lastpen.convert(); } void setcolor(const pen& p, const string& begin, const string& end); void setopacity(const pen& p); virtual void setpen(pen p); void write(const pen& p); void write(path p, bool newPath=true); virtual void writeclip(path p, bool newPath=true) { write(p,newPath); } virtual void dot(path p, pen, bool newPath=true) { write(p,newPath); } virtual void newpath() { if(!pdf) *out << "newpath"; } virtual void moveto(pair z) { write(z); if(pdf) *out << " m" << newl; else *out << " moveto" << newl; } virtual void lineto(pair z) { write(z); if(pdf) *out << " l" << newl; else *out << " lineto" << newl; } virtual void curveto(pair zp, pair zm, pair z1) { write(zp); write(zm); write(z1); if(pdf) *out << " c" << newl; else *out << " curveto" << newl; } virtual void closepath() { if(pdf) *out << "h" << newl; else *out << "closepath" << newl; } virtual void stroke(const pen &p, bool dot=false) { if(pdf) *out << "S" << newl; else *out << "stroke" << newl; } virtual void strokepath() { if(pdf) reportError("PDF does not support strokepath"); else *out << "strokepath" << newl; } virtual void fill(const pen &p) { if(p.evenodd()) { if(pdf) *out << "f*" << newl; else *out << "eofill" << newl; } else { if(pdf) *out << "f" << newl; else *out << "fill" << newl; } } virtual void beginclip() { newpath(); } virtual void endclip(const pen &p) { if(p.evenodd()) { if(pdf) *out << "W* n" << newl; else *out << "eoclip" << newl; } else { if(pdf) *out << "W n" << newl; else *out << "clip" << newl; } } virtual void endpsclip(const pen &p) {endclip(p);} void checkLevel() { int n=settings::getSetting("level"); if(n < 3) reportError("PostScript shading requires -level 3"); } virtual void beginlatticeshade(const vm::array& a, const bbox& b) {} virtual void latticeshade(const vm::array& a, const transform& t); virtual void begingradientshade(bool axial, ColorSpace colorspace, const pen& pena, const pair& a, double ra, const pen& penb, const pair& b, double rb) {} virtual void gradientshade(bool axial, ColorSpace colorspace, const pen& pena, const pair& a, double ra, bool extenda, const pen& penb, const pair& b, double rb, bool extendb); virtual void begingouraudshade(const vm::array& pens, const vm::array& vertices, const vm::array& edges) {} virtual void gouraudshade(const pen& pentype, const vm::array& pens, const vm::array& vertices, const vm::array& edges); virtual void begintensorshade(const vm::array& pens, const vm::array& boundaries, const vm::array& z) {} virtual void tensorshade(const pen& pentype, const vm::array& pens, const vm::array& boundaries, const vm::array& z); void vertexpen(vm::array *pi, int j, ColorSpace colorspace); void imageheader(size_t width, size_t height, ColorSpace colorspace); void image(const vm::array& a, const vm::array& p, bool antialias); void image(const vm::array& a, bool antialias); void image(vm::stack *Stack, vm::callable *f, Int width, Int height, bool antialias); void rawimage(unsigned char *a, size_t width, size_t height, bool antialias); virtual void gsave(bool tex=false) { if(pdf) *out << "q"; else *out << "gsave"; if(!tex) *out << newl; pens.push(lastpen); } virtual void grestore(bool tex=false) { if(pens.size() < 1) reportError("grestore without matching gsave"); lastpen=pens.top(); pens.pop(); if(pdf) *out << "Q"; else *out << "grestore"; if(!tex) *out << newl; } virtual void translate(pair z) { if(z == pair(0.0,0.0)) return; if(pdf) *out << " 1 0 0 1 " << newl; write(z); if(pdf) *out << " cm" << newl; *out << " translate" << newl; } // Multiply on a transform to the transformation matrix. virtual void concat(transform t) { if(t.isIdentity()) return; write(t); if(pdf) *out << " cm" << newl; else *out << " concat" << newl; } void verbatimline(const string& s) { *out << s << newl; } void verbatim(const string& s) { *out << s; } // Determine shading and image transparency based on first pen. void setfirstopacity(const vm::array& pens) { if(pens.size() > 0) { pen *p=vm::read(pens,0); setopacity(*p); } } ColorSpace maxcolorspace(const vm::array& pens) { ColorSpace colorspace=DEFCOLOR; size_t size=pens.size(); for(size_t i=0; i < size; i++) { pen *p=vm::read(pens,i); p->convert(); colorspace=max(colorspace,p->colorspace()); } return colorspace; } ColorSpace maxcolorspace2(const vm::array& penarray) { ColorSpace colorspace=DEFCOLOR; size_t size=penarray.size(); for(size_t i=0; i < size; i++) colorspace=max(colorspace, maxcolorspace(vm::read(penarray,i))); return colorspace; } }; } //namespace camp #endif ./asymptote-2.41/Delaunay.h0000644000175000017500000000060013064427076015452 0ustar norbertnorbert#ifndef DELAUNAY_H #define DELAUNAY_H #include #include #include #include #include "common.h" struct ITRIANGLE{ Int p1, p2, p3; }; struct IEDGE{ Int p1, p2; }; struct XYZ{ double p[2]; // {x,y} Int i; }; Int Triangulate(Int nv, XYZ pxyz[], ITRIANGLE v[], Int &ntri, bool presort=true, bool postsort=true); #endif ./asymptote-2.41/types.cc0000644000175000017500000003307413064427076015225 0ustar norbertnorbert/***** * types.cc * Andy Hammerlindl 2002/06/24 * * Used by the compiler as a way to keep track of the type of a variable * or expression. *****/ #include #include #include "entry.h" #include "types.h" #include "runtime.h" #include "runarray.h" #include "runfile.h" #include "runpair.h" #include "runtriple.h" #include "access.h" #include "virtualfieldaccess.h" namespace run { void arrayDeleteHelper(vm::stack *Stack); } // For pre-translated symbols. #ifndef NOSYM #include "types.symbols.h" #endif namespace types { /* Base types */ #define PRIMITIVE(name,Name,asyName) \ primitiveTy p##Name(ty_##name); \ ty *prim##Name() { return &p##Name; } \ array name##Array_(prim##Name()); \ ty *name##Array() { return &name##Array_; } \ array name##Array2_(name##Array()); \ ty *name##Array2() { return &name##Array2_; } \ array name##Array3_(name##Array2()); \ ty *name##Array3() { return &name##Array3_; } #define PRIMERROR #include "primitives.h" #undef PRIMERROR #undef PRIMITIVE nullTy pNull; ty *primNull() { return &pNull; } const char *names[] = { "null", "", "", "", #define PRIMITIVE(name,Name,asyName) #asyName, #define PRIMERROR #include "primitives.h" #undef PRIMERROR #undef PRIMITIVE "" }; ty::~ty() {} void ty::print(ostream& out) const { out << names[kind]; } // Used for primitive virtual fields and array virtual fields. #define FIELD(Type, name, func) \ if (sig == 0 && id == name) { \ static trans::virtualFieldAccess a(run::func); \ static trans::varEntry v(Type(), &a, 0, position()); \ return &v; \ } #define RWFIELD(Type, name, getter, setter) \ if (sig == 0 && id == name) { \ static trans::virtualFieldAccess a(run::getter, run::setter); \ static trans::varEntry v(Type(), &a, 0, position()); \ return &v; \ } #define SIGFIELD(Type, name, func) \ if (id == name && \ equivalent(sig, Type()->getSignature())) \ { \ static trans::virtualFieldAccess a(run::func, 0, run::func##Helper); \ static trans::varEntry v(Type(), &a, 0, position()); \ return &v; \ } #define DSIGFIELD(name, sym, func) \ if (id == sym && \ equivalent(sig, name##Type()->getSignature())) \ { \ static trans::virtualFieldAccess a(run::func, 0, run::func##Helper); \ /* for some fields, v needs to be dynamic */ \ /* e.g. when the function type depends on an array type. */ \ trans::varEntry *v = \ new trans::varEntry(name##Type(), &a, 0, position()); \ return v; \ } #define FILEFIELD(GetType, SetType, name, sym) \ FIELD(GetType,sym,name##Part); \ SIGFIELD(SetType,sym,name##Set); ty *dimensionType() { return new function(primFile(), formal(primInt(),SYM(nx),true), formal(primInt(),SYM(ny),true), formal(primInt(),SYM(nz),true)); } ty *modeType() { return new function(primFile(),formal(primBoolean(),SYM(b), true)); } ty *readType() { return new function(primFile(), formal(primInt(), SYM(i))); } trans::varEntry *primitiveTy::virtualField(symbol id, signature *sig) { switch (kind) { case ty_pair: FIELD(primReal,SYM(x),pairXPart); FIELD(primReal,SYM(y),pairYPart); break; case ty_triple: FIELD(primReal,SYM(x),tripleXPart); FIELD(primReal,SYM(y),tripleYPart); FIELD(primReal,SYM(z),tripleZPart); break; case ty_transform: FIELD(primReal,SYM(x),transformXPart); FIELD(primReal,SYM(y),transformYPart); FIELD(primReal,SYM(xx),transformXXPart); FIELD(primReal,SYM(xy),transformXYPart); FIELD(primReal,SYM(yx),transformYXPart); FIELD(primReal,SYM(yy),transformYYPart); break; case ty_tensionSpecifier: FIELD(primReal,SYM(out),tensionSpecifierOutPart); FIELD(primReal,SYM(in),tensionSpecifierInPart); FIELD(primBoolean,SYM(atLeast),tensionSpecifierAtleastPart); break; case ty_curlSpecifier: FIELD(primReal,SYM(value),curlSpecifierValuePart); FIELD(primInt,SYM(side),curlSpecifierSidePart); break; case ty_file: FIELD(primString,SYM(name),namePart); FIELD(primString,SYM(mode),modePart); FILEFIELD(IntArray,dimensionType,dimension,SYM(dimension)); FILEFIELD(primBoolean,modeType,line,SYM(line)); FILEFIELD(primBoolean,modeType,csv,SYM(csv)); FILEFIELD(primBoolean,modeType,word,SYM(word)); FILEFIELD(primBoolean,modeType,singlereal,SYM(singlereal)); FILEFIELD(primBoolean,modeType,singleint,SYM(singleint)); FILEFIELD(primBoolean,modeType,signedint,SYM(signedint)); SIGFIELD(readType,SYM(read),readSet); break; default: break; } return 0; } ty *overloadedDimensionType() { overloaded *o=new overloaded; o->add(dimensionType()); o->add(IntArray()); return o; } ty *overloadedModeType() { overloaded *o=new overloaded; o->add(modeType()); o->add(primBoolean()); return o; } ty *ty::virtualFieldGetType(symbol id) { trans::varEntry *v = virtualField(id, 0); return v ? v->getType() : 0; } ty *primitiveTy::virtualFieldGetType(symbol id) { if(kind == ty_file) { if (id == SYM(dimension)) return overloadedDimensionType(); if (id == SYM(line) || id == SYM(csv) || id == SYM(word) || id == SYM(singlereal) || id == SYM(singleint) || id == SYM(signedint)) return overloadedModeType(); if (id == SYM(read)) return readType(); } trans::varEntry *v = virtualField(id, 0); return v ? v->getType() : 0; } #define RETURN_STATIC_BLTIN(func) \ { \ static trans::bltinAccess a(run::func); \ return &a; \ } trans::access *nullTy::castTo(ty *target, caster &) { switch (target->kind) { case ty_array: { RETURN_STATIC_BLTIN(pushNullArray); } case ty_record: { RETURN_STATIC_BLTIN(pushNullRecord); } case ty_function: { RETURN_STATIC_BLTIN(pushNullFunction); } default: return 0; } } trans::access *array::initializer() { RETURN_STATIC_BLTIN(emptyArray) } ty *array::pushType() { if (pushtype == 0) pushtype = new function(celltype,formal(celltype,SYM(x))); return pushtype; } ty *array::popType() { if (poptype == 0) poptype = new function(celltype); return poptype; } ty *array::appendType() { if (appendtype == 0) appendtype = new function(primVoid(),formal(this,SYM(a))); return appendtype; } ty *array::insertType() { if (inserttype == 0) { function *f=new function(primVoid(),formal(primInt(),SYM(i))); f->addRest(this); inserttype = f; } return inserttype; } ty *array::deleteType() { if (deletetype == 0) deletetype = new function(primVoid(),formal(primInt(),SYM(i),true), formal(primInt(),SYM(j),true)); return deletetype; } ty *initializedType() { return new function(primBoolean(),formal(primInt(),SYM(i))); } #define SIGFIELDLIST \ ASIGFIELD(initialized, SYM(initialized), arrayInitialized); \ ASIGFIELD(push, SYM(push), arrayPush); \ ASIGFIELD(pop, SYM(pop), arrayPop); \ ASIGFIELD(append, SYM(append), arrayAppend); \ ASIGFIELD(insert, SYM(insert), arrayInsert); \ ASIGFIELD(delete, SYM(delete), arrayDelete); \ ty *array::virtualFieldGetType(symbol id) { #define ASIGFIELD(name, sym, func) \ if (id == sym) \ return name##Type(); SIGFIELDLIST #undef ASIGFIELD return ty::virtualFieldGetType(id); } trans::varEntry *array::virtualField(symbol id, signature *sig) { FIELD(primInt, SYM(length), arrayLength); FIELD(IntArray, SYM(keys), arrayKeys); RWFIELD(primBoolean, SYM(cyclic), arrayCyclicFlag, arraySetCyclicFlag); #define ASIGFIELD(name, sym, func) DSIGFIELD(name, sym, func) SIGFIELDLIST #undef ASIGFIELD // Fall back on base class to handle no match. return ty::virtualField(id, sig); } #undef SIGFIELDLIST void printFormal(ostream& out, const formal& f, bool keywordOnly) { if (f.Explicit) out << "explicit "; if (f.name) f.t->printVar(out, keywordOnly ? "keyword "+(string)(f.name) : f.name); else f.t->print(out); if (f.defval) out << "="; } ostream& operator<< (ostream& out, const formal& f) { #if 0 if (f.Explicit) out << "explicit "; if (f.name) f.t->printVar(out,f.name); else f.t->print(out); if (f.defval) out << "="; #endif printFormal(out, f, false); return out; } bool equivalent(const formal& f1, const formal& f2) { // Just test the types. // This cannot be used on rest formal with types equal to NULL. return equivalent(f1.t,f2.t); } bool argumentEquivalent(const formal &f1, const formal& f2) { if (f1.name == f2.name) { if (f1.t == 0) return f2.t == 0; else if (f2.t == 0) return false; return f1.t->kind != ty_overloaded && f2.t->kind != ty_overloaded && equivalent(f1.t, f2.t); } else return false; } ostream& operator<< (ostream& out, const signature& s) { if (s.isOpen) { out << "()"; return out; } out << "("; for (size_t i = 0; i < s.formals.size(); ++i) { if (i > 0) out << ", "; printFormal(out, s.getFormal(i), s.formalIsKeywordOnly(i)); } if (s.rest.t) { if (!s.formals.empty()) out << " "; out << "... " << s.rest; } out << ")"; return out; } // Equivalence by design does not look at the presence of default values. bool equivalent(const signature *s1, const signature *s2) { if (s1 == s2) return true; // Handle null signature if (s1 == 0 || s2 == 0) return false; // Two open signatures are always equivalent, as the formals are ignored. if (s1->isOpen) return s2->isOpen; else if (s2->isOpen) return false; if (s1->formals.size() != s2->formals.size()) return false; if (!std::equal(s1->formals.begin(),s1->formals.end(),s2->formals.begin(), (bool (*)(const formal&,const formal&)) equivalent)) return false; if (s1->rest.t) return s2->rest.t && equivalent(s1->rest, s2->rest); else return s2->rest.t == 0; } bool argumentEquivalent(const signature *s1, const signature *s2) { // Handle null signature if (s1 == 0) return s2 == 0; else if (s2 == 0) return false; if (s1->formals.size() != s2->formals.size()) return false; return std::equal(s1->formals.begin(),s1->formals.end(),s2->formals.begin(), (bool (*)(const formal&,const formal&)) argumentEquivalent) && argumentEquivalent(s1->rest, s2->rest); } size_t signature::hash() const { size_t x=2038; for (formal_vector::const_iterator i=formals.begin(); i!=formals.end(); ++i) x=x*0xFAEC+i->t->hash(); if (rest.t) x=x*0xACED +rest.t->hash(); return x; } trans::access *function::initializer() { RETURN_STATIC_BLTIN(pushNullFunction); } #if 0 ty *function::stripDefaults() { function *f = new function(result); Int n = sig.getNumFormals(); for (Int i = 0; i < n; ++i) f->add(sig.getFormal(i), 0); return f; } #endif // Only add a type with a signature distinct from the ones currently // in the overloaded type. void overloaded::addDistinct(ty *t, bool special) { if (t->kind == ty_overloaded) { overloaded *ot = (overloaded *)t; for (ty_vector::iterator st = ot->sub.begin(); st != ot->sub.end(); ++st) { this->addDistinct(*st, special); } } else { for (ty_vector::iterator st = this->sub.begin(); st != this->sub.end(); ++st) { if (equivalent(t, *st, special)) return; } // Nonequivalent in signature - add it. this->add(t); } } ty *overloaded::signatureless() { for(ty_vector::iterator t = sub.begin(); t != sub.end(); ++t) if ((*t)->getSignature()==0) return *t; return 0; } bool overloaded::castable(ty *target, caster &c) { for(ty_vector::iterator s = sub.begin(); s != sub.end(); ++s) if (c.castable(target,*s)) return true; return false; } bool equivalent(const ty *t1, const ty *t2) { // The same pointer must point to the same type. if (t1 == t2) return true; // Ensure if an overloaded type is compared to a non-overloaded one, that the // overloaded type's method is called. if (t2->kind == ty_overloaded) return t2->equiv(t1); if (t1->kind == ty_overloaded) return t1->equiv(t2); // Outside of overloaded types, different kinds mean different types. if (t1->kind != t2->kind) return false; return t1->equiv(t2); } bool equivalent(const ty *t1, const ty *t2, bool special) { return special ? equivalent(t1, t2) : equivalent(t1->getSignature(), t2->getSignature()); } #undef FIELD #undef RWFIELD #undef SIGFIELD #undef DSIGFIELD } // namespace types ./asymptote-2.41/common.h0000644000175000017500000000317313064427076015210 0ustar norbertnorbert/**** * common.h * * Definitions common to all files. *****/ #ifndef COMMON_H #define COMMON_H #undef NDEBUG #include #include #ifdef __CYGWIN__ #undef LONG_LONG_MAX #define LONG_LONG_MAX __LONG_LONG_MAX__ #undef LONG_LONG_MIN #define LONG_LONG_MIN (-LONG_LONG_MAX-1) #endif #ifdef HAVE_CONFIG_H #include "config.h" #endif #if !defined(FOR_SHARED) && defined(HAVE_LIBGLU) && \ ((defined(HAVE_LIBGL) && defined(HAVE_LIBGLUT)) || defined(HAVE_LIBOSMESA)) #define HAVE_GL #endif #ifdef HAVE_PTHREAD #include #endif #include "memory.h" #if defined(HAVE_LONG_LONG) && defined(LONG_LONG_MAX) && defined(LONG_LONG_MIN) #define Int_MAX2 LONG_LONG_MAX #define Int_MIN LONG_LONG_MIN typedef long long Int; typedef unsigned long long unsignedInt; #else #undef HAVE_LONG_LONG #ifdef HAVE_LONG #define Int_MAX2 LONG_MAX #define Int_MIN LONG_MIN typedef long Int; typedef unsigned long unsignedInt; #else #define Int_MAX2 INT_MAX #define Int_MIN INT_MIN typedef int Int; typedef unsigned int unsignedInt; #endif #endif #ifndef COMPACT #if Int_MAX2 >= 0x7fffffffffffffffLL #define COMPACT 1 #else #define COMPACT 0 #endif #endif #if COMPACT // Reserve highest two values for DefaultValue and Undefined states. #define Int_MAX (Int_MAX2-2) #define int_MAX (LONG_MAX-2) #else #define Int_MAX Int_MAX2 #define int_MAX LONG_MAX #endif #define int_MIN LONG_MIN #define RANDOM_MAX 0x7FFFFFFF using std::cout; using std::cin; using std::cerr; using std::endl; using std::istream; using std::ostream; using mem::string; using mem::stringstream; using mem::istringstream; using mem::ostringstream; using mem::stringbuf; #endif ./asymptote-2.41/statistics.h0000644000175000017500000000165313064427076016113 0ustar norbertnorbert#ifndef __statistics_h__ #define __statistics_h__ 1 namespace utils { class statistics { unsigned int N; double A; double varL; double varH; public: statistics() : N(0), A(0.0), varL(0.0), varH(0.0) {} double count() {return N;} double mean() {return A;} void add(double t) { ++N; double diff=t-A; A += diff/N; double v=diff*(t-A); if(diff < 0.0) varL += v; else varH += v; } double stdev(double var, double f) { double factor=N > f ? f/(N-f) : 0.0; return sqrt(var*factor); } double stdev() { return stdev(varL+varH,1.0); } double stdevL() { return stdev(varL,2.0); } double stdevH() { return stdev(varH,2.0); } void output(const char *text, unsigned int m) { std::cout << text << ":\n" << m << "\t" << A << "\t" << stdevL() << "\t" << stdevH() << std::endl; } }; } #endif ./asymptote-2.41/process.h0000644000175000017500000000517213064427076015377 0ustar norbertnorbert/***** * process.h * Andy Hammerlindl 2006/08/19 * * Handles processing blocks of code (including files, strings, and the * interactive prompt, for listing and parse-only modes as well as actually * running it. *****/ #ifndef PROCESS_H #define PROCESS_H #include "common.h" #include "stm.h" #include "stack.h" #include "pipestream.h" #include "callable.h" #include "pen.h" #ifdef HAVE_RPC_RPC_H #include "xstream.h" #endif // Process the code respecting the parseonly and listvariables flags of // settings. void processCode(absyntax::block *code); void processFile(const string& filename, bool purge=false); void processPrompt(); // Run the code in its own environment. void runCode(absyntax::block *code); void runString(const string& s, bool interactiveWrite=false); void runFile(const string& filename); void runPrompt(); // Run the code in a given run-time environment. typedef vm::interactiveStack istack; void runCodeEmbedded(absyntax::block *code, trans::coenv &e, istack &s); void runStringEmbedded(const string& str, trans::coenv &e, istack &s); void runPromptEmbedded(trans::coenv &e, istack &s); // Basic listing. void doUnrestrictedList(); template class terminator { public: typedef mem::vector Pointer; Pointer pointer; // Return first available index size_t available() { size_t index=0; for(typename Pointer::iterator p=pointer.begin(); p != pointer.end(); ++p) { if(*p == NULL) {return index;} ++index; } pointer.push_back(NULL); return index; } size_t add(T *p) { size_t index=available(); pointer[index]=p; return index; } void remove(size_t index) { pointer[index]=NULL; } ~terminator() { for(typename Pointer::iterator p=pointer.begin(); p != pointer.end(); ++p) { if(*p != NULL) { (*p)->~T(); (*p)=NULL; } } } }; class texstream : public iopipestream { public: ~texstream(); }; struct processDataStruct { texstream tex; // Bi-directional pipe to latex (to find label bbox) mem::list TeXpipepreamble; mem::list TeXpreamble; vm::callable *atExitFunction; vm::callable *atUpdateFunction; vm::callable *atBreakpointFunction; camp::pen defaultpen; camp::pen currentpen; terminator ofile; terminator ifile; #ifdef HAVE_RPC_RPC_H terminator ixfile; terminator oxfile; #endif processDataStruct() { atExitFunction=NULL; atUpdateFunction=NULL; atBreakpointFunction=NULL; defaultpen=camp::pen::initialpen(); currentpen=camp::pen(); } }; processDataStruct &processData(); #endif ./asymptote-2.41/builtin.h0000644000175000017500000000314513064427076015365 0ustar norbertnorbert/***** * builtin.h * Tom Prince 2004/08/25 * * Initialize builtins. *****/ #ifndef BUILTIN_H #define BUILTIN_H #include "vm.h" #include "types.h" #include "arrayop.h" namespace trans { class tenv; class venv; // The base environments for built-in types and functions void base_tenv(tenv &); void base_venv(venv &); extern const types::formal noformal; // Add a function with one or more default arguments. void addFunc(venv &ve, vm::bltin f, types::ty *result, symbol name, types::formal f1=noformal, types::formal f2=noformal, types::formal f3=noformal, types::formal f4=noformal, types::formal f5=noformal, types::formal f6=noformal, types::formal f7=noformal, types::formal f8=noformal, types::formal f9=noformal, types::formal fA=noformal, types::formal fB=noformal, types::formal fC=noformal, types::formal fD=noformal, types::formal fE=noformal, types::formal fF=noformal, types::formal fG=noformal, types::formal fH=noformal, types::formal fI=noformal); // Adds standard functions for a newly added types. void addArrayOps(venv &ve, types::array *t); void addRecordOps(venv &ve, types::record *r); void addFunctionOps(venv &ve, types::function *f); #ifdef HAVE_LIBGSL types::record *getGSLModule(); void GSLrngFree(); #endif } //namespace trans namespace run { extern double infinity; void single(vm::stack *Stack); void arrayDeleteHelper(vm::stack *Stack); // Used by to optimize conditional jumps. extern const vm::bltin intLess; extern const vm::bltin intGreater; } #endif //BUILTIN_H ./asymptote-2.41/vm.h0000644000175000017500000000135513064427076014342 0ustar norbertnorbert/***** * vm.h * Tom Prince 2005/06/17 * * Interface to the virtual machine. *****/ #ifndef VM_H #define VM_H #include "errormsg.h" namespace vm { struct lambda; class stack; typedef void (*bltin)(stack *s); #ifdef DEBUG_BLTIN // This associates names to bltin functions, so that the output of 'asy -s' // can print the names of the bltin functions that appear in the bytecode. void registerBltin(bltin b, string s); string lookupBltin(bltin b); #define REGISTER_BLTIN(b, s) \ registerBltin((b), (s)) #else #define REGISTER_BLTIN(b, s) #endif void run(lambda *l); position getPos(); void errornothrow(const char* message); void error(const char* message); void error(const ostringstream& message); } // namespace vm #endif // VM_H ./asymptote-2.41/Delaunay.cc0000644000175000017500000001341113064427076015614 0ustar norbertnorbert// Robust version of Gilles Dumoulin's C++ port of Paul Bourke's // triangulation code available from // http://astronomy.swin.edu.au/~pbourke/papers/triangulate // Used with permission of Paul Bourke. // Segmentation fault and numerical robustness improvements by John C. Bowman #include #include "Delaunay.h" #include "predicates.h" inline double max(double a, double b) { return (a > b) ? a : b; } int XYZCompare(const void *v1, const void *v2) { double x1=((XYZ*)v1)->p[0]; double x2=((XYZ*)v2)->p[0]; if(x1 < x2) return(-1); else if(x1 > x2) return(1); else return(0); } inline double hypot2(double *x) { return x[0]*x[0]+x[1]*x[1]; } /////////////////////////////////////////////////////////////////////////////// // Triangulate(): // Triangulation subroutine // Takes as input NV vertices in array pxyz // Returned is a list of ntri triangular faces in the array v // These triangles are arranged in a consistent clockwise order. // The triangle array v should be allocated to 4 * nv // The vertex array pxyz must be big enough to hold 3 additional points. // By default, the array pxyz is automatically presorted and postsorted. /////////////////////////////////////////////////////////////////////////////// Int Triangulate(Int nv, XYZ pxyz[], ITRIANGLE v[], Int &ntri, bool presort, bool postsort) { Int emax = 200; if(presort) qsort(pxyz,nv,sizeof(XYZ),XYZCompare); else postsort=false; /* Allocate memory for the completeness list, flag for each triangle */ Int trimax = 4 * nv; Int *complete = new Int[trimax]; /* Allocate memory for the edge list */ IEDGE *edges = new IEDGE[emax]; /* Find the maximum and minimum vertex bounds. This is to allow calculation of the bounding triangle */ double xmin = pxyz[0].p[0]; double ymin = pxyz[0].p[1]; double xmax = xmin; double ymax = ymin; for(Int i = 1; i < nv; i++) { XYZ *pxyzi=pxyz+i; double x=pxyzi->p[0]; double y=pxyzi->p[1]; if (x < xmin) xmin = x; if (x > xmax) xmax = x; if (y < ymin) ymin = y; if (y > ymax) ymax = y; } double dx = xmax - xmin; double dy = ymax - ymin; /* Set up the supertriangle. This is a triangle which encompasses all the sample points. The supertriangle coordinates are added to the end of the vertex list. The supertriangle is the first triangle in the triangle list. */ static const double margin=0.01; double xmargin=margin*dx; double ymargin=margin*dy; pxyz[nv+0].p[0] = xmin-xmargin; pxyz[nv+0].p[1] = ymin-ymargin; pxyz[nv+1].p[0] = xmin-xmargin; pxyz[nv+1].p[1] = ymax+ymargin+dx; pxyz[nv+2].p[0] = xmax+xmargin+dy; pxyz[nv+2].p[1] = ymin-ymargin; v->p1 = nv; v->p2 = nv+1; v->p3 = nv+2; complete[0] = false; ntri = 1; /* Include each point one at a time into the existing mesh */ for(Int i = 0; i < nv; i++) { Int nedge = 0; double *d=pxyz[i].p; /* Set up the edge buffer. If the point d lies inside the circumcircle then the three edges of that triangle are added to the edge buffer and that triangle is removed. */ for(Int j = 0; j < ntri; j++) { if(complete[j]) continue; ITRIANGLE *vj=v+j; double *a=pxyz[vj->p1].p; double *b=pxyz[vj->p2].p; double *c=pxyz[vj->p3].p; if(incircle(a,b,c,d) <= 0.0) { // Point d is inside or on circumcircle /* Check that we haven't exceeded the edge list size */ if(nedge + 3 >= emax) { emax += 100; IEDGE *p_EdgeTemp = new IEDGE[emax]; for (Int i = 0; i < nedge; i++) { p_EdgeTemp[i] = edges[i]; } delete[] edges; edges = p_EdgeTemp; } ITRIANGLE *vj=v+j; Int p1=vj->p1; Int p2=vj->p2; Int p3=vj->p3; edges[nedge].p1 = p1; edges[nedge].p2 = p2; edges[++nedge].p1 = p2; edges[nedge].p2 = p3; edges[++nedge].p1 = p3; edges[nedge].p2 = p1; ++nedge; ntri--; v[j] = v[ntri]; complete[j] = complete[ntri]; j--; } else { double A=hypot2(a); double B=hypot2(b); double C=hypot2(c); double a0=orient2d(a,b,c); // Is d[0] > xc+r for circumcircle abc of radius r about (xc,yc)? if(d[0]*a0 < 0.5*orient2d(A,a[1],B,b[1],C,c[1])) complete[j]= incircle(a[0]*a0,a[1]*a0,b[0]*a0,b[1]*a0,c[0]*a0,c[1]*a0, d[0]*a0,0.5*orient2d(a[0],A,b[0],B,c[0],C)) > 0.0; } } /* Tag multiple edges Note: if all triangles are specified anticlockwise then all interior edges are opposite pointing in direction. */ for(Int j = 0; j < nedge - 1; j++) { for(Int k = j + 1; k < nedge; k++) { if((edges[j].p1 == edges[k].p2) && (edges[j].p2 == edges[k].p1)) { edges[j].p1 = -1; edges[j].p2 = -1; edges[k].p1 = -1; edges[k].p2 = -1; } } } /* Form new triangles for the current point Skipping over any tagged edges. All edges are arranged in clockwise order. */ for(Int j = 0; j < nedge; j++) { if(edges[j].p1 < 0 || edges[j].p2 < 0) continue; v[ntri].p1 = edges[j].p1; v[ntri].p2 = edges[j].p2; v[ntri].p3 = i; complete[ntri] = false; ntri++; assert(ntri < trimax); } } /* Remove triangles with supertriangle vertices These are triangles which have a vertex number greater than nv */ for(Int i = 0; i < ntri; i++) { ITRIANGLE *vi=v+i; if(vi->p1 >= nv || vi->p2 >= nv || vi->p3 >= nv) { ntri--; *vi = v[ntri]; i--; } } delete[] edges; delete[] complete; if(postsort) { for(Int i = 0; i < ntri; i++) { ITRIANGLE *vi=v+i; vi->p1=pxyz[vi->p1].i; vi->p2=pxyz[vi->p2].i; vi->p3=pxyz[vi->p3].i; } } return 0; } ./asymptote-2.41/asymptote.nsi0000644000175000017500000001457213064427076016314 0ustar norbertnorbert!define PRODUCT_NAME "Asymptote" !include AsymptoteInstallInfo.nsi !define PRODUCT_WEB_SITE "http://asymptote.sourceforge.net/" !define PRODUCT_DIR_REGKEY "Software\Microsoft\Windows\CurrentVersion\App Paths\Asymptote" !define PRODUCT_FILE_TYPE_REGKEY1 "Software\Classes\.asy" !define PRODUCT_FILE_TYPE_REGKEY2 "Software\Classes\ASYFile\shell\open\command" !define PRODUCT_UNINST_KEY "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_NAME}" !define PRODUCT_UNINST_ROOT_KEY "HKLM" !define PRODUCT_STARTMENU_REGVAL "NSIS:StartMenuDir" SetCompressor lzma XPStyle On ; MUI 1.67 compatible ------ !include "MUI.nsh" !include "LogicLib.nsh" !include "EnvVarUpdate.nsh" !include "lnkX64IconFix.nsh" ; MUI Settings !define MUI_ABORTWARNING !define MUI_ICON "asy.ico" !define MUI_UNICON "asy.ico" ; Welcome page !insertmacro MUI_PAGE_WELCOME ; License page !insertmacro MUI_PAGE_LICENSE "LICENSE" ;Components page ; don't bother with this until there are other components to install ; e.g.: possibility to automatically detect presence of, download, and install python, miktex, ImageMagick, etc ;!insertmacro MUI_PAGE_COMPONENTS ; Directory page !insertmacro MUI_PAGE_DIRECTORY ; Start menu page var ICONS_GROUP !define MUI_STARTMENUPAGE_NODISABLE !define MUI_STARTMENUPAGE_DEFAULTFOLDER "Asymptote" !define MUI_STARTMENUPAGE_REGISTRY_ROOT "${PRODUCT_UNINST_ROOT_KEY}" !define MUI_STARTMENUPAGE_REGISTRY_KEY "${PRODUCT_UNINST_KEY}" !define MUI_STARTMENUPAGE_REGISTRY_VALUENAME "${PRODUCT_STARTMENU_REGVAL}" !insertmacro MUI_PAGE_STARTMENU Application $ICONS_GROUP ; Instfiles page !insertmacro MUI_PAGE_INSTFILES ; Finish page ;!define MUI_FINISHPAGE_RUN "$INSTDIR\asy.bat" ;!define MUI_FINISHPAGE_SHOWREADME "$INSTDIR\asymptote.pdf" !define MUI_FINISHPAGE_LINK ${PRODUCT_WEB_SITE} !define MUI_FINISHPAGE_LINK_LOCATION ${PRODUCT_WEB_SITE} !insertmacro MUI_PAGE_FINISH ; Uninstaller pages !insertmacro MUI_UNPAGE_WELCOME !insertmacro MUI_UNPAGE_CONFIRM !insertmacro MUI_UNPAGE_INSTFILES !insertmacro MUI_UNPAGE_FINISH ; Language files !insertmacro MUI_LANGUAGE "English" ; Reserve files !insertmacro MUI_RESERVEFILE_INSTALLOPTIONS ; MUI end ------ Name "${PRODUCT_NAME} ${PRODUCT_VERSION}" OutFile "asymptote-${PRODUCT_VERSION}-setup.exe" InstallDir "$PROGRAMFILES\Asymptote" InstallDirRegKey HKLM "${PRODUCT_DIR_REGKEY}" "" ShowInstDetails show ShowUnInstDetails show Section "Asymptote" SEC01 SetOutPath "$INSTDIR" ${EnvVarUpdate} $0 "PATH" "A" "HKLM" "$INSTDIR" Delete "$INSTDIR\_imagingtk.pyd" Delete "$INSTDIR\opengl32.dll" Delete "$INSTDIR\glu32.dll" SetOverwrite try File /r build-${PRODUCT_VERSION}\* FileOpen $0 $INSTDIR\asy.bat w FileWrite $0 "@ECHO OFF" FileWriteByte $0 "13" FileWriteByte $0 "10" FileWrite $0 "set CYGWIN=nodosfilewarning" FileWriteByte $0 "13" FileWriteByte $0 "10" FileWrite $0 '"$INSTDIR\asy.exe" %*' FileWriteByte $0 "13" FileWriteByte $0 "10" FileWrite $0 "if %errorlevel% == 0 exit /b" FileWriteByte $0 "13" FileWriteByte $0 "10" FileWrite $0 "echo." FileWriteByte $0 "13" FileWriteByte $0 "10" FileWrite $0 "PAUSE" FileWriteByte $0 "13" FileWriteByte $0 "10" FileClose $0 ; Shortcuts !insertmacro MUI_STARTMENU_WRITE_BEGIN Application CreateDirectory "$SMPROGRAMS\$ICONS_GROUP" SetOutPath "%USERPROFILE%" CreateShortCut "$SMPROGRAMS\$ICONS_GROUP\Asymptote.lnk" "$INSTDIR\asy.bat" "" "$INSTDIR\asy.ico" ${lnkX64IconFix} "$SMPROGRAMS\$ICONS_GROUP\Asymptote.lnk" CreateShortCut "$DESKTOP\Asymptote.lnk" "$INSTDIR\asy.bat" "" "$INSTDIR\asy.ico" ${lnkX64IconFix} "$DESKTOP\Asymptote.lnk" CreateShortCut "$DESKTOP\Xasy.lnk" "$INSTDIR\xasy.py" CreateShortCut "$SMPROGRAMS\$ICONS_GROUP\Xasy.lnk" "$INSTDIR\xasy.py" SetOutPath "$INSTDIR" !insertmacro MUI_STARTMENU_WRITE_END SectionEnd Section "Tester" SectionEnd Section -AdditionalIcons !insertmacro MUI_STARTMENU_WRITE_BEGIN Application WriteIniStr "$INSTDIR\${PRODUCT_NAME}.url" "InternetShortcut" "URL" "${PRODUCT_WEB_SITE}" CreateShortCut "$SMPROGRAMS\$ICONS_GROUP\Website.lnk" "$INSTDIR\${PRODUCT_NAME}.url" CreateShortCut "$SMPROGRAMS\$ICONS_GROUP\Uninstall.lnk" "$INSTDIR\uninst.exe" !insertmacro MUI_STARTMENU_WRITE_END SectionEnd Section -Post WriteUninstaller "$INSTDIR\uninst.exe" ;create registry keys with information needed to run asymptote WriteRegStr HKLM "${PRODUCT_DIR_REGKEY}" "" "$INSTDIR\asy.exe" WriteRegStr HKLM "${PRODUCT_DIR_REGKEY}" "Path" "$INSTDIR" WriteRegStr HKLM "${PRODUCT_FILE_TYPE_REGKEY1}" "" "ASYFile" WriteRegStr HKLM "${PRODUCT_FILE_TYPE_REGKEY2}" "" '"$INSTDIR\asy.bat" "%1"' WriteRegDWORD HKLM "SOFTWARE\Cygwin" "heap_chunk_in_mb" 0xFFFFFF00 ReadRegStr $0 HKLM "SYSTEM\CurrentControlSet\Control\Session Manager\Environment" "CYGWIN" ${If} $0 == "" WriteRegExpandStr HKLM "SYSTEM\CurrentControlSet\Control\Session Manager\Environment" "CYGWIN" "nodosfilewarning" SendMessage ${HWND_BROADCAST} ${WM_WININICHANGE} 0 "STR:Environment" /TIMEOUT=5000 ${Endif} WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayName" "$(^Name)" WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "UninstallString" "$INSTDIR\uninst.exe" WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayIcon" "$INSTDIR\asy.exe" WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayVersion" "${PRODUCT_VERSION}" WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "URLInfoAbout" "${PRODUCT_WEB_SITE}" SectionEnd Function un.onUninstSuccess HideWindow MessageBox MB_ICONINFORMATION|MB_OK "$(^Name) was successfully removed from your computer." FunctionEnd Section Uninstall !insertmacro MUI_STARTMENU_GETFOLDER "Application" $ICONS_GROUP Delete "$INSTDIR\${PRODUCT_NAME}.url" Delete "$INSTDIR\uninst.exe" !include AsymptoteUninstallList.nsi Delete "$INSTDIR\asy.bat" ${un.EnvVarUpdate} $0 "PATH" "R" "HKLM" "$INSTDIR" RMDir "$INSTDIR" Delete "$SMPROGRAMS\$ICONS_GROUP\Uninstall.lnk" Delete "$SMPROGRAMS\$ICONS_GROUP\Website.lnk" Delete "$DESKTOP\Asymptote.lnk" Delete "$DESKTOP\Xasy.lnk" Delete "$SMPROGRAMS\$ICONS_GROUP\Asymptote.lnk" Delete "$SMPROGRAMS\$ICONS_GROUP\Xasy.lnk" RMDir "$SMPROGRAMS\$ICONS_GROUP" DeleteRegKey ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" DeleteRegKey HKLM "${PRODUCT_DIR_REGKEY}" DeleteRegKey HKLM "${PRODUCT_FILE_TYPE_REGKEY1}" DeleteRegKey HKLM "${PRODUCT_FILE_TYPE_REGKEY2}" SetAutoClose true SectionEnd ./asymptote-2.41/guide.cc0000644000175000017500000000222713064427076015152 0ustar norbertnorbert/***** * guide.cc * Andy Hammerlindl 2005/02/23 * *****/ #include "guide.h" namespace camp { multiguide::multiguide(guidevector& v) { // This constructor tests if the first subguide is also a multiguide and, // if possible, uses the same base, extending it beyond what is used. multiguide *rg = v.empty() ? 0 : dynamic_cast(v[0]); if (rg && rg->base->size() == rg->length) { base = rg->base; base->insert(base->end(), v.begin()+1, v.end()); } else base = new guidevector(v); length = base->size(); } void multiguide::flatten(flatguide& g, bool allowsolve) { size_t n=length; if(n > 0) { for(size_t i=0; i+1 < n; ++i) { subguide(i)->flatten(g,allowsolve); if(!allowsolve && subguide(i)->cyclic()) { g.precyclic(true); g.resolvecycle(); } } subguide(n-1)->flatten(g,allowsolve); } } void multiguide::print(ostream& out) const { side lastLoc=JOIN; for(size_t i=0; i < length; ++i) { guide *g = subguide(i); side loc = g->printLocation(); adjustLocation(out,lastLoc,loc); g->print(out); lastLoc=loc; } } } // namespace camp ./asymptote-2.41/stm.cc0000644000175000017500000002750713064427076014670 0ustar norbertnorbert/***** * stm.cc * Andy Hammerlindl 2002/8/30 * * Statements are everything in the language that do something on their * own. Statements are different from declarations in that statements * do not modify the environment. Translation of a statement puts the * stack code to run it into the instruction stream. *****/ #include #include "errormsg.h" #include "settings.h" #include "coenv.h" #include "exp.h" #include "stm.h" #include "symbol.h" #include "opsymbols.h" namespace absyntax { using namespace trans; using namespace types; void stm::prettyprint(ostream &out, Int indent) { prettyname(out,"stm",indent); } void emptyStm::prettyprint(ostream &out, Int indent) { prettyname(out,"emptyStm",indent); } void blockStm::prettyprint(ostream &out, Int indent) { prettyname(out,"blockStm",indent); base->prettyprint(out, indent+1); } void expStm::prettyprint(ostream &out, Int indent) { prettyname(out,"expStm",indent); body->prettyprint(out, indent+1); } void baseExpTrans(coenv &e, exp *expr) { types::ty_kind kind = expr->trans(e)->kind; if (kind != types::ty_void) // Remove any value it puts on the stack. e.c.encodePop(); } void expStm::trans(coenv &e) { baseExpTrans(e, body); } // For an object such as currentpicture, write 'picture currentpicture' to // give some information. Only do this when the object has a name. void tryToWriteTypeOfExp(types::ty *t, exp *body) { symbol name=body->getName(); if (!name) return; overloaded *set = dynamic_cast(t); if (set) for(ty_vector::iterator ot=set->sub.begin(); ot!=set->sub.end(); ++ot) tryToWriteTypeOfExp(*ot, body); else { cout << "<"; t->printVar(cout, name); cout << ">" << endl; } } // From dec.cc: varEntry *makeVarEntry(position pos, coenv &e, record *r, types::ty *t); void storeExp(coenv &e, types::ty *t, exp *expr) { assert(t->kind != ty_error); assert(t->kind != ty_void); assert(t->kind != ty_overloaded); expr->transAsType(e, t); // Store the value in a new variable of the proper type. varEntry *v = makeVarEntry(expr->getPos(), e, 0, t); e.e.addVar(symbol::trans("operator answer"), v); v->getLocation()->encode(WRITE, expr->getPos(), e.c); e.c.encodePop(); } void storeAndWriteExp(coenv &e, types::ty *t, exp *expr) { storeExp(e, t, expr); position pos=expr->getPos(); baseExpTrans(e, new callExp(pos, new nameExp(pos, "write"), new nameExp(pos, "operator answer"))); } void tryToWriteExp(coenv &e, exp *expr) { position pos=expr->getPos(); types::ty *t=expr->cgetType(e); if(!t) return; // If the original expression is bad, just print the errors. // If it is a function which returns void, just call the function. if (t->kind == ty_error || t->kind == ty_void) { baseExpTrans(e, expr); return; } exp *callee=new nameExp(pos, symbol::trans("write")); exp *call=new callExp(pos, callee, expr); types::ty *ct=call->getType(e); if (ct->kind == ty_error || ct->kind == ty_overloaded) { if (t->kind == ty_overloaded) { // Translate the expr in order to print the ambiguity error first. expr->trans(e); em.sync(); assert(em.errors()); // Then, write out all of the types. tryToWriteTypeOfExp(t, expr); } else { // Write the type of the expression and, since it is unique, assign it to // 'operator answer' even though its value isn't printed. tryToWriteTypeOfExp(t, expr); storeExp(e, t, expr); } } else if (t->kind == ty_overloaded) { // If the exp is overloaded, but the act of writing makes it // unambiguous, add a suffix to the output to warn the user of this. exp *suffix=new nameExp(pos, symbol::trans("overloadedMessage")); exp *callWithSuffix=new callExp(pos, callee, expr, suffix); if (callWithSuffix->getType(e)->kind != ty_error) baseExpTrans(e, callWithSuffix); else baseExpTrans(e, call); } else { // Interactive writing can proceed normally. storeAndWriteExp(e, t, expr); } } void expStm::interactiveTrans(coenv &e) { // First check if it is the kind of expression that should be written. if (body->writtenToPrompt() && settings::getSetting("interactiveWrite")) tryToWriteExp(e, body); else baseExpTrans(e, body); } void ifStm::prettyprint(ostream &out, Int indent) { prettyname(out,"ifStm",indent); test->prettyprint(out, indent+1); onTrue->prettyprint(out, indent+1); if (onFalse) onFalse->prettyprint(out, indent+1); } void ifStm::trans(coenv &e) { label elseLabel = e.c.fwdLabel(); label end = e.c.fwdLabel(); test->transConditionalJump(e, false, elseLabel); onTrue->markTrans(e); if (onFalse) { // Encode the jump around the 'else' clause at the end of the 'if' clause e.c.useLabel(inst::jmp,end); e.c.defLabel(elseLabel); onFalse->markTrans(e); } else { e.c.defLabel(elseLabel); } e.c.defLabel(end); } void transLoopBody(coenv &e, stm *body) { // The semantics of the language are defined so that any variable declared // inside a loop are new variables for each iteration of the loop. For // instance, the code // // int f(); // for (int i = 0; i < 10; ++i) { // int j=10*i; // if (i == 5) // f = new int() { return j; }; // } // write(f()); // // will write 50. This is implemented by allocating a new frame for each // iteration. However, this can have a big performance hit, so we first // translate the code without the frame, check if it needed the closure, and // rewrite the code if necessary. label start = e.c.defNewLabel(); // Encode a no-op, in case we need to jump over the default implementation // to a special case. e.c.encode(inst::nop); body->markTrans(e); // Don't re-translate if there were errors. if (em.errors()) return; if (e.c.usesClosureSinceLabel(start)){ // Jump over the old section. label end = e.c.defNewLabel(); e.c.encodePatch(start, end); // Let coder know that break and continue need to pop the frame. e.c.loopPushesFrame(); e.c.encodePushFrame(); body->markTrans(e); e.c.encodePopFrame(); } } void whileStm::prettyprint(ostream &out, Int indent) { prettyname(out,"whileStm",indent); test->prettyprint(out, indent+1); body->prettyprint(out, indent+1); } void whileStm::trans(coenv &e) { label end = e.c.fwdLabel(); label start = e.c.defNewLabel(); e.c.pushLoop(start, end); test->transConditionalJump(e, false, end); transLoopBody(e,body); e.c.useLabel(inst::jmp,start); e.c.defLabel(end); e.c.popLoop(); } void doStm::prettyprint(ostream &out, Int indent) { prettyname(out,"doStm",indent); body->prettyprint(out, indent+1); test->prettyprint(out, indent+1); } void doStm::trans(coenv &e) { label testLabel = e.c.fwdLabel(); label end = e.c.fwdLabel(); e.c.pushLoop(testLabel, end); label start = e.c.defNewLabel(); transLoopBody(e,body); e.c.defLabel(testLabel); test->transConditionalJump(e, true, start); e.c.defLabel(end); e.c.popLoop(); } void forStm::prettyprint(ostream &out, Int indent) { prettyname(out,"forStm",indent); if (init) init->prettyprint(out, indent+1); if (test) test->prettyprint(out, indent+1); if (update) update->prettyprint(out, indent+1); body->prettyprint(out, indent+1); } void forStm::trans(coenv &e) { // Any vardec in the initializer needs its own scope. e.e.beginScope(); if (init) init->markTrans(e); label ctarget = e.c.fwdLabel(); label end = e.c.fwdLabel(); e.c.pushLoop(ctarget, end); label start = e.c.defNewLabel(); if(test) { test->transConditionalJump(e, false, end); } transLoopBody(e,body); e.c.defLabel(ctarget); if (update) update->markTrans(e); e.c.useLabel(inst::jmp,start); e.c.defLabel(end); e.c.popLoop(); e.e.endScope(); } void extendedForStm::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "extendedForStm: '" << var << "'\n"; start->prettyprint(out, indent+1); set->prettyprint(out, indent+1); body->prettyprint(out, indent+1); } void extendedForStm::trans(coenv &e) { // Translate into the syntax: // // start[] a = set; // for (int i=0; i < a.length; ++i) { // start var=a[i]; // body // } position pos=getPos(); // Use gensyms for the variable names so as not to pollute the namespace. symbol a=symbol::gensym("a"); symbol i=symbol::gensym("i"); // Get the start type. Handle type inference as a special case. types::ty *t = start->trans(e, true); if (t->kind == types::ty_inferred) { // First ensure the array expression is an unambiguous array. types::ty *at = set->cgetType(e); if (at->kind != ty_array) { em.error(set->getPos()); em << "expression is not an array of inferable type"; // On failure, don't bother trying to translate the loop. return; } // var a=set; tyEntryTy tet(pos, primInferred()); decid dec1(pos, new decidstart(pos, a), set); vardec(pos, &tet, &dec1).trans(e); } else { // start[] a=set; arrayTy at(pos, start, new dimensions(pos)); decid dec1(pos, new decidstart(pos, a), set); vardec(pos, &at, &dec1).trans(e); } // { start var=a[i]; body } block b(pos); decid dec2(pos, new decidstart(pos, var), new subscriptExp(pos, new nameExp(pos, a), new nameExp(pos, i))); b.add(new vardec(pos, start, &dec2)); b.add(body); // for (int i=0; i < a.length; ++i) // forStm(pos, new vardec(pos, new tyEntryTy(pos, primInt()), new decid(pos, new decidstart(pos, i), new intExp(pos, 0))), new binaryExp(pos, new nameExp(pos, i), SYM_LT, new nameExp(pos, new qualifiedName(pos, new simpleName(pos, a), symbol::trans("length")))), new expStm(pos, new prefixExp(pos, new nameExp(pos, i), SYM_PLUS)), new blockStm(pos, &b)).trans(e); } void breakStm::prettyprint(ostream &out, Int indent) { prettyname(out,"breakStm",indent); } void breakStm::trans(coenv &e) { if (!e.c.encodeBreak()) { em.error(getPos()); em << "break statement outside of a loop"; } } void continueStm::prettyprint(ostream &out, Int indent) { prettyname(out,"continueStm",indent); } void continueStm::trans(coenv &e) { if (!e.c.encodeContinue()) { em.error(getPos()); em << "continue statement outside of a loop"; } } void returnStm::prettyprint(ostream &out, Int indent) { prettyname(out, "returnStm",indent); if (value) value->prettyprint(out, indent+1); } void returnStm::trans(coenv &e) { types::ty *t = e.c.getReturnType(); if (t->kind == ty_void) { if (value) { em.error(getPos()); em << "function cannot return a value"; } if (e.c.isRecord()) e.c.encode(inst::pushclosure); } else { if (value) { value->transToType(e, t); } else { em.error(getPos()); em << "function must return a value"; } } // NOTE: Currently, a return statement in a module definition will end // the initializer. Should this be allowed? e.c.encode(inst::ret); } void stmExpList::prettyprint(ostream &out, Int indent) { prettyname(out, "stmExpList",indent); for (mem::list::iterator p = stms.begin(); p != stms.end(); ++p) (*p)->prettyprint(out, indent+1); } void stmExpList::trans(coenv &e) { for (mem::list::iterator p = stms.begin(); p != stms.end(); ++p) (*p)->markTrans(e); } } // namespace absyntax ./asymptote-2.41/algebra3.cc0000644000175000017500000010456213064427076015542 0ustar norbertnorbert/* algebra3.cpp, algebra3.h - C++ Vector and Matrix Algebra routines GLUI User Interface Toolkit (LGPL) Copyright (c) 1998 Paul Rademacher WWW: http://sourceforge.net/projects/glui/ Forums: http://sourceforge.net/forum/?group_id=92496 This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ /************************************************************************** There are three vector classes and two matrix classes: vec2, vec3, vec4, mat3, and mat4. All the standard arithmetic operations are defined, with '*' for dot product of two vectors and multiplication of two matrices, and '^' for cross product of two vectors. Additional functions include length(), normalize(), homogenize for vectors, and print(), set(), apply() for all classes. There is a function transpose() for matrices, but note that it does not actually change the matrix, When multiplied with a matrix, a vector is treated as a row vector if it precedes the matrix (v*M), and as a column vector if it follows the matrix (M*v). Matrices are stored in row-major form. A vector of one dimension (2d, 3d, or 4d) can be cast to a vector of a higher or lower dimension. If casting to a higher dimension, the new component is set by default to 1.0, unless a value is specified: vec3 a(1.0, 2.0, 3.0 ); vec4 b( a, 4.0 ); // now b == {1.0, 2.0, 3.0, 4.0}; When casting to a lower dimension, the vector is homogenized in the lower dimension. E.g., if a 4d {X,Y,Z,W} is cast to 3d, the resulting vector is {X/W, Y/W, Z/W}. It is up to the user to insure the fourth component is not zero before casting. There are also the following function for building matrices: identity2D(), translation2D(), rotation2D(), scaling2D(), identity3D(), translation3D(), rotation3D(), rotation3Drad(), scaling3D(), perspective3D() --------------------------------------------------------------------- Author: Jean-Francois DOUEg Revised: Paul Rademacher Version 3.2 - Feb 1998 Revised: Nigel Stewart (GLUI Code Cleaning) **************************************************************************/ #include "algebra3.h" #include static const double radians=std::acos(-1)/180.0; #ifdef VEC_ERROR_FATAL #ifndef VEC_ERROR #define VEC_ERROR(E) { printf( "VERROR %s\n", E ); exit(1); } #endif #else #ifndef VEC_ERROR #define VEC_ERROR(E) { printf( "VERROR %s\n", E ); } #endif #endif /**************************************************************** * * * vec2 Member functions * * * ****************************************************************/ /******************** vec2 CONSTRUCTORS ********************/ vec2::vec2() { n[VX] = n[VY] = 0.0; } vec2::vec2(float x, float y) { n[VX] = x; n[VY] = y; } vec2::vec2(const vec2 &v) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; } vec2::vec2(const vec3 &v) // it is up to caller to avoid divide-by-zero { n[VX] = v.n[VX]/v.n[VZ]; n[VY] = v.n[VY]/v.n[VZ]; } vec2::vec2(const vec3 &v, int dropAxis) { switch (dropAxis) { case VX: n[VX] = v.n[VY]; n[VY] = v.n[VZ]; break; case VY: n[VX] = v.n[VX]; n[VY] = v.n[VZ]; break; default: n[VX] = v.n[VX]; n[VY] = v.n[VY]; break; } } /******************** vec2 ASSIGNMENT OPERATORS ******************/ vec2 & vec2::operator=(const vec2 &v) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; return *this; } vec2 & vec2::operator+=(const vec2 &v) { n[VX] += v.n[VX]; n[VY] += v.n[VY]; return *this; } vec2 & vec2::operator-=(const vec2 &v) { n[VX] -= v.n[VX]; n[VY] -= v.n[VY]; return *this; } vec2 &vec2::operator*=(float d) { n[VX] *= d; n[VY] *= d; return *this; } vec2 &vec2::operator/=(float d) { float d_inv = 1.0f/d; n[VX] *= d_inv; n[VY] *= d_inv; return *this; } float &vec2::operator[](int i) { if (i < VX || i > VY) //VEC_ERROR("vec2 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("vec2 [] operator: illegal access" ); return n[i]; } const float &vec2::operator[](int i) const { if (i < VX || i > VY) //VEC_ERROR("vec2 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("vec2 [] operator: illegal access" ); return n[i]; } /******************** vec2 SPECIAL FUNCTIONS ********************/ float vec2::length() const { return (float) sqrt(length2()); } float vec2::length2() const { return n[VX]*n[VX] + n[VY]*n[VY]; } vec2 &vec2::normalize() // it is up to caller to avoid divide-by-zero { *this /= length(); return *this; } vec2 &vec2::apply(V_FCT_PTR fct) { n[VX] = (*fct)(n[VX]); n[VY] = (*fct)(n[VY]); return *this; } void vec2::set( float x, float y ) { n[VX] = x; n[VY] = y; } /******************** vec2 FRIENDS *****************************/ vec2 operator-(const vec2 &a) { return vec2(-a.n[VX],-a.n[VY]); } vec2 operator+(const vec2 &a, const vec2& b) { return vec2(a.n[VX]+b.n[VX], a.n[VY]+b.n[VY]); } vec2 operator-(const vec2 &a, const vec2& b) { return vec2(a.n[VX]-b.n[VX], a.n[VY]-b.n[VY]); } vec2 operator*(const vec2 &a, float d) { return vec2(d*a.n[VX], d*a.n[VY]); } vec2 operator*(float d, const vec2 &a) { return a*d; } vec2 operator*(const mat3 &a, const vec2 &v) { vec3 av; av.n[VX] = a.v[0].n[VX]*v.n[VX] + a.v[0].n[VY]*v.n[VY] + a.v[0].n[VZ]; av.n[VY] = a.v[1].n[VX]*v.n[VX] + a.v[1].n[VY]*v.n[VY] + a.v[1].n[VZ]; av.n[VZ] = a.v[2].n[VX]*v.n[VX] + a.v[2].n[VY]*v.n[VY] + a.v[2].n[VZ]; return av; } vec2 operator*(const vec2 &v, const mat3 &a) { return a.transpose() * v; } vec3 operator*(const mat3 &a, const vec3 &v) { vec3 av; av.n[VX] = a.v[0].n[VX]*v.n[VX] + a.v[0].n[VY]*v.n[VY] + a.v[0].n[VZ]*v.n[VZ]; av.n[VY] = a.v[1].n[VX]*v.n[VX] + a.v[1].n[VY]*v.n[VY] + a.v[1].n[VZ]*v.n[VZ]; av.n[VZ] = a.v[2].n[VX]*v.n[VX] + a.v[2].n[VY]*v.n[VY] + a.v[2].n[VZ]*v.n[VZ]; return av; } vec3 operator*(const vec3 &v, const mat3 &a) { return a.transpose() * v; } float operator*(const vec2 &a, const vec2 &b) { return a.n[VX]*b.n[VX] + a.n[VY]*b.n[VY]; } vec2 operator/(const vec2 &a, float d) { float d_inv = 1.0f/d; return vec2(a.n[VX]*d_inv, a.n[VY]*d_inv); } vec3 operator^(const vec2 &a, const vec2 &b) { return vec3(0.0, 0.0, a.n[VX] * b.n[VY] - b.n[VX] * a.n[VY]); } int operator==(const vec2 &a, const vec2 &b) { return (a.n[VX] == b.n[VX]) && (a.n[VY] == b.n[VY]); } int operator!=(const vec2 &a, const vec2 &b) { return !(a == b); } /*ostream& operator << (ostream& s, vec2& v) { return s << "| " << v.n[VX] << ' ' << v.n[VY] << " |"; } */ /*istream& operator >> (istream& s, vec2& v) { vec2 v_tmp; char c = ' '; while (isspace(c)) s >> c; // The vectors can be formatted either as x y or | x y | if (c == '|') { s >> v_tmp[VX] >> v_tmp[VY]; while (s >> c && isspace(c)) ; if (c != '|') ;//s.set(_bad); } else { s.putback(c); s >> v_tmp[VX] >> v_tmp[VY]; } if (s) v = v_tmp; return s; } */ void swap(vec2 &a, vec2 &b) { vec2 tmp(a); a = b; b = tmp; } vec2 min_vec(const vec2 &a, const vec2 &b) { return vec2(MIN(a.n[VX], b.n[VX]), MIN(a.n[VY], b.n[VY])); } vec2 max_vec(const vec2 &a, const vec2 &b) { return vec2(MAX(a.n[VX], b.n[VX]), MAX(a.n[VY], b.n[VY])); } vec2 prod(const vec2 &a, const vec2 &b) { return vec2(a.n[VX] * b.n[VX], a.n[VY] * b.n[VY]); } /**************************************************************** * * * vec3 Member functions * * * ****************************************************************/ // CONSTRUCTORS vec3::vec3() { n[VX] = n[VY] = n[VZ] = 0.0; } vec3::vec3(float x, float y, float z) { n[VX] = x; n[VY] = y; n[VZ] = z; } vec3::vec3(const vec3 &v) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = v.n[VZ]; } vec3::vec3(const vec2 &v) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = 1.0; } vec3::vec3(const vec2 &v, float d) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = d; } vec3::vec3(const vec4 &v) // it is up to caller to avoid divide-by-zero { n[VX] = v.n[VX] / v.n[VW]; n[VY] = v.n[VY] / v.n[VW]; n[VZ] = v.n[VZ] / v.n[VW]; } vec3::vec3(const vec4 &v, int dropAxis) { switch (dropAxis) { case VX: n[VX] = v.n[VY]; n[VY] = v.n[VZ]; n[VZ] = v.n[VW]; break; case VY: n[VX] = v.n[VX]; n[VY] = v.n[VZ]; n[VZ] = v.n[VW]; break; case VZ: n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = v.n[VW]; break; default: n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = v.n[VZ]; break; } } // ASSIGNMENT OPERATORS vec3 &vec3::operator=(const vec3 &v) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = v.n[VZ]; return *this; } vec3 &vec3::operator+=(const vec3 &v) { n[VX] += v.n[VX]; n[VY] += v.n[VY]; n[VZ] += v.n[VZ]; return *this; } vec3 &vec3::operator-=(const vec3& v) { n[VX] -= v.n[VX]; n[VY] -= v.n[VY]; n[VZ] -= v.n[VZ]; return *this; } vec3 &vec3::operator*=(float d) { n[VX] *= d; n[VY] *= d; n[VZ] *= d; return *this; } vec3 &vec3::operator/=(float d) { float d_inv = 1.0f/d; n[VX] *= d_inv; n[VY] *= d_inv; n[VZ] *= d_inv; return *this; } float &vec3::operator[](int i) { if (i < VX || i > VZ) //VEC_ERROR("vec3 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("vec3 [] operator: illegal access" ); return n[i]; } const float &vec3::operator[](int i) const { if (i < VX || i > VZ) //VEC_ERROR("vec3 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("vec3 [] operator: illegal access" ); return n[i]; } // SPECIAL FUNCTIONS float vec3::length() const { return (float) sqrt(length2()); } float vec3::length2() const { return n[VX]*n[VX] + n[VY]*n[VY] + n[VZ]*n[VZ]; } vec3 &vec3::normalize() // it is up to caller to avoid divide-by-zero { *this /= length(); return *this; } vec3 &vec3::homogenize(void) // it is up to caller to avoid divide-by-zero { n[VX] /= n[VZ]; n[VY] /= n[VZ]; n[VZ] = 1.0; return *this; } vec3 &vec3::apply(V_FCT_PTR fct) { n[VX] = (*fct)(n[VX]); n[VY] = (*fct)(n[VY]); n[VZ] = (*fct)(n[VZ]); return *this; } void vec3::set(float x, float y, float z) // set vector { n[VX] = x; n[VY] = y; n[VZ] = z; } void vec3::print(FILE *file, const char *name) const // print vector to a file { fprintf( file, "%s: <%f, %f, %f>\n", name, n[VX], n[VY], n[VZ] ); } // FRIENDS vec3 operator-(const vec3 &a) { return vec3(-a.n[VX],-a.n[VY],-a.n[VZ]); } vec3 operator+(const vec3 &a, const vec3 &b) { return vec3(a.n[VX]+ b.n[VX], a.n[VY] + b.n[VY], a.n[VZ] + b.n[VZ]); } vec3 operator-(const vec3 &a, const vec3 &b) { return vec3(a.n[VX]-b.n[VX], a.n[VY]-b.n[VY], a.n[VZ]-b.n[VZ]); } vec3 operator*(const vec3 &a, float d) { return vec3(d*a.n[VX], d*a.n[VY], d*a.n[VZ]); } vec3 operator*(float d, const vec3 &a) { return a*d; } vec3 operator*(const mat4 &a, const vec3 &v) { return a*vec4(v); } vec3 operator*(const vec3 &v, mat4 &a) { return a.transpose()*v; } float operator*(const vec3 &a, const vec3 &b) { return a.n[VX]*b.n[VX] + a.n[VY]*b.n[VY] + a.n[VZ]*b.n[VZ]; } vec3 operator/(const vec3 &a, float d) { float d_inv = 1.0f/d; return vec3(a.n[VX]*d_inv, a.n[VY]*d_inv, a.n[VZ]*d_inv); } vec3 operator^(const vec3 &a, const vec3 &b) { return vec3(a.n[VY]*b.n[VZ] - a.n[VZ]*b.n[VY], a.n[VZ]*b.n[VX] - a.n[VX]*b.n[VZ], a.n[VX]*b.n[VY] - a.n[VY]*b.n[VX]); } int operator==(const vec3 &a, const vec3 &b) { return (a.n[VX] == b.n[VX]) && (a.n[VY] == b.n[VY]) && (a.n[VZ] == b.n[VZ]); } int operator!=(const vec3 &a, const vec3 &b) { return !(a == b); } /*ostream& operator << (ostream& s, vec3& v) { return s << "| " << v.n[VX] << ' ' << v.n[VY] << ' ' << v.n[VZ] << " |"; } istream& operator >> (istream& s, vec3& v) { vec3 v_tmp; char c = ' '; while (isspace(c)) s >> c; // The vectors can be formatted either as x y z or | x y z | if (c == '|') { s >> v_tmp[VX] >> v_tmp[VY] >> v_tmp[VZ]; while (s >> c && isspace(c)) ; if (c != '|') ;//s.set(_bad); } else { s.putback(c); s >> v_tmp[VX] >> v_tmp[VY] >> v_tmp[VZ]; } if (s) v = v_tmp; return s; } */ void swap(vec3 &a, vec3 &b) { vec3 tmp(a); a = b; b = tmp; } vec3 min_vec(const vec3 &a, const vec3 &b) { return vec3( MIN(a.n[VX], b.n[VX]), MIN(a.n[VY], b.n[VY]), MIN(a.n[VZ], b.n[VZ])); } vec3 max_vec(const vec3 &a, const vec3 &b) { return vec3( MAX(a.n[VX], b.n[VX]), MAX(a.n[VY], b.n[VY]), MAX(a.n[VZ], b.n[VZ])); } vec3 prod(const vec3 &a, const vec3 &b) { return vec3(a.n[VX]*b.n[VX], a.n[VY]*b.n[VY], a.n[VZ]*b.n[VZ]); } /**************************************************************** * * * vec4 Member functions * * * ****************************************************************/ // CONSTRUCTORS vec4::vec4() { n[VX] = n[VY] = n[VZ] = 0.0; n[VW] = 1.0; } vec4::vec4(float x, float y, float z, float w) { n[VX] = x; n[VY] = y; n[VZ] = z; n[VW] = w; } vec4::vec4(const vec4 &v) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = v.n[VZ]; n[VW] = v.n[VW]; } vec4::vec4(const vec3 &v) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = v.n[VZ]; n[VW] = 1.0; } vec4::vec4(const vec3 &v, float d) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = v.n[VZ]; n[VW] = d; } // ASSIGNMENT OPERATORS vec4 &vec4::operator=(const vec4 &v) { n[VX] = v.n[VX]; n[VY] = v.n[VY]; n[VZ] = v.n[VZ]; n[VW] = v.n[VW]; return *this; } vec4 &vec4::operator+=(const vec4 &v) { n[VX] += v.n[VX]; n[VY] += v.n[VY]; n[VZ] += v.n[VZ]; n[VW] += v.n[VW]; return *this; } vec4 &vec4::operator-=(const vec4 &v) { n[VX] -= v.n[VX]; n[VY] -= v.n[VY]; n[VZ] -= v.n[VZ]; n[VW] -= v.n[VW]; return *this; } vec4 &vec4::operator*=(float d) { n[VX] *= d; n[VY] *= d; n[VZ] *= d; n[VW] *= d; return *this; } vec4 &vec4::operator/=(float d) { float d_inv = 1.0f/d; n[VX] *= d_inv; n[VY] *= d_inv; n[VZ] *= d_inv; n[VW] *= d_inv; return *this; } float &vec4::operator[](int i) { if (i < VX || i > VW) //VEC_ERROR("vec4 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("vec4 [] operator: illegal access" ); return n[i]; } const float &vec4::operator[](int i) const { if (i < VX || i > VW) //VEC_ERROR("vec4 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("vec4 [] operator: illegal access" ); return n[i]; } // SPECIAL FUNCTIONS float vec4::length() const { return (float) sqrt(length2()); } float vec4::length2() const { return n[VX]*n[VX] + n[VY]*n[VY] + n[VZ]*n[VZ] + n[VW]*n[VW]; } vec4 &vec4::normalize() // it is up to caller to avoid divide-by-zero { *this /= length(); return *this; } vec4 &vec4::homogenize() // it is up to caller to avoid divide-by-zero { n[VX] /= n[VW]; n[VY] /= n[VW]; n[VZ] /= n[VW]; n[VW] = 1.0; return *this; } vec4 &vec4::apply(V_FCT_PTR fct) { n[VX] = (*fct)(n[VX]); n[VY] = (*fct)(n[VY]); n[VZ] = (*fct)(n[VZ]); n[VW] = (*fct)(n[VW]); return *this; } void vec4::print(FILE *file, const char *name) const // print vector to a file { fprintf( file, "%s: <%f, %f, %f, %f>\n", name, n[VX], n[VY], n[VZ], n[VW]); } void vec4::set(float x, float y, float z, float a) { n[0] = x; n[1] = y; n[2] = z; n[3] = a; } // FRIENDS vec4 operator-(const vec4 &a) { return vec4(-a.n[VX],-a.n[VY],-a.n[VZ],-a.n[VW]); } vec4 operator+(const vec4 &a, const vec4 &b) { return vec4( a.n[VX] + b.n[VX], a.n[VY] + b.n[VY], a.n[VZ] + b.n[VZ], a.n[VW] + b.n[VW]); } vec4 operator-(const vec4 &a, const vec4 &b) { return vec4( a.n[VX] - b.n[VX], a.n[VY] - b.n[VY], a.n[VZ] - b.n[VZ], a.n[VW] - b.n[VW]); } vec4 operator*(const vec4 &a, float d) { return vec4(d*a.n[VX], d*a.n[VY], d*a.n[VZ], d*a.n[VW]); } vec4 operator*(float d, const vec4 &a) { return a*d; } vec4 operator*(const mat4 &a, const vec4 &v) { #define ROWCOL(i) \ a.v[i].n[0]*v.n[VX] + \ a.v[i].n[1]*v.n[VY] + \ a.v[i].n[2]*v.n[VZ] + \ a.v[i].n[3]*v.n[VW] return vec4(ROWCOL(0), ROWCOL(1), ROWCOL(2), ROWCOL(3)); #undef ROWCOL } vec4 operator*(const vec4 &v, const mat4 &a) { return a.transpose()*v; } float operator*(const vec4 &a, const vec4 &b) { return a.n[VX]*b.n[VX] + a.n[VY]*b.n[VY] + a.n[VZ]*b.n[VZ] + a.n[VW]*b.n[VW]; } vec4 operator/(const vec4 &a, float d) { float d_inv = 1.0f/d; return vec4( a.n[VX]*d_inv, a.n[VY]*d_inv, a.n[VZ]*d_inv, a.n[VW]*d_inv); } int operator==(const vec4 &a, const vec4 &b) { return (a.n[VX] == b.n[VX]) && (a.n[VY] == b.n[VY]) && (a.n[VZ] == b.n[VZ]) && (a.n[VW] == b.n[VW]); } int operator!=(const vec4 &a, const vec4 &b) { return !(a == b); } /*ostream& operator << (ostream& s, vec4& v) { return s << "| " << v.n[VX] << ' ' << v.n[VY] << ' ' << v.n[VZ] << ' ' << v.n[VW] << " |"; } istream& operator >> (istream& s, vec4& v) { vec4 v_tmp; char c = ' '; while (isspace(c)) s >> c; // The vectors can be formatted either as x y z w or | x y z w | if (c == '|') { s >> v_tmp[VX] >> v_tmp[VY] >> v_tmp[VZ] >> v_tmp[VW]; while (s >> c && isspace(c)) ; if (c != '|') ;//s.set(_bad); } else { s.putback(c); s >> v_tmp[VX] >> v_tmp[VY] >> v_tmp[VZ] >> v_tmp[VW]; } if (s) v = v_tmp; return s; } */ void swap(vec4 &a, vec4 &b) { vec4 tmp(a); a = b; b = tmp; } vec4 min_vec(const vec4 &a, const vec4 &b) { return vec4( MIN(a.n[VX], b.n[VX]), MIN(a.n[VY], b.n[VY]), MIN(a.n[VZ], b.n[VZ]), MIN(a.n[VW], b.n[VW])); } vec4 max_vec(const vec4 &a, const vec4 &b) { return vec4( MAX(a.n[VX], b.n[VX]), MAX(a.n[VY], b.n[VY]), MAX(a.n[VZ], b.n[VZ]), MAX(a.n[VW], b.n[VW])); } vec4 prod(const vec4 &a, const vec4 &b) { return vec4( a.n[VX] * b.n[VX], a.n[VY] * b.n[VY], a.n[VZ] * b.n[VZ], a.n[VW] * b.n[VW]); } /**************************************************************** * * * mat3 member functions * * * ****************************************************************/ // CONSTRUCTORS mat3::mat3() { *this = identity2D(); } mat3::mat3(const vec3 &v0, const vec3 &v1, const vec3 &v2) { set(v0, v1, v2); } mat3::mat3(const mat3 &m) { v[0] = m.v[0]; v[1] = m.v[1]; v[2] = m.v[2]; } // ASSIGNMENT OPERATORS mat3 &mat3::operator=(const mat3 &m) { v[0] = m.v[0]; v[1] = m.v[1]; v[2] = m.v[2]; return *this; } mat3 &mat3::operator+=(const mat3& m) { v[0] += m.v[0]; v[1] += m.v[1]; v[2] += m.v[2]; return *this; } mat3 &mat3::operator-=(const mat3& m) { v[0] -= m.v[0]; v[1] -= m.v[1]; v[2] -= m.v[2]; return *this; } mat3 &mat3::operator*=(float d) { v[0] *= d; v[1] *= d; v[2] *= d; return *this; } mat3 &mat3::operator/=(float d) { v[0] /= d; v[1] /= d; v[2] /= d; return *this; } vec3 &mat3::operator[](int i) { if (i < VX || i > VZ) //VEC_ERROR("mat3 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("mat3 [] operator: illegal access" ); return v[i]; } const vec3 &mat3::operator[](int i) const { if (i < VX || i > VZ) //VEC_ERROR("mat3 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("mat3 [] operator: illegal access" ); return v[i]; } void mat3::set(const vec3 &v0, const vec3 &v1, const vec3 &v2) { v[0] = v0; v[1] = v1; v[2] = v2; } // SPECIAL FUNCTIONS mat3 mat3::transpose() const { return mat3( vec3(v[0][0], v[1][0], v[2][0]), vec3(v[0][1], v[1][1], v[2][1]), vec3(v[0][2], v[1][2], v[2][2])); } mat3 mat3::inverse() const // Gauss-Jordan elimination with partial pivoting { mat3 a(*this); // As a evolves from original mat into identity mat3 b(identity2D()); // b evolves from identity into inverse(a) int i, j, i1; // Loop over cols of a from left to right, eliminating above and below diag for (j=0; j<3; j++) // Find largest pivot in column j among rows j..2 { i1 = j; // Row with largest pivot candidate for (i=j+1; i<3; i++) if (fabs(a.v[i].n[j]) > fabs(a.v[i1].n[j])) i1 = i; // Swap rows i1 and j in a and b to put pivot on diagonal swap(a.v[i1], a.v[j]); swap(b.v[i1], b.v[j]); // Scale row j to have a unit diagonal if (a.v[j].n[j]==0.) VEC_ERROR("mat3::inverse: singular matrix; can't invert\n"); b.v[j] /= a.v[j].n[j]; a.v[j] /= a.v[j].n[j]; // Eliminate off-diagonal elems in col j of a, doing identical ops to b for (i=0; i<3; i++) if (i!=j) { b.v[i] -= a.v[i].n[j]*b.v[j]; a.v[i] -= a.v[i].n[j]*a.v[j]; } } return b; } mat3 &mat3::apply(V_FCT_PTR fct) { v[VX].apply(fct); v[VY].apply(fct); v[VZ].apply(fct); return *this; } // FRIENDS mat3 operator-(const mat3 &a) { return mat3(-a.v[0], -a.v[1], -a.v[2]); } mat3 operator+(const mat3 &a, const mat3 &b) { return mat3(a.v[0]+b.v[0], a.v[1]+b.v[1], a.v[2]+b.v[2]); } mat3 operator-(const mat3 &a, const mat3 &b) { return mat3(a.v[0]-b.v[0], a.v[1]-b.v[1], a.v[2]-b.v[2]); } mat3 operator*(const mat3 &a, const mat3 &b) { #define ROWCOL(i, j) \ a.v[i].n[0]*b.v[0][j] + a.v[i].n[1]*b.v[1][j] + a.v[i].n[2]*b.v[2][j] return mat3( vec3(ROWCOL(0,0), ROWCOL(0,1), ROWCOL(0,2)), vec3(ROWCOL(1,0), ROWCOL(1,1), ROWCOL(1,2)), vec3(ROWCOL(2,0), ROWCOL(2,1), ROWCOL(2,2))); #undef ROWCOL } mat3 operator*(const mat3 &a, float d) { return mat3(a.v[0]*d, a.v[1]*d, a.v[2]*d); } mat3 operator*(float d, const mat3 &a) { return a*d; } mat3 operator/(const mat3 &a, float d) { return mat3(a.v[0]/d, a.v[1]/d, a.v[2]/d); } int operator==(const mat3 &a, const mat3 &b) { return (a.v[0] == b.v[0]) && (a.v[1] == b.v[1]) && (a.v[2] == b.v[2]); } int operator!=(const mat3 &a, const mat3 &b) { return !(a == b); } /*ostream& operator << (ostream& s, mat3& m) { return s << m.v[VX] << '\n' << m.v[VY] << '\n' << m.v[VZ]; } istream& operator >> (istream& s, mat3& m) { mat3 m_tmp; s >> m_tmp[VX] >> m_tmp[VY] >> m_tmp[VZ]; if (s) m = m_tmp; return s; } */ void swap(mat3 &a, mat3 &b) { mat3 tmp(a); a = b; b = tmp; } void mat3::print(FILE *file, const char *name) const { int i, j; fprintf( stderr, "%s:\n", name ); for( i = 0; i < 3; i++ ) { fprintf( stderr, " " ); for( j = 0; j < 3; j++ ) { fprintf( stderr, "%f ", v[i][j] ); } fprintf( stderr, "\n" ); } } /**************************************************************** * * * mat4 member functions * * * ****************************************************************/ // CONSTRUCTORS mat4::mat4() { *this = identity3D(); } mat4::mat4(const vec4& v0, const vec4& v1, const vec4& v2, const vec4& v3) { v[0] = v0; v[1] = v1; v[2] = v2; v[3] = v3; } mat4::mat4(const mat4 &m) { v[0] = m.v[0]; v[1] = m.v[1]; v[2] = m.v[2]; v[3] = m.v[3]; } mat4::mat4( float a00, float a01, float a02, float a03, float a10, float a11, float a12, float a13, float a20, float a21, float a22, float a23, float a30, float a31, float a32, float a33 ) { v[0][0] = a00; v[0][1] = a01; v[0][2] = a02; v[0][3] = a03; v[1][0] = a10; v[1][1] = a11; v[1][2] = a12; v[1][3] = a13; v[2][0] = a20; v[2][1] = a21; v[2][2] = a22; v[2][3] = a23; v[3][0] = a30; v[3][1] = a31; v[3][2] = a32; v[3][3] = a33; } // ASSIGNMENT OPERATORS mat4 &mat4::operator=(const mat4 &m) { v[0] = m.v[0]; v[1] = m.v[1]; v[2] = m.v[2]; v[3] = m.v[3]; return *this; } mat4 &mat4::operator+=(const mat4 &m) { v[0] += m.v[0]; v[1] += m.v[1]; v[2] += m.v[2]; v[3] += m.v[3]; return *this; } mat4 &mat4::operator-=(const mat4 &m) { v[0] -= m.v[0]; v[1] -= m.v[1]; v[2] -= m.v[2]; v[3] -= m.v[3]; return *this; } mat4 &mat4::operator*=(float d) { v[0] *= d; v[1] *= d; v[2] *= d; v[3] *= d; return *this; } mat4 &mat4::operator/=(float d) { v[0] /= d; v[1] /= d; v[2] /= d; v[3] /= d; return *this; } vec4 &mat4::operator[](int i) { if (i < VX || i > VW) //VEC_ERROR("mat4 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("mat4 [] operator: illegal access" ); return v[i]; } const vec4 &mat4::operator[](int i) const { if (i < VX || i > VW) //VEC_ERROR("mat4 [] operator: illegal access; index = " << i << '\n') VEC_ERROR("mat4 [] operator: illegal access" ); return v[i]; } // SPECIAL FUNCTIONS; mat4 mat4::transpose() const { return mat4( vec4(v[0][0], v[1][0], v[2][0], v[3][0]), vec4(v[0][1], v[1][1], v[2][1], v[3][1]), vec4(v[0][2], v[1][2], v[2][2], v[3][2]), vec4(v[0][3], v[1][3], v[2][3], v[3][3])); } mat4 mat4::inverse() const // Gauss-Jordan elimination with partial pivoting { mat4 a(*this); // As a evolves from original mat into identity mat4 b(identity3D()); // b evolves from identity into inverse(a) int i, j, i1; // Loop over cols of a from left to right, eliminating above and below diag for (j=0; j<4; j++) // Find largest pivot in column j among rows j..3 { i1 = j; // Row with largest pivot candidate for (i=j+1; i<4; i++) if (fabs(a.v[i].n[j]) > fabs(a.v[i1].n[j])) i1 = i; // Swap rows i1 and j in a and b to put pivot on diagonal swap(a.v[i1], a.v[j]); swap(b.v[i1], b.v[j]); // Scale row j to have a unit diagonal if (a.v[j].n[j]==0.) VEC_ERROR("mat4::inverse: singular matrix; can't invert\n"); b.v[j] /= a.v[j].n[j]; a.v[j] /= a.v[j].n[j]; // Eliminate off-diagonal elems in col j of a, doing identical ops to b for (i=0; i<4; i++) if (i!=j) { b.v[i] -= a.v[i].n[j]*b.v[j]; a.v[i] -= a.v[i].n[j]*a.v[j]; } } return b; } mat4 &mat4::apply(V_FCT_PTR fct) { v[VX].apply(fct); v[VY].apply(fct); v[VZ].apply(fct); v[VW].apply(fct); return *this; } void mat4::print(FILE *file, const char *name) const { int i, j; fprintf( stderr, "%s:\n", name ); for( i = 0; i < 4; i++ ) { fprintf( stderr, " " ); for( j = 0; j < 4; j++ ) { fprintf( stderr, "%f ", v[i][j] ); } fprintf( stderr, "\n" ); } } void mat4::swap_rows(int i, int j) { vec4 t; t = v[i]; v[i] = v[j]; v[j] = t; } void mat4::swap_cols(int i, int j) { float t; int k; for (k=0; k<4; k++) { t = v[k][i]; v[k][i] = v[k][j]; v[k][j] = t; } } // FRIENDS mat4 operator-(const mat4 &a) { return mat4(-a.v[0],-a.v[1],-a.v[2],-a.v[3]); } mat4 operator+(const mat4 &a, const mat4 &b) { return mat4( a.v[0] + b.v[0], a.v[1] + b.v[1], a.v[2] + b.v[2], a.v[3] + b.v[3]); } mat4 operator-(const mat4 &a, const mat4 &b) { return mat4( a.v[0] - b.v[0], a.v[1] - b.v[1], a.v[2] - b.v[2], a.v[3] - b.v[3]); } mat4 operator*(const mat4 &a, const mat4 &b) { #define ROWCOL(i, j) \ a.v[i].n[0]*b.v[0][j] + \ a.v[i].n[1]*b.v[1][j] + \ a.v[i].n[2]*b.v[2][j] + \ a.v[i].n[3]*b.v[3][j] return mat4( vec4(ROWCOL(0,0), ROWCOL(0,1), ROWCOL(0,2), ROWCOL(0,3)), vec4(ROWCOL(1,0), ROWCOL(1,1), ROWCOL(1,2), ROWCOL(1,3)), vec4(ROWCOL(2,0), ROWCOL(2,1), ROWCOL(2,2), ROWCOL(2,3)), vec4(ROWCOL(3,0), ROWCOL(3,1), ROWCOL(3,2), ROWCOL(3,3)) ); #undef ROWCOL } mat4 operator*(const mat4 &a, float d) { return mat4(a.v[0]*d, a.v[1]*d, a.v[2]*d, a.v[3]*d); } mat4 operator*(float d, const mat4 &a) { return a*d; } mat4 operator/(const mat4 &a, float d) { return mat4(a.v[0]/d, a.v[1]/d, a.v[2]/d, a.v[3]/d); } int operator==(const mat4 &a, const mat4 &b) { return (a.v[0] == b.v[0]) && (a.v[1] == b.v[1]) && (a.v[2] == b.v[2]) && (a.v[3] == b.v[3]); } int operator!=(const mat4 &a, const mat4 &b) { return !(a == b); } /*ostream& operator << (ostream& s, mat4& m) { return s << m.v[VX] << '\n' << m.v[VY] << '\n' << m.v[VZ] << '\n' << m.v[VW]; } istream& operator >> (istream& s, mat4& m) { mat4 m_tmp; s >> m_tmp[VX] >> m_tmp[VY] >> m_tmp[VZ] >> m_tmp[VW]; if (s) m = m_tmp; return s; } */ void swap(mat4 &a, mat4 &b) { mat4 tmp(a); a = b; b = tmp; } /**************************************************************** * * * 2D functions and 3D functions * * * ****************************************************************/ mat3 identity2D() { return mat3( vec3(1.0, 0.0, 0.0), vec3(0.0, 1.0, 0.0), vec3(0.0, 0.0, 1.0)); } mat3 translation2D(const vec2 &v) { return mat3( vec3(1.0, 0.0, v[VX]), vec3(0.0, 1.0, v[VY]), vec3(0.0, 0.0, 1.0)); } mat3 rotation2D(const vec2 &Center, float angleDeg) { float angleRad = (float) (angleDeg * radians); float c = (float) cos(angleRad); float s = (float) sin(angleRad); return mat3( vec3(c, -s, Center[VX] * (1.0f-c) + Center[VY] * s), vec3(s, c, Center[VY] * (1.0f-c) - Center[VX] * s), vec3(0.0, 0.0, 1.0)); } mat3 scaling2D(const vec2 &scaleVector) { return mat3( vec3(scaleVector[VX], 0.0, 0.0), vec3(0.0, scaleVector[VY], 0.0), vec3(0.0, 0.0, 1.0)); } mat4 identity3D() { return mat4( vec4(1.0, 0.0, 0.0, 0.0), vec4(0.0, 1.0, 0.0, 0.0), vec4(0.0, 0.0, 1.0, 0.0), vec4(0.0, 0.0, 0.0, 1.0)); } mat4 translation3D(const vec3 &v) { return mat4( vec4(1.0, 0.0, 0.0, v[VX]), vec4(0.0, 1.0, 0.0, v[VY]), vec4(0.0, 0.0, 1.0, v[VZ]), vec4(0.0, 0.0, 0.0, 1.0)); } mat4 rotation3D(const vec3 &Axis, float angleDeg) { float angleRad = (float) (angleDeg * radians); float c = (float) cos(angleRad); float s = (float) sin(angleRad); float t = 1.0f - c; vec3 axis(Axis); axis.normalize(); return mat4( vec4(t * axis[VX] * axis[VX] + c, t * axis[VX] * axis[VY] - s * axis[VZ], t * axis[VX] * axis[VZ] + s * axis[VY], 0.0), vec4(t * axis[VX] * axis[VY] + s * axis[VZ], t * axis[VY] * axis[VY] + c, t * axis[VY] * axis[VZ] - s * axis[VX], 0.0), vec4(t * axis[VX] * axis[VZ] - s * axis[VY], t * axis[VY] * axis[VZ] + s * axis[VX], t * axis[VZ] * axis[VZ] + c, 0.0), vec4(0.0, 0.0, 0.0, 1.0)); } mat4 rotation3Drad(const vec3 &Axis, float angleRad) { float c = (float) cos(angleRad); float s = (float) sin(angleRad); float t = 1.0f - c; vec3 axis(Axis); axis.normalize(); return mat4( vec4(t * axis[VX] * axis[VX] + c, t * axis[VX] * axis[VY] - s * axis[VZ], t * axis[VX] * axis[VZ] + s * axis[VY], 0.0), vec4(t * axis[VX] * axis[VY] + s * axis[VZ], t * axis[VY] * axis[VY] + c, t * axis[VY] * axis[VZ] - s * axis[VX], 0.0), vec4(t * axis[VX] * axis[VZ] - s * axis[VY], t * axis[VY] * axis[VZ] + s * axis[VX], t * axis[VZ] * axis[VZ] + c, 0.0), vec4(0.0, 0.0, 0.0, 1.0)); } mat4 scaling3D(const vec3 &scaleVector) { return mat4( vec4(scaleVector[VX], 0.0, 0.0, 0.0), vec4(0.0, scaleVector[VY], 0.0, 0.0), vec4(0.0, 0.0, scaleVector[VZ], 0.0), vec4(0.0, 0.0, 0.0, 1.0)); } mat4 perspective3D(float d) { return mat4( vec4(1.0f, 0.0f, 0.0f, 0.0f), vec4(0.0f, 1.0f, 0.0f, 0.0f), vec4(0.0f, 0.0f, 1.0f, 0.0f), vec4(0.0f, 0.0f, 1.0f/d, 0.0f)); } ./asymptote-2.41/beziercurve.h0000644000175000017500000000316313064427076016244 0ustar norbertnorbert/***** * beziercurve.h * Author: John C. Bowman * * Render a Bezier curve. *****/ #ifndef BEZIERCURVE_H #define BEZIERCURVE_H #include "drawelement.h" namespace camp { #ifdef HAVE_GL extern const double Fuzz; extern const double Fuzz2; struct BezierCurve { static std::vector buffer; static std::vector indices; GLuint nvertices; double res,res2; triple Min,Max; BezierCurve() : nvertices(0) {} void init(double res, const triple& Min, const triple& Max); // Store the vertex v in the buffer. GLuint vertex(const triple &v) { buffer.push_back(v.getx()); buffer.push_back(v.gety()); buffer.push_back(v.getz()); return nvertices++; } // Approximate bounds by bounding box of control polyhedron. bool offscreen(size_t n, const triple *v) { double x,y,z; double X,Y,Z; boundstriples(x,y,z,X,Y,Z,n,v); return X < Min.getx() || x > Max.getx() || Y < Min.gety() || y > Max.gety() || Z < Min.getz() || z > Max.getz(); } void clear() { nvertices=0; buffer.clear(); indices.clear(); } ~BezierCurve() { clear(); } void render(const triple *p, GLuint I0, GLuint I1); void render(const triple *p, bool straight); void queue(const triple *g, bool straight, double ratio, const triple& Min, const triple& Max) { init(pixel*ratio,Min,Max); render(g,straight); } void draw(); void draw(const triple *g, bool straight, double ratio, const triple& Min, const triple& Max) { queue(g,straight,ratio,Min,Max); draw(); } }; #endif } //namespace camp #endif ./asymptote-2.41/runarray.cc0000644000175000017500000020626613064427126015725 0ustar norbertnorbert/***** Autogenerated from runarray.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runarray.in" /***** * runarray.in * * Runtime functions for array operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 21 "runarray.in" #include "array.h" #include "arrayop.h" #include "triple.h" #include "path3.h" #include "Delaunay.h" #include "glrender.h" #ifdef HAVE_LIBFFTW3 #include "fftw++.h" #endif using namespace camp; using namespace vm; namespace run { extern pair zero; } typedef array boolarray; typedef array Intarray; typedef array Intarray2; typedef array realarray; typedef array realarray2; typedef array pairarray; typedef array pairarray2; typedef array triplearray2; using types::booleanArray; using types::IntArray; using types::IntArray2; using types::realArray; using types::realArray2; using types::pairArray; using types::pairArray2; using types::tripleArray2; typedef callable callableReal; void outOfBounds(const char *op, size_t len, Int n) { ostringstream buf; buf << op << " array of length " << len << " with out-of-bounds index " << n; error(buf); } inline item& arrayRead(array *a, Int n) { size_t len=checkArray(a); bool cyclic=a->cyclic(); if(cyclic && len > 0) n=imod(n,len); else if(n < 0 || n >= (Int) len) outOfBounds("reading",len,n); return (*a)[(unsigned) n]; } // Helper function to create deep arrays. static array* deepArray(Int depth, Int *dims) { assert(depth > 0); if (depth == 1) { return new array(dims[0]); } else { Int length = dims[0]; depth--; dims++; array *a = new array(length); for (Int index = 0; index < length; index++) { (*a)[index] = deepArray(depth, dims); } return a; } } namespace run { array *Identity(Int n) { size_t N=(size_t) n; array *c=new array(N); for(size_t i=0; i < N; ++i) { array *ci=new array(N); (*c)[i]=ci; for(size_t j=0; j < N; ++j) (*ci)[j]=0.0; (*ci)[i]=1.0; } return c; } } static const char *incommensurate="Incommensurate matrices"; static const char *singular="Singular matrix"; static const char *invalidarraylength="Invalid array length: "; static size_t *pivot,*Row,*Col; bound_double *bounddouble(int N) { if(N == 16) return bound; if(N == 10) return boundtri; ostringstream buf; buf << invalidarraylength << " " << N; error(buf); return NULL; } bound_triple *boundtriple(int N) { if(N == 16) return bound; if(N == 10) return boundtri; ostringstream buf; buf << invalidarraylength << " " << N; error(buf); return NULL; } static inline void inverseAllocate(size_t n) { pivot=new size_t[n]; Row=new size_t[n]; Col=new size_t[n]; } static inline void inverseDeallocate() { delete[] pivot; delete[] Row; delete[] Col; } namespace run { array *copyArray(array *a) { size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; i++) (*c)[i]=(*a)[i]; return c; } array *copyArray2(array *a) { size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; i++) { array *ai=read(a,i); size_t aisize=checkArray(ai); array *ci=new array(aisize); (*c)[i]=ci; for(size_t j=0; j < aisize; j++) (*ci)[j]=(*ai)[j]; } return c; } double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement) { size_t n=checkArray(a); N=0; for(size_t i=0; i < n; i++) N += checkArray(read(a,i)); double *A=(placement == NoGC) ? new double [3*N] : new(placement) double[3*N]; double *p=A; for(size_t i=0; i < n; i++) { array *ai=read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; j++) { triple v=read(ai,j); *p=v.getx(); *(p+N)=v.gety(); *(p+2*N)=v.getz(); ++p; } } return A; } triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement) { size_t n=checkArray(a); N=0; for(size_t i=0; i < n; i++) N += checkArray(read(a,i)); triple *A=(placement == NoGC) ? new triple [N] : new(placement) triple[N]; triple *p=A; for(size_t i=0; i < n; i++) { array *ai=read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; j++) *(p++)=read(ai,j); } return A; } triple operator *(const array& t, const triple& v) { size_t n=checkArray(&t); if(n != 4) error(incommensurate); array *t0=read(t,0); array *t1=read(t,1); array *t2=read(t,2); array *t3=read(t,3); if(checkArray(t0) != 4 || checkArray(t1) != 4 || checkArray(t2) != 4 || checkArray(t3) != 4) error(incommensurate); double x=v.getx(); double y=v.gety(); double z=v.getz(); double f=read(t3,0)*x+read(t3,1)*y+read(t3,2)*z+ read(t3,3); if(f == 0.0) run::dividebyzero(); f=1.0/f; return triple((read(t0,0)*x+read(t0,1)*y+read(t0,2)*z+ read(t0,3))*f, (read(t1,0)*x+read(t1,1)*y+read(t1,2)*z+ read(t1,3))*f, (read(t2,0)*x+read(t2,1)*y+read(t2,2)*z+ read(t2,3))*f); } template array *mult(array *a, array *b) { size_t n=checkArray(a); size_t nb=checkArray(b); size_t na0=n == 0 ? 0 : checkArray(read(a,0)); if(na0 != nb) error(incommensurate); size_t nb0=nb == 0 ? 0 : checkArray(read(b,0)); array *c=new array(n); T *A,*B; copyArray2C(A,a,false); copyArray2C(B,b,false); for(size_t i=0; i < n; ++i) { T *Ai=A+i*nb; array *ci=new array(nb0); (*c)[i]=ci; for(size_t j=0; j < nb0; ++j) { T sum=T(); size_t kj=j; for(size_t k=0; k < nb; ++k, kj += nb0) sum += Ai[k]*B[kj]; (*ci)[j]=sum; } } delete[] B; delete[] A; return c; } // Compute transpose(A)*A where A is an n x m matrix. template array *AtA(array *a) { size_t n=checkArray(a); size_t m=n == 0 ? 0 : checkArray(read(a,0)); array *c=new array(m); T *A; copyArray2C(A,a,false); for(size_t i=0; i < m; ++i) { array *ci=new array(m); (*c)[i]=ci; for(size_t j=0; j < m; ++j) { T sum=T(); size_t kj=j; size_t ki=i; for(size_t k=0; k < n; ++k, kj += m, ki += m) sum += A[ki]*A[kj]; (*ci)[j]=sum; } } delete[] A; return c; } double norm(double *a, size_t n) { if(n == 0) return 0.0; double M=fabs(a[0]); for(size_t i=1; i < n; ++i) M=::max(M,fabs(a[i])); return M; } double norm(triple *a, size_t n) { if(n == 0) return 0.0; double M=a[0].abs2(); for(size_t i=1; i < n; ++i) M=::max(M,a[i].abs2()); return sqrt(M); } // Transpose an n x n matrix in place. void transpose(double *a, size_t n) { for(size_t i=1; i < n; i++) { for(size_t j=0; j < i; j++) { size_t ij=n*i+j; size_t ji=n*j+i; double temp=a[ij]; a[ij]=a[ji]; a[ji]=temp; } } } // Invert an n x n array in place. void inverse(double *a, size_t n) { inverseAllocate(n); for(size_t i=0; i < n; i++) pivot[i]=0; size_t col=0, row=0; // This is the main loop over the columns to be reduced. for(size_t i=0; i < n; i++) { real big=0.0; // This is the outer loop of the search for a pivot element. for(size_t j=0; j < n; j++) { double *aj=a+n*j; if(pivot[j] != 1) { for(size_t k=0; k < n; k++) { if(pivot[k] == 0) { real temp=fabs(aj[k]); if(temp >= big) { big=temp; row=j; col=k; } } else if(pivot[k] > 1) { inverseDeallocate(); error(singular); } } } } ++(pivot[col]); // Interchange rows, if needed, to put the pivot element on the diagonal. double *acol=a+n*col; if(row != col) { double *arow=a+n*row; for(size_t k=0; k < n; k++) { real temp=arow[k]; arow[k]=acol[k]; acol[k]=temp; } } Row[i]=row; Col[i]=col; // Divide the pivot row by the pivot element. real denom=acol[col]; if(denom == 0.0) { inverseDeallocate(); error(singular); } real pivinv=1.0/denom; acol[col]=1.0; for(size_t k=0; k < n; k++) acol[k]=acol[k]*pivinv; // Reduce all rows except for the pivoted one. for(size_t k=0; k < n; k++) { if(k != col) { double *ak=a+n*k; real akcol=ak[col]; ak[col]=0.0; for(size_t j=0; j < n; j++) ak[j] -= acol[j]*akcol; } } } // Unscramble the inverse matrix in view of the column interchanges. for(size_t k=n; k > 0;) { k--; size_t r=Row[k]; size_t c=Col[k]; if(r != c) { for(size_t j=0; j < n; j++) { double *aj=a+n*j; real temp=aj[r]; aj[r]=aj[c]; aj[c]=temp; } } } inverseDeallocate(); } } callable *Func; stack *FuncStack; double wrapFunction(double x) { FuncStack->push(x); Func->call(FuncStack); return pop(FuncStack); } callable *compareFunc; bool compareFunction(const vm::item& i, const vm::item& j) { FuncStack->push(i); FuncStack->push(j); compareFunc->call(FuncStack); return pop(FuncStack); } // Crout's algorithm for computing the LU decomposition of a square matrix. // cf. routine ludcmp (Press et al., Numerical Recipes, 1991). Int LUdecompose(double *a, size_t n, size_t* index, bool warn=true) { double *vv=new double[n]; Int swap=1; for(size_t i=0; i < n; ++i) { double big=0.0; double *ai=a+i*n; for(size_t j=0; j < n; ++j) { double temp=fabs(ai[j]); if(temp > big) big=temp; } if(big == 0.0) { delete[] vv; if(warn) error(singular); else return 0; } vv[i]=1.0/big; } for(size_t j=0; j < n; ++j) { for(size_t i=0; i < j; ++i) { double *ai=a+i*n; double sum=ai[j]; for(size_t k=0; k < i; ++k) { sum -= ai[k]*a[k*n+j]; } ai[j]=sum; } double big=0.0; size_t imax=j; for(size_t i=j; i < n; ++i) { double *ai=a+i*n; double sum=ai[j]; for(size_t k=0; k < j; ++k) sum -= ai[k]*a[k*n+j]; ai[j]=sum; double temp=vv[i]*fabs(sum); if(temp >= big) { big=temp; imax=i; } } double *aj=a+j*n; double *aimax=a+imax*n; if(j != imax) { for(size_t k=0; k < n; ++k) { double temp=aimax[k]; aimax[k]=aj[k]; aj[k]=temp; } swap *= -1; vv[imax]=vv[j]; } if(index) index[j]=imax; if(j != n) { double denom=aj[j]; if(denom == 0.0) { delete[] vv; if(warn) error(singular); else return 0; } for(size_t i=j+1; i < n; ++i) a[i*n+j] /= denom; } } delete[] vv; return swap; } namespace run { void dividebyzero(size_t i) { ostringstream buf; if(i > 0) buf << "array element " << i << ": "; buf << "Divide by zero"; error(buf); } void integeroverflow(size_t i) { ostringstream buf; if(i > 0) buf << "array element " << i << ": "; buf << "Integer overflow"; error(buf); } } // Autogenerated routines: #ifndef NOSYM #include "runarray.symbols.h" #endif namespace run { // Create an empty array. #line 550 "runarray.in" void emptyArray(stack *Stack) { #line 551 "runarray.in" {Stack->push(new array(0)); return;} } // Create a new array (technically a vector). // This array will be multidimensional. First the number of dimensions // is popped off the stack, followed by each dimension in reverse order. // The array itself is technically a one dimensional array of one // dimension arrays and so on. #line 560 "runarray.in" void newDeepArray(stack *Stack) { Int depth=vm::pop(Stack); #line 561 "runarray.in" assert(depth > 0); Int *dims = new Int[depth]; for (Int index = depth-1; index >= 0; index--) { Int i=pop(Stack); if(i < 0) error("cannot create a negative length array"); dims[index]=i; } array *a=deepArray(depth, dims); delete[] dims; {Stack->push(a); return;} } // Creates an array with elements already specified. First, the number // of elements is popped off the stack, followed by each element in // reverse order. #line 580 "runarray.in" void newInitializedArray(stack *Stack) { Int n=vm::pop(Stack); #line 581 "runarray.in" assert(n >= 0); array *a = new array(n); for (Int index = n-1; index >= 0; index--) (*a)[index] = pop(Stack); {Stack->push(a); return;} } // Similar to newInitializedArray, but after the n elements, append another // array to it. #line 594 "runarray.in" void newAppendedArray(stack *Stack) { Int n=vm::pop(Stack); array* tail=vm::pop(Stack); #line 595 "runarray.in" assert(n >= 0); array *a = new array(n); for (Int index = n-1; index >= 0; index--) (*a)[index] = pop(Stack); copy(tail->begin(), tail->end(), back_inserter(*a)); {Stack->push(a); return;} } // Produce an array of n deep copies of value. // typeDepth is the true depth of the array determined at compile-time when the // operations for the array type are added. This typeDepth argument is // automatically pushed on the stack and is not visible to the user. #line 612 "runarray.in" void copyArrayValue(stack *Stack) { Int typeDepth=vm::pop(Stack); Int depth=vm::pop(Stack,Int_MAX); item value=vm::pop(Stack); Int n=vm::pop(Stack); #line 613 "runarray.in" if(n < 0) error("cannot create a negative length array"); if(depth < 0) error("cannot copy to a negative depth"); if(depth > typeDepth) depth=typeDepth; {Stack->push(new array((size_t) n, value, depth)); return;} } // Deep copy of array. // typeDepth is the true depth of the array determined at compile-time when the // operations for the array type are added. This typeDepth argument is // automatically pushed on the stack and is not visible to the user. #line 624 "runarray.in" void copyArray(stack *Stack) { Int typeDepth=vm::pop(Stack); Int depth=vm::pop(Stack,Int_MAX); array * a=vm::pop(Stack); #line 625 "runarray.in" if(depth < 0) error("cannot copy to a negative depth"); if(depth > typeDepth) depth=typeDepth; {Stack->push(a->copyToDepth(depth)); return;} } // Read an element from an array. Checks for initialization & bounds. #line 632 "runarray.in" void arrayRead(stack *Stack) { Int n=vm::pop(Stack); array * a=vm::pop(Stack); #line 633 "runarray.in" item& i=arrayRead(a,n); if (i.empty()) { ostringstream buf; buf << "read uninitialized value from array at index " << n; error(buf); } {Stack->push(i); return;} } // Slice a substring from an array. #line 644 "runarray.in" void arraySliceRead(stack *Stack) { Int right=vm::pop(Stack); Int left=vm::pop(Stack); array * a=vm::pop(Stack); #line 645 "runarray.in" checkArray(a); {Stack->push(a->slice(left, right)); return;} } // Slice a substring from an array. This implements the cases a[i:] and a[:] // where the endpoint is not given, and assumed to be the length of the array. #line 652 "runarray.in" void arraySliceReadToEnd(stack *Stack) { Int left=vm::pop(Stack); array * a=vm::pop(Stack); #line 653 "runarray.in" size_t len=checkArray(a); {Stack->push(a->slice(left, (Int)len)); return;} } // Read an element from an array of arrays. Check bounds and initialize // as necessary. #line 660 "runarray.in" void arrayArrayRead(stack *Stack) { Int n=vm::pop(Stack); array * a=vm::pop(Stack); #line 661 "runarray.in" item& i=arrayRead(a,n); if (i.empty()) i=new array(0); {Stack->push(i); return;} } // Write an element to an array. Increase size if necessary. // TODO: Add arrayWriteAndPop #line 669 "runarray.in" void arrayWrite(stack *Stack) { item value=vm::pop(Stack); Int n=vm::pop(Stack); array * a=vm::pop(Stack); #line 670 "runarray.in" size_t len=checkArray(a); bool cyclic=a->cyclic(); if(cyclic && len > 0) n=imod(n,len); else { if(cyclic) outOfBounds("writing cyclic",len,n); if(n < 0) outOfBounds("writing",len,n); if(len <= (size_t) n) a->resize(n+1); } (*a)[n] = value; {Stack->push(value); return;} } #line 684 "runarray.in" void arraySliceWrite(stack *Stack) { array * src=vm::pop(Stack); Int right=vm::pop(Stack); Int left=vm::pop(Stack); array * dest=vm::pop(Stack); #line 685 "runarray.in" checkArray(src); checkArray(dest); dest->setSlice(left, right, src); {Stack->push(src); return;} } #line 692 "runarray.in" void arraySliceWriteToEnd(stack *Stack) { array * src=vm::pop(Stack); Int left=vm::pop(Stack); array * dest=vm::pop(Stack); #line 693 "runarray.in" checkArray(src); size_t len=checkArray(dest); dest->setSlice(left, (Int) len, src); {Stack->push(src); return;} } // Returns the length of an array. #line 701 "runarray.in" void arrayLength(stack *Stack) { array * a=vm::pop(Stack); #line 702 "runarray.in" {Stack->push((Int) checkArray(a)); return;} } // Returns an array of integers representing the keys of the array. #line 707 "runarray.in" void arrayKeys(stack *Stack) { array * a=vm::pop(Stack); #line 708 "runarray.in" size_t size=checkArray(a); array *keys=new array(); for (size_t i=0; ipush((Int)i); } {Stack->push(keys); return;} } // Return the cyclic flag for an array. #line 722 "runarray.in" void arrayCyclicFlag(stack *Stack) { array * a=vm::pop(Stack); #line 723 "runarray.in" checkArray(a); {Stack->push(a->cyclic()); return;} } #line 728 "runarray.in" void arraySetCyclicFlag(stack *Stack) { array * a=vm::pop(Stack); bool b=vm::pop(Stack); #line 729 "runarray.in" checkArray(a); a->cyclic(b); {Stack->push(b); return;} } // Check to see if an array element is initialized. #line 736 "runarray.in" void arrayInitializedHelper(stack *Stack) { array * a=vm::pop(Stack); Int n=vm::pop(Stack); #line 737 "runarray.in" size_t len=checkArray(a); bool cyclic=a->cyclic(); if(cyclic && len > 0) n=imod(n,len); else if(n < 0 || n >= (Int) len) {Stack->push(false); return;} item&i=(*a)[(unsigned) n]; {Stack->push(!i.empty()); return;} } // Returns the initialize method for an array. #line 747 "runarray.in" void arrayInitialized(stack *Stack) { array * a=vm::pop(Stack); #line 748 "runarray.in" {Stack->push(new thunk(new bfunc(arrayInitializedHelper),a)); return;} } // The helper function for the cyclic method that sets the cyclic flag. #line 753 "runarray.in" void arrayCyclicHelper(stack *Stack) { array * a=vm::pop(Stack); bool b=vm::pop(Stack); #line 754 "runarray.in" checkArray(a); a->cyclic(b); } // Set the cyclic flag for an array. #line 760 "runarray.in" void arrayCyclic(stack *Stack) { array * a=vm::pop(Stack); #line 761 "runarray.in" {Stack->push(new thunk(new bfunc(arrayCyclicHelper),a)); return;} } // The helper function for the push method that does the actual operation. #line 766 "runarray.in" void arrayPushHelper(stack *Stack) { array * a=vm::pop(Stack); item x=vm::pop(Stack); #line 767 "runarray.in" checkArray(a); a->push(x); {Stack->push(x); return;} } // Returns the push method for an array. #line 774 "runarray.in" void arrayPush(stack *Stack) { array * a=vm::pop(Stack); #line 775 "runarray.in" {Stack->push(new thunk(new bfunc(arrayPushHelper),a)); return;} } // The helper function for the append method that appends b to a. #line 780 "runarray.in" void arrayAppendHelper(stack *Stack) { array * a=vm::pop(Stack); array * b=vm::pop(Stack); #line 781 "runarray.in" checkArray(a); size_t size=checkArray(b); for(size_t i=0; i < size; i++) a->push((*b)[i]); } // Returns the append method for an array. #line 789 "runarray.in" void arrayAppend(stack *Stack) { array * a=vm::pop(Stack); #line 790 "runarray.in" {Stack->push(new thunk(new bfunc(arrayAppendHelper),a)); return;} } // The helper function for the pop method. #line 795 "runarray.in" void arrayPopHelper(stack *Stack) { array * a=vm::pop(Stack); #line 796 "runarray.in" size_t asize=checkArray(a); if(asize == 0) error("cannot pop element from empty array"); {Stack->push(a->pop()); return;} } // Returns the pop method for an array. #line 804 "runarray.in" void arrayPop(stack *Stack) { array * a=vm::pop(Stack); #line 805 "runarray.in" {Stack->push(new thunk(new bfunc(arrayPopHelper),a)); return;} } // The helper function for the insert method. #line 810 "runarray.in" void arrayInsertHelper(stack *Stack) { array * a=vm::pop(Stack); array * x=vm::pop(Stack); Int i=vm::pop(Stack); #line 811 "runarray.in" size_t asize=checkArray(a); checkArray(x); if(a->cyclic() && asize > 0) i=imod(i,asize); if(i < 0 || i > (Int) asize) outOfBounds("inserting",asize,i); (*a).insert((*a).begin()+i,(*x).begin(),(*x).end()); } // Returns the insert method for an array. #line 821 "runarray.in" void arrayInsert(stack *Stack) { array * a=vm::pop(Stack); #line 822 "runarray.in" {Stack->push(new thunk(new bfunc(arrayInsertHelper),a)); return;} } // Returns the delete method for an array. #line 827 "runarray.in" void arrayDelete(stack *Stack) { array * a=vm::pop(Stack); #line 828 "runarray.in" {Stack->push(new thunk(new bfunc(arrayDeleteHelper),a)); return;} } #line 832 "runarray.in" void arrayAlias(stack *Stack) { array * b=vm::pop(Stack); array * a=vm::pop(Stack); #line 833 "runarray.in" {Stack->push(a==b); return;} } // Return array formed by indexing array a with elements of integer array b #line 838 "runarray.in" void arrayIntArray(stack *Stack) { array * b=vm::pop(Stack); array * a=vm::pop(Stack); #line 839 "runarray.in" size_t asize=checkArray(a); size_t bsize=checkArray(b); array *r=new array(bsize); bool cyclic=a->cyclic(); for(size_t i=0; i < bsize; i++) { Int index=read(b,i); if(cyclic && asize > 0) index=imod(index,asize); else if(index < 0 || index >= (Int) asize) outOfBounds("reading",asize,index); (*r)[i]=(*a)[index]; } {Stack->push(r); return;} } // returns the complement of the integer array a in {0,2,...,n-1}, // so that b[complement(a,b.length)] yields the complement of b[a]. #line 857 "runarray.in" // Intarray* complement(Intarray *a, Int n); void gen_runarray32(stack *Stack) { Int n=vm::pop(Stack); Intarray * a=vm::pop(Stack); #line 858 "runarray.in" size_t asize=checkArray(a); array *r=new array(0); bool *keep=new bool[n]; for(Int i=0; i < n; ++i) keep[i]=true; for(size_t i=0; i < asize; ++i) { Int j=read(a,i); if(j >= 0 && j < n) keep[j]=false; } for(Int i=0; i < n; i++) if(keep[i]) r->push(i); delete[] keep; {Stack->push(r); return;} } // Generate the sequence {f(i) : i=0,1,...n-1} given a function f and integer n #line 875 "runarray.in" void arraySequence(stack *Stack) { Int n=vm::pop(Stack); callable * f=vm::pop(Stack); #line 876 "runarray.in" if(n < 0) n=0; array *a=new array(n); for(Int i=0; i < n; ++i) { Stack->push(i); f->call(Stack); (*a)[i]=pop(Stack); } {Stack->push(a); return;} } // Return the array {0,1,...n-1} #line 888 "runarray.in" // Intarray* sequence(Int n); void gen_runarray34(stack *Stack) { Int n=vm::pop(Stack); #line 889 "runarray.in" if(n < 0) n=0; array *a=new array(n); for(Int i=0; i < n; ++i) { (*a)[i]=i; } {Stack->push(a); return;} } // Apply a function to each element of an array #line 899 "runarray.in" void arrayFunction(stack *Stack) { array * a=vm::pop(Stack); callable * f=vm::pop(Stack); #line 900 "runarray.in" size_t size=checkArray(a); array *b=new array(size); for(size_t i=0; i < size; ++i) { Stack->push((*a)[i]); f->call(Stack); (*b)[i]=pop(Stack); } {Stack->push(b); return;} } #line 911 "runarray.in" void arraySort(stack *Stack) { callable * less=vm::pop(Stack); array * a=vm::pop(Stack); #line 912 "runarray.in" array *c=copyArray(a); compareFunc=less; FuncStack=Stack; stable_sort(c->begin(),c->end(),compareFunction); {Stack->push(c); return;} } #line 920 "runarray.in" void arraySearch(stack *Stack) { callable * less=vm::pop(Stack); item key=vm::pop(Stack); array * a=vm::pop(Stack); #line 921 "runarray.in" size_t size=a->size(); compareFunc=less; FuncStack=Stack; if(size == 0 || compareFunction(key,(*a)[0])) {Stack->push(-1); return;} size_t u=size-1; if(!compareFunction(key,(*a)[u])) {Stack->push(Intcast(u)); return;} size_t l=0; while (l < u) { size_t i=(l+u)/2; if(compareFunction(key,(*a)[i])) u=i; else if(compareFunction(key,(*a)[i+1])) {Stack->push(Intcast(i)); return;} else l=i+1; } {Stack->push(0); return;} } #line 939 "runarray.in" // bool all(boolarray *a); void gen_runarray38(stack *Stack) { boolarray * a=vm::pop(Stack); #line 940 "runarray.in" size_t size=checkArray(a); bool c=true; for(size_t i=0; i < size; i++) if(!get((*a)[i])) {c=false; break;} {Stack->push(c); return;} } #line 948 "runarray.in" // boolarray* !(boolarray* a); void gen_runarray39(stack *Stack) { boolarray* a=vm::pop(Stack); #line 949 "runarray.in" size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; i++) (*c)[i]=!read(a,i); {Stack->push(c); return;} } #line 957 "runarray.in" // Int sum(boolarray *a); void gen_runarray40(stack *Stack) { boolarray * a=vm::pop(Stack); #line 958 "runarray.in" size_t size=checkArray(a); Int sum=0; for(size_t i=0; i < size; i++) sum += read(a,i) ? 1 : 0; {Stack->push(sum); return;} } #line 966 "runarray.in" void arrayConcat(stack *Stack) { array * a=vm::pop(Stack); #line 967 "runarray.in" // a is an array of arrays to be concatenated together. // The signature is // T[] concat(... T[][] a); size_t numArgs=checkArray(a); size_t resultSize=0; for (size_t i=0; i < numArgs; ++i) { resultSize += checkArray(a->read(i)); } array *result=new array(resultSize); size_t ri=0; for (size_t i=0; i < numArgs; ++i) { array *arg=a->read(i); size_t size=checkArray(arg); for (size_t j=0; j < size; ++j) { (*result)[ri]=(*arg)[j]; ++ri; } } {Stack->push(result); return;} } #line 994 "runarray.in" void array2Transpose(stack *Stack) { array * a=vm::pop(Stack); #line 995 "runarray.in" size_t asize=checkArray(a); array *c=new array(0); for(size_t i=0; i < asize; i++) { size_t ip=i+1; array *ai=read(a,i); size_t aisize=checkArray(ai); size_t csize=checkArray(c); if(csize < aisize) { c->resize(aisize); for(size_t j=csize; j < aisize; j++) { (*c)[j]=new array(ip); } } for(size_t j=0; j < aisize; j++) { array *cj=read(c,j); if(checkArray(cj) < ip) cj->resize(ip); (*cj)[i]=(*ai)[j]; } } {Stack->push(c); return;} } // a is a rectangular 3D array; perm is an Int array indicating the type of // permutation (021 or 120, etc; original is 012). // Transpose by sending respective members to the permutated locations: // return the array obtained by putting a[i][j][k] into position perm{ijk}. #line 1022 "runarray.in" void array3Transpose(stack *Stack) { array * perm=vm::pop(Stack); array * a=vm::pop(Stack); #line 1023 "runarray.in" const size_t DIM=3; if(checkArray(perm) != DIM) { ostringstream buf; buf << "permutation array must have length " << DIM; error(buf); } size_t* size=new size_t[DIM]; for(size_t i=0; i < DIM; ++i) size[i]=DIM; for(size_t i=0; i < DIM; ++i) { Int p=read(perm,i); size_t P=(size_t) p; if(p < 0 || P >= DIM) { ostringstream buf; buf << "permutation index out of range: " << p; error(buf); } size[P]=P; } for(size_t i=0; i < DIM; ++i) if(size[i] == DIM) error("permutation indices must be distinct"); static const char *rectangular= "3D transpose implemented for rectangular matrices only"; size_t isize=size[0]=checkArray(a); array *a0=read(a,0); size[1]=checkArray(a0); array *a00=read(a0,0); size[2]=checkArray(a00); for(size_t i=0; i < isize; i++) { array *ai=read(a,i); size_t jsize=checkArray(ai); if(jsize != size[1]) error(rectangular); for(size_t j=0; j < jsize; j++) { array *aij=read(ai,j); if(checkArray(aij) != size[2]) error(rectangular); } } size_t perm0=(size_t) read(perm,0); size_t perm1=(size_t) read(perm,1); size_t perm2=(size_t) read(perm,2); size_t sizep0=size[perm0]; size_t sizep1=size[perm1]; size_t sizep2=size[perm2]; array *c=new array(sizep0); for(size_t i=0; i < sizep0; ++i) { array *ci=new array(sizep1); (*c)[i]=ci; for(size_t j=0; j < sizep1; ++j) { array *cij=new array(sizep2); (*ci)[j]=cij; } } size_t* i=new size_t[DIM]; for(i[0]=0; i[0] < size[0]; ++i[0]) { array *a0=read(a,i[0]); for(i[1]=0; i[1] < size[1]; ++i[1]) { array *a1=read(a0,i[1]); for(i[2]=0; i[2] < size[2]; ++i[2]) { array *c0=read(c,i[perm0]); array *c1=read(c0,i[perm1]); (*c1)[i[perm2]]=read(a1,i[2]); } } } delete[] i; delete[] size; {Stack->push(c); return;} } // In a boolean array, find the index of the nth true value or -1 if not found // If n is negative, search backwards. #line 1107 "runarray.in" // Int find(boolarray *a, Int n=1); void gen_runarray44(stack *Stack) { Int n=vm::pop(Stack,1); boolarray * a=vm::pop(Stack); #line 1108 "runarray.in" size_t size=checkArray(a); Int j=-1; if(n > 0) for(size_t i=0; i < size; i++) if(read(a,i)) { n--; if(n == 0) {j=(Int) i; break;} } if(n < 0) for(size_t i=size; i > 0;) if(read(a,--i)) { n++; if(n == 0) {j=(Int) i; break;} } {Stack->push(j); return;} } // construct vector obtained by replacing those elements of b for which the // corresponding elements of a are false by the corresponding element of c. #line 1126 "runarray.in" void arrayConditional(stack *Stack) { array * c=vm::pop(Stack); array * b=vm::pop(Stack); array * a=vm::pop(Stack); #line 1127 "runarray.in" size_t size=checkArray(a); array *r=new array(size); if(b && c) { checkArrays(a,b); checkArrays(b,c); for(size_t i=0; i < size; i++) (*r)[i]=read(a,i) ? (*b)[i] : (*c)[i]; } else { r->clear(); if(b) { checkArrays(a,b); for(size_t i=0; i < size; i++) if(read(a,i)) r->push((*b)[i]); } else if(c) { checkArrays(a,c); for(size_t i=0; i < size; i++) if(!read(a,i)) r->push((*c)[i]); } } {Stack->push(r); return;} } // Return an n x n identity matrix. #line 1151 "runarray.in" // realarray2* identity(Int n); void gen_runarray46(stack *Stack) { Int n=vm::pop(Stack); #line 1152 "runarray.in" {Stack->push(Identity(n)); return;} } // Return the inverse of an n x n matrix a using Gauss-Jordan elimination. #line 1157 "runarray.in" // realarray2* inverse(realarray2 *a); void gen_runarray47(stack *Stack) { realarray2 * a=vm::pop(Stack); #line 1158 "runarray.in" size_t n=checkArray(a); double *A; copyArray2C(A,a,true,0,NoGC); inverse(A,n); a=copyCArray2(n,n,A); delete[] A; {Stack->push(a); return;} } // Solve the linear equation ax=b by LU decomposition, returning the // solution x, where a is an n x n matrix and b is an array of length n. // If no solution exists, return an empty array. #line 1171 "runarray.in" // realarray* solve(realarray2 *a, realarray *b, bool warn=true); void gen_runarray48(stack *Stack) { bool warn=vm::pop(Stack,true); realarray * b=vm::pop(Stack); realarray2 * a=vm::pop(Stack); #line 1172 "runarray.in" size_t n=checkArray(a); if(n == 0) {Stack->push(new array(0)); return;} size_t m=checkArray(b); if(m != n) error(incommensurate); real *A; copyArray2C(A,a); size_t *index=new size_t[n]; if(LUdecompose(A,n,index,warn) == 0) {Stack->push(new array(0)); return;} array *x=new array(n); real *B; copyArrayC(B,b); for(size_t i=0; i < n; ++i) { size_t ip=index[i]; real sum=B[ip]; B[ip]=B[i]; real *Ai=A+i*n; for(size_t j=0; j < i; ++j) sum -= Ai[j]*B[j]; B[i]=sum; } for(size_t i=n; i > 0;) { --i; real sum=B[i]; real *Ai=A+i*n; for(size_t j=i+1; j < n; ++j) sum -= Ai[j]*B[j]; B[i]=sum/Ai[i]; } for(size_t i=0; i < n; ++i) (*x)[i]=B[i]; delete[] index; delete[] B; delete[] A; {Stack->push(x); return;} } // Solve the linear equation ax=b by LU decomposition, returning the // solution x, where a is an n x n matrix and b is an n x m matrix. // If no solution exists, return an empty array. #line 1224 "runarray.in" // realarray2* solve(realarray2 *a, realarray2 *b, bool warn=true); void gen_runarray49(stack *Stack) { bool warn=vm::pop(Stack,true); realarray2 * b=vm::pop(Stack); realarray2 * a=vm::pop(Stack); #line 1225 "runarray.in" size_t n=checkArray(a); if(n == 0) {Stack->push(new array(0)); return;} if(checkArray(b) != n) error(incommensurate); size_t m=checkArray(read(b,0)); real *A,*B; copyArray2C(A,a); copyArray2C(B,b,false); size_t *index=new size_t[n]; if(LUdecompose(A,n,index,warn) == 0) {Stack->push(new array(0)); return;} array *x=new array(n); for(size_t i=0; i < n; ++i) { real *Ai=A+i*n; real *Bi=B+i*m; real *Bip=B+index[i]*m; for(size_t k=0; k < m; ++k) { real sum=Bip[k]; Bip[k]=Bi[k]; size_t jk=k; for(size_t j=0; j < i; ++j, jk += m) sum -= Ai[j]*B[jk]; Bi[k]=sum; } } for(size_t i=n; i > 0;) { --i; real *Ai=A+i*n; real *Bi=B+i*m; for(size_t k=0; k < m; ++k) { real sum=Bi[k]; size_t jk=(i+1)*m+k; for(size_t j=i+1; j < n; ++j, jk += m) sum -= Ai[j]*B[jk]; Bi[k]=sum/Ai[i]; } } for(size_t i=0; i < n; ++i) { real *Bi=B+i*m; array *xi=new array(m); (*x)[i]=xi; for(size_t j=0; j < m; ++j) (*xi)[j]=Bi[j]; } delete[] index; delete[] B; delete[] A; {Stack->push(x); return;} } // Compute the determinant of an n x n matrix. #line 1287 "runarray.in" // real determinant(realarray2 *a); void gen_runarray50(stack *Stack) { realarray2 * a=vm::pop(Stack); #line 1288 "runarray.in" real *A; copyArray2C(A,a); size_t n=checkArray(a); real det=LUdecompose(A,n,NULL,false); size_t n1=n+1; for(size_t i=0; i < n; ++i) det *= A[i*n1]; delete[] A; {Stack->push(det); return;} } #line 1303 "runarray.in" // realarray* *(realarray2 *a, realarray *b); void gen_runarray51(stack *Stack) { realarray * b=vm::pop(Stack); realarray2 * a=vm::pop(Stack); #line 1304 "runarray.in" size_t n=checkArray(a); size_t m=checkArray(b); array *c=new array(n); real *B; copyArrayC(B,b); for(size_t i=0; i < n; ++i) { array *ai=read(a,i); if(checkArray(ai) != m) error(incommensurate); real sum=0.0; for(size_t j=0; j < m; ++j) sum += read(ai,j)*B[j]; (*c)[i]=sum; } delete[] B; {Stack->push(c); return;} } #line 1322 "runarray.in" // realarray* *(realarray *a, realarray2 *b); void gen_runarray52(stack *Stack) { realarray2 * b=vm::pop(Stack); realarray * a=vm::pop(Stack); #line 1323 "runarray.in" size_t n=checkArray(a); if(n != checkArray(b)) error(incommensurate); real *A; copyArrayC(A,a); array **B=new array*[n]; array *bk=read(b,0); B[0]=bk; size_t m=bk->size(); for(size_t k=1; k < n; k++) { array *bk=read(b,k); if(bk->size() != m) error(incommensurate); B[k]=bk; } array *c=new array(m); for(size_t i=0; i < m; ++i) { real sum=0.0; for(size_t k=0; k < n; ++k) sum += A[k]*read(B[k],i); (*c)[i]=sum; } delete[] B; delete[] A; {Stack->push(c); return;} } #line 1351 "runarray.in" // Intarray2* *(Intarray2 *a, Intarray2 *b); void gen_runarray53(stack *Stack) { Intarray2 * b=vm::pop(Stack); Intarray2 * a=vm::pop(Stack); #line 1352 "runarray.in" {Stack->push(mult(a,b)); return;} } #line 1356 "runarray.in" // realarray2* *(realarray2 *a, realarray2 *b); void gen_runarray54(stack *Stack) { realarray2 * b=vm::pop(Stack); realarray2 * a=vm::pop(Stack); #line 1357 "runarray.in" {Stack->push(mult(a,b)); return;} } #line 1361 "runarray.in" // pairarray2* *(pairarray2 *a, pairarray2 *b); void gen_runarray55(stack *Stack) { pairarray2 * b=vm::pop(Stack); pairarray2 * a=vm::pop(Stack); #line 1362 "runarray.in" {Stack->push(mult(a,b)); return;} } #line 1366 "runarray.in" // triple *(realarray2 *t, triple v); void gen_runarray56(stack *Stack) { triple v=vm::pop(Stack); realarray2 * t=vm::pop(Stack); #line 1367 "runarray.in" {Stack->push(*t*v); return;} } #line 1371 "runarray.in" // realarray2* AtA(realarray2 *a); void gen_runarray57(stack *Stack) { realarray2 * a=vm::pop(Stack); #line 1372 "runarray.in" {Stack->push(AtA(a)); return;} } #line 1376 "runarray.in" // pair project(triple v, realarray2 *t); void gen_runarray58(stack *Stack) { realarray2 * t=vm::pop(Stack); triple v=vm::pop(Stack); #line 1377 "runarray.in" size_t n=checkArray(t); if(n != 4) error(incommensurate); array *t0=read(t,0); array *t1=read(t,1); array *t3=read(t,3); if(checkArray(t0) != 4 || checkArray(t1) != 4 || checkArray(t3) != 4) error(incommensurate); real x=v.getx(); real y=v.gety(); real z=v.getz(); real f=read(t3,0)*x+read(t3,1)*y+read(t3,2)*z+ read(t3,3); if(f == 0.0) dividebyzero(); f=1.0/f; {Stack->push(pair((read(t0,0)*x+read(t0,1)*y+read(t0,2)*z+ read(t0,3))*f, (read(t1,0)*x+read(t1,1)*y+read(t1,2)*z+ read(t1,3))*f)); return;} } // Compute the dot product of vectors a and b. #line 1402 "runarray.in" // real dot(realarray *a, realarray *b); void gen_runarray59(stack *Stack) { realarray * b=vm::pop(Stack); realarray * a=vm::pop(Stack); #line 1403 "runarray.in" size_t n=checkArrays(a,b); real sum=0.0; for(size_t i=0; i < n; ++i) sum += read(a,i)*read(b,i); {Stack->push(sum); return;} } // Compute the complex dot product of vectors a and b. #line 1412 "runarray.in" // pair dot(pairarray *a, pairarray *b); void gen_runarray60(stack *Stack) { pairarray * b=vm::pop(Stack); pairarray * a=vm::pop(Stack); #line 1413 "runarray.in" size_t n=checkArrays(a,b); pair sum=zero; for(size_t i=0; i < n; ++i) sum += read(a,i)*conj(read(b,i)); {Stack->push(sum); return;} } // Solve the problem L\inv f, where f is an n vector and L is the n x n matrix // // [ b[0] c[0] a[0] ] // [ a[1] b[1] c[1] ] // [ a[2] b[2] c[2] ] // [ ... ] // [ c[n-1] a[n-1] b[n-1] ] #line 1428 "runarray.in" // realarray* tridiagonal(realarray *a, realarray *b, realarray *c, realarray *f); void gen_runarray61(stack *Stack) { realarray * f=vm::pop(Stack); realarray * c=vm::pop(Stack); realarray * b=vm::pop(Stack); realarray * a=vm::pop(Stack); #line 1429 "runarray.in" size_t n=checkArrays(a,b); checkEqual(n,checkArray(c)); checkEqual(n,checkArray(f)); array *up=new array(n); array& u=*up; if(n == 0) {Stack->push(up); return;} // Special case: zero Dirichlet boundary conditions if(read(a,0) == 0.0 && read(c,n-1) == 0.0) { real temp=read(b,0); if(temp == 0.0) dividebyzero(); temp=1.0/temp; real *work=new real[n]; u[0]=read(f,0)*temp; work[0]=-read(c,0)*temp; for(size_t i=1; i < n; i++) { real temp=(read(b,i)+read(a,i)*work[i-1]); if(temp == 0.0) {delete[] work; dividebyzero();} temp=1.0/temp; u[i]=(read(f,i)-read(a,i)*read(u,i-1))*temp; work[i]=-read(c,i)*temp; } for(size_t i=n-1; i >= 1; i--) u[i-1]=read(u,i-1)+work[i-1]*read(u,i); delete[] work; {Stack->push(up); return;} } real binv=read(b,0); if(binv == 0.0) dividebyzero(); binv=1.0/binv; if(n == 1) {u[0]=read(f,0)*binv; {Stack->push(up); return;}} if(n == 2) { real factor=(read(b,0)*read(b,1)- read(a,0)*read(c,1)); if(factor== 0.0) dividebyzero(); factor=1.0/factor; real temp=(read(b,0)*read(f,1)- read(c,1)*read(f,0))*factor; u[0]=(read(b,1)*read(f,0)- read(a,0)*read(f,1))*factor; u[1]=temp; {Stack->push(up); return;} } real *gamma=new real[n-2]; real *delta=new real[n-2]; gamma[0]=read(c,0)*binv; delta[0]=read(a,0)*binv; u[0]=read(f,0)*binv; real beta=read(c,n-1); real fn=read(f,n-1)-beta*read(u,0); real alpha=read(b,n-1)-beta*delta[0]; for(size_t i=1; i <= n-3; i++) { real alphainv=read(b,i)-read(a,i)*gamma[i-1]; if(alphainv == 0.0) {delete[] gamma; delete[] delta; dividebyzero();} alphainv=1.0/alphainv; beta *= -gamma[i-1]; gamma[i]=read(c,i)*alphainv; u[i]=(read(f,i)-read(a,i)*read(u,i-1))*alphainv; fn -= beta*read(u,i); delta[i]=-read(a,i)*delta[i-1]*alphainv; alpha -= beta*delta[i]; } real alphainv=read(b,n-2)-read(a,n-2)*gamma[n-3]; if(alphainv == 0.0) {delete[] gamma; delete[] delta; dividebyzero();} alphainv=1.0/alphainv; u[n-2]=(read(f,n-2)-read(a,n-2)*read(u,n-3)) *alphainv; beta=read(a,n-1)-beta*gamma[n-3]; real dnm1=(read(c,n-2)-read(a,n-2)*delta[n-3])*alphainv; real temp=alpha-beta*dnm1; if(temp == 0.0) {delete[] gamma; delete[] delta; dividebyzero();} u[n-1]=temp=(fn-beta*read(u,n-2))/temp; u[n-2]=read(u,n-2)-dnm1*temp; for(size_t i=n-2; i >= 1; i--) u[i-1]=read(u,i-1)-gamma[i-1]*read(u,i)-delta[i-1]*temp; delete[] delta; delete[] gamma; {Stack->push(up); return;} } // Root solve by Newton-Raphson #line 1526 "runarray.in" // real newton(Int iterations=100, callableReal *f, callableReal *fprime, real x, bool verbose=false); void gen_runarray62(stack *Stack) { bool verbose=vm::pop(Stack,false); real x=vm::pop(Stack); callableReal * fprime=vm::pop(Stack); callableReal * f=vm::pop(Stack); Int iterations=vm::pop(Stack,100); #line 1528 "runarray.in" static const real fuzz=1000.0*DBL_EPSILON; Int i=0; size_t oldPrec=0; if(verbose) oldPrec=cout.precision(DBL_DIG); real diff=DBL_MAX; real lastdiff; do { real x0=x; Stack->push(x); fprime->call(Stack); real dfdx=pop(Stack); if(dfdx == 0.0) { x=DBL_MAX; break; } Stack->push(x); f->call(Stack); real fx=pop(Stack); x -= fx/dfdx; lastdiff=diff; if(verbose) cout << "Newton-Raphson: " << x << endl; diff=fabs(x-x0); if(++i == iterations) { x=DBL_MAX; break; } } while (diff != 0.0 && (diff < lastdiff || diff > fuzz*fabs(x))); if(verbose) cout.precision(oldPrec); {Stack->push(x); return;} } // Root solve by Newton-Raphson bisection // cf. routine rtsafe (Press et al., Numerical Recipes, 1991). #line 1574 "runarray.in" // real newton(Int iterations=100, callableReal *f, callableReal *fprime, real x1, real x2, bool verbose=false); void gen_runarray63(stack *Stack) { bool verbose=vm::pop(Stack,false); real x2=vm::pop(Stack); real x1=vm::pop(Stack); callableReal * fprime=vm::pop(Stack); callableReal * f=vm::pop(Stack); Int iterations=vm::pop(Stack,100); #line 1576 "runarray.in" static const real fuzz=1000.0*DBL_EPSILON; size_t oldPrec=0; if(verbose) oldPrec=cout.precision(DBL_DIG); Stack->push(x1); f->call(Stack); real f1=pop(Stack); if(f1 == 0.0) {Stack->push(x1); return;} Stack->push(x2); f->call(Stack); real f2=pop(Stack); if(f2 == 0.0) {Stack->push(x2); return;} if((f1 > 0.0 && f2 > 0.0) || (f1 < 0.0 && f2 < 0.0)) { ostringstream buf; buf << "root not bracketed, f(x1)=" << f1 << ", f(x2)=" << f2 << endl; error(buf); } real x=0.5*(x1+x2); real dxold=fabs(x2-x1); if(f1 > 0.0) { real temp=x1; x1=x2; x2=temp; } if(verbose) cout << "midpoint: " << x << endl; real dx=dxold; Stack->push(x); f->call(Stack); real y=pop(Stack); Stack->push(x); fprime->call(Stack); real dy=pop(Stack); Int j; for(j=0; j < iterations; j++) { if(((x-x2)*dy-y)*((x-x1)*dy-y) >= 0.0 || fabs(2.0*y) > fabs(dxold*dy)) { dxold=dx; dx=0.5*(x2-x1); x=x1+dx; if(verbose) cout << "bisection: " << x << endl; if(x1 == x) {Stack->push(x); return;} } else { dxold=dx; dx=y/dy; real temp=x; x -= dx; if(verbose) cout << "Newton-Raphson: " << x << endl; if(temp == x) {Stack->push(x); return;} } if(fabs(dx) < fuzz*fabs(x)) {Stack->push(x); return;} Stack->push(x); f->call(Stack); y=pop(Stack); Stack->push(x); fprime->call(Stack); dy=pop(Stack); if(y < 0.0) x1=x; else x2=x; } if(verbose) cout.precision(oldPrec); {Stack->push((j == iterations) ? DBL_MAX : x); return;} } // Find a root for the specified continuous (but not necessarily // differentiable) function. Whatever value t is returned, it is guaranteed // that t is within [a, b] and within tolerance of a sign change. // An error is thrown if fa and fb are both positive or both negative. // // In this implementation, the binary search is interleaved // with a modified version of quadratic interpolation. // This is a C++ port of the Asymptote routine written by Charles Staats III. #line 1662 "runarray.in" // real _findroot(callableReal *f, real a, real b, real tolerance, real fa, real fb); void gen_runarray64(stack *Stack) { real fb=vm::pop(Stack); real fa=vm::pop(Stack); real tolerance=vm::pop(Stack); real b=vm::pop(Stack); real a=vm::pop(Stack); callableReal * f=vm::pop(Stack); #line 1664 "runarray.in" if(fa == 0.0) {Stack->push(a); return;} if(fb == 0.0) {Stack->push(b); return;} const char* oppsign="fa and fb must have opposite signs"; int sign; if(fa < 0.0) { if(fb < 0.0) error(oppsign); sign=1; } else { if(fb > 0.0) error(oppsign); fa=-fa; fb=-fb; sign=-1; } real t=a; real ft=fa; real twicetolerance=2.0*tolerance; while(b-a > tolerance) { t=(a+b)*0.5; Stack->push(t); f->call(Stack); ft=sign*pop(Stack); if(ft == 0.0) {Stack->push(t); return;} // If halving the interval already puts us within tolerance, // don't bother with the interpolation step. if(b-a >= twicetolerance) { real factor=1.0/(b-a); real q_A=2.0*(fa-2.0*ft+fb)*factor*factor; real q_B=(fb-fa)*factor; quadraticroots Q=quadraticroots(q_A,q_B,ft); // If the interpolation somehow failed, continue on to the next binary // search step. This may or may not be possible, depending on what // theoretical guarantees are provided by the quadraticroots function. real root; bool found=Q.roots > 0; if(found) { root=t+Q.t1; if(root <= a || root >= b) { if(Q.roots == 1) found=false; else { root=t+Q.t2; if(root <= a || root >= b) found=false; } } } if(found) { if(ft > 0.0) { b=t; fb=ft; } else { a=t; fa=ft; } t=root; // If the interpolated value is close to one edge of // the interval, move it farther away from the edge in // an effort to catch the root in the middle. real margin=(b-a)*1.0e-3; if(t-a < margin) t=a+2.0*(t-a); else if(b-t < margin) t=b-2.0*(b-t); Stack->push(t); f->call(Stack); ft=sign*pop(Stack); if(ft == 0.0) {Stack->push(t); return;} } } if(ft > 0.0) { b=t; fb=ft; } else if(ft < 0.0) { a=t; fa=ft; } } {Stack->push(a-(b-a)/(fb-fa)*fa); return;} } #line 1756 "runarray.in" // real simpson(callableReal *f, real a, real b, real acc=DBL_EPSILON, real dxmax=0); void gen_runarray65(stack *Stack) { real dxmax=vm::pop(Stack,0); real acc=vm::pop(Stack,DBL_EPSILON); real b=vm::pop(Stack); real a=vm::pop(Stack); callableReal * f=vm::pop(Stack); #line 1758 "runarray.in" real integral; if(dxmax <= 0) dxmax=fabs(b-a); callable *oldFunc=Func; Func=f; FuncStack=Stack; if(!simpson(integral,wrapFunction,a,b,acc,dxmax)) error("nesting capacity exceeded in simpson"); Func=oldFunc; {Stack->push(integral); return;} } // Compute the fast Fourier transform of a pair array #line 1771 "runarray.in" // pairarray* fft(pairarray *a, Int sign=1); void gen_runarray66(stack *Stack) { Int sign=vm::pop(Stack,1); pairarray * a=vm::pop(Stack); #line 1772 "runarray.in" #ifdef HAVE_LIBFFTW3 unsigned n=(unsigned) checkArray(a); array *c=new array(n); if(n) { Complex *f=utils::ComplexAlign(n); fftwpp::fft1d Forward(n,intcast(sign),f); for(size_t i=0; i < n; i++) { pair z=read(a,i); f[i]=Complex(z.getx(),z.gety()); } Forward.fft(f); for(size_t i=0; i < n; i++) { Complex z=f[i]; (*c)[i]=pair(z.real(),z.imag()); } utils::deleteAlign(f); } #else unused(a); unused(&sign); array *c=new array(0); error("Please install fftw3, run ./configure, and recompile"); #endif // HAVE_LIBFFTW3 {Stack->push(c); return;} } #line 1801 "runarray.in" // Intarray2* triangulate(pairarray *z); void gen_runarray67(stack *Stack) { pairarray * z=vm::pop(Stack); #line 1802 "runarray.in" size_t nv=checkArray(z); // Call robust version of Gilles Dumoulin's port of Paul Bourke's // triangulation code. XYZ *pxyz=new XYZ[nv+3]; ITRIANGLE *V=new ITRIANGLE[4*nv]; for(size_t i=0; i < nv; ++i) { pair w=read(z,i); pxyz[i].p[0]=w.getx(); pxyz[i].p[1]=w.gety(); pxyz[i].i=(Int) i; } Int ntri; Triangulate((Int) nv,pxyz,V,ntri,true,false); size_t nt=(size_t) ntri; array *t=new array(nt); for(size_t i=0; i < nt; ++i) { array *ti=new array(3); (*t)[i]=ti; ITRIANGLE *Vi=V+i; (*ti)[0]=pxyz[Vi->p1].i; (*ti)[1]=pxyz[Vi->p2].i; (*ti)[2]=pxyz[Vi->p3].i; } delete[] V; delete[] pxyz; {Stack->push(t); return;} } #line 1836 "runarray.in" // real norm(realarray *a); void gen_runarray68(stack *Stack) { realarray * a=vm::pop(Stack); #line 1837 "runarray.in" size_t n=checkArray(a); real M=0.0; for(size_t i=0; i < n; ++i) { real x=fabs(vm::read(a,i)); if(x > M) M=x; } {Stack->push(M); return;} } #line 1847 "runarray.in" // real norm(realarray2 *a); void gen_runarray69(stack *Stack) { realarray2 * a=vm::pop(Stack); #line 1848 "runarray.in" size_t n=checkArray(a); real M=0.0; for(size_t i=0; i < n; ++i) { vm::array *ai=vm::read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; ++j) { real a=fabs(vm::read(ai,j)); if(a > M) M=a; } } {Stack->push(M); return;} } #line 1862 "runarray.in" // real norm(triplearray2 *a); void gen_runarray70(stack *Stack) { triplearray2 * a=vm::pop(Stack); #line 1863 "runarray.in" size_t n=checkArray(a); real M=0.0; for(size_t i=0; i < n; ++i) { vm::array *ai=vm::read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; ++j) { real a=vm::read(ai,j).abs2(); if(a > M) M=a; } } {Stack->push(sqrt(M)); return;} } #line 1877 "runarray.in" // real change2(triplearray2 *a); void gen_runarray71(stack *Stack) { triplearray2 * a=vm::pop(Stack); #line 1878 "runarray.in" size_t n=checkArray(a); if(n == 0) {Stack->push(0.0); return;} vm::array *a0=vm::read(a,0); size_t m=checkArray(a0); if(m == 0) {Stack->push(0.0); return;} triple a00=vm::read(a0,0); real M=0.0; for(size_t i=0; i < n; ++i) { vm::array *ai=vm::read(a,i); size_t m=checkArray(ai); for(size_t j=0; j < m; ++j) { real a=(vm::read(ai,j)-a00).abs2(); if(a > M) M=a; } } {Stack->push(M); return;} } #line 1899 "runarray.in" // triple minbezier(triplearray2 *P, triple b); void gen_runarray72(stack *Stack) { triple b=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); #line 1900 "runarray.in" size_t N; real *A=copyTripleArray2Components(P,N); bound_double *B=bounddouble(N); b=triple(B(A,::min,b.getx(),sqrtFuzz*norm(A,N),maxdepth), B(A+N,::min,b.gety(),sqrtFuzz*norm(A+N,N),maxdepth), B(A+2*N,::min,b.getz(),sqrtFuzz*norm(A+2*N,N),maxdepth)); delete[] A; {Stack->push(b); return;} } #line 1911 "runarray.in" // triple maxbezier(triplearray2 *P, triple b); void gen_runarray73(stack *Stack) { triple b=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); #line 1912 "runarray.in" size_t N; real *A=copyTripleArray2Components(P,N); bound_double *B=bounddouble(N); b=triple(B(A,::max,b.getx(),sqrtFuzz*norm(A,N),maxdepth), B(A+N,::max,b.gety(),sqrtFuzz*norm(A+N,N),maxdepth), B(A+2*N,::max,b.getz(),sqrtFuzz*norm(A+2*N,N),maxdepth)); delete[] A; {Stack->push(b); return;} } #line 1923 "runarray.in" // pair minratio(triplearray2 *P, pair b); void gen_runarray74(stack *Stack) { pair b=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); #line 1924 "runarray.in" size_t N; triple *A=copyTripleArray2C(P,N); real fuzz=sqrtFuzz*norm(A,N); bound_triple *B=boundtriple(N); b=pair(B(A,::min,xratio,b.getx(),fuzz,maxdepth), B(A,::min,yratio,b.gety(),fuzz,maxdepth)); delete[] A; {Stack->push(b); return;} } #line 1935 "runarray.in" // pair maxratio(triplearray2 *P, pair b); void gen_runarray75(stack *Stack) { pair b=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); #line 1936 "runarray.in" size_t N; triple *A=copyTripleArray2C(P,N); bound_triple *B=boundtriple(N); real fuzz=sqrtFuzz*norm(A,N); b=pair(B(A,::max,xratio,b.getx(),fuzz,maxdepth), B(A,::max,yratio,b.gety(),fuzz,maxdepth)); delete[] A; {Stack->push(b); return;} } #line 1947 "runarray.in" // realarray* _projection(); void gen_runarray76(stack *Stack) { #line 1948 "runarray.in" #ifdef HAVE_GL array *a=new array(14); gl::projection P=gl::camera(); size_t k=0; (*a)[k++]=P.orthographic ? 1.0 : 0.0; triple camera=P.camera; (*a)[k++]=camera.getx(); (*a)[k++]=camera.gety(); (*a)[k++]=camera.getz(); triple up=P.up; (*a)[k++]=up.getx(); (*a)[k++]=up.gety(); (*a)[k++]=up.getz(); triple target=P.target; (*a)[k++]=target.getx(); (*a)[k++]=target.gety(); (*a)[k++]=target.getz(); (*a)[k++]=P.zoom; (*a)[k++]=P.angle; (*a)[k++]=P.viewportshift.getx(); (*a)[k++]=P.viewportshift.gety(); #endif {Stack->push(new array(0)); return;} } } // namespace run namespace trans { void gen_runarray_venv(venv &ve) { #line 549 "runarray.in" REGISTER_BLTIN(run::emptyArray,"emptyArray"); #line 555 "runarray.in" REGISTER_BLTIN(run::newDeepArray,"newDeepArray"); #line 577 "runarray.in" REGISTER_BLTIN(run::newInitializedArray,"newInitializedArray"); #line 592 "runarray.in" REGISTER_BLTIN(run::newAppendedArray,"newAppendedArray"); #line 608 "runarray.in" REGISTER_BLTIN(run::copyArrayValue,"copyArrayValue"); #line 620 "runarray.in" REGISTER_BLTIN(run::copyArray,"copyArray"); #line 631 "runarray.in" REGISTER_BLTIN(run::arrayRead,"arrayRead"); #line 643 "runarray.in" REGISTER_BLTIN(run::arraySliceRead,"arraySliceRead"); #line 650 "runarray.in" REGISTER_BLTIN(run::arraySliceReadToEnd,"arraySliceReadToEnd"); #line 658 "runarray.in" REGISTER_BLTIN(run::arrayArrayRead,"arrayArrayRead"); #line 667 "runarray.in" REGISTER_BLTIN(run::arrayWrite,"arrayWrite"); #line 684 "runarray.in" REGISTER_BLTIN(run::arraySliceWrite,"arraySliceWrite"); #line 692 "runarray.in" REGISTER_BLTIN(run::arraySliceWriteToEnd,"arraySliceWriteToEnd"); #line 700 "runarray.in" REGISTER_BLTIN(run::arrayLength,"arrayLength"); #line 706 "runarray.in" REGISTER_BLTIN(run::arrayKeys,"arrayKeys"); #line 721 "runarray.in" REGISTER_BLTIN(run::arrayCyclicFlag,"arrayCyclicFlag"); #line 728 "runarray.in" REGISTER_BLTIN(run::arraySetCyclicFlag,"arraySetCyclicFlag"); #line 735 "runarray.in" REGISTER_BLTIN(run::arrayInitializedHelper,"arrayInitializedHelper"); #line 746 "runarray.in" REGISTER_BLTIN(run::arrayInitialized,"arrayInitialized"); #line 752 "runarray.in" REGISTER_BLTIN(run::arrayCyclicHelper,"arrayCyclicHelper"); #line 759 "runarray.in" REGISTER_BLTIN(run::arrayCyclic,"arrayCyclic"); #line 765 "runarray.in" REGISTER_BLTIN(run::arrayPushHelper,"arrayPushHelper"); #line 773 "runarray.in" REGISTER_BLTIN(run::arrayPush,"arrayPush"); #line 779 "runarray.in" REGISTER_BLTIN(run::arrayAppendHelper,"arrayAppendHelper"); #line 788 "runarray.in" REGISTER_BLTIN(run::arrayAppend,"arrayAppend"); #line 794 "runarray.in" REGISTER_BLTIN(run::arrayPopHelper,"arrayPopHelper"); #line 803 "runarray.in" REGISTER_BLTIN(run::arrayPop,"arrayPop"); #line 809 "runarray.in" REGISTER_BLTIN(run::arrayInsertHelper,"arrayInsertHelper"); #line 820 "runarray.in" REGISTER_BLTIN(run::arrayInsert,"arrayInsert"); #line 826 "runarray.in" REGISTER_BLTIN(run::arrayDelete,"arrayDelete"); #line 832 "runarray.in" REGISTER_BLTIN(run::arrayAlias,"arrayAlias"); #line 837 "runarray.in" REGISTER_BLTIN(run::arrayIntArray,"arrayIntArray"); #line 855 "runarray.in" addFunc(ve, run::gen_runarray32, IntArray(), SYM(complement), formal(IntArray(), SYM(a), false, false), formal(primInt(), SYM(n), false, false)); #line 874 "runarray.in" REGISTER_BLTIN(run::arraySequence,"arraySequence"); #line 887 "runarray.in" addFunc(ve, run::gen_runarray34, IntArray(), SYM(sequence), formal(primInt(), SYM(n), false, false)); #line 898 "runarray.in" REGISTER_BLTIN(run::arrayFunction,"arrayFunction"); #line 911 "runarray.in" REGISTER_BLTIN(run::arraySort,"arraySort"); #line 920 "runarray.in" REGISTER_BLTIN(run::arraySearch,"arraySearch"); #line 939 "runarray.in" addFunc(ve, run::gen_runarray38, primBoolean(), SYM(all), formal(booleanArray(), SYM(a), false, false)); #line 948 "runarray.in" addFunc(ve, run::gen_runarray39, booleanArray(), SYM_LOGNOT, formal(booleanArray(), SYM(a), false, false)); #line 957 "runarray.in" addFunc(ve, run::gen_runarray40, primInt(), SYM(sum), formal(booleanArray(), SYM(a), false, false)); #line 966 "runarray.in" REGISTER_BLTIN(run::arrayConcat,"arrayConcat"); #line 994 "runarray.in" REGISTER_BLTIN(run::array2Transpose,"array2Transpose"); #line 1018 "runarray.in" REGISTER_BLTIN(run::array3Transpose,"array3Transpose"); #line 1105 "runarray.in" addFunc(ve, run::gen_runarray44, primInt(), SYM(find), formal(booleanArray(), SYM(a), false, false), formal(primInt(), SYM(n), true, false)); #line 1124 "runarray.in" REGISTER_BLTIN(run::arrayConditional,"arrayConditional"); #line 1150 "runarray.in" addFunc(ve, run::gen_runarray46, realArray2(), SYM(identity), formal(primInt(), SYM(n), false, false)); #line 1156 "runarray.in" addFunc(ve, run::gen_runarray47, realArray2(), SYM(inverse), formal(realArray2(), SYM(a), false, false)); #line 1168 "runarray.in" addFunc(ve, run::gen_runarray48, realArray(), SYM(solve), formal(realArray2(), SYM(a), false, false), formal(realArray(), SYM(b), false, false), formal(primBoolean(), SYM(warn), true, false)); #line 1221 "runarray.in" addFunc(ve, run::gen_runarray49, realArray2(), SYM(solve), formal(realArray2(), SYM(a), false, false), formal(realArray2(), SYM(b), false, false), formal(primBoolean(), SYM(warn), true, false)); #line 1286 "runarray.in" addFunc(ve, run::gen_runarray50, primReal(), SYM(determinant), formal(realArray2(), SYM(a), false, false)); #line 1303 "runarray.in" addFunc(ve, run::gen_runarray51, realArray(), SYM_TIMES, formal(realArray2(), SYM(a), false, false), formal(realArray(), SYM(b), false, false)); #line 1322 "runarray.in" addFunc(ve, run::gen_runarray52, realArray(), SYM_TIMES, formal(realArray(), SYM(a), false, false), formal(realArray2(), SYM(b), false, false)); #line 1351 "runarray.in" addFunc(ve, run::gen_runarray53, IntArray2(), SYM_TIMES, formal(IntArray2(), SYM(a), false, false), formal(IntArray2(), SYM(b), false, false)); #line 1356 "runarray.in" addFunc(ve, run::gen_runarray54, realArray2(), SYM_TIMES, formal(realArray2(), SYM(a), false, false), formal(realArray2(), SYM(b), false, false)); #line 1361 "runarray.in" addFunc(ve, run::gen_runarray55, pairArray2(), SYM_TIMES, formal(pairArray2(), SYM(a), false, false), formal(pairArray2(), SYM(b), false, false)); #line 1366 "runarray.in" addFunc(ve, run::gen_runarray56, primTriple(), SYM_TIMES, formal(realArray2(), SYM(t), false, false), formal(primTriple(), SYM(v), false, false)); #line 1371 "runarray.in" addFunc(ve, run::gen_runarray57, realArray2(), SYM(AtA), formal(realArray2(), SYM(a), false, false)); #line 1376 "runarray.in" addFunc(ve, run::gen_runarray58, primPair(), SYM(project), formal(primTriple(), SYM(v), false, false), formal(realArray2(), SYM(t), false, false)); #line 1401 "runarray.in" addFunc(ve, run::gen_runarray59, primReal(), SYM(dot), formal(realArray(), SYM(a), false, false), formal(realArray(), SYM(b), false, false)); #line 1411 "runarray.in" addFunc(ve, run::gen_runarray60, primPair(), SYM(dot), formal(pairArray(), SYM(a), false, false), formal(pairArray(), SYM(b), false, false)); #line 1421 "runarray.in" addFunc(ve, run::gen_runarray61, realArray(), SYM(tridiagonal), formal(realArray(), SYM(a), false, false), formal(realArray(), SYM(b), false, false), formal(realArray(), SYM(c), false, false), formal(realArray(), SYM(f), false, false)); #line 1525 "runarray.in" addFunc(ve, run::gen_runarray62, primReal(), SYM(newton), formal(primInt(), SYM(iterations), true, false), formal(realRealFunction(), SYM(f), false, false), formal(realRealFunction(), SYM(fprime), false, false), formal(primReal(), SYM(x), false, false), formal(primBoolean(), SYM(verbose), true, false)); #line 1572 "runarray.in" addFunc(ve, run::gen_runarray63, primReal(), SYM(newton), formal(primInt(), SYM(iterations), true, false), formal(realRealFunction(), SYM(f), false, false), formal(realRealFunction(), SYM(fprime), false, false), formal(primReal(), SYM(x1), false, false), formal(primReal(), SYM(x2), false, false), formal(primBoolean(), SYM(verbose), true, false)); #line 1654 "runarray.in" addFunc(ve, run::gen_runarray64, primReal(), SYM(_findroot), formal(realRealFunction(), SYM(f), false, false), formal(primReal(), SYM(a), false, false), formal(primReal(), SYM(b), false, false), formal(primReal(), SYM(tolerance), false, false), formal(primReal(), SYM(fa), false, false), formal(primReal(), SYM(fb), false, false)); #line 1756 "runarray.in" addFunc(ve, run::gen_runarray65, primReal(), SYM(simpson), formal(realRealFunction(), SYM(f), false, false), formal(primReal(), SYM(a), false, false), formal(primReal(), SYM(b), false, false), formal(primReal(), SYM(acc), true, false), formal(primReal(), SYM(dxmax), true, false)); #line 1770 "runarray.in" addFunc(ve, run::gen_runarray66, pairArray(), SYM(fft), formal(pairArray(), SYM(a), false, false), formal(primInt(), SYM(sign), true, false)); #line 1801 "runarray.in" addFunc(ve, run::gen_runarray67, IntArray2(), SYM(triangulate), formal(pairArray(), SYM(z), false, false)); #line 1836 "runarray.in" addFunc(ve, run::gen_runarray68, primReal(), SYM(norm), formal(realArray(), SYM(a), false, false)); #line 1847 "runarray.in" addFunc(ve, run::gen_runarray69, primReal(), SYM(norm), formal(realArray2(), SYM(a), false, false)); #line 1862 "runarray.in" addFunc(ve, run::gen_runarray70, primReal(), SYM(norm), formal(tripleArray2(), SYM(a), false, false)); #line 1877 "runarray.in" addFunc(ve, run::gen_runarray71, primReal(), SYM(change2), formal(tripleArray2(), SYM(a), false, false)); #line 1899 "runarray.in" addFunc(ve, run::gen_runarray72, primTriple(), SYM(minbezier), formal(tripleArray2(), SYM(p), false, false), formal(primTriple(), SYM(b), false, false)); #line 1911 "runarray.in" addFunc(ve, run::gen_runarray73, primTriple(), SYM(maxbezier), formal(tripleArray2(), SYM(p), false, false), formal(primTriple(), SYM(b), false, false)); #line 1923 "runarray.in" addFunc(ve, run::gen_runarray74, primPair(), SYM(minratio), formal(tripleArray2(), SYM(p), false, false), formal(primPair(), SYM(b), false, false)); #line 1935 "runarray.in" addFunc(ve, run::gen_runarray75, primPair(), SYM(maxratio), formal(tripleArray2(), SYM(p), false, false), formal(primPair(), SYM(b), false, false)); #line 1947 "runarray.in" addFunc(ve, run::gen_runarray76, realArray(), SYM(_projection)); } } // namespace trans ./asymptote-2.41/picture.h0000644000175000017500000000643313064427076015375 0ustar norbertnorbert/***** * picture.h * Andy Hamerlindl 2002/06/06 * * Stores a picture as a list of drawElements and handles its output to * PostScript. *****/ #ifndef PICTURE_H #define PICTURE_H #include #include #include "drawelement.h" namespace camp { class picture : public gc { private: bool labels; size_t lastnumber; size_t lastnumber3; transform T; // Keep track of accumulative picture transform bbox b; bbox b_cached; // Cached bounding box boxvector labelbounds; bboxlist bboxstack; bool transparency; groupsmap groups; unsigned billboard; public: bbox3 b3; // 3D bounding box typedef mem::list nodelist; nodelist nodes; picture() : labels(false), lastnumber(0), lastnumber3(0), T(identity), transparency(false) {} // Destroy all of the owned picture objects. ~picture(); // Prepend an object to the picture. void prepend(drawElement *p); // Append an object to the picture. void append(drawElement *p); // Enclose each layer with begin and end. void enclose(drawElement *begin, drawElement *end); // Add the content of another picture. void add(picture &pic); void prepend(picture &pic); bool havelabels(); bool have3D(); bbox bounds(); bbox3 bounds3(); // Compute bounds on ratio (x,y)/z for 3d picture (not cached). pair ratio(double (*m)(double, double)); bool Transparency() { return transparency; } int epstopdf(const string& epsname, const string& pdfname); int pdftoeps(const string& pdfname, const string& epsname); bool texprocess(const string& texname, const string& tempname, const string& prefix, const pair& bboxshift, bool svgformat); bool postprocess(const string& prename, const string& outname, const string& outputformat, double magnification, bool wait, bool view, bool pdftex, bool svgformat); // Ship the picture out to PostScript & TeX files. bool shipout(picture* preamble, const string& prefix, const string& format, double magnification=0.0, bool wait=false, bool view=true); void render(GLUnurbs *nurb, double size2, const triple &Min, const triple& Max, double perspective, bool lighton, bool transparent) const; bool shipout3(const string& prefix, const string& format, double width, double height, double angle, double zoom, const triple& m, const triple& M, const pair& shift, double *t, double *background, size_t nlights, triple *lights, double *diffuse, double *ambient, double *specular, bool viewportlighting, bool view); // PRC output bool shipout3(const string& prefix); bool reloadPDF(const string& Viewer, const string& outname) const; picture *transformed(const transform& t); picture *transformed(const vm::array& t); bool null() { return nodes.empty(); } }; inline picture *transformed(const transform& t, picture *p) { return p->transformed(t); } inline picture *transformed(const vm::array& t, picture *p) { return p->transformed(t); } void texinit(); int opentex(const string& texname, const string& prefix, bool dvi=false); const char *texpathmessage(); } //namespace camp #endif ./asymptote-2.41/flatguide.h0000644000175000017500000001020713064427076015660 0ustar norbertnorbert/***** * flatguide.h * Andy Hammerlindl 2005/02/23 * * The data structure that builds up a knotlist. This is done by calling in * order the methods to set knots, specifiers, and tensions. * Used by the guide solving routines. * * NOTE: figure out how nullpath{}..a should be handled. *****/ #ifndef FLATGUIDE_H #define FLATGUIDE_H #include "knot.h" #include "guideflags.h" namespace camp { class flatguide { // A cached solution of the path. When traversing through a tree of guides, // if a cycle tag is encountered, then the path is solved up to that point. // If the guide continues from there (which rarely occurs in practice), all of // the control points solved are added as control specifiers, and then solved // into a path again. In the (usual) case that a cycle ends a path, the // cached path avoids this second pass. bool solved; // Used by reverse(guide) to indicate the presence of an unresolved // interior cycle. bool precycle; path p; cvector nodes; // Information before the first knot. For a non-cyclic guide, this is // ignored. For a cyclic guide, it may be useful, but I can't determine a // sensible way to use it yet. tension tout; spec *out; // Information for the next knot to come. tension tin; spec *in; static spec open; tension& tref(side s) { switch (s) { case OUT: return nodes.empty() ? tout : nodes.back().tout; case IN: default: return tin; } } // Returns a reference to a spec* so that it may be assigned. spec*& sref(side s) { switch (s) { case OUT: return nodes.empty() ? out : nodes.back().out; case IN: default: return in; } } void addPre(path& p, Int j); void addPoint(path& p, Int j); void addPost(path& p, Int j); void clearNodes() { nodes.clear(); in=&open; tin=tension(); } void clearPath() { p=path(); solved=false; } void uncheckedAdd(path p, bool allowsolve=true); // Sets solved to false, indicating that the path has been updated since last // being solved. Also, copies a solved path back in as knots and control // specifiers, as it will have to be solved again. void update() { if (solved) { solved=false; clearNodes(); add(p); clearPath(); } } public: flatguide() : solved(true), precycle(false), p(), out(&open), in(&open) {} Int size() const { return (Int) nodes.size(); } knot Nodes(Int i) const { return nodes[i]; } void setTension(tension t, side s) { update(); tref(s)=t; } void setSpec(spec *p, side s) { assert(p); update(); spec *&ref=sref(s); // Control specifiers trump normal direction specifiers. if (!ref || !ref->controlled() || p->controlled()) ref=p; } void add(pair z) { update(); // Push the pair onto the vector as a knot, using the current in-specifier // and in-tension for the in side for the knot. Use default values for the // out side, as those will be set after the point is added. nodes.push_back(knot(z,in,&open,tin,tension())); // Reset the in-spec and in-tension to defaults; tin=tension(); in=&open; } // Reverts to an empty state. void add(path p, bool allowsolve=true) { update(); uncheckedAdd(p,allowsolve); } void clear() { clearNodes(); clearPath(); } void close() { if(!nodes.empty()) { nodes.front().in=in; nodes.front().tin=tin; } } void resolvecycle() { if(!nodes.empty()) nodes.push_back(nodes.front()); } void precyclic(bool b) { precycle=b; } bool precyclic() { return precycle; } // Once all information has been added, release the flat result. simpleknotlist list(bool cycles=false) { if(cycles && !nodes.empty()) close(); return simpleknotlist(nodes,cycles); } // Yield a path from the guide as represented here. path solve(bool cycles=false) { if (solved) return p; else { simpleknotlist l=list(cycles); p=camp::solve(l); solved=true; return p; } } }; } // namespace camp #endif // FLATGUIDE_H ./asymptote-2.41/primitives.h0000644000175000017500000000232213064427076016106 0ustar norbertnorbert/***** * primitives.h * Andy Hammerlindl 2007/04/27 * * A list of the primative types in Asymptote, defined using the * PRIMITIVE(name,Name,asyName) macro. This macro should be defined in by the * code including this file for the context at hand. * * name - the name of the type in C++ code ex: boolean * Name - the same name capitalized ex: Boolean * asyName - the name in Asymptote code ex: bool * *****/ // No ifndef because this file may be included multiple times in different // contexts. PRIMITIVE(void,Void,void) PRIMITIVE(inferred,Inferred,var) /* null is not a primitive type. */ #ifdef PRIMERROR PRIMITIVE(error,Error,) #endif PRIMITIVE(boolean,Boolean,bool) PRIMITIVE(Int,Int,int) PRIMITIVE(real,Real,real) PRIMITIVE(string,String,string) PRIMITIVE(pair,Pair,pair) PRIMITIVE(triple,Triple,triple) PRIMITIVE(transform,Transform,transform) PRIMITIVE(guide,Guide,guide) PRIMITIVE(path,Path,path) PRIMITIVE(path3,Path3,path3) PRIMITIVE(cycleToken,CycleToken,cycleToken) PRIMITIVE(tensionSpecifier,TensionSpecifier,tensionSpecifier) PRIMITIVE(curlSpecifier,CurlSpecifier,curlSpecifier) PRIMITIVE(pen,Pen,pen) PRIMITIVE(picture,Picture,frame) PRIMITIVE(file,File,file) PRIMITIVE(code,Code,code) ./asymptote-2.41/runmath.in0000644000175000017500000001131513064427076015552 0ustar norbertnorbert/***** * runmath.in * * Runtime functions for math operations. * *****/ pair => primPair() realarray* => realArray() pairarray* => pairArray() #include #include "mathop.h" #include "path.h" #ifdef __CYGWIN__ extern "C" double yn(int, double); extern "C" double jn(int, double); #endif using namespace camp; typedef array realarray; typedef array pairarray; using types::realArray; using types::pairArray; using run::integeroverflow; using vm::frame; const char *invalidargument="invalid argument"; extern uint32_t CLZ(uint32_t a); // Return the factorial of a non-negative integer using a lookup table. Int factorial(Int n) { static Int *table; static Int size=0; if(size == 0) { Int f=1; size=2; while(f <= Int_MAX/size) f *= (size++); table=new Int[size]; table[0]=f=1; for(Int i=1; i < size; ++i) { f *= i; table[i]=f; } } if(n >= size) integeroverflow(0); return table[n]; } static inline Int Round(double x) { return Int(x+((x >= 0) ? 0.5 : -0.5)); } inline Int sgn(double x) { return (x > 0.0 ? 1 : (x < 0.0 ? -1 : 0)); } static bool initializeRandom=true; void Srand(Int seed) { initializeRandom=false; const int n=256; static char state[n]; initstate(intcast(seed),state,n); } // Autogenerated routines: real ^(real x, Int y) { return pow(x,y); } pair ^(pair z, Int y) { return pow(z,y); } Int quotient(Int x, Int y) { return quotient()(x,y); } Int abs(Int x) { return Abs(x); } Int sgn(real x) { return sgn(x); } Int rand() { if(initializeRandom) Srand(1); return random(); } void srand(Int seed) { Srand(seed); } // a random number uniformly distributed in the interval [0,1] real unitrand() { return ((real) random())/RANDOM_MAX; } Int ceil(real x) { return Intcast(ceil(x)); } Int floor(real x) { return Intcast(floor(x)); } Int round(real x) { if(validInt(x)) return Round(x); integeroverflow(0); } Int Ceil(real x) { return Ceil(x); } Int Floor(real x) { return Floor(x); } Int Round(real x) { return Round(Intcap(x)); } real fmod(real x, real y) { if (y == 0.0) dividebyzero(); return fmod(x,y); } real atan2(real y, real x) { return atan2(y,x); } real hypot(real x, real y) { return hypot(x,y); } real remainder(real x, real y) { return remainder(x,y); } real Jn(Int n, real x) { return jn(n,x); } real Yn(Int n, real x) { return yn(n,x); } real erf(real x) { return erf(x); } real erfc(real x) { return erfc(x); } Int factorial(Int n) { if(n < 0) error(invalidargument); return factorial(n); } Int choose(Int n, Int k) { if(n < 0 || k < 0 || k > n) error(invalidargument); Int f=1; Int r=n-k; for(Int i=n; i > r; --i) { if(f > Int_MAX/i) integeroverflow(0); f=(f*i)/(n-i+1); } return f; } real gamma(real x) { #ifdef HAVE_TGAMMA return tgamma(x); #else real lg = lgamma(x); return signgam*exp(lg); #endif } realarray *quadraticroots(real a, real b, real c) { quadraticroots q(a,b,c); array *roots=new array(q.roots); if(q.roots >= 1) (*roots)[0]=q.t1; if(q.roots == 2) (*roots)[1]=q.t2; return roots; } pairarray *quadraticroots(explicit pair a, explicit pair b, explicit pair c) { Quadraticroots q(a,b,c); array *roots=new array(q.roots); if(q.roots >= 1) (*roots)[0]=q.z1; if(q.roots == 2) (*roots)[1]=q.z2; return roots; } realarray *cubicroots(real a, real b, real c, real d) { cubicroots q(a,b,c,d); array *roots=new array(q.roots); if(q.roots >= 1) (*roots)[0]=q.t1; if(q.roots >= 2) (*roots)[1]=q.t2; if(q.roots == 3) (*roots)[2]=q.t3; return roots; } // Logical operations bool !(bool b) { return !b; } bool :boolMemEq(frame *a, frame *b) { return a == b; } bool :boolMemNeq(frame *a, frame *b) { return a != b; } bool :boolFuncEq(callable *a, callable *b) { return a->compare(b); } bool :boolFuncNeq(callable *a, callable *b) { return !(a->compare(b)); } // Bit operations Int AND(Int a, Int b) { return a & b; } Int OR(Int a, Int b) { return a | b; } Int XOR(Int a, Int b) { return a ^ b; } Int NOT(Int a) { return ~a; } Int CLZ(Int a) { if((uint32_t) a > 0xFFFFFFFF) return -1; return CLZ((uint32_t) a); } Int CTZ(Int a) { if((uint32_t) a > 0xFFFFFFFF) return -1; #if __GNUC__ return __builtin_ctz(a); #else // find the number of trailing zeros in a 32-bit number static const int MultiplyDeBruijnBitPosition[32] = { 0, 1, 28, 2, 29, 14, 24, 3, 30, 22, 20, 15, 25, 17, 4, 8, 31, 27, 13, 23, 21, 19, 16, 7, 26, 12, 18, 6, 11, 5, 10, 9 }; return MultiplyDeBruijnBitPosition[((uint32_t)((a & -a) * 0x077CB531U)) >> 27]; #endif } ./asymptote-2.41/drawelement.h0000644000175000017500000002274013064427076016230 0ustar norbertnorbert/***** * drawelement.h * Andy Hammerlindl 2002/06/06 * * Abstract base class of any drawable item in camp. *****/ #ifndef DRAWELEMENT_H #define DRAWELEMENT_H #include #include "common.h" #include "bbox.h" #include "bbox3.h" #include "pen.h" #include "psfile.h" #include "texfile.h" #include "prcfile.h" #include "glrender.h" #include "arrayop.h" namespace camp { extern double T[3]; // z-component of current transform static const double pixel=1.0; // Adaptive rendering constant. // Return one-sixth of the second derivative of the Bezier curve defined // by a,b,c,d at 0. inline triple bezierPP(triple a, triple b, triple c) { return a+c-2.0*b; } // Return one-third of the third derivative of the Bezier curve defined by // a,b,c,d. inline triple bezierPPP(triple a, triple b, triple c, triple d) { return d-a+3.0*(b-c); } enum Interaction {EMBEDDED=0,BILLBOARD}; void copyArray4x4C(double*& dest, const vm::array *a); class box { pair p[4]; public: box() {} box(const pair& a, const pair& b, const pair& c, const pair& d) { p[0]=a; p[1]=b; p[2]=c; p[3]=d; } // Returns true if the line a--b intersects box b. bool intersect(const pair& a, const pair& b) const { for(Int i=0; i < 4; ++i) { pair A=p[i]; pair B=p[i < 3 ? i+1 : 0]; double de=(b.x-a.x)*(A.y-B.y)-(A.x-B.x)*(b.y-a.y); if(de != 0.0) { de=1.0/de; double t=((A.x-a.x)*(A.y-B.y)-(A.x-B.x)*(A.y-a.y))*de; double T=((b.x-a.x)*(A.y-a.y)-(A.x-a.x)*(b.y-a.y))*de; if(0 <= t && t <= 1 && 0 <= T && T <= 1) return true; } } return false; } pair operator [] (Int i) const {return p[i];} bool intersect(const box& b) const { for(Int i=0; i < 4; ++i) { pair A=b[i]; pair B=b[i < 3 ? i+1 : 0]; if(intersect(A,B)) return true; } return false; } // Returns true iff the point z lies in the region bounded by b. bool inside(const pair& z) const { bool c=false; for(Int i=0; i < 3; ++i) { pair pi=p[i]; pair pj=p[i < 3 ? i+1 : 0]; if(((pi.y <= z.y && z.y < pj.y) || (pj.y <= z.y && z.y < pi.y)) && z.x < pi.x+(pj.x-pi.x)*(z.y-pi.y)/(pj.y-pi.y)) c=!c; } return c; } double xmax() { return max(max(max(p[0].x,p[1].x),p[2].x),p[3].x); } double ymax() { return max(max(max(p[0].y,p[1].y),p[2].y),p[3].y); } double xmin() { return min(min(min(p[0].x,p[1].x),p[2].x),p[3].x); } double ymin() { return min(min(min(p[0].y,p[1].y),p[2].y),p[3].y); } }; typedef mem::vector boxvector; typedef mem::list bboxlist; typedef mem::map groupmap; typedef mem::vector groupsmap; class drawElement : public gc { public: virtual ~drawElement() {} static pen lastpen; static const triple zero; // Adjust the bbox of the picture based on the addition of this // element. The iopipestream is needed for determining label sizes. virtual void bounds(bbox&, iopipestream&, boxvector&, bboxlist&) {} virtual void bounds(const double*, bbox3&) {} virtual void bounds(bbox3& b) { bounds(NULL, b); } // Compute bounds on ratio (x,y)/z for 3d picture (not cached). virtual void ratio(const double *t, pair &b, double (*m)(double, double), double fuzz, bool &first) {} virtual void minratio(const double *t, pair &b, double fuzz, bool &first) { ratio(t, b, camp::min, fuzz, first); } virtual void maxratio(const double *t,pair &b, double fuzz, bool &first) { ratio(t, b, camp::max, fuzz, first); } virtual void ratio(pair &b, double (*m)(double, double), double fuzz, bool &first) { ratio(NULL, b, m, fuzz, first); } virtual void minratio(pair &b, double fuzz, bool &first) { minratio(NULL, b, fuzz, first); } virtual void maxratio(pair &b, double fuzz, bool &first) { maxratio(NULL, b, fuzz, first); } virtual bool islabel() {return false;} virtual bool islayer() {return false;} virtual bool is3D() {return false;} // Implement element as raw SVG code? virtual bool svg() {return false;} // Implement SVG element as png image? virtual bool svgpng() {return false;} virtual bool beginclip() {return false;} virtual bool endclip() {return false;} virtual bool begingroup() {return false;} virtual bool begingroup3() {return false;} virtual bool endgroup() {return false;} virtual bool endgroup3() {return false;} virtual const double* transf3() {return NULL;} virtual void save(bool b) {} // Output to a PostScript file virtual bool draw(psfile *) { return false; } // Output to a TeX file virtual bool write(texfile *, const bbox&) { return false; } // Output to a PRC file virtual bool write(prcfile *out, unsigned int *count, double compressionlimit, groupsmap& groups) { return false; } // Used to compute deviation of a surface from a quadrilateral. virtual void displacement() {} // Render with OpenGL virtual void render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent) {} // Transform as part of a picture. virtual drawElement *transformed(const transform&) { return this; } virtual drawElement *transformed(const double* t) { return this; } }; // Hold transform of an object. class drawElementLC : public virtual drawElement { public: double *T; // Keep track of accumulative picture transform drawElementLC() : T(NULL) {} drawElementLC(const double *t) : T(NULL) { copyTransform3(T,t); } drawElementLC(const vm::array& t) : T(NULL) { copyArray4x4C(T,&t); } drawElementLC(const double* t, const drawElementLC *s) : T(NULL) { multiplyTransform3(T,t,s->T); } virtual ~drawElementLC() {} virtual bool is3D() {return true;} virtual const double* transf3() {return T;} virtual drawElement* transformed(const double* t) { return new drawElementLC(t,this); } }; // Base class for drawElements that involve paths. class drawPathBase : public virtual drawElement { protected: path p; path transpath(const transform& t) const { return p.transformed(t); } public: drawPathBase() {} drawPathBase(path p) : p(p) {} virtual ~drawPathBase() {} virtual void bounds(bbox& b, iopipestream&, boxvector&, bboxlist&) { b += p.bounds(); } virtual void writepath(psfile *out,bool) { out->write(p); } virtual void writeclippath(psfile *out, bool newpath=true) { out->writeclip(p,newpath); } virtual void writeshiftedpath(texfile *out) { out->writeshifted(p); } }; // Base class for drawElements that involve paths and pens. class drawPathPenBase : public drawPathBase { protected: pen pentype; pen transpen(const transform& t) const { return camp::transformed(shiftless(t),pentype); } public: drawPathPenBase(path p, pen pentype) : drawPathBase(p), pentype(pentype) {} drawPathPenBase(pen pentype) : pentype(pentype) {} virtual bool empty() { return p.empty(); } virtual bool cyclic() { return p.cyclic(); } void strokebounds(bbox& b, const path& p); virtual void penSave(psfile *out) { if (!pentype.getTransform().isIdentity()) out->gsave(); } virtual void penTranslate(psfile *out) { out->translate(shiftpair(pentype.getTransform())); } virtual void penConcat(psfile *out) { out->concat(shiftless(pentype.getTransform())); } virtual void penRestore(psfile *out) { if (!pentype.getTransform().isIdentity()) out->grestore(); } }; // Base class for drawElements that involve superpaths and pens. class drawSuperPathPenBase : public drawPathPenBase { protected: vm::array P; size_t size; bbox bpath; vm::array transpath(const transform& t) const { vm::array *Pt=new vm::array(size); for(size_t i=0; i < size; i++) (*Pt)[i]=vm::read(P,i).transformed(t); return *Pt; } public: drawSuperPathPenBase(const vm::array& P, pen pentype) : drawPathPenBase(pentype), P(P), size(P.size()) {} bool empty() { for(size_t i=0; i < size; i++) if(vm::read(P,i).size() != 0) return false; return true; } bool cyclic() { for(size_t i=0; i < size; i++) if(!vm::read(P,i).cyclic()) return false; return true; } void bounds(bbox& b, iopipestream&, boxvector&, bboxlist&) { for(size_t i=0; i < size; i++) bpath += vm::read(P,i).bounds(); b += bpath; } void strokepath(psfile *out) { // strokepath and evenodd are incompatible static pen zerowinding=pen((FillRule) ZEROWINDING); pentype=pentype+zerowinding; out->setpen(pentype); out->strokepath(); } void strokebounds(bbox& b) { for(size_t i=0; i < size; i++) drawPathPenBase::strokebounds(bpath,vm::read(P,i)); b += bpath; } void writepath(psfile *out, bool newpath=true) { if(size > 0) out->write(vm::read(P,0),newpath); for(size_t i=1; i < size; i++) out->write(vm::read(P,i),false); } void writeclippath(psfile *out, bool newpath=true) { if(size > 0) out->writeclip(vm::read(P,0),newpath); for(size_t i=1; i < size; i++) out->writeclip(vm::read(P,i),false); } void writeshiftedpath(texfile *out) { for(size_t i=0; i < size; i++) out->writeshifted(vm::read(P,i),i == 0); } }; } GC_DECLARE_PTRFREE(camp::box); GC_DECLARE_PTRFREE(camp::drawElement); #endif ./asymptote-2.41/fpu.h0000644000175000017500000000121413064427076014504 0ustar norbertnorbert#ifndef FPU_H #define FPU_H #ifdef HAVE_FENV_H #ifdef _GNU_SOURCE #define HAVE_FEENABLEEXCEPT #endif #endif #ifdef HAVE_FEENABLEEXCEPT #include inline int fpu_exceptions() { int excepts=0; #ifdef FE_INVALID excepts |= FE_INVALID; #endif #ifdef FE_DIVBYZERO excepts |= FE_DIVBYZERO; #endif #ifdef FE_OVERFLOW excepts |= FE_OVERFLOW; #endif return excepts; } inline void fpu_trap(bool trap=true) { // Conditionally trap FPU exceptions on NaN, zero divide and overflow. if(trap) feenableexcept(fpu_exceptions()); else fedisableexcept(fpu_exceptions()); } #else inline void fpu_trap(bool=true) {} #endif #endif ./asymptote-2.41/coenv.h0000644000175000017500000000161413064427076015030 0ustar norbertnorbert/***** * coenv.h * Andy Hammerlindl 2004/11/18 * * Bundles the env and coder classes needed in translating the abstract syntax * tree. It also also implements some functions that involve both the env and * coder, such as implicitCast(). *****/ #ifndef COENV_H #define COENV_H #include "env.h" #include "coder.h" namespace trans { class coenv { public: coder &c; env &e; coenv(coder &c, env &e) : c(c), e(e) {} // This is used when an expression of type source needs to be an // expression of type target. // If it is allowed, the casting instructions (if any) will be added. // Otherwise, an appropriate error message will be printed. bool implicitCast(position pos, ty *target, ty *source); bool explicitCast(position pos, ty *target, ty *source); void add(protoenv &source, varEntry *qualifier) { e.add(source, qualifier, c); } }; } // namespace trans #endif ./asymptote-2.41/interact.cc0000644000175000017500000001153013064427076015663 0ustar norbertnorbert/***** * interact.cc * * The glue between the lexical analyzer and the readline library. *****/ #include #include #include #include #include #include #include #include #include #include #include "interact.h" #include "runhistory.h" #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) #include #include #endif #include "util.h" #include "errormsg.h" using namespace settings; namespace run { void init_readline(bool); } namespace interact { bool interactive=false; bool uptodate=true; int lines=0; bool query=false; bool tty=isatty(STDIN_FILENO); completer *currentCompleter=0; void setCompleter(completer *c) { currentCompleter=c; } char *call_completer(const char *text, int state) { return currentCompleter ? (*currentCompleter)(text, state) : 0; } #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) void init_completion() { rl_completion_entry_function=call_completer; rl_completion_append_character='\0'; // Don't add a space after a match. /* // Build a string containing all characters that separate words to be // completed. All characters that can't form part of an identifier are // treated as break characters. static char break_characters[128]; Int j=0; for (unsigned char c=9; c < 128; ++c) if (!isalnum(c) && c != '_') { break_characters[j]=c; ++j; } break_characters[j]='\0'; rl_completer_word_break_characters=break_characters; */ } #endif char *(*Readline)(const char *prompt); char *readverbatimline(const char *prompt) { if(!cin.good()) {cin.clear(); return NULL;} cout << prompt; string s; getline(cin,s); return StrdupMalloc(s); } FILE *fin=NULL; char *readpipeline(const char *prompt) { #if _POSIX_VERSION >= 200809L char *line=NULL; size_t n=0; return getline(&line,&n,fin) >= 0 ? line : NULL; #else const int max_size=256; static char buf[max_size]; ostringstream s; do { if(fgets(buf,max_size-1,fin) == NULL) break; s << buf; } while(buf[std::strlen(buf)-1] != '\n'); return StrdupMalloc(s.str()); #endif } void pre_readline() { int fd=intcast(settings::getSetting("inpipe")); if(fd >= 0) { if(!fin) fin=fdopen(fd,"r"); Readline=readpipeline; } else { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) if(tty) { Readline=readline; } else #endif Readline=readverbatimline; } } void init_interactive() { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) if(tty) { init_completion(); run::init_readline(getSetting("tabcompletion")); read_history(historyname.c_str()); } #endif } string simpleline(string prompt) { // Rebind tab key, as the setting tabcompletion may be changed at runtime. pre_readline(); Signal(SIGINT,SIG_IGN); // Get a line from the user. char *line=Readline(prompt.c_str()); Signal(SIGINT,interruptHandler); // Reset scroll count. interact::lines=0; interact::query=tty; // Ignore keyboard interrupts while taking input. errorstream::interrupt=false; if(line) { string s=line; free(line); return s; } else { cout << endl; if(!tty || getSetting("exitonEOF")) throw eof(); return "\n"; } } void addToHistory(string line) { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) // Only add it if it has something other than newlines. if(tty && line.find_first_not_of('\n') != string::npos) { add_history(line.c_str()); } #endif } string getLastHistoryLine() { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) if(tty && history_length > 0) { HIST_ENTRY *entry=history_list()[history_length-1]; if(!entry) { em.compiler(); em << "cannot access last history line"; return ""; } else return entry->line; } else #endif return ""; } void setLastHistoryLine(string line) { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) if(tty) { if (history_length > 0) { HIST_ENTRY *entry=remove_history(history_length-1); if(!entry) { em.compiler(); em << "cannot modify last history line"; } else { free(entry->line); free(entry); } } addToHistory(line); } #endif } void deleteLastLine() { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) if(tty) { HIST_ENTRY *entry=remove_history(history_length-1); if(!entry) { em.compiler(); em << "cannot delete last history line"; } else { free(entry->line); free(entry); } } #endif } void cleanup_interactive() { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) // Write the history file. if(tty) { stifle_history(intcast(getSetting("historylines"))); write_history(historyname.c_str()); } #endif } } // namespace interact ./asymptote-2.41/coder.h0000644000175000017500000002661213064427076015017 0ustar norbertnorbert/***** * coder.h * Andy Hammerlindl 2004/11/06 * * Handles encoding of syntax into programs. It's methods are called by * abstract syntax objects during translation to construct the virtual machine * code. *****/ #ifndef CODER_H #define CODER_H #include "errormsg.h" #include "entry.h" #include "types.h" #include "record.h" #include "frame.h" #include "program.h" #include "util.h" #include "modifier.h" #include "inst.h" namespace trans { using sym::symbol; using types::ty; using types::function; using types::record; using vm::bltin; using vm::inst; using vm::item; #ifdef DEBUG_BLTIN void assertBltinLookup(inst::opcode op, item it); #endif // Labels used by the coder class to denote where in the code a jump // instruction should go to. Label can be used before their exact location is // known. // Declared outside of the coder class, so that it can be declared in exp.h. struct label_t : public gc { vm::program::label location; vm::program::label firstUse; // Most labels are used only once, and so we optimize for that case. We do, // however, have to handle labels which are used multiple times (such as // break locations in a loop), and so a useVector is allocated to store // these if necessary. typedef mem::vector useVector; useVector *moreUses; // Only the constructor is defined. Everything else is handles by methods // of the coder class. label_t() : location(), firstUse(), moreUses(0) {} }; typedef label_t *label; class coder { // The frame of the function we are currently encoding. This keeps // track of local variables, and parameters with respect to the stack. frame *level; // The frame of the enclosing record that the "this" expression yields. ie. // the highest frame that is a record, not a function. frame *recordLevel; // The type of the enclosing record. Also needed for the "this" expression. record *recordType; // Are we translating a codelet? bool isCodelet; // The lambda being constructed. In some cases, this lambda is needed // before full translation of the function, so it is stored, // incomplete, here. vm::lambda *l; // The type of the function being translated. const function *funtype; // The enclosing environment. Null if this is a file-level module. coder *parent; // The mode of encoding, either static or dynamic. sord is used as an // acronym for Static OR Dynamic. // Once something is static, no amount of dynamic modifiers can change // that, so once a stack is EXPLICIT_STATIC, additional modifiers will // be pushed on as EXPLICIT_STATIC. modifier sord; std::stack sord_stack; // What permissions will be given to a new access. // TODO: Ensure private fields don't show up calling lookup for a // record. permission perm; // The function code as its being written. Code points to next place in // array to write. vm::program *program; // Some loops allocate nested frames, in case variables in an // iteration escape in a closure. This stack keeps track of where the // pushframe instructions are, so the size of the frame can be encoded. std::stack pushframeLabels; // Loops need to store labels to where break and continue statements // should pass control. Since loops can be nested, this needs to // be stored as a stack. We also store which of the loops are being encoded // with an additional frame for variables. This is needed to know if the // break and continue statements need to pop the frame. struct loopdata_t : gc { label continueLabel; label breakLabel; bool pushedFrame; loopdata_t(label c, label b) : continueLabel(c), breakLabel(b), pushedFrame(false) {} }; mem::stack loopdata; // Current File Position position curPos; public: // Define a new function coder. If reframe is true, this gives the function // its own frame, which is the usual (sensible) thing to do. It is set to // false for a line-at-a-time codelet, where variables should be allocated in // the lower frame. coder(position pos, string name, function *t, coder *parent, modifier sord = DEFAULT_DYNAMIC, bool reframe=true); // Start encoding the body of the record. The function being encoded // is the record's initializer. coder(position pos, record *t, coder *parent, modifier sord = DEFAULT_DYNAMIC); coder(position pos, string name, modifier sord = DEFAULT_DYNAMIC); coder(const coder&); /* Add a static or dynamic modifier. */ void pushModifier(modifier s) { /* Default setting should only be used in the constructor. */ assert(s != DEFAULT_STATIC && s != DEFAULT_DYNAMIC); /* Non-default static overrules. */ if (sord != EXPLICIT_STATIC) sord = s; sord_stack.push(sord); } /* Tests if encoding mode is currently static. */ bool isStatic() { switch(sord) { case DEFAULT_STATIC: case EXPLICIT_STATIC: return true; case DEFAULT_DYNAMIC: case EXPLICIT_DYNAMIC: return false; default: assert(False); return false; } } /* Remove a modifier. */ void popModifier() { assert(!sord_stack.empty()); sord_stack.pop(); assert(!sord_stack.empty()); sord = sord_stack.top(); } /* Set/get/clear permissions. */ void setPermission(permission p) { perm = p; } permission getPermission() { return perm; } void clearPermission() { perm = DEFAULT_PERM; } // Says what the return type of the function is. ty *getReturnType() { return funtype->result; } bool isRecord(); // Creates a new coder to handle the translation of a new function. coder newFunction(position pos, string name, function *t, modifier sord=DEFAULT_DYNAMIC); // Creates a new record type. record *newRecord(symbol id); // Create a coder for the initializer of the record. coder newRecordInit(position pos, record *r, modifier sord=DEFAULT_DYNAMIC); // Create a coder for translating a small piece of code. Used for // line-at-a-time mode. coder newCodelet(position pos); frame *getFrame() { if (isStatic() && !isTopLevel()) { assert(parent->getFrame()); return parent->getFrame(); } else return level; } // Tests if the function or record with the given frame is currently under // translation (either by this coder or an ancestor). bool inTranslation(frame *f) { frame *level=this->level; while (level) { if (f==level) return true; level=level->getParent(); } return parent && parent->inTranslation(f); } // Allocates space in the function or record frame for a new local variable. access *allocLocal() { return getFrame()->allocLocal(); } // Get the access in the frame for a specified formal parameter. access *accessFormal(Int index) { // NOTE: This hasn't been extended to handle frames for loops, but is // currently only called when starting to translate a function, where there // can be no loops. return level->accessFormal(index); } // Checks if we are at the top level, which is true for a file-level module or // a codelet. bool isTopLevel() { return parent==0 || isCodelet; } // The encode functions add instructions and operands on to the code array. private: void encode(inst i) { i.pos = curPos; // Static code is put into the enclosing coder, unless we are translating a // codelet. if (isStatic() && !isTopLevel()) { assert(parent); parent->encode(i); } else { program->encode(i); } } // Encode a jump to a not yet known location. vm::program::label encodeEmptyJump(inst::opcode op); public: void encode(inst::opcode op) { inst i; i.op = op; i.pos = nullPos; encode(i); } void encode(inst::opcode op, item it) { #ifdef DEBUG_BLTIN assertBltinLookup(op, it); #endif inst i; i.op = op; i.pos = nullPos; i.ref = it; encode(i); } // Encodes a pop instruction, or merges the pop into the previous // instruction (ex. varsave+pop becomes varpop). void encodePop(); // Puts the requested frame on the stack. If the frame is not that of // this coder or its ancestors, false is returned. bool encode(frame *f); // Puts the frame corresponding to the expression "this" on the stack. bool encodeThis() { assert(recordLevel); return encode(recordLevel); } // An access that encodes the frame corresponding to "this". access *thisLocation() { assert(recordLevel); return new frameAccess(recordLevel); } // Returns the type of the enclosing record. record *thisType() { return recordType; } // Puts the 'dest' frame on the stack, assuming the frame 'top' is on // top of the stack. If 'dest' is not an ancestor frame of 'top', // false is returned. bool encode(frame *dest, frame *top); // Assigns a handle to the current point in the list of bytecode // instructions and returns that handle. label defNewLabel(); // Sets the handle given by label to the current point in the list of // instructions. label defLabel(label label); // Encodes the address pointed to by the handle label into the // sequence of instructions. This is useful for a jump instruction to // jump to where a label was defined. void useLabel(inst::opcode op, label label); // If an address has to be used for a jump instruction before it is // actually encoded, a handle can be given to it by this function. // When that handle's label is later defined, the proper address will // be inserted into the code where the handle was used. label fwdLabel(); void pushLoop(label c, label b) { loopdata.push(loopdata_t(c,b)); } void popLoop() { loopdata.pop(); } void loopPushesFrame() { assert(!loopdata.empty()); loopdata_t& d = loopdata.top(); d.pushedFrame = true; } bool encodeBreak() { if (loopdata.empty()) return false; else { loopdata_t& d = loopdata.top(); if (d.pushedFrame) encode(inst::popframe); useLabel(inst::jmp,d.breakLabel); return true; } } bool encodeContinue() { if (loopdata.empty()) return false; else { loopdata_t& d = loopdata.top(); if (d.pushedFrame) encode(inst::popframe); useLabel(inst::jmp,d.continueLabel); return true; } } // Returns true if a pushclosure has been encoded since the definition of // the label. bool usesClosureSinceLabel(label l); // Turn a no-op into a jump to bypass incorrect code. void encodePatch(label from, label to); public: void encodePushFrame() { pushframeLabels.push(program->end()); encode(inst::pushframe, (Int)0); level = new frame("encodePushFrame", level, 0); } void encodePopFrame() { pushframeLabels.top()->ref = level->size(); pushframeLabels.pop(); encode(inst::popframe); level = level->getParent(); } // Adds an entry into the position list, linking the given point in the // source code to the current position in the virtual machine code. This is // used to print positions at runtime. void markPos(position pos); // When translation of the function is finished, this ties up loose ends // and returns the lambda. vm::lambda *close(); // Finishes translating the initializer of a record. void closeRecord(); private: // Non-copyable void operator=(const coder&); }; } // namespace trans #endif ./asymptote-2.41/picture.cc0000644000175000017500000011045013064427076015526 0ustar norbertnorbert/***** * picture.cc * Andy Hammerlindl 2002/06/06 * * Stores a picture as a list of drawElements and handles its output to * PostScript. *****/ #include "errormsg.h" #include "picture.h" #include "util.h" #include "settings.h" #include "interact.h" #include "drawverbatim.h" #include "drawlabel.h" #include "drawlayer.h" #include "drawsurface.h" using std::ifstream; using std::ofstream; using vm::array; using namespace settings; using namespace gl; texstream::~texstream() { string texengine=getSetting("tex"); bool context=settings::context(texengine); string name; if(!context) name=stripFile(outname()); name += "texput."; unlink((name+"aux").c_str()); unlink((name+"log").c_str()); unlink((name+"out").c_str()); if(settings::pdf(texengine)) { unlink((name+"pdf").c_str()); unlink((name+"m9").c_str()); } else unlink((name+"pbsdat").c_str()); if(context) { unlink("cont-new.log"); unlink((name+"tex").c_str()); unlink((name+"top").c_str()); unlink((name+"tua").c_str()); unlink((name+"tui").c_str()); } } namespace camp { extern void draw(); bool isIdTransform3(const double* t) { return (t == NULL || (t[0]==1 && t[1]==0 && t[2]==0 && t[3]==0 && t[4]==0 && t[5]==1 && t[6]==0 && t[7]==0 && t[8]==0 && t[9]==0 && t[10]==1 && t[11]==0 && t[12]==0 && t[13]==0 && t[14]==0 && t[15]==1)); } // copy array to 4x4 transform matrix with range checks void copyArray4x4C(double*& dest, const vm::array *a) { double tt[16]; const size_t n=checkArray(a); const string fourbyfour="4x4 array of doubles expected"; if(n != 4) reportError(fourbyfour); for(size_t i=0; i < 4; i++) { const vm::array *ai=vm::read(a,i); const size_t aisize=checkArray(ai); double *tti=tt+4*i; if(aisize == 4) { for(size_t j=0; j < 4; j++) tti[j]=vm::read(ai,j); } else reportError(fourbyfour); } copyTransform3(dest,tt); } void copyTransform3(double*& d, const double* s, GCPlacement placement) { if(s != NULL) { if(d == NULL) d=placement == NoGC ? new double[16] : new(placement) double[16]; memcpy(d,s,sizeof(double)*16); } } // t = s*r void multiplyTransform3(double*& t, const double* s, const double* r) { if(isIdTransform3(s)) { copyTransform3(t,r); } else if(isIdTransform3(r)) { copyTransform3(t,s); } else { t=new(UseGC) double[16]; for(size_t i=0; i < 4; i++) { size_t i4=4*i; const double *si=s+i4; const double& s0=si[0]; const double& s1=si[1]; const double& s2=si[2]; const double& s3=si[3]; double *ti=t+i4; ti[0]=s0*r[0]+s1*r[4]+s2*r[8]+s3*r[12]; ti[1]=s0*r[1]+s1*r[5]+s2*r[9]+s3*r[13]; ti[2]=s0*r[2]+s1*r[6]+s2*r[10]+s3*r[14]; ti[3]=s0*r[3]+s1*r[7]+s2*r[11]+s3*r[15]; } } } double xratio(const triple& v) {return v.getx()/v.getz();} double yratio(const triple& v) {return v.gety()/v.getz();} class matrixstack { mem::stack mstack; public: // return current transform const double* T() const { if(mstack.empty()) return NULL; else return mstack.top(); } // we store the accumulated transform of all pushed transforms void push(const double *r) { double* T3 = NULL; multiplyTransform3(T3,T(),r); mstack.push(T3); } void pop() { if(!mstack.empty()) mstack.pop(); } }; const char *texpathmessage() { ostringstream buf; buf << "the directory containing your " << getSetting("tex") << " engine (" << texcommand() << ")"; return Strdup(buf.str()); } picture::~picture() { } void picture::enclose(drawElement *begin, drawElement *end) { assert(begin); assert(end); nodes.push_front(begin); lastnumber=0; lastnumber3=0; for(nodelist::iterator p=nodes.begin(); p != nodes.end(); ++p) { assert(*p); if((*p)->islayer()) { nodes.insert(p,end); ++p; while(p != nodes.end() && (*p)->islayer()) ++p; if(p == nodes.end()) return; nodes.insert(p,begin); } } nodes.push_back(end); } // Insert at beginning of picture. void picture::prepend(drawElement *p) { assert(p); nodes.push_front(p); lastnumber=0; lastnumber3=0; } void picture::append(drawElement *p) { assert(p); nodes.push_back(p); } void picture::add(picture &pic) { if (&pic == this) return; // STL's funny way of copying one list into another. copy(pic.nodes.begin(), pic.nodes.end(), back_inserter(nodes)); } // Insert picture pic at beginning of picture. void picture::prepend(picture &pic) { if (&pic == this) return; copy(pic.nodes.begin(), pic.nodes.end(), inserter(nodes, nodes.begin())); lastnumber=0; lastnumber3=0; } bool picture::havelabels() { size_t n=nodes.size(); if(n > lastnumber && !labels && getSetting("tex") != "none") { // Check to see if there are any labels yet nodelist::iterator p=nodes.begin(); for(size_t i=0; i < lastnumber; ++i) ++p; for(; p != nodes.end(); ++p) { assert(*p); if((*p)->islabel()) { labels=true; break; } } } return labels; } bool picture::have3D() { for(nodelist::iterator p=nodes.begin(); p != nodes.end(); ++p) { assert(*p); if((*p)->is3D()) return true; } return false; } bbox picture::bounds() { size_t n=nodes.size(); if(n == lastnumber) return b_cached; if(lastnumber == 0) { // Maybe these should be put into a structure. b_cached=bbox(); labelbounds.clear(); bboxstack.clear(); } if(havelabels()) texinit(); nodelist::iterator p=nodes.begin(); for(size_t i=0; i < lastnumber; ++i) ++p; for(; p != nodes.end(); ++p) { assert(*p); (*p)->bounds(b_cached,processData().tex,labelbounds,bboxstack); // Optimization for interpreters with fixed stack limits. if((*p)->endclip()) { nodelist::iterator q=p; if(q != nodes.begin()) { --q; assert(*q); if((*q)->endclip()) (*q)->save(false); } } } lastnumber=n; return b_cached; } bbox3 picture::bounds3() { size_t n=nodes.size(); if(n == lastnumber3) return b3; if(lastnumber3 == 0) b3=bbox3(); matrixstack ms; size_t i=0; for(nodelist::const_iterator p=nodes.begin(); p != nodes.end(); ++p) { assert(*p); if((*p)->begingroup3()) ms.push((*p)->transf3()); else if((*p)->endgroup3()) ms.pop(); else (*p)->bounds(ms.T(),b3); i++; } lastnumber3=n; return b3; } pair picture::ratio(double (*m)(double, double)) { bool first=true; pair b; bounds3(); double fuzz=sqrtFuzz*(b3.Max()-b3.Min()).length(); matrixstack ms; for(nodelist::const_iterator p=nodes.begin(); p != nodes.end(); ++p) { assert(*p); if((*p)->begingroup3()) ms.push((*p)->transf3()); else if((*p)->endgroup3()) ms.pop(); else (*p)->ratio(ms.T(),b,m,fuzz,first); } return b; } void texinit() { drawElement::lastpen=pen(initialpen); processDataStruct &pd=processData(); // Output any new texpreamble commands if(pd.tex.isopen()) { if(pd.TeXpipepreamble.empty()) return; texpreamble(pd.tex,pd.TeXpipepreamble,false); pd.TeXpipepreamble.clear(); return; } bool context=settings::context(getSetting("tex")); string dir=stripFile(outname()); string logname; if(!context) logname=dir; logname += "texput.log"; const char *cname=logname.c_str(); ofstream writeable(cname); if(!writeable) reportError("Cannot write to "+logname); else writeable.close(); unlink(cname); mem::vector cmd; cmd.push_back(texprogram()); if(context) { cmd.push_back("--pipe"); } else { if(!dir.empty()) cmd.push_back("-output-directory="+dir.substr(0,dir.length()-1)); if(getSetting("inlineimage") || getSetting("inlinetex")) { string name=stripDir(stripExt((outname()))); size_t pos=name.rfind("-"); if(pos < string::npos) { name=stripExt(name).substr(0,pos); unlink((name+".aux").c_str()); cmd.push_back("-jobname="+name.substr(0,pos)); #ifdef __MSDOS__ cmd.push_back("NUL"); // For MikTeX #endif } } cmd.push_back("\\scrollmode"); } pd.tex.open(cmd,"texpath",texpathmessage()); pd.tex.wait("\n*"); pd.tex << "\n"; texdocumentclass(pd.tex,true); texdefines(pd.tex,pd.TeXpreamble,true); pd.TeXpipepreamble.clear(); } int opentex(const string& texname, const string& prefix, bool dvi) { string aux=auxname(prefix,"aux"); unlink(aux.c_str()); bool context=settings::context(getSetting("tex")); mem::vector cmd; cmd.push_back(texprogram()); if(dvi) cmd.push_back("-output-format=dvi"); if(context) { cmd.push_back("--nonstopmode"); cmd.push_back(texname); } else { string dir=stripFile(texname); if(!dir.empty()) cmd.push_back("-output-directory="+dir.substr(0,dir.length()-1)); cmd.push_back("\\nonstopmode\\input"); cmd.push_back(stripDir(texname)); } bool quiet=verbose <= 1; int status=System(cmd,quiet ? 1 : 0,true,"texpath",texpathmessage()); if(!status && getSetting("twice")) status=System(cmd,quiet ? 1 : 0,true,"texpath",texpathmessage()); if(status) { if(quiet) { cmd[1]=context ? "--scrollmode" : "\\scrollmode\\input"; System(cmd,0); } } return status; } bool picture::texprocess(const string& texname, const string& outname, const string& prefix, const pair& bboxshift, bool svgformat) { int status=1; ifstream outfile; outfile.open(texname.c_str()); bool keep=getSetting("keep"); if(outfile) { outfile.close(); status=opentex(texname,prefix); string texengine=getSetting("tex"); if(status == 0) { string dviname=auxname(prefix,"dvi"); mem::vector cmd; if(svgformat) { cmd.push_back(getSetting("dvisvgm")); cmd.push_back("-n"); cmd.push_back("--verbosity=3"); string libgs=getSetting("libgs"); if(!libgs.empty()) cmd.push_back("--libgs="+libgs); push_split(cmd,getSetting("dvisvgmOptions")); cmd.push_back("-o"+outname); ostringstream buf; bbox B=b; B.shift(bboxshift+pair(1.99*cm,1.9*cm)); buf << "--bbox=" << B.left << "bp " << B.bottom << "bp " << B.right << "bp " << B.top << "bp"; cmd.push_back(buf.str()); cmd.push_back(dviname); status=System(cmd,0,true,"dvisvgm"); if(!keep) unlink(dviname.c_str()); } else { if(!settings::pdf(texengine)) { string psname=auxname(prefix,"ps"); double height=b.top-b.bottom+1.0; // Magic dvips offsets: double hoffset=-128.4; double vertical=height; if(!latex(texengine)) vertical += 2.0; double voffset=(vertical < 13.0) ? -137.8+vertical : -124.8; double paperHeight=getSetting("paperheight"); hoffset += b.left+bboxshift.getx(); voffset += paperHeight-height-b.bottom-bboxshift.gety(); string dvipsrc=getSetting("dir"); if(dvipsrc.empty()) dvipsrc=systemDir; dvipsrc += dirsep+"nopapersize.ps"; setenv("DVIPSRC",dvipsrc.c_str(),1); string papertype=getSetting("papertype") == "letter" ? "letterSize" : "a4size"; cmd.push_back(getSetting("dvips")); cmd.push_back("-R"); cmd.push_back("-Pdownload35"); cmd.push_back("-D600"); cmd.push_back("-O"+String(hoffset)+"bp,"+String(voffset)+"bp"); cmd.push_back("-T"+String(getSetting("paperwidth"))+"bp,"+ String(paperHeight)+"bp"); push_split(cmd,getSetting("dvipsOptions")); if(getSetting("papertype") != "") cmd.push_back("-t"+papertype); if(verbose <= 1) cmd.push_back("-q"); cmd.push_back("-o"+psname); cmd.push_back(dviname); status=System(cmd,0,true,"dvips"); if(status == 0) { ifstream fin(psname.c_str()); psfile fout(outname,false); string s; bool first=true; transform t=shift(bboxshift)*T; bool shift=!t.isIdentity(); const string beginspecial="TeXDict begin @defspecial"; const size_t beginlength=beginspecial.size(); const string endspecial="@fedspecial end"; const size_t endlength=endspecial.size(); while(getline(fin,s)) { if (s[0] == '%') { if (s.find("%%DocumentPaperSizes:") == 0) continue; if(s.find("%!PS-Adobe-") == 0) { fout.header(); continue; } if (first && s.find("%%BoundingBox:") == 0) { bbox box=b; box.shift(bboxshift); if(verbose > 2) BoundingBox(cout,box); fout.BoundingBox(box); first=false; continue; } } if (shift) { if (s.compare(0, beginlength, beginspecial) == 0) { fout.verbatimline(s); fout.gsave(); fout.concat(t); continue; } if (s.compare(0, endlength, endspecial) == 0) { fout.grestore(); fout.verbatimline(s); continue; } } // For the default line, output it unchanged. fout.verbatimline(s); } } if(!keep) { unlink(dviname.c_str()); unlink(psname.c_str()); } } } } if(!keep) { unlink(texname.c_str()); if(!getSetting("keepaux")) unlink(auxname(prefix,"aux").c_str()); unlink(auxname(prefix,"log").c_str()); unlink(auxname(prefix,"out").c_str()); if(settings::context(texengine)) { unlink(auxname(prefix,"top").c_str()); unlink(auxname(prefix,"tua").c_str()); unlink(auxname(prefix,"tuc").c_str()); unlink(auxname(prefix,"tui").c_str()); unlink(auxname(prefix,"tuo").c_str()); } } if(status == 0) return true; } return false; } int picture::epstopdf(const string& epsname, const string& pdfname) { mem::vector cmd; cmd.push_back(getSetting("gs")); cmd.push_back("-q"); cmd.push_back("-dNOPAUSE"); cmd.push_back("-dBATCH"); cmd.push_back("-P"); if(safe) cmd.push_back("-dSAFER"); cmd.push_back("-sDEVICE=pdfwrite"); cmd.push_back("-dEPSCrop"); cmd.push_back("-dSubsetFonts=true"); cmd.push_back("-dEmbedAllFonts=true"); cmd.push_back("-dMaxSubsetPct=100"); cmd.push_back("-dPDFSETTINGS=/prepress"); cmd.push_back("-dCompatibilityLevel=1.4"); if(!getSetting("autorotate")) cmd.push_back("-dAutoRotatePages=/None"); cmd.push_back("-g"+String(max(ceil(getSetting("paperwidth")),1.0)) +"x"+String(max(ceil(getSetting("paperheight")),1.0))); cmd.push_back("-dDEVICEWIDTHPOINTS="+String(max(b.right-b.left,3.0))); cmd.push_back("-dDEVICEHEIGHTPOINTS="+String(max(b.top-b.bottom,3.0))); push_split(cmd,getSetting("gsOptions")); cmd.push_back("-sOutputFile="+stripDir(pdfname)); cmd.push_back(stripDir(epsname)); char *oldPath=NULL; string dir=stripFile(pdfname); if(!dir.empty()) { oldPath=getPath(); setPath(dir.c_str()); } int status=System(cmd,0,true,"gs","Ghostscript"); if(oldPath != NULL) setPath(oldPath); return status; } int picture::pdftoeps(const string& pdfname, const string& epsname) { mem::vector cmd; cmd.push_back(getSetting("gs")); cmd.push_back("-q"); cmd.push_back("-dNOCACHE"); cmd.push_back("-dNOPAUSE"); cmd.push_back("-dBATCH"); cmd.push_back("-P"); if(safe) cmd.push_back("-dSAFER"); string texengine=getSetting("tex"); cmd.push_back("-sDEVICE="+getSetting("epsdriver")); cmd.push_back("-sOutputFile="+stripDir(epsname)); cmd.push_back(stripDir(pdfname)); char *oldPath=NULL; string dir=stripFile(epsname); if(!dir.empty()) { oldPath=getPath(); setPath(dir.c_str()); } int status=System(cmd,0,true,"gs","Ghostscript"); if(oldPath != NULL) setPath(oldPath); return status; } bool picture::reloadPDF(const string& Viewer, const string& outname) const { static bool needReload=true; static bool haveReload=false; // Send javascript code to redraw picture. picture f; string name=getPath()+string("/")+outname; f.append(new drawVerbatim(TeX,"\\ \\pdfannot width 0pt height 0pt { /AA << /PO << /S /JavaScript /JS (try{reload('"+ name+"');} catch(e) {} closeDoc(this);) >> >> }")); string reloadprefix="reload"; if(needReload) { needReload=false; string texengine=getSetting("tex"); Setting("tex")=string("pdflatex"); haveReload=f.shipout(NULL,reloadprefix,"pdf",0.0,false,false); Setting("tex")=texengine; } if(haveReload) { mem::vector cmd; push_command(cmd,Viewer); string pdfreloadOptions=getSetting("pdfreloadOptions"); if(!pdfreloadOptions.empty()) cmd.push_back(pdfreloadOptions); cmd.push_back(reloadprefix+".pdf"); System(cmd,0,false); } return true; } bool picture::postprocess(const string& prename, const string& outname, const string& outputformat, double magnification, bool wait, bool view, bool pdftex, bool svgformat) { static mem::map pids; int status=0; bool epsformat=outputformat == "eps"; bool pdfformat=(settings::pdf(getSetting("tex")) && outputformat == "") || outputformat == "pdf"; if(pdftex || !epsformat) { if(pdfformat) { if(pdftex) { status=rename(prename.c_str(),outname.c_str()); if(status != 0) reportError("Cannot rename "+prename+" to "+outname); } else status=epstopdf(prename,outname); } else if(epsformat) { status=pdftoeps(prename,outname); } else { mem::vector cmd; double render=fabs(getSetting("render")); if(render == 0) render=1.0; double res=render*72.0; Int antialias=getSetting("antialias"); if(outputformat == "png" && antialias == 2) { cmd.push_back(getSetting("gs")); cmd.push_back("-q"); cmd.push_back("-dNOPAUSE"); cmd.push_back("-dBATCH"); cmd.push_back("-P"); cmd.push_back("-sDEVICE=pngalpha"); cmd.push_back("-dEPSCrop"); if(safe) cmd.push_back("-dSAFER"); cmd.push_back("-r"+String(res)+"x"+String(res)); push_split(cmd,getSetting("gsOptions")); cmd.push_back("-sOutputFile="+outname); cmd.push_back(prename); status=System(cmd,0,true,"gs","Ghostscript"); } else if(!svgformat) { double expand=antialias; if(expand < 2.0) expand=1.0; res *= expand; cmd.push_back(getSetting("convert")); cmd.push_back("-density"); cmd.push_back(String(res)+"x"+String(res)); if(expand == 1.0) cmd.push_back("+antialias"); push_split(cmd,getSetting("convertOptions")); cmd.push_back("-resize"); cmd.push_back(String(100.0/expand)+"%x"); if(outputformat == "jpg") cmd.push_back("-flatten"); cmd.push_back(nativeformat()+":"+prename); cmd.push_back(outputformat+":"+outname); status=System(cmd,0,true,"convert"); } } if(!getSetting("keep")) unlink(prename.c_str()); } if(status != 0) return false; if(verbose > 0) cout << "Wrote " << outname << endl; bool View=settings::view() && view; if(View) { if(epsformat || pdfformat) { // Check to see if there is an existing viewer for this outname. mem::map::iterator p=pids.find(outname); bool running=(p != pids.end()); string Viewer=pdfformat ? getSetting("pdfviewer") : getSetting("psviewer"); int pid; if(running) { pid=p->second; if(pid) running=(waitpid(pid, &status, WNOHANG) != pid); } bool pdfreload=pdfformat && getSetting("pdfreload"); if(running) { // Tell gv/acroread to reread file. if(Viewer == "gv") kill(pid,SIGHUP); else if(pdfreload) reloadPDF(Viewer,outname); } else { mem::vector cmd; push_command(cmd,Viewer); string viewerOptions=getSetting(pdfformat ? "pdfviewerOptions" : "psviewerOptions"); if(!viewerOptions.empty()) push_split(cmd,viewerOptions); cmd.push_back(outname); status=System(cmd,0,wait, pdfformat ? "pdfviewer" : "psviewer", pdfformat ? "your PDF viewer" : "your PostScript viewer", &pid); if(status != 0) return false; if(!wait) pids[outname]=pid; if(pdfreload) { // Work around race conditions in acroread initialization script usleep(getSetting("pdfreloaddelay")); // Only reload if pdf viewer process is already running. if(waitpid(pid, &status, WNOHANG) == pid) reloadPDF(Viewer,outname); } } } else { mem::vector cmd; push_command(cmd,getSetting("display")); cmd.push_back(outname); string application="your "+outputformat+" viewer"; status=System(cmd,0,wait,"display",application.c_str()); if(status != 0) return false; } } return true; } string Outname(const string& prefix, const string& outputformat, bool standardout) { return standardout ? "-" : buildname(prefix,outputformat,""); } bool picture::shipout(picture *preamble, const string& Prefix, const string& format, double magnification, bool wait, bool view) { b=bounds(); string texengine=getSetting("tex"); bool usetex=texengine != "none"; bool TeXmode=getSetting("inlinetex") && usetex; bool pdf=settings::pdf(texengine); bool standardout=Prefix == "-"; string prefix=standardout ? standardprefix : stripExt(Prefix); string preformat=nativeformat(); string outputformat=format.empty() ? defaultformat() : format; bool epsformat=outputformat == "eps"; bool pdfformat=pdf || outputformat == "pdf"; bool svgformat=outputformat == "svg" && !pdf && usetex && (!have3D() || getSetting("render") == 0.0); bool xobject=magnification > 0; string outname=Outname(prefix,outputformat,standardout); string epsname=epsformat ? (standardout ? "" : outname) : auxname(prefix,"eps"); bool Labels=labels || TeXmode; if(b.empty && !Labels) { // Output a null file bbox b; b.left=b.bottom=0; b.right=b.top=xobject ? 18 : 1; psfile out(epsname,false); out.prologue(b); out.epilogue(); out.close(); return postprocess(epsname,outname,outputformat,1.0,wait,view,false,false); } Labels |= svgformat; if(Labels) prefix=cleanpath(prefix); string prename=((epsformat && !pdf) || !Labels) ? epsname : auxname(prefix,preformat); if(xobject) { double fuzz=0.5/magnification; b.top += fuzz; b.right += fuzz; b.bottom -= fuzz; } SetPageDimensions(); pair aligndir=getSetting("aligndir"); string origin=getSetting("align"); pair bboxshift=(origin == "Z" && epsformat) ? pair(0.0,0.0) : pair(-b.left,-b.bottom); if(epsformat) { bboxshift += getSetting("offset"); double yexcess=max(getSetting("paperheight")- (b.top-b.bottom+1.0),0.0); double xexcess=max(getSetting("paperwidth")- (b.right-b.left+1.0),0.0); if(aligndir == pair(0,0)) { if(origin != "Z" && origin != "B") { if(origin == "T") bboxshift += pair(0.0,yexcess); else bboxshift += pair(0.5*xexcess,0.5*yexcess); } } else { double scale=max(fabs(aligndir.getx()),fabs(aligndir.gety())); if(scale != 0) aligndir *= 0.5/scale; bboxshift += pair((aligndir.getx()+0.5)*xexcess,(aligndir.gety()+0.5)*yexcess); } } bool status=true; string texname; texfile *tex=NULL; if(Labels) { texname=TeXmode ? buildname(prefix,"tex") : auxname(prefix,"tex"); tex=svgformat ? new svgtexfile(texname,b) : new texfile(texname,b); tex->prologue(); } nodelist::iterator layerp=nodes.begin(); nodelist::iterator p=layerp; unsigned layer=0; mem::list files; bbox bshift=b; transparency=false; int svgcount=0; typedef mem::list clipstack; clipstack begin; while(p != nodes.end()) { string psname,pdfname; if(Labels) { ostringstream buf; buf << prefix << "_" << layer; psname=buildname(buf.str(),"eps"); if(pdf) pdfname=buildname(buf.str(),"pdf"); } else { psname=epsname; bshift.shift(bboxshift); } files.push_back(psname); if(pdf) files.push_back(pdfname); psfile out(psname,pdfformat); out.prologue(bshift); if(!Labels) { out.gsave(); out.translate(bboxshift); } if(preamble) { // Postscript preamble. nodelist Nodes=preamble->nodes; nodelist::iterator P=Nodes.begin(); if(P != Nodes.end()) { out.resetpen(); for(; P != Nodes.end(); ++P) { assert(*P); (*P)->draw(&out); } } } out.resetpen(); bool postscript=false; drawLabel *L=NULL; if(svgformat) for(nodelist::const_iterator r=begin.begin(); r != begin.end(); ++r) (*r)->draw(&out); for(; p != nodes.end(); ++p) { assert(*p); if(Labels && (*p)->islayer()) break; if(svgformat && (*p)->svg()) { picture *f=(*p)->svgpng() ? new picture : NULL; nodelist::const_iterator q=layerp; for(;;) { if((*q)->beginclip()) begin.push_back(*q); else if((*q)->endclip()) { if(begin.size() < 1) reportError("endclip without matching beginclip"); begin.pop_back(); } if(q == p) break; ++q; } if(f) { for(nodelist::const_iterator r=begin.begin(); r != begin.end(); ++r) f->append(*r); f->append(*(q++)); } while(q != nodes.end() && !(*q)->islayer()) ++q; clipstack end; for(nodelist::const_iterator r=--q;; --r) { if((*r)->beginclip() && end.size() >= 1) end.pop_back(); else if((*r)->endclip()) end.push_back(*r); if(r == p) break; } for(nodelist::reverse_iterator r=end.rbegin(); r != end.rend(); ++r) { (*r)->draw(&out); if(f) f->append(*r); } if(f) { ostringstream buf; buf << prefix << "_" << svgcount; ++svgcount; string pngname=buildname(buf.str(),"png"); f->shipout(preamble,buf.str(),"png",0.0,false,false); pair m=f->bounds().Min(); pair M=f->bounds().Max(); delete f; pair size=M-m; ostringstream cmd; cmd << "\\special{dvisvgm:img " << size.getx()*ps2tex << " " << size.gety()*ps2tex << " " << pngname << "}"; static pen P; static pair zero; L=new drawLabel(cmd.str(),"",identity,pair(m.getx(),M.gety()),zero,P); texinit(); L->bounds(b_cached,processData().tex,labelbounds,bboxstack); postscript=true; } break; } else postscript |= (*p)->draw(&out); } if(Labels) { tex->beginlayer(pdf ? pdfname : psname,postscript); } else out.grestore(); out.epilogue(); out.close(); if(out.Transparency()) transparency=true; if(Labels) { tex->resetpen(); if(pdf && !b.empty) { status=(epstopdf(psname,pdfname) == 0); if(!getSetting("keep")) unlink(psname.c_str()); } if(status) { for (p=layerp; p != nodes.end(); ++p) { assert(*p); bool islayer=(*p)->islayer(); if(svgformat && (*p)->svg()) { islayer=true; if((*p)->svgpng()) L->write(tex,b); else (*p)->draw(tex); } else (*p)->write(tex,b); if(islayer) { tex->endlayer(); layerp=++p; layer++; break; } } } } } bool context=settings::context(texengine); if(status) { if(TeXmode) { if(Labels && verbose > 0) cout << "Wrote " << texname << endl; delete tex; } else { if(Labels) { tex->epilogue(); if(context) prefix=stripDir(prefix); status=texprocess(texname,svgformat ? outname : prename,prefix, bboxshift,svgformat); delete tex; if(!getSetting("keep")) { for(mem::list::iterator p=files.begin(); p != files.end(); ++p) unlink(p->c_str()); } } if(status) { if(xobject) { if(pdf || transparency) status=(epstopdf(prename,Outname(prefix,"pdf",standardout)) == 0); } else { if(context) prename=stripDir(prename); status=postprocess(prename,outname,outputformat,magnification,wait, view,pdf && Labels,svgformat); if(pdfformat && !getSetting("keep")) { unlink(auxname(prefix,"m9").c_str()); unlink(auxname(prefix,"pbsdat").c_str()); } } } } } if(!status) reportError("shipout failed"); return true; } // render viewport with width x height pixels. void picture::render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent) const { for(nodelist::const_iterator p=nodes.begin(); p != nodes.end(); ++p) { assert(*p); (*p)->render(nurb,size2,Min,Max,perspective,lighton,transparent); } #ifdef HAVE_GL drawBezierPatch::S.draw(); #endif } struct Communicate : public gc { string prefix; picture* pic; string format; double width; double height; double angle; double zoom; triple m; triple M; pair shift; double *t; double *background; size_t nlights; triple *lights; double *diffuse; double *ambient; double *specular; bool viewportlighting; bool view; }; Communicate com; void glrenderWrapper() { #ifdef HAVE_GL #ifdef HAVE_PTHREAD wait(initSignal,initLock); endwait(initSignal,initLock); #endif glrender(com.prefix,com.pic,com.format,com.width,com.height,com.angle, com.zoom,com.m,com.M,com.shift,com.t,com.background,com.nlights, com.lights,com.diffuse,com.ambient,com.specular,com.viewportlighting, com.view); #endif } bool picture::shipout3(const string& prefix, const string& format, double width, double height, double angle, double zoom, const triple& m, const triple& M, const pair& shift, double *t, double *background, size_t nlights, triple *lights, double *diffuse, double *ambient, double *specular, bool viewportlighting, bool view) { if(getSetting("interrupt")) return true; #ifndef HAVE_LIBGLUT if(!getSetting("offscreen")) camp::reportError("to support onscreen rendering, please install glut library, run ./configure, and recompile"); #endif #ifndef HAVE_LIBOSMESA if(getSetting("offscreen")) camp::reportError("to support offscreen rendering; please install OSMesa library, run ./configure --enable-offscreen, and recompile"); #endif picture *pic = new picture; matrixstack ms; for(nodelist::const_iterator p=nodes.begin(); p != nodes.end(); ++p) { assert(*p); if((*p)->begingroup3()) ms.push((*p)->transf3()); else if((*p)->endgroup3()) ms.pop(); else pic->append((*p)->transformed(ms.T())); } pic->b3=bbox3(); for(nodelist::iterator p=pic->nodes.begin(); p != pic->nodes.end(); ++p) { assert(*p); (*p)->bounds(pic->b3); } pic->lastnumber3=pic->nodes.size(); for(nodelist::iterator p=pic->nodes.begin(); p != pic->nodes.end(); ++p) { assert(*p); (*p)->displacement(); } const string outputformat=format.empty() ? getSetting("outformat") : format; #ifdef HAVE_GL bool View=settings::view() && view; static int oldpid=0; bool offscreen=getSetting("offscreen"); #ifdef HAVE_PTHREAD bool animating=getSetting("animating"); bool Wait=!interact::interactive || !View || animating; #endif #endif #if defined(HAVE_LIBGLUT) && defined(HAVE_GL) if(glthread && !offscreen) { #ifdef HAVE_PTHREAD if(gl::initialize) { gl::initialize=false; com.prefix=prefix; com.pic=pic; com.format=outputformat; com.width=width; com.height=height; com.angle=angle; com.zoom=zoom; com.m=m; com.M=M; com.shift=shift; com.t=t; com.background=background; com.nlights=nlights; com.lights=lights; com.diffuse=diffuse; com.ambient=ambient; com.specular=specular; com.viewportlighting=viewportlighting; com.view=View; if(Wait) pthread_mutex_lock(&readyLock); wait(initSignal,initLock); endwait(initSignal,initLock); static bool initialize=true; if(initialize) { wait(initSignal,initLock); endwait(initSignal,initLock); initialize=false; } if(Wait) { pthread_cond_wait(&readySignal,&readyLock); pthread_mutex_unlock(&readyLock); } return true; } if(Wait) pthread_mutex_lock(&readyLock); #endif } else { int pid=fork(); if(pid == -1) camp::reportError("Cannot fork process"); if(pid != 0) { oldpid=pid; waitpid(pid,NULL,interact::interactive && View ? WNOHANG : 0); return true; } } #endif #ifdef HAVE_GL glrender(prefix,pic,outputformat,width,height,angle,zoom,m,M,shift,t, background,nlights,lights,diffuse,ambient,specular,viewportlighting, View,oldpid); #ifdef HAVE_PTHREAD if(glthread && !offscreen && Wait) { pthread_cond_wait(&readySignal,&readyLock); pthread_mutex_unlock(&readyLock); } return true; #endif #endif return false; } bool picture::shipout3(const string& prefix) { bounds3(); bool status = true; string prcname=buildname(prefix,"prc"); prcfile prc(prcname); static const double limit=2.5*10.0/INT_MAX; double compressionlimit=max(length(b3.Max()),length(b3.Min()))*limit; groups.push_back(groupmap()); for(nodelist::iterator p=nodes.begin(); p != nodes.end(); ++p) { assert(*p); (*p)->write(&prc,&billboard,compressionlimit,groups); } groups.pop_back(); if(status) status=prc.finish(); if(!status) reportError("shipout3 failed"); if(verbose > 0) cout << "Wrote " << prcname << endl; return true; } picture *picture::transformed(const transform& t) { picture *pic = new picture; nodelist::iterator p; for (p = nodes.begin(); p != nodes.end(); ++p) { assert(*p); pic->append((*p)->transformed(t)); } pic->T=transform(t*T); return pic; } picture *picture::transformed(const array& t) { picture *pic = new picture; double* T=NULL; copyArray4x4C(T,&t); size_t level = 0; for (nodelist::iterator p = nodes.begin(); p != nodes.end(); ++p) { assert(*p); if(level==0) pic->append((*p)->transformed(T)); else pic->append(*p); if((*p)->begingroup3()) level++; if((*p)->endgroup3()) { if(level==0) reportError("endgroup3 without matching begingroup3"); else level--; } } return pic; } } // namespace camp ./asymptote-2.41/fileio.h0000644000175000017500000004655313064427076015200 0ustar norbertnorbert/****** * fileio.h * Tom Prince and John Bowman 2004/05/10 * * Handle input/output ******/ #ifndef FILEIO_H #define FILEIO_H #include #include #include #include "common.h" #ifdef HAVE_RPC_RPC_H #include "xstream.h" #endif #include "pair.h" #include "triple.h" #include "guide.h" #include "pen.h" #include "camperror.h" #include "interact.h" #include "errormsg.h" #include "util.h" #include "process.h" namespace vm { extern bool indebugger; } namespace camp { extern string tab; extern string newline; enum Mode {NOMODE,INPUT,OUTPUT,UPDATE,BINPUT,BOUTPUT,BUPDATE,XINPUT,XOUTPUT, XUPDATE,OPIPE}; static const string FileModes[]= {"none","input","output","output(update)", "input(binary)","output(binary)","output(binary,update)", "input(xdr)","output(xdr)","output(xdr,update)","output(pipe)"}; extern FILE *pipeout; inline void openpipeout() { int fd=settings::getSetting("outpipe"); if(!pipeout) { if(fd >= 0) pipeout=fdopen(intcast(fd),"w"); } if(!pipeout) { ostringstream buf; buf << "Cannot open outpipe " << fd; reportError(buf); } } class file : public gc { protected: string name; bool check; // Check whether input file exists. Mode type; Int nx,ny,nz; // Array dimensions bool linemode; // Array reads will stop at eol instead of eof. bool csvmode; // Read comma-separated values. bool wordmode; // Delimit strings by white space instead of eol. bool singlereal; // Read/write single-precision XDR/binary reals. bool singleint; // Read/write single-precision XDR/binary ints. bool signedint; // Read/write signed XDR/binary ints. bool closed; // File has been closed. bool standard; // Standard input/output bool binary; // Read in binary mode. bool nullfield; // Used to detect a final null field in csv+line mode. string whitespace; size_t index; // Terminator index. public: bool Standard() {return standard;} void standardEOF() { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) cout << endl; #endif } template void purgeStandard(T&) { if(standard) { int c; if(cin.eof()) standardEOF(); else { cin.clear(); while((c=cin.peek()) != EOF) { cin.ignore(); if(c == '\n') break; } } } } void purgeStandard(string&) { if(cin.eof()) standardEOF(); } void dimension(Int Nx=-1, Int Ny=-1, Int Nz=-1) {nx=Nx; ny=Ny; nz=Nz;} file(const string& name, bool check=true, Mode type=NOMODE, bool binary=false, bool closed=false) : name(name), check(check), type(type), linemode(false), csvmode(false), singlereal(false), singleint(true), signedint(true), closed(closed), standard(name.empty()), binary(binary), nullfield(false), whitespace("") {dimension();} virtual void open() {} void Check() { if(error()) { ostringstream buf; buf << "Cannot open file \"" << name << "\""; reportError(buf); } } virtual ~file() {} bool isOpen() { if(closed) { ostringstream buf; buf << "I/O operation attempted on "; if(name != "") buf << "closed file \'" << name << "\'"; else buf << "null file"; reportError(buf); } return true; } string filename() {return name;} virtual bool eol() {return false;} virtual bool nexteol() {return false;} virtual bool text() {return false;} virtual bool eof() {return true;} virtual bool error() {return true;} virtual void close() {} virtual void clear() {} virtual Int precision(Int) {return 0;} virtual void flush() {} virtual size_t tell() {return 0;} virtual void seek(Int, bool=true) {} string FileMode() {return FileModes[type];} void unsupported(const char *rw, const char *type) { ostringstream buf; buf << rw << " of type " << type << " not supported in " << FileMode() << " mode"; reportError(buf); } void noread(const char *type) {unsupported("Read",type);} void nowrite(const char *type) {unsupported("Write",type);} virtual void Read(bool&) {noread("bool");} virtual void Read(Int&) {noread("int");} virtual void Read(double&) {noread("real");} virtual void Read(float&) {noread("real");} virtual void Read(pair&) {noread("pair");} virtual void Read(triple&) {noread("triple");} virtual void Read(char&) {noread("char");} virtual void Read(string&) {noread("string");} virtual void readwhite(string&) {noread("string");} virtual void write(bool) {nowrite("bool");} virtual void write(Int) {nowrite("int");} virtual void write(double) {nowrite("real");} virtual void write(const pair&) {nowrite("pair");} virtual void write(const triple&) {nowrite("triple");} virtual void write(const string&) {nowrite("string");} virtual void write(const pen&) {nowrite("pen");} virtual void write(guide *) {nowrite("guide");} virtual void write(const transform&) {nowrite("transform");} virtual void writeline() {nowrite("string");} virtual void ignoreComment() {}; virtual void csv() {}; template void ignoreComment(T&) { ignoreComment(); } void ignoreComment(string&) {} void ignoreComment(char&) {} template void read(T& val) { if(binary) Read(val); else { if(standard) clear(); if(errorstream::interrupt) throw interrupted(); else { ignoreComment(val); val=T(); if(!nullfield) Read(val); csv(); whitespace=""; } } } Int Nx() {return nx;} Int Ny() {return ny;} Int Nz() {return nz;} void Nx(Int n) {nx=n;} void Ny(Int n) {ny=n;} void Nz(Int n) {nz=n;} void LineMode(bool b) {linemode=b;} bool LineMode() {return linemode;} void CSVMode(bool b) {csvmode=b; if(b) wordmode=false;} bool CSVMode() {return csvmode;} void WordMode(bool b) {wordmode=b; if(b) csvmode=false;} bool WordMode() {return wordmode;} void SingleReal(bool b) {singlereal=b;} bool SingleReal() {return singlereal;} void SingleInt(bool b) {singleint=b;} bool SingleInt() {return singleint;} void SignedInt(bool b) {signedint=b;} bool SignedInt() {return signedint;} }; class opipe : public file { public: opipe(const string& name) : file(name,false,OPIPE) {} void open() { openpipeout(); } bool text() {return true;} bool eof() {return pipeout ? feof(pipeout) : true;} bool error() {return pipeout ? ferror(pipeout) : true;} void clear() {if(pipeout) clearerr(pipeout);} void flush() {if(pipeout) fflush(pipeout);} void seek(Int pos, bool begin=true) { if(!standard && pipeout) { clear(); fseek(pipeout,pos,begin ? SEEK_SET : SEEK_END); } } size_t tell() { return pipeout ? ftell(pipeout) : 0; } void write(const string& val) { fprintf(pipeout,"%s",val.c_str()); } void write(bool val) { ostringstream s; s << val; write(s.str()); } void write(Int val) { ostringstream s; s << val; write(s.str()); } void write(double val) { ostringstream s; s << val; write(s.str()); } void write(const pair& val) { ostringstream s; s << val; write(s.str()); } void write(const triple& val) { ostringstream s; s << val; write(s.str()); } void write(const pen &val) { ostringstream s; s << val; write(s.str()); } void write(guide *val) { ostringstream s; s << *val; write(s.str()); } void write(const transform& val) { ostringstream s; s << val; write(s.str()); } void writeline() { fprintf(pipeout,"\n"); if(errorstream::interrupt) throw interrupted(); } }; class ifile : public file { protected: istream *stream; std::fstream *fstream; char comment; std::ios::openmode mode; bool comma; public: ifile(const string& name, char comment, bool check=true, Mode type=INPUT, std::ios::openmode mode=std::ios::in) : file(name,check,type), stream(&cin), fstream(NULL), comment(comment), mode(mode), comma(false) {} // Binary file ifile(const string& name, bool check=true, Mode type=BINPUT, std::ios::openmode mode=std::ios::in) : file(name,check,type,true), mode(mode) {} ~ifile() {close();} void open() { if(standard) { if(mode & std::ios::binary) reportError("Cannot open standard input in binary mode"); stream=&cin; } else { if(mode & std::ios::out) name=outpath(name); stream=fstream=new std::fstream(name.c_str(),mode); if(mode & std::ios::out) { if(error()) { delete fstream; std::ofstream f(name.c_str()); f.close(); stream=fstream=new std::fstream(name.c_str(),mode); } } index=processData().ifile.add(fstream); if(check) Check(); } } bool eol(); bool nexteol(); bool text() {return true;} bool eof() {return stream->eof();} bool error() {return stream->fail();} void close() { if(!standard && fstream) { fstream->close(); closed=true; delete fstream; fstream=NULL; processData().ifile.remove(index); } } void clear() {stream->clear();} void seek(Int pos, bool begin=true) { if(!standard && fstream) { clear(); fstream->seekg(pos,begin ? std::ios::beg : std::ios::end); } } size_t tell() { if(fstream) return fstream->tellg(); else return 0; } void csv(); virtual void ignoreComment(); // Skip over white space void readwhite(string& val) {val=string(); *stream >> val;} void Read(bool &val) {string t; readwhite(t); val=(t == "true");} void Read(Int& val) {*stream >> val;} void Read(double& val) {*stream >> val;} void Read(pair& val) {*stream >> val;} void Read(triple& val) {*stream >> val;} void Read(char& val) {stream->get(val);} void Read(string& val); }; class iofile : public ifile { public: iofile(const string& name, char comment=0) : ifile(name,comment,true,UPDATE,std::ios::in | std::ios::out) {} Int precision(Int p) { return p == 0 ? stream->precision() : stream->precision(p); } void flush() {if(fstream) fstream->flush();} void write(bool val) {*fstream << (val ? "true " : "false ");} void write(Int val) {*fstream << val;} void write(double val) {*fstream << val;} void write(const pair& val) {*fstream << val;} void write(const triple& val) {*fstream << val;} void write(const string& val) {*fstream << val;} void write(const pen& val) {*fstream << val;} void write(guide *val) {*fstream << *val;} void write(const transform& val) {*fstream << val;} void writeline() { *fstream << newline; if(errorstream::interrupt) throw interrupted(); } }; class ofile : public file { protected: ostream *stream; std::ofstream *fstream; std::ios::openmode mode; public: ofile(const string& name, Mode type=OUTPUT, std::ios::openmode mode=std::ios::trunc) : file(name,true,type), stream(&cout), fstream(NULL), mode(mode) {} ~ofile() {close();} void open() { if(standard) { if(mode & std::ios::binary) reportError("Cannot open standard output in binary mode"); stream=&cout; } else { name=outpath(name); stream=fstream=new std::ofstream(name.c_str(),mode | std::ios::trunc); index=processData().ofile.add(fstream); Check(); } } bool text() {return true;} bool eof() {return stream->eof();} bool error() {return stream->fail();} void close() { if(!standard && fstream) { fstream->close(); closed=true; delete fstream; fstream=NULL; processData().ofile.remove(index); } } void clear() {stream->clear();} Int precision(Int p) { return p == 0 ? stream->precision() : stream->precision(p); } void flush() {stream->flush();} void seek(Int pos, bool begin=true) { if(!standard && fstream) { clear(); fstream->seekp(pos,begin ? std::ios::beg : std::ios::end); } } size_t tell() { if(fstream) return fstream->tellp(); else return 0; } bool enabled() {return !standard || settings::verbose > 1 || interact::interactive || !settings::getSetting("quiet");} void write(bool val) {*stream << (val ? "true " : "false ");} void write(Int val) {*stream << val;} void write(double val) {*stream << val;} void write(const pair& val) {*stream << val;} void write(const triple& val) {*stream << val;} void write(const string& val) {*stream << val;} void write(const pen& val) {*stream << val;} void write(guide *val) {*stream << *val;} void write(const transform& val) {*stream << val;} void writeline(); }; class ibfile : public ifile { public: ibfile(const string& name, bool check=true, Mode type=BINPUT, std::ios::openmode mode=std::ios::in) : ifile(name,check,type,mode | std::ios::binary) {} template void iread(T& val) { val=T(); if(fstream) fstream->read((char *) &val,sizeof(T)); } void Read(bool& val) {iread(val);} void Read(Int& val) { if(signedint) { if(singleint) {int ival; iread(ival); val=ival;} else iread(val); } else { if(singleint) {unsigned ival; iread(ival); val=Intcast(ival);} else {unsignedInt ival; iread(ival); val=Intcast(ival);} } } void Read(char& val) {iread(val);} void Read(string& val) {char c; iread(c); val=c;} void Read(double& val) { if(singlereal) {float fval; iread(fval); val=fval;} else iread(val); } }; class iobfile : public ibfile { public: iobfile(const string& name) : ibfile(name,true,BUPDATE,std::ios::in | std::ios::out) {} void flush() {if(fstream) fstream->flush();} template void iwrite(T val) { if(fstream) fstream->write((char *) &val,sizeof(T)); } void write(bool val) {iwrite(val);} void write(Int val) { if(signedint) { if(singleint) iwrite(intcast(val)); else iwrite(val); } else { if(singleint) iwrite(unsignedcast(val)); else iwrite(unsignedIntcast(val)); } } void write(const string& val) {iwrite(val);} void write(const pen& val) {iwrite(val);} void write(guide *val) {iwrite(val);} void write(const transform& val) {iwrite(val);} void write(double val) { if(singlereal) iwrite((float) val); else iwrite(val); } void write(const pair& val) { write(val.getx()); write(val.gety()); } void write(const triple& val) { write(val.getx()); write(val.gety()); write(val.getz()); } void writeline() {} }; class obfile : public ofile { public: obfile(const string& name) : ofile(name,BOUTPUT,std::ios::binary) {} template void iwrite(T val) { if(fstream) fstream->write((char *) &val,sizeof(T)); } void write(bool val) {iwrite(val);} void write(Int val) { if(signedint) { if(singleint) iwrite(intcast(val)); else iwrite(val); } else { if(singleint) iwrite(unsignedcast(val)); else iwrite(unsignedIntcast(val)); } } void write(const string& val) {iwrite(val);} void write(const pen& val) {iwrite(val);} void write(guide *val) {iwrite(val);} void write(const transform& val) {iwrite(val);} void write(double val) { if(singlereal) iwrite((float) val); else iwrite(val); } void write(const pair& val) { write(val.getx()); write(val.gety()); } void write(const triple& val) { write(val.getx()); write(val.gety()); write(val.getz()); } void writeline() {} }; #ifdef HAVE_RPC_RPC_H class ixfile : public file { protected: xdr::ioxstream *fstream; xdr::xios::open_mode mode; public: ixfile(const string& name, bool check=true, Mode type=XINPUT, xdr::xios::open_mode mode=xdr::xios::in) : file(name,check,type,true), fstream(NULL), mode(mode) {} void open() { fstream=new xdr::ioxstream(name.c_str(),mode); index=processData().ixfile.add(fstream); if(check) Check(); } void close() { if(fstream) { fstream->close(); closed=true; delete fstream; fstream=NULL; processData().ixfile.remove(index); } } ~ixfile() {close();} bool eof() {return fstream ? fstream->eof() : true;} bool error() {return fstream ? fstream->fail() : true;} void clear() {if(fstream) fstream->clear();} void seek(Int pos, bool begin=true) { if(!standard && fstream) { clear(); fstream->seek(pos,begin ? xdr::xios::beg : xdr::xios::end); } } size_t tell() { if(fstream) return fstream->tell(); else return 0; } void Read(Int& val) { if(signedint) { if(singleint) {int ival=0; *fstream >> ival; val=ival;} else {val=0; *fstream >> val;} } else { if(singleint) {unsigned ival=0; *fstream >> ival; val=Intcast(ival);} else {unsignedInt ival=0; *fstream >> ival; val=Intcast(ival);} } } void Read(double& val) { if(singlereal) {float fval=0.0; *fstream >> fval; val=fval;} else { val=0.0; *fstream >> val; } } void Read(pair& val) { double x,y; Read(x); Read(y); val=pair(x,y); } void Read(triple& val) { double x,y,z; Read(x); Read(y); Read(z); val=triple(x,y,z); } }; class ioxfile : public ixfile { public: ioxfile(const string& name) : ixfile(name,true,XUPDATE,xdr::xios::out) {} void flush() {if(fstream) fstream->flush();} void write(Int val) { if(signedint) { if(singleint) *fstream << intcast(val); else *fstream << val; } else { if(singleint) *fstream << unsignedcast(val); else *fstream << unsignedIntcast(val); } } void write(double val) { if(singlereal) *fstream << (float) val; else *fstream << val; } void write(const pair& val) { write(val.getx()); write(val.gety()); } void write(const triple& val) { write(val.getx()); write(val.gety()); write(val.getz()); } }; class oxfile : public file { xdr::oxstream *fstream; public: oxfile(const string& name) : file(name,true,XOUTPUT), fstream(NULL) {} void open() { fstream=new xdr::oxstream(outpath(name).c_str(),xdr::xios::trunc); index=processData().oxfile.add(fstream); Check(); } void close() { if(fstream) { fstream->close(); closed=true; delete fstream; fstream=NULL; processData().oxfile.remove(index); } } ~oxfile() {close();} bool eof() {return fstream ? fstream->eof() : true;} bool error() {return fstream ? fstream->fail() : true;} void clear() {if(fstream) fstream->clear();} void flush() {if(fstream) fstream->flush();} void seek(Int pos, bool begin=true) { if(!standard && fstream) { clear(); fstream->seek(pos,begin ? xdr::xios::beg : xdr::xios::end); } } size_t tell() { if(fstream) return fstream->tell(); else return 0; } void write(Int val) { if(signedint) { if(singleint) *fstream << intcast(val); else *fstream << val; } else { if(singleint) *fstream << unsignedcast(val); else *fstream << unsignedIntcast(val); } } void write(double val) { if(singlereal) *fstream << (float) val; else *fstream << val; } void write(const pair& val) { write(val.getx()); write(val.gety()); } void write(const triple& val) { write(val.getx()); write(val.gety()); write(val.getz()); } }; #endif extern ofile Stdout; extern file nullfile; } // namespace camp #endif // FILEIO_H ./asymptote-2.41/runpair.cc0000644000175000017500000003773413064427126015544 0ustar norbertnorbert/***** Autogenerated from runpair.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runpair.in" /***** * runpair.in * * Runtime functions for pair operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 10 "runpair.in" #include "pair.h" using namespace camp; namespace run { extern pair zero; } pair sin(pair z) { return pair(sin(z.getx())*cosh(z.gety()),cos(z.getx())*sinh(z.gety())); } pair exp(pair z) { return exp(z.getx())*expi(z.gety()); } pair gamma(pair z) { static double p[]={0.99999999999980993,676.5203681218851,-1259.1392167224028, 771.32342877765313,-176.61502916214059,12.507343278686905, -0.13857109526572012,9.9843695780195716e-6, 1.5056327351493116e-7}; static int n=sizeof(p)/sizeof(double); static double root2pi=sqrt(2*PI); if(z.getx() < 0.5) return PI/(sin(PI*z)*gamma(1.0-z)); z -= 1.0; pair x=p[0]; for(int i=1; i < n; ++i) x += p[i]/(z+i); pair t=n-1.5+z; return root2pi*pow(t,z+0.5)*exp(-t)*x; } // Autogenerated routines: #ifndef NOSYM #include "runpair.symbols.h" #endif namespace run { #line 49 "runpair.in" void pairZero(stack *Stack) { #line 50 "runpair.in" {Stack->push(zero); return;} } #line 54 "runpair.in" void realRealToPair(stack *Stack) { real y=vm::pop(Stack); real x=vm::pop(Stack); #line 55 "runpair.in" {Stack->push(pair(x,y)); return;} } #line 59 "runpair.in" void pairNegate(stack *Stack) { pair z=vm::pop(Stack); #line 60 "runpair.in" {Stack->push(-z); return;} } #line 64 "runpair.in" // real xpart(pair z); void pairXPart(stack *Stack) { pair z=vm::pop(Stack); #line 65 "runpair.in" {Stack->push(z.getx()); return;} } #line 69 "runpair.in" // real ypart(pair z); void pairYPart(stack *Stack) { pair z=vm::pop(Stack); #line 70 "runpair.in" {Stack->push(z.gety()); return;} } #line 74 "runpair.in" // real length(pair z); void gen_runpair5(stack *Stack) { pair z=vm::pop(Stack); #line 75 "runpair.in" {Stack->push(z.length()); return;} } #line 79 "runpair.in" // real abs(pair z); void gen_runpair6(stack *Stack) { pair z=vm::pop(Stack); #line 80 "runpair.in" {Stack->push(z.length()); return;} } #line 84 "runpair.in" // pair sqrt(explicit pair z); void gen_runpair7(stack *Stack) { pair z=vm::pop(Stack); #line 85 "runpair.in" {Stack->push(Sqrt(z)); return;} } // Return the angle of z in radians. #line 90 "runpair.in" // real angle(pair z, bool warn=true); void gen_runpair8(stack *Stack) { bool warn=vm::pop(Stack,true); pair z=vm::pop(Stack); #line 91 "runpair.in" if(!warn && z.getx() == 0.0 && z.gety() == 0.0) {Stack->push(0.0); return;} {Stack->push(z.angle()); return;} } // Return the angle of z in degrees in the interval [0,360). #line 97 "runpair.in" // real degrees(pair z, bool warn=true); void gen_runpair9(stack *Stack) { bool warn=vm::pop(Stack,true); pair z=vm::pop(Stack); #line 98 "runpair.in" if(!warn && z.getx() == 0.0 && z.gety() == 0.0) {Stack->push(0.0); return;} {Stack->push(principalBranch(degrees(z.angle()))); return;} } // Convert degrees to radians. #line 104 "runpair.in" // real radians(real degrees); void gen_runpair10(stack *Stack) { real degrees=vm::pop(Stack); #line 105 "runpair.in" {Stack->push(radians(degrees)); return;} } // Convert radians to degrees. #line 110 "runpair.in" // real degrees(real radians); void gen_runpair11(stack *Stack) { real radians=vm::pop(Stack); #line 111 "runpair.in" {Stack->push(degrees(radians)); return;} } // Convert radians to degrees in [0,360). #line 116 "runpair.in" // real Degrees(real radians); void gen_runpair12(stack *Stack) { real radians=vm::pop(Stack); #line 117 "runpair.in" {Stack->push(principalBranch(degrees(radians))); return;} } #line 121 "runpair.in" // real Sin(real deg); void gen_runpair13(stack *Stack) { real deg=vm::pop(Stack); #line 122 "runpair.in" int n=(int) (deg/90.0); if(deg == n*90.0) { int m=n % 4; if(m < 0) m += 4; if(m == 1) {Stack->push(1); return;} if(m == 3) {Stack->push(-1); return;} {Stack->push(0.0); return;} } {Stack->push(sin(radians(deg))); return;} } #line 134 "runpair.in" // real Cos(real deg); void gen_runpair14(stack *Stack) { real deg=vm::pop(Stack); #line 135 "runpair.in" int n=(int) (deg/90.0); if(deg == n*90.0) { int m=n % 4; if(m < 0) m += 4; if(m == 0) {Stack->push(1); return;} if(m == 2) {Stack->push(-1); return;} {Stack->push(0.0); return;} } {Stack->push(cos(radians(deg))); return;} } #line 147 "runpair.in" // real Tan(real deg); void gen_runpair15(stack *Stack) { real deg=vm::pop(Stack); #line 148 "runpair.in" int n=(int) (deg/90.0); if(deg == n*90.0) { int m=n % 4; if(m < 0) m += 4; if(m == 1) {Stack->push(HUGE_VAL); return;} if(m == 3) {Stack->push(-HUGE_VAL); return;} {Stack->push(0.0); return;} } {Stack->push(tan(radians(deg))); return;} } #line 160 "runpair.in" // real aSin(real x); void gen_runpair16(stack *Stack) { real x=vm::pop(Stack); #line 161 "runpair.in" {Stack->push(degrees(asin(x))); return;} } #line 165 "runpair.in" // real aCos(real x); void gen_runpair17(stack *Stack) { real x=vm::pop(Stack); #line 166 "runpair.in" {Stack->push(degrees(acos(x))); return;} } #line 170 "runpair.in" // real aTan(real x); void gen_runpair18(stack *Stack) { real x=vm::pop(Stack); #line 171 "runpair.in" {Stack->push(degrees(atan(x))); return;} } #line 175 "runpair.in" // pair unit(pair z); void gen_runpair19(stack *Stack) { pair z=vm::pop(Stack); #line 176 "runpair.in" {Stack->push(unit(z)); return;} } #line 180 "runpair.in" // pair dir(real degrees); void gen_runpair20(stack *Stack) { real degrees=vm::pop(Stack); #line 181 "runpair.in" {Stack->push(expi(radians(degrees))); return;} } #line 185 "runpair.in" // pair dir(explicit pair z); void gen_runpair21(stack *Stack) { pair z=vm::pop(Stack); #line 186 "runpair.in" {Stack->push(unit(z)); return;} } #line 190 "runpair.in" // pair expi(real angle); void gen_runpair22(stack *Stack) { real angle=vm::pop(Stack); #line 191 "runpair.in" {Stack->push(expi(angle)); return;} } #line 195 "runpair.in" // pair exp(explicit pair z); void gen_runpair23(stack *Stack) { pair z=vm::pop(Stack); #line 196 "runpair.in" {Stack->push(exp(z)); return;} } #line 200 "runpair.in" // pair log(explicit pair z); void gen_runpair24(stack *Stack) { pair z=vm::pop(Stack); #line 201 "runpair.in" {Stack->push(pair(log(z.length()),z.angle())); return;} } #line 205 "runpair.in" // pair sin(explicit pair z); void gen_runpair25(stack *Stack) { pair z=vm::pop(Stack); #line 206 "runpair.in" {Stack->push(sin(z)); return;} } #line 210 "runpair.in" // pair cos(explicit pair z); void gen_runpair26(stack *Stack) { pair z=vm::pop(Stack); #line 211 "runpair.in" {Stack->push(pair(cos(z.getx())*cosh(z.gety()),-sin(z.getx())*sinh(z.gety()))); return;} } // Complex Gamma function #line 216 "runpair.in" // pair gamma(explicit pair z); void gen_runpair27(stack *Stack) { pair z=vm::pop(Stack); #line 217 "runpair.in" {Stack->push(gamma(z)); return;} } #line 221 "runpair.in" // pair conj(pair z); void gen_runpair28(stack *Stack) { pair z=vm::pop(Stack); #line 222 "runpair.in" {Stack->push(conj(z)); return;} } #line 226 "runpair.in" // pair realmult(pair z, pair w); void gen_runpair29(stack *Stack) { pair w=vm::pop(Stack); pair z=vm::pop(Stack); #line 227 "runpair.in" {Stack->push(pair(z.getx()*w.getx(),z.gety()*w.gety())); return;} } // To avoid confusion, a dot product requires explicit pair arguments. #line 232 "runpair.in" // real dot(explicit pair z, explicit pair w); void gen_runpair30(stack *Stack) { pair w=vm::pop(Stack); pair z=vm::pop(Stack); #line 233 "runpair.in" {Stack->push(dot(z,w)); return;} } // Return the 2D scalar cross product z.x*w.y-z.y*w.x. #line 238 "runpair.in" // real cross(explicit pair z, explicit pair w); void gen_runpair31(stack *Stack) { pair w=vm::pop(Stack); pair z=vm::pop(Stack); #line 239 "runpair.in" {Stack->push(cross(z,w)); return;} } #line 243 "runpair.in" // pair bezier(pair a, pair b, pair c, pair d, real t); void gen_runpair32(stack *Stack) { real t=vm::pop(Stack); pair d=vm::pop(Stack); pair c=vm::pop(Stack); pair b=vm::pop(Stack); pair a=vm::pop(Stack); #line 244 "runpair.in" real onemt=1-t; real onemt2=onemt*onemt; {Stack->push(onemt2*onemt*a+t*(3.0*(onemt2*b+t*onemt*c)+t*t*d)); return;} } #line 250 "runpair.in" // pair bezierP(pair a, pair b, pair c, pair d, real t); void gen_runpair33(stack *Stack) { real t=vm::pop(Stack); pair d=vm::pop(Stack); pair c=vm::pop(Stack); pair b=vm::pop(Stack); pair a=vm::pop(Stack); #line 251 "runpair.in" {Stack->push(3.0*(t*t*(d-a+3.0*(b-c))+t*(2.0*(a+c)-4.0*b)+b-a)); return;} } #line 255 "runpair.in" // pair bezierPP(pair a, pair b, pair c, pair d, real t); void gen_runpair34(stack *Stack) { real t=vm::pop(Stack); pair d=vm::pop(Stack); pair c=vm::pop(Stack); pair b=vm::pop(Stack); pair a=vm::pop(Stack); #line 256 "runpair.in" {Stack->push(6.0*(t*(d-a+3.0*(b-c))+a+c-2.0*b)); return;} } #line 260 "runpair.in" // pair bezierPPP(pair a, pair b, pair c, pair d); void gen_runpair35(stack *Stack) { pair d=vm::pop(Stack); pair c=vm::pop(Stack); pair b=vm::pop(Stack); pair a=vm::pop(Stack); #line 261 "runpair.in" {Stack->push(6.0*(d-a+3.0*(b-c))); return;} } } // namespace run namespace trans { void gen_runpair_venv(venv &ve) { #line 49 "runpair.in" REGISTER_BLTIN(run::pairZero,"pairZero"); #line 54 "runpair.in" REGISTER_BLTIN(run::realRealToPair,"realRealToPair"); #line 59 "runpair.in" REGISTER_BLTIN(run::pairNegate,"pairNegate"); #line 64 "runpair.in" addFunc(ve, run::pairXPart, primReal(), SYM(xpart), formal(primPair(), SYM(z), false, false)); #line 69 "runpair.in" addFunc(ve, run::pairYPart, primReal(), SYM(ypart), formal(primPair(), SYM(z), false, false)); #line 74 "runpair.in" addFunc(ve, run::gen_runpair5, primReal(), SYM(length), formal(primPair(), SYM(z), false, false)); #line 79 "runpair.in" addFunc(ve, run::gen_runpair6, primReal(), SYM(abs), formal(primPair(), SYM(z), false, false)); #line 84 "runpair.in" addFunc(ve, run::gen_runpair7, primPair(), SYM(sqrt), formal(primPair(), SYM(z), false, true)); #line 89 "runpair.in" addFunc(ve, run::gen_runpair8, primReal(), SYM(angle), formal(primPair(), SYM(z), false, false), formal(primBoolean(), SYM(warn), true, false)); #line 96 "runpair.in" addFunc(ve, run::gen_runpair9, primReal(), SYM(degrees), formal(primPair(), SYM(z), false, false), formal(primBoolean(), SYM(warn), true, false)); #line 103 "runpair.in" addFunc(ve, run::gen_runpair10, primReal(), SYM(radians), formal(primReal(), SYM(degrees), false, false)); #line 109 "runpair.in" addFunc(ve, run::gen_runpair11, primReal(), SYM(degrees), formal(primReal(), SYM(radians), false, false)); #line 115 "runpair.in" addFunc(ve, run::gen_runpair12, primReal(), SYM(Degrees), formal(primReal(), SYM(radians), false, false)); #line 121 "runpair.in" addFunc(ve, run::gen_runpair13, primReal(), SYM(Sin), formal(primReal(), SYM(deg), false, false)); #line 134 "runpair.in" addFunc(ve, run::gen_runpair14, primReal(), SYM(Cos), formal(primReal(), SYM(deg), false, false)); #line 147 "runpair.in" addFunc(ve, run::gen_runpair15, primReal(), SYM(Tan), formal(primReal(), SYM(deg), false, false)); #line 160 "runpair.in" addFunc(ve, run::gen_runpair16, primReal(), SYM(aSin), formal(primReal(), SYM(x), false, false)); #line 165 "runpair.in" addFunc(ve, run::gen_runpair17, primReal(), SYM(aCos), formal(primReal(), SYM(x), false, false)); #line 170 "runpair.in" addFunc(ve, run::gen_runpair18, primReal(), SYM(aTan), formal(primReal(), SYM(x), false, false)); #line 175 "runpair.in" addFunc(ve, run::gen_runpair19, primPair(), SYM(unit), formal(primPair(), SYM(z), false, false)); #line 180 "runpair.in" addFunc(ve, run::gen_runpair20, primPair(), SYM(dir), formal(primReal(), SYM(degrees), false, false)); #line 185 "runpair.in" addFunc(ve, run::gen_runpair21, primPair(), SYM(dir), formal(primPair(), SYM(z), false, true)); #line 190 "runpair.in" addFunc(ve, run::gen_runpair22, primPair(), SYM(expi), formal(primReal(), SYM(angle), false, false)); #line 195 "runpair.in" addFunc(ve, run::gen_runpair23, primPair(), SYM(exp), formal(primPair(), SYM(z), false, true)); #line 200 "runpair.in" addFunc(ve, run::gen_runpair24, primPair(), SYM(log), formal(primPair(), SYM(z), false, true)); #line 205 "runpair.in" addFunc(ve, run::gen_runpair25, primPair(), SYM(sin), formal(primPair(), SYM(z), false, true)); #line 210 "runpair.in" addFunc(ve, run::gen_runpair26, primPair(), SYM(cos), formal(primPair(), SYM(z), false, true)); #line 215 "runpair.in" addFunc(ve, run::gen_runpair27, primPair(), SYM(gamma), formal(primPair(), SYM(z), false, true)); #line 221 "runpair.in" addFunc(ve, run::gen_runpair28, primPair(), SYM(conj), formal(primPair(), SYM(z), false, false)); #line 226 "runpair.in" addFunc(ve, run::gen_runpair29, primPair(), SYM(realmult), formal(primPair(), SYM(z), false, false), formal(primPair(), SYM(w), false, false)); #line 231 "runpair.in" addFunc(ve, run::gen_runpair30, primReal(), SYM(dot), formal(primPair(), SYM(z), false, true), formal(primPair(), SYM(w), false, true)); #line 237 "runpair.in" addFunc(ve, run::gen_runpair31, primReal(), SYM(cross), formal(primPair(), SYM(z), false, true), formal(primPair(), SYM(w), false, true)); #line 243 "runpair.in" addFunc(ve, run::gen_runpair32, primPair(), SYM(bezier), formal(primPair(), SYM(a), false, false), formal(primPair(), SYM(b), false, false), formal(primPair(), SYM(c), false, false), formal(primPair(), SYM(d), false, false), formal(primReal(), SYM(t), false, false)); #line 250 "runpair.in" addFunc(ve, run::gen_runpair33, primPair(), SYM(bezierP), formal(primPair(), SYM(a), false, false), formal(primPair(), SYM(b), false, false), formal(primPair(), SYM(c), false, false), formal(primPair(), SYM(d), false, false), formal(primReal(), SYM(t), false, false)); #line 255 "runpair.in" addFunc(ve, run::gen_runpair34, primPair(), SYM(bezierPP), formal(primPair(), SYM(a), false, false), formal(primPair(), SYM(b), false, false), formal(primPair(), SYM(c), false, false), formal(primPair(), SYM(d), false, false), formal(primReal(), SYM(t), false, false)); #line 260 "runpair.in" addFunc(ve, run::gen_runpair35, primPair(), SYM(bezierPPP), formal(primPair(), SYM(a), false, false), formal(primPair(), SYM(b), false, false), formal(primPair(), SYM(c), false, false), formal(primPair(), SYM(d), false, false)); } } // namespace trans ./asymptote-2.41/runhistory.h0000644000175000017500000000024113064427126016133 0ustar norbertnorbert/***** Autogenerated from runhistory.in; changes will be overwritten *****/ #ifndef runhistory_H #define runhistory_H namespace run { } #endif // runhistory_H ./asymptote-2.41/frame.h0000644000175000017500000000417513064427076015015 0ustar norbertnorbert/***** * frame.h * Andy Hammerlindl 2002/07/22 * * Describes the frame levels for the functions of the language. * Also creates accesses for the variable for automated loading * and saving of variables. *****/ #ifndef FRAME_H #define FRAME_H #include #include "access.h" namespace trans { class frame : public gc { frame *parent; size_t numFormals; Int numLocals; // With the SIMPLE_FRAME flag, the size of frames cannot be changed at // runtime. This is an issue for runnable-at-a-time mode, where global // variables can be continually added. To handle this, the frame for // global variables is an "indirect" frame. It holds one variable, which is // a link to another frame. When the subframe is too small, a larger // runtime array is allocated, and the link is changed. enum {DIRECT_FRAME, INDIRECT_FRAME} style; #ifdef DEBUG_FRAME string name; #endif frame(string name) : parent(new frame("", 0, 0)), numFormals(0), numLocals(1), style(INDIRECT_FRAME) #ifdef DEBUG_FRAME , name(name) #endif {} public: frame(string name, frame *parent, size_t numFormals) : parent(parent), numFormals(numFormals), numLocals(0), style(DIRECT_FRAME) #ifdef DEBUG_FRAME , name(name) #endif {} static frame *indirect_frame(string name) { return new frame(name); } frame *getParent() { return parent; } // Which variable stores the link to the parent frame. Int parentIndex() { return numFormals; } Int size() { if (style == DIRECT_FRAME) return (Int) (1+numFormals+numLocals); else return parent->size(); } access *accessFormal(size_t index) { assert(index < numFormals); assert(style == DIRECT_FRAME); return new localAccess((Int) (index), this); } access *allocLocal() { if (style == DIRECT_FRAME) return new localAccess((Int) (1 + numFormals + numLocals++), this); else return parent->allocLocal(); } }; inline void print(ostream& out, frame *f) { out << f; if (f != 0) { out << " -> "; print(out, f->getParent()); } } } // namespace trans #endif ./asymptote-2.41/drawfill.h0000644000175000017500000001410413064427076015520 0ustar norbertnorbert/***** * drawfill.h * Andy Hammerlindl 2002/06/06 * * Stores a cyclic path that will outline a filled shape in a picture. *****/ #ifndef DRAWFILL_H #define DRAWFILL_H #include "drawelement.h" #include "path.h" namespace camp { class drawFill : public drawSuperPathPenBase { protected: bool stroke; public: void noncyclic() { reportError("non-cyclic path cannot be filled"); } drawFill(const vm::array& src, bool stroke, pen pentype) : drawSuperPathPenBase(src,pentype), stroke(stroke) { if(!stroke && !cyclic()) noncyclic(); } bool svg() {return true;} // dvisvgm doesn't yet support SVG patterns. bool svgpng() {return pentype.fillpattern() != "";} virtual ~drawFill() {} virtual bool draw(psfile *out); virtual void palette(psfile *out) { penSave(out); penTranslate(out); } virtual void fill(psfile *out) { out->setpen(pentype); if(stroke) out->strokepath(); out->fill(pentype); penRestore(out); }; drawElement *transformed(const transform& t); }; class drawShade : public drawFill { public: drawShade(const vm::array& src, bool stroke, pen pentype) : drawFill(src,stroke,pentype) {} void bounds(bbox& b, iopipestream& iopipe, boxvector& vbox, bboxlist& bboxstack) { if(stroke) strokebounds(b); else drawSuperPathPenBase::bounds(b,iopipe,vbox,bboxstack); } // Shading in SVG is incomplete and not supported at all by dvisvgm. bool svgpng() {return true;} virtual void beginshade(psfile *out)=0; virtual void shade(psfile *out)=0; bool draw(psfile *out) { if(pentype.invisible() || empty()) return true; palette(out); beginshade(out); writeclippath(out); if(stroke) strokepath(out); out->endpsclip(pentype.Fillrule()); shade(out); out->grestore(); return true; } }; class drawLatticeShade : public drawShade { protected: vm::array pens; const transform T; public: drawLatticeShade(const vm::array& src, bool stroke, pen pentype, const vm::array& pens, const camp::transform& T=identity) : drawShade(src,stroke,pentype), pens(pens), T(T) {} void palette(psfile *out) { out->gsave(); } void beginshade(psfile *out) { out->beginlatticeshade(pens,bpath); } void shade(psfile *out) { bbox b; for(size_t i=0; i < size; i++) { path p=vm::read(P,i).transformed(inverse(T)); if(stroke) drawPathPenBase::strokebounds(b,p); else b += p.bounds(); } out->latticeshade(pens,T*matrix(b.Min(),b.Max())); } drawElement *transformed(const transform& t); }; class drawAxialShade : public drawShade { protected: pair a; bool extenda; pen penb; pair b; bool extendb; ColorSpace colorspace; public: drawAxialShade(const vm::array& src, bool stroke, pen pentype, pair a, bool extenda, pen penb, pair b, bool extendb) : drawShade(src,stroke,pentype), a(a), extenda(extenda), penb(penb), b(b), extendb(extendb) {} bool svgpng() {return false;} void palette(psfile *out); void beginshade(psfile *out) { out->begingradientshade(true,colorspace,pentype,a,0,penb,b,0); } void shade(psfile *out) { out->gradientshade(true,colorspace,pentype,a,0,extenda,penb,b,0,extendb); } drawElement *transformed(const transform& t); }; class drawRadialShade : public drawAxialShade { protected: double ra; double rb; public: drawRadialShade(const vm::array& src, bool stroke, pen pentype, pair a, double ra, bool extenda, pen penb, pair b, double rb, bool extendb) : drawAxialShade(src,stroke,pentype,a,extenda,penb,b,extendb), ra(ra), rb(rb) {} bool svgpng() {return ra > 0.0;} void beginshade(psfile *out) { out->begingradientshade(false,colorspace,pentype,a,ra,penb,b,rb); } void shade(psfile *out) { out->gradientshade(false,colorspace,pentype,a,ra,extenda,penb,b,rb,extendb); } drawElement *transformed(const transform& t); }; class drawGouraudShade : public drawShade { protected: vm::array pens,vertices,edges; public: drawGouraudShade(const vm::array& src, bool stroke, pen pentype, const vm::array& pens, const vm::array& vertices, const vm::array& edges) : drawShade(src,stroke,pentype), pens(pens), vertices(vertices), edges(edges) {} bool svgpng() {return !settings::getSetting("svgemulation");} void palette(psfile *out) { out->gsave(); } void beginshade(psfile *out) { out->begingouraudshade(pens,vertices,edges); } void shade(psfile *out) { out->gouraudshade(pentype,pens,vertices,edges); } drawElement *transformed(const transform& t); }; class drawTensorShade : public drawShade { protected: vm::array pens,boundaries,z; public: drawTensorShade(const vm::array& src, bool stroke, pen pentype, const vm::array& pens, const vm::array& boundaries, const vm::array& z) : drawShade(src,stroke,pentype), pens(pens), boundaries(boundaries), z(z) {} bool svgpng() { return pens.size() > 1 || !settings::getSetting("svgemulation"); } void palette(psfile *out) { out->gsave(); } void beginshade(psfile *out) { out->begintensorshade(pens,boundaries,z); } void shade(psfile *out) { out->tensorshade(pentype,pens,boundaries,z); } drawElement *transformed(const transform& t); }; class drawFunctionShade : public drawFill { protected: string shader; public: drawFunctionShade(const vm::array& src, bool stroke, pen pentype, const string& shader) : drawFill(src,stroke,pentype), shader(shader) { string texengine=settings::getSetting("tex"); if(!settings::pdf(texengine)) reportError("functionshade is not implemented for the '"+texengine+ "' tex engine"); } virtual ~drawFunctionShade() {} bool draw(psfile *out) {return false;} bool write(texfile *, const bbox&); bool islabel() {return true;} drawElement *transformed(const transform& t); }; } #endif ./asymptote-2.41/opsymbols.pl0000755000175000017500000000203213064427076016127 0ustar norbertnorbert#!/usr/bin/env perl ##### # opsymbols.pl # Andy Hammerlindl 2010/06/01 # # Extract mapping such as '+' --> SYM_PLUS from camp.l ##### open(header, ">opsymbols.h") || die("Couldn't open opsymbols.h for writing"); print header <) { if (m/^"(\S+)"\s*{\s*DEFSYMBOL\((\w+)\);/) { add($1, $2); } if (m/^(\w+)\s*{\s*DEFSYMBOL\((\w+)\);/) { add($1, $2); } if (m/^\s*EXTRASYMBOL\(\s*(\w+)\s*,\s*(\w+)\s*\)/) { add($1, $2); } } print header < #include #include "fftw++.h" using namespace std; namespace fftwpp { const double fftw::twopi=2.0*acos(-1.0); // User settings: unsigned int fftw::effort=FFTW_MEASURE; const char *fftw::WisdomName=".wisdom"; unsigned int fftw::maxthreads=1; double fftw::testseconds=0.2; // Time limit for threading efficiency tests fftw_plan (*fftw::planner)(fftw *f, Complex *in, Complex *out)=Planner; const char *fftw::oddshift="Shift is not implemented for odd nx"; const char *inout= "constructor and call must be both in place or both out of place"; fft1d::Table fft1d::threadtable; mfft1d::Table mfft1d::threadtable; rcfft1d::Table rcfft1d::threadtable; crfft1d::Table crfft1d::threadtable; mrcfft1d::Table mrcfft1d::threadtable; mcrfft1d::Table mcrfft1d::threadtable; fft2d::Table fft2d::threadtable; void LoadWisdom() { static bool Wise=false; if(!Wise) { ifstream ifWisdom; ifWisdom.open(fftw::WisdomName); ostringstream wisdom; wisdom << ifWisdom.rdbuf(); ifWisdom.close(); const string& s=wisdom.str(); fftw_import_wisdom_from_string(s.c_str()); Wise=true; } } void SaveWisdom() { ofstream ofWisdom; ofWisdom.open(fftw::WisdomName); char *wisdom=fftw_export_wisdom_to_string(); ofWisdom << wisdom; fftw_free(wisdom); ofWisdom.close(); } fftw_plan Planner(fftw *F, Complex *in, Complex *out) { LoadWisdom(); fftw::effort |= FFTW_WISDOM_ONLY; fftw_plan plan=F->Plan(in,out); fftw::effort &= !FFTW_WISDOM_ONLY; if(!plan) { plan=F->Plan(in,out); SaveWisdom(); } return plan; } ThreadBase::ThreadBase() {threads=fftw::maxthreads;} } namespace utils { unsigned int defaultmpithreads=1; } ./asymptote-2.41/fftw++asy.cc0000644000175000017500000000016713064427076015667 0ustar norbertnorbert#ifdef HAVE_CONFIG_H #include "config.h" #endif #ifdef HAVE_LIBFFTW3 #include "fftw++.h" #include "fftw++.cc" #endif ./asymptote-2.41/access.cc0000644000175000017500000000635513064427076015324 0ustar norbertnorbert/***** * access.cc * Andy Hammerlindl 2003/12/03 * Describes an "access," a representation of where a variable will be * stored at runtime, so that read, write, and call instructions can be * made. *****/ #include "access.h" #include "frame.h" #include "coder.h" #include "callable.h" using vm::item; namespace trans { /* access */ access::~access() {} /* identAccess */ void identAccess::encode(action act, position pos, coder& e) { if (act != CALL) { access::encode(act, pos, e); } // else - do nothing } /* bltinAccess */ static void bltinError(position pos) { em.error(pos); em << "built-in functions cannot be modified"; } void bltinAccess::encode(action act, position pos, coder &e) { switch (act) { case READ: e.encode(inst::constpush,(item)(vm::callable*)new vm::bfunc(f)); break; case WRITE: bltinError(pos); break; case CALL: e.encode(inst::builtin, f); break; } } void bltinAccess::encode(action act, position pos, coder &e, frame *) { e.encode(inst::pop); encode(act, pos, e); } /* callableAccess */ void callableAccess::encode(action act, position pos, coder &e) { switch (act) { case READ: e.encode(inst::constpush, (item)f); break; case WRITE: bltinError(pos); break; case CALL: this->encode(READ, pos, e); e.encode(inst::popcall); break; } } void callableAccess::encode(action act, position pos, coder &e, frame *) { e.encode(inst::pop); encode(act, pos, e); } /* frameAccess */ void frameAccess::encode(action act, position pos, coder &e) { if (act == READ) { if (!e.encode(f)) { em.compiler(pos); em << "encoding frame out of context"; } } else access::encode(act, pos, e); } void frameAccess::encode(action act, position pos, coder &e, frame *top) { if (act == READ) { if (!e.encode(f, top)) { em.compiler(pos); em << "encoding frame out of context"; } } else access::encode(act, pos, e, top); } /* localAccess */ static void frameError(position pos) { // A local variable is being used when its frame is not active. em.error(pos); em << "static use of dynamic variable"; } void localAccess::encode(action act, position pos, coder &e) { // Get the active frame of the virtual machine. frame *active = e.getFrame(); if (level == active) { e.encode(act == WRITE ? inst::varsave : inst::varpush, offset); } else if (e.encode(level)) { e.encode(act == WRITE ? inst::fieldsave : inst::fieldpush, offset); } else { frameError(pos); } if (act == CALL) e.encode(inst::popcall); } void localAccess::encode(action act, position pos, coder &e, frame *top) { if (e.encode(level,top)) { e.encode(act == WRITE ? inst::fieldsave : inst::fieldpush, offset); if (act == CALL) e.encode(inst::popcall); } else { frameError(pos); } } void qualifiedAccess::encode(action act, position pos, coder &e) { qualifier->encode(READ, pos, e); field->encode(act, pos, e, qualifierLevel); } void qualifiedAccess::encode(action act, position pos, coder &e, frame *top) { qualifier->encode(READ, pos, e, top); field->encode(act, pos, e, qualifierLevel); } } // namespace trans ./asymptote-2.41/runpath3d.h0000644000175000017500000000027213064427126015621 0ustar norbertnorbert/***** Autogenerated from runpath3d.in; changes will be overwritten *****/ #ifndef runpath3d_H #define runpath3d_H namespace run { void nullPath3(vm::stack *); } #endif // runpath3d_H ./asymptote-2.41/predicates.cc0000644000175000017500000034201313064427076016200 0ustar norbertnorbert/*****************************************************************************/ /* */ /* Routines for Arbitrary Precision Floating-point Arithmetic */ /* and Fast Robust Geometric Predicates */ /* (predicates.c) */ /* */ /* May 18, 1996 */ /* */ /* Placed in the public domain by */ /* Jonathan Richard Shewchuk */ /* School of Computer Science */ /* Carnegie Mellon University */ /* 5000 Forbes Avenue */ /* Pittsburgh, Pennsylvania 15213-3891 */ /* jrs@cs.cmu.edu */ /* */ /* This file contains C implementation of algorithms for exact addition */ /* and multiplication of floating-point numbers, and predicates for */ /* robustly performing the orientation and incircle tests used in */ /* computational geometry. The algorithms and underlying theory are */ /* described in Jonathan Richard Shewchuk. "Adaptive Precision Floating- */ /* Point Arithmetic and Fast Robust Geometric Predicates." Technical */ /* Report CMU-CS-96-140, School of Computer Science, Carnegie Mellon */ /* University, Pittsburgh, Pennsylvania, May 1996. (Submitted to */ /* Discrete & Computational Geometry.) */ /* */ /* This file, the paper listed above, and other information are available */ /* from the Web page http://www.cs.cmu.edu/~quake/robust.html . */ /* */ /*****************************************************************************/ /*****************************************************************************/ /* */ /* Using this code: */ /* */ /* First, read the short or long version of the paper (from the Web page */ /* above). */ /* */ /* Be sure to call exactinit() once, before calling any of the arithmetic */ /* functions or geometric predicates. Also be sure to turn on the */ /* optimizer when compiling this file. */ /* */ /* */ /* Several geometric predicates are defined. Their parameters are all */ /* points. Each point is an array of two or three floating-point */ /* numbers. The geometric predicates, described in the papers, are */ /* */ /* orient2d(pa, pb, pc) */ /* orient2dfast(pa, pb, pc) */ /* orient3d(pa, pb, pc, pd) */ /* orient3dfast(pa, pb, pc, pd) */ /* incircle(pa, pb, pc, pd) */ /* incirclefast(pa, pb, pc, pd) */ /* insphere(pa, pb, pc, pd, pe) */ /* inspherefast(pa, pb, pc, pd, pe) */ /* */ /* Those with suffix "fast" are approximate, non-robust versions. Those */ /* without the suffix are adaptive precision, robust versions. There */ /* are also versions with the suffices "exact" and "slow", which are */ /* non-adaptive, exact arithmetic versions, which I use only for timings */ /* in my arithmetic papers. */ /* */ /* */ /* An expansion is represented by an array of floating-point numbers, */ /* sorted from smallest to largest magnitude (possibly with interspersed */ /* zeros). The length of each expansion is stored as a separate integer, */ /* and each arithmetic function returns an integer which is the length */ /* of the expansion it created. */ /* */ /* Several arithmetic functions are defined. Their parameters are */ /* */ /* e, f Input expansions */ /* elen, flen Lengths of input expansions (must be >= 1) */ /* h Output expansion */ /* b Input scalar */ /* */ /* The arithmetic functions are */ /* */ /* grow_expansion(elen, e, b, h) */ /* grow_expansion_zeroelim(elen, e, b, h) */ /* expansion_sum(elen, e, flen, f, h) */ /* expansion_sum_zeroelim1(elen, e, flen, f, h) */ /* expansion_sum_zeroelim2(elen, e, flen, f, h) */ /* fast_expansion_sum(elen, e, flen, f, h) */ /* fast_expansion_sum_zeroelim(elen, e, flen, f, h) */ /* linear_expansion_sum(elen, e, flen, f, h) */ /* linear_expansion_sum_zeroelim(elen, e, flen, f, h) */ /* scale_expansion(elen, e, b, h) */ /* scale_expansion_zeroelim(elen, e, b, h) */ /* compress(elen, e, h) */ /* */ /* All of these are described in the long version of the paper; some are */ /* described in the short version. All return an integer that is the */ /* length of h. Those with suffix _zeroelim perform zero elimination, */ /* and are recommended over their counterparts. The procedure */ /* fast_expansion_sum_zeroelim() (or linear_expansion_sum_zeroelim() on */ /* processors that do not use the round-to-even tiebreaking rule) is */ /* recommended over expansion_sum_zeroelim(). Each procedure has a */ /* little note next to it (in the code below) that tells you whether or */ /* not the output expansion may be the same array as one of the input */ /* expansions. */ /* */ /* */ /* If you look around below, you'll also find macros for a bunch of */ /* simple unrolled arithmetic operations, and procedures for printing */ /* expansions (commented out because they don't work with all C */ /* compilers) and for generating random floating-point numbers whose */ /* significand bits are all random. Most of the macros have undocumented */ /* requirements that certain of their parameters should not be the same */ /* variable; for safety, better to make sure all the parameters are */ /* distinct variables. Feel free to send email to jrs@cs.cmu.edu if you */ /* have questions. */ /* */ /*****************************************************************************/ #include #include #include #include #include "predicates.h" /* FPU control. We MUST have only double precision (not extended precision) */ #include "rounding.h" /* On some machines, the exact arithmetic routines might be defeated by the */ /* use of internal extended precision floating-point registers. Sometimes */ /* this problem can be fixed by defining certain values to be volatile, */ /* thus forcing them to be stored to memory and rounded off. This isn't */ /* a great solution, though, as it slows the arithmetic down. */ /* */ /* To try this out, write "#define INEXACT volatile" below. Normally, */ /* however, INEXACT should be defined to be nothing. ("#define INEXACT".) */ #define INEXACT /* Nothing */ /* #define INEXACT volatile */ #define REAL double /* float or double */ #define REALPRINT doubleprint #define REALRAND doublerand #define NARROWRAND narrowdoublerand #define UNIFORMRAND uniformdoublerand /* Which of the following two methods of finding the absolute values is */ /* fastest is compiler-dependent. A few compilers can inline and optimize */ /* the fabs() call; but most will incur the overhead of a function call, */ /* which is disastrously slow. A faster way on IEEE machines might be to */ /* mask the appropriate bit, but that's difficult to do in C. */ /*#define Absolute(a) ((a) >= 0.0 ? (a) : -(a)) */ #define Absolute(a) fabs(a) /* Many of the operations are broken up into two pieces, a main part that */ /* performs an approximate operation, and a "tail" that computes the */ /* roundoff error of that operation. */ /* */ /* The operations Fast_Two_Sum(), Fast_Two_Diff(), Two_Sum(), Two_Diff(), */ /* Split(), and Two_Product() are all implemented as described in the */ /* reference. Each of these macros requires certain variables to be */ /* defined in the calling routine. The variables `bvirt', `c', `abig', */ /* `_i', `_j', `_k', `_l', `_m', and `_n' are declared `INEXACT' because */ /* they store the result of an operation that may incur roundoff error. */ /* The input parameter `x' (or the highest numbered `x_' parameter) must */ /* also be declared `INEXACT'. */ #define Fast_Two_Sum_Tail(a, b, x, y) \ bvirt = x - a; \ y = b - bvirt #define Fast_Two_Sum(a, b, x, y) \ x = (REAL) (a + b); \ Fast_Two_Sum_Tail(a, b, x, y) #define Fast_Two_Diff_Tail(a, b, x, y) \ bvirt = a - x; \ y = bvirt - b #define Fast_Two_Diff(a, b, x, y) \ x = (REAL) (a - b); \ Fast_Two_Diff_Tail(a, b, x, y) #define Two_Sum_Tail(a, b, x, y) \ bvirt = (REAL) (x - a); \ avirt = x - bvirt; \ bround = b - bvirt; \ around = a - avirt; \ y = around + bround #define Two_Sum(a, b, x, y) \ x = (REAL) (a + b); \ Two_Sum_Tail(a, b, x, y) #define Two_Diff_Tail(a, b, x, y) \ bvirt = (REAL) (a - x); \ avirt = x + bvirt; \ bround = bvirt - b; \ around = a - avirt; \ y = around + bround #define Two_Diff(a, b, x, y) \ x = (REAL) (a - b); \ Two_Diff_Tail(a, b, x, y) #define Split(a, ahi, alo) \ c = (REAL) (splitter * a); \ abig = (REAL) (c - a); \ ahi = c - abig; \ alo = a - ahi #define Two_Product_Tail(a, b, x, y) \ Split(a, ahi, alo); \ Split(b, bhi, blo); \ err1 = x - (ahi * bhi); \ err2 = err1 - (alo * bhi); \ err3 = err2 - (ahi * blo); \ y = (alo * blo) - err3 #define Two_Product(a, b, x, y) \ x = (REAL) (a * b); \ Two_Product_Tail(a, b, x, y) /* Two_Product_Presplit() is Two_Product() where one of the inputs has */ /* already been split. Avoids redundant splitting. */ #define Two_Product_Presplit(a, b, bhi, blo, x, y) \ x = (REAL) (a * b); \ Split(a, ahi, alo); \ err1 = x - (ahi * bhi); \ err2 = err1 - (alo * bhi); \ err3 = err2 - (ahi * blo); \ y = (alo * blo) - err3 /* Two_Product_2Presplit() is Two_Product() where both of the inputs have */ /* already been split. Avoids redundant splitting. */ #define Two_Product_2Presplit(a, ahi, alo, b, bhi, blo, x, y) \ x = (REAL) (a * b); \ err1 = x - (ahi * bhi); \ err2 = err1 - (alo * bhi); \ err3 = err2 - (ahi * blo); \ y = (alo * blo) - err3 /* Square() can be done more quickly than Two_Product(). */ #define Square_Tail(a, x, y) \ Split(a, ahi, alo); \ err1 = x - (ahi * ahi); \ err3 = err1 - ((ahi + ahi) * alo); \ y = (alo * alo) - err3 #define Square(a, x, y) \ x = (REAL) (a * a); \ Square_Tail(a, x, y) /* Macros for summing expansions of various fixed lengths. These are all */ /* unrolled versions of Expansion_Sum(). */ #define Two_One_Sum(a1, a0, b, x2, x1, x0) \ Two_Sum(a0, b , _i, x0); \ Two_Sum(a1, _i, x2, x1) #define Two_One_Diff(a1, a0, b, x2, x1, x0) \ Two_Diff(a0, b , _i, x0); \ Two_Sum( a1, _i, x2, x1) #define Two_Two_Sum(a1, a0, b1, b0, x3, x2, x1, x0) \ Two_One_Sum(a1, a0, b0, _j, _0, x0); \ Two_One_Sum(_j, _0, b1, x3, x2, x1) #define Two_Two_Diff(a1, a0, b1, b0, x3, x2, x1, x0) \ Two_One_Diff(a1, a0, b0, _j, _0, x0); \ Two_One_Diff(_j, _0, b1, x3, x2, x1) #define Four_One_Sum(a3, a2, a1, a0, b, x4, x3, x2, x1, x0) \ Two_One_Sum(a1, a0, b , _j, x1, x0); \ Two_One_Sum(a3, a2, _j, x4, x3, x2) #define Four_Two_Sum(a3, a2, a1, a0, b1, b0, x5, x4, x3, x2, x1, x0) \ Four_One_Sum(a3, a2, a1, a0, b0, _k, _2, _1, _0, x0); \ Four_One_Sum(_k, _2, _1, _0, b1, x5, x4, x3, x2, x1) #define Four_Four_Sum(a3, a2, a1, a0, b4, b3, b1, b0, x7, x6, x5, x4, x3, x2, \ x1, x0) \ Four_Two_Sum(a3, a2, a1, a0, b1, b0, _l, _2, _1, _0, x1, x0); \ Four_Two_Sum(_l, _2, _1, _0, b4, b3, x7, x6, x5, x4, x3, x2) #define Eight_One_Sum(a7, a6, a5, a4, a3, a2, a1, a0, b, x8, x7, x6, x5, x4, \ x3, x2, x1, x0) \ Four_One_Sum(a3, a2, a1, a0, b , _j, x3, x2, x1, x0); \ Four_One_Sum(a7, a6, a5, a4, _j, x8, x7, x6, x5, x4) #define Eight_Two_Sum(a7, a6, a5, a4, a3, a2, a1, a0, b1, b0, x9, x8, x7, \ x6, x5, x4, x3, x2, x1, x0) \ Eight_One_Sum(a7, a6, a5, a4, a3, a2, a1, a0, b0, _k, _6, _5, _4, _3, _2, \ _1, _0, x0); \ Eight_One_Sum(_k, _6, _5, _4, _3, _2, _1, _0, b1, x9, x8, x7, x6, x5, x4, \ x3, x2, x1) #define Eight_Four_Sum(a7, a6, a5, a4, a3, a2, a1, a0, b4, b3, b1, b0, x11, \ x10, x9, x8, x7, x6, x5, x4, x3, x2, x1, x0) \ Eight_Two_Sum(a7, a6, a5, a4, a3, a2, a1, a0, b1, b0, _l, _6, _5, _4, _3, \ _2, _1, _0, x1, x0); \ Eight_Two_Sum(_l, _6, _5, _4, _3, _2, _1, _0, b4, b3, x11, x10, x9, x8, \ x7, x6, x5, x4, x3, x2) /* Macros for multiplying expansions of various fixed lengths. */ #define Two_One_Product(a1, a0, b, x3, x2, x1, x0) \ Split(b, bhi, blo); \ Two_Product_Presplit(a0, b, bhi, blo, _i, x0); \ Two_Product_Presplit(a1, b, bhi, blo, _j, _0); \ Two_Sum(_i, _0, _k, x1); \ Fast_Two_Sum(_j, _k, x3, x2) #define Four_One_Product(a3, a2, a1, a0, b, x7, x6, x5, x4, x3, x2, x1, x0) \ Split(b, bhi, blo); \ Two_Product_Presplit(a0, b, bhi, blo, _i, x0); \ Two_Product_Presplit(a1, b, bhi, blo, _j, _0); \ Two_Sum(_i, _0, _k, x1); \ Fast_Two_Sum(_j, _k, _i, x2); \ Two_Product_Presplit(a2, b, bhi, blo, _j, _0); \ Two_Sum(_i, _0, _k, x3); \ Fast_Two_Sum(_j, _k, _i, x4); \ Two_Product_Presplit(a3, b, bhi, blo, _j, _0); \ Two_Sum(_i, _0, _k, x5); \ Fast_Two_Sum(_j, _k, x7, x6) #define Two_Two_Product(a1, a0, b1, b0, x7, x6, x5, x4, x3, x2, x1, x0) \ Split(a0, a0hi, a0lo); \ Split(b0, bhi, blo); \ Two_Product_2Presplit(a0, a0hi, a0lo, b0, bhi, blo, _i, x0); \ Split(a1, a1hi, a1lo); \ Two_Product_2Presplit(a1, a1hi, a1lo, b0, bhi, blo, _j, _0); \ Two_Sum(_i, _0, _k, _1); \ Fast_Two_Sum(_j, _k, _l, _2); \ Split(b1, bhi, blo); \ Two_Product_2Presplit(a0, a0hi, a0lo, b1, bhi, blo, _i, _0); \ Two_Sum(_1, _0, _k, x1); \ Two_Sum(_2, _k, _j, _1); \ Two_Sum(_l, _j, _m, _2); \ Two_Product_2Presplit(a1, a1hi, a1lo, b1, bhi, blo, _j, _0); \ Two_Sum(_i, _0, _n, _0); \ Two_Sum(_1, _0, _i, x2); \ Two_Sum(_2, _i, _k, _1); \ Two_Sum(_m, _k, _l, _2); \ Two_Sum(_j, _n, _k, _0); \ Two_Sum(_1, _0, _j, x3); \ Two_Sum(_2, _j, _i, _1); \ Two_Sum(_l, _i, _m, _2); \ Two_Sum(_1, _k, _i, x4); \ Two_Sum(_2, _i, _k, x5); \ Two_Sum(_m, _k, x7, x6) /* An expansion of length two can be squared more quickly than finding the */ /* product of two different expansions of length two, and the result is */ /* guaranteed to have no more than six (rather than eight) components. */ #define Two_Square(a1, a0, x5, x4, x3, x2, x1, x0) \ Square(a0, _j, x0); \ _0 = a0 + a0; \ Two_Product(a1, _0, _k, _1); \ Two_One_Sum(_k, _1, _j, _l, _2, x1); \ Square(a1, _j, _1); \ Two_Two_Sum(_j, _1, _l, _2, x5, x4, x3, x2) /* 2^(-p), where p=DBL_MANT_DIG. Used to estimate roundoff errors. */ static const REAL epsilon=0.5*DBL_EPSILON; /* 2^ceiling(p/2) + 1. Used to split floats in half. */ static const REAL splitter=sqrt((DBL_MANT_DIG % 2 ? 2.0 : 1.0)/epsilon)+1.0; /* A set of coefficients used to calculate maximum roundoff errors. */ const REAL resulterrbound=(3.0 + 8.0 * epsilon) * epsilon; const REAL ccwerrboundA=(3.0 + 16.0 * epsilon) * epsilon; const REAL ccwerrboundB=(2.0 + 12.0 * epsilon) * epsilon; const REAL ccwerrboundC=(9.0 + 64.0 * epsilon) * epsilon * epsilon; const REAL o3derrboundA=(7.0 + 56.0 * epsilon) * epsilon; const REAL o3derrboundB=(3.0 + 28.0 * epsilon) * epsilon; const REAL o3derrboundC=(26.0 + 288.0 * epsilon) * epsilon * epsilon; const REAL iccerrboundA=(10.0 + 96.0 * epsilon) * epsilon; const REAL iccerrboundB=(4.0 + 48.0 * epsilon) * epsilon; const REAL iccerrboundC=(44.0 + 576.0 * epsilon) * epsilon * epsilon; const REAL isperrboundA=(16.0 + 224.0 * epsilon) * epsilon; const REAL isperrboundB=(5.0 + 72.0 * epsilon) * epsilon; const REAL isperrboundC=(71.0 + 1408.0 * epsilon) * epsilon * epsilon; /*****************************************************************************/ /* */ /* doubleprint() Print the bit representation of a double. */ /* */ /* Useful for debugging exact arithmetic routines. */ /* */ /*****************************************************************************/ /* void doubleprint(number) double number; { unsigned long long no; unsigned long long sign, expo; int exponent; int i, bottomi; no = *(unsigned long long *) &number; sign = no & 0x8000000000000000ll; expo = (no >> 52) & 0x7ffll; exponent = (int) expo; exponent = exponent - 1023; if (sign) { printf("-"); } else { printf(" "); } if (exponent == -1023) { printf( "0.0000000000000000000000000000000000000000000000000000_ ( )"); } else { printf("1."); bottomi = -1; for (i = 0; i < 52; i++) { if (no & 0x0008000000000000ll) { printf("1"); bottomi = i; } else { printf("0"); } no <<= 1; } printf("_%d (%d)", exponent, exponent - 1 - bottomi); } } */ /*****************************************************************************/ /* */ /* floatprint() Print the bit representation of a float. */ /* */ /* Useful for debugging exact arithmetic routines. */ /* */ /*****************************************************************************/ /* void floatprint(number) float number; { unsigned no; unsigned sign, expo; int exponent; int i, bottomi; no = *(unsigned *) &number; sign = no & 0x80000000; expo = (no >> 23) & 0xff; exponent = (int) expo; exponent = exponent - 127; if (sign) { printf("-"); } else { printf(" "); } if (exponent == -127) { printf("0.00000000000000000000000_ ( )"); } else { printf("1."); bottomi = -1; for (i = 0; i < 23; i++) { if (no & 0x00400000) { printf("1"); bottomi = i; } else { printf("0"); } no <<= 1; } printf("_%3d (%3d)", exponent, exponent - 1 - bottomi); } } */ /*****************************************************************************/ /* */ /* expansion_print() Print the bit representation of an expansion. */ /* */ /* Useful for debugging exact arithmetic routines. */ /* */ /*****************************************************************************/ /* void expansion_print(elen, e) int elen; REAL *e; { int i; for (i = elen - 1; i >= 0; i--) { REALPRINT(e[i]); if (i > 0) { printf(" +\n"); } else { printf("\n"); } } } */ /*****************************************************************************/ /* */ /* doublerand() Generate a double with random 53-bit significand and a */ /* random exponent in [0, 511]. */ /* */ /*****************************************************************************/ /* static double doublerand() { double result; double expo; long a, b, c; long i; a = random(); b = random(); c = random(); result = (double) (a - 1073741824) * 8388608.0 + (double) (b >> 8); for (i = 512, expo = 2; i <= 131072; i *= 2, expo = expo * expo) { if (c & i) { result *= expo; } } return result; } */ /*****************************************************************************/ /* */ /* narrowdoublerand() Generate a double with random 53-bit significand */ /* and a random exponent in [0, 7]. */ /* */ /*****************************************************************************/ /* static double narrowdoublerand() { double result; double expo; long a, b, c; long i; a = random(); b = random(); c = random(); result = (double) (a - 1073741824) * 8388608.0 + (double) (b >> 8); for (i = 512, expo = 2; i <= 2048; i *= 2, expo = expo * expo) { if (c & i) { result *= expo; } } return result; } */ /*****************************************************************************/ /* */ /* uniformdoublerand() Generate a double with random 53-bit significand. */ /* */ /*****************************************************************************/ /* static double uniformdoublerand() { double result; long a, b; a = random(); b = random(); result = (double) (a - 1073741824) * 8388608.0 + (double) (b >> 8); return result; } */ /*****************************************************************************/ /* */ /* floatrand() Generate a float with random 24-bit significand and a */ /* random exponent in [0, 63]. */ /* */ /*****************************************************************************/ /* static float floatrand() { float result; float expo; long a, c; long i; a = random(); c = random(); result = (float) ((a - 1073741824) >> 6); for (i = 512, expo = 2; i <= 16384; i *= 2, expo = expo * expo) { if (c & i) { result *= expo; } } return result; } */ /*****************************************************************************/ /* */ /* narrowfloatrand() Generate a float with random 24-bit significand and */ /* a random exponent in [0, 7]. */ /* */ /*****************************************************************************/ /* static float narrowfloatrand() { float result; float expo; long a, c; long i; a = random(); c = random(); result = (float) ((a - 1073741824) >> 6); for (i = 512, expo = 2; i <= 2048; i *= 2, expo = expo * expo) { if (c & i) { result *= expo; } } return result; } */ /*****************************************************************************/ /* */ /* uniformfloatrand() Generate a float with random 24-bit significand. */ /* */ /*****************************************************************************/ /* static float uniformfloatrand() { float result; long a; a = random(); result = (float) ((a - 1073741824) >> 6); return result; } */ /*****************************************************************************/ /* */ /* fast_expansion_sum_zeroelim() Sum two expansions, eliminating zero */ /* components from the output expansion. */ /* */ /* Sets h = e + f. See the long version of my paper for details. */ /* */ /* If round-to-even is used (as with IEEE 754), maintains the strongly */ /* nonoverlapping property. (That is, if e is strongly nonoverlapping, h */ /* will be also.) Does NOT maintain the nonoverlapping or nonadjacent */ /* properties. */ /* */ /*****************************************************************************/ static int fast_expansion_sum_zeroelim(int elen, REAL *e, int flen, REAL *f, REAL *h) /* h cannot be e or f. */ { REAL Q; INEXACT REAL Qnew; INEXACT REAL hh; INEXACT REAL bvirt; REAL avirt, bround, around; int eindex, findex, hindex; REAL enow, fnow; enow = e[0]; fnow = f[0]; eindex = findex = 0; if ((fnow > enow) == (fnow > -enow)) { Q = enow; enow = e[++eindex]; } else { Q = fnow; fnow = f[++findex]; } hindex = 0; if ((eindex < elen) && (findex < flen)) { if ((fnow > enow) == (fnow > -enow)) { Fast_Two_Sum(enow, Q, Qnew, hh); enow = e[++eindex]; } else { Fast_Two_Sum(fnow, Q, Qnew, hh); fnow = f[++findex]; } Q = Qnew; if (hh != 0.0) { h[hindex++] = hh; } while ((eindex < elen) && (findex < flen)) { if ((fnow > enow) == (fnow > -enow)) { Two_Sum(Q, enow, Qnew, hh); enow = e[++eindex]; } else { Two_Sum(Q, fnow, Qnew, hh); fnow = f[++findex]; } Q = Qnew; if (hh != 0.0) { h[hindex++] = hh; } } } while (eindex < elen) { Two_Sum(Q, enow, Qnew, hh); enow = e[++eindex]; Q = Qnew; if (hh != 0.0) { h[hindex++] = hh; } } while (findex < flen) { Two_Sum(Q, fnow, Qnew, hh); fnow = f[++findex]; Q = Qnew; if (hh != 0.0) { h[hindex++] = hh; } } if ((Q != 0.0) || (hindex == 0)) { h[hindex++] = Q; } return hindex; } /*****************************************************************************/ /* */ /* scale_expansion_zeroelim() Multiply an expansion by a scalar, */ /* eliminating zero components from the */ /* output expansion. */ /* */ /* Sets h = be. See either version of my paper for details. */ /* */ /* Maintains the nonoverlapping property. If round-to-even is used (as */ /* with IEEE 754), maintains the strongly nonoverlapping and nonadjacent */ /* properties as well. (That is, if e has one of these properties, so */ /* will h.) */ /* */ /*****************************************************************************/ static int scale_expansion_zeroelim(int elen, REAL *e, REAL b, REAL *h) /* e and h cannot be the same. */ { INEXACT REAL Q, sum; REAL hh; INEXACT REAL product1; REAL product0; int eindex, hindex; REAL enow; INEXACT REAL bvirt; REAL avirt, bround, around; INEXACT REAL c; INEXACT REAL abig; REAL ahi, alo, bhi, blo; REAL err1, err2, err3; Split(b, bhi, blo); Two_Product_Presplit(e[0], b, bhi, blo, Q, hh); hindex = 0; if (hh != 0) { h[hindex++] = hh; } for (eindex = 1; eindex < elen; eindex++) { enow = e[eindex]; Two_Product_Presplit(enow, b, bhi, blo, product1, product0); Two_Sum(Q, product0, sum, hh); if (hh != 0) { h[hindex++] = hh; } Fast_Two_Sum(product1, sum, Q, hh); if (hh != 0) { h[hindex++] = hh; } } if ((Q != 0.0) || (hindex == 0)) { h[hindex++] = Q; } return hindex; } /*****************************************************************************/ /* */ /* estimate() Produce a one-word estimate of an expansion's value. */ /* */ /* See either version of my paper for details. */ /* */ /*****************************************************************************/ static REAL estimate(int elen, REAL *e) { REAL Q; int eindex; Q = e[0]; for (eindex = 1; eindex < elen; eindex++) { Q += e[eindex]; } return Q; } /*****************************************************************************/ /* */ /* orient2dfast() Approximate 2D orientation test. Nonrobust. */ /* orient2dexact() Exact 2D orientation test. Robust. */ /* orient2dslow() Another exact 2D orientation test. Robust. */ /* orient2d() Adaptive exact 2D orientation test. Robust. */ /* */ /* Return a positive value if the points pa, pb, and pc occur */ /* in counterclockwise order; a negative value if they occur */ /* in clockwise order; and zero if they are collinear. The */ /* result is also a rough approximation of twice the signed */ /* area of the triangle defined by the three points. */ /* */ /* Only the first and last routine should be used; the middle two are for */ /* timings. */ /* */ /* The last three use exact arithmetic to ensure a correct answer. The */ /* result returned is the determinant of a matrix. In orient2d() only, */ /* this determinant is computed adaptively, in the sense that exact */ /* arithmetic is used only to the degree it is needed to ensure that the */ /* returned value has the correct sign. Hence, orient2d() is usually quite */ /* fast, but will run more slowly when the input points are collinear or */ /* nearly so. */ /* */ /*****************************************************************************/ REAL orient2dadapt(REAL *pa, REAL *pb, REAL *pc, REAL detsum) { INEXACT REAL acx, acy, bcx, bcy; REAL acxtail, acytail, bcxtail, bcytail; INEXACT REAL detleft, detright; REAL detlefttail, detrighttail; REAL det, errbound; REAL B[4], C1[8], C2[12], D[16]; INEXACT REAL B3; int C1length, C2length, Dlength; REAL u[4]; INEXACT REAL u3; INEXACT REAL s1, t1; REAL s0, t0; INEXACT REAL bvirt; REAL avirt, bround, around; INEXACT REAL c; INEXACT REAL abig; REAL ahi, alo, bhi, blo; REAL err1, err2, err3; INEXACT REAL _i, _j; REAL _0; acx = (REAL) (pa[0] - pc[0]); bcx = (REAL) (pb[0] - pc[0]); acy = (REAL) (pa[1] - pc[1]); bcy = (REAL) (pb[1] - pc[1]); Two_Product(acx, bcy, detleft, detlefttail); Two_Product(acy, bcx, detright, detrighttail); Two_Two_Diff(detleft, detlefttail, detright, detrighttail, B3, B[2], B[1], B[0]); B[3] = B3; det = estimate(4, B); errbound = ccwerrboundB * detsum; if ((det >= errbound) || (-det >= errbound)) { return det; } Two_Diff_Tail(pa[0], pc[0], acx, acxtail); Two_Diff_Tail(pb[0], pc[0], bcx, bcxtail); Two_Diff_Tail(pa[1], pc[1], acy, acytail); Two_Diff_Tail(pb[1], pc[1], bcy, bcytail); if ((acxtail == 0.0) && (acytail == 0.0) && (bcxtail == 0.0) && (bcytail == 0.0)) { return det; } errbound = ccwerrboundC * detsum + resulterrbound * Absolute(det); det += (acx * bcytail + bcy * acxtail) - (acy * bcxtail + bcx * acytail); if ((det >= errbound) || (-det >= errbound)) { return det; } Two_Product(acxtail, bcy, s1, s0); Two_Product(acytail, bcx, t1, t0); Two_Two_Diff(s1, s0, t1, t0, u3, u[2], u[1], u[0]); u[3] = u3; C1length = fast_expansion_sum_zeroelim(4, B, 4, u, C1); Two_Product(acx, bcytail, s1, s0); Two_Product(acy, bcxtail, t1, t0); Two_Two_Diff(s1, s0, t1, t0, u3, u[2], u[1], u[0]); u[3] = u3; C2length = fast_expansion_sum_zeroelim(C1length, C1, 4, u, C2); Two_Product(acxtail, bcytail, s1, s0); Two_Product(acytail, bcxtail, t1, t0); Two_Two_Diff(s1, s0, t1, t0, u3, u[2], u[1], u[0]); u[3] = u3; Dlength = fast_expansion_sum_zeroelim(C2length, C2, 4, u, D); return(D[Dlength - 1]); } REAL orient2d(REAL *pa, REAL *pb, REAL *pc) { REAL detleft, detright, det; REAL detsum, errbound; REAL orient; FPU_ROUND_DOUBLE; detleft = (pa[0] - pc[0]) * (pb[1] - pc[1]); detright = (pa[1] - pc[1]) * (pb[0] - pc[0]); det = detleft - detright; if (detleft > 0.0) { if (detright <= 0.0) { FPU_RESTORE; return det; } else { detsum = detleft + detright; } } else if (detleft < 0.0) { if (detright >= 0.0) { FPU_RESTORE; return det; } else { detsum = -detleft - detright; } } else { FPU_RESTORE; return det; } errbound = ccwerrboundA * detsum; if ((det >= errbound) || (-det >= errbound)) { FPU_RESTORE; return det; } orient = orient2dadapt(pa, pb, pc, detsum); FPU_RESTORE; return orient; } REAL orient2d(REAL ax, REAL ay, REAL bx, REAL by, REAL cx, REAL cy) { REAL detleft, detright, det; REAL detsum, errbound; REAL orient; FPU_ROUND_DOUBLE; detleft = (ax - cx) * (by - cy); detright = (ay - cy) * (bx - cx); det = detleft - detright; if (detleft > 0.0) { if (detright <= 0.0) { FPU_RESTORE; return det; } else { detsum = detleft + detright; } } else if (detleft < 0.0) { if (detright >= 0.0) { FPU_RESTORE; return det; } else { detsum = -detleft - detright; } } else { FPU_RESTORE; return det; } errbound = ccwerrboundA * detsum; if ((det >= errbound) || (-det >= errbound)) { FPU_RESTORE; return det; } REAL pa[]={ax,ay}; REAL pb[]={bx,by}; REAL pc[]={cx,cy}; orient = orient2dadapt(pa, pb, pc, detsum); FPU_RESTORE; return orient; } /*****************************************************************************/ /* */ /* orient3dfast() Approximate 3D orientation test. Nonrobust. */ /* orient3dexact() Exact 3D orientation test. Robust. */ /* orient3dslow() Another exact 3D orientation test. Robust. */ /* orient3d() Adaptive exact 3D orientation test. Robust. */ /* */ /* Return a positive value if the point pd lies below the */ /* plane passing through pa, pb, and pc; "below" is defined so */ /* that pa, pb, and pc appear in counterclockwise order when */ /* viewed from above the plane. Returns a negative value if */ /* pd lies above the plane. Returns zero if the points are */ /* coplanar. The result is also a rough approximation of six */ /* times the signed volume of the tetrahedron defined by the */ /* four points. */ /* */ /* Only the first and last routine should be used; the middle two are for */ /* timings. */ /* */ /* The last three use exact arithmetic to ensure a correct answer. The */ /* result returned is the determinant of a matrix. In orient3d() only, */ /* this determinant is computed adaptively, in the sense that exact */ /* arithmetic is used only to the degree it is needed to ensure that the */ /* returned value has the correct sign. Hence, orient3d() is usually quite */ /* fast, but will run more slowly when the input points are coplanar or */ /* nearly so. */ /* */ /*****************************************************************************/ static REAL orient3dadapt(REAL *pa, REAL *pb, REAL *pc, REAL *pd, REAL permanent) { INEXACT REAL adx, bdx, cdx, ady, bdy, cdy, adz, bdz, cdz; REAL det, errbound; INEXACT REAL bdxcdy1, cdxbdy1, cdxady1, adxcdy1, adxbdy1, bdxady1; REAL bdxcdy0, cdxbdy0, cdxady0, adxcdy0, adxbdy0, bdxady0; REAL bc[4], ca[4], ab[4]; INEXACT REAL bc3, ca3, ab3; REAL adet[8], bdet[8], cdet[8]; int alen, blen, clen; REAL abdet[16]; int ablen; REAL *finnow, *finother, *finswap; REAL fin1[192], fin2[192]; int finlength; REAL adxtail, bdxtail, cdxtail; REAL adytail, bdytail, cdytail; REAL adztail, bdztail, cdztail; INEXACT REAL at_blarge, at_clarge; INEXACT REAL bt_clarge, bt_alarge; INEXACT REAL ct_alarge, ct_blarge; REAL at_b[4], at_c[4], bt_c[4], bt_a[4], ct_a[4], ct_b[4]; int at_blen, at_clen, bt_clen, bt_alen, ct_alen, ct_blen; INEXACT REAL bdxt_cdy1, cdxt_bdy1, cdxt_ady1; INEXACT REAL adxt_cdy1, adxt_bdy1, bdxt_ady1; REAL bdxt_cdy0, cdxt_bdy0, cdxt_ady0; REAL adxt_cdy0, adxt_bdy0, bdxt_ady0; INEXACT REAL bdyt_cdx1, cdyt_bdx1, cdyt_adx1; INEXACT REAL adyt_cdx1, adyt_bdx1, bdyt_adx1; REAL bdyt_cdx0, cdyt_bdx0, cdyt_adx0; REAL adyt_cdx0, adyt_bdx0, bdyt_adx0; REAL bct[8], cat[8], abt[8]; int bctlen, catlen, abtlen; INEXACT REAL bdxt_cdyt1, cdxt_bdyt1, cdxt_adyt1; INEXACT REAL adxt_cdyt1, adxt_bdyt1, bdxt_adyt1; REAL bdxt_cdyt0, cdxt_bdyt0, cdxt_adyt0; REAL adxt_cdyt0, adxt_bdyt0, bdxt_adyt0; REAL u[4], v[12], w[16]; INEXACT REAL u3; int vlength, wlength; REAL negate; INEXACT REAL bvirt; REAL avirt, bround, around; INEXACT REAL c; INEXACT REAL abig; REAL ahi, alo, bhi, blo; REAL err1, err2, err3; INEXACT REAL _i, _j, _k; REAL _0; adx = (REAL) (pa[0] - pd[0]); bdx = (REAL) (pb[0] - pd[0]); cdx = (REAL) (pc[0] - pd[0]); ady = (REAL) (pa[1] - pd[1]); bdy = (REAL) (pb[1] - pd[1]); cdy = (REAL) (pc[1] - pd[1]); adz = (REAL) (pa[2] - pd[2]); bdz = (REAL) (pb[2] - pd[2]); cdz = (REAL) (pc[2] - pd[2]); Two_Product(bdx, cdy, bdxcdy1, bdxcdy0); Two_Product(cdx, bdy, cdxbdy1, cdxbdy0); Two_Two_Diff(bdxcdy1, bdxcdy0, cdxbdy1, cdxbdy0, bc3, bc[2], bc[1], bc[0]); bc[3] = bc3; alen = scale_expansion_zeroelim(4, bc, adz, adet); Two_Product(cdx, ady, cdxady1, cdxady0); Two_Product(adx, cdy, adxcdy1, adxcdy0); Two_Two_Diff(cdxady1, cdxady0, adxcdy1, adxcdy0, ca3, ca[2], ca[1], ca[0]); ca[3] = ca3; blen = scale_expansion_zeroelim(4, ca, bdz, bdet); Two_Product(adx, bdy, adxbdy1, adxbdy0); Two_Product(bdx, ady, bdxady1, bdxady0); Two_Two_Diff(adxbdy1, adxbdy0, bdxady1, bdxady0, ab3, ab[2], ab[1], ab[0]); ab[3] = ab3; clen = scale_expansion_zeroelim(4, ab, cdz, cdet); ablen = fast_expansion_sum_zeroelim(alen, adet, blen, bdet, abdet); finlength = fast_expansion_sum_zeroelim(ablen, abdet, clen, cdet, fin1); det = estimate(finlength, fin1); errbound = o3derrboundB * permanent; if ((det >= errbound) || (-det >= errbound)) { return det; } Two_Diff_Tail(pa[0], pd[0], adx, adxtail); Two_Diff_Tail(pb[0], pd[0], bdx, bdxtail); Two_Diff_Tail(pc[0], pd[0], cdx, cdxtail); Two_Diff_Tail(pa[1], pd[1], ady, adytail); Two_Diff_Tail(pb[1], pd[1], bdy, bdytail); Two_Diff_Tail(pc[1], pd[1], cdy, cdytail); Two_Diff_Tail(pa[2], pd[2], adz, adztail); Two_Diff_Tail(pb[2], pd[2], bdz, bdztail); Two_Diff_Tail(pc[2], pd[2], cdz, cdztail); if ((adxtail == 0.0) && (bdxtail == 0.0) && (cdxtail == 0.0) && (adytail == 0.0) && (bdytail == 0.0) && (cdytail == 0.0) && (adztail == 0.0) && (bdztail == 0.0) && (cdztail == 0.0)) { return det; } errbound = o3derrboundC * permanent + resulterrbound * Absolute(det); det += (adz * ((bdx * cdytail + cdy * bdxtail) - (bdy * cdxtail + cdx * bdytail)) + adztail * (bdx * cdy - bdy * cdx)) + (bdz * ((cdx * adytail + ady * cdxtail) - (cdy * adxtail + adx * cdytail)) + bdztail * (cdx * ady - cdy * adx)) + (cdz * ((adx * bdytail + bdy * adxtail) - (ady * bdxtail + bdx * adytail)) + cdztail * (adx * bdy - ady * bdx)); if ((det >= errbound) || (-det >= errbound)) { return det; } finnow = fin1; finother = fin2; if (adxtail == 0.0) { if (adytail == 0.0) { at_b[0] = 0.0; at_blen = 1; at_c[0] = 0.0; at_clen = 1; } else { negate = -adytail; Two_Product(negate, bdx, at_blarge, at_b[0]); at_b[1] = at_blarge; at_blen = 2; Two_Product(adytail, cdx, at_clarge, at_c[0]); at_c[1] = at_clarge; at_clen = 2; } } else { if (adytail == 0.0) { Two_Product(adxtail, bdy, at_blarge, at_b[0]); at_b[1] = at_blarge; at_blen = 2; negate = -adxtail; Two_Product(negate, cdy, at_clarge, at_c[0]); at_c[1] = at_clarge; at_clen = 2; } else { Two_Product(adxtail, bdy, adxt_bdy1, adxt_bdy0); Two_Product(adytail, bdx, adyt_bdx1, adyt_bdx0); Two_Two_Diff(adxt_bdy1, adxt_bdy0, adyt_bdx1, adyt_bdx0, at_blarge, at_b[2], at_b[1], at_b[0]); at_b[3] = at_blarge; at_blen = 4; Two_Product(adytail, cdx, adyt_cdx1, adyt_cdx0); Two_Product(adxtail, cdy, adxt_cdy1, adxt_cdy0); Two_Two_Diff(adyt_cdx1, adyt_cdx0, adxt_cdy1, adxt_cdy0, at_clarge, at_c[2], at_c[1], at_c[0]); at_c[3] = at_clarge; at_clen = 4; } } if (bdxtail == 0.0) { if (bdytail == 0.0) { bt_c[0] = 0.0; bt_clen = 1; bt_a[0] = 0.0; bt_alen = 1; } else { negate = -bdytail; Two_Product(negate, cdx, bt_clarge, bt_c[0]); bt_c[1] = bt_clarge; bt_clen = 2; Two_Product(bdytail, adx, bt_alarge, bt_a[0]); bt_a[1] = bt_alarge; bt_alen = 2; } } else { if (bdytail == 0.0) { Two_Product(bdxtail, cdy, bt_clarge, bt_c[0]); bt_c[1] = bt_clarge; bt_clen = 2; negate = -bdxtail; Two_Product(negate, ady, bt_alarge, bt_a[0]); bt_a[1] = bt_alarge; bt_alen = 2; } else { Two_Product(bdxtail, cdy, bdxt_cdy1, bdxt_cdy0); Two_Product(bdytail, cdx, bdyt_cdx1, bdyt_cdx0); Two_Two_Diff(bdxt_cdy1, bdxt_cdy0, bdyt_cdx1, bdyt_cdx0, bt_clarge, bt_c[2], bt_c[1], bt_c[0]); bt_c[3] = bt_clarge; bt_clen = 4; Two_Product(bdytail, adx, bdyt_adx1, bdyt_adx0); Two_Product(bdxtail, ady, bdxt_ady1, bdxt_ady0); Two_Two_Diff(bdyt_adx1, bdyt_adx0, bdxt_ady1, bdxt_ady0, bt_alarge, bt_a[2], bt_a[1], bt_a[0]); bt_a[3] = bt_alarge; bt_alen = 4; } } if (cdxtail == 0.0) { if (cdytail == 0.0) { ct_a[0] = 0.0; ct_alen = 1; ct_b[0] = 0.0; ct_blen = 1; } else { negate = -cdytail; Two_Product(negate, adx, ct_alarge, ct_a[0]); ct_a[1] = ct_alarge; ct_alen = 2; Two_Product(cdytail, bdx, ct_blarge, ct_b[0]); ct_b[1] = ct_blarge; ct_blen = 2; } } else { if (cdytail == 0.0) { Two_Product(cdxtail, ady, ct_alarge, ct_a[0]); ct_a[1] = ct_alarge; ct_alen = 2; negate = -cdxtail; Two_Product(negate, bdy, ct_blarge, ct_b[0]); ct_b[1] = ct_blarge; ct_blen = 2; } else { Two_Product(cdxtail, ady, cdxt_ady1, cdxt_ady0); Two_Product(cdytail, adx, cdyt_adx1, cdyt_adx0); Two_Two_Diff(cdxt_ady1, cdxt_ady0, cdyt_adx1, cdyt_adx0, ct_alarge, ct_a[2], ct_a[1], ct_a[0]); ct_a[3] = ct_alarge; ct_alen = 4; Two_Product(cdytail, bdx, cdyt_bdx1, cdyt_bdx0); Two_Product(cdxtail, bdy, cdxt_bdy1, cdxt_bdy0); Two_Two_Diff(cdyt_bdx1, cdyt_bdx0, cdxt_bdy1, cdxt_bdy0, ct_blarge, ct_b[2], ct_b[1], ct_b[0]); ct_b[3] = ct_blarge; ct_blen = 4; } } bctlen = fast_expansion_sum_zeroelim(bt_clen, bt_c, ct_blen, ct_b, bct); wlength = scale_expansion_zeroelim(bctlen, bct, adz, w); finlength = fast_expansion_sum_zeroelim(finlength, finnow, wlength, w, finother); finswap = finnow; finnow = finother; finother = finswap; catlen = fast_expansion_sum_zeroelim(ct_alen, ct_a, at_clen, at_c, cat); wlength = scale_expansion_zeroelim(catlen, cat, bdz, w); finlength = fast_expansion_sum_zeroelim(finlength, finnow, wlength, w, finother); finswap = finnow; finnow = finother; finother = finswap; abtlen = fast_expansion_sum_zeroelim(at_blen, at_b, bt_alen, bt_a, abt); wlength = scale_expansion_zeroelim(abtlen, abt, cdz, w); finlength = fast_expansion_sum_zeroelim(finlength, finnow, wlength, w, finother); finswap = finnow; finnow = finother; finother = finswap; if (adztail != 0.0) { vlength = scale_expansion_zeroelim(4, bc, adztail, v); finlength = fast_expansion_sum_zeroelim(finlength, finnow, vlength, v, finother); finswap = finnow; finnow = finother; finother = finswap; } if (bdztail != 0.0) { vlength = scale_expansion_zeroelim(4, ca, bdztail, v); finlength = fast_expansion_sum_zeroelim(finlength, finnow, vlength, v, finother); finswap = finnow; finnow = finother; finother = finswap; } if (cdztail != 0.0) { vlength = scale_expansion_zeroelim(4, ab, cdztail, v); finlength = fast_expansion_sum_zeroelim(finlength, finnow, vlength, v, finother); finswap = finnow; finnow = finother; finother = finswap; } if (adxtail != 0.0) { if (bdytail != 0.0) { Two_Product(adxtail, bdytail, adxt_bdyt1, adxt_bdyt0); Two_One_Product(adxt_bdyt1, adxt_bdyt0, cdz, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; if (cdztail != 0.0) { Two_One_Product(adxt_bdyt1, adxt_bdyt0, cdztail, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; } } if (cdytail != 0.0) { negate = -adxtail; Two_Product(negate, cdytail, adxt_cdyt1, adxt_cdyt0); Two_One_Product(adxt_cdyt1, adxt_cdyt0, bdz, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; if (bdztail != 0.0) { Two_One_Product(adxt_cdyt1, adxt_cdyt0, bdztail, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; } } } if (bdxtail != 0.0) { if (cdytail != 0.0) { Two_Product(bdxtail, cdytail, bdxt_cdyt1, bdxt_cdyt0); Two_One_Product(bdxt_cdyt1, bdxt_cdyt0, adz, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; if (adztail != 0.0) { Two_One_Product(bdxt_cdyt1, bdxt_cdyt0, adztail, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; } } if (adytail != 0.0) { negate = -bdxtail; Two_Product(negate, adytail, bdxt_adyt1, bdxt_adyt0); Two_One_Product(bdxt_adyt1, bdxt_adyt0, cdz, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; if (cdztail != 0.0) { Two_One_Product(bdxt_adyt1, bdxt_adyt0, cdztail, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; } } } if (cdxtail != 0.0) { if (adytail != 0.0) { Two_Product(cdxtail, adytail, cdxt_adyt1, cdxt_adyt0); Two_One_Product(cdxt_adyt1, cdxt_adyt0, bdz, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; if (bdztail != 0.0) { Two_One_Product(cdxt_adyt1, cdxt_adyt0, bdztail, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; } } if (bdytail != 0.0) { negate = -cdxtail; Two_Product(negate, bdytail, cdxt_bdyt1, cdxt_bdyt0); Two_One_Product(cdxt_bdyt1, cdxt_bdyt0, adz, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; if (adztail != 0.0) { Two_One_Product(cdxt_bdyt1, cdxt_bdyt0, adztail, u3, u[2], u[1], u[0]); u[3] = u3; finlength = fast_expansion_sum_zeroelim(finlength, finnow, 4, u, finother); finswap = finnow; finnow = finother; finother = finswap; } } } if (adztail != 0.0) { wlength = scale_expansion_zeroelim(bctlen, bct, adztail, w); finlength = fast_expansion_sum_zeroelim(finlength, finnow, wlength, w, finother); finswap = finnow; finnow = finother; finother = finswap; } if (bdztail != 0.0) { wlength = scale_expansion_zeroelim(catlen, cat, bdztail, w); finlength = fast_expansion_sum_zeroelim(finlength, finnow, wlength, w, finother); finswap = finnow; finnow = finother; finother = finswap; } if (cdztail != 0.0) { wlength = scale_expansion_zeroelim(abtlen, abt, cdztail, w); finlength = fast_expansion_sum_zeroelim(finlength, finnow, wlength, w, finother); finswap = finnow; finnow = finother; finother = finswap; } return finnow[finlength - 1]; } REAL orient3d(REAL *pa, REAL *pb, REAL *pc, REAL *pd) { REAL adx, bdx, cdx, ady, bdy, cdy, adz, bdz, cdz; REAL bdxcdy, cdxbdy, cdxady, adxcdy, adxbdy, bdxady; REAL det; REAL permanent, errbound; REAL orient; FPU_ROUND_DOUBLE; adx = pa[0] - pd[0]; bdx = pb[0] - pd[0]; cdx = pc[0] - pd[0]; ady = pa[1] - pd[1]; bdy = pb[1] - pd[1]; cdy = pc[1] - pd[1]; adz = pa[2] - pd[2]; bdz = pb[2] - pd[2]; cdz = pc[2] - pd[2]; bdxcdy = bdx * cdy; cdxbdy = cdx * bdy; cdxady = cdx * ady; adxcdy = adx * cdy; adxbdy = adx * bdy; bdxady = bdx * ady; det = adz * (bdxcdy - cdxbdy) + bdz * (cdxady - adxcdy) + cdz * (adxbdy - bdxady); permanent = (Absolute(bdxcdy) + Absolute(cdxbdy)) * Absolute(adz) + (Absolute(cdxady) + Absolute(adxcdy)) * Absolute(bdz) + (Absolute(adxbdy) + Absolute(bdxady)) * Absolute(cdz); errbound = o3derrboundA * permanent; if ((det > errbound) || (-det > errbound)) { FPU_RESTORE; return det; } orient = orient3dadapt(pa, pb, pc, pd, permanent); FPU_RESTORE; return orient; } /*****************************************************************************/ /* */ /* incirclefast() Approximate 2D incircle test. Nonrobust. */ /* incircleexact() Exact 2D incircle test. Robust. */ /* incircleslow() Another exact 2D incircle test. Robust. */ /* incircle() Adaptive exact 2D incircle test. Robust. */ /* */ /* Return a positive value if the point pd lies inside the */ /* circle passing through pa, pb, and pc; a negative value if */ /* it lies outside; and zero if the four points are cocircular.*/ /* The points pa, pb, and pc must be in counterclockwise */ /* order, or the sign of the result will be reversed. */ /* */ /* Only the first and last routine should be used; the middle two are for */ /* timings. */ /* */ /* The last three use exact arithmetic to ensure a correct answer. The */ /* result returned is the determinant of a matrix. In incircle() only, */ /* this determinant is computed adaptively, in the sense that exact */ /* arithmetic is used only to the degree it is needed to ensure that the */ /* returned value has the correct sign. Hence, incircle() is usually quite */ /* fast, but will run more slowly when the input points are cocircular or */ /* nearly so. */ /* */ /*****************************************************************************/ static REAL incircleadapt(REAL *pa, REAL *pb, REAL *pc, REAL *pd, REAL permanent) { INEXACT REAL adx, bdx, cdx, ady, bdy, cdy; REAL det, errbound; INEXACT REAL bdxcdy1, cdxbdy1, cdxady1, adxcdy1, adxbdy1, bdxady1; REAL bdxcdy0, cdxbdy0, cdxady0, adxcdy0, adxbdy0, bdxady0; REAL bc[4], ca[4], ab[4]; INEXACT REAL bc3, ca3, ab3; REAL axbc[8], axxbc[16], aybc[8], ayybc[16], adet[32]; int axbclen, axxbclen, aybclen, ayybclen, alen; REAL bxca[8], bxxca[16], byca[8], byyca[16], bdet[32]; int bxcalen, bxxcalen, bycalen, byycalen, blen; REAL cxab[8], cxxab[16], cyab[8], cyyab[16], cdet[32]; int cxablen, cxxablen, cyablen, cyyablen, clen; REAL abdet[64]; int ablen; REAL fin1[1152], fin2[1152]; REAL *finnow, *finother, *finswap; int finlength; REAL adxtail, bdxtail, cdxtail, adytail, bdytail, cdytail; INEXACT REAL adxadx1, adyady1, bdxbdx1, bdybdy1, cdxcdx1, cdycdy1; REAL adxadx0, adyady0, bdxbdx0, bdybdy0, cdxcdx0, cdycdy0; REAL aa[4], bb[4], cc[4]; INEXACT REAL aa3, bb3, cc3; INEXACT REAL ti1, tj1; REAL ti0, tj0; REAL u[4], v[4]; INEXACT REAL u3, v3; REAL temp8[8], temp16a[16], temp16b[16], temp16c[16]; REAL temp32a[32], temp32b[32], temp48[48], temp64[64]; int temp8len, temp16alen, temp16blen, temp16clen; int temp32alen, temp32blen, temp48len, temp64len; REAL axtbb[8], axtcc[8], aytbb[8], aytcc[8]; int axtbblen, axtcclen, aytbblen, aytcclen; REAL bxtaa[8], bxtcc[8], bytaa[8], bytcc[8]; int bxtaalen, bxtcclen, bytaalen, bytcclen; REAL cxtaa[8], cxtbb[8], cytaa[8], cytbb[8]; int cxtaalen, cxtbblen, cytaalen, cytbblen; REAL axtbc[8], aytbc[8], bxtca[8], bytca[8], cxtab[8], cytab[8]; int axtbclen = 0, aytbclen = 0; int bxtcalen = 0, bytcalen = 0; int cxtablen = 0, cytablen = 0; REAL axtbct[16], aytbct[16], bxtcat[16], bytcat[16], cxtabt[16], cytabt[16]; int axtbctlen, aytbctlen, bxtcatlen, bytcatlen, cxtabtlen, cytabtlen; REAL axtbctt[8], aytbctt[8], bxtcatt[8]; REAL bytcatt[8], cxtabtt[8], cytabtt[8]; int axtbcttlen, aytbcttlen, bxtcattlen, bytcattlen, cxtabttlen, cytabttlen; REAL abt[8], bct[8], cat[8]; int abtlen, bctlen, catlen; REAL abtt[4], bctt[4], catt[4]; int abttlen, bcttlen, cattlen; INEXACT REAL abtt3, bctt3, catt3; REAL negate; INEXACT REAL bvirt; REAL avirt, bround, around; INEXACT REAL c; INEXACT REAL abig; REAL ahi, alo, bhi, blo; REAL err1, err2, err3; INEXACT REAL _i, _j; REAL _0; adx = (REAL) (pa[0] - pd[0]); bdx = (REAL) (pb[0] - pd[0]); cdx = (REAL) (pc[0] - pd[0]); ady = (REAL) (pa[1] - pd[1]); bdy = (REAL) (pb[1] - pd[1]); cdy = (REAL) (pc[1] - pd[1]); Two_Product(bdx, cdy, bdxcdy1, bdxcdy0); Two_Product(cdx, bdy, cdxbdy1, cdxbdy0); Two_Two_Diff(bdxcdy1, bdxcdy0, cdxbdy1, cdxbdy0, bc3, bc[2], bc[1], bc[0]); bc[3] = bc3; axbclen = scale_expansion_zeroelim(4, bc, adx, axbc); axxbclen = scale_expansion_zeroelim(axbclen, axbc, adx, axxbc); aybclen = scale_expansion_zeroelim(4, bc, ady, aybc); ayybclen = scale_expansion_zeroelim(aybclen, aybc, ady, ayybc); alen = fast_expansion_sum_zeroelim(axxbclen, axxbc, ayybclen, ayybc, adet); Two_Product(cdx, ady, cdxady1, cdxady0); Two_Product(adx, cdy, adxcdy1, adxcdy0); Two_Two_Diff(cdxady1, cdxady0, adxcdy1, adxcdy0, ca3, ca[2], ca[1], ca[0]); ca[3] = ca3; bxcalen = scale_expansion_zeroelim(4, ca, bdx, bxca); bxxcalen = scale_expansion_zeroelim(bxcalen, bxca, bdx, bxxca); bycalen = scale_expansion_zeroelim(4, ca, bdy, byca); byycalen = scale_expansion_zeroelim(bycalen, byca, bdy, byyca); blen = fast_expansion_sum_zeroelim(bxxcalen, bxxca, byycalen, byyca, bdet); Two_Product(adx, bdy, adxbdy1, adxbdy0); Two_Product(bdx, ady, bdxady1, bdxady0); Two_Two_Diff(adxbdy1, adxbdy0, bdxady1, bdxady0, ab3, ab[2], ab[1], ab[0]); ab[3] = ab3; cxablen = scale_expansion_zeroelim(4, ab, cdx, cxab); cxxablen = scale_expansion_zeroelim(cxablen, cxab, cdx, cxxab); cyablen = scale_expansion_zeroelim(4, ab, cdy, cyab); cyyablen = scale_expansion_zeroelim(cyablen, cyab, cdy, cyyab); clen = fast_expansion_sum_zeroelim(cxxablen, cxxab, cyyablen, cyyab, cdet); ablen = fast_expansion_sum_zeroelim(alen, adet, blen, bdet, abdet); finlength = fast_expansion_sum_zeroelim(ablen, abdet, clen, cdet, fin1); det = estimate(finlength, fin1); errbound = iccerrboundB * permanent; if ((det >= errbound) || (-det >= errbound)) { return det; } Two_Diff_Tail(pa[0], pd[0], adx, adxtail); Two_Diff_Tail(pa[1], pd[1], ady, adytail); Two_Diff_Tail(pb[0], pd[0], bdx, bdxtail); Two_Diff_Tail(pb[1], pd[1], bdy, bdytail); Two_Diff_Tail(pc[0], pd[0], cdx, cdxtail); Two_Diff_Tail(pc[1], pd[1], cdy, cdytail); if ((adxtail == 0.0) && (bdxtail == 0.0) && (cdxtail == 0.0) && (adytail == 0.0) && (bdytail == 0.0) && (cdytail == 0.0)) { return det; } errbound = iccerrboundC * permanent + resulterrbound * Absolute(det); det += ((adx * adx + ady * ady) * ((bdx * cdytail + cdy * bdxtail) - (bdy * cdxtail + cdx * bdytail)) + 2.0 * (adx * adxtail + ady * adytail) * (bdx * cdy - bdy * cdx)) + ((bdx * bdx + bdy * bdy) * ((cdx * adytail + ady * cdxtail) - (cdy * adxtail + adx * cdytail)) + 2.0 * (bdx * bdxtail + bdy * bdytail) * (cdx * ady - cdy * adx)) + ((cdx * cdx + cdy * cdy) * ((adx * bdytail + bdy * adxtail) - (ady * bdxtail + bdx * adytail)) + 2.0 * (cdx * cdxtail + cdy * cdytail) * (adx * bdy - ady * bdx)); if ((det >= errbound) || (-det >= errbound)) { return det; } finnow = fin1; finother = fin2; if ((bdxtail != 0.0) || (bdytail != 0.0) || (cdxtail != 0.0) || (cdytail != 0.0)) { Square(adx, adxadx1, adxadx0); Square(ady, adyady1, adyady0); Two_Two_Sum(adxadx1, adxadx0, adyady1, adyady0, aa3, aa[2], aa[1], aa[0]); aa[3] = aa3; } if ((cdxtail != 0.0) || (cdytail != 0.0) || (adxtail != 0.0) || (adytail != 0.0)) { Square(bdx, bdxbdx1, bdxbdx0); Square(bdy, bdybdy1, bdybdy0); Two_Two_Sum(bdxbdx1, bdxbdx0, bdybdy1, bdybdy0, bb3, bb[2], bb[1], bb[0]); bb[3] = bb3; } if ((adxtail != 0.0) || (adytail != 0.0) || (bdxtail != 0.0) || (bdytail != 0.0)) { Square(cdx, cdxcdx1, cdxcdx0); Square(cdy, cdycdy1, cdycdy0); Two_Two_Sum(cdxcdx1, cdxcdx0, cdycdy1, cdycdy0, cc3, cc[2], cc[1], cc[0]); cc[3] = cc3; } if (adxtail != 0.0) { axtbclen = scale_expansion_zeroelim(4, bc, adxtail, axtbc); temp16alen = scale_expansion_zeroelim(axtbclen, axtbc, 2.0 * adx, temp16a); axtcclen = scale_expansion_zeroelim(4, cc, adxtail, axtcc); temp16blen = scale_expansion_zeroelim(axtcclen, axtcc, bdy, temp16b); axtbblen = scale_expansion_zeroelim(4, bb, adxtail, axtbb); temp16clen = scale_expansion_zeroelim(axtbblen, axtbb, -cdy, temp16c); temp32alen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16clen, temp16c, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; } if (adytail != 0.0) { aytbclen = scale_expansion_zeroelim(4, bc, adytail, aytbc); temp16alen = scale_expansion_zeroelim(aytbclen, aytbc, 2.0 * ady, temp16a); aytbblen = scale_expansion_zeroelim(4, bb, adytail, aytbb); temp16blen = scale_expansion_zeroelim(aytbblen, aytbb, cdx, temp16b); aytcclen = scale_expansion_zeroelim(4, cc, adytail, aytcc); temp16clen = scale_expansion_zeroelim(aytcclen, aytcc, -bdx, temp16c); temp32alen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16clen, temp16c, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; } if (bdxtail != 0.0) { bxtcalen = scale_expansion_zeroelim(4, ca, bdxtail, bxtca); temp16alen = scale_expansion_zeroelim(bxtcalen, bxtca, 2.0 * bdx, temp16a); bxtaalen = scale_expansion_zeroelim(4, aa, bdxtail, bxtaa); temp16blen = scale_expansion_zeroelim(bxtaalen, bxtaa, cdy, temp16b); bxtcclen = scale_expansion_zeroelim(4, cc, bdxtail, bxtcc); temp16clen = scale_expansion_zeroelim(bxtcclen, bxtcc, -ady, temp16c); temp32alen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16clen, temp16c, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; } if (bdytail != 0.0) { bytcalen = scale_expansion_zeroelim(4, ca, bdytail, bytca); temp16alen = scale_expansion_zeroelim(bytcalen, bytca, 2.0 * bdy, temp16a); bytcclen = scale_expansion_zeroelim(4, cc, bdytail, bytcc); temp16blen = scale_expansion_zeroelim(bytcclen, bytcc, adx, temp16b); bytaalen = scale_expansion_zeroelim(4, aa, bdytail, bytaa); temp16clen = scale_expansion_zeroelim(bytaalen, bytaa, -cdx, temp16c); temp32alen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16clen, temp16c, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; } if (cdxtail != 0.0) { cxtablen = scale_expansion_zeroelim(4, ab, cdxtail, cxtab); temp16alen = scale_expansion_zeroelim(cxtablen, cxtab, 2.0 * cdx, temp16a); cxtbblen = scale_expansion_zeroelim(4, bb, cdxtail, cxtbb); temp16blen = scale_expansion_zeroelim(cxtbblen, cxtbb, ady, temp16b); cxtaalen = scale_expansion_zeroelim(4, aa, cdxtail, cxtaa); temp16clen = scale_expansion_zeroelim(cxtaalen, cxtaa, -bdy, temp16c); temp32alen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16clen, temp16c, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; } if (cdytail != 0.0) { cytablen = scale_expansion_zeroelim(4, ab, cdytail, cytab); temp16alen = scale_expansion_zeroelim(cytablen, cytab, 2.0 * cdy, temp16a); cytaalen = scale_expansion_zeroelim(4, aa, cdytail, cytaa); temp16blen = scale_expansion_zeroelim(cytaalen, cytaa, bdx, temp16b); cytbblen = scale_expansion_zeroelim(4, bb, cdytail, cytbb); temp16clen = scale_expansion_zeroelim(cytbblen, cytbb, -adx, temp16c); temp32alen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16clen, temp16c, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; } if ((adxtail != 0.0) || (adytail != 0.0)) { if ((bdxtail != 0.0) || (bdytail != 0.0) || (cdxtail != 0.0) || (cdytail != 0.0)) { Two_Product(bdxtail, cdy, ti1, ti0); Two_Product(bdx, cdytail, tj1, tj0); Two_Two_Sum(ti1, ti0, tj1, tj0, u3, u[2], u[1], u[0]); u[3] = u3; negate = -bdy; Two_Product(cdxtail, negate, ti1, ti0); negate = -bdytail; Two_Product(cdx, negate, tj1, tj0); Two_Two_Sum(ti1, ti0, tj1, tj0, v3, v[2], v[1], v[0]); v[3] = v3; bctlen = fast_expansion_sum_zeroelim(4, u, 4, v, bct); Two_Product(bdxtail, cdytail, ti1, ti0); Two_Product(cdxtail, bdytail, tj1, tj0); Two_Two_Diff(ti1, ti0, tj1, tj0, bctt3, bctt[2], bctt[1], bctt[0]); bctt[3] = bctt3; bcttlen = 4; } else { bct[0] = 0.0; bctlen = 1; bctt[0] = 0.0; bcttlen = 1; } if (adxtail != 0.0) { temp16alen = scale_expansion_zeroelim(axtbclen, axtbc, adxtail, temp16a); axtbctlen = scale_expansion_zeroelim(bctlen, bct, adxtail, axtbct); temp32alen = scale_expansion_zeroelim(axtbctlen, axtbct, 2.0 * adx, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; if (bdytail != 0.0) { temp8len = scale_expansion_zeroelim(4, cc, adxtail, temp8); temp16alen = scale_expansion_zeroelim(temp8len, temp8, bdytail, temp16a); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp16alen, temp16a, finother); finswap = finnow; finnow = finother; finother = finswap; } if (cdytail != 0.0) { temp8len = scale_expansion_zeroelim(4, bb, -adxtail, temp8); temp16alen = scale_expansion_zeroelim(temp8len, temp8, cdytail, temp16a); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp16alen, temp16a, finother); finswap = finnow; finnow = finother; finother = finswap; } temp32alen = scale_expansion_zeroelim(axtbctlen, axtbct, adxtail, temp32a); axtbcttlen = scale_expansion_zeroelim(bcttlen, bctt, adxtail, axtbctt); temp16alen = scale_expansion_zeroelim(axtbcttlen, axtbctt, 2.0 * adx, temp16a); temp16blen = scale_expansion_zeroelim(axtbcttlen, axtbctt, adxtail, temp16b); temp32blen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32b); temp64len = fast_expansion_sum_zeroelim(temp32alen, temp32a, temp32blen, temp32b, temp64); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp64len, temp64, finother); finswap = finnow; finnow = finother; finother = finswap; } if (adytail != 0.0) { temp16alen = scale_expansion_zeroelim(aytbclen, aytbc, adytail, temp16a); aytbctlen = scale_expansion_zeroelim(bctlen, bct, adytail, aytbct); temp32alen = scale_expansion_zeroelim(aytbctlen, aytbct, 2.0 * ady, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; temp32alen = scale_expansion_zeroelim(aytbctlen, aytbct, adytail, temp32a); aytbcttlen = scale_expansion_zeroelim(bcttlen, bctt, adytail, aytbctt); temp16alen = scale_expansion_zeroelim(aytbcttlen, aytbctt, 2.0 * ady, temp16a); temp16blen = scale_expansion_zeroelim(aytbcttlen, aytbctt, adytail, temp16b); temp32blen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32b); temp64len = fast_expansion_sum_zeroelim(temp32alen, temp32a, temp32blen, temp32b, temp64); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp64len, temp64, finother); finswap = finnow; finnow = finother; finother = finswap; } } if ((bdxtail != 0.0) || (bdytail != 0.0)) { if ((cdxtail != 0.0) || (cdytail != 0.0) || (adxtail != 0.0) || (adytail != 0.0)) { Two_Product(cdxtail, ady, ti1, ti0); Two_Product(cdx, adytail, tj1, tj0); Two_Two_Sum(ti1, ti0, tj1, tj0, u3, u[2], u[1], u[0]); u[3] = u3; negate = -cdy; Two_Product(adxtail, negate, ti1, ti0); negate = -cdytail; Two_Product(adx, negate, tj1, tj0); Two_Two_Sum(ti1, ti0, tj1, tj0, v3, v[2], v[1], v[0]); v[3] = v3; catlen = fast_expansion_sum_zeroelim(4, u, 4, v, cat); Two_Product(cdxtail, adytail, ti1, ti0); Two_Product(adxtail, cdytail, tj1, tj0); Two_Two_Diff(ti1, ti0, tj1, tj0, catt3, catt[2], catt[1], catt[0]); catt[3] = catt3; cattlen = 4; } else { cat[0] = 0.0; catlen = 1; catt[0] = 0.0; cattlen = 1; } if (bdxtail != 0.0) { temp16alen = scale_expansion_zeroelim(bxtcalen, bxtca, bdxtail, temp16a); bxtcatlen = scale_expansion_zeroelim(catlen, cat, bdxtail, bxtcat); temp32alen = scale_expansion_zeroelim(bxtcatlen, bxtcat, 2.0 * bdx, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; if (cdytail != 0.0) { temp8len = scale_expansion_zeroelim(4, aa, bdxtail, temp8); temp16alen = scale_expansion_zeroelim(temp8len, temp8, cdytail, temp16a); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp16alen, temp16a, finother); finswap = finnow; finnow = finother; finother = finswap; } if (adytail != 0.0) { temp8len = scale_expansion_zeroelim(4, cc, -bdxtail, temp8); temp16alen = scale_expansion_zeroelim(temp8len, temp8, adytail, temp16a); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp16alen, temp16a, finother); finswap = finnow; finnow = finother; finother = finswap; } temp32alen = scale_expansion_zeroelim(bxtcatlen, bxtcat, bdxtail, temp32a); bxtcattlen = scale_expansion_zeroelim(cattlen, catt, bdxtail, bxtcatt); temp16alen = scale_expansion_zeroelim(bxtcattlen, bxtcatt, 2.0 * bdx, temp16a); temp16blen = scale_expansion_zeroelim(bxtcattlen, bxtcatt, bdxtail, temp16b); temp32blen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32b); temp64len = fast_expansion_sum_zeroelim(temp32alen, temp32a, temp32blen, temp32b, temp64); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp64len, temp64, finother); finswap = finnow; finnow = finother; finother = finswap; } if (bdytail != 0.0) { temp16alen = scale_expansion_zeroelim(bytcalen, bytca, bdytail, temp16a); bytcatlen = scale_expansion_zeroelim(catlen, cat, bdytail, bytcat); temp32alen = scale_expansion_zeroelim(bytcatlen, bytcat, 2.0 * bdy, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; temp32alen = scale_expansion_zeroelim(bytcatlen, bytcat, bdytail, temp32a); bytcattlen = scale_expansion_zeroelim(cattlen, catt, bdytail, bytcatt); temp16alen = scale_expansion_zeroelim(bytcattlen, bytcatt, 2.0 * bdy, temp16a); temp16blen = scale_expansion_zeroelim(bytcattlen, bytcatt, bdytail, temp16b); temp32blen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32b); temp64len = fast_expansion_sum_zeroelim(temp32alen, temp32a, temp32blen, temp32b, temp64); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp64len, temp64, finother); finswap = finnow; finnow = finother; finother = finswap; } } if ((cdxtail != 0.0) || (cdytail != 0.0)) { if ((adxtail != 0.0) || (adytail != 0.0) || (bdxtail != 0.0) || (bdytail != 0.0)) { Two_Product(adxtail, bdy, ti1, ti0); Two_Product(adx, bdytail, tj1, tj0); Two_Two_Sum(ti1, ti0, tj1, tj0, u3, u[2], u[1], u[0]); u[3] = u3; negate = -ady; Two_Product(bdxtail, negate, ti1, ti0); negate = -adytail; Two_Product(bdx, negate, tj1, tj0); Two_Two_Sum(ti1, ti0, tj1, tj0, v3, v[2], v[1], v[0]); v[3] = v3; abtlen = fast_expansion_sum_zeroelim(4, u, 4, v, abt); Two_Product(adxtail, bdytail, ti1, ti0); Two_Product(bdxtail, adytail, tj1, tj0); Two_Two_Diff(ti1, ti0, tj1, tj0, abtt3, abtt[2], abtt[1], abtt[0]); abtt[3] = abtt3; abttlen = 4; } else { abt[0] = 0.0; abtlen = 1; abtt[0] = 0.0; abttlen = 1; } if (cdxtail != 0.0) { temp16alen = scale_expansion_zeroelim(cxtablen, cxtab, cdxtail, temp16a); cxtabtlen = scale_expansion_zeroelim(abtlen, abt, cdxtail, cxtabt); temp32alen = scale_expansion_zeroelim(cxtabtlen, cxtabt, 2.0 * cdx, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; if (adytail != 0.0) { temp8len = scale_expansion_zeroelim(4, bb, cdxtail, temp8); temp16alen = scale_expansion_zeroelim(temp8len, temp8, adytail, temp16a); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp16alen, temp16a, finother); finswap = finnow; finnow = finother; finother = finswap; } if (bdytail != 0.0) { temp8len = scale_expansion_zeroelim(4, aa, -cdxtail, temp8); temp16alen = scale_expansion_zeroelim(temp8len, temp8, bdytail, temp16a); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp16alen, temp16a, finother); finswap = finnow; finnow = finother; finother = finswap; } temp32alen = scale_expansion_zeroelim(cxtabtlen, cxtabt, cdxtail, temp32a); cxtabttlen = scale_expansion_zeroelim(abttlen, abtt, cdxtail, cxtabtt); temp16alen = scale_expansion_zeroelim(cxtabttlen, cxtabtt, 2.0 * cdx, temp16a); temp16blen = scale_expansion_zeroelim(cxtabttlen, cxtabtt, cdxtail, temp16b); temp32blen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32b); temp64len = fast_expansion_sum_zeroelim(temp32alen, temp32a, temp32blen, temp32b, temp64); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp64len, temp64, finother); finswap = finnow; finnow = finother; finother = finswap; } if (cdytail != 0.0) { temp16alen = scale_expansion_zeroelim(cytablen, cytab, cdytail, temp16a); cytabtlen = scale_expansion_zeroelim(abtlen, abt, cdytail, cytabt); temp32alen = scale_expansion_zeroelim(cytabtlen, cytabt, 2.0 * cdy, temp32a); temp48len = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp32alen, temp32a, temp48); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp48len, temp48, finother); finswap = finnow; finnow = finother; finother = finswap; temp32alen = scale_expansion_zeroelim(cytabtlen, cytabt, cdytail, temp32a); cytabttlen = scale_expansion_zeroelim(abttlen, abtt, cdytail, cytabtt); temp16alen = scale_expansion_zeroelim(cytabttlen, cytabtt, 2.0 * cdy, temp16a); temp16blen = scale_expansion_zeroelim(cytabttlen, cytabtt, cdytail, temp16b); temp32blen = fast_expansion_sum_zeroelim(temp16alen, temp16a, temp16blen, temp16b, temp32b); temp64len = fast_expansion_sum_zeroelim(temp32alen, temp32a, temp32blen, temp32b, temp64); finlength = fast_expansion_sum_zeroelim(finlength, finnow, temp64len, temp64, finother); finswap = finnow; finnow = finother; finother = finswap; } } return finnow[finlength - 1]; } REAL incircle(REAL *pa, REAL *pb, REAL *pc, REAL *pd) { REAL adx, bdx, cdx, ady, bdy, cdy; REAL bdxcdy, cdxbdy, cdxady, adxcdy, adxbdy, bdxady; REAL alift, blift, clift; REAL det; REAL permanent, errbound; REAL inc; FPU_ROUND_DOUBLE; adx = pa[0] - pd[0]; bdx = pb[0] - pd[0]; cdx = pc[0] - pd[0]; ady = pa[1] - pd[1]; bdy = pb[1] - pd[1]; cdy = pc[1] - pd[1]; bdxcdy = bdx * cdy; cdxbdy = cdx * bdy; alift = adx * adx + ady * ady; cdxady = cdx * ady; adxcdy = adx * cdy; blift = bdx * bdx + bdy * bdy; adxbdy = adx * bdy; bdxady = bdx * ady; clift = cdx * cdx + cdy * cdy; det = alift * (bdxcdy - cdxbdy) + blift * (cdxady - adxcdy) + clift * (adxbdy - bdxady); permanent = (Absolute(bdxcdy) + Absolute(cdxbdy)) * alift + (Absolute(cdxady) + Absolute(adxcdy)) * blift + (Absolute(adxbdy) + Absolute(bdxady)) * clift; errbound = iccerrboundA * permanent; if ((det > errbound) || (-det > errbound)) { FPU_RESTORE; return det; } inc = incircleadapt(pa, pb, pc, pd, permanent); FPU_RESTORE; return inc; } REAL incircle(REAL ax, REAL ay, REAL bx, REAL by, REAL cx, REAL cy, REAL dx, REAL dy) { REAL adx, bdx, cdx, ady, bdy, cdy; REAL bdxcdy, cdxbdy, cdxady, adxcdy, adxbdy, bdxady; REAL alift, blift, clift; REAL det; REAL permanent, errbound; REAL inc; FPU_ROUND_DOUBLE; adx = ax - dx; bdx = bx - dx; cdx = cx - dx; ady = ay - dy; bdy = by - dy; cdy = cy - dy; bdxcdy = bdx * cdy; cdxbdy = cdx * bdy; alift = adx * adx + ady * ady; cdxady = cdx * ady; adxcdy = adx * cdy; blift = bdx * bdx + bdy * bdy; adxbdy = adx * bdy; bdxady = bdx * ady; clift = cdx * cdx + cdy * cdy; det = alift * (bdxcdy - cdxbdy) + blift * (cdxady - adxcdy) + clift * (adxbdy - bdxady); permanent = (Absolute(bdxcdy) + Absolute(cdxbdy)) * alift + (Absolute(cdxady) + Absolute(adxcdy)) * blift + (Absolute(adxbdy) + Absolute(bdxady)) * clift; errbound = iccerrboundA * permanent; if ((det > errbound) || (-det > errbound)) { FPU_RESTORE; return det; } REAL pa[]={ax,ay}; REAL pb[]={bx,by}; REAL pc[]={cx,cy}; REAL pd[]={dx,dy}; inc = incircleadapt(pa, pb, pc, pd, permanent); FPU_RESTORE; return inc; } /*****************************************************************************/ /* */ /* inspherefast() Approximate 3D insphere test. Nonrobust. */ /* insphereexact() Exact 3D insphere test. Robust. */ /* insphereslow() Another exact 3D insphere test. Robust. */ /* insphere() Adaptive exact 3D insphere test. Robust. */ /* */ /* Return a positive value if the point pe lies inside the */ /* sphere passing through pa, pb, pc, and pd; a negative value */ /* if it lies outside; and zero if the five points are */ /* cospherical. The points pa, pb, pc, and pd must be ordered */ /* so that they have a positive orientation (as defined by */ /* orient3d()), or the sign of the result will be reversed. */ /* */ /* Only the first and last routine should be used; the middle two are for */ /* timings. */ /* */ /* The last three use exact arithmetic to ensure a correct answer. The */ /* result returned is the determinant of a matrix. In insphere() only, */ /* this determinant is computed adaptively, in the sense that exact */ /* arithmetic is used only to the degree it is needed to ensure that the */ /* returned value has the correct sign. Hence, insphere() is usually quite */ /* fast, but will run more slowly when the input points are cospherical or */ /* nearly so. */ /* */ /*****************************************************************************/ static REAL insphereexact(REAL *pa, REAL *pb, REAL *pc, REAL *pd, REAL *pe) { INEXACT REAL axby1, bxcy1, cxdy1, dxey1, exay1; INEXACT REAL bxay1, cxby1, dxcy1, exdy1, axey1; INEXACT REAL axcy1, bxdy1, cxey1, dxay1, exby1; INEXACT REAL cxay1, dxby1, excy1, axdy1, bxey1; REAL axby0, bxcy0, cxdy0, dxey0, exay0; REAL bxay0, cxby0, dxcy0, exdy0, axey0; REAL axcy0, bxdy0, cxey0, dxay0, exby0; REAL cxay0, dxby0, excy0, axdy0, bxey0; REAL ab[4], bc[4], cd[4], de[4], ea[4]; REAL ac[4], bd[4], ce[4], da[4], eb[4]; REAL temp8a[8], temp8b[8], temp16[16]; int temp8alen, temp8blen, temp16len; REAL abc[24], bcd[24], cde[24], dea[24], eab[24]; REAL abd[24], bce[24], cda[24], deb[24], eac[24]; int abclen, bcdlen, cdelen, dealen, eablen; int abdlen, bcelen, cdalen, deblen, eaclen; REAL temp48a[48], temp48b[48]; int temp48alen, temp48blen; REAL abcd[96], bcde[96], cdea[96], deab[96], eabc[96]; int abcdlen, bcdelen, cdealen, deablen, eabclen; REAL temp192[192]; REAL det384x[384], det384y[384], det384z[384]; int xlen, ylen, zlen; REAL detxy[768]; int xylen; REAL adet[1152], bdet[1152], cdet[1152], ddet[1152], edet[1152]; int alen, blen, clen, dlen, elen; REAL abdet[2304], cddet[2304], cdedet[3456]; int ablen, cdlen; REAL deter[5760]; int deterlen; int i; INEXACT REAL bvirt; REAL avirt, bround, around; INEXACT REAL c; INEXACT REAL abig; REAL ahi, alo, bhi, blo; REAL err1, err2, err3; INEXACT REAL _i, _j; REAL _0; Two_Product(pa[0], pb[1], axby1, axby0); Two_Product(pb[0], pa[1], bxay1, bxay0); Two_Two_Diff(axby1, axby0, bxay1, bxay0, ab[3], ab[2], ab[1], ab[0]); Two_Product(pb[0], pc[1], bxcy1, bxcy0); Two_Product(pc[0], pb[1], cxby1, cxby0); Two_Two_Diff(bxcy1, bxcy0, cxby1, cxby0, bc[3], bc[2], bc[1], bc[0]); Two_Product(pc[0], pd[1], cxdy1, cxdy0); Two_Product(pd[0], pc[1], dxcy1, dxcy0); Two_Two_Diff(cxdy1, cxdy0, dxcy1, dxcy0, cd[3], cd[2], cd[1], cd[0]); Two_Product(pd[0], pe[1], dxey1, dxey0); Two_Product(pe[0], pd[1], exdy1, exdy0); Two_Two_Diff(dxey1, dxey0, exdy1, exdy0, de[3], de[2], de[1], de[0]); Two_Product(pe[0], pa[1], exay1, exay0); Two_Product(pa[0], pe[1], axey1, axey0); Two_Two_Diff(exay1, exay0, axey1, axey0, ea[3], ea[2], ea[1], ea[0]); Two_Product(pa[0], pc[1], axcy1, axcy0); Two_Product(pc[0], pa[1], cxay1, cxay0); Two_Two_Diff(axcy1, axcy0, cxay1, cxay0, ac[3], ac[2], ac[1], ac[0]); Two_Product(pb[0], pd[1], bxdy1, bxdy0); Two_Product(pd[0], pb[1], dxby1, dxby0); Two_Two_Diff(bxdy1, bxdy0, dxby1, dxby0, bd[3], bd[2], bd[1], bd[0]); Two_Product(pc[0], pe[1], cxey1, cxey0); Two_Product(pe[0], pc[1], excy1, excy0); Two_Two_Diff(cxey1, cxey0, excy1, excy0, ce[3], ce[2], ce[1], ce[0]); Two_Product(pd[0], pa[1], dxay1, dxay0); Two_Product(pa[0], pd[1], axdy1, axdy0); Two_Two_Diff(dxay1, dxay0, axdy1, axdy0, da[3], da[2], da[1], da[0]); Two_Product(pe[0], pb[1], exby1, exby0); Two_Product(pb[0], pe[1], bxey1, bxey0); Two_Two_Diff(exby1, exby0, bxey1, bxey0, eb[3], eb[2], eb[1], eb[0]); temp8alen = scale_expansion_zeroelim(4, bc, pa[2], temp8a); temp8blen = scale_expansion_zeroelim(4, ac, -pb[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, ab, pc[2], temp8a); abclen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, abc); temp8alen = scale_expansion_zeroelim(4, cd, pb[2], temp8a); temp8blen = scale_expansion_zeroelim(4, bd, -pc[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, bc, pd[2], temp8a); bcdlen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, bcd); temp8alen = scale_expansion_zeroelim(4, de, pc[2], temp8a); temp8blen = scale_expansion_zeroelim(4, ce, -pd[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, cd, pe[2], temp8a); cdelen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, cde); temp8alen = scale_expansion_zeroelim(4, ea, pd[2], temp8a); temp8blen = scale_expansion_zeroelim(4, da, -pe[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, de, pa[2], temp8a); dealen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, dea); temp8alen = scale_expansion_zeroelim(4, ab, pe[2], temp8a); temp8blen = scale_expansion_zeroelim(4, eb, -pa[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, ea, pb[2], temp8a); eablen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, eab); temp8alen = scale_expansion_zeroelim(4, bd, pa[2], temp8a); temp8blen = scale_expansion_zeroelim(4, da, pb[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, ab, pd[2], temp8a); abdlen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, abd); temp8alen = scale_expansion_zeroelim(4, ce, pb[2], temp8a); temp8blen = scale_expansion_zeroelim(4, eb, pc[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, bc, pe[2], temp8a); bcelen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, bce); temp8alen = scale_expansion_zeroelim(4, da, pc[2], temp8a); temp8blen = scale_expansion_zeroelim(4, ac, pd[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, cd, pa[2], temp8a); cdalen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, cda); temp8alen = scale_expansion_zeroelim(4, eb, pd[2], temp8a); temp8blen = scale_expansion_zeroelim(4, bd, pe[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, de, pb[2], temp8a); deblen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, deb); temp8alen = scale_expansion_zeroelim(4, ac, pe[2], temp8a); temp8blen = scale_expansion_zeroelim(4, ce, pa[2], temp8b); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp8alen = scale_expansion_zeroelim(4, ea, pc[2], temp8a); eaclen = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp16len, temp16, eac); temp48alen = fast_expansion_sum_zeroelim(cdelen, cde, bcelen, bce, temp48a); temp48blen = fast_expansion_sum_zeroelim(deblen, deb, bcdlen, bcd, temp48b); for (i = 0; i < temp48blen; i++) { temp48b[i] = -temp48b[i]; } bcdelen = fast_expansion_sum_zeroelim(temp48alen, temp48a, temp48blen, temp48b, bcde); xlen = scale_expansion_zeroelim(bcdelen, bcde, pa[0], temp192); xlen = scale_expansion_zeroelim(xlen, temp192, pa[0], det384x); ylen = scale_expansion_zeroelim(bcdelen, bcde, pa[1], temp192); ylen = scale_expansion_zeroelim(ylen, temp192, pa[1], det384y); zlen = scale_expansion_zeroelim(bcdelen, bcde, pa[2], temp192); zlen = scale_expansion_zeroelim(zlen, temp192, pa[2], det384z); xylen = fast_expansion_sum_zeroelim(xlen, det384x, ylen, det384y, detxy); alen = fast_expansion_sum_zeroelim(xylen, detxy, zlen, det384z, adet); temp48alen = fast_expansion_sum_zeroelim(dealen, dea, cdalen, cda, temp48a); temp48blen = fast_expansion_sum_zeroelim(eaclen, eac, cdelen, cde, temp48b); for (i = 0; i < temp48blen; i++) { temp48b[i] = -temp48b[i]; } cdealen = fast_expansion_sum_zeroelim(temp48alen, temp48a, temp48blen, temp48b, cdea); xlen = scale_expansion_zeroelim(cdealen, cdea, pb[0], temp192); xlen = scale_expansion_zeroelim(xlen, temp192, pb[0], det384x); ylen = scale_expansion_zeroelim(cdealen, cdea, pb[1], temp192); ylen = scale_expansion_zeroelim(ylen, temp192, pb[1], det384y); zlen = scale_expansion_zeroelim(cdealen, cdea, pb[2], temp192); zlen = scale_expansion_zeroelim(zlen, temp192, pb[2], det384z); xylen = fast_expansion_sum_zeroelim(xlen, det384x, ylen, det384y, detxy); blen = fast_expansion_sum_zeroelim(xylen, detxy, zlen, det384z, bdet); temp48alen = fast_expansion_sum_zeroelim(eablen, eab, deblen, deb, temp48a); temp48blen = fast_expansion_sum_zeroelim(abdlen, abd, dealen, dea, temp48b); for (i = 0; i < temp48blen; i++) { temp48b[i] = -temp48b[i]; } deablen = fast_expansion_sum_zeroelim(temp48alen, temp48a, temp48blen, temp48b, deab); xlen = scale_expansion_zeroelim(deablen, deab, pc[0], temp192); xlen = scale_expansion_zeroelim(xlen, temp192, pc[0], det384x); ylen = scale_expansion_zeroelim(deablen, deab, pc[1], temp192); ylen = scale_expansion_zeroelim(ylen, temp192, pc[1], det384y); zlen = scale_expansion_zeroelim(deablen, deab, pc[2], temp192); zlen = scale_expansion_zeroelim(zlen, temp192, pc[2], det384z); xylen = fast_expansion_sum_zeroelim(xlen, det384x, ylen, det384y, detxy); clen = fast_expansion_sum_zeroelim(xylen, detxy, zlen, det384z, cdet); temp48alen = fast_expansion_sum_zeroelim(abclen, abc, eaclen, eac, temp48a); temp48blen = fast_expansion_sum_zeroelim(bcelen, bce, eablen, eab, temp48b); for (i = 0; i < temp48blen; i++) { temp48b[i] = -temp48b[i]; } eabclen = fast_expansion_sum_zeroelim(temp48alen, temp48a, temp48blen, temp48b, eabc); xlen = scale_expansion_zeroelim(eabclen, eabc, pd[0], temp192); xlen = scale_expansion_zeroelim(xlen, temp192, pd[0], det384x); ylen = scale_expansion_zeroelim(eabclen, eabc, pd[1], temp192); ylen = scale_expansion_zeroelim(ylen, temp192, pd[1], det384y); zlen = scale_expansion_zeroelim(eabclen, eabc, pd[2], temp192); zlen = scale_expansion_zeroelim(zlen, temp192, pd[2], det384z); xylen = fast_expansion_sum_zeroelim(xlen, det384x, ylen, det384y, detxy); dlen = fast_expansion_sum_zeroelim(xylen, detxy, zlen, det384z, ddet); temp48alen = fast_expansion_sum_zeroelim(bcdlen, bcd, abdlen, abd, temp48a); temp48blen = fast_expansion_sum_zeroelim(cdalen, cda, abclen, abc, temp48b); for (i = 0; i < temp48blen; i++) { temp48b[i] = -temp48b[i]; } abcdlen = fast_expansion_sum_zeroelim(temp48alen, temp48a, temp48blen, temp48b, abcd); xlen = scale_expansion_zeroelim(abcdlen, abcd, pe[0], temp192); xlen = scale_expansion_zeroelim(xlen, temp192, pe[0], det384x); ylen = scale_expansion_zeroelim(abcdlen, abcd, pe[1], temp192); ylen = scale_expansion_zeroelim(ylen, temp192, pe[1], det384y); zlen = scale_expansion_zeroelim(abcdlen, abcd, pe[2], temp192); zlen = scale_expansion_zeroelim(zlen, temp192, pe[2], det384z); xylen = fast_expansion_sum_zeroelim(xlen, det384x, ylen, det384y, detxy); elen = fast_expansion_sum_zeroelim(xylen, detxy, zlen, det384z, edet); ablen = fast_expansion_sum_zeroelim(alen, adet, blen, bdet, abdet); cdlen = fast_expansion_sum_zeroelim(clen, cdet, dlen, ddet, cddet); cdelen = fast_expansion_sum_zeroelim(cdlen, cddet, elen, edet, cdedet); deterlen = fast_expansion_sum_zeroelim(ablen, abdet, cdelen, cdedet, deter); return deter[deterlen - 1]; } static REAL insphereadapt(REAL *pa, REAL *pb, REAL *pc, REAL *pd, REAL *pe, REAL permanent) { INEXACT REAL aex, bex, cex, dex, aey, bey, cey, dey, aez, bez, cez, dez; REAL det, errbound; INEXACT REAL aexbey1, bexaey1, bexcey1, cexbey1; INEXACT REAL cexdey1, dexcey1, dexaey1, aexdey1; INEXACT REAL aexcey1, cexaey1, bexdey1, dexbey1; REAL aexbey0, bexaey0, bexcey0, cexbey0; REAL cexdey0, dexcey0, dexaey0, aexdey0; REAL aexcey0, cexaey0, bexdey0, dexbey0; REAL ab[4], bc[4], cd[4], da[4], ac[4], bd[4]; INEXACT REAL ab3, bc3, cd3, da3, ac3, bd3; REAL abeps, bceps, cdeps, daeps, aceps, bdeps; REAL temp8a[8], temp8b[8], temp8c[8], temp16[16], temp24[24], temp48[48]; int temp8alen, temp8blen, temp8clen, temp16len, temp24len, temp48len; REAL xdet[96], ydet[96], zdet[96], xydet[192]; int xlen, ylen, zlen, xylen; REAL adet[288], bdet[288], cdet[288], ddet[288]; int alen, blen, clen, dlen; REAL abdet[576], cddet[576]; int ablen, cdlen; REAL fin1[1152]; int finlength; REAL aextail, bextail, cextail, dextail; REAL aeytail, beytail, ceytail, deytail; REAL aeztail, beztail, ceztail, deztail; INEXACT REAL bvirt; REAL avirt, bround, around; INEXACT REAL c; INEXACT REAL abig; REAL ahi, alo, bhi, blo; REAL err1, err2, err3; INEXACT REAL _i, _j; REAL _0; aex = (REAL) (pa[0] - pe[0]); bex = (REAL) (pb[0] - pe[0]); cex = (REAL) (pc[0] - pe[0]); dex = (REAL) (pd[0] - pe[0]); aey = (REAL) (pa[1] - pe[1]); bey = (REAL) (pb[1] - pe[1]); cey = (REAL) (pc[1] - pe[1]); dey = (REAL) (pd[1] - pe[1]); aez = (REAL) (pa[2] - pe[2]); bez = (REAL) (pb[2] - pe[2]); cez = (REAL) (pc[2] - pe[2]); dez = (REAL) (pd[2] - pe[2]); Two_Product(aex, bey, aexbey1, aexbey0); Two_Product(bex, aey, bexaey1, bexaey0); Two_Two_Diff(aexbey1, aexbey0, bexaey1, bexaey0, ab3, ab[2], ab[1], ab[0]); ab[3] = ab3; Two_Product(bex, cey, bexcey1, bexcey0); Two_Product(cex, bey, cexbey1, cexbey0); Two_Two_Diff(bexcey1, bexcey0, cexbey1, cexbey0, bc3, bc[2], bc[1], bc[0]); bc[3] = bc3; Two_Product(cex, dey, cexdey1, cexdey0); Two_Product(dex, cey, dexcey1, dexcey0); Two_Two_Diff(cexdey1, cexdey0, dexcey1, dexcey0, cd3, cd[2], cd[1], cd[0]); cd[3] = cd3; Two_Product(dex, aey, dexaey1, dexaey0); Two_Product(aex, dey, aexdey1, aexdey0); Two_Two_Diff(dexaey1, dexaey0, aexdey1, aexdey0, da3, da[2], da[1], da[0]); da[3] = da3; Two_Product(aex, cey, aexcey1, aexcey0); Two_Product(cex, aey, cexaey1, cexaey0); Two_Two_Diff(aexcey1, aexcey0, cexaey1, cexaey0, ac3, ac[2], ac[1], ac[0]); ac[3] = ac3; Two_Product(bex, dey, bexdey1, bexdey0); Two_Product(dex, bey, dexbey1, dexbey0); Two_Two_Diff(bexdey1, bexdey0, dexbey1, dexbey0, bd3, bd[2], bd[1], bd[0]); bd[3] = bd3; temp8alen = scale_expansion_zeroelim(4, cd, bez, temp8a); temp8blen = scale_expansion_zeroelim(4, bd, -cez, temp8b); temp8clen = scale_expansion_zeroelim(4, bc, dez, temp8c); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp24len = fast_expansion_sum_zeroelim(temp8clen, temp8c, temp16len, temp16, temp24); temp48len = scale_expansion_zeroelim(temp24len, temp24, aex, temp48); xlen = scale_expansion_zeroelim(temp48len, temp48, -aex, xdet); temp48len = scale_expansion_zeroelim(temp24len, temp24, aey, temp48); ylen = scale_expansion_zeroelim(temp48len, temp48, -aey, ydet); temp48len = scale_expansion_zeroelim(temp24len, temp24, aez, temp48); zlen = scale_expansion_zeroelim(temp48len, temp48, -aez, zdet); xylen = fast_expansion_sum_zeroelim(xlen, xdet, ylen, ydet, xydet); alen = fast_expansion_sum_zeroelim(xylen, xydet, zlen, zdet, adet); temp8alen = scale_expansion_zeroelim(4, da, cez, temp8a); temp8blen = scale_expansion_zeroelim(4, ac, dez, temp8b); temp8clen = scale_expansion_zeroelim(4, cd, aez, temp8c); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp24len = fast_expansion_sum_zeroelim(temp8clen, temp8c, temp16len, temp16, temp24); temp48len = scale_expansion_zeroelim(temp24len, temp24, bex, temp48); xlen = scale_expansion_zeroelim(temp48len, temp48, bex, xdet); temp48len = scale_expansion_zeroelim(temp24len, temp24, bey, temp48); ylen = scale_expansion_zeroelim(temp48len, temp48, bey, ydet); temp48len = scale_expansion_zeroelim(temp24len, temp24, bez, temp48); zlen = scale_expansion_zeroelim(temp48len, temp48, bez, zdet); xylen = fast_expansion_sum_zeroelim(xlen, xdet, ylen, ydet, xydet); blen = fast_expansion_sum_zeroelim(xylen, xydet, zlen, zdet, bdet); temp8alen = scale_expansion_zeroelim(4, ab, dez, temp8a); temp8blen = scale_expansion_zeroelim(4, bd, aez, temp8b); temp8clen = scale_expansion_zeroelim(4, da, bez, temp8c); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp24len = fast_expansion_sum_zeroelim(temp8clen, temp8c, temp16len, temp16, temp24); temp48len = scale_expansion_zeroelim(temp24len, temp24, cex, temp48); xlen = scale_expansion_zeroelim(temp48len, temp48, -cex, xdet); temp48len = scale_expansion_zeroelim(temp24len, temp24, cey, temp48); ylen = scale_expansion_zeroelim(temp48len, temp48, -cey, ydet); temp48len = scale_expansion_zeroelim(temp24len, temp24, cez, temp48); zlen = scale_expansion_zeroelim(temp48len, temp48, -cez, zdet); xylen = fast_expansion_sum_zeroelim(xlen, xdet, ylen, ydet, xydet); clen = fast_expansion_sum_zeroelim(xylen, xydet, zlen, zdet, cdet); temp8alen = scale_expansion_zeroelim(4, bc, aez, temp8a); temp8blen = scale_expansion_zeroelim(4, ac, -bez, temp8b); temp8clen = scale_expansion_zeroelim(4, ab, cez, temp8c); temp16len = fast_expansion_sum_zeroelim(temp8alen, temp8a, temp8blen, temp8b, temp16); temp24len = fast_expansion_sum_zeroelim(temp8clen, temp8c, temp16len, temp16, temp24); temp48len = scale_expansion_zeroelim(temp24len, temp24, dex, temp48); xlen = scale_expansion_zeroelim(temp48len, temp48, dex, xdet); temp48len = scale_expansion_zeroelim(temp24len, temp24, dey, temp48); ylen = scale_expansion_zeroelim(temp48len, temp48, dey, ydet); temp48len = scale_expansion_zeroelim(temp24len, temp24, dez, temp48); zlen = scale_expansion_zeroelim(temp48len, temp48, dez, zdet); xylen = fast_expansion_sum_zeroelim(xlen, xdet, ylen, ydet, xydet); dlen = fast_expansion_sum_zeroelim(xylen, xydet, zlen, zdet, ddet); ablen = fast_expansion_sum_zeroelim(alen, adet, blen, bdet, abdet); cdlen = fast_expansion_sum_zeroelim(clen, cdet, dlen, ddet, cddet); finlength = fast_expansion_sum_zeroelim(ablen, abdet, cdlen, cddet, fin1); det = estimate(finlength, fin1); errbound = isperrboundB * permanent; if ((det >= errbound) || (-det >= errbound)) { return det; } Two_Diff_Tail(pa[0], pe[0], aex, aextail); Two_Diff_Tail(pa[1], pe[1], aey, aeytail); Two_Diff_Tail(pa[2], pe[2], aez, aeztail); Two_Diff_Tail(pb[0], pe[0], bex, bextail); Two_Diff_Tail(pb[1], pe[1], bey, beytail); Two_Diff_Tail(pb[2], pe[2], bez, beztail); Two_Diff_Tail(pc[0], pe[0], cex, cextail); Two_Diff_Tail(pc[1], pe[1], cey, ceytail); Two_Diff_Tail(pc[2], pe[2], cez, ceztail); Two_Diff_Tail(pd[0], pe[0], dex, dextail); Two_Diff_Tail(pd[1], pe[1], dey, deytail); Two_Diff_Tail(pd[2], pe[2], dez, deztail); if ((aextail == 0.0) && (aeytail == 0.0) && (aeztail == 0.0) && (bextail == 0.0) && (beytail == 0.0) && (beztail == 0.0) && (cextail == 0.0) && (ceytail == 0.0) && (ceztail == 0.0) && (dextail == 0.0) && (deytail == 0.0) && (deztail == 0.0)) { return det; } errbound = isperrboundC * permanent + resulterrbound * Absolute(det); abeps = (aex * beytail + bey * aextail) - (aey * bextail + bex * aeytail); bceps = (bex * ceytail + cey * bextail) - (bey * cextail + cex * beytail); cdeps = (cex * deytail + dey * cextail) - (cey * dextail + dex * ceytail); daeps = (dex * aeytail + aey * dextail) - (dey * aextail + aex * deytail); aceps = (aex * ceytail + cey * aextail) - (aey * cextail + cex * aeytail); bdeps = (bex * deytail + dey * bextail) - (bey * dextail + dex * beytail); det += (((bex * bex + bey * bey + bez * bez) * ((cez * daeps + dez * aceps + aez * cdeps) + (ceztail * da3 + deztail * ac3 + aeztail * cd3)) + (dex * dex + dey * dey + dez * dez) * ((aez * bceps - bez * aceps + cez * abeps) + (aeztail * bc3 - beztail * ac3 + ceztail * ab3))) - ((aex * aex + aey * aey + aez * aez) * ((bez * cdeps - cez * bdeps + dez * bceps) + (beztail * cd3 - ceztail * bd3 + deztail * bc3)) + (cex * cex + cey * cey + cez * cez) * ((dez * abeps + aez * bdeps + bez * daeps) + (deztail * ab3 + aeztail * bd3 + beztail * da3)))) + 2.0 * (((bex * bextail + bey * beytail + bez * beztail) * (cez * da3 + dez * ac3 + aez * cd3) + (dex * dextail + dey * deytail + dez * deztail) * (aez * bc3 - bez * ac3 + cez * ab3)) - ((aex * aextail + aey * aeytail + aez * aeztail) * (bez * cd3 - cez * bd3 + dez * bc3) + (cex * cextail + cey * ceytail + cez * ceztail) * (dez * ab3 + aez * bd3 + bez * da3))); if ((det >= errbound) || (-det >= errbound)) { return det; } return insphereexact(pa, pb, pc, pd, pe); } REAL insphere(REAL *pa, REAL *pb, REAL *pc, REAL *pd, REAL *pe) { REAL aex, bex, cex, dex; REAL aey, bey, cey, dey; REAL aez, bez, cez, dez; REAL aexbey, bexaey, bexcey, cexbey, cexdey, dexcey, dexaey, aexdey; REAL aexcey, cexaey, bexdey, dexbey; REAL alift, blift, clift, dlift; REAL ab, bc, cd, da, ac, bd; REAL abc, bcd, cda, dab; REAL aezplus, bezplus, cezplus, dezplus; REAL aexbeyplus, bexaeyplus, bexceyplus, cexbeyplus; REAL cexdeyplus, dexceyplus, dexaeyplus, aexdeyplus; REAL aexceyplus, cexaeyplus, bexdeyplus, dexbeyplus; REAL det; REAL permanent, errbound; REAL ins; FPU_ROUND_DOUBLE; aex = pa[0] - pe[0]; bex = pb[0] - pe[0]; cex = pc[0] - pe[0]; dex = pd[0] - pe[0]; aey = pa[1] - pe[1]; bey = pb[1] - pe[1]; cey = pc[1] - pe[1]; dey = pd[1] - pe[1]; aez = pa[2] - pe[2]; bez = pb[2] - pe[2]; cez = pc[2] - pe[2]; dez = pd[2] - pe[2]; aexbey = aex * bey; bexaey = bex * aey; ab = aexbey - bexaey; bexcey = bex * cey; cexbey = cex * bey; bc = bexcey - cexbey; cexdey = cex * dey; dexcey = dex * cey; cd = cexdey - dexcey; dexaey = dex * aey; aexdey = aex * dey; da = dexaey - aexdey; aexcey = aex * cey; cexaey = cex * aey; ac = aexcey - cexaey; bexdey = bex * dey; dexbey = dex * bey; bd = bexdey - dexbey; abc = aez * bc - bez * ac + cez * ab; bcd = bez * cd - cez * bd + dez * bc; cda = cez * da + dez * ac + aez * cd; dab = dez * ab + aez * bd + bez * da; alift = aex * aex + aey * aey + aez * aez; blift = bex * bex + bey * bey + bez * bez; clift = cex * cex + cey * cey + cez * cez; dlift = dex * dex + dey * dey + dez * dez; det = (dlift * abc - clift * dab) + (blift * cda - alift * bcd); aezplus = Absolute(aez); bezplus = Absolute(bez); cezplus = Absolute(cez); dezplus = Absolute(dez); aexbeyplus = Absolute(aexbey); bexaeyplus = Absolute(bexaey); bexceyplus = Absolute(bexcey); cexbeyplus = Absolute(cexbey); cexdeyplus = Absolute(cexdey); dexceyplus = Absolute(dexcey); dexaeyplus = Absolute(dexaey); aexdeyplus = Absolute(aexdey); aexceyplus = Absolute(aexcey); cexaeyplus = Absolute(cexaey); bexdeyplus = Absolute(bexdey); dexbeyplus = Absolute(dexbey); permanent = ((cexdeyplus + dexceyplus) * bezplus + (dexbeyplus + bexdeyplus) * cezplus + (bexceyplus + cexbeyplus) * dezplus) * alift + ((dexaeyplus + aexdeyplus) * cezplus + (aexceyplus + cexaeyplus) * dezplus + (cexdeyplus + dexceyplus) * aezplus) * blift + ((aexbeyplus + bexaeyplus) * dezplus + (bexdeyplus + dexbeyplus) * aezplus + (dexaeyplus + aexdeyplus) * bezplus) * clift + ((bexceyplus + cexbeyplus) * aezplus + (cexaeyplus + aexceyplus) * bezplus + (aexbeyplus + bexaeyplus) * cezplus) * dlift; errbound = isperrboundA * permanent; if ((det > errbound) || (-det > errbound)) { FPU_RESTORE; return det; } ins = insphereadapt(pa, pb, pc, pd, pe, permanent); FPU_RESTORE; return ins; } ./asymptote-2.41/inst.h0000644000175000017500000000370213064427076014673 0ustar norbertnorbert/***** * inst.h * Andy Hammerlindl 2002/06/27 * * Descibes the items and instructions that are used by the virtual machine. *****/ #ifndef INST_H #define INST_H #include #include #include "errormsg.h" #include "item.h" #include "vm.h" namespace vm { // Forward declarations struct inst; class stack; class program; // A function "lambda," that is, the code that runs a function. // It also needs the closure of the enclosing module or function to run. struct lambda : public gc { // The instructions to follow. program *code; // The index of the link to the parent closure in the frame corresponding to // this function. size_t parentIndex; // The total number of items that will be stored in the closure of this // function. Includes a link to the higher closure, the parameters, and the // local variables. // NOTE: In order to help garbage collection, this could be modified to // have one array store escaping items, and another to store non- // escaping items. size_t framesize; // States whether any of the variables escape the function, in which case a // closure needs to be allocated when the function is called. It is // initially set to "maybe" and it is computed the first time the function // is called. enum { NEEDS_CLOSURE, DOESNT_NEED_CLOSURE, MAYBE_NEEDS_CLOSURE} closureReq; #ifdef DEBUG_FRAME string name; lambda() : closureReq(MAYBE_NEEDS_CLOSURE), name("") {} virtual ~lambda() {} #else lambda() : closureReq(MAYBE_NEEDS_CLOSURE) {} #endif }; // The code run is just a string of instructions. The ops are actual commands // to be run, but constants, labels, and other objects can be in the code. struct inst : public gc { enum opcode { #define OPCODE(name,type) name, #include "opcodes.h" #undef OPCODE }; opcode op; position pos; item ref; }; template inline T get(const inst& it) { return get(it.ref); } } // namespace vm #endif ./asymptote-2.41/drawsurface.cc0000644000175000017500000006503513064427076016371 0ustar norbertnorbert/***** * drawsurface.cc * * Stores a surface that has been added to a picture. *****/ #include "drawsurface.h" #include "arrayop.h" #include #include #include using namespace prc; namespace camp { const triple drawElement::zero; double T[3]; // z-component of current transform using vm::array; #ifdef HAVE_GL BezierCurve drawSurface::C; BezierPatch drawBezierPatch::S; BezierTriangle drawBezierTriangle::S; void storecolor(GLfloat *colors, int i, const vm::array &pens, int j) { pen p=vm::read(pens,j); p.torgb(); colors[i]=p.red(); colors[i+1]=p.green(); colors[i+2]=p.blue(); colors[i+3]=p.opacity(); } void storecolor(GLfloat *colors, int i, const RGBAColour& p) { colors[i]=p.R; colors[i+1]=p.G; colors[i+2]=p.B; colors[i+3]=p.A; } void setcolors(bool colors, bool lighton, const RGBAColour& diffuse, const RGBAColour& ambient, const RGBAColour& emissive, const RGBAColour& specular, double shininess) { static prc::RGBAColour lastdiffuse; static prc::RGBAColour lastambient; static prc::RGBAColour lastemissive; static prc::RGBAColour lastspecular; static double lastshininess=0.0; static bool lastcolors=false; if(colors != lastcolors) { drawBezierPatch::S.draw(); lastcolors=colors; } if(!colors && (diffuse != lastdiffuse || ambient != lastambient || emissive != lastemissive || specular != lastspecular || shininess != lastshininess)) { drawBezierPatch::S.draw(); lastdiffuse=diffuse; lastambient=ambient; lastemissive=emissive; lastspecular=specular; lastshininess=shininess; } if(colors) { if(!lighton) glColorMaterial(GL_FRONT_AND_BACK,GL_EMISSION); GLfloat Black[]={0,0,0,(GLfloat) diffuse.A}; glMaterialfv(GL_FRONT_AND_BACK,GL_DIFFUSE,Black); glMaterialfv(GL_FRONT_AND_BACK,GL_AMBIENT,Black); glMaterialfv(GL_FRONT_AND_BACK,GL_EMISSION,Black); } else { GLfloat Diffuse[]={(GLfloat) diffuse.R,(GLfloat) diffuse.G, (GLfloat) diffuse.B,(GLfloat) diffuse.A}; glMaterialfv(GL_FRONT_AND_BACK,GL_DIFFUSE,Diffuse); GLfloat Ambient[]={(GLfloat) ambient.R,(GLfloat) ambient.G, (GLfloat) ambient.B,(GLfloat) ambient.A}; glMaterialfv(GL_FRONT_AND_BACK,GL_AMBIENT,Ambient); GLfloat Emissive[]={(GLfloat) emissive.R,(GLfloat) emissive.G, (GLfloat) emissive.B,(GLfloat) emissive.A}; glMaterialfv(GL_FRONT_AND_BACK,GL_EMISSION,Emissive); } if(lighton) { GLfloat Specular[]={(GLfloat) specular.R,(GLfloat) specular.G, (GLfloat) specular.B,(GLfloat) specular.A}; glMaterialfv(GL_FRONT_AND_BACK,GL_SPECULAR,Specular); glMaterialf(GL_FRONT_AND_BACK,GL_SHININESS,128.0*shininess); } } #endif void drawBezierPatch::bounds(const double* t, bbox3& b) { double x,y,z; double X,Y,Z; if(straight) { triple Vertices[3]; if(t == NULL) { Vertices[0]=controls[0]; Vertices[1]=controls[3]; Vertices[2]=controls[12]; Vertices[3]=controls[15]; } else { Vertices[0]=t*controls[0]; Vertices[1]=t*controls[3]; Vertices[2]=t*controls[12]; Vertices[3]=t*controls[15]; } boundstriples(x,y,z,X,Y,Z,4,Vertices); } else { double cx[16]; double cy[16]; double cz[16]; if(t == NULL) { for(int i=0; i < 16; ++i) { triple v=controls[i]; cx[i]=v.getx(); cy[i]=v.gety(); cz[i]=v.getz(); } } else { for(int i=0; i < 16; ++i) { triple v=t*controls[i]; cx[i]=v.getx(); cy[i]=v.gety(); cz[i]=v.getz(); } } double c0=cx[0]; double fuzz=sqrtFuzz*run::norm(cx,16); x=bound(cx,min,b.empty ? c0 : min(c0,b.left),fuzz,maxdepth); X=bound(cx,max,b.empty ? c0 : max(c0,b.right),fuzz,maxdepth); c0=cy[0]; fuzz=sqrtFuzz*run::norm(cy,16); y=bound(cy,min,b.empty ? c0 : min(c0,b.bottom),fuzz,maxdepth); Y=boundtri(cy,max,b.empty ? c0 : max(c0,b.top),fuzz,maxdepth); c0=cz[0]; fuzz=sqrtFuzz*run::norm(cz,16); z=bound(cz,min,b.empty ? c0 : min(c0,b.lower),fuzz,maxdepth); Z=bound(cz,max,b.empty ? c0 : max(c0,b.upper),fuzz,maxdepth); } b.add(x,y,z); b.add(X,Y,Z); if(t == NULL) { Min=triple(x,y,z); Max=triple(X,Y,Z); } } void drawBezierPatch::ratio(const double* t, pair &b, double (*m)(double, double), double fuzz, bool &first) { triple buf[16]; triple* Controls; if(straight) { if(t == NULL) Controls=controls; else { Controls=buf; Controls[0]=t*controls[0]; Controls[3]=t*controls[3]; Controls[12]=t*controls[12]; Controls[15]=t*controls[15]; } triple v=Controls[0]; double x=xratio(v); double y=yratio(v); if(first) { first=false; b=pair(x,y); } else { x=m(b.getx(),x); y=m(b.gety(),y); } v=Controls[3]; x=m(x,xratio(v)); y=m(y,yratio(v)); v=Controls[12]; x=m(x,xratio(v)); y=m(y,yratio(v)); v=Controls[15]; x=m(x,xratio(v)); y=m(y,yratio(v)); b=pair(x,y); } else { if(t == NULL) Controls=controls; else { Controls=buf; for(unsigned int i=0; i < 16; ++i) Controls[i]=t*controls[i]; } if(first) { triple v=Controls[0]; b=pair(xratio(v),yratio(v)); first=false; } b=pair(bound(Controls,m,xratio,b.getx(),fuzz,maxdepth), bound(Controls,m,yratio,b.gety(),fuzz,maxdepth)); } } bool drawBezierPatch::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible || !prc) return true; PRCmaterial m(ambient,diffuse,emissive,specular,opacity,PRCshininess); if(straight) { triple vertices[]={controls[0],controls[12],controls[3],controls[15]}; if(colors) out->addQuad(vertices,colors); else out->addRectangle(vertices,m); } else out->addPatch(controls,m); return true; } void drawBezierPatch::render(GLUnurbs *nurb, double size2, const triple& b, const triple& B, double perspective, bool lighton, bool transparent) { #ifdef HAVE_GL if(invisible || ((colors ? colors[0].A+colors[1].A+colors[2].A+colors[3].A < 4.0 : diffuse.A < 1.0) ^ transparent)) return; const bool billboard=interaction == BILLBOARD && !settings::getSetting("offscreen"); triple m,M; double f,F,s; if(perspective) { f=Min.getz()*perspective; F=Max.getz()*perspective; m=triple(min(f*b.getx(),F*b.getx()),min(f*b.gety(),F*b.gety()),b.getz()); M=triple(max(f*B.getx(),F*B.getx()),max(f*B.gety(),F*B.gety()),B.getz()); s=max(f,F); } else { m=b; M=B; s=1.0; } const pair size3(s*(B.getx()-b.getx()),s*(B.gety()-b.gety())); double t[16]; // current transform glGetDoublev(GL_MODELVIEW_MATRIX,t); // Like Fortran, OpenGL uses transposed (column-major) format! run::transpose(t,4); T[0]=t[8]; T[1]=t[9]; T[2]=t[10]; run::inverse(t,4); bbox3 box(m,M); box.transform(t); m=box.Min(); M=box.Max(); if(!billboard && (Max.getx() < m.getx() || Min.getx() > M.getx() || Max.gety() < m.gety() || Min.gety() > M.gety() || Max.getz() < m.getz() || Min.getz() > M.getz())) return; setcolors(colors,lighton,diffuse,ambient,emissive,specular,shininess); if(billboard) BB.init(center); GLfloat v[16]; if(colors) for(size_t i=0; i < 4; ++i) storecolor(v,4*i,colors[i]); triple *Controls; triple Controls0[16]; if(billboard) { Controls=Controls0; for(size_t i=0; i < 16; i++) Controls[i]=BB.transform(controls[i]); } else Controls=controls; if(gl::outlinemode) { triple edge0[]={Controls[0],Controls[4],Controls[8],Controls[12]}; C.queue(edge0,straight,size3.length()/size2,m,M); triple edge1[]={Controls[12],Controls[13],Controls[14],Controls[15]}; C.queue(edge1,straight,size3.length()/size2,m,M); triple edge2[]={Controls[15],Controls[11],Controls[7],Controls[3]}; C.queue(edge2,straight,size3.length()/size2,m,M); triple edge3[]={Controls[3],Controls[2],Controls[1],Controls[0]}; C.queue(edge3,straight,size3.length()/size2,m,M); C.draw(); } else { S.queue(Controls,straight,size3.length()/size2,m,M,transparent, colors ? v : NULL); if(!transparent) S.draw(); } #endif } drawElement *drawBezierPatch::transformed(const double* t) { return new drawBezierPatch(t,this); } void drawBezierTriangle::bounds(const double* t, bbox3& b) { double x,y,z; double X,Y,Z; if(straight) { triple Vertices[3]; if(t == NULL) { Vertices[0]=controls[0]; Vertices[1]=controls[6]; Vertices[2]=controls[9]; } else { Vertices[0]=t*controls[0]; Vertices[1]=t*controls[6]; Vertices[2]=t*controls[9]; } boundstriples(x,y,z,X,Y,Z,3,Vertices); } else { double cx[10]; double cy[10]; double cz[10]; if(t == NULL) { for(unsigned int i=0; i < 10; ++i) { triple v=controls[i]; cx[i]=v.getx(); cy[i]=v.gety(); cz[i]=v.getz(); } } else { for(unsigned int i=0; i < 10; ++i) { triple v=t*controls[i]; cx[i]=v.getx(); cy[i]=v.gety(); cz[i]=v.getz(); } } double c0=cx[0]; double fuzz=sqrtFuzz*run::norm(cx,10); x=boundtri(cx,min,b.empty ? c0 : min(c0,b.left),fuzz,maxdepth); X=boundtri(cx,max,b.empty ? c0 : max(c0,b.right),fuzz,maxdepth); c0=cy[0]; fuzz=sqrtFuzz*run::norm(cy,10); y=boundtri(cy,min,b.empty ? c0 : min(c0,b.bottom),fuzz,maxdepth); Y=boundtri(cy,max,b.empty ? c0 : max(c0,b.top),fuzz,maxdepth); c0=cz[0]; fuzz=sqrtFuzz*run::norm(cz,10); z=boundtri(cz,min,b.empty ? c0 : min(c0,b.lower),fuzz,maxdepth); Z=boundtri(cz,max,b.empty ? c0 : max(c0,b.upper),fuzz,maxdepth); } b.add(x,y,z); b.add(X,Y,Z); if(t == NULL) { Min=triple(x,y,z); Max=triple(X,Y,Z); } } void drawBezierTriangle::ratio(const double* t, pair &b, double (*m)(double, double), double fuzz, bool &first) { triple buf[10]; triple* Controls; if(straight) { if(t == NULL) Controls=controls; else { Controls=buf; Controls[0]=t*controls[0]; Controls[6]=t*controls[6]; Controls[9]=t*controls[9]; } triple v=Controls[0]; double x=xratio(v); double y=yratio(v); if(first) { first=false; b=pair(x,y); } else { x=m(b.getx(),x); y=m(b.gety(),y); } v=Controls[6]; x=m(x,xratio(v)); y=m(y,yratio(v)); v=Controls[9]; x=m(x,xratio(v)); y=m(y,yratio(v)); b=pair(x,y); } else { if(t == NULL) Controls=controls; else { Controls=buf; for(unsigned int i=0; i < 10; ++i) Controls[i]=t*controls[i]; } if(first) { triple v=Controls[0]; b=pair(xratio(v),yratio(v)); first=false; } b=pair(boundtri(Controls,m,xratio,b.getx(),fuzz,maxdepth), boundtri(Controls,m,yratio,b.gety(),fuzz,maxdepth)); } } bool drawBezierTriangle::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible) return true; PRCmaterial m(ambient,diffuse,emissive,specular,opacity,PRCshininess); static const double third=1.0/3.0; static const double third2=2.0/3.0; triple Controls[]={controls[0],controls[0],controls[0],controls[0], controls[1],third2*controls[1]+third*controls[2], third*controls[1]+third2*controls[2], controls[2],controls[3], third*controls[3]+third2*controls[4], third2*controls[4]+third*controls[5], controls[5],controls[6],controls[7], controls[8],controls[9]}; out->addPatch(Controls,m); return true; } void drawBezierTriangle::render(GLUnurbs *nurb, double size2, const triple& b, const triple& B, double perspective, bool lighton, bool transparent) { #ifdef HAVE_GL if(invisible || ((colors ? colors[0].A+colors[1].A+colors[2].A < 3.0 : diffuse.A < 1.0) ^ transparent)) return; const bool billboard=interaction == BILLBOARD && !settings::getSetting("offscreen"); triple m,M; double f,F,s; if(perspective) { f=Min.getz()*perspective; F=Max.getz()*perspective; m=triple(min(f*b.getx(),F*b.getx()),min(f*b.gety(),F*b.gety()),b.getz()); M=triple(max(f*B.getx(),F*B.getx()),max(f*B.gety(),F*B.gety()),B.getz()); s=max(f,F); } else { m=b; M=B; s=1.0; } const pair size3(s*(B.getx()-b.getx()),s*(B.gety()-b.gety())); double t[16]; // current transform glGetDoublev(GL_MODELVIEW_MATRIX,t); // Like Fortran, OpenGL uses transposed (column-major) format! run::transpose(t,4); T[0]=t[8]; T[1]=t[9]; T[2]=t[10]; run::inverse(t,4); bbox3 box(m,M); box.transform(t); m=box.Min(); M=box.Max(); if(!billboard && (Max.getx() < m.getx() || Min.getx() > M.getx() || Max.gety() < m.gety() || Min.gety() > M.gety() || Max.getz() < m.getz() || Min.getz() > M.getz())) return; setcolors(colors,lighton,diffuse,ambient,emissive,specular,shininess); if(billboard) BB.init(center); GLfloat v[12]; if(colors) for(size_t i=0; i < 3; ++i) storecolor(v,4*i,colors[i]); triple *Controls; triple Controls0[10]; if(billboard) { Controls=Controls0; for(size_t i=0; i < 10; i++) Controls[i]=BB.transform(controls[i]); } else Controls=controls; if(gl::outlinemode) { triple edge0[]={Controls[0],Controls[1],Controls[3],Controls[6]}; C.queue(edge0,straight,size3.length()/size2,m,M); triple edge1[]={Controls[6],Controls[7],Controls[8],Controls[9]}; C.queue(edge1,straight,size3.length()/size2,m,M); triple edge2[]={Controls[9],Controls[5],Controls[2],Controls[0]}; C.queue(edge2,straight,size3.length()/size2,m,M); C.draw(); } else { S.queue(Controls,straight,size3.length()/size2,m,M,transparent, colors ? v : NULL); if(!transparent) S.draw(); } #endif } drawElement *drawBezierTriangle::transformed(const double* t) { return new drawBezierTriangle(t,this); } bool drawNurbs::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible) return true; PRCmaterial m(ambient,diffuse,emissive,specular,opacity,PRCshininess); out->addSurface(udegree,vdegree,nu,nv,controls,uknots,vknots,m,weights); return true; } // Approximate bounds by bounding box of control polyhedron. void drawNurbs::bounds(const double* t, bbox3& b) { double x,y,z; double X,Y,Z; const size_t n=nu*nv; triple* Controls; if(t == NULL) Controls=controls; else { Controls=new triple[n]; for(size_t i=0; i < n; i++) Controls[i]=t*controls[i]; } boundstriples(x,y,z,X,Y,Z,n,Controls); b.add(x,y,z); b.add(X,Y,Z); if(t == NULL) { Min=triple(x,y,z); Max=triple(X,Y,Z); } else delete[] Controls; } drawElement *drawNurbs::transformed(const double* t) { return new drawNurbs(t,this); } void drawNurbs::ratio(const double *t, pair &b, double (*m)(double, double), double, bool &first) { const size_t n=nu*nv; triple* Controls; if(t == NULL) Controls=controls; else { Controls=new triple[n]; for(unsigned int i=0; i < n; ++i) Controls[i]=t*controls[i]; } if(first) { first=false; triple v=Controls[0]; b=pair(xratio(v),yratio(v)); } double x=b.getx(); double y=b.gety(); for(size_t i=0; i < n; ++i) { triple v=Controls[i]; x=m(x,xratio(v)); y=m(y,yratio(v)); } b=pair(x,y); if(t != NULL) delete[] Controls; } void drawNurbs::displacement() { #ifdef HAVE_GL size_t n=nu*nv; size_t nuknots=udegree+nu+1; size_t nvknots=vdegree+nv+1; if(Controls == NULL) { Controls=new(UseGC) GLfloat[(weights ? 4 : 3)*n]; uKnots=new(UseGC) GLfloat[nuknots]; vKnots=new(UseGC) GLfloat[nvknots]; } if(weights) for(size_t i=0; i < n; ++i) store(Controls+4*i,controls[i],weights[i]); else for(size_t i=0; i < n; ++i) store(Controls+3*i,controls[i]); for(size_t i=0; i < nuknots; ++i) uKnots[i]=uknots[i]; for(size_t i=0; i < nvknots; ++i) vKnots[i]=vknots[i]; #endif } void drawNurbs::render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent) { #ifdef HAVE_GL if(invisible || ((colors ? colors[3]+colors[7]+colors[11]+colors[15] < 4.0 : diffuse.A < 1.0) ^ transparent)) return; double t[16]; // current transform glGetDoublev(GL_MODELVIEW_MATRIX,t); run::transpose(t,4); bbox3 B(this->Min,this->Max); B.transform(t); triple m=B.Min(); triple M=B.Max(); if(perspective) { double f=m.getz()*perspective; double F=M.getz()*perspective; if(M.getx() < min(f*Min.getx(),F*Min.getx()) || m.getx() > max(f*Max.getx(),F*Max.getx()) || M.gety() < min(f*Min.gety(),F*Min.gety()) || m.gety() > max(f*Max.gety(),F*Max.gety()) || M.getz() < Min.getz() || m.getz() > Max.getz()) return; } else { if(M.getx() < Min.getx() || m.getx() > Max.getx() || M.gety() < Min.gety() || m.gety() > Max.gety() || M.getz() < Min.getz() || m.getz() > Max.getz()) return; } setcolors(colors,lighton,diffuse,ambient,emissive,specular,shininess); gluBeginSurface(nurb); int uorder=udegree+1; int vorder=vdegree+1; size_t stride=weights ? 4 : 3; gluNurbsSurface(nurb,uorder+nu,uKnots,vorder+nv,vKnots,stride*nv,stride, Controls,uorder,vorder, weights ? GL_MAP2_VERTEX_4 : GL_MAP2_VERTEX_3); if(lighton) gluNurbsCallback(nurb,GLU_NURBS_NORMAL,(_GLUfuncptr) glNormal3fv); if(colors) { static GLfloat linear[]={0.0,0.0,1.0,1.0}; gluNurbsSurface(nurb,4,linear,4,linear,8,4,colors,2,2,GL_MAP2_COLOR_4); } gluEndSurface(nurb); if(colors) glDisable(GL_COLOR_MATERIAL); #endif } void drawSphere::P(triple& t, double x, double y, double z) { if(half) { double temp=z; z=x; x=-temp; } if(T == NULL) { t=triple(x,y,z); return; } double f=T[12]*x+T[13]*y+T[14]*z+T[15]; if(f == 0.0) run::dividebyzero(); f=1.0/f; t=triple((T[0]*x+T[1]*y+T[2]*z+T[3])*f,(T[4]*x+T[5]*y+T[6]*z+T[7])*f, (T[8]*x+T[9]*y+T[10]*z+T[11])*f); } bool drawSphere::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible) return true; PRCmaterial m(ambient,diffuse,emissive,specular,opacity,shininess); switch(type) { case 0: // PRCsphere { if(half) out->addHemisphere(1.0,m,NULL,NULL,NULL,1.0,T); else out->addSphere(1.0,m,NULL,NULL,NULL,1.0,T); break; } case 1: // NURBSsphere { static double uknot[]={0.0,0.0,1.0/3.0,0.5,1.0,1.0}; static double vknot[]={0.0,0.0,0.0,0.0,1.0,1.0,1.0,1.0}; static double Weights[12]={2.0/3.0,2.0/9.0,2.0/9.0,2.0/3.0, 1.0/3.0,1.0/9.0,1.0/9.0,1.0/3.0, 1.0,1.0/3.0,1.0/3.0,1.0}; // NURBS representation of a sphere using 10 distinct control points // K. Qin, J. Comp. Sci. and Tech. 12, 210-216 (1997). triple N,S,P1,P2,P3,P4,P5,P6,P7,P8; P(N,0.0,0.0,1.0); P(P1,-2.0,-2.0,1.0); P(P2,-2.0,-2.0,-1.0); P(S,0.0,0.0,-1.0); P(P3,2.0,-2.0,1.0); P(P4,2.0,-2.0,-1.0); P(P5,2.0,2.0,1.0); P(P6,2.0,2.0,-1.0); P(P7,-2.0,2.0,1.0); P(P8,-2.0,2.0,-1.0); triple p0[]={N,P1,P2,S, N,P3,P4,S, N,P5,P6,S, N,P7,P8,S, N,P1,P2,S, N,P3,P4,S}; out->addSurface(2,3,3,4,p0,uknot,vknot,m,Weights); out->addSurface(2,3,3,4,p0+4,uknot,vknot,m,Weights); if(!half) { out->addSurface(2,3,3,4,p0+8,uknot,vknot,m,Weights); out->addSurface(2,3,3,4,p0+12,uknot,vknot,m,Weights); } break; } default: reportError("Invalid sphere type"); } return true; } bool drawCylinder::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible) return true; PRCmaterial m(ambient,diffuse,emissive,specular,opacity,shininess); out->addCylinder(1.0,1.0,m,NULL,NULL,NULL,1.0,T); return true; } bool drawDisk::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible) return true; PRCmaterial m(ambient,diffuse,emissive,specular,opacity,shininess); out->addDisk(1.0,m,NULL,NULL,NULL,1.0,T); return true; } bool drawTube::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible) return true; PRCmaterial m(ambient,diffuse,emissive,specular,opacity,shininess); Int n=center.length(); if(center.piecewisestraight()) { triple *centerControls=new(UseGC) triple[n+1]; for(Int i=0; i <= n; ++i) centerControls[i]=center.point(i); size_t N=n+1; triple *controls=new(UseGC) triple[N]; for(Int i=0; i <= n; ++i) controls[i]=g.point(i); out->addTube(N,centerControls,controls,true,m); } else { size_t N=3*n+1; triple *centerControls=new(UseGC) triple[N]; centerControls[0]=center.point((Int) 0); centerControls[1]=center.postcontrol((Int) 0); size_t k=1; for(Int i=1; i < n; ++i) { centerControls[++k]=center.precontrol(i); centerControls[++k]=center.point(i); centerControls[++k]=center.postcontrol(i); } centerControls[++k]=center.precontrol(n); centerControls[++k]=center.point(n); triple *controls=new(UseGC) triple[N]; controls[0]=g.point((Int) 0); controls[1]=g.postcontrol((Int) 0); k=1; for(Int i=1; i < n; ++i) { controls[++k]=g.precontrol(i); controls[++k]=g.point(i); controls[++k]=g.postcontrol(i); } controls[++k]=g.precontrol(n); controls[++k]=g.point(n); out->addTube(N,centerControls,controls,false,m); } return true; } bool drawPixel::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible) return true; out->addPoint(v,c,width); return true; } void drawPixel::render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent) { #ifdef HAVE_GL if(invisible) return; GLfloat V[4]; glEnable(GL_COLOR_MATERIAL); glColorMaterial(GL_FRONT_AND_BACK,GL_EMISSION); static GLfloat Black[]={0,0,0,1}; glMaterialfv(GL_FRONT_AND_BACK,GL_DIFFUSE,Black); glMaterialfv(GL_FRONT_AND_BACK,GL_AMBIENT,Black); glMaterialfv(GL_FRONT_AND_BACK,GL_SPECULAR,Black); glMaterialf(GL_FRONT_AND_BACK,GL_SHININESS,0.0); glPointSize(1.0+width); glBegin(GL_POINT); storecolor(V,0,c); glColor4fv(V); store(V,v); glVertex3fv(V); glEnd(); glPointSize(1.0); glDisable(GL_COLOR_MATERIAL); #endif } const string drawBaseTriangles::wrongsize= "triangle indices require 3 components"; const string drawBaseTriangles::outofrange="index out of range"; void drawBaseTriangles::bounds(const double* t, bbox3& b) { double x,y,z; double X,Y,Z; triple* tP; if(t == NULL) tP=P; else { tP=new triple[nP]; for(size_t i=0; i < nP; i++) tP[i]=t*P[i]; } boundstriples(x,y,z,X,Y,Z,nP,tP); b.add(x,y,z); b.add(X,Y,Z); if(t == NULL) { Min=triple(x,y,z); Max=triple(X,Y,Z); } else delete[] tP; } void drawBaseTriangles::ratio(const double* t, pair &b, double (*m)(double, double), double fuzz, bool &first) { triple* tP; if(t == NULL) tP=P; else { tP=new triple[nP]; for(size_t i=0; i < nP; i++) tP[i]=t*P[i]; } ratiotriples(b,m,first,nP,tP); if(t != NULL) delete[] tP; } bool drawTriangles::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible) return true; if (nC) { const RGBAColour white(1,1,1,opacity); const RGBAColour black(0,0,0,opacity); const PRCmaterial m(black,white,black,specular,opacity,PRCshininess); out->addTriangles(nP,P,nI,PI,m,nN,N,NI,0,NULL,NULL,nC,C,CI,0,NULL,NULL,30); } else { const PRCmaterial m(ambient,diffuse,emissive,specular,opacity,PRCshininess); out->addTriangles(nP,P,nI,PI,m,nN,N,NI,0,NULL,NULL,0,NULL,NULL,0,NULL,NULL,30); } return true; } void drawTriangles::render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent) { #ifdef HAVE_GL if(invisible) return; if(invisible || ((diffuse.A < 1.0) ^ transparent)) return; triple m,M; double t[16]; // current transform glGetDoublev(GL_MODELVIEW_MATRIX,t); run::transpose(t,4); bbox3 B(this->Min,this->Max); B.transform(t); m=B.Min(); M=B.Max(); if(perspective) { const double f=m.getz()*perspective; const double F=M.getz()*perspective; if((M.getx() < min(f*Min.getx(),F*Min.getx()) || m.getx() > max(f*Max.getx(),F*Max.getx()) || M.gety() < min(f*Min.gety(),F*Min.gety()) || m.gety() > max(f*Max.gety(),F*Max.gety()) || M.getz() < Min.getz() || m.getz() > Max.getz())) return; } else { if((M.getx() < Min.getx() || m.getx() > Max.getx() || M.gety() < Min.gety() || m.gety() > Max.gety() || M.getz() < Min.getz() || m.getz() > Max.getz())) return; } setcolors(nC,!nC,diffuse,ambient,emissive,specular,shininess); if(!nN) lighton=false; glBegin(GL_TRIANGLES); for(size_t i=0; i < nI; i++) { const uint32_t *pi=PI[i]; const uint32_t *ni=NI[i]; const uint32_t *ci=nC ? CI[i] : 0; if(lighton) glNormal3f(N[ni[0]].getx(),N[ni[0]].gety(),N[ni[0]].getz()); if(nC) glColor4f(C[ci[0]].R,C[ci[0]].G,C[ci[0]].B,C[ci[0]].A); glVertex3f(P[pi[0]].getx(),P[pi[0]].gety(),P[pi[0]].getz()); if(lighton) glNormal3f(N[ni[1]].getx(),N[ni[1]].gety(),N[ni[1]].getz()); if(nC) glColor4f(C[ci[1]].R,C[ci[1]].G,C[ci[1]].B,C[ci[1]].A); glVertex3f(P[pi[1]].getx(),P[pi[1]].gety(),P[pi[1]].getz()); if(lighton) glNormal3f(N[ni[2]].getx(),N[ni[2]].gety(),N[ni[2]].getz()); if(nC) glColor4f(C[ci[2]].R,C[ci[2]].G,C[ci[2]].B,C[ci[2]].A); glVertex3f(P[pi[2]].getx(),P[pi[2]].gety(),P[pi[2]].getz()); } glEnd(); if(nC) glDisable(GL_COLOR_MATERIAL); #endif } } //namespace camp ./asymptote-2.41/guideflags.h0000644000175000017500000000045213064427076016027 0ustar norbertnorbert/***** * guideflags.h * Tom Prince 2004/5/12 * * These flags are used to indicate what specifications of the join are * put on the stack. *****/ #ifndef GUIDEFLAGS_H #define GUIDEFLAGS_H namespace camp { #undef OUT #undef IN enum side { OUT, IN, END, JOIN }; } #endif //GUIDEFLAGS_H ./asymptote-2.41/LICENSE.LESSER0000644000175000017500000001672713064427076015561 0ustar norbertnorbert 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. ./asymptote-2.41/castop.h0000644000175000017500000001111713064427076015206 0ustar norbertnorbert/***** * castop.h * Tom Prince 2005/3/18 * * Defines some runtime functions used by the stack machine. * *****/ #ifndef CASTOP_H #define CASTOP_H #include #include "common.h" #include "stack.h" #include "fileio.h" #include "lexical.h" #include "mathop.h" #include "array.h" namespace run { using vm::read; using vm::pop; template void cast(vm::stack *s) { s->push((S) pop(s)); } void castDoubleInt(vm::stack *s) { double x=pop(s); s->push(Intcast(x)); } template void stringCast(vm::stack *s) { ostringstream buf; buf.precision(DBL_DIG); buf << pop(s); s->push(buf.str()); } template void castString(vm::stack *s) { string *S=pop(s); if(S->empty()) { T x=0; s->push(x); } else { try { s->push(lexical::cast(*S)); } catch (lexical::bad_cast&) { s->push(vm::Default); } } } void initialized(vm::stack *s) { s->push(!vm::isdefault(pop(s))); } template void arrayToArray(vm::stack *s) { vm::array *a=pop(s); size_t size=checkArray(a); vm::array *c=new vm::array(size); for(size_t i=0; i < size; i++) (*c)[i]=(S) read(a,i); s->push(c); } template void array2ToArray2(vm::stack *s) { vm::array *a=pop(s); size_t size=checkArray(a); vm::array *c=new vm::array(size); for(size_t i=0; i < size; ++i) { vm::array *ai=vm::read(a,i); size_t aisize=checkArray(ai); vm::array *ci=new vm::array(aisize); (*c)[i]=ci; for(size_t j=0; j < aisize; ++j) (*ci)[j]=(S) read(ai,j); } s->push(c); } template void read(vm::stack *s) { camp::file *f = pop(s); T val=T(); if(f->isOpen()) { f->read(val); if(f->LineMode()) f->nexteol(); if(interact::interactive) f->purgeStandard(val); } s->push(val); } inline Int Limit(Int nx) {return nx == 0 ? Int_MAX : nx;} inline void reportEof(camp::file *f, Int count) { if(count > 0) { ostringstream buf; buf << "EOF after reading " << count << " values from file '" << f->filename() << "'."; vm::error(buf); } } template void readArray(vm::stack *s, Int nx=-1, Int ny=-1, Int nz=-1) { camp::file *f = pop(s); vm::array *c=new vm::array(0); if(f->isOpen()) { if(nx != -1 && f->Nx() != -1) nx=f->Nx(); if(nx == -2) {f->read(nx); f->Nx(-1); if(nx == 0) {s->push(c); return;}} if(ny != -1 && f->Ny() != -1) ny=f->Ny(); if(ny == -2) {f->read(ny); f->Ny(-1); if(ny == 0) {s->push(c); return;}} if(nz != -1 && f->Nz() != -1) nz=f->Nz(); if(nz == -2) {f->read(nz); f->Nz(-1); if(nz == 0) {s->push(c); return;}} T v; if(nx >= 0) { for(Int i=0; i < Limit(nx); i++) { if(ny >= 0) { vm::array *ci=new vm::array(0); for(Int j=0; j < Limit(ny); j++) { if(nz >= 0) { vm::array *cij=new vm::array(0); bool break2=false; for(Int k=0; k < Limit(nz); k++) { f->read(v); if(f->error()) { if(nx && ny && nz) reportEof(f,(i*ny+j)*nz+k); s->push(c); return; } if(k == 0) { if(j == 0) c->push(ci); ci->push(cij); } cij->push(v); if(f->LineMode() && f->nexteol()) { if(f->nexteol()) break2=true; break; } } if(break2) break; } else { f->read(v); if(f->error()) { if(nx && ny) reportEof(f,i*ny+j); s->push(c); return; } if(j == 0) c->push(ci); ci->push(v); if(f->LineMode() && f->nexteol()) break; } } } else { f->read(v); if(f->error()) { if(nx) reportEof(f,i); s->push(c); return; } c->push(v); if(f->LineMode() && f->nexteol()) break; } } } else { for(;;) { f->read(v); if(f->error()) break; c->push(v); if(f->LineMode() && f->nexteol()) break; } } if(interact::interactive) f->purgeStandard(v); } s->push(c); } template void readArray1(vm::stack *s) { readArray(s,0); } template void readArray2(vm::stack *s) { readArray(s,0,0); } template void readArray3(vm::stack *s) { readArray(s,0,0,0); } } // namespace run #endif // CASTOP_H ./asymptote-2.41/types.h0000644000175000017500000003601413064427076015064 0ustar norbertnorbert/***** * types.h * Andy Hammerlindl 2002/06/20 * * Used by the compiler as a way to keep track of the type of a variable * or expression. * *****/ #ifndef TYPES_H #define TYPES_H #include #include #include #include "errormsg.h" #include "symbol.h" #include "common.h" #include "util.h" using std::ostream; using sym::symbol; // Forward declaration. namespace trans { class access; class varEntry; } namespace absyntax { class varinit; extern varinit *Default; } namespace types { enum ty_kind { ty_null, ty_record, // "struct" in Asymptote language ty_function, ty_overloaded, #define PRIMITIVE(name,Name,asyName) ty_##name, #define PRIMERROR #include "primitives.h" #undef PRIMERROR #undef PRIMITIVE ty_array }; // Forward declarations. class ty; struct signature; typedef mem::vector ty_vector; typedef ty_vector::iterator ty_iterator; // Checks if two types are equal in the sense of the language. // That is primitive types are equal if they are the same kind. // Structures are equal if they come from the same struct definition. // Arrays are equal if their cell types are equal. bool equivalent(const ty *t1, const ty *t2); // If special is true, this is the same as above. If special is false, just the // signatures are compared. bool equivalent(const ty *t1, const ty *t2, bool special); class caster { public: virtual ~caster() {} virtual trans::access *operator() (ty *target, ty *source) = 0; virtual bool castable(ty *target, ty *source) = 0; }; class ty : public gc { public: const ty_kind kind; ty(ty_kind kind) : kind(kind) {} virtual ~ty(); virtual void print (ostream& out) const; virtual void printVar (ostream& out, string name) const { print(out); out << " " << name; } // Returns true if the type is a user-defined type or the null type. // While the pair, path, etc. are stored by reference, this is // transparent to the user. virtual bool isReference() { return true; } virtual signature *getSignature() { return 0; } virtual const signature *getSignature() const { return 0; } virtual bool primitive() { return false; } bool isError() const { return kind == ty_error; } bool isNotError() const { return !isError(); } // The following are only used by the overloaded type, but it is so common // to test for an overloaded type then iterate over its types, that this // allows the code: // if (t->isOverloaded()) { // for (ty_iterator i = t->begin(); i != t->end(); ++i) { // ... // } // } // For speed reasons, only begin has an assert to test if t is overloaded. bool isOverloaded() const { return kind == ty_overloaded; } bool isNotOverloaded() const { return !isOverloaded(); } ty_iterator begin(); ty_iterator end(); // If a default initializer is not stored in the environment, the abstract // syntax asks the type if it has a "default" default initializer, by calling // this method. virtual trans::access *initializer() { return 0; } // If a cast function is not stored in the environment, ask the type itself. // This handles null->record casting, and the like. The caster is used as a // callback to the environment for casts of subtypes. virtual trans::access *castTo(ty *, caster &) { return 0; } // Just checks if a cast is possible. virtual bool castable(ty *target, caster &c) { return castTo(target, c); } // For pair's x and y, and array's length, this is a special type of // "field". // In actually, it returns a function which takes the object as its // parameter and returns the necessary result. // These should not have public permission, as modifying them would // have strange results. virtual trans::varEntry *virtualField(symbol, signature *) { return 0; } // varGetType for virtual fields. // Unless you are using functions for virtual fields, the base implementation // should work fine. virtual ty *virtualFieldGetType(symbol id); #if 0 // Returns the type. In case of functions, return the equivalent type // but with no default values for parameters. virtual ty *stripDefaults() { return this; } #endif // Returns true if the other type is equivalent to this one. // The general function equivalent should be preferably used, as it properly // handles overloaded type comparisons. virtual bool equiv(const ty *other) const { return this==other; } // Returns a number for the type for use in a hash table. Equivalent types // must yield the same number. virtual size_t hash() const = 0; }; class primitiveTy : public ty { public: primitiveTy(ty_kind kind) : ty(kind) {} bool primitive() { return true; } bool isReference() { return false; } ty *virtualFieldGetType(symbol ); trans::varEntry *virtualField(symbol, signature *); bool equiv(const ty *other) const { return this->kind==other->kind; } size_t hash() const { return (size_t)kind + 47; } }; class nullTy : public primitiveTy { public: nullTy() : primitiveTy(ty_null) {} bool isReference() { return true; } trans::access *castTo(ty *target, caster &); size_t hash() const { return (size_t)kind + 47; } }; // Ostream output, just defer to print. inline ostream& operator<< (ostream& out, const ty& t) { t.print(out); return out; } struct array : public ty { ty *celltype; ty *pushtype; ty *poptype; ty *appendtype; ty *inserttype; ty *deletetype; array(ty *celltype) : ty(ty_array), celltype(celltype), pushtype(0), poptype(0), appendtype(0), inserttype(0), deletetype(0) {} virtual bool isReference() { return true; } bool equiv(const ty *other) const { return other->kind==ty_array && equivalent(this->celltype,((array *)other)->celltype); } size_t hash() const { return 1007 * celltype->hash(); } Int depth() { if (array *cell=dynamic_cast(celltype)) return cell->depth() + 1; else return 1; } void print(ostream& out) const { out << *celltype << "[]"; } ty *pushType(); ty *popType(); ty *appendType(); ty *insertType(); ty *deleteType(); // Initialize to an empty array by default. trans::access *initializer(); // NOTE: General vectorization of casts would be here. // Add length and push as virtual fields. ty *virtualFieldGetType(symbol id); trans::varEntry *virtualField(symbol id, signature *sig); }; /* Base types */ #define PRIMITIVE(name,Name,asyName) \ ty *prim##Name(); \ ty *name##Array(); \ ty *name##Array2(); \ ty *name##Array3(); #define PRIMERROR #include "primitives.h" #undef PRIMERROR #undef PRIMITIVE ty *primNull(); struct formal { ty *t; symbol name; bool defval; bool Explicit; formal(ty *t, symbol name=symbol::nullsym, bool optional=false, bool Explicit=false) : t(t), name(name), defval(optional), Explicit(Explicit) {} // string->symbol translation is costly if done too many times. This // constructor has been disabled to make this cost more visible to the // programmer. #if 0 formal(ty *t, const char *name, bool optional=false, bool Explicit=false) : t(t), name(symbol::trans(name)), defval(optional ? absyntax::Default : 0), Explicit(Explicit) {} #endif friend ostream& operator<< (ostream& out, const formal& f); }; bool equivalent(const formal& f1, const formal& f2); bool argumentEquivalent(const formal &f1, const formal& f2); typedef mem::vector formal_vector; // Holds the parameters of a function and if they have default values // (only applicable in some cases). struct signature : public gc { formal_vector formals; // The number of keyword-only formals. These formals always come after the // regular formals. size_t numKeywordOnly; // Formal for the rest parameter. If there is no rest parameter, then the // type is null. formal rest; bool isOpen; signature() : numKeywordOnly(0), rest(0), isOpen(false) {} static const struct OPEN_t {} OPEN; explicit signature(OPEN_t) : numKeywordOnly(0), rest(0), isOpen(true) {} signature(signature &sig) : formals(sig.formals), numKeywordOnly(sig.numKeywordOnly), rest(sig.rest), isOpen(sig.isOpen) {} virtual ~signature() {} void add(formal f) { formals.push_back(f); } void addKeywordOnly(formal f) { add(f); ++numKeywordOnly; } void addRest(formal f) { rest=f; } bool hasRest() const { return rest.t; } size_t getNumFormals() const { return rest.t ? formals.size() + 1 : formals.size(); } formal& getFormal(size_t n) { assert(n < formals.size()); return formals[n]; } const formal& getFormal(size_t n) const { assert(n < formals.size()); return formals[n]; } formal& getRest() { return rest; } const formal& getRest() const { return rest; } bool formalIsKeywordOnly(size_t n) const { assert(n < formals.size()); return n >= formals.size() - numKeywordOnly; } friend ostream& operator<< (ostream& out, const signature& s); friend bool equivalent(const signature *s1, const signature *s2); // Check if a signature of argument types (as opposed to formal parameters) // are equivalent. Here, the arguments, if named, must have the same names, // and (for simplicity) no overloaded arguments are allowed. friend bool argumentEquivalent(const signature *s1, const signature *s2); #if 0 friend bool castable(signature *target, signature *source); friend Int numFormalsMatch(signature *s1, signature *s2); #endif size_t hash() const; }; struct function : public ty { ty *result; signature sig; function(ty *result) : ty(ty_function), result(result) {} function(ty *result, signature::OPEN_t) : ty(ty_function), result(result), sig(signature::OPEN) {} function(ty *result, signature *sig) : ty(ty_function), result(result), sig(*sig) {} function(ty *result, formal f1) : ty(ty_function), result(result) { add(f1); } function(ty *result, formal f1, formal f2) : ty(ty_function), result(result) { add(f1); add(f2); } function(ty *result, formal f1, formal f2, formal f3) : ty(ty_function), result(result) { add(f1); add(f2); add(f3); } function(ty *result, formal f1, formal f2, formal f3, formal f4) : ty(ty_function), result(result) { add(f1); add(f2); add(f3); add(f4); } virtual ~function() {} void add(formal f) { sig.add(f); } void addRest(formal f) { sig.addRest(f); } virtual bool isReference() { return true; } bool equiv(const ty *other) const { if (other->kind==ty_function) { function *that=(function *)other; return equivalent(this->result,that->result) && equivalent(&this->sig,&that->sig); } else return false; } size_t hash() const { return sig.hash()*0x1231+result->hash(); } void print(ostream& out) const { out << *result << sig; } void printVar (ostream& out, string name) const { result->printVar(out,name); out << sig; } ty *getResult() { return result; } signature *getSignature() { return &sig; } const signature *getSignature() const { return &sig; } #if 0 ty *stripDefaults(); #endif // Initialized to null. trans::access *initializer(); }; // This is used in getType expressions when an overloaded variable is accessed. class overloaded : public ty { public: ty_vector sub; // Warning: The venv endScope routine relies heavily on the current // implementation of overloaded. public: overloaded() : ty(ty_overloaded) {} overloaded(ty *t) : ty(ty_overloaded) { add(t); } virtual ~overloaded() {} bool equiv(const ty *other) const { for(ty_vector::const_iterator i=sub.begin();i!=sub.end();++i) if (equivalent(*i,other)) return true; return false; } size_t hash() const { // Overloaded types should not be hashed. assert(False); return 0; } void add(ty *t) { if (t->kind == ty_overloaded) { overloaded *ot = (overloaded *)t; copy(ot->sub.begin(), ot->sub.end(), inserter(this->sub, this->sub.end())); } else sub.push_back(t); } // Only add a type distinct from the ones currently in the overloaded type. // If special is false, just the distinct signatures are added. void addDistinct(ty *t, bool special=false); // If there are less than two overloaded types, the type isn't really // overloaded. This gives a more appropriate type in this case. ty *simplify() { switch (sub.size()) { case 0: return 0; case 1: { return sub.front(); } default: return new overloaded(*this); } } // Returns the signature-less type of the set. ty *signatureless(); // True if one of the subtypes is castable. bool castable(ty *target, caster &c); size_t size() const { return sub.size(); } // Use default printing for now. }; inline ty_iterator ty::begin() { assert(this->isOverloaded()); return ((overloaded *)this)->sub.begin(); } inline ty_iterator ty::end() { return ((overloaded *)this)->sub.end(); } // This is used to encapsulate iteration over the subtypes of an overloaded // type. The base method need only be implemented to handle non-overloaded // types. class collector { public: virtual ~collector() {} virtual ty *base(ty *target, ty *source) = 0; virtual ty *collect(ty *target, ty *source) { if (overloaded *o=dynamic_cast(target)) { ty_vector &sub=o->sub; overloaded *oo=new overloaded; for(ty_vector::iterator x = sub.begin(); x != sub.end(); ++x) { types::ty *t=collect(*x, source); if (t) oo->add(t); } return oo->simplify(); } else if (overloaded *o=dynamic_cast(source)) { ty_vector &sub=o->sub; overloaded *oo=new overloaded; for(ty_vector::iterator y = sub.begin(); y != sub.end(); ++y) { // NOTE: A possible speed optimization would be to replace this with a // call to base(), but this is only correct if we can guarantee that an // overloaded type has no overloaded sub-types. types::ty *t=collect(target, *y); if (t) oo->add(t); } return oo->simplify(); } else return base(target, source); } }; class tester { public: virtual ~tester() {} virtual bool base(ty *target, ty *source) = 0; virtual bool test(ty *target, ty *source) { if (overloaded *o=dynamic_cast(target)) { ty_vector &sub=o->sub; for(ty_vector::iterator x = sub.begin(); x != sub.end(); ++x) if (test(*x, source)) return true; return false; } else if (overloaded *o=dynamic_cast(source)) { ty_vector &sub=o->sub; for(ty_vector::iterator y = sub.begin(); y != sub.end(); ++y) if (base(target, *y)) return true; return false; } else return base(target, source); } }; } // namespace types GC_DECLARE_PTRFREE(types::primitiveTy); GC_DECLARE_PTRFREE(types::nullTy); #endif ./asymptote-2.41/tr.cc0000644000175000017500000002772413064427076014513 0ustar norbertnorbert/* This file is released under version 2 of the GNU Library General Public * License (see the files LICENSE.LIBRARY and LICENSE). */ /* $Id: tr.c,v 1.9 1998/01/29 16:56:54 brianp Exp $ */ /* * $Log: tr.c,v $ * Revision 1.9 1998/01/29 16:56:54 brianp * allow trOrtho() and trFrustum() to be called at any time, minor clean-up * * Revision 1.8 1998/01/28 19:47:39 brianp * minor clean-up for C++ * * Revision 1.7 1997/07/21 17:34:38 brianp * added tile borders * * Revision 1.6 1997/07/21 15:47:35 brianp * renamed all "near" and "far" variables * * Revision 1.5 1997/04/26 21:23:25 brianp * added trRasterPos3f function * * Revision 1.4 1997/04/26 19:59:36 brianp * set CurrentTile to -1 before first tile and after last tile * * Revision 1.3 1997/04/22 23:51:15 brianp * added WIN32 header stuff, removed tabs * * Revision 1.2 1997/04/19 23:26:10 brianp * many API changes * * Revision 1.1 1997/04/18 21:53:05 brianp * Initial revision * */ /* * Tiled Rendering library * Version 1.1 * Copyright (C) Brian Paul */ #include "common.h" #ifdef HAVE_GL #include #include #include #include #ifdef WIN32 #include #endif #ifdef __APPLE__ #include #include #else #include #include #endif #include "tr.h" #define DEFAULT_TILE_WIDTH 256 #define DEFAULT_TILE_HEIGHT 256 #define DEFAULT_TILE_BORDER 0 struct _TRctx { /* Final image parameters */ GLint ImageWidth, ImageHeight; GLenum ImageFormat, ImageType; GLvoid *ImageBuffer; /* Tile parameters */ GLint TileWidth, TileHeight; GLint TileWidthNB, TileHeightNB; GLint TileBorder; GLenum TileFormat, TileType; GLvoid *TileBuffer; /* Projection parameters */ GLboolean Perspective; GLdouble Left; GLdouble Right; GLdouble Bottom; GLdouble Top; GLdouble Near; GLdouble Far; /* Misc */ TRenum RowOrder; GLint Rows, Columns; GLint CurrentTile; GLint CurrentTileWidth, CurrentTileHeight; GLint CurrentRow, CurrentColumn; GLint ViewportSave[4]; }; /* * Misc setup including computing number of tiles (rows and columns). */ static void Setup(TRcontext *tr) { if (!tr) return; tr->Columns = (tr->ImageWidth + tr->TileWidthNB - 1) / tr->TileWidthNB; tr->Rows = (tr->ImageHeight + tr->TileHeightNB - 1) / tr->TileHeightNB; tr->CurrentTile = 0; assert(tr->Columns >= 0); assert(tr->Rows >= 0); } TRcontext *trNew(void) { TRcontext *tr = (TRcontext *) calloc(1, sizeof(TRcontext)); if (tr) { tr->TileWidth = DEFAULT_TILE_WIDTH; tr->TileHeight = DEFAULT_TILE_HEIGHT; tr->TileBorder = DEFAULT_TILE_BORDER; tr->RowOrder = TR_BOTTOM_TO_TOP; tr->CurrentTile = -1; } return (TRcontext *) tr; } void trDelete(TRcontext *tr) { if (tr) free(tr); } void trTileSize(TRcontext *tr, GLint width, GLint height, GLint border) { if (!tr) return; assert(border >= 0); assert(width >= 1); assert(height >= 1); assert(width >= 2*border); assert(height >= 2*border); tr->TileBorder = border; tr->TileWidth = width; tr->TileHeight = height; tr->TileWidthNB = width - 2 * border; tr->TileHeightNB = height - 2 * border; Setup(tr); } void trTileBuffer(TRcontext *tr, GLenum format, GLenum type, GLvoid *image) { if (!tr) return; tr->TileFormat = format; tr->TileType = type; tr->TileBuffer = image; } void trImageSize(TRcontext *tr, GLint width, GLint height) { if (!tr) return; tr->ImageWidth = width; tr->ImageHeight = height; Setup(tr); } void trImageBuffer(TRcontext *tr, GLenum format, GLenum type, GLvoid *image) { if (!tr) return; tr->ImageFormat = format; tr->ImageType = type; tr->ImageBuffer = image; } GLint trGet(TRcontext *tr, TRenum param) { if (!tr) return 0; switch (param) { case TR_TILE_WIDTH: return tr->TileWidth; case TR_TILE_HEIGHT: return tr->TileHeight; case TR_TILE_BORDER: return tr->TileBorder; case TR_IMAGE_WIDTH: return tr->ImageWidth; case TR_IMAGE_HEIGHT: return tr->ImageHeight; case TR_ROWS: return tr->Rows; case TR_COLUMNS: return tr->Columns; case TR_CURRENT_ROW: if (tr->CurrentTile<0) return -1; else return tr->CurrentRow; case TR_CURRENT_COLUMN: if (tr->CurrentTile<0) return -1; else return tr->CurrentColumn; case TR_CURRENT_TILE_WIDTH: return tr->CurrentTileWidth; case TR_CURRENT_TILE_HEIGHT: return tr->CurrentTileHeight; case TR_ROW_ORDER: return (GLint) tr->RowOrder; default: return 0; } } void trRowOrder(TRcontext *tr, TRenum order) { if (!tr) return; if (order==TR_TOP_TO_BOTTOM || order==TR_BOTTOM_TO_TOP) tr->RowOrder = order; } void trOrtho(TRcontext *tr, GLdouble left, GLdouble right, GLdouble bottom, GLdouble top, GLdouble zNear, GLdouble zFar) { if (!tr) return; tr->Perspective = GL_FALSE; tr->Left = left; tr->Right = right; tr->Bottom = bottom; tr->Top = top; tr->Near = zNear; tr->Far = zFar; } void trFrustum(TRcontext *tr, GLdouble left, GLdouble right, GLdouble bottom, GLdouble top, GLdouble zNear, GLdouble zFar) { if (!tr) return; tr->Perspective = GL_TRUE; tr->Left = left; tr->Right = right; tr->Bottom = bottom; tr->Top = top; tr->Near = zNear; tr->Far = zFar; } void trPerspective(TRcontext *tr, GLdouble fovy, GLdouble aspect, GLdouble zNear, GLdouble zFar ) { GLdouble xmin, xmax, ymin, ymax; static const double halfradians=acos(-1.0)/360.0; ymax = zNear * tan(fovy * halfradians); ymin = -ymax; xmin = ymin * aspect; xmax = ymax * aspect; trFrustum(tr, xmin, xmax, ymin, ymax, zNear, zFar); } void trBeginTile(TRcontext *tr) { GLint matrixMode; GLint tileWidth, tileHeight, border; GLdouble left, right, bottom, top; if (!tr) return; if (tr->CurrentTile <= 0) { Setup(tr); /* Save user's viewport, will be restored after last tile rendered */ glGetIntegerv(GL_VIEWPORT, tr->ViewportSave); } /* which tile (by row and column) we're about to render */ if (tr->RowOrder==TR_BOTTOM_TO_TOP) { tr->CurrentRow = tr->CurrentTile / tr->Columns; tr->CurrentColumn = tr->CurrentTile % tr->Columns; } else if (tr->RowOrder==TR_TOP_TO_BOTTOM) { tr->CurrentRow = tr->Rows - (tr->CurrentTile / tr->Columns) - 1; tr->CurrentColumn = tr->CurrentTile % tr->Columns; } else { /* This should never happen */ abort(); } assert(tr->CurrentRow < tr->Rows); assert(tr->CurrentColumn < tr->Columns); border = tr->TileBorder; /* Compute actual size of this tile with border */ if (tr->CurrentRow < tr->Rows-1) tileHeight = tr->TileHeight; else tileHeight = tr->ImageHeight - (tr->Rows-1) * (tr->TileHeightNB) + 2 * border; if (tr->CurrentColumn < tr->Columns-1) tileWidth = tr->TileWidth; else tileWidth = tr->ImageWidth - (tr->Columns-1) * (tr->TileWidthNB) + 2 * border; /* Save tile size, with border */ tr->CurrentTileWidth = tileWidth; tr->CurrentTileHeight = tileHeight; glViewport(0, 0, tileWidth, tileHeight); /* tile size including border */ /* save current matrix mode */ glGetIntegerv(GL_MATRIX_MODE, &matrixMode); glMatrixMode(GL_PROJECTION); glLoadIdentity(); /* compute projection parameters */ left = tr->Left + (tr->Right - tr->Left) * (tr->CurrentColumn * tr->TileWidthNB - border) / tr->ImageWidth; right = left + (tr->Right - tr->Left) * tileWidth / tr->ImageWidth; bottom = tr->Bottom + (tr->Top - tr->Bottom) * (tr->CurrentRow * tr->TileHeightNB - border) / tr->ImageHeight; top = bottom + (tr->Top - tr->Bottom) * tileHeight / tr->ImageHeight; if (tr->Perspective) glFrustum(left, right, bottom, top, tr->Near, tr->Far); else glOrtho(left, right, bottom, top, tr->Near, tr->Far); /* restore user's matrix mode */ glMatrixMode(matrixMode); } int trEndTile(TRcontext *tr) { GLint prevRowLength, prevSkipRows, prevSkipPixels; if (!tr) return 0; assert(tr->CurrentTile>=0); /* be sure OpenGL rendering is finished */ glFlush(); /* save current glPixelStore values */ glGetIntegerv(GL_PACK_ROW_LENGTH, &prevRowLength); glGetIntegerv(GL_PACK_SKIP_ROWS, &prevSkipRows); glGetIntegerv(GL_PACK_SKIP_PIXELS, &prevSkipPixels); /*glGetIntegerv(GL_PACK_ALIGNMENT, &prevAlignment);*/ if (tr->TileBuffer) { GLint srcX = tr->TileBorder; GLint srcY = tr->TileBorder; GLint srcWidth = tr->TileWidthNB; GLint srcHeight = tr->TileHeightNB; glReadPixels(srcX, srcY, srcWidth, srcHeight, tr->TileFormat, tr->TileType, tr->TileBuffer); } if (tr->ImageBuffer) { GLint srcX = tr->TileBorder; GLint srcY = tr->TileBorder; GLint srcWidth = tr->CurrentTileWidth - 2 * tr->TileBorder; GLint srcHeight = tr->CurrentTileHeight - 2 * tr->TileBorder; GLint destX = tr->TileWidthNB * tr->CurrentColumn; GLint destY = tr->TileHeightNB * tr->CurrentRow; /* setup pixel store for glReadPixels */ glPixelStorei(GL_PACK_ROW_LENGTH, tr->ImageWidth); glPixelStorei(GL_PACK_SKIP_ROWS, destY); glPixelStorei(GL_PACK_SKIP_PIXELS, destX); /*glPixelStorei(GL_PACK_ALIGNMENT, 1);*/ /* read the tile into the final image */ glReadPixels(srcX, srcY, srcWidth, srcHeight, tr->ImageFormat, tr->ImageType, tr->ImageBuffer); } /* restore previous glPixelStore values */ glPixelStorei(GL_PACK_ROW_LENGTH, prevRowLength); glPixelStorei(GL_PACK_SKIP_ROWS, prevSkipRows); glPixelStorei(GL_PACK_SKIP_PIXELS, prevSkipPixels); /*glPixelStorei(GL_PACK_ALIGNMENT, prevAlignment);*/ /* increment tile counter, return 1 if more tiles left to render */ tr->CurrentTile++; if (tr->CurrentTile >= tr->Rows * tr->Columns) { /* restore user's viewport */ glViewport(tr->ViewportSave[0], tr->ViewportSave[1], tr->ViewportSave[2], tr->ViewportSave[3]); tr->CurrentTile = -1; /* all done */ return 0; } else return 1; } /* * Replacement for glRastePos3f() which avoids the problem with invalid * raster pos. */ void trRasterPos3f(TRcontext *tr, GLfloat x, GLfloat y, GLfloat z) { if (tr->CurrentTile<0) { /* not doing tile rendering right now. Let OpenGL do this. */ glRasterPos3f(x, y, z); } else { GLdouble modelview[16], proj[16]; GLint viewport[4]; GLdouble winX, winY, winZ; /* Get modelview, projection and viewport */ glGetDoublev(GL_MODELVIEW_MATRIX, modelview); glGetDoublev(GL_PROJECTION_MATRIX, proj); viewport[0] = 0; viewport[1] = 0; viewport[2] = tr->CurrentTileWidth; viewport[3] = tr->CurrentTileHeight; /* Project object coord to window coordinate */ if (gluProject(x, y, z, modelview, proj, viewport, &winX, &winY, &winZ)){ /* set raster pos to window coord (0,0) */ glMatrixMode(GL_MODELVIEW); glPushMatrix(); glLoadIdentity(); glMatrixMode(GL_PROJECTION); glPushMatrix(); glLoadIdentity(); glOrtho(0.0, tr->CurrentTileWidth, 0.0, tr->CurrentTileHeight, 0.0, 1.0); glRasterPos3f(0.0, 0.0, -winZ); /* Now use empty bitmap to adjust raster position to (winX,winY) */ { GLubyte bitmap[1] = {0}; glBitmap(1, 1, 0.0, 0.0, winX, winY, bitmap); } /* restore original matrices */ glPopMatrix(); /*proj*/ glMatrixMode(GL_MODELVIEW); glPopMatrix(); } #ifdef DEBUG if (glGetError()) printf("GL error!\n"); #endif } } #endif ./asymptote-2.41/runstring.cc0000644000175000017500000004416013064427126016106 0ustar norbertnorbert/***** Autogenerated from runstring.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runstring.in" /***** * runstring.in * * Runtime functions for string operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 10 "runstring.in" #include #include #include #include "array.h" using namespace camp; using namespace vm; using namespace settings; typedef array stringarray; typedef array stringarray2; using types::stringArray; using types::stringArray2; namespace types { extern const char *names[]; } namespace run { extern string emptystring; } static const string defaulttimeformat=string("%a %b %d %T %Z %Y"); #ifdef HAVE_STRFTIME static const size_t nTime=256; static char Time[nTime]; #endif void checkformat(const char *ptr, bool intformat) { while(*ptr != '\0') { if(*ptr != '%') /* While we have regular characters, print them. */ ptr++; else { /* We've got a format specifier. */ ptr++; while(*ptr && strchr ("-+ #0'I", *ptr)) /* Move past flags. */ ptr++; if(*ptr == '*') ptr++; else while(isdigit(*ptr)) /* Handle explicit numeric value. */ ptr++; if(*ptr == '.') { ptr++; /* Go past the period. */ if(*ptr == '*') { ptr++; } else while(isdigit(*ptr)) /* Handle explicit numeric value. */ ptr++; } while(*ptr && strchr ("hlL", *ptr)) ptr++; if(*ptr == '%') {++ptr; continue;} else if(*ptr != '\0') { if(intformat) { switch(*ptr) { case 'd': case 'i': case 'o': case 'u': case 'x': case 'X': case 'c': break; default: ostringstream buf; buf << "Invalid format '" << *ptr << "' for type " << types::names[types::ty_Int]; error(buf); break; } } else { switch(*ptr) { case 'f': case 'F': case 'e': case 'E': case 'g': case 'G': break; default: ostringstream buf; buf << "Invalid format '" << *ptr << "' for type " << types::names[types::ty_real]; error(buf); break; } } } break; // Only one argument is allowed. } /* End of else statement */ } } // Autogenerated routines: #ifndef NOSYM #include "runstring.symbols.h" #endif namespace run { // String operations #line 113 "runstring.in" void emptyString(stack *Stack) { #line 114 "runstring.in" {Stack->push(emptystring); return;} } #line 119 "runstring.in" // Int length(string *s); void gen_runstring1(stack *Stack) { string * s=vm::pop(Stack); #line 120 "runstring.in" {Stack->push((Int) s->length()); return;} } #line 124 "runstring.in" // Int find(string *s, string t, Int pos=0); void gen_runstring2(stack *Stack) { Int pos=vm::pop(Stack,0); string t=vm::pop(Stack); string * s=vm::pop(Stack); #line 125 "runstring.in" size_t n=s->find(t,pos); {Stack->push(n == string::npos ? (Int) -1 : (Int) n); return;} } #line 130 "runstring.in" // Int rfind(string *s, string t, Int pos=-1); void gen_runstring3(stack *Stack) { Int pos=vm::pop(Stack,-1); string t=vm::pop(Stack); string * s=vm::pop(Stack); #line 131 "runstring.in" size_t n=s->rfind(t,pos); {Stack->push(n == string::npos ? (Int) -1 : (Int) n); return;} } #line 136 "runstring.in" // string reverse(string s); void gen_runstring4(stack *Stack) { string s=vm::pop(Stack); #line 137 "runstring.in" reverse(s.begin(),s.end()); {Stack->push(s); return;} } #line 142 "runstring.in" // string insert(string s, Int pos, string t); void gen_runstring5(stack *Stack) { string t=vm::pop(Stack); Int pos=vm::pop(Stack); string s=vm::pop(Stack); #line 143 "runstring.in" if ((size_t) pos < s.length()) {Stack->push(s.insert(pos,t)); return;} {Stack->push(s); return;} } #line 149 "runstring.in" // string substr(string* s, Int pos, Int n=-1); void gen_runstring6(stack *Stack) { Int n=vm::pop(Stack,-1); Int pos=vm::pop(Stack); string* s=vm::pop(Stack); #line 150 "runstring.in" if ((size_t) pos < s->length()) {Stack->push(s->substr(pos,n)); return;} {Stack->push(emptystring); return;} } #line 156 "runstring.in" // string erase(string s, Int pos, Int n); void gen_runstring7(stack *Stack) { Int n=vm::pop(Stack); Int pos=vm::pop(Stack); string s=vm::pop(Stack); #line 157 "runstring.in" if ((size_t) pos < s.length()) {Stack->push(s.erase(pos,n)); return;} {Stack->push(s); return;} } #line 163 "runstring.in" // string downcase(string s); void gen_runstring8(stack *Stack) { string s=vm::pop(Stack); #line 164 "runstring.in" std::transform(s.begin(),s.end(),s.begin(),tolower); {Stack->push(s); return;} } #line 169 "runstring.in" // string upcase(string s); void gen_runstring9(stack *Stack) { string s=vm::pop(Stack); #line 170 "runstring.in" std::transform(s.begin(),s.end(),s.begin(),toupper); {Stack->push(s); return;} } // returns a string constructed by translating all occurrences of the string // from in an array of string pairs {from,to} to the string to in string s. #line 177 "runstring.in" // string replace(string *S, stringarray2 *translate); void gen_runstring10(stack *Stack) { stringarray2 * translate=vm::pop(Stack); string * S=vm::pop(Stack); #line 178 "runstring.in" size_t size=checkArray(translate); for(size_t i=0; i < size; i++) { array *a=read(translate,i); checkArray(a); } const char *p=S->c_str(); ostringstream buf; while(*p) { for(size_t i=0; i < size;) { array *a=read(translate,i); size_t size2=checkArray(a); if(size2 != 2) error("translation table entry must be an array of length 2"); string* from=read(a,0); size_t len=from->length(); if(strncmp(p,from->c_str(),len) != 0) {i++; continue;} buf << read(a,1); p += len; if(*p == 0) {Stack->push(buf.str()); return;} i=0; } buf << *(p++); } {Stack->push(buf.str()); return;} } #line 205 "runstring.in" // string format(string *format, Int x, string locale=emptystring); void gen_runstring11(stack *Stack) { string locale=vm::pop(Stack,emptystring); Int x=vm::pop(Stack); string * format=vm::pop(Stack); #line 206 "runstring.in" ostringstream out; const char *p0=format->c_str(); checkformat(p0,true); const char *p=p0; const char *start=NULL; while(*p != 0) { char curr=*p; if(curr == '%') { p++; if(*p != '%') {start=p-1; break;} } out << *(p++); } if(!start) {Stack->push(out.str()); return;} // Allow at most 1 argument while(*p != 0) { if(*p == '*' || *p == '$') {Stack->push(out.str()); return;} if(isupper(*p) || islower(*p)) {p++; break;} p++; } string f=format->substr(start-p0,p-start); const char *oldlocale=NULL; if(!locale.empty()) { oldlocale=setlocale(LC_ALL,NULL); if(oldlocale) oldlocale=StrdupNoGC(oldlocale); setlocale(LC_ALL,locale.c_str()); } Int size=snprintf(NULL,0,f.c_str(),x)+1; if(size < 1) size=255; // Workaround for non-C99 compliant systems. char *buf=new char[size]; snprintf(buf,size,f.c_str(),x); out << string(buf); out << p; delete[] buf; if(oldlocale) { setlocale(LC_ALL,oldlocale); delete[] oldlocale; } {Stack->push(out.str()); return;} } #line 259 "runstring.in" // string format(string *format, string separator, real x, string locale=emptystring); void gen_runstring12(stack *Stack) { string locale=vm::pop(Stack,emptystring); real x=vm::pop(Stack); string separator=vm::pop(Stack); string * format=vm::pop(Stack); #line 261 "runstring.in" bool tex=getSetting("tex") != "none"; bool texify=false; ostringstream out; const char *p0=format->c_str(); checkformat(p0,false); const char *phantom="\\phantom{+}"; const char *p=p0; const char *start=NULL; char prev=0; while(*p != 0) { char curr=*p; if(tex && curr == '$' && prev != '\\') texify=true; prev=curr; if(curr == '%') { p++; if(*p != '%') {start=p-1; break;} } out << *(p++); } if(!start) {Stack->push(out.str()); return;} // Allow at most 1 argument while(*p != 0) { if(*p == '*' || *p == '$') {Stack->push(out.str()); return;} if(isupper(*p) || islower(*p)) {p++; break;} p++; } const char *tail=p; string f=format->substr(start-p0,tail-start); const char *oldlocale=NULL; if(!locale.empty()) { oldlocale=setlocale(LC_ALL,NULL); if(oldlocale) oldlocale=StrdupNoGC(oldlocale); setlocale(LC_ALL,locale.c_str()); } Int size=snprintf(NULL,0,f.c_str(),x)+1; if(size < 1) size=255; // Workaround for non-C99 compliant systems. char *buf=new char[size]; snprintf(buf,size,f.c_str(),x); bool trailingzero=f.find("#") < string::npos; bool plus=f.find("+") < string::npos; bool space=f.find(" ") < string::npos; char *q=buf; // beginning of formatted number if(*q == ' ' && texify) { out << phantom; q++; } const char decimal=*(localeconv()->decimal_point); // Remove any spurious sign if(*q == '-' || *q == '+') { p=q+1; bool zero=true; while(*p != 0) { if(!isdigit(*p) && *p != decimal) break; if(isdigit(*p) && *p != '0') {zero=false; break;} p++; } if(zero) { q++; if((plus || space) && texify) out << phantom; } } const char *r=p=q; bool dp=false; while(*r != 0 && (isspace(*r) || isdigit(*r) || *r == decimal \ || *r == '+' || *r == '-')) { if(*r == decimal) dp=true; r++; } if(dp) { // Remove trailing zeros and/or decimal point r--; unsigned n=0; while(r > q && *r == '0') {r--; n++;} if(*r == decimal) {r--; n++;} while(q <= r) out << *(q++); if(!trailingzero) q += n; } bool zero=(r == p && *r == '0') && !trailingzero; // Translate "E+/E-/e+/e-" exponential notation to TeX while(*q != 0) { if(texify && (*q == 'E' || *q == 'e') && (*(q+1) == '+' || *(q+1) == '-')) { if(!zero) out << separator << "10^{"; bool plus=(*(q+1) == '+'); q++; if(plus) q++; if(*q == '-') out << *(q++); while(*q == '0' && (zero || isdigit(*(q+1)))) q++; while(isdigit(*q)) out << *(q++); if(!zero) out << "}"; break; } out << *(q++); } while(*tail != 0) out << *(tail++); delete[] buf; if(oldlocale) { setlocale(LC_ALL,oldlocale); delete[] oldlocale; } {Stack->push(out.str()); return;} } #line 386 "runstring.in" // Int hex(string s); void gen_runstring13(stack *Stack) { string s=vm::pop(Stack); #line 387 "runstring.in" istringstream is(s); is.setf(std::ios::hex,std::ios::basefield); Int value; if(is && is >> value && ((is >> std::ws).eof())) {Stack->push(value); return;} ostringstream buf; buf << "invalid hexidecimal cast from string \"" << s << "\""; error(buf); } #line 397 "runstring.in" // Int ascii(string s); void gen_runstring14(stack *Stack) { string s=vm::pop(Stack); #line 398 "runstring.in" {Stack->push(s.empty() ? -1 : (unsigned char) s[0]); return;} } #line 402 "runstring.in" // string string(Int x); void gen_runstring15(stack *Stack) { Int x=vm::pop(Stack); #line 403 "runstring.in" ostringstream buf; buf << x; {Stack->push(buf.str()); return;} } #line 409 "runstring.in" // string string(real x, Int digits=DBL_DIG); void gen_runstring16(stack *Stack) { Int digits=vm::pop(Stack,DBL_DIG); real x=vm::pop(Stack); #line 410 "runstring.in" ostringstream buf; buf.precision(digits); buf << x; {Stack->push(buf.str()); return;} } #line 417 "runstring.in" // string time(string format=defaulttimeformat); void gen_runstring17(stack *Stack) { string format=vm::pop(Stack,defaulttimeformat); #line 418 "runstring.in" #ifdef HAVE_STRFTIME const time_t bintime=time(NULL); if(!strftime(Time,nTime,format.c_str(),localtime(&bintime))) {Stack->push(""); return;} {Stack->push(Time); return;} #else {Stack->push(format); return;} #endif } #line 428 "runstring.in" // string time(Int seconds, string format=defaulttimeformat); void gen_runstring18(stack *Stack) { string format=vm::pop(Stack,defaulttimeformat); Int seconds=vm::pop(Stack); #line 429 "runstring.in" #ifdef HAVE_STRFTIME const time_t bintime=seconds; if(!strftime(Time,nTime,format.c_str(),localtime(&bintime))) {Stack->push(""); return;} {Stack->push(Time); return;} #else // Avoid unused variable warning messages unused(&seconds); {Stack->push(format); return;} #endif } #line 441 "runstring.in" // Int seconds(string t=emptystring, string format=emptystring); void gen_runstring19(stack *Stack) { string format=vm::pop(Stack,emptystring); string t=vm::pop(Stack,emptystring); #line 442 "runstring.in" #if defined(HAVE_STRPTIME) const time_t bintime=time(NULL); tm tm=*localtime(&bintime); if(t != "" && !strptime(t.c_str(),format.c_str(),&tm)) {Stack->push(-1); return;} {Stack->push((Int) mktime(&tm)); return;} #else {Stack->push(-1); return;} #endif } } // namespace run namespace trans { void gen_runstring_venv(venv &ve) { #line 112 "runstring.in" REGISTER_BLTIN(run::emptyString,"emptyString"); #line 119 "runstring.in" addFunc(ve, run::gen_runstring1, primInt(), SYM(length), formal(primString(), SYM(s), false, false)); #line 124 "runstring.in" addFunc(ve, run::gen_runstring2, primInt(), SYM(find), formal(primString(), SYM(s), false, false), formal(primString() , SYM(t), false, false), formal(primInt(), SYM(pos), true, false)); #line 130 "runstring.in" addFunc(ve, run::gen_runstring3, primInt(), SYM(rfind), formal(primString(), SYM(s), false, false), formal(primString() , SYM(t), false, false), formal(primInt(), SYM(pos), true, false)); #line 136 "runstring.in" addFunc(ve, run::gen_runstring4, primString() , SYM(reverse), formal(primString() , SYM(s), false, false)); #line 142 "runstring.in" addFunc(ve, run::gen_runstring5, primString() , SYM(insert), formal(primString() , SYM(s), false, false), formal(primInt(), SYM(pos), false, false), formal(primString() , SYM(t), false, false)); #line 149 "runstring.in" addFunc(ve, run::gen_runstring6, primString() , SYM(substr), formal(primString(), SYM(s), false, false), formal(primInt(), SYM(pos), false, false), formal(primInt(), SYM(n), true, false)); #line 156 "runstring.in" addFunc(ve, run::gen_runstring7, primString() , SYM(erase), formal(primString() , SYM(s), false, false), formal(primInt(), SYM(pos), false, false), formal(primInt(), SYM(n), false, false)); #line 163 "runstring.in" addFunc(ve, run::gen_runstring8, primString() , SYM(downcase), formal(primString() , SYM(s), false, false)); #line 169 "runstring.in" addFunc(ve, run::gen_runstring9, primString() , SYM(upcase), formal(primString() , SYM(s), false, false)); #line 175 "runstring.in" addFunc(ve, run::gen_runstring10, primString() , SYM(replace), formal(primString(), SYM(s), false, false), formal(stringArray2(), SYM(translate), false, false)); #line 205 "runstring.in" addFunc(ve, run::gen_runstring11, primString() , SYM(format), formal(primString(), SYM(format), false, false), formal(primInt(), SYM(x), false, false), formal(primString() , SYM(locale), true, false)); #line 259 "runstring.in" addFunc(ve, run::gen_runstring12, primString() , SYM(format), formal(primString(), SYM(format), false, false), formal(primString() , SYM(separator), false, false), formal(primReal(), SYM(x), false, false), formal(primString() , SYM(locale), true, false)); #line 386 "runstring.in" addFunc(ve, run::gen_runstring13, primInt(), SYM(hex), formal(primString() , SYM(s), false, false)); #line 397 "runstring.in" addFunc(ve, run::gen_runstring14, primInt(), SYM(ascii), formal(primString() , SYM(s), false, false)); #line 402 "runstring.in" addFunc(ve, run::gen_runstring15, primString() , SYM(string), formal(primInt(), SYM(x), false, false)); #line 409 "runstring.in" addFunc(ve, run::gen_runstring16, primString() , SYM(string), formal(primReal(), SYM(x), false, false), formal(primInt(), SYM(digits), true, false)); #line 417 "runstring.in" addFunc(ve, run::gen_runstring17, primString() , SYM(time), formal(primString() , SYM(format), true, false)); #line 428 "runstring.in" addFunc(ve, run::gen_runstring18, primString() , SYM(time), formal(primInt(), SYM(seconds), false, false), formal(primString() , SYM(format), true, false)); #line 441 "runstring.in" addFunc(ve, run::gen_runstring19, primInt(), SYM(seconds), formal(primString() , SYM(t), true, false), formal(primString() , SYM(format), true, false)); } } // namespace trans ./asymptote-2.41/runtriple.symbols.h0000644000175000017500000000172713064427143017431 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(a); ADDSYMBOL(abs); ADDSYMBOL(azimuth); ADDSYMBOL(b); ADDSYMBOL(bezier); ADDSYMBOL(bezierP); ADDSYMBOL(bezierPP); ADDSYMBOL(bezierPPP); ADDSYMBOL(c); ADDSYMBOL(colatitude); ADDSYMBOL(cross); ADDSYMBOL(d); ADDSYMBOL(dir); ADDSYMBOL(dot); ADDSYMBOL(expi); ADDSYMBOL(latitude); ADDSYMBOL(length); ADDSYMBOL(longitude); ADDSYMBOL(perp); ADDSYMBOL(polar); ADDSYMBOL(realmult); ADDSYMBOL(t); ADDSYMBOL(u); ADDSYMBOL(unit); ADDSYMBOL(v); ADDSYMBOL(warn); ADDSYMBOL(x); ADDSYMBOL(xpart); ADDSYMBOL(ypart); ADDSYMBOL(z); ADDSYMBOL(zpart); ./asymptote-2.41/drawpath3.h0000644000175000017500000000750113064427076015614 0ustar norbertnorbert/***** * drawpath3.h * * Stores a path3 that has been added to a picture. *****/ #ifndef DRAWPATH3_H #define DRAWPATH3_H #include "drawelement.h" #include "path3.h" #include "beziercurve.h" namespace camp { class drawPath3 : public drawElement { protected: #ifdef HAVE_GL BezierCurve R; #endif const path3 g; triple center; bool straight; prc::RGBAColour color; bool invisible; Interaction interaction; triple Min,Max; public: drawPath3(path3 g, triple center, const pen& p, Interaction interaction) : g(g), center(center), straight(g.piecewisestraight()), color(rgba(p)), invisible(p.invisible()), interaction(interaction), Min(g.min()), Max(g.max()) {} drawPath3(const double* t, const drawPath3 *s) : g(camp::transformed(t,s->g)), straight(s->straight), color(s->color), invisible(s->invisible), interaction(s->interaction), Min(g.min()), Max(g.max()) { center=t*s->center; } virtual ~drawPath3() {} bool is3D() {return true;} void bounds(const double* t, bbox3& B) { if(t != NULL) { const path3 tg(camp::transformed(t,g)); B.add(tg.min()); B.add(tg.max()); } else { B.add(Min); B.add(Max); } } void ratio(const double* t, pair &b, double (*m)(double, double), double, bool &first) { pair z; if(t != NULL) { const path3 tg(camp::transformed(t,g)); z=tg.ratio(m); } else z=g.ratio(m); if(first) { b=z; first=false; } else b=pair(m(b.getx(),z.getx()),m(b.gety(),z.gety())); } bool write(prcfile *out, unsigned int *, double, groupsmap&); void render(GLUnurbs*, double, const triple&, const triple&, double, bool lighton, bool transparent); drawElement *transformed(const double* t); }; class drawNurbsPath3 : public drawElement { protected: size_t degree; size_t n; triple *controls; double *weights; double *knots; prc::RGBAColour color; bool invisible; triple Min,Max; #ifdef HAVE_GL GLfloat *Controls; GLfloat *Knots; #endif public: drawNurbsPath3(const vm::array& g, const vm::array* knot, const vm::array* weight, const pen& p) : color(rgba(p)), invisible(p.invisible()) { size_t weightsize=checkArray(weight); string wrongsize="Inconsistent NURBS data"; n=checkArray(&g); if(n == 0 || (weightsize != 0 && weightsize != n)) reportError(wrongsize); controls=new(UseGC) triple[n]; size_t k=0; for(size_t i=0; i < n; ++i) controls[k++]=vm::read(g,i); if(weightsize > 0) { size_t k=0; weights=new(UseGC) double[n]; for(size_t i=0; i < n; ++i) weights[k++]=vm::read(weight,i); } else weights=NULL; size_t nknots=checkArray(knot); if(nknots <= n+1 || nknots > 2*n) reportError(wrongsize); degree=nknots-n-1; run::copyArrayC(knots,knot,0,NoGC); #ifdef HAVE_GL Controls=NULL; #endif } drawNurbsPath3(const double* t, const drawNurbsPath3 *s) : degree(s->degree), n(s->n), weights(s->weights), knots(s->knots), color(s->color), invisible(s->invisible) { controls=new(UseGC) triple[n]; for(unsigned int i=0; i < n; ++i) controls[i]=t*s->controls[i]; #ifdef HAVE_GL Controls=NULL; #endif } bool is3D() {return true;} void bounds(const double* t, bbox3& b); virtual ~drawNurbsPath3() {} bool write(prcfile *out, unsigned int *, double, groupsmap&); void displacement(); void ratio(const double* t, pair &b, double (*m)(double, double), double fuzz, bool &first); void render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent); drawElement *transformed(const double* t); }; } #endif ./asymptote-2.41/runpicture.cc0000644000175000017500000015414613064427126016261 0ustar norbertnorbert/***** Autogenerated from runpicture.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runpicture.in" /***** * runpicture.in * * Runtime functions for picture operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 29 "runpicture.in" #include "picture.h" #include "drawelement.h" #include "path.h" #include "array.h" #include "arrayop.h" #include "drawpath.h" #include "drawfill.h" #include "drawclipbegin.h" #include "drawclipend.h" #include "drawgsave.h" #include "drawgrestore.h" #include "drawgroup.h" #include "drawverbatim.h" #include "drawlabel.h" #include "drawlayer.h" #include "drawimage.h" #include "drawpath3.h" #include "drawsurface.h" using namespace camp; using namespace settings; using namespace vm; typedef array Intarray; typedef array Intarray2; typedef array realarray; typedef array realarray2; typedef array pairarray; typedef array pairarray2; typedef array triplearray; typedef array triplearray2; typedef array patharray; typedef array penarray; typedef array penarray2; typedef callable callableTransform; typedef callable callablePen; using types::IntArray; using types::IntArray2; using types::realArray; using types::realArray2; using types::pairArray; using types::pairArray2; using types::tripleArray; using types::tripleArray2; using types::pathArray; using types::penArray; using types::penArray2; function *transformFunction() { return new function(primTransform()); } function *penFunction() { return new function(primPen(),primInt(),primInt()); } // Ignore unclosed begingroups but not spurious endgroups. const char *nobegin="endgroup without matching begingroup"; array *emptyarray=new array(0); array *nop(array *a) { return a; } triple Zero; // Autogenerated routines: #ifndef NOSYM #include "runpicture.symbols.h" #endif namespace run { #line 104 "runpicture.in" void newPicture(stack *Stack) { #line 105 "runpicture.in" {Stack->push(new picture()); return;} } #line 109 "runpicture.in" // bool empty(picture *f); void gen_runpicture1(stack *Stack) { picture * f=vm::pop(Stack); #line 110 "runpicture.in" {Stack->push(f->null()); return;} } #line 114 "runpicture.in" // void erase(picture *f); void gen_runpicture2(stack *Stack) { picture * f=vm::pop(Stack); #line 115 "runpicture.in" f->nodes.clear(); } #line 119 "runpicture.in" // pair min(picture *f); void gen_runpicture3(stack *Stack) { picture * f=vm::pop(Stack); #line 120 "runpicture.in" {Stack->push(f->bounds().Min()); return;} } #line 124 "runpicture.in" // pair max(picture *f); void gen_runpicture4(stack *Stack) { picture * f=vm::pop(Stack); #line 125 "runpicture.in" {Stack->push(f->bounds().Max()); return;} } #line 129 "runpicture.in" // pair size(picture *f); void gen_runpicture5(stack *Stack) { picture * f=vm::pop(Stack); #line 130 "runpicture.in" bbox b=f->bounds(); {Stack->push(b.Max()-b.Min()); return;} } #line 135 "runpicture.in" // void _draw(picture *f, path g, pen p); void gen_runpicture6(stack *Stack) { pen p=vm::pop(Stack); path g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 136 "runpicture.in" f->append(new drawPath(g,p)); } #line 140 "runpicture.in" // void fill(picture *f, patharray *g, pen p=CURRENTPEN, bool copy=true); void gen_runpicture7(stack *Stack) { bool copy=vm::pop(Stack,true); pen p=vm::pop(Stack,CURRENTPEN); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 141 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawFill(*copyarray(g),false,p)); } #line 146 "runpicture.in" // void latticeshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, penarray2 *p, transform t=identity, bool copy=true); void gen_runpicture8(stack *Stack) { bool copy=vm::pop(Stack,true); transform t=vm::pop(Stack,identity); penarray2 * p=vm::pop(Stack); pen fillrule=vm::pop(Stack,CURRENTPEN); bool stroke=vm::pop(Stack,false); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 149 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawLatticeShade(*copyarray(g),stroke,fillrule,*copyarray(p), t)); } #line 155 "runpicture.in" // void axialshade(picture *f, patharray *g, bool stroke=false, pen pena, pair a, bool extenda=true, pen penb, pair b, bool extendb=true, bool copy=true); void gen_runpicture9(stack *Stack) { bool copy=vm::pop(Stack,true); bool extendb=vm::pop(Stack,true); pair b=vm::pop(Stack); pen penb=vm::pop(Stack); bool extenda=vm::pop(Stack,true); pair a=vm::pop(Stack); pen pena=vm::pop(Stack); bool stroke=vm::pop(Stack,false); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 158 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawAxialShade(*copyarray(g),stroke,pena,a,extenda,penb,b, extendb)); } #line 164 "runpicture.in" // void radialshade(picture *f, patharray *g, bool stroke=false, pen pena, pair a, real ra, bool extenda=true, pen penb, pair b, real rb, bool extendb=true, bool copy=true); void gen_runpicture10(stack *Stack) { bool copy=vm::pop(Stack,true); bool extendb=vm::pop(Stack,true); real rb=vm::pop(Stack); pair b=vm::pop(Stack); pen penb=vm::pop(Stack); bool extenda=vm::pop(Stack,true); real ra=vm::pop(Stack); pair a=vm::pop(Stack); pen pena=vm::pop(Stack); bool stroke=vm::pop(Stack,false); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 167 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawRadialShade(*copyarray(g),stroke,pena,a,ra,extenda, penb,b,rb,extendb)); } #line 173 "runpicture.in" // void gouraudshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, penarray *p, pairarray *z, Intarray *edges, bool copy=true); void gen_runpicture11(stack *Stack) { bool copy=vm::pop(Stack,true); Intarray * edges=vm::pop(Stack); pairarray * z=vm::pop(Stack); penarray * p=vm::pop(Stack); pen fillrule=vm::pop(Stack,CURRENTPEN); bool stroke=vm::pop(Stack,false); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 176 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; checkArrays(p,z); checkArrays(z,edges); f->append(new drawGouraudShade(*copyarray(g),stroke,fillrule,*copyarray(p), *copyarray(z),*copyarray(edges))); } #line 184 "runpicture.in" // void gouraudshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, penarray *p, Intarray *edges, bool copy=true); void gen_runpicture12(stack *Stack) { bool copy=vm::pop(Stack,true); Intarray * edges=vm::pop(Stack); penarray * p=vm::pop(Stack); pen fillrule=vm::pop(Stack,CURRENTPEN); bool stroke=vm::pop(Stack,false); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 187 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; size_t n=checkArrays(p,edges); size_t m=checkArray(g); array *z=new array(n); Int k=0; Int in=(Int) n; for(size_t j=0; j < m; ++j) { path *P=read(g,j); assert(P); Int stop=Min(P->size(),in-k); mem::vector& nodes=P->Nodes(); for(Int i=0; i < stop; ++i) (*z)[k++]=nodes[i].point; } checkArrays(p,z); f->append(new drawGouraudShade(*copyarray(g),stroke,fillrule,*copyarray(p), *z,*copyarray(edges))); } #line 208 "runpicture.in" // void tensorshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, penarray2 *p, patharray *b=NULL, pairarray2 *z=emptyarray, bool copy=true); void gen_runpicture13(stack *Stack) { bool copy=vm::pop(Stack,true); pairarray2 * z=vm::pop(Stack,emptyarray); patharray * b=vm::pop(Stack,NULL); penarray2 * p=vm::pop(Stack); pen fillrule=vm::pop(Stack,CURRENTPEN); bool stroke=vm::pop(Stack,false); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 211 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; array *(*copyarray2)(array *a)=copy ? copyArray2: nop; if(b == NULL) b=g; size_t n=checkArrays(p,b); size_t nz=checkArray(z); if(nz != 0) checkEqual(nz,n); f->append(new drawTensorShade(*copyarray(g),stroke,fillrule,*copyarray2(p), *copyarray(b),*copyarray2(z))); } #line 223 "runpicture.in" // void functionshade(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, string shader=emptystring, bool copy=true); void gen_runpicture14(stack *Stack) { bool copy=vm::pop(Stack,true); string shader=vm::pop(Stack,emptystring); pen fillrule=vm::pop(Stack,CURRENTPEN); bool stroke=vm::pop(Stack,false); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 226 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawFunctionShade(*copyarray(g),stroke,fillrule,shader)); } // Clip a picture to a superpath using the given fill rule. // Subsequent additions to the picture will not be affected by the clipping. #line 233 "runpicture.in" // void clip(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, bool copy=true); void gen_runpicture15(stack *Stack) { bool copy=vm::pop(Stack,true); pen fillrule=vm::pop(Stack,CURRENTPEN); bool stroke=vm::pop(Stack,false); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 235 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; drawClipBegin *begin=new drawClipBegin(*copyarray(g),stroke,fillrule,true); f->enclose(begin,new drawClipEnd(true,begin)); } #line 241 "runpicture.in" // void beginclip(picture *f, patharray *g, bool stroke=false, pen fillrule=CURRENTPEN, bool copy=true); void gen_runpicture16(stack *Stack) { bool copy=vm::pop(Stack,true); pen fillrule=vm::pop(Stack,CURRENTPEN); bool stroke=vm::pop(Stack,false); patharray * g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 243 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; f->append(new drawClipBegin(*copyarray(g),stroke,fillrule,false)); } #line 248 "runpicture.in" // void endclip(picture *f); void gen_runpicture17(stack *Stack) { picture * f=vm::pop(Stack); #line 249 "runpicture.in" f->append(new drawClipEnd(false)); } #line 253 "runpicture.in" // void gsave(picture *f); void gen_runpicture18(stack *Stack) { picture * f=vm::pop(Stack); #line 254 "runpicture.in" f->append(new drawGsave()); } #line 258 "runpicture.in" // void grestore(picture *f); void gen_runpicture19(stack *Stack) { picture * f=vm::pop(Stack); #line 259 "runpicture.in" f->append(new drawGrestore()); } #line 263 "runpicture.in" // void begingroup(picture *f); void gen_runpicture20(stack *Stack) { picture * f=vm::pop(Stack); #line 264 "runpicture.in" f->append(new drawBegin()); } #line 268 "runpicture.in" // void endgroup(picture *f); void gen_runpicture21(stack *Stack) { picture * f=vm::pop(Stack); #line 269 "runpicture.in" f->append(new drawEnd()); } #line 273 "runpicture.in" // void _begingroup3(picture *f, string name, real compression, real granularity, bool closed, bool tessellate, bool dobreak, bool nobreak, triple center, Int interaction); void gen_runpicture22(stack *Stack) { Int interaction=vm::pop(Stack); triple center=vm::pop(Stack); bool nobreak=vm::pop(Stack); bool dobreak=vm::pop(Stack); bool tessellate=vm::pop(Stack); bool closed=vm::pop(Stack); real granularity=vm::pop(Stack); real compression=vm::pop(Stack); string name=vm::pop(Stack); picture * f=vm::pop(Stack); #line 276 "runpicture.in" f->append(new drawBegin3(name,compression,granularity, closed,tessellate,dobreak,nobreak, center,(Interaction) intcast(interaction))); } #line 282 "runpicture.in" // void endgroup3(picture *f); void gen_runpicture23(stack *Stack) { picture * f=vm::pop(Stack); #line 283 "runpicture.in" f->append(new drawEnd3()); } #line 287 "runpicture.in" // void add(picture *dest, picture *src); void gen_runpicture24(stack *Stack) { picture * src=vm::pop(Stack); picture * dest=vm::pop(Stack); #line 288 "runpicture.in" dest->add(*src); } #line 292 "runpicture.in" // void prepend(picture *dest, picture *src); void gen_runpicture25(stack *Stack) { picture * src=vm::pop(Stack); picture * dest=vm::pop(Stack); #line 293 "runpicture.in" dest->prepend(*src); } #line 297 "runpicture.in" // void postscript(picture *f, string s); void gen_runpicture26(stack *Stack) { string s=vm::pop(Stack); picture * f=vm::pop(Stack); #line 298 "runpicture.in" f->append(new drawVerbatim(PostScript,s)); } #line 302 "runpicture.in" // void tex(picture *f, string s); void gen_runpicture27(stack *Stack) { string s=vm::pop(Stack); picture * f=vm::pop(Stack); #line 303 "runpicture.in" f->append(new drawVerbatim(TeX,s)); } #line 307 "runpicture.in" // void postscript(picture *f, string s, pair min, pair max); void gen_runpicture28(stack *Stack) { pair max=vm::pop(Stack); pair min=vm::pop(Stack); string s=vm::pop(Stack); picture * f=vm::pop(Stack); #line 308 "runpicture.in" f->append(new drawVerbatim(PostScript,s,min,max)); } #line 312 "runpicture.in" // void tex(picture *f, string s, pair min, pair max); void gen_runpicture29(stack *Stack) { pair max=vm::pop(Stack); pair min=vm::pop(Stack); string s=vm::pop(Stack); picture * f=vm::pop(Stack); #line 313 "runpicture.in" f->append(new drawVerbatim(TeX,s,min,max)); } #line 317 "runpicture.in" // void texpreamble(string s); void gen_runpicture30(stack *Stack) { string s=vm::pop(Stack); #line 318 "runpicture.in" string t=s+"\n"; processDataStruct &pd=processData(); pd.TeXpipepreamble.push_back(t); pd.TeXpreamble.push_back(t); } #line 325 "runpicture.in" // void deletepreamble(); void gen_runpicture31(stack *) { #line 326 "runpicture.in" if(getSetting("inlinetex")) { unlink(buildname(outname(),"pre").c_str()); } } #line 332 "runpicture.in" // void _labelpath(picture *f, string s, string size, path g, string justify, pair offset, pen p); void gen_runpicture32(stack *Stack) { pen p=vm::pop(Stack); pair offset=vm::pop(Stack); string justify=vm::pop(Stack); path g=vm::pop(Stack); string size=vm::pop(Stack); string s=vm::pop(Stack); picture * f=vm::pop(Stack); #line 334 "runpicture.in" f->append(new drawLabelPath(s,size,g,justify,offset,p)); } #line 338 "runpicture.in" // void texreset(); void gen_runpicture33(stack *) { #line 339 "runpicture.in" processDataStruct &pd=processData(); pd.TeXpipepreamble.clear(); pd.TeXpreamble.clear(); pd.tex.pipeclose(); } #line 346 "runpicture.in" // void layer(picture *f); void gen_runpicture34(stack *Stack) { picture * f=vm::pop(Stack); #line 347 "runpicture.in" f->append(new drawLayer()); } #line 351 "runpicture.in" // void newpage(picture *f); void gen_runpicture35(stack *Stack) { picture * f=vm::pop(Stack); #line 352 "runpicture.in" f->append(new drawNewPage()); } #line 356 "runpicture.in" // void _image(picture *f, realarray2 *data, pair initial, pair final, penarray *palette=NULL, transform t=identity, bool copy=true, bool antialias=false); void gen_runpicture36(stack *Stack) { bool antialias=vm::pop(Stack,false); bool copy=vm::pop(Stack,true); transform t=vm::pop(Stack,identity); penarray * palette=vm::pop(Stack,NULL); pair final=vm::pop(Stack); pair initial=vm::pop(Stack); realarray2 * data=vm::pop(Stack); picture * f=vm::pop(Stack); #line 359 "runpicture.in" array *(*copyarray)(array *a)=copy ? copyArray: nop; array *(*copyarray2)(array *a)=copy ? copyArray2: nop; f->append(new drawPaletteImage(*copyarray2(data),*copyarray(palette), t*matrix(initial,final),antialias)); } #line 366 "runpicture.in" // void _image(picture *f, penarray2 *data, pair initial, pair final, transform t=identity, bool copy=true, bool antialias=false); void gen_runpicture37(stack *Stack) { bool antialias=vm::pop(Stack,false); bool copy=vm::pop(Stack,true); transform t=vm::pop(Stack,identity); pair final=vm::pop(Stack); pair initial=vm::pop(Stack); penarray2 * data=vm::pop(Stack); picture * f=vm::pop(Stack); #line 368 "runpicture.in" array *(*copyarray2)(array *a)=copy ? copyArray2: nop; f->append(new drawNoPaletteImage(*copyarray2(data),t*matrix(initial,final), antialias)); } #line 374 "runpicture.in" // void _image(picture *f, callablePen *F, Int width, Int height, pair initial, pair final, transform t=identity, bool antialias=false); void gen_runpicture38(stack *Stack) { bool antialias=vm::pop(Stack,false); transform t=vm::pop(Stack,identity); pair final=vm::pop(Stack); pair initial=vm::pop(Stack); Int height=vm::pop(Stack); Int width=vm::pop(Stack); callablePen * F=vm::pop(Stack); picture * f=vm::pop(Stack); #line 376 "runpicture.in" f->append(new drawFunctionImage(Stack,F,width,height, t*matrix(initial,final),antialias)); } #line 381 "runpicture.in" // string nativeformat(); void gen_runpicture39(stack *Stack) { #line 382 "runpicture.in" {Stack->push(nativeformat()); return;} } #line 386 "runpicture.in" // bool latex(); void gen_runpicture40(stack *Stack) { #line 387 "runpicture.in" {Stack->push(latex(getSetting("tex"))); return;} } #line 391 "runpicture.in" // bool pdf(); void gen_runpicture41(stack *Stack) { #line 392 "runpicture.in" {Stack->push(pdf(getSetting("tex"))); return;} } #line 396 "runpicture.in" // void shipout(string prefix=emptystring, picture *f, picture *preamble=NULL, string format=emptystring, bool wait=false, bool view=true, callableTransform *xform); void gen_runpicture42(stack *Stack) { callableTransform * xform=vm::pop(Stack); bool view=vm::pop(Stack,true); bool wait=vm::pop(Stack,false); string format=vm::pop(Stack,emptystring); picture * preamble=vm::pop(Stack,NULL); picture * f=vm::pop(Stack); string prefix=vm::pop(Stack,emptystring); #line 399 "runpicture.in" if(prefix.empty()) prefix=outname(); picture *result=new picture; unsigned level=0; picture::nodelist::iterator p; // If null is given as an xform, just use the identity transformation. bool xformIsNull = xform == nullfunc::instance(); for(p = f->nodes.begin(); p != f->nodes.end(); ++p) { if (!xformIsNull) xform->call(Stack); transform t=xformIsNull ? camp::identity : pop(Stack); static transform Zero=transform(0.0,0.0,0.0,0.0,0.0,0.0); bool Delete=(t == Zero); picture *group=new picture; assert(*p); if((*p)->endgroup()) error(nobegin); if((*p)->begingroup()) { ++level; while(p != f->nodes.end() && level) { if(!Delete) { drawElement *e=t.isIdentity() ? *p : (*p)->transformed(t); group->append(e); } ++p; if(p == f->nodes.end()) break; assert(*p); if((*p)->begingroup()) ++level; if((*p)->endgroup()) { if(level) --level; else error(nobegin); } } } if(p == f->nodes.end()) break; assert(*p); if(!Delete) { drawElement *e=t.isIdentity() ? *p : (*p)->transformed(t); group->append(e); result->add(*group); } } result->shipout(preamble,prefix,format,0.0,wait,view); } #line 448 "runpicture.in" // void shipout3(string prefix, picture *f, string format=emptystring, real width, real height, real angle, real zoom, triple m, triple M, pair shift, realarray2 *t, realarray *background, triplearray *lights, realarray2 *diffuse, realarray2 *ambient, realarray2 *specular, bool viewportlighting, bool view=true); void gen_runpicture43(stack *Stack) { bool view=vm::pop(Stack,true); bool viewportlighting=vm::pop(Stack); realarray2 * specular=vm::pop(Stack); realarray2 * ambient=vm::pop(Stack); realarray2 * diffuse=vm::pop(Stack); triplearray * lights=vm::pop(Stack); realarray * background=vm::pop(Stack); realarray2 * t=vm::pop(Stack); pair shift=vm::pop(Stack); triple M=vm::pop(Stack); triple m=vm::pop(Stack); real zoom=vm::pop(Stack); real angle=vm::pop(Stack); real height=vm::pop(Stack); real width=vm::pop(Stack); string format=vm::pop(Stack,emptystring); picture * f=vm::pop(Stack); string prefix=vm::pop(Stack); #line 454 "runpicture.in" size_t n=checkArrays(lights,diffuse); checkEqual(n,checkArray(ambient)); checkEqual(n,checkArray(specular)); real *T,*Background,*Diffuse,*Ambient,*Specular; triple *Lights; copyArray2C(T,t,true,4); copyArrayC(Background,background); copyArrayC(Lights,lights); copyArray2C(Diffuse,diffuse,false,4,UseGC); copyArray2C(Ambient,ambient,false,4,UseGC); copyArray2C(Specular,specular,false,4,UseGC); f->shipout3(prefix,format,width,height,angle,zoom,m,M,shift,T,Background,n, Lights,Diffuse,Ambient,Specular,viewportlighting,view); delete[] Background; delete[] T; } #line 476 "runpicture.in" // void shipout3(string prefix, picture *f); void gen_runpicture44(stack *Stack) { picture * f=vm::pop(Stack); string prefix=vm::pop(Stack); #line 477 "runpicture.in" f->shipout3(prefix); } #line 481 "runpicture.in" // void deconstruct(picture *f, picture *preamble=NULL, real magnification=1, callableTransform *xform); void gen_runpicture45(stack *Stack) { callableTransform * xform=vm::pop(Stack); real magnification=vm::pop(Stack,1); picture * preamble=vm::pop(Stack,NULL); picture * f=vm::pop(Stack); #line 483 "runpicture.in" unsigned level=0; unsigned n=0; string prefix=outname(); const string xformat="png"; static long arg_max=sysconf(_SC_ARG_MAX); const unsigned maxargs=::min(arg_max/(prefix.size()+xformat.size()+25ul), 256ul); openpipeout(); fprintf(pipeout,"%d\n",maxargs); fflush(pipeout); string preformat=nativeformat(); const string Done="Done"; const string Error="Error"; mem::vector cmd; // Enforce ghostscript limitations. magnification=::max(magnification,0.0001); real res=::min(::max(magnification*72.0,2.0),8192.0); const char *converter=NULL, *hint=NULL; if(magnification > 0.0) { mem::list nameStack; string outname; unsigned arg=0; unsigned batch=0; for(picture::nodelist::iterator p=f->nodes.begin();;) { if(p == f->nodes.end()) break; if(arg == 0) { cmd.clear(); ostringstream buf; buf << batch << "_"; outname=buildname(prefix+buf.str()+"%d",xformat,""); converter="gs"; hint="Ghostscript"; cmd.push_back(getSetting(converter)); cmd.push_back("-q"); cmd.push_back("-dNOPAUSE"); cmd.push_back("-dBATCH"); cmd.push_back("-P"); cmd.push_back("-sDEVICE=pngalpha"); cmd.push_back("-dEPSCrop"); if(safe) cmd.push_back("-dSAFER"); cmd.push_back("-r"+String(res)+"x"+String(res)); cmd.push_back("-sOutputFile="+outname); } picture *group=new picture; xform->call(Stack); transform t=pop(Stack); assert(*p); if((*p)->endgroup()) { fprintf(pipeout,"%s\n",Error.c_str()); fflush(pipeout); error(nobegin); } if((*p)->begingroup()) { ++level; while(p != f->nodes.end() && level) { drawElement *e=t.isIdentity() ? *p : (*p)->transformed(t); group->append(e); ++p; if(p == f->nodes.end()) break; assert(*p); if((*p)->begingroup()) ++level; if((*p)->endgroup()) { if(level) --level; else { fprintf(pipeout,"%s\n",Error.c_str()); fflush(pipeout); error(nobegin); } } } } if(p != f->nodes.end()) { assert(*p); drawElement *e=t.isIdentity() ? *p : (*p)->transformed(t); group->append(e); bbox b; ostringstream buf; buf << prefix << "_" << n; group->shipout(preamble,buf.str(),preformat,magnification,false,false); string Preformat=group->Transparency() ? "pdf" : preformat; string name=buildname(buf.str(),Preformat); nameStack.push_back(name); cmd.push_back(name); b=group->bounds(); b *= magnification; const char *oldlocale=setlocale(LC_NUMERIC,NULL); bool override=oldlocale && strcmp(oldlocale,"C") != 0; if(override) { oldlocale=StrdupNoGC(oldlocale); setlocale(LC_NUMERIC,"C"); } fprintf(pipeout,"%g %g %g %g\n",b.left,b.right,b.bottom,b.top); if(override) { setlocale(LC_NUMERIC,oldlocale); delete[] oldlocale; } fflush(pipeout); ++n; ++p; ++arg; } if(p == f->nodes.end() || arg >= maxargs) { arg=0; ++batch; fflush(pipeout); int status=System(cmd,0,true,converter,hint); if(status) { fprintf(pipeout,"%s\n",Error.c_str()); fflush(pipeout); error("deconstruct failed"); } } } if(!getSetting("keep")) { for(mem::list::iterator p=nameStack.begin(); p != nameStack.end(); ++p) unlink(p->c_str()); } fprintf(pipeout,"%s\n",Done.c_str()); fflush(pipeout); } } // Three-dimensional picture and surface operations // Bezier curve #line 629 "runpicture.in" // void _draw(picture *f, path3 g, triple center=Zero, pen p, Int interaction=0); void gen_runpicture46(stack *Stack) { Int interaction=vm::pop(Stack,0); pen p=vm::pop(Stack); triple center=vm::pop(Stack,Zero); path3 g=vm::pop(Stack); picture * f=vm::pop(Stack); #line 630 "runpicture.in" if(g.size() > 0) f->append(new drawPath3(g,center,p,(Interaction) intcast(interaction))); } // Bezier patch #line 636 "runpicture.in" // void draw(picture *f, triplearray2 *P, triple center, bool straight, penarray *p, real opacity, real shininess, real PRCshininess, penarray *colors, Int interaction, bool prc=true); void gen_runpicture47(stack *Stack) { bool prc=vm::pop(Stack,true); Int interaction=vm::pop(Stack); penarray * colors=vm::pop(Stack); real PRCshininess=vm::pop(Stack); real shininess=vm::pop(Stack); real opacity=vm::pop(Stack); penarray * p=vm::pop(Stack); bool straight=vm::pop(Stack); triple center=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); picture * f=vm::pop(Stack); #line 639 "runpicture.in" f->append(new drawBezierPatch(*P,center,straight,*p,opacity,shininess, PRCshininess,*colors, (Interaction) intcast(interaction),prc)); } // Bezier triangle #line 646 "runpicture.in" // void drawbeziertriangle(picture *f, triplearray2 *P, triple center, bool straight, penarray *p, real opacity, real shininess, real PRCshininess, penarray *colors, Int interaction, bool prc=true); void gen_runpicture48(stack *Stack) { bool prc=vm::pop(Stack,true); Int interaction=vm::pop(Stack); penarray * colors=vm::pop(Stack); real PRCshininess=vm::pop(Stack); real shininess=vm::pop(Stack); real opacity=vm::pop(Stack); penarray * p=vm::pop(Stack); bool straight=vm::pop(Stack); triple center=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); picture * f=vm::pop(Stack); #line 650 "runpicture.in" f->append(new drawBezierTriangle(*P,center,straight,*p,opacity,shininess, PRCshininess,*colors, (Interaction) intcast(interaction),prc)); } // General NURBS curve #line 657 "runpicture.in" // void draw(picture *f, triplearray *P, realarray *knot, realarray *weights=emptyarray, pen p); void gen_runpicture49(stack *Stack) { pen p=vm::pop(Stack); realarray * weights=vm::pop(Stack,emptyarray); realarray * knot=vm::pop(Stack); triplearray * P=vm::pop(Stack); picture * f=vm::pop(Stack); #line 659 "runpicture.in" f->append(new drawNurbsPath3(*P,knot,weights,p)); } // General NURBS surface #line 664 "runpicture.in" // void draw(picture *f, triplearray2 *P, realarray *uknot, realarray *vknot, realarray2 *weights=emptyarray, penarray *p, real opacity, real shininess, real PRCshininess, penarray *colors); void gen_runpicture50(stack *Stack) { penarray * colors=vm::pop(Stack); real PRCshininess=vm::pop(Stack); real shininess=vm::pop(Stack); real opacity=vm::pop(Stack); penarray * p=vm::pop(Stack); realarray2 * weights=vm::pop(Stack,emptyarray); realarray * vknot=vm::pop(Stack); realarray * uknot=vm::pop(Stack); triplearray2 * P=vm::pop(Stack); picture * f=vm::pop(Stack); #line 667 "runpicture.in" f->append(new drawNurbs(*P,uknot,vknot,weights,*p,opacity,shininess, PRCshininess,*colors)); } // PRC unit sphere #line 673 "runpicture.in" // void drawPRCsphere(picture *f, realarray2 *t, bool half=false, penarray *p, real opacity, real shininess, Int type); void gen_runpicture51(stack *Stack) { Int type=vm::pop(Stack); real shininess=vm::pop(Stack); real opacity=vm::pop(Stack); penarray * p=vm::pop(Stack); bool half=vm::pop(Stack,false); realarray2 * t=vm::pop(Stack); picture * f=vm::pop(Stack); #line 675 "runpicture.in" f->append(new drawSphere(*t,half,*p,opacity,shininess,intcast(type))); } // PRC unit cylinder #line 680 "runpicture.in" // void drawPRCcylinder(picture *f, realarray2 *t, penarray *p, real opacity, real shininess); void gen_runpicture52(stack *Stack) { real shininess=vm::pop(Stack); real opacity=vm::pop(Stack); penarray * p=vm::pop(Stack); realarray2 * t=vm::pop(Stack); picture * f=vm::pop(Stack); #line 682 "runpicture.in" f->append(new drawCylinder(*t,*p,opacity,shininess)); } // PRC unit disk #line 687 "runpicture.in" // void drawPRCdisk(picture *f, realarray2 *t, penarray *p, real opacity, real shininess); void gen_runpicture53(stack *Stack) { real shininess=vm::pop(Stack); real opacity=vm::pop(Stack); penarray * p=vm::pop(Stack); realarray2 * t=vm::pop(Stack); picture * f=vm::pop(Stack); #line 689 "runpicture.in" f->append(new drawDisk(*t,*p,opacity,shininess)); } // General PRC tube #line 694 "runpicture.in" // void drawPRCtube(picture *f, path3 center, path3 g, penarray *p, real opacity, real shininess); void gen_runpicture54(stack *Stack) { real shininess=vm::pop(Stack); real opacity=vm::pop(Stack); penarray * p=vm::pop(Stack); path3 g=vm::pop(Stack); path3 center=vm::pop(Stack); picture * f=vm::pop(Stack); #line 696 "runpicture.in" f->append(new drawTube(center,g,*p,opacity,shininess)); } // Draw pixel #line 701 "runpicture.in" // void drawpixel(picture *f, triple v, pen p, real width=1.0); void gen_runpicture55(stack *Stack) { real width=vm::pop(Stack,1.0); pen p=vm::pop(Stack); triple v=vm::pop(Stack); picture * f=vm::pop(Stack); #line 702 "runpicture.in" f->append(new drawPixel(v,p,width)); } // Draw triangles #line 707 "runpicture.in" // void draw(picture *f, triplearray *v, Intarray2 *vi, triplearray *n, Intarray2 *ni, penarray *p, real opacity, real shininess, real PRCshininess, penarray *c=emptyarray, Intarray2 *ci=emptyarray); void gen_runpicture56(stack *Stack) { Intarray2 * ci=vm::pop(Stack,emptyarray); penarray * c=vm::pop(Stack,emptyarray); real PRCshininess=vm::pop(Stack); real shininess=vm::pop(Stack); real opacity=vm::pop(Stack); penarray * p=vm::pop(Stack); Intarray2 * ni=vm::pop(Stack); triplearray * n=vm::pop(Stack); Intarray2 * vi=vm::pop(Stack); triplearray * v=vm::pop(Stack); picture * f=vm::pop(Stack); #line 711 "runpicture.in" f->append(new drawTriangles(*v,*vi,*n,*ni,*p,opacity,shininess,PRCshininess, *c,*ci)); } #line 716 "runpicture.in" // triple min3(picture *f); void gen_runpicture57(stack *Stack) { picture * f=vm::pop(Stack); #line 717 "runpicture.in" {Stack->push(f->bounds3().Min()); return;} } #line 721 "runpicture.in" // triple max3(picture *f); void gen_runpicture58(stack *Stack) { picture * f=vm::pop(Stack); #line 722 "runpicture.in" {Stack->push(f->bounds3().Max()); return;} } #line 726 "runpicture.in" // triple size3(picture *f); void gen_runpicture59(stack *Stack) { picture * f=vm::pop(Stack); #line 727 "runpicture.in" bbox3 b=f->bounds3(); {Stack->push(b.Max()-b.Min()); return;} } #line 732 "runpicture.in" // pair minratio(picture *f); void gen_runpicture60(stack *Stack) { picture * f=vm::pop(Stack); #line 733 "runpicture.in" {Stack->push(f->ratio(::min)); return;} } #line 737 "runpicture.in" // pair maxratio(picture *f); void gen_runpicture61(stack *Stack) { picture * f=vm::pop(Stack); #line 738 "runpicture.in" {Stack->push(f->ratio(::max)); return;} } #line 742 "runpicture.in" // bool is3D(picture *f); void gen_runpicture62(stack *Stack) { picture * f=vm::pop(Stack); #line 743 "runpicture.in" {Stack->push(f->have3D()); return;} } } // namespace run namespace trans { void gen_runpicture_venv(venv &ve) { #line 104 "runpicture.in" REGISTER_BLTIN(run::newPicture,"newPicture"); #line 109 "runpicture.in" addFunc(ve, run::gen_runpicture1, primBoolean(), SYM(empty), formal(primPicture(), SYM(f), false, false)); #line 114 "runpicture.in" addFunc(ve, run::gen_runpicture2, primVoid(), SYM(erase), formal(primPicture(), SYM(f), false, false)); #line 119 "runpicture.in" addFunc(ve, run::gen_runpicture3, primPair(), SYM(min), formal(primPicture(), SYM(f), false, false)); #line 124 "runpicture.in" addFunc(ve, run::gen_runpicture4, primPair(), SYM(max), formal(primPicture(), SYM(f), false, false)); #line 129 "runpicture.in" addFunc(ve, run::gen_runpicture5, primPair(), SYM(size), formal(primPicture(), SYM(f), false, false)); #line 135 "runpicture.in" addFunc(ve, run::gen_runpicture6, primVoid(), SYM(_draw), formal(primPicture(), SYM(f), false, false), formal(primPath(), SYM(g), false, false), formal(primPen(), SYM(p), false, false)); #line 140 "runpicture.in" addFunc(ve, run::gen_runpicture7, primVoid(), SYM(fill), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primPen(), SYM(p), true, false), formal(primBoolean(), SYM(copy), true, false)); #line 146 "runpicture.in" addFunc(ve, run::gen_runpicture8, primVoid(), SYM(latticeshade), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primBoolean(), SYM(stroke), true, false), formal(primPen(), SYM(fillrule), true, false), formal(penArray2() , SYM(p), false, false), formal(primTransform(), SYM(t), true, false), formal(primBoolean(), SYM(copy), true, false)); #line 155 "runpicture.in" addFunc(ve, run::gen_runpicture9, primVoid(), SYM(axialshade), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primBoolean(), SYM(stroke), true, false), formal(primPen(), SYM(pena), false, false), formal(primPair(), SYM(a), false, false), formal(primBoolean(), SYM(extenda), true, false), formal(primPen(), SYM(penb), false, false), formal(primPair(), SYM(b), false, false), formal(primBoolean(), SYM(extendb), true, false), formal(primBoolean(), SYM(copy), true, false)); #line 164 "runpicture.in" addFunc(ve, run::gen_runpicture10, primVoid(), SYM(radialshade), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primBoolean(), SYM(stroke), true, false), formal(primPen(), SYM(pena), false, false), formal(primPair(), SYM(a), false, false), formal(primReal(), SYM(ra), false, false), formal(primBoolean(), SYM(extenda), true, false), formal(primPen(), SYM(penb), false, false), formal(primPair(), SYM(b), false, false), formal(primReal(), SYM(rb), false, false), formal(primBoolean(), SYM(extendb), true, false), formal(primBoolean(), SYM(copy), true, false)); #line 173 "runpicture.in" addFunc(ve, run::gen_runpicture11, primVoid(), SYM(gouraudshade), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primBoolean(), SYM(stroke), true, false), formal(primPen(), SYM(fillrule), true, false), formal(penArray() , SYM(p), false, false), formal(pairArray(), SYM(z), false, false), formal(IntArray(), SYM(edges), false, false), formal(primBoolean(), SYM(copy), true, false)); #line 184 "runpicture.in" addFunc(ve, run::gen_runpicture12, primVoid(), SYM(gouraudshade), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primBoolean(), SYM(stroke), true, false), formal(primPen(), SYM(fillrule), true, false), formal(penArray() , SYM(p), false, false), formal(IntArray(), SYM(edges), false, false), formal(primBoolean(), SYM(copy), true, false)); #line 208 "runpicture.in" addFunc(ve, run::gen_runpicture13, primVoid(), SYM(tensorshade), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primBoolean(), SYM(stroke), true, false), formal(primPen(), SYM(fillrule), true, false), formal(penArray2() , SYM(p), false, false), formal(pathArray() , SYM(b), true, false), formal(pairArray2(), SYM(z), true, false), formal(primBoolean(), SYM(copy), true, false)); #line 223 "runpicture.in" addFunc(ve, run::gen_runpicture14, primVoid(), SYM(functionshade), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primBoolean(), SYM(stroke), true, false), formal(primPen(), SYM(fillrule), true, false), formal(primString() , SYM(shader), true, false), formal(primBoolean(), SYM(copy), true, false)); #line 231 "runpicture.in" addFunc(ve, run::gen_runpicture15, primVoid(), SYM(clip), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primBoolean(), SYM(stroke), true, false), formal(primPen(), SYM(fillrule), true, false), formal(primBoolean(), SYM(copy), true, false)); #line 241 "runpicture.in" addFunc(ve, run::gen_runpicture16, primVoid(), SYM(beginclip), formal(primPicture(), SYM(f), false, false), formal(pathArray() , SYM(g), false, false), formal(primBoolean(), SYM(stroke), true, false), formal(primPen(), SYM(fillrule), true, false), formal(primBoolean(), SYM(copy), true, false)); #line 248 "runpicture.in" addFunc(ve, run::gen_runpicture17, primVoid(), SYM(endclip), formal(primPicture(), SYM(f), false, false)); #line 253 "runpicture.in" addFunc(ve, run::gen_runpicture18, primVoid(), SYM(gsave), formal(primPicture(), SYM(f), false, false)); #line 258 "runpicture.in" addFunc(ve, run::gen_runpicture19, primVoid(), SYM(grestore), formal(primPicture(), SYM(f), false, false)); #line 263 "runpicture.in" addFunc(ve, run::gen_runpicture20, primVoid(), SYM(begingroup), formal(primPicture(), SYM(f), false, false)); #line 268 "runpicture.in" addFunc(ve, run::gen_runpicture21, primVoid(), SYM(endgroup), formal(primPicture(), SYM(f), false, false)); #line 273 "runpicture.in" addFunc(ve, run::gen_runpicture22, primVoid(), SYM(_begingroup3), formal(primPicture(), SYM(f), false, false), formal(primString() , SYM(name), false, false), formal(primReal(), SYM(compression), false, false), formal(primReal(), SYM(granularity), false, false), formal(primBoolean(), SYM(closed), false, false), formal(primBoolean(), SYM(tessellate), false, false), formal(primBoolean(), SYM(dobreak), false, false), formal(primBoolean(), SYM(nobreak), false, false), formal(primTriple(), SYM(center), false, false), formal(primInt(), SYM(interaction), false, false)); #line 282 "runpicture.in" addFunc(ve, run::gen_runpicture23, primVoid(), SYM(endgroup3), formal(primPicture(), SYM(f), false, false)); #line 287 "runpicture.in" addFunc(ve, run::gen_runpicture24, primVoid(), SYM(add), formal(primPicture(), SYM(dest), false, false), formal(primPicture(), SYM(src), false, false)); #line 292 "runpicture.in" addFunc(ve, run::gen_runpicture25, primVoid(), SYM(prepend), formal(primPicture(), SYM(dest), false, false), formal(primPicture(), SYM(src), false, false)); #line 297 "runpicture.in" addFunc(ve, run::gen_runpicture26, primVoid(), SYM(postscript), formal(primPicture(), SYM(f), false, false), formal(primString() , SYM(s), false, false)); #line 302 "runpicture.in" addFunc(ve, run::gen_runpicture27, primVoid(), SYM(tex), formal(primPicture(), SYM(f), false, false), formal(primString() , SYM(s), false, false)); #line 307 "runpicture.in" addFunc(ve, run::gen_runpicture28, primVoid(), SYM(postscript), formal(primPicture(), SYM(f), false, false), formal(primString() , SYM(s), false, false), formal(primPair(), SYM(min), false, false), formal(primPair(), SYM(max), false, false)); #line 312 "runpicture.in" addFunc(ve, run::gen_runpicture29, primVoid(), SYM(tex), formal(primPicture(), SYM(f), false, false), formal(primString() , SYM(s), false, false), formal(primPair(), SYM(min), false, false), formal(primPair(), SYM(max), false, false)); #line 317 "runpicture.in" addFunc(ve, run::gen_runpicture30, primVoid(), SYM(texpreamble), formal(primString() , SYM(s), false, false)); #line 325 "runpicture.in" addFunc(ve, run::gen_runpicture31, primVoid(), SYM(deletepreamble)); #line 332 "runpicture.in" addFunc(ve, run::gen_runpicture32, primVoid(), SYM(_labelpath), formal(primPicture(), SYM(f), false, false), formal(primString() , SYM(s), false, false), formal(primString() , SYM(size), false, false), formal(primPath(), SYM(g), false, false), formal(primString() , SYM(justify), false, false), formal(primPair(), SYM(offset), false, false), formal(primPen(), SYM(p), false, false)); #line 338 "runpicture.in" addFunc(ve, run::gen_runpicture33, primVoid(), SYM(texreset)); #line 346 "runpicture.in" addFunc(ve, run::gen_runpicture34, primVoid(), SYM(layer), formal(primPicture(), SYM(f), false, false)); #line 351 "runpicture.in" addFunc(ve, run::gen_runpicture35, primVoid(), SYM(newpage), formal(primPicture(), SYM(f), false, false)); #line 356 "runpicture.in" addFunc(ve, run::gen_runpicture36, primVoid(), SYM(_image), formal(primPicture(), SYM(f), false, false), formal(realArray2(), SYM(data), false, false), formal(primPair(), SYM(initial), false, false), formal(primPair(), SYM(final), false, false), formal(penArray() , SYM(palette), true, false), formal(primTransform(), SYM(t), true, false), formal(primBoolean(), SYM(copy), true, false), formal(primBoolean(), SYM(antialias), true, false)); #line 366 "runpicture.in" addFunc(ve, run::gen_runpicture37, primVoid(), SYM(_image), formal(primPicture(), SYM(f), false, false), formal(penArray2() , SYM(data), false, false), formal(primPair(), SYM(initial), false, false), formal(primPair(), SYM(final), false, false), formal(primTransform(), SYM(t), true, false), formal(primBoolean(), SYM(copy), true, false), formal(primBoolean(), SYM(antialias), true, false)); #line 374 "runpicture.in" addFunc(ve, run::gen_runpicture38, primVoid(), SYM(_image), formal(primPicture(), SYM(f), false, false), formal(penFunction(), SYM(f), false, false), formal(primInt(), SYM(width), false, false), formal(primInt(), SYM(height), false, false), formal(primPair(), SYM(initial), false, false), formal(primPair(), SYM(final), false, false), formal(primTransform(), SYM(t), true, false), formal(primBoolean(), SYM(antialias), true, false)); #line 381 "runpicture.in" addFunc(ve, run::gen_runpicture39, primString() , SYM(nativeformat)); #line 386 "runpicture.in" addFunc(ve, run::gen_runpicture40, primBoolean(), SYM(latex)); #line 391 "runpicture.in" addFunc(ve, run::gen_runpicture41, primBoolean(), SYM(pdf)); #line 396 "runpicture.in" addFunc(ve, run::gen_runpicture42, primVoid(), SYM(shipout), formal(primString() , SYM(prefix), true, false), formal(primPicture(), SYM(f), false, false), formal(primPicture(), SYM(preamble), true, false), formal(primString() , SYM(format), true, false), formal(primBoolean(), SYM(wait), true, false), formal(primBoolean(), SYM(view), true, false), formal(transformFunction(), SYM(xform), false, false)); #line 448 "runpicture.in" addFunc(ve, run::gen_runpicture43, primVoid(), SYM(shipout3), formal(primString() , SYM(prefix), false, false), formal(primPicture(), SYM(f), false, false), formal(primString() , SYM(format), true, false), formal(primReal(), SYM(width), false, false), formal(primReal(), SYM(height), false, false), formal(primReal(), SYM(angle), false, false), formal(primReal(), SYM(zoom), false, false), formal(primTriple(), SYM(m), false, false), formal(primTriple(), SYM(m), false, false), formal(primPair(), SYM(shift), false, false), formal(realArray2(), SYM(t), false, false), formal(realArray(), SYM(background), false, false), formal(tripleArray(), SYM(lights), false, false), formal(realArray2(), SYM(diffuse), false, false), formal(realArray2(), SYM(ambient), false, false), formal(realArray2(), SYM(specular), false, false), formal(primBoolean(), SYM(viewportlighting), false, false), formal(primBoolean(), SYM(view), true, false)); #line 476 "runpicture.in" addFunc(ve, run::gen_runpicture44, primVoid(), SYM(shipout3), formal(primString() , SYM(prefix), false, false), formal(primPicture(), SYM(f), false, false)); #line 481 "runpicture.in" addFunc(ve, run::gen_runpicture45, primVoid(), SYM(deconstruct), formal(primPicture(), SYM(f), false, false), formal(primPicture(), SYM(preamble), true, false), formal(primReal(), SYM(magnification), true, false), formal(transformFunction(), SYM(xform), false, false)); #line 625 "runpicture.in" addFunc(ve, run::gen_runpicture46, primVoid(), SYM(_draw), formal(primPicture(), SYM(f), false, false), formal(primPath3(), SYM(g), false, false), formal(primTriple(), SYM(center), true, false), formal(primPen(), SYM(p), false, false), formal(primInt(), SYM(interaction), true, false)); #line 635 "runpicture.in" addFunc(ve, run::gen_runpicture47, primVoid(), SYM(draw), formal(primPicture(), SYM(f), false, false), formal(tripleArray2(), SYM(p), false, false), formal(primTriple(), SYM(center), false, false), formal(primBoolean(), SYM(straight), false, false), formal(penArray() , SYM(p), false, false), formal(primReal(), SYM(opacity), false, false), formal(primReal(), SYM(shininess), false, false), formal(primReal(), SYM(prcshininess), false, false), formal(penArray() , SYM(colors), false, false), formal(primInt(), SYM(interaction), false, false), formal(primBoolean(), SYM(prc), true, false)); #line 645 "runpicture.in" addFunc(ve, run::gen_runpicture48, primVoid(), SYM(drawbeziertriangle), formal(primPicture(), SYM(f), false, false), formal(tripleArray2(), SYM(p), false, false), formal(primTriple(), SYM(center), false, false), formal(primBoolean(), SYM(straight), false, false), formal(penArray() , SYM(p), false, false), formal(primReal(), SYM(opacity), false, false), formal(primReal(), SYM(shininess), false, false), formal(primReal(), SYM(prcshininess), false, false), formal(penArray() , SYM(colors), false, false), formal(primInt(), SYM(interaction), false, false), formal(primBoolean(), SYM(prc), true, false)); #line 656 "runpicture.in" addFunc(ve, run::gen_runpicture49, primVoid(), SYM(draw), formal(primPicture(), SYM(f), false, false), formal(tripleArray(), SYM(p), false, false), formal(realArray(), SYM(knot), false, false), formal(realArray(), SYM(weights), true, false), formal(primPen(), SYM(p), false, false)); #line 663 "runpicture.in" addFunc(ve, run::gen_runpicture50, primVoid(), SYM(draw), formal(primPicture(), SYM(f), false, false), formal(tripleArray2(), SYM(p), false, false), formal(realArray(), SYM(uknot), false, false), formal(realArray(), SYM(vknot), false, false), formal(realArray2(), SYM(weights), true, false), formal(penArray() , SYM(p), false, false), formal(primReal(), SYM(opacity), false, false), formal(primReal(), SYM(shininess), false, false), formal(primReal(), SYM(prcshininess), false, false), formal(penArray() , SYM(colors), false, false)); #line 672 "runpicture.in" addFunc(ve, run::gen_runpicture51, primVoid(), SYM(drawPRCsphere), formal(primPicture(), SYM(f), false, false), formal(realArray2(), SYM(t), false, false), formal(primBoolean(), SYM(half), true, false), formal(penArray() , SYM(p), false, false), formal(primReal(), SYM(opacity), false, false), formal(primReal(), SYM(shininess), false, false), formal(primInt(), SYM(type), false, false)); #line 679 "runpicture.in" addFunc(ve, run::gen_runpicture52, primVoid(), SYM(drawPRCcylinder), formal(primPicture(), SYM(f), false, false), formal(realArray2(), SYM(t), false, false), formal(penArray() , SYM(p), false, false), formal(primReal(), SYM(opacity), false, false), formal(primReal(), SYM(shininess), false, false)); #line 686 "runpicture.in" addFunc(ve, run::gen_runpicture53, primVoid(), SYM(drawPRCdisk), formal(primPicture(), SYM(f), false, false), formal(realArray2(), SYM(t), false, false), formal(penArray() , SYM(p), false, false), formal(primReal(), SYM(opacity), false, false), formal(primReal(), SYM(shininess), false, false)); #line 693 "runpicture.in" addFunc(ve, run::gen_runpicture54, primVoid(), SYM(drawPRCtube), formal(primPicture(), SYM(f), false, false), formal(primPath3(), SYM(center), false, false), formal(primPath3(), SYM(g), false, false), formal(penArray() , SYM(p), false, false), formal(primReal(), SYM(opacity), false, false), formal(primReal(), SYM(shininess), false, false)); #line 700 "runpicture.in" addFunc(ve, run::gen_runpicture55, primVoid(), SYM(drawpixel), formal(primPicture(), SYM(f), false, false), formal(primTriple(), SYM(v), false, false), formal(primPen(), SYM(p), false, false), formal(primReal(), SYM(width), true, false)); #line 706 "runpicture.in" addFunc(ve, run::gen_runpicture56, primVoid(), SYM(draw), formal(primPicture(), SYM(f), false, false), formal(tripleArray(), SYM(v), false, false), formal(IntArray2(), SYM(vi), false, false), formal(tripleArray(), SYM(n), false, false), formal(IntArray2(), SYM(ni), false, false), formal(penArray() , SYM(p), false, false), formal(primReal(), SYM(opacity), false, false), formal(primReal(), SYM(shininess), false, false), formal(primReal(), SYM(prcshininess), false, false), formal(penArray() , SYM(c), true, false), formal(IntArray2(), SYM(ci), true, false)); #line 716 "runpicture.in" addFunc(ve, run::gen_runpicture57, primTriple(), SYM(min3), formal(primPicture(), SYM(f), false, false)); #line 721 "runpicture.in" addFunc(ve, run::gen_runpicture58, primTriple(), SYM(max3), formal(primPicture(), SYM(f), false, false)); #line 726 "runpicture.in" addFunc(ve, run::gen_runpicture59, primTriple(), SYM(size3), formal(primPicture(), SYM(f), false, false)); #line 732 "runpicture.in" addFunc(ve, run::gen_runpicture60, primPair(), SYM(minratio), formal(primPicture(), SYM(f), false, false)); #line 737 "runpicture.in" addFunc(ve, run::gen_runpicture61, primPair(), SYM(maxratio), formal(primPicture(), SYM(f), false, false)); #line 742 "runpicture.in" addFunc(ve, run::gen_runpicture62, primBoolean(), SYM(is3D), formal(primPicture(), SYM(f), false, false)); } } // namespace trans ./asymptote-2.41/glrender.h0000644000175000017500000000617013064427076015522 0ustar norbertnorbert/***** * glrender.h * Render 3D Bezier paths and surfaces. *****/ #ifndef GLRENDER_H #define GLRENDER_H #include "common.h" #include "triple.h" #ifdef HAVE_GL #include #ifdef __APPLE__ #include #include #include #ifdef HAVE_LIBGLUT #include #endif #ifdef HAVE_LIBOSMESA #include // TODO: where would you find osmesa on a mac? #endif #ifdef GLU_TESS_CALLBACK_TRIPLEDOT typedef GLvoid (* _GLUfuncptr)(...); #else typedef GLvoid (* _GLUfuncptr)(); #endif #else #include #include #include #ifdef HAVE_LIBGLUT #include #endif #ifdef HAVE_LIBOSMESA #include #endif #endif namespace camp { class picture; inline void store(GLfloat *f, double *C) { f[0]=C[0]; f[1]=C[1]; f[2]=C[2]; } inline void store(GLfloat *control, const camp::triple& v) { control[0]=v.getx(); control[1]=v.gety(); control[2]=v.getz(); } inline void store(GLfloat *control, const triple& v, double weight) { control[0]=v.getx()*weight; control[1]=v.gety()*weight; control[2]=v.getz()*weight; control[3]=weight; } } namespace gl { extern bool outlinemode; struct projection { public: bool orthographic; camp::triple camera; camp::triple up; camp::triple target; double zoom; double angle; camp::pair viewportshift; projection(bool orthographic=false, camp::triple camera=0.0, camp::triple up=0.0, camp::triple target=0.0, double zoom=0.0, double angle=0.0, camp::pair viewportshift=0.0) : orthographic(orthographic), camera(camera), up(up), target(target), zoom(zoom), angle(angle), viewportshift(viewportshift) {} }; projection camera(bool user=true); void glrender(const string& prefix, const camp::picture* pic, const string& format, double width, double height, double angle, double zoom, const camp::triple& m, const camp::triple& M, const camp::pair& shift, double *t, double *background, size_t nlights, camp::triple *lights, double *diffuse, double *ambient, double *specular, bool viewportlighting, bool view, int oldpid=0); } namespace camp { struct billboard { double cx,cy,cz; triple u,v,w; void init(const triple& center) { cx=center.getx(); cy=center.gety(); cz=center.getz(); gl::projection P=gl::camera(false); w=unit(P.camera-P.target); v=unit(perp(P.up,w)); u=cross(v,w); } triple transform(const triple& V) { double x=V.getx()-cx; double y=V.gety()-cy; double z=V.getz()-cz; return triple(cx+u.getx()*x+v.getx()*y+w.getx()*z, cy+u.gety()*x+v.gety()*y+w.gety()*z, cz+u.getz()*x+v.getz()*y+w.getz()*z); } void store(GLfloat* C, const triple& V) { double x=V.getx()-cx; double y=V.gety()-cy; double z=V.getz()-cz; C[0]=cx+u.getx()*x+v.getx()*y+w.getx()*z; C[1]=cy+u.gety()*x+v.gety()*y+w.gety()*z; C[2]=cz+u.getz()*x+v.getz()*y+w.getz()*z; } }; extern billboard BB; } #else typedef void GLUnurbs; typedef float GLfloat; #endif #endif ./asymptote-2.41/camp.l0000644000175000017500000003203013064427076014636 0ustar norbertnorbert%{ /***** * camp.l * Andy Hammerlindl 2002/06/14 * * The lexical analyzer of the Asymptote language. *****/ #include #include #include #include #include "util.h" #include "modifier.h" #include "exp.h" #include "stm.h" #include "fundec.h" #include "errormsg.h" #include "interact.h" #include "lexical.h" using namespace absyntax; using mem::string; #include "camp.tab.h" #include "opsymbols.h" #define YY_NO_INPUT static void yyunput(int, char *); void (*unused)(int,char *) = yyunput; fileinfo* fi; Int tokPos; Int charPos; //int commentDepth = 0; bool eof; string eofMessage; extern errorstream em; extern "C" int yywrap(void) { charPos=1; return 1; } typedef size_t (*input_f) (char* bif, size_t max_size); input_f yy_input = NULL; void setlexer(input_f input, string filename) { YY_FLUSH_BUFFER; yywrap(); fi = new fileinfo(filename); yy_input = input; tokPos = charPos = 1; eof=false; eofMessage=""; } #define YY_INPUT(buf,result,max_size) {result=yy_input(buf,max_size);} position lexerPos() { position p; p.init(fi, tokPos); return p; } namespace { position here() { return lexerPos(); } void adjust() { tokPos = charPos; charPos += yyleng; yylval.pos = here(); } void savesymbol(symbol name) { adjust(); yylval.ps.pos=yylval.pos; // avoid invoking here() twice yylval.ps.sym=name; } /* For optimization reasons, the operator names are translated into symbols * just once, and can be accessed throughout the code as SYM_PLUS, SYM_DASHES, * etc. Following the Don't Repeat Yourself principle, the mapping from * strings to names is defined only here in camp.l (because we can't produce * lex rules from a C style macro). * The script opsymbols.pl reads this file scanning for rules using DEFSYMBOL * and creates opsymbols.h which defines the names for use in C++ code. */ #define DEFSYMBOL(name) \ savesymbol(name) /* Extra symbols can be added by EXTRASYMBOL */ #define EXTRASYMBOL(chars, codename) /* blank */ EXTRASYMBOL(tuple, SYM_TUPLE); void makesymbol() { assert(strlen(yytext) == (size_t)yyleng); savesymbol(symbol::rawTrans(yytext, yyleng+1)); } void makeopsymbol() { savesymbol(symbol::opTrans(yytext)); } void makemod(trans::modifier mod) { yylval.mod.pos=here(); yylval.mod.val=mod; } void makeperm(trans::permission perm) { yylval.perm.pos=here(); yylval.perm.val=perm; } void newline() { fi->newline(); charPos = tokPos = 1; } void error(void) { em.error(here()); } } // Used by the lexer rules to flag an unexpected end of input. The message is // the error message that should be reported, and may differ if, say the input // ends in the middle of a string or comment. void setEOF(string message) { eof=true; eofMessage=message; } // Called by code outside of the lexer to see if a parse error was caused by // running out of input. bool lexerEOF() { return eof; } // Called by code outside of the lexer when it wants to report the unexpected // eof as an error (instead of looking for more input). void reportEOF() { assert(eof); error(); em << eofMessage; em.sync(); } position stringpos; // The position of the start of the string. string stringbuild; // Stores the string literal as it is read. namespace { void startstring() { adjust(); stringpos = here(); } void append(char c) { stringbuild.push_back(c); yylval.pos = here(); } void getstring(void) { // NOTE: Replace here() with a position at the start of the string. yylval.stre = new stringExp(stringpos, stringbuild); string().swap(stringbuild); } } %} %x lexcomment %x texstring %x cstring %x lexformat %x opname LETTER [_A-Za-z] ESC \\ ENDL \\?(\r\n|\n|\r) EXTRAOPS <<|>>|$|$$|@|@@|~ %% { \/\* {adjust(); /*commentDepth++;*/} \*\/ {adjust(); /*commentDepth--;*/ /*if (commentDepth == 0)*/ BEGIN INITIAL; } \r\n|\n|\r {adjust(); newline(); continue; } <> {adjust(); setEOF("comment not terminated"); BEGIN INITIAL; return GARBAGE; } . {adjust(); continue; } } { \"/([ \t]|{ENDL})*[\"\'] {adjust(); BEGIN INITIAL;} \" {adjust(); BEGIN INITIAL; getstring(); return STRING; } <> {adjust(); setEOF("string not terminated"); BEGIN INITIAL; getstring(); return GARBAGE; } {ENDL} {adjust(); newline(); append('\n'); continue; } {ESC}{ESC} {adjust(); append('\\'); append('\\'); continue; } {ESC}\" {adjust(); append('\"'); continue; } . {adjust(); append(*yytext); } } { \'/([ \t]|{ENDL})*[\"\'] {adjust(); BEGIN INITIAL;} \' {adjust(); BEGIN INITIAL; getstring(); return STRING; } <> {adjust(); setEOF("string not terminated"); BEGIN INITIAL; getstring(); return GARBAGE; } {ENDL} {adjust(); newline(); append('\n'); continue; } {ESC}(\'|\"|\?|\\) {adjust(); append(yytext[1]); continue; } {ESC}a {adjust(); append('\a'); continue; } {ESC}b {adjust(); append('\b'); continue; } {ESC}f {adjust(); append('\f'); continue; } {ESC}n {adjust(); append('\n'); continue; } {ESC}r {adjust(); append('\r'); continue; } {ESC}t {adjust(); append('\t'); continue; } {ESC}v {adjust(); append('\v'); continue; } {ESC}[0-7] {adjust(); char x=(char)(yytext[1]-'0'); append(x); continue; } {ESC}[0-7][0-7] {adjust(); char x=(char)((yytext[1]-'0')*8+yytext[2]-'0'); append(x); continue; } {ESC}[0-3][0-7][0-7] {adjust(); char x=(char)((yytext[1]-'0')*64+(yytext[2]-'0')*8 +yytext[3]-'0'); append(x); continue; } {ESC}x[0-9,A-F] {adjust(); char x=(char) (yytext[2] <= '9' ? yytext[2]-'0' : 10+yytext[2]-'A'); append(x); continue; } {ESC}x[0-9,A-F][0-9,A-F] {adjust(); char x=(char) ((yytext[2] <= '9' ? yytext[2]-'0' : 10+yytext[2]-'A')*16 +(yytext[3] <= '9' ? yytext[3]-'0' : 10+yytext[3]-'A')); append(x); continue; } . {adjust(); append(*yytext); } } [ \t] {adjust(); continue;} {ENDL} {adjust(); newline(); continue;} \/\/[^\n]* {adjust(); continue;} "," {adjust(); return ','; } ":" {adjust(); return ':'; } ";" {adjust(); return ';'; } "(" {adjust(); return '('; } ")" {adjust(); return ')'; } "[" {adjust(); return '['; } "]" {adjust(); return ']'; } "{" {adjust(); return '{'; } "}" {adjust(); return '}'; } "." {adjust(); return '.'; } "..." {adjust(); return ELLIPSIS; } "+" {DEFSYMBOL(SYM_PLUS); return '+'; } "-" {DEFSYMBOL(SYM_MINUS); return '-'; } "*" {DEFSYMBOL(SYM_TIMES); return '*'; } "/" {DEFSYMBOL(SYM_DIVIDE); return '/'; } "#" {DEFSYMBOL(SYM_QUOTIENT); return '#'; } "%" {DEFSYMBOL(SYM_MOD); return '%'; } "^" {DEFSYMBOL(SYM_CARET); return '^'; } "**" {savesymbol(SYM_CARET); return '^'; } "?" {adjust(); return '?'; } "=" {adjust(); return ASSIGN; } "==" {DEFSYMBOL(SYM_EQ); return EQ; } "!=" {DEFSYMBOL(SYM_NEQ); return NEQ; } "<" {DEFSYMBOL(SYM_LT); return LT; } "<=" {DEFSYMBOL(SYM_LE); return LE; } ">" {DEFSYMBOL(SYM_GT); return GT; } ">=" {DEFSYMBOL(SYM_GE); return GE; } "&&" {DEFSYMBOL(SYM_CAND); return CAND; } "||" {DEFSYMBOL(SYM_COR); return COR; } "!" {DEFSYMBOL(SYM_LOGNOT); return OPERATOR; } "^^" {DEFSYMBOL(SYM_CARETS); return CARETS; } "::" {DEFSYMBOL(SYM_COLONS); return COLONS; } "++" {DEFSYMBOL(SYM_INCR); return INCR; } ".." {DEFSYMBOL(SYM_DOTS); return DOTS; } "--" {DEFSYMBOL(SYM_DASHES); return DASHES; } "---" {DEFSYMBOL(SYM_LONGDASH); return LONGDASH; } "&" {DEFSYMBOL(SYM_AMPERSAND); return AMPERSAND; } "|" {DEFSYMBOL(SYM_BAR); return BAR; } {EXTRAOPS} {makeopsymbol(); return OPERATOR; } "+=" {savesymbol(SYM_PLUS); return SELFOP; } "-=" {savesymbol(SYM_MINUS); return SELFOP; } "*=" {savesymbol(SYM_TIMES); return SELFOP; } "/=" {savesymbol(SYM_DIVIDE); return SELFOP; } "#=" {savesymbol(SYM_QUOTIENT); return SELFOP; } "%=" {savesymbol(SYM_MOD); return SELFOP; } "^=" {savesymbol(SYM_CARET); return SELFOP; } and {adjust(); return AND; } controls {DEFSYMBOL(SYM_CONTROLS); return CONTROLS; } tension {DEFSYMBOL(SYM_TENSION); return TENSION; } atleast {DEFSYMBOL(SYM_ATLEAST); return ATLEAST; } curl {DEFSYMBOL(SYM_CURL); return CURL; } if {adjust(); return IF; } else {adjust(); return ELSE; } while {adjust(); return WHILE; } for {adjust(); return FOR; } do {adjust(); return DO; } return {adjust(); return RETURN_; } break {adjust(); return BREAK; } continue {adjust(); return CONTINUE; } struct {adjust(); return STRUCT; } typedef {adjust(); return TYPEDEF; } new {adjust(); return NEW; } access {adjust(); return ACCESS; } import {adjust(); return IMPORT; } unravel {adjust(); return UNRAVEL; } from {adjust(); return FROM; } include {adjust(); return INCLUDE; } quote {adjust(); return QUOTE; } static {adjust(); makemod(trans::EXPLICIT_STATIC); return MODIFIER; } public {adjust(); makeperm(trans::PUBLIC); return PERM; } private {adjust(); makeperm(trans::PRIVATE); return PERM; } restricted {adjust(); makeperm(trans::RESTRICTED); return PERM; } this {adjust(); return THIS; } explicit {adjust(); return EXPLICIT; } [0-9]+ try { adjust(); yylval.e= new intExp(here(), lexical::cast(yytext)); } catch (lexical::bad_cast&) { error(); em << "invalid integer"; yylval.e= new intExp(here(), 0); } return LIT; ([0-9]*\.[0-9]+)|([0-9]+\.[0-9]*)|([0-9]*\.*[0-9]+e[-+]*[0-9]+)|([0-9]+\.[0-9]*e[-+]*[0-9]+) try { adjust(); yylval.e= new realExp(here(), lexical::cast(yytext)); } catch (lexical::bad_cast&) { error(); em << "invalid real"; yylval.e= new realExp(here(), 0); } return LIT; true { adjust(); yylval.e= new booleanExp(here(), true); return LIT; } false { adjust(); yylval.e= new booleanExp(here(), false); return LIT; } null { adjust(); yylval.e= new nullExp(here()); return LIT; } cycle { adjust(); yylval.e= new cycleExp(here()); return LIT; } newframe { adjust(); yylval.e= new newPictureExp(here()); return LIT; } operator {adjust(); BEGIN opname; } { [ \t\r] {adjust(); continue;} {ENDL} {adjust(); newline(); continue;} <> {adjust(); setEOF("missing operator name"); BEGIN INITIAL; return GARBAGE; } "**" { savesymbol(SYM_CARET); BEGIN INITIAL; return ID; } [-+*/#%^!<>]|==|!=|<=|>=|&|\||\^\^|\.\.|::|--|---|\+\+|{EXTRAOPS} { makeopsymbol(); BEGIN INITIAL; return ID;} {LETTER}({LETTER}|[0-9])* { makeopsymbol(); BEGIN INITIAL; return ID; } . {} } {LETTER}({LETTER}|[0-9])* { makesymbol(); return ID; } \/\* {adjust(); /*commentDepth = 1;*/ BEGIN lexcomment; } \" {startstring(); BEGIN texstring; } \' {startstring(); BEGIN cstring; } <> { setEOF("unexpected end of input"); yyterminate(); } . {adjust(); error(); em << "invalid token"; if (isgraph(yytext[0])) em << " '" << yytext[0] << "'"; } ./asymptote-2.41/align.h0000644000175000017500000000434613064427076015015 0ustar norbertnorbert#ifndef __align_h__ #define __align_h__ 1 #ifndef HAVE_POSIX_MEMALIGN #ifdef __GLIBC_PREREQ #if __GLIBC_PREREQ(2,3) #define HAVE_POSIX_MEMALIGN #endif #else #ifdef _POSIX_SOURCE #define HAVE_POSIX_MEMALIGN #endif #endif #endif #ifdef __Array_h__ namespace Array { static const array1 NULL1; static const array2 NULL2; static const array3 NULL3; } #else #ifdef HAVE_POSIX_MEMALIGN #ifdef _AIX extern "C" int posix_memalign(void **memptr, size_t alignment, size_t size); #endif #else namespace Array { // Adapted from FFTW aligned malloc/free. Assumes that malloc is at least // sizeof(void*)-aligned. Allocated memory must be freed with free0. inline int posix_memalign0(void **memptr, size_t alignment, size_t size) { if(alignment % sizeof (void *) != 0 || (alignment & (alignment - 1)) != 0) return EINVAL; void *p0=malloc(size+alignment); if(!p0) return ENOMEM; void *p=(void *)(((size_t) p0+alignment)&~(alignment-1)); *((void **) p-1)=p0; *memptr=p; return 0; } inline void free0(void *p) { if(p) free(*((void **) p-1)); } } #endif namespace Array { template inline void newAlign(T *&v, size_t len, size_t align) { void *mem=NULL; const char *invalid="Invalid alignment requested"; const char *nomem="Memory limits exceeded"; #ifdef HAVE_POSIX_MEMALIGN int rc=posix_memalign(&mem,align,len*sizeof(T)); #else int rc=posix_memalign0(&mem,align,len*sizeof(T)); #endif if(rc == EINVAL) std::cerr << invalid << std::endl; if(rc == ENOMEM) std::cerr << nomem << std::endl; v=(T *) mem; for(size_t i=0; i < len; i++) new(v+i) T; } template inline void deleteAlign(T *v, size_t len) { for(size_t i=len; i-- > 0;) v[i].~T(); #ifdef HAVE_POSIX_MEMALIGN free(v); #else free0(v); #endif } } #endif namespace utils { inline unsigned int ceilquotient(unsigned int a, unsigned int b) { return (a+b-1)/b; } inline Complex *ComplexAlign(size_t size) { Complex *v; Array::newAlign(v,size,sizeof(Complex)); return v; } inline double *doubleAlign(size_t size) { double *v; Array::newAlign(v,size,sizeof(Complex)); return v; } template inline void deleteAlign(T *p) { #ifdef HAVE_POSIX_MEMALIGN free(p); #else Array::free0(p); #endif } } #endif ./asymptote-2.41/path3.cc0000644000175000017500000011204413064427076015073 0ustar norbertnorbert/***** * path3.cc * John Bowman * * Compute information for a three-dimensional path. *****/ #include #include "path3.h" #include "util.h" #include "camperror.h" #include "mathop.h" namespace camp { using run::operator *; using vm::array; path3 nullpath3; void checkEmpty3(Int n) { if(n == 0) reportError("nullpath3 has no points"); } triple path3::point(double t) const { checkEmpty3(n); Int i = Floor(t); Int iplus; t = fmod(t,1); if (t < 0) t += 1; if (cycles) { i = imod(i,n); iplus = imod(i+1,n); } else if (i < 0) return nodes[0].point; else if (i >= n-1) return nodes[n-1].point; else iplus = i+1; double one_t = 1.0-t; triple a = nodes[i].point, b = nodes[i].post, c = nodes[iplus].pre, d = nodes[iplus].point, ab = one_t*a + t*b, bc = one_t*b + t*c, cd = one_t*c + t*d, abc = one_t*ab + t*bc, bcd = one_t*bc + t*cd, abcd = one_t*abc + t*bcd; return abcd; } triple path3::precontrol(double t) const { checkEmpty3(n); Int i = Floor(t); Int iplus; t = fmod(t,1); if (t < 0) t += 1; if (cycles) { i = imod(i,n); iplus = imod(i+1,n); } else if (i < 0) return nodes[0].pre; else if (i >= n-1) return nodes[n-1].pre; else iplus = i+1; double one_t = 1.0-t; triple a = nodes[i].point, b = nodes[i].post, c = nodes[iplus].pre, ab = one_t*a + t*b, bc = one_t*b + t*c, abc = one_t*ab + t*bc; return (abc == a) ? nodes[i].pre : abc; } triple path3::postcontrol(double t) const { checkEmpty3(n); Int i = Floor(t); Int iplus; t = fmod(t,1); if (t < 0) t += 1; if (cycles) { i = imod(i,n); iplus = imod(i+1,n); } else if (i < 0) return nodes[0].post; else if (i >= n-1) return nodes[n-1].post; else iplus = i+1; double one_t = 1.0-t; triple b = nodes[i].post, c = nodes[iplus].pre, d = nodes[iplus].point, bc = one_t*b + t*c, cd = one_t*c + t*d, bcd = one_t*bc + t*cd; return (bcd == d) ? nodes[iplus].post : bcd; } path3 path3::reverse() const { mem::vector nodes(n); Int len=length(); for (Int i = 0, j = len; i < n; i++, j--) { nodes[i].pre = postcontrol(j); nodes[i].point = point(j); nodes[i].post = precontrol(j); nodes[i].straight = straight(j-1); } return path3(nodes, n, cycles); } path3 path3::subpath(Int a, Int b) const { if(empty()) return path3(); if (a > b) { const path3 &rp = reverse(); Int len=length(); path3 result = rp.subpath(len-a, len-b); return result; } if (!cycles) { if (a < 0) a = 0; if (b > n-1) b = n-1; } Int sn = b-a+1; mem::vector nodes(sn); for (Int i = 0, j = a; j <= b; i++, j++) { nodes[i].pre = precontrol(j); nodes[i].point = point(j); nodes[i].post = postcontrol(j); nodes[i].straight = straight(j); } nodes[0].pre = nodes[0].point; nodes[sn-1].post = nodes[sn-1].point; return path3(nodes, sn); } inline triple split(double t, const triple& x, const triple& y) { return x+(y-x)*t; } inline void splitCubic(solvedKnot3 sn[], double t, const solvedKnot3& left_, const solvedKnot3& right_) { solvedKnot3 &left=(sn[0]=left_), &mid=sn[1], &right=(sn[2]=right_); if(left.straight) { mid.point=split(t,left.point,right.point); triple deltaL=third*(mid.point-left.point); left.post=left.point+deltaL; mid.pre=mid.point-deltaL; triple deltaR=third*(right.point-mid.point); mid.post=mid.point+deltaR; right.pre=right.point-deltaR; mid.straight=true; } else { triple x=split(t,left.post,right.pre); // m1 left.post=split(t,left.point,left.post); // m0 right.pre=split(t,right.pre,right.point); // m2 mid.pre=split(t,left.post,x); // m3 mid.post=split(t,x,right.pre); // m4 mid.point=split(t,mid.pre,mid.post); // m5 } } path3 path3::subpath(double a, double b) const { if(empty()) return path3(); if (a > b) { const path3 &rp = reverse(); Int len=length(); return rp.subpath(len-a, len-b); } solvedKnot3 aL, aR, bL, bR; if (!cycles) { if (a < 0) { a = 0; if (b < 0) b = 0; } if (b > n-1) { b = n-1; if (a > n-1) a = n-1; } aL = nodes[(Int)floor(a)]; aR = nodes[(Int)ceil(a)]; bL = nodes[(Int)floor(b)]; bR = nodes[(Int)ceil(b)]; } else { if(run::validInt(a) && run::validInt(b)) { aL = nodes[imod((Int) floor(a),n)]; aR = nodes[imod((Int) ceil(a),n)]; bL = nodes[imod((Int) floor(b),n)]; bR = nodes[imod((Int) ceil(b),n)]; } else reportError("invalid path3 index"); } if (a == b) return path3(point(a)); solvedKnot3 sn[3]; path3 p = subpath(Ceil(a), Floor(b)); if (a > floor(a)) { if (b < ceil(a)) { splitCubic(sn,a-floor(a),aL,aR); splitCubic(sn,(b-a)/(ceil(b)-a),sn[1],sn[2]); return path3(sn[0],sn[1]); } splitCubic(sn,a-floor(a),aL,aR); p=concat(path3(sn[1],sn[2]),p); } if (ceil(b) > b) { splitCubic(sn,b-floor(b),bL,bR); p=concat(p,path3(sn[0],sn[1])); } return p; } // Special case of subpath for paths of length 1 used by intersect. void path3::halve(path3 &first, path3 &second) const { solvedKnot3 sn[3]; splitCubic(sn,0.5,nodes[0],nodes[1]); first=path3(sn[0],sn[1]); second=path3(sn[1],sn[2]); } // Calculate the coefficients of a Bezier derivative divided by 3. static inline void derivative(triple& a, triple& b, triple& c, const triple& z0, const triple& c0, const triple& c1, const triple& z1) { a=z1-z0+3.0*(c0-c1); b=2.0*(z0+c1)-4.0*c0; c=c0-z0; } bbox3 path3::bounds() const { if(!box.empty) return box; if (empty()) { // No bounds return bbox3(); } Int len=length(); box.add(point(len)); times=bbox3(len,len,len,len,len,len); for (Int i = 0; i < len; i++) { addpoint(box,i); if(straight(i)) continue; triple a,b,c; derivative(a,b,c,point(i),postcontrol(i),precontrol(i+1),point(i+1)); // Check x coordinate quadraticroots x(a.getx(),b.getx(),c.getx()); if(x.distinct != quadraticroots::NONE && goodroot(x.t1)) addpoint(box,i+x.t1); if(x.distinct == quadraticroots::TWO && goodroot(x.t2)) addpoint(box,i+x.t2); // Check y coordinate quadraticroots y(a.gety(),b.gety(),c.gety()); if(y.distinct != quadraticroots::NONE && goodroot(y.t1)) addpoint(box,i+y.t1); if(y.distinct == quadraticroots::TWO && goodroot(y.t2)) addpoint(box,i+y.t2); // Check z coordinate quadraticroots z(a.getz(),b.getz(),c.getz()); if(z.distinct != quadraticroots::NONE && goodroot(z.t1)) addpoint(box,i+z.t1); if(z.distinct == quadraticroots::TWO && goodroot(z.t2)) addpoint(box,i+z.t2); } return box; } // Return f evaluated at controlling vertex of bounding box of convex hull for // similiar-triangle transform x'=x/z, y'=y/z, where z < 0. double ratiobound(triple z0, triple c0, triple c1, triple z1, double (*m)(double, double), double (*f)(const triple&)) { double MX=m(m(m(-z0.getx(),-c0.getx()),-c1.getx()),-z1.getx()); double MY=m(m(m(-z0.gety(),-c0.gety()),-c1.gety()),-z1.gety()); double Z=m(m(m(z0.getz(),c0.getz()),c1.getz()),z1.getz()); double MZ=m(m(m(-z0.getz(),-c0.getz()),-c1.getz()),-z1.getz()); return m(f(triple(-MX,-MY,Z)),f(triple(-MX,-MY,-MZ))); } double bound(triple z0, triple c0, triple c1, triple z1, double (*m)(double, double), double (*f)(const triple&), double b, double fuzz, int depth) { b=m(b,m(f(z0),f(z1))); if(m(-1.0,1.0)*(b-ratiobound(z0,c0,c1,z1,m,f)) >= -fuzz || depth == 0) return b; --depth; triple m0=0.5*(z0+c0); triple m1=0.5*(c0+c1); triple m2=0.5*(c1+z1); triple m3=0.5*(m0+m1); triple m4=0.5*(m1+m2); triple m5=0.5*(m3+m4); // Check both Bezier subpaths. b=bound(z0,m0,m3,m5,m,f,b,fuzz,depth); return bound(m5,m4,m2,z1,m,f,b,fuzz,depth); } pair path3::ratio(double (*m)(double, double)) const { double fuzz=sqrtFuzz*(max()-min()).length(); checkEmpty3(n); triple v=point((Int) 0); pair B=pair(xratio(v),yratio(v)); Int n=length(); for(Int i=0; i <= n; ++i) { if(straight(i)) { triple v=point(i); B=pair(m(B.getx(),xratio(v)),m(B.gety(),yratio(v))); } else { triple z0=point(i); triple c0=postcontrol(i); triple c1=precontrol(i+1); triple z1=point(i+1); B=pair(bound(z0,c0,c1,z1,m,xratio,B.getx(),fuzz), bound(z0,c0,c1,z1,m,yratio,B.gety(),fuzz)); } } return B; } // {{{ Arclength Calculations static triple a,b,c; static double ds(double t) { double dx=quadratic(a.getx(),b.getx(),c.getx(),t); double dy=quadratic(a.gety(),b.gety(),c.gety(),t); double dz=quadratic(a.getz(),b.getz(),c.getz(),t); return sqrt(dx*dx+dy*dy+dz*dz); } // Calculates arclength of a cubic using adaptive simpson integration. double path3::cubiclength(Int i, double goal) const { const triple& z0=point(i); const triple& z1=point(i+1); double L; if(straight(i)) { L=(z1-z0).length(); return (goal < 0 || goal >= L) ? L : -goal/L; } const triple& c0=postcontrol(i); const triple& c1=precontrol(i+1); double integral; derivative(a,b,c,z0,c0,c1,z1); if(!simpson(integral,ds,0.0,1.0,DBL_EPSILON,1.0)) reportError("nesting capacity exceeded in computing arclength"); L=3.0*integral; if(goal < 0 || goal >= L) return L; double t=goal/L; goal *= third; static double dxmin=sqrt(DBL_EPSILON); if(!unsimpson(goal,ds,0.0,t,100.0*DBL_EPSILON,integral,1.0,dxmin)) reportError("nesting capacity exceeded in computing arctime"); return -t; } double path3::arclength() const { if (cached_length != -1) return cached_length; double L=0.0; for (Int i = 0; i < n-1; i++) { L += cubiclength(i); } if(cycles) L += cubiclength(n-1); cached_length = L; return cached_length; } double path3::arctime(double goal) const { if (cycles) { if (goal == 0 || cached_length == 0) return 0; if (goal < 0) { const path3 &rp = this->reverse(); double result = -rp.arctime(-goal); return result; } if (cached_length > 0 && goal >= cached_length) { Int loops = (Int)(goal / cached_length); goal -= loops*cached_length; return loops*n+arctime(goal); } } else { if (goal <= 0) return 0; if (cached_length > 0 && goal >= cached_length) return n-1; } double l,L=0; for (Int i = 0; i < n-1; i++) { l = cubiclength(i,goal); if (l < 0) return (-l+i); else { L += l; goal -= l; if (goal <= 0) return i+1; } } if (cycles) { l = cubiclength(n-1,goal); if (l < 0) return -l+n-1; if (cached_length > 0 && cached_length != L+l) { reportError("arclength != length.\n" "path3::arclength(double) must have broken semantics.\n" "Please report this error."); } cached_length = L += l; goal -= l; return arctime(goal)+n; } else { cached_length = L; return length(); } } // }}} // {{{ Path3 Intersection Calculations // Return all intersection times of path3 g with the triple v. void intersections(std::vector& T, const path3& g, const triple& v, double fuzz) { double fuzz2=fuzz*fuzz; Int n=g.length(); bool cycles=g.cyclic(); for(Int i=0; i < n; ++i) { // Check all directions to circumvent degeneracy. std::vector r; roots(r,g.point(i).getx(),g.postcontrol(i).getx(), g.precontrol(i+1).getx(),g.point(i+1).getx(),v.getx()); roots(r,g.point(i).gety(),g.postcontrol(i).gety(), g.precontrol(i+1).gety(),g.point(i+1).gety(),v.gety()); roots(r,g.point(i).getz(),g.postcontrol(i).getz(), g.precontrol(i+1).getz(),g.point(i+1).getz(),v.getz()); size_t m=r.size(); for(size_t j=0 ; j < m; ++j) { double t=r[j]; if(t >= -Fuzz && t <= 1.0+Fuzz) { double s=i+t; if((g.point(s)-v).abs2() <= fuzz2) { if(cycles && s >= n-Fuzz) s=0; T.push_back(s); } } } } } // An optimized implementation of intersections(g,p--q); // if there are an infinite number of intersection points, the returned list is // only guaranteed to include the endpoint times of the intersection. void intersections(std::vector& S, std::vector& T, const path3& g, const triple& p, double fuzz) { std::vector S1; intersections(S1,g,p,fuzz); size_t n=S1.size(); for(size_t i=0; i < n; ++i) { S.push_back(S1[i]); T.push_back(0.0); } } void add(std::vector& S, std::vector& T, double s, double t, const path3& p, const path3& q, double fuzz2) { triple P=p.point(s); for(size_t i=0; i < S.size(); ++i) if((p.point(S[i])-P).abs2() <= fuzz2) return; S.push_back(s); T.push_back(t); } void add(double& s, double& t, std::vector& S, std::vector& T, std::vector& S1, std::vector& T1, double pscale, double qscale, double poffset, double qoffset, const path3& p, const path3& q, double fuzz2, bool single) { if(single) { s=s*pscale+poffset; t=t*qscale+qoffset; } else { size_t n=S1.size(); for(size_t i=0; i < n; ++i) add(S,T,pscale*S1[i]+poffset,qscale*T1[i]+qoffset,p,q,fuzz2); } } void add(double& s, double& t, std::vector& S, std::vector& T, std::vector& S1, std::vector& T1, const path3& p, const path3& q, double fuzz2, bool single) { size_t n=S1.size(); if(single) { if(n > 0) { s=S1[0]; t=T1[0]; } } else { for(size_t i=0; i < n; ++i) add(S,T,S1[i],T1[i],p,q,fuzz2); } } bool intersections(double &s, double &t, std::vector& S, std::vector& T, path3& p, path3& q, double fuzz, bool single, bool exact, unsigned depth) { if(errorstream::interrupt) throw interrupted(); double fuzz2=max(fuzzFactor*fuzz,Fuzz); fuzz2=fuzz2*fuzz2; Int lp=p.length(); if(lp == 0 && exact) { std::vector T1,S1; intersections(T1,S1,q,p.point(lp),fuzz); add(s,t,S,T,S1,T1,p,q,fuzz2,single); return S1.size() > 0; } Int lq=q.length(); if(lq == 0 && exact) { std::vector S1,T1; intersections(S1,T1,p,q.point(lq),fuzz); add(s,t,S,T,S1,T1,p,q,fuzz2,single); return S1.size() > 0; } triple maxp=p.max(); triple minp=p.min(); triple maxq=q.max(); triple minq=q.min(); if(maxp.getx()+fuzz >= minq.getx() && maxp.gety()+fuzz >= minq.gety() && maxp.getz()+fuzz >= minq.getz() && maxq.getx()+fuzz >= minp.getx() && maxq.gety()+fuzz >= minp.gety() && maxq.getz()+fuzz >= minp.getz()) { // Overlapping bounding boxes --depth; if((maxp-minp).length()+(maxq-minq).length() <= fuzz || depth == 0) { if(single) { s=0.5; t=0.5; } else { S.push_back(0.5); T.push_back(0.5); } return true; } path3 p1,p2; double pscale,poffset; std::vector S1,T1; if(lp <= 1) { if(lp == 1) p.halve(p1,p2); if(lp == 0 || p1 == p || p2 == p) { intersections(T1,S1,q,p.point((Int) 0),fuzz); add(s,t,S,T,S1,T1,p,q,fuzz2,single); return S1.size() > 0; } pscale=poffset=0.5; } else { Int tp=lp/2; p1=p.subpath(0,tp); p2=p.subpath(tp,lp); poffset=tp; pscale=1.0; } path3 q1,q2; double qscale,qoffset; if(lq <= 1) { if(lq == 1) q.halve(q1,q2); if(lq == 0 || q1 == q || q2 == q) { intersections(S1,T1,p,q.point((Int) 0),fuzz); add(s,t,S,T,S1,T1,p,q,fuzz2,single); return S1.size() > 0; } qscale=qoffset=0.5; } else { Int tq=lq/2; q1=q.subpath(0,tq); q2=q.subpath(tq,lq); qoffset=tq; qscale=1.0; } bool Short=lp == 1 && lq == 1; static size_t maxcount=9; size_t count=0; if(intersections(s,t,S1,T1,p1,q1,fuzz,single,exact,depth)) { add(s,t,S,T,S1,T1,pscale,qscale,0.0,0.0,p,q,fuzz2,single); if(single || depth <= mindepth) return true; count += S1.size(); if(Short && count > maxcount) return true; } S1.clear(); T1.clear(); if(intersections(s,t,S1,T1,p1,q2,fuzz,single,exact,depth)) { add(s,t,S,T,S1,T1,pscale,qscale,0.0,qoffset,p,q,fuzz2,single); if(single || depth <= mindepth) return true; count += S1.size(); if(Short && count > maxcount) return true; } S1.clear(); T1.clear(); if(intersections(s,t,S1,T1,p2,q1,fuzz,single,exact,depth)) { add(s,t,S,T,S1,T1,pscale,qscale,poffset,0.0,p,q,fuzz2,single); if(single || depth <= mindepth) return true; count += S1.size(); if(Short && count > maxcount) return true; } S1.clear(); T1.clear(); if(intersections(s,t,S1,T1,p2,q2,fuzz,single,exact,depth)) { add(s,t,S,T,S1,T1,pscale,qscale,poffset,qoffset,p,q,fuzz2,single); if(single || depth <= mindepth) return true; count += S1.size(); if(Short && count > maxcount) return true; } return S.size() > 0; } return false; } // }}} path3 concat(const path3& p1, const path3& p2) { Int n1 = p1.length(), n2 = p2.length(); if (n1 == -1) return p2; if (n2 == -1) return p1; triple a=p1.point(n1); triple b=p2.point((Int) 0); mem::vector nodes(n1+n2+1); Int i = 0; nodes[0].pre = p1.point((Int) 0); for (Int j = 0; j < n1; j++) { nodes[i].point = p1.point(j); nodes[i].straight = p1.straight(j); nodes[i].post = p1.postcontrol(j); nodes[i+1].pre = p1.precontrol(j+1); i++; } for (Int j = 0; j < n2; j++) { nodes[i].point = p2.point(j); nodes[i].straight = p2.straight(j); nodes[i].post = p2.postcontrol(j); nodes[i+1].pre = p2.precontrol(j+1); i++; } nodes[i].point = nodes[i].post = p2.point(n2); return path3(nodes, i+1); } path3 transformed(const array& t, const path3& p) { Int n = p.size(); mem::vector nodes(n); for (Int i = 0; i < n; ++i) { nodes[i].pre = t * p.precontrol(i); nodes[i].point = t * p.point(i); nodes[i].post = t * p.postcontrol(i); nodes[i].straight = p.straight(i); } return path3(nodes, n, p.cyclic()); } path3 transformed(const double* t, const path3& p) { Int n = p.size(); mem::vector nodes(n); for(Int i=0; i < n; ++i) { nodes[i].pre=t*p.precontrol(i); nodes[i].point=t*p.point(i); nodes[i].post=t*p.postcontrol(i); nodes[i].straight=p.straight(i); } return path3(nodes, n, p.cyclic()); } template struct Split { T m0,m1,m2,m3,m4,m5; Split(T z0, T c0, T c1, T z1) { m0=0.5*(z0+c0); m1=0.5*(c0+c1); m2=0.5*(c1+z1); m3=0.5*(m0+m1); m4=0.5*(m1+m2); m5=0.5*(m3+m4); } }; double cornerbound(double *P, double (*m)(double, double)) { double b=m(P[0],P[3]); b=m(b,P[12]); return m(b,P[15]); } double controlbound(double *P, double (*m)(double, double)) { double b=m(P[1],P[2]); b=m(b,P[4]); b=m(b,P[5]); b=m(b,P[6]); b=m(b,P[7]); b=m(b,P[8]); b=m(b,P[9]); b=m(b,P[10]); b=m(b,P[11]); b=m(b,P[13]); return m(b,P[14]); } double bound(double *P, double (*m)(double, double), double b, double fuzz, int depth) { b=m(b,cornerbound(P,m)); if(m(-1.0,1.0)*(b-controlbound(P,m)) >= -fuzz || depth == 0) return b; --depth; Split c0(P[0],P[1],P[2],P[3]); Split c1(P[4],P[5],P[6],P[7]); Split c2(P[8],P[9],P[10],P[11]); Split c3(P[12],P[13],P[14],P[15]); Split c4(P[12],P[8],P[4],P[0]); Split c5(c3.m0,c2.m0,c1.m0,c0.m0); Split c6(c3.m3,c2.m3,c1.m3,c0.m3); Split c7(c3.m5,c2.m5,c1.m5,c0.m5); Split c8(c3.m4,c2.m4,c1.m4,c0.m4); Split c9(c3.m2,c2.m2,c1.m2,c0.m2); Split c10(P[15],P[11],P[7],P[3]); // Check all 4 Bezier subpatches. double s0[]={c4.m5,c5.m5,c6.m5,c7.m5,c4.m3,c5.m3,c6.m3,c7.m3, c4.m0,c5.m0,c6.m0,c7.m0,P[12],c3.m0,c3.m3,c3.m5}; b=bound(s0,m,b,fuzz,depth); double s1[]={P[0],c0.m0,c0.m3,c0.m5,c4.m2,c5.m2,c6.m2,c7.m2, c4.m4,c5.m4,c6.m4,c7.m4,c4.m5,c5.m5,c6.m5,c7.m5}; b=bound(s1,m,b,fuzz,depth); double s2[]={c0.m5,c0.m4,c0.m2,P[3],c7.m2,c8.m2,c9.m2,c10.m2, c7.m4,c8.m4,c9.m4,c10.m4,c7.m5,c8.m5,c9.m5,c10.m5}; b=bound(s2,m,b,fuzz,depth); double s3[]={c7.m5,c8.m5,c9.m5,c10.m5,c7.m3,c8.m3,c9.m3,c10.m3, c7.m0,c8.m0,c9.m0,c10.m0,c3.m5,c3.m4,c3.m2,P[15]}; return bound(s3,m,b,fuzz,depth); } double cornerbound(triple *P, double (*m)(double, double), double (*f)(const triple&)) { double b=m(f(P[0]),f(P[3])); b=m(b,f(P[12])); return m(b,f(P[15])); } // Return f evaluated at controlling vertex of bounding box of n control // net points for similiar-triangle transform x'=x/z, y'=y/z, where z < 0. double ratiobound(triple *P, double (*m)(double, double), double (*f)(const triple&), int n) { double MX=-P[0].getx(); double MY=-P[0].gety(); double Z=P[0].getz(); double MZ=-Z; for(int i=1; i < n; ++i) { triple v=P[i]; MX=m(MX,-v.getx()); MY=m(MY,-v.gety()); Z=m(Z,v.getz()); MZ=m(MZ,-v.getz()); } return m(f(triple(-MX,-MY,Z)),f(triple(-MX,-MY,-MZ))); } double controlbound(triple *P, double (*m)(double, double), double (*f)(const triple&)) { double b=m(f(P[1]),f(P[2])); b=m(b,f(P[4])); b=m(b,f(P[5])); b=m(b,f(P[6])); b=m(b,f(P[7])); b=m(b,f(P[8])); b=m(b,f(P[9])); b=m(b,f(P[10])); b=m(b,f(P[11])); b=m(b,f(P[13])); return m(b,f(P[14])); } double bound(triple *P, double (*m)(double, double), double (*f)(const triple&), double b, double fuzz, int depth) { b=m(b,cornerbound(P,m,f)); if(m(-1.0,1.0)*(b-ratiobound(P,m,f,16)) >= -fuzz || depth == 0) return b; --depth; Split c0(P[0],P[1],P[2],P[3]); Split c1(P[4],P[5],P[6],P[7]); Split c2(P[8],P[9],P[10],P[11]); Split c3(P[12],P[13],P[14],P[15]); Split c4(P[12],P[8],P[4],P[0]); Split c5(c3.m0,c2.m0,c1.m0,c0.m0); Split c6(c3.m3,c2.m3,c1.m3,c0.m3); Split c7(c3.m5,c2.m5,c1.m5,c0.m5); Split c8(c3.m4,c2.m4,c1.m4,c0.m4); Split c9(c3.m2,c2.m2,c1.m2,c0.m2); Split c10(P[15],P[11],P[7],P[3]); // Check all 4 Bezier subpatches. triple s0[]={c4.m5,c5.m5,c6.m5,c7.m5,c4.m3,c5.m3,c6.m3,c7.m3, c4.m0,c5.m0,c6.m0,c7.m0,P[12],c3.m0,c3.m3,c3.m5}; b=bound(s0,m,f,b,fuzz,depth); triple s1[]={P[0],c0.m0,c0.m3,c0.m5,c4.m2,c5.m2,c6.m2,c7.m2, c4.m4,c5.m4,c6.m4,c7.m4,c4.m5,c5.m5,c6.m5,c7.m5}; b=bound(s1,m,f,b,fuzz,depth); triple s2[]={c0.m5,c0.m4,c0.m2,P[3],c7.m2,c8.m2,c9.m2,c10.m2, c7.m4,c8.m4,c9.m4,c10.m4,c7.m5,c8.m5,c9.m5,c10.m5}; b=bound(s2,m,f,b,fuzz,depth); triple s3[]={c7.m5,c8.m5,c9.m5,c10.m5,c7.m3,c8.m3,c9.m3,c10.m3, c7.m0,c8.m0,c9.m0,c10.m0,c3.m5,c3.m4,c3.m2,P[15]}; return bound(s3,m,f,b,fuzz,depth); } template struct Splittri { T l003,p102,p012,p201,p111,p021,r300,p210,p120,u030; T u021,u120; T p033,p231,p330; T p123; T l012,p312,r210,l102,p303,r201; T u012,u210,l021,p4xx,r120,px4x,pxx4,l201,r102; T l210,r012,l300; T r021,u201,r030; T u102,l120,l030; T l111,r111,u111,c111; Splittri(const T *p) { l003=p[0]; p102=p[1]; p012=p[2]; p201=p[3]; p111=p[4]; p021=p[5]; r300=p[6]; p210=p[7]; p120=p[8]; u030=p[9]; u021=0.5*(u030+p021); u120=0.5*(u030+p120); p033=0.5*(p021+p012); p231=0.5*(p120+p111); p330=0.5*(p120+p210); p123=0.5*(p012+p111); l012=0.5*(p012+l003); p312=0.5*(p111+p201); r210=0.5*(p210+r300); l102=0.5*(l003+p102); p303=0.5*(p102+p201); r201=0.5*(p201+r300); u012=0.5*(u021+p033); u210=0.5*(u120+p330); l021=0.5*(p033+l012); p4xx=0.5*p231+0.25*(p111+p102); r120=0.5*(p330+r210); px4x=0.5*p123+0.25*(p111+p210); pxx4=0.25*(p021+p111)+0.5*p312; l201=0.5*(l102+p303); r102=0.5*(p303+r201); l210=0.5*(px4x+l201); // = m120 r012=0.5*(px4x+r102); // = m021 l300=0.5*(l201+r102); // = r003 = m030 r021=0.5*(pxx4+r120); // = m012 u201=0.5*(u210+pxx4); // = m102 r030=0.5*(u210+r120); // = u300 = m003 u102=0.5*(u012+p4xx); // = m201 l120=0.5*(l021+p4xx); // = m210 l030=0.5*(u012+l021); // = u003 = m300 l111=0.5*(p123+l102); r111=0.5*(p312+r210); u111=0.5*(u021+p231); c111=0.25*(p033+p330+p303+p111); } }; // Return the extremum of the vertices of a Bezier triangle. double cornerboundtri(double *P, double (*m)(double, double)) { double b=m(P[0],P[6]); return m(b,P[9]); } double cornerboundtri(triple *P, double (*m)(double, double), double (*f)(const triple&)) { double b=m(f(P[0]),f(P[6])); return m(b,f(P[9])); } // Return the extremum of the non-vertex control points of a Bezier triangle. double controlboundtri(double *P, double (*m)(double, double)) { double b=m(P[1],P[2]); b=m(b,P[3]); b=m(b,P[4]); b=m(b,P[5]); b=m(b,P[7]); return m(b,P[8]); } double controlboundtri(triple *P, double (*m)(double, double), double (*f)(const triple&)) { double b=m(f(P[1]),f(P[2])); b=m(b,f(P[3])); b=m(b,f(P[4])); b=m(b,f(P[5])); b=m(b,f(P[7])); return m(b,f(P[8])); } // Return the global bound of a Bezier triangle. double boundtri(double *P, double (*m)(double, double), double b, double fuzz, int depth) { b=m(b,cornerboundtri(P,m)); if(m(-1.0,1.0)*(b-controlboundtri(P,m)) >= -fuzz || depth == 0) return b; --depth; Splittri s(P); double l[]={s.l003,s.l102,s.l012,s.l201,s.l111, s.l021,s.l300,s.l210,s.l120,s.l030}; // left b=boundtri(l,m,b,fuzz,depth); double r[]={s.l300,s.r102,s.r012,s.r201,s.r111, s.r021,s.r300,s.r210,s.r120,s.r030}; // right b=boundtri(r,m,b,fuzz,depth); double u[]={s.l030,s.u102,s.u012,s.u201,s.u111, s.u021,s.r030,s.u210,s.u120,s.u030}; // up b=boundtri(u,m,b,fuzz,depth); double c[]={s.r030,s.u201,s.r021,s.u102,s.c111, s.r012,s.l030,s.l120,s.l210,s.l300}; // center return boundtri(c,m,b,fuzz,depth); } double boundtri(triple *P, double (*m)(double, double), double (*f)(const triple&), double b, double fuzz, int depth) { b=m(b,cornerboundtri(P,m,f)); if(m(-1.0,1.0)*(b-ratiobound(P,m,f,10)) >= -fuzz || depth == 0) return b; --depth; Splittri s(P); triple l[]={s.l003,s.l102,s.l012,s.l201,s.l111, s.l021,s.l300,s.l210,s.l120,s.l030}; // left b=boundtri(l,m,f,b,fuzz,depth); triple r[]={s.l300,s.r102,s.r012,s.r201,s.r111, s.r021,s.r300,s.r210,s.r120,s.r030}; // right b=boundtri(r,m,f,b,fuzz,depth); triple u[]={s.l030,s.u102,s.u012,s.u201,s.u111, s.u021,s.r030,s.u210,s.u120,s.u030}; // up b=boundtri(u,m,f,b,fuzz,depth); triple c[]={s.r030,s.u201,s.r021,s.u102,s.c111, s.r012,s.l030,s.l120,s.l210,s.l300}; // center return boundtri(c,m,f,b,fuzz,depth); } inline void add(std::vector& T, std::vector& U, std::vector& V, double t, double u, double v, const path3& p, double fuzz2) { triple z=p.point(t); size_t n=T.size(); for(size_t i=0; i < n; ++i) if((p.point(T[i])-z).abs2() <= fuzz2) return; T.push_back(t); U.push_back(u); V.push_back(v); } void add(std::vector& T, std::vector& U, std::vector& V, std::vector& T1, std::vector& U1, std::vector& V1, const path3& p, double tscale, double toffset, double uoffset, double voffset, double fuzz2) { size_t n=T1.size(); for(size_t i=0; i < n; ++i) add(T,U,V,tscale*T1[i]+toffset,0.5*U1[i]+uoffset,0.5*V1[i]+voffset,p, fuzz2); } void bounds(triple& Pmin, triple& Pmax, triple *P, double fuzz) { double Px[]={P[0].getx(),P[1].getx(),P[2].getx(),P[3].getx(), P[4].getx(),P[5].getx(),P[6].getx(),P[7].getx(), P[8].getx(),P[9].getx(),P[10].getx(),P[11].getx(), P[12].getx(),P[13].getx(),P[14].getx(),P[15].getx()}; double bx=Px[0]; double xmin=bound(Px,min,bx,fuzz,maxdepth); double xmax=bound(Px,max,bx,fuzz,maxdepth); double Py[]={P[0].gety(),P[1].gety(),P[2].gety(),P[3].gety(), P[4].gety(),P[5].gety(),P[6].gety(),P[7].gety(), P[8].gety(),P[9].gety(),P[10].gety(),P[11].gety(), P[12].gety(),P[13].gety(),P[14].gety(),P[15].gety()}; double by=Py[0]; double ymin=bound(Py,min,by,fuzz,maxdepth); double ymax=bound(Py,max,by,fuzz,maxdepth); double Pz[]={P[0].getz(),P[1].getz(),P[2].getz(),P[3].getz(), P[4].getz(),P[5].getz(),P[6].getz(),P[7].getz(), P[8].getz(),P[9].getz(),P[10].getz(),P[11].getz(), P[12].getz(),P[13].getz(),P[14].getz(),P[15].getz()}; double bz=Pz[0]; double zmin=bound(Pz,min,bz,fuzz,maxdepth); double zmax=bound(Pz,max,bz,fuzz,maxdepth); Pmin=triple(xmin,ymin,zmin); Pmax=triple(xmax,ymax,zmax); } inline double abs2(double x, double y, double z) { return x*x+y*y+z*z; } bool intersections(double& U, double& V, const triple& v, triple *P, double fuzz, unsigned depth) { if(errorstream::interrupt) throw interrupted(); triple Pmin,Pmax; bounds(Pmin,Pmax,P,fuzz); double x=P[0].getx(); double y=P[0].gety(); double z=P[0].getz(); double X=x, Y=y, Z=z; for(int i=1; i < 16; ++i) { triple v=P[i]; double vx=v.getx(); x=min(x,vx); X=max(X,vx); double vy=v.gety(); y=min(y,vy); Y=max(Y,vy); double vz=v.getz(); z=min(z,vz); Z=max(Z,vz); } if(X+fuzz >= v.getx() && Y+fuzz >= v.gety() && Z+fuzz >= v.getz() && v.getx()+fuzz >= x && v.gety()+fuzz >= y && v.getz()+fuzz >= z) { // Overlapping bounding boxes --depth; if(abs2(X-x,Y-y,Z-z) <= fuzz*fuzz || depth == 0) { U=0.5; V=0.5; return true; } // Compute the control points of the four subpatches obtained by splitting // the patch with control points P at u=v=1/2. Split c0(P[0],P[1],P[2],P[3]); Split c1(P[4],P[5],P[6],P[7]); Split c2(P[8],P[9],P[10],P[11]); Split c3(P[12],P[13],P[14],P[15]); Split c4(P[12],P[8],P[4],P[0]); Split c5(c3.m0,c2.m0,c1.m0,c0.m0); Split c6(c3.m3,c2.m3,c1.m3,c0.m3); Split c7(c3.m5,c2.m5,c1.m5,c0.m5); Split c8(c3.m4,c2.m4,c1.m4,c0.m4); Split c9(c3.m2,c2.m2,c1.m2,c0.m2); Split c10(P[15],P[11],P[7],P[3]); // Check all 4 Bezier subpatches. double U1,V1; triple Q0[]={P[0],c0.m0,c0.m3,c0.m5,c4.m2,c5.m2,c6.m2,c7.m2, c4.m4,c5.m4,c6.m4,c7.m4,c4.m5,c5.m5,c6.m5,c7.m5}; if(intersections(U1,V1,v,Q0,fuzz,depth)) { U=0.5*U1; V=0.5*V1; return true; } triple Q1[]={c0.m5,c0.m4,c0.m2,P[3],c7.m2,c8.m2,c9.m2,c10.m2, c7.m4,c8.m4,c9.m4,c10.m4,c7.m5,c8.m5,c9.m5,c10.m5}; if(intersections(U1,V1,v,Q1,fuzz,depth)) { U=0.5*U1; V=0.5*V1+0.5; return true; } triple Q2[]={c7.m5,c8.m5,c9.m5,c10.m5,c7.m3,c8.m3,c9.m3,c10.m3, c7.m0,c8.m0,c9.m0,c10.m0,c3.m5,c3.m4,c3.m2,P[15]}; if(intersections(U1,V1,v,Q2,fuzz,depth)) { U=0.5*U1+0.5; V=0.5*V1+0.5; return true; } triple Q3[]={c4.m5,c5.m5,c6.m5,c7.m5,c4.m3,c5.m3,c6.m3,c7.m3, c4.m0,c5.m0,c6.m0,c7.m0,P[12],c3.m0,c3.m3,c3.m5}; if(intersections(U1,V1,v,Q3,fuzz,depth)) { U=0.5*U1+0.5; V=0.5*V1; return true; } } return false; } bool intersections(std::vector& T, std::vector& U, std::vector& V, path3& p, triple *P, double fuzz, bool single, unsigned depth) { if(errorstream::interrupt) throw interrupted(); triple pmin=p.min(); triple pmax=p.max(); double x=P[0].getx(); double y=P[0].gety(); double z=P[0].getz(); double X=x, Y=y, Z=z; for(int i=1; i < 16; ++i) { triple v=P[i]; double vx=v.getx(); x=min(x,vx); X=max(X,vx); double vy=v.gety(); y=min(y,vy); Y=max(Y,vy); double vz=v.getz(); z=min(z,vz); Z=max(Z,vz); } if(X+fuzz >= pmin.getx() && Y+fuzz >= pmin.gety() && Z+fuzz >= pmin.getz() && pmax.getx()+fuzz >= x && pmax.gety()+fuzz >= y && pmax.getz()+fuzz >= z) { // Overlapping bounding boxes --depth; if(((pmax-pmin).length()+sqrt(abs2(X-x,Y-y,Z-z)) <= fuzz) || depth == 0) { T.push_back(0.5); U.push_back(0.5); V.push_back(0.5); return true; } Int lp=p.length(); path3 p0,p1; p.halve(p0,p1); std::vector T1,U1,V1; double tscale,toffset; double fuzz2=max(fuzzFactor*fuzz,Fuzz); fuzz2=fuzz2*fuzz2; if(lp <= 1) { if(lp == 1) p.halve(p0,p1); if(lp == 0 || p0 == p || p1 == p) { double u,v; if(intersections(u,v,p.point((Int) 0),P,fuzz,depth)) { T1.push_back(0.0); U1.push_back(u); V1.push_back(v); add(T,U,V,T1,U1,V1,p,1.0,0.0,0.0,0.0,fuzz2); } return T1.size() > 0; } tscale=toffset=0.5; } else { Int tp=lp/2; p0=p.subpath(0,tp); p1=p.subpath(tp,lp); toffset=tp; tscale=1.0; } Split c0(P[0],P[1],P[2],P[3]); Split c1(P[4],P[5],P[6],P[7]); Split c2(P[8],P[9],P[10],P[11]); Split c3(P[12],P[13],P[14],P[15]); Split c4(P[12],P[8],P[4],P[0]); Split c5(c3.m0,c2.m0,c1.m0,c0.m0); Split c6(c3.m3,c2.m3,c1.m3,c0.m3); Split c7(c3.m5,c2.m5,c1.m5,c0.m5); Split c8(c3.m4,c2.m4,c1.m4,c0.m4); Split c9(c3.m2,c2.m2,c1.m2,c0.m2); Split c10(P[15],P[11],P[7],P[3]); static size_t maxcount=9; size_t count=0; bool Short=lp == 1; // Check all 4 Bezier subpatches against p0. triple Q0[]={P[0],c0.m0,c0.m3,c0.m5,c4.m2,c5.m2,c6.m2,c7.m2, c4.m4,c5.m4,c6.m4,c7.m4,c4.m5,c5.m5,c6.m5,c7.m5}; if(intersections(T1,U1,V1,p0,Q0,fuzz,single,depth)) { add(T,U,V,T1,U1,V1,p,tscale,0.0,0.0,0.0,fuzz2); if(single || depth <= mindepth) return true; count += T1.size(); if(Short && count > maxcount) return true; } T1.clear(); U1.clear(); V1.clear(); triple Q1[]={c0.m5,c0.m4,c0.m2,P[3],c7.m2,c8.m2,c9.m2,c10.m2, c7.m4,c8.m4,c9.m4,c10.m4,c7.m5,c8.m5,c9.m5,c10.m5}; if(intersections(T1,U1,V1,p0,Q1,fuzz,single,depth)) { add(T,U,V,T1,U1,V1,p,tscale,0.0,0.0,0.5,fuzz2); if(single || depth <= mindepth) return true; count += T1.size(); if(Short && count > maxcount) return true; } T1.clear(); U1.clear(); V1.clear(); triple Q2[]={c7.m5,c8.m5,c9.m5,c10.m5,c7.m3,c8.m3,c9.m3,c10.m3, c7.m0,c8.m0,c9.m0,c10.m0,c3.m5,c3.m4,c3.m2,P[15]}; if(intersections(T1,U1,V1,p0,Q2,fuzz,single,depth)) { add(T,U,V,T1,U1,V1,p,tscale,0.0,0.5,0.5,fuzz2); if(single || depth <= mindepth) return true; count += T1.size(); if(Short && count > maxcount) return true; } T1.clear(); U1.clear(); V1.clear(); triple Q3[]={c4.m5,c5.m5,c6.m5,c7.m5,c4.m3,c5.m3,c6.m3,c7.m3, c4.m0,c5.m0,c6.m0,c7.m0,P[12],c3.m0,c3.m3,c3.m5}; if(intersections(T1,U1,V1,p0,Q3,fuzz,single,depth)) { add(T,U,V,T1,U1,V1,p,tscale,0.0,0.5,0.0,fuzz2); if(single || depth <= mindepth) return true; count += T1.size(); if(Short && count > maxcount) return true; } // Check all 4 Bezier subpatches against p1. T1.clear(); U1.clear(); V1.clear(); if(intersections(T1,U1,V1,p1,Q0,fuzz,single,depth)) { add(T,U,V,T1,U1,V1,p,tscale,toffset,0.0,0.0,fuzz2); if(single || depth <= mindepth) return true; count += T1.size(); if(Short && count > maxcount) return true; } T1.clear(); U1.clear(); V1.clear(); if(intersections(T1,U1,V1,p1,Q1,fuzz,single,depth)) { add(T,U,V,T1,U1,V1,p,tscale,toffset,0.0,0.5,fuzz2); if(single || depth <= mindepth) return true; count += T1.size(); if(Short && count > maxcount) return true; } T1.clear(); U1.clear(); V1.clear(); if(intersections(T1,U1,V1,p1,Q2,fuzz,single,depth)) { add(T,U,V,T1,U1,V1,p,tscale,toffset,0.5,0.5,fuzz2); if(single || depth <= mindepth) return true; count += T1.size(); if(Short && count > maxcount) return true; } T1.clear(); U1.clear(); V1.clear(); if(intersections(T1,U1,V1,p1,Q3,fuzz,single,depth)) { add(T,U,V,T1,U1,V1,p,tscale,toffset,0.5,0.0,fuzz2); if(single || depth <= mindepth) return true; count += T1.size(); if(Short && count > maxcount) return true; } return T.size() > 0; } return false; } } //namespace camp ./asymptote-2.41/coenv.cc0000644000175000017500000000214613064427076015167 0ustar norbertnorbert/***** * coenv.cc * Andy Hammerlindl 2004/11/18 * * Bundles the env and coder classes needed in translating the abstract syntax * tree. It also also implements some functions that involve both the env and * coder, such as implicitCast(). *****/ #include "coenv.h" namespace trans { // Prints out error messages for the cast methods. static inline void castError(position pos, ty *target, ty *source) { em.error(pos); em << "cannot convert \'" << *source << "\' to \'" << *target << "\'"; } static inline bool accessCast(position pos, ty *target, ty *source, access *a, coder& c) { if (a) { a->encode(CALL, pos, c); return true; } else { castError(pos, target, source); return false; } } bool coenv::implicitCast(position pos, ty *target, ty *source) { return accessCast(pos, target, source, e.lookupCast(target, source, symbol::castsym), c); } bool coenv::explicitCast(position pos, ty *target, ty *source) { return accessCast(pos, target, source, e.lookupCast(target, source, symbol::ecastsym), c); } } ./asymptote-2.41/name.h0000644000175000017500000001216713064427076014643 0ustar norbertnorbert/***** * name.h * Andy Hammerlindl 2002/07/14 * * Qualified names (such as x, f, builtin.sin, a.b.c.d, etc.) can be used * either as variables or a type names. This class stores qualified * names used in nameExp and nameTy in the abstract syntax, and * implements the exp and type functions. *****/ #ifndef NAME_H #define NAME_H #include "absyn.h" #include "types.h" #include "frame.h" #include "access.h" namespace trans { class coenv; class varEntry; class tyEntry; } namespace types { class record; } namespace absyntax { using trans::coenv; using trans::action; using types::record; using std::ostream; class name : public absyn { public: name(position pos) : absyn(pos) {} // Helper function - ensures target and source match up, using casting in the // case of a read. Issues errors on failure. void forceEquivalency(action act, coenv &e, types::ty *target, types::ty *source); // Used for determining the type when the context does not establish // the name as a variable or a type. First, the function looks for a // non-function variable fitting the description. If one fits, the // type of the variable is returned. Failing that, the function looks // for a fitting type and returns that. If nothing is found, an // appropriate error is reported and ty_error is returned. // Because this is used only on qualifiers (ie. names to the left of a // dot), it does not look at function variables. // Tacit means that no error messages will be reported to the user. virtual types::ty *getType(coenv &e, bool tacit = false); // Pushes the highest level frame possible onto the stack. Returning // the frame pushed. If no frame can be pushed, returns 0. // NOTE: This duplicates some functionality with getVarEntry. virtual trans::frame *frameTrans(coenv &e); // Helper function for the case where the name is known to be a type. virtual trans::frame *tyFrameTrans(coenv &e) = 0; // Constructs the varEntry part of the tyEntry for the name. Like // getType, this is called on the qualifier, instead of the full name. // This reports no errors, and returns 0 if there is no varEntry to // use. virtual trans::varEntry *getVarEntry(coenv &e) = 0; // As a variable: // Translates the name (much like an expression). virtual void varTrans(action act, coenv &e, types::ty *target) = 0; // Returns the possible variable types. Unlike exp, returns 0 if none // match. virtual types::ty *varGetType(coenv &e) = 0; virtual trans::varEntry *getCallee(coenv &e, types::signature *sig) = 0; // As a type: // Determines the type, as used in a variable declaration. virtual types::ty *typeTrans(coenv &e, bool tacit = false) = 0; // Constructs the tyEntry of the name, needed so that we know the // parent frame for allocating new objects of that type. Reports // errors as typeTrans() does with tacit=false. virtual trans::tyEntry *tyEntryTrans(coenv &e) = 0; virtual void prettyprint(ostream &out, Int indent) = 0; virtual void print(ostream& out) const { out << ""; } virtual symbol getName() = 0; }; inline ostream& operator<< (ostream& out, const name& n) { n.print(out); return out; } class simpleName : public name { symbol id; public: simpleName(position pos, symbol id) : name(pos), id(id) {} trans::varEntry *getVarEntry(coenv &e); // As a variable: void varTrans(action act, coenv &e, types::ty *target); types::ty *varGetType(coenv &); trans::varEntry *getCallee(coenv &e, types::signature *sig); // As a type: types::ty *typeTrans(coenv &e, bool tacit = false); virtual trans::tyEntry *tyEntryTrans(coenv &e); trans::frame *tyFrameTrans(coenv &e); void prettyprint(ostream &out, Int indent); void print(ostream& out) const { out << id; } symbol getName() { return id; } }; class qualifiedName : public name { name *qualifier; symbol id; // Gets the record type associated with the qualifier. Reports an // error and returns null if the type is not a record. record *castToRecord(types::ty *t, bool tacit = false); // Translates as a virtual field, if possible. qt is the type of the // qualifier. Return true if there was a matching virtual field. bool varTransVirtual(action act, coenv &e, types::ty *target, types::ty *qt); // Translates as an ordinary (non-virtual) field of a record, r. void varTransField(action act, coenv &e, types::ty *target, record *r); public: qualifiedName(position pos, name *qualifier, symbol id) : name(pos), qualifier(qualifier), id(id) {} trans::varEntry *getVarEntry(coenv &e); // As a variable: void varTrans(action act, coenv &, types::ty *target); types::ty *varGetType(coenv &); trans::varEntry *getCallee(coenv &e, types::signature *sig); // As a type: types::ty *typeTrans(coenv &e, bool tacit = false); trans::tyEntry *tyEntryTrans(coenv &e); trans::frame *tyFrameTrans(coenv &e); void prettyprint(ostream &out, Int indent); void print(ostream& out) const { out << *qualifier << "." << id; } symbol getName() { return id; } }; } // namespace absyntax #endif ./asymptote-2.41/allsymbols.h0000644000175000017500000004257013064427152016100 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(AND); ADDSYMBOL(Ai); ADDSYMBOL(Ai_deriv); ADDSYMBOL(Ai_deriv_scaled); ADDSYMBOL(Ai_scaled); ADDSYMBOL(AtA); ADDSYMBOL(Bi); ADDSYMBOL(Bi_deriv); ADDSYMBOL(Bi_deriv_scaled); ADDSYMBOL(Bi_scaled); ADDSYMBOL(CLZ); ADDSYMBOL(CTZ); ADDSYMBOL(Ceil); ADDSYMBOL(Chi); ADDSYMBOL(Ci); ADDSYMBOL(Cos); ADDSYMBOL(D); ADDSYMBOL(Degrees); ADDSYMBOL(E); ADDSYMBOL(E1); ADDSYMBOL(E2); ADDSYMBOL(Ei); ADDSYMBOL(Ei3); ADDSYMBOL(F); ADDSYMBOL(FermiDirac); ADDSYMBOL(FermiDirac0); ADDSYMBOL(FermiDirac1); ADDSYMBOL(FermiDirac2); ADDSYMBOL(FermiDirac3Half); ADDSYMBOL(FermiDiracHalf); ADDSYMBOL(FermiDiracInc0); ADDSYMBOL(FermiDiracM1); ADDSYMBOL(FermiDiracMHalf); ADDSYMBOL(Floor); ADDSYMBOL(H3d); ADDSYMBOL(H3d0); ADDSYMBOL(H3d1); ADDSYMBOL(I); ADDSYMBOL(I0); ADDSYMBOL(I0_scaled); ADDSYMBOL(I1); ADDSYMBOL(I1_scaled); ADDSYMBOL(I_scaled); ADDSYMBOL(J); ADDSYMBOL(J0); ADDSYMBOL(J1); ADDSYMBOL(Jn); ADDSYMBOL(K); ADDSYMBOL(K0); ADDSYMBOL(K0_scaled); ADDSYMBOL(K1); ADDSYMBOL(K1_scaled); ADDSYMBOL(K_scaled); ADDSYMBOL(L); ADDSYMBOL(L1); ADDSYMBOL(L2); ADDSYMBOL(L3); ADDSYMBOL(NOT); ADDSYMBOL(OR); ADDSYMBOL(P); ADDSYMBOL(P1); ADDSYMBOL(P2); ADDSYMBOL(P3); ADDSYMBOL(Pl); ADDSYMBOL(Plm); ADDSYMBOL(Q); ADDSYMBOL(Q0); ADDSYMBOL(Q1); ADDSYMBOL(Ql); ADDSYMBOL(RC); ADDSYMBOL(RD); ADDSYMBOL(RF); ADDSYMBOL(RJ); ADDSYMBOL(Round); ADDSYMBOL(Shi); ADDSYMBOL(Si); ADDSYMBOL(Sin); ADDSYMBOL(Tan); ADDSYMBOL(U); ADDSYMBOL(VERSION); ADDSYMBOL(W0); ADDSYMBOL(Wm1); ADDSYMBOL(XOR); ADDSYMBOL(Y); ADDSYMBOL(Y0); ADDSYMBOL(Y1); ADDSYMBOL(Yn); ADDSYMBOL(Z); ADDSYMBOL(_begingroup3); ADDSYMBOL(_cputime); ADDSYMBOL(_draw); ADDSYMBOL(_eval); ADDSYMBOL(_findroot); ADDSYMBOL(_image); ADDSYMBOL(_labelpath); ADDSYMBOL(_projection); ADDSYMBOL(_strokepath); ADDSYMBOL(_texpath); ADDSYMBOL(a); ADDSYMBOL(aCos); ADDSYMBOL(aI); ADDSYMBOL(aR); ADDSYMBOL(aSin); ADDSYMBOL(aTan); ADDSYMBOL(abort); ADDSYMBOL(abs); ADDSYMBOL(acc); ADDSYMBOL(accel); ADDSYMBOL(acos); ADDSYMBOL(acosh); ADDSYMBOL(add); ADDSYMBOL(adjust); ADDSYMBOL(alias); ADDSYMBOL(align); ADDSYMBOL(all); ADDSYMBOL(alpha); ADDSYMBOL(ambient); ADDSYMBOL(angle); ADDSYMBOL(animate); ADDSYMBOL(antialias); ADDSYMBOL(append); ADDSYMBOL(arclength); ADDSYMBOL(arctime); ADDSYMBOL(args); ADDSYMBOL(array); ADDSYMBOL(ascii); ADDSYMBOL(asin); ADDSYMBOL(asinh); ADDSYMBOL(assert); ADDSYMBOL(asydir); ADDSYMBOL(atLeast); ADDSYMBOL(atan); ADDSYMBOL(atan2); ADDSYMBOL(atanh); ADDSYMBOL(atanint); ADDSYMBOL(atbreakpoint); ADDSYMBOL(atexit); ADDSYMBOL(atleast); ADDSYMBOL(atupdate); ADDSYMBOL(axialshade); ADDSYMBOL(azimuth); ADDSYMBOL(b); ADDSYMBOL(background); ADDSYMBOL(basealign); ADDSYMBOL(beginclip); ADDSYMBOL(begingroup); ADDSYMBOL(beta); ADDSYMBOL(bezier); ADDSYMBOL(bezierP); ADDSYMBOL(bezierPP); ADDSYMBOL(bezierPPP); ADDSYMBOL(blend); ADDSYMBOL(breakpoint); ADDSYMBOL(breakpoints); ADDSYMBOL(byte); ADDSYMBOL(c); ADDSYMBOL(c0); ADDSYMBOL(c1); ADDSYMBOL(cbrt); ADDSYMBOL(cd); ADDSYMBOL(cdf_beta_P); ADDSYMBOL(cdf_beta_Pinv); ADDSYMBOL(cdf_beta_Q); ADDSYMBOL(cdf_beta_Qinv); ADDSYMBOL(cdf_binomial_P); ADDSYMBOL(cdf_binomial_Q); ADDSYMBOL(cdf_cauchy_P); ADDSYMBOL(cdf_cauchy_Pinv); ADDSYMBOL(cdf_cauchy_Q); ADDSYMBOL(cdf_cauchy_Qinv); ADDSYMBOL(cdf_chisq_P); ADDSYMBOL(cdf_chisq_Pinv); ADDSYMBOL(cdf_chisq_Q); ADDSYMBOL(cdf_chisq_Qinv); ADDSYMBOL(cdf_exponential_P); ADDSYMBOL(cdf_exponential_Pinv); ADDSYMBOL(cdf_exponential_Q); ADDSYMBOL(cdf_exponential_Qinv); ADDSYMBOL(cdf_exppow_P); ADDSYMBOL(cdf_exppow_Q); ADDSYMBOL(cdf_fdist_P); ADDSYMBOL(cdf_fdist_Pinv); ADDSYMBOL(cdf_fdist_Q); ADDSYMBOL(cdf_fdist_Qinv); ADDSYMBOL(cdf_flat_P); ADDSYMBOL(cdf_flat_Pinv); ADDSYMBOL(cdf_flat_Q); ADDSYMBOL(cdf_flat_Qinv); ADDSYMBOL(cdf_gamma_P); ADDSYMBOL(cdf_gamma_Pinv); ADDSYMBOL(cdf_gamma_Q); ADDSYMBOL(cdf_gamma_Qinv); ADDSYMBOL(cdf_gaussian_P); ADDSYMBOL(cdf_gaussian_Pinv); ADDSYMBOL(cdf_gaussian_Q); ADDSYMBOL(cdf_gaussian_Qinv); ADDSYMBOL(cdf_geometric_P); ADDSYMBOL(cdf_geometric_Q); ADDSYMBOL(cdf_gumbel1_P); ADDSYMBOL(cdf_gumbel1_Pinv); ADDSYMBOL(cdf_gumbel1_Q); ADDSYMBOL(cdf_gumbel1_Qinv); ADDSYMBOL(cdf_gumbel2_P); ADDSYMBOL(cdf_gumbel2_Pinv); ADDSYMBOL(cdf_gumbel2_Q); ADDSYMBOL(cdf_gumbel2_Qinv); ADDSYMBOL(cdf_hypergeometric_P); ADDSYMBOL(cdf_hypergeometric_Q); ADDSYMBOL(cdf_laplace_P); ADDSYMBOL(cdf_laplace_Pinv); ADDSYMBOL(cdf_laplace_Q); ADDSYMBOL(cdf_laplace_Qinv); ADDSYMBOL(cdf_logistic_P); ADDSYMBOL(cdf_logistic_Pinv); ADDSYMBOL(cdf_logistic_Q); ADDSYMBOL(cdf_logistic_Qinv); ADDSYMBOL(cdf_lognormal_P); ADDSYMBOL(cdf_lognormal_Pinv); ADDSYMBOL(cdf_lognormal_Q); ADDSYMBOL(cdf_lognormal_Qinv); ADDSYMBOL(cdf_negative_binomial_P); ADDSYMBOL(cdf_negative_binomial_Q); ADDSYMBOL(cdf_pareto_P); ADDSYMBOL(cdf_pareto_Pinv); ADDSYMBOL(cdf_pareto_Q); ADDSYMBOL(cdf_pareto_Qinv); ADDSYMBOL(cdf_poisson_P); ADDSYMBOL(cdf_poisson_Q); ADDSYMBOL(cdf_rayleigh_P); ADDSYMBOL(cdf_rayleigh_Pinv); ADDSYMBOL(cdf_rayleigh_Q); ADDSYMBOL(cdf_rayleigh_Qinv); ADDSYMBOL(cdf_tdist_P); ADDSYMBOL(cdf_tdist_Pinv); ADDSYMBOL(cdf_tdist_Q); ADDSYMBOL(cdf_tdist_Qinv); ADDSYMBOL(cdf_weibull_P); ADDSYMBOL(cdf_weibull_Pinv); ADDSYMBOL(cdf_weibull_Q); ADDSYMBOL(cdf_weibull_Qinv); ADDSYMBOL(ceil); ADDSYMBOL(center); ADDSYMBOL(change2); ADDSYMBOL(check); ADDSYMBOL(choose); ADDSYMBOL(ci); ADDSYMBOL(clausen); ADDSYMBOL(clear); ADDSYMBOL(clip); ADDSYMBOL(close); ADDSYMBOL(closed); ADDSYMBOL(cmyk); ADDSYMBOL(colatitude); ADDSYMBOL(colorless); ADDSYMBOL(colors); ADDSYMBOL(colorspace); ADDSYMBOL(comment); ADDSYMBOL(complement); ADDSYMBOL(compression); ADDSYMBOL(concat); ADDSYMBOL(conicalP_0); ADDSYMBOL(conicalP_1); ADDSYMBOL(conicalP_cyl_reg); ADDSYMBOL(conicalP_half); ADDSYMBOL(conicalP_mhalf); ADDSYMBOL(conicalP_sph_reg); ADDSYMBOL(conj); ADDSYMBOL(controlSpecifier); ADDSYMBOL(convert); ADDSYMBOL(copy); ADDSYMBOL(cos); ADDSYMBOL(cosh); ADDSYMBOL(coupling_3j); ADDSYMBOL(coupling_6j); ADDSYMBOL(coupling_9j); ADDSYMBOL(cross); ADDSYMBOL(csv); ADDSYMBOL(cubicroots); ADDSYMBOL(curlSpecifier); ADDSYMBOL(currentpen); ADDSYMBOL(cyclic); ADDSYMBOL(d); ADDSYMBOL(data); ADDSYMBOL(dawson); ADDSYMBOL(debye_1); ADDSYMBOL(debye_2); ADDSYMBOL(debye_3); ADDSYMBOL(debye_4); ADDSYMBOL(debye_5); ADDSYMBOL(debye_6); ADDSYMBOL(deconstruct); ADDSYMBOL(defaultpen); ADDSYMBOL(deg); ADDSYMBOL(degrees); ADDSYMBOL(delete); ADDSYMBOL(deletepreamble); ADDSYMBOL(depth); ADDSYMBOL(dest); ADDSYMBOL(determinant); ADDSYMBOL(diagonal); ADDSYMBOL(diffuse); ADDSYMBOL(digits); ADDSYMBOL(dilog); ADDSYMBOL(dimension); ADDSYMBOL(dir); ADDSYMBOL(dirSpecifier); ADDSYMBOL(dirtime); ADDSYMBOL(divisor); ADDSYMBOL(dobreak); ADDSYMBOL(dot); ADDSYMBOL(doublefact); ADDSYMBOL(downcase); ADDSYMBOL(draw); ADDSYMBOL(drawPRCcylinder); ADDSYMBOL(drawPRCdisk); ADDSYMBOL(drawPRCsphere); ADDSYMBOL(drawPRCtube); ADDSYMBOL(drawbeziertriangle); ADDSYMBOL(drawpixel); ADDSYMBOL(dval); ADDSYMBOL(dxmax); ADDSYMBOL(e); ADDSYMBOL(edges); ADDSYMBOL(embedded); ADDSYMBOL(empty); ADDSYMBOL(endclip); ADDSYMBOL(endgroup); ADDSYMBOL(endgroup3); ADDSYMBOL(eof); ADDSYMBOL(eol); ADDSYMBOL(epsilon); ADDSYMBOL(erase); ADDSYMBOL(erf); ADDSYMBOL(erf_Q); ADDSYMBOL(erf_Z); ADDSYMBOL(erfc); ADDSYMBOL(error); ADDSYMBOL(eta); ADDSYMBOL(exit); ADDSYMBOL(exp); ADDSYMBOL(exp_mult); ADDSYMBOL(expi); ADDSYMBOL(expm1); ADDSYMBOL(exprel); ADDSYMBOL(exprel_2); ADDSYMBOL(extenda); ADDSYMBOL(extendb); ADDSYMBOL(extension); ADDSYMBOL(f); ADDSYMBOL(fa); ADDSYMBOL(fabs); ADDSYMBOL(fact); ADDSYMBOL(factorial); ADDSYMBOL(fb); ADDSYMBOL(fcmp); ADDSYMBOL(fft); ADDSYMBOL(file); ADDSYMBOL(fill); ADDSYMBOL(fillrule); ADDSYMBOL(final); ADDSYMBOL(find); ADDSYMBOL(floor); ADDSYMBOL(flush); ADDSYMBOL(fmod); ADDSYMBOL(font); ADDSYMBOL(fontcommand); ADDSYMBOL(fontsize); ADDSYMBOL(format); ADDSYMBOL(fprime); ADDSYMBOL(from); ADDSYMBOL(functionshade); ADDSYMBOL(fuzz); ADDSYMBOL(g); ADDSYMBOL(gamma); ADDSYMBOL(gamma_P); ADDSYMBOL(gamma_Q); ADDSYMBOL(gammainv); ADDSYMBOL(gammastar); ADDSYMBOL(gegenpoly); ADDSYMBOL(gegenpoly_1); ADDSYMBOL(gegenpoly_2); ADDSYMBOL(gegenpoly_3); ADDSYMBOL(generate_random_backtrace); ADDSYMBOL(getc); ADDSYMBOL(gouraudshade); ADDSYMBOL(granularity); ADDSYMBOL(gray); ADDSYMBOL(grestore); ADDSYMBOL(gsave); ADDSYMBOL(gsl); ADDSYMBOL(half); ADDSYMBOL(hazard); ADDSYMBOL(height); ADDSYMBOL(hex); ADDSYMBOL(history); ADDSYMBOL(hy0F1); ADDSYMBOL(hy1F1); ADDSYMBOL(hy2F0); ADDSYMBOL(hy2F1); ADDSYMBOL(hy2F1_conj); ADDSYMBOL(hy2F1_conj_renorm); ADDSYMBOL(hy2F1_renorm); ADDSYMBOL(hydrogenicR); ADDSYMBOL(hydrogenicR_1); ADDSYMBOL(hypot); ADDSYMBOL(hzeta); ADDSYMBOL(i); ADDSYMBOL(i0_scaled); ADDSYMBOL(i1_scaled); ADDSYMBOL(i2_scaled); ADDSYMBOL(i_scaled); ADDSYMBOL(identity); ADDSYMBOL(imports); ADDSYMBOL(in); ADDSYMBOL(incircle); ADDSYMBOL(inf); ADDSYMBOL(infinity); ADDSYMBOL(initial); ADDSYMBOL(initialized); ADDSYMBOL(input); ADDSYMBOL(insert); ADDSYMBOL(inside); ADDSYMBOL(insphere); ADDSYMBOL(intMax); ADDSYMBOL(intMin); ADDSYMBOL(interaction); ADDSYMBOL(interactive); ADDSYMBOL(interactivewrite); ADDSYMBOL(interp); ADDSYMBOL(intersect); ADDSYMBOL(intersections); ADDSYMBOL(inverse); ADDSYMBOL(invisible); ADDSYMBOL(is3D); ADDSYMBOL(isnan); ADDSYMBOL(iterations); ADDSYMBOL(j); ADDSYMBOL(j0); ADDSYMBOL(j1); ADDSYMBOL(j2); ADDSYMBOL(justify); ADDSYMBOL(k); ADDSYMBOL(k0_scaled); ADDSYMBOL(k1_scaled); ADDSYMBOL(k2_scaled); ADDSYMBOL(k_scaled); ADDSYMBOL(key); ADDSYMBOL(keys); ADDSYMBOL(knot); ADDSYMBOL(l); ADDSYMBOL(label); ADDSYMBOL(labels); ADDSYMBOL(lambda); ADDSYMBOL(latex); ADDSYMBOL(latitude); ADDSYMBOL(latticeshade); ADDSYMBOL(layer); ADDSYMBOL(ldexp); ADDSYMBOL(length); ADDSYMBOL(less); ADDSYMBOL(lights); ADDSYMBOL(line); ADDSYMBOL(linecap); ADDSYMBOL(linejoin); ADDSYMBOL(lineskip); ADDSYMBOL(linetype); ADDSYMBOL(linewidth); ADDSYMBOL(list); ADDSYMBOL(lnK); ADDSYMBOL(lnbeta); ADDSYMBOL(lnchoose); ADDSYMBOL(lncosh); ADDSYMBOL(lndoublefact); ADDSYMBOL(lnfact); ADDSYMBOL(lngamma); ADDSYMBOL(lnpoch); ADDSYMBOL(lnsinh); ADDSYMBOL(locale); ADDSYMBOL(locatefile); ADDSYMBOL(location); ADDSYMBOL(log); ADDSYMBOL(log10); ADDSYMBOL(log1p); ADDSYMBOL(log1pm); ADDSYMBOL(log_erfc); ADDSYMBOL(logabs); ADDSYMBOL(longitude); ADDSYMBOL(m); ADDSYMBOL(magnification); ADDSYMBOL(makepen); ADDSYMBOL(map); ADDSYMBOL(max); ADDSYMBOL(max3); ADDSYMBOL(maxAfterTransform); ADDSYMBOL(maxbezier); ADDSYMBOL(maxbound); ADDSYMBOL(maxratio); ADDSYMBOL(maxtimes); ADDSYMBOL(method); ADDSYMBOL(microseconds); ADDSYMBOL(min); ADDSYMBOL(min3); ADDSYMBOL(minAfterTransform); ADDSYMBOL(minbezier); ADDSYMBOL(minbound); ADDSYMBOL(minratio); ADDSYMBOL(mintimes); ADDSYMBOL(miterlimit); ADDSYMBOL(mktemp); ADDSYMBOL(mode); ADDSYMBOL(mu); ADDSYMBOL(n); ADDSYMBOL(n1); ADDSYMBOL(n2); ADDSYMBOL(name); ADDSYMBOL(nan); ADDSYMBOL(nativeformat); ADDSYMBOL(newpage); ADDSYMBOL(newton); ADDSYMBOL(ni); ADDSYMBOL(nib); ADDSYMBOL(nobreak); ADDSYMBOL(norm); ADDSYMBOL(normalize); ADDSYMBOL(nowarn); ADDSYMBOL(nu); ADDSYMBOL(nu1); ADDSYMBOL(nu2); ADDSYMBOL(nurb); ADDSYMBOL(nx); ADDSYMBOL(ny); ADDSYMBOL(nz); ADDSYMBOL(offset); ADDSYMBOL(opacity); ADDSYMBOL(orient); ADDSYMBOL(out); ADDSYMBOL(outname); ADDSYMBOL(output); ADDSYMBOL(overwrite); ADDSYMBOL(p); ADDSYMBOL(palette); ADDSYMBOL(path3); ADDSYMBOL(pattern); ADDSYMBOL(pdf); ADDSYMBOL(pdf_bernoulli); ADDSYMBOL(pdf_beta); ADDSYMBOL(pdf_binomial); ADDSYMBOL(pdf_bivariate_gaussian); ADDSYMBOL(pdf_cauchy); ADDSYMBOL(pdf_chisq); ADDSYMBOL(pdf_dirichlet); ADDSYMBOL(pdf_exponential); ADDSYMBOL(pdf_exppow); ADDSYMBOL(pdf_fdist); ADDSYMBOL(pdf_flat); ADDSYMBOL(pdf_gamma); ADDSYMBOL(pdf_gaussian); ADDSYMBOL(pdf_gaussian_tail); ADDSYMBOL(pdf_geometric); ADDSYMBOL(pdf_gumbel1); ADDSYMBOL(pdf_gumbel2); ADDSYMBOL(pdf_hypergeometric); ADDSYMBOL(pdf_landau); ADDSYMBOL(pdf_laplace); ADDSYMBOL(pdf_logarithmic); ADDSYMBOL(pdf_logistic); ADDSYMBOL(pdf_lognormal); ADDSYMBOL(pdf_multinomial); ADDSYMBOL(pdf_negative_binomial); ADDSYMBOL(pdf_pareto); ADDSYMBOL(pdf_poisson); ADDSYMBOL(pdf_rayleigh); ADDSYMBOL(pdf_rayleigh_tail); ADDSYMBOL(pdf_tdist); ADDSYMBOL(pdf_weibull); ADDSYMBOL(pena); ADDSYMBOL(penb); ADDSYMBOL(perm); ADDSYMBOL(perp); ADDSYMBOL(phi); ADDSYMBOL(pi); ADDSYMBOL(piecewisestraight); ADDSYMBOL(poch); ADDSYMBOL(pochrel); ADDSYMBOL(point); ADDSYMBOL(polar); ADDSYMBOL(pop); ADDSYMBOL(pos); ADDSYMBOL(position); ADDSYMBOL(post); ADDSYMBOL(postcontrol); ADDSYMBOL(postscript); ADDSYMBOL(pow); ADDSYMBOL(pow10); ADDSYMBOL(prc); ADDSYMBOL(prcshininess); ADDSYMBOL(pre); ADDSYMBOL(preamble); ADDSYMBOL(precision); ADDSYMBOL(precontrol); ADDSYMBOL(prefix); ADDSYMBOL(prepend); ADDSYMBOL(printBytecode); ADDSYMBOL(print_random_addresses); ADDSYMBOL(project); ADDSYMBOL(prompt); ADDSYMBOL(psi); ADDSYMBOL(psi1); ADDSYMBOL(psi_1piy); ADDSYMBOL(purge); ADDSYMBOL(push); ADDSYMBOL(q); ADDSYMBOL(quadraticroots); ADDSYMBOL(quotient); ADDSYMBOL(r); ADDSYMBOL(ra); ADDSYMBOL(radialshade); ADDSYMBOL(radians); ADDSYMBOL(radius); ADDSYMBOL(rand); ADDSYMBOL(randMax); ADDSYMBOL(rb); ADDSYMBOL(read); ADDSYMBOL(readline); ADDSYMBOL(realDigits); ADDSYMBOL(realEpsilon); ADDSYMBOL(realMax); ADDSYMBOL(realMin); ADDSYMBOL(realmult); ADDSYMBOL(reflect); ADDSYMBOL(relativedistance); ADDSYMBOL(remainder); ADDSYMBOL(rename); ADDSYMBOL(replace); ADDSYMBOL(resetdefaultpen); ADDSYMBOL(reverse); ADDSYMBOL(rfind); ADDSYMBOL(rgb); ADDSYMBOL(rho); ADDSYMBOL(rng_bernoulli); ADDSYMBOL(rng_beta); ADDSYMBOL(rng_binomial); ADDSYMBOL(rng_bivariate_gaussian); ADDSYMBOL(rng_cauchy); ADDSYMBOL(rng_chisq); ADDSYMBOL(rng_dir); ADDSYMBOL(rng_dir2d); ADDSYMBOL(rng_dir3d); ADDSYMBOL(rng_dirichlet); ADDSYMBOL(rng_exponential); ADDSYMBOL(rng_exppow); ADDSYMBOL(rng_fdist); ADDSYMBOL(rng_flat); ADDSYMBOL(rng_gamma); ADDSYMBOL(rng_gaussian); ADDSYMBOL(rng_gaussian_tail); ADDSYMBOL(rng_geometric); ADDSYMBOL(rng_get); ADDSYMBOL(rng_gumbel1); ADDSYMBOL(rng_gumbel2); ADDSYMBOL(rng_hypergeometric); ADDSYMBOL(rng_init); ADDSYMBOL(rng_landau); ADDSYMBOL(rng_laplace); ADDSYMBOL(rng_levy); ADDSYMBOL(rng_list); ADDSYMBOL(rng_logarithmic); ADDSYMBOL(rng_logistic); ADDSYMBOL(rng_lognormal); ADDSYMBOL(rng_max); ADDSYMBOL(rng_min); ADDSYMBOL(rng_multinomial); ADDSYMBOL(rng_name); ADDSYMBOL(rng_negative_binomial); ADDSYMBOL(rng_pareto); ADDSYMBOL(rng_poisson); ADDSYMBOL(rng_rayleigh); ADDSYMBOL(rng_rayleigh_tail); ADDSYMBOL(rng_set); ADDSYMBOL(rng_tdist); ADDSYMBOL(rng_uniform); ADDSYMBOL(rng_uniform_int); ADDSYMBOL(rng_uniform_pos); ADDSYMBOL(rng_weibull); ADDSYMBOL(rotate); ADDSYMBOL(round); ADDSYMBOL(s); ADDSYMBOL(saveline); ADDSYMBOL(scale); ADDSYMBOL(search); ADDSYMBOL(seconds); ADDSYMBOL(seed); ADDSYMBOL(seek); ADDSYMBOL(seekeof); ADDSYMBOL(separator); ADDSYMBOL(sequence); ADDSYMBOL(sgn); ADDSYMBOL(shader); ADDSYMBOL(shift); ADDSYMBOL(shiftless); ADDSYMBOL(shininess); ADDSYMBOL(shipout); ADDSYMBOL(shipout3); ADDSYMBOL(side); ADDSYMBOL(sigma); ADDSYMBOL(sign); ADDSYMBOL(signedint); ADDSYMBOL(simpson); ADDSYMBOL(sin); ADDSYMBOL(sinc); ADDSYMBOL(singleint); ADDSYMBOL(singlereal); ADDSYMBOL(sinh); ADDSYMBOL(size); ADDSYMBOL(size3); ADDSYMBOL(slant); ADDSYMBOL(sleep); ADDSYMBOL(sncndn); ADDSYMBOL(solve); ADDSYMBOL(sort); ADDSYMBOL(spec); ADDSYMBOL(specular); ADDSYMBOL(sphPlm); ADDSYMBOL(sqrt); ADDSYMBOL(srand); ADDSYMBOL(src); ADDSYMBOL(stop); ADDSYMBOL(store); ADDSYMBOL(straight); ADDSYMBOL(straightness); ADDSYMBOL(string); ADDSYMBOL(stripdirectory); ADDSYMBOL(stripextension); ADDSYMBOL(stripfile); ADDSYMBOL(stroke); ADDSYMBOL(subpath); ADDSYMBOL(substr); ADDSYMBOL(suffix); ADDSYMBOL(sum); ADDSYMBOL(synchrotron_1); ADDSYMBOL(synchrotron_2); ADDSYMBOL(system); ADDSYMBOL(t); ADDSYMBOL(tabcompletion); ADDSYMBOL(tan); ADDSYMBOL(tanh); ADDSYMBOL(taylorcoeff); ADDSYMBOL(tell); ADDSYMBOL(tensionSpecifier); ADDSYMBOL(tensorshade); ADDSYMBOL(tessellate); ADDSYMBOL(tex); ADDSYMBOL(texpreamble); ADDSYMBOL(texreset); ADDSYMBOL(texsize); ADDSYMBOL(textpath); ADDSYMBOL(theta); ADDSYMBOL(time); ADDSYMBOL(tin); ADDSYMBOL(to); ADDSYMBOL(tok); ADDSYMBOL(tolerance); ADDSYMBOL(tout); ADDSYMBOL(transform); ADDSYMBOL(translate); ADDSYMBOL(transport_2); ADDSYMBOL(transport_3); ADDSYMBOL(transport_4); ADDSYMBOL(transport_5); ADDSYMBOL(transpose); ADDSYMBOL(triangulate); ADDSYMBOL(tridiagonal); ADDSYMBOL(two_ja); ADDSYMBOL(two_jb); ADDSYMBOL(two_jc); ADDSYMBOL(two_jd); ADDSYMBOL(two_je); ADDSYMBOL(two_jf); ADDSYMBOL(two_jg); ADDSYMBOL(two_jh); ADDSYMBOL(two_ji); ADDSYMBOL(two_ma); ADDSYMBOL(two_mb); ADDSYMBOL(two_mc); ADDSYMBOL(type); ADDSYMBOL(u); ADDSYMBOL(uknot); ADDSYMBOL(unit); ADDSYMBOL(unitrand); ADDSYMBOL(unstraighten); ADDSYMBOL(upcase); ADDSYMBOL(update); ADDSYMBOL(uptodate); ADDSYMBOL(usleep); ADDSYMBOL(v); ADDSYMBOL(value); ADDSYMBOL(verbose); ADDSYMBOL(vi); ADDSYMBOL(view); ADDSYMBOL(viewportlighting); ADDSYMBOL(vknot); ADDSYMBOL(w); ADDSYMBOL(w0); ADDSYMBOL(w1); ADDSYMBOL(w2); ADDSYMBOL(w3); ADDSYMBOL(wait); ADDSYMBOL(warn); ADDSYMBOL(warning); ADDSYMBOL(weights); ADDSYMBOL(width); ADDSYMBOL(windingnumber); ADDSYMBOL(word); ADDSYMBOL(write); ADDSYMBOL(x); ADDSYMBOL(x1); ADDSYMBOL(x2); ADDSYMBOL(xform); ADDSYMBOL(xpart); ADDSYMBOL(xscale); ADDSYMBOL(xx); ADDSYMBOL(xy); ADDSYMBOL(y); ADDSYMBOL(y0); ADDSYMBOL(y1); ADDSYMBOL(y2); ADDSYMBOL(ypart); ADDSYMBOL(yscale); ADDSYMBOL(yx); ADDSYMBOL(yy); ADDSYMBOL(z); ADDSYMBOL(z0); ADDSYMBOL(z1); ADDSYMBOL(z2); ADDSYMBOL(z3); ADDSYMBOL(zero_Ai); ADDSYMBOL(zero_Ai_deriv); ADDSYMBOL(zero_Bi); ADDSYMBOL(zero_Bi_deriv); ADDSYMBOL(zero_J); ADDSYMBOL(zero_J0); ADDSYMBOL(zero_J1); ADDSYMBOL(zeta); ADDSYMBOL(zetam1); ADDSYMBOL(zin); ADDSYMBOL(zoom); ADDSYMBOL(zout); ADDSYMBOL(zpart); ./asymptote-2.41/camp.tab.cc0000644000175000017500000037153313064427112015542 0ustar norbertnorbert/* A Bison parser, made by GNU Bison 3.0.4. */ /* Bison implementation for Yacc-like parsers in C Copyright (C) 1984, 1989-1990, 2000-2015 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ /* As a special exception, you may create a larger work that contains part or all of the Bison parser skeleton and distribute that work under terms of your choice, so long as that work isn't itself a parser generator using the skeleton or a modified version thereof as a parser skeleton. Alternatively, if you modify or redistribute the parser skeleton itself, you may (at your option) remove this special exception, which will cause the skeleton and the resulting Bison output files to be licensed under the GNU General Public License without this special exception. This special exception was added by the Free Software Foundation in version 2.2 of Bison. */ /* C LALR(1) parser skeleton written by Richard Stallman, by simplifying the original so-called "semantic" parser. */ /* All symbols defined below should begin with yy or YY, to avoid infringing on user name space. This should be done even for local variables, as they might otherwise be expanded by user macros. There are some unavoidable exceptions within include files to define necessary library symbols; they are noted "INFRINGES ON USER NAME SPACE" below. */ /* Identify Bison output. */ #define YYBISON 1 /* Bison version. */ #define YYBISON_VERSION "3.0.4" /* Skeleton name. */ #define YYSKELETON_NAME "yacc.c" /* Pure parsers. */ #define YYPURE 0 /* Push parsers. */ #define YYPUSH 0 /* Pull parsers. */ #define YYPULL 1 /* Copy the first part of user declarations. */ #line 1 "camp.y" /* yacc.c:339 */ /***** * camp.y * Andy Hammerlindl 08/12/2002 * * The grammar of the camp language. *****/ #include "errormsg.h" #include "exp.h" #include "newexp.h" #include "dec.h" #include "fundec.h" #include "stm.h" #include "modifier.h" #include "opsymbols.h" // Avoid error messages with unpatched bison-1.875: #ifndef __attribute__ #define __attribute__(x) #endif // Used when a position needs to be determined and no token is // available. Defined in camp.l. position lexerPos(); bool lexerEOF(); int yylex(void); /* function prototype */ void yyerror(const char *s) { if (!lexerEOF()) { em.error(lexerPos()); em << s; em.cont(); } } // Check if the symbol given is "keyword". Returns true in this case and // returns false and reports an error otherwise. bool checkKeyword(position pos, symbol sym) { if (sym != symbol::trans("keyword")) { em.error(pos); em << "expected 'keyword' here"; return false; } return true; } namespace absyntax { file *root; } using namespace absyntax; using sym::symbol; using mem::string; #line 125 "camp.tab.c" /* yacc.c:339 */ # ifndef YY_NULLPTR # if defined __cplusplus && 201103L <= __cplusplus # define YY_NULLPTR nullptr # else # define YY_NULLPTR 0 # endif # endif /* Enabling verbose error messages. */ #ifdef YYERROR_VERBOSE # undef YYERROR_VERBOSE # define YYERROR_VERBOSE 1 #else # define YYERROR_VERBOSE 0 #endif /* In a future release of Bison, this section will be replaced by #include "camp.tab.h". */ #ifndef YY_YY_CAMP_TAB_H_INCLUDED # define YY_YY_CAMP_TAB_H_INCLUDED /* Debug traces. */ #ifndef YYDEBUG # define YYDEBUG 1 #endif #if YYDEBUG extern int yydebug; #endif /* Token type. */ #ifndef YYTOKENTYPE # define YYTOKENTYPE enum yytokentype { ID = 258, SELFOP = 259, DOTS = 260, COLONS = 261, DASHES = 262, INCR = 263, LONGDASH = 264, CONTROLS = 265, TENSION = 266, ATLEAST = 267, CURL = 268, COR = 269, CAND = 270, BAR = 271, AMPERSAND = 272, EQ = 273, NEQ = 274, LT = 275, LE = 276, GT = 277, GE = 278, CARETS = 279, OPERATOR = 280, LOOSE = 281, ASSIGN = 282, DIRTAG = 283, JOIN_PREC = 284, AND = 285, ELLIPSIS = 286, ACCESS = 287, UNRAVEL = 288, IMPORT = 289, INCLUDE = 290, FROM = 291, QUOTE = 292, STRUCT = 293, TYPEDEF = 294, NEW = 295, IF = 296, ELSE = 297, WHILE = 298, DO = 299, FOR = 300, BREAK = 301, CONTINUE = 302, RETURN_ = 303, THIS = 304, EXPLICIT = 305, GARBAGE = 306, LIT = 307, STRING = 308, PERM = 309, MODIFIER = 310, UNARY = 311, EXP_IN_PARENS_RULE = 312 }; #endif /* Value type. */ #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED union YYSTYPE { #line 60 "camp.y" /* yacc.c:355 */ position pos; bool boo; struct { position pos; sym::symbol sym; } ps; absyntax::name *n; absyntax::varinit *vi; absyntax::arrayinit *ai; absyntax::exp *e; absyntax::stringExp *stre; absyntax::specExp *se; absyntax::joinExp *j; absyntax::explist *elist; absyntax::argument arg; absyntax::arglist *alist; absyntax::slice *slice; absyntax::dimensions *dim; absyntax::ty *t; absyntax::decid *di; absyntax::decidlist *dil; absyntax::decidstart *dis; absyntax::runnable *run; struct { position pos; trans::permission val; } perm; struct { position pos; trans::modifier val; } mod; absyntax::modifierList *ml; //absyntax::program *prog; absyntax::vardec *vd; //absyntax::vardecs *vds; absyntax::dec *d; absyntax::idpair *ip; absyntax::idpairlist *ipl; absyntax::stm *s; absyntax::block *b; absyntax::stmExpList *sel; //absyntax::funheader *fh; absyntax::formal *fl; absyntax::formals *fls; #line 270 "camp.tab.c" /* yacc.c:355 */ }; typedef union YYSTYPE YYSTYPE; # define YYSTYPE_IS_TRIVIAL 1 # define YYSTYPE_IS_DECLARED 1 #endif extern YYSTYPE yylval; int yyparse (void); #endif /* !YY_YY_CAMP_TAB_H_INCLUDED */ /* Copy the second part of user declarations. */ #line 287 "camp.tab.c" /* yacc.c:358 */ #ifdef short # undef short #endif #ifdef YYTYPE_UINT8 typedef YYTYPE_UINT8 yytype_uint8; #else typedef unsigned char yytype_uint8; #endif #ifdef YYTYPE_INT8 typedef YYTYPE_INT8 yytype_int8; #else typedef signed char yytype_int8; #endif #ifdef YYTYPE_UINT16 typedef YYTYPE_UINT16 yytype_uint16; #else typedef unsigned short int yytype_uint16; #endif #ifdef YYTYPE_INT16 typedef YYTYPE_INT16 yytype_int16; #else typedef short int yytype_int16; #endif #ifndef YYSIZE_T # ifdef __SIZE_TYPE__ # define YYSIZE_T __SIZE_TYPE__ # elif defined size_t # define YYSIZE_T size_t # elif ! defined YYSIZE_T # include /* INFRINGES ON USER NAME SPACE */ # define YYSIZE_T size_t # else # define YYSIZE_T unsigned int # endif #endif #define YYSIZE_MAXIMUM ((YYSIZE_T) -1) #ifndef YY_ # if defined YYENABLE_NLS && YYENABLE_NLS # if ENABLE_NLS # include /* INFRINGES ON USER NAME SPACE */ # define YY_(Msgid) dgettext ("bison-runtime", Msgid) # endif # endif # ifndef YY_ # define YY_(Msgid) Msgid # endif #endif #ifndef YY_ATTRIBUTE # if (defined __GNUC__ \ && (2 < __GNUC__ || (__GNUC__ == 2 && 96 <= __GNUC_MINOR__))) \ || defined __SUNPRO_C && 0x5110 <= __SUNPRO_C # define YY_ATTRIBUTE(Spec) __attribute__(Spec) # else # define YY_ATTRIBUTE(Spec) /* empty */ # endif #endif #ifndef YY_ATTRIBUTE_PURE # define YY_ATTRIBUTE_PURE YY_ATTRIBUTE ((__pure__)) #endif #ifndef YY_ATTRIBUTE_UNUSED # define YY_ATTRIBUTE_UNUSED YY_ATTRIBUTE ((__unused__)) #endif #if !defined _Noreturn \ && (!defined __STDC_VERSION__ || __STDC_VERSION__ < 201112) # if defined _MSC_VER && 1200 <= _MSC_VER # define _Noreturn __declspec (noreturn) # else # define _Noreturn YY_ATTRIBUTE ((__noreturn__)) # endif #endif /* Suppress unused-variable warnings by "using" E. */ #if ! defined lint || defined __GNUC__ # define YYUSE(E) ((void) (E)) #else # define YYUSE(E) /* empty */ #endif #if defined __GNUC__ && 407 <= __GNUC__ * 100 + __GNUC_MINOR__ /* Suppress an incorrect diagnostic about yylval being uninitialized. */ # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \ _Pragma ("GCC diagnostic push") \ _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")\ _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"") # define YY_IGNORE_MAYBE_UNINITIALIZED_END \ _Pragma ("GCC diagnostic pop") #else # define YY_INITIAL_VALUE(Value) Value #endif #ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN # define YY_IGNORE_MAYBE_UNINITIALIZED_END #endif #ifndef YY_INITIAL_VALUE # define YY_INITIAL_VALUE(Value) /* Nothing. */ #endif #if ! defined yyoverflow || YYERROR_VERBOSE /* The parser invokes alloca or malloc; define the necessary symbols. */ # ifdef YYSTACK_USE_ALLOCA # if YYSTACK_USE_ALLOCA # ifdef __GNUC__ # define YYSTACK_ALLOC __builtin_alloca # elif defined __BUILTIN_VA_ARG_INCR # include /* INFRINGES ON USER NAME SPACE */ # elif defined _AIX # define YYSTACK_ALLOC __alloca # elif defined _MSC_VER # include /* INFRINGES ON USER NAME SPACE */ # define alloca _alloca # else # define YYSTACK_ALLOC alloca # if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS # include /* INFRINGES ON USER NAME SPACE */ /* Use EXIT_SUCCESS as a witness for stdlib.h. */ # ifndef EXIT_SUCCESS # define EXIT_SUCCESS 0 # endif # endif # endif # endif # endif # ifdef YYSTACK_ALLOC /* Pacify GCC's 'empty if-body' warning. */ # define YYSTACK_FREE(Ptr) do { /* empty */; } while (0) # ifndef YYSTACK_ALLOC_MAXIMUM /* The OS might guarantee only one guard page at the bottom of the stack, and a page size can be as small as 4096 bytes. So we cannot safely invoke alloca (N) if N exceeds 4096. Use a slightly smaller number to allow for a few compiler-allocated temporary stack slots. */ # define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2006 */ # endif # else # define YYSTACK_ALLOC YYMALLOC # define YYSTACK_FREE YYFREE # ifndef YYSTACK_ALLOC_MAXIMUM # define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM # endif # if (defined __cplusplus && ! defined EXIT_SUCCESS \ && ! ((defined YYMALLOC || defined malloc) \ && (defined YYFREE || defined free))) # include /* INFRINGES ON USER NAME SPACE */ # ifndef EXIT_SUCCESS # define EXIT_SUCCESS 0 # endif # endif # ifndef YYMALLOC # define YYMALLOC malloc # if ! defined malloc && ! defined EXIT_SUCCESS void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */ # endif # endif # ifndef YYFREE # define YYFREE free # if ! defined free && ! defined EXIT_SUCCESS void free (void *); /* INFRINGES ON USER NAME SPACE */ # endif # endif # endif #endif /* ! defined yyoverflow || YYERROR_VERBOSE */ #if (! defined yyoverflow \ && (! defined __cplusplus \ || (defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL))) /* A type that is properly aligned for any stack member. */ union yyalloc { yytype_int16 yyss_alloc; YYSTYPE yyvs_alloc; }; /* The size of the maximum gap between one aligned stack and the next. */ # define YYSTACK_GAP_MAXIMUM (sizeof (union yyalloc) - 1) /* The size of an array large to enough to hold all stacks, each with N elements. */ # define YYSTACK_BYTES(N) \ ((N) * (sizeof (yytype_int16) + sizeof (YYSTYPE)) \ + YYSTACK_GAP_MAXIMUM) # define YYCOPY_NEEDED 1 /* Relocate STACK from its old location to the new one. The local variables YYSIZE and YYSTACKSIZE give the old and new number of elements in the stack, and YYPTR gives the new location of the stack. Advance YYPTR to a properly aligned location for the next stack. */ # define YYSTACK_RELOCATE(Stack_alloc, Stack) \ do \ { \ YYSIZE_T yynewbytes; \ YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \ Stack = &yyptr->Stack_alloc; \ yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \ yyptr += yynewbytes / sizeof (*yyptr); \ } \ while (0) #endif #if defined YYCOPY_NEEDED && YYCOPY_NEEDED /* Copy COUNT objects from SRC to DST. The source and destination do not overlap. */ # ifndef YYCOPY # if defined __GNUC__ && 1 < __GNUC__ # define YYCOPY(Dst, Src, Count) \ __builtin_memcpy (Dst, Src, (Count) * sizeof (*(Src))) # else # define YYCOPY(Dst, Src, Count) \ do \ { \ YYSIZE_T yyi; \ for (yyi = 0; yyi < (Count); yyi++) \ (Dst)[yyi] = (Src)[yyi]; \ } \ while (0) # endif # endif #endif /* !YYCOPY_NEEDED */ /* YYFINAL -- State number of the termination state. */ #define YYFINAL 3 /* YYLAST -- Last index in YYTABLE. */ #define YYLAST 1979 /* YYNTOKENS -- Number of terminals. */ #define YYNTOKENS 76 /* YYNNTS -- Number of nonterminals. */ #define YYNNTS 50 /* YYNRULES -- Number of rules. */ #define YYNRULES 200 /* YYNSTATES -- Number of states. */ #define YYNSTATES 376 /* YYTRANSLATE[YYX] -- Symbol number corresponding to YYX as returned by yylex, with out-of-bounds checking. */ #define YYUNDEFTOK 2 #define YYMAXUTOK 312 #define YYTRANSLATE(YYX) \ ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) /* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM as returned by yylex, without out-of-bounds checking. */ static const yytype_uint8 yytranslate[] = { 0, 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, 30, 2, 29, 2, 2, 42, 43, 27, 25, 45, 26, 44, 28, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 36, 48, 2, 2, 2, 35, 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, 46, 2, 47, 31, 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, 40, 2, 41, 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, 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, 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, 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, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 32, 33, 34, 37, 38, 39, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75 }; #if YYDEBUG /* YYRLINE[YYN] -- Source line where rule number YYN was defined. */ static const yytype_uint16 yyrline[] = { 0, 191, 191, 195, 196, 201, 202, 207, 208, 209, 214, 215, 216, 218, 223, 224, 225, 227, 232, 233, 234, 235, 237, 239, 241, 242, 244, 246, 248, 249, 254, 256, 260, 261, 266, 267, 272, 274, 278, 279, 284, 288, 292, 293, 297, 301, 302, 306, 307, 312, 313, 318, 319, 324, 325, 326, 328, 333, 334, 338, 343, 344, 346, 348, 353, 354, 355, 359, 361, 366, 367, 368, 370, 375, 376, 380, 382, 384, 387, 390, 396, 398, 403, 404, 408, 409, 410, 411, 415, 416, 418, 419, 421, 422, 425, 429, 430, 432, 434, 436, 440, 441, 445, 446, 448, 450, 456, 457, 461, 462, 463, 464, 466, 467, 469, 471, 473, 475, 476, 477, 478, 479, 480, 481, 482, 483, 484, 485, 486, 487, 488, 489, 490, 491, 492, 493, 494, 495, 496, 498, 500, 502, 504, 506, 508, 513, 515, 520, 522, 523, 524, 526, 532, 534, 537, 539, 540, 547, 548, 550, 553, 556, 562, 563, 564, 567, 573, 574, 576, 578, 579, 583, 585, 588, 591, 597, 598, 603, 604, 605, 606, 608, 610, 612, 614, 616, 618, 619, 620, 621, 625, 629, 633, 634, 635, 639, 640, 644, 645, 649, 650 }; #endif #if YYDEBUG || YYERROR_VERBOSE || 0 /* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM. First, the terminals, then, starting at YYNTOKENS, nonterminals. */ static const char *const yytname[] = { "$end", "error", "$undefined", "ID", "SELFOP", "DOTS", "COLONS", "DASHES", "INCR", "LONGDASH", "CONTROLS", "TENSION", "ATLEAST", "CURL", "COR", "CAND", "BAR", "AMPERSAND", "EQ", "NEQ", "LT", "LE", "GT", "GE", "CARETS", "'+'", "'-'", "'*'", "'/'", "'%'", "'#'", "'^'", "OPERATOR", "LOOSE", "ASSIGN", "'?'", "':'", "DIRTAG", "JOIN_PREC", "AND", "'{'", "'}'", "'('", "')'", "'.'", "','", "'['", "']'", "';'", "ELLIPSIS", "ACCESS", "UNRAVEL", "IMPORT", "INCLUDE", "FROM", "QUOTE", "STRUCT", "TYPEDEF", "NEW", "IF", "ELSE", "WHILE", "DO", "FOR", "BREAK", "CONTINUE", "RETURN_", "THIS", "EXPLICIT", "GARBAGE", "LIT", "STRING", "PERM", "MODIFIER", "UNARY", "EXP_IN_PARENS_RULE", "$accept", "file", "fileblock", "bareblock", "name", "runnable", "modifiers", "dec", "idpair", "idpairlist", "strid", "stridpair", "stridpairlist", "vardec", "barevardec", "type", "celltype", "dims", "dimexps", "decidlist", "decid", "decidstart", "varinit", "block", "arrayinit", "basearrayinit", "varinits", "formals", "explicitornot", "formal", "fundec", "typedec", "slice", "value", "argument", "arglist", "tuple", "exp", "join", "dir", "basicjoin", "tension", "controls", "stm", "stmexp", "blockstm", "forinit", "fortest", "forupdate", "stmexplist", YY_NULLPTR }; #endif # ifdef YYPRINT /* YYTOKNUM[NUM] -- (External) token number corresponding to the (internal) symbol number NUM (which must be that of a token). */ static const yytype_uint16 yytoknum[] = { 0, 256, 257, 258, 259, 260, 261, 262, 263, 264, 265, 266, 267, 268, 269, 270, 271, 272, 273, 274, 275, 276, 277, 278, 279, 43, 45, 42, 47, 37, 35, 94, 280, 281, 282, 63, 58, 283, 284, 285, 123, 125, 40, 41, 46, 44, 91, 93, 59, 286, 287, 288, 289, 290, 291, 292, 293, 294, 295, 296, 297, 298, 299, 300, 301, 302, 303, 304, 305, 306, 307, 308, 309, 310, 311, 312 }; # endif #define YYPACT_NINF -285 #define yypact_value_is_default(Yystate) \ (!!((Yystate) == (-285))) #define YYTABLE_NINF -45 #define yytable_value_is_error(Yytable_value) \ 0 /* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing STATE-NUM. */ static const yytype_int16 yypact[] = { -285, 41, 472, -285, -285, 873, 873, 873, 873, -285, 873, -285, 873, -285, 14, 20, 14, 16, 8, 23, 31, 20, 20, 26, 49, 614, 56, 86, 91, 687, -285, 141, -285, -285, -285, 18, -285, 543, -285, -285, 100, 53, -285, -285, -285, -285, 122, 1545, -285, 125, -285, 224, 148, 148, 148, 148, 1931, 330, 203, 60, 1146, 190, -285, 194, -285, 88, 0, 155, 161, 166, 168, -1, 169, -285, 180, 34, -285, 236, 207, 15, 873, 873, 193, 873, -285, -285, -285, 961, 148, 235, 254, 616, 212, -285, -285, -285, -285, -285, 35, 217, -285, 229, 685, 262, 741, 873, 79, -285, -285, 141, -285, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 873, 761, 873, -285, 231, -285, 741, -285, -285, 141, 114, -285, 873, -285, 873, 270, 14, -285, -285, -285, -285, -285, 24, 39, 401, -285, 227, 134, -14, 797, 105, 234, 1272, 1312, 233, -285, 278, -285, 243, 237, -285, 249, -285, 893, -285, 107, 1545, -285, 873, -285, 245, 998, 247, -10, 212, 236, 817, -285, 118, -285, 248, 1035, 1545, 873, 853, 291, 292, 197, 1763, 1791, 1819, 1847, 1875, 1875, 1903, 1903, 1903, 1903, 1939, 258, 258, 148, 148, 148, 148, 148, 1931, 1545, 1508, 873, 1188, 197, 231, -285, -285, 873, 1545, 1545, -285, -285, 295, 252, -285, 136, 253, 162, -285, -3, 180, 239, -285, 149, 20, -285, 1072, 146, 94, -285, 797, 212, 614, 614, 873, 46, 873, 873, 873, -285, -285, 893, 893, 1545, -285, 873, -285, -285, 180, 157, -285, -285, -285, 1545, -285, -285, -285, 1580, 873, 1617, -285, -285, 873, 1432, -285, 873, -285, -285, 300, -285, 301, -285, -285, -285, -285, 186, -285, -285, 180, 239, 239, 305, -285, -285, -285, 817, -285, 4, 265, 180, 191, 1109, 251, -285, 1352, 873, 1545, 264, -285, 1545, -285, -285, 1545, -285, 180, 873, 1654, 873, 1727, -285, 1230, -285, -285, -285, -285, -285, -285, 27, 279, 273, -285, 817, 817, -285, 180, -285, 614, 267, 1392, 873, -285, 1691, 873, 1691, -285, 873, 282, 817, -285, 276, -285, -285, -285, -285, 614, 275, 237, 1691, 1470, 817, -285, -285, -285, 614, -285, -285, -285 }; /* YYDEFACT[STATE-NUM] -- Default reduction number in state STATE-NUM. Performed when YYTABLE does not specify something else to do. Zero means the default is an error. */ static const yytype_uint8 yydefact[] = { 3, 0, 2, 1, 7, 0, 0, 0, 0, 9, 0, 5, 0, 177, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 99, 110, 111, 15, 14, 108, 4, 0, 10, 18, 0, 0, 42, 191, 19, 20, 109, 190, 11, 0, 178, 108, 153, 152, 115, 116, 117, 0, 108, 0, 0, 36, 35, 0, 38, 0, 0, 0, 0, 0, 7, 0, 0, 3, 0, 44, 83, 0, 44, 138, 0, 0, 0, 192, 186, 187, 188, 0, 112, 0, 0, 0, 43, 17, 16, 12, 13, 40, 53, 41, 49, 51, 0, 0, 0, 0, 166, 169, 157, 154, 170, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 151, 158, 179, 0, 59, 6, 98, 0, 149, 0, 97, 0, 0, 0, 21, 24, 27, 28, 29, 0, 0, 0, 82, 0, 53, 74, 0, 141, 139, 0, 0, 0, 194, 0, 199, 0, 193, 189, 7, 93, 0, 102, 0, 100, 8, 84, 45, 0, 0, 0, 74, 54, 0, 0, 95, 0, 88, 0, 0, 155, 0, 0, 0, 0, 137, 132, 131, 135, 134, 129, 130, 125, 126, 127, 128, 133, 118, 119, 120, 121, 122, 123, 124, 136, 148, 0, 0, 0, 150, 159, 160, 113, 0, 107, 106, 37, 39, 30, 0, 32, 0, 0, 0, 156, 74, 0, 74, 73, 0, 0, 69, 0, 0, 74, 142, 0, 140, 0, 0, 0, 53, 195, 0, 0, 103, 94, 0, 0, 86, 91, 85, 89, 46, 55, 0, 50, 52, 58, 57, 96, 92, 90, 175, 0, 171, 167, 168, 0, 0, 163, 0, 161, 114, 0, 23, 0, 22, 26, 25, 55, 0, 143, 70, 0, 74, 74, 75, 47, 60, 64, 0, 67, 0, 65, 0, 0, 0, 180, 182, 0, 0, 196, 0, 200, 101, 104, 105, 87, 80, 56, 0, 173, 0, 147, 162, 0, 31, 33, 56, 145, 71, 72, 53, 76, 0, 62, 0, 66, 144, 0, 48, 0, 0, 0, 197, 81, 176, 0, 172, 164, 0, 78, 0, 61, 0, 68, 146, 181, 183, 0, 0, 198, 174, 0, 0, 77, 63, 185, 0, 165, 79, 184 }; /* YYPGOTO[NTERM-NUM]. */ static const yytype_int16 yypgoto[] = { -285, -285, 250, -285, 10, 263, -285, 285, 36, 170, 309, -6, -285, 307, 246, -13, 308, -20, -285, -285, 145, -284, -210, 260, 171, -285, -285, -164, -285, -227, -285, -285, 238, -285, -165, 241, -285, -5, -285, -121, 205, -285, -285, -19, -79, -138, -285, -285, -285, -8 }; /* YYDEFGOTO[NTERM-NUM]. */ static const yytype_int16 yydefgoto[] = { -1, 1, 2, 57, 51, 36, 37, 38, 233, 234, 63, 64, 65, 39, 40, 41, 42, 185, 162, 99, 100, 101, 270, 43, 271, 306, 307, 242, 243, 244, 44, 45, 181, 46, 175, 176, 59, 47, 133, 134, 135, 196, 197, 48, 49, 50, 169, 316, 364, 170 }; /* YYTABLE[YYPACT[STATE-NUM]] -- What to do in state STATE-NUM. If positive, shift that token. If negative, reduce the rule whose number is the opposite. If YYTABLE_NINF, syntax error. */ static const yytype_int16 yytable[] = { 52, 53, 54, 55, 168, 56, 82, 60, 77, 258, 67, 70, 35, 296, 224, 92, 337, 61, 96, 68, 268, -44, 58, 4, 87, 66, 88, 231, 71, 239, 158, 75, 78, 267, 74, 240, 305, 9, 141, 240, 293, 3, 231, 90, 90, 339, 240, 35, 149, 9, 153, 232, 355, 340, 241, 92, 98, 159, 241, 161, 89, 160, 90, 73, 91, 241, 235, 35, 80, 238, 167, 334, 335, 157, 294, 163, 164, 184, 90, 62, 157, 157, 314, 309, 177, 62, 182, 69, 238, 194, 195, 81, 157, 35, 338, 319, 320, 177, 83, 192, 193, 295, 285, 142, 198, 143, 199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 221, 222, 322, 358, 359, 182, 147, 84, 225, 148, 308, 227, 85, 228, 230, 250, 240, 4, 246, 369, 247, 97, 4, 259, 183, 260, 5, 6, 245, 261, 226, 374, 333, 183, 273, 241, 260, 102, 35, 103, 261, 104, 177, 342, 7, 8, 136, 262, 9, 238, 317, 10, 128, 157, 289, 272, 12, 290, 349, 246, 302, 12, 276, 278, 303, 297, -34, 298, 304, 19, 146, 299, 22, 323, 19, 298, 150, 22, 360, 299, 289, 30, 151, 292, 31, 32, 30, 152, 282, 31, 32, -34, 154, 11, 286, 122, 123, 124, 125, 126, 127, 128, 332, 300, 298, 311, 312, 343, 299, 298, 132, 172, 158, 299, 272, 5, 6, 310, 89, 140, 90, 313, 91, 315, 90, 318, 75, 165, 177, 177, 178, 183, 321, 7, 8, 186, 187, 9, 190, 89, 10, 90, 168, 137, 132, 325, 229, 180, 253, 327, 12, 173, 329, 249, 254, 256, 257, 174, 124, 125, 126, 127, 128, 19, 255, 263, 22, 266, 274, 279, 280, 287, 272, 288, 291, 30, 330, 231, 31, 32, 241, 336, 347, 341, 345, 348, 356, 357, 362, 368, 370, 372, 350, 139, 352, 95, 155, 236, 331, 361, 72, 76, 166, 79, 269, 248, 4, 156, 272, 272, 5, 6, 223, 365, 0, 191, 189, 371, 0, 366, 0, 0, 367, 0, 272, 0, 375, 0, 7, 8, 0, 0, 9, 0, 0, 10, 272, 0, 0, 0, 0, 0, 0, 11, 138, 12, 0, 0, 0, 0, 0, 13, 0, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 0, 24, 25, 26, 27, 28, 29, 30, 0, 0, 31, 32, 33, 34, 4, 0, 0, 0, 5, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 8, 0, 0, 9, 0, 0, 10, 0, 0, 0, 0, 0, 0, 0, 11, 237, 12, 0, 0, 0, 0, 0, 13, 0, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 0, 24, 25, 26, 27, 28, 29, 30, 0, 0, 31, 32, 33, 34, 4, 0, 0, 0, 5, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 8, 0, 0, 9, 0, 0, 10, 0, 0, 0, 0, 0, 0, 0, 11, 0, 12, 0, 0, 0, 0, 0, 13, 0, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 0, 24, 25, 26, 27, 28, 29, 30, 0, 0, 31, 32, 33, 34, 4, 0, 0, 0, 5, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 8, 0, 0, 9, 0, 0, 10, 0, 0, 0, 0, 0, 0, 0, 11, 0, 12, 0, 0, 0, 0, 0, 13, 0, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 0, 24, 25, 26, 27, 28, 29, 30, 0, 0, 31, 32, 93, 94, 4, 0, 4, 0, 5, 6, 5, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 8, 7, 8, 9, 0, 9, 10, 0, 10, 0, 0, 0, 179, 0, 11, 0, 12, 0, 12, 0, 0, 0, 13, 180, 0, 0, 0, 0, 0, 19, 0, 19, 22, 23, 22, 24, 25, 26, 27, 28, 29, 30, 0, 30, 31, 32, 31, 32, 172, 0, 4, 0, 5, 6, 5, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 8, 7, 8, 9, 0, 9, 10, 0, 10, 0, 0, 0, 0, 0, 0, 0, 12, 188, 12, 0, 0, 0, 0, 174, 86, 0, 0, 0, 0, 19, 0, 19, 22, 4, 22, 0, 0, 5, 6, 0, 0, 30, 0, 30, 31, 32, 31, 32, 0, 0, 0, 0, 0, 4, 0, 7, 8, 5, 6, 9, 0, 0, 10, 220, 0, 0, 179, 0, 0, 0, 0, 0, 12, 0, 0, 7, 8, 0, 0, 9, 0, 0, 10, 0, 0, 19, 0, 0, 22, 4, 0, 0, 12, 5, 6, 0, 0, 30, 0, 0, 31, 32, 0, 0, 0, 19, 0, 0, 22, 4, 0, 7, 8, 5, 6, 9, 0, 30, 10, 0, 31, 32, 0, 0, 0, 0, 0, 0, 12, 0, 0, 7, 8, 180, 0, 9, 0, 0, 10, 0, 0, 19, 0, 0, 22, 4, 246, 0, 12, 5, 6, 0, 0, 30, 277, 0, 31, 32, 0, 0, 0, 19, 0, 0, 22, 4, 0, 7, 8, 5, 6, 9, 0, 30, 10, 0, 31, 32, 0, 0, 0, 0, 0, 0, 12, 172, 0, 7, 8, 5, 6, 9, 0, 0, 10, 0, 0, 19, 0, 0, 22, 0, 0, 0, 12, 0, 0, 7, 8, 30, 0, 9, 31, 32, 10, 0, 0, 19, 0, 0, 22, 0, 0, 0, 12, 0, 0, 0, 0, 30, 0, 0, 31, 32, 0, 0, 0, 19, 0, 0, 22, 0, 0, 0, 0, 0, 0, 0, 0, 30, 0, 0, 31, 32, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 105, 106, 107, 108, 109, 110, 0, 171, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 264, 0, 0, 0, 132, 105, 106, 107, 108, 109, 110, 265, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 264, 0, 0, 0, 132, 105, 106, 107, 108, 109, 110, 275, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 105, 106, 107, 108, 109, 110, 301, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 105, 106, 107, 108, 109, 110, 344, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 0, 0, 144, 0, 145, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 283, 0, 0, 0, 284, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 353, 0, 0, 0, 354, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 0, 0, 251, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 0, 0, 252, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 0, 0, 346, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 0, 0, 363, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 328, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 373, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 281, 0, 0, 0, 132, 105, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 105, 132, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 324, 132, 105, 0, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 326, 132, 105, 0, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 351, 132, 105, 0, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 130, 131, 0, 0, 0, 0, 132, 106, 107, 108, 109, 110, 0, 0, 0, 0, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 0, 0, 131, 0, 0, 0, 0, 132, 106, 107, 108, 109, 110, 0, 0, 0, 0, 0, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 106, 107, 108, 109, 110, 0, 0, 132, 0, 0, 0, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 106, 107, 108, 109, 110, 0, 0, 132, 0, 0, 0, 0, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 106, 107, 108, 109, 110, 0, 0, 132, 0, 0, 0, 0, 0, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 106, 107, 108, 109, 110, 0, 0, 132, 0, 0, 0, 0, 0, 0, 0, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 106, 107, 108, 109, 110, 0, 0, 132, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 121, 122, 123, 124, 125, 126, 127, 128, 129, 106, 107, 108, 109, 110, 0, 0, 132, 106, 107, 108, 109, 110, 0, 0, 0, 0, 0, 0, 121, 122, 123, 124, 125, 126, 127, 128, 0, 122, 123, 124, 125, 126, 127, 128, 132, 0, 0, 0, 0, 0, 0, 0, 132 }; static const yytype_int16 yycheck[] = { 5, 6, 7, 8, 83, 10, 25, 12, 21, 174, 16, 3, 2, 240, 135, 35, 300, 3, 37, 3, 184, 3, 12, 3, 29, 15, 31, 3, 18, 43, 3, 21, 22, 43, 3, 49, 246, 29, 58, 49, 43, 0, 3, 44, 44, 41, 49, 37, 48, 29, 51, 27, 336, 49, 68, 75, 3, 42, 68, 79, 42, 46, 44, 40, 46, 68, 27, 57, 42, 42, 83, 298, 299, 46, 238, 80, 81, 42, 44, 71, 46, 46, 36, 247, 89, 71, 91, 71, 42, 10, 11, 42, 46, 83, 304, 260, 261, 102, 42, 104, 105, 239, 223, 43, 109, 45, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 267, 340, 341, 137, 45, 48, 140, 48, 43, 143, 48, 145, 147, 162, 49, 3, 40, 356, 42, 48, 3, 43, 46, 45, 7, 8, 160, 49, 43, 368, 297, 46, 43, 68, 45, 42, 155, 44, 49, 46, 174, 308, 25, 26, 48, 179, 29, 42, 256, 32, 31, 46, 45, 187, 42, 48, 323, 40, 41, 42, 194, 195, 45, 43, 3, 45, 49, 55, 3, 49, 58, 43, 55, 45, 48, 58, 343, 49, 45, 67, 48, 48, 70, 71, 67, 48, 220, 70, 71, 50, 50, 40, 226, 25, 26, 27, 28, 29, 30, 31, 43, 243, 45, 251, 252, 43, 49, 45, 40, 3, 3, 49, 246, 7, 8, 249, 42, 43, 44, 253, 46, 255, 44, 257, 243, 61, 260, 261, 3, 46, 264, 25, 26, 45, 34, 29, 3, 42, 32, 44, 348, 46, 40, 277, 3, 47, 42, 281, 42, 43, 284, 46, 3, 45, 34, 49, 27, 28, 29, 30, 31, 55, 48, 47, 58, 47, 47, 5, 5, 3, 304, 48, 48, 67, 3, 3, 70, 71, 68, 3, 314, 45, 60, 48, 34, 41, 48, 34, 41, 43, 324, 57, 326, 37, 73, 154, 289, 345, 18, 21, 83, 22, 186, 161, 3, 74, 340, 341, 7, 8, 134, 348, -1, 104, 102, 363, -1, 351, -1, -1, 354, -1, 356, -1, 372, -1, 25, 26, -1, -1, 29, -1, -1, 32, 368, -1, -1, -1, -1, -1, -1, 40, 41, 42, -1, -1, -1, -1, -1, 48, -1, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, -1, 61, 62, 63, 64, 65, 66, 67, -1, -1, 70, 71, 72, 73, 3, -1, -1, -1, 7, 8, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 25, 26, -1, -1, 29, -1, -1, 32, -1, -1, -1, -1, -1, -1, -1, 40, 41, 42, -1, -1, -1, -1, -1, 48, -1, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, -1, 61, 62, 63, 64, 65, 66, 67, -1, -1, 70, 71, 72, 73, 3, -1, -1, -1, 7, 8, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 25, 26, -1, -1, 29, -1, -1, 32, -1, -1, -1, -1, -1, -1, -1, 40, -1, 42, -1, -1, -1, -1, -1, 48, -1, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, -1, 61, 62, 63, 64, 65, 66, 67, -1, -1, 70, 71, 72, 73, 3, -1, -1, -1, 7, 8, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 25, 26, -1, -1, 29, -1, -1, 32, -1, -1, -1, -1, -1, -1, -1, 40, -1, 42, -1, -1, -1, -1, -1, 48, -1, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, -1, 61, 62, 63, 64, 65, 66, 67, -1, -1, 70, 71, 72, 73, 3, -1, 3, -1, 7, 8, 7, 8, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 25, 26, 25, 26, 29, -1, 29, 32, -1, 32, -1, -1, -1, 36, -1, 40, -1, 42, -1, 42, -1, -1, -1, 48, 47, -1, -1, -1, -1, -1, 55, -1, 55, 58, 59, 58, 61, 62, 63, 64, 65, 66, 67, -1, 67, 70, 71, 70, 71, 3, -1, 3, -1, 7, 8, 7, 8, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 25, 26, 25, 26, 29, -1, 29, 32, -1, 32, -1, -1, -1, -1, -1, -1, -1, 42, 43, 42, -1, -1, -1, -1, 49, 48, -1, -1, -1, -1, 55, -1, 55, 58, 3, 58, -1, -1, 7, 8, -1, -1, 67, -1, 67, 70, 71, 70, 71, -1, -1, -1, -1, -1, 3, -1, 25, 26, 7, 8, 29, -1, -1, 32, 13, -1, -1, 36, -1, -1, -1, -1, -1, 42, -1, -1, 25, 26, -1, -1, 29, -1, -1, 32, -1, -1, 55, -1, -1, 58, 3, -1, -1, 42, 7, 8, -1, -1, 67, -1, -1, 70, 71, -1, -1, -1, 55, -1, -1, 58, 3, -1, 25, 26, 7, 8, 29, -1, 67, 32, -1, 70, 71, -1, -1, -1, -1, -1, -1, 42, -1, -1, 25, 26, 47, -1, 29, -1, -1, 32, -1, -1, 55, -1, -1, 58, 3, 40, -1, 42, 7, 8, -1, -1, 67, 12, -1, 70, 71, -1, -1, -1, 55, -1, -1, 58, 3, -1, 25, 26, 7, 8, 29, -1, 67, 32, -1, 70, 71, -1, -1, -1, -1, -1, -1, 42, 3, -1, 25, 26, 7, 8, 29, -1, -1, 32, -1, -1, 55, -1, -1, 58, -1, -1, -1, 42, -1, -1, 25, 26, 67, -1, 29, 70, 71, 32, -1, -1, 55, -1, -1, 58, -1, -1, -1, 42, -1, -1, -1, -1, 67, -1, -1, 70, 71, -1, -1, -1, 55, -1, -1, 58, -1, -1, -1, -1, -1, -1, -1, -1, 67, -1, -1, 70, 71, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, 4, 5, 6, 7, 8, 9, -1, 48, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, 36, -1, -1, -1, 40, 4, 5, 6, 7, 8, 9, 47, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, 36, -1, -1, -1, 40, 4, 5, 6, 7, 8, 9, 47, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, 4, 5, 6, 7, 8, 9, 47, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, 4, 5, 6, 7, 8, 9, 47, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, -1, -1, 43, -1, 45, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, 41, -1, -1, -1, 45, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, 41, -1, -1, -1, 45, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, -1, -1, 43, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, -1, -1, 43, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, -1, -1, 43, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, -1, -1, 43, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, 41, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, 41, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, 36, -1, -1, -1, 40, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, 4, 40, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, 39, 40, 4, -1, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, 39, 40, 4, -1, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, 39, 40, 4, -1, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, 34, 35, -1, -1, -1, -1, 40, 5, 6, 7, 8, 9, -1, -1, -1, -1, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, -1, -1, 35, -1, -1, -1, -1, 40, 5, 6, 7, 8, 9, -1, -1, -1, -1, -1, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 5, 6, 7, 8, 9, -1, -1, 40, -1, -1, -1, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 5, 6, 7, 8, 9, -1, -1, 40, -1, -1, -1, -1, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 5, 6, 7, 8, 9, -1, -1, 40, -1, -1, -1, -1, -1, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 5, 6, 7, 8, 9, -1, -1, 40, -1, -1, -1, -1, -1, -1, -1, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 5, 6, 7, 8, 9, -1, -1, 40, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 24, 25, 26, 27, 28, 29, 30, 31, 32, 5, 6, 7, 8, 9, -1, -1, 40, 5, 6, 7, 8, 9, -1, -1, -1, -1, -1, -1, 24, 25, 26, 27, 28, 29, 30, 31, -1, 25, 26, 27, 28, 29, 30, 31, 40, -1, -1, -1, -1, -1, -1, -1, 40 }; /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing symbol of state STATE-NUM. */ static const yytype_uint8 yystos[] = { 0, 77, 78, 0, 3, 7, 8, 25, 26, 29, 32, 40, 42, 48, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 61, 62, 63, 64, 65, 66, 67, 70, 71, 72, 73, 80, 81, 82, 83, 89, 90, 91, 92, 99, 106, 107, 109, 113, 119, 120, 121, 80, 113, 113, 113, 113, 113, 79, 80, 112, 113, 3, 71, 86, 87, 88, 80, 87, 3, 71, 3, 80, 86, 40, 3, 80, 89, 91, 80, 92, 42, 42, 119, 42, 48, 48, 48, 113, 113, 42, 44, 46, 93, 72, 73, 83, 119, 48, 3, 95, 96, 97, 42, 44, 46, 4, 5, 6, 7, 8, 9, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 34, 35, 40, 114, 115, 116, 48, 46, 41, 81, 43, 93, 43, 45, 43, 45, 3, 45, 48, 48, 48, 48, 48, 51, 50, 78, 99, 46, 3, 42, 46, 93, 94, 113, 113, 61, 90, 91, 120, 122, 125, 48, 3, 43, 49, 110, 111, 113, 3, 36, 47, 108, 113, 46, 42, 93, 45, 34, 43, 111, 3, 108, 113, 113, 10, 11, 117, 118, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 13, 113, 113, 116, 115, 113, 43, 113, 113, 3, 87, 3, 27, 84, 85, 27, 85, 41, 42, 43, 49, 68, 103, 104, 105, 113, 40, 42, 100, 46, 93, 43, 43, 42, 3, 48, 45, 34, 110, 43, 45, 49, 113, 47, 36, 47, 47, 43, 103, 96, 98, 100, 113, 43, 47, 47, 113, 12, 113, 5, 5, 36, 113, 41, 45, 115, 113, 3, 48, 45, 48, 48, 48, 43, 103, 121, 105, 43, 45, 49, 91, 47, 41, 45, 49, 98, 101, 102, 43, 103, 113, 119, 119, 113, 36, 113, 123, 120, 113, 110, 110, 113, 121, 43, 39, 113, 39, 113, 41, 113, 3, 84, 43, 121, 105, 105, 3, 97, 98, 41, 49, 45, 121, 43, 47, 60, 43, 113, 48, 121, 113, 39, 113, 41, 45, 97, 34, 41, 98, 98, 121, 119, 48, 43, 124, 125, 113, 113, 34, 98, 41, 119, 43, 41, 98, 119 }; /* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ static const yytype_uint8 yyr1[] = { 0, 76, 77, 78, 78, 79, 79, 80, 80, 80, 81, 81, 81, 81, 82, 82, 82, 82, 83, 83, 83, 83, 83, 83, 83, 83, 83, 83, 83, 83, 84, 84, 85, 85, 86, 86, 87, 87, 88, 88, 89, 90, 91, 91, 92, 93, 93, 94, 94, 95, 95, 96, 96, 97, 97, 97, 97, 98, 98, 99, 100, 100, 100, 100, 101, 101, 101, 102, 102, 103, 103, 103, 103, 104, 104, 105, 105, 105, 105, 105, 106, 106, 107, 107, 108, 108, 108, 108, 109, 109, 109, 109, 109, 109, 109, 109, 109, 109, 109, 109, 110, 110, 111, 111, 111, 111, 112, 112, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 114, 114, 114, 114, 114, 115, 115, 115, 115, 116, 116, 116, 116, 116, 117, 117, 117, 117, 118, 118, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 119, 120, 121, 122, 122, 122, 123, 123, 124, 124, 125, 125 }; /* YYR2[YYN] -- Number of symbols on the right hand side of rule YYN. */ static const yytype_uint8 yyr2[] = { 0, 2, 1, 0, 2, 0, 2, 1, 3, 1, 1, 1, 2, 2, 1, 1, 2, 2, 1, 1, 1, 3, 5, 5, 3, 5, 5, 3, 3, 3, 1, 3, 1, 3, 1, 1, 1, 3, 1, 3, 2, 2, 1, 2, 1, 2, 3, 3, 4, 1, 3, 1, 3, 1, 2, 3, 4, 1, 1, 3, 2, 4, 3, 5, 1, 1, 2, 1, 3, 1, 2, 3, 3, 1, 0, 2, 3, 5, 4, 6, 5, 6, 3, 2, 1, 2, 2, 3, 3, 4, 4, 4, 4, 3, 4, 3, 4, 3, 3, 1, 1, 3, 1, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 4, 5, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, 3, 4, 3, 4, 5, 6, 6, 7, 5, 3, 3, 3, 2, 2, 2, 2, 3, 4, 1, 1, 2, 2, 3, 4, 3, 5, 7, 1, 3, 3, 1, 1, 2, 4, 3, 5, 2, 4, 1, 1, 2, 5, 7, 5, 7, 9, 8, 2, 2, 2, 3, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 3 }; #define yyerrok (yyerrstatus = 0) #define yyclearin (yychar = YYEMPTY) #define YYEMPTY (-2) #define YYEOF 0 #define YYACCEPT goto yyacceptlab #define YYABORT goto yyabortlab #define YYERROR goto yyerrorlab #define YYRECOVERING() (!!yyerrstatus) #define YYBACKUP(Token, Value) \ do \ if (yychar == YYEMPTY) \ { \ yychar = (Token); \ yylval = (Value); \ YYPOPSTACK (yylen); \ yystate = *yyssp; \ goto yybackup; \ } \ else \ { \ yyerror (YY_("syntax error: cannot back up")); \ YYERROR; \ } \ while (0) /* Error token number */ #define YYTERROR 1 #define YYERRCODE 256 /* Enable debugging if requested. */ #if YYDEBUG # ifndef YYFPRINTF # include /* INFRINGES ON USER NAME SPACE */ # define YYFPRINTF fprintf # endif # define YYDPRINTF(Args) \ do { \ if (yydebug) \ YYFPRINTF Args; \ } while (0) /* This macro is provided for backward compatibility. */ #ifndef YY_LOCATION_PRINT # define YY_LOCATION_PRINT(File, Loc) ((void) 0) #endif # define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ do { \ if (yydebug) \ { \ YYFPRINTF (stderr, "%s ", Title); \ yy_symbol_print (stderr, \ Type, Value); \ YYFPRINTF (stderr, "\n"); \ } \ } while (0) /*----------------------------------------. | Print this symbol's value on YYOUTPUT. | `----------------------------------------*/ static void yy_symbol_value_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep) { FILE *yyo = yyoutput; YYUSE (yyo); if (!yyvaluep) return; # ifdef YYPRINT if (yytype < YYNTOKENS) YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep); # endif YYUSE (yytype); } /*--------------------------------. | Print this symbol on YYOUTPUT. | `--------------------------------*/ static void yy_symbol_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep) { YYFPRINTF (yyoutput, "%s %s (", yytype < YYNTOKENS ? "token" : "nterm", yytname[yytype]); yy_symbol_value_print (yyoutput, yytype, yyvaluep); YYFPRINTF (yyoutput, ")"); } /*------------------------------------------------------------------. | yy_stack_print -- Print the state stack from its BOTTOM up to its | | TOP (included). | `------------------------------------------------------------------*/ static void yy_stack_print (yytype_int16 *yybottom, yytype_int16 *yytop) { YYFPRINTF (stderr, "Stack now"); for (; yybottom <= yytop; yybottom++) { int yybot = *yybottom; YYFPRINTF (stderr, " %d", yybot); } YYFPRINTF (stderr, "\n"); } # define YY_STACK_PRINT(Bottom, Top) \ do { \ if (yydebug) \ yy_stack_print ((Bottom), (Top)); \ } while (0) /*------------------------------------------------. | Report that the YYRULE is going to be reduced. | `------------------------------------------------*/ static void yy_reduce_print (yytype_int16 *yyssp, YYSTYPE *yyvsp, int yyrule) { unsigned long int yylno = yyrline[yyrule]; int yynrhs = yyr2[yyrule]; int yyi; YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu):\n", yyrule - 1, yylno); /* The symbols being reduced. */ for (yyi = 0; yyi < yynrhs; yyi++) { YYFPRINTF (stderr, " $%d = ", yyi + 1); yy_symbol_print (stderr, yystos[yyssp[yyi + 1 - yynrhs]], &(yyvsp[(yyi + 1) - (yynrhs)]) ); YYFPRINTF (stderr, "\n"); } } # define YY_REDUCE_PRINT(Rule) \ do { \ if (yydebug) \ yy_reduce_print (yyssp, yyvsp, Rule); \ } while (0) /* Nonzero means print parse trace. It is left uninitialized so that multiple parsers can coexist. */ int yydebug; #else /* !YYDEBUG */ # define YYDPRINTF(Args) # define YY_SYMBOL_PRINT(Title, Type, Value, Location) # define YY_STACK_PRINT(Bottom, Top) # define YY_REDUCE_PRINT(Rule) #endif /* !YYDEBUG */ /* YYINITDEPTH -- initial size of the parser's stacks. */ #ifndef YYINITDEPTH # define YYINITDEPTH 200 #endif /* YYMAXDEPTH -- maximum size the stacks can grow to (effective only if the built-in stack extension method is used). Do not make this value too large; the results are undefined if YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH) evaluated with infinite-precision integer arithmetic. */ #ifndef YYMAXDEPTH # define YYMAXDEPTH 10000 #endif #if YYERROR_VERBOSE # ifndef yystrlen # if defined __GLIBC__ && defined _STRING_H # define yystrlen strlen # else /* Return the length of YYSTR. */ static YYSIZE_T yystrlen (const char *yystr) { YYSIZE_T yylen; for (yylen = 0; yystr[yylen]; yylen++) continue; return yylen; } # endif # endif # ifndef yystpcpy # if defined __GLIBC__ && defined _STRING_H && defined _GNU_SOURCE # define yystpcpy stpcpy # else /* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in YYDEST. */ static char * yystpcpy (char *yydest, const char *yysrc) { char *yyd = yydest; const char *yys = yysrc; while ((*yyd++ = *yys++) != '\0') continue; return yyd - 1; } # endif # endif # ifndef yytnamerr /* Copy to YYRES the contents of YYSTR after stripping away unnecessary quotes and backslashes, so that it's suitable for yyerror. The heuristic is that double-quoting is unnecessary unless the string contains an apostrophe, a comma, or backslash (other than backslash-backslash). YYSTR is taken from yytname. If YYRES is null, do not copy; instead, return the length of what the result would have been. */ static YYSIZE_T yytnamerr (char *yyres, const char *yystr) { if (*yystr == '"') { YYSIZE_T yyn = 0; char const *yyp = yystr; for (;;) switch (*++yyp) { case '\'': case ',': goto do_not_strip_quotes; case '\\': if (*++yyp != '\\') goto do_not_strip_quotes; /* Fall through. */ default: if (yyres) yyres[yyn] = *yyp; yyn++; break; case '"': if (yyres) yyres[yyn] = '\0'; return yyn; } do_not_strip_quotes: ; } if (! yyres) return yystrlen (yystr); return yystpcpy (yyres, yystr) - yyres; } # endif /* Copy into *YYMSG, which is of size *YYMSG_ALLOC, an error message about the unexpected token YYTOKEN for the state stack whose top is YYSSP. Return 0 if *YYMSG was successfully written. Return 1 if *YYMSG is not large enough to hold the message. In that case, also set *YYMSG_ALLOC to the required number of bytes. Return 2 if the required number of bytes is too large to store. */ static int yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg, yytype_int16 *yyssp, int yytoken) { YYSIZE_T yysize0 = yytnamerr (YY_NULLPTR, yytname[yytoken]); YYSIZE_T yysize = yysize0; enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 }; /* Internationalized format string. */ const char *yyformat = YY_NULLPTR; /* Arguments of yyformat. */ char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM]; /* Number of reported tokens (one for the "unexpected", one per "expected"). */ int yycount = 0; /* There are many possibilities here to consider: - If this state is a consistent state with a default action, then the only way this function was invoked is if the default action is an error action. In that case, don't check for expected tokens because there are none. - The only way there can be no lookahead present (in yychar) is if this state is a consistent state with a default action. Thus, detecting the absence of a lookahead is sufficient to determine that there is no unexpected or expected token to report. In that case, just report a simple "syntax error". - Don't assume there isn't a lookahead just because this state is a consistent state with a default action. There might have been a previous inconsistent state, consistent state with a non-default action, or user semantic action that manipulated yychar. - Of course, the expected token list depends on states to have correct lookahead information, and it depends on the parser not to perform extra reductions after fetching a lookahead from the scanner and before detecting a syntax error. Thus, state merging (from LALR or IELR) and default reductions corrupt the expected token list. However, the list is correct for canonical LR with one exception: it will still contain any token that will not be accepted due to an error action in a later state. */ if (yytoken != YYEMPTY) { int yyn = yypact[*yyssp]; yyarg[yycount++] = yytname[yytoken]; if (!yypact_value_is_default (yyn)) { /* Start YYX at -YYN if negative to avoid negative indexes in YYCHECK. In other words, skip the first -YYN actions for this state because they are default actions. */ int yyxbegin = yyn < 0 ? -yyn : 0; /* Stay within bounds of both yycheck and yytname. */ int yychecklim = YYLAST - yyn + 1; int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS; int yyx; for (yyx = yyxbegin; yyx < yyxend; ++yyx) if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR && !yytable_value_is_error (yytable[yyx + yyn])) { if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM) { yycount = 1; yysize = yysize0; break; } yyarg[yycount++] = yytname[yyx]; { YYSIZE_T yysize1 = yysize + yytnamerr (YY_NULLPTR, yytname[yyx]); if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) return 2; yysize = yysize1; } } } } switch (yycount) { # define YYCASE_(N, S) \ case N: \ yyformat = S; \ break YYCASE_(0, YY_("syntax error")); YYCASE_(1, YY_("syntax error, unexpected %s")); YYCASE_(2, YY_("syntax error, unexpected %s, expecting %s")); YYCASE_(3, YY_("syntax error, unexpected %s, expecting %s or %s")); YYCASE_(4, YY_("syntax error, unexpected %s, expecting %s or %s or %s")); YYCASE_(5, YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s")); # undef YYCASE_ } { YYSIZE_T yysize1 = yysize + yystrlen (yyformat); if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)) return 2; yysize = yysize1; } if (*yymsg_alloc < yysize) { *yymsg_alloc = 2 * yysize; if (! (yysize <= *yymsg_alloc && *yymsg_alloc <= YYSTACK_ALLOC_MAXIMUM)) *yymsg_alloc = YYSTACK_ALLOC_MAXIMUM; return 1; } /* Avoid sprintf, as that infringes on the user's name space. Don't have undefined behavior even if the translation produced a string with the wrong number of "%s"s. */ { char *yyp = *yymsg; int yyi = 0; while ((*yyp = *yyformat) != '\0') if (*yyp == '%' && yyformat[1] == 's' && yyi < yycount) { yyp += yytnamerr (yyp, yyarg[yyi++]); yyformat += 2; } else { yyp++; yyformat++; } } return 0; } #endif /* YYERROR_VERBOSE */ /*-----------------------------------------------. | Release the memory associated to this symbol. | `-----------------------------------------------*/ static void yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep) { YYUSE (yyvaluep); if (!yymsg) yymsg = "Deleting"; YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp); YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN YYUSE (yytype); YY_IGNORE_MAYBE_UNINITIALIZED_END } /* The lookahead symbol. */ int yychar; /* The semantic value of the lookahead symbol. */ YYSTYPE yylval; /* Number of syntax errors so far. */ int yynerrs; /*----------. | yyparse. | `----------*/ int yyparse (void) { int yystate; /* Number of tokens to shift before error messages enabled. */ int yyerrstatus; /* The stacks and their tools: 'yyss': related to states. 'yyvs': related to semantic values. Refer to the stacks through separate pointers, to allow yyoverflow to reallocate them elsewhere. */ /* The state stack. */ yytype_int16 yyssa[YYINITDEPTH]; yytype_int16 *yyss; yytype_int16 *yyssp; /* The semantic value stack. */ YYSTYPE yyvsa[YYINITDEPTH]; YYSTYPE *yyvs; YYSTYPE *yyvsp; YYSIZE_T yystacksize; int yyn; int yyresult; /* Lookahead token as an internal (translated) token number. */ int yytoken = 0; /* The variables used to return semantic value and location from the action routines. */ YYSTYPE yyval; #if YYERROR_VERBOSE /* Buffer for error messages, and its allocated size. */ char yymsgbuf[128]; char *yymsg = yymsgbuf; YYSIZE_T yymsg_alloc = sizeof yymsgbuf; #endif #define YYPOPSTACK(N) (yyvsp -= (N), yyssp -= (N)) /* The number of symbols on the RHS of the reduced rule. Keep to zero when no symbol should be popped. */ int yylen = 0; yyssp = yyss = yyssa; yyvsp = yyvs = yyvsa; yystacksize = YYINITDEPTH; YYDPRINTF ((stderr, "Starting parse\n")); yystate = 0; yyerrstatus = 0; yynerrs = 0; yychar = YYEMPTY; /* Cause a token to be read. */ goto yysetstate; /*------------------------------------------------------------. | yynewstate -- Push a new state, which is found in yystate. | `------------------------------------------------------------*/ yynewstate: /* In all cases, when you get here, the value and location stacks have just been pushed. So pushing a state here evens the stacks. */ yyssp++; yysetstate: *yyssp = yystate; if (yyss + yystacksize - 1 <= yyssp) { /* Get the current used size of the three stacks, in elements. */ YYSIZE_T yysize = yyssp - yyss + 1; #ifdef yyoverflow { /* Give user a chance to reallocate the stack. Use copies of these so that the &'s don't force the real ones into memory. */ YYSTYPE *yyvs1 = yyvs; yytype_int16 *yyss1 = yyss; /* Each stack pointer address is followed by the size of the data in use in that stack, in bytes. This used to be a conditional around just the two extra args, but that might be undefined if yyoverflow is a macro. */ yyoverflow (YY_("memory exhausted"), &yyss1, yysize * sizeof (*yyssp), &yyvs1, yysize * sizeof (*yyvsp), &yystacksize); yyss = yyss1; yyvs = yyvs1; } #else /* no yyoverflow */ # ifndef YYSTACK_RELOCATE goto yyexhaustedlab; # else /* Extend the stack our own way. */ if (YYMAXDEPTH <= yystacksize) goto yyexhaustedlab; yystacksize *= 2; if (YYMAXDEPTH < yystacksize) yystacksize = YYMAXDEPTH; { yytype_int16 *yyss1 = yyss; union yyalloc *yyptr = (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); if (! yyptr) goto yyexhaustedlab; YYSTACK_RELOCATE (yyss_alloc, yyss); YYSTACK_RELOCATE (yyvs_alloc, yyvs); # undef YYSTACK_RELOCATE if (yyss1 != yyssa) YYSTACK_FREE (yyss1); } # endif #endif /* no yyoverflow */ yyssp = yyss + yysize - 1; yyvsp = yyvs + yysize - 1; YYDPRINTF ((stderr, "Stack size increased to %lu\n", (unsigned long int) yystacksize)); if (yyss + yystacksize - 1 <= yyssp) YYABORT; } YYDPRINTF ((stderr, "Entering state %d\n", yystate)); if (yystate == YYFINAL) YYACCEPT; goto yybackup; /*-----------. | yybackup. | `-----------*/ yybackup: /* Do appropriate processing given the current state. Read a lookahead token if we need one and don't already have one. */ /* First try to decide what to do without reference to lookahead token. */ yyn = yypact[yystate]; if (yypact_value_is_default (yyn)) goto yydefault; /* Not known => get a lookahead token if don't already have one. */ /* YYCHAR is either YYEMPTY or YYEOF or a valid lookahead symbol. */ if (yychar == YYEMPTY) { YYDPRINTF ((stderr, "Reading a token: ")); yychar = yylex (); } if (yychar <= YYEOF) { yychar = yytoken = YYEOF; YYDPRINTF ((stderr, "Now at end of input.\n")); } else { yytoken = YYTRANSLATE (yychar); YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc); } /* If the proper action on seeing token YYTOKEN is to reduce or to detect an error, take that action. */ yyn += yytoken; if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken) goto yydefault; yyn = yytable[yyn]; if (yyn <= 0) { if (yytable_value_is_error (yyn)) goto yyerrlab; yyn = -yyn; goto yyreduce; } /* Count tokens shifted since error; after three, turn off error status. */ if (yyerrstatus) yyerrstatus--; /* Shift the lookahead token. */ YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc); /* Discard the shifted token. */ yychar = YYEMPTY; yystate = yyn; YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN *++yyvsp = yylval; YY_IGNORE_MAYBE_UNINITIALIZED_END goto yynewstate; /*-----------------------------------------------------------. | yydefault -- do the default action for the current state. | `-----------------------------------------------------------*/ yydefault: yyn = yydefact[yystate]; if (yyn == 0) goto yyerrlab; goto yyreduce; /*-----------------------------. | yyreduce -- Do a reduction. | `-----------------------------*/ yyreduce: /* yyn is the number of a rule to reduce with. */ yylen = yyr2[yyn]; /* If YYLEN is nonzero, implement the default value of the action: '$$ = $1'. Otherwise, the following line sets YYVAL to garbage. This behavior is undocumented and Bison users should not rely upon it. Assigning to YYVAL unconditionally makes the parser a bit smaller, and it avoids a GCC warning that YYVAL may be used uninitialized. */ yyval = yyvsp[1-yylen]; YY_REDUCE_PRINT (yyn); switch (yyn) { case 2: #line 191 "camp.y" /* yacc.c:1646 */ { absyntax::root = (yyvsp[0].b); } #line 1954 "camp.tab.c" /* yacc.c:1646 */ break; case 3: #line 195 "camp.y" /* yacc.c:1646 */ { (yyval.b) = new file(lexerPos(), false); } #line 1960 "camp.tab.c" /* yacc.c:1646 */ break; case 4: #line 197 "camp.y" /* yacc.c:1646 */ { (yyval.b) = (yyvsp[-1].b); (yyval.b)->add((yyvsp[0].run)); } #line 1966 "camp.tab.c" /* yacc.c:1646 */ break; case 5: #line 201 "camp.y" /* yacc.c:1646 */ { (yyval.b) = new block(lexerPos(), true); } #line 1972 "camp.tab.c" /* yacc.c:1646 */ break; case 6: #line 203 "camp.y" /* yacc.c:1646 */ { (yyval.b) = (yyvsp[-1].b); (yyval.b)->add((yyvsp[0].run)); } #line 1978 "camp.tab.c" /* yacc.c:1646 */ break; case 7: #line 207 "camp.y" /* yacc.c:1646 */ { (yyval.n) = new simpleName((yyvsp[0].ps).pos, (yyvsp[0].ps).sym); } #line 1984 "camp.tab.c" /* yacc.c:1646 */ break; case 8: #line 208 "camp.y" /* yacc.c:1646 */ { (yyval.n) = new qualifiedName((yyvsp[-1].pos), (yyvsp[-2].n), (yyvsp[0].ps).sym); } #line 1990 "camp.tab.c" /* yacc.c:1646 */ break; case 9: #line 209 "camp.y" /* yacc.c:1646 */ { (yyval.n) = new simpleName((yyvsp[0].ps).pos, symbol::trans("operator answer")); } #line 1997 "camp.tab.c" /* yacc.c:1646 */ break; case 10: #line 214 "camp.y" /* yacc.c:1646 */ { (yyval.run) = (yyvsp[0].d); } #line 2003 "camp.tab.c" /* yacc.c:1646 */ break; case 11: #line 215 "camp.y" /* yacc.c:1646 */ { (yyval.run) = (yyvsp[0].s); } #line 2009 "camp.tab.c" /* yacc.c:1646 */ break; case 12: #line 217 "camp.y" /* yacc.c:1646 */ { (yyval.run) = new modifiedRunnable((yyvsp[-1].ml)->getPos(), (yyvsp[-1].ml), (yyvsp[0].d)); } #line 2015 "camp.tab.c" /* yacc.c:1646 */ break; case 13: #line 219 "camp.y" /* yacc.c:1646 */ { (yyval.run) = new modifiedRunnable((yyvsp[-1].ml)->getPos(), (yyvsp[-1].ml), (yyvsp[0].s)); } #line 2021 "camp.tab.c" /* yacc.c:1646 */ break; case 14: #line 223 "camp.y" /* yacc.c:1646 */ { (yyval.ml) = new modifierList((yyvsp[0].mod).pos); (yyval.ml)->add((yyvsp[0].mod).val); } #line 2027 "camp.tab.c" /* yacc.c:1646 */ break; case 15: #line 224 "camp.y" /* yacc.c:1646 */ { (yyval.ml) = new modifierList((yyvsp[0].perm).pos); (yyval.ml)->add((yyvsp[0].perm).val); } #line 2033 "camp.tab.c" /* yacc.c:1646 */ break; case 16: #line 226 "camp.y" /* yacc.c:1646 */ { (yyval.ml) = (yyvsp[-1].ml); (yyval.ml)->add((yyvsp[0].mod).val); } #line 2039 "camp.tab.c" /* yacc.c:1646 */ break; case 17: #line 228 "camp.y" /* yacc.c:1646 */ { (yyval.ml) = (yyvsp[-1].ml); (yyval.ml)->add((yyvsp[0].perm).val); } #line 2045 "camp.tab.c" /* yacc.c:1646 */ break; case 18: #line 232 "camp.y" /* yacc.c:1646 */ { (yyval.d) = (yyvsp[0].vd); } #line 2051 "camp.tab.c" /* yacc.c:1646 */ break; case 19: #line 233 "camp.y" /* yacc.c:1646 */ { (yyval.d) = (yyvsp[0].d); } #line 2057 "camp.tab.c" /* yacc.c:1646 */ break; case 20: #line 234 "camp.y" /* yacc.c:1646 */ { (yyval.d) = (yyvsp[0].d); } #line 2063 "camp.tab.c" /* yacc.c:1646 */ break; case 21: #line 236 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new accessdec((yyvsp[-2].pos), (yyvsp[-1].ipl)); } #line 2069 "camp.tab.c" /* yacc.c:1646 */ break; case 22: #line 238 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new unraveldec((yyvsp[-4].pos), (yyvsp[-3].n), (yyvsp[-1].ipl)); } #line 2075 "camp.tab.c" /* yacc.c:1646 */ break; case 23: #line 240 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new unraveldec((yyvsp[-4].pos), (yyvsp[-3].n), WILDCARD); } #line 2081 "camp.tab.c" /* yacc.c:1646 */ break; case 24: #line 241 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new unraveldec((yyvsp[-2].pos), (yyvsp[-1].n), WILDCARD); } #line 2087 "camp.tab.c" /* yacc.c:1646 */ break; case 25: #line 243 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new fromaccessdec((yyvsp[-4].pos), (yyvsp[-3].ps).sym, (yyvsp[-1].ipl)); } #line 2093 "camp.tab.c" /* yacc.c:1646 */ break; case 26: #line 245 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new fromaccessdec((yyvsp[-4].pos), (yyvsp[-3].ps).sym, WILDCARD); } #line 2099 "camp.tab.c" /* yacc.c:1646 */ break; case 27: #line 247 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new importdec((yyvsp[-2].pos), (yyvsp[-1].ip)); } #line 2105 "camp.tab.c" /* yacc.c:1646 */ break; case 28: #line 248 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new includedec((yyvsp[-2].pos), (yyvsp[-1].ps).sym); } #line 2111 "camp.tab.c" /* yacc.c:1646 */ break; case 29: #line 250 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new includedec((yyvsp[-2].pos), (yyvsp[-1].stre)->getString()); } #line 2117 "camp.tab.c" /* yacc.c:1646 */ break; case 30: #line 254 "camp.y" /* yacc.c:1646 */ { (yyval.ip) = new idpair((yyvsp[0].ps).pos, (yyvsp[0].ps).sym); } #line 2123 "camp.tab.c" /* yacc.c:1646 */ break; case 31: #line 256 "camp.y" /* yacc.c:1646 */ { (yyval.ip) = new idpair((yyvsp[-2].ps).pos, (yyvsp[-2].ps).sym, (yyvsp[-1].ps).sym , (yyvsp[0].ps).sym); } #line 2129 "camp.tab.c" /* yacc.c:1646 */ break; case 32: #line 260 "camp.y" /* yacc.c:1646 */ { (yyval.ipl) = new idpairlist(); (yyval.ipl)->add((yyvsp[0].ip)); } #line 2135 "camp.tab.c" /* yacc.c:1646 */ break; case 33: #line 262 "camp.y" /* yacc.c:1646 */ { (yyval.ipl) = (yyvsp[-2].ipl); (yyval.ipl)->add((yyvsp[0].ip)); } #line 2141 "camp.tab.c" /* yacc.c:1646 */ break; case 34: #line 266 "camp.y" /* yacc.c:1646 */ { (yyval.ps) = (yyvsp[0].ps); } #line 2147 "camp.tab.c" /* yacc.c:1646 */ break; case 35: #line 267 "camp.y" /* yacc.c:1646 */ { (yyval.ps).pos = (yyvsp[0].stre)->getPos(); (yyval.ps).sym = symbol::literalTrans((yyvsp[0].stre)->getString()); } #line 2154 "camp.tab.c" /* yacc.c:1646 */ break; case 36: #line 272 "camp.y" /* yacc.c:1646 */ { (yyval.ip) = new idpair((yyvsp[0].ps).pos, (yyvsp[0].ps).sym); } #line 2160 "camp.tab.c" /* yacc.c:1646 */ break; case 37: #line 274 "camp.y" /* yacc.c:1646 */ { (yyval.ip) = new idpair((yyvsp[-2].ps).pos, (yyvsp[-2].ps).sym, (yyvsp[-1].ps).sym , (yyvsp[0].ps).sym); } #line 2166 "camp.tab.c" /* yacc.c:1646 */ break; case 38: #line 278 "camp.y" /* yacc.c:1646 */ { (yyval.ipl) = new idpairlist(); (yyval.ipl)->add((yyvsp[0].ip)); } #line 2172 "camp.tab.c" /* yacc.c:1646 */ break; case 39: #line 280 "camp.y" /* yacc.c:1646 */ { (yyval.ipl) = (yyvsp[-2].ipl); (yyval.ipl)->add((yyvsp[0].ip)); } #line 2178 "camp.tab.c" /* yacc.c:1646 */ break; case 40: #line 284 "camp.y" /* yacc.c:1646 */ { (yyval.vd) = (yyvsp[-1].vd); } #line 2184 "camp.tab.c" /* yacc.c:1646 */ break; case 41: #line 288 "camp.y" /* yacc.c:1646 */ { (yyval.vd) = new vardec((yyvsp[-1].t)->getPos(), (yyvsp[-1].t), (yyvsp[0].dil)); } #line 2190 "camp.tab.c" /* yacc.c:1646 */ break; case 42: #line 292 "camp.y" /* yacc.c:1646 */ { (yyval.t) = (yyvsp[0].t); } #line 2196 "camp.tab.c" /* yacc.c:1646 */ break; case 43: #line 293 "camp.y" /* yacc.c:1646 */ { (yyval.t) = new arrayTy((yyvsp[-1].n), (yyvsp[0].dim)); } #line 2202 "camp.tab.c" /* yacc.c:1646 */ break; case 44: #line 297 "camp.y" /* yacc.c:1646 */ { (yyval.t) = new nameTy((yyvsp[0].n)); } #line 2208 "camp.tab.c" /* yacc.c:1646 */ break; case 45: #line 301 "camp.y" /* yacc.c:1646 */ { (yyval.dim) = new dimensions((yyvsp[-1].pos)); } #line 2214 "camp.tab.c" /* yacc.c:1646 */ break; case 46: #line 302 "camp.y" /* yacc.c:1646 */ { (yyval.dim) = (yyvsp[-2].dim); (yyval.dim)->increase(); } #line 2220 "camp.tab.c" /* yacc.c:1646 */ break; case 47: #line 306 "camp.y" /* yacc.c:1646 */ { (yyval.elist) = new explist((yyvsp[-2].pos)); (yyval.elist)->add((yyvsp[-1].e)); } #line 2226 "camp.tab.c" /* yacc.c:1646 */ break; case 48: #line 308 "camp.y" /* yacc.c:1646 */ { (yyval.elist) = (yyvsp[-3].elist); (yyval.elist)->add((yyvsp[-1].e)); } #line 2232 "camp.tab.c" /* yacc.c:1646 */ break; case 49: #line 312 "camp.y" /* yacc.c:1646 */ { (yyval.dil) = new decidlist((yyvsp[0].di)->getPos()); (yyval.dil)->add((yyvsp[0].di)); } #line 2238 "camp.tab.c" /* yacc.c:1646 */ break; case 50: #line 314 "camp.y" /* yacc.c:1646 */ { (yyval.dil) = (yyvsp[-2].dil); (yyval.dil)->add((yyvsp[0].di)); } #line 2244 "camp.tab.c" /* yacc.c:1646 */ break; case 51: #line 318 "camp.y" /* yacc.c:1646 */ { (yyval.di) = new decid((yyvsp[0].dis)->getPos(), (yyvsp[0].dis)); } #line 2250 "camp.tab.c" /* yacc.c:1646 */ break; case 52: #line 320 "camp.y" /* yacc.c:1646 */ { (yyval.di) = new decid((yyvsp[-2].dis)->getPos(), (yyvsp[-2].dis), (yyvsp[0].vi)); } #line 2256 "camp.tab.c" /* yacc.c:1646 */ break; case 53: #line 324 "camp.y" /* yacc.c:1646 */ { (yyval.dis) = new decidstart((yyvsp[0].ps).pos, (yyvsp[0].ps).sym); } #line 2262 "camp.tab.c" /* yacc.c:1646 */ break; case 54: #line 325 "camp.y" /* yacc.c:1646 */ { (yyval.dis) = new decidstart((yyvsp[-1].ps).pos, (yyvsp[-1].ps).sym, (yyvsp[0].dim)); } #line 2268 "camp.tab.c" /* yacc.c:1646 */ break; case 55: #line 326 "camp.y" /* yacc.c:1646 */ { (yyval.dis) = new fundecidstart((yyvsp[-2].ps).pos, (yyvsp[-2].ps).sym, 0, new formals((yyvsp[-1].pos))); } #line 2275 "camp.tab.c" /* yacc.c:1646 */ break; case 56: #line 329 "camp.y" /* yacc.c:1646 */ { (yyval.dis) = new fundecidstart((yyvsp[-3].ps).pos, (yyvsp[-3].ps).sym, 0, (yyvsp[-1].fls)); } #line 2281 "camp.tab.c" /* yacc.c:1646 */ break; case 57: #line 333 "camp.y" /* yacc.c:1646 */ { (yyval.vi) = (yyvsp[0].e); } #line 2287 "camp.tab.c" /* yacc.c:1646 */ break; case 58: #line 334 "camp.y" /* yacc.c:1646 */ { (yyval.vi) = (yyvsp[0].ai); } #line 2293 "camp.tab.c" /* yacc.c:1646 */ break; case 59: #line 339 "camp.y" /* yacc.c:1646 */ { (yyval.b) = (yyvsp[-1].b); } #line 2299 "camp.tab.c" /* yacc.c:1646 */ break; case 60: #line 343 "camp.y" /* yacc.c:1646 */ { (yyval.ai) = new arrayinit((yyvsp[-1].pos)); } #line 2305 "camp.tab.c" /* yacc.c:1646 */ break; case 61: #line 345 "camp.y" /* yacc.c:1646 */ { (yyval.ai) = new arrayinit((yyvsp[-3].pos)); (yyval.ai)->addRest((yyvsp[-1].vi)); } #line 2311 "camp.tab.c" /* yacc.c:1646 */ break; case 62: #line 347 "camp.y" /* yacc.c:1646 */ { (yyval.ai) = (yyvsp[-1].ai); } #line 2317 "camp.tab.c" /* yacc.c:1646 */ break; case 63: #line 349 "camp.y" /* yacc.c:1646 */ { (yyval.ai) = (yyvsp[-3].ai); (yyval.ai)->addRest((yyvsp[-1].vi)); } #line 2323 "camp.tab.c" /* yacc.c:1646 */ break; case 64: #line 353 "camp.y" /* yacc.c:1646 */ { (yyval.ai) = new arrayinit((yyvsp[0].pos)); } #line 2329 "camp.tab.c" /* yacc.c:1646 */ break; case 65: #line 354 "camp.y" /* yacc.c:1646 */ { (yyval.ai) = (yyvsp[0].ai); } #line 2335 "camp.tab.c" /* yacc.c:1646 */ break; case 66: #line 355 "camp.y" /* yacc.c:1646 */ { (yyval.ai) = (yyvsp[-1].ai); } #line 2341 "camp.tab.c" /* yacc.c:1646 */ break; case 67: #line 359 "camp.y" /* yacc.c:1646 */ { (yyval.ai) = new arrayinit((yyvsp[0].vi)->getPos()); (yyval.ai)->add((yyvsp[0].vi));} #line 2348 "camp.tab.c" /* yacc.c:1646 */ break; case 68: #line 362 "camp.y" /* yacc.c:1646 */ { (yyval.ai) = (yyvsp[-2].ai); (yyval.ai)->add((yyvsp[0].vi)); } #line 2354 "camp.tab.c" /* yacc.c:1646 */ break; case 69: #line 366 "camp.y" /* yacc.c:1646 */ { (yyval.fls) = new formals((yyvsp[0].fl)->getPos()); (yyval.fls)->add((yyvsp[0].fl)); } #line 2360 "camp.tab.c" /* yacc.c:1646 */ break; case 70: #line 367 "camp.y" /* yacc.c:1646 */ { (yyval.fls) = new formals((yyvsp[-1].pos)); (yyval.fls)->addRest((yyvsp[0].fl)); } #line 2366 "camp.tab.c" /* yacc.c:1646 */ break; case 71: #line 369 "camp.y" /* yacc.c:1646 */ { (yyval.fls) = (yyvsp[-2].fls); (yyval.fls)->add((yyvsp[0].fl)); } #line 2372 "camp.tab.c" /* yacc.c:1646 */ break; case 72: #line 371 "camp.y" /* yacc.c:1646 */ { (yyval.fls) = (yyvsp[-2].fls); (yyval.fls)->addRest((yyvsp[0].fl)); } #line 2378 "camp.tab.c" /* yacc.c:1646 */ break; case 73: #line 375 "camp.y" /* yacc.c:1646 */ { (yyval.boo) = true; } #line 2384 "camp.tab.c" /* yacc.c:1646 */ break; case 74: #line 376 "camp.y" /* yacc.c:1646 */ { (yyval.boo) = false; } #line 2390 "camp.tab.c" /* yacc.c:1646 */ break; case 75: #line 381 "camp.y" /* yacc.c:1646 */ { (yyval.fl) = new formal((yyvsp[0].t)->getPos(), (yyvsp[0].t), 0, 0, (yyvsp[-1].boo), 0); } #line 2396 "camp.tab.c" /* yacc.c:1646 */ break; case 76: #line 383 "camp.y" /* yacc.c:1646 */ { (yyval.fl) = new formal((yyvsp[-1].t)->getPos(), (yyvsp[-1].t), (yyvsp[0].dis), 0, (yyvsp[-2].boo), 0); } #line 2402 "camp.tab.c" /* yacc.c:1646 */ break; case 77: #line 385 "camp.y" /* yacc.c:1646 */ { (yyval.fl) = new formal((yyvsp[-3].t)->getPos(), (yyvsp[-3].t), (yyvsp[-2].dis), (yyvsp[0].vi), (yyvsp[-4].boo), 0); } #line 2408 "camp.tab.c" /* yacc.c:1646 */ break; case 78: #line 388 "camp.y" /* yacc.c:1646 */ { bool k = checkKeyword((yyvsp[-1].ps).pos, (yyvsp[-1].ps).sym); (yyval.fl) = new formal((yyvsp[-2].t)->getPos(), (yyvsp[-2].t), (yyvsp[0].dis), 0, (yyvsp[-3].boo), k); } #line 2415 "camp.tab.c" /* yacc.c:1646 */ break; case 79: #line 391 "camp.y" /* yacc.c:1646 */ { bool k = checkKeyword((yyvsp[-3].ps).pos, (yyvsp[-3].ps).sym); (yyval.fl) = new formal((yyvsp[-4].t)->getPos(), (yyvsp[-4].t), (yyvsp[-2].dis), (yyvsp[0].vi), (yyvsp[-5].boo), k); } #line 2422 "camp.tab.c" /* yacc.c:1646 */ break; case 80: #line 397 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new fundec((yyvsp[-2].pos), (yyvsp[-4].t), (yyvsp[-3].ps).sym, new formals((yyvsp[-2].pos)), (yyvsp[0].s)); } #line 2428 "camp.tab.c" /* yacc.c:1646 */ break; case 81: #line 399 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new fundec((yyvsp[-3].pos), (yyvsp[-5].t), (yyvsp[-4].ps).sym, (yyvsp[-2].fls), (yyvsp[0].s)); } #line 2434 "camp.tab.c" /* yacc.c:1646 */ break; case 82: #line 403 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new recorddec((yyvsp[-2].pos), (yyvsp[-1].ps).sym, (yyvsp[0].b)); } #line 2440 "camp.tab.c" /* yacc.c:1646 */ break; case 83: #line 404 "camp.y" /* yacc.c:1646 */ { (yyval.d) = new typedec((yyvsp[-1].pos), (yyvsp[0].vd)); } #line 2446 "camp.tab.c" /* yacc.c:1646 */ break; case 84: #line 408 "camp.y" /* yacc.c:1646 */ { (yyval.slice) = new slice((yyvsp[0].pos), 0, 0); } #line 2452 "camp.tab.c" /* yacc.c:1646 */ break; case 85: #line 409 "camp.y" /* yacc.c:1646 */ { (yyval.slice) = new slice((yyvsp[0].pos), (yyvsp[-1].e), 0); } #line 2458 "camp.tab.c" /* yacc.c:1646 */ break; case 86: #line 410 "camp.y" /* yacc.c:1646 */ { (yyval.slice) = new slice((yyvsp[-1].pos), 0, (yyvsp[0].e)); } #line 2464 "camp.tab.c" /* yacc.c:1646 */ break; case 87: #line 411 "camp.y" /* yacc.c:1646 */ { (yyval.slice) = new slice((yyvsp[-1].pos), (yyvsp[-2].e), (yyvsp[0].e)); } #line 2470 "camp.tab.c" /* yacc.c:1646 */ break; case 88: #line 415 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new fieldExp((yyvsp[-1].pos), (yyvsp[-2].e), (yyvsp[0].ps).sym); } #line 2476 "camp.tab.c" /* yacc.c:1646 */ break; case 89: #line 416 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new subscriptExp((yyvsp[-2].pos), new nameExp((yyvsp[-3].n)->getPos(), (yyvsp[-3].n)), (yyvsp[-1].e)); } #line 2483 "camp.tab.c" /* yacc.c:1646 */ break; case 90: #line 418 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new subscriptExp((yyvsp[-2].pos), (yyvsp[-3].e), (yyvsp[-1].e)); } #line 2489 "camp.tab.c" /* yacc.c:1646 */ break; case 91: #line 419 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new sliceExp((yyvsp[-2].pos), new nameExp((yyvsp[-3].n)->getPos(), (yyvsp[-3].n)), (yyvsp[-1].slice)); } #line 2496 "camp.tab.c" /* yacc.c:1646 */ break; case 92: #line 421 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new sliceExp((yyvsp[-2].pos), (yyvsp[-3].e), (yyvsp[-1].slice)); } #line 2502 "camp.tab.c" /* yacc.c:1646 */ break; case 93: #line 422 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new callExp((yyvsp[-1].pos), new nameExp((yyvsp[-2].n)->getPos(), (yyvsp[-2].n)), new arglist()); } #line 2510 "camp.tab.c" /* yacc.c:1646 */ break; case 94: #line 426 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new callExp((yyvsp[-2].pos), new nameExp((yyvsp[-3].n)->getPos(), (yyvsp[-3].n)), (yyvsp[-1].alist)); } #line 2518 "camp.tab.c" /* yacc.c:1646 */ break; case 95: #line 429 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new callExp((yyvsp[-1].pos), (yyvsp[-2].e), new arglist()); } #line 2524 "camp.tab.c" /* yacc.c:1646 */ break; case 96: #line 431 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new callExp((yyvsp[-2].pos), (yyvsp[-3].e), (yyvsp[-1].alist)); } #line 2530 "camp.tab.c" /* yacc.c:1646 */ break; case 97: #line 433 "camp.y" /* yacc.c:1646 */ { (yyval.e) = (yyvsp[-1].e); } #line 2536 "camp.tab.c" /* yacc.c:1646 */ break; case 98: #line 435 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new nameExp((yyvsp[-1].n)->getPos(), (yyvsp[-1].n)); } #line 2542 "camp.tab.c" /* yacc.c:1646 */ break; case 99: #line 436 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new thisExp((yyvsp[0].pos)); } #line 2548 "camp.tab.c" /* yacc.c:1646 */ break; case 100: #line 440 "camp.y" /* yacc.c:1646 */ { (yyval.arg).name = symbol::nullsym; (yyval.arg).val=(yyvsp[0].e); } #line 2554 "camp.tab.c" /* yacc.c:1646 */ break; case 101: #line 441 "camp.y" /* yacc.c:1646 */ { (yyval.arg).name = (yyvsp[-2].ps).sym; (yyval.arg).val=(yyvsp[0].e); } #line 2560 "camp.tab.c" /* yacc.c:1646 */ break; case 102: #line 445 "camp.y" /* yacc.c:1646 */ { (yyval.alist) = new arglist(); (yyval.alist)->add((yyvsp[0].arg)); } #line 2566 "camp.tab.c" /* yacc.c:1646 */ break; case 103: #line 447 "camp.y" /* yacc.c:1646 */ { (yyval.alist) = new arglist(); (yyval.alist)->addRest((yyvsp[0].arg)); } #line 2572 "camp.tab.c" /* yacc.c:1646 */ break; case 104: #line 449 "camp.y" /* yacc.c:1646 */ { (yyval.alist) = (yyvsp[-2].alist); (yyval.alist)->add((yyvsp[0].arg)); } #line 2578 "camp.tab.c" /* yacc.c:1646 */ break; case 105: #line 451 "camp.y" /* yacc.c:1646 */ { (yyval.alist) = (yyvsp[-2].alist); (yyval.alist)->addRest((yyvsp[0].arg)); } #line 2584 "camp.tab.c" /* yacc.c:1646 */ break; case 106: #line 456 "camp.y" /* yacc.c:1646 */ { (yyval.alist) = new arglist(); (yyval.alist)->add((yyvsp[-2].e)); (yyval.alist)->add((yyvsp[0].e)); } #line 2590 "camp.tab.c" /* yacc.c:1646 */ break; case 107: #line 457 "camp.y" /* yacc.c:1646 */ { (yyval.alist) = (yyvsp[-2].alist); (yyval.alist)->add((yyvsp[0].e)); } #line 2596 "camp.tab.c" /* yacc.c:1646 */ break; case 108: #line 461 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new nameExp((yyvsp[0].n)->getPos(), (yyvsp[0].n)); } #line 2602 "camp.tab.c" /* yacc.c:1646 */ break; case 109: #line 462 "camp.y" /* yacc.c:1646 */ { (yyval.e) = (yyvsp[0].e); } #line 2608 "camp.tab.c" /* yacc.c:1646 */ break; case 110: #line 463 "camp.y" /* yacc.c:1646 */ { (yyval.e) = (yyvsp[0].e); } #line 2614 "camp.tab.c" /* yacc.c:1646 */ break; case 111: #line 464 "camp.y" /* yacc.c:1646 */ { (yyval.e) = (yyvsp[0].stre); } #line 2620 "camp.tab.c" /* yacc.c:1646 */ break; case 112: #line 466 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new scaleExp((yyvsp[-1].e)->getPos(), (yyvsp[-1].e), (yyvsp[0].e)); } #line 2626 "camp.tab.c" /* yacc.c:1646 */ break; case 113: #line 468 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new castExp((yyvsp[-2].n)->getPos(), new nameTy((yyvsp[-2].n)), (yyvsp[0].e)); } #line 2632 "camp.tab.c" /* yacc.c:1646 */ break; case 114: #line 470 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new castExp((yyvsp[-3].n)->getPos(), new arrayTy((yyvsp[-3].n), (yyvsp[-2].dim)), (yyvsp[0].e)); } #line 2638 "camp.tab.c" /* yacc.c:1646 */ break; case 115: #line 472 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new unaryExp((yyvsp[-1].ps).pos, (yyvsp[0].e), (yyvsp[-1].ps).sym); } #line 2644 "camp.tab.c" /* yacc.c:1646 */ break; case 116: #line 474 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new unaryExp((yyvsp[-1].ps).pos, (yyvsp[0].e), (yyvsp[-1].ps).sym); } #line 2650 "camp.tab.c" /* yacc.c:1646 */ break; case 117: #line 475 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new unaryExp((yyvsp[-1].ps).pos, (yyvsp[0].e), (yyvsp[-1].ps).sym); } #line 2656 "camp.tab.c" /* yacc.c:1646 */ break; case 118: #line 476 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2662 "camp.tab.c" /* yacc.c:1646 */ break; case 119: #line 477 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2668 "camp.tab.c" /* yacc.c:1646 */ break; case 120: #line 478 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2674 "camp.tab.c" /* yacc.c:1646 */ break; case 121: #line 479 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2680 "camp.tab.c" /* yacc.c:1646 */ break; case 122: #line 480 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2686 "camp.tab.c" /* yacc.c:1646 */ break; case 123: #line 481 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2692 "camp.tab.c" /* yacc.c:1646 */ break; case 124: #line 482 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2698 "camp.tab.c" /* yacc.c:1646 */ break; case 125: #line 483 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2704 "camp.tab.c" /* yacc.c:1646 */ break; case 126: #line 484 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2710 "camp.tab.c" /* yacc.c:1646 */ break; case 127: #line 485 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2716 "camp.tab.c" /* yacc.c:1646 */ break; case 128: #line 486 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2722 "camp.tab.c" /* yacc.c:1646 */ break; case 129: #line 487 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new equalityExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2728 "camp.tab.c" /* yacc.c:1646 */ break; case 130: #line 488 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new equalityExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2734 "camp.tab.c" /* yacc.c:1646 */ break; case 131: #line 489 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new andExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2740 "camp.tab.c" /* yacc.c:1646 */ break; case 132: #line 490 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new orExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2746 "camp.tab.c" /* yacc.c:1646 */ break; case 133: #line 491 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2752 "camp.tab.c" /* yacc.c:1646 */ break; case 134: #line 492 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2758 "camp.tab.c" /* yacc.c:1646 */ break; case 135: #line 493 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2764 "camp.tab.c" /* yacc.c:1646 */ break; case 136: #line 494 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2770 "camp.tab.c" /* yacc.c:1646 */ break; case 137: #line 495 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2776 "camp.tab.c" /* yacc.c:1646 */ break; case 138: #line 497 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new newRecordExp((yyvsp[-1].pos), (yyvsp[0].t)); } #line 2782 "camp.tab.c" /* yacc.c:1646 */ break; case 139: #line 499 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new newArrayExp((yyvsp[-2].pos), (yyvsp[-1].t), (yyvsp[0].elist), 0, 0); } #line 2788 "camp.tab.c" /* yacc.c:1646 */ break; case 140: #line 501 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new newArrayExp((yyvsp[-3].pos), (yyvsp[-2].t), (yyvsp[-1].elist), (yyvsp[0].dim), 0); } #line 2794 "camp.tab.c" /* yacc.c:1646 */ break; case 141: #line 503 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new newArrayExp((yyvsp[-2].pos), (yyvsp[-1].t), 0, (yyvsp[0].dim), 0); } #line 2800 "camp.tab.c" /* yacc.c:1646 */ break; case 142: #line 505 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new newArrayExp((yyvsp[-3].pos), (yyvsp[-2].t), 0, (yyvsp[-1].dim), (yyvsp[0].ai)); } #line 2806 "camp.tab.c" /* yacc.c:1646 */ break; case 143: #line 507 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new newFunctionExp((yyvsp[-4].pos), (yyvsp[-3].t), new formals((yyvsp[-2].pos)), (yyvsp[0].s)); } #line 2812 "camp.tab.c" /* yacc.c:1646 */ break; case 144: #line 509 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new newFunctionExp((yyvsp[-5].pos), new arrayTy((yyvsp[-4].t)->getPos(), (yyvsp[-4].t), (yyvsp[-3].dim)), new formals((yyvsp[-2].pos)), (yyvsp[0].s)); } #line 2821 "camp.tab.c" /* yacc.c:1646 */ break; case 145: #line 514 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new newFunctionExp((yyvsp[-5].pos), (yyvsp[-4].t), (yyvsp[-2].fls), (yyvsp[0].s)); } #line 2827 "camp.tab.c" /* yacc.c:1646 */ break; case 146: #line 516 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new newFunctionExp((yyvsp[-6].pos), new arrayTy((yyvsp[-5].t)->getPos(), (yyvsp[-5].t), (yyvsp[-4].dim)), (yyvsp[-2].fls), (yyvsp[0].s)); } #line 2836 "camp.tab.c" /* yacc.c:1646 */ break; case 147: #line 521 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new conditionalExp((yyvsp[-3].pos), (yyvsp[-4].e), (yyvsp[-2].e), (yyvsp[0].e)); } #line 2842 "camp.tab.c" /* yacc.c:1646 */ break; case 148: #line 522 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new assignExp((yyvsp[-1].pos), (yyvsp[-2].e), (yyvsp[0].e)); } #line 2848 "camp.tab.c" /* yacc.c:1646 */ break; case 149: #line 523 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new callExp((yyvsp[-2].pos), new nameExp((yyvsp[-2].pos), SYM_TUPLE), (yyvsp[-1].alist)); } #line 2854 "camp.tab.c" /* yacc.c:1646 */ break; case 150: #line 525 "camp.y" /* yacc.c:1646 */ { (yyvsp[-1].j)->pushFront((yyvsp[-2].e)); (yyvsp[-1].j)->pushBack((yyvsp[0].e)); (yyval.e) = (yyvsp[-1].j); } #line 2860 "camp.tab.c" /* yacc.c:1646 */ break; case 151: #line 527 "camp.y" /* yacc.c:1646 */ { (yyvsp[0].se)->setSide(camp::OUT); joinExp *jexp = new joinExp((yyvsp[0].se)->getPos(), SYM_DOTS); (yyval.e)=jexp; jexp->pushBack((yyvsp[-1].e)); jexp->pushBack((yyvsp[0].se)); } #line 2870 "camp.tab.c" /* yacc.c:1646 */ break; case 152: #line 533 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new prefixExp((yyvsp[-1].ps).pos, (yyvsp[0].e), SYM_PLUS); } #line 2876 "camp.tab.c" /* yacc.c:1646 */ break; case 153: #line 535 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new prefixExp((yyvsp[-1].ps).pos, (yyvsp[0].e), SYM_MINUS); } #line 2882 "camp.tab.c" /* yacc.c:1646 */ break; case 154: #line 538 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new postfixExp((yyvsp[0].ps).pos, (yyvsp[-1].e), SYM_PLUS); } #line 2888 "camp.tab.c" /* yacc.c:1646 */ break; case 155: #line 539 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new selfExp((yyvsp[-1].ps).pos, (yyvsp[-2].e), (yyvsp[-1].ps).sym, (yyvsp[0].e)); } #line 2894 "camp.tab.c" /* yacc.c:1646 */ break; case 156: #line 541 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new quoteExp((yyvsp[-3].pos), (yyvsp[-1].b)); } #line 2900 "camp.tab.c" /* yacc.c:1646 */ break; case 157: #line 547 "camp.y" /* yacc.c:1646 */ { (yyval.j) = new joinExp((yyvsp[0].ps).pos,(yyvsp[0].ps).sym); } #line 2906 "camp.tab.c" /* yacc.c:1646 */ break; case 158: #line 549 "camp.y" /* yacc.c:1646 */ { (yyval.j) = (yyvsp[0].j); } #line 2912 "camp.tab.c" /* yacc.c:1646 */ break; case 159: #line 551 "camp.y" /* yacc.c:1646 */ { (yyvsp[-1].se)->setSide(camp::OUT); (yyval.j) = (yyvsp[0].j); (yyval.j)->pushFront((yyvsp[-1].se)); } #line 2919 "camp.tab.c" /* yacc.c:1646 */ break; case 160: #line 554 "camp.y" /* yacc.c:1646 */ { (yyvsp[0].se)->setSide(camp::IN); (yyval.j) = (yyvsp[-1].j); (yyval.j)->pushBack((yyvsp[0].se)); } #line 2926 "camp.tab.c" /* yacc.c:1646 */ break; case 161: #line 557 "camp.y" /* yacc.c:1646 */ { (yyvsp[-2].se)->setSide(camp::OUT); (yyvsp[0].se)->setSide(camp::IN); (yyval.j) = (yyvsp[-1].j); (yyval.j)->pushFront((yyvsp[-2].se)); (yyval.j)->pushBack((yyvsp[0].se)); } #line 2933 "camp.tab.c" /* yacc.c:1646 */ break; case 162: #line 562 "camp.y" /* yacc.c:1646 */ { (yyval.se) = new specExp((yyvsp[-2].ps).pos, (yyvsp[-2].ps).sym, (yyvsp[-1].e)); } #line 2939 "camp.tab.c" /* yacc.c:1646 */ break; case 163: #line 563 "camp.y" /* yacc.c:1646 */ { (yyval.se) = new specExp((yyvsp[-2].pos), symbol::opTrans("spec"), (yyvsp[-1].e)); } #line 2945 "camp.tab.c" /* yacc.c:1646 */ break; case 164: #line 565 "camp.y" /* yacc.c:1646 */ { (yyval.se) = new specExp((yyvsp[-4].pos), symbol::opTrans("spec"), new pairExp((yyvsp[-2].pos), (yyvsp[-3].e), (yyvsp[-1].e))); } #line 2952 "camp.tab.c" /* yacc.c:1646 */ break; case 165: #line 568 "camp.y" /* yacc.c:1646 */ { (yyval.se) = new specExp((yyvsp[-6].pos), symbol::opTrans("spec"), new tripleExp((yyvsp[-4].pos), (yyvsp[-5].e), (yyvsp[-3].e), (yyvsp[-1].e))); } #line 2959 "camp.tab.c" /* yacc.c:1646 */ break; case 166: #line 573 "camp.y" /* yacc.c:1646 */ { (yyval.j) = new joinExp((yyvsp[0].ps).pos, (yyvsp[0].ps).sym); } #line 2965 "camp.tab.c" /* yacc.c:1646 */ break; case 167: #line 575 "camp.y" /* yacc.c:1646 */ { (yyval.j) = new joinExp((yyvsp[-2].ps).pos, (yyvsp[-2].ps).sym); (yyval.j)->pushBack((yyvsp[-1].e)); } #line 2971 "camp.tab.c" /* yacc.c:1646 */ break; case 168: #line 577 "camp.y" /* yacc.c:1646 */ { (yyval.j) = new joinExp((yyvsp[-2].ps).pos, (yyvsp[-2].ps).sym); (yyval.j)->pushBack((yyvsp[-1].e)); } #line 2977 "camp.tab.c" /* yacc.c:1646 */ break; case 169: #line 578 "camp.y" /* yacc.c:1646 */ { (yyval.j) = new joinExp((yyvsp[0].ps).pos, (yyvsp[0].ps).sym); } #line 2983 "camp.tab.c" /* yacc.c:1646 */ break; case 170: #line 579 "camp.y" /* yacc.c:1646 */ { (yyval.j) = new joinExp((yyvsp[0].ps).pos, (yyvsp[0].ps).sym); } #line 2989 "camp.tab.c" /* yacc.c:1646 */ break; case 171: #line 583 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-1].ps).pos, (yyvsp[0].e), (yyvsp[-1].ps).sym, new booleanExp((yyvsp[-1].ps).pos, false)); } #line 2996 "camp.tab.c" /* yacc.c:1646 */ break; case 172: #line 586 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new ternaryExp((yyvsp[-3].ps).pos, (yyvsp[-2].e), (yyvsp[-3].ps).sym, (yyvsp[0].e), new booleanExp((yyvsp[-3].ps).pos, false)); } #line 3003 "camp.tab.c" /* yacc.c:1646 */ break; case 173: #line 589 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-2].ps).pos, (yyvsp[0].e), (yyvsp[-2].ps).sym, new booleanExp((yyvsp[-1].ps).pos, true)); } #line 3010 "camp.tab.c" /* yacc.c:1646 */ break; case 174: #line 592 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new ternaryExp((yyvsp[-4].ps).pos, (yyvsp[-2].e), (yyvsp[-4].ps).sym, (yyvsp[0].e), new booleanExp((yyvsp[-3].ps).pos, true)); } #line 3017 "camp.tab.c" /* yacc.c:1646 */ break; case 175: #line 597 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new unaryExp((yyvsp[-1].ps).pos, (yyvsp[0].e), (yyvsp[-1].ps).sym); } #line 3023 "camp.tab.c" /* yacc.c:1646 */ break; case 176: #line 599 "camp.y" /* yacc.c:1646 */ { (yyval.e) = new binaryExp((yyvsp[-3].ps).pos, (yyvsp[-2].e), (yyvsp[-3].ps).sym, (yyvsp[0].e)); } #line 3029 "camp.tab.c" /* yacc.c:1646 */ break; case 177: #line 603 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new emptyStm((yyvsp[0].pos)); } #line 3035 "camp.tab.c" /* yacc.c:1646 */ break; case 178: #line 604 "camp.y" /* yacc.c:1646 */ { (yyval.s) = (yyvsp[0].s); } #line 3041 "camp.tab.c" /* yacc.c:1646 */ break; case 179: #line 605 "camp.y" /* yacc.c:1646 */ { (yyval.s) = (yyvsp[-1].s); } #line 3047 "camp.tab.c" /* yacc.c:1646 */ break; case 180: #line 607 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new ifStm((yyvsp[-4].pos), (yyvsp[-2].e), (yyvsp[0].s)); } #line 3053 "camp.tab.c" /* yacc.c:1646 */ break; case 181: #line 609 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new ifStm((yyvsp[-6].pos), (yyvsp[-4].e), (yyvsp[-2].s), (yyvsp[0].s)); } #line 3059 "camp.tab.c" /* yacc.c:1646 */ break; case 182: #line 611 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new whileStm((yyvsp[-4].pos), (yyvsp[-2].e), (yyvsp[0].s)); } #line 3065 "camp.tab.c" /* yacc.c:1646 */ break; case 183: #line 613 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new doStm((yyvsp[-6].pos), (yyvsp[-5].s), (yyvsp[-2].e)); } #line 3071 "camp.tab.c" /* yacc.c:1646 */ break; case 184: #line 615 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new forStm((yyvsp[-8].pos), (yyvsp[-6].run), (yyvsp[-4].e), (yyvsp[-2].sel), (yyvsp[0].s)); } #line 3077 "camp.tab.c" /* yacc.c:1646 */ break; case 185: #line 617 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new extendedForStm((yyvsp[-7].pos), (yyvsp[-5].t), (yyvsp[-4].ps).sym, (yyvsp[-2].e), (yyvsp[0].s)); } #line 3083 "camp.tab.c" /* yacc.c:1646 */ break; case 186: #line 618 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new breakStm((yyvsp[-1].pos)); } #line 3089 "camp.tab.c" /* yacc.c:1646 */ break; case 187: #line 619 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new continueStm((yyvsp[-1].pos)); } #line 3095 "camp.tab.c" /* yacc.c:1646 */ break; case 188: #line 620 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new returnStm((yyvsp[-1].pos)); } #line 3101 "camp.tab.c" /* yacc.c:1646 */ break; case 189: #line 621 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new returnStm((yyvsp[-2].pos), (yyvsp[-1].e)); } #line 3107 "camp.tab.c" /* yacc.c:1646 */ break; case 190: #line 625 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new expStm((yyvsp[0].e)->getPos(), (yyvsp[0].e)); } #line 3113 "camp.tab.c" /* yacc.c:1646 */ break; case 191: #line 629 "camp.y" /* yacc.c:1646 */ { (yyval.s) = new blockStm((yyvsp[0].b)->getPos(), (yyvsp[0].b)); } #line 3119 "camp.tab.c" /* yacc.c:1646 */ break; case 192: #line 633 "camp.y" /* yacc.c:1646 */ { (yyval.run) = 0; } #line 3125 "camp.tab.c" /* yacc.c:1646 */ break; case 193: #line 634 "camp.y" /* yacc.c:1646 */ { (yyval.run) = (yyvsp[0].sel); } #line 3131 "camp.tab.c" /* yacc.c:1646 */ break; case 194: #line 635 "camp.y" /* yacc.c:1646 */ { (yyval.run) = (yyvsp[0].vd); } #line 3137 "camp.tab.c" /* yacc.c:1646 */ break; case 195: #line 639 "camp.y" /* yacc.c:1646 */ { (yyval.e) = 0; } #line 3143 "camp.tab.c" /* yacc.c:1646 */ break; case 196: #line 640 "camp.y" /* yacc.c:1646 */ { (yyval.e) = (yyvsp[0].e); } #line 3149 "camp.tab.c" /* yacc.c:1646 */ break; case 197: #line 644 "camp.y" /* yacc.c:1646 */ { (yyval.sel) = 0; } #line 3155 "camp.tab.c" /* yacc.c:1646 */ break; case 198: #line 645 "camp.y" /* yacc.c:1646 */ { (yyval.sel) = (yyvsp[0].sel); } #line 3161 "camp.tab.c" /* yacc.c:1646 */ break; case 199: #line 649 "camp.y" /* yacc.c:1646 */ { (yyval.sel) = new stmExpList((yyvsp[0].s)->getPos()); (yyval.sel)->add((yyvsp[0].s)); } #line 3167 "camp.tab.c" /* yacc.c:1646 */ break; case 200: #line 651 "camp.y" /* yacc.c:1646 */ { (yyval.sel) = (yyvsp[-2].sel); (yyval.sel)->add((yyvsp[0].s)); } #line 3173 "camp.tab.c" /* yacc.c:1646 */ break; #line 3177 "camp.tab.c" /* yacc.c:1646 */ default: break; } /* User semantic actions sometimes alter yychar, and that requires that yytoken be updated with the new translation. We take the approach of translating immediately before every use of yytoken. One alternative is translating here after every semantic action, but that translation would be missed if the semantic action invokes YYABORT, YYACCEPT, or YYERROR immediately after altering yychar or if it invokes YYBACKUP. In the case of YYABORT or YYACCEPT, an incorrect destructor might then be invoked immediately. In the case of YYERROR or YYBACKUP, subsequent parser actions might lead to an incorrect destructor call or verbose syntax error message before the lookahead is translated. */ YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyn], &yyval, &yyloc); YYPOPSTACK (yylen); yylen = 0; YY_STACK_PRINT (yyss, yyssp); *++yyvsp = yyval; /* Now 'shift' the result of the reduction. Determine what state that goes to, based on the state we popped back to and the rule number reduced by. */ yyn = yyr1[yyn]; yystate = yypgoto[yyn - YYNTOKENS] + *yyssp; if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp) yystate = yytable[yystate]; else yystate = yydefgoto[yyn - YYNTOKENS]; goto yynewstate; /*--------------------------------------. | yyerrlab -- here on detecting error. | `--------------------------------------*/ yyerrlab: /* Make sure we have latest lookahead translation. See comments at user semantic actions for why this is necessary. */ yytoken = yychar == YYEMPTY ? YYEMPTY : YYTRANSLATE (yychar); /* If not already recovering from an error, report this error. */ if (!yyerrstatus) { ++yynerrs; #if ! YYERROR_VERBOSE yyerror (YY_("syntax error")); #else # define YYSYNTAX_ERROR yysyntax_error (&yymsg_alloc, &yymsg, \ yyssp, yytoken) { char const *yymsgp = YY_("syntax error"); int yysyntax_error_status; yysyntax_error_status = YYSYNTAX_ERROR; if (yysyntax_error_status == 0) yymsgp = yymsg; else if (yysyntax_error_status == 1) { if (yymsg != yymsgbuf) YYSTACK_FREE (yymsg); yymsg = (char *) YYSTACK_ALLOC (yymsg_alloc); if (!yymsg) { yymsg = yymsgbuf; yymsg_alloc = sizeof yymsgbuf; yysyntax_error_status = 2; } else { yysyntax_error_status = YYSYNTAX_ERROR; yymsgp = yymsg; } } yyerror (yymsgp); if (yysyntax_error_status == 2) goto yyexhaustedlab; } # undef YYSYNTAX_ERROR #endif } if (yyerrstatus == 3) { /* If just tried and failed to reuse lookahead token after an error, discard it. */ if (yychar <= YYEOF) { /* Return failure if at end of input. */ if (yychar == YYEOF) YYABORT; } else { yydestruct ("Error: discarding", yytoken, &yylval); yychar = YYEMPTY; } } /* Else will try to reuse lookahead token after shifting the error token. */ goto yyerrlab1; /*---------------------------------------------------. | yyerrorlab -- error raised explicitly by YYERROR. | `---------------------------------------------------*/ yyerrorlab: /* Pacify compilers like GCC when the user code never invokes YYERROR and the label yyerrorlab therefore never appears in user code. */ if (/*CONSTCOND*/ 0) goto yyerrorlab; /* Do not reclaim the symbols of the rule whose action triggered this YYERROR. */ YYPOPSTACK (yylen); yylen = 0; YY_STACK_PRINT (yyss, yyssp); yystate = *yyssp; goto yyerrlab1; /*-------------------------------------------------------------. | yyerrlab1 -- common code for both syntax error and YYERROR. | `-------------------------------------------------------------*/ yyerrlab1: yyerrstatus = 3; /* Each real token shifted decrements this. */ for (;;) { yyn = yypact[yystate]; if (!yypact_value_is_default (yyn)) { yyn += YYTERROR; if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR) { yyn = yytable[yyn]; if (0 < yyn) break; } } /* Pop the current state because it cannot handle the error token. */ if (yyssp == yyss) YYABORT; yydestruct ("Error: popping", yystos[yystate], yyvsp); YYPOPSTACK (1); yystate = *yyssp; YY_STACK_PRINT (yyss, yyssp); } YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN *++yyvsp = yylval; YY_IGNORE_MAYBE_UNINITIALIZED_END /* Shift the error token. */ YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp); yystate = yyn; goto yynewstate; /*-------------------------------------. | yyacceptlab -- YYACCEPT comes here. | `-------------------------------------*/ yyacceptlab: yyresult = 0; goto yyreturn; /*-----------------------------------. | yyabortlab -- YYABORT comes here. | `-----------------------------------*/ yyabortlab: yyresult = 1; goto yyreturn; #if !defined yyoverflow || YYERROR_VERBOSE /*-------------------------------------------------. | yyexhaustedlab -- memory exhaustion comes here. | `-------------------------------------------------*/ yyexhaustedlab: yyerror (YY_("memory exhausted")); yyresult = 2; /* Fall through. */ #endif yyreturn: if (yychar != YYEMPTY) { /* Make sure we have latest lookahead translation. See comments at user semantic actions for why this is necessary. */ yytoken = YYTRANSLATE (yychar); yydestruct ("Cleanup: discarding lookahead", yytoken, &yylval); } /* Do not reclaim the symbols of the rule whose action triggered this YYABORT or YYACCEPT. */ YYPOPSTACK (yylen); YY_STACK_PRINT (yyss, yyssp); while (yyssp != yyss) { yydestruct ("Cleanup: popping", yystos[*yyssp], yyvsp); YYPOPSTACK (1); } #ifndef yyoverflow if (yyss != yyssa) YYSTACK_FREE (yyss); #endif #if YYERROR_VERBOSE if (yymsg != yymsgbuf) YYSTACK_FREE (yymsg); #endif return yyresult; } ./asymptote-2.41/coder.cc0000644000175000017500000001720013064427076015146 0ustar norbertnorbert/***** * coder.cc * Andy Hammerlindl 2004/11/06 * * Handles encoding of syntax into programs. It's methods are called by * abstract syntax objects during translation to construct the virtual machine * code. *****/ #include #include "errormsg.h" #include "coder.h" #include "genv.h" #include "entry.h" #include "builtin.h" using namespace sym; using namespace types; namespace trans { namespace { function *inittype(); function *bootuptype(); } vm::lambda *newLambda(string name) { assert(!name.empty()); vm::lambda *l = new vm::lambda; #ifdef DEBUG_FRAME l->name = name; #endif return l; } // Used purely for global variables and static code blocks of file // level modules. coder::coder(position pos, string name, modifier sord) #if SIMPLE_FRAME : level(frame::indirect_frame(name)), #else : level(new frame(name, 0, 0)), #endif recordLevel(0), recordType(0), isCodelet(false), l(newLambda(name)), funtype(bootuptype()), parent(0), sord(sord), perm(DEFAULT_PERM), program(new vm::program), curPos(pos) { sord_stack.push(sord); } // Defines a new function environment. coder::coder(position pos, string name, function *t, coder *parent, modifier sord, bool reframe) : level(reframe ? new frame(name, parent->getFrame(), t->sig.getNumFormals()) : parent->getFrame()), recordLevel(parent->recordLevel), recordType(parent->recordType), isCodelet(!reframe), l(newLambda(name)), funtype(t), parent(parent), sord(sord), perm(DEFAULT_PERM), program(new vm::program), curPos(pos) { sord_stack.push(sord); } // Start encoding the body of the record. The function being encoded // is the record's initializer. coder::coder(position pos, record *t, coder *parent, modifier sord) : level(t->getLevel()), recordLevel(t->getLevel()), recordType(t), isCodelet(false), l(t->getInit()), funtype(inittype()), parent(parent), sord(sord), perm(DEFAULT_PERM), program(new vm::program), curPos(pos) { sord_stack.push(sord); } coder coder::newFunction(position pos, string name, function *t, modifier sord) { return coder(pos, name, t, this, sord); } coder coder::newCodelet(position pos) { return coder(pos, "", new function(primVoid()), this, DEFAULT_DYNAMIC, false); } record *coder::newRecord(symbol id) { frame *underlevel = getFrame(); frame *level = new frame(id, underlevel, 0); record *r = new record(id, level); return r; } coder coder::newRecordInit(position pos, record *r, modifier sord) { return coder(pos, r, this, sord); } #ifdef DEBUG_BLTIN void assertBltinLookup(inst::opcode op, item it) { if (op == inst::builtin) { string name=lookupBltin(vm::get(it)); assert(!name.empty()); } } #endif void coder::encodePop() { if (isStatic() && !isTopLevel()) { assert(parent); parent->encodePop(); } else { #ifdef COMBO vm::program::label end = program->end(); --end; inst& lastInst = *end; if (lastInst.op == inst::varsave) { lastInst.op = inst::varpop; return; } if (lastInst.op == inst::fieldsave) { lastInst.op = inst::fieldpop; return; } // TODO: push+pop into no op. #endif // No combo applicable. Just encode a usual pop. encode(inst::pop); } } bool coder::encode(frame *f) { frame *toplevel = getFrame(); if (f == 0) { encode(inst::constpush,(item)0); return true; } else if (f == toplevel) { encode(inst::pushclosure); return true; } else { encode(inst::varpush,toplevel->parentIndex()); return encode(f, toplevel->getParent()); } } bool coder::encode(frame *dest, frame *top) { if (dest == 0) { // Change to encodePop? encode(inst::pop); encode(inst::constpush,(item)0); } else { frame *level = top; while (level != dest) { if (level == 0) { // Frame request was in an improper scope. return false; } encode(inst::fieldpush, level->parentIndex()); level = level->getParent(); } } //cerr << "succeeded\n"; return true; } vm::program::label coder::encodeEmptyJump(inst::opcode op) { // Get the end position before encoding the label. Once encoded, this will // point to the instruction. vm::program::label pos = program->end(); encode(op); return pos; } void replaceEmptyJump(vm::program::label from, vm::program::label to) { from->ref = to; } label coder::defNewLabel() { if (isStatic()) return parent->defNewLabel(); label l = new label_t(); assert(!l->location.defined()); assert(!l->firstUse.defined()); return defLabel(l); } label coder::defLabel(label label) { if (isStatic()) return parent->defLabel(label); //cout << "defining label " << label << endl; assert(!label->location.defined()); //vm::program::label here = program->end(); label->location = program->end(); assert(label->location.defined()); if (label->firstUse.defined()) { replaceEmptyJump(label->firstUse, program->end()); //vm::printInst(cout, label->firstUse, program->begin()); //cout << endl; if (label->moreUses) { typedef label_t::useVector useVector; useVector& v = *label->moreUses; for (useVector::iterator p = v.begin(); p != v.end(); ++p) { replaceEmptyJump(*p, program->end()); } } } return label; } void coder::useLabel(inst::opcode op, label label) { if (isStatic()) return parent->useLabel(op,label); if (label->location.defined()) { encode(op, label->location); } else { if (label->firstUse.defined()) { // Store additional uses in the moreUses array. if (!label->moreUses) label->moreUses = new label_t::useVector; label->moreUses->push_back(encodeEmptyJump(op)); } else { label->firstUse = encodeEmptyJump(op); assert(label->firstUse.defined()); assert(!label->location.defined()); } } } label coder::fwdLabel() { if (isStatic()) return parent->fwdLabel(); // Create a new label without specifying its position. label l = new label_t(); assert(!l->location.defined()); assert(!l->firstUse.defined()); //cout << "forward label " << l << endl; return l; } bool coder::usesClosureSinceLabel(label l) { assert(l->location.defined()); for (vm::program::label i = l->location; i != program->end(); ++i) if (i->op == inst::pushclosure) return true; return false; } void coder::encodePatch(label from, label to) { assert(from->location.defined()); assert(to->location.defined()); assert(from->location->op == inst::nop); from->location->op = inst::jmp; from->location->ref = to->location; } void coder::markPos(position pos) { curPos = pos; } // When translating the function is finished, this ties up loose ends // and returns the lambda. vm::lambda *coder::close() { // These steps must be done dynamically, not statically. sord = EXPLICIT_DYNAMIC; sord_stack.push(sord); // Add a return for void types; may be redundant. if (funtype->result->kind == types::ty_void) encode(inst::ret); l->code = program; l->parentIndex = level->parentIndex(); l->framesize = level->size(); sord_stack.pop(); sord = sord_stack.top(); return l; } void coder::closeRecord() { // Put record into finished state. encode(inst::pushclosure); close(); } bool coder::isRecord() { return (funtype==inittype()); } namespace { function *inittype() { static function t(types::primVoid()); return &t; } function *bootuptype() { static function t(types::primVoid()); return &t; } } // private } // namespace trans ./asymptote-2.41/xstream.h0000644000175000017500000001442113064427076015401 0ustar norbertnorbert/* C++ interface to the XDR External Data Representation I/O routines Version 1.46 Copyright (C) 1999-2007 John C. Bowman This program is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #ifndef __xstream_h__ #define __xstream_h__ 1 #ifndef _ALL_SOURCE #define _ALL_SOURCE 1 #endif #include #include #include #define quad_t long long #define u_quad_t unsigned long long #ifdef __CYGWIN__ extern "C" int fseeko(FILE *, off_t, int); extern "C" off_t ftello(FILE *); #define xdr_longlong_t xdr_int64_t #define xdr_u_longlong_t xdr_uint64_t #endif #ifdef _POSIX_SOURCE #undef _POSIX_SOURCE #include #define _POSIX_SOURCE #else #include #endif namespace xdr { class xbyte { unsigned char c; public: xbyte() {} xbyte(unsigned char c0) : c(c0) {} xbyte(int c0) : c((unsigned char) c0) {} xbyte(unsigned int c0) : c((unsigned char) c0) {} int byte() const {return c;} operator unsigned char () const {return c;} }; class xios { public: enum io_state {goodbit=0, eofbit=1, failbit=2, badbit=4}; enum open_mode {in=1, out=2, app=8, trunc=16}; enum seekdir {beg=SEEK_SET, cur=SEEK_CUR, end=SEEK_END}; private: int _state; public: int good() const { return _state == 0; } int eof() const { return _state & eofbit; } int fail() const { return !good();} int bad() const { return _state & badbit; } void clear(int state = 0) {_state=state;} void set(int flag) {_state |= flag;} operator void*() const { return fail() ? (void*)0 : (void*)(-1); } int operator!() const { return fail(); } }; class xstream : public xios { protected: FILE *buf; public: virtual ~xstream() {} xstream() {buf=NULL;} void precision(int) {} xstream& seek(off_t pos, seekdir dir=beg) { if(buf) { clear(); if(fseeko(buf,pos,dir) != 0) set(failbit); } return *this; } off_t tell() { return ftello(buf); } }; #define IXSTREAM(T,N) ixstream& operator >> (T& x) \ {if(!xdr_##N(&xdri, &x)) set(eofbit); return *this;} #define OXSTREAM(T,N) oxstream& operator << (T x) \ {if(!xdr_##N(&xdro, &x)) set(badbit); return *this;} class ixstream : virtual public xstream { protected: XDR xdri; public: void open(const char *filename, open_mode=in) { clear(); buf=fopen(filename,"r"); if(buf) xdrstdio_create(&xdri,buf,XDR_DECODE); else set(badbit); } void close() { if(buf) { #ifndef _CRAY xdr_destroy(&xdri); #endif fclose(buf); buf=NULL; } } ixstream() {} ixstream(const char *filename) {open(filename);} ixstream(const char *filename, open_mode mode) {open(filename,mode);} virtual ~ixstream() {close();} typedef ixstream& (*imanip)(ixstream&); ixstream& operator >> (imanip func) { return (*func)(*this); } IXSTREAM(int,int); IXSTREAM(unsigned int,u_int); IXSTREAM(long,long); IXSTREAM(unsigned long,u_long); IXSTREAM(long long,longlong_t); IXSTREAM(unsigned long long,u_longlong_t); IXSTREAM(short,short); IXSTREAM(unsigned short,u_short); IXSTREAM(char,char); #ifndef _CRAY IXSTREAM(unsigned char,u_char); #endif IXSTREAM(float,float); IXSTREAM(double,double); ixstream& operator >> (xbyte& x) { x=fgetc(buf); if(x.byte() == EOF) set(eofbit); return *this; } }; class oxstream : virtual public xstream { protected: XDR xdro; public: void open(const char *filename, open_mode mode=trunc) { clear(); buf=fopen(filename,(mode & app) ? "a" : "w"); if(buf) xdrstdio_create(&xdro,buf,XDR_ENCODE); else set(badbit); } void close() { if(buf) { #ifndef _CRAY xdr_destroy(&xdro); #endif fclose(buf); buf=NULL; } } oxstream() {} oxstream(const char *filename) {open(filename);} oxstream(const char *filename, open_mode mode) {open(filename,mode);} virtual ~oxstream() {close();} oxstream& flush() {if(buf) fflush(buf); return *this;} typedef oxstream& (*omanip)(oxstream&); oxstream& operator << (omanip func) { return (*func)(*this); } OXSTREAM(int,int); OXSTREAM(unsigned int,u_int); OXSTREAM(long,long); OXSTREAM(unsigned long,u_long); OXSTREAM(long long,longlong_t); OXSTREAM(unsigned long long,u_longlong_t); OXSTREAM(short,short); OXSTREAM(unsigned short,u_short); OXSTREAM(char,char); #ifndef _CRAY OXSTREAM(unsigned char,u_char); #endif OXSTREAM(float,float); OXSTREAM(double,double); oxstream& operator << (xbyte x) { if(fputc(x.byte(),buf) == EOF) set(badbit); return *this; } }; class ioxstream : public ixstream, public oxstream { public: void open(const char *filename, open_mode mode=out) { clear(); if(mode & app) buf=fopen(filename,"a+"); else if(mode & trunc) buf=fopen(filename,"w+"); else if(mode & out) { buf=fopen(filename,"r+"); if(!buf) buf=fopen(filename,"w+"); } else buf=fopen(filename,"r"); if(buf) { xdrstdio_create(&xdri,buf,XDR_DECODE); xdrstdio_create(&xdro,buf,XDR_ENCODE); } else set(badbit); } void close() { if(buf) { #ifndef _CRAY xdr_destroy(&xdri); xdr_destroy(&xdro); #endif fclose(buf); buf=NULL; } } ioxstream() {} ioxstream(const char *filename) {open(filename);} ioxstream(const char *filename, open_mode mode) {open(filename,mode);} virtual ~ioxstream() {close();} }; inline oxstream& endl(oxstream& s) {s.flush(); return s;} inline oxstream& flush(oxstream& s) {s.flush(); return s;} #undef IXSTREAM #undef OXSTREAM } #undef quad_t #endif ./asymptote-2.41/envcompleter.h0000644000175000017500000000151513064427076016421 0ustar norbertnorbert/***** * envcompleter.h * Andy Hammerlindl 2006/07/31 * * Implements a text completion function for readline based on symbols in the * environment. *****/ #ifndef ENVCOMPLETER_H #define ENVCOMPLETER_H #include "env.h" #include "interact.h" namespace trans { class envCompleter : public interact::completer { public: typedef protoenv::symbol_list symbol_list; private: protoenv &e; symbol_list l; symbol_list::iterator index; // These are completions that don't come from the environment, such as // keywords. They are read from the keywords file. static void basicCompletions(symbol_list &l, string start); void makeList(const char *text); public: envCompleter(protoenv &e) : e(e), l(), index(l.end()) {} char *operator () (const char *text, int state); }; } // namespace trans #endif // ENVCOMPLETER_H ./asymptote-2.41/pair.h0000644000175000017500000001070413064427076014651 0ustar norbertnorbert/***** * pair.h * Andy Hammerlindl 2002/05/16 * * Stores a two-dimensional point similar to the pair type in MetaPost. * In some cases, pairs behave as complex numbers. * * A pair is a guide as a pair alone can be used to describe a path. * The solve and subsolve methods are fairly straight forward as solve * returns a path with just the pair and subsolve just adds the pair to * the structure. *****/ #ifndef PAIR_H #define PAIR_H #include #include #include "common.h" #include "angle.h" namespace camp { class pair : public gc { double x; double y; public: pair() : x(0.0), y(0.0) {} pair(double x, double y=0.0) : x(x), y(y) {} double getx() const { return x; } double gety() const { return y; } bool isreal() {return y == 0;} friend pair operator+ (const pair& z, const pair& w) { return pair(z.x+w.x,z.y+w.y); } friend pair operator- (const pair& z, const pair& w) { return pair(z.x-w.x,z.y-w.y); } friend pair operator- (const pair& z) { return pair(-z.x,-z.y); } // Complex multiplication friend pair operator* (const pair& z, const pair& w) { return pair(z.x*w.x-z.y*w.y,z.x*w.y+w.x*z.y); } const pair& operator+= (const pair& w) { x += w.x; y += w.y; return *this; } const pair& operator-= (const pair& w) { x -= w.x; y -= w.y; return *this; } const pair& operator*= (const pair& w) { (*this) = (*this) * w; return (*this); } const pair& operator/= (const pair& w) { (*this) = (*this) / w; return (*this); } const pair& scale (double xscale, double yscale) { x *= xscale; y *= yscale; return *this; } friend pair operator/ (const pair &z, double t) { if (t == 0.0) reportError("division by 0"); t=1.0/t; return pair(z.x*t, z.y*t); } friend pair operator/ (const pair& z, const pair& w) { if (!w.nonZero()) reportError("division by pair (0,0)"); double t = 1.0 / (w.x*w.x + w.y*w.y); return pair(t*(z.x*w.x + z.y*w.y), t*(-z.x*w.y + w.x*z.y)); } friend bool operator== (const pair& z, const pair& w) { return z.x == w.x && z.y == w.y; } friend bool operator!= (const pair& z, const pair& w) { return z.x != w.x || z.y != w.y; } double abs2() const { return x*x + y*y; } double length() const { return sqrt(abs2()); } friend double length(const pair& z) { return z.length(); } double angle() const { return camp::angle(x,y); } friend double angle(const pair& z) { return z.angle(); } friend pair unit(const pair& z) { double scale=z.length(); if(scale == 0.0) return z; scale=1.0/scale; return pair(z.x*scale,z.y*scale); } friend pair conj(const pair& z) { return pair(z.x,-z.y); } friend double dot(const pair& z, const pair& w) { return z.x*w.x+z.y*w.y; } friend double cross(const pair& z, const pair& w) { return z.x*w.y-z.y*w.x; } // Return the principal branch of the square root (non-negative real part). friend pair Sqrt(const pair& z) { double mag=z.length(); if(mag == 0.0) return pair(0.0,0.0); else if(z.x > 0) { double re=sqrt(0.5*(mag+z.x)); return pair(re,0.5*z.y/re); } else { double im=sqrt(0.5*(mag-z.x)); if(z.y < 0) im=-im; return pair(0.5*z.y/im,im); } } bool nonZero() const { return x != 0.0 || y != 0.0; } friend istream& operator >> (istream& s, pair& z) { char c; s >> std::ws; bool paren=s.peek() == '('; // parenthesis are optional if(paren) s >> c; s >> z.x >> std::ws; if(!s.eof() && s.peek() == ',') s >> c >> z.y; else z.y=0.0; if(paren) { s >> std::ws; if(s.peek() == ')') s >> c; } return s; } friend ostream& operator << (ostream& out, const pair& z) { out << "(" << z.x << "," << z.y << ")"; return out; } friend class box; }; // Calculates exp(i * theta), useful for unit vectors. inline pair expi(double theta) { if(theta == 0.0) return pair(1.0,0.0); // Frequently occurring case return pair(cos(theta),sin(theta)); } // Complex exponentiation inline pair pow(const pair& z, const pair& w) { double u=w.getx(); double v=w.gety(); if(z == 0.0) return w == 0.0 ? 1.0 : 0.0; double logr=0.5*log(z.abs2()); double th=z.angle(); return exp(logr*u-th*v)*expi(logr*v+th*u); } } //namespace camp GC_DECLARE_PTRFREE(camp::pair); #endif ./asymptote-2.41/runarray.h0000644000175000017500000000272413064427126015560 0ustar norbertnorbert/***** Autogenerated from runarray.in; changes will be overwritten *****/ #ifndef runarray_H #define runarray_H namespace run { void emptyArray(vm::stack *); void newDeepArray(vm::stack *); void newInitializedArray(vm::stack *); void newAppendedArray(vm::stack *); void copyArrayValue(vm::stack *); void copyArray(vm::stack *); void arrayRead(vm::stack *); void arraySliceRead(vm::stack *); void arraySliceReadToEnd(vm::stack *); void arrayArrayRead(vm::stack *); void arrayWrite(vm::stack *); void arraySliceWrite(vm::stack *); void arraySliceWriteToEnd(vm::stack *); void arrayLength(vm::stack *); void arrayKeys(vm::stack *); void arrayCyclicFlag(vm::stack *); void arraySetCyclicFlag(vm::stack *); void arrayInitializedHelper(vm::stack *); void arrayInitialized(vm::stack *); void arrayCyclicHelper(vm::stack *); void arrayCyclic(vm::stack *); void arrayPushHelper(vm::stack *); void arrayPush(vm::stack *); void arrayAppendHelper(vm::stack *); void arrayAppend(vm::stack *); void arrayPopHelper(vm::stack *); void arrayPop(vm::stack *); void arrayInsertHelper(vm::stack *); void arrayInsert(vm::stack *); void arrayDelete(vm::stack *); void arrayAlias(vm::stack *); void arrayIntArray(vm::stack *); void arraySequence(vm::stack *); void arrayFunction(vm::stack *); void arraySort(vm::stack *); void arraySearch(vm::stack *); void arrayConcat(vm::stack *); void array2Transpose(vm::stack *); void array3Transpose(vm::stack *); void arrayConditional(vm::stack *); } #endif // runarray_H ./asymptote-2.41/seconds.h0000644000175000017500000000410113064427076015346 0ustar norbertnorbert#ifndef __seconds_h__ #define __seconds_h__ 1 #ifdef _WIN32 #include #include #include #include #if defined(_MSC_VER) || defined(_MSC_EXTENSIONS) #define DELTA_EPOCH_IN_MICROSECS 11644473600000000Ui64 #else #define DELTA_EPOCH_IN_MICROSECS 11644473600000000ULL #endif struct timezone { int tz_minuteswest; /* minutes W of Greenwich */ int tz_dsttime; /* type of dst correction */ }; // Definition of a gettimeofday function inline int gettimeofday(struct timeval *tv, struct timezone *tz) { // Define a structure to receive the current Windows filetime FILETIME ft; // Initialize the present time to 0 and the timezone to UTC unsigned __int64 tmpres = 0; static int tzflag = 0; if (NULL != tv) { GetSystemTimeAsFileTime(&ft); // The GetSystemTimeAsFileTime returns the number of 100 nanosecond // intervals since Jan 1, 1601 in a structure. Copy the high bits to // the 64 bit tmpres, shift it left by 32 then or in the low 32 bits. tmpres |= ft.dwHighDateTime; tmpres <<= 32; tmpres |= ft.dwLowDateTime; // Convert to microseconds by dividing by 10 tmpres /= 10; // The Unix epoch starts on Jan 1 1970. Need to subtract the difference // in seconds from Jan 1 1601. tmpres -= DELTA_EPOCH_IN_MICROSECS; // Finally change microseconds to seconds and place in the seconds value. // The modulus picks up the microseconds. tv->tv_sec = (long)(tmpres / 1000000UL); tv->tv_usec = (long)(tmpres % 1000000UL); } if (NULL != tz) { if (!tzflag) { _tzset(); tzflag++; } // Adjust for the timezone west of Greenwich tz->tz_minuteswest = _timezone / 60; tz->tz_dsttime = _daylight; } return 0; } #else #include #endif namespace utils { inline double totalseconds() { timeval tv; gettimeofday(&tv,NULL); return tv.tv_sec+tv.tv_usec/1000000.0; } inline double seconds() { static double lastseconds=totalseconds(); double t=totalseconds(); double seconds=t-lastseconds; lastseconds=t; return seconds; } } #endif ./asymptote-2.41/runpath3d.symbols.h0000644000175000017500000000244113064427143017307 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(a); ADDSYMBOL(accel); ADDSYMBOL(arclength); ADDSYMBOL(arctime); ADDSYMBOL(b); ADDSYMBOL(c); ADDSYMBOL(c0); ADDSYMBOL(c1); ADDSYMBOL(cyclic); ADDSYMBOL(d); ADDSYMBOL(dir); ADDSYMBOL(dval); ADDSYMBOL(e); ADDSYMBOL(fuzz); ADDSYMBOL(g); ADDSYMBOL(insphere); ADDSYMBOL(intersect); ADDSYMBOL(intersections); ADDSYMBOL(length); ADDSYMBOL(max); ADDSYMBOL(maxratio); ADDSYMBOL(maxtimes); ADDSYMBOL(min); ADDSYMBOL(minratio); ADDSYMBOL(mintimes); ADDSYMBOL(normalize); ADDSYMBOL(orient); ADDSYMBOL(p); ADDSYMBOL(path3); ADDSYMBOL(piecewisestraight); ADDSYMBOL(point); ADDSYMBOL(post); ADDSYMBOL(postcontrol); ADDSYMBOL(pre); ADDSYMBOL(precontrol); ADDSYMBOL(q); ADDSYMBOL(radius); ADDSYMBOL(reverse); ADDSYMBOL(sign); ADDSYMBOL(size); ADDSYMBOL(straight); ADDSYMBOL(straightness); ADDSYMBOL(subpath); ADDSYMBOL(t); ADDSYMBOL(unstraighten); ADDSYMBOL(z0); ADDSYMBOL(z1); ./asymptote-2.41/runpath3d.cc0000644000175000017500000006120213064427126015757 0ustar norbertnorbert/***** Autogenerated from runpath3d.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runpath3d.in" /***** * runpath3.in * * Runtime functions for path3 operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 17 "runpath3d.in" #include "path3.h" #include "array.h" #include "drawsurface.h" #include "predicates.h" using namespace camp; using namespace vm; typedef array boolarray; typedef array realarray; typedef array realarray2; typedef array triplearray; typedef array triplearray2; using types::booleanArray; using types::realArray; using types::realArray2; using types::tripleArray; using types::tripleArray2; // Autogenerated routines: #ifndef NOSYM #include "runpath3d.symbols.h" #endif namespace run { #line 40 "runpath3d.in" // path3 path3(triplearray *pre, triplearray *point, triplearray *post, boolarray *straight, bool cyclic); void gen_runpath3d0(stack *Stack) { bool cyclic=vm::pop(Stack); boolarray * straight=vm::pop(Stack); triplearray * post=vm::pop(Stack); triplearray * point=vm::pop(Stack); triplearray * pre=vm::pop(Stack); #line 42 "runpath3d.in" size_t n=checkArrays(pre,point); checkEqual(n,checkArray(post)); checkEqual(n,checkArray(straight)); mem::vector nodes(n); for(size_t i=0; i < n; ++i) { nodes[i].pre=read(pre,i); nodes[i].point=read(point,i); nodes[i].post=read(post,i); nodes[i].straight=read(straight,i); } {Stack->push(path3(nodes,(Int) n,cyclic)); return;} } #line 57 "runpath3d.in" void nullPath3(stack *Stack) { #line 58 "runpath3d.in" {Stack->push(nullpath3); return;} } #line 62 "runpath3d.in" // bool ==(path3 a, path3 b); void gen_runpath3d2(stack *Stack) { path3 b=vm::pop(Stack); path3 a=vm::pop(Stack); #line 63 "runpath3d.in" {Stack->push(a == b); return;} } #line 67 "runpath3d.in" // bool !=(path3 a, path3 b); void gen_runpath3d3(stack *Stack) { path3 b=vm::pop(Stack); path3 a=vm::pop(Stack); #line 68 "runpath3d.in" {Stack->push(!(a == b)); return;} } #line 72 "runpath3d.in" // triple point(path3 p, Int t); void gen_runpath3d4(stack *Stack) { Int t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 73 "runpath3d.in" {Stack->push(p.point((Int) t)); return;} } #line 77 "runpath3d.in" // triple point(path3 p, real t); void gen_runpath3d5(stack *Stack) { real t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 78 "runpath3d.in" {Stack->push(p.point(t)); return;} } #line 82 "runpath3d.in" // triple precontrol(path3 p, Int t); void gen_runpath3d6(stack *Stack) { Int t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 83 "runpath3d.in" {Stack->push(p.precontrol((Int) t)); return;} } #line 87 "runpath3d.in" // triple precontrol(path3 p, real t); void gen_runpath3d7(stack *Stack) { real t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 88 "runpath3d.in" {Stack->push(p.precontrol(t)); return;} } #line 92 "runpath3d.in" // triple postcontrol(path3 p, Int t); void gen_runpath3d8(stack *Stack) { Int t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 93 "runpath3d.in" {Stack->push(p.postcontrol((Int) t)); return;} } #line 97 "runpath3d.in" // triple postcontrol(path3 p, real t); void gen_runpath3d9(stack *Stack) { real t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 98 "runpath3d.in" {Stack->push(p.postcontrol(t)); return;} } #line 102 "runpath3d.in" // triple dir(path3 p, Int t, Int sign=0, bool normalize=true); void gen_runpath3d10(stack *Stack) { bool normalize=vm::pop(Stack,true); Int sign=vm::pop(Stack,0); Int t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 103 "runpath3d.in" {Stack->push(p.dir(t,sign,normalize)); return;} } #line 107 "runpath3d.in" // triple dir(path3 p, real t, bool normalize=true); void gen_runpath3d11(stack *Stack) { bool normalize=vm::pop(Stack,true); real t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 108 "runpath3d.in" {Stack->push(p.dir(t,normalize)); return;} } #line 112 "runpath3d.in" // triple accel(path3 p, Int t, Int sign=0); void gen_runpath3d12(stack *Stack) { Int sign=vm::pop(Stack,0); Int t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 113 "runpath3d.in" {Stack->push(p.accel(t,sign)); return;} } #line 117 "runpath3d.in" // triple accel(path3 p, real t); void gen_runpath3d13(stack *Stack) { real t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 118 "runpath3d.in" {Stack->push(p.accel(t)); return;} } #line 122 "runpath3d.in" // real radius(path3 p, real t); void gen_runpath3d14(stack *Stack) { real t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 123 "runpath3d.in" triple v=p.dir(t,false); triple a=p.accel(t); real d=dot(a,v); real v2=v.abs2(); real a2=a.abs2(); real denom=v2*a2-d*d; real r=v2*sqrt(v2); {Stack->push(denom > 0 ? r/sqrt(denom) : 0.0); return;} } #line 134 "runpath3d.in" // real radius(triple z0, triple c0, triple c1, triple z1, real t); void gen_runpath3d15(stack *Stack) { real t=vm::pop(Stack); triple z1=vm::pop(Stack); triple c1=vm::pop(Stack); triple c0=vm::pop(Stack); triple z0=vm::pop(Stack); #line 135 "runpath3d.in" triple v=(3.0*(z1-z0)+9.0*(c0-c1))*t*t+(6.0*(z0+c1)-12.0*c0)*t+3.0*(c0-z0); triple a=6.0*(z1-z0+3.0*(c0-c1))*t+6.0*(z0+c1)-12.0*c0; real d=dot(a,v); real v2=v.abs2(); real a2=a.abs2(); real denom=v2*a2-d*d; real r=v2*sqrt(v2); {Stack->push(denom > 0 ? r/sqrt(denom) : 0.0); return;} } #line 146 "runpath3d.in" // path3 reverse(path3 p); void gen_runpath3d16(stack *Stack) { path3 p=vm::pop(Stack); #line 147 "runpath3d.in" {Stack->push(p.reverse()); return;} } #line 151 "runpath3d.in" // path3 subpath(path3 p, Int a, Int b); void gen_runpath3d17(stack *Stack) { Int b=vm::pop(Stack); Int a=vm::pop(Stack); path3 p=vm::pop(Stack); #line 152 "runpath3d.in" {Stack->push(p.subpath((Int) a, (Int) b)); return;} } #line 156 "runpath3d.in" // path3 subpath(path3 p, real a, real b); void gen_runpath3d18(stack *Stack) { real b=vm::pop(Stack); real a=vm::pop(Stack); path3 p=vm::pop(Stack); #line 157 "runpath3d.in" {Stack->push(p.subpath(a,b)); return;} } #line 161 "runpath3d.in" // Int length(path3 p); void gen_runpath3d19(stack *Stack) { path3 p=vm::pop(Stack); #line 162 "runpath3d.in" {Stack->push(p.length()); return;} } #line 166 "runpath3d.in" // bool cyclic(path3 p); void gen_runpath3d20(stack *Stack) { path3 p=vm::pop(Stack); #line 167 "runpath3d.in" {Stack->push(p.cyclic()); return;} } #line 171 "runpath3d.in" // bool straight(path3 p, Int t); void gen_runpath3d21(stack *Stack) { Int t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 172 "runpath3d.in" {Stack->push(p.straight(t)); return;} } #line 176 "runpath3d.in" // path3 unstraighten(path3 p); void gen_runpath3d22(stack *Stack) { path3 p=vm::pop(Stack); #line 177 "runpath3d.in" {Stack->push(p.unstraighten()); return;} } // Return the maximum perpendicular deviation of segment i of path3 g // from a straight line. #line 183 "runpath3d.in" // real straightness(path3 p, Int t); void gen_runpath3d23(stack *Stack) { Int t=vm::pop(Stack); path3 p=vm::pop(Stack); #line 184 "runpath3d.in" if(p.straight(t)) {Stack->push(0); return;} triple z0=p.point(t); triple u=unit(p.point(t+1)-z0); {Stack->push(::max(length(perp(p.postcontrol(t)-z0,u)), length(perp(p.precontrol(t+1)-z0,u)))); return;} } // Return the maximum perpendicular deviation of z0..controls c0 and c1..z1 // from a straight line. #line 194 "runpath3d.in" // real straightness(triple z0, triple c0, triple c1, triple z1); void gen_runpath3d24(stack *Stack) { triple z1=vm::pop(Stack); triple c1=vm::pop(Stack); triple c0=vm::pop(Stack); triple z0=vm::pop(Stack); #line 195 "runpath3d.in" triple u=unit(z1-z0); {Stack->push(::max(length(perp(c0-z0,u)),length(perp(c1-z0,u)))); return;} } #line 200 "runpath3d.in" // bool piecewisestraight(path3 p); void gen_runpath3d25(stack *Stack) { path3 p=vm::pop(Stack); #line 201 "runpath3d.in" {Stack->push(p.piecewisestraight()); return;} } #line 205 "runpath3d.in" // real arclength(path3 p); void gen_runpath3d26(stack *Stack) { path3 p=vm::pop(Stack); #line 206 "runpath3d.in" {Stack->push(p.arclength()); return;} } #line 210 "runpath3d.in" // real arctime(path3 p, real dval); void gen_runpath3d27(stack *Stack) { real dval=vm::pop(Stack); path3 p=vm::pop(Stack); #line 211 "runpath3d.in" {Stack->push(p.arctime(dval)); return;} } #line 215 "runpath3d.in" // realarray* intersect(path3 p, path3 q, real fuzz=-1); void gen_runpath3d28(stack *Stack) { real fuzz=vm::pop(Stack,-1); path3 q=vm::pop(Stack); path3 p=vm::pop(Stack); #line 216 "runpath3d.in" bool exact=fuzz <= 0.0; if(fuzz < 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(q.max()),length(q.min()))); std::vector S,T; real s,t; if(intersections(s,t,S,T,p,q,fuzz,true,exact)) { array *V=new array(2); (*V)[0]=s; (*V)[1]=t; {Stack->push(V); return;} } else {Stack->push(new array(0)); return;} } #line 233 "runpath3d.in" // realarray2* intersections(path3 p, path3 q, real fuzz=-1); void gen_runpath3d29(stack *Stack) { real fuzz=vm::pop(Stack,-1); path3 q=vm::pop(Stack); path3 p=vm::pop(Stack); #line 234 "runpath3d.in" bool exact=fuzz <= 0.0; if(fuzz < 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), ::max(length(q.max()),length(q.min()))); bool single=!exact; real s,t; std::vector S,T; bool found=intersections(s,t,S,T,p,q,fuzz,single,exact); if(!found) {Stack->push(new array(0)); return;} array *V; if(single) { V=new array(1); array *Vi=new array(2); (*V)[0]=Vi; (*Vi)[0]=s; (*Vi)[1]=t; } else { size_t n=S.size(); V=new array(n); for(size_t i=0; i < n; ++i) { array *Vi=new array(2); (*V)[i]=Vi; (*Vi)[0]=S[i]; (*Vi)[1]=T[i]; } } stable_sort(V->begin(),V->end(),run::compare2()); {Stack->push(V); return;} } #line 266 "runpath3d.in" // realarray* intersect(path3 p, triplearray2 *P, real fuzz=-1); void gen_runpath3d30(stack *Stack) { real fuzz=vm::pop(Stack,-1); triplearray2 * P=vm::pop(Stack); path3 p=vm::pop(Stack); #line 267 "runpath3d.in" triple *A; copyArray2C(A,P,true,4); if(fuzz <= 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), norm(A,16)); std::vector T,U,V; bool found=intersections(T,U,V,p,A,fuzz,true); delete[] A; if(found) { array *W=new array(3); (*W)[0]=T[0]; (*W)[1]=U[0]; (*W)[2]=V[0]; {Stack->push(W); return;} } else {Stack->push(new array(0)); return;} } #line 285 "runpath3d.in" // realarray2* intersections(path3 p, triplearray2 *P, real fuzz=-1); void gen_runpath3d31(stack *Stack) { real fuzz=vm::pop(Stack,-1); triplearray2 * P=vm::pop(Stack); path3 p=vm::pop(Stack); #line 286 "runpath3d.in" triple *A; copyArray2C(A,P,true,4); if(fuzz <= 0) fuzz=BigFuzz*::max(::max(length(p.max()),length(p.min())), norm(A,16)); std::vector T,U,V; intersections(T,U,V,p,A,fuzz,false); delete[] A; size_t n=T.size(); array *W=new array(n); for(size_t i=0; i < n; ++i) { array *Wi=new array(3); (*W)[i]=Wi; (*Wi)[0]=T[i]; (*Wi)[1]=U[i]; (*Wi)[2]=V[i]; } {Stack->push(W); return;} // Sorting will done in asy. } #line 306 "runpath3d.in" // Int size(path3 p); void gen_runpath3d32(stack *Stack) { path3 p=vm::pop(Stack); #line 307 "runpath3d.in" {Stack->push(p.size()); return;} } #line 311 "runpath3d.in" // path3 &(path3 p, path3 q); void gen_runpath3d33(stack *Stack) { path3 q=vm::pop(Stack); path3 p=vm::pop(Stack); #line 312 "runpath3d.in" {Stack->push(camp::concat(p,q)); return;} } #line 316 "runpath3d.in" // triple min(path3 p); void gen_runpath3d34(stack *Stack) { path3 p=vm::pop(Stack); #line 317 "runpath3d.in" {Stack->push(p.min()); return;} } #line 321 "runpath3d.in" // triple max(path3 p); void gen_runpath3d35(stack *Stack) { path3 p=vm::pop(Stack); #line 322 "runpath3d.in" {Stack->push(p.max()); return;} } #line 326 "runpath3d.in" // realarray* mintimes(path3 p); void gen_runpath3d36(stack *Stack) { path3 p=vm::pop(Stack); #line 327 "runpath3d.in" array *V=new array(3); triple v=p.mintimes(); (*V)[0]=v.getx(); (*V)[1]=v.gety(); (*V)[2]=v.getz(); {Stack->push(V); return;} } #line 336 "runpath3d.in" // realarray* maxtimes(path3 p); void gen_runpath3d37(stack *Stack) { path3 p=vm::pop(Stack); #line 337 "runpath3d.in" array *V=new array(3); triple v=p.maxtimes(); (*V)[0]=v.getx(); (*V)[1]=v.gety(); (*V)[2]=v.getz(); {Stack->push(V); return;} } #line 346 "runpath3d.in" // path3 *(realarray2 *t, path3 g); void gen_runpath3d38(stack *Stack) { path3 g=vm::pop(Stack); realarray2 * t=vm::pop(Stack); #line 347 "runpath3d.in" {Stack->push(transformed(*t,g)); return;} } #line 351 "runpath3d.in" // pair minratio(path3 g); void gen_runpath3d39(stack *Stack) { path3 g=vm::pop(Stack); #line 352 "runpath3d.in" {Stack->push(g.ratio(::min)); return;} } #line 356 "runpath3d.in" // pair maxratio(path3 g); void gen_runpath3d40(stack *Stack) { path3 g=vm::pop(Stack); #line 357 "runpath3d.in" {Stack->push(g.ratio(::max)); return;} } // Return a negative (positive) value if a--b--c--cycle is oriented // counterclockwise (clockwise) when viewed from d or zero if all four // points are coplanar. // The value returned is the determinant // |a.x a.y a.z 1| // |b.x b.y b.z 1| // |c.x c.y c.z 1| // |d.x d.y d.z 1| #line 369 "runpath3d.in" // real orient(triple a, triple b, triple c, triple d); void gen_runpath3d41(stack *Stack) { triple d=vm::pop(Stack); triple c=vm::pop(Stack); triple b=vm::pop(Stack); triple a=vm::pop(Stack); #line 370 "runpath3d.in" real A[]={a.getx(),a.gety(),a.getz()}; real B[]={b.getx(),b.gety(),b.getz()}; real C[]={c.getx(),c.gety(),c.getz()}; real D[]={d.getx(),d.gety(),d.getz()}; {Stack->push(orient3d(A,B,C,D)); return;} } // Return a positive (negative) value if e lies inside (outside) // the sphere passing through the points a,b,c,d oriented so that // a--b--c--cycle appears in clockwise order when viewed from d // or zero if all five points are cospherical. // The value returned is the determinant // |a.x a.y a.z a.x^2+a.y^2+a.z^2 1| // |b.x b.y b.z b.x^2+b.y^2+b.z^2 1| // |c.x c.y c.z c.x^2+c.y^2+c.z^2 1| // |d.x d.y d.z d.x^2+d.y^2+d.z^2 1| // |e.x e.y e.z e.x^2+e.y^2+e.z^2 1| #line 388 "runpath3d.in" // real insphere(triple a, triple b, triple c, triple d, triple e); void gen_runpath3d42(stack *Stack) { triple e=vm::pop(Stack); triple d=vm::pop(Stack); triple c=vm::pop(Stack); triple b=vm::pop(Stack); triple a=vm::pop(Stack); #line 389 "runpath3d.in" real A[]={a.getx(),a.gety(),a.getz()}; real B[]={b.getx(),b.gety(),b.getz()}; real C[]={c.getx(),c.gety(),c.getz()}; real D[]={d.getx(),d.gety(),d.getz()}; real E[]={e.getx(),e.gety(),e.getz()}; {Stack->push(insphere(A,B,C,D,E)); return;} } } // namespace run namespace trans { void gen_runpath3d_venv(venv &ve) { #line 40 "runpath3d.in" addFunc(ve, run::gen_runpath3d0, primPath3(), SYM(path3), formal(tripleArray(), SYM(pre), false, false), formal(tripleArray(), SYM(point), false, false), formal(tripleArray(), SYM(post), false, false), formal(booleanArray(), SYM(straight), false, false), formal(primBoolean(), SYM(cyclic), false, false)); #line 57 "runpath3d.in" REGISTER_BLTIN(run::nullPath3,"nullPath3"); #line 62 "runpath3d.in" addFunc(ve, run::gen_runpath3d2, primBoolean(), SYM_EQ, formal(primPath3(), SYM(a), false, false), formal(primPath3(), SYM(b), false, false)); #line 67 "runpath3d.in" addFunc(ve, run::gen_runpath3d3, primBoolean(), SYM_NEQ, formal(primPath3(), SYM(a), false, false), formal(primPath3(), SYM(b), false, false)); #line 72 "runpath3d.in" addFunc(ve, run::gen_runpath3d4, primTriple(), SYM(point), formal(primPath3(), SYM(p), false, false), formal(primInt(), SYM(t), false, false)); #line 77 "runpath3d.in" addFunc(ve, run::gen_runpath3d5, primTriple(), SYM(point), formal(primPath3(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 82 "runpath3d.in" addFunc(ve, run::gen_runpath3d6, primTriple(), SYM(precontrol), formal(primPath3(), SYM(p), false, false), formal(primInt(), SYM(t), false, false)); #line 87 "runpath3d.in" addFunc(ve, run::gen_runpath3d7, primTriple(), SYM(precontrol), formal(primPath3(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 92 "runpath3d.in" addFunc(ve, run::gen_runpath3d8, primTriple(), SYM(postcontrol), formal(primPath3(), SYM(p), false, false), formal(primInt(), SYM(t), false, false)); #line 97 "runpath3d.in" addFunc(ve, run::gen_runpath3d9, primTriple(), SYM(postcontrol), formal(primPath3(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 102 "runpath3d.in" addFunc(ve, run::gen_runpath3d10, primTriple(), SYM(dir), formal(primPath3(), SYM(p), false, false), formal(primInt(), SYM(t), false, false), formal(primInt(), SYM(sign), true, false), formal(primBoolean(), SYM(normalize), true, false)); #line 107 "runpath3d.in" addFunc(ve, run::gen_runpath3d11, primTriple(), SYM(dir), formal(primPath3(), SYM(p), false, false), formal(primReal(), SYM(t), false, false), formal(primBoolean(), SYM(normalize), true, false)); #line 112 "runpath3d.in" addFunc(ve, run::gen_runpath3d12, primTriple(), SYM(accel), formal(primPath3(), SYM(p), false, false), formal(primInt(), SYM(t), false, false), formal(primInt(), SYM(sign), true, false)); #line 117 "runpath3d.in" addFunc(ve, run::gen_runpath3d13, primTriple(), SYM(accel), formal(primPath3(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 122 "runpath3d.in" addFunc(ve, run::gen_runpath3d14, primReal(), SYM(radius), formal(primPath3(), SYM(p), false, false), formal(primReal(), SYM(t), false, false)); #line 134 "runpath3d.in" addFunc(ve, run::gen_runpath3d15, primReal(), SYM(radius), formal(primTriple(), SYM(z0), false, false), formal(primTriple(), SYM(c0), false, false), formal(primTriple(), SYM(c1), false, false), formal(primTriple(), SYM(z1), false, false), formal(primReal(), SYM(t), false, false)); #line 146 "runpath3d.in" addFunc(ve, run::gen_runpath3d16, primPath3(), SYM(reverse), formal(primPath3(), SYM(p), false, false)); #line 151 "runpath3d.in" addFunc(ve, run::gen_runpath3d17, primPath3(), SYM(subpath), formal(primPath3(), SYM(p), false, false), formal(primInt(), SYM(a), false, false), formal(primInt(), SYM(b), false, false)); #line 156 "runpath3d.in" addFunc(ve, run::gen_runpath3d18, primPath3(), SYM(subpath), formal(primPath3(), SYM(p), false, false), formal(primReal(), SYM(a), false, false), formal(primReal(), SYM(b), false, false)); #line 161 "runpath3d.in" addFunc(ve, run::gen_runpath3d19, primInt(), SYM(length), formal(primPath3(), SYM(p), false, false)); #line 166 "runpath3d.in" addFunc(ve, run::gen_runpath3d20, primBoolean(), SYM(cyclic), formal(primPath3(), SYM(p), false, false)); #line 171 "runpath3d.in" addFunc(ve, run::gen_runpath3d21, primBoolean(), SYM(straight), formal(primPath3(), SYM(p), false, false), formal(primInt(), SYM(t), false, false)); #line 176 "runpath3d.in" addFunc(ve, run::gen_runpath3d22, primPath3(), SYM(unstraighten), formal(primPath3(), SYM(p), false, false)); #line 181 "runpath3d.in" addFunc(ve, run::gen_runpath3d23, primReal(), SYM(straightness), formal(primPath3(), SYM(p), false, false), formal(primInt(), SYM(t), false, false)); #line 192 "runpath3d.in" addFunc(ve, run::gen_runpath3d24, primReal(), SYM(straightness), formal(primTriple(), SYM(z0), false, false), formal(primTriple(), SYM(c0), false, false), formal(primTriple(), SYM(c1), false, false), formal(primTriple(), SYM(z1), false, false)); #line 200 "runpath3d.in" addFunc(ve, run::gen_runpath3d25, primBoolean(), SYM(piecewisestraight), formal(primPath3(), SYM(p), false, false)); #line 205 "runpath3d.in" addFunc(ve, run::gen_runpath3d26, primReal(), SYM(arclength), formal(primPath3(), SYM(p), false, false)); #line 210 "runpath3d.in" addFunc(ve, run::gen_runpath3d27, primReal(), SYM(arctime), formal(primPath3(), SYM(p), false, false), formal(primReal(), SYM(dval), false, false)); #line 215 "runpath3d.in" addFunc(ve, run::gen_runpath3d28, realArray(), SYM(intersect), formal(primPath3(), SYM(p), false, false), formal(primPath3(), SYM(q), false, false), formal(primReal(), SYM(fuzz), true, false)); #line 233 "runpath3d.in" addFunc(ve, run::gen_runpath3d29, realArray2(), SYM(intersections), formal(primPath3(), SYM(p), false, false), formal(primPath3(), SYM(q), false, false), formal(primReal(), SYM(fuzz), true, false)); #line 266 "runpath3d.in" addFunc(ve, run::gen_runpath3d30, realArray(), SYM(intersect), formal(primPath3(), SYM(p), false, false), formal(tripleArray2(), SYM(p), false, false), formal(primReal(), SYM(fuzz), true, false)); #line 285 "runpath3d.in" addFunc(ve, run::gen_runpath3d31, realArray2(), SYM(intersections), formal(primPath3(), SYM(p), false, false), formal(tripleArray2(), SYM(p), false, false), formal(primReal(), SYM(fuzz), true, false)); #line 306 "runpath3d.in" addFunc(ve, run::gen_runpath3d32, primInt(), SYM(size), formal(primPath3(), SYM(p), false, false)); #line 311 "runpath3d.in" addFunc(ve, run::gen_runpath3d33, primPath3(), SYM_AMPERSAND, formal(primPath3(), SYM(p), false, false), formal(primPath3(), SYM(q), false, false)); #line 316 "runpath3d.in" addFunc(ve, run::gen_runpath3d34, primTriple(), SYM(min), formal(primPath3(), SYM(p), false, false)); #line 321 "runpath3d.in" addFunc(ve, run::gen_runpath3d35, primTriple(), SYM(max), formal(primPath3(), SYM(p), false, false)); #line 326 "runpath3d.in" addFunc(ve, run::gen_runpath3d36, realArray(), SYM(mintimes), formal(primPath3(), SYM(p), false, false)); #line 336 "runpath3d.in" addFunc(ve, run::gen_runpath3d37, realArray(), SYM(maxtimes), formal(primPath3(), SYM(p), false, false)); #line 346 "runpath3d.in" addFunc(ve, run::gen_runpath3d38, primPath3(), SYM_TIMES, formal(realArray2(), SYM(t), false, false), formal(primPath3(), SYM(g), false, false)); #line 351 "runpath3d.in" addFunc(ve, run::gen_runpath3d39, primPair(), SYM(minratio), formal(primPath3(), SYM(g), false, false)); #line 356 "runpath3d.in" addFunc(ve, run::gen_runpath3d40, primPair(), SYM(maxratio), formal(primPath3(), SYM(g), false, false)); #line 361 "runpath3d.in" addFunc(ve, run::gen_runpath3d41, primReal(), SYM(orient), formal(primTriple(), SYM(a), false, false), formal(primTriple(), SYM(b), false, false), formal(primTriple(), SYM(c), false, false), formal(primTriple(), SYM(d), false, false)); #line 378 "runpath3d.in" addFunc(ve, run::gen_runpath3d42, primReal(), SYM(insphere), formal(primTriple(), SYM(a), false, false), formal(primTriple(), SYM(b), false, false), formal(primTriple(), SYM(c), false, false), formal(primTriple(), SYM(d), false, false), formal(primTriple(), SYM(e), false, false)); } } // namespace trans ./asymptote-2.41/drawlabel.cc0000644000175000017500000001531713064427076016016 0ustar norbertnorbert/***** * drawlabel.cc * John Bowman 2003/04/07 * * Add a label to a picture. *****/ #include #include "drawlabel.h" #include "settings.h" #include "util.h" #include "lexical.h" using namespace settings; namespace camp { string texready=string("(Please type a command or say `\\end')\n*"); void drawLabel::labelwarning(const char *action) { cerr << "warning: label \"" << label << "\" " << action << " to avoid overwriting" << endl; } // Reads one of the dimensions from the pipe. void texdim(iopipestream& tex, double& dest, const string command, const string name) { string start(">dim("); string stop(")dim"); string expect("pt"+stop+"\n\n*"); // ask the tex engine for dimension tex << "\\immediate\\write16{" << start << "\\the\\" << command << "\\ASYbox" << stop << "}\n"; // keep reading output until ')dim\n\n*' is read tex.wait(expect.c_str()); string buffer = tex.getbuffer(); size_t dim1=buffer.find(start); size_t dim2=buffer.find("pt" + stop); string cannotread="Cannot read label "+name; if (dim1 != string::npos && dim2 != string::npos) { string n=buffer.substr(dim1+start.size(),dim2-dim1-start.size()); try { dest=lexical::cast(n,true)*camp::tex2ps; } catch(lexical::bad_cast&) { camp::reportError(cannotread); } } else { camp::reportError(cannotread); } } void texbounds(double& width, double& height, double& depth, iopipestream& tex, string& s) { tex << "\\setbox\\ASYbox=\\hbox{" << stripblanklines(s) << "}\n\n"; tex.wait(texready.c_str()); texdim(tex,width,"wd","width"); texdim(tex,height,"ht","height"); texdim(tex,depth,"dp","depth"); } inline double urand() { static const double factor=2.0/RANDOM_MAX; return random()*factor-1.0; } void setpen(iopipestream& tex, const string& texengine, const pen& pentype) { bool Latex=latex(texengine); if(Latex && setlatexfont(tex,pentype,drawElement::lastpen)) { tex << "\n"; tex.wait(texready.c_str()); } if(settexfont(tex,pentype,drawElement::lastpen,Latex)) { tex << "\n"; tex.wait(texready.c_str()); } drawElement::lastpen=pentype; } void drawLabel::getbounds(iopipestream& tex, const string& texengine) { if(havebounds) return; havebounds=true; setpen(tex,texengine,pentype); texbounds(width,height,depth,tex,label); if(width == 0.0 && height == 0.0 && depth == 0.0 && !size.empty()) texbounds(width,height,depth,tex,size); enabled=true; Align=inverse(T)*align; double scale0=max(fabs(Align.getx()),fabs(Align.gety())); if(scale0) Align *= 0.5/scale0; Align -= pair(0.5,0.5); double Depth=(pentype.Baseline() == NOBASEALIGN) ? depth : -depth*Align.gety(); texAlign=Align; const double vertical=height+depth; if(Depth > 0) texAlign += pair(0.0,Depth/vertical); Align.scale(width,vertical); Align += pair(0.0,Depth-depth); Align=T*Align; } void drawLabel::bounds(bbox& b, iopipestream& tex, boxvector& labelbounds, bboxlist&) { string texengine=getSetting("tex"); if(texengine == "none") {b += position; return;} getbounds(tex,texengine); // alignment point pair p=position+Align; const double vertical=height+depth; const double fuzz=pentype.size()*0.1+0.3; pair A=p+T*pair(-fuzz,-fuzz); pair B=p+T*pair(-fuzz,vertical+fuzz); pair C=p+T*pair(width+fuzz,vertical+fuzz); pair D=p+T*pair(width+fuzz,-fuzz); if(pentype.Overwrite() != ALLOW && label != "") { size_t n=labelbounds.size(); box Box=box(A,B,C,D); for(size_t i=0; i < n; i++) { if(labelbounds[i].intersect(Box)) { switch(pentype.Overwrite()) { case SUPPRESS: labelwarning("suppressed"); case SUPPRESSQUIET: suppress=true; return; case MOVE: labelwarning("moved"); default: break; } pair Align=(align == pair(0,0)) ? unit(pair(urand(),urand())) : unit(align); double s=0.1*pentype.size(); double dx=0, dy=0; if(Align.getx() > 0.1) dx=labelbounds[i].xmax()-Box.xmin()+s; if(Align.getx() < -0.1) dx=labelbounds[i].xmin()-Box.xmax()-s; if(Align.gety() > 0.1) dy=labelbounds[i].ymax()-Box.ymin()+s; if(Align.gety() < -0.1) dy=labelbounds[i].ymin()-Box.ymax()-s; pair offset=pair(dx,dy); position += offset; A += offset; B += offset; C += offset; D += offset; Box=box(A,B,C,D); i=0; } } labelbounds.resize(n+1); labelbounds[n]=Box; } Box=bbox(); Box += A; Box += B; Box += C; Box += D; b += Box; } void drawLabel::checkbounds() { if(!havebounds) reportError("drawLabel::write called before bounds"); } bool drawLabel::write(texfile *out, const bbox&) { checkbounds(); if(suppress || pentype.invisible() || !enabled) return true; out->setpen(pentype); out->put(label,T,position,texAlign); return true; } drawElement *drawLabel::transformed(const transform& t) { return new drawLabel(label,size,t*T,t*position, length(align)*unit(shiftless(t)*align),pentype); } void drawLabelPath::bounds(bbox& b, iopipestream& tex, boxvector&, bboxlist&) { string texengine=getSetting("tex"); if(texengine == "none") {b += position; return;} getbounds(tex,texengine); double L=p.arclength(); double s1,s2; if(justify == "l") { s1=0.0; s2=width; } else if(justify == "r") { s1=L-width; s2=L; } else { double s=0.5*L; double h=0.5*width; s1=s-h; s2=s+h; } double Sx=shift.getx(); double Sy=shift.gety(); s1 += Sx; s2 += Sx; if(width > L || (!p.cyclic() && (s1 < 0 || s2 > L))) { ostringstream buf; buf << "Cannot fit label \"" << label << "\" to path"; reportError(buf); } path q=p.subpath(p.arctime(s1),p.arctime(s2)); b += q.bounds(Sy,Sy+height); Box=b; } bool drawLabelPath::write(texfile *out, const bbox&) { bbox b=Box; double Hoffset=getSetting("inlinetex") ? b.right : b.left; b.shift(pair(-Hoffset,-b.bottom)); checkbounds(); if(drawLabel::pentype.invisible()) return true; out->setpen(drawLabel::pentype); out->verbatimline("\\psset{unit=1pt}%"); out->verbatim("\\pstextpath["); out->verbatim(justify); out->verbatim("]"); out->writepair(shift); out->verbatim("{\\pstVerb{"); out->beginraw(); writeshiftedpath(out); out->endraw(); out->verbatim("}}{"); out->verbatim(label); out->verbatimline("}"); return true; } drawElement *drawLabelPath::transformed(const transform& t) { return new drawLabelPath(label,size,transpath(t),justify,shift, transpen(t)); } } //namespace camp ./asymptote-2.41/stm.h0000644000175000017500000001046013064427076014520 0ustar norbertnorbert/***** * stm.h * Andy Hammerlindl 2002/8/30 * * Statements are objects in the language that do something on their * own. Statements are different from declarations in that statements * do not modify the environment. Translation of a statements puts the * stack code to run it into the instruction stream. *****/ #ifndef STM_H #define STM_H #include "types.h" #include "symbol.h" #include "dec.h" namespace trans { class coenv; } namespace absyntax { using trans::coenv; using sym::symbol; class stm : public runnable { public: stm(position pos) : runnable(pos) {} void prettyprint(ostream &out, Int indent); void transAsField(coenv &e, record *) { // Ignore the record. trans(e); } void trans(coenv &e) = 0; }; class emptyStm : public stm { public: emptyStm(position pos) : stm(pos) {} void prettyprint(ostream &out, Int indent); void trans(coenv &) {} }; // Wrapper around a block to use it as a statement. class blockStm : public stm { block *base; public: blockStm(position pos, block *base) : stm(pos), base(base) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e) { return base->trans(e); } // A block is guaranteed to return iff its last statement is // guaranteed to return. bool returns() { return base->returns(); } }; // A statement that consist of a single expression to evaluate. class expStm : public stm { exp *body; public: expStm(position pos, exp *body) : stm(pos), body(body) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e); // Should be called when running an expStm at the interactive prompt. // The code will "write" the value of the expression at the prompt if // possible. void interactiveTrans(coenv &e); }; class ifStm : public stm { exp *test; stm *onTrue; stm *onFalse; public: ifStm(position pos, exp *test, stm* onTrue, stm* onFalse = 0) : stm(pos), test(test), onTrue(onTrue), onFalse(onFalse) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e); // An if statement is guaranteed to return iff both its pieces are // guaranteed to return. bool returns() { if (onTrue == 0 || onFalse == 0) return false; return onTrue->returns() && onFalse->returns(); } }; class whileStm : public stm { exp *test; stm *body; public: whileStm(position pos, exp *test, stm *body) : stm(pos), test(test), body(body) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e); }; class doStm : public stm { stm *body; exp *test; public: doStm(position pos, stm *body, exp *test) : stm(pos), body(body), test(test) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e); }; class forStm : public stm { runnable *init; exp *test; runnable *update; stm *body; public: forStm(position pos, runnable *init, exp *test, runnable *update, stm *body) : stm(pos), init(init), test(test), update(update), body(body) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e); }; class extendedForStm : public stm { ty *start; symbol var; exp *set; stm *body; public: extendedForStm(position pos, ty *start, symbol var, exp *set, stm *body) : stm(pos), start(start), var(var), set(set), body(body) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e); }; class breakStm : public stm { public: breakStm(position pos) : stm(pos) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e); }; class continueStm : public stm { public: continueStm(position pos) : stm(pos) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e); }; class returnStm : public stm { exp *value; public: returnStm(position pos, exp *value = 0) : stm(pos), value(value) {} void prettyprint(ostream &out, Int indent); void trans(coenv &e); // A return statement is, of course, guaranteed to return. bool returns() { return true; } }; // Used at the start of for loops. class stmExpList : public stm { mem::list stms; public: stmExpList(position pos) : stm(pos) {} // To ensure list deallocates properly. virtual ~stmExpList() {} void add(stm *s) { stms.push_back(s); } void prettyprint(ostream &out, Int indent); void trans(coenv &e); }; } // namespace absyntax #endif ./asymptote-2.41/simpson.cc0000644000175000017500000001500413064427076015542 0ustar norbertnorbert#include #include #include // Compute a numerical approximation to an integral via adaptive Simpson's Rule // This routine ignores underflow. const int nest=DBL_MANT_DIG; typedef struct { bool left; // left interval? double psum, f1t, f2t, f3t, dat, estr; } TABLE; bool // Returns true iff successful. simpson(double& integral, // Approximate value of the integral. double (*f)(double), // Pointer to function to be integrated. double a, double b, // Lower, upper limits of integration. double acc, // Desired relative accuracy of integral. // Try to make |error| <= acc*abs(integral). double dxmax) // Maximum limit on the width of a subinterval // For periodic functions, dxmax should be // set to the period or smaller to prevent // premature convergence of Simpson's rule. { double diff,area,estl,estr,alpha,da,dx,wt,est,fv[5]; TABLE table[nest],*p,*pstop; static const double sixth=1.0/6.0; bool success=true; p=table; pstop=table+nest-1; p->left=true; p->psum=0.0; alpha=a; da=b-a; fv[0]=(*f)(alpha); fv[2]=(*f)(alpha+0.5*da); fv[4]=(*f)(alpha+da); wt=sixth*da; est=wt*(fv[0]+4.0*fv[2]+fv[4]); area=est; // Have estimate est of integral on (alpha, alpha+da). // Bisect and compute estimates on left and right half intervals. // integral is the best value for the integral. for(;;) { dx=0.5*da; double arg=alpha+0.5*dx; fv[1]=(*f)(arg); fv[3]=(*f)(arg+dx); wt=sixth*dx; estl=wt*(fv[0]+4.0*fv[1]+fv[2]); estr=wt*(fv[2]+4.0*fv[3]+fv[4]); integral=estl+estr; diff=est-integral; area -= diff; if(p >= pstop) success=false; if(!success || (fabs(diff) <= acc*fabs(area) && da <= dxmax)) { // Accept approximate integral. // If it was a right interval, add results to finish at this level. // If it was a left interval, process right interval. for(;;) { if(p->left == false) { // process right-half interval alpha += da; p->left=true; p->psum=integral; fv[0]=p->f1t; fv[2]=p->f2t; fv[4]=p->f3t; da=p->dat; est=p->estr; break; } integral += p->psum; if(--p <= table) return success; } } else { // Raise level and store information for processing right-half interval. ++p; da=dx; est=estl; p->left=false; p->f1t=fv[2]; p->f2t=fv[3]; p->f3t=fv[4]; p->dat=dx; p->estr=estr; fv[4]=fv[2]; fv[2]=fv[1]; } } } // Use adaptive Simpson integration to determine the upper limit of // integration required to make the definite integral of a continuous // non-negative function close to a user specified sum. // This routine ignores underflow. bool // Returns true iff successful. unsimpson(double integral, // Given value for the integral. double (*f)(double), // Pointer to function to be integrated. double a, double& b, // Lower, upper limits of integration (a <= b). // The value of b provided on entry is used // as an initial guess; somewhat faster if the // given value is an underestimation. double acc, // Desired relative accuracy of b. // Try to make |integral-area| <= acc*integral. double& area, // Computed integral of f(x) on [a,b]. double dxmax, // Maximum limit on the width of a subinterval // For periodic functions, dxmax should be // set to the period or smaller to prevent // premature convergence of Simpson's rule. double dxmin=0) // Lower limit on sampling width. { double diff,estl,estr,alpha,da,dx,wt,est,fv[5]; double sum,parea,pdiff,b2; TABLE table[nest],*p,*pstop; static const double sixth=1.0/6.0; p=table; pstop=table+nest-1; p->psum=0.0; alpha=a; parea=0.0; pdiff=0.0; for(;;) { p->left=true; da=b-alpha; fv[0]=(*f)(alpha); fv[2]=(*f)(alpha+0.5*da); fv[4]=(*f)(alpha+da); wt=sixth*da; est=wt*(fv[0]+4.0*fv[2]+fv[4]); area=est; // Have estimate est of integral on (alpha, alpha+da). // Bisect and compute estimates on left and right half intervals. // Sum is better value for integral. bool cont=true; while(cont) { dx=0.5*da; double arg=alpha+0.5*dx; fv[1]=(*f)(arg); fv[3]=(*f)(arg+dx); wt=sixth*dx; estl=wt*(fv[0]+4.0*fv[1]+fv[2]); estr=wt*(fv[2]+4.0*fv[3]+fv[4]); sum=estl+estr; diff=est-sum; assert(sum >= 0.0); area=parea+sum; b2=alpha+da; if(fabs(fabs(integral-area)-fabs(pdiff))+fabs(diff) <= fv[4]*acc*(b2-a)){ b=b2; return true; } if(fabs(integral-area) > fabs(pdiff+diff)) { if(integral <= area) { p=table; p->left=true; p->psum=parea; } else { if((fabs(diff) <= fv[4]*acc*da || dx <= dxmin) && da <= dxmax) { // Accept approximate integral sum. // If it was a right interval, add results to finish at this level. // If it was a left interval, process right interval. pdiff += diff; for(;;) { if(p->left == false) { // process right-half interval parea += sum; alpha += da; p->left=true; p->psum=sum; fv[0]=p->f1t; fv[2]=p->f2t; fv[4]=p->f3t; da=p->dat; est=p->estr; break; } sum += p->psum; parea -= p->psum; if(--p <= table) { p=table; p->psum=parea=sum; alpha += da; b += b-a; cont=false; break; } } continue; } } } if(p >= pstop) return false; // Raise level and store information for processing right-half interval. ++p; da=dx; est=estl; p->psum=0.0; p->left=false; p->f1t=fv[2]; p->f2t=fv[3]; p->f3t=fv[4]; p->dat=dx; p->estr=estr; fv[4]=fv[2]; fv[2]=fv[1]; } } } ./asymptote-2.41/interact.h0000644000175000017500000000243513064427076015531 0ustar norbertnorbert/***** * interact.h * * The glue between the lexical analyzer and the readline library. *****/ #ifndef INTERACT_H #define INTERACT_H #include "common.h" void interruptHandler(int); namespace interact { extern bool interactive; extern bool uptodate; extern int lines; // Interactive scroll count extern bool query; // Enable interactive scrolling; void init_interactive(); // Read a line from the input, without any processing. string simpleline(string prompt); // Add a line of input to the readline history. void addToHistory(string line); // Functions to work with the most recently entered line in the history. string getLastHistoryLine(); void setLastHistoryLine(string line); // Remove the line last added to the history. void deleteLastLine(); // Write out the history of input lines to the history file. void cleanup_interactive(); // This class is used to set a text completion function for readline. A class // is used instead the usual function pointer so that information such as the // current environment can be coded into the function (mimicking a closure). class completer { public: virtual ~completer() {}; virtual char *operator () (const char *text, int state) = 0; }; void setCompleter(completer *c); #define YY_READ_BUF_SIZE YY_BUF_SIZE } #endif // INTERACT_H ./asymptote-2.41/runhistory.in0000644000175000017500000001177713064427076016336 0ustar norbertnorbert/***** * runhistory.in * * Runtime functions for history operations. * *****/ pair => primPair() picture* => primPicture() stringarray* => stringArray() #include "array.h" #include "mathop.h" #include "builtin.h" using namespace camp; using namespace settings; using namespace vm; using namespace run; typedef array stringarray; using types::stringArray; #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) #include #include struct historyState { bool store; HISTORY_STATE state; }; typedef mem::map historyMap_t; historyMap_t historyMap; static HISTORY_STATE history_save; // Store a deep copy of the current readline history in dest. void store_history(HISTORY_STATE *dest) { HISTORY_STATE *src=history_get_history_state(); if(src) { *dest=*src; for(Int i=0; i < src->length; ++i) dest->entries[i]=src->entries[i]; free(src); } } stringarray* get_history(Int n) { int N=intcast(n); if(N <= 0) N=history_length; else N=Min(N,history_length); array *a=new array((size_t) N); int offset=history_length-N+1; for(int i=0; i < N; ++i) { HIST_ENTRY *last=history_get(offset+i); string s=last ? last->line : ""; (*a)[i]=s; } return a; } string historyfilename(const string &name) { return historyname+"_"+name; } #endif namespace run { extern string emptystring; #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) void init_readline(bool tabcompletion) { rl_bind_key('\t',tabcompletion ? rl_complete : rl_insert); } #endif void cleanup() { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) store_history(&history_save); int nlines=intcast(getSetting("historylines")); for(historyMap_t::iterator h=historyMap.begin(); h != historyMap.end(); ++h) { history_set_history_state(&h->second.state); if(h->second.store) { stifle_history(nlines); write_history(historyfilename(h->first).c_str()); unstifle_history(); } } history_set_history_state(&history_save); #endif #ifdef HAVE_LIBGSL trans::GSLrngFree(); #endif } } // Autogenerated routines: // Return the last n lines of the history named name. stringarray* history(string name, Int n=1) { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) bool newhistory=historyMap.find(name) == historyMap.end(); string filename; if(newhistory) { filename=historyfilename(name); std::ifstream exists(filename.c_str()); if(!exists) return new array(0); } store_history(&history_save); HISTORY_STATE& history=historyMap[name].state; history_set_history_state(&history); if(newhistory) read_history(filename.c_str()); array *a=get_history(n); store_history(&history); history_set_history_state(&history_save); return a; #else unused(&n); return new array(0); #endif } // Return the last n lines of the interactive history. stringarray* history(Int n=0) { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) return get_history(n); #else unused(&n); return new array(0); #endif } // Prompt for a string using prompt, the GNU readline library, and a // local history named name. string readline(string prompt=emptystring, string name=emptystring, bool tabcompletion=false) { if(!(isatty(STDIN_FILENO) || getSetting("inpipe") >= 0)) return emptystring; #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) init_readline(tabcompletion); store_history(&history_save); bool newhistory=historyMap.find(name) == historyMap.end(); historyState& h=historyMap[name]; HISTORY_STATE& history=h.state; history_set_history_state(&history); if(newhistory) read_history(historyfilename(name).c_str()); static char *line=NULL; /* Return the memory to the free pool if the buffer has already been allocated. */ if(line) { free(line); line=NULL; } /* Get a line from the user. */ line=readline(prompt.c_str()); if(!line) cout << endl; history_set_history_state(&history_save); return line ? string(line) : emptystring; #else cout << prompt; string s; getline(cin,s); unused(&tabcompletion); // Avoid unused variable warning message. return s; #endif } // Save a string in a local history named name. // If store=true, store the local history in the file historyfilename(name). void saveline(string name, string value, bool store=true) { #if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) store_history(&history_save); bool newhistory=historyMap.find(name) == historyMap.end(); historyState& h=historyMap[name]; h.store=store; HISTORY_STATE& history=h.state; history_set_history_state(&history); if(newhistory) read_history(historyfilename(name).c_str()); if(value != "") { add_history(value.c_str()); if(store) { std::ofstream hout(historyfilename(name).c_str(),std::ios::app); hout << value << endl; } } store_history(&history); history_set_history_state(&history_save); #else unused(&store); #endif } ./asymptote-2.41/INSTALL0000644000175000017500000002431513064427076014601 0ustar norbertnorbertCompiling Asymptote from a Source Release ========================================= To compile and install Asymptote version x.xx from a source release: gunzip asymptote-x.xx.src.tgz tar -xf asymptote-x.xx.src.tar cd asymptote-x.xx ./configure make all make install The last command requires root privileges. To install without root privileges you should change the first line to ./configure --prefix=$HOME/asymptote If you get errors from a broken texinfo or pdftex installation, simply put http://asymptote.sourceforge.net/asymptote.pdf in the doc directory and repeat the commands make all and make install. For a list of configure options, type configure --help See also the generic configure instructions below. Compiling Asymptote from Git Developmental Source Code ============================================================= To compile from Git developmental source code: git clone http://github.com/vectorgraphics/asymptote cd asymptote ./autogen.sh ./configure make all make install Optional packages: * Fast Fourier Transform library http://www.fftw.org/ Version requirement >= 3.0 * The GNU Scientific Library for numerical analysis: http://www.gnu.org/software/gsl/ ***************************************** Generic Configure Instructions (advanced) ***************************************** The `configure' shell script attempts to guess correct values for various system-dependent variables used during compilation. It uses those values to create a `Makefile' in each directory of the package. It may also create one or more `.h' files containing system-dependent definitions. Finally, it creates a shell script `config.status' that you can run in the future to recreate the current configuration, and a file `config.log' containing compiler output (useful mainly for debugging `configure'). It can also use an optional file (typically called `config.cache' and enabled with `--cache-file=config.cache' or simply `-C') that saves the results of its tests to speed up reconfiguring. (Caching is disabled by default to prevent problems with accidental use of stale cache files.) If you need to do unusual things to compile the package, please try to figure out how `configure' could check whether to do them, and mail diffs or instructions to the address given in the `README' so they can be considered for the next release. If you are using the cache, and at some point `config.cache' contains results you don't want to keep, you may remove or edit it. The file `configure.ac' (or `configure.in') is used to create `configure' by a program called `autoconf'. You only need `configure.ac' if you want to change it or regenerate `configure' using a newer version of `autoconf'. The simplest way to compile this package is: 1. `cd' to the directory containing the package's source code and type `./configure' to configure the package for your system. If you're using `csh' on an old version of System V, you might need to type `sh ./configure' instead to prevent `csh' from trying to execute `configure' itself. Running `configure' takes awhile. While running, it prints some messages telling which features it is checking for. 2. Type `make' to compile the package. 3. Optionally, type `make check' to run any self-tests that come with the package. 4. Type `make install' to install the programs and any data files and documentation. 5. You can remove the program binaries and object files from the source code directory by typing `make clean'. To also remove the files that `configure' created (so you can compile the package for a different kind of computer), type `make distclean'. There is also a `make maintainer-clean' target, but that is intended mainly for the package's developers. If you use it, you may have to get all sorts of other programs in order to regenerate files that came with the distribution. Compilers and Options ===================== Some systems require unusual options for compilation or linking that the `configure' script does not know about. Run `./configure --help' for details on some of the pertinent environment variables. You can give `configure' initial values for configuration parameters by setting variables in the command line or in the environment. Here is an example: ./configure CC=c89 CFLAGS=-O2 LIBS=-lposix *Note Defining Variables::, for more details. Compiling For Multiple Architectures ==================================== You can compile the package for more than one kind of computer at the same time, by placing the object files for each architecture in their own directory. To do this, you must use a version of `make' that supports the `VPATH' variable, such as GNU `make'. `cd' to the directory where you want the object files and executables to go and run the `configure' script. `configure' automatically checks for the source code in the directory that `configure' is in and in `..'. If you have to use a `make' that does not support the `VPATH' variable, you have to compile the package for one architecture at a time in the source code directory. After you have installed the package for one architecture, use `make distclean' before reconfiguring for another architecture. Installation Names ================== By default, `make install' installs the package's commands under `/usr/local/bin', include files under `/usr/local/include', etc. You can specify an installation prefix other than `/usr/local' by giving `configure' the option `--prefix=PREFIX'. You can specify separate installation prefixes for architecture-specific files and architecture-independent files. If you pass the option `--exec-prefix=PREFIX' to `configure', the package uses PREFIX as the prefix for installing programs and libraries. Documentation and other data files still use the regular prefix. In addition, if you use an unusual directory layout you can give options like `--bindir=DIR' to specify different values for particular kinds of files. Run `configure --help' for a list of the directories you can set and what kinds of files go in them. If the package supports it, you can cause programs to be installed with an extra prefix or suffix on their names by giving `configure' the option `--program-prefix=PREFIX' or `--program-suffix=SUFFIX'. Optional Features ================= Some packages pay attention to `--enable-FEATURE' options to `configure', where FEATURE indicates an optional part of the package. They may also pay attention to `--with-PACKAGE' options, where PACKAGE is something like `gnu-as' or `x' (for the X Window System). The `README' should mention any `--enable-' and `--with-' options that the package recognizes. For packages that use the X Window System, `configure' can usually find the X include and library files automatically, but if it doesn't, you can use the `configure' options `--x-includes=DIR' and `--x-libraries=DIR' to specify their locations. Specifying the System Type ========================== There may be some features `configure' cannot figure out automatically, but needs to determine by the type of machine the package will run on. Usually, assuming the package is built to be run on the _same_ architectures, `configure' can figure that out, but if it prints a message saying it cannot guess the machine type, give it the `--build=TYPE' option. TYPE can either be a short name for the system type, such as `sun4', or a canonical name which has the form: CPU-COMPANY-SYSTEM where SYSTEM can have one of these forms: OS KERNEL-OS See the file `config.sub' for the possible values of each field. If `config.sub' isn't included in this package, then this package doesn't need to know the machine type. If you are _building_ compiler tools for cross-compiling, you should use the option `--target=TYPE' to select the type of system they will produce code for. If you want to _use_ a cross compiler, that generates code for a platform different from the build platform, you should specify the "host" platform (i.e., that on which the generated programs will eventually be run) with `--host=TYPE'. Sharing Defaults ================ If you want to set default values for `configure' scripts to share, you can create a site shell script called `config.site' that gives default values for variables like `CC', `cache_file', and `prefix'. `configure' looks for `PREFIX/share/config.site' if it exists, then `PREFIX/etc/config.site' if it exists. Or, you can set the `CONFIG_SITE' environment variable to the location of the site script. A warning: not all `configure' scripts look for a site script. Defining Variables ================== Variables not defined in a site shell script can be set in the environment passed to `configure'. However, some packages may run configure again during the build, and the customized values of these variables may be lost. In order to avoid this problem, you should set them in the `configure' command line, using `VAR=value'. For example: ./configure CC=/usr/local2/bin/gcc causes the specified `gcc' to be used as the C compiler (unless it is overridden in the site shell script). Here is a another example: /bin/bash ./configure CONFIG_SHELL=/bin/bash Here the `CONFIG_SHELL=/bin/bash' operand causes subsequent configuration-related scripts to be executed by `/bin/bash'. `configure' Invocation ====================== `configure' recognizes the following options to control how it operates. `--help' `-h' Print a summary of the options to `configure', and exit. `--version' `-V' Print the version of Autoconf used to generate the `configure' script, and exit. `--cache-file=FILE' Enable the cache: use and save the results of the tests in FILE, traditionally `config.cache'. FILE defaults to `/dev/null' to disable caching. `--config-cache' `-C' Alias for `--cache-file=config.cache'. `--quiet' `--silent' `-q' Do not print messages saying which checks are being made. To suppress all normal output, redirect it to `/dev/null' (any error messages will still be shown). `--srcdir=DIR' Look for the package's source code in directory DIR. Usually `configure' can determine that directory automatically. `configure' also accepts some other options. Run `configure --help' for more details. ./asymptote-2.41/runpicture.symbols.h0000644000175000017500000000551413064427142017602 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(_begingroup3); ADDSYMBOL(_draw); ADDSYMBOL(_image); ADDSYMBOL(_labelpath); ADDSYMBOL(a); ADDSYMBOL(add); ADDSYMBOL(ambient); ADDSYMBOL(angle); ADDSYMBOL(antialias); ADDSYMBOL(axialshade); ADDSYMBOL(b); ADDSYMBOL(background); ADDSYMBOL(beginclip); ADDSYMBOL(begingroup); ADDSYMBOL(c); ADDSYMBOL(center); ADDSYMBOL(ci); ADDSYMBOL(clip); ADDSYMBOL(closed); ADDSYMBOL(colors); ADDSYMBOL(compression); ADDSYMBOL(copy); ADDSYMBOL(data); ADDSYMBOL(deconstruct); ADDSYMBOL(deletepreamble); ADDSYMBOL(dest); ADDSYMBOL(diffuse); ADDSYMBOL(dobreak); ADDSYMBOL(draw); ADDSYMBOL(drawPRCcylinder); ADDSYMBOL(drawPRCdisk); ADDSYMBOL(drawPRCsphere); ADDSYMBOL(drawPRCtube); ADDSYMBOL(drawbeziertriangle); ADDSYMBOL(drawpixel); ADDSYMBOL(edges); ADDSYMBOL(empty); ADDSYMBOL(endclip); ADDSYMBOL(endgroup); ADDSYMBOL(endgroup3); ADDSYMBOL(erase); ADDSYMBOL(extenda); ADDSYMBOL(extendb); ADDSYMBOL(f); ADDSYMBOL(fill); ADDSYMBOL(fillrule); ADDSYMBOL(final); ADDSYMBOL(format); ADDSYMBOL(functionshade); ADDSYMBOL(g); ADDSYMBOL(gouraudshade); ADDSYMBOL(granularity); ADDSYMBOL(grestore); ADDSYMBOL(gsave); ADDSYMBOL(half); ADDSYMBOL(height); ADDSYMBOL(initial); ADDSYMBOL(interaction); ADDSYMBOL(is3D); ADDSYMBOL(justify); ADDSYMBOL(knot); ADDSYMBOL(latex); ADDSYMBOL(latticeshade); ADDSYMBOL(layer); ADDSYMBOL(lights); ADDSYMBOL(m); ADDSYMBOL(magnification); ADDSYMBOL(max); ADDSYMBOL(max3); ADDSYMBOL(maxratio); ADDSYMBOL(min); ADDSYMBOL(min3); ADDSYMBOL(minratio); ADDSYMBOL(n); ADDSYMBOL(name); ADDSYMBOL(nativeformat); ADDSYMBOL(newpage); ADDSYMBOL(ni); ADDSYMBOL(nobreak); ADDSYMBOL(offset); ADDSYMBOL(opacity); ADDSYMBOL(p); ADDSYMBOL(palette); ADDSYMBOL(pdf); ADDSYMBOL(pena); ADDSYMBOL(penb); ADDSYMBOL(postscript); ADDSYMBOL(prc); ADDSYMBOL(prcshininess); ADDSYMBOL(preamble); ADDSYMBOL(prefix); ADDSYMBOL(prepend); ADDSYMBOL(ra); ADDSYMBOL(radialshade); ADDSYMBOL(rb); ADDSYMBOL(s); ADDSYMBOL(shader); ADDSYMBOL(shift); ADDSYMBOL(shininess); ADDSYMBOL(shipout); ADDSYMBOL(shipout3); ADDSYMBOL(size); ADDSYMBOL(size3); ADDSYMBOL(specular); ADDSYMBOL(src); ADDSYMBOL(straight); ADDSYMBOL(stroke); ADDSYMBOL(t); ADDSYMBOL(tensorshade); ADDSYMBOL(tessellate); ADDSYMBOL(tex); ADDSYMBOL(texpreamble); ADDSYMBOL(texreset); ADDSYMBOL(type); ADDSYMBOL(uknot); ADDSYMBOL(v); ADDSYMBOL(vi); ADDSYMBOL(view); ADDSYMBOL(viewportlighting); ADDSYMBOL(vknot); ADDSYMBOL(wait); ADDSYMBOL(weights); ADDSYMBOL(width); ADDSYMBOL(xform); ADDSYMBOL(z); ADDSYMBOL(zoom); ./asymptote-2.41/dec.cc0000644000175000017500000005063513064427076014616 0ustar norbertnorbert/***** * dec.cc * Andy Hammerlindl 2002/8/29 * * Represents the abstract syntax tree for declarations in the language. * Also included is an abstract syntax for types as they are most often * used with declarations. *****/ #include "errormsg.h" #include "coenv.h" #include "dec.h" #include "fundec.h" #include "newexp.h" #include "stm.h" #include "exp.h" #include "modifier.h" #include "runtime.h" #include "parser.h" namespace absyntax { using namespace trans; using namespace types; using mem::list; trans::tyEntry *ty::transAsTyEntry(coenv &e, record *where) { return new trans::tyEntry(trans(e, false), 0, where, getPos()); } void nameTy::prettyprint(ostream &out, Int indent) { prettyname(out, "nameTy",indent); id->prettyprint(out, indent+1); } types::ty *nameTy::trans(coenv &e, bool tacit) { return id->typeTrans(e, tacit); } trans::tyEntry *nameTy::transAsTyEntry(coenv &e, record *) { return id->tyEntryTrans(e); } void dimensions::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "dimensions (" << depth << ")\n"; } types::array *dimensions::truetype(types::ty *base) { if (base->kind == ty_void) { em.error(getPos()); em << "cannot declare array of type void"; } assert(depth >= 1); size_t d=depth; types::array *a=new types::array(base); d--; for (; d > 0; d--) { a = new types::array(a); } return a; } void arrayTy::prettyprint(ostream &out, Int indent) { prettyname(out, "arrayTy",indent); cell->prettyprint(out, indent+1); dims->prettyprint(out, indent+1); } // NOTE: Can this be merged with trans somehow? void arrayTy::addOps(coenv &e, record *r) { types::ty *t=trans(e, true); // Only add ops if it is an array (and not, say, an error) if (t->kind == types::ty_array) { types::array *at=dynamic_cast(t); assert(at); e.e.addArrayOps(at); if (r) r->e.addArrayOps(at); } } types::ty *arrayTy::trans(coenv &e, bool tacit) { types::ty *ct = cell->trans(e, tacit); assert(ct); // Don't make an array of errors. if (ct->kind == types::ty_error) return ct; types::array *t = dims->truetype(ct); assert(t); return t; } tyEntryTy::tyEntryTy(position pos, types::ty *t) : ty(pos), ent(new trans::tyEntry(t, 0, 0, position())) { } void tyEntryTy::prettyprint(ostream &out, Int indent) { prettyindent(out,indent); out << "tyEntryTy: " << *(ent->t) << "\n"; } types::ty *tyEntryTy::trans(coenv &, bool) { return ent->t; } vm::lambda *runnable::transAsCodelet(coenv &e) { coder c=e.c.newCodelet(getPos()); coenv ce(c, e.e); markTrans(ce); return c.close(); } void block::prettystms(ostream &out, Int indent) { for (list::iterator p = stms.begin(); p != stms.end(); ++p) (*p)->prettyprint(out, indent); } void block::prettyprint(ostream &out, Int indent) { prettyname(out,"block",indent); prettystms(out, indent+1); } void block::trans(coenv &e) { if (scope) e.e.beginScope(); for (list::iterator p = stms.begin(); p != stms.end(); ++p) { (*p)->markTrans(e); } if (scope) e.e.endScope(); } void block::transAsField(coenv &e, record *r) { if (scope) e.e.beginScope(); for (list::iterator p = stms.begin(); p != stms.end(); ++p) { (*p)->markTransAsField(e, r); } if (scope) e.e.endScope(); } void block::transAsRecordBody(coenv &e, record *r) { transAsField(e, r); e.c.closeRecord(); } record *block::transAsFile(genv& ge, symbol id) { // Create the new module. record *r = new record(id, new frame(id,0,0)); // Create coder and environment to translate the module. // File-level modules have dynamic fields by default. coder c(getPos(), r, 0); env e(ge); coenv ce(c, e); // Translate the abstract syntax. if (settings::getSetting("autoplain")) { autoplainRunnable()->transAsField(ce, r); } transAsRecordBody(ce, r); em.sync(); return r; } bool block::returns() { // Search for a returning runnable, starting at the end for efficiency. for (list::reverse_iterator p=stms.rbegin(); p != stms.rend(); ++p) if ((*p)->returns()) return true; return false; } vardec *block::asVardec() { vardec *var = 0; for (list::iterator p=stms.begin(); p != stms.end(); ++p) { vardec *v = dynamic_cast(*p); if (v) { if (var) // Multiple vardecs. return 0; var = v; } else if (!dynamic_cast(*p)) // Failure due to another runnable in the block. return 0; } return var; } void dec::prettyprint(ostream &out, Int indent) { prettyname(out, "dec", indent); } void modifierList::prettyprint(ostream &out, Int indent) { prettyindent(out,indent); out << "modifierList ("; for (list::iterator p = mods.begin(); p != mods.end(); ++p) { if (p != mods.begin()) out << ", "; switch (*p) { case EXPLICIT_STATIC: out << "static"; break; #if 0 case EXPLICIT_DYNAMIC: out << "dynamic"; break; #endif default: out << "invalid code"; } } for (list::iterator p = perms.begin(); p != perms.end(); ++p) { if (p != perms.begin() || !mods.empty()) out << ", "; switch (*p) { case PUBLIC: out << "public"; break; case PRIVATE: out << "private"; break; default: out << "invalid code"; } } out << ")\n"; } bool modifierList::staticSet() { return !mods.empty(); } modifier modifierList::getModifier() { if (mods.size() > 1) { em.error(getPos()); em << "too many modifiers"; } assert(staticSet()); return mods.front(); } permission modifierList::getPermission() { if (perms.size() > 1) { em.error(getPos()); em << "too many modifiers"; } return perms.empty() ? DEFAULT_PERM : perms.front(); } void modifiedRunnable::prettyprint(ostream &out, Int indent) { prettyname(out, "modifierRunnable",indent); mods->prettyprint(out, indent+1); body->prettyprint(out, indent+1); } void modifiedRunnable::transAsField(coenv &e, record *r) { if (mods->staticSet()) { if (e.c.isTopLevel()) { em.warning(getPos()); em << "static modifier is meaningless at top level"; } e.c.pushModifier(mods->getModifier()); } permission p = mods->getPermission(); #if 0 // This is innocuous if (p != DEFAULT_PERM && (!r || !body->allowPermissions())) { em.warning(pos); em << "permission modifier is meaningless"; } #endif e.c.setPermission(p); body->transAsField(e,r); e.c.clearPermission(); if (mods->staticSet()) e.c.popModifier(); } void decidstart::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "decidstart '" << id << "'\n"; if (dims) dims->prettyprint(out, indent+1); } types::ty *decidstart::getType(types::ty *base, coenv &, bool) { return dims ? dims->truetype(base) : base; } trans::tyEntry *decidstart::getTyEntry(trans::tyEntry *base, coenv &e, record *where) { return dims ? new trans::tyEntry(getType(base->t,e,false), 0, where, getPos()) : base; } void decidstart::addOps(types::ty *base, coenv &e, record *r) { if (dims) { e.e.addArrayOps(dims->truetype(base)); if (r) r->e.addArrayOps(dims->truetype(base)); } } void fundecidstart::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "fundecidstart '" << id << "'\n"; if (dims) dims->prettyprint(out, indent+1); if (params) params->prettyprint(out, indent+1); } types::ty *fundecidstart::getType(types::ty *base, coenv &e, bool tacit) { types::ty *result = decidstart::getType(base, e, tacit); if (params) { return params->getType(result, e, true, tacit); } else { types::ty *t = new function(base); return t; } } trans::tyEntry *fundecidstart::getTyEntry(trans::tyEntry *base, coenv &e, record *where) { return new trans::tyEntry(getType(base->t,e,false), 0, where, getPos()); } void fundecidstart::addOps(types::ty *base, coenv &e, record *r) { decidstart::addOps(base, e, r); params->addOps(e, r); types::function *ft=dynamic_cast(getType(base, e, true)); assert(ft); e.e.addFunctionOps(ft); if (r) r->e.addFunctionOps(ft); } void decid::prettyprint(ostream &out, Int indent) { prettyname(out, "decid",indent); start->prettyprint(out, indent+1); if (init) init->prettyprint(out, indent+1); } varEntry *makeVarEntryWhere(coenv &e, record *r, types::ty *t, record *where, position pos) { access *a = r ? r->allocField(e.c.isStatic()) : e.c.allocLocal(); return r ? new varEntry(t, a, e.c.getPermission(), r, where, pos) : new varEntry(t, a, where, pos); } varEntry *makeVarEntry(position pos, coenv &e, record *r, types::ty *t) { return makeVarEntryWhere(e, r, t, r, pos); } // Defined in constructor.cc. bool definesImplicitConstructor(coenv &e, record *r, varEntry *v, symbol id); void addConstructorFromInitializer(position pos, coenv &e, record *r, varEntry *init); void addVar(coenv &e, record *r, varEntry *v, symbol id) { // Test for 'operator init' definitions that implicitly define constructors: if (definesImplicitConstructor(e, r, v, id)) addConstructorFromInitializer(position(), e, r, v); // Add to the record so it can be accessed when qualified; add to the // environment so it can be accessed unqualified in the scope of the // record definition. if (r) r->e.addVar(id, v); e.e.addVar(id, v); } void initializeVar(position pos, coenv &e, varEntry *v, varinit *init) { types::ty *t=v->getType(); if (init) init->transToType(e, t); else { definit d(pos); d.transToType(e, t); } v->getLocation()->encode(WRITE, pos, e.c); e.c.encodePop(); } types::ty *inferType(position pos, coenv &e, varinit *init) { if (!init) { em.error(pos); em << "inferred variable declaration without initializer"; return primError(); } exp *base = dynamic_cast(init); if (base) { types::ty *t = base->cgetType(e); if (t->kind != ty_overloaded) return t; } em.error(pos); em << "could not infer type of initializer"; return primError(); } void createVar(position pos, coenv &e, record *r, symbol id, types::ty *t, varinit *init) { // I'm not sure how to handle inferred types in these cases. assert(t->kind != types::ty_inferred); varEntry *v=makeVarEntry(pos, e, r, t); addVar(e, r, v, id); initializeVar(pos, e, v, init); } void createVarOutOfOrder(position pos, coenv &e, record *r, symbol id, types::ty *t, varinit *init) { /* For declarations such as "var x = 5;", infer the type from the * initializer. */ if (t->kind == types::ty_inferred) t = inferType(pos, e, init); varEntry *v=makeVarEntry(pos, e, r, t); initializeVar(pos, e, v, init); addVar(e, r, v, id); } void addTypeWithPermission(coenv &e, record *r, tyEntry *base, symbol id) { // Only bother encoding permissions for private types. tyEntry *ent = (r && e.c.getPermission()==PRIVATE) ? new trans::tyEntry(base, PRIVATE, r) : base; if (r) r->e.addType(id, ent); e.e.addType(id, ent); } void decid::transAsField(coenv &e, record *r, types::ty *base) { types::ty *t = start->getType(base, e); assert(t); if (t->kind == ty_void) { em.error(getPos()); em << "cannot declare variable of type void"; } start->addOps(base, e, r); createVarOutOfOrder(getPos(), e, r, start->getName(), t, init); } void decid::transAsTypedefField(coenv &e, trans::tyEntry *base, record *r) { trans::tyEntry *ent = start->getTyEntry(base, e, r); assert(ent && ent->t); if (init) { em.error(getPos()); em << "type definition cannot have initializer"; } start->addOps(base->t, e, r); addTypeWithPermission(e, r, ent, start->getName()); } void decidlist::prettyprint(ostream &out, Int indent) { prettyname(out, "decidlist",indent); for (list::iterator p = decs.begin(); p != decs.end(); ++p) (*p)->prettyprint(out, indent+1); } void decidlist::transAsField(coenv &e, record *r, types::ty *base) { for (list::iterator p = decs.begin(); p != decs.end(); ++p) (*p)->transAsField(e, r, base); } void decidlist::transAsTypedefField(coenv &e, trans::tyEntry *base, record *r) { for (list::iterator p = decs.begin(); p != decs.end(); ++p) (*p)->transAsTypedefField(e, base, r); } void vardec::prettyprint(ostream &out, Int indent) { prettyname(out, "vardec",indent); base->prettyprint(out, indent+1); decs->prettyprint(out, indent+1); } void vardec::transAsTypedefField(coenv &e, record *r) { base->addOps(e, r); decs->transAsTypedefField(e, base->transAsTyEntry(e, r), r); } symbol vardec::singleName() { decid *did = decs->singleEntry(); if (!did) return symbol::nullsym; return did->getStart()->getName(); } types::ty *vardec::singleGetType(coenv &e) { decid *did = decs->singleEntry(); if (!did) return 0; return did->getStart()->getType(base->trans(e), e); } // Helper class for imports. This essentially evaluates to the run::loadModule // function. However, that function returns different types of records // depending on the filename given to it, so we cannot add it to the // environment. Instead, we explicitly tell it what types::record it is // returning for each use. class loadModuleExp : public exp { record *imp; function *ft; public: loadModuleExp(position pos, record *imp) : exp(pos), imp(imp), ft(new function(imp,primString())) {} void prettyprint(ostream &out, Int indent) { prettyname(out, "loadModuleExp", indent); } types::ty *trans(coenv &) { em.compiler(getPos()); em << "trans called for loadModuleExp"; return primError(); } void transCall(coenv &e, types::ty *t) { assert(equivalent(t, ft)); e.c.encode(inst::builtin, run::loadModule); } types::ty *getType(coenv &) { return ft; } exp *evaluate(coenv &, types::ty *) { // Don't alias. return this; } }; // Creates a local variable to hold the import and translate the accessing of // the import, but doesn't add the import to the environment. varEntry *accessModule(position pos, coenv &e, record *r, symbol id) { record *imp=e.e.getModule(id, (string)id); if (!imp) { em.error(pos); em << "could not load module '" << id << "'"; em.sync(); return 0; } else { // Create a varinit that evaluates to the module. // This is effectively the expression "loadModule(filename)". callExp init(pos, new loadModuleExp(pos, imp), new stringExp(pos, (string)id)); // The varEntry should have whereDefined()==0 as it is not defined inside // the record r. varEntry *v=makeVarEntryWhere(e, r, imp, 0, pos); initializeVar(pos, e, v, &init); return v; } } void idpair::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "idpair (" << "'" << src << "' as " << dest << ")\n"; } void idpair::transAsAccess(coenv &e, record *r) { checkValidity(); varEntry *v=accessModule(getPos(), e, r, src); if (v) addVar(e, r, v, dest); } void idpair::transAsUnravel(coenv &e, record *r, protoenv &source, varEntry *qualifier) { checkValidity(); if (r) r->e.add(src, dest, source, qualifier, e.c); if (!e.e.add(src, dest, source, qualifier, e.c)) { em.error(getPos()); em << "no matching types or fields of name '" << src << "'"; } } void idpairlist::prettyprint(ostream &out, Int indent) { for (list::iterator p=base.begin(); p != base.end(); ++p) (*p)->prettyprint(out, indent); } void idpairlist::transAsAccess(coenv &e, record *r) { for (list::iterator p=base.begin(); p != base.end(); ++p) (*p)->transAsAccess(e,r); } void idpairlist::transAsUnravel(coenv &e, record *r, protoenv &source, varEntry *qualifier) { for (list::iterator p=base.begin(); p != base.end(); ++p) (*p)->transAsUnravel(e,r,source,qualifier); } idpairlist * const WILDCARD = 0; void accessdec::prettyprint(ostream &out, Int indent) { prettyname(out, "accessdec", indent); base->prettyprint(out, indent+1); } void fromdec::prettyprint(ostream &out, Int indent) { prettyname(out, "fromdec", indent); fields->prettyprint(out, indent+1); } void fromdec::transAsField(coenv &e, record *r) { qualifier q=getQualifier(e,r); if (q.t) { if (fields==WILDCARD) { if (r) r->e.add(q.t->e, q.v, e.c); e.e.add(q.t->e, q.v, e.c); } else fields->transAsUnravel(e, r, q.t->e, q.v); } } void unraveldec::prettyprint(ostream &out, Int indent) { prettyname(out, "unraveldec", indent); id->prettyprint(out, indent+1); idpairlist *f=this->fields; if(f) f->prettyprint(out, indent+1); } fromdec::qualifier unraveldec::getQualifier(coenv &e, record *) { // getType is where errors in the qualifier are reported. record *qt=dynamic_cast(id->getType(e, false)); if (!qt) { em.error(getPos()); em << "qualifier is not a record"; } return qualifier(qt,id->getVarEntry(e)); } void fromaccessdec::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "fromaccessdec '" << id << "'\n"; idpairlist *f=this->fields; if(f) f->prettyprint(out, indent+1); } fromdec::qualifier fromaccessdec::getQualifier(coenv &e, record *r) { varEntry *v=accessModule(getPos(), e, r, id); if (v) { record *qt=dynamic_cast(v->getType()); if (!qt) { em.compiler(getPos()); em << "qualifier is not a record"; } return qualifier(qt, v); } else return qualifier(0,0); } void importdec::prettyprint(ostream &out, Int indent) { prettyname(out, "importdec", indent); base.prettyprint(out, indent+1); } void includedec::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "includedec ('" << filename << "')\n"; } void includedec::loadFailed(coenv &) { em.warning(getPos()); em << "could not parse file of name '" << filename << "'"; em.sync(); } void includedec::transAsField(coenv &e, record *r) { file *ast = parser::parseFile(filename,"Including"); em.sync(); // The runnables will be translated, one at a time, without any additional // scoping. ast->transAsField(e, r); } void typedec::prettyprint(ostream &out, Int indent) { prettyname(out, "typedec",indent); body->prettyprint(out, indent+1); } void recorddec::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "structdec '" << id << "'\n"; body->prettyprint(out, indent+1); } void recorddec::transRecordInitializer(coenv &e, record *parent) { position here=getPos(); // This is equivalent to the code // A operator init() { return new A; } // where A is the name of the record. formals formals(here); simpleName recordName(here, id); nameTy result(here, &recordName); newRecordExp exp(here, &result); returnStm stm(here, &exp); fundec init(here, &result, symbol::opTrans("init"), &formals, &stm); init.transAsField(e, parent); } void recorddec::addPostRecordEnvironment(coenv &e, record *r, record *parent) { if (parent) parent->e.add(r->postdefenv, 0, e.c); e.e.add(r->postdefenv, 0, e.c); } void recorddec::transAsField(coenv &e, record *parent) { record *r = parent ? parent->newRecord(id, e.c.isStatic()) : e.c.newRecord(id); addTypeWithPermission(e, parent, new trans::tyEntry(r,0,parent,getPos()), id); e.e.addRecordOps(r); if (parent) parent->e.addRecordOps(r); // Start translating the initializer. coder c=e.c.newRecordInit(getPos(), r); coenv re(c,e.e); body->transAsRecordBody(re, r); // After the record is translated, add a default initializer so that a // variable of the type of the record is initialized to a new instance by // default. transRecordInitializer(e, parent); // Add types and variables defined during the record that should be added to // the enclosing environment. These are the implicit constructors defined by // "operator init". addPostRecordEnvironment(e, r, parent); } runnable *autoplainRunnable() { // Abstract syntax for the code: // private import plain; position pos=position(); static importdec ap(pos, new idpair(pos, symbol::trans("plain"))); static modifiedRunnable mr(pos, trans::PRIVATE, &ap); return &mr; } } // namespace absyntax ./asymptote-2.41/drawlayer.h0000644000175000017500000000134313064427076015707 0ustar norbertnorbert/***** * drawlayer.h * John Bowman * * Start a new postscript/TeX layer in picture. *****/ #ifndef DRAWLAYER_H #define DRAWLAYER_H #include "drawelement.h" namespace camp { class drawLayer : public drawElement { public: drawLayer() {} virtual ~drawLayer() {} bool islayer() {return true;} }; class drawNewPage : public drawLayer { public: drawNewPage() {} virtual ~drawNewPage() {} bool islabel() {return true;} bool write(texfile *out, const bbox&) { out->verbatimline(settings::latex(out->texengine) ? "\\newpage" : settings::context(out->texengine) ? "}\\page\\hbox{%" : "\\eject"); return true; } }; } GC_DECLARE_PTRFREE(camp::drawLayer); #endif ./asymptote-2.41/drawclipbegin.h0000644000175000017500000000342013064427076016525 0ustar norbertnorbert/***** * drawclipbegin.h * John Bowman * * Begin clip of picture to specified path. *****/ #ifndef DRAWCLIPBEGIN_H #define DRAWCLIPBEGIN_H #include "drawelement.h" #include "path.h" #include "drawpath.h" namespace camp { class drawClipBegin : public drawSuperPathPenBase { bool gsave; bool stroke; public: void noncyclic() { reportError("cannot clip to non-cyclic path"); } drawClipBegin(const vm::array& src, bool stroke, pen pentype, bool gsave=true) : drawSuperPathPenBase(src,pentype), gsave(gsave), stroke(stroke) { if(!stroke && !cyclic()) noncyclic(); } virtual ~drawClipBegin() {} bool beginclip() {return true;} void bounds(bbox& b, iopipestream& iopipe, boxvector& vbox, bboxlist& bboxstack) { bboxstack.push_back(b); bbox bpath; if(stroke) strokebounds(bpath); else drawSuperPathPenBase::bounds(bpath,iopipe,vbox,bboxstack); bboxstack.push_back(bpath); } bool begingroup() {return true;} bool svg() {return true;} void save(bool b) { gsave=b; } bool draw(psfile *out) { if(gsave) out->gsave(); if(empty()) return true; out->beginclip(); writepath(out,false); if(stroke) strokepath(out); out->endclip(pentype); return true; } bool write(texfile *out, const bbox& bpath) { if(gsave) out->gsave(); if(empty()) return true; if(out->toplevel()) out->beginpicture(bpath); out->begingroup(); out->beginspecial(); out->beginraw(); writeshiftedpath(out); if(stroke) strokepath(out); out->endclip(pentype); out->endraw(); out->endspecial(); return true; } drawElement *transformed(const transform& t) { return new drawClipBegin(transpath(t),stroke,transpen(t)); } }; } #endif ./asymptote-2.41/modifier.h0000644000175000017500000000161413064427076015514 0ustar norbertnorbert/***** * modifier.h * Andy Hammerlindl 2002/08/29 * * Permissions for variables. * PUBLIC means the variable can be read or written anywhere. * RESTRICTED means it can be read anywhere, but written only in the record. * PRIVATE means it can only be accessed in the record. * * The modifiers static declares that variable to be allocated, are allocated in * the parent's frame, and code is translated into the parent's frame. *****/ #ifndef MODIFIER_H #define MODIFIER_H namespace trans { // Permission tokens defined in camp.y for accessing a variable outside of // its lexically enclosing record. enum permission { RESTRICTED, PUBLIC, PRIVATE }; const permission DEFAULT_PERM=PUBLIC; enum modifier { DEFAULT_STATIC, DEFAULT_DYNAMIC, EXPLICIT_STATIC, EXPLICIT_DYNAMIC }; } // namespace trans GC_DECLARE_PTRFREE(trans::permission); GC_DECLARE_PTRFREE(trans::modifier); #endif ./asymptote-2.41/configure.ac0000644000175000017500000003055213064427076016036 0ustar norbertnorbert# -*- Autoconf -*- # Run autoheader and autoconf to produce a header and configure script from # this file. AC_PREREQ(2) AC_INIT([Asymptote],[2.41],[http://sourceforge.net/projects/asymptote]) VERSION=$PACKAGE_VERSION AC_SUBST(VERSION) m4_include([ax_pthread.m4]) test "$CXXFLAGS" || CXXFLAGS="-std=c++11" test "$CFLAGS" || CFLAGS="-g -O3" AC_C_BIGENDIAN test "$prefix" = NONE && prefix=/usr/local Datadir=$datadir test "$Datadir" = '${datarootdir}' && Datadir=$datarootdir test "$Datadir" = '${prefix}/share' && Datadir=$prefix/share AC_SUBST(Datadir) AC_ARG_WITH(latex, [AS_HELP_STRING(--with-latex=PATH, specify path to LaTeX installation)], [if test "x$withval" != "x" ; then latexdir=$withval fi ],[ AC_CHECK_PROG(kpsewhich,kpsewhich,true) if test "x$kpsewhich" = "xtrue"; then latexdir=`kpsewhich -expand-var='$TEXMFLOCAL'/tex/latex` else latexdir=$prefix/share/texmf/tex/latex AC_CHECK_FILE($latexdir/base/latex.ltx,, [latexdir=/usr/share/texmf/tex/latex AC_CHECK_FILE($latexdir/base/latex.ltx,,)]) fi ]) AC_ARG_WITH(context, [AS_HELP_STRING(--with-context=PATH, specify path to ConTeXt installation)], [if test "x$withval" != "x" ; then contextdir=$withval fi ],[ AC_CHECK_PROG(kpsewhich,kpsewhich,true) if test "x$kpsewhich" = "xtrue"; then contextdir=`kpsewhich -expand-var='$TEXMFLOCAL'/tex/context/third` else contextdir=$prefix/share/texmf/tex/context/third fi ]) AC_CHECK_PROGS(TEXI2DVI,[texi2dvi], [echo texi2dvi is missing! Please put http://asymptote.sourceforge.net/asymptote.pdf in the doc directory, touch doc/asymptote.pdf, and run configure again; exit 1;]) AC_SUBST(TEXI2DVI) latexdir=$latexdir/asymptote contextdir=$contextdir/asymptote AC_MSG_NOTICE([Using $latexdir for LaTeX style file]) AC_MSG_NOTICE([Using $contextdir for ConTeXT style file]) AC_SUBST(latexdir) AC_SUBST(contextdir) docdir=$Datadir/doc/asymptote AC_ARG_WITH(docdir, [AS_HELP_STRING(--with-docdir=PATH, alternate documentation installation directory)], [if test "x$withval" != "x" ; then docdir=$withval fi ]) AC_SUBST(docdir) sysdir=$Datadir/asymptote AC_ARG_ENABLE(texlive-build, [AS_HELP_STRING(--enable-texlive-build, automatically determine sysdir from kpsewhich)], [ if test "x$enableval" = "xyes" ; then sysdir="" fi ]) AC_DEFINE_UNQUOTED(ASYMPTOTE_SYSDIR,"$sysdir", [System directory for global .asy files]) AC_DEFINE_UNQUOTED(ASYMPTOTE_DOCDIR,"$docdir", [Directory for documentation]) AC_CONFIG_SRCDIR([absyn.cc]) AC_LANG([C++]) # Checks for programs. AC_PROG_LEX AC_PROG_CXX AC_PROG_INSTALL AC_PROG_CC AC_PROG_MAKE_SET AC_PROG_YACC if test "$GXX" = yes ; then ac_gcc_version=`echo __GNUC__ | $CC -E - | grep -v ^\#` ac_clang=`echo __clang__ | $CC -E - | grep -v ^\#` if test "$ac_gcc_version" -lt 4; then CFLAGS=$CFLAGS" -finline-limit=400" else if test "$ac_clang" != 1; then CFLAGS=$CFLAGS" -fno-var-tracking" fi fi fi AC_CHECK_HEADER(unordered_map,AC_DEFINE(HAVE_UNORDERED_MAP,1, [Define to 1 if you have unordered_map]), [AC_CHECK_HEADER(tr1/unordered_map,AC_DEFINE(HAVE_TR1_UNORDERED_MAP,1, [Define to 1 if you have tr1/unordered_map]), [AC_CHECK_HEADER(ext/hash_map,,OPTIONS=$OPTIONS"-DNOHASH ")])]) GCVERSION=7.6.0 ATOMICVERSION=7.4.4 GCFILE=gc-$GCVERSION ac_cv_use_gc="system" AC_CHECK_FILE($GCFILE.tar.gz, ac_cv_use_gc=$GCVERSION) AC_ARG_ENABLE(gc, [AS_HELP_STRING(--enable-gc[[[=system]]], enable system Boehm garbage collector)] [ [[=VERSION]] enable local VERSION of Boehm garbage collector] [ [[=PREFIX]] use Boehm garbage collector installed in PREFIX], [ if test "x$enableval" != "xyes" ; then ac_cv_use_gc=$enableval fi ]) OPTIONS="-D_FILE_OFFSET_BITS=64 " GCLIB= GCPPLIB= GCNAME="Boehm Garbage Collector" GCOPTIONS="--disable-shared --enable-large-config" if test "x$ac_cv_use_gc" != "xno" ; then OPTIONS=$OPTIONS"-DUSEGC " case _$ac_cv_use_gc in _|_system|_*[[\\/]]*) if test "x$ac_cv_use_gc" = "xsystem" ; then INCL="-I$prefix/include/gc -I/usr/include/gc" LIBS=$LIBS"-L$prefix/lib " else INCL="-I$ac_cv_use_gc/include/gc" LIBS=$LIBS"-L$ac_cv_use_gc/lib " fi CPPFLAGS_SAVE=$CPPFLAGS CPPFLAGS=$CPPFLAGS" $INCL" AC_CHECK_HEADER(gc.h, AC_CHECK_LIB([gc],[GC_malloc],[ LIBS=$LIBS"-lgc " AC_MSG_NOTICE([enabling system $GCNAME])],[ GCDIR=$GCFILE INCL="-I\$(GC)/include" GCLIB="\$(GC)/.libs/libgc.a" AC_MSG_NOTICE($GCNAME library not found)]), GCDIR=$GCFILE GCLIB="\$(GC)/.libs/libgc.a" INCL="-I\$(GC)/include" AC_MSG_NOTICE($GCNAME header file not found)) CPPFLAGS=$CPPFLAGS_SAVE ;; *) GCVERSION=$ac_cv_use_gc GCFILE=gc-$GCVERSION GCDIR=$GCFILE AC_MSG_NOTICE([enabling local $GCNAME $GCDIR]) GCLIB="\$(GC)/.libs/libgc.a" INCL="-I\$(GC)/include" ;; esac else AC_MSG_NOTICE([disabling the $GCNAME]) fi AC_ARG_ENABLE(gc-debug, [AS_HELP_STRING(--enable-gc-debug,enable (slow) garbage collector debugging)], [ if test "x$ac_cv_use_gc" != "xno" ; then if test "x$enableval" = "xyes" ; then OPTIONS=$OPTIONS"-DGC_DEBUG " AC_MSG_NOTICE([*** Enabling GC debugging: remember to make clean ***]) AC_MSG_NOTICE([*** Set the environment variable GC_FIND_LEAK at runtime ***]) fi fi ]) AC_ARG_ENABLE(gc-full-debug, [AS_HELP_STRING(--enable-gc-full-debug,enable (very slow) garbage collector backtrace)], [ if test "x$ac_cv_use_gc" != "xno" ; then if test "x$enableval" = "xyes" ; then OPTIONS=$OPTIONS"-DGC_DEBUG -DGC_BACKTRACE " GCOPTIONS=$GCOPTIONS"--enable-gc-debug " AC_MSG_NOTICE([*** Enabling GC backtrace debugging; remember to make gc-clean ***]) fi fi ]) if test "$OSTYPE" = "msdos"; then INCL=$INCL" -I/usr/include/tirpc" CPPFLAGS=$CPPFLAGS" -D__MSDOS__ $INCL" fi AC_CHECK_FUNC(getopt_long_only, AC_DEFINE(HAVE_GNU_GETOPT_H, 1, [Define if getopt.h is the GNU version]), getopt="getopt getopt1",) AC_SUBST(getopt) AC_SUBST(GCVERSION) AC_SUBST(ATOMICVERSION) AC_SUBST(GCOPTIONS) AC_SUBST(GCLIB) AC_SUBST(GCPPLIB) AC_SUBST(INCL) AC_SUBST(OPTIONS) # Checks for libraries. AC_CHECK_LIB([m], [sqrt],, AC_MSG_ERROR([*** Please install libm on your system ***])) AC_CHECK_LIB([z], [deflate],, AC_MSG_ERROR([*** Please install libz or zlib-devel on your system ***])) AX_PTHREAD AC_ARG_ENABLE(sigsegv, [AS_HELP_STRING(--enable-sigsegv[[[=yes]]],enable GNU Stack Overflow Handler)]) if test "x$enable_sigsegv" != "xno"; then AC_CHECK_LIB([sigsegv], [stackoverflow_install_handler]) fi AC_CHECK_LIB([rt], [sched_yield]) AC_ARG_ENABLE(readline, [AS_HELP_STRING(--enable-readline[[[=yes]]],enable GNU Readline Library)]) if test "x$enable_readline" != "xno"; then AC_COMPILE_IFELSE([AC_LANG_PROGRAM([ #include #include #include ],[ #ifndef RL_READLINE_VERSION abort #endif ])],AC_CHECK_LIB([readline], [history_list],, AC_MSG_NOTICE(*** Could not find GNU libreadline 4.3 or later: will compile without readline support ***)), AC_MSG_NOTICE(*** Could not find GNU readline 4.3 or later: will compile without readline support ***)) AC_CHECK_HEADERS([ncurses/curses.h ncurses.h curses.h], [break]) AC_CHECK_LIB([ncurses], [setupterm], [AC_DEFINE(HAVE_LIBCURSES) LIBS=$LIBS"-lncurses "], AC_CHECK_LIB([curses], [setupterm])) fi # Checks for header files. AC_HEADER_SYS_WAIT AC_CHECK_HEADERS([fenv.h stddef.h libintl.h]) AC_CHECK_HEADERS(fpu_control.h) AC_COMPILE_IFELSE([AC_LANG_PROGRAM([#include "xstream.h"])], [AC_SEARCH_LIBS([xdrstdio_create],[nsl rpc]) AC_DEFINE(HAVE_RPC_RPC_H, 1, [Define if you have a working header file])], AC_MSG_WARN([*** Broken rpc headers; XDR support disabled ***])) AC_ARG_ENABLE(gsl, [AS_HELP_STRING(--enable-gsl[[[=yes]]],enable GNU Scientific Library)]) if test "x$enable_gsl" != "xno"; then AC_CHECK_HEADER(gsl/gsl_sf.h, AC_CHECK_LIB([gsl], gsl_sf_debye_6, [AC_DEFINE(HAVE_LIBGSL, 1, [Define to 1 if you have the `gsl' library (-lgsl).]) LIBS=$LIBS"-lgsl -lgslcblas "], AC_MSG_NOTICE([*** Could not find libgsl: will compile without optional special functions. ***]),[-lgslcblas]), AC_MSG_NOTICE([*** Header file gsl_sf.h not found: will compile without optional special functions. ***])) fi AC_ARG_ENABLE(fftw, [AS_HELP_STRING(--enable-fftw[[[=yes]]],enable FFTW Library)]) if test "x$enable_fftw" != "xno"; then AC_CHECK_HEADER(fftw3.h, AC_CHECK_LIB([fftw3], fftw_execute,, AC_MSG_NOTICE([*** Could not find libfftw3: will compile without optional fast Fourier transforms. ***])), AC_MSG_NOTICE([*** Header file fftw3.h not found: will compile without optional fast Fourier transforms. ***])) fi AC_ARG_ENABLE(gl, [AS_HELP_STRING(--enable-gl[[[=yes]]],enable OpenGL Library)]) AC_ARG_ENABLE(offscreen, [AS_HELP_STRING(--enable-offscreen[[[=yes]]],enable offscreen rendering using OSMesa library)]) if test "x$enable_gl" != "xno"; then case "$OSTYPE" in msdos) AC_CHECK_HEADER(GL/gl.h, [AC_DEFINE(HAVE_LIBGL, 1, [Define if you have the `opengl32' library (-lopengl32).]) LIBS=$LIBS"-lopengl32 "], AC_MSG_NOTICE([*** Could not find libopengl32: will compile without OpenGL support ***])) AC_CHECK_LIB([GLU], [gluNewNurbsRenderer],[AC_DEFINE(HAVE_LIBGLU, 1, [Define to 1 if you have the `glu32' library (-lglu32).]) LIBS=$LIBS"-lglu32 "], AC_MSG_NOTICE([*** Could not find libglu32: will compile without OpenGL support ***])) AC_CHECK_HEADER(GL/glut.h, [AC_DEFINE(HAVE_LIBGLUT, 1, [Define if you have the `freeglut' library (-lfreeglut).]) LIBS=$LIBS"-lfreeglut "], AC_MSG_NOTICE([*** Could not find libfreeglut: will compile without GLUT support ***])) ;; darwin*) AC_CHECK_HEADER(OpenGL/gl.h, [AC_DEFINE(HAVE_LIBGL, 1, [Define if you have the `OpenGL' library.])]) AC_CHECK_HEADER(OpenGL/glu.h, [AC_DEFINE(HAVE_LIBGLU, 1, [Define if you have the `GLU' library.])]) AC_CHECK_HEADER(GLUT/glut.h, [AC_DEFINE(HAVE_LIBGLUT, 1, [Define if you have the `GLUT' library.]) AC_COMPILE_IFELSE([AC_LANG_PROGRAM([ #include #include #ifndef GLU_TESS_CALLBACK_TRIPLEDOT typedef GLvoid (* _GLUfuncptr)(...); void f(void) { gluNurbsCallback(gluNewNurbsRenderer(),GLU_NURBS_BEGIN,(_GLUfuncptr) glBegin); } #endif ])],[AC_DEFINE(GLU_TESS_CALLBACK_TRIPLEDOT, 1, [Define if gluNurbsCallback expects a variadic function.])]) LIBS=$LIBS"-framework GLUT -framework OpenGL -framework Cocoa"], AC_MSG_NOTICE([*** Could not find glut: will compile without GLUT support ***])) ;; *) AC_CHECK_LIB([GL], [glDepthMask]) AC_CHECK_LIB([GLU], [gluNewNurbsRenderer],, AC_MSG_NOTICE([*** Could not find libGLU: will compile without OpenGL support ***])) AC_CHECK_LIB([glut], [glutMainLoop],, AC_MSG_NOTICE([*** Could not find libglut: will compile without GLUT support ***])) esac if test "x$enable_offscreen" != "xno"; then AC_CHECK_LIB([OSMesa],OSMesaCreateContext,, AC_MSG_NOTICE([*** Could not find libOSMesa: will compile without offscreen rendering support ***])) fi fi # Checks for typedefs, structures, and compiler characteristics. AC_TYPE_PID_T AC_TYPE_SIZE_T AC_CHECK_TYPES([ptrdiff_t]) AC_CHECK_TYPES([long long]) AC_CHECK_TYPES([long]) AC_C_CONST AC_C_INLINE AC_TYPE_SIGNAL AC_DEFUN([ac_FUNC_STRPTIME], [ AC_CHECK_FUNCS(strptime) ]) # Checks for library functions. AC_FUNC_FORK AC_CHECK_FUNCS([dup2 floor memset pow sqrt strchr tgamma memrchr]) AC_FUNC_STRFTIME ac_FUNC_STRPTIME AC_FUNC_ERROR_AT_LINE AC_FUNC_FSEEKO AC_CONFIG_HEADERS(config.h) AC_CONFIG_FILES([Makefile doc/Makefile doc/png/Makefile]) AC_OUTPUT if test "x$GCDIR" != "x" ; then AC_CHECK_FILE($GCDIR.tar.gz,,[ echo echo Please put the Boehm garbage collector tar.gz files in the current directory. echo FOR EXAMPLE, USE THE COMMANDS: echo echo wget http://hboehm.info/gc/gc_source/$GCFILE.tar.gz echo wget http://www.ivmaisoft.com/_bin/atomic_ops/libatomic_ops-$ATOMICVERSION.tar.gz echo exit 1 ]) fi ./asymptote-2.41/runarray.symbols.h0000644000175000017500000000241713064427143017245 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(AtA); ADDSYMBOL(_findroot); ADDSYMBOL(_projection); ADDSYMBOL(a); ADDSYMBOL(acc); ADDSYMBOL(all); ADDSYMBOL(b); ADDSYMBOL(c); ADDSYMBOL(change2); ADDSYMBOL(complement); ADDSYMBOL(determinant); ADDSYMBOL(dot); ADDSYMBOL(dxmax); ADDSYMBOL(f); ADDSYMBOL(fa); ADDSYMBOL(fb); ADDSYMBOL(fft); ADDSYMBOL(find); ADDSYMBOL(fprime); ADDSYMBOL(identity); ADDSYMBOL(inverse); ADDSYMBOL(iterations); ADDSYMBOL(maxbezier); ADDSYMBOL(maxratio); ADDSYMBOL(minbezier); ADDSYMBOL(minratio); ADDSYMBOL(n); ADDSYMBOL(newton); ADDSYMBOL(norm); ADDSYMBOL(p); ADDSYMBOL(project); ADDSYMBOL(sequence); ADDSYMBOL(sign); ADDSYMBOL(simpson); ADDSYMBOL(solve); ADDSYMBOL(sum); ADDSYMBOL(t); ADDSYMBOL(tolerance); ADDSYMBOL(triangulate); ADDSYMBOL(tridiagonal); ADDSYMBOL(v); ADDSYMBOL(verbose); ADDSYMBOL(warn); ADDSYMBOL(x); ADDSYMBOL(x1); ADDSYMBOL(x2); ADDSYMBOL(z); ./asymptote-2.41/arrayop.h0000644000175000017500000003300113064427076015366 0ustar norbertnorbert/***** * arrayop * John Bowman * * Array operations *****/ #ifndef ARRAYOP_H #define ARRAYOP_H #include "util.h" #include "stack.h" #include "array.h" #include "types.h" #include "fileio.h" #include "callable.h" #include "mathop.h" namespace run { using vm::pop; using vm::read; using vm::array; using camp::tab; vm::array *copyArray(vm::array *a); vm::array *copyArray2(vm::array *a); template class op> void arrayOp(vm::stack *s) { U b=pop(s); array *a=pop(s); size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; i++) (*c)[i]=op()(read(a,i),b,i); s->push(c); } template class op> void opArray(vm::stack *s) { array *a=pop(s); T b=pop(s); size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; i++) (*c)[i]=op()(b,read(a,i),i); s->push(c); } template class op> void arrayArrayOp(vm::stack *s) { array *b=pop(s); array *a=pop(s); size_t size=checkArrays(a,b); array *c=new array(size); for(size_t i=0; i < size; i++) (*c)[i]=op()(read(a,i),read(b,i),i); s->push(c); } template void sumArray(vm::stack *s) { array *a=pop(s); size_t size=checkArray(a); T sum=0; for(size_t i=0; i < size; i++) sum += read(a,i); s->push(sum); } extern const char *arrayempty; template class op> void binopArray(vm::stack *s) { array *a=pop(s); size_t size=checkArray(a); if(size == 0) vm::error(arrayempty); T m=read(a,0); for(size_t i=1; i < size; i++) m=op()(m,read(a,i)); s->push(m); } template class op> void binopArray2(vm::stack *s) { array *a=pop(s); size_t size=checkArray(a); bool empty=true; T m=0; for(size_t i=0; i < size; i++) { array *ai=read(a,i); size_t aisize=checkArray(ai); if(aisize) { if(empty) { m=read(ai,0); empty=false; } for(size_t j=0; j < aisize; j++) m=op()(m,read(ai,j)); } } if(empty) vm::error(arrayempty); s->push(m); } template class op> void binopArray3(vm::stack *s) { array *a=pop(s); size_t size=checkArray(a); bool empty=true; T m=0; for(size_t i=0; i < size; i++) { array *ai=read(a,i); size_t aisize=checkArray(ai); for(size_t j=0; j < aisize; j++) { array *aij=read(ai,j); size_t aijsize=checkArray(aij); if(aijsize) { if(empty) { m=read(aij,0); empty=false; } for(size_t k=0; k < aijsize; k++) { m=op()(m,read(aij,k)); } } } } if(empty) vm::error(arrayempty); s->push(m); } template class op> void array2Op(vm::stack *s) { U b=pop(s); array *a=pop(s); size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; ++i) { array *ai=read(a,i); size_t aisize=checkArray(ai); array *ci=new array(aisize); (*c)[i]=ci; for(size_t j=0; j < aisize; j++) (*ci)[j]=op()(read(ai,j),b,0); } s->push(c); } template class op> void opArray2(vm::stack *s) { array *a=pop(s); T b=pop(s); size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; ++i) { array *ai=read(a,i); size_t aisize=checkArray(ai); array *ci=new array(aisize); (*c)[i]=ci; for(size_t j=0; j < aisize; j++) (*ci)[j]=op()(read(ai,j),b,0); } s->push(c); } template class op> void array2Array2Op(vm::stack *s) { array *b=pop(s); array *a=pop(s); size_t size=checkArrays(a,b); array *c=new array(size); for(size_t i=0; i < size; ++i) { array *ai=read(a,i); array *bi=read(b,i); size_t aisize=checkArrays(ai,bi); array *ci=new array(aisize); (*c)[i]=ci; for(size_t j=0; j < aisize; j++) (*ci)[j]=op()(read(ai,j),read(bi,j),0); } s->push(c); } template bool Array2Equals(vm::stack *s) { array *b=pop(s); array *a=pop(s); size_t n=checkArray(a); if(n != checkArray(b)) return false; if(n == 0) return true; size_t n0=checkArray(read(a,0)); if(n0 != checkArray(read(b,0))) return false; for(size_t i=0; i < n; ++i) { array *ai=read(a,i); array *bi=read(b,i); for(size_t j=0; j < n0; ++j) { if(read(ai,j) != read(bi,j)) return false; } } return true; } template void array2Equals(vm::stack *s) { s->push(Array2Equals(s)); } template void array2NotEquals(vm::stack *s) { s->push(!Array2Equals(s)); } template void diagonal(vm::stack *s) { array *a=pop(s); size_t n=checkArray(a); array *c=new array(n); for(size_t i=0; i < n; ++i) { array *ci=new array(n); (*c)[i]=ci; for(size_t j=0; j < i; ++j) (*ci)[j]=T(); (*ci)[i]=read(a,i); for(size_t j=i+1; j < n; ++j) (*ci)[j]=T(); } s->push(c); } template struct compare { bool operator() (const vm::item& a, const vm::item& b) { return vm::get(a) < vm::get(b); } }; template void sortArray(vm::stack *s) { array *c=copyArray(pop(s)); sort(c->begin(),c->end(),compare()); s->push(c); } template struct compare2 { bool operator() (const vm::item& A, const vm::item& B) { array *a=vm::get(A); array *b=vm::get(B); size_t size=a->size(); if(size != b->size()) return false; for(size_t j=0; j < size; j++) { if(read(a,j) < read(b,j)) return true; if(read(a,j) > read(b,j)) return false; } return false; } }; // Sort the rows of a 2-dimensional array by the first column, breaking // ties with successively higher columns. template void sortArray2(vm::stack *s) { array *c=copyArray(pop(s)); stable_sort(c->begin(),c->end(),compare2()); s->push(c); } // Search a sorted ordered array a of n elements for key, returning the index i // if a[i] <= key < a[i+1], -1 if key is less than all elements of a, or // n-1 if key is greater than or equal to the last element of a. template void searchArray(vm::stack *s) { T key=pop(s); array *a=pop(s); size_t size= a->size(); if(size == 0 || key < read(a,0)) {s->push(-1); return;} size_t u=size-1; if(key >= read(a,u)) {s->push((Int) u); return;} size_t l=0; while (l < u) { size_t i=(l+u)/2; if(key < read(a,i)) u=i; else if(key < read(a,i+1)) {s->push((Int) i); return;} else l=i+1; } s->push(0); } extern string emptystring; void writestring(vm::stack *s); template void write(vm::stack *s) { array *a=pop(s); vm::callable *suffix=pop(s,NULL); T first=pop(s); string S=pop(s,emptystring); vm::item it=pop(s); bool defaultfile=isdefault(it); camp::ofile *f=defaultfile ? &camp::Stdout : vm::get(it); if(!f->isOpen() || !f->enabled()) return; size_t size=checkArray(a); if(S != "") f->write(S); f->write(first); for(size_t i=0; i < size; ++i) { f->write(tab); f->write(read(a,i)); } if(f->text()) { if(suffix) { s->push(f); suffix->call(s); } else if(defaultfile) { try { f->writeline(); } catch (quit&) { } } } } template void writeArray(vm::stack *s) { array *A=pop(s); array *a=pop(s); string S=pop(s,emptystring); vm::item it=pop(s); bool defaultfile=isdefault(it); camp::ofile *f=defaultfile ? &camp::Stdout : vm::get(it); if(!f->enabled()) return; size_t asize=checkArray(a); size_t Asize=checkArray(A); if(f->Standard()) interact::lines=0; else if(!f->isOpen()) return; try { if(S != "") {f->write(S); f->writeline();} size_t i=0; bool cont=true; while(cont) { cont=false; bool first=true; if(i < asize) { vm::item& I=(*a)[i]; if(defaultfile) cout << i << ":\t"; if(!I.empty()) f->write(vm::get(I)); cont=true; first=false; } unsigned count=0; for(size_t j=0; j < Asize; ++j) { array *Aj=read(A,j); size_t Ajsize=checkArray(Aj); if(i < Ajsize) { if(f->text()) { if(first && defaultfile) cout << i << ":\t"; for(unsigned k=0; k <= count; ++k) f->write(tab); count=0; } vm::item& I=(*Aj)[i]; if(!I.empty()) f->write(vm::get(I)); cont=true; first=false; } else count++; } ++i; if(cont && f->text()) f->writeline(); } } catch (quit&) { } f->flush(); } template void writeArray2(vm::stack *s) { array *a=pop(s); camp::file *f=pop(s,&camp::Stdout); size_t size=checkArray(a); if(f->Standard()) interact::lines=0; else if(!f->isOpen()) return; try { for(size_t i=0; i < size; i++) { vm::item& I=(*a)[i]; if(!I.empty()) { array *ai=vm::get(I); size_t aisize=checkArray(ai); for(size_t j=0; j < aisize; j++) { if(j > 0 && f->text()) f->write(tab); vm::item& I=(*ai)[j]; if(!I.empty()) f->write(vm::get(I)); } } if(f->text()) f->writeline(); } } catch (quit&) { } f->flush(); } template void writeArray3(vm::stack *s) { array *a=pop(s); camp::file *f=pop(s,&camp::Stdout); size_t size=checkArray(a); if(f->Standard()) interact::lines=0; else if(!f->isOpen()) return; try { for(size_t i=0; i < size;) { vm::item& I=(*a)[i]; if(!I.empty()) { array *ai=vm::get(I); size_t aisize=checkArray(ai); for(size_t j=0; j < aisize; j++) { vm::item& I=(*ai)[j]; if(!I.empty()) { array *aij=vm::get(I); size_t aijsize=checkArray(aij); for(size_t k=0; k < aijsize; k++) { if(k > 0 && f->text()) f->write(tab); vm::item& I=(*aij)[k]; if(!I.empty()) f->write(vm::get(I)); } } if(f->text()) f->writeline(); } } ++i; if(i < size && f->text()) f->writeline(); } } catch (quit&) { } f->flush(); } template void arrayFunc(vm::stack *s) { array *a=pop(s); size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; i++) (*c)[i]=func(read(a,i)); s->push(c); } template void arrayFunc2(vm::stack *s) { array *a=pop(s); size_t size=checkArray(a); array *c=new array(size); for(size_t i=0; i < size; ++i) { array *ai=read(a,i); size_t aisize=checkArray(ai); array *ci=new array(aisize); (*c)[i]=ci; for(size_t j=0; j < aisize; j++) (*ci)[j]=func(read(ai,j)); } s->push(c); } vm::array *Identity(Int n); camp::triple operator *(const vm::array& a, const camp::triple& v); double norm(double *a, size_t n); double norm(camp::triple *a, size_t n); inline size_t checkdimension(const vm::array *a, size_t dim) { size_t size=checkArray(a); if(dim && size != dim) { ostringstream buf; buf << "array of length " << dim << " expected"; vm::error(buf); } return size; } template inline void copyArrayC(T* &dest, const vm::array *a, size_t dim=0, GCPlacement placement=NoGC) { size_t size=checkdimension(a,dim); dest=(placement == NoGC) ? new T[size] : new(placement) T[size]; for(size_t i=0; i < size; i++) dest[i]=vm::read(a,i); } template inline void copyArrayC(T* &dest, const vm::array *a, T (*cast)(A), size_t dim=0, GCPlacement placement=NoGC) { size_t size=checkdimension(a,dim); dest=(placement == NoGC) ? new T[size] : new(placement) T[size]; for(size_t i=0; i < size; i++) dest[i]=cast(vm::read(a,i)); } template inline vm::array* copyCArray(const size_t n, const T* p) { vm::array* a = new vm::array(n); for(size_t i=0; i < n; ++i) (*a)[i] = p[i]; return a; } template inline void copyArray2C(T* &dest, const vm::array *a, bool square=true, size_t dim2=0, GCPlacement placement=NoGC) { size_t n=checkArray(a); size_t m=(square || n == 0) ? n : checkArray(vm::read(a,0)); if(n > 0 && dim2 && m != dim2) { ostringstream buf; buf << "second matrix dimension must be " << dim2; vm::error(buf); } dest=(placement == NoGC) ? new T[n*m] : new(placement) T[n*m]; for(size_t i=0; i < n; i++) { vm::array *ai=vm::read(a,i); size_t aisize=checkArray(ai); if(aisize == m) { T *desti=dest+i*m; for(size_t j=0; j < m; j++) desti[j]=vm::read(ai,j); } else vm::error(square ? "matrix must be square" : "matrix must be rectangular"); } } template inline vm::array* copyCArray2(const size_t n, const size_t m, const T* p) { vm::array* a=new vm::array(n); for(size_t i=0; i < n; ++i) { array *ai=new array(m); (*a)[i]=ai; for(size_t j=0; j < m; ++j) (*ai)[j]=p[m*i+j]; } return a; } } // namespace run #endif // ARRAYOP_H ./asymptote-2.41/types.symbols.h0000644000175000017500000000210313064427142016535 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(a); ADDSYMBOL(append); ADDSYMBOL(atLeast); ADDSYMBOL(b); ADDSYMBOL(csv); ADDSYMBOL(cyclic); ADDSYMBOL(delete); ADDSYMBOL(dimension); ADDSYMBOL(i); ADDSYMBOL(in); ADDSYMBOL(initialized); ADDSYMBOL(insert); ADDSYMBOL(j); ADDSYMBOL(keys); ADDSYMBOL(length); ADDSYMBOL(line); ADDSYMBOL(mode); ADDSYMBOL(name); ADDSYMBOL(nx); ADDSYMBOL(ny); ADDSYMBOL(nz); ADDSYMBOL(out); ADDSYMBOL(pop); ADDSYMBOL(push); ADDSYMBOL(read); ADDSYMBOL(side); ADDSYMBOL(signedint); ADDSYMBOL(singleint); ADDSYMBOL(singlereal); ADDSYMBOL(value); ADDSYMBOL(word); ADDSYMBOL(x); ADDSYMBOL(xx); ADDSYMBOL(xy); ADDSYMBOL(y); ADDSYMBOL(yx); ADDSYMBOL(yy); ADDSYMBOL(z); ./asymptote-2.41/asy-keywords.el0000644000175000017500000004132613064427327016533 0ustar norbertnorbert;; ;; This file is automatically generated by asy-list.pl. ;; Changes will be overwritten. ;; (defvar asy-keywords-version "2.41") (defvar asy-keyword-name '( and controls tension atleast curl if else while for do return break continue struct typedef new access import unravel from include quote static public private restricted this explicit true false null cycle newframe operator )) (defvar asy-type-name '( Braid FitResult Label Legend Solution TreeNode abscissa arc arrowhead binarytree binarytreeNode block bool bool3 bounds bqe circle conic coord coordsys cputime ellipse evaluatedpoint file filltype frame grid3 guide horner hsv hyperbola indexedTransform int inversion key light line linefit marginT marker mass object pair parabola patch path path3 pen picture point position positionedvector projection real revolution scaleT scientific segment side slice solution splitface string surface tensionSpecifier ticklocate ticksgridT tickvalues transform transformation tree triangle trilinear triple vector vertex void )) (defvar asy-function-name '( AND Arc ArcArrow ArcArrows Arrow Arrows AtA Automatic AvantGarde B03 B13 B23 B33 BBox BWRainbow BWRainbow2 Bar Bars BeginArcArrow BeginArrow BeginBar BeginDotMargin BeginMargin BeginPenMargin Blank Bookman Bottom BottomTop Bounds Break Broken BrokenLog CLZ CTZ Ceil Circle CircleBarIntervalMarker Cos Courier CrossIntervalMarker DOSendl DOSnewl DefaultFormat DefaultLogFormat Degrees Dir DotMargin DotMargins Dotted Draw Drawline Embed EndArcArrow EndArrow EndBar EndDotMargin EndMargin EndPenMargin Fill FillDraw Floor Format Full Gaussian Gaussrand Gaussrandpair Gradient Grayscale Helvetica Hermite HookHead InOutTicks InTicks Jn Label Landscape Left LeftRight LeftTicks Legend Linear Log LogFormat Margin Margins Mark MidArcArrow MidArrow NOT NewCenturySchoolBook NoBox NoMargin NoModifier NoTicks NoTicks3 NoZero NoZeroFormat None OR OmitFormat OmitTick OmitTickInterval OmitTickIntervals OutTicks Ox Oy Palatino PaletteTicks Pen PenMargin PenMargins Pentype Portrait RadialShade RadialShadeDraw Rainbow Range Relative Right RightTicks Rotate Round SQR Scale ScaleX ScaleY ScaleZ Seascape Shift Sin Slant Spline StickIntervalMarker Straight Symbol Tan TeXify Ticks Ticks3 TildeIntervalMarker TimesRoman Top TrueMargin UnFill UpsideDown Wheel X XEquals XOR XY XYEquals XYZero XYgrid XZEquals XZZero XZero XZgrid Y YEquals YXgrid YZ YZEquals YZZero YZero YZgrid Yn Z ZX ZXgrid ZYgrid ZapfChancery ZapfDingbats _begingroup3 _cputime _draw _eval _findroot _image _labelpath _projection _strokepath _texpath aCos aSin aTan abort abs accel acos acosh acot acsc activatequote add addArrow addMargins addSaveFunction addpenarc addpenline addseg adjust alias align all altitude angabscissa angle angledegrees angpoint animate annotate anticomplementary antipedal apply approximate arc arcarrowsize arccircle arcdir arcfromcenter arcfromfocus arclength arcnodesnumber arcpoint arcsubtended arcsubtendedcenter arctime arctopath array arrow arrow2 arrowbase arrowbasepoints arrowsize ascii asec asin asinh ask assert asy asycode asydir asyfigure asyfilecode asyinclude asywrite atan atan2 atanh atbreakpoint atexit attach attract atupdate autoformat autoscale autoscale3 axes axes3 axialshade axis axiscoverage azimuth babel background bangles bar barmarksize barsize basealign baseline bbox beep begin beginclip begingroup beginpoint between bevel bezier bezierP bezierPP bezierPPP bezulate bibliography bibliographystyle binarytree binarytreeNode binomial bins bisector bisectorpoint bispline blend blockconnector box bqe brace breakpoint breakpoints brick buildRestoreDefaults buildRestoreThunk buildcycle bulletcolor byte calculateScaling canonical canonicalcartesiansystem cartesiansystem case1 case2 case3 cbrt cd ceil center centerToFocus centroid cevian change2 changecoordsys checkSegment check_fpt_zero checkconditionlength checker checkincreasing checklengths checkposition checkpt checkptincube checktriangle choose circle circlebarframe circlemarkradius circlenodesnumber circumcenter circumcircle clamped clear clip clipdraw close cmyk code colatitude collect collinear color colorless colors colorspace comma compassmark complement complementary concat concurrent cone conic conicnodesnumber conictype conj connect containmentTree contains contour contour3 controlSpecifier convert coordinates coordsys copy copyPairOrTriple cos cosh cot countIntersections cputime crop cropcode cross crossframe crosshatch crossmarksize csc cubicroots curabscissa curlSpecifier curpoint currentarrow currentexitfunction currentmomarrow currentpolarconicroutine curve cut cutafter cutbefore cyclic cylinder deactivatequote debugger deconstruct defaultdir defaultformat defaultpen defined degenerate degrees delete deletepreamble determinant diagonal diamond diffdiv dir dirSpecifier dirtime display distance divisors do_overpaint dot dotframe dotsize downcase draw drawAll drawDoubleLine drawFermion drawGhost drawGluon drawMomArrow drawPRCcylinder drawPRCdisk drawPRCsphere drawPRCtube drawPhoton drawScalar drawVertex drawVertexBox drawVertexBoxO drawVertexBoxX drawVertexO drawVertexOX drawVertexTriangle drawVertexTriangleO drawVertexX drawarrow drawarrow2 drawbeziertriangle drawline drawpixel drawstrokepath drawtick duplicate elle ellipse ellipsenodesnumber embed embed3 embedplayer empty enclose end endScript endclip endgroup endgroup3 endl endpoint endpoints eof eol equation equations erase erasestep erf erfc error errorbar errorbars eval excenter excircle exit exitXasyMode exitfunction exp expfactors expi expm1 exradius extend extension extouch fabs factorial fermat fft fhorner figure file filecode fill filldraw filloutside fillrule filltype find findroot finite finiteDifferenceJacobian firstcut firstframe fit fit2 fixedscaling floor flush fmdefaults fmod focusToCenter font fontcommand fontsize foot format frac frequency fromCenter fromFocus fspline functionshade gamma generate_random_backtrace generateticks gergonne getc getint getpair getreal getstring gettriple gluon gouraudshade graph graphic graphicscale gray grestore grid grid3 gsave halfbox hatch hdiffdiv hermite hex histogram history hline hprojection hsv hyperbola hyperbolanodesnumber hyperlink hypot identity image implicitsurface incenter incentral incircle increasing incrementposition indexedTransform indexedfigure initXasyMode initdefaults initialized input inradius insert inside insphere integrate interactive interior interp interpolate intersect intersection intersectionpoint intersectionpoints intersections intouch inverse inversion invisible is3D isDuplicate isnan isogonal isogonalconjugate isotomic isotomicconjugate isparabola italic item jobname key kurtosis kurtosisexcess label labelaxis labelmargin labelpath labels labeltick labelx labelx3 labely labely3 labelz labelz3 lastcut latex latitude latticeshade layer layout ldexp leastsquares legend legenditem length lexorder lift light limits line linear linecap lineinversion linejoin linemargin lineskip linetype linewidth link list lm_enorm lm_evaluate_default lm_lmdif lm_lmpar lm_minimize lm_print_default lm_print_quiet lm_qrfac lm_qrsolv locale locate locatefile location log log10 log1p logaxiscoverage longitude lookup make3dgrid makeNode makecircle makedraw makepen maketriangle map margin markangle markangleradius markanglespace markarc marker markinterval marknodes markrightangle markthin markuniform mass masscenter massformat math max max3 maxAfterTransform maxbezier maxbound maxcoords maxlength maxratio maxtimes mean medial median midpoint min min3 minAfterTransform minbezier minbound minipage minratio mintimes miterlimit mktemp momArrowPath momarrowsize monotonic multifigure nGrad nativeformat natural needshipout newl newpage newslide newton newtree nextframe nextnormal nextpage nib nodabscissa none norm normalout normalvideo nosetpagesize notaknot nowarn numberpage nurb object offset onpath opacity opposite orient orientation origin orthic orthocentercenter outformat outline outname outprefix output overloadedMessage overwrite pack pad pairs palette parabola parabolanodesnumber parallel parallelogram partialsum patchwithnormals path path3 pathbetween pathinface pattern pause pdf pedal periodic perp perpendicular perpendicularmark phantom phi1 phi2 phi3 photon piecewisestraight point polar polarconicroutine polargraph polygon postcontrol postscript pow10 ppoint prc prc0 prconly precision precontrol prepend printBytecode print_random_addresses progress project projection projecttospan projecttospan_findcoeffs purge pwhermite quadpatches quadrant quadraticroots quantize quarticroots quotient radialshade radians radicalcenter radicalline radius rand randompath rd readline realmult realquarticroots rectangle rectangular rectify reflect relabscissa relative relativedistance reldir relpoint reltime remainder remark removeDuplicates rename replace report resetdefaultpen restore restoredefaults reverse reversevideo rf rfind rgb rgba rgbint rms rotate rotateO rotation round roundbox roundedpath roundrectangle samecoordsys sameside sample save savedefaults saveline scale scale3 scaleO scaleT scaleless scientific search searchtree sec secondaryX secondaryY seconds section sector seek seekeof segment segmentlimits sequence setpens sgn sgnd sharpangle sharpdegrees shift shiftless shipout shipout3 show simeq simpson sin sinh size size3 skewness skip slant sleep slice slope slopefield solve solveBVP sort sourceline sphere split sqrt square srand standardizecoordsys startScript stdev step stickframe stickmarksize stickmarkspace stop straight straightness string stripdirectory stripextension stripfile stripsuffix strokepath subdivide subitem subpath substr sum surface symmedial symmedian system tab tableau tan tangent tangential tangents tanh tell tensionSpecifier tensorshade tex texcolor texify texpath texpreamble texreset texshipout texsize textpath thick thin tick tickMax tickMax3 tickMin tickMin3 ticklabelshift ticklocate tildeframe tildemarksize tile tiling time times title titlepage topbox transform transformation transpose trembleFuzz triangle triangleAbc triangleabc triangletoquads trianglewithnormals triangulate tricoef tridiagonal trilinear trim truepoint tube uncycle unfill uniform unique unit unitrand unitsize unityroot unstraighten upcase updatefunction uperiodic upscale uptodate usepackage usersetting usetypescript usleep value variance variancebiased vbox vector vectorfield verbatim view vline vperiodic vprojection warn warning windingnumber write xaxis xaxis3 xaxis3At xaxisAt xequals xlimits xpart xscale xscaleO xtick xtick3 xtrans yaxis yaxis3 yaxis3At yaxisAt yequals ylimits ypart yscale yscaleO ytick ytick3 ytrans zaxis3 zaxis3At zero zlimits zpart ztick ztick3 ztrans )) (defvar asy-variable-name '( AliceBlue Align Allow AntiqueWhite Apricot Aqua Aquamarine Aspect Azure BeginPoint Beige Bisque Bittersweet Black BlanchedAlmond Blue BlueGreen BlueViolet Both Break BrickRed Brown BurlyWood BurntOrange CCW CW CadetBlue CarnationPink Center Centered Cerulean Chartreuse Chocolate Coeff Coral CornflowerBlue Cornsilk Crimson Crop Cyan Dandelion DarkBlue DarkCyan DarkGoldenrod DarkGray DarkGreen DarkKhaki DarkMagenta DarkOliveGreen DarkOrange DarkOrchid DarkRed DarkSalmon DarkSeaGreen DarkSlateBlue DarkSlateGray DarkTurquoise DarkViolet DeepPink DeepSkyBlue DefaultHead DimGray DodgerBlue Dotted Down Draw E ENE EPS ESE E_Euler E_PC E_RK2 E_RK3BS Emerald EndPoint Euler Fill FillDraw FireBrick FloralWhite ForestGreen Fuchsia Gainsboro GhostWhite Gold Goldenrod Gray Green GreenYellow Honeydew HookHead Horizontal HotPink I IgnoreAspect IndianRed Indigo Ivory JOIN_IN JOIN_OUT JungleGreen Khaki LM_DWARF LM_MACHEP LM_SQRT_DWARF LM_SQRT_GIANT LM_USERTOL Label Lavender LavenderBlush LawnGreen Left LeftJustified LeftSide LemonChiffon LightBlue LightCoral LightCyan LightGoldenrodYellow LightGreen LightGrey LightPink LightSalmon LightSeaGreen LightSkyBlue LightSlateGray LightSteelBlue LightYellow Lime LimeGreen Linear Linen Log Logarithmic Magenta Mahogany Mark MarkFill MarkPath Maroon Max MediumAquamarine MediumBlue MediumOrchid MediumPurple MediumSeaGreen MediumSlateBlue MediumSpringGreen MediumTurquoise MediumVioletRed Melon MidPoint MidnightBlue Min MintCream MistyRose Moccasin Move MoveQuiet Mulberry N NE NNE NNW NULL_VERTEX NW NavajoWhite Navy NavyBlue NoAlign NoCrop NoFill NoSide OldLace Olive OliveDrab OliveGreen Orange OrangeRed Orchid Ox Oy PC PaleGoldenrod PaleGreen PaleTurquoise PaleVioletRed PapayaWhip Peach PeachPuff Periwinkle Peru PineGreen Pink Plum PowderBlue ProcessBlue Purple RK2 RK3 RK3BS RK4 RK5 RK5DP RK5F RawSienna Red RedOrange RedViolet Rhodamine Right RightJustified RightSide RosyBrown RoyalBlue RoyalPurple RubineRed S SE SSE SSW SW SaddleBrown Salmon SandyBrown SeaGreen Seashell Sepia Sienna Silver SimpleHead SkyBlue SlateBlue SlateGray Snow SpringGreen SteelBlue Suppress SuppressQuiet Tan TeXHead Teal TealBlue Thistle Ticksize Tomato Turquoise UnFill Up VERSION Value Vertical Violet VioletRed W WNW WSW Wheat White WhiteSmoke WildStrawberry XHIGH XLOW XYAlign YAlign YHIGH YLOW Yellow YellowGreen YellowOrange ZHIGH ZLOW addpenarc addpenline align allowstepping angularsystem animationdelay appendsuffix arcarrowangle arcarrowfactor arrow2sizelimit arrowangle arrowbarb arrowdir arrowfactor arrowhookfactor arrowlength arrowsizelimit arrowtexfactor authorpen axis axiscoverage axislabelfactor background backgroundcolor backgroundpen barfactor barmarksizefactor basealign baselinetemplate bernstein beveljoin bigvertexpen bigvertexsize black blue bm bottom bp bracedefaultratio braceinnerangle bracemidangle braceouterangle brown bullet byfoci byvertices camerafactor chartreuse circlemarkradiusfactor circlenodesnumberfactor circleprecision circlescale cm codefile codepen codeskip colorPen coloredNodes coloredSegments conditionlength conicnodesfactor count cputimeformat crossmarksizefactor currentcoordsys currentlight currentpatterns currentpen currentpicture currentposition currentprojection curvilinearsystem cuttings cyan darkblue darkbrown darkcyan darkgray darkgreen darkgrey darkmagenta darkolive darkred dashdotted dashed datepen dateskip debuggerlines debugging deepblue deepcyan deepgray deepgreen deepgrey deepmagenta deepred deepyellow default defaultControl defaultS defaultbackpen defaultcoordsys defaultexcursion defaultfilename defaultformat defaultmassformat defaultpen defaultseparator diagnostics differentlengths dot dotfactor dotframe dotted doublelinepen doublelinespacing down duplicateFuzz ellipsenodesnumberfactor eps epsgeo epsilon evenodd expansionfactor extendcap fermionpen figureborder figuremattpen file3 firstnode firststep foregroundcolor fuchsia fuzz gapfactor ghostpen gluonamplitude gluonpen gluonratio gray green grey hatchepsilon havepagenumber heavyblue heavycyan heavygray heavygreen heavygrey heavymagenta heavyred hline hwratio hyperbolanodesnumberfactor identity4 ignore inXasyMode inch inches includegraphicscommand inf infinity institutionpen intMax intMin invert invisible itempen itemskip itemstep labelmargin landscape lastnode left legendhskip legendlinelength legendmargin legendmarkersize legendmaxrelativewidth legendvskip lightblue lightcyan lightgray lightgreen lightgrey lightmagenta lightolive lightred lightyellow linemargin lm_infmsg lm_shortmsg longdashdotted longdashed magenta magneticRadius mantissaBits markangleradius markangleradiusfactor markanglespace markanglespacefactor maxrefinements mediumblue mediumcyan mediumgray mediumgreen mediumgrey mediummagenta mediumred mediumyellow middle minDistDefault minblockheight minblockwidth mincirclediameter minipagemargin minipagewidth minvertexangle miterjoin mm momarrowfactor momarrowlength momarrowmargin momarrowoffset momarrowpen monoPen morepoints nCircle nan newbulletcolor ngraph nil nmesh nobasealign nodeMarginDefault nodesystem nomarker nopoint noprimary nullpath nullpen numarray ocgindex oldbulletcolor olive orange origin overpaint page pageheight pagemargin pagenumberalign pagenumberpen pagenumberposition pagewidth paleblue palecyan palegray palegreen palegrey palemagenta palered paleyellow parabolanodesnumberfactor perpfactor phi photonamplitude photonpen photonratio pi pink plain plain_bounds plain_scaling plus preamblenodes pt purple r3 r4a r4b randMax realDigits realEpsilon realMax realMin red relativesystem reverse right roundcap roundjoin royalblue salmon saveFunctions scalarpen sequencereal settings shipped signedtrailingzero solid spinner springgreen sqrtEpsilon squarecap squarepen startposition stdin stdout stepfactor stepfraction steppagenumberpen stepping stickframe stickmarksizefactor stickmarkspacefactor swap textpen ticksize tildeframe tildemarksizefactor tinv titlealign titlepagepen titlepageposition titlepen titleskip top trailingzero treeLevelStep treeMinNodeWidth treeNodeStep trembleAngle trembleFrequency trembleRandom undefined unitcircle unitsquare up urlpen urlskip version vertexpen vertexsize viewportmargin viewportsize vline white wye xformStack yellow ylabelwidth zerotickfuzz zerowinding )) ./asymptote-2.41/runfile.cc0000644000175000017500000004251713064427126015523 0ustar norbertnorbert/***** Autogenerated from runfile.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runfile.in" /***** * runfile.in * * Runtime functions for file operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 10 "runfile.in" #include "fileio.h" #include "callable.h" #include "triple.h" #include "array.h" #ifdef __CYGWIN__ extern "C" int mkstemp(char *c); #endif using namespace camp; using namespace settings; using namespace vm; string commentchar="#"; // Autogenerated routines: #ifndef NOSYM #include "runfile.symbols.h" #endif namespace run { #line 28 "runfile.in" // bool ==(file *a, file *b); void gen_runfile0(stack *Stack) { file * b=vm::pop(Stack); file * a=vm::pop(Stack); #line 29 "runfile.in" {Stack->push(a == b); return;} } #line 33 "runfile.in" // bool !=(file *a, file *b); void gen_runfile1(stack *Stack) { file * b=vm::pop(Stack); file * a=vm::pop(Stack); #line 34 "runfile.in" {Stack->push(a != b); return;} } #line 38 "runfile.in" void nullFile(stack *Stack) { #line 39 "runfile.in" {Stack->push(&camp::nullfile); return;} } #line 43 "runfile.in" // file* input(string name=emptystring, bool check=true, string comment=commentchar, string mode=emptystring); void gen_runfile3(stack *Stack) { string mode=vm::pop(Stack,emptystring); string comment=vm::pop(Stack,commentchar); bool check=vm::pop(Stack,true); string name=vm::pop(Stack,emptystring); #line 45 "runfile.in" file *f=NULL; if(mode == "binary") { f=new ibfile(name,check); } else if(mode == "xdr") { #ifdef HAVE_RPC_RPC_H f=new ixfile(name,check); #else ostringstream buf; buf << name << ": XDR read support not enabled"; error(buf); #endif } else if(mode == "") { char c=comment.empty() ? (char) 0 : comment[0]; f=new ifile(name,c,check); } else { f=NULL; ostringstream buf; buf << name << ": invalid file mode '" << mode << "'"; error(buf); } f->open(); {Stack->push(f); return;} } #line 71 "runfile.in" // file* output(string name=emptystring, bool update=false, string comment=commentchar, string mode=emptystring); void gen_runfile4(stack *Stack) { string mode=vm::pop(Stack,emptystring); string comment=vm::pop(Stack,commentchar); bool update=vm::pop(Stack,false); string name=vm::pop(Stack,emptystring); #line 73 "runfile.in" file *f=NULL; if(mode == "pipe") { f=new opipe(name); } else if(mode == "binary") { if(update) f=new iobfile(name); else f=new obfile(name); } else if(mode == "xdr") { #ifdef HAVE_RPC_RPC_H if(update) f=new ioxfile(name); else f=new oxfile(name); #else ostringstream buf; buf << name << ": XDR write support not enabled"; error(buf); #endif } else if(mode == "") { if(update) { char c=comment.empty() ? (char) 0 : comment[0]; f=new iofile(name,c); } else f=new ofile(name); } else { f=NULL; ostringstream buf; buf << name << ": invalid file mode '" << mode << "'"; error(buf); } f->open(); if(update) f->seek(0,false); {Stack->push(f); return;} } #line 108 "runfile.in" // bool eof(file *f); void gen_runfile5(stack *Stack) { file * f=vm::pop(Stack); #line 109 "runfile.in" {Stack->push(f->eof()); return;} } #line 113 "runfile.in" // bool eol(file *f); void gen_runfile6(stack *Stack) { file * f=vm::pop(Stack); #line 114 "runfile.in" {Stack->push(f->eol()); return;} } #line 118 "runfile.in" // bool error(file *f); void gen_runfile7(stack *Stack) { file * f=vm::pop(Stack); #line 119 "runfile.in" {Stack->push(f->error()); return;} } #line 123 "runfile.in" // void clear(file *f); void gen_runfile8(stack *Stack) { file * f=vm::pop(Stack); #line 124 "runfile.in" f->clear(); } #line 128 "runfile.in" // void close(file *f); void gen_runfile9(stack *Stack) { file * f=vm::pop(Stack); #line 129 "runfile.in" f->close(); } #line 133 "runfile.in" // Int precision(file *f=NULL, Int digits=0); void gen_runfile10(stack *Stack) { Int digits=vm::pop(Stack,0); file * f=vm::pop(Stack,NULL); #line 134 "runfile.in" if(f == 0) f=&camp::Stdout; {Stack->push(f->precision(digits)); return;} } #line 139 "runfile.in" // void flush(file *f); void gen_runfile11(stack *Stack) { file * f=vm::pop(Stack); #line 140 "runfile.in" f->flush(); } #line 144 "runfile.in" // string getc(file *f); void gen_runfile12(stack *Stack) { file * f=vm::pop(Stack); #line 145 "runfile.in" char c=0; if(f->isOpen()) f->read(c); static char str[1]; str[0]=c; {Stack->push(string(str)); return;} } #line 153 "runfile.in" // Int tell(file *f); void gen_runfile13(stack *Stack) { file * f=vm::pop(Stack); #line 154 "runfile.in" {Stack->push(f->tell()); return;} } #line 158 "runfile.in" // void seek(file *f, Int pos); void gen_runfile14(stack *Stack) { Int pos=vm::pop(Stack); file * f=vm::pop(Stack); #line 159 "runfile.in" f->seek(pos,pos >= 0); } #line 163 "runfile.in" // void seekeof(file *f); void gen_runfile15(stack *Stack) { file * f=vm::pop(Stack); #line 164 "runfile.in" f->seek(0,false); } #line 168 "runfile.in" void namePart(stack *Stack) { file f=vm::pop(Stack); #line 169 "runfile.in" {Stack->push(f.filename()); return;} } #line 173 "runfile.in" void modePart(stack *Stack) { file f=vm::pop(Stack); #line 174 "runfile.in" {Stack->push(f.FileMode()); return;} } // Set file dimensions #line 179 "runfile.in" void dimensionSetHelper(stack *Stack) { file * f=vm::pop(Stack); Int nz=vm::pop(Stack,-1); Int ny=vm::pop(Stack,-1); Int nx=vm::pop(Stack,-1); #line 180 "runfile.in" f->dimension(nx,ny,nz); {Stack->push(f); return;} } #line 185 "runfile.in" void dimensionSet(stack *Stack) { file * f=vm::pop(Stack); #line 186 "runfile.in" {Stack->push(new thunk(new bfunc(dimensionSetHelper),f)); return;} } #line 190 "runfile.in" void dimensionPart(stack *Stack) { file f=vm::pop(Stack); #line 191 "runfile.in" array *a=new array(3); (*a)[0]=f.Nx(); (*a)[1]=f.Ny(); (*a)[2]=f.Nz(); {Stack->push(a); return;} } // Set file f to read arrays in line-at-a-time mode #line 200 "runfile.in" void lineSetHelper(stack *Stack) { file * f=vm::pop(Stack); bool b=vm::pop(Stack,true); #line 201 "runfile.in" f->LineMode(b); {Stack->push(f); return;} } #line 206 "runfile.in" void lineSet(stack *Stack) { file * f=vm::pop(Stack); #line 207 "runfile.in" {Stack->push(new thunk(new bfunc(lineSetHelper),f)); return;} } #line 211 "runfile.in" void linePart(stack *Stack) { file f=vm::pop(Stack); #line 212 "runfile.in" {Stack->push(f.LineMode()); return;} } // Set file to read comma-separated values #line 217 "runfile.in" void csvSetHelper(stack *Stack) { file * f=vm::pop(Stack); bool b=vm::pop(Stack,true); #line 218 "runfile.in" f->CSVMode(b); {Stack->push(f); return;} } #line 223 "runfile.in" void csvSet(stack *Stack) { file * f=vm::pop(Stack); #line 224 "runfile.in" {Stack->push(new thunk(new bfunc(csvSetHelper),f)); return;} } #line 228 "runfile.in" void csvPart(stack *Stack) { file f=vm::pop(Stack); #line 229 "runfile.in" {Stack->push(f.CSVMode()); return;} } // Set file to read whitespace-separated values #line 234 "runfile.in" void wordSetHelper(stack *Stack) { file * f=vm::pop(Stack); bool b=vm::pop(Stack,true); #line 235 "runfile.in" f->WordMode(b); {Stack->push(f); return;} } #line 240 "runfile.in" void wordSet(stack *Stack) { file * f=vm::pop(Stack); #line 241 "runfile.in" {Stack->push(new thunk(new bfunc(wordSetHelper),f)); return;} } #line 245 "runfile.in" void wordPart(stack *Stack) { file f=vm::pop(Stack); #line 246 "runfile.in" {Stack->push(f.WordMode()); return;} } // Set file to read/write single precision real XDR values. #line 251 "runfile.in" void singlerealSetHelper(stack *Stack) { file * f=vm::pop(Stack); bool b=vm::pop(Stack,true); #line 252 "runfile.in" f->SingleReal(b); {Stack->push(f); return;} } #line 257 "runfile.in" void singlerealSet(stack *Stack) { file * f=vm::pop(Stack); #line 258 "runfile.in" {Stack->push(new thunk(new bfunc(singlerealSetHelper),f)); return;} } #line 262 "runfile.in" void singlerealPart(stack *Stack) { file f=vm::pop(Stack); #line 263 "runfile.in" {Stack->push(f.SingleReal()); return;} } // Set file to read/write single precision int XDR values. #line 268 "runfile.in" void singleintSetHelper(stack *Stack) { file * f=vm::pop(Stack); bool b=vm::pop(Stack,true); #line 269 "runfile.in" f->SingleInt(b); {Stack->push(f); return;} } #line 274 "runfile.in" void singleintSet(stack *Stack) { file * f=vm::pop(Stack); #line 275 "runfile.in" {Stack->push(new thunk(new bfunc(singleintSetHelper),f)); return;} } #line 279 "runfile.in" void singleintPart(stack *Stack) { file f=vm::pop(Stack); #line 280 "runfile.in" {Stack->push(f.SingleInt()); return;} } // Set file to read/write signed int XDR values. #line 285 "runfile.in" void signedintSetHelper(stack *Stack) { file * f=vm::pop(Stack); bool b=vm::pop(Stack,true); #line 286 "runfile.in" f->SignedInt(b); {Stack->push(f); return;} } #line 291 "runfile.in" void signedintSet(stack *Stack) { file * f=vm::pop(Stack); #line 292 "runfile.in" {Stack->push(new thunk(new bfunc(signedintSetHelper),f)); return;} } #line 296 "runfile.in" void signedintPart(stack *Stack) { file f=vm::pop(Stack); #line 297 "runfile.in" {Stack->push(f.SignedInt()); return;} } // Set file to read an arrayi (i int sizes followed by an i-dimensional array) #line 302 "runfile.in" void readSetHelper(stack *Stack) { file * f=vm::pop(Stack); Int i=vm::pop(Stack); #line 303 "runfile.in" switch(i) { case 1: f->dimension(-2); break; case 2: f->dimension(-2,-2); break; case 3: f->dimension(-2,-2,-2); break; default: f->dimension(); } {Stack->push(f); return;} } #line 324 "runfile.in" void readSet(stack *Stack) { file * f=vm::pop(Stack); #line 325 "runfile.in" {Stack->push(new thunk(new bfunc(readSetHelper),f)); return;} } // Delete file named s. #line 330 "runfile.in" // Int delete(string s); void gen_runfile41(stack *Stack) { string s=vm::pop(Stack); #line 331 "runfile.in" s=outpath(s); Int rc=unlink(s.c_str()); if(rc == 0 && verbose > 0) cout << "Deleted " << s << endl; {Stack->push(rc); return;} } // Rename file "from" to file "to". #line 340 "runfile.in" // Int rename(string from, string to); void gen_runfile42(stack *Stack) { string to=vm::pop(Stack); string from=vm::pop(Stack); #line 341 "runfile.in" from=outpath(from); to=outpath(to); Int rc=rename(from.c_str(),to.c_str()); if(rc == 0 && verbose > 0) cout << "Renamed " << from << " to " << to << endl; {Stack->push(rc); return;} } // Create a unique temporary file name. #line 351 "runfile.in" // string mktemp(string s); void gen_runfile43(stack *Stack) { string s=vm::pop(Stack); #line 352 "runfile.in" char *S=Strdup(s+"XXXXXX"); int fd=mkstemp(S); if(fd < 0) { ostringstream buf; buf << "Could not create unique temporary filename based on " << s; error(buf); } {Stack->push(S); return;} } } // namespace run namespace trans { void gen_runfile_venv(venv &ve) { #line 28 "runfile.in" addFunc(ve, run::gen_runfile0, primBoolean(), SYM_EQ, formal(primFile(), SYM(a), false, false), formal(primFile(), SYM(b), false, false)); #line 33 "runfile.in" addFunc(ve, run::gen_runfile1, primBoolean(), SYM_NEQ, formal(primFile(), SYM(a), false, false), formal(primFile(), SYM(b), false, false)); #line 38 "runfile.in" REGISTER_BLTIN(run::nullFile,"nullFile"); #line 43 "runfile.in" addFunc(ve, run::gen_runfile3, primFile(), SYM(input), formal(primString() , SYM(name), true, false), formal(primBoolean(), SYM(check), true, false), formal(primString() , SYM(comment), true, false), formal(primString() , SYM(mode), true, false)); #line 71 "runfile.in" addFunc(ve, run::gen_runfile4, primFile(), SYM(output), formal(primString() , SYM(name), true, false), formal(primBoolean(), SYM(update), true, false), formal(primString() , SYM(comment), true, false), formal(primString() , SYM(mode), true, false)); #line 108 "runfile.in" addFunc(ve, run::gen_runfile5, primBoolean(), SYM(eof), formal(primFile(), SYM(f), false, false)); #line 113 "runfile.in" addFunc(ve, run::gen_runfile6, primBoolean(), SYM(eol), formal(primFile(), SYM(f), false, false)); #line 118 "runfile.in" addFunc(ve, run::gen_runfile7, primBoolean(), SYM(error), formal(primFile(), SYM(f), false, false)); #line 123 "runfile.in" addFunc(ve, run::gen_runfile8, primVoid(), SYM(clear), formal(primFile(), SYM(f), false, false)); #line 128 "runfile.in" addFunc(ve, run::gen_runfile9, primVoid(), SYM(close), formal(primFile(), SYM(f), false, false)); #line 133 "runfile.in" addFunc(ve, run::gen_runfile10, primInt(), SYM(precision), formal(primFile(), SYM(f), true, false), formal(primInt(), SYM(digits), true, false)); #line 139 "runfile.in" addFunc(ve, run::gen_runfile11, primVoid(), SYM(flush), formal(primFile(), SYM(f), false, false)); #line 144 "runfile.in" addFunc(ve, run::gen_runfile12, primString() , SYM(getc), formal(primFile(), SYM(f), false, false)); #line 153 "runfile.in" addFunc(ve, run::gen_runfile13, primInt(), SYM(tell), formal(primFile(), SYM(f), false, false)); #line 158 "runfile.in" addFunc(ve, run::gen_runfile14, primVoid(), SYM(seek), formal(primFile(), SYM(f), false, false), formal(primInt(), SYM(pos), false, false)); #line 163 "runfile.in" addFunc(ve, run::gen_runfile15, primVoid(), SYM(seekeof), formal(primFile(), SYM(f), false, false)); #line 168 "runfile.in" REGISTER_BLTIN(run::namePart,"namePart"); #line 173 "runfile.in" REGISTER_BLTIN(run::modePart,"modePart"); #line 178 "runfile.in" REGISTER_BLTIN(run::dimensionSetHelper,"dimensionSetHelper"); #line 185 "runfile.in" REGISTER_BLTIN(run::dimensionSet,"dimensionSet"); #line 190 "runfile.in" REGISTER_BLTIN(run::dimensionPart,"dimensionPart"); #line 199 "runfile.in" REGISTER_BLTIN(run::lineSetHelper,"lineSetHelper"); #line 206 "runfile.in" REGISTER_BLTIN(run::lineSet,"lineSet"); #line 211 "runfile.in" REGISTER_BLTIN(run::linePart,"linePart"); #line 216 "runfile.in" REGISTER_BLTIN(run::csvSetHelper,"csvSetHelper"); #line 223 "runfile.in" REGISTER_BLTIN(run::csvSet,"csvSet"); #line 228 "runfile.in" REGISTER_BLTIN(run::csvPart,"csvPart"); #line 233 "runfile.in" REGISTER_BLTIN(run::wordSetHelper,"wordSetHelper"); #line 240 "runfile.in" REGISTER_BLTIN(run::wordSet,"wordSet"); #line 245 "runfile.in" REGISTER_BLTIN(run::wordPart,"wordPart"); #line 250 "runfile.in" REGISTER_BLTIN(run::singlerealSetHelper,"singlerealSetHelper"); #line 257 "runfile.in" REGISTER_BLTIN(run::singlerealSet,"singlerealSet"); #line 262 "runfile.in" REGISTER_BLTIN(run::singlerealPart,"singlerealPart"); #line 267 "runfile.in" REGISTER_BLTIN(run::singleintSetHelper,"singleintSetHelper"); #line 274 "runfile.in" REGISTER_BLTIN(run::singleintSet,"singleintSet"); #line 279 "runfile.in" REGISTER_BLTIN(run::singleintPart,"singleintPart"); #line 284 "runfile.in" REGISTER_BLTIN(run::signedintSetHelper,"signedintSetHelper"); #line 291 "runfile.in" REGISTER_BLTIN(run::signedintSet,"signedintSet"); #line 296 "runfile.in" REGISTER_BLTIN(run::signedintPart,"signedintPart"); #line 301 "runfile.in" REGISTER_BLTIN(run::readSetHelper,"readSetHelper"); #line 324 "runfile.in" REGISTER_BLTIN(run::readSet,"readSet"); #line 329 "runfile.in" addFunc(ve, run::gen_runfile41, primInt(), SYM(delete), formal(primString() , SYM(s), false, false)); #line 339 "runfile.in" addFunc(ve, run::gen_runfile42, primInt(), SYM(rename), formal(primString() , SYM(from), false, false), formal(primString() , SYM(to), false, false)); #line 350 "runfile.in" addFunc(ve, run::gen_runfile43, primString() , SYM(mktemp), formal(primString() , SYM(s), false, false)); } } // namespace trans ./asymptote-2.41/drawlabel.h0000644000175000017500000000403313064427076015651 0ustar norbertnorbert/***** * drawlabel.h * John Bowman 2003/03/14 * * Add a label to a picture. *****/ #ifndef DRAWLABEL_H #define DRAWLABEL_H #include "drawelement.h" #include "path.h" #include "angle.h" #include "transform.h" namespace camp { class drawLabel : public virtual drawElement { protected: string label,size; transform T; // A linear (shiftless) transformation. pair position; pair align; pair scale; pen pentype; double width,height,depth; bool havebounds; bool suppress; pair Align; pair texAlign; bbox Box; bool enabled; public: drawLabel(string label, string size, transform T, pair position, pair align, pen pentype) : label(label), size(size), T(shiftless(T)), position(position), align(align), pentype(pentype), width(0.0), height(0.0), depth(0.0), havebounds(false), suppress(false), enabled(false) {} virtual ~drawLabel() {} void getbounds(iopipestream& tex, const string& texengine); void checkbounds(); void bounds(bbox& b, iopipestream&, boxvector&, bboxlist&); bool islabel() { return true; } bool write(texfile *out, const bbox&); drawElement *transformed(const transform& t); void labelwarning(const char *action); }; class drawLabelPath : public drawLabel, public drawPathPenBase { private: string justify; pair shift; public: drawLabelPath(string label, string size, path src, string justify, pair shift, pen pentype) : drawLabel(label,size,identity,pair(0.0,0.0),pair(0.0,0.0),pentype), drawPathPenBase(src,pentype), justify(justify), shift(shift) {} virtual ~drawLabelPath() {} bool svg() {return true;} bool svgpng() {return true;} void bounds(bbox& b, iopipestream& tex, boxvector&, bboxlist&); bool write(texfile *out, const bbox&); drawElement *transformed(const transform& t); }; void setpen(iopipestream& tex, const string& texengine, const pen& pentype); void texbounds(double& width, double& height, double& depth, iopipestream& tex, string& s); } #endif ./asymptote-2.41/pipestream.cc0000644000175000017500000001150213064427076016222 0ustar norbertnorbert/* Pipestream: A simple C++ interface to UNIX pipes Copyright (C) 2005-2014 John C. Bowman, with contributions from Mojca Miklavec This program is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #include #include #include #include #include #include "pipestream.h" #include "common.h" #include "errormsg.h" #include "settings.h" #include "util.h" #include "interact.h" #include "lexical.h" #include "camperror.h" #include "pen.h" void iopipestream::open(const mem::vector &command, const char *hint, const char *application, int out_fileno) { if(pipe(in) == -1) { ostringstream buf; buf << "in pipe failed: "; for(size_t i=0; i < command.size(); ++i) buf << command[i]; camp::reportError(buf); } if(pipe(out) == -1) { ostringstream buf; buf << "out pipe failed: "; for(size_t i=0; i < command.size(); ++i) buf << command[i]; camp::reportError(buf); } cout.flush(); // Flush stdout to avoid duplicate output. if((pid=fork()) < 0) { ostringstream buf; buf << "fork failed: "; for(size_t i=0; i < command.size(); ++i) buf << command[i]; camp::reportError(buf); } if(pid == 0) { if(interact::interactive) signal(SIGINT,SIG_IGN); close(in[1]); close(out[0]); close(STDIN_FILENO); close(out_fileno); dup2(in[0],STDIN_FILENO); dup2(out[1],out_fileno); close(in[0]); close(out[1]); char **argv=args(command); if(argv) execvp(argv[0],argv); execError(argv[0],hint,application); kill(0,SIGTERM); _exit(-1); } close(out[1]); close(in[0]); *buffer=0; pipeopen=true; pipein=true; Running=true; block(false,true); } void iopipestream::eof() { if(pipeopen && pipein) { close(in[1]); pipein=false; } } void iopipestream::pipeclose() { if(pipeopen) { kill(pid,SIGTERM); eof(); close(out[0]); Running=false; pipeopen=false; waitpid(pid,NULL,0); // Avoid zombies. } } void iopipestream::block(bool write, bool read) { if(pipeopen) { int w=fcntl(in[1],F_GETFL); int r=fcntl(out[0],F_GETFL); fcntl(in[1],F_SETFL,write ? w & ~O_NONBLOCK : w | O_NONBLOCK); fcntl(out[0],F_SETFL,read ? r & ~O_NONBLOCK : r | O_NONBLOCK); } } ssize_t iopipestream::readbuffer() { ssize_t nc; char *p=buffer; ssize_t size=BUFSIZE-1; errno=0; for(;;) { if((nc=read(out[0],p,size)) < 0) { if(errno == EAGAIN) {p[0]=0; break;} else camp::reportError("read from pipe failed"); nc=0; } p[nc]=0; if(nc == 0) { if(waitpid(pid,NULL,WNOHANG) == pid) Running=false; break; } if(nc > 0) { if(settings::verbose > 2) cerr << p; break; } } return nc; } bool iopipestream::tailequals(const char *buf, size_t len, const char *prompt, size_t plen) { const char *a=buf+len; const char *b=prompt+plen; while(b >= prompt) { if(a < buf) return false; if(*a != *b) return false; // Handle MSDOS incompatibility: if(a > buf && *a == '\n' && *(a-1) == '\r') --a; --a; --b; } return true; } string iopipestream::readline() { sbuffer.clear(); int nc; do { nc=readbuffer(); sbuffer.append(buffer); } while(buffer[nc-1] != '\n' && Running); return sbuffer; } void iopipestream::wait(const char *prompt) { sbuffer.clear(); size_t plen=strlen(prompt); do { readbuffer(); sbuffer.append(buffer); } while(!tailequals(sbuffer.c_str(),sbuffer.size(),prompt,plen)); } int iopipestream::wait() { for(;;) { int status; if (waitpid(pid,&status,0) == -1) { if (errno == ECHILD) return 0; if (errno != EINTR) { ostringstream buf; buf << "Process " << pid << " failed"; camp::reportError(buf); } } else { if(WIFEXITED(status)) return WEXITSTATUS(status); else { ostringstream buf; buf << "Process " << pid << " exited abnormally"; camp::reportError(buf); } } } } void iopipestream::Write(const string &s) { ssize_t size=s.length(); if(settings::verbose > 2) cerr << s; if(write(in[1],s.c_str(),size) != size) { camp::reportFatal("write to pipe failed"); } } ./asymptote-2.41/flatguide.cc0000644000175000017500000000177413064427076016027 0ustar norbertnorbert/***** * flatguide.cc * Andy Hammerlindl 2005/02/23 * * The data structure that builds up a knotlist. This is done by calling in * order the methods to set knots, specifiers, and tensions. * Used by the guide solving routines. *****/ #include "flatguide.h" namespace camp { void flatguide::addPre(path& p, Int j) { setSpec(new controlSpec(p.precontrol(j),p.straight(j-1)),IN); } void flatguide::addPoint(path& p, Int j) { add(p.point(j)); } void flatguide::addPost(path& p, Int j) { setSpec(new controlSpec(p.postcontrol(j),p.straight(j)),OUT); } void flatguide::uncheckedAdd(path p, bool allowsolve) { Int n=p.length(); if(n < 0) return; if(n == 0) { addPoint(p,0); return; } int nminus1=n-1; if(!allowsolve && p.cyclic()) addPre(p,0); for(Int i=0; i < nminus1;) { addPoint(p,i); addPost(p,i); ++i; addPre(p,i); } addPoint(p,nminus1); addPost(p,nminus1); if(allowsolve || !p.cyclic()) { addPre(p,n); addPoint(p,n); } } spec flatguide::open; } ./asymptote-2.41/gsl.cc0000644000175000017500000014301113064427076014637 0ustar norbertnorbert/***** * gsl.cc * 2010/05/19 * * Initialize gsl builtins. *****/ #include "config.h" #ifdef HAVE_LIBGSL #include "vm.h" #include "types.h" #include "entry.h" #include "builtin.h" #include "record.h" #include "stack.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include #include #include #include #include #include #include #include "opsymbols.h" #ifndef NOSYM #include "gsl.symbols.h" #endif namespace trans { using types::formal; using types::primVoid; using types::primInt; using types::primReal; using types::primPair; using types::primTriple; using types::primString; using types::IntArray; using types::realArray; using types::stringArray; using vm::stack; using vm::array; using vm::pop; using vm::error; using run::copyArrayC; using run::copyCArray; using camp::pair; using camp::triple; const char* GSLrngnull = "GSL random number generator not initialized"; const char* GSLinvalid = "invalid argument"; bool GSLerror=false; types::dummyRecord *GSLModule; types::record *getGSLModule() { return GSLModule; } inline void checkGSLerror() { if(GSLerror) { GSLerror=false; throw handled_error(); } } template void realRealGSL(stack *s) { double x=pop(s); s->push(func(x)); checkGSLerror(); } template void realRealDOUBLE(stack *s) { double x=pop(s); s->push(func(x,GSL_PREC_DOUBLE)); checkGSLerror(); } template void realRealRealDOUBLE(stack *s) { double y=pop(s); double x=pop(s); s->push(func(x,y,GSL_PREC_DOUBLE)); checkGSLerror(); } template void realIntGSL(stack *s) { s->push(func(unsignedcast(pop(s)))); checkGSLerror(); } template void realIntRealGSL(stack *s) { double x=pop(s); s->push(func(intcast(pop(s)),x)); checkGSLerror(); } template void realRealRealGSL(stack *s) { double x=pop(s); double n=pop(s); s->push(func(n,x)); checkGSLerror(); } template void intRealRealRealGSL(stack *s) { double x=pop(s); double n=pop(s); double a=pop(s); s->push(func(a,n,x)); checkGSLerror(); } template void realRealRealRealGSL(stack *s) { double x=pop(s); double n=pop(s); double a=pop(s); s->push(func(a,n,x)); checkGSLerror(); } template void realRealIntGSL(stack *s) { Int n=pop(s); double x=pop(s); s->push(func(x,unsignedcast(n))); checkGSLerror(); } // Add a GSL special function from the GNU GSL library template void addGSLRealFunc(symbol name, symbol arg1=SYM(x)) { addFunc(GSLModule->e.ve, realRealGSL, primReal(), name, formal(primReal(),arg1)); } // Add a GSL_PREC_DOUBLE GSL special function. template void addGSLDOUBLEFunc(symbol name, symbol arg1=SYM(x)) { addFunc(GSLModule->e.ve, realRealDOUBLE, primReal(), name, formal(primReal(),arg1)); } template void addGSLDOUBLE2Func(symbol name, symbol arg1=SYM(phi), symbol arg2=SYM(k)) { addFunc(GSLModule->e.ve, realRealRealDOUBLE, primReal(), name, formal(primReal(),arg1), formal(primReal(),arg2)); } template void realRealRealRealDOUBLE(stack *s) { double z=pop(s); double y=pop(s); double x=pop(s); s->push(func(x,y,z,GSL_PREC_DOUBLE)); checkGSLerror(); } template void addGSLDOUBLE3Func(symbol name, symbol arg1, symbol arg2, symbol arg3) { addFunc(GSLModule->e.ve, realRealRealRealDOUBLE, primReal(), name, formal(primReal(),arg1), formal(primReal(),arg2), formal(primReal(), arg3)); } template void realRealRealRealRealDOUBLE(stack *s) { double z=pop(s); double y=pop(s); double x=pop(s); double w=pop(s); s->push(func(w,x,y,z,GSL_PREC_DOUBLE)); checkGSLerror(); } template void addGSLDOUBLE4Func(symbol name, symbol arg1, symbol arg2, symbol arg3, symbol arg4) { addFunc(GSLModule->e.ve, realRealRealRealRealDOUBLE, primReal(), name, formal(primReal(),arg1), formal(primReal(),arg2), formal(primReal(), arg3), formal(primReal(), arg4)); } template void addGSLIntFunc(symbol name) { addFunc(GSLModule->e.ve, realIntGSL, primReal(), name, formal(primInt(),SYM(s))); } template void realSignedGSL(stack *s) { Int a = pop(s); s->push(func(intcast(a))); checkGSLerror(); } template void addGSLSignedFunc(symbol name, symbol arg1) { addFunc(GSLModule->e.ve, realSignedGSL, primReal(), name, formal(primInt(),arg1)); } template void addGSLIntRealFunc(symbol name, symbol arg1=SYM(n), symbol arg2=SYM(x)) { addFunc(GSLModule->e.ve, realIntRealGSL, primReal(), name, formal(primInt(),arg1), formal(primReal(),arg2)); } template void addGSLRealRealFunc(symbol name, symbol arg1=SYM(nu), symbol arg2=SYM(x)) { addFunc(GSLModule->e.ve, realRealRealGSL, primReal(), name, formal(primReal(),arg1), formal(primReal(),arg2)); } template void addGSLRealRealRealFunc(symbol name, symbol arg1, symbol arg2, symbol arg3) { addFunc(GSLModule->e.ve, realRealRealRealGSL, primReal(), name, formal(primReal(),arg1), formal(primReal(),arg2), formal(primReal(), arg3)); } template void addGSLRealRealRealFuncInt(symbol name, symbol arg1, symbol arg2, symbol arg3) { addFunc(GSLModule->e.ve, intRealRealRealGSL, primInt(), name, formal(primReal(),arg1), formal(primReal(),arg2), formal(primReal(), arg3)); } template void addGSLRealIntFunc(symbol name, symbol arg1=SYM(nu), symbol arg2=SYM(s)) { addFunc(GSLModule->e.ve, realRealIntGSL, primReal(), name, formal(primReal(),arg1), formal(primInt(),arg2)); } template void realRealSignedGSL(stack *s) { Int b = pop(s); double a = pop(s); s->push(func(a, intcast(b))); checkGSLerror(); } template void addGSLRealSignedFunc(symbol name, symbol arg1, symbol arg2) { addFunc(GSLModule->e.ve, realRealSignedGSL, primReal(), name, formal(primReal(),arg1), formal(primInt(),arg2)); } template void realUnsignedUnsignedGSL(stack *s) { Int b = pop(s); Int a = pop(s); s->push(func(unsignedcast(a), unsignedcast(b))); checkGSLerror(); } template void addGSLUnsignedUnsignedFunc(symbol name, symbol arg1, symbol arg2) { addFunc(GSLModule->e.ve, realUnsignedUnsignedGSL, primReal(), name, formal(primInt(), arg1), formal(primInt(), arg2)); } template void realIntRealRealGSL(stack *s) { double c = pop(s); double b = pop(s); Int a = pop(s); s->push(func(intcast(a), b, c)); checkGSLerror(); } template void addGSLIntRealRealFunc(symbol name, symbol arg1, symbol arg2, symbol arg3) { addFunc(GSLModule->e.ve, realIntRealRealGSL, primReal(), name, formal(primInt(), arg1), formal(primReal(), arg2), formal(primReal(), arg3)); } template void realIntIntRealGSL(stack *s) { double c = pop(s); Int b = pop(s); Int a = pop(s); s->push(func(intcast(a), intcast(b), c)); checkGSLerror(); } template void addGSLIntIntRealFunc(symbol name, symbol arg1, symbol arg2, symbol arg3) { addFunc(GSLModule->e.ve, realIntIntRealGSL, primReal(), name, formal(primInt(), arg1), formal(primInt(), arg2), formal(primReal(), arg3)); } template void realIntIntRealRealGSL(stack *s) { double d = pop(s); double c = pop(s); Int b = pop(s); Int a = pop(s); s->push(func(intcast(a), intcast(b), c, d)); checkGSLerror(); } template void addGSLIntIntRealRealFunc(symbol name, symbol arg1, symbol arg2, symbol arg3, symbol arg4) { addFunc(GSLModule->e.ve, realIntIntRealRealGSL, primReal(), name, formal(primInt(), arg1), formal(primInt(), arg2), formal(primReal(), arg3), formal(primReal(), arg4)); } template void realRealRealRealRealGSL(stack *s) { double d = pop(s); double c = pop(s); double b = pop(s); double a = pop(s); s->push(func(a, b, c, d)); checkGSLerror(); } template void addGSLRealRealRealRealFunc(symbol name, symbol arg1, symbol arg2, symbol arg3, symbol arg4) { addFunc(GSLModule->e.ve, realRealRealRealRealGSL, primReal(), name, formal(primReal(), arg1), formal(primReal(), arg2), formal(primReal(), arg3), formal(primReal(), arg4)); } template void realIntIntIntIntIntIntGSL(stack *s) { Int f = pop(s); Int e = pop(s); Int d = pop(s); Int c = pop(s); Int b = pop(s); Int a = pop(s); s->push(func(intcast(a), intcast(b), intcast(c), intcast(d), intcast(e), intcast(f))); checkGSLerror(); } template void addGSLIntIntIntIntIntIntFunc(symbol name, symbol arg1, symbol arg2, symbol arg3, symbol arg4, symbol arg5, symbol arg6) { addFunc(GSLModule->e.ve, realIntIntIntIntIntIntGSL, primReal(), name, formal(primInt(), arg1), formal(primInt(), arg2), formal(primInt(), arg3), formal(primInt(), arg4), formal(primInt(), arg5), formal(primInt(), arg6)); } template void realIntIntIntIntIntIntIntIntIntGSL(stack *s) { Int i = pop(s); Int h = pop(s); Int g = pop(s); Int f = pop(s); Int e = pop(s); Int d = pop(s); Int c = pop(s); Int b = pop(s); Int a = pop(s); s->push(func(intcast(a), intcast(b), intcast(c), intcast(d), intcast(e), intcast(f), intcast(g), intcast(h), intcast(i))); checkGSLerror(); } template void addGSLIntIntIntIntIntIntIntIntIntFunc(symbol name, symbol arg1, symbol arg2, symbol arg3, symbol arg4, symbol arg5, symbol arg6, symbol arg7, symbol arg8, symbol arg9) { addFunc(GSLModule->e.ve, realIntIntIntIntIntIntIntIntIntGSL, primReal(), name, formal(primInt(), arg1), formal(primInt(), arg2), formal(primInt(), arg3), formal(primInt(), arg4), formal(primInt(), arg5), formal(primInt(), arg6), formal(primInt(), arg7), formal(primInt(), arg8), formal(primInt(), arg9)); } template void realUIntRealGSL(stack *s) { double a = pop(s); unsigned int k = unsignedcast(pop(s)); s->push(func(k,a)); checkGSLerror(); } template void addGSLUIntRealFunc(symbol name, symbol arg1, symbol arg2) { addFunc(GSLModule->e.ve, realUIntRealGSL, primReal(), name, formal(primInt(), arg1), formal(primReal(), arg2)); } template void realUIntRealUIntGSL(stack *s) { unsigned int n = unsignedcast(pop(s)); double a = pop(s); unsigned int k = unsignedcast(pop(s)); s->push(func(k,a,n)); checkGSLerror(); } template void addGSLUIntRealUIntFunc(symbol name, symbol arg1, symbol arg2, symbol arg3) { addFunc(GSLModule->e.ve, realUIntRealUIntGSL, primReal(), name, formal(primInt(), arg1), formal(primReal(), arg2), formal(primInt(), arg3)); } template void realUIntRealRealGSL(stack *s) { double b = pop(s); double a = pop(s); unsigned int k = unsignedcast(pop(s)); s->push(func(k,a,b)); checkGSLerror(); } template void addGSLUIntRealRealFunc(symbol name, symbol arg1, symbol arg2, symbol arg3) { addFunc(GSLModule->e.ve, realUIntRealRealGSL, primReal(), name, formal(primInt(), arg1), formal(primReal(), arg2), formal(primReal(), arg3)); } template void realUIntUIntUIntUIntGSL(stack *s) { unsigned int t = unsignedcast(pop(s)); unsigned int n2 = unsignedcast(pop(s)); unsigned int n1 = unsignedcast(pop(s)); unsigned int k = unsignedcast(pop(s)); s->push(func(k,n1,n2,t)); checkGSLerror(); } template void addGSLUIntUIntUIntUIntFunc(symbol name, symbol arg1, symbol arg2, symbol arg3, symbol arg4) { addFunc(GSLModule->e.ve, realUIntUIntUIntUIntGSL, primReal(), name, formal(primInt(), arg1), formal(primInt(), arg2), formal(primInt(), arg3), formal(primInt(), arg4)); } // GSL random number generators gsl_rng *GSLrng=0; const gsl_rng_type **GSLrngFirstType=gsl_rng_types_setup(); inline void checkGSLrng() { if(GSLrng == 0) error(GSLrngnull); } void GSLrngFree() { if(GSLrng != 0) gsl_rng_free(GSLrng); GSLrng=0; } void GSLrngInit(stack *s) { string n = pop(s,string()); const gsl_rng_type **t; if(n.empty()) t = &gsl_rng_default; else { for(t=GSLrngFirstType; *t!=0; ++t) if(n == string((*t)->name)) break; if(*t == 0) error(GSLinvalid); } GSLrngFree(); GSLrng = gsl_rng_alloc(*t); if(GSLrng == 0) { GSLerror=false; error("insufficient memory for allocation of GSL random number generator"); } } void GSLrngList(stack *s) { array* a = new array(0); const gsl_rng_type **t; for(t=GSLrngFirstType; *t!=0; ++t) { a->push(string((*t)->name)); } s->push(a); checkGSLerror(); } void GSLrngSet(stack *s) { Int i=pop(s,-1); checkGSLrng(); if(i < 0) gsl_rng_set(GSLrng,gsl_rng_default_seed); else gsl_rng_set(GSLrng,unsignedcast(i)); checkGSLerror(); } template void intVoidGSLrng(stack *s) { s->push(func(GSLrng)); checkGSLrng(); checkGSLerror(); } template void addGSLrngVoidFuncInt(symbol name) { addFunc(GSLModule->e.ve, intVoidGSLrng, primInt(), name); } template void intULongGSLrng(stack *s) { unsigned long int i = unsignedcast(pop(s)); checkGSLrng(); s->push(func(GSLrng,i)); checkGSLerror(); } template void addGSLrngULongFuncInt(symbol name, symbol arg1) { addFunc(GSLModule->e.ve, intULongGSLrng, primInt(), name, formal(primInt(), arg1)); } template void intRealGSLrng(stack *s) { double x = pop(s); checkGSLrng(); s->push(func(GSLrng,x)); checkGSLerror(); } template void addGSLrngRealFuncInt(symbol name, symbol arg1) { addFunc(GSLModule->e.ve, intRealGSLrng, primInt(), name, formal(primReal(), arg1)); } template void intRealRealGSLrng(stack *s) { double y = pop(s); double x = pop(s); checkGSLrng(); s->push(func(GSLrng,x,y)); checkGSLerror(); } template void addGSLrngRealRealFuncInt(symbol name, symbol arg1, symbol arg2) { addFunc(GSLModule->e.ve, intRealRealGSLrng, primInt(), name, formal(primReal(), arg1), formal(primReal(), arg2)); } template void realVoidGSLrng(stack *s) { checkGSLrng(); s->push(func(GSLrng)); checkGSLerror(); } template void addGSLrngVoidFunc(symbol name) { addFunc(GSLModule->e.ve, realVoidGSLrng, primReal(), name); } template void realRealGSLrng(stack *s) { double x = pop(s); checkGSLrng(); s->push(func(GSLrng,x)); checkGSLerror(); } template void addGSLrngRealFunc(symbol name, symbol arg1) { addFunc(GSLModule->e.ve, realRealGSLrng, primReal(), name, formal(primReal(), arg1)); } template void realRealRealGSLrng(stack *s) { double b = pop(s); double a = pop(s); checkGSLrng(); s->push(func(GSLrng,a,b)); checkGSLerror(); } template void addGSLrngRealRealFunc(symbol name, symbol arg1, symbol arg2) { addFunc(GSLModule->e.ve, realRealRealGSLrng, primReal(), name, formal(primReal(), arg1), formal(primReal(), arg2)); } template void intRealUIntGSLrng(stack *s) { unsigned int n = unsignedcast(pop(s)); double a = pop(s); checkGSLrng(); s->push(func(GSLrng,a,n)); checkGSLerror(); } template void addGSLrngRealUIntFuncInt(symbol name, symbol arg1, symbol arg2) { addFunc(GSLModule->e.ve, intRealUIntGSLrng, primInt(), name, formal(primReal(), arg1), formal(primInt(), arg2)); } template void intUIntUIntUIntGSLrng(stack *s) { unsigned int t = unsignedcast(pop(s)); unsigned int n2 = unsignedcast(pop(s)); unsigned int n1 = unsignedcast(pop(s)); checkGSLrng(); s->push(func(GSLrng,n1,n2,t)); checkGSLerror(); } template void addGSLrngUIntUIntUIntFuncInt(symbol name, symbol arg1, symbol arg2, symbol arg3) { addFunc(GSLModule->e.ve, intUIntUIntUIntGSLrng, primInt(), name, formal(primInt(), arg1), formal(primInt(), arg2), formal(primInt(), arg3)); } template void stringVoidGSLrng(stack *s) { checkGSLrng(); s->push(func(GSLrng)); checkGSLerror(); } template void addGSLrngVoidFuncString(symbol name) { addFunc(GSLModule->e.ve, stringVoidGSLrng, primString(), name); } void GSLrng_gaussian(stack *s) { string method = pop(s,string("polar")); double sigma = pop(s,1.0); double mu = pop(s,0.0); checkGSLrng(); double x=mu; if(method == "polar") x += gsl_ran_gaussian(GSLrng,sigma); else if(method == "ziggurat") x += gsl_ran_gaussian_ziggurat(GSLrng,sigma); else if(method == "ratio") x += gsl_ran_gaussian_ratio_method(GSLrng,sigma); else error(GSLinvalid); s->push(x); checkGSLerror(); } template void realRealRealRealGSLgaussian(stack *s) { double sigma = pop(s,1.0); double mu = pop(s,0.0); double x = pop(s); s->push(func(x-mu,sigma)); checkGSLerror(); } template void addGSLgaussianrealRealRealRealFunc(symbol name, symbol arg1) { addFunc(GSLModule->e.ve, realRealRealRealGSLgaussian, primReal(), name, formal(primReal(), arg1), formal(primReal(), SYM(mu), true, false), formal(primReal(), SYM(sigma), true, false)); } template void realRealRealRealGSLinvgaussian(stack *s) { double sigma = pop(s,1.0); double mu = pop(s,0.0); double x = pop(s); s->push(func(x,sigma)+mu); checkGSLerror(); } template void addGSLinvgaussianrealRealRealRealFunc(symbol name, symbol arg1) { addFunc(GSLModule->e.ve, realRealRealRealGSLinvgaussian, primReal(), name, formal(primReal(), arg1), formal(primReal(), SYM(mu), true, false), formal(primReal(), SYM(sigma), true, false)); } void GSLrng_bivariate_gaussian(stack *s) { double rho = pop(s,0.0); pair sigma = pop(s,pair(1.0,1.0)); pair mu = pop(s,pair(0.0,0.0)); checkGSLrng(); double x,y; gsl_ran_bivariate_gaussian(GSLrng,sigma.getx(),sigma.gety(),rho,&x,&y); s->push(pair(x,y)+mu); checkGSLerror(); } void GSLpdf_bivariate_gaussian(stack *s) { double rho = pop(s,0.0); pair sigma = pop(s,pair(1.0,1.0)); pair mu = pop(s,pair(0.0,0.0)); pair z = pop(s); s->push(gsl_ran_bivariate_gaussian_pdf(z.getx()+mu.getx(),z.gety()+mu.gety(), sigma.getx(),sigma.gety(),rho)); checkGSLerror(); } void GSLrng_levy(stack *s) { double beta = pop(s,0.0); double alpha = pop(s); double c = pop(s); if((alpha<=0) || (alpha>2)) error(GSLinvalid); if((beta<-1) || (beta>1)) error(GSLinvalid); checkGSLrng(); double x; if(beta==0) x=gsl_ran_levy(GSLrng,c,alpha); else x=gsl_ran_levy_skew(GSLrng,c,alpha,beta); s->push(x); checkGSLerror(); } void GSLrng_gamma(stack *s) { string method = pop(s,string("mt")); double b = pop(s); double a = pop(s); checkGSLrng(); double x=0.0; if(method == "mt") x = gsl_ran_gamma(GSLrng,a,b); else if(method == "knuth") x = gsl_ran_gamma_knuth(GSLrng,a,b); else error(GSLinvalid); s->push(x); checkGSLerror(); } void GSLrng_dir2d(stack *s) { string method = pop(s,string("neumann")); checkGSLrng(); double x=0, y=0; if(method == "neumann") gsl_ran_dir_2d(GSLrng,&x,&y); else if(method == "trig") gsl_ran_dir_2d_trig_method(GSLrng,&x,&y); else error(GSLinvalid); s->push(pair(x,y)); checkGSLerror(); } void GSLrng_dir3d(stack *s) { checkGSLrng(); double x,y,z; gsl_ran_dir_3d(GSLrng,&x,&y,&z); s->push(triple(x,y,z)); checkGSLerror(); } void GSLrng_dir(stack *s) { size_t n = (size_t) unsignedcast(pop(s)); if(n==0) error(GSLinvalid); checkGSLrng(); double* p = new double[n]; gsl_ran_dir_nd(GSLrng,n,p); s->push(copyCArray(n,p)); delete[] p; checkGSLerror(); } void GSLrng_dirichlet(stack *s) { array* alpha = pop(s); size_t K = checkArray(alpha); checkGSLrng(); double* calpha; copyArrayC(calpha,alpha); double* ctheta = new double[K]; gsl_ran_dirichlet(GSLrng,K,calpha,ctheta); s->push(copyCArray(K,ctheta)); delete[] ctheta; delete[] calpha; checkGSLerror(); } void GSLpdf_dirichlet(stack *s) { array* theta = pop(s); array* alpha = pop(s); size_t K = checkArray(alpha); if(checkArray(theta) != K) error(GSLinvalid); double* calpha; copyArrayC(calpha,alpha); double* ctheta; copyArrayC(ctheta,theta); s->push(gsl_ran_dirichlet_pdf(K,calpha,ctheta)); delete[] ctheta; delete[] calpha; checkGSLerror(); } void GSLrng_multinomial(stack *s) { array* p = pop(s); unsigned int N = unsignedcast(pop(s)); size_t K = checkArray(p); checkGSLrng(); double* cp; copyArrayC(cp,p); unsigned int* cn = new unsigned int[K]; gsl_ran_multinomial(GSLrng,K,N,cp,cn); s->push(copyCArray(K,cn)); delete[] cn; delete[] cp; checkGSLerror(); } void GSLpdf_multinomial(stack *s) { array* n = pop(s); array* p = pop(s); size_t K = checkArray(p); if(K != checkArray(n)) error(GSLinvalid); double* cp; copyArrayC(cp,p); unsigned int* cn; copyArrayC(cn,n,unsignedcast); s->push(gsl_ran_multinomial_pdf(K,cp,cn)); delete[] cn; delete[] cp; checkGSLerror(); } void GSLsf_elljac_e(stack *s) { double m = pop(s); double u = pop(s); double sn,cn,dn; gsl_sf_elljac_e(u,m,&sn,&cn,&dn); array *result=new array(3); (*result)[0]=sn; (*result)[1]=cn; (*result)[2]=dn; s->push(result); } // Handle GSL errors gracefully. void GSLerrorhandler(const char *reason, const char *, int, int) { if(!GSLerror) { vm::errornothrow(reason); GSLerror=true; } } void gen_rungsl_venv(venv &ve) { GSLModule=new types::dummyRecord(SYM(gsl)); gsl_set_error_handler(GSLerrorhandler); // Common functions addGSLRealRealFunc(SYM(hypot),SYM(x),SYM(y)); // addGSLRealRealRealFunc(SYM(hypot),SYM(x),SYM(y),SYM(z)); addGSLRealRealRealFuncInt(SYM(fcmp),SYM(x),SYM(y),SYM(epsilon)); // Airy functions addGSLDOUBLEFunc(SYM(Ai)); addGSLDOUBLEFunc(SYM(Bi)); addGSLDOUBLEFunc(SYM(Ai_scaled)); addGSLDOUBLEFunc(SYM(Bi_scaled)); addGSLDOUBLEFunc(SYM(Ai_deriv)); addGSLDOUBLEFunc(SYM(Bi_deriv)); addGSLDOUBLEFunc(SYM(Ai_deriv_scaled)); addGSLDOUBLEFunc(SYM(Bi_deriv_scaled)); addGSLIntFunc(SYM(zero_Ai)); addGSLIntFunc(SYM(zero_Bi)); addGSLIntFunc(SYM(zero_Ai_deriv)); addGSLIntFunc(SYM(zero_Bi_deriv)); // Bessel functions addGSLRealFunc(SYM(J0)); addGSLRealFunc(SYM(J1)); addGSLIntRealFunc(SYM(Jn)); addGSLRealFunc(SYM(Y0)); addGSLRealFunc(SYM(Y1)); addGSLIntRealFunc(SYM(Yn)); addGSLRealFunc(SYM(I0)); addGSLRealFunc(SYM(I1)); addGSLIntRealFunc(SYM(I)); addGSLRealFunc(SYM(I0_scaled)); addGSLRealFunc(SYM(I1_scaled)); addGSLIntRealFunc(SYM(I_scaled)); addGSLRealFunc(SYM(K0)); addGSLRealFunc(SYM(K1)); addGSLIntRealFunc(SYM(K)); addGSLRealFunc(SYM(K0_scaled)); addGSLRealFunc(SYM(K1_scaled)); addGSLIntRealFunc(SYM(K_scaled)); addGSLRealFunc(SYM(j0)); addGSLRealFunc(SYM(j1)); addGSLRealFunc(SYM(j2)); addGSLIntRealFunc(SYM(j),SYM(l)); addGSLRealFunc(SYM(y0)); addGSLRealFunc(SYM(y1)); addGSLRealFunc(SYM(y2)); addGSLIntRealFunc(SYM(y),SYM(l)); addGSLRealFunc(SYM(i0_scaled)); addGSLRealFunc(SYM(i1_scaled)); addGSLRealFunc(SYM(i2_scaled)); addGSLIntRealFunc(SYM(i_scaled),SYM(l)); addGSLRealFunc(SYM(k0_scaled)); addGSLRealFunc(SYM(k1_scaled)); addGSLRealFunc(SYM(k2_scaled)); addGSLIntRealFunc(SYM(k_scaled),SYM(l)); addGSLRealRealFunc(SYM(J)); addGSLRealRealFunc(SYM(Y)); addGSLRealRealFunc(SYM(I)); addGSLRealRealFunc(SYM(I_scaled)); addGSLRealRealFunc(SYM(K)); addGSLRealRealFunc(SYM(lnK)); addGSLRealRealFunc(SYM(K_scaled)); addGSLIntFunc(SYM(zero_J0)); addGSLIntFunc(SYM(zero_J1)); addGSLRealIntFunc(SYM(zero_J)); // Clausen functions addGSLRealFunc(SYM(clausen)); // Coulomb functions addGSLRealRealFunc(SYM(hydrogenicR_1),SYM(Z),SYM(r)); addGSLIntIntRealRealFunc(SYM(hydrogenicR),SYM(n),SYM(l), SYM(Z),SYM(r)); // Missing: F_L(eta,x), G_L(eta,x), C_L(eta) // Coupling coefficients addGSLIntIntIntIntIntIntFunc(SYM(coupling_3j),SYM(two_ja), SYM(two_jb),SYM(two_jc), SYM(two_ma), SYM(two_mb),SYM(two_mc)); addGSLIntIntIntIntIntIntFunc(SYM(coupling_6j),SYM(two_ja), SYM(two_jb),SYM(two_jc), SYM(two_jd), SYM(two_je),SYM(two_jf)); addGSLIntIntIntIntIntIntIntIntIntFunc(SYM(coupling_9j), SYM(two_ja), SYM(two_jb), SYM(two_jc), SYM(two_jd), SYM(two_je), SYM(two_jf), SYM(two_jg), SYM(two_jh), SYM(two_ji)); // Dawson function addGSLRealFunc(SYM(dawson)); // Debye functions addGSLRealFunc(SYM(debye_1)); addGSLRealFunc(SYM(debye_2)); addGSLRealFunc(SYM(debye_3)); addGSLRealFunc(SYM(debye_4)); addGSLRealFunc(SYM(debye_5)); addGSLRealFunc(SYM(debye_6)); // Dilogarithm addGSLRealFunc(SYM(dilog)); // Missing: complex dilogarithm // Elementary operations // we don't support errors at the moment // Elliptic integrals addGSLDOUBLEFunc(SYM(K),SYM(k)); addGSLDOUBLEFunc(SYM(E),SYM(k)); addGSLDOUBLE2Func(SYM(P),SYM(k),SYM(n)); addGSLDOUBLE2Func(SYM(F)); addGSLDOUBLE2Func(SYM(E)); addGSLDOUBLE3Func(SYM(P),SYM(phi),SYM(k),SYM(n)); #if GSL_MAJOR_VERSION >= 2 addGSLDOUBLE2Func(SYM(D),SYM(phi),SYM(k)); #else addGSLDOUBLE3Func(SYM(D),SYM(phi),SYM(k),SYM(n)); #endif addGSLDOUBLE2Func(SYM(RC),SYM(x),SYM(y)); addGSLDOUBLE3Func(SYM(RD),SYM(x),SYM(y),SYM(z)); addGSLDOUBLE3Func(SYM(RF),SYM(x),SYM(y),SYM(z)); addGSLDOUBLE4Func(SYM(RJ),SYM(x),SYM(y),SYM(z),SYM(p)); // Error functions addGSLRealFunc(SYM(erf)); addGSLRealFunc(SYM(erfc)); addGSLRealFunc(SYM(log_erfc)); addGSLRealFunc(SYM(erf_Z)); addGSLRealFunc(SYM(erf_Q)); addGSLRealFunc(SYM(hazard)); // Exponential functions addGSLRealRealFunc(SYM(exp_mult),SYM(x),SYM(y)); // addGSLRealFunc(SYM(expm1)); addGSLRealFunc(SYM(exprel)); addGSLRealFunc(SYM(exprel_2)); addGSLIntRealFunc(SYM(exprel),SYM(n),SYM(x)); // Exponential integrals addGSLRealFunc(SYM(E1)); addGSLRealFunc(SYM(E2)); // addGSLIntRealFunc(SYM(En),SYM(n),SYM(x)); addGSLRealFunc(SYM(Ei)); addGSLRealFunc(SYM(Shi)); addGSLRealFunc(SYM(Chi)); addGSLRealFunc(SYM(Ei3)); addGSLRealFunc(SYM(Si)); addGSLRealFunc(SYM(Ci)); addGSLRealFunc(SYM(atanint)); // Fermi--Dirac function addGSLRealFunc(SYM(FermiDiracM1)); addGSLRealFunc(SYM(FermiDirac0)); addGSLRealFunc(SYM(FermiDirac1)); addGSLRealFunc(SYM(FermiDirac2)); addGSLIntRealFunc(SYM(FermiDirac),SYM(j),SYM(x)); addGSLRealFunc(SYM(FermiDiracMHalf)); addGSLRealFunc(SYM(FermiDiracHalf)); addGSLRealFunc(SYM(FermiDirac3Half)); addGSLRealRealFunc(SYM(FermiDiracInc0),SYM(x), SYM(b)); // Gamma and beta functions addGSLRealFunc(SYM(gamma)); addGSLRealFunc(SYM(lngamma)); addGSLRealFunc(SYM(gammastar)); addGSLRealFunc(SYM(gammainv)); addGSLIntFunc(SYM(fact)); addGSLIntFunc(SYM(doublefact)); addGSLIntFunc(SYM(lnfact)); addGSLIntFunc(SYM(lndoublefact)); addGSLUnsignedUnsignedFunc(SYM(choose),SYM(n),SYM(m)); addGSLUnsignedUnsignedFunc(SYM(lnchoose),SYM(n),SYM(m)); addGSLIntRealFunc(SYM(taylorcoeff),SYM(n),SYM(x)); addGSLRealRealFunc(SYM(poch),SYM(a),SYM(x)); addGSLRealRealFunc(SYM(lnpoch),SYM(a),SYM(x)); addGSLRealRealFunc(SYM(pochrel),SYM(a),SYM(x)); addGSLRealRealFunc(SYM(gamma),SYM(a),SYM(x)); addGSLRealRealFunc(SYM(gamma_Q),SYM(a),SYM(x)); addGSLRealRealFunc(SYM(gamma_P),SYM(a),SYM(x)); addGSLRealRealFunc(SYM(beta),SYM(a),SYM(b)); addGSLRealRealFunc(SYM(lnbeta),SYM(a),SYM(b)); addGSLRealRealRealFunc(SYM(beta),SYM(a),SYM(b),SYM(x)); // Gegenbauer functions addGSLRealRealFunc(SYM(gegenpoly_1),SYM(lambda),SYM(x)); addGSLRealRealFunc(SYM(gegenpoly_2),SYM(lambda),SYM(x)); addGSLRealRealFunc(SYM(gegenpoly_3),SYM(lambda),SYM(x)); addGSLIntRealRealFunc(SYM(gegenpoly),SYM(n),SYM(lambda), SYM(x)); // Hypergeometric functions addGSLRealRealFunc(SYM(hy0F1),SYM(c),SYM(x)); addGSLIntIntRealFunc(SYM(hy1F1),SYM(m),SYM(n),SYM(x)); addGSLRealRealRealFunc(SYM(hy1F1),SYM(a),SYM(b),SYM(x)); addGSLIntIntRealFunc(SYM(U),SYM(m),SYM(n),SYM(x)); addGSLRealRealRealFunc(SYM(U),SYM(a),SYM(b),SYM(x)); addGSLRealRealRealRealFunc(SYM(hy2F1),SYM(a),SYM(b),SYM(c), SYM(x)); addGSLRealRealRealRealFunc(SYM(hy2F1_conj),SYM(aR), SYM(aI),SYM(c),SYM(x)); addGSLRealRealRealRealFunc(SYM(hy2F1_renorm),SYM(a), SYM(b),SYM(c),SYM(x)); addGSLRealRealRealRealFunc (SYM(hy2F1_conj_renorm),SYM(aR),SYM(aI),SYM(c),SYM(x)); addGSLRealRealRealFunc(SYM(hy2F0),SYM(a),SYM(b),SYM(x)); // Laguerre functions addGSLRealRealFunc(SYM(L1),SYM(a),SYM(x)); addGSLRealRealFunc(SYM(L2),SYM(a),SYM(x)); addGSLRealRealFunc(SYM(L3),SYM(a),SYM(x)); addGSLIntRealRealFunc(SYM(L),SYM(n),SYM(a),SYM(x)); // Lambert W functions addGSLRealFunc(SYM(W0)); addGSLRealFunc(SYM(Wm1)); // Legendre functions and spherical harmonics addGSLRealFunc(SYM(P1)); addGSLRealFunc(SYM(P2)); addGSLRealFunc(SYM(P3)); addGSLIntRealFunc(SYM(Pl),SYM(l)); addGSLRealFunc(SYM(Q0)); addGSLRealFunc(SYM(Q1)); addGSLIntRealFunc(SYM(Ql),SYM(l)); addGSLIntIntRealFunc(SYM(Plm),SYM(l),SYM(m),SYM(x)); addGSLIntIntRealFunc(SYM(sphPlm),SYM(l),SYM(m), SYM(x)); addGSLRealRealFunc(SYM(conicalP_half),SYM(lambda), SYM(x)); addGSLRealRealFunc(SYM(conicalP_mhalf),SYM(lambda), SYM(x)); addGSLRealRealFunc(SYM(conicalP_0),SYM(lambda),SYM(x)); addGSLRealRealFunc(SYM(conicalP_1),SYM(lambda),SYM(x)); addGSLIntRealRealFunc(SYM(conicalP_sph_reg),SYM(l), SYM(lambda),SYM(x)); addGSLIntRealRealFunc(SYM(conicalP_cyl_reg),SYM(m), SYM(lambda),SYM(x)); addGSLRealRealFunc(SYM(H3d0),SYM(lambda),SYM(eta)); addGSLRealRealFunc(SYM(H3d1),SYM(lambda),SYM(eta)); addGSLIntRealRealFunc(SYM(H3d),SYM(l),SYM(lambda), SYM(eta)); // Logarithm and related functions addGSLRealFunc(SYM(logabs)); // addGSLRealFunc(SYM(log1p)); addGSLRealFunc(SYM(log1pm)); // Matthieu functions // to be implemented // Power function addGSLRealSignedFunc(SYM(pow),SYM(x),SYM(n)); // Psi (digamma) function addGSLSignedFunc(SYM(psi),SYM(n)); addGSLRealFunc(SYM(psi)); addGSLRealFunc(SYM(psi_1piy),SYM(y)); addGSLSignedFunc(SYM(psi1),SYM(n)); addGSLRealFunc(SYM(psi1),SYM(x)); addGSLIntRealFunc(SYM(psi),SYM(n),SYM(x)); // Synchrotron functions addGSLRealFunc(SYM(synchrotron_1)); addGSLRealFunc(SYM(synchrotron_2)); // Transport functions addGSLRealFunc(SYM(transport_2)); addGSLRealFunc(SYM(transport_3)); addGSLRealFunc(SYM(transport_4)); addGSLRealFunc(SYM(transport_5)); // Trigonometric functions addGSLRealFunc(SYM(sinc)); addGSLRealFunc(SYM(lnsinh)); addGSLRealFunc(SYM(lncosh)); // Zeta functions addGSLSignedFunc(SYM(zeta),SYM(n)); addGSLRealFunc(SYM(zeta),SYM(s)); addGSLSignedFunc(SYM(zetam1),SYM(n)); addGSLRealFunc(SYM(zetam1),SYM(s)); addGSLRealRealFunc(SYM(hzeta),SYM(s),SYM(q)); addGSLSignedFunc(SYM(eta),SYM(n)); addGSLRealFunc(SYM(eta),SYM(s)); // Random number generation gsl_rng_env_setup(); addFunc(GSLModule->e.ve,GSLrngInit,primVoid(),SYM(rng_init), formal(primString(),SYM(name),true,false)); addFunc(GSLModule->e.ve,GSLrngList,stringArray(),SYM(rng_list)); addFunc(GSLModule->e.ve,GSLrngSet,primVoid(),SYM(rng_set), formal(primInt(),SYM(seed),true,false)); addGSLrngVoidFuncString(SYM(rng_name)); addGSLrngVoidFuncInt(SYM(rng_min)); addGSLrngVoidFuncInt(SYM(rng_max)); addGSLrngVoidFuncInt(SYM(rng_get)); addGSLrngULongFuncInt(SYM(rng_uniform_int),SYM(n)); addGSLrngVoidFunc(SYM(rng_uniform)); addGSLrngVoidFunc(SYM(rng_uniform_pos)); // Gaussian distribution addFunc(GSLModule->e.ve,GSLrng_gaussian,primReal(),SYM(rng_gaussian), formal(primReal(),SYM(mu),true,false), formal(primReal(),SYM(sigma),true,false), formal(primString(),SYM(method),true,false)); addGSLgaussianrealRealRealRealFunc(SYM(pdf_gaussian), SYM(x)); addGSLgaussianrealRealRealRealFunc(SYM(cdf_gaussian_P), SYM(x)); addGSLgaussianrealRealRealRealFunc(SYM(cdf_gaussian_Q), SYM(x)); addGSLinvgaussianrealRealRealRealFunc (SYM(cdf_gaussian_Pinv),SYM(x)); addGSLinvgaussianrealRealRealRealFunc (SYM(cdf_gaussian_Qinv),SYM(x)); // Gaussian tail distribution addGSLrngRealRealFunc(SYM(rng_gaussian_tail),SYM(a), SYM(sigma)); addGSLRealRealRealFunc(SYM(pdf_gaussian_tail), SYM(x),SYM(a),SYM(sigma)); // Bivariate Gaussian distribution addFunc(GSLModule->e.ve,GSLrng_bivariate_gaussian,primPair(), SYM(rng_bivariate_gaussian), formal(primPair(),SYM(mu),true,true), formal(primPair(),SYM(sigma),true,true), formal(primReal(),SYM(rho),true,false)); addFunc(GSLModule->e.ve,GSLpdf_bivariate_gaussian,primReal(), SYM(pdf_bivariate_gaussian), formal(primPair(),SYM(z),false,true), formal(primPair(),SYM(mu),true,true), formal(primPair(),SYM(sigma),true,true), formal(primReal(),SYM(rho),true,false)); #define addGSLrealdist1param(NAME,ARG) \ addGSLrngRealFunc \ (SYM(rng_##NAME),SYM(ARG)); \ addGSLRealRealFunc \ (SYM(pdf_##NAME),SYM(x),SYM(ARG)); \ addGSLRealRealFunc \ (SYM(cdf_##NAME##_P),SYM(x),SYM(ARG)); \ addGSLRealRealFunc \ (SYM(cdf_##NAME##_Q),SYM(x),SYM(ARG)); \ addGSLRealRealFunc \ (SYM(cdf_##NAME##_Pinv),SYM(P),SYM(ARG)); \ addGSLRealRealFunc \ (SYM(cdf_##NAME##_Qinv),SYM(Q),SYM(ARG)) // Exponential, Laplace, Cauchy, Rayleigh, Chi-squared, t, // and Logistic distribution addGSLrealdist1param(exponential,mu); addGSLrealdist1param(laplace,a); addGSLrealdist1param(cauchy,a); addGSLrealdist1param(rayleigh,mu); addGSLrealdist1param(chisq,mu); addGSLrealdist1param(tdist,mu); addGSLrealdist1param(logistic,mu); #undef addGSLrealdist1param #define addGSLrealdist2param(NAME,ARG1,ARG2) \ addGSLrngRealRealFunc \ (SYM(rng_##NAME),SYM(ARG1),SYM(ARG2)); \ addGSLRealRealRealFunc \ (SYM(pdf_##NAME),SYM(x),SYM(ARG1),SYM(ARG2)); \ addGSLRealRealRealFunc \ (SYM(cdf_##NAME##_P),SYM(x),SYM(ARG1),SYM(ARG2)); \ addGSLRealRealRealFunc \ (SYM(cdf_##NAME##_Q),SYM(x),SYM(ARG1),SYM(ARG2)); \ addGSLRealRealRealFunc \ (SYM(cdf_##NAME##_Pinv),SYM(P),SYM(ARG1),SYM(ARG2)); \ addGSLRealRealRealFunc \ (SYM(cdf_##NAME##_Qinv),SYM(Q),SYM(ARG1),SYM(ARG2)) // Uniform, log-normal, F, Beta, Pareto, Weibull, Type-1 Gumbel, // and Type-2 Gumbel distribution addGSLrealdist2param(flat,a,b); addGSLrealdist2param(lognormal,zeta,sigma); addGSLrealdist2param(fdist,nu1,nu2); addGSLrealdist2param(beta,a,b); addGSLrealdist2param(pareto,a,b); addGSLrealdist2param(weibull,a,b); addGSLrealdist2param(gumbel1,a,b); addGSLrealdist2param(gumbel2,a,b); #undef addGSLrealdist2param // Exponential power distribution addGSLrngRealRealFunc (SYM(rng_exppow),SYM(a),SYM(b)); addGSLRealRealRealFunc (SYM(pdf_exppow),SYM(x),SYM(a),SYM(b)); addGSLRealRealRealFunc (SYM(cdf_exppow_P),SYM(x),SYM(a),SYM(b)); addGSLRealRealRealFunc (SYM(cdf_exppow_Q),SYM(x),SYM(a),SYM(b)); // Exponential power distribution addGSLrngRealRealFunc (SYM(rng_rayleigh_tail),SYM(a),SYM(sigma)); addGSLRealRealRealFunc (SYM(pdf_rayleigh_tail),SYM(x),SYM(a),SYM(sigma)); // Landau distribution addGSLrngVoidFunc(SYM(rng_landau)); addGSLRealFunc(SYM(pdf_landau),SYM(x)); // Levy skwew alpha-stable distribution addFunc(GSLModule->e.ve,GSLrng_levy,primReal(),SYM(rng_levy), formal(primReal(),SYM(c)), formal(primReal(),SYM(alpha)), formal(primReal(),SYM(beta),true,false)); // Gamma distribution addFunc(GSLModule->e.ve,GSLrng_gamma,primReal(),SYM(rng_gamma), formal(primReal(),SYM(a)), formal(primReal(),SYM(b)), formal(primString(),SYM(method),true,false)); addGSLRealRealRealFunc (SYM(pdf_gamma),SYM(x),SYM(a),SYM(b)); addGSLRealRealRealFunc (SYM(cdf_gamma_P),SYM(x),SYM(a),SYM(b)); addGSLRealRealRealFunc (SYM(cdf_gamma_Q),SYM(x),SYM(a),SYM(b)); addGSLRealRealRealFunc (SYM(cdf_gamma_Pinv),SYM(P),SYM(a),SYM(b)); addGSLRealRealRealFunc (SYM(cdf_gamma_Qinv),SYM(Q),SYM(a),SYM(b)); // Sperical distributions addFunc(GSLModule->e.ve,GSLrng_dir2d,primPair(),SYM(rng_dir2d), formal(primString(),SYM(method),true,false)); addFunc(GSLModule->e.ve,GSLrng_dir3d,primTriple(),SYM(rng_dir3d)); addFunc(GSLModule->e.ve,GSLrng_dir,realArray(),SYM(rng_dir), formal(primInt(),SYM(n))); // Elliptic functions (Jacobi) addFunc(GSLModule->e.ve,GSLsf_elljac_e,realArray(),SYM(sncndn), formal(primReal(),SYM(u)),formal(primReal(),SYM(m))); // Dirirchlet distribution addFunc(GSLModule->e.ve,GSLrng_dirichlet,realArray(),SYM(rng_dirichlet), formal(realArray(),SYM(alpha))); addFunc(GSLModule->e.ve,GSLpdf_dirichlet,primReal(),SYM(pdf_dirichlet), formal(realArray(),SYM(alpha)), formal(realArray(),SYM(theta))); // General discrete distributions // to be implemented #define addGSLdiscdist1param(NAME,ARG,TYPE) \ addGSLrng##TYPE##FuncInt \ (SYM(rng_##NAME),SYM(ARG)); \ addGSLUInt##TYPE##Func \ (SYM(pdf_##NAME),SYM(k),SYM(ARG)); \ addGSLUInt##TYPE##Func \ (SYM(cdf_##NAME##_P),SYM(k),SYM(ARG)); \ addGSLUInt##TYPE##Func \ (SYM(cdf_##NAME##_Q),SYM(k),SYM(ARG)) // Poisson, geometric distributions addGSLdiscdist1param(poisson,mu,Real); addGSLdiscdist1param(geometric,p,Real); #undef addGSLdiscdist1param #define addGSLdiscdist2param(NAME,ARG1,TYPE1,ARG2,TYPE2) \ addGSLrng##TYPE1##TYPE2##FuncInt \ (SYM(rng_##NAME),SYM(ARG1),SYM(ARG2)); \ addGSLUInt##TYPE1##TYPE2##Func \ (SYM(pdf_##NAME),SYM(k),SYM(ARG1),SYM(ARG2)); \ addGSLUInt##TYPE1##TYPE2##Func \ (SYM(cdf_##NAME##_P),SYM(k),SYM(ARG1),SYM(ARG2)); \ addGSLUInt##TYPE1##TYPE2##Func \ (SYM(cdf_##NAME##_Q),SYM(k),SYM(ARG1),SYM(ARG2)) // Binomial, negative binomial distributions addGSLdiscdist2param(binomial,p,Real,n,UInt); addGSLdiscdist2param(negative_binomial,p,Real,n,Real); #undef addGSLdiscdist2param // Logarithmic distribution addGSLrngRealFuncInt(SYM(rng_logarithmic),SYM(p)); addGSLUIntRealFunc(SYM(pdf_logarithmic),SYM(k), SYM(p)); // Bernoulli distribution addGSLrngRealFuncInt(SYM(rng_bernoulli),SYM(p)); addGSLUIntRealFunc(SYM(pdf_bernoulli),SYM(k),SYM(p)); // Multinomial distribution addFunc(GSLModule->e.ve,GSLrng_multinomial,IntArray(),SYM(rng_multinomial), formal(primInt(),SYM(n)), formal(realArray(),SYM(p))); addFunc(GSLModule->e.ve,GSLpdf_multinomial,primReal(),SYM(pdf_multinomial), formal(realArray(),SYM(p)), formal(IntArray(),SYM(n))); // Hypergeometric distribution addGSLrngUIntUIntUIntFuncInt (SYM(rng_hypergeometric),SYM(n1),SYM(n2),SYM(t)); addGSLUIntUIntUIntUIntFunc (SYM(pdf_hypergeometric),SYM(k),SYM(n1),SYM(n2),SYM(t)); addGSLUIntUIntUIntUIntFunc (SYM(cdf_hypergeometric_P),SYM(k),SYM(n1),SYM(n2),SYM(t)); addGSLUIntUIntUIntUIntFunc (SYM(cdf_hypergeometric_Q),SYM(k),SYM(n1),SYM(n2),SYM(t)); } } // namespace trans #endif ./asymptote-2.41/fileio.cc0000644000175000017500000000767313064427076015336 0ustar norbertnorbert/****** * fileio.cc * Tom Prince and John Bowman 2004/08/10 * * Handle input/output ******/ #include "fileio.h" #include "settings.h" namespace camp { FILE *pipeout=NULL; string tab="\t"; string newline="\n"; ofile Stdout(""); file nullfile("",false,NOMODE,false,true); void ifile::ignoreComment() { if(comment == 0) return; int c; bool eol=(stream->peek() == '\n'); if(eol && csvmode && nullfield) return; for(;;) { while(isspace(c=stream->peek())) { stream->ignore(); whitespace += (char) c; } if(c == comment) { whitespace=""; while((c=stream->peek()) != '\n' && c != EOF) stream->ignore(); if(c == '\n') stream->ignore(); } else {if(c != EOF && eol) stream->unget(); return;} } } bool ifile::eol() { int c; while(isspace(c=stream->peek())) { if(c == '\n') return true; else { stream->ignore(); whitespace += (char) c; } } return false; } bool ifile::nexteol() { int c; if(nullfield) { nullfield=false; return true; } while(isspace(c=stream->peek())) { if(c == '\n' && comma) { nullfield=true; return false; } stream->ignore(); if(c == '\n') { while(isspace(c=stream->peek())) { if(c == '\n') {nullfield=true; return true;} else { stream->ignore(); whitespace += (char) c; } } return true; } else whitespace += (char) c; } return false; } void ifile::csv() { comma=false; nullfield=false; if(!csvmode || stream->eof()) return; std::ios::iostate rdstate=stream->rdstate(); if(stream->fail()) stream->clear(); int c=stream->peek(); if(c == ',') stream->ignore(); else if(c == '\n') { stream->ignore(); if(linemode && stream->peek() != EOF) stream->unget(); } else stream->clear(rdstate); if(c == ',') comma=true; } void ifile::Read(string& val) { string s; if(wordmode) { whitespace=""; while(isspace(stream->peek())) stream->ignore(); } if(csvmode || wordmode) { bool quote=false; while(stream->good()) { int c=stream->peek(); if(c == '"') {quote=!quote; stream->ignore(); continue;} if(!quote) { if(comment && c == comment) { while((c=stream->peek()) != '\n' && c != EOF) stream->ignore(); if(wordmode && !linemode) while(isspace(stream->peek())) stream->ignore(); if(stream->peek() == '"') {quote=!quote; stream->ignore(); continue;} if(s.empty() && c == '\n') { stream->ignore(); continue; } } if(csvmode && (c == ',' || c == '\n')) break; if(wordmode && isspace(c)) { if(!linemode) while(isspace(stream->peek())) stream->ignore(); break; } } s += (char) stream->get(); } } else getline(*stream,s); if(comment) { size_t p=0; while((p=s.find(comment,p)) < string::npos) { if(p+1 < s.length() && s[p+1] == comment) { s.erase(p,1); ++p; } else { s.erase(p); break; } } } size_t pos=s.length()-1; if(s[pos] == '\r') s.erase(pos,1); val=whitespace+s; } void ofile::writeline() { if(standard && interact::query && !vm::indebugger) { Int scroll=settings::getScroll(); if(scroll && interact::lines > 0 && interact::lines % scroll == 0) { for(;;) { if(!cin.good()) { *stream << newline; cin.clear(); break; } int c=cin.get(); if(c == '\n') break; // Discard any additional characters while(cin.good() && cin.get() != '\n'); if(c == 's') {interact::query=false; break;} if(c == 'q') {interact::query=false; interact::lines=0; throw quit();} } } else *stream << newline; ++interact::lines; } else *stream << newline; if(errorstream::interrupt) {interact::lines=0; throw interrupted();} } } // namespace camp ./asymptote-2.41/glrender.cc0000644000175000017500000011045613064427076015663 0ustar norbertnorbert/***** * glrender.cc * John Bowman and Orest Shardt * Render 3D Bezier paths and surfaces. *****/ #include #include #include #include #include "common.h" #ifdef HAVE_GL #ifdef HAVE_LIBGLUT #ifdef __MSDOS__ #ifndef FGAPI #define FGAPI GLUTAPI #endif #ifndef FGAPIENTRY #define FGAPIENTRY APIENTRY #endif #endif #define GLUT_BUILDING_LIB #endif // HAVE_LIBGLUT #include "picture.h" #include "arcball.h" #include "bbox3.h" #include "drawimage.h" #include "interact.h" #include "tr.h" #ifdef HAVE_LIBGLUT #ifdef FREEGLUT #include #endif #endif namespace camp { billboard BB; } namespace gl { bool outlinemode=false; bool glthread=false; bool initialize=true; using camp::picture; using camp::drawRawImage; using camp::transform; using camp::pair; using camp::triple; using vm::array; using vm::read; using camp::bbox3; using settings::getSetting; using settings::Setting; bool Iconify=false; bool Menu; bool Motion; bool ignorezoom; int Fitscreen; bool queueExport=false; bool readyAfterExport=false; #ifdef HAVE_LIBGLUT timeval lasttime; timeval lastframetime; int oldWidth,oldHeight; bool Xspin,Yspin,Zspin; bool Animate; bool Step; bool queueScreen=false; int x0,y0; string Action; int MenuButton; double lastangle; Arcball arcball; int window; #endif double Aspect; bool View; int Oldpid; string Prefix; const picture* Picture; string Format; int Width,Height; int fullWidth,fullHeight; double oWidth,oHeight; int screenWidth,screenHeight; int maxWidth; int maxHeight; int maxTileWidth; int maxTileHeight; double T[16]; int Mode; double Angle; bool orthographic; double H; double xmin,xmax; double ymin,ymax; double zmin,zmax; double Xmin,Xmax; double Ymin,Ymax; pair Shift; double X,Y; double cx,cy; double Xfactor,Yfactor; static const double pi=acos(-1.0); static const double degrees=180.0/pi; static const double radians=1.0/degrees; double Background[4]; size_t Nlights; triple *Lights; double *Diffuse; double *Ambient; double *Specular; bool ViewportLighting; bool antialias; double Zoom; double Zoom0; double lastzoom; GLfloat Rotate[16]; GLUnurbs *nurb=NULL; void *glrenderWrapper(void *a); #ifdef HAVE_LIBOSMESA OSMesaContext ctx; unsigned char *osmesa_buffer; #endif #ifdef HAVE_PTHREAD pthread_t mainthread; pthread_cond_t initSignal=PTHREAD_COND_INITIALIZER; pthread_mutex_t initLock=PTHREAD_MUTEX_INITIALIZER; pthread_cond_t readySignal=PTHREAD_COND_INITIALIZER; pthread_mutex_t readyLock=PTHREAD_MUTEX_INITIALIZER; void endwait(pthread_cond_t& signal, pthread_mutex_t& lock) { pthread_mutex_lock(&lock); pthread_cond_signal(&signal); pthread_mutex_unlock(&lock); } void wait(pthread_cond_t& signal, pthread_mutex_t& lock) { pthread_mutex_lock(&lock); pthread_cond_signal(&signal); pthread_cond_wait(&signal,&lock); pthread_mutex_unlock(&lock); } #endif template inline T min(T a, T b) { return (a < b) ? a : b; } template inline T max(T a, T b) { return (a > b) ? a : b; } void lighting() { for(size_t i=0; i < Nlights; ++i) { GLenum index=GL_LIGHT0+i; triple Lighti=Lights[i]; GLfloat position[]={(GLfloat) Lighti.getx(),(GLfloat) Lighti.gety(), (GLfloat) Lighti.getz(),0.0}; glLightfv(index,GL_POSITION,position); } } void initlighting() { glClearColor(Background[0],Background[1],Background[2],Background[3]); glEnable(GL_LIGHTING); glLightModeli(GL_LIGHT_MODEL_TWO_SIDE,getSetting("twosided")); for(size_t i=0; i < Nlights; ++i) { GLenum index=GL_LIGHT0+i; glEnable(index); size_t i4=4*i; GLfloat diffuse[]={(GLfloat) Diffuse[i4],(GLfloat) Diffuse[i4+1], (GLfloat) Diffuse[i4+2],(GLfloat) Diffuse[i4+3]}; glLightfv(index,GL_DIFFUSE,diffuse); GLfloat ambient[]={(GLfloat) Ambient[i4],(GLfloat) Ambient[i4+1], (GLfloat) Ambient[i4+2],(GLfloat) Ambient[i4+3]}; glLightfv(index,GL_AMBIENT,ambient); GLfloat specular[]={(GLfloat) Specular[i4],(GLfloat) Specular[i4+1], (GLfloat) Specular[i4+2],(GLfloat) Specular[i4+3]}; glLightfv(index,GL_SPECULAR,specular); } static size_t lastNlights=0; for(size_t i=Nlights; i < lastNlights; ++i) { GLenum index=GL_LIGHT0+i; glDisable(index); } lastNlights=Nlights; if(ViewportLighting) lighting(); } void setDimensions(int Width, int Height, double X, double Y) { double Aspect=((double) Width)/Height; double xshift=X/Width*lastzoom+Shift.getx()*Xfactor; double yshift=Y/Height*lastzoom+Shift.gety()*Yfactor; double Zoominv=1.0/lastzoom; if(orthographic) { double xsize=Xmax-Xmin; double ysize=Ymax-Ymin; if(xsize < ysize*Aspect) { double r=0.5*ysize*Aspect*Zoominv; double X0=2.0*r*xshift; double Y0=(Ymax-Ymin)*Zoominv*yshift; xmin=-r-X0; xmax=r-X0; ymin=Ymin*Zoominv-Y0; ymax=Ymax*Zoominv-Y0; } else { double r=0.5*xsize/(Aspect*Zoom); double X0=(Xmax-Xmin)*Zoominv*xshift; double Y0=2.0*r*yshift; xmin=Xmin*Zoominv-X0; xmax=Xmax*Zoominv-X0; ymin=-r-Y0; ymax=r-Y0; } } else { double r=H*Zoominv; double rAspect=r*Aspect; double X0=2.0*rAspect*xshift; double Y0=2.0*r*yshift; xmin=-rAspect-X0; xmax=rAspect-X0; ymin=-r-Y0; ymax=r-Y0; } } void setProjection() { glMatrixMode(GL_PROJECTION); glLoadIdentity(); setDimensions(Width,Height,X,Y); if(orthographic) glOrtho(xmin,xmax,ymin,ymax,-zmax,-zmin); else glFrustum(xmin,xmax,ymin,ymax,-zmax,-zmin); glMatrixMode(GL_MODELVIEW); #ifdef HAVE_LIBGLUT double arcballRadius=getSetting("arcballradius"); arcball.set_params(vec2(0.5*Width,0.5*Height),arcballRadius*Zoom); #endif } void drawscene(double Width, double Height) { #ifdef HAVE_PTHREAD static bool first=true; if(glthread && first && !getSetting("offscreen")) { wait(initSignal,initLock); endwait(initSignal,initLock); first=false; } #endif glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT); if(!ViewportLighting) lighting(); triple m(xmin,ymin,zmin); triple M(xmax,ymax,zmax); double perspective=orthographic ? 0.0 : 1.0/zmax; double size2=hypot(Width,Height); // Render opaque objects Picture->render(nurb,size2,m,M,perspective,Nlights,false); // Enable transparency glDepthMask(GL_FALSE); // Render transparent objects Picture->render(nurb,size2,m,M,perspective,Nlights,true); glDepthMask(GL_TRUE); } // Return x divided by y rounded up to the nearest integer. int Quotient(int x, int y) { return (x+y-1)/y; } void Export() { glReadBuffer(GL_BACK_LEFT); glPixelStorei(GL_PACK_ALIGNMENT,1); glFinish(); try { size_t ndata=3*fullWidth*fullHeight; unsigned char *data=new unsigned char[ndata]; if(data) { TRcontext *tr=trNew(); int width=Quotient(fullWidth,Quotient(fullWidth,min(maxTileWidth,Width))); int height=Quotient(fullHeight,Quotient(fullHeight, min(maxTileHeight,Height))); if(settings::verbose > 1) cout << "Exporting " << Prefix << " as " << fullWidth << "x" << fullHeight << " image" << " using tiles of size " << width << "x" << height << endl; trTileSize(tr,width,height,0); trImageSize(tr,fullWidth,fullHeight); trImageBuffer(tr,GL_RGB,GL_UNSIGNED_BYTE,data); setDimensions(fullWidth,fullHeight,X/Width*fullWidth,Y/Width*fullWidth); (orthographic ? trOrtho : trFrustum)(tr,xmin,xmax,ymin,ymax,-zmax,-zmin); size_t count=0; do { trBeginTile(tr); drawscene(fullWidth,fullHeight); ++count; } while (trEndTile(tr)); if(settings::verbose > 1) cout << count << " tile" << (count != 1 ? "s" : "") << " drawn" << endl; trDelete(tr); picture pic; double w=oWidth; double h=oHeight; double Aspect=((double) fullWidth)/fullHeight; if(w > h*Aspect) w=(int) (h*Aspect+0.5); else h=(int) (w/Aspect+0.5); // Render an antialiased image. drawRawImage *Image=new drawRawImage(data,fullWidth,fullHeight, transform(0.0,0.0,w,0.0,0.0,h), antialias); pic.append(Image); pic.shipout(NULL,Prefix,Format,0.0,false,View); delete Image; delete[] data; } } catch(handled_error) { } catch(std::bad_alloc&) { outOfMemory(); } setProjection(); bool offscreen=getSetting("offscreen"); #ifdef HAVE_LIBGLUT if(!offscreen) glutPostRedisplay(); #endif #ifdef HAVE_PTHREAD if(glthread && readyAfterExport && !offscreen) { readyAfterExport=false; endwait(readySignal,readyLock); } #endif } #ifdef HAVE_LIBGLUT void idle() { glutIdleFunc(NULL); Xspin=Yspin=Zspin=Animate=Step=false; } #endif void home() { X=Y=cx=cy=0.0; #ifdef HAVE_LIBGLUT if(!getSetting("offscreen")) { idle(); arcball.init(); } #endif glLoadIdentity(); glGetFloatv(GL_MODELVIEW_MATRIX,Rotate); lastzoom=Zoom=Zoom0; setDimensions(Width,Height,0,0); initlighting(); } void nodisplay() { } void destroywindow() { glutDestroyWindow(glutGetWindow()); } // Return the greatest power of 2 less than or equal to n. inline unsigned int floorpow2(unsigned int n) { n |= n >> 1; n |= n >> 2; n |= n >> 4; n |= n >> 8; n |= n >> 16; return n-(n >> 1); } void quit() { #ifdef HAVE_LIBOSMESA if(getSetting("offscreen")) { if(osmesa_buffer) delete[] osmesa_buffer; if(ctx) OSMesaDestroyContext(ctx); exit(0); } #endif #ifdef HAVE_LIBGLUT if(glthread) { bool animating=getSetting("animating"); if(animating) Setting("interrupt")=true; home(); Animate=getSetting("autoplay"); #ifdef HAVE_PTHREAD if(!interact::interactive || animating) { idle(); glutDisplayFunc(nodisplay); endwait(readySignal,readyLock); } #endif if(interact::interactive) glutHideWindow(); } else { glutDestroyWindow(window); exit(0); } #endif } void mode() { switch(Mode) { case 0: for(size_t i=0; i < Nlights; ++i) glEnable(GL_LIGHT0+i); outlinemode=false; glPolygonMode(GL_FRONT_AND_BACK,GL_FILL); gluNurbsProperty(nurb,GLU_DISPLAY_MODE,GLU_FILL); ++Mode; break; case 1: for(size_t i=0; i < Nlights; ++i) glDisable(GL_LIGHT0+i); outlinemode=true; glPolygonMode(GL_FRONT_AND_BACK,GL_LINE); gluNurbsProperty(nurb,GLU_DISPLAY_MODE,GLU_OUTLINE_PATCH); ++Mode; break; case 2: outlinemode=false; gluNurbsProperty(nurb,GLU_DISPLAY_MODE,GLU_OUTLINE_POLYGON); Mode=0; break; } #ifdef HAVE_LIBGLUT if(!getSetting("offscreen")) glutPostRedisplay(); #endif } // GUI-related functions #ifdef HAVE_LIBGLUT bool capsize(int& width, int& height) { bool resize=false; if(width > maxWidth) { width=maxWidth; resize=true; } if(height > maxHeight) { height=maxHeight; resize=true; } return resize; } void reshape0(int width, int height) { X=(X/Width)*width; Y=(Y/Height)*height; Width=width; Height=height; setProjection(); glViewport(0,0,Width,Height); } void windowposition(int& x, int& y, int width=Width, int height=Height) { pair z=getSetting("position"); x=(int) z.getx(); y=(int) z.gety(); if(x < 0) { x += screenWidth-width; if(x < 0) x=0; } if(y < 0) { y += screenHeight-height; if(y < 0) y=0; } } void setsize(int w, int h, bool reposition=true) { int x,y; capsize(w,h); if(reposition) { windowposition(x,y,w,h); glutPositionWindow(x,y); } glutReshapeWindow(w,h); reshape0(w,h); glutPostRedisplay(); } void fullscreen(bool reposition=true) { Width=screenWidth; Height=screenHeight; reshape0(Width,Height); if(reposition) glutPositionWindow(0,0); glutReshapeWindow(Width,Height); glutPostRedisplay(); } void fitscreen(bool reposition=true) { if(Animate && Fitscreen == 2) Fitscreen=0; switch(Fitscreen) { case 0: // Original size { Xfactor=Yfactor=1.0; setsize(oldWidth,oldHeight,reposition); break; } case 1: // Fit to screen in one dimension { oldWidth=Width; oldHeight=Height; int w=screenWidth; int h=screenHeight; if(w >= h*Aspect) w=(int) (h*Aspect+0.5); else h=(int) (w/Aspect+0.5); setsize(w,h,reposition); break; } case 2: // Full screen { Xfactor=((double) screenHeight)/Height; Yfactor=((double) screenWidth)/Width; fullscreen(reposition); break; } } } void togglefitscreen() { ++Fitscreen; if(Fitscreen > 2) Fitscreen=0; fitscreen(); } void initTimer() { gettimeofday(&lasttime,NULL); gettimeofday(&lastframetime,NULL); } void idleFunc(void (*f)()) { initTimer(); glutIdleFunc(f); } void screen() { if(glthread && !interact::interactive) fitscreen(false); } void nextframe(int) { #ifdef HAVE_PTHREAD endwait(readySignal,readyLock); #endif double framedelay=getSetting("framedelay"); if(framedelay > 0) usleep((unsigned int) (1000.0*framedelay+0.5)); if(Step) Animate=false; } void display() { if(queueScreen) { if(!Animate) screen(); queueScreen=false; } drawscene(Width,Height); glutSwapBuffers(); #ifdef HAVE_PTHREAD if(glthread && Animate) { queueExport=false; double delay=1.0/getSetting("framerate"); timeval tv; gettimeofday(&tv,NULL); double seconds=tv.tv_sec-lastframetime.tv_sec+ ((double) tv.tv_usec-lastframetime.tv_usec)/1000000.0; lastframetime=tv; double milliseconds=1000.0*(delay-seconds); double framedelay=getSetting("framedelay"); if(framedelay > 0) milliseconds -= framedelay; if(milliseconds > 0) glutTimerFunc((int) (milliseconds+0.5),nextframe,0); else nextframe(0); } #endif if(queueExport) { Export(); queueExport=false; } if(!glthread) { if(Oldpid != 0 && waitpid(Oldpid,NULL,WNOHANG) != Oldpid) { kill(Oldpid,SIGHUP); Oldpid=0; } } } void update() { glutDisplayFunc(display); Animate=getSetting("autoplay"); glutShowWindow(); lastzoom=Zoom; glLoadIdentity(); double cz=0.5*(zmin+zmax); glTranslatef(cx,cy,cz); glMultMatrixf(Rotate); glTranslatef(0,0,-cz); setProjection(); glutPostRedisplay(); } void updateHandler(int) { queueScreen=true; update(); if(interact::interactive || !Animate) { glutShowWindow(); } } void animate() { Animate=!Animate; if(Animate) { if(Fitscreen == 2) { togglefitscreen(); togglefitscreen(); } update(); } } void reshape(int width, int height) { if(glthread) { static bool initialize=true; if(initialize) { initialize=false; Signal(SIGUSR1,updateHandler); } } if(capsize(width,height)) glutReshapeWindow(width,height); reshape0(width,height); } void shift(int x, int y) { if(x > 0 && y > 0) { double Zoominv=1.0/Zoom; X += (x-x0)*Zoominv; Y += (y0-y)*Zoominv; x0=x; y0=y; update(); } } void pan(int x, int y) { if(x > 0 && y > 0) { if(orthographic) { double Zoominv=1.0/Zoom; X += (x-x0)*Zoominv; Y += (y0-y)*Zoominv; } else { cx += (x-x0)*(xmax-xmin)/Width; cy += (y0-y)*(ymax-ymin)/Height; } x0=x; y0=y; update(); } } void capzoom() { static double maxzoom=sqrt(DBL_MAX); static double minzoom=1/maxzoom; if(Zoom <= minzoom) Zoom=minzoom; if(Zoom >= maxzoom) Zoom=maxzoom; } int menustatus=GLUT_MENU_NOT_IN_USE; void menuStatus(int status, int x, int y) { menustatus=status; } void disableMenu() { Menu=false; if(menustatus == GLUT_MENU_NOT_IN_USE) glutDetachMenu(MenuButton); } void zoom(int x, int y) { if(ignorezoom) {ignorezoom=false; y0=y; return;} if(x > 0 && y > 0) { if(Menu) { disableMenu(); y0=y; return; } Motion=true; double zoomFactor=getSetting("zoomfactor"); if(zoomFactor > 0.0) { double zoomStep=getSetting("zoomstep"); const double limit=log(0.1*DBL_MAX)/log(zoomFactor); double s=zoomStep*(y0-y); if(fabs(s) < limit) { Zoom *= pow(zoomFactor,s); capzoom(); lastzoom=Zoom; y0=y; setProjection(); glutPostRedisplay(); } } } } void mousewheel(int wheel, int direction, int x, int y) { double zoomFactor=getSetting("zoomfactor"); if(zoomFactor > 0.0) { if(direction > 0) Zoom *= zoomFactor; else Zoom /= zoomFactor; capzoom(); lastzoom=Zoom; setProjection(); glutPostRedisplay(); } } void rotate(int x, int y) { if(x > 0 && y > 0) { if(Menu) { disableMenu(); arcball.mouse_down(x,Height-y); return; } Motion=true; arcball.mouse_motion(x,Height-y,0, Action == "rotateX", // X rotation only Action == "rotateY"); // Y rotation only for(int i=0; i < 4; ++i) { const vec4& roti=arcball.rot[i]; int i4=4*i; for(int j=0; j < 4; ++j) Rotate[i4+j]=roti[j]; } update(); } } double Degrees(int x, int y) { return atan2(0.5*Height-y-Y,x-0.5*Width-X)*degrees; } void updateArcball() { for(int i=0; i < 4; ++i) { int i4=4*i; vec4& roti=arcball.rot[i]; for(int j=0; j < 4; ++j) roti[j]=Rotate[i4+j]; } update(); } void rotateX(double step) { glLoadIdentity(); glRotatef(step,1,0,0); glMultMatrixf(Rotate); glGetFloatv(GL_MODELVIEW_MATRIX,Rotate); updateArcball(); } void rotateY(double step) { glLoadIdentity(); glRotatef(step,0,1,0); glMultMatrixf(Rotate); glGetFloatv(GL_MODELVIEW_MATRIX,Rotate); updateArcball(); } void rotateZ(double step) { glLoadIdentity(); glRotatef(step,0,0,1); glMultMatrixf(Rotate); glGetFloatv(GL_MODELVIEW_MATRIX,Rotate); updateArcball(); } void rotateZ(int x, int y) { if(x > 0 && y > 0) { if(Menu) { disableMenu(); return; } Motion=true; double angle=Degrees(x,y); rotateZ(angle-lastangle); lastangle=angle; } } #ifndef GLUT_WHEEL_UP #define GLUT_WHEEL_UP 3 #endif #ifndef GLUT_WHEEL_DOWN #define GLUT_WHEEL_DOWN 4 #endif string action(int button, int mod) { size_t Button; size_t nButtons=5; switch(button) { case GLUT_LEFT_BUTTON: Button=0; break; case GLUT_MIDDLE_BUTTON: Button=1; break; case GLUT_RIGHT_BUTTON: Button=2; break; case GLUT_WHEEL_UP: Button=3; break; case GLUT_WHEEL_DOWN: Button=4; break; default: Button=nButtons; } size_t Mod; size_t nMods=4; switch(mod) { case 0: Mod=0; break; case GLUT_ACTIVE_SHIFT: Mod=1; break; case GLUT_ACTIVE_CTRL: Mod=2; break; case GLUT_ACTIVE_ALT: Mod=3; break; default: Mod=nMods; } if(Button < nButtons) { array *left=getSetting("leftbutton"); array *middle=getSetting("middlebutton"); array *right=getSetting("rightbutton"); array *wheelup=getSetting("wheelup"); array *wheeldown=getSetting("wheeldown"); array *Buttons[]={left,middle,right,wheelup,wheeldown}; array *a=Buttons[button]; size_t size=checkArray(a); if(Mod < size) return read(a,Mod); } return ""; } void timeout(int) { if(Menu) disableMenu(); } void mouse(int button, int state, int x, int y) { int mod=glutGetModifiers(); string Action=action(button,mod); if(!Menu) { if(mod == 0 && state == GLUT_UP && !Motion && Action == "zoom/menu") { MenuButton=button; glutMotionFunc(NULL); glutTimerFunc(getSetting("doubleclick"),timeout,0); glutAttachMenu(button); Menu=true; return; } else Motion=false; } disableMenu(); if(Action == "zoomin") { glutMotionFunc(NULL); mousewheel(0,1,x,y); return; } if(Action == "zoomout") { glutMotionFunc(NULL); mousewheel(0,-1,x,y); return; } if(state == GLUT_DOWN) { if(Action == "rotate" || Action == "rotateX" || Action == "rotateY") { arcball.mouse_down(x,Height-y); glutMotionFunc(rotate); } else if(Action == "shift") { x0=x; y0=y; glutMotionFunc(shift); } else if(Action == "pan") { x0=x; y0=y; glutMotionFunc(pan); } else if(Action == "zoom" || Action == "zoom/menu") { y0=y; glutMotionFunc(zoom); } else if(Action == "rotateZ") { lastangle=Degrees(x,y); glutMotionFunc(rotateZ); } } else { arcball.mouse_up(); glutMotionFunc(NULL); } } double spinstep() { timeval tv; gettimeofday(&tv,NULL); double step=getSetting("spinstep")* (tv.tv_sec-lasttime.tv_sec+ ((double) tv.tv_usec-lasttime.tv_usec)/1000000.0); lasttime=tv; return step; } void xspin() { rotateX(spinstep()); } void yspin() { rotateY(spinstep()); } void zspin() { rotateZ(spinstep()); } void expand() { double resizeStep=getSetting("resizestep"); if(resizeStep > 0.0) setsize((int) (Width*resizeStep+0.5),(int) (Height*resizeStep+0.5)); } void shrink() { double resizeStep=getSetting("resizestep"); if(resizeStep > 0.0) setsize(max((int) (Width/resizeStep+0.5),1), max((int) (Height/resizeStep+0.5),1)); } void spinx() { if(Xspin) idle(); else { idleFunc(xspin); Xspin=true; Yspin=Zspin=false; } } void spiny() { if(Yspin) idle(); else { idleFunc(yspin); Yspin=true; Xspin=Zspin=false; } } void spinz() { if(Zspin) idle(); else { idleFunc(zspin); Zspin=true; Xspin=Yspin=false; } } void write(const char *text, const double *v) { cout << text << "=(" << v[0] << "," << v[1] << "," << v[2] << ")"; } void showCamera() { projection P=camera(); cout << endl << "currentprojection=" << (P.orthographic ? "orthographic(" : "perspective(") << endl << "camera=" << P.camera << "," << endl << "up=" << P.up << "," << endl << "target=" << P.target << "," << endl << "zoom=" << P.zoom; if(!orthographic) cout << "," << endl << "angle=" << P.angle; if(P.viewportshift != pair(0.0,0.0)) cout << "," << endl << "viewportshift=" << P.viewportshift; if(!orthographic) cout << "," << endl << "autoadjust=false"; cout << ");" << endl; } void keyboard(unsigned char key, int x, int y) { switch(key) { case 'h': home(); update(); break; case 'f': togglefitscreen(); break; case 'x': spinx(); break; case 'y': spiny(); break; case 'z': spinz(); break; case 's': idle(); break; case 'm': mode(); break; case 'e': Export(); break; case 'c': showCamera(); break; case '+': case '=': case '>': expand(); break; case '-': case '_': case '<': shrink(); break; case 'p': if(getSetting("reverse")) Animate=false; Setting("reverse")=Step=false; animate(); break; case 'r': if(!getSetting("reverse")) Animate=false; Setting("reverse")=true; Step=false; animate(); break; case ' ': Step=true; animate(); break; case 17: // Ctrl-q case 'q': if(!Format.empty()) Export(); quit(); break; } } enum Menu {HOME,FITSCREEN,XSPIN,YSPIN,ZSPIN,STOP,MODE,EXPORT,CAMERA, PLAY,STEP,REVERSE,QUIT}; void menu(int choice) { if(Menu) disableMenu(); ignorezoom=true; Motion=true; switch (choice) { case HOME: // Home home(); update(); break; case FITSCREEN: togglefitscreen(); break; case XSPIN: spinx(); break; case YSPIN: spiny(); break; case ZSPIN: spinz(); break; case STOP: idle(); break; case MODE: mode(); break; case EXPORT: queueExport=true; break; case CAMERA: showCamera(); break; case PLAY: if(getSetting("reverse")) Animate=false; Setting("reverse")=Step=false; animate(); break; case REVERSE: if(!getSetting("reverse")) Animate=false; Setting("reverse")=true; Step=false; animate(); break; case STEP: Step=true; animate(); break; case QUIT: quit(); break; } } void setosize() { oldWidth=(int) ceil(oWidth); oldHeight=(int) ceil(oHeight); } #endif // end of GUI-related functions void exportHandler(int=0) { #ifdef HAVE_LIBGLUT bool offscreen=getSetting("offscreen"); if(!Iconify && !offscreen) glutShowWindow(); #endif readyAfterExport=true; Export(); #ifdef HAVE_LIBGLUT if(!Iconify && !offscreen) glutHideWindow(); #endif glutDisplayFunc(nodisplay); } static bool glinitialize=true; projection camera(bool user) { if(glinitialize) return projection(); camp::Triple vCamera,vUp,vTarget; double cz=0.5*(zmin+zmax); if(user) { for(int i=0; i < 3; ++i) { double sumCamera=0.0, sumTarget=0.0, sumUp=0.0; int i4=4*i; for(int j=0; j < 4; ++j) { int j4=4*j; double R0=Rotate[j4]; double R1=Rotate[j4+1]; double R2=Rotate[j4+2]; double R3=Rotate[j4+3]; double T4ij=T[i4+j]; sumCamera += T4ij*(R3-cx*R0-cy*R1-cz*R2); sumUp += T4ij*R1; sumTarget += T4ij*(R3-cx*R0-cy*R1); } vCamera[i]=sumCamera; vUp[i]=sumUp; vTarget[i]=sumTarget; } } else { for(int i=0; i < 3; ++i) { int i4=4*i; double R0=Rotate[i4]; double R1=Rotate[i4+1]; double R2=Rotate[i4+2]; double R3=Rotate[i4+3]; vCamera[i]=R3-cx*R0-cy*R1-cz*R2; vUp[i]=R1; vTarget[i]=R3-cx*R0-cy*R1; } } return projection(orthographic,vCamera,vUp,vTarget,Zoom, 2.0*atan(tan(0.5*Angle)/Zoom)/radians, pair(X/Width*lastzoom+Shift.getx(), Y/Height*lastzoom+Shift.gety())); } void init() { #ifdef HAVE_LIBGLUT mem::vector cmd; cmd.push_back(settings::argv0); if(!interact::interactive && Iconify) cmd.push_back("-iconic"); push_split(cmd,getSetting("glOptions")); char **argv=args(cmd,true); int argc=cmd.size(); glutInit(&argc,argv); screenWidth=glutGet(GLUT_SCREEN_WIDTH); screenHeight=glutGet(GLUT_SCREEN_HEIGHT); #endif } void init_osmesa() { #ifdef HAVE_LIBOSMESA // create context and buffer if(settings::verbose > 1) cout << "Allocating osmesa_buffer of size " << screenWidth << "x" << screenHeight << "x4x" << sizeof(GLubyte) << endl; osmesa_buffer=new unsigned char[screenWidth*screenHeight*4*sizeof(GLubyte)]; if(!osmesa_buffer) { cerr << "Cannot allocate image buffer." << endl; exit(-1); } ctx = OSMesaCreateContextExt(OSMESA_RGBA,16,0,0,NULL); if(!ctx) { cerr << "OSMesaCreateContext failed." << endl; exit(-1); } if(!OSMesaMakeCurrent(ctx,osmesa_buffer,GL_UNSIGNED_BYTE, screenWidth,screenHeight )) { cerr << "OSMesaMakeCurrent failed." << endl; exit(-1); } int z=0, s=0, a=0; glGetIntegerv(GL_DEPTH_BITS,&z); glGetIntegerv(GL_STENCIL_BITS,&s); glGetIntegerv(GL_ACCUM_RED_BITS,&a); if(settings::verbose > 1) cout << "Offscreen context settings: Depth=" << z << " Stencil=" << s << " Accum=" << a << endl; if(z <= 0) { cerr << "Error initializing offscreen context: Depth=" << z << endl; exit(-1); } #endif // HAVE_LIBOSMESA } // angle=0 means orthographic. void glrender(const string& prefix, const picture *pic, const string& format, double width, double height, double angle, double zoom, const triple& m, const triple& M, const pair& shift, double *t, double *background, size_t nlights, triple *lights, double *diffuse, double *ambient, double *specular, bool Viewportlighting, bool view, int oldpid) { bool offscreen=getSetting("offscreen"); Iconify=getSetting("iconify"); #ifdef HAVE_PTHREAD static bool initializedView=false; #endif width=max(width,1.0); height=max(height,1.0); if(zoom == 0.0) zoom=1.0; Prefix=prefix; Picture=pic; Format=format; for(int i=0; i < 16; ++i) T[i]=t[i]; for(int i=0; i < 4; ++i) Background[i]=background[i]; Nlights=min(nlights,(size_t) GL_MAX_LIGHTS); Lights=lights; Diffuse=diffuse; Ambient=ambient; Specular=specular; ViewportLighting=Viewportlighting; View=view; Angle=angle*radians; Zoom0=zoom; Oldpid=oldpid; Shift=shift; Xmin=m.getx(); Xmax=M.getx(); Ymin=m.gety(); Ymax=M.gety(); zmin=m.getz(); zmax=M.getz(); orthographic=Angle == 0.0; H=orthographic ? 0.0 : -tan(0.5*Angle)*zmax; Menu=false; Motion=true; ignorezoom=false; Mode=0; Xfactor=Yfactor=1.0; pair maxtile=getSetting("maxtile"); maxTileWidth=(int) maxtile.getx(); maxTileHeight=(int) maxtile.gety(); if(maxTileWidth <= 0) maxTileWidth=1024; if(maxTileHeight <= 0) maxTileHeight=768; if(offscreen) { screenWidth=maxTileWidth; screenHeight=maxTileHeight; static bool osmesa_initialized=false; if(!osmesa_initialized) { osmesa_initialized=true; init_osmesa(); } } else { if(glinitialize) { glinitialize=false; init(); Fitscreen=1; } } static bool initialized=false; if(!initialized || !interact::interactive) { antialias=getSetting("antialias") > 1; double expand=getSetting("render"); if(expand < 0) expand *= (Format.empty() || Format == "eps" || Format == "pdf") ? -2.0 : -1.0; if(antialias) expand *= 2.0; // Force a hard viewport limit to work around direct rendering bugs. // Alternatively, one can use -glOptions=-indirect (with a performance // penalty). pair maxViewport=getSetting("maxviewport"); maxWidth=(int) ceil(maxViewport.getx()); maxHeight=(int) ceil(maxViewport.gety()); if(maxWidth <= 0) maxWidth=max(maxHeight,2); if(maxHeight <= 0) maxHeight=max(maxWidth,2); if(screenWidth <= 0) screenWidth=maxWidth; else screenWidth=min(screenWidth,maxWidth); if(screenHeight <= 0) screenHeight=maxHeight; else screenHeight=min(screenHeight,maxHeight); oWidth=width; oHeight=height; Aspect=width/height; fullWidth=(int) ceil(expand*width); fullHeight=(int) ceil(expand*height); Width=min(fullWidth,screenWidth); Height=min(fullHeight,screenHeight); if(Width > Height*Aspect) Width=min((int) (ceil(Height*Aspect)),screenWidth); else Height=min((int) (ceil(Width/Aspect)),screenHeight); Aspect=((double) Width)/Height; if(maxTileWidth <= 0) maxTileWidth=screenWidth; if(maxTileHeight <= 0) maxTileHeight=screenHeight; #ifdef HAVE_LIBGLUT setosize(); #endif if(View && settings::verbose > 1) cout << "Rendering " << stripDir(prefix) << " as " << Width << "x" << Height << " image" << endl; } bool havewindow=initialized && glthread && !offscreen; #ifdef HAVE_LIBGLUT unsigned int displaymode=GLUT_DOUBLE | GLUT_RGBA | GLUT_DEPTH; int buttons[]={GLUT_LEFT_BUTTON,GLUT_MIDDLE_BUTTON,GLUT_RIGHT_BUTTON}; string buttonnames[]={"left","middle","right"}; size_t nbuttons=sizeof(buttons)/sizeof(int); #endif #ifdef HAVE_PTHREAD if(glthread && initializedView && !offscreen) { if(!View) readyAfterExport=queueExport=true; pthread_kill(mainthread,SIGUSR1); return; } #endif #ifdef HAVE_LIBGLUT if(!offscreen) { if(View) { int x,y; if(havewindow) glutDestroyWindow(window); windowposition(x,y); glutInitWindowPosition(x,y); glutInitWindowSize(1,1); Int multisample=getSetting("multisample"); if(multisample <= 1) multisample=0; if(multisample) displaymode |= GLUT_MULTISAMPLE; glutInitDisplayMode(displaymode); ostringstream buf; int samples; #ifdef FREEGLUT #ifdef GLUT_INIT_MAJOR_VERSION while(true) { if(multisample > 0) glutSetOption(GLUT_MULTISAMPLE,multisample); #endif #endif string title=string(settings::PROGRAM)+": "+prefix; string suffix; for(size_t i=0; i < nbuttons; ++i) { int button=buttons[i]; if(action(button,0) == "zoom/menu") { suffix="Double click "+buttonnames[i]+" button for menu"; break; } } if(suffix.empty()) { for(size_t i=0; i < nbuttons; ++i) { int button=buttons[i]; if(action(button,0) == "menu") { suffix="Click "+buttonnames[i]+" button for menu"; break; } } } title += " ["+suffix+"]"; window=glutCreateWindow(title.c_str()); GLint samplebuf[1]; glGetIntegerv(GL_SAMPLES,samplebuf); samples=samplebuf[0]; #ifdef FREEGLUT #ifdef GLUT_INIT_MAJOR_VERSION if(samples < multisample) { multisample=floorpow2(multisample-1); if(multisample > 1) { glutReshapeWindow(1,1); glutDisplayFunc(destroywindow); glutShowWindow(); glutMainLoopEvent(); continue; } } break; } #endif #endif if(settings::verbose > 1 && samples > 1) cout << "Multisampling enabled with sample width " << samples << endl; glutDisplayFunc(display); glutShowWindow(); } else if(!havewindow) { glutInitWindowSize(maxTileWidth,maxTileHeight); glutInitDisplayMode(displaymode); window=glutCreateWindow(""); glutHideWindow(); } } #endif // HAVE_LIBGLUT initialized=true; glMatrixMode(GL_MODELVIEW); home(); #ifdef HAVE_LIBGLUT if(!offscreen) { Animate=getSetting("autoplay") && glthread; if(View) { if(!getSetting("fitscreen")) Fitscreen=0; fitscreen(); setosize(); } } #endif glEnable(GL_BLEND); glEnable(GL_DEPTH_TEST); glEnable(GL_MAP1_VERTEX_3); glEnable(GL_MAP1_VERTEX_4); glEnable(GL_MAP2_VERTEX_3); glEnable(GL_MAP2_VERTEX_4); glEnable(GL_MAP2_COLOR_4); glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA); if(nurb == NULL) { nurb=gluNewNurbsRenderer(); if(nurb == NULL) outOfMemory(); gluNurbsProperty(nurb,GLU_SAMPLING_METHOD,GLU_PARAMETRIC_ERROR); gluNurbsProperty(nurb,GLU_SAMPLING_TOLERANCE,0.5); gluNurbsProperty(nurb,GLU_PARAMETRIC_TOLERANCE,1.0); gluNurbsProperty(nurb,GLU_CULLING,GLU_TRUE); // The callback tessellation algorithm avoids artifacts at degenerate // control points. gluNurbsProperty(nurb,GLU_NURBS_MODE,GLU_NURBS_TESSELLATOR); gluNurbsCallback(nurb,GLU_NURBS_BEGIN,(_GLUfuncptr) glBegin); gluNurbsCallback(nurb,GLU_NURBS_VERTEX,(_GLUfuncptr) glVertex3fv); gluNurbsCallback(nurb,GLU_NURBS_END,(_GLUfuncptr) glEnd); gluNurbsCallback(nurb,GLU_NURBS_COLOR,(_GLUfuncptr) glColor4fv); } mode(); if(View && !offscreen) { #ifdef HAVE_LIBGLUT #ifdef HAVE_PTHREAD initializedView=true; #endif glutReshapeFunc(reshape); glutKeyboardFunc(keyboard); glutMouseFunc(mouse); glutCreateMenu(menu); glutAddMenuEntry("(h) Home",HOME); glutAddMenuEntry("(f) Fitscreen",FITSCREEN); glutAddMenuEntry("(x) X spin",XSPIN); glutAddMenuEntry("(y) Y spin",YSPIN); glutAddMenuEntry("(z) Z spin",ZSPIN); glutAddMenuEntry("(s) Stop",STOP); glutAddMenuEntry("(m) Mode",MODE); glutAddMenuEntry("(e) Export",EXPORT); glutAddMenuEntry("(c) Camera",CAMERA); glutAddMenuEntry("(p) Play",PLAY); glutAddMenuEntry("(r) Reverse",REVERSE); glutAddMenuEntry("( ) Step",STEP); glutAddMenuEntry("(q) Quit" ,QUIT); glutMenuStatusFunc(menuStatus); for(size_t i=0; i < nbuttons; ++i) { int button=buttons[i]; if(action(button,0) == "menu") glutAttachMenu(button); } glutMainLoop(); #endif // HAVE_LIBGLUT } else { if(glthread && !offscreen) { if(havewindow) { readyAfterExport=true; #ifdef HAVE_PTHREAD pthread_kill(mainthread,SIGUSR1); #endif } else { initialized=true; readyAfterExport=true; Signal(SIGUSR1,exportHandler); exportHandler(); } } else { exportHandler(); quit(); } } } } // namespace gl #endif ./asymptote-2.41/getopt1.c0000644000175000017500000001065013064427076015274 0ustar norbertnorbert/* getopt_long and getopt_long_only entry points for GNU getopt. Copyright (C) 1987,88,89,90,91,92,93,94,96,97,98 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. */ #ifdef HAVE_CONFIG_H #include #endif #include "getopt.h" #if !defined __STDC__ || !__STDC__ /* This is a separate conditional since some stdc systems reject `defined (const)'. */ #ifndef const #define const #endif #endif #include /* Comment out all this code if we are using the GNU C Library, and are not actually compiling the library itself. This code is part of the GNU C Library, but also included in many other GNU distributions. Compiling and linking in this code is a waste when using the GNU C library (especially if it is a shared library). Rather than having every GNU program understand `configure --with-gnu-libc' and omit the object files, it is simpler to just do this in the source for each such file. */ #define GETOPT_INTERFACE_VERSION 2 #if !defined _LIBC && defined __GLIBC__ && __GLIBC__ >= 2 #include #if _GNU_GETOPT_INTERFACE_VERSION == GETOPT_INTERFACE_VERSION #define ELIDE_CODE #endif #endif #ifndef ELIDE_CODE /* This needs to come after some library #include to get __GNU_LIBRARY__ defined. */ #ifdef __GNU_LIBRARY__ #include #endif #ifndef NULL #define NULL 0 #endif int getopt_long (argc, argv, options, long_options, opt_index) int argc; char *const *argv; const char *options; const struct option *long_options; int *opt_index; { return _getopt_internal (argc, argv, options, long_options, opt_index, 0); } /* Like getopt_long, but '-' as well as '--' can indicate a long option. If an option that starts with '-' (not '--') doesn't match a long option, but does match a short option, it is parsed as a short option instead. */ int getopt_long_only (argc, argv, options, long_options, opt_index) int argc; char *const *argv; const char *options; const struct option *long_options; int *opt_index; { return _getopt_internal (argc, argv, options, long_options, opt_index, 1); } #endif /* Not ELIDE_CODE. */ #ifdef TEST #include int main (argc, argv) int argc; char **argv; { int c; int digit_optind = 0; while (1) { int this_option_optind = optind ? optind : 1; int option_index = 0; static struct option long_options[] = { {"add", 1, 0, 0}, {"append", 0, 0, 0}, {"delete", 1, 0, 0}, {"verbose", 0, 0, 0}, {"create", 0, 0, 0}, {"file", 1, 0, 0}, {0, 0, 0, 0} }; c = getopt_long (argc, argv, "abc:d:0123456789", long_options, &option_index); if (c == -1) break; switch (c) { case 0: printf ("option %s", long_options[option_index].name); if (optarg) printf (" with arg %s", optarg); printf ("\n"); break; case '0': case '1': case '2': case '3': case '4': case '5': case '6': case '7': case '8': case '9': if (digit_optind != 0 && digit_optind != this_option_optind) printf ("digits occur in two different argv-elements.\n"); digit_optind = this_option_optind; printf ("option %c\n", c); break; case 'a': printf ("option a\n"); break; case 'b': printf ("option b\n"); break; case 'c': printf ("option c with value `%s'\n", optarg); break; case 'd': printf ("option d with value `%s'\n", optarg); break; case '?': break; default: printf ("?? getopt returned character code 0%o ??\n", c); } } if (optind < argc) { printf ("non-option ARGV-elements: "); while (optind < argc) printf ("%s ", argv[optind++]); printf ("\n"); } exit (0); } #endif /* TEST */ ./asymptote-2.41/name.cc0000644000175000017500000001642513064427076015002 0ustar norbertnorbert/***** * name.cc * Andy Hammerlindl2002/07/14 * * Qualified names (such as x, f, builtin.sin, a.b.c.d, etc.) can be used * either as variables or a type names. This class stores qualified * names used in nameExp and nameTy in the abstract syntax, and * implements the exp and type functions. *****/ #include "name.h" #include "frame.h" #include "record.h" #include "coenv.h" #include "inst.h" namespace absyntax { using namespace types; using trans::access; using trans::qualifiedAccess; using trans::action; using trans::READ; using trans::WRITE; using trans::CALL; using vm::inst; types::ty *signatureless(types::ty *t) { if (overloaded *o=dynamic_cast(t)) return o->signatureless(); else return (t && !t->getSignature()) ? t : 0; } void name::forceEquivalency(action act, coenv &e, types::ty *target, types::ty *source) { if (act == READ) e.implicitCast(getPos(), target, source); else if (!equivalent(target, source)) { em.compiler(getPos()); em << "type mismatch in variable: " << *target << " vs " << *source; } } frame *name::frameTrans(coenv &e) { if (types::ty *t=signatureless(varGetType(e))) { if (t->kind == types::ty_record) { varTrans(READ, e, t); return ((record *)t)->getLevel(); } else return 0; } else return tyFrameTrans(e); } types::ty *name::getType(coenv &e, bool tacit) { types::ty *t=signatureless(varGetType(e)); if (!tacit && t && t->kind == ty_error) // Report errors associated with regarding the name as a variable. varTrans(trans::READ, e, t); return t ? t : typeTrans(e, tacit); } varEntry *simpleName::getVarEntry(coenv &e) { types::ty *t=signatureless(varGetType(e)); return t ? e.e.lookupVarByType(id, t) : 0; } void simpleName::varTrans(action act, coenv &e, types::ty *target) { varEntry *v = e.e.lookupVarByType(id, target); if (v) { v->encode(act, getPos(), e.c); forceEquivalency(act, e, target, v->getType()); } else { em.error(getPos()); em << "no matching variable of name \'" << id << "\'"; } } types::ty *simpleName::varGetType(coenv &e) { return e.e.varGetType(id); } trans::varEntry *simpleName::getCallee(coenv &e, signature *sig) { varEntry *ve = e.e.lookupVarBySignature(id, sig); return ve; } types::ty *simpleName::typeTrans(coenv &e, bool tacit) { types::ty *t = e.e.lookupType(id); if (t) { return t; } else { if (!tacit) { em.error(getPos()); em << "no type of name \'" << id << "\'"; } return primError(); } } tyEntry *simpleName::tyEntryTrans(coenv &e) { tyEntry *ent = e.e.lookupTyEntry(id); if (!ent) { em.error(getPos()); em << "no type of name \'" << id << "\'"; return new tyEntry(primError(), 0, 0, position()); } return ent; } frame *simpleName::tyFrameTrans(coenv &e) { tyEntry *ent = e.e.lookupTyEntry(id); if (ent && ent->t->kind==types::ty_record && ent->v) { ent->v->encode(READ, getPos(), e.c); return ent->v->getLevel(); } else return 0; } void simpleName::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "simpleName '" << id << "'\n"; } record *qualifiedName::castToRecord(types::ty *t, bool tacit) { switch (t->kind) { case ty_overloaded: if (!tacit) { em.compiler(qualifier->getPos()); em << "name::getType returned overloaded"; } return 0; case ty_record: return (record *)t; case ty_error: return 0; default: if (!tacit) { em.error(qualifier->getPos()); em << "type \'" << *t << "\' is not a structure"; } return 0; } } bool qualifiedName::varTransVirtual(action act, coenv &e, types::ty *target, types::ty *qt) { varEntry *v = qt->virtualField(id, target->getSignature()); if (v) { // Push qualifier onto stack. qualifier->varTrans(READ, e, qt); v->encode(act, getPos(), e.c); // A virtual field was used. return true; } // No virtual field. return false; } void qualifiedName::varTransField(action act, coenv &e, types::ty *target, record *r) { varEntry *v = r->e.lookupVarByType(id, target); if (v) { frame *f = qualifier->frameTrans(e); if (f) v->encode(act, getPos(), e.c, f); else v->encode(act, getPos(), e.c); forceEquivalency(act, e, target, v->getType()); } else { em.error(getPos()); em << "no matching field of name \'" << id << "\' in \'" << *r << "\'"; } } void qualifiedName::varTrans(action act, coenv &e, types::ty *target) { types::ty *qt = qualifier->getType(e); // Use virtual fields if applicable. if (varTransVirtual(act, e, target, qt)) return; record *r = castToRecord(qt); if (r) varTransField(act, e, target, r); } types::ty *qualifiedName::varGetType(coenv &e) { types::ty *qt = qualifier->getType(e, true); // Look for virtual fields. types::ty *t = qt->virtualFieldGetType(id); if (t) return t; record *r = castToRecord(qt, true); return r ? r->e.varGetType(id) : 0; } trans::varEntry *qualifiedName::getCallee(coenv &e, signature *sig) { // getTypeAsCallee is an optimization attempt. We don't try optimizing the // rarer qualifiedName call case. // TODO: See if this is worth implementing. //cout << "FAIL BY QUALIFIED NAME" << endl; return 0; } trans::varEntry *qualifiedName::getVarEntry(coenv &e) { varEntry *qv = qualifier->getVarEntry(e); types::ty *qt = qualifier->getType(e, true); record *r = castToRecord(qt, true); if (r) { types::ty *t = signatureless(r->e.varGetType(id)); varEntry *v = t ? r->e.lookupVarByType(id, t) : 0; return trans::qualifyVarEntry(qv,v); } else return qv; } types::ty *qualifiedName::typeTrans(coenv &e, bool tacit) { types::ty *rt = qualifier->getType(e, tacit); record *r = castToRecord(rt, tacit); if (!r) return primError(); tyEntry *ent = r->e.lookupTyEntry(id); if (ent) { if (!tacit) ent->reportPerm(READ, getPos(), e.c); return ent->t; } else { if (!tacit) { em.error(getPos()); em << "no matching field or type of name \'" << id << "\' in \'" << *r << "\'"; } return primError(); } } tyEntry *qualifiedName::tyEntryTrans(coenv &e) { types::ty *rt = qualifier->getType(e, false); record *r = castToRecord(rt, false); if (!r) return new tyEntry(primError(), 0, 0, position()); tyEntry *ent = r->e.lookupTyEntry(id); if (!ent) { em.error(getPos()); em << "no matching type of name \'" << id << "\' in \'" << *r << "\'"; return new tyEntry(primError(), 0, 0, position()); } ent->reportPerm(READ, getPos(), e.c); return trans::qualifyTyEntry(qualifier->getVarEntry(e), ent); } frame *qualifiedName::tyFrameTrans(coenv &e) { frame *f=qualifier->frameTrans(e); tyEntry *ent = e.e.lookupTyEntry(id); if (ent && ent->t->kind==types::ty_record && ent->v) { if (f) ent->v->encode(READ, getPos(), e.c, f); else ent->v->encode(READ, getPos(), e.c); return ent->v->getLevel(); } else return f; } void qualifiedName::prettyprint(ostream &out, Int indent) { prettyindent(out, indent); out << "qualifiedName '" << id << "'\n"; qualifier->prettyprint(out, indent+1); } } // namespace absyntax ./asymptote-2.41/findsym.pl0000755000175000017500000000233513064427076015557 0ustar norbertnorbert#!/usr/bin/env perl ##### # findsym.pl # Andy Hammerlindl 2010/06/01 # # Extract static symbols used in builtin.cc and write code so that they are # translated only once when creating the symbol table. ##### $outname = shift(@ARGV); if (not $outname) { print STDERR "usage ./findsym.pl out_symbols.h file1.cc file2.cc ...\n"; exit(1); } open(header, ">$outname") || die("Couldn't open $outname for writing"); print header <) { while (m/SYM\(([_A-Za-z][_A-Za-z0-9]*)\)/gx) { $symbols{ $1 } = 1; } } } foreach my $s (sort keys %symbols) { add($s); } ./asymptote-2.41/runlabel.h0000644000175000017500000000023113064427126015510 0ustar norbertnorbert/***** Autogenerated from runlabel.in; changes will be overwritten *****/ #ifndef runlabel_H #define runlabel_H namespace run { } #endif // runlabel_H ./asymptote-2.41/varinit.h0000644000175000017500000000373513064427076015400 0ustar norbertnorbert/***** * varinit.h * Andy Hammerlindl 2005/07/01 * * Variable initializers are syntax that finish code such as * Int var = ... * As such, they are translated to yield a certain type, the type of the * variable. Expressions are a special case that can be translated without an * associated variable or its type. *****/ #ifndef VARINIT_H #define VARINIT_H #include "types.h" #include "symbol.h" #include "absyn.h" namespace absyntax { using trans::coenv; using trans::access; using sym::symbol; using types::array; class varinit : public absyn { public: varinit(position pos) : absyn(pos) {} // This determines what instruction are needed to put the associated // value onto the stack, then adds those instructions to the current // lambda in e. // In some expressions and initializers, the target type needs to be // known in order to translate properly. For most expressions, this is // kept to a minimum. // For expression, this also allows an implicit cast, hence the name. virtual void transToType(coenv &e, types::ty *target) = 0; }; // A default initializer. For example: // int a; // is in some sense equivalent to // int a=0; // where the definit for Int is a function that returns 0. class definit : public varinit { public: definit(position pos) : varinit(pos) {} void prettyprint(ostream &out, Int indent); void transToType(coenv &e, types::ty *target); }; class arrayinit : public varinit { mem::list inits; varinit *rest; public: arrayinit(position pos) : varinit(pos), rest(0) {} virtual ~arrayinit() {} void prettyprint(ostream &out, Int indent); // Encodes the instructions to make an array from size elements on the stack. static void transMaker(coenv &e, Int size, bool rest); void transToType(coenv &e, types::ty *target); void add(varinit *init) { inits.push_back(init); } void addRest(varinit *init) { rest=init; } friend class joinExp; }; } // namespace absyntax #endif ./asymptote-2.41/parser.cc0000644000175000017500000000556013064427076015354 0ustar norbertnorbert/***** * parser.cc * Tom Prince 2004/01/10 * *****/ #include #include #include "common.h" #ifdef HAVE_SYS_STAT_H #include #endif #include "interact.h" #include "locate.h" #include "errormsg.h" #include "parser.h" // The lexical analysis and parsing functions used by parseFile. void setlexer(size_t (*input) (char* bif, size_t max_size), string filename); extern bool yyparse(void); extern int yydebug; extern int yy_flex_debug; static const int YY_NULL = 0; extern bool lexerEOF(); extern void reportEOF(); namespace parser { namespace yy { // Lexers std::streambuf *sbuf = NULL; size_t stream_input(char *buf, size_t max_size) { size_t count= sbuf ? sbuf->sgetn(buf,max_size) : 0; return count ? count : YY_NULL; } } // namespace yy void debug(bool state) { // For debugging the machine-generated lexer and parser. yy_flex_debug = yydebug = state; } namespace { void error(const string& filename) { em.sync(); em << "error: could not load module '" << filename << "'\n"; em.sync(); throw handled_error(); } } absyntax::file *doParse(size_t (*input) (char* bif, size_t max_size), const string& filename, bool extendable=false) { setlexer(input,filename); absyntax::file *root = yyparse() == 0 ? absyntax::root : 0; absyntax::root = 0; yy::sbuf = 0; if (!root) { if (lexerEOF()) { if (extendable) { return 0; } else { // Have the lexer report the error. reportEOF(); } } em.error(nullPos); if(!interact::interactive) error(filename); else throw handled_error(); } return root; } absyntax::file *parseStdin() { debug(false); yy::sbuf = cin.rdbuf(); return doParse(yy::stream_input,"-"); } absyntax::file *parseFile(const string& filename, const char *nameOfAction) { if(filename == "-") return parseStdin(); string file = settings::locateFile(filename); if(file.empty()) error(filename); if(nameOfAction && settings::verbose > 1) cerr << nameOfAction << " " << filename << " from " << file << endl; debug(false); std::filebuf filebuf; if(!filebuf.open(file.c_str(),std::ios::in)) error(filename); #ifdef HAVE_SYS_STAT_H // Check that the file is not a directory. static struct stat buf; if(stat(file.c_str(),&buf) == 0) { if(S_ISDIR(buf.st_mode)) error(filename); } #endif // Check that the file can actually be read. try { filebuf.sgetc(); } catch (...) { error(filename); } yy::sbuf = &filebuf; return doParse(yy::stream_input,file); } absyntax::file *parseString(const string& code, const string& filename, bool extendable) { debug(false); stringbuf buf(code); yy::sbuf = &buf; return doParse(yy::stream_input,filename,extendable); } } // namespace parser ./asymptote-2.41/drawgrestore.h0000644000175000017500000000076013064427076016427 0ustar norbertnorbert/***** * drawgrestore.h * John Bowman * * Output PostScript grestore to picture. *****/ #ifndef DRAWGRESTORE_H #define DRAWGRESTORE_H #include "drawelement.h" namespace camp { class drawGrestore : public drawElement { public: drawGrestore() {} virtual ~drawGrestore() {} bool draw(psfile *out) { out->grestore(); return true; } bool write(texfile *out, const bbox&) { out->grestore(); return true; } }; } GC_DECLARE_PTRFREE(camp::drawGrestore); #endif ./asymptote-2.41/fftw++.h0000644000175000017500000013251613064427076015020 0ustar norbertnorbert/* Fast Fourier transform C++ header class for the FFTW3 Library Copyright (C) 2004-16 John C. Bowman, University of Alberta Malcolm Roberts, University of Strasbourg This program is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #ifndef __fftwpp_h__ #define __fftwpp_h__ 1 #define __FFTWPP_H_VERSION__ 2.02 #include #include #include #include #include #include #ifndef _OPENMP #ifndef FFTWPP_SINGLE_THREAD #define FFTWPP_SINGLE_THREAD #endif #endif #ifndef FFTWPP_SINGLE_THREAD #include #endif inline int get_thread_num() { #ifdef FFTWPP_SINGLE_THREAD return 0; #else return omp_get_thread_num(); #endif } inline int get_max_threads() { #ifdef FFTWPP_SINGLE_THREAD return 1; #else return omp_get_max_threads(); #endif } #ifndef FFTWPP_SINGLE_THREAD #define PARALLEL(code) \ if(threads > 1) { \ _Pragma("omp parallel for num_threads(threads)") \ code \ } else { \ code \ } #else #define PARALLEL(code) \ { \ code \ } #endif #ifndef __Complex_h__ #include typedef std::complex Complex; #endif #include "seconds.h" #include "statistics.h" #include "align.h" namespace fftwpp { // Obsolete names: #define FFTWComplex ComplexAlign #define FFTWdouble doubleAlign #define FFTWdelete deleteAlign class fftw; extern "C" fftw_plan Planner(fftw *F, Complex *in, Complex *out); void LoadWisdom(); void SaveWisdom(); extern const char *inout; struct threaddata { unsigned int threads; double mean; double stdev; threaddata() : threads(0), mean(0.0), stdev(0.0) {} threaddata(unsigned int threads, double mean, double stdev) : threads(threads), mean(mean), stdev(stdev) {} }; class fftw; class ThreadBase { protected: unsigned int threads; unsigned int innerthreads; public: ThreadBase(); ThreadBase(unsigned int threads) : threads(threads) {} void Threads(unsigned int nthreads) {threads=nthreads;} unsigned int Threads() {return threads;} void multithread(unsigned int nx) { if(nx >= threads) { innerthreads=1; } else { innerthreads=threads; threads=1; } } }; // Base clase for fft routines // class fftw : public ThreadBase { protected: unsigned int doubles; // number of double precision values in dataset int sign; unsigned int threads; double norm; fftw_plan plan; bool inplace; unsigned int Dist(unsigned int n, size_t stride, size_t dist) { return dist ? dist : ((stride == 1) ? n : 1); } unsigned int realsize(unsigned int n, Complex *in, Complex *out=NULL) { return (!out || in == out) ? 2*(n/2+1) : n; } unsigned int realsize(unsigned int n, Complex *in, double *out) { return realsize(n,in,(Complex *) out); } unsigned int realsize(unsigned int n, double *in, Complex *out) { return realsize(n,(Complex *) in,out); } static const double twopi; public: static unsigned int effort; static unsigned int maxthreads; static double testseconds; static const char *WisdomName; static fftw_plan (*planner)(fftw *f, Complex *in, Complex *out); virtual unsigned int Threads() {return threads;} static const char *oddshift; // Inplace shift of Fourier origin to (nx/2,0) for even nx. static void Shift(Complex *data, unsigned int nx, unsigned int ny, unsigned int threads) { unsigned int nyp=ny/2+1; unsigned int stop=nx*nyp; if(nx % 2 == 0) { unsigned int inc=2*nyp; #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=nyp; i < stop; i += inc) { Complex *p=data+i; for(unsigned int j=0; j < nyp; j++) p[j]=-p[j]; } } else { std::cerr << oddshift << std::endl; exit(1); } } // Out-of-place shift of Fourier origin to (nx/2,0) for even nx. static void Shift(double *data, unsigned int nx, unsigned int ny, unsigned int threads) { if(nx % 2 == 0) { unsigned int stop=nx*ny; unsigned int inc=2*ny; #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=ny; i < stop; i += inc) { double *p=data+i; for(unsigned int j=0; j < ny; j++) p[j]=-p[j]; } } else { std::cerr << oddshift << std::endl; exit(1); } } // Inplace shift of Fourier origin to (nx/2,ny/2,0) for even nx and ny. static void Shift(Complex *data, unsigned int nx, unsigned int ny, unsigned int nz, unsigned int threads) { unsigned int nzp=nz/2+1; unsigned int nyzp=ny*nzp; if(nx % 2 == 0 && ny % 2 == 0) { unsigned int pinc=2*nzp; Complex *pstop=data; Complex *p=data; #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned i=0; i < nx; i++) { if(i % 2) p -= nzp; else p += nzp; pstop += nyzp; for(; p < pstop; p += pinc) { for(unsigned int k=0; k < nzp; k++) p[k]=-p[k]; } } } else { std::cerr << oddshift << " or odd ny" << std::endl; exit(1); } } // Out-of-place shift of Fourier origin to (nx/2,ny/2,0) for even nx and ny. static void Shift(double *data, unsigned int nx, unsigned int ny, unsigned int nz, unsigned int threads) { unsigned int nyz=ny*nz; if(nx % 2 == 0 && ny % 2 == 0) { unsigned int pinc=2*nz; double *pstop=data; double *p=data; #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned i=0; i < nx; i++) { if(i % 2) p -= nz; else p += nz; pstop += nyz; for(; p < pstop; p += pinc) { for(unsigned int k=0; k < nz; k++) p[k]=-p[k]; } } } else { std::cerr << oddshift << " or odd ny" << std::endl; exit(1); } } fftw() : plan(NULL) {} fftw(unsigned int doubles, int sign, unsigned int threads, unsigned int n=0) : doubles(doubles), sign(sign), threads(threads), norm(1.0/(n ? n : doubles/2)), plan(NULL) { #ifndef FFTWPP_SINGLE_THREAD fftw_init_threads(); #endif } virtual ~fftw() { if(plan) fftw_destroy_plan(plan); } virtual fftw_plan Plan(Complex *in, Complex *out) {return NULL;}; inline void CheckAlign(Complex *p, const char *s) { if((size_t) p % sizeof(Complex) == 0) return; std::cerr << "WARNING: " << s << " array is not " << sizeof(Complex) << "-byte aligned: address " << p << std::endl; } void noplan() { std::cerr << "Unable to construct FFTW plan" << std::endl; exit(1); } static void planThreads(unsigned int threads) { #ifndef FFTWPP_SINGLE_THREAD omp_set_num_threads(threads); fftw_plan_with_nthreads(threads); #endif } threaddata time(fftw_plan plan1, fftw_plan planT, Complex *in, Complex *out, unsigned int Threads) { utils::statistics S,ST; double stop=utils::totalseconds()+testseconds; threads=1; plan=plan1; fft(in,out); threads=Threads; plan=planT; fft(in,out); unsigned int N=1; for(;;) { double t0=utils::totalseconds(); threads=1; plan=plan1; for(unsigned int i=0; i < N; ++i) fft(in,out); double t1=utils::totalseconds(); threads=Threads; plan=planT; for(unsigned int i=0; i < N; ++i) fft(in,out); double t=utils::totalseconds(); S.add(t1-t0); ST.add(t-t1); if(S.mean() < 100.0/CLOCKS_PER_SEC) N *= 2; if(S.count() >= 10) { double error=S.stdev(); double diff=ST.mean()-S.mean(); if(diff >= 0.0 || t > stop) { threads=1; plan=plan1; fftw_destroy_plan(planT); break; } if(diff < -error) { threads=Threads; fftw_destroy_plan(plan1); break; } } } return threaddata(threads,S.mean(),S.stdev()); } virtual threaddata lookup(bool inplace, unsigned int threads) { return threaddata(); } virtual void store(bool inplace, const threaddata& data) {} inline Complex *CheckAlign(Complex *in, Complex *out, bool constructor=true) { #ifndef NO_CHECK_ALIGN CheckAlign(in,constructor ? "constructor input" : "input"); if(out) CheckAlign(out,constructor ? "constructor output" : "output"); else out=in; #else if(!out) out=in; #endif return out; } threaddata Setup(Complex *in, Complex *out=NULL) { bool alloc=!in; if(alloc) in=utils::ComplexAlign((doubles+1)/2); out=CheckAlign(in,out); inplace=(out==in); threaddata data; unsigned int Threads=threads; if(threads > 1) data=lookup(inplace,threads); threads=data.threads > 0 ? data.threads : 1; planThreads(threads); plan=(*planner)(this,in,out); if(!plan) noplan(); fftw_plan planT; if(Threads > 1) { threads=Threads; planThreads(threads); planT=(*planner)(this,in,out); if(data.threads == 0) { if(planT) data=time(plan,planT,in,out,threads); else noplan(); store(inplace,threaddata(threads,data.mean,data.stdev)); } } if(alloc) Array::deleteAlign(in,(doubles+1)/2); return data; } threaddata Setup(Complex *in, double *out) { return Setup(in,(Complex *) out); } threaddata Setup(double *in, Complex *out=NULL) { return Setup((Complex *) in,out); } virtual void Execute(Complex *in, Complex *out, bool=false) { fftw_execute_dft(plan,(fftw_complex *) in,(fftw_complex *) out); } Complex *Setout(Complex *in, Complex *out) { out=CheckAlign(in,out,false); if(inplace ^ (out == in)) { std::cerr << "ERROR: fft " << inout << std::endl; exit(1); } return out; } void fft(Complex *in, Complex *out=NULL) { out=Setout(in,out); Execute(in,out); } void fft(double *in, Complex *out=NULL) { fft((Complex *) in,out); } void fft(Complex *in, double *out) { fft(in,(Complex *) out); } void fft0(Complex *in, Complex *out=NULL) { out=Setout(in,out); Execute(in,out,true); } void fft0(double *in, Complex *out=NULL) { fft0((Complex *) in,out); } void fft0(Complex *in, double *out) { fft0(in,(Complex *) out); } void Normalize(Complex *out) { unsigned int stop=doubles/2; #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=0; i < stop; i++) out[i] *= norm; } void Normalize(double *out) { #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=0; i < doubles; i++) out[i] *= norm; } virtual void fftNormalized(Complex *in, Complex *out=NULL, bool shift=false) { out=Setout(in,out); Execute(in,out,shift); Normalize(out); } void fftNormalized(Complex *in, double *out, bool shift=false) { out=(double *) Setout(in,(Complex *) out); Execute(in,(Complex *) out,shift); Normalize(out); } void fftNormalized(double *in, Complex *out, bool shift=false) { fftNormalized((Complex *) in,out,shift); } template void fft0Normalized(I in, O out) { fftNormalized(in,out,true); } template void fftNormalized(unsigned int nx, unsigned int M, size_t ostride, size_t odist, I *in, O *out=NULL, bool shift=false) { out=(O *) Setout((Complex *) in,(Complex *) out); Execute((Complex *) in,(Complex *) out,shift); unsigned int stop=nx*ostride; O *outMdist=out+M*odist; #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=0; i < stop; i += ostride) { O *pstop=outMdist+i; for(O *p=out+i; p < pstop; p += odist) { *p *= norm; } } } }; // class fftw class Transpose { fftw_plan plan; fftw_plan plan2; unsigned int a,b; unsigned int nlength,mlength; unsigned int ilast,jlast; unsigned int rows,cols; unsigned int threads; bool inplace; unsigned int size; public: template Transpose(unsigned int rows, unsigned int cols, unsigned int length, T *in, T *out=NULL, unsigned int threads=fftw::maxthreads) : rows(rows), cols(cols), threads(threads) { size=sizeof(T); if(size % sizeof(double) != 0) { std::cerr << "ERROR: Transpose is not implemented for type of size " << size; exit(1); } if(rows == 0 || cols == 0) return; size /= sizeof(double); length *= size; if(!out) out=in; inplace=(out==in); if(inplace) threads=1; // TODO: Generalize to inplace fftw_iodim dims[3]; a=std::min(rows,threads); b=std::min(cols,threads/a); unsigned int n=utils::ceilquotient(rows,a); unsigned int m=utils::ceilquotient(cols,b); // If rows <= threads then a=rows and n=1. // If rows >= threads then b=1 and m=cols. nlength=n*length; mlength=m*length; dims[0].n=n; dims[0].is=cols*length; dims[0].os=length; dims[1].n=m; dims[1].is=length; dims[1].os=rows*length; dims[2].n=length; dims[2].is=1; dims[2].os=1; fftw::planThreads(1); // A plan with rank=0 is a transpose. plan=fftw_plan_guru_r2r(0,NULL,3,dims,(double *) in,(double *) out, NULL,fftw::effort); plan2=NULL; ilast=a; jlast=b; if(n*a > rows) { // Only happens when rows > threads. a=utils::ceilquotient(rows,n); ilast=a-1; dims[0].n=rows-n*ilast; plan2=fftw_plan_guru_r2r(0,NULL,3,dims,(double *) in,(double *) out, NULL,fftw::effort); } else { // Only happens when rows < threads. if(m*b > cols) { b=utils::ceilquotient(cols,m); jlast=b-1; dims[1].n=cols-m*jlast; plan2=fftw_plan_guru_r2r(0,NULL,3,dims,(double *) in,(double *) out, NULL,fftw::effort); } } } ~Transpose() { if(plan) fftw_destroy_plan(plan); if(plan2) fftw_destroy_plan(plan2); } template void transpose(T *in, T *out=NULL) { if(!out) out=in; if(inplace ^ (out == in)) { std::cerr << "ERROR: Transpose " << inout << std::endl; exit(1); } #ifndef FFTWPP_SINGLE_THREAD if(a > 1) { if(b > 1) { int A=a, B=b; #pragma omp parallel for num_threads(A) for(unsigned int i=0; i < a; ++i) { unsigned int I=i*nlength; #pragma omp parallel for num_threads(B) for(unsigned int j=0; j < b; ++j) { unsigned int J=j*mlength; fftw_execute_r2r((i < ilast && j < jlast) ? plan : plan2, (double *) in+cols*I+J, (double *) out+rows*J+I); } } } else { int A=a; #pragma omp parallel for num_threads(A) for(unsigned int i=0; i < a; ++i) { unsigned int I=i*nlength; fftw_execute_r2r(i < ilast ? plan : plan2, (double *) in+cols*I,(double *) out+I); } } } else if(b > 1) { int B=b; #pragma omp parallel for num_threads(B) for(unsigned int j=0; j < b; ++j) { unsigned int J=j*mlength; fftw_execute_r2r(j < jlast ? plan : plan2, (double *) in+J,(double *) out+rows*J); } } else #endif fftw_execute_r2r(plan,(double *) in,(double*) out); } }; template class Threadtable { public: typedef std::map Table; threaddata Lookup(Table& table, T key) { typename Table::iterator p=table.find(key); return p == table.end() ? threaddata() : p->second; } void Store(Table& threadtable, T key, const threaddata& data) { threadtable[key]=data; } }; struct keytype1 { unsigned int nx; unsigned int threads; bool inplace; keytype1(unsigned int nx, unsigned int threads, bool inplace) : nx(nx), threads(threads), inplace(inplace) {} }; struct keyless1 { bool operator()(const keytype1& a, const keytype1& b) const { return a.nx < b.nx || (a.nx == b.nx && (a.threads < b.threads || (a.threads == b.threads && a.inplace < b.inplace))); } }; struct keytype2 { unsigned int nx; unsigned int ny; unsigned int threads; bool inplace; keytype2(unsigned int nx, unsigned int ny, unsigned int threads, bool inplace) : nx(nx), ny(ny), threads(threads), inplace(inplace) {} }; struct keyless2 { bool operator()(const keytype2& a, const keytype2& b) const { return a.nx < b.nx || (a.nx == b.nx && (a.ny < b.ny || (a.ny == b.ny && (a.threads < b.threads || (a.threads == b.threads && a.inplace < b.inplace))))); } }; struct keytype3 { unsigned int nx; unsigned int ny; unsigned int nz; unsigned int threads; bool inplace; keytype3(unsigned int nx, unsigned int ny, unsigned int nz, unsigned int threads, bool inplace) : nx(nx), ny(ny), nz(nz), threads(threads), inplace(inplace) {} }; struct keyless3 { bool operator()(const keytype3& a, const keytype3& b) const { return a.nx < b.nx || (a.nx == b.nx && (a.ny < b.ny || (a.ny == b.ny && (a.nz < b.nz || (a.nz == b.nz && (a.threads < b.threads || (a.threads == b.threads && a.inplace < b.inplace))))))); } }; // Compute the complex Fourier transform of n complex values. // Before calling fft(), the arrays in and out (which may coincide) must be // allocated as Complex[n]. // // Out-of-place usage: // // fft1d Forward(n,-1,in,out); // Forward.fft(in,out); // // fft1d Backward(n,1,in,out); // Backward.fft(in,out); // // fft1d Backward(n,1,in,out); // Backward.fftNormalized(in,out); // True inverse of Forward.fft(out,in); // // In-place usage: // // fft1d Forward(n,-1); // Forward.fft(in); // // fft1d Backward(n,1); // Backward.fft(in); // class fft1d : public fftw, public Threadtable { unsigned int nx; static Table threadtable; public: fft1d(unsigned int nx, int sign, Complex *in=NULL, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*nx,sign,threads), nx(nx) {Setup(in,out);} #ifdef __Array_h__ fft1d(int sign, const Array::array1& in, const Array::array1& out=Array::NULL1, unsigned int threads=maxthreads) : fftw(2*in.Nx(),sign,threads), nx(in.Nx()) {Setup(in,out);} #endif threaddata lookup(bool inplace, unsigned int threads) { return this->Lookup(threadtable,keytype1(nx,threads,inplace)); } void store(bool inplace, const threaddata& data) { this->Store(threadtable,keytype1(nx,data.threads,inplace),data); } fftw_plan Plan(Complex *in, Complex *out) { return fftw_plan_dft_1d(nx,(fftw_complex *) in,(fftw_complex *) out, sign,effort); } }; template class fftwblock : public virtual fftw { public: int nx; unsigned int M; size_t istride,ostride; size_t idist,odist; fftw_plan plan1,plan2; unsigned int T,Q,R; fftwblock(unsigned int nx, unsigned int M, size_t istride, size_t ostride, size_t idist, size_t odist, Complex *in, Complex *out, unsigned int Threads) : fftw(), nx(nx), M(M), istride(istride), ostride(ostride), idist(Dist(nx,istride,idist)), odist(Dist(nx,ostride,odist)), plan1(NULL), plan2(NULL) { T=1; Q=M; R=0; threaddata S1=Setup(in,out); fftw_plan planT1=plan; if(Threads > 1) { T=std::min(M,Threads); Q=T > 0 ? M/T : 0; R=M-Q*T; threads=Threads; threaddata ST=Setup(in,out); if(R > 0 && threads == 1 && plan1 != plan2) { fftw_destroy_plan(plan2); plan2=plan1; } if(ST.mean > S1.mean-S1.stdev) { // Use FFTW's multi-threading fftw_destroy_plan(plan); if(R > 0) { fftw_destroy_plan(plan2); plan2=NULL; } T=1; Q=M; R=0; plan=planT1; threads=S1.threads; } else { // Do the multi-threading ourselves fftw_destroy_plan(planT1); threads=ST.threads; } } } fftw_plan Plan(int Q, fftw_complex *in, fftw_complex *out) { return fftw_plan_many_dft(1,&nx,Q,in,NULL,istride,idist, out,NULL,ostride,odist,sign,effort); } fftw_plan Plan(int Q, double *in, fftw_complex *out) { return fftw_plan_many_dft_r2c(1,&nx,Q,in,NULL,istride,idist, out,NULL,ostride,odist,effort); } fftw_plan Plan(int Q, fftw_complex *in, double *out) { return fftw_plan_many_dft_c2r(1,&nx,Q,in,NULL,istride,idist, out,NULL,ostride,odist,effort); } fftw_plan Plan(Complex *in, Complex *out) { if(R > 0) { plan2=Plan(Q+1,(I *) in,(O *) out); if(!plan2) return NULL; if(threads == 1) plan1=plan2; } return Plan(Q,(I *) in,(O *) out); } void Execute(fftw_plan plan, fftw_complex *in, fftw_complex *out) { fftw_execute_dft(plan,in,out); } void Execute(fftw_plan plan, double *in, fftw_complex *out) { fftw_execute_dft_r2c(plan,in,out); } void Execute(fftw_plan plan, fftw_complex *in, double *out) { fftw_execute_dft_c2r(plan,in,out); } void Execute(Complex *in, Complex *out, bool=false) { if(T == 1) Execute(plan,(I *) in,(O *) out); else { unsigned int extra=T-R; #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(T) #endif for(unsigned int i=0; i < T; ++i) { unsigned int iQ=i*Q; if(i < extra) Execute(plan,(I *) in+iQ*idist,(O *) out+iQ*odist); else { unsigned int offset=iQ+i-extra; Execute(plan2,(I *) in+offset*idist,(O *) out+offset*odist); } } } } unsigned int Threads() {return std::max(T,threads);} ~fftwblock() { if(plan2) fftw_destroy_plan(plan2); } }; // Compute the complex Fourier transform of M complex vectors, each of // length n. // Before calling fft(), the arrays in and out (which may coincide) must be // allocated as Complex[M*n]. // // Out-of-place usage: // // mfft1d Forward(n,-1,M,stride,dist,in,out); // Forward.fft(in,out); // // In-place usage: // // mfft1d Forward(n,-1,M,stride,dist); // Forward.fft(in); // // Notes: // stride is the spacing between the elements of each Complex vector; // dist is the spacing between the first elements of the vectors. // // class mfft1d : public fftwblock, public Threadtable { static Table threadtable; public: mfft1d(unsigned int nx, int sign, unsigned int M=1, size_t stride=1, size_t dist=0, Complex *in=NULL, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*((nx-1)*stride+(M-1)*Dist(nx,stride,dist)+1),sign,threads,nx), fftwblock (nx,M,stride,stride,dist,dist,in,out,threads) {} mfft1d(unsigned int nx, int sign, unsigned int M, size_t istride, size_t ostride, size_t idist, size_t odist, Complex *in=NULL, Complex *out=NULL, unsigned int threads=maxthreads): fftw(std::max(2*((nx-1)*istride+(M-1)*Dist(nx,istride,idist)+1), 2*((nx-1)*ostride+(M-1)*Dist(nx,ostride,odist)+1)),sign, threads, nx), fftwblock(nx,M,istride,ostride,idist,odist,in, out,threads) {} threaddata lookup(bool inplace, unsigned int threads) { return Lookup(threadtable,keytype3(nx,Q,R,threads,inplace)); } void store(bool inplace, const threaddata& data) { Store(threadtable,keytype3(nx,Q,R,data.threads,inplace),data); } }; // Compute the complex Fourier transform of n real values, using phase sign -1. // Before calling fft(), the array in must be allocated as double[n] and // the array out must be allocated as Complex[n/2+1]. The arrays in and out // may coincide, allocated as Complex[n/2+1]. // // Out-of-place usage: // // rcfft1d Forward(n,in,out); // Forward.fft(in,out); // // In-place usage: // // rcfft1d Forward(n); // Forward.fft(out); // // Notes: // in contains the n real values stored as a Complex array; // out contains the first n/2+1 Complex Fourier values. // class rcfft1d : public fftw, public Threadtable { unsigned int nx; static Table threadtable; public: rcfft1d(unsigned int nx, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*(nx/2+1),-1,threads,nx), nx(nx) {Setup(out,(double*) NULL);} rcfft1d(unsigned int nx, double *in, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*(nx/2+1),-1,threads,nx), nx(nx) {Setup(in,out);} threaddata lookup(bool inplace, unsigned int threads) { return Lookup(threadtable,keytype1(nx,threads,inplace)); } void store(bool inplace, const threaddata& data) { Store(threadtable,keytype1(nx,data.threads,inplace),data); } fftw_plan Plan(Complex *in, Complex *out) { return fftw_plan_dft_r2c_1d(nx,(double *) in,(fftw_complex *) out, effort); } void Execute(Complex *in, Complex *out, bool=false) { fftw_execute_dft_r2c(plan,(double *) in,(fftw_complex *) out); } }; // Compute the real inverse Fourier transform of the n/2+1 Complex values // corresponding to the non-negative part of the frequency spectrum, using // phase sign +1. // Before calling fft(), the array in must be allocated as Complex[n/2+1] // and the array out must be allocated as double[n]. The arrays in and out // may coincide, allocated as Complex[n/2+1]. // // Out-of-place usage (input destroyed): // // crfft1d Backward(n,in,out); // Backward.fft(in,out); // // In-place usage: // // crfft1d Backward(n); // Backward.fft(in); // // Notes: // in contains the first n/2+1 Complex Fourier values. // out contains the n real values stored as a Complex array; // class crfft1d : public fftw, public Threadtable { unsigned int nx; static Table threadtable; public: crfft1d(unsigned int nx, double *out=NULL, unsigned int threads=maxthreads) : fftw(2*(nx/2+1),1,threads,nx), nx(nx) {Setup(out);} crfft1d(unsigned int nx, Complex *in, double *out=NULL, unsigned int threads=maxthreads) : fftw(realsize(nx,in,out),1,threads,nx), nx(nx) {Setup(in,out);} threaddata lookup(bool inplace, unsigned int threads) { return Lookup(threadtable,keytype1(nx,threads,inplace)); } void store(bool inplace, const threaddata& data) { Store(threadtable,keytype1(nx,data.threads,inplace),data); } fftw_plan Plan(Complex *in, Complex *out) { return fftw_plan_dft_c2r_1d(nx,(fftw_complex *) in,(double *) out,effort); } void Execute(Complex *in, Complex *out, bool=false) { fftw_execute_dft_c2r(plan,(fftw_complex *) in,(double *) out); } }; // Compute the real Fourier transform of M real vectors, each of length n, // using phase sign -1. Before calling fft(), the array in must be // allocated as double[M*n] and the array out must be allocated as // Complex[M*(n/2+1)]. The arrays in and out may coincide, // allocated as Complex[M*(n/2+1)]. // // Out-of-place usage: // // mrcfft1d Forward(n,M,istride,ostride,idist,odist,in,out); // Forward.fft(in,out); // // In-place usage: // // mrcfft1d Forward(n,M,istride,ostride,idist,odist); // Forward.fft(out); // // Notes: // istride is the spacing between the elements of each real vector; // ostride is the spacing between the elements of each Complex vector; // idist is the spacing between the first elements of the real vectors; // odist is the spacing between the first elements of the Complex vectors; // in contains the n real values stored as a Complex array; // out contains the first n/2+1 Complex Fourier values. // class mrcfft1d : public fftwblock, public Threadtable { static Table threadtable; public: mrcfft1d(unsigned int nx, unsigned int M, size_t istride, size_t ostride, size_t idist, size_t odist, double *in=NULL, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(std::max((realsize(nx,in,out)-2)*istride+(M-1)*idist+2, 2*(nx/2*ostride+(M-1)*odist+1)),-1,threads,nx), fftwblock (nx,M,istride,ostride,idist,odist,(Complex *) in,out,threads) {} threaddata lookup(bool inplace, unsigned int threads) { return Lookup(threadtable,keytype3(nx,Q,R,threads,inplace)); } void store(bool inplace, const threaddata& data) { Store(threadtable,keytype3(nx,Q,R,data.threads,inplace),data); } void fftNormalized(double *in, Complex *out=NULL) { fftw::fftNormalized(nx/2+1,M,ostride,odist,in,out,false); } void fft0Normalized(double *in, Complex *out=NULL) { fftw::fftNormalized(nx/2+1,M,ostride,odist,in,out,true); } }; // Compute the real inverse Fourier transform of M complex vectors, each of // length n/2+1, corresponding to the non-negative parts of the frequency // spectra, using phase sign +1. Before calling fft(), the array in must be // allocated as Complex[M*(n/2+1)] and the array out must be allocated as // double[M*n]. The arrays in and out may coincide, // allocated as Complex[M*(n/2+1)]. // // Out-of-place usage (input destroyed): // // mcrfft1d Backward(n,M,istride,ostride,idist,odist,in,out); // Backward.fft(in,out); // // In-place usage: // // mcrfft1d Backward(n,M,istride,ostride,idist,odist); // Backward.fft(out); // // Notes: // stride is the spacing between the elements of each Complex vector; // dist is the spacing between the first elements of the vectors; // in contains the first n/2+1 Complex Fourier values; // out contains the n real values stored as a Complex array. // class mcrfft1d : public fftwblock, public Threadtable { static Table threadtable; public: mcrfft1d(unsigned int nx, unsigned int M, size_t istride, size_t ostride, size_t idist, size_t odist, Complex *in=NULL, double *out=NULL, unsigned int threads=maxthreads) : fftw(std::max(2*(nx/2*istride+(M-1)*idist+1), (realsize(nx,in,out)-2)*ostride+(M-1)*odist+2),1,threads,nx), fftwblock (nx,M,istride,ostride,idist,odist,in,(Complex *) out,threads) {} threaddata lookup(bool inplace, unsigned int threads) { return Lookup(threadtable,keytype3(nx,Q,R,threads,inplace)); } void store(bool inplace, const threaddata& data) { Store(threadtable,keytype3(nx,Q,R,data.threads,inplace),data); } void fftNormalized(Complex *in, double *out=NULL) { fftw::fftNormalized(nx,M,ostride,odist,in,out,false); } void fft0Normalized(Complex *in, double *out=NULL) { fftw::fftNormalized(nx,M,ostride,odist,in,out,true); } }; // Compute the complex two-dimensional Fourier transform of nx times ny // complex values. Before calling fft(), the arrays in and out (which may // coincide) must be allocated as Complex[nx*ny]. // // Out-of-place usage: // // fft2d Forward(nx,ny,-1,in,out); // Forward.fft(in,out); // // fft2d Backward(nx,ny,1,in,out); // Backward.fft(in,out); // // fft2d Backward(nx,ny,1,in,out); // Backward.fftNormalized(in,out); // True inverse of Forward.fft(out,in); // // In-place usage: // // fft2d Forward(nx,ny,-1); // Forward.fft(in); // // fft2d Backward(nx,ny,1); // Backward.fft(in); // // Note: // in[ny*i+j] contains the ny Complex values for each i=0,...,nx-1. // class fft2d : public fftw, public Threadtable { unsigned int nx; unsigned int ny; static Table threadtable; public: fft2d(unsigned int nx, unsigned int ny, int sign, Complex *in=NULL, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*nx*ny,sign,threads), nx(nx), ny(ny) {Setup(in,out);} #ifdef __Array_h__ fft2d(int sign, const Array::array2& in, const Array::array2& out=Array::NULL2, unsigned int threads=maxthreads) : fftw(2*in.Size(),sign,threads), nx(in.Nx()), ny(in.Ny()) { Setup(in,out); } #endif threaddata lookup(bool inplace, unsigned int threads) { return this->Lookup(threadtable,keytype2(nx,ny,threads,inplace)); } void store(bool inplace, const threaddata& data) { this->Store(threadtable,keytype2(nx,ny,data.threads,inplace),data); } fftw_plan Plan(Complex *in, Complex *out) { return fftw_plan_dft_2d(nx,ny,(fftw_complex *) in,(fftw_complex *) out, sign,effort); } void Execute(Complex *in, Complex *out, bool=false) { fftw_execute_dft(plan,(fftw_complex *) in,(fftw_complex *) out); } }; // Compute the complex two-dimensional Fourier transform of nx times ny real // values, using phase sign -1. // Before calling fft(), the array in must be allocated as double[nx*ny] and // the array out must be allocated as Complex[nx*(ny/2+1)]. The arrays in // and out may coincide, allocated as Complex[nx*(ny/2+1)]. // // Out-of-place usage: // // rcfft2d Forward(nx,ny,in,out); // Forward.fft(in,out); // Origin of Fourier domain at (0,0) // Forward.fft0(in,out); // Origin of Fourier domain at (nx/2,0); // input destroyed. // // In-place usage: // // rcfft2d Forward(nx,ny); // Forward.fft(in); // Origin of Fourier domain at (0,0) // Forward.fft0(in); // Origin of Fourier domain at (nx/2,0) // // Notes: // in contains the nx*ny real values stored as a Complex array; // out contains the upper-half portion (ky >= 0) of the Complex transform. // class rcfft2d : public fftw { unsigned int nx; unsigned int ny; public: rcfft2d(unsigned int nx, unsigned int ny, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*nx*(ny/2+1),-1,threads,nx*ny), nx(nx), ny(ny) {Setup(out);} rcfft2d(unsigned int nx, unsigned int ny, double *in, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*nx*(ny/2+1),-1,threads,nx*ny), nx(nx), ny(ny) { Setup(in,out); } fftw_plan Plan(Complex *in, Complex *out) { return fftw_plan_dft_r2c_2d(nx,ny,(double *) in,(fftw_complex *) out, effort); } void Execute(Complex *in, Complex *out, bool shift=false) { if(shift) { if(inplace) Shift(in,nx,ny,threads); else Shift((double *) in,nx,ny,threads); } fftw_execute_dft_r2c(plan,(double *) in,(fftw_complex *) out); } // Set Nyquist modes of even shifted transforms to zero. void deNyquist(Complex *f) { unsigned int nyp=ny/2+1; if(nx % 2 == 0) #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int j=0; j < nyp; ++j) f[j]=0.0; if(ny % 2 == 0) #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=0; i < nx; ++i) f[(i+1)*nyp-1]=0.0; } }; // Compute the real two-dimensional inverse Fourier transform of the // nx*(ny/2+1) Complex values corresponding to the spectral values in the // half-plane ky >= 0, using phase sign +1. // Before calling fft(), the array in must be allocated as // Complex[nx*(ny/2+1)] and the array out must be allocated as // double[nx*ny]. The arrays in and out may coincide, // allocated as Complex[nx*(ny/2+1)]. // // Out-of-place usage (input destroyed): // // crfft2d Backward(nx,ny,in,out); // Backward.fft(in,out); // Origin of Fourier domain at (0,0) // Backward.fft0(in,out); // Origin of Fourier domain at (nx/2,0) // // In-place usage: // // crfft2d Backward(nx,ny); // Backward.fft(in); // Origin of Fourier domain at (0,0) // Backward.fft0(in); // Origin of Fourier domain at (nx/2,0) // // Notes: // in contains the upper-half portion (ky >= 0) of the Complex transform; // out contains the nx*ny real values stored as a Complex array. // class crfft2d : public fftw { unsigned int nx; unsigned int ny; public: crfft2d(unsigned int nx, unsigned int ny, double *out=NULL, unsigned int threads=maxthreads) : fftw(2*nx*(ny/2+1),1,threads,nx*ny), nx(nx), ny(ny) {Setup(out);} crfft2d(unsigned int nx, unsigned int ny, Complex *in, double *out=NULL, unsigned int threads=maxthreads) : fftw(nx*realsize(ny,in,out),1,threads,nx*ny), nx(nx), ny(ny) { Setup(in,out); } fftw_plan Plan(Complex *in, Complex *out) { return fftw_plan_dft_c2r_2d(nx,ny,(fftw_complex *) in,(double *) out, effort); } void Execute(Complex *in, Complex *out, bool shift=false) { fftw_execute_dft_c2r(plan,(fftw_complex *) in,(double *) out); if(shift) { if(inplace) Shift(out,nx,ny,threads); else Shift((double *) out,nx,ny,threads); } } // Set Nyquist modes of even shifted transforms to zero. void deNyquist(Complex *f) { unsigned int nyp=ny/2+1; if(nx % 2 == 0) #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int j=0; j < nyp; ++j) f[j]=0.0; if(ny % 2 == 0) #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=0; i < nx; ++i) f[(i+1)*nyp-1]=0.0; } }; // Compute the complex three-dimensional Fourier transform of // nx times ny times nz complex values. Before calling fft(), the arrays in // and out (which may coincide) must be allocated as Complex[nx*ny*nz]. // // Out-of-place usage: // // fft3d Forward(nx,ny,nz,-1,in,out); // Forward.fft(in,out); // // fft3d Backward(nx,ny,nz,1,in,out); // Backward.fft(in,out); // // fft3d Backward(nx,ny,nz,1,in,out); // Backward.fftNormalized(in,out); // True inverse of Forward.fft(out,in); // // In-place usage: // // fft3d Forward(nx,ny,nz,-1); // Forward.fft(in); // // fft3d Backward(nx,ny,nz,1); // Backward.fft(in); // // Note: // in[nz*(ny*i+j)+k] contains the (i,j,k)th Complex value, // indexed by i=0,...,nx-1, j=0,...,ny-1, and k=0,...,nz-1. // class fft3d : public fftw { unsigned int nx; unsigned int ny; unsigned int nz; public: fft3d(unsigned int nx, unsigned int ny, unsigned int nz, int sign, Complex *in=NULL, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*nx*ny*nz,sign,threads), nx(nx), ny(ny), nz(nz) {Setup(in,out);} #ifdef __Array_h__ fft3d(int sign, const Array::array3& in, const Array::array3& out=Array::NULL3, unsigned int threads=maxthreads) : fftw(2*in.Size(),sign,threads), nx(in.Nx()), ny(in.Ny()), nz(in.Nz()) {Setup(in,out);} #endif fftw_plan Plan(Complex *in, Complex *out) { return fftw_plan_dft_3d(nx,ny,nz,(fftw_complex *) in, (fftw_complex *) out, sign, effort); } }; // Compute the complex two-dimensional Fourier transform of // nx times ny times nz real values, using phase sign -1. // Before calling fft(), the array in must be allocated as double[nx*ny*nz] // and the array out must be allocated as Complex[nx*ny*(nz/2+1)]. The // arrays in and out may coincide, allocated as Complex[nx*ny*(nz/2+1)]. // // Out-of-place usage: // // rcfft3d Forward(nx,ny,nz,in,out); // Forward.fft(in,out); // Origin of Fourier domain at (0,0) // Forward.fft0(in,out); // Origin of Fourier domain at (nx/2,ny/2,0); // input destroyed // In-place usage: // // rcfft3d Forward(nx,ny,nz); // Forward.fft(in); // Origin of Fourier domain at (0,0) // Forward.fft0(in); // Origin of Fourier domain at (nx/2,ny/2,0) // // Notes: // in contains the nx*ny*nz real values stored as a Complex array; // out contains the upper-half portion (kz >= 0) of the Complex transform. // class rcfft3d : public fftw { unsigned int nx; unsigned int ny; unsigned int nz; public: rcfft3d(unsigned int nx, unsigned int ny, unsigned int nz, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*nx*ny*(nz/2+1),-1,threads,nx*ny*nz), nx(nx), ny(ny), nz(nz) { Setup(out); } rcfft3d(unsigned int nx, unsigned int ny, unsigned int nz, double *in, Complex *out=NULL, unsigned int threads=maxthreads) : fftw(2*nx*ny*(nz/2+1),-1,threads,nx*ny*nz), nx(nx), ny(ny), nz(nz) {Setup(in,out);} fftw_plan Plan(Complex *in, Complex *out) { return fftw_plan_dft_r2c_3d(nx,ny,nz,(double *) in,(fftw_complex *) out, effort); } void Execute(Complex *in, Complex *out, bool shift=false) { if(shift) { if(inplace) Shift(in,nx,ny,nz,threads); else Shift((double *) in,nx,ny,nz,threads); } fftw_execute_dft_r2c(plan,(double *) in,(fftw_complex *) out); } // Set Nyquist modes of even shifted transforms to zero. void deNyquist(Complex *f) { unsigned int nzp=nz/2+1; unsigned int yz=ny*nzp; if(nx % 2 == 0) { #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int k=0; k < yz; ++k) f[k]=0.0; } if(ny % 2 == 0) { #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=0; i < nx; ++i) { unsigned int iyz=i*yz; for(unsigned int k=0; k < nzp; ++k) f[iyz+k]=0.0; } } if(nz % 2 == 0) #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=0; i < nx; ++i) for(unsigned int j=0; j < ny; ++j) f[i*yz+(j+1)*nzp-1]=0.0; } }; // Compute the real two-dimensional inverse Fourier transform of the // nx*ny*(nz/2+1) Complex values corresponding to the spectral values in the // half-plane kz >= 0, using phase sign +1. // Before calling fft(), the array in must be allocated as // Complex[nx*ny*(nz+1)/2] and the array out must be allocated as // double[nx*ny*nz]. The arrays in and out may coincide, // allocated as Complex[nx*ny*(nz/2+1)]. // // Out-of-place usage (input destroyed): // // crfft3d Backward(nx,ny,nz,in,out); // Backward.fft(in,out); // Origin of Fourier domain at (0,0) // Backward.fft0(in,out); // Origin of Fourier domain at (nx/2,ny/2,0) // // In-place usage: // // crfft3d Backward(nx,ny,nz); // Backward.fft(in); // Origin of Fourier domain at (0,0) // Backward.fft0(in); // Origin of Fourier domain at (nx/2,ny/2,0) // // Notes: // in contains the upper-half portion (kz >= 0) of the Complex transform; // out contains the nx*ny*nz real values stored as a Complex array. // class crfft3d : public fftw { unsigned int nx; unsigned int ny; unsigned int nz; public: crfft3d(unsigned int nx, unsigned int ny, unsigned int nz, double *out=NULL, unsigned int threads=maxthreads) : fftw(2*nx*ny*(nz/2+1),1,threads,nx*ny*nz), nx(nx), ny(ny), nz(nz) {Setup(out);} crfft3d(unsigned int nx, unsigned int ny, unsigned int nz, Complex *in, double *out=NULL, unsigned int threads=maxthreads) : fftw(nx*ny*(realsize(nz,in,out)),1,threads,nx*ny*nz), nx(nx), ny(ny), nz(nz) {Setup(in,out);} fftw_plan Plan(Complex *in, Complex *out) { return fftw_plan_dft_c2r_3d(nx,ny,nz,(fftw_complex *) in,(double *) out, effort); } void Execute(Complex *in, Complex *out, bool shift=false) { fftw_execute_dft_c2r(plan,(fftw_complex *) in,(double *) out); if(shift) { if(inplace) Shift(out,nx,ny,nz,threads); else Shift((double *) out,nx,ny,nz,threads); } } // Set Nyquist modes of even shifted transforms to zero. void deNyquist(Complex *f) { unsigned int nzp=nz/2+1; unsigned int yz=ny*nzp; if(nx % 2 == 0) { #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int k=0; k < yz; ++k) f[k]=0.0; } if(ny % 2 == 0) { #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=0; i < nx; ++i) { unsigned int iyz=i*yz; for(unsigned int k=0; k < nzp; ++k) f[iyz+k]=0.0; } } if(nz % 2 == 0) #ifndef FFTWPP_SINGLE_THREAD #pragma omp parallel for num_threads(threads) #endif for(unsigned int i=0; i < nx; ++i) for(unsigned int j=0; j < ny; ++j) f[i*yz+(j+1)*nzp-1]=0.0; } }; } #endif ./asymptote-2.41/prcfile.h0000644000175000017500000000117513064427076015344 0ustar norbertnorbert#ifndef PRCFILE_H #define PRCFILE_H #include "memory.h" inline double X(const camp::triple &v) {return v.getx();} inline double Y(const camp::triple &v) {return v.gety();} inline double Z(const camp::triple &v) {return v.getz();} #include "prc/oPRCFile.h" namespace camp { inline prc::RGBAColour rgba(pen p) { p.convert(); p.torgb(); return prc::RGBAColour(p.red(),p.green(),p.blue(),p.opacity()); } static const double inches=72; static const double cm=inches/2.54; class prcfile : public prc::oPRCFile { public: prcfile(string name) : prc::oPRCFile(name.c_str(),10.0/cm) {} // Use bp. }; } //namespace camp #endif ./asymptote-2.41/varinit.cc0000644000175000017500000000367213064427076015536 0ustar norbertnorbert/***** * varinit.cc * Andy Hammerlindl 2005/07/01 * * Variable initializer are syntax that finish code such as * int var = ... * As such, they are translated to yield a certain type, the type of the * variable. Expressions are a special case that can be translated without an * associated variable or its type. *****/ #include "varinit.h" #include "coenv.h" #include "runtime.h" #include "runarray.h" namespace absyntax { using namespace types; using namespace trans; void definit::prettyprint(ostream &out, Int indent) { prettyname(out, "definit",indent); } void definit::transToType(coenv &e, types::ty *target) { if (target->kind != ty_error) { access *a=e.e.lookupInitializer(target); if (a) a->encode(CALL, getPos(), e.c); else { em.error(getPos()); em << "no default initializer for type '" << *target << "'"; } } } void arrayinit::prettyprint(ostream &out, Int indent) { prettyname(out, "arrayinit",indent); for (mem::list::iterator p = inits.begin(); p != inits.end(); ++p) (*p)->prettyprint(out, indent+2); if (rest) rest->prettyprint(out, indent+1); } void arrayinit::transMaker(coenv &e, Int size, bool rest) { // Push the number of cells and call the array maker. e.c.encode(inst::intpush, size); e.c.encode(inst::builtin, rest ? run::newAppendedArray : run::newInitializedArray); } void arrayinit::transToType(coenv &e, types::ty *target) { types::ty *celltype; if (target->kind != types::ty_array) { em.error(getPos()); em << "array initializer used for non-array"; celltype = types::primError(); } else { celltype = ((types::array *)target)->celltype; } // Push the values on the stack. for (mem::list::iterator p = inits.begin(); p != inits.end(); ++p) (*p)->transToType(e, celltype); if (rest) rest->transToType(e, target); transMaker(e, (Int)inits.size(), (bool)rest); } } // namespace absyntax ./asymptote-2.41/tests/0000755000175000017500000000000013064427206014700 5ustar norbertnorbert./asymptote-2.41/tests/arith/0000755000175000017500000000000013064427076016014 5ustar norbertnorbert./asymptote-2.41/tests/arith/triple.asy0000644000175000017500000000036413064427076020034 0ustar norbertnorbertimport TestLib; triple t = (1,0,0); StartTest("polar()"); assert(polar(t) == (pi / 2.0) ); EndTest(); StartTest("azimuth()"); assert(azimuth(t) < realEpsilon); EndTest(); StartTest("unit()"); assert(length(t-unit(t)) < realEpsilon); EndTest(); ./asymptote-2.41/tests/arith/pair.asy0000644000175000017500000000070113064427076017463 0ustar norbertnorbertimport TestLib; StartTest("complex addition"); assert((1,0)+(0,1)==(1,1)); EndTest(); StartTest("complex subtraction"); assert((1,0)-(0,1)==(1,-1)); EndTest(); StartTest("complex multiplication"); assert((1,2)*(2,1)==(0,5)); EndTest(); StartTest("complex division"); assert((0,5)/(2,1)==(1,2)); EndTest(); StartTest("length(pair)"); assert(length((0.0,1.0)) == 1.0); EndTest(); StartTest("conj()"); assert(conj((0.0,1.0))==(0.0, -1.0)); EndTest(); ./asymptote-2.41/tests/arith/integer.asy0000644000175000017500000000115413064427076020170 0ustar norbertnorbert// Integer arithmetic. import TestLib; StartTest("integer addition"); assert(1+1==2); EndTest(); StartTest("integer subtraction"); assert(2-1==1); EndTest(); StartTest("integer multiplication"); assert(2*2==4); EndTest(); StartTest("integer division"); assert(4/2==2); EndTest(); StartTest("integer self ops"); { int x = 3; assert(++x==4); assert(x==4); } { int x = 3; assert(--x==2); assert(x==2); } { int x = 3; assert((x+=7) == 10); assert(x==10); } { int x = 3; assert((x-=7) == -4); assert(x==-4); } { int x = 3; assert((x*=7) == 21); assert(x==21); } { int x = 10; assert((x%=4) == 2); assert(x==2); } EndTest(); ./asymptote-2.41/tests/arith/transform.asy0000644000175000017500000000117713064427076020553 0ustar norbertnorbertimport TestLib; pair x = (1, 2); StartTest("identity transform"); assert(identity()*x == x); EndTest(); StartTest("shift transform"); assert(shift((1,1))*x == (2, 3)); assert(shift(1,1)*x == (2, 3)); EndTest(); StartTest("scaling transforms"); assert(xscale(2)*x == (2, 2)); assert(yscale(2)*x == (1, 4)); assert(scale(2)*x == (2, 4)); EndTest(); StartTest("slant transform"); assert(slant(1)*x == (3, 2)); EndTest(); StartTest("rotation transform"); assert(length((rotate(90)*x) - (-2,1)) <= realEpsilon); assert(rotate(90, x)*x == x); EndTest(); StartTest("reflect transform"); assert(reflect((-1, -1), (1, 1))*x == (2, 1)); EndTest(); ./asymptote-2.41/tests/arith/roots.asy0000644000175000017500000000325613064427076017706 0ustar norbertnorbert// Roots. import TestLib; real x; real[] r; StartTest("quadratic roots"); r=quadraticroots(1,0,-8); assert(r.length == 2); r=sort(r); x=2sqrt(2); assert(close(r[0],-x)); assert(close(r[1],x)); r=quadraticroots(1,2,1); assert(r.length == 2); assert(close(r[0],-1)); assert(close(r[1],-1)); r=quadraticroots(1,0,8); assert(r.length == 0); r=quadraticroots(0,2,3); assert(r.length == 1); assert(close(r[0],-3/2)); EndTest(); StartTest("cubic roots"); r=cubicroots(1,0,0,-8); assert(r.length == 1); assert(close(r[0],2)); real[] r=cubicroots(1,3,3,1); assert(r.length == 3); assert(close(r[0],-1)); assert(close(r[1],-1)); assert(close(r[2],-1)); real[] r=cubicroots(1,-3,3,-1); assert(r.length == 3); assert(close(r[0],1)); assert(close(r[1],1)); assert(close(r[2],1)); r=cubicroots(1,0,0,0); assert(r.length == 3); assert(r[0] == 0); assert(r[1] == 0); assert(r[2] == 0); r=cubicroots(1,0,-15,-4); assert(r.length == 3); r=sort(r); assert(close(r[0],-2-sqrt(3))); assert(close(r[1],-2+sqrt(3))); assert(close(r[2],4)); r=cubicroots(1,0,-15,4); assert(r.length == 3); r=sort(r); assert(close(r[0],-4)); assert(close(r[1],2-sqrt(3))); assert(close(r[2],2+sqrt(3))); r=cubicroots(1,0,-15,0); assert(r.length == 3); r=sort(r); x=sqrt(15); assert(close(r[0],-x)); assert(r[1] == 0); assert(close(r[2],x)); r=cubicroots(1,1,1,0); assert(r.length == 1); assert(r[0] == 0); r=cubicroots(1,0,20,-4); assert(r.length == 1); x=cbrt(54+6sqrt(6081)); assert(close(r[0],x/3-20/x)); EndTest(); StartTest("newton"); real f(real x) {return cos(x);} real dfdx(real x) {return -sin(x);} assert(close(newton(f,dfdx,1),pi/2)); assert(newton(f,dfdx,0) == realMax); assert(newton(f,dfdx,0,2) == pi/2); EndTest(); ./asymptote-2.41/tests/arith/random.asy0000644000175000017500000000030113064427076020004 0ustar norbertnorbertimport TestLib; StartTest("random"); bool bit32=false; for(int i=0; i < 1000; ++i) { real x=unitrand(); if(x > 0.5) bit32=true; assert(x >= 0.0 && x <= 1.0); } assert(bit32); EndTest(); ./asymptote-2.41/tests/arith/real.asy0000644000175000017500000000057713064427076017466 0ustar norbertnorbert// Real arithmetic. import TestLib; StartTest("real error"); assert((1.0-1.0) < realEpsilon); EndTest(); StartTest("real addition"); assert((1.0+1.0) == (2.0)); EndTest(); StartTest("real subtraction"); assert((2.0-1.0) == (1.0)); EndTest(); StartTest("real multiplication"); assert((2.0*2.0) == (4.0)); EndTest(); StartTest("real division"); assert((4.0/2.0) == (2.0)); EndTest(); ./asymptote-2.41/tests/imp/0000755000175000017500000000000013064427076015472 5ustar norbertnorbert./asymptote-2.41/tests/imp/unravel.asy0000644000175000017500000000227113064427076017666 0ustar norbertnorbertimport TestLib; StartTest("unravel"); { struct A { int x=1, y=2, z=3; int y() { return 7; } } A a=new A; unravel a; assert(x==1); assert(y==2); assert(z==3); assert(y()==7); } { struct A { private int x=1; int y=2, z=3; int y() { return 7; } } int x=5; A a=new A; unravel a; assert(x==5); assert(y==2); assert(z==3); } { struct A { public int x=1; int y=2, z=3; int y() { return 7; } } int z=5; A a=new A; from a unravel x,y; assert(x==1); assert(y==2); assert(z==5); assert(y()==7); } { struct A { public int x=1; int y=2, z=3; int y() { return 7; } } int y=4; int z=5; A a=new A; from a unravel x,y as blah; assert(x==1); assert(y==4); assert(blah==2); assert(z==5); assert(blah()==7); } { struct A { struct B { static int x=4; } } A a=new A; int x=3; from a.B unravel x; assert(x==4); } { struct A { struct B { static int x=4; } } A a=new A; A.B b=new a.B; int x=3; from b unravel x; assert(x==4); } { struct A { static struct B { static int x=4; } } int x=3; from A.B unravel x; assert(x==4); } EndTest(); ./asymptote-2.41/tests/pic/0000755000175000017500000000000013064427076015460 5ustar norbertnorbert./asymptote-2.41/tests/pic/trans.asy0000644000175000017500000000255013064427076017327 0ustar norbertnorbertimport TestLib; StartTest("trans"); // Ensure the same test each time. srand(3456); pair randompair() { return (unitrand(),unitrand()); } path randombox() { return box(randompair(), randompair()); } // For now, only tests transforms which take axes to axes. transform randomtrans() { return rotate(90 * (rand() % 4)) * shift(unitrand(), unitrand()); } real tolerance = 1e-4; void testpic(int objs, int trans) { path[] pp; picture orig; for (int i = 0; i < objs; ++i) { pp.push(randombox()); fill(orig, pp[i]); } picture pic = orig; transform t = identity(); for (int i = 0; i < trans; ++i) { transform tt = randomtrans(); pic = tt * pic; t = tt * t; } pair m = pic.userMin2(), M = pic.userMax2(); pair pm = min(t * pp), pM = max(t * pp); assert(abs(m-pm) < tolerance); assert(abs(M-pM) < tolerance); } for (int i = 0; i < 100; ++i) testpic(1,1); for (int i = 0; i < 100; ++i) testpic(1,1); for (int i = 0; i < 100; ++i) testpic(3,1); for (int i = 0; i < 100; ++i) testpic(1,2); for (int i = 0; i < 100; ++i) testpic(2,2); for (int i = 0; i < 100; ++i) testpic(3,2); for (int i = 0; i < 100; ++i) testpic(3,4); for (int i = 0; i < 100; ++i) testpic(1,4); for (int i = 0; i < 100; ++i) testpic(2,4); for (int i = 0; i < 100; ++i) testpic(3,4); for (int i = 0; i < 100; ++i) testpic(3,4); EndTest(); ./asymptote-2.41/tests/TestLib.asy0000644000175000017500000000035613064427076016775 0ustar norbertnorbertbool close(pair a, pair b) { real norm=(b == 0) ? 1 : max(abs(a),abs(b)); return abs(a-b) <= 100*realEpsilon*norm; } void StartTest(string desc) { write("Testing " + desc + "...",flush); } void EndTest() { write("PASSED."); } ./asymptote-2.41/tests/gs/0000755000175000017500000000000013064427076015316 5ustar norbertnorbert./asymptote-2.41/tests/gs/ghostscript.asy0000644000175000017500000000056113064427076020407 0ustar norbertnorbertimport TestLib; StartTest("Ghostscript"); bool uptodate=texpath("A").length != 0; if(!uptodate) { write(); write(); write("Incompatible Ghostscript version!"); write("Please set environment variable ASYMPTOTE_EPSDRIVER to"); write("\"epswrite\" for Ghostscript < 9.14 and to \"eps2write\" for Ghostscript >= 9.14"); write(); } assert(uptodate); EndTest(); ./asymptote-2.41/tests/bench/0000755000175000017500000000000013064427076015764 5ustar norbertnorbert./asymptote-2.41/tests/bench/6000circles.asy0000644000175000017500000000042413064427076020434 0ustar norbertnorbertsize(0,100); import math; import stats; currentpen=magenta; // A centered random number real crand() {return unitrand()*5;} real r1; pair pcenter; for(int i=0; i < 6000; ++i) { r1 = unitrand()/10; pcenter = ( crand(), crand()); Draw(circle(pcenter,r1)); } ./asymptote-2.41/tests/output/0000755000175000017500000000000013064427076016245 5ustar norbertnorbert./asymptote-2.41/tests/output/line.asy0000644000175000017500000000002613064427076017710 0ustar norbertnorbertdraw((0,0)--(100,0)); ./asymptote-2.41/tests/output/Makefile0000644000175000017500000000240413064427076017705 0ustar norbertnorbert# Automated testing to see if the output of Asymptote scripts changes when the # program is modified. # How to call asy from the tests/output/name.out directory ASY=../../../asy TESTS=$(basename $(wildcard *.asy)) # This command performs the testing on all scripts. diff: $(TESTS:=.diff) # This builds the reference copies of the output using a trusted version of asy ref: $(TESTS:=.ref) $(TESTS:=.ref) $(TESTS:=.out): %: @echo Generating $@ @rm -rf $@ @mkdir $@ @cd $@; \ $(ASY) -keep ../$(basename $@) \ >$(basename $@).stdout 2>$(basename $@).stderr; \ ls >$(basename $@).ls; \ rm -f *.dvi *.pdf *.gif *.jpg *.jpeg *.png # Ignore lines with timestamps of the form hh:mm, since the time changes between # runs. This regex is fairly broad and it may need to be narrowed. $(TESTS:=.diff): %.diff: %.out diff -I "[0-9][0-9]:[0-9][0-9]" -u $(@:.diff=.ref) $(@:.diff=.out) clean: rm -rf *.out # The reference copies should only be built at the start, or when the behaviour # of Asymptote is intentionally changed, so they are not usually removed by make # clean. veryclean: clean rm -rf *.ref # This tells make to build every dependency from scratch, ignoring the dates on # files. .PHONY: $(TESTS:=.ref) $(TESTS:=.out) $(TESTS:=.diff) diff ref clean veryclean ./asymptote-2.41/tests/output/circle.asy0000644000175000017500000000002213064427076020216 0ustar norbertnorbertdraw(unitcircle); ./asymptote-2.41/tests/gsl/0000755000175000017500000000000013064427076015472 5ustar norbertnorbert./asymptote-2.41/tests/gsl/random.asy0000644000175000017500000002720313064427076017474 0ustar norbertnorbertimport TestLib; import gsl; StartTest("random number generators"); rng_init(); assert(rng_min() == 0); assert(rng_max() == 4294967295); assert(rng_get() == 4293858116); rng_init("taus2"); assert(rng_min() == 0); assert(rng_max() == 4294967295); assert(rng_get() == 802792108); rng_init("gfsr4"); assert(rng_min() == 0); assert(rng_max() == 4294967295); assert(rng_get() == 2901276280); string[] list = rng_list(); for(string name: list) { rng_init(name); rng_min(); rng_max(); rng_get(); } assert(list.length >= 62); rng_init(); rng_set(1); assert(rng_get() == 1791095845); rng_set(1); assert(rng_get() == 1791095845); EndTest(); StartTest("Bernoulli distribution"); assert(close(pdf_bernoulli(0,0.3), 0.7)); assert(close(pdf_bernoulli(1,0.3), 0.3)); //rng_init(); //assert(rng_bernoulli(0.3) == 0); EndTest(); StartTest("beta distribution"); assert(close(cdf_beta_P(0.3,5,5), 0.09880866)); assert(close(cdf_beta_Q(0.3,5,5) + cdf_beta_P(0.3,5,5), 1)); assert(close(cdf_beta_Pinv(cdf_beta_P(0.3,5,5),5,5), 0.3)); assert(close(cdf_beta_Qinv(cdf_beta_Q(0.3,5,5),5,5), 0.3)); assert(close(pdf_beta(0.3,5,5), 1.2252303)); //rng_init(); //assert(close(rng_beta(5,5), 0.533021338130471)); EndTest(); StartTest("binomial distribution"); assert(close(cdf_binomial_P(5,0.3,10), 0.9526510126)); assert(close(cdf_binomial_P(5,0.3,10) + cdf_binomial_Q(5,0.3,10), 1)); assert(close(pdf_binomial(5,0.3,10), 0.1029193452)); //rng_init(); //assert(rng_binomial(0.3,10) == 8); EndTest(); StartTest("bivariate Gaussian distribution"); assert(close(pdf_bivariate_gaussian((1,1),(0,2),(4,6),0.5), 0.00675758392382108)); //rng_init(); //pair z = (-0.260388644979556,2.50057001628669); //pair r = rng_bivariate_gaussian((0,2),(4,6),0.5); //assert(close(length(r - z), 0)); EndTest(); StartTest("cauchy distribution"); assert(close(cdf_cauchy_P(1,3), 0.602416382349567)); assert(close(cdf_cauchy_P(1,3) + cdf_cauchy_Q(1,3), 1)); assert(close(cdf_cauchy_Pinv(cdf_cauchy_P(1,3),3), 1)); assert(close(cdf_cauchy_Qinv(cdf_cauchy_Q(1,3),3), 1)); assert(close(pdf_cauchy(1,3), 0.0954929658551372)); //rng_init(); //assert(close(rng_cauchy(3), -0.0024339597467863)); EndTest(); StartTest("chi-squared distribution"); assert(close(cdf_chisq_P(4,6), 0.323323583816936)); assert(close(cdf_chisq_P(4,6) + cdf_chisq_Q(4, 6), 1)); assert(close(cdf_chisq_Pinv(cdf_chisq_P(4,6),6), 4)); assert(close(cdf_chisq_Qinv(cdf_chisq_Q(4,6),6), 4)); assert(close(pdf_chisq(4,6), 0.135335283236613)); //rng_init(); //assert(close(rng_chisq(6), 8.24171826270279)); EndTest(); StartTest("Dirichlet distribution"); real[] alpha = {1,2,3,4}; real[] theta = {0.1,0.2,0.3,0.4}; assert(close(pdf_dirichlet(alpha,theta), 34.83648)); //rng_init(); //real[] z = {0.124480735441317, // 0.191823537067349, // 0.460543885448264, // 0.22315184204307}; //real[] r = rng_dirichlet(alpha); //assert(close(norm(r - z), 0)); EndTest(); StartTest("exponential distribution"); assert(close(cdf_exponential_P(2,3), 0.486582880967408)); assert(close(cdf_exponential_P(2,3) + cdf_exponential_Q(2,3), 1)); assert(close(cdf_exponential_Pinv(cdf_exponential_P(2,3),3), 2)); assert(close(cdf_exponential_Qinv(cdf_exponential_Q(2,3),3), 2)); assert(close(pdf_exponential(2,3), 0.171139039677531)); //rng_init(); //assert(close(rng_exponential(3), 24.7847346491112)); EndTest(); StartTest("exponential power distribution"); assert(close(cdf_exppow_P(2,3,2), 0.82711070692442)); assert(close(cdf_exppow_P(2,3,2) + cdf_exppow_Q(2,3,2), 1)); assert(close(pdf_exppow(2,3,2), 0.120582432109095)); //rng_init(); //assert(close(rng_exppow(3,2), 0.284084267783339)); EndTest(); StartTest("F-distribution"); assert(close(cdf_fdist_P(1,5,4), 0.485657196759213)); assert(close(cdf_fdist_P(1,5,4) + cdf_fdist_Q(1,5,4), 1)); //rng_init(); //assert(close(rng_fdist(5,4), 1.20570928490019)); EndTest(); StartTest("flat (uniform) distribution"); assert(close(cdf_flat_P(2,0,5), 0.4)); assert(close(cdf_flat_P(2,0,5) + cdf_flat_Q(2,0,5), 1)); assert(close(cdf_flat_Pinv(cdf_flat_P(2,0,5),0,5), 2)); assert(close(cdf_flat_Qinv(cdf_flat_Q(2,0,5),0,5), 2)); assert(close(pdf_flat(2,0,5), 0.2)); //rng_init(); //assert(close(rng_flat(0,5), 4.99870874453336)); EndTest(); StartTest("Gamma-distribution"); assert(close(cdf_gamma_P(6,5,1), 0.71494349968337)); assert(close(cdf_gamma_P(6,5,1) + cdf_gamma_Q(6,5,1), 1)); assert(close(cdf_gamma_Pinv(cdf_gamma_P(6,5,1),5,1), 6)); assert(close(cdf_gamma_Qinv(cdf_gamma_Q(6,5,1),5,1), 6)); assert(close(pdf_gamma(6,5,1), 0.133852617539983)); //rng_init(); //assert(close(rng_gamma(5,1), 6.52166444209317)); //assert(close(rng_gamma(5,1,"mt"), 5.71361391461836)); //assert(close(rng_gamma(5,1,"knuth"), 1.53054227085541)); EndTest(); StartTest("Gaussian distribution"); assert(close(cdf_gaussian_P(1,0,1), 0.841344746068543)); assert(close(cdf_gaussian_P(1,0,1) + cdf_gaussian_Q(1,0,1), 1)); assert(close(cdf_gaussian_Pinv(cdf_gaussian_P(1,0,1),0,1), 1)); assert(close(cdf_gaussian_Qinv(cdf_gaussian_Q(1,0,1),0,1), 1)); assert(close(pdf_gaussian(1,0,1), 0.241970724519143)); //rng_init(); //assert(close(rng_gaussian(0,1), 0.133918608118676)); //assert(close(rng_gaussian(1,2,"ziggurat"), 1.90467233084303)); //assert(close(rng_gaussian(1,2,"ratio"), 4.04779517509342)); //assert(close(rng_gaussian(1,2,"polar"), 1.54245166575101)); EndTest(); StartTest("Gaussian tail distribution"); assert(close(pdf_gaussian_tail(2,1,1), 0.34030367841782)); //rng_init(); //assert(close(rng_gaussian_tail(1,1), 1.0528474462339)); EndTest(); StartTest("geometric distribution"); assert(close(cdf_geometric_P(6,0.1), 0.468559)); assert(close(cdf_geometric_P(6,0.1) + cdf_geometric_Q(6,0.1), 1)); assert(close(pdf_geometric(6,0.1), 0.059049)); //rng_init(); //assert(rng_geometric(0.1) == 1); EndTest(); StartTest("Gumbel1 distribution"); assert(close(cdf_gumbel1_P(1,3,8), 0.671462877871127)); assert(close(cdf_gumbel1_P(1,3,8) + cdf_gumbel1_Q(1,3,8), 1)); assert(close(cdf_gumbel1_Pinv(cdf_gumbel1_P(1,3,8),3,8), 1)); assert(close(cdf_gumbel1_Qinv(cdf_gumbel1_Q(1,3,8),3,8), 1)); assert(close(pdf_gumbel1(1,3,8), 0.80232403696926)); //rng_init(); //assert(close(rng_gumbel1(3,8), 3.44696353953564)); EndTest(); StartTest("Gumbel2 distribution"); assert(close(cdf_gumbel2_P(2,2,3), 0.472366552741015)); assert(close(cdf_gumbel2_P(2,2,3) + cdf_gumbel2_Q(2,2,3), 1)); assert(close(cdf_gumbel2_Pinv(cdf_gumbel2_P(2,2,3),2,3), 2)); assert(close(cdf_gumbel2_Qinv(cdf_gumbel2_Q(2,2,3),2,3), 2)); assert(close(pdf_gumbel2(2,2,3), 0.354274914555761)); //rng_init(); //assert(close(rng_gumbel2(2,3), 107.773379309453)); EndTest(); StartTest("hypergeometric distribution"); assert(close(cdf_hypergeometric_P(4,10,10,8), 0.675041676589664)); assert(close(cdf_hypergeometric_P(4,10,10,8) + cdf_hypergeometric_Q(4,10,10,8), 1)); assert(close(pdf_hypergeometric(4,10,10,8), 0.350083353179329)); //rng_init(); //assert(rng_hypergeometric(10,10,8) == 3); EndTest(); StartTest("Laplace distribution"); assert(close(cdf_laplace_P(1,2), 0.696734670143683)); assert(close(cdf_laplace_P(1,2) + cdf_laplace_Q(1,2), 1)); assert(close(cdf_laplace_Pinv(cdf_laplace_P(1,2),2), 1)); assert(close(cdf_laplace_Qinv(cdf_laplace_Q(1,2),2), 1)); assert(close(pdf_laplace(1,2), 0.151632664928158)); //rng_init(); //assert(close(rng_laplace(2), 0.00103327123971616)); EndTest(); StartTest("Landau distribution"); assert(close(pdf_landau(1), 0.145206637130862)); //rng_init(); //assert(close(rng_landau(), 3880.0374262546)); EndTest(); //StartTest("Levy stable distribution"); //rng_init(); //assert(close(rng_levy(1,1,0), 1232.55941432972)); //assert(close(rng_levy(1,1,1), -0.13781830409645)); //EndTest(); StartTest("logistic distribution"); assert(close(cdf_logistic_P(1,2), 0.622459331201855)); assert(close(cdf_logistic_P(1,2) + cdf_logistic_Q(1,2), 1)); assert(close(cdf_logistic_Pinv(cdf_logistic_P(1,2),2), 1)); assert(close(cdf_logistic_Qinv(cdf_logistic_Q(1,2),2), 1)); assert(close(pdf_logistic(1,2), 0.117501856100797)); //rng_init(); //assert(close(rng_logistic(2), 16.522639863849)); EndTest(); StartTest("lognormal distribution"); assert(close(cdf_lognormal_P(6,2,1), 0.417520581602749)); assert(close(cdf_lognormal_P(6,2,1) + cdf_lognormal_Q(6,2,1), 1)); assert(close(cdf_lognormal_Pinv(cdf_lognormal_P(6,2,1),2,1), 6)); assert(close(cdf_lognormal_Qinv(cdf_lognormal_Q(6,2,1),2,1), 6)); assert(close(pdf_lognormal(6,2,1), 0.0650642483079156)); //rng_init(); //assert(close(rng_lognormal(2,1), 6.92337133931968)); EndTest(); StartTest("multinomial distribution"); real[] p = {0.1,0.2,0.3,0.4}; int[] n = {1,2,3,4}; assert(close(pdf_multinomial(p,n), 0.03483648)); //rng_init(); //int[] r = {5, 0, 1, 4}; //assert(all(rng_multinomial(10,p) == r)); EndTest(); StartTest("negative binomial distribution"); assert(close(cdf_negative_binomial_P(6,0.5,10), 0.227249145507813)); assert(close(cdf_negative_binomial_P(6,0.5,10) + cdf_negative_binomial_Q(6,0.5,10), 1)); assert(close(pdf_negative_binomial(6,0.5,10), 0.076370239257812)); //rng_init(); //assert(rng_negative_binomial(0.5,10) == 15); EndTest(); StartTest("Pareto distribution"); assert(close(cdf_pareto_P(4,2,2), 0.75)); assert(close(cdf_pareto_P(4,2,2) + cdf_pareto_Q(4,2,2), 1)); assert(close(cdf_pareto_Pinv(cdf_pareto_P(4,2,2),2,2), 4)); assert(close(cdf_pareto_Qinv(cdf_pareto_Q(4,2,2),2,2), 4)); assert(close(pdf_pareto(4,2,2), 0.125)); //rng_init(); //assert(close(rng_pareto(2,2), 2.00025830112432)); EndTest(); StartTest("Poisson distribution"); assert(close(cdf_poisson_P(5,6), 0.445679641364611)); assert(close(cdf_poisson_P(5,6) + cdf_poisson_Q(5,6), 1)); assert(close(pdf_poisson(5,6), 0.16062314104798)); //rng_init(); //assert(rng_poisson(6) == 8); EndTest(); StartTest("Rayleigh distribution"); assert(close(cdf_rayleigh_P(3,2), 0.67534753264165)); assert(close(cdf_rayleigh_P(3,2) + cdf_rayleigh_Q(3,2), 1)); assert(close(cdf_rayleigh_Pinv(cdf_rayleigh_P(3,2),2), 3)); assert(close(cdf_rayleigh_Qinv(cdf_rayleigh_Q(3,2),2), 3)); assert(close(pdf_rayleigh(3,2), 0.243489350518762)); //rng_init(); //assert(close(rng_rayleigh(2), 0.0454563039310455)); EndTest(); StartTest("Rayleigh tail distribution"); assert(close(pdf_rayleigh_tail(5,4,1), 0.0555449826912115)); //rng_init(); //assert(close(rng_rayleigh_tail(4,1), 4.0000645705903)); EndTest(); //StartTest("spherical distributions"); //rng_init(); //pair z = (-0.617745613497854,-0.786377998804748); //pair r = rng_dir2d(); //assert(close(length(r - z), 0)); //pair z = (0.993748310886084,0.111643605329884); //pair r = rng_dir2d("neumann"); //assert(close(length(r - z), 0)); //pair z = (0.964519203132591,-0.264012701945327); //pair r = rng_dir2d("trig"); //assert(close(length(r - z), 0)); //triple z = (0.849028025629996,0.139162687752509,-0.509691237939527); //triple r = rng_dir3d(); //assert(close(length(r - z), 0)); //real[] z = {0.420990368676528, // -0.626782975357296, // 0.0441585572224004, // -0.0458388920727644, // -0.652578753164271}; //real[] r = rng_dir(5); //assert(close(norm(r - z), 0)); //EndTest(); StartTest("t-distribution"); assert(close(cdf_tdist_P(0.6,2), 0.695283366471236)); assert(close(cdf_tdist_P(0.6,2) + cdf_tdist_Q(0.6,2), 1)); assert(close(cdf_tdist_Pinv(cdf_tdist_P(0.6,2),2), 0.6)); assert(close(cdf_tdist_Qinv(cdf_tdist_Q(0.6,2),2), 0.6)); assert(close(pdf_tdist(0.6,2), 0.275823963942424)); //rng_init(); //assert(close(rng_tdist(2), 0.127201714006725)); EndTest(); StartTest("Weibull distribution"); assert(close(cdf_weibull_P(1,2,2), 0.221199216928595)); assert(close(cdf_weibull_P(1,2,2) + cdf_weibull_Q(1,2,2), 1)); assert(close(cdf_weibull_Pinv(cdf_weibull_P(1,2,2),2,2), 1)); assert(close(cdf_weibull_Qinv(cdf_weibull_Q(1,2,2),2,2), 1)); assert(close(pdf_weibull(1,2,2), 0.389400391535702)); //rng_init(); //assert(close(rng_weibull(2,2), 0.032142460757319)); EndTest(); ./asymptote-2.41/tests/frames/0000755000175000017500000000000013064427076016162 5ustar norbertnorbert./asymptote-2.41/tests/frames/stat2.asy0000644000175000017500000000031213064427076017731 0ustar norbertnorbertimport TestLib; StartTest("stat2"); struct T { int x; static void f(T t) { static void g(T t) { t.x=2; } g(t); } } T t=new T; assert(t.x==0); T.f(t); assert(t.x==2); EndTest(); ./asymptote-2.41/tests/frames/loop.asy0000644000175000017500000000425613064427076017660 0ustar norbertnorbertimport TestLib; StartTest("loop"); int f(); for (int i=0; i<10; ++i) { int x=i; for (int j=0; j<10; ++j) { int y=j; if (i==5 && j==7) { f = new int () { return x*y; }; } } } assert(f()==35); int f(); for (int i=0; i<10; ++i) { int x=i; for (int j=0; j<10; ++j) { int y=j; if (i==5 && j==7) { f = new int () { return i*y; }; } } } assert(f()==70); { int y = 3; int z = 0; for (int i = 0; i < 7; ++i) { ++z; continue; y = 4; } assert(y == 3); assert(z == 7); } { int y = 3; int z = 0; for (int i = 0; i < 7; ++i) { ++z; break; y = 4; } assert(y == 3); assert(z == 1); } { int y = 3; int z = 0; for (int i = 0; i < 7; ++i) { void g() {} ++z; continue; y = 4; } assert(y == 3); assert(z == 7); } { int y = 3; int z = 0; for (int i = 0; i < 7; ++i) { void g() {} ++z; break; y = 4; } assert(y == 3); assert(z == 1); } // While loops { int y = 7; int z = 0; while (z < 10) { ++z; continue; ++y; } assert(z == 10); assert(y == 7); } { int y = 7; int z = 0; while (z < 10) { void g() {} ++z; continue; ++y; } assert(z == 10); assert(y == 7); } { int y = 7; int z = 0; while (z < 10) { ++z; break; ++y; } assert(z == 1); assert(y == 7); } { int y = 7; int z = 0; while (z < 10) { void g() {} ++z; break; ++y; } assert(z == 1); assert(y == 7); } { int y = 7; int z = 0; while (z < 10) { ++z; continue; ++y; } assert(z == 10); assert(y == 7); } // Do loops { int y = 7; int z = 0; do { void g() {} ++z; continue; ++y; } while (z < 10); assert(z == 10); assert(y == 7); } { int y = 7; int z = 0; do { ++z; break; ++y; } while (z < 10); assert(z == 1); assert(y == 7); } { int y = 7; int z = 0; do { void g() {} ++z; break; ++y; } while (z < 10); assert(z == 1); assert(y == 7); } { int x = 456; do { x = 123; } while (false); assert(x == 123); } { int x = 456; do { void g() {} x = 123; } while (false); assert(x == 123); } EndTest(); ./asymptote-2.41/tests/frames/stat.asy0000644000175000017500000000023613064427076017654 0ustar norbertnorbertimport TestLib; StartTest("stat"); struct T { int x; static void f(T t) { t.x=2; } } T t=new T; assert(t.x==0); T.f(t); assert(t.x==2); EndTest(); ./asymptote-2.41/tests/string/0000755000175000017500000000000013064427076016213 5ustar norbertnorbert./asymptote-2.41/tests/string/rfind.asy0000644000175000017500000000027313064427076020035 0ustar norbertnorbertimport TestLib; StartTest("rfind"); string s = "abcdefab"; assert(rfind(s,"cd") == 2); assert(rfind(s,"cd",1) == -1); assert(rfind(s,"ab") == 6); assert(rfind(s,"ab",5) == 0); EndTest(); ./asymptote-2.41/tests/string/erase.asy0000644000175000017500000000035413064427076020032 0ustar norbertnorbertimport TestLib; StartTest("erase"); string s = "abcdef"; assert(erase(s,2,2) == "abef"); assert(erase(s,-1,2) == "abcdef"); assert(erase(s,7,1) == "abcdef"); assert(erase(s,3,0) == "abcdef"); assert(erase(s,5,2) == "abcde"); EndTest(); ./asymptote-2.41/tests/string/length.asy0000644000175000017500000000020413064427076020206 0ustar norbertnorbertimport TestLib; StartTest("length"); assert(length("") == 0); assert(length("abc") == 3); assert(length("abcdef") == 6); EndTest(); ./asymptote-2.41/tests/string/insert.asy0000644000175000017500000000015513064427076020236 0ustar norbertnorbertimport TestLib; StartTest("insert"); string sub = insert("abef",2,"cd"); assert(sub == "abcdef"); EndTest(); ./asymptote-2.41/tests/string/find.asy0000644000175000017500000000026613064427076017655 0ustar norbertnorbertimport TestLib; StartTest("find"); string s = "abcdefab"; assert(find(s,"cd") == 2); assert(find(s,"cd",3) == -1); assert(find(s,"ab") == 0); assert(find(s,"ab",1) == 6); EndTest(); ./asymptote-2.41/tests/string/substr.asy0000644000175000017500000000016613064427076020256 0ustar norbertnorbertimport TestLib; StartTest("substr"); string s = "abcdef"; string sub = substr(s,2,2); assert(sub == "cd"); EndTest(); ./asymptote-2.41/tests/array/0000755000175000017500000000000013064427076016023 5ustar norbertnorbert./asymptote-2.41/tests/array/fields.asy0000644000175000017500000000360713064427076020015 0ustar norbertnorbertimport TestLib; StartTest("fields"); { int[] z = {1, 2, 3}; assert(z.length == 3); int[] keys = z.keys; assert(keys.length == 3); for (int i; i<3; ++i) assert(keys[i] == i); for (int j = 0; j < 10; ++j) { assert(z.cyclic == false); z.cyclic=true; assert(z.cyclic == true); z.cyclic=false; } } { int[] z = {2, 3, 5}; for (int k = -100; k <= 100; ++k) assert(z.initialized(k) == (k >= 0 && k < 3)); } { int[] z; for (int i=0; i<10; ++i) { for (int k = 0; k <= 100; ++k) { assert(z.length == k); z.push(k*k+3k+1); assert(z.length == k+1); } for (int k = 100; k >= 0; --k) { assert(z.length == k+1); assert(z.pop() == k*k+3k+1); assert(z.length == k); } } z.cyclic=true; for (int i=0; i<10; ++i) { for (int k = 0; k <= 100; ++k) { assert(z.length == k); z.push(k*k+3k+1); assert(z.length == k+1); } for (int k = 100; k >= 0; --k) { assert(z.length == k+1); z.delete(quotient(k,2)); assert(z.length == k); } } } { int[] base={4,5,9,5,0,2,3}; int[] z; for (int i=0; i<9; ++i) { assert(z.length == i*base.length); for (int j : z.keys) assert(z[j] == base[j%base.length]); z.append(base); } } { int[] z = {1,2,3,4,6,7,8,9}; assert(z.length == 8); z.insert(4, 5); assert(z.length == 9); z.insert(0, 0); assert(z.length == 10); for (int i=0; i<10; ++i) assert(z[i] == i); z.insert(7, 100, 101, 102, 103); assert(z.length == 14); // TODO: Test inserting/deleting lengths more seriously. } { // Test extended for. int[] a = {1,4,6,2,7,4,8,9,1,3,-1}; int i = 0; for (int x : a) { assert(x == a[i]); ++i; } assert(i == a.length); } { // Test extended for. int[] a = {1,4,6,2,7,4,8,9,1,3,-1}; int i = 0; for (var x : a) { assert(x == a[i]); ++i; } assert(i == a.length); } EndTest(); ./asymptote-2.41/tests/array/sort.asy0000644000175000017500000000135213064427076017531 0ustar norbertnorbertimport TestLib; import math; string[] a={"bob","alice","pete","alice"}; string[] b={"alice","alice","bob","pete"}; StartTest("sort"); assert(all(sort(a) == b)); EndTest(); StartTest("search"); assert(search(b,"a") == -1); assert(search(b,"bob") == 2); assert(search(b,"z") == b.length-1); EndTest(); StartTest("sort2"); string[][] a={{"bob","9"},{"alice","5"},{"pete","7"},{"alice","4"}}; string[][] b={{"alice","4"},{"alice","5"},{"bob","9"},{"pete","7"}}; assert(sort(a) == b); EndTest(); pair[] a={(2,1),(0,0),(1,1),(1,0)}; pair[] b={(0,0),(1,0),(1,1),(2,1)}; StartTest("lexicographical sort"); assert(all(sort(a,lexorder) == b)); EndTest(); StartTest("lexicographical search"); assert(search(b,(1,0),lexorder) == 1); EndTest(); ./asymptote-2.41/tests/array/transpose.asy0000644000175000017500000000211013064427076020551 0ustar norbertnorbertimport TestLib; import math; StartTest("transpose"); int n=3; real[][] a=new real[n][n]; real[][] b=new real[n][n]; for(int i=0; i < n; ++i) { for(int j=0; j < n; ++j) { a[i][j]=b[j][i]=rand(); } } bool operator == (real[][] a, real[][] b) { int n=a.length; for(int i=0; i < n; ++i) if(!all(a[i] == b[i])) return false; return true; } bool operator == (real[][][] a, real[][][] b) { int n=a.length; for(int i=0; i < n; ++i) { real[][] ai=a[i]; real[][] bi=b[i]; int m=ai.length; for(int j=0; j < m; ++j) { if(!all(ai[j] == bi[j])) return false; } } return true; } assert(a == transpose(b)); int n=3; real[][][] a=new real[n][n][n]; real[][][] b=new real[n][n][n]; real[][][] c=new real[n][n][n]; real[][][] d=new real[n][n][n]; for(int i=0; i < n; ++i) { for(int j=0; j < n; ++j) { for(int k=0; k < n; ++k) { a[i][j][k]=b[j][i][k]=c[i][k][j]=d[k][j][i]=rand(); } } } assert(a == transpose(b,new int[] {1,0,2})); assert(a == transpose(c,new int[] {0,2,1})); assert(a == transpose(d,new int[] {2,1,0})); EndTest(); ./asymptote-2.41/tests/array/array.asy0000644000175000017500000000165013064427076017661 0ustar norbertnorbertimport TestLib; StartTest("array"); { int[] x=array(10, 7); assert(x.length == 10); for (int i=0; i= 0; --i, ++j) assert(point(p, j) == (i,i^2)); EndTest(); ./asymptote-2.41/tests/types/init.asy0000644000175000017500000000034013064427076017527 0ustar norbertnorbertimport TestLib; StartTest("init"); int operator init() { return 7; } int x; assert(x==7); struct A { int x=3; } A a; assert(a!=null); assert(a.x==3); A operator init() { return null; } A aa; assert(aa==null); EndTest(); ./asymptote-2.41/tests/types/cast.asy0000644000175000017500000000023713064427076017523 0ustar norbertnorbertimport TestLib; StartTest("cast"); struct A { public int x; } A operator cast(int x) { A a=new A; a.x=x; return a; } A a=7; assert(a.x==7); EndTest(); ./asymptote-2.41/tests/types/ecast.asy0000644000175000017500000000023313064427076017664 0ustar norbertnorbertimport TestLib; StartTest("ecast"); struct A { public int x; } int operator ecast(A a) { return a.x; } A a=new A; a.x=5; assert((int)a==5); EndTest(); ./asymptote-2.41/env.cc0000644000175000017500000001253113064427076014644 0ustar norbertnorbert/***** * env.cc * Andy Hammerlindl 2002/6/20 * * Keeps track of the namespaces of variables and types when traversing * the abstract syntax. *****/ #include "env.h" #include "record.h" #include "genv.h" #include "builtin.h" using namespace types; namespace trans { // Instances of this class are passed to types::ty objects so that they can call // back to env when checking casting of subtypes. class envCaster : public caster { protoenv &e; symbol name; public: envCaster(protoenv &e, symbol name) : e(e), name(name) {} access *operator() (ty *target, ty *source) { return e.lookupCast(target, source, name); } bool castable(ty *target, ty *source) { return e.castable(target, source, name); } }; access *protoenv::baseLookupCast(ty *target, ty *source, symbol name) { static identAccess id; assert(target->kind != ty_overloaded && source->kind != ty_overloaded); // If errors already exist, don't report more. This may, however, cause // problems with resoving the signature of an overloaded function. The // abstract syntax should check if any of the parameters had an error before // finding the signature. if (target->kind == ty_error || source->kind == ty_error) return &id; else if (equivalent(target,source)) return &id; else { varEntry *v=lookupVarByType(name,new function(target,source)); return v ? v->getLocation() : 0; } } access *protoenv::lookupCast(ty *target, ty *source, symbol name) { access *a=baseLookupCast(target, source, name); if (a) return a; envCaster ec(*this, name); return source->castTo(target, ec); } bool protoenv::castable(ty *target, ty *source, symbol name) { struct castTester : public tester { protoenv &e; symbol name; castTester(protoenv &e, symbol name) : e(e), name(name) {} bool base(ty *t, ty *s) { access *a=e.baseLookupCast(t, s, name); if (a) return true; envCaster ec(e, name); return s->castable(t, ec); } }; castTester ct(*this, name); return ct.test(target,source); } bool protoenv::fastCastable(ty *target, ty *source) { assert(target->kind != types::ty_overloaded); assert(target->kind != types::ty_error); assert(source->kind != types::ty_error); // To avoid memory allocation, fill one static variable with new parameters // in each call. // Warning: This is not re-entrant if asy ever goes multi-threaded. static types::function castFunc(primVoid(), primVoid()); castFunc.result = target; if (source->kind == types::ty_overloaded) { bool result = false; types::ty_vector& v = ((overloaded *)source)->sub; for (size_t i = 0; i < v.size(); ++i) { castFunc.sig.formals[0].t = v[i]; if (lookupVarByType(symbol::castsym, &castFunc)) { result = true; break; } } //assert(result == castable(target, source, symbol::castsym)); //cout << "fc OVERLOADED " << (result ? "CAST" : "FAIL") << endl; return result; } //else cout << "fc SIMPLE" << endl; // Don't test for equivalent, as that is already done by the castScore // code. Assert disabled for speed. #if 0 assert(!equivalent(target, source)); #endif castFunc.sig.formals[0].t = source; if (lookupVarByType(symbol::castsym, &castFunc)) return true; // Test for generic casts of null. This should be moved to a types.h // routine. return source->kind == ty_null && target->isReference(); } access *protoenv::fastLookupCast(ty *target, ty *source) { assert(target->kind != types::ty_overloaded); assert(target->kind != types::ty_error); assert(source->kind != types::ty_overloaded); assert(source->kind != types::ty_error); // Warning: This is not re-entrant. static types::function castFunc(primVoid(), primVoid()); castFunc.result = target; castFunc.sig.formals[0].t = source; varEntry *ve = lookupVarByType(symbol::castsym, &castFunc); if (ve) return ve->getLocation(); // Fall back on slow routine. return lookupCast(target, source, symbol::castsym); } ty *protoenv::castTarget(ty *target, ty *source, symbol name) { struct resolver : public collector { protoenv &e; symbol name; resolver(protoenv &e, symbol name) : e(e), name(name) {} types::ty *base(types::ty *target, types::ty *source) { return e.castable(target, source, name) ? target : 0; } }; resolver r(*this, name); return r.collect(target, source); } ty *protoenv::castSource(ty *target, ty *source, symbol name) { struct resolver : public collector { protoenv &e; symbol name; resolver(protoenv &e, symbol name) : e(e), name(name) {} types::ty *base(types::ty *target, types::ty *source) { return e.castable(target, source, name) ? source : 0; } }; resolver r(*this, name); return r.collect(target, source); } void protoenv::addArrayOps(array *a) { trans::addArrayOps(ve, a); } void protoenv::addRecordOps(record *r) { trans::addRecordOps(ve, r); } void protoenv::addFunctionOps(function *f) { trans::addFunctionOps(ve, f); } env::env(genv &ge) : protoenv(venv::file_env_tag()), ge(ge) { // NOTE: May want to make this initial environment into a "builtin" module, // and then import the builtin module. base_tenv(te); base_venv(ve); } env::~env() { } record *env::getModule(symbol id, string filename) { return ge.getModule(id, filename); } } ./asymptote-2.41/knot.cc0000644000175000017500000005352313064427076015035 0ustar norbertnorbert/***** * knot.cc * Andy Hammerlindl 2005/02/10 * * Describes a knot, a point and its neighbouring specifiers, used as an * intermediate structure in solving paths. *****/ #include "knot.h" #include "util.h" #include "angle.h" #include "settings.h" namespace camp { /***** Debugging *****/ //bool tracing_solving=false; template ostream& info(ostream& o, const char *name, cvector& v) { if (settings::verbose > 3) { o << name << ":\n\n"; for(Int i=0; i < (Int) v.size(); ++i) o << v[i] << endl; o << endl; } return o; } ostream& info(ostream& o, string name, knotlist& l) { if (settings::verbose > 3) { o << name << ":\n\n"; for(Int i=0; i < (Int) l.size(); ++i) o << l[i] << endl; if (l.cyclic()) o << "cyclic" << endl; o << endl; } return o; } #define INFO(x) info(cerr,#x,x) /***** Auxillary computation functions *****/ // Computes the relative distance of a control point given the angles. // The name is somewhat misleading as the velocity (with respect to the // variable that parameterizes the path) is relative to the distance // between the knots and even then, is actually three times this. // The routine is based on the velocity function in Section 131 of the MetaPost // code, but differs in that it automatically accounts for the tension and // bounding with tension atleast. double velocity(double theta, double phi, tension t) { static const double VELOCITY_BOUND = 4.0; static const double a = sqrt(2.0); static const double b = 1.0/16.0; static const double c = 1.5*(sqrt(5.0)-1.0); static const double d = 1.5*(3.0-sqrt(5.0)); double st = sin(theta), ct = cos(theta), sf = sin(phi), cf = cos(phi); double denom = t.val * (3.0 + c*ct + d*cf); double r = denom != 0.0 ? (2.0 + a*(st - b*sf)*(sf - b*st)*(ct-cf)) / denom : VELOCITY_BOUND; //cerr << " velocity(" << theta << "," << phi <<")= " << r << endl; if (r > VELOCITY_BOUND) r = VELOCITY_BOUND; // Apply boundedness condition for tension atleast cases. if (t.atleast) { double sine = sin(theta + phi); if ((st >= 0.0 && sf >= 0.0 && sine > 0.0) || (st <= 0.0 && sf <= 0.0 && sine < 0.0)) { double rmax = sf / sine; if (r > rmax) r = rmax; } } return r; } double niceAngle(pair z) { return z.gety() == 0 ? z.getx() >= 0 ? 0 : PI : angle(z); } // Ensures an angle is in the range between -PI and PI. double reduceAngle(double angle) { return angle > PI ? angle - 2.0*PI : angle < -PI ? angle + 2.0*PI : angle; } bool interesting(tension t) { return t.val!=1.0 || t.atleast==true; } bool interesting(spec *s) { return !s->open(); } ostream& operator<<(ostream& out, const knot& k) { if (interesting(k.tin)) out << k.tin << " "; if (interesting(k.in)) out << *k.in << " "; out << k.z; if (interesting(k.out)) out << " " << *k.out; if (interesting(k.tout)) out << " " << k.tout; return out; } eqn dirSpec::eqnOut(Int j, knotlist& l, cvector&, cvector&) { // When choosing the control points, the path will come out the first knot // going straight to the next knot rotated by the angle theta. // Therefore, the angle theta we want is the difference between the // specified heading given and the heading to the next knot. double theta=reduceAngle(given-niceAngle(l[j+1].z-l[j].z)); // Give a simple linear equation to ensure this theta is picked. return eqn(0.0,1.0,0.0,theta); } eqn dirSpec::eqnIn(Int j, knotlist& l, cvector&, cvector&) { double theta=reduceAngle(given-niceAngle(l[j].z-l[j-1].z)); return eqn(0.0,1.0,0.0,theta); } eqn curlSpec::eqnOut(Int j, knotlist& l, cvector&, cvector& psi) { double alpha=l[j].alpha(); double beta=l[j+1].beta(); double chi=alpha*alpha*gamma/(beta*beta); double C=alpha*chi+3-beta; double D=(3.0-alpha)*chi+beta; return eqn(0.0,C,D,-D*psi[j+1]); } eqn curlSpec::eqnIn(Int j, knotlist& l, cvector&, cvector&) { double alpha=l[j-1].alpha(); double beta=l[j].beta(); double chi=beta*beta*gamma/(alpha*alpha); double A=(3-beta)*chi+alpha; double B=beta*chi+3-alpha; return eqn(A,B,0.0,0.0); } spec *controlSpec::outPartner(pair z) { static curlSpec curl; return cz==z ? (spec *)&curl : (spec *)new dirSpec(z-cz); } spec *controlSpec::inPartner(pair z) { static curlSpec curl; return cz==z ? (spec *)&curl : (spec *)new dirSpec(cz-z); } // Compute the displacement between points. The j-th result is the distance // between knot j and knot j+1. struct dzprop : public knotprop { dzprop(knotlist& l) : knotprop(l) {} pair solo(Int) { return pair(0,0); } pair start(Int j) { return l[j+1].z - l[j].z; } pair mid(Int j) { return l[j+1].z - l[j].z; } pair end(Int) { return pair(0,0); } }; // Compute the distance between points, using the already computed dz. This // doesn't use the infomation in the knots, but the knotprop class is useful as // it takes care of the iteration for us. struct dprop : public knotprop { cvector& dz; dprop(knotlist &l, cvector& dz) : knotprop(l), dz(dz) {} double solo(Int j) { return length(dz[j]); } double start(Int j) { return length(dz[j]); } double mid(Int j) { return length(dz[j]); } double end(Int j) { return length(dz[j]); } }; // Compute the turning angles (psi) between points, using the already computed // dz. struct psiprop : public knotprop { cvector& dz; psiprop(knotlist &l, cvector& dz) : knotprop(l), dz(dz) {} double solo(Int) { return 0; } // We set the starting and ending psi to zero. double start(Int) { return 0; } double end(Int) { return 0; } double mid(Int j) { return niceAngle(dz[j]/dz[j-1]); } }; struct eqnprop : public knotprop { cvector& d; cvector& psi; eqnprop(knotlist &l, cvector& d, cvector& psi) : knotprop(l), d(d), psi(psi) {} eqn solo(Int) { assert(False); return eqn(0.0,1.0,0.0,0.0); } eqn start(Int j) { // Defer to the specifier, as it knows the specifics. return dynamic_cast(l[j].out)->eqnOut(j,l,d,psi); } eqn end(Int j) { return dynamic_cast(l[j].in)->eqnIn(j,l,d,psi); } eqn mid(Int j) { double lastAlpha = l[j-1].alpha(); double thisAlpha = l[j].alpha(); double thisBeta = l[j].beta(); double nextBeta = l[j+1].beta(); // Values based on the linear approximation of the curvature coming // into the knot with respect to theta[j-1] and theta[j]. double inFactor = 1.0/(thisBeta*thisBeta*d[j-1]); double A = lastAlpha*inFactor; double B = (3.0 - lastAlpha)*inFactor; // Values based on the linear approximation of the curvature going out of // the knot with respect to theta[j] and theta[j+1]. double outFactor = 1.0/(thisAlpha*thisAlpha*d[j]); double C = (3.0 - nextBeta)*outFactor; double D = nextBeta*outFactor; return eqn(A,B+C,D,-B*psi[j]-D*psi[j+1]); } }; // If the system of equations is homogeneous (ie. we are solving for x in // Ax=0), there is no need to solve for theta; we can just use zeros for the // thetas. In fact, our general solving method may not work in this case. // A common example of this is // // a{curl 1}..{curl 1}b // // which arises when solving a one-length path a..b or in a larger path a // section a--b. bool homogeneous(cvector& e) { for(cvector::iterator p=e.begin(); p!=e.end(); ++p) if (p->aug != 0) return false; return true; } // Checks whether the equation being solved will be solved as a straight // path from the first point to the second. bool straightSection(cvector& e) { return e.size()==2 && e.front().aug==0 && e.back().aug==0; } struct weqn : public eqn { double w; weqn(double pre, double piv, double post, double aug, double w=0) : eqn(pre,piv,post,aug), w(w) {} friend ostream& operator<< (ostream& out, const weqn we) { return out << (eqn &)we << " + " << we.w << " * theta[0]"; } }; weqn scale(weqn q) { assert(q.pre == 0 && q.piv != 0); return weqn(0,1,q.post/q.piv,q.aug/q.piv,q.w/q.piv); } /* Recalculate the equations in the form: * theta[j] + post * theta[j+1] = aug + w * theta[0] * * Used as the first step in solve cyclic equations. */ cvector recalc(cvector& e) { Int n=(Int) e.size(); cvector we; weqn lasteqn(0,1,0,0,1); we.push_back(lasteqn); // As a placeholder. for (Int j=1; j < n; j++) { // Subtract a factor of the last equation so that the first entry is // zero, then procede to scale it. eqn& q=e[j]; lasteqn=scale(weqn(0,q.piv-q.pre*lasteqn.post,q.post, q.aug-q.pre*lasteqn.aug,-q.pre*lasteqn.w)); we.push_back(lasteqn); } // To keep all of the infomation enocoded in the linear equations, we need // to augment the computation to replace our trivial start weqn with a // real one. To do this, we take one more step in the iteration and // compute the weqn for j=n, since n=0 (mod n). { eqn& q=e[0]; we.front()=scale(weqn(0,q.piv-q.pre*lasteqn.post,q.post, q.aug-q.pre*lasteqn.aug,-q.pre*lasteqn.w)); } return we; } double solveForTheta0(cvector& we) { // Solve for theta[0]=theta[n]. // How we do this is essentially to write out the first equation as: // // theta[n] = aug[0] + w[0]*theta[0] - post[0]*theta[1] // // and then use the next equation to substitute in for theta[1]: // // theta[1] = aug[1] + w[1]*theta[0] - post[1]*theta[2] // // and so on until we have an equation just in terms of theta[0] and // theta[n] (which are the same theta). // // The loop invariant maintained is that after j iterations, we have // theta[n]= a + b*theta[0] + c*theta[j] Int n=(Int) we.size(); double a=0,b=0,c=1; for (Int j=0;j backsubCyclic(cvector& we, double theta0) { Int n=(Int) we.size(); cvector thetas; double lastTheta=theta0; for (Int j=1;j<=n;++j) { weqn& q=we[n-j]; assert(q.pre == 0 && q.piv == 1); double theta=-q.post*lastTheta+q.aug+q.w*theta0; thetas.push_back(theta); lastTheta=theta; } reverse(thetas.begin(),thetas.end()); return thetas; } // For the non-cyclic equations, do row operation to put the matrix into // reduced echelon form, ie. calculates equivalent equations but with pre=0 and // piv=1 for each eqn. struct ref : public knotprop { cvector& e; eqn lasteqn; ref(knotlist& l, cvector& e) : knotprop(l), e(e), lasteqn(0,1,0,0) {} // Scale the equation so that the pivot (diagonal) entry is one, and save // the new equation as lasteqn. eqn scale(eqn q) { assert(q.pre == 0 && q.piv != 0); return lasteqn = eqn(0,1,q.post/q.piv,q.aug/q.piv); } eqn start(Int j) { return scale(e[j]); } eqn mid(Int j) { // Subtract a factor of the last equation so that the first entry is // zero, then procede to scale it. eqn& q=e[j]; return scale(eqn(0,q.piv-q.pre*lasteqn.post,q.post, q.aug-q.pre*lasteqn.aug)); } // The end case is the same as the middle case. }; // Once the matrix is in reduced echelon form, we can solve for the values by // back-substitution. This algorithm works from the bottom-up, so backCompute // must be used to get the answer. struct backsub : public knotprop { cvector& e; double lastTheta; backsub(knotlist& l, cvector& e) : knotprop(l), e(e) {} double end(Int j) { eqn& q=e[j]; assert(q.pre == 0 && q.piv == 1 && q.post == 0); double theta=q.aug; lastTheta=theta; return theta; } double mid(Int j) { eqn& q=e[j]; assert(q.pre == 0 && q.piv == 1); double theta=-q.post*lastTheta+q.aug; lastTheta=theta; return theta; } // start is the same as mid. }; // Once the equations have been determined, solve for the thetas. cvector solveThetas(knotlist& l, cvector& e) { if (homogeneous(e)) // We are solving Ax=0, so a solution is zero for every theta. return cvector(e.size(),0); else if (l.cyclic()) { // The knotprop template is unusually unhelpful in this case, so I // won't use it here. The algorithm breaks into three passes on the // object. The old Asymptote code used a two-pass method, but I // implemented this to stay closer to the MetaPost source code. // This might be something to look at for optimization. cvector we=recalc(e); INFO(we); double theta0=solveForTheta0(we); return backsubCyclic(we, theta0); } else { /* Non-cyclic case. */ /* First do row operations to get it into reduced echelon form. */ cvector el=ref(l,e).compute(); /* Then, do back substitution. */ return backsub(l,el).backCompute(); } } // Once thetas have been solved, determine the first control point of every // join. struct postcontrolprop : public knotprop { cvector& dz; cvector& psi; cvector& theta; postcontrolprop(knotlist& l, cvector& dz, cvector& psi, cvector& theta) : knotprop(l), dz(dz), psi(psi), theta(theta) {} double phi(Int j) { /* The third angle: psi + theta + phi = 0 */ return -psi[j] - theta[j]; } double vel(Int j) { /* Use the standard velocity function. */ return velocity(theta[j],phi(j+1),l[j].tout); } // start is the same as mid. pair mid(Int j) { // Put a control point at the relative distance determined by the velocity, // and at an angle determined by theta. return l[j].z + vel(j)*expi(theta[j])*dz[j]; } // The end postcontrol is the same as the last knot. pair end(Int j) { return l[j].z; } }; // Determine the first control point of every join. struct precontrolprop : public knotprop { cvector& dz; cvector& psi; cvector& theta; precontrolprop(knotlist& l, cvector& dz, cvector& psi, cvector& theta) : knotprop(l), dz(dz), psi(psi), theta(theta) {} double phi(Int j) { return -psi[j] - theta[j]; } double vel(Int j) { return velocity(phi(j),theta[j-1],l[j].tin); } // The start precontrol is the same as the first knot. pair start(Int j) { return l[j].z; } pair mid(Int j) { return l[j].z - vel(j)*expi(-phi(j))*dz[j-1]; } // end is the same as mid. }; // Puts solved controls into a protopath starting at the given index. // By convention, the first knot is not coded, as it is assumed to be coded by // the previous section (or it is the first breakpoint and encoded as a special // case). struct encodeControls : public knoteffect { protopath& p; Int k; cvector& pre; cvector& post; encodeControls(protopath& p, Int k, cvector& pre, knotlist& l, cvector& post) : knoteffect(l), p(p), k(k), pre(pre), post(post) {} void encodePre(Int j) { p.pre(k+j)=pre[j]; } void encodePoint(Int j) { p.point(k+j)=l[j].z; } void encodePost(Int j) { p.post(k+j)=post[j]; } void solo(Int) { #if 0 encodePoint(j); #endif } void start(Int j) { #if 0 encodePoint(j); #endif encodePost(j); } void mid(Int j) { encodePre(j); encodePoint(j); encodePost(j); } void end(Int j) { encodePre(j); encodePoint(j); } }; void encodeStraight(protopath& p, Int k, knotlist& l) { pair a=l.front().z; double at=l.front().tout.val; pair b=l.back().z; double bt=l.back().tin.val; pair step=(b-a)/3.0; if (at==1.0 && bt==1.0) { p.straight(k)=true; p.post(k)=a+step; p.pre(k+1)=b-step; p.point(k+1)=b; } else { p.post(k)=a+step/at; p.pre(k+1)=b-step/bt; p.point(k+1)=b; } } void solveSection(protopath& p, Int k, knotlist& l) { if (l.length()>0) { info(cerr, "solving section", l); // Calculate useful properties. cvector dz = dzprop(l) .compute(); cvector d = dprop(l,dz).compute(); cvector psi = psiprop(l,dz).compute(); INFO(dz); INFO(d); INFO(psi); // Build and solve the linear equations for theta. cvector e = eqnprop(l,d,psi).compute(); INFO(e); if (straightSection(e)) // Handle straight section as special case. encodeStraight(p,k,l); else { cvector theta = solveThetas(l,e); INFO(theta); // Calculate the control points. cvector post = postcontrolprop(l,dz,psi,theta).compute(); cvector pre = precontrolprop(l,dz,psi,theta).compute(); // Encode the results into the protopath. encodeControls(p,k,pre,l,post).exec(); } } } // Find the first breakpoint in the knotlist, ie. where we can start solving a // non-cyclic section. If the knotlist is fully cyclic, then this returns // NOBREAK. // This must be called with a knot that has all of its implicit specifiers in // place. const Int NOBREAK=-1; Int firstBreakpoint(knotlist& l) { for (Int j=0;jopen()) return j; return NOBREAK; } // Once a breakpoint, a, is found, find where the next breakpoint after it is. // This must be called with a knot that has all of its implicit specifiers in // place, so that breakpoint can be identified by either an in or out specifier // that is not open. Int nextBreakpoint(knotlist& l, Int a) { // This is guaranteed to terminate if a is the index of a breakpoint. If the // path is non-cyclic it will stop at or before the last knot which must be a // breakpoint. If the path is cyclic, it will stop at or before looping back // around to a which is a breakpoint. Int j=a+1; while (l[j].in->open()) ++j; return j; } // Write out the controls for section of the form // a.. control b and c ..d void writeControls(protopath& p, Int a, knotlist& l) { // By convention, the first point will already be encoded. p.straight(a)=dynamic_cast(l[a].out)->straight; p.post(a)=dynamic_cast(l[a].out)->cz; p.pre(a+1)=dynamic_cast(l[a+1].in)->cz; p.point(a+1)=l[a+1].z; } // Solves a path that has all of its specifiers laid out explicitly. path solveSpecified(knotlist& l) { protopath p(l.size(),l.cyclic()); Int first=firstBreakpoint(l); if (first==NOBREAK) /* We are solving a fully cyclic path, so do it in one swoop. */ solveSection(p,0,l); else { // Encode the first point. p.point(first)=l[first].z; // If the path is cyclic, we should stop where we started (modulo the // length of the path); otherwise, just stop at the end. Int last=l.cyclic() ? first+l.length() : l.length(); Int a=first; while (a!=last) { if (l[a].out->controlled()) { assert(l[a+1].in->controlled()); // Controls are already picked, just write them out. writeControls(p,a,l); ++a; } else { // Find the section a to b and solve it, putting the result (starting // from index a into our protopath. Int b=nextBreakpoint(l,a); subknotlist section(l,a,b); solveSection(p,a,section); a=b; } } // For a non-cyclic path, the end control points need to be set. p.controlEnds(); } return p.fix(); } /* If a knot is open on one side and restricted on the other, this replaces the * open side with a restriction determined by the restriction on the other * side. After this, any knot will either have two open specs or two * restrictions. */ struct partnerUp : public knoteffect { partnerUp(knotlist& l) : knoteffect(l) {} void mid(Int j) { knot& k=l[j]; if (k.in->open() && !k.out->open()) k.in=k.out->inPartner(k.z); else if (!k.in->open() && k.out->open()) k.out=k.in->outPartner(k.z); } }; /* Ensures a non-cyclic path has direction specifiers at the ends, adding curls * if there are none. */ void curlEnds(knotlist& l) { static curlSpec endSpec; if (!l.cyclic()) { if (l.front().in->open()) l.front().in=&endSpec; if (l.back().out->open()) l.back().out=&endSpec; } } /* If a point occurs twice in a row in a knotlist, write in controls * between the two knots at that point (unless it already has controls). */ struct controlDuplicates : public knoteffect { controlDuplicates(knotlist& l) : knoteffect(l) {} void solo(Int) { /* One point ==> no duplicates */ } // start is the same as mid. void mid(Int j) { knot &k1=l[j]; knot &k2=l[j+1]; if (!k1.out->controlled() && k1.z==k2.z) { k1.out=k2.in=new controlSpec(k1.z,true); } } void end(Int) { /* No next point to compare with. */ } }; path solve(knotlist& l) { if (l.empty()) return path(); else { info(cerr, "input knotlist", l); curlEnds(l); controlDuplicates(l).exec(); partnerUp(l).exec(); info(cerr, "specified knotlist", l); return solveSpecified(l); } } // Code for Testing #if 0 path solveSimple(cvector& z) { // The two specifiers used: an open spec and a curl spec for the ends. spec open; // curlSpec curl; // curlSpec curly(2.0); // dirSpec E(0); // dirSpec N(PI/2.0); controlSpec here(pair(150,150)); // Encode the knots as open in the knotlist. cvector nodes; for (cvector::iterator p=z.begin(); p!=z.end(); ++p) { knot k; k.z=*p; k.in=k.out=&open; nodes.push_back(k); } // Substitute in a curl spec for the ends. //nodes.front().out=nodes.back().in=&curl; // Test direction specifiers. //nodes.front().tout=2; //nodes.front().out=nodes.back().in=&curly; //nodes[0].out=nodes[0].in=&E; nodes[1].out=nodes[2].in=&here; simpleknotlist l(nodes,false); return solve(l); } #endif } // namespace camp ./asymptote-2.41/exp.h0000644000175000017500000007021113064427076014511 0ustar norbertnorbert/***** * exp.h * Andy Hammerlindl 2002/8/19 * * Represents the abstract syntax tree for the expressions in the * language. this is translated into virtual machine code using trans() * and with the aid of the environment class. *****/ #ifndef EXP_H #define EXP_H #include "types.h" #include "symbol.h" #include "absyn.h" #include "varinit.h" #include "name.h" #include "guideflags.h" namespace trans { class coenv; class coder; struct label_t; typedef label_t *label; class application; } namespace absyntax { using trans::coenv; using trans::label; using trans::application; using trans::access; using sym::symbol; using types::record; using types::array; class exp : public varinit { protected: // The cached type (from a call to cgetType). types::ty *ct; public: exp(position pos) : varinit(pos), ct(0) {} void prettyprint(ostream &out, Int indent) = 0; // When reporting errors with function calls, it is nice to say "no // function f(int)" instead of "no function matching signature // (int)." Hence, this method returns the name of the expression if // there is one. virtual symbol getName() { return symbol::nullsym; } // Checks if the expression can be used as the right side of a scale // expression. ie. 3sin(x) // If a "non-scalable" expression is scaled a warning is issued. virtual bool scalable() { return true; } // Specifies if the value of the expression should be written to interactive // prompt if typed as a stand-alone expression. For example: // > 2+3; // should write 5, but // > x=2+3; // shouldn't. (These choices are largely aesthetic) virtual bool writtenToPrompt() { return true; } // Translates the expression to the given target type. This should only be // called with a type returned by getType(). It does not perform implicit // casting. virtual void transAsType(coenv &e, types::ty *target); // Translates the expression to the given target type, possibly using an // implicit cast. void transToType(coenv &e, types::ty *target); // Translates the expression and returns the resultant type. // For some expressions, this will be ambiguous and return an error. // Trans may only return ty_error, if it (or one of its recursively // called children in the syntax tree) reported an error to em. virtual types::ty *trans(coenv &) = 0; // getType() figures out the type of the expression without translating // the code into the virtual machine language or reporting errors to em. // This must follow a few rules to ensure proper translation: // 1. If this returns a valid type, t, trans(e) must return t or // report an error, and transToType(e, t) must run either reporting // an error or reporting no error and yielding the same result as // trans(e). // 2. If this returns a superposition of types (ie. for overloaded // functions), trans must not return a singular type, and every // type in the superposition must run without error properly // if fed to transAsType(e, t). // 3. If this returns ty_error, then so must a call to trans(e) and any // call to trans, transAsType, or transToType must report an error // to em. // 4. Any call to transAsType(e, t) with a type that is not returned by // getType() (or one of the subtypes in case of a superposition) // must report an error. // Any call to transToType(e, t) with a type that is not returned by // getType() (or one of the subtypes in case of a superposition) // or any type not implicitly castable from the above must report an // error. virtual types::ty *getType(coenv &) = 0; // This is an optimization which works in some cases to by-pass the slow // overloaded function resolution provided by the application class. // // If an expression is called with arguments given by sig, getCallee must // either return 0 (the default), or if it returns a varEntry, the varEntry // must correspond to the function which would be called after normal // function resolution. // // The callee must produce no side effects as there are no guarantees when // the varEntry will be translated. virtual trans::varEntry *getCallee(coenv &e, types::signature *sig) { //#define DEBUG_GETAPP #if DEBUG_GETAPP cout << "exp fail" << endl; cout << "exp fail at " << getPos() << endl; prettyprint(cout, 2); #endif return 0; } // Same result as getType, but caches the result so that subsequent // calls are faster. For this to work correctly, the expression should // only be used in one place, so the environment doesn't change between // calls. virtual types::ty *cgetType(coenv &e) { #ifdef DEBUG_CACHE testCachedType(e); #endif return ct ? ct : ct = getType(e); } void testCachedType(coenv &e); // The expression is being written. Translate code such that the value // (represented by the exp value) is stored into the address represented by // this expression. // In terms of side-effects, this expression must be evaluated (once) before // value is evaluated (once). virtual void transWrite(coenv &e, types::ty *t, exp *value) { em.error(getPos()); em << "expression cannot be used as an address"; // Translate the value for errors. value->transToType(e, t); } // Translates code for calling a function. The arguments, in the order they // appear in the function's signature, must all be on the stack. virtual void transCall(coenv &e, types::ty *target); // transConditionalJump must produce code equivalent to the following: // Evaluate the expression as a boolean. If the result equals cond, jump to // the label dest, otherwise do not jump. In either case, no value is left // on the stack. virtual void transConditionalJump(coenv &e, bool cond, label dest); // This is used to ensure the proper order and number of evaluations. When // called, it immediately translates code to perform the side-effects // consistent with a corresponding call to transAsType(e, target). // // The return value, called an evaluation for lack of a better name, is // another expression that responds to the trans methods exactly as would the // original expression, but without producing side-effects. It is also no // longer overloaded, due to the resolution effected by giving a target type // to evaluate(). // // The methods transAsType, transWrite, and transCall of the evaluation must // be called with the same target type as the original call to evaluate. // When evaluate() is called during the translation of a function, that // function must still be in translation when the evaluation is translated. // // The base implementation uses a tempExp (see below). This is // sufficient for most expressions. virtual exp *evaluate(coenv &e, types::ty *target); // NOTE: could add a "side-effects" method which says if the expression has // side-effects. This might allow some small optimizations in translating. }; class tempExp : public exp { access *a; types::ty *t; public: tempExp(coenv &e, varinit *v, types::ty *t); void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return t; } }; // Wrap a varEntry so that it can be used as an expression. // Translating the varEntry must cause no side-effects. class varEntryExp : public exp { trans::varEntry *v; public: varEntryExp(position pos, trans::varEntry *v) : exp(pos), v(v) {} varEntryExp(position pos, types::ty *t, access *a); varEntryExp(position pos, types::ty *t, vm::bltin f); void prettyprint(ostream &out, Int indent); types::ty *getType(coenv &); types::ty *trans(coenv &e); trans::varEntry *getCallee(coenv &e, types::signature *sig); void transAct(action act, coenv &e, types::ty *target); void transAsType(coenv &e, types::ty *target); void transWrite(coenv &e, types::ty *t, exp *value); void transCall(coenv &e, types::ty *target); }; class nameExp : public exp { name *value; public: nameExp(position pos, name *value) : exp(pos), value(value) {} nameExp(position pos, symbol id) : exp(pos), value(new simpleName(pos, id)) {} nameExp(position pos, string s) : exp(pos), value(new simpleName(pos, symbol::trans(s))) {} void prettyprint(ostream &out, Int indent); symbol getName() { return value->getName(); } void transAsType(coenv &e, types::ty *target) { value->varTrans(trans::READ, e, target); // After translation, the cached type is no longer needed and should be // garbage collected. This could presumably be done in every class derived // from exp, but here it is most important as nameExp can have heavily // overloaded types cached. ct=0; } types::ty *trans(coenv &e) { types::ty *t=cgetType(e); if (t->kind == types::ty_error) { em.error(getPos()); em << "no matching variable \'" << *value << "\'"; return types::primError(); } if (t->kind == types::ty_overloaded) { em.error(getPos()); em << "use of variable \'" << *value << "\' is ambiguous"; return types::primError(); } else { transAsType(e, t); return t; } } types::ty *getType(coenv &e) { types::ty *t=value->varGetType(e); return t ? t : types::primError(); } trans::varEntry *getCallee(coenv &e, types::signature *sig) { #ifdef DEBUG_GETAPP cout << "nameExp" << endl; #endif return value->getCallee(e, sig); } void transWrite(coenv &e, types::ty *target, exp *newValue) { newValue->transToType(e, target); this->value->varTrans(trans::WRITE, e, target); ct=0; // See note in transAsType. } void transCall(coenv &e, types::ty *target) { value->varTrans(trans::CALL, e, target); ct=0; // See note in transAsType. } exp *evaluate(coenv &, types::ty *) { // Names have no side-effects. return this; } }; // Most fields accessed are handled as parts of qualified names, but in cases // like f().x or (new t).x, a separate expression is needed. class fieldExp : public nameExp { exp *object; symbol field; // fieldExp has a lot of common functionality with qualifiedName, so we // essentially hack qualifiedName, by making our object expression look // like a name. class pseudoName : public name { exp *object; public: pseudoName(exp *object) : name(object->getPos()), object(object) {} // As a variable: void varTrans(trans::action act, coenv &e, types::ty *target) { assert(act == trans::READ); object->transToType(e, target); } types::ty *varGetType(coenv &e) { return object->getType(e); } trans::varEntry *getCallee(coenv &, types::signature *) { #ifdef DEBUG_GETAPP cout << "pseudoName" << endl; #endif return 0; } // As a type: types::ty *typeTrans(coenv &, bool tacit = false) { if (!tacit) { em.error(getPos()); em << "expression is not a type"; } return types::primError(); } trans::varEntry *getVarEntry(coenv &) { em.compiler(getPos()); em << "expression cannot be used as part of a type"; return 0; } trans::tyEntry *tyEntryTrans(coenv &) { em.compiler(getPos()); em << "expression cannot be used as part of a type"; return 0; } trans::frame *tyFrameTrans(coenv &) { return 0; } void prettyprint(ostream &out, Int indent); void print(ostream& out) const { out << ""; } symbol getName() { return object->getName(); } }; // Try to get this into qualifiedName somehow. types::ty *getObject(coenv &e); public: fieldExp(position pos, exp *object, symbol field) : nameExp(pos, new qualifiedName(pos, new pseudoName(object), field)), object(object), field(field) {} void prettyprint(ostream &out, Int indent); symbol getName() { return field; } exp *evaluate(coenv &e, types::ty *) { // Evaluate the object. return new fieldExp(getPos(), new tempExp(e, object, getObject(e)), field); } }; class arrayExp : public exp { protected: exp *set; array *getArrayType(coenv &e); array *transArray(coenv &e); public: arrayExp(position pos, exp *set) : exp(pos), set(set) {} }; class subscriptExp : public arrayExp { exp *index; public: subscriptExp(position pos, exp *set, exp *index) : arrayExp(pos, set), index(index) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &e); void transWrite(coenv &e, types::ty *t, exp *value); exp *evaluate(coenv &e, types::ty *) { return new subscriptExp(getPos(), new tempExp(e, set, getArrayType(e)), new tempExp(e, index, types::primInt())); } }; class slice : public absyn { exp *left; exp *right; public: slice(position pos, exp *left, exp *right) : absyn(pos), left(left), right(right) {} void prettyprint(ostream &out, Int indent); exp *getLeft() { return left; } exp *getRight() { return right; } // Translates code to put the left and right expressions on the stack (in that // order). If left is omitted, zero is pushed on the stack in it's place. If // right is omitted, nothing is pushed in its place. void trans(coenv &e); slice *evaluate(coenv &e) { return new slice(getPos(), left ? new tempExp(e, left, types::primInt()) : 0, right ? new tempExp(e, right, types::primInt()) : 0); } }; class sliceExp : public arrayExp { slice *index; public: sliceExp(position pos, exp *set, slice *index) : arrayExp(pos, set), index(index) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &e); void transWrite(coenv &e, types::ty *t, exp *value); exp *evaluate(coenv &e, types::ty *) { return new sliceExp(getPos(), new tempExp(e, set, getArrayType(e)), index->evaluate(e)); } }; // The expression "this," that evaluates to the lexically enclosing record. class thisExp : public exp { public: thisExp(position pos) : exp(pos) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &e); exp *evaluate(coenv &, types::ty *) { // this has no side-effects return this; } }; class literalExp : public exp { public: literalExp(position pos) : exp(pos) {} bool scalable() { return false; } exp *evaluate(coenv &, types::ty *) { // Literals are constant, they have no side-effects. return this; } }; class intExp : public literalExp { Int value; public: intExp(position pos, Int value) : literalExp(pos), value(value) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primInt(); } }; class realExp : public literalExp { protected: double value; public: realExp(position pos, double value) : literalExp(pos), value(value) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primReal(); } }; class stringExp : public literalExp { string str; public: stringExp(position pos, string str) : literalExp(pos), str(str) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primString(); } const string& getString() { return str; } }; class booleanExp : public literalExp { bool value; public: booleanExp(position pos, bool value) : literalExp(pos), value(value) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primBoolean(); } }; class cycleExp : public literalExp { public: cycleExp(position pos) : literalExp(pos) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primCycleToken(); } }; class newPictureExp : public literalExp { public: newPictureExp(position pos) : literalExp(pos) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primPicture(); } }; class nullPathExp : public literalExp { public: nullPathExp(position pos) : literalExp(pos) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primPath(); } }; class nullExp : public literalExp { public: nullExp(position pos) : literalExp(pos) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primNull(); } }; class quoteExp : public exp { runnable *value; public: quoteExp(position pos, runnable *value) : exp(pos), value(value) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primCode(); } }; // A list of expressions used in a function call. class explist : public absyn { typedef mem::vector expvector; expvector exps; public: explist(position pos) : absyn(pos) {} virtual ~explist() {} virtual void add(exp *e) { exps.push_back(e); } virtual void prettyprint(ostream &out, Int indent); virtual size_t size() { return exps.size(); } virtual exp * operator[] (size_t index) { return exps[index]; } }; struct argument { exp *val; symbol name; // No constructor due to the union in camp.y #if 0 argument(exp *val=0, symbol name=0) : val(val), name(name) {} #endif void prettyprint(ostream &out, Int indent); }; class arglist : public gc { public: typedef mem::vector argvector; argvector args; argument rest; // As the language allows named arguments after rest arguments, store the // index of the rest argument in order to ensure proper left-to-right // execution. static const size_t DUMMY_REST_POSITION = 9999; size_t restPosition; arglist() : args(), rest(), restPosition(DUMMY_REST_POSITION) {} virtual ~arglist() {} virtual void addFront(argument a) { args.insert(args.begin(), a); } virtual void addFront(exp *val, symbol name=symbol::nullsym) { argument a; a.val=val; a.name=name; addFront(a); } virtual void add(argument a) { if (rest.val && !a.name) { em.error(a.val->getPos()); em << "unnamed argument after rest argument"; return; } args.push_back(a); } virtual void add(exp *val, symbol name=symbol::nullsym) { argument a; a.val=val; a.name=name; add(a); } virtual void addRest(argument a) { if (rest.val) { em.error(a.val->getPos()); em << "additional rest argument"; return; } rest = a; assert(restPosition == DUMMY_REST_POSITION); restPosition = size(); } virtual void prettyprint(ostream &out, Int indent); virtual size_t size() { return args.size(); } virtual argument& operator[] (size_t index) { return args[index]; } virtual argument& getRest() { return rest; } }; // callExp has a global cache of resolved overloaded functions. This clears // this cache so the associated data can be garbage collected. void clearCachedCalls(); class callExp : public exp { protected: exp *callee; arglist *args; private: // Per object caching - Cache the application when it's determined. application *cachedApp; // In special cases, no application object is needed and we can store the // varEntry used in advance. trans::varEntry *cachedVarEntry; types::signature *argTypes(coenv& e, bool *searchable); void reportArgErrors(coenv &e); application *resolve(coenv &e, types::overloaded *o, types::signature *source, bool tacit); application *resolveWithCache(coenv &e, types::overloaded *o, types::signature *source, bool tacit); void reportMismatch(types::function *ft, types::signature *source); void reportNonFunction(); // Caches either the application object used to apply the function to the // arguments, or in cases where the arguments match the function perfectly, // the varEntry of the callee (or neither in case of an error). Returns // what getType should return. types::ty *cacheAppOrVarEntry(coenv &e, bool tacit); types::ty *transPerfectMatch(coenv &e); public: callExp(position pos, exp *callee, arglist *args) : exp(pos), callee(callee), args(args), cachedApp(0), cachedVarEntry(0) { assert(args); } callExp(position pos, exp *callee) : exp(pos), callee(callee), args(new arglist()), cachedApp(0), cachedVarEntry(0) {} callExp(position pos, exp *callee, exp *arg1) : exp(pos), callee(callee), args(new arglist()), cachedApp(0), cachedVarEntry(0) { args->add(arg1); } callExp(position pos, exp *callee, exp *arg1, exp *arg2) : exp(pos), callee(callee), args(new arglist()), cachedApp(0), cachedVarEntry(0) { args->add(arg1); args->add(arg2); } callExp(position pos, exp *callee, exp *arg1, exp *arg2, exp *arg3) : exp(pos), callee(callee), args(new arglist()), cachedApp(0), cachedVarEntry(0) { args->add(arg1); args->add(arg2); args->add(arg3); } void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &e); // Returns true if the function call resolves uniquely without error. Used // in implementing the special == and != operators for functions. virtual bool resolved(coenv &e); }; class pairExp : public exp { exp *x; exp *y; public: pairExp(position pos, exp *x, exp *y) : exp(pos), x(x), y(y) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primPair(); } }; class tripleExp : public exp { exp *x; exp *y; exp *z; public: tripleExp(position pos, exp *x, exp *y, exp *z) : exp(pos), x(x), y(y), z(z) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primTriple(); } }; class transformExp : public exp { exp *x; exp *y; exp *xx,*xy,*yx,*yy; public: transformExp(position pos, exp *x, exp *y, exp *xx, exp *xy, exp *yx, exp *yy) : exp(pos), x(x), y(y), xx(xx), xy(xy), yx(yx), yy(yy) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primTransform(); } }; class castExp : public exp { ty *target; exp *castee; types::ty *tryCast(coenv &e, types::ty *t, types::ty *s, symbol csym); public: castExp(position pos, ty *target, exp *castee) : exp(pos), target(target), castee(castee) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &e); }; class nullaryExp : public callExp { public: nullaryExp(position pos, symbol op) : callExp(pos, new nameExp(pos, op)) {} }; class unaryExp : public callExp { public: unaryExp(position pos, exp *base, symbol op) : callExp(pos, new nameExp(pos, op), base) {} }; class binaryExp : public callExp { public: binaryExp(position pos, exp *left, symbol op, exp *right) : callExp(pos, new nameExp(pos, op), left, right) {} }; class equalityExp : public callExp { public: equalityExp(position pos, exp *left, symbol op, exp *right) : callExp(pos, new nameExp(pos, op), left, right) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &e); }; // Scaling expressions such as 3sin(x). class scaleExp : public binaryExp { exp *getLeft() { return (*this->args)[0].val; } exp *getRight() { return (*this->args)[1].val; } public: scaleExp(position pos, exp *left, exp *right) : binaryExp(pos, left, symbol::trans("*"), right) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); //types::ty *getType(coenv &e); bool scalable() { return false; } }; // Used for tension, which takes two real values, and a boolean to denote if it // is a tension atleast case. class ternaryExp : public callExp { public: ternaryExp(position pos, exp *left, symbol op, exp *right, exp *last) : callExp(pos, new nameExp(pos, op), left, right, last) {} }; // The a ? b : c ternary operator. class conditionalExp : public exp { exp *test; exp *onTrue; exp *onFalse; public: conditionalExp(position pos, exp *test, exp *onTrue, exp *onFalse) : exp(pos), test(test), onTrue(onTrue), onFalse(onFalse) {} void prettyprint(ostream &out, Int indent); void baseTransToType(coenv &e, types::ty *target); void transToType(coenv &e, types::ty *target); types::ty *trans(coenv &e); types::ty *getType(coenv &e); }; class andOrExp : public exp { protected: exp *left; symbol op; exp *right; public: andOrExp(position pos, exp *left, symbol op, exp *right) : exp(pos), left(left), op(op), right(right) {} virtual types::ty *trans(coenv &e) = 0; virtual types::ty *getType(coenv &) { return types::primBoolean(); } }; class orExp : public andOrExp { public: orExp(position pos, exp *left, symbol op, exp *right) : andOrExp(pos, left, op, right) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); void transConditionalJump(coenv &e, bool cond, label dest); }; class andExp : public andOrExp { public: andExp(position pos, exp *left, symbol op, exp *right) : andOrExp(pos, left, op, right) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); void transConditionalJump(coenv &e, bool cond, label dest); }; class joinExp : public callExp { public: joinExp(position pos, symbol op) : callExp(pos, new nameExp(pos, op)) {} void pushFront(exp *e) { args->addFront(e); } void pushBack(exp *e) { args->add(e); } void prettyprint(ostream &out, Int indent); }; class specExp : public exp { symbol op; exp *arg; camp::side s; public: specExp(position pos, symbol op, exp *arg, camp::side s=camp::OUT) : exp(pos), op(op), arg(arg), s(s) {} void setSide(camp::side ss) { s=ss; } void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &e); }; class assignExp : public exp { protected: exp *dest; exp *value; // This is basically a hook to facilitate selfExp. dest is given as an // argument since it will be a temporary in translation in order to avoid // multiple evaluation. virtual exp *ultimateValue(exp *) { return value; } public: assignExp(position pos, exp *dest, exp *value) : exp(pos), dest(dest), value(value) {} void prettyprint(ostream &out, Int indent); // Don't write the result of an assignment to the prompt. bool writtenToPrompt() { return false; } void transAsType(coenv &e, types::ty *target); types::ty *trans(coenv &e); types::ty *getType(coenv &e); }; class selfExp : public assignExp { symbol op; exp *ultimateValue(exp *dest) { return new binaryExp(getPos(), dest, op, value); } public: selfExp(position pos, exp *dest, symbol op, exp *value) : assignExp(pos, dest, value), op(op) {} void prettyprint(ostream &out, Int indent); void transAsType(coenv &e, types::ty *target); }; class prefixExp : public exp { exp *dest; symbol op; public: prefixExp(position pos, exp *dest, symbol op) : exp(pos), dest(dest), op(op) {} void prettyprint(ostream &out, Int indent); bool scalable() { return false; } // Don't write the result to the prompt. bool writtenToPrompt() { return false; } types::ty *trans(coenv &e); types::ty *getType(coenv &e); }; // Postfix expresions are illegal. This is caught here as we can give a // more meaningful error message to the user, rather than a "parse // error." class postfixExp : public exp { exp *dest; symbol op; public: postfixExp(position pos, exp *dest, symbol op) : exp(pos), dest(dest), op(op) {} void prettyprint(ostream &out, Int indent); types::ty *trans(coenv &e); types::ty *getType(coenv &) { return types::primError(); } }; } // namespace absyntax #endif ./asymptote-2.41/runpair.symbols.h0000644000175000017500000000216313064427143017060 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(Cos); ADDSYMBOL(Degrees); ADDSYMBOL(Sin); ADDSYMBOL(Tan); ADDSYMBOL(a); ADDSYMBOL(aCos); ADDSYMBOL(aSin); ADDSYMBOL(aTan); ADDSYMBOL(abs); ADDSYMBOL(angle); ADDSYMBOL(b); ADDSYMBOL(bezier); ADDSYMBOL(bezierP); ADDSYMBOL(bezierPP); ADDSYMBOL(bezierPPP); ADDSYMBOL(c); ADDSYMBOL(conj); ADDSYMBOL(cos); ADDSYMBOL(cross); ADDSYMBOL(d); ADDSYMBOL(deg); ADDSYMBOL(degrees); ADDSYMBOL(dir); ADDSYMBOL(dot); ADDSYMBOL(exp); ADDSYMBOL(expi); ADDSYMBOL(gamma); ADDSYMBOL(length); ADDSYMBOL(log); ADDSYMBOL(radians); ADDSYMBOL(realmult); ADDSYMBOL(sin); ADDSYMBOL(sqrt); ADDSYMBOL(t); ADDSYMBOL(unit); ADDSYMBOL(w); ADDSYMBOL(warn); ADDSYMBOL(x); ADDSYMBOL(xpart); ADDSYMBOL(ypart); ADDSYMBOL(z); ./asymptote-2.41/asy.ico0000644000175000017500000001027613064427076015041 0ustar norbertnorbert  ¨( @ ÿEÿoÿ3ÿ ÿÿfÿ;ÿEÿüÿÿÿÿÿóÿÂÿÿ>ÿÿ¬ÿÿÿüÿ5ÿfÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿðÿ§ÿRÿ ÿÊÿÿÿÿÿtÿÿ¬ÿîÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿéÿÿ)ÿÊÿÿÿÿÿwÿ$ÿiÿ¦ÿâÿþÿÿÿÿÿÿÿÿÿÿÿýÿ¤ÿ)ÿÊÿÿÿÿÿwÿ2ÿ…ÿÖÿÿÿÿÿÿÿÿÿÿÿúÿ”ÿÿÊÿÿÿÿÿwÿÿ5ÿ›ÿ÷ÿÿÿÿÿÿÿÿÿåÿQÿ%ÿ%ÿ%ÿ%ÿ%ÿ%ÿ%ÿÑÿÿÿÿÿwÿÿ™ÿøÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿwÿÿ¹ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿwÿeÿúÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿwÿ8ÿìÿÿÿÿÿÿÿ‘ÿÿÿÿÐÿÿÿÿÿwÿ2ÿìÿÿÿÿÿøÿ>ÿÊÿÿÿÿÿwÿ8ÿúÿÿÿÿÿåÿ ÿÊÿÿÿÿÿwÿoÿÿÿÿÿÿÿ‹ÿÊÿÿÿÿÿwÿ¹ÿÿÿÿÿúÿ)ÿÊÿÿÿÿÿwÿ'ÿøÿÿÿÿÿ¤ÿÊÿÿÿÿÿwÿ™ÿÿÿÿÿýÿàÿÿÿÿÿwÿÿ÷ÿÿÿÿÿÿÿÿÿÿÿwÿ¥ÿÿÿÿÿÿÿÿÿÿÿwÿ?ÿÿÿÿÿÿÿÿÿÿÿwÿÿÛÿÿÿÿÿÿÿÿÿwÿ…ÿÿÿÿÿÿÿÿÿwÿ=ÿÿÿÿÿÿÿÿÿwÿÿîÿÿÿÿÿÿÿwÿ¯ÿÿÿÿÿÿÿwÿsÿÿÿÿÿÿÿwÿ7ÿÿÿÿÿÿÿwÿÿøÿÿÿÿÿtÿ¬ÿÿÿüÿ,ÿ ÿFÿ,ÿÿÿÿÿÿÿÿçÿÿ÷Àÿóøÿóÿƒÿóÿàÿóÿü?óÿÿÿÿ€ÿÿàÿÿñóÿÿùóÿÿüóÿÿüsÿÿþsÿÿÿ3ÿÿÿ3ÿÿÿƒÿÿÿƒÿÿÿƒÿÿÿÃÿÿÿÃÿÿÿÃÿÿÿãÿÿÿãÿÿÿãÿÿÿãÿÿÿóÿÿÿ÷ÿÿÿÿÿÿÿÿ./asymptote-2.41/ax_pthread.m40000644000175000017500000003036613064427076016134 0ustar norbertnorbert# =========================================================================== # http://www.gnu.org/software/autoconf-archive/ax_pthread.html # =========================================================================== # # SYNOPSIS # # AX_PTHREAD([ACTION-IF-FOUND[, ACTION-IF-NOT-FOUND]]) # # DESCRIPTION # # This macro figures out how to build C programs using POSIX threads. It # sets the PTHREAD_LIBS output variable to the threads library and linker # flags, and the PTHREAD_CFLAGS output variable to any special C compiler # flags that are needed. (The user can also force certain compiler # flags/libs to be tested by setting these environment variables.) # # Also sets PTHREAD_CC to any special C compiler that is needed for # multi-threaded programs (defaults to the value of CC otherwise). (This # is necessary on AIX to use the special cc_r compiler alias.) # # NOTE: You are assumed to not only compile your program with these flags, # but also link it with them as well. e.g. you should link with # $PTHREAD_CC $CFLAGS $PTHREAD_CFLAGS $LDFLAGS ... $PTHREAD_LIBS $LIBS # # If you are only building threads programs, you may wish to use these # variables in your default LIBS, CFLAGS, and CC: # # LIBS="$PTHREAD_LIBS $LIBS" # CFLAGS="$CFLAGS $PTHREAD_CFLAGS" # CC="$PTHREAD_CC" # # In addition, if the PTHREAD_CREATE_JOINABLE thread-attribute constant # has a nonstandard name, defines PTHREAD_CREATE_JOINABLE to that name # (e.g. PTHREAD_CREATE_UNDETACHED on AIX). # # Also HAVE_PTHREAD_PRIO_INHERIT is defined if pthread is found and the # PTHREAD_PRIO_INHERIT symbol is defined when compiling with # PTHREAD_CFLAGS. # # ACTION-IF-FOUND is a list of shell commands to run if a threads library # is found, and ACTION-IF-NOT-FOUND is a list of commands to run it if it # is not found. If ACTION-IF-FOUND is not specified, the default action # will define HAVE_PTHREAD. # # Please let the authors know if this macro fails on any platform, or if # you have any other suggestions or comments. This macro was based on work # by SGJ on autoconf scripts for FFTW (http://www.fftw.org/) (with help # from M. Frigo), as well as ac_pthread and hb_pthread macros posted by # Alejandro Forero Cuervo to the autoconf macro repository. We are also # grateful for the helpful feedback of numerous users. # # Updated for Autoconf 2.68 by Daniel Richard G. # # LICENSE # # Copyright (c) 2008 Steven G. Johnson # Copyright (c) 2011 Daniel Richard G. # # This program is free software: you can redistribute it and/or modify it # under the terms of the GNU General Public License as published by the # Free Software Foundation, either version 3 of the License, or (at your # option) any later version. # # This program is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General # Public License for more details. # # You should have received a copy of the GNU General Public License along # with this program. If not, see . # # As a special exception, the respective Autoconf Macro's copyright owner # gives unlimited permission to copy, distribute and modify the configure # scripts that are the output of Autoconf when processing the Macro. You # need not follow the terms of the GNU General Public License when using # or distributing such scripts, even though portions of the text of the # Macro appear in them. The GNU General Public License (GPL) does govern # all other use of the material that constitutes the Autoconf Macro. # # This special exception to the GPL applies to versions of the Autoconf # Macro released by the Autoconf Archive. When you make and distribute a # modified version of the Autoconf Macro, you may extend this special # exception to the GPL to apply to your modified version as well. #serial 18 AU_ALIAS([ACX_PTHREAD], [AX_PTHREAD]) AC_DEFUN([AX_PTHREAD], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_LANG_PUSH([C]) ax_pthread_ok=no # We used to check for pthread.h first, but this fails if pthread.h # requires special compiler flags (e.g. on True64 or Sequent). # It gets checked for in the link test anyway. # First of all, check if the user has set any of the PTHREAD_LIBS, # etcetera environment variables, and if threads linking works using # them: if test x"$PTHREAD_LIBS$PTHREAD_CFLAGS" != x; then save_CFLAGS="$CFLAGS" CFLAGS="$CFLAGS $PTHREAD_CFLAGS" save_LIBS="$LIBS" LIBS="$PTHREAD_LIBS $LIBS" AC_MSG_CHECKING([for pthread_join in LIBS=$PTHREAD_LIBS with CFLAGS=$PTHREAD_CFLAGS]) AC_TRY_LINK_FUNC(pthread_join, ax_pthread_ok=yes) AC_MSG_RESULT($ax_pthread_ok) if test x"$ax_pthread_ok" = xno; then PTHREAD_LIBS="" PTHREAD_CFLAGS="" fi LIBS="$save_LIBS" CFLAGS="$save_CFLAGS" fi # We must check for the threads library under a number of different # names; the ordering is very important because some systems # (e.g. DEC) have both -lpthread and -lpthreads, where one of the # libraries is broken (non-POSIX). # Create a list of thread flags to try. Items starting with a "-" are # C compiler flags, and other items are library names, except for "none" # which indicates that we try without any flags at all, and "pthread-config" # which is a program returning the flags for the Pth emulation library. ax_pthread_flags="pthreads none -Kthread -kthread lthread -pthread -pthreads -mthreads pthread --thread-safe -mt pthread-config" # The ordering *is* (sometimes) important. Some notes on the # individual items follow: # pthreads: AIX (must check this before -lpthread) # none: in case threads are in libc; should be tried before -Kthread and # other compiler flags to prevent continual compiler warnings # -Kthread: Sequent (threads in libc, but -Kthread needed for pthread.h) # -kthread: FreeBSD kernel threads (preferred to -pthread since SMP-able) # lthread: LinuxThreads port on FreeBSD (also preferred to -pthread) # -pthread: Linux/gcc (kernel threads), BSD/gcc (userland threads) # -pthreads: Solaris/gcc # -mthreads: Mingw32/gcc, Lynx/gcc # -mt: Sun Workshop C (may only link SunOS threads [-lthread], but it # doesn't hurt to check since this sometimes defines pthreads too; # also defines -D_REENTRANT) # ... -mt is also the pthreads flag for HP/aCC # pthread: Linux, etcetera # --thread-safe: KAI C++ # pthread-config: use pthread-config program (for GNU Pth library) case ${host_os} in solaris*) # On Solaris (at least, for some versions), libc contains stubbed # (non-functional) versions of the pthreads routines, so link-based # tests will erroneously succeed. (We need to link with -pthreads/-mt/ # -lpthread.) (The stubs are missing pthread_cleanup_push, or rather # a function called by this macro, so we could check for that, but # who knows whether they'll stub that too in a future libc.) So, # we'll just look for -pthreads and -lpthread first: ax_pthread_flags="-pthreads pthread -mt -pthread $ax_pthread_flags" ;; darwin*) ax_pthread_flags="-pthread $ax_pthread_flags" ;; esac if test x"$ax_pthread_ok" = xno; then for flag in $ax_pthread_flags; do case $flag in none) AC_MSG_CHECKING([whether pthreads work without any flags]) ;; -*) AC_MSG_CHECKING([whether pthreads work with $flag]) PTHREAD_CFLAGS="$flag" ;; pthread-config) AC_CHECK_PROG(ax_pthread_config, pthread-config, yes, no) if test x"$ax_pthread_config" = xno; then continue; fi PTHREAD_CFLAGS="`pthread-config --cflags`" PTHREAD_LIBS="`pthread-config --ldflags` `pthread-config --libs`" ;; *) AC_MSG_CHECKING([for the pthreads library -l$flag]) PTHREAD_LIBS="-l$flag" ;; esac save_LIBS="$LIBS" save_CFLAGS="$CFLAGS" LIBS="$PTHREAD_LIBS $LIBS" CFLAGS="$CFLAGS $PTHREAD_CFLAGS" # Check for various functions. We must include pthread.h, # since some functions may be macros. (On the Sequent, we # need a special flag -Kthread to make this header compile.) # We check for pthread_join because it is in -lpthread on IRIX # while pthread_create is in libc. We check for pthread_attr_init # due to DEC craziness with -lpthreads. We check for # pthread_cleanup_push because it is one of the few pthread # functions on Solaris that doesn't have a non-functional libc stub. # We try pthread_create on general principles. AC_LINK_IFELSE([AC_LANG_PROGRAM([#include static void routine(void *a) { a = 0; } static void *start_routine(void *a) { return a; }], [pthread_t th; pthread_attr_t attr; pthread_create(&th, 0, start_routine, 0); pthread_join(th, 0); pthread_attr_init(&attr); pthread_cleanup_push(routine, 0); pthread_cleanup_pop(0) /* ; */])], [ax_pthread_ok=yes], []) LIBS="$save_LIBS" CFLAGS="$save_CFLAGS" AC_MSG_RESULT($ax_pthread_ok) if test "x$ax_pthread_ok" = xyes; then break; fi PTHREAD_LIBS="" PTHREAD_CFLAGS="" done fi # Various other checks: if test "x$ax_pthread_ok" = xyes; then save_LIBS="$LIBS" LIBS="$PTHREAD_LIBS $LIBS" save_CFLAGS="$CFLAGS" CFLAGS="$CFLAGS $PTHREAD_CFLAGS" # Detect AIX lossage: JOINABLE attribute is called UNDETACHED. AC_MSG_CHECKING([for joinable pthread attribute]) attr_name=unknown for attr in PTHREAD_CREATE_JOINABLE PTHREAD_CREATE_UNDETACHED; do AC_LINK_IFELSE([AC_LANG_PROGRAM([#include ], [int attr = $attr; return attr /* ; */])], [attr_name=$attr; break], []) done AC_MSG_RESULT($attr_name) if test "$attr_name" != PTHREAD_CREATE_JOINABLE; then AC_DEFINE_UNQUOTED(PTHREAD_CREATE_JOINABLE, $attr_name, [Define to necessary symbol if this constant uses a non-standard name on your system.]) fi AC_MSG_CHECKING([if more special flags are required for pthreads]) flag=no case ${host_os} in aix* | freebsd* | darwin*) flag="-D_THREAD_SAFE";; osf* | hpux*) flag="-D_REENTRANT";; solaris*) if test "$GCC" = "yes"; then flag="-D_REENTRANT" else flag="-mt -D_REENTRANT" fi ;; esac AC_MSG_RESULT(${flag}) if test "x$flag" != xno; then PTHREAD_CFLAGS="$flag $PTHREAD_CFLAGS" fi AC_CACHE_CHECK([for PTHREAD_PRIO_INHERIT], ax_cv_PTHREAD_PRIO_INHERIT, [ AC_LINK_IFELSE([ AC_LANG_PROGRAM([[#include ]], [[int i = PTHREAD_PRIO_INHERIT;]])], [ax_cv_PTHREAD_PRIO_INHERIT=yes], [ax_cv_PTHREAD_PRIO_INHERIT=no]) ]) AS_IF([test "x$ax_cv_PTHREAD_PRIO_INHERIT" = "xyes"], AC_DEFINE([HAVE_PTHREAD_PRIO_INHERIT], 1, [Have PTHREAD_PRIO_INHERIT.])) LIBS="$save_LIBS" CFLAGS="$save_CFLAGS" # More AIX lossage: must compile with xlc_r or cc_r if test x"$GCC" != xyes; then AC_CHECK_PROGS(PTHREAD_CC, xlc_r cc_r, ${CC}) else PTHREAD_CC=$CC fi else PTHREAD_CC="$CC" fi AC_SUBST(PTHREAD_LIBS) AC_SUBST(PTHREAD_CFLAGS) AC_SUBST(PTHREAD_CC) # Finally, execute ACTION-IF-FOUND/ACTION-IF-NOT-FOUND: if test x"$ax_pthread_ok" = xyes; then ifelse([$1],,AC_DEFINE(HAVE_PTHREAD,1,[Define if you have POSIX threads libraries and header files.]),[$1]) : else ax_pthread_ok=no $2 fi AC_LANG_POP ])dnl AX_PTHREAD ./asymptote-2.41/runtimebase.in0000644000175000017500000000247713064427076016423 0ustar norbertnorbert/***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ // Basic types need by almost all .in files. // Use Void f() instead of void f() to force an explicit Stack argument. void => primVoid() Void => primVoid() Int => primInt() bool => primBoolean() double => primReal() real => primReal() string* => primString() string => primString() #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen ./asymptote-2.41/refaccess.h0000644000175000017500000000362013064427076015653 0ustar norbertnorbert/***** * refaccess.h * Andy Hammerlindl 2003/12/03 * * An access which refers to a variable or other object in C++. *****/ #ifndef REFACCESS_H #define REFACCESS_H #include "access.h" #include "inst.h" #include "coder.h" #include "stack.h" namespace trans { // Access refers to a piece of data, represented by an item, somewhere in the // C++ code. class itemRefAccess : public access { vm::item *ref; public: itemRefAccess(vm::item *ref) : ref(ref) {} void encode(action act, position pos, coder &e); void encode(action act, position pos, coder &e, frame *); }; // Access refers to an arbitrary piece of data of type T. template class refAccess : public access { T *ref; public: refAccess(T *ref) : ref(ref) {} void encode(action act, position pos, coder &e); void encode(action act, position pos, coder &e, frame *); }; template void pointerRead(vm::stack *s) { T *ptr=vm::pop(s); s->push(*ptr); } template void pointerWrite(vm::stack *s) { T *ptr=vm::pop(s); T value=vm::pop(s); *ptr=value; s->push(value); } template void refAccess::encode(action act, position, coder &e) { // You may be able to use typeid(T).name() to get a better label. REGISTER_BLTIN((bltin) pointerRead, "pointerRead"); REGISTER_BLTIN((bltin) pointerWrite, "pointerWrite"); e.encode(vm::inst::constpush, (vm::item)ref); switch (act) { case READ: e.encode(vm::inst::builtin, (bltin) pointerRead); break; case WRITE: e.encode(vm::inst::builtin, (bltin) pointerWrite); break; case CALL: e.encode(vm::inst::builtin, (bltin) pointerRead); e.encode(vm::inst::popcall); break; }; } template void refAccess::encode(action act, position pos, coder &e, frame *) { // Get rid of the useless top frame. e.encode(vm::inst::pop); encode(act, pos, e); } } #endif ./asymptote-2.41/README0000644000175000017500000000434613064427076014432 0ustar norbertnorbert ASYMPTOTE Copyright 2004-17 Andy Hammerlindl, John Bowman, and Tom Prince Asymptote is a powerful descriptive vector graphics language for technical drawing, inspired by MetaPost but with an improved C++-like syntax. Asymptote provides for figures the same high-quality level of typesetting that LaTeX does for scientific text. Installation instructions, documentation, binaries, and source code are available at: http://asymptote.sourceforge.net Bugs/Patches/Feature Requests can be submitted to https://github.com/vectorgraphics/asymptote/issues Questions and comments should be sent to the Asymptote Forum: http://sourceforge.net/p/asymptote/discussion/409349 All source files in the Asymptote project, unless explicitly noted otherwise, are released under version 3 (or later) of the GNU Lesser General Public License (see the files LICENSE.LESSER and LICENSE in the top-level source directory). ======================================================================== This program is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . ======================================================================== Note that the MSWindows executable version of Asymptote can only be released under the GNU General Public License (GPL) as it is linked against the GNU Scientific Library, GNU Readline library, and other GPL libraries. This version of Asymptote also ships with the dll libraries noted below. The source code for the 2.7.0 cygwin1.dll is available under the GPL license: https://cygwin.com/snapshots/x86/cygwin-20170203-src.tar.xz The source code for freeglut.dll is available under the X-Consortium license: http://prdownloads.sourceforge.net/freeglut/freeglut-2.8.1.tar.gz ./asymptote-2.41/stack.cc0000644000175000017500000003371513064427076015170 0ustar norbertnorbert/***** * stack.cc * Andy Hammerlindl 2002/06/27 * * The general stack machine used to run compiled camp code. *****/ #include #include #include "stack.h" #include "program.h" #include "callable.h" #include "errormsg.h" #include "util.h" #include "runtime.h" #include "profiler.h" #ifdef DEBUG_STACK #include namespace vm { void draw(ostream& out, frame *v); } #endif namespace run { void breakpoint(vm::stack *Stack, absyntax::runnable *r); } namespace vm { mem::list bplist; namespace { position curPos = nullPos; const program::label nulllabel; } inline stack::vars_t base_frame( size_t size, size_t parentIndex, stack::vars_t closure #ifdef DEBUG_FRAME , string name #endif ) { stack::vars_t vars; #ifdef SIMPLE_FRAME vars = new item[size]; vars[parentIndex] = closure; #else # ifdef DEBUG_FRAME assert(!name.empty()); vars = new frame(name, parentIndex, size); # else vars = new frame(size); # endif (*vars)[parentIndex] = closure; #endif // TODO: Re-factor closure. return vars; } #ifdef DEBUG_FRAME #define BASEFRAME(s,p,c,n) (base_frame((s), (p), (c), (n))) #else #define BASEFRAME(s,p,c,n) (base_frame((s), (p), (c))) #endif // Abstractions needed. //accessor(frame_handle) // operator[] for accessor inline stack::vars_t make_frame(lambda *l, stack::vars_t closure) { return BASEFRAME(l->framesize, l->parentIndex, closure, l->name); } inline stack::vars_t make_pushframe(size_t size, stack::vars_t closure) { assert(size >= 1); return BASEFRAME(size, 0, closure, ""); } stack::vars_t make_dummyframe(string name) { return BASEFRAME(1, 0, 0, ""); } inline stack::vars_t make_globalframe(size_t size) { assert(size > 0); #if SIMPLE_FRAME // The global frame is an indirect frame. It holds one item, which is the // link to another frame. stack::vars_t direct = new item[1]; stack::vars_t indirect = new item[size]; direct[0] = indirect; return direct; #else return BASEFRAME(size, 0, 0, ""); #if 0 #ifdef DEBUG_FRAME stack::vars_t vars = new frame("", 0, size); #else stack::vars_t vars = new frame(size); #endif return vars; #endif #endif } inline void resize_frame(frame *f, size_t oldsize, size_t newsize) { //assert("Need to fix this" == 0); assert(newsize > oldsize); #if SIMPLE_FRAME frame *old_indirect = get(f[0]); frame *new_indirect = new item[newsize]; std::copy(old_indirect, old_indirect+oldsize, new_indirect); f[0] = new_indirect; #else f->extend(newsize); #endif } void run(lambda *l) { func f; f.body = l; stack s; s.run(&f); } // Move arguments from stack to frame. void stack::marshall(size_t args, stack::vars_t vars) { for (size_t i = args; i > 0; --i) #if SIMPLE_FRAME vars[i-1] = pop(); #else (*vars)[i-1] = pop(); #endif } #ifdef PROFILE #ifndef DEBUG_FRAME #warning "profiler needs DEBUG_FRAME for function names" #endif #ifndef DEBUG_BLTIN #warning "profiler needs DEBUG_BLTIN for builtin function names" #endif profiler prof; void dumpProfile() { std::ofstream out("asyprof"); if (!out.fail()) prof.dump(out); } #endif void assessClosure(lambda *body) { // If we have already determined if it needs closure, just return. if (body->closureReq != lambda::MAYBE_NEEDS_CLOSURE) return; for (program::label l = body->code->begin(); l != body->code->end(); ++l) if (l->op == inst::pushclosure || l->op == inst::pushframe) { body->closureReq = lambda::NEEDS_CLOSURE; return; } body->closureReq = lambda::DOESNT_NEED_CLOSURE; } void stack::run(func *f) { lambda *body = f->body; #ifdef PROFILE prof.beginFunction(body); #endif #ifdef DEBUG_STACK #ifdef DEBUG_FRAME cout << "running lambda " + body->name + ": \n"; #else cout << "running lambda: \n"; #endif print(cout, body->code); cout << endl; #endif runWithOrWithoutClosure(body, 0, f->closure); #ifdef PROFILE prof.endFunction(body); #endif } void stack::breakpoint(absyntax::runnable *r) { lastPos=curPos; indebugger=true; ::run::breakpoint(this,r); string s=vm::pop(this); debugOp=(s.length() > 0) ? s[0] : (char) 0; indebugger=false; } void stack::debug() { if(!curPos) return; if(indebugger) {em.clear(); return;} switch(debugOp) { case 'i': // inst breakpoint(); break; case 's': // step if((!curPos.match(lastPos.filename()) || !curPos.match(lastPos.Line()))) breakpoint(); break; case 'n': // next if(curPos.match(lastPos.filename()) && !curPos.match(lastPos.Line())) breakpoint(); break; case 'f': // file if(!curPos.match(lastPos.filename())) breakpoint(); break; case 'r': // return if(curPos.match(breakPos.filename())) breakpoint(); break; case 'c': // continue default: for(mem::list::iterator p=bplist.begin(); p != bplist.end(); ++p) { if(curPos.match(p->f.name()) && curPos.match(p->f.line()) && (newline || !curPos.match(breakPos.filename()) || !curPos.match(breakPos.Line()))) { breakPos=curPos; breakpoint(p->r); newline=false; break; } if(!newline && (curPos.match(lastPos.filename()) && !curPos.match(lastPos.Line()))) newline=true; } break; } } void stack::runWithOrWithoutClosure(lambda *l, vars_t vars, vars_t parent) { // The size of the frame (when running without closure). size_t frameSize = l->parentIndex; #ifdef SIMPLE_FRAME // Link to the variables, be they in a closure or on the stack. frame *varlink; # define SET_VARLINK assert(vars); varlink = vars; # define VAR(n) ( (varlink)[(n) + frameStart] ) # define FRAMEVAR(frame,n) (frame[(n)]) #else // Link to the variables, be they in a closure or on the stack. mem::vector *varlink=NULL; # define SET_VARLINK assert(vars); varlink = &vars->vars # define VAR(n) ( (*varlink)[(n) + frameStart] ) # define FRAMEVAR(frame,n) ((*frame)[(n)]) #endif size_t frameStart = 0; // Set up the closure, if necessary. if (vars == 0) { #ifndef SIMPLE_FRAME assessClosure(l); if (l->closureReq == lambda::NEEDS_CLOSURE) #endif { /* make new activation record */ vars = vm::make_frame(l, parent); assert(vars); } #ifndef SIMPLE_FRAME else { assert(l->closureReq == lambda::DOESNT_NEED_CLOSURE); // Use the stack to store variables. varlink = &theStack; // Record where the parameters start on the stack. frameStart = theStack.size() - frameSize; // Add the parent's closure to the frame. push(parent); ++frameSize; size_t newFrameSize = (size_t)l->framesize; if (newFrameSize > frameSize) { theStack.resize(frameStart + newFrameSize); frameSize = newFrameSize; } } #endif } if (vars) { marshall(l->parentIndex, vars); SET_VARLINK; } /* start the new function */ program::label ip = l->code->begin(); try { for (;;) { const inst &i = *ip; curPos = i.pos; #ifdef PROFILE prof.recordInstruction(); #endif #ifdef DEBUG_STACK printInst(cout, ip, l->code->begin()); cout << " ("; i.pos.printTerse(cout); cout << ")\n"; #endif if(settings::verbose > 4) em.trace(curPos); if(!bplist.empty()) debug(); if(errorstream::interrupt) throw interrupted(); switch (i.op) { case inst::varpush: push(VAR(get(i))); break; case inst::varsave: VAR(get(i)) = top(); break; #ifdef COMBO case inst::varpop: VAR(get(i)) = pop(); break; #endif case inst::ret: { if (vars == 0) // Delete the frame from the stack. // TODO: Optimize for common cases. theStack.erase(theStack.begin() + frameStart, theStack.begin() + frameStart + frameSize); return; } case inst::pushframe: { assert(vars); Int size = get(i); vars=make_pushframe(size, vars); SET_VARLINK; break; } case inst::popframe: { assert(vars); vars=get(VAR(0)); SET_VARLINK; break; } case inst::pushclosure: assert(vars); push(vars); break; case inst::nop: break; case inst::pop: pop(); break; case inst::intpush: case inst::constpush: push(i.ref); break; case inst::fieldpush: { vars_t frame = pop(); if (!frame) error("dereference of null pointer"); push(FRAMEVAR(frame, get(i))); break; } case inst::fieldsave: { vars_t frame = pop(); if (!frame) error("dereference of null pointer"); FRAMEVAR(frame, get(i)) = top(); break; } #if COMBO case inst::fieldpop: { #error NOT REIMPLEMENTED vars_t frame = pop(); if (!frame) error("dereference of null pointer"); FRAMEVAR(get(i)) = pop(); break; } #endif case inst::builtin: { bltin func = get(i); #ifdef PROFILE prof.beginFunction(func); #endif func(this); #ifdef PROFILE prof.endFunction(func); #endif break; } case inst::jmp: ip = get(i); continue; case inst::cjmp: if (pop()) { ip = get(i); continue; } break; case inst::njmp: if (!pop()) { ip = get(i); continue; } break; case inst::jump_if_not_default: if (!isdefault(pop())) { ip = get(i); continue; } break; #ifdef COMBO case inst::gejmp: { Int y = pop(); Int x = pop(); if (x>=y) { ip = get(i); continue; } break; } #if 0 case inst::jump_if_func_eq: { callable * b=pop(); callable * a=pop(); if (a->compare(b)) { ip = get(i); continue; } break; } case inst::jump_if_func_neq: { callable * b=pop(); callable * a=pop(); if (!a->compare(b)) { ip = get(i); continue; } break; } #endif #endif case inst::push_default: push(Default); break; case inst::popcall: { /* get the function reference off of the stack */ callable* f = pop(); f->call(this); break; } case inst::makefunc: { func *f = new func; f->closure = pop(); f->body = get(i); push((callable*)f); break; } default: error("Internal VM error: Bad stack operand"); } #ifdef DEBUG_STACK draw(cerr); vm::draw(cerr,vars); cerr << "\n"; #endif ++ip; } } catch (bad_item_value&) { error("Trying to use uninitialized value."); } #undef SET_VARLINK #undef VAR #undef FRAMEVAR } void stack::load(string index) { frame *inst=instMap[index]; if (inst) push(inst); else { func f; assert(initMap); f.body=(*initMap)[index]; assert(f.body); run(&f); instMap[index]=get(top()); } } #ifdef DEBUG_STACK const size_t MAX_ITEMS=20; void stack::draw(ostream& out) { // out.setf(out.hex); out << "operands:"; stack_t::const_iterator left = theStack.begin(); if (theStack.size() > MAX_ITEMS) { left = theStack.end()-MAX_ITEMS; out << " ..."; } else out << " "; while (left != theStack.end()) { if (left != theStack.begin()) out << " | " ; out << *left; left++; } out << "\n"; } void draw(ostream& out, frame* v) { out << "vars:" << endl; while (!!v) { item link=(*v)[v->getParentIndex()]; out << " " << v->getName() << ": "; for (size_t i = 0; i < MAX_ITEMS && i < v->size(); i++) { if (i > 0) out << " | "; out << i << ": "; if (i == v->getParentIndex()) { try { frame *parent = get(link); out << (parent ? "link" : "----"); } catch (bad_item_value&) { out << "non-link " << (*v)[0]; } } else { out << (*v)[i]; } } if (v->size() > MAX_ITEMS) out << "..."; out << "\n"; frame *parent; try { parent = get(link); } catch (bad_item_value&) { parent = 0; } v = parent; } } #endif // DEBUG_STACK position getPos() { return curPos; } void errornothrow(const char* message) { em.error(curPos); em << message; em.sync(); } void error(const char* message) { errornothrow(message); throw handled_error(); } void error(const ostringstream& message) { const string& s=message.str(); error(s.c_str()); } const size_t STARTING_GLOBALS_SIZE = 1; interactiveStack::interactiveStack() : globals(make_globalframe(STARTING_GLOBALS_SIZE)), globals_size(STARTING_GLOBALS_SIZE) {} void interactiveStack::run(lambda *codelet) { if (globals_size < codelet->framesize) { resize_frame(globals, globals_size, codelet->framesize); globals_size = codelet->framesize; } stack::runWithOrWithoutClosure(codelet, globals, 0); } } // namespace vm ./asymptote-2.41/locate.cc0000644000175000017500000000422313064427076015322 0ustar norbertnorbert/***** * locate.cc * Tom Prince 2005/03/24 * * Locate files in search path. *****/ #include #include "settings.h" #include "util.h" #include "locate.h" namespace settings { namespace fs { string extension(string name) { size_t n = name.rfind("."); if (n != string::npos) return name.substr(n); else return string(); } bool exists(string filename) { return ::access(filename.c_str(), R_OK) == 0; } } // namespace fs file_list_t searchPath; // Returns list of possible filenames, accounting for extensions. file_list_t mungeFileName(string id) { string ext = fs::extension(id); file_list_t files; if (ext == "."+settings::suffix) { files.push_back(id); files.push_back(id+"."+settings::suffix); } else { files.push_back(id+"."+settings::suffix); files.push_back(id); } return files; } // Join a directory with the given filename, to give the path to the file. This // also avoids unsightly joins such as './file.asy' in favour of 'file.asy' and // 'dir//file.asy' in favour of 'dir/file.asy' string join(string dir, string file) { return dir == "." ? file : *dir.rbegin() == '/' ? dir + file : dir + "/" + file; } // Find the appropriate file, first looking in the local directory, then the // directory given in settings, and finally the global system directory. string locateFile(string id) { if(id.empty()) return ""; file_list_t filenames = mungeFileName(id); for (file_list_t::iterator leaf = filenames.begin(); leaf != filenames.end(); ++leaf) { #ifdef __MSDOS__ size_t p; while ((p=leaf->find('\\')) < string::npos) (*leaf)[p]='/'; if ((p=leaf->find(':')) < string::npos && p > 0) { (*leaf)[p]='/'; leaf->insert(0,"/cygdrive/"); } #endif if ((*leaf)[0] == '/') { string file = *leaf; if (fs::exists(file)) return file; } else { for (file_list_t::iterator dir = searchPath.begin(); dir != searchPath.end(); ++dir) { string file = join(*dir,*leaf); if (fs::exists(file)) return file; } } } return string(); } } // namespace settings ./asymptote-2.41/bbox3.h0000644000175000017500000000751613064427076014742 0ustar norbertnorbert/***** * bbox3.h * Andy Hammerlindl 2002/06/06 * * Stores a rectangle that encloses a drawing object. *****/ #ifndef BBOX3_H #define BBOX3_H #include "triple.h" namespace camp { // The box that encloses a path struct bbox3 { bool empty; double left; double bottom; double lower; double right; double top; double upper; // Start bbox3 about the origin bbox3() : empty(true), left(0.0), bottom(0.0), lower(0.0), right(0.0), top(0.0), upper(0.0) { } bbox3(double left, double bottom, double lower, double right, double top, double upper) : empty(false), left(left), bottom(bottom), lower(lower), right(right), top(top), upper(upper) { } // Start a bbox3 with a point bbox3(double x, double y, double z) : empty(false), left(x), bottom(y), lower(z), right(x), top(y), upper(z) { } // Start a bbox3 with a point bbox3(const triple& v) : empty(false), left(v.getx()), bottom(v.gety()), lower(v.getz()), right(v.getx()), top(v.gety()), upper(v.getz()) { } // Start a bbox3 with 2 points bbox3(const triple& m, const triple& M) : empty(false), left(m.getx()), bottom(m.gety()), lower(m.getz()), right(M.getx()), top(M.gety()), upper(M.getz()) { } // Add a point to a bbox3 void add(const triple& v) { const double x = v.getx(), y = v.gety(), z = v.getz(); add(x,y,z); } void add(double x, double y, double z) { if (empty) { left = right = x; top = bottom = y; lower = upper = z; empty = false; } else { if(x < left) left = x; else if(x > right) right = x; if(y < bottom) bottom = y; else if(y > top) top = y; if(z < lower) lower = z; else if(z > upper) upper = z; } } // Add a point to a nonempty bbox3 void addnonempty(double x, double y, double z) { if(x < left) left = x; else if(x > right) right = x; if(y < bottom) bottom = y; else if(y > top) top = y; if(z < lower) lower = z; else if(z > upper) upper = z; } // Add a point to a nonempty bbox3 void addnonempty(const triple& v) { addnonempty(v.getx(),v.gety(),v.getz()); } // Add a point to a nonempty bbox, updating bounding times void addnonempty(const triple& v, bbox3& times, double t) { double x = v.getx(), y = v.gety(), z = v.getz(); if(x < left) { left = x; times.left = t; } else if(x > right) { right = x; times.right = t; } if(y < bottom) { bottom = y; times.bottom = t; } else if(y > top) { top = y; times.top = t; } if(z < lower) { lower = z; times.lower=t; } else if(z > upper) { upper = z; times.upper=t; } } bbox3 operator+= (const triple& v) { add(v); return *this; } triple Min() const { return triple(left,bottom,lower); } triple Max() const { return triple(right,top,upper); } // transform bbox3 by 4x4 matrix void transform(const double* m) { const double xmin = left; const double ymin = bottom; const double zmin = lower; const double xmax = right; const double ymax = top; const double zmax = upper; empty = true; add(m*triple(xmin,ymin,zmin)); addnonempty(m*triple(xmin,ymin,zmax)); addnonempty(m*triple(xmin,ymax,zmin)); addnonempty(m*triple(xmin,ymax,zmax)); addnonempty(m*triple(xmax,ymin,zmin)); addnonempty(m*triple(xmax,ymin,zmax)); addnonempty(m*triple(xmax,ymax,zmin)); addnonempty(m*triple(xmax,ymax,zmax)); } friend ostream& operator << (ostream& out, const bbox3& b) { out << "Min " << b.Min() << " Max " << b.Max(); return out; } }; } // namespace camp GC_DECLARE_PTRFREE(camp::bbox3); #endif ./asymptote-2.41/profiler.h0000644000175000017500000002324413064427076015543 0ustar norbertnorbert/***** * profiler.h * Andy Hammerlindl 2010/07/24 * * Profiler for the execution of the virtual machine bytecode. *****/ #ifndef PROFILER_H #define PROFILER_H #include #include #include "inst.h" namespace vm { #ifdef DEBUG_BLTIN string lookupBltin(bltin b); #endif inline position positionFromLambda(lambda *func) { if (func == 0) return position(); program& code = *func->code; // Check for empty program. if (code.begin() == code.end()) return position(); return code.begin()->pos; } inline void printNameFromLambda(ostream& out, lambda *func) { if (!func) { out << ""; return; } #ifdef DEBUG_FRAME string name = func->name; #else string name = ""; #endif // If unnamed, use the pointer address. if (name.empty()) out << func; else out << name; out << " at "; positionFromLambda(func).printTerse(out); } inline void printNameFromBltin(ostream& out, bltin b) { #ifdef DEBUG_BLTIN string name = lookupBltin(b); #else string name = ""; #endif if (!name.empty()) out << name << " "; out << "(builtin at " << (void *)b << ")"; } class profiler : public gc { // To do call graph analysis, each call stack that occurs in practice is // represented by a node. For instance, if f and g are functions, then // f -> g -> g // is represented by a node and // g -> f -> g // is represented by a different one. struct node { // The top-level function of the call stack. It is either an asymptote // function with a given lambda, or a builtin function, with a given // bltin. lambda *func; bltin cfunc; // The number of times the top-level function has been called resulting in // this specific call stack. int calls; // The number of bytecode instructions executed with this exact call stack. // It does not include time spent in called function. int instructions; // Number of instructions spent in this function or its children. This is // computed by computeTotals. int instTotal; // The number of real-time nanoseconds spent in this node. WARNING: May // be wildly inaccurate. long long nsecs; // Total including children. long long nsecsTotal; // Call stacks resulting from calls during this call stack. mem::vector children; node() : func(0), cfunc(0), calls(0), instructions(0), instTotal(0), nsecs(0), nsecsTotal(0) {} node(lambda *func) : func(func), cfunc(0), calls(0), instructions(0), instTotal(0), nsecs(0), nsecsTotal(0) {} node(bltin b) : func(0), cfunc(b), calls(0), instructions(0), instTotal(0), nsecs(0), nsecsTotal(0) {} // Return the call stack resulting from a call to func when this call // stack is current. node *getChild(lambda *func) { size_t n = children.size(); for (size_t i = 0; i < n; ++i) if (children[i].func == func) return &children[i]; // Not found, create a new one. children.push_back(node(func)); return &children.back(); } node *getChild(bltin func) { size_t n = children.size(); for (size_t i = 0; i < n; ++i) if (children[i].cfunc == func) return &children[i]; // Not found, create a new one. children.push_back(node(func)); return &children.back(); } void computeTotals() { instTotal = instructions; nsecsTotal = nsecs; size_t n = children.size(); for (size_t i = 0; i < n; ++i) { children[i].computeTotals(); instTotal += children[i].instTotal; nsecsTotal += children[i].nsecsTotal; } } void pydump(ostream& out) { #ifdef DEBUG_FRAME string name = func ? func->name : ""; #else string name = ""; #endif out << "dict(\n" << " name = '" << name << " " << func << "',\n" << " pos = '" << positionFromLambda(func) << "',\n" << " calls = " << calls << ",\n" << " instructions = " << instructions << ",\n" << " nsecs = " << nsecs << ",\n" << " children = [\n"; size_t n = children.size(); for (size_t i = 0; i < n; ++i) { children[i].pydump(out); out << ",\n"; } out << " ])\n"; } }; // An empty call stack. node emptynode; // All of the callstacks. std::stack callstack; node &topnode() { return *callstack.top(); } // Arc representing one function calling another. Used only for building // the output for kcachegrind. struct arc : public gc { int calls; int instTotal; long long nsecsTotal; arc() : calls(0), instTotal(0), nsecsTotal(0) {} void add(node& n) { calls += n.calls; instTotal += n.instTotal; nsecsTotal += n.nsecsTotal; } }; // Representing one function and its calls to other functions. struct fun : public gc { int instructions; long long nsecs; mem::map arcs; mem::map carcs; fun() : instructions(0), nsecs(0) {} void addChildTime(node& n) { if (n.cfunc) carcs[n.cfunc].add(n); else arcs[n.func].add(n); } void analyse(node& n) { instructions += n.instructions; nsecs += n.nsecs; size_t numChildren = n.children.size(); for (size_t i = 0; i < numChildren; ++i) addChildTime(n.children[i]); } void dump(ostream& out) { // The unused line number needed by kcachegrind. static const string POS = "1"; out << POS << " " << instructions << " " << nsecs << "\n"; for (mem::map::iterator i = arcs.begin(); i != arcs.end(); ++i) { lambda *l = i->first; arc& a = i->second; out << "cfl=" << positionFromLambda(l) << "\n"; out << "cfn="; printNameFromLambda(out, l); out << "\n"; out << "calls=" << a.calls << " " << POS << "\n"; out << POS << " " << a.instTotal << " " << a.nsecsTotal << "\n"; } for (mem::map::iterator i = carcs.begin(); i != carcs.end(); ++i) { bltin b = i->first; arc& a = i->second; out << "cfl=C++ code" << endl; out << "cfn="; printNameFromBltin(out, b); out << "\n"; out << "calls=" << a.calls << " " << POS << "\n"; out << POS << " " << a.instTotal << " " << a.nsecsTotal << "\n"; } } }; // The data for each asymptote function. mem::map funs; // The data for each C++ function. mem::map cfuns; void analyseNode(node& n) { fun& f = n.cfunc ? cfuns[n.cfunc] : funs[n.func]; f.analyse(n); size_t numChildren = n.children.size(); for (size_t i = 0; i < numChildren; ++i) analyseNode(n.children[i]); } // Convert data in the tree of callstack nodes into data for each function. void analyseData() { emptynode.computeTotals(); analyseNode(emptynode); } // Timing data. struct timeval timestamp; void startLap() { gettimeofday(×tamp, 0); } long long timeAndResetLap() { struct timeval now; gettimeofday(&now, 0); long long nsecs = 1000000000LL * (now.tv_sec - timestamp.tv_sec) + 1000LL * (now.tv_usec - timestamp.tv_usec); timestamp = now; return nsecs; } // Called whenever the stack is about to change, in order to record the time // duration for the current node. void recordTime() { topnode().nsecs += timeAndResetLap(); } public: profiler(); void beginFunction(lambda *func); void endFunction(lambda *func); void beginFunction(bltin func); void endFunction(bltin func); void recordInstruction(); // TODO: Add position, type of instruction info to profiling. // Dump all of the data out in a format that can be read into Python. void pydump(ostream &out); // Dump all of the data in a format for kcachegrind. void dump(ostream& out); }; inline profiler::profiler() : emptynode() { callstack.push(&emptynode); startLap(); } inline void profiler::beginFunction(lambda *func) { assert(func); assert(!callstack.empty()); recordTime(); callstack.push(topnode().getChild(func)); ++topnode().calls; } inline void profiler::endFunction(lambda *func) { assert(func); assert(!callstack.empty()); assert(topnode().func == func); recordTime(); callstack.pop(); } inline void profiler::beginFunction(bltin cfunc) { assert(cfunc); assert(!callstack.empty()); recordTime(); callstack.push(topnode().getChild(cfunc)); ++topnode().calls; } inline void profiler::endFunction(bltin cfunc) { assert(cfunc); assert(!callstack.empty()); assert(topnode().cfunc == cfunc); recordTime(); callstack.pop(); } inline void profiler::recordInstruction() { assert(!callstack.empty()); ++topnode().instructions; } inline void profiler::pydump(ostream& out) { out << "profile = "; emptynode.pydump(out); } inline void profiler::dump(ostream& out) { analyseData(); out << "events: Instructions Nanoseconds\n"; for (mem::map::iterator i = funs.begin(); i != funs.end(); ++i) { lambda *l = i->first; fun& f = i->second; out << "fl=" << positionFromLambda(l) << "\n"; out << "fn="; printNameFromLambda(out, l); out << "\n"; f.dump(out); } for (mem::map::iterator i = cfuns.begin(); i != cfuns.end(); ++i) { bltin b = i->first; fun& f = i->second; out << "fl=C++ code\n"; out << "fn="; printNameFromBltin(out, b); out << "\n"; f.dump(out); } } } // namespace vm #endif // PROFILER_H ./asymptote-2.41/fundec.h0000644000175000017500000001037313064427076015164 0ustar norbertnorbert/***** * fundec.h * Andy Hammerlindl 2002/8/29 * * Defines the semantics for defining functions. Both the newexp syntax, and * the abbreviated C-style function definition. *****/ #ifndef FUNDEC_H #define FUNDEC_H #include "dec.h" #include "exp.h" namespace absyntax { class formal : public absyn { ty *base; decidstart *start; bool Explicit; varinit *defval; bool keywordOnly; public: formal(position pos, ty *base, decidstart *start=0, varinit *defval=0, bool Explicit= false, bool keywordOnly=false) : absyn(pos), base(base), start(start), Explicit(Explicit), defval(defval), keywordOnly(keywordOnly) {} virtual void prettyprint(ostream &out, Int indent); // Build the corresponding types::formal to put into a signature. types::formal trans(coenv &e, bool encodeDefVal, bool tacit=false); // Add the formal parameter to the environment to prepare for the // function body's translation. virtual void transAsVar(coenv &e, Int index); types::ty *getType(coenv &e, bool tacit=false); virtual void addOps(coenv &e, record *r); varinit *getDefaultValue() { return defval; } symbol getName() { return start ? start->getName() : symbol::nullsym; } bool getExplicit() { return Explicit; } bool isKeywordOnly() { return keywordOnly; } }; class formals : public absyn { //friend class funheader; mem::list fields; formal *rest; // If the list of formals contains at least one keyword-only formal. bool keywordOnly; void addToSignature(types::signature& sig, coenv &e, bool encodeDefVal, bool tacit); public: formals(position pos) : absyn(pos), rest(0), keywordOnly(false) {} virtual ~formals() {} virtual void prettyprint(ostream &out, Int indent); virtual void add(formal *f) { if (f->isKeywordOnly()) { keywordOnly = true; } else if (rest) { em.error(f->getPos()); em << "normal parameter after rest parameter"; } else if (keywordOnly) { em.error(f->getPos()); em << "normal parameter after keyword-only parameter"; } fields.push_back(f); } virtual void addRest(formal *f) { if (rest) { em.error(f->getPos()); em << "additional rest parameter"; } else if (f->isKeywordOnly()) { em.error(f->getPos()); em << "rest parameter declared as keyword-only"; } rest = f; } // Returns the types of each parameter as a signature. // encodeDefVal means that it will also encode information regarding // the default values into the signature types::signature *getSignature(coenv &e, bool encodeDefVal = false, bool tacit = false); // Returns the corresponding function type, assuming it has a return // value of "result." types::function *getType(types::ty *result, coenv &e, bool encodeDefVal = false, bool tacit = false); virtual void addOps(coenv &e, record *r); // Add the formal parameters to the environment to prepare for the // function body's translation. virtual void trans(coenv &e); }; class fundef : public exp { ty *result; formals *params; stm *body; // If the fundef is part of a fundec, the name of the function is stored // here for debugging purposes. symbol id; friend class fundec; public: fundef(position pos, ty *result, formals *params, stm *body) : exp(pos), result(result), params(params), body(body), id() {} virtual void prettyprint(ostream &out, Int indent); varinit *makeVarInit(types::function *ft); virtual void baseTrans(coenv &e, types::function *ft); virtual types::ty *trans(coenv &e); virtual types::function *transType(coenv &e, bool tacit); virtual types::function *transTypeAndAddOps(coenv &e, record *r, bool tacit); virtual types::ty *getType(coenv &e) { return transType(e, true); } }; class fundec : public dec { symbol id; fundef fun; public: fundec(position pos, ty *result, symbol id, formals *params, stm *body) : dec(pos), id(id), fun(pos, result, params, body) { fun.id = id; } void prettyprint(ostream &out, Int indent); void trans(coenv &e); void transAsField(coenv &e, record *r); }; } // namespace absyntax #endif ./asymptote-2.41/runlabel.in0000644000175000017500000003163413064427076015706 0ustar norbertnorbert/***** * runlabel.in * * Runtime functions for label operations. * *****/ pen => primPen() pair => primPair() path => primPath() picture* => primPicture() transform => primTransform() realarray* => realArray() stringarray* => stringArray() penarray* => penArray() patharray* => pathArray() patharray2* => pathArray2() #include "picture.h" #include "drawlabel.h" #include "locate.h" using namespace camp; using namespace vm; using namespace settings; typedef array realarray; typedef array stringarray; typedef array penarray; typedef array patharray; typedef array patharray2; using types::realArray; using types::stringArray; using types::penArray; using types::pathArray; using types::pathArray2; void cannotread(const string& s) { ostringstream buf; buf << "Cannot read from " << s; error(buf); } void cannotwrite(const string& s) { ostringstream buf; buf << "Cannot write to " << s; error(buf); } pair readpair(stringstream& s, double hscale=1.0, double vscale=1.0) { double x,y; s >> y; s >> x; return pair(hscale*x,vscale*y); } string ASYx="/ASYx {( ) print ASYX sub 12 string cvs print} bind def"; string ASYy="/ASYy {( ) print ASYY sub 12 string cvs print} bind def"; string pathforall="{(M) print ASYy ASYx} {(L) print ASYy ASYx} {(C) print ASYy ASYx ASYy ASYx ASYy ASYx} {(c) print} pathforall"; string currentpoint="print currentpoint ASYy ASYx "; string ASYinit="/ASYX currentpoint pop def /ASYY currentpoint exch pop def "; string ASY1="ASY1 {"+ASYinit+"/ASY1 false def} if "; void endpath(std::ostream& ps) { ps << ASY1 << pathforall << " (M) " << currentpoint << "currentpoint newpath moveto} bind def" << endl; } void fillpath(std::ostream& ps) { ps << "/fill {closepath "; endpath(ps); } void showpath(std::ostream& ps) { ps << ASYx << newl << ASYy << newl << "/ASY1 true def" << newl << "/stroke {strokepath "; endpath(ps); fillpath(ps); } array *readpath(const string& psname, bool keep, bool pdf=false, double hscale=1.0, double vsign=1.0) { double vscale=vsign*hscale; array *PP=new array(0); char *oldPath=NULL; string dir=stripFile(outname()); if(!dir.empty()) { oldPath=getPath(); setPath(dir.c_str()); } mem::vector cmd; cmd.push_back(getSetting("gs")); cmd.push_back("-q"); cmd.push_back("-dBATCH"); cmd.push_back("-P"); if(safe) cmd.push_back("-dSAFER"); #ifdef __MSDOS__ const string null="NUL"; #else const string null="/dev/null"; #endif string epsdriver=getSetting("epsdriver"); cmd.push_back("-sDEVICE="+epsdriver); cmd.push_back("-sOutputFile="+null); cmd.push_back(stripDir(psname)); iopipestream gs(cmd,"gs","Ghostscript"); while(gs.running()) { stringstream buf; string s=gs.readline(); if(s.empty()) break; if(!pdf) gs << newl; // Workaround broken stringstream container in MacOS 10.9 libc++. #if defined(__APPLE__) || defined(__FreeBSD__) || defined(__FreeBSD_kernel__ ) for(string::iterator i=s.begin(); i != s.end(); ++i) { if(isalpha(*i) && *i != 'e') {buf << " ";} buf << *i; } #else buf << s; #endif if(verbose > 2) cout << endl; mem::vector nodes; solvedKnot node; bool cyclic=false; bool active=false; array *P=new array(0); PP->push(P); while(!buf.eof()) { char c; buf >> c; if(c == '>') break; switch(c) { case 'M': { if(active) { if(cyclic) { if(node.point == nodes[0].point) nodes[0].pre=node.pre; else { pair delta=(nodes[0].point-node.point)*third; node.post=node.point+delta; nodes[0].pre=nodes[0].point-delta; node.straight=true; nodes.push_back(node); } } else { node.post=node.point; node.straight=false; nodes.push_back(node); } if(cyclic) // Discard noncyclic paths. P->push(path(nodes,nodes.size(),cyclic)); nodes.clear(); } active=false; cyclic=false; node.pre=node.point=readpair(buf,hscale,vscale); node.straight=false; break; } case 'L': { pair point=readpair(buf,hscale,vscale); pair delta=(point-node.point)*third; node.post=node.point+delta; node.straight=true; nodes.push_back(node); active=true; node.pre=point-delta; node.point=point; break; } case 'C': { pair point=readpair(buf,hscale,vscale); pair pre=readpair(buf,hscale,vscale); node.post=readpair(buf,hscale,vscale); node.straight=false; nodes.push_back(node); active=true; node.pre=pre; node.point=point; break; } case 'c': { cyclic=true; break; } } } } if(oldPath != NULL) setPath(oldPath); if(!keep) unlink(psname.c_str()); return PP; } // Autogenerated routines: void label(picture *f, string *s, string *size, transform t, pair position, pair align, pen p) { f->append(new drawLabel(*s,*size,t,position,align,p)); } bool labels(picture *f) { return f->havelabels(); } realarray *texsize(string *s, pen p=CURRENTPEN) { texinit(); processDataStruct &pd=processData(); string texengine=getSetting("tex"); setpen(pd.tex,texengine,p); double width,height,depth; texbounds(width,height,depth,pd.tex,*s); array *t=new array(3); (*t)[0]=width; (*t)[1]=height; (*t)[2]=depth; return t; } patharray2 *_texpath(stringarray *s, penarray *p) { size_t n=checkArrays(s,p); if(n == 0) return new array(0); string prefix=cleanpath(outname()); string psname=auxname(prefix,"ps"); string texname=auxname(prefix,"tex"); string dviname=auxname(prefix,"dvi"); bbox b; string texengine=getSetting("tex"); bool xe=settings::xe(texengine) || settings::lua(texengine) || settings::context(texengine); texfile tex(texname,b,true); tex.miniprologue(); for(size_t i=0; i < n; ++i) { tex.setfont(read(p,i)); if(i != 0) { if(texengine == "context") tex.verbatimline("}\\page\\hbox{%"); else if(texengine == "luatex" || texengine == "tex" || texengine == "pdftex") tex.verbatimline("\\eject"); else tex.verbatimline("\\newpage"); } if(!xe) { tex.verbatimline("\\special{ps:"); tex.verbatimline(ASYx); tex.verbatimline(ASYy); tex.verbatimline("/ASY1 true def"); tex.verbatimline("/show {"+ASY1+ "currentpoint newpath moveto false charpath "+pathforall+ "} bind def"); tex.verbatimline("/V {"+ASY1+"Ry neg Rx 4 copy 4 2 roll 2 copy 6 2 roll 2 copy (M) print ASYy ASYx (L) print ASYy add ASYx (L) print add ASYy add ASYx (L) print add ASYy ASYx (c) print} bind def}"); } tex.verbatimline(read(s,i)+"\\ %"); } tex.epilogue(true); tex.close(); int status=opentex(texname,prefix,!xe); string pdfname,pdfname2,psname2; bool keep=getSetting("keep"); bool legacygs=false; if(!status) { if(xe) { // Use legacy ghostscript driver for gs-9.13 and earlier. string epsdriver=getSetting("epsdriver"); legacygs=epsdriver == "epswrite"; pdfname=auxname(prefix,"pdf"); pdfname2=auxname(prefix+"_","pdf"); psname2=auxname(prefix+"_","ps"); if(!fs::exists(pdfname)) return new array(n); std::ofstream ps(psname.c_str(),std::ios::binary); if(!ps) cannotwrite(psname); showpath(ps); mem::vector pcmd; pcmd.push_back(getSetting("gs")); pcmd.push_back("-q"); pcmd.push_back("-dNOCACHE"); pcmd.push_back("-dNOPAUSE"); pcmd.push_back("-dBATCH"); if(safe) pcmd.push_back("-dSAFER"); pcmd.push_back("-sDEVICE=pdfwrite"); pcmd.push_back("-sOutputFile="+pdfname2); pcmd.push_back(pdfname); status=System(pcmd,0,true,"gs"); if(status == 0) { mem::vector cmd; cmd.push_back(getSetting("gs")); cmd.push_back("-q"); cmd.push_back("-dNOCACHE"); cmd.push_back("-dNOPAUSE"); cmd.push_back("-dBATCH"); if(safe) cmd.push_back("-dSAFER"); cmd.push_back("-sDEVICE="+epsdriver); // Work around eps2write bug that forces all postscript to first page. cmd.push_back("-sOutputFile="+psname2+(legacygs ? "" : "%d")); cmd.push_back(pdfname2); status=System(cmd,0,true,"gs"); if(legacygs) { std::ifstream in(psname2.c_str()); ps << in.rdbuf(); } else { for(unsigned int i=1; i <= n ; ++i) { ostringstream buf; buf << psname2 << i; const string& s=buf.str(); const char *name=s.c_str(); std::ifstream in(name,std::ios::binary); ps << in.rdbuf(); ps << "(>\n) print flush\n"; in.close(); if(!keep) unlink(name); } } ps.close(); } } else { if(!fs::exists(dviname)) return new array(n); mem::vector dcmd; dcmd.push_back(getSetting("dvips")); dcmd.push_back("-R"); dcmd.push_back("-Pdownload35"); dcmd.push_back("-D600"); push_split(dcmd,getSetting("dvipsOptions")); if(verbose <= 2) dcmd.push_back("-q"); dcmd.push_back("-o"+psname); dcmd.push_back(dviname); status=System(dcmd,0,true,"dvips"); } } else error("texpath failed"); if(!keep) { // Delete temporary files. unlink(texname.c_str()); if(!getSetting("keepaux")) unlink(auxname(prefix,"aux").c_str()); unlink(auxname(prefix,"log").c_str()); if(xe) { unlink(pdfname.c_str()); unlink(pdfname2.c_str()); } else unlink(dviname.c_str()); if(settings::context(texengine)) { unlink(auxname(prefix,"top").c_str()); unlink(auxname(prefix,"tua").c_str()); unlink(auxname(prefix,"tuc").c_str()); unlink(auxname(prefix,"tui").c_str()); } } return xe ? readpath(psname,keep,!legacygs,0.1) : readpath(psname,keep,false,0.12,-1.0); } patharray2 *textpath(stringarray *s, penarray *p) { size_t n=checkArrays(s,p); if(n == 0) return new array(0); string prefix=cleanpath(outname()); string outputname=auxname(prefix,getSetting("textoutformat")); string textname=auxname(prefix,getSetting("textextension")); std::ofstream text(textname.c_str()); if(!text) cannotwrite(textname); for(size_t i=0; i < n; ++i) { text << getSetting("textprologue") << newl << read(p,i).Font() << newl << read(s,i) << newl << getSetting("textepilogue") << endl; } text.close(); string psname=auxname(prefix,"ps"); std::ofstream ps(psname.c_str()); if(!ps) cannotwrite(psname); showpath(ps); mem::vector cmd; cmd.push_back(getSetting("textcommand")); push_split(cmd,getSetting("textcommandOptions")); cmd.push_back(textname); iopipestream typesetter(cmd); typesetter.block(true,false); mem::vector cmd2; cmd2.push_back(getSetting("gs")); cmd2.push_back("-q"); cmd2.push_back("-dNOCACHE"); cmd2.push_back("-dNOPAUSE"); cmd2.push_back("-dBATCH"); cmd2.push_back("-P"); if(safe) cmd2.push_back("-dSAFER"); cmd2.push_back("-sDEVICE="+getSetting("epsdriver")); cmd2.push_back("-sOutputFile=-"); cmd2.push_back("-"); iopipestream gs(cmd2,"gs","Ghostscript"); gs.block(false,false); // TODO: Simplify by connecting the pipes directly. while(true) { string out; if(typesetter.isopen()) { typesetter >> out; if(!out.empty()) gs << out; else if(!typesetter.running()) { typesetter.pipeclose(); gs.eof(); } } string out2; gs >> out2; if(out2.empty() && !gs.running()) break; ps << out2; } ps.close(); if(verbose > 2) cout << endl; bool keep=getSetting("keep"); if(!keep) // Delete temporary files. unlink(textname.c_str()); return readpath(psname,keep,false,0.1); } patharray *_strokepath(path g, pen p=CURRENTPEN) { array *P=new array(0); if(g.size() == 0) return P; string prefix=cleanpath(outname()); string psname=auxname(prefix,"ps"); bbox b; psfile ps(psname,false); ps.prologue(b); ps.verbatimline(ASYx); ps.verbatimline(ASYy); ps.verbatimline("/stroke {"+ASYinit+pathforall+"} bind def"); ps.resetpen(); ps.setpen(p); ps.write(g); ps.strokepath(); ps.stroke(p); ps.verbatimline("(M) "+currentpoint); ps.epilogue(); ps.close(); array *a=readpath(psname,getSetting("keep")); return a->size() > 0 ? read(a,0) : a; } ./asymptote-2.41/runlabel.symbols.h0000644000175000017500000000126413064427143017205 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(_strokepath); ADDSYMBOL(_texpath); ADDSYMBOL(align); ADDSYMBOL(f); ADDSYMBOL(g); ADDSYMBOL(label); ADDSYMBOL(labels); ADDSYMBOL(p); ADDSYMBOL(position); ADDSYMBOL(s); ADDSYMBOL(size); ADDSYMBOL(t); ADDSYMBOL(texsize); ADDSYMBOL(textpath); ./asymptote-2.41/bbox.h0000644000175000017500000001006613064427076014651 0ustar norbertnorbert/***** * bbox.h * Andy Hammerlindl 2002/06/06 * * Stores a rectangle that encloses a drawing object. *****/ #ifndef BBOX_H #define BBOX_H #include "pair.h" namespace camp { template inline T min(T a, T b) { return (a < b) ? a : b; } template inline T max(T a, T b) { return (a > b) ? a : b; } // The box that encloses a path struct bbox { bool empty; double left; double bottom; double right; double top; // Start bbox about the origin bbox() : empty(true), left(0.0), bottom(0.0), right(0.0), top(0.0) { } bbox(double left, double bottom, double right, double top) : empty(false), left(left), bottom(bottom), right(right), top(top) { } // Start a bbox with a point bbox(const pair& z) : empty(false), left(z.getx()), bottom(z.gety()), right(z.getx()), top(z.gety()) { } bool nonempty() const { return !empty; } // Add a point to a bbox bbox add(const pair& z) { double x = z.getx(), y = z.gety(); if (empty) { left = right = x; top = bottom = y; empty = false; } else { if (x < left) left = x; else if (x > right) right = x; if (y < bottom) bottom = y; else if (y > top) top = y; } return *this; } // Add a point to a nonempty bbox void addnonempty(const pair& z) { double x = z.getx(), y = z.gety(); if (x < left) left = x; else if (x > right) right = x; if (y < bottom) bottom = y; else if (y > top) top = y; } // Add a point to a nonempty bbox, updating bounding times void addnonempty(const pair& z, bbox& times, double t) { double x = z.getx(), y = z.gety(); if (x < left) { left = x; times.left = t; } else if (x > right) { right = x; times.right = t; } if (y < bottom) { bottom = y; times.bottom = t; } else if (y > top) { top = y; times.top = t; } } bbox operator+= (const pair& z) { add(z); return *this; } bbox operator*= (double x) { left *= x; right *= x; top *= x; bottom *=x; return *this; } // Add two bounding boxes friend bbox operator+ (const bbox& b1, const bbox& b2) { if (b1.empty) return b2; else if (b2.empty) return b1; else return bbox(min(b1.left, b2.left), max(b1.right, b2.right), min(b1.bottom, b2.bottom), max(b1.top, b2.top)); } // Add one bounding box to another void add(const bbox& b) { if (this->empty) *this = b; else if (!b.empty) { left = min(left, b.left); right = max(right, b.right); bottom = min(bottom, b.bottom); top = max(top, b.top); } } bbox operator+= (const bbox& b) { add(b); return *this; } void clip(const bbox& b) { if(this->empty) return; left = max(left, b.left); right = min(right, b.right); bottom = max(bottom, b.bottom); top = min(top, b.top); if(left > right || bottom > top) *this=bbox(); } void shift(const pair& p) { left += p.getx(); right += p.getx(); bottom += p.gety(); top += p.gety(); } pair Min() const { return pair(left,bottom); } pair Max() const { return pair(right,top); } double diameter() { return (Max()-Min()).length(); } bbox LowRes() const { return bbox(floor(left),floor(bottom),ceil(right),ceil(top)); } friend ostream& operator<< (ostream& out, const bbox& b) { out << b.left << " " << b.bottom << " " << b.right << " " << b.top; return out; } }; // Add results of both bounding boxes, say for a path and a pen. inline bbox pad(bbox b1, bbox b2) { if (b1.empty) return b2; else if (b2.empty) return b1; else { bbox b; b.empty = false; b.left = b1.left + b2.left; b.right = b1.right + b2.right; b.top = b1.top + b2.top; b.bottom = b1.bottom + b2.bottom; return b; } } } // namespace camp GC_DECLARE_PTRFREE(camp::bbox); #endif ./asymptote-2.41/runfile.symbols.h0000644000175000017500000000166413064427143017051 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(a); ADDSYMBOL(b); ADDSYMBOL(check); ADDSYMBOL(clear); ADDSYMBOL(close); ADDSYMBOL(comment); ADDSYMBOL(delete); ADDSYMBOL(digits); ADDSYMBOL(eof); ADDSYMBOL(eol); ADDSYMBOL(error); ADDSYMBOL(f); ADDSYMBOL(flush); ADDSYMBOL(from); ADDSYMBOL(getc); ADDSYMBOL(input); ADDSYMBOL(mktemp); ADDSYMBOL(mode); ADDSYMBOL(name); ADDSYMBOL(output); ADDSYMBOL(pos); ADDSYMBOL(precision); ADDSYMBOL(rename); ADDSYMBOL(s); ADDSYMBOL(seek); ADDSYMBOL(seekeof); ADDSYMBOL(tell); ADDSYMBOL(to); ADDSYMBOL(update); ./asymptote-2.41/gc-7.6.0.tar.gz0000644000175000017500000417330713064427103015737 0ustar norbertnorbert‹–¡Wì ¨N­z€m ÙŽmz.9ðùÔ6ƒ;Ì‹ó÷©?‰rH]‹úÁêøÁŠlÖ¶6›ä^84 kÃ<3| †Îæ†{µÒcxØÑÈQs¨¨f—Àý@íê´•6ijðu|î IsOëwGC¥{Bz}ò¹©ªÍÞð„(ÇUÑ4¥ €ú*é º¥øz'd¤)¯9$'ý‘JúŸ{DíhÞõgv©‰)õ)l`ânH-z$ (ñ|bÂnI8…!s߃×3˜z Ïa[d»ºNðݹmáÄ)%ÆØ;§ÄõBÛ¤1| [ Û…×€ÌJP›õì*ç̳ìÓ+Äô,€ä²¥X`(|{…”°{«+^X+.b5Ä;l„)Æ #H @`»¦!Ô ;œJ ÍD 8 FÖR–LhHÌX8†ÉÜwø”ˆgµRþd‘á-Œ,Û#oQŠ^—qí21£°m sÀ‰j;ß³/6ÐpB] ªBÉĬŽ ˜Kš2¬´Žš½«4['zëäàs§§Ã¿—[d³JÖˆJg¸ø‹)u 3ÂäÃ.Ùª¿­¿Â½úôß‘íS«T!üEi +³Z*q˜G^çht¤«Ê?FUiW>)ªÖé÷`ú6 j¶Ûz[Ù‡ACx¨Uʵ¶ÞR‡º¦´Fª¢÷úð„µ’^"ù«Önv»z§‡ZÐWõAŸÝje€ÛÙ¯4ƒ®Re³à[ù‡/|A}íXoª­ÃÎV 8´ë2ц¸,`š†£ „UF µV-õ¨êc‡ê|t@ÊÈü2Øï* uöe*¬ Am}Ðl}l(•¡˜ë\:ìÌ>Ž(ó!䬗óŽÄº1Ró´@\ô0çè€/çXõøzÇ» ¾i01ÛWö»ýÏŠ è¦k‚ÿWK ñØZvá5{‹¶zMc›¢­dQœJ+Ä ž»?4ž`Y€Ã±kÅ@Uƒ«šfÅ À|;Ïè.Ø\¨³Ò‰fé‡/ðÿ5¨4WP ¥2ß9Aå'¡7×/<ˆ`J ²_a›Å¸ œFÀ7ÔêÏkŽíF—õçÚÆö«Ì÷×¹÷ÛÙïܵÈO g>5äHˆ ßÓGÕ7YàbZ ~½Ñ±Px­¼Ò,ðáJoˆ!dÁøÎ>kP$·×‹ƒo@2hªàÔ•®~ÔT?à‰å  bkÖo5»:í· à%r©\Î!°CÄA(•*;í äWdL“(§.É/‰ÿWÞ¬º<þÃâš¿riÓytÙh­.a\ßu ‡lŒŽI£A}­sLbŒ¼Pß,çnÞãáàÎôgxõ–®AÒÔRv!A|½¹Ý-WyðFB ©ÖþÔTwÏ '¢uÈíB껵ž³Œ$ŽÇ$¸˜šÌ©^ýí”íAJ³¢¨ˆ¨÷^³ùø³*~à˜;¬Õõ "òÞžÖ.·UQbije²ç}XˆåA ©'¹‚ló4r€b» XƺçÑé ¸ººÎìﶳd#µ‰=ï›++˜‡Á°,ª>ìÞ‡+ÀŠÕ…ù 7zDFÜ•«nÉ¥ámúÂlDŸ=¢ÚlÕ7±¬å`³WW‰ž2|\É,t<÷W¸Às ßVg¯ÖïBʦÝmG…,% 1Ë>å²üÃA«U&OwÁ<;˜q¸É¸Z¬X±[þ¡%ªý²üÚ¥ÔÒÓÚƒn³]Èÿh:æÔ.Ý™H¶—訣†G«"3¯&¶»:ºåŒøVŒXN`÷/·âšsï®4´ ÿN4l7U,w>\¦¿J””ËQùæ–$ áý#²>¸%OÅÒÄ[/8]=°Òöy¨=ª4%Ì G0øÂpCì”p"i»Ä«ë,éëðÒ«ß„AäÓuÀLsêþ,Ç”ºkº´~«Ô|#94ÿ\ZRÊÖ›XëD/.:­jÈ×M!<ͨÖDø¢ûÐø«`¾r4žèÊPé}zk£îPË$ÉËŠsj ÑË3¤ˆæ¹‚éÄü#.摲&n°²/òviìm¼;hý¢k£Á ¯Ê‚Sö—}kÿ&ö¦’ï—¡oH­ äbPîƒ ‹Æâï:Æ1Ì¿ƒ¡”zz\Ò5‘¡:Rn™þÒ@–HCÀ…î¶A–DåZ (̤öâ~ÓI…Ñ¥Zzòýú¯º’ó_`ûѽñÎé“¿ðü×æVãåËüù¯WoßÏý×Æóy. jüôöí:þÿ94Ü öK—+×IÓ1\_Û’úAv–8¶Õ¨ÝùðaøéÄ@ZýÈÇ|ï3W0÷Ñ]e×ñÀSW챎]¨û»"Ï7J¥5bŸZô”6?a¡´·ß9ÐY1B"eÓsOíI}Š¥&ê¦tÖ ¥–¸p‘ìðÈvm”$L½È·æaFeƒ4y.;Åw·°a1<ßBüD …çûøüÂFž]=ìàŒÕí'4 ãn|„§y£<¸ BÊ8.ì#Ûß_Å•âY*ÂÏ#<Ðïî}ZàëÓ¥Ò¹g[0_2²•ÀþÕC‚ÕÒc"ß­HªÕÒ5…:x €^b_ 0°RQî$qÅÆsx­CZ¬Ù"¹ ¹Ã´v…Q‚\–Îæ!„„½H 4I2‰ &O” =$›(.|ŠIÙ‹±›1AAðÉwçú-ùÿôø×WqËýÿ›Æö«FÞÿoÂëïþÿ»ÿÿîÿ¿aÿŸ¸ù¹oŸ!ݘ˜:Þ¢¿Oߢ›´=æ%Áw´Ð üdaäÇGÓ‚x§Ä÷ÀE4 êä– °¨Ï”œQ:‡ NÖ‹åŸux|£àäLƒÅ àR‰…ÄŠ°ö‹ç· Ëb¡`â F ÏX&cvÃC<€>†¨Þþáq• ;_w„1ÎdUoЀ ð`7ÿŽ¨Ú†·x¢™³dnpÞ±€šK7È#vFÜÀ³üõ‘U.I(ý®Ä‰É¨/‰«Ç3¶ð”ÈÛYx Î|Gn!>åÁŽU9Òx üøcîaKÉ>äGÝy='¾2‹xHw!¤Iñ0 !ÎØóÀhèál¾³P?©ÕÀ9ø5¦ 'H× ˆ '¾K/ð±1³M<Ûè>hZéz§”¥ €ÐêìûoGÍc]í÷ñŒüPû}§„r,¢-×Ó-' »ds' –T1‡ xÁĘNXõ¾žI à\†RGf@å ,¿¬Íz]^ÅÓ·¨Â?7j8\JÚÁ•OâYæü9ùóO¿À#g`9UVvB>aÈÃk‹¦?}`'«ðÇ0‡¯~';#¼cÒSTrE'øfz³9˜ªtt£`ÄÂ¥‰`óm³)8„S‚=Cկ؜Þ6y/Ó ¼xQM„™M|±»@5û÷:dR+~%‰þµ3xøøZŠiŸÊ4DfHw É9a÷aCG“ è»”p,7p °n˜Yæ »3±H‚êO.y3òlŽ¦èÙüYðO·¼^P¦\N¼õ¥4_¨6ù™”IR, ü«j™¼Ã‹Èœ‘Ö,Ëß;ò̉pÕ¤¹=Aßêxî¤*ª {*!d…âY­âéˆÌÔR²rêû…K@¯èù>5çOcݧ +¬úæ+y“À ùr13m.T߆ÈÝó*‹W|ðL3Üáܸ eXKR;p[ø<¶Ÿ°.a§„Qa§¾ƒŸ‹”=¶Ñði2{+Ü“ÌSñ•lŸca"¡ÀŽŒÙÝ‘…=á\vJFƒ÷© fTçø*~›º œD‹@¼_ð,‘Á³ÞÀÎ5“Ièm°½âÂcÝ”Q’^ز§]ÜOª“²Í¬ì7»š²(ÄBVíã}ÂÈU0Pe—nÿ@dzu~Uȶü"~Xi÷ïåaU3 ðW(òʉ®þÓœ–J±J¬ô6(áåoäï)QôagŠ‚øÇQÀâ}PP0²üçSÊÎbö Fï2ÃÁ6,d˜$¹a]~—DzŒ4™@…*B1»žÂÈuŒ}….¢Þ§êÈ\àˆä:—6„‡cÀ¬Ö` î«míWò¼}.Q²”Ê›ÿ¯ÝøîCn$Æãº"°¯VûjØe¶²– [6èG Šx^kTwdaç#„´'¦5f'ÓMö‹©ŒvŠŸ‘2éø™tN1)ñ†A2Vzîë@<@^lð°Xù#½Q·{kÚ“É$-ŠB€]H–Šq6À˜‚0Äb3ÛÎjÂœìæ”aú»0ÔS,ÃVæ¨Q›yË6'µqÂAvº u\É:—L "xŠ°¥!Id4-žïNìsê Ï•ä‘¡ÇÞ±åÖ%ò0MaôÉä =¾­JnÛËé$ï,Ž6¤ÅÒK„™§¸ç*,%³‰Â@²ûØ.2Ûº|§ñ ¨1\t’X³Õìvñ3Ùu… Éx]HKR“n·ºx"壎çÉ!?UŽø{dîùYqžýÔZç­ñ*‹ àqE°¡Ä÷2jäR¿‹Ãz,¬§^ i// †ÿ6^§Õ˜»q „•ÈàE!Ÿe/L£ …!˜•Aö¢bÏh’IÛ¨½3Ïb?ßÆX |"q½š7ç ù”º&¦™.Dmý3ÅÌ;SxëP9)¶B2ŽÂ¸0ÇÅÄk==µMÆ8XJ¯pp‹ `õ3"‚KY%÷¹D©¢ì`NM¬åi¥'!‹p„˧­8¡.åÓšœh/$ÙõW‹b^„UZ¥ºžÄ˜*ÄR™óÍžc ÉLÒ2HÉûعQ!Hc’ØžJ2êa©w*a4@‚$ÿ[ðx§´*ñ‘\^4&˲˜zŽñV Dç…Ê âK}<Ì([îRÜiÈ9NCN›ä„r>eÊÄê]¼³Ç&.ÄrRe! å¤gù‚星3LjúÈÎKÌ` …[,Yb/OR¥¤e °kýa˜¨r‰ŠÕWs‘+¤™"ucG+™Ì*´>©ÇNzˆ±á`#`/>ŲÈ^Ä5Œ^R3b­7¶A¶!@VâÜöÈÅwI÷Í­:˛ٮÁ4ó*¥–æA„Æeí½k›±M¼• ˆ/R&*[RÑ/Ð4žË ÕLm>â„°â™paø.0©.7ï’¥hr (©ÕYz=‡¹µ,ÑYÔ–$K¢©´‹ñÜ{çÖ±€dÅ9²wËSòPçq±2ãÎå8©hÜõ k„-ÐaÕRXV:ë–õ¡â”UV—ÌÁbÄÕ…åÜ1ÄÉgÙÇ×¥Å;ÜiN‚²ÛÁœQâp~غØK¢¹èNØÄRfà/V_"¯ ÂÜñá)ßóchvLwî¬ ßuáo¡ W Õ{b¼ËÁÚ``ý«z^~ ¶P–f%7”³Â€"?hQŠ“ä¿ÖÈ•Ò—ãDºÔjËãjù×¥eßD³`H®yOÕÈ'—óUræqB23œT”êÆâW ˆUäh\àÎó…e–÷ã ›Äî%rZ`–KgÛu®–‚È4§rÕ1y³Í½>„Úå¡çA á^¥]¨´|/¢E¬\³z¶Îïw@--°;Þ$)°‹ôuÑä4yf½Ã~E½~S¿"#,ë˜J@qSŸ!»ÿ$4õ4bï¬2‰³ NlWš‚ ®ríÑz°·àÕŠ¤YPYth²'. å‚´ ŠIÓÀ­bR/IÛ—!¾ ÑM‡²Îö.¯,¯g°™æÙ׬b®§-ì0%êbmæñ¸»÷«¢ö+™ªÒzRND>É <ÕêbiöN:Ú³c, jŠŠ¹ ™ú VL]ö7:~ÄÆu®vˆã™g"9V]ÊLÄïWbNûìÏåñ¡>÷‚ KQÓ÷Ø…øë{‹–ÒϽþhÒ{ôHoÐ7 îÕ¯([6w –.â.áÀRʬ$‰¬rQÄõ#t¥’‰¥:Æ¿P()áò>þ]5v¥\:¬•Ì·éÚq‚Ä»lŸôšG˜Îf;väƪÏ?ù¤Wƒ–º¤ô`[Ü-0ùrùF’僷e‚–Ï–#¹Oʃ¸ì4L":©êá 0c(²¼~láO(²¬ Ë;$K¸<¿ '«P¡?AúGdãß«Ë´Y§F°XÃL"õ{U€!aNXxKÉ6{2@¬4× ) Úb7d¡ ’¶¾Ä±ÖeSö‹u<¥‰Qk€L•ØéVG¤÷`Z‘õº“ZÝvš!-BŒ‹6,õ"R…ÿ+ªèÊ•ëÙ=@¥’£•{—×có+Ã/8Öƒh'ÂÓ êˆô–Tè¥Içì‡ÛñéˆuéT‘8é\­“lËú³çŸ¼ß€2B××`>/»a-rãoc šÂùdl˜gÿÇÞ—7¦q$}¿ÿŠOÑA$€èð‘DŽ’`¶6ºVH±³HÁ#I³†€%­íýìo}ÎHv²Ç³û¾O,fzª¯êêêêª_­'HÍðQÒÐ%u½k9&©-âS½’’fñÿ0÷$}y>ó#­1ýÛû/Íð`Êíràtó^nMêJŸº‘‡?³/ä™áðžs8E·xèh)ï"ŒÌêûÒ£S¶&j—œ¯âl£`³G89]r8[ÛÕ(ºÁIý.¬ …:ÒVO†ÙHò–ðºø‘‹¹òw½‰üè-¨f~Ÿ/ÙƒöU¿<Ê#Õ‹Èù0ø¼ßÞŒ"¼ šëúI¹Üïâa5³ß/NÅæ:œ;5ÂcÿŽ|òQZYNËì¯ Rùà²Iu:(ÉÇAعy¿#ENe¥Ú˜ÞX:¿bpDF°ÈOŽ‘°ÄGxû ß²>ÇâQD…qàjh×t¢A¡ Ì#r ¶OTêŽ,¯vó)º¬Â9‘_ûöëͽS„‡oÏ\¯‹æhC #©‰Ç5áÅ]\áÕ}()¡|íä±&5 é4ºƒ¶ntW@ÙƒûÕdpÁž{ê 0©å^O.ùš.ƒQl »g¹A¢^¨[‹F˜A:;4ãx2ðcy•«±‹ŸvÂz}=FpŸ"½¨„ÀQ}¾«5®/6e`€b™¸z§.‡Õ¸%§Ü¼ÐŒ×ÑÏäžgú¦(xÐ1FT›§ä³k|°Î˜Ðkƒ çúÑ×? a[TC1”jXÝ×TAÝïV£7¾u‹~ÏpW¯Ùa _œ7|W´»œÜ2¨ÏXÍ×v 2µA9Ôˬ­"·MPÉô6Iqµb;º4 y@E™Ìî¡ç_àõ?±¼túÀ¹S¬+Ou „ ½>û¤£ºF1%óÄY¹N†²í°²œ½Vž)ø'Íbüƒºãë„WÍÍÆùO2ñ¶4”9N?|žøR8§± ¼§y6¥¼R;d›,ån?Î\ 6_¹Æó+OÀÄò´Mn­:¿Ø oL†Ñ*D¬þƒÚªºñB¶Þª˜<50ÚnýÑãñ„ì\#Ê›œmWZÆêþ¼X5×E³[³±1µ9òV /¨$ƒ‚sãzqr¯NP6w(© Çä–ùž¹ElHbîDª´š›9ͨúþ`{»Yˆ©±~pž$Ôê«çnã â´4» ÉÙ,ùÜb6ûjê’ÎìãE³ ¬¶š¦ øÊøi_9^ÌüÑ×_çtîcî¥N–H¹¿¿êåÙ–pm“•ü(ØžÃûØwÏHÏ h½`$¯ÐßiKçbbTmƪ^_äq(¸ÚÞ4ÍÃÏw>P¦ûû(jáývhòºÍü;.}Qqí_âV©Æ$a·š"ëñÒ5Ëq—Œ½ï¢·°ïLâëºâR¨-èÆFæÐh²ÛßXkÔ p’FýõŒh•+£²e£a­p_•K™ð¾ Ùôää¸szpÚÂ0sl^R_G¶— ÈÖ—$KP+µ$‡fVçÙ>ø3ë°¤'>ƒ©œmS»–…–ÈÖçõD½²óG§­—â²EeͽŠÓ1ùH÷ûÕ¬C÷³.ÉѦAÊOGv¦0_݆@² r,í~ꋤòÚï w›OKj0àh†‹Y1ìÐÙº£ìK•*yuãf±Û¬?}¬íA1L4òY‘69UÞP”wú‘bPøqd±(|ïÊÕ·íñÈëú=«¡X,¥Zq?Ìs©¨o`LE5$ÎÇcj"z$¤>„áÅ i‡FÁuCI*[65­S—5¿3h®Â7yC{ïà™;0~†Nú«JèH›~u}ÚóÇ.sÜÒc–ÑÓÔH¥G)ë«„e ד²`Û±ª…ü%‘XaÌrf1d¯Çmó‹àþK 9ø0ò/ONòÿeó@ÉÌTM6xl\ “¼8>|ÕêœÍ`G©6¥¨Ö`\,Ê4a(º,Ú[p’0w¥+ÀáÍ«¤šÇ¿ú™õù™Ãòfðàc5¸ŸuE|!§ÖezZ`´ªÏ,¯œI`¬«hÌ7ú0òEÂï.1ˆÀ™f>晋ìy µd_ÎÂr’ÄÜðYÙ‰“ãæævçùéNA»‡êhPN××píªv  .éÜw•î5lwK ­z5¶>{£«Uóç5K^O 3ÉÙ8å>EAP¡¶„eú­jRCT®#‚S0]8"v®ºl EÓÆ5`_g’ ¿P4 Çï÷8HÁ/!û‰_ŸE ¹ÛÚè•^Šp=~ÊFBÖ4÷6PäcÙ2ò½qLÚ$9¥ QȸÏA6Èþ‚dЃŽypä-´Á³»X#Ð LÒfzG‹²@ sòΊLâ¦ý(7ÇÉåžß‡³Í“¯”OÑLbÄ WSh®i ›âþ(’Æwà,ÂÓ‘ }qAþ’üñcBÒa(ŽªCØ:…®œ8ºCŒ!K³ß<8mîu~ÙzNêLšPvÙ9‰X°›´©ä­P[߯3Â5‚&yd6~…€&hàU@Ha‚C ÐÅžŽop Å1¢6 ¤ 2TÒhäÇÃHšÂÉú ÄñŽg(¤¬S‹ÙúpbŒû‘›óg:³ð‡Î âýܶ··:;»¯OTjW¼C)íR,ÙQ,©6Dœ˜ÄŒýtg3´â\Zœ"9ÁÀ,%™O/6¹°pŠâ ç£mœÚÈü‰‚ÌÄ!ý;¿ò†Cß5’GÁE°Jz¨¤•Eq—þÝ3'á8èËT3YwPúìäŽÛtµÈœ„ªÙ>Ö9jœ<ï)=Ω²«áJÄïíC[ÞN‡ÛPVó+.­º2—²^ìO†)ûíUþvxz”³fS_» šÚçKÕt½©æµÄÑyó;¨âcÎ,²v×bŠQŠ5áR\4[þ= ^þNð²Öéxc>aÃÝ›OåÎ"µëÝfdh~¬¢½Âeó"±&²Ä|ªùÂ! µ-L;ÜwoÈZ²Ÿt¢HµvÚ ã³µößïx’j®`ªdUÅœ¾¨@EtUÜuÐÓ¤3ß¿ÇÑ&5›|Ô™_ÔÏ<ùdò Ö’Yƒ9e MÑÝI[ñÃhru­TƒîdDð ŽÂ‚RwÆ1 ãä8(}fæáÄÕu¤"ݘœIj—Ü0 ë*Ç$*· £»×~oÒ'‡„`äÏAŠm›JAoÌ2žI Õ1‰³'É ©Ì„±aaÛ(׈¤*ÃÔî ˜¢pÒïWe&Mr¾ðoAøa{çlUEN=к¾bdâÎ'@s€J&,â.úIÍEJž‹f“s&”“å]Ä„'B IsV£ÛK¦î…ÒsH~Æ>šYßMapü>û؛Ǽòàƒ™È™G1÷%BZ1üK¢üåëbŸB­ &aè$BÕ“ËËü³l¡ÔŸ³TŒ9v‰j$!ãR&R!%F5}O’Ðõ•æž¿w;u–æè¸ûUÓRÍ᥺Mxú¸æ€ðIFöd¾^ 纚ëe0)Ýó³“,ÍB]¾t Ðw'<[ ˜Ú½„:èö6µA/&IΧ•&Çý7»o¥]xöPËTZSŠš¼J,z4 â­ìzÍN›³ŒXm…8+¤UýPÈ#ºzãÝ¡5(_TÏÕÏ T7Ì2²SÝ Käå¤wE0!ž¸Æéœ=Â-h—õз4“!í<¹LþãÙ¤fîøù¶•t°¾º#S_z÷ûW1ügÜyçõŸ¦[B.beÖ@@ Sk+¿}–‰#gÉä¾Ô!ݪJ]p>)²{ð¢Ó:9<†d³µ H@øVGS[1hÙ…÷òèDO÷í¤SælZ@ªÈ,ïšóŠÈj ^±•Ê!É=3å,Ê)3e[nà© ë?¤n³2fÍúLÑ1gϲ1¦\ö¦g?_Ž¥[.ñÐreØôÖ¸¢Û¦z‘ékyuúÀNb³%6FN“¦MVâ¥å¹;ú1ÛA¾¯ŒŽÆÙ1žè5íð¨ðàóÅ¥Yšô  ³´‚ÔjÌe³öŬÍÇäuieIøønHƒ¡ý‡9˜À‚Ížv‚sG "-0¨ê±ÂØ h'šuµ¢Ò¨Š=ÝmÈsFÍ›çœ0‰E0àœ«ý;ÚQé$„ðYèÓ°1ôÉŒãÙ­¦‚Ô#ä…íBKóEßïÍ‹dÇÊ}îÚ÷—ó·ÿh€ªƒsÎèÿŽ® Æ4'7Ä´xé Ž+lÁ4çkØ°Â “è€Öˆ DšR vvvš{»k¢_MÁ]Û 4ÂÈ&”§_kŽ%]4—ï*‘Çà"E/Q@ú•¥ü ðði„“D)ìh”BkLþ˜xgЗ‚N}šàeË…ã o ÊEs»Áfd¥]Ûi ‡Â²1gñ )N°Vób–í–œëøôHjWÜáõZÉ<×¥O=:nf“ïAùšq Ç0:1«}"ŹUä½²Ôä[–ç ¨§“aŒG`sgÑC;Cч?ût£JqNÁ…¡Ë‡ìK¾Õ&ëd¼ˆTôéZQ#(þÈïÉ&ã5pbKä%—§M?´éðí쀂H8‹ßOaCÔ !²ïvƒï•óoXƒq9‡?Óep³„ɸf±‘í‘ìhy;Ö²®r\ ­Ð`pþ:>›W 4ðÄN£jm´AwIè_ã]ÌŸ‡Æ¹(T×¼ØCE%ã(ºÀÒÞŽá˜ù‰•\å»*ñ³•Ä§! `šF/­‘ Ä#6œÂº[EêÄ‘åÚÔEPüÐtŸß§´2±âÌ” åÓiö_àÛ™j†éé³{MüèÅwa÷z…Ñ$îß52ZEö¢(öU¢ñ—*HMn®‘JF>„¦A{Øsd—Žqì]ú&åh?}ìÚûoDd¾%%Õ•‚”ª‚ a¸p´âû±~B‘È,E}OÛvÿŽùQ‚¯d¨ %2yà_(¢£‹¿óWmüïy#zÛQ­³I:š¿KXoü1¥µï\ã ±¾ý˜Ç94)m×ð Å•O©9B«²åàÿ@H×2!µP¹ÒØ\é®g¨ÊùkEš¶qX‹Ö ¢ÞJÅ>ñ”ÁØ~Üñ fÆìcDõe`ãÜdöp™4#€)çØÈá±Ìû.ˆk^ò´c‘`¿PLJ«mõ<"yÉ£í§FæÛ$ù¿5`v÷Ì€ñ:ͽNsþ­’Æ&ª°#+$u˜¸Už+h:ˆí;4Ù»‚¥ypBTÜ!M!f0Ð\­•ë†?æ³²r€#k-b4ÿŽvê>PÆ’WŠˆ"¢õ^6ØÚrcÆ€&êw(Æ”èQ;êʃ<ò|E@*ÝÒ3-dYùÞ¹ù_ááÿò¿þÉÿš&ó]}meå±xéßÀ©w\?‚ÕázP1œà£!°6áHì…°èöGÿK"û5‰¬y ƒt)£¼ÅQ%M…)É.5“tÖ~„ MT"Ú¦<ïàîÐ÷‚‘.R[·Œ¿ r„®/0?ý„,L¹˜27OÖ@ Œ Vº=h$bL¯/úoÅÒ’•½Ë}‘¾ C=¿ +±{ÍuV*ûÍׇÏÿò¸ÿto»õõjÕÀM:ÄìPbUmà)„$…fÉ¥j"]ÅÒ´ ¨·õœbì*W—“K&¤³ ¿Ö°ÊCh'‚3ð-ȉ]$ÊXƒŽ<ßÎé@ ÈW!^ûE——!tïû9´{tÇÁÕ¤‹ÉÝV¡Öhnó@£Dj$iˆäÚ¿¡:V¹uTö_UJžä1§‘{K!vúÞ)™+(Žv_àÝáÎNç¨ùb;3’äâÉq³óüד햲0t9™ÅPžô/Yx ÷ŠxœzUQˆ35²‚ºªí„—ضL>×VÎÓPNŸVmó‡3Þ^´ëZ¹Ûyy¸G玟+Šÿú¥|xz°uzÔ‘LK8¬•¾}W•CA`ìNëo“ÃÎs¤Ò2…æC•VGÑ$\?Õ!óÈ/¬Èã¹ áÍ¿¸û¶s Ú7Ý’šû¦ÚÕÿ¨cÅ"òˆ¯Q„G—Ú²cû6‰³C»#7\8ò"š F·Àá´þjÒX­9VíxÜ÷Ž%ÌsU›lD"ÆÀ)® ?/0 Ø^­°ïvöOö›Gi¯­ëŒÐ`JüÑa¬A8^&®ŠgÕë^Ôšû)é)εÊ0™´ˆQ”ôè˜S“ëÞnê¼­PlðÄ ôǵ”Áï“óágäÒG0—&¯zI¼|¾÷³ÉhòÈ?ˆÕŒñ¦UÍ]éI¢_oØu¤ÓõdõïÖ·ï27³ì¢<²éçY±ÜËÚ…q+Ò)ÝÉŒNWãˆtÔq~]?ÚËEþ5î`× ƒzw9 •¤úxO¡ÏXë0|äê|Õx°˜ž +–%¼éäO{ÌÜb<-žž+FçÖzÄ;LÆb²4—´›º&¡TS§lm‡ŽpŠoËÄJöU±ÕšO™æ@(ËY´î‘.ù —ZÉA6ë¸:SÆ‚¬Îä#eš×#¨D¢s´€”+ô”ü"‘ÄPm¸ð–ŽœjÿÖDÕ'L ­øÝk¼Êjœ>~x| _êï(#ÿ÷ úžË«-ö]Åí†.HŸ†™`bt×{åÃ.t•&Ï›J’ÿ ˜&~ çâ óö­ø^°®úóîÁVËb›Ö~so¯//íiOiéBõmž_ +¡•jô•ô[ÄŸ°Oµû#÷{ˆî_U,¥X™öÛý«óªåìaIèôЕÜR¡M !ZXOwe8×^¥ö’ûk1êÙÚŒúß´Kä»ÚúŸ­åXð~S9í2¦•ŠþUºSt„€ešœQöîS¥otÅfÐiâ“¥IÕh&|o¸¥SìáV¤ûžÆýѯòÎf_}•Úœ¿È>ÖÒ)6¹•'2ù&­Áz‚ñ±^}–ݺh8'á¬|rK<œ¸hñ.¦â½ÚOí¼8|Î@Q+uT{ÔA—v3܉¡Õyà*ÔA—»Íbú’ÖÞá²íj+Õ© è_<³#Éä  8ü˜HëðüEçåÖq ¯\ÿ$ úbväÓ££ÃãåÖ¾°J$üÆ$š¸¥Ì ¿Jð·Ù€H£ µBƒ‡Wò$%ﺀ”N)÷ Œ0DUƒìŠçp}C<òûþ;øªá@€Ï³tGûŒíÅə޿èxäšíK`I~Î}‡„.åèÓ;|:wæ¾GÊۗ͜ÕJ`5›•ø½³ÄR¬g}Mœ—°˜6¤y018&²ŒH7ÄÍý=Øe:Í“Î>]2yx­$cÅçúÅ&†O²K‹æ¬+ÄÓ@pà‘Ãë›x>åŸ@YÁÉÿI;%µñÂ'µäNô&œÏXi‚Ô5¬)î]\™ïXMÒ ;dE¨du ¶²óçP9Qñ{‹Kð¡Ë3ÔGÏÎDAœGã1[>^tu-4Öڃ勉ù“دœŠX¨€»¿þ¼­dÄöqËz‡’'52®í$WçJnõö`ærI¦ÎÈ?!÷¯Ò:ÛE‡’ø–ˆ5Ê1‚¶b)i¤qi{«cìK-W“0õˆ©Û‰#ºü÷ðq5¯B÷¬Wþ¸EƒÎebˆÆÕš~SØ5Cך®u:z6{¾2÷=«®Ô^§=X˜DZ‰Í:Á%•™yZ‰è‡EGã°1ÍR~ã2#ZÒÉD#éN¤Å ²øbÂr‰3ç$ðÉOûš'‘ø±Åùüa JÛ¾—ªrìÚ+ç®&“[puÞ‚6§¾:<Þ"N­âçkç&;žÈ øÏÖç²÷¤Ôòueâ#bmeèL™àE.Þ¿>¦Àž7²Èγ„SbL~$©Y—óî:Ö¥Yçª]xý9ÜÖáUŸ5õÁ{RîŽ0{C™}2K²<]eH7ûõlÎã7¼•6§œ33–}‹³tr¼s¼ 8õˆ25TËŒ.”, Sî¯2V¦­ï¯ge|a},w†}oBÏô%Üû„t°à½*·ÓÍP2†¬š«±c3wú90}l¿ßÉ0_¥”çde uÆÉ!° ÇžæžY¬%Ž*bÇI•í’÷Ù1åeŽ9²Æhmæ´`Ÿ/µ‘to¡÷~Ežë¸D«Ê1XÛïÓr¦hÚ®$]f“©­j᦬úvCÍ‘XµõrÒ·Zzï†Þ§…ptjÕg÷Ù õ$”Ç Œ«Ü=;¥Oÿ'î#,ÖÍ= ðpéÀ<³Kcÿ"™Ü@Ø؆”Mf<òˆAlC8V`© ??–Ûx؃¦yãÝÍáƒk‘ú·Þ gÊâérøa’Wùw_€êwãÅúæ ÍÒQh<½Ù§šÜ¤/ül}gGæfÌS™¬.èkó‚§æ/À &¬.—”ödäSQpý;‰é\£},äéö((K pHØp>Ω9«v ¬)Z¥¼IÈÓqŒbS“0y ÿl¡éRÔ­Rz¹ZHBʵ»_áª==[}óùÞ¶Ö‹¥=ºyrˆ!àN™ÄGF¯IõD?Õs]«î³}ÅaØCb.ŒÁ þÅów^}œ%FZ|Ã>" Þôm Fsc™¬L]\* y€ÞÖR¹Ÿ 17Ï\KaΟš´Î?szšÉùqs äÌ‘Nœk¢L·vQŸ“öw瘓xÙÙ=輄•¿}\e¤u’2¼W’ööG£‡M¬ ò ”Zò‘î^}¢‡‘xßKÑ{q'©)*]¦5¡râF>œ`»ä}G(:”îÆ'ÜåÉPÅybà{!…ÊDZÃrÐM:q”:t2‚lŠ)½çc<]0S)Ô t2é ‚1txXÁäª׸¯ä^”³#”MqÕ[Ôº“ï‰/¤šN:x«Š/¹3}$°zW™`¯ýþqÒC±bqÍÏ4K*P:‰2K Í»=˜dŠÃ ¼ÂÔ@^½ ‡IíÞ{‡zØH(POü}2À<ÇìTBQ!Ÿ$Nù”x:‹ßw}û”˜Üº«mî5wAÏsÁ9HQДöêàœ¤gÎð4ÆÍ>ÿ¨ÃKõâ¶]U K8‰MˆŠŽÿÀCtÿ8iJ:5Ëp.„…aßSjÊ·ã¬æy2Ä4‹TÂi"'8ÅÁÀS3æó„‘+-¾½åS£ëB*_«ü[ é£Î™ . T··{púÚ¾¤^?¸j”Îî$FSJú29¯\b}‹Ž]F!Jà@a¹A$)ÌÖMy„&»ð…bð,åáLÓ{ÉǸ:wpXsg ±D0Q–L;^)š:êÅ©Þû_e4¨–|Š€cîñõUóø RÜñ‚>ëÅ—è3c¾h ">FmÊ­‹íÛ!:GtG^|}k URi ,¼â1<ÉM›ghÏ&H15Õ²±!Rž¼ X°Žüѵ7ŒñË°¹@hqÆ=U¡îvW>ŸwÔxý^¼ò#N³°¼$\ÍJ;™1¹8©jŽúÉIëÏ?_÷›'u³(líÄY³*w‹Ò8¹+YŽz ^“È0Û£zl¿' Ÿœb2›ŒÙJÕ('ö†Ûúëñ‰U¾²z*¾ÿ^TèÎíobY¬U9 µ³v•`XR{,%t•øƒ«ìÈíV„!/è¸#ŦÀ{›Ø„ÿ å×úCëNÛ9@'6¾l1Éù„5cY´vì+Z•4„uyâPÐûÉ€ƒ ’ÑÆb_§] Ì>hTÿF’ém'R±P.FPÊ<ö2v%cÉ^Sz˜,æóÃ¥¹RË®±ŸYÙÌú”`KåÁyÎÂô”YGáˆ÷ø&RI9QôºcVJ×û»×%À?JøâSê–»Ç\ [ Œ« Ã«‡“aã>šØÇû)UÜE[±¢ChÙ½Ép,~PéFˆ %¹ZŠzSÄàt^‰«væpþÊ8¸ðï<5/3œÒp:0ÊöÁáþö~2£Œ1z+†~¾yxôk%® å{`U“ˆHíVú<̃P¥Áf¬~"½§;Š”´%8);k +¶à#.3\MÑb\ ÄÃ!¾ŒËDÂC}¡{žBh@(„QÐ#ì&Ë¡Sã&ûþ fÈDG&T>ø$µ„“[i0™¢î«ljŠBÅ–a&6ÙX$Tù¥Y'LñÎx¤·IüÇe%.ƒÁÎÏÌý7Ü59œ‚/°¨‘¸ãà™æBŒ/ŸÂ}ðð¬C˜?I'<™Áƒ¶cu‚ ±÷Hµ† ¬ÚMkÃtê)Ÿ­”üiÆÃåN9¾rÆ& ¹2Ïr`gˆHô^Ún˜Ðž¯c\L¬ÌT‰d,–ÉÕhý“rH 3£Xe+]0ðý‚5ùñ?žI¸¶+J&Sj†åOú˜†œ5ù @=tÒü--]öeMtÁª@ŠÓñ*ÑÛgÓóe8ogg8渞jI̓Ö.™’ʬT î@ÛC±Öh4\CNÞÞá v*h™C]?ºbwÒKJšDCù%ˆ"ï-Ý/6Åâ—ý *Þ™‡¶aMTtôY? ¯Èý¤Û £Ô!#/ñnåè丢îI¬»“ëjJ³Ì2!žéfT¦Z^õ®~jÑÈB­—c­DQÀH~ …†Ÿ¢µ„e·ŠÕ-cöµ‹kë‘PñdÄ;–È:ZºJÉœMJcö~j‡$ã‰tL0öšdçIÒIó2Á0¥nÃæ6Gᨠé‚M±,­ ûŠ&G~ëÕ¶!èÂoNµoü…a@Öë{µà¤ÏýÛômzØ;Oy_›Ú¾ß.ŠB†fœ¼Ó×ฒè\õBU|êè}•·t:N^×Ý/m\¦qìغaæº: RÝî¡T¸4¹ rn·¤Ü¥k }DC,J:§ k°ÉMà›†‹G–éL­ÀÌ‚± Ja‡Î…~šƒ`Š8Ή"=3]<•ÿêwS ÿº„µ Å<3q4e ÙÒÔµû„žêó¬°#òr0"ÚË´äéox_ïö0ßÙ[sñŸÉTdžcž+Â)aëŽ'¶–‚ì¯óãäæLÍ€¸¤ýJºùv}²9î•.™µ»·‚H$Ô`eƒÐž:›†“!ï‚4©ø:»“‡]•ÛwIßõü/aèqà„Qd”âzoUf–3K÷ÑcæÝÝçÑŸ¸Ì”ðSD{Â#í[nÿ™"îSÚ‹û˜¸ wÌÌ÷¾ý&ÏUc$vž«êí˜=‘MaÞ«u¹¼§%!œÔ2Ö K–i¶^§jÄ‹9:†:w-péjZݼ`Ã$]¥$¯@¯}6ìîÒ Óu¾>}íÅŒé\’›Ò€sPÐ.¤‡ b³Ö2ñ!W,]]Kà>z²öÍÿð?ÿŒÿ}±Ð:jo*O–G’W”!ц<™03ŒÈ¸9a\øbÁ‹"Õ3[\‚”¢ôO°‚[P 3 \èX\Bð²±ÒJ…ÉåÖ$U(Qcó½<;áöÒ†Ã;NŒ×(ô£hÝ‹ÇÐ&hd:q_,U‹‰•I½¥†wChø#èèjaáâj²€#}6ƒþ èξŠÙ@pDjxàkx@«ûM‚}ïÛ2®ªù¢!ŽÖhD ä±Ï ãa£&Lñ¿fýüçÇˤhüæ›'yòŸÄ%Éÿ5Ø'Ö°Ü7?ùâÉÿäÿŸ:ÿýñ?£‹8¢TCƒÇŸÿûqÞþ¿úè›oëùüÍ7°ÿ¯­­­üoÿÿ3þ·(ÜYõºðºœä"†Q|yG€m²ŸÃµÓ Q_ª7'ãöáKø³°HZ¨…è OœUDô~RÃ?¿¡ÿ~‡ÿ]]…Ç«OÄZd[Ñåøwq$°C)9F 6=|5Bd¼"­n4‹¿Pzêczè€õ4¨¤` ²ªÙ{cIýmAN…Ve„ÓM#‰|tßv µéºôŸeLðdp´ÑÌLGÉh¤î°£^3Æ]L±^´íxR«‘€Ù„®áÐá3ø½¤ž$&¦@ýÂüþ-†qZwÆ껤\]rÖÈJyÙp[E6ôŒC•M]²Ô ˜w<ÌjÈoºñá˜ç‰æfgk{çô@T sÍSþQ­¡›ë {ÍVVé,ÌYªèÌ8xÜ‘vÎa|‡Zž¾1°Tðº÷Ýtá“æÑn ‡óâÅYøÿÆ4B2'‘ý>¼Rsn²üàU™J;ar0èd©Ý—A͈}V#Ñ„«ºHnzby– wYÒX¶† •c„Ä\`ÞqsmИC±O)‡ƒbé™O¾뜲:‡”.$$^n$ _SG€-ÉL“Gvfë}(*Öýv…A}ƒÃnÌÀl°*ùóBsâ =´rª=²84ª4–¬ÀKn`nÅÕTÓSSn>´hãsêOñ‹×/6=ykåãBCža’•Ä†}åP5/± ÐÌÍå˜@£ ã {ú1M„5"½Ýô©2 câ§(1‘쯴áÓbª ugz$:ŸÜHQC|ÒçE֘ŀ…ôj Ã ÀRg«÷Bv©¾ ,k dºñuoäÝàƒ¡jhÖ —a¨@¯§ó·_}º¬¥ûQ/Œ%$MCD‘Ä°NBî²ßpšA¢ÀIq3,¿2Z¯‹å¡kµ¢Ó¨«$ÓPU¼õý¡Œ{¥‘I|ÑÙ~q¼}$4¬w‰;{']`óåa(·öš­—nC¦”˦Øz¹½·×Ù=Ø=I4'ý>‡À¯-ìûQóäe§¹û:³9É2”¨Å{'ûÍ݃Œ†Øo³›qÒ|ñKó8»ò]z.öN¶ö:Ûhȇ.¶Nš{{éyÍ(“Céèxûðhû =¯ÎÛüaÜ<Ü?ÚÝÛ>ÎC] ›Þhd½ÉhµäY¤„ÍãÍ—»¿lçòv²\ÎTÿÚÙÚþvZÛ{;™½I–ÉoMýæfg³s˜Û.»Ìô^¾loÑ¥!iáÒÏíi²l>åÃçÙÚ=Θw÷}Ûä~m½œ1>0'ØÚÍímµÐr»–ûÁô‘ƒ¿;­“ãÝ£©ÜaJeH>\þûÍ»›’ϼË™Ðâ§92S¾ÌÿôxÓ5wvöš/RíÏ*“¦´µ}ƒ5ør{óçÎþöÉËí©ÌB³x[.jÄL=>9Ù>q©ÒÓgíÅÞáó&þ¹ÿ)ìmOeùŒâó¶þ§u®–eNr’=[/q$§/ySl ½ÃÖ L Šß­í|æMKгwÕŒ­;õ:ÿóÖöVþÇø2C¦‚d{ÞlÁ´¿!Þí·Y«a~ˆÿí5O¶Ó"9³T5©ÝL¥•Q&II¯:ýd¯’¯§ðøöÉéQ¾àå×Ùۯѭ½ÍƒìMÓ.0}•é”ðÔó©2Q4W™Ù<<ØÙ}‘«ÏÈ×bj·EªÊN³u’«ÓdÊÑ)š°t_¿ÎÑ+ÔÛ)ï|óÍ”ñí”_lþeÊÇø6f¸q=’9úºSjÚ dRÊ,1«M¯_Ï×*SnúäÌnY.¥d0sµÍ*7}îg¶-ŸR²N„Ÿ§mV¹é¬5³mù”’uÏÇhÇópÚñlV;žƒ×2EHú}vCv@x“ å2›áÈ q¼ý×Ó]ØL;[ÍãW»,M[iR9妜™7Ž²Å‚] ó”¹}Ô<Þƶó×ÓC´43•S.ïÜ:ëD>çqœŠe‹Ký*÷³Íܯ6s?Ê–ëú~–¾ÿ‰†lÙÿœ·?³î=^{º–¸ÿY}úÍãÿÝÿü9÷?/ýþвf2#è„=™ÎÇõ¥º1#ÏyùSÿô»ŸpðKCüâM® }|ïó_síó­°Wád$%ûe+ßF µ¢°Ø‡Ý6.^ÙonÖñ(Rüˆ~ ÷h}îÿt“X9Uœ× mzÊ?;çPøbèãÉE<®”V;Ò´µý›WÿG³þ·•úwsl|Çi5œ >_“ñ2q y9X4h•ðåŽ] Þ¶—2¯ž!0í*Þ{°çÔÈDÒ/ ñ%Î-ÅËÈ“] ;6-"Òޤའ¦6k$ÇÑtѼLOc»´ŠcVZ;¯V{aŸ÷Ü:¬¢’SLIz7»Ö ñ¨*íÓïœBQZUcX.­•q¾ÚçX»5o»;3¦ ÄÁN: µÁ‡'øãü~ü—9ÃÛ·~×3“ÇùãZ)ÁLu*‡0\©)Ðí—3Õôà?èÇc‡…Oö¶[-ùA+k<öv['v»>aÜPýQˆˆaÊÉ⯭Úi˜–áMãˆ||SãöFŽ^)yÝk.qH5À@À‹xØÆøƒ¡ñ‚bÖZaA±×ô¡5ñ›æ[kM´K+P=sňšªyËb‘‚Ž“ŸÑÄ2˜Ø¬ÃÜi»ÏTAQ{Èé.DFׯ+·ÊƒÁF—b/ˆõtyqu1Qd¯ép›2 bïv„2“œÎWº’ªÛ'8[üÈÙ ‹÷`Ûa|#‰2ñ™Y'ŒÛŠwtñ Dp+žH¹ …ŠMÿ6м3 “bøÆÆqá\DÜØ(RŒ£o ùòø­ ßãœÓE ã`Ù‡•\¡éûLy†bQ ˜ÿñ²Š21^|/ÔóCi:A¤(G"&I_/ˆ,!`š Ú½~4ô±§m?D4?Ø#øö¼:›ÀM>Z«÷ú}‹=J}‹Œé)Cðí­O¡ â<ô(ù7 ¢ ¦ç F„E…Àkäÿ ûÊ^’æ4™°Š®æŠW4t^íž¼dSýlÝTGlBÜ T³ì‡çRÈÚ-t³+ñ‚Ûz¡ÃÀü)¬Ÿ¨cÿŽß;5R_š»¯;­C”l¤E›)±ðy5%—QVÏ!Åâ"–Ûgw ‡Gþ²ÕŠµ²Ü\ô\½šõ§Ï¡VçhÕTAR©¦‡ Õ~Œ£É=(îPÍ&ݤý[¶–Üò6¼ƒ|€jb÷'YY®~›VGI»Ò{tºÝÔº…Tçæ¼wp|ÄÁQÞ;Ž-Žï±ÝÉ]'M¹JµÝ拃ÃT­üÿðãÒÊ:ú:¢C=g `[†—IˆQàS·v–º‹&…á„s'–¹ª²Ú{ƒ>’-)Ç:µ¢Ì¾× ET(|ÔþLÅ…×} -èÅ®ëÐ:Ì4IªamÉFz²þÞb¥ÚÐ}‹Ð‚ñ„p†Éë—ãÆô9³öºBz¯Ã™+þvé:"ºÂR}©Þ½»‚2KâƒÀ_¨ñFýÞC‡i]Þ”¶—Ü™Q”p“‡˜ÔFQ†_Fƒ]9ŒÊ| ŠØš=HYí£ ŸŠ¦N³®FçlFé÷5&ÚÄVZ­2Æÿô«Ìd0ØÍãòÛJ[é|Vi¶:/·÷ŽÈ÷æàE¥®Ÿ¾_ÿiãèç­ŸÖø U£6 I©Ú¢ß0f ­ Êþmœç6µMdªªòáFéýQsóçæ‹íºü˜ãÓYfrKÞ¡ŸuH±ORÑîp PÄ¢´"…(ùòÝ’ŠÂMaÿŽ¢·ÂcžñFWb tbÆœ•]t=é3 Ì=€5B§cyXŽFÀ÷Wh1~&zQa¾´Ðˆ’®øºßÅýU|ÆÇ ‘ ÂÂe kêE¡/ÿLQæÇrÀPü«ir æÏn•±2Œ„%^éHçrü7¶´s–Y!ÆzuíÓ"‚±ÀØpDàËd5KñvZQ˜¾SO9:UÚwHO×ÏfÂ*í0bMvQBÛÉKy½à¾ÔÏß,#@ÊV#@õ”í`Aœé¦1OÉnU“ºæ~²Å"Õ‹Jé'ì´óQ² "Ý0ùÙƒ7‘Œ–¹T¡tKh›Iì3tìý,û ²SûŒÜfèmz›‘ÿÜm†úùÛ ½è6# ³¶*–»ÍðXαÍ8MýœÛ µ o›á—ém&ùþ¿x—Ñãó¹v&˜?¹9»LÄ;³ÃhûÖŒ&Áe; µ`Ö“oN»ï3Òü;Œ^ÞÞa¸Óv˜9êHvkÊ#©‰T/¦î0öWîÃÏ·Ãè:¦î0v©äc›-çßgfí6Ž5gϱ˔eÔ^9ËÚú'ï?®«iÞ.d—zà^”°(Oß‘ìÂÉ}‰¾Ä±ÿðI ÊäTšy[TV?>ãF… éȆälWN‘ü³Q¢ØïÞ•²Ï´ƒ9dgqÈ ³“Ù_ZûXò1íf"c;›Î™ÆŒ•Ó¦û›»Šr¯dî¹×ÍM5{ß;Mï{I±òÐÝÏiÙg„Ãɸ–Ó÷³Ã9ãíÊ?×ý§÷9{ú“l™ 3}‹Ï(«öùÔeá'ïñèQ7÷“9ûû÷‚SíðoåÔS¼îLoùjÃÇöè-?+×Ä&Òå }<}ó§R›b˜26þD‰ìMëWÿ5O±}ê¿P{UêlÛèÈ;øǾwÐ+búŸ©•Óî²ÃèÆáe k·ŸÔ¿;?_ªá¶Ë·)û­|£B*G££Ã‚Ž€†_5I†Î!XäžSSÆ̵÷ïjÚsgw@‚o'èû IgûBIyqpªgÆ"¸ [âðù_0öpk›S#¤D¹>€!z ò„ª¤¤FíÕÝkô+CÄ8D©@”xvt³É¡oVE9=Z«63ÍÈÓǨz–Þ[_Ô­}´'Dˆ)¢‰Gƒùs³Íó"5–þË–U’çàOûš×½ͯAiŸÄÿ­,!ÞÀ*xÆ4‚ ³L¾nœü*¶_ÁÙ·µ½…›â±ØÝ?ÚÛÝÞÕ¨yð«8mm#½æ‰øõðôX¾:Ç»­Ÿ ñÈÄؾ†“w”H¦`&eqÄÁ·c‰‰¾žð)*F½4œŒ†QŒ)54t)éigѺ2qíÈ{sI)À`âOªó‘éKÁ»wR—ëù¼ËFvÐ/‡÷%z­’-FDÔ9Áʾ§B]ÕxãÅ:ˆ \±ÒÔ(¢Lº«­™…c*BÐdh/Å#:~¨PNAÇXHèì7ÿú¦ód÷æ¿pnf ¾Z›ÔÉÕÏ’Ä`‚R£¦nC ´Ú+õïοn7Îs=Âíîf½›êœ* qÉø—ìåÆ¿{‰R²eö©/ÿvViSÎå?KgÕ64ë¼±TZ>[]¾*¿IÅ¡šM¶Ýþ ˆ,©Œ*ò©Ã˜ßúŒšt=–Mj½”§u86¬¯›•õ(Q{=»4^Âsƒ6§¸ö² „M °¸FEл$» º›èÿF99"e²´Áq†ùƒY½sz@[ÄHN/•R=ÏÎ0*Ú'”Õðï t\6c ã,£¡Œ‚S€#˜l>›Ú€ üŒ €ÙI5žMoF»Ïßkšið6RãÍ}ÚH ƒUþ*ßHµ—Ï(±‘’ü?=ñ!øÿñäÊ}fô—™øÿ+¯$ñ_­®ýOÿû³ðÿÕ¬#ö¿\A¯{½è{wœd,ûðÿ3ñ_¾†ÿ’þòûå©5 òKëôEó8÷e¥a_úãÎߣ ¬´¶j¢yüb½öŽ_¬5Ù×ä¨P¢Þz‰Ÿ’E“>å¿`ÆÈ;zû\ÛSceÍ Fx3® Œ ùàÀ÷{”oôUÞÊ€!<5f>P¢µÆÓ5• µ~ßõëÐàæ~Kƒ.®½ž¸˜\ÅŽ1\Ž†Æô¨´K‹:M_4 ùt ÿƒÁ§ÖõÙÁÿ‡?;çÕÒŠ4—"dÁupI¡¸üGé§jµªÐ½´e$«9Ly-Ñ œjW±qóÕ+™¡ë* ·öÌÏÄÌï{a0œ f>Š4‚Ó ëÄâT:™¼ÑÖ!´zƈW€òò:ó•ŒYk<ùN¥!ø}a6MXqJ€¹È3M—½>wÇ‘û‘œÔ^—ÞØëWÈð ,†~[¾J@&—ºá\}9¡™`55=j©;ÄÉ™…MB*‡jÙª}ÊÁÞs"¬ù¾jÑ÷÷ÁÂǾÌÌa“˜ÁLÁ˜0ÀþHðÄ°?‰EY×W.sÊ´,#•¬]B3]ŽP¸(M¼;„…î÷žél ‚ûG%cJ‰$Z,* R¾#oŒkù9Ée<ÿ“…Ûú€NÊ~¯ÊͲÚÉæ&c4…ñÇú†"Fþ;„¯À”Íë¥'*š«°$zCP%ƒáø®jåša (”ðSdT¦XÊIxß/EìC”Ë¡§ÇÎêÝ”{ò'™ŸG6ể‹žpt,¼›U¹À¯~V1nÿ»&å€\ùÑà‰ÐÆpt Ç‹× ‡è`ÝPZ§;ð/ò?ÿ5ß–1ï~âaÏ1ašÜ¦î vÄ !“ ¶w_|åó…+þ„L“yë–íÅÔ£èòwÚζòE~­òÖa}@åšsÙÐ ‘$ÔõõìJ$fõ &—3RBŒKaÿE×ZZâñˆ€V]‰ƒù%丛¨™ai`WOõ´KiI‚‰Ú ”¦qÊ%ßÚã¦ÂhL"U*ž\R©Â¹#û’R0gë©VÛxa,›(ùñ\·Ój±©óBÖ]UÿOqnp)WÈØàwG˜þÒ<æ?,i ?NvÿŠÿ"ýý©0c.Oï^:bHgÛ½óÉF†fBÓ2Ê0ÄíG%¯¢—Úãîl)wI[&È“^UB*¡ÌاÏVýI2™;B‚™–†ý@ÿôo+Îð+±A ¥µ³e}UÞî˜ÌtH|Ž’Äsi—žÐfº f·f¶tǘ͸²µ» ‚èçí_qJ÷Ng£Ž$@JÉËJi­ªêN× ,wñÖ¿³«o>¿G3æk•¬&«që¥GÕ„œúðÒê´šÖæ¶ÍëíšÑ"©Ùƒ¥Ð#œ4›]¬VYü¡žVP`â“ŒòTØ]ÇÓ;&GñNŽñ„ Üi?Ï N/›Œa©¸baž-”rÀòÒ“¢ô4=}Aìd7S=tä§o·¹ÓNM±õå'æXQàK‡Fxm¾v!ªvMœk6¡=b¤Ö[Ém³vð°jêLÒVûFXy *óOÄWî/Å- âM1ÓANôT»ÑñGûýß²ÿ}ö«ß9ì+«kß t´Ä=Ù‚O]û‚Uðxû—ÝdIÇJ¨nX4EûxÀUž!eú¬\à§x~vko¿šp¾c Ë+2ÞÈË"웕ÙÏãè£þ#4)EEÕdª…ÿ9ýò_OÄŸwÿ³ººöd%-ÿ­|ó?ùÿ'ɳüê Ó¥¬ÒA*¨ƒÐñâ»xìód}^ýxÛ³JrüÑC6…Ѩrzßÿ#¸zë£TFªÿé[BÂÕ~óðè×݃ä3ö3.ÐVÏ7uU” •å8Ž&£®/óÔ)£7Ì]Oçñ>QxõèäߢOÓÝ3²IøºC`ßÛÇ›/›'Íç»{»'¿âHììžl·ZbçðX4œGNv7O÷šÇâèôøè°µÍ.IfïÊh"†š²}Ìm5ì…ác2Ï23Âad+ÃÒá‡þ6Ô£ÉE?èBu]?Œ)ïôŸÄ×0Ïw|:o4Ÿ©ø ¥­‘?:×"Ibª` SñÆØr•(£JÞhœ[mæœñ—»ý.îöþm×g×kËžÖr‚:F÷íE› u&fê˜T <凢ÂvÈ…у~¬ÓQ[3Q£xwʽÌ"nÆ™òUÛm ÆÓàS HÝô”ù±´—ÂKÙ,ˆ˜N‘”ÌPÞ#`¶g™Œˆ_Nú”öo‚wO^žžk¡r@|¦ïdˆQ‘FÚ ïœâc6ÿ>„}…hñ ’=Èa3Êql=ôðëÇÜå_apbhY¿ÇIÒG~×( ™™ì‹w¡$O¤ãŸqä˜X5Zâß_ÇÃõåå›››ÆU8iD£+Ø̉F¼üC£À! *±ü·Êé_ùooÿµ"Õ½l É%ä.ÑÚ9Ó´JíjÝà#Ì@³)ÉÚÐîºNǨ-¿îP\ÁH™ÂL%—l(«øO}Õ½kÓF‡G&ÚÜéí%Ši)Fâ„-fsaŠ~Ÿ ½¨, òOÉre]õ­9a`ŒÙúütwokk÷xærŠáaœ.l9êAÕÝq¤RyKC0hÄá$žÀÌu¯½‘×…å'`òÝÚqP)êÍð¦÷†C¡–ÎaÖž-,9¾v°ŠÌ°h;t×âß—éØo®a£¤¼¸X‰ìyU‡&ThdªJ[öç0’““ã œª•¸°w óc%]§ð(Ì]Õêìl7ON·¹Ï…$€+¥=ë4O_w` tTºœy¾ +}¯vq·Åt–MØxsß‚¨9:ÍÿZ…3¨4*’y2§„áo)DF¤U²ú.¥O˜„ú‚¾V·å6=^ëxã¢Iì"èUÚ¿u~„Âífýoó¯Kº!ª˜×ïG7PŠP²·w>à‰jóÀòß{Í¿ýÚ9Ä„³¯ðÁ> Ö.’œîmW%=+þG7y8ΰóÕ,Ï•íCö™IÈ|"þÏÃd'¾‡NS‡×ùL'*R3aq=Z2 $³ERIã3gÔÉSNÓI!W:‡z¥Mo”ÞK.¤Ÿõå‹ \Ž¯?ªXª#o<­°è“9C$s¡hÓ@¨ñVH^#Ÿ¥…ºtÎ÷ε½}D!|H§Ù¿ñîbö¨G¥å&Ôj¿úf£\ªP‹«¢T©íP- ’ªê\XÆak>oTä7Ö0`2VŠ‹3wÕ" »þzÂÁ+FÁ±ó.”„‹iîí6[Vúf•HVX¬bûSŠ=!Î3¾%ÇwØ@¼~—lºÝŽ ãF-åm0ŒÁ bëÅͯÐFì[…Ò$®óÅi£€¹Þ:Q©ÞTÄ)¼€CÞEýO­?-‹qʇٚ"Úš/ëÅM¦Ý>;[>?7Oº]¯{í¼âUSJ¨ v»V!ý`8aP†y#8ŸŸÕ—œßðëbä{oõ#7¡#]“Ãë=Æàã7%Ìç(Šª›E¨ºÔÚÞÅøËÆÒò—_ÂÁêËßdlàÅõ/¿,¾)|ÔAªY“¯5󬲹™s]ƒWÄ “îˆÎG}¢OÑÝÁˆ¯˜=Þr*Ř” ŠÿT‰y(…P?ŽŒ; E^‘þÉ^,Uâî(Ž¥«%wUúÊçì€4ÈVçe'Š­÷é2ŒÇš®7ÝäŒïrk–(¯Éª3È)h7³1Öó³fU½;ØŸNwï #çÙ¤šÀg”gÿØ(öCQ‹‰¦ÓwjNjbí +*«èœŠÈðmœÝoû[ýæëÎÞöAr„×à–¦ÍëvÌ+§Évb¾‡%_ŒŠÕ¬áöo}›'ñ£ W9t™,í6K€äŸkXë•G±œ’4_  +”¦My0Ì$ #w¼½wØÜšVñ~óÅ.œ\·O^nMo ‰ƒjÖÙ9>Üíàgø‘_óáÞV§y¼ùr÷—íüB|rê´~Ý~¸—Ó ÂŠhýÚ:><<ɧtr ƒÑ<Ù¶$<4( žO”~ÔGsÁÏ!¤“Pañü#¾–¨1>‡ªÄr´ÛÓÙ•} ¡wåè¨,f#Ä•€s]t)Î@?êzCØà±æFA…ÖCQ<+½ÿ[ë¥:} õÙIðj‡4>|@(\¸cÚDD£`fÓÀìRÃyÒir¸ü«ŽÙ.„ê¨^pûˆì‹…©úÆ^5_“ÿokf›ðÚ››0fý>,É5Ë↸\ø)ÑÕ2Fû;Oš‚Íý=Ä‘B½¥%üð]0ŠBr"%ô¶ ÌaG¹ídDêñ5ªÛ¨º—dqŽÑ[ÏRCˆ5tØ{§Žä@º-Ø`À–[rÞXàS /µ(^ô£ àÕP8ŠE(G6¤F£ò™ÐN[Ag˾á‹rÃ+kô)Ü5Žwø– îØ$.ö[¿l¢²ÊŽý(tcøj.Wøä܆W(DÖU8éô{ ’ §G>*`|ss£´¹Éîì5_À9˜ÿ-È\¾±ú ¥òê®[›Çæ&m@µÛµ÷”ùÿ  wT¡zï¶Â*·Å%¶6 íæ±Þè­þµÉÕ`Ú%uÚ“ 4xø†3ÇXc„öµß}«Q¾jÊîÈa\G=5[@dµ‚-È*j…þµtäëùCDs﵎¤« ‹tÞUÀ™±4,Qɼèt=D'*›zÊëíƒÞfðê)Ô¿©-…î¦-< o#ݶí â’´NŽO@7ÙQi£*B#‹ÆÀŽ²!š'r?´ŸKY bg¿y°Õ²³ ¢$apµÐ©þy”ýŒâ2˜)¯M–üöšUÃAËÎjòF9^Æôâ›ÒÙÙùùYuùìŒÂÏi!âÙ sÎ"’]ï`oÐôLôR4G¡®7»ŽŒ*Rcaô€wgÅ‘àõY(w>„¾C‹·®²î­]kY÷Ú„;ê«Uæ¥eõïƒUAƒ¨ ªJ~–ŒòY¹Œÿ‘UÓÏüZ½wQçÎn7èÁÂÿ ö€ ÌÐwŒ1ðɇ„E¦¨ƒ%¬^.aß–° –@ CišÙ€!º‰ƒ„˜ËÂMâEß»ðû cUÌšKüo]U}~ϼãÇþU£­É¡"m}œT9»ìÑH»¹¤Z˜ˆ#°b˜ä­­Šéè˸ä÷Ùh¥Õ‚ Z»!Ì!y“§Ú”E³š3¦ (Ì?’öø}î¡û”QÓ]øÌ#g MbôZÍ_¶õkk 12†»ó öœvy’U¯‚aLÎ(]³å.¼âw쾇ÇûMnñöÁ ÷þ˜+(¾Ù뉾ïõØój@G‡¸ÅÒvvçÁX<ù %j<òø}…°W ­ê1•ÕW7ב´"#Aд£öRT¤Èå,DK»Þ]j ÝJ´ N’è¶û‹‹ü&–ðŸEa;G(fj—Aõ£ÜÑ $|%ÂÀ³bbÚ_üØ8/©PŒ^Q§ùC*åÿÎîëýíu±^|!Êb/7c{ AN(›Òxîå%›ºSQ6[Û­Íã]º%žmÕáÐðb{ëÇψ·zº„öp-!¾ÑSQ»Š±Šy¦Aÿ?Õyù}¯/ªL†îØ%Ý;íO¡§ä Òi¥&È%f5ºÕ#'-VË•BÊ­Q``¦~„} ïDÄ^tTÈòäR.ý43âT ¦ƒ5)ÉïöQǦ+bKU0p2"O‡/Ì7*ӥĉ_H1½É.ëç§MVA^&ĉsÀ×üÄz>Of…1á}÷iÂ.{WWèM¯>¸)»uÇ#Ɉ¶® ¿ïÒø”ÅäY½Bßå¦$bèdÐp¾*pz­¹¥âÆõÊN¬>4T.—¬ŽvõBðÙ³À£.Sžáp'Ê:Á£É dÓøO>ID«r@ƒb`pßÊy Ö(4ƺ€Ò¼´Wç,ÿ·ª¾áÅéF>¦¹Úb‚óšHJIêÑ}I?å›A‡fR ÚLÈó?ˆ ³Ñ­2“µˆZuØP÷ênuf³{÷i÷Zf»Õ·^jN»•Ê¥ƒêýhLà ßoˆ5yÜ.­ä„Æ®¦Bc-AmÁ Ù@2Y‚ÇŽªÎŽ£åo¥€mUуVptu–8Èîœò-,l Wk3ÃÂBönGÝ°p¸–|²ÏH'Í“Óm°M¼¿–³0÷ @±¿’Zè£)-T>º€‰®vhïÂD 3[)gŒÆÁžxÒp?¦`ÒÉ †ŽG¨ÉJ3vYÆAP:eË1"Íáô™ç˜M-àcÙ#û#´ 3ÈäºÝA"DþÕ²v;‡ŸÆ?¬”g›-¾)Ïÿ&;„ÎaYx¥;£<æ‹ï2íþÇ52Nâ Ë"±nFÛ¯ôdÍ ¹xäÙ± Ï ð'#ð,PÀD2„^ãÔ÷šCú½»¡9mÔx¤Ù=ÏpÒ騫9‡Y@Á+ÍOT•,µ°Jkë2æL|ßÿ`ÍýžoBr éI‘ÂÏÀÜÀÒ{GÐb)‘`¯h)KðÓ)UlW$9³†.Ÿ¤1¥u[àuCZ©ã?”EBc¥ÂO£Ð'^E|æöÛ®GJ’¦Žy&Õ1W,ŒÜ·T…0å\#o‚Þ;/ (²â²ÚŠÊ édœ˜y| D”žW8A©íÛ1^hñ!¨khÈÅŒF¸üùâWš+ì:A^2Ä}PQUæ—¾Ìx[¢F:}Uû„i¨¹MÎc˜ñ.ÐÛ↢aš„FvɆð?ŒiÆ1ÑyÆ€½}` >¢&…RblræËaK #K Æ­„Ãdì§Þ¹0©ÄáY$7ÅU%Nßvtà¸-V Վ͇§…íÒ¹6ò¡Ä}£Ý¶Š¬Í.â¾½O;ÏMgõ®ƒ¦¸FÃŒavO6Hi2ýRÙP3Ükí¶´¢1“\Ñy; ^nMé^K'Q͵îÙe«¤1 V-8%/ì« izâdz•¢¢COÓOlWÆ^ŽÈ£;I’'!Õh„9RÏÄ\1ï2ú´ã='¨Í:M¦7ƒ¤˜›½ P++(›¦ÉÀ<‘¡Üc7sóv@†¯$ºµCå®,ŸSÙÌ°™„M‹ò«õ‡—º…Ë^)-¼o3×{= ¿äìÝ2í…Æ|O`§gjø—žX?Â-„ lK*Þ ÷˜‡Q¡tç—1ca* ¨¦®-±%I3¬ªÊ^Ñtɘָkæ‘“Gú”£gévL—µBòô dQ4´UnE=âÚ3kýl.Keê 3ŽHI÷Nõ-ãÎ…RØÉÀ„F¶zf_é°Ó/f*éìîlïµØWFíÁƆñ:»—ŽÅ\º d¢FâE<¹Ùû^—íäj¦÷N$ Lmä{=e½ ­»|“¥ˆÞù#á]QTg˜R¥™ ú}¦qJ¡W§U-ß’¾Œ™{Äut´cE‚lû¨a£gùëú¦¾\¬¨Ý7qQÓ.‘7¯Ý€D³ÕÙ~½{RY%X6ýj£lŠ•õÏ1ß~<&U†!p†IQQÚÖµÃ?nœD"Ô5…ÁX/Ü£»Ó¯D§¾–—ú–%SvaªïÁ9ÚÏ/ꧯÅÛøšºztØBUZªÃQ sGŽ½Ñ•?¶Â…Ñç`ÜcHŠàRlnQD2‡?n*“½GùiUü°Üóß-‡èø°öÃW«èÞg(¤ý¸J‰'åLO¬R†£TŽ{T)ëq¹0ãhL®–er½,´_eYû[– ʪ?•ûù@5)äË8ÒŒ6Ä!”c…Fr¬ <Ö5°+=¸”‘s—°î1°C©YdìºKˆªß¡ˆ’íÃÂY©}¾Z°ž”  Úr"¬´tGE9”m6k‹³Â¹¥`¸¶ÓªŽÔ#ͳ7Ô*ö>£2þU,òƒ³|FÏÞ¨P> ±£ÿ½ÁçPìü\'É$jE¨š>ÝàrE.«+(jÚð7Äñ'žÅå›/™ï©ebO\ HA[FÜEßëà"wB êë8'1unU“¸žŒTÔˆ˜–w£ruüäiêýçÌSÝW/Ó Kš÷é©´?ÎXâÿn“ãdù2¾Ø>Øù³½EŽtì‚Ñž8§û‡Ñ/_(GDOt¯)ÒŠ=Î"P£Ô.ÂÛ§A˧¬Y#_Æ:á CâgÀSĉ[ 9™1’ …ù:\ˆÁDdwh× Â”,˜`Õñ¬‡À%|ÈDÊ‹_”aù}‚ιäÀ{áã™"Ùü±‹¯®jJ %9C{`ÍV©°ŒwWÈð¸»ÑÁ¿Ú±ý"êIXvÁ3ƒÉhFÊÖˆ: ,qÿá"!U.ö„WƒÑ¥H[ õ^6wd EªJ<é^“ÑùRZ’â·dÁRÕFÁòÇäÍÜ°ŒAëU:l7×ÒVè‚kÎÏÝZ %¾ÁxÛx»¿Ýj!ÊÞá‹ÎΖ*Kˆ °µý•nc?”Vq+k¶`ÏBÐ-³ZXüB°æh161`É‹;ЀJkFD8K@"ðg 20…‰pE\3W}–_7t„CÐZM„Ý¿mãçªçdmaõug ôUÅ"¬PÖw‡*Å9t¯QO|}+J«Æü%Í2YƒWUn¯S#1QX¾8Á°NÒ ÔŠ)À­5G—®>¢Â‹ u™MIÚøNWk車J`t›À²ÃKÍ5#ª—OY:P}‚âØ`­û7–¥ÖŽ9·%€ÌÁáÉî&¼´›®9Hߺ,Ú.šbEŽG8ž„á\h/]=ãÉ… ÓêNF$å#4ÞJ&²ë v ¯-û³Þ7@•‹ýÃðüþðƒêntÅ*¨{˜Ú¬Õy~øºÒ>–±x’ß¡â⇯Rd ²FŒÚØ(žÊ\¾ÌžÍ˜R0ºŠÓKÚs{Y# 7Ìy3‘¿•™f nã™UB™Á¹¬J@ë ÿF¡p{W>Ìv{å\´5‚Ï9&Ó«_×€w)æ„3¥Ësåìì%>=âAaá_°°‚WR…]HÙÄ¿ã ¾àÂè Ò{?¤à;ô¸àxEŠ@½‡ôü‹É•J\^–¡ŒØéÈÜ,‘âBáØ'ƒy}©¾‡?êr ~’PY?4ŠjŽÀ)L v8ql±„ŸRP‰G⼪W†eåM~m!´ŠŒÇÕ‚žA–£dÓ¾²E+U_©¤…\àê,¸@F•Q Önï÷ÂQ,Žb EÑQ¬ÙÈu¤pnÕ`Œã}sMËœ…ñÐÙÅóéÄ\Ö^=Wª®á§ø7âXÕZÄ3Ér3ÅgŒO¶¢t>É¿øý5}ý=–Êø˜™ ¿îÑ×=ý5½ÙX7E™‘±èïT´Î‚†ÿ¤'¿ëID4˜ÈR5‘ s‚È£«0øÚ$é†f†¨pœ^¦UË],,º€rg*¡¨©O'®ü³B^C¬çT±Ak*ÙýÔQ~›´6L`诔ÖÙ²\¾œeX™NDm¹;Å¿Ê],§š‚²“­TUeZ‡°«+P¶’Ï°ÔPñ82Èì2gV&á±a:&Œ®E€Ì_y`¨«Ç$8†UšÃÄ·[LjŠ°ÕM‘oý!šŒ¢!ã­ê‚ý’|0ø˜À‚` +ÒSTþå¥O ·tûQÌ.êvKÈ€©Ôyå *#¿Š5Ê\J¶š¯Ûo¨zÒÅóÏÆ:knw0"¨»17¡ÒVà…Dßá°p¼Á Úy¦g1o»7ì'-¢¿ddÅÔjãÜÚDÉùε·*l,©8ºw9·?”Ro­•8™®êx5çÁD(E*T‡³¤ZÉgOòÃÉ ¥ÕÊÈ$t.þÑ‚§ºCÔ?n‚˜R‘i–¯0\+7y”®µÜÑåA×ð.‡ýPUÒ1q <ü$]wæ%A°P¾E~¨JAˆôÅß’:mÇÕT¾còõ¾ Ý>ÍÉÜ Ñ¡AÍÅÇ@ˆYo"ÝË+Â(½'ù‘ߎGÞˆbI9SÛéjQ¬Š5±ú„Šb!]¦(‰*Û)ZIA\Û²›…^Žƒ.yn裧¨¨äÐUQ2™ÐÊå–†¤iÁàÜΛ þC×*°'ôG=Ê2˜sÖíÕß߬cëáÉöºØ¼f\¬Ç7iæ £"@6Â~Ú¢·Ö§C& ùˆ3ÆK-¯O{°Äð­Ø²‡t«A×wA—ÓÖÏ“]°Ð¥ )"‚#Õƒàà!Äw1ú tz ͼ%¯Å`^QÈóº€=F»ÿÚB’ÇÍã_)Z„®Iu€G”’vˆÈÉø½¸¸(žo¿Ø=HÞêçù7d]dK:Û[I*ÉD6_•å³r‚³œÖhŒÁ2„8,©žo3aU¿zÒ!‹v['…\ä7Óι舧PL„Ð8&ªSg9«å³Àœ|6“©'÷8IÁ›d‚›°úH© ¿ !ÒAÊ(O%Ò,ÛKôm/Žñ…ßõðÕ…íGuê//ŽŽ`¹ŽY†°‰å’ˆ@O03/ˆ‚àžn/ïíHßÛ©GˆÌQ}¸]¶(ó#ÅN I’Éé]dû'¨>™^µÊ5ÁÉf3”2DœLòm“£Í-A öÄëãIøm¹ä‚vG§k¼pFS¿gÒN‚lü•whV¹ô{™ÎD(ªŠ.s©Üì #+ g½S¢¾J äì/‹¬Qá[¢¡¿—Ñ7ÌüÞ$ëÂe`©Ú\°ÀØÇ©}D¾%ÏS<¸Œ'3ˆf^ãêŠÓ\Zx ¨²sÊM\…T*ß„»@Q |i÷Ä"åM‹8$ÄK_2EšÒª²-ãsdp†J^&¥£`gèÒú µÜ7Êjk,Óc¹;Âcù?>Þ‡'Çûüƒa€Ê<ˆe‰s*«ÍSŸ4€’Èl u¡W¦y2¡‘t„€Ó–ç0âdq—<.È‚¼\ §$ééª@‹:”’ÚTƒé×ÙóÒÓ)êcªªœláziµìšF×äë¦Þ¤è>*߸™†ÑMÊ#‹füeeORIëš-‹¾üª‚ÿIúº-£ÖËÆ(ß9%탦2ñ®HEv–‘ÁB6$a&llö²™ŠŒmÂÅØKõÝ……ÝÓʦ ¥Úüúk|c½xýZ¾z%¾yq(ßüÅ{ç¹_½Øü‹|;L\(¾ùÆ-±óÍ7n‰ÄkÕ W ­Ñö~ìs~ (fJ«Ræ†GÏÝyiµmÎÚ³„¾+­*¯˜DÜ$4\ªfbdÓj‘/ØËSOµqTóŽ{[¦z·QÎ\^ËmÆ£.¦A‘ð8£O36 €âK”V‰w§ê‘euÒª:Ñâ€éÎwLï©õ¡‚:¡-ûÅ!ã Âÿ´Þn]Áh'°xrÙ饋á€p>tì‚å¦kÐîð¡ilǯа͗/ÚÛ7 õ±§ò^é}õ M•,N¡ÌÙØHõ±¼/"H¾âaU¥!¦ÿoñÓÌð–= $h&N[/+/"ÙÙ<¦­¬Ò~qˆ_Z/"K-®çåÉ‹gØ.Ù!/Ïê¦xgo‹JW $X¨¸&®ºÝ«ÈB DL3xa4Iç<ìu;äqÍÙöaX“Æž3évé½[þ#Uvžÿ¦ÊfðÿóÛ“Q}¬ÿ!ãR•‘դȿy¡8"#‰[6/øxÆ·9¾–Ëõõk-FrÝ NiÁ‰=ìgU÷óªLJ—Wé }»R#ô3*¥Ò‰JñYÕý|f¥›‰:7§T¹™®qÓ®pSÖ‡zz,îÈ™vó¼-¡åa«;GY"‘ÖúÁ[œ…~ ÑPAÛ LÊÀ†5ôQB©ƒ^£ˆW…x Sz…µ8Ý2;lÖWNëäN—ú2û[uô2_fëìºn3²Æš^%ŸU]â @ÁÉ=œì[ûRUá<§·ãNÎ+aÞä“?ŸÍ¨$¡í±=ÌgTÚTcwhW{˜_Ÿjèqbag, »l¢ŸÇöÂ8ÞT€ù ƒß0wŽ?–ž>œ8ÂdoÐ6$’6F´|ýu•“G¤‹²Œ0ëS+—ù_lf|[š'XGÅ6·ì±C9©§V?)±EbhÒy-RC2µÈ欲ßÓŠo&²gØ ¾Y±î–å@§QåÀq C‰É~¿©‘¿›bSHUr[¹Ó'ú¯Už¨ÍÍlÅAS¡z4yS§>—Q¢¸Ë ›ÑM…1p»]Ò“˜$Êvcy¥"[¡R‹©?Êþ/ræ0«£d—U£¡µËÍÍû[£¥ws³N@¸3¿¦î‚ê:òSDh”ÆW›ˆÑŸHAr?J áè*•Ç&¥YáùvJ!‡4Œ›7âî*1á°Œ¹4ãç‡øÏÑ^ódJÂbÒˆ¹ºƒþ3$À?„I ½QH-¶Nú!ƘyΞTõð:,}O•nWÖ­•›å±€'c²Æàq©7 \pÁx2p;:²,ØÁfÅ·ôùÐâ/Y¼Èaέ9——+-÷ž‰åßÄÒ×˽²EÌ ƃ`¯{kÌ6Þ AÎ.ú¦€×?êÉ’e+ʘ-wðóœéL#ƒRßñ»ü L·æóO¶`޹òŸ2q\ŸF”@CæÑá>Í&¯ÇÞ¢ßïõ–Ñ*ê÷/åyK%AR×õCq„Þ(˜—:ÏÒ\ôŸ‚Œ§U#VWÏùr…Ø£ ÂLRi#‰ºÄ¹D½‰arƒ†¥ÂxùÞv†nǵ—Wd#Tù¿F"e 2f,,Šç:q¡Ž{D×”¯‰Fbë”+…ж? z>Ò¸¸Sùx%¼B*êAã/$‚_£Ã¿?Žï„7N¸ÆR†Â ŽXªõ43Píá€^¤@;i7Â^?(W½‰½;øµTX`ÁQTAHíêû‘?žŒB±úì#Èm#E»ª4E± º±=KÔ£tâ¬PïÝ*tñWýU¿–DSA1Óyá¾õ- ŸíœU¶ãì'ÊîˆûŠÌ¨Vú”CDÙÿͳ&>¢8ã+ö€):ñK´@{#2j {ƒÉ”Eó#芶GŽâÄñr[×-ÑL;^+–^o‰œ®AÅÒ|ãî|9ЋÆJ§[úù'–ĸñÄ _˜2Øõ(à÷¶O×ÀˆN„·3 ~_w$ƒ±7Vpƒý¢éCþÇdPAìÏßÕË`ê²à [ýxIÎÆe0U‚ñ}¾ßëÈ=¢Cˆ6Ž$s¥U¿×ÉüfÞrF´a¾²+o¨âx wä}¸éP’%Ô‡E³´pÑdÖY³¿Wáit>øÙ¶å°}Ž¯ÇÍ}ÜTÚ´0«G29»Bt‡íîS“¦Îü§ *jäõ2·¨Ô”Ș óÒŒ?9éÚråûï…ºåfé ßôè#¿W©Š÷BJÙµgíÔzõ.Š;]A4Sl2±{A <ŒlSó„ÀÄY1žEljCf|;GíÇ̓½Ýç.…©Uf}0­žY“ˆ+Èž»•9çÎÞ°u»Zl†«jåùûøy«ÊÞÝÍpÎmÉZdY{Ò\bZª½uèNåî‰&ôÜ6$!T{²V÷ÞåÍåm¦¤?ü¿Ä^‚ße/[Õ²?Y_÷àt¤œIi;ó¹Úh·WV×ε}Ÿ€€¼§ÙîLB6t÷6Ê¥›~]ÿ¥÷7ýxõLe)¢h.ÍE dë˜à 8 ûü,UÅ¢üSÖh2q&ðwméÛ§Ku„o—>ð#ù»Ýþn•çî7ŸR7î WïdHƒŽuIi·k¹¨Þs^±ŠÏÒÖDFd;xLj%j‘«4ºNãªI–RY.9Šu¹`-ëìZò”•ìª¸(Œ7Ê4zÙêV‰5p´´aÖšÈôº,Ô€¯àOn‰©)Õü³Ä”ÚóÑø<³ïëìñªÌ5E-ÃÈ#P3Bš­°iŠU‰.šëÙRŸØ2L`]ÄH{›´ï©„Ÿ•ù‘•-6¶±”‘\ßÀ‰h2bK/Ê„­5» šCw¬ŽÉ5ÇRX•¾G†Lšˆ0 ]ÜÁkòN¿[¥Õ*k£VIÌùŠÇ³_Í(¤¸o~Yãk˜ ô‡gÄ4,lù‡¦,lV°ê œ ÕCÔÊ;x/Õ”ßHð¥wuEŽÅa€gÅ3ÊóÎÕ¢[Ìùó¿;#¶ ý›ŽUz^&Ñú³Ô"ùñ3Ê·þŒ“­£n‡2K¤??CDVyknü E[ÞAZÔ— „ŠÕaÓŸðÌÔ6mº¦¼d½jæݲÊUh}Af|D‡‘ùsX#!ɉ4-å{mû¶ó™Kõø8iéCè]Á (˜ÅÓäïÔ{Av‰†Ø›C’+ÓßØL)¥#¨Q,ï3`Åm8¬`{irÿ‹g%h†mŽ:+eêëg%~ÿ…Å™ÊR éçË:ºÏá¼Ð¸•F¸—ÏJq$ JC€?¢”ÞÛJ¶-&;Áû]ª³Ú]¿€7}®öOo€EÞì†üá·eñ=5»Ùä€Gî¶v–³¯ýóßw^ÜM{®¹Ê©ºÿYëó3ÀÌž:áìª×N¨__ÜGË›c¥ŽDý­ï;ÃQðŽxUéB˜ÙÔòõSv¸>ð0GZ#2=~ WÙ”>ke ä¿j}ý׌æLVE×V´qš­×ÞF{¬4Å– ÆYÆ¥ªŠáˆ|ýÃ1yÍÝו{ ÌJeu/@TWO ‚0x}íˆB*++²t ¥Ñ³$J*yÜÁ  ôÅ—RötD§Àj 2þϧ¸yÇ5ò:@­X,OâÚ’Öñ?*`Kµîíj•9–ÙG X•¢]¢®„>Ö“0±éø9Í¢GÐ „¹†!÷Qƒ]zn|‰£‚lçJ^¤ìÆc§X¶{‚ѨÇqÿÒà·¢`cáÄë#íÖØÀÏÄaª‚É{Á%åö[ᤴrâÚ9*P—ƒ PKáäè2‹¼¨â ¥ n;R¿N:ndpÉlÏ ;F‘BSÕ$­7*Q¹õ¨ ¹[ÖiîÙÐÆ•vê“ŽF5V~¹Óî Ø1a , 1šÚR”-ï(@h•[ k¸\C?ñí Ë¿­È¿èf~‚ŽxViÿ&ΗΪb©´|¶º¬^ñ’òÇó²»p§tfãMo2ŠúKmœcÏà ×ÒŽ,p( ™öªDÏŠo(ðѸýxâéã:Þ§³b/CX{A/ÅäBâV{¾¶çœ¾æéíë§?O‡/%/ÿœ8Ju¨~‡áç£&#òd·6A0ÐÁ†5ó“ásæ#£`ml+íýÇ­—u~©Sž&++œ|Ö„Þú¼¹ùsk¯Ùz9o¹ëqš·û’Òû†|±!Ã_ØŸð]0r> G ^.TZvÌ!"9Žƒî¤Vº4ÖÁBk§+ÚbKˆ½nkPoW1^xg0hRÉT2C2zjðò°Ãò¦Zbá%†Â;£2n˜ÒÚíd53—µ;’8=ød£|öçü¯\ ê5ë?3^s…D֥݃•ö5oQ [&qbIë8ÁeÉ/Їj:¤<kˆ=¾¸eâV_|ý¦"I 6XG±ààR¼)¶ôž~õ‡g«Ïì÷5ùUñ5=7€'Ãú°\0—GŠä¥ø2~Aüì,,«ýoQœÆ2ÆMã2Sbt°¬ÀOn¼»˜Ü Ë$ƒYˆ÷ ›Ãœ†aæ=‹›—¦YFùD9wm»•7ºj4xi¾‹`YóhèV„ª 2æ×cèIx=—†ŒBå,Z*"$4ÛrèqxÄ \×ñvëtï¤Òæç r‹~å‚ùSÅÒ%`„ø%#X±¢MÄÈ9A4…Öé‹Û- ešõœPr¦ÀÊ”Þ?o&‘f9€úÿ'¯{]eþºž]Ä”#È“eö`Ú±~Áÿøðð$+ÆÃDŠ$KËWKàšQ1ª†#Eñ«J[=ÆÏZš#‰žXi×ë¸vë²ÄO߯ÿ´±µ{üÓú?±¢Ý"Ò(áŒ@e¡:2ÍmøDTä!PeʱjNÍ-¸Ïë‰jƒ~q`)¢C–e§Š”að|(ý'Y šò“ã1îX¥==ì@ÉîŠAGßyVæ<©Òšª_Š!»MHhVìW 7w/67‘Eí YêÄÂj£ ïŸž=£J–ùBܦ!Bì&%)Ç rÒŒ¹0úP.W­L>! Úçv ‰‘x§{j>e¼ ÎÃ4„·¤“湬GJÔT%ïM§Öëaô1µÜÌ{Õƒ3 ã$Æ}Ždìæ ¾ä«wþ$šŒ,†•áå¾Æ` ¼(·šÏ÷Ðcóç ”9W›³ÊʉKŽŸêìõ~Ô}+­©µ× b4¡ÔSe¡´‡Ž´hÙ 9UÂéÅÈ÷Þ¢NŒ-ï“ÒÔ‹YÚ÷¦ < óh!Úv2žÓELAækc»^É@$Dàñ®H_–ú´¾¶4·™8WQ„ƘþF£`|KpS<8”.Õ¯‡“[âCyVÐÉášÏw ?ÄÇ.Û­LtŽ‰C˜ ¢¡â´9ã}¥U÷ŽàYÙöÉRÑ#´’aÖNŽíl£ ÂÔRµÖ3uá ý.‚pY⥧âWtfP6¶÷vêÖÐSáåÑéëÎnóéc<ÞmoZ3¥ÙÚ’÷ÁÓÇL;í{b¹&|®îØíÊéÅœmúX•J´šøq S »1ðv} ås¬ö9kúƒI¦ò¡2ÁLQ‚AÆ?Ò<‘`¦Â)EóàJ„5b¿õ¨§Ì†Ñ?v5‡~€³Güè»ó@þ/áoØs»7 qÔ…Ì®‡&+¼0¥Ç `¨ƒ4â`<‘Ù,Yé±RŠÈMZWoqƒr:³Ç óø¢èEØxæT;O‚´(Ó6Îô{Ž×"³-ÆDé$HWÄ¢Pv€)„Ñ”¦ú"ƒtQè‹Ê²‰#ñ§mîQöúuu™üVåÛ$ƒéàƒK(Xä2(„ Åb s¶O^B,Á÷R›XȨôÑZ‡+€:¸B™J(³8µÑ.J+Òj­\>Oƒúê69³òþpØ¥RÅL"óȤ€kôvö×,ç~ˆ z¾Š;TÖúšÇ"Kh2kpù9™#Ÿ@Ö(Ï3Q00ÌY_ÏómòÓ\q:HÎT-ÍÓ€é35[•&]:îFkïžH)ŠÖæ¡8„CfË¡Ô}BIé”T¿À8V€èÆ‘êÒ›³§XQZ14¤Œ3ÚTF›*`JÅÕ ±b!p“Â@ |ÖœÀ8)&}Å™Ö@Uîv¥?>5@D¨lSúÛÏŒ¶jŸŸ×ð?UÓäÐfWÃÌ7atnUBDœ[º„Óó¹­á×Dw…³ë‚‰µÆ·•šð¯º±XmÐ%Pè—>ÃM…æ…B´.”¶¦FÞšÅ|~Š£>ÌUüçi©ÚÆed“?:V™}¦F¶CCL hà°ÕÀB‘£¦5«º=ŽêÓ„”)¥…©YîóR3Ë>“œV%™¡ú»ÖX[Å[G5Ÿ¨lt|Ö£@ã»Ì|iÀ vL­iÈ/⃸ùCI';>Èé…ú–>Я¬³½€Äs*{ú˜¬á&8k­á„ãåD'eží0†5}ºssN™lëcò¨û6ÞÈ2>i{¸m^s®—› ˜£¬‹Ó¦72°­Jó¸&Ú”½[âbÊ®æñ†7ú(ÿìðêïŽ&öFN¢½ªìŒÒ§m”²K*ºôÙÉßA'–Kœ°T¼¨¢-~¢T~Ò>&žè 0êxãå[![aò©Œ¥4¿“ïúÂ3Ø–Ñ©s˜-súñؤâÊÆ£»2FY–T—af?ÙŸf…®•M0¯`mM\‡Ž©`EÔýßÁ…“dX Ûa<‘®Szô8«Ëdg‰‹èj" PQ#qmõÙéEa!·u VÃB?«af§¦è§ô2Ö$ƒÁ-:H5‰‚1YnVr\(ʇüð7ÔÝrÆ«!…o8=ý•ïh¿ä+þKŸîPh䱘LÁ3vWsÖ´©ö·:‡{[ðhóåî/ÛS½Y4Z”û ]ÆÚ¤]¤4¯ÕÈaXëÒ2NŽAôŠÂ9è¯õäµ!>µ€É$ ‘ÊýïþÔ*7•r˜pMŒ¼|jù%Õ˦*æÇ6TJ{S¥8!h`yaÂ&ê÷êñø®ïÛbgQlùcLBúV~-£Ì7ÈÐAWÃÄ4 ðªc;3'e@ @¯ðô©-Óçž`ù#F£úø±úÀœ„NQÃâtm.ÇG³uF@*è0£à ƒQ1u¤X”d¶¤XÊzüÏ3Ì]‹³mNÜ΢‰ÿú²y4å&še¦g?Ê¥…®£â ;áFÛ±)‚àyäUbB]æ( RGíë.“fõŸ¯¥6Ììi·Ëj8?UÜ.˜·èÒ+o$.ó»)o¹ŽWê€Å.”’Ý(1C„üXXù–”g)ä=Î%Y‘ÛdMüÒ<ÞE%¨Žî½5A+¬VX\Xh3¨|αˆÖ[§››ð­õd§¹»wz¼=wâåyÂ…}Æd´|sÓG'ö?Jx%$zyŸÄSÓ=Ž“:‡o”˜+à_©©àD™Âík*Âܹ[¢ô˜Õ‘¹`³ÎiÂüëSXÑŠ"+«7pËlÞ ìxq\…*ý©0Ç´•ùJa?UV«&ï´è{ 4—X,›l3dv"•µªJxêá|‘—ãØ (Ƚ¨»P$¨Ê£ªöe?ì5˜‚±;[ˆˆ˜‚íÚ]SRµ^èÌi®™’ô›ìE}8Š쬨=W\ß AÎW)?ÕŽ /æ‘É€üý3øÀ, Z ev!¯y<µ½ < §Q°`ùò­9g¦!ÿŸ{f¦JûS؈Òݘ¼(äi½ÁƒüñìýJmõì£Xÿª”œn±;VÙþH´ÑAü|IôYc]¤>û*õY)£Ôz™Ü8*äÎÇ->+žq~¯uy·å|†ùä3òª¡R´J(TL+»¢c^¬ 5 nÛÎJ?‚újiÐyŸƒ.P!(S¶ª#Áë1O•\µŽÎœaõqOÀË„¿"~¦SÑŠØÉdüT”ZÀ‚&’ U#ÎP§2#)½PúM0ËÅ1I›€òfÌÃ-ºp” åíPÒÈ„«tçÀúµVpNS_$TÖÐç£L„]“[ ܈X ]§þo¹Ô¨ròξ]:/­ÙÓ¤dô’Ñë(ÆŸÀwúÞ[½jÞ?u½ã» ¡_cºz8öìuso·Ùr±“û’ÈÜ®> Œtº* ?@íÏ©dnÿaZÀ”ß¹—ËÜ÷nýé»~.PYƒ 6äÌ=>…-›¹Á“dBÑ© f“RÓS鈖´¬’#ûGJªÂ4h%w/Š&e¶ÁP !Œ›—ÊÕª-ž©Ý`5ºÈ†ilÝ´(iYøPiH Ôsåž±ßXN:S%£l1¤ .w©ùØHÅÇYR3!U-©é¬Ñ9dfbM‹Œ…þ9äeª“á ÏRûÍ×½íƒÂb¾;´[2ð~³ypx°»ÙÜë¼P çÜ ÜeÊ l¬ÈXŽžÙh>ßÜ2y0éÔ«þƒ¸Ž¿_ ‡ò@O÷””›±Æwf †©§1xt2Ĩšñø& S"ö&>GëÈœ˜AHIIª‚ò€àuðHãû„»¶²²".î0m#òľƒ±¬¡:Q—w½ ¡ ú1§D„¬jCˆmÜe``Ê/™¡ÑDÉr¸V«t¿¼Q)×Ý>ÂfIe HhŸ^U™ã¼±º¶öí·Ï˜ÜêÚÏÁzAƒÑ±Vkàß«p¢Çô4ìA=xeôr2êÙ#+"ʽ¬§cš¾«$@N.ƒ`¬Äê,¦iÈïtª^t|7ÁqõUt×ÑDñ~2ŽüwþhJÇë«Ï¬Þuï®ÐbòwSsƒtý«n×f£WAøÝí2ê%¦¿ÈEhxÇ rLÜícÌ?i½·¾ê1ê$?Añ8^Üðµ¸!)Œ ¡Ë¦.VÝ~;Î=Im`§ -|BËå|ë„X<öbô®É- 73h¤<{áøý?,’lš®›ÿŽâÉuÎhô\'ø}ßÌm¥‚ã åUVI†—çÍLçÚ“§o«ª»œ—¬ïÇåXü懓p¼®ÃÉ)º…P‘DTÂRXYj(û}¶h2çáþ ü6¿]ýnMT@U88Y^ûyùõQuÚÀÒ6' (nÊÌú~ppÂŽRcL1›¢¡q?ø¤¤PÖÔ -Î?ˆFw÷©ÏW^ÛU6ñÑaKNDï-¦7,G\%`ªFÀf°©`~hÃ* ÝøfhuZ8Ï[k†°=÷i¯±8K++þ5ò®`{ï*¢òè?C,ÿr­Ó‹œeOç×óFÑ=ˆ¿}ûôyk«F9±}P‚·ÈÝ—“Ê‘DÞò[±ãU?4¼;võ–콱ˣ¥´°°² ½)$P1o}á¾5$¾É©E+OÙdž>yòèéÂ"Ì™qÖ‚8€QŠm 6P[QgíQŒ®wéîö%Sæö H›‘r{H¼gËâñ›¼$½±¸†dup«çÿ•/Þ†xo‹°í®=][}ü˜øUdp$,‰«?¢BøøÐûê´}í»§OW¾µZÅk÷ùöZ²×3ˆÃÖòÌá¾Ô„·F ñös±ýö­ÝGhß„Í’ÅX,bŸf¦®f3!C‡DCXœ°½)ɲƒQÊäÍãÉà6WNÕ1ž>úö1SÉ_ºÔó¬(·„¨ÿŽêY7gÞØþ8K«KÕÜÝ?Ïy_^N9Þn¹[Y{¼²b}tÃ֞¼{JÁ£ÇµÉâ¾·,6Þ_ FFÂ.–ýqw{¸Ü½lô–ñŠÈOĹ¹)%¡â<òˆÎùê #WŽ—Kíö‚8?_^.Ï)’­}óôÛÔ`M¤7•+è"ÈÎbˆº˜Ö³L:EÄ®ƒf ž©å4—ül®á™K ~¢ ´ÆvQì£a)˜¢`<†åt\¡/o+~G#’°0 ”aU!±ú³D°BøœõI@ê J_‹§šU±&‰Ç >߈oŸ±g¹[yÖ*™¿­?eÉžÚ\„ ¸âÒ{ú·^z¯RÓOrÄ‹¯?~ÔÍÞ½tN RBåÇF?Òr¿oœ¥úÊê* —&•8vÒM ƒ®½þ¥Ò½.j­‰â¤¦kRŒYQ†]£Fìæ/zÞs{_¿ñÃwÊh–94EgÑr ù?ŠÍÎþè™ø˜ôNnWßRÕ«ß0“E<¨-¯‰ýçÖŒû!jîz^Œ3žbÎ@|-Vß|Ê£fŠtädb;¥INƱ„`¢½£1Ç’qÆ£(ÖE±±ÄɪTK­vêf4YÁ ®BL‰ç!¬+—Æ.ë#çæ×_[R¬¼CÓ-¤ë^6¾Þ€ú »°Š ¢Ÿj1b˜´Ì63Pé`)¶åªº;ÖIIèˆG'*œ/Êm"59ÒxŸ$“ÖÞäbôÎ!KíìÂV,rv骅Ke7È°f7;›BÂý aç±Ü xñf›“^n7·¶;[{;›³3XÚ¥'O~Ýëõ/»aãšs¶óÿA¡ÝƒÍ½Ó­m}Ëà&RwÚ Skÿ O¶:­í½Q‘÷)»;õ“ãÓíšp×_ÕO[›‡ÇÛ™×3ìê¨Êï4÷ZÍãÃV«Î7D»/>‹ÃF"õ§Û›¬«gl87e‹ùccygÉbWX§K—ÇçjY ^aây&ÜXyƿè3-päo¬ª'è ,Ÿ­ñgêVÙ¦PHåÊ/Œ[C˜5íE:ÄË+e;’³°(Aüø!ŒHܸ.ÂCß^¢›?u·óÒ”û^rÐ…EØfƒË‚õ*÷‚_á÷@KŸìmu^ì>oîá´³ú… qkŸ.,8Eh„Q½Ã¯·ö¬o³¿vŠ¨¯³‹®Pj²jùò,nýïè°c¸×üÛ¯ÃãÎÁá+6çX Žï-d C`Aq‘|FHZÊÚÔKË86¨ˆ¦*1§1Á7éÞXååØ©r¦÷zô ‰)Dœr†ˆÓٺ锒%mZV£ZùÔ’%]jùß­XŸðd§~è?ÓÜ€ëµ~ù.ˆ¥ÜÞ¸z=ŸüeÐoÎIF&c“ aÖ=]gÏ›x…°b!{2x+‡gÂöÏì Ô¹¤ÓyqpºÙéàÙ¥R©èŸâ]’ªGû»Ðߎø_T Iþq¦£}—*U ëA-íÕït*Ó¿JQžÇ‹Õjõ™ çccçñ(ž:ûŽÂŸ"À96mˆ^-w¢²R³߇ä,UŸ±G°DCÿ[¦± èRT*Ÿß÷J¯Ùèe­HÍ„Ö«¨— «Ïìì1ŠA˜RS¬¦Ø1$“ÔŒH~fy°#M' qº Žæ‚:Ágõú $@1îÒ3œxB¹´áá3H`¼>7åYá㹕ç(â„Š¥ëõ“¾OwÖy·ÒXV…ŸQB¹g¢šåld®òŽÃ›bnKú¹±²Ü&æ¥*J–iå65Îð~-õ^²É‡Û%xý(dC³±®n¼ìàkT{¾þ/=âhøÿQ•‹6¡¨ËUT×ìÇYªˆ{ÉšøâþºÅ /0£;7ŒNà<ï ÓM}Ùagv]ƨ* Kâä4b?ÁØ$tBÏö4÷õ%…Cs:tàØÔ‘« ‚©Ç± ”t¯]øÚmxóh-yýæT¸î1Üð´ {½ 2üÏl Ž/9eG‚½>î *IǽŽ9x_xW¾ÂMÙ gTÙév›ªÃ||*!ŸÓ°ŒFÕûøe;£+wýÞÃÆ^qO9Y² ôy<ºÃ.áý^}ëÔ׌Ç|r´ÃcdÉðJ/ Aeþšé¨Ã8”å0éÔu“Ç’©$ ‰JÝßjƇÌZº³2‘ w2™îõf¥_÷UFÂe&«´Þiß3w:{8Ÿ.‰<"9ÓJ_µ2âdItFB6øs2˜l¾K2~ǽ´ˆf7(“,­û‘9~ðmv’vš:¿ÎÀª"¯þâñ¿:¼Î°»Ü]¬Øk'¨,)•“r™XJïóî;^[™â†Ëñáú›[C.P›GG* ^þe°!Õq³ßu®1Iô¨C§¶Î5YÅõÇEýµ¨oÙǽb¡0=“éMŸN¡ú¬toúŒšª¾@Gkí@(!ûU1ñæÌ©k÷9VÿeÔüéŽ1M¡ "Åì´¢ÊÓÓ“hËS£IøÌ[©•/}ˆDÖþ_a.É”µœÇyŸ„QÖ$êªNÊÔl/ë#÷ºâþ³’*ÍzÀ™•L6gp¹ 9v1³wïá–u=hÔ•¾’=øöÛp*òßZS¢¥¯TaVQÉY‘‘믨Yº¤™=-_Ò"€ZÄr:ô!ŒªYÚ]Æ' ±7_œ«j9³Z Æ,Ÿ@~{ê§Õ,'´V}a¢¾RÊ8¼`"ÑÆÆõljn³Ú"§ŸfÓŒ.ÇÇsÑ—}Ì®Æz™[[îŠKÕ/­ÝÉ£Êl‹·sLY‡—ÏañNÔbY»uÀfçpî¤+ÚŸPMÉ.§@Cê]Rëù¿Åú»y¡MbòGjW1}óƒ˜Üäl4ð`ñs9g0 ¾+C®%Ð5Š¡ÞÜÄv'Áêí>ÍNòÐ+]Svb_èv˾Ç2 5†9~7Ét¢w (L)tîUX*× ï¤Aa𶘷dPë9?¹@Ä—± <ÌŽ<„Á²ËÄŒJñ†Ó# ÿ˜´™ij€`²à¿(H0ù)Ä¿"bð¡A‰˜üÄ“¬Ád%˜¬9]2/nf^)š8ø“¯oD"2§ß ;äñ±ëø>°³¼D»0ï؇ ¼“xí9üõØаq ýÐq¶uîzÏùòÁCbKøt4]?WÍÅgn¹!4[Ifl¥ƒ”`¦J ´Yho¡05;g¦aiR÷øÑ7°T€´®ƒ[¥¡C3#"1Ð]$O.Gº„ÊÓVL«²”³ý^zKZË£Nl-lbPÆ8sд„­eÎÕ᤿&Û¹Õ2çeDi%‰„±67£`ì[ÎŃjö» Çz¢J‚`Ü[LX“~mÚWÍ,ÐñÑê&¯áä‚ì‡Â‰Ò^8Y½ Îx¡16BZ i ©¯ž °JÒxhÝÉ潃V(gѼµ’Æ«æ1œÊ¥ÍͲQbÔ+“²Z&u¤<@ÈúßËt}“¢[—<£[8j¸°}MÚ߬wÐút“y­Œö1:âÆ—h&´|ȯša~­+¦Ì5o’YúdÍ<|þ—­ÝãÙN=viåÔ“ÄEã Fœ©ß…6#f5Èlf«Ù¬B§Ÿko°¿ÔsdÞ W&ÿÒ~«¾uØ23F©Ai¨SŒõTÒ9¶IN¦Q²íñ\fÛ`teÉ’ý]4GŊÛ é(¡¨ôð4[µNjÊ1íh%§TYhʵ˜ƒ#.&Nå,ÚtÁ'§Fº@àVÖ9=øëé!å62EjÚ†'s¶éð´Å¾ *ÕÚä¢n'q¢UBLƒ ¤“‚"BªÍ}6‡%‚è_6·6·¶ñ<ŽY…î»ë8;Œ½ '[åb'À9gæß‘ ÐtL‡)¯ÐÆ:sPlvvÜÔÆbEÉunÌ*·sÁ(‘³|&ñéhRÂw˜K/YXg4ÏjØd Ø䉟ɕUñ-¸oè^‡QX5vÁp¬9U¢àZòô‹¼ªø½,GjTÉQWÀI ƒx`ð^¬ÉD‹ÒµJµH=½ñå,5òQŒ×Óã&ˆÉÿœ¬ÐÕ /õP$yõN") ßÇdüN{®{0šãú8ª_øuCC»/.·Dœá˜ù1Æ^Æ=g¶T\)7SæRR_¨MK€Ð¿z57’Y23™–ÇÕ¾1Ò ¢ÇÝÍÌté{Ñ$aK¡ ñ|µƒß5ÞwvMÕe £ L~_L·ÛgЇA]L5‚µ.—™gµ¶ue¦Ã!©jÌøÜFàQÍ_œæ«Y :߃q‡U'¸cQìx„òKìê)°%K¡“¯´_BÙŽ,‹Úˆ $TÕVY‹ãŽ@ª™Bdä,Š¡c~o®v…~×c^–™í£Ò”®ä`Î%ÆÏñÏ~™å·­r³?“H÷B+¶µåì &¡M‹94)«t®)vûÅñ6ÂlZ%´tƒÐͯԎ¥îÄ ¼¥É“…ÛÒÃ!éio@4ùOD?¦HŽ¢„ME ˜'¢Å,ƒÁÅ´ÛGù:=ª÷ü‹ÉUÑ!à|œûá$äc1­òßQ¶>颹³ûz[Ô‘×ÐPJ‡Î‘ïõÙ¤&´›PŒ>#øñÈ£¨gÂRfa4f ¤cHI÷áVÝhfM˺ðLw,á8˜(£qÚ3BÜòŠæ\p)GÕ@}Ù´€Hé¥á±Z£û± ±¨×ŠAÞ>jowöO^ȤÉ{»­“™7.FÀ””t0 ¯üÉ)IJ­T‘ó•W«e%NÂQgVŽK³½˜IX#>QVÌùÔU(¥¿B‘'Ïîβ¼w(åjG蜫„Ì ¥ ÎÆ%³ºQÛ´UÉø2,WÃX08“£&Å1R¤9qô:ƒ{ãuxT ½½Ž‡ƒõ¢v]–±Rô³BžuŠßáˆóô‘ó˜êÒYׄæ¢ã ³É@©#"st¾¾Þ†›ëçøßL¢GDõhVó×_ ÿ?oÒçÍùZ•ì›&®¾…šûžL*`õ¸ÉG:y.»ªþÔúðÓšòR½­&Ñã—ÖÍ#2ócùÕ³â6LóçÊ/¯/‹å«òq†/¨ìY1Ióv})‡¨ùJL§Ÿ&º´>Õ³L²tM²Ü ËËeù+]ÏÌÞË×Ki2SÇcéACœ¦CRõcáÜ g³1²Mg„Ç»í_áä»») : Ï>Ãû£ÃãØåvXASF¢ßkÄ‘€SÂÛ‚†Jo7Nˆ¼ts/MÓU>åâ˜è ¡àtÿhl¹ä[¶4p¾ûíæÉ)ìuÙ%󤽲›¸Z•tÓPoî¨Â)ä.6ÒãfW˜šQ6C§0Z÷ß¼E`€òòozs]_®-ï#k&Í/Yv`ª3«K‚‘ç¼/÷ûŽÿûF9þ°qVi·›õ¿yõœŸ¯ŸU?œ­~¸J4 õÍò‡e]H6€Š!æ2K=‚®ç<º2.½DKS ‚.ÑE§ìšµš‹±ÓËå">,%ñÆvJV˽_:{f{Eã–Iú¿6¼Ÿ9`‘2̆Ÿ.Ø4/7e¾yÂÌ0Úì N”m û Ú݉¾þLT‚†ß€²X„¾¤á¥¸¶áŒ9„4Ä}ºO„HopK˜Mø Û/T³Þzw*^ŒÔÞ›hÔWYtñ3xƒ.íY±º²—bhÒ~Ìó'ïA3^-áøŒ…câÂÃh”hŶp 7O±†â›:û¢8|[!{f³¡HNtÍÒª`‡&M+®)‹A<ö‡PtDñÏä¿HZÂÓJ° _\Ék£!mÈãÁ°“Õ7~KßÃ*D«ØÆ2­ãøª²FiŸH¹<è£z[¦Ø¾Æ¢€ú‘ IåÇì<`D.áõaú{„FÀ¾9PÙîŒæôƒfyd:G® ƒ0Àx„·kÖ#î©€Œk?êìM„^Ek‘¦Ôîü³ìåYäZ\~&Š(œŠË ó—z¸”¢–÷|^hvsÆ>Å-xuÁÙª;ÒÙB 7a]N0¿Ê“MH¡xä1QÉy)¦Ö~ ÓÃí¶"³á¥dás4±h¡‡aÖrÏ¡Z”ûA¹ð|ûÅîxÜÂí„—Ø¡¿–?œ…Åg)(¾¿ŒÈôT|&/t¬<“3Œ·µ<8Ø¡Ðæ@ü 8ì9¨×«2²ýRJôͱlÑ?ŪÈo6ðýÊÔþõ×*bì#Û%ßÛù¦*¦‘ÐJû{»;°Ñq=üÈü¥Hšzëu«XÁþÿû± «Ç:¨£^‰¿ASj·ùÅù94ß)ì¼ÄF¯âg$Të üÇ2K¥æ«Ÿµ/¶waÆ…Ñ(R ò€‹2(,°an®/÷¢x™¶#ú\ƪBQy‰÷Óeî·¹(|¹o}XÎÔ}Þ82Ùäç62x~°·Ö:z£ŒÚ¹¤ŠË(¡ •Íü¯Ë2èŸÒˆÙ¡N¹ÝÀ3üɿʘë– ®£âë‘;æÜ%p`(¤¤²R½À†Ä×î<'!=ëŽÃþ™²ëð>Ì)Dag|7Ä”X ,T\«Û tÔlÓ¡¦XPCÕëϬ¢LbeÕ.ƒ[]©6£Å—CqÂÏbt „°“F_Ëö!¢ƒþ@›ì{Žƒ=q¬Ê#:­J)†—IþåX_–8Z»Ý8<€ ÞÚ÷•ßóÞîóãæñ¯uWyû£º2jÁÖ N³y\H À›Øtž/¸}D£3ú”“"UÉHFI0ÃÉ2?–ȯ¨7„ép\aÞ®Aa›fÁrIò`iä#¢_b›;º¼–°âÉ%̉P¥fs9HÛØI˜ì¾(ÊôbÙpBâË òŸQvÂôü;ÈkþÆòÚ刽 ¦6”¨”e2Q·vûqý»óóÏ;zI>%_‡9èIÛ²ëŽÚúïécölÁ¹î'î]!Žàãp½Û|ÊØv÷<ÙûM¯õ–3Ê%fzËáñÄ#j¬¨]N†8¬kïž4nk0Òý>Œôš„6™û0–ŽM”)àNÒcs uGAî£Ö’aÑŠµ`d9 ýâ¢Q¦Aé•U+¤`q凾2×òbG ‘êG˜Ãr£\S¶t) Â3Ð_hÒ^Ì0Êj›Cïü~4$ôæ8ô†pÚc+/lÂ%€Ó%»uÉ01dhC¥~$šÍ†xU ?‚OùÖ·×ÐpÝ0 €ÀŠÂ’4ÐáÖ.ˆQ1ôGt“Ë[í½HcvÃ!Ü£‘j3Ž2Ödè†höãˆLrEK²ÿÐXì9¹ƒá ™›b ܧÇ%Xýb4V3#í‡KÇKuʶ»ñû}ò\¨×qtë°ë¼CmÄïF‰´’“Hù´Aù|öÓ»¢àÏR·æ=­ ;_ˆõuÆS¢Z³.£„hÖPÊZ35NÝ4²FšRm“^n’†Ð‰,UÇ ¸dw ÖÒPî†ÄE0¾ zÀU•Gk8nOW¹2 @¿#ä3v›MQ‘7j‚‚ናCÊð‰¡ÑóaÃ'¯í*åß{[oý; §1cgu’)šOv:{‡Í­Ãƒ½_™=@“¬±_]I“O”©3ËäÕ1ÂýÈK?‰ã§¶z’ pᣧ +'c ívÐtÉ 9%ŒyS) „ 73†‚$(7[‰$Äáíš¡Dý‡½ Ön„]îw˜¿k%üÚÕ‘k[Ë[iAHô#ÌZ£8]ìN@û Ç’v’ª™’pÔvú0ë¸!Žv§´¢Ý/]›ÙוBõ[(ŒìðN Hš\Nè~ær‚Ùäyž ï5Øâª(ÿGžõ%¹X*$K÷ÕNX墚?ì*÷Œ%ÖùËÔñµ••oT‚!Ð)@ûë2›“4hÊ£¹­Z.2ªFBfð­í×H»¯ƒ\‡…߇?÷b8›Åë&k"…t¢å¯Qø—iª4ʃ§ß¾­ÎlC#¸µ–#‹b“Om¥÷òÍÇŽ. rÎMì) ÌZ‚W(ríKž2Ÿ/°Ø8+—8liyɪÙvO F”õm¼!†BË­Ñ:»0Þ"gårüåo%º{ûmùü|é¬zfÈ–¾<[ý M VÕ\Î1†«+X—5 ¸D²#óËâ3qïopõœÁ*/ºrÊÅÙ_cQNå#wþg]ˆe¬:ÛNÕƽ Ý~ü乸pî(þëãþ»£}ƒYÆaÚ(ž‘SÑ:åì)ÂÈÊœ=’»3®¦RS®péÓÄ%îëÕUómm£à‚dÝóò™×žY8_/:Obœe¶ñúh5Q¾d©ÆÀÞO_«&?¥Çõ›¡1Ù4Y¥ªœGÍ“˜ –iu¤èQŒSW8F±ïTJ¾ÍHn˜FYu¸Š÷¢›˜æ˺Üî‘}<Í®7ozcz±¹Y+u»´­JSÃŽÕ´÷ 4a¶D†ºÞÚÛsX¡Ó¥ sYu¹ÑÀ”3hÒKªY…lÝ ÛF ot3ÏJøàÍ?•FÛ'EøM‰mœf’Ð4ßÖ$ofÎa–€›5•Ã›OžÉìCFÒû*¡?°©b_¶“kݾÕfšû­_6•È¶Çœ½£þÀ¹˜¹EÐh[kÑÍ­X­:‹™§)A{—ñFiw§%Ã_åge+©â®*‡W ÇKeâÂOJ9ýbQìÁöŽh:€Mç„–.|å…&œoD<¾ëóí¢öÃÑå=ª+RÙ!5ö‚S,/oŠ"6ûKJW!‡L8`üDóóå?ã hr…=dÁëÚÓyÄr¤b„×1¤9ï·~mq?³&J; æ•(ÚKêÃüC+ø·8ÃS’WÿG³þ·óó³³êú±|Æ\â7Ø“ÊoÜ5”–è¦í°EÝR8`ƒ0 MÛO»Ï)©Ép^zãM~Æ“] #é_ÿE•±û$| &9×ÞÆV:²·¾À] 7‚åºÜ]F<Ëãæ?W×ù!;ÚOX(H,]¯Ë¨²"²·æŽ{|½™6K©d—iÛ4&°â_òCÒÑk¹°Ö9BqÎÁ†mvÇ)?kwëÿ؆Ã# '¡2-Ê®ƒ“9«ûTó£r.cN)6µ1{µÎµP,yl‡œ$Ò¬|ž:f̃ö:’è뜖ÉÈBöŠÙG2R#Æ´>rÁà5Ÿ&„鞢°!*~ãª!ŠGÒ©š ãE¼o/ªuR¬fìšÿ;||¦ÃÇ„B?EG‚_)-IiHMŽtC IÜŒÐ$<š©¹|Š^d ”ZÑœK³³"¼ôú1.š„ï‘Ð [J lÙö_^ )ãŽe93©âG×Þ0Žzw4^¹69ÌhRL%˜ÈüŽ¾sÑÈš•5œ÷2%©¸–®<þr‡kë× k˜e})¿¡µØ(Á}ƒ¾!wŒÀI܃f{<=Óß0~ÁÅ›Ì3ÜÃÏoÚFÇ·)–´²[^8ñÊ ¼w5¹ý—øÿGØVg™Iq/G¾÷pUõFÞU^öyYazü½ê‚xŽÎ‚ÑdŒ9{@ÍXf'Krýìûä þl`´<µ4¬ÞòücQCµqË0;N.¦yŽ.þÎj‰¥ËègoÒåÞØNê™æÙÍv{íyU[ô°;V µy¡³%˜ÈÄ Éj’n½¤?Ó6K»\¢u ­uÑÃÕÃ.²Ó+Á k&¥ø¨nÎ>g½ÍleÂí@ŒÍX\${±¦œòçÙû©Jùá#éÔkM>>ÐOç'š|’®o"dRêÇg¦8ÅÔŸP‚)ñôqcµ±š(Of·_²Å¬æ³ËÚ(ˆÇ§á×PwÐÒè³ “uxío'ÿ’$W{‘N¸”ð˧ÈâÿÄ='©‰Ì`Ž©úÀE—¯£¿Ì7‚¬ÐS>“Y€ÐØ(U!—hÛïp-à«+ú¯U¹ ¾ yå£ì$qU® n|›²­ôðn¯<1‰ ª Btj?öò–Ò~èð_< £x~^ÊrâÀ84-Z,=P{)OY%ùšµ¾îž-Hg®UŠ-A(Añuùá; CðX䨔É.ù=R)4pXBï¼—G§¯;Þ×Ù?ÜÚNÒå_S«»äD äêÂÙO‹ ªk(A6 a7g{ž>ÎjÏÓÇ÷m€ y´ò®‡Co)aûŸÈ°ý9˜*U:Ÿ]î|Ñz ¥þ¯²ô|1ôÖV:Š1ºÝØ~X,ÌàŠÜ3c ª&›#0í÷˜Ï0‚éüšpU$rë8<.Éÿ1sêo^ÕO_£Ê‹%tZq?º³ß„9"‘tyòäIMð]@Ú.ÉžP„Z_¦Ê0XÎ ú”+e„ÀÐäN¬^xãhÀÍÖ)8“S¯;Xç”»7„±àþe±àÿzYÒœ·Ëã&5n¥Òª¨m×øÖg{o§:—£Õ,…nªæ@ž ¾…<Å?BЂÆÑPu2OòV‘D¬àÖíËBv®LJlÐék0ä……ÏÄ6  í’Ã.gÙÍÉ^÷Ÿë?…!Ó%ò˜5cõÌ»NMǦl0gÑŸ©M€éímá­³vck 3æ'zG¡ u…’ñM0î^3>ëÞsFýÑÚ‡¥"üW?,Õx*^»ˆÁŸZ?EѲX$†ÏÞUÐÝx´V¿ÆŠíê!S]ò@N¾p¤«€g¦’º*õÀ]ÉÓÇH ¶\UÅÓÇVøWš8|`ˆÃMûéc»Õé}à™úÀƒMz„Ìcd)½×D?Þûl˜¯…”$MáþptUõx¦ç4šÅY’ 3ñY[¦ŽTEw‰=’!æ›®‘-•ÂÍ»Ñåe£@òe‰ÞáêàŸXÆü‚Y÷4FX·ü(좠—ÞØo˜ø=™vq[µÐ;îûÌVxŸ­,é,ü‰»“ô¶“y=Ñ|[Ø(÷6Bèu»þ“ œ¢Ž Ì "B¡ 3:åÎ0ÀÁ§³¿ä4xŽI¶°rø*c WSÈ¿Y·ÚŠp21è©'ê'é@TÇÃabÔSÓ¯y2“¢l”ë{–g63?çJE3?ôí Þv—A£Pì ¬üv ïê°¥âÌeG}`¶X=ƒÿþO—ûtŸùzx/·ùé"Øp=T2£ßïÑ9`ˆó=¢umtŽO$Q˜ê—æ^E&¢šR‘J1³ ²&秣§7Üû 9 íE\”/– '樂q–L%—L˜Nì~úâYa!;oúÜ‹æ¬XT‰î¹³»³½×b”ç½æÁ‹;ì#rû¼ªVµ›-(Zi‹JIb3£…JÉÆ)l}à”ªã®‹iäƒ& §¤±$ÇÂÎÁÙ¥g9e>Ž·ùéÌÕ˜[Pйҧ‘/ÍlÁšÌ^»=:O3¦-Y•ãA­PB!ѻŖ´´¦tr¡1,«(æÂA_¼7câŒTƸi”Vû…—µ *©ŒãÉšîTbQ–tý¥&Á±¬[…¡$ïàŒÎy]Î3AŸ•l9õ×¢þN1ØoËe„SÅ3‹¿ñ[ÐÕ70^í#A„Ï/ðQUúîb¹] þúXß'[ézü,"Ôþ³åßÚ â|éú¦ë ñ¯åÞ³x¹½^[8G79ø{£ýÛÆùR ŠòßPXÈWÅeøG&Îý Æ#Q> Ëþß›Yö¼PfÉ´"ߢ«ÜQOEÓŒMvCeÀYë1ÙÙRö§ˆÉ ÕðC¿í¿• vèdsO}¯øŽçàT¸ØòÀs-©,I¸‹QôÖ—© »#X[:ýkÌÌÌ.–Üž:+%Ñ-j]R¹²kº â”3ö// äB`7ŒJW¯Ë!¨sj2zYyh’€ì©\_ƒ\Nå cË< è|ò¶Âñodh–æ+š ¥Ø…þÕ¶ê'^S{“ƒQ§Ja§“6§^e¦DþCî¡[ lÝ*=ˆþøyk dOÎoU3’úÂå?ÆVœÓ3ôì_v¸Wt‹ó©²§êп‰£øé¿ZêýþO%Œ% ‚Zÿ=Ìpƒ‡ÿÇœÙnŠN²w¿£g‰=<žJ9PmFÁU¾œãê3oZ´úñQ|3§||cß'§çUKš (Z¯ $}¨ý<‹#Š×ThVdÙgS¦­å5“åv„GNþ2i)zÕë,cßšÌ51¿&›‚B~c°S ;ÐF&ùê+ áà¼`3ì»R…ã'ôü™I#-S8׫\:4¥Mè`wµ^ˆz©RùX®ô~ñÝÇj•?nˆŽüT~–Þ½I,íL¦28 _'‘‡²î¥h—¹Ë”yÀ ™<©ýÁ—ш»xhÔoF„ÂœAs‡\Ü7Ú{F¬÷g‰ô~hœ7Gy?0$dʈçD„$ÃAXò\>Âþ},ÿ}’Þ/àéüà=•šé·7j†ô1ñÞÝÁ°?ŠáyÞŠËP'“ø„ų7êIL˜¼Ëe¦þŸmúPÓfa_èÑ¡»O)Ò3ÅuI1ESüQ¾¾Õî(4©¨½=Î×êþ5j²¸?î>gæ0'=# Øõ‰Èuí'å1C©¤Á¼‹ß!¦=ýÛø·Ëmño°,ˆw>èž#åÚ‡AuÅÙa²¤ªÿøôÀx¨xØvâêœ1ƒ¦¤ßÌòÙ!"su(w“(g(trŸ(gwh>\Ú?"´R„Ñ·!¦Ó<þÙØsn,±ÆtÑx˜'E`¾ô‡Œ¼rânô¨±¦ÿ~òŽœ³0<þjÀ¿áL|z°ûzI­ô¥ÉÍZ†íFÿâýí?bg›SOY }2×æ(UB-m#˜AšVæ#³L'3OÕié”SyÖIu)jÀ"ÞÿÄ5:;L®0›’§d|¥®Ã•?ÆÝQ0cê”~Œ>ü|Ò˜Œü:Ìé9£5J|KàCÁXBÌgd̃Ix…ëÁÑoºJÎœ‡²£@Ø´XÔç*(=L~í(”®«ˆâCtÏìÅu3«eï¼þµÝÄa”ý#1*2½ª=<6$ •)½B©Èó™ß®*ק_T1q›Ï ‹ULô†¾Æ–ªY”!r6Õm2œ€9£;Sèœ1 )Üf%6#|´¢Ú²™¬E ‹,êp F"þ1›¨”ò’¢CÍÓá’Ž?Kš½ShB{é\Xô>ù±%­Ô·¢Ýrói©LV´FÔ¥(9bPÒJRš—B†Ó›5ä»±Ù/Œ;Œv@ò Zk/+ÍdzíKÉh¢½Ã¸OœN†hÉW²@‰Ä.ëp,̧oR£¨(U;„È­±Éw…~MþŠÇd¶¡ =‡Yû^â3tZÖ€e*{W sh×ûˆ–žó(ÙsÙà“k–4=aåÅRCQC…¼\‚>HòݦtÛ±|º¢Ì0%§Ê#4bâx ›ÒñN—d Ï½1¥p»Ly«¤êKZ¶ðÙšªj“ýµ³]bÆšd^"ËWf®}v%ºüüÕX°,ú±öâ‚qÌRO1®S%HEÏ` åÕ† .C4cQ´šR¬ ÿ}± ^Љ·ÊË‘GÛ¬ÜY.ÏÉXF'aª²è&L³HZ1v–ý«kŸ¶C¤“eÙò%fpæ|ÎÈSX’ƒ‹žK¼ã²Ïš-C\™ìT‘¿ cÓÔ§[þfÈΘ{¯VdÔ•±);5nßûA7ÈÞûQ“Ʋ&¬¶Ëóê"9Äãg[¿‚¤Ùe¿ÝíãªøŠ0èN÷¤ÖZÁ¿«ð²žû?ÌKPz\‚áTɹIÊáE2°ptÿHø¾ÝáA`k{çô ÒΪswd¨*—ÁAël£çÀyµöÕQbóåöæÏ»/*méÒ*tÕñÖ–Ár8ÁûÍÐéÍý- Î‡~ýýíöÙÙòb„ˆ×ñïó%röÍ¢°a}ʸ¥Bïk™h\Üøö\ùhÂYhIÒ%çâ,¢…4âê3 u 0¦{“Áà™ ‘þbà’ñ˜Òtb® -á˜ZWG7¾~Aë°A߶v_70ïí¨g} »V‚ÐÐSã6'´KRaÏ׈Jtä½£×*ól·!v½(¼Â¶kŒŠAøu|'®#vnVÙ(*¼.`}QÔkXð³JÞ—0ÕX6άúì™Â™Í„V5 RøS:PòŸ ÷Þ÷RZ.­ºxÙÜ ¡t-¼H—³Š:ëàCº#×A›ÌŠ=¯ˆã(JÝ·Èш2õ.ÍÇ¢ˆá BXäFþ•»ñ&bDieÒDŠb]Ø4Î*¥³jñ ²zÕ/,‚ŽŽx“m÷‘sÏ2;%Ö¬ôºâ%æ%Zµî0P»‹YÉxñ‹uü‡cPÙB7ßB`ûpG¬þðÕZ¡°´´$^y#Ê'ªR«Ð^®vV‰WÇ%”Ò)m¤F½ÂNpÀ5$9$™")@j¡Ö '¬â‘Œ=ëL(‹aâì!Ÿ) ¡)Dq:'Ýk­™Â@A{ë²h¡™RquNõ牊I ê/kU>V?e’QJä«Ž‰HÅv0†fP¤LlåtYIŠ&¦1EpF@“pÑC3ñu Þì=çÉÕñQÊŸáS(9R›&Lžw…¹³ÂÞ2%ž&“«ºlÚOW᤮øD œÀKåé‚ŽÜ´àR/`ÈÞt‰¼œ!ÜUàÊdc»‚½`ÖrqÖ¼~lä‡ký2%ªiÁv „Q $®Æ ?RŠ×‚hŸJíÒ¿õ˜SÜš?„YN¬Ü ÿ ožiêI0yCUBr3Fõà°Ï‡ŒõBó´ÓÜÛm¶(Ð'½o‹ìý¼JÛƒ×%ó~}µñ˜°Ÿo€£Øxû"€çn í § èh-4*)Me~íÄKê'°ÿôüËIhé'Tj&™ºRé=ìȦÒñ‘³+œ¿Ä¾M?«Û_2“¥ ï8¼åVeoP™m›§)Ö-Šaóu¾«€ÿï06N€z²·å ¾x…HLçS±‚a ˜p, ëø'Ÿƒ-}Ðı†çÇÛ=Ý=æÈ2 *ëlnj Ð~·Ù<8<ØÝlîu^¶Nfy~º P™LE³µ=í­¥†&ßS Ñ «ó¼¹ùsk¯Ùzɱ-ÍãW»'/+meõ~OéõÍVçåöÞQ§urLª¬ÌÛ­ -´­pˆM³Á{bOüôýúOÒ4¸F?­ÿ𓎺kÛVu¤ :¥‡³îè(,N·‡‘l>ð. ~oºÉ|Ql¢ö {ÕíŠ:EÿÔñÓ:9|BS¯(m½Ñˆ3Uy2ë!~t gÜq:àkº¥úRÝNc@ tDß÷˜üxäq’¶®9l.°àÇ“Q¨¢ë&C82Åœ÷Ê.¾©³rºå”øÕíƒZ>[Y}R~ã;ÌIãs×Ï“ŸZ¹ª»|z¿ˆ£þdì+ûx@!øC8¬Èꦎ“h=F(/sæ3™ÿlù¬qÖX6 7=X†ˆSƒ2ÐY¬¨fôd9Ý%j.U¢µøKÌ&ðåò—&F$nòíûWe%¼I_HÔªhÈ:‹ñ—†Ô¬ÑÒ­ F´îm‘²¿Çš:’±.ŠEÅ>»—hø'`™¢$ìا¨$4ña”9§Â–o8ó-GËfE@—ú”/DR•‚K ÚÎxÓ}2‡{{NBL‹&À)üþ\—î™Ë‹¥ÆyRõp i!aÈ;Yïá‘ÚÙÌö¬­k¾“lêT‡ïÿáÆùoM$rîùoÏül¥d Å’û‚†µþ(™ šón¹§’ä ²^—·5'†7z2}ŒÑ¿dŸÇ PX¦RüÓ)C…Eý]Cþµ`~7bÀŠª3óËJÑ/3تïI0½qt\Kõwì~ü½ÉTa'–€"õ”IÅ|¾³UÆc«Úƒ¾Hò)NëêÊK‚a4cÏõ…>LUö%³'&qï¾FœËÖÞ{ ØKèÿ{ùŠÿÞ ?%¸d©íããÃãJÑÄ„ãÜ]FŠ ìv)­ŒR‹êÀtàÂm>o€zµ…º³Œò7ÇŠ½-}«rbn'”Ùš®Ü3&ꃖògbçŒ°Ï “·T»jâ ‘S衧§ZIÇ=T8¯³„²Åzò4‘q&à²RQeÑH´Ò.íkšs³ð1ßsÄ h,æŠOüZ¦,`ŠqJðÒEÞÎY­ÙëT¤[f|_rÞÛ.0šöÆ•+sr°ÕÀ¡ÖÂÞas+÷0[)&!…4®Ób–~½.ŽOö·#ßÄd‡÷µæBÌ"ÓH̬iDÖÄ’™F5’=†lD*ºø;Zk(å1iÒÜõ~¯Ã?Ÿ·³^l”ë£2 žý¨”U'¶d=ÁÉ,¢nUD!Ï“°éâEí#²ã6ôÉ!ZD‰`ê1f2.2ÜåæJ«éz~‘:7°âjté©ó¨ ®*óg¤ Τ<ÿËP'õú@ÌK7ýú(·Ã €Ù šÛ ü”¶èhYŒ8®Àa]N´Ì%Hê;ÌF´”E w€Vgg»yrz¬Û+$ÚØTRiùð¢[1‚ÛuaËo€Lµª²Z‡éÖ2ÿ»ƒ¡¨Ç™ÍÆOÉžUXg„6Rp~vhÿßXgµd4@}6£†µDmÖ¥ šy[ ŸŸl6O¶3îÿOtÍõùx4 »È£+ÑEo0ô3«"›uŧɺ“órÍë@×bÕAÌÍ‚R½îÀë?˜«Òn·8s÷§0LFkÒ-Á†<^ùî©j yÎÍ-…¤¡Ò®­˜Û æòø÷¢s÷ eÝÉÊžBåÜ`;jdsšÅÌójŽF>’vÕýí“—‡[¹÷ÚðB²]£Y7øwò~Å»xm³hk—xS„’ÅÂ*áOu´tƒnœ\©öͺ϶LJL­ü%dlÞª/cK±¯IÆκH„öðK÷>6Am0.R%ôÕàÆÒeià(#ê¤oPØøØìw}º2ÖyA#D–é‹aßcÂyë&!j€*gÍY^–=²ŒSg¿a¯µCåT›°hŒF1K…RïEÝÉ€™ÔÑ™A§ñìY ü”¨ ½8îÀ "ƒ­vjÅ·ê.”Ç­¤“–^ú–¹ñâôYFÞñc}¡G_X—¼í6]°žŸ»_bnLå¸JªƒtÀÔž9èlŠ½‘é!be´OÞþÊÓ0rCáߢ‰ ý`°NlÊî%^íq¦%jVMþȬèib¼‚s÷‡K~—G¾œ†‘Tn¤7‘5„t¹Ä¨BK¤WÐu£I É÷x; Õ(¤µUq¶kœí)<©j•¾í¾ «½Ç'q/€ÊžÌ®Ëž»í½ùj¾C³-ý³„¨¶ðlïü¼õ\Tä]ë€,ACx×Ù‹T'œ¢«°ú^fI³X9CPºX[Ù^A@÷æL¨‡þJA£RâkfßÑé$\J?ßñÀ ÂF|=ÿHüvûíSíŽ pi~ g[{{ù=M6LÅиgîÄsdL²»Ì ¶{£Î¢wÊú#ùWé:iOB¶¥Áí?“g!È ´h'.éË0…½É`Xfð- |ã³zÅ5×hµâÕ.‚j)„0¶GË0–Ð= WáûÎeQµÀ§¤iÝFûspŸYЧ¨Eñ³ï¥7aMNñ]Ø5(úÁÃ$¡Æ}ZOã ÓÃV†~°T}û´ÒX¢¡cˆšu«?~úuo4¨ß fþ€nÖŸ>®N릱¼,ÛaˆæÜ»È Û¯ý,Ð-ß—èFáA=”ío,¡ WßOu^VÌ_8‰¾LIW9¿ÌMÍw5‘… –•(È.kštÔr7Ñ{‰T(bañ¢KŠE0´¯‘i܃)ˆÇ0QÆ„¾ç˱2­]DÀžìj=èußר•Ý¾Ory2l8—3ç°²£­ø [óAç «.2+t«B6O8õWìù$Œ†ÞUð®ìÔ˜cgÈ+hvÆpÒ r7h,½ÉÈ lƒÂÍÅz­˜Äeóóç¹j¬%S]ÍÕë9¦æµØÝ¥å?€iëpvl^³u•rd‹µ»éŽ¬93ÝP{þÆcÓÌ°ÙmQ·žT+¨vT¬ˆöÞ>èÕÝnð.Sý±]ƒÏ–ÄQ³~¼ÛÚôíYƒþ)ŸÏÝ=™gGö¯ŸºLýÄI‘­“?ÏÉ™qÏ<íMµÓ ÛÏÈç²(Žv7)Z%…„áño¥0©‘ê]F§­;ñá¬á‘*ò¡3 ºø%ÔŒmrtÔ†ŠMä{ÿ¯+gÀ2H²Z*ß+o %¨(¸É&ª™9#ÜŒÕt¾;ÛC53eÃR5?9ƒÝùÄçpŸ¿V ]ô“7¸‡Ï´fï¯Í_Š˜æÕ³ØÉ!¨…yèßDñÓÏ{Þ1x8óv’ò~ÎõöcsÖIASÎÏÙX‹ŸŒø™ù!=‡Ÿ)fsžf”\±ùZ#]Íÿ‰}u¯>¨ÈýªKÂå6‚…Aì'¾¿È+jù`æš­TJ’„}ØUï¡Hʯbÿ÷‰Ž«SNkZ(”?Ïp^4}¸DÕÊT§¡‘>µqÅû4ÎjMq¦vãÚ|T»m¥{MÉ°û€,EJÁžÌ½t4fê¼PeèbÇU?ºØ( %±F¸îèAiÿžb‰bŠtéŒKÒˆéŒÛñ´ÝIiâë”2ó€©iªÕFˆd»TÞPëŠ:Ù^q^óâyw³·åo_î\½¸~ìþý/oîï öÃèpxôû_GÇqk|29}÷ËÍ«Û×w¿þão1^>«4gÕåøl¹Ý>[5Zÿ{õlùJº`Ú·õ4ºˆñàõRÖ (dNW)*­+©ìÀ§¯¾™4•7e"´"«¬`»ÏQYúfH2nRÈ:爅8#Ž×î¾SS"0™Â82#Ä6ìØ®â´*œ:¤o™‡¢j^_^ <¸Âw:îdÕÄî´÷ߣj}㗾ܳƒöç NðÄóÖV/*ö[uå^Ö—€ÇÞ‘¦p°?G˜BÊ'bfM¢ªÆM /qöm'[t1<Ø·Ýî§;06\·Çƒý øÜò‡ qÄ㽑Še 3"P4,îјª†n’­"•†H—®ãÎx0„äì–ÕŽÁó:gº\1Ü{ýþ¥ó€Lº˜=u9ÎÈó¸#CêñÖ}L†¢/¿Iø)óô{òB¶Ó1Œ[.cÉàÌoÒñ >jöz ›ªŒ6éÕßËh!}GW›ä„…¤Á˜b6@Í£4»*„"öîâu¤JÛ`]HÁª|ãŠÏ‹"¸ ½ËœŒ&O—cl’@¥ëF³Ýá%Þ¼óúc/CxQƒN l[AN÷j‚ïp€üý¥b|ˆw¶þ`8¾Sq¶ŒÅ{ó‚ A&º@×+Ô´ÓC8X#2Õa„a¢”©\‡.(gi5mõçĵêv­¹ £LN˜ KvvÇÜ•½§bˆGÁaÊì.dU#TXÄ·ä-ÖðOn9þ•jÜ0u‘j™KºÓȯxXä÷VÕ\9»r§?U0SIRÅ ÉÞòå Œ #']ºËpà6p‚ ãHß¾c@ߘ3,‘x×h+òR?Fî'¶íæñÔ‰œ(RM’±äå;é_fõ%Œ>²+–ZÌÊëÝ)f#‡óJ‰åE±ôЙ€=ðÂ;êBö†Q£Ë}rx«‘”Ùx·ó|÷@V,Ö úzcƾ¡UKÜÊh¯ÅèÂVEDÕ‰«Dl¥ð­¨ãÏ"ì^ëV²Û7ª~QïQ?õkß롇îtN¤€€ÍÃà$)móiÝ+ŠÔ§ë™W4íÆY^>·í7ë<—î` œGùXÇMš=f÷äåúCR‡B•Bú6gk &ºÐÑ2HöÛú4 ÊŽ1—^×7W°©ZO{²ý|£ˆŒÇÛ3%Š˜Ñ ÝÏ;Ú'sza,—–Ÿ¼E!¤L…øCL6èÅ Ò­—öv¶×)´K:ºœÄWͨq­VóÅvg©­ª&R´ [tmÀ¶l&±Ü÷àYµ9Zt°/ÎÎΊN_P ߎññ­D™Ÿ“­¶‡ “,}¶N°ò”¶:Õ 7av5Àøl”,oߢÑÏë7–œ©/'¨L±f»LµßR²Jë}®?âR"ÒDã¬H^<–vži’Qè#M˜bn¤‰~í¸#¶^6··övŸwvŽ÷ Ž~LÜIº("ºÅˆ‚þõ‚—8`‰€vʨu”î[ˆx\Ê|jªdãðkÌîè§z8f¾ÞÚÛÃÍ)ßRƒÍcÔ=¶$"bE!€!‘â„ )´g±¼Ó~hsÅL,ŠñMd­¸ÞEq¦{Õ3ú®3Ûó¥–Nª[´ßI×zÄÒ”‡–¸¸‚Ù®ùðÔ:¤ùº ¬hî.ïê˜Ü¤;v.i§Œ9ó@ױϘE‡à#) êEÎïÈuààÒÇ%œeVTl²ÈºÊ5(i‹Ý–еæh(»æÄi¥gѳt†üB¤KÌlS ½1¯|žñÉ,…€—^+I;LŽTKàuìîl·NH‘œæ‰yÌ Ú\âÐNM&@‡ETE£huµâ¼®‰Á˜ôS3ØÎ{_çÉÆ`\Èòs?c'H§¥FÓ"íW)¾ëð;£o¥ßÊh´¿§4·ÚrýÇr1gÿÎ(:]™_1ªÁ¾êò 4ü AF¯­Ünim C–GÆ(æî,®gAê8|#Uï}gÓ9. +{ç¨ÒÞÙÝÛ>Ï…Ï+=Í4—K2ç¼â,UêóßM…Yÿ;Ä YDȃýÌÆb(¢/‘šÅY²Vß…Íz •¥åmg†?MøÈ‘ ÓÐ‡ê³ r˜ ”Ýß(¸ (Bžéh9‚¿YwP?´Ž¿ØÍNþPºþmÅT¢× æó•~ùÊ@nüè™SÃ(?£xÚ`,7ÔzØÕíÛj-y¡Í•ÁMMt7dÔ¢1é×õ¥ÞܤKc®îX–(–ð £CmÞù@ɪ‹7¯âÞá­9Mðlå[iêê Àóô)0V.I+è\cÃvŽONv+í“æ ‚®Î> $Õí­,¨ërÒx ÿÒjJ´ƒSXßÖ L,/ÂxöLÚajiWž¯ÿbÌIy04)>8fF01îXiã29 XöeËOâ‚þõe²‡ž7öÌŠd„›q–H‹—qÔáBE\bpXÂS QvEcI¢+—–ÏVá,R¤úš½¿£:ÊÌ DdbÅG^Ë(f¼º¼ e+€ºµÚ¸E˜ä¦sEo7Š™õúd¢eÃE["“«’©Vœ­>“MCz” cA!ÞŸÏVÏŠ5Qy=ôÒ_ùXK‘@C“AL—¼›E,ý‘õ|ŸÓë¢4¦[(lBŒ[”õóÍdjpÓ£“ÝY™ÀèDÍ!:/À¸×ì§HÎxàad)&¹Ù¤lE°- NƒÛ ÉmGTà ÝÀ­ ¥[•ímĨ|@îùšcµi¸W+,ªhS Hã @}Ä‹E^÷ºQ˜2ÔuÅÐ0ƒ%g8Î š7N2˜ ïÏV+Uâ+«lI.aõïRÆ·KÞc$mÍGEþöz½l}S»ÊS(K&ûlfÜêȺl5´ꂘ·ïY$ξ:[•LýÀa ñ‰ök™Ú(-&¦1ÿÈØ©ý2I-‚?d ¦Š 3V÷ñ´qý%ŒˆÍã½4¦‘Ž"øýÚƒ*BßGÊc;ZYF‚––oÏÞ¯ÔVÏ>–3öVCÆ.*©.y£rÂÐÝiO0Ì)šP=5©“ºÑHA‰Ò¬ ç¤{jx£Ë[$Z,Šb§H~klÚÑL%‡¨&X¬©%$¿$Ieé÷á?)¥¾Á›óíåhÂþl•îïåÇggkþ¯È¾ÒvÄʦGôÂvP¹×Ž´w¼·>µ‡î…w'NØ×/¼#SÐFÆ(­bò%-]HîÇÚ“Éìê·©½¸¡Ðyû±t5Úüúkú¨Ó¹„sDA>”€&Å{¿õ QKϹ±7’¨’?¡YíG;®=ûPgx86Š6³=þï=æ˜êÄ>ulCþûL¨g%ñèã3]zù7t¢|°'Íç{ÛËï¡›•¹åf¦ ÛYeñG;8·?n1Q8+…WÐèÆÒ"ŒuãÆReÀ9ƪºüž>´[u¾±ê4A,µ,™µ´.–ßSÊ‘ 4v¥‡µ³âúY± 6âÉE<Uâ3à¬UtNî†D9yù=a=‰³â ,ð8¨©Oƒ··‚ÜYÍ#›«!±;/ lòÿ\VnbéìÃò{LðiW#V¾§h`Wïà?€SØoÎϪK•jê»÷Áe…ScU$K\nœ·ÎŠ@òÏå³ÊYµAmÀ7'øƶ٫-Ÿ}øp6ZÆQ¦Çplw-n¯žÿsù·öO?ž«¹¬áCúϳd[¨8IYÃdþD“©(Œ‰,ýí­¦‡.¨—·¿Y¢å¼˜QË['®bÞXâ{‚³Jj8«ò+y»aUWbÑXb^Z.I‘'_:@ÎX¬Ó^+·e„‹9Ž–{e)7?^1Ž>C£E¬’ÌöïPhàó=§l¨©[3y—öÌ29U ‹Á%¡uàÝŸÄø© 7‹â}aÑAÕ,¶†^ØxËòðYvRõE,í­ÕÜï?fÕõQU€\‚×x•ê{«š²W~æЪ>c(÷ÊJõÙG„÷“æfçäø×Î6‰Œ³XÕÙ=ЄEµAKŠl–Ã!m_`¶cS‡“l†‹—8û ¦O~Qœý JTEU{Î×cøŠž¹–¬Ä°áy·8Þÿ> .ï”Û6[Íƃ kbløæ_=9QãƒwìR.뿤2%àanÒ…Œ¬nß>nÅ„²¡|qãлBd Ü ­¡U‰3­¦Êëc›©JeÓö"ÞBÆ7ÈÓ?J¦ÊðR\^²0i8N_Þµ^øãß׉JƒÇ5émCá|hk\³…41iäÒ2ò¹vÐé¼Ú=x´†ŽüúIgó×ðã?$Êu^mncƒ¶š'M©HMbkoœð™\×ë¸ Ÿs|Õ48tl*H´Ò®ÇÞBh…Ã'j€(ë$^ú½r¬±ÌdŠ¡P cÒ‹êr‡çîÈFŠ½“Ÿ¾ÿÔÙÚE¢³yxÐ:ÕÛ·; Zñe§ƒ= |}™(QÖº 2ôd"õÇnb ó•ÑŽg¯‹eñ½½*™ëïHà‰Ò›6ÖPãŠsž-||VМλ³7"TgåÓ dó‚° G_´xÑÖƒ+d&¹&¯>ÿ–RVë›<ƒÂ]mX2/h¯84’{CIHöÝ‚alPêa%ñ$‘XÔïºÓ8¼‹¢R¯÷Ø¥îMÆQ]ùí˜Lá’ómÁûbó/Ò1x¡='maôÇS”Ï3–»€B0¢Öü’ s))Ù´Ãy„¬,ËO˜j‹àÂeΓidNêi“š'=Qa.ö_v¶~…c6ïå÷’a„1÷@½œèýýj8´Ú»õ—GGÆÀ)e]J ÉRaÝäØøçÑ®ðpÛêÇ1¢¥B¸ÖxÜXý¤s’#v·‚«&{9)~ï+Aþˆë)K`'–ª‰wŸ¦i£¤›„öT+©ö¸±VÑ&ÃçìÍ°4暟OÕÇ\I÷P9'ÏýŸýØŸTŠ§L n?žï¸cýí×ק©C}6;É¥0é½?Ê¢l\„ìLNZŸ|fü¼\œ1 ˆÉà¦uìÀfƒ(lÁñ¹~úŸ «•O3‰M™ w·äy¯K„®v8—e×Fš„Aô&0˜ 7±ê_êfò?G“ÿ9šüÏÑäs;šäyš¨›yò?O“ÿbO“ÿhW“k—ÿ£Néû•ÏïöðoìNÃ25îEqÒê/œh™Po(› í[Ê =ðAdbhð¤[IÿÚ˜vÒÔh•1É_U~U0þƒy87WG”£¢”ïÌcÕÍTàÿÏ“ÏÓgux±T刬‚‘Ey<éyúT-¶FÁ;øg­±V¸Éòµ É,' S&ÍÓ7\ξ-4ÛùjÉñ3K:-ªÄ½S©‘˜ùT R,h÷H«2J[UܘÏ+þž§¦ý†> RÎ*øÔ7rW¬7ï šå¶š/ÄLÌÈ Í-Ü< Àá ü¿Zù¾flçö`>˜~Zùo96üWèïÓ¼’(…ruU£q’¦(UW£·êï•þªÖ9uHí¯óY4IrÏÉ;Ðò¨s#ŒeÈ™ƒ†›,OÄÂë‰ÍÍïyDÈôdJè¶Su>iJ+Ô²>VSN5÷ö͈ۃû:ÞÌ”±¶{ËÜ®-*â¾;‹a’ÆèûÙpïoêL‰XÐuá¨2Û™E3ï\Þ,R£à„ ÛøˆËÏ8{Š«ÍóÛƪêGÿò»'Pûõ!á]ÈÍZXÈÑî»õ/Üëì!·!æþC¹9ÿö¾¼¡#éûù}ŠŽÀAÂ’@v!»B[®W±³àÒKíŒd ‰óÙߪêcºçF;Þ]“¤™¾êªêª_Ø—¾ 'òÄRí Wµ°Ž;Däúúüù I»|^F×WÏŸ‹߯É[⟃g‹PÉ VXÃl…ßc#8çd@Š™ „ƒÆéPŸÐ•ù~ı ƒoª?Ѿã·|Áäu5ní§‹º–Á ü¤‹™;W´†Þõ¥yÿ{¥ì£øòVQu´‹Z•;°ºV©–XµZ©&[I}‚¹ù÷¼scZFÌÎ,£(aÜLp!©©fàùŠü~ÁÎÏ«åç*þê»ÊùùZyCš—ñëïopŒZ/˜ãÉÐwºÞõÐý š eOÄÖBáy–KÒ-èÃ.r3MÛ² ôM£të}ñ kpÌz"l|]Ÿžº´vû’Ú.oóÕú…Ll­¿ú¬0y‚Ìøx±óÚÚ>ÈÒ–Æ[ü<ø”eáôyI0H‡ÎmàÏæT@þ¤)|ÊüW(Œ§^¼>@ÃÃò¤}°ZM:,Có{š Ác¨mùÜKhŠd(¸<Áã /˜ ÅsüÄ_ѧ9$ gV=˜³=mC*k´Û?T+øÑ™.OpDÃø;êÛÆÃ7Å_A“ýhÙ¸Z~ S"½­óÛéýMô«›‘hÍÝæwª ãŒ{2jjùXgdñQú1ð+ætÒ‹Èß«Ku‘l tÉLy_(ƒñŽÚ^#–ãv.ó‘­#k8Êð.0Ó ¢õjêüsøŸ·>èÏ ˆ+|õ¦øFܪÐ"Ñ(ÖpFÛ“ˆ‚ä(d1ÏëX8KÙÒ¹ïfê¼€v›9”KkÍåsÎþ Ù˜ßîŽ9@ @õ\Ì}ÄåðìX¢ªÞL%óF%ÇMê7 '2}êu§,å4SÇ$ë“Gàæ<˯•´³m©Œ—êª`ÜYb«F€yBÅ‚§âô¤FM…—a¤ÔZ¯ç ÷˜®4•_ÿ)ÛPkZº‘`´a£ÂÛ~bU·ý°¦—ˆý,ŒlÝlÀ°Yá0}GÉ<É›ê¶?ˆ³ã¬ÃÛñ`$´Ý‹é[Q;—.ò4 ‡ÍãŸRújM]ŠW¦íº[Nd wæI(‘ˆeÉL?]CjÈg'G/2qnùû)1w……1ë݃C @¿“îÂW€—b0Û/Ì:{ìjŒyç8ÄŽ*ÅZhî¡rÔB¬Ê4jÆêÆÌk7Š±I/jÇ̓F†úää09"Ÿuš‡m õ];;ì´wzüÞ„¸ÄãøÆïJÓöpÙ‹ (,îÃiˆŽ>Ìj 觶t¹Y‚Ä·ºƒ^ o†`¸—@•¬{ëÍu†]Œ†³”#‡Â,_,/«•¶ºŠQ@ÞMÅ5Y2k\Ž6§ÛŸô AÑ”óe9œ'í&Þ;lXȧÖÁysÿUYY~“K4x0—Äå”Ȩ·Ž0aD ú|¹ž¼– (V®Š‚6²¡dû/ŠA‘xKéiÐ^j8ż1ãx-}YK £Œ©ûý|y/|Áó³±ïØã@F)sìw*¢‡41!ŸRKÉ i‘xaí@1²Þz8 иÍ6™°ü«¼jë šÅ×V¸ÌÞ9÷@1{ÈsÃv2u nírJÒï"§Ôb"Qs IǶ sU<Ôª,³+èâƒçrc¿—fs0Ž¾ÒB׉µ|ù4Oeê£-áÃÕ­…ˆMý^†•Ç 0 Ó÷JyotºaìÛw´3~ÇF Úkíî²|'_Ä2áƒý能èƒWù"Å8(œóØ\oðÕF©Z‚SQu*øžW¤çG"f¤N §0Ï>ùîþ§oÞò$yã±2 Ô[ }`a€ /opÜÝÀð_D:ö0Üõ¿ö(¶õÒêéE•èÈ[V>­®ûŸk„Í?Gü3iª‰s0w±Ú\T§ÌSužyêb É6.&ñ¦ÎpA½~Ÿ„e$×mìR5¤Ý~’N!‘ê/[Çg‡‡VóíÙàÄm×[ÍÓÎIëø#$ý³Áüý¨Kvõ_UüE«¡éØ›7«xþÑ'ZÊŒ–òêE•BD­îˆ wðØBÜtKKDOÅ·0Ãê¿š¼ÜÞÖUkbhí°¦9NÚ,ã~¾|n½yšxàj/¬ó~æÒÃÇîYç*.=<±`Íü{b¹DØß$ê†R•1_"GM\”?Žìñ ż3¹²ûµ0ú+·aØšX:ôγÌÚ4ý™ž”çiO~ϧ25YTäÀâgr†Ã……§ª”Z„§IJKEo„`B}'8ÿ¤æ|aÜ'tµ‡`9E¸hUºžë§Ž_$‘e_^2vf¤†>C†éÃM8# ØáùS¥žÖáŒúƒ(T®kžv2TÆŒf&wü£;¶|LŸ\.I»°@ !Hœ,ñÝлšI^oÒO_áâõŒîõ{–Ü „úmöÄ‚¦fßøHéûÊ™>C·7´U•KºÈÍÅCÚ+ÍÄ/=üÉܲ˜]³ç6]+œ|¬èÅ)\ÆÑ9K ùTDä4 ûwlÅ4w†X8|‰Ì"òåô;oÈwë#  ôèž-³Â2Ù8-—–‰›GŒÀ:¡¡~vZ÷²\»CŠçáù¼=jBl‘ ‰‚Œå·ABøã²ûGe¥‡>¯L4À^¹l‹/»Ë%*ÎxC; £T1@tÏ b‰@®ù^?®@ªy'fCñÉfïí¾«bÆóð,%6)–ÙLٵ둂}YD§=.L¡.š‡N–®Ô乇w€dÎë^Q9ÚAœ;Ø™]wL±u®@ *Ûƒo»Hn p í~É2€‡ £B|2Ho-za µP8=ȇ[†$÷÷Ž/×)o8ï” ~§¦«#ßðE˜užÜÐmÜCVwì€ýFèC«P…úF†í ûìØà ÆØßvïW\oÑEŽ2"E¿ôÞ“‘2¬ußr­“‚Ý\²^! N ‰ pÜyxqVhÔÒMß¾6Znz ˆ¸ ${CØ ·NruwâÃ|áÔÙA0„A]m©ÚùÜ®ïÞÕXðTR±BÚø&jƒ‘DÍã+ÇK]žqC¥2‚ÑPßx#gU5‹Ã‰¢©*nKŠ,úÝ÷¬°+„gÖkºw4ymõHî¥;öÝë•xÑ´O‹œD=~¶‰=ŒÅÓ;%ãamö ¼E5HŸ”šÕ»3¤ ¬T2Cxþ^ÙòME#:%áÂá]]‰éÒr¨HüÀßTx¬7Ø ¢'a(%Þ§(ŠÖi}¢¦¢•,p7sT‡ÐÒÂ*úyƒ‘NXC#×ç–N²ënßß“MqbÏL¼ônqg—°âû[ÛQ™è+¯…À¦û^÷  ¢ƒ 9?_:0 [¯T¿¯la,?8qOÀ9‹×]Ôrñ@Ú²:ŽÏ‡0/ÓÏã êpŒ‘êU”Éêá>Eå„ï[¹`hâÛîhìöƒ‹â…lMQ‚á¤$:?_ç:Å©é”SxZ'mÊE$ÊDS:Ì;5_ì¶=aù¤7bn7¯˜.r °°ÃýíÜzCBÁ{k! 5¾'ñ y ¼<óM&¼{8Ý VV„ÀËø¸h•¯,Ò4¾Žœƒx–\%8ÂCÍf²ÓÉx,6á@”Ä]­PJŠNÎQÁàû.º¼cÙCýW¡5œNêâÞá¾Õ:;¦k‡¨°:ƒ‘'‡+â—|Z≖S$ÞŠÊ(ó4e‘fYŽÑ°ëâ½ÛžÛÓ}ñËebLËbj™#l÷Cí(n\Q×=3c&uéTx‰VÉr¤A† ·¬ÒĪŸ¢{œÅy«³KÞ›X6Z ‚ëDž#ÍÐ4>Ájáü_Å7O‹ÁÅS3C‚"6)‘€k.VŠéµàn ÷5’‰µª´†çÄe ÉFø ºV!“Ü%†YÑÐðm5, ¿U¾ß¨¬UÖ/Øì6 ŠãËç• V©T¢…¬C!Õ¬¥ÁÉîãUòw•õ„Âdëù•>R]Pä-Óx…¨êZR,÷Ô»°éòqÜ` à¨\==­—ÂSŒßº_ͺhIŽòÉÐöé¬⠙ë?~»žË­¬¬°Wü4ÝŽ´¢‚XMFü6¿ñƒ´„mô!±c)œ¼MH£#R»Äœ‹ó5FF=ê…2wZâ)]ÂcK ‘(éÖ7$ÞxŠÜ{*EèH ‘øÇÏqH ¢à½¸uó…é@YR¦TÌze} ïƈ_§[²×ÃÀý{;/•?·Žªesæ®0Ø7ïÖ/P‰tç'-¼)Ëæ¨%$6¹× UâT€ó)–‘)bZ\O¸Lž:b¸C•šÐÇ„·Ê·L!Goº£J|,{”uyVµ1íÌr&ˆ¶h±%Ã5–p`®Úëîà*={lÿ¹Ô¨¿«æ1¶üœùn´ÚÍ“c¶4°õü‡”ÐjüÜäEøÎ{©`¶Rj-ÿ,ŠEN# æüÏ¥Ví!(ðÁŸ…n/RÞgiå±òÆz1uÂg±9åCƒ·™V‚¡—¼Wàê43éTÖe[óÄ"Þ6ªNÿ*‰‰YȤÅ×¢ ’üà œÑ Ûs0ùÒ†£ù‡_ýË¿_bsØ^?’ÐÃ`A§ITa˜$Åœ©º€tDE¸]ÿ½#òºÀc d‡À¸VÁlrÊîzœª=ÒöòÄ´Ú˜Qc ì4}±‘þLÚ©iVÁ%U”-Ñ0¤1PljŽGÑþáaàì2÷Í.§_Ñe[„ Ù¦ß,E››ñ®ç> ºæë½ê—s¯š j’ébÜãòH>Ìsk)¤1°†:¶¥}í”Ñl€)°¯r2c“ñ4SO9AZ Urkb;)€´*²ûx_sÏ5ìØCô˜µ Ú0¿ì„Þ{%ÔGðêé´QŽYÈÄéÀ “màá!ZZ§…óÈJySŒŒ1ÐÃQt9¥Œ6>tbÕD_*rãÉöÆyÄ-Çêþ1[æ+÷OõÙX ©yÿÚEò±§– ëùÙ¹í™×©!YDדÚû1GÚ,~í‡Vpã;wc~ÍRé%ÅÛMdÎ+ .-ýÎîÉ’8Á Ä¬yÜì4ÛÚq½Á:Ö‘ü’ HQ×ꟹQ¾´0B6ü"/Ó\ä“8ñ”à aGg‡æéaƒŸ·_ÖZý̨M=+¹3¸Ã›YµâÄQºš'zÔºãŽãò«½ 5ã þ'â—•ÿÙõÇô!}oÎ^â³Ú {V®øi‰—ssH_H49kWîßgy\ù?ó²”]–Kë¦úïèÙðV‹Ñh–¥}CÖ­ÚËï`¼×X‘ty`Ø. 2ó´.ª«×0nrMXô\‚Õ¬çþ/Zº ÊAÜ^eY+¦´ÏÄ““N>ÿ»p½Þž¦R‚ºþ4nÉ“U ¸ºË0ú«\k²zQÝYª(ŠÌ…²b›­ì°;óåÿ´s„OŸ—ƒ®ïŽÆô6½qq³´xMa¿Ç2„ive@ÙWÖ•‚öÉ×€~ñô¯$ª86t¸_yzHµAÔì*`î8f|.ò4Íxr6x˜¡êÂLYEôû~/#¯|äÄG7éÂüÛsá³ìÌO¸7?~w2öQƒÝzYöÝm9ý`N¸ |È•› Ü®ˆ5Že5, [<ù¬¬.¶å«§Úô¤,Ø=42œ9nªïÜÐ=ívñ‘õLSŽ´l×Ó[9Q‡¸¾‡’DvG„HÇ‘$#P®Rñ>b¸°w°ÏÖ/*ßͲÛzˆu-úÆ(Ó¬õÊw•éK¢Ù â-g©„)´mÞ/lº¢–´TFVkÚW›ø×ÊŽ=6]ûvZHÅH;YÓø{<||ä7É[§6äæ×,Å¥ÔÜ„– Íh‰­B‰i «L2¼ 8*½nJ¤Y ÛZaS³œ…qü4†{_w^âÎ{¸„{MxÕ!`c`¯É¾W Ž=‹ç>ÙÂ'ÅÞè-Íþ2²½G¾‹ DÖø¬ò}µ²Vٯ܂}¶Ñ|»~òï÷°é_Ü®_ R0É÷8݉ïŽÑï؆Õ”Dˆµ÷ú†¼‘¹|Â#CÕ8ܲ‘—·mVÌ9¹_²ì #ËÛ¦9‹óBö;èËEö¤û%çZÆý)SèGÂØÞi©— @Ý‚°‘òZ#EÜïñ­ÛuŒÛ¸láŠ`u‹ >Š3ÚÂg¶rÊκ?Fµ¡Ÿ ’xÎdgCü0¬õ4î£øc6šøNyìÜ ~UÙLç[å!`0­³.í­»2ÝÚÇ ¤¿õ_üQoúÖI\ܦ–eêÇ" HóÑ£y­5ìýÀ{…ž` &ë°¹Gç67zñÃÐ+Ü ÜHŽËÀ½r9 Mù°2¿kT#…8ꮼü÷¬O‚ñÕ‚%;.1b¼e²wÈ =?zãï]¤'›pd˜ø~ÊX7ÍÓÉx|YÅ£©Ù‚?£eT C_j¸ÀéÙî¨ÎÀ¨ “% çIШXâzRt‘y8»DÓ…®é Ð2Â+vi¢<:kaâ ´ÄeÃ_”@«‡žå Çþ=cÐÄ‚~]xÜ×…}]øxÄ×…ip¯ õºðÑ@¯ @y]˜âuá+¾k:nè‚dy¿"»~¡È® (j¤ÓGý! ~%!¡€&’0ê‘ì#Ò(<{þÀîcVÜTÁø¾¯^Wt–/ýqŸ‡M8·Ü«Nâ}:åqÿ+Š.¤ ç&ÇBE <°xt%lé9HD¸uD«\w+³öÈu‹zÂ)¼èIUOb†kqz¬Ì#¦ñÏ“4Ž'§K¥ä¡ÍCï·1SÞ—†^žBL_Vìþ¼ÊÏE&ƒHÀXm½‹vTef"ϳéS?zö{ì}Bví‡j×¾ >B0€TMñ¶ÊF‚¿â£u%=oǨ2êÙŒÊ2u,µvª+xïo–Vä|l]S1Êâ#Ë´‰PoÞü¡}®¬üAÌÔ–`¦øõ9ŸOV"b· e‡ÐÿˆÓºã› ÈÅÝ’HOÆ"â%2ÅuÝO 1P˜R—°èß…·vhY¢_¶Ò` /º–Rvƒ^=gmXx´ïR‰d0Ï•¦œOä%w¤bT öïK²$Iäô„O~gd [ÁPD3©ˆhŒ£xK˜‚nœ$¹¾綒mÅÜíæå,25/ù„ëГz™Â¤Â›¡Gßµ‹2%Ðü_U#†n2¤”"v yŒÇ1æ¼éœÔ Më $Ý<³{@f V¹p´”Ç^fD•SýšÆqµÎ‡7ËõÓ§«è:Màt¼K:{~Ü–•<ùǪχíÞQÑ˯œ¦èÒ½æuËI¬ä2éà–E[–<=K2¼ïòöCµ¤¨B²6ª ¾*™.3Rj°$QžÆ¾-ƒ!hãçä-=?‰rã%žE¡Ï×Ó ÐB]|à .›@‚äXe‚ñÀ˜Ÿ9¢Ä¢0íþãGÄZu=<#èK…C2Bš§ ÐZé‡_b›•u~ý€HA\ÆîbÌ&Ò á)Ç4õ$“ëùïj™|(hã)’%™†H37ž$®³Œ;¹LOe’·ú¹P¾bh¼fFÅÑCàa ±×RòÒàõßÓR¶H»šgÁ 8:BZí;Øn h²<|½­kàô^ßL6„[jÁB³ÅÚ²Š“¡@2®äˆ;ÄÑ×^óèî„Ó"ÂZ¥b¡G]‡ãFõK¼dÅÃfñs* »FÁÕfÔQ-<ÔÑ{a.hñø · |£ÎÑ2“}ÐËÉ/ißXžÈÓ !ð ƒu9C Z;Õåý*O~¼…ä(†"zOŠMƒ…(d^‹cÊÐʈJ$XÊ*RÈUƒ>•9ÓB Bîê?’P?¡õ )«>^ú+$ê7µXp8ÚÓ”uù·<¶þ™Û{±­Ê–R¢lÒÇf­ŒJ½=gl³ ygŽE€xÿŽßtÓ‘ú‚:! j´y(»¡Ã‘s}ÜvÛÑy]¦Y”;yî%)L® ýv.–€k£5SµØDRÅ'B[}QÖl>ÏRdþ`I… o @ãÈx§ò=W¡â ó2•‚/ÄHÇ•§J!"`œqV°Š¤EãéˆÖàµ3tD^G—×!ÜÉäàwr…<û éaQšhàêÑ;™ë4Õ>÷l’ñùuDxïb‰”³—†Ö$Yq¥B? ›[KU~ºC-#Ø2¯(´;^dûŒô€°Îoέ<¸U¾xo÷'¨É@ËѾ‡Z!¢«qøƲýKÛ::Ù?;lð€w°a)¶[1÷€6ZŽ¢yÛâ0Ø^æ{P<Îçæ²x'vbž[¥Ûþò’!-ÇîEß1\“&D¬ ˆ{D¯HS’“ºm{6ñ[Þ]BÛ¾ˆjÙز~Tx6Ñ{JZLÎü†ÏÛ«Ò!ÓÒÌ—Êσ|Š±vlæò8uz/óËsÍä2”ãmÌe~9é’;qNdþ©óWÇÆGíµ…Ä]¶0c-<úÎâ|l’Çâ4¯Ä³?µ3Ì_"±cüèòá@Bš—u%ª|"SûPoCbʃ\?ƒ±'BÈpq\¦ ZWbf:ózyé>U!Ó±(.Á´»8=e4!Yd,/ªª¡u*u_ó¶Yk¡ÆÚ¤è1ÈÓËêwÓ¤…)4½uÄÊ~Œ ˜/ùséè§ýfkJŠe¹XQsi_]Qß°aÝQ?Œ%Ëe$¨V,jÅ¡ü‹qÍNàï\šÕÉ‹uåöá…Ó‹ÝE壄(¯]Måƒ'Ô´ ¼œ*!¶àEñ oÄÅEõÉuþírTCÊž#Nd wDÀ‹À¸}›X°בÇÖDXã<—Ü@«3[Æö9i©òË„ö`œg؃DbNàô#\©-ÙòRÊ„pŠ3I< ¢V#ÉN(KÂÞ5ö&ÞnmhœêìIü´ãŽ iöÀó ²à3¸D« ï3MG»ÓjžâFyh;ÿ,Dy³Åo¤ÓQajN4-SûîÆ·“•ž%…\dÏ6%ß{µ±žGVp'ѱ«˜à–±ßî`4c-Ë]õàùpÃb§‡B»¨^ä;ˆ‰ÂeƱSë슣ŸY&Âc$™~Þ=¼1³Žºˆà+èûWÐ÷¯ ïŸô=è¹çç›[É°sÓõoÊ—ûáˆäƒmz6~;›2¼©ç:²¹*fÂyjlfõëܽ#³%_™¥Ì?[~€~vuã¬[Ì¿/s›'ˆÇˆ]Cêw ISÁMy 8Gú<6¼qîÆ»ð'53Hê™OåŽá×.¨pòâeè€IzÄmŒ¼Ö}WÉäÎA¥è’Ô“žæ¿Tn!ØÎ/¡#še”‚Eöû8Rù?U›w—?!ü5`磚x’ $ßI´Hê‘–N‚|:QbX›E,ÿµZ&EK™¦ns€øâ˜{,½>½:H[@iÃT§ö&Ãtçÿ>e0°·]9ÝRJ[üŠ^ˆñ¤Š"©]Pe\ÄŸ”öí—Â$Q¾€æé_ö@¾Ëcâ˜KsHÓ…ÇŽ>¿ð%D(Q|a?-!æ€ÊêæhŸ,²È|ÔÑŒÌÚ˜^qM®÷½{3ðz ‰mÂÞè÷b>U˜‹ŒX´,ý±X•Hlwó?9뜞uþn.Ʊ¥-_‘°srrh%¥æ‡ŸQ®îLk°Mœ?V*×¢Gfx³iµk›c9ñäÑÆ.ÅŸ%d4Úœ‘Þ))#osÆQí¸yÐhÃÈÂ(h*WÜCE«gœÄ¼Ë'f³V–iy!Ñ«’X™?E»‰ßu¶“’“Q£sçŽYÕ_dúÓiÎåHXÌEVãÜr-"ø´ÿ¸—ÿRvÃô(ÞÊEõ«âôQzU~Z²r¿»´*üùÁ MþsÆù‘|v¨M<:æ?8Âaã!LûBÙ„ÍÎb÷ÒG:¦W¤-Œ?´g[9üƒ£ˆ¥uÞG\Ó䣞í YÆ¿±G×»7ä¤ýZëUóØ:lÿÔa±Q뜵í-çzr7ò V¾‰‚8eõG~ìèYœ’aî}ÇÙkï#Ìb…,ò$„ô$à¡9H@÷éS¼Vñ¤6 #w#V6¬!ô+……ˆ tc #sJ{>cIó‹9{¨¯«jDyêµ•Owœ@÷i¼V¸ªå‘ÜY°eÀBnÙ6ãq_º¸RHsŽ‡]äRàt„ièý<Ó<¿Ó9“—Ø«²‹™öV†i\¯õEv6DÐÔÉÐ;8c°w,¨y…1V+HZ{qKsœmáÍêO;Ò36³C»ïúÇ„Úø“Ÿ¿KΟž/ "9x?­žåy€Ù¦ô÷ã%Þ~L7õ½ú :©î#æ³Só7{É&[oϱÈãZNAl¶Ñë_†ÆÓB‰V8a\ :5Óä£^ Á«ù*`ûCIÜ<BôMX]KÚ…Ò 6b)ÑäåAh&0u7¤ô½8±Ë´]Äž™¾”í1ÇÁ¥‡1ÐqGf Ùü‹|ažõ½ei/Ìåî³0÷R[xÀ¦Y˜o¿,̱UâáñpñW´øãפ 7£‘½‚`ø°fõÍÝs¬|áÎÀ1øç¬vúž$KLzŽ²5›¹=K#R^c/?û^~Â9lZîˆÖ%vþþq¸“˜›°Z­¬…ñ7¤8ÁmúÇÈ6CCï1/¢ðòôûõÍ­òZ•Õ*˜µZY_“>_%¦½ÞÃׯ+[Õç[eüý¬òâ”Rªª€Š`W8Gô ˜°jûySŠÃžÁ,¿@ÝX—4´Ð×0ËùÃ'á#jÖ<æAö¦Èký {]LØ _æÁ:•dü‘¸S:ç‘ÒÈjúá>§7ïÂxI¾µç?ãçåŠçð%L[D*  ïÞ ,~ Ø!êż‘¦9üYôQaôÞ†$H{Éc•îEâ>#åÀKpy*"ÌÀ£kLF={ìX¾síhePx–œAr‘u ¹^ÁYñßž¸]C_} ÷#玕J<ÿ]É00ùÉ®Ó u†äõ+PÆ€‚Ó€ëû÷ÒŸ »+îô*\¦Ê\~É›àÈ¡í¦íÛÃë‰}Šè'6rü2¢¥ví.9Zø®p¤¨Õ­z­þ²aÁ¿úO…óÛ‡š‚E*Ïh¡í·»]g4b#!È(?ep}YÉ VÄcp D÷@4_ÊèÀ/ý~Ûÿpåyi¬<–ÉmƒAñÜ´šÃv£ÀvŽkÇ/¬öÉY«®ëoê5H~^G~à¡~°Ê†TDd ßOü![ÛaÞ`ÿDþóúÓ§sæ'ž?§ŒÒÝ~réÃJE33(FroÃ^bÞl‹òÈ£¬éó…D%[¡÷ƸbU³«Ï5sQÚ’^æã·ü× pÅ R1èVú¹ãÌð 8‘uLÌÑG#>™Hñ'€þ«ûfNpÆ ™¼…–‡¹³I–~ý¢;„ÓÄ[<ÌoºoŠäcxtÐâlÛH>h‘Ø—¾ÛuØžÓïCó™ƒÇérÀ:îðžÕU ·iè»Q5Ч¸º˜zQü×EWÉ*LŠk–ü¼jI1fÙëþ{‡¡Jÿ ®}†ÎmàÏþÂ[úìýùÜDb>„òáØ#¢CB _¢+Œ¸|¼t4_Ç„›ò•ºäFâÕ~¯xÓäéLÚãáu>IT5ñ7–›qƒ¿Mv]ÿ$ê£8±Ì¥¡¨—âÆlþ!²Êê§í‡t.5ÌGÆ  NÅðgöÅÞ<¸ë1;»Ld–{ó?"+9±}"Ýñ Ä¬yÜì4ÛÚq½Á:Ö‘ü2-4ùÏÜ‚(_š££ÐE^¦¹ÈOg–PëÔØÑÙa§yzØ`Ç'Çí—µVc?sÜü½=;¹3¸ƒm®Oa¸š'?æÐw_íe¨wÀ?Ñ4²üÏ®?¦74˜Ýnw0 ÷Wzâå¹€÷¿.Hò‘›ñŽï³<®üŸáÁ%Kÿ-­›ê¿£Â~^™eißÐü½ÚËï ‹ÕIw‘VÿŃ8.­ZÕÕk·?yd©xÜG#÷ÑÖm[ŒhµÂ#åþ. þ`¡ëˆ=g½ó˜ÂF–«¹5Ï3°K`º‘µš Š!©/V–çÞ’oþ“5ÙiòØ”±LÈÏ3Š_ŠÊé?Uñ¢m®M”àïŬ·¾áÂpvƒšà¥Sy’ipY_ü~œSÁKýû‚/›iÁü‡lršÿ,í2^¬¹x©û6¯x‹Àð<ÄË? Ø“àâb˜ßæ/–\Î’!6:ú–¢ûŽ–—2æË7”×’ÆO§N,w}—‹¤B\}tgĦ*ó¤¶óq'ƒ =dk—)Æž ½KÆèÝ»»ÐèFA‰ñ­Àu*ýû¹v’ÜFæúDµŽTÎñVþ Í”¾oÁæ‘p,?Øzª£[WŠfˆßl÷õàïr¤0ö ,Ñ]æL‹×>}‡Íˆ#s‹=xh"‹?f¬ÇÑ¿#ò.¬äåÝEÀ¶*kyn##f{9ƒŠŠ”ÌÉä!šç¬úÁ¿|r›Úõp0 ‘i4Ì—Œ˜IøQ³óPýí—0?Ó:?÷üLÝhSl§ûBiÚíFb@Ju4ð Û[oÞÇ¿ù¨²¢¹½ó+ÏùJûT¦Y¸êÂÃK´ ÁóÔw<Í[…q7e ”%ºnTº TO[äËÆà€AÐö.ô Á”)­nU…jñ«I_Fü@“' G•“1S[é.B+´yÙzå+ ìûK “½U©þ-ÁŒD?çæ„„ƒ ¿ewC)„™žH•|0½:()¥~Œ›Å§Å#~Àmy$t±çsþ=Aä2 íéy¾î}†«¦XFìáa)D¾»tº¶ˆ6¾ñÑ×R€1á»Z¡XOäÏ߸Ÿ¼;t9@hö³‹áÄ9ÿ‡6pÙ<Ý_Èv~ò7ç½tR g‡òPG™Ç¾@ùËÜDƒûàýfp_EÄ›C·˜•yf#mLØ"’ ròv¹ˆ&ð·¿ýǶ\gà ¹yýâ"ƒÖ` Û.k\°ÄpzX;:láÛ¾G^oÂA©3v÷a}ôÄ”ŽíݯqI¤ÁR—3Zckˆ% d ¾ùÔ =¶x$ƒ=DèµÀ¾ÈG‰ãdß) ð1R­{ SN2ÝÔC\/î[­³c _~ŒmPÙø+¦53ûÍvˆ7¡ƒ+G§qŠ·¡:Ý9¬Š¸Zæ0·ÐgZ›è܂ʨ§ˆs$}¥\‹ó™Üê ~Ù:9óãækõàlèÞ½Öç9E.íü¼ºöæÍ Çjº»ÅW”¸ëmTÖ߃ü† ×7“¡ÓÔÄ¥”ðxZžGk‘´F2­©ô­ô¸.xÆ—>™v!Z•Xþ± énÆœ¹/>K‡_|ʾ&n‘-}‹Ï[ïŸi<~ü+‡ÕkÇÇ'òµš-¼²¸uØÀ½¾Á¸Ü‹á¦%ß©b6©’T<1âÈ+Ö“|$x.{x¯àþ A™ý¡[F|CŽi‰n¡fãp»Ý+œXŽú;ôT|Zª) pø^ˆV2´Rÿžhä¡ÌCTR!{$:»YƒBÕõ¬žœF@‡Äl#J” 5DâB½Ù$e¿¿/ßÀ(8a“à¹ÛÊcQ˜ôëž6ù<´iÞÀ-¥߶}l@Ç †f‘ù+ÝýJw³ÑÝÉX“÷ÿ ¡À’ú–fÎ(„0¨Ò Ý4ÝGT¨ÕTqÈô ön³²®q(H¾psnu  )`I$ºÐï7Å\­nµ_X­Fûì°S8_JH«û§¦£Ë¼®=´žOØñP,z]¹zóvë¾È<å~£~X Ïy—ˆŸÖð×I_Å‹fÁä £ýxÈzÆóvZÚö#ehÆœøµŠ¿Úf4øxY•ÀK.MhÖ$^¬*vý Ǫ9êÒé:)ºe 3 ÇŒăññH@‘pØ0ä¹Åâ­âa>”!/ï”/'qÈmü ÒÑ Ëß-e9ó¸ïþ¸Ã¨»9<Ér&p:š¨Ýã‡}æ˜B9úC;:JK†]—¾7øΘFXäŽYYþsYcõz#²t ±Ë0ß=${bÛ(ÂPYLƒÐ4vŪˆmA$U/¶ƒÍ×V•Þ[ó¢Å‘w(ÔÌ×Xª’`ûŽ„.÷êìƦµÐ%>˹ÂX·‚,¾¶û¾c÷îÙõ„¾ y6à a£ðHèÍêTE`˜l‘4Í÷Öœ×È ¢àTèœ)Ü2ßd™oLŽ×]ox…¾’[HÜPH€#åHd ß[HñâGf¨,Ù]´vÍ‘ Þiýb5~®à¹ÈYdë?ªôŽïk‘b=ª˜¿ÄG°¢ßñÄÙ5*ÄÈ[wôZœC»ümwÉ·0‘-nûÔg²04wzH¥r˜Çìnù=o\xø‰GÊÖšdØ6ìVD‡â†ÁF¿Ø$¾Ùhb*c9˜›ˆž¤ÏÔÔM»~ñãÅ·Uv!ÝK.ò´ áÏEèB&RõHÐÔ+X‡ço²²÷F,›¹2 ¬ƒx,™ÔaXš6äáM^kêK—Uüv‹ßÄD¶Í›â<ÂÌÒ<ÝKàZÄá8#Šág?²aZ³( ¶¤Ä̼W‚Ðx¾¼“dŠâ“c¹(šFñ¡ïFø˜ÊàþL´–µÎ¶žÑH Uj ±¾ÃˆÒðÃxð‚£ æÜ@2G& ^·4¬ ›Hª×w®úβ2½>zšI¤\N/_…ûÄ”†MfðÁ¤já ,^€Q髤S² ýG#e8íÀ3F«Oª0·Ùà­ê!Šè¹¾ŒïûŽâÓبÙU¥²r²:`k0È7rŠñzå¥&âöÀ!Îxg·BßV¢RšIÎ7’B JV±2—§É¼Ø„´ºcJèoZõxD¼<'ž=÷êÊÁÈ7|àå6çá°"í­LiD–öjBâÑv©¡(Ta|Ã'ŽX7Š? í„z?%a¼"U‚Sû’7'±â˜v,¥VQˆ»„ì¯$©àT¹9¡O!I›E¦Ôf—îWzoâK̘Þ.VY4U¥Ej«h-ÉÁ• "ß–‡%óæ {àPùˆªˆœ€Er2ƒR{þÔÁ!Lá=¬@Òûàé {_Ç*ß ’ è«AsL—exv†Ù¥D yS\Ô±L‰´¶s¹œxJÀkVýäø ù¢pÍ,‹¬œò¯ÃcxÐRá¢ÍðʽžøRQBÝÕCчäĉ‹´íÊÜZy&'p´œ<¡¤<Î=…ßÅó–b¿oâ9¹Å¨|¥·R- Š³\É 64]M†…óXÏa|Ïáµ <΋Õ@í ×rKÕF½¾»T¯ç$jÝéYûe¡ŽÊhÖ¦N< 0 °b#p êâ"„•×îív1× MUR.Ñ«^,;WÔízú­&ô B“¥×‘åì6 #ŽÒB”¥s»®ÜÅän±õPykÉIb»lm'?½|¢îÑÂiÛ†%/cÉÜ©PüãõÖŠ;–•êæçè´yØháðò"!§œõ’P1»cŒB‡Ù{ÇÇÕcÉõ˜ÉÃó— ºb‘0ää %å Úh†EŸ¿)òQÇ'§•œû÷µ³Ã-(W»µ}¤Áꥇiˆ€áÉ*„æ»ã ™wÌÚ;Á?§‡µN#§mTýqm!k?7jÖ8˜zÛø¤#ãWô§¤=Ƈ¯{$¡âl¸òP2Þl ®Z’ÊœÅrˆkš ‰ˆquX{4\·n€-vÔ‡x e¤…ÁUÙ½7aï†Þ-,Z›œÁ ¨[¤ ø¸ç¡XT©ä”:¶É o9ŒÑ8>±ZNSD]2^6ëIëÖIÒãømžÔjko "¨=oÿÒ¶öA¡Yiâ™^ÖZûõ“}(”ó¦"…Ì}xrÚ8¶Ú(‹Zr´oQtx´g¥{¤–CNt4H’!ßs…ö’!l¥hœ£; ¼¤‹æñ  –<”pÊ ’‡*§º»ŒÞ:âýYBùênGê6 ×/;£Ó§¡|¤ Nø²Zóu)®& ;(ýR<”H°µJÑ0DmU* ×òŠ4V\ÉKåðïÛ½“¦£†å†yó¦7š#o·%ÌCF›Wغ¶j7¿¤ýóB™¾ °%*Ô¹성¨—sš½¿‡.œŸo–¿W6‹²QÍcJ¸è¤ëu£§"ÜiñÛ¢Ò~†!—ÚaÉ)© y¼´„4xq‰0 ‹¦ú-žÐÏG„ãcÞˆB˜7xïo–Vff•ZÃ3¸DRdù£óƒF‹â‡ÅÙª4²nS0Eæ]¿¸£ûƶ̛&²–ßð‹ä#tË öI …#Ù5:‡´ýžßÉN[³,Òn•Ö©ªW“X?$f0Š«99Í!£2=!#©3NFòõë̬äC˜I /÷%³“ªÿI %žHgæa[2mÎXÎb<£ïI1b„åé M!jVP´š„xL«¾À ôî†U{ÇÞâƒò{¦_D’l–Ï©ò©B‹Å0|5,¢ÓÖ Gýô4'‚F[x9gO®oÆ4NŽï{Ü(–]„›~ú´˜Ëz½™íz6[õHqi†f¹FѸJ*mºiR.ƒëHftԴɶb¹ì†˜¹™ÎN)5'XšérIY”f-©à”[3vozü^%ž&Ù¼t2D†w˜›åt)ú8÷,Òn͵'¹i.HKÚ“Ülkâ\VÉÜ ¦§›*òuHzG£¬bo¬ˆ9ßcP(B+é¹Å1Ü™‰‡Ê•¶E=gìøºBÂIœ@«4#'²øÆ«mt 5°là€7F@<ºßçÇR@·‡öhÔ¿÷ݪ’M¥È‡HA Ë™¤„K‡LÜ'£1?ÅäõIhˆËÜÃü6Æ›(‹†ª¢CQ Y ¢ÝIT9ä³ë¸µÍü„éuh:½‚T-‚‹Þ² ÙúlåüüÍ›0 ª؇e^Ÿˆ'¬%µ‰Vn¸òÆöõ5Ôoœú†t(Æ “b0g\ ÿB-•?Ÿ2 "·êr¿! 2K$# î5Œ‰J‘NšI~÷'îûˆ‡Œ(°´"ˆÿ«½8ÜǸÚƒ˜÷eæ_¿ÖÞj·Ð¦Íj˜„,VÄHâ_sëw-‚/¢{w÷Æüƒ.ØÄ©R|9aÿD@v” Šg–Æ?‰ áÍ„ ’ÖˆÄnÕitÒ+W§ŠñÒïZUÈÝóià¥á¨ÿËùîÓ§ùøDÎÞë×rþä~óœ¨×"r©^×ëÖ^­ÝÀ«RÔˆT\J˜¡¾Á¥øÊö—·ö1Ÿ‡^Ù¹Ãè%¤BχĈsñ=‡b¥<¬¸(Î1æÝ!Çž×BŒy]ßiºÓ¬#e+`l«xÁen5_(O •Ùš»ˆ1éÙd¤šh‘!bh‡HúœHÎVŒÊ_¿qºï°"™“È™0ìaK /o?Bu©w®KAÆ@œü åÒAò¢‡ÔåºÐ"±®¤xÄ$„Ïš_$âÄ¡!8K¼ú¡Œ{ä,1‚ïÎÈ’6S ΨY1’dŒ ξý—47¶{jø’¤®} Þ¼nV¡­,Òh ZDCo}5 Ïå+‘²º^/q8ÝP{0ßk¼F­‰Œz&RÚ®=¤„}¸:[\˜öÇÝ«2 ܯ½)=´‚øÅý{XÍî5Ú¢!"Æ#Ê=x¾Sa…££05¤•d».^¨‹Ós{H#˜Z™˜ò²ÔQKŒ`EåÇ‹ê÷vÁ}ѱ‰@ëÊH„ÊdéÜï½…"0Þ=‰çpR i-7'^¢f¾Ì~dÑЉ¦Ê KÔÏåHà „•e•&ÖU¡Faç©]e1‘ÖÕh܇´À§FŸ•¿2u9ÎÝ{Ý[8S&épÄÊ£‹VŽH‰Ã2¤ãr’ö‰Ú#T·ÞòË™1§ÈøV tJ+CRcÍ.’/î¹*­…J\|>ßZ1xÛå~!2‚cäTíÞ{8‡íkG†¸ãuKû+èð²(hhå%8°á™‡¤•9ø'¡ƒq¸ØðÔl/ˆWWì—ÞÖ% Ò¥óÂ]øy†wü*ƒ®eò 2TÝ–¤N™ÃëФ÷å" Í­~¢KµyÔTHŽžp]ͱ¤CÄ[³.¢²½×ûc2”A²ëê§5;á‚Hï!Ck!d;¸‹M é„óx‰þ=O’v&¤×e´œÜÑ„ï|bsEÉØX¥3ú/eÔš¯7X—–¼H}Ë—þ¸O’¾7p1Êx{ÀŒ8ñ ½"xu\$l |žš‰_Å(å^F×6V%JZE‡ TD*2ÊàFsÔ[n)zòH:×J%¸–^&OHFhÛÈÇ+¡—çf«»À¯õ*?Eí%»=ôJ,:ñrÈ^O^ ª½(šVŽöÃoµrø%›8ÂÌÚ/½ñ ï†l!¸ñ+^1ZûÔÊÜyªžz?£úù:ŸÚ³v~S+§ðÑjÏ2ôQ „`³r~¾¾ñæÍÚçÊÊDE·%ç621°•U7EÔg\“—&’ÏWh¿Ë‚¦P áÇ.a½ ¿"¦—vÁLŸpšRÞð8ºzéÙ—ðæ¢Ð·rϽrá.•‰”‚oiirLsq5 HïY ËÒNNÇødéN_ÒƒÏwƒz… rÔ)B.1bè 6N€Ê7{Œ"Õ¾ê—h²òbÒ]þW®&Aâ±t9ëX‚$C¾/ëR‡Æ"¼B*IP†ÉvHÁ%+ýnàüÅ“†Ðqt¶›† X È>„¨! ó©L¤ÝheJZ\ BSr]ð•˜ÂÓ&Ê“ZŸuNê$-\õ½Û<÷A€dì‰X{]S –êÄUÁ‹âæº~útª¡C%êBÖ!–Ú 4˜ æá8¤¸.Ü;a­L}-ñÐl^º×¼~9ß•\FacyªJ#²qΈåt&©€5sAÖ‰M#dM‡rU çÔlnKÚx•®äšâs G%á‡þã?‹œ…IHIŒLl“¿;p¹$íiiØcÝ•ª’,÷ÏBKœcÊŒ\Q0IÂLÝì´Ãh­ºžFô¥²R4†ã·~âêpÎYõóÈŽmVÖ‰)„}ˆ ÚI¨É5ÊàúWòö½w¤Bï÷¡¿ëÄéË{H»YÙxÊýéy:’õF2É[á³.Ã4¢n?ÌLV" â°Fß› –@J™µ 7ƒEªÉÐpÄô\ ßÁ¶ÓU/‘'Ø6ÕÃô^?štÖâÑí DaMX·¶Ë½¯\2döw¦Ë¢´Ö^Ë"HÊi\ÄC8à°PÔD-$d(„cƒїÛ4½{1XÙ…‡£-ÌGÑ @䀲äòìäß–õõ%÷YþF/kIûÂcܼX! Ù±„}ávd1¦#`Bfê)íÜØ·y$»ÏË0…¢é„Tè)èÅ)LsiÝDe4^Î*ÒáUƒ –Cäâ¢#?Èáú¶#†¾¾ÐÙ³(<`EEJ—‘^nB¢Ë£ív«±lò™±)‹¥ŒÏ[d¾Œ½¤³•óݦ  ‹rY¿DA°qä#‰“)t·cZœ Äйv¹e ®]­ŽFßE‚U$Í‘ÔÇÜÐU¹ÙÜÛ M”w7‘󺒵Æé&xFd^¡xˆ¨dœÆÜ·£€Í_ÉÏ!$žMº®á-œQ,…Á ÂqÌmq &–I<¶@K¢!϶<¾#ŠàoÊ—_ä•jÅRáLóhOažÒ°$±¥0éÞ»e£Ê}iædøÒˆó‹›Ñã‹÷v‚š'<蔳‡‘+7bï•ìm:EìŸ6øµ5ÂùRõMqS7åòR4r[cÛË|û‹Çù\rÑ3ç‰0yÛ_^2$ÅåØ-Å[Ã\"É$U,Ñ„ˆgiÉ‘J±í oytyvû"©™-ëçfÚ1‘å0˜æSBl˨ßÛ«<îWf,Ó|ù7ÆLóñ\iS™¿ ‹x­Ûù幦vJ€ 0&7¿œtŸ&EäŸ:1ùÄícv¤,6¦±fïÃ…O±æ ¹,NsK²€'³ Yc{ñ³T’Êì UåTÙ2Á,DEDîåDœPÏQ÷ÉýžôûN6P*´¹b°L¹·§×ñ+û“´ÈQçyaf1š E˜¦4˵vF˜±y`̲ž ­#Œò%Ï‚æýséè'„¤HO±.b¼D²¯®hrQZµRx‘/vŦ¡nÀ ô›}´õy±&E²®Ü>¼rz»Ëo£J„våÐQO¨q…óó{óæâ¢ø„7ãâ¢úä:ÿv9®µæÃF,¶° /ÎÜÛ·‰W¼ñnIlÐd/tsDW©€ øz ËP¢U…‹x¨ŽÅ¡Äa( –âžnj²3ù¥ ©òË æR„óO<_ÂE0Púe¶¼”2¡œÞ6¢ƉÇÏŸK5Xµ–Åuµ)A¥Ñ}%´„°ÓñvGvšÆ’gYŸvôq1Î~žAÌý ‰®T¼Ï4)äþ‹Ûí¡íü³å¿‘ðÑ…©9‹0!jïÞø–àñÒ³¤p¥‹ìÙ¦ä@c¯6ÖóȔ8uEöãCûíF3V´Ü[žÿ7,ñL”.…å^ä;ˆUÈEdîÕ(Fä“죟Y&"d$™}Š>¼A³ŽÏt5ˆ¦´Ÿ/ô¢>€ÐÓCkG¥|^Þf¡.uŒ÷qã`»²ós•dó˜È4¢>^dÿðgtÃöœ.0™—v÷†ýð«¹ñ÷K´Íbñ#˜Dq"™%T%TÀq5£bäT}×sÇÇ›YÊšžÂA IÈ)cK4·³¡’laº§Ø@'Ý‹[6ÉØyÒÏüÆó'vÂ/Pº] ý’¨W×Ìðëö9Ì­f¶'~ã_TÝûë[wˆ7[ r]ßâ‡Ñí¡Ëw˜.loø‹×¯KÑÖ/”º}L:ôðƒèÀ17¯•½àåh<Æc±¦MÁÃÜÁ µÒ‡í3+œG| Ýö ©’ÒÎ27J=þR×™Ö„æF¡,:`_;edyYùµ8ʸ Êáå2|º^ìû^¿GÎ&Gwø ÄSá!OKÒ$Þdn°âΕÖmÙ?»Ûˆ$—]û\N,fX*‹3“!–G´?Ɉ•Ä*?f/ ‘K‰/¬ÔÒ¾ü5ê_fI„\Ët•[e«#«gûBôoìQàõîµÃ”O­õªy,ñµÎY«Áa5©× Ö#QÈæ¡™Ù ½æ§ˆq¡géiÔ_ž°<ð–­Zë¶ô;Ÿ«'púÖwö•È䟥)Ÿ¥Ç)ä+èøeÐ[¯NÃXe ØÖwäÕa4]Ù®znªÂƒ¢­dk£K^2?x>¯b³Ye§ad²GN(¤žo_{ëþ½é& öÚûlƒ;3 ‰1õŸÊxÛè°kLWÏè$b) yameèºî/¶õÆvßMf÷:)2òÇ^•<ÈÓGkùhr÷}rË3d=½œË2òûÆÇÇ󼊲»^"Ùy¶;šD¯µnF#{åÙæÊè}»ÃŠÜ*…° æQÊ5[›“i ŸÖì¹Ü™““'àdOã æl€‰Vò@/øGbâfsp YØ·ii.ÖîsȬvXS|‘-˜+LC"É Ëp~î&A>y껜„p"6ÀG6¯Î:G™üÄí~œ6§ž€Ÿ¬å!¢ÌÇñº Áä.Ìâny™î#ùÙ…Çad…ƒ]Hb]>Ïú…³¬é*¹)LêÂ|KÚi¼?Ž‹¹…9˜ßD·|uÚ¬&*jR¤$júpSOÿKHm¼sŸ¡cŸG»ÒåОÞô ˜¥ÈÂT$@^¥Hîa7ïÎÏ7$NZ.u!;kºð éRâíw6~~a‘½´»ï¶ “wŽmTî8ö™=¤À†".îçK§k£FØFå ŠVXN“Ãî&E£ó¹W*‚¦¡3#û ®Á k Šñvyåˆ-U¤ÓRÅçñ»ï‰ùÃ{{ãvo¸L€Ð>„<ÜÞ™Ôñ°†t[’Ð~¤ôÖ‘Ï–~oÕŽ÷OŽÊKKض¹öý3¶ÊÖÙÅ [¶^ÝÜdOYucs½úüùúwko5¿‡L—àÈåƒ?þõ‡õG>n¦“nJ Iþ|Än'À¿—¦Vþ裥( q oŠðó엗ºìÕ~ÑDº8·¡²%er®½†íÿ–KrÅß·!žìY‡E¶¨Ö¨8Äÿ\Ž–Fl2êU°|ç¸'Øö‘i Ï ,”_µJå ×1ö…íZ¿‡ÓúÙч³Ï"ëÚ¤Üúò„"ôŠïc‹ÒdY§ QH‹ÿñŠv^òd >•é·ÁS¹¸O£ã!—Á Áö’o²¡Ÿ“;<Þ­ Ù@6~AoØÀëkÈgð;ûñ“~Fü4Avx–Zx]¤<0œÍa·Â ?ÕšEÓEe‚ÅF.¸! r£J Á°Iµ!\JÍêZÈ‚!_ ¼<+€ŸúyÇ_ž–Ï^sŒ,Ÿ7?A_0öç@pÿ”ª@%ŠõÜãÕXÞ#y–C).ºÆ½%+cÍOÃyànPòð¯Bq­ü}­üO»üÛïÞ¼¹(®^àOuõ½Ýáܽ”åá6Ô#V/–D•ÊÊ*ŒÄ*j&xœ?s£‡.l° ¡ä¸ÜÁKõMßx™ØµÿJ‹ TŠ0©éúU»ø«]¤6E³XFïKùX߆K˜X®þ½¬’3|‰úÈÁYEõÒêq™ö=n0šÈ¹Ã‰g2îs±Õ¢äéL50wG]<Õú«NbÔ¾ôCyM#£X›Ey¼±ï*\Õ`_zïIƒ¥rPÄÐH÷,‚x¨Äâ£×‹QP,4J3K8ÞgÏ+UL¡6¹í÷] •Â]{=¾WEY¸‘§ÿ^m:ZÆEùg[ —ȨÏ+ù9¯•çû©cÙ-,dBüÔzHĺ…ýêŽÐiµ…]œ[iqŒ?ãÁÈra/îN½AX÷0ý2+»r£/c ºfwŽI]Î/ÉB?ð£8æžÀÇiÀÇMV8vYÍ¿ê½ð¹0õ …ÅèdÄ!¹îŽF1;ÓS„>#[jß›Œ Š'S!…ZÁR/Øùyµ¼…õåOhÏ’ kFŠÜ` G}áÝŽPñTàËŸQWpäü+à(mì5µ®,Ë–„£\uH°©ñ&B–À–ø²¢'H):Vƒ|/Bóí*ü;ù„½%ônY>¡á³‹•Š# 4p@LJëíÓ·ùå„qI9K³ŒÍ¬ÁyÐèð£š"ͧ ‹‚hÑ1Ÿ”5ûØ$TÒª6÷ 8… Òë_4n³O7c GŽº”&Äõù3«É<àÏ̈üuV>ñ¬<è\5¯WŠôLc«ñ¦óÖ±ßeœ›}÷éYÓyº?_a’¸âC¸šMî—ÀÙ¼EQ7!IûÚn¼È_äIè'Í:ªÖ/òôþ‚ôêäe¦Þ…—‘G%‘:YÀ§¿×S" ‡3ѽÓ<Q3lÿû!—ŒŸi;|9ÂZh=“y/H݇?JC‘ÝÃ}«uvLÈãó‡«á1k¶s_5šÿ͹c" ýeXJTa(ß(8, v´Ýö¡ÊÝyAL[³ž£~´ ó8ðLþ"{åùïlß›`QúþÐërµ²ÅU¶{„ JO¥n’ˆbouk¥írÿºÛeå>þƒOÛÛùe}q¬ ÇÝý{x— S“УÃ#‚à'P„.].¯E@‰ã+ãÄað²UÀoºëúÇÍÄœ^Ï ™òTgk?úZT ÷o,ÿ6}g_ûÎH¾y›Ÿ[û™•´ŒÚÒui}‹æa—ˆÐ,O»þ]ViÙ0.ª¤ítƒyX8/¸ÚÀm7Åß­¯f·_¸Ùm^à˜|Á†·ŸÂV#³.÷ãÍê¦XÎ…¦Bšm£âcXÕ0Y œVŽÁ£‡[·¥oÝ–ÍîQ×+›•êgÁºÐ˜ä)£šl_5#â&Ps<­'CDåï¿çñÐ/V–`¬•¬ÙxäK•õ<ùxG²…Gó)1íñæž¾„¹ûÂ&®<@?É/Åpa®pÖx,º¨x› .~K ¨4g|ÅòOö$¸¸æ™P¿Ãò„,±ärý/4àÖ)®ò•Šã²¸Ó²$%þëf—²;DöB,el"KŸTý¸“™8$ˆÃ&Úó°]»#]˜Ïáëé×;Sqgª¾@jø¾ý—¨_èjÃf!Ñg¸$¼‚) `ºkð#r.‰œRœWz „Êçàu¾0Çä¬å¡ƒ˜è¡ü)‡s ÁþÆU;iË‚à!gÖ£œZtne8¹¦ó‘p¤ÚÿªC÷z‚‘`mçM 1)»9E£à¡·HÉ&°ƒ7P".ø6+wŸE†îó`´¼¦ÃI×íýׇV@óÌsL†Éµ^b[•;Ú¬uñ¢`—9dš‘L9)x s›€|‘ ¶Z’^JìMk5I’9ÓÌRdÇi„GÈ‘!Õ}Š!ûÓ”Óæ7dmÍÖ{¦ÞWŒ^ 1†b¯¬WÎÏ×Ћ|ÌG••bûtÇ}UçbÏwßË°ðð·2óüžÐŒÃoD,@‰ @À^œŸzl¹üÓ.b—+!—…{QFg\¼ió&²õÊ3VØ÷  ­W¶*Õ¿M_Çéæ8P#,8}»;6n]à@do§‚©f‚i™!{%Zœ<šøC­MþjÔ¦év&fX¡ìQ…>»ÅþM¢½¨¦u0&AÍ'ñƒ0ìâÖë¡£¸t¸/Ø?‘`^¬EŒG5‘î¿ä.äÛöDßÔ£ñ7¶ôûmÿƒa‰‘TÉOL (#»ü¯õ‹ÊóÔ ª_ ¼ÔÍ4Ǧÿ¤36ÝeN³ØY›6ŸêÈ}4ïѤ¼LrÞ_#é%‚²QLi8oŸ ) ¢ïü{âBï–Ë/–ÙñI>$t@e©^Wž?¨Ìµ_|Ý|³7ß‹¯»íÓﶟh£]¹Õµ’ô_q¦a~ŸBÈ/ÌiÞ.Né¾Ú<ÇMþ:®œK Üï7W&·ë$Ê×­“‘3<;n¾VΆîÝ+˜ïçØÓ*tôü¼ºöæ ¾ŸÀ«[|E‰»ÞFeýýVe ®oèuff…úXÂŽ-ç=qÞ˜.º§ä²æ*¹,Õ!S•R㑉üšðÁŠtÌrÓYN© ÍU„êÙãTs;Hý#Ú€ë+swå‰úYú¬Uö‰:Û:š¾ 7‡¾ðÅç­÷¼@NÎ6{bJíÏvÄà"r€Awn6p¯oÆð  ¤Óo’…… årC×<’i"óÜ9ƒg°‡÷w€SnºE8:°»kß$©û/ Š>pìaÀ~Eáɾú€¼RÇH•`„èEMéz>ìöïAèm"4Ø2ˆèEⳊ9êÈÞâŽ&Hóor}#+ÅËbt¬ƒÜÛV¸c¤âpùUrÀnûý}ùºíPCà‘Bä< YÉÊ]d¡x Ár*’zEéÓA÷·JÓƒÖ'_Î,o›É§`áÎg¯+¶”>…ˆ.dVîrúePÑÌÚ›N½E*¢Ìër~iV‘ùXÍ%Áîe¨T$œ]q´Ä|ÒÝþç99¾ ³Cs÷‰¨¹uÙïYŽõû•coØ{£òÙk|ÎààYû¯¿™zwëùï>ïeåç©Ì ˜W«[GíV«Ñ>;ìΗRKyçã秦%…®=´.'.½ÁeÍÈEú¢^þ/^¿Ž¾<Üï÷yÆEOk?7jÖ8:휴¶åSn æØ0^ìQ0éó‚Èŵö•‡ç/2 »ë{ÐR Ú…£þÚ‘eaR8cHÏïD<ø`o]Ø2D^Bã/&|»&CevïMØ»¡wËœ;YYIÂøÒ&{5ô:¨TTOÛ¿´­—ÍýýƱuØÜÛoœ¶ Ðcõº~rtÚh¾ù®\´¾WÖ+’^å1y½¾»Ô¢g­¬×ñÉèÚCú/÷ë¯_ÓÀÏazðB/ç¤ÓªWÚCHO»ï-b"DéÆ“hŠ°˜Xß»ÅvïîT1áÓ¤”É­  á(¾¡Ý…Ym``Ç4Òr|ßÃÁƒ {X;~ažœæÞùäàLÄ' —ËñçgÇu«Ýi5Oa^Výø^”à]l‘u#žVwx…&”Wîš+üƒ!7€;ÀÞÕBýbUHO@·%âûÚÁ j€vÑ¢3p¯‡ð¹vY´}¯JµYß±{x±¶;nÌ ðŒ‹tè‘(3@9Fš|•lLV„6çù¥Ž‘¼`ëaX¦®ÝG•àû‡å×ífQ¡C§Í±+åж´ëŒ„ñ©7¤pUê¦èòž 6òѲ5÷ø}"'cþ¾+õPXpØè€i•å(º2™QÉ 6Á†&ΓgýMé¼7ìãÒi5þßY³Õà ÷õC«ÝØÒ}uÚ:ya¡]´µWrXk¿„T +¤PÌýžìÄßÛü}󨙊¤!pÒG‹Unn‰74sÒ'ÿÂ'Õ'OvXð]¦¨´‹¥'OòoéÔB<à(2ZXÒ²Wû*aÿÈ­•@¹ÏáÜÂt0Pi»ÌÜp4Á¨ÀŒêJï k`.[ 'n ©“:XTšNÑ”ÂV´ý€ßJF³âîŠ=z¯.‘!—‚×ÖB¥ CO>â;£k/>,oJ¹sH#nÄ …Ãé¬Ó<„§qPÆ£ý¦˜´@V2¥[dûúð ­wßî"hÄ&#ˆDrô á¾áŽ]€ö¶s&®&Ž,‡ñ>Š6K@¤çLx£˜wL‹GK¶Âx+¹tR„¸[“Vƒv=œî`Än é ‹È2@%Ê&5:®"³§4Ud „„SôÉç "]­Æšãå€AÝö¡5Á éúΘ9v÷†2íkây‡Î-6òoðÃÕðaû@ZwêHÝ‚Åù%’ˆ@ΖŠ{|hõM‰ã?¼—ùQÓÜÛ]r¾üáÎÆÉAúÅìÅÉ»ò‡ðñCòœ½8ÉÖ»ûƒ/â à©‚ X‡¶[FÆÕg@tfwW\Tåè,Íëˆ:y4ÍY,äV.Xùª?öà/œ†"[^]p] ½2¼Í£”GIoo¼‘?%1½“ÃF,s ‘ò¨?¹v‡S²ÆÒR1\®Ä-þ#óe;tÜ+\;­_¬ÆϵÃÌ„¨¥( GHýMÀ|Ùš@IÛ²Óé+ wŽ3bXð;ä %r.êŠ1-|yJå¤s²\PúÝh…–° ðü¹Eëý[„ d|DîÎ{=R.Bóä ˜ •>资9¹àV>ÄK„r‹~÷CôÕärìqÆR´OZ4_þý°Ôú—ÃS¬Ñr¤À,Ä23ß]ùt #ÄÆÒt?âeK¼Tö@ØøÝ¥|ÂÓÍN$­¡YUoãn$[ܾ£³ã`ÿÅÄ#7€¯9ˆGÓŒ¦q~¬‰£Aƒ–W‹ËP¢ Õ g1I”Z..³åeÑêFù>ì.%2µ†& &'¥ÌV¬ÌVÖ2ûieöceö3–©ëÒ`:RGi7¥ê]½f.(óÉ›Y·^s$Êcê> U¸/¸½-¬IÜ\ýÈcßøèS¯èˆ¤¸ÚÉuq»H¾Óv8‹¨º{ï"ß…« è7Ýt˜ä™Ý÷A^½7óËܘT}}—óôw/ ^Ò/Q„ &å70pVîÓ´ùË̳ ªBÙ4#¤ÌùóK¿gMûA’0®õf¤ûç&šùr?Ïç”ßXé*‘†WHQ¹€²rÙ€ F¸Óæ%©ýÞö9¹@GR(‡W_q¢ÃiãmÈúø¦Ê áhª±LMkŽœñΩpC†Ÿh{ç"Šè• 0¡/æÎnë!ŽÛ `J;'òˆÉeÒü’ø±ÉÅ3á Ë¢§gÿa÷Ül2 s{h€"´¶‘£;Fœéä€m5í1NŒ”s”ûxL9Gæ§$©K .d¦-„q4}%$$žU/‹.‡l«7SÛ“DåYËxZëR°ôÕ¬°¹hI£K#—ÓŽ œ7ÎÄÕûˆÃ“®-Ï® NÆ®€ˆœ£–+Ð\®x« 6·)d·‘ì‚\; ÉÄR•$*}}{ÏáŠB“;(—©¶Js’õO‘ PÛtzÒêàMðQ¾‰ˆþÀ7ÓP8¬ÂeÀE;5gÊÒ$òæÎc†f(£ùîÝùùFù{a>%N<÷ŽmT¶¸šçcAøw`ÏâñÖc•¾-,ù­?}Êá™Be%•uƒÌ0ú¨Š w\B²0ûø;ýôiO±ýN«ƒ‘¾†IC2u!¥¦P¯¤¨‚â·X*Á&é+·’'̼¼‰ä3Í:CU2ëTªˆÔÄ“ì¢bL3×$ЧØ<•è€WÁ7À$}þ¹^_ÿžùfù-.uQ *— \ƒ“Ò|K“6åy'Šót\n8¶“-’Ô0£±˜ Ȩvn=b`(ÑÖ‰XÜd´³ÄƘ‹•·&µÑSÞ‹5šš m6cî.”) ñ´\žuß žfÁ‰L‚P9 J¬ëR‹× +-:]\<.oQ…>C}/CòlR|…¼+áW¾RÕÈ©’Í<¾!{þ´/²&.ê?UJΘŽVÊëÁä2pþ=Q_*+a4ÂëÎáÎÝúî8¢l0›i–Åñ±ÕšG†é´ºæ;k¿,„](æŒcò¦´Î¥à3%¨â¹Òsì V@,GY-Ì2™¯™©ÐìÏ2­Z‹K3•Ée¶ ËÍ 5kœŽÿ™’6ÙD.—Ý$.1éÎÀ:œZ³={—KJ•¥ÝL0ðz“¾“2¬âåÔ¡O6Ý› ÑÈa˜›iW¶}œ‹›o…+hI{’›f9¶¤=ÉͶÅÌeµˆ7ݶ‹@z¤[zŽògùN¸žs¨$›øpd<3¤+a$=W@qhc”$¨ä¸Æx÷ óhr™O^BœkÜ5fš?“£ÎÙÊmA$HI{äÂÆDá°Ø@ÆÙú‡ðvþ€âñ"iÍqõäN7¹,ZF¡! ãÂZ¢y½Ñlj9ÑîÄ÷9åb!©,ìÆý¾¦hnHÊ÷¯Àñ,&¯eôžõ|2å3–º¼¦ÇË(oX Õpõ ÊÊB#yM\§ûyOÝÚÃ@òû7YEnä‘v3·›¿ˆßšŒÓnAò¹5“=t¼Zó¶-¬Sˆ ªB­Žþx€Æò. Ÿ$\~cûúÚ陧)BŸbLê"6ÖXue{ÄËG)†ÝÚ>.¼`õÒÃñ'ßcTŒ‹ÞÐT`‹s륽üszXë4r†ý‘þ‚ª©á©Ä =üKv™lɈÝö¯aÁ ÇAEŒ·:Ú]"ƒ!Í|hwé…ñ(r/ÃÍ–~‡URÎÃÖÌÐì–d¹ÔDé ܵةêu½níÕÚ ¼áYM¦"s;Þ¦çÏsš.Ï°¥ÒÒ¯þ²Qÿ©y ¬”{Ú‰ˆÐ6&,¯0ê‹FM÷ÞsÉuÈ |LŸVΟD 'cAƒf(KA ’CVk¾.ÅÊ%z °WÇò¦<À¹Ç@wäÁ ÊCR„Ä0æv§Íz%—èƒ%.-Ý» Í2Óˆd4Ûè5M·¼4&‡PÝ'0ýÀÜÍ/é_ÿ¼W/3X' MR:Ϲ¬b´’“$‹iJB͹¢ÿ¦ýP;†ËæôQÒÖ4>|œŒ® ¯q(Ìâ–Ë¥%ü ó!ÏLižÂñ,Ðç”à/êjeBÌ°PÚè«~Yª£…2_ðÞß,­ÌÊ&èÎേZ7:KXX´,wHeÙª(òŸAtnéôO¥Žî(c´æØN‘.¶Ó";R´Øq)‹Q^8]Dj}ï•Ü¬ ²„96(0Lë¥zSœfÙKôëͲ÷¿Öt7Áæ6«5oŠ‘«Î~M±o åãˆú ž]{ð`åÁ—­9¨ÏPÀ<›jƒz\kPOQÔ¿ê ¾ê ¾ê >—Π›¬2Xú>\u­žÞËW²ªº_€¡þ?£@¨Õ|ÕÌÒÔËù«ï·LõA=E@¥¢yã{ÜýêJçz8É}¤vá«Ná«Ná«Ná«Ná?R§L¿úÿ¯øB%D}ª¢ž¨‚xQÿǧ³`À÷qóû½­àQŸ ¸ã/K!Ž‡ÐH(¯>éZŠÎ=Òå²´acN¨ÿ‰Âѯð&£<”PÈQVŽ~*?¯9*}ÈO/UãÖSyõeÃÿI9“ü.=ž±&Ç'äØ m q~þæ r¶ï‹ÐŒöa[òX<}œ£Ÿ—ŸOåæÓxùy9ùŸÂ²Ç˜{ü€Çqò°ˆËùëî¯ÀÊË|ðH8qé|üT>=åĚμ/ üëÁœâ äÜaie œjÃ[¶¥cžrÄ1ºÜa%³>ïËPÜäâ§÷cÜxj§žØ3d-c½ŸX­N§)ÎÁ”ƒ<åŸ~ˆ§áNèÈùŒ aI»ƒù€M;–#‡rÊ‘l±áÙ9cO>ýûÂûÂÏÕ“YÇêɼ§*t9ñL½ö2ž¨±>÷y*½nñèâ¡¿ø9‡ÎÙsÀN«àë¹ù€só¤Žçf÷ÚÓOΓÏupz_Ïͯçæß¹y’xl¶>Ýí8¾å{辇¯tÄ|Ñçg«>ãülÕç=?[õäóÓïf€¶ %¦q2iVµß88;6µR®Ê½ÚQ@¾`æWèžòÍù‘™Ö|ÀÝ­ ÚIVçää°/JìºûkIÞqBàŒI‹þ»Ô%<…'H.ŸìæË׬|²./l ØöÙ^»S Šoà¿ó7HÊ8Ós‚nð°·sµ3«vجµ©×‘þÚ9‚c±»×¢\­l²Kàƒaëô¸/ì¾K·ïŽï·)¡1˜‘b± úLœ‘4'‚@ëƒuRÇÁ¦±TÌEJlÕg•„=Vb {G9sœZu}˜ð´x„Qâ…Š.)\¾ˆÖð€ÐBÁ ’3¼å ìœÕ&c $E£ºñqé)£ðÊõ)±‚ªXò2ÑÃ4l`ô •}â/c nòõAø:´JÃgt߉v©±²2îÑÈ+$ïEØJÔÐB9Bj@{hÒå–YFÃ,dÈ­†@ƒôc‰"5ÂD:¾Ýg<ª®– çöØ–aPDž,;=m92N9²9cêž@™@mâÄgÉ©]Ì;ªV¹ñ“½ìŸ=ò¢ÀÈ¿“Á#® ÑÊø~/J²Ê»²ûSÔ–€HB«@|Þ• 4§FÕΤ¸cåöƒ óÐÜ„Ã*óÈÍ®š¼xˆ-LàC–X¤QŒ«b3†@¤x‚T¿ljˆ$4âó®HU‹ø.ü¢ÇûÂè¿Ìë»±é;2y7N÷0ƒ½šôû÷e ‹Š;ø0QEIH v1´`Ž"&\Áê !\ñ‰„àÔw®€{G•±WP H‡‰c‰ø¤|‰r`SÃÁ‚o4PðwJʽ†_»yé¥^ Vÿõzu57*Qíi­'¼#'¥\Ù#=£XþÍ_D+”Ç}[ÂÁïДöÞÃØÝ.ÁÊ’k5Ð`k‰  S~¡Z”á7YÕ‡š/µš.î04¸Ñ1¦þƒv'Æ6‡p!¹áwV8C¤_w<’>’w„…1ÌL“ªè dÔ3ÿ ýÆ9H…"7HXDfɾC6x¸®*.¡ô%®$3óÆ¢À¿DûÇF™sêÏâÇ ˜¶h‰ 5kÚbðÍÈU1e¥!Ù¨AF áí48j( ÎÇóFPˆOä]£Êä¼OÈg¸G°>¬ \Ç à L$2Fî"ÑÇé-Ó.rO@*¿hLȶœ¤y,8üÚaô hÙi­Už=G½ Ðbg–Þ怎keä˜f“ÎsÐnæw+äºB5îQ4ÞjGÕ¡ÐípkŒ‹‚—8’h™í c˜Rø¸´æþÁ™Òe(:)œ©X0ÚfÞ ¦·—p~¿Ë‰õp{C*âhŽc}DŒÏaWÇŽ¦5ÐBÞÁ³ÈXBi£ä€-'Ë3ÜŒ>›Ì±_Ví¥ÕÕe-¡Ö„RÙUö j…–”CSJ g5/¢þimx "Pî<1Þ ÁŒ‰Ñ MѪk¬Ü«y£C+-,Y_Jo»‘ÏôÄì)«¾Í™HcFYåëðlG“.„»TϾœ²hæCgL¤eÒ˜:…ßn˜Òñ§À5è||U\CaW°ú×ÇwE±špÃäöËÆá¡uШuΠSôÔ„œŽô‹CŸ ´)d Ø‚°s÷¼‰R lñ×í¦jWŸ ô=ŸØŠÆáýà,öV{ |~ Ñ<©qx¸Ã²(°ÂQ­y¸ûlm‡M†¨·Á¯E2x¼sÇEöcHT¨%“Iéwé·„SOI&PJ!¿)ßãç5üＦ=O‰ó\ÊÎ ›·Æ^}¿YÇQ¨µëÍ&¿â`P¯ÿÀ±å‹êZuù-Ù*׊h! …cóbÈ/Æ(hä;cÒΊ`m¨Â—q§¿ãg¤{¹:öyWÛ§ëLJ»ËPçÅÚæüª®/ó7LJëíSñ¦º…/( þ[æØ]ˆð¶(ûi™Y4hg¼`/ñß²Ž8"†]}&™}.8šmÀ9_´…²‡:,‚êE¨Ïa2/„È‹Ü~âÆ»†¸®úÉñÏV»yrL`ùøО}€à󅣿u£û RPSP~¸IiOᛆÑ+d°±g‘-7å/Àª+i·¦%\F2¤^Eu„÷>xe to‘_‰8>ÅïÀ«Æ ,o0"Ú~<¬‡ðÍ°Adºn×ÔQIÐTÕkÇ'ÇÍzíÐzyÒî$j«Â${gÍÃ}•Æäëo¼[R­ÐàÏÇ ­Õ¨CMVïØÏÂà룉w·Z÷X)¯”©Û+¬¨ùðú”wž ýºã ±}Ø$:ãšPç.M˜èŠ¹0ÝíÆzÜÔ«êÞ_ߺCÙ¢¹ÊæYÓK§ö«ëä’pýb+C÷nþÊ SJMÊÄž‰õé3Ž2¯øÑzòâgßäD†˜*ž ¹Â¶‡x’ã€(Ëq‹ôór—Ó¨ÅÜú«=Ʋ-%㥒“ê ØKNô“²•B'~ŠÏA5è$õAõ!°Ðîp„:ZKÂó{îQ‰:SyÎÛ7¦‰.4ÊI›¡ÏAÞf5d yÓ׬¶ŠÌ—’kJ_EF²è*2_ê«(ò&Ã*J™xÁHç!þïëÏþÏu·ü¼ò¬²¶J«Ÿ¤”Ο?ß¿Õç[ú_ùóÕõç[këkkÏÖ!]umýÙóÿc[ÿI);"ÿþgÎ=ü]øXßqhž=ÛL›ÿêVµÊç¿ú|cmëÌ?|Ùü?ö_çÿ“ÿ,’­ÖèÞ§˜ï…n‘U¿ÿ~å²×ŽïÝÁ;äqÉ Ä²Z¿Ï(%™ó9þ{~a+àIö.ˆy %¾ðíÑÛ æÈÿæ?püëIÀ^:¤±È^?P‘µò:,ä%HÐÎx\>E m¿GÞqöð>µ, ðø²ÙfGµN£Õ¬2ø|Ú:ù¹¹ßØgµ6|-±WÍÎKVÛkŸžu‡¿°ãöªÖjÕŽ;¿°ÆëS8ÐùuéI‹5N›t¯U;þ…µX^­Ã~99k±“WǬÕlÿ$ê=E;DTI¼ô‡\ûöpÌ¡,ðJ†ìGðZ\J áºÅF˜.dÓ͘"~èÝ®0§ô¤!cŒ\Ôl­€:^Ͻ’ÈÎ=x=Fóh4p¸œŒžÂ%µN®¼E‹Q•–±%Ž£-Þ馥=4ÅÃËU ÆÛÄ[E,•î"¢»jð‚hXsµý}T16›Ä¶Êû/êÖñI¯à‹ô¶ñºQ?ëÔö…ë.éÀ^57ÖIVésZëEƒ[ó¡én«Öj6Ú2)о{YÌýwœÿÜÊr4ªt»KÓéÿ:ÞÈDéÿÆÖÚWúÿ9~VWñ'÷‘'Iî‘(ovº›{(Í•7§(î îÇ’Ûœ$·Als:±} ©}Ôu”›öµ³Í$9bà âi”½«2Ùב¢–‹>!cßÕìx89§ =ébÜZ&¹ãûp¬.ïs× î?}Z¹á營Â2dd ‡_"^;C²ì£âÌR€†‰«ëõû˜–T †ºë <”ê{»?qhµ$õǸºVÁ§ |jŒ–êv­£ÏmÌ;%#«@ù8Ы¹Ü"Y'³—µŸÂ&Úz ç­˜x5ɽ®Üäs‹Ð!o Á)J o,B&Æ¡„Ãã&¯=ü!÷\¯ró£ùAN"ÏÐÀ Ÿa›¨Šý“ãŽ{×jwö­ÚááI¬G´ÖA… ØE`<ÞF~Q¶ºÂŽ½±#l”£KD’åÛ¶ëbŒðvçPÚdã¡•=tn-Y¾Þ4ñ‡,_ϳßõô" èêu73|%‡«vÚ´N[ÍŸÑI†ÄÕ‹Ïœ*bÆK² ƒPËp|U€*ò²òÙŠÐÛ”X¥R)îðÞŸX¶ r*¢ZÂBò10oWÔ÷®y8Iê=eÝ'QÙ­k´HqßWnJ,p‡]-¹L!|øýIEÝ86:| U7h¢í…küäãÐl"z ±»qÔ Šú VéQ›83mÔ¸åµÓZ’ ”'F6bBê>lÖ;ë:.)LжþßYí°yðKFìEuŠ°'è‘ãy0´/ê;bQMÏYUý"áàÞ²8ÛÆæ°"»¶…oXÁ)¢oè…ÒÑ…3Ëò5ÊDl¶ÛGËR–³¸Ó™Åò%²\fOzÛðx–ÞÅž]ä’L×,ä[1WqGK—ÏVŇ|t!Ý‹ã³:¤û‘màõtA=ØÝ…'ß~+S5OZ˜n—mÃQ©u:-ëìø í-Ë‹óʲ PÒdˆ×‚–U,FSÏ ÆŒ€:ã>cÉ1+jì÷0¶2­¬ÚAçT—¢OS fåÀA ìëÖükVÜfnA|d¿ ÷´:@Êõt"Ö/ÙÅ„sçâð;<3åØù°““íÛÛ–X檸îKòMMn„`Sz°Ç[ö+6zókØö?÷ )Mí9pF ™¨l©í±/^òraué…¨œ»ðÆÌŒ©åkê4>ØÛÞÖ²¬…CQO «‹QÔ&£y‡„ó"31/ï]úl0éÝ™‡n)v'À:ïhßyïôÅ2€q ¿–øgý‘6 Ã?WœÞÓ§;:œZ’Ã6YÓ“Ó…‚s…~9hU_¥²2m2#ç›Ó}7(ì’äâeöµb9Ôå€Ä´ücm{›¯n^¼Ö„áï˜ÒO ë}ý-‰œð6àk ¢%øm;9±( s•ä_ŸBG!¯zG…è/µ¦Æzœ‹ÍÊÜœ/aµSïS¶ öî6ËØ(ñ([å; ýÚKœšèžà©wbU®E,¨¹ük}…º¥¾PçÔ¶ªoo‹FPw声!Æ^ÛO';sì,[¶^€ÖINYwß´ùµšÑ݉ î´!Ë°#Uzƒ2B£Ûp/ãä ŸO Áx6*зôä(‰={l%í¯ ±æŒUa¥ˆI3®~ÌUþ‘è}š[dp¬[À<öŠ¢’‡­³ië‰%ó/-¹`öã f?}Á4fçyI2­läHiÎy£0czÿŒ¤Só­&Ç£Fúx¨ñhÄ9ŒYÝAš,ËbOQ¼æƵ|CïÃñ9˜9>iãóX‹0)ý:&C¸«§Z² æ|Ä‚=ˆOÐAÒ‰ÇöÝàzâŽÜø#µÕ9´1ûSÛ¥#l#Owü£Ì)Ër£y ”¶e¸;‚.AAE<¾‘-ä_¼ÚXGfùd#u½Q”|¾žéøÄ‚—Gµæ±Õ8î´~A);Â}GêñbØËæq»SƒrxLU”·4¹”KñO ³Q„r= ;‘Î[ç؈ßóRQbX¾º–ÿ°ÃVWÙ‘Ý=i+ÏNás‰š!-œãb)Œ7ÈÚ‘Op¬´Á°Š«ú7›¥êP­S³TÒgç ­y)N Q3pÆÂÏ#ûz¾5òècP¨F˜Uýˆ"·Æd½ ; ^-‰ç<ƒ"tP!Þ¾Š;Ú™Wb¨ Jl¸Cúé*Ÿp¡®ÜÁØèjŸàé…bE‰Âªvö¤GJ^ˆ\ùÚN’÷30u5nÄ,0ÔÖ¹>“{´buhcôá[gïÈq -ŇœR´˜Ä„¡3vypõ}¯œeß1Ê¢üè@LáÁd9@*Ñ’‹3]áJ?56tàÚÁ99çà}w™ðŽO­8¬ ÷ðÉx¢‘Ù¥ äPž.˜|í±÷¢k¨Vp‹Q)ür®öx ìCú<Ú¨­“Z~ÜöúC¨®ä=j 铤¯Åøtcò½HòËäävùG¡b¾SYM—©é§OnòÄÆ&õ!súI¦uàq—zBPL=%Hb0 I>êBÕ« Ê~üÑzD¡²1‹ÈÂ_e㔾€Ö¿Ç}yÇ…’(cÔ¹`iöhä {îØã‚P0évI–¨h<—ÊÅd}øj`þùí¿¸îÆ÷¼qÀ­ß>ƒýïÆúZÔþkãÙÆó¯ö_Ÿãg–FÌ&ã:lｯpÃ'êþ=4Ï Ã Ý\½Á Uf§ÑîXÍ£Ó“VGA„¥GÞ1n€¡ªÒÚæL)¡m 3ž!ÓÖ2›t+¡E¸âûŽ3D³§ß…âÒ|ºr·“üü¨Ht±çX×yuTBìøìða2lšZØËcŠ|u9Á–ºc—Žº8!qËÁ1ã ë¡aç@»¡¨KcÖuyâ ]Kœ#”`6x²T.ƒ ˜Žj“0Ôxkø›j?1kLãëŒwš´»Üò$b¡¶M˜­XE“ø}kðŸ‘ÚÃzŸ•·@¦ÇâäN¦zTÆkg<F`PŠ'¼V/flm¬”õX1JGËýžS*®_w¸.òv§ÖiÖ[''öas4bðËB­pTKZ¬˜ÈÓ2ÛÝÕRJ/¦Ô$ɉƒÖæµ;B+¾ŽßP­3p3.„E—ØÚÝæzIê&#ƒU¤b –kÁ±òV3ú+gFftþèœh”Y5TüCJ5L;Œ«†Ÿ>uI³iðsæ ¯kÜÓJ|a~Šá°ŠåX]×X;“­[‰­§ô”È=ÿ–U‹¤gcb—±múTýNØÐn¿úýwß•ð÷÷ì¥= Êÿ¨°=Ϲ”X­o|Ýw ›¹„µµ<·ÉR1sy1êÀ#9@IÙ}xÍvÚâv»ãµe¶ã#ݶ °ÇòÛ‚¢æM ˜Ý2µÒô]„œ×¶‰!WBËû&Yoä§É€ß» ººr8†ó‹nSxw_‘üC`\+fçr•_:!*¿êÙQcÄ€ß{ª0šøRñ¢e6ǬþEÃ! í~ "S{·¼#ßéâ¬ïIè­P—3ÙHàT\ƒD”{‚%Yú³dS–hìϤ0ÇâæþÀ9ÈKòý=(d¿ÕFÕ‘iQû©aíÕê?Y/ZµÓ—EÓŒBÊŒh@œYŽTòâqçe«QÛo“™¿ÒÁÛ½ž+°gÇ7mœFë]…[öËŠTö-29¾£JbáENéäaðX'ÜP×»qœª,@î-rZo… U?˜fU0pG…|Ðþ¥Ýùåƪ½¿¹Q”ÖGGÍÓ6Ò™úI›mòæ Ãépºt7 1]‹,Aœ×«·È¦ÅzUoDíZ¸µwѬáÖ¢‰Òü„ö¯d³ÕIkO™Õ`qäÁ£Dò/¼p¿Œžs9¹¾æQßy‰jü4Âø~tŸ–h‚ë…pVÈóQ<ÀP3äúPb ÷àö)ÁÐ[¯NZûp*„Î Óð" wñË(®…==*æ6c1¢K¡ØH+?sd8m5;ÖÏÖÞ ©jkv¨"!bâL$ _’œÉ³S¶ˆ•½r—A‡ï6 à‚ê ©Ée$‰F:èÜalo ×B¨Y}éy„ €ên<«qü3ù2ÈÅþ¢ÑG1âZ–ÒÆD\‹ÒQ‡eëb¸.Ó’‡n¿NüÒ ¤"Þ¾B>y"òÊæKEÆ6@$Þ1‘}wz™ ®êE~iýÁAø&¹ÁÆiË<Æ7«ðÌêÜÔý¶Ãõw‰¯å›zsI‘7òÊؾá†À òÙ#NzÍ ÀÍUdf™w“zø²v¼Ø°NZ?…Ã…†%ꈪµ`Ã4÷ØÃN£㲿gŽqÄl6j«qÔ8îÔMz;ÞT1‘HÁd´QO›P %·r±'g«Ö¡Äúø'TeŽ#?9Si³0}“ Ÿ4÷ á ßÜÚîX½<†Y¾¹ù¨/í³SÔºIs4Žóeáq]¨s ¸n–Ñ'ý.Ý˹äÉ"ÖŽe1¿t›Ò(öeÐùÚZNnì)œ}Ȭ•«ïÄzW(jP‰"²;Þòsxª„“Ož‰O‘Ñ$Ï àý„ 猀]Å_Ãñj÷¶ÔIÞØÅ×A¬k1iô;BP“÷5ç,Ô°{á®×l„ë­f‡ Û •Âeå[Ý`'éðGŽÆöÅm„h*Bœ½´^ÔQ£*ª"$ *Ñ`Ú„¯g”q|*A­Žjÿ8iýðCõY1Å‹.úó3²£KÜ?|—=·‘¹Þ:‰xF-ÌòÀæ]wà=ztÕAz·X6²Ï«Æ^| ›ˆ:ŠBÕÌ=bqûôiA ÐGVº"rþð~&_hûÉ\ऄ@x\âƒ]{(®y'co q­Á͆¼¡0| LO\PÚ2ªÿò"Æ0±B­ùÚà $E;¨½Ä8[°x, A­“澑“/B Ü‹Žn»#¥¢\ZtKCîVc¿Ù‚U[Œˆ0'§>¸JŸ¯\“R%ù<.†é@LÛňvÆ6çŽ^ÞNҎ؉±<æúÉBxr`5ŽNZ¿FÅ„=„OwwéÂ`ÆZ5lG°Dk¡±Y[ñÛ(>mp0*š „îÜ»7¾7ˬ"–æAóõQc›½r `Z¤Ç± ‰²2r±Áxr GÍP€}+oeCÖ¾‘—S^Ù°3Ünô)í-Ïxllt?j¾¨Y5˜9¾`5F†ÞQIén—n[W¾C–ÈÌ‚¼3ij”àŽHþâ÷äLÅ:h ÜJ¬–ƒZóP/ ( ]Q…pXqÑdIo±þ=—ÛèZdzþe  bwä¾âï¡OîŠïŒwÕMU¼ÈÙ— îUïÒšü=¾ ã'ÚEÆ:RkI[ð%V B4›ÉPËÔsðu>åœÈ£ÉU¡~)¾Dô—JѼxÁÙ1¯ˆ>è×zðG^ì%ÏYwúœÙ¥Ì“—V’]zÌéËTËãêƃÔA¸,²¬»¥¦íe©/wzò?I"DLcÂ¥qb¡µnH:D„qJï9Úƒ“±ïƘî(óE§ %ä¤öàÔ±ÇûsG‡dDÆœ\Žß6ùLºÏHÓ|Ή3HØß+ý4ã„T.WÔ Ç6ÞZœ´¬ÓúØ®(•oâ²p°þ×€ðøüP6t¼(Ç% ÿ¨úÛÀF§C”Zuоâ°QûÉLP¢úx骈+Œ¤Ð÷ÆvÓwìw„ÎÏ Ø)dÑä†kïLų¸Šnã=‹ijá»îÝø~Ûß™ò¶çs³›­-b’’‘Á…’c:VçÄ¢÷…»"ð0”$´h‡Ú²§t˜òñädˆ`$Vêð¡ÛsÂV0j[Ó †~ñòàWùÇ°³z’^R’žžÄ ,¨G¥^ ¾b„ d#œ»±okL„nº> §Á ãà½Ì˜åA Æ­\øªo»ÈçSˆ[ä³ç~ÅÝ€ÂÀÖ„u>äZvHJejqð øª‘@Lé÷3Y~8"©€™ýÅjá–Q!ŸÕ¦§®HÞº9dÆ‘¿äsÏîJ|pÙ=7Ôaâ«:믌Âσ{‹†Uâé ¬sˆÒ§} ÄBC:yDtØî³= IÇÓ<ƒVK‘=U‰Ó ‰-÷Å;²ú…c¾v<h©ŽÐ„>ùZÑð1©ò62í‘Û_E-ŵãò€bC ½!™¨ødÄÊLù½!¡»ô½wÎ= RÎIi]6ŠîúZÀB. Õ ö캎ãr Ô-Gxc¶vwuuUÅ~ÐtRœ¦«µy*¸9 WA×·ìÏçq;ßØáÛol\x~¿#M¥©8¹>(*ŒªãÇ]¶…NPúpG73ïIÄL% ÜÑؘ2è°ZzVýeíøEC­#amí“­µvç Ýµ lÿ¼y üõ(‘™øºû+¥¥S„<ÃkM’¹ørs“>E ÃèýXÆõÃlÑËVŽ(ÏSB½ö¤?¦@eŽj üî7ÚõlŽƒv£SÑì¯ìwŽ% ÿ]qºêsp¿£kÕ¸C¿<¸Ý!Ib²1¤ˆ“ŽjÄçŸz%â²,þ²JÆ“k¥Ä½–›‡öE·«^ëJ1§\Wõá5p<ò õÀ)"œ<\Ñž¬³ÝÔ¨‡u6Ò†,ÔOOùÅÚ?aKn {<Ý鶭½fç¨v:½Á{îx`Ò,[Œ,o`ñ;üÞ~l8®T ×%ºoì^Ï/eï¤Â©Hò³FãÇ+«ïÜqöÒ¨;Îð=|4O¬»œT‘€4:!=áÑnm­@Œ"ݲ†ÔZ³ŠVn;=¢_b$‹Ð‘³6°§–uÐ:9¢HðLSÔ‰ÍFN©€§ <ÈU¼sGúž{NÝ¥›ã ÅЩ {¼Äëô¬ý²0c°”¥òÉ;•Ø|S›$Y2”ým´pÑùOÓxûS6ÞV'€YšˆdÒ|ÚŠ‚¯ ù­ ÜUNs_ ÕcS™¦D^)ƒ4ï m„±¾Y†Â/kO´„ÓijãúÉáa£Îq¨?uÏåNýS‘ðû$® í܃D' Qê˜È#tEò×bȺIŒ5G%,ʺ¦,ÜG+ÅLÄ÷ÛØq˜eü©cÚø 2¨¿L™¡èˤJi8»ú¾´¤ro‡ aJÞCšO× rì)]5uÎð@Q²¦~¢ˆVÈ…cH¥÷žª µ%’¿ \.A=ÊÿC¸ÝdëE£°-!ãN×µxSk¡­TãH¬œ$|x”¸Çsœ[6 :Œr3Ó7;Z’ +÷똌ôá@ó¼Ùd”0XÖôñ)‰þÑÐ@ùEÞ¬o £ÛsÇc/@>m(…S‡ÍY¡G˜ÐéÑuLB½ç“á`ûÉèM^ ÀÅ;Ñ uÍÌ2x×KÉòñ³o¸œ¬\â¸aûñÆ(Ò ‘iç/^‰Sõ˜k]†jlìï9…P§ê!ù nïɺð›.6sÂŒÄnh˜ËvsÔiÿbµh*Õ°€ëj´0ÚéYƒm&Ü-§&®®=Ž]ä>êO´?÷ðRFB²¹ŽÔêØþ5„xê2<4ǘ;;õà÷(2qÔÏx+âL¬¯’i—é!PØ´‘ƒõ— ŽOË`^ìèÝ8&òÞ>kŸâ½X¹Í¸7H×Ñ ´Ø•ï г‡ž‡*ЈñI’DÉ=—gÙ¶giÞ¢€)¿Úïí»+ew¯ávÒ̑ݯmñ& ÀRÈ‹¦KKhØ+:N%zäíhx\ôvUrÚHNá[ôð/ÅW <åÜÇZ lh±š»RX^H(Ä.¹¡§œç‹²i3,æGFÆ áþÒL #)O ˜½ö¾u–¶#;5¥¤ãZý°˜‹ØMCL‚…þ)Œ#´U¯Öd8$ E>b¡•"©¢ÌnÚå(]›ñ¡—åø¢ô0íã«{  þÀå r5XÕ¯v©o-Ël=Aæï°hêÜWŽcËÏÝÓĶ‘‘¼6‚eoéjÎNZw0}T^/©)}ZŒÁR$ífœÕÂœ›ó̳a…½î"30“c›(;å’‡Ÿèƒ«!;rov>¹á7-u"[|m@tªŸµš_èTkîumàœÐì¯$Ì!Ö¦«~èžÈMMƒìì[Õ¼)@ÉÚ¾l(“8Ž ö!úÑHçÝ9<áÈž YŽä ¤ø±‡EV¢Eáʸ¡X|üŠÂv;+Ë@ç4“l3^8ãC;7|ßó ÅŒ¦ØÎW¶;†ã¹ $«ïð{ËÂM‰5)ngƒ–ñ«Z³cìýý¶Ö²ö]“>qø.Ð- …*€L#)lœÛ•¦—žoÑ:°û‚’µ0­Å?;?ãcñeŽÎ+øͲá&)Œ`%â‡Ð¬{e´N*ëoÈ­°.R+J¦ SR¹!0}CjFŽ&x’ˆÂB¢&ÇGa´Î[ú¢qÜh5á¨mYph×›µCy‘ƒQî°.Êœèu°®0’»¼^ÞÐ3*)¥O|¼ÃC¿5ÙͳÉPG4Ø°'Õp¼ãäÞB5­Fƒ7™‹´ÿ^x›w$Vocß^;—Üw¯±ÔÐòÛNVGÜ4%'ïÆlŠdµå¡a³ZŶ¥lÔrFHò0pš TBã‹Úß1:;c/£"¡ÌòUÕãfp]§ßç€u!HqžžÛCÕoß ,âžr攈Ž¶âu˜Hôxd:…®Æ[¬eD#+ÆÅÞ±KýKWÿÒÓ¿8ú—•«[¹†7Z€Â<Û5Ž5i7ÄÑŠ¯|Dd@Õ*¬ßë‰MÀ!Ïѵ¡É:»/8zaöl¡îœÿð^I2ZoCˆbŽ‹¦DÉô¯®$ø¯¬Æ# ˆ¶¿r‡ëmîŽE`«®÷ïNžûbEì5_¢kèÙ¨O‡Å"´žâ#CÑ&×~‚£¢Ž·nŸŒp|ªë5ºZI¬õyR¥ÊSJ³ÚnuG‘ÖFŸmNíßVRM'탪V(|e7vÀÈÞiõ‰¡^ÞË®ó‹ØÌû›Ü·õ¤- _õ—–e8ÝXÖhÔ}¶)ÁÌR† ÕñzS½åºZ…H:t? ೜7¿ËëR{¸µ&vµ‡P¾xŠÇF‚ÒT×d·“doœô¢DŠUƒ”&XN=²õãdT3è ˜¸lý]S-%®ÔM:7CGÉ&{‹ë}RÇ« vÍ—*­ `K©©X ó,¥¼¤SêJážo½ Ǿú\ÎGZW®“»²UÝH©|Æü\OëóõŒ>EýnmmŽ^Ëڮϟÿ½Þïïfõû&¹ßÕµõ­yfñfF€W\_›«K7ÅÍÄ r¥.„Œóê÷¼»êú¶ZZW;(A/V励PL1J:1ñT;èÐAPd`Uí@øÉRR~Ë£{·•Ð›])²ÃŒö™*«(BX&”зӯó4ЩeLÆÎ5æ˜5¸L v‘Á::ë4^"G“â‹´øðšY1Oá[•·c¶6^÷?‚EÜæ,œ(¦èát7`8±jã†j428¦Å¡h¾¦M{å£iŽ¾ÞxÜYÆ:ºª,² 8?VK!œwÔiÖsÆ$-Nð´ÂpKFåZˆ$Ý1Tή1¹wîx®¹5gf2|àÜŸanÐH•k|iX_BHeÁQíµ%ƒÓ쳂„¬\ÙD#gqïüMLŸ„,l­¥Ìîû@Õ€Võ\òô ÎB åíÃN ÙOŽ_ÀÙ|жŽO:Öq£±ßØWÌ1”Ì·•‹v[pj\%ËTôƒ”N! v<( Ç1í¼lÿdÕ+<(ŒÀB¥™Y¨w?´8}ðF¹ Dz Níˆ W—’DÑãô.R™ÕBtG‹d0”G½ýˆ*Å<[ÆÃIH’ #F†ÞÆòÚÁŸä+¨íPÒˆÙñ0atyéŽÉíÅ6ñºDÒ“•â±s{:ö1v›_0׬Å%í1x»$‘<Ú°œÉ šQ$‡BÌæÁkÓÜ3¤ã„éi!)Ð0ö‚Î<ôªå;,Ç}8üÔ4dóÊwõÓ§(=§–R€yô÷5öù¹5i"Ó{Pþ‘·LÈJ‚E¤éª;™Šõ£Å¦hÔæ«—ýHméi0Xê`545¬ú½Òï‡Ò‘ÜÙÇ'r‘Õ2.gÆ1Üã rîôµÆ‰Öйµúîð]T Á?µˆ^¾Aü¤³f0½œô#'ôýX¶BÙlÎd/BøÑ™G™ü™Ín¤A“Ú-°·l~ØH:ër4GÇ&Ãñ&鎸98SÂ7âiŒë”2ûajyPЪn–ŸÍ™«Bç;>fQdáG0™³ù“äÉw[Y†™„ûÍv§ÑR§AKÉùœ.”Bî¾44œå ‡)uο¡„5Ýéu-b壦H°qR%“4ü4ÌÑ9ðªïÝÆí{¦›9D™1Ùd˜ª1‹$ºI¯†c¹ßl×NOµVØ–C`› ¹?bÇo ©u‹%Ašã–A }—÷év8½k7J`)¡¶4Ô” 0³>ÐCF3^¢\-3û’Kw¨ž•·( $Úgõz£Ýž=)MÅ_%üU|Ð8ÈS yD±R½óF/ÉV¶ñ±†,,ï#VÎd˜¾" Z“w3­òi¥}aë;Ë ¡@sprv¼ÿhsÄÖÔÿÿ8*–µŸq¾4Ut6D %§ø6"N«nNï¤ÙAÕ1*gê²5»¢Oš¹lUISZ8s¦fALiØž 4wZ'5š›ÖºO:& êÔ1˜MD3̳Fö´žM'ž©„óK[y™‰â\ãœD 2ôë³ïûlí\LQLΟ갻7$w¡äfjS>¤THÏ>®A-‡p{ê}C¥O3T¯÷½ËKQ3m ¼z¨7«©2 µ5š6=XSZqˆ—6L´Å {’îZ[‚’¦·GWzl<߈m·T«šð–JCË¥=ÙZ[«F¬Ä,„Jh[ª¾êÑ]Jo‡o´Lö:”‹¥,üι·ÆìªäÑ ×GF‹êîÏÐõëžQ{„j:6_Üaÿ¾+ŠëÃ×n• ¡v M×<ñô—BÙMÊ+EÙçkgÌýÜn÷\›µx‘y›‚B”Ò¤“W4"!˜L×%F ‹ˆß²CA¬C¥X;f¾„Â2::¬²^-ºOž¿è@Ç9RLˆÉ<°‡÷…ïæ6c·¬¤ÍÎëNR¦ÄWá¥ù¬Õ)Q»§ZŒ:ÁêNG°ªuNŽš¸;L/>dTfÞ ñD¥!þyºË¾ÓZGÐ×—1ÎÙ¨|K]Š[†õ²Ñ|ñ²Ãªë)¦ÃF¢-3²‹Šº6wmYj{–G†{·àr‰Y\ðk/ÏïÄæXD±÷%Z%¦I¼böµu´µ–Œö$O«Ú¬B®”¨‰ÚXÅ­Rx€SßØcÄË1n¦À$ÙATÕVzÞ¨Z¾(z'Ô¦·p1 ™ÁaƒÜ! 2@îÇn—²x#Љ‰…h™5}YÆ^mqíîòù¦/— T £2WG³7âþQ+vødpG¡Å­mø-/ºÎŒÕíóåÀº™\;çÕ5ºì¦Ò u˜~J_È÷µ5ù‘kœ»„ïÍMoj–Ñ°bòùnÇwñíüyÈÌ­ l½c¼¹là ÞmD¯Óãõèc‹{j໫çWøÿ•J""NTå)ûαBǂ·PU‰­£É×S“¯'%ßHMΛVbñL›É™ÄJÁ,kÅȈݙÀ‡Sb9 i{ *)šDU[ò%Á0ÁÎЃéLc<º²]K6$Fs”¸qó4žHð1­ã›q+‡ê – ªˆ0ŸdŸÃŽ@}­¾™Â%ìÙ½h«Ëû)­ÍÆHˆ18'Ú!~äÃêmlŠž~¡Î§Am¯Ï1ÎësóשÄ^mügô*-¤Ê&Ь„~Í…,®~æÜJŸc0¤:hææœk˜ž‘{¼aZŸn4W˪kkÕ¶ƒ=bŸ"½ 2èðÃÓèåg$˜:Éüðy—é‡ÄÓÏáøq'«üëœ2B‡%Õ´>£?!uaAqŸ¨Ì-ºóž&kSw]l‘ Îh$dD4ìVD¹ãÚ:2ö†ÆqnLÆU¡Cº‹Nñ± ‹BZ€Ö±Ü(ŠrM†î¿%ZB‰U*>Âïm®r±C „O¾öF( ±Y #”دøèßççOqœÈø rCþ¸`—8øMöNRax ¬¼º/RI¡QëÎg_”ìSÁs»»¸:~ò%.¡_ñù¯?¸ðK>çËæßçîTVüûü×7³ñ;³ 6âÁ^] d@Äcã`VäÙ§Âf+Ä ¬¯hI§ŽcxïIpƒ7 ôуT)dÐþýßô"RQaBb颣§QØ]HbÙÙq§0,²j\½”ª ­4áQDÇ´b¬:h5Ó =´\:â+-¹§O +"hŒz½®%4Ï¡wÉdhyÈ®Cã½÷÷^X/÷[mŒ'ª‰©èt·y°ò›îðáÜõ„÷¡ßL ºÐL%½] 7]šË]ýðHhç—Ó†”ëÜ´D´QD¢È+å“ô’«ˆÔƒ¼1|n!F…¡ýI P-,â\D5…¸@8}·H'&ÞvM¦¢œeØX] †îÚ·Ò«$(ÞjÜÊþLx)P ^¯ç˜§˜Fì„-¢‚cA±Àð žÞkézºfxm™¾TxKê4lÊúÄ'á(ºf”¥§A­.÷ƒé‹>ûôé.Û0Pç$ â Ï9eýØŽ(pr£æ11“`_®ðÇ eT·x!ç9q¸D–YCˆá—›Á,PÚ”q¨êãoÙÚìÞ¥¶X!N„mÙsAÎÉ`¤…â2ÙŽÄÆ=~—# Þ?±o„’ZÏñßÞ×ÚC» Qßî’Û;¯ƒ—î2¬ùÜÁØg%ž>DwúÅQÖgdì0,¿mYµý}Ä»¯nð!»KÊuãØ#F—j €ß|QÏ" õËÃë¨t@ÜH:ùá£)÷Û¬ øš}˜àÇoBȘÉÑ_\UÆ6^÷½ËGh¤Òþ¶Vó¸ÞÂ¥šB‡¯OÚñ>åå~Ãx©/Ä»© Å@,yKÈÐpð\7®×«¼OºNXíWù–Zša_aÉ— üŠwùkáîéV‰‰!`OÙÖ”³DdyœU'Šûp½Éw³èA˜öcZô›A«Âûí$Áü·¢F,‘xµ;'­Fá7@}e­ü6£é*¯:䞌0Ë“¥ÁÊoÅ8Š÷Tª•7ªEÓï蛂B×:yÕhÖ ’fíÙfÑxrô컟" 'C&ò¡p&qðÑ"ÔÖcDBÄÁ0îñðÆÝûçϧˆ{˜ÈWaîÉ‹òÒq†ÀæI7š !›€Ž€|ˆ”fF}סÛD좃©ûÀÀ¸}/XWL‘Xԥî=‚›rŽòØïµ÷Wq,fÄ}5Šš½\o¹O2ïÆÁ0œÉÛ:IüIØX±“_ÉN&§Û.[Z ŠtlLߪ±ì³k™A9…󱫹7Gœ yn ©Ò†E3‰}´ŽV"þú•Wè +³q„ŽXpK,R#Ÿ$‘í ”ŽGŽ¯,I|•¢¼xÌŠiºDãÈI Â-—ŽfðÑj?Ãc}¯KŠ`:Ø&PYœ!Ç'&Ø—O!‘,I* Eö7VeÛ0Äa‰†dŸ|:FeÝÙëk¾m–|z*¹)„./Ê=/Ñ9®úõqJH«š£Ñ†Döy}'±ã=oB1R{#Q÷¹æog{#÷ÌÐļ´jeMø©kø`ŒÉtkú½Í.Ý1 ¬6VÆî w:KØÊ Ç‹Û¨”(ˆ>®E#¤îBOM)DšŠÍ.+LM:/ ¹ÕnB£ÍFûÃ,¤Ý~{¿Ù>=¬ÕG جÓôêœÞŠˆ0µ\¢NðzŒ‡²MÂq;ÒvÙP¥¦ä%Oy`Ž‰3Hˆ¾®Ö iÕõÓGRýuà ¦~Íé~˜áuAÉH¥%ûZöç-[.­µ¡ÓP &XE©º1H@hv‹¾ÙC &,íDMíÐNúk¹ý¦§š§LÊb*ÄÝÈwðΤ Õ0rñz ߢfÊð&QД…ÑíK!vsJ%"˜Í”Û¿SØÓNP½ö‘áj&T{ÅhE}ïZUvàa°!Æ!F¼æhmX¤Cã±%ö­Ð§£Ê`fw^´:¬£Žwì›W̓Æëf§±_­ Vë>kwj³vø|†yx=¡A%Æ3£aÙ“;eq™ï ã7ÿá AHX§«W,äà’0cQýn-‚MPkÁ¹Ù8¤Ô¹˜G¤v·‹T„DXÏ°Åœ>Ý!¢4ª ‘Ó0P¯A÷AtNñ‹…DÀƒ´šS»35CŒYH-4Zû\»Nêà&m´a¹sÍ}ˆÕª=!•IR«ÓW;1\¬©8 Zfî¯ÿÞÑ ½t7|eÂD(UÖɱµß8A×(«S"=Út[ÌDE¬i…ódXoNs"Ô®Œ&£ÐVs®r²ÙõXd§nÜî ílº‚r#×çðéµ{¿N‚1ÆßÁk1Œ/ MCe”à´b‹®”Œ´ÒÀ3¿¨ëÔ{|ãÀ¶ô8g'}ÛGlóÉ¥ë¡øÊÑÏõh—iPEŒ!÷¡»ö¡äƒñi Wò‚AiƒêÑlŠgȵ3&¥µ3ô&×7¬{ßí;A%ýTЕúé)·wù'Ïg›¡Sq¸Baz6¹»ššVýÁL¹þ™2\¡›göz×7Ö²V\}¶–V³f;&ö9É&´BZ}ÓD²]û¹A̪¿¬5#€~fÞ¡XËW,±ƒN/ãé®Yd4óêæN‚|‡Ñ÷[¤…‚ˆa»žµÖÑQíÔ¼Ká£rI#%šÚÛCžêÚºü“¤J~aû—öµÒ#£ -F÷Êv¡ß‡}hwqcºái°È^@…᥂=WØœ?Š3Õàq+še¡•÷xÜwÈÆQicb7Ïbvù) ‚túÕKL¡½è—@{ŸîÎÄäë€÷Þ»0¯¤EÇø0[2w\+±<ÁåŽqL9 # †é ß—Eí Xܶ"IHC%Š0§§¾;ðüžk«€‹9Ã\;šá‡x†Õõƒ3L@@¶öí~CQÈR¨÷N/PnüP&Ð]±¢ç”<›èJE=tß$^w„ÕéÞ“&Œ ‘ñ*“³¨ô¢Wž±G;ÅðÎ-;¤›ù²!_E¼¸Ý”%;RÇtd…Ht \Ú€ %ä¾Í§PÙü­ãóзª]‚>È6…°¡ÃêÀfMÙ^㟠{aŒÜ.Š(ßÌ<œ"ùÛ}÷ú†ÂH«2@HžŒÃeyòS¤Ìd Û™"ªéÈL§šÞÂÀ.cªecÌõ1SEÌ4ŠÝŽ‡âœŒ— s‚4F?*H9´¤;7Äðˆc‘–@ Š“y^#‡bïò^«Â¢ZÞšÙºQ1/Óš o‘r¼p¹”tE3ªH¯†‹¨«*jzƤÎ9*p…HQ¬ÌÔàÏúsõ¢±ÛØØÒÞì¯vU «Ë¤£sçt'Kgà’šŒ|Cc'ã. M/ÞöTò¼“áÀ&¤Ùõua*…¤œ…Î?4/¨&ß`?B Á™$Š’gäÿ€í!M_‰É2ék\G™Ô¹zUœZ”Þát\¢Ø’ 7_T©É÷÷]ÖÙÑ[ƒw/µSë¬]{ш“E1ãRÏ°ê‰P;ÓÑeCÇÖ€Ýzþ»bE“õaš ÖZ<0xØðøo5IÂPÕ+.lYV%ö˜5Ö&,|KJ*)‰jŨ6#~ÛRL/õaV±æQ›èiÖi¶îÃ8æ°»ck˜Ž+Zîî°¨¢&lCöÐBŒêîí²«×]k芆Ïc’ƒV<B¡$ð0'ƒ!vÅ|I®iÒ@;¥šäk©NÕažA‹åfæÌi±ÏœÞ|0)EÒ4·ñ‘ çd@Ñ´ äÖ:p‡mÔÕçÂUEχÎmm4êbdžˆÈ-²M:<‚°ï\õǼDͧ1Žp­—ˆFÕ´Éq+©§…âLI²V_N¨>„ÝÖË/œ¢¯Þ„Gö¾þ§74l°>è]Hª³MÑ» [ÕõC¡º:ÄpWº³·~qkû<úƒð‚×%eo>ÒPªÄ”Óû])39¢…°º£s.œkHgÇû–Ã]è¨Ö<¶O;íN‹ž¾‚?Ê¿=-O#6¬Ô c¹@c‘=¢oà­9!TÉ·èe^¤ò …Xlz½Ë:j¿xµXŸ*ú+ ×3à*ûÕ8î´~) †Úi“¾cø÷# …—Íãv§ÅÀk c¨£7ñ RUaΑï¼Ïš+2ÚÝA/kNŽ«X4B­ˆ ÷‹xUÑŸôöÃe0ªÜüÎ6ç›ÎZ «vzzج“\O§_Ûâ~òû­&ðYsœ·OSòP‹(>Õ©µj[„ßš”äÐæÑÙO†0 ñ$XLÚsÊgÁŒ@Ú Ê²Â³ÍR4ëÃáA°ŠxPH€#Ã=³ÆvðŽ5‡@BÂï–´df°9Ñ"Z£ÀN¸~øUžØ.|o@}3㥅æÓh«ÞRäžò¡ôÓç ÌéP%æ¢%ù&ÝÒ¨ÔUfdÌ‹vðÖ¯çz!<xýKïŽ4“$'-%‘@ÿðÌ{Q‡æwá™Ü0´lHA€™Ú§IÒ\8CZ©>©£—…Tá´uÒiÔ;ÖÏû{¦¯Kë¤{øâÕ+z&©‚PN~«Ç&ü©a!­¶^´j§/‹Qž¢¤í­jÎPÃUw€Ý0HYMÞºãî AÑï C\†Å¨Ñ¿D؆Á¤ÏÝQz®?¾G q#9€!Cä‡U<=ì¾aœ©]¯)VF X²ÔÜ®%R !¸¬â¼˜fŸf|'1âÉ¥žw§ø+ß;¯l2j³AR–zqÍ']$VÞ~ã vvHC¶wz‰úµX’Œo€ª‘Œµ›{SC*N ©X»êO‚à†{Þdllƒ™'\¸nnÝ!œltŒÕRòÍE,=#®vPG]dÚY>ÿÉËíãµ,³`zxw€ü­C AØsÿ:K)>°F¼äEmd`,¹å<,ï¡»UÖÍNîå«ã}zvÔ«ï»zØj´a°ñr‡=ï–“J~s;ì•Øðlr„\Ö+dåØí)°ãƒW‡|ô][¼-×øäóÈëMúÎKZþÆ¿"íAäSáå^ë¬ý²X¨Ÿž´oƒ>üÔ>­ÕO«±|iÏ¿¨ãþäÖGZþÇã¨ý‚„Bâ!¹D´„^Çî¾U=r!×Ý䘶W¡ÏuÚȼìÆ]AïYRåñ7ò™ÈTeá(ó3 4××Ô1›1ÄE5zÏÄ•„ÙuàÈïÑ%Ç a¼€öw+vCXN‰µ_Yí—'¯h=ž‘}g,Ï/µ+¾%’ëÖÐKFÒ¡Žo¼rÓSŠ¿ï7 ”+öêC.BžÁÿ%éj*»Oðû26û‘­añâ»9—/xì&eÐÿŽòÚÙ‡TæFœÎÉ„ÚêíÄ¢‡ïãÝXäGw4Þô­Ÿ ]gŒ ¶XÓ)|c†°@0¬Zäÿš–ÝP“%—?ACl®C¿î.†ª¼/$¨d¤G17´pXNiÁÁ5ƒ¾¸÷¼RÇœ:àâüa¿ œN}›”µÔÉÊQ 'Ñ(æsJ ©rBXcSÉ[S‚žÎ”âkÇ 6ŠærBÄ©ÃAíOkñGÓ7Kª¦eß…3„cѼsÕ¥,šQœý(,Sþ TêÐÆ ¼´×4wQý¾ZîÜ ˆ7¼ÃÀŠ®…§.'s%ö­Ú ‘nˆ²2tWò}ÀºÑûø³6¬¿¾sB÷æ°–XóøWZƒ ¶_Õšëdï(ú­c׫’‡Qô$щHŒþD/øå{ãnÿ†p>§·Î¸Oõúù\‰5H8ôà!*r<|œÒ&»§tÿ–ÜT?Iד(òÑò ×™Ž_ ¹¦-dÚXÙqHó’ÄhC^ý ê«ÆM±_JLD4.'ŠÆ}à1¯­¯¿(vƳõЮ¾ ‘¸ñ0”u¡[O"×N›tÚL¾O7BÔŽnÏ…ÈVRéÖ3¥KRMàDÉþYÿð€7Zab߀º7aãkXÚîu°‡Vèw„Ïnùü¢ŸT¨´ù†7¤ÑrË{g˜–5- žXÏÕ˜‡õ‡Ô&®ÿ5M\OibòÊŒ¬ÍÅdJ¨"r༊‘ä‰l‹ˆ…ú¢B%˜<äÇåäš¾©¶F8V^ R†ŒU„;UïìñØ·ÐqNES&æ–"ZÖl5_[ÑKd¥¬°¹ƒ/ÔØÀ‘¡„ï„&,Q53dm“·Þ° ý4t/£ù÷­}H÷áý¦e]Á@ƨ,)I ÓrC'µuq!ÀI¾ ^äü{âú¬â£=ã"Y½wò½¹^žž½Ž·GV®œ |aD3öI•³Ý)]0ãÑ&ñ§ѽ_¹ @¢sæN<´íi¬=爣—µáƒöø–8væçIs4›%‘ì‹™6rI—K÷tªqNÿ÷ŸüsÝ-?¯<«¬­Ò©±*†Ã\Ð2¬t¡´ölÿVŸomèñgcs}ýÿªëÏ·àéÆÚÖ³ÿ[«n<{¶õì?j EgÔßÿ)ò¾$7g²ñ²^j6\y ¨r“×siÚ‘…b²z¦’Ë¢hUñà)ž%jòöiX”2–,êıªÞqítÀßE*úl­ðUR*"{DiÞ?ñËà+k§Mžêðôç“æ¾L¥YŸîð#Á{2Æj `uÄÕÂQØw£nò©kèM8x,²iÇÎ…jjé„¡ˆUDbäÆ$¤uØÅSV q Kä*T¸„óÔq+ªa¿§ê5"íÑ´'ºò$Ò4q‡7ŽêWoðtÒQL >Zω_¡Êáq˜1pšô‘G°#r@@ÿ°®7Ñi™€d¿p#α¼¯bUf+PJÒe¸™Ì€ÉwÆ•#)'2Aì)žöx¡”¡)l瘯ڔ›Œi·FÆš›!ûÛIzù´VÈð$j#iœ_tD©›q“°„Õ×z1þ“ÍçÖ³–:ö"SÒÁ8rG²¹.àcüÐ`‘Ÿ|n°ÿ;/ t2Û#Ýãÿþ§~"ü_0°ƒ›Çãü2ñkÏÖ«þo}kcã+ÿ÷9~VWrLh8 ñ•“·h;Ì•PZ¬;î†:qµ2÷•©CÆO\™(vïº+x¼¶L9œwØsòÈ›€m®årüFÕÎ)ìI×,Šáâ©GtRšçf”ZSq&·TãGš‰æ-Qè(äåýá(êD1)RªH´õìùw<4Å·ß²‘ ‚£s겫EkÛ\Ø@þä'²ÿQ?Ý·Ýué »7DfìØôÑý¿±±öüëþÿ|û¿îî}Ä€ƒ»ÈÖתUt{éÜöñ¸|jwßÙ~¡o§=¼ƵÖï3J!pü÷NÉ‘’—Í6;ªa8•Ú!ƒÏ§­“Ÿ›û}VkÃ×ÈU—¬¶×>9<ë4aÇ'À§´ZµãÎ/¬ñú´Õh·Ñ5x…´B5ûXãñ/ì¬ÝÀköËÉY‹¼:f­fû'Yó©ã£ç¸@ëÀ°HЇkßF( ‚ò DºïB_Öq@ ô‰y‘F@×Øhâ¼À)¡÷÷Þía·ٗ@¢+½ƒ-k»„¢7$”,(Õu‚J¤›×Öè^c*ˆ7𸇗Eîå-¥p«ß»ls ËØ qjKÐY"åªÊ[;À¢T=P… É½ðZ‹—ÝU —$Æv5BÆûî%IÞqÒ®?B!…Ë3˜¿÷ 5¬^wQ÷øÞ< àÄ°$âoÄ™0¸·9Óy‘@æÑð1Á«…sY£l’åŸø0³},ñIo›åÙ"ÔIœ¦e6–B_XñšåªzF¥¦à×èD¢Ã' ßq¤£è ˆ³%öxåãŒ,„Ê0T ~v®òÈã¤(Ûò¥Ä+Ñ^ùÇ.i.xƒž>•á’º$Á°œàBAUUD¬Óò.žeÕµï¥Ú6)«V×ô°Ý]‘Çš7½B:³Ð{Ýï®ðƒ2Ðö€Ž1Y±J¢9õ¯yú²ƒa2øÍ-=Gx:M"!gˆ5S*€} Q}¢“RLU…Y¿ÑÍÔËårÇг<Öj&+y2ÿh㕈ssçP#PM™ÇÔQÅÆ„}šÑ u­?ÊhGJŽ8¦D6pÄJŠªŒãňÇÉ„@¹ÃO°‡ÊÞ0Š7T ö ñ€ôUízU5Ï+Óâ3„QZ¼šRÇCª¿\àÆ"ÒßV¼ÿ©Ñ8¥×\\ßXïÕžD™oÌÚŒñùƹ ó°<FÕÀãà$ ËÁÓÎwˆ@‹7gPOOUñéÎË¿î–døsøò¾˜û=ª+U{¸ÄÿXw¨>Ú"Šz¸¯9 µ}?ÔÞEü])àRlõjw–Ø*œ‰uœ ˆî`„ÏÞŸWß”òüÆéòEÁ맮‘8Xú~n³';ױܬ£“ýÆᛋŒ˜üÅx•ËÀš¸×¸¢gJ†*f0ðɉIɲŽY"³Åqó°×koŒ´«Ñ}£ÆL5_¨È–Ÿí±çÊ e…Y~àñûÂ|?²õbºÂ‡7%‚”¥7@ ¦·e}G×ÉÅ“Dv¶:pKr;ik†4•ÐYÀcœîí}1Æÿ`–*ŒŒ‰4€ÿÕ@}Â÷a™$áR‡ÃIp‡;ü#ûA›{c‡ ˆ—GŒŒ}.Æâ˜jM`Ðùå´aÌXø˜›p¦D¶¨@ÍTbTbW¤/1D ª0\Ã^¡Èž¨©3+–³vþIžÎAð‰§MÒÿ°ƒ‘3k €qãÓ,®TòFt,â;"²9ÛúZ4§º^Ùì_áßþ5ÿM<$öôéM"WÎõªŒ_¨F ÿ¯†Iô¥lê§g¶) Ë,ÞJ\‹TsþxµfÚÿïªk?µþG ?®x†þ§º¾ù<ªÿYÛ|öUÿó™îÿ§Êð1Q_©u nUt;ñ¾W1zîëÛ†k'Ž˜ŒÊ[ÝgeÙ•Ä@¬\Ì-†<æÊ¿õd2¸¨vñ®[ËŽÂø£ÈUVì´W¡ m‚>^ xõô€ø}  jr²­ïÄ¿KÀ®°”Ö¹pÐU×" ª9ÀúØÎÄŠÔVÃŒ„#¬O“a¾ HýK Z©b™„UkGEl¾Õç¸AÙ_¬ÿŸ¥ÿkø••þoDéÿúÆæÚWúÿ9~¦Yg¥šî¤X<}yF4íqì8¨øv¯„qP£úzTm7`Üð¼WaéÍB—«æë£Æ6ëàe‚Ë»ãbÜÜJÇ /Ð<,©Yß?f«¾c|ñö¿ø»b4N»ÿÝÜØŠÐÿêóêWúÿyènñ±®l縱Åj|_»øx×µ‹x[»øh—µ‹¼«…Œuo0€®€ÔF8ÆÖá~mŸWŸÇ†^ã«ß³{}©0öFÖåÄí÷z®_\…¬ âõmxÑxÝiÕxˆõÃæ¢Óáç6ɺîb!˜¤©Š9îÿ çE«v¤¥Èñ?Væ¿Þh Í'4•®|Ë[ImQM+æܸÚH÷ò7û‡¼a\g&Rí7NÇûãz“*Lë ÖäVfõG¦Éɱ>iÌs˜(¹kaÕ·×CÀì镇©ráÇXø+¨]K3«~²ø›U½J”SŸb•ë¦ƒZ²YõßL®gö^¦ÉɱÊñ…¬[%šUµ®ìšV½ž.§‰5ÃTŸ™igN]Óùž7fN‡™4ùŸó=ÎO$Gýà°ö3”÷¹“Uëä¤Ó†½µKšØ"8aBøÆÇÈÈE*C˳.3‰>v”)íÀÔ:¦””œÉêÛÓF •^Ý)Y¡YI“9%þ`!ý”Ýá•ÇªÛÛk¬<ôÊ“¡pL2`p»?²á8Xz·xtN©;+9Lć ÕúÜc昲§ÕóèCc<‘èr‰œŸO;­v¸}øl&!S‰rêSüdÄ7’‚„ɒɇÄ OÊ°A$Ýf9ÙÌ”9ók¼}1ÁhŽd =²£-E¯ál-•)sæ×”–Êת*ý¼í &—¼î33³µIésIãûK&î9H±“òÍÛ4‹àÛmÿ^:XÍèEZž\Ú‹XoB‡R³gëT¸ò맇gmü§­(Ìئ®%‘&'?$ò¨ø¢Òíb=5ô´0r.: «\²¹×]JëÅÚ]ýZ4ïJcùˆþbNb¹Ó²RoÃ>7ŽØŸÀOkÍ£°çÊ€›¦(Þkó½ñ-Öã-̘™z&Ïž”<•uOè™ OëO`~Mï„°h¦ŸFWÿõ?’ù9ô?›ëÕµ˜ýÿó¯÷¿ÿ-þßá+ÛdI´ =’Ée(éNšÇ³IŽ€cbü´OAŠhÇÀ€´T–5¾ò½cuû®3Sø¥¦ýSóTäÿ©ñ )EÐ'¼h¿sG\O…[Mm¯oûðî?¼Û c‡¿Å¸qh‘ŽÉäåo0¤"¸aT’€Ý:}¼M¨O|Õ¿ç6¤ÇÂ@¤Cvè'w%V¿¿FÌ(­(T1q$©ÊC]> LºeÅ»¯/ ³žDÝ!1ÍgKޛĆ0€£¾Ì [@g§¶ 4l€œŽ;3fð{GwüÌ=™Å"¯yè#ÚÂ2±ˆ¬“ã:vÃ>¥„HÏ˹cF®Za0‰þ=f†Ê(_–ˆ`PQwåv ˆš“"¥H+EDqkî7¬Ó“æq§Ñ¢…ÞiíŸò7°n¼ Ë‹ú€’ÑÿÕ"Ý‘ÀJ´O°ÜáVc!1Âø .¥wS1bÇ#ÌAY—Ô͹Gd“¾Ù-Ø‘lgW“ўÖ ˆ_ˆud_z“ñ¬+C(b2$ʉx¼±¥“þ¸¢® õ&ð.˜YXá[eXO©Ù×'‡NÏM ·Ç„…K8-ìo|jWBŒ£IÛb3Ш›s%ׄ0®6k³VHša˜ÆbXîÀ~çàN26l Ø †‚`Ìòˆ&‡Í#=€}ek1ÐL–äÎ).mù -²)»y®æ-†‹ú6æéécI€$½¥ÞvH‘5-aFp9ë!J³-)²ëÑá ¡îoY5 â$Q,ÌÕÊ¡Jì[=b}ªSþÃò#ÎøéÖ;vÒ7 §Ä<ˆÒÿ/o>çýïÚóçQþ¿úl}ó+ÿÿùüÉÿ_ÜB¹J*véŒogÈÑsy;dLeð_òumƒ‘ëc`ì{8›‰#'/B0ü§×ÛCö3ä²Z@„ÓO˜r,„‘ðps1N°ëùÖÈ£ˆY4Ý€½ïMc~—›´Xöض¹öý3ªN¥_}ø˜ Ö×6¿K©@½ú ±ËÉÂ9 }¦HàI†5Qü˜âñÓïÿg››1ÿÿgÏ¿âü…ò¿7Ã1‹¥HûB@«j'V«ñÿΚ-hg-¡¾«,o¤ÃŽð  $êî•3îÞP€6»×û”`t îòšo¼ˆnX{ bÞ ÷І°ïHÏšµC©=á6÷ZÔVÌ];lB§Œ$[[f’HìyÚkž}}m-6·ûzíëøìH@«=dÕ­èóýÆñÉ«>Ó„a3!´UÄ•®t7KL%èi¦ü?­‹Ú‰ø~<ÕT€?Qõp2€J¡1ƺ)|o‰UCWT E R_Ï%„–ø~(×lúUªv×CAYk×IóM_Ð2<Ñç¦ùõyæCëN=sG¡ïÙaçÕ´ã!ÇEgâË“#¥¥c¤áØ;¾GpÅ)ÑÄråŒH÷аˆ\%µ&r#N©ŽéÏ9M2ZŒƒý¢Ço¾¤ÍH²îö=Á*Qm³¡ÍM÷: v¨õ=†r¨| oR!úäxð5¯Æ#²‡g|“ä2?ÿ(qArÆ8M‹Ï3.Éi|cñÊÕ&u«unaCM ô¡Ð,“—²±Œ  Idý¡¤PS>%mè.ñƒr¦IED Ó7cÚ.#ÔAc£­=|g%滋»¦‹wqL²M¦YÊÍÚ" ×<»#egäØ÷Câ(DWþ£®‰ˆ†+¾LtrC•}ep ÔØã )^ð£-Œ´\ãìÇæl÷ÇL³IÚB×)}ž–5¾DBa3*n3Áß H¼ˆJ ð™(fÑìõ$Ê"hüQ±”œDã"Òn€pZ“Y†[%¥–L” þ“ù?ÑTçËÿ ÷oFäÿÍÍõ¯øïŸQÿ§áÿÕþßá¤ç½w»ðjâÃÚø¤è~ŸÜï+¶ŸÄö[Íå€úÙïF°lË‚…\Æp:¯¡(ÒçJ²/¬nì¡3.Çcò!ňµeIÂuð¾Gnš¾Ós}ôEGØ1j:°±ãA%ô$MÓV}uÑÔxà‹sc¼Þ$µ‡HfF7à©SÔ†<¡tÔc¡º¾‘ö|s«˜.™76=È@b J2\Hqö`šPÆY4înÄ/Ç=R@ üŠ²µ×81-(>ìÆzüW¶èÚËú//â9´Xegñ¨f°`†¼‹Жæ)ˆPD1ðjûû-ëø´˜RÌaóøìu¤”Zý0-y’•žSšu¬z¿-#4³Âvít:¨•BÝ“|ñ²q%wšõªKÌÈM-¶¢e¨×2¬œž´P´|½³ÁXÇù£K)A/Ðüª’¦!o>¶ìRÃPé–ü…0(Ι#¸A²[Rè(VÏÙ‚YÑÚµ6N(!ÆbJ@ìq\øžs¦‰^ic–(6fçÀi-3dº©í¦ Ub_í¿ÚhòŸæGùÙì?6Ö66cø/[Õ¯òßgºÿÆyöÝ;¦p£’_o¾8>i5,õŽùíqózè@ÒR_¸”˜G3¯L9 ·7n÷†‘Ðæ¹u³nÊŒqÉïCØ.:”ápî{·E´;¡ÓË!¹o`w} z}…µs^]+Š:PˆÞÇ°ŠŽt<òLÈ BÊFCT.¿Q¸9<ã;ÿžPðV< …ùö¤‹A a¨¼I¿Bî£WcY B¸]RrIqlB@d7pn<„ÛB5B>ñѹ&wÌ=œ .)šwŒÝ!Ï V€1¿{c‰üÊnñ†«ÿC8w#8ï4ER)ñ…ÃÒF^&ì50h³CÖ)œ¥/w_fîÇYX°ä«¡aÞI ‡%löfêR][ÓБwôÞ'(·ÞºÃh öDy}Œízã YO†Jw ¢g辿«Dâƒw`Ü—v‚D¯„®‘`×óÑlšÌ ^0îß“ª@‰Ø4a‘ÂD8eÜ ˜vÇ_eîXã0ûÔ³n´˜â+[ò"Ë€È3æˆÇkBÝãÏ~ÜÆ%¨J-c™úòž å²1 pi#S4® ÙÞîGnð£·U­sc°Ÿ~ŠÁ~úXƒý•ü_æÿ".ŸŸƒÿ«n¬?{µÿ[¯~õÿûkôÿ_ãÿ|ÿ“ÿgÕˆÇMÀ§{ƒH‰\CfÅyÉ L^…kÚ„14¹(©€(FQÄ2 ¢/ Ó…E!ËEZº‡³ôì"M³¢…ÞžŸ¾ÑB†Ï¸y¼xHfÜõÏ)‰¸ygàü[ÜD€@A*÷É)Ö˜õ¡dòAüƒi.À“rYg°O+9¤ ‡Ô5­ CfEØ¡¥ÊñÔÔ‚…š± Q”`ÏvI„¬^wœCI %š±ýµÄ2^ MðEõað!Þat‰£JøAâ<óÔB:„©»½Hð î,2UÙ?¨FE3óÙ(„­Ãá)±µ»­g|RP (jž€„‡ŽŠ!—Íç‰|jÍÁåzeö!=f6‡-Ý…£H#‘;èIg•¹{†8Æ'h”³È—"EìF™­·¦EõˆEö0-p¢31"…¶Ù8ÝàRtKÉhŠ")Äñ¥‡#áÊ•ÿ!Wld»>£¿ã0t™x·€ŠØ×n÷¼úLÃú%oÚ`2gT`ßüÞóyD3cˆ˜„ †VæOkÍÈ//šukï—N£áƒÜÀ„QàH.<±‡ap0bϨü#•Tba©%¹“äË"÷¦LÞõ”oÆ~—m€öªMm…¼@Ò4<¸ÁðLvÇx>ùô†…Nm<áƾÜà¡EÇ´²£ª ÖÅÚo´;­³º´ä––NûŽ˜±'ئÂX#OFŸa™4y…ÖÏ0(Ðó{Ï/F㇋ ]‡1¦U1FÔ,Å_}ÃkÂû9•Šž¤$íÅ’öTR9ÐÐÙçß­‡‚³(0|ÿt—ñgðËX§2u/!u/–:lÚ(|…‹H~.†SÞ¾rÓCUœ;VTIn^µ>—W–¦Ø4z%ò4ÃuöÂ=|€„Š3_—üƱ 7cIÛˆÑU¼ó .÷IHºy¡™âÄqÂRÔIo*Ù}¼(lßLY: Nl«Ê„ftŸ•Ð$Í'¬X8i 0+cÆÊDþ"½êá«^ôUt(+QÙyiGgüÓA£GŠâò%Ê‘œ€³uÁŽ æO#°ú¾ŸïÏ¿ÿ³Ò½t}*£‰ÉvM šÄdS´S;ÑÀHÞÃBÔQObCùfV¼Óä\Ó#ƒ~HÞ¥¡½Ùª*5­6C¢Ä•™ì”°b^@á{3¤Æ¢éÙ3Õí]†Ù°ñ,w»c´ÏDmMÜBiV€LjSýŠÜÓ2±+â\á&, ƒH R¨m¶°¬ÄÍ–Áß+ˆ…¸ß¯Dz ·5Òx<¡8u ->Ì/îƒñáãÇ@w¦ùèNkN)Óågß'ôy1DÛËäl8žµPˆä‹.ƸŠ¯7SŸòþ' ìü9ìÖ7·bø›_ã|û2e …WȇÓõÀ˜|±R ¬ŒÑÏÑ”dÿð°"Mü¥I†eŒx’f£ûc„‰ÆëÓ“VǪ6¹=µfVüs³ÝÜk6;¿ àÝ~ãØj7:Ê Ø°1¶êõºe£É¢:þü¨yüâÕÆ:¼ !Fs60Û42ܹƒãvÈ,Ë‹+Ë*@ÑïÝÀ½tûîø¾çE„r㓆¯Ó+äņÅbe`tßq†x¹#õ±æÓ•»äç÷†^.öw>Æö"™ Åüi)­áo*±” •ÍÃ:) $6dÇ]­t÷ûW3rúÎ ú}]úý±¤!Š5Jf¼ÃgÿÑE/e˜?-ô¼HVÔ4oÑ-F.ðMU¾™`rJÁÚÑí³òìŽCë})‡L%¹Ÿ’ÄàN}$”<„ÁQ„\¡à]™ðÿ»Ôœ@â&áô³yœS±’C+øu@¶qŽ€Å™Ë†hN–u°]G|)ð;¨_¹)šõm¡ðk­ÇþÆÄÂQ ?Ýúoæ8¢øÏZðÏeÿ[Ý\ÛˆÚÿnU¿ú~–Ÿ9 –zÒ÷Ù—v÷ÝhÌãK>ÂQ†4\Y;ñW˜qPs¤uùj§kÁCYI“6 tSž‘AÑçê„HÆ6‰Â±rŒЕ4!\[ûj|øÕø0(Hrù¶ð£æZC* Ò^t½!¶*àö‚“aW_°‰†Þ¡UF@³®ú¯_¿.Ü”˜G_Š*´‘t‘Îðb.n)ñ…jãÉ/l¹àV×A.A5 L8Y\­³ÊÊA‘uûŽ8ºÒ²z#o8x@QØv+²íð!îÛP\ß¾šï ý†ZÂÅž‰+6y”\+êÊõ±%ªM„uU™×h’ Á0>¬õh]ò<ÔògžÐ£¡ !$®Ð%h.nc¹¹´.½Þ½àuD²¾;0>%¨6®e>'m½,Bâ†ð¼úF3¬8_ÓŒä³ =Þ oj·;250;ü4bG¤3cckõFe¡ÎlEZKâ­ù ÃÐ 4~¼ì¢ìI‰ç°À8áâÚŒ.ªJöyÛübçmíqg o×[ƒF§þÒ:8iY¯ZÍN#ehä³Í¢1‹æ oNáúa£Ö²öOÎö…ÑS¹Ò¦tsÖ”®c8‹¤I:¥_È&LØvŸh£ÅkúˆMôÿB¶Ïfòˆ—qÄ¿ûte3ó ©=¡«µ3V:'$Ÿ²ò8Ñ™¦3øMž¬äJžt êÎ uœïèI|ƒ‚:­daãÆÔz=^Õ˜¯ÐB¬I+Š˜Õ¢[‡Ñ h|F˜¦’|ÎÊ[š.9ã†À$ÈAa,‡ðI^Ôö©„­½Åi>§z«|‡»Z ¿ÔåÑ¥à#”IüãÙbÆ„/†Q/ 긱9_ÈîÍñ£2#A †ãF+¾—b[IÚÓÿV¢dž×çó2Õz„‹#Ì5|JðÏwÞï¨'ÈPY¼§;è(b¦(ª:q]ÂÓÆ'Z§" q )XŒðÊ'PA‡‹%ö+Ç–éÚ(y0®ÅJ„¯BÓRšÂ[œ«zÀh÷1 Dè#wŒà( Iík/äeÄ#zˆ‰þÿÙ{÷þ4Ždaxÿ5¿ßùìD ºX–)rIXf#@¶³Žw2‚L ;3è’ÄÏgëÒÝÓ=@Ž³çœçK0Ó]Ý]]]]]] VP`àЯuI¸”[¿C×àõ^LœEÈɼ?z¨‡Ml}’Ï:F±MÊ‚BÈí¶_®ZtûùîªEŸ½x)bUeIï„Ž›"Ò`ÈE@v1<-îÕ•×÷(= ý}Èm<æ  b:€‰]Á”bÖ!XcÌj…Öû˜ô N^µ•0*MÍÂ_SÆdÛ{œêWDÒ$á7“!­*¼FöSõ>ÑåÊ‚2{¼óz¼óåz¼³RÅ5î^ªˆfvöI^ÚfoVì)@; ÒÃ̺ˆ€©‹¡œ Ž+¥aåðŸN;øæðô´Cã­á¤8³¯m6H¾xÔþº/(“ƒ~jLm}¤¨ 9d¾’ ±×žÊ1ÀåF@)P{Õ!J¯$\‘Ú“5ªØã…F‚Ð>†J²fc§ÏbœÎ¬1•\äQ<—ÁaŒÁÖ­/qFé(Fh&å„,1"a»¬¤()ÖhýŽ‰”›-¿Z ùôž½·h.NðÄÆ’h$ M0“[—´ð¦iÒ’”…úWýNx&˜ƒ»&ªÌï ãì|ŽÎ0qÔ¬BJDH,#îXá m,R9ÁQE,g6 üYà¡-ž)Ä‘¾ n-ƒ®3.ˆx¨Ž¶]òú;¶á‚ …D¡ŽÏX $™ß`òRjDýš»®År®=*E#P `Vµ%iÊ€ºTª‰d‰ä0»,Jy×Ö% ^ŒSÔ½Á©DHk—c·fŠï<¨HñZPÕç£j08 ‘kûúmRm™H–© ”#FøJýV9ËU¦°¶S–”t5¹›fÐáøî i!†ð÷ÇšM† 2ÿºìz·ÛèôJânÍÒÅDöø2Y¥H¿7p/çÃ!`Ã&Fàʪå^碡¸jšHôN[Öˆ»Jâ.áä¤So]œ6ºv¯Ížl%DO¹B¸‰ƒâc7(•Â¦¼B”MžáTüçJ_šÃ#Âhví‹ÖQûô´qÔÃTà%š‚²4 ÐI%¸KoŽ;¥QYm|L2IRÎÆ=Ärp@pnÓ„JH‡­Idž%QX ¯Òbù/‹ÏÿÀýŸÊAù3›òÆ~±›À…÷[[[;;©ø[϶ÿºÿûïŠÿñÇ/ñÂ.BèzcäJë$pf -„ð¼vƒ!œxß 5j>ð± ¿¾ÍºK¢¤¡²•™c^·$†±Ù}Ì6ÃzŽÌ¬ )ûXŒ«\Ðc„ϧ€Iö⋆÷áFäM\ºpTÚgÀP:súc̨dû¶ŒÔ..#DA[fžÖk¨€ºh6TÝÒŠ«ükzñ¼‚¿Ù„ª{8%Bn Ú’–E(eªÞÁ“øUU#Ùf|¥\ )Ó[Fõ–0÷¢×Ž#È”IÇ5`)å•G;d“R±¸ ñßíéŒo‡IꀌšDHØdòrÙNqÂ$Ï+õ×|ìÁ4a¼§QP^ŽDÔ1â4t®\ò„"ñ eUkÁNœðºT&æ#Ò¥?ž“¾,QFwZm´P.µ»]î±@e2Z½Š!œ‡3àó4Çœ™\Ø”÷)H¥MþŸûz²€ØëY‹ÀÏŠ¼V·y"ì—ãëõ÷ð´,òÞóE,h‰WO·ø¥1Õv+§’­Ú0ËÛð¸ÓÃð„Y-ůãÖ”7pµúÊš´Œt½;Ë‹4SjM§Dø8.Ïfd/ˆÓ`Ó\Å6Ü&fˆ‡‚ˆ0îÀp3ŒÝñó ؇§í£¤¿Ý7¢ºˆ.ú\?lÃ1¬˜¨-ÂX§œÿ8° ÀÈžÎ]€Ê^§ÒK˜{ÙZâègéJÖ¥å!ǤrËyš ¼~kdŠ¼5êÀ øÆñSœ¸Þ@½»3%…ñn­Ø[ä§Åq{Dêá@DÀ7CÐ+ÎÉPè`yë:±W%5…ëðGyA3ÊHAQ þU,Àk3+~¥ç§(ùé‚ÿ碹bÉúagÅ’ •S9æ¨â ê@£Æà $«L{|«ÍX „âC¨UÔ”àÑŸbV)¥”Ð*áɽ¢…[P(RŒHÿŽ9N@\¢²ÞA™$×_¤ã­-TÁça¿Û8y+PõXó°¦Ë…æÉáE×8gâ ¥ ÄîüóìÊÔg*‡†té‘$%¯ dâ À’[:¥aEýžûþ\æ`] ŠmNû@Ï.‰ª2½¸ » …kö¯4>oÒ¢Ìk•ŠØ^HfïÀz]?í6¶O%¬ƒƒWa׫Y@:I5AÀ8j®U* àdKØ%Ce^΄#ð'8ˆ¯îÞZe]J™”Óþ “yÓ­ ËU@`Û ¼ñý€9åÚC8¶i·»¯·ì8a…˜ ©£#ö÷’+)¥™ôó]^^Ì™ÜÄùøùÎ¥SŒâÀr’sŒ³Ð䑨ËwãLt·ŽG·b O†©Æm Fdà ¬Wïôjl.HÁ›éúå|Š3H ”|ò¡ ºIá°¥ø,T‚øèl8[EŠÿ=à0Ú¬ÙÉ»{Ùb­,—+£¡Ñ)K@Âþ !J*Û…¨V¦Ô¯–/#‚ßw[‹ø¶™Ðéˆ6öñåÔÅú|#‚$†*fXýk:±f¾–ùüÕ¿†V£ ÅÁIÙ:š¨Mùm¾9¿xˆ©l4JS®œf‘V£‡br86“$…òT ¨ª¬í!BÆj¶L ,Ñ߸˜õÔzËb 뤫Hé,áÒ™QñýÑùEÊ¡óq\†a_´ºž…Ñå¥q×ýJ'˜”4e ãÀ¡òbi÷Îx‚žV)ØJ5Àr YÉ­ k¨Äç»XÿJ °\‰7;,P£ J χõ¡j òò^±tr%, _›8S¶9À­ª$¸åÉ‘Ì#æýJº¦r-KJ‡6”s%×=00·ŸQÈÞ\>Uo9”¤8H%º:Иɉ> ϾN€ýHucM¥Ÿê&|£;¨-j=ýc­šCN´,P#¦‡{Å÷äú`¾2Ñh}Ÿ,°§Óë’¶3×¾>¬DŒ]ñû¬ {ɳoFYj¼??m5C¸tüá‹“®?ÖŠ†À)Ūé‚xÀ%¥¡Ô¿çíü^(=ç…™fPŸŸ³UÃ@ 1¢ <YöÔf0qþü –%„¦.èæS: ¡¾Džr‚ð[Fº“Ytòç7x´Pv3â~mñÌç_0Q*téÐ d³•-.¤A×ÃÉeœ_ÅÂٕ곋ÝO¯ú!r™èÒ+ Ì~ĺ‚-ød_§7s{3*ÍWx›öC½Ó¾h Ã0¶Ô’D¦,Gð;IB -âõ¯ŽH†ø’†y’É’  aç ´zÏ"„Ç>¸/ÔVuP— Z \nw‰ãnòìÁz¾ÒÌ'“{ŽÓ‘ä.‘ˆXÇÓ¶»uœ†úQ¯ÙnéZÈLà’—¢ !B®|ëáj¾Et?ÂókÅãj»7$¡„HžJgâÖbAi¦bOÓ½N“²Kt6œRä®9ÖñÅËÌ°d+X–¤GE›´}>t9?|¥­°Ú( ¸ºpw3íÊ@¹‹uBѱ›¯Ai5NiÂq©ïŽÑ,$r÷‘¨Hó0¹7õ*e¹¡aóŠãf—TÞ¨P©bÐîIu,â"TBF¾—g;fíNx?íW™~ª¨½¨ª¬Caú={—}L*ÅéŒf3`ärwæU—!鼤}º±Q¾Ç–F?E cî×X]ú’rcÚw¥)–AÎ)PØ.ÙÊð!VЄ¦›»„µ”Zf¯èúOïN+†ÝØ}Ë¿¼! é[ç>JØ f [ßØ÷¯ ÄÍaÐpšÕ7Tº?¬qÄ.¡0+á„?©X±2‡Mî½Âd]Ô]¾<%E„^ê1Ùµ¬ddY!b©c0x¥/çy@Aóë'—1{p‰hY! :“í›9ó™X6%QN¹Êð[K U„Ò\›(9^ù˜Lz䌯tÙí-¥¨Ë´1æÂÜUËdD¤hðƒ¤¶Ø¾]©Š\K(¡gHÁ±[_ `ÂTO×J±™&r2óát¬Ö-ÒYKo¼DŽUÀiõ•u5v†¡õ%J5ŽA ìÅsÏwÏë#-B |çúÌc\1¬[\}דg îM%„H¿)ÀDè¦@5`Úy4ò/¢tžÐ¼˜€qéš œ~ßÀHÊVuþGÔùSWî„óo°ÄÍË­›è»…qÌ2‚Wh°o ÂUc¸å['"¦(æð¶kâ·‰Û¡Æ ' ­…‡73&ˆÀe}±0SµŠÙ aäh &0¥}/èÏ'¨áî»aÅÊ  2X½ÄÛ7·?_ì®H `$kŒEZ«ôMÖÝ)Ÿf¥gˆ81Àú í ­™äe¦‡ú›oòNé`_y âLÈ‹A㤪û$™¯ƒ`EâÝ%&'9)¾•ÒèÎeŸ4…Ç÷|)X’s¥Ø¢&¥="T‘=VóœƒHwéF·È¦ˆRä]™Ã»ˆ@Þ2ÜÓ‚ZðÝÙ!¶Ã‘sM½ò‘]^[B¡‹¤¶TÄ;tx „‡ a9¥d3–iq1jŒT‚Ù^`‰ Êða «Kð†À²H‚_¶í¦îR_—ÒLýf*eŒ>–^Øij˲28Jk¶”$s.ln…¦áÆÏÝšqÐ1¤&S¦«„óõNrÐôNº¿HíšØõúÍäF¿Öù:vÓWO…@¦‰òÉŽy5³g0WFÈÙžy±&õ»¤ÌM]3sÕÀ!­Yóokôü½ÂJ,LÌt»'2k\qàŽElµ ‚ìp¹ £MËÒ=q0ŸE‰e‚YÞÖ $ñæ4ƒé?Añ¦z'!¶}rÍPx=Žhäˆ.º »÷CóôÔn·ìzë¸Ón´°À$C\ÒJ3þ{ö™ÂÕÅqûñÖM{Ç(nU¥Ý¦0ðS“XÐø†ÇžVè ã@ò¼îY¤^’8<ãþHê¥vdÀß™Æ]²–€¤FN#Ð<Èðƒ²wÂÌLWÒý±ÛkœÙÍãl€ð¯úêð ÌÌè¥;õ&ÌßÉ”"îx&¾2ÀV„>u‡ŸÛ…Úž­Ü¨r΢¥Õ” Z¤^4[nž58çˆiË`¼²žojªzÂbO¸ <÷ʦ3‚8 Ú¸ÚáØugêf1¦4ÞÒ›¸À¼­Hù¦F7µèVj_7ã‡s~Ši_¬õD7,•óV¹ÛJ›”È…ÿÿ&º‰Íµuò™†Åjº–]mÕ÷²V\-éþ»’rGOß>nïYa‚izÓ0Âì=º™×Ò™(ç¬+¶’×0”gy ð#´|èbiPЫ8ReaIq–%êtü9>:µñ®”|8 ‰ø(E”¥zT·»QYtEçJ‘ŒŸŠ¾­>-³qSU£0‡½R@?0¡ê=Iõ{–Ø«6Ï×»ÒVN{ŨˆÈä¹êbSα޵$Ž¤2Ñ®F8|_=ŸJÎyµ\>©d`˜Æ~àÛtÉ¢”^W+ZŽIEý]v²I› ª†eœ‹$ƒM\Æ%#¦F·sôfOGC‹R Ó!’ò ÑA¢Ä¦K”©…|Ä2¦F¯÷nT®Y)Œ¶|>‡ÈC+Ö»Ž< Çæ{H+]Ÿdb46™0éõu³Õì¾i RÝ_™RE*©Bf¤TØŠ„Ýõô7͆µ+c+[ÎÆÊ+Ÿ2CŒ]•='´Ø”R\ à1/qÝ¡ônNˆ³=Yý´¤{)ÇÆ&(÷ë¶P²ï«ÜÅ–³)>(/ä²®ŸjzĀǤˆL¥XŠïˆŒ=°xáM£Ùêut€´è ñJæ>Æê+?Kïj’ÔâMÂPŒöñçm_‰Ú ‹úª:°þo&Ç^„€„¥š*4i}üÙX@ÐÜ3Mú¢F¶£(!q»iFÌ›<1•eÙXÞ]Á.ÖÀ+û(3ðAé®lÝ©lƒ©wÒ¤†µ±x±˜¼SÄ0¬ç¹{çô#ÞØØR13ø¾P„;#Å<îÎJëÞõ‰tûbƒ*8é×–‡;Sþ[ópDé݈CšÉ¶¥9ý*¸l’J5׌cšðù4r$Æ4(ãr84¿bD ÜC˜&m!lÃñF’£ bFHò Ä¢+%­Jì3ôËètßR_ ¥²É;…’ˀnjçƒÓR§î'ræåxˆ n‘¡€Ì¹Ñ75·¯ïÏGYûF…”Ÿ™V@^[æß+&4ç0“ŒœHiÓ©ß“eÜ(Æ÷‰9)âz¼œþ™pš£Ò" ¯ LXbÍxirbQ\åS4êIì?³l¹C^YÄÛäÓ§’ºâg©Y’-åLŸlTŒ§ñ.@”£ ¤f@T$ƒÅ=fˆ³-}÷5ç¨ì sù3öãˆIKo¦3Ó³*(y÷ãYZ–¾^ÙMF)× -ŒåŒ™wfX3êÝ,çŽsqóÌ+Íýr*EhzÆÅÆ’iÃ|«–!÷篞 t™¾ÌHtfbSs1cZ&Á¥Ê"؉âxæ¹9 Þ\*‰iˤ’ØL;—,…r)§ÆRNvԺ邷—~ù“ÅA­N³ub³„{X‡­P[ «•lS´uMlìÈé±?|=«dfÇÎJ”jÁŠØTSÆ.údmJºr~zÿ߳‰¡}U,§Y;ãˆ)Q,A\n"ö2FçkS>ËèŸZÚ7ÚIMbòYXAŸAôÄl¾?kìY­¤D!înJäû|×6òo­ïM2‰aÔC<‰ˆ*ÃÀ¿ A€»êÅ?þâjm±vÃOT%½îR†O ‘ƒ\Ž™œ»öŹÖ)MÒxŠ3jUIžzœ½‘˜¥‡U $Ï<¡k®´”²üÅ0!NPÚ@±ŒÖ$F’ŽDé;+|åM×5}ÿÆ ¤'­hË0…(9ÏÜU´¶’K"WèD†Öè4xýÖO”XÙL*k¢*¯Žµ®’zSËû ‘'NÖJÜ!Å:®é>‹G¤¸±² ‹Å† ‘#bº§Ð%`âà€d&2üp0áÔšO/Qâ€Æîyhâ‘\C˜æÁCóˆØ ‰ã cpéàšÇ©Ûë:ƒZrÓéE)ÕÚÒ‡·¢7ü, W’µœó‹e ª<ª ùm1ßÉW©õ˜ÎéŒùIÃv·Ç÷û¼Ólõ^ó1fâëA¤;€¤ÊR¤Ö<˜¾R#ž‚)K·­'ÀF·HÓoéH”Îcó)ºêJübìž%ÆM}àƒQŒ Ý.¹xOXZ;hj~oNঢbÃg´/ñÀÆ34ÜRæD}‘L4èJµ©7¥=’Ä€k™j@#º¬!P¥ÅöQofÞ@øC(¿s¥È°6ÆS½0qƱÙ_±«kÔ }0§‰¸îjš†“ŒŸN¸}ÍÈ¿X©vYܦ6Þè'CÉLó*jŽÜ_ …y¹˜ÔØ×Ìá|%O´KîËÏ׉)F—V¨»ŸQ€gÓ~zƒÒçáú«tÓ|IÇ­ß:7©JNŸÒc}â´lɸ°¤N^ßЪ›Çè%³œjg¡ÕrÂz-»ËV‚6Ÿ>Í:W§ûù;wZ¶–¢ f`fI£ÜY3ÏõXŽ¥tèqÞ•"þ›¾‡0ÜXÅZžÎ$õ˜ž«úOÒ‹UUMÝéä´EûÈiØ (ßгò*­Å•47Ë7ÀÒÃІ£OÕŠ¿%qï1x¬Ú ÑÊ*ÊêmºVl¼m´zRk¯VØŠRF’\’Áâ—(“˜MÂÀkÍYŽ´F©|NìÌÊåý¥À6¤ÍŸ¼Byd„„™%Á9¨ËÍ9 £]ïœleÞ梟 §âRd÷Ðf ­¤@p¾(Hm …'–O YXUjĵŽ&OÐÉî¼ÞùÁ~WoöìV½rôQ»Eþðzì¼ÜrVi‹L‡Ð‚¨ldÑ*Ciû¼Ñ±¹UÙ¼8µTelo>ÅÍð6öaÃÀpšdc#$¦‡Ý¤C*ïD)„qÀº¼¸ØYñ<«”óÉ”iòâkf],ˆâ¹µÿ9bXfã“Ëô, [eÃlQC–ˆæ©_˜jæf@ß}+ ÷u1ž§vĉ7F.jš@>_ckl©ÂžëôG±g¥Áã”ȸcƒ$EÉŒ°¡…L­¸êØw9³œB{LE*ÅËÖ–¹Hð(F¥8lFxÔL VêM€«2í1ëö Æó)‡ÅЬV·”qŠtûÔφ×[U½:X´â²Mj¢0˨‘Nùi>Óú gÅ.²!ßé°Ñ=ŒŽ¤V«-ÐBåŽ0!1£1ù»ÌC&BÝ„–}Þî6ß“Õf§k]¹:ÑÊ¢©3õÙNñÔJnÆ OŸj,öUšSo,@¢N²ìªëUú¾‡‘ˆ¼£#¬HåPE38ïuL4WBæÃq¨/(}+1wI=¸«Ø%•ñ…)vÉ`J¦ù@¼Å¨s?ÙÁµ(`±À›-'íÒšƒø9Š ºÇI|[Û´ß´Om¶$ÙµVóP4Ÿ6µ ­Öª¦ÿ2‘Æ5â¤ÖÑÒ\Pø3Ü2PÍ3r” ‡ Øxërr ZìàCÆ~·fMö£¢ˆ‘|ý˜ÓBÂmS¬ºý®`¤ƒ \Ž÷+örvò"nH:³)¿>¨&óîq‚7RY=Ps$gÖVýô´qjŸÁ"+hœÈ×ÐØ0e]§ä"66Û vyWcÎ â±:`S‚ñNyâÑ8ð¦C7À¹—,à W,(f¯¿ºAêFÕX9ÆH”Ýü˜ݺGH¼”µ«®O3]Šëm¾M¸èULÇÓ-Ó²·N·ZhæE¡”ÄÈd¶ L¿Aa¶Âm¤T|éèÓ›ãøm À8d£Ï\‹7T³"‰AªÅºr!v¿¾h5{Ö3¯ÍwF¯ó#ð°^£ó¶~Jò÷æ¦.Yíïú¾ô¯5oá8^È”ä*–ewY±¾QÕ—¨ê9R¦‰ºrò †å5L¼Jtß”ˆgº·cÀ­;ò§A-ÜÌŒ«ƒ‡oü:V;äw‹’.È¡Ä ã !é3"£¸×ß%©©ã?)*òÞ{Š~Í$¶UÛ¾ÿ {¿™8Q¦(7žœ§ÚH³¥A+I¤·Às@Ejík•ŸÄ4›Ü 3Õlj­Ñ”ÛiUÄgvò=>°Z ï'¬¾: j&ÂÙP\ó+ î6¿?±–)lù­sJBñÎä} Œ $+ó%H2‚Pß~ÕOÜQ b{æiÏœ¶éÊ;¤60e—¢ºˆn†ƒËZ¶ÝÌЧ€×µŒÿoÞõE½û gn i÷C°ù±øÿˆ4‡ãÅwVÅâXÕÊÃq’f…;¢q—¥GªR þ³Ñi—¶9>o[XÊf}>š`åsW+¼Bò[–„¤ƒ‘iUˆ0 ÔpîPFO-ü×dN¡Œ)/K…&@-ãšìò­áD` 5½( Ùèh¦Ÿõ$$¸wéÄ—dcJ ¨+’ˆÚg½Æ{»ÙjöšõS˜ùÑ¥¸Ù¦Ú^±ΧÜ%¦‘UZWVלô߇eÖ”ÖaŸåÏe@uˆg¡ŽÚaŠ¤)5‰A®œ¾kÿ{î÷%ºÖ°ú#X$ëñ; -ø øÝ "›¢oäZbæUÙæ¹+ÒE3^_É-3¾®’‰ÍrÑ0ð¯Xüæ„‘êæ›ÜIÓÍ´c7Ò|‘¥Š2MnaÐgE.÷Ì·±áQ&¼ìÏ€ïÊú­ ÞÜÙX… ™Í/Ç€´5åÛ‹Z³®æS¾ÇâÜ%¡¹ooLÑh¤ä |'ï‡3HŽNùU˜¼ªš¼êfmk± Ó7bz6Ä÷âA-ké”2åÓ•<›ù.’( F;‡~JgSɺnþî ËÜ$™j3ß0%#óf¾}‰á;˜W,ÞÑ­ìÌÂ^ú½9(ݼĸ~Ñ}-Ì;Ÿ®²f?ås—p4Ðu,—·|‡HÏž†ˆWñ-èÂrß-˜àÜŠ4Y[ÝWF«+UQ»ã‚<ÑyS)-C?o¶§,! Bn!Þ„âî™ÉÁìècÊj',Íù>™/)-Ã!6.ˆƒ8|ŽëE†Æ,L[a˜®+Å1PÌXÛÝÔ³‡;gà²]ARÅÒÎuÓ÷ű2MÈ~eóIy%HvùÓ´X΀µdàÆ5}úöœD¸¿¼D”—Èô ù9r$‚y¦#ÇjnºŸ„‚´Ì%#á ¡jå¸G|1KÊ‹V†-e)—„e é|k¹$ü‘¹ùóþ$O¦ä/åHð)×íùSÊ<ò;σ¬4” Š¬-JYVÉPÏ ÆœÉ-±tÄ*Èeêg" µd¹N!–ìC–™IgmáÛ€ÝArÿÍsëø¬Ímms]2Ü6 ¥PÎ2}(Ëéà’a*Ñej³“ù>ϧa" uMQžk£K!¥þ°‰®Ðp`zL>¤;ýH³î3r³¤²ê'±T&Ý8iëh©ˆëÄTÆ]3íª6sFû‹aK—wŽ…J¹·‰J®§Eeðؼ–8–nûˆK¦!Ó>cú!sm5{öy÷M½ƒ„±™Üç5;#¥mì’“ÝIðš/Ó”ðÝ­«”Ý\ȧ:¶Œ ¨½lÊ ‰‚›)Ö2]” ÐøùÝâ2ÍÖëvbÝãOL%0ÁW° QXÑ>eÙHÅÔ”XPåòVbéÀ&ÚµÏnìWØfÉÈ!«µnä’Í샄‘V5ÅåwâÃ…çÚ[w ’÷ÃUaú2Ö$t#™+Ž7[”“±bMSÙ7E¦W‘òæò^Ï-Çš>•l ¦ìÄ—Ì«èdÌŒ22AîçP’l{A…(ÎBŽµpÜ !döˆùÎɱ’ÓŠé]´ ‚¦¸³ Ä“¼drBŒëYÙd¦*˜ý*¨Ó¢”ª%‘|¾iöó‡§Ëç QÏ2Ÿ¦$.…k+++HIwýñ| m‚l>öŠM®ùÌ;¢ãË–ü‚µ•›¹Gõ`àæw ól”Õ%$­oÃ÷.ºD«r‘VÚÌצìO½Fë-… 3ŠË 5­Q;­d΂Dú0 ZÒO+ød»ST *ŸÊ/w3#–SK#È~*˜É»ÏõBðý¸Þy§B婧ðèÙ¶z`þöÿìÏ°_}QÛ­mnhÑ‚¨Öÿ’m ™ÑîîþÝzñü™þžïn?ûÛÖö‹çðô|ûÛæÖöæ‹í¿Yÿ«)£þþ/ùÁTEÀ†üÙ=ßø—úekëÛowP6xïþ¼ f~ RãjÅ’èZ@éšµL»¡ë½>&Ö œÙÈë‡ð¼vƒá<´ÞàA+Ѓm˜ƒêöæÖ&ByãÞŽÝ(ªžƒXíëÎpc†þPm2s¦÷"4¾ê½iv­³z¯ÑiÖO-ø|Þi¿m©ѪwákÅz×콎ßmŸ^ô§?†Ž1z«÷£Õx»g·qŒÚ«yv~Úlã`Z?b!XïY?¶/:Vû]Ëê4»?È–Ï1CA —BTÁˆ†dyAŽx‚ý£Ãy ^O°.n,08k6‡9 ÝŠ…/o<>´ºœ¢ E%جÌêPöŸ“žTÏ k‰~`²dLªËâ#éLPôâÆQà]Î#W¤ÝPôú%ú\A`+v£"@ó;™R4yë„JµC)˜QÂ@·_¼ÙŽa÷m0$ІŒ†é7iHÊo”ÚQê|Û½ó"ÅyN§9ŸI<\¤´”÷JO–.óeÂ/ê)匑¹0]éÒ¨Õ+ˆÜEÌ㸗úÕÉÔ¢4}t]u-òÛyì <§RÒ qï¯Aæw)‰ŒåE¡…Ñà®HÕàðeF. $ûcÛn¼?jœ£tÚ•'‰“£#íâŒô¥b0F®°ÞCèÐO¥Ò7r`4@YVÁ¹Bä%ód¯(,%ˆ¡sÂ`ß™ XDµ:Hï#B«…ñ¥ c…+5IdbÈ~ß%ÌŽcš<´ˆ¨eúÃöÙ'­‹#Û&ýKüt¡Ù¶ô`ÍFz_‘Òg²°{ïÓù̶ƒb‰Ô”GoO‹[Ð:ïb ê±ûc¦åìI8dê £IæÊÌl‰ñfÎp¨RÍ—t$•Í^qÈËùôÖã›D«h€‰8³½S2ƽdèÝ‹=!š°.]<±¥C¥S.y"O¤^Ž¨kì]˜(—](ù£Aq¯¨·ÈR"Þñh4ÉÙTÄRæa‹…Æœ*vïæ«S9 ÛŽo„­ §ààÜyâ”ʉ+§÷·ŽôŸ¥6n¨˜…w³Š³À»o,³q"Ú¨X0ÈXxMMbRÆ-kпPk£WÚð?réQNz¼$ÉðG]|+TÓoÇ©|rä» KOÍ•ÃÃV¾ ‰S °¡ê%²¨õðR½­;Ác Š¶Kë|R“÷*ûñ+¡x †Ú3yŽØ”>‘,ËU@ %š¢1Ñ ˆDÚ–|#Ïߪ©Š…]ÅNŠD”Ù¦úš/eìKK$@—êu¡§Æ«šñò2$&¨DÚ)ÒâïÖqý´Ýj”³|_{Ssdç;ÈÛ'Œv¢9ž+cÛƒ¥(ñg¥­X7v$Ö¨S ûwÎE2L'Ép×"Þmøþ'mÞê_âઠž³BO¯CaîŒ)†|hqzu•¾{Öô ñŒˆT‡<°Üséú°©Î] ›A[¹3ñ†Îîü·µ¹¹óà…¾ÀvX+õW?½vû´[]òS8::û…Ófë‡Fç yì¾Âg2Îzt~aµy]´Åv_nînf€x½8¾9xI Cðo/ìO^¾ÜªH’Õ³öÙyó´ÑY»Phž´ÚÆ%þ¾|.?m=ßQw·ÔÇMBkÙ­£öéiãˆLÅÌT÷uºzÚ>ÊxGš×Œç¤(EƒnÆË“#\K²§§“¤Ù±«M±ŒìH ­Kc‹ÓÁ2”³:¦Óš…¥ ŠRI}ä‘i¤—AÛÕ*.P€¸p) pRÛ³†}8.ÐMÃ/“™3ÙÀ_ø¸P }~¯ðhàRšÁu\N©:ë5ßL¯¹6~°´ü(_+àˆß øe/†& 'ˊׅGü¾ð(ÑS~ŒbÂ¥¶OŽêÈEÛ]í«ù…GOJÌÇÊr‹>tšßX½¶ì¼0á1_¡¼$àï²sñ(Ì°_eµ¢‰âo– 0¯oÏD‡D0þÒz§w0†ìYµš¬C‹‡`Ž2 ¶6rÀO÷Ù4xx¸”Û‡ÿè°=q C‹ôÇŽ7©aô”qt9¾†/Äw§?²¹ÁG?(äG…5Œtï †R<ÄB—¿ØK]ŽakÓ ¯0 0ÀųE hüeE'÷Sªáü/‡ödÌ­‹·a4¿¼ôƒ)bïŽÂùîgQ]Æú£þµªu‡ OÇ¿ò{$Ô­{¸Ðe&”C¤c*Ux~°bä_†ýPŸÚY05Hã. l1c>±á#Ñ2ìÝ™SÄe²&˜·Ð…S hëè€ü>Ä™¹6"'LÕˆVüêûÓ+o‹¥ ±¼'H¢Û@눰stTÖž›,[ÞpêîÁ‹B!¦=EGÉêús@MJJÛ‹É.£áø…¬*(sI4YE=”ÅÙîI –UÐ ,p6«ªõ%­˜j3&ù½˜þSmë/dÕx‰ì©å’¬¨?×›TÍe6eS-¼=µ“•ô粞¶L÷â5›¬i¼Uµe½¯ñdUã… Ÿ)ˆVHJG¤"I[(OETà KÍ’¹+î%¶ÉD}~–YŸwѽĶš¨ÏÏ2ë3E}üÆ5(É7¬¿ýõóÿ¼ýHEý,ÚþŸ£[`ÿñìÅÖ‹„þosw{÷/ýßÿ"ûÿÙ&±m$­"`¶‹ 3‚/õS :‰Ë߉?˜ •,.Ò§OáÐ"ºbÚ¿Ô]qÇ t|.Ì„V¤¼"ÝßY™Rä[ ¼0i؇¾;š„s­ˆÙYÙíGÊéVš §ûyËÉÐ hÁ'/pgh£,¬09%Ù•Šï¢,4W(üèÏåÍ(ÝظV‰¯ÐÍ–ª ] Ašm¸ýÑÔû÷Ü ËÊ:¤€zô¥ñ¦”´ z*P(âjSÌlqQL•XÆH.RŒ^U½iÞj…/6áZ’û7õ· 4|Ý<±ßàÍ—¼í•ÇÓ¢v¬<2/š§ÇP:Vé‰'©KcÁàå±~Ë×j¼³§^>6È_¡ý.aû "8Vf•Ï¬WÖÆÑŽÀ("œ5[í–;°¶Ëe£³™-ëãTŽ™å’¾ƒIz…wi¸JÂh°·w)}Ëù.nò¸qtJð^Uú·%³J9]A4®×R"@Z.p´1˜Ì¢ûÌ> ’âfpƒŒQ³‡®hÀ>ëRÊ‚¸µ^WKu%l…Sø¦;ø[!€…¯ÏH;mê±K"H‹0i×iǶ~ðý§å¿ííí´ü÷—ýï§ü·Uý"FÀßV·77wV±¿­X§µó¿Œmÿ_5¶eA9mÁ†ŠyÒàŽŠdt# „Rc¢®&"#<9ú‡Ý½8?owz(xµ,J¢°’]-PÊŠæS‘MXœU"³ÖÖ…ˆ†õqniƒ”%%40X,ó²,¢3Î|/ m¯¼MSý€ï[7è ¡p mlÜŸ’2¨·!Ê´÷ê‘LØPØ…q÷a>eœè~†2 ~åÔÔˆ¹ô,"G‚À0™ØÉ“#Ò#4­¨ƒ‚÷ÈߣÛÃŽÔ=êØíׯ»ž<û Žü ›>…N)éø8$û\XWsö¿.)tgȤÇîµPÿ0Ø'%þOa&¦ZMÉ\Þdâ< $8ô1‚a£ç¡‹>}b§¶[ht‚V•²ßï€CtøÝÃo˜Õì³HP{S˽›½>Z“JO5e]›|iÿ°O0¶ËÞÚ£¨´âvÈC ÖA-Ço½i-IÞ@½ÐCÙS$/•ÖBtÍÈÞS‹V+âÆ <Š²†Ž(§ÜqžLñm“ †-õÒ$=²“%G%”²´Ôvz»¤¹GÆÞ\‘LËù DæÎ<ÁË€ÓŒ‹Ã!MoLfaVö†DØÖà lQ@Ô¥rM ÜlÎ_œjUs†O—Iùæ&zZ,§¢¥ €»Þžô©†ÑýXˆX¶S™¼¤Kd΃¯tßÛTüAEá¹(j¤ñ®¼ äHeš“¨É­¨ÌD8™Å”R’IÊʲ–Ìà©ALùa§—ðžu‰qÉ@1¶!1ŸI‰6¡ÂºÁ '‹¶ÙisÅàK‚ûã2‹v|eã;ö|(ù0sçzvþW,9ºÖØ£Q=Zo*ì`SÙ' ÈW:©i PÌ6Hì!2 ‚¨2å1Dü&F'8Éz9…šÕ£`Aw7­ß¡UÁÂN­“Þ›Õëãº72åažŠ^ôÛÊã(,‰Ðõ –JLÓ¥j‰éئ¯)q|ù«,+7;”5µ}øû°Yï–ËùU——oõÊù=%‘0‰» E— IÌ^ZÙR“Ü~ég‰}Ú„-›Ôd½ÄÔæ­ËåF ´§–, ðÏùš¨s¦¤Ñd™v‚õú‘?Kñ†‰º[©€n€PZ?•ÊM’QKãËʵÔîøÈs“e(Ú˜]@‰×÷UÄT±®ËåÅ€ífûü3€Û‚à°jÏœ¡7Æž—…q·?r¦^8±(3\œJ•â¬“(ùª)»¨@wÏaPº^ˆcdvåÀ™<êà¨QæŒ/­¯ ÑÀ–îá8éöç8gÔÌA7‡©8ó«NˆC#†¦%oÞyHHøÃÁÃd’µ¢l˜hXša³Cdè\¹YÃÎ wžü’ÉÝ‘z@÷l¿`J\’ÌHÞ¶œ_7[Œ¾[1@q ]íÐ0ÍÁs=ŒÃƒ8û…º*à)†o„ÝÞC¢–5@rîuÛ7 ©\ª=(¨.dêé÷‹·!ñxðĹ¿tm9Ñ*ÈZžÎèF¬ lLX(ŽY2µ’KmÎl˜®ýûïryjaá½P=U(xM\5$Ù,Ô‹WZ©¬žË¾É3N]0"aâË°½ˆõ{8‰-µX‘O_•?5Ê‚±F©Ägt<®/]–€…Að STC]ÞGÊiÜåsx¬ÍBü’¬Gu·H‘5vÅFù\ø €§KIEò¦Ãq_îâ`&ny€c<$;ŸÒ}›‡n Mj'᪬+âx(®Ììέæ9äÁ=Z½K$ýË`å(gúBNfb.8.¢pxb‹›-Œ °Zu*+uñÊ øTß“ÇC³ ‡6qfÆ—cMŒyL³ WjËÖ$¤ãáG=çiI¬ M\jþLÆgNÆÓL,ôDTQjJ$NÉÜéXöÂýD“!2BòŠ^dEµÅÀ’þÄÆ }AÏøsZ!•<·ê¡w‘%”Jë\µLhN†I³s%œÌ3bºƒ6Îh Q‚!ì'kઠYk8À¼·'zëâ´Ñµ{mûðÇ^£[ËY™tו¼Kx^L FÌqf,iʶ>š‰Á“¨J8‰Ç|ZøÃt°€2ÿÙs¿dÞÿ0Âh,èm åŽE„ÁûF×›xc‡öƒsqL8ˤ$ň+%·ÆÌŸ$Ø”äýðüô«²Ync5f»[%zh¼ïuê6æ>ëJ\*(@c%© }Äû Æ¡öH!? ¶¸ªY®¯'WÒýÏÑìGzØ^‚¤ 5ûnmõÓ¹>ÿÙ«DE Èð­§"˜/1…Jz^5ý—N²ÒZI¯(ä /5×_çëëYYËdž u«ôu¸÷õ ŒáRDP2RÜXF0[žÖ±‹—WÚzÌåJ‚ ì<•¹iü’^mA›¨‘™à”>Ò!šXçª”É êÇÇ´‚ì£7õfKÌ]¦&½Äq‹A¾bÔãúW…cJøQ̤GG :÷dÈp2Ú¡®¦MœõD0ȇ Z)H’(øÿŠÀeýG$.©øKÞz˜¼õ' ?K¦ä¿_ô‘|ôÁÂÙfžÈ#lçDôͨäÿíhŸ ìÿ„•ñpî†áŸ`÷âùólû¿­íg»/¶Ùþo{sóù&Åyöâ¯ø/ÿ‘ŸÇ_Y—Þt#[õ(B#d²µA:ÀHÎÔŸzæCdä:·F7±µßÖ·ßnc°Íë5ðD«ë_E·hYö#Ò…bÅjNûµB¼U#g2;XÃòÕ­­êæÎÚóÒ‘‚bÏà_ 0ûPÓ ®fòæE¨ÏÚaB˜Çy‘ˆŸ°ù”‹·³2ÃpëÂ:ArÎ O½¾;Å µS †#rmX!o û–ë‘•ÓyÞ3Ù„€W±ü`”œ»PÌZ&ËÀ±Å5‰r؈PܺŠdF4Ã6+‘t²÷Òt<(hپ葅£4„ܧ“fµ%½/VÍÆh¼cBóÀ{´.{l5: ¶zõÃæi³÷#Ú7¾nöZn×zÝîXu NA½æÑÅi½c_tÎÛÝÈg]ו˜9¸½¢Ù!Ó¶=”yÌš›©Û·ïz7¤Ï'ÃÊ¥s0”Ý5·hÂ}ŠíG˜B˵¾EÑlocãöö¶6œÎk~0Ü3ˆpãw¦Né–ÑšQQ¥R4¿éíúc¢Œ#Y ·GM0;Ü(=ò6E¶;gÓZ‹/q-:ŒIW›ú<ò±T…–ZÞI“2 "wA²¤8W}¡AРF±î\̈È \p$ ÑAy´o(<»ÊŒwŠVwÒ2•×Z(B¤½À€?WK±¯8ÑŸÞ<+–y"ÚÀK<Ž¨*ãQÁèÏ¡…C?°}¼7&³|Q~±Ô!nŒQ“ëêGÁ2Ðf.Fò˜—­K“?p d¸µ½ =ŒµãL§ÎH<¼u/7¾ŸÈ­Ò‹öƒË±iÏÆЫý«}Ý]¼³u眯hBԀϜ¨?rÉ¢ñ;®Pþ.Úz…²&îÁÏnä[Å'›Eëw ¯ù«®µVjë•ÊÚÏ…Â<„3ÎAñ§Â~سžlZ8žÔÇB¡=fsiÁ«rp9S‚©ÿô󓉻†“Ì9€ÃB›¼„ÿ™bʨê¨bU«#wVé‰ÚµÊ€—edZ+|ÎÆ(5j‰/\6„­¤Ï«Y$ê9Tb$˜Ü­vAr÷}ºw$æõ>‡Í1jÇxvP,ô‚{¦Ak1o×솰»„Ht“ ÎFþ*pEZ‚O[ÕadmZûÖÀ/ˆ,lO¶ IìÁü.¾®ã§ÈRV b]¨y)0 渿/€Hz7©zâeºÑ66:¢G©š´âŠÉj›Û=¶º™9';¸d&a„#ï*ÚçÜlª²U~ô˜ {Âh¾ƒfÈ°nk=“›*½žêÑÖ½7½à@¶üdë ¤h½úf[•ÆoI8 ¾:ýê ½ZLg±Ä%V0| 0R çèÊ­rƒ…+„¾À™Ykü` :±mm=G:9:²òØa±(mðÙÄYz™2‹®aš@Í)1®Ä*ª¡šÕ#±I°5:ÄæÄ’UVÌ߀°¬lSBÜ?AîõÉ!7ïP„žînD^™ Ö‘r(®ÊKwìßVÄUa©ß)?—支fóÅ ìÎä‰Ãª€î¹ÂFøž~Še½Ÿ±4­šê™²%õd Ÿì[ŸÈfà7­(ÈëÇí3. ˆ›yò¤*^’Çm¢_8ZZÖõ«Ož,®ˆè¦%ýÎ!íùž ô¹q­OÑð]Rh}k j¡ÏIƒxÕÙÇ‹*¦3X¢{äLNÁ`>™Ü`ß6è#μ˜ëƒâz„‘Iøƒ/?îX|üxCÑ×Så‰X#xLM¥RŽy(ŠwûÐKµ°_xD{-ö·±cúVÿå·VÿÛoyÛzÄ:²'}« ÿû©õËVL@$ßà‰‡>"®«÷Ö/ªm \yø91þ•¼ø®h ªhXwTäÔ·%[„¥ŠypD^á2úJe½œì"†Þ­ÓKóÀÀ=ÂB¹$Á¬ýøš×0C/|8)̉¼ðüÎÀ¥ÛÝ;Ž§8évÑj·gÒ1”†#çWïïS¿_ æÑ·ÜÁœâST7_V·wʸQ•x!]Y5'ŠP™AÍåÏÀ9Æj}‚¿÷d¢C’ñ1íZ­úYÃ>«½i¶Èh ÕIbÍÿþ»e–œO¯§þíTÔï4Nõ®V?È«/Kšõ9×k\=LTë‹’fu5®“×¼,)ëó2*>ùM‡þ©ˆ«çÓ ür2þÛX/@‚iç ’FÚ#AƒBD'c³™×¿¶†cïÄ^¨øNZ¢)“2ô,9ÁEéG§ÍãÔ …G.9Ö“$åÁÞf}÷]µÑ~­­`­b\?FbøúGfš‡‹#lÝ×¹¥y;¥Ü±Qn๾‰KÊ'T6tµž>V9 G¢×??1eFÌi´Ù‘s¸ *ý a­‰3ø`Åá¼÷H¬?\h( í ?à$xºCZ•Ï|8}—p ã:è4€)ØBXaµä òý´—˜qõ]Ðgü@P ÓI•{-7‚5¼·¾ÇDÁ_­Òô2”­E7R¹Jl‰èÌÐ)% õÛGJô±Åút¼'Õh>ƒM`ÏZ¯®W§nÝñÕzEûîøóh½‚õ´2}ÿêjN‚ñÃuÌV‚zÑ!a¨Üv|õ9«5ó¯Æék½‘u¶Rà íh¿F¦lH„¥E› Ÿ c‘Ú¬…aÃ;8¡Q\°Ù^zc43eï[4ÌÇ|è\¤Œ[)ªµ(¬$s„Ç„w"}ôwBWÔFyýùØ (ãJ@îºBAgÄ£y R°ð‰¹1\é,Gi&IC\œ¢­Â²ïGãƒ"ÿE¡ft[Ã@p°|l'芅G™Ùu8ŒWÚ‘_?õŒµð»õo–ó0XXŽvqÑ›òÏÈ2›ZdZ%¨N0q/9Ztò€¾VÜèd¡u£LªD8zæŽã"áhœYäR/’Qâ¹ äùØMÒ:’94£±‰GÉýQhr€pºÌ™1’#“ !¢Òhzìã,WÂàE *¸Y -ví«9r×Úêx_ÿÝ{ör÷÷ÉîËëߧá³íëßE뿇@¡ýßoœ;à¹Ì¥!šoÛ†NÙ60Éo­Tôè‘à¬ÕËzð…G|ro£:Í ç®FÏ é¤ç¯ÆQûõkàa1?)#œ.žRÌzÊ5¬ÃÆüŽ“FÓ¥gIú^”óÃ.Ã¥-Ä| ü ¡Ðö(¦ø¢×KÍuWšƒã“c÷ÒƒAà.-˜  Pعƒ`~uåRÚ!8Jc>èNyÚGsØy„=ª•l`áÃa|ìk{ãßbúÚÙѽ¶,u¯Ý` 2¹TÂh¢ŠúHd¹0) +H¿‡˜ïÜTgX‘4ÆÎW¨2DÙ£Šª»$½Ûa‹‡O8H9XêkIŒÊ·¬oMnx¿+ÍëƇªý±¶¾ñSm·cû]RH_ؽÏÕ³zëâuý¨wÑitª?4:­Æi•ƒ¸4['boÝã=@ÜÀ™•‚˜,LG~\#ZÁcª”ÝL¾Ìw¨§´ßÄüª>ùÍ?=ùMŒüðg]¥µ¾wèÁLÅNžÅº‘«+ eƒ‹×6/3yTõ’Ê'1ìp®i,O,ï…(¿z7|¨ iY?Üëk?îGÜ$–]d×{ƒUa†Xx)P˜ÛÙ¬¿wæ ¸3XªÁ¬¯ÀM¼`…¦áäöo€Îx6röÚÝ×[$Ó*´r×wj›¸(ç§X @¨Õº¿[Îíµµö_ ‘†e³-b·ØAYIªGÁÚÖ&púéù›º-™Ž?9j ñÇ©`‘ÿ⌅4ÝÖO¥ÚúOe© ÷ƒÚú“Ÿ¶6fx¶Q½‰%6³½˜‘ow¬ÒöÖæîN¹Ï«ÿ?nïâí»÷?þsÍZs.û÷j8ò~¹O¦þìßAÍonïîÅý%|<7Þ7{ÝLˆÈ¢¸á‰‚ þÃÙ<ðü9šBO«°åø¬îFn]ãý‘®LžÀ™€oÉÖ¬M±oª ¹ƒÖqÚ‚ù§õÛÐnõ¤¢„qÁ¥ã†Ì.šMtîóî,8ûqòU‡Eiaéo·»Í÷ m_ò¾ò= ±"-%ú§:Ó¡kª6-Ž5à3Ÿí `»àY6–Nš ¡ äð,}î9ÙŒ¿3I4\¡ÄãnšÂqnmœ{Ï7÷ž•ª8ó·Þt=«=7+S‹õ½‹Vó½Í'^ûí± ƒ'ÏX¸ºov’ÂχºóÁ|hû?tÃ+‰A”0ÍS°Î&ý`6z¬ ÖHÃjw7ž}»©Cðž½Ø¬z—’e]¶HÖúuãí™^'Tç×›‰ï¦ÛØÙÜÌ’©•^&$;8”tšÝ£õ½­Ú‡Í­íPõw|xa߻Ӟª &U¤ªi•‹,‘ƒÉ:ÁòÃ=zlw÷@%ö¸´ ¦ÛÙþ~skïM³zñ~ãìüë+èv^nÂpÇäh6s¶j[ÕœHáÜçw“ÙÌ„+.4owëèY³›þÞ=;·ªò1-\çÚuÿ~;ƒãõæ³Úí̹º¬9Wµ‰7¶J 'òuͪ_»e:&J»@€Fòd«yÚ¨Å÷CÅŸK|ûÁ7(¦¦¯‹œ(R— bj¹óUùó‚TGd!Åj%t$`WhT{@ü¢œ$ø› ±ÔŽ;Ýïwq ×w´Jwc2E…PÕë«Ó»Ýœj¼Êq}o¯ï½@\«W^è…ò¹®‹ó«6Þp>Ýy#Ú‚³Í^G#güEšX×›À}ÒÌü±»žß2ÔúÃ-{/wáÜZŸ~à\¼WÃã;wšx³½—»¸}8ôv¾„…p æØøÄÈrÔŽÝ‹kŠØp1¾ñb«+ý¦ CX‘JÇ2¶¼(wwPó!#¤Ô¤®>6kÞà}³ŠQFzDÛ>=ßݱm Pè[[ÖØ»véJ‹ÕXõ‡]ŽByMÑø²Av+d>ñÁJÞ!u`­¥.‹×¬úm5Þ±Òׄc¾m;“ÁîÎÚ>/–f×1¼Ù# ‰gk| ¶V¶Hÿ¨t„©DºK´µ²8ik ¸Úm.÷J°±xfî^îBù"¿EELŠIR–ú„4ó%WÊ®ä䆚@Ø‚pU¡%ùXa –qëPPe[ïýJêZ‚¸ 'ú7‡eûC÷ΙÓH¸Œ2GR`#p¨Ob>ß Û!º@#réò˜Y $ ;µ¼…üìK FSòc®KúºêõÏñÙ¾ ÒŸ®ÿÞÝÉÒØÈ[ë¤RæÎÌ™‚ n‚˜:Ǽ³âÄ¡4Û¦(#áçÚVíYõ§kcŸOýpéÀ«vÖ¨Ÿ­§÷2äÅü ŠàÞ ›©Ü”²3¶À.lýÛÚp£þÆÄ ÅŠñQPzò¼²UyVþ´fîýp¸ !Å%Q((Þ‘á‘Ùà³xêä´is†#.Kù`Ù8•ª©CÕJ >§O·! ÎÃÑ,l/gîÝ*çےЋælõF²^«ÇÌ|ìEÑØØ°¤ÙÀV^žÐ¥¨€"®1n¼ ¡M0Þ‰ÜG”½¤}q{ˆ©‹ªE'ÂÅñ6I~q‹+ÏÊ‘á"áÄ:4Qý"Äœ²èœæžG>8»…dÕnqXÐôÅ*¢2}@„—Ã|šo¹jŠ ª¢U®¡I2}Ŧ^³í³¬Ÿh¸Økw‹ÖÀ…QºäWÁïÔè‘1šb4`wDì_9pè›â¹º“Q%À&Å%[…r ´’ôe²<¶œøüàÂq á A\ŒcÊxÜËXÆô¾Š–U°ÜzºÅõ?¥µõ+g 4j¶?ÔZŒþ‘ö0DD¢5ùHoK>ËjŠÞ­ÐÔÈÀ¦`4%éMÉgYMÑ»U°h¢Ïl t|ï±eP|ùF¢f ï³ÙØ­Š·‹áˆ#x(y:4>­ŸAQ£OÞ,$µ eðƒcÞNíYV½‹Ó^§ù>³æ| ‡Ô%²øÛú{ c]rãÜ­ c{s{sïè”{ó´½ó,þ.öÇÞ ¤-Ö0 g6ªÂ£»e4>#-ÃÞÅYó¼K.ààýpÁA\Bþëê¿ûÎ"ƒ4e¦Dçþl Ûü‹cƒ‡¶ÿ~môÊ’)lDÌ º:‰|º—Yß­‚ojQða'ö+¨© ¬uø|óá#:k s´¸(ÃeKVÛ7ªíS56ZÓìã¬ÒÈ#1 '²JˆšÆa9Q/<'ñ·eÜòyV©HôA¿X1óuˆz ÎAÝú°õ±,ÎØ% ô(³/ üÛÎÎRð7ÁÎg‚lçYÍŠ¤õŸöfY»°hVhVü>¥ê¾ýT sÁÄñHÇö‚ß|ƒ5é´¢\ÄR‚º–’ü©ôa³úíÇõŸÊh¼€÷o? 8l(`c݃Ÿ¦¸,dÅfÞZyá³o}Ò¹€†ŽÅ í è:€óÆÞ9ò¯³ú{Ûd´’­MD¹*=˜8w9`Pz~¶w~ú²š”=ÊÐBG-û Ӵʵޠrð~ ¬ã~YWm€Àب²Zµa Æôv’£÷ï÷^è¬÷%muT³7¿{‘Q PìkǬ£ðš¡ÿµàTÓy¶ Vbw¨¿õ¼vko0œß)ýæñ tXDaE N”çWâÊÍ/±% ÕÆt©wN=û°Ùªw~´›­^£óº~Ôøt‡õ`Ü8&w|uÇà…]"ü,«{‡­iÊŠ‘ƒa¦×ˆ%#ƒg”¾ì‡ÙHÓA•”Wƒ÷üån~+IýíÙË—ë{Çþx§Aã8{ò°Ç·g% ø]!0¢Iî8r,¨%Ò„¡®J^ï,Åó›{>,z‘|¯ßfô:’µ²Z€:;ψSÒ¯=’nDͬæ¬o±|7F:sSèl&åâœáЫz þ¬¤ˆ&5ß‹Ÿ½zóý÷{¶¶?Ö¶ö¶ËtF‚GÖvm»¶…ÇMþ²_à(Õémœá#©c㌴Ö —OXÒùÁz7œuò¥5‚£6ÝO¢¹ˆ0qGSqî‰mdMêuŸ׊äöiµµë/wq{I}¯èSB·ëìîh¥iEWï,Å<ü®˜a骫æáàô­ÆaD¡ŸÕÕ‡,’´.¬å¬¥\Í¿ƒ§€–:y`··éfºM:ÏK?|¶ýœ{/Äà !&ýY⛜<[Y%‘f‹¤4 è &êþÕ%à-Š%ÔØ<ú QÜ1Û¦ýÉžõKezE#*‘óèÑl…¥¢~_ÃT÷¼È¨ð&Â]AêÉU~Ž­xe(±]­ ëï…Œn [òöˆñ¿ó@ügß1ïÑRÒ\x]Ðñ‡ç»/>z‘nЪy¬_Cè‡U=Bß3¥²ª]ÍôŒ¥¿­+5¡ðœ²e‘…æ Ôà9Q@E¿ÅM~Rþ(Öyû]£³–‹¬C:x£±ˆè¹ qj…ŽÃñl¶x}r‘êé¿û8Cµ rkè|cýŽ“‹Šdõõž6Ðg0P†pƒÅß'›t…Ë!­¸¸5f΂‡]N‚ØRÿþ.ðžÔ›l™Žæ;YÖ3ë›ÜX˜2×G›p²÷Nµ2¦Áº b³¥6óogÀN~y¬?¹œaOµCÍ£–AØ·»Y»z«Â¬'pv|þ~cûûÍͽÃZ»Ö­¥´+T-c—ÿ`n|x¶óöIh†º·UK)fé={4ƒ_Mé2`mçÀJ͘¬»ûâ%Vs^½£s~ñžÀJ1µ›‡ò:&Û©+VÝS«Ï¶¾· ªxsÎë”UÊÊMžV^+|(Šc‰¨23ws±݈ÜÉÕ #ß `râ¹-Ãpüœ*Þ="®$iâvC‚`·ûÒ‹Âllˆ²z¯›B"ÏìÀžùŸo?++ÙBd ñ,6Ë?¯Û¨)Ú²7µ*/SU¶²ªlÅUžm—óV‘Ve›Zy¤õ[Cì7€DhF¶k›S¶Ä×»;é×·ñëµµôë"¯öÇÑ­µµYÛ¦®H ßß°‹¸~þM@⻧b‚rEšáÅâ Ê3"…M+¨Û¾è5L1'À¾AŽ ÚS8mà !õÄŠ3¤ßߨ æ jRQYt¢Q!ÒaPè¤ô–*ŠH‘ºŸ¸šW²¨–FéPKŽž\²¬Tˆe2šy“ìö,”¬’¢Í²ð-ßÏ®°•¨°µ¸ÜÞrœ=F¼°¬H}f ´ëíÅ s±gÛÉbÓD1‘°=Y,QêSü…¤¤iý*o¤låA,€ª&3³)Ô’4«• Lq‰sL$ÒÒp2b†\œšXLJò‹ÿ(PÔ cimjFÄB"—(®Ð˜Š“œ…Zp²n~£Ùün]dN0Â?Lz¼Šø-"ìFÌ`žmSq2—µ(0@ªÀg™ %œ²ì‰Áž°Ê›sŠ¥»ÃMý‰ ìÇ÷ 퉡߷jFøLYîàU [[µíg9pŠèéq‘½bŒ†§tYÂ3R˜ ýn­nu#mnÈC’ëš«ôö`¨ªŒ×yF8’¬dçñ :Ÿ2Žô_H b톲ÜVŸm>ß\gCнÅÖ`‹oz27ÜV Ô¾ò"Hñÿ…ìÿ‘ÊcÊÞþ3à†ëÒí;sÁœ›]Øò쳣ݗ?XnøSן‡ã{©y Ë(˜s 1sÇ€u `ˆgJaÛ÷ Ü"ªsÜohyľŸ¥[„BI@ mª,n¤¾4±…ýF|j…-Ì0À½u· ¾š!µ§=Âv¢ÛKûµ,¬"4·ô‡6$ ‰j*u, À|¤HV`D1yES2Þ‚V¿wÊÔÀÐÑ£•î‡rº”q*z§´sÖËï?¼øö£þ"e§qjUu€fµÍÌjëß~ÿýúÞÙycÓ—ÌëpüÛÔŸeÀ™ÌÜäÙ~4ÃáHÇG4d˜‰‘¨gãðë$˜—˜Œ¦S5HªU0Žbì §caðóшO´Ø7ZÚš\§n–O+»fhÓ_ß;õ"²áÈ0»ŸUÇøÒ¬w´µ¾wäOoÜ;¾¨Œöékü‹Äf[U~Ÿžä£íå ¶ò0VÈ}ÈnW˜3sì¶Óï³XÄ8èƒÄb´†K’ߘ/’Ø8z¶³¼/X&׳ü={¹´—´—ùÐVèšÑ³ëÔ\ÿ±zv¾gÌøýdVíÎ=Œ—qsl8rýT£=þÉFíýÆZôõê??²Ì£üE­ýTx¤7ˆPkë?•àŸÊx…¾ßB©û|o²|_² È cëuÍaEßn~1¼õž5LàÒUoarý‡Úè¾Ý2Ûo¶¾ÄÈÛë¨ÝÝ˜Ì €<½1ú?ûÜ&^?Ûü°¹õ1áVÆ«áõ 剢½€^¼¾ø'/èZ3Oþ¸¢„ Û­;ûƒ`MDl°ô,l¬àdiIóha”¢ÿSõjþ‹…ójüúÿ)þ “(žo¦0»S3qû?_¬U…l×üˆ£Íÿ°{¼ñ þ ‡ùHqñõ½zØw§ƒŸ¬ÆäÒEeþÆ_¦Yyº·Äš;½®5eZi« KeÁÈ•2V‡öÏÉ€"K N8LÅo‰²ŸâxFè £ÌÚÙEõ M§¡_+Ä•)a\˜xËLcÔ‹ÿ£ðÓfõìð?ž¼k¶–L~ÿ~xë¥üKÏš­“w»;KêN¼éðvw'³ò*UŸm§ªÂ2XVD¶ÔPoÙ±øÙ¶4PQœYœÜC«•‹ìêŒÖæÄ|r½Ð3»íœ/×,cPÂo[’’¨©h¨MQ ÙûÄþÔʉ‘ý(Ph¼>Ð/ÞóºÓ¹7u±2†!lœíîôòˆzÅšum]æt?ËÏvžÖ%ÝÁ¿}NÌ+õøeæc´ìVF$™r —»¦ï¹ª.ðUÇKxåCGνóÉŸé®ßŒ@H ÙÝlìaÎuºœnu»¶»DùWV½÷MϺ€^‹üÄÃüñZãHOþá¥ðr±œ«ÌS<…¸jÌ’¡Œ~ýabb$}e1©YƒV q¬½ìš;Ët€MWÿ£Ž…ë{'­ e;)3ið„‹FÎDb ºò¡º¬þ &ˆPýzòý´¬[• Q1£W±ÏºO*£qºOè&Ùc .]F’[¶a›ÝáFã §ÿúð¯”éBˆWtþIêƒSýõãÚÏØô$2D¤3ýΗo?IÂvÐx¨‘bá®$ŸpäºÌž`ö¥kÀ3þąþHK…Ko„Ý⥭øÆ¿PM‘:6¹‹N"lÓwÖZm@)T„HçùÆÛçeʽftXœÅŽevËyevE¡ó£:–Ê(DÁ´R/––j¼ÝÍí”VæE^§v_Ä…^®—s ½Ô$*ÿò—ÁcÅWgwãDnƒ\¡µÈ±eÅq(ǃZè׶´ð O¾Ç+ñM¡ˆ³(žpq8ãÂBs+ßÐp•™úñ¼£YXÐw/¿ùb@RνI|CUïœÙúasŞ؊Â3®nÜI>hJyiöêü¨k¿}}¾Z\ÑdŸDå´Í÷j½rK/m¾zÝÑUâÞMŸ¤›åÝ/2á}ØäV€äÜyá207϶¿¤«àæËŒläÞ9Cúe€Ñ³l0‹€8_j—™<Û¾L€!~!Hè^§ó%|ñg^Ãb~²+ ‘?'{˜ûÂ'#Å“ÏÛ©m®aò±ù0ã™xTx½9ÈlŒW|F›‡Ùmf´y˜nó0§MÕ"¾Lù¦}~äz·&ã ÜŸüß?Q”‘;¼AT÷„ô<›>ô{CA$ÚJ^%hζ®W¡3?Ð ô+~!ž9ƒÀMƒ2µ] ëãàt¢§[ÂYæÊö+ƒM5@>¶N}ÿZÚXä!eB1£ ê}øŠÜë{k¦ô— €þóÜ€€nU¯¶¥dx^±.b*Ék½Ì®KÉ®þR/Ž÷î‹Š¯ÇY\èÂ=¿lZå5›õ³ð+Nu+¢xÖÏ…°býݱ» Úér1œPVƒá¬ báøVËWŒ/‚;BÍàYháèKš%Åazò¥vÚÈØY_Գʠßü BsòE:t¹ÓÐYÿ‚Òñ­æûYt··#™|±vj›KúŠIk$LA@ZUQD‰§$-× Æ^œg—“ŸLÜÅ…ùŒ³BŠ¼S8è ÝÅË¢øó÷!;7@9ù¾¦{¡…î¿çî4Êrœ¥ñh!éÎÎÑ€†t1õî(÷#‡Dõ¯®Â‘ï“z =ÚUƶå¦ -Ìä F€ÕE£¢%Ya„É_¿=ògPPÓË1-—‡¥¢0Âû1y|-;aÈrY'”û)špl×´kBñì†îü˜~¾ψž´0Ô‚‡BËÜÿ ÚúñòëÆI8ðÃÁ/ÃY×ù6XöNXŸÅwĪ‹/¯é²÷ìü kd¥+`Ëahlº/»Nzj‰—ùaI²K’ÖO¦—`ÞŠ1k$÷Ï÷È'f8ïἨÝU0 ̱5üÒu µ[S‘1µ‹Ï÷R /þ댃^ã8™ë;/w×Ël·bêÄD¡š¶Ý~ø—õqÝâß"äýŠÃ^áýe ¶8ÃÚ+K£ilu|OîsÕi?gšgO~ã^}ÒT˜‹Z`÷dlFì3 šz¾¬)}òã¹_Ϙd¤°/9ðTZGΖ£ßŸwê]õ@›àÚ³ü)F8ÿ­Óüè‡MõªÍ"”§ÿ`cæyVÔŸÁÚÍ‹“¹Êðæ³6>v•‚*Ásàfîlj  g°]Áºr¦ªf±šfNVì6T%YÁ“¶h ¢Ï?ù¤òwÏ’¡±säo½GšœNùJÕË´PrÞhõšgÌiE58‰Caëç#8kçN4²Þœ[p‡ us4sðÀ½A7ƒÅcŠ¡Âw£tjgµC'Ññïýþ™ãkGî4œ‡µ“öÛWº;§v²ñ˜XVë{¯{ïY^zQ¢OÜÀ¬7î­ íŽðÏßñÖmâ×nTƒcÅ«š´\ä´ÁÊUÚc¿êK7ºÅôw(6FóÐ î÷½Uü2I¸w‰’ÙýÅÿÌ.†®3½ú{x;è×DMìVM—¯@¤cý[¥n0Ïù¸v@¿ÿž3MþM:1ÏA'q‚ˆìp}¯¾qñ>'lðÒœS÷6\ßk5Þu«qžmÅùÓû*–ñÃDn•Š ÈüÖ%½H ÌÎNìŽñcWz¿tÖõD,º¯á€O+S·¯…ùˆ»Ïóø‹.:.¤á¡{èßíºq$Cü¬¢õÁ–ˆËŠ´ñg@Ç×C·bŸQJÄZ‚Ç^ºðr‚]8.lÞã!ÿôÇþtA<£YmÀ°¨ :œZ5Ž”ž<×æ@}ãx×s –¾<îëd^3Å ³Ís3jvßWwöºçNÕ$øðn‡Éd>sƒePžç@yþ (»9PvåE”‚ò2ÊˇAéä V‡C2 lþ#gúƒûü ä(±Ì' RÚöëA àÖ›æ9øÄIŸ~ÿÝJ¾ô¹Ð|QXj&ª¢Ý¦Ê¾®¹Q'[H†Á#h2‚³1®bÂ-Q8ïTÇ®µµi%’ó<<«Ï£Œ”>ôã!9}­ÉÉëƒU–äöÑó²ë9‚ãX¾Õ 5p劙׈ÐUß弉¡ªâˆº g;`LÅc«NIÝ;·?'¡¨ßGn <›"d}[±èr× G°§‰”ç 0¡²SæÓp"Žà€Õ­ÇA–³ˆÚY˜P™`R\aʪ4Ý¡ìB‘ïÚeÕ§÷É8µ¸ÉÞ¼€ÍIV;˜^¼Ä‹ÇÚâtÅô°ŒŠÓÀý÷Ü (ÔŸLGÂatdý8Á/§¢òDö*Œ7"’AÖ;g*»<⦌q×q¡sPèF ¤k^˜×§ùÓnäÏ;$IŸ$ý»:õ§x“?O ç°»09h'ÛË_TCÏÀ-Ce|ÜÝXÏôÏÞ ÷˜Õe#:;ÓoÕ©¤(o‚Šryöa<˜shÑÆzÒîƒÙ&„³WÍ"Š|,rÙÁŽ˜ óã'¤Ï/î¸2$> Ó=_¥lŒÖÅ3m]dÜS7b›ýDFdiQ4f)Î-I\u«[fÚÓÁl+VóÀć[›©jVãý‚JîÔMPË]h…ZÛÞLæ‡ÓÔ#L8±£?3᣽vh;Ñ¡÷?œV·2@=Ïuw=εž_EGIºZ³×ͯâEɬ¬&õáïÅ{ó€êzøo¾”ÓuÛëñýJ–4*}5¾€ÿXJ9ñö¬›é£•¯eZ—µ.Í^ãìÆ7“ÐÒRÒe¤,Eþ´9…ÞÊB2£N¢Œî[»¾÷¾Áé(€½MîwîÔË2 ¯ï—Ø-áí5ÊFòÏfăÚ:ZÞd´ –7ƒe2ªÖ;ËM‹œ YUœ`ßžq4Á•ÊÕ“Yèƒ4óê›më»ïÐþÉæj-…Éçtrò¬BD¦°x3`ÄcLý6ñAÎöCO"o¼Ò™Ì*dxå€ 7G…Rˆæǃ€AH½7Í®uVï5:Íú©ŸÏ;í·ÍãƱUïÂ׊õ®Ù{cÕ»íÓ‹^ãôG«Õ¶ÞÕ;z«÷£ÕxÞit»c„ÔîXͳóÓfã[lýh]Ï€õžõcû¢cµßµ0å²ås7˜x!É°ý£%ô~8SqÎÅC1rg÷lG»2¼ž`]Êc;ÿlà AR[6Ë Î¥ƒ.&ª¯H ÜÈ¡lƒÐ&@¨j¶Ì~@«$ÿÝ ±kÀ¾(( Qžw9ÜXB¤÷Ð/Ñç [±-›ßÅIè ä­Cs¬ÚA­[øœÃî+:`H8 BœÞ²(¢!l û6~¬Šø6öt=«·.ê§öÛãÃ2Š”ëVWp#Ë¿üÅíDJôþsW@ rôã˜Læ¤&,#Bo Z³(4±ˆœL]ÜàÊéªî ¤gèÐJ¾cÁS7Oæ¨òD-IÍñÎ)AÅý‹ eÞgŸC‘Ãáaœ1)F¢ÀÁtTÌ…ûGäNÙð•1÷ndÙ/ˆîKe¤yhMÐ)çgîÛûðÊ…Æ·èÔ¿®YŸùƒÓeY¤¼V}˜EY3L@`áÓúy“þôzØ›OOÛG\aŸÁü;¡Y°åfR á€PÆ—åÆæ(Ò[º¤ —àe_Ÿ´†dW$\ØüP›i D}˜ÅðÕxåÙRà /î´Xù¢¬äX¶ð8¦ˆéB`ò<ºòGõ屄wFhúÛ_?ÿ~”ü»OÿOý–ÊÛ[»»»Ïò~úKþûÿ‡ü—ómu(Á¼qoÇnUÏasCà/b¦÷µ¿dÉ¿dI%Ñ:Q“ÉLêÚ£±7ñ¢Ð|Åœ€ó\‚ J!`κ£¯ãRÞ$9ªÉqQdwØí€|ê0ùvïM§Q?îÕ8—f¦%Q7–x±1ÌÊ¥Çká sÅ»úÝ*ÉWºËÇiØQ$À¦íFë­ýºyÚ(£ÞA †JÛ§zË®·Ží3ø/-Q7ëµµ…jêécY¬Õî6:o›&RDðÔ¼‘Ñuæió‡†1¶xFbõ³Ãf½UÖ¡_õ§cÍÄ'jÊÃŒç ÷F$.… Èc? 3ŠjHßÏ:„*EqÞxžÙÍS$5!a6[­F‹Ú½‘}Fò‘8¸öd¼¨kHé¶l‘&ú¼û¬l€ÿnPçŒ=3€‹ç6pÜ;;Êj‚ÆAg€×À>øâugÔ'…re!œã-¨}ÍñúÁ[éC´ƒåì‘?FE´Rƒ±?H\Эp>Cs ™T AÅbŸÀ¯XÆ„âãÑRÿÈ>m×›­n÷k¹ùncˆWÊìõG9sHӺÉ; …ŽÈOcõ: k>£®;‚tøø@Äp<{}OxNˆÎysap?u&^£VNp/šT{ A.Zh'Í.l) Ê7[v·WïA÷ë½z©Œ¯e‡mì¬4éõmìs©ŒÇ ðq»ÕËX^¹Ý×õÓnƒO!<ìcŠê0ŸN]4Æyƒ!#ZÒCœLºžÔ0è±ñb¨Ö<"Tt|§y¯=àL¹êHpS+¸Ñ8†³0ÄSû¸Ù­ž6ì£öE«´mAxó)²hܹFN@‡Èc8†H³vߟÃñûÀÚÜWà¡ÐëzÍÔçýȲqUZÛÇŸ`üÖoÖ¦õ ±OUxI‡Kß'|ÜËùpèM‡6©w¡ ­ÿh¿î4¹ÅF° àcçÞÆ8ü1Á-ž‹ìª™BZ³Ãú6ŠK VtÚû¼M»1"€ŸðzôüÀžùô1ÌDY^ÉôŠÕO›ÿlØí é „GñÎXþÆ6A9#g~ÒÅÒ-ý£þ¶n‹æ`¯h·b¿87ŽÃwáYíd•ÒšÔâ!Òéã^É$I–¹ýMû£ÀG ’IÒt‘B4\‹·9mPÇ8ä¿oe¾² «n¢¥|Øem38!Û룆}Ñ:«Ÿã䜵OOG=ÞÎß8hñ‡fÈØ…¼§YûŒ*Ôoã ðˆ«äªª7õÐ 5t‚KgˆÇ8ÚC0ÐIAd.?è»ö|:qfH ÃxçYκóëæ0p¨sŠ2¸MÊXŽü-^=o맆¤’[Êz.¦ø!ðÕ¡Ëò¹}ëS^NèGp°dþ(oJÒ·Ä´e†ÍÀ& ùKU =3òq–X(C¡íûûjZZ™…Núò>rC-ÁÝg:©ð5´Õ˜YðÓ—^cÔñù”‚‘k,^ <ÚoêÈÓqqü X½þÌ`Ò‚q°U ˜Ø`L¦å„š“ÚĽƒ#Š{—÷dTWF͈Ó{Cf³‰ý@œ"TÂâ7õ· D„º3TX‘‚÷J›_¨ðñ$@> h1KS­Í,?$¯Q$„S“[Â׬اó«qxæÖa«*±Hõ4 l‘ÉÖG)óObmyt]tá ›wÐËTk] ÞÌ¢{îÿ Pú#onM„TAÔ&s¯¬ê–õ½ø¶—µ¨ðzÕ™‘*sê _HÅq]õÝYD‚"@A>G8„¾€µc¶ Ë²¡E;®wÞ5[†íì¼ÓîÁ6IwÏåÄJÔ² ËÊ>Ú(<`åR™ŽIW‘\v$<>Ú €x¸ó–¶&V_Iœ@Vã)(vz"&8ž‰€ÌýÉ~Pªmðv¨’ÑðXP¦Î¥¨/Ì»nDÆŒCòJ’1q¸3ÀþûÁûˆ3ŒZã9H%¯\É"L¼ª—Ý‘ï[“9Èü—Þp=|èe5€B¹QÅŸAÞ†êh¼ ÁúºroIÙíMaÅ'¡š(²¸…eéÞ…-¨Fþv\´rµ:s–êÑ5†Ã{h¹'ÈîÕ¿ç°V!o:ã!@ŒF«DÜCh¹èK2'+ƒr-€úN.hI¡[p1æa¸Œ=º¢WKËY›Ho¡?q9ã¹–#ÞÅv´sœÌ1 äŽÑWŽ#C‡µŒª–A ›ã=lÉ£ï–g}›u§Þº8mtí^Û>ü±×è–zÍŸ´N›Ý^·ºU¶ªVã}¯Sç÷PïéÓ²`×ɦƒwšŠ$vxª ¬"TÏäF8BB!ÕˆøËÑÜ\õ!Ý“Ð<ÀÝÈfm•UŠ1àx:ZÿC>˜ƒD´`È9à24 ÍßaIÑi2Bt–¦;5ëáû#Ë]rq¹Òx//!ðzr‰‰ïÈlÁãìðW ½<ŠÓ*匂(^s©ô"‰«”— £´øÓà|‘ 9ߎÖÒ«6ÄÑØI1éUä1‘”é·$²¯8Ràæx ˆ\/5ûÅÞ…µ„|ˆºO8ÖbÒ3†ÄF8§øøê•õÌÄ-n öŠU·ÍªÀÓlºÜ1‡|HÊ.qdÊ$˜\:\¹§çsWÑê/‚O£„¡ss ÀÕ¬Mé©ÞÂð2ÓÄ-¹® [ÕýˆNáV=xúTF1»¹zŸê’ÛgµÆàK‘ªUάôô@ÿ†„CÜj/¿K.ºò KR±å×x°Cçû€é·‚TwùÎÔ‚]q*csûWJªeï®çšÂc[À¼`óÊ‹â 1Vò¥A$nrÖ%ÞQV’X ÌóÙV1¨xbérglÿʆ^ jôÍáéŠ`7’dJ‰Ê´2rVƒ Ö¬¸lr¡ÚHx³ŸÀîKW¯(Àn8e!ŠÛx•%öê+!èì@ôåc¢ªbц¬Wˆ…Æ_ ûþ…GQ ¾¡H¨7ó ‚ú€DT`æžá¯E1`‡¤‰þ5™Á¸ (‰H BêeyéÑƒ`@V™pLàPH3xŸ7ög³{‹nÝ, ;*¹t(Ö|÷¼Þ9"ÃœC8áZ*Øï × S`’#‘ø g€n`Ì0˜@ Bp¬Óvë„ÜB*P·ï âh«bšŠß?fÙOë™á¨ |Ñ8Bãå¸GÇ"µù_Þs7…X_Ho¡ßþíÈRœß[ÌYJÎå ŒÙ~籕´µP¦(‡Íûè´QïØÝæ? 6ï¼’´ÈíÓI¥:ì75Ϫ ”8‰kÀžïfÂnÞk‰ëjq§¯[?¨;X3m9òÞN};Ž›|7Þ€Û"j Ô5íoßÑ9 –æbíï‘()KРбö_åâµXF¹u×0h‡ðm”cPsWK¯ïd·GÞpdßR”º^ùºø3;ˆ¢ëïUÚ˺f:o@]Xã¨jó)œ´9}©®ËÉc½5í™Û‰lˆ¥I@L:Ç à–Ç »Sï5¬ç›šÞU–ÐÉjëßÌËuÝÛBûÄ­ o:uy_§4Nõî™ Ñ£öq£,Íî׳*—øU…硼¯{H¢–ë=V™ÛTf2ZºY, þ<Šêjù[„(–âáF‘Ÿ.÷I¹A»ƒ?9hF@µ®yK„qÖË B*âìp‰[üœœaÙ‘,J2T*¾ÂÈC Jà…‡«uo|Ôý€hJ$@ÙÊ>ij÷Qì3‡ÿltÚ¥ ?®²¾!š.S½ ñrÿªDßÊåX *!ð2ê—g°mÜÁš.•­£vû´Ñ±{oê-‹ p×4y‚•7Ù£!érï§X­s ó<¤‚¶¥µŸdÝ#¢y8VäxczT‘œÒºüÕ |cÓÖ«(òÞ Т¦¯«íÿÄùüÙ–À#h_¿‚áGíΕÉSrûð¦|?„Aæ”y–Λ¤±fÅ14€Áp>‘ÁK<Þ±/]¶I!QáC¨‹ýiÅ¡ÚÎbe"ÏÑ&Yû|ÙQ×½ŽÚdÇô+Uí¬FE«Ý³»GõV --iÞC†Ikû|)‹|V$ wúÑd(+vŬ‹…¢w^ÉócÌÝ_P†VlË›^¦ÝGïªë¾ Þjcê²GQ 0“ЂM@uò=!ÈeNH:®±ØÎðD TÉ«êæÓ¥þR‘±ÂNã7xϨ‰§ís çª5”$Ò‡úiÈÄ’é9ljó€r>¥7t¤O`Ú7¬TÆ5skq“Ê,›°{prªœã\’þTî}ŒêŽ±î*()ûþ€5ÿµLy ­ Å¸Ó‘âÚMÈ ±ü5Ò¨öÙkÜÛto=XÝèõG[>ï±À¹<®õkâªQ'“Æ 6{ËäË¡û¦}zlm‘ŸF¢ß¨{EDx‘˜ÑÍ,ç*ªµxjk¦;#¶‘·Üb§iòG®sƒ¦™1~aæ„ÑáX‡bjøà=Å«F`to&Ž%p¶)yL‘‰}ÆšÉk_–õ®Ä­Ìèr|m­ø³e›. ­õKq7„£èÀÃèa6|ÝÏ8:ÐJ$ÏbÂW÷ç#²A0M*d [.K$‹c×H\œ÷:¥@ z˜6KÀº.åE´Ñ¬rܱ_wÚgXîÒ«X¦ÔH”%ùF³èŒïk¼h-LOíÄ`82˜T‡%11Iînˆ%o$M¸C×>CfK\G6»h«ö®ÞAÏ2»~ ÃmwìVóÔ]ÙÜ&›¢^㘪•F³†Áqµmzd¼ÈÀwi¤Õý¤°Mw=ØÝN£‘ê\í±(`ć)ôÉœš¢Ëb©Í$À¤”؇ÉþfK—C $)Sˆ«+æ8„ãf÷ü´”@«èÊDHõ,"ãžL‡{ù ºnÍÐjZ´ñµ…eÂ^©¢& ¹q D$‰¹)—z%øgi„÷Údˆ7Æ<*”-$b% œõÇŸrZš¡aœ±Égø¤kͤ¼”œ”\2üÉp>Ï4J@Ú-9šÑ-•jÛfÆ’çÁ6E2’Êo9ì­2–JLh¦1!Á¹’¼gV¦ËÐÄ@#iÆ‚ŒdªxHÆ.Aäݵ”ÝQ ¯îÉxA]Ó¹ÔÙ#g6s§„´[´“¤Ûéÿ¢®ç*šÍ"[’¶¯<)ÏØ£|âpÂ/?D7(H]·Ì…'ÆÄ{m&Ö(æ$"ÂèÈ\S|ñ‰·ž!ÝÂÑ5#¨Q…§›Û§²…Z¥ÐCÝ(éf"ûc”Cq@ÊTMy;aÜ9Hoø]¼ðâQ—Û¸²[À»ûrí*YÓˆ¢‰3Ò4aT·’D9v8õ…þ|âNüàu*}W ’õŠí®Uòj@Nì7J«L"Þµ¸¢+Lý±DÂïÅÊ+ìZb…ÁY™N¨ËAÚ'á–¼[fî€1f GÎd\ø3‡Ÿß3öp‰øÌšŒ^&MA_œåU"c8æ.n ·Ë@G~䌗w:uHyš±ÙºúÇØÒÜ“q¾iÔÏí‹ný¤AwèÝ8NrGÒ‚ÍC$8-"¬T(“•ÛvW);o ÝÄë—µ•ŒaÊ6ö2¹î~a}ª`ozÃ%ö‰VrÌ<¤l~¯.b”0%JÊÚ³,ÍøÑäØIΡ¶‚ׂZÒ4Z‡ƒ(&ë3µØ+¹'ظpLºí©Ib«À1‰L‡¥Ñ“ÇñÑ©}Ú>úÜÝĹñk‰vEâàFˆØæó›64qv[À0mq& io¬³k>N‚N¼=XÈÄ\Pâmæ”ÀhhNÂÐ_¥,Z‹ü¢%'Gú±°´$ÜþØñ&rXqeá˜Ï&ƒÊ Š¯ÎÂÈë‡f‹Ö°Ž¼†‡%áNýùpDœGºd‰{7Z¸”ÐåóŠ]åKâ0Jþëò¡ÂðéS|Îß«¯$ñØW;Ù §}£`LZÑ$­˜UV›þ¸¼þÅ“W’³•BûÂùŒëOÉATï¢þÄ,Ë*bMSJ—fò ³ºe^œ×;À©§öY]øGÅ(wbÚ“-ë VÕÄO÷“JêÌŠlg„–yü8ãRÒ@mL¥YØ¥DPpòÙ´¾_ÝYv]±'Õ²õE«cÑâ¡ õ°>jÖj£WtÏ; ,p,•ÍàŠÙûôÊˤRX]è”fê á×x…å4AEŠ—ô oVÆâæFðà(î6xY[ß \î¿áG !æ[Jµ €$€ÄGZ!¸o ƒpΫ<0ËcÓI}*Wìê¼èà‘²^Ä€7äEkë¶ÚÛöy£uØ=¶/Ô{ÍN+Åñç2t[õ£SÃEW–*ËðdÖÀwÙ~ Í^8FkÀæáÌ¥l̓âŸÅh{´¨o3Hò†9¡m⃎À1€èÔo ¡Ë¦;ozº "©ní/”ÑÑ…ÀbRJNlr¶ñ™°ø"ÊR! @„zoŸ×{ohöKˆ”˜÷“P ¯¦´ä‡ŒøSF„E- 8*C’NÞyÓgÛðû¨Aߧþ-„ɨ ($iÖ$‰ÂGša¨Ì ‰‚6ß ù¬–ó.…-[jhÝã¼êÐ’X|Ï{ú&v6vú¬ ZûisM*¼+¡!S˜‹¥WÆ|o#¦_ݪ"Ó+€¢þ‹¾¬v$°ª 5Ä ïÑ…†‹ˆ .ÆÝÉI)2àðP¥S'ÖbN(¤‚”‚´uÚh%¬åÌ—°×圲5WSø˜>ÔÕ| ì¾î55ç&u)'WQ—¢$#y¬–4k9 Â2ÛÔ¬ PÈÁǯ¬dŽ4~ü^µvÈ]´Dx)¯ÕÖ +,q`íbðT5©i)-gò}&UµõÉ—{÷½R±6ì×À@@úF6þQÇ'ÊÄBÑàûöàˆ†\"TZ'V£Ód´Xº0²•´~ן¼ë4{•åDŽg]4´ô¢ûz$"‡4«(ªØ÷Ín¯Ù:YÖ Ü ›‡=”Ž:gõÓŠ‚?ê“‹ñ`ÃèG`àÀj¶ÞÖO›Ç2œ |¹h”BÜ>[CƜֹ ‰³³†Växc­‘ ˜E„Mwñ&„:Á6:‡u¾;°¶peu¤™”NOäþ†‚Š0Ì”ºÏÑ7À³< Ás«|!¯…è•dc)ÊCòHxp*eÊZ芦fÎÐ¥Kž2íl2BÆ-nÅð,‰»Z¨IߧKWÙ)‘51¾g3¨"ïû~¸ýh|_®%, âmYž!dmra¾8‡5ÒÀ{c»ùÚ>;«Ÿ‚Ÿê÷édd!áÕåì‘ Ð$ …Cà¯úFsRì?q×ruë4Ïâý×°-Õ²¸îFædõ¨ÁÖÃ9ÙèjŒJa(‚ô䘟b¿*̘¨‹€`)1Ô¼e/fŒ¸4&õ"®5ä†ZŸ¾J˜äÒE<µs +….è§ÃK ë¤e`þt \ íáX`ý$;‘5o²6k¯´:ăÐ.ú»¢P´obÞT«¨ÜÓP Qœ¨‰Uƒ5ìsúùtMCÊ‚?Å‘_R• úýt‘x)©  LÊ×R ûÎ4[ø\N=}Ž*Ÿ´*y?ÅË)ÈÚ*ñù0v*Ü®,Rm–3Ü!Õ]¯|½?pd‚âþž_cæÀø¸ÄÏ„¡Ásý ÙHIAX›$¡ÇqКVÏèÀ™¥¦ž¹ajŒwŽà^úoL˜-A”(AadJ3óêD;×­Ó+œmÔ8Z{â’Ð9³V71)±%ÙL±7S­F°ÈE4>£Ä]Ižʲ³hJðA Wµ£ÞÓÂGÞh…έú#·Yo?ö37'íñø’È$jKnÓ‡•Tÿfe6&úÍPtÓþd†1ØߊU™º,l½D0ôçk†,7{úT‰ÌJìéuß ¯A²ƒòÆ÷9“™Úo›W¤P!È‚ M®°1›¢=ö¦®böºÕR<¯S_t¯ R‘õ’Gj:@eÅ÷L„_‹ƒQ£Ò`%í@¦É ½x2dó¨~jwGc–.s1³£ÝÓD)p;FM­ƒÄÛìe²î@!ÂK¨L„ù² MÏ,]3±ÑH©¬+›—äVÀ€„Je¦…¦.'îǾ?Ã(å"œÔ9é²Ü àHØW¥âûè²âÇúz°'!§ùiZ¬m%íïkÔj*®”ú\õLN3&™'iÌNtS›ns8çþ±T/Y+Þ±ÉÕ$xa ›¦Ûâ¸âµtô0Œ~D®]­x ‹+k'„©oþÀa^7qÉ2»/1xl»M!})&`±lÐjÔú97®ÍaP%2cÙeÒã äŸ’9ÎíýÏG9¦âX rÜx]¿8íÙÝÞqû¢g¿>ÆÌ#™¯¾ÞN( ÛÝm“þÏêGí®ùÕ›­ãNN\§í©(4*uãŒ*_%YG¼´…‚4Œè8w9€ý¬âÚñ s@éâc˜[v±VjÚWZÕWcQ3Ì«Á~.7Ñ1PR(ÐÃY.T°¢Ò>VÞ¨Ýdzš„š±¶V¯{ô¦!œ¡ßµßÜr9Ílé°gŸa¦‹¡{èßÕ lE8%©ˆrf侊GÉbWcgêš2s€èÃñéiA÷QVÁ<i[hqºÁ³íÚ`<.š·¡Ì´ôaà^Z±x¢Ó¢#)‹)-‡Œû ƒýaXl´ŠW þøƵŠð"ÆÎ æÓ*{ «^¼i¶½@úÖèâÙ6Ωï N97ŠÐïh#0´XCU^×;çö‘5ãÍntøý:;pPáŠÙ¥ÄeTÓOfŒŸÒ:Ñx ( —Âz¹ôæ]ë¸bžu{øïE³Õ+—IJÛQ¥¾yGbJÂÍn¼\Wb…†åc )êÄÔ$Òã­oX¹³’­Év>™$•²ç‹iëjå­üÎQߤb¾œ¼ŒJÚè§Ñ•‚‘–E ì±,4‰;iõ—¸È©]RµÓù`tž¨²Y¾mtÛݹt †9ËÂj…‘8Ù#åí |è€ØÏ™~Íù–6xê°4ö®]¶?,×VSU‹Q›Y:EçëãÔ´×C.–S1zrÚP,.vIȆ¿Ü­ELÓ$ᜫ–„^ÙÐi®œî:k;ËD^x h%®Nˆ‹Z>¬ðu¯m³¡íå©p¤î:8ˆH²;£eSq ·iÌ·1çd­¸–Ó(N5¨ÁÆ£°§¯’‚Q±Úö¬ÂÞïmû]§Ý:ý>ÔÏϨôÛÜÝÝ-§c;0¤ïL xíj—\¯…µO­Z_‡þæØ>ÝnŃIÄyHòë³FÁ~ºaVÄSç’oQ)gÌ3TŸMs¾9O-ä&™x˜56Ó#l vz³˜iˆ‹Ò²‘àLæ-»÷ÐýÀ—ä]˶å÷ßÒÚ€.»iØÖÚæß}‡RMx Õ„æ˜S4'úÇU„qDÒz&s yÃÃ#™TcqXŠJ‰¹E·¦Y€9„©m6ˆ@è_màݸ7—TUËÓ-1$ &è^e9ŠR8J,´ôbSaáÄMV&EZÆíUf‘O¹O>­"’~¥ïšð}›d¾f¶år!ß1Kš[ò|ÌŸ2å‚TVdÇ‚ƒÇYŽmvd4W8ÖïuêGnR¤¤j§v4#ó²ùãRºNRÙ“*Aiº¤Ú> tká)?á*QsâŠ:‘­9—9F3ò3§¦uQ^æÕ‡’™X91¬Ù•Í0O)ÂÄÛÓ£¸8+ûR©”è Pù©ÐÃ……wx P1Õ™-´@ ЋÒÜbb 4Ö›ùÍð (n™«‚VDѸU¤Þi⼋Šr-Ò4Qeâ±ë¥bÈ™Âû˜õ7ÁžÕ”f–²M¾3£-SÛk;Ýf`_Ò—eZÙºbmí¦ ÕýŽÜ67“’÷÷bŠ:œÁu(ÞíY_ϨwøÝ‹ f±¤-ûÅѽðÛ~Fª9Ý#P“"D–h»ž{m"¦.kÖR•3YZ“¼¼©=¾Ä΋ð)ú¤ŽÑÍFEÕWV¸”.‡¶Ðöb™¦<¡éª« ÒÜ—X5«klþ~Šød Q¼àïÞ ã\rnOÌcä1lÁë§Í“ •œ–£ñÖOºˆ`-7b± ÊaüÛk8ì†ØõcÍÇC¯jú@F -UU eëwÑÄi£uÒ{cd™"÷ŠÀd³¥”ø~ŠÈìbO½˜ª9¬ ®Ô7öu%ªß†z`\ÛtY«×°ONÛ‡0õÚÌJmà~3öÂHkE>*ï?˜“Í1Á%…ÍØ_Öšò w³O›‡z§Ùè&­£N›­‹÷vâ*L 3A°—’QÑš¹ßÍ|MñR¢ »ùÛ‘IM.úN䲜>1€ [® ëHó–aAÅk,ºGÕ¹žµ qˆúXòÖsZ²Qˆü PçΛÌ't*d»¨7taÈ<Oðh5àþ™gà‰ÿn£Þ9zC¨;®÷êxKÔé•u}ÝŽ½éüÎ8‘æy¥EsÚjô»ÇÆÚvãôµm§OÝè2Øîø*äWÉkÐD”œó Ëùeqt´—Ý6HÅÍn’²ô´$ã9•É&ùZ††ÁØ^"a…Ì×4&úÝѥћ7çðÀÀY³nÚ|Qˆ¸!¬'7ÈnÛ|›jßÐtÈ­áKuN ,»ƒé 'u,ɬª„hxýBw·&Â3ŽÇê:'Nf‹I Ð–]±ÐzéÖy¡`Éhi›2nÈ„Êò™h GräÉ̶” ØæH"1.šþSg³@™}@Tçô¶ÿY oìÙz¯”µÛáK³&Žb!hZÈ<=§Pn-ö¡°¯g• º*ð¼áük¦¢Ò̱âÜ :¾2„h™Ë Y‘]‡-¥Û¾è$"¾ØöIëâ(fr©1Iic«¬ëoêÁO8!€"}åb“ gɉØb[svä%'C2Z—° ÊÄÏI…^·¸Ã ν›½¾‘Qa‰X´±q:¾±†Õ!)AÑ8Œ¢Zz¼úÄS¾3‰aӜŅzDÁ``(çÚ#î“ z¡ïÖª›÷"cýÉ»wöÛãCd›ªÂúÊ:‘ÃßKE´8Ì4‘&éYÄ ¡ŸÑ2hP{àÚF¬D÷Êj&mX˜ Ô{`fHO`fÙ¼’Ë•ó5œ‹D3R0A3îc‘ –ã% /ƒëÒfٴ؜ЊH+ú™YåŒ9î4Nš]\ gõfKÒJ'°2 Èòˆ;ÄQ‡¥˜•d“3R×_Ž ‹H³Æ³ô9ñW;e‚òH¹RŽ)éOíæÄ0Rz¤dõï,鉽ÍKËÁ»í¡Ï9‘.…Ëþ:ÔƒkxKÅÍZ8ŠØ¯"ñ®œVX­Œé³úûæÙÅÙçašΟ‹j½êw©¯‚l)µÿQd“Òø€“ªA§àL€0RN|‡ñm'®¿B’Hï´”Ú r&†¼¯éà7C·éÑLœö’Óš†My´Öæè’óÙž¸`$væ–0j­uŒPÊŽH+dž‡¾Çxzí:õI%yÿ\6íÙ–ÒæT::³ˆ™ ¦ÐqúÄZ*6OÕÆ•JÕ¥å„ã•~Îø*·£æ¶Õ;íZõÃ&ûmˆ2Õ?ˆÎ³1dt“Lµ¶h$B uÊûù!»e!®&ÎÌ4 =?êh‚ovóÔ>õû×ôùÐ÷Çö•3ÆÀ†øÛõ†á!šÇ㙟Ý:^û2Šú¡–5¾mt`ßó¯{s¥ ûq&6òeû|lÜbVv<ѳ‹).•~>Ío@üM@×T(³~ 5e¥,ËÜTÞ¼ÓvžsŒ5ϸú™N7Ê$A¢Ùn¥´+Y¾ ú4$tÇo¤ç#Ð'©ù0¬+üõѶHz¶Kya9 R’Ž£;ÇÄ QÓ<È<6Œÿ²bÎKÁ‡r€c2ebO#w<#“¶8nª¿è•dQN¬žÌ^ÄS{Ôn“‘•Ò†žr.ǘõb„«ù Õ9°tuŽs# ¤!}%í`f˜äšõàAV«mÚ|Ð㱧²ÄèxØt¦ëçŸN…Ò³wqë²eë–b’æ——>Ý+.°Ð9Òðìeͯü›$*…ÄȵQ0í“tK»ŒË ë•Èóãµ'Ä =žF½%cM¿nÃ;éa¹4úÊ*üK\hñæ’eÕ‚™e_Tž{¹y a„7=aG5 `¡Sß:ow›ïÉO¿¬Ñl¬[n²Á=Ú~Ùøh„&°îb[\f}™ç^ÂÉ…¢gÚùJOµ“1™ÿÔRŒl3je:•çÞ¡ÖÌSªdé©×Œ´å¼fîÀålßoôåå$ðñ‰5VÃñâä0½Ff‚ $ûå96>7ˆ.1™6Šål¤‹Ì¢W“(3Sqä)'B¶p? 9¹:Äé:8åF2-Gîì-ËÀ‘WÏXßsžÞ(¬=‹¼Â¥›{.ˆ¤ë¿Š)ð2óyX{…%B¹7™¸pƒ©œÆópħ˜ÕçxÅLj.øué‡î¢¬Fâ+³ "½ÉëÓú £Õ5í‹“7K1œ‘ƒd%~h`螉૜t%Ù£³Èãáo˜H¨ÄÛY—Óœó¹\¦ØD"æJ‚Š­ãòþ «ÆØuÝkþyE³+©«FTŒ¸A€Y×µD& aÕ¾ú© ÃKói„à„ ®"ÕDÆ•NwàÀ ÍŒE"’Áû 9(ëæÌTZçG* ½Ë½Ë²„Îrj—~ëÞô E>T äÌ”¦ù¢´G:_ÁÇé*r-é›Î@ÙdLG‚d˜Ï¤ØÔ@êX(v–ÿ*…hÇàäÑ!i³` 7i-.nÊêaˆVrqÊ•=E1F¤2³¥bn˜&£{$ܧm0UXhS^L]ΙP–-Ý䜺λÚHÑAwÑ7/ ÈoÊå°ú@ä§)¹µa­‚Š ePÓwÈ%àò>ëD.²¥TEâ<ºiÆý±‡” ¬kì±î4ÏÆÓ`Î]MŠ´³üf)+ÌÆ;D Mcï2€GaÖ°8ÁTÆ¥/:1¦â»$Cm%49âvíèørØ¡[y8Š */&„e½#Qÿòaks{çcs¡½”¸“n^œê8÷`{ÍæÑ1†+ê’_H©œ½ R;góqäaÊœžÿVßpÛÒѹ]?:‡]ܾÆÌ‹ÄõC3@¨GØËËKM(\¶6ô¯6?’ü^þ˜—%05Ìw '%ãñ¢ø%¶1aöQ‡=î¥Ãó¦üPüº¶Åè¸dp4Wù¬n¬¤õïYÄ ’—–=- ›ïÏ{êú6œ(º·æCX¯"½§J@²L骢&ªï¶êåÐÖEùו/ä?Þ³9yˆÑDÆ”Ë*ÁMrK0«åב:BEWïKŽˆýxx˜½² Ç„Px5©ñˆœ©hõh¬„’K˜DŽ!iê¥?d˜ÉáeWæ‘ó‡ŒÊb×HÕdŒ$«ÉܱÍÖi³Õ0'Ææ•v?W‚ªÌR¯4Jؤ.ÔIÚ%ù5&O•6>ŸÆJÚË•¸§z±á%B|©é˜¾ @*ìŒÌŸZ%táJ¤þL¼µŠ¶ëük…Å”ëuhsHÂ©Õ 5:vÇ(„³¨¦Ð5!q,p1ŸâvlæÒ‰l[ 2N0Eíôà˜S‰ä!‰ûÀúY󤞈mˆÎYB/:ŸzÐíl½¨Awœüb²Kh&”5Dc1­v÷GeaÄ›/–1ì«5®ºî$¾RF›¥]ÙAÇ “ZÕ’wÛö?n@>t†I¸+hŒ ƒãX˜œ†µRË Cå 3b|ƒ¸E÷B’•k[›X…9þËÞˆœt2²‡Ùƒïx…Æ–É{Riˆn§"ó”ÌûqB8³ #‚Ë–]örOŒÖ•Ñ$í‡ââ²nWqLŽ’´&€!VâËdªF‚?›Fgé Ó¨ö  =㊊g²ëYvѱ±[«ÝBEž]ïœP.-üRš•] é3`lÿ2p½¡}pÝò¡—ùÈXÆ6Mvcoî„¥Yn²€,#^Ívòq®÷‘n†™C~"ãzl²#>I½r†Æè‰ðŒúÙ8k>ôÎ)õ@V/“=Ì:­Jd¿=?ê˜ê3#a+SéèF’ìy_¶8WP¶,åLp)ÂV¡ ªúQí[»ÓÌ¢û^#‡hNoüké“Áû:vY/ElVùBjZe…²j*j³K¬¬)ê)Ðè<ÓçEŸmµ»¿ô§6u<™ÖÈ«¦æKuºxqúœ¨J˜1t[ʸ|¨C#`ZêšOÚêk$¹ŒDñµƒ†î´/ NŽŠ™‹´ºé¸èJ.ô­ÁœoBýš”%ÂÎ'†‰ º¤Ã%äâÁ’5i¹L‰¦*÷ kIL—e‹SpÌ®<jC)÷×Ö;i±DhÐíDþÄ룯l³µôU®Ì¶½‡v'¡w9NˆxÆež§A³{€)~ÊÃy+å¸I1¹„B†÷·ÜÓ‰Ò‹™¨EHÐeëUÂæ"G‘JEôO¯hÆsŸ’b¾©ìg1¢T\/Z¬Ãàt¹Yjÿâ×!¹ücÇ’žFŸ ‹ôoÜÁhv¹yѳã$ˆ»<`6SŠþâb^½µœ+Ü€Ý) ¤Ê”7㤆µlƒ&VF5Lä½5õú $»îŒýE¥kjÉ΃¶ Y "4Ïô¯Q!ƒj*™tŽ­8ïHµŠâæ´&óþ(3œÓ¥O-k~¾Ÿƒ v†Òþ~ÚKM'³è>YþSžQ8‡ÈGÆ`_ͧ}S˜’¡|º,Ñy «dB¾2¬²²½¹—HB-Ó¿ÃìöÕt?Ãä“ÖóÔ uÉB‚yœDVÜNöpÌ>r–Ð# “‹|Up=Cu*#Çb§?C.Jv0K8‹ÅB™ä€¢YîsAò6ú¸{ 1Ša½\a*èø@"êU«ù"]²¯‚Õ.ìlF_EKOŸæ·$îUÎäP±u£1îĨ Œû {æ¯ÌñÏ?S÷ÖÂX˜ìÙ)ƒ…&Ï>ëëzûP‡£+£Vxàèýà*Rd-$cL¿˜¤ÄJQ´[õSÚ£T:«¿oþã¤S‡…Óè>Ý*clVrø´ŠuÞë`dêrœ#\æž’WYB+gaRºoTÓÀ†4¢;üg£Ó‚1ìg©®¬IY ÈìØ+¢r*÷gMQ9_öÏ謊––è-¢G›sÏÕ8>ñR8؇ÜÒÅ´­ÐgtÄ $TŒ¡qìÖa1œt’¬QHŠQ ï${ ¶Œ ê‰VÉIfQ·˜~h¶P€ÓX©è”\ĉx¹\âå*rÞ>^V8pûcǛآÂæ²òF0^ú²¼‘|‘JcoBÙ²j”Uô€ý?}\&¼™Z}9½þOëÍ3ý@’ ’¼ú`+aÏC>D!R¦Ç¹#÷BF•8‰of¨âM'[Áz¾Ï‚,ñ‰?kmä¯ Ö «®EëáóØ‚¶€±¢or r{_„SàTˆ†dh8V,Á¯%+\µk&}’kE)N®Ã¸ª±ãÇ’lP_£"Kˆkk;ç$©k[ %Ÿ7Éî öƒ&”)Xï5ž¨mT⊄’ õS;ºŸÁ&:­ˆZl*M‘ÍláprÝHõ˜7ºc…mi³Ãëmîç‚2è$½4 í× xÐÂÊ`¨ôMŠÓš X„^5Š[øk?Oj—5 ­GEÔú®£‹aRÀ&ë`³Î‹ÑËPûÉ}(éáR/€\ðêžô7rQaÎÑÎøF¹beªIÔ!ˆí’Ž©ò 9šÑâÚÆ„bb츮¿FGœ(ð§hç‹|ÞŸ¨Td;‹É $º@X^+r2ÂÁäÆÈàgh+ùÔCL*üÙ–Œ:KÝÌù'"éÆ÷$+røLŠØf‡³TrjÔ<¡Ë^•×™†q¶úHø° Ï`ØøGFØMÐ…P`¦ÚŽÇP¶ªË1åRþ¯ à3„ÖzÖóØ´Y»|™º”ù§'Ä´¯ëáàÒ¡¿Ö×ð¾Â:ömtà¿qìèa&x¢… æµxèÒ>gœ·üâÍë¢E" ‘ ~’öE¿dE´ ±QC™4f˜)«n$iŠ;š0QÖ:ý@â!pKhf±á:ÐÉ—fŠÔžÄ‹øO]ÂZ‹+`7£‡éÅ«+‰ðÌ!>xáj0þÐ\¡Ž€¶DŸÈüxºò\¨ªŸ7é–—ÏI^oó’1ÔÄÜäûa󓆳|ŽÆD§ó‰fj NâLŽÐè㬜›£_ÅE#-û…‡FÉdùüøÁr×çI]%Øk ç*çsÅÚ¹ÇiÙLd"Æ¢G˜@w`Z䈞VÂÇZ9{³i9ÉqU¥5p„þ™Ctâ®EGê®–,3v tW¤­$¾;òèÜö8ËÏÈ5Mɪ»Pù†C£Ål¡Q½_Æ!2“q¥‡‘iÖ™—ËKŽÁúÞÚ²ö¤aÔ’˜ÓŠ¬qŽt?0¤ð‘3ºùíqkúµæ}0E\¼nð"©^ó]ˆä×ð1€f1'¨yCA+‰á…@Äý‘¼Vâ\õ+T§ ‰3²Ñår»×î2& :Ó9&”©Ï¼oÖ½­§V3õ§"µ¯ †q¯Löi1 f“N6=f–]u÷ÂqàiÂŒe0&‚¯¬êVlš°âÚK4³ú"Lö/w5& .ú/Î#«‘áïŸ2òT++<Ý»ìq§Ê-6YFs*Æ?eÀü‡ª÷h57—X6!·elèo_îgد¾¨íÖ67ÞaFêÅóo_ög~vwwðïÖ‹çÏô¿øqkw{ço[Û/žÃÓg›Ïwÿ¶¹µ¹û|çoÖßþ7ýð`6Õßÿ%?)ç#ÅÔG­Ä;'‚£˜u´qôô©µµY{^Áß»ð{«¶‰qDZ½Š…!÷P¤:nwwNÞÕ ãžOUtÁ.€@ÅÍÚT\Lá+žè1Ÿ¨ˆâ=ö¦.F_CG?l¸øa(LˆÙõ­Ðý±ÛkœGëÂcñ[U_¡3ØFÏô†ñ—.ÿ¼1õ=2€SÔà~ê“9}WŠcï2p‚{F×¥µÍý£§´§X÷þÜÂì@P—°<ûøôô`« ¿6á[ AzÎSÄ·)©Zþ¹t\ï|õ¨~a¼G~Ñl„ È 0EæÑùEnýgk§b=ç€x»5‹±Cq°˜b9 •’»‘qŦ“‘èpb¡íó‹ƒçÜ.LÓ x©<"àÑ}1¯BÍDÖ{t„©xDq«XõGÅZ¡}ÞkžTaÞèΪ†…ÇòÉH=*7^wªÇèƒJþ†ÍvÇ>oÓÇ®õ¸zl¸§ÂwÌŠHÑp¡¿øS(|%ì»™$ð+~³í³.‹mLÊùJäÌæ2­^\@’šY(,.‚äF¯åƒ‹)zfOá!ñˆ?a`=)q¹rAvKôc¢8?°ª—ÑÁÀÆe‡âÂ2ô%–žFFaìZ\)òCÙá¯8º:Ør°Zú"&5/LkÒyO뻜èU¼ ð¼X<5ð°×èölõF>5/¬fvºÁkX«†½×:¢©,ÅðÔTÜöûÏ^îŽÞ¿?¸Íð#sõs%‹Ü6Žèßsãõ}U8Â>U>)ÁÊ(Ão^›eÀ QpÙªþ:Û_}ÆÇ—¢÷åpxD^Æ0`xÂM”yÔŸÛžŽ²²j†Ajmim!¶ÿO9Î¥ù‹%<é3<í£%}™x!—ø¦ S|öGöÀÑC?TÉy*ˆBú2BMkªt‰†žQ²ðqÑ©4¡/è5¥z!«.‡ödÜpUïenlúÞÆ<öFEàáU-ú£þµæŽ;0ÿ*K ðbÏök°ÀÌuZsï\Jzj÷g3üRÈZ®Cuã1ü¡âS©ohþï[Õ©U<ßÚ¶žüÝz*ê<Õ*ø.Fœ¶²U«_ôÚÇóFëXAüûל Øz²^O¯œ&.Åé~D)Œ¡ s¸}C¹^3Ù΢šh•¨† hÕÆŒpÇÉÂS4Ë}²¿G ák‰Je´\LÖ#1fíko 1G&±Š¬°ÝŽ{G{«©9qèò’Ó~`äY}H <ð/¯0t§x$BÑÒY<´Cü&˜âÊ£±>ûÁã±ÿÀ€ì$)à›—”Lã•kJ®ŒEe,Ë­‡‘Îå–õ”È&c ô.npmù2þ»è‚Ú€ 1Ù#Bü†¥À}ö™agøË÷áKwÙ²õgd”»è=Æl?ßýaõÅŸµÈ%sKIù]`9ƒS¯Æ"¼IjQÌ…ë0£ŠÍut 1‡àõ f/Þnþ"˜/@0LãO'š${EBx@%b°«ÔÉg± ×Ô^ð9½µÿXwW_*…˜+ïÉ-¡ßÏ@ ~ÿ^ÉËR2¡Ú“éFf¿_l…W^ø}ÏyTNˆÖ¥ “šèKt°P¨õî¢>Ý‹«pÃq›¢%εº?ž¶O›ì ówï #F†‘µÎ·;æO©· å‹·ð)õÉßâT¦Þ®+ÞŠ½\ÞOÄ[ø”z‹Iqø-|J½&²Wð)Ý.üí†Qò+!ß¹éºþPÖõ‡é· +ˆ·‚‡ëoQêç·(ÿ'õJÿ+¼÷ÿ,Õè‹çÏóô¿»Û;ÏYÿ»½¹ù|“ô¿;Û/þÒÿþGô¿_Y—Þt#¡‚Os%“ÑBLTÐIG1 Ï›20õ5|ýµZ¡ÀŽ„Fñ`{sk»ºµYÝÚ©mmí[­‹Þê[ŽüÙ}@V%àR[ß~ûmŠîXälÒõ¯¢[Tg¾Æ\¤z¬XÍiŸôŽ"sÅå½Õó'V/ð'î½õ]DÿÞ¿Nça úû “ú“òÑùÃÀ™ Zw%+ð÷I™‹úáÀx¡HGŒFBÒÙʇ-çƒ6ˆÁrpF7˜„Rw}Òº°NpsÆÖ9›ðz}w’/)õ¡ïôÀ`…¼îKÝ´TÆnWP­Ur"ìe ”©-ãÞ ˜*š=ÔxDŽ¥ëZ#æŠd*‘uë£aÿ¶«ù¸ÐBê]³÷¦}ѳê­­wõN§Þêý¸Oª|Œ*IQ #x˜çÔ ÐüîЪÿFçè Ô¨6O›½±ÿ¯›½V£Ûµ^·;VÝ:¯wzÍ£‹ÓzÇ:¿èœ·»š…É|&Ô_€Ì+šŽ™.:ò‡<æaþ„²o„N¥Ûw½4íšÝ/Ÿ$D'Ý0ÒeE¤¡Ã_!™WÐdÌúnE³½ÛÛÛÐX͆c†n¼¢«:Fgèʈ‘”û.«¿…w^~*hÃsŒ¹ b*¤¾¸ŠtädQé¨ æÐÈþ¦›P¾\yÃyÀªz^†ÉV”ðL}ùXªBt&¾R ô-h”\¡U_hDóÔ(Ö‹ÁÂFŒhvå'ä$AÒ0à ôûÊĈ=AÊŠ5£ î¥A¢Á!94~ªŽ(öwñWHQ! ‘3'êc È‡:ßÉrUñX•‡~LÇk…5ìÏ;—.n,2²¨X‘sI×$¦o 0 ˜tâ$—pLŽƒ[þÏÜQÞC«§F¾?9Ò …Õ‡aR&j Ä >l°æ ÝZ¡ùº{P´ŠÅGO¦ãb¡€²ñrè;‰æ¸¶zD·VúKþ×{✘8X”õ„^Š#o=ù,q—HäìF²Së –ÁºtFÇ—?¬î1ÔÀ¿ -„Öî9ì,Î:MYœ­Ç×`0¥è®ÇÓY!&@ÿ.ú EhÞyZÿçç©r!ÓAèK ˆê:#.ñ8>8x‚òeizÂt4e“ëwkãÃW×Ë°£8—¡?ÆsEyÅiJ1Œ´uÑ:¢g±¡$JÞVõW«øDµWÜDZN #‚1†…6 ã–LP%Æ/™œÃÂ#êÓÏs:mVß±c,ë ÎïÖËø‘ÀÓ °†·üpÿr`ýtAؽn’,™.ܸ„:ò|uåÉx) _Tc£òd»B\¯ÄO+ aP÷6ø;aýçþd`mlYnä \YEÀ9:BW]k-Ü(þTª­ÿT†§ëO6~ÚÚXûYBã1˜à.GVu"€1¢£¼¨jã茺ø€+ß.«,rçÅ¡gôý“ZYý±=pÂÑ)®øëøÎÛê9þ225>ù£=6œí8nv fmI¤&éŸl B`6@ÒåÏžòT'rõ&®¸Ï£,ˆÆ~» Ò@H…Ô7«zÚ<<¯÷Þì‰ ©A¥Nžû°@¤Š#t ?ªž óK}ã‚Y]ŒªñʼBáå`êÃG Á€Œí ü*`æÈîÁÚþÂÌÈ^Éz‚w}˜<¬Ài&¡ž„ ÆŸ„#ïß¾ùF`ó ° €6 ðð¤cUöçÞ•ªêh²ŠŒÆ¸Ÿ5ÅÂQ³f´óÀ6ÊRgÅTùìþÔ-$q©Q#¬„\D³,€n’ãÖ{€fέ8Àq‚a­†R¸ˆ”%ÎÌú9k^8÷"rdmA;E®:ÐœÙ!€x {‚FûHN4÷{ ‚ä݈‰Gáu CtÈÄ&<8($Ò0ƒÜ"žXõ‰ÙÄÒ“+?ƒñCÚWƒùT D±55h<ñ@è_­gŸGÜÞ~àF¶-ÉÏ×k>pÐõÚ¿ýñÃåáÇ¿üã£`î|d»(_…ndÝÁ“¿­êk_°<õrä]Eò ïñž±:Xw9Xb£‚IW›ec¨ÍXjÏÓjjí¨6¢àùIH¿m=®6?=Ü8£ƒŠ‹I4h ˆÛfÁѺ¥ÕÇ^?­ ä4¿3§ª3\2ÝÜ©hîôS\Œm•ÊÜ­“+©[¾7»;¬“ª O>Qqä ÞîÀ`¥›®¬Q«2fìP Ó'PsØ#Éž‹Od]A%ùûЄB¥ˆ%=Ê@}ÏÕLü,¬¡Šh`+{T^Òª;:¢?ý»;þúþ=/ÆþÑǧO³Io+9¿ÕÞ,à2ßÍþù9ýEEþEú+¾·ÿAQi*™B^/2i?·#« %!(‰ý‰K¨}Ä`«Ú,˜rŒ6UUüf””" º×qoô×ôöŠ-ÜmˆM4ÆlYkkÂyIÈz›{˜úZì4p$ëà²ödÓªVaÿ˜­Å Lð‡©ÌP1R´¶^}#.§¸51|BCu؇úëÜR|ß}÷S£ýºp'µ=Åö?p#ñƒ8É|´Î;í“NýÌúPïœt? Ÿ©0ë¸ Q¸VÅì#xã°&Ò*Ô m>²!¡¢ÀÃò„˜•ƒ–Ï=p¸Ã –áÜ9¸a¹w3Šgá&éÈR0 îÉ™Íç#&ìÇ·#† ÕkâgäAå +ë„VwÅ=yx§È¨`@¿Jé"ÇöÍV·W?=EÅ`‡ŽøKøµ¢_Mדï ñlÝÐl݈Ùb²3ôÄP;³!€«íÃÆO?}¤ý1©ñãgô•Á'å¢_úAá™Ã²‘6JD¢ ZSŸŽ.…>ÿ)H‰…ä•EÒŠU”¤b,ü!aå ‰*­®‘kQÇ3#êƒ>®±^:‰)=ÌlŒFZmΚ̡MÁFŠ5PJˆ<ú'ÛYÇX›úš<¢ êTûHq*à«P¿/5RìMT+”—Üø¿!¾W0În¾:oÆϨñ¬=f%!"pMÚ»Þ¢=±ËŠÒ)☧‰””bÚÓÓ§9ßÈÅ@ÅsLeE &¨8 äƒ¤´‚Þ!Ó‰°á¤Z­ª5Ê D 7ÍlšuXdÁì‡l‚,¢2£Î{ƒ’‚ÑÄÐ/ÜÔŠp&ât"xZ‡@aþuMgùÀ0œZÈ–0öÁvOŠûƒZ²`¨úL@? ¶ßs@ʇµð÷ÕÖ?üôÓÆÇßß·àÛ§úk½úÏ{ô}ã§ZÿÉFÍG}ª»Ø(‚пÆc(™„“}7&Û#Eæ®þ½Zõãš%5{" áOÍ–UÚQd´¤ ää;O8–jÑš/“®ab¶ ÇÆÄ¢}V£KÞ x1†°ˆÌ.sŸßr*©ˆ¼ži+p,͇xx­€£„AÆÈóuì‘êæw9Øßí߇k?×Î=swß’Õ× D}À¡`(‡o5q<–È:0VþäF{%_ܱñ7.ðéò—TíUdýµ‚Žk†ÇÏ@w3ŽöÔïÃR+ãCìÁ#tIßãÃt•7CxŽªÈÓˆøÁžµ1ÄoœñžUrƒêU^k”®ŠMÓØ7Ð} “Þ7Åߪ´ÓïYEó’¯hbñ J}½w_ýzs{‚¿5øõ&Q’>þ ´…/zG‰·îtÏÅ¥!¾kÀƒÂßþúùÓïÿÿ»ü¿6wž¿ØMù=ûëþÿ¿ÃÿëÐÆÈŠÑýëyí9{|ýWDjFÂäÛÛVµ'š*üó¬êøÿ`دõÉUmbEÑÃòþ“R< ãÛvÙªžbQh³lýô_ >Wo« ¢ágÒ7'À?}”ÿo«D«ÎÎØ):’çhe:¬T[m›smÂçÔßÖí×ÍVý´ùÏ:¦EeWŸöy£SïVãv?"&…tîI©ß/[ÿæ›ßù å´D[3F }ºqú úôŸ¬£I5Z¡ýWáw†(Œé¾ÌÙLB úµöÑÿ*°\ÐGs;}"¬* ò ëBÅ •Þ¿ÏÞ3ð!vA/º ¿‹Ýhà»ò¤ù‰›ÃGº/ |×Üiè­æQßu§ñ:O÷¬¯†s |7ükà»ábCÑl¨}†« Ö½mb†¿ |7\nà{l·7q—€¡{ã âëOJböàïA_G塃 ú§›òÖÁ²Ò 6óSýÓ,ðnàÜL£ÓÞÔFYoF˜€ø ,Þ¬b|T‡Wr7eex0í¢¹?%B¦ ”¦([èÓ² Ù¤#°P­Ã%1›‹D,ê;8@95©B0­O0µ‰9| ƒ3§?µg>¢+]?ù¬?@AÕ:OÞÂ_—a?Œ»‚¿îàîœNB™½ÎxŠ©7µiXˆ·U:„LyEêˆYPv5Ä0ÄÆ19Ò3“>µÂðO3“¦nÎî5»é¸VŠ –±ZʈYVO[7ë @i‡†…=(A'Ü$9á̓“¯*keøhe›ÞuÚ„ Åëñt­Çˆ_9 •%REóhײôÕ?Ygî?0WÞþÉÿ¨–ºÓZ8úsì_äÙÿnn=Ûz‘ÿ·6Ÿÿ%ÿÿ‡ì¥ù/jO«®2âjVÑaHì3üÓ°¬i¤K2>¦\êcfƒqm²SQ扵QÍ›VÔ9ƒ¾¸Q¿†ùBÒŸ SÕП}¶ =¡³‹R±ÍÔ„©"¦A+ʸ7¼öf¤+­YV÷n½ÐÅ.qF¥èSgšØN2¶S<õ.ÑÌïYf×Ã*mƒ§aÄ¡,¡q2Õ ïÃÈpQ¥‚¥ƒá µ`0ÊuÀ “‘êðÆ£X¨ÿ`kQ‰;Kp  ¡"’ÈŠž{Ã&¬s—6!ª²g3imL}iwÉŒøò^ö“ôÀós{ ý Ù2£sÐVP°DOBVtΘ°;ƒÊŠ”ÔPœõÚr †4½Š¯¬(Û ÈE@/èmß”¡$8ñ}_ªi•×}ŒŸZ¡ ¬z…*7 ¬áÄ ó÷òæc­¶¡q­VüKSôÙüáãŸÁþYÿ³“­ÿÙÚz{ÖòÿØyñõ?/6wÿâÿÿiÿÇÖq£‘ZãfϪjÆܱI9qßÚ]>Tù¤oŠõÍb@hf]œýý=ª›[ÕÍgµMŠ—3fk•ÐT^|)[ÛµÚ.Æ» üŒ1ÌÍsHWaÀX¥ c“‘gB7¸Á 8 ‘Ú€IŸ9ѯÞðÚõ"ë»!<¢ÛgÇ«M<8N æ¯*貛馲‹n*Ï—»©Èüb “ÐuõÝMf÷"<ß„Ìô²±nµ˜t²Ø§ÛxòÁÀšŸãmQ^b;ûßæ#›Pž>Zð&}dòÛAƒÒ¶fVwÐP†ÄìJ€ B„Š7mmÒ1p…d¼Îùã~Óð@G!tÂeõßæ(„ýÇQü/u*{žÁâ çõ£ê' õým£Óm¶[Ìù„ý@Fü7v­}òétÄðót.\øCȈyD³ü‹Èˆ¥ˆtÿXʽóßÔßxñ‰DÄMC<Ð×øÈu›e›Z2ÊXð²Þ±˜ôV­kë¢ö0–qÇ#t1[2ŸÓѧËÒ.c|Ì_Ðéb–"añþø‘ÇÞ‘?òðvJLиêH?9‰L•ZGBŠÌTÇÌq÷¾*•ž¾Ú9ØÝ9Ùknlk(7}0ªxñ÷qɳoþøÏ“ŸÚBÍ~ {¢7ßZ|Åùk“ËJ¾]a€~_¶üÀ¤j»/ž’CŠâÚ·õMO~ùÏ„¬ì)V}2ÆÕ™r+Üømï…® ú ùÎ3ZíÂÎÙAð¶él Pw¦°BhÒ û S»"ÓbÔŒð½avpih(qpøcûäÕ'§%±äfgá5’©àú·sFÇá`%Ü7ë•€ ô3ØÞfe±Ÿ=8 †3PƒÉz²'j|3HÔrW튕é-‡Vq*]bõRû9f´I¶7ñ7f’2¿q#ár}Ýyùœþ¼î$8Ømc søØ=ýåˆ~ïìœÒ×@.@©¶rdz„ 8¯fÐ [åen€¡å{ê‘8ºI™f«,ßœún—\†µw$ú€ʲ±xeވиºÐrv1Ä)íq€6 ¥¢šC—q÷=o ÛêÝ/NäúÉv°¦¬uòFh¨oØâÞqL† &0žòÉi°ûÓÞîßÛÏ0„Â\Æ·¥…\zz*'äUN—ƒF]÷£—ˆ:ŒÈãWÅ´{/±Öp*á4B ¬BRfQèAv¾aVÝíȪ§˜/`?'É“g\Ä»ŸàžzŒ;ÌÆ’Uþ &§*&2íª°(ÉéL¨A$yƬå#ïöéˆÜ›ëQžvž4±Laev/ÂͦµoK6q8w@)O'ð–4­}{rQÎ;”V@ˆˆÌ¾a¦L“6étÑ7@€ÂÙVX ŸP¢mvᧇ<¬†~;òÚÇ'µÎ[x_2m¸=7g³ ;;¥ÊK/>û¦QKmëž=¯øÒ˜2”mõ÷w§Mìl|t¸6A=mÖsýDW¡M~Òƒ]§)Ç óBÉ( ê{¯÷¼"þÔ›Òw£ìöR–6œJÙƒz›Jüýá,vê1-‘.kO"ÀwÖcLü¡àä}‘‚ ¹¦×VÞFnY§Qõ¯2—±(K++:Ëœó¡Ÿëx}9Ñ<´ÇÔèp“É%xb Š «÷Õ|É…'0LîC{-©çáp$瞃P :Ï€iñÑ Œªº¼š{–èºCQ„ˆª?ãh>êldÙ'â©•¦ÄC¡$øG/àÀC"†„Â0;¸A9¨ ’ïaÜ*gã¯×11µlXÔ õ¯>NâÁ¨\¶>Tù‰M‰òLH!(åMêÆ&±´'’ DPË@ ³– F6,°ªÃ1øÕ¹R˜‹‡Õ§‹ûP£‹<,J¾`À:Oë%»çЉÙ`„Œ¸×f¦¶™4:‹ÿ5Îýk” ê¡èÓè¶ô$ø6øSð]ðgƒNü®ËÞO òüÖS[8fïmèrâþõ—¿üü€C&g Å÷»,iHçhbÍ5›¡ÜGvæNØNå.OúÃéyðxcóÉ·úîÏÿñ§[ÁLìs¶%'ÓÄå ˆfZÐûn[ÐP:P¹Oƒt'Ðâ8¿ÁáÀ=Ê€Öø!çeËžîòß;UœâÙóVÿÎ ÕÓíŸ;í`a¯™ -ëU6+ý˜Ÿ c`ü|l¼KŹ Í[úÅ45¼»Ó Ê ÎÌ“Œ‚óΤÊlfJ¢º÷èÛ‡ñTÐnÔ-ßf(ï–)åÝDM˜1§£Z­××6Ýx\!b‡2¡ö‡x¦9£+‰ëH›G³‹K—*ØxÔþŠèµá_“+o—]˜ñ l8ð¶ØŠRæ¾ B“ øæž+º¶³dÒ¸_|‹LN)3>¨€¢šw“\#K¡ÓçÇ{GKàÓ‹I<6<£b?¥¦§N >§ÿíP .̲è&æâ刾ÖÖ€£ $Ö(Ü­Ô¢ÿÅ?ÿ‹á:jø7Ì?†ù(Án>ºù/ÑÿPÎ01A*³'gyI^H•YŽl_ô¡¤…±Z1©•¦Ôò†Ê³ÙŽÑu°A”I˜@ƈúÌ›£j͘ÓäX*J"››¨a0Ÿ^/ήÎ)ŸÔ5[õ(„t´†[?¿×*¯Æ01p9L)ˆ ™ô`€ šìQ ®r«Ø'¡Âë`z=Ÿ°%&ô*êiy|åÍúI»Gž X¾ £k±Ð’ÄÑwGÝb/:HR{%ͨՊøë&~7¿¾å_æIzèLàa9rÏŽÙÞfØB…‰ø vãëV«Ô¸ G¿ò³Í²iFJ}Ý ÷-8qRæm«UÉ–†Sè<,V±]™M­ÅµL½„ì/Çk¬éÅmQLj «ñ®Œ,¯V ƒ;T3À—% ßùÖ¢„AJÍd5Ðè~ü§±%áRÍ{âÜ)6ÞúÝ›Ú?;µßßn Za•‡Í“à™Ô*EŠ›?PáªÂw©ZÝžTQ=ëøºç”áÅ’÷².‹zUÇ5^ÕsšaZi•4·)Å°ÑíY¥°cöNJ㨠3íX›63é»;»›=G GÁ`ˆX<Ššp}wêbƵ¶s~®ìR‘¼0™»R3d¯*UG"“@Qšã¼Kù10ŸX×9CQÜè Õ˜F>xŒ± zæ0å>l÷&·m¨,VøˆÁxêü†ëë ( y‚†Ðÿ›nDpl#i6ŽDû”Yb%+ȺqÊA"P¾ˆ4Q[8FÄI­v’ ãÎát·å ø¨5rV`Óðë!™¥ô`"ò¶Ý5kÊÕ"6[U4ŠRî6¢è¡#„àˆpžÚ ¦UI"rsBlésHPñ­ˆ‚SȤf ­’¬žcGw¦ÀZsžt6ÁEŸ}ÆnhÅ ãaKjÎRƒ¬4U ¨š„˜ehÃj·E‚ø_à h+à‹NÕ˜ìe0BE‡ˆcoìNʃq1úWý)¹v²Ù9Y°!ÛOù†ˆ²«îuOlI)Á¼ŠöS/e»‰#Y$Êá8–°àå° ±\2*‹ ³ÆÞoÝœB"#ˆM–УȎ£7@¿Kæ^ÅZGòÜЪ!uôýô6•ýÉܘçäØßtPlQ!s2=|ÒQri7ƯéN¡4—â…ˆ‡ @žÍ^úp:ÙÄêÊ° 1†òL’Q[F)Ç·Ù¦¢­ÛU¾èP±qOG(v‘/ÙyO'CÚmÂiÐ?#Ÿd‘émŸæ±„Dó˜LªÀñ]Ggñ­¡ ;ÂTÀkë†n,£0œ&%¢ŒQ:[k³ãƒk¢ÍG‡K†[%bøx‰Ð'ŽÛ`D8+ßÂŽé|øçÁOñœ‹WÆù’9ªktZ/åtÂ=¯÷¢Ö®Ì2 %Çšfl¸V3€¿O÷Ž_àa„¹—'ûmz|’/³'O8Ó€õˆ«Â’v;h#ƒ!S=$x ‰+4›¿ÐíGaÕ¢?³í…JÊNš@Äo3•²Ü–— Ã¥©«ÿ£™€5fG™wj&ÍpCå¬2lƒ‚¿¦Jfõ_æâÇRË#íMÁ)nŒ¡ýÿÞ<¾ŠÜçøxã*Úæ'o˜|úg¿0掀§Olá  0‡ôl3Õ. zþ-•…'ÝÛ—üΔt’¬àl­Cãd–L‡—·U"Ä€3P·ýéš¿#ùgr1yì™Í{æXÞ‚Ø ïÜ×~{tL2íéâÙ2ïüÌB–¥hqÉ°†y=˜6l¹9…uÎÑZ(§%Ü;¯ÔÂv6sÛá÷Ê-léÛüÕCñŠ-lèO¹ dyÅlC÷¾bVZBÛ*ÔTÊõýL™@q°[LeçÝé,”‹É%MQ¼s¯XÜ!¢1äöIºæ)²}CTÛMnŒœs@hvAIŒ;Û5]„1Ÿ'CñR{>¢mϱSäè‰òB‰ùÙæ>\ælÙŒT,ŒHû¤t£vêÖ6\2vÿcçþ;xUh¹Žw‘…bк((§±¸¥NŤ›«—È ýX˜Ó˜²# ¸qÙï=Ì(¦ž2š4…Žƒ5 lji6:7–ÃÓ'ÄÇ c¶Ê$)‚}œ°ˆ‚H°À¿'—¦™³‹ò¶-'Y;°ÀðãNÊ¡)ÇÅÉÁéx9ùÓÎ?íïK{xÔ ocT¸¦ß¿†[áðèÄ}Í|Ý7MáÞ`¨×ds0Œz³. ÅiOêNÂwÖøÍÆæÛúzp…ó_ HÆ=`î ŽàÆú¿©QÖH×fQ ÕËT£§»¬b'2•H$SõT²b"Ú ÷¨/\|˜z?áíMb:¬"²^lb0ßÅ,Bar½”²÷Ç-;y¢¡˜1ºiv¶ƒ›oša@¹ÞÈv¥ßiÏoÂÈsÙ²µ³‹„IÛŒë ü ²(™ÜêÞ +ûïúñÑ¢TñVdžY´„"øúGÊ=ÂÓpO¬c]•&ÎØ7«¼ñM³…ù7…Fꨶ@{6 ‡C˜¨G«Å3˜†‚ô ÙBòKîëjˆ²üXÐ×kC‡Ãþ9j‹Ê|!"²øèÿ’BœÑŦæÁ(^bë ·aE ùªM`Š‘[åLëKì«9ù™ýÐñÏY *ÍJVÀ}mY™Í0½g­ UÎ)«vêÞ~þ#àZby»8ö[rí‚•fñ²KÕè9íT©ïV² ¡=HâcL7¸>ôQ‚ghBÄ,³*2ÓP!:_t†thj’ÿ…?j*L © º•I6a!±¬l-n'YÎîZ¡@_!5À·"ŠEPJ­•!Ú:Rˆ¤¡güêaQ’¼‰9ß>²ÊLÂÅ*âYä®B! Hð‚Ön,âo“¡‰¸¹•7¢w‘ZvÒÞˆI!eÜ ¢ÖZ½UÁ4.öbÓ’åt»æ½îÖ¡ó8ô¯:;Q† ÷:s\ã/L/dø8ëe›ÛÔ)­Ž\¦ò `ËqÇ“ü[J©„ì%Ee9`ýpßÀ•Ê¢«Éso&Ói.£5X„6ܹ7q„åu^2zxk #%„WTRìVén–vöˆ|,Ùÿm|˜°˜‘‡= Ç(Œ†`NX¾çÌ£ˆ hI…šKå‰âÀ4bFSo'³óóþÍÿ„y:ƒ*›³ €£Ïú]TÀS;H“9ÚOý^¬ ŒToi¸É/{áÒo÷rô>fš 0ÌlhÄAr 4Å í³f”·d”Mru½qG·ÝkF™ep¾zÂDyäÔ}ÔX¿/oº.^ëAPPúIŠÖäã•–'VâNÆè¾6Š´s:ͼºµçé̬=ôërN;De¾†FR² ü5É“³¸Ø,§–½Ã‘Pèü8çÛ¡BTXŸ…Q 6Ý<é‚ÏÏÎÑÑÞ˧ÁË×O÷ÛÇ{G;»{/ö^ž>Ìg˜â$]g V»Ü‰½h”µ¡ð^O;öp-Æ•±Pœ›=íÙÖÝ¥Ðç®D/%H;â¡£/µ,é5:Š'˜`)…;©ÍHÍ-Ø@Å"kÞ"ŠF nXõ’Õ³prw U¹`?üBl`\½ûCõÐL"ª¦‹±ef„Ryo:…Íû­§06O4! ên?vþ(+Ñb@bÄ¢;I¼A3]²‰À8f@^A;½Ói¼c?Lpyé׃ZªdO³sü<Ÿ˜AC@, .úÔG}†µ¹ŠŠR²-Ž.A)Þ,¯;×:ÖòµýôC`Ä?UÄê•-­¤]¿½Æä…kÆÀ0P–ÆÂ÷_¿…{‰Úx“.“,Õ>‡ºænÙtp@ùÑ“*Ð5ÃG:kFMÛu“1¯‡™!ô‡°ìí`ÿå³ý×ó3«žÁ,7'Jyf€p‰ªÆøMýz=5žÁwÌo ^©Ô€;!h!0”óTJ &T»YÞØ6Ù‡å1¦¬# *aƒ 46Ó»Le¶‚°øP­‚INYÝ“VªXWêÙÈsr« y ‹é¥ Ó.c Õ7„ü•òUü¡–Ò$g×ò€vä+ʺCß9Íjœ¨Ç”²žÁ๥@¤Ø]àP!YSûðÛ†¬±Û?²í$weÓÙÝÝ…©ïŸ(Û˜»1á;ë—œj8JîêwfŸÊ) VQ?ÍáêHÃœ`ÚÑeÿ¬?müMÕ;"I£½/‹RœFS¨Å î¸b¬£¿W»s1‘Û±‹È”£,…¶I  ªE±òpZÿ„ÛŰ—.ü—?2ôßSÞa Nw’®ÕÊ"d÷‰fk4†”©»}.€³H„§­)¨k ìN…¼êö^ïÉ4^]„½MìUN;m\I8? G‰À,ä ¶[5†¡ì,"³SÛ‚}%W0b]HÞ’òútç8089=Þù<;—¹†r)ÙcO+ׯË'§ŒQzR2%–d¶—·c`€òå"ÊOçÉîg:ÿD!Ý.+mVoîËoï ŸüL,~àçB ¿êfæJQ2,¿CÇá".zØNyuã>+¿ø M:ˆÖZ¡;æ›—j´*éñÒ JF7—d1;›ìVÙy_rF½nwÚP¸èÒ!¯ré"§·iÕ˜ R8[ש¼x+YÞµ½reŽC¤‘ýµs‚{_NF×A‡¼ˆÐ6¶¢çÀÙÉŽFãÔÌ]øp‰¶4< U‹ ¤QδÜ%M5I]‚m‹#¯ê¤Ücš ëµå‡ÚrÂxi»X+–üqÚqÖŒS“×`½$¢g¸Í_ìt¯‰ÀÀ³Ž•ÔªZpÞ*òùÔ °N8;Ñ& n1þ'Ú:m$붯ާ_™—ervŽ¥ìVvÍógmNó8U¼ÌaR×1%ÚâöDÈ+´"ì$S븹í].¢W%wrË™ÍtÉ¡ðYº}Ô×0õ·Ã½{? {nÔ›wNˆ ™)Pã–fAŸ–øšl1»t,9 Í]üæœ41fÙ´# y’Ê5Oª5…Yݤÿ!V°z ;Bv¦îš¦f;ïfÂ2o®ñÓG µÆôj|ß(ܨéÞ¿¶‚‚ËGã˜D`î> {Ï>à´d¼U}ÂÍÐL sb¡…=îS=áOe­\.‘rÉA›¦›&Š‚¨!9…~©üÙ–ý4&ÖdMI)£:§Eô ò3Ž=Óu/NÆhYB©‘$‡ÃäêàÖ4T–1áÝ7ÂÖ¸IÒs¬jðX±ã¸–ì6Þ‡ûD’áºcl¼[jì}_v>ôG³‰.^£ÑXwýÕp†nç)ÃÐÙ=HUQÎ\’ouf9RM½„yc$&:“>ZèÆËä]ÝŽOö_£+ž`L]…¨ÑˆœväVTÛ¡`÷öâº?ä0A¢Æçäx E=ʼn…\¢ý¶ƒ] '/~$3Ök¢h¨od¿¤sFŠÊÀœsÔÑú\ ò ¾‘³.Þ²ì<`E½ŠÇ1\¦,…+$‘r:ç(äY: âc˜k…*˜e×Áöò9!“I ãgççæRL"1ÀËÏèM‡ëÜíªËÇ.ˆ™›öQq®“„\졾ɨ`áô;Èy¬Q`†!Y2ÇÑõ-X½M ‹­åXÚï—Áõ¡yžÂàö…ÅÙÂ.Jì¿ Atº™äs°®=*&\àÅÅ3sçl(ÏÝQ! 3ÿ‡ŽÐ¦# ¹9çî°_ÕˆEê ¼æ/+ýroQº£”ì‰Í…j©´jп¢¢%ø¶–cKT¯ûÍQ$.¶Ùd‹Å@JbôlÛBŠÐf×Ó ¡&s¡i98ʳ]ȟ˺?• úY±úégíÚåŽ% v*Ì™ Èmdä!‹ù™SSÍ\LˆýÐsÃb†D|Ü.$ìÊ‹n°9ûá3Sr-_¨Ó_B­Dø›¼G„ã–¯ÈÜï­XùbœÝ‘³ö&­ŒÞe;˜×É8y\v0]hŸ¤ïˆ6U+d#[HÈ Š¿ çtçxx…¡%œbˆ¯þt$M\;1Bºe©Ö–»Ä¹ðY(zr¼‹\ïÓ“SøXÂØÉU#y-eŒi²‚¬t…Zê­^ÊÏ|í^^…LgÏ(¨;ôÏH¢0.‹ÛÝ,n÷ ƒÅÌoWA†nPv´¤t|ªš ÕâñÞìT$†„lGŽ9ÓH²è>wÀ.ª/¯—é¤OÌy‚NèÄ ¤‘[ªæð¡7‚îíœÂ­sƲž;àW"=ËÐ…sÚ‘Ý ç¬W¸ô<pyDP˜gi yg»cúË-µ·žÞm:g¡,ƒwÊ ïÒE+ ›’³«ÁO”\‹=Ç)~ˆ°ùMiÓ¯–]¹z£xµ‘Ùö\ØñZIoˆ·[Ÿ?Ìb ¤Ìô5Z™v9{³ÏÄñc@9+%"ŽÊô4ÔfiŽˆd/ÀåsKº¯ÆœÎì>„YÅrn>leȲܫN©²L[ž”WÙË(¸¯¨¯w†ìªƒ‚¨iÆ$çþ¬Lb1žH/ZWm‰úÔ=ê»A%æÓT,K¹¤üÝ–°´DÏ4Êe<íwÉ1™CïBMÍpŒ-Ùœ{âåi"Žñ®$$MãÐ*lݯÅ.uj·ìE®ÚˆÓ Âä Yã”Æ€•úÍΆÜFª}J=Gn"‰h¬µÅëÄ‹‘¬æ¯©…žO“Íl³° ûÞ1qàèëåÕm7@ÖqåM«Õz‡i 1JšdÔž;“‹æ; ¸aÄí(ë7â„È ßÞ‚éVaY„šw2ç/ŠžÑ• ž™_/I7ï)\ÊËdQ³E­Z­–1ªp‹¹;²¸­»`û¦õÿZ«­_[_·Ö[k­Jëcë¾u×Ún}ßú¡õ×VÔ Z+o×ïÖá?_âKïb+³e­p ªÎo$Ýž£\Ë¥…ðý@°ö ù3aÙá\–l¥ÆfèŸü[!©‡·Ã³ˆ‚;%çJÙæ Þ& ¼$Ò^>h…˜8ƒ"Az„¥!œèúЩbø´ðÉHAšq2+Ÿ On¾<ÿΩ°4ãÑñ:¢œ¼z†˘GË)a1®TÇ}&H¼Áæд;$D1WYY§¤žé&®PgKv &!üŒÂ\N$Ï0k¡¦Š4Ù `bòÅï_`$d<“ÚtçÖ´jôwè ½­¥¢t¦ÆÞ›Ã`±Jý“ìŽíŠÏ±^ Æ=ŒÝû§úf}ã[k6ÚC‘äëGå_î-D"Ú>M/^º_$p5’t—µ“à’pÊ…‘Õ¬Ú…¨öÍcþR~¯/?æ>_E”tÿðzP—c|½ÔR2.Ú´h¨®¾Ð™î â|âÙl&~-oí’Óšå„<Ã*éØô múð+Ià„XjˆA¯†S`óa#Iºùøëh9^†˜ûQç¦1ãb':ϦŠsì ÑÀÐf-ÚŠîçàCQ¹^õÜ8*¾¦ <‘†ŽÒ@l‘Ë5¹H9.‹Ûgu”€ßiÍ,°BCÑñqC`qKkìÝb^W¶é‡Î8LG_»ÏIþ@Èùï@lëÎ9V> uÆÓ&ëÓzÌtq>Ú|5ÒGWIJ=(dÕÓ|tí-†CLœ%“dBp1pÚÊIç<–Êá¿r§“6±÷ ðegDþRæ Ih”–¸ø¤×Él‘³y'L‰kyÙv¥tH@)Í,-!`+Ù9(òví÷Ú?×þÒ&Ì$¦¼ bŽµ£zðl6Aµr°R0Þ³ø‚|(Ø`¥×¿@džækd‹ÃÁø¯c ºiǵ4/ðFôƒÉ­¿ùÊÑ—2SÍã0©aÒøµµF­µ*vk£Éã7¿:í6Ú‹HMäÖZŠ;“³Åõ‘Èâs¥}Ëéƒa«´1ÔÅ&+ªÏçëµÔ×_;š`r5ÌÊ*3Q¸—t Ÿ?¾ÈU4Ûû—q5Ž¢2®¢:ÜÝÓ½ç‡Ç¿,·Ÿ»ÁÏ\„ÜS!“:ð¼?€iâr#»ëðª&X¥#¦ìB”šÕ4ƥ̤$Ì—„0„JÌ„µsâÇ—¼ešc™l:#Îç,Ön²ñÕi_YDåœB¡} ‘EnØ-@§ñdhÍûCÀÞ}»Òà-»œd™N¼L¤ˆžs–ÃxÃˬKztN34βôÞšbad4¡³ücïxÿlÎuXŽ°|PûG¤{9/žëûH†¨*½øCŸ2íg‹Û¢Ùƒ(H䤟Œ†ãEòþhÉΔ,MÑt? 6ê ¾Ç¿õÇ’wKŸ[ÿ¶C¯¾­ŸtD‚$á©(+…¥êÆ|KˆOΙ:W<Àp&:*´ÂŦ‰WîÍàì`µçª?&3–Ñh ×hg\Ç`õ8_6ûëÑö£úMùÙgˆèº6ab1D(†xåä›ÁÕ·m@›—EBàªpþnžW²ïH÷É9ZíãîÞE¸·kïƒêÆ?7«›ôù¤ú„>¿­~KŸªþ‰>¿«~GŸ®þ™>ÿ£úôù—ê_†QêfÍ<:ÞûG°ûêøxN¤]qBâ¯|ª‚›‹ÕˆJ0éD‰i—ˆô.vJC±¯‡²miÛG ôž!R!ºƒÅpñüräôièñoUÄyŽ%€§Ã’ÛÂüòá îA3¸yçï¢Ý¡$6~{'‡óIG>5kx/o1¡&™¢(YC2¾àñE2r+XëôzµKÌGq`÷ò3Ôàj¸W0"œùU“ðm[A¸ñ¸Á½`6mÝÖ=Þ¼Â?½:üùi­×OwC¿ úúûhˆ±3äíÞ°3ø*ô©št£cN¥ì°†‡—z®—ül>Þø¶öx£öøÏõÇO¤sJf"NWƒñ`vqÁ!v9ø$Ú5ÃZcÓ®èOíÏ“þtÊ™rŸ£ çõàÙÅe˜$è‹r$íŽÆ·“þÅå4XÛ­ÐÓüùSð ­’NFçÓk„Ôgh_Óá \ûîQ–â]IæKRps,3QÌY0pX]èB"€Š³óƒlrýòsŒL±ÜnsÚ(`ã¨æ‹½ãÝŸv^žîü¸°ú "­gû§/÷NN‚g‡Ç°.G;ǧû»¯vŽƒ£WÇG‡'{u\Iˆô·L0@€}Ü™³»ãÁál@ˆ€:Ù­¦-‰ûDJÔ-õùËWÁs¾‚#´è€…‡ !â1>]àX¡x9%Ÿ»BÊíBÚÃü!˜ò”“—Md×+bµ Z3wâv~†8¹ÄdˆzÿP°Ó³X¡«†âçýÓŸ_;/ ~Þ9>†øeÛxÐî`K’T7Ó¾|Êža*X²yÍYÚsÚŠ;EMùØL¹tÈSOô‘Ëïà-Þ1t?Œ4*€—'L‚ªM«Öß_N§ã­Fãúúº~1œÕG“‹Æ€ÛH?Ð`Žän¼Þ@€)颌‹æ$.²óÎãߤ‘ºýÞdWÆ ^^œ{7¸=9¤`@ ‰Ï·ØÅÁ„¼5i9’¥¸µÑd)Ð-2žIÂQ%Ù¦TÂâK°IBYÕÞËŸGœ¶×w4âl/Ï$3){r`@véë]–!Vä¾4`ïêWŠ5ñWÝ¿4Ð"¤15ðNYÖ‹KÈ|kŒ ©”X7êmp`]kÆ»ª¢ ää{³««[UuJY«ãd–ÆQ¯cjœ¿“Œ8 ;&×¹&kj5M¤˜[rjVm¢+Zx̹åðúc)Æ­mS¶…§ Ãrá³·¼dŽBx7ÑFn±1/¼KsIŽ0}oQqd75ª]J¯Z 3oG9ƒ'϶P¦1¡©3êNb^à9k!¦œÐÉ }‹ÎŒÝW‘䦰|ŒÒ#çphË,Ïâ”ã¯R¢$v9™t;03¢m"/=Qp£¡ÉkÓ‘·ÞQ(JØI¿Û½)ýì Õú„A(Ô¢†¦‘ôæejv38šrœÇÑDï¥ ìüÜ1O•'d`*Øü—“˜ÅP¬‚pO&´?¹ËDëHùæ)D'ÎE:õKpšá)Ê[&ØJ HÇPúÎ^Ö¡ÛÂ.&ÿ EæÚ\.äâôQ6Z°^wh¢H®»ôÂ"HÎxB$|7®C{ÊD ˆ€^"Ú£ØI¯Y41!´É/‘Œø2$w“·Y?áúˆ^Àfé$cîö|Sxó4î:šËÑTaÄ‹=Ñä®AÒ¯6Çëõ¨/§¢F‘à™QÌ·›>-Ý>§è²åfuÈöôÓááßÛøsI3¤c´óJ¦éYR¦/Ó–Bmª6ߘZÄF©;]ÖO‡nà³8Æi´€½ ÔY„œ††³¦d¹ô¥.™Ô|,Fjq–‘Ù{B<”Ë[#!¾ø (×säöĹ›|Ò}›Á!‚®71XµëQˆ¾ëŸµO^»+†DÔ³áæE÷\nÓ¥q(´Ã™ŸóÄNËd; [”ï„Ÿ“ñä.ˆÊ›Ñݦpg>ʲØy¿Ù9~þv™Ð2g8h-þ® ê“&|±8SÄ|ªÄöcꜸgG³D©† ò’x„SI"…mœð}µl>_Œ•.™æ,2%—ÞªˆÃZ§T¥ ú cíéäVk]Š’O­‘L„ct  ‰"˜ZÙñ!Q^Ð,#’aÑ)i?§abß”n‰½íê¹$¸ã|Ž®§U'H-¡T"²!¥ØHÒÄÖW¢6Šiåƒ5ë³iXyƒ¢ÊD°„‘ecëîtp¢‡)}”G÷¾sYFXâ× ·Ó&×…y«¬Æúéîû>Gùî6÷ù4Üô>SXpÿË­o$6Ègµ®IÄÓd yaÒÇ befŒÈó<K‹“šõŽ©±„u×í5ò¶Ž”nmÈéÐ9ƒ 9[_‰­ôl¨‘özN;Ðgô=v÷ÚÚeÏñ²†QUB­÷›ä`Ì®šÜ¦´ÏÔ}[‹Õ¤ëL!1 L ǨES!ð*²30¬,×ÜÑÍQS,5ûeu•™V- ¤„€'h¤ÅL54«ÎÓ”÷YvQYcdÀl† ’ ™…z##2 ¦IÜb½¯B;Œ€ª¦ i,ñ!¦N¦íç8Àä ÒºMg†c€bÔvÓ 2¡qËp¨/¦ÁcB©N昈“´ÀyÁfR£1E9ñR( ÝÕ’ Ù*òÏæÞ«¾÷ñ‰˜óSvw3\á&y ·R­'h칤£×B›êà¦2.…/a*Šû/#¦N5BÇõáÅMPT—Z~mt¡Éƒúì8ÒËšú—^1gî©YÈœÉH¶kÛDéu¡Øü¦»å“Ž¯wŒ¾Àù¥dT é¼,}’5Mça§¸l Ñr Ó,{ ô¬ 8ê(#r6GŽïÕ c×ö§,IÿC\?9:Sü+,y‹œé‡†ûËh±>"6Àk<7’GþM’²4éøâ5ƨ$µykŸ‹Ô‚÷9WyU…ºhÕSë}u½!#Ô4Ùl´©E«DÃahÿ‹¸ ”L‰t'Ã#õRF¯=Ül%œëŽêÓ?ô{ÀÈÏ^«b]Ѻúœ¾ÛtÉëg¾ À»ò|:Ðò þ¹²°Ä)$çþ&¥ºs^eZÏÀT¦¯ÿTyï4(íÃ23ÞÚdzJ%ÕYÁk„ˆ¢å‘éêäs|؃îÝì6x'4Mƒ»|¯·oK1¼Ÿ”ûÐÄBH4¼‘U%)ôµŽÙŸFB¸+‚eŸë‚&I(€ûìâÒåKþO¬êïøMér 1ŽMÞðJº†ÑxÄYÅ°Œ;ªv¬}Ä1AT…p¼¦1[=ñŽÑÕÂsL©ÈD„”ÞŒH¬´*L!Ez,>”LDf÷nŽÉ©0N¢0MXíÜ6M²>3O= Îf)‡—›{ä¿gIñy`ìc–å7¢\#yn Ÿ3ˆæl‚×O)§ëùX2É4K&n¥Ê‘Ñì$áŒ7䫪º’""Ù8ßâEF&¾ä×YÎkj¦r¹ÅÖéõ"&>k4A;PÑDzÀ$渳bì{áñÄ_”Pì¬M9§p>ÌÐõo£Så[z¤A%ôÄ8òŸÈQ Þ-Ýõá(\&Í3§Ç9je¾^˜Ý4»äà?ÖÙ†™•ŒËºã8-üJà+òîj7HWàiF@î&*PÑ9î ¤û³nÖSŠÉv˜aA]D I~g|ÑQÞ¹¿ìJi‹cu”Þ2E)1%++yãqcFòsÑtÚ°]J\_õ‰Ã%vÝx—Žãäþ›cˆæ±ýa©ˆ}22ÌR1·ê„ §tà¢ûNl(4Š; ‘]Êœ¦ò2§gló5ª^áîNö¼‰d¯‘œûÄ®nÖ÷ÐÍ)“ýçú ˜<*I ÿÈ%ñF™}â +‹È•®·JóånVë´[É–“ÊäÃt‚óä#‡eP—:wµðÙrû5f35BpKµþzW»¬¸«ÄòN¯%äؽ2ÄÂã VI …BdÀFÆ †ˆ@›,ÔôPÎ6bz6¨l•Vjµõ¦¼8 ¾ˆsN+KI™¸Z{p™„s78¯Ò+-‡ÀîQþ¢¤„ofy.„ÜR¸Ï”À-¹>…·Ïã%E” ®¤Âà¿›¿%«ý Ö¬V«¤#4zÕbf$nž›x‹³°Àë&·œ4ÔL)+×ñS٨Ś¹\^d‘vnµ@Ô²´ªÜI¥ŽÊ‰¤3D>ƒbࢅ«²°€S6\b/èºA59ø äç ¯Òc+åx¿üT,p]ƒ,d j?S@mò$ÄàõT„ÄÌOYÙ‹?—~ ‹íÌØ3Ì6%0“ÈÔZè]r’î$¾Ž{ìEZFŽ’¬˜ý<ªŸ j¬y\{®á–|ÁÑCS{cÖRdè5×À‹œcR-qÊ•³[Íh ¼4b@(凅§HܨKºý~팣…IâÅt2] |£?9•®“SOÛ6W0-ȲKïçÛÍ´ØV¦†ä£²%²ô°æ•)Ûvµ„“ª7%õ›¯›pH×$k³é®ƒX/§&;š–BS—1+c¿éd~ìåÜs˜EØàѳ>q9Œ\ìtN†Î|d5ž3Š¥Ò'¿à VÿŠ'‰ñº(ÉÈ.ÖõµvÉÊ¢TĹÁäÓ”%ýç‘{s²FkýM’‹eTÔŒ(ÐW½ôß:YqIb†Y¿ËÎ0€—Æ { ¦ÛUv¡ ÎÑ(k’RæprY7ø˜»oNЬ,˜ùÛÕ„süèQsý¾°Ð„ ­®7ïÝ5 oŠ8‹¦8[rPE0™v½`©®hzndò,ˆÄdËêâƒÆøçèR¤bÎfýQ½”Ç)}ÒÒHrçÎîÝ`6¸&fƒ‹ÞÍ]­O]&õçÎ4˜ £ÙZ«ÃXÊ‘f”V3µÓÜ’ü'?Ÿ.×$uÔ}ª?}Ü=ÊÞ¸^¥Î¼{âeòýæÐInVÿ78^vÕ–#oèüüõ¯÷óŠábÒaœÃ\ÞÿñçåóæJ“HCk 5ÿÌø‹”©WŸ ᦲrºøÓ1¦èfN²ž?‹I –ô|"­öÁQÚ;"¸+<Úy¾w\CkÞ{v– ÃÃÙhžîôŒÅçQŽÐ7W¦ SCÌfýë* 4ƒÛ¿ZÐÆG‡—¿ÙoÛd÷¥•ËÒŠWø·(øžC_SWªÃ4ÍêM ‡ç‡¤JØ?1oéTú·<|h¥"žD2NÌáù8‡þÒÙ5[Û­4¾: .lŠø-²7ZõÆWîb¾t¾'w­!lApçf ¼úVÞ²åôÑøÕó×mT®gq#øèuâo³<ÁDæþPÖ`.­Ê›àqí/ÕÚÛõ7ü…ût£ö—·è¬U¹km­M·â8g¨éá-O~Î|2ðå04ýŸò¤ ÎI:®I´†Ñ$8PÅõoëßEöH‘.²Æ•“Dâä¯-Þ¢‰øÈR>xŽéÖ7çŽÃÙª‹¥ôÃ1œ.m¼vµEsÒy›`Tl^Hc™¼ž›Fùã1e¼I&?¸äš+ÒŠ£˜·Ùçµ1½C… U,Pþˆ7Nÿ›-¶Äï÷[Ô.öúIàrΉٶ Þžî‡ç+H™E6õ;å¼°;x1¼®ì&pЈIv†H+ˆ Æ3ËNÂsHx¨Ìè'ñàðì¦N.ÑÀwàUƒ€ÞlÂ^È)Ó&k92×ñ8xóâðé^M$¦pCÎx¦dþµZ—üÞS¢rñ-íº>ñux/éOœò>üL.¹¶Šú>Õz³1,á8a‡…©:‚ÀãAÏœr0voÅ!¼ï΂Êú¾ÜÎ\¯S}Ú¹hžîµ%JÆbòyê[af¸Qm”mÞ*ûϽmzJíë³j«Ü óäpœë–iùÌ$&D#οnd4ð‹ e4ðÝs ZCopÈMñ`¶¨6˜·êŒµ È8ÌP[«._’È )ŒoúÀ¤¶ÛðÇÖÔ–ÌYÒ[lÊ™Mf$v¶˜æñÓéêBl@[Ð~&~ZÇÓ¥2Dzr±Úœ\8ø9Å%3Hþ@F<˜¹ƒÀ3×]~¹Å5;fÎÎp7ma•FbúG<Áôpä>&åQÑF6R‚ˆ8D0Ò‰Ä/»ì\ËÜp˵’ù1ËM1¦…y3ró(x;:Ö£3«ÔNÇÀÆjðÜÏqÀ%gtcIã‰0Oœ†ÐGa}Ì­ˆ±ÍÉ…·;…ÚîuObc¬Èáb¦Ã¯;DŽÅ&aßWµöNíŸÚ暴h¼u¬d³áe4i.¶c;']¦DD)A·"§PÄ%a°‹­U%8Ãû!`¶þ4JŒGÚðaEŠgÃyð€i¾êLÞ3…P8³ ØÝ5árœYa¶šçÇ{GpÄìJ†.² Ê~ó‡¯74ßBV3TsæïaS5OS1ìþk`GYŽI´1ôÊÕMKôŸV7KM]n-FC'Ê…™”ê¤Q ÕFÑIk¨uM’, ”‘Úòžpú(æÈ`Œu„<&ÔØÌ“-,(à#8¿Ó»ÃäÖ4ÀšºÞQUιä´`A‡pÖŠo¾Õ¿Ž&cH°—…:'Õ|Aê ²°5i؃n¾ùÚÄà쟓ø›iÓ«oþº“‘$íR>NVfK%ŸVæå­DF©ì€,FÒÛ–v åb(ˆ Íhð^4ûлlåìŸì¾ôꨆիâ$Æý}QI€Cá˜íísþ(Ó—mÊmîs!ü¿îDæÃczEpsÀ"¥Zµ¢’­y;kGàÓó:~Ø@ xÔä'¦Sy-&—ÒfîN<kàMø_~:Š„Á2ìJs7„©T¹Â×+mèÑ¥…SH{ÂøNww³}î¾x±óòéIIxäPÛ»/žâ*PÀÒ*´D&ÏÆÖMË›Â芷P s!&~d‡È7¬Ôùª”w¡¥yíþyB5¶)†Eôÿ"ã©áIQP´‘ ‘Œ5è†ÐåÈ´Â2|´B¯ tàE—BÉ—ß’/,ܬmÝçÔ0õÝhˆÖÛÃ5ð/„Ѫ$¶.»dê ¢Ïþ9P(¸ˆpÜýŒ7ý)3%S[…§,ƒküÍIFÕbôÜ&<È8aãg£é%?ÁMÁ/„>‰¤Ù²ŽÖ5n¦†/)ûô%a°Ô—ô\Nȹx=¯=©Ti`l®×6+_ÁÎ UMV{L'IÝ9„…I5sLݨàÙH½²ŒóÁ:Gƒ„Œ­Öze¥ÎGÉ\"+ø¤Þpž¥Mž‘¢ÀV&·Éd<Ú9ý‰R˜[0 @9n]ß²-"ž\ÈÆÊÖ*ñb‘ÂDW÷‚T¬‘Û¹LyN=–Oó Ì)ÆkÓgÉ7#Dôá¼D_4 }äQ9¡—ŒˆT×ܬ­mzÉÑò’»A¢Qbb]g4Nå=!„ /›ÂM$yËŸÛ•ŒÌ$ŽöÇ!«/T´™Ý–‚Ú_×·Bçy˜¿º^^ç o5óFÔ„=Y´ŠÒ¦­EGv„ÉáÈ@áÂD±‘·!ýá9Ü6¨6ìL.(/.eê\àÑô…Ãä|Š—/‰xÐÞ¿ó®Âñ¼ð CM\wòw/Óƒ{ ßa—Ò±†æŠ E“æˆcW]QzÝ~¢áªã¼„ãA²D"?)Í!šÁ^ÙÞY,”Åר³b‰å?œÐŘ\ÑE·K¹íK©…)DFžüÙ¬ÖIžýÔÃ=ïî²Ø³§Ñ?‰œPÐ’òî.]o+nš.mëa¯“ ½Úz6‰ ”ˆoÆŒDÒ|gÃ?‘‰áîî»tÿó K‘wžÚß\UÕƒÎð}¢»£ÛDIîIŠE=¶±µ5•Ù4M©#“ñÙÝ âá‡þd4$±³!)8œê)(è:pb*(qàAˆWCh¿Ñlt¦ömêQËmC&oËêºÛS+¤ËºoœìäfÙDìIÉðÈdÁ[•RL|v;xìèH n03p:*Ö©±üFÈ®Øal0¨[ý ~'èò•!ÍuýZì½÷{9å½ä ü¬GØŸ/‘4Ùå:JE…#ˆÊ¿Gèk»À[‹1`Ÿë;I~âÀ•¢ógT\£,WÒH‘+‘äÉߌ69öÕU<í˜P´I][X毘c¼²Ì)^yø!¶¢¢1¥£Zùü³ò‡»þ§ nñþ[“d‰}Oܾ3W[Ý–f_. ¤°»ëÎpjj_Øßõ ÛÙÄdŽP¤g"Z#âǸg&S<ñ}ºÉ’X“HÂ]Ÿ7¬Œ¨ï(èûÚÅŒNf˜›€œE‰™È¹~±®s›PQ3Š,±ây»¥n¯/©Ül¨‰qû…¤ChêxäDÞ¯Y¢ë"e–VWÈÛiuÅ&Z¢Àc!ûš+è×7k¸#^;&(á˜b#9Çmå@Õã~—¿ GCý•wÀNN<+ ­[3]Œf «sÃú Ò«JµÄWœàkn¥?e,a,¤Ç8ê³G÷Yñ0 QbÞ %ôê´/m` ­¨¼ÙŠÒ.òN“+MÚqÌçvàtõ¤¨+)’é¬ìX°»†ä Wþè.Æýiðý÷¨‹[ Êîó –¿s¥”2«|t|øüxçÇSR™yźòaòé#v^}z¼<<ŠS¢õYBøÔÌÈ&ž}†ïUÍ!Š›:BåK„5¡IöwetõÂo–íV¤k é“­U‚ŸílE^ØRÉ:»•_ü…þÒ¡üÃ}¢öcó¡ÿT,AÑvà¦&f®huËûiïàhï8xöêå.Á< V?¥',   ts›Äm܇ö5`ºötÔ¾~²‰gJ™$2&ó a:óÜ ùÚ Dx2ˆã¶®û7xªÉV‰m¸’€„3UsPÁCX1‘€#pHÚzp(¤Ü„¿0d” n]+½Gò­jYe,DD5&Þ*Ñ14Ôˆ>OªÌÂèÕ&3±“Fƒú”íopÄl(R'á³Ù‰Ãüa?‹^˜Qv G–$Mò{$ÚâK£/Ñ"Ë(éu¥´Ä¾ªjÚcÒ–£N£Ûpq×jð Íe¦3´ZÜVíz»ŠÂ© ˆð,þOF2«î¨SˆÜëXZCöÚëò3í.ôñ”ô²#2€Û¨¬11@hæZÞXÚ2B×Där3,Bl‘¤ÄE uEìOi8ØÁÆæŸi7ÈÎA[7!GÄ*iƒ+ñPNp L,X~ƒ¤Œv¢˜w›Û¢ÀóŽËÁÍ i† õ&Ó¨G÷8ðŠ3Çfw‰œ^›ïÌ~Ô®3z¸w©˜ ÉøM»í~/ד¡-_&rÖ’Ý8AØÕ¬€ÃG ;ýq-Q’A ‰nÃwéKtùaY].GY¦·µDýR>¶Åx¶¥ [ÑŠ”éó­E³„r?ѺhGGˆÖ( ]RN8#MF]³øRC »€ãñqGUS©4jæ‚À ?¶îŸl> Q§÷ÌHJçII2“cúÖè1*teälj-yObžmRlŒ••,1ÚsšþÆ‘ßJìQBõÒ–‹öWƒÙlMÔ77JK›ˆ#¹¹“Ü›£`šsï  ·2±á·Œ.k‰NÎó•]ÜîÒÇ=ïdû ó,k—F&sC¦,½žÙp*ËoÅòc-ŠGâî/Ýon?`•²=䋯e4;<1§‡ä æ[Ž,±Ùwãgчw&$1P),ÑRX‘JíNÛ»¿ ÈÒHËò0œ“RÒ£ŽŒv%LGzT¤5u/8îàDdDd6s–ŒhÖ@ GœÂ“ÍŠa\„EÐg¡—OV‹€(•f\&â%\’w|r/AÚžµÏ¹ÿÂAj9›Ô¡-‹²Ù…ä+¬æcQ®Ö\£ ó¥à\CÐz×…?K„X\Ìñ˜p†­½!Æþ Äéöäì ÛŽ2y[‹¼*Ã9Ž;- 1¯’ÛÄ'/wå2ÏB&tèœ3–bju6qeòü^}UráØ (“Îõ{4zÝ"C¾i’€"Õ%»\®§e†Ð|·FÍ4] c‰œO*øvÉå!¢¤ñ&x»^n4¢,…¿#ãÈnÝzÌÂâoàŸÍTØKz¾Öq¶ËЊH®í‰!8ûªî!›Àk˜dú«þ4H³¯ ÙêþpX=ºÈóPÁ¦yàSÊP´QIm±3·ùX žÍÐg/728@ŽÐ.Ù$#"²V‚tñ¹²¨ çŽè±ýu&µnPÎÖ0§qšxsYàB˜˜qÏÍa@t·éˆ}àjðL\NĽmµâØDSCç·º¯Rɯ(Çê¦Ï„ ¦Æ²†øÅxÜFN=i†É]y㮼yg¬0<ðnxÁÏOò%;E]Èvòz(?É渂ӗåpJWŽØËS8Á;»ÇÏã½£ƒàðx¯Þìùž‹Ä<“”„êÂ’cuÕÕšD’ΗbaiFÞQÉ}î¹a3–oÙŒ¥¼¡É òWµ\ô.eT•nvS›uÙɼB Èhm^vŠŸª’,©øÐQÑ8š™ÏTÉ âÃè½ðQÙÃŽH¹À5¡l…ÌÂ5¬º:Š…Â/3Œ–B] s$`9hºn„ûÖ§1“ûbÌŒ$ΓИJÝ­3wÙ1äBqv5ÅPÜ·ˆ7?Rëü‚ƒþ²ЇM[Þiëµ+á»?p×½Õ,BTý›¥7Ä‚Ù-ÿmÖÇàŒYá³’›Ä„pvZÖÕ³€ò0Ôhýó=Ï'œõbɵõv…\â,´pï÷{blwûã;‰Ÿ³Ç©þ—¡ss^g¹J¶,_<<±ï¿óó2ÎGË‚âBXPå”J&˜ÆÌ"ˆj3°õR –Ò÷ÊRäýœ ~á{EUÝi)ÊwJ,@4ù¥ÜX³‚Z¶OÃA t®–ôßJ½ýy(¿Ãj§í?™Ë.d°YÐó‡1اÖbc &ÛÙ$Öêyf/œ;’ó,2oñ™j`ÅHFÑEUs‰B뚪¸×jx·^°vFºÞ¬”Ø‘1r!™†‹âs0˜c½„óAœÔ“”8~ÞYª2d·U’Øͱ9Åc°•’¯quA\M ÅØ5l划Ü&(`J•]`†·ì .Ëßà…îû cöõ%¯pÄÕ#b30¡K&æÔ"ξpi8¨!ö5Œ¯ {Iв–0®GTÐ6Bˆ¼ LÙŽÑspÂâ¾×Ÿ¶Ó‡ÁDB× GÜST˜S%¬i0KŽGý!ôZ´ì±“xXœz M'ä-X•ÜWzš¥™ÀÒBz)Ýx³T<ê%ôé*ÊÃqÎÂø§GÉø:3Ò,кºš”*Ô‘'󵻟)|óðS¶ûâû8p‚x(–Ìåkº©â2RšìسMäIi<÷Æs¾”†^Kiüíù÷Ð,X­‡ hRK8Ÿ ;–¤îbJ™ìZòòaªÜ€ÏH $@êÈ(n®ØW ߶Ԝš]±[|Tߎ¨ãh»m«!ú°g­#)›\,uгýY0ÜanØ‚ÿås›´.Ó«ñFsŽ_û"'¿Å¢Þ(Ç õÐ0§m'oÑ0rßd(×Eº©pkZZß ©SY̹ª»¹‚2žÆA™*¿¼Œ,g_ø¡ wîªlýQ š«Óu„eµq1´¼ûï r ¤t|GIé|ˆ{¨€N þótŸ.½Iø „η“ÿrµÀú¿3ŒÏGzû—+‚ʱ4üI"óÆö?žH8B'‹˜.Í9 i‘Ó<˜ßú×CüփȈ"©«{(–ù \IÜʘýˈ\N¦ª©3¹@'«ì‹9‰&ŸK¸.Ê¢Uuæ6©îm`I>šn€(öÇH&]|Ý,sl9è ®;€=ÞãÎuÿkÖÎ’Z ŒÉlŒÂð„2PÞÆIê! ¾¹3˜''ø"–hŽŒÖ!¡°—I6ß~ÜÆ„’ÈWÂ+‰«›PLµqÅ0SPÁ(5⤪Í5ZòîÃE¸•bkšÈXî”VÐéibÛ¥•ô¨Wl¦+,û}i•üÚ¿[—ßñ8wºÝx<%é¹ìaÍ °ƒ‘ Ì\)îRmDáì"‘6Ј[b*eCæÜŽf˜ŽD£çDµQÄ =0Gr0vcŠ·c&ÀÄGv ’C«[ܵsý<Úß«xCênb' W•m0ë îwh –Í´áÑy<¾Ü_’ð¤bBI7?óûÀ´‚šTÝÞá(¿ÒkUñ‡à Î P‰oØOíbDnÍ,¼B°B‚LÊât£.X¦JbášÆJ‡¸O~ég¨8ÃÀa(ûŸðøü\“ìRÖÁ]âÖ_Ì8ÞnDzÇÀų‹:ÎðçnuÝ.§#ÄÇ7"¶×E¥üÚ7öJèá¡Õ͆ã­R/N´4lÎÆKóƒä®„?“>œAiè³Lýô„™4ºC.˜3Úc¤jò‹¥ñF= Ž^8¾0ðºÌ/¿An`d“:Gò”{h}E#œ©Û¨;g1ô'¹qMoöR6N¯Âgƒ E Æ .JÅÉôѲÍ\´Øê2†sMá39ÞÔ¸ZaÜ;I튪 t°j®ŠRñ¿=sÜ š$¡ 16ô3®tú»Œ+Ò°Þ¾l…&Àöº:A›LÞ õä¤þ"es)|”h N@ws‡›»+/r»4z_œNüX³^cÄ$\i= ã‰úl5?–Ô[«j·Mq欯gmÄ=R»Ád´:ôn0r6U"r™4oº»ÏNúçWÉ證Ź^ïô:å>Ïä3áÏäÊ)ÕýæzÚíÒG¿Ï¿˜ÊŠ¾ÇüysãÔzsþìí›ÇyûWz‡ ŸÿÙùÀ]^Œè‰ŸÉ 71“±)7GÖì™:¹;CErŒ¸ÝíÈ_šÁHÓ"Œ6G¶“íÀ6ŽoÔ§$ }YP2º€)Xú É~$ý¥¡ÛŽ:4׋cêÑtaÐͶCZ PH @©‹bÙ1¹¤1ôsóÚÉd%™] TŠÉd·â­#""Þ¢¦¢ÜaP¥T;HIç7di"h ô5²°¼¥šLÌXs³•%kó¡•á^¬ƒÞp¯çdh³"]ÀOàÈÖ¾“p²Ñ›·ÿoõ×õ÷Ûßÿð×0Âÿ­_¯UîÞ•ß¼Ü&8Þ!'UB9|ç+ÏA‰¿*1® aÌA'\˜ƒF60+k9ûOâYˆEo ¥ÜÌûÐYÄ2&á…4Y*ùhÝ')‰âÏœSÊE—wãä°‹¡bò§‚¹LF™ÑüÔ¶qBâ,$z›´hp~ù/oPù£ ˜vVôjέd3­je\O 'qgRTDbBˆŒ5!”5½ k³«¶G‰â›ÈÔä1Õ4¦#N[ÊÉLwš£&ÅsP »¢0Z\P­e½r1F…äýŠÆŽq¥%èU<½õÂTH éØeÂÇÇ[xãŠ]r@#Š12gÄv…w;ƒîl !™M!I˜Û×µìŸÛ¸»<©¤#3½âµO÷{-wL‚Õn{äÏOB­â¡1ÑÑ Ý{ÇαQòè×úzãÑ£í yÔª¿ùµþv½üèQô®Ž€ ›Þ²£î{¦vm«u|˜†H§Seâ《&š¿Ëi.µr#ŠÓ‡¾“>‘Á@1I&™sMÚíÅêŽü3I\EÓhN «ÎûXhÀá{¢˜:F}Ìè‚‘a9,™½á šwdíÀýuÁe0È„J ½pÝxyŽ^¬'ê<;,ÿÜéÓXðö6UÄ\”O7 Ÿ•d€‚¦Ít(z8ù2fDêsíåL3CÓíÒúúz°w||x\uFCñE8c°Ü ÉVéÆ„µe¼x*%v/ö(°°Ô!GŽKÊP”*Mn%áo"§Ê+ÙMNüX¯k`Ù®ñB§´'q©?U/Ÿàõ‰²¼3Õº"¹GñÎt,Æ%ËΨZBêŽ$Jpî#¼!“ð q¯Šî×p'»¹¯“ËJÐ`²DG©ÊƒxÀ¨4 Ö4kÿY1žC@ÆO‘t%Kdw:Ú‚É®WÐJæÊÇ/‚²½0‘\qzܬÈÉÖDÖÛž\%B3HãvæNl~×~›ÓIg Éü·sRG”ÎoãO¥R®Û§;“ù>ržÔ·È}tÍçÉ~ó[ÊOÅ[r’5+mƒ K"´í¥—xhô$˜ËªþI±©…JnHD¸Bû¢)ô ”¨¡£–Î’^û²ß‹G³¤\bfófcâ]Y_yw·â!³š>å”uíª‚”‰Â&]9+˜8à ò’éU¾¸½0“5š 﨤„`‘¦gA¦sZt®“èØ}ã”ëÜŒ—kĨ!B¼Ý‰r+’Iœ…H½C@¬4éJË%GNªn;4â–88é)æ]'˜šqEY˜9Ø_Ù]êåî˜%/–3Ž%&QH¤ÒVÉÈåþ÷æù7¼y ªù?ÈOêžaƒÛ˜¤‡©‹QÀ†Ézj]ÝAnjzÞ•Év3DÜÓšJKqœv·sTaÄòˆä:Íò_·ƒ%¯&ªå,Ã9Vxq4 œfæ9ïO’©»ÿõÔÌ¿»Ê3·´f1J§ãŒ|²Àe hë¦xèEñEï‰e²g®±:­0-%•GôÕ.ã«á`¤Ùò….àËdUéù¬ÐaÅ‘LšÓgã²ÁB¤9I3õ{š'¯vw÷NNÐ6ˆÖƒ$·²4Åá8,`ä‚Ys¡òÇo0,åZ±¯©IcJDr% ùÑë'Ö·¡,­èæ+Â<¬,—ËBµ{«h Ckò!9pú]n CºÞLI Þ³wÿ Ââ¨BwꦓٙD8õ’gQ‚m›'VÉÑÄ¡ cÐV)|…ýmqþ6T¾9xƒ!áßÊÝQ—^Bxbtll×OSDº¡£¸ê3Nho€¹È=Ÿ˜†ú«m2vR1wPnÿI,»òóÑÂPG‰• ¨›Ç•GKc£BVî3_±”‹ˆ+sb£p¦e¸ƒ‡É€¶Ú%ö'©0½n¨]Œ¡€·[k×PeÂ.Æö¡¤ËƒÚD›!giÖ2wŽ”l~O‚ýó̬X’ oç°Éå'‚WÞìÿøtÿ˜álWœhȲ¬gk–´º´‡×3· 1† Œ¥ÜYnåS›å8Ñôš 2²ÞX–ñ|Ý“Âb+¯†zpoS<¦)nIªic—}ùI÷]T Lèêl4 Ã4˜¶¡Ö`Ô»­-ϱ±ø…T5Ý t›AÉ·Ö$q 5{HFƒÊëõP|íIÅiOëŸüòB˜€ì?!ŹSÆÄ;KU~Œó²¤š¯Mà&¹ Ž÷žï½þ”.(ž:GYçjr'šIܙث¡ÄЖÖ0`M (€¸óÏ]¾‰úƒ:·%Eðkc3€qfƒØiF¹-Ëèð…‚‰pZç@àŠQ4ÂÙ©ñ4»oȪk˜ÂA’Ô)K X¬$µîá’ ŸÔ‹»ƒ{àLAi(ña¼¦ X3¼¥ C÷©á@Ôغ§lµ@_ÉXÛ@Œ×!B|å¡gsd ?¸í%›½Á€.ÞNÊTJv³Iè!È‘apxÒØ Ö†0³ós’; %ÿâáIœT„ í¢k@ú_´œ›¥s.c•¯p¤)ýòñÞÁÞÎÉž‹ëºïQF¥0Ûú$㥌õ:ÀβEFâºyì´ƒÚfÄ¿œÅ¾ÿ2WÇæŽßo½“ƒH!-Œ‘0l‰\A‰ÊÚíÊpßtnáH_y´-70A]äÉ«g@©PpaL4X’2¸)è@쨦ñ0‘EÊpïóo/ŽË€äš¬É;üL ``AO¹­Ë½XÃÍv_ï½<}³u¼÷}Œ±øfkçùÞÛ·¹ý)ØèbØXôÐÒæVO,*éZyŒÍÕ®ãF?Ìça `Ç."˜‰öÑŸV ð¼ÓQ~5þj?HêkOj‚º ¤ ØâÀ¶È•#LY¾E.Dìîú͘FRM¤Æô€÷µÝÝJ©„ÑMÁ§%~)–ãCOMTaj™Ö{È¿AK·Ò€që!5a"ÍÕ¬8Œg„?$§ݨ>èDØfÉ©1z«Ò›ˆP'ÎA2ôîm)ECŠ“Œ‹Ç):¥Ž@˜ü¬¸²Ÿ(6ª–èø§,¸ƒ5’æpGÍ™j®†ª(ÜÍEÐZIoí*qrM£ÔŽà‹CRöãa×ÍHÈ|‡Y°:µ³0+’F‰Éô¨3eà¤3äºÐ 4õ=—bøj^÷8wê_l€í˜È£ƒê ðœåDùv>·áŒ:—ƒ2`ò‰l”©¿„²ÂÜtÿw†> ý?ImQ¤£òt¥/¡£X¯øJ)×é¢?üÐôálcñ "ñNd´g‘×¢ï …vÓ%Ç<õŽBda¢VÃ>"–ò&qtÎÐÒ‘q «î(âÀjð’"¢ø'Ž> ZÝ3oÍÊÕ×iµÖÞü¼]oU hãiÌŽ "`mmPã[Hp³fü¯%´ðbeèòebeè‹9±2¬”лñ­0–Ÿhº¯z #åw…‘jên%’ãbõt†§Md$äúWWq¯ßq"èŒ&ª’# *îø„ð¸fV ]Ù"´ªÅ}f¦îú¡ 2l3õ¶o´ÎWNƒ™†æø,ÚRªDDb#LºããE€©ãôwZr§Æ='­¹šB|¥5Rç­àŠGv¬¤vUõ…â‹™ŽÌl†!úYø€°Øó7tÀ$ÏF¦À¢Ê_à¸ßu{¼~ãëÞ;M!”rIzO3å߶+¤Q²k‰ã†Oñ©€v …ÙEÏQ+l•Ë^ÑVhàAWÜ×M¬µB߀v^Ù­œ>|ó.ë/½ÊYH ëÈ}¨ŠV¼ùÖÒZœú•6€€dV‡”Ý T}c #æYj&'waûªsÑï6Ëôa7 ÷=u²eœ ûëk¬Œ¤éÝJyA˜ü›£¶N1@%0¶^a£gŒ~'F=Ù‹/{+Ø+Áèr—ð­0•¡¶y¨öfH!“ªæ`)¨g…Ò„”îÜ–+œT¡IT7áéqPv– ,Dz´îùÏiQî3g!è,åêmþ_ŠÉbb šÕ<â+tŸõ“¯Ì Õ‚€cféå$Äö3å³õTl}5Ö®çÙ½zç&uæ[Â^×ԉÎ9É+ì´**T»ikyu¢",’µìL9/1øÕ`ARWÊÌÒ¬æ1ô…;ÆDêåZ $÷2˜b;$¢Þyùœþ¼Úy¾ì¶wðc÷ô—#ú½{xp°sJ__À4¡Ô‰aQt”:WÜ€•©Ì=|ï¾Ó_¼ý·ÿ¤(ì•[s[uRò›¯{Eß+ø¨Å8óþ¼º”wñ`ŽaºVêŠÈϵË"Ô‹'JOÑ2{¯FÍÀlÓl•#™c±«E¬Å®Ïís˜aväy!¯C‘Cô{ùÑé]õ‡P(qÂéa´?Œå'ÌNèŒÅCð^{<\_é\m¡ˆ1xÔŸ[Û`Ò4ïJ…wƒÉ™ A˜&sáíbúÅn'K/ªÇ°ŒÜtáïëbW ~=U.)L¿ež.âÚÀ© â @q¯^ íAŠv\)|—i Á5LÀ‰ÑÛV¥ìuÒhm4.¶=*(¯~.j!I£ò„¤¨D)pb§\ˆæÝôÏ8¤,—Ãݪ$ #wˆí£mœR´Øõ`™píyb 3%Y] I+gëYï:o‚Ó«1ѯ⠋>-ðûÝü1®¸¹×% t…koŽa™›¼²]x~R[Ê¥ý”y ø¨ :øôêžÿ9U6ÁΆññøÅý3êPÉ0ß̓s2@‘d³þæ»?ÿÇ_ÞÞ™ßo×þò–B½òÒZ¼j êP:Õ½µJ5èN1|aƒœàÚ æ~œJh›£«}=Ôp­ëë%¯ñÀo2#1øò7€ìU¾$ŽP sx+)QÄZ©º-Ã[é‹ùŠ$XH±™À€Ùcq'I.i M ^fÝ­5ÊèܤV NÚ( ÖbcõëZ2¼<­ø¡ÂòÉO{!û™ »Ä½$»¬ˆ}W ü€ qqúó—¯`¼xÑD‰ÑF¦¸\h 7Ù:×X¯[ÛÛ|œw€†¯<N^¬ß¾Ø7XHï;!ÐB5Ã9á… 1E1Œ7TyÙ?ŸfD/n›n-Gßgé.6ÀGLì«AÆd³°0RËÅ+’¿&°±KCzð3oY¸ªgÜÅ/»mXï^`KüÆMà›V«4ÞvÇ-Üz-Ö7·\Á®û‚À#/\°ã|Ü‘¨÷Js¨Ç'O­–œÝ Ø4.™jL½A,’ Ø6ù†a¤›Þ¤1”£§†õMß½†qSzï³(ºj±ê‡Y1›˜_Ž ( 0œˆòOËÈ›œLéH‹ÔhEÏsã£yˆ Xˆ Ò$,†¸yo†óBìå —eFbEfV îÎæ¡F†7T”º­pšÛ*“ÍXÎ8Ò‡jÃ:ð(8™TZ8çÜæïD~>ÂÉß 80K@F‘ÀèwÑ߉2ÏÅ€îºYù\)ÔàÆÜ4,ÂZÔ8Í„EžNwao2g%ƒÐHÆÂi%7iU?éôìõS”!ÂU±úf.^_)Ѻ§=í !GP¾Q–Ñoo°()Òñ‹óŒíVRtϼ8ÖܧX!¤Ú.ŠUít•îÚÑ®LÝ W1ör7o•&äøN™(z`ß~…E¨ÖéÍ®®nYáœl;dž /¯Ô_Lƒ ±„ɱÂÁ;*3:áËX–B/d ƒoQ¹ýf§öÏNí÷·[ü¤’™ïšpÉ`Q*å«ËW86¿e× FK*ê8‡øH 2¬©¾qRud¥]9ÔØCŒÎPL¤™¥ Ke Ø¿Ãê¯ÎgÓÙD…òLr˜ø VÚª“Eêìçõ¹fo(/Œo¦j¨ ®/YByN¯ã£`;ºY½ïýw´§KYÔ¥Må$">kbÈ$”Fµ5>]±%¦Ù±.úÞú»nƒeg¹!"D”c2Á(`K2ËSN·ML¼^Uj„|ºWˆÃñBÑeêj7Ržš¡ ÆîÜØÕ„à\Õ¡ùàA#ËTÍØ«>Nk0Ç&-c©gãÉú”¼¿ï¾ÚÅd–=’Mf˜K\ñxÐg^…€²TºNx Û\­MZd½¿Æ³ ´H”N(|ÊæÂïiì åõ3Áf}©ßz)d•>'8[N!Ëœ! 3Õ%óGƵœˆUæòlìþáÏuüÐ…\ë×ã:ìÚø¶â0\&^$”|†iä(…'2ÁþªÖ͇ QŽ†í>V2ꆔ« >b¦Ñ¬š–JÙHf7Ñ­¿•…ís¢P¬§qoÖͪÃÜ)â֒é­ï[mòk‹V&bç9e¡– Qó¦99'{¡Q«ƒw%]Ãß™¯5Ï°ÁBŽâ^g¶šŒL«‘/„I¼TUØ]”3Ç ¹&¯ø;}n¼Í»õùôptw[Í?4îðÞ°ÝÃ~Ÿ öv$Y^ôjN/&tØ‚l£¨Ç@°Â)mfD£ˆpa BÅ¥ÜþRn6|¬¹Ë¨Êã9é«zX†IÒ·Ä¢9ÜŸèÉ”2Z·Ôô:“ÓvÞr82+±ÈéÿI‰æBŸ#!— ºüjû]ä/¸»®:o[O0µ³ìóÝÀ䑳&€¹‰ý•¬‰Mæï|ydÖKÛúMD®p$¬ œd%bb-Uét\tQGvqÑ1"EûìÖ„´—@Aó¥!ê„ äËæáÚ‘ó0× ÿ;Ú2¬øÖë©5° ×ó„ÉD¨:‘XŒôHhs1WôO&'ßK1DéE%«|oÓá ŸHIY—(šÉäx½KõjÍ“-ƒö•LÑépüEÈ_üR¼¢3¦Æœ<Ö¸K Z^dc' ³aÍvtÍ.ŽT&癘{Nõ&)´P¸š—[aÅêŸuþ»C¬äreM†Xhîå¦Ðdî@üœ#®~%,MÇH× Q*íׇ0ýcýíQ¤É.趎¾lÃŽ=½»„y¶7cÎJ“êVE<B›³œ[ÙuïÔæ«qxÎßó`Ë›¸Â)§˜+‚Óh¾Q“™´i”Ï*Æ,WßýnS­ZîÞ¿^ÒÇTèoôΉäo÷¾˜Ô'{E¾!p46KÝdÐ'*vÀÁÊ‚¹#SÅÀ& lR~¤! ZV¬ªD—„#$¢ È-Œ¿ÎŠ³dBRåe)j úŠp¬[lõááíuçVÉ—®:DDºÅõªÒ+ÅÃ9mù—Z[.Áµj¨˜Ñ{WF&%¥”Ou¹oÈ%)ïµ:‡lð8¼ Å›O9øb;K ÌeZ*Ù¾– •Ë6eùädÛIÑøÙÃïkí¤Uw•×VáøÂå³’}x Œ@^³1’¤Ài”éè*¦4çš×xÐóÅMt,þS™F¹ü2‰Fƒ€Ó÷H…éFs“weY>Ù.íßáqóSrå¶ÈÏfd·™~ÝRAÙ™ƒÛiÖ#òAB>gÊ)iö>O¢—gE7̨Œ³oŽ‚ç*¾:c]'B·bŒíçSEy¦o) x:ù*KêÈ|¤Gz;ôÎŒñ…w¾`¨iëŽ:Ét‘öÂŽØ4ÞKO]Ö˜mŠA`f”j+J›Iøî;žÝº‰s¼´HŽû²m ûœ8´P0šô/PꀩwúÝö¸„n”<É(M¬%Îø—?Ú¦îOêœRšè6â57ã(^éñ:>\ݶ]ºmÃ<4£n–7õ!¿Yþø¤Fôñ½yNÊG{·zõ]âìͯÚï;µ¢§Ì£6‘dÒ³™‰½-JÙ®uÐD^P;œÏñÊ~ù"…+.£3àÅxé`bc‹ìíhʽåõïf…câðœÄM= êL»Ì]ål¶2ç9-áàkæO”ï~óÒËàåØð×»lõÔOºhlÊ>í擪iÈyÐlÎ8ºA¼5©¯J9HU+Üxù#}ÞŸ˜o§l tÔ™$Žœ‘ Kž&'u“ª)`Äg#4ž1ÑIs†%«“—© ó/^ª&el¬» YÓ“EæZä›ØŒD‘¿G|â«™¢ë lð¹J0áOùèøðùñ΋` ]uÊG;»ßy¾W ÊÿØ;ÆpÄX§´Ú?ïÅçA»Ýf þWâáA+Üm…À­¬¢eÄ9• 4àx» Mî¶Ûçkkkæg³|[¡‡òèÅþËÃcxñ¾¨àêØÂ?à£ÒêxÒ¹¸êÏwwƒ^¿s1Ä «k‚PµÂÚÏxƒvÑ´a4¡3FÒ Í¨`ÒGóÉÞÈ“Ûa“*^#.2úÕ·Õ`0½êô‡øÙf½ú¥ˆ-ð1# ,‰7ÏŸ÷_>ÙÄaÛ™ïþòžÂøݧT®ýóîèéÎéNÐǼ–S9‚OrÍ¢æ€ ‰Èΰ«Cµ)(ˆ,3¨ê˜|T«AWµ X½(I¹¢ÂõqT[§#ƒ NÛON~yÑÞ=|yr 8ð6t”œ·Û8z²å4þ‹¢…íþv‡¸ `õÜáQ€JôdF+—…}*+xË­Xp“B'§Ç{ÿw-Ù¨Éf%XXè^èôh\ƒg„ºÇ…=?¶½„Á–âArãAã¡i•\S3UYø(^9`ƒäÂc?Oê‡ T>¥"H˸õ#ßm“£ù· "DAÈJE„hºˆVb£kãýe¢.«q—í¶Î¾%£ öf2÷"ÔHˆQ_G›/läÔ”Ðó—›'GïTا­7aš¶²¾a°–n¨R 48€q¥Ú ôªòÎ|‹éEÊ DIsH”—Oy\ÔÖ:\ÚNé26y$¸ß¸g’W¬¤üHüyÓó_eH ‡Î€’ V„ˆ¿Aož¡††ÕŠ¿º'¾ÜèEô8iüZ_Zku”ý`H—q„Ñ÷þ*¦æcV3¥øº+£þÁolFT2‘±$⤽×G‡Ç§'ÐÝ⬠å0Êo(Â,Ò™ãZÜàŠÉzÅ‘rä‰ãæCi¨¦ºÅËy[³þkùm«Òhá¿Æ…YûFÐÐïeø_FÁ÷yãŸ;|(¦!œOÉùÂzÁ÷Ÿ}` à`!$¬| XÉßЛ(Üx#Å›Éðet5Y.Mï¦_,¦ Ç6ÕõjÒ×ôvŽœÌN$gC–ÛŒUª)„£5Cº¶žÎ£3 ô®¼[µ˜Ð \e¤Å´H+iø^œ'•™§ (ìh:$Bm©*¬]¶µ³úÓð6ºNMOá‹~¤y+aç’qêuz”—;‰)A)Æ”¬’U7%aïÂnŸÅYE„5Ö9 f5‹·w¼4ÖwF¿–GªÐ@ÁïÜVRr¿ÉœÁÏ6­äÏ]Öj²´6„Wm8 xNuöTd4èwû˜lÅX¹Yξ÷Aò‡ºß`™í…qÏðTµQ·‚?0–Y>hO§ ©ì¼|MPJ×–w;ÌÝ#@î>)õCtõV_‘^ 9ço€/CÝ%µ?óXWctÆ3¹­8](¤GÄT8w}ò©w»IËïÞu 4v+,¤²[a°ùC£h 1ÜT>Í}—‚'½ÁûÀ—ìY‚  ¯Ú§Ac;ià×vnñ4ÑžÒ{âØO}üº$ÔªŽuoúzÃœù5’àkný* ð¯[a¥bZ•}€q­ñÆT‚Ö×_o7\pÚ_ò—^EÆù÷¡ гdÅ/A³ô1øØJ)/[aÕNþñ}õ‹M€ýýmÿåþéß¼~¾¶„=Ú#*‘Û€ódf’ýªûb [Y€ôÚ#„7ÕÇ®Kl¡z£?¤g”ŸØŸ –_ÑÇÞ†•î·KFÂ®Ï ¥º¥|ßÀ|^QÒÛIch2 «É'ÄWÏŽ÷öàEûçÃã¿ï¾zùT:£/îÉÏ#Og㵠Ḡ|„µä±¾wõzi  ¾Dĵr´ÀW.ñàÊy Šv‡Ð&i*ÕöØfÖ°¨u¡XMFW 9à”9"“UÑÑ(©á°i¡tÞb‹³ºYæ³Ù…fjf7±io);Fó¡D”µ¦]‡|Îi$Ö‹Ø“bëíïª[Vü8#û?Š¦B~ŠžÁŽê’´ìM–éCíSÎŒH0ß &fê:ðÍúfý;ºÝúèCÃvÄúöI}ƒH¯õÚzíž%½ÍúúóóIý±÷;œã#9Tù;ˆF/:üÚÓ,@jälör<»Yºµ0}¨ËjâA©~VŸo§ÇUÚ]Šò×dQ!Ç¿ ʧ»˜ öDE„^t¼LÝ1ŠÝ¹~íïÄÃðºA??Œ©æ JXN¡iûÈÎA $»Ö}Fž¥ÒaWÑÓÝݲßy­‹QÁе èsZ¢rî"z–•(åε‹©Õ¬ÏxhòØ•|òqRTœkhÌçûièÓž8›}Æ9æ"ß5Ù{'¦AóÑ@|OÞ^©‘d hÄso /™´<ÖO71Ï$ÙîuœB}V›záEUjÓ‡þíѾ‚²]€G*€T;ül§é7_®WËŸ|æŒÿˆùdÚdϹq¾ð˜¿üˆ-róBcf]{fÃ÷C´HfçH k!>”Q˜g8ì+R$U Àr1Â{ŠÌ,Ѥ£#S$!îõ{h²BÙ3ÐýNëúĈaÂNM¾n6F?ïôx¦²¢Ó’ø¸aZAÍ]wâ¿Í[ï¡Pѹ|Âvvõ™\'Ÿ¶9M±±§lºA4Ó¾ÎKfåÆÎñó’Nƒ%ì¡;J,4\ÂÔÂïñdDέ³$X;=~×Ðk«X“,Ÿ¿|…fú³iˆÃ¬/©¯ÇÜ Ô¢&‡£¡×곃hÖ䣋ÎÜ‹Y§oÔ™'ÙÛXlÑ]ÔËôj KþòEP,àÃ…ÏåÈ®w…¥bQ°Ö¾Œ;½¶ÄØ{\ûKûí7í7ÞÛÁú]ÞÃvñ]¥L†¢®5táXÃœM¾J¾äƒ'ÈÖºÃüÃvÖvòE6–÷µýòÕÁA{ÿêªÛO÷Nv÷Nçíš7wÓXg /8ASiU¹('F€ò$´=¡Eˆ XTZÅtØ1¥¾ŒÈ0åb4BŽâ’ó®ŸÁº¯³ÙQðfïp¿~ê$’Ÿ¼#éðp0ØsŒ&=¶¨âÎ4ò"ü–V™•A½™5#.£Ì;a Ó…öâm‰žöɸ?µ&°UŽÒøä>ß}œeHÞM}¤þ2ë“ %NŽ“-בy…› ]­^í (o¸zÜ4¦Î¼âlW¼Þ™´44`KÖ°¥Û´¹ö1ã±¼&ä›TxóßiCRm éjt»¡V»˜Ýh‹( 3oªRŒNã ¾˜À·qgJâB5>5qèu oïþ´·û÷ö‹çû˜êîô§Ã§&¼„:ãe·ßÝ|¼Ômzóe¤u©7²$«÷ÑŽ¿üÞxòýÏU äëRZÕ.:jö ›zµ’?‡äõã.÷º—£$î§`P¾h"õÒò[• 9pMv/5ߥeò6–ËŠi/jô LbÞ*ª–7Ãœ›šõb_wG€w0°+L]ëEaÙNm5>Î÷ˆB\u&ÈLw¦^. ƒŒÅ ÖÖUZÖhç¨k¿;ÇÇφ¼khoÑ…™t5”Bn#ý8äH­}T´A4 /4‘ø·O›Á¹ŠÈZZ@$Ý\wnÔÇ#Å@±8JcëÍJðvÝ¥WÆñ›þÛÖÇêFë¾ÖàÁ4~ÝšÙ½ùuëíú–¼ ’µ…, ±V؉Vôf:.y)FÑ¡’gF@6@…cv.ÒP½õñÛ'­ûÆWÚñ34ÇšÄèA$9Ûb˜·øåsrŸl;‰m¨¹ÐÔAdvùÿŒaê&£ÂÈ ]‚Á€™±ø­qšI,%ͤæ°‹¶¼üI½eýÇgò¹å<»1€Ó6é<­ÓK]|SÎ︑©¡Ùz£)óC×H“&cmÓÆ›V=hMß®—úG¸³:»:ÚÇßÉ^ QìèZìmÈ; J¤6.ÀsÚ¦j"ºNÑ”¯Dn ëœDb±ÆãÉ 9t=™xÂ(W9ž.-i€œ“ð†‰ÀÒTk׃ŸâÙ¤Îl[˜Àø •¼¦6“%R_¦Á0„œF ÃëYPR®OkQ= ÖäauRHG(:“Ïö~Ñ ¡{X&¯ ×+âîÅÁ‡PÆ™‹&&{ú¬Hož<ÞT DƒD­Yi¶Bìï5M“ð’Fñ’&•I󸇄ýhj8p»œ@’ˆw!$3–<:»¼¡g! „B<õëC1‚fˆÏ’IœÂæ¿!½h÷&÷úO3©þÓá~W±¦vÑû|ty2%RZ+ŠT²žÏe¦½a^%5«ÂûW õ;w¨‰â+ZÔeIÅäzÎ䌴;ö¢WTrÄŒRQ‘ÂpçPš R\ÿò†›çÅy©QE6Ϲ©"²E&L0vT2@aÕfNjè¼`)¨„n•ýÅ#5ôÎqp´ÂVv~­°ÂÑ’1 8Jšå¿nc0fŽŸ¦SÙ–ÐX"ú¼ÅN¯_¦/w†h„†£§ü(é±#ÉO¥òQ›uÓ©·ë­Ü¬HžJN¢–’Ç0 ƒ~—ì;ôJÝ RËÛÈ–£FÊœ½™á¼OGc9 ICš)7/"·‘:¨¦F1.… ±/з¸©¿oðð˜3ç E÷3Š¤,YeØœE6X INÙ幞Žè„”ÊB䔜EÌI:L‰ ú,‚î‹ì‡ÇŒNXn (ªbfgÉ´?•èv$ùŽã3$öFÁdt†ÇZÆ#ìÁ2tºï)ç2JBh®âiǪX¸œ!´‹@Dü‡XÏ( çEÈî‰øI¼9j6§•SO"ïqðãh6r¼°Î´bI‡^EAÈÇžüÔ– ýã}‹¢D¬q\>ÌÅV)ðn [~ IÛ”ªy5øgr<©ß¦ä[ø”àoäTóàü‘Fì9åo­ð¾Š|e÷’Ú hxÃ)°qÞËYÒ¹À#ý´Ÿpš^Ãý -rÙAèÝÚEy­FÍH¾¢Ìf ÷Tðò°ýüàðÇöÉ«ONK" !¦«õn ÑRmTq©þÖ;$ÖɆ˜G.Á&5ÛÛ|A÷K?::ù©y3¾øv[T ?ƒáÁ;̾û¶ôôÕÎÁîÎÉ^sÔÒGRîÅßOpaåˆýtT{õ:x«Š+ztx²ÿZìJ¬^` ø!ž:X ÐER¢À,»OvN"†yÖfCœ?Íl2[ TJÅ–o¥°·Â’žËxø¡? ¯¼¨%=Mršph8:bxŠð꨸ÄÊÍ‘ÜÂÔ™èpÈ? š4*Ôšá냕-eæÂAàœ—‚ÒU§;éo—tÎŒ(A"RàY ~Æ “½àq¦,äñ$ØXÕà͸‘-Æá¬n–L:¸7–­t—Cc#ër|•»¹+>n…"Nø û±l'~¤ ä!àæ~Á[Ùщù&Üñbºiæ GŽâÕP$>xp.ל‘“ìWdz6ôÒ÷ß·N±×öÞá³R«¼Qr~£: ‡E3yÓ”Z!‹àaˆÿˆä_èwEéƒJâ„Ð0ðS¶ÀZëTL&š\UÜ+Õ`í¬Â—i•€ú1þÛX\ŠAåß@ Ídn¦†¥¥þÊI‚w¢=8]­Z£H õn…îIÒ1::5º‚°VLk!T_£ÜÀ’׸â¨gCÉGDV½ì Ð@Èb£$ÁíÅø³¢—+n(6A£œ^TˆçF¶Icq¼PÌ®Æ5^Žº4„·k/ÆTâxî0µ. Æ»Ót)ŠMµæ@‘46ÚF rÏŸÅjcC½EIP~Ì4cÕU´(ú­£_3¼MCn2@bÛ@·ê;#gF—bN¤ÃyÜ„£T Œp™²ÉP•R âO¾8ð°Ò‹V¨B;»J• =† •Ú¦WÎ2Lè› ÏÛO›­w‚-ZákêÆ`+%:úõuC#Ã=jPn†ò£GQëiVp 7Ä~ÍkRšqÔ3c{öÉcãT6îÀ È2r ûýY+4åHÔøØ·m¤Ut˜M3¦WC¸GÃþï}J o!¡À»B°ñÃ×›~¹Ö“ÊŠy‡¤øÃp¤/¸\]Ž>ûVÉ“Z1`àánBŒ-7«Â–|ßj•ö_î½<ÜÊ0Žº‘úò¼28Û‚e'ü Y§òáK<âa =?&bR"Ìð¾c80ý³>Ðr·Jaƒ8©”$)ïÅž·ËèÐE@·E‰=˜‰¯D×OøŽé€é«&ö.ñLø°Eø »ð˜–çŒéåñ_Y }¸²ðáìnaÑ€r¦uA^ %c”]2¨ÿºµhü¡ ÑXbÒ¶ÞºfVpÅ™\óÜ6 ßÖýa j¼OS†# ü»qÂláÂc‚ùæášH ]"&4ŒÇ96ر¼ f$t7Œ¢‚L›–N²VŽ§Õ³SÑ’\ß8Õ@ïîõVË»RM]OSVõÉÕËæ­ÕØIë€\›!ü » ŠuDfäI>­r›DÄî®`îå΢L²æZ7C ÿj‚xÖ*×a5Yf†¼%Ëb¤íSŠ|Žª>‡J`¨å&»HÑ)B¡Ü´ÊR]è“STHËuQ}â^Ky‡ïÕþôÃL5ú8úêjízIY¦wƒ$¨ z9ãCSWÔÈÕ~15à. á:F%.I„–šwK&.&HœŸ#²uPŠh%9°ùéH3»—áEìNÅåoZšÉHÙÅ;Ê´wŽÎ–6üÑlÖJAìÌÞz•]hwKÈ÷FnY×ÿÆácç.žO@fwÑv¸x?-U÷*áT­ÑpUÛucË»Â\&£Ð®¶×#.Ÿ|Ê™ì a†Û±Hj- 쌠7%XÔŒœŽ[Ì,áÙÔ— ÀN[L®õõ(%é#VOA‡=¿ãëžYê’z½sR7JNˆZŠûl‘íAš†T|^ÉG¶ž“‡k¾ùU Ž’mÐŽ¼ž"àÂ8@ `„ VB3J\â"6ŽÙà+[·—‘eqqWðÑ”û<7kƒ—áÒɦfïlAïM¸U"‡‰Ê€ü1P—HŸ7Y“VX*¥‘wâŸùÑ=T½i1Ýá<¯×½W)ã ÜÅßZﶃ–R!?*çô+áEsºÚîei|iW«\sJù `®=vLÙâ½ø;œ!¿@ÚH5¯þäy¨2É–adfz:H'f¥@8¢aÜ“DZSdhZ¨šNÒä¿—('ÈΠ-]D¹¸Ò’Ó Bé²Ü6aâ[)œ÷ŠÇ!§21atμZ…ðãÛ×pH¾œ5·P`¶îam‹›ÐœíÄÍ4º9gÏ;x O\(Áß]Ðp‚ó·ŒS?÷o$ÀQIcÔ?£‘-6cC«×¡(gp¿1Fù…e4 #zMB„'Æ=Ú@æÿ0:Ö´É}0ûsŸU2(# !é$¸ªªè° «Ð£øb["àËdˆ ì0󑞦”ñ—  y‚Èd–qi.°>~iú]ÏF¯C“Ÿt1¨0³oèLdíX„Šn¼m‹c®°I¿‡Æ³![B{‰Ô¼†SïPaÛž,^ͬ£¾´0y¿ñ’ø8Pln;i•ý·Š3-ÃÍâüI‰ò„œ>©O+> k¬Ì!]qN¿,ÐU' ¬ÀêptÏ‘ˆ‚ä¤C±í€íû1>< Ž¿…½Üq»$AzÔ–2hlm!ÝhBZTk©fNdšz¨Â…Åf̼²‡Ñ…ÓŠá†9\h*ÝeÛòÙ.«eªã™ 1÷¨4:À mÅÞ«—²Ì¼ä9ŽrðKdÝg¨ºËÞ›FNv¾‰¥¨ÊqûL{õÜNb¶?QÉd*ÙTsrev£DG·!s¿À2œ÷1’cÚºF mXÆv2A» |ÌzN€@ùÔÔ²æ-ÖÔj.0t)0sAÕêBCßÊ¥pøbøÁš0Ô€Q‚=-$ʳëpfTdÛËù0ã¬ñeŒ;8µýÒÖܱcÝáÌîáA°¼‰Çz£„«¾¢zˆï¿áwh‹¾8ÙES ›ý­½{|Ú>ÙÛ}u¼×~yØ~ºwt¼·»sº@+¡IWûC i|ìî¨~ùƒÿ=kèYºSˆçB…ìCØ $!SO¥}ÉPgÃÅ =¥Êâp†Ú¬DOÕ´€èº–n4ù¤§u»6êfæØÎÖI’x2M—CU¦ÿ¬‹£þ#ÀcÃÔÊw‡ÓAª±Û¤^9øôÓ2ïy™öž†pËí¼<Ù7Î$“[“C>ÿùÉ&­™.#tº¿{ÚƪðõCmLŠ1ü¬¹A¼+ÛΪú‰ Èo”[@!Ýý^»UÛ>ömºv>ÊŒ§ø¿ œ3DX”äPÐ6œL’õ:åòtÒ[â%ÜE—JH¬;‡Zš…Â_d€‘]êÌáƒ9ÁG[¾8o ð ·ñ‹}ܽ„bø˜¾ØçÀýw¯áE›¿Ø²tº}öÅI{ÿõ«“ã  _ö^ïíf6ЋÿºáC•Ôøiç{€¿N÷^þÃ>|vx´÷²ýóAx}컵UHﶻgH^·_ì¼öÒeâCxæ¼ôš‡'øæ`ïen-÷u&§Úx¼ù­; !!ܳC ÷½M„Ác‹ÔlÉçÇG~Ix`KL{@ëB¸ÀÔâÓýcXæ£ãÓC‚½ÇAÔˆì+ZçÝV”ŸÄ6'¹ë‹“§‡'©Ü®í§ÿçùÑ?Dr×¾8<ÙÌ@ÖÿqHê6F„lŸürrº÷¢@Ee'ÙÞÄK$ožíM H[‘Å}Zߟ²×@úUmGé+)±©ieÿ¤í½”wý…KÀ{Uaè 0njðnnØÜ[¥•µ‚V)ypî«ö&榙tjæ—³Nv8þK†þ;gŠ™åMÍqùFaÎ,òÚ5ÓP(Ê…«0}&Û‡í÷_îÿâ_úÈ9—zï¿~±spp¸»†ÄD r ¶FOP+qÄ <¡·ëAÒÿ=Óû î…¶„Ä×8+háû‘κãʳ'ןÛ}@Tl÷Pö^ÔDkHd¸Gs0ìýøê¹ö5N>ÞΨ&k’f°±-x.ÿõãm3u÷òV ¹94ƒP(ñšPÔÀºÂîh„Ü Šz³1ż ¬Uâ(ýf…peÚSZÅm¡<´ŽG@09‡eœ‡äœDãXKg01­¡ßFÛ¡ò½’2fSþB‹”­•{^YÄɨï*‡bµ‹e¥\÷2F“ÄùÍa½ ‚>áÅ¡´f6¡bH¿U6Vy;)Ê‹÷îjZÅ{Õi‡œ³—oá å˱¶âå`  IÔêï`aYN•)l¸äГ£Ó}B¶yf)¡&¨­‡5ô«’ƒ’Xò¹Ï;½Ïx:jCEg³q˜9ÜÃv–".Iª:…¥x@uþµ>æ,¿ídܹ*`¬£ˆ hà!Ò”5¼Waá5±ùlj¿M˜óßßú9ç1A=Ê Séé¿þT±È1–,âƒÛö‡~Ò§¬‘# Ùú˜Ä'œrŠ¶Û)æ3”}µ×Ö²%€orš#”ÓŒ»d j™¦ç¶+ôÑÆwãûæ;ÇÖ­™šº‹ö¯ÄúÉ‚5v&Zp1Àxulb[ÝÑ¢)¼ÚƒrM'¤°iRC o[™„›‡Ñ•O,lÝmDrãd2IæáOÚ¨/š8l~foñwœrÀåb™Ì]Ä Ü9‹rºsü|xǵuDƒiÍßñ}9Ç瀴ـº§'pEVÙÙ/ÛÙC{ÂégÅd†f:8Uk…Ã#ŠÏxt¼÷lÿµ$µ]Ï»kS5‚c<ÉÚÔ,j5÷ÆBd+&ÈèêÃÿ ›BÇô:Ìo‚ŽØ¶6ˆå¡)¤/Jhˆ¬á½wBWå3d%øVÌÏøÊ`ÛÁßQµ‰¥Å–°»mJLÇ(‘cŸ²ÊÁH“©Dñ[M'-’ ]ê!Î~hc4vÌõË@nþ™L*ñQŸ¾¥ˆM4ºrÍ!Å2²RÁVe¶PGÈu­[Uš³B †6¹ê ózy$&ŒòãˆsÚ\¡2Dœ`QKŽÞ(,a3}~ Ž÷øø–DÔC4èQ³ñŒé°ÔîG길§¡:„䣬ùü<ÆüÌn½afÖm>6¹çúDË}¸¦iGƒþ7ßHÞ¹R&Í­R:óÁ¸’•®„:'mº› F2Ä@­•U¢…E×AáÔÂÙ³Œ ˆ ½oå8$“…p‘U­mT ·UÙ4¿’ÊužE+A†èáÞ+TSbÔíÜÏ[=v‘BkL5 ©¶$õ<"ŒÝ¡0Wý‹Ù$®Q?àÂÊò(ÓuÎbiÇBï˜aXÙÎWø-ÙÑ^ì•À˜û?J Íªþ¦…zH;îEjsò%èÒ°Þá‰Û=â>¿”ªøÇÝ9Ç®ó‡7HÉ3£Ë™–U¹ÔT^ãÔº#¦Ê+TÍíÅÐXzp¨—©æ·KøÎiš%!² ! #ª)‰Ï¼êU"ùÌ2 ·pµÒtrj u¦õëN´V£‹KLyÄËD 8y0_ˆt£;¡p)´Bn£ù—ÆeöÍiåkšS+µ”N nÏíR ·Ì Bà×3£YÒÅo|¶½!åIÄì]ó3ãKg¨’n Eðf+‘R¡ØÈ„ä.à¿¢ê4(â@tƒºÀ?¬ÙáT‹Ï8Æd6naÛqa‰F˜³ z1Ð&0iЪä-c–{$™" z§'žÓë~WîÏÔvØ´ý$µ_ž CuéA9÷ŒœC’:Š)2“›‹wžv‡7Y_ŒÕÓ· »JÆ5çp8³¯ÞQÙ˜ƒ”3ËÆ$Ž»CʉµG‰ÃŒ1/VÉÛFf/t׃1ST¢'ZC¸t—éPkZ©  ¢½Á±¡•u¬5"%õî ›s—ç Þ[JIy¿ίÓàòô•X "Ž¢!ä˜*€ÜB µ'ÈÄW1Ð`Êkt¬±Åµü‹“¿É%W€G¯Hc@]ÒRÁ5_üY!b–—ìÌTÛ$Ì6Ø=Ϋ¬Ò•´ÀvÍ‘$W´µûëu•a&ÖyJ×›Ù„Bcl³R JZNZMÍ_‰©Œî$-¯¦¦XYö±ˆ·ÞÍa´Xn ÆÔFìò˜Å.*KËJ^2=zo½ ¡jÇ£åú"ëÂôŒ±’ÁúHâ0F¿š‡€ó`òIë$hòw)N¦MPšÄÊÚRÊ*yAƒJ*+€£Ó>jÿ¼³Z |ìá©ÈDVºnÈpÜf3¨mø‹Ž§¯Ó0g°:! -?º,áÑç¦QöV¢£Ân…™=óçd¶é0âA×Èø°R1|´®H ª¸QžáT…¡täc9»É[™ÂÆÞF8 âJ5¡;–uPˆ.­CƆ»ëLÈÕY…ô+ pô½*ùKyZ~Ió{¼ Öø+à7)Ê–¼¿_—â%¯â+ô¦‹o.“t†Œd¢pˆ”Jól hdRIáüÕÐdVòlæ$DÔ&2÷~%ôÑ–Üæ÷¾EižÝ‹ìSFÛ¾yÇC*þ“÷ýq€:Jq¤NÞ3»ÕÇt©PìËH &(»ŸtãËLu6LúØ BU‘xC5&}ßx‹‡.ÚŠxw¨éošÁ¦µ ‰C‡=f¦f?ð¯"Iì6mæ¬ñ:(Éà´Kì@0/Ì=«A–0³ •…­™u§l™LpY¤;¨˜ãžåç­Mƒåšq®Ðt—£Êý+OÓJ¬µ$ pùé¯@™?)1·1ôàzOVŸðKFïŒ=áÚ Vü>hׇíø^ÕI‹ÌZh¥ÍãíÏYÖTìªÎYT½:dRl+E¥6«šYiXýJÖ¾'›Î“˜ÃÙÒÑ ‘$ÞDÕˆ`^»“»˜å¦Ò)ºä^akñ‘>g©Q•P¾bÕ§ê†Câ#&¡uô@\ôE m93“MvsE ‚®–2¡2`}µ)ڌ†A™mÌݵ­Ì'éFÏf¨õ¢u{dBRT¸¥7Ž5.`„·|Á /HÙ*¡+X6Ñ@. ”© /”º{ˆUÖ¥‚QÑuçiÔzùÀ*nZŽõÇíþkÚh}î%0¡Ë§ëÏZÿh’Ç›%t¹zk:g5a¹HX+£–M&éí WþÌ-oO“AWõ†±}fïgz¤Ø[Yb+KNÀÙ)o+3X¹_~Ïp®© )$ä6ž`ì^H@/í°×îéT¿Bi(\^›è*S*C7`æPQÛê KœŸ¡›Ó÷ôs¡|0ÙÛxA%Œ€7ÃÌŒL xZø‹0¬ñGckât÷›¡{å¸Ëa×ØùØîoØÒ6– ~õZY I½¯­ÿ†û Ue…¤jéR5€kÁ¸â dƒMlA0Љ¿±÷›¬8óçæèšYYá´ÆÈoÊ »¦ ;› †ß k½")ø¥FUÇ ¡bu-Ìl, ¥æ_¶HÝ’«ñóðZ1·¢:^*%„ቼ󎛌0%RÕê¾€T¤.$f]‰¯ˆwÚ¤Ú¦‰lŸoäÍ[•4 Mžnzq†Q t ©¥ÕðI¶n‰‰}δÆR=gJËNhÑt–Âr+(®QsnkAˆd*ú,à:l·5:g¦PŒrÏwÝqŒŸø®’Ê«ÎE„^!–; _äx,`Þ‹Cúæù”C°Ü˜þ¥åà¤è2,¼Í=Ç2åKYÝ}éøP¼ü»mÐ\èŽ`}Uƒnc3@Q:TãÛ Ç’oç’ žÈÞ¡e Å«£¢W$ä8X©?]_¹•,2´’)Ú#ãçhâUÐe¨ÍgS„b†sH¾.ãëDYùþ&›'Þ˜ ²F$뜾¾SK³aЈ{ëÞ“ é&80ˆóugÒK$ &ƒOâáÑàm×7Aþrפ_«µø!ÈlÈÚW9’ˆqE‰¾q­f¨Ä5¢»Ú‚Y¦²(8Wú$ÄçS™\vàƒu'@p8h|?}›¸Åv@Œ½:]”†Ràc\+À4PâÃÀ|ràÞ`òBËKvæÂüœƒ,’Q”Ye;L8ç…¦)3§lîb±…ŠÜCùá¡’,V2£ÌN$µBß[Ü·œÏ‹®˜è§ž‰ôE+r~§1”ö¶óŠ:Ï‘ö.*ø¤âÜ¢ó‚}J†ŽÇ‡ß7±¶¿Øï7ô eWÆ:’¦…MÂiÀ9@N-¼ÚV ré³}œXØÜicŠ#´/J8´e*$Œ®çÚ_2í”ð(ÙÂÿm²šª<ƒÁ¤Ð!+Ð\*"WSóNºøéƒÆŒåÝfÜYsR˜M‘’è Ñq”À¸Ø„¼½gIjUp¤Š[Š|»0‰€)“ëõe–sÌË;oµàcÞŠU)iÍ-» ¦ÃSRÙ~êle'[êÌÛ‘ëQ˜÷]ůÏq}ó‹¨gçÇfªËt7jïõþiûÙÎþÁ«ã=EÂg;§;avþÆ<…G‚Rã§Ù@¥0«á–¬„óÚÊuÌsˆ–§Ðj¸Få+!´nï ½âËgBz/gdZ§¸”m[Q[‡ŸÅò;Qª"‘ê\t<ZùBÅ i 7ygpݹMØü·Cæ2Uºp:ñ°{Ëaš¾r*+ïc0¾KiªÿŸ˜ÈÓrñÝph[÷Np0·1+r("nU5(~×)®D hÝ9>×Mºöx4î8éŠX x¡à…C ~òjwwïäÄ ¨tÝ…PÐÛÇ“~ ž8ü®œŽÌ0¾æzØ6”&S·/´}â÷œzÛ~Lª,<1…Ìx²û ¿I÷ª|¡®¼Î2ϽÀ±)Ó•ÊjnÉLÇ4¤£o'ŽåÂÎýò{•‰Œô>O,œ]LkZnztÈ  ìôIŽ¾GS©n*x öÏo Æ:»u"&~ò 'vÁ[¿X€ÏõÔIÉÚº]8h©RÕ´(Í&!+—Šò¹Aþ:¨epƒüÑj¯FVÊœ×tD¦#åèðõ0œQŽ¬×T|ko \ql±ZM¥'†FuÞ¹È*²#ü–~qŸns ÿdpÓnþçÛgnGŽÓÛ2†S¨Ó=b{'òÖ2©…>_-ó0Ø®+Y<­UÈ‹çåh*™ 婘›ÑŸ&ñàœ*rÀo · [O`§à/ÏÊ,L¸{øâäho74—@Žå¼Ô½kƒÃñTÙùì0ø°|¨÷®á!§&ÛžNàâáãÐ%^yƒ?§Riïfíëî+lòHTÌû=äÁ¡öÑÁÎé³Ãã^¨ýòÔÜÿDDv¯zdYŽ$ªÌ¼Ÿ!¯Ü>‡¸ÓCs]òÓ¼ÉcŒx„sǘX˜U“ì„‚FA$6Í°°¤Zߥä¹Gl[?ÇlÃHùÊüÖ ¿a7FÉ'›éš%æ§xw’ÀÉ¿ˆ9²¸ç¨5Ø,þ†Q°†W¸ãÑ÷ +ú!ª °»S"Ê‹«qI›V N(Y¥ëœIXC…‡Úæa¬«>öJnmì-‡Li°X†Ú‡C.šÌ&;•W‹sCòB  OX瑼ÆI·3F÷T·5ÂÛ{« t! ¨?á„_ñù9Lq*Ž}©ŸRÚ«IfÊ:ZÖ!Æõw<»ä2H7ç•áäÌÍ,“,¹Ö‡ÝÙ\~³aSl’é†m¥ãµƒv´£+!ƒ†ËVZ2«ªÓƒÔ~L&ªV‹´Ü'ú ¢M€Ã$­m<éû;íÝŸvŽO‚°¶ZAëñã øoþ{ÿ} ÿý þûþûsëñÆcøÞoÀû x¿ï7àý¼ß€÷›ð~ÞoÂûMx¿ ï7áý&¼ß„÷OàýxÿÞ?÷OàýxÿÞ?ùs˜ßÎî¿xdâ_šbżùÞòtaaÇü¤¯–»p¦N¬VŸW\7IWMþçdCL®oìä(œžuUÛo,BÄ o¸ô…S·þá4®<×÷ŒÇûÑL]ÏÁt˜n‚ïœ^ÒÐæÏY3K¨"ΞÛ%‡‡á—ä#f1¥ ”u zêКP 1ib|6y¯mUóND%mŒ€\"g§”ÈÑÍ9 Э8Õ—Z½ÀàðÄXÜPÂJ‹ ¶ÅÅ. ?aûÚˆ6÷ê<o“‚„›gÚ-8(FŸá2¸³Õ×üæ›mc~‘0YMÁ Öœ QºAB6¾ŽáTÆj´È´S!nÔŠ 훦7ªo}7¿ ô6œšN1Q¿çMV”"sçœ;$,à­u® „jóQeSv°ëão¾ hÁþ°]`ôþ“m¨·ÿ ²kü'òMðQ«©)‰¶Å³çÝÙš¹gfäØû¤&•ž?o"ºYÝþôqOzç}å›_ÖXŠkiÇ£½í ú¦µõs„|£ÜçZÚ»¼˜Ë‰F[Îñ³¡u2Ùà1´Ð.Œ&/Âô™¥¤ñkk­Þúøç¿´î[øZ_oU­V©µÙ(]ÂûÖÚ AÞâÓVk£qÊðuØàw¿¶†o¡J}½²ûÜ+€¹7Â*Œi»1.]”žF…3âùßsέ91Ù5`û5’åí>Æ.Ÿ2§ì?ÇÔ¯“ÝðK¢jp!ôZª"Ùܶ·k—£$ž#ò·)µ-‰Ý`É8ˆ–µ)‰8]Jª- œ¿‘Ÿ°|ãñoïLö"îk$µÐ::ŸàE禺7ÓOàô’L{íÎYž~õ›ß¤œþ´Çœ¼zìî;ÏN÷Žƒ2Ú à•½ÄB¿{¯v^>Ý{úÕW”–þC<Á O\zœ:˜Fr€D<,çÎû&÷0pH&¼I–‡Y.a`šP¢ì¼r‚d’B`”’sŠ½ÁlM°ûúõ³ƒç'Îޟ݂ų3³i¡€pæ6/‚pýn½Ô Õ&ÐYo×þò–þ´xe¼M(н¹ù–Ê{¸Iø\¥I<ÎY›±6‡#?Çë¼²psÂÚM¶é0z]Ç>¿.NFPÎî©!|îl®Oý1¾~²¹>/ñ'e‘ã-PM8"ºEÑè( n¿FNQ…LÕ 4³Š>ÅrŸÂ@Œ0ÿ¨J!£ô¹šÂèÆ2 8, †ã· …dŒš·žìàv $á=®?î$tüã›é¤cš@h¦¢1Å~RgòþðÈs>ÖMQ <ÓF™lyqkÍ»gû¯_ìmg MMgCID=5™®Ç“¬ÐUb3HrÎp>ÁS`ÚÒ`2¼Œt´.;è•¥FÄœ3 %bm0ð°¦ 2ðï¨=½¦rÁ„<˜;høg0åáèºê¤íÑi© G5Ûëhèe1§¦O×’–¾ ‹‹É-â nšNEY2l–5À¸’ó~Ü«:áb$‰bzغéõÏ› Kšd€š‹UìÍòp4”x^ä[Ô<Ò åMPþóá)ãÕ„.;äÒ/½šäÛô+8Ï´˜‰#™*šz lx?vc~0ôÚ™‡½xŒyôl ï"ø6!ø¦,Ïð½ÿÄsJÖBgm~Fâå&æñã4~è',1ƒÚ˜Âª¤Böþö¼•ß /Äö–)*=Ãkz¢c@ô`D8¿QxªÕ8EO»w;ì\õ»©§ÍœgíI|ßð› Ílb¦;:ûO] ©]@@Ä3éc8ÒHúÄÖ” 눢jY ­T”€KU Á´ºýÑ,iÓäÜá„aÍø”´iÒ¼Œ:½&‘ ú䃩õÀ¼)V›ƒ \~ؽ¼q¾•uå¤õ—ß—¬tÎͤ?`²¦ýÚf ˆ¾¾Ž;ïÛvÁÐü )$^·òõ æ=)Šš‚ùNS—Ýs© ¥~¶(ŒBšÕxeªnòÅ ET‘l3¸¢ìýhRïæ'Ý-ûÙv ìcäNLTί0¾%¥…i+*Áù…§ÜôhüddÒÖÐ^œŸ(ÔT7”Spµ­8/,­p«#n™v˜}9J+&§i  K& 7tæ[M#scLýãLiÅ©\&Ì 6š7+Çöw(@YýñüzI™pÇᢩÅÓØbö!Ù¬úô…pƒGÞBQ°¿ó¾;BŠ);·÷Þ`4Ž‡mÂeç‡T°Mæ%¼,V8EÞòÐÔÇÚ©Ù÷ÝÚ©Q¥w÷¿xˆÎ²Ñíº’…†a¬©Z®Íõ¬Is)m\L|çÏ£³‚W%‚ætOœo‹àKßÔK&ý'Í»•wmÔP´ñ22™A;ghÒ÷s‡NF³‹Ë´†ÉÄu’LäWJ']w„pq9‡åU` .¦(Ÿ0ˆqry#“„[Ž‹E ƒ6ñ”!_ÕüFUsŠé# Žbì6ˆÜó°ç>È2åµ"!-•Ëy£é&Á›IãS"òõ4 ÈW£Ä»ºñÚmÀ à1VÂG„–E<»ãͲt;|uzôêôoaºhšK—5 šé›‰ ê[è \nx¸FWlPmHh‘;K†Põ²ÜÄèð)b,›d’iŒ€o{+lW¤(Ãà]IïZÎ*œüò%= ³¥ó"U\ †-üIb0ÿ’¢º>è ûWŒ0ϼܷŸ‡ÄTS}Ñ]Ñf7®ø!¬‡#ºT˜:KÅ®V’ ÀÖ/1rCŸv£(ÈÙW4„¶™„Ý$Œ†ÞPL_”=Hê¦*¼jèc.lÖÓþcf¿ž™úÜy»`£EÀ‘MfÄ~a³¤^ù%‡ÉW…œÉ›1œ >?) ]¡¦µe4ÈDV€gÌ!³Ø;!”CF‚„‹§³R†sϵ †Éîœ! =¾?œO€ÎÄ0:{¸¼¨Ê(béu&(‰©Øøê(Ç* {Æâ«••uX`DùõÁÔ´ŠÂ'êg„º™:!1åHz%˜ü‰Îš”ô?zyÅ°ÍÎfNÖá÷˜ Iñ Wëj0øpEUWƒÝAà ëžaˆªƒƒ¼P)SU¢Ò¡ÔA,Azý¤Û™ôPÈMD5j0àí×HÁ$¯èäÂfAF2Çõ¹Ccl¦Þ>­¥À螧¤óUfÂyûAŽ€(€&’¼ïPî–µNøNh±Qi5ç¼i;tg÷&)“ýþ†ÛFïøNe2¢”£<‹zÉÛEÿ1’þÄb’D°Î5ƒ[N««"­lÕ?4²A%³!2‚íqj9V,_‹þ²>§ ?F?FƒÜ ¸cèÀÂS–ûrRR!zØ•Û§p¹J(Oàkßú=¥J i;£B§Ä×_ç•Hµcæäàaé(¢-Y¾Îõ–Ç g4„Î)Ãå„ž¢ÕJÌά÷·1Qrª®ëe¨YAaþÃænèp¹E”ðsÖŒfôUjÒÎtVɘ aŒhwD4\¨•ÄxåÖ©š³›e‡ÓzI½Øçß@¹©.æqŸZFï[ŽZâ·Wx¥9“7EåЯøQÞå¨/Ø?,Ððça Hs*Q•J•U÷;´W§<Ç;sEÒ0 üio÷ï –Ô± ¢Ú.C\Ñ)­Aí0I:WÔJ“9BŠ yJ;;èKy;ˆí_™Íg×Ю ýNp´¿ëµ™b@P –×á2Œìyy9ÖüF³Ð]|`?ÂS8‹¡Üh§ è°‡—ÐÐjfú)‘.CjàÞ–æ ¼bLæí5-fj´²O++¶ og‡l¡âÍ‹:¶¼¬KyZàr'%f‰·Ý°Š# ÓƒyèÊ(yiŽçjpˆ¶…šfQ1_ó 7¹­MfC˜2mx„É›<øX˘‹0rÌÅÉR{0Úéí–‹K5Õ¶)­mÂenÉ%ÏÝCwA÷Š²7¢PÞ’ƒ¢ƒ¦Ûý^ úû©ßHô³â2ÙÖ‰t#ÓEt>·JgA ­ùÔž‘еçìÒ°FnoY‡\Qþ†DF_áŒ&,¯¯-®%ñ3n$ÆëŠ+!GSªžÇñ¿iµoQåûf§öÏNí÷·[ü¤’b-³ûA潦8\5ò|vÓv„yÜŸb¹‰ÄÊaQ…%â¡åž˜é4lšJ8¬Uø„z5xI7ŸÐÅÍü>ŒÌ4ǒˉÆ=â¯$‘\ ¨MÉÈÉŒŠÅeÇ ›¸évY—iÇÕË)åòŠ™.狯òÛÍ\Ù‚Ù9È(*ÿžÃû² |=xø$Ü:‹æá–MO…¾È¡©s4i‚Ò­p0EåùxPúàK‚UÀ¬J‚ü9j8Oqµ¬Rˆ8SŽ¢ú22!é%{îR`Ž^<ÅŒµõ%–7Óé2ëœS Ñ„]¹mc]#Ôi-1`ÒÆà„Ý-˜e§y Ûe’|Hç³)&*­äÜÍé†#ö}!­dP ` Îy¤(˜l|Þ!­€7BTÙ×DeãóUø$»Ì™¸è𯂢ÌìiQaè ËB!¿¸eµrk°p¯&ÒÖ Éÿ2â×y5Õ¸å.ý¤¦d€¨¾0Ñ’ó9/™\p 9»“±ÓKÌÜ€ îլŘð+fîb„9Øëô\à"~’mÑjŠl´´¢—§û”‡;š]‰(U4 * ãQc)bÍG¸˜_q•ÒA 9ªØþñþkÁ¹dI5!F- j;/Ÿo­WáËþÉéÖ:yÕ^n­›f0±,š«Åªó`„ŒæN@ÜœÏìh5b%V’Rí@§q€äÔ[ú³¾µnÔñhÖ¾èvV,<5P*ÜŸôo ³?–Њ•—EôZÎ*lsÿ;eaÜtÒ3³S;ƒ(2œ‹Ç¤úeMUAZØÕ…¦Ì<؞ĿÍúä¡%î`gñô:Ž‡AT;¿¹òF.bˆü%*$qX—åÁ†= ÿ° y4ø€ñÈ’Éh4-œSiŲx©:†ùšKz3 »>Ÿì潇°ÏwÝŠ¿úœY˜Ì­V\Ù'£—­¢Ye/f/ìØŽÎr¾*ÃŒ°/^cãSû)èÉÓY ½ìÍ0$RKJ _Ò Ø)ð’@•Mqt ÁŒ÷ÀhÜ}Z„$:I<ùkId?DkN´FÌzè“(¡uf}V¦ùëËT´ð¤Y¬`ñˆþÂb¼aŠõI±æ®!65rÖÙâŠÏ1ä˜U÷»òÞîO‡ Wb˜%ë Vy½¥Ö£wfÙ¶RÙ™U[naý-Ë,mmURFƒX@9É”Ñ)pK¡¿\‹ú¶ó™?[n¹‘ØòaŽâ²}Ö+î;èÚKÕÜùðø*ï®Í( °×gñ(q7[_vúïgÊ¿Óý˜Ø œßÉäþà  Á.Ã+\µ"^ë$A2ë^VæhŸÜØSAy‹¨­°cØB@P:çóI;?{“ÎÅhx>¸5KÕÄ~a‡útDw¹"S7èÍbÎ7ŠcE‰">Ń˜¿þIƒœÂKF=3 VoÔß<ÞØ|kÆr,¥`mð¦s¶¡/ŽËB柰¼CJe$øqYO#<'“îèI}óßt¬ðûO¾³+¶‹,B’²qo·»ÓÛqüI‹pòáÛúæìÚÀ3>1ýcâ™k˜¼þ>„ ¾z¹ÿÚ‘:«‘O¦ Uw4Ákƒß9ÁÁøÑ’•ò3ÛÅ{À˜X[¬Õžäœéô‘þ\pÍ…Vè™/:tA@æ­6æ ÑÊàêÍ‚&Ás0DPþ-W€åTmOt9ý(*H†½PRl~ ÙªUÉ´…ÛtaÝx ïÜ[Ê?gRâwnÑ×h•Ýo¾1mt1á€Upz†uB‘üÛh¾F¶LðÜzz<¥ÃÈýbë5ŠJJüµ×³˜“Eáœ8m;ÕxpG5ïj}¡Nîj5ùVñ×9+èáå^ŠØ_ŽÔ§Í1²¢ ‚!^Éq¸«½çowµ¿ë—qê ªñ·ªÿÜä†îjæý9øÕø®¦Ÿøßyˆ~K®ÆÍõý’ÍZì‘°H ødÃ܆,™8‡^¸®¡ß6Ç$k!ï(hc8ªw€e÷\Vøéz#Ö³U¾™iìšÒD'3æ”Uà²Ó}~WèÉ$©ì¿JÖIÂûõœÜt\wQ©qñÒ¬*¨×V±!9‡",2Tµ"=cž9s'eUÿb8Â~±MZ„0[‰‚™SÀ¤ôŠGª+åZéÅWÆuA“† á:c¡ˆ-ë–_Ï3\"$`ŸUqµ_\Å<)ªRa) Dç*¿j$3â0*íëÊ š¶z0ª#?‹ ‹Ö‹‹â‚‚ÇZèfn©ñGT;Ž\ñ‡•¤E_ÿo:Âg(M‰ò‰4 ‡Å·LÑ°\úÓÕxæßÓ­3ûjf¡ÎÌpÅs€ßxÞ0îàB Þ÷5ã ›,+DÉZ©F#´í+hWto ü«¨èïšœ‘©3‚‘¸]óꢃ$l/°A®‹O&aVíõ{&-o‡Ì7ðÂa1- šbBG¬ûÌ ±ú5¹>ƒg€j?t(%F£ŽëÉ(¢|¥úhà:礓PçOû}ŒŸû SA"RÞÙ]´Ô™€TŽóX±p]45ô%ÓM"DzåÙí,UÃóH+î“ÕªjÛ@ \“{Jn韻Õ\Ï=$Á¦Ç‘ÜòVÈ0¡ÅöŸlð§Y…–Gìr S¦Öh §ß—µŽH!ßm$W1EôÌ|ß… ɹ•ÙˆÃif­‚ôB®“»îƒ‚uü÷Y÷ëÁç-ýÃê§ÉÑÿ¢{í¨ë—bI^:çŸE…wwSÅÕ¡ˆÏ¬]%mNÖþéÌW…¹Àú¢$÷]|3a@°DõõÖ¼iU¢w*޵ೞ46EnùÏ››'º ½²hEœ’ØjÊ À–S)ϱû €´ýgíŸb'¬Î? 2*Ž/Ÿs]g 93k«*yXæ…M$80î F §0~€©ˆ ²Ì4 àNýž–€¼¾ulä·È‰ó…Àßéy½ŽFÝÌszþÆ¥ÁÝ6µÔænÜV#i`®“ק¹w-åØåY«—²æè%Þöß.•b¤œ»æ:;ˆuø|÷.[¤Ð¿+§H¿È\«‰…^âó Ÿ‚ù.ó= æÍÛuA¸ ü¹>^p3þ’^^Kùw©_’¯µs¼F>Ó+c]è;1<Ô—ëa>ë ½¹ymç8u8nÛÎR]91%r]KŒ’ëõ£YÿrœºÜ¨ ¼º>ª—óëÒ™:v¥WaYÏ™Ïrírœ~Ó¾]þ¬=܃ܻ¸Âü»ò33¢¯ÎÁ!–óî¢eÍsïâI=/ÂÆ‹ðqž‹W..-öñ*Òü¢ËŇoÅ<ÃÊ%=¼¬¥G A9C 5lO} ‚G!Ù0vó0ŽI1ÉdB Ú€ú¦®sî9ÔôcË„'H¨}臸H±eÏø8·Ø£R×Õ O2ïš`ÝÄü!‰É|Ψܻbé%q¦!»Mó[)2ϧÚí©•¦]~5ÄPpC/¨}p6Bûß4+ÔÉa£ðªÇfXZ×¾Œ§ý.Í._]#Lþ ¤ø5˜Fýóå†6 *¼­G ^˜×ÖxPY2íOg©t%6¬ '”‰É¥è¿œa…!‚Ô‘“gÀw&”w•_¥T|.X§å†¬b|s€ÁEeñRn5ð‚P‰[Qšäô;RÑÑü—Äw·ñ¤ø,>m%na«¸†Iر¼Ècé¥EŠLBxÚ`Š«˜Ö¦;CèãÔ Â¥—Ô€¼}8 æö³A1²¢\u¬ÄçÎø;»¾zå\[®›6ê šeùå¯?­¯ [Ú†íóuÕ„jt¬´4R`µ©_×Ý záE m½k±13ú§ù[aк ZdÜÜŠ’ÆV#h\´¢,uÙe[-9@Íß&íL×0Éìc$¼ª½AAeï…V—~ŠÊä>>ÅÜÆ+–ל¶w_>Ûôf±S¥{Xb˜šxÆ9z6¼à tœÂ4·oØ5hõä—“öÁþÇ;Ç¿Pr5KŠD¸Q*É‚O›‰œ\jI ÛÞtÔ&vDÒÚ¨´ÐàVé}^Ón]@W%c“˘3à.É{xJ²¯ugé]«C4p% •uBm‹ŒH÷ðR„ÎnG3vºSé úpÙ ¥a*À±!˜Hª’&#[b0¢hm*er žý§Sªã¼që;1i/F|CÒì9Ö NµÂ1»é^Ôľõ’Ÿ¤@R)™øŠ$ ®zF¦Yƒç°âøx9(°Ì0¨‘¼ÕsÉ*=áðM1ÇER¸n¬Åõ‹zPtà¿3ü¬˜H¯Ü¡éÍ Æ¨ÜÃXÜJÚ½ÙéËÄ‹VˆŽ¦®‹4D¦..÷—!0ìWl~ˆF·N* ¦âUì·)®¯¸m>V¥5§{'ð¸­`9íqR0¹ò8q‚>¢-5RÖîÜY{ÂΩµÇ••M#¦a±cŸ¼g9¥D1s¿×á–ºÁ ò(+‰cL3âd‡æ*˜ÂŒrGVêÖ}¸ÝÐ~5Sjl›É›¸ÎÞ#ˆ¸-¹Ó±ÓPc¯kc4Šá5µ>¼†æù ¥{ôjª?\9 ¤¤„ |_ë‰ìÞ¶½ç¹w"Ë€l›ÃÅå‰F¿Ž£‰k‰–˜®JÔF’w6l1yvêˆx×kËV£QA¶X#HEV¢»¸¨ëaR …Р€¬É›!V ÃDó Å`¤ÏaŒËÊÊ•-÷äLYJj„Í9±5ø¢°§ÞEÂBFì<—™Ëwlƒ ;Û#öF[_!K ¬òÓ>‚UÓ]³Þ˜HìüÃFb÷×*Á1óˆ³ëfožÀ­dßØk…Î&¦q 3I…ÜÍL®¶®å?ÒVNÐ'0¡=Q´Ow4§ç 0UƒãñË S;@š‚›R.O:¦ô†dÁý©d™@á`7Æ”>…9f(H‹¡«4tÃv­g~º)À.y¦\SöQ˜LÙšA«# ÙèQò ¡Ù½á¼ƒÃã °Ïãx2¸5ʬéÕØÝíâ[qÅ/«þAÙyjÌ…´”ûÒâ , ks¨‚h•àgÎr¯Ú㊇Ìü§]a“wgj<` îKAi_Î4‡ýÕ楑’à{l¹xk–žî}òˆÖØůÅ»\öèÌ'¸°’›‡ دQh­CbUÚðQ`ÂP`@ ƒµVƒ}²‰'ñ·kùJVÇéÛB/«¬(™‹gÏ\$˜Šú8OJä"5‰*ÓÎÎO&_Ÿºˆ¦ŽŒŽë_R Õ‰Š¤è ³GÄ°.R–“vi7ýÇϨTK½â&3r#ú¸Î(N3óbŸn|"9½ô7 ÍEð(Øœdùàg ÕˆWÉíšÌ ¦˜sfKÖÈYy»Ühž‚P;j¾ 5¨×Ò¥•/æÏôÉM>ÖYx¸¹_²H7õÆ„ZN]Ö¶BúUž4¿ÐjFawevceigªÛÆ÷¨rzÅÆ+fíÿM‡"bl>_y2Aº&¾Êl6ÃETËzi‚†hWrÜle¨i+æºuØ-p$pyþ ÷‡ÍÚpH½þa$KÍÓéòäqŠX?È“r‰ŒÎ}”¸‡àÝÈZ’¥¡tÂCÓ©ƒ§M)L4Å0Ì}3±±HP°Þ±58‚9‚úi°Ì"ŒBÓvH¡p£Ê¶¯´)ÆM6Ißàˆp+m]/ú0!¾-7ˆ§‡ I‹Â™5‚Í¢àŠú‰\2ÕöÕ¥ŠI]+!o¤W.³+škÅѦ¨6Þj2¢ùe‚«ì6É6†UmÊIãÓQ +# éSB4:“·(PEKž”É!¥ôézåfØ}çêMã.Þ0Ç^jœÞÏ@׬M9‡8L®d¡L‚6v¦!}øÔ 8S˜ð²SƒÎ‰m‘”“Þšå}ç­uî¼.!;¥;mÉ8aý‰•W#q¤ ::ýZekL`ÄrDÀ„Cø]C:…zr)€g†J5Ü¥C/u}®xFàKÝ æd<ä͆ÎVËt‘ŸñTä\l;Ù—¡/:±šžÒËß!ÝÀþY3é#¨¢WYÇWªÍǦnNß<œÂI%ؘ³5_~g\4›½éIœ^ƒºîÆßøw§­àÿâð`½â2§V¸¢2Àe–ƒÖ‚_†=ÊFùDÈJSŠYJ±÷. c–1 ÊfKX~¨œQ„Š.\øk‘J³ðtúë¦gKÛ6²¡OhÛÅÿ ¬dÌBÿýwÑD;\ÎÁ²\Ž•ÏÆÓ£”=tˆàä§Ù2Á™]-tÆÿܵ[̯Ș›7™‰hVÜØEÇ05ö›y† õÅ1¦]_ù¹1¦(réÓó>Ï—Mâ WËYQ¢Ñ,7iMú–9ÿ‹Nhö]€›Wƒ“Fͤ¿•Ô¬ Ey™6Q£‚̇50¼zÏ«ÞŠíͼœÄR e¡hþƒrÝ—Ú‘ôËB¡/µçŠ\ÈŒ²ÝAܯä¶YV©ÝE÷ŽöU<½õø½êLù¸sD)¥(Ú4èÍ®®nó+nKÚA,êU—HõìúæÖ ƒ-x³´Öêë­ &/â}gs7c†#u[ÀlþÐèÅÃÙ` Q7ÿ†*9™WPÞ{~¼w­æŒ% ~LuêwlËÂtû#ص9®ÍJ¶d~Ê+d‰’¦¯¸{‰Ì–K\__~fì¸e Ìнt®Æ"¤sX‚ô2¡ßJ*U·Ã(#¯«PöÖZ|e k2g¬§”sܤl'#P;EêÚ21sØ·²Ïá&Ⱥ°3îœõýé­É[Nú1Gg6]uÔtR6P .¿I4„¡·dµheóõ øÖmŸÔž„\{R6+qà ¿1Y|ebÅ NZ¬JÎt¬Üãèiˆb;2[óÛrÌSi vöÀèˆ=TW# b8G4ˆ*vRy¨¾é(Ý›¤ýúôÅ“­ú‚Õ|ñ@³´b<¢\§kD÷!Þ8€~%à"y™_ëþ¾ÆðÕ8”c€'X†Iïi§­*ű&LEqœ(“^r"ï-Er£ Óøj‰Ä „º §cðàÒÂseœ–K8Ðû¬ÖÆ»õ:ªÓ¾*¾cwu¾:<újc¾yWEvb·”}·Ó#Ï ô'ÙOnÊr[óÞˆžGœÝ)eëâÛ‡ÕOd€¹y^ÿéË.gA 4žokµ¤áÐ"öù†é^æh½å ÕóÕFþV9=º”–*˜-ÕD  ØÄ®I ÉwÛsqþqÝ–ÌÕ,Iš…y®³yÛÿxW— îᣯÆ#èVôÀ‚1½ØdbYb;[¼Z6—·©tL¾Ó8B.­Çe•¨´5𯺠Bs3= Þ{ˆÿê"k° ‹Ý4#‰"ã¼áJù'mËE[Þ‚0ŘÞÏ9|•äÿÏÞ»?¦me‰ãûkø+Tâ©!b§¯™8îرIâ©_kHÓnÓ¥V,$Fvœ6ó·Ïã¾%NÓÎìçÛîlŒ¤û¾çž{Þ§Š»¢iVî {m­ÁhÉ ~«ŒÍòÐÂÁ:_dbs¡¨.3Z"™¡0gåãh3“HGT R©ÓUÎd6ôÈ0Va“•±àüðH 2·¯L‰¦ zªr 3›“ÂåÁ,üÀ Z[+Ž.Ý +"éBÍ`:¸¸•ZG|âì:ôÛʯcÁš*¾Ä&ìn)v¨µÍzYC¸ø#Ä݆ƈ›î½L?¶`лsz‰…fáô½¯òûó6Ò2î®kºÊùK\?)äW‘Mºö ]÷:2ؑ諈C¢e§º™¢>쳎j̨ä¡Â€Ú‰wbnÍÃé.­Ãe#¶ÃŒz㎩Rk¦20éN$Â_ t',3·[,ý,( s©.ýt<še D«4‡c$¾RÀ]I›†ú U\s]iÕ YÉñÉz«, …öã!§guÎÊVÔœHÅ8ìÏy<Ó–ìz´ö®ž’Àk8÷MÚº©j÷–Yu®yë¸ K¤ŒÅSeÝÉ–Éëcé}$. ™kŒhëÛT鉎蒦2;;ÿ¨ð×4ûónûðøXrŒ:;ÈÔÔ’ÍcŽnG›õ„TÑ8X7 ¡›‘"{$Ÿur¢Ïã.ñ>Òè5Ôò‚˜ôÅ7¤<À4F+"×¢ BΈv0ºõ CÉd7ºF"ãëµØ‰žIV|ò-C¢ÊTdÀi2©aZ¸Ò±Þ¢gT.UYΈ¨-R¤nXÂߎnåÞ¸²j,ÐÅfF©”6EþNxzr/8yóE:G×P)bcCÐÛ¦\X1fÝSgzyEG‚n¬ H›¥’^éÀ\r¤}è¤ï„wäy¾¡«ˆÓ¼ûÚ@I¯5( `Y”©—õiJ½×©_dµy…¾ ‚91ûYn»•Ê3ì ‘‡Ù„ ,ÏqP†îų€Ý**Ob¤Ž®_ŠŽ^ëï%$hQ±^=GÉ­I[¬ÈiÌšq )G Û~€˜|2D 18üátÿäè@ž[ÝÎ\å+jÕf9˜UËqþÜÇê9!D9h£f¾äF%° ²¼˜ô¥£ÏËÚg}éú‹Šz Ýclƒ§ÌÂeñ@b+kþßòÕ&‚þ.Þµ½D Q”³Ë”Ÿj²Zèb}ãÕBÕµÍX-¬9{þK©6Ž½œ?­Q$˜ !c…r}µ‘ž&0«DÇRàTôÊ6ƒ'j!'Z¿¨UÑjIFZµ¾TÄÜVg$ø§$ -øñÉTÄkZNzhè} Ê{%ö÷½Ó@_ ŠÄÄ(Î"ü]‹{íUýpã ݹd]‚’‚%èâIúÐ #45옿ÉÒ¿Í@þÿ°TÖIƒs™K™(î–Àà6ÞXcZ7–sPU8ã_¤Œ»RfmœjGÌ]-wäÜf U©÷¶÷˜áÏ¥ÏësÚ­1´P‚¤n–£`÷b›æÞÉ2W"l|ši…ÈDÎëÇKõ¾º²§+T›\¦Uk£B±ö®Â¹MàÔçÕÅ$S>à ÊØ…îmŠ•ÖbÇJµ"â—ôæQa¦*N¦¼³]»æÊ K綠r˜—[g–˜¼ÝaJL9-Ÿ’¢%ÊçTÒDaN…&a¼Þ¤l<Ò’¡ÂŒR‹ê‹ÂD Œk„õ+GÓ.µá5÷/ëDèÆ[® 1(¢:~ˆ$/Üҋŵû¦óB„ —ç8C¯Dœ!âøBL«Zj÷€È3Ün ÒÓš­à 8ÕŠÊËd×n_hÓc)ðªºÌ ½[´[%þ-æ_&ƒ_F¶n1ê͓ˆzÙ yA¶)ƒX•pÃŒŽKÍðìˆN¦ò§=ªÌÅ h«Öû7ôy+a®ŒSá|ÙaÙ"›DÜ4©ÆPØ i¥MÖÐ-4XÞÌm"Jä?ÞÄˈœ¹™½ÁP,wHÒ‡fÊ඙­¥hkìËÀêžOˆ¡o"K¬"´‘oäw´zåq],ÿ`§ŠpvEÿNn-Yˆ\ÏÍ•5œÍM­nªx´,Ã8‡µ*5×e‹÷õ‚ýð0WòoƒÑ‚lïËŒøImJÅŠä÷o÷¨èD«є.”¹ È •2'AFAß„2ß"ï÷'ó'SMÀÔ \ ^Y¡R€YÝÞ4AOŽü?`õyNXL:M’1š„ü½„Á)•<òÜvÅG‰ElÆ(QC*p>pÆ/öQ)²5Cc©Õ,:`% ¯Ô4¤P0‹4E{“6€ö4 O³7‰´Þ¦2:¬zÞ,&“ðín{ƒŠUºYq4džükkŽ¯Kp©\%¹©fŠ8@¥¬A’ …zÈ6Jѧ"Ó$”AmÄ1×"‚ËÔe…%†¥žªB<Æár¦uå Žæ^ðÿálÞ.—Quüš“ÌCâZŒ\´‡"'€ÈY3â˜Ç(­ˆ9™–wÆŽ­,ÆÔ4,£‚<®ð°€ ¢2®nèݸ$ºI7šR¼mŠ–7ëV#|µ¼J½¸Guo3xæÞÆß7‹uxv"ŽÐêÙq95³%³’á²ÑæÆÖ~²½Ü:ÓYŽèJæ%¦5³„²_íX@Zf¤Í…ÿYM¼[a9Èš¿cX¨¸ÌuñsÍTá’;aÚšåÏ(à+^þ#- IÏ®~ÇNâiW¡i6“kb] 7e 3âpèÒlz6 Æ!Bǯf*§¦«Ž…j†i¶Ç`©md( V‘Oi?hg£äóΣë/;[·}AÆfb:íã ij& ßf×_Î’÷hJ¾ÌˆÅnª²Åì„y‹xÄ>2d€"ªý4 у âLÇúy¸ÈÒ‡Ã0~H¾–íc¸lÆcï‘áõëý ¥ïyì$üØûñÃì‡ ôŒª{ß”{;lŽÉs|R`rÊ=fI¢mÐ×¾XŒ–0 ·éxTÜ[i½ƒNºâwºÏ6u˜8¾,ã-ª‚4ÕÝvúRUKb8¯C(vK–¸9©§p¾Ç‡n£$Ó=k¨@–”Ï«ª!­ôÔ!Œ,z ª:›@®,²Á±SÆ8ˆt<q’ ×èEƒ=wuÏ>â ·£ }÷/Ii nÔaZm«ÅIµS/cÒfU=ui&ÎÕá9%Òu)¶s—¢ÐmaWŒ¥eˆÒìõá ‹’„˜ÞI˜f†ÙñˆÒRKi¶9ÐÆtyÒ1"â ÿ´ŒF@]Lý·TVZÓø…ñ¯>3;X¯Ó²dvTE8 è.…›Âbý¡€C©Œ’6wV ›'tŲFµ‡Ñ(‰‰1ã}«÷«ÖópÄéxýºC·Ùé‡Ì™—ã{¬8sUÌÖË<¶Ûx¼®Š»Cx¼\5¸®LÉž 4…)?Hè«ô…¶ªn¤ª“À-SÉXVÁéÛ­PªRu¯ªÄ(n©uN’€%·p€æ Ÿj(÷ªd&È:n01+ÓgQౚ@þ(ô1áÓ e²/bS(ÛZ9 9Ô„:¡Ê2ê.7Êî‘£/Ç`ßo¬¼UTSòj1 è¹ WÞ[(§ |4Îq`h¹ð¬ŠÒ»LD›ÿ—çØ-½,-ÝݤX àZa+J;UõÖëscª¼’,…¢w xmyÓEa`öM f'È&æ}•Àñ‰5Õ¡Hmúæ>>ö¨D;% S¸i?ì¶*1¸SWDEŽ²»¢¼™µByüQ7–Ž²^8—ûÞ‹€­ùý,[ÌD  ds“‰ç`Eôt±·!44õD>¬jäh Yjw¡4dvSyDXy“Mšì“e{¹ÿÙ —Ö%†œ’=¾£§ª¶Â€³Ð«|OH6ÖîÖ­WÚ¯ K "LÐ8-‘X$4Æø¤ÒÃ5@Ô”s¸.°¸*CeN(D(Ze ;SÃ&Å ÂE¨,ú>jý})™! <3¦,tÛf}^–ÈV¤ ¹L G»´A†©Ö´­í;®·4l¹mñ\ÄM!£†•E/¡Ëd»7z™Ýêo`f·÷Ûb˜uêåÄzÙ€îGêgÔlÎMà®d]º‚KYŽÿ mC½Ø¬L)1£EÑÍ( t%n™á1Dð7ç¼m°% Ó2\‘?V•¾ã¥& ìt•£•OêeÔ.w  Éé¦Q2.—ËæáÜYÀ‹äÓJµxGohB´É4«p¢× fF*ü<‘Ê(1$;4*M„7˜Ê®Øþ)›ñŒâ@¡— æŽ$â@•2Nto7§œÿ³€‹Î×èy½D Zì,9• ùà" " ´œ¨Ô=ìùéKo—l;'ôó°àüTcòÄ´eeÁê¡£Sq¿Ü‹hv—ª¾É:Z' Ï’ÊEI‰ü|]·V¢H;4ѹr%Àg÷¡ßþ^³¢ìTQ¶ªØ îãÚöÙgm¥Q0Ùµ¯0µæ•åŒy­{»ˆÛ ÎP%ia%“™7…¼Ä DšÇ¯1Tpu`E7 —h?·2ƒÊ=Ãà Ï{O†‚ÒXQÉ+Ãôê²0’ðË­‡mƒ5â.J8űºá]ãû ³C$±Ú«AØ«ŽDú®¶se™çׄ‘Ê€ù¦/99>VºÜ÷:¡ÊR]„©ò'ù0'× Å³þ[ÏÅ+þw'¿•^þ';­ŒÖì9U4Ð|$g‹%Þ/”¥t¾•käx»››ÆªçœAw7)ßí "Ø°E£tz¶kǼ.„zž!ç«p€0'”üÍ@&2˜÷R(+¸Iñ‹5Ÿ—äz‘§Ò½,Iô²4€‹LÜ&¥&K¸P'J¡'$+â=‡n±·”DnqÔF¿-n‹ˆÚbEŸ`ŽÒsšªG<…¬ºþ_2N´SY€ë2U§ÐÝóü¡.VçTBdSÅ­¡1¦°€@V´Œ¿ø¿öWŽß½ñðõöÃù¦‹³z±ÚsËÜß\GÔh¤-ÍR¤Ç‹hF¼T ‹+^S®DTusþ¨+Êë‚´n±ø6Ü8럓½(Ðçß\y›¿À`§Þî®÷¨éýÂüñÆöšï¼¿ùsŠwYŠ’.í4Ýeÿ-çW_X#ýC5TûËÞDíñ-Rd›e{¬6¨´U'¦Õàz­ Dif@2™8TJé uç4ªNtfDŸ’“‚¯—‘*×÷Êx‚"jïÊø¹ªq…·”ž¶´©Cu’ôL˜ŽPh#4â*¬P1g”)nVY ÔÅmÓU¬ÍQqÚ>弌¤U\”yã¤Ù…ƈò ô'*Äiq]2U¶ÐB"Ý2ßuä¾E™ç’8¯¥¢Èùç²&J¤’’]µçn}Ã=­:@lu+V%ƒU? \H‘¨.ä­ŒQd„1(Í!+“qs^ƒàr6ßÌ4+)­e~ÓËÓÝÝùËr=ýú«÷ 33Ú!Õe¸ÖrKu*ižG0ÏEFÎv¼Qdôîs¦„K,M>#Ïnq<0ä÷ww{¾öSÊo oÉq  Šé%a ,¼¥e¯^éÍ„½eCÔ ã9«zMÞŠ}]½EÙNOY_*«èÍQ)ßσ±«`¹Pÿ÷2Åð£Ä—œ³eÙ¥`ƒÄ¨˜(3ö³üÖâC’È0’õû£Qˆ‘"Ù Òj`˜&WA,Œ¼ï«9X̱ÉcÀ:óí«†aÕn½IpCòÄ?é¨^s2WzX6$ *:ÀÜ'ûI¢“cúY?&É=6fñ>ÉÌQšf ,’ÔP¿‡ÜJðEÐa®——(_ ÃCÙŒ;8ã BeP”dìÃhzxkÇ©’ø»%ò‚~È`×P ˜fŽw5v*œ›‘²’{fŒÈ¯ jàØ„Wfp0CÏ;€öý”ãÞIPj~Iq¸˜¹E®F®«ÃQ Í Ñ}#ª–4èMŽÉÅÈYÏŽ³}¶sK RÓkÌ-ðWÕ¦¥nB•GfÆ*8˜p#&µ Ï^]Š„`H$B°ÖZG>áìù­¡q%*,ºño3>y,Yç½€Qµƒ˜ÂlÒÙ»Q1ŸPfž Ç6‘naÀp0zkäßßP¿ˆ¥gžJ‘§áè*S!BŒÐuY Ð~µÚnÜ#™ê^¬•‚˜‚®OxiÁ •€Ã:.‘WÒTÛXëòɼgFß7Ú½W–ìq¦%¿ž'š¼¡–‰eûkÄ¡q—lÈ$Õrßb‘þuwhÀ]ºÃðÚBo+Yñµ ~ˆÀWMÕN…{²·ˆ½ƒO¥E†{]Æ<{\34ßO7|îO9$3ð)¿(öSK3IfJVòo-"ýyúlç=úæÓm Y1VÓ—ÿüÙÉ>€¡½ö`eîó(?ûÌû²ó·ZA™Á?£Á3}ûC5½‚nŠ(=.‹.ø²|9Ûnn†Z›M¯-óÀ+ã)]Ä›5‡7- .m õM=eIx6³Œ†2²ÜÖêîŠn¸Å¤×ZÓƒ”ÁÁ"Àæÿ‹+Yòå½øcŸâóÇâ•ŠcÉÑ2­— ÇIQô²Ü§ˆy•Ê5ÔHH Î\X-®ÎJ®¹¾r21PÈIÊaKvíx϶I[E|2µ„uƒõ3˜¥¢ JTª9Œ9…T[Ë2M† PÌMòïš±ÉkXÙVéYeû2®Ê´fâ¾bÂI|›DcJ:YE”1‚-X9¼D,ú,ˆ&jÑÝ,«ÌnV¦Z­г# ©ëƒüà5œò{-®.·³h“(KR^‘O~Yú¸°û€kiÇzN!r{ KfShííÒæ.îÒ擤ª%a]ÓÆ2ÕS¼˜ ƒô.ˆQ•óçÏwi‘i…Jæ<Ê\˜å½qÙ¶(»ºS4Z»!‡z$:µ£)Ù£©%A .¹#j–ÛYð7> ™ôB­ñ{2|#ýdGo_rÆ 3e)7"šðÒ5£š 3)´ˆ$‡ëÓý“.ÆÜî˜çD I„®IÚc¨GUØn]oEèî{ìÖNf ƒàmN®í—)ü"7Z¤·¤ÀYz¾Ûj÷ÔyÃQ™wé·H‘Uí,hsCAˆ‰СíyÜ›À¨ad£`Š6lÈùmÊÌqîuMñqðNa‹dËÂQ*BëDgr‚•dW…ê:1V´b9=oé‚ÊHË–TKñ«UecYwL²­ªa¡¨©3Ú.’éEQó],A+S¥°ÁUõ–•‚>¼²ˆÈÔ„ÆÅÄš#þ˜G¨×Ga~„Ø5Fßu§I9ê½"d-d”áÉáš‚èZÑCE\²xRdÃÂëa‘Ž´×34¥w„î(ùš‚ŠC؆[µ6÷©{yLU÷ÊZÉNä-Éx×w·T @jÇdƉ횃pk% H;\âMšŸÊ;`iF°î¡4R’¥·*9 gU„³æÍ¡òè ¹æýŠ@ÕÂLTÙì’ŒJWöÅ(¥Í/¬ëŒÄ/dŒI£’+Sˆ!N·Jã»!Jè•\nÆu Û‘Ì­*¨‚ŽînôGéòÔ­î:¤Øa%RѶaU‰z™s?q·¥Y2<±LJ kNª—p·ÿѳގÿ`P`ãìкx[ø˜þ’"ò`© YÓšÖ×΄ÌÛvÇ›ù1FœBEUNR¸Ä³×V¤G‰´˜ÊžCNƒW\Hß„ vŠÛy_&Pee 6LV˜Œ8Ë\œÂ6Gû»œk*‹r<cÊ „–ï 1E ,±¹4¸DH†R“™Œhq<&â㲈…ãWxgÛ|Æøê‘ñ* ®CœÜîÆçtBd0;‹s°z:&,½I¼+ ˜Þnc`¹Œí๊Œµ.Ɇ¥±6 G.¥8Œ¿@6TÛEaQé6I¿3QÞ£ ÈFØf^±Q¹¶Â4|ËÅ©ÑK)‡¦Ýúã1À2ù8"@œ¨Y‹Uå¶ùí<Rºû2°=KžpǦñâ!?Œ*\EŒÈaNaêt$Q#k…_'i ³q®‘_©â¯I6ùU„bún¿ i¬q,%s#½Ïô3.‚=òb—†W"K£)%ÅjzÓ(0CÊ!û€ýgüöWŠšÐt:6ÇXѸÑ1ŽgËìw §ŸåÉ|ñöߺÆ·(àÀa¢{Å(`$­$Žƒ)à¼kJú|gZ/'H7o)›žaÉEQw–‹§®°Ê:÷‹îwG½£³S˜¼À¿eöˆ ÿЉï?ïÂœ¡Û?xº* ö]÷ÚSü)àÎåwŠC…Þ¦äe”²²Ï¼–pÀ) ç@œ*ž?Â$DjÌ?-0åE)™ d¾œkF<þãm²«®x÷2¢‹‚÷DXiˆÄ1Þ+¬‘T~NrÚr *ºÛT¯‚‹‚”»ÉŠøÂÂaY¼?/úÝN9:Öó刬ÕÙ0ïŸûÞ!MÍr^:"F8¿-§­-æ¸âƶ®ÐgabÂêƒåwÄÛh¤×¾ŽŒ7‹‡¶ŒV{dì(~W—ÒÓ«Ë%]UõcwR졲y­·À¼Ór!Yá®Ø­‚šçà è¸ûSXíC}k¿ëZ{.ñsX>¾ßq«•GŒÊTÓ<¢]û<¨×öi°Zê±ùû@êéïWÏ&ͯ¼™TÌX9H7ùkY9y†Ù™£2èRâÝ3¦ !CH,wÕ7Si^€#Y:›†¨AmÃ--—W­¬–‹†ì±OYóäu”)S_°|¶Q@¨œÍü’d¾kmÔÍ%DÓŽl L†|P¨®M̵U¤,.“î>Ðy%ílÖ'[±¶'âãòh*ª­±,ÔïcýÙrº¹ï=eãMb«)ŒeËãšL‡Ûd·½ÍÎfÇ{ÅŠA½åÄŠ5 ïN¼Ýp Küx'Þ@1…ÞŒ-«(ôqàWŒøn kÌøß¹X;[Œ’ªI~—Æ£(3O©Kzu\Aµ&¼êÕšoÕÕÖË}‡[CUËFÉUSÌýßRBš!HÒ—J«7½ÔÉ7|:ª-/ Q|(µs7” :9´ÀþwxÖóþÚùœäf2ûAgÝðê,´5ž Á¼OEü:°¢"í R®šMëæÙ¬9ýˆ¢.8"Q\ijÆ-!C›•À×÷„4¶ã$öÓBã¢dWßÃ’ÑXrEœ„0»ä¤¤d"š»¾€IÇ^„ü¥àÅãÅ)øç³hLµí.‹ñ¥u%º‘’‰$âÌý Í‹Mv§˜ÍCÝêl•É^Z„t‘brbrX&ÙaÀ´èAeQ韭Íb™ˆé.¾àéšd1ïª3 ÕIKŒ¾É¶ª†«w˶¹V’ÇdáfÉ d<^©Ý p¤ YÄ]a¬Âmg%YÕ—'7U²$Ê€(¨¤ù‰X‹^®;*Äo0´ýJûP±0º…ÙDš-bˆ~ƒÊA…·‰tZÐ%± ñ½]ê¦ÔŸ–ôŒNŽ_ÒÖCÜ%ñ£2î8 Í­t§<¯l¥w7âÄyÅPáj9i6Òü3EÜÎ2O©»ëæÏǵ2'<¥I…šˆ…á±nª/¡ a8E%E4(ú½ëª¸—ÆúV'/NV¿e,ÉÓ Ë:V E ß#ˆ-±>Aˆ*¤ý˜-ù™ñEÈ8?:êdX]nMÃwQ4›/¤c”£ |€9ÈH]6¬J’vaD;×.4ÔD#ù+üžŽ„ÄزÕuuŽ†íɯ^•BòAõ7ytŒ< –±¦Õ “EFN•ÒTH;Ë¢ÿ±X99€uɹTU5Bj“.ÅTž·:Q×=#È‹õÓ<½¤dÐX/¬–²“æË€­–Í[PÖw4‚€ªoœÅcã—‹“÷©÷Ú,\bÎü¡6O+ ºµMê'+´ì–U« ÉÊa©¶šUšýÔ32wêD‰8?putÄo8 Ð [6CÑžúl£àù£ÓcéXøZv²ñp¼ƒdö£„Š?êÿ\²šÝ(œ…1ÊE‰0iùn˜m¢0›‚blR4º‰º”óš(tÏu$3‡í˜ºÊagž¨ñþ2­ÿ¬š’Nª íÚ`TmWU¶¬[ÍF¬hk4Æ,FÉ™}kh¨ èTbRŒñ­ÈjIþ›BA*³Í:Œëd¤FgF¨~/q™ø0€2Dñs ±iTl›öÅFYu3ÌÆò$D¥ ˆî˜|ÈÄÕ!‡­pHk’.ÅX1æô7ŠÑbJìL{Ea\îó)Ž,±ØœôÍr{ÕÆ=emÚBk+iØ\z´µlSr#/¹lÍ07=VœMÑ…7”›‰a=o¸½ª¿êE°¦ª-³³lËl»rÎvš;ŒV6öµ&kfo_5ß;XUYgßMe[LÝØ~Ð6²7“ÎÜó›ÏÉߘ¾IüIÆ¿uv'x}é‡W‹M­u.2!“dþ(_iG&ôT3¯ágä¿ÖüÄbì ÙôÒŸgÉøVvÃœç6æ'yô“êíB”òT“h×Áz¼GuTîæÅ0?msYÓQ½îŽ(òa6Ö3eŠ\$Àc -<ôç`q—ßÁ,cѸ¼mˆ¾ÆoƒqÇm$6*&)„÷jΩ?MâItkvJ<гÑbpŸ‚¹^dÒñß>Äi¡G™VF¥%_^¥;8@Û̱° F((´…Yg:0팙LF>ÈŒ1òYežÑ =Ú ižñ|ÄöI9+ÝBŸ´:§ÙÒûiË”÷õH¥ýqoY¹%aÎLŒ€!Ó¡B—Ÿ8¶a-Iªá© 媓€ ¾\“Z²"iR9¦§xCxÜŽx ëÃŒe‡mÆhâ¶+6+ez'ž!_¼O†NY|PÏBí,^ ùP›3‚?ÂÁ°Zøœ#%…ߢe¹yzÄ‘™ÊÖ—Ÿ… ‰lo1—;ÞŽ¼Fˆ¦³ù—M!bB²¿<Á6: 9âöM8 °¹LÜéßÕt­¹™p, áµ9Nؼ1º?ŸoºhÚÖÓ„=¥‘uÓd˵øË ÔCë¢ï:ûÜ#Èf#ìŒòÉN" ó¡ØVºþKMy’M>÷>Å?_ìPn¥°ÚÃÅHy³WÄ“FªêhðDN \„güŸaèˆpF2Æ¢nÑìñL „N¹i,Ù0f?YÆ®æä ¬t)+R m1Çá”"¸‡¹0òCØs naàŽ8GlF )ö;wjF>•îÑ¡˜¦iZ.Îk¼½UùþtðݾNUU±/¦—¾ÎÛ3¾…ã(ùÒó¥@rŽqz;H1Ò•'HØLpé:#¾Åsïã÷äI÷ì‰ÞFf0‰FÓû Kiìmíxïkâû²¶e¶ïãþÁýûìxÿyÏk'ª„Ùå† ~¢1 Ì`À|åîÏð[ÿYÇ« ð]%9C3 ]D¾ÝŽ;  ‚ˆƒËÝd*$–&Ñ4À…—)°…fVHúSê©x~¢BéãÈwË®zßNúSá9yïn EU4šÁÌÏ2³òZ:€š]×0¦¶›Ù‘NÈ€Ñýþ¼§Èñ)ˆ¨{½zçÕ^ýgRâmÃå-[?V †` l²7¢|W†ùOD ÓQ üÑ(˜çÿÁt; ;u£Ýåû£‡ùþ8ßGh;Ê4#~c‹Åödzvß3ñ¸7ÇÐ#ØÈíruÃ1§"È0¡¢€b«UlŠí’P±Ÿ+ÜïMƒ\ÆÜQ¹íˆÛ2\›mLã‘j¸Z6LËúï{]ð‹¸(cI®pæ±°]ǦìaÎ3?ºZFÁyYlªKÂã˜xµå:º="L2ñµ£ØÿÑxtù¥qïwFh¢³êËâ^‘üþܽö.âïµ0¸ÃWx\Å ¬ÆåwÆæ¿ Ÿ¯‰ÑËqúGÁêk­ªÙ«p»…Ý?2~ÿÝ0üï€ã?^6‡²ž§Qê,k™Èédoãy\ƒ5p½£SAOä(¨)BÌ'€®0¹6CEÑÒDzÅ#b|h9ßB½f'Eqæ( Ðö°ðv†TaJx[bqd“Yඦ’¢àê¨ a$Ħn²uìæK¸uÛÂó‡7Ž!›Ì] £mÑ–P·1ƒ*Œ˜“ òEÃŒbj6ïºY¦ÝdNf©FÉTþcRïEºýˆèñ‘p¬µTÉJ)[Iç~Š¢ýºyѾÓoÜÆNÝ°•„û~þx|ñÓÿëýôàáCÊ‹òÛ/6[uT¸ÝL%Ò}áË…Pý=n³àC%¤o„‚ÙTÞ´7U‚ôÒéo [æ_7Â_­ÿ\&d¢Á¨& üäõ½×ÞOtJgíÚÞZ °Mñ¨Â€ä›ÚVù¤ˆZÚ¡°É“tk’9d¦ôNIªùëƒAŠóè,îŽ!™nzŸÀsù¬”\Ú<ç^ׂl²pK”Ç-â߆²m6& «6´É˜¶ÀÚ0-Ï”yÚî†i§&CŸê57AÝz&¡ÉBÙ„ crBb†¼\Ä;)35N±•ï¨âàzK G½‡|tKbÔÈSl¬{‰ Ý’ÔÚðKÌÊÚÌ0 H!›Ü |»~írX?V34û ñÙ:±tüñ»ªÌ[Å¢ØýAª²‰ò/ÇM·&“‹ÈV`´.µd‚NzÜPU·ãÔÎKjIB>&¡¸CÈ,­$lr#§û*çæ{2zþ7fWä箦)ü+¬´èÊ”àÝ'g4q\ÌtQá+êu´GCõ4 #©.ª –4Ç/–,«²»V´¥~î ¼Õ]Ö+],,²ˆ´åõˆy]wÌÜ #V¤86.)Ðm9â.b,>€c쀟ðžéÌqd—ÖÉgö’4}VuÇ™Ý6½ãŽUð¬Þb˜åa¾0#×`,ÁF‡t¥æ;µ{kïÓOEÿ•¥m¶Ož·XRÒèh³|ÇêZ–X¹v,½†Ö È¶Fz)Š F#Bà¬ÑžFY7j X­¸%¼k˜ýøqÝ…Ê9›ƒÞÝd¬÷zÃ|»¹ãqj&Ïš ^#…˜\@š¾•´zÚÉÔ…{*©d®Þ‰*Uèܨ+Qºzµa4bí‘zol„X õI¬…z†õ°¾+b½×ñ–ŸËÍDÍ–O¡‹`DV8„jç.I— â¤Â*ßÊVaPù*pL, Ý–ïÜ5J”–×]%þDCLJS‰²æ÷¬‰©'3p…׋HªZ‡qÕâz *MÄ A«3#Dˆ %Ê1dÂtÜ%Œˆp{c•Õ‡#—ݲgh8’a|H{Ž8²˜Vj¸4…@4Üfý{]€û{Ï W¼°Œ‘aïUÍA5Âi iŽáµŒevmFó’¶*“Í, $'«²jì.+ïn†Ó±ØõÓÓƒ)¦™WïéÀ*¨Ç‹h°råj½+|t¢N «I*‚t5KM9¸Í…Ä,gÂ)|ܘŒq0”­.¬ú/Z†ˆ!Do®Ó³¾ryö½Ô&õeÇ;¡¼ õ#‘)‘Y‹,PÉ4DSzwìç¾~pü©™)<˜y"&F‡e¶°ìS˜Ö‚-AUA4Ô12I[_Ñ›"£LåY8¥Ps”Á™­ç)ÞØV’rÎ}­{Ѳº:î›2lI¢ºd{Q‚¦l”ªÝÞ‰e+"g/õâš0ž œÚnJöõÞö0Pa5Ïy¾K§é`CDª5¥CÒáJ`½œ B¯ƒtˆInê"Å(¤*¯è*NT¡bZpÀ Õël2…I¸eö è½.RÔÍü·¸Tz¥m«äyp ´£ÀkoïðÉ%¾Á`¹Í0|8eo3xu÷w²{ÙUˆzqðv'¾©€·Y±ÂÎ:¬½‘ÝZ89¢”žOQä‹vr[ã‚%] iù^8ºÊ|¥²½ÝòŽÐM'žÉñ˜`gIuV˜ÑF¡¢gÕU¯ÛµÑÏHÆtÙ8=ˆÇŒ4ìì±U ý¢‡o茛‹¡ŒûJgƒ±A ƒ¡Ê‘×…ù›÷µ¥Çc5¸Èå76Ç\Psø+‹äìðÎL0¤VÅüq¤Î&%0†ü&›Eœæþà¥LÚc#v)»ƒ3Kƒ‹ßéÍ3¸Ç4˜§dDˆQ§?n[ïè&DZÚ*ORÐ!Ï€˜ÛÄ£é¡÷£ïE” ‡<=.ñz$,Ž£&#EW䡹Ö”¾„Ú32S‘Ç"­»5вPKz‹7ÍH£å­é<„¤_ì—ïûõÍÊ.N¾+­Ply³D›öq¸´‡ZM2Éa‹4÷UÒNIÙ2†D®7Ww¨š¯ú—·Ø.Žµå»m/HÙ4LQu_Ñ×\(St/ÌæÇ–TðPŒ1Ó³D< ÎV±@ê ŠoK .RoùSïp¿¿/;®ó€„@¿Šø­+#hT*ËÐ…Q‚á›&ÜÎf¶)‘J&­RE`k8®cö”¾ôÑÇ«Cfh¬§C‹£R[f5D+ÆŽ·edý!—ÂËF>…E^̃Ñ¢ mF#²]Éá°ÑŒ‘’Ê{“„qc»©†ãpu[©,0ÑU¾Àè­Á8"Ë|ÈÈ!‰Ê ¿§Í‡?z­Ÿp•~2ÞÉZì}ðºñ£÷ºõþle¿þïëí__o¿~ôkkÓ{â°pÔ—oÅú<ðŠ†îÂ|Y=íÉ*àI– œ©{†9m¬a–ÉÒrí¯öÛšF3Ö°©l4«›Ç¢²Ô4â´+Ö‹f†|‰(5¢Q×E¡ÆÀJ2*rs™!5eZ¤Ói+S]Qt¿lÀW¯S–¸A)rElåe„ÔWé HÏ(…W”6“–Ê€½ÎÏ S=ÌP6 ß (IIGeÓH8ˆ¦EíŠîV¿«ÄœI!«¤Ñòz-Ê`ïU ¿®k·B”fÙWÓ›cÂç ü¢#œ¿[„4µ~ŒpÆMHÛ&öçu”ãÌd! Ê‹Í!íK›1c¯=×] 8, m9ÈüIà\ƒÆ—Ò½³”Y¥…_×Ëd¯ÒXÅPf 9EÙõÉ6g1—’¬EìÚzܲj›u”ÕÉß_¾¿Š¶hŒÆòÃe ¹Ä/R¸üþ%½’LÉ›­¯ÍMj)~5ÃÄJ™*_ȶ$Ë…0¼µ÷_’ì£ ó,¥ïD}¦™ÜfÄ6r๼.«  eŠßkŪ+›’m˜™'ÖŸ ÄëÏ°¤†=®’«æhZH”7fÎr=¢”Z1…/ªGõµL #¿­¬‹È|lfYÅwJ‡*ÉtrØKo£B4máþ2ÿ‰„d4&‘´Ã- ‰ÙãgÙ؃›ÈFi8‡[M¨•¥ûlË‚äÕâHS³êâfžpGª¸®F^ð³ ±f¢îÑŠ»zDüM*1o3§ ƒPy#Ãu–¶' Ga¼È0#%ç24˳Àt÷BcÒ”VYUËVäWi…Ä §Ç¢¬N2èƒLB/“ŠkrLÚa°$hWq; ìà툑hIÄž“#°$Ü&5¥ÅÕï~+ÍÀ4H© Lœ£2q›ç­’·ñtt‚¬¢È„åVI¬Ç?Á‚\Ú‡Èz!­Ev§p>:’yfBTp|ã©_à ûP2…7ôtµ»]+`Is]V 8ÔgĽ¹¦ñbÙ¶×+e‡Q|ұL äyâ”sIS’§ìŸ7NÏ_ö½Æ¦æŸ´<¿LÔ'å@–¥Tâg…o«ú¡ÁêÙ°Œ Â=ïY)ଙY@.rµ$µ Xþ ÍÖŠòèu7{é6 ´´Dr‹•»[ŒÂÀ·e»«‚xõRÂQUPÎO9r<Ù†PpaõaÜ aÄL_»Û]96¦Y4…S l%²Ñ" ”K•3# •ì `ko\ɬTJþ] »¸‹êª"™äWø°U¢¹Rw‘bÚªiåÞ1*Ø’kûœ•¸ƒ­Bäkà¥8‹aêž9L¡š°R‚—ϼ›¦ùìÜ‘¶Y\x¿²&l99hØ€ZIœ¸cˆ†¨I ê…FºÍfèŒuO~%âä…w½‹yGuÕr€æbàè&ŠT9FÂCI`K8 Û„ HdÕ5 Î@ÁKÀ®#[·‰nÔ¾JÖ€é0v7¬ºH‹ž˜8 LU~±©¨6©*ß“íAùåwGÛ™»[ÏÜÁ~ÆSâ?‹Þ Ä%åòFÇ9ö3Ä·‚ý&pý µbJ¬|Ö†œ{¿dÞ×L‘{m½‚Öñ4å§þ± ~‚¨ñ>Œ½È ¹2Ç"[èóEv¼5M ØJ¯ÅJC(¯.B ÇÙ.QâVL  ìx’XF!Ì´ÑP]…?˜×­a‹­=muS*–VbQ>@áêîÆßkd;p;•¤A¥|˜W,4I¢e¢aHÃ]CW™˜“±QÝùöí¯¬­×á:¥ø䧺×ä¡•dÄb>ÎRTY4ÜŤ¡iý6gPneë`äaõ Ãʬg,úQ­*Ão³€°®5k‰–›:h’û·š;‘ço2y‘w?ŠÙ·õ‘L$uÿÛ͸¥`! ¥«Ì J‰Š?ÖbÑvwsˆ;ÐUÂ$¢z >¢Y„ÆiLn”Pgö½¦4\ S3¸(Ó° ¶dëÎ[G¶þ{+Ýy î{]&#Lo_髬!òžF$¤{Oq]­ä‘ƒ#Ç}©c’ IåÐj=le¤u4±Q»\Ãj3-¥ Ôb蘧F]¡-«ù\n¥(ϽelWάpBtƒìVéÂ7”gŠ4Öfd?¯µåö‹ogO‡æLËãr5˜;z•b×ÿº†%k™•¬0*1² ßûp‹’µŽ1ûiVðïa0LÔÎ7â¨Vô4`,RàI üˆº+*íÇzŽä}¥ˆÅ‰_m2#"ðÚüˆy$—[«à˸EW2&«™‹0,°&ï¥}œËŽÜe¿»iN©iŽþj󨢶áÎÒ«´ᯫ±.aˆ~¹8y‘¯Å /°=÷äŽt¿?êz/º½žBX,­¡< RŽNžÅÚ‡XúÀÒ’p4fáø*O¤œ† ¤>”%‹~bÆ °É©š WǧƒžÕQöÀp–à%Pþ¸G¯-ÇÁtÚ‚ï“)ÐfBv!¶C¸X³óðû*iq ß‹{Q4kÝ?gœÁ™d&s-ߣ\Î-‘vüÂ1ò@áw*˜˜U;;ÌÛÂÒ5k%².‘ Þ¼XÔÀã„7j Wn4Q¦-ºá°Œ^}S]Û¤ÔäÓ8ÁXlB1…·\]È {eÆ~ cñåÁkŒ Ž^fðƒ¢¹}E›tê7ÛÇ›¼%–Ç„rÈ üåv@«çRhìíÒÖ.îÐÒuLUUC½¯eîЦˆNZ9Yþ¼²Av¶Nz·:QÒ”nê1ë³ ŒZ¤vV^"ÔñÄü=(Ùd8]ä|90‘DèB–¹)º¡c˜·ŒX§G&<›4kÚ˜äQ¢¬™áÎ¥ê‹ÒÄ(A ‰Â²¹ŠÀb‡°dB€DÊy_Æq*œ£†VŒH·sfÒ€¥”…"E%'™ceª&š³E„ˆÊº¯dpÅ©ÁQ-ŒÃÉXù˜Ô;ÌÖœ<Äu†¿2h° IšqšT7Â"|"ñ`r¤ZÅZñ^¨:²ÚÄ348{hÌãC 1ByÕ[œ+/#?Õ~Ñ:Õ´z¹u¢†K@F25¶1”²ƒ=Ñ÷F„7Lf:÷GAÇ‚usp àE4ª_{¯7~r#R±ÃVÞîw´_g{„Ù|P,J*ä¥<³ÑQĨ½¢!O¢¢€™,¨õ«÷«ÀWØñ CÉ÷Ú«jM›{Vr/Ã7mqlá ƒ®›£^ÉÀ˜×¬%²æÜ¡® ¯ÑNáU(8›Ì‘ˆ—pÖÕƒ¬5 ¬½$îvÕõèQhà§v–ß*‘sF•‚…³LZ#°ÈÃ×2†çÆÃñŽðD?Ý#ÐÞ†»Úr´J]ˆÑ _…ŠŸe a:¼ªwñMH¦´°Ô(€'¬/s®Ö4:GTû¾”ŸNcú0®Abõ\BV»0³ÎŽÿò±Æ£@ðbCÑpìÙ·*. |tP ?ÇE*-ƒïc$6¢>œ9#P‰Ëmàh¼:ñÄ®?÷gs”Vª[ù~\YÅr|¨\Ù÷µ2¬ƒçHºvL|4`'â?[|"RãœpC‰º¯ˆd|Eu…Âri*àžmà ¤šî @ÊD¿ îÝô]8Z «ÁÃm­ry%+{ݬa+Âã4ÝìG›€:0»M×”ÐÆ¥Y°^Ù5û1Hg™ž÷ãÑÎ…7„„‘¢P‘^£åüåèùÄN Dè–zÌzI1ê¢]g|ÇýÁÑéQ¿ñ#×ø ø_‘ËxÜñö‘¤ÄrpÜEÈlÑ]Ç¡ùåÎ òg4ë$)³Š2œZ1P°óå© Tx·b£î§;´ZÊT­™ŽêLñ§7I㇠(ýwJ!Ñ¢¬Åƒ ó>ûL*åeÀyXŒòCÞ§´@aÆÛ{¡Púm€û½í­Î(¿à[ÿö“¦!ž8øþ{öÅó§ŽÔ…‡ýËÉþÁYïûÁa÷üø쇓îiÐß¿xÞí·¡á­÷*€#<á^þS³L­&÷IŠÑë/¶= ãñÀÏxêeÕÔN¬¬g:ÖrDï”ûƒ ïNáª? ïÔ…—Ä.lÞB`lgHÿÇd»çÆ”][ C¸Ç«¶‚(œ™R‚ˆ£-¿µƒ »Fz ª'¥»¤žã€¡Ä¥’ä5&³raW¬Ù­K‰·pƒ·œHäÇ|_[œAríPÒÖÖ‚ä:»T¨êÉ5¢ÙÕS¸.«Ãa V‘#ÀòC1<¶†mcI¬(מ3?^¢;Ç´¾c<뇷4Bï²pÔ®ÆyÍ Ô9ð±âRËèÉ¿94µqÙ‰žõQ©«ƒ2;ÎÌk…¥®ˆ&lD¥fî5¢QWG¢^ç€-‹@­)’4:J(>©H¡ø0¿ùü‘üdâ§Bg„dO˜Z^©gÃh*{ðE.BÙ,‰£q<!â+ÇýXÍö±h属íãÇMÏ*-á¾t1¬’žj¯n_&«¡§·| ºÜzƒÑåëëÞÉ'üNÑõÙ¤{0áÕ!ÂéÌÈÈàÞÒSãèý,,¼+’ ü¬þ'ÿÿÛѸÂÄçåõ«ûÿ¿†}ÀŒa»Ç¸îර ÈáÔ3JsæÛ stðsÒÃ9!Ñ;š%T¿¾k?wyÝšûeæ\’šMê§ãˆBEKi§°GÙ;¿8{~±²W甚G#CBDsqˆB›”J´¹ˆmþÝL-¯×kÏÍâòÚxIÐsockÐK†X¸ÒJƸވ W`ÑnOŒ›u‰ãÝJrÎ>Re ŠÖIO¤“­JM´41‘t‡4'gç&z]/KNKVwRÌÄåêG™WI»wœ µUwša•ºY^¢q2èÙ ù^ Ãeõ¢2ÌŠ{IÅV«¸`+.‰;ÜdV†XÅDþëÜaEû?Ý)tSnþ' ï{Çh3Ávsˆ‰FÒ6ìëÜMÞŸ—Òúæ5ßΆŠ­ úè €5mû˜Xk±î¾÷Ì'š—Š©”ìF‚æ`Ìv»²?]Ù< lìfœT«¦4þd´YL'…W¶ó¤iý]½Ø”¶¿Ù¼ÅX¡Úx‘bs]êV^ ‰[€šÅűæç®N1¡¦³<Úså—žè×hŸdÅk YE¨inR…µâ¤ùïÜÛÂpƒ¢CíG_S»§2kç5ñ« òÛ¬¯‡XfF•Ö×zH+L°¹`uGî§(o_--]Ƶ—âéj,]¶µ{mW­ø‡bò;áñr•¤ Æ%–FGÑ‘OdkÿŽx2&Þ¼RsŒtUvÎçä½[F´ZÇÄ jÎÑE8¥`)·FŠg² À §þdBa:E@ÀœÀÁ†IÊjc¨@´œª8@o·1ù r—†Ë”ŠA‡’ot-ýë}Tãû×–ØÛ9Óõ_*kÑiˆòÁ"FÚ?D€~íêÌ’ð´ã½§ÿ¹+¡DÒè à€œ¤wp¤ZZR¯¾-kYÏå}fA¹W&CÝÛ’~6Jê ø]cÊ_ìžÛ8z¨ý<¿ÿ\¨Ø¬J+´èt¡ÅŒ@£wåõŸK ¨=³ ƒÔ1Jœ–36àEªÅc @€hÙZ…ItÆŸ?â{aú”OEØó†p‹ ÉÞíÓ.}2Bó=´ÉJh2 ßÊ|d¶‰…’É„BE¨´ÞÚqEòXõŽö¡KÍCµ†ïÞ}†@7’PE8ž]{?Œ2ïæaƒÞæAŒ†¡YAƒ«%ˆMé´`~T¬gz).½ÀÖzðì§W=ÒUˆ~ŒUŽÌ’m9 ÔZFÇãbb¯ÿëXã+$3Š‰T¹ff©‘”6&‹t(gÓXʸS©ÓÎÈ®êV2Jªu§ËÜîK?‹ð3^VpÇ´q~¶tüò¢[÷¶½GÞö—Vj…Y˜d%à KGh”n·«ü³ûÆepxpŠPÜ›‹@äx¾xCå5Ñ’ H` sC†‹²A]^Dë õ‰ËÛ²®›£i‹É~ì*÷Sô‚Òãiy3T}ãƒîk2!ÕƒKDÔotHGŠ,P_‡icšÌNyªE´nã¸p@ÿ>;ÞÞóÚ‰^¸ÂÊ:½þÅѹ»£ïÕ Ъ¦èÜó ã ‡µ|llg”‹ò.ÏtŸÝÁMei ä @[Ua)À-_ÆûˆÑƒÇì“'æIØš¼Œµ{„…Çl±9º´ßqCÛÕß²Ú‚-¼¥]Ö±ÉôÖ´ÛpNÇ‹Ù¼-zûfÝQ‘Kõá‘ÆÉ]šÑ!óT G…å,‘Š³ üúN§Û Ù.-¢÷Ù[ó­cKò~ ›§ºïõ‚@¸“HÁ»ÀÂ1C­‰”i‚ÙlUNè7KóQþÉf£–°£¨W2%†­&4c;ªAêmˆÔÂ2§?³Y§ãDWìŒÒnò2±¼ÕÕ‹Õ0ªŒ×jÜaYnlžë!G3Q®*$ ê,ŒéÊÒŸB†'æ.ÐV jmJ¦PÊS[Œ†¨­Žáz\Öð‡\á )úµ›2&¹Üý±HÊØG’Ãd‹1JÖNy†¦Él€ÆÃ2ùÈJm­RÕP$ Ê¶j~ú?ÏÚ;)õ{çg½£ï½qÀÞn€ •Þ01›¸`Ѻ—³v–hîÄó¯“p¬Ã«Á’7ò÷$)<ê°òŒ”µÒÍÜÈ76n:Ò?ÅXyAgÚiqF&Ý Ög'(j˜4™ƒRÜBÌšr*¥“pcó0 ò[®)"e“ìáS¶Q¯1Z¤èö‡QïîÛâ`ô4u…ÛMÃŒÏ.6¥4Ø¿I©WúwˆóºŽæ ¬@†Ì«øÓ^‘úp\?Œ@'<úæÓífižò¶¬’ù-›…`lÇW{«† ;íÌUýó²Ìì M•æÚGQ§[‘7‰±˜ò+ñ1ÀÌî¶TŸYÁñJ–æ¬tõá¾_ÆI· }ܤypYM}íá ¤e݃_{¢Ž†Týò¢º¹Déßc‘ZXä)Ëi œp=¸Ï®Rð1, _ôhÜ$ò£Œëa ÈŸ£jþà? jåbiÚ²g' €ø,B¬Ëu, b^>í{rfÜ¥²ÁCω7?áû–wõ¡()°'»¾íØq53_·,ÝÁF±°a·J!£ç¥ŸJýÏ ”YQZí`³ª"²˜?BÑ•Iz‰«{Ksª×îQ.»,{‹‹Îº E¬ëÚ='Å:REå ÖuЦߘ׫x1s˜>ÇìS|LK3Æ”å“VÂ\\H‰ªeHF™*Яuø+󬬑¼[ ßêè£ðf»\[Q©n‘¶^É-YõºgΛõIÖàÍÜOó¬jct€ÌŠ]!\|±z|ôtwƒÿâkñæ±›‘ÊÍVµÖEpß;"ç«”2=9¢¶Ÿ.ø : 9 §8Áb•wåïë^îßs ÃÞ¢˜D¦äDÞ[–E¦2ƒŒÎs—kÎJ£ñßò,0žW΢€CÝ$.–ôaUFƲËlõ‰—  õ^uLdth™ïPn6 r Å*ó‚qs6G2¨{W†þçòZ8"Õ€ÜbBˆß3uA9ä2E;±a¼/A²beËcçøážeƒu3˜Ö%J¬”j°"3–ɤ‡:Î0ý E‰cyOxO‡~PIt!Œ(È ÿ¤lôoE¼‡{%±œBfö˜BDxÒWo÷." ß»D©ÉÕà)‰ZÍJ“$·jËèôìƒK41›Ä<ü_ñš“l<|½ýp¾)è&§IÑáÏРjÌÎùRŒŒ¹)F²) }ÏŽÖ%îºãóW\o¤Ä~‰r9 ÇŸí¾î–Ô†ËG›¸ç¨¶ÛǨÝ6WGÌ•`ÄX¾RÕöZclo”µi4a ò¢t¿ÿ /Öd1˜FÉÆر8lŸK-ðpOÐF±1}Ú8”ïnM3uÆøSñl•,åa䜯u×Ýϼý€3òDçüXÿ`”l§nf=û²¡k{&…ø»e»&?®¹q2vÝÜÏ2Tg`d/é©#ãô̳`1NÚ’9G5U ®ƒ ŠT‚ …ÜaÞ¦9x˜7¥üþ“s@+¸tÆ". õ£º—JÛ•$êT×ð}\‚Ïÿ_€7¹ƒw¹r0R ²a5mó[&"¸;¸÷ãë×Bë¢÷Ûÿã·ßýô˜ß4g®ëâ " ë«·äìøìþ‡–?bv憗OpÉ62¹æØ8Ü÷˜ã`ï8ÙQ’âQBŽìr´Å›~Á+”SL9;‡ÛŒèÚ‘] ÅÂ6È=›,†¸€^Äó9 n:nS+`ò|M㧌›á<~®:-'nAq¥Ð’¼áH—w¾ßÑâv0õÌC9g¤êã8Ï0ªÀÏB4… ò ¡0“º#µ.ЦsX¬åA÷Õ©U|¬4`”JH=CÄOg=Bœ¬+ë!ŒÆÏgO®Y‚vQ-ÁT~¬ý1Ä ò‚Þy—›‘ª6(±Vág%l¼ÈV„Pd"Þ¸"¢3Ts/6zÌrô“Ž/í `+a9Ðè‘Lr™+€ÿê¸hÔàÖÒ¼GKä1hm(¸ aØzù!úz´â¤õ 3†þ”Mbù7ö/~kjQßj`Û<À«ÓÍ™20,hÍÇ-O»$Œ9š@tJóxÊx0RŽ'8´e2]8Ê9œ”®†w„\³bMq=4–Ó°€‚{ÇEbð * :õ2X¤aügÇh¾ÓÁÍs›Ò¢E;  3ÅJéàÕ_×î{¦+CÛPbˆ Åž+½ëðÖÛÁ¼¦šÛ8ß?øvÿy·ém|×½èÖîCsŠrêžy§g}LšÆþ!çåûJ‘¡pŒ‚,£®DF%d—¹Bjl"©U–"J;G m|ÞìÔÄ‚lnˆ¥ÙÄJ§d1@Q¡#ÕœøA¢Ù.ÝÐúyÓêMD$´m:5SÀ¶¹a;^bê3ŠX$¡çIg¿M­ÙpôÉí 7 Z€éª„oˆP„i¹·‡Mfu8b¹Ad%T“Ÿiu)>°·¡ùÕVðÜ?JF ®º4 ñö™C]šìÝômœ iM\/Ê÷ˆâ  ÝDD†&À©1­-á”9cæ,ÆH¥¸<÷œ´™â-²b–%K#–© T®„×6Â%FˆáD&Èœ¾¼Eå¼O¢!Õ^OC*àŽåòïxï][BÀ`0NYòreImg-ÊñŠ tLƒku{/,çZâyv;I,_.v g]kɬ0ô ã4KòàZ“-$<¯°™GwiǬìÁUVVéf-†Ìœ¢ÎÑòLíÆή9`¬òƒ.T»ÃÀïY™Ù…-PÈþ9=ÑX3 øu&#meY&™ßDe¶+Å,³¹# ‰·}Î1 Í3G¾ 5 Ÿ‚N0#EødeE¦l‚KáDÅBˆUíÿ¢)bä-Uæñµ³x hhF#ƒ(S¤ûбÚþ:eãuJ¬;f§šaadîxSÛ¼.¹ÇI™±Åh‚ØÒ.Î+=…™À¹')ï ïà•Í®ÆÆà–´u_ –ää } ¤€d¿‡¼gç4±˜ÊE#áëÚÈn;NÑÅM0¦i ²IkNüAÀt ‡Î×'Nç–"q¼KnÛ²bZ&]^c™¨µUÅ(*–eº8Èk»:V¬ÙŠêõ¢™ä:£çA‰s°§© ‡²<$L.¼ J8’’§ð’4œb”t‡’qì!<û2E%.ÎR?¶1{a*u1íuˆ—Âm¬ÃÚ—™˜±žœDôA>–nK"ÝØ3'ï#eLú½^aNtüýF!Ëñ=È6:£zIRû{e!? ¨G;Á-·]cI Ò{k&½GOpfÔ63y×…<‹lȺ]Sˆ||¯â=U‚ b` ÞÓ"÷MÎÑ=Õ$˜u 'Z¢žD1¤!Œ©â¥D¦í{¥[*cXËš|'Ê]…ße³R¸†ð©¶‹ïœvë8Ý8¢±¥Šâ‚B;2·ŸÈ"p Ì©+ƵY×kB'Aµ©¦K€¯Í¯5¯Ä±šæ^\v)}ïï?ÏàFÁ\WáwLB´È£K¥à,µ¤@äÌÂ|A#¯Ý7 LÄ&pi]…(´b&¼}œY¬ÜÓPÝwß]&á(àÃÓ„…DR  ¼i 2Y E[ r´j”mwh=#Š¸pPä è†Rƒb©éX†s¨Ý׉füìJ¤‰£N“TÅ| Úߌކ½ ßBna&cœ7?…),"?EsŠ ˜ÒùzûGß·T£*{ã}Ù*9‘ ¦e”ú¸ÎÜC“ÂÜ ï‹û”›‘ãDÀ{9\©?•iy©ÁvB¶“°'át‘ŠhaBË'Ö©-ºÎý)ÎlŠ»ØÙ‡Qu&ÓuÉ}£&qk­F=JŒÆµ@%¬þ5j•¡ÇE©û÷ï{O»ÏN½ã£§ï aÖ;8;}vôü±3ÆZ¹Sºmº½ wh·{z¸N«ë‚¦âö÷ó×¼›ìè';;cÐøt‡®ŽŸ×+÷úªdØá;)É}\»Oæqø'A#à.Û!éðiƒ?‚WÝxü¸ö_üßtÔþºóUgë!¹ü>ü¯ßã¿-øï믿ĿÛ_ù¹ùWþ÷_Û¾þrëÑÖÖW ÜöÖ£/·þËûò¿þý''"ÿþùÏÙÿé¨3ú]–櫯¾¨Úÿ/¿úâKÞÿí¯?‡'Üÿ¯¿ø꿼ÿúsÿ÷ÿ>¨y¼ƒd~ËáÚ£¦·ý·¿}jéïƒ4y ßR¸±$zßÄN%3O8 àº¤…¯°…^4ÜSϺ GÙ]ø+6ð,H§‹Ì{ö4»Ã•lµáŸ¿a+/‚ óö9Üa˜×ân¦(™“MËA2›ûñ-5QÑ4~ê¿8êy'ûýîÅÑþ±¿Ï/ξ;:ìzû=xly¯Žú/¼ý§½³ã—ýîñÞé™÷jÿâbÿ´ÿƒ×ýþü¢Ûëu±¥³ ïèäüø¨{ˆ“9ýÁ{Ùëbƒû}—ÞÙ«Sïâ¨÷­ìù-©²LD¾E: fŒxœë4æhvÓg¦]ðéX—­øÖ›/RLSÚò´ÙvæÃL#q§¢MBÅ2ÄyH1=­q@¯pÕ qÌΫcŽŸŒzúeCLÌB%BŠâ1&§V1æ6¶æ0ZÔ®/¾i65 ,6¥ú!íô(Z`³ÚhVø+JØà–pBkµ‡˜’#¦xd¹22mˆjrÌKµ¼†ÙcüÚ€&ÚD4 7Þ9éž Ž$t<„—ÏÁkˆ°<;ª ¦ó`2i ½¿€Ugá;:{xvÊÿ“3 çq ä`.a¾¤üF`G"½¼Ù›±ÝÎC$'x8VI(ã5ž4%°Á=öVÿ'fvö¹×žÄIáb”·'òÉ?¹=C-ÎnL¦\^ûB[{p ԖαC9ÃWù1,ïmÐq/ÞrxLÕ;ŠB8ÑhµÝ6{/1Ïã$x; Ä,ˆØæaaܤ˜!kz‰2{~0È/Q7 v †5j4¥Ý±=ÃéÂ'ÀQ¤Pøx {ÑÈ„Ý 0$Bp.š:.Í;£fGïaí>óeØùÑéi÷Âëõ÷ûGæûî÷€NU‰š»è0®„c•lt;1Þ¹ìÈÕìÍpÉYâDz˜fy§CŸï‹sD†HøO£ÄþÁ§j¹F—Áè*[̲—éèÍ` ï/aMÁÞã“bq4åºFW…pÈ3^x?ÏÓÁèrT¬å‹á0Icü`|™ŽaŒÞøK§ hTÚuùHÇÃié„ePèâ‡8zWZƒ—âmÉûôªôå Í‹ š£Èg…÷€Æ²[§©0+&É0ÂW±îY“Z„¶bè§Ú–q«5ø‘õh ôqÊn8.É|p“¤Ñ¸¸Â·1å¥.µ[‰•¬Îè²tüóQ ûžéÄ%@$Ïnå`T‘ƽnbâ…ÿUàœLlˆž žõóþ‹‹îþáŽöEÿ==Ü?>;íÖî{åãóE×@6…Zÿ ¸ ðne<Ø ©%â¥Þ'І1F•—M¿åfLÑìÙ4;¢ )7!) v4è€n q“È€¬»9¶¹Eå~8;±EáTáÑÕw’±¬§g±°Ýã‹îA¿+ª‘í¹ûupvzüƒ¹èbrþr)3Âzáá#ÚIñYhqd­‡'þ謧gÙ5ÀêpÚõñƒy%håþ8þO ìäÿ¶é›Íÿm¾ýÅŸüßÅÿ‰ÿÄÞ×Ô‹^2R%Ƙ¸/!‹ÞY0CSßK î"v§yôE{æVnjðó-Ý`?b†Ì“*M,2)KUÉB> sŒèaNQxŒV·=܆V¿­î“‚M¬!Ò‡s¸[(#'’Ë€sF#éÚ"Æ»¬ÌVBuìß¹Ôô•w«GËü `±öÏ‚aºÀµØþ²ÅÌø£Ç_~éÍgÞy¯O º|`ÍY- ˆëãõ -ýî8¹×ö»,‡IáŒÚ}‡ KðIÎ>}yt|h‘]6½…ø5 ¯ñeíáCâ>6λ›ÈŸ³2uKò<Á[ŒXHÛ#”l€2 Ùž^L£dkžÍñv¯Õ€æ ð*€±- ê/j…qN‘r&b!÷¿Ü©øLj•êÏÿè÷€Ì«þz6™dA¾S{ï=8øüŸ MÎó´å=P/wj54{|€ËGðyú¹ßë^Ùãv-â”·¼]¯a¿oB}¹ñ ^Ò–·ÕÜ1Ó(6¨nÓXùŸ9oœ¶ÿàïÖCþw‹ê¶!†ÂõŠåÓ̼Æñ ö€ýö¿6¬mömT|¯s2ÔÄù¤¤°˜õr0ØDø¶?o³¹Gê¥NÝhÙ½F{Ûx#†±µƒ@8bóJª’Ì\Ì#Ì•}Šœ¡‰+èü9°×—mð±{ `|UúÃy¯àcY[zKk{1ÜÿTRO|ÈýøÌÚ'=Uy° ΀ŠÓ—ÇÇ;²ÞÓ$!Õ.qš}Ô`íÂb.$d À~ëå4ÔÀÏ°#58¢”*qÜÀÛF†ùurÿ´TG¨IN¹ 󄬎,xÖë¦hL‘^V¬¼p–Œ_ðﮇÑNÍH€ªkà*m·‰oaŽüDÓô>£i&“FÙF7[Þ§’Uæ.¶AZ¢ÒòGZ,½>ö¼¿ *é6¦ê§×q½U+Š¢œ%vÖ¡ª ½÷ÂíóqĉÕÌ{µ äêÞ‡i¬ÜiLüt€÷sA ‹ÑÇ \¢‹!8¯‹QàÈ>:‹ñ™Ù÷Èb0@Û…ø¯¸I[X”ÿQãìáGÝÍþçÑöçþ´ÿù7ØÿèýGhCúpô{Ë·pÛùïç_mù§ü÷”ÿªÝfJhß»æžÒš€Òôå† keÂBLY)¢¬^ D;µÿúó¿ÿÜó/‰¿ÿùwõ?_<ÚÞúóüÿÁç_ìöˆ¨Ç?qÀäù'mà@Z ýžçûó¯]ûß/¾|ôõŸçÿß¡ÿU;^3Ø=ÃÃCÄáÂc¯ÁcÞV„*\_«»ýÕÿ})Ô¥/çc’Ʋ¢Ù!yÄMHþƒaA²Üû¢óåfBp½›vô8;Š8²ý5iG¿ô¶=ÞÞ²Õ£ÔÎ '¯ºßöÒ?’¡!°’¯ü4 á÷yš°¥éI§ÉM^e^/–ŒE€©ÆIï¸ÙÁêRñ //{ÝÁùE÷àìäüè¸{8xÑÝ?ì^ô¼-CgêÇY(â³wfþˆªk(‡Æ} ³u¦2ü£H[lþ'ô¨Úý™¿ô/^våïgûǽ®ÖËîŽNÑÒùìbp~F?{,kfkX 2Ð Ìú™áüdýóÓþ`ÿðpðô‡~w°ß O Ö¦„vã1E·×Å{'Ø!û¹XâzéÞ%ÍN½ ÍhàÅeàÏ;j¸¸’ýîÉùItNº'g?ˆ°š†RWO×ùóâ)à #úqg4ŸÿaþÛ_íÒ>ÿòOÿ?ä?ÝŸ?ÍbÛlÞeùØ~7ùüá\ë¥/rŒqz'K‰eGóh‘áÿK]Oý îý¢Ìèà“„3ÈId  ”)‰ªÁB\–#öûd’×ïGñ$ñ|ü—Åmý£˜‚3y»Þk4;ªdƒJ ÉÊ'½O°¬–ÿâÊì¨B'|êÛª- ²â–[ü}­†÷r¦ˆ°á¦ã(§˜Gþ]&DœY“4çG7þ-Uz£ÇÞªq·Ïàž*›IÖk<6´5ø†riœs?pi^6¼î!V?ðD¡>`Ä`–XU´ªPüV£Ñ(ÁíàçÁñQ¿á}{@­¶¼úèq]Åj£8 Ò¼Š^Q?×ÄÄD">R†áÊ´‹ú­á&i¼ §±ñKí©Xò¶÷´¬h¯äåþ‰ºJ%º´Ú&#ü˜±èóÓ—ƒ¡d}ÿ Fñ7eŒ}ž&ybp>Œ“Ìyoð-Y‘¸ßn’ôjģˇt .æLYÈñgëðQàfü,1`P`d¨]u>2ña©/LµS1ÂuïàXÎÇ€Žd0ïÁ( E±§çý ov =`Tzñ’å{ ò+¤YÅñb¶S.’øhKáˆf ¦¶Ï5LnˆÌ)ç•œ€>˜†ùD*ÓæÄ*@;H×,‚˜Ûß5Ê|ö×öüøg õ%P˱á”nTR¾d&æ?gÊéIÅÄ 1‡hœ…"¦˜»—ºÑá®Ü¬C¾üü¯“  ‘/|^+ ²‚>YߟÁ1éøÙÌ<íwÂ6¶SˆUqÎn¹+”‚*¡À~k@óJO¾X\¨ãÄGj„ÿÛOÎM)ìm³"}_„ŽwO÷/¬a:¼‘9:¨ÒþþœP(8ÛogÉ0÷Ÿž]ôõSÊ,öÕr/y_³Üè³|ÉDƒûišN/;`™`Wâ€zä˹¢#X¹·èÚ»\`fꆠ՗™©áïšoòY$´°*0@“—Q»¹Ãˆï—«Wç±X™¼Ö·~j¨!.€j„ç=ñd™O©íŸš˜BÉñ ^ÝÎ7…và¢_ímÚ}Ǻ¯™£7°n§j¬ÄÊ+`;4ù*ÊÞ;£Ð®bú?“+„q¤ yEÊ©µj+ƒ/ê4õh12n–ŸÏûì3ºôÁAü0¢ÓÊõÃ¥ûÄZŽÂŠ‰S` n™Ü¹'/Ü×q/‰E™b ú1fš 7ò+„oƒÙ"êÈÜ=öù/ñÇ3)ˆ 4¼®Š_>Ûïõ÷Ï„ŒìnâjŽ·&RUX¸\ãÁ>x¶ˆÉ°iyÔl‰ ²òMrÈ– –v='Í»w¯zß-m$ÚªÕ–Î{@T'†G¿ûvþÓFúæ#QŒtw—pâyâ%CŒ¬jùOsš§çdì/Œ‡(Ú;fíhCIŠLDÁÜ%]¢£ôÉè}2oæ_a0¿Q[&ÄÀ~3Œ?‹ó˨=h䆓!ÃT¦cMnЀÉ—ÏÙGSÎCÊñC£[á˜~Ûß¾ ò0òzïsY.² ×cüßD"SÔ$ Ú¥Reh×Ñ#„A)]u‚äÂK»MÐŒ…_6µð‹C´fµºFÞôŠ¦¨,k•–Øã¤{²ÛX«F³Ôwó_ ¢vÄ" †XNN÷ s2ˆœ$œØG A_!nqHâ*ôO)0ŒãÙ`ÿô‡_éÇÁqwÿ‚ÖŽ—Cá:ü B¼çýêé |^€ÊÈÄëV/â³j9&ïLÚ2·泂?x+vœÀ€Ü;ûÃ^kO1¿j~ŒÉx°Õ]Á>Hî¢ïó‹£Ó>Fcí‘Ê3[ŒF»[-üói |‹—±ývE€„1à‚~5®ßêÕè2œûò/¬gCz‘äI".T¿®pc ÎLÁÝCïU@1ª³¢epõĹ¼`4M1\äH9ß”’FÄ(Â<Ð#£„7ä©kR~w·QBø“V‡ÿ Ã>ê9=ùß5퉸gŸO"m^!vs¢%®±¯ÍfË°¬ˆqÂ.ã{<ö@·ìâŽ[‡´{÷áY;3tÑHÚ!Oݾ" áò… ¸)¨78kçà½íxÇ´;æIÎØÒÇuH\XY)¤ždU‚¿%9úÙ®Í1¿GÑPEq¼Ç å $¶“ðÙ6[ÕV!æ>ݠȪQ–64e)$ET´790c'ï1u ìrš…×At‹X>_&«‹äáh¸-lñœÂJ¡^H‘{*Œ6òá~ŒM~7…«ðŸ» ÝþÅ.R„ñ°`êÎ"®Ö6ʉ“2¶+§ÝØ\èÝ*Éâ¡šúFÀ †:Ä–«.~¨µì³"DØûì³å¹àTÚàx@[DÚ,kQ–Ýæ²Û«Ë~³Íá[GO¶EÛkôðÍîö–¬÷¥¨÷åZõ¾Tõ¶eÅíõjåKçUqlÕE¼b3îºw؊ى܈݇;nÃ’]X‚Yc¦Ï[óÉ®=ħf³äÔቬ@?- A´àãg/Ï¥–06)ìx¶•+&^'ôÞ¤,™¬TL{[‰Œ¬IJÝÎòtÌá:—šüDœ{ú"þ‚–O0í¹T[áÇ·¿ES£l ÿy´cÛÑ:$'©ÿ ºïªäiv1Eâ9¤ˆ¦@ ZÒU1v¹!p×abå%/ŽßzøÝDâ&TyOv½ê[Mäýð!f¦¬^$5!™L× #>¸7ÌóƒeÇç(‡ 8˜Ž–t\wˬòšÑb"<±÷Ët²Åÿ–-}U÷«_sñ—Àcdó1Gÿƒ”ÿ½Ú¿8mÔÏÔŠ©åOÐÜJIøŽŽ?¡èª[kŒáý²5¾;(,¿5 (!ß²›àýŠí5°¸>• Õ7Y¨*oÚ €y_AfÞmb˜åS„ç†ã)à)™ÍmH9èü òQ‡Ò‹³ª ƒ–)Ò;K€àNQV‹x+iÆ– áeÆY¥(ÎEDʇ`2Áð»×AŒÀfœâ¼ ³¥ ÷² mŽŠTÏgæ`š$coUÏ/’Ô}´ˆ%÷”U&"W6Óp„cø«®„NOÃù¶–w#Ù=XPô‰kÁe‘BWüÍœ]s)}±@­óü ^÷a¯Ã!;c‚Nÿìäè`ðòôàìø¸{ÐßzÜ]Ù neG~žÌÂBË‘Þ8ïÛ5©—eØãýzçœz«ÂŽ¿á¢±¹©GOlvêÑ1êJêêRñ:ݬ¹¼ërÄ”Éô×û*(]ŠÕ­}m~£©«*¬Pª B!oÇÖ ,¹ù%-Þ\ï¶g’õ7nì;»§péxÆT{ÏtÅ<ß×VnÐû¥ô· ƒ*XÉ(¶GyìA“5Ú»BÐhk¾³ çR Q™QÃ8µv‹»Xh§fÄè}R"àZnfwëGá\>€uXFꑃ8IÈ”ÊPk&:KÄí¢I†5¸„µ¹ƒßÎܸ ]‰bœU^­å(™µ!÷WŠpÛ~g ú²AV(ôJÇ’[e÷[ÉŠï,[T<«Ë™xûÚoÞR^˱à ú†rÐÏïdS©‡nd*ší4ͬctSíÊûKy,œøoI¿³ãžøgˆ2HæZ †Qä]ú¤ÍUQb£Y†=Z6Gñ鼇aÞ©} ä .,ärX6 °‚7€ÂÇeƾ¦:”›³Þ.)™“’ødûLœòë$8}Kl¦Ó¦Ÿa<`£‹_–§*;0š.¶¹#LxKR¡¾µÄ»ëwZ†Óc(”Eƒ­šÍV”ê/ ¦ˆeÒM`æ„dAY«”ébþ¯]-w_÷?/›»_6»w9Sÿy—ÌÝŽ\ „dîýºúCK¡Q¦Ï(‘-ÁJ…u0oXñé}’ß?©ýÇÄЙÈÿ°ø¾~ô•›ÿåÑöçÆÿýcâÿ ÃHM‰$jŒšè:ñ…·Ó ôΓh‘]†1ÒçA: 3òt M‰‡·Þ4õc²SBrŽM5ýt´ ø®wÔóÎ/ξ;:ìzõý<FuÔqö²WÀÅþiÿï왇·ù·G§‡-¯ûýùE·×óÎ. ±£“óã£.¼å0UG§Ï½§Póô¬ïõ¡Ùþu);êö°¹“îÅÁ xÜzt|Ôÿ RŸõO±ÝggÞ¾w¾Ñ?:xy¼ῼ8?ëua‡ÐðéÑé3¸SžwOº§ýô ï¼îwðàõ^qŒa,”—0‡ ¥wpvþÃÅÑó}ïÅÙ1EøÚ…Ñ¡X›;ƒ©ï´¼Ãý“ýç]ªuíà ± Ñ{õ¢‹/±Ï}øßAÿèì'spvÚ¿€ÇÌõ¢¯*¿:êu[ÞþÅQ—åÙÅÙ NêœQ3Pó´Ëíà¢Û{Eðùe¯«šô»ûÇÐlÔ©³•šHš Ã£ Nàb;üê 2ïÓ/{ƒïºMRÁÿׯ_}AŠtN½Ýz}»Y2C­­÷n´ÇcF7VÌäÇé¿;{¿Wg“—ÉÔ¥VLÔutúù£Њ§@<)¹j<ƒó4Nn2ŽK2OýéÌ÷æþèª1_ økÓ(b´«Ëˆ‚˜Øe“ySWGgr˜Q# ‡-¯û  <Õ›ª fÿ›a¾ÍúôÎF2™4uêp˜1%±ÅvÌu óÇYÀO:\Lñ«/têLÝŒ®À¿Ð‡ÚåÖdqvÑ2Ý×Tq6®yဌ?òÞíL$åh'vL~5¢¶‘¿®ú }uÉ kD f}¾Å!â\³ ÈQøŸcmlØö0Æ.°-í|øêìâÐßœÍ}Q'КxÖÔ¿.òé®÷¯Þ'gçýÁËÓÃÓý“n±Ì¯Ð9>ÛÇÌ£€gd)è §;PuT>]þAGªI’°ÀÈ{üÀ;Ôótÿà[O ú(Ý'3ˆ†XçK±­µæö„0Œ Å{£Mƒ‚”õ©:3ë™ã6ZVƒ‡µæXXº0ìâ`à-…s~ žî÷Ž€¡Ï.Nö ­±Õ‡ þ_:µÍF×îè±# –Æ|䈕ÐvľañïÂ-×ÿ{¤·Ý·FË$‹y@ndêô5Uw-ïS=öŠvú\S…; þ &ŒÐÿãàdÿûÁù~ÿÅO:8=bÜÃ0-ÿ¼-¯È'D„âQK&ïï7/ŽNÛ:=è6õ¨:ûJþŽ‹³øɱ·ä,å‹fS<êù×L¹ ‡N,â’,%“Ø[ÏOÑéwÃxðx¡M T¿}êIU<&û’eèã¿·ÿú·¯ÿºÕñîúŸhJ#ŸC9†ý†˜¯8 #ñcGÖp—‘‘•Øµâ¹É‚žâŠ×¬|ÀØÛ@ÆËé¡)?P©° ä»üÝÁWrÀü¶¡:«¿~Ý¡h"ùs‘AÖ¨‘UK¥'’Cù†‡";ì•­lIÉ°‡Ý§/Ÿ¯\R=£Í„[Ûnœ=^`‚ã¿+Pó‹÷ôo ”64þpŽm5°+ùDé´ @0ðüôS…YÑlE`Æ7ÒŽŸñfFU±TÊ jã€mŒißò.Þ´0$ÕÇá²èkbd°g)À~¦´Wá¼%.· }ÁX¥âãÌË¥yÎEÁ¨ÉÍŽQ†3¾XT‚LƒÅ–î~ßGÆ)îaâ'fOÁ¿Ï(Ù®,9xfR,Ð(·& 7D€ÍE3MçÒØ’{'Æ­-”¢d_­3–ãQy%ÎË©ª1èapd6G¡ 0 Ó,¹V³êa™ƒá\Ÿ)Ó·¶åYšÌÔœÔ1*Ì®Eû†YPÖÂò¼±-c?«ÃA2°ww¾Åî=ðôÀ ¸[]=Ào©Øp/oq³ù1_ƒñð%\šß>»ú‘#R+e¿x[Þû&™ÅÛž¡óƒÎ òAWÄÃWø À™ïTm¿Ñea>»ÀJë9À0ÏpéÀ=Þ}þׯÊû>›LÐq*ŠlÓ ç%¥i å`Ý‘V”Í›mgemó¯uÛæ_%mçtÛÙ«vrñ=š­Ⱥ]|5ï°pÏ´dûÇç/ö?¨ª¹ºÿÆ"Æø£Á˜‚*6W çüüàƒs~öª{q~p‡å8òËú?Úÿꋃb¨x‡Þ{ùÑÑyÕv|àD݉ -ÓPýËø*Nnbïàü¥ÆÕ=M£hakÇ@7Þ‘v¼R.‡óÊ®ƤZ^Š×#/Çú¼v‘+lÙD—4ØñOl~|=_iN˜Ë ‚ÖEð©Ý.å)³^Ï>û ¡¾ŒíªÚ•R6ÜDçÖmÅ3C/«R²«%ƒÍTÑ–™PŒ¯ š&>yt9ÚÛšŒÃÉwÜV–,Ò•áá¾8>œœ¾„[‘Û 4xx¡0åì5ôë&_1bLf˜2⹤ETJrrÙù©Ñ•Þ:; o°ž ØŽtt™íPy^µÍׯ7 ÐÑ5 àPï¤ÖÒ«»²n ÀG»¢ªçiŒyÛ¬ÍTMòÆ6$.£ímÿ$wP6(¥:y±9& —€Z›R^¬,@4dm..)8ïS´ÛJú!÷Û¦b+_µàŽÌåy¶\Êïv6L¢µÎR¦ŠZ“^MÅqá(T…³þ”ÔéîÔËíÃf ïñ$ è¬Àkd1YŠü °ˆQÓ"!JÝÞ'OKCïRRHrxÆ¡<]L&Aú£àJSÅ6ð4@äOô¢Ç´ÒÁ’g“ûãaã¶ècÓ,xâ¿Å.9áSP¥ î4ábŠ­\¥xŸÊõZº—Ÿr•˜Å>óå˜&ÆÓÕ§^,ù"ã»··}¡Rcà´^ƇÁ(Iý<аÚдdM%-Ï%¨RˆŽ§gƒ“ÞàÛîÈ"ô¼_ÍûwÐ;ï=;ê^ô¬Ð¦öL¸#9X±8f) ›FÊ«V=Êõ›7ÖÄ:ººsBä®–µ`cXc­C¾ŽÕÍ.ųâv‡¼óÜkt¿?螣ðxÐý¾{ð²ß0wy!‡Õ òc?Ë»H–!$w©"cL ÞhÞ ³U¢òÄj•8í÷ÅþåèZµàN¦eoÅ‚¡\#‰¯¼&aÉÝ·î‚EÐGj­u1ÈÎÌkA·ôÃnŽ_Œô±•”êhÄE‡/-g)õŠ÷Ž˜Íµý¸˜Ùû”†´œæsN–µ:ÇêÛ@)âYŠvJNêCJáw¤è¼vxö5 It‘9"½ÿØb_Q\a4>Ùäæ”ú! ²MSÉ ÃDË€E'½ï¼£ÃnçŽJ†jRÔ8¿!jÆJÜõñNÇð÷ÅeeøFÕ·§Ö2Ç»†ÄóXï0ÈFiH÷Ê2ÄgP3t Í×áVÂ'ÐgnxÃsÙûc@™Ôø“ˆb´£…ž¸0ƒØÂDO¬þ¸ý诜SÁ墽]-—=ì®ÜsJ-F>b†¨Ah/mÎå‰óNôûwoË{L“m«u0ð½è@Žÿ&E0Ë–W§J½zË\“m-=ÅjyºòðêÕ‘ç7—|Œ™ w¬îHë~Ž“¬«½‹bœTåcîˆ'+R~ØXºZxYÜu¹¨Îï¶^+Øws½>æò…ÚŒp–cB¾u2"*¨aFp!¯F„%¸S&Å×A”ÌeB¯9†n§hØYৣËÚÆ°üûQ¿Ò~>]ÄWÞ“!ü»7É:ùbÖßÈçÉ›Àßy2ß‹ÂE'ÃÏWaê{}š™“㟽4_ú¹è$ÂÈZ§ÉµMûøЉña¦$L' © €A ›RŽWø»—¥#è}¤‰=ØbýØeðöºŒX.¸Ê‚[,ç_%×\íMg€dc‰0§‰÷NBˆÃ’o:C|ã”~ë]$qxçÐ… oÓùÞ[¡0Ö¡ ˜ÂÓ  _%°–è\ðvoq•vâ 7 =÷¯€iŒñTüvûå’/‚ôwIÏX¸w{³[µ=ü!Åá¥I†[õdîOö€~ˆë¤ £HïÒ£†÷DþÚÿnú4‹ÞY^ûÐg‚í 3À¯0þŽw&ÉîÆt´·È³Ž?û—jø¸e/²Ž~îñ¤9b%¨£ã€g û‡½á›½H½ á[8‹ÿðŒÿþij—Á‰ä©‹oýdÑ·NN¿ö²ÑåM¾ë$éT”Ò^ˆ°:â—µÜXèwŒÃ(T1aC´ Ål8†ån`‹§A…†øw/‡AzDÁ­]0*ƒ?{‹Q6¶>>Oý[1í› ÜÛ=?^`‰Ž¯ ½€ÇRsçX‰¯p½$±jäMç’^fv㌾ ã;œ®èמÿ°D2±[<ãì ÎÄœþú{óËÛ,„é-ìèåa>º¤EÏÄϲñõr S-†·—á“ú~ë½4œ_Ô4Ù›'Ãä­ü×ÐÌ{ p6n÷fÄ@ñ»½£W{a ¸¨3I±|~™ê{ž"þ|2Å?ÎhòU€XOàÄ,¦ym? ½‹<_ÄX ž:òiïr‘w&ˆ˜R¸CŒÑ½ˆÞ!¢ ç½pÔº¸‚Ù%nÏSž%=t†ð°_G?Ývfa„Å2?õ^(¹PÒeáÍ­,"ѧÐ2¢-Lwþ“á8˜ÐO8ÆCĸÉPj@/ôáß'CzÚ˯Ä‚ìç)Ìd¿?cÔñd“™‡Ó(€…H;‹lšu¦É5úÏÍ#8XŠ– žø‹Tt7L'íÑuÖyÎpè´Pê ö'>!Š’/:übÏŸ Ó€QÃÓ …%êŽ#èš[…g€>~Þ»Lr‚nÄX4D÷Ð(™á9À¢~:®†uùP „Ãßð= ŒF·x‰‹R°ßpŠ¨Ì0Ùƒ£0y×QHç) 'ÜóCŒazë áÝ^”‹ÛJ–KñŸv†/p¯hÝÈä–!£ãÓÞXßNhQÅ%B[&› 骎 ÇÂð´GÿÞC±h|ƒ ò~2ò/À»)l[:6Ûyº`¬1Ò=˜Ð¬µ2b˜MÂ<€,ÎrŒ€9ÚE~zÕ‰ta>Œ¸è3¼¡ã(æ'oas±ï«N5rÙãàË óìñ–Xnv¸mÑdáaÉw ™ôõ„NLð/p,üÂD~xÁ'€C)20Á6—MÝbSEÔh"X­+ ÍÆWØJ„÷Fp0s P`™Ûæ7 ¢1A.W’!½r¾˜úpÇ@†{OFóÙÞdˆw@eÄÝñ:¶j<áÛá^æq@½=e¡wô[ýñámÚ›˜ô˜þ4ÂC•%OÒqq€­½Ñ-¬6g X¹544Âßã=d]Òë$Le3X¦;Åis¡½Ëpz-Æ7pÁ\v9¥×„f®rä#?š@•ÿroy¶¨TŽÛÿŸ $ßuÞˆwæêÇÀ€ÞãáÀýÔ‰fþ¥/1F~ƒïþ€gò HÙà³iû¹¬’L&Àñø“ Ô’£Hæ—A'¥wQ¸;{ÝÎ0eW@×ÌÂHoN Û“ÑÆÀ…w`ÏbhM h&„îÿ2 €úÓD?­Y¥~8¸;ô{¾Jƒé×€j`×’,/¿C?ôz>ðÊO2øwì‡{ãdÚ ã|´ˆ€Ð¹L®8£7s,ãËø¸íük¯pô°Ü3¼ŒC\È1‘eq@sMW“@6Xª·ˆöƒýÉį½`îóå!F}Ñ! †6›šù0òE( (+8ƇA: 8x´µµ½wë_& ‚Oü §tõྠ†¸$c ïãÔOdcÀ"á) òœn>ü±çgSÂl8î( k–> µLàŒù‡ÍQP‘owÀ±_ÁÏÎèvzƒda’Lq×änQÙcŒyðdÜ2.åHð-{û·Ä–Œ;>þʦŸËÏOÓä&Ž$†Ùž8€N¢øºžöSI8î ÅóÞå\õÅàl#e0Nð,÷Èü ËtâxŒ÷ük¸Úߚߟ§4)þÆï„Ùùý8Hb:íÿ¨º¸4"bÖ`if{ôo„”¤Yø¸!ƹHÅ‹ósÈ^€ŽßÌ÷®“(¾íŒÞÉâçáè Ž?|Ìæ{é(Ž$ŸâäŽB™Za<HÍöÆ_[†ÛãÎÐàpÆeY¶ Ñÿd¼G‹Š¡9Ýï;áí؆ûŽÀQ,ŒoðI”tùbw`[Õ«½<ÌÉ…' ã#ÍiYàaÏÍÄ6Ã¥ Œ¢w¸(ÌßÉuëÌ#ÄbSŒ‚(ô»ÛwÉu˜ãÝx ?ŽÊU-—»¥Ð*á{‚K±†)¸xáüœøÓ§OO>á:YL½oýÅ„î”ñÿÚKýK@0¼“Xâ$ARh ?¬‚-ýÀs¼ì Wü|èiÉ+¡ xŽì»®ÖjêÃçmBÉÔyã_z}ÿŽ/•ÇœžÄhy¤Ýè:ˆ#ŒSÐÒéç€þîe@6úí\µ7ƒ `’¯pÇóI­‹k$I¬`¸wÌT8œ%}|‘DÀìðX§èÊDÒÏü!_+·´Z{°¼È€GÊšœ¼¹D;[t€>D–íYêÇWÉ$ºÙ€¼ôÇîž¡ÍÎó0ºôŒšÒ_¨u²Ô,Ë ·IaÀhú0*9A×O&òåX¾+ìés+y:sgS|îŒÅ3wâ/ˆJyîˆxê"þÁ¬ìb4ah{À½æ &p,ꨙ”NèšÅ²¢ïÑìf4LK?Ïé0µpA†Ù0Ld±;G2‚ÚóÈ_ŒØ øÙ)=ÈÒó^Ièˆ=OßÓ$}4ü@Rˆ4<ýÐGíù"ËáÂö.X§é"x×¾@Ùžƒ§ÙÏéxðì^t€D;†;úò ^¨I”™Ûÿ®,$¥‚K )a:—ô ç‘ž¹;,“ àÎ>H€,^3QŸ3K⥠ô@IhI%ï4Œ˜ºœïMG£Î4^ˆ2HK1â_lBâÅ^2Ê“ìÒŸ‹Ó¯Óð ²aDÄ.~áUÛ$J…pb’iŠ+– ]q™ÁϽ\ÛCà“!¢x¢'°lvr¸Aaé Öï*€eNG—p# ÞN¬r?$WI…néïàŽÈ⽜g‹«ÅЗtÊ‹Å×@  °?wÄó=!Jëe†= T¼ñ„¸ØezÓöòŽ®}Â4G(ž €cqsñkož&“Ž–`©^€²÷6ÀzvÎP`yß^ú×W('x®è÷žEbøƒˆxäCÙk–Z³ˆ‘h£| ÔG'ή€‰N|À4,K ¯¬´œí¾?G°`ý < qÉ ÿæMg œÌ`2<˜  ’¡wêc¨öøwÌò¥IÃQY ½h;tEf1´¸› "Ù;@–>¿í½aöÎøHè•RI@T“ ¡`¤;™x²G{¯1”î0ÑtôÅëE'Ž¨Ú?¢ÉÄ! ˜Y pô?€Ân?õç9=ÂIZ<ã—0b ”ó4€? JõÞÈçÓ[ ø­5¬%H×gÜC°Íú‹ƒYÌ„lî0¼>R8oo2ü»$2§O“ Màƽeáæe¶ØË€8wmYæ—µÄcx ;s‹lÜ;ä'‘WÁaãKÄã‚'ýG¬ asB›Ã ѳ ÿÈËæ¨÷^u.~þƒ]P<{“¦‚>É”l*Ç¥.’ ö)Oc½™¥{‹)ž#?VöRŒ=lÿ9¸\ÄSxÚ7„™Foþºýõ—ÖŠ†3œ ÷zò&œÒ槽›a0Ë’ˆFéècBQPP)?1­ñÄO¼ýa0ò3$~ÞÀ#à/~ì ™,;Øë¡0>fÒËÁ”…ä€~ÃnĈî·$Œ±‘§˜ˆÛÉ¿,êXë'ù;(“ÃCÀŸ‘µº!iH÷€À@´ÅÈ€ °f,cváˆbôKd y_±`x)<Óøg…N$’C´¤éíMà“ºç A¼‡…oË¥Z°í@¢aèX‹®ä’ÙgìSÆÔ§ð.%îùxµG¢‚.BÝ >- 3£(0Âùíçc· â ýxžÞ" ÷fŽ÷b`3" ' bøøÑBîäyB ÞÀûΔާôº@Ò| |pHhØ«ÿ~½URæpsoø¦º¢{iÚ Ã7_àeJ—”YxpcùxI\ÁÃjð˜ÁIoU;‹K¸Ô¼£ØOU éoçJ¼Ô °â þ6@æ¶ÿ¾£ 2¿Ì,Üúm¿ÁÆúþIÜ_ìù™ï5ê„E;O®ny7Ba8—®>Ò¤ýÝùã<Ê:—Q¢™×oƒkÀxXáû…?{3¼m5óÍ%úÁ ôÜ\)o.ð hÍ›€‡›=¶9'¨þöM‡ÈE.X^ W[g¦žaƒs¶õ¨'P°. `±òPœ‘‹Ÿ{(žÄÃøm¼È½>pž95Oùõ^8EªšHɬF•;¢!?OöÆ“N JÉ¿•¢.ó¸®ûHÕÂyýï~¯ôF€g 7$·zÀœc GŒ-c Òšêòžùˆö®‘LÌæ€s¹ïcqÇÐV‚x@¤j4˜íÁiC¹ ã°c`á‚9P¡HTãã5?™ˆóN+é3/8ñí“”þîE0ßEÚ‰Ps š,¼”ñ?—pVoFøÔyGOšš<^šÔ¾ÁiFødÚc¸¯Ý9@ÍÞ¼ØS”æ‰S€¼N8ôa§žMH¿öFÀâ éX+ØÝý\ŸiŒTÀ;X àF@žAú ã†7ïà9aQµXÌQ Å?P@ +dÐhpŒ¼ ¸Š` )þ±#üŠœÂtb)± ðÐçp Ï€ b¨Ð-!©eøi@}‡ÞÁ=¿„í~‰¹K³ã#PKßù­<¼Ýñ[eøè*Ƚg‘ý³ þÝ c NøüѽÿeÖ¸!³!ÿÚ»F…¼P!–c#6„~®JP•º ó”òh®Pq$…u‚ÂF·üóU’ý†þî-†á?UÁŽ< ÀwxF/éï^Av&ŠÊ‚ËnFêÞäòÅð “DB'`ˆÜÛ_àÙE5$ÿ°xw,q ˆCjä´\ðwoåmdIgÜZ(Ý`¯ü¢CºC$åò‹‚‡i2º$ùÿIGþÞ›¼k¿HƒÅ…iø.L`+ïÇ5ü¦sÍoöF(ÐKÑ4Íw‘€ ‚6²Ì÷Î6OÔ=¨¿¸\ÙdA(ò:ññ<¤q‘=§ ×­2’Ež%oqâÉ[Àæ×Àˆ…_…ˆtF²Ñ½lÆ1’ÈB`”R Ç~fólÏ–ûŸ0âEéiüŽ®ø ¼Ë.flæ‹LñÉ|4òßÁm4£€µáUà=Ko3!E¿öç!ªS Ž–ŠÃ ª;ž¤ÿÞ‹¤¸!,ò¼H†pG¢ ðIz‰üPÌ#œ‰&$l}šúïB¶~ ÀæùpœaúCqòXXžòŸÍIV~Å?¬LðLõ|B¢)>ì·€áHȾÂõŸú 'ølO/™‘Ö ¡í =tèaOQ_WSAŠG&Âr‰Ç—J mçøcnë ¶ Òzg@ã‡H#·3N«t˜·(Ÿ]¤d—Îè‡ehXã(bm ÑOa¦>jâùr‘!jÃáJÂâ3¤­˜{B›•Œ^trñB3Z½Q‚ô2pOd§ ôýÚCÔ m7Ä”eYÃ5€²V5gÚŽ~íMÓ(r ½² ì( À‡lý”nEàë3úUàg·b $à@Ñ~ˆEPªDƒÏKÓ ÑŽê9òeHöføä<=š%Γ,~ƒø‚Jtæü|I"‹a›˜=+‰ò,¸öž|úÈédð¾£^ï]¶ÇíélÈä:Ê”aY.ˆâÉè!µ…¸\"ñ¤V‡ %{D?úwr‹iˆâ›>j'b ÐŒ^KŸ0eMdOoñ)#*wëiMoö.Y³1óÛÊÈ¢w&q°ö)ê½'øÜQÏ{ Ìz/} ºTá»àÎB€Â^R8ì]%dÞC›Ñ÷¯Óg@+MC¤¯’90‹h ”㧽·¨ÝýëW²tž-`œOÃw²fCú»wÂN‹RHSþ'9¿HùÙ\K×`–À弘ÍÌe†¤ÓM’^Å ¿ g/Ã(lhö”_NöÞaè‚$ƹMvq±YŽ¤@wùÕÞ4œâˆèößCRœ/Ð4)§wƒˆÞ æðNÙõ‰ÁQ?Äù©CO(Øh_!U™½ã a‰:7]B£‘YŠ9ž)MãœZ§¾¢¢®U²íå§=)9V?œÁâÇSRâæo†{ï® ¹|:îÖ;í×q“Q¡˜ TwíÜ.ñè…|`|@ä2C~)§¿{£[äjD‹É ¡h^…ÈŽå$Hä·Üx t,¢Â>póјΠ%‘ljx¡Xi‚úÄëÆ€àžÀ­”ìÁõ‘‡¤ 0߇c³€î°”?|‘Ë ]î½™K… Žv1óN§‹[¼Ö¿ÛCÆzŒjjñ™l…“›1ÎulsO/Gxg¾÷ƒŸ¡u¶÷[MéÏˈõái0'¡ø˜XWŒ(ó*ðC3~îˆgØm-}y‰wp‹-†ôÃ<ppã-¹ðÜŽ’tä-à™‘P’kËÑu’†þ0…`qß…¹¡.'Ä/×3þeuùc`R¯„dpM*ÛäÆß{Xb&tŠ¯|’%=å”+Onèqÿ é%·&ʽÄsuƒ9ßÜ,ð÷Þ弡¿¬4,z‹ðUÁÉÍ^x}ÛYŒÐÌEH±^…ñFHGñ)™i‚ç'®ÿ}(èõ·aç’Ƭ¾ýäj£à¿ÓÞªüiäKâí0†L é¯u"ñ; Ç§)òü°7„¡úq÷P+$^Ÿ½É6ÌeU šQÎÀþ 0ÚÀv yÍQþ€šÚ‹dñÖ{r ?;p§¾ÝC±m*ÿƒ|K)ºw>*¿ý³úÿ̆¤* bx@¢n`XÎwø»?Ù»õ#2ÿwâ ¢tþ¼3[û¿ïÿ9çÒáøö1€-õÿ|´ýÕ×ÛŸ»ù¿¾øòË?ý?ÿ¨ü_œ`ÛûÛèÅÆîq€?1Ðy¢áÈå±åq0ð¶Ðƒ›s„Diê=ÊîÒÀ_±×rkíÁ´áŸ/ÉÍ0¸‰‚=~Ã] Ü(\b ˆo98rÖâFÀœ4ší¡>§¤ˆ°nž@¡g­ªìÝ\"¹cN!Œ½(Ž¾RÈÌc\)oœ,†bþ =¢19ÑÀ¼°ê0¸EÓÊ\­Öh Ì/.>4+—ÅD1u<†S€ÃNÓKô˜“è  š@ùÝÂ8H»InÁ@ ‘ƒ/"WW±T™wzÞ?æ C‡W¬L>¯Èa†oåÌmçcD¯Úò<¥ A B°:à¸Lt‘…¾ÕÍö=a°G§qµ¯:\÷óƒÁyÿÅEwÿ°GYQ>1>p–/ùêy*mW–aõ)i—~)Fà¼Eí—û²WÀ¾Å‰ó8 èH¼œXc»èwOzzèPÀ3º¼Í¢…,×äà÷íÏ%# ×·ó +yùBœ×“QœGnÑp `ωÏ<#yÚ Œ)båP³WÿpÿÖy`L¤pê&dÁ .†$¥fDÀs£kýõ3H¡‹2páýú«ùõÙE·û´wX6F^œÛl$–Bõ»V·§Ý¾Ù®ÓíÙy÷tY·¨R™•íUùpìÎh8ðAä†D¡©uʳgÄ´ÒõÁ•4èÃ܎ϾÅ0÷Ï1•Öi÷BÂÁ Pü[ŒÉtÀ¹Œa³ÈÛõÄNàü*õáÂ<úŸ®‘ÎHÌ —âÆWí™}X¹ð5Ž|p™DcŠ|tz&æ¸S–fûeF·—ÀÌ(]Hõlqžz€<ùýçýªr/ÆÓüˆÈ?îWxŸæ¡ø†¿1ì…ÒX`P@ç‡Ï¾üžã6ÊüyjªX„êì80fKî*r…”àoæý¥Ð€ …&Û…,1ÀBˆA*3΃{…K#ø7§c¦ÒlÃòÊ=ì=?Ùï}K¸Ç®£žùÙ•‰|Ê8Àô_Ç%õG #²ª‹Ú²j÷û£þ`¿ß¿8z TÒDð6Ììo’0.¼Ä€"£KFµæ1ì=Û˜W„Êô Ç‚Çádÿôùq÷Âh÷MïuMf…ÿ¤´üyÃ5š ")^½’xÀkrÁ¾QèP¤¸úéâ«/¼—§Gßs:Kœ´Øg{üÁ °ƒ…¢¸FA±$…b¼*FAµLÞÊM-öÕžÜhOí”·ÖfšÆý6Û¯›- Ü…ãÃÁ«‹ýssÞøùcôŒð|xŒDƒ†iƒ&G@°ñÝäU@ûÄþf9t`Á9¡­W,‹v XfBþœbÁLðÆ2RÃc„”&"ÓKÇQLMÅ̾Ýø·¢úÈGßfTS´0®Ñ8o&èŸÎ ¾©†ç6¥X$LÚÛ¬S4Ìáv–N¦¦ž}Ò}ìgÄC!ª ;š) äpr/‰¦®*ïo§]Ô6&º+.ø¸Ø@â]P¹wKF_âv$Ü­>ÞË–Ir\§òc~‡Ä´ŠÒÀ :_€;=Õë´#'¨3G.›¢Lk³]¤Y6 ®T…€wVvÊ(×êvIo²t5î^º§ú\ ù„DËGU k¢|5>¶·BŽqD¬ÇI»aÑñ`=„\=zn¤ ÙG®ðy9j†–%â¹¢€ÞÄ«Äã² ÊóQÉC,ka0oo£YÁŽ˜wV)keÐa.ì\i‚X>T¹ËÕu’Q„¾(ô3 dXt ‹”¼nÐÄWáxhŠÂ¢i]0σ1\$ECŽõ&wŒ¼‰k”¯Äü—B75Å$H{§Á$Hñ£Šˆ#UaLᦦð|$r_:¢)d{Ïèü¯ygx«£¯{aø+[R—…7‰ ÷…ç§Ó¦JG!¢³:¼ç· r‹ ‹Xá÷Wßå«!p1^ ÞerS¼ðë:W„®‘DcÎ{êäŸp»¤î¨y«Èðê÷=KâTœ qæUóA¼nì­¾$RLcP±²T Š¦*A@eûŒÇÍ*[Eó{d`ý €%ívY¹¼¢x¾Æ‚r×,N[ Ý‹VâÅvp·ræµÙC·Š‰%îîO‰™°J…&@!#"‘…Ä°‚¾§L°ý£ü6L’ÿ.A!T˜c8ÂwÆ ¶ÜëRuQ\΋1Mµh¾*xöãhpIé]Œ]%½4Ånî ÉEpúi÷û¾X4Õ I}ÛÑW_±Ô}ÁãF= ‡R°ž%­z‹ëïÿÏM3Ɇ‹Æ\æª 37ÔʆífqcPG\²W‡>5eÿ~yûOÏ.úú¡7s{òtGu‹qÄv* i9½À7¬Äjãö§¡ÆÔòêvõæ²}Ây-Ó®·¥G &ëÈžâ$ç47ug¨u¯1O“¡1UÛÑt„âÏlŒX=çOÐœ¥‰Öšõõ¸w›¥¨&ÛåÔüÅoXOÑÈ:›J”»3Áü†` uq*©w§WŬq=V÷Ì­Ô—Ér,Æ ’†wÁ\2 kñwK@Ú© œ¦‚jwÆ*ø„ß´ŽØF~Ê1yÿâeWÝÊ‚2GÊ€†Ûûá¤×hÒùí~Þ=è—aê5‚Y¶ÞK uÅÄo‰¦’d¬1CÕ¶¦Y©¢ÒNÑd!¾Æôj¸  ŠZê¡Q½7 fIŠÆ ~l4Çá&ð2ôÏck’™h=º]7“šäÊê$õ„Ë4‡õ›Ñ‡; á:´©÷T¦=©x$•›tEìTÿéqwÐû+ýŠ(=ÇT²!Ìw²ãmyŸìB“~š{ío¼8x››ôåðkЧIäO3ïSïÝÞ‹îaÓÄ`å3‹²ôÜø´1o“G“¬Ù´g¾×¼‚ɾkõmS•ð~„‰¹h§mzsu™x¦žùàe¯v"“™4MQºn+Ó¸³üò\·N•Iõ(C!CEžd›&IÐÖ¦í#{rð ò@œ˜ùùö„Gº=Ñ– gFí1FŸÈ(gî"fKFCª©Âš(àñÌíÓ TFw¥ßNw)1`{ÓK@ɤ®™•Rý¬{"`€§±e¥d¬*J4gÞÇ._§›‘¬úVij&>ß¿€wÝãÁÉþÅ·k)˜ñU÷¢gª×ÞöWZ…)nÔ9 o¦ÒA6ÿÑ,.R„ý²õ~Gv~´ÿÕ5%©´*—Õ®°‡p fË)eƒÑõξë^üÐÔ½ÏE#-=z%a°j05Ç„cxK¤ÒN]ûLŸ„ƲÉaž¬]£K"i<'ߦ hW˜™\þŸ ¡†‡‡yƒ®‡³[.'2©ÜÑ3A¼“€Mä¸uÁNSæ¬k`Ý&´sáßíí¦NP‰ãC[=ÿŠQiˆqY.ýùü–÷ ‚Ð’èÇì£YM—a«üB¬%aU¤Å¸~¬e°ƒ·üíJºŒŒpŒ\1×aF±£aУ( â¼SBèÃ&§ÿ#O˜Xš¼… ÂÖ‰óÌcæÔË€†êzŠD:Î~tÅ h³—pè¼Ò3fŽÄø0È‚hb¢&Ô³è¹IC&û¨24¢]äòÆ b¸K®A$õ;ê,ú£.Â4à&bo¨<«[Mí6*g£Áp¢E×@¤+È t'·hT& puÒOGŸ9 ˼v;xýiP—Çô¡>"ÿh&a½0ÅžÜ`‘Ë š‹³Nb}´vÆP Q0ÇÀ™9‘–2UR8C<ç# ™PºL;ƒŠlÔD£&I_6›´šbN“ûèbÏØHV0#+=²r…îÈ ˆm…[ÐÍff4…$ó' ÛH÷„9·éËŽEg’Ì)ÔhĘM!?0J.¨ïk? ñÈ!cÔ“5Ñ ™§Gkˆé-Aß[ôÓé }±Âä15Kº6Un%86PØs?ýÕÄnߘŸ>ó™ e\ÎnãÑešÄ˜ ‡)ð(ÙÀIË :ÓŽ‡êÌ˦Lƒ¢C¶vèxòŸÑ”…šuZØ,‡Ý§/ŸËÓ_S”N”L"Çl½—SxŸ)3xÎ0x4èYdßýK´x×Ë5' Ëî²iœ¥ñ…q\VI‘%ZÜRZ=`_T ðÓŽ¢ àº¼Ø?=„›ãÙÙÅ·š¢À‹Ê¿öCºŒ;™¯4GfQZкÊÙSàûŠèo€áRA¶(G׆,™ mž&S´(G±$šJC… ÔQåDYÉÖF‘¤£ÁáÙiðâ온ÐoM#ƒp鼟 ‰¬ø%·dScCu)¹¨=CgllŒ8Êp–·-B¾ÐüVm›A®Ëvm-BéìJ.I‹œ÷Ž,Š¨qGBm`ætÌ=Â˪ñ)þl6] ·*H(šqÝXÜbK°S,&%²†ÛlyŽFö°Ûß?°Y¦²Ní¶Œî]–ùÅùËï]5zÁ@@íía0¡@DzpPDÇÙ‚|Wò$ñ2”•<ö&á[O]â¢ò™’îÈ{QаâpU¡œ,]1° |tŽe穸Z´Ì#N€,rð-˜ÿéz¿>xñôø[üý@d¹%GNV£z‘óŽÒ€sçZBkÕýÓÊ`9¹ŸÊŠÍwY¶qfÔÈ.eƒpwÙ“²9îÂ貒ѹ à èZ6È÷5“'Wü‚BZ…úÊSæs€8ŸA"èÔ®°µžbl‚1NPÈ8N“¹Z D‚¿h)cVÑi¥³üþåÔÜÓ æX 'À?î‚ŠÅԥܓY4ÖYNÃKŸ—ª€!¦7Ëžî7Mš£‰ ¥!"cž/›ä°<¸Z@ß rfsÌ$Æ‹Ö³j²-ÜY€_Å`óZ•B«`A€AEeXëèÚi äè¨6Œu4-¥jÅ£ 3¢Oñʃ#JýÊ—eŽÕ–y’^í_œ6\ž§ûl¡¼ãÄ}Ört™uܵ€ºøKœ_Ïû^é'þÚ´v.M¢È*"¬ã80 Ó­¸…vÁNùiü¤ò Ó“¢ô¢Œp¤„êf«¶iw(7 ¬CX|BGµ•öIFÍ–' ‹kÚ,îÚ‰y~=2"rã–nŠ=w‡ð2$t‚I7QbR]KІqr†ðöª(/îz¸sW¬(ýBæip&‹ÌDŒU•ˆ^· ªÃÀIµ×<©èü7¯î{—¢[æaýnü0G±ZH"Ïô÷ƒ³S$tŸã`NûÏ›øï/c‹Ñ[G‡ÓÚ–¦“?Ü’ÑÒÉ)"R+W` CÀ†°Þ²;²y-áT¶H‹L‹d”Áâ2Lª¿Hð£ŽûeïJ¡‘ÖRg)Š­›š‰,oeàêXÞ+&ÍeFmý+Qír(Õš2•¨^cËåó½«öCoK~YЀ¨R7—¸…ü²\û‘_¶¿Y©üð kšŠÍ^Q·Ø*W\bË’þªÊ¦ô×Zeé÷w”+õô0PBé ³ bk¤g/ØL–“ C(ÚWÍ€‡kÃÞ냋`ÎåÅbí°éðåj&ÆZ u/:ŸËdˈc%·ˆÈ5Ðú0ÔÐùÁ939nÄð(÷êÜUЦqúìÅÁ”ƒk¹ƒÍ´_^£éË“îÅÑXÛÁÑa y)@”£Ñ…ã ¬¿uŒÌ%y¦–Êp RœºòО;ýËœPš¼9Ãqs©p \.ð‰0) S›‹4ÎÆÿ© J¥X2UC©Áv%%Í5JaíA‰u aØ~÷ât‘4"«†`øÊšh•wvå¦KvlH?[M[õB%Úßx¨å€ÌÍBMdÿÛ#ÀŠg§ƒýÓ˳£Ãš5%¨ÇqT}Š‘äÇ‚¬L—F4`#¢ËëŸ £wPHšògÇþ(LG¦LߨeÓ÷˜®Ñ(“é (Ò#ḟKˆ¬‰~/z⡠Ʀ„F,4å«—¤¨i×(„„ÓÕH$ÌLÄÁx£Ñ—a?Є–rU±#õ白òé4ËðãN4H8sÌcB9óÉBEáÇå(G^àÜÀÇG8 wF`SVI¾Qï&=¦-²ð°IŠäšp\-7V¸©U¼ÿ›6¾Z ÏÙå"'7± ¦+`éÝ;¢Dqç"-ÿûåþ1Û9à`kL|(t®±‹e4a""Ò©ø®M~Ž·[ÝÅšÔŠFÕ½!çf!jìÖq”²%Z÷ tôã@ V¢á,« [Þ¼ý J8ò¡G,õ“3Q7ÕhÌÆeLp4ÑXàÒÇP5@° •+ÞEh0Ä ÙÝ!…sä%ǘª–0 (lM3º Êhˆ‡ÈÑÞ'× Ù™Õ„0HË‘5Ö¡‚2¦ãâ„•¨€›ê¿³oÕ¸ÑHf‡®¿øÒz„£é¬@&ð êU¢Å eÉ»óŸ€jÖ>s°ùüùºÿ‡ë.ž@âdù;âp>È̹ø<Œ’îý9j9“ïMCŒœ«·c!n"â‚®ïÍŒ½É2,gVp¨¥Ðö©a|Ã<+4±˜1…Ыr©1|PŠ|Šáõ€•¾ ì&#HÔHÜZŒPu®QÆŠQ˜2 ÍEIrµ˜ÿÛH”ÂÁ'2rÙµ[rôE9WÄä°iØ© z¤é5(¤@FaÊüØ„”o-`[’!Çôkv¬%“8CþåªÅØI˜ãØÈèÙΞnùóÑ'Ä7 Ú߸-2ΓASÅŒÄ÷ùf2 W#L›‰³R axÂÑ"ÍDœû8‘ÓR8aÛþëä*ÐS‚£,m¢„a¤SYhCS£ÞRTÜÚx1CÅ»´fW´ÂpÁ‘¬ 8$@z°õ LÅø|R0 3w²îbuœÃ.7^˜ %ié$É2¥& ¸‰ñÊÞƒõ{”åèÇÕ 6˜qÀû¹[ ÒPÊ*kØ2‰`y!´IAY|]¾Õ¥—T÷SÌ@ŒÅÇNm0ã61P]„X>aœ%†‹\·ÛN¥IÏgŸÙóÏ®B òÄkl¿ôž<±—«©L™Þ§ ¸´¾&¾¯>| kß›öZ{ŸyÛ´m¢»OËwé}Á`Ö°…7cH•K^ Ò63NI±‰5šÚ¶Î0o•Ø<®atÒöžµ¼ÕW^´Ãƒc"ÌP‰Üï Í”š\Õ5áÚó^žšÅ‚±n­ô¿‘†£ ZD2·ˆX&]úI±0ì…ü¨W%&²†­64Xa mû0÷c½6¸˜òF³»Ir nsîQ~ÔEÆF—--ÔúD2¼ï 3q9F”c(ç5ä D  úJV-ñàGl  ²¹°*GF -Ï*+M*Ä‚Ê»S®¨\GU^@¥è>؇Ñüúq^¸%Ùð*Ê^­9ñ9®õ^²¹z¯Vl,Ù2ª]”x¡› tv=±!Ök6ÙõÌ äœà³ÞN÷£lÀÙD‡1’H ­¸14[HúÚœuˆ©WS=fjJèÃñ´wô·²)Ú°V6GøŠ“,€fé,kæz_ilHDÔ ã£m€éEƒÌ´ÎU¼IZ^ð]ù•ñ« xâ@E(Ër*áâ+!&@ˆ[+„# “Ç¢ á‘(\¦}lî yI¶ÞeÓåBë6C‘-ÒkŒúh5ß¹³~EÓƸ.d•-­"‡‹|0 îŽ.™å(¸ËµˆæoÑ9Ôú¾K–0 Rªñ»¼Ör:{Êð¢Ìõ ¹Ë÷Éu{*—H’¥œq¡Ãmki$sS87¤ [Úiµ”AF5%æ@îô‘ô¦GÀÆ'gI”²ÿ.zFðU)tð–óñÈI¡w#Ñål©^Ö„@Ì©4×ãLÍGXX†RqH¥“‚g9k¹ ·DMcvY­¨©j|gÙi­pYc’©íþqÏ~ ¬ʘ éU{8'G·WIÙr·ígHÁÚô¢ÁUm"­´IGÕùmén‘ãʳò•+¼þ°kË+B×o„-†¢f§@dü‘ —RSÛ ¡åÔaÑôQ™™Ùm– lÖKv_éçåèÂZ©õšî’ŽqWµbU~“¢Š@Ãå‹ãTx_9ÃjÝA¥üÞ¶­ºJò…ýšDwnYÓ_’âä^œà‡ÁñÑÓ‹ý‹£n¯Â£/ ¦xr Ö‡ LötŒ’–ðy¼ ×ôÌ®Xk¡«íÑYî†ëø:f(Ú—N;—…?yßv'J4düO§Ô‹ð¾žÊ­¢ß¡Û±^î0†ËÆQ1ÎÞ;òí•ö;–se•ç2ËW8ÂóÏw ‚0ˆfÉf;êçg¯zƒ—ç…ÃÌóžK"Ñ,maõŒõ³jT-_Åê¸}æà1'H ª,á¸{çÚè²ViÖTêÔZ~æM¬ £³†1g‰ütdÂa€¡´Øo,œüØŠÐ'¬$³Ï —×D¶F¥ý‹æ7¨MôµD›ù Ê:2~ã“Þsš g³`ú:`Ž‚z’„‰ðT¿³]dÄÔOÙAjJ6©€õ<à Jn’£¯ÆnLŠce}³õŸ„óxTµeÈÇÆ=jÞ«"³øοñ,9Ë&]Š1xÒá ¦mã¶u£¶ 2O#ž5yöbÉÅê°¦£`HW ¶™Ù2ïŒd|zá«Cµž¾|Æ®:_lýí+ç¶èábšöØGuí™t¨l1KL&Ž‚MFhçr7ª& .×Ó˜= ÑãÑùEqcj2Âçc 5šŠÁ³Ž#ߘN&ˆ–e°}¸ö¾|Bì"½³c@–½ªžŸ¾\ÚÂùñ~î‰ä“¬úÒÝ„ÒñÑiWÊJémyU¬% $Ðļ$I2$ªH"™³,Nþh’…Ñ0a í…߬^ÀÅ(8½-ìli8FÃMÊ— +[V.)B£ cÚÙ¤–¥÷=®TÛÛÞÚ*q}RÐÁA[6_Ç›xÞôë϶ùÃh³f]ÜF‰G\bîÖüœß/6›N 'X>öø÷ó$l|ª«xŸy_üäØ1‹ÂßHëÞR2HúLoæ  ˆŒJ|ˆW£šÙ„äb.lpG>ÂúóFp á+¾6>"¬¼˜Ì™4µ'£o#Ó`>£¿ü…wøSŸa\ÍEf¼ê…ÑB£A©¥°üƒ¦÷©nGk•Ÿz?ôà.yv68?á¿ýλ-÷ËÁË‹‹îið]÷¢wtvjàÑóCLE™¡r¯½MPÊ…}1ok[l¤:©±fròÎ_fº–®¤§Ñ ÇQ0¸ž ·aH#Š7+áàN™Ò*(•;æ=»pÌÂáäNuÐ?¼xÕzñjp +òÞBãtØœQ¥P%s4mþLyÔÐ`K)šÃaó¡øAËû4ÅðòŸBì[×rlÝeo¼–´[°SÝδCêN;ŸE4»´ä¶Œå¢¤ÄÁØ%ý‰K4mP o1r¤›nÿâäóG–uB‘)sA–×_èƒæ¡ŸÎÔ‘]&7|OÄIÜ΢ ˜S.eÓ0vÙg}+x ä³ù0n“äÞÒ®…cìÝc>ó8<ò SŸb`aaÂ%qÁØQóáZ¯‚> éƒ öÁB›®Øþªœ˜(¥ (•\p‰NòÄpæE?ËÈ ›Nh3¡€a/„š]½¢@݃K)åQÃ/šåDÝ£d“$µŽa¢üü±Wß Ñ}«ýdæ¿àŽ¿Á·5×—#cu‡Š $&¦yÂb”Ìf~; 0TB=Å5›&Öㄈä EÄo¸vo”@ÜLˆ7;–Å®Çï¹²ËÍÛú ÙúÍ­Më­ øM7ª=Ç?#ŠŽq8üo§z©pj(;’$‹õä(€,xThS~4Ÿn@¯]5¼¥Òw£=cœðÖ&‡wS!°È:jQ_tä0~j Bך™lÔ9a°h Ï`wäŠ4r#ì„ø§ÉI¨ÆÜZüš!³Àô1¬˜¨v‚ئ<ȨF‡2èk€‰/³KµIMÎQä6˜¹èw÷{ÝG©‰;Ò1kÔÐM¹³Ò X93S.àƒÒE <x)2–±¾Ð0‘–ˆMYö—”ò9öä³é@mæFyº0K–O™Põ&Xw´m)¹fI¢B™€0Œ)6eœgD P€L˜J¾ˆI/×B8bÑH1GËHÊhêFÒ¥HU2à²7:dŸã€+·ç4E¡öѬ†Ž\!»’™–ˆÁÙYS*/vò$šÌq¼'¾ÎåqVóä×d­—½§î @†“/¦,YÃ8PÝ;6btBü¼YmðY‚Wqx÷°®G&_“Q~ ÂÉž)ëè¸p'k©(›5Ç|H´ãÞ«»ÈâÈg*Ö â†B%ì|¤Á”É5Gc9;!èmg›„z€Ê&BKž“Q Y;±Ó@ñ¨S3öI¿¿Æ|*gS—×M˜ÓëŸ]¬„ËJך>ã göÕŠ—â³+ðXsÃõHšóJtF”5Þ>ò˜dÀKOr#æåïºVKÍmWjê‘ßFÖ,™8=Cxêón`?5nj+Ô-c@=xª«’€°f€Ïsð¹™½»cR¬Æ‚ØÁQª#3}(à°Ü‚`s¶H€q&p“rp¯'턃ŸªXUTSg†ßM™¯•—§!#r`¤<( üzr~qÖïôß>uh¦9†Ö ILŒ—gÁ9m RïÄ[Wæ‘/‰¤ëƒ¦GìÃL çé"Æ ¢Þ¬2¦C3:ã³ÚzÂ!' © «–‘“+ï]§7£­Û€èË@+W¤%vŽG§Ç/»–XcpØí\@µü,~/f3Û(t§Â"2ˆQ\‡®kÈ@Â_a&äÇéúî1\‡ÓÆÏ¥å˜åk±í"\„câÝ,Ès¯ÑêîTZ–>$¶we¥8@çþ(ÏL蕇mcÖÓj›Ík>5Ü9þâ™ee<›ûK‚ÃGP®ð 9̤Á?ÒoÕ=:ÇÓ‰Ñ €HñÿmE¸Zºó ç«U8KwÞâf!”M퓪P°”Új²ÀP;ÚG®ãn;ÇÆÒ)¿73›„jŠQ¦ùàaÙÑûu`KB&S!;’í{+¯ÂÊsÇzËŠ™†$}CÂT²4x®Pžh“׉Ò„­ÞeØ|™%@pÎ’Ê•î:º ª¦óñˆ”#µ¹ˆ51v"ƒ/d݈R`×»žÑ…Î}šª )";N-dèS³ñi)ŽR†L<£…6„YZÖ+ÃhÌæK‘Yahý_hw%žûÔéØ’f ¸zÆÒHTŒ@DÏW›aírfÜ‘nxdÝÙä Eør+|Õ) úðÎi’ä2ýêµm1}UHâu_@Ô¡Mô¯¨`f*9²° þA±"à™™OøB*ÔH!ÚȲV±%*º¡0±•Çĸõ´Ê¡*ÿ$C ïÔgLùÒ,1&¾3ã©y2&¼÷«w²¯Æ¨ÅÚ–£Ž¤åzW@œ+[Pš‚t¨Ü)|–þ‘ŽÓ¥UÐð´t\„K Y ¼.­¬qqõ¦PÎZPüjç¥éFRG#ç“¡‰} ÌðBE[ÑíwO¿#7 ²^ëÕ5`*‹?ibAᬔ{®YœT]V¹¦ô-×—(ŠDcQHð¡ºw-ª7S®¥ €Î·×+¾‚ëÓOј½ÄP½_Tì+Ñ‹yo[ÑÊGÔX²4pÙ:ε`jÃû–†ÝVM•ìç#Ótn¼ð£öÅ VžŠ2†¹2«ˆÔ;c6’z£ MDŠ­Êu1}Æ*{R÷ƒ€ZÙ]ØŠÌ(F~2}Ñ&÷JM¥³á× ë¬¹,Û•š¨þ5vf³Pç›]3[£â­<g!цb¦0À±w,ÊÉ gTI ­Ý‚†ª¿àc‹Éd>û<Èhó4„&ÃHÜ2èv’g*S8<ñ5GV±Ýqœåzâô†rÄýîÈÒÆðç½å;³öò²BRØKD¸wt©^ûÑ"0&§Ö¾â˜˜ ©ê\Ôʃx—%ßUʬS~¿ò<­Hxó‹‘…óØÄa‡Ú*Q©Oî$ h¶ÞcµšL¾å!B£P9%¹×*»·ÚƨшÀ3µ¼Z¿Ë¡§P…>GDeWÝŽ3«<œaæZÜc‚µþÑIwðòôøèä¨ß=”stø[Å2Ùó ¥Tqdã iW_¨ýL†)Ée$Î6Ê(}’ÐeuÖŽô6V'q½ÈÑ\õe˜C7Š…óÅLg†—S˜!§9T[†: Ô(ŽìQShäï^il1ʲ-w¿Jð^¥Ýµ(ÊäÊÒnÛYŸ*s+‰täf:ŒYG¸û¼!Y2ˆ|ÎHÁ*ƒ;'¢Ó'—È€joGöp¤>ÛL³N¡_ÇÊ ´Ö:Ù *¹îŽƒõªàF®ÿµ–-»Áð%U{z¦ÒÍë FÈ¡Wûçvn ‘‚¡I 8/“›éAs ì&sX[†§«%˜EQhêýd1ž8ÃÜ°”§2ó‹€B~-mÊ {/È "FÑâø6•“mGŒw"-…Åjë!Ô=P#Ô#Ѥ¤›”f§DömVüf×"/œt7º÷–ÙÝ’Je©jÔ€Žî¬ªinß(&TQ›NÎùÞp» ¢äOJaJ™¿‘¯çöSBOŠî«€s[R|n©DFÞs/á•¢ð\ÿÓü’"@Àñ&bV Ð6áðà(Ða± †Ð¤·%“×’Qâ[bðöûý ¸’^öº‡RY' ÿU3d üÀÁäoMj~çCCw9h¦4Çe»ŽÞ’VxBŽ *á«cdý¤¯â¥üƒÑôºœûËÒ(’6è³I»{3pº¶˜LŸ½O[Åo»Ó֪¿˜K§~D.ËëUK]>òJ‹Ð]8aµÖJtåØljˆ(î@ƒ“!b%^“½JIPTGë®t.c4IX ü7Nn:K¢ía¢h‡WœŽýîûê]c˲…sW¸{‚ÛD²gN)†*6YÁe$#5êá£`Ï°Å+»Aû$L‹¶˜cpfòÐG‹YkIE¸X*Û4pŒƒ`Í0#½›Ä͆ûQÔõ .’l›õ » JÆÆv¢‰iè)§•OÞÊòQÁØŒæ*ˆ ˆƒ,Ô¾ ÌO ‚+ŠäJDŠ¶hò‰ H<£eOÎL@i¢m6.¬M’¡a g˜1Ž6bãkKÞz@Fæ·d©#)™ñ4}N(‹{Û”LédS…Ž(÷3ætf1ÀÂAP’hla½YŸèVeS~<~H ƒ8œ/"Îâ"‚2e2ÖíÔO‡þ4<Œå2ðç7–³R]?0•×eˇѕâA~;JïQT´€Ú¾zñzLýQ0–âb4Èø(áïß+Hæoâhçg=áK䛃°™²lˆ­f>zrNÉM–ûHøÏùW"€¬Kæ·LÚqã!ÆàSͨËÂ"KÀ•ó å:ãPˆÆßÑ!ðŠÐd‰ užlÚû¦3ø¾C$[Iµ5‰ëL@Î HùÜÍmÛùpL›X)•ƒ°{j`_\t²p£ˆ]ŽPJ`¢*@`•nïâàE§ù!ÖS†fÞ2²Ë+…\îì g]t§DöÙgÕÈÒæÄÔŠ‰,c–دñö›Ñ•ÒG Ñ•E˜!);î|Sð’Yù@¯µ¥*êÕ7öJ#ª°ŒwÒ´$HdXv¢Þ­'ð ÓËÀM'"¤œÌ˪6¬9ÒÌP+Úû2UC¨xKTHôY–ù¡™"uͨaRçK/©N)ҼΒ7JÒ±©³4aj=ë a¬ 0Œ”'²¡–®ÄËÜ—j„†øm̨ÑrÝ“©ýwËÛs£d©çSlZX°z·(ä°½7W¨ÕÌqAS…yh%•• ½R´²|ÉïhTc¤c½•›’E°1LmeÈ<âø9ñš I"½ˆ¯âäF‹ÃÃÙÖÂNmÍhzbow »è5]rif†’n=—ÜK è„ËqÏ*ôà´8ýw¿??>:ìÑ;z~ 3¼<%ëu}™÷„¼H ŠzCö–¦Œ¹¨`läÝ4éÒÊ-0{z‹u‚8g 5?Â:$ÅšÝ/¤ELßÁµ+ïf¤÷•éxÉpM¾Ôlº!‘(ß\@”T;‡ˆPhnžÑ0³BAhe†Vf.õ¯¼»ƒÈö_íÿÐœ¼<î1„t “— €3•g’:¦ýÎ xº°Í=IÛXË&±R‘U¢ÆZ„?6U!e­iJ³7\A_Hù½ÂKµ`4’H‰)Ô.»‘å÷×JZsB•ý\}|ѧ³¡´Doå„®2@(ÈK¤Àœ¨ÄV tvsI©ÏÊNµNzìfæ³D¥«àÖÀww `kHøì‰ô^öλ§pö[÷U,+‚Z%²/´Ow½)»4ÝB RA¬­^隸Ãm!VʼÊ@µxSnˆµ’ì.½=Š©nÿó`û—µj¾ÄýQq¤)6¯@×…óƒp[Ì68ÂÕ å¸p’S­+õ%?Rxh‚‘H¨ßÜ8;6¯° `ú Å ×AELÁá"/÷ΨŠ÷Êa/}ÒïÞ«áÈ4ÄÚ1ÕØk´E1fÃ3'Jf“‡Ú"„ •¢ñ³9ƒvÎ…ý±[¦™ìEF-Â*¤¸ž›¡g:#¯!ÙV#(/-—OòÂÙ`ždèP*l…RÉÏyãtÝÒI—+ -Š^L4UH,q­M²KØx0§¶T´îØ‚¨?ºƒ×fÇáYÚt£¨Û轡$È~,bä.FzõŽÇ1Ç›S–í¿P€Éùr}½m4B9yšÓ Ÿczî–÷i™º¾ŒvY—1¯Ì£žîf³·,sƒ! f8QÝ[Guçn‹oÕU ­M ØXtÀVâÀ ã3 WJ•:¾Ÿ6ø‹FÍæŽBZÇ>ª‡Ùuag=|gà=fsQÇÂœ¥iôW`uJ­R”«ÌÓýƒo«áG=›;w™ a”çbPv¡5íjØMŒ\¼/XجˆqW1“l(Žºlæ¢{xtaHOìÌæeŽ.¤Ï#‰¤œ |÷ó<Äpþ¥ñ@\š×ÍÒ-iËe=lZI˜„Š+RÄäªa|Ŧ!‹xŽqvý87¬°˜®*6c µê‰òK¯dºg´øur¤`¥›4­Ðl•‡–<žã5ô)®H´>BÕá頮ĵZªV7¢R/ÛKŠ²W= Â2§¥l¸‘½³PÄ6t¶%ŸÌ=ÅrXLäÄD³yÎÒFLv±ÐUºtᣴ':ò¶ ÁðÍ çà>Ú*Ð!‡ñgILþ7”\ëƒi˜Ä«ÂƒÑ”’Cá;ú!ÑÖS}Ö(ÙÒ&]aýîp–âŒ6T>.§tóŽâgüïôìZ-5!‡8`n;”†Œi‘d­éR;*rÑŒh…dCY(CNzŸ~ªܨ^¢ýð“d6˜Äf³zIšMK:-âmtOÏNº'VÌ’Ÿ)!^ÈÝ£×żŽ°ç½û€41>™DF @ä»${ܘ$.È–¢­ª¶¥Ƹ¸)*v²+áf™Ê 9Qø#È %C´"7nÙñRHóü ƇËS;¦Š&º«k4Ô ô)<²¨é%aU*[) ³òÞCšÑ‡tÁAé€[ñ—‘Ωl ¢lÙ KGíÀ‚·î2ÉŽV.Õ‡¬•d§šV%á"¤çX¶¸lW*-—¶·ZŒš%¦ÅzN¤¯V e'ɼ-À¯Ï0FŽWe[o4Q±Å÷­ååõœÝÁ!…Ð&•Œ›…\=²,Héýì½ùcÛÆÑ0Ü_ÿ‘˜”Iê–mÉrKK´ÍFõRì4É‹‚$D¢"  u¤ñ÷·s쉃¢l'}ú¾qÀîÎÞ³3³sà•;`« gßú_Êáž´µ”›fcþ¥}b8 ½L¦üix¯C>_}÷úø;ŒÕ¼j:"·„j¦C¤ÂzÀµúÖZc¼=5c‘E"ÂœînWÍ:ÊZžo¼Ø¬ZNО/'lÌíÐîÎÎÖn¡D—›’“q)Є¬wCÞ½…Ÿß·‡õœåÖ A>æ:üÄÒÛB*œÏ] ¡lwodŒnªw±y„‘gDFô ‹@ úPŠ$ý{»uŠJbÐ40`IÄk|²±I©Ê”ÔZiÓÄhæfÆ”à…¬È—¦.$ºhÈðw, AËs±dÅŃ&Ý+9ʘॠ?ýv1­à¶@¯V²&?âðÔ¤ÙxÜd†½²³’Ü /R’õÞé05õ‚€QÄP 4šP:©ÆH±2Ã)Žv`(Vr…¤Î>õíˆXˆý cSØ3h¢´7šp„¡›‘Oñyƒ™Íud[µ4ãàܯ¯D‡ƒ‚nì…<)ÌœoŽ$|@«É«¤fDžúò?-t3xÒâ;‘û-†Ò·ÖB“W¼^NÀ¬zN”Èu$1ˆE#¤\Q^ÚÑ÷d %ÉJ¢bÃut¹v¿]ÒG%_T$Jžˆ1C)›¬š5”i?š² ÍöŠÔöVÞ ttÖ:%–Ú¶y64Ï;?P:^jtÉË ç\²"v6ãsà¬à­ÆJÜ0q8˜÷}r§†v”¾áèÖ˘-Þ)Sü¯a,åÜ’n«ºîÛÓ‹C×µœÛ¹4°Çîaûä¬uÜìÈ]pâúû,³ ÈÒ8ÄÂx\—öœ8/LÚwž> Ì`'N¶¦óª¢`Œ/™¸.üÊÖÀKyÅYqöè+¬‡¤a¹$â—³û–™ÐŸ~}Råž°Ò ý¶Tý­<}JÏ‘áõ£Š”#¢»Óâ:i|p66Ÿ‹Fœx·Ád>1.×ØÉ*û»¢Ù“¦Ä ÅçBkß™Gõ¥E†ƒF1†ª¤ÔÁ'/äëû‹*n8£`:“gËŠ_a£v"¹î½òPx.)¿7¶‚¥tZYèÛ.Ê¿F‘áàÞˆ'„ Ê_ ËTœŸT[Œý“ '"BK+é–nžðkÏG—bILÙµZ„’gf¯ü€P„£c“*ÆÇ6$ üézSö¬š†ÆŽ¾žeP™&‘D2öýˆLJTðt¼5C=øά§)Khy,Mæ3ÿÖ…¼zîøì‘yËàйöã»´QuÏŸÂ8ö1ž,¨ å÷½Äv¸rî*ísæSŒá= †##Ï„Èt íã•l{$½ˆ¾Q (¸+‰(a ¤§i¶Á ÎNmF`"q7ãY`†n¯Û­zç &Xɪ ÂÈ„o¥¸—¨=¾NUœS‚ZÍÙ¥HÇã)Pì«üsbƒ;*ü,€Aq±y/¦À¿€¼œR ÔâE/èz™4Ô[b%¢:«Õ,I` d-¦úbÄÜUî²0ö»O2âÙܳMmEx¦Â}Ÿ½h…§s$e§d×>Ño‰¤d‚òu°(Ú.õÏ,yL(‰~WzgÂmº‘$\~$N£í¾k|ß´6=;#–ºPÉ8º¡ßÂ2c/7Ñg²°îÐâ<ó)+&™Ùäù—¢IÈT7èó8§ð…C‘¯®è>SpjYtK¨Vy>¢CÒn‹Uœ1•Ú”Ä.äb¨2Õj —rÆ.-Vƒ¾_ú³þˆF¸³ „eD!Áoúaÿ¨©¥}»?/ÕNÁ¸.–3í±eæVdWŠ‹aò0—^O€@íÊ÷Œ–e¦€÷Àë{–ÜìÞ‘\fDõMIåò%séѵÚÜ^÷‡½LþtòÊÎ.Ðq6¯ŠŸ ›ŸÍA€BÇÛ(§È¯•œÈñ†iTv…Û!jr†nÑpÛ5£Ú‘ƒéh.™ÒM²È$iêõº¢’òi$Âa}ûv‰ êÃSûµ—}BÇÊ.É&N¤×ÔÄéž3Xé+|vo¢ÄtwO¼‰ ñü®kêa>3$Âu‡ç„ò'h’I‘\àTò’ØePØÕü¼ËOj$H'áÝQ«qÜúG³³Ÿã]GÁ å£J>­ò‰wël­³ð‡Nr•D6JÆ$)äJ€¦ÑÑGjP9Þ#¤Ú½SaOêÀjc ÇNîR)i0cX ”ŸØ6KëôØ㌓ñ²iÍ[³Aw<‡ÇÍFÇDTY´k4¯ê¬~XMÃ1Hµ3sÍp‚§OÍš…ª‡ÁXÁ¶2¢U:†°–‰>±¯áp]ÿÚæ2è\XAms¿èí‹ +3]6ª\ÅÞõuúsWr([ÛóDðŽJâ,vµ!¶­?H"7ÓB›€(ÒØš¤+¬®€À‘ eJÙËzŽ”i¦=¼¦CtŠ~ÅÉ’²ä,p²n­˜Àž c¥Y[ÕΕ>½>ËU›·¨‘JRñ°ÀHw™J•Û½h{ÓÜK¯ñ ñE×O¶×ôQLò“ãfóŒDµ] ìllæ F/ˆ¹c? ÄV&#túNä9°›(±C;-f/%“peé„ž¸~™ƒ<Ÿ Ù´7Œg{ê ,«[JÆÏ›zÓšRúms’4¼\æºéõbPeîáf}»Ê<+{¤NX·§ Iv¶HXÂ×]¸. 'â˜$ÿ¯¿{°~`}¼ëãq-…j:õOà|ÒX.5ÉéEB«Ü¥åiÑ­™0pZuŠ¼ÁÁéÌûî_ÔùÊÙÜ®8¸Â7· ºŽ„ŒDx D¯ÏÌw²¹ÑÆÎ$ñû k Þ#â™|‚!¼ !DýÞ VºQŸ]£#Ú¬dŽ“¦œ¶+9÷œµja•É¸ÈÃfšÍ,(fö4Ÿ _º÷Òó‹l­) ‚ÝeyW­i,8¨0›ŠÖæ¢4ÕGûnhŒ'kЊÝæ9UÂ*„¸Ù`VÊwãX)@¾8ivZ‡Rɸu”¶ì¬˜5^œ.Y'PóÿÎùœ2)Í´ç§{ã–iò~QÕ ‡6§ÐGu݆à‚ž/íõ%FMç´œlèUby×8n½>t7Ý ÷äâ¼ùÁ}× ‰ÇåÐvçâZr-©´'zó¡”é_’m8WážÇp`^:ÃqÐëoÖ7åJ‚d¹H ‰ŸðfÊÂÕ´/Ñ"%›Dq¹˜dÄšE93Bò7IƒR¥!(„¼‘] ð°ê°kVì²høf1Æ›Ž>ÚÒE(¤ªì»DäÂÌܸõ.¥¤´’:Ï ßbYÍɸ‘ÈN.˜šÐÒźÒ™ ÔC±ÒÅúÅP¿òg!õ¦Ãæ<É^æÆ{£âœàv/˜±Â0_¢“+`vÞ KeBö•26sö2AmVðТûh#äpì_ú1ÞÐ £©Þ;ìêÉ$t’¾7Å*$(’·Æl¾^uüú°.Œ”Èï ý±¯$5¬kÅ {ÿ‚܉é—ZÂ5 Ç¯¤«c8ÂxIz/«F^ÇÅ [ëƒW¶ÐÏs¥·²R¥[nõ(*»ü­&Ç,½Ž4¡ž^D÷ïÁƒ#{ðþQÙ…}kxr1ˆ¨BpyxoìªnÓEø«Œ§ZkÒ]ËnáJ~[ÑÄåÊ r'óþQZSåÎm/½AßK¬ ^nNUÑ<ìOÒSÓï£çó'’õX~ß%.š÷_²¾5“38‹fZôó L³¦u-A—%3Ýi¾mu1 ˜¯÷Í^ƒ_¼î ?ÌšB[Ay*Ó+´½BH#k/’(Ë3/Æ‹_ÁSÐà¸Ò'žv¡<»dfî»n¹ìº7¾w庼AR¥` ŸT>[úß—«å߆ºiŽ‡LýåSþ ûµgõÝúúÚ„ä·õþ_¾ø?´ÚÝÝÆßg;[æ/üÛÞÙÝÝúËÆæ³øºµ¾³û—õõÝg;qþòßô;³®~ÿKþá­.nÑë[l¼xþ¼Š_`¨¯¤ö÷ºó:ôG“ªÓ{S^ü Ðov©r¿e^lÔàÏ6’Rü8¼… 1†Õ7 ôý€Ù‘øJüøˆœ\0»¡Œƒ>3ˆ½hô“¥lÂè#€wþÍHÅÚ™×<2€\“È›ÞÃAPçïZ]ç¤h ΞÏ:íï[GÍ#8\àµê¼o¿´Ømëuü k4Cì4NÏpšÎ:M@îG©ÝqZ'gÇ­æÖxúƒsÑm"ÀƹóCû¢ã´ßŸ:V÷;Yó™O‚„ØS¼ó$}R´“T#’¹}e~8ŠCHž`YÔ*šÃx'hN‰×Á@Äòà£ìUŠ\Æ£Â#tŠ:¬cŒï~ROµo CÀ5wBÝ{à³qÊWó8G€! …·9Ñæ*[²l´ç‰4í[@Þx´ØT=ä²’|NBøV£{LB•“ÊÈOøžoùze}B+~“GÿI÷} ÎzfÑ="¼nmºÇÍÆ©ÛºïÌ«‘œdgCIÉl§m ¨¾o1`Yû ÌWx“P“ÄÕŒJ#û&Ná3UØ‹UA<¥’vl¬hæ ®ÑŽ§éÚ‹–) ·¸7Ž×'­xÑÊ5›IÏËj  R+’iå6!?«Ö¤Í½b/a`„¹>%øDò¯‰w6Œ•¯Äç¸â¼;Ÿá|…Û2!†… ¬©dË…£hûã~¶ˆ—[Æ[\hž[hn2ïAÏÛ'À¹\œ¶~<Šb³Â³ôÛoÍ®M¼èGà¡GÍ?³Z¸ÕŒÔI€CÛêÚ§JYo¥Âr¿)z~æ­ü”ƒS“K³’òµÞdn}Ñ=!Ç&èÚ[Wj¾¹„‰*¢TuG¯/÷GGn÷¸}†HM™ ¶”ò0àÿWÜ W¯ £Yï> (ŽÞ‹*;õ½O'•¦ ¢{û8±m_Núw)£¿yˆ=¦ˆa>Ù£Ë8/Äù…t?!è^8œ'Êç|F%UŒc¯¿(¢×ýw¤9»wÉšL²«òf©þ@ŽóúÍN»\.G¨"P‰*ÎS$"«9ã^ÊÀàc%¡ðiÆ­TBç«Y3á™qÏ&q…c•…t*»%¢ÖÉõž‰_˜¡°ÑxÊÄL·¦ê¨ad@+΋P…<’õô ¨×¤…B Š™§] :7^<TD0Á{Hôù$Šmë™ñ}Ø>û¡UEÏ«mÌÏ:ö š^R~AmCw•ˆîmÈá±Áz§ âFsTÒîGEf""ÂLc"¼½ò–™Ý„@#^£®< ËNØ'‚¥aNfO¢)þ±7Êúá7{}"ÒpLqÿd‹4rsòËsôú-†è4º1N_  g÷z )9¶€º3}ï‰]’ÑÚŒ><̥ۢ®šš ™Ù6ÆT”ždNe‘*Æ;n©HRfð"ÞCÊ,(ÿ!ÍHÏc›$øÅ·Ó  Xhˆ¤¿‡´¯¾PE·cÙ npݤ®²¸ií Áñå¹^^º¨¸iðºÌ©J"\Ë×ã¡ýÚsé Ê^\§lƒ™(ÿ4äU]î ÷ÒÅ® ÅBdsi9îL»ÁäÈ•óR—ßÑécôäÑi_P ‹3÷m§˜±Ù-+„®û‚˜W$»çm—hÔòxh W#ïKµº•ã¼S/l9>P 4-ªG¤kVÚ‹Á,Mr^ݨÔp> ùІ˗~Ò©á(“¼6Ñ%(g±Ü}ßþPlë”ï–»FâAbÁª“>ZÕØå†Û‡¨M1YTL_Uböö›7îYãmÓŠ²óuž+AN&r4ò@•&Uø,—GŠuíå/Ï‚&KecYT^,tB˜DÅ*!¡5 ÉÍ$¹ä‹prsƒ2RàØ׋Ý_ä/L8«1j?®ÿœïÀ&“qcÙŒæÎxßîÑΨ}fñÍŸµ¥|Úô£­$@Ô<¯«õiD´À=n%Ü•óißáí)ö=ïßm67g5÷ô±ZÈÜ w3_|ý¦©Ü|)ÁÕ²’ÑûŽ yFŠàÒ%M+ÌK6¤¤lN$ ´¾p›„ ”E„q?&R"³Àè–‚nÛh‹KçärˆÃµÈ;é&‡XyqìÝ}²;³´ ͘¢ZjµPŽÄÔЀJo‘©ìç¹ Š<Έ”ô­º¥C0ŠÛBɺ) ½Ã*¥½´+£KîlÝëœëT9cö®–æk¡yx¯G-› «ÄÏ­)p5Þ/çœ ¨WÒ¥“¾¾(¶…Eîy0Õû[…¹ƒ™´PRVÚÜ`i-´D«Œ§Ü ýF}ž‚èée¿ÄX‘§Y¤Ž¼ÉònÁÞiØK€šGºÑ‰H©+8^—ö‰†vÂÀ©.”š8¬ÚZ$Ñ%dãÑU&Îþ†#íb…ðAò@µr±ýêWÅõ²cºÕ‚Ók86fq2cJZÌ©bÀÏÙÞ™9mopíMgÞP % *˜I±$בq:!Ì kàeÃhÂW`\æj+`«h!Ï>0ü(Z™ÀÎù]„3 ¤6‹§]²MìR:nÅ+NäÜ,˜a¤y1`„žp¬p{Í$êÊ÷#Õž1⫺Jæ±Bà5ÒSÆø©1Ù¦a/e´è'¦jy±  —Ä"oéOƒDx~-¿WÑYënY÷ÐÌb›•63³îjö±”Ç5ºJæŸGÀ%êR36 ñ¨,xV3¡”_† ¯6ö2&I ˘ש€§+-R¥›Á ´ Xoù•Gš Ža‚»™6 eqOî ¹£Leq­+n€ÒjãÚÝ"¯š(R ¡dóX.•Kl¹Å0@Óëë&,ì%Ês·pI)eÚe™!S’lÁ¨y{Òn'“Ïúr'nŠ¶ÁÅ“áäe16cFæ5šõi‘Íâßa­Øù )¢§ÄòB®9ÙQéiÎ*4*»ŠÅ…®],b%ýE‰·ao ³¡oË)v¸²Ÿ½:„cvur,ËòrfEnV}¹Æeé–.¾—‡»DyâGüR%P]ZmP¡O<˜È•Ä·©áLµŽ.æ‹V‹ õùöVb–tâVeÄú_t™ÎÎûq˜ëŸp<¤6"2.# œyjù°ä0ôRãm1¨` ûxËP¨ŸÜ*-Ž"6.»ŽÓ^VïGÌK¢æ|ší÷Þí¼×/®‡nÊZmÙM)&cÊúrù¦œŸ±ƒõ0½…<‡Þ,ç;yžr³˜ ßÏîý1 —ü[†óYZƒä‹“ËÎä²óø…fqÙ9,Âã$²a1yª'í#vùÇt0±÷,ŠG$ñÞ_䳌ð5±‘霸”3¥µ‹\% ¢ä]ù—ó±ÚDތĔ±—q˜õqÉû/”0˜7¾“¦OQì_·ìƒ*왦üÂ?&¡Ð1u«r>8Øé<‚@qÕŒÝ.gÖÀú˜bL¤èÏÔ]¥ÀU¬œ ,U⯰@ IEyŒ>Þ{KÓ…Çß+¦»:Pº1GàX– Ò`¡ ÅÊïgĨšõq×ñ÷@³äQÊxÜS­Ö¥ÛÈJ[鬯ô^j7‹fµîçKÒ‚\¿Þs. ‚ÆÒ,w=ªhÕær€~ÃF0T’ôJ©¦šùNq$LW2~ayŠíÁ‡w”C媈^±T=¶ÙFØ()³Ú³5À9ƒ#gÊ©éÇohª-ÄïEáË!ðåhã"º¸§²I¢—ê€ÊÊ# roŠ ²EÚ —ÙËnž¼ÒòÒrC²Ü‰öEγåN³e©‘—¯äÇ=ÐJµ"®ª#mTDÊSÇ*oXgå ¯y™‹PIl‡Boÿ–ÌôIu—=4ľÐx‹Â$¸ÕkW†pX]gÂ8vRFåvQÑ¥Õ ±B‹ùH’ÌoqÑR21îQ ,w<¾“\ñYeµIÐÜO,@b » T)ã{‹!•æW¶3 ‘ƒ_¼¯¤)Fúþ¤yN®ym9™rÚN‰ ¢&Š‹+Ct›®•ôÚR ;mŸ»ÍÓöÅÛwîIó¤Ýù¡°a§mÈn˜J^—ë@8(~)|ïúîÆ'3%>Šáü³J! …Hc í·c’îSÀfFy†a)¬¦¶¼ªEW%`ìûŸô–þÚñ±ûB¡ð(ôÙѪµs‹ÃXÃê§ûŠu‰Ž®öUã5˜Ozª¿GJûáTTR*5^·Ü7Ç·PR>·Ô4?}}0C–×— t ‡¾š„ š ?áI„TGÌ:iw'Fƒ‚„ {Í"Ÿù4ËOŽv·éœØÝ®aôdíp [üîlíâ,§6ÝÚ¬ÂßÝmønmR‘îÛÖÚI묋M¢~u]ÕµÇeùXá^rÈ^’ø¨ ænP*þóÓ†jz—F-xÃZ©txxccB/~øp0„‰±«<åë9–k…i˜À©½O«’ÛœUêÇð N÷!ž+OvÒTôÈŒzè%¬L„5çô£GïˆM¥]ämÿ9„Ôàÿ·z$j¤¹Ÿ8›s`15ÖŠƒ[g·êÜ…seÄÀ+âN®§ŒsR³­ínW؆Káý.~c4–‘œY3Y¾F00ãw¨‹8ñú#ô´W*Œh+ÓñÉ›bÝÅ}8…عZ"…dž$Uó.;;ìØGçdäè ~8TÉyìLØ4¶ÃçÚœzéû³Æù»˜þDVâgx¿©¬:Ü0Âm>qm·Û9tZUd °ŒÎ Kç¶ËfçâíÀ©µZK—‘¤~Ó@+kN–íµ£ÿRrÚàÍËó&ºC9iu»­ö)|GõÝji¶€o:kÓc— =.›¢Nž›˜[E× †˜ÂÖUÙt'Ô>q‹SóŽ[§\鎶vd[”ÔŽ„×_ ÇÂÓGª^aÝÐ÷"Búñm‹(9¸‰ú~4K ´ò,m¢6`Ô­£ãöYóÔ}ßiœÁÇ”]ÿ¢Úeô—è:YuïÕ²)oáP8 ïάñÈö>º¸Ö=t»í‹Îaó`ãÅ‹õÝc§6A¼ô¦õ᤹—²ÍÑ2Ü^^ùS ‰æ'"XSyÏËæ¶\8!æ.´»o6dp™¼kwÏé8£GZFä@ƤçÚ „ÊÓ& ÄXNô¨BnŨŒˆUXu‚:áÔH’ÈÂ^7 š03Xâ(’NÀD¹qUt Ë…§±ÃùT뇓(³]?½âÄ,8~ú^ÃèŸ87å&EK–Ú‘ÃŽ€(¯hÝÂýÉy„E½Ä£¨áð°RÒðäþ£÷¦dp7õ&Æòâ¾Ê!KIqlêãØxâúæMÔ*‡˜ªuHHRØšÔ.ñƒÜ¹u¬¬ëÏþ5‰(ž'A¦8‹L}Œ&SÑ,˜ ®s©¶F±¹x¸ˆÀ“N+9ë¯ì؇áîM ÔÜ_ÃõrҬôÁx+”-MÄ |½"<|M8Ç)HVˆÏ¼ÚaÚ—ê°zéŸx 籬ŽeOõ6:®Ôiœ·^8±7…Q-•Jí×ÓJ‡°Nrºp¯c<¢Ópµ¹?‚Ç0týÏxD &Æ° ˜±÷/ôìO½±×¿'3òÄ:%5ýzHâmQË 7t'c¬ˆ@Md“¤_ŸºZ'ó V Üö‹Ue|™…ª0¢U/¾ ¦ö÷Ù]4Õ¡4µ?êSO…¯o¤.ÿ%’ ØÀ†}w0#ÛÓƒ. Ñ 3­7¹K`¸á#L-œÝ5O}=O}ž§¾˜Ë¾ž¯¾œ¯¾ž¯¾5_œ€Å|õ¨»š2ëëùëëùc jût=âJ½¸}I…Åäö•û^=¯ EÏm?3·ý¼¹íçÌ+ƒRsÛ×sÛWsÛWsÛ×sÛ7æ•è¹í§æ¶ŸšÛ~Þ¼öõ¼öaÖÚ#—gŽøüÓKúK½£Çó=Š§3ùN¬p9r¬ô7|ħz_âaúT©W¿/XÊLGA<|¶€»ÐÍt…ôm”®¾÷'ƒ|±ì.#»»aª»aª»°Ày”oáCÅjø°ot æ ã5 RŸ‚é{9Nõx¨br¹ —×£Aœä§ÇÃ&0Êh·  m¨L3¤mó›Èi|ÀF¦íÍåga8NÖx‘Ò–›—?—.nt\…ò˜h—ÿxY#'Ôï›ðñ‹ z؇sÖ7–†jWfùÝ#‡©î!€$^ÿV”{çT‰y×Þíe?;L¸ù`ëÚP`Ûæ4Fb–üIR\Ä«*À†3–ÁdªÖ!)˜J²YxÞ]>Æsš”F_ùMËAi9½(Τ< c¿VfAå )ÌÛÝv4á‹ý!šÑ±VKø9 Fû®:G˜KâSÖK:MfNæÓ0Ù6¿ÃV–Ø»£ö¡û¦uÜ„=.¨¡ÿ¹h~g’G'^ß|mw7ùן€(zæá¥ïTÍ&cUPYL Q ~.ý)¾ëÀ¿± ‹JF‘ùÆ‘bq²‹R…’a`½†c/’MóÛÊt©»I/ð¦æ':ƒä˜MNãâü]Ẅ#²¦€$<}žÅ¾¯»:ìÝ™ÛSo> q‘ç­&ü›dûy¶ÇGo/>l=ßµàÅ@© ‹AqÚÕ&°$­¦iÂC} x¥ë’ä•ØÅgÑ8›²în—JçÍî9,8>§Äi©_$‚_b¨Ö™EÒgÂvQ±Ÿ2 “`0ûVédâ%#;×h>”Õ”JoO/Ü×­ã#¹7$Eï×a3(³7Ñ $­‚m\KF:ƒ¯O»¼>Ùùëɼ'‡stWcbñ‹ài f€GÌ1žM<8Ó¡ŠÉ•¨°b‚Îö‘û‘ÚRš> Ú ëÑMð0dˆh«ÁM ÖlÔÇ 6 8‘ówM¼û®)v¾zuNÏõ3­÷+õúðPož|Ð/ïÍ”³ÃNMŽ’Ó5 -¦`ˆrø„§®|°n¡%"x~ ËBò@¡EYDrú»ì°è,ŸÄ‰`DÕqŽ~$(`<Žy…\üØîŠå¥¾¸Ø^ ¼™'©Ò¼4:((IP]EÒpíÀQ»D¡AMD‘C «5¶?p© È›(Ú–[µV]øm7CäUÒЬâ½ÞZëÁ©,²õ ¨%\+³ºÎ9 ¿O’k ¸zCƒü‘G¦J ù !’ <¤6,~J-ߊ ƒ[§‡ÇGM9ÍÙ&SµÙÏ‚ŠçzÓ‰~q¦ìK¥‹óÖ1Ô'ÈCÇ$ MJ’Œ‚¤+xÇaØÕôш#q¼(ìê%¡;ƒñ™ Féð¢ÓÅžÕÆ¢Lm È{BÒ–Ü_†(¯¦›¤Ä bTF6(‚Á‹Ø[tðÑ­¬ç\ú7PRÅZ'Ãü+Ÿ¥ç7ABÂî+mP÷S^Ò ( ÜÐ}×<>6…X*:I½DiÎZ/˜®%0Rݳæa«q¬DÐËÉŸñjeL!FfÆR—r'¬ýP"µ˜FI3â(J;1ØòË™?U·rÛ” ±›`öƒ¤·LüZ?(X ÊÛn¼»:‹¯«ØÚ/P†˜KW0ÜÍi‰ÈR °Êß3ûˆ¥á‹!{Øs2Ý]3Òû¥¯Hv§¥Kt©:ÿæ<~i‚Ò’‹Å U¾î= ›ïÒ¢-§vô¦uz„áp¾+•^wjÑÕ°F=µÆ8À“ÏD}x¥’‘´‡•âÆ­áèÁŠ¾BîZ¦xQU›•¾š\;&0ºƒ,Y `µËÌI¢á«žXUL³uÈËŽ‰sxÏ1z uþûðì£Õ_Ù"šÌf#¼¤˜EYì ³ÀIãô£IˆêÌð†ÿmaÊV©õã=û,.à¹ÑÖw«þSiSš+/ÈaÛ*"ÍÇeæPÌÙ³Zʆ ÓK%8^ÿ–£Af†Z¦™GÚÙÂM‘Þó ó‰qY˜ÇdÚ—>‡°Ä‹*Sƒœ QJnŠZ’f±K%!O6Ķ†YKp÷òÁ)aÌWøïžçÌ¥’!øÍ ›sE¹)ð}Ók'r[­„E‹Áä1ö¥’§+QöÞ JŒR*™ëwOhmè‚&•‹¬‹²Z{¬@TXsr…WÛô(m«-&ÄvóÖ2vÓã2Q8°aýþ(t^9²Hé«x‚›“œóx±»Qúª.¥dpJ6:‡N·}Üè´ð”œ“ÖÀ½áìêTœxž0fÎ6Ç,z²ûü;§qÒzÛXT‘‹¡×®ï‡¯I8Sµí“ŠòuP…Ëþö›¤ž³6ð¯×¦s8UHù¦ETÅ……¶îs_ª³2ÔίÄôIÚãD¿0€¾2åäÉkö¤hˆ[¬øGº…ÓÓkÏæÖ²³¹õ€ÙÔ­Xj·–ŸÇ äì4lefpÉB‹ç®$Žnk×kip>Öå£>÷h ½þáƒØâò†±’œ÷4¾ìåbƒ%Ú _tNñ Àéµ"ë0§éÝ™{ÖpPõÀý0;Q U¡…-VÍb½ñ`£¹ ß)aÜÀ6åkòÇåÈ›%ó4ü›zX…?cø+Æ®‚ŠâõîÅ`©›Ý=Ò]ïœÚ‡¨§–x:;“ƒCŠOˆ^ $€ è™ 2¦lB>{šß«µ$Äkã9¸õu1ûò­ÔWŒ¤­ŠK/nR †‹þ˜{/™NÎÞD¦Ø¨ÂkÏÞ ‘^1:ј²Žqo>¬¼$¢¯I‘z?ñ ÜاÈÇhVÇœ¼¨XÍ!‰¶òt½XРdKøŸ ´=úlô.­ 'øq믒M¡oŽŠá‘ ,O!Žßq<Èj'~ñ¥™BŠÿ÷ߥiü(†Åº!H)´/s¿ŒÄÛ“a´1ózbè «(•t›²-±4î?»1ÚŠhdÔå¡ß_÷õ\ߧD:({ò”¡É[…Y\­û·Âtmµ®¤küã’Xƒ)AöO¥¯„WäΙ5ŽöqCùàÑ_TF²[)gLQ—óâ=©_¿ÊFk ‹W{¸z‰—þYíù'ÝŸÔ§n}«¯¥‡ïþú^9k³I´ÆM¬‘xé+xtú×—#ÑrçŸtk™Î5ö#•Eµ_K_  ¢ÌGè†ÑÞ­ÿcOÁ=¶'‰ü ³ Õy²L‡-LÛS˜ ÚêF˜èÔŽ€ð;ÏÏâüæøÃ؜ڵ³Iÿ,ÂêÍv2 “ß¼^Ï~óoƒÙoI/¾ú ¢ÙoÉÚ¯Œë¼é¢]6N»­ß‚ »'Ô Vèzëüx'šÝІ+¾Š3}9‡ÊÁîì„ý«dHÜäÞëÈÈš\­uÎq(y}’J½p €w1Û“¢zp½ÔxÝEÎ?£›Á?K©>utª ;¹‰Žñ–ËÃsÇxsI§6öéxC­q:#äYíâåå‚êÕÝfnTµ”tÝ £Têþpâ²Æ*kϼ=,•`ýøÚ¸¸`“Èëû{ZIåœBUí´ÅæEûCÑ!D²ó³æ⟡óÒyü˜`½r0Že‚½…¢8?!¦)•æШߧEÔš‡·è/ÿ—þSþßR†ðœÿ·í”ÿ·Íõ­Í?ý¿ýÿÖVKΪsFw19L+÷+ÎÆ‹5ø³NØ?øqx â(Ž7§È–²'ŽDuƒÎßµºÎIý5Žx>ë´¿o5Ð7U«[uÞ·Îß9€ÀÚÇçÍãœÓ¶ó¾Ñé4NÏpš=u»Í#„Ôî8­“³ãVók<ýÁ¹è6`ãÜù¡}ÑqÚïON«û¬ùÌÉN½ž#ß»£¸¬3ã…œˆD2rMBòË’Ó°éÍ¡›‰_u¤cØvƒ÷Aßg’œï²Ó5¾ÃˆÈ—”Ýt®¤-²N!¯ÿ¡ƒ4Sôæ3Ÿsz@1lD›«lÉf° 'ҌȼòÆK”ª‡â®¡8`’YÃî«uÀ°Ck†ïÏ•ŒÊþŠæþ°Sâå¤Ýè#LÑÁ°=& ƒ ù"”º'‚ïÜø„$Ý“~€:e'2ÄÒc& Zob/¢‰Š=Êß¹œO)êY-yä ù—9œÂæ Ëc;`i÷€Yš¡»Ù  P@û„¤ÅO< §ÆÓr‹BF§‹å%kÐ{·;œC¡ÌÈ1™Pêɉýý%y%üá#çäàl߶gÇÖ×£æë‹·œ´½y\*iïü „³8ì— Ç¸Uœ ÷5PþhOð&öÍ/³YzëGç¨"éP\TñØñ²J>rmå\Á·ßÊÒìöüõ?švYÕ¶Š±{Ô²$á#¹|6Ú$2ešÂm¥Ð튔ðÇ™îçŒTÕq‰aqÝEºÌþsÑ€ù ½ÙÃt×tëÌIQëÞúžœö%O¯éy3r‰špò‰É” Í\^5šŽ »RÆ5ýkU5¡–¢§ªñU¸l a$ ~„>óÞ+’Z÷]Òñ#Æ%¸ß5­Àq’Ôî€ô¦\½„h¨ÆÌÑ ¾Š}ºô&Õ%姒Ü©]ãD ´ÅhAcñgßü¬çS¹yfc&TƒÝðÊ»33cÙx·ËðdQ4¾sg!‡ #;ËrToýá_=]÷שÊ+ÙÃ$U¤èèÁ ]ÈF5@ß“áÈÂLîpGȇb'f¬yx­–Ó‹¡öj2‰t×pqJRǽÊS˜¡,ÅÏ'“;‰âå:€N¦³tGó†èVÙ8OÁr¥“·ªî¾$ «f¨CEÐX_ãÒúnµµj„…¾Ó:2ÆÊ8ÚªéH£c|½É²öP¶vs p‰øŒÀ>î/AdÆFÆv¥Ù—MúBCeô՜ିÿI~ùeJCà8¹YêC–öe‰{Ä·Äç²Yü¯Î·æˆïÑ+ÁÁN.ºç.ìóv§ ¿GÍ7­Óæ‘ÈiÁæÞfÀb¤†ã#ŠÒPá ‡ç¡ôœO>ÌÂy"ôà`\ “ª#܃‹;õÄP"ŠÐ¤ ·Œ#²ÂVÄbXAq‘¡TRÔPχ7uÔ»ðÆ¿öãªÓ a}"ÄÉ ú @üÁ1,…#âªWÐá}ž˜aŽ ÅTepŽÊGaHý Ö­8ö½ ª&Avq(ž$²ûÜ]º¡HD@ð‘Â!¬NXÑÐvïeiFó8ä#‡ç“¿ZRÊ{æ—É\Ž'*vìÿ$&œ úä°P k¿f11ŠéM‚[„<':ŒÝ¥Ar0½¯| ˆà‹²ë´¡ÔU›$¹›öGq8æF2÷ñÜÁø·DÏýkŽa¾9Úºya„¹Y†!AQ WjÕ<˜Q-<Žð}gƃ”ÍNÂñœ éVÅAr•P¸oÀ¬á ¬§r³ƒªkUþŒ~y/aÊub‹„nÆÈ9 œ r¬t÷ =ø‘÷"o7Œ˜á¢öìbâ&©ŽCKH9g„ètm¶á4Ð!ßCÉÓµ×ÛÃ'þ@šÀRE„ôYÿ7ÑÂD$§6lºv]=tV³‹¾™™Z§I‡Œ8 8àð”KœÉ~Dðèð¯|G¾K›Ìn˜áÎ…‘x3Å— ÊÂèjéâ=ÕÀ0”+š¿Ñ™\ϳñ7Ÿ}˜ŠðéSÜ…è:cØÏÆ]ÿhî,É—s±>æÈ°·æ³9´Ð¿…Óx:>­Aäè:/ŸîXzÁ„iê²Ý!j~ÁÞÁaMHƒHÊ õ»<Š‘&|XVÑqj}‰©Tg2n‰`Œ=ÚÀˆ÷Ñyñ±ûæâôñ`&B]/q짆FWø˜‰]V×Å»`÷Ñ£K…j2³PÌ¢nêÌ,â̲â‹VñèYzD±f‹*‡6.ªøRM°’)*7¡äUŽ6°Ô¤DhSë†qŸoáï::Žx»9É ¬DeÉT.âB‡¬Aø°Pà@À u<$ø$<ãX«¸šê5ošxt&,'^f”¢Ì¡_áÄ |¹íàƒR·Ã¾µ"¦š«“ÇZ§J yH©žŽŒ˜ÄhÔ’*‘á’ô‰¯â^‘L‚¦KDG#5UIÍêé>hGtzØăPÙfÝ ®zÂ×ö(åyTú¢Ê²€À¤ÊÌáÓbÍÂú"hUàY>ö“#ÐÞx–æ`©à³‡‡¸dÐÔÏ”Z²âeD´ÌñcþûEº["â,åä?ÎTD3uT8SÇŠgúÅÂà}V<ÃY´rßkć»/&Þ=Aí>/0×—Šfð‰ñ ~×8¶óüƒ‚½ó¿ÄßÆy?¢ Ûýøb_϶[ñOu,®ü°~Gà"P»XÊ›"ÉjñrÆñÖ¬w hĺÊe”Ñ$*±üÅõâØ»Kª¤=| ›mÀŒ: Æê¡àH £?¨O Ëboã‹]Œ/çZÜòjL9.œñ³é@t ¯É´¾ZäN8 òS?Èð²ndÓM×>VÓ;ÏW aÛi ë/çFÌ‚¯PÿýΧ¾„ß©bоŒƒ©¬Ó¨/á/ª†Õ†BÇP_Â'T1ŒÚ}¾Ÿpç|‚ÿ§\ï àO€[2¨ËE.„Š¦>,œðž† ŠöËW©}ä:›H¹ PcÄf4ŸÕ(º|AO9–}¸Ç Ub1&5Ç#Ç™OMÆÛÁŸ´†+ ³À—?„ôŠ\Ò'Â}®R‹®ÈBº„Aú+øŠ¹ªìAi»P(’ÿˆw¿—häÙÎN‘ýçÎÖÖ:Ë6××wÖIþ³½ý§ýç#ÿùZE{„Š5¼LŠñ"ˆ‰| SæD!Pôxù‡A0D0DèÍàúKÜ]p°›ë[µõÚæóúÆÖ¾óȹ8?,Q JÁç4„vkuÛ!Ø.07¸Áß “MÁ+´¦Ä^´¡Ò¦è8…_û¿‰½iµ 8ƒÄx༌è÷oAÖçЗÞôÔûÞ«*UVg"Zç±)ï&¢î}Ä.xIì` ¥àô` ¹Ò£Ar{&¼ AŽ,–2Ä‘yKèlìœÍ{À±S×÷§ š/:~AåBè€ãVÔû}y±+›t‹[jžp ³€‚wÃtÛ/³æöTwh o˜Ga$Ôt‚™ºw˜'þå|Œ8¯sPQª}qNªORCj_IHÈó BB Ôê¹AŽd:»CãJ` ›ÃwP¢ñºuÜ:ÿ›ÿ¦u~Úìv7íŽÓpÎóÖáÅq£ãœ]tÎÚÝ&ÞLòÍ”_0–ăâA7@å£qB]F±¤ð§:ò®ñ’£ïèRÕc…«{§sÂúIzQ}èÖ*ÝŒ¼ÍfÑÞÚÚÍÍM}8×Ãx¸6fÉÚ+jLƒ3”«òe­Ï†«ò¶¥° U¼¨‡ÆK ½YK9E\E¨&Aºr~i EE,¨—DwD•ÏQÞ † öOCDÀ­ÒªÇcS +åê+”loU[¨´â©R,;O´4 5Px ½™ýó߈ëäX(?•`DlŸ·Ú§?×ëuT…|Ûiœ8?6:o/Nš§çøµTȩ̂Γܴ'UqgG¢Gz|\£’ÉN ¶ÁÜ/ÁJ@ì@Hž¤Àb× Â6‹6ö¨U1éL³ÂZ‹ÆžP¤Ï(4ÂñÅÌטY"EGÐË KkE—*uY¯†V¶ìÚÏ}ª]DPjmÐK9ÅçÉ6êÊépH‰ «Â=A"T}î¼~Ÿ{p9öo•*„~ƾlNáÀSO†Oˆ*(€Õ@ˆ²q=“Â"J—ѽ €c¶ ±Aõ½„÷šìÒß{U_Ñ«ùñ_ÍÕv Ë‹þóéOÌñÈßP=LÍ…(Ác‹Xp0Ì,¡"lD¥°îUc‹Çë{€¥®¦hóòäñÆq ®¤ó-‹U^‘µú‰Gn±pgàH<íJÃ=1ñ'=äAf Eͤ9œD+ÿ¶²oÐf|0qÞï“€¯*= k™z‰±"^!Z$PÆ#$ŒEû6|…^â±pC¸wÌu™MTQÌz‰TC…e«OÔè?!¥ÛGp\$€Tö± #Ƀ±~2§p„ZæŽT¼¤0"Ñ”+¦QÄnšêo"a¡ª—ÈHLg2Û’FŒi?Ñ-Èî–ˆ¬&¬˜”þHª:°@™Õ“‰oˆL¡ó‰„åB±•+¦}RÀ5nS<º^$i¡×ËQé’ L‚i0™O4ý¤Ž+11»[êÀš$Ã¥6%ðÙJɧËW£ ám%j ‹­P—Ð~œ2iÇŠV3ñ3…i®jóûHÎq¤^È£ì~ÕåI í¡³°öؽè´ ~#⥄ËLÅ÷:û{ƒm2ôëS¶V$áJj9 KÒA2jäf»‚Fs„•™qhã^ø÷7‰‰*BµŽÑÊÌi{› PÐ?’’èúWÞÐß[±@¼|œnöš¬ë•³…Né“P/ é$|›lÓØŸÁÀájÎÚ'­68ê—«A½º7çd{-“IN JØg5B õ7yPý¦¯OL:4˜Xbm™Ñü¬ñ[~TÑ|,•i»‚VËï‘sŠxo:Ô8oDE ^¢3:ŒQ ² \‘ïàŸ\ëãç7Qç&ÌÖþžÍkk°áö;½=ù'gtõé<ù&ù °ô M LÅcÀpüâÔ;ZFÉÁÊõ¡îõŸ !ãÈ÷;ÊŠˆF;ÛŠÚkÙž¨Í'ænÕ^('Ê{FEì£BË=k‘ ÚÃIôþêoHìâzΓúÝj}}%Ûqà|n< a ™Â<[!ç×Äk,™©©kéóNöÕßð|ÿŒæÜü7ÐEÇ@‘ ¯Õ˜zã; SÔIŽ¤Û.9¨Onº¾_7ûâß ‘ŠÚ=‚=p^Þ‰f-?5²#rvDÿ$_ùS3ƒ1æÙ©fv+Š Y­_øÑdí!€È’kôPp¥ÈhæÜç íѼA9‡F@7–HŸïH±$ÑœmÂäà°éWNFÏ:SÓЀ0š±Í_Ï;„ƒ’ФSn´>T£‹*E·¬ º²PJ£sóNvÑ•î/‘5o úre¶ãCpŸPøâWi—ÈÎê€Ja?¼`"~÷rÓ¤€ô‹"Ò4Ar‡°$ê?Ÿ4åº R]f&læ£ÉŽŠ× Y×_j OH8 ð룵¥q2´,ê¬JŠ;‹æ1òý+Ç#0U/î›A¨896$š#^Ò¨–ƒRU’¹2éÞú½´¢AâÕ`t6€€[{ß蜶Nßî9kOlÔaþÃÜ›Õǘ_»ixâ¼úv“uVCÀ.ÞL®×wŸ)=pÊþ-n=eÄ \¤¸‹‘–¬7El`Ùg+•C!!̉¨MsÖ•zI1†¨sFÒ/´»D‰'éÑú×ÞxÏ){ƒAm†WμvñÉ+6}€Ã‘ô¶ Í“¯ ô[ÌåöœûNhÅÎÄ’ÈõÍÞ]í›õÍ þÔáÏ»TNzü5œúùâü0• ¨¾‹;&Lk‡ÿ‹5ö'ýÒì]ûÝ®FŸ=+ºÿåëRyÿ»»¹ƒ÷¿››Ûqvþ¼ÿý£ç?Ù]¿ÞZûÏÿÆÆúΟóÿ›v{?™DˆýÏÖææfÚÿ÷îæîŸúÄ¿óFçmóœï¨hÖãq©Ä_Ï8kJú?_´ŽÄÛúíõòùa×n¬?;ÜtÖÖ„ðl J¥æ‡³vçüâôM§ýæi©yÖ>l·ß5Î¥µµÆñûÆ]÷õEëøÈmtÝFç¾NC!ƒ­zàªKõ†ð€¶&@‘Pø hÅúµŽ[§ß5;|Åé¾wj/‚§¼ HÈPÈ Ù™Ré°q&ÕÎÂ?>NfN*<ò‘ /ÝN^·§0lüÞnºG­îáq£u¢¾C¡·‡w»g8Õ¥ÔÝ ¬¼NêõŸàÿÒ´`qòOBƒãT@KOtΟü(ìom*8÷¤ÿ”Ì^$¨}Ñ9l’ŒcÖ(S4É®ì_úyIa?ç»2sÉ&I«–œåŒ&“¤Tïs’¤mL†ÞN”úçQ”)5ìÿ« Òx'›bh‡g“ BÞä¥ÄWŸ…¦x& ²Ÿ•ñP6IÚå¤$=!ï?khÏxÓÜ¡SfEÙÂÒf*›¢¬•²IÊ¢¤ ³ØV€s¾ßtOÚGM`(Éiå[ú‹ûuûôøi°LîÖa>p·èw&qiÄwЧÄûš­Ý`”Þgëu²þ²øÎ÷†xw*œíßxwÊÖˆîVçf &x Ø‘'FŸa«$LßÔ—Ë$¾¶¾x×WáÔÎ\¡Ê2}û“'ûÓ½ñ L/ÿ ûïõÍ ý·ùìOýß?Ìÿß)Þ|î9bÖKΑςí±‰Š…8VI2•¬ÄÅ !ÒBÆ ”P:brŒÐØYçïîÙqãüM»sÒ-.D@G“ëN<99# ˜’bEþÄ ¿ïþgáoý.Z‡ßý¡þ€øÞ}–öÿ°»±õçþÿ#þi…üÏŸ£–üóÎ;ošÔþ^w^‡þhRucoêÀë‘?ª±”ï,tçAÎB30vÆ‹‡¸ Í€xQCN4Çah=@é ¹]Þ?hé“]ƒ~1¿ _Î)è—òúiî@K 2LáË0º%ã sDêÓ°|8§ ÒD˜Ú-‰7¸µdvg_äãßÌ)z8œŽ"´¬jëÛ³cG(û—¨K¨›èÅìW]'Ã):Sñ(%*ÄÇAÆó›r>Pƒ¼¤1À-·SÜëð¤‹BuSë5Ü|L¼»’8Œ¥&>:$õò/®“úèƒÕp¨çgÇ0œoRƼ„ò0Y¶ÈñòÒ㤪°íΓ9c¤3¹zZJƒSä{tºH|¹õس;+=_Sm)ó¶jQhW¨n##Òß5J`ŠX£pþÝ:ý¾qÜ:rÿç¼uTÅèxðùy×ÖÑÇýTÌ>§!OhÅs Wºm7¼À3Å›í'†"‘£Cá¨(õyÁ éA`|I4»ËÑ÷€°¥J… 5Rñ´¤³^OPέÓÓf‡»ÃË•çö¡ê™ {³»ºêà÷h«HéÈîï«GX¹üB¹Héô^¤üáq³Ñ¡âá%¦`ÀÕ’B  ¡•¤Å…Ä8·ZÒ«7l˜àpˆu&yTìWt^x¦s.â—¿5fµ>õogçGÕëC‹(â²Öv?ˆHÒ£}ó´}Ò<‘A¬g…—7Êvú-‡~ü– Õ^q ™Ó‹ãc,ãÐì¦(œr@<ÀyéœwÝÃÆỦÛmý£¹ï<}è˜$b8k¯xŠ ~Æ¡…A›†b%¯®9Ü/³ç2VÉ#jŒð³ÏÕjŸv𜆼ktßåµÃiݦ‘—Œ IõÈSY¯Œµ‹M¬ ç@…¹0¢¬SøèÒ!‰À4&ÃaE#±ä”^¯‰A¡óâƒzª2 9‘kVÎPàþøÒ˜N|•Ñc,öÈ…¢†¢Œé"ù:Aé 7ïp±ˆõØx˜ö4⨨ØË"jÌÓ§²BĪ@Q°XÑŒ9`’íú 6’_É@®ÕRk› f–¶5.¼ª)îû·eEœ\|“ÐqvHêã{I€‚I…V€Í"¹"2ÜÜt¯éØýx¸¡_½öŠŽkX?ûvVÁRÐl¥Òh^!‰~÷Sïrý2ƒEp ç‘ºîË96A‘˜êɃÈ*SÍÐÍpGUEøóM§jOX‰-,îHˆÚaoöç19õŽ…’^ñáEqHÛ.a67öÇ0È~ùÛ¼òªS†¬³ Oê~Î,ΧÅó˜ÞrJ–{„1ûÈðm:ÎP¥EL3©CbÎЩþ9A£Ô.—a9pš›ÝêÚÜó)^åùƒE;œ6šØ×ê}•â8ß,Üí#¹¹ ¨³ŠSsà1B®cR›ákÞ %Ëv•­¦pNUKŠ ¦}Þ(—èU_ž·øEItbÔTT){¦³Ö?Sã0¼¢°jdÕŠr®›€®éò1ÊõëŸÌ›c ;šÚÔÖž–½•³d…LDƒ¶é×æ¾bŸÄ”dgˆQFwÎdžÌä‰ -ÝáôÖóâ.CÑ÷RZŽ™ˆÑÇ×O貚-ÊUQ´B¾P׸Þ’x“ÐU^­‰Ü¦tã}à= rbúHâ_Ð`ª!›ThË×óçN¯+rkt£8µ/%ˆ™&}&=ˆ ˆò‚ìÆ6^Þ¥¨ZŽ‰;Â1çÂ-{ïQÒÅL|+Cü› (h˜NF—Tý=s¡¬vóºéá5›7áxºûSOƒ¢› u‰m*jhj•²{ËpÃÂRd«ƒfUÄP4+-8VJu%ÁCBOÙ`À•kÌoB1Ì•Š væà¢XT˜ß$d*²+„Ѫ¥eNF&:òKÑäË~‡c°˜\KÑ]„™¿Î%·>ù|“-ÈAéSGÆ<2}ƒ/ŠØëú31XâJ¦âXaº _4“8m†uï’ðÔ ”×û‘„ódŒçZSøw%âÔbòQˆÁ¤‚­€·ó¾é·«A%Ú ÞÓnŒé²ŽÝ‹‰£›šVÀ¯RêŸA®?-·Ql>ïtá5WBØD·¤i1ë6‹ êg1¿ÈÎw $_C’0‰ÏWçÊÿ/‘ÁJG;öÂæ* ?¢ìÚÃøƒúÃè]GºÄT÷> à # ¢se¼=CôB›TnDÜ ë.H\n†@E;Äl#ÄiãuvëÊÅ”³¥ ÿõ˜V¬x§PÖÈÂ(!Øw"‡à/ &E®†â^DfT?ÜFçíÆ}¡E±RuV¯û&‚§¨¢×îÇ’ùûñÁâÑOS>#co¨Ë¦\F%¼·‹¹¤*>¡Ÿºw©˜ŒzS° U¥åHPÿïŸø‘ý2güƒïÿ6·×·²÷›êÿÿGîÿ–¶ÈÜJC€íüyiøÿÐ¥¡ =¶Bf°I:¤/? ã¯É>žýLLE…v¿ÂÁ±ý# ú/½1ÌË(˜ñà5=t×%]>!5Û f¨È°zóþ•?Ûw8þÌ9w“šTœ†@÷EØž†Î~šI%WS{LäM¨1T»VÀ׈ԘÁJ\â}¨+XŸè>ŒjîAÉ7ªš/&œrRaÊÝ5³Z¾7žš ÍK=´±0z ¾a©æ»QÝ5æPY3˜’(.*Õ:êSySÖ­H=¾“œ+q0’ZÉkFžb…šj•³ÎóÚ¼%õFTbBdS^ƒ{¥³ºÞœÐ¥ÓÇÃúvÙQia2H…u>nÛHND Jú£?›02«]ÈZ`/ÓÅ»›¨Þ8g†ÐåÁΚÃ*åŠ*ú’¿âÛžíÞb®àQʺØ8¨ƒMZlj–ŠÔ(ëf3oPwÃñ@ŒtÛ90ÙÔ…ï)Þý‘’- #xâÔÌÑGãå\ŠeŠ¯Øuùúç5kˆêÇ0‘_¢¼ø©Î}} ~>´#E@2Û¾¨§™ÌVnÈ; g02›^ÊÄ`Š~pxÈÌQPï5ˆ1 Sx¤žºÇ—Uš»,byÁsÒ:}×:=ì@Þ½>þŽ˜™EÕ·Âþˆ y ç~’èDöOq­(º…*Ë<#Ê¡‚åæS±¬‰)wöœ\z!zQ\aQ¥=ÚåU§æ8WÔó.˜}%29ë´NÏÝ×ÇÃïÜãV÷ššx.®#ú£žÅ¼ ¢ª˜Gv:¿œ„“ —P£¡?òbgG¶M¬¥¹Kƒk¨‚ºó¦©±µÌñ[íŒÅ½5Î?. …|Ã'8kѱ÷JQd+aPó*QõžN“ü…” §8ñDög4»±?ÄÁŒ•ü…è£'°5ß´>œ4÷ðÀâ[‹¾ôÔ:ð1,ˆ/!³Òb·2‘€<ÙèÖÉ=|×hVˆ€Æ$Oj˜g*‘› æ‚Ù‰™ÌH`_ œñó¦j¥`ÈWœ{0ÀàûQ†!Z32é-g#w¹ízcÒ>‚#Ö%¢#㤌‰ŒAqžÅ¤Žôo‰"ÓĆÄàØÖ~ŒÞEY!Pj›¤(aCó¤àä/Xz¸fÀâ6ˆ^§zÝu~ûÍYf82Ë®5¥p>D˜CW µaÑ( [óCë¼lILÍ“1Ý2=pf–¼6RÎY,¯×1õZ‚ £¬‡+‰S««¹«(Ý1ôEÖÇçÃ3æZËj+yÁið°¹^r¶eå÷N¶‘ñã}ÔÕ '¾šî×ÿhvÚeþV]°CrÀ§¯¡†¨üÁSÿFA?lŸýP¦4øz|¡\K@Š(^^ªûÄŒu7zc!¥ P~,2þ/v„å›01-Š#vIÃŒ—õ¤%ÀÿÎúKó™–ÕZ»MðpÜÞepizËïç–06CjÕhB6r¦Ø/Ø´ùkmÿèB-Ãlg ÷A¦—÷žYà÷`L*ÿ®«pyêö}ßì¼nw›îqû­K§ò›ì‘µ¢ù ‘¾r ZX¸Mç1Uò\:#K)µÐF€…]ü:‹íò8ÂLC$[¸ŠÐ±C¸ã×îoÏG³U95½t¶ ¦s‰–Yù—«ã•sÒøæo—©*§˜uµv‡ ÊÎPóU^J&²½sFó¡Ï¢³Dêi8›FVNPmiìO„ó4œÎ§Êøô²]CÔó”Î…E&J7…’ð("Ô9ÁŽ¼²¦¨x‡>ŒÃi.oCÃÿtÍMC,Z™Oïæ@FâðJ#Ǫ³ˆŠ2Q” @.쪳è`F9ŸzÂXC*&(n„u¬(®ÚC°³¾©`7®Štòk IñR¢CÑP¸¡:ÅÌ´„‚KÓ¿…ÐS*fð3³V$ÔÍåò+ÀÊp»‡Â©HϘ3 7‰Ëçáå%êúÿ9ß:’8$kÚFåg¹40kþ-ìê³w礠 ¬B"S>€’£¨¢HÆ¡?s£ÑŒ•ƒ\d&]‚’³¼è;]Ó?Wüiè3,Ÿ·VÍZôÌŠ[47ê¬0ŒK½á‘P¥’¦ >©AR+$RÛG)`þkž`´Ì©'lÕµ*¤©pÊŒ9_`¤Q±grýõÅ8ç£Øž ¡HŠN*…äÊY•EÚØõÏÞ |ÃóÙ[Ácí„%Vô'¬gíìå¼p1?d)çUð uLV ­‰’Okƾ^)x…Ôbï—tlóuÅš9#äBÉ8cŠMž^þà¯Ý?&!ÝÐ Õ3ºþÌ…ò™»hTsÈVº­*ÇU^±àD¡+;ߪ}¹C8ýûiè©Oq^¿÷ ϨKŒ°¤Ú*0² zPª‰Ð¸XP#ö·…!—Ìj+4:0ߣ*µQyfžª²#¡ÛÏï¦èjI‡Òsb(Œɸæ›9ÎL—ù7~e+ÃHð©Ø²ÒýxT1ø®Àxž2¹–RŸË%=ÔÚýŸ‘}Ïî\x˜&4öåÑÓ EØÐè à ¸&böe¨ŒÕá~Zë.…~„òïÛ#(ϵÿLØÅê ŒFþ~+(lŸg¬5:E¢úŽãsY÷zóôÀa N U,€Æù–ŽswŠSœÐòÓ´Õé©‚™ Ô\Ùz‡Ôâ§O³ ‰Ü‘Àyu §µâô€ß¸ÒY Ö<ÖV±(^ÑŠõŠ¶úRHkª/ æU,$R4àPÙ1êÔ5J†Éd¹€ëŠ¤?pT“n?+Ñ,"hÄ1Ÿ"â?pëKÜÝBIîI_oaBõÕåÐVa8„¢ ‰xäMÅhFC¯ LC›p„†ØŒ}G )`‘ù‰*ØwFOŸšKé>WúœÅ_­”«ÐZ3Â,:gáLÀX>e‚[áeT“ëOÏ:£ùeåƒéÑUÒsí©q5tvq=ðWäe²›ÌQ{ÊXæÀ±WJÅb†ZÌ£Äå‰+DÓ'g×yš €ÆdMË(îÓÓƒû3®_®)o—3C‚s÷§zìÿCú¿ƒ›Ú°_úõ`ú‡êÿ®¯o¯gô7¶Ÿý©ÿûGüYÿÆ¿+ù·>j)òGãåoè‰Äãß¿•¤6(~ÓÏ+•0œÀk ×XY¸öÞ0ÞÈ!g¯Ùqì[/î¡"æ¡rÉfÄØsÎPd0|=‡Äó>}Zúžõöœ¿ÛÙxÛDù;FBú[é8è%{Níøñ¿¹µÚxØ/^Ž½!&´ÿ[7ùÿi<§ö¿Ž1ôëÿCÒîVFÿëÏýÿôÿµ±ñ§ÿ¯?Uù…*ÿ2ÚüvD+(Î(¹¡Ï; JX ÁZ£ÇÚ5ž ä“à—´3MõQáÃGK¸B¯s}ßöåõ]³yæ¾FqäÙy§[Aæ\&¡‹nNzÛiœ½«”¤»á\m —òèÈB8âg=9±FX,U¿i6ŽnÇíîE§é¾9n¼ÅèˆB¦{Î )ÄMõõë°¹v¿å`–Ùlõ5MÉÖeߥßgUêË@CpU–9¾-hQ%}!,IVì\Χ¤n!}~D9¸Œ½!›Ã*ÁyFY§9ö}â÷ª¸…øúC`ó}$ŠãùTÅóÒÚÙ¨st)܇S”¾ÎØ?îá_ù‹¾ô¤¹ÃLÍ3õ> •¥QÞª;aÄH#«ˆ²ÇTä=Šk :È È5™™×IÌ«kà'AL¦ˆ®v=0NƒâÑQVªSº,M ѹ5f™Vaئ*»Ç¡Yt¸VôYÂ)fè¥}`8ÚÈí`‚Nkµ9šËpì(ŒÀ‘(ÃòÄsPslpÝܱú®`‰E»ýqHžnW/û…¢ry…[ b,éÿ¥+[óáe€\{…*Ì•²±O€ߨ:˜ÔäpËÂ’N Š@ŽÉçiÇA“Þ4Ž»MVioœµÔ-neW3c/3®³äG‡Çîqp₦Vë!ݽʾPµgh€®HÚ/P¶$åZa• EÕXS¼qqjfÓý5GÀìåy碩ýñ1•KXNž³h3÷ƪ…/ðÃW}–ß­=|ƒ4h %ÎLXàsô?F‚o¢‘/´èM''>áGX> oø†.ø>’°ô}¬ ô`€âûä¬zŽt/âͤz¹Þ«ÆE JRñ=ÅbDÁÕLi´C)ñÂF÷¤ðÄh^zWô"Êœž(:òoèM”_päøº‘?W %ë]÷¸yúöü]• ÿÕ SfÛ‘mG¦‰Õü³Ï§ïÇÂ}WPŸ´¡j¬$òË_} Þ1‚£§h„1•N„ÆÊñ˜á|RJ)+4/Q­¨ýúïßµNºz”¤•Jò#þý¹^¥yà°Fqþ¼æ 渫’—n$þœŸw„}ÃUÙ 2Ã¥çÎœqïþÑ[ ÿÓ­@fÝÉh¤ÆcF¼¶ Z²<îr7÷E5»# < Ióð¼Lֱʸ½RIáHÃ^m•êeèÔpç·Ëò®¥àØaÿ#J¹?EQqo ŠÿW1‹ÿòÇòÿ›ë›[[Ùøëòÿÿöÿ;´ÿÏ‚yö0€y(àvF~qü8ŒÈU°eTãúYÈ!¹@æ¼A²¡^În xƒúvÂý[kÚÿSÜñÿ’牅¬cŠÂŽ“îûÖéa8{™ý¥ÇÓ°>z%9yè%ljÂ$U¾û}õ½~ë¾;êXî¥nF>ûåbó3j4‘•R5."o$Ž"ˇ\]]9—ŠIŒŸJ±‡ð1@³`‚ZÈ: \‰U„%»¦¶Ð§èôJMcÿV¸q§¢zDÏËn’®ªú»Ì– R?: àKFìÂC¼Óæ@>nëôMÛ¡P`õlK´W>8W嘻H¼ Õ¡\º²˜%½+ÉMØc2Õ¬D¢t¬ˆ{gÑ€»1O˜A“@˜QcukáNHÌ:åŠð¿ :ŽÉ¾ˆ8 9"œ2ŠÄD…k²€¹jt³hÅôÐ@^î¡h%)5ËúC¦8íZêpI‡Ý¥Š]¬X[j§ rÑ lY.‡#ཉ2µ¯’_™„#+H[÷õñwgç¤Ãøõ#ß8®)´ß~C8/^'¯8ov¡žæ‡óNƒß2ZRëióÙ¾ úì GnBîºËÀÃ&ÞÿŸ]5jIÁBTù‘jsÏÛ.i&•“_+µŸ Róô(ÎV{…Íú©T«ÊÁ<·yA(#ôr¢ëž«Õa:µ¤G±\g9òý”Mê×6r“¡íْْ‰>“Ù`ôI:†0×uß·^º®%Ç…#µbÅù©$gY&½;»ø`åmuZv¬/íî› ©ˆ ¹,ÉGí“ru–ᤌ‰Br›ÍS&›ÌÉùXnË~#)ò–…Ï0°›mcÜBež´W¸±ì#\D/ôë6º”RÅ X7ö ©¼ÐâÔÂ!<ó®ü)Çä¥* †uÓT{Æáqc#0lÄk¡‰ ÇŠ7HCÈ°Ù¹PD­P ’Š¨~ U>‹{>‹Í1H9¬$Œˆ§s½ð¬xo»Ú¡¦‰cë­Šó€’+WŒÌ€ÖCª1þl (7h/(£ Õ—GrRšÀ×q†¥¶gÙr[ öÀðÁÈú’öqU¦›·p™F0•‘hMÖÅß%q/+TZä=o„$âöo#¾ú¸€%Ò§º •Yc ¾¼2 ͤƒÿpŸ¤ŸW‘þ[…ÿþü¶zñBZ¢…m9!õÜS¸KZ85åB²¶ÝîYãPØCö„ ®Óü¾Ù8vÏÚ0ÍNçÓFp†Ð­ãƒ–ȬJKÕ:Í7GYö ¤¼mu¡Êli,£òè§ís—d‹\œB¡f§ |ßѾXW4áíéIóôóoèy|çÏc¡ÞŒÁáø¤L·ˆƒÙàƒ6ÁP-{v°Ã°Ì’H„'ÀĈMî/kÈú®‡÷ˆ C+Ž˜žAÚ¹fè4nFwÉüaµ"·Z¨œìV=)Íc&w3Å_I* ;†6œ ­bX;G m[Pë¥kH¡ª–Ç¥$”‡6HP¥W˵$c@û(5ŒYwÄöÆÐp{Ô‹Ò¬D]>õ[Gã¾ÍØ©Ý>Ïu@”OþÈÊ+ª©O¤p>©{H³I§gÛTK§ç5ñ]³q–"š}‹ˆËEè>4Å.«ç 7|¡O&`âÐ ÓЊ™+‹÷ŸúxÐ{qÀ‡^CJ»`óˆ6Oäìu‹ írcõºÐâYnvq° 5xñ†?—Ínž˜L9P\ŽÁl–ý°‚1 Èæ5A¬¨,û¹žš•èlfùæÀ1*ÝÏدËH wy–r¤!¼iþ^u|{~LÑ쳦ðÔW¶º¾QßY5ëLé0ÜEd¨‚WîI5 JݹÌÊ þ`ZÕ6¶JRS†=)#…JÚ¿yyåž²ÇvŠHfбäøÝŠiBÉÅfûV£ÌY{Ie3¸Ë¶@Ê1¿²ç¾vàØ“þ1+r(4²€Ì€µ¿p«MkïC!³Èæ‡íG6@Ïß|&ší´‡º}¡c‘äwpï¦WÈ2…ñ•)¼«Á™„é¯íYÞt5¦Bʶʡlœh?¼ÀäL˜E²šžq LÐÿ– ±ti§\è‹•‚„i”Ú…‚/;È燠ªó-ûrû–TÙ·Ï@“†$i3òÅ~¦:ÒM„”Evµ"¦¼íaj… ·íÁ_Õ,)ó¥j= Méq å%{Î!9¤]ÊÅrÍÈôËëHî:ðœoÐ<÷0yO¶ŒïWªN À³Ýr¶ý¤ •¡Fölwfý$ ß~?MÑÅ{4í-ÓÉ­¤ùö¾:‚©²K£š–¬ÃænTB&Ò0jRÀc\`<¤>›FZPŸ<¢Çc]в\4µîå±í]ùš%šs†ÑîgZ¾ó\‡3w$âØZƽÅØÄX¹Žð\º GÄ”Âh;ÍN§ÝÙs.NYñvh·}Ñ9l~ ÿîI¹Ì5 Ó(Ó óž‰Fß„ˆN¼´© IÎ`{I„¿FÍ„| {j’’Ã{ÝK´./ÝLŸ2ªNtú7ì§3qŠ.s_uÿï=µ’“œ‰Ÿ¦«ðïp&šÉUy¡Ñ:“8Û.nœ.f)Í;• {›ê§tžß¡1O¬%wM—aä¢Bte±{HÀˆ½‡šQî9ù~HWrÒ¿v`­Ê¬ºæ*ÇHßÞØW4|y#¯@;ín·ÙuñÂÜoüª.`H€-¬ÉñZî©ÁÊÁ Þv‹¶QQW\½)ZetÊ>þHŠl_n³Ÿ¾H_wJeÇq%`™‰“ ]ÚòÅ Z€¶B½dÓõ;æH‡c4,Å™:S²q}³)t"ÅýfU]XJe¹‹Ó‹nó蓼³º@•ˆ´˜Î')÷:`¶¸]LÝ ¦Tãô*¸5/0-éx¸_—»¨éç¶_ÿfíÛoóæ½RÙ7D«©{=ëB#º÷6C Ý,ñ£Ÿ²Ú(‚?Ì….D•ëÑfæZ—ÆL±ña?7S0Uã^“#"_±#·&¼ØN~Ý/JÆH|9·Ë&Ûà,ºZÖNW̆Û>ñcµš@#]œ5Ü‹3}'ÁÂ3÷Ѳf{…ù¸`Óî_,…û'³sªy{`™í“³M²\V®J½©ðnòZE{½JÍ”ÛSÖ™Ö@Îá>.£ø“«¾¡‘ Ъáh×m9TGëŸâ1Erˆöw\Ã#Pjöz@«ì[¶%)…4ÑÆŒ‚ŽÎ6T ê ×3¶ö½Ì’Vúö]KïCä%hZ|ê;ÈýÔÒîxÅ0LöÀ^©åoíò•JÆ+¥™¾XÛcéj.sªÑv'ؽô6æn,«$’©Þ„ CT|A£¨‚B\aáϪŸÕVZ OEu ]—J¡ÃšûµQĦ¸hvÞóÝÙ]ä»—Ó¼oɆf>¢Ç¯Ü_ÂÌ F[<ü†4¯¥—ÂUn‹Iùšz9eì#¸·Ís·ýÎ=n6O/Nh8+0áÐ2ÞŒ¬H„¯…Kƒ­7.Ü”,SË·çÖ Û'' ·õ&7…‘™L<˜‘*²-%‹ £ÜvÍî,ÌûêÑ%„²Ž’byÎh>ñ¦5´"Öy ýH5H0)Ô¬i\O{%Š˜MX×g‘˜”\qjaurÁÐÝLÑœv° D§©x't)æÝŠGÖ•ø/ü‚WüØQÃfEÎ0¾õæ——~ü#€>ÿá¬é5»‡4èA„ýs†Æl¹GíÓs÷]ûøÈå“Ð"Í»wºR î¦U§ î¤ Æ/Ågˆ1³¸¬ù”Öˆr>Ï*–5ò<\^ìüòIŠ(Ôˆ'‹M.Ë8Ê¿ˆ6 C¬‘@¨Vl}_÷õÁ¢­.|«)In8JÝ#J¶HÙbLxRSJ­JíÕ¿íû‘X®Ù€G”Crkª¾l Ž¢Eõ³Ú¨\ÜÓJù—ªcdôB\P2纈\ò(ª¡2ÁS„Ì‘£ë˜÷$:ázì=è‘aeÑ­ˆvÚîëU ‹Ó—e…*†heËüÈð“'#Ÿ·OZ‡vø!«(5¡±  v+òà­¤#Mešcz¨U•vÏ/^R9-î²Ìqß0æ-@…1ÊÎIºÀ—õh©JZDd’‘L…,H¬_éù9H b”¡¼è—y0Cåǘ£Ë•د׊Æ&AÒ¯÷+õœíöÑôõHú-"’Š”T|ðM„‘sö¾TWòOã`‡¾Ï«+gÅ)Ž‡EZSñ–h¨(¿&ô·•K¹¬­VóŽÿ)ïù&Qy_HŸ¢KŸ1v…ˆ°Îƒo|„¬ß~3¾­° ýÿ‚ÁÌD;QA8û¨»mŸ5UÌ`6F óìK„Œ»‡p)ÖZ‰ò}•¶`q,Œf§:{œà‚¯jôB£‹‚˘áyUPLĪôy´AíD¬ÚÍ–77^‚úÞ ׊”’.`ÿÓ©¤\êWTKãkʇ&ÉPªZ/§qÊyí¶¦ÔL )êß•Ô5zx&sÒv´v[ù[së™æ/&£.Dœ cå„-Q·0±3Eg fl´òKÑ…WU#ä7€Üòš:»Õ¼ILá‡rž@È©™’ŸÊ²ØyQw$âú3ûÀS“™ŠóR]|`8¿²Ü^"9/æcÈëDÓ>ùiý Âhžœÿ ýµR6rÑ¿LÙå\ž¯i2©•§cÛ-@„é°T$~$ŒJþdĨ„‚þºå–³òKïûé%t1–/Œgtþý1íªI›†xñÌU̽kÇ.&I#âÛ«‹ÌC¦ºœº5zÈÙó;¾/Mœ *Ñ¿¾™ó‘ÂYÙ0’ Oè})Ê’ÃGÃIu°«™{žðfÓäP^¨Óì4”sI …ú…L©–¡’¤zËì¾+4ëL×"!"—ËílÙRxZ®á‹FÍÐ×xàøíi¶Fà‘fŽ¨WÍŽmÖ÷®ñ=0çÇÜ¡+FùTQÎ/:§X²ãž5:ÍÓs¶ÕS¦‚ƒñeJ–‚¸0Óø€BÐ}¼PdÙ²7°o˜V“»IÄ—¬¨Iñ‘)ÏŒ£1F04¥‰Ç°7 öŽé—¥û)„þ-g¦îðc}0ÜdŠ±E¾f†Ñ¬0Š:¢-‡´/ƒ¾pˆ!@\¯#E>5ÄŒªL,ÌÂü€ŒãqÞÈ…©8ÿ2×N82ÕŽÆ_ÔØÃäž/Ê0Êùtχ&(±ï—+u²¸dCôHBÁ™¡weÞ‡Šæ‘÷“Ü2©^{«ë¥—àºK¯üü5{°‡ø/(Œã‚eËÇçL¯ $åÄðâDÑŽ`Jo¡Ø¦k`e9‰©˜ºw2oѾÎ;ÌR NE9œ‚PânWسï˜Ëy—ë2³ÐSÍ®,íÖ©¤øV=†.ŒÖÓåbDOc¿-µu,LiX9‹ëóf,©ç{ž0œb ¼SpŸÁÔˆA€îåFE¤Ô¯œ°*-Ó·‡YíÒ‡ienAÃͧ¹3êÙÅûN@ÈÙ}Ÿ‚jõ‚0VLYEXÒ“¸‡(eˆE÷vŸ²þ¿@µ¦.zvB?i:Yñ¥ˆ¾OØünš?…µ÷Ééøò'»<’Y<˜Gå”%Õ—¼a è;;¦à¾,Oª‘¶À_èQ‘âóØ÷®*ùÖ±¢é\²çÛŽÞóŸOÅÝ 6vMIXhgÃb$˽±?-“b£ðeE>°ŠvPnÂs)ÝÃÂOº~J¨èõ™LæÚ'Í“| 9£¡Žóú°}ö¶°JM«J¦BÚjÑÈ~ÊÄO¿ÈÌ>‚ªYþÔþ}ŽtB3˜r7 §5ÚÒ,îÀáÆâ¯Ø} µX€~`î™BÈK!{þÓó(¦ãÛð‚*í¨›“7¹ú~¼ÓüŸ‹V§é¾?ì]œ™qop ë£W2.ÚM?ÁÁ­,$¨z]Ë.(¯WˆÊ÷éèa1- 0YËrÓ嶬`üd…ƒÛ! e«¾i‹§»`Âó§ÜÖ*/ämáÔ<Ûütf®?ýôWÞÊQ!üw¡èî#ì`)ï»_”*°kû“¯6éƒG÷e,}ѷಯhÁ--z1+Xú÷^I¹•þ¹ ,A­–“³¨¤4p*š7¹€BÙ‰ƒPô:<F»ÿÀIÚÚLé¥ 9ë·ßô|ÿ2_é(S¾!|÷°¼~Û|óº #Ò” ÒJF÷(Ú‘RŒdál'Ú‹òš©œÂŠå˜rºfzÙT®ÖôÔš2© ®B{¤Ôt E¤ÎzÐèùR>ÀÚ¾65 ‹|Ñ” ¯IÉP8)§ªeßDÎÍZ˜²\¥M±z°ÎÜ\wm|S­Õv$ÀÊø)ß\Ùà© D (à©P¦<x-è ¼ZÃÔrMkÔmøí°#,¤Ì@Ls…Œbó{qCSLàuæÉøÎ ÀPþkE+¦ç2½‘¡ƒ^±MÑÄ%ß”t/ã Â9ÚxÐüZf>¹s{”ß|© ¬îZ Z»lã?–²Oð’ö :N"=º2ºš¦-v(“ŠÙÉ‚©$,ÕGnì3Þì]gr²ÊqñbÞ„—Ø®Ò!#Ö€Àh½;튪Ì6{´v8a c/¤¦VKd…˜4²Üæ Ja¹ÛŧXƒB¯ `7Š€§m;SGcº£yf»–ë[ÓS$ÔO³Ÿrˆa4’kŽ¥H®€˜"祀Ʈ"öšÎy‚ŸS¥O°<ëeU è GHyxbÉŽÕÊJJÛ÷# Í%Š ø£ûü]ÎÊ®¥um^öU”±ÙÀÐåØ'õÖ” /3âŒÞêÇwõb¯rg6|Ô¦ÜÃ䟤Æðäo¢ƒ{¶c1Èc¥ÛX`‹uŸ§§D¥ðPJb¶äA,v1pjÉÌ%lVólt|aòª³´¦ž&}RÐ…·;QŠÖyÀ…€‰c‰ÊžZƉ¤ö<Œ¥‰î â-J¹Á³xö?\Mùaá²4¡œÊ/IÞC®¤×Ñ'‘†'D&&܈ä&E7xrg ¹ç“’ñè&,p `J5ò¯Êò—iÚyRå:q(ªè~ø‹ÜL6¡Œ,xŸ†Â*Ò<û2ô µ°ÐkÄ=þ¤F™s—q÷ *$TÂ8„úŸ­c0Ž™sã‘|ÀrYË;ºÓÊYÓGEã(BXšZår®<‰)‹FakKƒñ%Á•o{¦&U>"·¼z¥\ >Pq]j«…±+"|‚³DBWÒY„uº#É?ažG9Tq±ÿ™ø÷¢†B'4:È—ñASÐÂû6ñ£p÷ú Y8JK6Åž‘\—1éj2ºïB‹<"*v~ÇŽ…ëoÉk™GEqã¨íü•›/‘–ÀCžìÔF>EþU.ÌT4Á>9x¦aìO2OœiÐÇ؃:†®í>×5òÇ®4š‹ÂÒÚÌl’Ó/Ž¡É0à •=ß5OüËùX\’÷x‡á•ã È)Ÿj~œcPEím|p»'î»æ‘vg|t6×%]ñÿËcü£‘[¹y•4˜‚théõýŒ©¸7È 2| ¿eý“X^½$E)sW´×³7­'Í=çLJPE¦ÑÞç(øƒZJjk¨nº 2újö;+-÷(º£/­‘$_ÏOŸš9öM‰·'¬…ðÚ/Çá éó_ù~DÓyÄ°¶ €µTT,èdø°FÇóD0ân˜úKù"+~4]F!Gõƒu8F§ƇEþûÒv÷†½¹£—L°œ—‘ÜgnÂtÿ½1\ôp¿JáÝ7sµŒˆ'É^šY¯hNZ bÍx:ŽÅæ öD®icá?WDä>'—“¿—›—}òǾÉÃg1v¾œS„ƒ°+9éšW5ê»öc§”ýR¸€×ûüÅ5&ÎÈ¥&H  ôFsECL]Ãh¬;66‰¢1¹¦Ç˜®ØÚÓ ~ê3áã `¹¦—HYÄDõÆWÎê¨']5æ“É]ZÏMRIºHFØ8RñǤŽÉ¯¶ÓCé[$÷‚™; M'•Ð‚ÕhLÄ^AÃuJN£Ðo¬Þù•ÃN[S!ž±¸/“ŠD&,姥¦\v”Hwˆ¶Óq8Žh*q|hyÞÌÀNÜÞ&|ïiß=Ü)튎ó>=pPPè¾n»í7oºÀL S-è÷Sû»Œ«ÈÅ‚Â…A%v¹*`U„Èü(Ž¶O«ÞÍD‹ï]ì[óÜËJÿ?jªGz«”Îû•Y—GVíV˜v/öÅ&’ñˆ-'UxÜ,rû¯ ׄh£w§-¾ê¹A \ÏØ®^8¯\BþowÀÓ5…Ãj<++Ú=¥>Ì»ì«É2BäÀô(19px ~û«!zUÈZ‡I9gwW©2Ó? âa vª2£üXÑ'„i©o¦`Ý©ã–VG´Cq5(Š]‰šíPVXî”›½vÊ«Ê?4¢åo‘¶ÀÕ«:‡/ŠEχÅ+µ*aN'?º@œ"›».4­ é{)ÑEUâj‚‡ÀÆOe„°ÈÉÊë-¹´Sxù D^„y²÷K\<O ¯soÒÊþÌ•8CÛ(H8›d¢sXa  0ûwý±us˜ÚÎÊé9¶¡ÂÐÈ fͻĿtñˆŒIÐt K®yØG_—̘¦0sÁ¨ÎHÓ§œˆ9}Ó8îò¤ÚÒ…ŠŽu/v»¸¹/x½Ôu8m[QiK%qâ2#óSE½›ñ¶ÙÑTì^N-y:|EåÁ6ÜÏ1»F›VWÀ-çB¼œÊØËÂI²I†Ž–ƒ§,}i“¥ËUr¬„—霕(žIéŠtbˆ›òë_\s®Ÿ<-7³®"è#P4Â5zNŽ$¤òÄd$QÒß)‘fÒóÛ`xñN”M²9iˆ¯ô…™ˆò bÙHgâ2ú™Øö.N±0.ß=«P,†¨UÏi0½a…‰ê[9ØUË-«þñ]vÖôÐÞ†LrÌ+5|Ê—ú³$j3¡F¸Ë’;G5—·€ðƒ Ìb¹°Ò=«8—^0†æ¢–ÎðÛoN|²ÊÉÝ^•2óf.‘hµ n†ŽÐöŵÌåرé9jhrˆÄ:ÏFdSÐçae}, HÄhЀçnðÉfƒ¡+ÚaéÁúƒ€«a1,Åz%g\ùWíHÑœò3Ò.j4SNÇ §ÙÃ26¨B£Y¦š‰˜›OÙøf`‰ÔM×vo¥ÛñõAñú^ &xDË'\AŽÐâŒôÕÙ€‚µÀ Tö‹½®‡=¨†Ä\—°¼ÇF3 ‡‡ÉQ³«Nî(›ò¦ñÃQÌÉ«÷¤ÖÈÄh6+[75CLÈë†lr9ïu¹¦ô€#÷ä[€!œ»~¼Ôδh—ÏÃ_]ü‰+þ¸B­œÿÒP ø_=Ò-ýD4ò_OæÓX†œþ¥ü‰R†RŒÅóÃ*Fþ÷#–lc?·ü/G/ÂûUâ/ÿD/¢—‡¡cñüÇЋцÿýè%ÛØÿ2ôb\8do>Ý2<ö3qÆ=¹“(ñÁ7¼P¢ùËÚX5 /Q†‰AQÕ–x^õùóßïÿoد=«ïÖ××N`¿^c¿îM¾tëðoww7žíl™¿ø¸õlk÷/›ÏvàëÖúÎî_Ö76667ÿâüW $wf]ýþ—ü{ä†Ñ] G3ÀÉgãÅ‹µM˜¼pêÀ!ô΃£¶5í×ÆxìPÆoËüøÚÔKJœów­®sÒ8ovZcžÏ:íï[GÍ#§Ñ…תó¾uþÎi¼î¶/ΛÇ?8§mç}£Óiœžÿà4?œušÝ.ic¶;}n5êŽÓ8ýÁ¹è6^ãÜù¡}ÑqÚïON«ûW{æÇ“ IðV-HH¿š<Œ½©p3ƒÑØ=ÇÐõ5-<¢x‘Ž—ËÑ<ŽBÒ‚…´ë`à ‘^x>jfAßgÝ@^ê'  ª ÐÀOêv+ðÂ/”Î7uý"ÿRSÆRêÍg>çÈjn@‘ D‹«kÉF°Š‹'ÒXDÕxã%IÕ$Ò›ÌÀPÜ%Ð}5ñ ¨Gôh; G#†‹yóYH·™dô@w’ŽBÁ”Ë ••RFì3)‘`˺ҫ¬{ÜzÍúù]·}†qû¯Z.ˆ›xw=ßµ€ýM»}P•ý¥Ô8:À7N0ÀØ5œ7»ç4€¸N/ƒ!tFêqZCc t÷¨qÞÀɃ›Ú°_ú8 ‡Î1­«;x®É¥L§žàjRc¯k£Û:}{ÜtÔk¿þ{‰Rܱçv·baoÏbo ò÷K´Œ{j¥æ”åiƒ‘î£êi½Ï ðÛâôjœÌà‘%™Oxô€üc.9¸›ºãÐÀÉ8À#Ô2‡‘?¥ç‰Ò‹¼,;A¥ÛÁ‡‰¬–né)¾?n<ÃR®×™ú7®h,ÃA…®‰‡`ÂDÀ‹úÀê ö¹ßùìúX·¬«êúZ –Œ=¤Qù8r6Ž…‚×®éW«u§¨Mh`ÅF÷äÁºÉ]Ë;©w%xD¬Œ~yÆŽŽ¡ù]¶‚ãÈŸêÈLê•<Žá¤»¤“i:¿åy‚ó 6Ò½žÈˆ@jùHLL¯üÁžZ¦£#<‘¼Á6`ò7À‡f#*ð~q ‹éH¾c@Ÿ4°£æYóô¨yzHWƒ4ª;’çÓã2!4w< J†Ç°âÔDŸj|ncokoÝ©MÚòYh1gÌowÛMШ%ö"-nT@‚*òb´7xª«~žú³^2Щ2{2Ÿ†É¶ñ½DøáéS˜,‘Ò¸€ÊáÙñEÿ+<úQ„gBÎ9Ä'Àô.æ•ä‘g‚È)ÛÃ"’û}+]M|}MRVºš©û§D­bA·.ïƒd$ŽkqB$›ÁeW™&ZAÃiÌ™€ì˜TwÔÒ8íÓ£ ‰ÇB" Dcɺ›€ˆ§?ö)0êì†ÌÔSg©’(¢9=ILe‰È¨dçÿ†rzù¥èåû¾Ùé´;’8²2Ü@ìÑF ¹4ID£B6äåØ6É^Ô‚õ5&@pã×jþI­Ú@Bý»L|ÿŠìØxŽ…!”¡Ö;îºÔžVûˆæá9lÛGË2oÅÙSk*Šƒkh¬*n@}”“„BÝkHù©ô('q4ê`d¬dëÅJÂ.ŠðÄûLRÛå]AŒÁ^ŒÃ$¿Þœ³=ÓruHæBÈ9äÒÍ$bfD+¾&Öt Ìó’x ¼ƒüoH‹± ¬ÄL³’Àð k‹,IHÿžfЩ½ªµ3bé€kŽœGcTÕäQŽõ][qpëüÓKžI^ÑòBdÓZGg“‹bdðjââì¬Ý9oÖÃ$üÚ>Ã=„ô°Ð@Î$È–ÔnÑÅŸÀŒk¸k¸oÄž¯'õq¸Wúêqùøü°}rÖ:nÒa¼Þw¿„ìÝeçQ‘1Ž`Уæ›.=Ë1#Œ9÷äà1 ƒ ³ /Jü6ÚÎD3§vT¯×¿b¡2yæW˜ði!÷ÒèbU®çð°Ñåmÿ÷=~&^HÁ"D<–Á*3¡ ÈQ6S-Añ ¸xÝ ΰÐ ì“£¡#Mà‚$ -…Âð„>iÖÿç¢uøaK‰À°(Ù{Û>?|×ØC„ôÛ  Á—&’ã{"Ñò“T¯]¤æÞÀ,9§çú™OÏvwS:;ìÔ$X¬ÃvJR‡æ8Í“é’êàUítƒ!zÎ{³bÜ0€-ëÉH”†–Ó"AÞZü4@Q²*™2©‡Ø ´(Oê³[ ´|xZ³?â@3[‹¸Q·p1@£MÍs.3o(IÖÐn„°(äC&‰¿ûýV½—D|(žF}…ÙsIŽ¡²&þì_“È©ŒÊ`Þ5›hçƒi†¯ßîB¿5pØé³ò×änÒ ¼éÚpö§ÂŽÇ3?Qp#œý†¸:ç èà8 ‘LÃ3@Ìb-Ù]¿ÞZë.òÃúÆdËdbW siBÖPãW2IyiÔŸ‚²4<®:9Sú¼˜$×À÷0—Wä, è¯‹X½%ÛªMùöô‚ $âù˜¥_ð†ç9Пâ&èT”BŽ½3-9ŒýIHaÝÂu4.XõÊD³ `YHx\¼ (ö¥óêñßœ}Ž»»·Ï·–ñÄ©A–¿íâ.I:3a©$Œò»†̼Qè¯ù°ÚüG{À9›Ï´Ûá»Æ(rú줄 /Ø•›¿³¨»‹îÜ„0ÅCd7uÞ­]| A¤OÖ¤QîÁ âëà®*=àþÇÀnìýÏúÎîîFêþþîüyÿóÇÜÿ¨3 wà{XeáM'ÞÀÃÛ“iÎðÕ/&då D+=rªEð¬í•)íêiH÷¼(ˆ[!èa4 &ä:ÉàÛ…„ú® è·MoK¥“€,º8øð|·„¿Ëü¡RúZ9ÉŸÎHŠ„¨ýñ2v H`û$-qø€HÐK(4}~‰[HÉáhÞ÷À«mÂz$2aß‹}‰UƒÙ« y“!ÎŒåðLÜ ²r¢¾°)u@Eo€0kv÷ŒG§Žú#„ëQê,I÷@H,1A óðY‰4ñ…$‡ô ™r|ÒBþ.¤Œø"å”23 !#>+Ù(¾(±'¾(Ù$¾HY)å’ò'ªš¬„ŒT@ SñE‰ñEÉ/ñEp¡Ò-=ÓYò“:KàS©É{b…Ôý[FÄ?nÆgüH€à(lªˆHì~ië>-Dz"R™ž®:*»¥nŽÐ“6 ÏZÀÔžµé± ßI9ãÜ=:>†÷°ÄWóð¢ÓD•£æY§yØ8o:WáÌ[{Â/µ·.:öŸh,*£%˸º*|JýDˆí’§ÜOâ0ÿIó´9)6Cû“ÉÐÙÒü² ÌÐó“"ÁTjènöËV>í‰,M†”J(Ç z{Žèué+xsÖN‡ïZ§Í½`ëù®³ÔÅçSÙðn ¯‹nG Åé¹Ó=úŽi\ȶµiº.‚X\Š{©‘utéÑWò2„u}C!eÃøŠ á+mÊ 8åüšžÈ˜Ñl ¯^^LB¼À‚1‹Å)ŠMÄ…¤¸›E ·òö¢µâ /€@MBÄÛ ºy¼ÈAÞÄÁÌOäë8•`WDO±Wáp%}ó)­\õ-$*ß‘°†ÂöÈ~Õq ð;[ÒÕŒ¾]ÃD çØ5’Zîmlm¬?Ûtj8]°˜åN7Fš !‰_у®¦6…¢eÀ'{”J}¸Ð¸zŒ»ÁúÜãWýëüꥣŽg­}q¾—)Ï5p{ŒR­/”ÑÚ‡DUŽ¬W7"YO¶`ú[2Hpõ§Z±—S4î/¦,&ÔK<½¦;›[ ‰Š‘Zf5o˜yéì™ ³^2°¹h3þé%ýDþÁƒ!;–ţ뤧I,“‡¯ÅÝ­çۼ͓çh«±ÈëÈsÏÄ$ü¶³Ê ÿíðG_‘>Œú` ‚Õ9J…ô^“…¹læ»c–+*E½!ßeÏ\('êF­?'‡z̺D(”Ü(Òr hô•+檖!XHîŠAr3¬H4‰Ìç3ô>ë ˆ8å0‚HÝÕb‰ÕJ& ±§{„ó²p ¿ÄŠ2붫Î.ßKÿO_aÿååÿ6wžmî¤ù¿g϶þäÿþˆk«%gÕÐÜxñüyÿ¾pÞyÓ¤ö÷ºó:ôG“ªÓÓ¯G>ìÈÄ.%47jðg…‚ü8¼Eô…±¼¡ÊÕt¨þ/¤A–W!äš?Y‰ÐYýrZ„v;>S=¼!=B´áø$EBá2G°4+™[³#õe2a}ôJ²jœ´Þ6H›Œ\î¸îÛÓ‹C×e×5²Ô)£Wfœ •„¨ ú·ûC‘Å dBâ®m‡ApÝ“÷ÍÎw]×­ØYÏÚðýì.>„÷Óöé÷íãÆy •šÎ:îaû‡%å•#ŠúÊv!1 C¬¨QÎ0Š“sý¼¯l`:[µÎÖ›E|Dk<\p€rë²ÞÈ——LÓÉПud†²Ìj—#׉ÑÀ¶“Òçßتbjí6¿Ø¤=Ëâ5 Õ~áöiËÐfÃÎæÉèÄëëƱS5³v_±†AÏÔ ùauó[êÏ~a(ÜI€¤§O+¥¯´Ô.‡/©Ó4 ·f ç“Ýçß ?bé9¸§«É¼WÇÁ~´]M¢ü±¨56ú,ÃC®,òGù8Ÿb¸QV^C6«å$âÎü+‰ó:cçßz`þíûó³ *çk×E`8-{»—Øܤ¢]»¾Œú½Wè¼rìœãí—ü.|=âQYuýØóïlySíÛÕíK·1¯¶«P\ËWAäx;N™/s’J[W¦FHÇMYŸ¡96Q~OÏÆà³1xàl ¶˜çùw˜ÿÙrù½Áà¾uÜŠùcã ö´«RÏø„ñ½ÆóœÃôOØ=kt-·„­ÆîvEzüüžN±=¬2ÒWøór Áee÷¥š6tD-F‹7 2SïaUQhØNí˘=8jgÕJ ê^{cÅ@‡è˪Ãd)N|e÷EºÜŒÑg´ Ø¤²CuPNˈé›Ì²¿D& ük?¾Ci2ÀÑʤJîŽ;–±€7®Jÿg¸yÄ~çÍÛŽŒ½º³5š&†÷â´õ¡†–UTåö3ö™±¼¢p¤ö˃¹ôˆ”½œwï›îÙE÷Ûi¾íÚj_¢‡J®hR!UŽÏ\§! Á$b?Ŭ!—$Ç@URýv0ÉGÚÆVîœgutès]dO¢ÙvhÄSÌô()“2‚½cFD•©=@³-5+åDŠ“­çÓ&ÞÖöiM†Ò«{jábãö½ ~G•!³^ï¯^eåz !~ºÙÊAHrZ Äâ$ÏøÁ{IƒZfp¹F&Všè)šû™2ìçŸ)ê¢Ê$(oŽª3X§ 0Ø åÍч˜„âUazÄV´±† «©¼„Ã/€A¿]¿Ý®~“D+•}£µÃQ‰MÓÀ{òþI€UA`ô1¸k î+†ŸUtëÓ‹nzÑO/ºû ¢èé‹ `4fžÿvÐE³¾Á§íàÓÇvðéc;øô±ì~zÑgKM—b¢p/ €§òŽRñ|Ž!=Æ Rþk¹áì©4Yà7c”©ºÍŠÕ•¢l[Ã9½£ùÞn£{XJÑ=‡ÞÔr!(Ü$âQ‹gѺSûî_þ,;'u§ìmH2Õnpq[¶í¶¤ƒ0ÛY®§»•Ü}³`—@:Znh¶–˶½\¶åzy´»\¶g•tL‚Ü%ö S›ä2Ú]ña~þ®uú{(#Š àšE†¶"”¾ô?IÆC"Ññ™ ‹¸)ûHÁÉj­Dý;¿€Þ¿ ®§àõ6SasíÔ­…©Û™ÔýÏc‹ë,lç`a;Û Sw¦î.L}–I-àÝö5ÇVωôûÑ^‰irYÍ-êÚ…÷hc›Â»‡®·Œ(&ÚqQÛÔæµ¹ÊGNŠï´yѯ3 ƒt5®:dוÚÂÃk!ÊØì%j(™¬“Ø’™]‰<깊º’´[Ð+GÈQX!• ™õ‡ðÄî]ú: …ÄK’¹Ÿ| µmhrr9,SjûõÂ| {Üú®‰£eÌÁL–‹ãõ´í¾mž¶OÏ›ÎÓ“­ ‡á›aÝv×ýà~ßìt[íSc¡O–÷Í#Œ)°±¾»’ɶ±îî®®I\«Ût—¬Í)zÀíŒ[æha¶‘/“G­n¥¤SDH4Õ'÷ÍÙ…ÛüpxÒè~ç¾¾x›†{éO¯-˜)I9Ua4­OøÜ4Ìñÿ­…´hHFG¬810~I1è˜; '>“^"È¡ ÉC8êw.§e/Vþìv–”0(L@VT´ÈSZK8r]2ÓVÖGÔFŒèN™àŸ{8 ¬Or•Äåþ±·›òêå´ÂN¡¤Óô‡¸Ã‡"c`›10Én :¯HA‘6Åܱcp‡Dx±Ô Nm‘’} &Tþ÷M†Ú>¸äÕ†³6‹!¦m†r$r‘GdTKî(Ržn@ôˆ¶–+u+‚W£sB³|Ò:ë:Çh¾ 0f0ãÂy‚ØHõ'̆ü ß1W.ThÁâ}d:& ã+/¦0Zžƒ×þå>ŠÞ”tü[´¸A)ÉÄK®*(ÚÈòÿVWpÐX¬Ý>ßuw·ëKâOS0ðJÚ¤ö{ÔŸÑ|ŒÜ?¶ +ŒCZĶ¶ÿBž0wdŸEý°IrÜjã€"ÌiyYZO„üEÈõê ¤ú,á,“­þIR¸.‚pœº®Ü ðR^¹Lfýç›õgÏY9˜¬À.üV”¶¨j3”)_ ñ|¸8‡qçOåL„°l\ô\f¬¹o 9/Í G‰ ZhÌ'»ºß#íhoZøåÈqࣀHÕQ8øëJeé•xÏœÝx ÆF/3x€M«ÉšÜö“x?Í™6ÈRáFÙf³³sñãÚïv›ÎɇÃn§žæH Z›Ì¨ºÔ\Ó·JŠøäŒN™¾uþ¿ò›&žÐ8hͳsçåK˜.ç·Bì\.‹q€ÂVÑ —Ý_¦ÅãÙb5Â9Mþ˜0ð$Úcƒ«îÒg X±VUœZj ÂD[eÄ2\Yb™ë“å[3.uE"φ)am±ÌYÙÔwóéQZ5Z¤A.n1–‹>àPX(ä=H¨¦¢)Œ7FZ—$$6(`!ѪA]d˜'ÑõeŽ§èŠÅú,íïËv¬X3$†T­KnÆtˆ¿¾hŸ·ÐÁ&ú Ò¤ežÀÔcW%û4öÔ Ož‚Þ¡±tŒ>}\Í–b ©Š£äE•Þs ­r"U¥ÏMgFŸJ,׿œ¥­2*È·/ÎIå]jÆïÓ9‹®| $N~L'ѵ¹¡O¨/~Ç~ÓNšÃwP¢ñºuÜ:ÿO×7­óÓf·ë¼iwœ†ÌÞyëðâ¸ÑqÎ.:gín0p×÷åÈŒ‚±•Ž^08#:fà>ÿÓ)¼FÌoôýµË<Ö´¿wÎÐDˆT§ÅņÂ}¤Æ€.@‚Áw^Žf³homíææ¦>œÎëa<\3ˆdí7¦Aæà"¶¤XSÈâ6—X˜aTòÒ‹RûÍÅeåÅäÇÂSL³ˆ§L¡^(Û·6o/Û9–tÎS¥m€trT1ãå.–l‚WŒª-Ô _éÊaYéfVkÎx ½ûÆJº©Æm÷¦x«°–*åJSÞk‰ÏZ`ÏÐ/Åå½£¦÷MyåíÙñõÖJ¥NNÈÎàÄMÐ3-𜑇΃‰ÀÉ#TŸþ&æQÌž³ D%¯eÈfäb}„Ó Ï®[½Ô°£*=â´îCgó`²ÿL2±Hg%’gªNr,Ùº¤HÉx`Sµ$á À˜“oèöEú :ƒ‘c!ÿ–võlÄœæBSÞÜ 0D•ÉNˆFqkntR9š÷û>ÚÖˆ†x‰)ÒŒóÈONÍR¦¼êÔÛC¿N¼i†@buíM§ÞHíøxã÷ÖþŠ>ì{½qØs£1¬êýËMKìzèÅ.ƒßI®/7÷|½zɦ. H/.²$1D?Niö )¡ž]Ð$°Ùœðß­XL í ¡):ñ½)а€5y¸W#¯RMò Á¡ozý‘¬[ û$Bw=á"ƒcS“A7Y"ÒlÛk$aW5Êé–Ö:E ½êìdù(Œ{ê< £Ø“ájÙ³µ¼É©Œ tOö™š4V©—„Iä0ôÆjÒåTîo¤½‡ó„½Ï䵎ç AOѵ8Kð”Yn:/ÔV›é4¶¼ c\]_Á¬¹ç?œ5k'Ó‹7Ãó‹N³SkŸ5;óÖé[·ûC˜RÄ%1E® Öp‚³L&Ÿþ r%p²Ö½.û]³sÚ<΃ÎúÇ7ÈýžrÇy_]Ú=qœøÿ¤¬+×Wœß\Â5ßy’Të«kÕê“–JsÜã+?•.ðaÏy¼îüÈnÝ~Æ[;yƒ½…vHÕÌÐ8n5º¥Òá"dE.²J¥v$,^‘üñ“=WUZmäµâ…ÄdÝ6Žª|¡Š8óÏ0?’d5¢ÉT~šèêÀlÁ6`}AÆY寱¼Ä&F}òÛçš…JŽíÞ›y£.ƒéWJ%Çw¬F1Nù±¢)ÑWÝ'ФҡAŠèL|Ûm¼°Ä­Õóy˜(] (Ú.IÂjŸ½Ç Ý…å>…‚N㌬”Îã;ç§>žøbrŸh² =’Æ^+tˆzqBÜûÄ#‡QS¿xjÌvÅÎãGNm8sÖ}ÀN0¸¯œÇ†¥›ká7ñºŠO3G ‰ÄòWƒ¾Àè Ûß@äìC¹ëL9‘˜-EË+Q£LIÚX+ébN…òÀÙMzÌL´DŦJÂHFÁålßé}¥ ;•¯ØgÚ ’Œ<˜Fó™RP²s¯fZ4ñ÷äy/k~¼ñ;¢â6Qc7}Y% Ð#ç úù¢0¨ ·#æ0ŸB¶t®Õ­ÚoXU¨ t#Öû‰×/¡¿ŽR‰§üMùzÅì QuY^5ÜçÕ·›%Ý·Q!¨«Vi %0Á–+ùFQyj [èg’Ñ¥å)Cäè2‘©ÁÕÜîâÆ‘(½ë”ÑÇåô®‚Çö;ŸÅFd’%xŽtQØ ÀöJ‡‹ Ln‡ Á˜ýI²ö~*×WªÔ~*ÿøj?¯ÖèïO•Çk?m®¶çÑ”åyAÓk¿Loq“Gêà1ý‰Ã` ? 6z}õN8xÇ (ÛåoЭ±.2ïc|ǧü/¢Ò+Dj½d°*? Ì+öø¬¾¥^) ¹‰ Ç@$VƾšÔú#/LðS˜lÖü u6žM®jÓðÚËƳ¦††zIÀ^¨aQ?h°7p°I—³ÃõTWf ð¨°6ŸâËTW,zvX†óxM6ÖéÎc«ƒ"?³_K<s—_}µ¶V“`è" ²‘·BÑ&±™=rŽýÙ“ÄXúxÐÅ;Õ—8^bØG†L< ÷d¢œQ:MP„8¤$|ódœ´¿Ÿ°Rmkc}]^º¾÷ɇŠëê‰n„0¿ôÈä+¾¯déƒQWLŸµÜÑŠE·ºÊ6¹çۺ؃¼û¾ª%óé*,ÍJ髯0š Á3à SL¶ID4`©ŒYª­7y|õŒîW5è3G“ ¢õ^Kü_æ’žýiazŒú;[›œaðoˆìnš¯jÞŒ <ÛZ_§‡-ù0ðÇ3kagÁ†ãÂóé›[Û?Ks à %=þâÝ”tj ×êEØUzÏx‹by˜E8x‡²áÓ~,`Ü$ÔnúÖ®lÞ†x3\?ðLP~ÜØÜ¢61À[ÙVúV8ššû6Ä¿0w±G4Ä,Í™PîA8Ž`µq]ÃÑækŒ/CâloB-¥Ü8&ñfB+pë>õõ–¡]MçÀØQc¼;ž¶~öÆÞ¯>­Ø<ð×Þ¾pŠ¹îç>J^dÖZz%Ó’€šÑÇ[êåU€?7~Ÿ~‚iHÂû«À;–YE¾Ýĉ¬êú–üƒ-( ¨!ž'biSëć{Ëăž]>,(4 æ·ª|¹ñ7öïÊ$xÞ¹ÞÍJ!1âŽÖžïÖ€A‚¿Q±™†¶c@Ûªo^ï|&¼í¼íÏ„0ê?n×^ü,GD«¼È)~¯ÆgÖ{­ë}äÑ û(ÊQ÷CRèD=¥»äŽëŸ;'×»ÿZWS3·ù9ðæƒ+‚÷É`ŸËöÀãfý³Z$ÙmNsàs‡Z´”)ŒQûç5|èƳç²ø&ðÁÊ°c'ïX‰všLŠf·n™82æ M"8î*• Ÿ,‘‰£D·o‚âBüÓÙërÿØ­ì>¿‚#H[33É›ùìx‡¥ˆÌûû1Jí-®Äf#˜±É<¤I9E‘’ æÐÒKuMƒ'rP,àb]¤¡PfN‚Þ¤AÚW¨;¾?‘·B¨(£¯6ží¬ãÙ»ó|ÌßoóÅ•xB{üÝmG=¹=_¤À‰Œ…è×G,ôügýº³«Ÿw|¦“¢¾·óã žŸR€ðƒ…o°Ýí¸ÉÖ–»Y—½ˆñÔ…¿~O~˜Ð‡É½ñÏ>?ú?Ž{?óãõ›¢j|Þ‚g#íÙðWVs;ôwk“?ô|xÂè ¸„%@Oýí[Hé?_ßÁe/ö2' 6Ö¯áÛ`‹ƘqD»··œÁè$L5½]¤).ã­uú¹æÏ£ç@$:ø»Ã¿Q䉟úë?‹õôãôF~—Mù·Þ0­¶žaîàù.ý¼à•7ˆ6¯ðÃ/›ëëb°¯6€T¦§1ÆX Æx"Ç pJà'?D˜ÁN[§¶ã–ßçÏÅò›x·¿à‡þQDšõB„à)lüõ#ú;ó†äÿô|ñà÷äÃX<Œ}{cW?ÓÊäÈk|û3ŸDWæk*K˜9ðÍÎï¼àNë7;­2ù˜NÚÞ0 ók&Ë–e+›egÝÊ‚¯™,/ì,©f‰GÓ­ž3‰±•çdص2ì¦2¨I çL¢ ß²v­ YðIoñ_³YâgWNúƒ™Í§Ì Ín·^8úQ%M7P›Åá§-¹•&ám äLü&L?O 8ýÒþ¡'‰—§ø³)iÅó“¨z ë;4…’b¯¡(ç9Êjbê*þLô ·o4ˆ6°µø‹Cý‹þQä]„û[<ÑÄ©gj©x“û-º‹½ 0Óô¬^ÿšzFO{ÄãgتXàÄ„v:?"—ŒÛÜþ™7·öôuŸ·ÛÃdÅOƾJ¼lùcUuÔ§ˆOúåT~êéÇkùø|÷V>Žý™z f&°ëç2áú…~êéÇk™yÎ3obKgŸ1ð»£vÄîø}Žó†J|\vÞCAœ×k8:þñåï†|Ø”‰úr½%ÊI0XÿÆW éö9î¸ÛþU~K¢À» ú6ó§‰Ç¹~%Tÿëóõ,åeGJ¾Æ´v2[„;ŸÉºSu'“u7?çn:ãýoø„?gËÐdÕ숢pºÑ¶ßQ_>mlª/ê)ÙØÄ‘›^›æ àD($W§¡®ù9Ô,ØuZä»?‹×­¿Šj·èŒŸì0Bº¦óÿfw‡æèJÊ"&ÉF¡<³Ç¨ôUBê¢LnÍFs:¾o“¾7ö³¥!Wjˆo‡ÞÌÿôÎrE~/·*¿—n«È>ÎÏ>NgWñÇþõŸ8±§£ýSä|‚™$õ]Þ¨°ôI¢î/P!9žŠ.íd¿Š%Ê›¶½@¥ÑkEk°£„•´Cý!p9Â{]ŒÓƒUÞpdÝHKžSõ1 ŽÔ#§Íq W§{BêúD0y jT³Zƒÿá(ÖšæiüôÏÇ?=ÙS7RðnUþÓ•G0:g/~&]ûˆ\†J³AÀ»ÔV5÷¢ž™k©­ZŒJE&‚Ó .Æü°³k¾óa– -îÅþd‚PŒD21f>û ”UÉ˨¢°qVfO¨Kô4VO”“™—UUæ:æÈ»ÈȽÐWä_ÔGà`øc‚D¾ü¬e»ý­uJÿ±ÿ¯ÙÏ/ø"•9þ(äô{wÓk~¼Ğ̬}EfˆÆ ”?¾Mùr¹µŽL å¹|¶Îõ"kıh°Gü{«×qJô•x%õ˜ þªX&õ ¬’ùŒl“z×c%X'ùŠû‘r!ûÄ/äƒQ ™(þø‹9ÂÈHÉ籜™±13ÈNÉgd¨(òRêa¬8sVœ€¨]à~ùekW?þuS>ªÝÃç~þœ[‹,? %ÆOÈo©2Š3ã4ƒQÓY¢D$"[¦ÅŠeÖL=½!öÌ|ÛO²hvseFɦ¥²!kfæbVÍÎD$½‘Iøv&±¹4Ë–NF.ÍÊÂl[&ÛV:ÛV^¶õT6fß2Ù^¤³ešNŒ—Ê#ظL†8•%ÎÍ´›Ê´›ÉdLš`é2쪘­ËfÚMeÊ« ¸9;±wÙlÈÏ¥22‹gfµÇ2g ‘»SéÌê©äI 0PL«&c'߈‘£ò‚¹ÓÏúÐB>Ž¿#C§ŸÄîlžÊ k™¿G<Äù‰§­MµÕ‰ûS/Àû­ê—@ã6b©41üô/ñÃ{6âÍD¬ž*Æ|ŸN@ŽÐ~U¢*Ê<¢|Ev2ÆpþóC²+7B¬F8ÑÉÒÉä Íg1f‚G”ÏÄ%Šõ 'ÙE ºzE–Q<Šî1ϨJFò$,¢ùÜ3_®õ púøG 2‘Ö‡ëç:óõ ó¹g¾ø×<ƒÉí_%â*ÕK Oyb2åÓŽñ¸£wÕ“>rÑÚ]-$d ä³d@å;2–Tœ8Lý´¡ý¸i<^o)žš~æLåñ¦òåVÎL.ó#²ªüŒ>ŠëÊiļªÞÜÑò“¬,åø;^y›çW™´EŸ`pÎÎú# lEµä’ÓµK}]I˜OÙ¶VzÊÉL°#¤b­š+bȶ’¹²S$ýE`Ú]hîÖóÝ^2ȶcj¥x6È'Z»E¸g,¯ÄT…@2u6«‰¯Q_<$Þ%ôU˜¦ÁmÔϽ·Yg zÎèñšÐ™i—9\ rÞd =²DÏëÏ“œô=5Þ êšéls¥R}µ9WíÃüÐe’²ÙâDàŠLªÈŒD€ô»µ¾û¼èn Óe™ t³ ó‚·¶§ F„˜ÍT±«ÇÔÙj«…Åž}¦¯XßjM_é‚ Åœ·[m÷€½ÈÁXð‘¯$BE5¹¢úþ°ß¿OFHÉe!R2«õsD“ý ¡‚–Yê²ÐfN¡Íû må•Úº¿Øv^±í{‹=Ï+ö¼°+µý+oìÿµhìI6“SËl2Å&‘*HÂ}üÉ[:ôÝž=|©Ê’:à|Zˆ`1‡Ê$|C$žˆêòg±w{™äÖ̹PïÏ!ÊëÂEír·y™n ;6ðèš L”Ù•Ò,JiÐõ3ñnÅsI“@dD‘ IÂH6*"ÅØ RÝ„WxÈA`Äçq1ìØ,DÊ8 cSÂØ\Ʀ†1žá¡¼%.©…Zk-ýÎù~B‘5¹.¡J –j‡ êCÁHËd³òçyÇês;³?¸äNa;‹j$}ð‚]ˉ9Ëy‘8µ`AŒ"3[1ÅLùìõK%FQ!¬Š`]æêiÒºJ0Þ‹fpÝlç‹«Í4„«­‚ò‚¶Šoý¸Y\azT^\í¦jÛ}p{ŸAæg&óÂUkÁxn®J>’~”„×#ykCe—û/Ù6ªñß×Q@Èßõ#æöüç"¿z„ï/¶øã‹­/Ó,ã­Ýg¢Ï֗ʃ ¨q{þÀ™‹<²‘´ø Ç~´ed“Ë{ÃxöR—ÉÊ™KS¨Ž(-Zð'ErY`õùîu*-PA¶u£Ù4Ám¯~&¸mÚgÂ2@%áø³:ÊÖ{ª«pÖ Œ‚S_$Õ²Pí:!‚–ÿaFYž©rüÙ°ÉËŠ‹h”â£@Ñ7~%­|HÜVi¤·-ªL€hÃ:ó¨Â"YŒÓ¢VÊ;WXÊ¿˜WFwÍ'c}Óp2™/%!2eªdá÷9:XÙR«àÔ¥D™ÛN羃ÞZ/˜Fü“Ö‰óÄ;LSÍgþUNÛh+]—º…¾ ´êQ0ÞÜ'¸Êþ˜Ñ,–KšY”¿ÈfêûË4Tf]8 h …Gº6ÖEV³V ð¶zœžËßO°uø glkµVŒýò–ã*ºÆ÷ÎÆj'€Ÿ.%²^$Æ­ sqˆ?Rz^^ªRq4Êãé¤/5Mœ]¾ ü^˜GbJ¦,çVºtƒû¥­”I+ß}Ú,@¹µÉ¬fÌl£{×2ä‘Ù¯“…'.e¿–¹§^?‡á$U–”Îd”eú1ÐÒyì×6´ RsŽQ6G‡ÑZê´áܺ( ùqîμÞ×b¿çs0¢0…ÅŸgÄ‚âÓsõô"¯´þÐÎW5åF›"áËÆzA±õ­õ…ÉW(LSjÑÙY£ý,§jøûYœ+¬‰'«lW\ÐWLË?«%¹êØ6°Í›´´YÊc››Ù“=›i+Ž¶Ö çÃbû·z‚G?nïüœ_îù¢r°žî^ìæ-aTþBã=¹ž(«FZË⌲²pšÌÂ|Îç›îiѪ±œYŽrå¨BÆÔj¢Ã^û“œ¼*MfNüâÌ*MeŽdŽíÌa´³Îê$a´»Þ¯-q„WAë€z-¸=Vq¡’RçI˜lç­‚ìÕe…H"ÅF5$“*ÜÙp€ʢ¤è¦ØºŒ¥l¢pjBjòiB ô±2 §ò/s!jV.B¾¡Ÿ_ß’•‹MågÑ«QoPDŽÏfÊÔ+[#úi ­ƒ¼e("L)Yyñ|Ñi.óÔV r=ôr Vó, z;B-ý+ú³KÑ-P…ÈŠ^k‘ðÙ›!aù]6àðf£1]Gðƒ»ºˆb0 ¨œ!ž7õc`~ßZV¡<ËÉÇ—";ôs%~Xk‡ƒõ…p8r‡çÓ‡Æ+çêv¥zZ­hÐ>±¶ àÊÄèš/¶õ¥«ÎÕâ Éx0À4M­ã‡l%óBžˆÍ¢~ϯÜK¼‹G™>-ÿÓÅWkƒ`ïøÁ‡…(W_]ƒ½¢ Äà“I8@ïЩJÐ~Ï8ƒ¤jÊG¥ÙÇšŒW’ë¹2ãA»^*‘kòÛ•Ça²‚.ÉoWVœŸKèÜv«-ãðÊ |o„ÜQÑv¾Ä'Æ ç6¶å•aë!?—’Z¥hS ÖÈU5â|¡¥«ŽN çq ƒ5¶JãwåZ–ao°On~®/ô;ú›Ìöóu¿~j9¥’ÏÀÕ’ëx[û±58{$n1¬ˆZßœßÈÀ`¬«±¸m*ÛoŠ/Ñí“Óäõ)â·¶NÎ 9†’±O•CuXz¸de¢XHÞxæÇèãôÚwN.ºçNóôÈi: gµj ‹TÌ1¯ÐÉUy2YÎKƒ™¨BâUï#ãaþx»Î£A>Ä1.{þî„#vIz"mýUéb\<’ΠiUR[ržý”÷Cöڞȼ ûv÷Ä{z%šÓ óX«&@Túæj§ì`oNéw<ŸzÂó¹È"㪱úìæD‰VÀò(?ö¦/ì¼ÂuU=Ä ))îâ‘éQÎ^¦ É„8Lµ‡t(íúÈKñDœš†°ox1®“ërwŒx¬牜#~ˆg<É·<“Ö bÐØ윇HÄ©àeËGùÕ,Þ `E yr`\eVß`Éì_]…ª/_Ìgì‹è{DNU&·Ê-?+ÂàHÜÊuÎEÈ€1/•Ðë6ô¬Ìžõ/9‹¯žÈû1/¬p˜œ'%ÁÀ&࿹ ÁƆ3_ ¹ïsœ´1+35âÊ¿¼~‰=~C›ÌTî»áhê“ñŠ¡$ ïE±ƒbÊýIjèï·ªžw·Eë8&µTô@:lJÍŽ™R³C¤X#v]3šñe›#_"•Á•è+÷Ù%Ég·Ì©FBì‘xäÁ ˆm4ðb™ŽKÑO5ž¶½\/arÌd|=’c£Ô}RÄÈ" úøª»UÙ¦¯ÌRã& ÿZˆ¼ñDîZ&ÃÕË?OÏkM ´ ô…ÈŒ±`Ô… y$)DN<.8ÝžÞîòÏ3ŽºÁ+z@Ê,—ã»Ô\݉FŒ¼àŠL<Ð KDùPÄñcÄ3v%ŽŽ5&>Ç+ó|÷{|šÿ"<¨‘œÔv©RÀ~ÅŠ4ݧ³ð1É2zp5j¨b|XL>@†ßD)“¬áèl~g!÷[HƒT’ä2ä}~ýüylOƒð×.–ò-¡™Þ|(4‘?œôÂÞtbÒ¬…åõÕŽ¼À0±X&‚–âˆês¼ÏñðÓc døê1FÂŽÉT±DÀò«•wq…”Ó;÷С”G’£›éÒ»K”Þ•¥·ŒÒÉÞñ+ųS9PóMg0ôàp’ûšŒ¥7]êè ß(GïF²™¤H㙥¾kU^¾ÈKðúvþ¯rÔÐe§€_ÕˆÝÇHì8´›Tuý™Äó³Ä"ßÕ¦ã˜Wâ¾]"<•šl:i;«M¨»ÏŠŒ?‹ýį…‹ ÅPXJ$‚wê´sééž•€™~Ã&[{Þ^‹Y™Ez¢ô-@ Hª™0I›bÖð¨ÏM@‚>·HØÊ/qWTF‘¥o}Š@\CM³ ÄpTt£Ìµ¨fZ ¹œ”[iLv­¾¾žªå›`Ô¤ FͶÁHZ0™]ÉúY©ýz= }™@/jõñ^ɱ<'õzå ɯ`0î™cLBŽÆüÏÚGDØÓ>f! –I=Ù}Hœ'è ¸LbW`Ôþg{Î ù Æ/OVì—³|³wWûf}s‚©LÐÈAE›ðXúËŸÿþ¸Ã~íY}·¾¾vLI¢Þÿâuq¾¾»»¿Ïv¶Ì_xÚÚØÞÝúËÆæ³øºµ¾³û—õõ­¿8ÿU¹ÎÿÔïÉ¿µÕ’³ê†Ñ]L*/ž?¯âßÎ;ošÔþ^w^‡þØòÆøux=2 P´UªÜ¯@™5ø³ëôîœ~ÞB†8 YL4G8zÊŽAêI¸9¨ç‚ÙE0/L7@§;o16nÐO–ƒrXq6×ן9obßwºá%]<8oÂùt@m©:­) K(tþ®ÕuNçÍN«qìÀóY§ý}ë¨yä4ºðZuÞ·Îß9×ÝöñÅyóøç´í¼ot:Óóœæ‡³N³Ûm!¤vÇiœ·šGØÆÓœ‹n6ÎÚ§ýþÔé´ºßa[1ÿ™Oàè£pÊ Éu »ÃØ›b”×YHq¨PD½’8„ä –%îÓ;'šÃð¢$FË›ž#‘ ’~AÁC×cÕ 9Dí¨1B PLf·¥Ná ¸¼cZ“¤;Sj ÒÀ²AésŽÀp:´K´¹ŠÀ–lFUøœç4©*oÛ/}ÜW`a™éá5ºã`z%à€I€¶íEä8¢ƒ±+@å9G]·©tßìÃd¾ ü1mèlž14p§¹:ìê°åÛŠS.ìÄj¥Œj¯dsXT`ƒIü™Uuî¬é”‹#Aª½2à8ªæìWÊw0ÿjjôàÀÝ7»|’¢vš7êÃùºËæ$¨hÖƒ6Ûó“ÓóÕ‘ï Ä:†€Ô\jˆ\QûºmØbÀ¶¼ºç€i¼éwè<·º€5ASÓ‹ãã*~•àÇÚ}•à—u*2Üqûô­Ûi¾éº;wO›Í#<±œÅ-[-Uc] PQp©.…#p¼¼/C9ƒ4?Ÿ´¼ó纮æz §!Œît@¸jÀÈ}‰ž—A*ªrL|…4À.Ϲö&ƒN§7YÎXÞ¿ËŽ±Ë`“}êf‚™·N< úåtŸñw*®çŸ.øÃ'”é€ïÉ廸[¼MŒqkMâ›ùù盞\!Põb‚<µÙ(çÑq«mpú™í ÀH)–·Ø¬ú̾ÅÕ½`¾Vq1 ô­8ê ) N·—úVR®”7{ÜÓÀÍ…8…¦l:þÕÃ`ëÍŠq¯– Cã¬Å'><6à;üFsXXìr0: £ãö‹Û9çô·Žªbúæÿgïݻ۶®ôáþ­O(kÒ¦hËÎ¥µâtÑ-³Õí¥8™ND‚j`Ò²šñﳿûvnÀ ÊNÒN­™Æ œë>ûìë³\§lÂOÏŸÛ{5ïZõ¿öy°–où[ž6½}v9|Â2„ߎ[Õ—iÌá¼+{3“…'Þ“ly-¯Ä”KÄDÑy ˆâºÁü˜d,É‚ħP$oµ„ø œ”ãèieélÞÝ\ „¦p 8EÞÏ Å샿 #N³(‚`0Aûs±b”æáwij9‡ãWÈéÒ,ŠúÔ…Sƒ÷²ÑV{¦ã®oTrÜÍ^çÙ-Êz&ö€ûë¬`ÑöIw†ÄÔ€‚r gûøH²ç~XÛõÜ/dÓ±â!Noþ§ÓøV=í¼ü0صاզÛò©àÏp=?³…]û««¯ÒÃê›=%|Öõ%%(|á1ÔSøûðäô¼ž¾|žõû­Zâ!µ#\´õÊ=P ¦þV­'Eè sJ&AËšr*ŸÔ·ü_áOïÅ),Õö -–“I2ÂÊ£˜tÕ$MI4 ä$N§Ùˆ®ÎméÞ‚Sj4õežZm™ÿbí6àñ^ßi’„¿>4ã›ãñÈÛKþ®Úº½I`(­9æ9³a¹1ÕQ܃—a»Îû?ôa³ÎNißà%ŒHhM¢vDö¡7Y+3Ì7”(Š¸ÛsQÕ:ú”tœ“ÑBå9J³ð¶Þ¿©&ÿn:ó|‰£Ú³ZzîŒÏ^p‡yÈÁwÏ©"À:MïõÍÞ ëâWü,¬h5tóeƒ†)¦Èƒ’´ÌœtØ\ú¢ -â-zÅP4?„{¼U¢Õp=G9Å:­"R¦E¼Q±"W»³bøŸ°Í·®Ü$²õo† âaÔ3ŸžôÀüÕá»êÁ@m+#Œà—GA ëÈ@²9l"4J{KÐÐëP@Q— 3ß¾Û[ó"‰zñ`ÿˆ8lˆëÔ— f–»WâÇ0^<´$W~ñE ûîã$aῆ,]‰VYé¢Òëó¿ÿ¸Ï)=ö{e¢›ÉßVÛf®”°JLhá6‡bMÝŽ}QÓóžÝïþé ^S‡áÙ9ð©—­íÃ<¾ þ«¶ tþ_K5±ÿI·;½Ñ«ä•€ VË”e…öÊÁ0¯ ^öDNÃÊ׈› -Á{Õ¥ù5ù÷½@=„ŒÛÌ?pÞ% T>i—¯1õ$4\2f='nÿjpÐ×¼žØIù¶ó¶€tY}ߣú¹<±éÚ½éðõƒË³£Á>ߵǧƒ;|æ°­zY£åÊ •·ÛŠTð†û5+-gÙ,œ,ÓQ@¿¤<{þ]½<ÙÍF¯¥žÜj{íàuGµã¶—úä4<ÿä^wlX|ÉÆñiò&žÞI$è ³ÓN!åЖn·k 2îd¡•óxMGKÌ-•3Q`ž‡½Ò±œEèoÉn»ŽqhãóC½íßÄ ÐDטcMÚ}¶ÌE¢ •fEOÄZßSý~ð1ü-âCC—ŸfH¤ò¼8 _œQ‡Þ*®Ñ“·LÉ #¤ÌÔ_ÝòoµËF:TÄáå–È6m!K»¥êoÀ¼¬a£åð½Ã[àß~Ë6§s zZ1ïø¿ž;¢€÷"~ø¿tù‰Y¡áåþ~8\!n6Ú±³³uoÿ–-]‘4"BÒ¼ˆ´Ä_­Þ¨~Çý“‹] ndûb{ësÊßX×€:„êí@€£}™ªu(‚ëëÓ¡Ùˆ—J aø!Ëp°âØZW°zE±œÅb/[eYª±Ñe}48鯚á™ezõá>jĦ:@ícó<~Ë7nZUc¨½ïv¾·n»û‰‹¿“¤H"À ƒ&hžÊ!Ÿ½ïú5]“z½Èš•Û]ÇPË3s…M¯­¥Ì×¥çNu•JmÕJ¸÷ÎŽûÊUGoªwY q¶í½Í±ô7µ¬~ÕñÛ’¶WKmÄÕÛÊ|ð¸½Çþ½Å$Z3"€ŠÆkÈ´Ù™÷qé¶ïÖ´ÉK³FY\åüüÓ¹8v•3á"»¾žÆ;9pób9G(—.û åâôðð¨ïq¢¨0eŠ?ÚÓ|”ÝƘŸÂm$mIôÌy™7ˆ*vÝdÖÓuÝs¼Ç b ×ÛD›ä+ïÂ-¡ú=X<•süÀx¦áµ}²ºã|òýô*½ DÖoéƈi›¢<·8 kržŠî”qüñú'GÑ<%‹;~zK4¿“þ¹v^ß±(Ì›ÊÃÈÂcËâkÀ_-ãüãFFñ²A¶f>{Álj­Gš…ʙط,›­¶WÁcy×Þ^Ké“£ˆO}ì¶+ö]-—ŒºyWQC»¬ Ú†ŒL¦5õ€&—qù•â6Á¼É–—THü6­P¶‚sJƒóÓ³g[^véyzxq~zrøÌVúÝ%T[ùðáß­e h6{»yÝïýµa'j)×jbNŸ’hûÌ'â.,.³ÀèuGñR+»Ý.®×‘s-ašyñßýóSb¨þ)þÝ|[u'wG¢¶qÔXo®Òú³ïZØqZï-æ¤7Çôi?º Cë8 4 wÈíÂ-?ÉN}¹ç†%¬nYF/®”Ïàaúº½ ãÙ|qײÈü¸wþ×ðåùéqH¿ÁÌ•ô^õ†Ò5¼_w€Ûg5¾ˆñPãUrÒ7íW†‘Íb¸níÓ WK‡eI\ïW.+5ÔˆaZ,¢¼—JeSÎ,uË]œœ> ^%ã¸ò ù½ièqwB=É“¯'P^²Jßšm~ëaËÝòËËP²Ï—ùqÙ{è%D›I¬Þ! l´E÷[ºR|“×,Î{ËàkH‰IAóŠÇ­ê³ªÕvI“X9Çç‘í9ž,YŒÂhåNðâàõá>ÇZ¤Yº* RØ(›Naý³¼[ U{ïߌš˜$IWfjU¥¨Ij¶©‰ûÇ+r)K³-áÚ#ó oÆ$T¦K=¾A7ôW)sxuÔ+ YÜú{‹W£w+˦ H!$ªÓË{-¤põh#gô"­Ùßß›¤•\˶ô¯6Ÿ>!…F¹øõ7šx<Âï‡D@¬÷ŽmþÐŒ‡ë­zÙ;ö2 í"«»ÏZn4{Wtó°;+[Q/ùh c¡KqÚ,-ÔwÁýçSr‰ÖïØóàÉžÃ5W=ý2Y ¶ìmœO¦Ù­k8©îŒÙÎÍadÿä§G»Šî@NÝ?=û©²bózgkÍØÝ¢:ÑT¯Úêd ïI/Ñ£cȹ8¿ì—ùuÉ’c57·¬xº×‹ÐH î•ŸÇï³ö Ô2mo`L©l5ñßBîÝO7=»Þm»®HgÕY¾Æ+@Ín–u¼Zòs–/ø3)ÆÏåŸZ¥¶Ù>'ï=–cš>Áöu<²ŸÕšÈøeukmÎØ“L(&4ÝFÉÂ($yž7çÖaÌü/VÈ)žÖZ5 Ä‚â¡#³+FÂ×»Y1cÀ¬Ÿ•-«ø†êIû½·nÈÚuï·;dGTy¿Õ ¿cMðf9ø¼o'š>࿾­:¼{ºÍ¦Çm†ÃØw¶’_Zfâš…5ËøÅæ=ýMmÞU®æ£{ÉÿÔgãøôh{0ìõ{çxáhpòW÷ `ž6¨‘á40}w…?‘$×$Œn¦_Ï#¸¶;ðPý×ÿ†T×Ñ~‹³¥ØBzŒü\,çX±†SNß[®ºR¸¹ó.‡Ft^ƒ,¾íO0}n’SÉê Ÿst½—ÓŒìޮεŽÎò<Ú~ëm­ï®þþ²UȺ_ž^žT^V£Ñ$åy[I{ncoç{½ñÔ(yf÷0ë)Q•ê‚¥æ˜ÝŸ.Ü4áizPﬡ‰ zHBÏÏ"5ç¡= û¸¸ávjû%ìÈÝýú çå—¬©peÆ UE§¨Ä°œWQ2í–3W„4½/mr›£Í3›b®þ˜ÌW0 ŽÊﱪêf¥ó|õ ªõ›—„ñM¼äï·j#Õ„*\©Ü…fŒ+w¿>ÊÊ›žø©•â…ÿ†i5ãü¢—-§‹f‚…>…^áÂÝöËyzŠ_Y’žnÛˆ|þ¹m[òÃzg;k(ñ1[XyŸûc²JÌ£N9“=@ù½i¢c 1”¥Ìz" Ë)B )܇6!‡FQ‘ÿ7$…‰¡C¼AL×D5 »B$à$\W^+ã*Eÿ,+ŠCŸ+YÔ ûëìhŒé0Å„PBŽE'eTQ4&|Br3FátJõ|Ò±©H‡‹‡Twužçoj0WqC7ãôªüƒsrYÒ7”…{úâ/­y‡¾ï®{t‘ÍK"õ-牿¹Ï“Û¹­3x/¸Õô.˜Gw³ão9™à£ÅAÒaÌgX¥m~}ÇI,÷Š)î«Î(»þŒÌù3%J^îÏÁw*E×Zƒàçàáó@3?Ç°‰ÉÆ-ÎpnÿìZøsô,P[sd×9&YÑŸöË*±ýô¤¾ê÷ÎZp¢~öªv5kÆdßé󽜮:Ýtá]\œ‡—'—Ãþ åý¿*ã¶ÄTn ¡:/róJ=BûXK\AÇ Z8è.~7Ÿ&£Aéq±`Ð)uê“ëk<âÀü'1éÌžlþ«ø&z›·9À £pú tsÝ$ÎÒP”šJ¨zÀ`wÉêà“,w‡a­X/½ÓkÊá.)Üq7¦WBé¿‚±/#‚mãȪ͇¥®0´ÓiÂÐÆ- ÚÑ !ŒÍö6{»ÍöK ðKQÆÞÜÜHë«I•<`S2Ó؃l“æj`jfs_Nµeóá½°æ8É:„¯Jï$[“óëkåÑIf"Vè²–»šì^V,m7ö†Læ6ÊS¢7ûTÊ@l›Aæ¤*ÂN9#7# ý™À•×ïì ´t±§6¸Úoƒ`Xðšà ’~ëz~¯ 6’Qxñê¼ß; FxÜdÓ±ù@–ì®SÉMçב©$ŒìíY+Çî†ou‚úeRµc¤„Y§ª®½Êq(ÔKå@/ã>F"ô¬žlc(‡›®Z=v.…¶ÃB/ :–€È< 'Œ.PŽô`d{¾¤ª´Èy#U EögNc®È“UH2ÄôјPXÁ6 ¯†Ñ¢tÕ"–ÒêÈol sŠ,§ÎŽãÑ4R7cÿ .%¬Ç¬”C„£q›»x®ÝÒå%²À½œ´z’¶‰y*³—~k’î¹Ã=ˆ§ñB‘Q·U†¦©Ê…²Š¨Ð œYV= {$Þ¼TMúíTZq›)W f š¿•StµìN®äùœ…)© ¢H (ãV! °ÂBÚá‹E2CK-]øD3”AmÒŸ§(óçHiàm"1k!ÊïºÍõÇÏÝdªÏ8+pÜÞÔƸTý¡‚XN=/gíšM³»('îz·±LVð¢ÿ‹´ [W½b®øçpÉïU3Ñ’´ˆsñ¹ô˜ÈƒŒ¹Ö2|JR*ÒíÝ ôʣ䔎îCáË™ Ä4YT˜{ÓóöøÈ„å³yOŽïܹGæýæ‰ãû?žõ÷/Z"îà¥ÑáЭvuÆž¼rx§a^¹?³Ü3¿uyæµéxtSV–Ý\¢u ÍΞi¶¨É'EÝü;A‘aÀ Åx 6JÂ#þå°iÇ3iÄà ËwÍc÷N¶¯ë«*Œ‡»ŽªÓÃþ’‰*8ZÇ’,+CPl'ô® ÖÛ k•I„6Yh,F( £ÝâµÁÕš/SgA~ÝIj±~%|hsT¤Ôñ„KúÈ £ Û5.êÍpJ6˜Ð: ’U’ŸƒT‚r£³ñ'œW ųŒnAÚA‚3ÄýÊcäØpP-ÒkR+×|qåVÀ+ÅZâèöU¼Û—ï—ÂÕbn „בšã!â‘Ôý‚ºç-Gp¾Yy÷;OZ ¶®U»ø§çiŸ€`ß’üpgå%l22Œô¨à9Ö\ÞÜ|Ù7ù¾6>³j¦ÙÐ@³Æ443¦¬·ÊH7ƺWk^¢Øe|:°µ½£½g¥Ápô)›,æGXÉ…e\íJÚt-S8hý\È ¯`)y 3Ï|&r6=wsèNèÑ<¨þd–¿a;>y©\+Jɺ²Á^YýÿKo׺ÅRY¥KïÑÛÈyÔ°é_a÷Wû;ÚNhøÉixÐqyx889¬æoŽ—³¹»<®P¬Wåøð5Q«G;[è¯ðk‡3aYbëÆè,¾p}56òÚi(@ß¾¤iÍ5²Ûð7V.« ¨}Û$çÃÜÔZyAêÚ…BV¸yN@KÀØIº˜´¶ÙÓø,ø¯9ÀàouéÙѺãZÊ,%‡6ð•8{‡r–AÌöøîC1•¦|dì%!kÕl„ÀVq“å‹6-_ñì4FóŠ³êÆ¢‰­¤A\Yý (ß¡<‚µc˜–Ç`,VG:ÏÈn»| d³jÔ*÷Áß«§ˆµSvpÕ[N6;V>åÃ*^Vä•sá= V|—ÍÄä†!êïèwz9°¸;~ ’=#e(-ï#.†2Zÿ“” »“Õ¶Íx:˜ºè¢ ÖðíQ:Ë0§_N³+».%™C“4™á¥, ¬"Œ¦Î<†- be䎎”w„µRË_+×´¦øÆvìr†‡%yrLF™e—튧hqçüFTº[Ä R©Ã_øqR¬©LMÍ£ñXÅÀ%?‡©]óz‘– ãºNg*duSyüó2É¥ŽÂt`Í÷y2Ř’š#‚×Ñ>jwKË œ‘îZo`cS¤€P 29°'ªp÷O¿\˜­ìz–Ÿ, þG1å 'ǘ­¶ò™¡©âJbxtDjJ£+­2eåIñ†mèã8ž{Ç×îX£¢8–Û¤ˆ58¡S3ÃC+ÝUô¥–ÀWW°ÒHé Ô¯á·$QÑcèW©Eös—Z³ëXï6ȆOt&ÐÕäÿ&t¯iôÁd–ÌTPÓŽìPÍn–›Çsd&@þÛ¡dÀAËlS—ßùs|øÐKµß­ÝK¼ÊÝ5ÐÙi&(XAöJkÅŠ£1 ¿n»+Žñ€nxãý³o åú'+Hœ¸¯z”X‡û‹Gá‹>Ü"-;x]g8è„ ¬Îö‹ÔhÓ‚‹ûws!ÜSëms1\Y#yë®ÖŠÝÿSI›bñà\1r5ïbKM kÖÊaè¾YMêQÃÜsfà! ¼Ti¦|m–¼42 (§ÖÙ€ÂPª7ž4€Â|t¯dÏ­67Qš%S³ÃÕMÖêÏô}cvÀ´Òn.˜Ž¹RÁ¬‚9i±¹ìÍÕ1Ïv—%ÍO<%‡mÓcÅëÄ”Z‰}^Á(Ôúz),9Õ$J¯§¸çUbû× ±FX†6¨†Lc) ±&PôL›hR¥/Tð¿Y ÍB•;ÆÌsNCo¡[Pl³SŠQÏ—)Ff¶»õÅÝö#¬$]©EP°+Ê»±-šR….&MÅ)Õ±WB’7É4QpÛ6Bª’o,PMCb;RuWV[b~ómœ))ïJ^Æl• Ëò·ñôÑtúw­d¿¦Ë¸F‡7µAÊš¿[°P£ýÜ©Ym, ¼ ¿[7±Ô®ôo%ËT-.±tV†ô™•ÖßÆóØ–. JUÐ3¡Èþm(\ N¸‹ع–kxEYG­©¾I‰nSm| àæs¸ù/j0ûx¸lzÛ@^À¼ÉÞù_ûáËÓs§|«bšsÞ€ç[F̪ ,½*V †…?¯{ç'ÆvHÞ§ÑÝ t‚Â<%¸È:#b9Ž¬Š‰H¬ÌÆ«‰%ö™ €4€¶ ~ueÜ·*½¡*þk@ŒüÖŒä›S»'4}M°ùoI™êѪcѲé€Ð®¥7ꚸ—©>[5Ê…º&xÚ«ºñTkbLµ¢XŽ/]Q1Ác*T†÷ÞºY­Ï«–«í›”÷I{;Ê;ÐcLi©24ሑ±·,]UöÆž¿‡JëkUŠ®,Iý£uÁ¾râoÐ(’˜²|X-ø.˜,)~_Ì­0ô‚ãÏ=ÃÇl‡8æ€è{1ŒºPl'"¬¾œ+eÝï,ëõ+3¬‡õý¹íZ±cµo<\uVî's;ðǤZé«»íd÷œ@ïÙ[šÜ,<¹z+méWËó(ò –œÎ)¹‰²{c̾çœy#Â1nœ'½7ªïeAÐhH–¢À„æyŠ±ùî§þúGu8ªxÃ:"¼÷}R›­ð|UH‘ŸW… 5QrõŒxÕÐ>{Þ ÞÅ?ÂÍîÄ÷.b-ÆÂ*OÞšït7îø4d—òT«µ Ò®kbeÌ‘Sîb#b4gÔvbø¤Â\uV±Ù¿ž¨6Û¹{‚ BsÚðË÷“qÜ‹õ7•rîs1Z³pB©?èbÜñõ'-î|_ ¦ntñ•·F§¥®´*c·¹¥ET¯U‰Ãn$êÖHWæŒ;iÞë2¥V^È«nwëVÐc ìÏž˜£Fv_Ɉ¶3Ò«™ÕÇ HÒјæVŠeó•–P&Q2 GÙ2]X¢Ée©ty1ÊÚ± ¤¢ 4Í  ¢s³åR@‹´¿$¸´5½»x̶67ÊF/R|%º@Ù×°–£Çãm½Øv¸÷v¸é_z?ôCŠ½{®å œ>SZ'67Ã;ÂZ”Xíà e>»tYbL^l5¸©9YÅ÷– x)ûÄ–Nóh`_V…þ>Ö[xh":|°•äCåË÷ûÖÆæ‚Ð=’Òk,ÍóÐ}2Àû­Ž­³?”ôî±>4³T°¨4 »‰{ͺ¥¦ÅÄDÔBsc’¤‰Ê oD¹$¤:ho&b Ø~PjŠòîïÿãÍ´~ï+qfE·¯yH  c–£´À(@¿‹"G\0ßîuƒÖeO–S|ÉÅbË bs„êbbžùäb´íDÕ‡[}Q„è0ÇÛ: œ›ºŽtÏÃñ˘˜g…0N‹ämÜm¯ åð 3Qx(ÒÄwtÞ:Y@™Q%$F.k ¼.KÆDg]B³©®™üPÓ¬ËV£e5üªYo¼DååPÏ4’>E¸‰£åð*ž óWÙ áÛ¼ÊâJ«÷ÙÔçZø­*™î)úÜ }BÖCž›GdöÎÐÈ>øya‡5ðqÆÜ ö£Ö;‚‰pK F©çÑõXljc]?wÛ6ÊŽä•ïj×j¤Ü/¡Àmèõ6š|¡»:ÿ¾y¥þÇÖØZZe¸¥v»%ÝRîºØ&Øc«@œ¬@Ї‰òœ¬ç¾`®H\”l0ÑÍ R]‰Qp…—$Ü.Öƒ9Ãu—ÝbàÐ$ˆFÔ qØ _”ãÛ¯B6UnÂ⠈ݪ¯E—•ä2C”é¼\|Aƒzt΀77z΄»žUÂÁúô‹/|Í}V>Œöù-«cF²ÞAüâ–ÛL°ãé­]‰ã´“5 ðÄ)ÕÁ ù$©tn©Næ"² fù.îZǨaø…¼ú/…YÂÖ¸@¡žýµß? _ô€ýž]œÛˆw©¾:îýµÏ_ž÷Î^©HƒÊœ®r9Fqx=‚î¡ŸÝ=;ç†1Ų”ôÜȹ ÷/Ï ÕV´ŽÞ·ª> êÿ[&£7‚7Óâ›f™"'Fâ¡k< ¨lµD"p·”Íc ­36hìwæŠ|thÑ¢"Œý‡›’ çÓhD:Ý5œ’¥!\mZl2ãFsÌÁ½h׋1Û*ð/íq¬Às”þa4×ZCÛm?€RÄFÍDñ½ŸXª÷·Ûʼn)8)!6Ù¼`ñ_wu›Gób¦ÿeœþÕg1ª£\6‰´vvÛ{œñ•ì/%4ûnÙìT)%m¶§T@ÚFyüxÜƾȦ´¯îº ¶½‰£9¨¡ Ú˜Nm¤É#ee@UxDÕÙha¢zß¡18A%œ«:Ý`US¯c]:§1ZŽB÷‰2”ð¢Ò‰C†'/¼ME#Jì,Ø°5X˜+‹oŽºMBiüÒãêÊysÐ$²™Ywc¹Uß©¶ô¾9(š*‹ .ɖ諺ÅKFíßÄX[¡Lþ™ºo^YßPnQ~Ð79ŸÌô¾Äƒšr°_VV ©Ôèú̶Idi8Žg°K¦™RRá\;têNkM ê’©Éà$y‡ZwضêÒã8à›u #°GÍêÎ9ú²ä”(£š­?[x¤•¤ójÐTƒ])Ѥdzk9 .ªåhë0¬å>,â1óõ¢¼¯ßQƇMB¼dnÅ]:13UW$ðŽˆ„t‰ :µ¿q{…ô™9qö–¬ÌÕ¾GèñJG{µµk)ÆjÀ-ãÓz`}×nqEK1p‹3~_°Ö¹Œûªr<_Zœ÷‡ý“‹°4ì·ÞuîÚAë]½Â¨^mðÒ]Ûv%WÄNæ9¸sÆ.Le5Ðîn6„¨ô|êŒ žâ¿¦KWàRIÛul;€Çá+„Sòˆ+£VÓŠ µ·q ÄyË^Û16{¾šÉÒà½úÝÙ´¬?éuච´ÎˆØQ‚Ž‹c·”¢JÛ·×dçvx§E»¬Ý¿1ìßØÞ?Þ2ŠËˆÇ5›FM{WYmJ)åhÇ|Óp»>l—ªÉI;+÷©„°R…(qªkœ:^|âÿ—~®G;ßv¿é>~,}4Ÿwá½ÇðóÍ7_á¿»ß~ýÔþ—~vwŸþa÷É·_çOýÍàxáÁ¿ÕBÊ\ô¿ÿ&??$ä*Üøã³BŒÇª€ƒA.µ´£;Á5›Ž¦KPt·ÙŒ¶ÿo‹ÿ”}þeGýJGãÛo¿®=ÿx\èü?cÿžÛ}üõ×ÿ|ýéüÿöûZŒTYÞ½ù øÿ“¯õu‰ÿ?}ú‰ÿÿFüÿÁVð ØÏæw\ƒ²5j»úÓ7;ðŸoñ«a2M@Ÿ Ñ’Œ xv6_bøÕ ^3«é¨ âÓgXϬPWÅ¡÷GÐv´_ªà_P@»‚H1.âé”vE6YÜ‚Š­P ¾EŒ³Ñ±Í¤þYŠï‚ù2Ÿcq9 Íã+Ä9ÇðãÈÄqg‹¢9³·É˜\C'DWXÜz¤§‹êã(!á$XøÅHňÀ»Wpɾ[~KóQ4‹™»Ó,6-Ëù$oT•œya9¹òcšñÕ<–RèǶÁ¢X&‹è Þ]ÜéºBjÕjÑ2ð‚±iZ¼,ÛZÀ·õºÅï°«óÞ9ÌiŒÞc\Ü;µÁ.¥Ã~‚Ÿ¾Šo§ñb±sÞ`Òwþ‰(îK5kú/Jí²¥#ùà‰'SèÀ¹ pèwFBê‚‘¨ çŒF êlK‚²®£ü*ºŽ zŒñкœ¾»øÞy”§wTèÕ”ˆF9\q îæqpUµÐNFæ“š¶ìˆ¢<)”‰¡G@›oMwjpªâeÌ¢4Õ „ø¾Á$G&gÁ­…Q 6a⬨V ¶cU E) f /ŽÈ*JRt9‹xŸ)Ô®¦K9§´u俺…ÍÇ*“oU`zè¢|Š†¶·1#pUÅÁáÉ%«²ÏØÐ4¹Ê£6»KàÔÆÓIµQ|}x8 akŠaò— 6~'›Lvæ¸ÜzÞ‡q–_Ó†^DS8‰[¾(v±¾Iïâô<|ePÓ*Ÿ[ŠL÷fÛüý]ß~€vD[†^AÙ„O©íŠ CX€ý0D _`ubÊØa-„½…a Þà‚Cð¼¤L‰ÞWÅAP/É©K^7ñt.„ r,œÏa^W7QÿÈdšE5ͳ%0.ÿwl’VH^‹Xo#æ€èŒQîe)æüdXŽÍð@IPæÅ‹³Õ\Œ‡òäãu† Ø'Ik×GÀ@ÀI:E”R”¶B<ù­p|Á’ Ò¿— Ös"À Cä†Êc#Q0¥oÿL¹4ÈëÂÁáÉ)¬ÓéË—áYï°ßJÛÏô—­”«˜‘®Þwö’|ïVÞÙÔ¸~)fŽÀо©®ƳÊûj5¨Ô-QÄè)×%Ƀöó1¶šMæ?ì÷`2Ü¢‰ááM%«gÉàó=ë{`+XïQu¿GÕ§¨Ï*%”IÑþž«6ÈSôGèyŠ¾ÿBþ¥³šv¾v¼Ïñé‘.“!ã3¾õÚÕì„w `æWí9˯^ CL}j×~±„ao£ó1ßþè‹6GÜüçT·²Å†ÿãþñ‹þyxÑ?>;ê]ô‡‚ó8ø.‡ûáýs Ò¿÷<Øué ¸ÁñðŠ¾é>ƨT¼‚EÒG4ò+ Ž—E(V,Èš‘«u(Ï@…ü¿Ò‚Xmi"Anˆr}Ko#vÿ®-;ý‹:z˜ûn¸ùè÷KÄ°¦^% ¹ ”’´Xp0 H%¥ö­-WEtGQUøÁŠÎ- èØCªS “—˜ %®<Øeñé_Iú-}à豎ŒùÞƒÀŠL. |¾þËAoæP½p ~*xð½ÃZ^O#| r³èµözæɽw]Ñ£ô£¼\¼4a8WñhåuŽÄþP¤ÐUE80ùFVHí24Ò œå²%\œ3Z’Œè6†7Ú²Óæ½YôŽ1âeMÊ»jéyŒ ¹ë²g• ¡c¸ƒt8T5 R1Èí4"þ¢ÅŸ39Ë”¡­ìÎn _ƒv¾ÿü=nK¥ßùxüwØÜ÷D8¿–ůâñL—kXI…Ì+ÛÓ@)¿S#T«’Vù‘]éåcÌÎH8ú>\/éxû“äó_òA6ÿIðùýŸÊÙý„Ý5æÍûËEÞ^kﳿÜôчiä*ö?õÒ±-Y-ªÎ¹rZ=²€n5þúôNrÑ‹y<âÔ9nÕ¶ò¨´É„÷=ñžÕ¬=ºB‰\k•‡äª¨~ó/l´òŒÖºÒ맴֚µv?‰v›ˆvu‚Ûƒï[Æ*~y²ztÔß¿è½8ê{åµO"×o+rùNΔ¤Õ”ï~ËS]o–ÄR÷ȯ'O}ÄAéɤ=¸1ÿç2>ý¬‹ÿEÅúÛ þ÷«'ß~ým)þ÷É“oŸ|Šÿýãw1þ÷+Œaû1γwð@‚  Mì!Ì>N©îqþ6w½Á¡»ØBM c·® Cz5Ç ¿žzGü~v~úÃqµzCø³¼\¼ z/†§G—ý£Ÿ‚“S,œsÞ;¹ø)èÿˆùc?-ž…ýøÉOHØ`ï"øéôò<8}}œ†õD0WcI9|£ª0âS"<ó ¾žá»¥`ÔN`›ª8S„¼˜ÃqÙA¦ÝjÐ,GÊrøU6–øÒÌœ¥'0*SPȘË1¯«†Ñáde©j"¾$&p‹€ø¤•!ž1¶ð-¼¡´²¶nŒ¨hÅGNaƒÐÈ(•šÐÜsê…婧 ÕkÉÈh Šå‰v”‰‚Œm#¶A;L£;”¬ @Õ™Ó<3\jbWÕpJµ¥)ðò ñ‹6ØG*@Y^ú§ †µÇ¨`(±Œ¡ñ¦Qz½Œ®c7ôÁHRÂ^ËÅá»éÁ|Fʃ`HÎÈnQuÀõ@è§j¨)_-|„«âÐÍd™’ñ Âø`¶„X‘“ÁûÊŽ™”Oì‡^¡ÚY žTÅÞ¥! Góé²ÀÿÀÁ°ŒÁöþ6"˜¸Æž ÑB]“Š©¸‚éÄãeŽ‘É Ckþ”–Ñ­Jh`·³<¯ï‚äÙÑŠ™Å„¶eqC ¨$Q)(mÚëÚe+Ý°ìÊçe’  ËQð‡ Çíº+ÕíAþÁ¡ÅÍ°f£‚ŒÓBÃîC—‰\×"2!dOÄöˆ09 &0+ªF»Œ`¤²Ïé5!<*œê‚Áü¸)†×&&‚Ë¢{¾£Ý_ü„–dJoAö¼¦ðpÂ.DÄ6ÍtSdÂ"tƒÛ,£H£EÇ‚®‚ÇùhrF8&ð¹Ø^+Ü%BÍâˆa„á¨Ý¨UÐ|l¸T3ŠhJgCq´4Ü–DòQA}`÷ô­iJ¤Û@`©QÒœiº$¬»úÑrSêœ  ­œRY›2ü”¹S­0€_6±éÄŒ ¶f2Ín‹ĽT£Ò'Žø¯”ˆ ­ˆR³àÉ\“3e!†ÆÛ´vTûÚ{k ‰i·9bÄgoÜØzLÚ°šNˆ`!²NáÜ…ðÿ½RêιEZá„MKè˜ÜlXbÃOÐeà€ó»k&ˆ•þ'‡Ï‚!ž ¨Ü Ƭ^ÅÒ‹iÀ±ã [7«Œ º'Nög÷ÆÜ"lÛÆ“t×MB‹5*ý2Áp×c±Y ¥ t„l"cÖ²¨lZ7EX('4ÂÙ*pµÂNpLºpÃ9\Y,}ВÙOc¾«¸)´µC[@#¤<¡7Ùmwcº².5‹Óí>~¬¯-øæÅåàKN˜ðYAèw{±ïû.øEBf³yô3V¿§.:m—©¾\ýªùIˆöh~âbÖí4#¶I§iÝg·i9!HÂæÿHMM“°Õ&©ÙPá·ð BeX»ptzâÅ,bà– ƒo\ÑÃù®Eu¼ïµ(V]‰@1ˆˆõe¡ïT’áîN®•á“.RNˆH`§DU4rH¨†Æ EõÄHc‘ÎðÝbÚ·¥dÂÒÍØCI„­› çÔ£¯H¹5V ¼.ù"DÆùý{uþh?p¸ÿÏCáàä ÿcð˜ë”Ùˆ=„,µo$MjÒQvpÝ´Åmæ0³«DøË"±`GË„oÊh–)ði`ÿpkØ ÊQCÌâ@ óÜ€ !½=}Ltï{Ö†áEï0|1¸Oª_ Ñ5¡IËz¸ì»íÒ Gý“CÐ>+¨&¼C.Êô®LX:´ä[ˇ¸æÀ¸©Ûn‚åt‘̧Ä'¿ê6› ÷¸wìRS°^­ož´Í®Døë t!KúT’íêQÑPˆóbV\á w¥¤u!Ô@Ê9MÑÚXbûf…¦DN»‘u¦%À±ÎÕ )N¨TRÖ•˜¢î Œa¡Üì``¯nê¿ãKµAâºÇWÌäFKi뾃°fMÉäÖŒ´IZÙA¥Ùœãwóˆ0³º šzEJ±2ìIsG±s/vfˆÑpT³x–åMëJ‘’W¬n Àª¾ÀÅŒ2‚¼»b–õmå;¡šb,ïñŠJF,²à"ëh›—Øç6$ˆ"M±ÅQ(žKòfË‚àðÑÛtQÀE&E'>KÅ®Oƒµì?$A ^![D TÃ’]Øv¿À›+ƒãÀfsÝöWÒÛ6·tqSº6 ’jmÛšâ,ÕMÙÙ¤Û¤©¡`™ËžÌÒȘ˒29¼ „êOéÚ–ì˜ð,û*eTù(Hx©$8K[óD‹‡mÔ˜_wÄ=ݦ ®¬EÞÁâ)ÇWËëk&Œ£bÌ çI¯¡Ÿ£5áîÑè2XµJ ÆW±Øµ & ­—˜¾µ NGú'£«£´ÑÕlT«âÚ:¡BÐÐÇ*YEˆê#¡wû(V&—$ùÌÄfGTFå¿[ä ßÁÜí'a¬d[q\*­S»ÒÓ-»Ö]Â]” fÒá¦âo1—b³šâ-æ&Il£R«­<@¶ïȪb‚[¢µ¹²› ¼šâ3°`Vhâ/?^žéÊ}m«)8 ʬÛ·©+äµÂY…†œ•jÉÕÈ‚Û¿µÁgBïpè+CR‡z'áÙåðU‹Žü¬˜w衃o¸JRK™SÛøh;øž ¨BŒµ2†É:ÊV©ïÜvVÉ#ÁŸÝ–*{ç›Ã³ Ÿ´ÛZN’>DÕEE…DãÜ*k4ªö(Ü‘CžÉ'M{¦JÀÅ°HŒ9w$ ‘DUoª¾^cî´t`ÆÎRîñãðûRKŠ_‡C)ó¸Ê9G¬”ô:v‹0Xdt9(½*`@t×yôâ 5Ûà5hø^΄Y²ö&›Ž‹úº$N ; AC·ö!ø—ãëv„t‡UÁ‹”¥â‹Œj¾×ôqž…z©2\ÐR%j``J׋›)µŽoµ,F£{[Ë¡,wbs3‡:®s]ˆÄÅ®Ouf5Óôm®¦Ž“QG8¥–>9=AxñÖn»ª i;(§sP~f1Y•òûÏ8'VÕj°œÖ>ý',j…Ë.à1Z¥±2AG°ø¦Œ»‡ñcQ¡Î©1(ã"ê\¶Õ°ÛDV¨ÛOËñ.î5yEö²ô"q;¹6Ð-J¹rÙ:‡tã}FºI´œ.:–n`$qž:;Έ!>#A/+ÐRÞ²“¨Úp´%&£™ú5r0ÐÅÈx×^£ø%3Q%µÅœ.†)W;³ÅC¼v– ¥ç”‡Qh+$?sÌÈÊ…‹Â8aÙ 7›-S¶ÍËH|Y‰¯ 7 Öš²œ›Üw‹¢£kÿ*[l#Æ&àLi)M¥å²©Sʲ1I MG°Š9üÃeà–JÇÙ-¾Çb·•Ç–JÒ6ÑâNú!÷‡Jô46³ãÜ9#ÑÇöÝne½Ò8ŽNxƒœµ¢ÂLÕcɱ¸;k¨wìèdÒÚQ¼_V7GK~ΈÑr~Ìpðß}`–aJ%rÞ&KM©Î[Áüˆè‡nˆ«F"tN÷&‹h}ÿy6Ge=*9ú[²•9­k€âß8V•q;mLÎ9Ý‹7ñjK[żM"tsý/rq¨8fM!‰òÒ¬"NEá\ÔÑÂä$¦Mkü7fáß5ë”Ú’Jß°ïÎP>ò®“™(šÑõÊqÈ´µ*å‚5fŸ}ƒŠTédu?I4.G2PÔ[‹K+_IÐ6Èå4à @¨Ï‘bÐõÄ"ºBÀáþ_ØŒƒqA;¼6Ì¿» nûßhË@ú’ìç{q1³_¤úvì·™kn¿Ñ¬6cÎ0ºþç½ð¬wÞ;’¥CG¡ô_\:€¥‡ý“þù`?<=‡gýýAïH¡8ÿìà<â&+ owôx†™öÃ{_Ûo»Ts‡&®ØÜ0™%ӈ̻!‚‹ŽÇ:Û¹b‘<‡ø5…×JTö"Ëݼ'PRAa~cK]máï h™ôÈàÊheÃØ\ˆ§}ï«Ü«“8)—-ÖIäƒ#¡?œ€IåÔŒÕp~?Á‚­$dv\.«å¤ùl)KF°lî ¶=¹y6^R.Kp³œE\‹xíÆM)qÖ¸ÞÆÕÚÆ¿ÔeÞpTH ,öú`5µDДˆ5l 37:ëÃÁîŸcøð•"À7QæXfG“ž²QQF9UÓ‘5Íš2Q÷sç»öˆ"ÖY)…•º·pž]¡Y¢©eô¿Ž‚Óíb¬*%n0*n„Àï¨zXZˆŽ†iÖÔ5'ØÙëçîŽ_•\æçQ •ÞRWSr»É\%®ÑèxŸË˜àL: èMn¾v:çk\¢Uµ,Ú*æQ¾HFK¼TäÚðÊ×û¨z²iW8A’‚ú«hJkÖ64k¯¹(#"!©àž®‹©]Ía ¸[Îi÷߃øîÝÍ;Tò× •ÓIÎ.ê”g£ éLU ÈXŸ'× ‘¨'ü®ÇrUÏuqj8![E;Û£Z[d¼YXÚÞN‹M Æ5’s÷ò‹­ÚÆlï}¢Ìã+M[ûþ:š¾Q7ÅŠ½MPTãrV(%ºuœz‡»¬ð*¿»¤daLš2Kw”æIVÜOKh¿‡ÐYêÊí¤.ïö¬.}ì°Ý]¿Y¤aÈìÄ/jíÕfAGõæ4N”ºOf¼!­Âªs§°/˜ZW™X!®Ï&iÞEißä®ÿâó‚)¼çtÊ1‰ÌXH…Á`Ã91|ƒÉɇÿD}N¦ hMýço¿©Ô~òí·_}Âÿùñþ´óäñã¯+Ð= ~M³9)œãÓ ŽºgŸ`{þ¯Âö¸5õ.'?…/\pó¡"¦õäËä+ÉHR´ØÛÈa¶5¬(•žÓ59\`ïÈ©}W’ö¼3å¨B]L’ZécrSÙÜ&¢wQhUš´¹‚W]{lÉ)¸Þ«ìõŒN¥^w]@¥ Ðí‹Ò„TÙH¸Æ%É\Êéé+™x?ë…In2ð¥·I|Ká’ØÊ6¨9°Û ŽÀj`4e9ÞãhPä•k; IN…c«E41£MÆiXC%ˆE-D`,²\²ôm6}kø<6hIgNÄ”œ¬äÁ3ˆD!Q™"çb“häÅ;‘åD˜Û˜`lø blU‡´M»NÉÑ×±Â+AôTC¹<ê ¸®ø-ŒXÞÙ¨±HeG©hfx¬-‚CÉ9VûŸcf†ÌÕn¦p Ó)³ò¶w¿AöðÍW;h ˆòÑM²ˆå ùþ¿|ú¤ú¥ Š-4~*…4$F”žo˜a€ÎU¼¸Ažäѵ)‹‹9«ª çóˆŒÐȃKY)Š ¥"‰ø#”ÂÚ4†Ó”q¦¼3 BÌHV¾R0v¿ÙÁ–¨wÌ-fãç,z£¨ ô{G]¾$( ó¬LТ¬wü¦ÝA AR£cMCÒ£éN1v âP,š®– ð›öºÙ‚Ç3YzÁÖ’˜6I8©çâÃw˘dð½U1º ,ììâLC†ÙàD‚6ÃG&›W(±Ž"$)ýIÖ<´ˆPØÙ,Ä(NœM¡-éU‘I3Ú9u;ÂäkN-!µ¨±§•j$ôrø¨‚æ¶-å¯r ‹¤†Ä™'ã1G‡!%Äb‚4 c‹þ#]LVW³¥º¡¨0EûªÑ#½äˆÔC8`…vˆaö Té¼d &ÖÀu›è¶¹mjÀ}óU¶k[ÁIµèCû£Vøzp‚/¹ýeX<ýÓãwØŠó}Ë<¤r?_||f>=}‚ådëZŽ¦ó›È"Ã-—ÏGÜbÝ›pé·F­»»»ßø¿}}z~@pAµÊ­ÛÂ×6@Z&à6!’JõõçÏ©«yú<¼8U[)†þ§íï¿ßõ–ä­}á F‹éòQyTmé®,÷¨ì dÍ¢Ôy¿4^ °4×DÃw?4a%U’L´ƒš~U Îl4(8¹] ;åÐRèÛö§%$„.§œŠï;áª:J4âID2ž–èñ&ÞášÃU8Õ‚ð±«l=ì0“`PJõJ>ùÚ¢ÂúÇž>E⺤{êÍ“¤Œkóäëo´‰¢†Km‰ñBÖÝl:ù™Šy–2’G¤<¨ÌÊÊ2';Þ'ÙWP^E” –ªð½N5=½<5,¼<Ó4ŒºïTÃö‘c4-‰…ª~´5ŠƒÓ“‹°wp@à {aÿä€LÖñ‚ƒ(-c¨ð{lÊI%ÙÇ+3_81¼&ôózûÏÓ'_õ´lÿÙ}_²ÿüöŸÝ?ýñüïŸ0§¼ØùK7x‘Å7³NЛÂ9‚?@¾Í‹zÔè¯ï oƒMü ›& ÓÁi?Ì£ùMBØkZøÓJÌé&ØÕû„]ýmðyÔdð[Ôú^RŽÍ¤#/Þõã'@¼¾x,gŸŒfÿ‡fJöZ>¾7HpŠrÐÄÓ%•ÕÁ{hIØM–½)„Ü礌68e$PÎ @¡,£|zÇë(ý¨< )î¢Þ.'œ7¶²w"ù³uZƒyœßDó‚1éc­Œ_±ßÐÊíï°ÎMˆ«Ñ¢R@Vu‹o¾˜l!,\Î*ñ”a„1¨†tv„)#ÌOº‰©Ë®pwMÌ>Á‡“„i F‡Âi/.+ÙÜ+Ûq¡‡ìáI ±0mì.;V);ac&3©À”#qW1Š/²)K1§zê.œ¥÷UêcP}Å ,ñTð(‚A,ç‚B.à¢@ÿÿÝì*›]#5eQ4MGOäÏèCý™‚=eŽö£(˜¡Uæ:nm¿Žr$Ég $Î1¦ æÍ-ÐÉÿ.†ÅgHåƼ‘4ÆÑRh”ül»mƒÀðPá1Üloå\qÐÂ'„y“2zܘiläj™LÑ(:ºIÒR¾Žà|Œò¬(vè¹¢¤ÄXçÑJ”÷Ä­BSîpÔEcÙÒîȲ1‹£n]!›yšߥÑ,YÖñ=KX®È ¤”}2`U›Zh´¯{àM0Zûwí$¹a5aÍpW6Àqw¼ÇtøÏ.Î÷$8[A‘ëQà+·x)¢ª7*A€ÞYj‚c¢õ’2U9GX¢AUöªùš’i ³ôJSþ'Ž%€ñhŒ]…§v>ecM3Ëxs¢[m ¸›"ž%;7 ¼íNº ¦)_‘Wø6ÆìóŒ»p•n ¦—¨a+ÝÍvPôËÞÉp`Õ[^_“­šCŒØÃNŒ^}bÀU)øL¸ýè&KŒ}”‘Çn"R†9BRÁZR¨6œ Ž‘òñQ1$À…gräh9¶$©Ô6®×ëóÓ“Ãî S‘ qRÿ™"¡øRÍjŠ/URùžó”õ¥ET{Ê8àm­Ÿüo“Î×åFÅLÀmû[¶uš¬´f,I‡z„1•bUÜT%ýE—‹´GÃöi0¤Ù3Ľà÷áøÿ#Ë¿ûn÷Ä4Ÿ&)~úGüÐ|ŒBǬÈ*·™›OsÆ:ÉÁG¬ÁTH0”­#¤$‚ɤP” Yósqb>JoÝ2›+¥™ôAdÞyû@à(Gaš­„ŽÛ—K] 41ÉNVÔs·1¥BxcýÃ}‚$ŸärÞ]•ø§†k/. ]-íê4ó8¡ Âvé`/”¤Š¬á’…òõ܈¢eˆ‚1— 1´‹3f š*Å–15ùÑ”¤ãb¸Xr¯@`=rÄš-–X¹€mš®Y ††åG)³–ª Ø XiC¾Ê L9*EPÂ%[µÖ3@•LìÀó‚ ……#³·wtÓ?¢ˆ íª KçD_Ÿ5UÐOß0¬=J@ÁlÄÿ>ØíX¡ì«š²ßfßÛBÜϺ*ÎñY·!«µÙe­4KwÐ(Ýî–6²¦)s¬¹ôác¬=ÙaMN'×ýòÁÁOrÉÅF&'¼\ëšÂ&D-'ª¬ÙJºq·Ùrt¾Š”ø|dèCäCø9%4i ^~ûm÷iÇY|}ù£ˆ¦Ê»v‚Z'Ö% HE™%]œ†­çØ´)Å­Wj|-Âë;egf{;?‘J ow}9oõI¢j Šc«‹ÝºÏ½^}Vc{›ÝŒÈ?KÂz527Ëf!6×n•Â3C ƒˆýùÛîŪZÑ¿§+yïkLíÒ®¥$eãCƒ±ë}%°èÅäníqó„nt¸h!ö4ǦÚzóý__žè¶ÞÓ·¥vÁ5·×s#ö†T~ΰÝN»ƒ X_UÃDAF+°Ñf…,\T)ñè—„4U, ÌÛ{„ÐL³X²–%d •3‹5èWçùLÐÂ8 \¬ŽÅƱ-áu6§ Z…šf:µºÝmƶÊ[×Zµ£%æ}ÈÃÅ*}ük³2Ÿ­`ý`ªª¥ÿIQ’¦“5Heå‹6R”Žú5“2ZÔófdÆD ´$uÏ1X•/áõšžEøjÝ›»¡§µé&äoëT5äoïZ«n#÷c‘ïÑ;-ÿK¼Ò%×ÚÃ&ˆT4£7+gr@» QY ”p8î‹¢óïÖÓ ¡Í8J±£hd©óÐ`QƱÑNˆnq>yLUjI3W¶‡¶5tråU†Ñy989ú½¿äÛ@gAýœ»µ¢×HþÇ•¶°v×'HEJÓÑÆAº7KVúØ`ôAö¢ö‚±&„•1÷‡ÇÂažTÎZzD2i¢I–‡*îu%mörÎùwê¾j„ó@5¦ :®hJàÄ¯É ŽÞBUxùBoŸìi#ûaRšË¸~'É¡»Fú‰8FÀE‘¥9aÚ=Ù€ÌUïñ¸ãä†Ä†oó—5‘îs¡íbÖé[wŽñ#­Š75S+›¶W7ÄRE†Áé¹*Î0ä#¬Í܃ö‰ÕM ôK]¸«´ÖÑÅiWj¥E¦³Ô)›‘>Ñ5Àï¦Tõåˆk«éXˆíl2QQ+ÛÍî]1ùÉ‹p,Ðßdè&Òîz‹ˆ÷Ô®eþ·³ Úƒ7ó8žOÜ[c,K³Íÿ@G\û„&{E¨úAƒÉaÛ¯~ªKƒ´ Ik¡ÕÁºÃ=Ê©Q¶ÄÊ]¤ƒ°×ë#pmõŽÿÝOO`ÅŽ{@«Lü†b›†6êT½LÝ m”~D <.9».žÒ†7¹Ê¯4¦¯Do#Õqë•äuŒyS¦ö¥B ׉jDC61 JÕ­"F?×ÿ\ì žƒBµâ*Lký³Tñ•¢sˉ~0ѳivÍ×ÚN“QaQUT·­¡Õj/O#ÁÍ&ï¿ô~è…B¸=²ß8"×ê¦ú)ûFªá25Û°È};¸A¬ß†è+T¸–æ«o4´/›¥S*—‹ÅoQ®yÙÿU#…Wg4+tk\C¸”œ$ëRã“‚À¨â\ë›B¯ÿœ…¸Ñ݈œ¶'TR ‘¦$ò³‰—Ô×ÄcÞÝд`Jb]f´ÈwTùÊÐÀú¦X¹U1ÔE ßãRKR}E®Wéÿ=@UŠn­8?öÉYqL|÷–Õ{oQ œŠ&õpË6§SÇŸŠ[Œ³ÃöÌÚ|ööçùóïAÓÇÜ/9sŒ,¨ }Ó}í>쬥# “àÔ^Œl²„£ki—b[ ¹p^¨jQHÝÑÕ¢¤F%Å–3^íúЋqRÈÓV?Ôj]ÕƒëY`\ÎÇŽùcÝa~:ÓjNÀƒŠÍ’„‰eš$Y»Ñíe¶•e½94‚CCi!=Ëq6$Yñ’1xR¨Ž9b¬©mo}d^Ó=›v©¨ê¸‰ÉŠŸ4JaÒV5¿&fS퀀˜Y>"¯†Hí;jÐÔjI`5°¡÷ÃX‚çK’„JåÑ 9 Æ[#¯«C¿Þ`¤Ÿ\OZaøpùa<=EG®ö v×GK‹„M*#Ø@Ê*Rj@åºÈ5•¦Ky6U8ÁR¼J¹”¸Ó¥ÈµWw›’¥©;åÔx"5þ¹FM½Ý53‹üÀHÉO‡¥ùa±iY×6Þ[“{â¼ÔXÄL³p<-ÖÈñ¨*ó^9mR`c’ÃÖê“%‚êê"¦D|2i“daMÙÚ„hÁhÀÜ]]<ä¹8}›%ÒdHŽ Ž1»ªÈ& <Ö_,š(º=[üeDùm’Š‹Jã¤at¯Â ^§øàdòÈ.ƒ3ÃT{Õ ŽË6¬e1T/ã¼]~ýW7¯®¥v$Áµ÷‚<¶Ñ¥@…o ‰”ç·I‘­¶{¾É„ÃÛ© „)~y·¨Qd»Oy!øEZ€mzË _OÁ(EИP'Rj“GÐ 0•¸$ã-Syd§ž¦Ð†·¹Æᶲø¶¥ñ&9àPDÐð“su)U_5hê¹Bž½£v0!Žæ« Nl=î6&qמP†âJ…óÞ~?<ü0žžw$¢ÌÊ¡…´Fª'JÓda¸¤õ£BÅpfkæˆÙPšƒØꥉ‹€Ë…•à01x‹Ü_j»Á \ûyœr¨Íç“Pý+ ÕÎÒXZð¼ºgEïÂ<-u´}AœÇåÌâ1œf‹ÅIÄe[S³¸5Jõbt\ Zãµ’cÖo'âGb%R¿'‘„ÂÇÝOôú+Ñ«E4 Õ~GQè et ®#4zÃuK•IÛDz$‚7\9¯«YÓ )q·áÍ¥¬hR™ãlÖûJÁ)\$— RÁE¹@ eCÝ`TD‚¬@‰;Æj¾ISv%,jý$T¦*…G””C¬¼ ^ç:¦üìS]ó\¦M)ë—°uÄ]Xl8Áh dB79v»›Kȶ‰qiܳ‚S?çØx‚c‰$Åî$ù"Þpód†Àå˜ LÂIž1–ŠÆ oØ”Äcâ&šú\£7!ÖMiµ;›ŒÊa€ Ë"&Õ[Û—·QS: ev'qãÈISø(2zICw IL^˜‰¸¾ä­ŸÑÍ·áDÜpUGg6è ›šØÌè– P€ìÈ”¨kÖÔ,J9Ýijº"{ó¦äöÇ·¹~»Å£YSÏŠ`»º}5BœrÂyw³¦J† ÿ-ß¼”¼+ pºFšY•Ÿš5¥ªl{Œ¼„]^ÎÍÞpTüÏñ7Õ¨hœöÚë¼t2šù@­ç× œ|TGÂi2KÖŸCÉήúCG‚Æëå˜8pŽj*XŽ›¦´e Td‚{}z\vXyMeÕE ›ºA”)RÑ®¹P¦†ö_/*: óbpÜ/OŽÇ\|ÒíJM›’8…ºµ¿½I¦qæ¦qô§Ã5á¿âmÔ”ì÷ú¨B§ Š³"¢Ÿ}©]p(–q7’Bå76í‚ZQª‚=È—ŸP帱íFM!X_ñÉŒÿ›©;fë[#3L²Âßlvi½^ëÒõ Õ‡ÕKÉláQ†KvùGVº×ÑÔÙ‚"ë §G×ÑÔÑEÉÓl׿fm¸s6 éŽ'Ó‘Z¬,),lINÄ»5*+uFbo"‚” bJìÐxói´@˜¨¢ÖošÒd!~º);ÚNNÃþýýË‹~xÖ?? ‡:š(ŠS²u¥öiVs7™´}‚´ˆÈ4ܺ3Ç‚ª*⮄fÑZ»™´d‘à¹ÁÉà¢íìÞID.7uÑ%©8Ó͸Ƈ®ì±c²÷dëœZ«©»2L¾þ ã^V4ÉzO¬s%ØTVéÅxÇ"5‘«‘ §0R¯Ê뺺«^/³¼¼lF;‡(·9ìLáÒ~§ÈM«ª4µ÷É…tÒ•±¬Rõů}«k±€SÚ¹°¨Öcc€øDd-?˵°X%"jwÎÖ¨H«Ð•EÝg§ÃÁ;¡:M"]rØ7=ÃÊ3¥`"– à…圦⠀a’Ý-)8gèYÁE‹¦ „]ÏRÌQ°‚‘¥pËÖ¯0/اT È¾í>¥R6O;JÙaû"·0^Û¥)`¸­:ËRu Ï2’‡[Wž”æòj¶v€)bq0ËL ;°„\â,§â`2CÁÅh=é\§Ùçñ4~Iî+ uÐ×ãGøŸtñˆ¨F¯æŠö-†(f;Üf~‚‰F F«Ó­4ÛÉæHéüظrI8¦©6c<¹ÃV'Í\®6‚·Õ”UÞÝP”[µCï\,_‹%$"R8]† ¯ò(U°Ë¥Ê*Ò @‡0‹ìp*B²P£Òöˆx •Gâ™—²´Òƒj‚<"wañ (u%ÁàeFÙá8eŽ0û¨É‚ðmŠÖSu…cÇ76l$ܸíîºpbw×”^vv©Ù³<)ë¸v;̳N|Q¹(È×[m³4Ät`‚&p m"Gkf€œÈù!©‚SUîÀ˜“cÖáÓM^eª§Gá”-ÝŒëƉpÁÞk©¬ŠúqªCf¸„NpW PNñ&® @ñÑ ƒíB"³Ë=\/#ª•`U<ßÚèú ç$ñš¸®b±¼^ªQz˜ª¨£:–™5I´–¹Î†ãt¬› UýÈcâÔá;räD6’cļ¹4*g¨nš°0‘÷ «Ž—ÆZEiªÐ^-,¥óÛ œ&½Œ¦³4Yñtb¿!»`UõB@âêNžh$BÚ šÂot㊹‘ZKšTUÉ·f¦¼— 'ËY,~Àìâð†yÎLoƒÃõÈ-û¨ ¼PÀ5à/º“²³t ¥w„€jXïä²wþpðBi#ƒÉç¬ïitÖdq×­;òÊò'¥0ÔŸ\Îb8øï>ª@Ñ9ƒVáõ<,ˆLú-ICU&¬š9ùA=…|”ïÓ¡€ßÛBÃ"/ç-—¯¾m ZIËÍtÜ}4âGXç$ü†¡Hwu—rŽ@Å¥ê›l`Â3~SöG±ˆÇÝÍ.©õòrøj(fÜô7"Íæ³é•³f%5n¿äiŠ{#h«z?óRcºƒZëW¹c/ÝàböM´¥A2Ìf¼Hàþ-­Rl§®Y Ø–”ÃSØå‘ €J⤀®ØÍ®äo)"§ÕEàóBÒã–>廎˜e5#Ãw•LßKîKbC¦ÛÉÉí%‡ŽÛ‡+è°Ô˜³ évÁ»+G<Ï»àM’‚¢DãIV’Ÿ¨/¾eoXqĹ¡ZÛ\“€ÔŽ:*µá”1ªf±Ï³u¢Æ×ÉlÔ¶”âd’ªKF%„KýXeƱC '¨”g®M$·ºó´Ð.±È>#¸5–o,C®4YœŠF쇴WØ-.¢äLW¥ÇîÊÆQ*`:˜©âk¦¯àÙuMŠY`”Ðô5’yƒ$Rªl’îàÉÔg§€^ã•+Fyl§=ˆ6ÅB£’„ÕùÑ¥N5Éø„Å™Øqãwшk7+«»®}quW¥¾²ìâ^THô Pë¶L‰!Ú ˜„ž2#–¢*–èzÄQªñ¦ô¢ 2Ë÷õî‰ZuŠYêðu’rùÕ‰µfÚs.L¥U»ÁÂtqgåŒ —(e&ŦS‚K/ÜCà,?9b3ªëE²ìBí`A®ÚùB¡hpígqIG³˜m l[ƒl8§$BÕ“GXªDCÁ‚04'ì~¢VÚ2‘E„ ¬’AÊ yȬAcÆð\s—´0¡ÏõxŒ¨mçr ®“·qjo¡ È­uL!&GÅ[w1‘ùaͽԩ É*‹ î XžèzexÒp9jŠÄ´,‘E ä¼²–9‹¨kÖLŽZ°Ù¶ŒEϘµIã„¥W*‚l_×ø;ÅÏ­_ßZ+ät¬êó)†¢+h*­™Ðß8 Ù ƒ±^!÷{äZ¥:Eæ¡F¸c “ÑEl×–Q¹÷ ¦¡³µV”P­€Wð}—x÷C'hCG7¡.ƒ˜ZÝ-^˶i›}ëâü²ßÈüå^îúz¡6ì‚ÚÊÒ–ÍbÎr€e=ܧ5D«TžÌ0ÝhÉÿ“bB0lSŠ¡ÁH1Ï•Ed¹(Ã/{‡æ0¶®}³ÖäTr‰I9I9î*ÂqµŠUZRH4Eà]Éc¹Âã“ JR»ËéDy!Þ´^Bî¨Â˜eÀÕ¬S¾òºv‘2}1Ó#BŽÓ;•ŽN—Ö­ÂÍòä:I­(”¡ûQÈO´[5F€v{9P(D¾RAyIµRí’vtzö­Z~™@„ “‰Š…š»¾Ä|ÈâG\aµQ)Ì–pMËÍÐR»#5|¸\¢¡!íuÐ5âô˜:ØH® ©2ã¿ÌîÊ )ƒ[žØ±Ö9-’ƒ™Ö¦:¬$LPñøKºñ—Ô¼óêEàRDÉ4u#($` V(Ø!„îƘe6$Á–«ì•VpŽ4µrCqžs”ïyüª†å2}Ý”¶ê‰ÐÊ'6]c̾ûؘÇÇHƒÄTÌEše3`Qô©œ! ç“ÚÚø°çtÃ5j“Ô\Maunk7}PÕÍ9°æ©8m5[x y&ë²,^©-b‚.X«CÓ7v¡%š¤W¹èP™€i…Ò¸NP'„kJ´-¾£R 4LÞt˜ ®->.5Zü³£B¦B·‚é&)´*Óæè ù-¶g)_䃬¬Ô \‹= ä>˜Ø}hqZõdʵ˜scë,H|@(K=zèdSÀ1ýÉgvdÉC–‹¡Ë<î¸Tñ8r%Açîâ,A[b*¹Š]°½Â vΠžˆº3Ää¥52uÓ¶z…@_ÙÄëfâê5“¶ÆšØMṫð=z¼¥ýƒ«W×èBJ;¨ ÈAÉ{ bVº[ê‘m´‡Š`ÎCZ…)൵*üìKéýKLbÀKÎo[¬Øá4f‡ÆYRI“¶\] ž¬E„»°IA‡Zù„‹Â›¹e°äl®0›”M­Gìh÷ÐH"—E« n 4Ú7U¼û("¼'銄KUDG+2[6¨7^£8'f!!·˜Ü¹PÖitY™˜=)¬ÊöãUu$}Š/nÐ\¼0»OáUbyµc>*™Q`Ž"cE…(­k^òŠænódSIñÂØÈÄ0À¹«ºö»Š°B[bDáµ¹ AÇܘ¼.¯&hEµ®C@ŒS|T„‘„ùKYv^È2å¯O®çRyh‘Áí Áâj „jÊØšõcZ¹²WÍ„˜ñîºÚŸ’õFrU&*?DE4YaqÂæ­yI¯½ñ˜rÊMW {ªJ´²C ³ð;TZn»Û5¤V:<«Ù°.¼ôá;Üp[ÏáÈ‚ÄôakÌ«"¹’Ë-÷ª–¯/÷~ 0§‘~Òo¸6L|ÊT¢ éÖà2ÞeûÂÚuB.¬ ;ŸÍn¼•¶%®“½“`N »–ÿĶ}gÄÕ‹q-q6σ‡AÊ*Ù•Ç9`™Ö¸)K,C»Ì‰öØ< ¯Ä`b¸Uø_«‡1§ÖíÀ%=Å@ª•£Â„qÊ£ÆvâoÜõL8ÖOuiX†r’LTë6r$•‚BvI¬| FÊZê>#ðMW«l%4Obð(,›çÃ}+¶¿kšÚ7µ'¦Ä/€õšq©{¶tP‘U ³“«¸2*  VýºlU—±x«¼¢E]Þ@ô _S $ ºDË&r+W‹ïdÒenK2ÛZNà;=–8kŽ°ëì“€-këØŸÍ[ŸÞ f¼Šñ+U?ÄJ[?)ê}“©Yƒ ¢u9v¸rÔVŽ*g`Ö÷]NåCO¯h—lð _Öušå¥huì‡ r’+E ±¹œO%h“ÓïKØu÷P ?—-j¹ˆªÅjÄG7ª3eAʜ͸„ײ¹ôY@ujGqBig‘ˆn¡]ìÈXÆiOb„)¸s^#»Ç?ÃC#JÜ*iØêQ´]¸Z L#[æ£øþ·ŸÚž•7ZL{£.°öN9ê ô(0Ü:ØDä;Lª£™m5þ'©ùÁ^aŠ$WϨKÇg(H¦ äœÏ­OŸFds-z†M¯IQmJÛ\}¥I·p+qx™ñ:ì)³ÑâK #0 ÿ¦[BŒJ“ùrÊu"ÜMé<έ®¼C™X—ŸÄu*{žt7Ëß­hÇL‚·INn¼1ü{‡u&à×úìW]àKíà[ RÙË$95ÊG7 ˆ.)ÒoßÊvEˆ” .p1ØlnÂRèL®"›ýÂÄXÕ·/îŽJ:°3mǘ[<˜l°0lgMãwvê8‰å61`‚ÉïZ–Ð^èÞle}¡dÛð=\d¡ASϵ}ŽÉeÌÜfÒRh 1hìWñÝFÛ ;É<W¸Y )UWí6Õ²zvåB%3OiVö›ªF&ÿ±Êˆµî§Îgƒù‹’Rê¿)JÙ|Ρ_Jí&½AÐ=Ù6ïìÐ ¾ú\²j¡Ð4_8 ËpI¬LM#S[¥2Ö‘LI—\øóg=…JÉlfXÖõ#.c|NÃÉ)ó!L¹ÏfŒÂ’*çyò–â¥-+gT‰Ô¬ß¡p¼ùæ&ɱ¥•#aЧöŠü¤ò"†PÞ)˜pÜ*k¶¨`Ø(yœõUʧu¸n©VŠq,£7Žj– j¯ÁKbvZ6>2Q¶u²¨ª¦ê¡“[W)œë!6”„(ëY²v°€_ËñZØžwNͱ@`ÈäH2Uˆ•ÄEB©y6!›”§†D V*oä>æPk­ä\Á]CFHœè;‹ÜõkÓyw]Ŷ¢„¢†`l0<è;Fѹ1ìš’[%"(xøä µTgT7ÙtìÏE†ÆŒk ÍJ,1zˆåî[æN†>J*mv¥¶[t %£ @; ™êÞc}å‘<õ5X¿¼¿áÚª5Z¹¾åëÆ°gƒ¦3|HD͸ñš9ºpõ|?8†‡@³ in Õ,Ê"C™¼~ièü%…Uþ½"G·š‚-Dä©ñ’¼·yD‘©«ÏáoH)4ß•dÂÕjð³# í 8ü¶Å!mïõ¨˜éÿ`ËÏ’’ù¿áýª¬s Ý[ƒj+ i²1ÉÅ­L)ÌS,J‹/!Fã ??‹8]Û‰%—ˆ8¥í¢µ«l±ã8íýGýf’pjnÚf…Ÿõ (r;¢žÒõ\Úžµ¦Ñ9ÆËÓŸ}}«0g)˜Qj­˜þ Ùèû4O¨Ò­¹3l@QöÝö›JU¶ÑNUòÌM§zÕÜfÌ5ñaí¸,ñÃÚr9ɇµe@cŸ*!ž5:`?/±hl=™åAøŠ"dÂæps2í£ž%ÊmO@º-,¤ñؤèN–bÚ¸ÈÚ%—dA“‘+- ››R¤î/_ÒÌ*ÿ¥Þt7ø:60&ÉqóÖv( L‹Óaü²e–éxš÷\¸4È+›¡ 9lA Îmd„˜#©Ieø$Ëâ[‘÷ÚÁÚ‹¹ÝÕ Nj¸†Þý¾  ŠGêd[óÙMÇf¬ºêŒ:ª:`K [3bgÀî•ñöfX1Ï Gq— ¡2 “2S3^;*mÕzú±¼Ôxyméë3\öIá äiY<ª_fÏðK"I»[?l0¿Á–öÍÆmAKÉÀ•A¶f¹y]èÍÁ@icJ;gRá=My„v°Ó`œ%¨¯mã™øêÊ6ÖÔ×L|Åî9¥F4OP£…oÒ¬2ÌC7ðox*š&"§w¥kö‡b 5KßÙm¯-§:LDëù+œí®XR~(P %U“£t9n:<¸ægsäa-¬Ç؃` YrŠŠkÓXÒµ»ëý\.aд‚ôL!K-Ð/ªc6‘ö1™’+LÒt´îûûã^¬^+‡Ù³R×Z«;ÈÕ•z/a$Ì“å Ò%ùãm”'˜Ü|=ͮȓAµQ)†OÁ]U0¶0½Ñ‰‡ Är‚UÁ[ ¤á\åÃwJÔ.š•Ö;Cš]+0„ïRª¼È8Á>x,<Á!éPú»0ÖÈ@ÕqÙ@_X°y‹Gðͨc«ö›TÝœ^¼uo‚Ù) ž!÷î737b˜{!ò_[ÅD:B3¥*1¹Ñó*I£ünOµ!Xœ ª£4ϵ’eú&ÍnA'a,"ÙP4¶‰îìj=Æl“h'[ŒyW;stŠ’^-F!0BzT4½ª.@ÐGRø µjäÄÍw Z_þ'‹ëŸ')~|ñê¼ß;n9 ϸÿËᲜR€×”Ç(*!›í¸]ES&W†/[h«x‘ ´jÜn`‰gHƒeñŒÃ_ýõÛÀ•¥)DˆN6ä(™³°äû+ ×µ%#%'÷ŒÅÁB•Ë*õ‚J¦#çž "˜_ÊÏØKãدþg“c¦(JcçZ ÖþR„Tù’Œ-×”óý¬àûÙùéEÿbžN.úçá«~ï,vUY5" ÐÏ@&×5uqN5㸩'Þg†½‹Á~xлèÁ˜¾¢‚DË<§8è694µÿWýÐ CÆðà)ÅÀäc;*1O„÷µurzÒ«˜X7Ç]eÀg jòUµŠ–%"©¿Ìþ‡²ÄpJCŠárÀÏù¤ññÜ¢·„‹·­ÉëÖL,ªKš1Q‘@ž‘7fWü:¨BN>ù²"mï£VÜ8TEi±'4-h<]D‡A*`ó±=èd™Sp¸= ÚÄ«&WZ ¦w¯»8VùØwS¡Ò®9ßÚTÖÖü€9>zêo#äGY6}f‘4®àº÷¹’Kô ãVá¦X,Ü»¹WÁ#¯4jkÓ+cxa Ýè”iÉ‘°xhÁÀû*·]'µNAbìh&2Ö“ =RéÿÊGæûH baáÅ0¬Ô“¯¿qaˆLʺí ÓHbG9¥$­8¿ÍàZHx“T-YvæÏæðqîB³&)eDD¦.-åtªSA´"@”$¼Ò5$ƒ.Ês QÄ(ˆ­ÀwEF0ÀåH"¯¤¶úWÈ3£dL¤IåzÑ’O˜E‚ÃÅÍÀ‡±­Rþû6]  Z&ƒÎ±þ¤J\IuB_BÖPqj@ãrÓ#ø /Ö!¾5Cw¯”{-âí¤P`‘T84÷Ó›¹"$¬ Ã%[T¸•rpšù“hZÄV€€nÕ)Ãá2=_uÄðx¨«K¹’ÐìÐv &‡Å…Ùou;€»ÿÛ%„)p8)E;’…«MLÏ“äz) D’úñOZA“ØTÒ‰ ΈG1¯@³7'´Oáÿ˜uå»(Ñ3Âl2! þV-$ãÇÄmЫetéPsýó­Ïsu÷¼8ï ñ·óþÅåù >wÞ ÂðåਆøÛÑà~«¾žõÎ{ÇCcº:' ¹ “l·>D}ÝnÒM]ÓÚœá¦á(ÎÄ­iQ%ÞjȤb™,HÖq³Ãˆ1ŽŸ}sÆGÝõß;•“†Ö¢SÞ2%±ë”§ðäl¬¿í*W¶…æ–1æbYE¤«†ÝFŒª‡•*IÀˆ¢Å¨ûk0+6·.¿ÚÎ|”qÔãs âÚx-4qµ—_)4ý£íJÓÓÚÔÂû›R˜ä߈¨ë¯¸û.`ð[žÆßvüþlO[·ÅF¥†ÞËf5„ÍçvL›•óþhð¢ÜÜZÑžàdŠÀ°ŠRcÕh=í ¶ …²ºñ“꼸·q›Áݨ& ùˆáî/g³;Â5áD|¼Ä¬îÆ°ZÁÌË‚ë‡aRÇÀ,…H²;Ð “ÿ#ÙA¬Á®ŒíÔÊâŸJz4êŽòz›‰M¡x¶‘Iæ@’-=ç®Ð±˜LõàÅaøêà|ˆÔ¤ÅCÓü(hM2YŽFv3ŒðSÒ”ŸæcòçÞ‰X™Ä…3*øQ®¿\°Y@I–›âœ>iû ¿âZ¶6Ï&ÒêÆËt¥‹Ž3*­fÊฤĔDbN2a',Ðÿ)fgm趚ң±@•ÉňqdQ X={1;Mlkø!WÄ8^X!‰ÉqÁ¬âF~âñÚËVSèûϹS¢À2aª´¦¢ÎÓ÷«H‰¡u‰î͹áÚH3ΘL2 1RfÃËhu£{ô_\‚‚yvÔÛï÷O.-×µUü³½z¹þÙv^;ïó{–Yr^öÍT=…º(Bó±o©ÁµŽ>3wÙpéoÜ*º±Û»îw}g¥nÚ¢ãþ|æÛ…à‹/ÌlÓw·Ì3, ¼Óã·”R¿DËóƒË³VÑ®èŪwNè¥Ò¢*=¡¨.iݨÃË“ýÓ££þþEïÅQŸæð?[+®åšïÚž?¤ËMûžœž÷ÃÓ—/AÌ:Ü´·Š¬ÚtU?¬Û:I¹¾wôŽµæí’ˆ;/ÃÁ=r/'½#à‘ç­y'˜t*Êÿ›AV‘Q¤XGœW^ZÓ‰ZŒaÿèå½:T 5©6îüä4<=?¸çTÃ4 ³||9_ž;ÚE~¯ž—©®˜µºs!¼áÅ勧ç'^6d´×z‚ÁžöM;65•‡aõOô{ÒŽóºOQ(5qØ?éŸ÷ŽÌR †½³³~ï|prˆ†Ð¿¶P€éà­ì, YL]&ÄwäÅÿÙD›$Øö•R++¢Õ´pí 8:]=\=LôšÙÃûNa­ô †hfk`Òú+¶t—•o±W—º´ÖÝTεÙÅ´Îîûφ·MmÑ­~œ+¤öòø¨7ƺ»¢ö‚øWÃox)ü×Áïqü W@•ù7áø÷æõÿ\_üÈœ¹¾Iß]Áq+Šé/]De;(\Ì žéêôÙd§–!¡£0)”¯Ýï¶÷\ÖTLq '‰ªYaec¶ã ±Â*•F¿‰×X¨}!ÁO ˜ÍõèÈ“ÈéÜl‘8cÙq7GÜL-tÀg,U–)™çö>ä²­˜~±ÀÚÛdŠ`”·ö‹Tè|ôIM¨ýÈ Õ:é¿n-ʈ­ÖâAÛÒ}ô§' VöW•cnûè‚q– y5bl¸f»ºnc ×ʳ·xÈ‚›ôŒÔþHùã)»fMW3>§§}k. àÞ T¬„:.±}uç’m¹ U0{SX;«‰ÁÄ/:‘æ.àÊ¥œêmV¿ˆ¦;ÛCHrO$œ$ÍÖ_ER WÅ•¤Rôl!'(EeÒÜEþ“š3™{š­Å)ÈF•º9£èKʃSÛØÓD©Ö©*èG•Þ !­K½àêDÓÂËr¸V`nŠñS l7e\HùVP [»Ôã5LR‹•w<ç+§@ûT°[…)Í ·q9'̺•­žòmv‡¡§ŠuP9ÏÉh©ÛÔ¤P§½IJhJ9ÉBŸ/•sB ,H†–R¨hc(Dìð•.Õ›õ¹µÐ'¦dN& I"]§Ôy±¸›ä‰Už ÞrŽÉmžqÅ6IÓ¦ºå_dhé@ÃÉï?|رà£tš[윉$SÎyÔÈ:¨‡tI¡ÅV‚CÅa4bYˆÝi„¥”ãé¼ :|C´×uy-87‡×sãÄÚrÅhEZ\lìmß ³²äo«ü³ú£‹¨ä4µM÷Îv_ã“ø¤‰6òäÿ-“‡G9,ÊåM˜çU:9º ¯BBR’ITAàÂh t!°ˆk`ü»*ítût¢ÖG¨ü‡'ƒ ,N-‚븺 êZ”ûRW–2/¨úkù2ÕZ¦•ËÌxS¬5¦™[ȈŒJÚ$Á Ltf8)Ž¼çâtÊt_ÅhýáœÒ`›s6·Ë‚2cA‹ð࢚8¢€çAéÍÎDJ¦;Œª­$P!¦eJä=Öu—;õPÊ:ò܈ÐFzì(ðŽ» ÚÐ8A‡"æ³Ô•zà `˜Þ–£¤l`—üc¦,ÆÒiPþÀDⓦâ¥1Dê8Õˆ$¬´xR)§TPX—¡âí³ëãÈ#J1ÒRb§(}E  †ŸGT–dS©k ÚÀGŽKA˜ ×Nbð™Àãû€ëüBgÎ¥d&2aç â¼ÐáÒ×úšFéõ2º–kIC1¸ Þ mQÌ<{ö?ow?•cÇ\|ºuE'þ']<¶×ý4<ÿÛöÒaD{Œ¡ú*ð&¨töƒþÔa¾ØŒ\°6Tp=*:¥c„^°&!f¡<.4æR) ¦§óżÝq<ª¤,Ïù.וQå'¨ˆL ô«&2›>ŽwÂ\-;&vÅÐòŒ2êX%7¬füÁ ,+–Á¢Püû×p€a»JaP¦ˆq3ɺŖ%«þxÅ(£Ða®þàL4PmäÁÊÑÊ*/n6¯]‡êÒ(Œ#£Z¨d&9ò¢ÿòô¼/5êM†´Ù–‰ˆ÷ÝyÙ7Š14bz½Âx¡ê~“)]mõfu–8EªÄS3ÁsΙ#}ú›àd5ÛMâbÑ$ÂRa. jd>UKH&F"(w¥´YgïËÄ>yÅÜtÞŸ'-É5ƺŽ”…XJŽáTW@^L.–ªâ{›°ep‘Xe›»ëÝ-yü%CG9Ö5ú@Õ¤8¼xâªn8a/ØXGÏ PZ¨ž‘fNeóé‹åB!uÎêæ ßì*ÀÑHM’)ƒ´dye"ñ»hFy­À±R¢“Å]× µaÜÐåÙÑ`¿wÑÇf…cØMP…Ä)û·ŒÏŒÂ‡†—ûûýá_äor¿‹A—Iì¸÷kÿRƒuBuŽønó¸ªé¶ë(DË,›…„Of–Lõÿb]n©ë±Ì£ðHE”eÝ[¼vœ²xaa«öîß«~Ü r´ÊŠ;÷Ê\¶sŸ8ÔÞjξ+=q9z/(¦Š'³Ò ̱%ñÁ«aǶÍZì-¼ºêrHm9E‹óÁ- ,¦âtT$ŸàuˆE“ Ü8s·XW•ö±y&¢©Rüõ2ÁÑX…ÕùÊjõlœ±Š÷›A­`:ÛF¿méʱ¥Îêºí²OÍ€­tJóGö®Üú³öŽ-éæ5Gq•vìF #ìëf·Ä͵ל”1RY)*vœ@p;åµ@—Z•TèDà«m·\vÒf¾Ž)àڻț¨Ö ‡Hˆg"èžÚ±w4ð¿d7iЇ»Ö¯ÇºMð2ˆA¯Ž¦ XnW$K8H©öõWvD·ÙDe èÞÉñnì à8Ó`ëDŨ Q›Ù¦eGDÌ¢TØ az¨¿„´ñ=9÷æIË2$µ`L‰D« ¢nÅPJ¾A öãA•¨|»éxŽq¬AüýcOžKA]7 ÛSLÆ®0Šf¢ˆy?]Àøëo©eYº Ã;ìcµlpç8 {/ʤ5q¹„ÄÂw€Iõæß$þ>õñ m!ѶÀº`*ÿæ›H â{«ÍjÛPˆá­þ¨RÛèÆ EyEÑñ.§£2i buº*ný¬.&U0‘Ž¸â¸-ŽOó7¡kQˆ“¬‹ßWKÓ}ë"|yzyrPå iæá(j0Yž\£„Xà+Τ‘š¥œ“r™RÌpäòp$zË »Aä¢`U›ÚÒÇ÷ãB rC×,ªá‹™¾pzòn»NH\g¤3‰÷åP¿¾8LfÉ4"a´ÏA1¾aJŸ“Z@úEE#Tºà"_Ú  Žâäh‰=-»¯ÚU”iQŠ2Ñù%C” ð^1ÆŽ 4[ŸÈÀÿNjd½BPNFéʳlÑ.¡,Uå»’\‰BN­æ«ÝÆÔHwæ‡SâǾ#]ºó_ìDkœoÊzM9·îfõÂîš…²ÙªåZ5U¼ÐšŒû¬g}NÀ®ø}†\N‹ή±ú\Ì#ÈÖï¨Ü±.=êh[ªâµI@CöM–öýr®Ó,…ÂXà”çyn`ÊUJÒs‡‘Úxª¢å†rx_j‡G``BÄÁ‚rhdQ´€J'‘ ¨Ârïa ‹#¤ˆ•ÝDü›Íc ›ý†® ã]Nl­–fꢰ\q*Ý-N—3ªûJåSNúáyÿexp~zÖ©~<¼8?=9ô|ñºßûëÖ{ú–õ<ž ÑbYìi¯ÊNä½çIÖ_‚_^m-]`ª˜}4× F“8.; ËçpøJ z"YËŒc5ƒaníºTïâºâªUWÑ,eÝI¹T¢íÛ,ŸŽ·I:YÂüºRŠjÝ« UJ:Äb7ôŒ4DÅ»šp¨ªƒÜÛRsmc"ºZh¢i­'r ÷Šµ…yÝut|ùæ1cêáE$ÅÈ©¶7ýU{"Ä÷8hÍâ(%JUƒÂ7_d²Æ×j×'k,ŃèS»$Uy3ZŸRKÌÉÂòlí{–몖(¨ «½­êþØȱîWÕêñNSN0É)Q$;³’r%[ÅQ[Y6Ì9ä>&ÂiCS‰C§b‘t‰eR0AìúU%xVÊUnH{Ã<S2áP–Œ‚d©˜ÓíÊÁ\&3 Ï«fu0±Ž“HMÜ•¬¿lfí˜rcà ${òzwñ¢]õYµ!<67:bs»!¢h<®F¢Ðã´ŠfU?^¢N[3Ë!õ2W1h6åXÑjåcܵM«„À µq’Q4NG]æ[·Ùi_“óaÍùS“õ]A„LÃÓD«¦e›}x¾/ó_ËÂHV€)ÿ7Ö¾ªðd©xcqãM +ñph)›™uí`uÐ>{þXb蘵˜pª‚$“ûƒ‚iÃOùìή6¥i]™¨šç­É/S+t°"Q°˜[É”^ç¾í¶²jš …V>펺¡ü.*ÈL.¥LTê %²ˆ-ʯ Z‰¤ã%YqJðÅ3ÝÕ†=M^YŽã ºT–k¨Q‰£™[¯Öý±YHÑ–å÷ÀiÇÓiÇYÄu_€¯aÿ Ô€1·m´DÕ‡Š^E3ÖV•®+% )ð#L©À ëÈ\±(›/@•¢|or}ršÁ˜dÒ¬(ÍØ0|_K@%¾Ã“*„ý®Nec…Ø]ÄROÈ",÷gL¿ L*%„Iܽ]óɦs²°kEO—aIŠ"%䬰´$Žï¥PØ…àˆ/‹ÚâgèET^¤D~2“:høMÏÃ+haC®™Re«-P$½_ÍB„?²Ãððär? Û~k>Åê}GáþéñÙà¨îB`i: Ѭښ/rZ]FÅ, á_Un+ [ÛÁvð þoûÇm~~e1`[áj˜žòm’fÙ|·%ÕuWgõô+úú¼m×È‘Kê6Ê%´d÷Ñ&‘8HÇs€ÏRmP?±®bWíƒ$Ç19žuÐP0+¨ÏÈt1 “E6.“_3Ñ8W‹Ñ”cÄ}à UÁ.SîÓ6VÖ zÛ-©g‚Ó(®7tï¨ÒIxÔòëµ²…îµeÌMø®WvSþ{Ó•O –ËFúÛ&x覩’ŒbFh©8xs*œyÏÿÜ 6¼‚+tjê ¢ÔI)ËxM qX±ê袮J)¨B{R JYÚîÖi}´¹ž¡¶¬7rЈ|G„¾Êö(OæxKQ‰Y BTÓ.ëñúMôOh%œŒ[0 é“òÖY¿41¡Ø4t9‰°t#=«ñ¾¤)çt¸3ŽçXÙͺåèA<åñ»d¦øD1ä¶UìVE”ˆ¸"¢\ùÔÖ³åb¾D|©‚„¹b1ŽóÜ`'°š’Oˆc$“À£†ÊÈÕØÌ%[jL½¦–üªQŠ9 çYÇOü¼ÄªcÎM­z57øn6bB¥ÌX©°˜¶l” î“—ƒÃîGcO†PÚN%Ã¥Ö(1úý–ÛÚš²I–•Ó¢]>¼\² ¯t¬ËĪDÏHªùSd¦Žp`Òbv0£¬íFO¢‘Š äÐOÙÛb5A’e5욬$X‘Î9•2ªÆÂH|Z*sÂB”aJXPèˆA º³Fa0‘l+É=“Èá@ëÓcÅŠ¬NýaªÉ˜VšÀ“¥$àbš-]`›Èm[¿Ê>Ýäm4H;§ ‰¢‘Xñ™]¢ÍÔº:5 {Ñøm”.X´(Lér„yåCØž™òjpÐWÕ—›µõÿZ•@1™6c p$¥»ì<#\õ‰Ž=‚w$A°D4–ŠEaåUŠ†Naã”*±¥l],TTj^Xr1öi­ u×Â|ž÷è÷ŽœuQ5 ªkÆ°˜ZD8ßÛÁÿþ¯]/£üµ…œ)ÌÄ'„,e1ƒTFüunïIò¡YïfWÙ”cG•.Ê®³ Ü bäAÇL¼¸JZ.HuþæÙê²ùÖR Ô~àÃLC|ƶ!UPÿj+ryƒÖL£&—l«™{ÔÓûŠ„c„ÃT^=3¬Ù rÎF5tÍΈÄ=ÄJ­E‚žª¯2l,1U‹üÎÆg©MÇî €—±rÐ!ÅÛ£T¤ø¿eˆÄºƒE}ó•Ã„ù#´a؇ƒ<¸ex ¾jwE;"´üþAðTRÑoèðõLnBÅºÞ ª`ɯœµ:gˆ‡xÌá?œ>Œù§-=ä•®Ò¬6ÒɆuEÜÆÞùëÁ‰Z±²¨_=}¢¿déî²0˜—jœ[5ãíZ3õ:IŸ> ¦ÓcL5P‚"Ü/hZ°„Qñ& ƒ¢‡ñB ¨ã±ë°Àµý¼ñƒ“ÁE«Mݳ^ûl…5 5~ž ™jÓEµ©9%ä@.wSLùãø9–ñ´Ò÷ôiÛdè¦dÄ’¥‰ó‚½¹Â ydáð§°Ã@aÝhºÞœŽM¸™Z4Üõ‚‹Ü)õ\ɸ0_ö‘‡6\^_c’ØL€'Jå¯Æà‰l²+ÐþdÉ€ö‚½âÀ&q…°nLλ„­²”´Ò³ÓáàGÐ`-*êY¢=Cò”Emó‰`¸æ,.Íã·œôbôW”/|“±\2hñ@²%RŽ)ÑöŽ¶6´˜É˜õ(íN£<éwg× º°'SIT­lŠ2 ý)¥reR”Ö¹%îj»:ÁòÑ^7ᦠ¥õkâÙßÒºð˜gQNõMeļVHPÑœTãQì€)è Õá‚š.2Ç*Τ ¢«Q×ñA?¨Å°è˜ƒ¤vr ó&Ž²YxŒ¦V :]RsÆ.cÑf]Ü_‰ÏWyЮՔb:ÂÍÃÁì0.C@!š2•×Á±heGÝÓTëö&Ý u‰WìQäKÉôÓVt¤Šèå‡*tUfz”bÆÚ”2ÍÔsS¸D–sc´&H˜N 2oð&F“ëçYÞƼ`1‰9]ò¸-Ó—£PZ¦ÉYÀ@k\\Ûùr¸¿ãÂùXMÙ½Ða2_Né1FAè6¾ª³P`ùéB;w­Z赺_è¶ü¯JÀå¹³ÄcÙg(ĉ\7º)èjAÁ˜ÈË8k@Ø4&›FeáÇ–EÎÙALáfùx§TÓ¾Û|­z:Kß–Õ—©øS„œÝí–›Z“YNyô V[Iƒ¥~›Uû^)µñ´¶Œ‹*×­‹óË>9+ Æ›lN2­c)¹ÛMÔ·^EæíÞW0m6)BÓ{ŸøœŒ=eŒÂJªˆ¦‹þDÒˆ\±É¹Å»¿Ìâä#*æ§òe(£¤j{6M]¡1„(XPQ­åCcQJ4×[P\- h‚çYT0¶1kЛf|[1AÒ NzÃF,+ NùÞcÑíÈpôÞ_êSì‘ÂH® lÛgäÀªT¥.b2!ì¼ðꃼÂ!Ú¶ ¦ ®è&Q<°MwoDÑ¥¾¡çØøºÖ¨Œ–piû*àÖ}%§¥» –œÑm["Švnqðœ.Ô´N¸ ²Ü]+s©9wb½ˆ'Jâ,zc9² ê ® ª€bô` ú¤¤“Ô¢Ä0'㔕žÙ2%i» &#ãÚ) =JVzºK &äxœñ@Kқ٨ɣ㬺|´ ®¹"zË9N\Oá«) jÏ‚²jO˜Šõ6V9v€¦©S"´ŠÙŠÍ½]sWÖ™éÛ_Õî~ 5Á·(®mOÆ ¬ÝâU{£õ—SëŒìªÃà1ÆfÊE…8Ô}­ðf`.:¸I¸^N\à ¢–R?+hYšò“t[Õ{Š0$Î-š¦qzøOå#}M žÜ⮕¸çNU/¢ÄÀ7rÂæucܶäÒÑŽš„—ßa*v”o¡CD̵ƒ‹c®B 3Mñc_r‘‘Gª¶¥&½†ñnkT&½/và¸jª2b½X€™®TÛÚ:NÊìà­Ê¶I5ët(÷zrw@¸-ŠŒ‡­Xæ‰!r‹š ¢&Ƴy†B%‘ÐõµÖOô&ðì±F}Þ–¹t×¹¼ÆYH$ MþVQe?e 2RI-D<îFˆ¼ãæ¯Ö“]ƒñÅ@më•uùІÖšJijýSëXõdÙ1ixȺAý†c|£M‘EúdóyV$‹ØŽ+í19MmQر91ΡT¢½‰k•!ÏÚ9ƒÐÍ„«µqÅ妘˜ˆ£w¨Õ>W¨ÿÁ5Â1&Þ ®Z4ã]¶\ÊN8Â&îås›qýFg¦·Àe¥¨Á‰$ˆ[ÞS{_«3–ó?°“»o(“_dM2Ï(9fãZùuP-àÀpö™JH¸voð—“1Ýì3E]A‘f§o“·ROؽ ò>šY™ÈcKùÙ…]IoN5ô~¶ÊÏH[¶«M ¶—¤yc+T¯»²(ÊUBJŠ[ɤ–±â"†ð¬e ˜—"~¶âœpK,$W œŽ…eíÀ9Ÿn„ñÔ^:å]ºÈŠöfli(8GÂQÜWw xDž4[NÉ lŒ z¾âbU—žŠu¶…T‹›E#ÌÍt)\][ k.™È ‡2žÓú0÷Uë +â2),´Cç ÛLÂÃæÞ†3,GyŸLø¦%$ÜÁÎý.#ªqØ6•ezR(r‚,kW,J6Šbm0Óª“Vn± ÛM€A s9Hw“QÙÜÃ9“¢%¼Ü>,ÞšÆÌ¡Ô9¯Tßá[T½ÖR®‡ÉSMk‚Rì¾:ªeJ±’¥Tk <¤ †·¨r‚¢ŠenT¸"\@²ˆŒÇ\H5kYœtÍ ½üQHAYgT"¿`]Ⴜ94!:ù;ˆ4ÍfÅŽêì%E(VâvUjDÇM©æE¦*2ÌAû ÛÉÂbàN†Â8c:gR€´1‘'AN5Sws5½Ã(YùìâÎÔ GØínmS—©c¢$jqó£hMŸ'YZÈ·+GÕcÇ’²h&ä¹j|/6Ü,\ÂÐ^Bÿ¾Y‘ãål®"H'²\ dTSªŒëdµ¢ìñø Ð/bÛß©Ln%ñ\Ÿ…çýÃË£ÞùÑOŽtý$"®1æ µòF±,…Òo;—âÓ”¾%V}‚,|Ð$a¯’©wrô_\N»«R7qÑì$·a4ÁÀ ðñÖBßxœÇÔÕ¤dbh>VHæÎ9°…KL1åÇuÆ Ÿ¨ÕDgÕºbK5ÜÝ…žæ"‡B —\'ÊGJ$b}Õm ëáÒ Û+bÉ‹,u_œÁŽ0 ƒI‰Ý/CRL±’ƒÑ_€Ñö¢ |ì¿å0—´Ã%aE–—uƨ]µØQ±¦©q6Zê “ÈÑRŠc‰r; tÐm4*#¼¥œÁÞ;8b©‡Óå‹y¤ÔgƶL•h¸—¶ÊOBÜ‘\k«è5'Ö®JÌvuc/?÷Ÿ¹Š‹ÁW¹û>~‡cšâP»«2+[­ÀÊ}Ň‚‡Ïƒêsö6RSWì>°³Ó¶|6õ£o cÝqR»píØœV–Ù™±H¼7õQY…áÅéy¿5ï?;Çê>:®d8oÏëåŸÁ­ì§fäq fòR»ALX\¸»Z?Ao3Ôò¢|k{’š„ÇYV”vY™¿ÞVÑÿWû\ž15jˆ·Âÿ¶µßgN€ÿK¬ÎåæÏ`Í«Xâ ‘ReL"iiÀ«ª[_‰XdÃã3ïˆT Å’E˜Tú¸Iˆ‘¸¸8ؾé XSto¶mÚ Ó¯Äi„è%aÕ¤œOŠL"í zJr«ÚI×±ÂRÀ ì¯1TŠÌ¸Tkžì ¢ª†eW¯÷dzkô; 6jŽT"©dÊÄ·xl0©ëCb!;bHœî{¤~.ÄbK-¼ÆØ1½b´SŒú?^P–¸:Ç@˜nRy¿³õÝ"ˆ§6VoÓcÀŠ·NOÂmézR;{ |H¢QÒ‡uÎ3–"É•)Çã»4B`ƒr¼š±>˜|«ŽŠ :ÄØq‡Q©=˱ÖRñzêý6šÜØN^p~" ®Œ9”Á ×’ÎH<7ñÆ$ÈS¥! ¦‚²BÌ»ÑU¬˜µœ’UÖÑQ:®Ž%Y©¦þ‡ñ£tÏŽvl£d¼\¸hI!§°*Ð)Wg®£Ô(HM•y“ACœË]W¡µ«'ÔÁ?r¾VÌÖë,­å_è31JElT^ Lî®ÄLAón•Q‚âò†¸wE]Nëj4|³2žÎ“vï~Ù•²S÷ˆ!3]·aB¶\ÄYWP±+­ˆÍ;ÈíAËl—Ïž]»æžÇtyõ Ž©X)«XÂ<A[–ï—)é¢Ê åËæn‰v¯_gÄ'³0~$ƒûÑÂ9nPH¹B2jÍ©¦–ðö*©–n2¥È^ ðµ>³:«ÉÄ|q98:p>„æ`ríªZ”ÔgdOØ¿»¾M$'S›;·˜hØÑXÅ›„’<·ÙFÉô[¸¤ÙÂJ÷¸NxÀ(÷Ê-@IðöÔtb.ŠÆG53Ä÷‚€Eš0ͧËÿ'#{ÏEìTt½5¨ÔÁÛûÛ|§¿[XzT\’äƒ@%GRgŽ oÒëý~_p¿¸/Ú8þ(Qæ;1æto¾WB—›*Ú BèK'Žz»÷î³½t§'¤q]ôqˆ§¯‡á«ÊXôz|_íÄ¿ ÖŠýâ‡<Ìýóá>Èó Õà)Úª”:›{˜$ïÐì¢f<~”Ìø—€)5€E,c¨<Ý—,¬gÍŸÕ…IqeˆŠÏúHØçý‹Ëó3S(Ra‹a°A’¦ <(z¤ÖÖËi–/ô°*}pÙÁùâδ"êך÷ÂUeŒŽm!<ø«hj«NÅåà䕺‹Ò©ÐŸÃ‘~98éX*¥ý zî¸÷£âW¨%œšù"{<×´ÖOø¯P;¬é7_U¶™OøpðßýðÂiF:­n §a5Âü<ç´}ðúôüÀÌdå³ËTL­È¬jâàdˆÀG¥ˆú2ÈÂ*»^E?Z^1«ËÝ °i°þ”—ˆ ‘ôšß+Dä£ëú%´]¢À$^œž)†aúh½‚©_ôNöûRuêòèôä“,HXoþæÑÙ§ƒ~«·4âöž}îJÃGÑT³9{,vÜVQ¦I÷$j`µít±ªêºÓ©UÒyˆ’Äqme˜yˇq¥;‹Vꨤ@ú#ùí¦(V_=ê aV2ƒüÅéœû Jwf5¥b ïtþb°øùXÅœ©6".ìôÒ®¿ìLÐÁ1SYʃKf™LÇÊQ¦¸à•µ–Jâ&žÖ›¦½m&ÕÌjJ-#¡ª½“FØßä†Â‘$–gWKQºMSÆWì:ý-‘;PÄ‚{ò7™NT³ZvÙ‘XçŸ9¨yZ FBæîÍÙqFUd¾j]ÔÖ.Û­‡»?‘ãøªwrpÔ·ø‰}ªBþÑÙ°¿y>¸ø‰Ì2ƒ—ý!\æüJo±ÈØ*”Zå"e®Žär;DCí°.èH~๽ó‹ðüôòîQîsˆšcO¬þ—šÎÏ"Œ6G­£•èîáþ÷%Eôå4º®kF?®&:ë !k9«Rñ/³¼†ZÛX­!c3ûèÖÜÖâµPz¶jÏ.3W‡;û¿¢%`Õ[ T?{·×¿àð~KFS\Mv+‰Ûöƒö^£sÖÆÚ<§µöÞjLÎHl‰ËVÊ ¨žzûÊ2OH¶¦ß<éN¿²áF8øYd–.ÃÛ'pÚšuÿ@,ìc´:§N+ò%¦+i(#Íó L„ ÒlGì}Ijv¡©ö>$^OÊ“+tçÞÆþI áí(Q™Þî5F{ˆöbÀpÞFSë$k/˜¡±8²’µ@›DZ…w{ƒ“ð¼08ïï_li%2…6¾ÏȘŽÙ5O𰯓”d²¶òn’|Áv:ëör%¬›^¿^F°Q1*#Ö?¥ð®ÁCÕ‚¸ŒÀŒþ3¾»-ØݲSe%Ñ׉0¼ê©,»ÙµðC{`Ž¸éÓ·å9KÕ®jÚKêÌeöË%(®2ï°Û°ˆÒiÁ¶È¸´‹æÇÏ=¿ßÛg\§I¥QÄÚQío¶ƒï‚÷0c•ºõ:2…Ûr¿c0Tž•³åÕ!­*Hæhí3ùKÛËt†)£¨`¢w·µ™cz€0 Ö'“Öc4¸¸0Xb¤öæe4~å-p_Á'-ñîðù@ÑÖ32àó£F…¡4‚wJ&kíì _žžï÷AO=î…§' ‚žÁʹ¥HšUI‡ãXÒ]:‰7•"?©Ä¬ú(iq°âεLM@½ê3$êÞ³ÂÎ^.§¨›“~Ã1qâ®Q¬H ï\pU2ÇA¾$KR‡Ñ–¯òBíÍUȪ%(U útðÅw²¹ÉÚÒšÖ¯Ý1‰]ª¨MÉ£\ÚJ »¬*d…õv7Øò7Êjhð 6”Lª i¨î-*ÑÀâCãsyt Û²_VñÔ¬eš¶3Ì`v,œlíÃÕÊ’¸t̽Õn´S*€³ÿÓ!³†€¬|Á"—)‹‘úé’­þè´;þ5ÜH ;ʵ’Õ aòEØö?v7»Â”úÝ¿ Wë¯ä¦xôLì.FP¿%K¿± Â7àr׊=›Í0èdzðoï¨O²þÞ«¾pUîóø~üs×Ö»è‘Θr=n—Àú­o¬¶=µ‡ôÏŸ%–{f}aµÕö «rPMî°ÒøãÚU†ÃÏ—CŸâP´žf¯keìm€?Ë˾éª×.úæk^·äå_¹à5ë½~¹Ë©,¶»ÖF’Öç©,á!K¤â$áùé)ÈÞ>³Ÿ²e¯gÇšK{oÕjY꯾µÚJè¼ÂR™¨Q¼¶‹Í{®8²B`¬-ÉrŠ5 Ø2²TGn–Xœ§ä˜åCà;ÈâÊ4FÄ«Âdã'YÉVkIª-½W ï3;Z~Ú.={¿õ•ù´Ô„ÎŽz ܇½“ƒóÓÁA‰­Ë§°ëƽb«Ú‚0 뇃›çÑõLª¨†1:AËZT^ýªÈ¸ç¦qi©%‹‹Òëò·~‡WÞm‘èµÔ˜uøe¿ÊÎDÅB‘"y%4‡âϲüM”`ò¤Œ®bòYprð×`û:î ‘(³15©ŒÅ9É¢ 󑤔Ÿ9Z %Ôž-ÉF„6„…õ¨Ò²  &©ëƒwMS¥ãäypûÓn¹§Ý¯šûO(Z2m2)°ŠtD)€ØF¾û8n“Õxûjbf*¹è…Zu¹=ð>êA‖…ƒX¼y½ϱ¨²týW§ÃÉîVð#  (=ìÜ»ÖvÕ7òg4ñê|öh8È´h,ÏVè™sfx>x]t{°.5tqŸu±‡ã® þÇÉ\&dÇû^ئ0þgÀ°E +‘.B·Åe„0q6H`ýé±T §Õ(î+‡l¿½zà5šµ`^dTºÂ¤€ßjuâp›- fXÓ³gk×(ÜkÖ¢®Ÿz¸oÁ“&E)­”BC[&4Å—W©´L%";eƒˆÉž+Jý˜1âq¯ñ.å]€È»ë8îqïÇð¼q>è—U$x= ž»í’8ßZï´ÊEïÂœB‡uN>f…¡ÇvšF›lI¶Ñj¸2€Uûh7µ†¦ÏûýpxÖƒm?ü0žž;3›äqs¸baÁß&E–À«}­ àJÇ-ïh×ÐsµÇ5Ëqyt„oýî*,§SÑÏ2yÕ²ž¡j´e÷»f>º‘ÕÓ¸÷ãÁñà™ÆׇÓd–,>`"¦mÖ¯›m9}¯ž‹ÕNÍdì³7†ÃËá*vþŸAv«S9ä-lá¤WW*¡ÔÃÊ—l8x%IÒr6œ€õ¦ê³öØx€õ=ý¯Þ—jw«‰ ˜Íàøò8|Õ‡[½¼LsGLg‚OBáÚ~ªSׂsc´»ä5f`sZþF¯KΕ ®C"(”]WòÕ]P*“P°ÅÏ{  3$MHî¹B3¯j<. Z°u‡ LÞ_!¨¬iý–ã+L¾Ü–o?ÖÞ¥®Vo7F¿½îQ(§–|&·R±ÍKZªHH¥ŽEíX½xËB—˯ž£ÝÚšÙÁ;ƒÞQ™˜‘®!ãF̳Ҽg_Q© zW9·"f£kÌOh01ï±*Pé´]§Z°$„¾>ÛyËß@°cF#y¿zõ+“öízí´‡óìGùYj9Æ?«jG‚îóÁJpå š]#ÁJÄcÕv´^X¦}t•Ì@™J4˜{÷ž®iwmZmØé:MdO*„’¯^®Ù¯&Âû^“w-±ÑóUÁªÙkJ~iô´‘=îÞËÍz¨ÜuMWËe™+Þ ÄÃÊ‘µÓ*l¸»¤Y3Y jÖta1¿F³«W<ß[*jd(ÎES¦¥¬/sÌâÜPÌô ¢æ]7åÎ “Ç 5·¨ƒ0[åSæøÒðMív=€ÃŸŽ_ zìTÅ)eGBÆBv2’<%Á,cúñà°×.”éS ‡¿N/D+ì‡'n9z3š'G’¢¹e–\G\ïö–ˆAõÔÔõc9¯•ŽæÛ¡íZïÕCQçªT^ÅO­à/I^Ì0g–“ª%¬«MQq–Z¿PÕÉNÂzšGØzP7öd窈n•žˆÞ™UiZâŽÜ$üúö£Ž~©íiHù“ïÓž¼ëmä>6°àíu¿Ö&¼‹åÕU–§÷k_½½bY>Æ4|-y»äÆ¡±î×[©‘Usû(ýùÛ²Q+˜%Ÿ¨ò¥PÍ2{Ïü_d§›Ù2ªôô ¿ùÃÂÏõhçÛî7ÝÇ$|ý:Ì÷¢{óqúx ?ß|óþ»ûí×OíáçÉî×ß~ó‡Ý'ß~ Ÿ>}üõ7x¼ûôÉîÓ?ÿV É“y¬ÿý7ùù\Â*CkßÛPKÓåÏAÚøˆ?[[¯¡ù3…dçskD]Î9úx?›ß1 PkÔvÿô§]4üçÙ;ø.GXmÁÁ<$z²ÐYR]nãâÕ`÷.úç tðûÙùé,š×ŸàõàâUÐ{1<=º¼èýœœ Ë÷N.~ @[ùuØ? ¦NÏD9Âqïä§àrØÇ{ÁO§—çÁéë“à|0ü«ô|†9,=†{'Áƒ^E ã” ?¿S•ÂDZ!¸ æK˜XsжøM¥ä Ö.CÙ0‰5?7“Ó×)}'›cÊüÖÖÇܤG¿æ¦omõØG¯°vüøŽV‰.–%±Ähl!(ã¶+ðaV3¯bO‰Œ¼|muY€Ê–QÇò|o$*[U»‰ ƒ/¹ò2!ûåñh%3]oË ¯®N rU󑫹р*йØJˆ‚Éi¿PS!´5G7¤½_ÝIR”™@K¾¥0ë-q+Ì-h‘OT‘*³ùξ÷^FS{×;¸n]wÿ_EÅ9çšöaMn$þ|™°Sè#æc‘#Ä=PÅŽ½Å¤LÃDw®‹Ú¡÷ ½Áe éò às‹NäÃîÊ)Ò3ºžç´‡Ï¶P1çúÀ{[ï÷>òÅ 7«Ÿzž:YÂ%ð¶ÃëŒÂÆŠ"q^D…0¶èŠUiÏ*•Ÿl¾ä¿a¯CÍEFW¢ÿþz›Då ¬ËrŸC–å[YÍ,sX! À1Ò„¹ 8Þ¨À“Ɖ¹ê“-ué&Ú¸:GÀqZÖ(¹$o„jÝ€p¶öë:ØÄ*•j;äI£N eKŸÅùÎmž,pÒˆÛåãP¯ª…®­ô!Erx4_‚¨ •ƒ[ù‚kÒR>Ìõ2"¡3öÆ¡^±"Lùƽj[‚.ž9€$8唩b§°­6n£ãY€«q+¹¶©&e±á±%RŠ42[†…iàl€L•p’ýÖÕUD´`ÃèÒ¤˜Ñù‡³„22–Û–t‹Ð§ùȤÈFe±¸0Ê A¯é/^ÆKØÇ×ÈKµ–`êö>”ˆ›Òúã”Þç NÄ#/¶¤Aô´VGÀÕf,Kˆ¦u¿àD·´ßDÚzA¸.ð½ŽS§Vz+4á[vq,z¢ãI áÎ8U_5JëI鱂 [)T]>-ñ!Ø_…®ÈÇoÂvmièD†?`|Eôò*IŽ:ŽB@àdèoYå2äÖÆ{`žqA?Gðô1Ÿ£®°F½¹RýÊsb$DŒFÅÁªè·È¶¬ä-g'¥tƒÃJr±1&íˆ*m!óäµWš»–¥) æ!ñ@ej ãaÍŠ­7ƒª÷4ry”ZXk˜jtgà0­"š[z_ Qݽ†èu&Rï«`ÆbU¸áFMajâÕ2‡BÕ€¤U =¤u–Ù,I–u¼ò%ÅÜ‘ÊôÈIxqÚZ´¹ B¼Å.a ‰Q|ˇy¯±0’\ë…ˆºÀ«TÝXD N%ÒÖ ¹s7Ês)N»íŠÊ ⵎ³&ÍA†ü€’  E[š'¡‚zù¸ÊÓ#êÔ‘_n”%"‚­BI\;y †ñ‚Õ(ñ"ŒZôúƒ`Üaí n.ùÀU´àEfŒU§!SeyùÔ~7êãïurzN(*5ЂùSškµ]$\jq/ÙÂøXA¢¢Ä& pìzÆi¸“´a²\Wк›?6© æ;¤céÏôe/|ÿêN—"µÆzM€HJú(RT#µÔPö:¤M…Åg‰ÔÞr,@(ªsu7 ܱ~åe•”JÜ G !›ŽIϱ4çŽÔ¯Â ÀÜõB×–óB]5Q,r‚jÁì@ëDŒé*€0>]Þ…à©ŠâÍçáÿ£ÝÿE|ž>jµí¼!ÇŒ€k"tPÂ+ü…%Ä5@•_uK ¢ÒÿŠjcçÅA¸Àéðç.~±@pX?½fg~®Ž¥Ô=_G-£÷-˜ œ1Àþ³Ú:’y;Ð ?¦%Sk@Ž¸¥yÑ1Í.ªT´§ÓL([<áÞì—©Ó®)Ø“cR6XΕÈš¥î.d²ß÷n’ÖÛÜåÒ0û§GkojϨ¤å˜s7ßTEnkëܲä‹8JÀ[=}³œ2ãQXžGcبY¶º2ÈÀ°U¶j¹R#Au½þH‡w8~oË•©µM¬Ê'Z‰ÆÉ‚Fvœ1ó,R…Š1€•79°6„4>B÷e“CGm¨ùM›i¶Å1ªT7åËì%#2PªÕŽe[EÌW|y‹ ½TÞzqÿ5—ã¶U¡˜r)ê5[°U·ZÏc¾j8_=[|«ãâT5ߊN}a”[:Blz)¶,ª½Ž,Xy¬ïTÖî2±Àé@S¨7ñáÑD]ñ+Ür±ª©V8õi ÒéÝ–EZ%Ó»’¶Näò”[ǘèqKÑ]Û/}ËI5–߸V¦5!H½1…:TkÁÌ”"7•ËɤßRÜŽÁ¤FD× Ÿ„‚Aµy“<û²¥Vôá'a’–9CŠa<8~¬O|UÄ@TtK+ÎÚ;a5 ±eŸfå·bÃñ_DmâöÔ·Ü©7˜¶G£YÊŒžK:ˆº2‘:––B›V$j3Š²U—H [ëj#”½°ÉÖ}cÉÁøÌÁTÖÔ|küA´å—úÍ©òÆlu¦Î`gËÚ=Ë­fwt­aMì<º•Û ªfKÃfErçÊkbÅFgËq5ØÛÅÕô—Iʘ‘©^ ¥^ãiŒŸ‘˼º$Ênש e;KeÊ^Ô2kòñ~ÐõÌl#—VŒü9Šúuiow;WÏR–¼Ç£žÛíè_ŸÔ¾Ã‘rÓ ü稧2P1;´ŒÚê³qÇÌBý:ö·ÄB¼Î^e,hyÛ±4&ø;åVi¦>B^ÀçÞÛqe¥Pš³Jü‚Ûb-³üµ6þkw÷铯Jñ_O¾úf÷Sü×oñóèÁVð hõtþóÕFÑVµô±Â­lmÅ=¯ ·"ãonE]‰Ñß-Ç^Ý;ðÊ—¬L&ʨ?Ž`3hâËO  ¾‡qɘ;ØXÃa(Õ„¿³ý|Ðä-hÁÓ];Ôԡ¶Gš¸%œÐ#S Kyõ”6©›áêYÓ»=ó%Üw¬„uÓ5'uˆÿþéùÖ©\ NOÂWNâ&}‡Õ%ª£û¬ — |겚 èÑ“°ª*ªJ™3Ž’ी³#cˆ­˜’ÿI›ñ$K®¥k“öÐaX*šî6ƒ£ ç¦*C¡Ê£æ1¹ÅH5²‹ƒPäR(&GÞh× †+©K¬Ij­¦[çD– 3úgpƾú£mÊ» WÕ»d¶œÁ£sV‰£ôô~Œ©Ùàa°Û |p«ªV#G¸€Eψm­Ås¥#ëÞ»öàâ˜÷%yÿ æqˆ ñ…*iyð'ØÂ*ÛèØÜÈ’+ÂŽàì(_VºÈ“t}cÐÊJ8xVXÄÑ<¿L•°gs{ú‹=xèÇ­$Q8Ó½rEÏáàä‡ÞÑà h=~÷µüxË騖0XE½óÝóçßëÙ $Jõ­eÛìZR8.U&{–E[?îˆ 1ád¹:nT”íÄÄm¬¹)£ 6mJ´$¬ IxŠ—†Â«å¤iSVœ‡V¦&¨{ÁŠ€xÏ¥›5%uÈLYqUJœ×*Ø`­J£Rk¦µASŠŠ{‹© °f»>Ê-Ñ'®=qó¤¦ à ŠR¼¯B7{ºæ'fûß]1xõ1’›~˜î#ZN»ž@‰i õÿÍ07àTßÛ*Ž¿©#òweÄ¡öÝDrfxHËüšxü÷®0%Õý~kZì®ÀD~yy²O÷Ó‹Ë—áð¿fÁtm þ[鹿SâáS¿HqHµhJÖTˆj4) ë ù½¾$ÿ†ëÈõÚ1ìya¦Ì&y½¿ÏäUz“‰«fÂEF‹ÖRó¶§]!ö$E´bOvûBvvô^µ‹—ñbÄRŒ9E*Z\¡k ;¨ëŠ6Hw4Á檽 4¬¬XÚ„î)^Å ùÄ®xÉŸ€CîVÊv+T[Š ɸÆIœøª±šÏܳÛÿÂ,CxÊn‡wæÊd ™@oü6RåDíÑkæ¨W¯«îÌ3]ÔÅ€êò¼Ìy-!×ø(“édŽç|ŽæZ˜ó^«ž9á`ªëœ½õƒÙc:Ûöì1m4&Ó!pmäáÏê^õL MIJ*ÜIQwpS!PÄ8ÖGòÏÞÈu«h—Þ.uâ!sÓž1»{QóŒ31ʶeÓÕ¼-ÃçÌÀV >A†«.0DwkÿÙÎ4ß#'ÿ›õ7ÎnÇ~€nµ¿[/?«LuÞn—ÆF³ãayÆ„}ÀEƒ0Î@ëÆÏ?|茠e-✀ÞÊ# µ«Ztö}eò+†µ³ã–ôí–Íp±¢¯Û^ÍãtXO—nTß[L°¥wHÌ…y—eä6×&GÍê:_^‘ïc9™Ð :¢P ‡Ûõ€âgእm,ܳÒ7Ý®Ð×dÁ |ÕÒò#Gõ \'RâDã‹é’´5ôÅù7…õ£alÅ­<¨ˆ¹tkÞI+Ë.…àaH»‡€±(>¯Y †ÇÙ㪪vÆSø_ÍÒ¬.Ž FˆÃŸ­=½p”Zk°3U“˜%Ë’˜l-®çòþáÓÏýí¿×£Ë—Í-ýwý¾¬ØáOößßÑþ»©é·ÚÂ7ØÂ0™& ð‡y4¿IFÅ& üxç×Ë"xôþ#x{°ÿù¶ò*¾Æ‹ÅÎ6–å;ˆßÆÓlNîþ}¬P“ÞQŸìÚÿivmÚZ]a¤ 3.aÍaš²éê¨ *pŽêl‚ÕÎPDÇ÷Ñ”·œæPp0¼JMÚ¾½É¸Ì#´ æܤmÊü{€ßß±˜èÐNZÖ;QN ØV‰¯àP1”e¦àncÛÕ;‚–N%˜’)æêò{ǨnrÆNKxæ]OǺ´qJ‚”ÒA9ë}üøvä©Ÿt|Y,)̈#,( A2…02”àrùí …g˜ íF¿Ž(SÄê¼CÅœã<ºšÞá˪~ .-í¨ôdÖx@ú°z-ò\4Þ›¤¹Ê'ºÊ–‹àOêþ ~þ ߘsÌ[0Q-ýŒ%Ðö:Ë0Љ¢Hð̳I‚¡DØè?àìÒ{”At oŒ—’‚¦õy\,§’Ä3MÞ`4¿I3¦HWƒðMÊ/ …h„›=MŠ.áIcäÀ …,ïdy±b±àdF”µ¾$oIc®g1¿Â+ª׋Þþ_±¦ò+~Í|h?ú +¯H‘ðm,Ö¾]Æt1[ܪàÅn¸À•°‰”·Ð‰2álÂâL& ç–jOÜŒ`ÎïWMl&¥DÇ"c.¢^6¤#¡eä¶bÏÝŠ"Ó%Ú`rvJMéè Zp‰QÇ‚ç“è´øᆂ@rê0ÞÝ)¨Ã¨¥|®$ôŽYGÊ YÓ!=ÊVÙí¡¦ë6%õ܆T4ø..0Ú€lÊÒÁ˜¢§Šb2¹–¬UoK|nH3w¤Ò6ðˆRøœ5ÌîZ¯Pœ.gâ ¢2Öçý—ýóþÉ~ÿ £«(š,!"ß z%SI6u­õ\œ;–BDC¦¼†A …Ž7صš€1„/ÏO Ý®#ùÔ2ã´Eꢽ•}¨i¢Ø ÊMˆ WEŽ‹Ùj½šªR‡8x<º +ÙUUÏ…3 ÍëøG!©†j׺n/'½£Á÷Ï©1E‰%ÿÔA„7´5&泫­å„7 ß$éxokËU– «¡ buQÜç–)ÖĮIéo~…Þ‘Ãõ=Å ûÀ”Þ /ÚMªÄbYY ª““Ë££Ö®ãÁbÜXXFZ>Ïfh AJÀFn‡—‰™Då^ÐëìDוڰ'®h”'@kbÒTþ3ûx•ð¸‹Ê y˜ Ô*ÝÛåêªÒct;–j¥ÎßdÔŠo/QÖñŠIR'Q‰„™·#µf붢ß&ᮎB•Ÿf|ÿ›äiDœçp9M(…ˆ…’غC–‹ùR¤ Êa05Ù¶jÐ,ZÉýâ&vG¡X~Œ¯®ÃÙtÔqº5éV¥A`rå\cÒv›ÀS–÷B/¤½g85ß*«¼Tki/­;ÖPwy©Ìf·ô¡U{ÊÎ[¯Ô<ÄÑQ´YÈÁª }+Í;xÐöŸóD¼ñ´H÷Œ÷Ÿjÿ‹G1ò³‰ýïñWŸ>.ÙÿvŸ<ýê“ýï7ÁÿSu•û¬¡©ÚÈû¤½©/9#´ÇqhÛ¦æ3ûúщͅb1> UY‘ó„ m© øä-²KE¹k wÑ0AMh¤òoU¨ µÏñ…ƳÁIy¸ugÙžé; ZŠ­aSuˆl„ê*`d†i–½!mý™¨ÓœbªS¡na< ÞíU>aÊý‚ü´#÷³—ƒ£~ð`²g÷‚?Ýn××ãb¿k»ÜÞ$Ó¸¯´K#¤^AßÙuÔš”ÞòucwÅÛ×z× F¥7ß;ñTqëIäaKµ¢Ü‡ï ™&É<*ÆŠ²@¹"@¤ÒŽA~—f%õM@çíÈFÈdÇ*ëÈy»G7z¡”™Ã¡þ—/‡ÿí”ן»OþhÎ/N0F€`úÓ ~„Mð#‡éágWË hÖ§üÙßL1fç½jYGðpˆ®“Ô±*Œ)E1Õæ0é^ óQ‘®ã~-=˜þmg·ý÷55‚Qƒ­Nð ÆÅÌ1ÄLìo(jÐQÝPˆfÿÈ@ºæÄVãdlH%æ1Ö»‰.¤H2¼å¸^Ný Æ…  Å˜$EWÌÄ„7Àð&8%\–>Ê"eîgéÛ8_0¨ŠÃü® NÌ®WQ¥÷ Uíç]»ÀÐ7*ËÓ.!U»ìV¼Ü†øªºd}Q%õWLð¥óQ›‡Ó££óÔ~Y²†WG¾ÁÙ¬Ã;Âê8J ÚñÏ+ªñÕ¬²”ÝëøÞ”ÅxPÅǸ£veÔ¾û`hLNk-`Ñb÷fyr\íCMwùò*[ñyHÀ&Æñ:¦Œoÿ“ŒÿŸîÿ¿ýã£êküÿOžì–ñ¿ŸÀóŸäÿßÃÿ¿û§?þ±ƒÿýSð*J‹¿tƒY|3ë=¦‚¿(W×e¿‹Yc_ß?tð‰?Ý;v@½\öø+/ÿ§ÜµÿÔÜ5Â5®rÛ‰¦ÓÒÅU.Mû ‡—gg§ç]+bàu¬=0Úáw{‹/þn,l@Kpæ,¡c3V"“å¼DýAe­‰Ò`5Uu¢%Û´6gÜå9;îÿ5<è÷ÏÃÓ—/‡ý :ºT8¦È›® KUû¸Eñ/.=4FfëÈ„©ëýŒþ!E<ª>b\DÇ?ÌØ‘~‡£oâx^ ©Úž,A ³ó’‚ñv¡f´B•PFåF i@d4þDzÜò€ýD&ŸoU›Ä¢‘‚HÇÒJd… öÀ/žÕ6E?;¬&iD˜aH`ªèóòëXE,2Žã¨i*`G×Å£1ñpø0­ «£JtÈÂ?mw›K™n~a!çk.xd¼Ñ³eÿµš&ÅB6Æ×”ãõLﺛʾ¿FÐ {i‚(®JpKÒrÆì8`ïr+èc0¸,›…“´uu·ˆA ßxš•aéÌ•í žqBP4kôÖ°Ä.ð#Ý ˜Í9pœhq6'âæàý!l1Õ• ZEŒ£ ñ“îM»Ü&nÅÊN¨Uʵ ðëUE¹)…#}µL¦cW¢ª›·Chì¦L8Ž'7Ѭ2 …ç"—-ñŠJ¤F!ØN@yVÕÔm9â@U»® ™ôè&ÃÇIpUh9XjÆ‚³£|älB0%ÊÆa­CÑUY/ 4¥`Hcñ{Q†2)àí"+­ÕB°ž¶G¸ì•ü:1J„ªg%ï”wðx.°wi†/ÂMifÙÁÛBeM'©!ªn`R—u¤MÄA9Š7Ðl)Õšòï`ù¨Aá.U©¹ØZ·2ª³ˆÁ‚¡KMøŒ¾Â•Ñ­¬©Þ–­¶ÝQ!×hcßrQV¾ýy™€È±¼Æ{›"ÍR\Ju ÐkËõ:ŠÓ(O2‚µ–@u 3ÇÄv‰œRÃÆ‚žžejDàñ¬Ž€Š)ÒÑ(ž«{ùX­€RS2Xª;‚ÔŽ¾†}€ìÜ?ÿ¡’Ä‚÷þ†#ø\ªÒ‹Å¯¤xkQM-”u|a(m2”;1Ž¹T€ý´FÅ’Bš‰d Ôõ~‡®Åf¬¯%âMu:áàä ÿ£C˜mvÍ®êO4Ê­+ü¾eêA·Íp›‡–¨‚™°†Oúè¦ño¿ýº.þ‡Ìådÿòøñ7O¾ÆøŸo¾}ú‡àëOöÿßkÿ¯G¿þ"Vò?Ÿ~ó)ÿó7òÿXæq²® ‰ïÍ8áí6"cölzC®sœR¿»¹|ÿ‰{ÿßáÿ £ŽæóÄÖžÿ'«õŸ¿ýtþÿÎ?“Ë'ð!þƒ";üß'ß~û¤‚ÿûõ§óÿoÿñÕ‡Ål÷ñ)fãÿ4.á< $ÈۄmË0gAk™2 @›†T ¶£  ¦<´"žG9§¤YUž >ó¤ƒQ³Ggš¤oØ‹&£:s™,×dRU@L„æ´ÝŒ‹UÞ±c ±1Òk »jŒÈÅOgý7JD}ôÑÝù*@Ú£¨2A]%‹Y4ß+C&s±tòS)Ët\%:˜Ý ö!4 *Äå i(?íEQ„§,Ë]_HƒY—קçÃÿZ„£7›´d&í¶ýå!'‹Öðnò•#¬[-ø®ý·–|ùÈ4þ÷àûïákùâ¿ÌívðE°ëtS¬ï¦¶—ÿ}è±ïß}WÓgyöÊÔZt‚I;hqä ,â3ÁV- ½~Ô?Áºy-yp±î¥ƒ‹ãÞ›Ûñ½V©¡‡Ö¶ìÀòØ“lWé ¼Å(w2ÉÙtn¹ú° Mh<ó-Fs64ûÈ"ÛàjÖÈ„oýXæÿ8e“½'OŸ¡€4‰W–â%ìº>ü6îÐìIýgw”Ä»™°2Us©Û ÆèÃf]SÉäg³~T¬¦kI)'”ÒÔ k&8‹#ô§ çã*Ñ… Þl‰‰F‹e¤¢ÉV4Šز5b1Ôê@nŠ»4©dQ;Ì4¹Ê#P±uFf±L”ͧS3u¤=AMÒÐû'½G}ݹj¹Ýmªžåh(w MSܪÂ^…™M+„FIsd•SÈ´®†BvnªÌDä7 »T/§ßH—gtXIÐZRKŒ›Ò]ZŠv!Ö»”ùâ±v°€sw 9Ê%(OËFл@µ›¬ êB sÁt7ÐДýgÚ’ ž ¼ªmŠ`o¬LØH|.ø¢Á6>´]¶]ˆ ÉÞÆÍÛ&ħ;“g¨ʨ7zÕ`.F¤4Kw0Ù£Sʦ\–4[”rÓxQ,ªÉ¤vÝá~0ºQ>Ì©$x™‚âD/Òq ø>\p9j©œ©±#á€lS ?~ÂÌ·ÙW£ÆkÐ1b]Ò#¨¦”p¬a‚0-˜F kdòÎ ‹ŸÏ÷Ѩ “P&sì~Š^C€ 5Ö%ÉiÁ-Ü\í*Ó4„ÿlÞÂYp'¬]Ì#Ίe¯á¾e‘änë…©4Ÿêš—êš/œöMusTnT}Ï×±¹Áè!\+¯ð9¾E§‰)_=-uÝ «”–IW•Ð1îŪ|Wú‚™²©*,ÎZÂÛ$›*ÍÒÎbÏ—(Ô 2ˆ%qÂn!6\”ã ä ÂÚ¸è•[Xm´ ´ßÊ /^÷{Ãvð¿ÿ«¿ +_²eÌ÷È™¯Oåû-Ó’f$ßÂî©$\›bq«<„ɵšTT œ³\Q_€éñ臇óä{Ó-lôâR36`¨÷[¾Öåv·sp>øQ/–cw´¿ñ½ypxiÞÄÊ‘ŸYkˆ_>ýã7þ–K_úïÕª·zP¯Î.k^´¿ñ½y:|¹ëÓþÆ÷æÑमSç+ß»¯'OŸøßu¾ò½{~Ñ?úßå¯ÎV¼ ·Axt¾>﹯Z_Ø6aû€ðÈÎêö¾4'¢üK‘‰ïÜ&éÓ'Ú ÓÒhI¯és·LP»8ȦuKS¥MB¥~Ð;‡&Vð—¾~yÞ￬nãðä²î}‡P½/;'³ôKrÞ×OúÎøÜoOÏú'k‡ï‰&¹²—J_º4ÚvØ›Ÿ­UÙÙÔÝr§-ÃðÃi’.ß…a»Ô^étªVñÝϪ/Sq\ýñY/„éïîý#Ÿ? ¯rÊ¥µº™Ï#· ³^[·_™¾Ã$úæ+þˆÈirÝ~¿]ž¦Ëù6šeMç7å‘Ñgðh¹—OÚý˜wgɼpFíî¸÷¿9;òQ]{ÖÚ©/‹eêÎ0#^š~d½½fç`9fão¾ò,‡çž:ƒïõeÉͧǽýWÕÅp9Vµ­Óyœây®¼X:èêÍÏê™I‰›ûü”žrYEéKWÆ?ñËÁÇýg*îý6V01ˆ’CbçË<Žaä$OžÄ üÃþnâÑÛíLQpÑÂàê@‡ïÞ½ÓI®Ÿ/þ¼BÀDkœ½¢Ò=î³Ýyt¥/§wj­íÕ.Ý ô}i§x*¾—]ŽÍï Ñ{ˆ罹´\¡¦²æ=]p–_ìÕIÃ2ˆç»Ã8î‡?ôÏKc{qz~Ô;9Ø·ÏšóÀþO‡|”·€¿¨~Ü?ܯm[z ìÑ}éxprøšúÐï­gˆæú ¿~–Ń²£%y!¬ZÉÅÏÕòE<+ʼ¸ùî–…?GøWz9än[ªk×¼ƒ[úYÓ›¼,Vùn“Ítø }™ÓzŸÑB» k¦|æ“Í•àˆªõ2’iÒßà*éй‚ÎN‡ƒ¿ê…ç½—»ÕÅl·ï}"Ø­™°•“ 4ò”g°‘þ"^ w‹4w²‘“%BYç'Q2-¨ºá]((y‚G4Ž {^k²Êu‹tó<&d1ª»Æ–‹n#Y=A³ê«ðp¿´ugÄí}f¬:i¸XŒá{Ì.1sîÝ­3mó•`5”¤ lÈ ¶¢Š‚vª%|C`E÷‰3D&¯›h.Õy ¦­@IŠ–5诘, ±¨6á–L§þ?š%^16jEïÿOñ‚­Lo`ˆ×’ñÌo¿ßu-Öúºë§Ã¶wž mPöùÁàåËð"<è¿œ QSBÂ9"C†MVµá2Ûš”—˜ü”º©=—tgí’ ΄†Žª–üŒ9 ²os1VÖkËš¶ o`Ø×éyåØ¿¸´Û%³ÊÑQ-»ò ´w6ho­8Þ»µ,'é±øoÕƒþQï§ðè´çxÐ7†ãx4Å–Öx:ß¡U­-rEÝ­{%™Y¯ÈäK2—_þ88Þ¯LÓ'“5÷•,…ªPŒ«à®„Ëý _÷.öO÷“Ñyßl2ÈáOÇ/=–6&Ÿ†p¿ÑÈÇöÃ5ƒQw†0—Ó”*Tæ $w;UóIÿ¡baÈè¿3y›Tñü&[& ²9›×«ê„9&¥Cxrþ0^ Ž?•uNäj„Á÷σ¯Jr—y3|588蟄ÃþE»½z·`nì9 ônfoÃ;ÑrºØn·Û>ýÖ ¥”ƒµ ×V«ûµù’zšÜÜå@׺1§ò0E÷¬xÑrºó­õ%;п ô"X×-mµd}üàæié ¨Â6å·~4Æ ò ò­`7„lN‹Ã:p .(†5ÕÓ;Ç+€Ñ5XFS'% )4ŠR.Äœ`Sx1µƒŸä"³¦©[,q¿°·¤¡¶A§lgòm‰GDôß覮î$®a´,ÙL‰CÃØLjÛN×—'X@ùâòüdöŽ½aWÝç²þ§Ê ¦'1³ùâNdï¹-‘ài£›yþùsxZàÖ:=磶[Ѫì‘UN‘Dt³.Vsù`?òõðÕÊ4SM3Úü¶ýæ¸çÉhÁ½ ô¶TvýTŽ‡ B‘#Â3A Í>&À×ó a“IrÀ=‰µ§Ðƒ™R[EAÄK‘„¦ñŽNUE «ë‡¢„Æ]×ë%éÓ(½CÅ[Ãð&*ÌFaR5é•6J170¤t9kW7ÓnF=Õ^uÖ4ìÒ¯ÅL§4zM³_š-SçW~ê|Z’#ûû~zý éÖQÖÚ©®¦8)\–<­íÜy¾¨ºÃµs–š.§Ó†*7·ÉlúgçýýÞEÿÀæuFYÖ?]‡ù¶1ï[»TV›•UcéFŠ¾ÛŒs=YÛ‘ u«6 ~âåµ·mÿ×I>E9ølpÔ?ÇQ§'8òoŸ£¤S)´Àõ”fÉ;'I„Ja³’St?À¶¨BáP1¢2!\¥;ɹXÃDà4h.4ç wE×|15Žò$~›¢Ì”y°q)§ÏV ׎;÷cãyõú=š¸=/žõ.^žž‡½“ƒóÓAÙ¾&ŸZ¶ÃO—s÷9)Ê—eAô‰_ýÓ×Úr‚¤ˆÅ^Šàè‡r:ds¤•Ü›|xnU¥ªS2bK­Ã:zÝæFì`ý®T÷fo=ÖfN×üRŽX}#ÕØõÝDæz8pº’©öV”Á%µß?j¾FÏ:]ýV²/îËš¥ít9sâv~¥\½ß ÿ[ô冾ÿãñÓouý—§Oÿ ÁŸ~Êÿû”ÿ÷)ÿïSþß¿KþŸ?eï‚ cÂ)¸ƒI]ñ¡õF$¥.Þ3xÏ$Í P²ñØ1ªlÏ ¶Œl —>åÙ6¨9 ðq{}Ív‹œúŸ7‹%êmB4Ú›9# À‚—záIç \¼…†*Ç¥F Ï L,DLŠv‡FBkŠ°ž›$ïbÚÓøV@W¬Tã0bgÎ,Êpe¸Øp‹ªÓg”HO–*m€â†©Ø-Aç^_Çð”;ÚöZü4µ…jÇH²r!Ø-)PK(“äz™ÇôoÝh$Ãé¿…™°%kǧ o~„)Ë4ô‹(Gý%‰(·¨ˆ’˜"‹³pì„Ùt¼ÃùŒEKH EÀ¨o`ɪ%mdõã3å| {†ômí×hR ¾©ÿzÿü4 #;I%Ó ‹…Þî?{^yÚ2½y‡Tz…>[ñ ³ü |ÆÒkžÃŠRcpÕÛ•é‡rPÀ;îwgdº­ Kt¨ì½ïº›Ž‘Ï«oQüÓ<} Ró8ÎÛ·%c;œ7öÓÏG”ÿåßn4û­êÿ=ýj·Zÿç«ÝOòÿoñó90Ž$Û~¾h‹ÝÞ[°ýüãɵŸD±öó&Õ~~O¡vës˜ ]ÕA›–‹ŒÝ—s¼DÀw§²Ip Ÿã“Ý$í’õF×€“TØ®ù›kGø îA¸/‚‡Ï-G‡¹á&ô} ˆ]–×=€¸róEí×%T"ÿCºÔÿýõèu_%é6§î[„«ûNÙ˜@n%}¡vt ÌÞ…“ií×\wÍÿ¥‘3ª_ÿ#z½›øWK …ãxA@vÞ'ná UÞâ÷_%±·)íÜš*€ð<„i†­&‡Q–ûg„_„óšŒýS!T„ä}`ž'o£Eühå·Iñ,šßdyÜèáE6GWÝt¼úé+ ÁéêîaŒ7ã¼X÷ ÌâÍڇ浄g?¿®y†OÏʇfÅ[8@W«Òî fË¥gX–•ÏJ±”Õk+í!+™*J@š]¦ :²jÉä»Õˆ]™jÇ[Ÿä?Ï!û 俧ßÀeüç§?á¿ýžößov”öS9ÆOfÒGðÿl)ض³Ši‚ ;Z÷1®âðp /Ž”¥ÀÌîc|ý’j+q”OL‘:hØÂÛAU†ÀÑ€ ‘ŽÑP¿-moc (m`ÄôšÇói4BÓ`²è–ÆWL³9ì1Ìh¹ÞFyBvA‚2ÓÞR¾"H<.ð},IDQoèÕÇ觻xAâ9 …«wÅ·ö{Òb–ãëj­pFÕ±Š˜°·Ö˜Öœ¸v@Qקǃýðòdÿô訿ÀÖ]n¡re|¤Ñ’Å ´spÞ?œÃ ’^òÚZ¦Ò'.€dÂt°- À8%„Q¢UÊKÀcq¶y¶¼¾‘\+¢4 YÂSΓ#:ª›E$TžÖ$"Œf©µ¥KrŽc«Z'ÖÕâOIýHFËi”SDfA‰ì‹ ÍíªÉ,æ¦úLÁéí160ÉcÄ / ~-Ì@"„l5£5·‹x6§${Ð ü€¾@8«V÷º¢B¸á7TTÇx U›¢ç¯> žt¿í>¡'… UgBæ\ɘ̺ý­Í¾TÐôNŒu¾B?êé8?GyÃ+_Ó†ÐÆ®z­ú”»žŽ‘̆ ©ø+¤â·°u£›(½Ž¥˜% Z‹cJº!BY(âD›ömRÜË‚§­ «Ò_]#µ4 cåV<í3²9ÚÖ¹ è'¢¶Ë«Å4¦¥n¼¶%%SNºÞ¤ûgŽf“Ë+éÉ°gô-ìX„<ë.¸4ºÉÏr}²ë(¿ÂÚ­rØàüXHÝ6®¹“œBI:>|üϸÆ%ÀP¿^3üQ &ÞvÝqX&zA´TtµÝY7‚ÕYÏ|oåõ‡À·ÃýÃÁIxÒ;îÏ8ä_£=x¾¶ &‹ÅK¬º÷O¬‡ß[ÉüN§ˆl7¼8à¥x>´@&êp3P0L ëè Qp9ª£Ü?»œcy—-‰—qö$|ßЦb¿ËÓ†O ŸÕA ‚‚„bDɘ!÷Rw%8fàfÁ°&â&Hz3 [ÞH+b˜ $ó€`¹ì?+^ò³¡8¬Ïíâgêòá2z¸r*v†ý_æ^G‹Hð¬)7ß|­BõUËZ[íHÄÂù«#ÂÍÁ¤,W@±XN&]ÍÂeGbãK£KûFI ‹›¥0¬(åT\Õ#Y¶¶¶œRÀà­Qé<t}U¸jðnÁ«%œ/ò½•G=½Ü¬íêã•çz£œ‹Gñîëa\.i¯á»ØaåUû]ࢹÁCçJÃiœ'#•lKuBCª0ªÚÁ:ª0òþÊu‚;v XüfR9ò:»ä=‘ä©A¥/öþéñìâÁ¾: Yœƒ,Ô YŠnw|¿ç|Œ¤§)‰%]΂_8°‹š ž;†­ÂŸ»ô§ÛÊóà‰Æ|ÇÕ*ûy Õø,z¢Ô$5¿àõ¯¿.=›2s.ù\*æ]h{žMŲçÁK`#Ε—U;Å&Ø:ªÀð¿às‚ oTÉŽy{똷$<Èc²(‚´Aê[|'ôý}kŽ¥y1øfIe?Mm\.3 |.}¸Ë¨`ø€²` §‰Us,Lrg ‚ŸŒV¨+d ͇˹"ÈK;%ÃmµR.ãì.FûQõ£•eÜš¤ Àp#R"gQpÒŽªÑ|V Ï•Ù7,Õžn>`- ‡çr¼œÍî¾ß"Á˜™Ï»P?ñËÖ|yÒü³-’?^¢úC8”¹¥­Öhÿ°ðɶj «¨‡¤à÷£1ƒ'!R–ó›Â+M¡®o0´¹u äTáúÒˆ¹)¼•9šB @,çcWªÐ*(WôY%훵gbÏ¡,a/¼“Xj:¸¸}zc(û‰+“´ÌºbODøNS*7P×Ú"à»4KQ¶2÷ŒÎUâV5™% LñªÅ¹P*-gô0¤Œ¿ÁrÐu zè¡ð^¿ß4.ï™Zp‡ÙL\ª®‘9· 2(/9›qØôüûìYíæ·¿“ ¶ìÃ:ð­â¯8äµí›]«kƒÝÜÒÒ™å>o|,¤ûŒÁë[ž¢A›4×|{ýóàål0 9¾Yìlúvã –ç«Âd݆Á²ÁRTäÌšå©m´ËÈcì å¸ád؆ÚÑ|žgï’™'ZHd‰2 ÍY¢t0bGBᢇRÉ&kæx&L#‰>ìÒ* jÓYÐ;B$붂g¬r'wíˆ&ëÙ‹-)…Ï,Þw¦êïaçð9%Û<ð¾IÑ´IÂgúgø÷Y ܾb¡¹xð}‹}ö¬z ÒàŠê¸h·‘ê„$èÌf]®ê®||.\IÀéœeðÏžãçåά&à}w’:u»ZÝ|µi<‹þ˜Æ-—hÐzÖÑ,µ]ú6AÔ¹º/—i‘\Sü}Ý“i­h`œÆö÷ÞÁ•˜…wŒkž1C]ó ŒxÍSjà•Ç¼ã÷›t¼Óhö¨™M³çeRÍVs«{ºÁ›lØFoÔM¸ÙfnôŽúÕö„øjìڰݺ#inGfÛáÅüû-Ž% Â_ y”,Šïàs^@ÒùÅDpääU–MƒpR¾*‚¾a6ôs ÔeŒ²±‘€­‹¡Ô¨îžµß MÜoåý¼eÍш²9bæfùóç-§z÷‹Zë|é9~ÏÓyïïã³ÓÇ$ª+Öh{ü'ç£nV]·®¶7ÒßÒº%¯yë›üëõo(q‹ºó•¶ÿöþ½½mã̇÷o½ D¹šEëdDZâô¢)Jb#‘\’ŠÍ7~ I¨I€HKj7ûÚŸû03˜ x•´Ýµ›Ú€¹ç"*û×±Ö8ÉaŒ&t<¦ Æ̉Šèûyâc >ìó”ë%¶] „”¨…ª^hVÆÉ7Ú72<‚x%¨K¬0×A”bÀqtSƒÞ O=Å æc/v›IK|dR( Þ'\å-~-êþÀâÅ@YL0žŽt$ßú­‹\;"ï‚ùα >©Â{>Ó\`ê髽þ½›Çž*w OJ^,[\ÁHVx£à8ÏkX çW8y ø‘…«Ô‹Ž<þå¤Û¯D¼>Ñpæa:%ù•ÎG·•¨JOóvxá{á}0EÈÚ<¸7x¾<‰Hà­ÀçuÕñ£ ±å}™+úz®S®dpzNªyÁÑt&FÍÓ†m:#P9ZZ=´€aÛWNÚç-ä,°§ÙÂ2Þaäp<¢ühË è+ZMª8ÂðÈ’­ÎCTéÈÕÍü¾“g5¶‘ÛWÍç^ͯ½ ŒGIÃé%áŽaðûºw ÜÒŸ8†Puñ¹Âm RgÊ '~]‰)0Ž‚È¢ÏÏ9'1ZØ+Í9&Û‚}¬¹‡©â<§«‘&å¢Ý9}G¹ìÍ4#ÍÖi³YÈCL”°V=GêdÞ£YÔ•†E%4³Ç]4 ¾íöÏ㦙{ÌjÔϧ˜Ê.ú®1lv/–´Ve_¯Ñ:ÅzÙî›ê^õSªéi0§Z"˜`Vÿ*3¡3úÑužðþÍm«'¦ å ;§M±÷Vœü¾-€]¶«®\j/ã©Zz¢èõWƒ{ ¬µ0£ié?nÑõ|>„žo4š ]Ÿ[X¾çgT“C”Xë -ÌdS -ºùXAÅ Ä20º ™iùÛ""¸€«HdÅÄ`8mÙÛÝý“rb€²oŒ±Àú‰³âëÓ’ZìL˜ùu-˜Z¶A&™¢fŠg‚4W#ÅùrÙ+Æ|¦£P8Qä·9Ó匫îŸÞ*‹ -"VšSóv7Nù‰3%•¦ú`Ó$1Nlµ+˜Ü™-ÅÑÄÌ, ñ)»œÇ5#‘4Ö¨Y4uŸý¹@©=ðÃ>ìÆJVõ*Ïðï/Þx_ÿ¿Ý¯«béHæE¿‰ éÇåèTü)"q…4¯Ú$%„€üLø·¹âA§a}„ãú&#«:1tŠë¢ßîküô¡zTh¾oX†—MåsÓpÆ‚«ƒ¶´î)YÕ5 72o¯(…k5‰·€l0;Ñs¼àe«€Ø@b)ä#!ØG(I:ŸXw ïV_o$DÚ Ñ¦Â廥ÄJãë`1™KÖèžæ²ôR˜1%(„ɼ²ë5hùüh —œ)cg<(ï|ú¹$×#ä<·Q•(ªu®BQÁóD2æöÏ¥>F¥„ +Ô¤v3¶¶"ùи*—€éxBá8M¢þ!3¦%jA-@!²UDµÞuìªOBQw_Ø;nC]R„€Ûªâ Þóš£ ç8 Vq-_$–D>Ç Å·^bÏÁØÍi¨QCFõÝ.ðÁåëCˆ?raäcª¢ ½‘'Ë©ixLP>$½ŸHâl*¼ìÛGµSdê &5mˆrmDM¤Ai$"ÑÓ™Ò™ý箑µH²ô|)’B‡µ,ˆKåLñNÌeE¨ètž2̼IrÃ:6T¡Ûi¢mðš·ˆÉú—“ºG•¤—\ ª„› X²Ö´‡ª)zïëUœƒJ¸w¯äŒ4‚¤{ätÛ8¦‹@¦èdRy#§2õˆFj3©uÛÁ@Qù’”¼îxÄóÁÀår¨?ê¼¥ÍcÄÔüÍÓ:u­ÀY‚Ú¿VYÉ¢a@¹ºdñiÜW¢#ù·'H‰0F5/· <¿#WR¼cmó(]àGÌ“IÜ·¦ÂZ%î/³¹6YÍl$™ÂÍÎ\ º ³M²îd1Íëy$œÜ¦HÍI‘^N­ €:ãtÖ k¤ÔÑ•AûÉÌP'ÚXB…)%°œˆáæô’ãÄ…~údRóUW´äŽú y‚#=:Æé\-9ÄõV¨šÕŽÉò{ ùœñ|7‡  r6s\€œõ{¢7½táº:t…ðláXë˜~Éf%4XBSO:^¥â¤·ËlaƒFàzO­oCo$7p”HÙ%½h•f¸Fw™!@n Ñ0¯÷_/i¼!•è-^cRy(Š_ÆU}Dîn€^è >¢.Hˆ2Tdª2Ì'ÁÚ™';WáMÇ”Á®“ð æd[ô©ußc¤áâèàÝ‘®1·Ÿ0U©ðõòFl8Gúe°êj“ ˆ.L¬øÅñ±@Ý0‹ªPr*ò,ˆRËž)í^AÉ6&ì½þ#Ó]%BStÉ,pÄá£Tªéw|dŸ·lÇdjåÊ€úe Kg¾ˆ m©¦/¡üžGîá*";ƘYO`”Â;Ô) ÔFÞ(æ¦oÊR‰ÒÍ,_ü ÏŽ·¶`DŽœÜ 7O™%Fzüm\+‚Ì&Å,ðÞ!œüä¹Ý€kHø¬ß*ÓÎ"VdŒ¶Vœ[aZ?23w•Ì=~”&†½KµêšD²|¢ M ‡KÎ\8(›D&1»¨>#c„ÐÎj›ÄŸŸP< õ9i+y;¼ÎãN%¿ò}·×øÏËH¹ÉïÕû_ö~Õ¢UŸy-õÍ[!¨«••ÇÖå<"ZyàóŠ2“ͪåtiJ2mžÒ t=ƒ¨‚J”ÖqrúR݉CâCŠŠ ¤Åºˆg³,oeÕ´YúÆ@¶9å•;·÷5ïó¼.¥ãÝ«Ñé¨E+u[*õkx? áøù˜3öx¨Ý·›NMëÃ96VkµPÏi¾ÙÆøc Õez'85Äý\“œ´R=ÅiDj¸ƒ°Î£qÝ(zDlÖ mi‹—„£ýXcé_ +«3 »#†÷÷i¬º¼]MÆã¡|•dfƒ‰:0éuØêÉpjýYK⤭w*aÒ·5Êh‚†wÒÍ6ä+*ÆšPŸÔ(²Uü$Ò$àïÀÜÅ9ò]p{0 ªp] %Nð³)HÓŒî8Ì×+^[?n/p"8?²¶õÇÞ'ÂÔC³ ±„vUŽ%d®áx1 5…ÐA*—€{’&çcÆW§‹u*’µð7à^ê>‚8&íA;ž£»»ŽŒÃ«Å å^@Y¤¾ _–¯ 1´r™âƒ€K16¼j¨¦3Λð®}Å HaI\¼x×GB[ÃÙ…tñ¬“1ÚÒí«ãUlC!+¦(½\?«¦Ià0"Ä’a+%“D\óÄ}_¢ÃEQƒiˆÌºê>x¯êœ¨üVÈoû<Íëùå„]’ ÀÙ;WÊŠäwŸÏvï½á~ð–0î#µ<,[KC*/¤˜Ë÷y ¯¢$ýœ%”&–‚Tj[¥Ïådš¹HL£é.5}LûU(½FÆõ’ÖÇzóŘÝûÂㆻ£ž?ˆçeÒeAÙ~‰,F FšŒ˜«‘8LÌ潡å ò87”£®€¶NÔçB5ÊÄóÕ£hÓ4—0•îNæËÎ1^#Z@zÖ7–át&È¡¶×33—£YL9&~½ø3ôÈM> YÕÃT9Çè×&‹L¦hwø5œzêkÏr™u*[î­”€¥f;¸F¥´$SZEmswe¼˜ 3•V-¯5V Ó‘òdÒôâôPòY~&ùöœš=']nÞYú2 § õÊ Ä—&[„á8Î1tõqjv•› Ud°MŸ£7-§.“ïsc¯$LÕT‹> ÈU’²…Ñ‘ƒêZX¾èáÅê c6É鹤xJ)Íð…› «e–†¬²‡w†Nr%t8]-®}&MÉãÍwbŽHdr² Ú4âH+ jí?v*óy>ìÐ 8ÊØAÆ M 9†¦R`Rˆ¾»ZÅv„;´ª^£Z€SRMó,¹(Å“¼ÊeÖÜ#ï:íQÁ ¯ºñX™¤`SÜû4J£I’…yµ#g$¬CÆb€À,:˜(¬ÃæjU^ŸW!Üä̳R¬¡žÌO ªô:ßm”; ¯·kX‘™˜€Ùk8• S„C"•äHVÌwù½F:ö0mrdT¤EA‡àuÊF”nì]vÚï½ì!›‡Ó,÷R` }ã¯<ðÞÁ¹†?D™šÖWœOfØ®` €ßž&cÇ¥±Ìnmxjò…ÐúÛ"V?d¡Ô,*¸½½ÓPæØf`o곡ö*,}ù)­›±~|ÔW\Z/q¡ÌÓˆ/š\¥‘çu#CP}³‘ðÃVæ£Ç£8êX«¯î(„Yý‘~y'&Áßì> µ+^x5(GZí®eÚ­*•PóåÆk>ØHÿ7?›zÅýö(½³æezÿš’÷@9É^°ë v¡©Ù]ˆm Yby;nNWyRý±šsktÿåÜÂ'ù­62(¨<¶V^šÚ ˆM¦ÙpÍ„vC牵IÁ °îÄSa;ı¢³œ—LË»4Êý·hFøàÔM‡ºO³t«™;ã­'X„(ëzx‡!Àü %Í©¯w[õ…=¬Õ=A¦:`{¸¦)† ïçèž—HZ}mÛÈl‘»³Y{lsá\#ú߶œD)Ci¾ wIn}¯;+µ,¾R8¨¦jegO°  ïcp³À˜º]P©›§£[d±åRJ…¬óðm½ì¯‘UÅñ\5eSP"®x©’2e&)hbîK¶:nfr,j wÃNÏHɺŽA±F…UÉ2 .0û©]ä«zL]• PÎÚ+r£Îo*é¥+F¥¨)¢ %L!ò|$!pÌ5GQ\P¤ãY "ÊHê‘„îHó>ÂÀ¨,7vâ87:8*-·e­£³Bœ²YÂzJ®ÉmRN“yì†óA³Ð)Œâ˲× öê°Šþ$ô^l¾Ft‘WDšÔ3q©Sä$ Éw“IÁŸ»h<¿­‘î9â„&{"|¾eÆ´ Ù¸2ò§Ì¶ås´‹4ü d×?5ù†ûÓ€Î`‚\ÇÉÇq½ZÞÁýº2;sÃ]ÁöNæëuÉXˆ(¦LÖ(kØGõ$CW2ýn“oøhöEÞÁ|Ea¶‚‰¥“çÌÖqûd:NØôY–“â+zª Q‘¶F}ÓÅpX÷.ÐÈ¢¼ßbÚgì£W1yByÅ”£¢Ü}çR+ÓìBجù¿[…Ú„³‡x”™PÑh5˱OÉè!BÔ¡Îäýñk)c gÊ;aÉœ]¸šŸuä™Ãn2“Ö™F7:%*fFúÖ Ÿ3 >“²9V˜n8÷…sˆüu1ç+Ö#zëËfÐóÜ«_ßd1`à~f¥¹&Ð)²Ò7lè=©ÉCÈŒÈQ@Ý(rÿùAGK^æçCãÖYA'Üf…Ê€²x“/ÓÍ÷¦‚–F¾ìV¨îÉaØ4pðÊÊBáRÅé€É¥UAfÊu’h´ë“q‚ѬmÃ1#k:]¿ÝµBí`éR\]‘_ýæÛñš§„ú“WCMèÿ‹?®,ù1ð'”¢5½Éœ$®É'®[óŠr+ëÕ¾²2×ÇV Z¸S>® G@þbÚð_0 .':óÓ#²OăYŽÿ²ûíÁ‹] ÿåÅîþÞgü—"þ˦Ð/E /‘Â$Z8±½Ó4˜Ýw· WHà$„[9C^ölƒìÃììïî¡ÿ¿›„óùNObÔ ˜$3b[0'ˆ·à3®Íÿ1\¯»H=qÞ‘Wzbio@Ö:c?~`hØÉNcuD±Üp2ÁþNÙhD„¯#N\´1yE½” iËŽn÷fT¿•Žê 9uGלî¬ßjêEeŠ žQä·ö@–d…Ê»PIy•[úW’`³¹ëY.;gä ©ëæ(¶ˆÌÊi’Gy»¥Ôlž°ÛÉ]’NÆõ¦“„>’Öµù' x\öALên¶ da^X=tŽ­+-zñ4( Ƀ4‚Ì1>O¬V9sOy-6.Á |3º;@’0™8<.P­ywpdÞÒ~Ðs7s”–°Í‘8A¶u¡PFŒÊBfœÔÿ>ŒÈa”NÂ*â•ÁÎEt¼&›t“l 3˜8‡Rz:è³Y_‹}Í—›ßo·û­æpàw;ç?#œƒäfÅ^d˜//9¸ô|Ph3àƒ†o¿—»ÚŸË@v“ pqÇç](òþñäzcí"m‡ò@Â,êã ™ 51ÚΘégÏYãÄá_Ë€&u-„^¯“ÇÅl›Aûô¢1øÑlª‚‰Õ.¬~”…o¦Aö¡"Zq›ÜQ£$æã ú·Í½gµ5 å_#%¸9æeý±Z]è˜|ß„¿‡-¿Ùí †B‹Nd/1Ù^²•jî,& òùvÑå®æÓ]6P‚¼Z kŒIY’P¬Eˆ×RåYUd“¨*_~Ôá¥7<Îe-ÿ+lѼÝ5•E‡LðóÁdyñ1\«£Ûœ 7îUØltš­ó%«mD°®-cŸ9n¿õ¾=ôÃa¿ý˜¤ ‰ñÙq«yÞ€s¢Z2ñÆG…ݪ54¼ær°½ÒÆä­ÿÒXâîKžk6ˆŠýq¡‹z~ì¿ë7zU¾¹äèX¾Õ’š`D2ïËYÀ¦ÀèB{Ý“úϦ‹—‡êeRh[×NP<۩ꌵ#½î>·É<¤A îúÝ"4Þñ\°ð5 ®‰µYк!ÅÕUxß&cÕj bn¼Âc\Õ…‡¼Vs“Fq;¿D²öæ)~ÅõwÉZç³Ùdqë Özå8®óuWz9q-|ùèÄù‰§.¦2RÖž.6œ÷²«Ýü¦¸ïª¬£ÞÜXŽêpGº*ÃçöÎ-Ù–Ž½VD–Ìíg¨áðo«~[â?ÿwïÅ˽—¬ÿ¡ýÅî‹ÿØÝÛñYÿóGé<ÇÌ#¾ƒRÞ“Ê/ÑpŒQ`1Ona“’s°Zy;SdÏ(¹‰1:WKD¥| é·(a€X‘´—® >&çç~»ƒš–nßïuéLJ†èá4zŽ»ú¢U˜pZÑãF1´Ž»¡ßkô ¼ÑüÑj\U£C<îC&õŽæ¿=õÏŽû.·…Œ­*õÈ¿}~)ïX“Ìéå{qf ÜdÂf‚@é pÛ‚¤N ÕìrÁwX > ãd>ÊÃD+—(»v²9ñ¹J‹õC¥*ã 6^ ÐêdÏc¸Oº}›CŵôõxŒÇé×JScý —AãøØ=¼‹’Eî`§tÚò”´Aì¤Ù)‘jù©»œ`é±ë  Œ'¨]AdáϽÖ`šƒ½ŠâEë¢ÛÿyzyÏWу¹&=`ÈÖ wÞ~»=‘+cAÄT¬Oq=‚kÑ{Èžc–°•Fè×Æp]šk-$ºöÚY€ì:¯"yÙic²«³õÎî¿4~jÀ]ÛÁ,› NìSˆS€‰ÜQòrkóBRÕIþØjõˆs„“­oŸJ׋ÿ²"˜Qf‘4I0õƒ)èÂM|Jv“ö©Íñ3Hçû!´‡éÁžc~2ÌM| …pù)aèbèwßþå¸Ý_oÈ.?¶¸§pÕñ8wÔ —Çèa4á(¼» šK-ô"ž‹K~Þ1¹Kbü?wÆ|qÙ¹hôèDœuÏmy…jºÑÙ&;Ââ^˜ ==Яê;]¿yޕʆ( yFL_¢>IW‹X ­2çÕÐ#Ôý¶Þ^žžÂ®²%E5û7¿……f‘˜G P¸/¨OçËaËïµúÄ'‹åØK“Ûè cy"•déÝfѵï´zwcyv‚Ô>îÁ¼6N[Ž•†×ÚDx¡¤Ÿ†lဒܧR ÍÈmº@¬Ó~Ë!ë1$ÜÚ±h¡é«Y$„iï–Ò  ”<“Â*z|n:(&q(XR‘£eÝý’FÞ¢ùg†f ‹ÎeÿÜAcƒ® îÍ­á@”BX½XÍéKÜì5úÀ^·Î맭 ‰5Oú#zœÑ>áv¸Ø#i }A9ö´XÒå-,§;[ Ç®G=EphzP®5tmot-Œ9@Xj¨$68û€Èû$BèÉëà%…ò ê—ÞÊ.‚¥îO–(æË‚ * pê^)dçîp„s†Ë뢸²ŒÁ$²I%sëÆQ .H>R±ZÐ.Åö!‡‹6ÃÉ¢Œgœ;ƒ ¹¡$1 ßù›‘Òoë%YþÜá÷ú];Žßâ×ôûÖñJ6A„eh,‚Ù*ý3„V¡wp†zAŠÁr^ däõ:íxb’ãúȺËNwðâÀœ¡ÝÛÞнËø¸ÞÁ3ÑT›Ú§NWXÓ0m繟¯LLsGäoWyWeL°´Äž„’‹9óS¥®ÆѼR³{ÜrÈ9”ŒŒ ß;ºâÎèÒm4È®\ôÚç­¾?<8ˆOÐÛ—]ÁÀã(ÝÏdp6.)›êÅ…¬u“©=Ž ºÞ…Sb7„›Ü‹Ÿèóáh/êOQŠú”êÖ«ØÍGõ>ÔX5ûÛÑÕÔq¨éü© †ïeýðƃ‰½®Ã€bp©Cz>½÷Q•sÙêËv<ÆÈü"&Yéù*¬o«šTLÕÖß"ý•v•½Þtc)ÀqÚê ÑÛÖÔÿÏ÷9‘®ï#§~ÿšáfth¸“~…Mµq8yJ1ÓH’ žð–bg®½¯Ž6V:^2u³Ó-^ÛuOO›äû£Ùd‘áÿeÙŽL‰ò¯áÿ?šÍž4ìrûïÁ‹Òþ«üÿ÷÷ö^|¶ÿþùÿÿ{ºÈKÿxòH—.òÿ<y¤!ä?ÁCÉèNòŸâ!¯ùî6{=-å›zÇíþÙj~ó !ræE!z¼MÂÛ),DÁ2pä_’ÛØë×½Öd±;ù_ÅÉ;lkËJá(F3³Ð˜°b4 ¢J}»Å¹…K5šMˆnDýÉvÃÜ×°~Z2bsë4H¯ðn '¨XpÐÅíî¯bŽ¨Ù;¯Ã6Ÿ„×ÙVåz>{ýü9ü]¹iT¿Ç-Y‡Kêùlqõ<Ä‚pbWë[[ ÁïäžâÒ)׋H1»­Y¼·aOlmFðmïŒcöÃÜŒ2'á<4­æ[¢Ž ëßø7¢ã9O°0è3‚fQFŽfr[./z œ{e”|d¨¡p*ñ¶4L¤úVÓQ"PDDÓªÒPq»ë“È«}‹²HÀ(vå Ó;E9Rvpž_¿fXmT¿„wÛ¾¬Ó×3}TN4“ÖÞöÍh[äfÌKx”Ò^Î&™˜?o¼†³é &Dïõzý·#zÛ@ÔŠ7”‚¶q$¼‹Ÿ?‡gO«·E#ÒëÄ#˜Ž“x‡+!ªÄrrÅœ6·0É'ȧÍ*ç0CÉJ´TÏ÷ÐøÅÛÛõ~-4²‚G[[—ÆT ¢Æ„Ö¨ÑxÙMÛÊ›ÖIN›…­=v,^å!”ÃgO&Éçá]¥ÇŠYôQÀ2ÙC<î9«‚ØÒ­kϱO8„…À]kÄè œT;‡èüi{XîÜbÐ ¥@N5e@<ΰtÍA,Ȉ[Ã9ɘÈÞ‡œÏºo1܇ʮ@Ù½¦”öfJàQ„gˆ-_Ä×)acŠ2(mEß'³Á š_ÀÉ©úC‚‘îîÔá…Д†¢h½ºµõq7-ÊfTÜ¥bî GÑx‹6ç6ÿ¶-fŽ0™Â×™*#RðboÔÀn¡êÏ*‡ NSGCh¨Hø`y…A¼³˜)¬\à_mIl:…ì–Ÿ…Æ©&i»Î¶†ì@a?øTÿb¶Ílšƒ‡%;Q`«Xà–€-„R¸Øž?9„(WºÆ2ÑñlI¨„fyæ Û‚Ù%˜³ZnW» ö­Ø™¯_‹#£æ]<4¹í|z䃉4êcJ ·ÜvaCáR™ì¶DVrcäà=Ò‹† ÍTpj(µC-¿¼¶r? ñÍuàqÞ}L‚ ¸©Œî"j‹U4ã#«Nµ^9PNh"º‰ÄÅsh‘Q ¡Ü ZÌoÄ––fq6˜Clpe˜|bëm Š˜£§-;˜ÊXÞ€)WÔˆ™h‹lºPGðÇH”V?eµaCcA‹ä$ȧ`K‘FNŸ‰súF­­@“{(žÀÈ4j¨OË}‹ @"‘Žæõ^y²‘PÏ‘0TpBr£š—°Tæœ#Å^’ -¹Û™`à°Î¢”,!”Q±…I*wm5'_Ü&…Æ™NMlÀ97ðq{QÌÐrKy©bâœÂmD#>Íñ{ä^ŸZ9@ªÝjrŽŠ vÚ^Ý{‹½ÔÖ´âép¢®yq#ðøŒ%ÓÓ8Wbwvx ï(}Æ6Ô°ÏÓwUêˆea ü;o[gž~ùu[\£<‰[pFx;Çì2Õo »}¿Óz磔ø³dÚ/ )dÝÚ*Ô&sŠIE¢]Ü’á]ŠQ ¾4 8ªÓÏë qŸlIªÜnaýä̬Žk£‚œ,Aóf2xR¶!°€¥Újv>PunÆ°úq[?kÜ“l£àÔ¼œ{4šŸš÷óŸ}ƒ¥Ë©˜`~hI¿}M¾ˆûdl}Ô·Œ«‹v„È*O#Œ¥SŠ\g($±2fÐêöHoiëرª8t-€wÐ/ =–Åé-gþ4¯[1¸¹†æ°4²‰ÛYˆGbdÔÝð5}Á[yÍ´0õNJÃ]"PAy'çÃ$ØmÃ,?9±MÂ…këEOR²c£à‹9^}„b@,€„!ÎBV.,Ž3 2®©·}ÚÜxãÁÕU~Œˆüném‰j‚iæ°ô¶UNei+]3ÎsuÁÊÔ~[À…’T17MBCFÅb$pðè•Ê¡ŠîÈ vÒ9o7Å-E¦hœÕ'üó\ƒ˜ÚFh›”Ò'1è¡·ú—Zhngàÿçeã¼}òseXž4¼ÞŒ^¿n}N²pɧC•^ê‡gíÎ~³w~90Ê0e=)ççèä Íßð?:a;X·ÈaÈœ0zЮŒ^ à˪Gî=7Ñ4Hn//RQEü·Ýþy£sÜô}Š6ž`æ‹ûû²2üóßÿ­—>í\Ê’ÿψ'Wï€Æ>R¿¿yà{ñ€Üfé³—ÕÒz.ägKõÈ_¼ïßÀ‰¾¿¤qïÃf÷B¶Oû*ÛÛ…nU͉vó¦³bQ;>1ê\Qaå ÷DÑxjóôÌÓîË|,°*Û ”Ín¢ªñÐ|]|Qr¬Kù<âFzç°¹.Z q?oamÞ¤ mL!÷ÜÖ?Ô÷a¼˜Â×=yÁ+O*f˜°~¬ˆpz¸ôÕ—LÎ#e‚ª0= Ø-…ôjz$£¨þFȵdÉi¯§ ”(ã9óZ8V9‹äpêÕ˜KyHá:RkÁ&yóÀÀ1‰¹­ØjKPÏ<]ÄI×ñbXëËš>CP×l“¢üž‹Ãz!°veôÿX`qÞeÒ9Ñõ‡:(ô0¡tƒ·péI¤ÂŸ$Wh'3çÕÍå bí[E4óê¯TBF…Û+™3w­ dŒˆèµ­ÉÞ¥Ñ5ƒ} {Bv• šdõuiÓ?:œÉsgKõn8Ϋ2sŽ~ùµ°ÖþÚ½6(n.‰%õy#È™¥·5÷ä­U0ŸO ès䘆MOKž4Œ Þ³ÂAbŸ"ðµD§‹$f\Ó{m¦Ä% –·X¦FîÃ:‡.{£äýô’å^{Ù·(‰][^ bE¢ìÿ˜ï·fÐH?€ÔŸ ,fÉdµääJå¬lÇœÅçS¤­Ûæï+i^â4v÷ç!΃F1ómum÷ú›}½Ê»y‹ÎéÌ}¤1 ; ¨nǨ™™È#ÈZÏ ƒ$í$Ü%¡¼@ëa*Ï¢LK–¢%‰î'!ðnà 0¢úʘ›óúpÿ»½ªjùÚÎ{ëûšeðEvI}ØåÔÇ°»Œ†=%ø}~q5Ä>,èÑR§ù¶†ZkêiJ釄T¢oØ1³íºx,ßžÐv+˜™H±¾­ö$ç Û‰“‰Ð/KŒ¤cÚ½møwÛ™»§fbEޯ—\Èî²ZÈÚÞpð¬s(±Ö´çB²ä†aK)ºhíæf˨ɇÉÛb=ÌN=8K3]bÁXM&ɬ>»M»Ÿ–ê{I¦P¬®ïÇ·_R¶Va-Û@ÚÍ·ì$2³„1jð³Q«HãžÉ"(í“BÅ!¹ ²‘0 _HÔˆÎç6˜!Ä,ÉŸÐ3ç%»b£e=’˜iÁƹ ¥ôw¦­ÛQ™YÌfÔUOÒ0¯ç â2¹ò©G•#ÝÇÐ.=ÒYd¸•“–‚ÏeüaÓI‰/jjãœâëqÂ.¡Mï4º÷XA‰µ "R¬Ù\ŠÚ¤^òï"djX>½Šæ)&1¢láDzAÿ@E(,H@ Y"ÞF#}ü±¤„ó1µ“3¯)^U4ó·­x>£¯Paf©i`zë =[’ÞºmþmkmÉBѶ[J4hUá± ó©hHxA9—˜b0`‡äc!ˆŒìõúò–€WŒßbHúÇ?{¾|ççp‘ϼìï'Ñ$Ä (&ŸC•Ü/f¾ê†€fß…%*G’XfÔ…Ù…(D¤¼hÍh7HgÀitK—óZƒþ-»=Þ44TrÀWX®5â…ÝU˜òšV§s¬-ò¥’TÔ©­]7N RœézÕì”JF“šPEÛÙ²ê[É’åøžŠë[Âù}¹B¸ãhê©••Ax§n¤ 3Æ UÓ姮 û“;í· (ey"Á÷mÐ:¤C‰´m¯§g~^Ò—†úÍ]BhâòãaµŠÎ&œÙë²+ÈE%¯LžDRÒŒÉë ï‡uÇsÛaÜ¢ÞJˆ>‘3{êLJÅëæ[öUóÛ d)qÉìyÿ(Ü}å š™+é9à á^ —âL Û—+”[ËO¦¥#^äUŒ;ß9AÎË~iÇöY§®šÒšmR¡sýXÕÍœ,‹cÚl6‹©¸æWcb6Ñ›.©ÓZ`ë·uÙ"ËïKW'f…ëpåÑ^Ð5½~m(–äö“Vn_ ÐÁOì磋ªƒn§‚ܵ&²Êã…“Z·Õ–*¦ÆQ6›pC*•¼Œl…2ãÁðµ÷W™ÍSèíµ·*ªîü`©É~svÙÕcnÏŸ¥Éõà_cÑÈɯÑüŽ\ªr4*bШ ïÚ«Ð7_àÍ+æ•[äo0>$YOدs›ÈÓ‹Rß„«Aúuyô¬˜¥+ò7®¸:§øˆuÉÉ *ú¦æ€Ú·ãÉ_±®êºÄ¾C[£Ÿ„žö ˜xgŒÙú½U”aµ,y£ˆ«m¹Bò_B­·‰J±ÚIG¥ÌŽY10g€[ê‹õáI‘\gaRú­Óö`ØêK”ø©}Ú!Ü®Öù‰Ô¥ ÿ‘¼Å…iÉ%n¿£¹f$ÀÓ2`¥5Q¤ÂSðcf ŠìãÙ³OSªñµSº€Õ-ôI² &h g5%nÖsC`ùƒX­®(·©Wàʘ1çÎsž‹SгØø~óçS„Qõ«zÞ¨ìRùæF²¦Tªë­Àuæ6¯Ú§HÈO”ñBü·°å=âÐèo¿}Q–ÿÂ¥%þ÷Ë}Âÿ†?ÿá½øÿýÏ›ÿñÕ?Œž`þû·{‡VüÿÁ·Ÿñßÿ9ñÿ{ß½zUÿ¿ó΂8ÛùKƒ¤k^cÄÞ_04y*ü ¨{;ð׋ONøí§¦üΕôO&úó>§ùû?—æ¦V±Å‘ NÞyôD4‡àS21‡$$(`„^@MñšZ+lŸœ®;¹S&ôE®øP>ë¦uå·£ò ßô#œêæòB»&MP'ñ0„w:#Sû4“Q“²¹ql©ÿ&†K†  <´ä=ËÇŒä:†U£|1% >‡U)Æ‚ˆ <¯‹ó¦¡=2¼É1EïGt)Œ±…c™³uø-BbÎæ)}®yñ"Ïõ®Û?ü:?ìça£?ôOΧ^ƒ>ª»÷×áxÿ]å!½ñÉú(ÁKÛ¡\£†0À˜ç·YÙ½?i7á¿·’rÕAZÿþmó¸ÿÈj”㎠¾zæ EsÌÁœh«6`Õ0*;C¯Méû‚Ïà#yÉ™›)­”dP¬C,ÃcÕ"¬;“ö)–Ûœr^–¯z}D»}{Ž/ÏAø–nÏÚ'ˆ§H{%ÄZo;Ké(ÜÎWª£HÍ$Céevs•æ*cßä–Ö†‹n8sh7tRÕ{ä‰k VG^ ƒ0–­;2ª™ít‡„L×*üüyu7É/ùÒ@yõ*âS^hûÕ‚„…YHE˜0‚µ@‹p„CÑ.—:³+‰BkWÚï^(õ‡Uãáš5r ²Š)‚8 ¥Ã°>ŒR<Ør©¥á5Ü]XPIqÈ|¬4†jX•e.0\<öºRéZ¹Ù9Ü¿t dg'2£¯·rË’zóö]B8pÀçê^y×Ô1y¦'œñÁó¬ÁÁ|"¬zjõLàä¨W½™„…" \æ¬îQÈz 9“¢ i14*®a‹4ðîöAsç¹–7.4ÍW+ØVͽA&Lw¸âiTÓÄ#á9;²ÍÛ;ódÛ Ç7aføë †:¯M>ªIд˜þÊîa¾ˆÕØÔùªscøGã&e/*(Å£^äÃ\Ö ö¥Àl±‡/úÓ}„µ± Ó+Üœ…ᄃ½F|ׄÜ{‡^SòâžÂьШ”ª•À1\1מÂÀËú6álÏãñJ†3÷“€ËEN—*3öUœM`TT›EB`ÌSf"ÉOŒ÷8BP²ÑÓ4 /ƒ`ÂÐÞ½šIB­ßHb_ O ­ZDÙm~Òë“ñ;‚ÞV’½™«“9N±®²qÙ6n·îmø''AÙ‰iiÄ4,²4™Í˜Qºš œ÷„;ÆŒž{ufIŽ*ŠmBÖ ®úx¤¼bè`Y+²yÀfß‘w!FfŽ`)!æLŒü&ÁˆÃ¿ó ³Á~µÄtc+wó£œUópévPó‰,ÙÞ–º!N°ó%+ãIaÓÔ%•ð óÍÈC³2£¬ôL$«üÏž÷•`Üàu5w}ڌ̬jÄÈØ‹UÊSÞ`¾ìÆ~9éØèåËݸɔ^d_¼Y~‘Ñ°ÿˆGË8Y Pƒ¨l²ˆ(;tJˆÙÚ­ŽŠ­/¦ÓG Æ–îY"|Ê)Žrf@Å: 0Ú õ¬üI¾Ød-О£âzt’À¦ßà9'o§Õ:&{.f™ .&™˜¡kE¿tNúhXûõ¨˜Ó"Ö!ûû‘«q]/‘“ØÑÀQÖíͤH\;IÐ^õ®'Á ÷F±Afkðåo@æH±’o‚D y—û‹(hœÍ2àmYÄC=Ü¡Yö³4«©áB„¿Ržº³‰"K-Ÿ„ñÍü¶¾êØ›5†Š5%FÿíÏÃÖÀ#;@‚Õ[=>Ô0)ùzíg!ÑÐ5Ƙ…[¼A¥ Åw*r˨ ïá^_qzŒßž dìƒ. ŒÇ|u0ˆàzF`…&[}vr& 7¾\Màgcƒ®æ¡D‹¥ºëeRFù¨èÃè}ãÉßè ¬–Œ|9µ¯õ~Øoðoy âï05¶8hÕB‰áøˆâDÉ·T¯`Œ¡l]는QÖòû]L¡tì_ ‰½W=ªÔvÅ|ôG?ãCz[Ù«B÷ªÔ¤Æñ±€2?k´;9#]ž Yõ*»03‡çE¢1¾bá«t•97âhBN‡—ª.ZPnžÚ;œD⑘K6ZWf)#݆z2Ö 8FÞA…×9tEôEaðjGÁ‹VÙm2aÅ›Ñj†#V·‡†­ÁÛÃ:EE:ñv§¢¥t£ATzŸê³Š}ìâ_êÔ­:ËS§×& V¶¹ „›ET MªÀñžUé‹*,£ø.Ð6‰=üi±m唉™å\6®Õ_wŸzJÚúËî¯õQäÏFÞ¯ß=í èʲ²–­ªÑÞžf^¸Ûúý¬Ùóý kbªŒÙâXg ‡Ü—$ó5#¶:g²iäÅ>›é×*l:Å£îÈ›hM1éŠD£ƒmºH1»Å\Ûíâ^e`öG+îXd&ƒÌ§xnáç@fwOÝ›jÙaëKK ÆˆB†u%ëcô(’=+´ÙAa$ÞA]~ĉ!„3 øJ{Dé1âºBþù-©¤ÓT5xŽOA¾ >„1ÃQJµ9b )°C9»w)Æ3¥úU¥XÂ|HÍšq0s0ŒJåY….\Øðâ+¸ŸãaÉDüàíV(%ÅJ*«‰˜qÏ4ûc½Jí¿y¾Œß×þ{p°»ûíeÿ=ÜÛýö³ý÷ßÓþ{øÉöß—Ÿdÿ݇Ñß¿ àcDoLfdÖàšw^ï}6þþß0þ « r2¨êf”‡HKèÌ;­3Œ¤Ï/m—ha£¬0Ñèº`i¾Ä”tÊNlÒ[Sù3O×ï¡Še`è0dé°+8Fk¼ëQÙF“€‹á>˜<A, ¼ù-_«ª± ì•6Óh>—ð¾?gO2þÕ#)8¸Ÿ`øgò>A|Jæ´¶ÕDoe¼-C^ro‰ÈêE$M}f©øACÇà|G#0Þ~’ÜÕMR–U ¨Pg_<{ÆM 'Òä*ø?JÁ^8`†óQ]ç(u€è¡÷ÄSøÓPèhž˜/È^’¿hÖ¡øÄõ½¸ç Å$‹©CkÀm}~Qo–J–Œ<)iìŶ%Ý4¢#6÷,Lf ú–³åÙ.-ÏËFç¸ßm ì/kÕ;o Oºý ù^˜xµïy}khuØ‚F=Ðc¥ƒ©¸O½k”Ýì­ïÇbQûìžÁþ±JNŒÕÛØèÿì¼Ï›œ„Ç’Œ¤Ó>xõÒxÐå´ªÞ6|¼m¼4|¸Ñ}ÂÛ5^œµ.áò¶›ÂD Ð^H«"â/"{€|ƒ‚‹-ÿå×#ƒÐqcØà ”É›ÊW«…ÏZãü#¤e} ôÖÇcÃÿ'wqéHqî*×`ñ{¼8{|)9‘7ÞEO¼² ŠTò¥1PÀ ¨a÷‰wÖŠóýcXùI|2yÈqë<ó YòLG8Ï̵‡Ó˜ÒËh©xXÚÒã ½‹âb×a*’Œ·ŠÖöFU‰¼Ãó§æ¶F_êÇ>ìjó\bþÛy3‰%=æ 6ZvŒ§óT8qÑr ŸaE¸&ǹÕÔœ7šçü@‡7ô}{J[û8H§Š¤cã-Y³&Âg³q2€Ü‚·˜!ß—ŽnwÔÁô²Ügš}¬¾Xøå¡ÝëF£ß<{yXì¸ã¬â)Z¶†òÁì~¬Õñ¥mN§ÖšçA6ŸÍoÓ«B¿úä]fäpŽ«ëÍÇŠ±àÂ=šâA-Î÷˜º‹p{{¥5[Àå-¹6Ÿz"²Ellàéèå+×DU¬¢ —‡3I(‰Ê­ç¦y;ûHd™‹—¯~$UßØ;ëÉýœ¹ÈÖÝtõAVí}ùêƒ0°"Ð~Ñz)Uѵò.”yTHBC–ýÏjCIw-hÔZ×ÎÊ–ø~† ¡ìÅ:èÁ.|ªôs¨¸ž ·…æŸmN[Û?cžÌ½ÔMñió¡Õ¨îwa:+LH¯û®Õï5Ÿ¦[4%Ìç:β'™)gßžf¢>6ÿ OlÂ?5Þ˳ôÅd–{yê( éù°ß~¯ÝwÖ{æ: _ŠZª1sæ@,kð&L£Yf¯ÏÂ#zb.×voP¸‰âpä‡wVYùÐ:¯[ï‡pàgÅ%Š¹ï­åW”l€Ö`žS«ûâ¡šI×T[“­8#øà…pIé7ïeý}îU¤wTiο nªÖ™|ýֹƙ‰$»úb|ôzkwÅ}MO­gq”dû–pGߑĘØ@ü.ú¶YC’tïCAäèïý¨»À€`ò[ó9~kßpkUs|*V˜:Ù"àn­Žâ£Â©–sÁ2êàrÐîœúHÑø°ðü‘S“qħ¶V›­ÿ¼lu†h†`œž  œñüñMЮéøå¡YÝ{h‚”[¡vݹ6Eëâ½”?ó‡ûoÛÃ5t¸£«é.pΚ³ýöÂë5Ÿ÷‡p“… $öÍê?3¶63tR=*•LƒEÜx/ê÷ù)§D]hcœ°t[2 Í:7SìEŒ‡·~Ö˾}aéºz+]­a½ÈO]g9Mwa¾Ð•Å‘ÓõýAçýæG"Ìvß ¬ót’Ûj?‚rÙEcpöe½Y¯Š ÿ}«Ó~oVpáƒ$÷“ý wKU!*Ó )7)çâ§T†¬hžuɨ§·aÐìú­ó“ªµ ùi‰ï.¼µœa7êvãò½ÈG¯ïÛÆs¸ñ×–+ý^ÃÇknÏß5·©z¾ç|¾ïçÙ3´×·³Y`mw|dMóYÈÈ\Æ’õì'Ç¥Š ð‘#éGœñ¦‚4åðš=‚æͦy‚µâB7¶jÑÓµñm«;°wÞD+®,öd²2Þ…öä¸ ×ª"ŸïO¿ï7¬0'Oÿ»Äk«p¿Ó‚³:Õø´*7Ó]~r·Ê”O" »z5J£LuIl³¦â¹ò ògä†Ýz«Ã¹6ÄJa¤ÿÑJˆïñ¨qÑ¡{"ÅŠk…Ò^S9©”Ù+të‘ Ø¤"…›Î igäìÞEnž6üÈm¨.kÓE£Ù<‚w0²¼ÊÜè’P «I¹ ðØfšbS©Ú¹¼âÜn¼¡®†ÍJ®ÞŸññn×â¬~ÄQ-LeĬ‚?‚+)T ¨Mù§GÚIŠt>…9YaM1Ó¥LG¸.Si‰ø½?l]l¾†;áûa¹ñ¯dWwZéS;ú¨Úí½ú©xìÆµÔ ŸÚŒOSi<­0¡ÌãT¿œæBŸë€²ëÕúúØš ‘³g«xúUwÍ'ôL;K GéP7OXÇûÉc·¾iÏ<ø¤io“\eãè‰ÔÐöúñ ÍWKÿÊÖÊ¿z©y°•lÀá #}¸ùqÓ|ïÛÂÃÅ«W?š#ûʼR¨ÌælЩUÑôº‚Øõn¿V®®±Ã‘·Žÿ® `S;ÆÓ‹vçôÝÁ~ýãdg5øë°FKK@ËF]S8Aš†Ù â’ ¶F„ø(”S*uP îÙQ-жUºgå÷eëÒ$¡‡“ˆáÃi`бÇl¢ù R¥.0Ò”ÆzÙIõ4§ôüÉÇ]3Nå÷YŸ/ü6ûÞo<ôNÒ¤CCr{fÒlѧYƒ¿55+å“Å·Ÿ÷ŠwT,µûzvúYh>‰šBÉÛƒ}O™æßEñËÃÚÇ2VÖš}-aµn¸h¼´Wb®0t7¦PÏ6ˆÑ(lѪæ°OæÞËî)C½Ò¬$èG`7‡*”¨Ù$˜Ã&›ÃüWpêÇ9íõÊÎL¡Ü£oÌÒ#j­K/]Ä ©‰ß¡±c àùDÝ‚±:ÍóIÃfv¯;³ÕÚ+‡<ÃEý‘÷ù¬´÷•}‘-»±ÄZzŒ¡"O7þ»Tp9¬ß­ÁÁ·»úïPøð}šýUö†­l½h”ü%ø8-mšiÑÊçtŒ žeÖ&L$B 1|O fUì7!¡X]{É‚4#Ž&NSÊá[ó&áÜ›†v¤îøsö “J"R‡%ÍôzÍU pî+»*¼ÀªRËosRåG‚¦‡X‰XI–§pwpxúÎy9°Ã…}Î+¿ ó0[Þîwß DK-?¦¡NԹ̋Þ]ê`£ÖæiMþóc²ìà»]k°YåkêÍá«ÇèžO;—ΣP²>b'‡Wp…xg Xäò؆qÆa¼^³pgzg—ýcë‘vËG›ûÉátj]Tsp³8È´Ál¼ˆÙB§ó3ì³ä&F€¢6b5¥ÑüÁã"¶ø_[Ðét;ƒa·÷ˆ¹» ïÑócõôµÞ7N»ÇÌà<š„åÈ 2üêæ^„‘å‚Mû¼uú¾än×½þ†Nfë\çuÏ™ðRývoØꬸŠ–ÅE„á„ú0Ês<ö¦ˆD;š p)G1+ØÎÃ91‡J6¢lè{Œ–6ŸjxŽ)‰Qbê)™I$[Mv‘‘—«¡xôŠ8ööz‘\H¶¸G¼ 5tõU¤.8~7[Œn‘¤5R“P5ŽÕ ð±î&…¾9šs t–Ž1щ¥¾&Ö.\+£^rnû,d GNÓÉ´){ðúŒäA†k•ÁOÄw:yuºõ·‡F‚kÞ`¬é0öøîç`k‚¬¦aL*#e2@À¶3çä´/‚ÙŒ Z²×<2üçÍ›¼‹*M&÷òÕîûÝ%pµ‚”‘M µ¼ÌqÐÐWp„«5'Lâ RdÜ!JdBS²AusR¸µâ©:ñòg›ò*Âí´†y }«jr…²1³¶6©|Içj›š¼ÈkµŠTN5é˜X#e;£Zãä1[Tgp°ÿc>V­x„çÐbÛMƒûÍfu%9©>‚IP"™ÅÍ­×ß;üq“âÐS»slЪŸï=­UÇ­¦þh³Å@­¢YcÇuWãÖ#E¾jy«Îz‡õü[°¯¼ç¯vw7m•Nù9.NvÑß°U¤Ï[Å¿~üöùÇWÏ?~÷˜±R Tlr#-ŽÚz$ÉËÀœÉ:#ä\æ­’¬uc:n'$î>ªUß­úî‰Ze-ö [%L²Uþ<"[Çæ¤P[jß<ƒy ¢<’Ýèk¨úsRíÞÉcW»¶ÂÂúMÝkσ8ZL«Y¢<Þ¸DÙ•öqK4‡M§#0šã*ð‹Y˜ž=¾U_I½tõQ­b¥šjUãâØ»õrÇX k’º 5ƒo/ž7fÛCc ¿Ø¨ƒÄ"U¾ó]µÆž% \¨Ócàº6Y  Óhã/¨xÙ|]•_Л’:ƒ…9T` áÚzdI¿¾&)tÔÔÖUãØæÖOhí„P3éL0”ƒ0WHÍŒp a{©¡®+oœq.ÄìAB ØJ$²ˆ§%Z˜7¤'"D-X™V›ò½ËÊDŒÊ¡¸ì´ß3/—=ds2CÌ ¥‘Ë¿‹uN!42œß¡ŠCÕIkù^9„K*M’|ÅëÓÔP/‡ë|ú·-÷9ý¢ÃeaR# ‰°¶©áýá¬Ä\”™w#Ò³ðPb1I*´J:Ïo¿s"‡6¯;x'Ü]ȉ?HçáÑ>‡Ê`€E‚tÚ` |H¨ËKhö…ÅÇ)^RL›§0#x^4Ï\öpÁåê>Ì‚ƒ w÷ •Ù‡´ö-¸êG˜Aœ’k|ÇŒ°6zq¦Û7mx§3LVUYâã|‚z£…ÙöñQûÚž7Q#KŒÐ‹*i  „GhÄ$€™œ< Ä‹aKb¡Q.âÚ#2¹Ú0¹B‹öÉ .Çðs†½"|IB‰“ç &DS%%Ú»C¼öä!{Æ–A¨¸«‘OăЫŒTaN/-ÿ¼ýVa# Åê^ ÇUVqÒäÃ}Œ[ á#ÚutÂ>ÇKÚRi;ˆ³Â:]u¹N¾è6q †ÆÎÇÎmÒèòÆñl‰ØYÊtw—è8˜æ`[3ÌÅbÎÃ=^ÐÅŸŸÓtª/f"¯TkŸ`]·!ÌæÑ(£ý’/¶×ÀÝ ¦¥vSÁ±éfƒvþ5ÞIÁ4ä!M ÉFªäËÎøCIá 4’mÈ-ÙèÔº÷7¨§”ÃpÉÚ= a…'…`6<"a\ÂY†ŽGªÜµu6ˆEBËÛM{§@ó=à$$ÀšéÁéU˜æ¥ðÚà–qÈ€ùæÒ>F‰€…é{ œ0o%pMÁ„ðP9+…d¸Ì1NÄ0ÃÂÉÈ÷fÁ`¬ÄFë;‡ mqÕˆ%Æ¡"ï‡Ó,« ´bœF7‹ðï;ýè#JœàÌcFÈ"š+nñ ùŸ«Ê#á§j|ÛÊ!‚šÂøc”2ìo'GB:ÈgÈ1žRVƒ¼6ž¤”?Í—D…å€¹á… ‰ã)­×ËPz+ÁŠ R2ær¼täö–OK´(ãÀÜÂØrp0qa"¦-°ÈÍy¸AãœÔBd©4ù)ó0{Úòê §w”_ÁD‚ö?p{GáŒD)A¼^—óÓF6J»_'A;5tÜU^ ±yQ¬;]äê` ƒh‘!hŸÍ ÒôÌõ[…}x`ÓSسµÙy*á /äõ ;s3úÈ?*ÜØÑmß𕊼ûmrG ùç&’× ßh•LÞ³’Êó3}Yy*C®}cQÊXÐ9þ«Àá—Ìt\Ìdûy8u9mdš_»êìÓxT5D–›Ù‘Ì&NàÉ"¿Óùå<Å_sÍÀÕ[Í¡ÿÓñÛ×Þ;Ê+aÎW.ŸK´9{©§äî:}÷Ž‹]fxÆûÞi8'ïèk˜ûi„°¢qЪ’üÔ?d~<ÿ˜ÄyZ¨ª'JxJ6‹Ú”…°}ùŠ‘y®8#é™F!¿¢ ¦ûE}Ê”E pÊs]œÚÁ¶ƒhb*£ÁG!„~R©ËââÄH7¾Ÿ;‹vÓ?ï6ŽÛSrGzˆýIŒë#MNÁE%sûðE0F(ý¤¤)ƒ½'•t†ÏÏêú{ýÖIkØ<«ÜW)—ObÕ"íÖèV¤µ|vŸ³!cÖ:Ò¸£"³áÎw0] œÒ¼n*˜{Ž‚dFíb1^žYU1(Hqý¤6{×o[ØÒ"„$–=»§‹5²´1í&Ü&Ë:§¯úæy«Ñ÷»—oÏ[¢—”äïo¼»àA'œ[”®Ÿ;™Û-˜3³·ñŽÔTÊó÷Ò>Èá –•Øœƒ ó§ >‰ÒS-Û|Öjô„Q,EM}ÄI„‰T•Ýâ©Cbò4˜íÐÒêU)lÈ´x‰Ý…¢f¾g€ïÁL&%ýÉ¢Èí\JwÞŠú•BB–Acˆõý›7Þ>’.ÚXEDæUµ0 sœžûÍîE¯}.‚&´·½ÆðŒ#‰Üh[—i—UNœz'ï÷v…ºú¨—Qq,ÂThøJŠàqEæ"uÞ{oo·~Pÿ΢$ QxqI»Fà~±Õ˜G“øLÞ|°+é•W9¨ïV-—Ó3Ìq÷ö²}>lwüËz*Ãè´‡¦w$å¬Rùô€}aeØo·èÜÁ’—šEÃôæÏÍ ‡&r¹Ô\w.ÏÏí7¨NÏ­f›þœÎæåü1-ôLåc§;ôÍF§Ó:Ö›o)(o÷~(©Î9€ä„à«mw«÷5]A­7€nv ¦ ¸m )'sy1Aç'03ùîšsN›b˜#Ž.ðjÔ/š—¬éY_¨ÜL¸°¤Vwv…|™œw¨Px#ȯ?`ùÊ„îñ£·…á+jÒ­t¶¶d„¿Ôï £bO^ƒ€ŽVš{Ò'rJje¾Õox‘í›…4ÌT‡IÒüg‡@}‰Ü¾¾u>Ú¹Uì¯rôX_êåÄ¿ö—NGe}U<{¦h•ṯ<¾R…ªÕ­¥Þ˜ÏÄR´Z˜`zõ×Z£…ýŠ%‚%á‹’±sx…¦óÝzÂÂõ8œ à‘Iî&]‹’ÃÒŒf|`þæ¨ØdÑÃ[‡ËÂBÇ3jF‚,£\bä‹[_á#¢SBgådàÓ”l*ÛÓI¹Þ8!¹àëi‚ý”Aäo×nêWP Aî$Õ퇎’„dkRI¿{ “ ôŠ 4R×=G䩹€­=ãZÌ…Ô;ŽE\š[§xpš„GçÒíQáÔ›êõ¾~áúúópþÿ´ÎÑšã[¹ŽVz»½åj]›,müÜÂ[òúKÛ2L¤kê8Z1Éüq8«ÖËÿêm$…ó̹➶†½ÆikÐþ¯1‡»ß½tŽDŽF•jÃ)ÿî¢u¡®u¾Ÿ'wá4?Ý!ßj‰°s³0̇e‚1æœy3I®PS£ZRƒ[”¶f±4Î/NÃys‘P { ü[¥jE«¡+¼Í†Na¹Ù›÷Ãm×ä™ ú&œóyT©VK¿öÛÇ:Mû×0ìÞ2÷\Ýlå˜1¦+åº\¼Þ.YUEÆœ·YNâuçAúðgÏkòÙŠ!CÞáŸõÕÿG,Ì¥ºt†\ì¡Ž­!fÚ‹ Ÿ…WhÐ\TÐ 9dïÛóq?Y\ù&ß'…]n„-\.Ÿ2Áëæ)­”¡žL’b–··æ>U´ú8pzTnžƒ:˜TxŽtÝ’k‘ôfä,gõõhc®n$ ‹íÎMv[ð:hcù‘jñ* ¡^};Y„§a¬ÜϪ63¤ÆIȦRïðS¹ êëÞ'yK…åú= ñjûp 6†Ã¾ßé-™Ò2ÑÃ1±nib)·¿‚%Yƒ±÷–$®¸âøåö:Ͷ!Ÿfß-=â¿>çÅõÈ}Î7ádF×N˧}ùÏØÌ+Ú?Ú5ï(]–‚%þþýû×tÓí+Õš§Ý”ÄzÉwUé@ÌÁ¦¤ƒ®[|(]H‚íôh6?@!¹‰ÐM:ÆS`ìU8›ï•ÒwW‹çûZyí0¾Å¦WÍû ]®..½B²#ó¹cCÉ/@¬íZKÚ!ð«ksGÙ|\Èaò?•Eœ‘9ÛÞ4èº^q`G`#z½ÜÎaX5¸}, WfLñ‹6¹`D53tR˜nEŒrŒùœl®nÔÑ•é¾dS߇¥5~©lGWso·ö§Ýmï5üo;݆Y!W}r?ƒþÞW‹¼X©ùfÍ:³Mjµ¶Ãü(`?L3aÑ!—í(ˤ¯7O&ÉèJ!7;bL¹5ëžµ"åpÅn†d±®$¾__ã¶+^ÃþÏçÝæΓVǯ\©J-=SòÔÏ¢„ÏUççyç‡ì9å[ÖQùªÿ8}ÿ÷ù2Ñ?Yrh]úôØ5Gú­¤é·“yjèŸW{Ç}eÜKî*{^òô¬Þš\äŠmå­¶üZã*²Ï¿dÌÒKÉ,i/D1Ûöu +N¼*¬¸UŠUg…ƒö©?¸ôpágXY{®O .•=™?+°h²Y.}o¹Nw•¢ÛPl.Õs»të"KÈ:Ç°´¸²+lÒ©IçÖÝ”‹»p‘ |¤ÑæQ+M ¥ó¾ÜòPäƒ×µ.¬eYØ`;:>Nû½ÁAá …ç­ÎOæã¢íÎ9 ¥çŠãøºÊ²½Ìyëüã2žÇ­\rÌβÙ#ösg¯¢Gå¸vR¼p¨‡YñðôÙ2]~P.„‘FÑI4Šæå:;TÏØUÏŸ‚ôvïÓm‹èÚ„Yb©[ËÄöFû}ɺ„7rQr^Á|YoH;äf+](´+™‹ì¡j÷q÷íkn!Ð&w0™ §âbs  Òú:§ð|‘¥ÏÅ•ùïSIG×7õÛår0;/)Ûï+ C±úS}œâÚFKk®TˆkWýŠ2­Y|ÛïÂÒë†któÅù]À:““ûkõ‘OŽçöuKt¡‘Vé™ W— ®çÂÍ¿XœôbëÔŒêÕ®.˜W«¹Œ :½¥±µ-ôÔ6Û¡v€~&â'¿üZ+çÆl/*·ò`”óùX´à;Z~—èkc Ù4_¸A‘â’‚ãúÒ‡œ±0Á~ãºy`é·¬–ö{ýK m›"YÇça¬!«œ%>ÛMÖc•ÕçäüÓý±F¦/87Öx¹ätó2Z(¢è¹ÁíÞ·Äq¢ ³hº.Ië…7w\q\n–CËn ˱W¦§Ño4Ïþ<øb»ˆ,(­ë›ð¥ƒNMßç£u‰lR2Ú4Öôs¬JGÊðÜ2Éu|êÏ.;®§†fdaÌþIû}ËÀ7µ/_¼80‘Yï}z¸=!x{»û‡Å™“y¡‹xSâ´tHK²'cãѵÏ2ÏK¯Ì«ï°¾¯Ç׋c«”W_Ï…[½Ìgg©ÃÎÞ2“ŠŸ$¼@qû¢éøÄ §ÿ0›×Ë8'3t¡qüz{} êè•äJ¶^!Ÿ‚î ˆïÛO¥p¤úúø]µì}UÊØÛ0Ö(Ï5σþD?”¢'ËJME?üÛ"JyIl‡ÂÁYd‰r±KÊÖ¶Xcpá÷.g ±žËbœߌaŒÙÔ» '3Œ²Á)7Ð{QmkºØæžµ"ö$ý k—(¥Ä”驆]>šü~{Ëéä ÷ÌùJÉ…ƒ‡ì'CØEõ¨?¯ñÕåÂr¡°8•¨ì¯’•KLëœ2tÈ`yúÚ~ë¸ÝGuÆEãÄ'v¯:ƒ­­®¢ÿÑ©2NîhŒÈ}&ðbÌè@pfôàIv¸º ÆXÐQ8 aáf3USÁ ±F²HŠƒ´"àz®&PnÂHœˆzË‹tÌå'œŠ%ô»ƒZàpùSÃP_-âíN~ΫX8JOe·m뛩ç›-+hg¬ò¡·Íü»+°“µ¢bM,WNÉH”­ç…|eY…ŽæÈÞJ’Ñ¥šzûõoK M­È}Âù&k-—NXy©Tt“ Åi©›¤³Y ¢ß¥fVG¦àÒ0 ýóöE{(nubµJˆÅ{šIŽRlòY†­„ËX„G™ ð·Hݤ 0Àúzí=æ¶@ ]öÇiQ›-— ÷pËX¡ºšŸšŽŽ„âÁC!–pÝò Û@ÿ]¾Þ ödk­—ŸVšŸ`$0¼ÓIûòƒªK]cØ©ÄŠR‹b1 EË»'K6§H)·îgL‚†óEýÐX*´0¢t¼¶¥}`ž Üi”ƷΫ«psýA×Ó#o'§®|)¿6~Ííմƨêž2KݨÝ:ó¥úrc0fÁÎÎÂÙƒ¡Gƒ:ti.”o|™©T=kià7Ò¶þÔ—šÁM‡ÉÛ>jÍ”ñ4.]ݧðH.w“’õ¸Ôqå“Œ˜Ÿm•Om«t™zÖ¶è|¹$Žd(’5cHV³ª•ÄŽ”»7ۆݕ–Îÿ5–IçKVà–¼4ÛUÚÏÖ±‚Q‚Ì]­žš¯äÜn`„òò)’‚¿­áë$™¸/_{³”ª­æ û—­2ÇÞe¢ ß×[k(§mRÆ—:KKRH]”+IðÕvi¨òüc|ZÎ*ÒÃ>È–çŒÚÈ(êTV5räÕèä@:™xÛ ]¹‡w{«rƒ¡Ø9›{o“t4!º<í‡"²Å»ŽîÃlH •Ó@-?Fà ¸A kçï³Ãú2ã£HP®á÷ËyÌÕ›a£(¥|ßÁ53~nη-ÛË?«Ì?«ÌËE®A³[~Y7»¿ GEÌ‘ä%ä/ÿokåÙ÷gR1eßRU×£jÙH h·l4ðý§Žˆ£°´Å»¯v_­«>\jl-¤‘ŠÛÓ%P ør §Æ|ÚÍ¥¡*Æ=„›3j_YÖEêôq÷]g¬'¶¬}¶ÇË“ÂçÕAþ$öy ÆFvðVÛÙ«þk]*I=biiz6énTêq´d×É/WŸaÞ2iH;ñ—{%íæ^IK± Vú&•»r­ðP*uRZ/†r•¿Q¾,.Gù̯vK*›}üÜšý§…œÑ9&h(GÚŸ/Ö`Vpp6¸£}`°r«7!ÈyÀ¢&SÖ)ª¬BÍF€Ðñ Kù‹Kœ‡€í:ÌNQh0ÊááI™o‘ªER Én3PqÎö¼õa¯”ZrZà"u3IZ ãQ²@¨ÚŒ öhœË[dÞxO û¿T-E¨#˜ýE¡©KDL$–ø÷Nß®þù˜C†IÓKÚxAÕRÀ 5AŠŠÜÙº˜AOƒô„°AOˆô„ÀAOˆô„ÐAOˆô„àAŸŠô»àÙ›·° @H¸Wà’´O­á_.z.ù‡0*}YÜoôÚ¼õ÷^áNÏ9½Ã2áÉâ<,â\B@"WNƒ¿&)Uw°¼:ós¨õ€kÏ£˜ÉÀVÜó¨S˜ 2³SdD;Ç?x)e}žÃ{t“…ó¿N 9óþÕKó‹8V ªÈ3á•6¢˜c0„úUX8®7nR˜¤IªŒ¶½ ¡8@’H7[ÞÀR„ízXõM‘?êûß`ô‡¤ íMÂáfú›jݽŽõo}!¹Vû¿¢•)G´_¾z©Ô]ê3w|iȺ ¿‡SÆSQëÓíʳ _SUW·f¤5E©@®—æ»8çSL”F¹áÃëk„˜Æœ¨‚ñnî‹Q™ÑaË‘k2 cŽç‚3®Çt1âdNž÷–¼ÊôT½Ê{JFâÆt3U:Oƒëëh”ëþ]í‹Ã¹R Qv6Î+{Úð­Å×)»}·ßl1¶@>›V¥—佦á#à˜Ü<¹êE÷À-:‰nnFè& wvBb.Ä:C-÷Œcôœ^»Ý~þbw·¾¬›¡%¬±ü`ñ,Y}_šŒ•£”›Èn‡^ÎÚÖ˜ÅÁq§û.‡³xÂ}µ^·6ÍUÞ­S§}¾¸âŠLö(I?c …ÄÂð¶#Ô– B7xËÔ‹KGv•*Ù÷÷¾ó‡ƒ÷hÐ÷ˆdùoâÅs¤³#âÛ€õ—ðÒðŠâ‡)Y–x]©ºe([‡×üù”’Ø—Ê¿òƒ5pÝ`ÎÔÃj¶y3ªß.õ³ËÃÃ|rÊ´«Õ+5Neþ.Kf–ewP>ŒðnCpEŒP),Fq©p*ÑÛêØÎ7NÓ'ó¥t.:d›%ðVûâ1ÖÅGa»Qòç%+Q¼ÿã†ñq–Õ5Ü}EªŒ'®fkùp5[ÛŸVËñ_N{½r%?¾Ý.(²·³ùâ*Š¯Êó²†ç¶.Eeó“0v¿óǽ™ÍP ܶ#í)ns¸MMëŽ~'¾ìÙ7ê§ÐBñh·¡ÌõÖ Xì4O+Õg¡è,À¿hc×KÝŸLÞ5PÝWûñ®òä]Ë—wSw—d¹Gï†>½Kù -@A!úÃay¤&Rp8.*ºc¬úS9ØÿæeµìsÝIV}þÂ\Å+4&›,¯h´íÍ»†G¯ëjiŸÃ]+ðs³Ûæ©úH5L°G$nˆü•úëÏ FåIøÄ!qµ·OëÕËe­È?Ùv{bŽÛËÂÆÛÅbJ¶àîÀyuÆc$T]bE~B÷ú°gIó‘¬ %Ü)í½ÝvûËåvú ™Ë5•Íå)¢Þ ðeÑÝ¡GsSæäs%…««'¦|/ëç®n1^6+V»ªOeQ`K»ƒÃÓwe8¶ôÒÂaÁÈ]8AâÅd‚)ì­@3Ú5ºGŠa âczØíi0Sá,ätå‰Êƈ&Šœ3“ÎêM™óy†iºÆÒñ]‡BD p¬¾"í9çf#Ô!ÆÁ”³Ž5wd:Ȭ^ uI”3L“&³AS^KUî*ʶÎP8hª²L»®“úr–7ÓÀ ÷Ú yÛ϶\_ ö½[‰u¦†r‰ÉŽm=”R÷ÏÞ!{’uÐhÑ ([º‚è«% Ég—ý² +|µí½±~ÊÜ}VbŽ~GØh„ʘIÏëÀýÛ¯èø‹kþ!œÿ¹8;%¨ÑOùû×ô¦®3ô{>Ô@3Zj¤ú­S˜ÍVß¿h@LÿÞf¥ÕšñpÿÇ1Ÿ7ºÖÿ-¢ÿ}Œ‰=Xœ°cÚ½³n§e˜¡àñÏçÇþ[Ô™ž\žŸÿì·/`H d±¨w›Äá󨇮×BÌ¡)#æŽó¤—6*“²ñÂûeÙòè]òÔVÑÅpEYûøxߧç‰÷Â÷äËU§Àµ ~“ÖVLükÚ/Ú½AYŽDxµý8„¥xƒ¥wª`†î0ºI×/}rzÅÐVm„8+„f ð_½a è’¯òÝRѾzþªúèL'e`ØK@°Íâš7›–!–žhž)ûÂÓEú½yûkgïpt©<*àU!©ƒql±÷¤ØÕz7@Ïü2‡ÚýÜ6·EæCÏIuµ8GìT±]»‘<—*H©LÕùe©;ñº«jÝee9œ욌q¯ÙbµÑµ‘Ûa#ÓHÜÌÖÛr èñ'k…Ÿ” \öï²mÇ®»Ýí¾Ûõg/ï›nfÔ)\Ãk÷îµR.]'Z@½åìVŽNl(K É|yÛlo”Xžég-ûòóv©0SdïÈñ ®ð/ÜŸ¶Îíiˆê"å7z¬%sø³ùâúºî42®Â´GØ´6z±¾nQ?PÖÑ-ŠƒäÓ‚@bz";ó–'â<¹ ›M‚zÀ ïná^÷6q¡ms¼"v“ Ì);9ž£\Pß”P! ,t哈^]cÔ7]?¬GŠú“…ì5ÆñÙáÃר]JæË\š *Oœ"M’¹ÓÉš¥Å·½õüÙË9£¹Ï­xcé„Œ¬& ´qx³ÉPiùöjÔbz‚ÚÚvý¢ß¾ë:[÷Ú[ûÞ+Yßk§öXÇüøXß%xòòÆZ©z·M ›À•BpÿÓpVæ¬ÆO[ë>Z?DÕfFqBhÄ\¨©px,w x|’¢¥Þ«]Ö÷ÐÎùò+k%ß»TÔ[Ë |ö­á7ü–;” ÿJÏ€R•—v|¬ÒJ¯£”^eÚvq—í“âl:Œ›O`É^ÛŒ­6”¨@l)ýLëvdÜør98S1s•[1ÕKŽŠÝWëºD¥U.b­ÔyRZK¹$í.Å_/ÅÊê´…cdÙp8tvmò—üÒ¡½Y¦¼Y¦»)ƒš\¥šÙL3³ŽbfÅF¶Õ"åZ‘âþu*4\škŠºý=C}Z\±Å9Â2ˆ†íŸ¨B[uå=V…µ„sù|õü^£d^è>1{nm´}¡ÿÑpsÖO`;ëéÑVx›6­Túg‚Ù0ËRÁªL 'wE›Vá",äÑMº—=Ý2Ü+]âøjûwZ«¹ØLƒFxAƲ1¼CCï:‘!ʈ5¡BýÛû{™kÙKqŒßõž_¾·³.W¿¿Gä½EŠ¢Z™j(}NÉ‘<Ñ¡8§ëó¸eH’')vR´PΰëÁ Qü1™| )3–1R)™€œÃ”Æ‘€ÔŽ9fã™EìVáÀB„¶{Ör,éVKƒ…‰›( pŒna¾žwK:8½Šâ@„cU†ÐÇ4ìýàašÄcï}}X÷:Ñ_³,äÐE†)öÒ$…Òn½ê=îÏzÎÇ +\í(3 †i<ç£çèwñüVòè95C %N0Æ¡wÉ8náßwút&ð²ÅÍ §­I³¦Ëæ¹9£ÄÕÉ· ̃ÏN›°²22u빯®Âk4‰ 5I±! SÇÉ'§¾Ùȹ£Ó½Bpú’‘•VÁMó€?Öúl#Àø:Œ¸¥dï²4˜¹ä+Ù2O {S¡bÌ{ãU(™9ZYžÚ< Úò*ÛçÇï¶kÞ.ý‡´à‡•4~ÃÓbz•e&<%M‹Ë¦ÌI™eèÏå^ðS"Æ[§„Ï@Ý4P·!èð‚ƒÍ'`eDÆËóÞY‡FïJ<^•°á‚G{”÷ôJ½þêÃrÈ0GZÉcÓÿØôyüñÉÞ’ä“½íµŒ‡+ø'œ«XjmãpDýbÆâ2øÑ‹&<©š$Y!ôbÌm„œ~pzWX,H,Y §LóŒs µ à¸@Ù —%„pš¤^©x§$™éwËrw!ExÿíU ÿÒ½jõ›=ÍK»p·[ ï ¸F|ÃY€Ù?É—.Z`dÂô:psR© ,¶ÐO¹¡ ¤Ö ™»¾âH*KpÒܯ#Á ¼Úv+EÕ̶Ï{û_¢7¶Z/r´fÞ+ïêarê_:hP]& &]+Ýéa®© AM¸±4òìe‹øCœÜÅ^ãm»-§D2+ëÈÞËG÷äÕò-ëT;š`«ž?kû6Ööå÷D¯äà[ÉüdHо™(²`¸ƒÓ&Ô ËÆÀ.§S4¡pLܨʹ±0òxaÆ`Ù®˜¼Ú{ÜÈ¢¯‚+`°uÙg²Œè4(Óyq¤ø“”ðÓó ‹Œ’[ÎÖw÷*2hoaö`n`»ý–ÜôÎÍmN噳¼L¾›-pZ[í"ÕªÃË!¼GËi¿m ZeEõAù‘Î4>Î{Gp‰c«¼)¾øâ ÷Õ°”pÙ—žg%¼CùJ¥\»p«u.[´4Ù&óFù×ÚªÈÅ¥{&#Ø5ÿLªeŒ¥ŠË•W+4âõF˨È™@«Á$KÈ[NlŒà Yè(¥»HÅc6ÓØ2õGŸ~¿ÛZürÖN¡’˜öŠõ8>—ÿm;éD¥.“g;‡:ÝåÙ! žÄX›¼»gÏÅ)9‰b ½ÓòÑŠDF&ôñ(¥PÈ”M ª’NúŸ AºaøW°—Š)a¯‚ýúAýð[ =Ÿ€—Ö—ÊCã{K'S™¥ÚaëÜov/zíóVßŲ—ƒ æØ•mùdÂ8ƒÞ/Úýu›PÿÒmÄú{¸F»šzx?šÐïëT×<‡…ïw/ßž¯YK6¿®g°l'âw¬åÍõ®ªH&[X‰ ©˜Š(xyó™F±îmßçnVð‡[(æÇp¥Ö¼ÇÓA ×(”¨¯}½Ëh+´ÙtruµÕgÄ?QÂø©“ç¤ýþ.M©¨ ˜uœ”\¾âÅV ¥7œx¨Â¯¡>¿î_þ÷Â\ ™ÆŒô3²‚.å³\~䆈-îÂŒ#(Db‡ðÏf> 0·’àâÕ«²¨k|µNÐu=ZlÈ÷þu½ÝÞùï“H1j ©ŠÜê÷Mò!ý ¦ªw{Á)æÅãgŸ-õeì@%¥FC˜t¹,¾eäµé™ãõ&R4’Ôy ÿ< è6B ͈üÑäQ±S‘ýEøƒ … ßàà»]ãçn’ô¡¾þN-®`lpÙ Ö9ª1"hÀàŒï¦®NÝáà°~ÎøøÏDÝ[IêsÆG¯èHçýžÿòé-‡…Y ³)î‹Îæl´ôÍO§å¢ÓïË> óÿ=öò³ô»ô{ð¿ Ûø³ðûá×¢Y hõ9vówŠÝü}Åä'’ݪqj™.ìbÛ²âðn]QvÈç8ép™>'NuPlÐ#íŠ%i¢¶%i7A-Q†ã«í åã=ý±KŠ[2×K…»Ç‡k¯dñ´Q2ÖàÌD*œ #¿Ãbu¶½ZWð»3kÿ¶1óKTö¦‚e…~¥4nz %Êz ”LJ5¯Šj^#`yE¼ò:áÊ›D+¢Ôê@…ÍB•Ë…²5•×˜ Ûâ|vXº}·‡–±)—Û—ìT[±ùS¿£‹Þm?J!ùÏ8pŸà¸¥“ñ`¿¿)š–YãÐ}ª3±D©¸†Jñ_á4µÆûý«—~©ý›_®aþ.e…—¸`, 4(µ‹?ù»Ä“ÀÀèø CQf°_×·|µÑþw¡xêH×e¸vÿýßùÛ~ë¸ÝG±ý¢q‚kuýÄ®¶&‘õ¹2¶Å”4ˆÇÉ”ƒ3`¤œª~¢õ8¬•(‹”ðŸÔQ€êa ñÇ(†Dó,œ\{ŒlM"Œ.*’Bµù(ÀìTã*qÌ¡o.U-~øÝÍ+kœ¨ÿûôÂKíJ_ä/›â¹åÒ 4†Y6¤ýkôú¾ZÜàÊ;=1%*÷9Ë)…ËOB`>¿yHÙÊF3<é] ŒB²}À¢Ë>TaéÀ’AN£RÓ`”&1`°‰h½ØE›”îÑ®«¿®£{Öp'?î×÷ë^¹!×¾!JLëýЇ®ù­÷Í‹ÆàGÿíåé&sc6ñ]ÞIRÀ…“ƒü¼h:›ðƧÁÃ`@үݠö L€+Ù÷÷¾ó‡ƒ÷FÓ´]t/H ±#B a7É,NðŠ²”âk_¼®T׋ÎøœÓïrúyÿÔœ~Iÿâzô9¯ßç¼~›9‡­´®cÜ EÅ+òº*»|jy°ÿÍËê:YæÕç/L÷…¬Ã&œÃŠFÛðfÿˆ3gëïx¶–óÑSXS?É]ïw÷ýZ×ùkï¯ÇBñ,w#*?$Ýó†4/¸FI¼_Oª^_Sûcƒi~·X™éËåÆak"Ö8÷ òöëßÖttúƒÞ@iÈ(‹9¼e*‡¯v[áŽKd]`‘¢|V(ÌÒd¦óé•GØ×8MU~S«„•¤’‰–¿1B›FJC°Q!g"F=¡°Å9®:y3ŠùÇŠë&©ÆlT2©6ÁþJ["—†¢O±·Lĺý­V¡7ˆ×ÂPŸå¨,ÿH…àú©™ÄŽ6©›DzàNF^*Ƹ¡lú8-š›eô1÷ДQ†VZ//ÄÈà;d°x(}øÞº[&YS9U’-®pl*lL_AÎÌh&É$H¡•ûõ5Xˆ&Ž"j]&àT£0#gá ¾Š0·¾L v ]Ÿûõïê ·~î¿ðe‹P ã´Å®ÊoJ¹ÉE¹§'A’³µ`’{'eÂÊ/[,°x‘.jþâäŽ<G¤ˆB¼4L¹‡N‡yºG*é0ŠÙñàS˜Œ)Õ€öøˤã(ˆ5’ER¨žÈ27¼š@9¾ç @ƒW°ÎÑ­ ^(ažz Lÿ&67,ÍÓJE΃\Fé„þ­¾žÒl³,Œ‡ÊÂWÒˆK³Ñý«ú›‹\¢žTu/k›ÂRÙœ6›9ÞPg)¥üA8¿ŒE‡ZRûu!£]PPU›0†U3GŽë ¡cI£øA‘éßî_Ö½'€’<}÷Îøh-øƒœ:ÛŒ <õ³ÖûÆ©ö70ë‰bZöž,¨Ö9pÿ*!Ÿìã_(_S< ïƒX_¨öCwîëèf‘Ò²ûCý¬¿t·ò ÎuÙB¶j¸›¨]:µòîvJ%ÖÓ!°L6]ÙT,MÖñ% ÇRGnÂýƒûÄÉ"XÏ}u K§v5Ÿ¶:­>,ÙÞåà 5ªƒÍŒæOëBø©nIKfêô}ÉDÁVáéžø½.ó˜„þ™÷ªºdúvNïK¦¯HKF®i5~ïŽô͸ÀÛ—;À—Z@¤"Õ4£ÄŠÉà¢Ð}„²ˆ° 2™(O sY1¥– ÚTyFIa8M á5yo$`SÁŒ¾dú“½Ï+Q_‰«­rdÒÀq —½~û§Æ°5@V!¥3aéù:c†v‘ï¦Hý©˜Um$ ¹›§Ö†B ¦Ò(| IEBìèMu¶2— µ”ZÀéN&ÞuM4Xï[àÑ1rêØ{açÖ€ar¥j€¹Á¾ë èÝT/ãèØCg©#“å(Ûâ#Û`ƒ‘»"y>HG·Ñw¼³áB„-†HÊuígËý<€9ª×7ÆU-"cZ”¶¥ám2œ&µ}œx5ù•7W!Å¥ý5¹ò¦aJö ÌÿflѺÙzV8ÄIü0ÅÐ;ùe}S~Úméqt¯èS±Dª,Yƒ´H‘ÛÅØÉZ[ˆÙ|"ÏÉ03eAîìú(¥B˜|¤ ½}‹Šœ¹14Âp†ª®Q0º YÏ¥#4¸Œ}“⪹¶éKü$M& b&’ ±ÐÕÜ‚BàÍq—ؤH{ ‘Ðzyò…«&›’ð%×UŽYœ¤{ƒ«ßÁA™h¤ðr€ëB ÃÕøáfk_"‚-†ßa’q±ƒJæ…{0I²P6‡úŒÑœ°2²¼{zs)—ôü;DZI4·‰}xWÉ ,Wìà(Y8¨ˆÃ4†]Ö’Ó `SLÑ $’Í<\jàèpJìVQD#ª°MѵIá× °N£$Èbgi‚j﯈Œ=Žà+u(䤊É tTÁVI^§t%úMNÒÇX©‰B2 ñCL£ŒU0V ¡«%Š¶Í—é;€ra3^¯KjÇ;ÆÍŠçÞ­Ž@}R¸\`^ZÄßL &I:y¨QÉ( 5O'XwÖEJ%©ËWmä0x©ƒgx•‰Ý‚ë‘®1´˜ò”¤Y}mRßf3¸g¤&ýUF¼iA²ò—˜£ ½ÐKI!*ótå+,[\_G£°–kÇa# œ£7›Tø1Œyº'°f HŒà¥Õ@;dŒìŸù©k,3ÊP>> på’îÇjÜsW°!ä^Wý{ˆÂ‰@cÆ$3¼Ù3wð™}Yû¦ßZ†Ó¯J.ëH:{Ü}×)ÌYÿ¼%)Z%o›®˜Ýí·R]gú›I¹»YGâÑ×{i‡íuƒCM÷ˆæ™û*ö‡íŽwp`?l¼÷^8H¦ÜRâT‹+^Ô÷A@wwº³0°Ç< 2Ç&•hÐú1‰£Ç¦g>LYk#¬Yÿ÷ÞþîÞþž¯õðRt‘"çõ}62Û#ÁbŒ~ÛÜŠ¸æ—²tL‰«=uU×e 6Ýø´ÀC\ö]åm³G0ó¢¶s/;í÷ ¶ýØRGúÛ ƒ;â2ŽîwHM$¼,hÑ“ÃR½¨vÕ8ˆ/ƒÀík>#‹…iƒ$x1<ß š2 eòd3Ú{sÅ÷šý\ò(´ðS¥ÖægJ§½W|´¯i>EüÀ2tKËN³Ï\Ÿm5P‡\«Ù5¹Bèà@_ǽ0Ɔrw•ô¿ðÜÅ• êØov;'íÓª}··ç-¸½š}Ê Ö8¯Ê$ÌSbŒDö(é©3 ØÝg|`¦J?Ý4ÝB…ðŠ1FJ˜[â²ð\xV±!H{„×q A,1Ý›7²`3 ²˜=Øæ;1Ĺ“Q¹ib…°DQ»>çåsï2ÑŇ—|¼dd´³€lƒË^¯Û¶ŽË ®é7f£Ñ¹„ë v@®ÈdœGl/¹o Û­p­9—‹(ÖëcÈ sñ…}íyu|6[Õ•]É‹ˆ90éÈѳ¨ÍtÈbNhQ§ári®n­ ‰\iïoÍ RÛܶs$ƒrpæÎ_vE×Èšg<ÜûUøKþOÀ'œ_· "pf š}Á£¾C×5™óXúÛ‘·ôK1Õç´Â…òК\rÊjÚn/äM•)·¾¦ê°¼ée#…‚¢1P_˜"¤¡S€ŽÂ"ƽÏmÿmqº­š‡/–ð2ÙÄ'ThêC-ò¬Vû´ ¬Hz³)ZBžwW!…ýO«•‘núÒšò Äe+ ß|"màlJÚ—Ò§Ñf;“ºS’)oK…'–“6i‘i”…ÇiÊÐѱt¡ÚòLÐUD_\ôÚ-­tý®êue€ÛBõn;Š?“h,z¢´©JHení<ŠrÛY©)k\.,f¶Ù€1>±÷¤åš„bÒ–ÕÑyŸ¼*QTáý,†wuÌÄ*·Ií0 QŒ\ƒ~|‡q¶@V_鄨Ã!Z®1ÈŽJ¦‰&ä3Gcó&àM&áhž¤² Ál6A¶ƒn`H{IÝã°À°‡c£Ê£œ”òc}†(dñè6Mbô;ÖKÖËæн7™‡2F]jA)Ô›ÔQÒ^âÑCV—”.RTÿÛÅh kèħ‰±ÿÁUFyá“k³µ6)«õÃbÀù<]„ÂW8ô{S©f»d¥„Î&·‘cÈx„ï…{`e‹)©j—mÈÒ‘~®´ÌsmIê,‘¸È¿NqÁte$)‘?5/‘ëkj°ÆýÖÝÌŠ¶{måšñJ17'bÃ#xEXÞr½Å­ Sõ`Ÿò³»ÑñÏàX8'Ϥ '‹ñ®x²œ5~j¡™ÛzŸëŒŒã¸ÀãèB›¥¬²ŒÕK”ñ]Ó"ÕReÚ?S”Óº)]ÔæsºÌ«Ü±ß4G×"d0⹎«8ë´ ÑÖ d´7îxotq^bòÒ†õðák DôkrwxaÃS‚¨—3·Öœ9ï¥óŠ/›(ÓµàžXMƒ‡Z~—°—ˆøÍoôÚ"htOŒ#y,㈠˜˜;ûáHë€Ý9­mXµekrs˜aîOßYË+7 ›?_¼m7:U ^9³¼ÐºT?õVº;I`ü·í¡cð«Ÿ1*亂gÙb ÑEGÓèïx½"þF¸ ÝÉîôÔnBž¡‡Ô¨Jœ«L ›©m¶N›…p3VL¶:?”•ðÌm¸Ì‹¬6]ªoùäpUâ ð€‚b¬?ì^žŸ[šDøÕJfÏ„vÑÔnqqDýtž,"6ÛOtZçç½—‡–ªˆžÙqÿ\©“×½ ¾£°2…‹®sÁ—ˆgÑ„å šSt µ)c#uÌÔšÕáÞ!gç:™FóúrGFQ^O‚›º›s‡9Œæ2-øåKÀÁ”Ì«î†kŽ6%l|·ÞzΖÑæ6xìb猣˜O‹€ã æïvÕ9×YL¯`DùYˆÀ.1YêDÁ}£ +Ó’^ÅÖ k£%â|{Yh Ÿr²u¯…Ák×´c—Ú9¸‚0‡ÔËÔÙ…a‘‡­½:¼o¼=ÂêÞ«ã!Œ3G»¼ì-ÂûXÜêùòÒ‰ê÷´GÚc·îR ‚°›¸¡ogíÝÀxŽóº„*—u’µœÝõÇ’«ªììU«nÑç¤ýþ²'!MŒã¥„¾Q 2Îmæ½ÁàCÜæ |ÿ½g÷Ýa´ÀZÝÆKÜ ¦ÆñÍnySÝ# ?¿íÄü.—ç-ÛÝGû¢ûö/ºS¢£°'`=Øì:@»nѧ  ÿf[=œkq4ðæ¨Á­;núÒV.k$kÊ;$šHÕél6²6•ºû¾4ÂeÍH +bVSØwµ˜´Ø*©šø¸¾­³2_,iÊkµå“›aŒHÁƻʔ`†ééo,R~»ãŸAyÞ¢ùÖ7ìo)cXYüô4VYÂh™ WN>òâŸmÙ i(¬ R0˜‰Tƒ’BífäÏÒècý¶Æ¿ºXŸ!,jŒšYFû#9j5 m’ú¤?&©³äN‚Ó¼¤À^P(ÝÁëuIåÆŠì µl”ƒ8qx³0žÔ,`I“”Lj‰NÌߢ\oIíb¶m´å!œ.!xkÈ6©Ñí"&ÔÄ:EeS CÆ ^;¥´WgìXS 2I¡-ð¢uQ©B娼Gà•3‘Љø44/aËë+IíRºx¨˜'ˆ ×g±rÂMª3›ñ©hx˜×Ø>$x`öÜ¡Á¼ KH¹§0rÏÞìöìy†Â’f¨¾áX‘ĤP'ÑVD!Ÿ`Ó(®|×»Ž& © „Z©$iq’ÍÂô6˜ñø™ˆb,3\ ÛˆLRèž]‚=˜ÍÓÅ6ßÕäÃ‘Ä Åìò8©[AVºyšˆZ<âÈa ¡ˆ 1ÂZ5rÔÉuǯ(‰Xoدè…Eéªüæ<qÖ||±C«þ˜ew„·¢Ö Th=†÷ñ’lßd®@NÁîÈ& ÷ Ý^Ù•zĺ4ùF¤Pg0ìöÊŠÆEû´Q”¸ñ©‚^KMOº8RD36Ú!ü²…ï7¡ÎþEu1CÌÐ0•½Ú†ƒükÍ,ãíxÅ©qÙ^”ûÈ–žOÎ{” nB}Š}[½ +Ú>öžU ”ø³BÃK&±õ9ƒ ‚£·Ñÿ+éö–Aæ½9†ÄúÁhNgI¤ðžÊ ƒÿÔ¼·I2Á›€´¼t§W ye\SºdÌÝõºç®F>Ëfе¡\©KÚɵ7±•O;ªJ"‘ 'ËSa͌§Z3%÷šÉ‰%g„v¦ÂÛ`ÝŠìæ'«Ø¥KdzPͧì핇­åQ•÷v–lÞQ}"žUuÚã—šu` ïŸdÒ By…ÅÀh%¡°ÑG{Å®åüâ?>ÿù÷ÿs3Úù¶þ²¾û\HˆÏ‘ùæ¹rúb£Býöñu \þË—‡øïÞ·/ôñÇßî}û{ûß¾€§»/^þßé£žÇ ÀM’‰˜Mt‰ˆD i|5~³öÌ›¥ ¼žbY·Ž¼Ùæ‘;rØ7öÃL9xBvañ6 0aBÛy2‹@ü´ÚâwÂCne¤ˆˆ¡A>¾ZÌCþÍÍÒ )Ú\Cbk6ƒñ.O¢D$ï‚ I©z00H¨¹ò„ L{¤ÖS™N Ȇ5þÙÖ—Z[á%ž ÛòÀT‚ôv!øÂíæWðó.ÆÕsöNÍ »P+çSô1PÉç¥Ûm¥°/|­uësCE): Ü ‹×H ÐÂò¯N‚c¾˜VSÉ1l‚ÐÏ:7 '¤LÃX"¡¡XH`õ-ÈŒ†zTíÀrääm†S=‘)“€(Øø›ªÄ¥£¹ü5‰âÇ+R ¯‚w‚áaóN>?mÊ0µµI‘9‚´@Lì8Mtýþ˜ î$”)·(Û•` Håè¶Çöà¥ÉbŽK˜©I€ûU­Bµ3®Á?¢+?Ïy?œyÿØÒtIæ«g^ÞÏØ/¡] ùgR5áÓ´)ádOSÂïgÀ2EóÉCIÖíRRùÊ©åªdR,³gؤN„w,/›Û<‰GáF\IJihaÉÂÉõ›ÌR8P¸WØG·Â©¾d1P2k¾Ó¼C9ƒzØHœA„¡âlA›mÝIJ$m£ó„÷J_ wwLAÈ~p0-.zÙe°Šc:©/ …ÂÈÔ‡ç0SœÌšŠ½±š«ÕŽû¦m ïØâî›™ÐÛÃñÑ:µ÷aÙ%¸æÞÊ7'J¤\$?IÆÌf ¶ÙPÆ \.'ã»×Þ <¨ Ó Žf ‘…’ÙÔõHQ€zȨ惞êatGsü¼)‰ ,q‘PqGs>…×Þ¦ëÙðÌõüJ:ÇLÁ$ú{˜úÙ‡ï\g¾ú(¦¸’µÖÕe&—”GëèƒoS©T×Þ ²ÈøÜH‘ñÊm²ë’¢¼ó7šD”?H6IËŽ±þ‘ÆFð Yøù&IÛ¥¹«{²k AFu†cæȢդ̯°…M‘l+!eÈ~{kŸ´‘䲫õ¦EnU0a`ë£â]I-Iç²Yðå7Tq®¹FÑ3áúè'2ÛeÝÙ*Ò‘ÊF‘n÷¨Ð*\ ®F1qÝì £wvñ Љ²óÅgŸ˜1<xÑ+€ Ù“jÝè Ö;Û´S”pP>åHê5úÀ?Šl±zŽg8>º×³ãèÀI?Î8Åã¡ú®²[=Úä´ç`br’.ËùÅ%/ µÃx‡V¨"–7˜ µd"êvŸÂ¦ À)A‰M~lÃ&,=8GæÑ”,)"æÅo\9"EÓõ"&†›-k¸])ÛehbàeH¡8‰ 0:[d·|ä›.F·^¤“Hd´V¤)ªF|:~yè}¥¿pê½b¿BOþ%­ vi>¸¸q™Àšfveá)%Hl]Bˆ=béáNúª†9wÒ½}üá°^jñ)]߉/5ßßÕ…öwe)e5•ë¦ÃÉ~)+ÿ«!êBŸäűÍ%[/9ëªÿŸÃ±ä÷ñÿÛÝùr×æÿàûÏüßgþï3ÿ÷™ÿûcø?a)cÿ\¯ YõŠîz9ì8JÍ–"ôd¡¼4åhZ™§mŒnŸã_”Ô|,èFs|¹„Cõ0¬ôÖGçnÎ?K­©ƒ_s0i¹©†ð.·…Áf›4û¡ð À/Ϭì4:¹šv%eL&̯‚æËÈNâP¡M…Û! À=žúŽ²V…=Û:°¹œQL#¦%ivjqd•®ñUÊÛ̧Ñç샕|9»£¬û÷á Jï5úÇÿõîÿo¿=xiÝÿ‡{û‡Ÿïÿ?îþ—v¤N^•Ì(7vx%¼p §L,QÌf-VÉó,ÿ ª´³õj/v3VÊñ/eÊ+#ýC“8D2è^K"'Ò 0 ¡¨ž æȃóoÓ@üÚ®:î¸ÕÒå¿jÞl4HÒÖ¡g°¼0`‚Ý=ìÎ _{ûÚýÓîüÔ8oûÿ9lKð>L9e½fyŽ>Qû¿ÛZÄÈjÌ`#ûAâ/èÜ™£À w¾yöɉÄ+0â/ùü"J9ÚØ¿÷é¯K ³´ä«\žpv/ð‹_ôÛST#û>…Í=B>‰Ï±±Ö/ø±€óçG[º.‡VàÇš7®šO}rNÄwÕ\YsîüŠ*z†\ê)4G YBãÿøc*Õs½”Ô0“ê‹V$¡²Ô‰Mˆ«Y‰4FµZâ>AZ]ÛTfÅ4d\†ºl¥7›,†x­ç¿b-žgܾœDG¨˜pQZf\d… %›I_åít6±ºõÜ?™ø•7Å­y´ål5 §Ê|´v~àÕ®±˜H±ú«^ž/Ú7Þ3UúÈtë£Ülc)ݯKé‹Šˆ&ƒA«?$ʘ•^? DCÛµõ¾×j+\Û΢kox.ÈNÉqäTÕ÷âà…æMR•›WD5©›ñÛ–ökÐÒà–¨Q¿m=ý'œ³[¸?A´BÿsømÁþóâågü‡ÏöŸÏöŸÏöŸ?ÚþÓºhôκý–Ûü£½ÝØú“¤V3‹–ÊOfYžëZZà8€k&M­§{–æ'ÿ˜*WâŠb䵌õ$…˜w6Q©ÞHÝ—!{Ÿ'L#Ù]Fj2Höv!rÇÉÏ)GTwð(ÀE*œ—i‚ñ ’„Œ(H _¤\ œw`#Êb¯ÿáä\é_“©E1Чœ"Þ'’^WÈâÂH/«±LðŸ’÷½öžÁ?5z1Ën-ˆH ñYŽÝª¦« •'ð3­^«Av·Eœ'vÐÔ‚ØÙÓ™¨|çVô¼ÑYªÑè?5ù+úžp\]•Û³å¬B'B#¥ÑÀß ªKlD3+'vò ×o3Bf¿ÄÃ]dj㇛>þÆ8£´bÔº¬¿ù`~óMÉðšÖÆ`Þ/âB3ÖéüJ"Tµ÷g(í½.*LPøôCÅQ }ùYëº0tÔ}ñëÒŠ?b, ÍGÕÞ0;;GO?Úr¡ܪ††ÄÜùrÚ2s8¬ÞKŽ¶•ØKùÿiöqä¯n~ûï‹»/ öß½Ïþÿÿ_d‘u~á5âqF^/™,²Û(F‘y7ZãŒQÀF`Èÿ ²›èD‹ü'1ï^r…lÛZ%z ú(¹žß‘-¾,KFC‰4­‚¥S&ó*¤ˆÛÕqža0Ùò¤šW¾Tî5šõµæ  "ßO¢i4Ï!oX Øòƒ]£æÖ×[cdø°ÕW“(»­ilo må ô`ÂTâ^Ÿ“ §‚™–VtÙÄšäg8´s1Vd*¿»q¯ª;¶éŽHzüŽÝy¡Ö¿®ë÷®4©0fì{2¿Æù–òÄ"©= ù‹WÀ« bR˜s®°j¢Ô6ÉRÛ,Lu/‡¹Õ=!QéÇvç¸&Å)¤€˜¥j^»Ó<¿ô±•^³Ûû¹ß>=zgÝóã<|Û‚ÖaÀ(W]kž7Ú5ï¸qÑ8mQ©.ÐÁâ‡ÜFïÝY b ø¯9lw;Ø™f·3ìï5èk¨ ¿kZ5±ºqXNúÝ ì&,”é(Ùi1’`¹OðwP%Iï¸Õ€î&ªcMe}‹Ó§Hå_ ~¹ø(AJ¦ù³ùx]‘·špçòýÑ ŽüÿCéxÛÍmŒªÐsÉ(jǘH¸åCX$0Ïߪ§o/ÛçÇeC½ˆ”†jµÊx2 ïqWeHäZe¢©,c&á¼h¼÷?_øÆEK3ÆçIa¡ŠIùžgžÇ¹`l±ÆÇiG$"ñ/ˆ&vë2ñi8'?ºJ饼?D³š¨ƒ“}ýòkM™÷ü5ðSkQ=I“i3{à~.ò {·=Î\ó䃡°ú‰£C•Pծݦ%ºHÆ‹IرM 6V˜¦0 ÖèŠ"åø4o‚F­MžýÖ¯"½l<¦WÉd­¦gêSƒ¾üå»dáü­Š^·ÎÒþlXß’ Oà?‡ °²‹xÝ/©p48]ÝæÖÛPÚåO®IŽÉñ„\¤–Ü¡sÙå“mçå×_ºV¥Üqª’+*ì8Š;[³Z1¹Ð –h:¾ê*š`ª-Rx}Þcè… g>j4ìöFŒj‰FtI1…Û‡ßPãý¥–=ËËû¼t3½§¥Ä\wÐo–îógÚUöï„^*ÿ¡ý=’wùïðå{ùï³ÿï?Óþ³·óéF àhö\Öiqùlnù¿dnÙ’žM=>` Pbó8ƒ¦FQ ´LÐÀv[ű¬òîê„á˜ý¶I$!ûP™>Áà+¤$P’É—Æ,‹Dª7) äž[ž&á`P8en4ãÄÅ#yPZT™5CÇцkè:º±à·%a!¦h(,â‰#åÇV«Ç‰U{ÃþÀH=Ô1uè¿=Ç—çíÁÐ@_ÝøÓɨ¤²gù÷õ:Þ |%8‹äy µR*ºaÉ É!¬°L݇i ¥¿™f3ඌî•Á1{³êtÈÑ©¾ ‹{ ûF- $É~A9Æ¡æà×£-ÝvH/Ž[ƒfßïžœ ZC+O©þŠø¢äš]Ì´ñÀUxëWrS¨M™/(X³r´"—Ápˆ š›8¹«QÆÉÉùÓ K[¤»—³ë½ëöÿ¥ô]¹ìf$—¢XߢõoÛCLÍÿ ¼Š(½CÆÊ?lœÒ‹ÜK‡¦BÍÏݵ+æ0Väû~°É §6-:} wöª¿æ´:?èk+&ENìsÞ=µhV«†ô D5jßÈ…Ï_TùÀêví[Ø7óh"ü– ÕÝ-Søir±7+y¦s;®œ5¿¬"ŒtâZ ÒÖì À,µL#¢‚Ða(bŠpw­`ÛŠ& ¥åÑGîG’—ðe‘[+Èìðd˜|xH¼ì õ k=Íé"ƒ¯”?:|À$¤ÞØÓ@®Š~¾·WüðHÈ}‡¿À´ˆ~{àŸô[-.P•_¡7… &<%´ 9³‘ß|s¤½Ã‚ÌçXûí‡72r®Ð'“ºMz³bÆÏ«zk~+m5 ,ăI0Šº?§!©ßAsT¹¢ß¤ŸÊnÕ\|d…@|e´]‹_Z[æšÂÑã‹I†¤¨Å‡^ë„•ÇÖ.b:„dX($¥%PûLªÍ1 "çt "¤wOO0‚ꆢ¯ '°"ñhç ÓrÓk¤nÂ8Lƒ9ÇDå$¸ 'Þå\„âĆÖ7Üd»é ÑÕÕ»¢<[o–,RÌž·­°ƒpŸ?ó¦>î9ŸgMÓ]ž÷µVð'5QYÎè€UüQ(Ö¥5„¸êüýkïȹ᜗Úօߋ冩E\@æyîbößþ4H‰þ*$i@@–!Yå=JaÑE—³ X-ì…P¥d‘ÉX0Ý)u¼=¹þjŸøðNÊ´îÒš½®Œ•¥%5§ÉFè2 xÞð‹*]3|Lã7–¦]µÕg&‘ªw“ø-[ ÿ¬Pá^~TåëB%r+Érp…uÎüž–Hg;_& ÅÖ ÌB+“+Mp\ÑÄ`8Óå\—9) ¬Gp8„´«É™½ c¸%^o 'æºÛGÔccšqÜjجx|d·Äº¸p–¾¨<«ðô|E3™U ÷›‡±zIZ©˜±{Ϫ\°æUð÷ª(}d”ýÀå —,ó4f?ª{Úq`fQÞxb4ŽÀ9†dq7PW­op4‘ÆWòÃêònʪè6‡rÿ­Ê•€ä:¿(°O|PÅA€?Ë}é8ÆÑGV¹N×™Dkž¦hš&c“ÖªÌöŽKÍ<1Ôˆ™7ƒŽ˜n$j ÛfŸ {Zl ,|JxQù ¿ØùF…u[°øàÆÚ_aJ -^¨Ý{+ß|S(oÃ=µ:„µ.O²9ýZ‘òh:®Z´ÌÄÁSK.²_}…^É)îf.XEÇeãÃ*’²j9Á+s”æ›TÆ%¨–g\3çæ.ÔgV±o%-2?q˜ Ú¯^IÝ}ÿ´sÙô}ây·sê_\žÃ®r\ó&üÏ}Í{(Ù>¾dS߇å¡éû•mM'ÞŸö·½×Þö›`»Bt`‰o¿o3íêŠåŽ%o¶+Xhw»r_­.»'ß~`ŒÿÂ2xV_U¡«Ú-¤mgéãÄ€Ù öü„•à÷øšýýù ›AâV´•þùáï`_;±{r°_ÅG+Î\)Òh×¾ÎE!¼û-ì)$£(­§9«©D¬BRr ]º .Jòl‡cÿ³\âgí dl6û”" )î—-BÁhž[5 ¡k†ÉJ¥ªõ £`2ùÝ8…á'#\/!«È‰ÿFäPT(f³ŒVžŽÖâ)b¼–ÅŒŠª&R5“¨j•sè+$h Ŷ׉ñºÇxAéHAi”ô¾IP—²‰6G ]|9tÄåøîœ÷A…Þ¨sR/ÃSbsw³_r‚¿ZÅHTSŸN4Zr]‚ÅB ,'³„e‰'Fü( SÖS…âVF ïVxª|Q4ÏšP`Tô.ý·ÞRŽªy'óâ7iµþSV^èÓ92>e£©:”‹Œ‘®Õˆ©Ú’›EV·æHì >ØÓ<®¦H †G²`Zk¨ë–Ä¡ˆhEä6±GbGy//ô…˜·¢¸—ë\ó¯¿××Föw[øÑ&¢Ø¹Ä6ÀëPÛFöqÆ,!Fá Ûí.t`àÕå@q u‰è‰ƒ`B2à U%Þd¿¨¾ÿZ!£ãcÜ_¹?‰Ï@qù1*xè£Béå‚¡!Û¿›|×,™Oœ1YÞtæÛÿwÉÑm/6dɱTo¨î[¸Ï«c N *Là{¥Bw–wν?P›.Î/kmz_þiñ™HÔÞ©OÜÛÿ‹·kk9"BòŒP… *_®ÑÆØ©+_¯éiø1J™fïx‚†"í£†¼äj‰ô3ùÓŒTøÓlÀÌ.mP±5k‹X5ÊVXhë>´”^E\NrèhY´*r%kš‹&ƒ\Ps1½º¶Çx5ÿŸbˆs‘×CÔ$ÖÜF7·¾.k_EñG¼A ÖŸ­ÃÙišYGM«Xl6¦WÕØA|!]ÀLýÀ†æÚ³¿cnG‘”åZŒÊ3ãñ3oÿÙ3h¸‹5”5æÝËrn5öí÷­×‚9wäÐu±²|'#vMnÛ Gò`)ÛŸüÁUW\€ŸÄÏ âf ⿸9ˆp‚#ø õaL®T‘¶Ñ€­„¾÷Â-`´‡z¹ Ùö^Ø}pp•ŠuZ°ÖU˜ª‡°Ê>óå¿/c¹Lj{8x@TGÒŸ‘h.7/z×ÉÄö<õ{4÷jCQ¦ô[ík Ý'om'i£ÿ«‚ Z“÷µE./œ`r‚;ÝfBÿ-øOíŠüÌ~þï`?²d=Ë£Pô+zÅâM»–ßÆÚÓ^ ‚ÛMLÈ@wƒÑdé4˜°OÚrì #Õ¾³V£Í—ŒåãëܵYêJü¦pÀWdÊvºJìÛr5¯aF7ý‰ ‰Tí«Þv ½GeJñKÁ¼Ѓí®`L_½ £~çÖî—f÷ü¼Õjè>mCkt¨Çz“6é¡È,å̜ݺ5I£l\}£Võ‹Óf, V¿ÛòµŽ½íÌ’ƒ¥ &> f–˜†ÂÀ#lãüüg_dò­©àb‘&Œ.1 ¾çëE}P_÷xPàÞYrG¸¢ƒ$†o2ZrDˆ'ÌgÍ\ñëÎ!qÊUœ?Ç*•Cô¾,ŒÁª—'mÈ™2¡1¹Þ# Á'QÞ’÷ïÂ÷/ˆÿ'0æ Ã' æÑH€Ëñÿö^|káÿ½Ü;øœÿ韆ÿ's'½XŠÞ÷¾ïÿX¶$büü;ðèp!`®\T©ÜÉ“è* Ò‡~fBÇëä{¢mƒ^«Ù>i7)8Òøâ]»s°¯½gµ’û+½Î"%ó­›Nór0ì^äÕQø¿‹ÕcØÐéY³e8¨¿¨ï×Ì-ŒÂ”y9ÓSXÕµè~/lwÍ„øFÁ[Ÿ›ÓËŸÒI…Œ^ˆWר‰¢as¾9Ն‡…vä!”P-÷•šS‘UŸ·;—ïÍÕÑè_ˆ9ÉýÔÇGšeÀœ1n ;ùƒ7oà |"\´;Ý>ÏìAÕ&óE¥8ÃzPpï¼1<éö/üFç¸ßmWu Xké‡F4â¦C«Jô¼ð^ïéa¡§‡îž¾„†Zžu´V1“ šÛ:Ç?zéÞ.ÜíMlR²û%œ±¾?Ÿd˜W• „uƒÂ±äŒE†@‘§—ï^½T9õ寻ƒ“½ü>œÚGöû²òV†Á2 õvp\F¥ÓoK¨Ð-£Ñ¶P<Ör®ÚÈöPññ­——°ë<ÇÅÍV ªMrk:‹RF3$Ý fb¼ƒúA­0o*ìQØ-å4»·¸{sëÐÆ×æÙ-uç…¼C]LB]HîD(±vo┢ëÔÀÇ 8…#€þÓÇèóà.éUØ£ò›}¼ÈŠ2{U«ñtÆ•c7…½3@*8:ŲÌ Î'׈ÅNÆÅa…myC„Ó@7N}‹ãε΂-&¬šD+ýÊÕNùüé/îÎýúË°Ýù9úëQîs2›§X\£¬‘ë ûXè×üsö¹pÍÃþë–¡ž‡¯Ñ‹ä-ï™V0ÆÔ ÄH£=D˜2µÀyÁÀˆ6ÿâ.{”©ŠNߌþª÷»Ø?µJZý>·'ç^îA&ã=ƒIø‰ÜÜ–eÒßÙûõH·‹FYA=…¦<àöâ0Ydæÿ”«”0'" ”¬° ä*~Ò÷“Áó@X XixMºQaŽv/ i LI&a[Ç^0× ªsh–<$!‘Ø…{ï‡2) · %*»–Ýu‘2nmÿz­øCH¾ã·û­æPÁQÛ.Éú/0/u ÎÕŠy’x×áR[ªLp0RÞmðḤü'õ+!ͯ:ôŽ¼É]ì=h¼fîQ a5˜õ’±°FF&'J³%åÝ#Çêˆ6•5/üÛ„¨‰€oÝ­¯ZèbOÚ³¡¢žêÆ=NðD…·à:ß(¸a3†Ÿ@ñz!dN{ƒæs¼\ÃoÞ3<»áÐ?*Ê{ÌpèÓòÞ«D˜Ú3ãÛÌñmVòí‡ðÁ‘Øú4d|™†ÓäcèK*ø¬ê"/DJÜ­%ºöVÔ6'¡kd'aŠ1HfôY—eêû甌‡î8˜=ÒH°5M¸¾äÑšPÞz—çr8æG"}Z¹«±…%2pÙä!¼ ü¿l¾xð>¢§ï¯ò±Zóv«%“Æß«Þî깦ÔX¢¹Œ&!ãè.LqushÄý¸lL,ݶľñ‹óV£ƒò‘?è7©ãµ·—óXò³NwÐêÿÔ&¬+Å,‚è=Fià˶Çp’†sº‡Wóðñ@|,n™®ŒHJ׃á`‚ªivÍ@"ìËB>wa];¡$'{>ð»—C¿{â ÕzOX•š±V¸i)«1iOÙÐý.Š›­&`‘ W9F,µêîý‰øSK÷¢É…ÏJEäÜ%‰ó™\|0:z?B—'è¾£n™l·úTë/çùð;h12I,úéÛçãpŒnÿlïgˆåûØ¡f²y²Ùœ½ƒ…ÖÀ)Í¥7 u§ã4F)Aß>UqÂ? ~\7ÂxF©Ï¦4B©TÑ™T]ë\¤IžÀ¿èWî6J{~Æøº Pב'q©›Â_!o¤r›5YÑõí08 9öÉol™îú‡ˆ.ÉRLjW+Efçå –hy4ƒ”}Ud¬‰Á=*ÀªüâÏQCkº+TÒ2js/“8N#ò°ö4Ðä•(í9éÍÑ£ò_’ªg[dO8Ò¹Ì1^d„*mÎB+ÃÇhŒjsÑE)Aä‹«^:|d56¥½IæÆ3ÇPS€7†Cº´ü“Æ`hìcãîe¨?ç)-03æ]ˆ8y¢'ÅêJ®•"•p”IU]´„ü#O€\TÆßtC ú„Áásõ 0t³¯e¥ 1>»òdb¢‡|– hß²E 3MÀCB‚¸VcÉX„èˆcrõUgõv ¥¡(Ú¬JLÿ'| –æÿ##ÎÓ˜ÆKíÿû‡/ö-ûÿÁ·/?çÿû§Øÿ÷¾{õª†çèºó—º÷6 o§5¯1~=†³ Í~·¬@á%’ùÉ "¸àD9MƒÙm4Ê6¡òº0üŽÃá$™ï"|jÞy½'>{/ü/õ^p'ªÓÛÔÃß?uŸf|ÖjqoY&}ÿô¼ý¶Y|Ú¹„g.»1½ÀŠB{&;ÿ¨Ü¡²ääìés˜ÑÅeä0‰ÊnŠÈ?Ù­Q]Aë—aDT÷ª©((XÉ„ôe»¬¯,Ãâ%¦´÷{ÝAûýaÃ?î7N†{ºìåþ@oºnæîtýãÖÛËÓS(cV¤pÚÝŽeÐïP‘ª KÆà’ëk•Ã”DÃ@9¶‚žã”sËOf ¶Wë–<Ëä4ù__UÅLŒæò+š ?‡,‰|¤2]ÌÃáúØÄ×Ʊ7>|Èž£d)´ æóh:ÃÙLA9uR9ašŠ ‘í‹ÖïR™$¾òy£ë÷[ÿyÙîÆo°yM7bKïÃ:ßÅ…qyAlúq÷Ýà»W†ÔñÞaúË}oÈàrîJ¹9`ò®'Ÿ˜¨Sj AÝã_GúS†¡à—ÚÏù7 Éý‰sĬ#3IT©³“ àª¿ú”·›8(ŠëHØì9q jms¥<{>ÉtŸãñîPð071Œ9L…‰!¥+a£ZMŠ.XNNùw‚4‚}Ub›2¯×-’çÝÜv;'‘T×½h7Mßãˆu~°¥RpŒŠÉדÉx'›?€¤SŠ¾²"æ]$] „í­<É<¸¹á¼!è%¯[q“+¸tsð(†Uº=„ÚÁž# é’Æbê€rǘeeP&ß9žHIŠ} ±O;0¡w½ˆGD9¯„W&šKøÌñ´ BdІGdÒ»NåJ••ã5{¥Ù9 3;¼ZÐ`ì[¡ÑAÙˆ,‡5Ge VhÐPßî}Iª‘Š}¥)ÛƼ“ãm@ž—™W™R_95Ö…;!½ÒHI;š0¾o‡÷ roc”à8L«õµí®–?Ìù¹;Õ€q’*—¶\ [xÝl™e îm–'›}‡ÃÿS{Ð~Û>o®æ¨wƒ0L¦Žg» ×Ö–I=÷XË7 k›|?˜ 6Ø÷+Ð R„цà á»nIÊÉDÕŽº;Uºà'WZ¥¡~r¹¤,/  ü3wÁ:,ks_ªÄB… %w0®²4dØÚ£Û@b»Z0vê+YÀÅ#Ô>­Fkçi{ÁÖX)Uµ«Üz;UOqeíØ$圢õD¯ÏÚ¶Z«ŒœN@Æ’•[Õ+{ßÖ<¥=¿­ ÷㥻U’¸:zµã–Nl>¢å9K« ^Èù…ZXú-wlz«?(¤ÿ¾§Y ïBJËËÎ%JËtv<ƹñ°j­yjqw.bœ#£ÜF/ìÚ6æ(è_Kà"ý :0Î!ĆûšŒ"@:ÃûYZó’Å‘4«PþjM€éó1•ëhÎïåkžÑ–á%@_Tçöá8’Y.Ù‚R|òoÞ"|´˜øWî¶pA­ÓªsOmÊÉjÅm³K÷¶÷!| ¦’nò9jböØh,æ îR¯ÑôqEÁø´ê^°‰ßP;°„LÖR—ûƒ¦ÿS«oÏ5s®4èÖË㋦阊 θG¬Ûk0ì·›C¿Ñ´5AÜ’]}ÿ]cUš)u Ýð}£#v½ÁlWב,,ÿ̹{m¿;h‚H´UL&++ÂØ Ôýœ6ü€d;`ÑåŒÏ´î ^Âèé…>é¦Æº‚LÞ͵Œº‘/ÎØʪsòb[qWCÑ`1™?ê²^««nk­ÿ¶LbÄQie2ïâ¡*_,‡‰Š§4š'ÍcZ¦œë a]à+iraµ²³ã¤< 9×üi$]Ä]ÃÏ¡Ùí’ë¬Ññ~Ð_œu‡Cùâ{ýÅEãGƒ¦}íž4¾RuYoÕÒÚzþlÕ²®”7P£¤‰rd†„Âôc€Iºå7"´=I—ÐY£®Õm~ÊŽµ‚,š Æ3Úï‰W›)œ”`ç‰íÉÍ>^¾}Ûíwr3i™ÓZLMÊæ‹««$ gO†a\ p8¡n‘r¥œ"¡R@å<&rÆH ð<1qT<«ÍÐTºçûmà¼Ü`I}'I:b]…»ÄyÔUôŸÌG/U0åm9:ÐÆÕ$[U–x„ ÀîQKH¡×+ùÀb»¤K,Žâë‰tr¦Ž0ñ–¶ Õ^§JxÝg‹ëk2¬$ÞÍ" ûL¸ªƒÄE )c†æ64!Pª.™€š?!°å¤!”qå¼› ½ nµ1wà.E(-G^ZWgsXW§å†X4“éWd C"ŠKE.m%)-¥vSÓ2-N[…Ø™TT•“"¡I„lꑈv g®n|æMôÓ4b¸*Ë2TÁGY0þsؽ^Bj¯®•V)Âã„Wz˜Í *¾%¤7Ü\çàÕ×™Áý:/MœI=É $š{·h¡•ò³~l/mæ]žà $«Ð]‘Šp;ÙöV‘ºz ¹C¡æ…óôæ2FÅ`wÞaý=Ïsà­$Å\7É_è?… £«%lóp¥ÕcEy ØÐ-ú…¡K2Ž&ÂM· ÀÇrRj 4ß*yÜô2¨$öövw¬/'Õ¸Á¤¡à ŠÐ €”{~mU«¦h~Ìî‚™˜?˜ºIôwènd T•“‚ã}¾ˆ¡VTÏ㺠, ,Ž1A¬\…ëš'P<¯éÚ^Nª}í=$ ²6„|«ä£&ÁÕFÀì(õU¤`M×<ÆüÑ:œ¹f’f£¾¼URÖ‹“;ÂZDf#‰çiBÒ] tA‹Ymuç·)e-€£Î™Ðå“iÈ$ ô´;óö5ÐÐj ±?ueïán¯Ã÷¯ü•d„ï 4J¨®ReÏ7ÓpYÊ<|´ÌøӾɢ¨ˆŸÄþ8œ’NKxÊ„WÙ‘@Þ¿!Wɼu¯+“x¾^kUIˆ?¼ûži K¹›Úñ)êNœükX·TcÄžK±ÌG@á8¨>¢ÿ RÒ3.@tì{ çiÓ=Œ&a½õW˜-Ùœ5¦¦'¸  Ü lÉऌ¬ L)«ZŸ–!V­½á%db › ¸wm¢[ ±éâ¿-ÂÔµÚð˜#¹ ž¢°ˆëë´ª-+è[á’Ì:>O³QwOOÏ[~¿u‚uCÑ·ÑÏÉsÌŸh¯?Onnà^¯×Ùd=áÙNî¢TpKJÿX?t&eu+ÎO5rpÒë"ËÚG’¯/–R­Ë.EeZñâR»¦/©u˜)Å°Òrw;CÊu‚1Y~cè·:ÇU¥H!-ñV18³IˆVå‡L24½"‚©uXX¤Ü2w¶Vý§ÐRùQä]é»hÙËS²šî*­÷Ã~Cä=­”Ñþ³§b"l€^¾¬x1|ã¢ñÞ×KîõØùËÝòr»¹2B-ÎR%®1iwÎ0ùfÐbìÄ(Ž¦‹)#´)±µ¦òeFž¬¥kZ’(=Éqb2‰´:jÎô‹Û¶¿{øŠqïW´Í,kMêðËCg]‡»ß½tØßžûçí‹ö\@&ŒtžÍ}äèàØÚZ)z­ Ž‘NÆ¡ÃéÜŒ{h„F%ê¾ÉÛÅùÒ‚A4Âδ âŽ÷ƒ"Rós_”Å\«ÇJP°]L0=Ñ\ÝÔëÐÂÆñEîF毸ŠÐ=ÉÄwÁƒWy×WÒ¢3Fí.H +ñ³¼§p¼ÆÕújZÄU¦Qö½úAl ŽÂ¹&aðAÆOó쬦5æÈÀ»P™©ò ‹ v™`ú•´òz¹qÇd «±¢)~¾ÞØÓÞºI“»ùJ¨¥'V ¶2 >b¯‘-Pvë§Öd Û%Ø@ƒD»sÒÝ*¼„Œ@ü'ÜÎF¾QäÏFG:Ší8UÄ;¦›<ËdCf¡œ¾Œ.7_Ò„óðúâWJÿxÍw(ã=ª¡D ®ºåÓpŽV+àå´rd ‰KÞ9é7.à*x?Rݘî¬êýÉÛGcóžïœåQ`nbª•)PuaOÈ&ÓéÑÕÂ#?²ý-dA%Öå¬Ñîÿ­ˆøYÖ½±òFa!2^"Ç˼m«-{„Pßží(Dbû&FNjŠ¡ídPCÈæù?¬—nn Vbè‹Â{eà_¿ˆ6ýJŒ_ 7¶.ßÃ~ÐhˆoÊÄù{ØŠ.¯ b;šhó‡?÷òG§­¡ùÍÅ€~÷ÛÓ*Nª¤Â6‰¦!ðkß*(¡‘§h/2ò³è¹t‘!Âÿ9¿¼ çüºÒ¿4€´ÎOjÞWü°ê.tï½DëéÂ_`«]‰m¼iV E%¨]a„¸òL$ñMµÔçý,aÊOñ#æ1ÜÛÝÝ]a4ûÆsÒZhÄDí9Q«Z^ËÀÙþø pý)f{3BŵµC±Âî%ÃòMçë4œ£Ñ‡&£Tª+&„Ç®Tw*WÕªž±I QMüÔlÁOº£¶ÖlÍÙ;bney²MÐ ZÂ0©ÈLA ‡¯ž“-J g ƒ* ¿Â˜44ËåÕ¸éìqØ–¥j›‡£ÛXè}I]ÜÈó½bY*Å‘â=E””ŒJ óYuçq‚OÊmF&©…¡ØÞ«ïÕ8\üõ\Ú®b- ]¶W 8Ó­wŒÝª&Ý&q!âsÐ Í À+eÎÄÆ S÷FÈŽùs«UÒûäJ$y£¯@Ô&«"¬ˆ¬Rý‚VÒ‘˜à¬0V :…L1ªÉCÊ9ê1d¸ÙˆÅéX"LÀc¢E* Ã))Æ‚Ù ýcVM„ Ee¼¸èjMñƒIJ6·&–(2o4 5Ñ %«SˆŒjÄà8ŽÅ0F0²á(‰Ç™Wai™OªtU³j}V’ëd3´òls´üP°øO|¿A¨…?ë Ö ‡úBÀ1‡®ýÒ¢)NeÚëâí |&¾/¶w:/rMi?NìŽë˜«h)ÎQn‡éª õÂkô/ª0GŠV”¢ ìíL¦ÒFÜX5Ðâ@Ï Z\õÞâƾH>†ÇÁ<€‡º<ãD« ÞÈÿ‹µ¾r6;爬×k ‚lâ4œŽ ÁÐ0¨µÂ‰­«•¸jÖÿ_­~—[‰²pŽmÜ-°5aFM<2 óî¾ZS??ÀÏ««æ±2XÕëIc9_Œò,{eËÄb8ƒãZ¥Ö¸×ìKô^éÕ7¿}OýámsÎÁcº{â`ØíùÀøIïTÎ[÷@)‹>†É8¬ä¯Œç>TuÅpÍ,vHŽAt“Ñ’A ÖÚï‚h~’`ú´´j÷¨Ñ>M—âÅäŸÑµúÌ(JXs V•GÍÑazÐas26 0Ža‘™_–¯“ðÒ™°H\kéBü ª/ǨëË‚cÕ(nöµÌ0†·RDîU„‹“ø¤Êƒ“˜AÛõÖn©HœNjiš"?›!ãÁÐlåM7Ýu uÖiä©ä’X—`²ã9YÁÏŒ<­W°É‘—½f®-ÝÜÞv¡Y•Î[çüŒÔ¨’•­gÜÔ1ê ßBK>h[Á–sòÎ1p=M\ T¿hwNßì7[…@XÂo®V·Lp†2 Z¢3r‘ KÆòBÕtM¹#Õ$¯©EUë¾\ɉþÕ#bgvŽó¾¼É¤,`°ŸR\+)2A_…·ÁGôò-‘R…¤ îjÑB‚Ôý«—èõtw°OþtÉdt‹°¢•D;›£òŽÃ°Ýyû`E¤DŽxdð9!Ïæèèp$eu˜¥±~Š|DàA7m! ¥!{+ PB B|Ž­f’I0fÃœj{·Ãšf:ÓìFYB9‡L>Ŧ å?1 –Õñ£ûªÓg>Æ<ê¤,8u½=’¦Ký‚ ÚÚ¯ž£-Û»!ÁâJw8ߊéÔ~N‹›Ý&w´ŽôQ" ÑMX/› Þ°<8öpÕò¹)bC’Ù7¢Ñc°54Öcê]‘«ÔÛæ;X|›T¥Wzîë8Ö%‡€sD6i3¶J˜è¹åîêÊ`îšþQXMGÆ:>ò~s‘ÊñúšÖ™XÉWÉ}·úHùpÒbœ<”Øvp’V| ¸ÖkÂÛ•Ü¥{µ-„;q©¹üÑÕI„G 'ß:{!#Êó"³—N|ù|ˆm\µv‰&þ}©=†{CJ„Î [,böÙÛ9P&Šsô¡bA›þõt®¹ÅæºñI4G‡ÔüsñY|Ü2Û*TF`2D4d=Î7—„O C0ŒRgÉÕQÈúàùþé^…šVãnÔ°{©Ã‰W:éžwOñÀê O˜ ë7˜iV§ëÖxóDR©êJU·Ýþ}Gûéïýß«‚úïЗƒÒ¾Ðß¿oDŸÞ¯--"Ê‘qŸÜà)Óú)|';)%Eÿ:«–%.JÇ™ qËŒ9·¢à‚É]ð€x‹°Z_¶Ôû-qVØm§Ð"=v N ­úhèg>8bäþñÇåg#{â•\1^=òlØay3MÙ¸ÐyâU("%‹¿Fq;IªK8[û‡¯Åš*{µe’YÒ8‰©¯ø`eîRøÈ?i´Ï/ûÈ蘂¶×#ßáí C‘Ñ1˜`^)³#u=“U˜[d‘÷ bè§}då§æë¼èöŸ²íü=ÛF«í?m¿kô;¸†Ç½a¿¾úhÃÏ+´ 0Ï\Z­lŸ6½wܵ×Þ¶G6H4/²†UÍÄÙùÒqU¤¯R—2>;/Œ¢)& Òg÷zP¸®Æ  U¡ÇŽ¢ôÜ2Ø+Ì¥ª%dð4±Ê´.zßE1̆|y> Á;Sd 0hÎÈïHUº¸©žœ-ºJॽ„ìgÃÏx“¼ñôž±^‡ï±‹¾`òþÏÔ“¯ÿßî×ޟůé,ú[ÉíRCh¸ÆêŸ[£IsU·a •éF‘]^Hû5¯â‹fNòßcxÿ Ýíøèˉñ‰ï5BS7ØhAñÜxÊ!§4— 9A€†¼O ž6Ǥóª^ð7.Q¯_{Í)ŸŽÿE ûÁY¦7"Üà0oØl6òµaÉðæ’ 6 ñòPPÑ Ãˆž¤J²gîŸK‹‚4~Ù:Šò +â]¶öÁ«—†œøþÕKÿåáªaÔ(D9< ÞS;uo}C€Êø•®}¤M(´"ÛÝbe•;Øß¹Þ(•ä®[2‚ÿ–:¦v½iÑhèoס f§„‚6Eî,{+;voõ Fwóž§h㮕Ͳ#-à›ÉîÝF›ÉnÒ›©XtÕfʳjOüËNû¤Ý:6hÙQûåó¤Sܪkí®3»eXE@Ím5ŽQبƒŽŽ1w‚5c»àŠ.ß3«Ç ŒÌÚkav¸WD£ß<{yøøÑP‹}݉v,öu§¸d±«ÍÊjв^À\®Ý—ÒéZ§7K§JGžu^oV Œ¨…á±À!ù̧¸¾´šhäeŒ™`} ~ñöçN㢅~võ€<b÷(ºÔŽÒføî¶[Rül­Æp11\lRâxW´É<Žìƒ¾/ñªyÜM–W€´ç™°_/Vº´eXÐ]Ä~ã!yêÐÇ;(†ï¨¤å¢ÙÓ;¢»Ž)ÓãSØå@9rôƒ¿¾ÿ^®£Wø },¿ùáý›óîé»sS‘Äš¤U½ùeÿWJ#7Å‚~›&c~Q‰±øë+o÷~ïšÄøš“ÒY‹·qÞ>í\´à\±×8‡.;ôToظ@¶¬âc¬t„<1FUí³â yb˜ŒÏŠã¤FêeUÈ'ÎÁb9déP\Wu–ÒËÅ{Ø^oÛCgЋ^G)ˆÓfQ=ÏPG)H.!U}fAI~°FBÚ‡&;t!(=klˆxIóÐNkˆAÙF¬¥AÏØ’US1ƒ*ògf!4g‘XzJ?(èR‰&È]KxÀ_/R4Å××<…—`ËKÕh?^±úƒ†ÛR9.Ÿäˆob}‰E˜¯¸Üš3€ðV-Ó=ïûï½ Ãfac -e#Ó—v…ŽB¹¬•G­…üüGª*,Ñ.BXÎWæj–‡›9"oxÛ»R¦Ê”õˆmiª¶ÍÅgb“—œ®â¼ý±x\•\úRîÏY–ªÞs‚–º¾·Wwô«mâµ½—k ÛázÃvøèaÓ»þø±ÛÿÝÆNK‹÷{ãø‘³/ªÓqA<àï­ýVzÿ³Ñÿ £V9wMáë†ú,¹ã´Æûuw[ÚDÛi“.zýîsÏþtüVKߨ…¨„: Ñ.PFã,–AóˆÙL^õd€ƒk Ñ;%‰ ÝFó¸öLåSƪ`á“;J`sø#G+ï_½¤,5˜e€,DøƟ眻,ÞÂY°ì ÀÆdv¼Fñ©ÄL¡È–W?RCʳ Ý¡éµ÷.ˆ1TÄš¦ ¦*˜ÌGhfç‘£frÒ:œ)Z•NT¯µªë<Î{g S3› Íë Í`ï DVür)ÜiñûݦŠ®õlÊÞ‹½ý¥¾“G„^howÿpzíbˆ§°¼Øž«˜€FX1*…b¯ö¾[Þ5öbß^¼ZѹC9ô8U;;? AG_0rzÖJ²Á²¢Z¡+ß®Ìdþó¯=r> ?÷%ErâúÇù‡t†!¼…¸ó%Ò•„àEn@e‡¬(3lGnºRÏ(¥kâÕ¡‘õepR¹ÀjMåWyÒz‰,­Í$Ldv3Ì~.âÓi&žU+B¨ðäHì j6¹ãö w®”ëÏ aµúÛ'Û>È…ZÒa:Ž0»ñSUF,ÑOˆ€²á-&zVlÑ”~÷²s|ÙS"VVtŠŽ:ÐLñî¯b²™;„]½v<7›N‘´ö#§f¬©¤•†ø¢ñ•¤R²’X˜ºr†šÞ:öóÖ󜷺xà{WËᡆÍT‚‚ ÙôFYK”˜8(䘈 ò×ïßxýè©Q"*](#d|e9]h¿ÕPY“=N‘Ó0IèÅ· h:§À 4S d´ŒJñXˆiL±ÌŠtFJ™$ é”aUXe׈F³Áy·';¥-N£;¹#G»ÃW6øꜫŒzÒ~Ñzˆ§Éä#c ÇÅÙ­Ghµè^C Äs“Ž©íñ_æ½ñó¶ ­çˆŠç+ 8×ñÿgïÏÓ¸²½aøüÛ\EEÖ‰@48q+rKئ­é;mû©.A!Uªh ,+i¿÷óÝÆ{eïšöT '}†¯ãs:’ªjÏ{¯½ÆßÜ,bî"ÏIó%h² b*ceè€ $ª™‡‘ÓR‰û8I×Åt1‹’EŠžgáœp«Å£PÝŠ<`5ҖΆ)C¼gŒ.¾†¡ªãJ-_ªyjŒÅ€˜p,çLÃÙM0Å}b ³aìxºãÅ*üTåÅT°sYô³•®,ävûÑëúÝlÀ}Šþ8JÆcº¥4„k0÷öN}¬¾¼•FTV°˜(âùSØ—œ^žÖ~N˜ÁëVµ·ÿÝ˧uvÀG¢F5S¼³…»^Uk¡Â–zôç&m¯tÒöó¤}÷Û&mÿ›Gÿ-“fÛ³—­%3êí}'àSfRñdÉÄB¿+]§÷Ü}Ž "hdœb=hŽ÷hŽ×›â,q5n KƒæÝ…ãõR©dÖ­ ˜Q1+t‹ºg…ÂŒ#äm³fU)¬êM0‘ »NÐÛ2u¢Áâu«Š€"†šÒ݆ªn]¨<¾§Ic²˜Sô§d ›6—#æ÷Ä7ÿÚ=‹Ç[âiÍéï´'¾Ö[¢ð ¶‡h+ã3ï¹%XʶËj»NÊIút¼D}ì–OÝz£ ¿;¨¸5¾hõ^Tq±ˆ•Vãøw^BC¾Ún[8T]ßu8÷§7sŸÜ…}¼¬}ŠÂÕ«1"¦Àoe¬ñ¸öÆXøËwؼ±ñCìž5'éçµXÜÞ?=k!²M›Fã0˜ý~Í~y¬ÿ’†kmBùµ‡ÀÚ³îðóáŽ#º9‘«d."W@ræ½ñòYq¢³ìËŠõY’jNŒÎAȪÎSߥ³œwnÄ)梩°Îû6˜ ƒƒº¨‡Ø\UmŠ£ŠÊ&‘½Êçª4˜…+AU°›ü÷p1,EB‰êo˜<µ÷QµC[kYµ.H 9qe²Öè ÉGAHº¤™ab¾¢*ÚL‘ìõ´¢\’aÌÂëH¥/ÿh\§Y_ªÎó³ónÛ?öÌ¿h=oƒ”b]f Ô«Aú%Í'^G¬°à½“ˆÍÆÍŠlä4úûUŹjÔ}V†Eb<åZ=ÿòì´uqÑ>V >²Â;‘·.º¤÷8uWaÈù:€ñ°r++åÝ}ª"E_ó^KYUp©ÌB¤…ö$çFBï÷ 彈æ”;ˆ‚^µõ²y¿^Ç¢$[çe¯íŸÒÊ4—¯ º‡ùÈ~mi’‰µŒRZ@qÀc€&äNšàÞxkµÏZOO²wtÒêœê·&S&lõÖûn1ÑV"‚pCx9 Å#«QѦÝ+“pZ—gGçgǼûášþ=Kw×iõ©‰(‘uÆ¥º§²ÆÌî±(0k˜`L’í™R´Q‰Pƒ{¯[ÃSéšKÑ‚òxèi™çžó“NJ⧈ s¶¿[€p®é_zƒ®9@ÇA:÷õÍv°Îˆ~¢Õ„¢9®~œ G.Y,àbMï1Ïغe÷GÙm8…¹? î¼Û«“Ö«Š SÒ5‚¦8¬åé|l»+I¼’ÍiTiÝ9‰ÑúšZšÑ!¿ŽÓce_ãMyϪ”k¥Éœ0΂¯¨J¢)ÖRúì@¤µŸ¢ñ3ùé/¶é:I†Žô‰“º¿½ýp>OiÞgq1ÇïEoù”tÎ~ò{m®‹Þe'›½G6 ñi,ÑÈ”àË´·Î‹¦lÑõrfªxÈ8„¬ë- jS{áö&ëå"=ˆc4†µS´–Y"Oy]*>†]öæŒ6‡×œèîûÅié+ÁNXÚ/«sÝô‡Øáf~Ñ©“0ó$æäO4çƒe!hŠX¸‘®#ˆ©‡®‚ëî,Ô\•^¤üì(êíž¡ÇÄ݇»§¢¹1PrQ@#:´!yœ®Ýi8‡y³?íÔšö¤\¯*£qàÕ‘ÙC¤%&šd»gÃ(PÜóqÓ 2Lëp²Ô#áG…Ľ¶Aë&¤D»ÎC2.‡¥Aoš÷"GÚi–54p>Œíý¨Îb:¤ŽÄmNÖ‹— 0ȳäc4 h½ª9Þ#ÌhÆŠ p#“9˜ŽôúsÅôB B( Óý¸2)ßúUµãt1Ó 8a‚àþ˜ßy“0ˆEܺ]Wdg{è0ïhrþJxî†ÜF°ö©3_×­Udô}ØÛdŽ[[z :Oï&ºFZrÌ •Ì»ß¾"=¢ÌàÌÌT•º*ÑõªÒ9ÉRFé!t=d¤év™xÕ/jëÓH2MŽ“t^—‰Šx†ø²Kf÷™+Ê‹“5Nn›¿a_õµ"0Ñ+³ xÁ®OO•‘*Á}V„÷êUŠ`eê~Ryµf¡w½ª^ÉUŒñU°YÇê‚«[ÛtÝÍbàîbÌÃæz·ñÊtÓqtSN¬#Ó²O† Ìðäà~ÄÅD´ƒ²@‚LCÃÑ#S¥²/(3lád!\$ F˜^^!ù¿ SFÕMŠ»9G6àùÌU¥î%2쳞¤¼¸%ßR­¥GAz¬8,î[åt…Úñ 3KfIFZÖI·K«MÖÙCæ²ÃÙ¡ º«ò|¢º*Ö€›œa¤ ó‰«ú½‚ï–K‰rÒ¢-´× ¦lO’ÞªN®¹¯ñx B5ê¹2ÞxÊMRS„Õ¯WßkuLŸÙ¼m~þ5%Ô‹§VhW{Š¢ØÚ4wB<ÜЃIm¶ÅlŠuç ¡í`'àa!‡D%[ÐÈgÍ¢ÒAàŒh–°…'Æ9!Æj•q„ùäÑññ¹O›(ƒN®¶PÞ]%Y«¨ÆŽåg% n\Õ¥Y8¨O¶EëìgùŽÛ¯½ý‡<5]„Ÿl˜Å'£6ƒŠ»>ã6ß«dxç:Z“¼8õk;®À½qðeæ[ã”_föUA¾æþ·„L•|sªLÌtÕ  Óh~r’™šY Ÿ‹Cö™¼#› qOUË­=Aô¹"CdΗ€†qþô/½jú‹žrPÕãqžÃxlÓ‡…³†6˜Ï7ª,¬³pÔN§G1´Õñ~¡Ÿ'Zëï}©•¨5Œ¨Þµ] “°a(²2Î@Çœ(üó+϶Óë놕3<×Uû¦2ž6¢CĤ¾ˆne™ôì$BlÜK±|Øïg‰“mxÎÄŘÐÈäd¯ Jnø°:EÈJ†ô¶·kð·=)è.„>Õtd.ºçG=ï‘›É×zSÕOî åôΩÙq›œ$×9Eðú«¥ö ‹Pô·ŒG–w) Æ@1ALy`ëàÛ)c‘LTƧµüE°§Ýóó¾ßk÷{Ê¿`"‰{Í¡š¡öLDÑÿë*Ðè'A«ƒ”àN¢7ƒÑ¦kBD–yýZ³lº(áik:dºe%.—cØùˆ#û²1gìXtr‰°=r»7ev¾&Ÿ¦ÓÜ´¥á5»{ÛǾ²ͬmav0zVcž †TQg–+–Ù9ää!š±¡€"/ä´Σm b•/h‹Î .}¦ƒ+ÁCÿ °¼i‹*9§a¤Y÷á™?b!‡Œ7œ*”ÕKÊ ÷*Š1IŸâWá¤PrŽ«pŽUü=¹Â^r…ä-òï˜\N¡MÝ«[RÌšbâI*`dÒCxÅUá{o=*6À™i¦‰·xGžÓ™L³-.)@Ò_Z\ˆ*«à XN ì×5ÈZs¥ ”62k¿(Ê;ðÅÒôG??çO-ËœlvS(°ªà?Ìa‚ÉÞa“éA1=ÅMˆéPÑ \¤8¼õ†ˆ´›x]æqÅü².&Ë›•yØ}ró˜#ïŠkª@«:/OæBG¬×•6à‹Ã mщÒ*:`?xÑn]^Uo݈'¹·"“¶® ÅhŒÅ.ïâúîž½ýï¼çO—dêüöÑwöêöÕ•zCFÞOжÒf¡ }!ÁvVT¼5ýgç]ÿ¤ó´ÛRnÃà¦ãДñº*Hü ÷FméUóÊ©À©³¦¢+3ºÿÍ£Ó§°?ö¿ÛÆ»f{ïe­8” h)KZÚÝÿÚ+jë;\ºâਂûͪ.8¯°Æ¯ËkÌú“eªÄKK;Ê1 yŽàõìBë\E“T]FJö"/¢xš{¯[²í´3KÞi +dHe‰ x¬í ¨Tq¯–ùmBZwrÀŸ‡\_%w¢ƒUª]ËÐ>ê]ür ’4ì"_³'Ê' µŒ¶·9mp ë:…ÖnCø~²^hFò˜7tnl§]´Vî ýaVmøyÍŠQõ&ëb±Ô•rF,rò¤›ù:¤.’è%ûÀÁAJ,X"Å i„î ï#òœ1ä"¸Pð”tØÍõ:ÆË˸é0}ÑLœÞ‡\!*­ì"£/&lYVć¿Œ¼7¹æ¥îX£Q4ˆØ22'¨Pã§A¹Žéð9™õµèÝRž¦Äñmï”(—+Æ›— CG# çI¶•+ËS W‡´¾(‰fÆ&”…Ç){g: p¤=I›Ù0’‚¤qDJ†Ý³‹À9‰âqó†Jð‰˜ ©z`a¢H! ‚g[þÇÆ+@àî£Ôí…µ›ëŠ‹²O}Ìü4›¡&J»Áú»\„e·#è×]e£[^®{©)²ÅUIhs8ÌTêT)Úp­…_‚˜“®RULBÙƒ«ñÑ¿ìÀ¼@K÷7Nj  +œÀÞ1tx(bcÂ&´)‰5Ó)W!ëøpÞCVwûGÇrXÚC#Vq_‘Êh?Gcì´9Õñ3Ñ\N³i’*ONæ€g†s;+Œ To¢Õ²Î§93h{RÐ1K¤™Rú'<ìNâëlUûÛÚÐo˜GÜWÍe^HåÙé mc3³Q\¦†w&@O¹rª\ˆ+ÙM8žRzaÈG7šç«RÁ±<†/×À6º7×›‹<Éþõ P89ËL€±È+´-Ê•ÚŽÔÜ V¤ÄM1ý½6ò¯ý¶ÿüäüi뤗¦µGáiºÔtžç±³ÖåCZææ’QXŒŸÛÐp–àU]Ö’Ž§Û›•ªÑçGÜNf Û$;Ï°ÏÇ4¤®ëBy®Å|mB[²»(˜ÏÃÉt.xºÂÌg¡¡xq:îh9+Õº\#f6E¥ü„íÍô¡¤«œ\«˜êéFR&—’ Ñržµ\\°f)´d‚¬Ê›…ã”{¤ÌL‡Ê#„òoˆE°^;³à5¨(‚ë¾Ïq–Ú[ßí¾=·±\HuäiÎŒ¬/Š_+v$o’‡‚·ÍV1ïžD1Ð;ÚÙyö¿¼£h£óksÎoÑ_Šq#hLŒ›5§óÆÇ´Ö™*ÔÇœ6Ui¯Bå#„JÛâµÉÆ2±Rnd£:b*Ó1wÕÄ™Š\¨Èmž¦E+ÇCö_!`× ½‹7³$& V~óõÏÏSš–¦µÍuò…nM‚îi®ƒÙûyï$æ!Z´`g]BBŸ$/—Ûy…§§zË}®,* Ápª ÅWágô‚ë]êöeY3Œ#uærWA"L£ìëÝ}c]ðb|üL½»Öê\%ó¹ bö¶=dü8§foJDD¿Û:Ê&@Ä­ä »¯æ©¥Û±žÚ›C9JÏf~EKµm&{çòüÊù“rà*ÙÏ Ÿ’‹žs ç©AÀ¡£Ö];G®@Eøè8<á°ˆ ÜyÇ=ê7mÜi•hö‡ª`o’I2¼M}£¡Ïá‡éÛàýî`Í0·Šèwxøä³c‚Šzý§Ó/\þ›ñîNB»lBk'™§•„õúMWC>ØpýÄOc ê©”_´:g™vé.ä«Àj×<µÛE«lÏzÿæìY·uÚî½+”#zT1ÊwÈ·\³+ hsø—Kæ]ÜÖ‚ª¬äâwd)®墔/fMÂÍ׉µI¸Ì]¯ÁnzáPœÉÐø¦½yé*I19¨ ‹[D}iJ®ùVn®Ï0æR¡¬z` 4ÓZ'ë±Dc²ýø‹ÒøÕÞÒS…,œö %˜ÓµaJz”t)øýúäÞ5^D&m.~K›—±Ú¦Hk ‡ øЬ_˧9$ðy,?°{µú^i×uå¯&îù"ñ­îEþÔ¥Íò«Cíûç§#Š»–쨷_võeË¿([ÿû.Ê„¼Ð‹Õ+‘Ý{ãÓO¸úßX|Nk÷£Ñ l„RËéûPåŠTR7bFp½·{Ž&Ùý˧OÏ»gŒh™û´dêÓìÌ+©ç·œ‚gÎÉ‹&“…ž˜©ÏP³¥ŠAÃ…É3|T)Œ„Qo3#@O¿ò1pÌj(0}&ù=£õEL‚]øKÎ’‰Ò`WŸÜ°c†ÜÔÆ{‡ÌK”Þ«ªÈûOÏ­¥ù¹½RÚIDW'Ùu |ä˜p(gátŒ‹ÁšUi\Ç唑y!¦åbÚ¼Ç\í¾ÓªÓœ{¡‚_^•k!Î7‰ÉwÍ°Q¨µ³˜ê YU•$›¶Æ†v2oÌot yo£c÷òªÐ5÷ž`L–ùúÂ?iŸDsÙÐÝ8²ŸZ'c„3èµûèL«ÑÄgîr¿™Ï [Nˆ«ÄžG÷ˆDI3nthKi?N´¢q]ê)±®>ÚÔÇyÁôÓ…UóÜOœ;¤7_\]%3¥§dXSËlÀ%SG‰'@ÌÙ;„”EÁÐ_+(wù怪ÈèU:æüÛâç¿û¬Ñ‹íÀþï=ú¢Ì¿è2C0C–×K!þõþù«Wù2p¶Z'ô83Ï׳E|}—ŸaûyñÜÚ_Nè"3{Œ «d¨5;›TEó>SæÎÎZS@ägÀzì‚ åfÂúr©» O~!ƒ`ŽTf¸÷Új¹3ƒºEóyç‡å¼(^Yç“·÷ˆ(C(„ÆÈZÒýf5mžV´hŽfòž=Ûè&µ][U7òûŒuîÏáb¶¿Î™7óÎ.gv†]Â<µ¿-4$ÛÅ ?°kPN^Ù“†ÏìïòÞ:®Ž:û6_ÖxuåKšwn9Û},§×oì2–9ÕúÞ<-þ–M Å%ø]I94Ì—‚7¹2dMÊ}OOÝo?®˜ïâ/œ:ò¦§‚ük»´ëŸ—S g>ï8èXOroí²?G•æ¾**eûµß;åE#锑gÎwqw¾µžÛßkì"ÕCûË2Õ­£¹µ¾/]Ow%u‘+¸ÏbCÝU §ê—ú™•FfÈþ´è[LE#YH‹jñXî_Š?±éK£ˆÔì(HD¥KÛIúX¿ø²sFùOœ4XôÒmò… •·_÷ÛÝ3u©)øLæÂYó½¼÷Õ´r0S ‡@qYZ¹ªØ5ŽWhyºÜÝ^C<^7J±‹ubf cãÅzyUé<™¡™ÀrôAW kËÓç ‘â88Χ±.kì$;h È*~µ ëŠ~£?ƒÄÛ []nD¡|‘×àÇÑR²†5S‡f¼÷‡V…Rá¡Ûݘ[ö4…Å»F¯Vºxæ{¥¢ÏhIx9×i ‡Ùy÷×ĆÊZ§Ïz̘’‡øZ«Ë9îÓÛ( ïQ•Òý¨£n®9|ÄÚ>‘ü4뢦‹ù\B&l§ mä]•l»Ó‰óƒ¦è^E[•åü¿t¾€ÊºÄ Pš§XÙúŒsù$)‡tËÑnx̽ª«˜!öqxË«âÀÛ JåòùF°í9Q^t3xÚ:zé!5F)“d6jF¾ M@¶wjK§ƒ.Tq 8Ò`¾²|PÕÊ©I R3{‚Þ+E~Ì“qH¹Ç¯Â•¶T1ö+º¨ýýa¶y‡I:KâYVT~DܘzÔÎS§2îŠ.­ÂYÁK½ ýÎY§ÿWq›ðeÝ{Ö:éµëœƒÍÄê-+‹~ÁwÒŠ cËìwŽÖË]›o¬[ñÝAžÐº<€~œc¬ù:.À®£B¤œTXô¦Ê½ž@}Í](@VÆm‘=ÜøÆP12Q<Žb'ñ%᢬äôLJY·Z ˆ¢rC'<Í­. ŒRÀôÖ-¼U5 üdÃhXS~X¦WóY2\ B'=œ ô$]?¥©Ês7ñÐT…Ù›éFËÉ¿«ã¼n‰5A®sËot 9;N\¯•ü®4ég3ûR½°±VôÖ4¥Šªúʱ\Mþýaªý.—Ô·˜¢ñ¥, p ‚²9ÈV¦éJvç)X’‹Y¨-¦\%/âÑ!Q“'²ÒÞžlo_íôr‡ëã|hÞ(C¢÷µyÖé¹õTßšÌ{Jê¹WC§ó¾¦“dg+}¸ªÒ÷ŵqˆ¼‘=´«<Š™*ØïÕŽ-]ÿAe³(Zý>¨u%ŽEeä§X¯Ïî°¹n³žô K}òJw;ñûv:?åªodò¡pÅåYg RͲ¿ ²¤Czá* ‹¼«Ö<ºRßYcŽm´ú ,`6a-æ+X?Y­=$JøÅ™j³OùÎíaœ Z㯒ì–µÐéKÌËCù{A aÅfP‰B]z—çÝ~û8“·Ößyæã·ª·%#Ì·UÕ˜bzâ7ØC´Lì÷~îõÛÈc=;?pöuÁ´êw)ºÖÊ·³³vW ð3JÅ„i¶7º|kR¨ â>æL€{y¹ì÷!$é?z¥‚FtnÀp¸–¼ ‡ªå€ÙÞ[Ì& bÑW>> ï[ÕiHÖ86$%BAË«®‹@†Ä½‰üÉ¢„&.ˆíÌуUy~ôµ× [à&tAýü¦ÙƒûY#»„zè}%¸ÝÏÏ.¡Ò¿43+Ò#`ï‰Í‡MÝmŸ¶Ïú­Ç­a`ƒ1KËfæE2Egn¼FÆ$1S†ò»MPP–Rf©möƒìNHc*Ó”Ùàö¡0}[º¹/SB;0_ï(dq”Òwô¥]2ijš™™/¿$,l¢Õÿâô;§m¸ÙO:§ mnÆèÙ"´»T'7EÊmw®ŽXÝ¡Y:’ÌŠ—¶ZžPŒ‡Ôëhq•2Àr«$+ Ÿ¦R8çÚ Ÿ] ÖÌ¡ *x ÌBYaX¤nÚøtNŒ4GÏ Nr;y‡éyW­5‹Ñ§Ô‡>€°;Z­bAX¼Q|`¹%‹7}{ DIœ­.÷ûí£"S^·¯‚ІWå"%U©˜dÔ”J˜Ÿ€afë+ŸÁ˜¸cìzIQŠÊ~Ýi=úÚ²£ów˜L…— •:ª‘?q_°Y΢\ÒŸmÊR¥p§°yIåÆæâ T̤ìM¹!>ÙlS£Þ~!¥ðÉx‰å·âÁŽâ QZj‚ ]7ã$¾Å/V pòF‹˜«Ó)zrÛByã뻓ÖwÉrðÜŒ“ºò•‰ê¥yÅ$åÖ 9Ù9ž=þLŸÇ…Ž]”´†nY„ÍÑ@-HÒð±íi!“QÖã¢çË]®Ð¼ªEÙ ÕÚ`˜Œ°Äk—öên¥>—®K8¬\v”šë\ÄèÔþ+q⥠®úÅ•4Ky"¡²íëYNa£M¢q ì(¥šx^ÜÄVãÑך˜¦dJ ›«6¤ ÎìÉ«Ô7Ûþ(Þ™dîŽmVÿœí©øD¥=%8Þ€•Z„2Î> žä à¢Qˆ1¥ ^“JǸ»Ch|\e’A(6Ë“:5n‰R_Ío-ÈM`'ÛŽtœôp$y®±¼rËŸµÞË“º¢ÔðØ7L,؈½4Ù Ñ;ü¢4†˜p›Œ„¢âŒöWg_´fÊcÕnÈÞ®„O_ÇÖøèPÅF¡œeRÅZfá˜s¨͆ÎÜàšèÂ"\òZ%+~;àìÂñ0$s4ç¼¾7ÃYõþSQ¿ÕO4’rü.“šù~…1ÿv.Íò½«ØUòAî™T!<Áƒ9¢Ó(%FD!åïÅ­è…?7ÓeÖ#=Ýžå*HÄNÞ†6Â=™µêô{ͼ“÷y—Àò(wÆWà õdV­ºùF·%ÕwÝ«âßµ*}[+˜.ª’Ì7µê¶¤ÇôÙ¦¼ë¸Z¾ŠYíC5¿¬&?tœÍ SFpIž½öæ˶©—mù+»åzqrð¸v-›ìò±–§kŽµ§\+S²y¹äàÓý³ó*€¤ýBÊK¥A¬É‹Z ‘·kŽ¼ò<œë` é¼P3!$°ÿ¢(9+Õ, "÷³æÍŸ§ ÷ž™Àª­Æ M šk7Õy¦æ´ú±æ}´Þ<뜵Nô­òœâŸxVÔáÞž÷ØASéêªþ±ˆï™/Û£sN=¿Æp”æ½’Ná¯J™Þ Ä-\QzãÈÅ;Øܷ׃{ìWUj)dÜz;£c‚)ÃBȳ@ç©®œ×Mâ6HPÛ‡¦·g–_àš±Áó­T¥¼ZvcnXÓ4†D¨å\‡•mJáKI}¯‰šð¹…=×4¸\\ö^øVÆëêÌ.2ƒã"–H)”,¯CíÓq…bŒü>¯qKaÀå@ÌNVJSå1Öý™†8ðå©“ ¬g²H >•°?³|vÝ,ç^מ«o%ƒµì¹™*©÷ói5½›,›O«ê/é[];ÿi|]ð¯Z¥²Bñ¬t{J¯7¯­gÖCÓlê,Þæ°Úi„1Z÷‰ d/26S씑/¬+ÂÜɲq*C ‘„Ý ó¦´N*A%)Z`Ó-ÉìL©-WEÕˆ5iý©ƒÄ``œ”fØ `&£n•KøÎÀ@1ô™I«:kõJÔë¨5L@~c•Ðªp¬·U· ]žƒ.Ï<Åqñè m¾‡Á5(óÚ(4ïÁ<•ì j³ªˆ9 ßïv-ºmqÊå`st¹•ñCºb‡íe§€Áê ^,¿ã±Õ±»&¤åœrjr’‘ùþeåmšÄ¢i°¹ܳd\ãÑ,‰9VyUUÕ°yÝÔûÜ.ZÓù%×ö Ðl쪋30"sª¸çõªJ8;h– 5Î…Bž'ÏeQ(¯á?ŸÌ¢kÔ'h+q@ì%À*Ž{eUÊ© 0¦PšpÌÁÐx'·±÷p†§`ÆîĢŒæ·xøhþë^ûè¤fðך¥ŽcÆþèœ^?ߤ|P—x.RG¤e]sXåjkÜþ- DV';uƒ…bî4¡ kè ŽË,>‚ŸÈ*üæ"A†3¦‹>ÒÅ”ÆmµŒº˜¼WèܬhÜßµ×GªwÑê9ÞPhG«1e< P„Æ­Jg”ö³¦ÚtDÈ~¥cß…S<÷±0›hÒ’©¾¤øáñY Á¨i–Ñ—"ïÇw´»gV‘2›Q…Ø?–LuNó²{×ò*SûÚ÷Ãp0646I3,N_lvN€óÅ:Ìü”§”ÁÎb[†ºŸC¡/×Ü`j0œ k2”y½Š.d}g \Ǭ ¥œ¥¢õÖîÑ Ò<¯£Ý½¢t­ŠÐóuvÓY¤¢·4Û4"OÏ$^«¢µ°!]ç, «¤sÖ÷Ÿž´Ž^ú'^ßÙ5/Ûí Ãmü‹~·W+²6“L`*qï+:UŒDš,fƒp=yò8šÏrŒn¦\Ñ8rOk•áçï××±HMt3Tª"ø •jhOY›>Ò¦[£@"»­àIÝhZúm­ö2v“õÚ¥I37÷h ®iÏ2¹+¾¾¸Ø¡p¥»ÖÚ­È7özí.Šl=½UoäÞ.x柜µN««fQ5Jwm&B‚iï±Ü”.›;ù¸'6 e_pgКv]¿*X\ä¯ä~“y™›ŠÑù‡Âv“ÛLV’ ëZ¥1ŸL‹t¬’Ó —ºxVÉ“Oñ¬ÂÃh-ìñÏg- ¡89owΞçï®2/i–°‹|¥í‡GÝBêµ5¿„M“0V7}â$?ÅC¨ä¶glžò_ñyý貿+{jf!ŸØ‘¬þ[â\–K%E׋™ÎðÉÛzÎ6–çGÍ¥î-ƒT€°J†ä\îÅÔ1Xi¶èšŒéŠ%bs£¥üª|ò¹«Íøõ‹;UÞ†-ߧl+÷‘cížè V]Ê$³Š°|…f¥ml9 #·@Êp¬Ÿàkƒi€!†2sºŽýÖ¹\Bï‘kcuˆBAšRb”8TŒ°åÍ+)pËw”ãîûã=Ueö¯a3¸EÞÊ8 †NT“:¾’™¬¯?EîÔX)‹Iy„§d|eçÊYů„f:ð¦]¦³¼ªgØq¬f…ûÎsÖÚèÇN8ÍûÀ\¥2g´ µŽ.æjíª å·ÎÒ|]_£Ñ ÎÐãd¶NU´ uŠtR‹cÖýxŒYÛ)Í/«fÁ¡¸«Ã$\ÇqƒÜË‚%ç°Ý{:Å ä£îPéšö+QÖe~ðžÓ–Ï5¯:íýØ\bèF):Ì”²r´PCÿf*, ‰œq‘2Ÿ¤0´iü‚РàG#Ÿ “ëÍE7¤8ÕœË/n_ºjÖ'4t)‘ïc$o·3^”Þ‡f¡‡l Ý^ÐB‚¨ŒMïs™ÉÞmN%@ÒæèÅ·8Jï1@É=Dau Å)2À>_„zÅ4›~_.F#]†€ã¬ˆŒJú£õFCw!n` ¶ÇŸJH©ë4J÷8ªå‹Ñ´yÀ{Ì1¡bâÐ_Ä©¶ŽµÌ•W!Ï¢ß&’dê£Ã“§3¬#\]ˆ„Œ×>(ŒCIÞ—n#&¼j¤”+† _›÷²,çX)Ý4¸Ò½¨±@ /Ou³„øXç‚ö«OGë~î :¦ ‡¢lâ›âÇL{HÈlðW’ >uOß=BZìĮW%m@î¥h´ólj_¿Ü¥9¡¥o=Ó"VqÀâÉŒ1coÐï8ücÍTÖžuî–aܘº#Ñó ÿ=v‚M't ‹Š*YÓmK§ ÇeMщ£Ý ·©ÀÁÊqåÎka„&­ó’•Èì‹Z ÊP”JÀ åÃ8!²½Ö xÐl7?˽Žàˆ\KîÊ £L˜AŒ*<6PØȧWw÷9Ð2”µ­\Okà£ù|Êüâ9Œ×d„/Æ÷s+ÆJ%Š½'›eÅEaìUwbNÖX¯ªu‰ÎÜ«¤q9¼5«R9 …f"bˆ®–ضÙCîX«rµˆZ ¾¯b@gÇs˜7ï~\K…¨LCÌûŒ*1ãuüô¹ÿâ¸ÛC÷*7Ý™ƒEgùé|a}qvîS\vç¯-ôèÊÛýJgËW<ÖhDØ‘¿ÛìaôEè¢ÿ­¯Vüë& Ÿ‡ -z®k\¯ªÛhPÍçË(§ü™³P~–ðfÃ8‰‰‘W¶Dóô^ â*¹"ƒÓˆjdgÚÝŠ¢Øx”à¢ê¶z.'¦÷Z §¬ºˆÑ,ˆ\XF;²–œƒYB' R%uÛýKL`z|Üõ/ZÝöYß«Ò.£XUì7ÙÒÌ¥ÔTˆÈC!!%¶ìOeÂdþÎ7kA4¸sPøu]ò,ïZ 2k”vŠ1–L.Ð*¼±ˆ)ØdƒJ‡¤W!#ÏâÔ>Ãì!Pã€Ì=Ñg ¤¥d*%×ÞLÙF «XËm{Õ ®І“FèæZ2ø^ÑÜLOs?zY+©Ëïœ_Ü«¾iVõ[Û_§ýV_Z±ÀJ™6 uum‘¹ª.&|µœZ Ù^ûµý>YÌ1¤‘®x1™÷²Âmë ¡œ­ÒÛ'‡«ºìý¸6¤j±Àˆõ¸[óªõ:É]ÚÍ€yæ¾UzÖ±:kgM6 ÜM °B4É)c »|pãB,/󶶱3 ÚJÙË~À™ðþ®6'o[´Ä…Ÿ<#%åOÂÒf°”J`ÇR&c\ï>êpÆßw—±È}†ezײJ“ÂS|9wÍ›Z¹¯HÔ^è.*“Bòš÷Uº§F ,ÈîÌ(~Š+¶&jí[ÖR·,‹Äÿ×z ËuáŽñnÖUL‘׶µ¬{fIÛ¿ÓÂH7Š榙ï†>6pœ‡jÚÔÊ8ì¡ÄííTwv•óv#ÑÂÈëdÜÀ­øal"‹…½,@a?M¶^¿tßnê^99ƒ×!*dîðÐÛ­£q/†C\`¿*„2(AÝËÀÎx¥·Çáò³Y2[Ç3ì‹ ¥ã?‰Y>À2ì°dß5×°iêX)˜b] ³6»XÑ&À–#xpõ׉ªÍÄë8‰ÒÄ Ûè†W¡O(þ ðm ÜÐüž¶$µqâ;vPÞAj¢MxŸÇ| ±^J)R[{1­fH¿·Å†Xe*YÓ@M‹YØã²{§d ”‚V¦¶F\šå‰O€\DPìhñœÍ¸ÒQm-Ë8sèÃxL5$Ùä5ªc <ÜZn˜ àm¼QËÈÛ3±ë‘Çî7mfÄBÍ&tÎ._;Œ“ï·Ožù>=ÓÊ“òq_ò¬óÜÖ:ÊVàô”[{' BLâ>ÐSOº?eîf‘€¯0gz/€¡ó•&¨ K¯ $þ0wdf?Xƒ;1šLÂaľ¨Cc\Wª®xµÅ¶0Ó‰8$A'ØŠæN†Àf*>™çW‚Ÿ¡vÌãŒÄU¤€VŸðÝÕ4Ïj†âábâ©Âí‚4¬èüx(HLƃæ 8?ŒUÚ „„SñWó~ ûYFL~i“éæzÑ„âxâQÕ|º(o‹ ÷à·˜% ‚Tr"’é‘Î_rÚ.¢ùÚU)ï-¶“HnEÏAô£C%÷ãOíîÓóžäkâýj­}Ⴣ6ÓÔRrXY.@<;§Áà¼×4¹IÓL¤5Y(§W›…c\‘¯Š«Êö¦š&f±&QJ’846b‰šÖ¢lÉÙ„„Å,•ÔǨÎç„WîÌ‘ÞiÉ\¡ï÷d {Þ’VRѬ4‚4 MS@³Ú,•jKTK¤[B9$\ ÌE¿fÒ²c‚FdT™Ênê¨ßC:\Õ1z&mœq©¯o= ?Î2碘dTr,–À0a¨ÆûtÌís„Y–@!Êßã~‡¡°Øä4J0»Ýiei·hçQ£kh8TŽÓË´Y.S.ÒÛ •ê׶ QCyPkC§¹òZ(òœWªd?fÇ൘Y5qAFcy·oÄcp1—ˆòÛY4ŸÃq5É‚È%½§‹Yè­Ž¾æF—ˆu‘"iÎÀ¾Ww´Æd㬡m-ÙZKᘋ˜^:£¶WÞz)­T´$b¦œŒ–“Ì¥–ÓHêºê /öÜJÕé:;b=þQuŠÉ<øK1qÊ»jÚU-Û;ê5”Pùqç‹+ ›Ês‰ãxó!W™Â×Au3H€Éu²HEÇlŽ‘(fs‡@ÕñYÆ®lsîѲû‹.17†¹Qƒ|ßIñ}…™Ht:õTEìáƒÌã™0ž9߸µa¶—ö1™ mßĪ®®¬ƒRWÞ-iYÿîѶ«æyê´×y‡˜±doC(3úŸŽéN’é# ûâ ¥ì¿bÊEŸ1UýÔT{Uõ‘Å'µúý.vú´Õ÷ å Ï–ãùÙ员0Ôè1ó0##ç+ª"r³#“:'Naíy8´=r|`aWY}¿ 2¼üî‹È÷ëÞ’º ӔݻGqž–ê$ajBÆ‚(¸Ž“qž€ªLóÇŽNû‘vœßM£…M‡$ º dVô‰åÁÔUæ=“Ä%PåkU©¢duaÑ u2 Iìƒ]Ý!Ó"ÁØUmñ\n‰ê—bUH`á!ÀçÉûsWk®ò6јß•Éý‡Jfä&h®î5›ÍòlÅK³W÷öWA+0È 2/Ä®`xi¼5×ìN}%[²‡Ö d²e §yo¿ÄEþ”°A©GP‡Itíôní_ösãÈ9E&šµ5WŘNï•!X7²€ŒåXȦD@}µ×Ièƒ÷Öa~à(ç¢Úš C~}èð‡ŒÆqûéåsÿ£ ¤[Ç‹Ò!Vƒéx‘âÿ3lïçÓ§ù¨Ëºq´áýjá:ææÑŒá÷žÇ{vøS‘tÛ:;îžwÐaï¹›ƒ@­zýV¿ç?;i='¿DÛ`ô§Ått›ÏΡé$;xžQÍê>PÚ#8}W 0¾…Ë«rTfÚƒÄøÕÌÚ± ªsæ]£¯É’Y î?Q8?X1ò/Ô‡‚7ŽÝ9~úœ¶/¥·˜aðꞆ:h¾ûÉhÔTžÐjúÝ9Ë)‹  7î‰÷«@¬‘’:{¸:ïv{¤ó©³#’›k0¿6¿s›Fzsw³ÚŽ’V„îLv'šß¾Q]{goÃøƒms…µÌv.Ùk¿¾hõiÓX Î!çκÙKfZ‘]žoȪ<¥TQ3ù%pÔ[OŸ;Ðñ/Îì¾/ ŽG鈄Ö8×É{ùWøÓ½"¥‰é|5 SÞ€W‹Ñ(ÔÃáÊ1oÇÌöp™œ¥¹Oápkw¼kä"åÛŠÜOYmêU1ŠU˜_¼K^FO½*©„UÇPÄ"‚>¬}ŽÇ¿µûç>´ã_žT? ê@#¥à]_«VñéWðœ2¼~_±pöÄ“'ÞÞnÍ †ÔQ* "ñø]º(/’[LýwG: ´ú£¼ñühÇ €ˆB_W¥+Ãœo ïcÐu@ŒU N0¯E%oë'ÈÁ‘¹ H’s|À.zºžI”Š#U‹W®ñFO¢Ð²s¦#«³ÁÒìò£BÂõ Tmnk‚ȷ´Ð4sÑCêè>o÷ýíÖ…Ùk=oûgç}ÿ¬Ý>n;úi58ÝeæU8b/ûCåZ¦r*ÛË€±9¸ŒÃã@ ”€Rºî›EŽŽ¥3g„cà ÚÒ›d<Ì®¶Éá/sFK@W–ÑXG]”ïœL%¸¬ú8ño£øá¾?Ól¥IêÃéÒîÝÂAÔ>Ž©÷*Š‡Émêõ¡žYôÒ´¬oPSBäpnw¢Y08cð^?êÙÈQ·Óï`H.¬Î9Œ”Àþ ]2ÃtÏ)ÞTƒüW4#P0MT)&åBþëà>SMó Ib¦æà`mÀE÷üê¡tø©2–«Ÿ²m.ºç} ÄùéøifÒìTêp¿Î™,/Æs±]Î|¢÷A//Ùs¹Nñ*VJ§®Í9ðžáìNÐÔ'Q¼&ÒŠ}gA¬¦Òû˜¾¤Ô™…s¿ˆÔƒ«¥N¯á”E4d³ îx-MaÓ5’©@ÎG>k”ûTz´“ÙxHøÓ°ˆv%‹2¤6›+Ec±Ï‰ƒëš9ÊnЕ‰™9a…}5aX9°«Óô•vUµgù¶¥ÆäêïJ'~P˜‘æù«Wx>YÖ>8µ³Ýõím‰ÇÙˆÎÌ¡[<çÄv¾B”X²ˆ)¿‚¦1]"ÆêU¨$ÖY8 Ñ6–¶XxÁ÷Ñ‹öÑËÞåiÏÍ\1,KF­-*„{Q`±\•úˆ,äëÍ YŸ ¢"ZøË1# ÇD¯\O~Jågyóe™C•>yç Ÿ»é°¹*ǽå2Ù^”È'=wÛâÖõ¡5µóMd ¥àË–4x5^žmZÞ# ÀÖíÖܶ–yœÎKGGHl:ÖIJâY•8Žâlä8'B%ÂÄaS“üLáÌ]:'"KKÀdoC™Ï²±Ž—¥O/—b ûb‡Lˆñ¨à‡óÙZ†näQ¶‹+ÁF·}Üé"±Ðb‹êQt…_èi£ü`Žwñª«râ‰2]q2Z`öîôYEœ°„dR|3;÷!rïÐ$ù‹ ØŠ\‘k ºË¹33cß`yßåüæ&]ãļÄMp> PÏ|½Œ“.è%.­ ¬ …Ñœ©£óÙuj bçb•zDÓX¥X +ð (ìÓÝ/DoDLæÁÉQ‚1¿UÊz €ºRŒ.Ãh^‹#‘ÌvpÂHéIÉÍP<Êàv¯È§ñùK<È19bóKô¾:oä”)êirýQm“uŽ¢||‘q¶œÛÍg"cöÙauõrçœc³#,ÎÜYàcC9ÏØZ ×dL”ûW+Ex<&KØê¢úLØ/½ì|Z˜ØE…±s2ÃóâÜÄΆµóVD¶3IC„ˆW:‰©IŠ«+„L–Ε $ÇRa–¥r>*E»³\…ãäV4 Ph~ Ö.“þ«„×Ñ0é*úFà¼f§è¸Õ…mR¼çˆª ïŒ;t¾ƒ™ÞØíµ[Ý£4õÇ­~ µ¡Ý~)ñ‚»iñQ²Aá+¢cŠ8µûO{Ç…‘¥õÇáü*úáxTB]/Ï:¯a¼lWJN‚Â’T•?€^u[þ¬!ðW-_;ªœx+ž¶.2ú‚\B7k\Å;8 ¡Oà4À‹Ää!àW‹‘ͽ•íKyÝ°¡\(Õ[¸ÓÈYlO‚¿Ãåüáž5 ãàÇœ6»À$£‡Æ¹Ð¦©ÅÚ噽-ÝéÎ yÎI„C«áÇé,`2L óÿ¾Ÿ‹,Id‰7€a gsKüØûÏôñß"„ÎÛ•ÓçûÏ:'môÐð‘Cƒß 3 y^ë)H±Õ ÛÜFI&¢ì³O‚{UÝuΔғ¢ß z°f™„kRPûlä|[É·ØKa;ˆp\z ¼v¼yD¾†jˆÁÜy#™ç9*S1ì*Lo$ÞÖè¤I< :M^³ä‹Q´ Œû÷$š¦.Û¤ÝwÈ=îüécï´sÑ»˜%ÞB–žŽ.ãŽÍƒ÷*0'Áñ`$³ÏÈ"5q](9Ì †„ê—rše²îW×d±!Û)&¾!r´Á¹ªÑпá¡ÂãkY‹0š§:…ûžv;îí]ÜÕtÿþ†¿øÑÛó{½wðh÷ÝáÖÛÝ-ùÿsG¶Nµ§¨QÞ§iF²7£D X }‘sÇO µL¾å.ÉH` ìcÑH猒*8…;ƇÎJ«º Lº!¢rŒë,¤W‚o&©ŒF*çPaUD8d•“?6ËAa³ŠeLµsÕ;úr‡•È!5¡Gœ¨²\y)«¤tßžµŽN”H’)Åj«âb½Îs¿wÙ»hŸ¦Fnk‹WIé4d_,¤¡Àw°ê9•”î·hºŒŽÊÁùæ ©,ÜŽÐÝâá µëöÑÖiªâ«ÞJ‚TEÅx…›kªO Ò%÷s7“o‰(4ÍʼnÉÍ拘ÀŸê²w(1Wa1¯ÚW_$q˜»WNPç`y5`QØ€Qäi8Dÿø>â#ß²ÓꨠôÌm‡á€ Ò (¿eXXp 80r7ÞéÍe˜È^ÕZ{Ç2•ER?~~ùúáwôk­ÊÉl Ë^öI·ïÃÏ€¯‰Wñ ‡-}”ÛX¯ºÊ ˆøÍO—2e B~8ãüD¸ã¸Në<öæÍ“,šú.1Ôþ8 „‚r'ç½>ù:¤“U7Y\ß@±è¦[Ug@ÕÄÎ6ìã-RÏóÍÓp<µH±Èe¯»GÜÿ¾ß,YœòFaØ®ƒÏØ% çðáÓÞ±^*Y帧^_Ú¨"em½~Öûkyc>-õiç¬f;ÛUè/¼¯¼GñM™æœOó†Eìh÷ØEïC{íS ǾÑ{Ñê¶Ý8‚ì[ ~û°n°áÂùß'SØplîÆ»Árïæ·BìH¯DïRMY¥ZæîÛü}ì U¨[LÇÄÑ`äDI‰HÙœ©ºŒP”¥:ᯂ¡‚ÔCc:²ˆØ­­4¿ã¬<¾;(©†Ãæ}yÂ6AÑz¢$UccÀèÂú²wN;}G)¯£µ’Ûéì÷S¯ÝÿËéEÍUö÷.ÏÎ{ßà[wÁêF5¾pqš%½K‘ g®«Q™kßÛ¥ÅÍ@œ¦ªN±äÓE«>ã´si†dóòO‚ô^ë¶ „»P ãt‘ñNÃ?ëÞžµOÎÏžËwut£¡ÑiYÍ÷ð­ÿôò~_‹k‘X»ß>:wЇì~Ücßt¤(ˆÑéµû¥P•Ò~¯ÑiÓcíd ÷n½Ì¾QN*Ç ^²¤“0}BfÐ tâƒ6˜«ÅçvŠ¬@´ªybÜl~† eS¬íËn§×ï¹þ­…Æ>k2Ç©Ø= ½|zÞ:çÍjs½õ)îýÔýÚég C­¿‘]°2®T˱E™¨¹ô⨻f—tƒ0;49Äøp䟷ûú! uÔeqwæ³`ÊgÝž,iÚ+m,…~2®‰Ø,.LñzhoAdŸ*Pnà°RT`Ǭ×zï éB<šÌG@R¾úª¤»èq»¨h£±FQ^»Láãj-cå*¨–`·ˆ)ÇÊÞ®Õ'öÄsbBõö󾔕3”RO7UV•l©fk‘¹PAœÁÑã‘ÒgUo2©{_r-®É«pØŽµOwªÛf°¥*›·Ù’®Ó9R¦@áìgú©°…¿°Žý³j–gé8sŸ­^oÃvfz”‘]»ŸZý¶ÿ_ýÇÿ þ]ß65ww„UÛ™R¤Y¸s=ðJáæ7·± ÿ=úî}ûÍCû'üÛßÿvoÿ?öö¿ýž>ÜýæÑìî}½¼ÿUɃÙÕ?ÿ—üÛÙ®x 2½›!ªµ·÷ýwßÕñ¿ßc4tÚøKÓ{š„7“º×±‡¸ÝRÕA Ê|¿×€ÿ|ìðëp–|„fÈñHt} Ø5úƒKÓpö!6 «y„Õ|Õô¢qlŠ÷]É# ¶[»ªàEx;çóÆp»¨8>bÈfY5üÿ^ÿE§çéèvZ'ü¬ÔOãö1Ð&ø³î½êô_x­§½ó“Ë~ûägïìÜ{Õêv[gýŸ½öë t=ŒÊÝöλ^çôâ¤Ó>ƾŸýŒŒVØê{?Ÿ_v½óWg„/¥qïsN¤©¤óEÍ6ŒâšòJ•Vš¾§w‘ ¬ ¼žT`„’ŠL0í)bÙhÀWdIƒ+ÄwGØ@ 1g!CN"ÌÂA­Q˜63ý€V' Õ;†Ê ÷¿À/ñ2Aøú%}®cekvC)áøN¢)Þbí9ÝN¤Íº‚^kêè­À5á€Ü@ê“ó£—=ÿ… UøDœ.¦<h®Âù-&G2Û1.JWH3wÆ›ÏØ01áøiÌ6‡¦åÖ€¥ŽN¨ äTÖV®_)­'ç`3n"ÎÁÆÀ4i—gø«ÚDgÉ\¦¯ã¿8?¡Eþ®ãŸŸõí‡3ÉéH °m"Œ2ßa5¤®‡Ä”gÜ©T™?ÇÆ£ Âô‰ °Z±S@*­7iÿ>Ç”Æúr¥MØ`ì)?™Âí´ï”Ъb‰/Žºn‘PÀÝÇþSìi ì×ózÙ¿ÁW™Ðc~៞hÔÌ%03K¯Y w- Ë·»aʱ½éü®Õ."ñá Ö(²o}‚!¢ÑµÚJ§îË3A"9z \îßbc~õK·cµ¢Â¼Cœâ]¶ï·gÔ«QìÜÑú©íSy‘£79w#k¾êöÛ§=k…õ”غ¶3¿ßê"®ÁEïa¶‚Œ9µ¨ßÍ÷Í6:‰kcOp‹³Ô£¸hn힬¨ËšP­ê´Ûß‚íQÜ““0ø®„ôNk3ʦv­9Y1Òµºd]li:Ø~5K__ ?ˆ–€¬©Úe îþĜܦZ ¡I¥ªLöè82Þ‘ÛÒ¦ã@ZPÇ…CÛ|˜} ÜÚŽ…Ð.[v¼lUÜ,géìÌÙe]žÈ?‰ÝÔ£}_™A8¯1:cxùªTmòÞC°EÒ|ÞR¿Y2\ÀÓ1¡ÎOÃpŠ™CÌ­JÐV‘y2c‰†©bŒ1•ðEßµµÃ€@Y­5½žÊ)2i+iÆ’¨R?åë°¼KÜšÖÙMJD ÃÄuŸ}TÏ>šÍ±à•²ÌÄ›Dn<â ŽcHr£èÐ}‡<õÜy kŸ¡ÓÓZU Y…[3?¥ GH¥€ …"ˆç5 ÏÞ[¡xœe’òª)-bÕ5ïÝr½q­V„™FÑPÙ]k”øhF®iÅŽœÚ”CKò°/“ZŒÃKñù*H–ç`ˆ ˆ7WÎ8®ïßUHéâ ñáP†œ$˜¨é=§ãmŠëe ׆˜9U~Ô8 éj¤Çè#B—p…w½GĹs§¹'°€Ò(ITå+T”,P õL’tΠÛ@½´x&œuĹì]tÎh"sPeE˜^š‘³á¼rÆ^×ÇÞ Wg¦ž%èüy,8V˜€Y§\Ý)ÈpØ.tí»d¾}$:‚£¸ Ø¥œ¤!{÷C>CAmÌk‘þÁå˜qLt¯ñ*€pP+‹i¦i/lm™Ô²¶Üò;H-0†£“v«[0DÓ#[Tùß¹«çvÉD¨YX* ^¢€Ø)· ›JZ7¨°D…j$Ï[¥hʲ4.,Æúý°Ð@Šš(ñrJu¿Lóðc†@iõÏçðÏÒ*”n‡ßåôýNZwÊ1õ±Tk`¶YÉ.ô\}àÔjö»?cwjæ;{ÍÍ­óÀt(Z =“ö·.‘(-ë·p°N­fc5²&-¢(}äˆ2ûsvWØû“LKöÎZ‹ìæe„F½_u–WhXNòÞšÖüåu¦«øÏ"6ß»µô£… Ù•ÃÈʶ«ÐejÜ=QŒÑt°ÉÌKƒ;ï.´¥öÂ+¹ ºßm¾¸Ï<]G¹½\ÆÜÚyí÷9¾vMbmÌ}ë??âýa¾‚í±—ùòu§_üáîAe5¯üÀÀ…5õÀ>e'¯Z?÷üÓË“~‡?i;ÝÈN9š8Y­ª"ŠqŸ­2ŽQIßnŒï=Û´”uÆ Þ•ßÇ…‡Kõ~éΣ äÒKm&a›Í–9XòE‚ÝíMHQš%°à·ï‡Ò»Òd »Hb¥ˆdLæÀካ’|—V Ïõ›¹Ñ×U™{*Ã"³õ- 3†Ë¢Æâ6 ÛÔ*žÁø.%À›dÌ _T.SÆSÊ̘ݓzjHá;/H‹ e°s;¼o@&œ€¨ šëM»kºpSfîMåôY”x $ÀíÍo¥¾˜-HÖ?ÐûA‰Ÿ…½Ñø=™‰Èô3ëY™ïôÊŠÔ—ÙªÜÜ^:™‹¢nvc†â9OuÓ•™Z\·Ç-6ûFµIx­|¾ã2ÿ¿›áì÷pÿ[áÿ·÷íþÃGÿ¿‡ß~ýõþÿþøÛýÿ¿¿Ý ¼»;ó°‚èpø©aÄǃÿ1¾³wtqᣧIï¯Èâ>ÜÇkÙzöƒ÷ð‘¾~'è"#p^ =kZ¸k´å ûûp9çîÍga(‘…ÊÜ,ÙŒSãC‰W¬…[ ºXMG¹ùáÄ??è!%øF:¶Ízôy2•V ªï&Ho°ž9¡©ã€'*õ^wëe~Á_(Š]ý¡Q¤ÄH-}Å*T6j…³Û}ÇÏPýMIE‡`û [òWp1'ïSün€ø5MAïcä„3Tj:ÎÒG¶lÜ–X Î=âT}4J!í5®À IjsÜ•´K²Ïž†œ=¥cg÷pÊQ:Æò:œ 8ΟwCn sÌúD‡5EÐ)ìí(¼¥ÝÂÝ1òM‚úE¶r•Â™ ð™fé}lïµ'°¸&VáE«÷ÂïŸØ ~º ó0Kà6%„¤Å¼1 ¯a›YÆyM"Î7 튴8Tõä0Ù³Îsâ6M )‚z«7vXïsŸÃO}èóÞn^-ó~϶¼ Ã)íSvÍ ìWÖ$ÓéOrÃU¾E;¨Ž¸©žÓR9MZXwz í¾õÏ/¨¤Lz#ÓaþûÅÓ“—½Î_Ûµ¢ÑI 0´L¿TÕºSü€³kLÁË3Ú—þQëèEÛÑé÷<|µè“qPÁóißú°59 ŽÎ‰¤±÷€çJFÑXÛ¿JëÀ"L­ì…p| ]æ6æ|uÚéõòŸq}ÙÉS•T ·y–`Ãõñ+ôœºÌù±1dSe?àË!½‰Fså·lÇŒä~ëñ‰èòL/ ÿ÷ÀÀ=š9§âßqzžä–Aèöy‘Ll¶Y'K’iÁüýÆmá©ŽP*L]OÿÚîžWu¹º žš'˜{Mwû¨]½©™V(_›ø"ÜP®6gK{_zU·½LuþO­“å®ÂÄÕoÐŒ¿Ô<¸Í" nlµÚ}IO2B§ªNS²h5}48càÓL+pÒé9@ټ΄v¤—Þˆ&9Dva¶qtk¢1ÛiÇköI!fCf“6364 Œ$úÖ™£âþ¹t’Ñß<¶ûõsIßlY ¤¾Á.Í9"Yît¤<˜¤ãäSçÂ{uz`=R~„Ó¹°Dì+€*UaNŒ’@â€åÀ%:X³;Ðev€™Þ8Ž;¸âZðÆל¿ií$ŽPkȉeáz±©YàFl÷bºÝ€*° Ñ¡˜Þ:Õ©*ˆq{Þ÷â8.¡¡8P¼mÚ¸v6+ŸíJ¹™^½€Gèÿ½Âͼ^š¯²Or€|::œKÞ~¢.‰8Âœ› ’ù1’ 6¡ o}ª /„¹vª KùóÍ»U­±pmñ˜ÞÚ»Ôn·¹fUçx*Y£ ´tÓšz×ÞNŒ«Œƒ$å•ÂɵÖwíªH¿A¾›êäÈ ¼gâûµ­¹É\Å àfaás{%îù‹yh ¸È5p9Xºµ'ø&skºî´'¢êáß\ê3¿¼*$kc´¨p?`TÔ+>Iyw×T'§¹NU3#šèW5ýÆLÓ®lö¬ —âÓNõ*B†¡È¶ ¯j'|‰*ÁcZ,Ù"ÿ^ ³'”i  E¨£êœälÛoœÆª®Ná+·õw¶ Ã"KÚc¤FëÓš¦€¶:Æ5¾WÓ gÌÿV%áXuZs°S²¥ìä1ÜðÊžÔ-òòQÙŽa¶í‡‡)o¬izçV"L1–xÔÀC?[ ž}qhÓ‘üq綤´ÅØßew(|}P˜/ÝKëLsf*Ü–<{£ÌlÚ[Ô¥qëvÖ˜uzJ¢,ÖMï¢=rø ×S9¹Û™Â…ëý×vû¤‰ÃÊέA5Ê£“JNFŠðœÞ3bwÕqžÒ zƒq’1ÜÑhE„RÓ‹äĹ\ßóDi{(E¿ju1-ÍŽÞõÏ:'²VU•W-ž%b±fšLZ±œ@€!·@52w0%ýçÁÝ(+ È%,e3‘¿áø—|_¹OͲÁÉ×ícùX_ nNbÒ.6<5Ru=¸ Ú*øfÓ þíïýa8'd“ßÃûc•ÿÇî×»»ßdý?¾þæÿÿÿôä؇þ7öw÷öŠ”Ž‘ÃJ¦” L¡)axwüû¢)µ[/ýã6&ý…;ÍEUʼ¢[ZBT2”Æ«†ÍëfÝûPòÈk4T, {Dšºñ’Cå¹&=?âDçâ(¼‡ *5.MyezOyÖé<ÕI:Â8E7’t>GW0:òÀõ¯ñÄ…Ró-ºÏ\Ê 6\áœÞ»Ê·3­Ì`ÀGB#EJˆyƒ².=xâ>äž<1~ÔËMé%”–câÀ8}8ü¡>¸óŸÕIÝù¼:©mC]Õ˺þ!ü¢Æ“tËŸ‘úͪ\þž’kﶹzü[÷†5\Luþ³šÖ8[c÷øòþ°>Ž3_Çô¹´Ψ· ½¯»íÿsÙé¶ýWG=xmr<0±€™‹æ|¢r%3 ®¢’ÔòÇÔ*N5·ƒ{Vk.qã5È@ˆCËëÍåÒf‹Km<-Üš–ÌN'Äbš½ ªLó@C_ñ~®°ûVMURøÂœ2JùGdÄÊpk=äk™ûªHó€¶÷ØþÐjP": ÓÔöÑ«NÕ}E$_-âc£ðÀ@óè 3@ÜÕšë±ý¦ûÝêÄs’C ÓoNB~ag{Et:3 h ”|ˆ Ðe1W—µšk%Šw\†]’ü›ýÿoóÿ>Gƒß‡ó_ÿôí×þ~þÁÿÿwñÿ¿ˆëoÅoý+xή)B5¡×ê=z 2Ìî÷È0È0ëx¨[”púV* ‚BòÓñ"ÅÿÍ£ ï׌gy'þ¼'Àº1“ÅÀàü‚¾4 dBÐ+áíˆ+;[àæ®ö" çº!wiÊW…3å?Ä,ƒömVL¦päÊŒ&]Ì9W¹ÑkA<ʵÉ$Jí” ¸bN7?ŽKGÏÞ_à2ÐY÷há® “ NÐoœÔ­’ÄüzÐ Ë:áø­QÓ².ȧZ{‘cš…qHÜdñú΂±8£̶·WCÜ7ådõš:ew@;“p~ƒ˜02œRwB†*/0zSrUÇŠ¡4Nñ]3ËÂë¡šA¿ ©'F&Ûí(Ìõ†¼£áq”£v.§~ Æ=óvR‰ %ZçìKs³Ïã îhÌ:}#:º§ó¦ŽQ Å„¨„”ÉT…ÔIÖ¬ËrÁ„΄ïV½#GníµgÁÃm¥R‰N±ˆeGVn‘jw"vC‚}3AòÌ›éš2Œc®G9dyÑÑa»G µ‰6Ÿúˆ–#þÕÈX 1˜])> WA¶K—û,)x­³ñ*~ºš¢ž@>äɹ R^q.‡‰¸úp¤ªÈ zê*Ì è¨@·HÍÌ]žT¸àäWI \à3ÉR+Î4ܲb38K'ÁÃÒç]aØ•${€äÛu¥HPÉ´N™‰R_…€ë1ÎÄåqÂHXkôê2Ö™@ùB „¬¼æ|ùP®AŠÈJê@šnÇ;½§m³me†+ÙM2,eµ¨*•¿·¨¸³F+K£UØ*\0¹eU8rX&ú8Å|¢ˆgÎf]7F®û—ðÿ×?‚‡¿Ÿ°*þóáî·Yþÿ<úƒÿÿ_ÿùÍo€gÿf†½î4/þàÎÿ=¸óÎÙIç¬íšô34ÀbžuΞ?þbLò‰M€T êâÌO£$½Ô8b“‚Ðxc²_#'ƒû8ŸäéìÉ…q– ÃÆ4Hç xÛÀ·Ê5¹ÉU D£Î€m”Í _¢ëÅL²uÏMt V~ô*E¸_éŽf~ «jAoQB«K¡ëÁê@·CrSÒ!±åpAιP†u§½o1•ÈßBÇC•ƒÞŒ>@9%«]TT™eZÇÇþÓŸûm¿Õ÷á¦<ôE!%Ê\šÖ%v¯ð‹Îåò€I€S=ZŒ9]wGÉuÌþÀÌ53½RY±ÓDEÅ2W ,öHçip®Ã6‹xÄ f±,¢‡ØÝYp½fa>b‘×úÛ‡½óGceôòL®½Cï¡c0“€‘ðãtVÇXW˜“°ß“õ#Š}xºoz¯^ kŒï‡`²£}Qã<íS4~(k‘.h¢øƒÃC©D2V:Ñ‹¥ÝᲦǓ!6Œ®ãÔ(èqTqe“)u7]¦*—ɳv_Ⱦêv»ÃT•]ý˜ÍlF$íœ#¢(*ä€eØ æ›ö.ú]´•ÕáëžÂu‡V q;š7ͼs’J_Ê`fmû±Ô°Çc” 4°£“o¥ä!²#Ì¿^•Ô ¯°‡Þ{"šÄ`Èðø »¶ÍÄAâ½5,£yMÇÚo+×ÔÙëD~†01ž_Õ.C¯ÏÐ~Ø\k¯—°þ׌P쳡~ÄwâŸDæ—+(Z'ŽþB÷©uãé5¶½­¤EÜöNí@¼¹HL"ƒÊcÍQÜšNý—Ïoš…äî’BæM´ù˜/~‡ T!öCQð¯ytw=lU…ÓÙPKN÷ \¾¿q•›ëÒs™lüÑïwŬÿ¤¿(¤µºW“IRkR±B0eìØòÒ5Y¢:肸gFé  °•5zÜM“‡õ÷€Ï-­Gž˜åëÈ<µi1¼‰'¼ ”,έZ °æÉé@›˜E+Ž‘N1ò…‹1²>ÓÅœîx÷ÆWÔŽº9é|sXš·×É—Ñ£hšºË÷JRQ‘¥®.ê…]•Ùé˜b¤{è1Š‡¤R$‰"WVA2‰‡œU‰:BTÌQYJZù*ÐDŒªœ›ÐôœªÆ»WWULG ›K1`D6—œ"a8dꌶV†¦JÈC¿sö3ùJ`duOm>Í-Ú ÇY¾¸c€k]»‘`¿€Ñ_È àuÑ‘Uû«DóH(ÞÕÜrmXÎØ™nhVZÕkc¦^ ^‘àö¯…܉ŒÚcÜ]S££dí¥+WƒÌEÂðÒ¹æÑR÷œLI¿J¬˜v÷-ßnó³åÙ&Ø4ö6ƒ™eh!õøöÔTqœ’u²2]¥iCÿe8Â)Hwôv×>Õ³ð‹0»Ñ<\Õ«!Îñì/ø2ÉYY"<õÉèÍBpS•5LJÐþýÀøÜ^]3øpbÑ÷Á=Ê “ß5whþ:`³E'¤ëMF$~6?[´iï³V¯/´ßÞmõªLâêš(ʬ›9©¯[@P·©O·»Ý[÷U'ÌlU5YCö;Gê»™lá7)±¶nIûÛ„\ ³2¡#ådh5Ä©Ðä À÷tþ¹dþƒ¤_õÔ¼C‘§zp#Ï ~¥èÕÌÒÙ}âUÍB`Çóôò+Ö^Aü:þîbÔ„œýíZU5[ˆ mæXh…úºèc=±ö|8‡MpPŒ×[ 3`-µ’ÏMžn$²giߘ…Ü~Î[úò¤MbroEeUܵçîÈËVÓ±«õƒÉ‘n¼Ù{‡µì¶w,ëûì‹O™¿Ql¤­ ÃèÉ̃ð/Ǹ`Så·Ò‡î~ùòKO¿û»X¸I«œ°öm¡£Ào ö ¸ugù«”%Þìçxáö\¾Ó OóSXˆ° Ã9! •“(¢Hb²É.î^v{yס±Zé¶^qAµêœ·_›Fjõõk#rëÑôN˜^ˆC/OÂì d>,ÝîZmÓlÍý$™ø£¸Z«Uï{þJ´è\¸XŠÎ¿­d-ì ŽÐµüþ¹ÿêÅ9tD:ÔCß·¶ £¿Ó_à'_Ù«LŸH4°ÉY¼ i S¯zvÞ÷x¤M„€@UZ0 s–ZˆpuprýKP>ÉoJ\X¡ÕsXÖð‘2°HKh0ez¡h§›¥úÊPÃ즒ȉì±Jšÿ¶¹{@¢D¢‚á œCô$k#Qšö@÷˜½o0ÙA XÙ^eÄ+ ÆGN{6X#€ŒÔ1Ϩò!¾rؼ@ Ǫ¦ß¡^Š·ÓK8ÔŠ¡Š5'õÞâ†2ˆ";ãJ9~µ|ÿš³Œãºêj>ëÞnÝ{¿‚¶dÜ›íÁƒŠVQ)¨áÈJΨ=g¹éÊœÓÒùõbk–êo%µx!ÅG õ+ìb«~Úùý{ªõ¢$ƒ†q4Tè&iÐo¶NØ’œÈW³;ñèÜÚ¢pHCà(†ºù߸÷Ã\…ÖÞo´š_µ‡ ÷‡â‡«4±vÞ—jîsfM^„’cáäÜPÀ?<Øÿâ¸F“æà_ãQîÿñèánÿ{÷Ñøßÿ[ý?ýv×q¬æûßê?þ=ºý‡+É®$¶ÛJoÀÓ m;jŸµžÂ}yÜé´:§”:Æ2‡£}(¤ãnEYF åÓÖp œ¶ÉW0¾tç@ÊZymŠ‘™Î“+†³ex¼dd «©ápÎÔ2‰âûªÄÙú`Ž"ö=XY BìŹ˜kÐs„÷Á,™6í°Z Y}Ñê·Ó>¦§û²f㤪ÉC€ LIyëL‹3 *!²€¢ô‡%ɳÞê\„žÌóB^$üõó#åVÛÑ°œi0 3ŒÜLØð¹Â£U•˜QšŸ-i.Æ™"P÷*Ä)Dpñ‚àq€–Õ=îÇ9DàF} ØXD¸ÁŒˆJ,1ʉA`uõR)Ú¼ e¶ˆÑmAÛ]U¹áÔ= ÕÖÓ]ì¶\2xq”@lŒD¤ Lº?ó¾Ö®˜ý¤s$¸¾˜÷‰fâù¹Ç_Yeõé@}®“¦a²)ÃÛËœO+ƒºýûál–Ì©Ö:éµ%ñ€ÆYo·ž·»~ïU»}AšBýÜ¥¸Ñ¥ÊÕ@Ž¬¿ˆ‘³¥,Èxò|ÂêVBR4c«ËáŒ@`„ùZåWÎnEóÙ{qÞíûÇOŸ#úŽd‘U:†J¬ý8Ï f5ÂT[˜ÚXU.Õj”Kö·Z)hdg¶öÀ¶XèùþÁZÑšà§zÖZß~õ.#ÿ~`òöžj‘h¾¥„Ò¥-n(ê¼Ã9M­ÍÕ˜¸ÊO•OtÂ.pçÓ­§½XØÈÅŠ“ÑÜ>|x«¦“ ½1ǯiNØ*dSê†I¼:â”%‡ƒ2 7³nz3jŸ”Z<ѼM*¿ ´&…̨ ¬úšÛÁ2#ô‘µhüB‘dnßžz{—Ùߺy‰xWHæ$½ 2]2«ïé„L–­Š7¯¡ì:;ÌÝrÒÇܘÍ>´¼µÅôtˆEÃlÓC{ŸògOÎ/~®ê­Z÷ÔO]j[½3UMWï’ªŒ`â­ÊVTbfÈ>V:]€O»°«í#eö‹lV5ÁJõ/ŸR:žxݘîÞÒsÛj(ÉMªψ•ùÏEærzü6Þ0C´–¹Œlð’“A0¢Ió" zټ諯ì^”º&o" ~YÏÄML}è\Ûop"7f«s:a£åø©ëùm‹Y2ú¼ÝoŸýTÝÈ~µQãdŒ''º>ÄÂÿ̘¨\uãD¦q–¥7PPŒ3ápÃíº}”–’³§ ¤* )õ¦7ÙoW Ò·³ú)Ðhq½a ýȲîEÍ°iìpqÂÙ]†º&™œÔFy£«‚ yâúñ / èÎ]Š!sÂò6]iÝÚœã€zR%<:)ðÍ2FЃWp2±w©˜q"ä¦ÎÕ‡è‘à£cĽj~â}+ØÖþùÓ¿ôìOÒ_j;ßq«0-Ï:¯OÛÓÆ4œÝS‹®ÉõJ|ïD‰§óÈ"£(5­§‡Ch^ašôÈHïíƒ-›¢ kÕE,KÉnÆǻѾaé/.„=I¢Š‡(X}AÂ[~LÂ:^›©iÃì’Þ/,Þ± Ââ[–T YC\ˆ¹›+αÀ+VWêÚô—U~›rç‘{—-¸mÓÉSKÏùM¢¹;]“wþÚÝþüo:Ž&üÜ®&΋™ëHáð#¸¬+FŠÀô ʽÙcÙoð#„Ñ%Sêp°¨®ÆL"êÐàQ+fú*4Õx•]%Ã;õÆTö‰÷•gaSTzÊk ɤÐRÜBlÄ¥UP„ˆQÆ9’]ž…vmÒ¯-±ÂÞùòŒùª¼Ú¼2µl‘ÜeR§Ðw=eYSyÞ9ÄY¯¡èA‘5]Ü(ÑSQ9ÜÂÄLˆ°Ïf‰¼  •ÁsñËbÕ£Q£¨vƒ9S‡ó{ˆyØÍEu“9ßé, ˆdI×þ±lö™¶tÆrC±*¥ÆÙ«_ðfÝ«­4U ø¢· lï}ÃIÑCFö­•éX¦ls(ÕÁLqy÷ËÞfw«lÖm;õïX‚®|~ ²buZ+Wþ,oúSád&_•ê¾úŠ’NõÞGSÂÙ÷Få*ŸÏÜ6´²l:KzípC†Ô~Lf¿Bîœo6ÿüÙ³^éž5\ˆÉ4~ìÓë®â¹Ñ0™ïÑ9¤HÌ6ƒ®áÃÖÁa»aÙý³ˆÑÒø;]@¿Ï ô¹·OùUrß»Á\Xÿ7ßq5üo!ìîñXûBûž£Å9ß?ŒÂ†2A>–y+帡DòdXAò‚ÖPlâ83æXIΩD3vö±Ã iwª`†¶Ø£AÜÒ¦ÒàfϱÒèûÀB«Cý{æuOµ'5R¿ci%_ÁGÓ¼¼Gèr´z”¾Á!ÑiVDŽÆ®T%šåië襷­&ª¦¬ôPWò¾ñ$yoæ9ˆß@VäýjÂRJVÖ%8<Ùk‡Þ raŽ‡&.P ¸ª5'ÓUÉK†p ;_èìeO Í㢒÷Þgþöõ¿‰}UÜ«-Y-ý~%»¼¦?¸Øÿq\¬9Âkܺk߸ú0}²l‡™KW©îŽ‰‡7Yuýj §¿cÜ-}è&6—n:¬nÖtEE–_t¼`ly>Õ6*@s­º'îÅ-"m´ÙSçÉ]Fçlݺ^áåamˆ)Îúòå5»ì¾,iÆÚ§OØ'Û~… ´çì„Ï„oH1Ô¬HFq•Â-ê뮦‚nhPguÆ'‰‚Bd=\œÜftqZ›“†$.ÀÝ%Þoâ ”^ŬºÍJ­Q¶\„âzØý0DZ”«ßtFI¾2,ðNŽbçì¨Û>mŸõ['Æ.3 'ɇ¹#D%’¸J3²W—<´_1-)ÿvÉ+€×¸ˆ?JX°¦4ôí”çºu¤‹uFãà:…æE«glÔ*º%-VÆó2ò Âög~–gUïQ“½ÊEÄJ@~d{‡z† ‰qAËÍYvo\]ïÊnd´wÖe»ÎlkŠ¢UÔûW÷E—:=ÿòìèüä¤}ÔÇE³H1ßµš2^cºVb%EŽ}¨]ûi}u½±°pT¹í\ÝáÉÄ Dïd«gÞÊhò Õr„ÒU4ÓÆIýNn\l»±ÌCÃPCEp.V!1ÆÞ8rìëEŒ£íÏ^A4. —15ÎvšüttM^f!búш¯^E'4Õ’hH”&DÌË\Z%—W"}e¶€È_â!=ß`¡*”…Ï@ÔÂõÀåxÃÊ|;.wê´*FÀß8LÀ¥¦þ°³¹`§Ó­7kv6ÜëÉåœ3P|Ãá‘\™#¤GJô~¥Äšë4¯çd;{”*(2›¬ˆæùÉŒ¦\v^ñ†3üÿ¾ÝbJCaŸÂRÓ"ŽJjú¯_o2âçäîZvš¡ÈÊ/MàîÓ˜ó!À`­ñ§µ¸s›`±¡Ùvuš“3!šf«2àSã$ÁÁkCz:Ue¼›\_¹=ÔzëLâ;pw}…çþóÈÚ$½°£4ÜöŠ+6ùKœ/W^c«$Oâ%Óap?— ²úŒ`‹TAÍ¢«Äçis¤ÿk 5Y¢öÉÎCž§I–N'×æJöyAýT4oJ)‡ ª¾(vÔ¤t²NŸPy»„•þ‹ >Ô’ "ÖAGiÞ]¿Ñjä]ãb­¥ŠÓn„Ã:Dýù¼VjOÄOÇÑ$Ò_>뜵N´_xÕØÔ²±T …í˾rúGƒÕ¡Ÿ*¥×=H-¼stÙ ‚=‰èÆ©81Ÿ8fµŠÉí’rD4Çä0˜E”_G/‰ÄFádà¢`lúÓ$ZãƒÂ²½I&ÙrÍ`3?—±=;àë'Ú¥ãSÙX‡Mƒ¿2]!Wz`Ù…ôþ@oo·*Æí%FA5UÛ£,Lá bÙ’vÑPÂåj¦¼öZ±;χÑ‚CùkU>ýÊã¿ÉŸAìXHD1¶Ïî§Ü æFÈT¬ƒ@z<Èؘò‘CVѪe"ˆÌ†Ö;¤`gkÍÞÊ©-¨/_a¶Wï–x9ÿðaYßo›i”µ°&³²þ¨òÈN¦³_eÕ>9È+Ù0$ý‡`1‡F·pF·†®—)Š"Ö¥ÒÃ;ÙÎYpëOÓr­«³cíÀ2Ý»ueyÛÓl|¤ÊZcž³>–#bN—V™×¨'vXßÒÓU¬ÑF†F)·s€£êÆ.êôÿ_Ò ÆËé©ê^¦Sù1èÒÒlݳ~¡®—Ù^³}ú-ý)i“çrJD­h5k¼WÄ$m<± <+UùÍÈ¡ó¥÷ÿØÈûhFR ÊãjËò3x@ŸŠŠ ™(Þ\w§ôÃ8%¨ $l§ÝC¼¯ïÆxÿëû‡‹xЬÕ72ÓµA[?¢úž;ܺõ8{° ÊË’ZlfÇanùÀž6ýÙ_§ó牯ÅÉ´ZDêâPó%×gâ”Ô¹ì¡÷ŸãE,ýŽû¥R²3 W¯V2‚õJYÃÒ¡GcÂ0ÏÀ‘üJ<¾#?)wI¢¦õÅ[–7´æëp4죻ôËM–B™]VØ‚•·ð¹mX^¼±ÍïÅ|CB%^ì^ˆuf™‚ ØE¿[…µ|€-ÆÿC ¹ä?§Þ›ÿ¾{ ¿¬­†8‹kw\÷Üfd¨Ê¥Ô¼ü”¹l¡É²²±û¨XʨƒkYÁþÉȱ7¡•pj"ÍŸ¨©òH↖#þÉ”Á ¯o¤ó;+Ë"[º±ÁÜ-«»†A|=ÆÚ6èÐDÓy2Û0àîdsãä7áxJëJ©OŠkÁzÉÈ›ñWpfÒª¶!OÕ5Ðͨ²€.[¼K·B›]„_9þ“ü÷—U½ŠTÀ,²S{Æ¿íBœC²=…ÔÀæQÚsuAlÌ‹82±bÚ¦R&“a ÎuÆúrŠDE'¡É E4 àrÍø»©©#o%íµÂ…DÓ<ËbÊZ‘ãJQ»*4ƒ““cÚH’Eq ¶6’)‰GÕvn)_ãt1§¤Pá¤é`gäô"Özætúv×––¤¦Ð95,·l"DDñˆÑo?0[%ynð‡KœÔæL,™¦ë®íÖŃh>ÁÑ2à)6)&·˜F»nç×J$ªUÚ±³?« ^©N’cFè VÑ>æ ;,?TÐ-2D “w]4Š`.æîŠ"FËg!§å'«O‹gJœ¥—_¶k^µ‚~¥™“ÞmN-—,7Åð䄇‡(<¶…1k’ÝÝv¹µö)OÀ«pž®™âUëXž'Äã`_JXuç˜ØF­k&ØäZQY¨È 9§S)p:2ƪ29¦à>ª•y/Ù"MþZ^éÞ˜þòÎÖ¨P…tµª”íL㬙\¾Mg{aqËïAÅa€"›îòÖÖBw1Û²çš*÷21«ÃïÞŸP1wƒ“d¹ç®Ðk¤ìÌËÀoƒh.”ŽœıˆÃC®ÐûŽÉ=V¨i„Šw¨UC”ª5>MàÊæÔ~!^€„ݦ®¸YH4 cò$Ò´3™IXŠº×¦Õ»oø˜:Éu5Ô±N”@ŽÒ_2jbŽSͳÑLX°â¯r.Zë,‡×Ö;õ –s,Þƒ#ís_æ«(fƒ,µ*÷,¥šëROGJ²¨Â?ÿ¹ÌýPû«“m£Üó²ƒ4KªnÃ- ¡”0—,ÜkurC+q½TUPråy² ž›¢>uæ£"WµG,ŒèœÏ"ÒBNÅd™ÛÕ=½˜Ö[´œëß :±ü Û.ƒêk:ગ½JÒÐ'×Zõx¥¨§`l\EùY×kòÇÞ$ i‰úÑþwÚ£æ‘~öÌô¡nÑKz*4–á-¤1>1V@òûp•‰«C]—-—Ý'XÌ“coÊ0Œ^×B òçEÜ¿¾]diU•âðùΖÖ˜‰Qä¼Ï¸Üî5è:¤à¥:‹~& ˆ'%3ì,”Q(T«­O”Ëð¹'E:7Ç@xã$Ðè—ƒÔ8šˆ{%V«K·Øv ׸ñwSuZ_¾¿fUÖVtbè>UÊRµ/Ù™~Çá¬Z¹¯Ri鱩߻ºÜ!sŽEñ| 0uÅVEuüç'Ç>ÃõÒÔ€€N:Ô§žX­À ç`/S¡.?áÚJOÀÍŸþH«ôï“ÿ)`¼þ¸9ùú¿6ÿÓÞ7îËùŸöww¿Ù}ˆùŸ¾Ý{øGþ§ÿŠtFí¡,æÉ$ wZÔ¡Ýy²'¼½æÞ7^c»áµà `ðFøšY¬¤KG’ºiwïk\CzÉh~‹ŠkŠ§ôu¯šX’ˆrqø?OåóR•ÕEÑ›;¥p§I„Ýž:ùŠ(=RwÐwÇ$)Âó¬g„*9§Ò™0AˆBç üIÒ¹d#¢TK:×”ê¼d_·¦¡ò.Á¼êÚþs¡ –â4F‹1v#10‘ÔùeŸRC© RuÎéñœÇ6Ÿ³ú8¸=P]G³ÄÉkO¦œÀLñü…âÓv÷èÔØzÚ9éôÆA?ëôÏÚ½ž÷ì¼ëµ üE« ¼ßåI«ë]\v/@,‡ÁM¾öY¦¯¾i‰DŽºçÀ‘v{ïêÞøÞ/âê¿uZüÉ»šù¨¬šÂÂÕÍ?×ÞÁÿeúѺìŸã·þOín¯s~öïfì®v¹h½>Ú|à–ƒª‡ñ˜k¯rã‡z³ß|ôý»z½‚ ˆ ³úf®wî-ìsz(—:X²Yù9Y°€Ä즣réO9*˜Ñ4Æ1:’—èzP&-’™›•ÎˆLT!l>¸¶'°gñ–Žù3àU—ØKˆPé]:'T YéS°PšÔÉ_DCè’Ô0,02’7½ÃÜiר𺛠uØÂþ£/I<ÚjÒŠU`b½éûk¸A€ñ= ³„"W$0jÙóhŒvrø =•F)²r„+‚Ó!åÙóªæëÆnsÿûæ^ ¿ ¯ ýùÿ¥{ë ’ùÜûK€q Ýp£-ò‡þ9ç)”ysLž4‹Êïí#ùúÆ;bï,Ü$ãë‡áUÜ$åÒŸ¯'A4¦òº YZ¡eÊ8< b¤(gW£Šà!96zs8÷Ú¶Hñ'´¨cïbq5ŽÞ Ð¥8¥(•)>¡tW\Ñ2òy lj'î«F¤F´9R-U¶lϼdŠk¤Abs¾”m–ÎÁ=é!îyª§ˆ"jŠ·”ÞQñU4¯ˆâQ¢g™dª¤d¢G´X8<‡=šÁã!—X*:š¨ä… aØè.Z¹ˆTK@¤ñ2³y€bдgÑ{ÇÖ½o¾÷ú!2yã`€ ž½VñðánÝ{š¤süô´E¥w÷÷öö{w¿­{—½–\‹T|œˆî¤AH›Au£|Luì7lªÄÚù†xâÎE"’B½w J¥ ¨4ý§‘ôØáÊ"»@¢ñ0ÄP¥åSgJŸ ‚üÖý¡¡ÐIÓŽ Ykeäå xJ7›Lë.^>÷/ºínûÿTO;g ¹8ˆ8yâô®‡N"=¤ezžrGY%ï¡uQÖ$†G„u@IšRî›Õ…¦wI±àÒÃsøüÂwm]2øQ\(gæ€!϶R¦Aq:ç`@«¦qÉn•r6M¬@¡Š¸^h?VË…šjµœ¡E>¸™ØQ…ÇOùÈa˜DKXk^çÀü`8|Le,þÀ¬°øÿá•=ix ÜÁ‚pidöLâxÚGItݳELÞ³êzÞÁ_ ûtÅ©+š±AK¹Àg”O7Ž€`ïÕ~‚Ó’B‰[\f’°YQüZ²â4+†}rF'¼L¿ Æ©g3=|C* Yi‘|;a×Tóå Øæ2<=ÖyX“'«¨¶ÃæÎB/¨dõÔá!±-ïòU¿ñÈ)‹fX/ëÔاÈÙ£Õ7Öf~·ô@•ž­½GÖj3Xuª­0Gk<2&è;‹ïL¼0 h)™'T » È‘ ó›¦w¤NCþèZMQA>c©>¸î¡þÎú['§Dâ‹æ•:Œêûæ.<§j(8Uev ÐÔˆs/UØÀ2IÐ/ZЈFa0‡“–ª;Óêbøè"J8À·Ÿ]ž©Íç,ŽìB;†Ìú0«WÑ°úæÿú?â7oZ¿úï¾Úä ¨>¨î[øÆZb¿zÑê¿øçIç)°ýÿìýÜ랟÷Qø'¦HåÓ~ûÔ¯=;i=ïáw½Z­öãÊŠýª‚ã¼<ëœõúèòuüÏþù…ÿô²srL-PÀ€ß»h¿ªa}ÈýwŸû?µº<`5Nï .0¹1˜I"v~WZÌÇaaYFXMfÇoárkB—Þ˜ØJy}øaüÁZM Ú@ÓÉÆGü퀱ÿ}Áqøýóó“ܤèf¡þQ¤[hÄÞƦùT×åCÅŠ2 ãyé-ØØP¶{Úƒ^´^vΞW­Æœs£ÉQ¶r¬:dõ(G0§R øVäˆÒòªÓª'Ývïò¤_}s¦X5…[æ^Æ ¾û“iópc£ò'˜šQôæR!›ò9‡É@²ß~Ýéõ{ÕÓóc´‹‘ ÛZÐèVLɇ` |ÍæC|(ñËðuk)E‚ÃMì MÇG秧-> ²ƒ>g÷S‰N̨ [°R3šw—²z¢Àæ „Y@NV]Ÿ>‚-!¤œN]Dºâãˆ_ËÜ¡Î ÀÜé™ó¨R ÔoÞmîÒ» {~/#³X.GGh’‹­XoìFþæ.0<Û‡FnxûOv€Ã߉ãñ߀ÂqQuŸü(Ç.í3‡@,=hW¾ã¾Á¸wµn½ZÄ “…à ÍÌÑJzÀÉŽÛÝîy·ç÷./.àÏöñª]à®ùÀ&h‘륋)†¤ qª)9vK:±Ö ¬Ü㊆~×ZcüG—õMR}úÒcžáŠƒ˜µìã8)šî’Ù­”Ðou8ÀÕ?ë¼®{Kn/Ïþew˜{}}ÝÜÕ×ÅY2Wú§‘øÔ“ûxOgQv"Àe7–Px¼«nnĬw0x:*æBi!÷àfGƒH×^Äà¥CZ7ûæ)$øŠø­Kñmö¸®7>sÖDR ¹;Bp,CQis¯^Ìl–T‡:V†±X÷©¨bÑØ9«ÀkÁ¹2CP{ø\6µ‚OM÷®Ìg9òÜo¿î5&*1>N­R+)1xèh–Ä$óVesïÍ;éRï úÛ%þŸ|‹õWѬ(­‚£ì‰Ñã³@ýhóö›Ö-tè0ô¢UÕ¤aÉi·Ü¼¸%tÄiôOª$ [ຳ— U¥˜‡ /ÑhðzÂ/¸^píã]ôåÞßÜ,Gk7vßÚwÿÓïBÒ·Ç@™ïøð&ašâ‚hæ°9N®EÐŽíC=n ’Âà&¡‹Ýé׆÷äËVÏ?m÷zh¬æÊ”õO·ôµ¯pݨXµòæ‚-0JßBÀ•^us¿æ݆Æ< ç+hÑj¯R9Jâ4B«B0Ä8g þp$èîh¥Â5JAeÖ`D¦8‰ð&bàÄtçècSN)£ß,jNaã.Æݲr÷Û×\±ŒU:OÏZ“K •7}÷‰¾x@´§é*%NB ,táNÆtªÃå¢y…s%¦ùIfE:¢ÂYÝ8¢ïUò {†*h†»†jm +²#?ÜÌçÓÇ;;V14+ Ãôý<™6“ÙõΓfáü¢xjÑ¡ÃM‹Í3ÔéOš4e?ÀgºÆbxóa\ëÜIe¬‚ÏÞ†ÿ£8†UŠyÑî‘f—ôc(¢}]x$ôŒÍ—R$/Û[™¾ ˜ÇÆLÆ$j3 H!$îÙh}‚2™ùUâÔ<ŠX±‘Ë~LŒ|Šä¬ù¯`ydåÖå|Ä– ¸Ÿ{q>ŽÍ¹Ÿæ2öG:¶6ä§ b[O­{¢b+p2—-àF%Ïýnþ¹f—ÛÌ6°ô Hï­ó"*Ëã°UðŸöQÿ¼ûóªžÙ¼ßÍ÷â Hþ\=¥ÅŒa4co—íôFkˆ&‡70¯p¥9=/mzO1í g6 ‰ôNi¬7a{ÂÃݸ‚8u9AzÜñ5Ûö¦'%À ô„4)}/Ú­¨„p—¡ö®Å* <~ {¤,±³®Êp–ÝWfê•Š{‘Þ I¤ôÐø¿ØúË­Í_ylŸÌඔK¦¾PU)¶[ÅÉóËË`æïÏ?<þó;«oþüøÉŸÆ­æT»¨ªXí“ Øf]⥠溟éW =^¨8~ìÛÚ½ ö{—O{ýlãÀ]çŠÊ\$ÓÜŒ¼0sd[ÌYæì¼Õ=zñyçæ³Oœ ŽÝ_ç±±’NRöa(†S„jç¥ÇŠè%GËÛD§ßµÎ“ÖÜٺ׹’¥}ÄÓàl§òã•[¨Ï9e2ÔßxÌrÿ[Î]Á$¬8~…%VœÂ‚Wz ¾5g²èåo?š¹Åͱ€¨(P¬‹bøêß‘ ý‚ ýËŒ™ƒnŒÝåú˜aç…>þÊ’Ì°Â|¸‹¹Øç*h`к#›Y“²¿\“’ÕzPÜçÃw¨ ~³¡u°9¡)øüâgõ±ˆïÞ°¾E¾èkM®‚Q‘³¹Ë~³ÐÝÎY§¯ûLõÔšÊËÑÏ—AÙÞÅëî ÜÊ ¿p?Ьᠴ­vÎ|`éºK;Oåè’î~­5¼)eV暀´U´ë°’²K’©PŸ¨Š/uÍ^Ãgq9/½vß?ºìvÛgýÜ⯚š #\’²Sôœb¢Ã;%mÐÄõ„!Ò§(°Èìh˜Y僚ù—„®âÀ{Î8¥ÿË\Þ ·árø¯Ñ3’Äñì{7É-ù˜/ØÊ üc8Û¥,ÝÍê¸öþmnºö[=gS»;H¾ÀÍòÀ–§oCuâ”»¾e³A0ÎûÌË;2C¢¹tèÁºŽ`MÙ€»ùëÑQ«÷UÎ?mxŽØøìpóèÈùˆôQE_Š’QÔŠ6ƒoßÕ…Šê}b:.“x>«2Dr’::ªe¡t#¸» ªaE›[ }á–ï<óÏ/útÒ⤡XþP9`°9å¸}Ñ>;nŸuÚ=é¸CÀéà¼FÏ1¿ýú¢uv¼v<èûßìÿgäÉ“0êÄ‚î$ó‹Ö¾Qõ¤Á^Ãë}ׂÅG%LèïÖf: È ŸoaM¬`p¥º8ÚÎ> T‰­º)ÜlnšõŸñ\ŸÐf0COvÍ-‘#ñMû`~J @gÄÜóDʼn®ëØ»TsbÐýh Vj“p4t,Y#P[+Ýñª˜óknÉ7Ùž˜îÛp<®©KLÂ:‚«4ãÚ%ö7& &."o|L‰‰Šk +yñ.b ÓÖm>Çý'È-ÖÙËÁôæ„)˜:ù,âEÊ6#à W–óãcå-;O¦PG “:°4uŠ+!¬_Š ¡LÈ9H$T¶:šY52òr$ƒj*flåB•Ú¼”VowhÓÇ×œÛ íO);¨ K«ØMÞ¡òÜ/9=sóX7b#ÉöYÑN¾µXõ{uMo?‘QŠ©>Y¬Œ™«=! ”é*5cr¤¥¦e/ð4Ã".Ê©ˆb®àÀ‰Ñ•I²kù4˜à©!kÍÝT™ì);±=Ée6cvX•ÄOm|øj Ϧ$À‹É”‚C³ä=6²K>Tw:FjÇL~ê,¨®Ñô¼MÙˆRÚ@‚ÿLµ§âªe­²äˆqfÑ”§2 耩QÐâY…鄘΋%œõ„#y¸õv³jÚ­ílý-ü8ÁlêØðÃßÒ±í·ÕæöÛÚÆßpMXˆ±OÜ‚°õ›§^Áу””?7ÞnþÚ{Ñ>9ùœdG¸¡®s(-B¯ªu{·jºRWË 5-b8àóELi=g”$¿"²ePÜ…ãt EÍÔ‚Á”HJåvQ'”.`”xBߌæaÌ.ò^V¯p¢xõ aüeÞ£´¥7œ¥£Ó’ NÚUt3SXKMÉ^0Á4Ôì­`Oô¦Ä-+ÀpÜ^˜ÈKŽ_úS¤r©ÆÒ ìñÀ(ðÒgâ7I0ìLÝÓœ©#§àÎHê6K“ÕRå®f,Ùº<é3côÀk— Ñíu³bíï¿ †™ÍŒnƒ·Ã¿> Ú<î ·Ö:¹îÆZ¡éßþÛÈÖ,VÏZ§íºG½¡Ÿ×VËÕZº>f2‚ÁŒ>*#÷ZíÉ>’°¸7ûÍoöyÇxŽ¢ÓP:°ô+›»È)|ÆÑÐ4õ˜\¿Œ«'˜%‘w×(®Ô«¢ßÜó©ýüc®W‹ËôÂ?;ï+ÝŽU®ø½UAF‚s"ÍÉeÛç1lîkOìÍ}íù"mò¯TÝáÖƒ-åÒ©^ã#ë Ã0'V<¤{¸ UËÑø礆OtøÜçT×'ãPì¸ ½ycÃΡ³7…¿3Û+1zÍÊ%_’žš7úžüía(«¬HÖ|Gá$ïDé;¾ßÿ;_æÑä¢ ¼Qx‹œò3s¢ z—ÝoÂ1;¢{[FºßB3ß ÆoSDÒE€g­½CîHDš:sS3a]ŒZ™G„Î7˜;%° d¾½m¸ó¶ëŠÝû“¿„JÔÆa<.¢r¥Æ…$óPÑØ8§ÌõNAœBèY 2 9B1}tä…óASÉ觅«[çfƒ”‘æáê1Ó€7s³Éšñ‘$–S@dÃ5]”ýT4 ¨~¿;­E¸c/r„D„bX/.èÆÑÑFþûú5þ8ú—#õ“Ÿ\^àèòÆsx…%_¡òN|nâè œîx(| †¨$$Î"âb|=%;«âƒxëŒ$Â…š»\F1ƒ]6MX´æIjIà–ØDÞ¼ì§Ê§5?GGµÃm2Ì…7ˆf ¤ENœ%Þ.l-Óa’deø¥PAC²nQé¸qR~„­@ÙÕôÝqÈÏt.Çΰr>Aó"üöëóËþÅeßTò³&£…Ÿ“·svtryÜ.ü*BÛ:z)¶9çú;:"Õؘ¢Áàpc6 ‹j·Öâ¡1CH±×¯éÒÔÅ`?­Q wE$J1Ú‘ùb[׃ÁCþ³UT5íTߣØõNçñ¬ÑùçGqŠÁßEÅ ÚÍÄ»¨ ðæ*j·FüñQëèE›M™Õ7Ö9—TNpWS=ùFÐÊ5øw»oëM#ó»iè„ýà­Û:åmrÙ¶®ã2ɬ ›ëøÎK¡4Œ\ž`ßJ’f“åe]ôÀ£$ST TDà*¹^¤b¤Cy«hÇûh_p…—6ÀWü,Déª~–̨ò™ 0¹9Ý윆Ï0V'õÅEãò5ÛÉì|Wo¸˜LîøÎŽ„ Ý:Þú¬5[SxÀ×ÄÆTœ[ ƒð«tÆ;Jêy³‰×˜H>›¨°ð¼É{œ­ÌCæ1<™g"¯<«ªÑÄžÄ[š2·EäPynÍBªF¤5£v1 >„°œºë™íÆ`˜ïØ+¹RE£¡rÉàj[›‹UAŽrH‰Ü4'sJFré0œs–6D¦5uÖîržF¤£UëJu–§?[<úãԅΑ¹ÖaY°z^ ·sªê°2‡£v É…*<jx°>íT;-9c¤Jè“v3\†¥þ9UL¯ÀSG58‹Â¦¡×8¹‡öZ1Ñ´¢AÃȆŒ—'1CmA#öÞl¥;ÿ÷ÁöÛê› ñK«ñ×ÝÆ÷ï¶ßÖj›;o÷v¦[ï¼¼æŽl Iæžjóq„ÖÝ`|8 X@s ðsö½ÂNCÄåmµ‚_`><æö[¯>@oíßj™yÙ; Û0 Åã;è_ÕF­"¨P%îI¬27Ó@¦¨ 2jóÅÏ+‰ÇÜñÎÒŠ(öPu¥Ri`c (0A³kçd0¦x‚J©ñb{ßízUjæm¸©ä6´ý%7I‚L¶¦-4f¿>Ž»J-ŽœN“+‘ª^…”×8sòBX¢Õc7b]¹j6uÜIEè)Ä A4nVøN˜áDz‘ÂJ®R yÖ&¹1朗N±0ÅÎÞVü½à…^«óÚ2Er¡ÇÞ¼Ó…7IÙlXÅ Àbm:ƒËÐsSƒçØoÿ‰þ$œÍ@LR_]ƒÄ‘%éÙ?ñ슾Ü[RüÑg×3w‚›¿¢î ‚Ü'¯‘¢¼Çô>Wȉú~æÉ2n¸`à#1Bi-Fö{ N˜”&Qš.B•|Éò àdòUU$âÛxE®58l#åšqÚYÃv§Â_uUt R´yª$ ²c Yc ÓE… 7uÉW„ G:¡ÆéE†÷ms—n”o›{tàÇÃE:¾{¬ zøécÞ ·¢†ø˜Û%7î \T[h_ÆŽ@M5b™E^Pb ®‘§:<Æ}×Ü]Þ2Oäc«½‹-wÈV>šÑ­L·q„• ‡xÇ 'ÉÏî[ŠßhþvGßGÿŽ¾Öy`¢ û™Ì6i6Y nH‘7 Uºò‹ÇMÛ7â*!„3IïÃ¥álÎj7ÔBOsÅ¢êv:¶PšÌaˆÎÀ‚¡ –wz*:9Å,_2ùÆ?òÏxa+R±^±ãSMüâ›Lyã?îFcK€lÝ3yÎÎp’:gíwµ¢o8V°÷nmé ‰âHy^bižQ»TH²–mø’Dì9v.B¯~,ZÎB}¢±ßüf·V7¶ã«nkx† iFb@tŒ³²CÜ"…D¤fÑa"qÈô-ûôpà†Ä|+€®|¤31úÊïƒüBè[ê{ª ‘@ÌàŽžsè=™±¤bLªk„ŠYHèÝV :)Ñ+²*s')ÔHͪ\1fb]°NdÌ™MW•r¤Á„“ïÌ,™ê9çÎóp2ÖxΡý‘DkSvÕûÛ æàSTaNœ@›]²,oô^'¤+4åqಣÓU³(ÁT‡©Þ}EÁ­›….‡KÃÏóäD f‹ ¾±*I¢4íùoô«å”v ³ÛèlVU<‘ºNÍ3(Ø4©È‰O÷-±5'ãñBÉòèP’ˆ²Ñè47ØÝREP9¡Ù­o½«•èŽèsŽD@³Ò`?«H·1:BßYÑ5–Ë0k*ðJ naa­f泑ŽÕ=rƒö=^è«oH¬ ±Ä¿Q&¤pìD'Â:lýw×jSq< ~~N ^™¥B„| ¤MŒðûþÝ•®êpK¿Eå¢îÌÈ>ê›õÒÈýÏ¥òBü¥h®³dÉUÄÙÙŽ#òRYDé ±ù-f©‡³Û`gLöM¼•¿(충ætžŽîq§õüì¼û ÁФpf½7)xd~›4„²À­ßp”Pbw:k‰{²iaÙ+({_Ž nŽU(ÖšýN2ïdÞZ€%‚ãp+ïUu1ž'²^…Öä(2O'ÉÌ’@ïþ »’E#>¡ %PÞÀn$ïßÕ~aõ?"xòþ1ü^W€’IHuÉ EJÜ õQñ ¸ ú\¯ÁòܲºÓo‘Œ´µlN·òÝßR-bÐ"Öe7÷à_žýŸËó~ûØéÈƦüA8Ig¢š“‘áI.*oulcSþ ò?É,Ä Êoa×$}}ÀüÆ™§æn¥pèfîrhÁÜÿ̞ͅ—š\ðBè¶Nåý©/qžô?:9?Â/ïŠ4Ødû|bó[¦  ‹PI¹2˾ã;—¿ÃáÜ£‰íÖq»« ß­ gEßb³gç„2MDñHLö„Ù—£oY,Ê¿éw;å÷¬è*~]m¦Qæ1XÖ[ÄP&„¦¹@³¢hIQŠK#éV¯ò^óûæGŒ²@'Y”"Cµ¢¸ñX8Ö|=C±…Âi0âXA “ccó:^š0zh‚@³s3ŸŒwÔÔïPBÌÝow&é5ejnâë'¿©’½¯¥s2Éן2Â_U¦ oòŠq† nßksƒä¸%ÑWsN( i+jç~ëx=ôÁª±ŸFŠsÔ ¨hƒøè€øEVƒ9ùbȔ֫—KV))æR†,gLÍEcqìê ¡jûˆ}‘ü Ìù›‚²Óàc¾$>¤r*‡ûú÷ï8ÉîJ€á}ÏêÃ…ñ¬}Òkg$4l¡EE:àyoÊ„;Õ»B!¯¬NÍYÚ-òP.ë¼\Ú1)\Ö3,^Zíê¾q(NYçèí²Þéâ%Ýã Êk^¯ƒËæOÞ¯êäòYT•,«ß ðdUçœ.gþ1h%†ÐHøô;i‘­ –öëvûuŸäÊÊ& ¦[xÏð»-;4gŽà=½€¶»ò ¹9QUÈ) ôª\2nÑHBÓ>éäÜÂa0ÃÄ(PPg³,~H0©³ä0ËDVÐö<(r|QïEëGéƒøÙ†™fÌ~Þë¼fß±4˜‘Ñsj~Œ¤7eTÙ@¯ŸÑ†p˜ÆÁŠõ¤ç/”o0ÊÆ EðñEÐÇpÏ4]LØu £‹™¶âð>ˆ¦$A÷ êq}= ØKlN—Å©|Ld!2’ªå(% =Q™œâá #n(ì‚&¸•èh‡(0TÝfÞÕâúÁÞîwûß‘ŽŒãØÕŽnÝÞEa}ˆrP&Í î¨ a±h‡S`_’clk6Ù2I• ÍBûÿ‰¡u1“ÐIÖ’Іp ÀÄ'XN Æ—”Nh m¢¸H+ˆâ=ý2S¿ÍFʉŒ–QÄ<{¼'_î{?ü°çu«ržLÓ/*˜â|ævöô5£j±QÄUªN6OÃ¥hÓ©-+’5ËŽ@¨s¾gWÀéhŒ¶”—Ò…Æs ¶Í&³`vW˜Ç«Äãˆ2X8& N:©<àC…Ba ”LT\D…öú×à>*ÝÅcÍœT˜¬)ì´‡óQxÛœÞLŒ†‡ß|½ÿ¤R‘du󂺮j?ýYx'¡L¤eV¥.–9eC&ƒX%ñ7›xCÖÐXe&ÑÄdR7†sÏc[îó>«Ãv4!‹i!ç‚LæÐYÌ| ׃€N*v^×E,1ª7Høì†PwJ[<ƒ{TÀØhþ±èuÍbŽŠ9#!sGs«]›Ðë†Õudæo1Jäöu2m܈•m5„;(r ®•\^ë{Së€Iq™LëCA¢fZ3FùÞ‡¹W"‡Ãh4 )– AŒû Ââ 1ˆŒ$+Düçç/½*]¤Ô¢\: ‚q’L%W;9ʤCྦྷuqBCª¦zUÐ¥eužƒÐ¯À’^1Îé+‚iÛÛ©†)î“»ãKÛÍŠPR³ëÃÍ=ú•ZôÉ"žîUP9€Oùë‚òèO^ìÍç|K”fSê÷þ©}¼í)÷ 'æÆ<Îv„Û63½¯¼½¿Yþ~ä7Áîè,s—ÌtÃÞ“ŒÃ‡zñ®ö·ÙoÞeÛ)BÎù÷Ø5:»B®±?lÊeìc¬g†×Òýåýä3èiŽñ ¤_MÕ›‹îð›æŠxt4åR ›ëŸðãOÛ¼ÅL=6`ß–Ø'Ÿ4Ò›-írº¤lqÑ µ7»©¡– 6×ÃÍ•õ“Ë1Áéã ¢aÔ¹cñ!ÑiÕ‰@#D“ylÁ;í5ŽÏ{J¾+ˆØ°õˆ°%ä¦9‡ýf™í* l{¬mƒCzgÇØ!‡M+nÇyáãƘM +wí²V)µiZÀi踌IÜK€XP ŠQ‘ŽÖQñåþ>`›$ï/ÑÄ; ïB £úwö"$¢ÎYþW*†KaŒ56(xj=?šAžäåôòˆx>ðpCSÀ6æ½õ …!+…ö}Çz_aZPØâeߢ¾³ pÏÀ: ä›ØAÒ;à“çèÙ±%ul)6SŠÚ1ú”ˆð¡ ¤ÈmÆIUd²i/yµùvtôŽ—ÂËA–îgæR2ÂF>‘ÔÄ6OV³s+&{1µp(̤ú*ã·Ð Õ³µ*ÆìòëÒp(‚Á“Õ7é|L¶„E¬ñ¸tÔ$¹ýùËùŸ³s¤ ó‰{5±LTÄÅÚ{‹úÇ’…C,X\S[Îl–Ò½Æ^#v4Y¦ÆòTMï fðM£¸8ÑËÜǬœ-Æav@ÎŽ*^ŸìXFŒ,¡€„y«©´%° Ñ3Zecé•sÙkg—åP¸>ãe_½cóAïëönŽü/åÿ¬UryA7 j¦̪£sÇKtÒEpNaª†Þnf> gSÇ+ˆ>³A¥fnmñóAD?Ž@ÌÜ]ðØ=B½~ŒL÷ò –qsïQ¨/°þþlÚÜßød6Ìæ^M»ÏgjY¡?ÑYFÄ͈nu„£€±)é\ÂkŽ C†iK(f“)0½©3°­ÓK\$'« F²¾ ?EæΚ€õT6æz¹À"r/òJiã·it ò/¼Ý(ÈÀDÁÑ欙·ÁR3¹`÷l QF6\0û©8ŽŒ^lè F”6ÆxRoCü'°ÖæÐÙ°ö†K|Õê mÉË-ˆ²È˜+>z«©)LüŽ§¡ÁVâQ¨ð¨æY—VÐ Ÿ­³ç'mååµý:Ìï”ÅCÅ!þô§ÒÃÕX<Ì“ „øù7ÿWcZúïÈ1M)2îÑ˺ANsµØø%†¹°ÁŸ|ü`v|'€°lÁ#VL&Ž‚â7åÄîL'D¾‘9?Uädi!‹ÇЫÊÏe´SIñWœ‰1ƒ°‘†˜'yNÊ”"¼µc§ 9•÷º'ÝFë~0¸ñovA²+àäÌ|›OjöhŒ÷ÿ€}ÿ¬Å ɵKÎ÷‹†¢ô á73׆w×/I¹¨©Ý÷ì˜uçdÄÑŠ.Y'tù÷Ðÿß:‡Àƒlx]~ñàÉ Âž‡KüŽ!~™ ÌWhíd8QSŠ’œeBü8‚Œ`MÝÕ´Zú-·³ -é/NZÈ]ö^Tßé‡6Œ7:Æ)]Ô&¦ÐP )bÒáØÀœ¨×!+É*Ì^0ð~"þuÒZ2ûmB¿Q`®®ú†öžŽl ‚­QÔ­1öƒÜãðŽ÷ƒ&|– G‹ÓÏËCâªFûÎÄÝ£êˆÊk€[X°9 %,b丯™x/æ .HË*Õû;é-£M èeÍÌáa±Ðv™ø àU‡ÄÃɇÕŽÌ?Aß{xc` Â0>#‰~¶O›ð#ˆ)6* ‘^ô±ƒL¾kYŠ|ß㤒…:3gž§D$1ŽcƒÛðx ¿Ù€N›¹ê‰G4h™…’¤ìÈ‹D&u­¼Ö kf’š\„"Í#x+æãš! p`^PL„@Ÿaœndé4T„$z‘È‚Z…Û&Á|¿è¼C°~D€¥–‘˜pÖ˜Ù‚Éø¨ó•i?ížB.™ nš*¯d‚ë\“¥IuȬÁ÷ÈÅ:¹Îd>¬xŸÞ¹úì‰2"^Ïœ+ÀvÄCV+ˆÙšúp‚³Ÿíh¸öȵ¾Û‘s̸ºJW€øç.ã ÂÝ`dÀe!îÞÒè«$Èá¤Sè!Û@ʧ AD‚ .i‹\ÕYœ`R\©ìZV>JÀ7nU¶D£‹ñÛ¢šxóæíÛ·o¼Ý|ûåÛ­·¤÷Þ½ƒë{)/ïõì]M)nY¢2z.iï­÷öOËÛ”JÈú±IåkÚbL‘-¸_¶tR ö9d‡5¾ãäêJ¼7T. úŠrUé`S˜ÜÓ…hÜ'‚%†‰´p@NÚ\UP„ÙdÅï8¦Œ½A~î6Œà2B(éÔ\ñ°y=†„ëXÊb7ªá5ÔvÏBFkÏ~NÙb¿÷€àŠ•å¢FŠqÒP£«Тt F8áÖæœOÖæ×¼Œ_Pq,÷˜”Mºe\ Ž¢5w .ø×ÞßÆÀXŸÌM¢R=in!W¥^qaÈ7ßl¿#-þk¥†úÓ\a4ÄÅÄí׬üÉjq¥ Jži á ^{¹:Ü*6Ê ÁZÝ¡å»"£ÀatF^, ›)’#Ö5«$‰´(×mìS 1„>û”‡kˆFuN¨ DuO¼+|›Ü¢Óv9ÇÝ Mº–ÕU{Á8 R f‘.Õ*AÒÉ6DzÜòYí-0ÙªŠ¬Ø°ç0htŒEçÕ $€°RîÉæÃÊ‚9`bí$wþùO~½)ç þÃÛwDÿXUúÀûËÂAó‚#N½=m×1§e#bIðu­bä„ó÷Tùc¥_ÍPFôf¿Ñl¨oâ„`5%ˆ­ËS Ý¾¨0÷`Ř E¼g¥kÆTĶwm$å3Gã¬sÖc” UlÄCy"¢‘r¢Û˜s™ÜAãçŒýÌ —èV.,jÈŸFÃC$b ‚-d(N¶2 Y†OXUëâÕ¼/Yr5õn~±,g&‹úî-OŒVQÿ©Û<éú°ó^Ô^w1K‡ºy'OÐïÉ~‚Ò.¡@³ìÆc…wD¼[u5ŽžÞ¤™•Ä½GŒ±÷™MW"Ø|ÿïÃZѤÚun…¾Õ›ìÐD^G ¼_!ø³äîs`®yå¯D±L‰'-àEO0èdWT÷6âd‡N¦ó;ùB^Ö²®¡v4l;;E'Ôyƒ:µh¶û=¾*¢x Ta-“Ç‚^óÓáÞFmbv¾öu*ÞÝ0±ÀÌT B5W糃Pä?ÿçã?{Õ*6 S[côqšn„ùxzÞ6þp—íéqRò~Oùø—¼wò8Þñ¬î¾c#bG5<åóŸ#7¨ 3/4¯›uï,‰{'{Þ£Ëú,ü8ïÍÃi*¨r…ºSÂ`¥{RÆËÉÅ}ÿýþwT-‡­î?ü–ÈkÞÍ&›ùPëK•'„vkÎôA0EaŠŸúò©Ï_úÙ/Q!ØóÛG/ΫoÞl|àfõi«»Yý©V«À/»’Ý ~Ý£aØ\ŽÇÏf‹ÕrŽ=[ïÞÕ0|C»o€¨[z=¬Ñcº¾DË?Þzd«7×(ä¹B\FÎgµµùÓ–@†ët 'h‹y’Ôët;¯I Ðd?»Ÿù=ÿ¥·->-ÚÆ5QšÊn}“­ªø#Ç'+Óà19xýÎþ^׸¤\ö›ÂòªGº ß)´\}ö£?‚kr`7e·$Ú<ãPeŸÁ|¤Ï¼-q^Ý’¼3ÏÏ.kìµPð3 9[ˆ ÀîÁ ç¢B=ÈxJˆèWQ G(L­ðJ‘¤‚Úç8¡à dÕgIš6XŒ,¡!­Kð›V¡DM-0ŽÎùû#*%÷Ä%)‚ËëN°ây¾ˆ7$ŒŠ«aÊM£ÀíѬá#‡3ÄÐÞ÷ß}§Î‰:^Qª½«‰ Œ¢á°‘㿆ãaÚ´³jµypE@íû{À‡èÎÙdŒâeçX¹hxÏ;ǘŽ3ìÕº•Ü1äSê!” bž°Sƈÿ~ Kõì@yd(3Ú‡ï~ýP×¥µ¿ùî»ZÓ›ûè/¢ááþî÷ßî}³Ÿîÿ_èqCéÓÕ7רµ5ß;é7Õ`6±'F¶VÉrQò¶¸m+Á6:Á˜ñ²s­CƒñÆ'XÝ«©€ij#Ú’ÆüØŠ0##‚oèjÐMƒ [ETÉÀsŒ#ÜnªB§0tV×SªÄýC U*ÎY(ÑIIlÏ#Îáßà«ÆMdÅ“ä 3]«®Ë>*µnãîÀGŒ–m ¥ìíWÙ®:ºÔÖƒ,°ÕqèYKè[rŠkþ—qâÊH éôKCb•ÛJC\:¼çjxן5¼ëÌð®?xËFW28¡3„ÊôÅPA_¾”D±ö8LIöºßܳ)0zà=‡MŒ* ÓÆŽg7Êá‡%O x ‰“H‡ n%âܲˢ:øÅÅMR-¡Å’ø\SÜ-sÔ›{r(äEùâÁ‡þæ^cS¿þTEõ„\0ôkm 7H1ò§ §KF-‰®& Ðü!·Ð5üÇJ ä¹nªŒb‡k X;ãêЬ°º‹6¬r¼ˆ®>ZÀ`§I}TØâ ¼ÝеeÝZn½þo®¸ ^¾­ŠñFÜpóY«;Ù$)"Ï‹ô}4¥ø2xõXâ‡tBz¥ ×UoÉŃö¬®­b¹Øâ®HfÕ™þ\Ý‚DLš#À’2öò)u¾*úŠx…ÌÌkÙf‘miœÀDâ‰lÜ.m<ÿmyèÛY¦Èåz@, iÖkLg°~Þ?™›jÀÿ¿ öNò’¢÷*)ýãO"õÉp« )z¦§lAÈô!û«·ŸÚ9Õ%ëXgd4„|eb—8Zm€¤2Y£(aÄ׳ðº¤áŠa€t«HéšV84çiÖ§ C¤x±Ã5œ£Ë5¬¤n ‚¨‚ÓNk(JÕL0„“{Læ2< mtlÑ^?6]1Êþ‡@qf›j!<“Ñøñ¥Ó6ôÔ³K9—«CYÍÿPÐŒû1F—祿$¿|î«"zQîDž™èçÈäö“ õºkO0öÙ‡‡ú6zW„ï„®x76˜çÂ}¶`Á¨DÝÕ°lÄQÆUà&v®>l]Åßœ|-‰0¬OÆÑö°øÝ\…7¿M×Á¬äÝÒ6çÿJîÁïÿãëý»4¾m>jîîœõý^¿ÕïùýÝvë¸G só›ÛÀä}?÷¾ýæ¡ý“_=üö?öö¿ýž>ÜýæÑìî=ÜÝÛÿïÕDÊ`ôÏÿ%ÿ˜´©È˾‚k:¹M½³>ú#87°]§Ú’Ñ\‡­4%²x#æ”#É0áþpåÚ ©;‰~ u6ò Ú€Íuïz@To'gáújV*§?ûG—‡¯¿{TÁŸ›U~P«|¡P~ˆç·Qüp¿ ­>A=Ò©ëß ”Ç b03pzFÑGÔp*»÷ÓÑW_íïî~ÙˆpŽà`6Ž@ÔÈÇt³s‚±@rº1iòQCÏÐב@îš•fïòÙ³Îëvï±õ«×L®þ}›Ná?¤`Ÿ'“hà'ÓT™¶Ø¥¯rA‡£±2ÔU6™ÚHY-7Lnò­•ßφí”Ümµ.f)dd€5`{Ü"ÆÄ2ÄÓP=­‰pÚ–&)/ÕîP0Ø`·6¶ ÿwî÷º˜€©{ èQ盧¾ðú`³j¾†;ëüé_z‡¤%ÐìÁ°AV˜Ðïðtps5~OL¢”¿˜`,ì0œÒIª³÷þlžÒjFÔ þøêï ³ó×Wc˜Š1ÜÒøð¬d]¥?âðÖ×­¯®ýɘÅã_ôÓåt¾¸ºJf1¸‹}¦?æwÓ¡.1ÏüÁÍ€ë…붉UÓGú6‚‰©‚!wžôÊo'é‡}áZéµO‰y|ÝJ~},ç­~DVf6|; éw|H-•J“J<®üi³:Ô<ø/kú #«Sú dît2ñ¯£Ž%&`s—Þ£}°sÖgìç‹súµÏŸ¡mÇ?>9á?äº?ø7Ÿ² ùPüü^´ºðkû®£îKøÛ?êÂMÕ>ºì¶¡LÑmµúmos»9ðvž%ð“ÆÝ”™ü6ž¥ýa`³ŠÇ Æ‰-ÞÒâxôÍ[¡>€¸ûv þÚ¼)zs3„ýnÞ\ ?gÝÂÐI8-~5¥Cd×îçŸ áˆÒáÍW¡7ðM¥=*ñØ“QWþy;§À#wÎÚ£‡ß=òv’Åü1§?c p2‹®ñ´ÂÅåõŽ_²³|öpßö¡‚ØŽ: 33ëqÕ•Â*G:—£wGŠ"{´‹®BÓéÔ<æT øœôðñ  N•JHMz7™†D4ÉîÓOáb@XÔÏ/;è?Vö=Á<˜†1ÞnØ Ñaî0 4UºkŒ¥“ìÞ†ŒG•\oXž2(™Xy8B±3Qš 2dQŒ´Œ«‰çcMàРäí,Äõ"’ãÔ€›aðþñþ£ý½¯¿±– 6³¢4ÖLS!˜k(£']O ˆÃD‘,xdQ¯JEÈ—kÎð48´ò§Á‡9ü4[G3ÞÎùeÿq¦‚\ynû;dÚï<¡sˆ¯­ÍúÓL¾`öÙ`ý&3¬0}\Pt6X¿>X²‘¼Ñ7X™™×%ÙÁ¶ÂæñÙp‡e”òW¶>¬š½1›ë6‘>ã®ÒAjfÿƒ÷U~.Ëg×Ë.“l“{ïŽG¿“­hß|ÿ}µ69Ru³?¶i#>s‰³þþ÷X1ƒœrÐ<óY¥¢ïq*dΚ*ÌesÏ=»œÎ)m`ñ‘4£Ì˜ =<`½y Yh˜ID§®1Áׇ³h ãê¬$Æ”Xg5$4XÁ<bÎ~à*:H,m$£lè+ªV±y˜ÇfD¸.K'ú÷ØQvÛnÓ[Ü£.²+q’ô¿F¿xŒ«æõ/•ÿ:ùŸîíÁ¿L4.•ÿ÷÷÷¾ÙßÏÈÿ»{ðãùÿ¿àßÎvÅÛ¶¼¡Ðý ŽÿýÞ{Äiã/MïiÞLê^k ’0üyÂÁNÝRÕï5à?ß Áôu8K>â-2MfJ>–#ˆL¢\’rÕ€T¾‹5¼oÇá|Þ¸À¤§ jb–ˆ ¾+¯«ê¿èô¼Ó2é­~—ƚλ^çôâ¤ÓFψÖÙÏÞe¯¶úÞÏç—]ïüÕ™×íô^ª–/Œ'†M‚Ð c¸ži‹²„ÉŒ]¼lÏP,KѸñ7]Àta' M†Žù™Ø¡‹}f!¡.rÊsòsš’²ÛdðÐIìNC–ªœ5–s»‘…C~ÔŸû\ÇÊÖì[ås¦! ¨ÊÛ€öŠn'Ò€°Cã©ÌuôFàšdnwàfÒ¸"9ìácÃzý:S%ÍTE#å4S=í½êœ=Ü'«zæûÏÏ.|¿F^OR<ü8˜Î±øƒ0†þV*;Û¬c2é ùVæýC¨r)‘FÌó.œ:‡&>ŠIýE£Ãp¢¬j¥ïvL^iPèR¼Úu¿/â÷Þ8Qé,¼&_ÊÔòo„ªÈDÍ8I¦ª žR÷>jõû]ÿò vëqÝSoö³oÜü×ú»‡¥5|½f ß”Öð(ó¦Vùê€IiS”ŒêMwÙ<.Ú¸º7K®ÐÈ\(Ñ7‘ŒMp@²ß]Á<Ñô BmrÛ2O~ŠÑùìÄEÇS3’ù‰úbgò#÷Ìs bZ³é!i”0Q~¡ÿHßœ¶^“’­'G½wPä×ÝO^£[ä_ ††5²:îëç˜û¬ÝEXˆèO46jU •ŠXê[ò«ê ‡"õ†“RiM§r1ªYœ4ø“¡“ûÈ@Uz¢ð-sOM•3m¸‚çOÿò²svÌˇ=¸èwŸuÛm¨ÄûÕû>à{œIœH ýÛÅ] Üé˜Wxx™·íìA¡-¿‹ˆ ;ØöqÏ?iŸ=￨{ÏZ'½¶ü((TÇç/=ì´:œCì¯Þ§:vò ý^Oð éd®k÷£²ja \0D{7W-6^bí×ýnËús¿Ý£YÏÅ°=.?_#õOxÍpª²ü¸ý‹ôDÆ®¹ÂÖ9WBÈN>ºêLôï$¹%µWŒè0 NAmºËŸ’Ä#Œ‘ª¯Y°9𺚲W9Yj¯î$†“Yòµ¢A¯Y¾¸YŠ¡fež™¥9NÐiÏ?;?C:¡¿‡_®ÐfëNè,ÞÞ^V…²ù}à{}Ùºº‚ÍÐÒ¦f9»' ¢‚ê ‰"ð& ¦?ªÍ4‰ã‚¸''±øSøì,™k‘T`”WËClU§°›°xA4KtAsê7ø„WÀX'q8Ô窶Ë\¢1nq:g@¬)Øbm&¸hµLg€÷òÕ`é’U ±êî‚/ô6¨)af€yb5aã@3Ïh²û Ä&*…¦Eª=­ÂoÞö üW5/GuÀ ƒ:qí;gêÞxÚéWñc¯ñö’ŸþRã=ñô¯íî¹ý†*¯««_4ž¨Ç5)„îh4DhÆGòƒÝ¢oëºyùÔª™e,¡{"x":iù<(YùÜElïÒ+6NönÉ4é;>:°§-ý:æÌÐû¹é~U=«e&˜f•®|¦Šœc _"{n¹¯W#š/ò~8Tã__Ù•«jýógÏzmª½æýªOrvÍÞD(?í©£þ‰úaE9dÚ…Ëäëóîqï¯U5²¯<~P;ð¾ú*ZÝìé^¦9aPÕè!\´»>ˆy•\ufVÕo C¦ï…ÁJ{<ï¦}Ú[¤å,8hAš&ƒˆîai'y7MRz Í¥ÄçCÜwŸ>¬:äøFT-ì\¤kñ´:É£È#¾w«7¸YÄ߶Ú鹉}$•° ËÏ$ƹ3Oeh*t#%âG½Ww^"š¡êø¾ð¢ ?¢•1BÆe|tkQ¹’ëÑóo`{ÍÅ•ziHrº’ëE"f&¥$i:½*"zx5õÀx.ô cëÙØ›% ¸Õ%ŠÈ^ñ;Tþ¤Ì Ö—ÙLBŠT6™«¢ÏÙœ?Ùžj’ëìÙ“ýnuªÈ_Ñ¢kå’Ï8AFA“³ój½“æµ)ù¶Y–të}óEæº-Š±ŒhËÇj_}õUþÀñ»O8õ%ÓeÌÿä [¾ø^p†ïyî WÌ£¡ULÓ9E,³<´ŽxÓx‰] "üf“YÀ}8¶EÆetÕ¡ŒŠ1 …íBaë—p–ˆ‘™[³¹!˜§ó1š '3\š=sÐa™ØupÇè3){jZúB…Uˆ aÀµ£4“£ØÂì"ô’Xa±!•i®Ã¶=(ˆ[\1'R„®ìþÆ`k{G©0Õÿw¶°×UèsmÕædEPÈ=m0—¥Ã‰áÍ©¯’4ã%~Mñ‡`¡tE'ÍÅ9šÑ›Y éÃC¨ÑeŒ)x„¸®B FN[€¯! &›§ZŽ§2’{·›±tCÍZe ßÌׇͭ£†o:ßð…®›|¿§ÕÂk¿î‘¢¶+K¶†°U Š$"l§HršIšbB{—§È.ê! $„OÒ?áÀ6–±A‚ÂF¯1ìî:´$'Š1ç÷(²ã±#·D†* du›÷·"äADîпèE`61µìq§‡|z€vÛ§í³~ëÄ¡ð M€Éš:¬a9rÀå©q˜@Ä–èIUYI¾RVÚ^Õ½±WÊ©P·J•@R«½gŒäh±âû 3± ½êè²Ý†ü‘Á‚J¿°w¢]o ¦¨_ݸ4‰ˆ©ÀFMUˆü!Ö©Ò~¢‡adöxÚIY&ª`|ÞssIe‡&ujï¿a¢/Lš 9FØ#µ5=õ¢6M£ðÁï\§h¶–lÞ–"5™>Ìì\H…ì›ZÑKx Íò-&Ãp•@店P­PíÓ‰?$ïM¯”¾'ö°:Q1²PÄ7ÍRi—oÀ›&p €êSHæ4Hç‚m=d$4„ÆÖ·¸3©_O~´îÐ×ôq4Ÿ'̘ã4áíIŠS¤÷1ëA›f³­=ïZ->y÷í õ‚$4ꊫâÈvÉNéV¶4ˆUæVkb’@HÖœ#0ŽÎ³£v¼3¾È¹gØ€ Tu™OGçáw ÀζŠeúþ;4üW€ 4¥ûÏλþIçi·Õí´{N}âÊ_3°»xvî¿ê¶.Är~*Tò’ûô,`ðxN³›ÖYM~G[q1Õ|M7j9×*¬D8¡ ÙçPß‹0cõ¾BÏÌ!§pL£suG.ÜX«¦´˜À¡[P)0.*b÷MF6$ƒé8„ÍûÐA¨O2õØìs*zLÝm¬ÆQûGªïXf‹ªrgÔ¶$áQQ(8XáQøüèHœJgá?ú3ÛU]\îœ÷LªyöpbE¾~ôeÔÕ]ö„Á#·WUl¦Ä°ˆÑ Ÿí9C´e„VjÊpævÕšJ"*ìÒXivÈ q puHL”ˆ¢o‚2_‰W!å¬ÀH€±ùg˜È‹nE<¾T…ì¬\Q!žd]e(¢žˆ^“Þ ~›ÉÃô&Hæ[ô(“?˜°¿8&î¢B'¡Í˜\ߓܥݡBäXR._AvR 2‚îLɽŠ¢z3n±€Æaù¸qXFÄô9É^UÐ }T«¢c”‘µ÷:Ïð f,%—5–EpÍå:é°‰`CX¤´Š˜'‰?!´­d6iK ⟆Ã&î¾×3;†O"È|»ÛxÁÇ«hÄ“@î’ ÞÙlƒs÷m]g:Q±~‹ã2Œ&˜%ÐK]E^«´)ˆ?MàG<¢£c#Ê-º Ñ!u %ìNÂS á«žpìÄh*ùËÐ2Ô,¥Ayë“>ÉÀìÇpÄI`Åy7[Õð5åö0$%EéÀŠ´ ätpãò¶67KÓ)Üócç&À‘ší/&Ú-B÷)ÉY«Ý4wÁ?9Q±ê~Ë@`2cþξ£Û·Øù£¸ê:£ÿ蜂,exŸ™ÎK í!:ŸÎB× ®L}@8ÑÌLnÃÄdÐ/ãýT„À·÷}ŒkÙGå–P$yŠfîY÷üÔšÃj«% m?©(?Ï–\±„¹– ÚÂbêá¤h1e°GçgÇ”yì¢Û9ë?«nœZfüÿ/l+ÿÛxcµs˜üÓ†#:̵a³vPÖ'1Ò˜´*.qîá+-X¨)^·b!·T]²M”ÜÛ=?ïóÁm·÷©²üɧõIƒcùÝéƒ÷U‹ÅÎ×Dä&±\[ìøõ)¶œ89/—’u•»´híŠÝH ªÒËà^G]o­¼^yú³ƒ7Ú”ÿfšü~Ú`CþÇÐ>†v;±úDÞCôņ)™9%vSÑ^a Ú¬pCUÀSÍu^`Žž ÷2ˉ dBºˆ—ž2Ÿ³ÍšÚsî"å†%î°Î pN´¾ª*G…âPJ1‚p+|`Îi8»A¾2²-À…UeÆõãçy 5@Œmò¬;s¯‘6y~UUAznfIœ,RNº¨ý§¡®¡š¯gÁÕUÎÃË`^šøš–£hEg§HYxšÑôÔëµ»ý² ÅûÁÓo\gº²ú2åÝgl†\I"lÚ\Fr:©ýíüVØËO•uhÔaŽÚ,¡¤Å~xE‹×¥·Y·s÷ˆq‚)¿ª–0 †1p^ð_qÙ­=cÿ…û"?ñåKõ)]Èeö8Ïεº(‚üœÿD{UÞ©µõ&.Ï.®·6ÿöJe)ƒZ٢㹄…@Ž”|o=®5¸ÓȦŒ{¬í³}O›%’ç©q Æ+NYù4ÓnKÍÕ4û¿gí˜ìŽ\¶ËùÒ2NtíÌõ¥d×ß›U½›ú™,ê½ÙÓû0¢’WÐ%b7µõW½« k>µ„IÄ®ÙöËŒªQl8k[pòñµŒsz7 ±v±J©k¿>j_ô;çg~·ý¼Óëw[øðŠþ,¼V3ÄÞ-Áx\ËüF•aŸñw±Ì‹¥LÇ‚¹S•Y­¿ž8é‘owåè¼{ìmSí£ôà~ Êí«z®Š£ó³~ûußÛFä`è_¶è0J§þ`þqžóϤ0)ǪÏ7ž´•ŠöÍp.PÛyÙó[GGí^Ïÿ©s~BsæîBkr¼í!Ъ󬦇am*1^¡eÃd& ª7“ØS‚‘S5th©CØÐþ¦>ŸÎ’qr½ïÍÑ"…üA2Ü ×=«ÇÃXE]‹ÛìÒJ£dÍ4Ԇ؆ïf$‹ K‘N9m¯üy5=(üì ?Û®V_Ñ6ªÙÔÖ©9E7«ï²+Ó ÁqWh-ض½7͆6=ᜨ°†ü|ÜÎ0‚Ý,èZš”’ùˆ°×2ÌZ¶Yã‰:¥5§óâfíeFÖn«¡X_ò…eôB„¥7sú©¢x_mÖW„ˆŒ·B¾”Ë„¦Vpé…Bo+1F—X ˆƒ‡‚ÐçßÞD˜ž”8ÊIJÉý.–†:Gd35þk–±MLµ±1–˜D"h2ÿòãz«¨\µ>ËêaH”*3C,à`¬ ¼u® LÄÛJM­ñÊQ†§ï¿³óƒgäm•œHñèâxö (Y¶Ù≘kSL®ÌIÓ¡lŠ j’±µ+wá<ëDh°ˆ %;W*Ëq’¼g(8ÕÚKÁb×1 çˆÇ ÊÎÒp®=Ä\k@‚8_‡2¦ÎÐ5Œm,˜P—¦=£TÏdjóš]‡ãƒ×¿Y¤&[ƒñ W‘*«]g¡GR¬±ø ƒâ’ $ëÖñý7;gý„xùª™‹ÌªESz?D•™8«7#<îys æŒ% ÃIZ6‚£¶W…îÀs¾;uh[ïm¸5Dÿe4uãN½Ó6bhw~B\Ç”'^ogó€¶E*¡ôÊ8íK”§Ïˆ¹Q˜VkµfáX"=ŸÃè'!ÔS*X[)[æu6Î|¼K9 QHWsK3ÄÅN€à~¤#WØbšµœ¥¥ßÇñ«{o }±Eƨ[Ìä‚jج L{8wاj (Ãèey(ïÇOn>n¿n]öÛþ‹ÖÙñ ÐÍÇÖ;dü:g—m¿×nu^¸¼Øu¢“‡BÏÜ %Ï`8÷íŠþ 'ÿx<> ¢¸q¤†òcn±÷¤ë Ô#$+t° ƒj  ÷64‘É@$°l‚`Ž5°è—” ªa³ñ À³pÀ„&é¸V2Te¨º–«Šep$CªÌà:O'ÔÛÚ´ŽòÄ á,É|ÝËNdU%"ßÒ‹äìÒf]ø½ÙD JRNƽ9™å±™s*HË PÍâUD 9—#žtŠ"9ž8™xË©ü)=ã¢ÏB~ )iµ×†]œdHÞ+ßþ,,—J^. gšëƒeWŒ#œõ/¿Ìø€‹5ÿ?öÞ½«#ë>ó)Úø#ÙBìx2&x–ÙÖ$Ž±3™œ^Ô@Ç’Zé–Œ™ Ïgk_êÚÕR ;s9'^+¤®êºìÚµ¯¿-g»ïjt{Š‹DùD¬`ÊŒoñGmS ã૯.ó—Ûà«íMq~7÷³M¡©®ÐêõJý@Øô#z‚ŽÅ™n}ÎÑ_\6‘"BS ¡Ê¤Â¥AiñöZL]¯‘íÛw$ðqÍÇëÁŒ=™7ïq ¬­á ÎV¤xÔ)%åÚS`ô$¹šÓzñ0¡²Á`¥Ñ<š ÷còûuâK­ÒaÿEÓ>’­Tå °^{;s¤°çJˆÞÞ=â0¥,¢…íg^ò;#µÁ‰ª¶PUtZ”oÐN–ÚÒ4²•Þ­=ÎidÀÁ?1•‚Å¢±ÙDÁKqÕÕð™I>«2ˆ‡Kã/ˆ<¨=E1P­Ã ð*rA,%†*8*[JLGŒ¤u5N/8ˆ€y6©“âüA”¦GûÍ 8Œ„Ú»Ä!ì#¥Âù4ÆÖ´™£?í¶J“‘“Zéq3eÌ/È“–;¶'ƒW†æ8B@ÑI–Çcý-v\LÐF*ž2¢WÞ«Õ?Ȭ|HãÄÊ°R²ÿR Å-#ß“õ†€/°Ü'â•ê‰ñØÅfÍoÀølЋŒƒÕ$¸©ˆ' ¡.F¬õŠ–W ¿M/eT½~ ¾ÐbÐü± ­ ð—`ÇõÝÆdU#ö?‹23–Œ/ÍFØQ*J0B¬iI Œ(*£œº|Òç—}$q0X_Fë¹Pèȱî°)b’BRå8D ® ¡Š÷Pã%° =(/±”“ÌeIïo¨Þ‹²Îâj jïðUÒÅñˆr€Áè'–Òg¾$—(£xtä|(1@À*¾rÙ ²M:E\!ùâós‚}ŒÄ(ŸBpÝÅ8‰` qNée±‹C ]ˆÁ§$÷A¼9Q“ ›‰eUÅSÎycËß<…NŽ‡ïAìJȼ—ñ\Èž7M#.-f±y•E·ñh“ð´ìldÅv‘tá¢c.kSrà|¸<ú×í©œ˜6ësˇP¾xÎ)ém¾Ç—î„ µóÒ/ëo0e»41˜p¶§5'ÎúH^f?â–‘=]´jÄL=»gzHu»Õî"cTt®ÓFvU2ª\Õ‰/ ­ºMgTH={ªã+4vç ÅѪ>ÀOhÁ !Œn†fKÕ†þ*ipÔ>U%D³•§Ç³°ßê¾i‡Êìì~Kv †‹¥7Äcv›®Ò¿ÊÓ9æk%co°‹ŠcŽ%ßoâèƒ.%†›œdÃÅ•e Á GYÌLáÏ‘ZÑ+ea+3‡Š¯D|¯PÏ}¨¯JÙ•DApzSfÌoÜ[]wÇW) 2Šˆ¥)Ãèï'²>Ñ¥G—eâ·ÍxT°òìV êú¨b'ò¦#6ÇI{Ôô$ä9\xËÇh•Óíj:¢ƒmN4d8äýlÞÂXJRÍ®óS³W.Á3üt§bŽ¾uˆ™;£¢h[*Ïw'ÈöCDZ²Øðà €E#`e ùŸ‘ð¬G@[µÂé©C˜c胠MÏZoF 2qÁˆÍ–½ê甶 >âj¢©ŸA+ͧgZÛ ô$Ñe!)ÉÄV}i»‰'“—ûs‚íѨE6‰šxé’dgV*/áE~M˜i0ÜE¾…Ý®”Âv/¤/´•ÖØd]Æ[—^€[ºR^[è’)CÕ'´ñõ¥oûnÿ³^§ßfð-›{ÝÌ Ýîb®üY¿uØ.'EŒ]èw©×F(˜°¯åwåËT ¿‚%I¯B,1} áPÁï/ úUºãöØåð•s•ƒ’²4ÁICáÁ: ÃiÚÐܵá*/427rî¡Ž‹–c 5lPYÑ+/ç·poäöîöóo û@þÊzÂí¤úX¾%áÞ5O.áŽg´Ê&²HCy )ûÁÿÔÔ;ÜÚ)Äè-¹!RF €•šñý`Kr8Os{UÛ¸8(a´ÞÈÜùå™Få]%y4&ºaY3o–weOîÉ7#iÅ©üÌ“ù¥Nç’š‹ûò„<¥r¾šAœÓW³Ï9žæ¸$ ÔWÅÌ/9¦v3£wManït·Ê KˆoøF¦âÉ)LY*-æ ­’`œãºâÌ­<¼2Õ^û_~i ¯DÖH›ôì{\5N»UHY2#4êÙòÙü&%Ù¼û>qOº,ïQöÃêŠ(Sœ(“Q 2iwÞtšÇœ³“4`H·³“ÖéËRzÝÚú#ªuW­p` 9wk·^.aD ŒFæE2ŸD3>š«d£ÕTZ­égÊN.Gy´ü©: ›Ô|ÁŒ½+'DDãºZ€Úbõ̆zÁO-RˆaðªKÓj+•oFµïq½T°yÝy~*ËKb)\aðvÙ«¢Ie)ÉÎ0-ùnêÓ~ûuûìð­´{è÷úÁ—ÊÊ«kÿ¾qó,É£ð‘¬Q{†b‚¸y*ðÓϦWîÀ]_¶ž7c|µ@!ò¶0 {6pV¿Qt9,ýçJëÖõQEé{Y& ôwûn²¦%•I×wN 9q{ù6„þGpmˆuêt ¿â£ûûêSëå÷fÍ ôXü·rfÍyÅ`0ZïqRìÑcx°Æ’V­À*×=ËÏF»ûƒ|Õ^eZ%Dùöá™I±%WÁ+Ï­P|ʤi„ó˜fY‡KH‹°º:Šb)ùG­ñÙgÑ—iáÊí,6l®ŽS¿}C„Ð"[2-Ø—×Ín'Œ#Ô§K/M’Ò 4h|Ä€c3í2‚µ6æ盉‚ÏBy´.³·í&B¯aT€ŽJ¥sI¥…r] ±~;Dšs¿. }÷¾1L’'3 $ÕWÍ’Ž‚(÷t…â½½Ñ;\Q° 1VæWõæ P €öCÍŒéešÍS!eê‚aˆð´Êã‰÷tÅSÀæK4×& 8ŒÛÀ5I”ä÷…bϘšTßXv!¹OyFInµ8¥¤˜ƒƒÛI~±–‘Wj¾^7–Ù“·-µû×Í8k$“cÉ-Uü?Uõ{šåæ2Li°âðØWUºÞÌWÞA“a(c‰˜¶¢<…QNhsù‰ÒËË<ž—Öó"ו3Ù…Œ½Ô\Qûáý])z˜œ¡Ø#ÃDLï G 1ßòw…o•™€xêqU䦼tbj‚Öx†%0j9ÜLbBbÁ^QÌ¥F§BîÕqEˆ¿F°t™IÃU×DÌOcy!¿€ª°‰©N5àŠ2j< 0ˆ ã>’¹Ì(é ÒQéÓ j*¨¯+¼Õx6BÉduð ž N÷¨Ó—7nxÐi ª‹#Åûš,ëEÖ¢* yrÛÛèP7N=áô—ÀAuÏa£Êÿ·ßUe)ÿ‡x¹e{ùŽç\¦¨­æˆå\±šÖaŠ;z~«Võ‹mO¢ª—ê7êÎ)¹n(Ö$¸†xV—yv""_RþÛ¯_S>ñÁ¥ˆø™G7Ï«ÉšAUïBq÷|ûv·±Ì~}g¿CÃ×OÚw>–ÙÝX®ñqæèà¤u| :òëΛ¢Çë;‹vë^Q¾®ã5‡×´ð¾·¡už%Jç=Î&B²ôZTT¢2ž¹*#¯³à¼¿¯ŸóÎ#÷é¡v ÅMüucxô”t9:J×`b¯ýƒšëÆK§ Ã[;êPj}S:*e?ö,$Ú!{ZÁ¦gÁó ”È\—±xÝÈHo‡ùS´‰ŠÞS7·ql/@Ü&ˆvÝ´NKÊI¶'³$£T=FŽCœl•ÕzgA>ø4¨0Ê€dÞ®äp hŽJz<2Hû|úþÛPâRû&ÑÅø–^&½™§«jÕ.fòŒCò²]žAD#jQ¨Z ‡œ§Ä- ]1Dt69‹x]Q¬{Ðûõ¶ÆØ&Eý*ij‹³Ú]]J½ G ‰-(]‚¼€ân³¢ ú©ííÙQJ%™)jyŒmáq§ÛFt]ë¶p!Ö¨u‘MX$Q™·!64²íŲ‰Õ"}¯G…A_èM^[²ú¶‚1Ù5${äÁ~r¯ÓBôŠÍñB"ºeö\h“,…h:T‘_A ð‰zQd,æëãàõrQ.I2¿ošé›y¯Í¼³nî Ë5ãvª¥ קË>H*Ĺ„DßD> #ó¦ÃU²׃¡"††â—hƒ¡¿˜Nâå¼’ ïKEÕüH«‘oX`(Jtú˜Ï¨—'ÿ ”ðZÒ+œÏÓÌ„úá²™âÌþtñsΞñJˆ¯C…KÎ#ŸwFu×WYÈ ¿‰ |kšq›ëgyá”G‡­X*<<Ù1PCdÅð Îù;'ÄS£8‹d Àk\›Ò9ù ¶͕W“UU亘U‡9An‚y×´wXV™6@šC óš'Ö1Íž–¼ÈÓŠ;·<z÷5(;cãj•Ì5Ïâá8J&5]g|Û¹æ2;YƒóÏ1h]nƳ˜ï®(…rx¡JYžsêZ´½N®®lPF8…IôI¾¨YXF_ñEvõAËîônvÁ×Õc´„aþ1Ö¢ãT0§c|H\ `*ŒM4³+×î—-dŠï V eâ/Ó7è£_iåÇbâbRÔ'›ÛâZHàü„õ9ü¢ch]r¾ê%1Ð%\3 Ϩþ¤~¦’ˆÕ>¿…$õD<:uiz>Ü5ØÍw`háØ•è9ÄL÷‚'O,±R'À²M«'NL4ª=šm½Ò¡åQêè åA™Fª*¦Ã«i¡“^Òû^ºŸx/2Xuxh°0 XF¾/¥Xê)VN3ÀÙ®bΈGêlpäú¦1)²B=€¨#mžØkh±Xh”%ͼ92†§ÃóœLÁñe©zÌšà¹yeöo¦3b$™„üö[ÉA)ôó%RöÖÎß+îsçR‰ $â7øJH0ئÂæ€ e–v¿ygÌ€œY;ÔåÉ“¤ˆ·^+&“ÊàDµúuq*ᎃÂí2oìUðm½¯‹oE,Á„夺‚•!g·ÁÂd”sâÔÀYàòGî@°Œ \ˆuIÅ©¤\Iñsb‹ƒ“ÛPõ‰AÄT½6ÐŒ™¨¶Xâ(•W.½©+ÁÛ«†bqlΩ`rJ„Ž€çâæà€Ñ],äv6¦MÒ þ4˜LfiŽ´ªÌ“rR4Nªè™ÔÔS[[ÌàìÅÊa¾¢ô¬‰\€‹é¦€š4Áð/Eš*þ>ÝTĶ l¨j±>²ÂŒ2±%bÈ»økÑê2ù$ñB°ø ZH'Jòà°wúc(Œ¯aîùcéI´U7g#9"ÒœºÓjçnf¬=*l}½¸ûrWÕJ.«Jý¯NjÐi…ÈÈØmYéö\|yð14™ 3ÐR´Ñ Æ6§,²I3¯^ryNJ¤f*_ŸÎ“ËÛPì8 ãZH>Q€Ê$Oâ@½)↷YÝC69XðM×:„ ¯“ø# ¬@Ý2gÊâsN·„:ÅR-#I ‰ÁÏïFi¨!«ˆ\+æ{ô1ì-ó>%N÷ÌJÄÝÔîÎY»?v6ŒÈE²^w°áÉSº3ÖÄUVËA²Œ×-Ûcy eJÛåŠMÉü3ÌØš•SWTKbpWľQ_4 €`CÉ 8bOüÖ Oy‰È±ékÅîÒ¾cŠ=èYàuã4.†Püv—§ÁnI±•â¥[¤AM~{%…“Êbbï”J¦jø%H¡p¬Ê$‚5ÃJ4'+¼¢¤yá¹ 3Ñcí[UÃ¥gT<öC»Ð´-o ÑHg|qØ©?šŒt_¥²¾Gúc}¦S¥>ûZÐ#¯bÃ4UÔÿõ§ŠÑ¸_ÐÉ¿ßÆn”ñþ"¥øë( Vïá§e}|WŽµñ™‚”}ïùÙµ;Gÿ­?O?ÿÞ¹jÙÔ³ ËÆíÊ>–ám¸çÖÇÒC(Y RŽá A, § F's˜ßD35¯Ö„ÈJà}åÖeüÍcq½Œ’qÞPÁ`WâʈT]vy7.•].‘L ³l®/NÞ™>àS®j}£*a8ö¢äîoÀ.&neˆ=¤ëÿ€}BŠÀºÔ,E3|µƒ’!÷m(UVD›IÉ ­¢ÑɈ]Q|V[·<´ûÄ„PÙ/ºµKz«¬+,¢Þª®F°2)ÂÔ7JÎT•™*Ò’ÓŽVªâjy$_ŽÕÒÖe÷]1Ío¾ë¡;X† €u+‹G±X½d®²ñÊ’õl´ýµ3ëÔ28c¯—Zü ¹yìÎý•±ÁU§ªš ¼†” ¤BrY²Ù¥% D—ªÝúŒðR‰„k[Ðl9Ï{¾ vƒÇÎÃu³Cðq\2ŸªÛ‚ÀL2UuÂ÷Ø*y(Õûx´L+ùDµ·]«=>wìŠ=¥ ¥àT•Õ‰²Ri‚̃ïb}Õ½9䋬—ÖÝ×´Œ“!ø{&Ø\iu+8pM}¯èŠ•µ´$f¡$Š¿´—è'¯Ÿíg¯µS^zªå€K/Iˆ3ª-f`:†R ß'õ¦*²¸ÂpÉÄÚ ßöŽ!8ãðûšÜj]´MËP (P-™sjq]R0æ‡8žÁÇ©]¹˜,Wû›'ðë`‰*¼‚IfAWÎÐÄ‚)a¸,šy ¿ýV` ì?·²X% [=1÷ͳ,¡ÌŠ}™™´ QßTU{o®aê”6£x÷”2V_Ö%µ¦©~щët{­Óêf4/.¤h!å>A¦ŠÑ‚Rg)Dxˆý÷dŠØ¦û"kÙ®ïU!l_⋤Å#±l{ÁPÌcJÕ€ì!î¼2CHýzÌ݆¥­¶ºn­)ÎÒ‹ÜQò0…X)þÎTÆHIæž!8Ú­‰³éB3ï8c«—8þœ=Ô,^\e­xH 4°…Åð„έ¦?u›G†qÅâb•SvãbÄWÉhïßϾ ÅÝ̬‰å‡@S³Ì°ùΘ±9R¨ñÀ¡F ~P¹9ûæbU; ¸„AA Ú3Ù¸ìÿÙ?Œ‡¿²3u–…$AÄ Úa&$\½\ŒIÕŒ«,¹J¨8Å@€ŠvXW’‡[jˆºš+QrÕ:„vKÊzs•íc¹€m*:w%¼˜ÀŒ]vô–rLìJ_êÖãÚ)›¶b:à3/‡™‡ãÙCGsˆ¥»“ü+ŸEÃXó&. xIUê¦FúrÈ‹Ë“1Im`Ë_¿Ê \ÑÉN;ÃÔ¤‹Ðöö"ø>›gÙ8ŠÇ0‹æÃë;©MuD>âæ!ì×ëf™É7ïÞ…?hr:€¸,Æ 8UÃ7¯&Te \Þp0 °±› àç.ÇÑUîÖ!ÅbÛÁ›xþ9ßÁ¥€2‡3€C >@±`UÔÏS=‚WÉH5ªê†Ñœœ»kÎ’xB!°ã}bF',w•w[7ë-}»ý½Q°Ò‚â1‡¢Š.¸±<2ؘɌø]7„l’jŠÙ%ð½1O€WŸ©FK‡¤`J`bEW¢‰+çUqÌøŽ¶¤£Ø)Ý3Åeä]ÒÙ(Égc«^­múëb ¾®žwk<ã{LšŸÄ¨RÌÊ ÃðËW>”uº3Gh¤u£&§å0¯6í{#2žð¼MÞŠ"w%à'vWûš+í•=$ó ¦¢ÍëÎû“öKÁv²*Ø°‚›ˆãŠ€’Šý¥`ϲŸ‘(hšîŸØoöÅö¿Éâ§.T~Å2ÕùjceÕò¯%f.*.ýZÜ#¤Ù]eia4›ø xtzÖ6±‰{¢>æ¾Äæûž<31è8ËB7õ^Šf–ýk¿ïœÕ¼ˆ(eTÞÚ»ûq¶Â¯œÜà x/CÁÇŽ74Z•ì=[,ðk”,Ð~/kï^P õ8dÞpQAÓ Yò@©eŒ¨†¦Ôb#$æÍäLâop§|5 ¾ôh,rr×QÔTíMò0«Œ=8h/SÌU5ÖÖiG­žP.Ž‘[Š¹ÃmX^GYð˜ƒ*úˈçW€j¨×¾ófÒÊ}ÔkÌÁuiBå!µ°óˆ8‚Àí]d%MtLŠ l•·¶r™b=+»“")úM©aÚ‰í<çÓøÓŒp&ÅBÕ›–ò‰û”ëÈK%e=#kN\2jæpic6uðd?ðáoÝš$… ÛËëžÉQ-}XgrJ² ø)guuŠÒéöÛ0Ö1gä·„Ö”^AäŸ.ô\’Ò¤}ŒÔÆ«\èM$Ê: 'Ùü6¼œÖ®©\„.2_9dIϾ@!ü6uWçpÐС»"e“±l/¢Ñ2{JŸGŒœLQÍ’x(dK!²^Fùµ8æ ”&%& .sifÊd»ám³8Áw;P!G˜¶æKkšèx‡QC/“ObFº«©.ÑJR팳J“éÇôC .'èFÑâòß²ô&Dè"£ì*†$.øFÆ#Kæ«îbEqû@5ë>íØ1œãàiãCøK.Ç(ÿü;R1©=–„Vwĺº*´k}¹$ÿ|“tºøR<òšëd i¥¦†%Q ýaúʳwus¥®·Š™(æÝ#÷ÃN#ÐRIÑœ±ê ¾ÞyÕ®.Vm®]?!¸c…–L«î­ÆD=yØ¥ÍB}Y®ÏŒ:é†|õ4x^‚Á™}÷káw!«…‘ â.üÒÌ©%_OÇ’Ra]+¸¯å¥|gä@sgÀÖa! §lVÍîîßwãßquòR!LED¥ÂeˆÉifƒæ[øÄ´˜Ú<Â9ØTuo¢<Ä%•–»üÐÀpÃò9Úú¤,´2Á"1ñê¦ÀR]§‚£gx‘‚[Œ`ùv]RWi¼×ÌàuÖôô=Ü2ôÃ@_Í­îŒ}~ÈeÜ?w³×¶a²ÀWžõÃóîù }¤©dÙðï û«_ZCC¬èØ6ª ÞuºÏvë`ˆ³>;lÃ;qÆa8ÅñzµÐ~È'"T ¹BÖm?€¢ðy=€®&öÔ¹öQøºß; ûí7ÁY»_—Š",{ÑÖD¼Unn@‡—£ <’JcírˆhÕ5X… ÂÏï„ðýÖñ8ȳah1±C@•ð…6*&/Íý\Ñ–Ã,å€|³ýþ´}xVë Â×½þ»Vÿ¨Ó}¶ŽŽúa¯v;Ç5lР˧qÇÛ;.8ïð„'iÊÃnOTP•¬½1ÐU"6 "îã¬&KœÁ˜á߆єbK£ì·Ûö˜,V)FŽåÁ0p,È(ìöú'­cšÝÊåVÊã‚ή‘B"¢¨Ž°¤KCUᥚ]€ÇÔÙåcÆUM <Å–Þ\ÇH³ÁnšF¸œ ‡Tw{gœˆ:,%cŒd¸*¡C0ò,+uÁZ4BBå1•`âª`?ƒFÐüjœëø¾Ý> à+¡B ¼œÇp'9/[阒¤J–§‹l‹{ à›b½nê&äõ¥äÈmìÕ¸^LŽS! Ù,ræ0ÈY=Þ“;s4 ãl8ì°Æ<™Þ¬ŽHJð|á9f—0¸L?æªFE¦§îU^ù½º×Lv9›]ýJ¶ˆUçQRꔕ»r7Kä]Œ!¸ˆ4(¥Pî»è´Oæºêg8È·ñœú€³l±¾Wî´gÆ)ü²‰¬2D——˜<¡KYì+bÈÀÊZ^-^6Y£hªkø¬òe7 íßHꀾ°¼eh‹aƒŠÏ¼ T[K{r5Eë,ôPû ó“G™-h 3¨ê´_Œ¯$ãô-.ÒÙ<™DK|øº vY½S)r€e‡%E¢0s)È® ƹÑOfÀW›÷¼H€€h ¥uÝ@v #Htxpþ>bfEŸq4s°³½½½±Á’,Ad“$Kg‹TôÈs@ÌQ¬¿/nÅ-Doó±(»Ú±ÿÜò@ °¸/—?Y£ùYpCÐ3Ì'P’!/­dËèùÔCeíÆØÐ/Ö¿îÖµ”¯_ì¾ãç&†ìs]ñ<®1McAV42—ŠnañVt³MñÇÿ ¶?}»Mÿª6ޥƻ+Ã󦣰)¯ömZª—ìÛÞ9t#ò3Ét*cØpùä.!¢Ážiæ4Éò±¼11…>¡%´^ºµ³$ŒÂh}!>ÞÚrm Õ1Og2[FLÿÌyKð$HìdtT=|Ç?ÅU‰ŸUy<«®éËòJ+”½Š_~•µ«á˯ :j/¿/êbó¾¿oÐg´SP׃õ5qœÖø°I¢Þ6ôèÖ«M7¬/mš;®;^ZkÖlšBE­yLîe?y(èèð£ÀAä8k3½PXøžõ*‹© zà¼+Ç Êx¡ø)Ž´GþÕÔve 5j@ž9ZN” ¡n¨ˆ…qèÔÀþÍeY¸žÁ%Šy¾“x”p½Y¡Å`‰1³štÀYkU<±a]‰¯ðÇRÝ•àBÆíÜÛíÊÍ}-ó+ØáÇ3ߧ¿z‡ó9‰ÜF™fÜKpV½=¨"0ؼUÕB¤[ñsTN³ÒþÕ8´ý6ÈgL΂éŒPæk’ð a:­D“×_,³ÈLŽ€chÅ÷©;Žhp/c!Áh«žJ¨P–/<ËjC –lÐé]ê¢èÈÒ~…JB3+‚Ä1øýÚL[ëC ¤f÷òR4^ëÉò’ƾøuMÕ²à9„óhéÇR1•““Ó~ïLèK¨µ¸Y>ï¶YÖP|ÑÂßmƒ±Ó¬¨$Áã|æ´¢3Ào·vœ9«%Ÿ´¶=“4ËÛàìÕ7çƒ6…ßüxÖ¦•ùû†¯¾ìœa™Ó7}¡á·ë´¬bLüAø®×?À)Ú1"tŽÔÂáÖáaû¸Ýoõúó9|†»ªýZç˜ÿFiðOÏÇÌ"UÅ¡qÿZÿiûç=ïÃ&ñ¾m·Nkªa#øÕ£šÕ}ÝÜI·$Y+Æ% ±ûýB…×íÜãu¢Ý“/¼öÏÿXû/¿öÅWîÞó•»÷å³{¾òÙ=) ¹©öÁ=°Ù%pK”N9¸Û–’ßS#ÀQ¢s |GÐ4ˆZLž·òùUؘÕD†döÑbKƒ[Ñ÷ï¬QXö5RýE:’Ñ 3ç]mîºns)Ú\†¸À"àYdêà;HGJü—Š€x]fNž"ìíÃê‚VüªK:X/ªé>|%VH.ÖÏ< vüH:Ε»,e‚†CµÖ}¿ç+]¯}õjßEÖ²{ÄÒØÉß—w{·ñåušßáœíƒÖ‘eÑmÞ\óˆùÂxÊa*»ß}¹Qȶ’6‹Â ìW”JÏfÿÏKû¾²ö“Ø¿‰[b~Ñb<YR­OÄ2Xâ`RAƒþ«ù ®Žüª•øKùnz¯_Úgrÿ‹·74ŠE¨Qœ-õâf™Z'/“xŒb äH˜QÌnî'¹®þ*ƒÖþ*&¢˜r·aÿ\ Þa³¢;€k¬ÝÅ4³£Îàð¸Õ9Ö}>5Òâ„N2Q³4ù9…cà5ÆPJËÖC&„Ô(›¡Ú—ÇBÜRcårtY7…ÌḆ(ñ_ qó³|}ô0ÑÕùÇLÁ‹ñOàâ–)$€N»é*öÊ4¨öUôÐxæˆN ÝÇØl‰™N·Ýâไ‹ðÍoR¨. Hx˜”ÂsW„‚G<\tµ2ôuqŽ‘|ê°“ °7ÕUÇ[ã$ï*;[äÒ Mà%[јk/ÅŸæ[2'ÊUTϨ>cٽР›h—ÉÁï" ü äjw}!ãwº¶W^Ú*tjå…½q›Â{O”Ü òB¨;R% umûÓ³ºü%øõZ¬ÙÌv³Œ3X†æBPÎÀ4'"ŒŸ|-NU&)}·_&2ÙÖ 9ñ1P" Ê“¨19®Û²ÄN¤(HÂUÒY2vÞí Œ@îS¦zTWiÚðÜÛz–:…G§­WÈÍ@Ù8«Ôá(3*ÿÌÐ)ÔU‰Õ9¢ÏÍ‚Œœ‘*Ómç&(½XÁò”»Öl 9èƯ¬s 9UîºnIµ>H!¨’ývMÇ!#DÚµkµsðÊk+6¸¦ë4ø³Ÿ @&EqÚ‘¦¹c ó%k‚¥`—>TËÔà{M¡S½–Q½+ÕÜÀM\yŹÓÃpú÷8á6»P™ß§ ˆ¾c„G~G\ðënTVµ3q΀\üŒÂ0‚n!0FTÃzÜð¡PÛÆì?j…k þª‚V·ömðÿ#¨pÒÏ»‡½ãc1w •2o>.nÉ|.Æ`ñªý5š;þóóºèGðŒÁ>á 7÷–7ü]|:„ëÿ˜$9=1‰†×á(žái®~E[A6Ïñº;rõ=,n‡IDO_Œ£á‡q>Ç?.¡ †ÐÈñÀ~Vo]\…“1½ør:þ‡úc¢‡œÏi6Å?æ·³‘zn®áõðƒÑâü¾±qØëÑÔ‡BÉþ;üï"ÒxÕ'ŸæYd2˦sîàp?H†ÃÃ×Ç­7¢›§½àéÿž™ymâOøð:â¶ç\<Èñ9òçÓ³,ñs AQ¢ؼQ|±¸º4[Ï™ÌB¬$$u æ{T—ÅŽ#¨… AÂB'[ Æi!ñy‰ö²Ö4=ú„Ž{.âeðÿÕ`þõàjÝ7ãO±ž¦üdcC>…Ÿˆ‰¿„Tîñbÿ}&[(ë¿BöÇæµïqÿäÆ7WCïcâr¡y-¨úaÐî·íàìm;8î¯;ýkü¦1†[ƵžÃ„çTl2óŽ%k¡`ôU›@§|ÁOóœÛˆ5Ž3p/©GÔ7ÄÈÆÉ…ZuíÆÃë4hdèϱçC0}$ûiàßù|cÃ<5/õªÆÿ_íð°ÿG‚ªOͧ6ô6½T›á¾¿ÐÅÁæS̈}ùÍîóÝo¿Ý ž¾Ž©£B…sðÒ9Cµs𑱑ðg8KÅF/›ÌÓש՟ۻ1yî^:G±ÂÔGñ°úp s÷UÆpä¡éðßk8йû*c8šð#ø3×_¬;(óÂzuzzñÍ7Ï^ 9YÃ*‘:êMëÊ£(»I ˆg:ƒ¸œñ¨9ü×È/¶¿ùÓ¶#ÿíþI|ô‡ü÷/øG°‡éì–Ê Õ†u”\@¦ygé'ñ]&$.ºÙH¾£ÂC9VÉ>rq„B/ ‡A2NÄݼɢÙu2Ì×éà[èàuœ]-òàm U¹ò5F°+ö`kWhÐËÛøfÏç[§B"Š²QpŒÇé k2ŠË<šÞb%]ÃWgo;¡Û‚œÑ:Äï§ýÞ£öQЈ?Á»ÎÙÛ u0蟟µ º=¨6ÒouÏ~Ì~{0hAO½~Ð99=î´`2Ý!Š :l?öÎûAï]7èwßË7Ÿ‚S9GY3É1‚XÌ‚•çTé0õÅ;Ó§‹ñÚ£ ´q]? ±‡yÜàËɈÖ¨09øЇœçHÎx*¡ÁgxôÎ8Ä[+ó–qUF„!> q)K„Pk4Mü^Œ‹ÇÜ€Î*CjôƒÄÈWÞDå¢Þƒ`ùÈw[²öº¤ ꉀ_6òóÁ&‹JOg¤ „¬f4¯77Tø‚Â)ƒ:;9Õ €‡@;eSBgÃÏ›€^°èµúï:ÝPáâé——ßæOÅÃù¸yýÊø¤“§ð?чý8“ñët1á±|jÿ  _ƒ¹³C‘('ÑP(wÁ{!é‰_¯·zAªäNâ •‰Ìãá\q›‚R.ÆTmRPYk6£Ù£ƒçÆXžMÀ᤺6ñ4Žx¡)Ò}þ ”3(€&t þ ‹íˆ…È·iš²p ýAYé—jÀ&2|UyÿHÅìiiDN MPFƒ×¨Ý϶vAzçÞT&°AùÐ `TŠ¥p%$ÑŠ”0ŸúŠF#úSƒnn¨åøfû¥X]€ÉÇÑ%PÇ0-°:¹¶ ‚}© Õx-?í¸\UW×2ÙÇ•ŒSŽE"5¹ P()$Çruÿ †:ÝJ( J9ÌI‰w? þCsö¹Ò÷’ïá—sib ‡^jš¥h Æw‘ éR/0¹>‡2.±VójÒàh öü0#°bó”0Léãøug·á<Ê?„ªÔ-ØCÓq®ÄÎRÕQÚ!ž%LGRʆ|ˆ³i<æJJ\¯I>„n»¦F¾å"¨‡a·§V œE½Úý5ˆª¨èeƒÒŽœÄíóÖà{-.­èŒª€2)Æ/yZ¨Z ¶ãÕ7¹ä`RLX-™ŒI? je(^£¾·¾ÙáìÆ´ôù,B5ôtÊ/à ÀÌÙ¢#ÄJs͹ jÌU› '.ÞHP?0¨¥BðŠ8%®!¥>YŒçÉŠº>ŠgYqÕ’˜65FEòËp™Öñ»Öƒðäüø¬C#-,°/¢èÙ±D(¸uëfa6»?/y꽄Fñ“…Ro€:¯Ê|×èòCiKÎ~xF¤ÍP=`*õhÆ}8|më?‡¢‹ÕŤ7¿ ·õAªö|°³ó|»¹chŒÆ H®2ä~HD¡›c Ù}du9_7±Yà^N4 ¥ûñì:‘w‘ØY(¤4›"ùÄ+™Œ.|T(Å`Ð}ƒFÃy(OqC3¹ BÉX¸'ŒÝ­É@¢ãÉ-w¸º;9¸h<ç°Ñ´Qüð:!’Ë1ù‘,iØT¯þ¨ë*3’Àí¡²{{Ì€ÌÑL(/ŸÂ|VSÅ­—Šì¼ì°Yû xÛ:>*HVƒŠ™‰«ŒÉô2m51Öèg®ã‰¾NZ‡o;B{¡sL¸áaï¼{¦uBðVò‘d&V€4‡‚F·7œÜý6f7$f‚†…®ÊÞB4_ ±kQ ÆÕÍ z`÷ÐÒÒIë}PÃhNtÒh°ø á®×•ä×wHÒ… þ |W* Ùêø ]º1g/¼¼Õ?‚Bh¦øÄj+¾Öˆüp5ÂçÝÎëŽÐ ÍAôÜäÛ'BKÙ箞¯à¸G˜ìî‚û¿xŽ½}ú.¨‰fRÍ&é(®Wá…2Ø{v)ôál‚Ö)¾¿ÂoVek Sõ¹·Bfš plǵÍë›&?(„¼Gü«ø ÞÙÀJ`Û©IUèÿðô<<ûñ´Šõ{ñ|ÊNZΣmÎòj¿"K7çe“p1EûY(M_@biäÇL :qW0¹I~E+H¥+§­N5Oç•‹&í—RI£ô¸A×”Kï4Eï­I®^Ö_åBN5qPâ‚V\d­Hå>•/MÝÎôúoFùuór}wêZçôYáT,:Y]Ü>ªÅù¬®óW+ÜùKÄoç U`U¼+¶Š>éJ™ËŸ¼¨üä°ò“£êO&UŸÌ+?y+Ftbêéï¿}¾x^mO³ßsO³{íiVyO³Ê{šUÞÓlTýɪ;•UÞÓŒöTsÓåÝÂÃVÁ¤%[u®úàÎvå'w*?¹[ùÉg•Ÿ|^ùÉoü'ŠÍÚÞ#åë¦l0¿ã9Û¹Ï1«¼{•·¤òŽTÞoª>ø¢êƒªúàç¥êy©ôdå Ú©¼C;•·h§òíV?•÷h·òíVÞ£ÝÊ{´[yv+ïÑnå=Ú­¼G»•÷èYå=z¶ãççd?©$ ýžòQ™xddP Íë­bŽÕ/¯ò dgïìŠ_ž<±µÍåkòÓ/?×=jå:6gÃM4ÿlæ³Mò|HÐÿQMÔg÷g8˳’ jõßV•aÿ³·h÷Ûu·èS…-‚¥ãçnÕå¬âVÍÒ•à³LLkFâÄåÓ·/°bÜl?¢l"þÓ1L¹¥ÖÞQ½H´<0lä¢%ì%› µ‹1zmaüš ‘`Ø,¾Š²Ñ˜³æ½N eže²¨Í¶^é„9FyrÁ_” ƒ+‡½$ã8˜Äc¨·¨ýÈXOoë•ô@{°%˜ãK …‘nè:·ü‰þÖlò$0þ Á®)©ÌòWˆ)ÍrY9~Io{ŽýMö¶1ßhj·³Œùîp`öÊú>W>¹_ìÉOe^Pð¸òújÖøjV/©(9‡´& ¦àsúÃJ­.p•+«QåQ:x²,‡‘±êð$QÒ;¸£÷ƒá"Ëb¨â'þ¬q­X» !ÅçÒ0/éiéôºãrˆ!(ì@§ñMµ¿ëcrýÖy4Æ “—˜!0AZkþgêÌ+0Û5üM:Àpþ/¹ðЫš`®ÓˆË¯« _òëZƒ®VrrÎ3/hÍkW8\Ó߈Øâ)øC1L·ƒ`4½b¤Æ’fPjä4FZchäkůj½-Ü‹ Ö?mÿ3}܆íϸ£º£ jhMH]½T|f_WŸ,Ô]åñþ”ü¬¯*é´t]¼´oWº^>ë¸bYGê‘é|µMõã´pÛ²«µÈO­Æy&žì‹s,yÉ;‹eߨÖøÒôpcÐö¨ìW™|yËdË_^Æe¼Ã‘\ÀÓ-óRo5˜Š›RÞäQ£XF kŠæŽ´Kâéc¦¼}AwÍf³®Âæ‚àãÄÛGM|Π7‚Ǩ#â%XÉôR:±ç¢÷À=H:Þ±J —/‚q“c„-`uÜœ!Ä°l°‡ðHâ6…88ËK^wºÁÛöQÝS×\kæÇuËo\)&±U:˳a}ˆË:u‚.*øYôù¯v¾ý'|­3^á”{Žš¸m [£&ox˜/TÝÔm„{Ô¥¬à^ÌàžìÀ–%Tb KØÂÝÆ’óΘ¯ËY‡~# 7?´û=q6{oÂÓ~§{öº¶yŠxûÁW#Ã×($3ô¤ÉiÕ•¢F µ61¾KJQC£kE¹2–ÊôŠ.öÅôÃBE¨Í¦o¾˜ä(½‘.6”7 S ÀfÕSGM™r "Ò‰?©4A¦…B®y^ ­„ø@¥ôe »œn(½¶¾.jæÀLòø§‰vê{³Íi–RÓÕɴ͵Rª¢\æ“Ö{ÓW§˜cÀïv@ 8×Q~ !$ÂB$ ôW‹qÇ*&þkx–Ç.äb%6cÌM”Cì8@ÉŽGô¹Ž4”WGžEx°¶D&oà´qšUC<<½É!UíÞ mè½~ÕÌÑÑ*$vbkÇTÏÕË:~®HQ”$*Êß–H1¡É[9Ê“!^ùüNý*_º˜â@VÅ­m,¹/À¢‹S‘Tµ2f!¹ƒ •pŠz ľd ¥@B˜Ä°?É•U^¤1A›‚ ÖO¦‹¸ñ!ÄÄÖñqûáÇ7,̳$§ñ!®SÆkR×÷¦ê3®¦)82ИàÜÕp(˜X…H®tÒ§}2›s Ÿ3m4ÁkÒ6ŒbN ˜Š-ÆG¸âñ(‡[ɦñAßp"ÆPÌA>ó .Bœ1-À¸¤‹œûQïÅŸ ]`Öb0*ªŒ-dúÊFE]¼;ƒØlÌŒ15sNzòäqòÔ·ånÉ-~úågM¶ü&§dËA/Ý+ $f7€y‰q£øUC°`œ$/uµ q%O¡¦l]Ú`hM+¶²`„6ÖlÑŽ¨Wa†ås |È€Ö§Š“…£˜ÌeD¹{™Te1ß…·ï»Ùmi•åº³4glz+OØfÝѯÝ+¸øºŸ›%¢ Ï‹¡õU†•¼ÿíÙT|UAŠ°su­øq%Ó®HÎO“èÓé¾îÁêY¼ÞŽÈƒûBãq³ƒÖ sˆWÝ£5£¡|>‚ŸBÁ“#©ïUŠp3™ù™>ô „øö¿.’9ÃLiž  muÊɽ‰íxfÄ_• :z‘Í^  p–‡ Ì m%3î ƒÊ7ÖÚà'Oü[lîcùETá83Ã0- ¹œã ]»8Z²Å”b½!ˆÿÏB>=P;t ´"5µך­·hên’j¥÷ÌðØj–ì"¯¶aþ–t¿gºR¥Øcýo£©ó <Üþ¡Ý=SQÅçƒÓv÷¨}äÙoûˆ˜ßº9¡+AÂË‚ëJ°ÍÒ-änJõ³µqúcxT&ûïãPZ&ñWöÙ mRfWâ¤dæBM£Â)(¹`2 ÎÖÁ9Q°gp 6‰´‡,;îyœŒyn¾ Š”€Ó›".…ÕÃ0šÒ÷ÝP¿©ï"º²Ú&¹,/‚ëhH¥FëRDc™’ŠUœ®x¼ÉœÞÏE?\‘sù¼pðΨ ½ŒÞL¥5× `“*@âŽÃ‹E2 ¥K ]Ûf¨ê;™3Nƒ¢üø6¸‰’9ƒ~$œ?9„‚YP0EñËÀcm7KþK½}v¨×Òfgª#¼Ò ØÀ©à¯{˳&”€š"o(-‡ˆä €„°CÐI`I»2û],±Ÿ%âI–²kþ6´Ë„3Ù|má奩 fWx"·¹@A‘»ní4¸'O>ÆÍå´Tf‹Ò/;NÓ:*F)xÿ8¸MD:WXAç#ë„7‚aÊSeŽ{~ Câ‘`c a$Nt$ÐUSm+Zxcq;Þ  À³š”ï¯*çX:e:«ó ŸàF~¢‚;¿H0¥1¼é(½!¼‹[œ"%R®´r£øøE&NÉլʴ—̬•qµ"sHâIšìÈÇ/ÔÂDÀ>ð_9kϯh¨óaDvÈÏ-‹$K =ðsã–ŠiuT&RÙ3(1>ê·9Çy-‹¡=ۡᨴzõØXT¼m¡æ-h$,”î\æXQ/û)ùÙJEl¥•ðxbÕ ë%†¤Ó~,Î2‚ºViÇLËœKsrËö6ëJñ;Å>i¹ÕQ<“X‰ÊsÅg{“²z…I»Æ' Ù©à H.Ñ|>f蘊ÆMfY ¤¨ ÕêŽKp -AwÉR¶-÷>Ô–öŠ*Î;Ôj¤²Tµfÿ· F<îtÛJ%äíjšÄ5ƒˆ”Ä%Zœ… cMÓB„Ql°Óë2™~¾Sé¿ÎôèM®Å9ëSéãJÒéÃæàù_ÍÈþB¶:¿‰nÃçœ,í$‘á b ´xzWÚ¢&9±r]ìU¡N,nµŒKUàNçÝe†™»•¶RŽAÝ¿øød.M¤’ê®Qo´­‚Oõ}Ê`úÍ8BU/Øq*XnØ©¼6O"g˜ #uÞ—3XðSÐ¥ãÜ«Nî}°ÞªJ¼Xþ߉Þõ¹hŸ9š<²ôÔh‘I_P¨£ìÿ÷ô±öô&Bex6’× !X§³IMQÝæáÑÀnã¹H£ÝÇ_Ô츽Tk+t7æO¿hŸâ~à‹µ+q$So¿ºL…7Aój³¿¼Üz³öº–KœÌ¿À©Òƒ(Ìܤ^_ &)¯d膀5ƒ^|î&C47ùvWìL&…‚¢»Æ²šoT‘Ò-oUà ‘)©X"bÖWnÅz!áÿùúî:^“ÏUÿ‹ôã%¤²R7´ÂÖ ¾Û¸—lÈòÚÀß þãê¿q©áïT£´þÇ7ÛÏÿôâ™[ÿí›?êü[êìüùÛoðÿ?o…ȳõ×fpÆדFÐGÓ@üy$¤÷,÷–ìØÙÿûæóK‡@7þÜú!öUþÕ>‚?j}ü?_ëCÕUÛ¤b¤Eª7 äKõÁéaßþ uÒyÓ²?:iöõàïœW­¿ÖضŸÃÃC|„¸b«¨Š9ûÌ!a'(Z®l°˜Š-ÑÓnÕÕé|”¤T=D[ãÔ˜ ;Ü@ÜO­þ›öYx:xfn:oí7?ˆë]Üe¤:Áêg`Þü(v#ˆ9éM¿5¹šFTÎD×P¯:ïvÞ‡Çïíþø†&i~ØmËU5ûãÉA§Õµ–ïr8—¾ò¸Ó=oõŒŸP*ÞAïì¬gïÅ6ÂìLLþ`Í©do ºA¡YÌ_–ßh`‰ÙœU¾4g"&"£ËT™€R]3FäK¾‡ Hb°#AZ éøIxÔ~mÌj3†ÒkO[“ä*ê šÃMñÝB!eëžõ“h® ŠÔ&êŒü;òöÃ~çý7.XðaŒ*AX§óú[âÁj@ïÛIë4œŸžöúg »Û×:: ߶Å×oÎ[ý£ð´õ¦=¨Û–|q……'ç]чÍÒðsø”T!ÄíØL¦‚c$p/@Ê`+ЭetRÈ–›¦ ±Œ)šŸCAJÏÇ`¦v>Ù¦ž5&Á|C­ì« ”Os¼Œ.³D<Î9VY¦­ô)@Çù¯Ó¿¾9=¥>[³Y¶V¬;e·T„ô—«Ù,Ømnïâ9‰nª³5¦ÆñŒ—šET뇤óû˜Œ©+YoëÓè?HzU8œï¹óןÉD’ñSñIØ9†›Óø|~ŸŸ]¶¾šLð«“üÜ IE=B[n¿o y*¨ƒÆådAÞJ“¾ZDw«/ùuñP Ô_…“wg˜ ƒ!ú IïÇÚ0PÇœéa¬·b•SJE%·Y5 8ªê,¤>óS씡.Àd!ŒÎ 8 Æ]@]Quð‘¬^ç Ê$‘¦~©ëZŒÔA‡bágA{Õ¼:™|æeczƉe›äb8Æ™Püg̬ ­‹5CPù n+ óˆ§v,êÂï¨0$Cª?øeö!ék4ƒ) YA¾©¡Ã±d$Ï„ø‚+AˆÃ±Vu 5^Ø ßöŽÂãÞá÷µz]¿¬›ÎYEeÿÜ ,apó#  c Á‘䳜¨2ÌÊ'毳dúAœ‡Ûéð:K§ürôbš Yïø(·‹§¨âb˜Ôõç¡7¸rȲ²’Ìê‚Ð1ÀÄF’Ž ŽÏCr²~¼§`20à,vJ¸ÐQž§B˜‚ÉÈ‹Ž^-°ìkçþ2¬ÿX³ :ˆÍf“Î!B½¤S¶Z4’Nã„‹ÇŒ0Žü"{Êùjù¯²ô¦,€?ký˜ÂAY¹ ,4­¥\ÀOŸGwKb:µE®nF`(E4djû”–U-¬»žbâKÝÙ쌪V2™:™g·Mg¸˜Y0‰W"—–>®¬6ٚ͆Äeàvw&’ C$§O¥©à;50À¨8¶Þ,‘V•‡Õõ­d£yyr3(8}­ãGë ‡`ÓÁÌ ë¸ù‹w›/š;ßX!Ê& qïCç‚ÞFÐù¼yE?t«~š½>ßÞÞÞÓ~³€ëÁ PaÕ‚ Ê P*Ÿ“¬SÌE©Áîvë帉1¶IúëàƃÐ-¡úÂñ¤M/>fVˆ#"HLŸ•cOö€!Šëuyµo2z7 V Ž(’®^gPôŒ6Q¦qÝ€˜}:sš9Xp6™íçÍBLÊʘ×Îãý`w¯°¯n.fÑ|ˆNé°fvd{ñËˆß ¦Ë8ä áݘ¦*íÜô¬µ<•Ÿ§´j×bƒ2:$ž‰ ÕPz;‚å]‘âM>§õL#že[}¾ªŸ³ò Ù^ïÔ¾%zZÞ• ’™dðʆРwœñ®!›ÃÛÚ]–Ík½¸2ú}y舽 ÎBŽª+~›JüeCƒ†yb¶vJöRªÇ°ëO!nÈ®£îè`>Ï5 ëZyZ6*[i¨8Îõ·I!1{ÛêžåÆx°Õ³[Ûº²˜Ô»~Gæë¿o½g1¶f3ÁŽ/YÒB³C™Âdw, ®Z2„f˜ÿ0 ÅÕÝ’Mêþô7n¤KTZ\Ø _ÿˆ9%dNEs¡ôÄWTQd‚rÊ0DBYƒ=“Qôg£^–ÅAu1ûó’ëbÃP’8WxMBk…oC†NåÅûH¼ì2EÇÐKüè=ÿÛ’¿ÙÖ§YÀ1 ÛÁ³í—Ûß»/¶¿yö'2˜A­lñj1SH“ÊÂßižÿ‡ÿÙ¿è}ÿ?ÿ£ÊãDf2 -›ìç—päpC¦¢ 'D‹+Ðw··Ÿ1”0«yÃt¼˜Pœ+,'„» {ºL>Áõò µ¦SY¦‘Û›u/uë ?j‡ä:ç¸Ã£öÂ# ­ûí£NâÿOZÇÇ=¬lä˜eŠ¢¦Lì°“ª .C ð_b«%ÉRg¸C ÛÓ%7~­~¬ÝU¶FÕ/=E)<`ªú_IïùÚÎöˆéªÏ GSÐãóO#A*se.€ —4¿Ï¸ÿbýŸC·}È®µýŠC$!ܳ挦ÎýX  {A0OžÌ”LNâF÷û“yÍ\Yâ±lFEšëù<›§‹qI¡n-(ø¸þhÖv^ÔÝ7=žíï½õµ´q©ª}X><õ˜\ŒI %C3vwÕÀÌuãÁ-]QsJ¸‘Ù׸·ôΪ÷ß—¯¯sk0$}Hfâ¾ì‘ójäÞ$ø±bþ[_ç<¤…1U¬^JUõËù^ÉúÅÁ0…–vϱX§lùn[ªçOESw»­ç%Æ<îõ†!:ë ÃÆÍæQ‹¼øñìÉwþúïÓ¯-àð²ÇåÃÆ_OÍ?~Ç|¦–Ûqé£ÂhLß„ÕÚtO8,(Ô¹yà#¸Fà§v¤÷û^W ¹åÎ2ÛšëñeûÄʦ«ë£ùBù>°½’+”¤ÉËȨUÁ6oÄ`ɺ+–b(Þ!·Ü)‚ðsÔˆPnm.·@èQa|‚BÂe{v¾o‘²ã c†ºl8!¢ =ƒ;!ΆcµoÛYu }-ÏôµÈ7šà=DPôÐäVžñ[,1d­«™OÙžÑ ª– FÚ_,q­ ÆqTæi±¨áªrcLƒØÛÓGT÷ã‘L”LòHOâÍ¢ÒR="1ä‘”<ÐÛidï97¹²±XPŒ„æ‘ÎÚAͯo(–UêÇ| ¨§‘ žþ„ ×ÕäŒ4ž=|ïªûLÁ¾ÚF[=E  oÕÖ:‚‡‹ìYÌà ó6Žd%å\¢Àa'ß.Ô±G2d£q>,£HE†c™_W ÇÉD¨ùøYC Utm€SÀ}-ž´lôìåºø5Y…€Ë´»G{2RD›_KNŽ/!CÍû‚¯Ú KºÄ³[yêos2K£áuœ“Õû¥$‰Òý2„‚wiö!ÊxÎæU:mâp1þ,èP¢F¡&­é(ƒué}d;Û` 7­R˜” !ô!Ñ„%D=²¾Ó»_¨¦gm0ÛßjV Ó©iflC ËQû8ì÷zgƒr0„‚ü·iM‡³tzµP ”ùn©Ì“t/S¿Ë<€f5[ã+£ò¥Õã­16ªá9¨ e­}míš#ö\IMö£R×”GÆôN›nãw°Ì_zŠ'l%Y™owó%€Y5›âÿ› {f uF b‡žÞÊdã¤ü[»ñI2·Õ¤ÉÁ?S«:MÃÑ8·`¥»ŒÈ‹amÀ~È”$S01Gh1EE,W‹ëñm†yo 8P!„òbqu¥ìF&¨®Erñ0ÜŒµHè9GÑmâVßÖ­Íu½S¥¾¬mv,»çêœuWjöJq¦ì܆ :\†Pš£}Òëÿ:k›áñž¯ƒÚóç߃íÝçuó¢ñ=K[¦ë\© P qŽQƒUƒ`·x’¢Õ€ýšŸqý£YÞ+˜|†™ â òÀ1çª0ž- 5ß´=¤31 9nñˆAŠ¼£™ ÆEÑM4bŽBkÏ39<œëd}wÓÃ3£CÑ„]CÆûžìëÆZ".f>'9[Í^ðD‚ÄØŸ× }Êìf«ð:¯‡ÎøXZà%yÃ̵Æ1Bšr5¤nûì`pd9ƒÃ°}ü: ë+d«ê¢Ëy싧ÁÝ—]B¦¾ÈG!àÛØ█Ѡºò:÷ÚPšŠùÑ›Sˆ)!§o›ƒÚq_õHÕ/an|£>Rôó8Ú“©õNÛ]ñ‘¦nFÀÌ“«ˆ\w”ÇWemÏL‡¹úe2ÃA1þ5„Ð>±ªF!³R¡+{›ƒEÔjûD·‚õ‡ -ðµ_€zÔÀ*›{&(Ÿ*|,Ê^:àðc’èbBÄŇbËrqiêz“£!p€*švq»…þ“óX@•C¨ÅL£Ú_4€3!Ž³Ãgå­ ÄïBÐ~-()ÿ€±¨i>Ç$¹f@ðé"Ÿ§Œ ˆ³+`vù‹Ðð-´¹8_3ÀTo›<(«Rs¼m˜&Ö–ggýð¼{>hGÃXÍâ®78Úón£àå¢x™i:Ýbç:¹”å«`AþÈ⛶KŠ3µÑ¯URWdu œ‡‡¨9Ówʘ}!k²üÓL³ù˜ŽÅOP›ñ!_x%n¢‚’Îvø%µÇÔG½ˆ±V–'Ã"–Õ÷$ÏZLf$È×ù$šRBíb „ µ£¤èkhðã ]ay‚øm¢`@–pÐÁšö¡Æ½Ô­2Z¥ûmîtÃÉBåðjG%nú»sR/Í?$³Ê–|1ê>©‘0C¸÷þà+¿+_Q ­ÓF×à•¸Ø’À"©^¥9„ùöí½e|g ®ãç9>«TE>óùÇW‹à,p+§ áƒÝ Jf>ƒdì€q…açàäPhM¤×»ÖÙa¾ã^óª´OÈìÃ''þ‡×£Ì ä”Íe÷U2d¬è½Ò§f‚ë‰÷§Ý?3¶2F¿;ÿ¦ñ €„t··•Á%G;Õ9ÙáS½i¾Z?ˆÏéN·?}Óz~dôsüºÕm¿“A?ö{õÜŸíÂÇÞ°ÙâÜÚýy¯ôÁ‹Û¹è>–Èx¨ÉûŒ±T0JÊ ÇñÇx\¾àÃÙ¢üË4/ïÔÎO;Ï~.*½ø Ï1èLí׊‡ ¸ò%/ÞýéÙÎÏÎÞ‹À]Ý¡]s÷þ§íŸÍgéQîõë㯋ýì–ô³SìgWöóÞîç ×?j÷u?z‡ÍÇŽÛ=M‰VïœôöÛ¼+ëàðôÜ: bÇÍïÅ׻߾à–;VËÞÁ_ÏZúÕžÍtŸ?ìžžÇýT§%Š/ÜÓbl0%Ï•} Nøòoñ&\F;â:få@xÎÒ×Kõɦ¼ž˜ÔëãÖ›¯4̇¢Ÿ8ø+‚iv`±Çæ÷ïú³¶õý®õ}§ûCë¸s¤¿ÿvûØH!&¿‚™X´Ö°–pàÍ…ah'_ª\Ò‰LU >ˆ‹ƒßGæ‚ÄÄ’qÒ—€z!Z¾ÍâŠÆ/O²'þvøŽUl¹­Žìf°7fñIïÛ±cÞ{‚ Æè¨}ŠÅƒ|Ò5 +!¯B¾H%ŠV÷ð8<ê ÚïÛ§X×¥ør´ž/Úý~¯ïùü¤wt~Ü>yÓ÷|Õ>¡ÏÕpÓ|×+\ùƒ§»r«TøP:ù5LÔ`ÈËéøB€ˆ?´û¡r×üá¡åµð><³‹>€Qù™U ÜY8J§s.¤A8†“dj ¢i•I5š×YûKâ r›S5ŸiW°<AKç˜ußÄóÁm>'(ºóHw¤õsÕõ÷ÍÑÍ©øb R†KV@Ëc´pïÛaûä\¬&ÊÁ?-~öb±kçõ1Î:ªÄ¬©y?PzÕM Þ%S±lInºÆîCŒWôMÏÀßš;¬×:` ÄqÃö§Ú#î¯^pŸÖ6Í=Õ» 3=šS¡Ø°ÓÁb~s Úuãˆ{çwß/ Åz`ÛÒ6Æg»Áɺ¢8 s58M3—6á üc¼Ì3ÂÆ„Ä$ºáeÑÜ~ºuí“v÷¬}d†ç9ëïßz%þÎpÖêò%6B,¼å²’e?‚BáÁëå«ü¸µ?¸,}Òêt¹DŠH88mvZÇ&£Â–ÅÜ!ÌÕzÝ´±Jl&ÛPÕ_ˆË‚È©j ž^!s$XbÏåVƒónoð 8m¨›a}Ò¼Þ©kÌÍË0?xÝo·1HÒ¬ACq“šÛWŠÑ{¨Õge’‚g³«ýƒ:YòéEó$Xêá²áÉNψ­kÙ/¹=B#`]sZzšüÑžu‹‹í88¸kUÒ Åéʼnžß°-˜ÆmF¿VÏ5Ï«®mqã‹Ñ¡¤² ãB$ÄuÑ,%Fß:µ”¼+2º!|+®kzgb°¢9HÇQ&ÄòÝæ3 nøJä<ž@é¶ìÖcXêÆsð_,®*F@:]Ã18ƒÂ1xô–©Èç–vQ40m8UKë«¢EtøÝgƸÛT,È*,³"ŽGFÂFŽÐ;$«G1Rrc¸«‚À-îŽ-ž“éGÓrAµ0aJ`Ö®ô‚¹QÛÅH–j ©(%Û»ª¹ûjÞÒ=Äf¼»Éß4?5p}¬øK±cU&&S/öÛÓ§çïïìµÄ=›^DZÑÅ©Œ{–XÑñ§$Ÿs5+=‚PôwAÖd ¼-”ðìV¿Ë·FI«B¾­C¶v†ooY`çxÊj¹æÁ0ÏŽCî݃ˆ×r]÷2HóR’=×ÕÎçÚ“Ô÷°`º¶´6Gê²PÂN‰I¬Á+Àú|®>NuÇäêyšŽÑË‚É>_¼mŸ÷;ƒ3Áàåe9ïDˆxhÀħÝo^HËÀRC¶ùŠ%QÙR¦¬ÛœeÈñ²Àö%í¦+î¸×}óדS#€­¡€‹ïÊå€Å,T—•ó^©ç:9%oyË©~&\…[7É(æÚ #ElÝ„¢GćáNÙ¨²€í}½êFWåá¦7«ºÐ³bÙ –•M™Z ð\È’¦ Ã`dƒè*ü8Çæ‹°ÍŽLo &€¢˜Å­¬Qqú¥Qò·¸‹bV½æ¼=á_fª‹æ¾F£ÖÜÄf„‚E±•f€èüJ2ãBaS8 ¸óÌ„k›üû&4F jj&lV¼Uð¦Ã4C¢"ªR‡{oÓø£Ä,·R94ûc’'Gµ§™+ˆÍl°od2›k¨Kò{,R$¸ì"-\£zJΩ¿¨û×Xf¡5 Ö¶*gAW^";/dp}š–1ȱàµ$âµ`“M ÃTÅ~g Œ}_–jV‰éÎ8ØþtyyYžˆ_v¶¡4¹ø±í±)™—šnOÍ,.àYÊE+² ØĵahçiÇ´(ŒA18J,¹± ™jXdöÑ ö‰Ä, S¤ßÎ2~9 fahP¥ÈA™â¡œ)`œÚ>øÞàÇeJ¥g–-!Áx½, ÚW~<9è´0ÅÜ»·q;¹H¢â`öî5dÞ®/¨¯;•?AÿvF=ÆzÛõ»:ÖÃüBÁ#>tóô@‚·1=Æj’ÑaÖs5óÁAï¸Õï ôƒmˆùö;‡VtX¯û+]8ERU>®ø"`áê6†*ëÆt¾-z8jõżì¹v{á)W«R½·ŽŽúa÷´nX†xq@* T½UVè%átF9€Òyö­Z¥¡¯†BV jf%¹­1w õy"¡LëJ­÷ÏNæ ˜|ù¡¥â«£Ê´Y6úš²(îo½nâM¬ql㬓 ÷´dõ1M¬»Žòzª@…ئšŠg½Õ-@¦|ûr¢9Õà›Ï•'†2ÖÔ’í‹áÜÎ1ŪRz±³Â Ct¦ø¢†`¶Æ¦ þ aˆvjð;ækA®ÅZ=å+ ¬â|ž¥·ô_¸:oÞô{ïáQï]×Moà×éÚ–ú3™pY5à²ÐÂ:›nÔ C·›PjQqK0úÈ·Ô2ÛÍœá&Š±xoR•“ôЊÂ2ÖJIJ–´h]l*ÅõÍÉG´_-<Ù‘!r'Z]rЙNUºc˜]Vl_YØ‹“Rü¤t`KƒcÿSÚn‰Ní[,&9WéÚ‘ÓþHµNnÝ–¢3Òëð›¬=5'd¿~)Úçb(5—ô­c‰U—æi'¾ŒIãö ®yÊK!“ X"…¸{hO°±*\‰õ©í¬:6bfß•4óE©i¸»¡'wËÃåÝ$‰%Ë#]BŸ¿>ßÝo}^ýÖÇ“);»î ,¥ACiÞ7a/à _Èá.–BUVÆÁÁõ²œ·âà¶ûB¢Ì×Ü—e §•D}•{B}#xâ¾øÁÂ6ü6 ߃w‚°Ò›\)_5CÞ6«¯ÚÒ¶[Œª.…¦Õ☥Tò';¤•bµDæ™7\Ùêq}]Ÿ‘´|aJž%¢›%¡é š >¿£Ãc 0…]9k‚ÖçÜQ¥²‡7±¹Rjój ±fÔ•œèŽMKe «üxE©qÅ).ÀH°¼è Û’]ËØ?SCÀKþ²”N¾ô«¸X&õ,–xšÊòÃ9"8]Ęº—ßN‡×Y:M9¸CÅ:Ì-÷®ÙÕ`q1Ï Í€+x©ÿµÌSNJ (2»"Ó43$Ðæ:–1™ÑÔ{нÎkqòº‡ícÌ FÓa<ƨ´xO3Y¶XåFXúh E‘q>F¢ìQgÐ:8nË~Í> z¿B‰/’B?¦ßÀø0¸ð¹É#B€²»©‰ M ëÐØ’œx­¤Eûæ¾0¯î%AÍà¢G ñ&cÝU Á›(?Jÿª€3®KDSá|Q×ø8ð,ãg¬i­873LTO³a.”Où‚¤^÷[¶«òéó®$7û†ý<Ä÷š+X!Ådé ½ÚÿR‹ÿ¦ûb·¤l”Y`ê2T—Dzç×®“«kðý[F%""ö‹ÏÆ‹\(ƒÍõ©Å…ʨf"Ú»Ÿ´d¼¬¾÷eÈÁÞmÓqQ´Ulþ˜iå8,#›û©X ¦ Ó5F{AžvµPðY.ÎìnS¡} ˆúœá#÷ bùæ‚ B‡Ûq"ùZB‹º#8¸*øx3ÏèÚgo¦³_¾Ó]°*[ ³¦YÙ]½›ºjÿUµj 3£ø$ÖçjÀ¸2-ÍÊ8K³%ÑØðs±·†ÑIì ƒ« ¶‡¨åu«Èjk8„sbrÊ«5ˆø; äÀ„âÐÅèÅÄ.z¯•™±˜yÐn½:6’#t¹I!`½ŠÁ£¢O 7éšHfWøŠ¿çT½5žC>¥/-FD’*€ 8<]mŠ£jd³êæ²ë‰å»ÈÌÚ^N¯¦âñåà:sÕZ -+ @FÓ\ëBçט§å& ã†jvƒur‘ú|‹|UrÓbDÑ¢ 8ž \2¨€v¼ -.rK£«Þ”73ãg›ðÃ9…£øEoPçztä¡þYûd %àÁ”HlÁ ›Ç“Ü쩬ö¥D>{rŠè õ¶e«“ÚfdÈ„IrÍû¨])“Kmß.ÿ,ñ=!î4É?”G¶è®zS´rPñÔøS¼§aQîÕ"Tc@’ÄMO­mWSH/-t –\UÛM´›8ˆÐº+Ð1Ìo‘3K æçà‰€n2 òP)K- ÆQ˜ÕÞ nâ°6y$ £¦±J‹…tˆ LâÛYœ!g8Ál{í(t­D[¡š^%Bh[Êd?BÕA$®`Qq ^ÍR3 Îý$ÂôþÅTˆý¥²AÝåD…ƒ÷|<KÜjƒÊÊ”¯ÏÎô³¬7b»[Ó!QÅ¡ •‚«SÐÊLê+ÁëyèF×—;le©Àã8ì(}›Ã—„,— =Zjñ~¸ Ø雥 ¯¿õ\Ö%±Äc¥úGcÁÈr »h„=Š1iÜ ]f‰jèï¦ç†`U¤¤G9ªêEvûBG\\_Þ»hú 82vCïÆ>(_vY¨o¤3ƒvµ½©7äõ ÷gšÎ!úYèX¸©ÌGH5} É"­§/#%JüϪZ.o¾xD@|KrPo¹Á´1î áO‹io 5ƒqÆ"xŒ¸Å¢M¢ìCˆCÃWJ„J‡ä+†Ô¹‰ñìùô°_G¸µÂ*¢©B…‹S©‰EŠ³%©$:¯ “™ îëCï}K5Mb1ŽaÏ *;=8=èü-øf‡B Î߶úB™_ÿÄ_qZ×ëŽèçq0¹?ÅPUkϤqYvQü7Jó=%²Ÿ ŽÄS-.7ÝÔ©Z(š>ûö…nÚ‡Œ4YÅ Bun=‰ZN-7±B{¦ãPVeaÍŠ[aT¯ø,7Žâ}0ŽÕ¡,9¶U8kÀ8!:†ËOü¯'óØÂ[ÆB'Ø¢MâšÕ¸!w­UatNwþñÉc»Äè¼lf›F²ñ˜Ïý¶úovj›¯ñph 'cç6E‡/ƒ¯òM»ë ½DømåB|D%ŽåŽ‚pP©¡˜ß9•Pç ølR*Œ/‡e•>ù5°Tʳì…â-ð¬àÈ ø¦dŠeê–®JÇôÒ7tYPµƒv[Hží³·ð—Dqkĉu·†>Z¹5ðXÅ­ÁºrëìŒ.¿É/ÂÍQ…6ûͬ¬éydwÙêáhî³|FNûXt“õÎÿÀ»Þ²!A!ç7'îY«4,(Í)_¹¿¯«q–½ôÍ!h@°AÌ;݆ÚšÁÊc¾Š ƒ'féOIWŽ ]æâUȉ° h@sÀ {‡éNx]ûfyQÓ]%Á+H‡Â_·¶Œä'°çéZ þƒ$Y§ˆþÖGHø¦â©û¦*n¾ìVœ’¹j7¯„|ÖµDá­Vy‰=óHU ƒ‚RÉt—>ªIÉsÆS\\Ôöê Q(βp–‰å¼¬möh#Q°J¦£qBV“ü/ŸnZ8 îËîté !N’|'ôÖiœÕXÜUåIqÊ;–f=ÿDU?Ųc Ì›KÊÆÔ[¼·q·a¨y`Ö!Ðjà»wX"ÄD€¢M¸Xû­xì|lÚż´B•EÕOâÆâwûÌîÑÿL°ãFYA¸L"QD"RŽòBlP†¾¹Ž1ñ÷ iÃÓ³>`åÂ3ùms•ð.™>ÛE“Þ<5¯ۙǖÞLu‡M_´®á _ J]&á¼Ó= jï:]PüCAÍwY2ßEóá5bAÕW+üXVÈiPö°a¿–†&úøiceGØCðØéCü}ŠŽP 0Tç#¨peµ "¶öC¨« ò;òèe lýÐêƒ K¨“µb÷Ê¥´±aÁiŠ3:Š¡:Yhµñ@銓6y~¥>sýý³]“À3uÇa  ùËïxC«‰)ƒbAvÚÝPéæt¤$ÿÍ2Ü7€³€ÕüoS>Hx­æ¸<æ¾ÞþŒ6ñ'€L¶Oyªõbl/YÏ cS®YPf9Õ~s{³¹ ê]+\C’d E¢˜“‘fØÛRõV‡ÐŤ™ƒÑø˜J¡¹e±É…Hm¹žL{¸~+—sÕ„EtV0ø­æÊÅ(Ë–&h8.@Îñœt@Âç®µß õP‚ží6Gãñ¦]\ÛÒŸ»ú¶]ÀÖwü÷ÝO‘cŠN³tÈ%a±ãÆF°æ¿M«ãMJŸvs¡$¼Ž}ÑpýF,Ãȵ­r÷zl<Ž‚hsÅÄ\.Bù‡­†0T û>Å!Dºèƒt']ÆÑ<à†ú"K?ÄÓf9iq™5tí[SªQª°Y‘«ÚòºÂoø \êýÚÕº°‹À:Áš8VoÆ]l(¶ý´óâç=[ÜÓWÝ0]L!`ç…ùÝ[j²6—¬(ÍÁ“ a ¦/퀥qä³dŽN1Üß²“Œp¬”ϱFo ‰‹JDˆoßí~ß\ÒòDDü™\<ÈÜl6+ð´^Í/šUØCXŵi7®Âspÿª€a7­®ZHq¹[ÎÞîß ®Å¥×ýÈ® x¯æ¹ƒÃ,¹ˆG!‰1ï±}J„ôÓëÿVÓœ,HcmAmE³’Àd¤÷|†8¬©¾Ž£ ³J´B!€pH¾HÌ::²+IŽÄfó¨â:QÁØD 0•êJpOû,K¯²h‚%x‘V9ƒIšÏ £ôÝ’¶0U„à}¿yƒ6¹‹˜‚m WùN‡ÃîÒ•£ñ;9%¶–ùí[ñÛ;x0¥8r žPë Ðô•¬6’%­)AßRJ@ ’ßXöGòªn.—˜ 1·À OèÓ‘%É … pâÔ‹ ÃW! 5M)‡¼Y„õÿ¦·ÂF2•ä8)ñºF`z‹;…$¾ŠMŽ©cÂh1CXªé—XÛxtÍ%}IãÇÇ‹Ç*xì~O—O'óó‚a­@àØ`ß *ŒÆàP¼•çGmãEº˜ÿ%øœæʲ\’[ÀÀ8æö¾èºâbüJ¬ßú‚oFÖDpã_mÊ_!ÇYx`y³ºd\Zq$>-äÊ;LN‰¢w©Òîr Ÿóª}9»÷Eé2ÿY9ó/eüzE8xè]œd#W^€†›>Î^äÿj R48`‡Ä]Í* ¢ôÑü PwѶDJ¼Íò.ärð¡êÞ(A(ëî¾ÒÌá1àÅhZêYÒõ‘²z5u&–n´ù| š¾„«GåÓ8š\Š*~µ¡¾²…ÊeZX˜ðÄs¼p²¥åKW¹÷…šIp¤Vf¹ë´“UXî™Õ!¾ÇþHÍññ~°kš‘øœ¯Ü‚ ÊŽêõ»Â­òtgÛyâS_ºÇÖ/YAwýLô`ŸYì5BÈ‹~dõ¦G.7òW3€*)³ÊêaÒ»‰È}ÜQ?ê< \ÑË…yìî … r¡yóE­ pn}K(ÀÒ jêÕÏ ²XÁyÄèÒÖ_7-ÑI^”¤ˆ+’±Ê›ã…õ=š.´!ɺHÿ²þÅè3s¢Zr' =açt©(mRª™^è½î“«Ì6Ê î• V‰Yݹ^2F ® îì°=­ß¬ù pŸK.uæNžü¡kŸuÊ1+û"­ mºVçÉ¿1¶ªÂíîU„•ï+K!šB~È °J_ä8³°„úc#xLGŽôi3f«hŸ±ÙÐ ‹ðàá7Ôì2 €9ù=]]ê¼R±µ•õè“_Y·+¯­)÷ÜWéµ¥xÌ=‰½· '«å6 ’fÁ|%¤I¤ÓåÉä †ÕOœÚÛ­ÐÑ›ƒ9Þ ä:ì¸ÐqÞd Ö¸×B, š#Ô¨öyo}hrrùX¡ e5BqÀœsÎ{Âðÿši´Xx‰3—ÚdoíÁy p´!F£êé½çýGeñ?ØÚSxçÝƘ¹™pcšI‚ R–ˆÌ'sù_Ã~¾ÅæœGlºÊCÙ[_^b]1·ï ú®Ð«K–|™@HRªà ã© ÙkB^`Bä ~è?·\j-@$6þ>zÈl8I¸ˆHMÕPêvF¤ò˜Y_ƒÛü‡7ñüH¬ôƒsh¸!µûœŸç¾œPó}”Kðs¨¾°/I¯f<Ë@iV¥€$ÖbMË„½XYˆÜ@øzD‰Š”½YÖœ€¯.ŠLj55Î'|.¬i–Œ†VÖ¤n‡ÂoT)(ýÂGÁªæ|›©:Ý0RÆUë¹<1ßÃí±„Ûœ­rlÛÃ8Õ_ÉÇh Î9±^Ô!vÅ´Ô™>{x¢Á#ZrA¥ò7̃Ž8­[­¼¬]µòuŪ׬G»7ð7ø2nZZâcµbÝêæË«ç8üêb»d¸½JÉá|L"PuUaó3£ãs€ÉI—·ý:Ò¥©)ùÃvƒ¼kA™øÊ3>!g§8†×ÖásºÊçº6b„îe²÷áÖ1+å‚—`ôÃ=mz}¤ç€&?Ž¦Áø^“ûBÑx¦ŒÂQp%té®)º[áíà±Έtoh!AIçÙ—ùêÂWFW…3agWµÎZíî‘/LqO­#uK=S21ô"¤áþDNƒÁÑ›ö™úr$;s÷ 1Syp ØK h` L²)8gS³®øD¹¹¸@¸±ØzÂ*˜¦Ó­÷ß¾¢lx€Œ³Èb¿™ºzf¸3˜¸ 'ßtÇê¢(#±èTÉ1Ñ‚îJR¼¡˜ü‡¨qR?Ř1pÇÁá->C|Sv…´Q}@ñƒìì×éØðîÁÑØB›9’Vcñ?i:꣺¼ " ¶gåýU92ó_sÏ}á‹N]Åïþ^•‹oÏ~½Y]AûÐäö~Çë(ýUsçz¨à w‚»™õ^Ä—àNÒÇfšò1—ȦFä55V^j€Ì̯žìûvÂÞ…Ç5µ¦ÌçTûß÷Nkå’OÝÀítG7@^—ÿÚŒWéËY®‰„àÓ˜¡“8ð³±FÞ¦X°,zÚš$WQoÐn—TÄláTäap¿:¦úÅ3  +ˆË0B3¹šÒ J„1Œ¦èysJf`åF¾¦ù¨äpz*ÀÜx™ †Ée|ßlʯ%JÀt¤c®âHŒ"Cݺ*|^åÔ{yz¡óŒ„ûz`{îx¢7lüw£©`çPÝÌ:Då*Ço·¶ù.?¤zËS˜÷,J²¢)²/g°<_Í6Ö0rŬœ=ÚÀ,$r_ä£Zy_Þ¼:ûqÝ¿Mõ…eø×#0upgý]~Hf!–;`|§9Ü»åú&üŽ”¿1­ãáªH$\0ÇR&írM-¨°ULSr+Ú˜jª0ÓaIé¥!?#Ô=ùñãÜÁ6ñ³y6ö“㺻%xçI*EèˆÙ4›¼“Q}¢g®ñ5@(‚ËxÄ n:`w¥Ä5È $Q‹Íñr¼#g¬yÙ=&˜úÆ—A¼lBÅ¥!Z£›>ò-_\¾ÑƒæYwŽ“”¨ºž­aYÔá5®’bm#¨»Û.¸âôÉ N(ïЙ}7zN¤jÓ|pØ>Pß ý,Ëcøó؈$”:˜Éd{1r¸Š™PÞ®€âRÐÏ0•FÈBLj2§°ÕÕýª­+ióAÛ¸| R€§¼²z|·¾œ výÛ²kÅŠØ]º¥‹°«æ²[wÒyJ§o´Yæ”öpŠ‘1'ÕøYÆwgo;ÝïC£Ð1ŸW`Ó˜ñw -HÕ ÔîhÆì âÎ@æ30ßá®Ï7M'j´$ÇÜóÊúR‹ÛŸˆ6ÖúÆÅC3êN“Ówíþ÷ƒ0¬›„õ O{â‹ÓÃ04Þ¼æÊÆOëììmûÝËàµÐññ6Ñ ¯…4þ†×®vø.8ÍÒàYÝ,H£ Å]†çˈîÒz¥1µ§#9¢òJd÷ܽ/ºvп¤o‹ËXyíÀÄ!ÚÉÉ_¦cðaˆ+ûÉ_VqaÜ•f[جº¯p’]fÈIí•W+¨u!‹Y°àaøÓÏ ù‰èþÞ«4•Gv7ÕfòÈ|S £‚7N•Þ(ã[y-Ç ŸÌ¤ä†ÜÙ_#{S6cP¶$l™LcAÔ‚HÄcfÏPl9ytÀ qó™Áófínƒâµãã­ËõÎŽÌ ©ç¨?”Î+€9Ê}D¢^<}¼Qvñ)'`¾ÉÄ/¸…¼§ükß@ñM(­ÚCd—Ou:¾š«ì#2¿1C|r»õÑQoðüÍ;o?Ý^wpÖ;µŸtCqÿ€Þéà™SÏÀp½=…á¡#û'˜1&‹ ô¿‡«<<Ñ’¹Â¹ ±rÒ: 秧âÒIiÀì øîuç}ûÈAz /þ%P@v°øý´ßù¡uÖ6ïÇ´kÞBÝx!k ¼‚L­”2¨£©O(ǼX–œ\j7™c)•“Ë\¢Fºé|…ÉÈ <´ Ùj=ZbÇôÿ#ÎÒðrlí8i~üä'½sVâ¸Eï47ú6°ódzVFö‡Ìà„x<{z„VÛæ´A¹ ûÆxã½úÓ@²Æíº»$\ryÃbÄe´Þ “¨â`„BqS…44!ƒ«k™»sóEÓäS8”„ÑŒ'5²×Þ mS"RT¢éšR…  —1Ä›p…R=ýà™Û;êE1ßUþ˜Ó~*4ñšñçÖR«‚åU«e¢‰¬ûÞCµØôkÀ‡¬›à]¡^ª ³™¯¶¶ÞŒí¾óCâÇt1HNÀص}"îã+]†Í¿@ñ5E¸ ¢÷FP0„P‹¿”B%7Ìoj@f˜FðêW⥘¹Oα9ãoij?¶!†\ôŸ2Yi¸ó¦ ˜Ë€1ÀWŸ0ІcÑIðžVçX\@Ò¸-mæIfNÔïwÎO©gÀÓ²Jf>aF±W°°QT‡q|¾‹®^:ËÑ胞i¸H@àléÎg”ŸéϭŹí·bß/’98j‚CLq•¢W:·fb4[ð®Üûº"ëdÆ  ì]I>dø„œÂP/º2Ps©£f‚9‹¼€=}õÚ–•&X~c¾,±¶ÇÓ «JžPº‡å@ é+‹gq4o:‰ ]dýr3­³§–6éÍD€·šC,Bù*x{pü=]¡‚Žë†‚•áQñ€^'$Xª’$b[aĪÔȘ‚l…¼#ûonÚC]ǹ! £æÇ@ùÉ”NÕë$͘U,„qúí®†”=Î/ ’œM¶r®…­3G¤¦[×éùÎæEê‚ \5(´p‘\™çG0¨4Z‹£‰ƒyP¨9_3çàÜWÐïS™´¹µSˆ5d}nÃLIÐ1†­££²7ç­þ±ðBìÎ"/c¼¤‡€³•*@m¥Za—×bRÁ\'œÉiâÌyZH†ì̊Φ7PõöO§&ã°©ÁÜÈ%i½²­a´ÝËâ†ux’%;ùÖðe ûuà› Ö_k9Q7Ü 0/“ÛW¸E/6…*TñÒê.xÏŸëå\r5»û§£†9Ú­d<·2óXHVÐ{¢ ¥jÉîÍ =·i¡“[jòAZvf âضÊ&éFu+ ÈZÝUÇD+^ƒ4ía˜"kP|Aé%{·ê5&Bk’.ÔêˆÏø„^ÄCW•·šÁ’´•Ó¶ õ¥¢.«âé¹ô¼½K‚ƒKX›¬ËÏÌ9ê>~o%kH~!绡N.„ò¹E•U ÞtÇì!WÔIL ÿÕE²¿øEþÂù?W‘lÞFMÀß] „¼#ªßYz^ï¨ò2VñZd³4çdb(‹$†€P# ÄùmÀr8÷»±8 Š‚ LÌm%ˆ[…óà~€ÂAuÝ•[L^Ž]oíUIewÛ„©ðw¸ùö)ŽÝ€T¿T+°Â<ÒJ'U†ô~í²4ƒ±&!’öƒ‚V$ |Ã8´2e¢—² ›/¦Ãt2IæsFcÊåKÖM¦2ìÚV2ÍB™ºC™|ñôj~ 9V•‘|$Ó{F7:YæMMc*™ßÂÅb5{µÏkZ&ž2»žÅ¡Ø"Œ“À!åEB P³oìÓÒ‚‚µ¢jëÄC¹ml9xTZ¥¡…•ºØsJWŠû$« _Ìfi6·ÁG!À¡¡À&f|PU]•‚zOóEÆQ²z–8Ï’!ij¾’¬MÆppv§09ýMih3(6J‘:R†3be{ßÚ‰­WÔeWØ-Q<äN¥ŽªcŽ¹ÓizÓ,Ó¡]iɺ©auج­ÉH›g½S¬àµºm)soKî®A8ƒ—÷så,Åò]÷¨38=–L“ÃøeÁ¬Ú86Iv¤‹,„M!‚«¯ô8‘ `‚ðgŽ=c“j¸ ½Ï?)Õà‚Yzczî®':^‚Q™¯ÀRõž¤ç8"5½³0b¦·¶º±éO,T‰,žØŒ6×r†ðs°xò1,žæi²m=m~ûäÉžÉ㯛s-§tGfÑ©†«èö_@µš]ß>é¨ý2_¼Œ  WÑÚ_¸¯kk{#—ÃH"„õqï uR"¶é3>ÏÚï/8Í O¹iÁFˆƒ~Ž‚µÁÛ¬ðEk<d™Ç“pžÎÂdõì[ìqiÒ!çÞxÞŒü‘/žo]$óAe˜{“Ï)x¬§L6ÊÚ<&Ĩ•]Ás‹ÕÉ„ÜúüÍA#¸N0Fúbq•7íúÇ¥µ$ü¨gº `Š¨b³ªŠ¨{ôV!‹¿ Æyt,9|_ª)òZ—¦±Ê:K£4Fƒ!Ô"-áM_f¦ÛÀK’ïT¬ýDÈ2ÙBˆkKò PilRÆ÷ttEŒâ²¹*?¢ÀH ÂÚ6³P! *Ëô^iÓšëöP×xP”Ÿlíè÷;½Ú8äšôã§ÞE—²Þ«•KŠN–!<*÷ zÇöö>š,+‹Rš‹ñžžEÇ좦d=–FI;šÄêŠÍ» kÅ. ï*žE€¤¯E>Œï‚ðuÑÅÌdÈ£ÑAÏNÚ]J¶…5“Î HJ =Ñ’ª'5æ&Êa#B~ ¢ B˜‹Á“ZK²Á^ÿÐ+…l”c}Êèʨ?‰éeÌÍ¢1Ö%ÓÜ#"nVs(²~ 8Â+|ŒÀ2>Á†š`ǧ½“®]aQÅÀq¼c ›®h‘Ç>0t(é3qÀlV«HŠéœö0À{žH»Û•‚¤\<ªÐ¬µk\2op3xÓ[ÆÙø\1à:ý³sűN[G(/º5Pþl/!1Ì©OQ©ÃåpW÷°]⦠t‘Ù¤€ò§Êq˜H× ½gS’X -£ÍÒe¦mXòKúé)Ûnšõ• '`zé" 2T4Kó<õÓÈb0`æýµô‚ì\37 Ê‘ÓÅàt÷³0`«h‚’µ6©‚vW‚9¾QÁ짥q»|C½BcGÆøOUC%‰/ë¥+¤>êË ö÷Ñb=eAî£ÅóøRÚ+¹hWÀR õÉWGõª/ªv¶Ì–’ųI,…0%ðÏÝ’ZÍRùÑ‘qþiã 9ÃÞÚ‚}Ũ-çM¶»“CÔEï{à7Àƒ É\Ü3cUÇ[î/æ¥âÄY‘臅 –ëü¥ÁV+MÛ6ØÌ!è-YN'Ù|†° ÙX„?Ž£VX¼iåÂúk`ØsØÚrgѶËJb¬³nm *óÐÏ„-—¥˜2û°0Û:ýhI¾¬“. Ï{L Ý `aKÞXæî©øÿa›°¼A :Š×*D2a–£jþ6]侎˜…}npDÏÇ…AЃºG¸ \yP¨}a…Ksñ cý¾Jd>5¯_™Šé<6åùü±ž¡¸TŽŸóR“yk¶qŸÁ8Zþ1ëJ2…ã¤ìEIgqFœ…T:°Z„PÐ5¯»›Ò5ü6°.ÜÅ> S°bR uúCLû ¥UtQ Çw.¾É„Uo>G¤Z $ªŽàÙÍxrñ(µÓ“Y5Jº•ÁxÊÖ¹½çsäÞY[ƒ97Æ6È‚!öÂS~é(¡¤N™#ëxßl…ÒuZ½ª<%$ÞY†R¸xZ*5bžî¬öØšH`_bùŽ®nûFy[CSƒñ°Ž`ôR:ÏŠ ”Mi],îÇd$ž7=ÑFò‘ºQë$ÅÖ(@5OÒE>öŽÓ€¥æ!= Ï6. ° Õj4H‡Sm×yöê…. £¡ÐÌ\ó?cÔ{„1€07X ÉF-VY¦ÿÓ]l¥%ý<ŸÅJÚ”ª`—šÈéÃ&x f†s¼ «±)ÔeŽ†„#/84ÄMP§r`/‹Jf1bIŸä'[tI ³bÆzŽ(êÜ¢ŸÈ0VŒ0E8# {A죄f ­Èl(ŸŠÃx~ÅÍhFŽ™Ž Mà(z ùRìxTµÚ2Þjð/ŒjÑßhˇË`JY´Wë•‚u‚öîXSfÁ¡¢|+:³CÎÅè,¬J=ÊFðHö¥+å…˜ \YúHUün4Òêâ |§&f`S‚­¾|éûÒ ê`Š€æ4å«Hæ;jsKÉøM‡¯öfÖf™Å#vE?Ù7Ö^?hÐgÉ0µ­âW…€d:ðÉd¬ÍðiŸ›ˆT2ÓåªÁ˜©fjpð‡C¿B|¨«,º¸%"‘I¸aè¥&Šºe"­(¤b‚¹%¸*.±Ì`¤Nq&˜Ì ³JZ—¦øqY ¿nãqàDŒxÊb\ä"Á-ÖŠ‚¸Ÿ ÷õ¿‡®äNôg§‹ùVz¹År…2]5q•!¬/Šh(³Ôm;ê¿Š—’=Ì9®Žï꿀ɪi|.뢓)Òœ¬zá:.ûw¨I¡Ù d\„+T "mgYšÕ0°£K8 ÛÝÞù›·!QœPø7¼–WoóÞùYï55ôƒšðÞwS8ÅÇ(%s¼çÔ0Û,¤Õ”â$»WŸ4Aªjhž[Ð-­p·ô†—œ÷DÙW¤÷¾# ßù.É„5ê”]š,–¨¸vÓ¼ÂlË\·uxl[åºÑá]Ãh?aÄ© ‹§´b¼hÍÊã`ƒh:Þ#º\0@zÅ­øïÊÍû·oÉU”ÜÅœÇ`¬ÏÊ+Ùº”Añd+”˜I­œ‰/³WÞ_jXÁã<³‘³(Àrx*°,^è“ÁWãE½ÄYé€ûÁWKšš“¯©b”[ǵLÓº]P¥BñΦwùÄjßI ¯( J ¼ß¤B6ýE¥BÖe§<åq¿ˆc£ ,ÖgÍb*Åq¥õüXâò­@ ýÞ†›²öPíìÛ@Ä¢À®íÜUæ%â.“¤žÝÛw’Œ@ì¡g#b%†9ƒ»RC-PãV`†œAº¼¹ÚÞäתÃ+[°Ü±%ˆ)Tî.=Õf»]Hº³L&ÝasÇ•JwÊÅRé²wí6ä ÷ÊÄfõâÙx‰UKëÙ:[”Æ* s;J&Þ­û$å–0VJñjö²g»ÜßR¿b_Ž/ïáR=à3ÇfŽÏ7s`z©‡J@²+Ø>"Fµœ…Ž!â;DE;„í¯$çœ45÷ UòÙ"G/øõ¡FÁ‹wbqK.áΡö%O?&Yª€y¹<6ÄKR9TtCá &QöAdÚ÷,¥qˆZ¾®3Œì–æñQ¬L'ÄàLÆí-Ê÷y}U»œ¤™³wzØßÿ…í¾XdÙ:ÄQTxvžÅ*À-±Š£Ådr+ïP®HÎÇáYGð‚~< 4'Tï°sþ€gÌñ¦Çé®ñÁÛD;­ÕIÐïê(¼¥&õžÖÅ)q†Ç/½Pö»„ éùâm²$ë ÅD×( ÑfŽµíÓK0`B¥ëôâ!>5Áä9Ëǵ2¢œô$E ä*ú°eÐÊWàßÄŠ,½ÀRMšÏ‘²TÒéÊuvîåÜ]ö[ ?×…5•ˆÅyØrÏ3ïŸË—y¦ÖuÆ°õö‚Êw‡é‡è–Ö•“ *:9 OIç@B dÿSšíU6¤Àr“kDÚÙ0 ÑÒ| â!W´uê“AìÍAëð{øó¢ ÇÊ·ælB!Ïg9CÿjtÝ‹[í¨b“Ç$š U+ËK©Ø±ü¸æÎzëÕdÑbŽß¸^Ç¥èšÃÜ!\Œ±‰5ñ@ £x Á´”F íÜb/h~¯ÍêÁu”£Y¬ÐÁ8?F fôò‚¯n¨¾ ¾¦¸²SySÉÝ€¡‰åméQÔ)´£ÚÆQæÙîB›¬ƒ˜"|¢œ&|˜D„I".ˆñ­tñªÈxrx70OD>ƒ[Í™uúøÁ×FR’=–#<ÊkøFKd¹#SËƌكÎ@¼ñ\—b–Ù‚Ò9S;öçovœ±Iœ£Ö½éL(†&”º9†t %v|T .£y|uK0åÒ&ØÖQg¸°Ó=ì·OÚݳÖqIñwœv(6‰ÌH4PÊ“äc¶FE{R§ õ­ÆÖðù[Âõ|ã®ç;¤ª:Lš‘Sµ†ñÍB š®4´hžOwM€J¾÷Ì2õ> ¢Ó·g!¨3ô Ð ¿íc‡ és§¯B¦*ÚX»«›ŠÉ¾‰r¾)Ø2s}1þ ¶õº.sØYà/,…殤š.9‰ýþ¤½;oúµk.зaa¤jT7lÖA±o[ƒ·µkËè 6q ÕçPPð†›€Fs%Hûê–6«A=ÕUÓèoÛ‡ßÎOlÅ[ÑΆXé´Q"¢¦æI^±  %”/¦ [¾+û)dˆ•nMéæx¶gÉUÚ"–.‹{ähÐj‹ÐŽÃ;£ SïÚƒ“æjŠ±ðÈ¡¯Ù[} (è:Ï €,¨&”‚/ 2ý‡|@©g•ÑézvÖÏ»çƒöQe“Õßäà{ö¡pÜ…²=ÏÀ©åôTþiÖ¬Õ†(¹`Ð!‚6³ÀdZ¸•œ¿ÛÝ vÒzÿx¶X•¸ù4x¾ýçÐ=T¢Eås@?eŽ;@¥4_äC¡ ŸUÙðÝà\!ÖÒQ‡F%ÍÌshÐ>q©CT´Uu©O¯™áÌú/V±à„^,.²§ûóÞnë;œÐ ÝW“ï±/b ¦Ð’jîñ)¦Ûç£À«%Á~Æ{ý·ìÒaè'¦,`ÚË®'9^X+´®£1/› ïaëê±àþÖî÷Šw{ÖÏë2̾“˜˜xO“ïOž$uÓœz~Üë¾ OÏúB»[LuLî(5ìÇDdÿ¢ ÞjD •Ae„ ²/‰T7Á7êbªµòµm™N §l“¨F r|ÁKL²}â©Aˆ¢¿¶=ٹ߹&þ4'ÃdŽ*Ú­èì–úòAu ”ˆÓ ‘ƒfv_GàaÉå+¡$K—7ýÈ5BÀÐHð/G™DHh*Œ]0`ëÝî÷`EšCi’º$L‹úêøÖ(´#ƒ¥´+Håy‰wfé,ƒ˜w­(ëKâ>CjW:eËXÄH™*N0¿N3XN2Ñà>à-Òö3IÅq¸•™>v˜!ôažŒ)“ F#J¤ÊPÂ×p‘‘ ¾Åå%œ«f Ïê”m¯™wÒt5ƒ/t…€’¤Ü¥ mJp™Ì¥¹Hþeœi×=lIËF[rÔö`®hœ¢L84±ÀE§‡»/t5NÓØ6)À  °žÖÖA,XjA‹ÀqbÑdµè…gdÞe2t0kÁ£2L ¶Ø!î=x?h‚ã»uÀæZמBn o€:Z3àR°>f1®Ž—éêÈ"…¢Ò¼Î¹ôí}ZVƒ•¤U\õÔ#ÜäÕ™¾Åø0£  Ö†’íZ0ñJ»ûÅL2eFY°×%ë¥Ë·W„ÕKCÀ𾶆ÃN)gî‹ö¶¿ÕJ×¼^g£;pòÚÍwÉüø\¯È“'B‰ýÆõ)Ûc,L‹ Ú8´YÄúŠ«-2l…¢BX_Í^›në×â$!ܘ ÐÛCŽZ­õcŸXGæûÓPø…ä_Äôx=A ø¥è=G ¦v$3¥)ä.ä•5Yè³tŒ’wöYzË+ 8 i/–þNá‹ v?¤šDZ Ñ1-Ù)àó¥¨JúþÁ¾nä.«:Ž@ðÛJÔÎ’v<·m­†•Åo×b”¾úlÝ 0t]§Û;¹ œÿä‰Ð¡eYbqÉÆ)ÜÙï£+Ωæ> À ~=‰­£'É0Kóô¾°³„‘Éñ>3S0U9 ²È í Ž™Uá  è8™{%˜^ÁâRs©Õµ>@Á0’u(Ø)„8*‹:ÒIvÍ’›éNE3+‹[ÑbàŠî{Ú‰G­5ü¹lË´z®ŠÜAõc+=ž,®ãñˆˆ6T…¶û‹–q6çJ‹©–•‰:%±(‹üYNÄašágT£ÔÃê(¨uËÇöXèÀUôIðC»Ð´ÃãÞJíž½®mªÃZ+Þl6£Õ}MSZ—îxýxž%1`º°7ÂvÞàB¢kÖyÌtÙ Ì%íÇù<Íh7e•!2"ÆÆ%£-j¶eBð/‡«}‚…Wœ¤`eÉæž|¸‚IYŽWI æÀÿ¢GÝá*\CÄ@–´r\¢VF¯Ê¢°vè@˜ÞZ ÀäMsyq̉<×ÖŒQCáJ£hʳL¢È®Àïý£‹ïU^8¾FÉÉDr¹í}ŬÞ,®ieó²kÕrª>Õ°$¡I9gÖ‰žß¤ºŠ*ÌZçÒ@E0/$ë‰ß£® Ä''iÎ.{²LÜB´ ts_êr`VWÑp¸È(p³Þ…’Æ¡q n E‘¼¤ªThó½…hî…žÁ,Gg%ÕÂ]ˆ75WA^2 ˜4²jlàÜ@KÅQ§Ó&}Òȹ0ã 3˜q‘LŒvó/“êzÖkÏž›&l{ßKÆŠ¶VD°æ—ëá<ÖɆLœý§k!‰=a°ŽÞ^™Øuk&®‹ÖP )+sÚœàó¨éysM4&$@ˆYÌHu,ãäyÓiÌ­Ác.î¦)ª«DžqÆ U°óVo¡UÙð2·*^gfcÊ*c×isÕþWà?ßü^Ñø®ˆÒ¸ ­ê**\è?éâÖ£²îmŠ ¥žuÜ‚#ŠqeB¢pŠ4 ÙÁÿ%W¿ZЃÃÞé$ø“o,PAP5©«FfhgM¥jA¦ë²n—µýC$ùE’ëú2Gw¹×Út®‚ïm]'¶öb³_.Êo§Ã°T]È–²¢º/‡¶Bk9±Q_©'Æb˜Q§²4ýL‡ÐÁqzE²S‡ ©D+©ÜGŽÃ’é6÷Ô|›÷qŠñ¬îx†Ü-šñ­XK÷Zaÿ÷]\ÿ½Â¡4[úÔ c-ùQ_áFh¯yƒÛNpt‹%5¯ûK ~e§‹8ºù0Kf†Àf(î0Y(ÔfYò¾ÌÍËPü/!+IŘê†# B!êBEçoB&6xLÓ‹T\ØhÄÎâœztÞœ@³¿ Úo~pšq”¿,% QuMcZ“ª]¡À)ãöÐ-cJ¢VDׄÖÓâ`;üdK‡B]]YÅ mU1hlèRå5‚Ø:è©ô4%Èá•‚ÂLq˜ø”©+x;ÅJ‹÷ÄÓÍU؇‚c@ôlÍ!Óþ"9d~æÜZ†ñ¹5¥@E£ðÍBŒ_Œ‘S'µ\Œ2þa‚Œ×‹1Æ$I麕a¼ªMh×éxÄýˆ‹yœpìï¡ ÷Û‚@$6r]áÙ­Öa”/õwrØ­÷´pˆ§"Àd4ªð—ÅôÃÞZGÇ.USÔ´‚Ÿ­¡Xim˱{ÝãW ä‘9ýz9ÞÙŽ¢9µwrù;6_jt³íO_½ß4ÀËê6¾âºGú÷ßF±ü¬mÀ>¾Ð>Ôà$ùw¡¾¬¶Ö/ë0à+ Hœ¢ãS¨xÜþ¡},–à°} ÐNáëÎñ™Ð>…b¾í÷!‚Ó,¢ _½>67Ž? jËz¬×¬Ñ[;uyCêBXƒìuß5˜Ùi'xlª.u`ã]§½NW¼L¨©õªƒ¶û jž‘‘Èl %óÚãÀ’®}XáádŠÂWf-ÙÇ ÆHb Üm}zÜêtöF={{ËÃðÍqçà0 YÖ¸ Ô'ÁwÁ.ØÚôBÖÙ…˜%ùÉIG°gzP ‘ ®ÆÉÅ“…NôƒÑêQ0“Vz‹ìÖÜ%ÜI_} ) "s#µ ('-%&ç …’YøC§wL¸d— èƒRÛ©Z‡ÄÐ+¼ƒ¼XäöyAeG¯ûí¶PŒ¬”™·ç}çƒÓó÷õÒDç5á"%OŒ”.+qÅß¹˜¾ŒØôªs£m9hÇT9r…¶AHçÒO†ñ‘®2p‘Ìúk1AŒ&ÛÎ CH —ñ}’B†6æ<&9cÆ)*¦tKº°4Vp‚¸…?çó-Ñû›æ³D§ ‘á˜h¯)QvD%ÈÝÒsFW {s£yá&¶\7ÒÁÇÓÆ‚ÕÝÑbrfÝgP Ñø*‹q=Au8žÏeÜY­x¹ÄŠœîh`D &°Eè‚嘒EŒ,k“2 å4™,Р@#ÕAë0ÁÒX£µ1»°]¬ Ä‘¢dÕÖsŠIÃôM¹öÈ;/ôoÐÌm£Ð-ú'³ù­Žó²-Ê„Â&6šê×—Ì9DJƒŒŽ7×cäž4Gêä TŽ®à!î-æyxÜnõËÖBÆ¥±œÿ` q)d¼zºi`MDztĘÒÑbˆeVè¡É¡*o;ƒà]ïüø(8h‚Û÷ú}!`>Xwö@£ÝÎcH°—¡PE6…xÈÈÒéUciW¿ „¬M.Øa,×.ÇÉpŽ¬…OjÜ:ü¨„´îjœ¦¸ê”Ñf±Ž8 {ˆ>Hj^bJ¤Á4—ó)"\}À™ »,Ùü.£Œ…ÐÊw+|U,ä¯`²Æäa.#UË÷:<‹Á~d:Bn6&ƒÛ$áIÜ`æ LòëdM?Hã"%½Q9\Œ9Ê3èßèÊ=ì9ÄJöÒ±ºüt˜ùqõþXó56oC¼¡?–gþƒ˜Œ™.èA{èÀz‡þ¨ø\e@Þq±EWñܤ7¾åv0‹^°6È9 ¾»Á${L?mØ Î÷•ÏSaÆÂÓ‚BMtˆi£1ç˜Å#$ˆøÉÀ@ôLõ3W3D{)Ç-L[WƒŽ£dBî0Éߤ ¶E¬†ƒ8]xtXdÒþ_ëç0œEæbùxˆf‡p%Tg…ö|zÔ:¬ ûg¾\LÇ'Hù>PkjDG¶»Gpà¹;BjÝtΞ »+k¹ÈUE¸Áb²£$K‹1Ó8ëf±)ÊF…(rK—æ¿Èýùn:co‘S$ ^‹pú°Öd?RžBù-¬ÑÐ,ÄYÛ!Ó«ï&u‹pcÿêXsÀ]Ñ]­]ñâvÑí\È’ßCÑó( ç Á‡ZW(¨xk)[–!ì•yû^ÕCv=)¥¾÷=Øw¯@âb?­h£?w­'°¢9=½}óSHùiTJ¶§÷+¿–®è홪4fÒÊBO!¨·ý¾RÀå õWJ;7k…}·Zý÷/ž[«ÖêŸÀÞŸœtNu÷-‡½£6¯E°õJ¬_W8®Š~¿leKN{ïÚýÓÃB­Î •!5FÁù¿Îð«¦UpÞtŠ¶Oçy+²ýþ0<t–œ+$Š*S3ꮯ|­Øm´i‡éðÞ®öÕZâÞàõŽCùåcÚ%án˜b²°d½C6%¦7Õ‹/èô;ï¿©ü†6Úa<Ýà‘õ÷&ÅÇnáL[-Ô™kOfIÆ!ëÃ&Ї)ÅXvž7@°ë´ží’[?‘Ù'˜Òó÷ê€ØÒ¨•ÃCâö5’<_ èã#y“GATɽ‚–åÙ{¨Õ…5<-]‘¥g³”ø|¤tÛ:êߧÙy÷ûnï]w­v8Ìû4„öþªNˆµRƒónoð °áû¬W½À¢‘w{á›öÙa¯{Ö~æ:œ(Û~šÛ.'¤šÁl]Œ·p-Yà<‘&à,º ó¡Â}xX¼¤âOC¬FSjB‘tÚÇ{ÝúèæZ²È°b¤°ûŽ)Õǫ̀¬úÎŽÆ ýiûçÒ-†óŠ‘”ï 3!Ÿ'^A´ÿ³ù¿d!W*FËÜrF–3EšG ²ÜB£’%é×1,£‚…Y˜²h‰$B]Ã*€Dü´Êà\¶ö+W lovd©yM¹&—R›˜æÄ$™L%IÅû’YKÇå$ªrŠ(NÙ-˜¼µc&–ªHÍ)a†BŒûÜsJ…Ùšª©%õ^›¨¤ÅìDó“ ×Á航N{æ¶àÑfv}›Ãõ$¡ý<è; m«7rÑЬ|u#§—ÀÑ|%ñ0ÄÐY|Õ­üã0a­ô¿ ¡Í}XVhÎ*@eWõò½GFÕlphî†X•Uœæî<ŒWHÚ¥;Ý7¼¿ÄÇôëÚîv@$þx¤Ìû^4“!gЗì(˜ýã_€ +Í]é%Äún$ŠƒV(ˆ Êé4@W«Dæˆfp_\ˆ#6%„§)cLÇø^0ËΆíÆßOjO¹£+(Nfj.#SPºGBÙqÝO{Ök ¤`evT9#û<›Mÿ–6è¯Þ蟑á‘ó:&µ­Ü…Wlxg+>‚7H Á:ûPeØ>Ç¡gÜöžêðs­­í»Þuvº×ÚŽFã5oÕByŽY9W€BÈÙyÇøJ‡ôâ°¹Ò¨ÊÅû6x×÷ Ãö’¶P¯e!…zÓmPË}}h ´*(…Å;ÚƒDAÀ rqsWµAï&E û:öGQTŠ 9}5‹TM¡|~;Žù:IÀ"O™‘ è]»ñäЪ¹Q¦ö_€1+_{lÐb]‰Oõu6(šÏC™¨æ¸ùRd= à7–çýñ ¥ï7±-ä^F9Ü ˆÖ%˜?ÔQ¼Âü®›xG70=„V~¦Ðöì‹ýÞy€.3`?:*phZhÿ—óc–[¬pÓ³ŠäÛ†„ºøkÀÄCó– šÍ µX~ÆeS~½S4)˜PöÊu!—§j^zç:* ‰áQKe‚•áˉK^IÎÆÈ™t 'ù‘LÄ|&ž"në žŸO?I™6^cø_Ío'rÓK"ßè.‚Œ/à…¢Ñ‚‘‚\Û0vàcTBQ#±Ní9Â> Šò†š¢u$×]\Çz\sRÖ‚†Ò0Fj\çÒÌcM X §Q0‘,ù¨Ç‚ùbä^\š 5ôB' wíóð89ôŽ%=à7âš_Ê s¨=’€Ê[gŸ>øžî_l´à—<Õê²+`f„š© T÷2¡¯›w,ä3…¸R E1cØ)©ÙÄŸÓá‚¿"ü¤O¼ŠÿòÀºí1³;µž×h7D„ 4xûà`Ö®Í"kú_á^pë£ÒL 2Ü »*1O¾LÇö¾ë%ƾH»~ï¼{t~J‰#¿µ%¸àÛIü£h2÷²¯†ò$ØJ¥Ú᫪Wš¾©#» "jHPòë5–2¤KH7×ëN#-ËDÔ}MA4Sù…¤¨‹ü…½RrÃËG÷›æâª)y[HÐ~ìÕ~àÛGòø"âýßÐ.hTaNÚú-ý'íÖM{htp5À˜û¸˜ˆ…ˆ‘¡Ä:‰Ÿrbâ×f… ,é ³Íó›a2tžÖ=î—¸GdšxNÅâ×q“(ÿ dOÜ·51ñ’Þi»{08 ÏÕ†ÇyÖ®×h}Ûm×Í#ÔÊ2K¢Üò|>Ã'ÐÜÈ ¡âþ¢ŒuŸ›¢×HIý8w‰™#&³Ð6Æ·\WΠ㞧YvÓ̚󦣘%{ŽÏxîছë‰êjý…œä®~CD¬Iˆ2Â)×´­Âðñ—ƒ.3ÕHåè­BVªŠT¨nÅÓƒ¯4ÜŽë€à§S•3:«'eÞ¬%¹þñC¤9\íŒ P%Å3¡b,6|“}Fpk,qæ×…ÓÌ¢ßyo×"%®ËG²ÆA`»<¢Ãn°1Ïs-h?ˆ¥6˜<|ÇBß—öR|¡ªeÎÛÀ‹?P,ÄW®õaÁÔÃV^‹]=28”¹¿þ,ÝZ~oY#—ÅôKŒ£þ·ísüò‚‰¼R­Ò2±_ë5}wÞtÍÕA€çÍS.ž ð 66²U/ñå{ðÄeÞ®ï­7c6ºWúƒeV{ãÅ>Ä´~ŒzüˆÃddHw­yˆGÍE÷©ãR,PÑå£.> "Á<ñ ê6OËÁù ì°`uêåDî²2o®˜—Òz<ød)å9at |¾Ò²3akõ‘øü1yk…A)ÐßgeÃ0ŽË=g³ä(•vž>öuÃEГrq["§5-“”gOKV«Òq]ãÀBÀléyUÂœV8€¸Šð œM<‘|á Ð Eé%8pÌ®³ûWh§N¡z}ÃgOó†ÙZÐeŒóÞF¥¥Ü´{~ìòÎÃ^÷hÙ>”ÂÚ‘¢o°dV.ÿ/DÎÅ%«x¢O9Ÿ&&ñ÷]2=lˆÛçT Ó…d·•2eM¼”Ë=Çu'.Ú‰¼7Lr\Q„£x¶Q&Æ0í„àE²‹hCóÁ MÈBÉ5D»ºãdɬ‚IÑÓu’u¨x}2”,|Ûn²ŒênÌŠVÁoöWg}8Cf‡Bg}È¡x˜`Ô†”íÀêÛm·êÑŽê«v} 165ú¹õêú"Dì%.i'`ärëXpÚöQ퓸â¤uEüþÈY ­`G¿ 'ÎQ‚ô—µèCó{#lÞ×Õ»˜œœÙŽ. ê*Ê-÷ èöñÈã‹7õð…Íõ= _o™CªŠV .M+ómáÁt:O¦‹xo£<äC<ÅeÂ.+n_ÜÓÒ‚§!@X\ ù?ê…¡[u’ìnÌ̚J!¡  àWsײ$ÜI ¡wð×pð·ð¬÷¿¬3÷6\µ¢†gÇTkq ÞÈïls¸/ÔPòS«¡2ZK¦³å|‹1G]$+åFx²Ï‹X¨Ñã]ðB³òźÛøìeùbKrWpÜI®Y—>NPÆÖö\(ʼnÅK;σÞ÷„p’ëòQbL‚á‚A.ÀÑÔ"òðV2¬7Wù((õÞÓagéN)QcµL¿“¥Ýýgâ·é’<9÷€)_Rû~Kî‘ó=åů­Øˆ*½¿4:Ò?T©oaʲtc¸Uœ°%XÄÁÿ’¥‹\¥Cs.bYŠSƒ9çA¼> áOŠÏG†Š»£ü(ì:üf~¬Iš§v7UUdTDzLã”LºÒaÔ96ÔXè¼Öoš}hna:"a€ ã÷VV„ѳ‚@²¤ŽNM!êpª¹„¨mbÞ:@t#PoTЄ,qð„0"˜d:T€D4³„22Њ›¥2G úø—… /z9ì°ú ”žc,׎[ëóÈ e–i™dAïuÑÇ™š|€ãt‹ÆŒQ‘1P‚§bk‡¾}jÊãÅ(ݺ·Æï5!ŒÕ¤ÊHD«‚Åj°&\¤=ÉUŒL4LÆ Ô¦ ì'cŸ@™Y,™¤Iq\‚ü®8“Ç`êÔÊó&.3ƒö‚L>Œ[èOLظ^hŒÔͳP˜Rˆh|Þ?¦q4€…{  x¹çsüÓú¾¯Ðu¾­¼ô¾CÐîJ áTaIÂÁß‚Ͼ}®!ïðn¡‹kªÙ¶ä´ÚÓ (ÙÏhùÐx„­`øÀ%W7ÝX¹@·öåÜŸoÿl›¾Ð&À VTÚô74K™Ÿ‡ž^ ïÇD°Êxî)I¸ýéòR•w0mêf•õJžë–*øÕxàÈ^±tOZ(²>€BO Žo‹zaþOÊg^W¼iÃðêO)ö­&–VMWü.Ñ&RÓӯƣ§0ÊQ4ß+æ,Õd—°/F[0±ý,ö÷ë¿omŠ@¼í©¸é}½°È¯uÛÿÎO~gn»|‰YAŽÏ÷NõÀ§£6øq^§óqÃx}#x 8f¯Ä/Gááqb^QPðLÓAs¨|ê­F>„ÃPNšJÁöÑ€@Âa†UšqŸjîYó, ¶d£¼½*i¾¸¼L†x­#Ô£Dö¼ÉÑCòð#b/|±QIž—Žûé$šåŽåè!˜";ßàgXö^ÛQ?2@®6aòõ>Ë¢@‹Ã0ÛÛ0҉Ŵù‚Ìí%¼ ?2ºE5Îhñå‚êU†%©™„7 <°|ç¸O¹ÂÕ­QL03‹X–2®Å7’›î /ØsÒ©áq¨ã@Ô›Ë'á¥_µ‰gABåf‘«Xà¶%dˆ¶ ˆx唜¸<Ù—¼kÞ5×’'å¬äû|úŸµ—zyW©BDƒŒv]LuUBÇJ¤o›jÍË&(¿m¾È•åS¢µÙA£8În­Ú4S!Ž¹µáŒ"g»MMgxFè 7ô¸P{×, §xªlõ£öÁù›ð¨Ó?û1<èœ ôÝ:N¯86æbáA†Å)û¾hàðº}¸^½÷¦ccù·^ɾ ðH£Oöå{:)ñŒ×tý!Àì´_±¿ºfwðï£S R ž¡UüÈY jv´'û~?ÒOH~l=£™´ !P²)Å) ;rpb7Ä¡ÓÓ&Ž‚ØêŸj<ô·wÛøº˜2…‹aãQ?º‡"‚Êû/Ù4\mcõ¤Ã…Öû‰^«ÇÖݦ¶W5Óó–§eOv²¯Çç°47>†±M< Nß„'½£ÎëÖëÚ(¦1úa*ŠItÉNãOóPRŽ;£=OÆêŠ ÷oü&±®@øRl6²ÄeéÆÞ4q\LOñø1âÏå|¹êzº{ÁµIÂYÅåÅý*£Ø•Ø®|Ùç«2Mùú“ˆ)5¶EñJë"IÞg€Éî‡v”é=ù*ÔçŠ)TñøP?=ºOÓã]«Æ; ¤„r¶a‘Ë*rØG£ˆ¡Ùn~=¥›×›†tÛÅ‹ öl÷ñÎöî󺾜wv¿ N¨[jŠ—è‘ÁU÷µ%“õV:Tâ©B›‚"QZ³-|g‹‚ªä³t:"kû²íŸ}~9QC† #¨×Š¼tRI¥^¥±@$ '6Í“ (§ àßXEÃÐxOã Í®2ˆŠZÌ šÐ«f{ô·]×?ë:êyÄõA4RhѦ÷µ¨òcŒEM®bÃRƒ)å± ˜Q/"+4o÷…"~ˆn=9Òñæ2,'ò#ßYÆþJÀGÿ0fòØ"˜èYȽà6I3,®¤\k+ÖBâü¦ÓëÜ.O€Š~è†l˜Wœ¸á°éwð,ý^d­¼ÂˆÅ%>Ú8n?²•½ÿÐ¥&Æ:-ÐÀÔKÄWcï¡bqmÉŽ7œyO 0Ô0ÿ¾¯ëäÑI}ÏéilÒ˜®&ã =)Px}iÝuãs‡Q]ƒÓ¾£õ{~FòSš×A2wü\ÿҜƂ—€fí!Ø#*üJ½X{Ë©ÜßæÎ4òóµU(Maÿ­Øo™ÔÅ ç:]2OÀÄß€Ë #r#°ço¢2õ69±9ø&€'2Ãÿ%¯çN3hÍfãøë+>ý4]ˆË¸P.~n·œ%“t~}üµ¼KÓ‘h±y•U„gð–"6ó`g{gS Øy¤7/Lq9,fôÂ4ÿ´5Š? ¹;Ÿ¸*777Mõds˜NžŠ»i<‰¦OŸòcüT·}º»½½½õ×Å4~º½ó|çOß6¯ç“1÷õ¬)ß2æÍ!yä„߈ý ÕÄ%in(lj¸ä ù6XcDyF<ùtY%Û¶Up™|‚ô J†BNÒ1ö‰àGX>[ôv•Æä ¼WF1ô{ß·»ØßÛV÷è¸Ó}ÃÔc—„ÿ¡¡¿øqˆQäž/Yx¾ƒ:ˆöÇ3Bˆ@·­N«’¦L®˜Î6½ H†Tm†«VÅ<%Q!`ë†ÕãlÀi£i8ßp›<Î>Æ–ï 'ùUHQY!χ`qå~>ˆÿ…Ä°¨/š^˜EI׌R› üÝ <4¡ç*ÒO€\uÃÂ&ÓÅäÆVud!B{¹ñ­7ʲö´Ý46Hù(¤ùùã†ýyië’w}VëÇë-h˜Œ®_\ªÕVvÕÕRXøâ¯ê¢Òªèµ^Õ³˜knðšÝàêS{Ø`𺽠XY:\rêŒõ‚¬ÕçA,%ù$&šº»¡?¨z ¸–‡¶øe8Lô¨žä÷X ]E’Ñy q[(>j½+0ƒi4‰ kç-¢¼zÌ}Â?}o?KVäpZx5¾–hÖÛ›M]ˆô‡¿{ûQßz^äë Mÿ¥½©o‹½‘Hð1ýö™…³d_v“"ŽH²gñ ìvº?´Ž;GGsI Jâ½hîµa€êôP<^…UrÏÕtõï¡+µÛ÷ 0)/ž´Þ[ÈÐý³A°óbcƒÕV«`x¥± Àm=DHêç’çòŸý—+?1Òk±VBŒÇ#¸&ë~qú­V¡ÄVŸsÙFV`ÿ!ŽõÖ(²Øû¾)ÁâdÈ×N(ر>ê·‚·»š?FãE¬@ÂQV5Ç!ã)oº}·¿žml˜5>Ý%+~Æa` `Ï°wÐL >ȈàÅÂO¾xã8©}ê…ÌEõòòV«›É †FºÖ˜Eh"(Ø,irÔ 5«Ðÿ&3)UƒzT A¶§|*`€"O6–gX4mŠM è&R€÷Ã?|ž Þ¼ENMþžýxÚOZßj^÷H‡%;bÿ¯Ö‚KŸ¦Ñ‘¼±¯XVÓà~þv8Ù G L9Ô^“b“|ɈW&C5­[í‘ùtƒúƒyÂÔƒßèïþáîŸÇâÒl{TgîNÔ›š$º§¹^ôÎI»w.fÕë¶Î,è-L¤VçX­Â‰ß’Se2§bøévÓèÛ»Œâut AbâTC!?ÀQ^ù‚;>“\bù€>…·Ä½$ ›UN®«Jå?aÞCSvf¨Å—80Ë‹>(• ßøÅçWÏÁ  õŽ’ƒÑ0‡8>ö«þ£(×Ê »‚ÏÀ¸3Ò™‡xüžï»*ýf1x4×é™®MÙ÷CYuG´éö$´J½Úýý ¡£(W](#B\-%MãkEÎ*œÎ0|{ÓÉ .!yyb|=PqõGÁP[¼€¡Í‚lþ¹u¥5…§²Ò}æñ\\A’!GÙ)N%]™_ (£B6V¨£ý?Ë’0,P±ãqÚ¨,¸=ýÚ¬Ÿ*ñ¹£!`ã:¤— hÉêÓðøXàä©€7ÔΈMlfUƒ±`nƒ.™Bmhã Ø#øTL?ƒXI˜UQ 0µŸv¿yÊÐ] xKå^Ôwéè–í5þî¾&ø-ÌŒ]9 ¹öOŠDÜückGâhBðå!(º"LȺUYA+û|g©®¢ª©>ÆãKF¦S‘-èêÞ“^Ñ¥¬µLÆ~+òÒšGÐÝ/¨Á_tWÌtƒ—â2ò0çm‡¡…1O£ªƒØ.6}¹Þu—‚r¸÷è½pŸ½ ¶vŠ)‹]rYm M¿¼h£!õ(ƒ/@ ´KáÛ+yØ’al¬‡BºûXæÚb¯%ˆò*U³ß~ Ô|Øj|«ö@ ü®å²ã|^ €d2ëåW¹|F¨ÝÂîEÖ~ 8VÀòöƒ¯FAí«¼™#Ét^Ï؉Ê,Ó«Z椦ä7É|x-V¦îKì+À‚õ].àK+©ÛCAö­[̆Fçå=$!×:Hñ¤>n¢.Œ)`=7ë{•(KS¬ù¼S—JN…¶¾úd˜l+͆DÏ|X‘®:!ZÀõO OÙH£t¨R>ȹ¯/m”²·>C¨P€à*j˜Åç·¶Öíè:±Œ —³ÁâáPñºwu3Ü$éJ1g“‘Äz±}³èwÄvý•VB@~/óé9b} Û®ÖÚÜ\ÅlÀ7•a[”äG£Â?/¨â¥)Ú˜&(±ŠàLsj륭4D¢ˆ"XŒ ruÕLÕ¬é+ ‰Ç¡¹¹Ôu 4@„¡Î+8ÚŠ:b%’=í…Q:ÒÃ%AÕ‡ë‰L”úŽ-­(éˆO\¢%C[;Ϩ»„òplÖø€‡uÈA›!/âé«”lÔ™ Á…1¦ ðߦ7àNm C}$™òÔʉr,Ø™¾`;1 ý‹é‡izƒYÇ9Àì·? >6Úéhdôˆ&× Ì—‰@ž“ä?RVX‚]$:[E\FtN±M Šú°P„¬Iœfò5€€íw&âùmEYÜ45 8À/HcäÁñL5êG¬~;Ęâ×bÒ°"‘LóoZ&N°Í“+€YDçŽ2¯:VéQ,è:]Lœ‚®3YÑ•kÅjÅ“»à\šÎÖúß@µ(õ´E/@جñ‡L›um=¿º†£‹go¯±Ä<@(í,½ÑUÂ`¯sy8b«YX(êCV'U 4ê*€%ª#F4”L‹ã”­._íß’Ua2EÓà[^«\ûŠµÁlœÎŸ<Ù³2S;°pÔ¨?+íÎ#\RV-RÜò`“zn%&(ór°˜2R˜ŸEsŒ ‡^g#üØ3`"Z<Ì6@}o®9íD(öͨ¢ PŠê{ÀPP[Ê@°\ò”ˆÏ/Ó!iê‹œ+)YàXÿ#ÅRCÁŠKÑÓ€Ï  ˜KH"û\ÉkI5äˆ!§——ÞÈ{Y…ÞY„¤¼Ê¢!T4^³êké$r˜ßâÍ"ŸA±+ÒŠŠ2 ü@´¿à­â¡-TK+¶ÖÒì ×Ul ¬K­®Mñ€¡¢mÅ:ÒôŽÊ‡+êÛBψÑPèµK®ìM=$5ˆÔ.aaXJ0gmzˆš$>ª„ëò±lVÄ©XIÐ!F€QÈX:M,D”A…•yÚGAéPqptƨ6Ûë°,®rpXÊËÓCªb寉“/Í´š‚ö›c);«Oktg(¡YcŵIlš)ú7o!4ã°Ýù¡-äü¢å¤.'„ò.^XÖlSR³Þ$e¶š^Uø¾¾éžàâ63¨‡Cô˜pª™uüF{Ë¥±ö”ÌÑ-ÖÃ%ÊøçíJ¸òlJí£8ôJ¢ÝÔu–™ÕÙfS¹š[Ž¸3ÑtN¡”Ð ·’˜8bY߇­#®5¯6éÀ­ìجg¬ÊcX1(M ªY¡ù¨ÐEOøÿ•ýš©˜›õ›rØME+[#C‰6W3_µš…#£Y$%U™’#o¢q{ÙäKgð´¦ìƒÕ#ø•Ñ÷Í. O.ïK¼|ÏåSØ(öÚNy.‡âÿgm±gb‚M¼üuª³xDÆcSdn¦l îbñĆ£ð)AKŽå³JÈj »O„jÎóx¡„C~Yþ*RRR/xõw~*÷S1ö1±ËYãÏSíW®W Ì„¡š-Æâ3Ž”@³FPLo¡$ƒB^™ª¢%œÑEŠ™qwíqbåóÅå%5ÉFxÑ£k6°Þ1Ö¢ø#ÅKÓÀÁÚ%»BOk•Ô^ˆ7+OôM§”ÊÃVðæ8¯€U(1ÁTìj‰õ¥ya-ìCXóf\{Œ'Ÿ(‘#mT©=¯f™åDÈîÁYb'Áè@ËHâ?óÐ…ç<«æÊ* iü9¡´ÿ n;X@”R·QLñu«s|ÞoËàY ²4nŽk Q@L@g9@¬æ9ÄAT Õ{MSL¾ *© ¡^"¶kpÈSô+þ137›ÍR¸^Gz—6Ávð5{ˆ$÷·¶šìÈ&;Ô¤€íËzjJãªdL©M#Ñ4\Ê#µ‹¥êë#‡NØÇãQŸÌ”p6 †]qáÀÈ)^ä3188·Ø£g¡#R¬|IšuØèeÍeöÞ‡•ƒ1 Ì%Æ"/·+FjX+´§…Žª6)ïk6j¸3¡“Ü*0b"ƒa Z p}%P30¡Çu} ›¾ÛWÚ/¡N^·Ú¥„Ã(ª†¢ eì\Šc#âñ&ÆðAwÏ£à"½ZäelÀÊ2°ûs2yD„D‰T7‘ÌF§Ø(ðøñkD·‹éðZáQ¡ q_cX’¼Ñ›ÛUç’°ë¢ñ&¯"ì¤Ãá"†óµxÎþCÏè ¬Õá]¬»RŸÝÄÐê:¡0L‚tæèË_ÉðÃø¶ùùDÍàt׌£|Ne•÷6 ЛúË6tj R‹8òúÓO¥?e#!»šØžº:yíÉ“Âƒß ½ÃI–)v¶ì˜ÁïNÀa ‰CÁèÏ(¹÷ØÊÁz¹„jjâ¨,}ïÐXÔÁ·‰=³€±É›,Š|™Ù¶;Ã'† Åà¹ÄŽ½äö9ñKjpR”8‘)Q™²(·ºâ¦œ}o¢Û#¹0ÀIhœ^ˆ¡V]µßwÎjuÍ W†}êR¾4íâû6 ôm¬ýÄž_œ#­ÅS(—Þ~óƒ‘qa_«võC¼Û¨èRÇò9Š"q ÂÊ„ÊÇÃÅ<ù›nzOx- #ø=Se©gœ8üMÊéd’˜ìÞE3ïÊr’×À|¤¤¬€®jj?lP¨ç(ó@ÏŸ$ê Dùít.ƒ;·jšhçuLÄ·bñŠy{b“XRŸŒ¡HÔfÐM!ü_ô«W§®#1&iv»¡J Cé$¬ð‹÷g#¤ªHgIý ²‡A3Íš†`¥:IäµCÜ—Ç»Q~©ˆçT1Û (Ž2•ù+ÄG.Âñ™2Qg#aÎÅ8ÑQQ`-a¶w)ŒG<Š6oü£Û Ú¨HvøÖ8YýVgÐ6Ó¯óÛÉE:–ò!©ê·_·ûíîaû(<ú±Û:é€úúcPÛþ´#D˜‹„*&‰•—™ã˜AŒHÝÐР6ÂR,B-Á6Ç®Â0Ê'aXÛlBá» ,Qãa´N•H÷ƽš)]_·¨Ró%¯# ̈¾’¸!o[?´ÃN÷°ß˜¯Ö±IÝv±…È\ ³<Ðf°ª»g ëªÊî¶çä Žqèt⛊Ê_‹‚\ øT¨[c– ¾Œ º¨ôXÆ<4—ê{vŽNçàúí±´C¨v~å#)" Êe›¯„ïå!˜§ ³#QÀ@÷ŠtnüM”AhÙòCà{Í>ÂKÓq½FˉAr\EÊS‰}7˜ôÞnEª0­m€àѲã¦2y¸gM¢K¸fd8 FTåfèÒ Î|IGH!‰¿ÂÞj‡ü}uˆ‰FK¶Ï<;{\¸ä°eÔGeRïäö˜ èÙó ÷²qAI€ òÀLU@Ø(¾X\]Ñö3èŽJkº 4§8'Z¢Fñ¬©rÏ¢9æ9$€”‘ÅivM¹(Á2šÂsH†„áœó_$È£”S0Tï÷ß¾O“O˜aMçPq-u†…ÂdDzóeNGŠ%¢­Ù8&sH냠BØëg¾€ %$·«¡˜ÛlåÉ €Eªºu™ Ån »Þâ®ëbùÄ X»a&Í&ë¿È\’äù{ë“ð? °ððm °ØQ;”°Ø—q„X$ˆ‹msÒ\Í" ÆÇ/³Pì·YÚ × ä:üf6ô~eW?u[ý7ƒŸ÷˜<éx‰Ï.r²”¦VTîŒ;Șøà´ÕGŸ§éÿ¢É“Ϥ|†eS4Š¨F?}ûsé,^_­¿4º8^#â†Î†×/ž‡¡ Á*9u7§Ò­ å×ȘýݧŸ¶åww”C`8ƒÚQÐ-¬[‰Ñ=ÅÙQ)V«a­wÚî Ž «^öüë~» Ï›NÎnûÌÓpñµój镳kËš°»‰-x¼ 6äýyÇ£(¾]ƒ§kó^&™` /4E=*‘iÏ”@ŒÀ#ÇpÔ_ƒäÍ9p³!Y¢¸G,ÿ›M"å?…Hí4è¾î·NÚ`“ÛÀñôÄVÀƬQøšH zðôᲺÕ4V<#6XL…R…ÈøEiÏšZ¡îƒ¸"P¼:8ïŸuºáAëðû³~ë°]W·Ux2À8eÜYꈱŽžNòÃptq´R×,í¬¹ j:w£áѶc½vÁåÒ~ìÒg0-!² .…ÇOÙ7nðÌ%ó’/î·:}~…ú|Ü;$±èÒ0–æy‚÷,^¾TšH Xçÿ©„Àû¹L¹’¬¨B4ˆo± R!v.2,Ž®6—š³‹Ð¤!§h[å-ä0¨ëHfkƒÄ"¨Ÿ Æ'¹¯“h.Úþÿì}iCGÒðóÕú¡DHA`ÇI rs8l¸^À‰óXŽ¤ÌZšQ4’µýüö·Ž>çâˆãÍâÝ ™žî꫺ºººô´ :Š–ж™E£$×q5î¿A/èÔuË,S<Ôô~¡­p·)¶ÖvŽ6 ©OÙòÚÙ•<_)˜6þy-§ù óÃlë-ƃaÛþ*¾KDÉH|ØÁ£ÿªå÷“Y+™wIÊÎE{8Ó‹«éë%\×ÄJwÝ îàe­¦"*Ê}`ûlîq ÐòÚ²½n–Ó8¨å=‰6"Å7õNІè0;_%ÆX R´ f‰5rVÅ×_†h‹ÙƨRVžv6Àtpƒ5ðÕiÆ u¨fœnä'ži–;áŒbVµTæå×jE!‚0˜àÌ6•¾¾ðÛ¼Êûµ“aApùyª¤–(-ªYíу—UfÆñœ6ÙS—’áÔç”$ÈÞé$ÀË3F«lûýw,"2:ŸÜã3öl;Imí.û©5¥ðxØ¢½u€lIo˜úp°Ž†­²‘UŽ8¬œ¢ÄcMáÉO•J2¬—Ó“v›¸žwßW*¶êÊóíµ#±¼øä[Ó8çÓâýѯ$Sé±c‚DòP“2J‰]ŒÁÃAÁºWqîäM ¬Oö„LÜíZpZQ‡µ=hÙ¼拃è]_|ù¥:\ør±(VD±9*ÎSåJòKÁeƒ­“%7Ù“e*jlFþYLÈŒ§ÉyV²Ä<‡‰”ïµg3¾¦i°¤V&ÀéRl Ú?>Þ&u†±w™É|óƒQ ¹yÜΆӅrØ)ööáhÑgv@Š_áÇðjRüãÒ¡ß„@£÷ãÜÓŽ|¾ìHܧª räýMïøec}§ ûÉÏJ)HGËdÏï–B…á ëçËÓ#ã¾1u‹„'$µ¹ð×ã§~}à`wHöD´p #ég(1Hõ,ØLã~í믾ª{'•I)Ǫýoƒ³U9Zcò*7ÂXÓŒ+r¬QËÈ,Š‡uÔÈ+®Oì©$Û†ôg&µ–È,Ìå HµÂq;—³ZÝ9ÿZ-r}ŠµÆ­1¬É(ºã7Zü/nñ¿Ì’ÿW:|&6õ_Ò[FøBhªvô«¸xùå+ô¬øv‡‘LüëMevš¬ÒNݧŒAXÌ HI‰ Ù‡8‹ì™XÊp#‡ '¾Q™ìNF¬JbcºLLÜÌkÉÕÉùI’DØU1œ8^h 2æxnî`}nŽ‚”÷)J¹Ër&¦išÐ÷–ﶙDF=­ˆþbÝdlý¶û|ç¨ÍWå®ûBÖT©ÆWŠ$$š ÌФ½-/ûÌ`þ+w)U`o]Jv˜À3d¡*!ÁÙ\¾÷;*t:é½~²øf 8CA+d?åüÀ÷„ûþ¢3[×Ì6À* §%Üq˭ŲÓz%KO‘ëy9Ú¥ÝpokûE%å(qtEôÁƒÃ¨ÔêI$LÇ/ßÚÞÙÕa0Ìß.ÙéÍW€ÿ+–ÓÎ|m•%ÿÒçâüorá­ïn ¼å x¨3è¶q9_>teºsœÊn^¯÷ÇTz“Ž²3Ö«Ü}?\Ín` oô#ôF–ÓºƒÃÍýµé=•0¨a&V˸3Šqè¡C¦¶p—…˜R uÚäG3·s-¨´ÕõW³DNˆgRF çÔwîèŠD ¨WƨwÎ}-KÉ–^m‘|W*ý)e~º²^’ºçZÉö7ænvºkq‘Dg¼š™ñ wì*KBè@×Ó¾‡foç‹ à¸: ôÕ€ÒÅð r…T²â¶ó%Áý 4œlõû³¦,š³¥B^½ªX#»Ü(g7Y8³K¢å ÖÁ B•“z^Løüas÷i£D-¦zc\:s aM,øéõ°ºªßŸ;Œ†~È,¾7“:Þ2Ñ»K¨Ÿ‰0íYƳ¶ÜÕkétF7²ìâ,=<‡JØ!ÞÑ+›—PôúÎ(€Uæõ볈 SîÜÝ}GÒ>½÷È÷ë™®bc§AØ°¥‡ãòe¬¶¬ë£’*„ž× tž¶Õ1“;ÑhwÛK²ˆ(º3Ø<ÞÜûe¾¸³Ñ–”°XÉ^Á‹¸¬ÂÙëAÒrÌ„ˆñæí‚yëU‚åi¨òÌËî^V ?­Æ.؛łî××)®‰ÿÁüùc?|'®ÑtåÈ @_h©|,ŽfÌþCù²Z•èÚb%{¨Ycx‹Uîa4ÙѪãx+ÞEòEÝl’ë§Bñ7¬ÉÑ0ìƒá%€c½‰3‹_u±@ã\qÕósZùES:¨vúZúcɬYŸó11{œ,ÞÉ ^Ù¸´CØjµirp˜f0³$áë+ì+ä$Ë^!ëêËTÊ nî¹ ›–Ù’y̓þ„ÁÐéÏv¸fÍñ´•F¬2Éâr)øÇ›-\#?8+~ù›ìºQõ¦K6Dçþ¥6ÊdÒ¼ÂWÙ kš$÷i{pjÖ4Í¡(^Sñ¦xcfÁ!™-™Â4¤]2”BºÐô ëtÅMý˜<¢“*9ÈÝyÉé|Éþnéh±ú—e`—òç•´¤Âº]»«¦kø¾J²ár,övƒ!¸ÒµÖ±+îE‚?EÜûqv­•´Ž\»½¹³…w€Ódx°™ †Â:” ¼!ñòtI„ øæ‡$åîGÑ[”îM†l2N„TkÈUç“RÈÖ6ú‹Þ\û1c8Ϧ@ Ü  µ K¨K3IÆK1p“júŸx4[’("ÌG##¥¾7•Ö*¾©¹R'èísIrŽÑ“ðuEX,Ä!õ 8¿a›¨G5µY¶æ7¯˜Q˜[«ÿ±ÿujßÖŸÖs¿ó6ž âzçîùß"ü{úô þ.}ûÍcû¿Yzòä––¿ýR/~óô—––—–ÿGüÏÒ?îÌ¢þýùר€AY†Wì$z¾SKß¿\ƒ?OP5ë•?ŠÐÔ{4ŒFJéõU);‡\½ó»uƒŽÚ>»kÇ›‡Ûk;ž÷ÙÞØÜkGðº ~Ý>þI¬=?Úßyy¼¹ó›ØÛÇÓÅáÚÞñobóœ'ŽŽ67Òþ¡ØÞ=ØÙÞÜÀ÷~/6àÚ±ømÿå¡ØÿuOný¬j>@Máã‹ÃäCëÏFFXVñ™#T÷Já/ø<À²$½ ¯Äp2B3ìß]iL6¹hØ ö;Ê0F¾ôÑ=B ü¸žhÆÉ‹`J_ù*^ =4Ž9Œ}ÎÇ”“OÙæ6c3¤‘/ãÛG]å…#(]ª=°f¡ ™c`w40$ìmI…ųÒ¥w¨¯¨n†×Ú\ÿùèåî‘qBvR^vzJ/ïü‘æ bäÂ#}aé‹«P–uñ+鮓ª)Çä¶WZ|`8â£($Â0([ûƒ7Œ'§§Ñ(Ñé¿üΘÇ6ˆðÌ—ÁqU`j6mr|¶†´Qç¥P¤ã?¿î(”%ìx]êüFå½Æ è_%ZEáPHëPúªíD@»¹¿•›¨ÃIñ÷ÎÞ,.ÿjû[[G›ÇdÏDé™ñ×ír8µ)¶°aÐð€AâÂD*ævRGâï²W%ÏýœnÿØè”#ùÇáÄ"Û™'*M°ïä<è’r!™Õv¢~f2%æþ#…Ó`ûGØ÷Í ±,°ë½¦AC÷Òó-õ y64ô»ò;lôïÅ"*Žg4æÐïÐõdì Üà ŒFø€ Ò¿€7TU)åfPi¨ª•‘~s3¢øã¼;ÂçJ‚Ž €²‡û/÷6^°ÌöÿnJ]žsœG*Išêž5{*Êï‚Õb`äØT¿×.ŒëfkŒlP_ƒ…í žÔD'ä‚_ K*¯ÛÝ9R·ã&ýJêØ “†®nÕ‰€„X‘ŽzjN¦;M¾Çù˜ÂÅKåô‹²U‡JéTT+çV«ý``}š?ÿZ‰)…I¥Ž%¤Q©¡–»“²Ø×M¨X…²;#âPˆï$Cþ3¥R42ñR·YÚýTò´!Ð_>”Ùk[jàë8ÚtÇKÒ[c  I v¶ÞˆVOB¾Œ"ØvÈý‚ =ñxv•a;¨–…‡QHç²6KM˜:5œwQŽs~NÞ@пǹœ‰£ñ¿!ýùoÇ›Gíã}öM7O¹kÏX;þ·Ì>¤˜ICkùAÉgÀ0½ÚþO*¦nž°Ë¶ò)#†ÁÃc{_Çÿ~³*†¤m‚¿MÙ6Ý™ +IG»òƒãCø‚~®+Bì®d`„iÀG­H(íôBi5N†$RÛR’ iZ¹Çæ|ìû^˜Hc®€‘>ôŒ«ñš#C½Ä$.#yµ-ò_ÊØ—¸ ÀöCùV¯™sþ©5—CRÃd4þBZ]$ÒÎõ§IìYõ 9åür“E JïÎöê$që5Å9—¢hŽ>Àïýº½‡nBìS=%¢!‡#òv c 1ÀÂÊ'ÒnôìÂó•&åk‰³kN¹/1äðkg{Q*Ÿ§ôŒtÄŽQ„ð²š`pFÓ:7›°PÍ%‡§0 Š3eÝ>ˆe¿²ƒƒöÚÆÆa{ÿ°½·½C+œF•ä‹„ŒóTÔ”Y~7=²PêÔYxîóU°RºýÂÔíÙå2 ½ÒÕ%­vdš'Ž}‘@²$Ýø"k´ñàFèÀZfÏg¼µ™€ó„€x°Šu„­¬«2±ô,­¹’O—ì’-5ÂÌͤ¦mDÃÍMF„BB~hÍRe< áU`“ÙÑ”rþ¼’•ÍÙ²Ò£Wä=‘ÎÇ&øÀCö=`1OÈóƒ²a7:(¥œŠçc£²‹±GR=2 ¯Ïpã>}:ÝÁÐ, Ä JH‹Å¹D° ¯Mw‰iQœÚéÕØ'u{tþÕ¦Ìqö6ãuå÷ÔöB°º“Áà*Ó¥aî>"Yj¶ÐfxSáOÀ³©pja]§…jäæ Íë¡t›]U]ã­“3Z"%éÁ*é!B߀ÞЕ“¶V±ÎV™X¹þU{aŒ/U³=È ’p.šCFF,Á¼z¾ìOrƒöóz„¥'½!E´£÷\7†x#ä^½ä´fÖâYmºAÕªÙ–ïö\LÈî?G×pÜÒÞËwöŽÅÑþî¦xŽwG_X"ëÒ‘Ž¦)µ~ƒÁÀï"ãŽqnÉ¥f=IeON‘¤€´¥\åíÅÆPÍÚqýÆh§vn³à¤ÄdÖY“žÅèêOùŒ®a02]—ûH¤ÙŒ.w;-®ælqÒÚ1 °Rz󬫥§–sá áyÜ–Càh¸'Ý\/–È&Ý…Wc.¹ž¯3ë!t«¬Šó´®|6ÿ~îú¡²$!1¹×KÓ%#¼H+¨û4¼qÌ¥(t^ì•/xr/ñ§…Ä:7£ r–2?TwÉ&î™ËR&–âªöaÄs#4•åæ¿ì²Ö½b¦´:UëB>z§ØÕ,,Ÿ©Ñ8ÄRÒjÚ=¥•™CëÔk¡KŽ÷A½°,䀀Dú!Î{½‹ÞrlÛ0 •œƒ+‰+ÆŽÅ°ˆ¶yùµ5×Г »?KãæIƒôÎd„æC}Ã`¡ÀØ—¸µ'ù É»².,£uU¡uŒ sMúô@7»ÚIŠf™éË€Ô…ãÿÏꟹÿÂ^p6ùÎÕè·ß~“yÿ»üøñ·KKùþwyqñ›Å'ÿ³¸´øíÓ‡ûßOòoî AšËñ9—Ô(`oDSâ«xìj]Ÿ¼Q“§µQ€÷^209ÇæÜõÞú½ ÷ŸÃý‘'C„¿Ø{)Ö&ã‘K,ן~OPÏ:‚p²CCŸ<Ýc¼j$4?œv/Î:ÿÀ#k\G=ØîUß ëÑèìå‡Ömõº¹­~º€ßÕ–—–ÅŠ‡¢ÞøïÝhËñØëøvØQpdhE‰÷"!9ˆ%ár,K¯’ì9 €Aá5ú9#×ÄÐï¡sŒWª ö}/¹«á[á` M™³Ô7,¹9ü´û$>:@¹¼çOy¥ EÏñVšùzùüè¸ -ÝÈ—ÙÉ<ª>×¢ ôS÷ùï¢çp»¯Âþ\V+‚¹LÎ+(Q¬®Ê<ê+¤üØëzA¡PðâvØo– å‚œJ(̱…5³äÊ Q /ÔG^ | `%Ä¡ß m‡ÀìGAúó¨Yn}še]cI>\÷{㺠¡Oî•ÞÆèº}++Ëvé=pôÍ#¢t>Ÿä°- ´È)J4«¼Z¦ËVÚ æÄöÖüý·cÔROÕ(Ķ1žA 8`S¿Ï'œ¾r*_˜¨‰5\PI¢ILÎ1kl³OG%µ‚ë?v eï•= ¯†™y“¼" mW+‘<ÚG?mîìðw‹sË7ÃH!Ý/Ì€i‘kî # ±Þ­'º~;Oü:ùJ‚>Ë{h¥î,<¿ÐŸÀ¹Nz¥CyJ`ÉX3ì4î«B»ëÄx-Pœ}\{#¢<²ˆ Dˆmâé ‹.Ñ[˜-Û¨óÙ‚ÛEí®]ª`#Ÿ®¼ºõ‚ZM÷MbÊ7ì&·§mOb~žw¨wÕË*ppð÷ܧàÀ7kï.å6•H–©—NªÊk¥éMçP8¨@+39dלÈa¼ÖºèÂÕïö¯´g½?&ˆ¯¸ï†QÐU~@•/yt;ª™9õ<é’ž{œW¾N°9åzÁ¢í‹+Òó*ΣÆ}éN+ÃH¿Q$lyYþæÅžòÞG‹í ÇÜjÆÁ¡w† (æb<9E['¢²uK¦ÿ>¹&Vå,&ÄG{·sÛ—ØðNIbÓ6›fÑ’Ä´Š­´,¦õWcZ8÷Øœ´îQ ã@-7Ëòq&¹L+S0ÓºÉL‘§Fúàï6‹ŒO*DÆ š'äj•–*«À¿ó÷xÒAŒá N‘E“ ‘é~:Ó’É„^>hi8˜ÅeC)`ëÐü¢¹˜hì¤ï…þŠ2A\an^‡õt›ñ ”WXå! ~×)owgZì|©FØžÖ;ŸÛ”‘ÀLWx¥·E¼}GD\‚…VÑKIá^ªZD(Ü°Pæä¡+FºA#ÖÉ2âÝ:¢•â“$‹†âï@¨Ââ÷ã 0lÈÎHøŽçÀ0j/5‹«Î×’ýVÚÙÞÛÜÛŸ’£hÃòš-Y¢`×±|u,;uïX¦N·Š0,V[Êôœ:dJß—ï_}¥NU˜…'9ÐЃGë¤UÓA–­IÑ'¶sÈ r ³œøhÎ+‰å W7m§@늒U–J»F5B•Sƒ! Š XäL9‡……žë§ÒWr˜ «Ÿ\Ü#Ú1wGþ22tÏnH˜_’2s [*jy,p»øî0ST·—µwq—ÿv^æ7Ù]ÎK¡êª"  2ꀥot2Ÿ'¯Ò3ñ»œÿøï-Ãòºï<øtFÕ‘¥aú,w0 É.¢¹Ç…ð€+c€jÒèq9Eæ?ppDñI¡š»„¡ú€ÝA»Ù¦ñÕ}`‡îuGäu^@ŵ)B/x‡m þ¯bÒÃ2!¾]GA¶¼¸o.¯êÛ|yõŒêÒr®ØŠe¸ÎøÏr[ÿºÙ*¡NÅDz%`šVò—–d`»„;ÃC«‚>¯¾¨×뙳<pYÑh (ïÀDZÂZ&|*˜C1{Ô¢hÆ–‡*©Â‚JßýèTî6ïÐý8N½;ñ‰SªðÈ–‘D¤ÙfÇVLbäqÅy$t5X”æç+åÞdÏV¶Ôq¶©¡²š;ÑD`%8DV²f'§ŒÔN„s£¦C@kjþbé$5a£`‘"MÌñˆÍÃÃýCñšïZåmm¼É§1Y“»ÏG…â ÊØhc,-žhýª hǨڦ(°X0W‰ŠK¤ŸÃ~×H¡!D ¨Ñ…ó/°ç*?ì ßÃàø`Âœc‹fKí®Q[ÑaI”D#Þhͦ®’àCsÌÅð–\›ÃWÂL»ÏÆO6nÀ"6nÁ$"B[[[±Ç\Ø‘ÖϽ‘×A)Ú!¢‰èŒÚ}ŒWËͲwÚ®äì<ø×Ûþ Œ†ŒâñäÝÅåÕ¿Ë2ëÎ&kYÆ‚›,_Oåº§S£h˜ˆ‹¨\²¦¼Ü†£V+„…–•Fk¹µÔZ¶ª´ÁÔZ!´ˆ?©fú_çúy:烨+¾¾T›ƒüXT ôïó·÷¬ãwµ~ÅÁþÑö+!/Þ`ÇYµ7VŸÁ9Üîñ͆ 1EJ½Ë#_jtR~%¯öÞWtÖ£]Ÿ®L’ºŸcÖêFø‘"ƒb©„¦B1FŠFQ¬*9'™'C$!ìÐuf=NªkÃnÝ%@ 02Ò*^”^/¾Y }e2ò#¤ˆL­€‘ÄfžÎNrC‚X Ï…¤"Ž:áx ƒžydÝIªÚÈ@!„h”µjˆ/–Œ+ÛRåS¤uõÆkð-ŠŒ+Øïº(²,É`A&1œd¦É°Ë“Uß:€X¨´.…ghèŽZíõ&)3´÷äï±´'8QVI—RùŒîzjaµ¢m)GùòªÕ)c¼»éT+ LùQyuõÑœ|Å6)'·Þ)ù/§íÛsyUa hL€);ÁºH\ÏÛøü»ïH¹ÈÎ ûÓúÒ‰x&Ì…–¼ä³«—¢6x fËŽ–kaY],àUë‘ýl©$ð¢T=âáÞ˜ËuU2Š¾‹aCÀ »¨d6’y ‰… &ÉÞý¥¡À<õü™/ÛÈ ²öCQ‹íF«.eåç­(löGåÊR×8G²"ë(Wã‹ÝÀtÅ+2ÓREì‡b÷è7àþO# '\7UJÂ>ÄmL4)xoV—å—+bãŸ/Äh ð„;ÐÊøj€ãU ¯,É^Lg‘Œ,ዶr!ãûÚ˜ r÷ '¡¨ Ë\(o¤’s yÍ/¬©CÌІOz%|ºu⹸ñDôÄE_2`„a\Ýðé,N`¥ƒÜ£Á€«ToÀgŒCÕâ› ÃáűPû²Y–"36̵ädÍ ÑÝ‹°¤Á7̽!¹"±æ/#v¶¶˜ˆôœÒñ¨Ý›Eb¿ˆ¹ú²ê2‘_¸lä—«ñ—¯oÛ Ä›/Û_ž•‹7m‰6¤°›Ÿ'Zóõ—Ãá´:§_ç Æ~ãŸÛ‡E"°#¾ýá«Eñƒ™zJ| g)2B±+žG1ZüÓ/ï„!leðË·¡±˜?úåðq}™bŒ¡ó„ÆNN.•§V\ЧÑlS¾Ù²Ð~¶Ã Á;óÑ%ÿ„n a:mUSód^W Íæܵ°âœh¨–þÀ³Ú:nP!Jê€ÇzÁe“Ô¸ÐgM?’¯£6ù‚hÒ;9Wîø= ²–ÖÎöóýçÿ<‚Í%\¤1ý:C=¶xrÊ÷4»[;k/ ÏîÚÏ›ò[„>(‚ñ'ºð÷:oñ&¸p°¶þóÚ‹ÍöÞÚîf³|Ö)ë”ãµÃt¢¼7o–É…I?:>ÜÞ{yEâËó—xºÛcîý¶Éýòp§Y.p&aðÇħ1iÏ:ÿjúz-·¶<”¿#2+Š{Ž.ìGluNÖwˆr1M¤ôÀ«ño[Æ-ÿñ¸DõógÊ3¹}¦}üÛÁæQû'²ÐSy¯â:)¿ ƒ›(†2ªt)D¸t¡£ãõöO›kx2´KŒ»0ï”ßI„2 ©Õœ°k>Þä z³ÁÈz3ÚLóÆ-6Žo¦Yan¸Ìîæîþáo‰Úþ ]9µÙMÁÙÊ6jBr¬©DÞHoïgÌOŽ§NÏñ”KVÓ…R9^îmC· %”1€úq<Ô ‚ÅÎÞØä¢ìƒu Û Y7 ÚíÍW››¯ŽÛä!º`% ÷ÍÂα\âj©( ÑÚñþîöz{ÿ਽v´+Ëf}! /h|6añî´Ž•‡KNÉ@$))XéëÈ~_'ÊR8øù…Œn„9€²Û)¤ŽjÞ G0É;›íáù?eSÜ4ªýW’6«°­ Új¼LàÞîýº½·AíÛÜ[{À6¶ÖwÖ¶Õ8%S©ÔÏ››™ª}p|¨Æ%‘H‘ŠrڋõƒŸdÎd*eõº¸Übü’Ö_½âaÛmÃ~ÏÝÁg~Z?Øyy„ÿIæ€ÑAè}|;×ÚÇ›GÇ< þåxäµûÝ^ß;CñÉéY§°öËþöVƒY$D7 "Ž`J}¹wôòé2à‘,‘÷™'=a·¥ß6YÂM£lk‡šÈ—H¤Œn–ç£û-ãÓÆ ú"”úê4»€ÿaðºßi×€N"îïïï<}¿°¼ö {»›ÛÇ…£ßv_oïÀ¬îmoá0S–õ=@[ñ¸½vX€ÿCô puãå.Գ׆º+ó`Òóí½‚úÝÙ(láÎWؤ¿ôôT‚‚‹úvýáúúÚ‘EìTê2>mlìîoð³ì1<9ù_½Ê‰ ãÕ+‚Û ˜¨GÏ­:«9ª1| #øx i¸ ŽvÖŽ~âW…TôÌ+òÿ1‰Æ>=I’Z€ÏH9`PÓ LU× zéìlÈ–ªÎãÜKn¦ÿ…ÿ6ÛØ>½XÝT^ »m»¹íÍ­5 zŸïmÿæ$âË/ÔèI+“žðwmx$zî åÎín4†I>n#…(¬ýúsAiìþŒ$ë °½ÂÎmzíƒÃ}  »z+H]<࿉Â`ä¹ÂÚËã}Þ‡é‘áÂÕÂÚúÎþúÚNA ƒd¢ 뿽`<Ðñ¨£ëÝX;^3X‡jõ«j$>Q¬žÞÁVÔ[g8‘äŒ1ýÊ\ôŒyð¡€n…º˜…d~ÁLôdÈ]àI`üÈùø™i< ZøgO “ƒ¶Ž (h Fb¨}z p+ cúÛíáO÷]€?çãA1è#%Gü£ƒ ïDõ#EŽÞâsoäwÍëUŒÌ:ÁñÆžúEÑX6O5”NDø+¤G%8qyaŒwëü°ÀÇ: É£‚ͧÙê žäÔ“ì¼Ãð¦(tr+¾…Ï#eJAw2¬!]ÎayTr ¥Âq{4é£í §axSÒùµQÑT%+ÿx+ ³~Cµ‹N…Æí!<Èd¤Mm¹nø£\¶ãˆF’ÞÏ l–ü S…Ó¢ ÃÔ nh]vª4ö+ª›JÛý¾ß‡ötžÎ°?‰ñ?†êw"ù$ј(Nâ£-YO2èz"Í€Æø743ùÚL½ÿË{çÁ„„ú\©>xãhàqI†pÂDõm䳶´ý£êabre¯G‚ü‘ó™S¥Ã‚ÂŽLÇ¡I^ h@§Z=³“pà ÕÛ_*뎡ô•œøói•N#£/[ ズuñé;A4‰%×lÓ‹48$7 w› j¡7w¯Ãܸwš­4‹c n‚™ ‹‹Ígp œf“Œ´Z_Èd#‡×,;CA8´Ág1‡Q|F%ÕÓ+ÁKOpƒqûÜï›úMš¢Kɦ1ÖYˆÊR¼ŠS©±Øu”©ŽE›¨i‹rŽBêÅ”"›À ÀP°ËNõ”ob ˆZâxaíìx@&ø0ïÊ{”_@_ýá;uVôñ:Hbüù½B4BIèE¨ª$"'[ ‰ÐÏézDwöGcè¤7êÆõŠÜ"›åÒ{«ÉW˜ÚFScújöÛTù©lïϘIÀ§¬vqübeüX¶vz» A9ÁØŸî•]Âþ SY¶8 û“L-»l‰t˧?2ë’lk’èàÍÙú?–Ç“ÊéeÅÑW‚ %˜er’˜™r“âd ³_YsP6LZªü¥,¹¹ÔgHfÙ ºb# †Dÿk²ÝlGò$lK—ÏtI ÙqK‘K“’¬Õ*jlô”É6áW^ÒâäK>ê'õ +ÎXËRÔE ¢YµàÙ/Ö³yÔOÍ*C–åJz u[‘!áÌΓz¿‰ö.F5ST­‰gó¨Ÿt³  Œ¶Ñ.[£û6,–÷꼑k1+Áz6úI=È_þqûj¶zÙUÓ Ùü„Ä;¼&Zçd°_¬gó¨ŸÔƒF‹IbÑßô|=UˆsÔ9‡,&7ª(ýlÝÑR9y¨ÔæSµ¡8oö‹êÊ—îŠE>u±ìw÷ÕyÓs ¬gó˜î•ªÇôLmºÕd[R)É Tš›Åy³_ì1RµeŒ»XªÉ‚êMw y5(¡óe‚0_ÖªªŒ¢ÎR[àЧ€Ì9k~ µwø–-œ{Xé)˪IÖ.ؾþ½öuݽ‰- G‰À( 8v,AÈuJRTÙŠ°+Ht·ºCM+Cj8l=2«|!ZŽ¯¡©oíÆ™½Qhqïìã·P”G§MEØÌ´Ño“éã ןL.erÌô–=-‰¬SQyA”e´Í»ÇYãsÔ VýC*d=È_Œ¼Tµäü¸úIMš)š1gRPÀERÏæQ?©ù›h¥„ ›(…Uºóf¿XÏæÑBÍó±î„”î‘®P‘¼WçÍ~Ñ•ñ»yÔOêÁí·UwÝóTMI&$ÞÝW«ÿœb¶žÍ£$«Â¬q"á‘,“|6úI=$»ÍEUŸY"UµÁ:oö‹õlMã¹pºå,Œ¢üÉGýä6Rfã6JYVÕ`¿XϪ)2SfK¤xR•É|uÞì=±ünõSªªÝ%­&šLH¼»¯ŽqŠýÙz¶FDU“1*J ÈÅ2ßìë9Ñ]]TöVK«.èÄ»ûê¼éè¢9íWò]S67%™`†R§¹¯Î›ýb=gŒ„n€5Z ]M74#-dϼNMfK¼»¯Î›3¾º!é1f‘0L>ê'õ ùÇY–DŠ™«TûÅz6úI=¨Èòé–‡=æBÌï4Þ&šŒk½¡ÅÝô†Ö¡2ŒjÒ4‹ e¾Ù/Ö³ž5zÕOørƒÌí›ÅMA}§ å&$Þí*9Éy³_¬gó¨ŸtûÌ• ÕD熄ÊLOI&èfš4÷Õy³_¬gˆ~Rò—\”t˘é^úTÓÊHK'YKÕ¤&³%ÞÝWç- Îúhõ“zPëÃm~z™Xg­ä£~Rò—ÜÑtŽKÎ)(ýb=›Gý¤Tr0ò¢Ùmöô¤TŠY+1ñî¾&{m߉ëÞÛÐýº.Ñšf;=5•’L0#çÜØç _ß;@ò’R)©FCbâÝ}ÍAYŸ;‚R­ šÑ²¬ÄŒÄôtÖTJ2!9‚²ÎüÔÊ56Y±€%>%[è|Îý2­XNz~‘ÌÔ¼ìiÙYS)n6LJdq_³ñÂÕ"Ià‡;´‰IL}œ:òS O/š[pZ±œBùE2 äeÏȜ̊‰©lÉ„ä*Hhôd¬RQ` ‰Gý¤äobÖ¹”œeVx¨ZðìëÙ<ê'Ýv.—ÑÖX·ÏyRò7ѾØj^l5(ñlõ“nPœÝž?0ß“ÀgFÒ}Rò—ÔŒ²J¥%õ“zà6H%,‹—‹­ûÿô³yÔOêAþºÃ;z±£ õf¿XÏÒƧ&“É8WWÀÕ âb×$™š¬ÔdBâÝ}MA°_¬gó¨Ÿì¢ò71 në帺ÚOÕŒ~f%Ú£j¥§³¦R’ Ü,Λýb=»@ô=Én2æ:Pób=$F¿È1 L¿œG]¦fÔ2ÒÒ¢ä£~Rò7ц‘% ’jU žýb=›Gý¤[:Êë…9.‘óê¼Ù/f>èÝ<ê'õ =5õÉÞ¾j¢EÉ„Ä»ûjc ¥ØŸ­gó¨Ÿô˜™šÓãƺÍT"ù¨ŸÔƒüå·ÿ¶Š´N’­I¿XÏæQ?©Õ~F/Þan©OKÓÏæQ?1h¥†km R¥YeL<›Gý„¿¸w)J-zE¥Ë$î?Þàn™ ügÜ,KkïÏñf™D\î½2MÔo•“ ͺSVò;ƒQôvC¤Â2ÿZDH…uÿxe„½µË©—à—–øÒ&•—ê" lÞ«óf¿èÝíÒÜ^Ò£~Rî†cl&ävcj–{G~BâÝ}µ6ÜKûæò’ï.õ³yT{”eÆ‘^®—5mÓ!Ëå½»¯Vc8Å~±žÍ£~RÉ3«‘3æ&ÕdãR)Ég¼8ÍÍâ¼Ù/Ö³y4ƒišMöÔî {HMòÑ:1d¯\ÀQ²(U#ÊÒ…ÇȧëÜÑ€Œk˜¢p=Õ¦¡§~ø/ç‘S½97ïjšÃ•:ÞîËeª×‹µïßPHš×_¸tµ**×ÐR§B5D\Q¹(2é†ÉaïDŠæ£ºˆÕX9tŠœlm¿ÚÝ\‘ñNÐ`hä¢wìðNE'ë‹õlGµâ׵ýí½+ñCBaÂDêé R½dA3™Ê%­³™©âíh¦ÝhJcÔ`’Z zYv5ªP]é}†=dú(JïÓŠ/òC»‹Ÿlä¤)"ô…é6$ºx³Vcgs*ÙõÚšÜñ’h3bö(ÍWÐìËêªrhëÔŸÚ×Lcµ³zÕÆFzíyc¯?Ób%_ªZb3•i“z#¨0Å–• _ǎ휱ÐÓĉڶÇûªsUWfD¼ÂÙ xòGJ””dÉR°°uÞ[…G”f¿uMˆOÜKz닻ׂR+X)Ï()©‹+Å•,ÄÂRÅèCHûx²‹"úA죋xînÉ#Ò1yäYJÄ}2ê¬Û&>XX"Eµa([ÇöjþJfLFÏ §Ã_5«k7MÙ ÁŽ`2'ž£ÁãÈWB…‡ÜÑÄ Í  wV³_·Z‘êWð ´±Ô’¨‰FžH{ÅB„¿*q¡bR^0zöú€‘Æa4‚0¯Å„Žµš¬iEµ»(I Ù“Ž”“OtzïGÃ>zÿŒ¤ïcåˆ/œOGÑ[?Ô‘VÄI i[ÀL¤©è9æ[õÑØSê¢igAoÇ‘Ü#عëÁRa«¥RÒ@»YJ™i7KŽ¹öt°Vè=ȼWpÂóYÕ»AÁaF~ÒÞÕ©¯<&f–gÿÆVµS aA2ê#Ç6ù7œ–Ë;»èkÞÍh}®IGyÅKű72ö¨ô‹gùH$#È‹nóþåz¯¹è’?fxì£OÄæI?FQ?‘ÉC}êtBÂd%¯“I4¾à0OæJ—Á§ãcìè)¬XÐ>ÓeØG{É®»˜]|rçÇ2®ñ2Êýmªö"…EØ’o&£ŽOn@1ÜG( ™!^x œÝöŒ%­·H ÃRLg‡æ$å8NŽTM¥_^5Ò›66Áñ8Œ™ R`'S¢ÎU(!`fT"`0˜H}¹Il"·LNx¢t¦kÀ̤Hwåï§È‚+w0†L}Q‘Š5J®sC›ÆH(õºë}59vñ +ô%žEldŠVW0‚Z½^ÌX«rí“Ãi^{±˜OÔ_Á-S­/l5|ÄgÍ¢*àÑiOeY À-¤K2¥lÈ®ÿ"€Ô,žùÂ#¢b²CGì¹ÚŽ¬O%nS±ð¨OåHʯ¸ris`.˜=m/5Mf¯*¹M"b§ˆª~] Æ@óZ“PzKñ]¢7Š²nÆщêk ýóiÞ¢S:ݲdtsÆmïa$X þ(&C±[»gÝSÌ¿9ð:ä›Ùy1FT£hV ¸ôX¸à¦Ìú:=Üß?†âjpØ@Ð…G–ŠÝ¨3ÑÁ=¢äËšàäØJkmJíÒ­‘fB‰ùE£¥)m€ÏrH¢NFi·$§]ÝI¬Wv°.2ÒM6`]ôЬ÷]0­TyMB•Ûi…âŒ2bç•‘<ªæY[*á@R:©MÒ±}Hl–lâAbTù…âË ENȆ瀓JùG/·àddVùaFh uqé•’äD¥Da.¼Âcò‡/©=IkŸ¿ÜÞÙÒ1™ä3pQëƒ.å<¯Ï&À{IÖ‰­ÅÚ?:–=#ah…¡$ˆg_X²tBÁæ4*ôš`2()ì|±yœß [u¹_#4=çY×\æ|•¸Þ²¿imf~?ÃW8TÑááq?U‡•"_H)éöiS†cÛ;óƒ¯<Îðž]Ó<®€“Þu;·\ÊFƒõ<ÔFïÚÚ\;~y¸ér J¯C}œ'‹ÀÜjßòK3$´dòë&Œò‘‚ó’QöùÆ.Ãü{¼ü"ĨÒðcdœðü$ìF+ÒÇå/Í¥bÅé‰ g‹E§ñƵp\ çs’\€Î\O´â@ʘä1p>N†Çq€‚D`âî**ì5`ÜÄÓì¨?²›k\×´ËãüZäÌŽXm!ÆS¬ (òt.rܬ `lQ/|ç¿Ð¯a—xôÉ&VéuóàçGo¤:y™i³#*ÄJ WÈ{s²8%ÎR½<×ä`J Sú#£…39Á¢.œ®E ›ôÛü[!£Nã3.Ôyyç†Aç…ò ͉l”¤›Ÿ‰ÛyDž)™Ã¹.¢ÀÕÐÉ´Ðб ˜BýÅpäKi^XG“Žô8©iÇÔîáoý믅ò8m÷÷¬ó¯šL‡ÜœªrÒèAŽº»æÏFãštT-œNààòb|ýB/¶_ïnïÕØÿ¬ÊÇ¢€iX-¤mà~à ÏY§F²LÍ®1qêáEƒÝØaD23q #ŒhãF—˜vŸÑ‹vÍñ¢ß¤¬ÁòÂ.ï‚g7Î5í‹;@_Ü7«A…»ïXõÉ¡Qî½kÒ½w~M‡2§àœ¡Åt0{0‡# ¶èªÙ¥$ÒQ¸Û\¯O²IŠ9OºZ>0@@?ÃqEÌ8¸4W=kê‘#r)£LûöR¦obþ™XZ\»Ï+x2¢€„øÝØÛ€Ø{y ½—cmkp„°|RÆ õc©3r˜qä{ˆ>Xd¾bôI³þ €~r©Þ+®'ÐÖ8K¦šš–ìêÏB{з·5ò«ÞÜÓ§ dÄáÌW»LãöëŠhOUBÜ‚Ä.ÙÅT'j¿ê(ìa]sYî*§c*9k¶×öüáX—l &çW¢ÞÑÒ Ïa8ë‘Å!HÉ"sH¤Ñ*+>„„B&&¸¥«¾:Û¥]Ìb‚ì:4 D‰Ckwâ»·ÑQó`{½_ø•gqk¿šÄÓ9‹4m®yÁe4áñCünôäf™FíVËYi[òÞz¢x´î‹–\“:Øh€­p˜óeLÓÓ hΛºièY8©Á6mfb$Í ÄÁ!ŠÉ7äÕ ÂÈê± »ðu4¾G>žÜ¥8^š €…¤4tž¥îSz£ÚA! ©\ÎEÅêkÈâ á°Bœ¿ߥѽgRaN¯±ï~8î‘¿ÿiMã#N”Œ™LÇ&wÑd>NY‡¬”ÕÑàtA~Ð>„Ñ¢(SÚ†~Þ=ä™9~órW˜2Uà<ÉwR½þ ’“½Œë\Êëëa0h"ccº·Ie xVðYFp`ÑJ¾UŸ^ýˆÚΨO ð 'PIÌ ê°&zF$eEïò–Ά„µn??Ò (Àɦ$—ÜÕþrAbyjËÏï€Ý±"ÖÈ}¡Xaá-o”èÍöŠŸ‘=J´\÷OE8ÄÞåõÇ…mze„ØŠ¬¹A1RYÔl`Œ kýûƒS À¤††jÜ%ëèÙ%©‚D9ÊŽe³âq¤ðwTSQ añò¹EQȘ ÌÐÓe&Æ[5(iOþžœ+øl|‚G8ñöLñ(À3õƒñ•“1«½–ðoK». $_¦Ñ.8X$Aű-l£€Ï6(<—à‰)3š$±'§)´)´]Ÿ ˜¯¸`íU<#ÈÂK¾äˆh‘ÊÍ›œ­¼9ÀÊÀØö-5ó8(ë)ÄöÑ}›YÙˆ´ZXEÖ^S$Dk(–¯tå?C¨?ä†2}VWÒ)Ô²¡@³ÍÒŽ¨*C@ËŸle^ £bË€1 J!¾ >±ºûå[^Rbu Vå¬CjE›Au ­ûÈùHmr•f¬`&zrQgÓQ¨ß‹¤ºMRQ©ºU Ъøh`9uB:S³š +¦˜ú'¯Wdç”'V¨êbØW¨ÖNUº–BÅdw!4ægÜU©„ÿá÷VT„?| 5¯9±&Šõz‘†ÙGø†þJíZêø¥š—®P°êm¼þ4“?4êõg« [ ¥™I°|d)+7ÖÂÏúšUKÃ(Ø ¥á#uŸì¬M©ü¤¾%ÓÝ~æXö '‚ \H†`ém])$šá¶K…·Ii1 Èö+/ ”*W]aœVË’ïÚRçKŽ€Ê¦ºleEÍU©Uî*˜î(µo·íÖ/›îŽÌjV£ø7¯¶?Ì,*'õù¬žYkÆXf¶äºÑqËN¤†ÕHƒ¬\nÁDSXÛ%M@”lŠ»jTóÅGiöĦ $ØšMò»æî‡E_&ôl-ɆÉg"[]Sðe1N¢zSʦ´qØ&ª]Å·­4·B}bbzFz|¼qR±'ˆ-zgŒ«Ð/×g"œ¹"óŒ¹"¹*O)Õáv™s­Ãúð›·1ÜYK ëöǾ 9ëX÷MtŸS8óCDNV€‡Àƒìš²€[®?ýµ¹†W#’þίWÄòâÒ²ØBQìQÔ_ eÙŠ&À6à¨,ˆí°S/ꩆÎpÄH„ËrÔÂ\P…3˜¬XLÂ~0°qCÔ¬IÁjŒ3¼Z@Í«ñ(8EŠ‚ ©\Q #Ù]ÁÊWd 5¸ýOÌÍágÝïÀ‰__—Ÿ§•ÆeÔ¨‚0ºj«{Áí½Í½ýB~ÙZ­ µé#Å{ÒÀáÜ×É~ñc3AߤüëâÜ—Š6¨d?ét|¿‹ªüYµÏW ïYecÐ…Q³ô^?׊¥¥âGó 1©ó¶™|/%Üh€«Ôi$ „.ǬïýžqÚ¡4¨©1EÉËÌ“r4|-ÊÀO­"™Œ¶Nø§Å¶éØ \•loŠšÛßÌ'¢¡JqU/¶Š-¹¨íž—xV>2k¨r·ŠÅ‚Ë–¨/Ä®=ûêhÀ<Õáô VÄ3=ÀœKuukõkÚ ;£EÑ΀§E!åßEõ벓KØÀ—¤!îØβ$Û&Äà33ø)Ñ2X/{pZ¥/6D¦(롾˜dȳˆT ÍŒ= Ž‘ ‡ÙÆ£±Ï´º~œlýûhøå8 ÇxÐÄ 2¬ ´¹[TviZÞó[9à‹W¸ÒÄô÷ÆÑ(§–e)<2U,hè¤mž»&V…5€œ´òõÊG ]¨*¯¿hãC¤òØ•t …ÂG‘IC,ÒryySârßä%Ñ‚ó@`þZù@bnCbÜ•œä_Pbu-}1¤…²ß™m!(Ÿ˜¤è4n´ŸKe°q;Cz /:cË©¥XJ˜T+#DSOí2C¹®¿˜T͉ ŸÌ²ð·}°ÖØ>ØóÛ¤„r€W]88÷ÅZèõ¯â nHm:TUìÃ4Ábó:„"¼ƒÛF?¯šÔ†ÞwmÝÀ(ª`äZ8ñ‰ tÂB€X³åÆ$×F`!öBR)º°Yå Í]n¿g 1É'NÀfγúÔ?GÑ94km8ìûesY([ëJ«£S¿Gš ¤»ÏvÐ>F˜f:Ó ‘…ÝÝ£ßvEn¿>1³‰ccotíÙæ;·Ã)~Ú\ÛØ<¿¬Ší½õ—›G×0¡×ð§ÐãXï:Û1·4>9õÕ¨w¥!‰e¤eÌ\æt‹ÈNUO[;i'CØt¯Ó‰F(í_™m(³ÛΖô~V2¦ueQnWZæ«Ê¶CQLd@«BÌôÅI¨ƒh„†žOz€÷¾E7l@ó4LÝ WdDQë®ß‹ë碦Í"-Ê. E¡Q¨ïm²×ÑGJ¡ô¤0§æê‡Òò3%ÖeÉ-Š²óE«rÓzŒ÷ûEÕ4FdW­¶ù‘ïnAÓ6~Ýv47—»ïÈÑÎõ1›¼‹Là­Èµ»“Å{ŠL~ÊÒ¾;-rggánJ.5^ÇÖ®Î\߃H *þsÖQÖ‰*K¶øïw<Ìêä/ǼÜ3SWÃØIìn_x£Ø»[ò{Ÿ”“—J¡Pj8LÒ4s™™¦Üú¤(ÖHù.PÄ¡Ù&’UàªäÅoºdÛöÉÈÎßûˆHÄäÏ;ˆ©-×éóO™Ø§÷âo6ÔØ…O:Ò«7§^ÆB™îäè€e‘ ·ÖœûÕ;S@‡Z· D ?ëcУô)«7 ;êlµõro'3¨Rg'*Í'§›œ íy8ôÜõÐɤŸ Í#•GÔ£Î$$‘Šê ¨C@dìºæ†ÂÏD×ïô=t/ÝB|Gþ¥7öýñÓAíå+±´d–8Ã9øQ R+溺 ºövi¹€Í“6²ÒÀ}ŒâÊÛ†ùšœŠ‡â)ڛϣ!šö¯DÏ¿À•;ŽÈ²vpŸs:¦ãôƒÎ˜ Cª@Åó•U夳ŒüÔgµ Ùß`úÚí£ãõvu¤’ëÚPtXkÃ**åþ;ŸŒmQÁ€´ Z 8ƒâià…9-@0 s„Ö'Ý0øp{g"9ŠûJ%ýþ¼X_7ž‹ô8Ñô“9Œ1˜4¨ãIctêw<´´@0lg7ðÆ]I¶ˆÀ ¬ “ŠkÀf±—(7–¦j’‹F÷ ÞpØWx¡ÆBÛÌX^׋ª§ÖbO¡9¨²®õŒynbfÖÈÜhü0RcôÊÔ÷ÉÙ,kUÂPô/¼«˜öFXóG¿¡«"Ô²70P#ÄëŒ'b*o±Yžž“›°±7kÀ9"DÑbŸ½&1yE/7ºï «$®ÃŠ@­œDb ‰·¾øzöa’ hrË$RN$!ð?™¶¸Zø˜#é 6ø“ˆ9Ze‰‘DÿMåˆ<Wæ×Ë=þɇUùƒìãAöñÙÈ>/³¥·¹Mÿ¯‘˜Õœ¦/3Ý—ßë¹]ñÃùÃùßP'çáÖüáÖü³çXô7÷Þ|…°ÈûÁ½ù‚8 Þ‘ß;¢Æ/}ò+»¥¿“"­¦9ÑŽ¬)ÏÈB#]HN<b?ßrÖ¹tÇŸ>é*×}ÏùLÇÇé“-GÙs­>ºS5ËÁýN®¬xÊÜZ9ÔÔE?†KÞN£ÉX¹ÚÆì?´-m7VÒ0Wr®Í9‚ƒÁZ £iæŽjs»Òò î þÐâgTƒ¤8óÅvSðEzH¦|w„½¼úñ"X~WË)íÊ1♞© 3CR ¦ãL ÎMõN3#‰ŦHs3¶þ:wg:'iW#jùLŠ=.½ˆü8S{oïn}>h#DÇÝëLí½ÄÝÇ7f÷Z¢U<³ùfsgó¹¯\auáX=ëß ääRœ·;7;Ï/ Oup Šb!r]o\c§šC7ŠŠt»PÄÃlª·ø¯a,œ•Øå?è6W_ ´²ø ¿„ç¾»ä2_ùS²ˆz&ƒ8ô£3Ï„ì³{Ò]ÇÆty©bM nw'Þâ‹sÔ(MÂ/W¥y÷]é];àNϲþFo³éçë…Âö˜‚‘Y¢‹³ŽàÁe“ôy{¹®±N¦o;|§Bœ)oL8BT±#®”þQP¼ …’ûæ™5.pUÑ^Ž^¢#9gÉEuÐ÷Æ(yIƒ“õ7:.£»Æ¦8™×/>À¤Q<³°â†£Õ¶ôÇIA~PAõ’ÈüýL·atê2#»Ìh¶2±]&ž­Ì;»Ì»kÊÈ'þi6d!•N¥^ÆÎË>¼ŠêBÀÁäÊù§aá§4ý/Ý,Õ ‚Y{kÃK|Ê› ñÙ8óÇñUL¾ø5¼Ô§ë†M5Q@¥Û§>e40{T´†Œñ“Ÿò†0¿}QÜ÷ßùý¬ñ“Ÿf?Fˆ]^øíSŸr˜FM @bïßÞÞ:j–àϪ 'ôlÖ>ÚÁÉ4£ÄR~‰¥U’)RhPº0MH¢FªÁ¸Ü]¾ï…“¡@ã) ÊXÄdÊ¡2àõ+ ÿÍ‚2 6î0˜^m@Ë/d¤>"î± Ø8B ¬ÜÈT&blL?ŠÞŠ ]CÍ™ƒ,ê[–.ðV¢¤Q¨8¦(ý¹¯|/cu°ó ò¼y‘Ò¡ÎÁ!©¤‹âпÀ­q6 Vú$÷VÏ6Ä“ú":Ϭ¨LGËÑ€½Ü’³pëÈ&Ca·ctÑÊ:¢2‹9wá²_PÒ ž"C2 Øç./Îów¥å=Ê¡Jh/Âí’!•±'.FAâžÎ~ì>VCDÓHÄ+^(Ì›}MFI=™ü#cˆ%IÜa㹋¿·æ_{µ¯Õþ·ýF>,Ö¾o¿©¶*Íz#1ãɪÚÕÙïàálÏ•¸{Á; V"ææyÓ¡xØÿ¨·+ãÈÊY1L*lœ7—F%.Pps W#u­4êF–W?*êamŠSz؆ñ^SPÈàøòÕUóñùÚÑOíµÃ¿Àgz>Úy¸¾YQ’ ×tŠÐ`9Ÿµ‘ïÉf;!lü°çÛx2Š*Cà[›´ÜñϪÐN²¦Z—h =ëí`BÎ üC¼üRÂÙ*‡Âþ½XÙÆê;£¶×'ƒ7„É´ i‹·*Vk©É— ØÐwݾD[Šßg©¦iÃÒ£§‚£O÷ÊMè„"ûŽèZJ‘A*ÒAãÉ)l‘¹À‘ Ôœç.×Ô‚U(EóÁJbX*Á!B’Í!ÚóèÎeñ$ke$hÎ$`|,Êö‡ÈBÅì0ßÚd„.î8튮[ËëdÄr´·Š˜@‚ñ„eò%¿FÈkæ"6ì ­0!²çâQrÝë 0ôhÆqO¼uAb bëÂx¦±—#k_3gœ3ÆؽÌÎh™ö1ÍXAÁ‚Šâ‹¦X´|›¦È>0;¸ùsva•,dçgW¡¿•^£¥§P­Ku…‘_×·ÖUÕÎX3wÛUÝ7~*•ªÔbÿTÙT e±¨Î·²|ÂKÅÒ7rãfFIgi–M_šËøõz©l óÁ¦Ôb¡`Ï›áÄbÿÈà ä 886b&kcv=4jò/ñ¢§^˜20¿ÖÝ°?ˆ*Þ89çÐJÙš8¡ìÈÛ$ÔyfÒÒeÓ%#¹´Qbn¿µ$gv0ÇÀP¸dÊm€ý²yx´½¿g“)·vt|œŽ‹nêùˇ›û‡Ç4v€/w,PðV´…h;>Ÿ貘n\b#±EG‘RL2}f5=x¡$ªÎ¸‚ær„ˆ(… Æß— úôdøIo2ŽðˆÐ![)ýC\çå0öiY.5÷ö÷6¤eNrö)záhûxÓvÉÏš›x "™œ'PR©¢,à’–g„]×ÎÚ-`F]ÏÊìwÝj[½agVB ï,V¾¬\14Ö×þ¦‹—%vÛM„÷ÇA÷6Q£ŒŒM±ˆV79—uNÜqòE"l:öö 5¤ %+ƒýESXY‡^n5ªúb"a¹ÈBF+>‚þFQp€ÔP;Œd1QT«w’Ÿ¬]xæCT?âX‚´ª¤wéD…Ùg¦™ >•®zw1£ÌUO}iôõÂûÙûDó+8G>}xÑ-¯äõ#73*È­‘✕~E©¿ŽV'Ðýü¾Ž|ŒÂn¤eÖ{A¶ ëÃY²Þœø† øÑhË5䧘(Zb‚çؼSú'QRpêÅ繞ŒA1PZ4Á˜Š™æ)Ä°Š7Ó&¡•¼W¸ð¥mm7b¡ƒ7® ±ñÏÂLúÉŒðæÈÕÈ?ƒŽæ]ÏG^«ùu{9ýºâ2Áwª™Ž°™¢2‘5ßÌÉ(+ C=ÑUs0ÏüùŽ¦KÈ#*O0a›]¯%n4 ÓKð8<³RÙỌw@ÜœTëëÚúž\ÇàUZWJ%pŠ6õÖÊÛCÓ_–Tñ=Ul2‹>ÝÛë@¥*£®diÕq*êwÑÄ€ÕQàøî‡ïÚ0TTþc›#9ª¼¡aòNˈ@ùœ–”:«sggÕ§<ÙÜ…’iŽB1L®n¨*#©“.¨²Lê §ÊΔÕÔÀh¾£©MÂkˆâ]À*å2Úp“3½¢d) (JºŸN‡¹óîݼÐŒ«h^*qKż€>â•8E¢‘"†æD7è¡QØaïÅ9l/$YSŒ#i3BŠOGÈí‹æ õöRXõPYU"‹L…,Nt) ¯¨¹]^7öN³wŽLç^xF~¡»©q_™}g†³ø({ ø²ï}’–A+ƒä÷f²¸5±a1¨7ìèýÖ {ïÈŽ[ÖdÕ4s÷I 6ðGLÛáÝ%y}š¡5ôíèLF##I D×)í¸¶˜Yô½À~ƒ¢X¸Û¡¹|bIÍ"-ògø±X ½YȨ ‚.ðÕÕ½šµ„xP‘®ñÓ°ì:3ïú‹¢”u§j¤Çî%/_pˆ5f)'Cô‚‡À­ÊûG £=Ádäu®ê†ºÁM®H±QÄFËH>‰õ­ú/8NܼRkeãB¶#¥²“ Áp ŽpÈqÉ®iÙ-!ró“ç!t Ø:AµTŠDË2^O7 Cëd4°ùË2[>Ò•/_tN@Èfæ(\K)ñ.:Š9ºt/ʇ®iá„H‹-…š¬36Ë%ŒÏYRVË¿­‹Z¾r¨Q+Ó™Š¢Éª,eÙZ§A•THÚÌ…U•ªpû,œ4%ê¦X½—§@zˆ*’Ÿ×‹µïß|ýºþ&ñP qñ&—¤/Wpƒ<šHŒê©! ­|—Lx2Ôf0ôe¿_‹ÏícU¡Ì¨’eþv|Ξd6 L Kä)²W!+Æ™U ~O×g®8>GQÿn•2 !?§*¶Hšã @7u'¨´ ¢ˆ¥fD„éä*yèêEKÍt«hžaʯ”’ZÀÒb Ò¡ÈÌfˆÞ§&¡²¡ñ»D &¡ŒŠíwÐâéüˆô60Œ71¶§¬Òy!‡+–šŠZs}ä͉Iƒòµ"‰†‘KìhKÖÊ,hºÈC|³xdŒ- d0dm… 1çQŒ´úÒ÷•V˜„“x[¤­û¨7¨6†Œar9’ž=Ç’  Eb¨éR1sBà aÃÀ›S Áç™aÁÀME!þ¦C*(OܵQZ„£{€iL½`ÇÌjl< ŸK‡˜>ä#/VpÍØxx S[B ŒùŽ>üÐÕÛ³šTÞ¤… þ\SÆÛ٨еmò´Ö,Y/ë i%“D™o …O¦Ì£âÉ 0³g†ÊËÁ¡X¥ã´q4á+¼5q§Çœ©m£yM´è$O¦"G†ôA’À ^·2OR]ɲQ²¿I›lÉØ«/È9WkÕqÊÍôšž!ðâÀ<Ó¹ùø(Ä›)Å™ÙBdiMÆck×CWTiür­\@AÇ¥Ó¨B|ôÆ ˜&`?–äË; ËliËœeUpN´ªøƒS4ÿÓåÛE±Ù¨õDd3Y—ÊÔ¥*Ò}¼J7—.-Ô.Wd Uªë›NÈ¡TYxWQÛHèB'rT‚ ‡ÜZã¬|g®Û ´ü˜‘^$³æ‘ Ìw;ja –ˆµxíû7Y…‹†Þ¨Ï×/ISljŠ¼}Ãi d.Fd$î°zÎrTŸR«‘&é‹‘g¬E{ÈñyÖ•HyyyÑhÉuHÏŸvR•SW¡Ìa¡*¢Ö |¿ß%ÇÈ3ÖE˜Îœ· 9ç"ƒÉ_ŠüÝÁ g-ÊïׯF»¢Û®GÆŸ±"~Κ4S«RÎÚÖ¥ž±2Ýà·YW§ÌÍëNŽž\¡òíÓ®QYéÔUªó˜ujŠ©•ªS¦­UVU'l‘×~ìâ IìûÚ>"£®~€Î¦ÉؙɄðÇ<ªÑ=5έžªàߨf”fÜDL¨Jçq*F¼zåpîúu<òÂ%!ml.AÖ%@­ ü/^¸„ÿ1`b³ôÞ®üc$-7'P/Öµd&œà”ÇST:³C dPZ_íݵîÊ)Kª„™iCÝ~÷Пj«òºþ¦^-¡N?LfàöÞ,_ÿ^S0 ÀùP×÷g‡š]öèëJ)9+0¿++Z]Åqn&ìáõ™ Á2 ”o®“ èž¤HIŠg%ËYM“jXR„‡h‘¶f99e—P³šî *wÉ©!5ªw7ƒ†#-Rckh0%"5IÚ-æfàý sj`¼“éÔ.úß èŒ¢fªQÉÙþS+b—T@³ÚÞ0hKÒÑ,/Õ—¾)#…ÞBŸ'΢HËý™c±¡T…ëÚç|ÏöhTÁ&Žðä®t›Ðí{ÌÀPõŽþçä|Ë°ÂÝŒ¢·:`Ä.ÿ£ÁÐhF£Ô”VÐFù*þEŠlÖ‚ {õÌef›„ûGüÅÊ‹îÕ·_‰dî5LK$ ‚3A¬›Š¤}~ÅiOûQçmLáúÑpx…×X‚|"´)½,tw˜näÇdPÞ i. ÃY;èÊ !lÉx½ø"¶¡(¶)Œ6º›$+ºÑ¶àè—CÙ€Iç4Yt< øŽq"/jlg£h2E(ÐëÒþQcžÌý& “2—²&ì_i­T‚xá8èˆz²2’$®Ð&1´œÐPo LÁz|^'þýƒ%qRê‰K±’ú8€@³X_­^¸“O³åxìm-Ñ=ÅÑú¾Øß8달äS ƒ]„’ ÆS# ohº!&¼F¬TÖƆ<Åcàh‘ÞŽ€NI§'••ë¶)®"à3µrâN„ ت1 “%Ðu];B©2}˜0pøÁ‰dSIÔRF":ÏPcN£$›P²[šA¶y>µ´©W8°ß´ïn<Äg×€MÞ˜jaj«a¬3u Ýíõú¥Û%8¦Éë•_!˜þ¬í^`¬—;µW’¿K˃Ž0H/aÒ:µÕjú^Æm4+,¥<ã.®_Ð5‡qÿŒ¤Ý=TÌ÷Ì)f}ÄrÏ0üqðIMbлnTj)M,ž /º' nQ½H;ƒGNÏ Ö”bJ bÁ˜-¯î¿™J%·±)}sêЯ,K×¼BzJCÍ+þ«½HC]ëAI1òýÙÜ ؉šÑOÊÚ¸bü1­­$I¨¤Ø% 1åÚD>6‹1²âÑh¼ y—]Ä°S¥×!©%«{ x‚ÉJ•‹O]æêûÛíô€ ”7(JcM¬z·ä¥ÍÄÁæq °œñÊIJ<;WèÒµyÀ®|¸]+Å÷ʼciH=5@æúŸj·ª)>#)O³Ò•ÇZÔ¶R½b­ŸÀxÛüç)º&¢M¼ôþ7ªA—>"»¶M¾÷±-®êãÅ8•@¿Á±i3o[Ó*ŽÅµ÷_®í»‘Hƒãí{™ôN1é²Gë‡ÛÇNQNº¶äÆÚñšSìRè8îé“'åÛˆ¢•ßx¾Ó³5ª0ÞˆN“L_[Öá75ÿ< c¯ç[*4u¬ž˜I®ÿOã¨?ûtDÁºlíÂOJY”"~y§°7/õÃ|šý^³\(3[GZ†î©Ul͵J­¯ZeÔzìo$Ó””oȆç·M°¼.CbËü¤ì㔪[¢õèšê%©îY–@Ë™Õue zeVA gb¿Z°(NO}x¥MJ¹Êx–S®®Pr¯ÇÇÐÑÚŽ\P*p¡qôˆ´Dkóð8~5@]³Uvb¹X ûÞ´ uÅqÚ{êNê½Tå¸,6cÞ?Ó^T86NœÊN™‹”m¯_…93G•:žnÈòFü÷> Q“Â>0‹‰Ø+i‹lØO^UXÐÁÁpAP9¼(°Àm^ƒLP¤Û†±x%N€3®íŒBš¥¼ân˘"\üR7²â+KÙf£tÕ‰˜+«¾ª“5¨-Û© Õæ_‰»=R\ŒUÌíTº²Ø…ížý€È =Ä]ŠÎ˜ÒÇS2š>""¹.Åsü9iÙ"„ ·`Ž.p YÊè“.0Èš™!¡ £ TE±±¬-äEm*¦ªVbË%‚cYnƦ†í©ƒî¤°¢C^‰´{k8”tý)6#YEƒ‡ÄçéBpÞ(V¶¸ê´Ú9<® T5"xĦVÆ^/a7:)bÍœæeD(w®>|Pç^ 5ÿ\ –§­ßgœÿœš ¢a]ÀƒÃ¹KîŠL(Æ0·5ø±RPuÃQö-^Q†´ Ú¿°d:l ã­9ÀTø§õ9þ¢ÀFb4~jþP¾–ºL¼1Ïs•ö|ey&ÔGRÌ ˜Fk8Vgèó]k›3¥#úC†“Ž–>¢6€3žrÙýê%bo;h0##wDª¨= ºM¤‡t(,KŠFå:d…˜W³+*‚t­l¸¥/èò5&´yFdCš[W[îuX³õûW‰’_­æ]žIFÒ,›[$ÜùHÄGÆ(dZO6‡ïãfnN«ôU¢èÔölpKÐ;e ù2«Ïµt„ì¸N莯¼ ü¡!Åêá¡fTZòÓi£YŽÀH”Þ4¾úªq¶7Vùr°Ôh” 9-¶Í.ò®¥ FIWTªIqœ†ª‚Ç Ž÷HrLH³Ø*½'ªÿM±†tÞ꿶t,£\F)Y†+Ôø'Ä"3$\Ÿrd¨¸vV^,IТV âZ¶Ó-µçA[V€qÁ›¦ˆüšÈQ¸×û²„P¶îEÆQDWñ&ªÁµNÆfƒF¸üíI6GȻͳ­‰n¦¬lÏ™Q/»s]6»hÑšn$ÔüÅZAèÑ-)‡ÇÌì"‘…½[†ÒjŠïe<%…Zµ  Jp‘)ª3a£ÿ)ºðßÁ¥Š²ƒ?ÉAPhLÀ ]¨ñ.oPp·ÅHx5¨‰üZ,@¼ÀlX[#ÿ o}¥Çp…òÄUFg*eç§ÆPZ½Œ&}©R­îã †‹H…ãƒÉ #=µI÷WØE÷-ß›—èixlÙ/Ð×oÔ“‚«ØG7²þç˜f8Lž¾$ÍwöÈ8:¢‰Lqw2\‰lH«(ÃÚPõå–A $„ëBÈlyŠ\Ørnsp7e.k‚SLèp™š*‡0njH &RÍÉÅ%nÝ þ¯¸Î¹äŸ†á:Ñ?ÎB–èß’ŠÚ#•Ù.·²Ñ¥MhÒíS„Å}Ë– M®Ä”åqÜÌR²á…iøpsžD—ÄN¡SíXr7FIÀœ¢‚ePO“–DNg]LË©ãæ]GanMP>Gúauÿ¨ˆ-“–؃íæ~ +ùtŵό˜8Ë'»Í…ëQävz·w2Ôn­o.©Iº½05Û:ÑBÈé[)ÚwFÒË­hÆ]"Ç™†d«nÎÐ3“I;È2!Þ—2‘)R[E¬êû×G³º @ò3åt …:Vl(5:öø9Þ‚lŠáq¥¸­/K0U߶ë>o8ù ÞÉÖâbáÖj6hôéuk$`ç›áÚðZ%›¬Bù*6»?ol¶­¥‘T²!ŸXÅ&‘¥ Ǹwj)w'«JµƒÇæŒ~X)ãvªFÒ7»*J2µ—ºGjaž\wÅ_SͶ§h¾ñ.swæ1ºIŒƒ~\eÖÁqó\÷…aêû“úRµ¢Ž%ñ¢9­Áº”¼Œ—Q dP}ñnd­ù„_ÏoWÔf`†Gl²•˜{éΈœ}å.WYñº®¸?ïÖ]Öûqë¡r0'Å;\½+ú“ܬt¾zO*fyoÅÿ„øþcÊ0ý¬.Üêt.Ë~füôÚ¯?ß P2ùgHoò×~9Ÿ_æQR¸õÙ°Êج’ÛÌBþ¬ß|éZ$–­Lû“OÛ"Ñ Ä¾øcoŸ·W8)½ß]ûy³†ÂȸGÄX:LªÌ q’_ØYÂÒðÍÊLq¶àÁ¹Y¶,ƾn @yâÆëß­ "6ÙñX1H­ÙFxì7‘ª@ÇX·#:P'­rÿðCKÚ‹ð-v“mâóì +…Gÿ .”ÿñ|ùå—M9M~-+S“9 ˜IðPƒT€è\š$ѯ—Þ¬ˆM 䃃 CXÔ¡79²´ wƉҌ>q&À¾Þ£Z¬0{JÑF¶ðǪlœ”Æ+?”SÆO¶–"a¤Ž ‰ÛG’}³‰on»[¥éà`Ô± ·^¿×ÜÃ!hó¸ãÙüsV²UA‘þÚ³WÔ—´£ž¨a8¬Ù+0g–JÖÄ­Kß컬6:vÄ«ªn4nÖ­+,çCk•e¸öتV»/Æ!Âjx Ó5é0N¡} ñžs¶9g›r¦9QZœŸ–2 ­Ò°ð)>ã3ļ x_k»íÍ­µ—;Çhðô|ÿhûø·æ";w £œïKÆ]îwÂb¼Dªå²;Ð^ OH'FŽ)Fíõh|- vj€ëŒ–˜,ÕæBm]èÖ<–ŒòñáKÀñùçk‡¥ù_*•<,J½ð¸DQØ ¿4—È­c$¤¥y,V)Ô~ÚßûmE¨oeØtW1ðC®2Ä #•³$®ÍF…Û²û3€O‹„f+ãÈ6f)”  ±ý—fg§\îcjÖZ€Œrܨl)+OTv&ä×vÛÏ×Ö>ÚY;ú Ãɘ[ê"ª+(=M©¨ÀÚl¤5jßTâím»4Ï™+¬yJ—½& Ö8ê)Ækƒ1*Çät8 ©É5Œú}ÒE¢óÐȲâR±¶]/JâÈfÙ®°L¨Õè0ݧ3¨l¹×GÉÔ•ÑÊìºï\U<©?d³Ü …ªäa9£‚UºØn]‡Š­¢ÔY£óa†Á/߬S»aQ«3”¸R´õß^Ð çWGŽ6/óÁMÅ]¦úÙê¤Õ,ëâe[arÈ€=²Á¨ÄÃö¾x&ƒ³Y8ÆWJUÊàÄ$ ž›å³ÀÕ†Ðܼ\¸AxZ¤xkd}%uEzágA¯Ò m3 :³¶¾³¿¾¶û|ª‰x[j(=Ôóú5ú`›ò~,~„Ö­½<ÞGL„!³€H_xºˆäOÔcNlì´ŠÚ\ÛØ<”pø%Ò9 ±?¢‚XßöÞÖ¾Üeñ1£V‘‹d¤° äÔG5sŠ½zá8º%šk}@ Ô%_€R d¢cÔ0ÄRýûú%©'ûDè„ÆÊPnKE]@Èhvp£)òçãñp¥ÑèÅù,œÔ£ÑŽ¨q>ôjœË‹K˵Åoƒølþ-Õñó³;Yz"ØFç¤óRŽT!î_—PZD]ÂuÁ,DQ9´™G}©a#{ÚçÀžÇk¢;ÂXÝR¶õI{œt1‹¨È:¼8„¬K>ì{cÔY“qŸ/¼«XHÌ_Û=^;¤šs§å7ŒF û{,5-Ñ^¬¿©-hÒ°R›'ƒóøœŽA=6L—Á )i¢eôsŒñèT ªa@Jïá·E«’2ÔÒ¢!‰t0º´ €ãú<êÆ–ËIÈ™ /}²rCõnèm5öpåe '˜ˆÎ¥è ƒˆŒ©Ël^?Æ`iV;€Œ)–ÐE xÊ´·üdÎKȇÍ.PÓ`ç|Å C±wå8³TbÚà`}Pí"ºŠ¼…‘6!(ÐŽ·ÿó*iaW½Q2(õŒhY4/Ž'ƒ!©3A¨˜‹ŠÐ¤?ŠBÕN0ÄЃ@LjÞÙ…â~ÇQ` \Çý0‰2ëš²oPÆ Ú£'z»ÐHPTŽdmB­ìúP>‡]W-Œë:·´øÝòwäÐSöµÀó³s:Oñ¹™Äþð0RO£žbËimÁÅWË°•7÷6Ê…ýhQ(ü†pš Ôk€NHÕd#Ë ü¢1®,í²¤U)ô? S1çàðŽ¦J³®\ë•¡(£ y4-…ý€MA0qa±»8Œ› b€—šÐ9mÏ­!®…£#‡fù5Áö—†Ð&òtBË­º°¬V4]…)Æh%èÑp#®‡þ¸ñ.ð/êÃóáA·ùÍ“åg…‚ôY:ÆË ÈVSøôI A–f:ºÀíô']uÁ‘: '”‡d¼ì‘py8Mf™÷„þ“6 Mú– ²+¤¤É ó x®ê9§㮘yÁ¸iWirÅéxlçÅÂ]„ß„(4/ +5d éqèTh,µåÍ"‘¹Ô„§.Müf2·1ó̸D¹Uñòh³½»¶½w ÿm¶w÷76Uf õ!WkV.Üêº%\JT’“G£–ŽdäKHC_Û$½ÊHßZÛ9‚£äœ„dÄïyeå€ÐÇf)«¸äø66€—oòáÇ–Û~nÕlÌúÛ²»hT"2ÇŒ¼…B¶ “¨,¯î°´V0±µsìÅAnäd,?ʃDJbGB›U‘Vsî¡ZÅRØ» þÅ‘DŸäÎï]ÿ¶>{âñUŸ¾ªL9ÂPRÄk.£¯-ï¬Y’ qÆfq®Hï ¤I§Æé& ȳÖHÚïš !ªMB¨”³7®Y΋2jôpXÉlŠO/Î1´Ôëv¤-^_1d@Y&—¾2ÒBÔX]É z®¥«Ô³©Â´ôt¶ä<ÓõÝ]ù+Se§…°º ½,sb/º Þ£ qVï­7¦²¶³xæ4êjŠj”Êf˜´žÑìÆk€ü~ ·ëuÓwaw¿Ø*ÊÔÖ(@o V xmÐr ¡²š"ˆî'ÂMs÷†‹[Mþí žv®j¨WÂ[Û´]Æh«3ï4eW{¥â唬l¹dY·@ç!2Onl ™X$Ñ4UWìÌS±6Ëð[&W&·k×›¿¥¶ +ov>FŠ¿sØ™?Áé¬Ó¹ $€ó™é;­¯ßƒºÓúz¦¶Óúz“¾=è:åë:Ñe¡Ûg£ö-,9 .äÎýÍ·ÄŽÄÃI}Q™Ç8GЪëˆÆ-iÄçGT§ïÍž(‡<èÁµò=Šë̈p¼>+ú`ÖHF[ × Ãm ‡2è†ýá“› aµ®½ÎÓƒ­P–­BÂÛJH“C‰fUÖ‹®‡1£ÕùMy¾{bù8¾2~=Ç÷Àðýé*îܹ\Z2•8ÜŽ<,ý)K_(ë£öˆFÂFFÿ=ÁBN[ÄMQÔÞ¾ Ý/5€ÒÕqÊÒvÝ–˜®Ïƒè$Yëî$nPH݈Ûà‰ÓèŒFXo|¾ =~©ÈŸ!9Ù!ß9ä‹Ü5=³¨›¡¬ûœ9”»-:¬Ã¯èË4b'c:þ€’;W‚а Fkð•Suéí•È© 6"É8~i‡ÔõeŸèZüTV¦*—^8é®û±¾Ž×€t©A%%¨Um:IAaIת^¦—mrJß/}]å¥KÄÿ"Y€Ý‹™8Ë„)e§_‡A?Û齫Ee¨‡=èýL-øl¤{`Aÿ\T¸}0f–r8¦Q¢„(2›æüWšl?È+?wyåçG`þû„–Ž‘·©6aéý Ú¼gѦôodG|Ãþ~öI&íG Ú(0‚¬¥‹ny%¯¹™©ý©`Ž¶Êûºu ¡Õ‡@˜ ¡|ëDêEö£³2‘Òvïúc/èÇnhŽîq0ŠÞ!5$CŽ€”«YË”µ¥Æ7ÕX/Üf±Z,Õ•yXØ5~É( غ¸mIâiËã§öNÔ~µ?令‹8]8û£+¥'ë-0Ps‘õ Šóó%Î]TÞm‹ìÝö„Z&˜2PŸ›-™]ÚÀ;ßÌ'B4e¯¿[ÅÖÔ!+Y¹QwÈ%@ê ¸’¢ÎK¿ÆSúYËÆ‹ ï•lcØ,ýhï¬V”"ÈhòÆ°´èµ ¸Á03†ƒw!›Ò1ëú¨¨Ü%£-ð_Zü£ìv[–´j·(»F¢„¿üšèËŒÈØ‚EÔ¤¡áž«-IK4¤Óv’&|”DVµLôÕ´IŸÕ ©ýRhT1‚•½èÑ(‚p\@=Z1ôé6â GÌ€ª • Î šh¶IC“öA&Q&1‘G¢·I^"Gâßz÷è·]x„-Xœbº:?]ÙVM¡0¬ƒ¶û¨Ẻ. ÕèÈ?C[-†È1|ØO±´HèÞYÈ!|(bƒÂÁ˜µÅQÏ µ ïxBŠ‰ ЇUŒêwÑÛ>wH!™cÍ¢˜QÌÕâdŨ¶4óq¼“ÈovTk²ªÂ‡×¿‹7ÕF£|¢‚[K[_«bâL­`ryÒ V_šhrþ¼6¿žI“·Êº¿£ƒR´’#,„„ÖŒ8DuŽat'b%]J±¢Ž(´ÍÿÞø åLUjÔÝÿ‹Ïˆß~+ŠO#Ã_KNÏ,Ôø6çÃÛŠ:®q´u?:ygIEŠ,æJFý›*®œ‚ÃÞJÄt&-GRéŠÕ”ËÂY:*NSm”ÇÔÛÊú†Nƒ˜<'”2給b¢Åܻ©ë,¨²Ê$ÅY¼Üß’‡û y·íž8>KœØ‡2ÔtR™bèœH›ý²˜¿ðû}`ÏN=z‡3W~§C> \0ÒCŠ ÷Ç’¹õ«³‹ \ Ð‡¦ræ;GŒ6’óAݯc€­›ÎºÐ+ä±O^=.ȆìþçÄÉhPN±]Ù‡)sl’’¢Ï6“t vFŠÛ­sWÖÆ­©ûg åTÛgŒ^–I9V„•+ès¬Y\Y·ÙÚÈí¡-bʦ«·Û,F(ã6ÁþÈžžÂ.%YâÃOb°ö þ~ª9eDùC<îQýüYB|µµ½³)ª= .=X¶X4AÁ'ãâ‚(^+€^R¾Õã™ïUpaõ8Ú3¾‘ÒÎÌ°´ Ë©U›0곜Þܺt'ÚÂd¨ñœ7š„Ðk t£ÍÁNÑ÷™]=d‹¼…cA›©¿‹è `!¡µá¥¾e ¯² fÆ9ÈæúN}Øuÿ ñ1ÉÔõЖëLªR–3ð7oìÂ'fr>Zw œçHÒútÊÚhâ9ûÔWqœ“p”Î&Ë>§í=²è>ÁÆuåLfà+o26õâð ­“Z ïO‰ºÅö©UVoë55 ‰QÉø>m¯Ì9ÙÛÅ'9ûæw¤¬æÓ‘](Oó\ÞÁŸù§ºÍJLOd=žþ+ë¼'‘òïz+û—úòNFîŒÜôl´úŽÌqH…x1dž…àToÍ˃'ûðów“N=KÙt&y˜º—3T½dÏOú@s;ÚÈœó”ùHdsÿù?­sDê/ѦÄßïÎÛØCèÆLjggæó äí®Ïe7˜ z!|í6ôb½ÝÖ.çp‚&¤0@‚Þ”]U;ˆÅLUÕ_ã›ÕÁ¤‡Û“{â»S(:ò]}§³y›5ìÍR¢¢Â]Û•ƒàéL ßïn†„]΋õu{˜ðUjXbé6{zi–ÞóݽQd{ÔÈTù÷.±Ö×¥"[,j³œwÝSõ‹;öÙ-öÉnvÚD@Û½¾wÆl§ä­¢“Kž íàc‡ãV¬±Jí§dÁn¸˜ì¶[X¢: ýX}ž=°W~jÓ[xäÌË£ÿ¤i¹+%û«Ë‹ÙgéÔTY!u¾'df.=L†LT„Ð%Œ€€¶jHaSÏ Ö×v#q¼µýeGwÛ%%Æì³ÁÝüìîÚ}u–º¦c¥¡,¶öÅúwß_g22¥èud¾óÝ÷·&ô.²eVsÉ6;÷-H÷Fg(IÏ®ÇãÑ8q<»­"¨ÝˆkÉ(ê÷£ ⠡˜øÄxõ¡«dÃz¸~$¾©‹þòG’/ÖcY»{:Ác6j‡\â™P ïÅ|uÔ‰Qz_óVÎê‚°šƒ¯P²²ZÀ· ³îDÕóCø ] rZuÈÇ2ª)Xâ§éÞðuðIŸÃд䬢^d} è*W'ÅXÍ;¯áÄ;ùGc1ÿnaˆ×ÀgÔFøãŽ_lEfǹšW±HsŒíñß?ÚOê‹bãü!:þ“:<Æ:%·š}Ôiª­ím[>àñ´ipz“°£œ3£ñÕ•r¡Îx §/V’ÂÃV¹uùÓOeqî_Rß¼êÁâÕé8&õéãs?VîRÑëwô–véx7Aýñ$ôÆ~ÿjî\QSŽP„¢baRýèÁEù²Ì1,¼ B¾Q`ddƒà'CívY彺húî€àúdD“ªƒ.-.–¿hBE0Pû¶6E#<-°(‚ˆ’7yWÐÔû¨Æ„×yË´ Z{¬¨|1 àäÊ ›ÍEå|›¢æC^ú@9¬BÆüÁ‹gì/ÄÊ(î=ÁõÎõ¾f€¢Ù‹âG±$VDm ð±`ûù.œ¿žR[׶_Ñ0dN;Of€±p‡}‡qàuF‘ÂtBëüáÌ YUŒ1’£BÖ„3ͱ2¶ö÷ç/+8cÔöË~ç©nûküèU°é8Ðvã1/íó´w&¨~yIk˜ö’x竽 gó*«Íçeû³,Î90yè#TŒ‰©¨^¨ ‚éÊ|µr=9¡¿Š²PFgÕ‚/ïVŒ”ºIóèþ2,ˆEº?Äç׋oŠ¥œÏKæ3L.#&%cH%Øà®öGß ÏúïúM ì°5X Ì#¯‹VáQm صښ'jíŸ^¾jí¿<\ß,Bâ«&¶7_oîa€Ÿ£v»ÈzŸÊºNn4Ä&@ÕEiÈw+Ž·/ ç†|™ðIÛ1$Ç׺D]9×æ,çzZšRÉŽÑ!xN¬­·××ÖÚlÿ²¶#Eº™U‘Øð’÷“[(ø…×Æï¦5ýœOÈG°øúuËÚ&¡ŽH’¬-ñÉÔ&Ksw‘1·kKÖPNeteÕ2€& ÓH ýÙâKúæÿÛ:£ý[wînòšIˆ1ÆäB:»ôaQ–e8ÓäŦÔ(ÙŽ>ÿK/Ô±ÛÕžmHSmô6f;âJH–J«Õ˜b‡£Y§‚[š/Ú‰Á7€˜¶×Ûû ì6_Û©‹ñF0QºèÈ Qy£h>ò):00Kh Á<ÙzÿFÔ#ÖreF)ZàÀ…kk¹b/©:,ä¤fCŠ½h´ÜB—Äòªr¥B7|.¾1Ž‘[D€R[ËbÙÚª´íøü V° ºuK^»å´-ïš Ø‹ËÀ¾h« !m;Geœ`mv[wP«Éhå3>1¾,?T×Væ¦]ÍglöUH†M`Fî¦ÔjGNPÒDŽ¤%'¡x„î"6í–xK¶Út‡p“¬$:£`Hn¡pl¿ÚÝ\Áóš"<GÐxÆñõu™íùD¹`âó‘ xó¬eXK#fnñ2,T<<œ’„²&úP?ª¯>xwÆFIÈŒ¢éLñlÐFÆŽ\]aŒ+`z’Çv3Ôc1Åù›ÅVi~ Û2ŒhC±¼¾^!þ€yÇöb¯²”¤ßÍ¿õ¶\@Ÿýé.ˆŠúŽ’€æmâþþ&¼G‰ê™²™åÊÛ¼€€ëB›†£`àŽNPÐHÆ„(ÚˆpEE:p½²q <ØŸN),-ॵ³Äe 6½}mŒ'u%q[œ €ÀÑ`÷i¬Iz—zµ‘»  pmäÝÃm²Ž8‡ÚUzâÒ(ŽÑì€E¡øé öòµí¬Ó‘iq_J7Å“^o´éFW”7à8WÓ›d¹¶ ¨‹âPú3°ãþ†b£X—Tudq`” •£®'çÄz4Dq3ÅüåQU•Fö ^˜¸7$NåoÜ|ùëÁô=ŒcÂúb‹:Cw>“ÍètÓ ûÕ—Îé&5“¯ûYø`£#[Qr£eaÙt“1YyÇTsŒAè ‡ý #£.êå€Â 8¡ÿO0ˆó9Mž>)Ç(QÃ&l‘§%ÓBlŠr `5PÂ#$@ñ{=l@Ô“Ûù¦` Âãur^}”Ü àñdD®MwÙ¢€Úç€(…Ò8ŸT†š€/ÌBI”ˤ‡ÇÂNx° ¤ ¦Ö7xWaÝ©ß|)016}fä©+ÑiÜ™ŒÜ€œªQpóV­”O‰Z s…NKÛ¤ÀÜé3Äl­±\ïhUŠËÅñxªçRašs‚0ãq¹”ëçŠ)(Çm§µNµÀ^PLžAb–ëZ_—ê| Ò@Ž"˜{èêÒ¢hœa#>¯; ƒ“ïÕF9]e•|µ>¼·<}ä-£:}t:rÙŸ¬Ð\¶7RŠ¯„ƒ^®uØÞª\‹Ê:sŒ»²¼ö)v½ø|»dÙÀ0¤°Ø^ðï ¾Šù9ˆ'^ò ~HÌ‹åkù ³Qô×c!îâ!â3aAĽ‘·jG)º_ùI˜®Çxºy\ûdé’CîßgäµWzâ&ОÞ3¦B°«;;$CÖ6C †xS£Yar.'ñ8‰-¡/MðT’öGó';ÓÔX®Å ¼Aº ¨#™“¦Z'&»ŒòØLÐ)1 3?Ã7]¸tôÓæÎŽá!{€GF§s zn Cžéhz ×SpJQ¹Î€áO’ôdƒ­°|(ÇYšRüé-Šë‘»AA;Z¦D0YÈù; c¨B‚³Bdj'"¬“ëibDÉa4Ç)Gvxyh¦<”,ÎsÜm’ãýJw¸ŽÀŽÂ!öÐÅ7¯W*¶´E« Æ»ZO5‚c줥‹UáRЗu]òW$Hì·¢¶{°@Ýû¶¾H;Ê·õ%Ž[ìÑ2Äëá]P`Ö¼e×ÜŠêâ ×K£¸-°Q•WíˆõDø€ïZäÅW^¨Î¡=#†Ô¢ïê‹Ókæ\±ê;(»]6ôužF´œhc»هV´.à€s³WÜ¥¢F{1Q€f9b(²¡ er#@ä“c=ïÌ«´ef=ÚH牷•7N­!Gym’Ƭ¯olPbM^g(^À¨Öéõq‰üYjfib˜ÇvÌÊvÏÃ;„‚*r¤›šŠ ™Qˆ#If•cÿ–Z\8ZÃW¯¦Ê _½b¡á«W7bѹaÚ$‡——9ñ%É™ç«W9Þâ×ÝHEÕÀÖ³¬oâ]þ 9røï #o}C@ EÓØ ´Ø‚´Ÿá¿CøﲿÞáßô9þè_½º‡ô6¸Ð›üõÁSôŸô4JŸ½Sz\Án« ùHp ¿ôˆ%IÇôœöi=Óc׺¦O"ü¸ÍåþhÖ³?û{¡KÖ4öjõÉœ”êZŸöjÄ>K§ö 2¥S ×aÆ­ýÚg.ç˧÷lï°|×ö˜-áÛ§èÕƒûLÿö ·¡´‡{õð)<¾ÛéŸï>ßÿ3|¾ß·9¸µ nmnÁÈ5 O~ÿŽFáÐÅÏÒ,<1ô÷lž€žgž‘íFÆá°aØÆáðê‡KQ š‡ËÇ„¸Î žî¤tüêÕM­ÄÓía¨îj' R–ânš²tMäÌ°Çæ(sq5Š­ÁøŒ Íé€m3®{ñ×Z_Û ›4dÌhÖT£í¸3IþÃæèob@>ëtÝÙˆnªqÊgF.±%eH® f’„æ“cEùÖä|BJØ~[˜š¶'OКL‹òk æÔ猿µj²ÖLÆQúÏÒL~õêA5ùA5ùA5ù¿B5yêbÐM~ÐM~ÐM~ÐM~ÐM~ÐM~ÐM~ÐM~ÐM~ÐM~ÐM~ÐM¾¡nòô3ÆŸ¨œ<Ãáæ®ÚÉS«ÈSO¾¶ë'¿z•§ <À}i(_ÓÊ)*ÊP2KG’§*)«bi-e]’uEæÄsílNAè.åJ¨ø›V?àYœàű?8…LbŸTHÊ÷ëëkGN(Q`š0¼=ڙ̽V"§ëýØqJ°vôŸç–`íèAú÷ ý{þýw8&˜ºÚ?Gñ߃¬îAV÷ «{Õ=Èêdu²ºY݃¬îAV÷ «»G?ÓO¦'Î"wö%0µŽ\o×–’þÖŽr= Lqo>®iè4¯P4Ó¯¤O÷,  føÐe¥wâ°N†Ýe[#بæQõ†Ž×µÔNpŠ¶N†í7 ´ hœ©`Œ†’3kaå­“k-¯n uyÕøP‡÷¡-ÙÙfy¹þ¤þ´,SG>05v²ó¯?F•_vá/]»rR=>'(àCÜ>>è!Í{:v„mqL$ôŠl8Œúœ þP£ÓDWÅŸ@“Ú.Ÿ0Ú°WÁÁìpZ/ž”Z­7­J£Õ‚ƒúYë>Bc\”uœÂ ’y«nDÃDåÅ;8'‘¸eä÷ü "¹ÖÌÒ`»0K0ž¨ @]¿ï]!ê‘U(]~5îxCÌ}Žs£+F)‘î©]gY÷Z„ÛªŒÕ&ó¯ÔP¿·nT ¢&¨*9-9åV¹ŒdÕôš_«÷. ºhÕ,~8†£ÆY?:=åÐ-À  Æ>…Ý·ýBµ1‡ÕË*ö­JUl®ÿ´ß,·>Í¿2WW¿Y®ùÌyn!A?.pà†#Œ-"±~Šì<+»#5¾‰/g ƒv#GR<Ù°£DsŒÜBm7c˜®ºÑu2/AÔF(ý­… ôô–}‚Tû¤±'öW³ ј¤J_QºÏñ4[Ë–:¹Ù_Æ·ˆÅZ¡Þ!PæâóùTÇ=BŠ§Ýþ)Ð.I¤8ùÂG.ó¶UžÝyÜÞóImËhRñÃíc¬½†¥¥‚õŠ»ÐGݸ4Ä2mFs\M»‡Dr„†A¼R<%ö8ÀŸu&Š_‹} äC¬ª cžCR Y¸XÄðQ,U Úóx´ª•›ÛPsÉäÞeRMhJ»u€™•Èt;‚ÉÍk€ÙK—INü÷ßíÜ9xd¦Jx¦÷ñ1ï;»€I×xz˜B®5™7>omnÜîÆÌüCrsߌÞõÿ§×ýk0xiF·Šo-«U9Ç'¢gl}Ø7ïÒŽKË6…±ƒ‘lBìŽé÷ßÿaY@Åê ôÞªrU,P)«Râ\'Â;^1Ô¸·ÉIƒÖÆÑòT( r‹QŽ`/üSËÎaÇ@{k»›µí£c„þ×¹ÊP>XpèÎàž¤Û¹Òs«Æªé8ÑÀº_ª@¦ó Å „tDÒØ@´S¶2rÔ;¿O·st¯PК1xâ–µk‘gˆDÍÆžpétQ…’tªp×c3Q22+@ƒtAH7Ý5»¸´üøÉ7O¿ýî{ñ¬¨q8q øvnÅøéÂÝÊÉ”x³ ŒCëÁ;ᦊd5|Åš6ì'¼™”én$!9ˆÖñí·ˆÝT¼8pWõKÐ z=‘Èœ•~9ÅÑ€-Ǩ8jÄ×b‰V‡šìðŽ 6“»v6fR¬'wà]Ö?&$fÏÉs…ù*qF0tG0¦3Í[ߊ~YÛÁ©?F¹»&uÓ‘+½Ò°MÝÊ‚%4™K‹Õùåß—+=.“ƒ/;bßÄb€&‘°…Rþlü=¹½^ZL¹}J¹MBaã—°æFØÓ¦wc)˜L-]•xl_pMõs“ àî:{˜àPTËÒè1FZqÓ1´£‚®pcð(N·hL^Å7Žùbb¾pû¸ƒPÉmzŽ!¨õ™˜¡Åþšž$Ü îF‡Ã¥ñÓ+øÓ¤dQóÅRÜøýU£Q¼;×DEbyø&/¦P7|åË‘¹ük¸¦ Låš^n܃¢‚I³˜ú9ñ‰,Ió¡¾3÷a°Éù~k~ÁÇ¡º†# QúL7! Ióî˜abdoÖhÑ ï4Žú“±Oó mÖ^·Z7¨þüã ?*{¦‘lŠß7Ë׿7ÞàÕF«Þª7ÊšŽ¯{a¯ü› dŠ’ü^¿kaêŠÔHÓáN€¡Å›Ãrü%ªd~Ùøò¬|"Ëð~ž, YàbI·¯˜a<À£D­ †¬³i@@ÍEU±Ñ ²ˆäßzîl4Ûà©XTh³MÌUÐ%^à:TñÙøÐùhÃFë°„êÎ<ËѲQ@Á bmá.¡Æ>zÔf•ȨOÔé.C¶×´´¿1Up(ˆ~re[enÌÅYÈJö¯‹bÄ™œåyÓà.<@ÇÚL›ŒN囪ô¾?Öä~gã®w,€M›qЋ§œ{ô‘Ã>ùèc•°\|åbEɺ™#ŽnSOgjX‹ëCþWã²Ø1´Î@5“¥ ¡ -==ø>µi…Œªè-gúUG»#j0ëCÆ‚†D6”Ã!.&´%«]ÒžѾ'A±Q)3+¢öΘs='n‰¾òIèBZ¦C¹†A í˜cHÖuí%žÏBN¯‹ò…ꌦ²"¾°˜ñT„ö%eÒã}¾µQ†õýHmÐ_$—a )÷ BÀu:S moiì 2°F¢jbw6®Û%u’åŽ.C÷`Y”&Ê^7çávÒª-;zD¨Ô0%Ä™ªts¢&× º‡y˜‡fTÌ‚™B㦖KË«ä´¡wÉlÞŠæÍå.`þq2W/·)N-Y^lˆ9ë+{eit6‘1-”|!ýb[¨óÖ­Ž)˜)lÍÌA3`oÔélwU¥z~´QCûÖÝ£âq*ý×ÄŽpP¹f»œ H.^!9ØÛ½‡ „{»öÁãºØ‚eÛÛmBq‹ä…ƒö8jS7›$µ°B†~ …éAu-»GrD¦)t¦°7ÈD5„V‚Eåg†N-ãöx0„´ã»yõÞ?+ÿÉA:‰w:1yñû='_&Sr.b 13ùY8!¸C†5Ð}L8t ®ƒ¿$XNLs ²ù =gÇ#ÄeŒm£Ž…Öº]¼ªŒgÄ¥?ʸÏÃÑŠ°#Œac:µ*Zê°‡Fä+E@E+ ÃvQ|^T6å˜G9p‚&);qiiN,Ù¤!œÐårŠ|è €Ý£ß(à6´Í‚ï½ÜY»AøâW?F21&¢èÊ ÇW…G|$ôlGäÑé‘<æ"zÝ6ùH0¨°@ä há£D.S9~$JùHñCjÚjÏ kU)f”Úþ(Õ~Tµ³0ýÞ–½§B€´rÐ^˜˜¥äBV5B…ßFÇ·|$dËñ)Õ¸aÒÛA²eéFå`ù‹üݪš+gn-]4A 5¨âG d$ó4G9ÒR£Ý’!)I?ûõP¼)º—®È= TÙÑáLjý„ö±Ý<ž:a¦Ñ±›×çߌ%/¿­$ ;ìŸ ·Î9òvMóÕ b£øg7—¦¿8êÎ'çl]íVFàHeïl $‹fw_“Áèb=¹5l¼Ü=x¾½gG6šm{ºSøvÙQD&OÔðµøš=;¢šœ¡{à@ܹvcXÉoM“ë!r~d3ZŸ{¸vÕÒRºõ…éÈqsr¨1'A­ôOÂ]×{]÷Ì…1Ö³¬¾ÏHÇþ‹Ãµß­ràM Ûî¬D«Äõº.|»3rŸc÷,Òå|)Ì‚1· çžGÌR_?yX÷4YË í®³ºáÝõÔ¯<xÏ ðî`žA7+л:¢©­AÔâ«Á)6 vî{]t"4ýÀF¢ñõý­-}k™âÀÒ0‹®¯ÂTÑ÷»ì·XáÆ ;Rë„É®b†G@8<1 n-Ô#‡-y°xîyiv‘×”Ìß…ƒ¶Îs»]) §YÄ‹¿¸óäá&øÚE=W~fV9Â<´Â×ó`­Ø¡¤[EJfXúbÂmc¥ ü>rbÚç׸·+Z­V1#B,&g´ df/&[eA4ß¾‘ì,Äj‹í2œ{ºf/ÿåB¯_¯:SSN”2ëÔ•}¦&}÷H±{ZîéjGUï"D°ëÊ‘$$³®ß!x?Dç˜ä:h† àVng±íìµyï‡íØRÿÁt,SÁ;ìÇ@œ“"“î¸ó.ÈíC65¹ §>ë=yŽe/ä×» “èûáÙø\ºª7®+•KÌø–´rVð×ÎYÁäQÑø*FÄvgÐmŒÛºä H+–‚N;°æÚóõ‚Öý±…½èƸÅÝ ‡Z¥d?ÿ|qp° ý6#¢ÑÉ©]ˆÉVÆWâÔëö¯`­úì~,‚E? ¸ýà´#AÍ£àLº–Ó~KýËŽï“|}yqqQœ^¡[sí¥útÒ멃ÄD©'u'äf=Ãvèßu½®Êkz„'@`HØy2c û”|é\i$’—ü«méòøTúÂÎœ•æÒòòwß­JÐåŸI:O9FÁÙùXéÏÀïY8Ñcú2Æ‚î1šŒºöÈÌL)g®Ú5… ºáaã:€6Ž9¦Èµ8¦$ŒÒC$¹y#º†Ó'jKx  ^œ{ã8Â`"S:^[Zµz×¹:»BÎó…ý.5TS‡èdþ ºS]E5~1­_™pŠÚ¯¾­Ç#ôĺO›ipf"‚w$ƒÖØΉ]ä",ÖÏÃ}| ‹é48CþÔï¡ýÅÉÃÛzt!.ƒBc£Û뉥Ÿ¥“dÃ컫3{#]"+Ò“øV|g;µOZ%ól=¦í(°H³ôž~k¥÷ëû{[Û/Úü*£6}ü¨›½ÝsÎ žt#N›kZ™øeŒ°‡0cGJæ•™U. *qF%e@jVž{ýžâ½ò¬‰ì¬o¢@±~IöhLݱÊxÏí}uâ‡ï”ŸÕÌ¡q¬O_i²äÇ9»zà}–ŽKòÈÂõ¥oɼ¢Zj,‹ÝçÖŒ[&zžÊ@!g€v'w™bäK1Œ'«Ÿ!çÍh§øÈÉ8V÷d¸sÔgX2ÎxÅŠ(Ö«E6®-¤ÚiB01{œ…A/€ +Ö çaÌ=}à´£f)Ö½ƒŠðîÄ1zè÷hÍHºôÀ;¨ÖæõÍÑS-Æ!fgÑÈ@[5(Ö:æ@^’MTÊóΫGüNýN4iù$E…Ùt%M3PÓ;\tåçLácF®;ŠßB?-s }[Ðfcv3äEju­4‹8¼÷Šé}÷—fqðμî6‹$¯…w×y1¿»¶½Ó|º¨ü$ãkÕ7ýË`œõ…/(“þZלÊn8\Š iþ6Ÿ¯ol¯£zàÚÑúö¶Ô§^¿ú0‰W¢ÜZZ\’WCk\˜Qœz¸¿C¯Çþ@2o­P‘[-5!Ož# U‰áÈ®t¤½ï´Rlc<âF,ïí4ËPgkñÉ"üYZ.ó—½å£ùeéü@Yð¿2«˜£¿ò9Õ—DË\ÐK‹:LAãñ#þW¶ôÖï '.à HES)E4Qa)’)ÛK¢LÁ_±`fPyâÒqÔÆ\¤$Š˜z;yi¾¥§¨X×µÜHc²cåB¾¢#%<ïMïÙÍl’3~Ù{NÅR˜ïâñ².l,{ *%l«Ü6͇Ní×át1 g d\TÃàòæ•A¡œšô‘àTŸ>á(sÅ÷>Ð!ìâŸh|³{bªx²oÛ.ÝÏÇ(ïâëª_„åFwhÔcûLr“îjâ‚Ä8U°” ðÖxI@9ûhV6¾ÈûóÈÊÙ;çèí^H`Ü2HJw#ƒs/£Q7½Ñ•­í±@Áï,\©²«ÎC“OAc¯kÈk/•]˜¥ìºî‚Ê |TNe» *“®áΆ²G¡èÌýÈs Kâët¯+Ÿ‡¬ýn›s·Ñèà.ª".¤f¹6*ßE1À—3éLÔ?»™9å°Rˋ謠(ŠÀî‘Ý¡°áìEš2ð n–a *˜58T2ÌI\¶ÖŸ¾÷͸¾ÂÒH^ãÙÖÿ_¤{°Ó åûË=gÉ[4ÀkáA××þÝÚY{q4èC·œŠÒECCåt8!?ºÕ ¹Ýpù癌1¦ë&'Í ¡RÒk¾®r¬ÏLwyÿù?Qïí´–%¤L}eù­ir=è(çë(›ÑÊÃÇÏF[Y5µ”n~a:vÜ|OШ“Ø¬ô?Y9i;‘îtÒŒB”k(ÐÎçI_œa¸7Ûˆi´Æød‰ºsm„¹ÏŽØ$–T^Ë ³ ÌmM#òˆPêëŸKŠ2ìtÝ®½ƒžNZx6Y6J<²]ºô$Aôùhª×·ž Xજ\L÷ íùè,DÏm*Z÷µ;GÞ(ðgˆI;µxÞ ²Bž˜=Z@SÇçQ÷.çD>ü{gA‡ñåÒîÚ‹íõöúîF¹Ê˾ ù­i–¥K‡raNìùy3"-vYåwX¹U)`HY¼UúvŽ>€ û—+a‡EÇ0¯e¼­)£²¤ý…pQ«òQ>Õ&ÌËÀ×XVŽîÈË9å(" S€ –ǤYDPðÎcÄlµS+~U¸FŒ.ÜJ8y{HeùÞóôJ <ÖæÄÄYP 3êâõë‘æ_¾yã–´¼’PA*Ó8¡¹>^û`o€” £°+ÝØ’;çJ#Š\g ÚԺРª“"éöHãóÌR³Ê(ïB}\ O¢ZÌ0’·0¤pïe©O£òÑœVà·†tn«;¸J:ý T“¾§¿ÀÛXRU‚‰ªÒçt/¸|ý¤öýË)Q&Fª:ù®§pêKõȉ»Áë'ß\[“=o›;[âõ"4þTk§ÀE¾ÞÝysô\ÌÇçj3³LèC÷ ˜I(ð*åÜ¥I·h¨ü@‚ÐÚNfN³Dñ9Àk ºy=–î™ R®Q!î—¤€ðúxhÝiÐåKeVžÐáž•N "—Ž\?óü~ùÝS®Q8 pA~ ´üž&&/é ®,†;ñ‘½¼4Ø•‹ aHôN1“k•&x4I©ÿf ‚ÛbÿYßõ˜$Ô†'5mºw„á)Ëí¤¼@Ð&!ªç!!ã ®y½¸_zƒ!ªäH…vhÉ[hMoúÒ5ÆÈÖ|Ø ¡Úê_UÁëÇ@ÿ¡Sóä§3•»>‘¢¡w†ê ¼Ƚ»ìÔœ˜agÈËhöVî BÖ^P¯ždšèêÅ=rè•rîo'7Īóáäri±¾¼ˆxE/K„kz…8÷ô‰£8zýœÅfw¦?Ykæµ"œ]š×iMl¯=}’CO¬ÍW 9víñ²µ ËA?½ê½´øµ¨Y)•yä3*?΋×;»ÀjT~t{ÁKåÇ× P¬*Öj‡ÛGȩ̈´êô3{ç†ÞòbûéÙ»~Žï-º%›e·ª’¹LfieªuÝ ¥­PIë¶× Äât½¦ˆü6gë— ÄV=¹8¿ZuŽíaÐÁ¤C×òNÖVÛ&6ƒ=ßA€•’¢ÞÔI àø@úßph‰Ç`Uµ¢WÂΆº8~¼ü¡Z„¿¢XÁ¢1i>^Fœš%!g yö/Ë OŸà÷§OœÏOŸVrˆ6q5êŽ=²³“i¸3@ó¢S_œá\5©ë`† Ðá·UÜ}ÐÉ?¾ ÝOÌŠe*MÎ^«4#º—Mì¶ó,Ñúkõ«ð‡ç~R<pšT‡þE?½¯SŒ‘sÎv„IÒñWoØÍ ¦Ž#òyøGxyÃiW6cPZUnÆOfÄ…“âŸéy»3LÇ2QÜ{LVuqï‰üý憃;êÞøP­Öñ KY61lQãØÇLÂàò6 |FfìåÞö+m7SUf37«î‰¶»ylQ]â?Þùa­ ÈX<G#èÓ6¿ÛI Ä®UFü"]D϶}g3…Õ³A†Q匠2Vòÿ˜øá¸2嬥ùÎCDÜÍ”!òÐÇM ƒûiVq¶fYí(^˧¸RÕâÀÀNw‹ivnQÈb‰ÆÃÞÍ–ˆ2„œ¹€V"»­6RV9:IyYYEÌštžÐ, È±F¸À)!Œ,g"¹nª3ˆÒ¢*)׉Ï#8ƒ~àÐÔ¦¦©‚!’íº’~,-žd_x™{k§Ï;ëÝ ³·uöâü§`û_ÿ|ûsg°îEûÃ?þßè0>O^¾ûåâ×ËWW¿ýû… ñRóE1n´æëõV¥·¯[KoÔß³ÕÆY1Çh„£a;K¬”µð ™¸2e⬛ìyýê+‘ SEoÉþ÷'¨+uû}|½u% ëss»³s¼¿¿saR¶CXþÖ4¹Ô¦8„Õ£•‡ŸGXÙÔRºù…éØq ° u’aMú_§®”‰ýc=•ª‘×Q ;œÏ“¾8Ãp®\§Ðwà“%èε®\ÕÈ}vÄ&±¤òZ^˜aníÉ5‡¥¾~ru%]wÂ=«šÎu¥|­6J<²Õ•\z’ ú u%=°ÀU9¹˜ ÷ ¯‡°¨xcÝÃhgSä4üjK³@ÉuáG§uÈÖø-¾ÜÚ,ë:¨–.RZ{d&91¾ˆ(4´!·Úq¦zÄ*•ëúÜ8è EaE}oÜñ†Þ),1êÁnmõÊ­/'ˆZ jš8á(¦¯¨0ô®jèÑ 3v¦ä›~]aŸÛ€\mØ<ÚÁMyXn¬ ³Ù?õ:o³„ JEfYQfŸ¶Ø>ºÖY¦™"”Þ“p!¿š<§S ИÖôë€XôaZM@2® xA¼ÑCh”lNuíðØÓµÃLžtí°I߸Ï|î“Æès€,9m.äNÿÍ "H‚4qÒ' t‚U^ã$‰æcœ=Hͤ7ÿÅ!Lî…¦(PSN»jíp¾*sÝW×ç©$AbTb᜸í6ƒèØ>y@‡üäÆ"Á\î9§ôማ{ÄUXE¨¤c /+øâ>ÊÇ6Y 7;£ÉÇBá®w¥²òHück{gSYr\C]³ åD½QÛã Ø»œ< Ž€¬ãAÀ±0®Ÿ‹šøá‡öÚúæþ–x– ÂѨ’'B“½Žá3I'­€'I1x…HŒg§‘?žŒB±¸ZøX`ˆØ€´ &pt¥ÌKL¸l«?4¡2ìÀýxlJ¡c³Y†­Ù ž]r]¯²{âvQœ¥¹úþ—G£UÌ™ü¥¸ÎV‘ýZá8ÌGôõI ñØOâféÇÂÌD¸UúIV$—H„I¦¸)âc"¼î¢¨ù0µ‘¥MÝÍT”É3¤BÞôÑ“;œôO£3€jü×Ô Ü ö”8ƒ\xôwÌGÖ8†~Ö8j×–éÅõýQ^6[‰‘¬&É•Ê‚ævÌ—¬áO-Ó»ÈLrdnVJ°b³6³2nN¢Z£µã¡ßi*ò”ñ)H»üSnÀQ*u?î:ÒgÆ¥n߇=ÁÉäÏéKSåxàÌó9s5RÙøÙ0éÜÌR²á…iøpsº#Ñ%Altê_wÏéc9uܼë(Ì­ ÊçH?¬îßÛA?Ÿ–؃íæ~ +×øå¨}fÄÄY>Ùm.\"·=úg™Ä·O~-kvO÷rúBŒfî-RXcß]ÛÃ!ã‰{k9ò°€¹ÄÊŸÇVŽ¼•ªïƒ¯dPŸÙÆp¸¶·³ýüö”¹ð§¦Îó° äoz¬rñ³ÙdCK©¶¦¢ÅÍ·…4 Še’ÿ:3 çÇj e ¯£8·'0Ÿ%=±‡àÞ8Í)´ÅòDþ:s³©Æís#.îBÊivaL¹-Ç™Ct’?9Ï©ªv™N5\g&×iã‘F›ïtȇKÛœ§Xβâ=çĆ?öG N)=ÿ¬àþØQ¿[‹ÇWÑjt”Ä(:|jË7åÙ¹)AXøî±À†!V¿/ uÎQW<}òD0'¡“µ0}‹Î°.313Ý8˜™-)–²’ÿ¯%+µ±h•h¾¸Å”à­ÀæÁ”he†g'åÂBÈÇ“v?ê¼mÛ}Þóz+„4zŽSò†QÚ¿õôä2 Š­ëxQä–…ðA/ÀøËOj½^@÷ÝÍÒ{ü©Këë(£4úáŽ9€sa$âûWFèZÃS¯¯ãÈçgTpdUuE=Z'¯s¸I*/ZÊŸr,iïBÄWƒÓ¨ÏàzÖF>¶ ò ê$ŠpP¿SdÕ9ôF8ï{»‚’3Ø’+6žÂ9ÝÖ´pähhéõÛÜÃö0Þê6™¼`ø1û‹½PÇÀTî£Ñ[r“(ØÂìõü \AÒç9| 0®°{>÷ãehÄe]ˆ_ÏéRZÆvƒR*¤7çøñ‹/Äjå ϲ‡hß;}/Fåæ¸3 NqØ`¸³j:ÑE ²¿W|j–_?_ßØ|qxtü¦Œ Ñ}àG™ÜÈR²CŠ©ît|ò˜ G¢†¯Ô¡7n–[ó¯Ûkµÿõjÿ~£ÈÖºU)3…Gåk95¹6:Úµ$"r†Ë@ZôN»ßH+3©„›¢9þÅöÑñ¯ªü¹òË¢:z%ÒÃè¬Èfÿ\@jðŒ[ôù’vù’9âÒ»—•ãÿYYl— V¶C“ÃŽSj²˜1J ÍË2‹[†äh&*I€ßÚ;:~ùÆ ØEÄòÂG_“Ì«`ùp°Àk)d€!rÇ°à1v®‹ºRÉ0»ö‹Ñ­¯ò/R&¢ø|k£œ9ë‡4í¦)ÆLœÉC8h“s¡ž×ñÉf|÷ωCXM¶ìëFÉÅKZ<|v½±gVJ$õWri’3ŽÚœ©YÄ…üCÍÇ@¬¿o‹zU´æë°TJÖRcX.8Ü!…òFªMÁx«¶½0–nX#@ÄËÉP¶ [ëŠ[Ôõ;ýöy½m3ëÅóÒ(í6fÄå9ßí÷\¨»‡1ÚVeÓ^wi«o[K-8žÏSdájE,~\H@µwƒ!^]Hðí:`éBV (ŸÓ+HlpaMˆq´b_?“©ÁMNvg‰/‚½DÍ¡ðÈŸ+‘tü­03b`Ä~mU€.xÈðàVr„›ˆÜZļë¸ý -«°¡!ªGÊK]_c¬¶’é_-é8“|ëù!†•Ç`–£v@")s¨ë ¡aKÎp´ 7Ž3 ºX5_!¼²ò–äV¿ÕŒ²JÞ`$mÞGE¾{Ý.œ-ã©]å)”9“}63nudE¶Ú?uAÌÚ÷,­¯ZK©o9 D<Ñ”‡O‹8,ˆÎÀÔgBr•=Hjü)5•d˜±ºÑˆ§Éˆ;è?Q`:±~¸³…Â(âGè.(êY!BßGÍ‚L²8̺àž%óœõ(_¶Þ/.,µ>–a{Ä¥(cŒÍò FàãhU’¥‘ë硻ϮhNS&ÂA“Š³G1êUÉWG”–â4äãF½KZ,Šb»Hr3¢‘©ä-æúÔ’%‰RY' üêécE·æËÞhľµÄšg\¸ÕZð_‘+üuŒ}}\A(ëBÚÐЋº-Þ¹ÉN¡ì1þv@9Uî…w%ŽY¶^!W“Òí^XØЙä~¬Ý£#˜mý5µ×%€µ~±Ïa TŒ…Úíœ:è¥\hb¯w~,ªb6O¤¨Þ<{ÿ@ïÞ?ÖØÓ´KúõgÁXOZŸpd·cŸÍòwU¨„VI<þ¸ªs7~_ßßÚG¿í>ßßÇkÏw6ï¡—óOü&¦»R߇)××Á»ðUÑ¢ëÕ9ŒMÕ‰ëÕùaUªJã=´[õ¦¹ä4AT,’U]÷ñ°Œç¡±‹ q¸Ð*®´ŠèDÐŒ'§ñx4‡¯—ß,,WpŽ¯†¹ñ~8¢]¨x ë;TÑ`Û;ÈYÉ{«±=+lòÿ×ؤ ¨ÚúÐxµ¶«‹_‹—{›[B}ƒ4N€£ÖïÞ´*ÕùJªÜû 7Oƒ©Æ±"’9zÍVq£U€Øÿk´æ[•:µ¿ã“Ùdo¡Ñúð¡5jà(S²‡Û]‹_/½ù¿Æï¯ÿñã50½L¤?«É¶Pv"²"Ê:†ÉüM¦‚0&<°ôì­†W˜ÒüÝ¢,Å´o¾¼Uâ²åõêëGâMk>µ?´*øÿ«Zõ”˜$–˜—%Iê$ÃKÅké´ÏxBƒæ•@,ÎÂI»?Žݲ¤—,ò¡Ø >ÛÉó2CDl‚=#±Àô6¥£&|!©–[-°nü³”~-jÈï·Q¡}.@ExhKgØŸÄø_A2fÅõ¢x_˜óC`1 Ä¥i&j@W ´ƒª$­´§Vr?¼ÿ˜U×GU¢*àÏWÞ[Õ4Ë^yÕUYe­üùÅÊêÇ‚êï#·QÛFi7Ëž²ô¶Í×Oª¸íìs{è8[ø'7Þ1B<Ê6õ‡åøì6ã'ó, íÖ1­‹¢õL”¨)Yy`?é àåßÄ—êwUæ™;‹1@îý“0øcô®(´:â'ùfÝX4`f ŒÅ3ÀâT)ÇÊ´b×›dý$! ”¶ :“QÐ×íÛEþHšHp|•8ôÎÐ÷9²'á'ŒÏ`5•¯–í_*›¶?K:å}”Q—ëôBLž4-Ê Th¯cb°‡hðàÔ_ø>E_A½>x² ½Aào›OÒõsælf̦>@„´‰ö¯Û{—Ň&¥½þÛ HEO´ùÚ¿®obƒ6ÖŽ×$S(Ù»Œ—"\ÇÃø5§d÷k­‚OH×ý³ã±7 @߶·­Ñþ~·ë9”ácÒj’ïâîÈF Ã`íÚëû{GÇ@VûvGá˜Òk·±õäûY†éF2nO'½l?j7Æ›úA<ÒµuÆ~ÞW†¢Èý¬ûŽ¦ð)d©†8Üq¸¶Û†&¾Â“;†Žõ»²÷ñë7¢YxO·ôÅȬÿpÎæâã‚=àä²xYFñ†Ãl¹5m”¡ÆEG¤Pø¸Zи͌’7"Ý ’·Á‘m€x,ãE8ÍIb€X¸u¸¹ Ú¿îþ¼v¸ÌyAžy¸&akL ÎWh–¤àõ3°jø©ÌP éqÿÇV«½ýãpPkÌF®UU<Xi˜š‰«šÄ*';ÛÏš%ü›õUÝqò/æ ü9°enu Z¢!‹Î5j‡QÅ&°iri,t{Î ‡$‡mÃOÇ fCjÁà˜-ÏaÛÑ¥ì#Ú¶ÕÀ–²¦ÇÚRö1[ ÍN‹°!]'ᄽ!“Ú–Ú¡7´I—Ï/ ,@²°chyÅu€À®'®añ,‚¤áÈBüAÒ·BÆ°—©Kô /^1e•°sÌáù¥‘u6R«£Ê¯ Ž`¥beÛd”©€¯†Ñ• n&Öæ•oŽÙή–~]-8j—S‡QWy­”?¥Î9 îõ›éíÍxF“*Q&õNªeÑÛ$`NѪexaŽQúbŸÍ„•õúí®!yZ6ÆŸå” Ä…Ñu§r'fNKÔå×ÿxƒÖóå4‡œÕ‘Nÿw;UX˜êQ]gú/s9šZiEŪ՟¬É¼¤’C!í1~YÚ2Ë×°¯~Ä1†_K›³eo–켫 5ìD”„Ððð€’¤¼ÞΆ¤ln¾€K—Ô‘’KùÅúºsÞ³ P€ŠI´tϬy%ÝLWW©’«<Ù0äœØM*JÉz/ÁCûI4öÛ$,c¯ß\}(—+Vƒ¿¹š§[{B/1ùñ©´Î—º·£jCÿ(ŠÇĆó(¨2^(¼Ó8êO€MǨ˜õ¢ñ ¾á–Ë[Ž[4û½È•Z}L5=+ãçÜcÙÇ·îu:âvÖ\=q•64scãv â„}=±¸´üøÉ7O¿ýî{ïˆq/ùnyÀ ÎØ:×2d“#¼±±Ò,ml|L펺éI›Ô¡›ÔÚTw¢OîÀ‰Ÿk ô2Å.<×ÇrŽÓèu(<²Ï{k»›µí#”iü…ZéÊ'V·»ª\ðÝN_]*›qj:ºêX£1®Šdê¸ÛpŠ(¢€™fzâã4¥¾ŸÆM”GÀ´Œ›Kâk–-ÄÀÛÅ匭§3Ú¼¬1Xõ5pèèÜL5" GV šï,e|×>…ÄcÊe«ËçiÍ»A…JÉvÙÔ|ÅQ|Nõ€‘œv‘„Ÿ 3ˉá¸ÃŠT#³tí“$%»µGÚ1pä ûBa‹É›Ámf±<=M•¹ ™?;—nbS¯žÄh‚”ÑštK°!O¿ªšR´=¬\œINß®­˜ÛŽäÉÅ»¸cqëÊtÈ’Ìböjâ(½~gÒGÌëtÚèÈOƒu!ŽÞCŠZ:ß#o8ôG,cã(¿¬6Q/°Û\==)²ÞÁè@0_¸T‹E‹tK ý]{ÅQ¾Ÿ>ˆêëV«ñƼw£Í~­¨ÈŸDÑ€Ÿïttý:œŒ‚Þ•N—¯NÑV­ê¼ÃÑJ¤m>$½"Ù÷6Ï‘RR)ªîUšbüe½ÚøòËUù;ëÑzýÀ‹k_~ ¬h&£€a—ªIq| Õûsø}ÎÙ–9Û˜3‡íçœÄøgZ5v)ÒmOF&Ú$3ÒIô¢ÔîXÙï@¤ª>*éygÞ˜u1 ê#%?D¼9‹"Ô±’ÍÒè@#Ê _­ZÓšÊsb E+H.ðnfíù6E¾ô‘ÞBÝÝI‡ùÍý£ÔÐñÉŽºÌ^±þ…ØF](ʷ´´ÊxŸ¬–E¦øôozWÊÊÅnÈö Áè‰YÅUŒ>K±¢ýtðòUã̶w÷76ìéEÙ(pl2ÛÓ':›\v™Ò&ép€cŠÞ ¯Gƒ9Ò,ËÁ-öM Î&#¿øß…É>ï<$œ&-Œ®{½{TzTå`¯ˆBì ü~g£Öï~µßï=^>èÈäaÁ£êc\N^È>^6¹9 l^§ONvšü[ÙûêŽÝ®œ^ÌØö§OT®D«iýLYDèn k±VåhµKéS/%0é7õnKs z$äà÷#á!¹uœ\„7.ŽU#vž§`ŸŽãÄZªîddë'²Ý¥r9ðC{$4ðÄÒ%Ì[¼f­\~÷´¬ÇÛÞÈ÷UHç*•Їatᆽ¢>ÀÑ$~üý¢Io¥òC<ôFO¶ú„Ø‹Æ–*ÊÁŽ4j\ôÑøîÙÖ1Oã‰T\¸À à¨öà»×Wl›®fÄj/n>žtÎ…GeØD¨aãS%ïÇZ,à#ÆŽ+èw-ËÁH0Ú.›HpÞ_@c¯²ªøÈÅ!Á0`^ó›&ý±ãåmøNÄ»—»Ü¢lŠãòå°e® _Ô&—мvð ô c‘óà6g ¨EñhÆö=’ „ò’¿|”Qéãå6Wu>â ùà—Úhg%bµV.ø§Oà¼æ69³òþpØ¡\ÅL ³€È„€TåòúÒmÌçD4[ÅmÊk•æ±ÈÚfFäÈ5ʳLL' sVéYÊ&‹ænÓ€äLUu–LŸ©ëWtºr içÄ~(ŽÖ÷ÉöõÈá>ñÍ‚ÒvµS¨—´jaêMúýZÏBƒ‘­IÄ°ÍåÑÚ/›I-˜”¢ +ÞäšZËW•‰ºå€ÛK¸ùÂÙë ç‰h;6åjc¦ÛÉhyƒivÈUÍpØ,—Öþ¡A)ÌßÖE­#Ô€é\™ZT7EY.ÊP©ÉUÚÙÈIúM²VG‚­\븩Rö/t-O6ŸY~å3¦„YŽ“|÷3߉ßÄ#w‹wØô g°âoŽ w~;Ó#ýNå‘7í¶Äâ‹fNvÇR€”¤áÿ¨òèo|ÖéˆåúwõÅáŸub±T_Dùeèö°Š|'Bdi‰TEê,ºg¹G"k»3ø$ïÞ6—·5ì‹}Y‘’mVIg¶½ÙÁÀÂ^*çYköÌ«Óø“˺®PÁ¬Ð g NŸy  / èïr}y ÍX¶¡²e\ðáHóKVõ?¹wœï´e§2‚Ð ùEéj1K‡ ]X¤B)@/TY*¤`u™"§²§O€½± ÝrÝŠ#åÔž-`CÅÒ´ˆM×~=WÅJ:H&èÖ$μˆùSœÎÆ÷âpv0þÌœCî®ímom·ï)ƶ/Ó=¤“£™,ñà 2ßAdrä2pô³q鶵”׋Â,Èssv'S F'õõ¯sW;e¹Œóí6û:v;zõÙ‘§Œ¸7¶×“ª¬iÈ.ý@¶®ók›ÅωVe®¶é(ÌŽO·õw;†åäùäÞo-pà&æüÁn¦/Ü ÄKb›­ šEŽ2w“„ŸÜÄL•p! Æ· ÷H¯0xÞöÄÀ ƒÖŒýž²ÌR¾‡]‚eîü©©ó<ìù»«Dül6ÙÐRªí…©hqsâ¯&AŸLò_LJfáüXM¡láuçö泤'öÜï9…¶8CžÈÿ@g®ã:Õ¸}nÄÅ]H9Í.Ì€)·å5sˆNòã'ç3UÕ.—©¦ñÇÌä1m<ÒÈcó—ùpiûŸÉ[öƒat/œ%úÌöíƒý{ ÿ&“î㇦üþ@çó鼧LÔûlÈ=5²”hua "Üœ¬3¢$èJüë8È4~yʨm×Q”ÛÏ^˜®ßטK;¬avò>БëøE³Ï‹xØ‹&³Á…kqã¶\b&Qq?}r‘+vùCž¶î0“;4˜#ÑÅæ -"aSì?“+Œèúþ>ØB‚ô™Ñùý{ROÜÏUHÜ—:?ûJ‡×ÐôýiÆÀφÀ倫 ÷Óê…ûwU(ÜÏT!ÜÿëÕŸ÷³Ôžå˜ìÏ¢æ|k‚ò9Ò«û÷Æ(î_£Ü¼ï(5?ЕÙxE9jŸ1q–Ov› ×£ÈmÆý)zÊû™~ò~–^òþƒ>ò¦qßÖCÞOéï§õŽ÷¾ñŸÉ8>}r¬ãÓ'Ÿ#óøôÉ}±0V¹ äÓ'M“ëØ_ÃDÒhåáãçÅHBSKéæ¦cÇ-ÙID,†’Óÿb–2‰ýc=•ª‘31–·#8Ÿ'}q†á~ÙËZã|²ÄÝ™‰ÉÄ‘ûìˆMbIåµ¼0 Â܉ÝÌ B©¯ ˉug08lg>Û©ÐÉàPŠõÔ´$Að¯ C$Äm¼a‘3ì/¬åAÔô}ínãÅM§ËùólÚ¼! úÔ1%ïbÔ–Ž­Ú.)áÎq{÷åÎñ6º‘~¹³©–ç£9ñüJ9”DWeA¿N,‰J'úG¿EÚ,=G§WÂÈ1ì’c5Ðߣ(Ä¢&Ö}¢!X:ŒÂš?Ž¯„4“#/·ƒ—¢cKòçÓE/=¢6€fª=ì*!ó*òª^çPµ£úH×ftÝ+x«ªps<ŠdœhékiãöË»ŽÊ C·¾.ðoÂÕS-J×!Z…Z÷ X‡ ƒoµ_û ‰A4Ȉx7…ÿHˆ™«H&jo0åAúä/ýˆ¸Ýá„A'óL3!w©±¥¢SQK²—PŠÛŠ~H½8ž xÇùŠãbÊÅ´`Ø~o’Q É@vl6ÌéäqÃú¦Ì+¡mûا‹ 4 zVd ÐMq¬È™'…I¾WCÁ »XÞvÄ¿ BñaàâGgži:6ã"ùþ6£]4mÎ_À¤Q…WÌîúÙ™‚æ‰HU9ñ MÍ1ÍÉÉa6î@¦ýK v`›R”º›ëkä‘í~·Yö.´;¦!àsC:H“NÌK2›uÈ@*(¯PÊg¤&(H*2ë\°Ëµs¯ÏÕaîÐ¥üNä?ÍEá#=gö Þɱ_^?rVà´ìw^†ð§ã·1ÒðMÖ^v©) θã*3€ÌÒBܶ7{Àm¡¢ 3{eºm§Œa—Ò"Ÿ«2Ú+1¹‹×:¶K5Û£ZÇf{ƒbÊ3 UçÚ!ìbg ð¬ÂNE×äÍ€~¸¶·³ýÜ-á€ÌÊ`ùn‘0Øc»8ãØÚ’‚nWCtÎÌúB½‘߇ûÍo¹ÜÖŒ|µ^²˜ž‡ÃâMt'rY’D•]·Î<÷Y«‹=O˜àÎSÚhy&L0+˜/ImÞÜ.ly¬w~Û½+¡5=ʧ®n«tVŸKõ׋KËo*~À‡¶×ïGíI;h€èré¢_Ó¯@/ú1â49.+ŸŠ bu&h@sÇm”lÆC¯ƒ1jg­ ZÁ(ô(¾©_ŠH9 œCTMBäê!U,-Ö¿¡ UÀ\ÓŒ,t×ö£+:Ž½º¿V 4 õjÿˆ‚QH;€»üî)=î“$8SÜ‹à0]lDay,®àÈÚ‡ó*°ð?:žKßï®­ï½jolììÿ¶»¹wÜ>^;|±y\ƒâ‹Œ{v|_¨~÷´ZãAø®ú“äûëï—Þ°¿ñ›Ì¦<Ç"Eo'Cr¬‰°ãõB}ˆ7œQ/íLøø¤ý–ý(ë\à83UM²Cå’s,,ê‘]K.ï“YgÅŒq³L£—Í —øäˆÌ É[Dá ×d¦:”‚Çr2Rf5ÿ'­ëøÏW`zfßWØ“Ž1áVt^†¨Ë¢XéVûØ4‰ªÄ`v+ÙREìF$(ÌqÀÁ$<óe`I|½Þ¬áUܨø­Èr5Šôçá¤ÄþT¿Ί4»d\æàÍÊÊkø][yƒ3ÔƒëšÇ´Õ ð?,¾FÅ×fkU²o¸* 5÷=é¾Ûêq!t0M¢ã—¥eµÙ^V’.«+&‰Ým/5[EŠ Ê”帱Ò³ò‰h•JK­bÎåJ5 fS ¥UWò!µÒ j>B«C©F£,ßÒ°§ôLY©WÓrúZ½á¥!€sæßÙSÿ­C"»$#hàzEØ£Ñõ1‘³Ë9ghB2 c¼×ø(C©÷D8Q¸«áUݽ¾ƒ8Ü<8Ü_ooomîmÂréô}/äå‚VñÛØ«n=?{ZvU#]vºa“îŽÀÛ¥âM¤ó$Uám ä~¶Â3¥ ÝJC;QBò"Óh{ Ðú@?è¿?6jm3SQBï$z­‚zÑ-¯ä©|åf&u.Öu$ Ò¢èž:0ªåVQ.À×`|ÅXZ8ò}€ÈÔ³ÞÎÊÄšðž0ó Vˆo”®Ýß:¬Û-U„×öŽ¶áÀgíVñ5W­%ò‡9O;w;·;ªÝ+MfÀK„ÛNóFgÉ4ÜÝ´^?òˆ ÝVå@NV&±J –­hþxsÝ‚45RÇìR ¼h"/c™ÙÀiÿH<©_ 50ÀÈù¬´Ùõ;}Œî<ðÕ’qŽ¼Ñî؈%õûŸA53Ö(s;Vé„Ý µÈ1ïþ?{ßÞж‘õý7þSá®1±ä@H¶…¥]$åY¼@ÚìƉ‘mÚØ–kÙšËgÏef4ºú4m7yž-²4:šË™3gÎœó;â#2Ü.DZPÝö%D² ¹8©ïð=I—ºtïd[¬:U¡x2Ý¥¨‚ý.]ª&Åíº«ûå:”² ‚. Óroè_Ûk^x£œ IdµG7àT5j1îwQ)`WdÛ퇾cºb'ý©-ó‹4g×ïEDQSJK-™¥Š¨ˆ¿‰‡×Ÿ=«ŠÍM¼Z}XÅRð·öÙ=^jWÅRÅ­ˆl ¼þÛßèüªüV1ŠŸ¾<:’ÅW•­Šx߃¶BU±ŽªZ!N¯ÁªðRÎwýŠ."ðäg©ò߬bÃT±0§Ó4ƒðzií¡ÑÒÛK‹òåW‡ÇK0×ÎáÝ¥%¾òÍÒyµJ_ÿFÞÁÕ„ô‚“y–Ø6¸äsæK_üC¬>†ÅÐð@§‡X‚¯@‰°‹I¬á¢ZS]‡?ª¥øØ(ƒ†GOñÜM6ŠŸK‡å&4Õ¢ƒÝüýÆ+˲#˜¡çDþžâ¢ô)wH«E2”tg+\ŠZžÛK/L8ïçõ#Mµ'3¶#U"–;d‚¬1ˆ)桽ãO»[;»Ç'bþMo–c´eÞ;Þ{%;`ÿ}Öqš‡´y¢ÆñRÞõÛèãî(£ƒÔ´€éô«P¯1Ý*^ªED/аÀ¡^ÝÁò<¥ŒÏÁ[>n­@Â.«µí¬Ž„†ó}uó,jq¬kʺbž×@¡ô×åYIñ錪tJûáÁPh€õ7åC)æt»(Y8J´2ÑP5¬ëF9ñfƒ‚f,0S¿"G1cX´ˆÖÀhåO˜(8³u°ž‰5ÕhhiSWJT§{Þî=:eŸÈ׬D_Óíæea¿˜!Dé¡SâË×ä.¡~ØÙ¶}Ðü)»Õ%>;EàéO³Ý?Wr‘ý_䱩³\‰¢Ò_MžùYåG–:õ³Âoß–W¾ývC„ß6à_yµQþö[ëŒþ€Ð|”bTøðP,Štý9Ö”^o¤²8«à:väl±n0ðú(.ñ‘¼yå÷­Â£®ºý[Û1ëŠmó;vx “¾C»û ÿ½×Î̬òI—Ë<½Ñ'HøkŒ#—9¡3Ùrñ 1Ø,8ÚÚþ×Öó][rŠéD¦_T'ÛÀU£¡"¬ði?H>ì©ÓÜd}Ö¶ï0ø-‚°Ý“¯Ö•'.‚h@¿P§pAi”&CX^صBzZl{”y©ÈëÙ?ÍpNøO"¤³¦\anÞ‘™6j4E\.ЛAÊ\̽ÿª ï`wã•V‘ê –à/ió¶Œ5)§¯å"œ&h†¡±È~¿=u¨Ìô¬CÅoÉ:D#uøašu’ÏÿÂœ£ûç®8'" `L3ž+؃\žÁÇÍA.»àcbUn{t«È— Fùˆìo£Ã·© $E‰.¡¹? C`›%OȺOÁü’d üað…né°Dª× Ž(%çn8²ý>pô[¡@Á’MYrj±b¾t;ábRÊ1±"ùkT¢Ø_WÞ$»ìŽ¤NŠlŒÓx5kºÃö%plÝz-ÜM ¼öf)òa¯ÅUðnŽ—íeÛõ¯_?¶¿³\Ãñ/ÍLÄþ•äÇÙG'MY+ôþ'‹šô§hâa9Þû¯Àö=½˜e÷où£+¿3ºDIØ© Ãí­{#*áåÐ * —Í'kð«&É ¹ƒ ø½A¬þ®a߀€Á×»75†ø¹½z¶‹g°Sv$]tR¸ÂÁ~~ð2òNþEU‡OÿowûãÿwEk<"w>Q±{ÐEOÖ*¨j¤za%Ú—hÖãóñ–7¡³:b˜ä£gI¡Ù;<`ù ü„½¾88l>ß?|ÚÏ»A UÑp½ ‹mJq½Úg!bÚOHuë) Bßü:ö‡è—WqÜŠ^æp&JC –Äɹä]·=/N~Þ®-VûØ'¼‚Z±ГÄ-•HÒ^ôÇÍnGñ¹(ò­R)€Êmoo–··ùRFîo˘}¶4’3–Ž.ÄJa“ƒq5Ý}ÛÛ$ù€j»mŠÄSù/胱gôAõ<^ £Ü—ØÙ„ºÇàñøø†¡ÎÔ¯Í@š€Ûí&ê¤L”Õ‚\2în–“å¤Ý¶ÄÇ# : ¼!†=ñÆŠ´dìn®Â·a¢\5¢0™FFM_l=ßÛnn¿àvè_›HGNBŒï9#ñ’ÌH,Òì¹~›æe¤~Gší^õîJôŠÁès‚ô%±!ñ{“û²ÞÉ[L(¬IWx^Gì:Mûëu£Q_~#> ñã:^¿¡nËúä¦ñâ$Ô>µ\ ÇÐhÔæ4‹h)w³@ù£“YÜ´êãpˆn‰2ôÓ*i ?…¨^ÜP™[æØ”ÑЀmЈW…êÙS³»U¾oeHBô㼌7›æ—ŠçÇ‚½,,ò5È ½ ïzó $û¾“EÄë¤ÑXr–Uë Êj*Q‡‰ù(™5BDÎ(KäN œUÊÉz#Æ.ÙPÐÍcAÁ (È ÐDB¬üð·ÕRiyyYü°SëÚ,„{¥>CŽ e§Ù¸ÙÀ÷ÂQH´ª†ëqg܆7%¦iTŠ$,|¨u ½vpÑ÷ƒeiœ^zR BßéØ =Øû¡#%«÷ò­TUˆ zšŽÛèšB{Fl;?÷$Î)áZÁ~UE] •z’§q²½´+“:LÈ+´„ÉÂï*¢D%"LÕÀÝTÿÂvÈ}'8gŸp©» '³ª‰k˜Od°õW.[+†©†ÊƒwopÓÞ„#ø ƒç^€l‚1¬ã.4 ­ñ…-«öOXÜ`xQÒp"4(þ]8  öÖ·¤Ý-C€ÄgA\ÞšnM&M˜Ø¬VÅ[ÀfKkB§Ž=¹gä^s_÷›V¹ãÅ NFŸwážbþº,ÿ‰—åYWᯋî×E÷ë¢ûuÑýë-º†A:ê‚õ’‚üÌ°Ü` ä¶6â+“¹Šwd^öù@AñsØúƒQ©¤A1þÚA;‹â&AÛã8Q ÏPÒÌF8{M&­ÿ¢lÈxK~ “z]ÛläE™ÿÒ©$…mú ]MýÞ «ã79Ž††î«f°èǵM‚=F[dSCç 3´ULŸ8“Äñ¦A¹ùI4奇ÕO•ècïñˆ¶E&‹òtàµýs©ÙaÛ)±eìþ±ÉŽö)ómBzW{š$B#O„¤ 탺D‚lcû$MÁ|T6;'ŠÈŸ&ŽG¦€ ˜9 &˜Âw,˜¢PQ»ú£‘:#b<\.!l4½Š[JCbCp™Dzºõüç­ã¥ˆôë7Uh>8<ŠêÔÜÙ}¶õrÿTÕ '§ÂYë­Ë ŽŒÄ<¬O¯ã!ÓÂZJVÛ wðRd•Ïc,+#ŽÂOáâ…›˜á' C¦þ¶\ïlˆú[±ü Þ©ˆ8€"BMévMÙ K?° ;‚-ZéعT_§‘´ zY£Ão CÈxК°á¤h2lQ Cÿ¢¯à*a5ë#<¯DI¥NXZ©Â–ýHërÏ—Y‘‰ƒ!YZ­Â¢qЉå42`ð,Ý2‹ò',=ª*—9Ø}8LáêÇ»!CLòõ?Ž%UÑrÛïB¨Ò¥ŒŠ¡“ã)éóãnצ‚ÆŠ%:r—7`€*AiÐ×q\ÂË`Üí𮥠Œª{#+uuŠg‚ç Øúˆ ÷ÞwžV\`Ív1{!dž·,AØvGQEj’2šÀ¼ mÝáNþÔøð°¶Òø$ÖÿVNrXV®˜/‰×oÅ›eÕÏ Gžj›/ý-õR9£Ôzå p@'בà¤X`Q{­aÑô®FoYÆS+@\•ÏPÇ¡„ÎÃå‹$õíFùGµeMDÃ'S*æLˆžU#±PKòL™ixœµ¢d"xˆ: Ç\±£1EüsÛÚw¥`(ØÇÂÊ竸ä(õ‡—/äó¾4ž¡ÇØx ý@U\JžªaÅ×õØr~=42×ýx¿VK1Ô7 èUŒkìøç&zÅõ ^⇤aFÄ,`…bTã4ó^œÿ›ÐžnáØQøñ‰ï°f6âkñËFÿL\·‰ba‘‚U7‚¯[Wa’Êß6Eõª»™Öw~;㮌(™©¨2õŸìÏT²¼’ýX’®ÈX•J)ÄšÜQµ×){p _ Ÿ€¬>ÚÛv¦Uß•wDª=I‡ðÕÇ•F­„ìmAq /Bã9µ}ªª›°(evhÅ>‡ºU"/Wö­íùnêm†ŠF&çA»šˆ =6h¢—ŽÛÂÛ-$xx²&Xëd›b/MQ9á*÷ž|÷.ùÑg{¯^쮓S(zL¢ÓC%áÉwWJd'ØË’g`¦y1AOæTB±X±{D…½/‘ ú3 †7CC4 ù¶ƒŠ é€YKPìúï­µ‡gšöówa›ã…~>öhUØ=—|ñÞÖÛ]Ëè!䨵åÁˆ‚´ö‡þõcuñ/ú0?GÁ`|?‚ðü‘ü»&ÿ>68„ ÅÑæ^šÉB(÷tü€úl:ä µo.)®WV™4ýi{zÂËBgJEè«aääkØšpYyÝ®vF÷É€M¦M‰DÕ¢NCi¶m ^\"Ü^V·¤C—„•¦7`»†ÊqÕ1&õè2B£Ö š\qŸÚÜÍÎÄ„dh&wÉn¤ÈM7Âï\²íŽRüŠ;¶OŽÂUî^È;;ûûÍÝWG‡Ç§•ô$5vrµ@^ ¨·’ Eü#‘îaÀ4d![Ã5ÚAM@×(]v›ãNTgkÿK¶¬½ø©¹óoLœAÐ<d,1Å’”`—®ÿn<™mÂbŽÁyž°doX<ÙYŽÏ¿–ËÉ«–Z•Á©5±.OÖì0ñÑ–øéÈ~ùŠ?‰ƒ­âÈ„,ä ÎǵA¾”A¼5–G~›ÚTŠäô(^òtÿD`V—ôL>ÀAVêÒÎÉ™°\îò“5ä¶Eñà?&eƒ³2™Ñ”ö…Lè÷A°úׯapMÔ¥{|[È*ü•ÔŸt—TgR¨4#›éN“V8e‡Cé8î¸("y÷·3ôßßUg5ľ’I£*Yç÷YõŒ;ä´Å2Ì}ÙT2úȘ¸Zã Õ‹]?F®%R“¸ah¦¼ cø›òtU}ÓÉ×ÀMý{‚¢ÿûëàì _¼Õ5Çní­æ64º "e·¨äqáŸb5Îåvàw÷ªa é/Šƒ­ç0º}=âù ªÆÿW«”&(Ò±}ÄÔãV¬PÿU4Û?ŽŠ‰ŠÒ÷Øqx±òP_­L?µsÕ«HI"åFj[‘ª¥ßW*—Ö±¦T{>¢4™[ùy🜾Õ$T¦;Ù—ÓÓÌO¨CoZã~‡ÎÓ·œ µÒ8¹œÒHF˜$WØ¢½ãŒC´D5´ÿ×ÕÄxMR¯+6|µ™­ÀRÂûØwË­°³l_ôÇøo  U¨îÁŽLAµˆ›7R0»Ä×ß=i>YSùox³'Wèej£óóµ3<ê9ÿþñœõÑšdA•2d—^½r–­…IëÕBÑB5fUfÄl¶(ž¹­¡ËÈSÏš@öãR^ Å©¹­•Êû¸¨^ƒ æ—ÁÅùßÿ./¾¨.Ë î¹˜"p÷º(¤Ÿƒ&80B¤—–A8/“¨8ò`6îÑnO»€`'ð¼ÄTl¡v^éÀÎ7t:š“oÔ¶y4‡¶¡L!µù¸;¸t³ ȳÉE£"×]ìòÖ…ú{Ž€ü&öÙ{úB¼ÚFùÎyXW½òÐY©‰•gUÈ££mZ=ŸvÇÞsØOÏÕ—¿NêË_ù w•ÄâI‚úŒüÝ~f“x¶)ÿzFþÆË'ã~ClÃj6Ô¬¤ý+Ü_V¿âõŠý÷7Nƃïœ×íG2³ çíVÐ ã3îGÇmjçH@ÜÍÈ,æÒ}*Et!‡eè :r‹Ÿ¥ÚR½ç ØÿOîëauLTfÛì¾mñØùþ¾ëÂüfð:p -Ù8ÖÛÏÞ,+Ù—Ó-1"Åpšƒ"ÕJ5X’Ýæーögö’ö*.T·ûÞU„O&Ø3þe즖JûQáÑÇj-ŠíÓgõ•,±=2;ì‡póP*ï} qÎ,×{¹Ú˵>÷å}¼âGtU »™2¦x¥G£ˆáásA¸6aHcrmZ£Ẫl•Øø×Y_‘Á€=šžéîcÎÞÚŒZ‰ÙQ+óV›u!î÷ýë+`qê¥vðÈYåûpýø=íDa‹÷ò`ïÕ—í<¨g»hÒN¬C¾©^bTÄÃ܆AT³Ùevu®ºs};2lEŒç¤,úƒ,.ꃎPíiÄéqôD?Éeó€%ÛADW¦¨T¶Mœ?k)l´ŸAÛÍõ⥂³°…“àŠßžÎí¡0ïÌÕ;-³ÏîÎ ¦ñ~’å¨ñ™ƒ›÷V©´¨ì C{î;w\BÆåã0.òÅÖ€À ð ’ð›µy=Ê›©ODR‹ßŠ\Î’kA:²4½ˆôR0ïb@SèOÁƒZòG†yw†÷“+G,¬Öàæ²Éïw¸ª˜µšjaI¾0ýÚ{Óèñõa¯¼z# ~‡aªmDn  %§rÖÕ,*ÓÉJ(}w"ˆIɘ`£,.úNš¯zJ l'ö“ ãÛìþrBV$[W¥WÍ~ÿº›+ÞÍ}݈™¬S¸K¼§ Y+ã»_dw6ï,ÑaÅ»°tç&îdíÆ’EôŽ,ùåtÉYvf(3WÖöe/èˆñƒ+áPÚô>û÷ù‰h0t¼‰ZÔgc0¼¡:ú>á–…u4óÛ#¯Çh&”ݤ?ò ꢤQä:±‘“° 1bËx—!ÍÍûªºx/^DŠoÇÉü÷¹…žžJ[åXIøº~]¿¿®ß_×ï¯ë÷×õûëúý§\¿/Ýa‡L9h†1.œÞü_oÑQsÊQöt:kvƒ¶iXT^ ŸŽgÈ“1ÁÄEï¨Di ¯o4þð¼êÅÿ aùØP2ÌM0¢¼S"„0ºŽy<ÉÀÝ~´»FºsSÀ>Œ¼7 ‡5zµ˜ÔßãäMÒ˜÷Û³scD!Å€ñG‰¬e’¹Œ2óÀpÿ²u|°wð|] pg%R”L…ÔÁ -ê:°ÿ[!@ZD ì‡îy:ãï®H¯n|’¢ŠÑ7q}`ש?Ïä ÇܪµŠtà iÇÒ"½TÞß©Fªr2<º0åáüd㙆}Z.(ŠxðC!’ÍqŸ]U;ï#6G“£îš2ꎹT¥@k÷:á¦ñÊB9};‚ÖÁœ=¤ ´GL!«Í¹ü¤9S¥Ë/ɯwnúnO5Èì•ú™¬µR>xÚoÁÇBì©þ{¯ïã!=®ò”ÅH¾ÑøO¯ýJ%¬;Ë¢^ÇKôÆC#g½_A#(Ç?V‘òõý&‚^ô¢tÉú>/™7›n+ ºã‘—x ‡ñf&êü¦±‡=¿?›û zá%¼¤&…ŠîBAІòGÍ!>—R Ïk€š¿Þ äMðô…q7qù31à˜WIñzœÀÀ_å?ä—C]`t ŠE§‰7ÞW—|K¿k>Zä ÑŽªJ¨v ,Cù` uà¶=[vL BÊA5ËÌéË&¹ŽÂDæ¢D‰ú,ö1®ô±Ñ59üà¿„ŒÄe}@U‰>-ß+™®ßðÞÕÐ x®ˆ¥ 'k¬–YÐ}OôÆ!£iÓÁBE»+ åÉõAàqD'ï{Ž»" bÔýØjt–;Îr…?¦œƒ¢v†PJ~±Õ¦t‘‹ˆ~…1¼nH'X²Ch3(7|ðV‡@€=±Y¡4~[ûÍÃgÏNvçöéþnó£ºÛ|özoçMêSŠÒd¾Åx¸ ·øjüÄ6AøÖ€1 §Ãêߢᕹ䶪TaÇ}ò#ÃYQS0"þPg%C´ vÖÁ¡?/©œ”òKðmhS×oû°ý4 Og¹þ»<ãÓËTpð‚ŠX—Ô¸Öþ¨ÂÐíðÞ 0`Š>"¸+>ãŠs£ÉÃíhæô9‚(Z„1æâ‰<¸°Á¥»ëÿFŠw>¡¨ñæQ ]IñùXÊŒ‘ŽâÃuȸ 7#Ä5†ö!æoƒM-Ú—.Åf¶<H&m—c½»üCŒ*¿§p~¡\—Àæì@Ä Ñ¤=Bßã0¸a8îI³Äïü¨¨|ÿ…è·ÁùHüì“[ T"žb×¾É@W“Y;e.9é,%É©BB·èÆÂ×ÿ‹“ò2xu]-pøŒêà E’ï¾K›²Cª¥ä—ÔV¾a¾ö‹ñmþhè_,§_U‹Î’³ oJÁ‡Õ;ì8°Ì¡ªkª2óFµ ÐàäÓÑÖ}3Àª0žÔÓ±¦èí¶¬<<ÆÔ;çn›“úaNc™n&—¬yS—á6$;F¦grëز€`Äj e;1‘#Ëxà™?äÐÕt¿ën(Ü2³å0Å ®pVÖPâsi_PK)´hÛ‡j* u¨,o«ÎÊ÷Îãeø,,O8`±Co¹›F ò.PICº%s>˜}<&ÏBM¸¿#ì÷MÈA„B,7Dc ªØOAEùÝ°Qm¨ÚwQA¡×«NTXJ©2UN’7Ü”ø\2m2®KFÃä¿—vÍO³Nx2æ½ó˜‹*q(öwj4K··AÐtṡKx½0 Í?|BEQ&ŽÄ K)™3{ijTÃdX+ƒò vu@ &ClX´ Ê{ \€ŽÆ£‘œ€=I‰ a¨Ö‡ ãÍzŽL%ÔñØ¢æ!ö Ô†e¢¹)Øßi¿]‰Èà/çûGÎCgµ!&ÿôwç‘p'Idˆ¬LK嬿C4|ç¬fSµg_\¼¥› ÓT}ac¡Lð'%#çïÍ a ’Øp°ÃòV?:Ú®E+Û`-‡JÝHD¸,p¨o2Ñ¡"ukaªOÑWk6éxÀÙ…ð/v5ö‘—ûM¤"óŽô•<”öIù•k`JÜÔ^ÝiH+iMç©ú G›±‘JíÎ=•ç~ñT=³Ë‰’/å„þþÀ·1«'ò‘Ýd¤a!²a5o€p•N[ ‰¼´zµ’ùÓöP™ Y7QÁã¢Ì®ö*Q¸»ê_Ë5Úé¸#÷³<;RÆ1;6Õk‡ç¼3¾¿¿÷ôxëøßͽ±¯ÏüþÏ»Ç'{‡¢Üsÿ ç¡p¼ûó“zï}”aÓQÙ:ð¿¦òÿõ[zL?—·V o|^jwÄ(Á_DOØV«ñ-P/ìý˜N‘zCY½ ÷ÑÉÀÁF,p®Ê°n!ÉmÓ:,y^÷…yšmGæÆ]ÌQ×lT*õ·¯ŸnïyóZ¼©£þ6–Èk¢Q­7VÄÎÖéV}#¬¿¥GÍf¿×lêp‡®¢‚õ·{H©¯·öNÑtg°Ìs[¦È×Í72­‘ƃæëgl¤›—h~½eÿǵ•î4;ÝîÇÔØdÂl»Áb±bàcçoBn·’⤌Kór4s!û&P·{áÙˆy!4ìªmÃËXE”ñú.OóÚ8“o³µ†bDo ·‹æû¶Ó:ÀÖt›³µù D„ø¾nDÀ'˜å“ód26ã êæ ™ë;tªtØÙ}†ûü3æÂ>õ—dF`²× ÈMÌ)Æ“úÛÆÒ¦[]FÄßÊ4>Ê5ºQ&bò%øj}`¾ø+»„Ä™ïÌÉÈÑ$KåŒvY„ùcF?(WYÇ´Þ‘I}’ßþaº—ÏýÏú:ƹï~YÖœuŠƒªß»æš:X‹„r„سªë3ËT  M¹Ä„—CïzÄw:ì™îÖ#åìåÜÐoËré ŸÄÞÁÞéÞÁÉéÖÁö®8Ý=~¡~dèÊJFÞù\ZôwvO¶÷ŽNQEÅp?.C¾pÓR€eD¼x¹ºw´¿+N~Ú:ÞÝ™š€žd“Š{½k<ÓÓ"ƺÕD´Ù½¾?:õ†=«Þ™âËÈqÿA¼[û?íáˆ.òçÊd–œTo˜CŠC‹ WJ;®¯ ‘,ÎÙì¹{,ä n*Œ¢¢—®•_Ó«G”z;NËø…kÏJÇÚ(- ˆ^(,×°hiÃ%¬\o6VêÐoŸÙÊ“\€{Í·ÿì,k:<‹y"T b :$¡O¨Õ9î4ß™Iÿ.Ìüé6{wæH?/°Î×fÚµìF8p?¹íw딘#JKQ“NzìòÍ®àx¶®²CÀžÕU™)`3—‘˜"ó\Co£É¬/hý´þ/=¼^yÈÿDëF“g-U:\Ui.:Òø†¬f]¿=RèƤ•†˜ ˜Ì¤=¯ #bP:÷8ñQGœÝ 4|áoeoƒ­¶õÀ“]êƒß~T‡ðNЋvš«ŸˆùOaÓç_ô±JQ[ZÞè ¾^?VMÂ>¼~òìÙ6ÿ‘² ‰Q‚!^ï±6ã#¹]âvÃ@ö ±[ÃwèñON/Îd g ¢Ò§Óu€—L¥-RÔjgÀU }8Þ:Ø9|a—ËŸÄ·bíá÷OD]¬ŠÆ²X}²º²¶&ˆ•Gk«+ÿûêwÏ’šRæZƒNVøñíÇæG+­Ñæè¤Láó¶uè¡·‹ÚõØ´½)üøýt‘#ˆú r[Äç“Ñ•¸ÁøýŽïrF­TDÏÆgðÍv”S"Т ™x‰°jáKt&£©ƒðÛØXXLåCQFI@vGÞ^úã‰`Už 't÷ìõîL;Ñ€z~ÓØ:UY•„ÛˆwÝNGfùÕœSá'ÌPü0ÞNõK-Ãà.Ѥ« ð/½mànç²m)vÈxÆçûïÑ+Á4ã4¬Œ['à&㎹aÑó9Óº•FŒÄ­š,DúÞ†8÷Ûì ŠÇ"éò ëŒù>}ºÀ|—Ý­ì0%ÂöBfïÁ«,À¿Amÿou¤°_ôƒž+sQ/ n²9 Ú½þQ]X”y"†ÃÓ6|˜&nûJSDÏM¢¡Ÿ$›D‘Ÿ†8¤X3ª½n¢ôÓˆg“Ï ›¤ÅÈúÌ6)øý"Q´cS^Íy¦Y!é‹œ„¯ÿìðXmÌöþýŽ Þ•ýl‡í¡?ÑÓüÊ¥] л0GÑ•YJŠ¶ÑöP{¶IY"ØÈU’¥N!—³‰ý¢ÛÆN¾±S¥»³ ,!Ù‡Ÿwû1š½iKIpwB(¦!í9Ôý}âØûé³±Úp¾Ëô™Ñ}üµ{̪ólò¥O¼ác'…¥r0$ N†'Ü•“–üj’Þ†DcZÃ_<1^xäL8 Äxp1t;TC"£| ã.“ߣ°¢~FQ[}vH‡^“Ü ‰HäjHj ÂSˆy š‰cQ @Žˆ`ô@öÌä(ýSÞ…Ðwè,õu&MP­³FdgŠ0sI¤²FdÇ„è¬B“üºá÷cø]yŠÞk‰‰9úÀ­ÀÈ@ÿ‰óýŠóÐy¤ÂåØ?w²KðÉöáž©QÕÿpóuvORÄ¡×ýF-ºÀ·aM&a½ô/.)–‘½|ñè…>ÁNgLOtT´2¹Ëqt *·=Ëu3K™ÈÎ)F”PãG0áè û†šq#½ùÄ ñtŒÙ4èSz¿Ž}hnTIuô„¡Y7£KŠ¹òa÷jžø `r:R‰¼+ù5WHÌÂ=û™ä+½wñ™y$Ý‚s)EPªŽ3¤7ÊÐë0}Ýp$ã¡g¼ëQLÓÓ'ÅÅŸÇ1u/yßN:‰Meùºhþî‹f<'‰¤£Þ[^€Åó{Ò úÔ1^é”ò穯=ÞŠášœóÒÁK^E§˜'Ø4Ž/ªFE9¸nåslø•er 2ú, ñ­Wkw=5ü§WV…ýý·õbýäx73!ó‹‘ b×­s8¶ì95¸2S³Ä±B½:ï)­S Q,r §ØËXqQÿÜg°{ߙ쒗´e`äy„¡ö›ÈE¸×Æ h„䚨¯áú׆ÉSU?4ä ƒïQ¤2»g´ƒnh¬Â™{i¶H‡ùׯ×L–X¼Yf¸Å°aþòš‘_”±}`’·ƒ®:ô©tò è‹+ÍÑ•¹tßSY'@L ^üi00têE1ÀÒGÒ£•X ù«)ÆO™å@òõƒ¦× o4üM$qÈë™ÃÞ9Ö']¿WcLUKŒA£,Æ”µ@߶·)"ã4z.†%`Í „¢O‰ŠYCÙû=¢ñ‹ØŠ~WѧÐ3·nÙO£ü²¡M®×WžûN棌Pºþ;O>²Q,Yµ)UG$Á•=Ó²Sd± ë‹«x‰bëQÁOUÄ;ï†À&0ý4¨Ê.õºxFþáÐx2@Þá#Ub¯§KºIda\å‚RçЬ1*ýÌÈHÔôAã=ÂÝdÙGÔ}‹kôÁ ãèF®ÏÐÖí/7ŒÂ~:¸È¥p¯Þ‘·ùÂQ\Zj”Ū؄IrjUñX&º±“¼ñ4yã«JÈ‹KḎ†øàQm¥¶R¥ OŸògÌ7àì¾€G±´°ˆ,ñ‰˜<þìþŸla³-”z—Ù!gñS#ìŸxèHXŠq Oß{âQc…¼öÏ„}´=¸èþ^ý¿ñsòÆÒ=½’ÙÓ35z|¥`4V¦ T©ó%Ácl>W`) íhÓÐ/%~q“ {n_ÅéŽnºú±ƒBÑn G†‹gW]ÕW)pfkY-+¤‰³ß¤ÜÊÊœ–Ʀ„ʳÌÝ+O¨ó?E_íPh µ„e <è(“D­ asÚuëùrb²Ä©ew­­_Ç—,x^ë9û·w ÿÎÏUù­š€¾Zï5‘l¨~ý!à¿YöÍ×o°õ¯ÿèëÆo©H¾…,\WUÉ¥ðrèÕä·²HÏÚ0úµlÂǦjXî×é[áûáZmYÁm¿UЉIUU¡5çõê£7õ•³Œ×¯³‚´À½Óe¥›Nìå<ÁSvi¡X"í隧Šë²,O÷ò!º‡¤ Tc‡_Ùb@c¯´€ÝßE'8xÊo´Q7Ê-Sr”sæùyVWD´\oErf³ë~EpZFšˆ=hØÏkñ´åSÎÐ\VMažŒ†nÇGõØíÖG›õnü®Š#™Š‡(Å«Ò"l–“À[¦ÊΛ*—@4T7dì3Qt¡c&Ì„ûè¸wrJ8?\YUÒ/† á áÇP0ôˆXsVÙ8(¼g%LVÚC£CcœÅwÓ´Ÿ¥-!ÂÖ£¹e„=`o(.Cb‘ÆH׳qÙtW93e²}.Љ+zÍ$‹@-¥T’ÉÇj'Ó2è¾'l’-ÆH° ´ØŽääÐÃz{]W|¼nÚs£²A7^¬ÈŠÀ.À4®B±¥Ÿ Ùø¸U'†-õv‘ñŠ‘$·`ýÝ~ð &~f¿ñØy¬ ÷éroËF#×SoäÂŽZžˆ" Ø¿ãsLZŽž¼‚¦Y¬ ¶22#e»XOŽk…FQÍÄ™Y$ALq…yV“*À¶WÃå'5‰Ré0¸/©ÖÇ¢¡¢,™sA€„ê-¤¨ç<8“Ó®9MS!¡¶1^j©É9GøXT[Ï]x}á‚Ma¼—§´˜«a’»¼¹4ëEuÀŽ3Dš#ìM¶áéy¸´óeãúé¥Õ#[,V 9EZ³"E›´GÂä…å¨3n{Q$ŸÂÊ»©0áÈrQìxГ=µ½Ô؈JJóp”ŠÀ룸d4ؾA„€ m×IyÙ"b"ö§L)„½(¿ñ}ŠŽzŒ'›åTa…od'2ž6çKL¤²yBãCçîÿhnm£ÛÄ©AõeBnŽŠÃB¶\/•@9(aƒXª–>à¤A}hèÆþx¸QúTbŠ˜5(÷›í&n'hp-‰PoéZ3«Ù²Ðëlªa«›‚ø„‹z Sžˆ8±ëoÊ+ðýHš‹X.×+uõx€Ÿ$åO§ÉüøæYgŒÁ¸?e$våJP¶Ã>9[–Óm°Î£–£vÅ“5»³š7EÒð%!%iARGŽ#ªÎ`õ4 Zñ –Ž;iˆGøÿaõ>’R±31Þá$;œ(ëã)wo×Øú8Öá×:þGâ°²8/žaÍR$ô'zP´äKëR«Z¯ðâ&o[¥B—yÒ«g9Œ¼êVʱx%uœ}¦{­ m†T³,nù¶ðd;§8Y{×7  ϸ¦™`½‘4òŠŠ©ÔÅÔ™ÉÚËÄ.?ª¯c#ÌžÝY2ßþé(¬,ÓûÛ «CaÖÚªÌ42 ý«’åkÙÇêýÂ~µ´>u«Ek!s¹ZøºP}]¨¾.T¾…jáÖK[J¦QÚEZk¯ñëw ¯ Ò)u]ðæj[&ÔÚóD¼.' MÔYÝÉ°†ÖB¶®cfŒ]nàr°½¥~†øÈØ1q~4b´Í]”n†7„ÌÜ2“5 äY4¬Ó N*&ÕѨ‘±y6­ÌMÎ<ÕVö¥le†ÓØ%—L„2f8šÏåÿÚÙ;.(QQÌ„çFîù9µ¥+›?èj›MÈV³°¦˜Nï©)-chÈD},º“˜ÓóÁÔgI-(±b[†;€~KUk€„®‰7Fõ[®B£±òí…uVIžN1˜ub`ÀS™€#ô{>æE3tpE6ÔŠ% £Ë€çÎõ«…¹ž¾kUo$¦¦a 3užhxŠ5S}$$*åœîfy”r¡ËT‰’>tÙÁ^eé힃”®·Á݆¥cò Ý®_‘&w,¿ hö¼^ }ê`‚:ÁïÔÝ'§Ç{GÈæóÖóóRrK±ø Þ[*|³ Ý­çÍå°)÷ù¯älaAEQÛ•Ô£G«î`62$«1–S¶Ûï &ðªš5sÿÜK­%”8 ½@;ÝÁÐCÔ¶!ŽÌìZspý‹ŸÅT‚#V$cµ™êc“š„÷+àüWÀù¯€óÅ€óaǽö8r‘Î=íЈóc¥ß.cZqÎ4öÉé·\ôuu]“™€¾ž‰¹ uùÐþ€Cã0šá<MQ™š?ÿðf!éñÏ ûQâflD¶<œÄÔ2²(%§æ$R 7Ñ/Ð á ìf7qš÷2Âgš/‡~;…λ “ë©cnÔß±£B¡îaèbÞ³ö;'3th \R^*AJ§–0^5{ïÅLÃu«ŒA—ͽ*³ÛÅž±>ë:nVþrßòm%Šp',ÛÚÈSÉêGãþV>Ú`Œb<\$ü®ßÖm2%ØÜ#ëÜ—ÿH#+Šü3ÁÂ%\80Xnk¦`2럭— K¦§Á‘ìÂ$7Âdl¡}¯ÊìíETEØ´¤©N=€êÓ²‘³"7#nMT7+£á÷NS‚È.¤Ó«¼D¨é8ŠM…”|xü1}‹’¬.|‰5Êë ý×oÆ<àß)S<@ïG(9®»}­ØÕÐ6¥¿l]û²t`÷²¼Üíðq–"§;.ÒI®A‘»iýóðåéÑËÓÆ™eÔ4ØK<=<Üof•æ%,F׌¼§Q`cïã²³ûj·j‚ÈÅâG¯ŽF:éâÉÊ–Ó÷2^ŒÕµ³Qj¹Îûú[{ÏvO€Ó¡Œ¶s¶Ôßé>pϬ Á'#lU–‰$k¬) ›ï¢oÛxØöÖ³Š“Ó´wíÄJ¼QϯdL°Ué)ÅëP¨{ÈTÍÃ;ÐAþ"JE<æ:y€š´JioÅ“° »Û.×U0/TPÅÏäu¶¬Ö=˜)ªóó•+Ñu §íÊ =ž¡ ÿ¼Q·Ê:AX ÌY²b]Š!üƒ½„•ãï KAÑž£ãåŽaxé sœK§Y–ç)rÖG îyÛ3]zùt^Öö{LÉJþ–M<ë0B®ýþÀ"ÉÕfÔCÂüÓÊVn*%i.ÉñôÎå&ô e3ñ´T´Cb¤Ô‰TÑh»}ÉS±ÜžÙ%ЙÚÈ)Êô;æHJ ì½7l¡×T íf¬?K)ó{ ¨„°8]Ù'ú ge~®$MC+ŽTÎ¥P?5Ê„ÌQo(U´QFì3:?º]!m_› 8ð-Ð;†}Nàó¤zÚ-xÒõ¦ªoÆ3-xhm¬0":jî´êÞHèî ¥ +ØþÇíw¸5+Ì‹TÏP"ܻ뜻à–E2%u¹OiQ1¾.Iy.ìË$¦â´ (s%!š€ŒËéÐóžžì j0Ça¨Üã³­2rPûÁƒáè¡(#úöƒ”¤–e_Ä"§gcŒR«0Ž˜VÀ§ånp]¿ Š¡úŒ¤§<)@N»]p”*b¸àiâ(Š@ jK®ÊÑÊÂè*<u®èXC—1TÙ¼uÍo…h}Ñ°ÍŽd#”¯C]5iša<Îƹ¡oÅË>®Aã¾;ò°ÇA½MI ô‘æåäÏÁy8Z2¨?ÑUwÛS3´5mìÏï\PØãÕÆí²ú ‚#Ž²³BË@E®3t/0¡ÉÍ4)Ë"(øü‰ ¥/Ã+—ƒñõ÷)쬈®‰ç(RÄå%û¸ê>hÑ1Z”¸)·ÉXô™*k]g¿oÉà\¿E›ÐÞû¢ïTŠpF ÚŠüßزÛ4Ëœ÷Ð(}LXìL%Ç'‡ÅRATëL˜>®óx¡€Tp3&"ñ'JàC«DwÅôBIn÷Ø»j¢È˜2Õ’9)VfÍ ‘ £–éw5DtõeŽ+nÌ$<2ÙWòh¤„ä°ë ‚ÛÌc‚{euÉLL·PÄo Y¬¶P¼0qèæ`Ò…Ùøs¡€5ÓY1‘ùVæb¾ôiÿÂå`à.cV hp“9“,9çÉ(JN>2á3Ås€üر+ºqö:Üòû·ƒ9@ÜóŒKëÞ‡¤ucÀŽŽ‡)­'ÅÊŠó0J ¤ÔO¡š»ñFLb駣ïW×?²®ˆ-_]qVªÐîš0?ÅǯœGWþþØÆÿ>qžQIê€ÚÿãFÂfÏ[/€¿éÙléùþi#Ë)üöœNÑ¢š!@úë?.™®üÅåÇaÿ ñ©d ÄÑåš­ù²iI%/¾© 2BF)6£E[yÙ;@5Ä¿Òl„Ò§‰Â ?3Üà 3Å{ïvÞ#Sñê¦z5:—3\Î͉˜E%,À°Ï`Æ^Ûà÷\0Æx;€-áo &oQœ€BïÞš‚Ä$O‹+vK1ÙjÔ +?"Y[Ê ;Qvø¦M2ï87Øé:"RÅphïûduæÁn9dj«j+ÀQ +od‚ÇŠNÅìnXÅJæ12Ùõ·bù–}ÓìþÕRttÔñÏÏc4Í×VÓPþæaV£8j3O½'½Åïð¥Û›ªÏ²É¨e“•)z`êÙÌp(뢜]—øtÖò¬b4ƒKÙõTy£ÿ¦—¼·]}t×ߧúÇAÉeî˨ƒ… ëÇhñËB;)Ú!Ç”‰L•sìÌÂ;^àf×51ôÌæ;Sºþ'Eýù£é ¢ùè>0|¨eŒû)šLEåJ²Ÿíûg6¨Æôùì¾Êè¨ûé¥?Š à²16˜} upøûx¹ ›X7ä ¥Àr; ìƒgv$’0¿øü˜Ñ FõÿŸAÌ9àIF½ûǶ¶áy‰gqgëì?Qò€sa}ŠoÃF£o¥‚¬FÙgs§`춌pŠÞ¥-û’À½,£h*°»°ÓaÐý>´U :ó§8;54S‚TÃî¶ó öFÕ¶B‰²žÀ¸mòûh__GC¬ŽY›·çݛ™ ¦A|Ì-Tó¥cÈIìµ6úgÿ†§¶ÚS$9'.NäÊÔ®¥@žN”(/þžÛ‰,s:ðÁÆ™©pŧ9Š¨˜«³òZo¬lÔc“á3SE¶è®‹å ñi#þ<{Lhø‹ø˜»+Ì™òìã "?GÙÝ–-e» Åcç¡Å®r4+& 2êåD8Íaé˳}ñÁ¢°©Q7ÏÑìÄ0ż8b)Ó t«ÞŸÖ÷Gèÿ¢ÆÎÜÿ…¥ÀÅd.ƒzŽõ83å²Åáf?~Cxæ gÙ€|àã˜SréSŽ©C=Ö7[ˆ£…kÑÐ †è×*ÝØ»#Ô.á¦ûg$’Á GŒêíøaš„`—H–8S¡4h°{wU6-ô¡´ªôqòï8ÑÉsB©O¸ybÕy"–zîM˃ËÇÎÊÕô³¹ÆLx•B“ÿ` ]{”Âx•%¤'’,eXosÉÛ9dy‰Œ“ËËV?ÅÉ\"‘}„þë‘î4R;|¿ d/‘³`ÈTv;N#%ß«‰–×veÞÌÑå(AMÄ4œ2èСŒˆ„÷Àþ=Œ á÷}†su`îù@®Íººùd£:D¶øñlj£Bßëy}öS_\ðuL“ÞA¶B†AУý­û{Oe `‰ÿŽÃèéóa†/(ÛÉoÎ mzÆ`r ÐV–‘J%ÇÁÒ@³Yè *ƒtº÷®îbñ…ütNÁóB÷&¤àF龡©’s8Ìò˜×^¶\Žûš·*û;Íã—MôÁ¬ÌÆΣ{Ï©Fþ)[”x=£ÂË/ŽÒç«>_í{í‚ý9G³à(Ö c ŒwÌt>w˜È9¢ã†Ž¯Ç<>xý—{¯ô—}ÿúXŠÿŽqòoœ×+ß,3&ÖõÞ¦‚íà‘³úô|(´ºö¦hóGëe m¥hï©GoÒèæ3éíüsqµ©ÝÙž1IZ2^ºyþÏNðûz~/ z~ŸmÉdÖÇ&»ÉëÇïŸè£ÁÈ[GØÿí­ƒƒÃSrL–ö4Ô^y¢ç_\ŽàF"3Ò`t¶?MIç9@((_`ÈRr(æ·0"Fµ—°— ™šË*ËОèƒÙk úíKÂ) y1c¼á~ óÓ—¢´²ï¥Ò­’òuo8-î•Wzâ*g6ÀÉÆ"OÐEêöÅ¥úWŒÕ[Ââ* Û†ä `m ­Ä”,ÆF€~\ŽÙ Ñöôê#Gžf¹Iö«kÆÐh#—E„=ê_Ú”6ghJÀ‘#¯‡Éiº séR(l›–Nïƒ7à]We|ìva·Û¹42„ø(Z†a™% C²”¾©I`¾yYtþØ£øÈ&x†2 Mq4™H^œQ Íg„FÕ(.v!¥-GsB 6?ÀÿQ¨6iX îÓ†•Ó« ß—_hXÀÕŸ4G!ßòiÏ?ð ÜBÒ8Ü,ÿh4pÂø5Ê?ÂT*ë—-ùškÑm(ƒQJ‰s#ûv Ó·óC¼â!ù×–ÍŒÐ"|¬4>6 ÐÞx|ï¥lW'OàQ:+Ó¦ýž?-cò–>;¥OÆÎJ7Yát£`ø1)¶2ënnz1™1h.Þ0eÚjã‡ÆßVDC¹=7,š>ð§ad´ãR™¬4/±ß•ó°·¢äIùs]Géi ŠÊx\™,&sD‹Æ;2µg£é<.Enø–½¼f¾å%aY°Ç)x=C“ÜbÍìúožÅLª|t ·=ò†~8òÛaÁVüblÑ*ìµrN×$ºq•²ƒ^ÁŽp;Øú[·^¯Õ÷ë5LE%+1˜ÛÌÏé¤+2Ù I?ô­±9hz¿nV›¥×[ö\û·7ëêÇÆÊÇ‹ÄçSoÔ?Öu!ùy*†l×䛨dóñ>ùéØüÐÑŒ‡³Ð š²añãZ³u‹R%*qV2Pê“Ÿå¶/76¤"·(L8_ ÌdŒÊ…µa±.©dX¥õé¨P…|«M¼$BÙ.¯ü0BX&tf‰AhD_¿&–|ÇfY·ªÂFÒ2‡Ì¢üš´ aø¸;”ð›ý`ØŽ„hW«,šU8é䥶ï@µÞ¹ï`Hún0D#·àkð :IR>AzÝsû•›°E•€4cü$ìJÆÃs%¬oÔEý¢rVÒâEöüÜ4 ÊhÔhžìmoã,ã ’ëÅá;ć¿ÂQ”Hœ<Ð55œØŒPLCN(ä‚n>òtòˆGÄþˆ(áÎjÚ+à^á=&ǃ7C„„pfôQoÐÌj?¥÷aâÙÊfæ@yûèHæ‚Ú–u|;OÞ ¡Í2ÁðÆÌfË9wáûdZ;g“›dçÞ èSÖ1¹gðð]{”Æ£9½Ä=—±ºTÒ†hQ̘³.qÏÃÖûG Þ÷®¼!!Ãòþ±œhüFöô´x‚Zõ a¡h²êNt¥n.§¨åݯ +b·Xߧ¸±F7!U‡ Ù3jˆ†¥Äñ ó«|1Y…¸Å¢€A8ÏCöCQø^³»±$Ȭ8Ù¥…»¨¢YHг4yºçPµäzP)=Ý}¾w >Sp/ñŒ®ê}kã“øÀß@ü¸K©.PÛ Æä‰ðpCŽðÜD£ÒÁ³ A—? ú‰W¶]%"Œ¼U¦‡˜ „½3õOÇRÅÌ‚›øÄ|}ýÁe9úÄI&£"ø~TI¨¥ù¾ÙXèø;|+Êã‘"}׶b%ó/þ÷SI¿A EÈ ü=ô~}Í÷ß@åcEGXá|…Ī”þTa‰´õË¿TÚ<…ñ‹0_}/‡]Lêì HU@UÅr{½Þ Â:-Eô:Ž°,´ՖЙM‹™mai”L°ðc=Cë9‹I dtœs,apÿ`õäèLžä‘²0äVÇÞÊ tGßî5ä™чr™‘ÛZiÉÄtœÆ–·ð²P,˜1 J©äBtgÜßC¿šð2þ7™HÏ´þ?e^e¨<›Ø÷ßÁ’Ü/I'çæèfàÁ®„„2IJr½iE˜4ql•TGuººÊ*ñ®Êr´–þ¨6Wcì¦2C—Q%ê‹›`Œ™¢É"ª°Gx€Wc£Ø ¸!y`g:m-öge±ëGîh ÌŽ1 hX2¿ +ÿRîú×ìãë.ÂD€9"ÏìI¾?®óíÎx¨’°÷Ñõ¨å_€òwîJpù ž©$3#щäƒ>>‡NÔÉ:­ÿñ!ßß{JÎ<ó÷^‰GdÆVV«$}Ì  Õ ((§0:œêŽ_*)ÓÓ%*Þ±b¿½^³¿s·}—d+:ˆe<»LÄe| §VhQ‹N6Úƒ±¹é+N¥¦ÎÙ±º}u¾~C“vQE¾&³µ&ñÞëJøöÝlÊFÕŠëe@)Û9R«-ð0dáò“1¯Óè+‹pÝl>?x¹8!b¡Ì—ô X¯WQ—‘7^ìc¹Mñýß«äø%Éż±ýáŸWд˜Ã€¥)T’õ„Gú¬*}´;_C?QœŒ{<èÏÈßúZš¯§­†mmŸ,X¡€'£xFeö¥(ˆÓ1ŒH,?Á"âðÃ4tÄ/—wŽ"N"ì8äÖÆÓÐŽ wHJÒË°V²Q– rJ– ‹¨ü¼'ÞPé©Ugܾԕpo•}HâmP9Bâu7F¬h0½>‰UÄ|U>;–H2´öQ;Õ¦&éð-x•Oä:NvVŒ$ *Wžû®"Þy70“;QßdŠÑ+Ïšû‡[;‡ûÿfö¥¯ÆÑä{ì"ê_ôM˜ð-ÙÃÙ¥2é!w).Ù"9!h¶`þ>o$ó¨Dö:Zé ê|ÄŒÃß'S#ö«•¢´dÀÀƒ{EP.´Ô$.n0”°ˆ±WÉX‰Èmø»Éü]+ã5ÔKEëkY`*,K cŽ‚+s³«~QÒn6¸q¢V™”Z¦$\ 1¾È?AÍcG ƒ\) dšK-ZÓ• BßWÔп|<Z$M06¦ýù8ÊÕmG‡„*Êÿ¡k¼ÙÂœœríJl]*Ø!㾬ÁpaøN¨Cñ0Ÿë4 ¨^]â¥-i8mÃzX%¶ÿÀþø·lŠnÑ<·ƒó!zî’+€‡"7À×qƒÁÓ…·Ô.ûöEŽ7Ì#EßÍÎØs‡)tÔ¤ö©Õ†~¬/ Þ‚aÀŽw—¸ûŸ«Ñüâá:zCdÐaÀ²Ñb‰s)ÙÚ$ Tal"E^4H¼^éÞ…Å-k€géO„׈íº8kÖ‘ѸVÕ–±Ïñ¨W/]Ù=h©ľ[R´Õ"‹ªˆT­9ùd"ÐPÉŒ*/©+”‘ÖTizË­(ÈÎaļE‰Xdl© JQPfPäBWݾ—jI†¼ÇnƒöñÚï)5­$J껤s„2¨ pq —/§³M¦e™­–R%©›VW,ºÿ™è<ŽÄ·e -8滟5Vº¬9š 1q.BÈÄßoòI¹SæÄÀ¥× GS”ü¬ÑäÊ#*$+ݦ»*í“þ5ý*F%ÌeqÐçssl)[wSÞ" ƒuF-(趾lŠ•]J_…°T@šV†=Ž’³à›34æ L8í±ùÂt3fQí>¤ÔJßI“‘5ü~'KS£­ÁL³9»ÓÕs4sªñLãR"bw¾1÷ÄÉ!”/6´ÔÈä~7.3–ÚhjòÁÌþAó!*uK²Y< ªES5³Û gRG‰:=ÉY˜ñ'¹+çøsäC%Ç€’m¡ÜzJ0©.Ü€a5Ò9°§@´•§Ä 9¯þßÔîÕ‡ÿ.¶ðõÃÐ@Ëkû´ ÒFK¹7UH+¨ ±Ÿ2³FZ}=VAÑÅŒ½]¸ÜÑ£p=Ê CžhÝsJ_L#¥^î=ùî]ubÿÚdSŽ,ŠmÞpjº4ÈØ‘Î ŒUoB<ÕP©3s— ïùZ„£Ó K}Ùø²é)@Œ¨üS9ëy6ùê¿}ë,ãQØÛú›åFµ-ÛXù–²Øo­®b=»9P*¼„ˆóW—¦/'d¾imˆ™ßÁ¹ë]Ã|…§\%uÖÌßò$çrQ|ô'PeÌ9ÓTNŸ ;þëµÇ÷q0;ƒøscö•Ñ¸z´j»'¹Šw‚«°” œ›f׌“5½(QH òE´Ta²4&¸J%~wö÷ÉãÕ¶½–—˜ËªuÇ©ÿ¡Ù.©b•²õ.¬añožéj6ÊxãLÅtº¤üž•O~Ú…#¬‘°Û$iÖÆð²QÖ¤ð§¿Ág0 ©pÐ(¢'“V¹Îà?òÃü-]Pùûàô–·ï(AÕ@ÝSEµ®˜VeI­Ú© ¬Ë^Ðîƒë¼†_V¿,J¼ŽrØ™Ï6~$Òr;{¬PòƒDQ ÿFùÇ }ÄT)åi~@ ÛÍ…â !¥^¢ºt»×E5É“Ôì-QþY œ~QìÑ6Ý@&¦“Q ‡³W ´Ë˜|fxu570,1ý=ôØ|K¹Öo.ê•3YJÊpʽvÞÔmtíŒÖŽØ‚ÅãåˆãrÞ£(ã;Èwà[q7éñ£{å…ßþKÔ)¦¡úAvPÑFî6 ŽU’ÄcT5üi ×àjâhe‰²Iƒ6¸ºå˜eo$’fÕ_ü>´/PÞµr…ž½µvW‹äw„GD/N~ÞV¢ÙìovJº·q˜¸PO3Ž§“neÕIL¹uR‰n–÷žÈÛpµYÙÐA¼ìaª½KyFÊ‘Ù_)äôƒE±‹øÎá‰Î!†gb.Û«Ù¯Ð8óóH„£›.Ÿj_]Y^‰ÚÒ”½?E—ö@ï®o «ý-Au.‘÷#l!þI£óíçЗn×óNtýuÝ}¯TØ ûÑŠw€¹þ}Âít& ”öËË+a™Óécþqÿ عöo[öÞ4Õõ¢Þà`~þÖÊY|þ¤¥vTs„:A†èÕ8ÎRƒÐ¼ÓrÛïb%c9Üù”Oð5ê¥~ ]Ù¿©¢]N÷D$D7Þ…Å;O ¤'T¶z»~t|øüxëóÊ:ßdŸöân…‚œÑØ–èc˜Òì©æÞÆÖQÂï}¾º±€j’e.' c–cëLÈ^5•×mû·m`7ŒåÉÍ!»(öÈû¥‡1ðu*êŠ_Xý¦Q.À–8“gêT“ÄÄflG=/e9``œ˜)†ž§=‰ fI¾æ¬«' ωs•â?`gŠýÀë¿2¨ë³×˜¯‚D¾ÈÊ8Ϻ¨TØ ¡GÝOG/_51ü®ùâpg7C_p̬N/R\û;k%¨fÌ¡ÙRÂä2e}ž¬eÕçÉÚ¬!‰ÒC"ùr0p—ó¶{K†íNÁ°ÀŒ?WjsJ ýìƒN~‚Rÿ«,=_ ÜÕ‡MÅívhÞ´J¸"w˜B|Éæˆ9†}†ñDìzñ€àI†Þ¯c(±.9(#AèO3¦qãÌOGöËW¨r„b™ƒ‘–EØ ®`·7fFN…2`„B]>?~\lçO[ùdŠè¤‰‹hL=w}Œ¿c¶ðKéQ/ÜQÐÃH’î ¤)rêq¿¹ åê BÀúׯ}©Hí?…V–4Öíq¯‰Gεô ZKG»5>ÏÙÝVÊMj’:W¨wùPÂJÇ‹'xÑh ¤'sçnIø~`œ«¤²ë0xaB2¤­F®^¸#¶‘€qrØ@Äú‹Mº)Ùkö±þ]2]"Y3†Q||À©êX•Mæ,ºL-LS±ô#'4§·Æ ¡Ðÿ7è«`T(^ù£ö%©ßb‡9Ã~´úqÙ‚ÿ ëã²ÝÃÝðj+ìù¼kü–a£HV ïõÜ ¿½ùhÕnù#ÅvvŸ©÷ãäœ|»‘þÜ‹>r@Çò;ðCäÉ’‚W}âÉZËhÿJ‡"âðCÓ~²f¶¡ZÜà>BþÛ=DçOúyLcV)ÐD?ͼ3Ì×AÊ’¦ˆÿˆiªêöD/Ì"šÖ$ɆÙŒSÇ’¢Ä>É ÛA”e47R@x;8?wJ$_–éÎþ‰e¢_X0ëTƒú¿-_êw†ßI/ˆˆ’ƒ§GüœL¹ô¬j…uÇïïg)œe)KºúÞru’¾r‹ ¿A`ÛdÓÅä”Ô9L¨ƒ¾Ûn{¦O"oèˆIžà³rh„îéE‰¥MÞ2jØ@CÈá«Œ%\ !ÿfÍj‡P»1X©ÏÂÊÆÐáQyjøáQ/V‹ ðýÌìÔ‡=4ãC[.ó½„bg`ÝwËx¦`Ê?‚×WÙXå=øïWÝíöîv&'÷b‘q9|doD9Ç“ÏšRÐã9‘)É°–<ç”Ìþ®É¿ÓëÜýÓVΨÔŸ4øÒÏ%Š5o÷Ýa÷óf´¨Ã7™Ä-&7ŽÞ°#±gò‚”‰ý«]ýÔ´ [€EX:´éî‹ô¡‰;ÏD¡Mž3®µã *jokùZÝ—Q“ŽQ{N¬‰Ýœôâ0R§´Ê$o’ò˜¡TRgÆÒ<ÿárdü¦€á»Á¹³•NØ÷«S 4N 1ÓÍÙ怳>…Õ)#Lz H¿‰å³X¦jPî"QÉPèä:QÉ=Ñ|¸üâˆÐÈ Fïö1_˜æñ;cÏ©1ËœbáÌgÅI˜.Qˆ†äì8wÛÁ#gU_?~OŽd¤_ÀëCØ¿<Ø{¥S¸/c>÷´m_x}ûS¬lSÊâ‚é‘Їð'smŽR%ÔÔÑ6‚ Ä“*E R4ÿToB»µ…ŒÁÉ1­Ñê>œË˜“Ó£g ÇFæ{{ä/¼ç‡âHƒÀòSl †6…;ÿ#ß½z§ŽGYzÖÿ¼F@öÜ‚m±þìù«ãÔR9«Ó)?2I¢>¥7LAø¡Œ„A%…|*P§y ›CJG±iQH9Ö¢lh(VqBæ"Òåü‡˜Ñ©¹ûjw»yt¼ûlï•Ø>|q´·¿{Ì)æPÆ>] t¾ÁJ(›áôÊ}Šj™3SLfšO§…\Îdz6¼“HQñ‘иÑ_b|Aæ”Ñ%ã-u¢®|­2lýÁó¹t1Ùv‰7,ã¡×¤hËhžQ›%Ì%$%$qð÷O›'ÿ>‰õÆý  X ÷ÓŸ$w"¨D@ºXÔãOPΚü¯£Oú[VŠóÑqµj˜Ð¬š½w»cŒFg2£”$‰^‘iY•ã¾É ùÇLÕŽ°Á¤”0J¬±ÌYmb•ämŸJ,‰»^e`Àå²˱›ë/†ðá%mÅ¢¦ 2*Y}h< (ó¶šwʇþºþý o{×Àf8C /QÓ¹¤Ïi]#Ò\¥k)JBƒ %h\rOÂdFês2íWL´ÖØ €¨pjmt.¢”DF2ô+Oô0Fˆãfe–4Iƒ"¤ò§È¾V”GžnÜx#{Ø-ÏŽhhĸÅÅx»›Àã§[ÏÞ:^Ò]hC5êŒì.ën6÷ãé÷Uv4öœP…Cé1é·iL')YŠ{-‘H‘‡[÷[Dƒ¡œ0R,A5äÜÙ_ó{=¯ãs†1Éò›ê‹±LLnÿftIŸÃ$j]N}ô¤‹©™+&¿>îkO\fW5SºFÆsšÇzÞÊU{3«lÆ´ôûÀÊþ¨IîØ,Šg.¦ñd&tñuœ!”/C7PH·½¦éá‡jL”©[}¦@ÛUÕŠ8_”Y5šª^:Q}^½` D;'-ÔRZ›ÕüÆøl§‹gÕÑgc·u:ÛÄ}ÐIºç…›œQ—‰yKâ¼_1î°ê_ÊŽUÒï *xnÚt;fÐO=”S·©úEIaa'>¸Ü7„]Ιl 72F†ÿL¦ Á´ܘO©Á:Ý8"‘t0kà³ÇíìK5%o¥ ¡^bw;Ý‚9]8¶ð’+ºÛÆ6²%›:Ÿó9³nLÄ{OO›ñ¤D—Ö@&ë‰Uº ?o¸¨£bû7”ú•â]Ž”Q@xBz±ÁŠùÑ9;àK`e<»×î†èœÉK)EnÉ ä4Nd‚sXáø2n›@"+P6èàQ¨sOŸVt)ôn0 óÔ|Ñdžˆf³=èŽCü_ £Á—¬m«Ä¹`KT99~KÕ„W»¬™ñüÖnî¼@³Ñáäc÷æ“Îü“ÍWó-m-H-o9eÔŒáQ×ÙÅ6Åõ ¦¢I8öÇ$K†TÁyÁœ!ŽnºÙå§tÎW²JÙÍ¢¨;`cÞ<œ8œÔšÆé\Ož!b™Ìiè*äž/ýÏU:L9k–8åH«("{¸¦öïœJÅiF¹›nªÖ0iòÙ_W#d”í£#‰‘¡®¢uÐÄÝué!*5P;o÷›—än£_¶ôÛÂÞùiëçÝæÎþ³íƒ&ú'ó\u7³W8Ê&oŻƣ²¦òþ1àVÌoEòŒ€@H¦•S§äÛœgW—¹w¸Ê€N:UТW ø§x;½ ¤L†ó­ i¿N²v6užm+g°’ gm®<Û|¸Á¿ûAs¢lÙ\QwÐ…PÞ[å×ðình %FÌù!%YpÑÙ?m¢€\Ä1rD K•ï ˆcvaE :É@kM¾ŒÊýƒÚ¹üAIrãF±øH­ǧû;Íçû‡O·öK‹]m°P©}¾»°+B´ˆ}oïìïf¿+¢ÞÎ.úŠP•UÍa‰ý¡Éo´w…ùâþÖþÝ<ï‡~ fõèfóÒït<:ßG±š ÇAŽ—&ây¨,Á¨»ì’‡ÀïÞÎJ57½VÐ %D‘V—dc: 3=?x¹Ýlâb±´´¤nnŠGUº)o½Ø;€ö6Åø ŠÁ“QáðªSâ¼ ÑV tÝf¹¼fsi)jß’%Ý߬j4,Õ±—?(•km•Ä*j’ZO‚”Ïe”r ÕÖîaÍœ|“£DÊb/ÆDÚ†\ï—*/¾¢ô~K.ô#?¬YTM¨½rMÔRu#+}Þ‡Ò‚AqI0ÅfD2I-’È¥ˆÉmg0F\¢N—tpèhâÂ'Y8«Ómw(ÆMÚÀÇ'ŸLõ$ƒD¤ïrUHé•BªþþÖ~^‡q姥¸aå,Æ ÒOP/kXáz+ÄQËŒnÃoµæüh,”üFùGì3ý²%?Bëgt[ÂE¡Ä!¯Bq9–ŽÒPô–œº*¼A¡Ã¢Šß1‹«SC³ RÙ».ëûQ¬Ãu‚kªÙ§«*Œ*z!bŒi_‘¬þaš³Î5¹”ˆÇÖK:{"(ìy„8á^§èxÔ@‹ö*ˬfϾ¹H}$µ¯È,ÁbfPyqÚ, Ÿ]áM•f§†J¾p½•I!þc/un©ÉÎ@o ÝV¶ô‹¨¸Ê¯ì«¦ûUÓýªé~Õt¿jº_5ݯšîŸYÓU+úì oÑ›…z¯zñnÔ߈ÚýkÁò[“•a£ ir2¿ýŒË1[ólf¶ÝFg)ËyÚ¸M5af€1úتYa¯¨ì“ùAS}Zv¤¨Ì'_ŸDœƒQ-{aüSÐT›¥]ºô¯ù÷ Dc@ÆÓÖVåC;Åî`…ä~ ƒ;9=Þ;¢¾öÏŒ’¥-„È%òV*«†.,›Ac½c)ò6ݲ;^k|aÅÄ^Î}qÜg5ÁšåYÍE`Ÿä¬“·¨g¤6E¹Õ…‘Þpĺ*¦ñbŸgDÝ–-”í|‰‹ èk!šuvèK,$c â¹ SÍ¿V[Òìn=™yÇ:eŸ$Ôƒ™É÷ƒ$u¾c ´dR¢»ÿHîŒÆ5â˜ñɯ0˨ŠÄCëP&AjÆ4Ä-»çr]àšæˆ´t¸‚‰>Íë±Y>G/–“!þ©*«€²ÖÌ/þ0ƉÎÒßMt†yœnœXŸÎØqØ[{¯jùúúi1n¢ómhD‘€)nÛ«ioÄ)s1ñr#òím;ÙòÂõ¯Éù3´Ä# ͪLBÂo!zf\Ä`¼zAÁˆ??7ä ³©PÓ¨jªXYÃD³™›ðzMeŒª„IteX¯L®¯wF¬5†Æ‚MFᨕñ:¼)3;«Àd­µBÕ LíQÿ76Õ0¢ßE{„ýPo' AR­ñnø~¸V[žøªì7!aD"uÃÔVSäü>‘s55 åIMÝÈfÊJysöYž` ÄO=½Ëù˜03ÍïÄ»‰ù½(^¸ï`æ ЧWc-¡is$P=ºá è¢é…P£±dOù{=[õO=å^ç-.7ÛxÑ `Ú¶/´[H…m#Âiy[Z¸µóHÊ U WÉk‰ß ²¼Ò¤´ý4emU¿è7¥«Kün©´½M*;ob¶K‘A#’^Û¯^‘œ[ŠcÈÛ¼íKôìâÁa<gxÃ~oh®¤Ýž‰ªŠâŽÞÓDÑè£ä‘êûÁÀèýW¯ àÕ+W¯f|5gÒÔn5 ××ñ˜£qÑÛ†. ½Á0À¸ö`8ü#ïÍìÝÊo<:Ðúhµ0¼7釟Ïw¦¡ǘuä×q_Õ‘rÄ–†!a¼ë,ëÒœ€–LYÆ—+ì]KXŒc;ðÚQx‡PeÙàfðn“êZBØõìÊöÉ ©V*(£J†G§MW°ß/_£Kr$í©'í6eVÇØñ”NŽÞ—øç Ÿ.Á˜d¤9gƒ£‰týž? Ë°õÿpCÜá/}7ONwÐÂê‡Êb[ãÜxDÁx•€)BÎûƒæ˜¡ëræRÅQzrÆ÷ê´&ÚmÁ§tÊÚÂ<ºRâ yþ@ïV`Ãë¡jœ–Ïþ‹yôTY`¬“›þȽfÿW + kr´¥³+eyâü(wà›«=\¹—`{©†tÏè#ýH÷°2>/,㘕O{´ë O+´3Ã¥5‚yJ mÖUÚè>Bù: ´¼±gz±f9°úi÷TºÕ˜ƒrèö=êÍzã¦=ɽº+ˆôf^f¼_™e«ã@;Bè%èXw6$º›ÛM£ Øݳõ©Ù›á¸â [í÷³{TÀŽ/ˆ—S¡QÁ)ÅEÂz©5ôÜwóŒAñw ZRtçâŒhUj‡¨hGLJÛͽg»û'»0eÚ]Ïíó„.ÁÔB˜nj€ÉÍŸö \™ñÓ(cÍ0úI7G B‰”’Ý›RÆ“â#„º™*wÂÎ"0—­V.0Iõ,ºMkÒWñýU|ß_Å÷ÿŠøŽ¶¦–¨Äâë(øgDõªSYO‡•…ü« lCH>ý-ÿ(¬änÏnY>7,9'€mýÑ 3kéÄó€,‹Q§\TH[ïad0(–·Œ ùÇ(ßq™úKoºåx"%°ÙÅåOîc•<¶ô?³ó-™¦Ï·±CДJia›ã¾\9$Ÿ•l°)Cf¤‹~M’„§ð„)Ó[úË´—l²ýO½•~ï&`#ÕKÉÛn+ ºèÒ’|žÄÄLP•Caw %ðbŠj À‘žš˜‚iME ä§nö‚θëÝ%o¤º¹¦‰v莇ç`¡ü0»þá YlLña9y·4ôuNhÙ¸¡F¯7Jè ‘ÁW—ÔU}#ÑÏ1»b“¬ÙlíSlÍ;%LU<¶=V 1²’ÿZ@ú1f0á•GÍSxó ÊoJÎëdà8ÄÍ@^Èþ¢k¤y€™ÉûŠj\Ÿ¡6»2)A‘ÛÜ…¥ªsC+ÿ°GÎ[¨×"Žî%YQ´²'OQÓr˜tOY5¬³XêúＸ ·Zâ”öx8„å¾{#ÝÎ8}3Æ”Ê<Α6Š«9i„ÊÕ°†4jJæF—´ñu”Ö Â0$äxò¶!–)hÙˆí*+ªI;¥c–45‘ ·Iñð„Ñ óXk ˜»Rú´Ò%¨šø¤‰iÓ"1謦ê,r²J¾vÅ>@)¢^Q~lKpQã°àå×o"w·¥‡UÌBÌ_ëŽÈåàGǨázF^}îÅ…×Ñ{r¿ q7ÓÓFz,J)ŸAÃâ„~ÛÄvÄ$¤ÎÀòÏ}Ü–)nÛ)ퟢÕøþ±añ߶>e¾3ÏQàkI"´z!é)óA]"Aº`¢[”êÊÅR¢4Þ†ÉhçÐÑÒ6¡Ûòp Ûw‚À=a½àcäFRíäØp5mhƒñˆ2ËeÄ —"W¡<±24ircã`S.n±“G, =%‘®Pâç Q+–`èL¥±D<®–0£1›gJ±WEÏJ˜%Ípžš½iqÞ,nÏß(ºŸ¦IvÜ% Çx6&áéÇçÄ(Æ /¬<¶Ôƒý í5n<Çw9Ÿ/_½2žyD6ͤ"FZv‘,ûKÉŸ¥ÄÑ‹Œ û “õ)B¯¼éŒBšjì=Ó«UP¼Qúe•ë#³"\M¯y•ÈlÖ6õNþÇuãéÃÑyÃãSxÈÃÀÔHÁ¥mµ<°ð RžTXq»k „è'¯°t‹p·Úí¦Î"YV…JÆÝÍr²\“mV1X`ê)õz"ûn¸âº}Ls›5ïºí È1’`¾uè)8ãÈþ„½ÄÙÒÙ(Ó”ˆlØ’Ú¢'½S ^½Ší§âm©c*\?y¿’tAšŠFÌWrbµ@ã‚fŽàÞ¸ŒŒ©í˜ ĶqzÙÀ¹v·CëÕ(ýH=&2& d¥MìVà %@”ÅæêFÌgE– .4g·GaÞf ¶J›0© sm¨VA¡ 4× †°üÛøªMÜMÃf!p'Îgnð Dz h[¸n#·Ä 'ü#vùX¶—m†Vإؒ®çrµGC—™»íAmºPˆ&5I¿} c#2€tIÑA×-Ñ&=Ý#ì ®sëVWWÎb~lSÒ8‹9tpÃä«ÊÖ˜6ÎV¡vwœ(‘Q_7õ7ˆvýã:_ªìKCÞvG›•úë·õ7ø¿åzÃi8õŠæümô[Œ+ócï%¤¬K8Y£)œ-ÕR´Ô~Û€ßÖ¿½¨œ©p¼KTj“/Dž¥e]?W?¡ßÀÃÒ…ÄW ùM+ü6"_¶Ô‡õñ‚)Ë÷wÈ#E¸$c&³,Å6 Fú#6$Õx†€U<Ƨ…ý Ñqˆ¬ô|{Û‰³ì-“=Pu¡– FÞ{’*'!ÑA0çþjÚ%•“0esNG‘m¦P»>3‰Ø|ÓÅàD€%.›ž·xÂíÖTŽ Æ>‚Ïy”kû|>1ç` ÝJ‹òÏÃÍòÞ³“ ÿÙ¤žÍ“Ý£­ã­ÓÃã;w`þeWz¾¡Üè ƒP)ίüñ,_n:qǾs]¨nL®ùOè‘ä¢ljN‰·"AAKÄU ó#Y!]`o9ЮJGÀ‚‰«#îµl[æüªiJ˜å6ì®ÜƇzëú1J&ÅûJ—åžýÞѯ?E{8?õir᲋µÁœmSð‘ÚVOÁÓ»ðÌŠ+ˆ: ÑîáZE¾„Ë@ìr…”ù§Ïv*0¿bîHæ´ÃAã€Ó¢_ЃIoÄÝþ¤PKqM,)ƒÄý̋ºÃP¨D2) TD"òŠÎ1/¥ôŽ ¦\šs`öÓUìçÄ ßšKhLåü mJ-ÉAæ2²¦ãœã> bNÉ;(Íåú}Î[L±Õ¨F¦Øç;ÿ½¼oc#5ŸÌ[ÌÀtÔZËœ½\§05ey²!7æ̯왕µ¥ÔÉsžÇræÝ"PË ™¡•(A#Ûq§·´:ÚÀ¥þ¹ÞgõLŠ-)ÌÐÂ<ìÞpLr€<–×»1ö(Gc³4Lb6ú¬¡1BGäº#E×ÇgX•j'áh9!iÒaœ÷i¨Õ–ò¤BØÒÓÖîƒRÞÁœ¡e¼o O9Br‡k¸f{(eÍ"zWÇÖ»òU×fo¼,ËK;0\Îͺ% ¾\ñîÏû¶<²É(EâgFQktsŠÏl*D›rò!µ(9¸\6ŠN‘è]›‹Ø²ˆñaRWÍf¿ýùcloÃ~© ÏŒ`^o0º1¼zõJì¡ÕSeQYéà¡ÃDŸã¡¿û¨}n·¯¯Yžì©Ì7!bÏ>lßFþÚKa¡wa*ŒFЋ-øG¸ŽXzñ"J6Kߣ6ÆÚäöÛ>ú(ȉÐñ;¨ÄËS*ÜÂãÁ­|ｑ#Ü®SŠbô9–Ø:ËÙʼnK¯; *ÆOó§‚&F¼bntó 7LùHej[%QYàEè¡>´CE—I}¶ ˜î‹º˜Œ:H¼œ07ćÀìý-Έè·éäÖ’e÷VÖ–XtÍhƒDö–ˆ†‚˜Pû ”™jçDk̹ù#–¤”4–6[ %E1„Ås;‘¢‰:빎•¬ñ‰‘: bF7ÈH= ñ@á†Ûyª+‚sãÛjå>‡æŒa•±&‘ú,¥ä1ÏPÔ™ xïE–%«2 ñÑ’\`FòGŸ³À\èŒÿ cZÍŒGƒñˆ×̼jbg1z„ÅrÔT JHŽ­âêàquÇ•i«S¡>n‚qTñ÷›²:|Œ}ï6å`zIt¬ Yc°PÀz»­°a:Ä÷놣aï[RÚóã9ŸåL9QÌn^G‡Ç§/v×±#º(%]˜#œcõ/à®›`<ÄL¦#¯W iÐÁÔ¹íÌ2–í𖘛Țš3âúç<±‹·!›°úâ×a—ž *ý[N>r#†Žû—B{×Ud/0îÀÊ^dÙ#+¢_‰Îsz—–rKºåǹq•ûboëÉZÍÔõ /‡Â#0¥­â÷Ö’˜d™¿’&ý5 Ùèt‘|øi®hTéŒà9³}¤G ŠB’a³b?e¥¡b”èMXV‡7\$oÉÿV¬æ§ÔcçÒʆ9§è,> =Hª/Èü3ì¹Ý­½W"Ýtu9%»ÝŽ(ÕnUäBÑW QÞT³e]õçØ¡Ãyª#›ó {×^{LûÆЉQyF©–⼌Ÿ’”ê?¤ÝfâC1 ¨=v¯ ØŸöA*ñ“µfâj£@;V2t2{@Йv=ö¶…ᓸ—¸Ä!ÎÏUùõš€Ž]ï5‘ìŒ4Š)WA“úŸIã% éÿ8ZÒ Ã1}r¥ŒÝ4¹ªþKáåÐ ªÉ¯~lîÆÓç©õ>?[ãsëÿ:G±ª!¼³¯OÓõI™Œ‚`Íy½úèÍG}å,ãõëÇ,?T,U·£ýæ•«˜”£Bêþ2ÍtE¨@öà`ë2ÒìföÃþ¶ LÑNýjœÍMš¬„ÿ‚êÔ_Èþæ_ËÝã&Ѥœ¾4™å‚À£¦æ»ìf¶´Ô"ZÆzÀŒ‡)’¡N+ŠDLnEòôú£ÐN‹A¿o:Ø/LÛÇ ÆÒ~›ö/Ý –%Ýç¿1) “³ µ&-HP¤Ð—1ÔB6=ìÂ3{DD²[éɸ"ÑsÖØD¦¶”X4@€×{¡ÜÀ°'™`«b@ŽØ#ò¡íF¤ÄÆrnóc¨ ëlœ¢éc±Åòôp›ö çÝàÊ‚­Èüì«}X íQÐŽï¡•+B]j»8¹.<¨_´ÛX¾Þ@…rEJ;g(6È0® ñ…­ ÿØÖW€F³å_ð÷Õx;¥‚-L%mì0üZMi\èàšY0Ó•µ²}2Ó}Ô$…‘&î]–“óZD„¥Ð̸4a$°:TP²Ì!ï}tÛheü‚EV:2J’ê²ÇÏžù¼¯?ä팇êSEÉñ&Î/ô+ŽJ“6>e'ú],WVÕ:—Ž¡^KQE¶frga}—$S@€bÍY%U ænù‰Ë)À¤Á–Rœ- ÚíBSWIÿVî©lˆŠ ŒReHbg[„T‘³ÒBâ¸Î|™b×4ÚO¶»Éj B è¾'¾n’qÑÀr Ѫ‰ð¡‡u'L¦ÈÖñéç‰òA7Y4‹AL×nI`Ož•³p@í¸e´Ž QHe³¶~¬H%SfEÇ9ÇB¹úÑé”@ÿ’¨ItE÷ Qåxù eryÔ«ãM2Ùõ:5ÁèjïkKëÂdiƒe´Ý,v˜g*¾jâ_•R®îº„I«lü¨úyEÖeûé@&÷úä…›ZàC!w&m_ ÝŽö·Ë4â[šåäÞc1FP‚&O$wBL§Ž²³“\6k1Œ+§v—œ)FóPêÆûÎ|ˆT?U‘³Cå`CvꀕÑx2q'O ùÙ¡±[eP?Ëã²ÇÎcêDH÷éroËÆ­þSoäŠGâØëz.ÏÅEO ƒH€ÑrúÜ!±~ o©<òp|Eµ=ZO4Úú¼’€ßŒ«¬3pT‚rÄF&ÝŒB­ë'Ç»•¸N—²TÉô¸%Æ+6—LnòYj‰Àˆóˆc„. ½•U")f¢–¶å]øô€üjС…p-ÅR³J6eÇ»†,ߨ˻$ÙÈç[’= Öþ–aëÍ*"9¥ÆRî¨çÙ~ÄVQöKÇiD¬™'Nç€lvZ@.Y"Ø.»Dº{µ# Ë(‡VÐFCÑ$½•ÏyP8(s±«–Ý„ù6Òi,û¹¥è¸Õ£h¬PèàÕ™N|œƒÛ…! nð®ûÌŽŠT¡6« ¹î0D>xïvÇh»AO«fP‹|‘š¬÷N† AOÚÍÈ•GI~'áËlÙ4â"ÃBŠMO‘5Ñ­Âïù]—ìˆì‰æ.ÃfˆÀéˆàRjp愈FäèæI<²ÃŽÄN ³P‡Jzqô£Ó¥…b9´N<±*ŸQI‹)žØÎLE-êb][Ÿ5ŠJ9gØXî®'´±L=îsy Ønë¸)oµ‚¯bU•-ˆŽ;E½óÆ0%M3ÜwÓËÈ\“»™_PtY›„üN/³*xs×óóRrË´ø±Tøf:^ÏÅËaSnxò_ÉÙ¢-‚&¥¶c©GV-Ü¡mÆ›ôG¯Šæm·ßLà\5‡æÿ¹+–¹z©c»Ó =JÓEfÛ‘™™ìVsàÅÏb*¡+’³ÆÍôáI‹[¾yÝ8Ø•×-/ѯw\Ìù»ëCÊʺˆÎßFèS1 ×Ø$uϳ¼Þ ´§Ä1ã¢ø¿ ô—ŠêZ vnâÿ¶ý³…š1LøDèÞ„*S ‰D $ÄÃ>²Òª’þl×hëx¡7Dz; 8€Å ŠÃ(U6Û ¯] œ!–f‹dYP|™ò8]@.ˆ†fñpÇá|€nBHø¦•ŸÝ¡fp}ͬCú”?Í$í› ÌpÁøp1¸z´ŠÛ Ö„+ûüÕ«Z²Æ µv‹ö¼•>`Gú'?oóÜý*":SK1»^Öd<:}ÊsÇ~ ‚¯Ù®zõÎþ>;BMØψÊ,Œ;á0'ÛÍ䟮婇ÛFXR.÷ºù““<ÇãÀºO¿¨êð Q¼p;—O ÷L2ùE(W‡ÿE¹=°dŒqÔ ëšnVÌz¥¶ ÔdàõÎî3\lÏÔ&ÿPiT*aýíëñf¹^Ç_æ“úÛÆÒ†³Ü¨.—ëäßî¾B¿þ“ÆG¨ûñÖñ¿UPŘ| ¾Z˜/þJ‰eùÌ©<šuˆlš°ïa:®¬¾v€c­!Ñ£ÆK Áóh·4Æ[jŒÜŒÈ>©Û´A·¹gÖ¹Oÿ‘ÒD~ùߌòÜÿû­X.·US°õÏ‚NÁVÏ˘¥¸?mŒKùäSnÉ”A»DŸí§tFhœøÒN¦@•&†i1O·žÿ¼u¼d â6ËW4 jè&XݬŒ†cÞ$L‰Ux£9vÅ€Å×íKùƒ_K& âéÖ¾ìPN×b2*ã;–U‘:²`w$;’ ì¾<=zyúÏdÿšFŸË¢§‡‡ûÍìò:Í`ôB|Á¤EÆ×û¸ìì¾Ú­ÆRå’*ÿâu“GZY/$«]NßË|5Q\ãM$u01j ¯Q¢KÔvc7‚/¶öžížã@/ZQ"Òó$§Ëì9<³2%Sœ°Ui&“l©¦ó–î¢×T®gçÌ<×þH¬$GßüŠ&¤FEª6 Jã¸xð 5sr•ž9¹ª2ôÛ¨qÿ³éƒ|¡V*ùŽ”ÖgÒ¯-wç€ÒÍfçÖœ­ÂªP¿RÃmYi÷³Qö+)´mä_lVGß-G§ŒdÛK9Bjµ£™ª TI¯Â¥—n×TБ*~¸Áfñ+?„ç‰çQR×pg‚ñóO¯õ$•…|•g¢vB*¬o¾Ò‘¢$2Í'?LO SkI³t.µ?>·GÖ–¬=%Û7Pür¬^Ùd²TÃKwÏt8U€Õ]àÔžƒCÍ.ÿSbY§Ïpøp ãÐݸ‰§RæJXx¢qƘÌý÷ädo4¬†µAþìø)œ ‹ž7h)&¥-*½ ·hÜ¢ÕäËÅ´‘°¦_oà‰€‰–YØŒŠÍ,©È]q2†º™(Q*2jøдÑòǾ{ËU¡h`VO™½ÓÌ%ž]ác¨{É¡M¿cŽl^„y¬oK™Ë;ˆ(è œ4lG˜—”}“ÿK“º¡gu#5‹•žM}Õ(ä tÛBÒSš ó-`ã‘ßeï$;×{R]í<ézSÕ9㣹vN´ÒVÂo?6?â>±‘Þ(6B¬¡¶]jyu˜èç?nÿí¨Yaþ˜dö®¼wØAw?Ð[—8$ÿ&’°îî!ømÔcù¹lÍYËÓ;Ö¾ÁÐçFÞ°k«jlNBxæQ‹æä“Ò°KfGý~óä/ÓƒÙ_š^ö\^"cw®â–q†M[~ôÑt[²´u6cOÄ`«RãåÜߪ£1 ðIììnlïŠÓÝãꇕ¡ûjã•wþ™€ø ;»'ÛÇ{G§{‡¨CÈR ËÊRóhln‰/÷O÷ŽöwÅÁáÁÉO[Ç»;3Ð*ûä¼Þ5Œ¤ KÿˆºÕ„ xs¯ïN½aϪw¦ú:²õЖnÿ§=ÑÅ,®¹I‹ãäºûè¡ÆgEEÅ+S¤½]¾òFÎ ê_«LèÀÖg3OQÒ{ä•_ÓÛTÓV§güÂUzÖ.Þûd|;Q¶aÑNwÌåz³±R¿€^¤×²6žEìý?9›æêg¦¹š¹Ù • óAÒùÔDƒ»;á3³Øº#éß¹_Oëµo-Ë9fÆÄ“­°³êÄð3É0S1ô”?%æ8wý!Ÿ°×g˃ ¤‡Ax! {›à v÷ŸMý¯ŠíuÏÊÛ(rh ­£3t/‚þy÷&ŽYžžìˆGÑŽÞd T8xxW"†*%å]#Ö˜EÁ[|ÊÄ“ÓD!ªß¥ë¿çµ.eˆ½µÄÔ F ãëïNöI~ÐÊDÎ,é^Ÿ!êtwx‹„ZˆÞÁHEÂËS„#®•bfH ©šqY¥ºAÛUHr2¾žŸ§•dÛÛ‰³¯9 Õ çVJº¸©Of0àñ‹œE‹\mm9æjÛÀC\´ÜÝÚ´ú™€\g³€À3<Ƴ¬Þû¢u·’èôÛƒ1Þ%$ã´ÀŒ²\â­S:S°×÷Ø—˜2)]¹”Õ Æ…—ò†W ¾@-Hƒ©ÙõÛ>S«Ú0Zb¼= —$1g c@ j:äIöbpG­ ¶„®‚2!­ [Cô1áÜ<Ä¢ ã=’ X õà © "­‰°•UÔw#dʳ õM±A‡¿‘µY‘%33Ïxz¤XåwQ…F.ÿfmlˆeýd”ÀU;ÛÖÌ¥¬JþdOÌô©ðcæ ç† $ú¯%+2N»æ”Ù¤v íd=—핇ËéïJ|¦ ¯–Š”™y‘_˜¼¾g£µ㤃Èå`à.?Y[þˆñ¨)o„F„G7“ÞA+Ö‘FU¶¨ª1  ÏÆŠVí)>\œæëJÓÂdiau©ˆÑgR¥îkOæFÔÓ̱ç .1[·gýé2C_¿ÉWÉ‚^”Ì:GÅðEjãˆ2Hþ=×uþzæ®2÷VÛÒòv:äÂ]( “´F. ÊÝRO\¸qáN4Ã…,•pá>tÁ?¸*˜oN*PþfÐòVÈ…ôY--LP*35Gûühoûw’qÉ“%)gó•3uÞ/"FÓ º§Æü~²6Ù¤HæF]ñ ´Ù–ÿ< C7Góöû˜)àúõ# »œ£.+ Óf©©E:øTð¢øÉm¿['h|®ªxä\34²ÛGx•1g^Ëk»h%MGô#¾-ÒÙã\µ´i—"tBLeŒÂäÜFißÅÒCؘð?ѺA:r"Ti-z¤¢T?gÒV•‘Ê&JΛ!¢‹Rº“ž× †D †ã­v¸(Ý L ¿aÔÛ^ˆàÀ§pß~‡1j4pö; 8„w‚^ é¬>~"þå?µÝ®8hFå[Þè O^?VmÀo=¼~òìÙ6ÿÑÒ‡tð€>ù" Rã¯kFóÝ.¬lv 5|·´ZáÀm#ÔÀsp4)§2 ¯˜Î‡‘Ãaí Xg(ÊŽ·v_Øåò'ñ­X{øýQ«¢±,VŸ¬®¬­‰båÑÚêÊßÿ¾úÝÃ3#¼.÷XÕ‹]&¬´/g~ü úHÜaS3rEÕ ?~ç=¤å†î1žGàÅ“é¹ÌÍÉó=”`Sùn£B`bÂLí»piU+ÿžEWÚ+„œ)J‰z¤yz§Qzi<è ûËл½¦tbh ©6‹f>/Ù[ ´!Àa”U’í˜ÆÙC[žÎä@à'Š‚…ýå­š„é¶0y²Ï»×½ã½W2Y5÷‚ŠlõµžÞ÷P¶àJ¢t}B¥ÕÄ}4A¸bѨWímÎúkbÄ<¢MŒ-¨æö/Ç5{ÌV³®tdîvp(7µoZáô;䃛–ém“ „ɉø<ÅŒPf~\HB~ýEû(Ù`¥©¿¹g‹…úÓ­’òM{´è÷a~û£&Q*8ó„&Œ¯QF¿[ÆÃcL@?À º â„êüwzþ/S†ÿkŒjè[a´QJ€:²×o;bé_[{Õ¸w~ ˜‡Â ÁHf²HníUjS¹y&@{µ?G‹c[NXb ¶ªpÕµhÓúÓ‘ýòCí¹ú»êQ@P3R¦RKDQò hqç#™Š€Är)”ˆQ}Fá!†›”®ÃÑ.¨¶T}h¿eÿǵûðéM£ZÇ|è貃E`ïÍ;í–¢†ÉÄè©7Êò{ ÇY®CÛë¸cçü•·_“K"y\Ê*mà‚þeN\¥é¥kòÒxÖŠb~~µ³ýiílÄ`66ê´4hŸ1 bá(&À® ˜ýÂÑ275¾_r?oÚ»U–Ÿ²_¦Æ «W\až¨ÎJjÅÊ,ºŒ¶m\•=ú«WR´bt£ý™R«‹jyß9¼ew[Á{2k U΀é$¶ÜH€ kUsèu:)éˆD“ò°†˜m0™‡âïÎ –ÐØv}ÊEÈÏCI 'ièußë %S}coýLàÌÌÌe©¤w¬)L´öyß ¤Š—ï»"ó¤‰^X0Ÿ(…Á9˜Ñ»RþžøoÔ4}˜g›…öðeKŽÊW„í«9\Áo.˜¶Ì ƒW±ÊŠâßiªº›ÞnP¢>*rý¥ëÂ}‚Æ6òƒ ØC ôÓE{0Hy !º#y¬ƒñ &…Ób$’ ËHµ!^¯Øß8”‹Èë;Z¢ 8婪ºÐs›§Ò¼áÀÏIH \›‡ç°æRÙÔcª­H« nÛ‘ý&ÏQf¶KB̨ gê ê¹Ìs½©=ÕqFàÇŠ¾ÍANËN}"²hû«'Gg–Þöf¯gÓôǤ™«Gx¹Ä¿¹Ý ’Ø´Ôf½:}d|äxë`ïi ~&gø…újòj›š‰¥'§ i;õÄÏLÝÉ·_‡'d?ø:÷<s­yñÃÎ媡Š<1TX<»òÜwyxšÏŽî_ œ&ùÆïW¯; öE›VËÈ°\þžšÆýaÌ~‘§ê¤Ï÷Û×FÜZBÝ_§=ôúXúËnn"ÿŠ©ùYÙ†ã¾ò7ØÜßi¿ [P%D¹§üYä-Øñ¾ÝWDç*ÚØòd"\©%wõGŨþmƒôqÐuŽó”šæy¾Swá=•ë?Uxätí Ž›²B:b8ŠÊO䦄q<©½Ó~ÆáÞwß½›ln4¡Iýý bÛ°; ¥Z¸\‹Ôàô½:ïÄ"i=n6w÷Ÿ5›¨·!+ì [k¬êÑY 5Òœ„»Oi¢"̉¸•HglOc‰¹êÂ7§Á.>Î ÃLD.L 7¤L‹â—`øÎcL,9;¤Ï7´È^q DŠn_‚°Š¹g®ÝBê©é¥²nw/Úmawñpµ¾nUÌÁ^î:¹øµoBǤ!8L1ØIl–»­ ™ƒEáq«$~˜p³;’0ȹ—§ˆÅ\ø]w¦š7ב™™2ñ,†] ½zGtú2†Á)*ðtñ“”¥2MìJÑq`E—ÉTQXŸ&uêÌ7Axþ§ü]“umüù6Z§àìÜx«Ó÷i-‰·wd*ðUŠ8 /š Õyý˜b!ÍEDŠÞi£Ñä;6'߱˙!©]«Îš³roqð†jXÐc†GKqBW¯¸Žû˜›¢ûeþU·±\™Ò%&{¿}Çæ÷ÛúÒß>ìeáVóq囹†&c\þƒb÷0Jë‹”ꌔ*ƒ‹Õ³ ƒã™?P…ѹ°¾ Å·a£Ñ·„4ÔB·qAa5Ê>[á³”§‰li£¡2=Úò Äx%«ð—1dS¿‹¹dS¬¢ÈH‰`z·˜Ù%ˆq$ë3ý¬KŽ-Lqdüõ´ìëiŸ–éP~¯ßÅñÙôô,‰Q±¥X“qˆ”Ó2?ñ–šE¦ö’Ö_f€Kø=t‘?XøãB˜a–ŽËŒƒ¼Ï.ì©ï?C_+ÇmÎ…§]wîdå¹£µgŠÕ§@ Ï%†Qò¾Ý†"þÅ_D¡³nÅÁ~Ô÷Ë ÂyÏfaÇ0#×æ„)Ç?kÎõ½íA»œù˜©ïÛ~ç/Å­Bgé{<~÷³aµ&;×4á¶=D~™â‘K]."V¡c©¦:©ÿÃœÓÏä8¢¶H9 “[Ò+D½™çñ‘³ù*ê”å/bÛ¢ûè¦ÏñÎt>€Ç9F»¼#XLTZ–dòUçõCûñr¸6o8ËÕàçðÕ Rgè¿WÉ|áf yšq„‚aGkáO0 5¶F;{Hhؿ ãü­âDª N ™$F„>çO¸‚bÕy"–zî ìnVÇÎÊX¹B/ ø 4¬8C·=Šüá‰A’O Ñs&lP2î,&t^'€/ R|üÏÿ0}ú‡ßÅ)ù2ÓµÎØ‚Ç:[)Vнò`e–Þ*ïïHÝI>ŸufQgSÐÕ¢c5“xêÍ»÷Ë[Ž°³~åWÝO12Ì•K¡*Js74¿ÊÛÕ†ó÷Ü4¹_Ñå²(¶â¾ÎåGçý”Zïòš}_ËÞm~îlû3ÕèËl2ñŽ(Å7¬‡—æ?êÄ¡÷ë؇ÖUìçqpx 2 ýŸÑh@1 {ÎÄ9÷üë$ËždϿΪûŸUÏïiBQ*Ä©=ÇY†ž´²½0¥ž½@*öÞ¾reÍÑgãko\¯MÛ¶f²{„7áûµåñÕ*íuáÇãÃ×y°÷JßxÙ÷¯1ý;´måózåá|6†ÛWx› ¶ƒGÎêûÇÎC(´ºöFï²sÔ jQ ›Q)M›ˆjx3«bÄbU” pϯ6ú¹2Ž…©'ú¤‚ŠI4Ç¿h?e¹¶žJ‹ï"w6K­g÷Ö6ã÷ÔÀƒfda“Eåõã÷ˆº@^çÞºøý­\M1˜7!æ\¸òDÏ¿¸ÁVÝš†ð½ò$Ü AaÆZ¸Ým×H`’Àeïr~Áíߨ b–¡t¦†Nê Ä‘ˆÛ½roBÚ^装ÒÛóÜ~(þ‹Û·’%•yŒ>‚‡ªÒ†è Ù½íábìT@p#4m4u 6Oµg"aì^ã‹KõQ<{Ĉ¸dçUWøЦßç“ÉP\zîûûšíQEà–ìBÿSˆ€ü¬²²Á{‡•„o¦äöÐǵŒ¸™öýÊ:ÉgœìÜ(§P)Z SÛ‡ïEf}9©Uho8MÂ"¨msR…«Xå,2–ŒÛõT{2qY.ç *VÖìýIÞ/,{X¤àE[ ×›ÞÜ~`šÙ‚þÉ(Ø/_á}‚ûá_æ âýõU0|wÿgM÷÷xþ ¢ì†MéN W=o½üþâyH?°Ëû{»‡ŸÖa¾… º®k™´aö·Ç%ƒDêéتїL(åD©¿ý áö›­±Oé±ÒôÚóímvþêÝK¿÷w¸À"짶~ÞÝ:»/ŽN×Õ]vÁñCü(hâîÀY–p­—fÒó/\V{n{ÀæIÂеaA¼ð-, ’žìÁlKàÿ1Îíʇ‰ÑCðô¸2\d܇­W(n‚±x×®„wíâ‚®ÈÑÎ ºä$„Ô'{Z;†› y uݶ'sÈ2Ô 9^Gyð «E–ÃÎz)¾q¥¾*%¶ªò&Œ—¿´°€1jrr«¦Æ .•pÿƒ±ÏsÛäÑý4÷O›»‡ÏJí® ­¥¥Á¸ÕõÛ8*ð[,aÂ*° Œðyc0ôß» Å•(]„p7JŸ6JŠP©ÔìŽh Ǻ….ˆJÞhnÊ g‰“eZh_\*-7„}Þðvtò5KoTϽᩅs‚ŠÂ>o0,(LÏ£â |Ùl­µÝñ…ß/x5U–Èð,ôÏ¡7>€úçv¥£bÃjðTlX9“±aaŸËQjXô#MD!–ˆŽñ´ŠÛo|·Ð'{n–„ŸSNûFùG¨²~Ù’ß¡ÙÝ–ƒ©s&.Š#w²m]7¤1yXné¹>ò ÷4Z¤‘A£=ÐêEidÅ e´ðºÚ ÿÎó ¿C0KˆŠ8…0¡ªr¨&RIy½+&6m&8ar4ñ¾ x%þCç-)˜Ðil@>¬ÔáV9Ç@b‘?k)ZBÑ鯌o²ô²÷qKcÓ»‘Ô‡Ö¡Ò®ú.”b€’aèÌ–ýa¿vüÉ’[Oàu"ÇžL*‹F"ñáµ½Oòx€áÅƪ*ˇÚî•ß,à ÏÇüþXg|DKþîîõ@ÕvpÃzFÇÃöËGE ñ(ì+ a¦„Ó©*b$uZ*!§ìϘ"ÝYeï$ò‚DE¥ÙŠ½_•Šl 5ÃÞ‡‹Ír¢0/s1'‡æqŠæñ´4»y4»)šÝ)išK”³1ÝK›9ŸÞ4¿¼YIƒ7ñÛæ—IrçQÄTѼà³pàIœ¬Ø1¤íƒ8´Q²¹=á%oÓqº¨¥1vøET–ÞûèÓŠÜr‚\a¦ÈõöíCÏíÜÄßWoã ¤\u}¶Š†ì;)ÊéVfÕ!%€Í¦1.ZPãgx…K¯”TÔ8l(|Ç*(zþI‰$ÞûHÓ#í€øÕ²»ÛCúd¨ î’JIR¡WY¡(3ö0n‘º$ÐÎÐåé^Ï@»Ëä Ù°¸0Ô³¿bjKÔ;ºobÏ¡'Ìß±–G&º¢éWJ¨æË( ‘#ðƲèEûTU±z¨–0Y\-y¨1mSŽ{¨áIGl‘\…8ø¸û*ãAôv€Fe©½&–Ö”ð$ÉÓ0i’IôœuŽ}œ äüì3=)Ó*il`ÓZlbdÓ²hŠäðpWn]2´çL6KÖ&}Wäs›f°8SÑ·®T2D-ö++AÛ]ÏíƒàØ3ò»ë ‰Ñu¼k¯$“2ËÃ3¿…!ëNom]xÃa0\G±Õ궅‰¼] ’Ô3ðèbèö¬9žeiä#ƒJJÏQÒK%ÐOqó ŠÈp’X"52·÷e8C(}e|4KÊ0ûRêä&‘MN/”µí±)÷8”¢ë<˜>¸t„Óuåaªm°qæàW—L@ÖX/QoDf¹‡óG „z£Š´ÜŽ†ø_ëâÁ þÎéñ©TS;«l†(%ÄQID›¹1AG;™Ò²E¡þðEýT“Ê\ @Í’ßÔ|NÝÅ ƒV¸ )ÊP\1‰˜ï~‹ü7⛋ŠüùV|óMåŒ8­ø7FMäͦþÞU—Û–z€ŽÙO8:Ungy=x ÐÆëŸûmZ–˜Y€0 •®‰«nMx£6û„Œñyu¬Ø¿tk•ì"F*6ÿ'_©™@¦C?BwX[À·[{¯Ú¼qím«Õ@UAש® ]˸Ezõ±@K… {[P\ª5Á°´P\ߧªÂ ±–;&ÊfZIXÝžá®Üy ÇÁ•7´“ ß¡Gk"¦:”'-[HððdM80ã³’ÍOYAÃ6Ø{òݻ䇥…NEaái=lwFâÉwWò `ð¸R"kx“ çv:j‹T±{D¥B{_$ƒz†Œ ™&çy¼‘pK„…TKPìúï­µ‡gÚ>ào – ÞýÑ£Ua÷ø¬ ïÁÖͳݵŒ^Ê0+·<Y™íÏHûýdw0àDS…è ‹”‰Ó¥S§‰ ¿UO06-VL‚y…tÚ7W~Ÿ)Ò‰ùàêým{ä9ÓÏh5ðC3V®ÇCP¾H;kê KLW›äÚE p”úÝ—Õ#/Mr±ÕÍxq ÷Èr÷ÂV}}>‡ox×..cUǘã|ÂǪµó Ÿ4…ó£´Bÿ_Þ˜`KXÐí€H¹ézšØ’mwü±zlw< l¿‡5¨Fl9yïììï7w_á _)åx[¨è±U4ÔŠ "’Bd!‡ðOÇÊa^ºƒ0èÜ3‡t«Ò¾T%Ó ‡4îsÊ=‚Æ`€|ñSsçßÞNŠÃÒ¬Øm¢X‰×w¹óß #?Á¢Øù¿çGG|<Û'д}*q,ÕgÒ—ã»týwãÉ“å',æ Û<™Ç†ÅŒwÞF5yR,U2'¯2ær«OJe‹ÒÔÈd»ÄÁö94§Îù­¥wº¸ðúÞýs%ê QÇ  óí^y:MnfÇ}Ê=¯{μ8ÒuÒzQ‡±Žú^[­Ž¹]oÿ õa`)¼“\øÔ€ P›8OÖìÈ£-gánGæÀ‡VñaDBr¥-ÆUZ¾”A¼5fɤq-E+å(^òtÿDô ‹»òŒáœŽOý~—œà 뱑Ù\OÝÌŸ\]‹f:X!ZE}øÿ^¡a&TžÔ²·¤!†ôÙ)sBuÕ¢óM ú\K@ÙqoàL§µè$0‰úVgVzŒ†Ë­Z® }ïõšÌ££ï-LVõh™¬ìMROµºa*–oõaµ[{ë"V‡Ù×ÆšÄàK’Ã.Øha#3œÚ×íË'ßñ±oq¢ÀS¤Ó­ç?o/åT¯†ûÝꦅèRM\›± ‹f³çúò ´.ýôKÚöP”·÷›;{ÇÔ6øßá°å¸¢üâç»úöö6þÙNݧ“2ÿ¯Û×N踖rûÒ~RëœZY¸ fá®”—…iˆ¨© ’™9 €ÖŒÔ¹õ±€‰:..§_) ;Ð0Ñq?‘ŒA;‡oHX½ÎнÀäí7»QÖ?‰s·zl’놿7~x©í·;U¦¨œ„ næöúlÌC’ÿ©tDIqYêÜ/z»TZ,Á!¶[ËÝöh ‹6jÂÌqà˜ MÞ—#gÙ™ ‡Wsƒ®H> SÍ Øk.zÓ3¿{¶Ódeü’ÛnãZ®7c‘'ÒMÃ<“ã²ÖgEÝñ¤ÄÊ[)±àˆÅÇMÆã]ôLJí&hí(Áš¿ŽøBÓï7ѸÑG”’:¶Ä.ò˜åiîùd{_Z©=]ôYæ’÷ lá1=è÷C&²´ZÕñ@8X­*òõ´ð ±ô¨*¤ñ´k§¤’uy,•HLøàuÏ£“iIU fB•.e,FË»Àœ7ŒA¦Þé‚R(°±h‚=W\Þ € 8Ï}GGžàØaÎ%} -;V„¡wî @¡#Þû.ÐSý€sÕÅ("I‰†½­G""jŸvAk`Qr<[w¸“?5><¬­4>‰õ¿•“¼ Ö+æKâõ[ñfYõsÑÍ|éo©—Ê¥Ö+gX`)+ög] †Øk ‹¦y5zË2žZ°Õ×£ï ‡U9mÌ°Êñh’ñ<". Ô·óÂP¦,y×¾TÅ8>–Œ!w¼œ¯±ÈdB‘£3¨}â.?ò{UÜpNìÌ\ôýß¼NI‡ÈˆÐ½AdÎ…2ä$\ò†˜<¥û?ZÉc®ÒBXõдüCkšg*õ·åz§"Œ¾–NÙÆó Q+–`Áx¿VK1‡ƒo°·Ìǘè¯ãŸŸ óKñ©”\Ñ–~‚(½Q®,ì§ÀÿEç^E¹t·+ºþôÔëzì Z}JIgËɯýÂúi®8WçëµEn¶J5Fï\2Ÿ¤¥ 6©Ïõ'¸ðL­ƒ£Ò­{½·ó¦é,ãûdF¬«ôÀW0èz¿Wãa¹c8Q§Zö¶%Õ…ªjoKöŽ×sÑÑŒ€4$ô¯–O‰Yƒeû=Eæ!ÔWºê+¤{“€ãO£ü¾á’J*WžûN:rG˜ìÐÁ'Ö<<É2¡˜«¨píaŽ ß…|6Ö/–®ë%ªù!‚¬ˆwÞ í0ŠŒÔ4éy—#8Ÿù¸ñ &%í@. íõt!…¸!*0R2qlEœCLj²Ïù¨/Ý÷?—ß0‚e¢ƒ¸×,ûÈ"šfo㎘8Š`à !hwVV*E^4짃‹ÜIá^½#îÿ@ªòÒR£,VÅ&HÕS«Š‹Btc'yãiòÆ/V•”ë¥pÜ GC|ð¨¶Rƒ].í>åϘoÀ-J{/°4Lr4K|¢ƒ—ø³Oøæô´ÇÙS3vj“Û5‰dÚØSX „§¥×oŸ¾YnTËõ£Æ Ɇ3am.º¿WÆoüœ¼ñŸtŸ¯döùÌD¾_)—•YÆEžª‘§p³¤Ë#P;Ý.ýŽÞ‹"Á£àpÊ&²½áÌfËûûͽ—ÝÜÙ=Ù>ÞC`íé[R‚ga ÜõÂ$Y±þöõÓíçÇ'o^‹7u\©à/2§xÃy£ÄÎÖéV}#¬¿¥GÍf¿×lêp‡®¢‚õ·{H©¯·öNÑtgXs{òuó̓̅ÐxÐ|ýŒ×Bºyé¹æë-û?®ýÛCû{¸Ó„ÿ˜ºÓôIæf"IÄ¢ÿ‚¬ÐŒÎÕ·BœŸmÞH«ÈsθQŠÜmv ó… Æ׃®ßöGÝÎÝ‚8?B9Æó».çAö´ßõÇkØì0’ááÔŸ4›âëv:´&"Ž£ÑÕ4"Ýöv­ ó¾Õõd+Ó^QÉÔJB,W>W Ä•Ý r\×9 tZ¾{0N>¡*„÷ëÙ( ÄE9-L²§XeSÖº0g^ uv™wa›‚^„ã"Q$kPá„.]rë01já]µH|¬ nˆavðH‚·ºšT¡÷雚¼¬Ú4ÿf"> þ!•lŠ­Ãd"yÆû >W^{ù¡ r4áêoÚï¹:ý³º…ùaG è\Ч%Ö=Ô«ã7YñtãF ›•j³œ—5Š°@ò2J~Àœ¼’”u«°¯h¨EƒVáOÃ0ëp©Löº Áß•#±×"l–b9 sáDèâŠ3L´ÄrÉ·r/D RÙwuwvßü%9Óô[T\'·)X¢'ÉÔàhwßæß|‹•L}¦Ý7ApÛEŽüv‘m«øŸõJâø7Qp„”`m³$åÿªÀ¯2ë¹,;e¡ðr‘ºrÓ J^#ÑŸù&Ý}4vÎ/ã?p&#=#ãœùSV‡M™æmsÜÇ|>ý’L˜ÝÝ 0%Hß+©lqÜòMK[´º¨£U…‘;]™d!üãÂ…Ubö€²ƒ!L“kýQÔvœA“VT\)¡+å =F hª„Þ#F‚FÔ#Ò!aÿ +NAFl“Uæ-WzCßþ7 £Ã©î.cNš|[XQ¢Rái_ŠÙ?ï¬ï’lEg±±¤;\ÆG2Ñ¥‹5Á Æ ÙÙuÆ¡ã~mp§¼ñLŒóN†úxëøß”£ÑD]dÛ.a+Ø­«Î÷ëôt· =½ªÒòÙ©ÛŒ˜KN3’Z0;*}—gí9çˆñ‚$âiÈLJÙeÞ•Åo„S¡ý0–‰‹(lÔ(/Ò(øû¸Cª8•šJKŠÕ탬ó£ÜΊ4ð9ô í4‰÷^7ŠvØw°Ñ€q Î%ð´¶ß@rNð]aks2–N“ÖKfºˆ,{A6Þ«6Á,Š—tTaXÍ)%­ÔDÏëµ€}ku¬Ð—Ñ&Lù"± ²¶f¼Ž)`Dâùºñ‡¦¡Ãgš·4'‘Gr+&e‘^=ýŽ–ô3Wå¯)IHb«•=«ƒg­ªzxp¢Ýx$™D݆Q…°¦±×'±Š^&èÝ8"Ckµ#QmÁ•ò#| ‘YÈ$ÒQ§$/ÁtóEÔR4Ðàós• ¼!¸0µÕÐQ³ŽŒññ“¯O]—:ŒB°±Õ ƒšJß‹¹†˜„l?¦«Î5ÄHš^{<Â*‡ìj£e$žÝŽÔÈH­‹Ahú*°‚3!w»tJeÛØ»vtn³¾®iÕ%§+òôý|öÓë¡acé¨kÓ:Øz± Íq~&Öïkî?§“¦È‘M&mÄ;(eÌ™óºÆKkÔQªnÈzQGFʸj8þ¥8f†ø¬ª\7#-tåw€«–­ ‚h®òg\ ÕÍð<œ0šÝ-RTº>¦99—FXã´/‡TÄ'Ž‹= {}Â?ЋúÎh¤Ì$¤_yÖÜ?ÜÚ9<Øÿ7³(}5>—£À@Š¨Ž¾é«¬’!"ßHæ.Å%[$'Í–+OfPãÌ’U” -'‘ë)ãªd(aÿc/3O™m¿›Ìßµ2^C½šrnkY`*,Kˆé†I% ‹U¿ö4¯>ÚÚØ»§¾R™”Z¦$\ ]ÈP¬æ±#Ž†A ®24¦¿­éJ¡ïcj‰Å¶Q¤Ð"ir>îâ´?ã1¬£²„ E¸ŠòèoR* ¸ߺT°CÆ}Y#Š¹‡òÐÏ•~ý\žÄkP½ºÄK¢<á´¡¤~Ub  ñìp˦ñÉÇçCôÜ%;¬‡"7À×)…ªÂ0ÙMs·k«íÍÀo» ˆr˜Ð ·Ý8L¡£&µO­à0ôƒä(`}Qð v¼»ÄÝïü\Fà×áЂ ƒ–KœK),üÑå’GUM‡’kâ ñBz¥{—óÒ¦x–þD´ëØ®‹áÃfÝ™¸ý°VÕ–±ÏÑ–¦—®ì´Tbß-)ÚÊÃâŸ*âUkN>™È4T üˆ Ý ü.HEœ«¦zHÓ[nEAv#æ-²HD¡šêVMxTŠjÈ%ç(r¡«nßKµ$CÞc·Aûxí÷”‡V%õ]Ò9BN(ª³ êô@ ƒPÅ@ìVã71å©P?61¼Û¥ûŸãé.ÀB Žùîç²"/kŽv(Ðñ‡õìt™¶•B3 TfŠ’Ÿ£ u#*$+ݦ»h2ÂÛú×ô_¨ý•0—UPˆà{96¶¢tÉŠ€·0·-ºÝc:º‚në˦XÙÕ¡…PA¤ieØc¿b ¾9Cc¾À„cÑ›o ñ'L7cÕîCJÝ¡ô4YÃïw²45ÚÌ4K‘³;]=G3§Ï4.%"vçsOœBùbCKLîwã2c©Ý‰¦&ù!”÷š˜"\è–d³xT‹¦jf·ΤŽuz’³:1ã'NrWÎñ9æ.ȇ<–l mt6R2sÅe奉åˆ['ä9ðcP»W>ü{”.-¯íÓ.H-åÜT!Ñ¡’Ò©L™椵ú» `¦w˜ð]¸Üñ(w=˜ £V´î9¥/¦‘R/GìŠêàø×&C˜rdQlóî¬üA>ùÔÔ¥AîÀþˆtN`,Lö‚§²Ís— ïùZ”FöÄøä•e㈇=eR×Í §Eœg-+æ£ôí[g¹Žž_uôüjDDËß6V¾%Æ r`ÐU¬g7Ja^aÁüÕe£é[&É‘ù¦µ!f~ç.j­ð”K:P1óS.½ê¤‘øèO:¡Ê˜s¦©œ>vü×kïã`"vñæÆì+£y XÁNÚ´eü»^[èÆÓí0ªŒâ쌃§Ô„:&Ì8$¤Wõ1!_¼ZY‰~ =mÈ9ˆ„q¤ÀÞ˜#ò™§Yˆ½½3jÛ8ØDávÑ2Âæ¼0]X÷émUåã't{IýF[¦+Í?QªÊ¾ùh ‡l”,IË"š/°0š^lN°I¶2¶ÈÜÅ¡äÚ GÙtîÇ7CñNpÒxgͲ§Ù5ãdM/J䇗òÂEO=ÝU˜,áÛ‘øÝÙß'7~VØöZ^b.«Ö§ÞòÉl—T±JÙzÖó6Ït5e¼qöYi±]R~ÏÊ'?íÂÇÉ%ßn“¤uXÃËFY“ŸþŸÁ4¤ÂAB7¢ˆÞCZå:ƒÿÈó·tAlˆ0J$GuÛuOÕºbZI”%µj§óa ¥ûà:¯€÷ŠÕ/K…’|_uü¬ù F$p—Èg(V(ùAö¦•Â¿QþQ'‘ò+¥<Ít»yƒ‚£P<4¤ÔKT—n÷³F¦‚uQ Dò$5{K”(§_äø¹Í¹K‰é$GT DEð܉ًÑ$sçÂAãjnÈì¿]KiÕn.ê•3YJÊðXêúkçMÝ®_T΢µ#¶ ä%‘MäŠ}á÷ŸÿµÄ´îQåe«Šv_·©e¬’FÓÁO£W»8KþLêéÁÕ-;:[ûOÚBñûÐXq@ãÖ:¹×t4â8pGx®óâäçm%OÍþŽ<æïe&Joêicšð‰r4O˜Éª8~¶"%™$:ÿ<Ü,ï=;‘·áj³²¡óp£†=j*ãG” 5ù-šð•²AÎH²+ïÎaKY.™9î…OœÐ¢òóHPŠa>öQ0Q²Z>h ,YÉøYi¢^ßVû[k¼„‘;¨÷ÿ“FçÛÏ¡oi²ùÊR9ï‘Ð_×Ñ÷J…‰ð4„”Ú'ÿ>áv:“êLä•°Ìéô±ÿ>Ö?‚$äߢ›×þmËþÏ›F£ºþQÔ•èù[X,*gñù“µQÍ1É2„Š›¤Lp¡y¡?b%DÖêhð5jJ77pÛ^øM5–hR“Ý xõ$E9¢xî aªÖÛõ£ãÃçÇ[ŸWÖù¦ãLîV(H mÛò}ÌBæÖ¼1ÃÛØš¢12· s×­ˆ”œ±`Š»€æÉîÑÖñÖéáq]Ô/¬³œ«ÜJ³ÿ§`BY¹ñºmÿ¶ ì¶^¯ä#H.bRÌÙ«B§cƒ6&R©ŒŠ—c4IÕ.ë×´¹Ï,—¨„ ¤µöö…ü‘æ;ÿMσ„'1e åD5û.Ûœõ4³–‰Sz9”“fFÉV¬*ŸõiÖgú¤|ñy¼ã<“7€ ä½é æÆd¤¾µŠa#É©›¨(:âÛßÄJ¦î­9+ÎJ¢Ü™\oÉ “ªÍž\˜=iÍy".Wu-î¬{Œƒ³K×7þ"KG®^!ýR›ÝÀíxCëOºÊ$u„ ÌQ¨´‚`T¿ z^ÐX »¼W2npì¿Rr9Æ~0¾þç^¬<ÔW+rá{N>ãÊm—X!„­[Çp>{)‹GºÈ”¸—wÙ_¸x$6’ÈNòEZcüGé?§ç¥, ËÒ"ÅÐдãnÁ,É×yõÙðdá9q®R¸fHú×dPKg'-_Åd|‘•qžuQ©0°A¶ŸŽ^¾jb´[óÅáÎn,éUÑ©®Ôlëȉ@)®ýfßµT3æP‚l jÊúl*Æh·Có¦UšÀ¹¸lQ6GÌ1ì3Œg?€á|rúÁ_ÇþPbüp D‚ПfLãf•ŸŽ0»0´8Ëû³,Ânp»½13r*rzèañøñãš` }Ú^ÈéP„j_¡aü˜ëw 2yè_\rêxᎂnto0þK‘S›øÍM (Wo3…ûׯ}©Àè?…V–4³íq¯‰GεtØYKG»5>‰ÙÝVÊ+i’:W¨wùPÊç”λ:Ð(H#NæÎÝ("’h üÀ8Y(HÊÄ^j=^X¸#¶‘ %qrØ@Ä+‰Mº)Ùkö±þ]2]"Y3†Q||À©êX•Mæ,ºL-LoϵϗÓ[cst· ú*öJ†Wþ¨}Iê·Øßaΰ­~\¶à¿Âú¸l÷p7¼Ú {þï?…eØ(’Ã{=÷Âoo>Zµ[þH±Ýgêý8y 'Än¤?÷¢_~~èÃWK¸BþÍšÕ!blPGØC:gVaØ>†IŒ‚¶SÃxѱZð91#vá1F¨½o¸.3ÃS?öДí¹@¼Ë:hŠ¥}ß-㹂 Ë(þ^? ºÀ`¡ºÿýª¿ÝÞ©ÜîÏäW^,v#N‡ŒG¨³w;¤ùPø3¯#ºÔÎióøå$jàJпMj¨)ŒÌ¹Ùrù wѦ쪒öŵäƒúyl šbVzcÆSl€òØ(-èD¥ˆ7¨ðΠ†e•ÌT²ïà€á<ôFãa_<Ü(}*1EûJçýfûúº9~';¤%QÞ,c ¤X*>ý¿—/ŽÐs"Ñ·óу¹;ô@Ùà,Ë^µRÞBDò¢Ä;÷ñÿ‡=Œƒk£ÀŒ!f ar¶¦ŒÊf¦4ÎI/+u%b ƒO8µvñt)OlןmÅY{²˜K›,bÙ d øã± Å–õZ ãv°;Ó¢tÏ@lŽíbÍ¢&.ƒ+T%¹jh a»ðhY!—o…h ó †wX”($moH¹ÉHÖu­0jä½ëw9þNâÓk•HJû•°ß+Þ}[¯ :¨ÍþH<ó:ÁÐŽ¹e•Nød­FÔ•E 4ÒÅ¥„kÒÍt ÅÆóDÔ"$.tWÅ¥ª…Ò‹1ÚTZ7Dˆƒ#±EFì Ê w˜X¢Z}«êÄA:¼ [ÅÎÍASõFízDÈ08cNjZW†îæÁð×ßJ¢.>H¼ä¥|xÏ—(° ˆmœú64ç¼Uòjµº!Âw°ÏØÄ°´OIÿ¼UÕøu­ˆ$k÷ Zt–눿þzA¼Y¾¼j»¼ªw6ÂúëõÚÂt»ƒëÍ×o7ß,—ëuy ……|dÕáÌûõQŒ†¢ÒèWüßÙ$;dq‘|‚U‡Y|â_’äˆ4ECŽLMöNeIÁëø!ÙSv³€S6É8Ôð#¸½x'·ý(äÔë¤ßWØ=%•í#® üv"Õ<‰ãÖï<™R£=„y¥ñ}CfdvÙäúجZµ‚kÔ¥Zh~Aj\PáCÈñÔ’˜,„[Ãàr¶-»Àæ&71wÖjèõ@@vøl÷Š[ã²7–ƒ†Õ¹?Ø¡ä¿…ýïdèÄÑ[4J=í{#T>«·<^æ&—¥fTÛf3 7N=Êt“½WG‡4Äž©!¦;ñÀ==Ù¹ãÀγõd”ŸüÏbãÎizvÏ›Ü*:}ºíVr‚= ï]…Aøäy:û¶åÖ½„± „Âå_ûÎzpóÌín~#z’½»è=Cìá&[:óZ3ô/ò%àG¶yâUß„u6¥|<3ÏÁÓãª%M†ïÍ×{”¤óÊÑ»™A¸ªâ÷³bÔî8×ÜÓúj”±„KA2«/zé §ø]ÝŽh±)<㳚Õað‘¿ýM£4Ä°ùýfy‰ã1ôøEƒFZœÝŽ]åÒý¨t‚ØÃW[Â./-},Wþ°øþSµÊ/;¢)_•¯õËïÏS;“©"0ŒÕ“ BY'jÔ‘ßzœžî>ß;ˆÀJ lÙBíçÛ{%¶_ííïsxŠ9y%¨J VByÞä§PîSTË|¸˜b2Ó|:-är>žµáDŠ*°ˆÇˆ…þã 9§t*o©uåƒ@P‘a{èF˜L¥‹iK¼a½&Å^ÆD›ðŒÚ@U0!""ù# B¿Ú<ù÷I<¼¨7î_ XÀJpðŸþ$¹ A%B±Å¢‚ÆäÝxÒß²°RœtˆŽ«ÝPctfÕì½Ûclz<åIô baq]H‚qßd¼çl”¾+¡> éSc}Â8âgAjʨÄòTêå:.”‡Ö0"ZÅ.`Æ]ÒæN,nH–T%`¢ŽGAólQQ9¡”sZóu{úAßö®õ gPÓk„æ71ò\N%F/Eé]p5£ƒ á@¾G˜&H}R&ÔŠÉÍŸð•(œÅ]gÁ•RzŸ†qˆ¬Ì?f É¡Q„Tf’(ãµòOG7ÞÈv˳#Ömq1Þö&0ðéÖóŸ·Ž—t7$ÚÝQú#»çz°ö‡Í}sX$fžJ?ÆÞê…PzE`þd;Å~¿Æ‰Ç<ÜƘÈVÈ£¯;á,¢qQÎ)!¡D­þ0Ìÿ¢ßëyŸSyø•ßU_¥ t‰ma›XjMHšTeÛæuIÌlýp‰¢&¬~€ÿµªº5 2ŸÖã D’­ËåžÃЊ"!×{V‡6›×;+ßË«Gx5 ™~°NoF˜ÖM 'Ù8õAõdTI§GÑu'sðzþ ´G×¾·—?â5]Ê4î¶aÍ­ñsñЊ³‹ñ–®céùvS-ìÆë$†·‰iAHÑÆ8¾Ë!ˆ&vf¾ðß{À•jrA¤î! ±…¦;ü5bN¸¦—)ÇËoˆÓŸŽw·vNÔ(£çüì{Òs‚xEÊ„ÐeáÚºA­¤`ZôZl׉]©*|F ò{v ‘Ñ}B`?5H­‹z} ]ßMW½²$G¤Q´åÉ–6Qo«—Pg¡=OF¢|Œã˜KøQ…þg4>Ɔì(§vAê;ÆÛªªWˆjÜßPtL²lÅì›ÝÚÄÁ¸O£Bn.ûÜ!î=»vÏÅÈ"&VE›XtjVŽ½µ¡AWRˆ] ¹'¼~è×®—^­rêõ€¬¤–.è”ó>ë¡¢ü£°Žä[‚+ñRÂÔ\Þ¼Œ°¬ÐÄã¬%.h\ÜÍíAwâÿŠ»X›º{õÆV&çß|Ãïãó ò ŤZ*¥™ŸÏU§³¿wß]ájÌ·ES>o6õåg ¸ƒ@ÆEÿÕe ¬û»„‡,xÏ'«mÐm”dvù2×nÊŒóMø!–ªâƒ~„Š•Ë*°ˆ‘Wç¥t”$ÅHÊu33L2Ñgü¥Yc3B%¿ÆÉËé‡ç-˜@ïJ”Ÿ`>H’rB¸¥³áƒLãO%œ_”a6Õ‘õË£*ö"Î5-´—õ­ÄkI  d¹~0˜N±\&'-ÊM‹¬B™¿¡F_¾×SX~îìã~u³DgœŒLÚaØ|“æYim{Ê“+ŠÇLÅN.™Fa¯S׫}¤ŠÅ¤už ŽVgiÅÄN¡esWI’ñ¢ôtN;ÊIµ".ˆ»+ïLV¹ïå 0:T–/™/Ï/а:|vE¶!F2>”èÒÒ5l“°JwŽ ÷5UŸ8AU˜û¶¨£€ €µÑÜí ZØ;x¾.Öîõ ë·ývëÞÁÞ)è_í‚@»ASBTtVš•é· ¶ºñi#¹•1¾À}W' û2aÖÌõ'rçÖÞïRyþá'sûOGõ—¯ÄÊŠ8:<Ù{¥T²ëíéÆVrÀÅ}Iè¼ót&}»¹Ý<9|y¼½+V¾ÿþñÃ'ûóÏùM¡eì×9gs>g¥mt8² [8²tÚ‰fɹL×ÔòRéŽfÕû™UöÝÎ*{žYe¶MÅO_‡G»OOv&O»ØèÙrìôÓ­ÊŽl•õµ°µ2’UC•ÞävÝÿ ¨ Ž€ˆ¹ñFâ|l¤Š×ÝGž(Oï²-Ÿn4nI}¢È{;U÷OÛÁ^áf²Æ;ÅGWý»°˜ÓïKÏü£KúmhëžçðþgÐÊÇ–ï/ûg|R“Œ‘¤²%Ȧ?ðzã °q}‘ 4xïíî¶~l+ š3"T]åÛz8¡ò8ƒ+Å4ò~¿·ÓÅ·)Mðº{‡Ç?ù/»ÇÝý¿ìŸì—ìÜ~˜[úÉ·Ï\ë yùYæ…ŒJl ÍGmþù€Ìê@ûNqSY,Hºß=t¯Ý/«pÿ­óŸyoÙ—'o`‹”#¦‚jXg1&{àuùZcEÔÓŽ¿sÔyq¼¾¦R$FÓjÏÙÖM¥Þ{æÊ2çAt]fGän±‘ ý~êÊ»K{°‡pÛKm ;rtÜÝëßÂfÝÏŽ@7®KJ3ø3—Kï1Ú ˆˆã£7 eׇk å/cÈ^ð²6“`ð>¸µ)²&HôŸ¿Ó±'‹¡j0M$öĺßs+„ÈFq‹\kHpÍ\£=šFòÁ?>:énY¿_tvûÝ­Úƒš²Òq âûlY¶'É7 -ÒRë&³m–6zXÐêáâf]–[ÇE7º ™×¹ŽUãîÖÌvʹâr}rh!Ý%÷m®G•¸CEõØZ;ê¥óx0@êâQE–ÏñÝòÁç×61Èô_µ¹ ­ù@Kûó˜ãØ;Áí­É¯]M«ÍåÌX­d¨RÓ§+Œ¯_Ð#¹W/`DáÙü‚z‡.F IÂ.H¼èívo¡¤¬“˜™wxóÙd>ä ÀMã(¾ —êûÙ€¢‹^ó5§AXlõi•Ì¸­$£¡á‘Ì ëyçJöäÿ{’ã,kö=ð¯8‘FÎìÐ|º»a9¸ž43ƒÕÊ}¨ÍLïÊì¾íï²vf¯åÊXûŽfçu÷ ÜÛz=µû¤yOV‚öÂã]áïfù»Üo³^·lR(álÎÅF36è×£m߯`º¼…áA~½¨ ÉÞˆÎûßaÞ}³Ù=Èí´ìGÇ ÕùÊûËkP˽-pë9WÞ’{ðGô¼ožOƒqؼ F´ôo"âä'£p,™Q’÷D!!ÎWñÎÁþ±ŒO¿ë÷;Ûl#z³»íÅaD2&íú£Q2¢:ì²<ôOöû'‡‡@ïh"¡´@Ž^X ŠI‡[ 1qË]¶#™t‚Qþ]“ÇÑ?Ù‰^ä0[ÒEÞïšSÞdxi?èæ9Æ@ÞƒYS5¾·, #s52R…r>—óU9‰Y‹éA‰“ƒ-RÜ®´¬Ž¾[ºæy¦É†ELzž…ââ óŠDä7ÝÆ3'ÂBq¿0ŸÓ$4*ì’T,¼²¯Jö)Kô’€¶(ºÊÁº•¼µh¹þyö–$%Š&Xà}&éPJ<,¹ÙË}¹ §ëþs_¥°3…ÔJIIí”›åFx¯/q5P×î=ó.Š2id{ðä19Ð`ÞåÎó^ºêE³Zê£4UäÃþ³§ ÙxÓØÝPx–ò¥O/¢&§6'§8ŠŠA™“Y5Á Ãùã;«åõfäóB.Ò!Æ2™O¼q€¸€ o0Êɤ‚øæ*¸¡¸¡—bôë‰8ç5ëƒ[Wó)^z–ã·w?Òk8B PööŽn¡ÂÜ‹¼Â†#Ÿ ÿ ]Á`®ÿëv'/0Y¿Rÿ/ëûïèù¥÷B±»—ùüŸêã¥G°À±Ë)SîÍe»Å…ËQ6ðáÕ¾\Zâ—ìè¨7"lÄ­Œá§°u\£¸ãdÓnhZ§\–výñ ·C”$ôÓ¬ÎÛ<•š¯$¤iA=7Ä¢) ÔšÌSïH¤cã‰c<ÿFô…‰¢ø<6`˜¨íJ{š·—ôÇI|1 G–lµjjÂ^7)¬¾øø—Tåÿô%‚g5¿äUs˾ÀiZ8žW»~¶·ÿâÀå­«³JSÃ^çYâ¡ e”|aŒ…¢¯½^¿ßÛé4WÌX±phwÇ{ÁbLrY­‡á œ‚÷¤%¡‰2âGé†~7ÛÅ`«ùz´Úd‡kX¯á|f|Â+ „î¨Nk ¯xçèe÷ØïnÀiŠ“jQ˜ ÔÈ4QAPŸ‚"¿á÷’ÀøüâuÁMÏi×|¨J¬Œ`8ä–ná´®l¿yÃþìÚïÜ@PüCœ4\‘g£P{ 5ÊÄ•¨P’Hpp¹öV~³ZùÔV)gW¬bJÚªz [‹Ÿ<Ok”T³PoAhœ2sûp÷¤ÿ×XüÉaŒLaÆÙòKp®wé`™Õ…E¡‰·bÖ¢ðþ¼.îˆùdðè‘>EK0·ùJ¹øDøýí­ê»ØoÊ^“U5)ý›†Ñ ìœÂïò.%$aUYĈ\,Õœ©É/`Š”çÞ·òÊ•ç©ó$#7oúlÙmÜ«€62]à7NJmd8]zE¢nK05‘` ¿LáʃÊý7qÃH„9¨KìŸÒºÎ6* ò#µFøá2K‡÷áâ›Þdkå·ÃÎö—ݦܲŸ¬ &º¢:œìÄ4ZŒmâ~ŒõMŸÞlŠÑì&É{L"Ž”¾&Þ¯Bï"™Îù§I¹#ü€¸ð8FxˆV³DEñ¥X£DœFçéÖJïEÓƒÿÐ¥kòû]´è8>8ZUº&ŒÞñž¥MzÐ$pú‚jZ+_èÙ³u(,<©ù…—Ÿ Êzu0f/9¿Çå|åš L9ªbd<‹çÝÒ››kæî´¼I7KÅç¾rp<²,("à ¶Â’H›C%ãTá?%à‘uv* ,Ån»”´ÁXÆ^¬Øš¥ÌòjáM¨ìŒS”‡~ˆÒè,E³›­Ëh8Dù;Ë!„ëøó.·ŒÖ4zw®©[pÕ•J'Ý&` =Såÿ¶ Òtßçîç™ð‚2¿‹t¡0³@œ™ëF¹4³¹ûúÇ^¿÷¼·Û;þÉÕÛÙéî^<^¼bŠZ´ÁìXmæ=‰‚ã)ˆÔûUÉf™«ÊQ h®=iÚC‡á=idÑŠfb/<‘KCqÎ&Ö€Ò[ËÞÚ®¦Z(xdkÚkºÞZó^Ž˜ðy§ÝÁžè ýÜP½Ñòú6ad|¾£Ô²"lY¯þß«åÖ)»¯Éè/œGŒs·~þöÏoUhÚã8O;ÏQ¬SB£¡[ß’dòqëÏ”*­ÙèõúÚ#¯Ž”Gœ\5 -ˆ?åão|Õ€ÿüä¥ÿ¢÷¦»Sn‘G‚ø‡M'ì¨!-Ȧ=ë`«öN•¾úüÍÇ·>¼Ö¬¨®_gÈʽNï(f‘r1w^.j¼¼Õf:Íü?¹½vÑ”žìô¿y"ÌQ V>‘20»Õ;tY‚=ekàk&ù¦áEêG±OŠ{§j&BO~€sQ€trÜõ»G$S:Ø/È=3RI—sÇÎzOˆ'/¿ÐE sV$’ÕéSÅ,’‰Š .%*rjl–EQ¥^XätJùXj©öMqÝ8§¯y’&Œ0D†ZÿM·ûæ(™çsbx€E¨q:%ôÊô¼NŒyf>° ,b…Ù`60:F€ê À[ãU­9qâ›_…5 >&hq1dP€¡4x&¨}›Fä ­õìÃ9:Œê³Š¦ÄÒD‘™B ¢¬?n}³†™LS3 tËžrU©fðLÉEÀi‚aâDÒ¦¤úYt5Ó¨º³pv…ÎHï°á{wÕð ‹få cü#fUJÍw5¨6J®'ܨÜÓ¸Jme[‰T²c‰¹éÐ{PéD— ´—†•1ØÊ\êMÔ¬[ù•p(¯# ^QÔÞ"« 'XväDÊFãƒÜuµi»·y¹ÏVÛÕóÃØ‹i÷*—÷ @U³®Iÿù–E_4²9køC·{è?ïlÿà•h¼Þ‡áÄ?Ê՟̦å‡;Ï_ú¯vŽúèFT„%ÜÄÄæVpC¥.òJßëüÐåξ<꾺K¬œ>*~·£mœì{ß~v¸ÇÜgg6Åä+dñ3¯¢ø¶Ò…uY q _×û qSÿ5º›ÑYÑR»!·Èïh:”ÝÅD¹Rÿ©†DÙ,°'**ZnV”/13Y‰c®"¦y~ÒÛ=îí²:>êlw¤°nFuò>3\Å6¡~–#¢Ko,¬h©8@0ZÁ9K]>÷‚I·Ž²µ²èól´ì…ѱóa±—Kâ3&vÛùhçáxçÕ‘phpëÕêª÷5~kà½ú{è ={~†ûä÷Õ=(Èëë|s®¸ëÌçÛX;ºÄvv;;;G‹yYÜ+£è`ßÛc=VŠÂAtÉ¥8˜5J}D1¸i–µMoÒöð‚ò°›â«À=,I ä J­Îãaf%¿öÆ˃ãíW äç´”*94é€r#1®€zN‡/9™:æjDõ+N¦×Ü¡€ê¨4w¢'ß>óšcØ,£ðXóàqÆ}Èåªä·ß¼)-&Ÿ²5KpÍ–Öø:—΀ð¦Ã¬5€i<[Ìišæ|¡øä×àCЄmŒ”|u¡ô‹ûvñ¥Å¹šer§\ÁÛ¥OëüØñ_ôö;»½¿wŽ Et 'CO5çñ ÂÁŒ| ΃«rj,=E•Ëf#[6‚—0d]ŸUéª.¾ ¨ä‡¥T?ý=fµË×s1Í´ð惞hÿeoÿe™Je‘¦œþ6EŠ)zmŠ©µ™k!襢vúýîR>ý;žñ<“Å#å2K‘‹oz{'û{CÒêõ_ìîØi´‹ÇÍ5Ù¤®º`‰ñæÙÛ+ºr–r—±#¼†“L“yÌv‰Þ iÒÑÍG:Dù¤ØÉÃ$óõãƒcÿ`¿Ûð΃h”–õð5¤Ëdr`õsÉ0ioYšëOżEnIžé+þvÿ¿le¯ Yí¨)«“°­a^ý1¯ñ­n€‹W9+"£Äå„e°v{ÏìÑ÷®õ*wåf‹óm›«qËE{ÅÆÝ Ï—YúlqñMÿúè¡XÞþÊJŠŠÎ|ÌÊ1ÓÑÑÁ‘Ÿ±O¯Þ2Pö‹l&g¿Jfö%8Iñ¥„:¾UçZù¢ê›^ñ{í bmÇâ’ùsƒ~¨pgbTïçÓ»Ç}›Û@•xÕS³Û!^Ï;˜¤ð£©ÿá§27Sq«ÉÅÝ‹E8ŠÎLôä¿xÞsmRFEÑU¤sÄu­R3? ª  Yú9m.eìçÔØÔ{5÷i‹$AyqnéˆiQÑ*N¯B>ohÁq°rËózç(bR£_%¼ñ5n0ÖwÀÒÕpߊŠŒí0àÒ~2 7P¢Ï‚kV©zqL½y^O€%5Šfûà°_õ€µÓ·bH´q åß|–`¢‰]©Zã§Þy$Ò6Ìëh8ŸRBè\=Á ]„qÈÖø­Š„Ȩ́œ–9Á]ðx)D—ëÄ·ì5>)Ÿ,‡úƒzØM2t|]µÌ»è=`´óhŠ¡Étˆjc¶‘·ª}‚1 «Q%ÃEØ‹ƒMÙ&óbŒ=ôüdç&à ÒVº30ßx Àm¢€ÛÝZy|OaþŠ@¸Eœ¯Š•™LØÁfnïgYÀÆ .?Ÿž¶ß¢ï/üØÐéL«[U«rýC^ @S/QÆø†–˜§ÛC(h$`â1@OIѬ\Å)ÐuäP”ꆌñk…,©°Ce­§ë™kT1U=?n±+¢NÀ((ÛGµš'êñÁœdø!ŒS"›ÙXµÄÖšèVÚjÙV,È65T6‹ªgìÌn5>É ÁѾÓQ²¼Ç¬ù{Kú“›ÎŠ1U‡¢VÇW Çã2tÖÑqw=Š½Ï2j÷Ùß¿¯M¨’k;Ä_á˜ÂçÉÌ^j«··¡µÏÃbÿg‘VvJ>uea-‡Àr‹RÍú/2»2+šÒÿ ”–?¦ ÆVÉR,îÎù $—ß…y©\-³xéë‚æ—³6„½þ¸ÆšçÓÊ<2ó=€264µ‡!¡Ñ£&®m¼Ñ¨ÜÝÐgNáð¨é\¤k™~Ãø xVɈu60Úê­¶>÷ˆæ>îTíÙÙbî¾¢]«âÂg°SÁ%CëcßGÅ·í>\þ8Š}@axú·ÖZn­U¾¸ûU`îrtšy£0€†®·’miÁuqWPΕ‚<ƒM¶6›ÁŒê7¡Cm–BRÓòÅïíxó-Ý=à.<„_|ឪ/Xeé€ò̬«BHœä?9¼Äýˆ›Û\H˜‚Ϊ¹ÕR.="ÁîÂŽÏ•Ù*ªWñŒ’¢”âÌÄð±qÜ¥§â<°ôÄœºÛ/¼ŽRŒÍ ¡…ˆgO½ÓªY’S-’‹ª¾Lm«rµá=暀 0>Æ<ÝZùKÅ[¾·L½¢+« S[µðk(³ÔsVº ïÜþS´_·ÃN%ØÃ, V÷È_D °F“oíMË:óõžú:±¾Íc@Àá0‡­N“EüÂÍ%Q³uþ»±þ°E+ÙVRëß¾©,±ÖŠ)‘5ùq~å÷ÛZëñZ&àÝxée2qªÔ×qlìɸ½0‹ñ³AÐVTq&æ Ð,4ŽŠÄý¹å&€jf¶¬Æ1Å»âëõwnس»µ|ߦ`n¾xàΙMŒa}nD\;F/á òâåjò2ž’`Ÿ1ãô²a {Éû†R,y%§.ƒŸÜÍ)ØÞ¿7Y²¸[¸ù{c¥ìFq ³J1Ž¨ü«BêU2dÕJá𔕹g/AŠyd×É&Âꔪ½› Ë:› ÑÁ=@=ÄU(éC%„­Õ`%‡vì¼²ê%ççXÅçó‘w‰Ýg®•Yë6 ”PŒ’ø¥×DÍx: ÿî–Z4%mKj‡s´µ"l½bƒÖ½# ¹³Êj½[UrIû;ò#÷9ÀjøÙSl¿·e!woAl ö{ ÝjÍÞJ}–L|Š‹û£áîö6O•áãPP¢–…®2½Ó{š‚ñ\äÉ]›j%c!X°æd^ëü{Õ|Ú<´; û]ìƒÕ#Û˜¡¤H¡qÃ"pÆØa!Ä|Ú¹Ã[)Hñ›óÚïvwì[3Ĩ}ˬ©†—(Ü!ÁGl*âë·¼I_{6¼j^ Z“AÕ©‡71f‹SU½ô´_…˜Ûàw©{ß}wª¬m¼cLÍLP·ô2|š¦ÑdÆY¨J*n»x^RTRØšf\ò%Ñ©žå¢îªÝ(í…ÄLUclÜ`ª´ãüžb׬RDý®–ª(M#5©ƒ¨?ç¼➇WW¢òlsRÖÍGäß3C7H="¸(8Ä€Qvèh¶J_ЉrŽ¸HÑÄ.ÂPX¨>ïô_ù£—?Âgzfÿ¯Ϲ€ÛrªÐd9Ÿ7ù«ßÙåµBµ5ìÅÄN¾«£Hf‚aj^mÓÓEß­².{j"<ÞJ5h-dûy2C¼<•]È>ù}ºçh¬G?5  ]ÒY4›3‚›Oa1NáSݧ§«rp†ú›|Q1¤eÇŸV¾¨¦íZ»†•kµöÅ&2þx àø8äÁÔFñ|ü–öcöÝ) (Ú‡öééúz\kOLl='Ùñóð̸a˜Üg7eÁ¦ÉGC3'™ATÛ¿,Ó×-»[zÝe‰S@y•ý@¨LBzí_ÌÑ>C^~÷Þ(”“îmXÏŒ@~Ù"|óòóoŸÞÂì4VÚÊ ïtݶºó>~ô¾n+¨º„Ó‹Õ·N’P¡&F¶tV‘‰FçhÑE¿‰ü©z†`1â?ÚµŠØTB<-‰½rAyk];mäPCwí——ÆaóÉ0 «{ë4PŒ«×x¦Ã¨^‰¾ËîìÀð˜/ Çü…òú–tÊT 2ˆªVr:³aœ8kãìL­À;ÐWV¼¯¿6¥²ßÜaبÎÛmÐñ|a!j†Ð= ¥—Ž¨Eµóo{º4–^É;à…e‰“òGWg ¢¶§˜@"Âvÿ$Ô¦W¤9ª^L+l­B!9€#¥’¯- Ózé¶ÞoÕV~»ÇZ¥²Ó}Ñßjîw¹Xq¾"Öx.IåÏ3ýëdK%$¢@ƒèàùß(Ö mGQûØ8^ÈQL¹¶xë-ïˆIl$€´Å _ +'d²"ù!Eê[¢¿ æa è Ó•“ÓV»ÕÞ„ÇV²Ò–‡³_á±&^â[ï\» è“Rô‹aUßQŸ·¼Ã)Åzöx4;½#L{€È‡Â<°)Däü~k½µ¾fJÑ1xSè;#CbÑ°Ì•‡áò(äXH­Š’acè‡Y¯ê®ü¦[ûDc °âT‹jÏÕ¯ÖÀ(©± t‹öÔªTv×3ýá¢)"áÅØ£f׋ƒ stw`ØŸÒª;ÁÉÏw­zÆ~:Â#“hèܼWh¦’˜{ÁF±ž†´{;êz¿ "¤Ü,0¶öª¢Ö…T¸"Y$¤ÞñPœp¼WË qìK X-å°^å„Ùâ,ÓÈÕpÝøþIÎAÞþ1ü¿{äïìt©ú'RÍ-(DÐ>Y½ÍÈ„añ†$2ù´š©}Zea9¥´”T­ÊIÊÑx‰Éecxì˳Œ÷! T£›¼ÈÖbgo§{X<0þt·áP?|¸–ç2µ“ííâÁ¸Eî6(§î¿upoÞÜ>:(sÿá½yóï]¼N‰åëô?g;ý?|ˆ"¡.šúx·!I­?|(‡ Çrx¿Áþ»F#¹èŽ)Sæn#s+ÿáヶŸ<^<<·ÈÝFçÔý㯮þžÿºwüŠòžìKåîNÉmVVúŽ\ ˜?~ô¹¬ù!ç³±.?N»î>87]dn`™Ä‘KJ×ûÃT+°€’,ˆxJÒ©ý‡± ê`n„Eñ— [ù_Q4™Ü ãÊ,=ÂLí?|ˆïýÜè²~üKÌTüÃÇ”w(Ï «Àµ|é‘9uÿ- ¶À"¡pÙ&ÜiA‹ýásPf»|©ÃÒ£.€ð ·²AwK.ûÇã“þV«íhë?UQ†Iú]2 ÜZ#ÓŠ´Ìöä4Æaæe¦Œ˜^˜ÞŠÓhõR±iÈRä „Áó‚â(f†RÎÐÈÄ-JAWúö#)3­òë•_z+ýWÝÝÝÊ稜¬ÝxÜ>*Êæ±1!`{ꔤ;šO§†ÚJî×2 F§^2ŸMæÖ}8d¬*'’®6¸ Qš±³¥¸¿·*ª&‘ p‘R_L,œw)ô%ž©€4ä­S³uðw“gâS%¼¦)­THß¾U«ÔÔ΢œ¦(¦Y<´÷Òٔ݃±Tºª?yíy:mŸEq›lÙÏ[Á[¤ÿþÕt‹ EÝö÷ÎtEÚ>lœüÍsÈVMåŒ@3'Ǿ™gD{ÌÃ~’iÓ–E’Šî–™¸°½ã[˜f´¤úgzÙroN2ês±b‘ªxüà!‘DÔï¨^£Ýè;द–ŸUgOÙ7*/¢¢fÞû±ùÓ'òp>÷¾J?«Yp5‹_´¦ÀdÞ~W§Ý8œµéªDÿSmº§‡ûc}vüË¥½³dx³U#Û˜äêÊ:Û¶TkNèc¶lÍÖ À†³7ÅÉY¯z@5¼Q–!YÀVQ=Ó‹­•õM×bhzáDU¥›¨ÚV-A!·-)³Yùa¾Ë–k=äºkï‹ ý\Uœ3ØDCOõ†jð ê±Æ™S8Íž ©µŠÒ¿» ÞV .6Œ?VqÐut…¦”SLã„„r#*Èõô¥ ý¨2tûÔñl@—›øŸÚ¦÷‚^Q†M»·‘»ÙðPs { ÂÆ |ü(K”éVmçî“ ?… x¯CNÙAFX«Þ,8#%x^¡»>1Z ¢4$r9@«Ïa8…ðç ¡²(e³Ò)ÑePø’bh¹Š®NçÓdL$ÂHÌY™Ií5¡9¤Òê½sHŸ:üº³û§sâßhG–j«HvqNIÙK—9Úõêëˆ;(IXzŽ'³6öl5(PPñÕ/Ôe/ hê’¢‘S¼áw“ä½²£D·xÄ>W¡2íCQ£ZOÃIT'æ%B’õfë\1¯¬ñ¥«Y¢†46R³ëÈuå“çì"kW¥˜:›§†§º|¡Çž¿àzªuQÜr9°BjE,°²,’zgeÝêŒ)emsìzyW*ãLœ™Ss¶ R$ˆ^¯ ¼üăvF•¸g¶ý'§÷ B’þa‘G¡žAk+ë q;Ç7¦Û|hìå; &;‘Üxº˜ê¿>(‹ýuc¬¿¾ù©Bb7ú½eUÒM‹…ÿïžtKWórYŽ:ƽ¨Ž2!ÄÉyÆuTBS‰:ïïñ¤Ã|ºà|‹pkð’ع®åZÃÔ W^0†‰ˆþ’‡+Æ ½˜&W°|Èe8´Š$ )]%£Ì0Ð}šÝL" ½̃!Šþ Þ\H‹"µD°oä¿£o°”…:Ío•Ñ?Š®äfÙz¼©¯¹àžY\ÄѲ, áÔœù¯£QÿoÆfeýÑÖé žÉOÆþmqô›Y—:@#xî ›ÍŒ¹sô²Õj®6n¹p grìQÙqˆs…­Ìù>O˜‚<6¡œÏ¸ã €.F@¸äÎñÒ» O‹ž*¿¾Xòw’܃»Îµ‰ì%»JNùUyGÅZ©× ñŸLíÕ¢…9…ï€þÁÿ¡Ø–·äÒÐDY̓ØB`+@œ7ŠV§¤Ž°Ï+5Fò€ ñ>¡î‚! vc¦Zð͵ÓzpÚ¨Üøvä 7²ÿÖ± °ÙuXc¨F¢7kBº)± ÞÂÿX# w,v+ʺ¾à›M¯]Hr¨Ö’ìÊÃ"•¶£—QŶԃվþæöA8‘wðÝÀ;«i͵À(Û%R`n@ lÉ_«iõÅ´L·$›fÛC«"çÌóŠÌ4I¯hÆÛèlÒ~‹ÿxÚh?\©y§Ñ9È{£ ½9­·Û§’/¸Èð¾eïOÝÞÞÒš8Û ‡MûXi·áSh¹ý‡IÛèlÇÏÿÀ?0ÃkÿòëÀÿ±/Ë–mÀMÛP¢ÕÞôþQ{G½é4É`¼&€<¶/Œ3 ÔþQ_ QÌîE#`ÆÃiºU Îp\\F¿¾ãdòi:›¸º¾ùgMŠîv1ŸüV­ó|{§ûâå«Þß~ØÝÛ?8üߣþñɯßüôw]T ®8¬8p¤è0ºˆfÐþÚúcÌoù§oÿ¬€ç“±ë€àJ•JwûÕ¿½åÑß}ù{,Üý;%#¼!=þ«49ƒU¢v}s:¨½ãØ¡Àì ˜ÚµÍÍ/ÈOö1Åðí$Š¨ E^ýú¦áyÒ™SR@nØ·¼Õ·ß«ëÑé½ñžµÖßyß{ŽU8þ³›¯ˆho³BÝ–ÖšqMqò–ÉÊŠüi…סzD–Ö¯‡ê5œ=}Hmø¡mW•ãš-¯ÆïQÐa^9î̶×iäß[ðŠEÎPt{ÍÔî´RQy¦ôêÛªQ=a>ðШÿŒY™)‹"fW‰w‘Ì`¹Ò )œæAìíõúó,»ã·MÂ8jt«áKóuv-©ÿ¸áíüíåá¡÷òæO½K Ñâ¥7c ’n ¼ëf‘=÷®¦HL=hUëÅÜÜ骎Ô䊦ï¯99ªq¥²™Ê®ÆÖ_ZK‡;C‹!õ$ |’óZÜy!FqF¾ž…l‚[æ>:~P…»8³+Í=/؇†£íêO²ô²ú¬®6’¸×L‹‘ªÅ$•·2@m6EÿÃJW¦7Š5˜9¨Xž·"$e@“…‰$åkËG}̵Xphu$„ SMÀ;MëP@úqu‰S³¡=¼Kº@úˆÓwätË»Œ*7ËÞPÚÁV9Ù¢ÒÁ{P³ü–{47jÕÍjmEJ×T·ÒªS†ûbQöDX€yÍ·xë!ÞÃpÿ·êK9C ¸ ÀR‹K,p;Ý`õݦ¬î"1`:¼ !Ö¸6°Š/ øn䆂ÏÙ³–4ZäѦœy§fsWù2±÷Ä'ãÛš99K#ðŠÕ‰ý«:€Œ@¡8ÁÜfsâ.¡#†æÂ[5]TwDs!ª‹­6|†3:Â_. CåZ²+îö‹Þnw¡0ç‚ncARŒÅÖ}làÅ||0¢D#/±à‹Ì‚»‹rôuËÊëš~;ÒS¡a1ÿz«&ÅYßo•Ù*¨F(æSJ4Ìü(K†ýúÔþɺ W*žzêýlê&“­*í:77_=téɯ]Šò«Íô«Ÿqç¿ò¿º¨UïÚ4ÂîNz™éÍ£¯&“EmVp2¼gÀ•Y픘þ ‹´¢À«g,ŠXԺȨ¦˜(iѪ1CÂÈœäƒ{9N†Þ£ëlsxØ®ÙÒK§me锩“ˆG/Úg‰RbUE×A=‰4¤ŒÑää|>bAÇ,aAi”˜ .2Ws|œ#é ž‹¾Î­Œ*BY•Α âà:©GqgX :ð¡o[ÕŠ‰„„"kò@²UÚÅ@¬Þ¼?µžµÖÄ ‹U.lÓ¸—û'”p) ŸýÅ’A Â9ŠÌD5ª ‡ÒüÛÒ A¯L‰WÝÎlu»„¼2ev{û?d Ð+SBôw}«„z…Rk\•¿V* †šÁ(çtÃÂÎùRŽî•G'býï*UýGNqBYÁÆ~X­Th@aéu®êΣó¥¬p¢b­<ÔüN2§_[Š@—/6ü² ¾h¿ˆ´>Ð …{h M t­UYè«ZÉtªš‚.³0è—³w=­lIÆt[ÕÓÊé;Þô5v¸gñ4â\âgŠåØwâAÅóU!ƒYˆ&Ä É”cN% ¬C=ï„#"Í$BRZ Èm-²u˜ø<:PôœzÇ’ŠÂVÄOV7é8 ÕªTNpL¸»>8ÄÄ•o‘_üªãžÃæå* ÕËp4^œí«È’ß®²Ø’T PúG,­bFêÒêÜgáÔ fƳ#© ÿ©hfVÛNÕLûÿÀöÿ1Ðö¢ÙdÖ‚•J¹ÌÉgWðpŠ†€,eU m%ÑÎp²´äÅP}U¡Êàž~<Ã@iªãdˆÂâëч6Ù6€ìbºŸ7Ž»{‡»ãîÛ¢qXKËÛÇ™VBÚDE)¸|h>2ÃaØ•í\£éFeÅ>ÈÙ2rvM)y‘-§Ž¯)¨ÞT*G|’ežïΆWƒ¿ŽÈÆ9AQßÍ(ˆ[Éôâû–9ýwÆd|ö¹ñ­j&D†¶¹ö1Ùâ1î˜×~ mÿ|zZ­ž¾;]yÛFnñëöEí]U`ªäÕÓÓ \¤.–¤û´¢á³9\°‹¯ÕUÉä§oshþtżÀ9žÜñ˜W߆‹kmý±÷b†^?9Ÿ]!Âx6*r¼zñ Å$€ÛCQq#i€uS©Ëveà*Û/ÅðnÑ8ÂQLÂ)Åfús[ES) @ÏÐú1ÐaÑù ¬R •ÉÕp«¶Âµ ‡ …üP«ôöaUwwá<Õ*{? “Ñ!¼’§Z¥óúø ÿ­U´m÷)þ&v ¿Wï?ãÊ`ƒ=%°¢M‰*AôÓ879”tÐ0FÞ7¤€veàS°N‘nmTX˜Á4ë4ë[cS*¾þ×Y\Ûl>Üú‹DçÂx'´ŒáäºâÕU4*aY¹¨cc)E© ­2…‰lØbù!‰7°ÝÏhµnn(¤Ë¶«’²ÑªLÿ5˜„±âÖIɈ³(¾zWégåä \Qcóf7ÏæQ?©ùËô,?‹ 5iêfü¨ŸÍ£~Rò—ÿàô9› ·T7Yë/ÉMúQ=ê'õ ùOlÉÀæ‚æ‹ò£<©ùËð¿CÊ(zèžúÈò—ÿè>ÈâºÁy¨äÒ"À3Ùí9¿]$ÅSqäjµFN "ÁÏùFUÊàj&â`F;î°0U¯fzQ«ª=ážqÎúÆs"7ìGõ¨ŸÔÿenŽT±b÷+ª!*$FÑ`¦C⠊ך«f™‚ñÜ—É\ÃÝð€X_¯UŽRƒ§5T#gò Šb´1`*»ª»mñ,Óv¼,; ĸ'áXP‚à>©ùËÈž˜X¥wÙGý¤ä/ÿ±Œ8mÑÉ"üF7·ˆÆpšZFâîÌÜ0N¡F½º[o0Ò•/%ó}²¿. —§ÐÖàxA8†(ò‘²À—Z²AY ý^².V±ªâŸ%kf˜4 ÷Ã’ÐPÎì“‹®ɼ¼”Lý»´ŸäO–m™²~ä`½½ œ,„;õ!Éw`éQ@ {uw–¬÷&uþ\²æË£î¡U.»s3U»w¨û"S÷ÅêîÚS´»ì íïYµö÷–mkßïÛ­ÁÏ¥1ÿµ?} ä´¯ß. G‡‘µ ˜Ð²Kb×ëÐÀ/–¬=š‰1½©¯^-¡øx×…@¯–‡°¿û¸èB WËC|ðg‰Oh9k\^A»B§ìË ;–„> 1Wˆ‰ñ,ÖÛ»Á†Ó<|»$ŒU|²g/†¼Y²þ0œ`r?Ÿ¸¸og—‰=WEŸ—„L;.€úpçßýpwhhÕ_ ¿, sÚøq‚b“ ¼Ì—%áíìîØÇJÞ܉:‚¹öQQˆnUïñ‡;så…–l¥cÓ&£¥kù’×˪˯–ÅœLÏM}ˆgi¾üÇeoè㣞½óé÷’u:û»½çVe~±dí‰I‚A2ˆÎã¢Ïw„†3ô»åÇ…-¾BR@Åø *K°ÞVô¾-NVÑçûB¾-|5º/ܜԭ¤Äö– XÄÜË•XöT¡Ö¯SU™—Kï¶ýÞ‹nÿØÏЬÎûe)ßþO{'Ç=‡ô•WK˺;½cG&€/–• ôm©þ\–wÊŒþࣦ²Ïžfk?{ºì>‰Î\9¿Xš[˜Bá, g½]ZAd:’Àu’f}¾ÅOUXÕ7* ùÏ÷‘¼û”ö–O¨8{ôL_Xxé™BrÃÞÀU µGf/µ²"Ër¤—É(ÔrQ%%îHÍÒt§>gV* mï÷à+ˆ5ëE †Sæ¾m”lÚ…åî±{Kví!q'ÊZ_—•i&Ãù(×AëíÝàw/ÿqÙ½Œí"žûŽüÞz»ììaè KHä,SôyÙ{4)›û¶¬Þ$˜ÉÉZÌH^x†KËܳ ÓmAºÌ]Û`}rdþr?x¾Š1VX¹k ã(ž§þndùtWˆé%Ì"†k£¸+pw…Ωò\4ÿqI¨Q|N£™?ÅÞX÷KÓ'ñ{¥K"v(÷ÓÒgƒWúrK2÷êà¢ïw»¥RžŒÉ}].z;+ èÂt¾,½Beð2_–ÕöOCZÌ€í×ËBJÒY!(ûý]dõElÿ½x~d8BN¦>Ï‚\^èN|U‘à%óå.ðò†+öëeÇÏ¥ýÙ#û³_/«sšÇˆÌz»4÷QŒïƒ M ¤5†°„Ò£BȹRËó[$$ËìHûõòЈdni¼ÌÇeç!)êžõvi ÃJ5OYc ÂïwÀ%Z‰{j;j:î­åÀàoéeœõönpÐÓ9ßÞõ¶ÇÜí~æ6Í\vÇÜ°¨7 ‘‹ðétd·OI‘¥9FeqŠœ²?YpƱ¼ØýZb‰®¯Óâö ß™ Ëê«2_î&™ŽÐ -/„à÷÷åSà€>G ¾'ÔR«Ã|™;ðéèÇ…´a†-W¯—Ýáy(w„ eÖ) è+bL‘å)0 ƒEZ’¡Á¬wÀ‡%àÜ/wê]¾[wìOAGÒÏXÜy..²´ š¿ýæc‡†/înÏ““ùrw»žbxêË=5ö EŸïº2.DûõòZî yó;é­2À—)þú«ÛZ“"÷×cÝÖ—ø<}Ömm˜RŸ§×Ê·SVê3ô™FÊŠünúƒL{ËUøL=B¶ÍÅ>OŸihA©ÏÑ+”!•l™ÏÕ/,@‡¹r¿‡žá¶ö²eï³ëìö»C´d÷%€3%î®ÈÀÍ|¹·¢ìýzki²ûßýòz‰ìô–¹¯~"¾ðûçê)2m,,÷¹úŠ[ÚrÊÝSÏPÒ‚ùú™ú‹[°‹ÝSQÖ‚õù³ôeðs…î­×(kÁ)pýFpîÛ=õY‚¦àóçè;rH¢¤ÌýõÅ„D¶Äýô9ع¯÷ÓƒäÖò¾pmÅGhöÓ}ô"YÙo÷Òd€æ?ÞOšUzðô×Ï”¡”‘xÅî%Kɯ_æãýd*kxO¸,I)ìæ=úWÒ±ô3WªU.*¶dK•Ýc´l_Á?5ü!vö+êÑ6ž7 ît_tNv)1UÇ;ŸÇ´9X`”bh$ÌÆ´<¢`âì宓šN=•Øëû瀜ςÁ{vá—À®œGýö¿ûÎß=¦Pñèɺ²^±~×*Ÿ°'˜"0¤:˜bb ¦œóK~Ixò†?®O/¼Àù:%ïM,$_Èß]ü¶¿‡Oû~þ(w;~$¿9x´¤MðK|¸à©È ^»>Tî ´‡7?&x#IðTîH;GôvðǼŽ}mà/»ÍÀÃö6þGÕQK΃,uRXðYy,.Â^·€qÌãïRÖRûêj¶%<¼ÌY²ë‚¶ 9¿\(µ**2‰E¯¯FEoY&¡›Ï a°³ÚN~8¶¾¸;Äh—¶+Úßâ–íâŽ?"bâJH›šÂ¯2iîÂbù‚µE™Ö0n¾6 G’äß•²+ß4{A½wÈ x“!@Ôñ²×¸ÜàWÀÒ*óÏŒRg0±‹ªe©]­l„_¶A˜Ç²Û>¹'¾p¯<]Äú––€¤ £§"rw±–¼±ÅÇKìú²b"d-Þýe_ŒP³üÈ×Eòµò]›cVšåî^yS&(ÚÅò~!ã½h7ëÑåèü®–·yzsÁv’ÏyZ,¿­œ¢™2é‚f%¢S7Pd³Ów|ðÓ1øT­ò‹S´ÿ¡çêé;úìg dö_C©·RPèƒ*쪸ÅŪ\Tƒ¯jÈð dþ¤›ž¿d"à˜úÔ/ïÁOV“ §Ü‹—Ñð¨q˜ÎTmùU¬ÝÞEÕ%nÇ­M³8`Öo‡‚ï4©#ñ49–zJ0MÖ¦ÃzíšeÈ[RI›0ï<)éˆh‹¾eêfZ(`Â[Kþh~¹E ˜bÞªš›“½šýuáTXv&ˆ£KL0h÷—ÛMä?˜9¬Ђ•(x“Œß6õ “åÁ–‘Ýepßä‹–È(2Kb¡çÝÿYDÑ ÕÇ|,,i¾çq‰]¹ 2Öÿ5lc1«YAÌjœm"”¤ä§ÎŽ9É„÷ÏôR8†3;«u3™cÂû¾L“ùÅ¥NÝJQ¹¡ëɹw ý“0¥Ðk&·6øýíïýWþÝ£~ï`Ÿ’1[©rá'´ìíø/wžûý“çýcNNÂùé·ÀÌȵyâ[ ^Ë¿>Úƒ7G{ü#¡`Þµú sÿ<‰[\]ùŸ>ñ¬R´¦•ßðÏ'záFèûÍþÙlKÑN/¥à6ÛÞ@Àc÷áþù¬Ø÷7D®Îƒ)Ù°3Á)É{.⣦¸ õ·*dI[¢þ]V™°¢0šLœÑ\µ%«@\pF6Áƒ¢S>èº:`W ³TmUVWÞ Þ‡ÏÔ¦°¦*„ÕÅtųáUóbК n©iÊYãåôæË WR¡gâušX QÌI_ÔbS ÐìÂÕªäe‰éž«Þ7&Ô2c }hºhçS¹Ïìtª¡P‚_ãØyczi…Ÿ_ÅÌì"òÂøS*Š÷QË£ÔÎI„qƃ ·=¬²Ê@ÁØ<˜ZÊšŽ oôÄÛÒ¿i¤˜Eã"À)‰0göó(àŽ¡h¨XˆcÈPÑ›S¾Û³ñ„Rý¦ ¦ŽÜãVá„ûuœâ–y•$ïi ìTuÉÌ9…°¾ L9¼ýd&Nw:ðÒq@ɽã!Ü`Ð;NŽC»MOÐUEðdœ…Þ`Àn`2,ÊɃ­ò0`è˜Äñ,<§°»ðžòÎ`žÅ3ŒÌÛ6RjÄZ­UY‘˜Ü9ÉÕx²…èÿâOL-^øÅ:Õü_àõî .µ±…pè6ùM'Mr¨3ø@qò)EáÔ¼Ûô>aÔPÎ4n¯Ô¼5ݨ•¸|½æ­{½õ'Þú7•O&ï`àÕS `6°ß™ý„oh![=²wõù8Hß{kúv`ü7#u·E·Ãúç&\~Çy‹M>5Aå“gÏXKR,61.ÐÎÁ¼Î¶„©Í¸n£òéö\lÅçvGËÁ§Y*\‘´õó § ¡Ä )Í…s/À”Q$fÚb Ü*cÖKöÉ çÊЪH¸èK ÝÌ-0 Z¨KQ:æT˜Jß`†]½¦+’ò?_›èÓˆ1xØ@D×NO§§”Ü“£@WïiB0ñ„W{Þ}ÙÛ‡ÃÆšŽjp:=«zŸjÞwv\^³}MË+64ÊvÐ)L?YY¯í&±'&k¸ý…GA¨“K·jÞ÷ꜷ‘ùXoAÌ—§‰K¥÷üLå¸Å²XT‡J®ò¹3±–‰•AÎÆΠÒzØþúË•¯ñ;p>Ѹ]³« $ŒÐlµ[†¹æN ­4Â1Þ>.ù›;vÔœ™–ß•õñbvxµ_`ߪ*[µ¯¾ô¿|àÕe<Âà¸3>Ý×¼ì¿*AiËSÇÏgˆ×Wµõ§O(ΰžÜÓ•ö›6 ôÌŠ™¾yÇ)‰%až†‡éÒì)³²àªl—”>wÅš7Sî}‡egÖU PÕ}ùR?y¾yù¥W嬻D£Úùueºï‘éŒ+p–ÌѾ +<Ûæ”Èü×*—•´ýK»ÿs•} û½úv«]™T.ðÃÏ¿|ùöá—íveV`TAþ¤íšcµ¶ßgý¨lÄ#yZoþ¶þôÛÓO§¦‚_Ç2­¾þ Ì<¦"úº}­þÒæÖWàU Ÿ°ù¸rÆmÜZIj`‡U£Ô#èÊ÷jq/Ž Ï¸ïÓ î ÏÜ®&SÁI®V߶kíc`ùöi ?A•Ü(XøÜöÁ„AwÞ>¼?ï"³‡<º’ëïCÂ)ý†×÷£Ôjýgxõ#æÆyI «ÿàú?F¦¬ŠpN‰ƒÛ: S¤ñ'£hVÇ«½\õª­¢$ˆpLÑÕÀô[øß‹Ùe þ¼þ¶¡ºÁ·Ç›^ä}§@ÃG’Œ{ºÅàŽÞªWHøÍâ'LŽîŒGñ8S%TéÓ{y)ã¢ÞNe 뫶áU«RœØô#Õ‡GÞ%ù¢ŸºOT·ßa?z½UåÍq:¢Oi`ëº%ÌÝ‹ˆ˜ovì šÈÚß;OL˜¤ká;»Ý†Ýâbá{Ï èo%›°jîçƒÄ0Z¢}QU4th€_D|ï¾å—”Öäãë $­$%bÖl .av¦7.²WÆïGJ`0n„[›MI¦ÊÔ)²rts¤Šz“t}iEVê,ik w¨ÅnÄþ•üÕ¾)‘ÛÂY¦¯ÈÔU[ÕUR›L`‘ƒ¡°—(Ÿ˜ÂšàÏA2¢ŒŒ˜§e*a ¬¤Mäm @:ðº òžDƒœ:'t.zM g …J5gh ñûA@qNÅ´áP¢Üc"E[6øaë³UÔ÷…÷ö!už¶è¿€ aDüºèý ?oœê)Ü€7üJM¤~¥&S½øeã!AÜxˆ÷Õ5ÝÜ¥ÖÆëàeE/Ý|[ª?Xþ‘Ë÷8°Y”1$·sTJÄø<•€¸W¥dƒ%\•@V¤=Í>€¬GN5 "·’BÈ[§éxÄ)ÉÁ°}¨™¶.Q´–à¦Ã»R’ü½³€ÖV=ÌÆ0R¦Q‚Co“ ôð^rƲÊb—Ñl> 9‡édšL©JAŒM’|Ÿ™ÉVó>O†óAh^Wl ]ïŠI$_5µ£3ê…×Qª{Ã#£ôÊa¢¨éÒ’i“4pDã»;1¯Hwœý™!¯Û†qºšû`ÓÑœ÷ëUÿ5t³Ú'¿3áŒÙ}EljöȪ·#i¦‚é4 DÝ”PE-1\„œ´WˆGÑûð*‚<Ä陡\Oj Ã8œQc”½Þ´<ïP᩶'eÀlV•ÇXúø¯ì+ ‰«˜T(iï쮽,½¦¿ñ-k†ÂÔ)”¥?î: ³zf‹&«ogÜ7á5*>#ô!¿rZ©¶/–c3îÎR¸LÂNÃÛYÄ$|B>ètF[šþÔyS$‹¤½{d­WßÔß~<]i´=‹½8eþÂæ*‚éðñHÜÃo`¼-høAU÷е ðûc¦î¬Ë›'ø†Éë|¡íòª÷¸‘­Mð>éŽá—UüþzV‡N<ÀŒv¶è=À!BŒ=óÜE _ËOÕ†×ôÖÕ õdPÍÃ<0ŒIAX0è*°Ò9àqÄwXˆ“Óª˜l×Ò•*/KuUz{( x;ò@Uâðz–®Þ°óØÒž6¢9P‡Cz\O§ŒÃæ¿žÞ¬Ò ¯ƒñd® QØ»OÈüþÁÉÑvwUt„ ½È’h`”ÐFðJ€$¬oñÒ›”},Õ&.F2 (ï… ›¡aú_Í%š °…‰ á©jxE‘ž¶ÂTÉÜ©ò2w°ôÛʈAfŒ7É'd™§ÏæϼeyQÌ•q?Å”¬ºÜ+• ™9ƒ`Õó6^x®¾ØÛx•% pÀÛ^V7\­p®@¡yfÁEFuoXa¿ñó‹W»Ûo)§(…’¯›„ £x°U‹æá¼}¸ñ°Aå7vÞÜØÆ¥ji¬Ì ix*PC#̷͆Œ`«¹Ñ4¯ê×RCþÍi÷E¾À|ù½ý­ø¼ÂÇ IÕx­fCÞ¯Xå­Œ‹ð–l?(g1¿ÌΆLÃ.õ+MæÓ7ÖÉ=É@3Š'óYÊÙ’e‘Î'&²Ÿ5ðseYáy<ç[†IŸ¶©Šñ™<ðv•®O9¥¹=¦i¢v•[•ÀžºÌÜ/L]ô3d˜1-®< „lBý› ‰~ì,ôvúÍtvƒ8A)=0F©Ñ˜VôÞmsô…‹s&¤1üÍGx™|ó3\ÔhÑ婼³_ðÀ f[Ûèë¯Õœ9ï¥"îÕ–½M×µºª¤a¹h2• ÅyÁ~uòêfún2÷žg“öž/Ê×»¹iƒÌ&dµö’JÖ{.yz™Âgl ts-ö*¢$“@‘ãÈEçFÙ5…ú½F › ¶VVm&°x!1ífðr˜LPh£4ppÒM™¹þg¸!µà_û¡a=ï¥pÞÄJ8Œ&||Øf@m1ICܪ™J$ש½Ãu³&ó¡Ñ;}üåç_6€’ÿøq3ý¸!Ï«ÞÇ‹Zå‹w5Ó(@oÕÔ…D{èš…,z¾Üò®›¿–ï“. Ý^É|TWÓoNNRœº•ß´ýŒÃ8iÊ.ú´aLL0qi®vqÁg›l@ìOú~8ŸMÓþ3dÓ¸\—ñK†–7´h pÚÈl˜H h³b³›3#Äê’™úkDùO?òŸÓ‡ž’±F ‡dv$Ófì¬yU=Q!’=ç×ß­| O…j¶Q= Ò6pt³këû m47¨ë€f]Q £Y„â¿…ÂP10 ca‰\òm'±=²Ñ”§È0¤Ùô¬íˆŠæíz2õÞXï7¼Úd»~þ¥ýX¯6=àÿ¶®Ô¼ÓÐõ/ j´ÛÀ³A±[Š,qÚ ¯-[¥­;Jöö*zYÛ¿X]>mŸZ†ç•öo„“E#Á"=ÿÿ|ÂÿPe¬Äýo=\ºø’€·$Åv xÈÔÞ1¨3þ¢ÀvSv™•ø^]ºz±X ¹Aغ8îÁVCv€ŸÎÏ1d)8ÉDWCÝõVËy«¢›âF"ã_B;sÓHú…!O[x™¾ýø‘†€.œÕV«Ê<P°®YËŠº%’²l÷ò J«ÝöÏ¿`³?¶[­€žÛÒs*3`ùˆV«;N ¡‡Â¯E­´ÍqÄ':–hû|–:E©îäj¨¾eß»ã®< ùDi×U0"»ÄRt{³QÉtÃí—tV6ËŠÒ^à\ÀfñÈ2˜ IGft±GØ»¥hM1NÖ¿´¼+šUL Ù* ãé¡-ƒxò/òH]é(RÑV¶}éº;3›Eâ¿eýP+‹ ñ&óCI«sYØ“ÛfÇ­»x’ÚV'íd•r+fºRÆW¼ÀÓý€Ž©ÅÒ;]£·Üìî.×:Ù](€)…¶ti5›ö·¢Ñ;å wµ÷ÃNïÈ?ÜZ‘Ýù½ 7Ür›ÛÖpŠÚV°LÛ÷7„×Íh¿7 È™Jt dlœ¡'Â0˜˜‚ –fÕƒ — SÉüøEïÍ^wC©‚ïTä/ë‡hV^y7ad[€>n=[c¥„ëcí­M/ó6 Ãx«"Dú°U«´­B,±Ãkå(øû+~BU]{‚?’~ŽâóDÿ%tS?Ñô—žkŒ`ØÓ¦*²ôS6b°;qZÕd0UrºyhõŒ37ž›0Å+JwôáLJªŸø¨º‰Ï¦—øK:I—ÛÒtôëÎÑ~oÿåF¶»p)«ô‹ pq4›VoQ(€„uáýû@~¼ùéiÔBaTÁ.B&ýZOï×+òôõ…|ๆ÷ô ^«yÿzEžÔ³_¯ègõQÖäë~×è]ô›Õ±OÜ ùõõEM£D£·´8V£S´ˆw‚CkÞ–÷®UÃC×'«ÏãC‹uƒ«z]\’ŽLû¸Æ¬S:ëÖÄ_‹K4"–= (Uà:§á_î¾r<¨Y&ýH-_YQ¹¿Èqcôç ùÏNóïþ[õ°ÖüóÛ‡myVI?þ5ÃãüõãJŽú¸ ã­ÀŠÙý_¿.ºú¿ÎÜ›).ouq± Bü¬?™k?›ßNcvóÛ’-æ¾ÓEݪ_$·ˆý&×`¾¨ýV—k‘KÉýQî-þ(?øãJÁ)®T•xh£_ÚM§UÃ*䋱]Ð$@‰Íòf;ß«×x¥Ý›m­T5w¶Û+_lƒÃÌ>½ÖÎ ¸}Lç¡dõݦ%"çÚâŽP Õ¸Hú½ñp !+Ž½¸…¶pß;Æh¿@8çá5Ùˆnð*PîžÞé;««ÔenúòB@eù­Ø OCÚI¥ï¨KÏðŽƒùdëÊŒ$Ŧq©ƒD#ŠØÅY+ßf@Ðr Íj}â]‹ž2 ÌgÃßÝjÓ¶ð<0ºñ*G“³VFÞ.#PTÊ.³Ší‡y)ÉFú„~9)wöm‹¡Z]ˆ}£kwËÏ–l) ê0:wÖ£ ­ïKŒï$)5;'…}9¸ â‹òQZXIL-“Ï쎒×ö¦2C±zZùâó&¤¶º#Ä~¸Óª7³=†þ¶OÆdúÍDÔRV­“ÈÈõWlUü`ìÓ‹-kzñU: Æ [æñ íý  ø–kÀѦZŒCœ²9×ÊxRŽÏµOÚX«›!*»6Zh.Mòp",0N Î*9?ÎÄÂ'ˆimˆüºÐJQemŒAÉWžA°¿ü9ßuâ[Š­>vίªÝŠâ­§T';QôåˆãAkéM0*‹õ’;š°ß´§‰NØ$ª/§á¤¦L£Ø"-èÅÌ7Æ@ Nk¦9™&hÍ$PH/aõ”6M0D‘[^1DŒ@™LpÒ©4u£à>K »ÃýŠDÀî\$ÉÐ #œô ¯Ó{Ãt—ä2Jn …,—±¥ÇkO¿åC€®â0Û°³•÷ê%ÿ#ññWŠÜR]9ÚóN«+Rä s—*GqaÒeªÊnJBpc¸mïûïí¾ôV(œYåeݧóBˆfq¼º ¿ÖðTÄ5¨·ËËá]©Qò W@ñÔ¼wuüC'8•9õ¸á):9ëÿx‡áwöŽ»@C£ÄͲ‡"öDµ߃Pã ‰×t¶¡IØÑ 5D­”Õ§É4ag’ uUCO¢66µåE:ŸPàjô ˆÈ èîi4 ý2™ÂÎÌ7ûgtñèÊUoýÏ~F~pÉäfJ*¬:ðf×ÖŸz/¦°ûÉùì wà ô) ÐA«^/h7DL¥à& kmS^ŽÙ4¹aoÖ˜#*±Ÿ€„6Ú?`WèçÏn6™ÿ€üÔÜëm¿êìwž÷v{Ç?!Oñ¢w¼ßí÷½G^Ç;ì÷¶Ov;GÞáÉÑáA¿KÓõrÿD/c¾‹7Éœ"±ÀªFh^x†Ò#ØzpRÚÈZ%ÃèÝgáQÌ¢¨ŸŽSÅD!|Þ^#ïp~6ŠÐÜ Œ1´ p“ø&½$º™£•Îæ¦Ð÷žd^†MH+r†Mμ3ìùTN|}Ù<4ЕaU0>E‹SËðzN8~rKÏWñèCš³Mq`€Ï(‚zS^Lƒ1.ˆlCpŸ"1WÐF×ÜZ‰Ušxô¶V¾næX¤qh÷:O“O- $`”qù‘MX0SÝâ‰Èl3¨¡27¿L&h –ZC~>gažŸÞñ«ƒ“c¯³ÿê4Ž`3þ´©Ñ(mTŠ4ÔS„òÙÇÐ#¨|ŸíëîGzêÁ¢mF2ÔñÃYRòO09b B P5aÄÆ xoß¾-Œ8<§š¬Àé\¥#þÝål6Ùh·¯®®Zñ¼•L/Ú#†‘¶¿oQ̾c=èc3 ..¡Fªß\‚¶˜Í¤&Ù ´U >ÀÐ(@)ÔL·j¬µÆøJ£efDÆuÃÞŽç1‡VÛðNW~ƒ{£ÿSßßí=?êýä£Æk©ü¿”×áÁƒ»>Š`Ïâüöš´UÓÕRè Ì»¯5~J— @þR!¯!Å}Åù)§á‡Èþª~s#,…añ iÅÈ™‚³/ÈiŒù³ª\úÀ¢Ý´ƒ Áqàÿ¸„AZ ¨ ƒBÉËÍ„†®âÀ+€­ F_gçõTÜ>¢·1cëÓÅBØw_ùòJ÷Â~Iþø<IØ£“9@¦$;ZU\ ]Þø637 ¥ ÕÕé½iI~ Иarvì•òom8cCÄuÅþ.À—ÑMŸ$f@«"‘Y1Q1ˆÏc¦.ÊUˆnFó«=˜q‰0v0UÆuɤŤ&PxS–™\çZ™ô#Ã}¥  ¤jᨑ¶ƒy®pØYü/—HÔç$U`ÜÖyk ëWjê" ­C¤–39Ú”NeË®º…IUxr»;µaÈ5`&x>½àC‚¡Jè/ψ\„K°Àu¨¯74Í^ç@ûµ*o [U¡y8Û7ív•ûG2§ƒ/úhÇ ÀÌ.Ô7|uïuYZN[œ†WWÊ3Ââµ@~¡ ¿0…Ÿ÷wšxÐöúMe<á0‰Ç¡ÞþUÚß³Ï&p!«)(¬™°Ûï¡Û˜†ªàƒÆ,Z€î\GãùXß0å , âÁk ·íÃGÄsú9à¼D°MªW“阤šT­ "˜ëYjò#Öë’Ê‚÷%u±jxRUþ‹õŒh;”iD¥)z…§Smaúz¤ÓVžÍ§1{ßrì I3æä¡Ò*A®  q®ó™{TúQáP€fp{ñ¹¡±ñÍ uOépQÚöø,ñé°‘–ætKèfß—&˜xe .Ñ<ÍK÷HXç½l]ɼÂáב-žàö’DTWž±üg "‰“­iPr±™¹‡ˆ\-wL«0ŸµQôéÚ„J.LŠ´åUM$ØnŠ$jÃ}E!lÈä´7IPÿ€¤¸HîîÓfʶ…ï(xFQ+L{[yš–o6“ቚͼ£D»»&š¬&»%U’çÌtiš ЯO-"¾§ 7©QžIŠ —V׋Ê.Õªtø2ëÐöbd$m3‰û«’-›JŠó{5C¶©ŽFŒ-Im“HüiÕZ>«Ë¿–›‹O…€š @=‘” ‹¯*|²&1Õz4!wp@•±¯«çÐ"üX˜~ƒ¾}(ÉÊá”w?Ù7†œ«ÀüPDr@MI¢æ°€oç‰0·V|ä ÜöT¶—gÃîmoãGü©¿z˜ì&m™¤rTN/ñ1 ƒI˜ÆÒw õ:¦©¢zÍáÛ4¸’¥ãÐ\Û"q¯äs‘)T^š¬Ì œ”ë*Ux£mŒc0 ¦Bg6[Ø *tk£xPiÄøF •T·1ÇÃ!HYtƒ³§ÝÖ.µÌèyv=•imDÓ¢Á;9Ön§ô={ÁHSeIdŠzÃá­ý³rÀÝ­«VE›ÃúͲoUì”rVök"%\¾æ†ÄL“=¹´*ŠÎðéÊþ^+ŸœŽ çÞªî¡-§Dæ@:‡Ør‚Vp¹¯âiâ²(è2—¾ñnŒƒsÌ<:9¦¬˜çÌ}£Y€À;‹bäìðÔQe;—ž5CökgŽEˆatEDËk³V‰[XnWÈÒ6ð_y"ƒ¢ ±€¨¶\±ò0ž…Ÿ$2tWÃ-½×yÙÛö·÷€ÑDIÍÓB Þµ(Ž„°ˆ üÅÊÛÇ ¨œ ŽÎQ²Fò 7­wÞÐ4áˆED“9¹4 Öz;¯;G/8ƽºó¸o$Žx}øk•+©ùaƒf£I¾ §Ÿ`œmP˜|,éã9,¡’UÚšûœ†) ™Ë„4ÛZ 3È ŽÌU0¸lðf‹²pôü¨y+‡ôì)@™-è­¯µž¶TE÷ÙSb¢¬+7ÏÈ ÁÆ#NˆÿZ‚%É×k¥Ä~Y¹…&Ó¿Õ¡1ʧD]ùlNu-â>Ù tÏy@ ‰BEÅåû¢öŠ>PHO•BíiÒPŒ3„2+"NW§ôjŠ¡,¦:n#‡àD±rB]™1yŠbÁÖ‚ Ô«òÏœ¸Í†1 ÃCä[¡K®lî­™züeF Œ”"\S_b&:&±d2}Ïs°¶º¾›cÁPòü9ƒ9J¿™+h¥Úœ’#3šó@YÄ„&1m+׸¶š)l\U @`"ª7˜ùÆÇØÞQJ#×}ªl„ÂëYfšô¬b ôq¡9¶>"µϯÕEF{›Ã/þ¸¾¨¬4ÖEÖXþ,”±ªbôVW£K&€ÆÏØ%N¤ºý“‚y§®ÐGR¢P–aiS­€æ¦ÄWåæF)Ÿ$Š˜´‹ã¦½R6783h ¼Ä:£xžú»VgäMy'ú¯€u#ó«;G[ؙߡ±Zñû¢>i dmä\³úÒNéââí„Ña(džcÖCm½“ {†¨^’ôFöùÔ-[Ñï¬AÜ„”õCHe SG^I†©z(´ÑI\É& ©QÜ&¦ˆyb秂” †ðÝæÆdZ §]©¬Ãb‘©Ds£ÀGŒ6PFï¾)Z«Œh©P5¯’«à&U„Ÿ”Ú·èu‘Ÿ$õÙ64•)¿m}î=uZÝr”ÊçRy8Ó^Úbž=aÞÓmŠ,Ç1#Í8ïrMÐ"ðI6u­˜|1Cw€eÞ9$‹Ni ‚>ŒZ‚PW+«—±!fÔãù<ÖXÒ=ëÅ‚ÆXPfãÕ,Ë 3@í7wÐòŠÑ‘«ÙÍ«u…Õ´@1p¸vÉüdNµ}€ÅÂ#óBm:%¡$ݯñ‹u¸æ ˆé2™¹3½°øKHS—%È|dáɈ­á8á…¨‘P—$îÂ…œ…jqˆ¬U)ÃÂnQR‹‰0!zX¯hEsEÜwÅ®®ë9R#HÊéB˜'{€X¹F9œ—X8ÐŽ³Éî…SlÉ ‹?*;úîþNΊ^ܺlO¯š¼«e|½kü'ûÛǽƒý>Üž£î9nÔ“£.FñŽ¾! V ›Á Ûë<ßí’™4jÞþµŒªV”jµˆŽae-Ÿì:}‹Ø£rp1{œ ~êÛÐ,…. ; ;g¥Eak_J<ö·>[i¢·Ynߟ7à?o7ª•*†9›Ó7¼žßVµ» ìÚìÄŒ©q!œ h)8œ J˜Ã·?ÃßÎÆ[üo!ÐC‚zx[÷ØRM‚DWC T½³\¯²cÓÀU]‰BO b¸R¸êÊo&ªûõÊcöäZ ×á~6Ì+Š ²²¾uZ}·‚FûTüè‘9†áh{è¸ ñÊúi5 çzãa ,ì-€–ôp£ÒiûY· V»]SCr°ŒLªl´æ”Œõá§,b¨|"±úv0°õÇ`à+Ÿt¼zM(ZFla@¶`u0¾¥©”½´,fÓãÀÇ{ŸBG=¬V7³IUÌwÝSiÃÿSxbó{0à 4øgÃÓ?ö‘ßî{aü!š&1©HÕE±ªrWR‹èC@*\¶ùœŸ“h:NÞ‡&q'Bÿr =³øßlçæ÷aš×}™PÕDfÒ@TØù˜…ϯ‘.jkdŠô¤úHÆ-©Ä W!&`o`˜oço/½‹pÆîÔLsœ«€Jlž0Ž®áíöQ{÷´ÝM Ä~p4#Œ‰5Ñ–ÒÂÐZc*«ë™¬¢'›ÊŽn”gCÊýp• Œú&SÏ=A‘3(ÌÆîp(«ËâN€ÄÁ ³XÄ Ôä/’¹¶òŒ‰Ã³TuwšŠq÷ñ£WW¡ýÔ7åõΞÿãîWxLt ¡ë'&Ť°‚³R}Ä31¸„¹ò]ë‚•R§ú¤€ÌRäÚqç¥È oûÍ›;++}©ôù K‚´@i©Zúý— ò”—ªÒ˜Ö(þµJL=¨•"3³ò¿ƒ2³tn~…¦‚þ¯VjªvþÅfy[ÿ^åféJþ¾ ÎÒfþ%gvêÿE§ï¦ì̶øoWxÞv ÜMéIÐî ø¼µõò“š^ZšÝŸ©Uàþ ŠÐ|Ó¿2Ô…ûW!Z°’¬RTuàÿŠbôíÏ°rtñDý ÒÅù÷)IËúõ§(Í äT–fÑÓ¡0-[·ßQiê[¼ðï«8Õÿ×*O ›ùjŽôùW+Qoið3©zn~7ej†þ(Tí ùoTªj&úß«X¥n,¡\åry«]ßU²úŽìÿŠ¢Uõ*«lÍJïŒ 8ì‚;ÙRÀ$YMk‘Œ‰Ã<–z:iàWHزÃlÂyž¤·:2 SFAR]–1%”ÀœJ-‚;6ä|€ÂÖ†¼á´.Ü#Ì'’¢ÂD`¥ˆâgUàpn®²J”N&ÿÞk6) ;M÷7&L,¼â`µ™­í•€â}ÖÎÜ.€¿7ëC:“CÔ®}ðõ׫$H£øfx€qƵ¿&ª®ð’…Ó·å­‹¥Á¸" ƒ¦Þœ/:¾ÄxpØ™òEÅ›{:—Ð.Cw×JñC*T@QÔJ5ø“ç@÷o €îªÂᛓâ%³°ÔÏ#Êz ³MªQÊî± ¿89Ÿûf¥›°gš,œmR$ºåT.‘ çšà¸ëÄfŽT°ó‰$›šÜòƒSÛÓîNäj“ü¥”ÊC¯£*\ͤñ@Ûô¤òp¢/ T7æ²ÕTY¼~†Ó‰~Ùšï£3MîOç—(®¬WÖ³yÔOêAþòŸF¦ãT…ÓɈ‚ÙêÌÖÃLï²/2¿ág®Nû‡õlõ“ jK[¨N6y%Í·³%$éòG½ïÌ£~Rò7;9vri Qº˜ÿa=›Gý”‚ÄÀÏÙGý¤ä/ÿÉvSj»p¥áüëÙ<ê'õP0ã%ç5SN×+Ú÷*¿Í¦†çôQ¤À­¦íZ»v*ÿjµöEõ—·€PÔ ßkÅÁ«z5^«:ö'bAÁ‰î™¡'³$-#¦ÌFâ’š ¬­ŽQ8€;Å¥+HŠÒ›é•Xá¿NÂC=CŸ=;& wj¬êy Vó%ª<‡¨„=K×­•µ0s[ˆ°¤=£´9›¾`þËnôèE À©\Sdó€†KÑ àA=/IJD…_6ŸšMÉ'Å]¶¢",¿Xªå}Z0›xF“ e£˜\ ß™‹†…ÓÞ†·"E›$™çkÉ}½á¤·T;|"«1Š‹ÀÀ¢ $ŽÝ¼$:"üª|@wGSv£Šia’¸ ;·à©;ÂBD…³ô?ÿý÷Ÿ÷ïbÐüSëYk­Û‡ç#NÒ§þ8@`8i¥¿GkðïÙ³§øwýOß<±ÿâ¿õ§zö?ëÿô ¼}²öͳÿY[òÍú“ÿñþ£&R£ÿþ‡üûò‹þaçHÙ>i­q°JYL`Sr¡w%B §*/JåK@°cT`¥ R[´+½•²dk5¯ÅYÄ žJJGÎ#(„ŸO÷çñAß{Ú‚"4Sæ ): pÒvÑt†š(í ý„j«yìú­4¼ð¾¨¢ëI~a@âÑþËmRvúÓð"õ£Ø'0ê³Gß'óô’¾WŠKoTœR•/fÁk×Oà’øÒëû/vOú¯ü×½ýƒ×ýÊãäÃ_¥“Õ¯’µÊÓp6ª|'“ŠÓ%ÔÅN:4‡ÓJáÛ Úã/¾€æP‚•Nà²é}ó[øô¾L¼-øÐü¶òÅ`4ýâ«‹u,þóÅÚêÅú[ÔêJ•d}µ¹výlm*C½„àᲪ(¢WÁÍjå‹/°:)]0pé4˜(…(_ûü½Çf%)çæ¦è¿ø}˜šúW¡RG¦£d2¹§Qr…)’ /AŸ “?à ÞB‡uN¿ƒÿyؘpÇã tü t½òÅÙÅü ¬Œðá&®O¼ï9ÙvûH(ü4L6P<Ú'ö5·¼o½ú0¤¼ò£dÖPëãy4ÍÉcš({ĆafZ«ž©Pùÿ_bxëiÚükPc9þ²¾þìqÿ¯={òì¿øÿø×~XñZ©E×ÿüí·˜rôÛ?{¯‚8mþ­å=OÂËñª×Á¹…Ÿ;áö‰[«>h`šÒõ&üç)š¼ §É5˜¢C)Š=0ò¨8Ú¾búSÄÓE`ž!„~4Š»{/×\Fƒ´Â8~Õë{{ãîQ¯³ëÁóáÑÁ½îŽ×éÃÏUöNí<ïìžwwòöt¦H¯ûæð¨ÛÇtcéàÈëíîöº;ØâþOÞI¿‹;ÇÞO'GÞÁë}ï¨×ÿAµlÅFÎ:ù%C^XÒ«:©±.Éüãtÿ$˜Ü?b Y6KÎÇÀh Beðˆ6lœç--*ÙUºý@3 J*æKCÖh°çÊJ%"’I ÉGú¼ŠÀ–ì†$‘—o&¨5¼ h“èvHÀ! Òµã.ÃèÀp@íJåJAZL£@C´/Pµ}h]V+Þ¹LK`ZtâB7ðÝz‹\:Œ3ඉwFéÍa±Ç-¯ÜìDÜj8w›¼YÊÞ@«ÃÆé$䑦sLí*ùÝU÷Ð00Š‡áµÇȃrbC\Oï1B…ÂéZdÐܤ·í%³Y‚yA°úCÈ´š5oiqàz4âeÿÚ°Y2sãÔÔ®Ù+Š^£m`³K±{ÔÊ—¸cß}ÔïÝ£ÿdÒR¿„Ýó/è?”ÚOâ&%øÔñûyCa*\½Ç¦@/aŽ¨ƒëíïw¼Ëá”ÇŠÎÓ>רOfSæ]b ‚$ž†çÞ«ЋǻºÏ\“-àÍt¼ìû¯vŽê—«ò©a¾ÁœOãº~ÿÀ•zêPŸ{W¿l¨b0ýçèÛc}E¤=ìDË­Àüô˜Ù§dÀz¾„ª‰Ãt’hó» ¹ÞOˆø߉²ÃäÑÐ!^ÅÒ ã˜5#/o-\Wñò¤ƒ¨½Û%“9<À |«»?Á3#A' ú[½8'<îË<áñ†s©v/Áˆ’©/à88503å¦Áî9&ÖPƒuGØZ0}ÔËÊ2SpÆì˳ÑûVé\¸»0*m¸Ã£Þþ±ÿ|·³ýƒ¿Û£tðP—N$l¸è²[aé ¶¼,6½ñ^à¶âϬnTȆ»;$¬K»sPG/Ὸ»_mû{½~¿N[]„ßéRü½¾ÿâànóÞþK¿³{üàÈßïíÖ©XÃûM‰Âëek§Êp)¬†¹5óÚ“ÁæS2Øò&›D¿å6^=ßýáðø¨.¬“:L,˜n]õÔô°z¿÷÷îÃ:rO 5æõpËÃÙÈ7ñ 5ú£ðÖy15`£©ÆiF讋ùTœöTsƒl سzÞšßÖôÙ ýk¯÷rÿà¨ë¼xáv^vÎ(Ô¹Üt àà}ìûQ·Ë=u*}üˆœ›îï÷<çhÄóNå›ßCÒ6™™†Å‡Ið¬ïC÷ö:»¸§d»mÝ5]àE%³Á¤@æºÉKIÑ?R¶ºu×.Aw:к´ðO ²7Lëª ÔìÑ1/È›p{_æ'VC€öF3#O 1%‚$g"òYXßÚÑ Ä3êŽÕuA§Ÿ £!ZH·Š1—3`Q@ň„Ñ„3,Q8aQ@ µlx"3åz›neŽ÷ÝVâS¥h©ñ­Ó^ñv6ÍÞ­ÑLcîÀâÑ£ Iyèö¨O*d÷९ðʦ[ þøŒPì Û4<¡Ž˜à!D!®ûä2!tw¨¢ñ` ¹`zW¼•(|_q1]qg!]gÖw¯H¬I6t¹•SL³ì#P^1iI´Á¶¯>"íˆt'€{:¤,­°é)wnúäL.©‚Û>hi2À*ƒ¢ðT¦~¦ëúšæÎ[piBëiôÏÞŸÝÌÂTůâ¢Lò¡¬/3`^3Ü\ Ó^„3¹µèÔ::8Ùß99ô_¹t²ÛõqwÔ¹™M%«¾¹i•ÜÔ>Úbx.çÝ—+üÚ—ùÉË"l˜á“Xí¨!§_¦pK2—gs´Ü£PaLÑHpžZ%ø8KOª8Ýåëd¯·ÿª·¿}$¸:/ÙŽÙjM"ÞpXÜï½ð÷ö:‡ÎDšÞÈ‚ ©€TÍ^w¯nÃÌTAªe8Äo€0m}2½ZÕ[Pæ5_çbÀgÈÈùNg¸I&( ×°ÈNcn%›¹eWs)c 6ÕnvöTרíEgŽºZçl¬,(âì“»Á9š†”`SÇ1þ¸çÌ›!ù2K­BPe¨aK­Ú£¢ºãn[v÷mÄÛ¹ã‚éî&Y”,ipÎnìÑßqGÞg7â¦À­€×®0©™MÊçzõ€Õ²›pÂ?ê‹}~Ù˜*øfÕüŒT½úWU‚è§3B^ñYlµZ§quUPPÑù,ßæú<•£ì–úA¥;6Xí[ÌÓŒoÀ$éô¦•¡Þ¼¢k8'×È_¢[wLæ»ýÈæá*2擦XÒ‚<)5DàšP`J0³[„™ÛÉ"BD0J íP¤£êè¾¥ni…”2BMfÚÎP¥fPõFž2/¾ä¼Näe£@´€9mnÚb'gT› 3g‡×j}ªÉž> 9ƒ6*y²Pœ™nâé¸_ˈ€±U&I®­t6ÛQ&Q?U”xc‰ üíÎö«®ÿªwܯð6NÅ܇ÒÜ^nisËԉٵ @‡”+ð‡ˆ¢}4äV$² Zšq‰¨"¾ÌEˆÏŠ¬ÃÐ|4Gð ÷˜ˆNÒâ=4ÓèoÆHvÈ3âh„À뮜µQ²Yd¯Ø…Õž±d$ 3{ƒÃÇp:E!|<;¯W{1Á"$qkãôZ0Ýj|Ó}Ó;®;›çùß»Gv“«Þ‚î1Ñ4z‘÷w|pè÷ÿÏex9´¤ª?Go¨,$‚LÉG)/Ø39é°ˆãyF™Û'!¢d'FK˜A/:»ý.r§âݺ+#Hº|†Á6ÛñHhñXÀ-û‚^\F†Ócé70{uäöžìÁò´¹?™ÌŒP~ZøvRôö!í+ú2ÁY&ئîbow}üR¿ŒôÎÈ4›Œ†Z¼†Á<·Èœ!³®ª.K»&HnZëìlˆæ}xƒ»šVˆëøèÄ¥«&Ô"¥ ÅÀÑñûÛŸ=l¥gM³—Ùκ=¢–íKhé|@¦êXx…ç{d÷ºG3Xv¦9 |Sî f'´hÂþÀ©ÈõoË›.=MFÕ¡§‹¶ì†’¦áÝåu Î,ˆ@©Ø4qƒgê]¨ÍÚ–¼~bU¶´z „¤K±ÀÐÆF7ìCìNƒ¤Öhmª÷úw´Õ-1vIJký[FÁ§#H´ò‚.ü: å3‚ˆìu[Ãu›dpp©ŽO¯ZŽD™d›™v$°ú¡MÄe$RÃÝ«Œì{œd×è·Èχµ¹-Wï‚ÖÎRn‡þkeT4J/63Uìš{ت‹ÀÑ:B•9XÔ„ t©‰¥bòKsEðIó.ú­5Ô|ñgÈTëÎÏòdý]ãYmDì'ý®¿w²ÌK–ºdZŽHqز£ ‡¸äuMº¤—Ét†8âbàljkŽf)Q SÝ׶‚è™ÅÁ.樮°’D°N^úOgÖÕ}jM6WÎL6£” þ“$ 3:ój œ²ðgb‰ÙQFT |Bä²)W3þüN=Ã}œþsk£èL_Óöñ)Y׳I£9~*ß ÜðÒëÅUíÞBÑõ%z¼îôõP(ã6Ûßé½xÀVa £w~®ȸｽÎÿo'{‡ÑOÞ†5ŠØ ç K ëÄÙÀ^uE[O©ÆÇëáeÀ­‹¶‘ôfx.5aŠ›y¨_ÁÓöN÷Š·éÂþÝcGjæ dkÚëûèΫë,ÝZÃ%ž;ŒXs‹|Æ3¢ZZŠ”ä£ÎÑËþ:üP£ °"²òtEPYbx¼úÃó¸‘>®Á™ µ Õ…R°\quv ùôù×Bj—þúûË+ÃCdïyUàK×vÅÔSOöõjÍ0µò«gá&¬Ò¯(‰^ÛÌJÉè„—ëu¥©æ÷L#ýú¶Q${% ŽZj¹zÚž¨žaÒoJByÝÑ$ßyÒ€ È[ñ×Û@©ºš—Y¸ìM—œ~ʽùµÙÌ §,7I9iÍ­` Š¢x±níÌFÁbdU²ê@¾”´$JaSFŠW— 4¯¸VäogÀÙ¢°ýÒå^×$T)sÁq/ä_K¨&i°>†Tã^‚t5úÊųhÓýÎÇI …µ2J͆÷µW·QCÉH…=ï! ?‹,’ç,Âõ+aÝV-ûrYîš°KTŠ6t¡á¡¨"ÝáÑ¡Ý ¿TøÃTÿÕ˜Ìñ^`fXÀÙC’†~¨…‡!0Ÿ„›T›0¯äYÒìÆÙíeT'eç"£JZDÂÑ’5×8éب˔ ‘—.ÜaôüÝ6 Iÿy+ÆúT ªÿÕ5¡,Ý;mµ¦ +…@òF•€7eÈÄa‡0i‚ˆE› Þ©0ˆ“x‰'2Ù¯²áô8¸Qº ±}£þ´î€“Gü}БCLü?‚•=_3}ŸÅLšgwQ“éðwCSß\®wÂO$“ ¬QpøšÍ_ 1Ñ}[îÏÛì•"‚;#¯=â*C-ë™A3™P€gþësûÒÿ ÐÁ€l‰¬ÿ×úÚÚŸÿ)ãÿ/ÿëÿûÿ·þ_ß"˜?ßÍ ,…¼ ¯FálÖ< ï1˜::ñM뿾dÿõ%³|Éô×ïÒÙ0JZ—ßkc ”PÚÝÝ?îuýW]y£¹|€õ@7†hJ’Eö ˜rS»B”#¬1àCø‚Ü9´‡OǛƬ†lúˆÆ²ÁˆÉ_ÔP¥4Çœm%bMpÛH6`7P6€¤ÚŠ0töüŒó7¾—SÔþ 8Ÿ‘¢¯¹ƒ$ÁÕÎÅÚÊ›3îèÖ2_îìîl{õÇ5mQd±GnÐ á(B6ÖF^är à  ºú—ÿIF5Ê=̃p"ý¨zPâÜe†p²ßûß“®ü Žî«ƒÝïÉcÛø©“™¢â4ƒÄ‰ÀACè)‡Ý£8’0ÕÑ”‚›9æ–t;¯N^Ú­<þæY¾ô;RÂÓXv[Œ1´éÝ€²6WJÒéŽÜÉÁîñ‹]û`PZï`ßûÖn¤‡nü³«0Œi»¥äKiºŒøŽÕL>RW¥_¹þžEñ= ¿e-u‡÷‰¦õ_ìöLÎÌw3·Ð ¯âi1éü(_—PD,8âåößüþÉááÁzS±ß£:ß^žÅ'\\œŸMŸQl†ß€Ýú´”ä®è¨)àgˆ±ì½p<™¹ûe9oÈ]IÞ y•A Û¹»dwÙP¢“1>®Aš&ƒˆ4„­—¥NõQˆ)[Ó“¬¥A’Ñ …÷O`þ¦ŒóG7-g/-»ªÊ΋4B¤—¹m)Ñ£o>>Cñ¹ XRçš#D"gUV Îô¤¥}RE®¢ý±``¬áÁ¥¹6ã’fèΰd-±×jÙ‡†.`PÑÌᲡæýqpíSklÕ1ä[ (#–Ì—‚®÷÷6^ÕN-­Œø†¬åþdã~Ëf £ð|æØÈaÑ8ëóÀ‚Ž|wŒõœ8J•ï»-qhœ ³u¦1@7· 3I*¯ÙŒmƒy´•Ù(ñÛÍb÷ƒÒ®(í­¦ÍZÝãœûÀZ}ÁbÓ·Æ4ªïXöä›6C°74,ƒønË ÂòÏGœ´QTv<Ñô쳕¾^ ‘ýç1|¥óuh£áß,‚—ºƒÓ5 k%ìy!Ð ×@Û½–6²Ïß °µ>Y×Ñ!)OI…OòÈ"^²Ø±n®EÉèÁæÌ/Ð|Bôú>¼9ìîHÕº C¹d¾îô}ª %¬ÃÂL"H±.†„-CÔ‡hìKÓ…4½/%c}ÿÀßé>?yù²·ÿ²¾‡êƒ>q˜8¾Á6¹}õ958©Fs¼9Ì 6§§e» ji¯BÇxbŠ¼l-Áž>œ¹öŠÓRÆMÛrq–Ì‚³eì9“Üœ•ª‹%=ŠrÚßKÆSM½Ýô.Y©ì]Š39¶ÒVp¤ˆ–3ð¥#dzzüÈ‚þ³À3Õuú357ÉéïYw{mqi%Z¬t/h 2 vFì`ó•ɮ‹=õî*9 üe¢d 7X‹Ë†îûy½úB#ͯæ^f¾ë«Ñ¼±n& ñH´jYEa€«†{CDFñ+BñËœ´¼dé­NžÎ¾šè^y_¥ÂL1ÓTØG¶ÄxظÌõÏsôS«EîSQêS>7€ú £ !=Â_¼*qwUocI®VLCÁ0õR‚E–ýW“YÕš9uÔ,¼ëZ ~ªd&¸=mà\Ìm~¹³5–YŸì¨­…(­Ñ+ݤŠ3­¶Ñ~Ai¯·¿ Çø÷îþñ—_*œ|– ¥tPÔiËPK#õ ‰´(%°üèQw0ÎT»Ðò´Aú8Þ`š®"]Ú\Ç)Šfê%P”Wôøö‘H98Ó[]° ÷ðŠÄWwÂF.úÏ]ϽíÝ.CP=ºó—ŠÍuZL…¸‡óñ„<-“ØuRÉbcqÃÆ£¾êiÅ¢ÄÙƒ,ãÕlMª™Ó¬¿Z•-îcú©4w›r¤ M±s)˜ÏÖeêÓ·Í Y^\4ããÉFË ;çŠ$wˆ„ts¶‹‹y‚ÜC ³€s–u­ç…ŠÖL§€•Ô#À¥…e•0®À€;]:0%Fn«ÿ,”÷ðáÃ>Cg}E’±¯&äYiVÜÚ˜´5‹Êј âþðrÚ^³É'ßÅþ${/žùòËúW“ íTÕ5¨B͸ÿÈT2OÁ²<“Ä'‹<…o‹a•Œg*†X$l•ñdKß„eV'cÅæƒÁlŒ¸u+òMÉ̞ΌüXd¯]5ºæóóU*Ó¼HËí^,™n.ª™å]€XÝ‚ç1 NÕ‚aÚC„ .ºŠ÷.$ÜH[[ˆ2[%gªNgÏiŽ0kObKŽ¿~ùå­$¤çîŠrë#ì¡»¾üŒÎŠ ú¸j%j€·KvÚnxõö!Ÿ=g;,ii‘Û¥så*b’‚­ú¹õ6ÜjÂçóûç00Û?ôÚeM3>±¼A3h&òžö^¡–àñá´Ò"SŽI´âhXUr®mÖûˆ£IÞûIíÿ¥“)€(KC¥­ºd~Õ&A Yš,Äá¯Z‡d*Ž;&Ñ°›–ä^çèÿyïØ?ì©0+JþÀ£²t>ÒRI#„±“lç?wû†¨gaÎÇ-o·sô²ËûÆvr3íw÷;Ïw»þN¯¿½Ûéí¹þ~°Š>)ýÿû¶•¼÷1-ºíÀII ¾êô5°Í[¡ƒé{0  ȯ¥I:Ad§‡‚„ÎîîOöp”‡:ᬭò>Äí‰- ŽyÀª KÝáœ"oK-òfþ³ê¸ã¨4¸ ¦ |[P;ž+M¯ ŠóQÛâ#§¾ÓNዼhBÎÕ–LoŸdL"‡–+5ò£E#VËv-Û¯°ñ*ž5÷P3Š?àt©‡ æ)ú=SHÇE‡W­ €zR¤Dãk™Ž1¾{:©ŸQe —'M~ï=~øðÉã ¬cez†vœn±íÂe›Ìò­ÅÝZpêì›ÄšCé–:ƒ½ýѽ̵‘]ĨŠÌ·4º}xè¿>8Úéÿ)ˆgOm¯eÕ‚X—®£ÝÞ“ÇvfaµÈ Î5Êwò‡òâ©L‚´¯š§>â,´žÁrP°v—W1J=9[ÞSçR²º©Îƒtu½¸«\þá–÷x³€+r†K¡SÐí6X¶6ª†º2•ß31n¨Ù ^¡e4{Äm€÷³꫹pœ—»o»ÛÇõ/% Pšã²® 5Vù²sh|„f”$(™{o¢¢ŠúÓZ,R˳ §|­ðkñRPpL6+kÙp³ÊŠÅ¥KrõgÁŸ‹"DZ+ÙÞR<ÌPôjbßZwÅ¢…U×È6&Và›ã ãvÈüê” ¸¿¦ŠâÏÆ*¹ƒë->ŒT§ø6ô=" €ò`¡G:¼FÖOg7,CkØzºŒ'!ñ„À³ºª¬²Šª ÍbNw=Cu¢ÝºÚ\Mô%bsViö¼.¨È‘Ïɸ°oÚDÛ‘]”,YåÐ, vâ_ëÀÉnªw[žäbÑ7Y1·XÀéi)Õ óUh/ô4ÒÔ¼šìÒÙ²®Gíl üy¤ßgxéaaÙf!dônÿÙyòbw¢tÇø5¥ÍÚÌ1¶¸J-Xåâì®ñ2«âz˜[‰m˜«PN‹ÇGG,á·dc³°j£un#Û(wâÌqã3V|$é4–ˆp\ÉŒŽf›ªçâp["1ü•má(gÎ%à&ÛW‰ Žœmo3 $Êp°ÇÅî2n]ö!מ¼Åø,Ú.ÕÚÔ:zríÓ†¥#øõ×^ùö›deddNÉe»;ì­=Y-:Ù®$ñ“{R&?‘èÜÍMŠDsr NìÐË’‡²xÀü_¹"-Ï$šÂFæ([Á5&ErÑœ0‘Gs)ä&Þ#Ã!ñ ƒË]º^Fî¨>-°6Áˆ)t8 ìKJù<¾ ¢D©Ã‡h8w [½.R¾íÄ׬躓ˆwpî²^ã™sè™Ë¯\zz‹PÔi" ‘«-Òßn¶Ïõé$0§Ubë¥5çÆ¢Qd°P/ÍŠúP,EÄ•Í6²bºe$]†.3`±¸µ;ÑÀe3•Z·]˜Z¾æ­†¡¤ãae™eyßiÒ$cô׋?#f&]U’>á1p5BáÅŠ‹Ú6]ÖN¾¿2äûô7#߸-VN/- Šå§·&ß+š7Kùñ¦Ï}•µ–Áo\Ú 4'w¿_µŽÙ¨úU†¢°1|¿ƒëÇvÌ@ˤJŽ(Ù€ò+cÞ%œ§2}Ï|õžÙkª “”*üÙ% ²Kj–­Ïq'O°œ6ÜC)Ú—Ç5¼ÊCŒÓ9à”|³d>¸¤xD*¡nuŠ“ T© Y|²ìÆ)Ö¶Ò‚´¼;>vÌŒäî¦;¶²\äZ¹Ù!Ã4ûJ¢¬Üw$n†QŠ©T‡š±[^ë¾ÐêŠ)çÍ"5ù’*ø/3 ¨†¥tCd—p@”3›ßWÊLf6]ÊE}¯«ëÕ+×8 Û„°Ì–LGX$í8:©mçlmÜ”r:Li^˜ È‘ \OíwÄàQü!}@'"Ù(ÑÜž½í#k@ÏÑ„\ú»ßñ` ºC|hÑÉXå+<{@äµ>*$7d™7¾Ç§ƒÁ‰•|(ïÓ}Vb]x+‰bÙTÛ­ë(”€cl±-~HìHÎ)ïV2åìB"„v˜úŠQtÐXËPH:Û÷·G 1TZOÃ4)G¾÷Ö*EÞp¨' ÂÀNÏGÉFpʇ»ßOf¡Îf1Oçäè€irÐ{†¶XPä •sÀÌêtÉÞ§ÜEfÃÓOk¿?ŸKPQŠ—ÏÅ< ¯>–FŽæ³v%çOõæên©«°°Wéd‘ƒÂ˜ýý(c^^ = ¶=ftƃQšB•9õ‚ƒK0ðFi¥‘À;‹.ZEǖı@2ܼS$¯$G¯ÞÒl’OÑh1ž­êL©’î”XূÓVú^ŸîbU<‹ Î6G$s†–ˆ;R€ÿK€˜²þE®üª·l_îr‹”Ä:qÂ3dÖ%³\%f4KNuvrnÜï0C‹ œU/_©¼d}Ëûÿ.žáEòl…+‹>çz_¶R_~Ʊb"ýaZѸŽŽx4ŽÂ’Ì Ÿ·Ÿ²è…ý•n…:Èr5h`&çäª ˆA¥™Þ-ÿEùþYbþ Ìë€eW+k“ è°ûÙÜ(ÁÌ]òJÌ™À‡¹ˆb²ÁÌ(ƒÍ }1­amÁæ8©HÒgîv›µ ,·`uQœ!iZ­–I Õf·yy‡Ì V!eÜ[ØC»Hòª i´Ë2òk4#a|Ã`‡¬½g⣛g"diãp:°¥rÌÂÐÃ:RÉÅVUºeX=%gA´“®³€· gX­X G½«-nP¾Æаók-NªêÖäV°ˆ¾_Çâe-ÙÛÅ^›²´O ÕOVë“çßÌ[ÃxN!g–R\«ÕZ4có2ñ48¥z”‹ýV—5…´Í Td–óEëfΚÛK຺û–Üz,¸‹e<¥8IJšCœkwT—hðK x1UnËuT×ù(gÂãGGPÍé]¨BFÇý¢÷f¯»¡%¨å&n"À'7ÞY0MÃ) #8Kæ³Bª¾Lío®w#Çr£›;Èû¿jVÅñŽ¼9>ØWœöÀ‰«¶¯ÒA”ºX‡|:ã|0"éà²Ù8¦Œ\Áh ¯nXfÅh ¾ˆ®_\ÖR©!¸jžcº¸LJ?Vä…¸¼Ä9¬z„µáÖ.Gqûv2 0ÒÈ¥"!’i·–­hPÁWöárYþôçÑhDÚ]%ZÅ<­›•˜ˆ¸ð,*ákÈy—Dy5M` FeÉØ.å¬eŒwƒY{|+¥¸Ünì4{š–±*`àd>µ1pýUH’!©yÊ7þG c»ÑÌÆ“ àÆÂÐ3É$$‘¢ÄŽ’`M-Ë0 ‰)3Î`{¬Bµ`òk ‰b¼äUpÓjT 47´ …Áøl$žÑy,DêT+v X @GçÖàMüä¥Ð;ÜSSÆ€'gÜ‹´ÛEjœ9£¬ Žx Ã&ª#Áh‚À%ºòºuÓ¤óUš´É¦x6äµaFÖÂÙÌ  ÕA™.l.ÈŒZ¬Öˆ³GŽ|'Û&¿s&%à6{ ¿­É*¶ÄizP&ÿ~&D.vÏZ€Ù«³€ŒoS„Ñ[Ž™Pd8?ž]Öu(rÏŠE¾ZjÍ_ŠŽ-¾TÉh•a¢SéüxÐÛñû‡»½cÿ¨Ë¬¢÷XÝR!¨nQÁ†opnEa–Šµº@Ƚ4 ¦ƒKeþ#,¸Žr›U1e“¸(€çí„ç”7‘[ÅÛ„Œ#r.tN’»Á<Z6)Æõy˜|ÿªpdˆY)u$2XSÝ£v8ÆêµRÕY]³²å«‰¸ÔMèÌ©.2Ø”é#¥&ÖÈÊßåtÂNçì «>Ý£h /qÛ½’¸´Q¯slZ%ˆ G­QòÈ»éÁ²$<ì% ÝUU2•l /=ÚÊûzhu )„œHà*~åBý-–Ïgö¬¹.·rà? ÷æX¸RØŒá5’-cNŠL–¦Bu‘‡¨çG"…Ü›|Éf\ÏZ4Æå#Ûs‰¸†ðWQ׋›26aòcŠ êÞÚànP™JF¢†WR¯Ð÷©D¡¬ÉpIÕmû‚ï¿÷žfäj,ÒºâÄÝÃPqR€9F cF•¿ E…²r—¨Öa™IzPvnš/M$û¦V¶ «üQÀdãÒ§Îb×ÉZ+±µLÑÙ„~µ‚ÞžU<`‰V|SÐ[$"ôè•ÝCņBâÀ ­ñ"(0N‘Â3´P$ħ„ø#ô^¢×èíÀÛ)%-Áy(J ®SG½€û8' Ù˦ÎKÄ;@]¢d+@¾…þ\ ¦}AT¦†1Ï_.HKä-°ß¿úgcƒ"ÊÀn+›CˆÀtø]A¢ß*–ê –8H9ä%ªÜ¬ªÁE`ø¿¬j™0¦“±žÐg˜Þ7¢õèQöæüdåä¶;øÝ–{IÚ5 ó‰Þ ‰ÛtZN­*ÈÜÍ| SYZczCn¢Ëd&H—Lc?_4 ÑÆkåÑðœjXNàYS;MSMo’à ã ± ŸÎD ’¨d $äªKzÞ ¢#;îYI2Â@P¤ROE-ÂVÍ–Æ™v-”û%)Q ‹²´áàöÀZ4SÚce¾H—ÂgT!MrWÁóÚföLû›Zê Êe||/Ââϲñá°q~Gãv®"ÃDÙYèg“ì(%ºá<Éjª¬0‹ž3šr_p¤Q5¡ñŒ…ÅT ÏÏ}_ו_e†*¹“o¥c\jO¤º î eÄL}•È–ÚPóþ´›Y.n÷‰9ë»[ ®Þ©×˜È`·Vˆ ÌvqH„òcao½{”¦µ6Kñš”Þ,±tèßßr­ä Ý¡¿YœÕRÜœ…Á;¤ã¹…Àl•Kæ°?çWÌúZ}UÊÂä(d•”ëCž™æÅ·LV¡©›fŒÔ Qˆ@Üójý”q4»ë¡Q@—eÄ2¸…ó´Äz”Ù¤ÿVzrVgŠZZtq}†!ší›¿ìê ðMÙ’ Å̲váÐl½£Ùª—½ØW½¸p”äõö!@I@ž¤/˜ŽE(!ãK ‰J)§‹Nshy'WFŠ£{®õÓ¨‚^$ø‘R±ZºµuUšéS¥4þÔ‚ûùù.\Ì{½ãr gݺ›·Ò9ê_ICE»æäpN¶»,æ‰of¤¢L£ô=æg1QD0_L“«Ùe«Ì´÷ѣŢ¾¿U(!0(Å'—ÍdŽÂIHÑ›,C` ÉÀÆŽ÷]-›´jÍ)Z1¶J`ýãÞ0¯JQmK«žÎЦl„bPr¦#)ü|OÐI¬Þ$œvãéY'̾®JŒ’ï,/ÊïU‡¯3»kó–-,5$'žC}vyáN^ÊfiÿÐÇ9,^u }e¢a°1ê:¶ -+¢—˜\‚óÿ:äå'¿MV;h{å¥ÉX"ö(8 ò乊RºËRÌOS ŠÐó)0{j6 `¿¦¢Ó³cmþ¦åTÊ’ÌÎãI2™‚é]G…æÙ¶Ìø`Šš3´i$K ð Í˜}~¹]JÏbïÑ#^›¯½'ÒÄÁªa…ÙÉCçزE`?¸œÇ8Ù³¤Ï“(ú:ãY&óÌK¾¶Ds@ãÁÁ öƒVÑ[ên*›E·ÏR&7E›ÝaÏDÁü–qÜ6p˺\®X™AO9¡‘ ²Ü´íj6Ë+²2Em¾GKÖ*³KçA»A"i¢S‰ª˜¬¢J¸|ôh­H¡`,¦auV1}¹€šü´°aú}YžåÓâæÈÏ H³c(_UR†ÕBoòeþ¡ƒZ€vq¨m-NL#úÜax6¿¸@zÒ¸3hö¿çï8ÕõõÓ§öS8 ÓE9£x¿„”ÿYqGn!ƒm{´b¶iëÖ$²ÝÛXq±Þj¹I°½{Kø¼OŸ)øª{¥<ºWÄ~/ÁìÝ…Ñ»7“wOO¼7Œó.;Î(ÓçUÅ—™@/⋹DÔzþ“P9n‡ÔªônLƒqˆ&dqÉÅE^^4¦˜‡ñ¬õw Se,^ÔÚ ÅøÛÒ¯æ·×§J% Œ­PEs±C± F{6äLÈ9' ¢EÚæˆVõRyqÆäÞV %›*Ö`NN+Ä›L9Å  åu·c~¢É¸Îàô«¥/좃Ü10æâál„òÁ¡aÏ ·0{V>Ù¡# …^Ÿ‚¯öö·º{ÝýãÎnÅ=˜XóC4ÅxÈn:»¡0ŒÒådˆ4“8–3e¹£ ÀÝzWÓh†æ!ݘJÆVQÍJaˆ0о|2…ÃHJîl.>¶XB[s¼3êI«Gž¸!µ ö'qx…º`eˆžKëgˆñÙTӔljÞÊFÑø³;pîèõ×Å÷8…¶áž…p8߸»EúËÂ;Æžö®¹EÔ\ÏÇh$ŽÇi/ÚÃv#kýËB ì%rºÀ¬A`%ÍãXÿÌy¨~z:22á`>‹>„*ürz×\‘Ê$ªûYþ³„ Î)D̪do/'€"áΆå´B)xl“_e4«ÃΉl<Ðr>£‹Ë³dšÚ1TEÌ L!9j0 íŒg!ܪ4¨¹ð8N¶¦Í!'°GêCCY~%°Pi<ˆLP5K¥]±â2Üf\E.(±Ae-¤Š¥óüV©ºc†×¸a)¢ ^)ˆ-™Ô_Lø}”ºM“3Š#¬ã7°™šŠ{ ¸a²°$ëÁË`Äškå‘d[_¥t—0žþ äă³ È°5šQneò- â ’ ¢ÑÐ% ±çsÝ™í]tH ®‹SµÖC4€ÿRg õ2DOS`‡s –i®(º›0åé Ñrc&/NaAûÅï½\‡M£ÁÛ²H»©b‘`q×W“ª•”âÉ?U–B!‹A-ŠV’Õë*§ÌÁJn ›¦»çˆ&À7,ÌÄ•3æCœd£›Ô3Nå9ŸòLhiRÍdGö;8±/v`ÿT<‘°ð`*[îî-ôVZÆ./¤0üÛ­“«p&7¤)3‡ª)›$Í*ˆì¶¤1® 鎥˜ Ë­[–•.– ï-*‹/e|Š{3í¶Iq) )rx^L…EâjòM%zCjB´eÌÌXº´ùdH™Ö@ì%¹UjS§M¥#”}†ýo)ñôHÝ yo/ëþÿTùŸeÿ] šj=k­µ·/ñ*ÜM.þçwÿ·ÿž={Š×ÿôÍûïÚúÓgk‚oëÿôÍÚãµµ'×þgm}íÙ“õÿñþç?éßÿÓÿCþU€óø™vÀ[ïñÚú³æڷ͵ÇÀT*Íå{£änêùä ÞÛqÜ<|^½§(]mUX¨P›Lƒ‹q§ ¸»‹°F¦|ƒÖ%Á¸¸(6Á’¼×½ýgOÛ>ýñê{}ïÇm «sØóÎç1'CW`4˜HëMÙE”±ÄñAp.‡X% gíq2Dæûå6 í LÎ ¯~G׺¬fäŒ8³Ù4:›Ï$)·OÑÑÀSSaÖÞ ¨L•‡d&5:J@žº”Ž€Äæ ¯8 &² ‘dž^ÌQæ«`&‰;2›§Ò¸‡Äî°K¸†@®‡4¥†ÜöþìÕ_Gñ“ÇígOn¹X£±7ÍÇglÉc9/Òl¾§ÓdªÀÛ>T0·2bª·L¯¢¸LÇÏžJià¦aæöò 'LÐ*Æ/cxvEh‡œxH.%or ”¨jÕn&Œaʦ̙p’`pI{%z¹F`–\\ŒÂæîG«ÎVKf/‰qzq©=A!˜RD‰ö÷¨ÛÙÙë¶ÆCw–Èö"’U'Îåã¡–ð ÷­]{ÀòÏñ[ Ç©ö¾¯7¼`>KƤõ„=¤¹ryIp»óÙ|¼þÈïx·oöqª6‹ †þûðÆTáw¸Ñ`9 ™.Ö½ØÌåDJ!ØaÈs’Ȇc( ¶—¦•?õ²è|RÞ³€C.D#Ï5í ¼ýÞAÿ±}nøšòj «jpé7ÕÑ<…NÀQGnv3¢³ÚÙï÷¼müÎNç¸Ó?îS8d"‰µÄ×ÝývÞÓ§ ýãÎM]Úf×0›ñyÒÂ?(H9.0{Âå…­à9îb¾½¥p—|œ¼(}?ØYpŽNöwNÉ8–µêrå%±É8L“´dlj2?q²—ÝýîQoƒÕ÷»Û½Î.ð hmLØXdþˆá}øísÜ“ /Å»6ôÞ‡Ó8ùp˜ÙÇœ7Ï1ŸÎ£pBƒyö´‰‚b9öÈŒé•×…÷Îó—È¡ö‘eù¡Û=ôŸ£ ôá1¼{ºü|øÊ‚ö4„’$=æá±ÿrÿÄ?êîÀfº ãFQ€ÍìôðE fÔcP>–ÄàNýñ`NŠ<.¨ ÇÎ …”üa»ÿ£Ç/°luÓ1^ ÀäÍã!Ò÷ÏG—Þ@Ï]!#£'ÜO5Ùv+€^Gƒ&&&#×Uå“LðæÀêáþg0™´.­ª|/žÏÓ‘7ŠÎÖg"tàÍ)¢öÝÇ(ºGÙ~4ˆf\hˆÜj;‡+0Šß‡SUeôè„—^Fç3RdQÈ~èöeð!°>1:D3=c8_VÕá‚Ö!á€j;ÉÈ„Ñ0¡hˆ§(jÝ CRÿû `¸ÎÖ×Û×ß>S¥fÁ¹hsR´³pv…!™2y©yI¨úpJðXq¦L$AÄ‹”ÎmN¢–W½í› ØÌ ]–¤©f…ðdÎtvC2v „ÛOèt­aª’”Qø˜è_ Ë8E ráÑJ)² Î×4ù@$(¡½ð>´òéyYTîÕCOfW‰P;؉‚܇71àB_òÓ`ÀA¤Üù1rPý7íè ¯ogé&í4|$«^&p4ÒhŒLs=¥eVAsLCŽbýn@×<#'^®ðH:(P8[–®®tNÆŒm<ãˆíúnϯÕf&·zÕ®ƒ»qYÒ¥œºž0nIù8ñUCž–}1«>HY7ý¶.8GdIR8Þ>DQì‰f„ÁLñ2$éÛªÝà£ñ8íJíganªìÕ³”Îc·×ó䚯‹v€ö#¡ZÜJgx)ÒX"RÇ;®=DpÖõ†´Úˆ3ÓªÓ»I_¼é<&SÐóèZHC ¿}xB¨bng"ÌÈ‚ª³ûºóSßß;Ù=î1QØÝi›wôh5ye ‰ó«;, (É×½ý½NoßïîýDP&0x/Q ¸™>Üpr`8{œ½ÆC,˜uÔÝéu·…ôæ+ìÚ•Ýž&sà‹šÌ¬ò¦¬[FX‡ÓÅ×tlÛ=èì(â+U^"E”«/‘(¡‰> ›Ú˜À³¢‡ ’ŽØ_ð’ÂTG.ûðͨ™Äh4jO¬´mÒ‚Šù Ð^:ºQYÙv„wp6Þ‡HÖêÌ?8Š}è+xi@; †…PÝB&0¿î]2‡Êtíc^ ˜¤táÆ‚¡T:¤eô1mQJW ]SŸ‘œ7·¦qB¦aùÌ@?…¾ Ú—üÂÖ’ :î5¤éZ¥7vi¸ZkZR$s.HÊ' ç(ÆÈ,Å\ŒÀ¡o2ô0ŸcHT¯&Jƒýî‹Þ~w§fÕ =EÿàXµÄ®Ðz¬#dÌÒ:79=v³ÉYš º‡tfûê£ßbg·÷rMfÚ@¡îv¶É~F±cˆç¶{gO-h†€)‹z,!]ô' A‚‘Úþ›.´7Pæ±à#˜EcDܤýd΀ï¯Ö%ÉÊ”UœPó¯dÝií.xqÕ¬¢ãù*b¼¢O\“c"=‹÷N2̧SÔG¨«\L«ÙJ l¹•åÉ~oïp—&¶»cc6Æâjîf>‰2ý3|ý ßfÞǃó:y Ó"ĸ¡?Î…Ó«'‰Q…'Ü c¾!Ó€°˜ k Œð®/ r b¾[ÝÛ—ê*y]0ÄlÐÌÍ=êP½á÷v»Í—×´àø ØUاÔ"XÀâ„Ó®“ØrÈöIŠ¾öŸ=mØu55ŠîªXF½À:vA ~þ¤áv:TºÁòÚƒþ·<’ÃòW–™:ÍìEñË×ÒQ¤ÕX’‹%ŽçÄ·cŒ» f˜p¼àŽA!w`VÓ~ÞßùÁ›~Kz‚²à%Œls—ÄZtŠbYEÔ¨Dáêò{mÚª¥Xâ>)’…p<G’c­@h_ u`B—«s¼ =ߟRÚhöQ“ÚöZá 4ƒkAD4¿ÀÉ‚¹œ¨4øîC*((6ûAáa0$tV§‰†uFi²ªØõÔûSëië)ùR'V ¼T”oš¿QÇÀ1zÑékRL} %ˆ6ËYDkUd˜,M5€dêqÿMv9£'°ŽL|²\šÌ#æ±f²IÂ>8§d˜ÂZBT”¡¶‡¡"mòbSÚ?4²òSª}gÙ+â£)ã~4)lôÐ…;Ð)žƒ ·í—®Ð§FÙI݃vòRæ§Cµ3MUU€Í(å”)›»YÒŒäæ bõÙSEã¤Í+%˜É‚JE§Å(m{2a”ô>þìî{«¥ÄÁ:°Ô19‰ªŒ„ -Io} sXÓ}®ÓÖÖìumûàhÇ Ê7êÎaƼÆW9\Û¬j£Žàu¬kæôVLøÀ£Ué ñ‘÷£5BÀår—šgÙ ÆÄi<+gv^ƒÝ¿mÆ€áŠ(¼o ¤Ç͈ØÂ×á,º¸€ÑF˜%Hñ'-a!sÂ1+sî Gõ Ïç¬þ,0Ü-À¾8JÀËÐ0Ðr#eTñÞµX÷©¨ü‹Xוý1 ÎÂQùq\ kðÄdUZ\‰v |·µ¶R[¨Vn87=Á½$׉Òè nþÙ¥dŨi±ÌVê=ßó:½7ºÕmb›Ý¾½w¸¶öÍS<šóøódÆ€¹TDÓ«ƒþ±†@, RèvUo¡ÃÀ*Ÿ5Ð#BèGÝ.GZ½b[K8·ˆÄÙ•#Ò’]JÜD?% ;I#3{´ï¸]UÂ÷¾Ù÷UØ&žÆ5xÆ2Ø€I6M€ñBÓ °æ£„A—¤ˆy ')¡uÑðýÒ¾jÇ•¶âíŽ;• Ü0“Š£žÇÑ?`íŸì‘N„Ys¿·£ & …DKHK/­qðÞâ¯Æé‡?<»`ù !÷úÖTâU&Œªô\©+}ÜdÔf‰@¤píãzkýÔý&2§Ào]¬èu$¼¨jJs$xÖT¡I‚ª1ä)% ”•|J+–½5ðêra áªkn)”°xÄ^Ü.<…Šì=¡WPw­Ü”ïÈ€ñl¤…Àùïjë£{ìyHÌ õ?û”L ÎRãFA]Yš_"HŒœ™ß¿o4±éV<±D’ÄõŒ)×”æƒÓ³)”y5—Û|‰EÆå6û–â©ÏQÿYpŽ9B @â¸(çz™Ó-§ž\é“IÍ&Á,,‚Þ?>Üu19p>™’ÔËÌ=i‘¼}0D¦^³‡˜«õ·ŒOHmæ=i}ó¨€iz|QÄ3=&žéis ئ'ŠgE9 +†»Y¤þñË£ã½Þ~%F¥dÄÒfÀO9” "ÁòWát2hÒ曧Ô5÷x1ÿ5š¥s³™0ª'P @Pøóu¸hG'^Þ‹7ëkíšÛP  mÔ!!e:?cÎ]²z|PÒË3œë´h)ë°6òtF{ªÑˆMS”D!sb&b1´XÍ'­uÝ3éyCÈ‘f”‹ÓNbN u`™”8RIDµn mT@ÕúUzý/±¶# ’ ‰Kís›jÏ2ŸáPcçÎññ‘œ;ì¸ûæn £â†¶Æä<…¼I|¡ä†Ûä´¶›\¼ ødYò%ÁàÙŽ‘_V΂—/ &:G{^íÐX-£LÆ pæÑœ€<êû%°hÞaûí ItTÀ“^k”–ä´-¶ÁK½Ø9Ú^õz¦E·%ï…\ÑŒ‹WWˆ©“Ff§1[¨õÈJ)‹ô=tNŽ_õiˆÚ~˜ûd]g°±ÃÙÌFÁ0¹bk©®b›gÓ.ÍÙxdUÃ}^übïPMÝfã5p}¥mòÄJ„^§¿ÝëyÒ Cbu”#Ð!áËÐX–pÔûAIJûQ¤<0=˜"Dv^„ÈØ|öIs}½¹þ' ‘ÕØn[›Ò×ØÒ-iË!{¢œu–úÆl•EƒšìƒÔÚ/kJŠVQû/QyÑ÷÷Žýýnw…º(½§¦Âk–µPÀeÜ€úÜÈYX€PÂfºó3 7Œ=þ¶Þ`é´ê´èG¥’Ò¶µo0ZPÃá 8Ò­-&g¿*SVRÄÞÞ­(ÅgAKä—Jäv¢¦˜=Œ‘.¬Np¶ y´ªØ8lKÅ)¬.CF‚`ÊQï(Æ,ÿOC2'ä’¸›Oú¯üíƒýãîþq-²°a69zYf`Á€Râ\U1z ô{oÈ"Ãp'Út5k’c^a¾ék“÷MFp‡'£BïCGÄÜ-L±€÷¸õì[´#ÒK2[­¨I‹¬§»‰3y±Ž&6@: &1—)AAÆiˆB2òž ò·6_¹4^ Í‚°”ÂÔÒ:\ð£˜/ÑÆ$õ±OÈ:k2 Ä•¢_à¿0ÅkLÇ*+‡6.q©%±zpØkªVh% h§·À ñ*ÊØ-Ûb:¥WaðÞ²H¶ ˆUÒ aÄí‹AïzIà ¦†$~ã3Ì›äéþÊÌ@€»åY4)C$›¸úÝ#ô,÷ *½íî¸6åF½¹Ç0‹>ŠÎ¦›ësä*ZE/0Z…¡¶u’™m¢ ?éJ³ê³ØQ¬•Ñ3N6ßm<-3”;úO;íÝÑ "$ßÇ›…w§Èúl);oN[ûÍR"œ±û–¤ËÝuí¥á˜G UÉR˜ÌäpÄÊr" |{të‘^¼5p$ µþÀVÂ¥‰|°²a¥"»öÉ>á¼Ë`:0”nÛÊÞ½û°ÿD.¬ýœÓÐ2ç¤pkHƒÚ&+Û"SgÝ«.¡=JMÐðÈÀzÇD§ªC{´ áY’¢Àê—5´X1t†²>œ{Öö¶”“Ž×%'¢PbúŽW㶫"r™Ù TƒÑä2¨6 0 iþüç&+1àêÇ< ™†• Gþe^ÎÎFʯ[8•ío¥¢a"0®*PxBoF4˜LÇèjEÛs%º’€&öû'ýC4ØÆm¿_Á]Ïöë”Ð%:§ ó~hcƒ»O¤/6üÉ´¥Ýª¥CbQ’ÛàÙ$…r³ökµ(uºþÒK¢Àé,ÆQ:Þí$&¦;7–oÓ÷Ãä*Sjº.dq+‹Ú™ù1ñ0–<@VÀ²^О·¹ÆJüÇþþáQoÿøYkN ±i ÈWAyÚ"«nÃV@…!éaáÊRäæ õTøAd&Fb@hÍ‚w§6O•!†ŠØ§䔂¶3ÉŒ×ÑûI G¨ê„ÃŒ¡ iM²¾;"1B&¢IÁ-›0œ!˜§à,Fd8òºozÇ–úM2®ù¬+nÓ]†Jc1²ÀyVÃ^ƒ±ª¦¥FÊ*O&E A«‘ Ç'±«zd‘î&bÿÀ‡ NÔÒ›cÿ•x¥&šu:0"gœØ Ö<ÖL:)º”"ÇÖD*Ä ¾ :p2*É5ëѺËB3yt—jʀś Ý Ú9¸¯¦V•QuØ>y“FÓæH “Ë&Âë͈vÝŠ¶HG‰ÝìÉ®¡ûnÍöZPÑÍÊá#œM×R6âóþN£´2ÓVtøýYk°ª—AôSèÒ&+È. I‚0pðèáxB;´fZ Ȩ$ÚŠLq SGÑ…ÇýùI¿ µè~E å!Gä"ŸnE-¤P Ûg›.@Rç7$NÅà$Z ^¦eˆšòTCŸ´‚Si³;t¸òM÷4Ç@ Œ$ná¢@¥ –Ï„/S'“ƒó>9ˆÚ&>RŸ,N‘PgwÂ]g7š£ªã>i­=²ëdèi·,Öè¢V7³"µl¯ÈÄŠþaûVòÖ‡—FcÙÕ!‚tn˜jáa­Š\šèñNþp†ÔyÊ™ÙøŽSB&r9Î:¶aÆ´«',ƒÛîjVgùê@±mmÞëK1³M`fÿÜ\·ä’,Üc¿*ÅNœ[ ‰qí…«¥¥Ð?½cjß?:88î+rØ–:¥w{û]GàÀ„?ÌÑʽþPœk¸”1ÐCZè†A‚)àE§t€dü±ëáS'YVÍH+q'O,¸ ‰M+ úT›psÉ"û ë&öñ„·¥4O[OŒ¸ò}ÆX N(Îh^y/÷O¼;Ù»ã\$ˆÊ€v/³XtãÐ!'„ƒ*q>UÜë7.ó+N_¡O²µuñU—*§Fž0 ªMs¨h19D–‡EÂH»}Vˆ~ÒF+Åœ±A¬µ‹e9b¾;È?€}Ò1Ëx*Îv%u?©UÑ\BÄîÑ"`$ÖHyfÉb²±Ç¾ÒJ>YÅ9ÀÞU;Q§£±)oáŽ%A —š°ªlk«‡ëòŽlÛ|…]÷ªócW#f…‡«B%¦Ø†º6K’QZS’ã"T¯Aîôx‚‡‡Ö(kšÎÔ•«+£œ÷ªž]tE˜A'¦.§0$w@&¥RíöQ`›åZe!7@R$»JÎCn†#Qe- ˆR\ îG9¯-ʬ!Dc[®}J”ä.Ô”Á…¦eÑK=õTl4ªGÂP—¨¦©ûèÀ‚Ò:íoRÓ<Ñ(­Ë¯‚áJ8´ŽèCËÔ€À-Âø'â%œA»j'YVܹ¤Àñ³ˆpPÔ4åˆz>‹óDr0¦Ù³v²e/ ËZ"DÛˆD‰b­OŽÒd…€×ïó×/ÉÉÒ-ñÇt6AÃi¼í•žMú'¨ã-²âÇá6i[&d#Ì„Àá”x¯ö@kw™‘“TtQœEER‹ü°,4´0–@‰Êáî}Ù2Å£*³Ì(a†g:m‹Œ‰Ø æ,EÓhW‚¹ÇlˆÉ:Ûþ^ÿ¥ß=::8jwú~8¦,·±8ç€NÄ!@æ‡d¼H£ÉÁY^Ž/€à#U”‹HرßÙëö;Ûr‡â+3H.È· c~çêÃœiY‘u´6S…)uˆ²Ö~¹ÝÈAÉÊ|ä•-ö™ÍÙæ^3ëJw$~D[ª@S¾ŸçÔy<ý#L­³{ðÒåÒÅÝE3¶ç’X o`v¦–Ï?|QûYÙ¨Îð[$døº@æøCñG¬pý †}²¬ 2'I´‚;xÿ>Çð·äS€C!å¬RD[JZ©|~ÒÛÝqÈ9<…ŽÔÚª ÷b‚ÑIˆ!ÀÕáåÌ7eï/<¾Cb0ƒ°%ƒ´UœœÌ±ûæ°»},§u€¸>«gÏ×aÄÝd[öÑAôêð„i ´krgθÆðSÇKZC㺱õû‡˜J¬ß=Vþm6º–t~&Ûa@´5aõŽ_ùbª'F Û«iòƒ}Ú‹¾Hî˜2%2‘\‰¢7¬‰ZYÐ`éÚf p+Ùy¨˜Ñàx):ÌQ=Û!ÖÈZ’geY°óüeƒ ™ÎÚ5­ã۶ϬV˜í^쪲ÂFÛŒi\t”¸k‚TUg²€/'/5Š¥—ÍÓ­I–%hÿØ=z~ÐïúÅ£Kí¹@3óƒzÊâÛ. ÃD/B|q‚—4ƒ?ží—xa±`…-¼o_¡¼3Ì™ÈU‰¾`Œ7i„óœ°Sb_8SÍÊk1|ª6:ŠB0†¦Æ¬:¶]baͼ}¢ª½{Ì¿àöé“z -JÅgö÷ßØfmS%…‚I&Ãù€Û’ƒç}ÓzüH§ ¨5¥¼xÚBp˜þ±ÕÜSä7 ¨§f†•N²# C_QÀéÄ1ktŸ=êú{£üþÁžDOa4 t 4uL"\8LJ‰,ëìû|Ti B‰ñä$@û;Ýç'/_öö_X18M¢uà¤7š7 fJBCVƒ–Œ%ãq ƒ¥œ,ë0J¯<[¥õ3¢§·æØ`]-šÄxJYï& XÑoZ,†ãÁäÆ«?ß>8ü©á²SúbϽ%úÓ&*xÚN¢‘$Naqz0,ÊA›÷ÄéeÖ˜±»ûÂÇX>íîžßÙ=|ÕQ¶[™Ý¨õîluù{ù~åMvÂUüïþ; ÿžåxž-£×úºmÈC6j5ïsØ€¨P¶DöŽ÷-a;â\j™É íQ=\ûÇ;ÛÝÝULK¿}°£K8F³–A—!6,3ƒ¹Ùëíi 7¼?ƒ‚O ¡D‚fÜÇć-S ÎaçEw— q¸æÀá º`?D+Ú£ËYXJDÇåÁ"m];q ÊÊ~F¢¡k[qèth7 ¨³C"(Òv; E_N± hšàÙ*ƒ8Âä‹xLÚó*ÂÒ({qdãšÕLõLFóÿ_ó²[TU3!=)$Ç ‚@Oy+mi­±sSÎ À±èòÜǼºŠqëDÆ_ö6töÄžhÝ»LVÝf¦Öœ„(£‰àrä»]»ê1ƒ[æu` ÎêÌ¡Ä•4¾™Wù˜&8/³ÒK«±°fFfŒ€Ü¸H¦Ðó1y)qDb•á›ý;t׶¢À "µñdÆ cÏ$lø®np¤a¨•ƒ%$QSj…ã"y+~ƒ_9—qS|F/é„ñŸÊïi‘§Ò`dÑFZl#¢”Ú°éRG}âè P q|@³ÄD3òœK¤ºa/ÃcͺlÁ7Þ„@49 !™¸ÐÚ“Ü›ciOÛ³N%šsPGRx múBÈi©¸0ÆÝ—…Ψ{Áà ï“1RI%¼¤ÇÑEà« i?UXþ¡>¾£›†(nV~Jûå#}T‡#åÈ-£zX—çÞþY0"Ä“$s‡2 ‚¬’p~Õë¿ì­zGýgkkkÀûïõÞ”„žÚÛCÖc|ö¡GÖµ¤,ilk7Wl¯š>l†ýãUÀ((nðýU±¯»oi¼•¸¶sô²”ùŽÒû•Ä@,Yá,ñºª©ÐŽ±›%:§>@˜Þ8~‰T=™ #Áu„ r„ 1â1>ÐêmÎêÅך”ñÇë6%£!’ƒåßÆyW¤œèk¦Ê%±«Hžðð¨w½×yc˜B¹°¿šÔlÔHÑ4li€ȓÇñ«Y·euàÅSGÜmq O SÚés‹ã kÂ-*™º¶½§KŸ(`ᇄüöñ$Õ–1»>’4ô¶ŒRàÔú³ù0J”€8˜_G£;ˉ›£è}FÎ%3¢Œåœ ,†ÌQÙ–B×ÕæYØÔ¡qtaÿs²5%ç­’sDÕ1q´¿óŽmšP;$í0FœÛ–Ó¸rmTxÇ’«¥jªˆµ5˳¦ó7èa*Èönì±<òQÀëp¾–@ãð[û* jYÁÞ±Ú<–À;Ÿ7€ w| ýÝiBv÷´âÇ:Þl^tš—“>¾°])§m”ÌtS¤RÍkwaüÓ&n  á'Jt[?˜ÀDÀFŒ-#·ÒpBj½kÅWf&zÍö‹ÝÎ˾ËéNó€r‚‡ÄVÓˆP±´óm\wv‘ ‡À!½ß 8ú:‘”D¹w›¨·)íɳßgJCÊìEÖÿÙ‰òñ32ÌÐê“)kšô¶Jª”ñN>è¿j7«lXvГԊwbÛU`= ¡H‡Æ5¦ŠÜ®êÒÙí,º9+\AÈMÃ4™±¿Ž‡ðÔD1±R;â=Çåjßi7o * (x'¹B¨¸ÊІˆj%UG2T€H‰­- 98ñ•ÖT쪢 (WˆÖFQ´õŽˆsrqiŠ¹°Ò4Ù¢*Ô –G¡,Ú]c[bôÚ/n†Â³£Ï°Š¼”ıÒ2ÔM2]‘m³ | ñp5“ó¦É·C‹§‚ï¤ùp6ÜNI\íÑ †잘C¦iu¤¤à©¸| W¹ÑÃ3ÇJsÌ$¥‹Q¨”Ïö”íÓS:ù¬)Fë@y鈕>\£ Ž޲D|‘âD"õ³â!PääÂ;ÚižL“ü»«VW7ö· ד«ª-ÜV­°µ$‰¿JŸ~»¶fÛh}™¿fy;‘]¼õZÓåõ¿½<<\µ#x©k ¨ÑHÇA2qÚÅÀ'ݾ;ým” Åó‰¦ S—»{Bí*à ÁÌQR20Ž¬¤rÏ÷ê@-=m9f7nxm¶ŽÕ9É,%3pG$E# è}4!qh³†øÏÿ†w»Šs)–ÉlÛB0ÑÙ$C}ÎQè¿Á'!˜]rdu|)ȯ¾DÏ "ŸÐø<°í÷2|kÆ:I€æŸ[MŒ8F~ŠkÐü†ù#8µ5O¡ ‡:2V÷nô0¥W”–uÑŸb÷Ž%Í Å]ÛEIvkvͪó÷u¢C³é"˜‰/ND S·lS2¸³üÎÑö«Þ1,ÅÉQ·o]ƒvf«3t^Oêøç3£mNŽ§ò<)ŸDÓ§‡8µhÍÆYþDKãÆÛÏ\˜ös¯»gT¾¤¬¶Ü‘œÊ™øÂÀðŠÐ7÷§GªŒÈâEþ ã=ãvb‘†ÖÇ·9­dSŸo«|$tÁNà X —‰óR5¶Ó%OÛªJ9³ñþô=Ç&1Y~UPú¡¨]mA³Ž42U6Ä2†“£]v¤,B’îåBÔ† ¯ü3òý¹ê‘'D®ÇdÏP×ꃆƒ­•!]V®(6‡_Ñ/vâ‡(¼¢£³JF¡„–|á‘/Wu.˜UEÅhÂx!:;»Ñ:o½µþ´µ¾ªqa²ÖÓõo-Æ#cŽ½6çÎCC'¤ÐI#vºôövѧ7N#žETB+ Éše¼@D'u%ww&.š¶\¯§Oþ¼fòà± r6?“\ ÊÚƒ)Ž2Õšúúó<~«I0)jš*£æDt\ø:2Hf«Át~ŽÁØPŒ…7NŠüðR®PSÒ(B~d·û{jUTN”o‡ÂŠ(ZÉ:ÿ ÓuR2ÍŒªÈ©6¼"Y_ЗÍ]§Ú"²×ª¬|S~ììfe)¦Ün0tu†CPZî+K‘çâ,cóñøFÅ çÀT€*>$(B…åì‰0|7lˆWÁ™ªÒ ¡l2¡\Z²œâl†&ùœé@¿7ôBÖnd‰‘¬ÃXÆýA‘ØóXEX‘BÀN_ûŽ]+CVEA0Ð’Àj~hS°Ïìå°íSF¶å ÛCÊX-åؼl5Kù$h‘9Îßûr÷à¹Ú¶ ˆ6eëd©MZÑQLÛ¹áÁœ#3cúëÆöü%£ 0§’vP%ÉÄpsZ7S¤)ÍE Yv®L¨ oœ7®˜„<Ì®údqh™U‰ùžOŽÁŠ— yÉû/¿¦è&™mÎnRê j6DÎÔ“Ç¢/`ŠOÅ„ËDž±4xl Ã·ûð–IÆÙ)ÈAfóv@ùÓÔ×âgkk±Ó"¾LØKØúÁ(I­½ˆ‘€ÙýÐÆð˜óÇ–¹9g$“;Ðåã8F‘wŽÐMH’´¥ìùí°nŽ a–çÇ'Ž…¸ÃðeCbh%¸A#cÃ!­—œ«Šˆ{µ1@6˘eïÑ6q%¬@hB4è(¨a õ¯ÉÒ e–÷atHÛC²Îc̲/òÖVõ–*/]Zx/¹ÜXûE:8L|­ï8ÌVÃ:%ëìRîRti^ ¼h5™‘ë£ÕßQÇ6„÷»oŽ:}ct¤c@iïÏÛoÞ¼ííoïžìtÉ:]w><|›Õ¡ó„-võ}h‘vÝ“£ó ™‚ʺuaØ÷99 S…ÔÑVˆã†E •qç·Íµ?[L—³òÖufaaLè‚雄|\©©`N”UC—€xBj–®ÐŒ ·¦Âƒ Ðt×~:1)…ÌNM&>e厳MvŸ*¶ÛijeÔ^%·¦:YG²s˜,2‘æ¢6LK'zŠ`—rÚµÖ0!±ì¸øXX5¸¡®"2:³¦¯ß}ù#Þ^"[Kô…tÒ¹ôJ ÔJ=3f¸ÄIJÈqå9D¸æ[‰µ×»ÃXX·m‘dWŒ¨Xhë=S‡ÎÑ°v:ôÂ$µÌÒÒl—ôA5!ÎÙþ»ÈŒf“‚Ø4JëEÜ[-Šxf _õìž#gG‚ŸO£¸(Y]]9WòtsÖ3ÝF‘µ•WFEî¢ø«úÒ ÷AíËU +¿îíµ¤H\1‹‘³ŠüBˆÚÎîš5ã©cc'Qi8¢tÓø⥧é{4Gµ$gF±™ðÂy"@ñÙÙ;á`” [ÔP0»\?Ib6³[ÉÀ3¡ÒܜׯÂëàG¤í™L(:öê•JBWò÷éµ3C ÷%IhÏG>çD1ByrkW¦Dûq”)÷jo;Î2&EškˆX·×¬BçÍ&r1ç5h°Ý= U›MYvm?X%£(ž 8ÉNX®ÌKÄ*:ÏÄWÔv½evvlëéšDZyWðˆUÝ bJJ†Nv‰´šWu™\ ˆռ÷á )úL4>^ý›ôG ‹w€½ï«°$¾SyµV½íÃCŽ§úwB*íñóŸŽ»ý¶Z…þ_W‘³“sÍ@9`[ƒ"8BBâÓL f¸ßúÞ¯N6Ë:£0I!öÔÝ…†Ľ”ø x—J¥ BO}ñ”$ Ûñê|@ÚE@¾D àv“nÃ19fº€"3³9ÍZðبR¦IbImlÁ!,'æ{Á’‘òÌ^cˆW˨Ǫö³)59$ô[÷Æqƒý°¡œx¶9i׫n ŒNÊÙj*{âj«h$—°Y,Ö”™C@io¨8Ô\~.WέaK µªp•²r‘о¤îv`9Bi¹h1-fˆÜ5`fJɆ;v-ØìÃ&r^#¶7g^@by雩 ø–DUAsp$,ü5h0jm!R݆”ÿ$õÙ5Ål¯®ÂÿŠ—C‹Ó^ÐÀ8ój>R„ñ)Éøɲ‚J*±Èf åo€qŒÆxE˜¨&¹ ºÈB—]IDš¯`å9@K m’`ÓÔÊœ¢1á”kÉ€¥ZV"/Q’[1MÆií.'.Ö1_•Ñ)ÁöVAÉ8rɆB3EwÁ^P±¤¦ôðøˆV£ç¿êítýÃÞþq×äO6× ŠD‡’ŒÕ›&KÌÀ„Ü,QqûHÔ=f ±çø…é)0{iQ"ŸÉf'qï]$¯R;kAIÈ3Ñeµ±¬-Î:¶n¸Óã&mÏMä?·¾Ö×ZÏ\®Ûv–rxi­1ÈhÝ¡õ3 Ýì£üÝÌ}õ*Iß2Áf’4º®æ¢…æÛ»°àl¥=Žó$;Ù ’ ˆÌ–²(&ƒ=´$Þ?ïóäjãì´ûƒ“û¨ ¡E±B5 ­z¹Iha+²:˜]‹âN |f›Ú>1à Î!³kµuˆchÁT›ïPmRUZf£ÞžºÏXªh`*'s¨S'ôÁÕè¦ ‡áСg½µ÷œ"5ÈàMYrlRœÇLzo¦÷Ñ͆ÍÃlë8;y°2;:îîõ­³‚ 1J·vÆûlâVü°îxB¥T#0Ÿ›n·v=Ü0•Â„%“tÕö$ã-Kccf+)‡°2hŠ(YƒdJaA°7f6U‰i5ËF°Ïˆq['Îû©0núÔø¦­ôrC&V®Ûy­ð2Ãè*-˜ªÆF.B† ÈŒ½:I”Еðê’ã¤F-Ú;Öi¥ú>j‰­·Û&g¿šVÍvÅocëCÒ‡Ã{óìéb`¸8>bÊY`HEg ·`,Ó¯]À˜ÏEªÝR ±GÒ€ò]#Ù"8B1èx è "¦¤]­ «= 0 rh½ødo8»l$%ŽÎ5§Ò*êcü« õ1("ÇÊ dxváGª—b^.SÅ7ÎÖ3áä¸!ì*ª^È|xÕ²Ðp„_@¾^‹{a`«ŠÒÊŠ¢åÎVmg$“©:Šaá¸V¦/v²-&7¡t–¥ 0Âœd>eÀ] ~µ¦„IW|U¢—Âaàèu(~ÈÛ ŸI‰À®Þ8q°ÉÕ¾÷§3µ€V`SŽÇÉÚ&Î’©)á‘V@8tDEâ|UÓ¤ËSVF§=4Ÿ³ðTIŠ÷E™Øž¦"¢æWÎÎÒ¡ŽÎ €1·Em!ÊgxÿèË*{|rbjtc§+*J t5òNwøI*ä NÀI3R[Ë韅€Vm¶Š¿ Š H²~$Þ1¬ÁÈ´ÈÚ?“5‹¾º²Bweόģ¶ëÊKÈ-F°­™ŠÄ……i ôŽJ_ˆ ò VȦTãV]w•ÅÇ›ÒäiÎ Û&D0ü5 Gn‘õj/Ä@*'Zê|* P£à8ª‹Ì‹™v'©ÜŠR¹Õu┢ëYjlªZDZ´ã‹În¿[Ðv†ßÄÖq·{å$×3{3ºø‡GÛp]öÕ¢¹qí ‘ŸÛÇatrj|cåjà-®µoKQëT®¢å²rõ5œ CB(Nghʺeçóeeâ(«Ë"¿;³ÛpÁÞŒƒÁÈÆ:HµF_ÓËù ãÐ[ߘù'ôo%}Gæx7(ú:²¹žW Ü•/Ë0@ñäˆwR4ÕÎK.¬m7UÊWØÞËýpvóûaW…pE­¼·ÛmöüwžÓª“A[¬¤¨kZ¼®2/±•æÎm;á Û&,£"·ïÊ™]ÝìFd“)·Ö-§meir…|E$êÀa^g êEs^$/Êñ‡ýƒ×û8¡×ÕÝ©7*6·FƒJ\^[¤þõ¬Á4v”ˆþ9ë¿–/ÿ”ðÛ0Éå ‰TnÀ*; GþÖgS©°ÀQ7½ÉY³íÎ4@_âjÑÚ)‹Äe[`r¢–Ãe ¸Þ?Øíõú¿a¤Ëæ??y 3ø¦»ýÛIâšNa€CVÎë˜síqk}í‘=N7>Bÿ¡w(ûã‡îOþq—8 2 F,ÏÞÂç1SÛôŒ©’Õ¦0æJpä^Wê‚"…P~“îuöO:»úÄ UÝY23•mt“?%&xéËׯÔª³ÍW½Ãí#z¨¨)ÄÍ(¶wn'nk`§û¢s²{,0œÉ‡irá˜[$HoâàÉåŒéy² L4 ¯Y¿2œ¹t¨§¤Ïé˜4Bªt%¡º†Ò9©6q|Q2 dµ¨Q䈱g¶µ%øTG±B¶PÄߊ—:ý~÷èXŽwõ«aÕ‰òÕhØ SBQŽ$þƒr.!èåC¤à;nèøst]Àÿä?ï÷+$šS Ëê×M˜˜Î`ð'Ø#’,ÄùV'iµ‚h±Oªy‘HâÅ5>š¤²d’QÌèf³"̪âEÑö! +?ÐíÞH’†ã+¹F…4‹ÏÃÆãèµ³©¶Ö2P… ™ÍƒÖÚÞ¾%$ív·{]³ùÈ>:ÐA\*%*W퉚D+ìC”ÖHÜÄnµI\É –ìA°7¬‰íh ‰U:ŽG' ö€•fAW]™!¬‘‰Qz!CaTéýy\5vxèŒZ±ØoKÚy¢ZAì™3lÊ6f™,à‰Vn¯l¥‚†£d…DÒË ž IÞpz® Ù•!¡œD¢¾ÛÇG']ç<®µ×ÉÀ£¢|33›>C¶H¤Nì1e>òbC̵sk¯™:ËÌ#æù¢=E/fˆ9øДN›^ŸrkoThoܳtä(3måðÕ±ÿªÓU¿l0Mж°Î™3EÊŽ’ÿÌ„5Ê/u55·\)a tve⟓ܙ¦€¸7’­M ­¾ÞzU©00«¦»¿³êñy98>>Ø"^Líëdc˜¨ÁöMö3ÀK[åÿGÞ¿v©‘¤i¢èwû>ÔL't!eVvvMiª×B€BtF@4)åôéå‡J€S8HŠžµ÷o?ïÍ®nîN(«§gŸ½Vw¥psss»¼—ç}EÛjТod1IýÝt˜öno¯G}bÏJ“¡UìLûH;‘¦£_†Sè¨ÒØ.~=^6ó®ó{Ñð`Á¬Pƒƒ[€«UÈ“í>¯ùŽ‹)^v×úгº[¯Ä.Tf7'Š VÕhFšk¼¸ó­k~À£×U~¥’Ó9-ýæô19³þ=Θ"Ñ1bK >ƒ-µ4JM·–Å¥ÿ̲ʡö¢qnÜØ|º~D|£»K#†•Š™z—•­UDÎ"ACÅØð#žf£¹æ¥IïÆoñ8«Ù *oàEÅÎÝHœì@tkÒò]½UYù¼JêÃZO¾¦!ŽxÉ1X÷‚ªaøÓó°é­®jÁs”Ü?ã$ZÈSda cV«6Är=ºi÷¸ÀDVvÐbº+Úy{QÛœê`’ÿá5•ˆhD¥%©êÔÞÿFk7‘ Óâ‰äÅSF颹ɸ?$ÖËo꾇ê,g8bàr;öBÐÔ:Ä{Õl¯‰åN3rœ1µë8GgQérVÔÍC/;¨I0ÛåVÉ25·¥ð•f@…›ü‹Ë¦¬óȨL•“4zwˢʯ”§G7q8»ªÔ3§Ù_hiDlÓ‚rˆBtˆþÁ¾¶TyÚ{ܯ5ç!ÛTGÚ—õû;XŽë‡Vlôõ(—x ƒ­¤yñû+WºÒû DA¸ÎèÁz4ôt.A+ŠQ-6uKÏñ©@qñôíè*§ÃÁÕÐ)*å”ây_·Q_¯Oî •4 ü}Oë?T¬ŠlÁ­ýêuòêzô¶Ÿþ~ŸÞÜ͇©U×fë–DÛe¥µ\ ½ ᜎJKÔD gwãÉìà©fÆ&”_+ÄÁÁœ¢‚Ÿ'SPÐtJ¼›La #ŽOÌûï]/I™ð±YÒRÿŒP‚Fè>Óa,¼·hJÕÝÓHdÇøÔs¬íñdKŒ„RX ©–be_¾TÄ'¢Êq' ÜH@¤SšT^–\d`¢IA$ÒŽÙŽnT(uPͦA­;cÄz‘¢4ëVÂäÁ¬+´6ÐÜÕ´w3§ç;¿©ïb×û?Ig“;x¹Ð`ðùõ 7ÀÒÅ®xñÕo85x.%lª¿ùhàŒ<¡ù’5±®²J¬À’uƤÖÛ#Ž%/€ŠÏ-¢ÚŽ¬váÊ—7gnkÆkDÞ¤Š5ý ù×oé vâÁñê´ß¨(©±µÔ».!ìæç][ü«Qá–C ˆÿªAò(ßì%—Ž·xj”Cq¥ˆñÙóÏÒå…˜¹È% eô‚Ÿc0¢ø¾Ê?Z¿#e-rZ³Mèä: yy_zñhÿÀžoK„Ø¥±fLªà4 u»,öƒ­EQ¸-eã%šûÈ^HÙEómšÆ.˜*Z?±„ž2®ì6îÆŠÓQá—Z‹®³*_ ®ìeKþ…éj™9Ûªq†¾i+ÆmquÊÝÖÎo© 6#BDÕ7?iw“º{—€vn€%U‘^¬*_æ—Åúè¢ØH¾ã™^/ê¼›ªÐs“ ¨vù]rheR#MAž?çoõ=°9`Ë$û‚Àã·1ŒÌ¬ÞoÌâ|ÖŽ»ò#¥#À­érá/CðJä#“SXhlR„0ðma #/¥\jã¥U¥åß¾âÞ ! × Lƒ+éó+ÿ·~&¼Êö§<%?wØÝ?i ¶½›1P弣vª3Йu"½‹S6¯¤ ææÑ®ˆži³VøKN4XpÕiŠ}¤%ªðTn!ÿÆ¡íót¼ëú×tþë-¡{¢OsGÆÌÿCÏÀ­›ûK¾ë|÷âëå½`žÛ©ÿYûúã'p˜HÊUìZÑÀF˜ʈ}æYZ¤Ù—ôYM ÙžßþÏátÒŽáTùÂ…2°=ch?•2jôL5ÖXV1üò~Çㆃ\”Óæ"~Nxp°Év±P•ö×ôgé,È|›~†D0_,u¡Æ8‘Ù ¥ð¸ãbeJl¶Vù H·8£TŠ¨UùA[øëeµ\•}æð&,aΫWø?H-ÂYÚé€1Jèſ?›Í\K-ª–Dñ8=^®Ô&Oç—];âóÆÁŒ,jK`”õN†ø\U\µN9Ëɧ—?üOà<3ãƒWI7¯wGïÐgßë´“h=!«tþ vŒÄ”*03Âý !S…bddåÓ,lÓ=|ªëauýHÅ1ÁB‘ò§©\š‚ bõƒç SÍ7ÒK•FA¦÷ ¤5»Ï²]øà/–È\EäWYæ6Ù%(¬ ¸À’sõÐ Íø~—’t¥‘uõo”DðÙ\O«|ᾫëäõ9’=®‡½ŸÓÁðº÷kŠšÂôPK#GÌį«Ã2:“… ÷ë&Ãñ€þe­Y<Ò>XcšzqX>­@£ÙžjšF˜ 4 "[CÕYŸÏï{3fŸHQØNÌ6S6ªŠ,lêæ?òÞåÍrµ¡uŒ\ªô¶ÔMGÞ³SÔÓÔ¶Y;olOÅßkвá<]’ÈU.‚Ä>HMçk+i´NÚÙ×c Û^ÍktµrW&²{Ñ(,‚‰JÙôˆøÀYþçî[ĆKòd(õSÕoGi€D³¢(B`j6Y)a å«Ší‚0Æ2lÄí9 A9[8öú° ª´ÊóM5<Í‹õR ‰"Ž¹£þû’¿RJÃ+¸£p"ŽŽ¥¨IÚxÛ¼5}9G>à`µzüu·õb9\ ž®ÒÌ9†ÛªþЛěäÁ€ÈÎHó–çO€ò» êý£šõ»Ó¶UutˆÂK¶J¹øô¥ÓU@H<¡¤ 4řĿì€ßX<¶”Æ’ÖMâ®O¨›•¸¾/¥¹ª9àUº}ÃÑ}‘æ\V ¿ė,O$oKÄŠÿnðæ.φL‘{äf?vU,-5‡l2ëBI—u°œT¢YŒZ¸BÇaûmZm-a›¾G ´0Gyǫ̈(>UÚÇÇÒ·Çìà`ѵ×ÓèœcŒ4’¤)N÷×k~Éa lm½«Ûõá<¼O¯Gãáøî¦~ÿã÷ÃÚM*&ã—½1îÔ„.U3 »„Ôµs ïÕ¿óÉ\PJõ×ÍwÕu%åsÊWxo•áýÊE78ó}AeÕZ·Êó@ž ?Ó+Ìóù½CƒKˆ½lŽÌSÞ¨ùûr_:zp a qu;úAKf¦0¯l=õAe§PÎãœÄˆ9Iogï{Óá@aœig×Õe[ºªÝi€¹16â|Xœù½¡à#Pª½ŸBpjÑl–†OaÂf6±!çÆ êHˆ_ìéöƸ]Ø¢"¤&=Ü!iÖS~Ú¬(G¢rB¶X[Ÿd)p3vÃ.A–ØfpŸ*„¨wزܓ4ÄkÀÃ’zCeÓÆHÖ_¶ûn’"þ”òׯäK*=0wuì*$±±GÚ~ØWt{YÿN¤‰Š ~™…<?5œŸw;¾:ÃÓLáU8€v‰Qv=;fË“Ýdué2÷û7j[S}\bàŽÔüÙ^ì‘ÿøiùÉ–ÁùubhK÷pKRíPõã‚fà`4ÕŸ¥oG½YÇŠ?;´-jQ ö4¸ÞPš.Û&“ïýÛëŸoçS¿¤f*Ä®¤¢CëÏÒìk;Ž=Ñk²"Ä‘A1ÑQ·ÌRh`„z\ÞÄ­á».˜Ô Ò \l7P¸Øä ß/-ƒHß‚ÕÆy©2û[*æƒ5a¬ÀônÒhÙç·½«!J¿û¹ܬðgj©Ù}݇Šl„ÜÇ&¹ê|m™1ú~½1 >ΆÓ_Fý¡(‘ã¦H¨—Hxj6›ÆÔÅxâ)üX“Êi²¡Ötíf–ÎG7Ãt0z÷•=ÀÖŽH¦OëU…³ãzY”Ðþ®Ìá÷§Õ¹'ýý“*©Á§fªLìS¿â?u±ôÑ«FóYSÎh6œ›§Ãð?£wpöÎÏ3š`cMµ˜tv…XÌ´®mD¡Wê7ÛsGTq…?•;ö&i~ÀS½ÐÉ‘NÖ4ÞØ(§ÖZÈZkÞ»tå3÷§t·™µ[áõ­‰âõ»7ßuÕÂß=›z0Îì –µ…)¢ûgEºFýÉäšÃuóW?~:ûŸ^m*7¶:{ÂÚìòlm‚÷Ù_ƒËRh)Ë8ò¥¸r^™P#VUüî‰T€™SYK-9 ©;ãŠ3ôàùá˜O,µ‡ÎŽÂÜ#ic¦ ÑšVV°sæ Ψߵ+É~ —PÛ ™SC-=ç€`kyNLÊ¥Ó4C¯'ã«ôæîznèàñ¾¾b%Š $øT †ˆ÷²–&n1ήؾô6 IÝß´øJDÆûx\Ù± Q……( ‰ñåyqVÝÞ9. .‰ È V{î+Ÿò«úÞ‹òÁ‹Ãõ¤¹r–ƒia2³%“Œ ¹o.L6ðøe½Ì FAy øªþh~t­£ M™hý„à¶"³U22Ãô³{W4ѤWã;šÚô±$ŽN Uÿ!íQæGR„Š!¾‹Â‚ÅW ¶l…3ŒVÉÎXìž Žãã³­e†¥ÄaŠÄæzרwy›¢ÁDa‰›ÞÇÑÍÝý´ã•;.PʳKÜi`Ó^„:0ß}ú®›|wƒÿsõHLQÕ¦­á´1!ÃøôZj¢àS¦[ç­]#µÂ<çCoÉ a…+.ŒïÏ¥aJË|xD±dZòê °XSËjƒcVE/Y0åŽj±–„¦gÞ<`Zgš›ZŒ;šî(_Ý®?­7'•s†ÕŸÊ:Êð-8#ø¤Xà®{Æ.ú›‹—>e;ýbìdÆÙ«ßðsv sAß*ªOC~G~gàß*ö¥`À“üÌl€ÀüÄtn¨e=Z´o¡XÄ‘ÀªÃô‘® §GoÛ‹>—'¬‘Âe[3mä¨9rÈ>#/-%“‚KtÑv,¯ÁÔ&O$Õôˆ5au&Ÿ,È=–%ÏQkµxç~’§(aO( *A…ËÆ3M;š­Íô¼ "ÇÄød¶yxUi±ÇÁTëF<Õa´‚WÚǧSAþ¤T„㎊õQ[$(µ^Ž©­Q¦ ( üâKS•TÖ±>£šv“{i6OЊ—S³ û ÷x¥ÅÍ…Ìã ±@TÍ•®4 £‚À'ì*vK_`rŠf¸¢É–ÔšD4`{—0å|1s°ˆ°â¬È”'ªõ(êÝ"Üil|õN<%‚̨& ·|_ÌPF!²µ„H/Z‘˜2j>. C†DÉ•NrVçRBÏŽåÅÑ–x’[·¢ÓÁÓŠ«NGØ5üo¹³O§ÇÌT·Õ]L¥²–ŒyŽáÔájënò蜬8À?ÿÝô¢8>o¢Š|ࢥÕÏFI_Ÿ囚ûxî€åȱûB¢¤ÊUS‹•c“ž…€Ôž.¾öbiXfc—àᆗ¥ÛcáÕi åµXkh¡séõ蔤äòNÒN)u¹™ÑÛèœñç18`ÐNáØçw5 à _e[œÎô“•Ò®6áêp¢jŠJÎÄh¨ a¸MƳ液eZ·j¥1ZàÎp¥öLp ÿ•nåÇá}iT\YTÒ†F£fö.þõß`‡,r²äØsâz7úx3lJÐh§á(…¤¹þé\Æ)žR­ß‘ñÊÁô§ŸQêŸZF».êÖ¿ö¦é`r÷öz¨M)C†Æœ;;/ÆVn®D‰‹UdzÛáx0Ä8­ŽñÚfñ‡×ÓzùÞÛ5®á ™+YÀüÎÿR¤þ¹sf£Yži^õ*{Ø%„‹ÆH¯¹›ulØï{„²åõÐÃ$õÑ?%ÉM¾Â@äŒÅ#ïÚ4öûåO?^0›5µâÛ¢¡Ú¨‡]$UO˜šoN8c’BªÆ™íɉRXÀä‚ìd0`1ÕVb )øy½ârh3Á¦;uɲš‰×dz0ºáÕè ÊÄ÷`ëJ&¶k’ã©Yu6Uº õìÎH!°Q¶-ÖCr±Dðã¯~•f[Ñi@˳Oa[Å“’&£ÖkA´—ð"ÑaWt"Ö±)Ep„òNt—~ÅBŽèn½ …7“£åomÖ}Ú“Ä;+¶–äªÚJ|Áâj®jŒXjlöê ¼ºÔO¶õ°vØéYìøï:ê¶`7w’#Šx“†jƒ‹œ ²Î¾™I÷PLÄíÚW·eý5’Ö;iF‘W‹3/°¤Î æeCøn Ö6Q}üÜMä»±pIÖÏ¡üp’^MÊÿ0™^º 5;¸»¹mö£MÏt—¤/ì&cîÿ¿¾SÖ=n²4x:ë¡ò&ϲ«ô‹ïºó!¬Ç2±š8ÒÔLª'7ÝÅ·â€gÃj­É™$¿b…Ðh™üy ‘5½^ÊözóÉͨŸâ$¸¾†™ÞcÓBº€G÷AÅ •hÅÎnzÄKWÊ(š³ZŽ%çDÅëð<j·2­ÍP÷´™–è”qæ(<*VxÔ„R °8Ï © <¿m’ÂyÊÖOGñ‡óTÜ—  ¿Ž®ÞÏU{§í÷NÀû[Å´œÈNoV'pxàÔ8QÚÒÈ8>ÕëWß“%Sú±Öƒ,=“…DwKYFÜËó  h™hµùe¢Ëw»Uîd‘ŒQ©t‰mÎâiý–dkÙ¢Gh­Z’¦QÕ0‰SªuM¦¦ìÕpŠˆp‹½ ] –åt˜oè¼f.€0·>L59Sàp>8K>ÐÔ Á7¡8xÓüÑ™°í‚-¤õëËaZðád|ý+lÑWHó„žb+^ #é Óæù÷ÆÈ{&æ)ô<àQ|æSè~x«Ò}}2..¯¶á§õýú¨¥Þ†O[c”†—že—F.òLÓøK$¬–5}ìØØÑ`IN{Múj܉D¡v2ãÚ¤ï¸;Ñ&µ;ÊÓ6(ï.äë ÷_Ok^I…~$) …u·|ºß|r¢ø§Í¢AÇ#aMs‘@±ð¼ê¶ÏÛia>}·$£Å;üø$£4ž±^¯§ºö6¸ŽS¹º~ÙÓJ¯ÕWÒÒ^"‹g²P“¡AáuôÉW9Š2 ˜çß®w"ȶ #­ÌHÓ¼ð0^†*5&Žçpê ü7o7B7¢Ñp0¸Â» /îZ QhŠð’Ä©MšH^^DˆâŽv »ÛUe¾ïé,™Šy*uÞ3x G³ÌèÀ1H£–«¢›ÔâäCd†eˆUˆ‘N'‹m`¼9a³ âv²£oå^Lð\š…*¶Þé^Zb:ìsÁ踋¶x.°ƒ4³g‘ÂL€·HþOÄÁÀGÒ9{*À”¡…lÞFmÏ—ì& œŽj0ƒ¨8g=!½*¯å^z› èà:ýe8};™ Ý5ýò(­¦£¯ÎÞÄɺô¦Fc.)vza·Ê%m§™–`‚]e]d/|NÚ¾†ûÃ[âV|ß®Gc÷~1ãÐÈêÉÓÚµ¬Þ5^ìí”Â×Hâ.ô½Â‡•´+c$°æ¶î*÷SMxí*Ž¾„tºÀççùÛž³±.iÒÙÛùô¢ô4É€¤m©ËÜÞçÒHw“ñÝ ØÉZr4 x{ö±Ìž(ÏîwÐúƒ•[|¬éÍÝ£‰Ô…šŸÛMûÞÉN´¾z=¡®©R×¼ß8¯Ë= Ñ+Ök[þ Žø(GU8Ÿ˜%Ç}~ÕüüåWã IÓóK‰¯ºÊŽ}ö˜ùÖ£•#ÞEHoa]^˜í¦¸¾ÍQ¹ô ^idYý«ˆi¼éÅí/cõÌï‹œPnŽ \LŠ,ßÁùÈØþ7f–ø_|dB—àøç{þ†;ÿfãJ®"¿ýcÔŸÒ…YC&^ÛM¶ŸŽTƒ¼|’©øG2»JÊ*·dáà÷äw Ÿ²’‡‚]ë¾Ál©âH†¸¢h²ð·nV^UÊ˜Û »ðÎzÙ©ÏѦ«Ónc.¨hõvðáªßÑP Õ@‚_ºf#âKâ„ŒMŽUNÞ¦Âx|Düs°=lLù„G@ä’ CS»@fá¢ÁRóm¦sQC#UÅMðÚp/¾ànR®S÷"â]Å!Ý|ó·r«œ¢ΫÒÞow^LHØ¿Ð\ó„i­¥®¹ì×;ÖF^‹è˜”T`{`¤Q‹ûJ¦•þ¸t®"4Þ›)2˜ßÊtÑly(Ðè͘§g•Ò`ˆEÔA\¿Õ_¦p˜ƒ¥.BLï(\ƒ1·²âŽçzVb6Pm[ñ)& sÝZâf—IãÆ»I“9Tç¾Ø¶Š9ƒñó±òð¯&NôE°1f‘>íªI«™„y°jüu¡Ù¼­­åè« „­Ê«œç•³ô•I·w³÷)á¥Æó’×tbÈ‚=íÒ|g2àý&Wõt,ªCÐø ?ÓÖµ}8Š:KÏ™°É ÕÊA“è3ÓÄá=BDtÜw¾MgÚ÷4wjwê•#K€\]prn|{Nª AðYœÙ—]¦høºñê?f26£Ožê0·"ô”ÄA¢¿hwœ¢,Bx ‘fá,Û7LF‡~ðYÊ!M8Œ·[Ì(H?lw*±qÎ}Pû&÷š OÚ±ô:ŸµNBØC’OÈZO n‡"¨ŒÆ'§$LÉźh'M¢„„Έó ãú"ÈGmŠ£QÈ…Òò|ÃLˆ(2[Â^“]~!E¥`– Ø(õí [“ÏE¨ èæ`Q¡–•-P–²ˆx-{WµîOH%œ 3ΫlWne{@0F#m„ÔöjYP;o ŸmeÒNrmç²²Y#Î’TÜÊÁ³GMf2ò"„}kØ, Y3ixŸ›Û–dG“;d{k`&f§s“qˆcäÉ©©œ¹Z1’\=åx.J¢ÊW05ÐdR˜MB|¯©ÿû7äyáÚ#©¬lNbÊÄiÌ›"šÕÚ¦1}~u{/¤E6O¼Â…÷3‹¸|¡}x]_Šà+ÞJâÝZc8õ¡ŽK³•;Óîœ5{JC–[ÕP –ö®ô>ß(‰» ÚåÚEÁ¤G€Û1w¨Úa.¶¾Šºuù¨Í…#ܺ/¦^j~]„,ð$˵8˜ýjáÞHjà"BîÈ487/ÔfÒbÝÌ¢ÅÕsrtÑ.•ç{Eù‘¤Í+ß«•ëfÅkýw~óNrŠOšWetúè§ã»Õ-Ð3f´NðnŒ²%Eœx×D NùÔº )ªó„š¯”ëízµ‚~X×úŽ+ßpÊ~¸fÖUäxþÄ%ËOâ+Â~XÄ}QR×ÿ -딥ʻÉuoz5”¿ú5˜£¦Lq[|^¦0° `z3ëcÛ£©ÙáZè´D½°1¦ï›IÚwÄÅÃÜ}†¦@Bbæ»7Ú¾]Â!©Î$0"¢êÜ‘WÅèqƒHš%‹ªìÛˆ u cx±¹&mN LÖ`—6p½KË°“ÅOOÄ„)–†É-’Ùðê:²?uòùïüƒò ~¤{³H®†}ƒ¶`¢K%7ÅþËã9æ·]AT† 6óòîȲy£|r+8~·Ù ³vØ&³/cK<ôù&`↧®,‘ظ¦÷Ù.v$%Ñ°¥ ?ÞÂÎ`OÞÔŸΰÄú¥ØÛl>,«ŒH;êªjÔ Õ âëå‘ ”¨ÂÂŒã i2R]]9ç ‹TÖð¸]_KaS07ÿÉ«HÇ–*Èšúê&„v®/á„yŠ/ñtÈdãáI)œ¦˜LO…qäjñ° Ì+ߪ¬«ÿŠ~-–OCsä‡Â\!ð,ï ½)ˆ-Œä‡g¦FÐÕ7èÜ1ÜœöX“´;”¿8ƒqŠð§önäÙá=Èiæ(œìíŽÒ‹O_œ‚Êu+°ù'‹ÇÞÇÄ›Zø“Vœƒ2¥Gè=o·š”ÍQ$’ºØ²¦’²œa‹p W–t¡EŒ.6ŠEk:g;í\ÞX‡ ÆzuZ2Àžæ¢¨ÿÑFkB¸€ŠJ˜ÿHçg… tÛâSñ<,s’bg$6½YBë$8­+熦Aê\6 G7 ®¬Ó×vÊ/b_rÚÉ¡wkeèÁ°ØåÕ½ •o‡døg‘K²õÁñ¡hg7Pêì&†&DUà4èå Ý…Iq›uÖŸðq¦v¿A¬´!«Íç÷}b})§“ëêýÈP›¼ýç†KªÕæ$Ö²Ò¿„št{…çè¼fOÒÁõäv(é‰Á1ÎFW7½ÙÏ]Û؇ÿ“;ã²ý1˜öæ`g¿½›³©è4ÕïûÃëŠr@bÈŠU ûµù£Ò£ƒ¤uÆ9Ö'/F‰9'‰?X(¯Ô £ªÔ¡æ­¦˹~$àK-tø,M‹~:ÜL5ÞÝš•‹ç¤{cGE“Öo´¼¨~à_<ÛÎ9¯¢ ó:cotÙ°ƒ©oÚ«¶[X~Ê Þú4½°y Mg½wCÍ.Ò‰ ÜVëÐ0½ïý2LßÞ®ç°d°{>íõùx‡[Á}àk¼œ¹ðfrÂ7îOÆѨV+Ðp¶Jká3¨HC8Ã@ÓSôv±!½”tÒ{3–Ì .wÇpÂ_Õ°rlUUSÊD«m6HWRrYãÑÍí5!$†ƒê1,lñv Èíxן_©O:pcjö¯öù¾¢íÍK ÝikÑ: ߥÏøøW ðÙ[§­€ƒõKé×{Gï?6 “ÿ¹ ’1ý-볯‘kسžTØNQƇœ†ÂV|W§P©­/à˜¥üL-ccß°-ÌAáç{ypÐϦ­6=<îÈÆèMç~Ñ)Lº"ÛÊeüæõgI¹°ÕB J^U¹ä5&„Rš"ç±××ù]ðxB}Õx‘uœILålºÔƈ|b-E,`@âγÖÀ‹ê}}–öæ¶ÍáØ‹ú2ðûàjx=«ˆXDõ|6Z¯|– óK~Põý厡¶çbIa°<ÿtø¯Ë‹cpa(ЮÞâét\å_v.`–¯Vè¡>cýº…ÃÒá†[[¶ý˜üÏpV¼Ä˜¨rEã¶i| V¡jBÃû•8@´Šôï™}qß“”kš¦G–Йpdr{ÍêÚ¼­TœqåÞ©t€öaE¡Š¿%´K|Êr¬«•¨-Nó%a §”U•ìzÇl Øñ7Yóç9Òc´Šó,/!¶Ÿ“çÒÆ„C[¡ë‰jA¿Pª-önJ”v/xÂ8©ýPhÉÖŽˆTN ߣ ‚ìÈ´’~EÛiïjH’ z©7P»xÎ Œ›Aºa2Q³D]kÅßî^D1ŒaëwÈÜz-UòÊÊí†ñ]ŒÜãÙIÒ, %ñˆ¤µ(¶Ÿ3Š,êSö̼¾.)¸œQê_[ÏV[ gŠÝ$ÒŠÞÓí(ÌÐBG¯¢F¡¡C/¼³ÐN¸þÕ}¦$¥BïƒOu\My _?4ªÌ’D°XwKjÛÕŸ¢«‹Õš`ûùÙاZyÕµýèŠÒÇH°>ºz{7ÖÞ² LT¿­þd0äƈŒ.J{ýþp:Eܱ\¡GA¹_ûóöó«Ȋ܉ÅhmçbŸÂ<À¢cñxªj’Ó˜QGæýß³ÐÑÃVƒÞ¼GΘ…§á«0§£YúînÜQtùŽÊ*pcÓà!•ïÆïæ¡Å‰V¯'zC({, ¥Ïtj¡6j¯lÎŽØ‹:äà×ëAú‹Šwôk:ºƒRÏѳ «9ð½8 —X×Ö/ÁÊ8ºçãƒáS6oã•Œ`º—nžÄÞ°ô2»áxÛŒŠûîõÝ뮚—ÝÛÊD±Icäͧ¿«håÀú ªbxµ@8‡³ÍƵ”æü.“.÷=Ȩ̈hŒa)KîÆòOªŸ øç^À/AmEœ·«œŸñðž˜Kšt–@4d±¹Â9²ê :²:¢÷†™Óõf(‘ÅPf{»— 7µöçú H, yô4Й"ßuÎ D4½.ÙøØ,o„'ÕA;ñd*ð&i~”3”xJ «y —®Í½b§åêÝ}»ôÂd§Fc4@ëù¶›À?¦ÃÙÝ3‡u”ö]Î2•êjÍÞ¨CÖqŒU{?Aiúö§ˆAíßM‡”—ÞN‡pÌY°ì÷¿§ˆ7¸¾.¹–Ðn‰ÓhC=b­\ÍÔˆŽ—R¨mT»×7=°SÞÃÍ%™@#´¬:¡øçÛ_Ç=÷ÀØg\%$Iêµ½¾Ì.»ÊÊ‹R–T­‚¤7½éœU™}‹¨MNáJ¨€U€îóã1ß*ÙÒl­Üçìp@Ä- ±ê·xC´s tÂ/¹$¯, V˜Q}IßÝÞ¡ ˆ‰ªôíÝÅ<>þñ§ô§Å6©àmyçÙ<ßOf–)9Zʼ÷ªÆ»ò»²{%úÃö¯lÐc÷™Ôž-ý«ìyžÜ Ú{”„"NŠ-¾Lîfš“L=L̺Vù¢š¼Ó^(Za· ê¤väÏ8e«e`yýiË}µØ®~úÑÐñ‹äêz}¿t;#ôÍ0ŸD(òþôe=ÍPð#Œ¾‡èDXF*JŠ†¾ J¢!ר_ ·ŒBÝ…©Up7ŽçXjˆÐyÃKXMçäƒKâô¹¨Í±Ñ ¿œÔ¯´Üó,ÊÜò5^þ°î­ßö¦˜D½&Í_ H!Ò(*’G+÷FÌ›ô—Á[ZVk.×i2q¿!¿7¯dKÁ#‚òðë Ñ$µ2ý”À•n‰N┩0j•ŠOàç/O0?u) µ Ñ«¢Ãzuˆë2œC°¡®žk·&ZÃ:‡ä„“O¤ÌÿNÚr\¯ÒïJ'½7îµ4³Q>+ ‰FS*:üòû»‰Ø·XБZÖÙNJò)}6™HGvPm% F³þä—áô× JmœIÚ ¢wûáƒî¦µŠ2{!CtZüOÒþän<ïªÒçóÈoá7"QœOÐYꈪèHrnGÎÊÈ|jÔ9,äå·aßÇ5î܈™ÈŠr‘ëò s©¸u¼‡õíS¾Ë^­o«¦z`:D©óZ\z¥X'E÷ðϦöÞ念¨ß»­’Ûlµ¤šñ#|ã(#¼2ÕÄðjýOÐàÜ?,M·¤LŒn&—c¿ÉäI_I5=-ª4Sä[ û“™¦Kùuv®ÃÕÀÐþœP.Í8 Ä’A‹²3RXõ> ¹ž£6’Øza°ÌI6™†¬Sq Î`æb‘Ú<½ý!85¹ÜŠgßf}_8Å’ÊašÏ¤u±‘%Õâä1|°Ú´:ÊS#>#uQÞžZü®Jä¢b›n7vI‹-{yH¼§‹oˆ6¯˜ø G¯÷|UŒ%ÚÛ£Þ •FPuNýÅZ a:bPÍ-|/ ¿ã”š¯¢ñk-=aÇÒ=£Ygæ_ÄPíY¾{Nng¯þ‡G¡ªkÕ¦òùàX<|J¿¨›V9«züÎÐ Ð;ÒxtÍÛQiÁn/$õò8N½¡V ä2¥üáø×»ªB§úw$K ¿0„š˜0öE©R‡Šãéþ>?ìªzR¾Âc¢­|€PȧºÈEË­riŸ^ìÀvGMl,ê¬{KnANè~‡ªÂƒkÑd+pö>Ý,öõ¼ LŠUN° …ÒšrŒ'O¦zSôљ‘Ïp>ŠÊó<_È—´Åƒº×O…Vfô¶Ý¡üŸ)ðÜk%l ÄfƒÍ æg¤À¥C .2GG£ËÚjDÄäK¥Eîðu ß:ÍxÒ¬òŒQ¯" ˆ ¨h€Ùø‘Žö¾Gvöi½×Ž8u^Ý^aʇÌð e' ^[zýêv—õ² 0´à_ëÍùÓz³ ‘3¦ØV7}©„(s!dˆYQ‘;'m4KVƒ£ž¸à½ûCèsøÂûzI‹ÌÎœ‹‡Ì†ö`9‘'á,ôÉ.Ë$Á ó{Ì XÁ p\¯ÉŠÖÎ=I:•­4xça'˜<…]@Пà­d›t½r¼]ö„ϸ‡«wj·4ýJÁ<(Ã,Oñ¼ƒsn‹LDúë4gŒìߎ±ûÓTb:¿k»ÜüôÇŸ›r8 ŠÊ;ô)˜^ÐPY¯Ðfü¼^xºbŒR¹8®[Ú¡Ã%HLí£Cæðüÿç:ÁÝ¥ó¸,ÇÕÂQ&ËT£…S/~Sƒ÷«Rcy ýï ]‡ºÇVn4}A/Ë»wÁBHÿÝ­hÇ. °æ±ŽØ;‡¬(ŠüÔ,iFŸ²–ëûIcÕ݉°*Ba„|½c„ìk¶<9ø¼Ï:•`ø^Y ÃìU¼oTyå,Ìбì&­FWca?ÍVìKŠ{ðêíÝ̬Œ¤¼2šÃ D$ô €I²;&žŠŽ"Žû ¯¸iÜcNÞm²Ï8tç±;6öS·ky^‰Ó4)Y{ÏWØÍÖD8´Þh´¾Ó7.×&«G맗”@hfn‹ éä Õ!Ã]ð¬è:ºÚB¡ò´Ñ¿Y|Ê®QÜâòøõ¨+N²‰ x|Ö¸™ÚL®oý4ÒçKDHðèhTYmþê_î†Ó_Áy˜ýì)´Px——D,¤§KUõ^el@)žWîP3fóÜKë"ú´žð1E $¢A@ŽN]Üã¯:@º‡9D|ÞeÝV«¶h*»6Ry ªâ5”ÓŽaÍ„±çü\ÔA¾©ñr8ØPÈz¹ƒ:–ÕF—¹®«˜ÿ?œ2a£ŒNI¡YXÕ©7êtv§ð­6›M„í¼¥è„@nKº¹ÄÕK%¶J´ëU £?3væ—'Øê¼²›Mž:í}ž t‘滉ýåÞÉvxa¹¦ûìdÐÖÅp´ÊPpÄŸ—(Øvë- d–çp“Ú¡‹¦AË!H¡¼uKïçCÃAt$±ö•#íIm­"Þ)4ŒÉ™Ï DsF ÏÝ2ñt<ÿ¾eo¹¯·éæ™·àr.4¾‘ˆAJºKo”3'/nµD Å >`ið¡ÒMkWúÉ,dDJZ©îiØ=oȸë‘ÂiS ¬ˆî\Þˆ`± îW¼‹d&R­ßö¦LëØÿ™îó¦œ)±uw©œÞÙ…Þå_:/ÓdžÛçvG9+µª—ß¼Nï˜\Pm¼ÇÄ>½N¸Îzy`‘•Š…eì*fè‹}7$ [”l%'µñÙüèN›°‹ÚÊÅù„¥æ‚voý¯ÿÖù›àQÜ<<šjšâÚôñü`kä¹Èí¯^§îèñÑÏ ˜P¢¥çÁ<<kÓ.Ù™*‚ì8_±ZNcyÁöPÞZü•£.Ž—/$UîB»cj0~J‰M`ô„‘o5¤»êÆë‚go…lh„0PÃa>úyzd9¦JÀ“£Fu%lßË??Dx»åU+6¾%eðiÕañ®KS@ò=ta»ÓùJq¤öB¢„´Ä/¾+SzÉok<æÑ/×NùñãÕ¦ìâ»ð@jØÜì…c)^IëÐê˜fáp’GÙrf—”oš¡h!¥ð#So(féÌ‘U¦qÄï>gïVÎRvö+*8!ÛÇU§=w§ÖxIÊ9EÞÀÙ/ªÔl½³ni,š!F)MjçÀêÍfÃ)Âïgè™,1! î:ëä„ B·Qæ£2' ‘[bkg+¤ÍÀÇ™+.a¾3óÝ„ÍO0ýÐîÂpÓ’€‡ä9G›Ÿ°°~A›ÂuìªÉ‹’fj°z[¨Yý´ñò¢Öp©åÛoÌáàµÑË´Upþ•ö3û¡Wã:,êHr î¥ÚÏŽ4,V‹*µX5¥*ÙÌu&È’acÝ 2&I`@áLÅ"ãá”+ïà/,fxX}ÙÁ…‡·Œ+éd«•¤íþ'&ƒJëÈËQš'—©Äu25$ÿR0Ùói¶‡wˆTVø=“°¨E[ìLÔGâËyù´0ê›–“„ò¹Ì¶ì+J$­Eõ\xøÃáBZ?îtt0>æ•}lÊ›Ÿua0 ÕC¡kbN;‘qÂÁˆ´ÀÆÚc®3Ûd4§EkÏ·i•ÍêÄìÌH oŸÕ8=.ÑnÃI<ØÒ{1†l"-™Yþ«‰¯Ÿ¨j_•í‚æ¦= éªRD«f)ûšŠOkLð¤£!3ÒZåÙÙÃfñXð#²ýrÝ0åBäó¶›èðºãx°Òð[AAMS·ôüþ“™•w°yÞçùæ[{æÝLqå®;=’òéÝt^`BËÌžÔðV)þBçUŠmbç­¡K1ï³ã—Œ8ðó¬Šma‚7Š±Y^ ‡æ…±mÃ8MÇ$7è44@zñ—ð¢ÓÑœ¶ˆ†2÷Å™>áÙ‹ºÁƒt9¯¬¿hO45´®¦oñÝÄmçUzÖ¾Õ1E¤àop¢:»©V¢J­“A&!X(/vOr5ó+Ì5„ Yç„çJÒñ2Eö]x’&V@aÏtö?/Ïö\æŠÆØ_mNÄó‡q`JNï†ò>KCÌ[ún¥Zü:Vèë?`%-*)^"ç’©òK&_^—W¶iCepZ”&SäiÜ_££Ü@…V¡`–»A«ô• U0ö‘Ý0 Ô½ Ó¨MlEÊy´”“š&ïVoTµQ˜b^ëØay"[DÛ¢Ç)ƒ¹zbÛ¡Bu HÉ Ë/­3ÿÂ7U½+ÁàµôX—ÀY:g¦á[XŸ¼8,Ÿ´ƒæq+ßpû­„Ç7`¦hünQ±›¶›,Û·^¾ÓÇ¢–7TÞÃÝÛ·“éØ:ðk±÷æ;¡ßSg•Ö™zÉô);dMÞÒ¯z^T³"!+âòò~—~çË$³fŸÄÃåpñ+Ü“ölÚ×0yÿ2ü1þ–.\l“6=éf‘Î&wÓþ0¬ï6¿Õ[qšnüÑäí?Ï¢÷ÏïÿbgŒÎ2³6ó±~W7’l6qUF{¸+%£Ôr“ŒˆEàëI'g*3ûžÊ“ÃÅ…dM* ‰¬ÛÞbºŠÜ×<¢‘<ø›d“¡h -mNzIŠUÇþ÷§qEwH:…J_¸ËâkE‡©©0BbÀ˜3®âaJ¡þ¤=žh×%½NoF³Ùh2öiÝ+Êj«®´Eì* ^¬¶‚R(¾áäVü/à´‡ö Ÿß‹²²Ïävný§$N):ØïŸKÎKà•{Ë’L÷WcÝ#a!Cœ»$>€µ˜ýP†M¥ië_;ö¯g·C$2aÑl›3n¬ü"'ë¹›Å7QÎN´KC0-æ.·t«*œ©weÃc¯„Eúk'0µìáÿ©-xÝ°Õ}z$1Ìê&‹`‰X­VIƒÃS ê"w¨s{¿L¹¤¦.ëJ?òÎ…Ó ñÛà añ]̨Šu¢“È5l´:;€"ŽÃ²0Krs;ºF®k¤\qwî·Ù\.öö좸͟õ¤±ÅeÕŠb,š›ï`®na1õò—Åç…þnÁb^Þ…˜Õ‰sØфпÚcf› nÚÍM¶ÅMÆÏL<›$àCãÂJ Th´çBáðÀTW¶ØuÊò]¾–“±JÊtæh”H¼ñB§öQùFÖ ‡#l©ý: Ÿ„/00A©]ü©Ü†Ä‹´Ø{v²­ƒÔ’møˆ¥.•ž©Ýñ½é*À˜,a$Ф\¿¶eŽ›B+AR™}Ú±!ÙÍúsf²ÞmIW|s3ì?{wiS|tmV«K¡2’’RµgÙbÇCíS$þS(oŠ{VÓÌ)[çIÇ“ #)…‹÷ž½Dµ ~÷ñ§Ïþ­ý‚‡ËÙÝ»w£ÃYËUÑ$US*«³`¹‡)µT{ ͹÷Ë Ý×ÿÀ8¯Q1.®úÉ&¤PJ"B+ú‹ÿÀ‡Ãßž­ñE¯¹f|ä]µþ„²Š-Ρ\µ•ä{^:™¢¤`Q¦>/ž_f>«ý¢ï•P,óý³¤?Ì Á¸†þc¿ÿOÔºã,»$b]†¯éRãÑp‘#é™á[x\Ò‘Ý9O£_ãµb_ÝIHL´^’sÖ°¬}|u~\Â׫Íær…skøñú«j+Á½\.Ù@]¾²?Œ ì_ŠL(-’°ˆÄXÚíâùm}³õw8}á A·%0C)`§î³„™Ä¡@µ›´Õòë ãDÔONL§fm8¯lý‡F/ï”×sðy¦½éˆÂ£#ŒlŸ$­ KçÃÙ|Öå³£$WÓÞŠ†”¨‘˃Ÿèðl7¼üÖÞ`ÐEËùSÑ6¦ÛM¢ßÂCU_z=xwÝ»ªºt0Dæ£á¸OC"J¦±Çˆ Ž@©ÕËÍ¢ž3Ö w—~„ ,Cî?SïOe>s$N_­˜’ßy!-}Šÿ%© ^%næ>¸Í—ÝÑÓ{À ju8e/%ÅvD'LTC\µò^OÖreº‰yl$£CDUéð]‰£3›öŽ]Û¢Ð_šUª‡÷=ŸÓ`¥ÚÑ%|bó“ÐHÝŸÖ¾‡î± Upºúh{¬ê»ËöszÜîíëÏË-ñ£Ÿ×Ë°$Á¦¬O;}Ñ;4 îº0=­ê(tªÿB2£oï®®Fã«È{«_Z µÓñ…ï¯JØm©v ÎUzÁû÷»ó\HÖh»¶¶'^¹ºy–Aï’=¯iE(. ¸…W$eÔ££2~W²äEö±t_¢£Iò»0õ—Ÿìú¼fÒM<üC*ï91ïÙ6§Ê³Ç+ =Ë`0Õ%IiG%(”¹?l‰ÄaçOSmÈx853%:Žd~(zHa·u‡×@¿u“Ü­¤íáN·=ªMˆÊɼʿÉS^4>Õõä*EÁ`Rî–„áØÍy’.ÒoOÙÅîÊrÈÿúoZÔ‚…UÜtöÚäÌà mÛú¦4Îl ý:›oàý¾›ðõ0M¾,« Ýùó{â¬r»c¢Æa×Њ§f¬(T®lÅ«ÿþã‹æ¼M ƒ[{ S_a!ïö`æb„UAŸâRÁ+½ÐW,èá*”ô¦¦ ®Dµé¼Ñân CüŒRà:,òÖ°Nô¨Sƒ~y“¡"‰ã—a³Üyçg]癜%…|·ÙáÕ#ýÇäÉÂVH5}.—ª&樰”ª}Ÿ‘¾kRÑV"¬r´É`3ð´—:%clÕ\WU385‰íow©­Ï˜ÈFø¦Nø°£ˆ½ï>¦®N$IaËð—f7•×…åL­W¨Gì^±Ž.òd•‰ê¢WÍä ÷X.¿(žòÓf…JG¨3Š)Èùߧø²œù.Ÿ™Â Tç?s!Æ‹‰lªÓ ¸ Á5öàuÓŽº[¥Í`Á’ÊÃÓálý,î@´0ÌpøŸpROdp “GGM)ñ4Ÿ|ZëX;üAM(¹MžoÓ‡¹‡ó§¤4 íÚèäžj÷ bë<4ŸJ¯§²*Z>?«”Dq$±€ùŠoÃl9ÆáM®Ò»^‰ñˈJbxÈ ®‚xR]„AÙËmîÄ÷¬õÖ›<ØUÒ3*Πå‰YEUåó¾xØMËcæ–ÒŒM»Í!øÌ»Zƒ ÂW[âNµ{;éˆwTGP›£qÿún0L£é°?Ÿ`ƱåÓ>ó+±Ò¹:‚(JnËd2K>†@MÊßÖÞRGt#Š–ý@ÛæN.2¼°"H.w¬0„]Ž‹ûƒj¤÷½Yz{Û÷*à.//•U­®±2å¢w×ï¼K5‹ðÝxôñõ\ë¬âvF$;¶ö­dÒÿ›ö¾òíåÓ?Ñ«¡Oàÿ—Ç ~„Á+T£|;Tl#ä£-÷'GÝE—HsyM^ÍkŸÐÞ¬oËgVFÃU·ÎjLºEe[LL‹t,àYñÕl‘žøèv±{6ó·í4f¹•c6`‰ÊÎTöGòµ~+1h‰otaªB 3®{ýáÍpßšV®Œ‰«ÜZAÅç&X)Ã\;¨êL_”Á +>|4ž§ãÞuún:d²%X UB*QJËàþÍ6@źggYN)¼òn4ÍðEà»á%FÍå9 ½¹ÑlYýeïmqNv v¾A «ÿxâ€hæM¤”¡ºõš±åÕVRe»ñUÑ'ÖPî2ŸÅ‘œ3[dó† Aö†PÁ’&¤•<囕OxZÌ Ú èMDŠiõ&ÍkOèăµãÉÞ`ªÂ…8c6k 䦽›ÁO?¦Å©±0]Lö‹fQ?ß8Ø;"IÅ.º*Š³cù&ÌF¦oÁ›»šön] ŒªU.m`.7vÆÓ²aC¾!œ í[E`¦ˆz: DNÆ´aYÈ)–a¹nfÄ‘¬Ú¤g¥d“·£+QÆÁt¢ÏàZ\Å+ž³Ë¦{Z%?÷ ž8o”f*£ÈˆqÃɪºÏ$ló°KIRØ™ÖGDÃŽˆ©É£‹mZÎ"Ñü]µ½õø”OªET¹ûÔ‡ÀNŒ²Sð¹Ô¶Å«¢àü:îÝŒúàâö”À€“wNôMÚ¦“Ñ€’T6a“izQèú‘ÿ‡æŒNØFx¡6­DÇùPùï/v äécøT"bMÖ)œØ[‘f¸Nߦ„/BuÌóͧ } ÷6³aoÚO¡DU¦šZÆ"=Ì¡èWýãO&FÙt‡ø{òLßS ñùÁï½xMãSõ{ãþð:õÞ #’?/}£w)7(6ƒ¥”ÁWY´\%Nb:ËdYâßéîøT’‘l ÆÃÇ¥õ‰<Ü®)˜½ë²Ë+ië8°hkƒ ËZ‹Ç º"Å5ÌB¶®bJ\¬)¢Ü ~âIeÓ—&ƒ ´ÕV¦9 Ϻºx¢°°7ŸºÇôm7:b쀻ª¼~6µv8ëûÄ¢iL Ò=fXH(TbÓöý°ÿóìŽ@t׬ #CvÙ©{"!„a#›Ôð]ïîš4z# ¥z|"ÒÇöUÇñ˜¥ÿ(HžpÊc¤›²²:gÜüñË—ØæøGlb«»)\ù¼|fü¿AIfVÉ#Š33½ÿ£R²% èç<+DK¦aîÅ®ìz·4¦-ŠFVˆh^‚r3ú] x€—÷­ ,%L3xu‡R ZyG§ŠÏa/¿¯¦ð]!Ϫ#Îq¾d ž£Î‡Ì HÔ⎠ãÉK¹˜©ð¯zÉÝîúkGôó<2ó’;˾?ÆðWÎÔû&¡!E]ä—†™E†KMÿ‡,¦ëš4ð )á«ÖO¸JTe_ÿÓ×ÏßröÚqb(X$N®š–gý çMZÚK³(-^Þlc£ÁF^_õøÍ¢ÞwãòMz‰×J9b¦{ÿ’"ê×¹$i‹¼ñDΡךO†ßsÈÉÇf»ÏÈÇü“u’œÑ_c}y&¯ú³M¶{$“9VÚáFüÇ îŸãÇHLw=Gª¢9¨ojÄ #4„ëþC•ˆµòRS×Ä\Õ0÷6˜wDó‰+•xücÍÆ[Õði]Ç0“ø£• þÎ?â/C©ƒ.å;/` Ž!ÒVÙT#_ ìZÐœ X›x{ȱö Ï1”˜ ~ {Â'Ê .®Oœ´.dQ”š< F{!¶(U•}èZ ª-«µµ–ñãÿ³ûN.ñÞÛÉtîrv—»6³€ü#Õ9Jõ“_tó7Þ©ýRÞn#ÿòK~ÎñÅqÁZhi¾+Àœ‰y:¼ÍæC}è©ýôÚ²»:a—Åù›@ÕzkÁ®+bþbð4·ýi¢‹x_ÉŒ{ÑóÀVHå†Ê;7l>˜êKY4¨}.¯x>žY@šç7,æ…wÕGH“Rþsò¯ÿxùþøoX`õß/¾ÿáâõ÷ÉŸÿ\N»"7³o÷'77½1)tüË |û¤8,Á“ãÈk<ÝS¦?·â€­# a^g3³y›³…÷zÿ|Ì Žò>$¼Êõ.Â-"MŠ=˜à“~^0J÷Ï y~ywBá>¡êôÎó…ù®ÐÐa™š‚ç™Ý PE­ãU岇 ÀeˆxBØh:ï&·wדñUz;ŸzÚ“ñ£÷=÷´ÈùÎRÎ-PkNµ`¹%’zA~ËÙ³ã‡Ãú˜}X‘fÿy;"ÛÁó¾b,Í—/NÀÀ²#Ù>P¯ZðÓV|Ó ”X,Á+¢±ðÔ[$ûüKv¸È.àÕ(ªÊ‚XšØ0G„O¡¾íÑx0üòÇÅöPD9ÐAƒ”¯’ýƒuîMÜ”`L"ê4åŽ5ˆÓ”ú©ynz·éûÞì½—Ãp¿¤ÖÏzBqðÌ°£ ÛØ–'ª3Óy$X‡|ÿ$2Vt,·~GŸV͉)(Åho¼H0û U7ûå÷ëc,&è‚úœÅÏÀ„üäÃúúFï£"è¼Ôæø£{^xw÷Ç´0×Ðþ’ŒÒÏX¹9òಠñ²D›¥ŸQzÈÆy«1Q®ŽŠß–L³à„¦d_z=ì1?Æk½ƒ«Óâ ÎõÆcÝVã—Ä¿æß6$ 8ØGL~` †¼B1ü·£|Q`õxîã L ÷º&¿{Ó…³Åi!jØ\Nø'4kmòV0Žç…Z$«®C G{Ÿ{Ü›œºKhß½®Ec=¦Úxôº)åòù[¿¿à‰§Qª«@FOyùਮ³-¸×ÄáãÑ´Õf”nEaÉ¿½a‚P$ϼ;ÇQûífÐuÒ'&§¡S­íè3!*„*lQº3¦ï]…ùÁRô¢`¤¨Êè>XÆ øfƒ˜de„ /y¶ ¦óJÈKvúðÅ’¦égi&G;4Ø2oEó›¼pô[rŸÆz¾•Jn)¢ALj‡³·d,—:¹”Î wƒ—P'þ3l7É’"ûë h½Ø(çyŽsÀhóaP…PªbåyºV3–í1?.´Ε‹ÍëÖ]C^ýIm[ ×Gœþb³Žé¬¦Ü‡P¥‡hBÌiKqL+!JÑg›ß2Îï"é4 THìVŸx·y(ÝXt{DŒ(èåËPDO4ôÿõ?!¶ùË~Àü^žo`3§Lºô±ô€Pრ APƒŽ|.ÖA¡»T%F«”. è®8ü#þ¦9äÚÒ;€ùå²\ «k²»ª¢L[˜ø“´Ç#›tD–j>7Ì,Å_­°‘ütHùXt?Åã.c2Çôi¹K~p¹é9òû¿ÆW7ŒKšÈn¨6œ>æøáaÁÈlûyN¼ßÀ7›ÂV·PÞI@ŽdÀ­mQáý†ÞìCå[pÐRj¡ <íbß(;öãt‡D”w„œ/™yIqI¦ý¼„1<ÓºŽÀe +‰n…ÓM3e½6ÿ¶÷º¾Y,EJn‘T6£M¨Û;È y’®C.[QuI‰î“»ˆ”<À$È·t1¡Høóq©; Í–î…5šÒ’2 Bk¿TÎÍ(T}®I‹0ÍLéü\~†”4eM-5M&i,fvvб[›ÏµuÊ«çÒk Üé…ÛÊk&:9=eJÒU}-¼S~CþªŠºwZÔ‡¬ºÌ]ölù-q ðGtCþgºÄš¡É¢ùÍ/”%£öìPHSòt &¹´¥œÈz÷X§œÊ'ò ácn˜ãñ2Ùgþ³ÿ÷‚´_¢jõ,-`#*èeD ÂÎN]³¦äú‘júÈlN*¾ˆÎcz-ò«XÕë¥lÁæã®ÉÖÆfrm!jpÃê,‰U‚›à†úˆÚÓJH ÍYc?ÑŒäÞËîeyé#åSšÙ"8l©–…#ųٗÄo&j(¹„Êàñ"ýý‘Îir÷*˜@‡‡MþŶÙ9™Ï›½´Û{™WoÍö7%d~ǦuîýM€‘}>X¡e²4Ù\ c¿s‘r|“Qå^çòØ}#–³RÍ^­ù¥ª2b_ aøw|_{gbØ13_{¼ÞØ`"Ú±ÕجxØ* ±Ä¼Øí=înûÒ¦¾.#€¢36xΣýŸ‚m¤Ì„d2쇇"+=Z=µ—-yq ÎgÝ=œuÜïõ HÛ# A ² OI»qî²ã}±J‰GÚÇÆ™E‡sw°”­#q ôÏ1Qk%‡·ôü‚1²KWâƒX˜½³X²Xþõ´>d¶Læ<ç¹ì§‰[O-%j]‡H‹HÁp³‘UC¿•³"øú"ÚQÀ§š*Ê9´Û?D!ÃÞ‘™ÝKáa*»¤èàb-Ýo»Uüîöäô'Φˆ@Þãåóß2ƒâ/ºa5D·Ÿ:WEgIrþ,QñY’œ3Kد¯žáf.«æàz€Ó0o¶nw.¹åªÊ-onx±¥*·që {ß…­qþëý¸Ø)lŽiU³9ÅM-ïDS1€q¿÷â¹_ÍZVv¨ÊMôp ó^í E=jØ›ë\À/(,¡¦ï66_íÖòF»X,Óå¬v”ë|Sý”@ªš¸Y\ÇÝþC¶bÏ‘Ùà®eZ‹Vd×ø//ض'áŒèŠ5@]£8©4©Ï0—MÔ&jGíZg Ê²9㔬²?}K8Ø1+£ú/)DÓ\Äq¹² èêõuÇ£G‹DM‚8‚«qjyg¹2½‰ ÂU¶uFáß9—hÌ8]mÁJÅQ.¿šßW¢AYE¿+~Qée4ý¾Š­&PÏîüýFLÔý3þ› ¥’3ëõàÍ imå_ýÓŸO'8ðeÏû‡×&/N7ðFëv@'hG;u¹1l`Áƶä8ù÷á?Ø`ðcø û·C¶WÕ`“ݯ¼wF:,ÀÛö°k¥~_ì.¼9›±Ot¾¾[ïVó|?y˜‰iÄœˆ´›{X$ˆ‰DáLÆóô¶7 ™57f –BùA)ÔàíUú~0¥½ëëhtß<¦MÂJíWc¦Ô±.(*NLÝa¶H:]²Õ4?¬šr&jÈ…«þù–"/ÝJ¤¨+0h³Ý_O¸ŸèÓxä¼fDw–O¢ðàq±Þ¨#¯ZÌÁ„fg“ëÞt4óP Ž:˜R^­Öƒu ØyÌj>Y˜ËTìq®wÔzáWÉ)l; m™”ZfžÕçˆ#XD_íO÷›õ²®Ù¤À%ùZUYûÕD'©T¹ ';ørŽ°’¯¯ï«ƒO¼ø ¯É=×78üˆ|vÄNZ¢ÐȈ×X$*à Ž4ßSnÞcÎV7‚=Cw§ ²Ü6b°œó­ŸŠQóá¦Î>}ՉƑ…Ø)#[ÇhŸšÁǘ\Pµ¼¡gzŽ3§Ë8ÙLð¤ÑدØràUõ‰­çÌA.Ÿq±ãffi,IZ’ò$g”y)OŒ„ w´VßZp(ù-ÝJô€‹¶Å<‰ÁiWß8GŸ §Mû¡9_ȆUw¬T¼:!/ëëg«Ð'EZ º‘Êž•dßÞÍÞc]ö,@ÚmÇl!].úóßM/Šãóƶ¸Ÿ¥Èïg£¤@ü`¹³SŽh*C ‹hO®Œõʘ(0­ÔÕø.éW?Ô7èj©`‘nËé“Þè}Î×+8’d«äþñÄ@ýnýpñ»lSdð¿»´vÏa—¦ŒdÙò VK½zs€qYƒ°vJ—Æ7£°ŽÉ¼9x©w¦Êb.m\H ”¿ƒªpïMª÷Þº< ,çâ‰DT)œï;UAùð€k9VEë1ƒÈ¶áŸ©NcÿäpÖ—¡ãÚs¼¼-åcäIˆÌËYVÅ¥ ¬®t¨€¥T€ªÂQþç6•\‘ª‰ù‚ñ§w ú¸Ö¨6ðSX¸"oèFE\ÉÐXᜧw³˜Of£?öÒÁ´÷nþýëf§>¼ÂvD怨‰h)_MNÄÈÖL…îý)æo¸P(iÒb“—¡G('ýÂq`SšÓë-,)Q ªúdq姥‚~VûUû¼ Ñ0MQ𠘌;*V#W®Üí}<Áyæö)ë;Qqˆèaδv‰ "U2«-:5Ü­š¬X‡:Ñ’ÓT…ñà ^iwz8 ¥òQïZ‹tÉkúîÍwÝ\’÷ÅÊîûðŽ'·Ã1lÚnÁ”{ÛŒ½,öŒ%Ü»n×tâQ!ë…ÜS$qª¢ãáÜi°éXÀ¸= DÎO³Pë[VæØ÷ÙÅÈÕ‡³êU…ÅQÓ®ô½üàväœÅ)¿ñ(²`µoÁÿC¡Ú„Ç3”} –|…¿nZ|£,Á€s¾êÑóˆÔ°uÃf”×ÛEñɪ«È%;4†¡Ëî¹_ l¼õ6ÒH¶ÝG×øãO]µØ®~ú±ËÔûe'´-ÇÔ„‚ >¯øÜ\’3w’¶û¡QzcÎVÖœ[B¶ÀENël³BƒËyÄ0~-û.®$¯¾™ªHÄ¢‚áË'@ 2!¢†áÜÖ3Ô‚_Ç(—¢—æ°ÕÙãgd”£Åû—í>½?=¤vDZ¼j¶nÕÔšVZŽžE¤[Ó[­¥?¦4ѧõ¹‚³ø­Kd;Õ·Žè$ŶT Á–Þf©*ŽÄÛœ4ëºæ%eêI=«Þ$Ïô¾»þÔ«C}Ý©N™…`ËH*6žd€ÝëÊ K´{‹Cç66ú%ÓÄFHö%LGú!èù ÀH¼ »$¹)Ñ8dX,aÚB½Ø™À;$q~ÅÒ>Ó2˜&¼§ƒ3ñ¿ÑÈ9Ê¿;–¶;Í5£ ¿>+³0¦?1­F¶TQÕ;9iÍÚ.âªUý+3c„;®á~fY tÈ´wØß R>7«¦ñŽ~ž)ú°ë½±™õ„³8æ‘À4szøÕ"yȺ×ÞŽkŽGh¼¦Ã_†`*ÝNH-%ÆÊ& ,ݧ¬ÈŠ¨vÏûÑ`¨¯ï29bФad*”K¡1ò.•%úÓpò>}«‰°¤è×o © ª0µ‚û„1xGÀrÙÔ©±ÀªãR͈WÉP™3¨¬ šÅËŒÒC…ݤª•Æy¹@í | õÒÊ?¨HáØrýÙùHz”‘';Àγ²ÚÈà7gdJÆ:Äåx‘dkv<¬÷É&cÉcÜV*¾P˜Qî•ñ¶±åŒ_é\ÃÏ0ظҿ›ÿz ÎÎûnRwÑ_Ÿ_–MmcüÙo5r'ÅÏn‡}>OÏ—u7‰I —~α”ÛZ:Š––àj¹ÿCúOg†è|‘Ã?ËŒ+ð‚÷™¥¶uÂ9/ÉÅ]Óh=&2ºx'˜›iªc*c#Áµv €®#ÜzH”f£çà–îK„ô[3GCk!|¶öÊ)4à.ÂWp5fðõÅL„gˆ9š>¨ YdØqHq“ üC%ê‰20üo¿ÚÆ)Å9ò#o°ê|hŠœÏ ÒÓæ$á/ò´Øêä}±Ë»‰—¥¨—‘¨·A~Q怖¼SKW˜7¦ìvc£º¥Ô‘w°Ɖ®òÐÛÐm¬sÞ9›OÙúñéhOCx/'ð¼6œà2å’Rã—–™.:ÞÁKw*~%oH³ƒÄb©@ó³LêuQš2šçˆ¥úõef)ªÃ³€|‰¼Bm3Ô`çS8ÈÑЦ¹Ð].\«Í†Ÿñ‹@gEÁܾ)NâÔt8Š*I•3ÓŒT ß­£ÿ"µƒ•ôd·69Ý•øº꤮²«6m4¬LÖ¾çÙ)í«ÏT—0ÁÆ–¸óÃD¹øKß~»XiPU'Ø죭ÅÞGlâÄDyDªåúqúóh<0A†ô—ÞõÝÐ7' /;Ë+$6±·tΣ8YHŒ\‹ÿ†Z¨ãb`HŸõ~LuÃõh̉€EsýY“økßµä™ìɱö‹cÁkØUC†“œ_AÍ!fiÞáxVâ<ñ¬;»Ä¬Î0¶‚¹Sú÷b›´aÚN{H¹:—x_Ë^Ƭ³ÎÁ·É}êgZ½I¶‘ Tû˜sŸ‰•aßfÊØ‚Þ[ç ‹); ¼R”1ÆÒNCpç““A¯,—‘}#G†àø*A«ìtÈ*ˆ‘8(AìýH^¥•a=® e85Côí<žô—áôí„A‡ó‰-Àñ¸{2/wpñÍMï6NËZ6n­¡É[sÕïb(«Ûna‚Ðíá™XÔì¹ÆÍzTbô¤¯TZÖ eM‡Xp G0÷ {Y IÉfn°z£æqh »æAh û&ó7U¦¸¦Ë¹;y ‰€3‰ê ò’+RöÀª ò²³WiÖÿ´ºÞµìQTEúƒójý5:«Îþ—MÚ²ùµ¯·¨b½éz‡’2Û¼@ž'"}=.üÅcÏ0‹RËîv-?U]“û–_ +—î’-¬–ú”=#?Ý»’ ›a…¥T?'׉SYY¬klGÊ©.p/IIeaÅtþëiÏXVl§¦ÇíÞeœ/ï*{¼VFÍ´J´ò'1D:fÕA1í¢¾M9Š“¬Ö™0×æA'ä½÷ž4nR$m´ŒYMZ-vÏ[D?°ñjGL‰ÅæËâ¹Ð#ÏP£P46¦~L%ö ŸÊiJ¸ñi-t3ö#¬IÌ ;¯\Õõ†ÒF¿Yo¶ÂZ~XˆrjGi™ÚyDæA4åc-‹0Mv†ßèA˾óÕJ>€•jO¯íé˜}¥jçåîx2J׃ôÔl%‹Ï›þ Q­%ß]Gù¤ïßu4ß/rTêx§W/ps7›Szõ|§ÃÁðØñƒtp'4þðeJã „K˜ùðð†þ¦-2°/ˆ9ŽH²éº刔PµŸv"$›<¹Áš‡ýñ°¥SoWÚñ.UH Nrǜꔊ pdÒwwã~7™bîÿéñtÒ×ø9ýŠÿî&®&‘¬bÈ 9íÖp Ð(‰q]]0LÈç`ñƒ÷š?Û2#C`Šb´ôf=ï³ÈO`R¢Ý_ÎÒˆ†cçŸð6«ª®ÖÈáÒJL²Š’©_̓&”E+4Ì|1ÿN¸˜Ò·wïüÔ¥µEjepö•lxƒ+s7…È ¯l³Ê )˜†Æ*Oðßà¹S”âîÃþdÖÑc§‚±«Ü Êé[óB\¹6Å T?Ce¦žÊãY*æ”vžÎÝÄ¥ô,ç`¸ËÖ„œÔÏ!·ä¥ŸÐÝìœ%î©%N)#‰Å‹GÊ´ôÐ:n[dc€Éx8j†_øñ6ENdL*Fo¶ò ÑX‚æùͬ.Þßøq{É?翽ċ«SD&-áÞ¾VÍ¿4K\5Îüzæ2©(S3ªÑìÓžSuŠòq"Ú Ïûä9;†Z¤ gôRkõéLm¨—ô¬JÞš<¾ŸdçÓ½Ze;ͬX–±ö2ØKÙ9rÕCc9³×¼Lå@!°À°„™°ˆÔ¯ÍU\ŠIœÂ¸ýa+ÆÜMw¢H@`{*ˆËƒø!4 o%§Z¨ìŠúÈÑ;4váMôÈV×ëݧI®¹ür›õ=åîu’ÀØVò[‚}% 8ÛöwŒÔ†S*üˆ7ýRØÚ<¸±}ÏšÍù0ÛqÐ >Ú?Ùз )K†¼QæÞÏ>ׄ—LÇCŸKXUsKx2s†"Â{V'CoxäÉ80Ζ}ðÕæNô"_YeëÇûS¡#Š_`V§\‡S/ÅýTút#+a¨Æ­W¥{c”@Õ„ë«ÍÆ •Ù2¶g_஬\gÐœ~þý wùaFÚ$Šþvdaggr<œˆ¯¨ÄðÍ¥ŠïØCCyB~d•5¯âkžŒ4åÂAiÂÁÄÂXæ!ÄWV„„xí&Ì‚h˜×ñ鶖lå¾d¶Âàbëz­£Ž£Á{àÀ‘}ÆxÔ^­õø§þå‹ây·$™ýӑ館¶Î¤m~f(w‹­ºX¬%©Û½”ÕÀ`çs „OÂ/P¸¬üóUsóÉÒÙ9]IÈßL}²b‰7^ž@7öñãG ¥ÕÊÏ`ä§Õl#Aî¹Q:ÐpU“ªffqæ‚–ß–¹@bÒí¦ú¢jìB ÿb¨›ž)Z¹„¿ÁÏ þ¦ÝQÈ]¶9B‚ãw&Ž…NÞ—8ßÍ“¿EnlÓ“ÐKgyú±ãŒ<¹­qƒ)¤dDo ;*Ú1Ou·¢e8ò¶™±%º®^ õÈÕ ЕÌúZDJ‘t¹ýÑuk¶?¢Y„Ë èÐÁØþHkÿÇWp´"¿?]0 zyyB΄â/Žÿw~_äøýÊ;€ñë|Ïõ†Ñ/‹ÓãâÿÊö%ˆlÕ•“ˆyæ©€­§áúؾøžEÃãò8ŽÐ šy ½=,À ”w¤ID¥$™ÛÆÀ‹‰íò‹|¯(–à+,¬7TUwdr´‘œ•Yh[U”¦XC“¦èó°Tz~CS}—Ú ¸|LÍ;»ê÷•Í6N¼‡$(_<ÿ, ã§Lx¡)=H&Aœð½ÌµŽ°wXgÓ§ýý:|·&ÜŒƒ{šq×ùe¦R°x•Ñ§7m:I£iû_·?þ['@ H ×¿žôá èݼ»î]Í’?'#˜÷ä츋ÎJ.«Q’¶gýÏ\’j7€KßGs6ÀƒzŠ¸‰UÄU|D%æÕpT‰ì#Ì]Áº•Oè<ú.ý./Œ—$FïoK+¼6Ã/¯¡TÐâê—aÈBË—aÜ©%”Mȱ#š"Ì^$ÔŠHZRz‘oRb µš,Ü]ü÷RgÛ:–­e×bqƒ@Q"‹oȃv¶4ÆŒZW«RéHJ,†æ²LõÝ.·Gn]6á‘"ìIT)¥Y%)ƈ. ΛM‘sŸ J‹*ŠÆbõ²Žì»ð¦ÒòۧΙÀ§_]mnTtM"æ‹Ü=— ɳ›ÛõÊæšÇ—FÜ×êJ•Ú>&ÿåÏÉkI&øm´;gßcôàŒîŸ©Aä;¼¨ºXæŒàyµýÑ.Èh¸$gͶƻÑõ0íÍçÓÑÛ»ù0O¦7½k²Jù×øSäQàce £²BY´ä7§â µü`ðÈÓƃþ‚ÿ¹Ïuuž=ò'ÿ2ûš]nòGLÉÀ_0@øÇe颟‚£¿ü­ÏëVóÄ\£÷]žŽ,aŒ ±à¢,­x)>ÒWoø Õ}s~驵җa`X ¯ywXeÛ«=ĵûõëWS¤¯'ú¹Û³’(5Š}bw´¥|}@ÙèîÑjkê.NØžÀ Or³dí»C–¡³‡(WŽ#ôˆY8.E9–Ï*‰NISJÏL…Pi“éè8]›f‹ÃÁ#†´yVmZûkè ®ÇÚvtBœeF«:BÖ9dÓ´ÿë/Ú”Ü1ýþ‰(æIY8—¸+ÍIjá^ÔL² ) ;ÈQë —žºŠ…ÔÜ(:V7£1ÑMïc$[íÃÿü—–®¶¨a¿f¶ˆ›?€M‡9§{°á.¤Ê#éŽ9Áúدî a)…$1„´Ýä'ö#°ýšE¨CÇ^Á†¸÷¡æoƒ­Ã3) óL4Ì“BPÄÓÇ ¢âW"(ýC¡)tpñÿ?Ðí¿7øÿ$l6`mVÅ_Ò&ø)ZÛ>O'X?šå˲j®Æ8úЛŽËdÄà"ápaÕ¾%]ÕOZ“E n(ƒõ_ZšìŒëiˆ’ÍwBaô®¯'ýöõd|E;… .ã=sJËËeåTR¹ìoÁyõqN }P½ðÍþfñu½=m{{Vð†{ô˜²M¤Êmð¶Múäø7ÌU%1Æ"@ þ2œ¦·×½ù;p˜Ä”$²<‹lbD“Æ—Åœ#sEl”pO4äºÜC<ý\º4¯YGÃVÁÕ<¿ržfFN”_òÔÉOý(òúÃtxsO>šŒß  \5íõfÕ­ÿC%–¯blÄШºÊKÂûQŽ¡sÄò ‡i†ïK‰üS_Áï‹rDñÑFæÏ—ˆ¶{Úu7.UÀyÂ4[Ϋ—¯î!vNv¡ÓϳÚLœª1=ï©Ðuþž³ ¡ÙISݸksé‡^%a1Qxï涤B~‡™“ûõ#"\Á–„ùøcòóúm' þ6ð2´ŸÌž¢a¤(ï † H§ù¶Öxç ½ä÷ÿÐŽ*rÁ#So±dvø}¤£GÛ‹Rê¬ &]fsØŠo†7X»ù ø_q¦â#0x4Å ŒÛi|Úmp3ôtí­ÿrC+¶ ²}3ƒ¯¨64Ü™íÀFóM=N°Ë+c›˜œFë½þ¿ZI¸‡#á Æ›}^ç§&AD‘¬bµEX F#V'ø`¡ü˜ñÞTdêâ”þ+Kk[ÓFI¶²í™Óf(Û”&àáÕ¡×çWª 1TcWä%Ôda|3šòn¶˜¿åg›ßßd=ÿ?×RŽ÷£œ};®‰id( 7g—œ0yûÍøîúšÊ:Žý\ï7Ï»Ü"ê7FѸnÉ¥dɲ=jr•™yr| ;=o´’ûÐ$Ö`¿PòS­þRÜ,,k#'Ã1Š¨ƒ2=‘üÀÿŠÍ»Á*ø<!dqŸÿjSQGY&<ÂÙd¦3©»Eæ&ýè?† äò„”?d<‡ÚQÞ£2ÇQõºß"$Ž èž`ÂÆt0©WúIRDEv¬ƒüòÐ>æÖ1Ó‰T]á8üQ™.…eðOŠbm~ï6b¾d$Ø(îO‚Å?øõ}^ibÿ³´Ç‚*EŠAлX¯jir`njëãÖÎ-Ì<Û?ÑPgÜúþ¨×ƒ‰Mµ¿T:Ú‹ÃoˆÏаüÓꩵ¹exð„  9H—ŸÍ|ƒ¿F«sV«lvíÆ(_Jë²a‘ys±á=W©L¿ù­ÞoS-úò’@—M–yè‘ÔUŽÖR0IåùïÝ|&M·à_Ktéb= 5Û,éX%Sux“Ò]Û†Ô×¹Çuoz5L)DA¦”ê~é]K4âx¢°¹ÐÁ¥uF¤O4\wö£ðnÚÌ (¼4}ä¹7Ëù’Š)¹:m·¾ª¥õ9DK‹\†Í¢¶ÊäM½m;)àïnr7–Jö]Û3Iïíd:O¶øª³"ëŸfœc§/ÆÖèfP‡;þ· ÂöaK£ÖHÁ° ]7Y™$y~ëe‚§Å%¾œ@P8¦á h˜îOupé3ÁmG°…†„i¿€!…é×g@ÂŒ7aâRñÔ›å.Af˜Ez=zÛ ÄNÿ¯íÞ|‚Bu“Û~3ë\&ó§uApV´ Õñ—ÌÜàþ„çÚ*éM¤k…ïwâc0n@‡­ŠÓί뉎4P¹Wñ8o¢`‘\.Ÿa²U@Zê+¹É21{d3š¡›êîj…û@ê¼ÏS>5t",½éýs¯£&ÔGó©å}wñýå­R‚\];xT?¿Q(ü7Ó1¥íL&‰kE¥P¯È<V£nš€ÅßÇBEøOÇŒY‘Ó|ÌX`Ó÷=ýëÞÖúb—óVÜÆR‹ÇÓý}ŽA —–7GUÚôGçn1í _/ül°qÞ^Ðy5Jv~Y‹­,ïæ(ÙÄ%úªÆ˜×?­°á½ C”Õå:7Ž@»…ày¢Ï?Í_}HZˆó†™Cî8‚ù Úu_Þƒ¤M¼ÝŠ?\ã/Xv-¹N ÅE±HëÄÉr1XÿÚütƒS£‹Ó“¸blªHQœh¯öýõ'Xò‚ å¦7bÛd1ÙÄVkw¬Ø–ËÛëç9@4×Õ(1C‰9uò1˜‰ËÓkaÙö´áÄ'Áw½<ÁnÖòŒÁç5ÖüGÕAÑ…!‡ R‚•«.5ø0™êór`ꓱ¿ÚVÔ |Ø’O»üË®sPŠë2F)äÊ\Ž¯’»„½+_FÔèWc‘†7·ó_uÕþt8»»fH”Ÿ\sŽ¯J$ŠwdûTŸØÕ¿ ÒfÕ?t{:§à©3&¦¯÷w:šÜúnÁרüÁË*ò^íÓ¾QzUmî[匕L¸3<&ïÑ‚hMÓåg<1ï*8‰ü®Úqæy­‹Ñùá”û\ƒ¿£göe°‹X_#G¯á‹£€+ŒÔêÄÐÞL4¤¹¸Ñci´û7)ÜY£À”d^\ü“.-v y’ ÀGÏ Q†h™¦À=º4q#xüù±X¡©·Ö’ª&{UU…ëz³ÙpŠ›àÌÁ>{7«VÁµRÉ‹÷ºàHSfÓîÄÔ¾MåRÕöïû7ØG‘‚M„7mÇå“!Ú] 'aÓ©m~»æ!/¥2q ,¼d³ßÚ6…âÌ)ó>ÑQ0å½¼†” ëÀ3_ÈàÁÊÛVO§iŸõƒÄïÞêDî(Dâž°Jã~õåu¿¼Œ³KÝ$N©/L»R&À“ý<Þ!Û™g(èÞ¸ÿÂŒ#å(¸À«N` $– Mâ%LM¶Ï‹ Vc`lµÇ%D_T,¨‡à‘¯y:7­¢!iï²/J{ K©wS>T5ÎG˜­å˜£%Pœ–KKå^_Çàî\¾¸å oT¼ˆ©ÞŒöïóQªýÞ¸?¼Ng½wÃn2z—òßЖ!Ù*zë¢÷öz(W"£6“CËߊ|ù3•_<¹ìòÑó|Ÿ1§Rj˜àµÀ*߈ëŒÏ0¿`Ð=Òd˜ ÇãFR~Ý8¿A„¢J ¸9ïÜ4Š¼AùéÒ¾™0Ô‡‡Mþ%ŒzR3©tÒä÷VºNsFڀΎÊ>ˆ[IP±”© ¥[ û8ÉͳFÓúé‚÷¬|*7À÷Œ…Å ©Ê†ªà§x¬g°Qî`ElžuUy¨Ã—è?‰„„üZ’„†ý€#Œ0ÆåY1éy8“n‚†‡Y¸.B˜YakßrŒø¡fð«C°¥8KÚ;ãÌ$ÊOÇ÷±Y4†2 '"’aqG1²+ØÙx°Ù|e™˜"z"…$UH€È\òš Âð·ìVª*^ã·ëó UX5‘"ý7ç h–| ¦!,þ¤¥_‘¥DX£Zá²\U$m뮂J>—ü¡§®S«ˆýò´^>i¿ël.–°1¬Ñ3,ãÀ¢–ˆ,çôL:˜üUäC'ùØÁMq:˜ %çñ/›Â”L§ù 7ˆëÜ`v¸ ÅI6®wŸóO™ Ê7Á0jÎûê`"§6%êðëmr¬Ð.g”eu>ãT/Å¥è'Õ‰½kÿ-ˆ‹k[뢬[<Ï”Ë Õú‹Âì2RÁò}Ò&/Í$ðCQÎÖѲ-3,i1`Á~ç¬qƒNMNÇýéhcN‚ƒV¬@Š…Ì:úóe1…ìtâaƒ‚vè3ÿ×ÿ5÷¯ïÃÿ+¹¼,-møˆö›´{Ël¨ÄŽŽõ¢:„N¿õïLŒAØ„Àê`çNÛÿZ=ÚlbZÖ3v5jÖìl"•ÃýØ<+ÒÉÁ1ë½Oç°Ç]S=lU¼»– m©@õÖ Éi|ÓMp§(¯)”jîŠj¯O‡«Š3ª~åÇã ÀüPn™e ªÇ¢BÁSMáŬ2ùšÔ;õ¥&óÇ(êf\Æ®v¹ïjÍxspê»Qrz};Ÿ‘@ŠÑ X¾.,f¨ˆ›óö×àj/˜NM>'’åÝ*qjíÃaˆfŸa¡ H"Ú Qh4Ç<.?Øa(úœk&Œ#F´ŽÚû‰ÜË¡^.ßVÿØŒ•q "¿5Ϭ¥;A¯oÿõÿÁgšÓ+öV^"b]öJozÓŸuýýlŽ®6ª‹EÚ ŽcÃcž¶¼t½GìšG.Ý™ÇMIzò…[„#C&#¬é®£MT­JûvpÄ0!œs`½fÆw,ÌHê˜!L.8ÖÝõ‡§ªx«¤Æç Ú™[¢ÌpÿXØÚxÕCæ V·F¦/Óæ÷Åœ1NÄ HŠOÆèkÎPdUkD$[oˆ?2‚)’Á‚¹ô½¬ŠÎÑ.+"[PcÕ.[!Ÿ›•t©k-ë1U ,ñ·áÅèaRÃsh@Õ4l‘Ò»˜£÷«î±åé_#qœl„«À𮾾ŠÄ—.Ã%K¶]}”Nkzà žÿØ-º°³~x‚Ú›àZÛq÷ýVõs¶”;ìÜƹ%ó³ª;Áÿæ/þ\NΚc-!}ÅP˜F‰ Øã¾Î7f™‘Ƶò9ã»W´²ß‰…áãkDÓsŸß@‹#±p « !Ø ?ü#fac‚dA×å1š#Ä´0þé†yäŽ\iW¤ì58`¡²¬¢È3Cþ!€êvxÿmÓ >eR®oËû£µÑ üãå§ì/¼å4eÈl´©äï²ÿv ó­RÎi€*™xRYËJ%TóIg3½6“;,Ã,åo½‚§1¡{LßÝ ±óƒÉ‡Ùÿ#ZC·½)´7D€Ëôgä"ZÍ•ÍV~ýãO ÂZ³´0¡SÝ3†¼TÂá+Œ•{D°õ÷(UþºPg%14Çœ©o­¡êÎŒD´ÓøòÏï¸[–qæøàÄõ.~ú±é.ã»él8ýÕbõÅËLÖ/ŽŽWóEo–¸Wë’f`Å8JŸ÷\³ÖšÄ†ìK§Št¨¦y^!L¸HÕ[Lã@ Y2ð×ÇçŽ`–?eV±ê>Ñw9ôAì¸×w¹®S<>‹5Dh 4?Yƒ5l Šß­¬ÝéÚRøi|æ·wïÎwn!þ<ÒBCÙ[]áÊÂÎóû|õàçRi;½é¼ˆä9÷ÍfT)j~(7²³‹HI¼ø "ᜑ(Wê:Ì4³;¨Šcœ]Î-5¶µ ñÝ/¬)ª7@îS:Ë»IÅóàMz·£HŠ®æNCîœ3mÙkéÔ<¿l•S°´ðC8<-ð‚²ÍªõKVÏ\3k$ãR5¯Üš¥R+|ù+FŠ„NcÙ1£85:½»%0c5ò(öâ´,²Ó Vb‘P}ÓýæIk¹YãúA‹'6pÞ½* Aœ&ÞnK£Ä¯nBZ‡ï;iI×ìâ!ñÊyPY’þ±….õ¼½ \ú\–ÜÏM$Ž­æ—¯¥¦²³ÔØO‚NC  ƒ®©z#Þ'Do×õ«D»~WhŠ÷Øè±7Ù±²ÈØÃ)ªå¡'t2ý*QÓ~¾Ã*ñvk™*„YüòtœfÀ8éúá/ÆJŸ{ž1¯u+µb—•£Ä*šµ$=ЂËvŠåÏ°N‰á& %*³òܹâ%}ÖÛ Îlï÷^F»Ôs@Zʳð_{××j&1cÄå]Oú?wº*Û™Á—Z‡ñ–—OAˆò–>’±«­¬ì­žò­­ÏòÍ\H%/ªSÕœ‡–õ¡µ’=4YŠéÖüŒ† ¼FÔ.a¢k¬x’¦”•¸24C༮4G@òÓò>Ëvœ­:œöƒis–ª¼ÊèþآٗBZQØKŒÙæyerðüu¥Œý^ÄsÐ^ú¹§'Лr&ZçŸeG±øM¶{Df-9jcÚZ¦Lùb#'-ükµq"öÕ56j¢”,žàÙ_O`:5*M´$>Pµ¹ƒŒ€i9Ü«ëÉ[“ °ÊFÏ+,ÑÏŽVø …>1pÞvôÚ`gø¶ÊÇËÔQZ8æ4¹”8Xëòè7:~þ¹Ô¤óË?%sŒÃä ¯ƒ„î·§32¥{\À‰K]ºR{|¦ZΕÍÀîa]Æ/£éüNczÛˆò·¬©/p”a¼‹âpº'˜ˆÒ .%öcM:¿%\´·iúÆ'©«m9"ö»@=Ã|`Ìšö&ÁQÒÂD²ìí"£ì íÂ1}×»ž ;Ìï>g»5Ö=Å2ƒÝo§£Õ-Ÿä& §=¡æÄ™<Ö€ŽÁê*l7°Ä¹QêC1Òãèõâƒi¹¦[—ÙÒP8ªãçÃQåÓƒ÷Ã[Óû)æÀxz¢r;nìô ‘U墣Š“½Í)lÊ›áË6J °}sr×Ò¡¿I”L¸P¼A\åüL…ä€}–†0F7£JÔ8ØôÜçE¤Ææ#W ÛÛØÅ)){vCcõ¹Ëågñ£ÇnLü^9ô²Mïäóš \/å!üò †Ž•çR™œ`±ɹK@þ+ï‘/LUÌä¬ÁJ9o$»l¥paº@¡%£%*Û‚\Æh…"‘G"8í¸o+órái8gñ™®Æ½ëÞxð¡‡è™á¡É½9!]ã‡ò˜«Î9`Þü1©žì*œì±7(šya¦ð-Zšã‚D–8mI¬õI»jЛ~0¿á-´m­‰ÒiBÇ€F¿£»§mŒc®Bz=›b˜…N—{8qÃt°Ö©úÆ\XÉGÛ i¹³ÒÉoïF×zö€ûRd„ò‡uæC¶ÀÃÙ¾˜s?œ°³»~8›Ñá3¸»½õ{óaWÔ­n†7“鯞¯üº›|O“ú‡®réK:QK×´áÑÚEÍñ «{/(ª32Ž™`*!5r¼Ûa0å‹Gœ Ë\Zö …n ½tKû“£“À.¦x±!ÙT¾Mv¶<ÖÕ–ã ÀÏLù—„¨ç0þ©ÐJ%Oˆ$Ý—Ÿ:Žz¹DÌž@Û&8Û²†-…Å•m½ð(Ù (™ÀЊÓ\›Ñƒ·0eÓš—È˜Õ †£—ÐzzZJÚíxŽ ôn¤ C`væ—ÝãpÊaq\Hâ“ Š­|¹j1IMŽQÉõ.©i­?:lTÛóiÅ‚.+”lÁPBZGuRú#tàY’®;!¹B§–÷Ì +Ÿa‰áÎ øX´8€/~°T×i”‘êX|ÔÒ@(á‘Š4"@¯÷põõP3nV¤ÖAìZ”&­WþMBu2¬¡,ü1É3×±yá’XÕéu‘=HÌ85BÒYê•Š?߈q¦»{S]7aúÄB‹åS‚¡Æè³ Â—ôD׳=§iy£aC2M^ø ~óXê´ƒQ±à!W)õv«TU,A·ˆ¿ònU7[, ¸gy“…¼–Rá|Úù“ÂM}„á ¿2MÇϼÆãâž~ª7I2 #€;´XÉÙyyo i!¸>ÂæÃd“ºnz„€ZqøëW÷‡|±"ß …íÜBJÜâº=mŽk¸„íËçgfgŒç&ÔôØ{V·ùYùÍcLú$rO?CK~µe7Ì( ½w׉îÙm¬rÕ½ƒ`¿EŸ“±&ìç@¨¹(SvtN0{0Ã1]>aí˜H2t5ã0rçA¸Ê•&)K冹c-ê?‘x~|lɦP¥¹‘+~«$ÚÔpÕxšÎna[Ø(§_JÍ}1_‚Om*VU¼Uò8ÿmsjyhë¿ZÂêH ˜¡ë‡uvàkN;œ(Tµ‹Vž 8µZ8KŸQ¹êDŽäK\ßþô£âò¹¢” >‘öÒ8§†ˆ—®~¢À³Ÿ‹‡[¡båCObP\^}_J©¾í͆qâÄyà¾'³_¥Ž¿?™•m ˆ¥OûŽ‡ß¦`£¶Vè‘4×””G üÌ£`d3™˜³$b]æ»®-'oÆ;#/Xq‡X½†OË}̸Íïð5êø3"lx“/ÖÔ‹k¶UÐǘ1¶¯1†ÏŠÔ­8—ñ+£€©T…˜—$ÒÏ¡–ä‚ý ½¿¿Ó¸‰:ÿJº­¥*F«,VÊÔ¾æ¨ šœ›g½ l†ÈÙ‹û ‘«ÿçÃxàˤºYçå, ‚Ûp5Üý—õáx²nŽ×¢‚ ¦µ*™ÖnxÇËí,áPaÏE3?¸ {CmV2bÙúÍ9ùËvAY~|p{&[ª@“¢ —kˆ>ì’Á}ÐG(’˜‡`¨ZmÑ¡ §#êi8¸¬Ð€‰ÏÇ^cF˜ÜLÄ%©¸ÐÞ`$à<7ï–€ì`9Õà„ÜEvxF,:¬ ý×S—â&ù^ªQDÛÃz¼o³ù Ÿ¦:v°3»1_öþO—ì 5"Px1ÐáÿY'¥¬#ã}¹ÎKò›:¿Ð›–ÔýñdžÞQ÷rj‹Š”_Tôà˃(íOá‡ý»é0%â±Ûé£h.E¹0²ú.iñ·¬T¸¥‘¼TõFIæ«õ_ÿþ²ßâÒFú÷ím«s>c S5[äpŠ­‹¼÷8›\÷¦£Y]yX™Çð%ÅeþÕ?ýÈ1 Üv8†`+ÝÂÈ~¹øòÓœûÔÒO*ï_Œ¦ró¶wø9üp–Å2Û‹“€“¬V8G1q¨†Å&¡nÃklOf/Ä ]vT}î¦÷‰Pnñ-ÍQ­Šù‹éY×hÞŹû°i¢±@~YÈqx1˜½ŸÀ›×7Ö–1šM··¾–Ö¡—Ü]ÑBžüõòIQ’W y³ ù®(ù~ ȃab úßy£ðu`ðÂç¬ ~WS+äÚ}ˆ_ÐÐÿê&±oVëÏë"g”¹d¤y!ét´àõ®êä®l€U Ö†&ÊÓÙÊ!EíT¦Î#+žxzïüÛuU,3lƒÑ´[W•³sU¾r7q©èf"FQé½Kë[¾Ì{™Žá‹¶K5+ê0iQ¹4Jqh¥vƒQT!Ó¸âW±–Umˆz¦ðt ÒþðªFJ›X÷‹ç]¾{ÞÒ´ä™A¦#å\O*LO ¥ö°kŒnîndç`¾¿¾½šÚÆ–éÇZq3Ÿ5µú`_5vY»:»VW¸}=1eC¿þjê¼E;›T”Á…²U$]pœgÄäºÞ]}8»Õ«C~Ú‡ë-ÿ%¹È]Kض‚Û…9¬ýpôú€ýŽv,¾ÂK¤ØÁ•%ºùr^p겧ÞNGc¢µ};Á,¨™Ç 3 $J»’6äS¬fÆBfZ8£«1r…^õÿÞþ» MùÈm8³áÇÛÞ˜yEpºŒz×v’°ÔtÝb-È`ôËh6™Ò磛az=7‰9IÀAßþ‹M¨ yPíï6 ‰å“½¬bÀ5²ææ…Ã3ŸÞ9ªÔdZSƒø\ÅY“#hr’½®ÚfIÆ3œ”ÜE3¾2S™M 7†‹h~ðadêͶ[ëp±xD åÜŽC¥»Rr>ËîoÐ@x8"þ{¸ÏÐÈøœ•y€ëEÊ‚AḗUBÆ{ÓÕ¾Ïá6Û½[ÞMrzù„ò7ŠmêaKÓ›ÑøêÃ~€éÏÛ¼lò¼1¥Û|죇döþG7\#ü½2"Üîìý¹2ôb>eÏ)*…9(6ƒC„1Öç#àŠÔ{^|/{m‘É–Ø>>‘·Y :‚Ó ’Lc3‘é§ÂaÓ„d”#£$*$š‡Ž´hv‰pë#&u{~P‘ýõ”éVé>La×!r¯ÙäfH)Ä"w×CÈÌd9àm]àt{Ž‚âBû[në¨ÁFÒ!{܉ùYѼ™´ò;ä<¡a¨ R6;qßè(“9Vp†üô£^ÂåF5ºƒé'$ÁâD.YA3§¢*Lc¥Èíð*'%èC¬vÀî½wÂV"ÌÉgXÛIWf¿qÊ}nfDôåÖ-Øy_¿µó£éõ_Î`†lžjÆÿXŽêzú'g˜eúUPˆjç½­ÛÞü=¥vˆJìŠFqÜ]:@"Ö!UÕu* Ë0¦Jdqù¡`˜†ÃÄZª=/?B»ãüþ`“ ·a^©´ÞÎxÏÛgžlƒdgYm œÞj•ÙR?†ü‹1Ç‚µÖ*T•±×À“)±ùªR»Èø!”¹žÑj"PUìÈà+¯Ç„¬gb‘˜†G9XeÚÿ¹8ËÊ>b‚XW ƒ ²àÔ'Á§x"øZ‚ºØ>³À^jˆ„9ÝÏ#R®<‰r±ëÚsÌní™VæŸ i~5/O/§óR)»«¯Ýzµrb„‹ÃiTµ=Ñ›<)õ¦ò&ܼ æƒûº¾QØ⛤ø´Þ{ŽÑŠäueoyàtZС u<ºøàÄÔFÎ Y¶Ê}¨ •Å¬p”òØ…ëéZWÃWìsPNÞán³¡Oð‹{÷*C èx½ÌF …ê',fÂ!‚™ÆŒŒ5¤¤!8Ÿ5—ï‚fåEþp!Õ¢l&´Á»…ü÷ùK3ÿ}¾\)xrDܯ5Žaqdæ´²& ž”»à¨¡Ô‰”×þÊ ¯ÿ¡p±Âföà{Éà!Ìña‡p$óRÀjA?=ª<óÃΨRYª)£ÍÙÔEciAu•`}gÕp’$Tô)ý ic‹]Ùø¥h.wqØ}«.ÈŽÝ•ÍÕ#Q§¦ûãÁŠí„äª%–ˆSüc@¢¥æŸi¢äÑ«ì·Þ ë( •Á‹êÎ)ézÉ>˜4¸ŽD¡ÞDKÀI÷X ‘DÔš¤#ésö—œO1_¹Šò¸B„B¢‹U ®D6Ê|¢ú­“kõ>§1ÃO,ü?2 Å|ÏÐCOgÒÀà wÒ³þPMs iœÍï;˜!²xì[V±·\AÁž:ÙfïÔŒjÕø{Cë ½r†¶jèý™æלE¦uìõ`«Hyä¤j&% Д´n¾X•S ºÕfÓ©¬›Ôaè–ÎŽ´Ê…:ÚÞyImfMAèyµšN'aÑåß¼ðñj“ï³É¼»÷Qñ±wMÿ sÞü/ ±ò—ÂJ¯ —ˆ¿QÅ‘~9:/ýÃõãvQp=£þì/ùzçýL8U»IxQâ]¡ª~nòWMðìÊHÇU¤ãå~vj^…YÒºÑï…Nój"Zžî&çÌqLý¶ª‡÷`y¤Õ·dÙW|5u“wXDwŸ*ôH¡ ñÌÜfÇDôf;züøÑàð|6”ºÖS‹+No'³ÑÇ{é`Ú{7ÿþu:›ÜM1Å­~G=‘zãø©ÀÞ)†¦Çpþv6ðt Ñ0¹ºûø‡?þd?>dçöÑLžÜF{Ÿ¿tø_: ù64 “Ú·+ð,˜Úïx"Ù˜ÐøüãïÁ X ˜Æ`6o¨rÅQïà ÷+n½#1á(j1ÃÂM“ÅQ+³ø[ΙøDóù4½!’Z<ô7sÆ°«¯ÆµÐ#9Œ«t°8æÛõRBÇՉ™#åK˜ã\ÃÕaö -†ÈŸeð)åî•Ülu1=ÿÒðVÑ9QÝÜGáÏò~Xî•÷µy¸Ò…±^GºÐü;‰†5™=)ì˵3%˜Ë¿hSÍ`_œ'p>TÞoÂ.5IÉTN”ÍŽÿÓ&D´ãªòý'ÿ;Þ¿ÿúíZ¶S@™hÕÃúP ¸óŸ57ôzO¬.©sý‰ ?©™õõ]d¨Ç^õÜÿÇlmh|3ï¢à`DU,Û;S ×ÕBAÛÅW Š¥ßg_ééÊR®H.mÿâù@Df¬½wû^ÅEÄÿ_¹UÛ[Ðë,MârœY]?绉-æ2UòãÑÁØKóÃmõ‘±³ChUm´ó~õ[‚zá3å ýÌÑ/ÿ€«ýóý÷¢”~p^.Kû ùØ°Œ ù÷l¿å£JU¨æª[þ#§øÄ’Çz]¤BÝ¥%ž9èRZøºA ²˜'Œ^áþ(ñî^îwà o‚.ñoj»•þ¡ÁÅÜI›âÚ›|ЄYÄþŸ-vôWQt,¸>’1h[ž‘5‚«¨ô¼Ðuœ$h„Ýb¿(ƒÇí‘à‰9„㟘¥c4ùMÇhI êLE]:$’(öÇ€ºvÅQ!Ã'…q^͸IÅÏ1TËc ƒæê“*Ô‘¿rÝn5E~[‹5%ÓÉ„ªºl^†ðœNU…jk¢ø@ôO}-´¤7ú7?BÔ>§Ãùt4œÕáõ @?†Þ;’7R¥J€o*:‰Õ˜r¯ÏŽžd¼÷ÎÌsø†Od¾ˆ=›|yÊê·Wù°6j›þøñc<@¤£6RŒú.ý®:¼ÌHQ؉xÇÓÁµÇÖ»Ï9|áŸhÙœa0äÒ¼ªÖEõ)z !FŒéz.Â7Âƾ8¬“’?¯£ÿcxýJx¬Öúù[$jÙRTûKL4“þϯîÆøŸvç?„fðŠaÂ!Èh3gpkAötMèÑì!º<ÁDʼ#3ß¿–4æ\{'åJ­Ü›Í%Ê•^M{ã™Ýõ0ûÈÃQ¢!’Qª…oMój¿Ùð©M‰8/µN¨¢ÆGýš æ«RTs¬¿‚…—¹íòÃF<¤ôÈM‰®ý‹‡ÍäOíà<`FfÚ'óÝ Ô+^ÁÀìVæÇY|^xÞké¢s§­ÅjïVùî(ûó¸>°ýÕ|²#udÞÙÌ¥àY®6…½ S´dÃëòq/|rȈ×Ê¿ñCô6žŸcQ:¬Îíúè;}FŠ5^¢cÈ!y›ÌÏ3Y_u²Ç”d¶5J²UäÇs)r=ûxM­°Æy½þ{Ç¿4ÔÑ}Ýá{J™PÆ­TB×_²MÓá1ú•,~g·­šõ.^E“4˜‚$ÿ“KÛ ÷-ÞÒ‡¢nè©¥—âúèî!þëA 8^%½‡-d¹ödàôY¹Hd•á¼$è7I†+½>øý&cÜ£:ëš5„§1JÚÃ{ûéŽ×ïXE®­a”šÃ¸oÚ.Mh'Žâú`õêÅöj0PrŒ’00 ü’›ú~Á &´+_¯oç3ŸHŸà¢T“Zʼnlᤞ¡Óð[9°b·'4ôfßß®®×»,jÙvjÝâL8©¼¶.m#¿ZÃ}ô¸M”,’ôv>ŒÞ§–†ïFãáÀ$@Ë_•ýKÇÌÄ“‹ï½µÙ’@k¾/´Þ„b«Ë…‚’†¤3NÝ¥“¼÷Û\?øÀv+íåÖ6÷ÅbñÙÝ-–1E1ÜÕ»E:M£Ãõñ–¬œÙÙÜ_üÓ @,Õ]°‚ˆÇÚnÀDì,š˜•× ƒì©dÑ,-†F´:ud}Ò¾Éìss N Ur¾=ðQnV†°X4ÆŽÉÝx0œ¦}¦°×²ª™PÉOS%þݸw=º‚IN[† ñAͧ¸f3ß2·œü="Fa,vXé˜?8ˆy toQÿ®,ñ|ozC24N%üM Òã?ÒÆðž7ÃñœøˆeÜe^5ÈsåH‰ *º1וě׉Hjnkv;ìÞúåC2Mñ@§¶áÉÅ¢l1Ç+ðgñJüùõ,ÜÍÓ Æ–ÃÃÎ𠤇f”©+{Í.ÙÙnÌׄ†Þ=Ê× ;nQSE}\>-h´È3ã„å¢Q.ÈýÛguOSz>ü87gå)שCÆ[á(ð:oòÕic ¸ÁcAÔýü †oÆt¨½Ýj¶‡ñÁêŸv`%41e·ê™HF© m-…ä=#LÁã!'ºÖûgX‰£þd0ôózr•"+ZœœÕ-3KM³AÏ9oq?¾[o²8C'øá=8ë±ZN ®ÊÒt²T™Îaƒá|8þÅyò¡-BøE"zîï¹;Ø3\ö#ÍÂëeÉïvkê‡.?´õh‡.ŽÒ–µTK¶( &Ù«²‚¿‘bjqĈž&±H}Eø"ÚoÝð­?;f#–'Ç®PÉùôË-}Ó«œ¡D¼Aüý$5ïä†9Aßæ_q¸Á`^lqòož¿s6=Bkøÿ)¨¢2) (¼qŸ©C¦wJÐD-çÁ+w³¾·ãÑ)Ûìïz£ko 0»ÊƒHýèÚÔ6“ÐivÛŸFÚ¹AáíȽIz,ÿ’EP!šñ›K.‘w^Ú)_Ï•bÐUXµKúåTöÂ'üÈÊÒ:·b¹ÍÃi—¡:ó2Ì3Z’À™¼lg ›èQ¶ö´»_lð²à倓ÿ ‡p½S¿[?\üiàwà¹$÷l¸65ªPà{9ãÄHðb ºâ;–»/åY/Iz¡ZÐñ6&uò‡6žóÉßw’J~ìhŠÃß¡\ÖímŠB³ÿ™üùÏÉO?¶\ŽRÕr tÊ´¢%Þ~¬{8C£­Hq@»×·Ð;m›•¢ZÚxn¡âJ†Ñ$ËÀ9y}‹¿eo›rΈ€Áã逥²«ü‹ó*Z×­„u÷´ºh¼ET{il¥–ÑÎ^ø—¹–Ä•x˜PÚ°ŠœNÝ@y•Ä¸^_£Sï’ða £ÈÒÁfÃÅ©ËŠÊ/{y7©aÅÀ&WF¸’£žácÚÌíQEÒøØ0ÒBSòØzÇ&Q’;ªôþlsŽPezÀã”ÛÔúÍüœÔ }Þ\’Ç5âÁµÖØ¢NÛyUQTGêå]\xÁÏh#©XálÌ›”t4¿i,Ã2lòüÓiïžÄèJT%ã}7±íì_“‡)Ã>œ–Gæó»ILÄ^õ]ºEûöš)r.[x $ÎûÆ_WÙ÷jÊœu#_Ù\³ð¬Ej»øRe‰£ÛÌì¶Ë­7år%UJçh™*ëÂ¥ä ëY$ˆ„LÈKl ?ÑÀÇJû-ÞßÙ%u pLС8‡6bøUñ$™`h•ÙïÑ´@RNûE[_`d»Ïx70ën™E¢÷@Õ%Ï7‹â“ÉqÒ|ÇýÇÙ‡—ú¡Û5ăEÿÜýL/Õìx•ˆi©“O‹ÂƒòºÂÒ$p‡"hØ£g€z¡h`1Rƒ_©]sÏʪ['$¤Âû)캻Õä¾½Q99ñ·!vï#ò‘{ØDÛóŒyÓH%eÿ.…_”.4,«çÍÊ1\~þ»éEq|ÞX€ƒGVa„5zãÙ(ék®Š3;%Žâµ:·–þ iìXö^‹€¶ðË-žã¤•grÄ5ñeÀ‡£êÜý“€—ÊbÁæî?í,‡£µT,=*At Ç<]oáìÅ;9Ëú˜»óž©ŠL^U±êj,Ö<0yI›¸4­ìåÝEkQQæÝ‚?ÖâÇ:…Ñ_¤ÃJa8쳿8R8ˆv?Ñí '¼sÎÓ:ˆ÷Q­y(¿÷¾7BA¿O؃9çFZP+œ=Ð î9f³¡h‘;I(QùÔõÑè¾¼véRñrí$ƒ…G2ïØ^«š•uÛÀíéè® ƒˆ<Ò9{EiÅlÄ8Ì⌲ –e$ß²…Öä)Ø´Kt×Ï×.Oªý4¸9EtSfQ³Z2]ðö½µ_¯Ø@ytñTï›·*{ÌUßзÆ*~ZÎ霯é1À i³SŒ$ŒÇAƒcÁaø·V\7ièI>P̆3šŒÌ úÀÝ€­ôyXùþ¥Ÿ(ç'Â!½aA•k5°¸¸Ñ,û¦þ’‡Œ[¹²-òÛ̻ʿhkx§ }\гeBÝÓy£„Uùßnˆ¿Ý%Ùv|NHL~æ+A¸H³Wv¾ºÉ×pNBÓÿrZ/?Á!ÂaP¼=+Ç2ø ”ûðôpò<áM¶Ãâw,-R"WÇ´d’r.×g¡ò Æ%ýÞæ“¡9›  ¿ªr(èБP2ë }Es¯ÄûY«öú6J²7³V!n‘ƎÀƒ‡ä4#.IåCˆ¿ô¬öƒ<’K¿îÊK&¦F¿ÜCeIóC §‹G¸k22ž[ê͉“l•e¨ñ²< ²]ñä^$ËÍšH‰tS ëB¢í$©{et’ë$/§™0h…Ã`(´ØÆH*玷"2!B&‚ š±‘ó+AjF…Ö+Zy‰F*¿{ùo 9pÇà9 ‚ÍÃhê/–°²s,4œlm’ àªÕ3Ü"ã‚æ—\Ûú+n--‡4×l.3ùë)s˜Î‡ÚÔOoI0¯PŠŠÿ¼šönßw^ܵ¾l›UëŒnLLtt—§<í»HaùXc&Iá}*Ó;ã(i>UUš¾ØÒ.ÃÜÏ»ÿ^Ñ=K–“øï…|¨Ä¹vCi¤ >§ë7oÈ–ø9ÐTð 4Á1NMu,(e_y§:týò~Åõ¥$ˆRx˜zh=G¼¶ÕêW&ñiå)ʦËê´DÝIÃë°û×ÜÍ‘DÒϦŽŽlf#w‹m -ÿxXìŸÜd«›´)áß‚…Ä©ÃýLû4ÛNÌÛ“ƒ½ž…ìÈ…V`B‚†¸8m‹Íê@e§Ï.»ÈÝønF%ŒQ´Ò”iÚRŸ²g$ûdÄøm«ºa«GHŒz®{OþÄúŠØó¯Ú 3»6“Y‰ó Æ}“Þíõl~ñq¢:xº(\v9°~?ë˜2Ѻ¯pP“ÜŸŽ†È“é0¬¤œJÔx÷(£ÏN%jÛº—î,‘~š†l>îŸv-ø|´ºL)‘m©×÷é!wÔ²=làú¨òÓ±X#Ë"´´ ÓìÝdzÓ›³¬Ð;÷E€DÀ©#sžZ›ØàÁ‹>`¾mÇUC²&/Ú ÖµE‚ÞjKÈ+4”>øýo">Ì*f]Vz.—Ä%ðr‰RmpŽæÃio>Loß·ÌØEW ×6U9:xµw‡,{;$ÿxùú÷¬Ü¶X>i€‡1;!† ì{x"ŠYŽ'”œŒ1’Ī«‹¡‘es {'É!sÝ%ï•YqeÚmvx̘Q• s'ÄUâ²Xý&ç²CrüÉ’“"Z™Ê“ÍC‹†ô©¸L’>¿{x•B7þ¸Ø«ûìø%ƒÍRãhÿÞoPéN´Œ¦ÒBhö¥ò&yºO6‹GlÚ3¶ „Ÿ “éØœî$i»À^&œ†¼ ù…iô’æóÊ>.öŽ&Y÷˜hßÒ·—ªq2ê±ä*/ ûšÂ£„†5µt†Ä J)Ãôv³t8M'oÿ¹›°º×Ûk<Š®G³y—Èno§“>Nhøèí´‡EÁG\v½+…ËJw¢î@gºNǺZ\àzÒï]3ñKWyðí®„™šs1¸+©• ßÁ³¹`&oq˜»Ú1äS§ZåÂG€u“ª»© ŠÆ¤ø1T‰1ÜVì‡)ìzóþû ãèstñì„ùÙºP`î‚·FÖE¼ó>ú²‚pŒ¹=Jļ†÷9ìnÀäÜôò‚WÖóD¥œÙg³Ïe¯Õ²P^b³øª-§•Xµ5@ÑwLŠ‡(;O”2"t‰ûÕ:²}O>1óIH|†«É,¶R+ Äïh§¾r§~ÐíÒ¶€£]­ÅéܾòJ/4[­D‘c©Ÿ½úðßX‹wHM‡._RÖ~@¡ ‰„(¶§¸GG>T<^UýA´Úº½ÆÛVT˜‡yYƒüè&•ÅSªbo;—qàù¹*sD½ÐBoͧϦó0F¡'V®\tGu§ä³ëbÞ.¬cbŠ&Ê_2«?Æ'?;§ô¹5ôyÑË.›ŸŠ~›Ü¯‡F‘+j?!Yµ²Øîù¾Ò‘“ªs»ßîDtÆ(‚Œ³‘“¢Ì§³'fÉÝ*ûªäÍ3Œ¨úóŸ“ýÇË›ýÓâ‡K~xýú¿_¼þéâû’?ÿY• ¥j»(È“ßÿ…ß}F˜í"y$eUcw·;ÚÃI‡‘.ÍÝc–zNòl5]ù´rn¸dÌ%x#N¥UI}K+…,ZšEßœ2o¿Alò‡óX£ýÞ`>žR ÊQ.‹/¿+¥‚ŽF+÷ü6B³J‹\l7Äò ÄÇN€;ÜÝrç¤}{7{ŸNÆôÿ~Øÿy(P%–µÕ_ñG‰ûRº ‚ØPzj#Ð=Š/ì”ÀD`ÜÂñw›ÞNÀBNámR¦HvàGÖKŸ0Q‡äÌnX”‹‘Šï°kÊ4Œôfƒéž[ÕEM “Á¢T°Áæ–…ÀË`osŒõ[m¿jeÕ“h(ÙhôuÝCbÆùeòó0}7´ÿ9œÎÚž¦ÔzGŽ(†²ó}À_bB2Ð%Xë/™’’¦³Èvs¦“DÅZ¦,Ô©Äl1Ì‚1QP«ãˆUÑõ\Éçn+ß—„º°0®õ#­2¡ÚZ’œ E’’4Åû”žV$òÊ.[i{ÜÆ·G—…-ü.Òçùa±+p¨lú˜«ÒÄEi<í\RkóØ2{,[oQÀl¼VÓÉ ˜[,°TB{QHU°ƒSøÌq©‘1…Íe*²!– Ž Ô`rmÒBnDRò °3"ñZK7“­Z¤§Â:­tâ˜Å›éœouÕš‹E–ÄÄ%„ƒ÷yÄ…“ÀÖd¨ÎWZˤj$•UõzS¾ºÄ§Í(Ee ü¬ðtÏO.{ïhå6©ãµ¥¼p0”° ëcå8Ó;ÑVçQ¢CYõᘶKOPyïÒ’ePãɘŸ¶~Ç2Ï„å(” bœ*yS­zý²6ŽàŸ‰ûƒ„E8®õ Ð$|o]­𞆙!öºe§ å{‚š8%íÙð&aËF‰ì"ÍàÖßý] õ²(±ØÙl8{gÙYêˆ1l¼~6Q∀¸?j=:aÒŬA¡½æ€k_‘å̱z97ÄGß¡>6u¤]%½† §Å¾+™‰ô¾ØûèÎ"À|µ²F¥íµ¶qÊ|óKØÒ‹4nØô Ì¢Ã7…æÔ÷¯–Åää7«Þƒÿø–>Ìv,Îícôv¡ku9) zw‚Ò 7xÔ½ÿ·b¾n¦­šVѱJ2iå¸T‹"o‚_ä㳚WÿÄYH=\ç‡T:[”Ø|ìBœªé  zª¦ÿ­¬Lù.U§ XK›Nº  ¾mÚ¼žp¾Á ŸÂwo$ÝJ¹j>ŒLÉD71¥†´%h³‹k2¥KJªh¼‡hÇBŽRõë~¬~Ý•¯û±úu?F^÷céu?ú¯û±úu?F^÷cÅë~,¿îGÿuˆË¡mÑ#u×°viÅž…‹=Æ{Á›¾ú Ö̢᭗YvKÐñù ä…pÒ€:Ú (¢éxAàëÚ€m¤…Šªú2¯Ûc”é­Ä¹ö|èt³eÙâ/üOçÕdpvùfZ ÍmÖ¾ô…;¹Ä;Ó™"Ú(ÀÀ¬TØ }S%ÍŸeíù8Ð÷™^ZÍÕJø:’wÕÁ@TœŸPGk˜8j‹C•´{yCMÛ*&äIÙ+€)—&"¾Åê[b SÞ¢Üò–†ÌÍíuoŽÙï´7L'£AeÂÈ5×»ÓW-b·¡ûaÎàq³¾_všrD³ùt>¹»¾ö¥}œòsCè &H«8Žùià N[òä¤ZŸ‹õ™ìóúö§‘ßã§kiTðéÛ»þÁ☯_Áÿ€·§Ú|ØÐ#LJ7"“t•‘ûM½XLôͧ½þ°ÕU­Ïs«K¿³rtswã|ž8 8[&ö=8®÷³0VàÏ#»FÑä¼áòJo—ìÅn»­6r>…/eÞaCERJJËïóÌ$¼õ‚b‘'{†»$-†k¤6±=³¯ôÐK*ºÁU'žBWÈøÔ‚ x*#<Ì%ÀØjEò MçvÇÄåÊÙsÎæâšÊŸù&NÛ}Êe™Î T‘˜¼|F©¸{[i°N¢˜’{QD\žßÞ:»/ìê¼ Ýœ²s‚ï°Íû»ÇØñ_²»\pšHŒ¦ˆ“Wƒ’ŽÚ¢V5ù¡ ÓR'd)|kgŒBQÈCIg|ŒU/¡M“Ä×¥dk‹ûëž=Á± Kâ(¼(®¤qº8ré@7 ¯¦½Á0E¬Kàªü‡Ü»ªäý|Ô˜ñª¹}Ê€l£ ùq±1¾v/’ŸM– Ù}ö÷ÐsL—EåØxÜ…‚^åà؈fâ´Þ0à%)æÂPßâób½¡ì!%%¢#J©‰ämdG>Qþ÷ණLRSØ ùó·ö¸ÆJ¬ ¤Î³šI8¾ó¶‡¨FRÉ™÷¦WÃy¾e†¢ ¢Ã]O¿éÞÀóÜ Çý_ã#h™}hªêS×ðI©¢Û‰&0¨kq]‚|}Íå’@±{TpiÕóÛÃ’Ó@BÀkXFrÆ ¶[æq›½KÇÃá O8«çU‰ø9A4¹&¦4Iy’4Ö³¶ŠE2`Nª™æÄ<‘Töh>,—Á›’ Z8™2=(þaŠGËõĘÈÅÖ”#MnNQ„É'O áP‡üKjU«tTDXŽ*Éð* +¸z‹:²Þòd ±¨¬[A0##AZùý_$éi¾át¤ þÕR¶r_<”ÇÅzçV›6•é†'}õoÿæ{bÍŠ”…:gOË9Jùa[v·ÂÉúº“ÄؼÜìn¹²…*ÃYšNÞ½› ç&!›'e”[¬ †±ûyÒo%¬ÞE^ËζzÜœ[µ¸Ê $ÖM»CSù)ÛìÁ4Ùé"wüæ•ësQÅËùƒ ž(&¼š ‰ îœ/Ó%jŽL;ÚŒWó(÷qÏæ­3Þk·‚ö¹pöƒ"ßfÚh ‰úƒÄ"åJW5 ‹ †¥ëi…=Gùéc/;èc³taW¸l¸”Öúåï?­EJ‡2æü'ÿà˜ÚÐ{,ÙÊš”d1ñ/X¦÷YW¥ÒF›Ú×V F¿É7éƒóÉ2ê“ŠÇÆóYÊ%káiKéÏ÷o¯&£/rôo[TÆœHþÛü°¡„c%€H¬y°«æÛHdA 0‰µ&Õ ËYaq>V¿n˜+T¸Ào0ÎúâÎ ¬Ê 6,r%[zk¾¶ª€ãŽƒûÃbÿiÚ·œ»qúZV„dz{ ú!{ØņÄWr]–ìYêÕëCHtôÄ*´ÄÍ'øWXH9g5à°®NÛí3†h(!ÿºU %¬h8Š¨¸ñXÕiPñxnY æ"ß›O@SÏÝ‘)§‘kuÏå ÛfÐa*¥[&åûaà =àf­HSö´½gPpÿö®8ë&sÌÐᓬ‡{%Ù E¡í¡—)¯êºA¾s‘a˜,^ ‘ ‰Ë‡a«Î¹êgF'ÒlÚ&YÆrÚ³7On†7UÕÞ(-B3œÃJ©³'é˜p ZmíªÑ­r)‘»ŽZÆh… –Y–Ÿ Ì´ì$DgcqøB‘PM*ZƒùÒ>e(›k…-cç<9C£&T{@w¯+w47V¤aðMXÆM8ÏŽÕܹÊ!m÷áÏÎQfn ›Û'ÓN‰uÁק ¥c#²°Ê“±u½'ÍÀs4µ…1ï_Ù´hà†²õ'‡»¯Pb%ŽK±A¾j¨AäuzÝ—Tü?á ])MnKÙJ¹›9Šô,ÿqé%4åÌ&¡ e¨¢GA¹H3WGçiöÚúx"Kü"¦¸³zg¶j—5ìA—KÄ#~ÊÎæ‹‹<‡Š>‡}<Ø ÎøéÛÕvD:"qá™ÄÒâÅb›êòzÛ×ÒݵQ¢Ï#¦iïº3§(¸¢¼'‘:|iz(ŧ8 ØÖ'Íœ½:3dÎ+£Üêp ¹¨†+eÂí߃÷)!¥MÕÆ›üñ‘NhÜw(õ²[gˆ¡&H/S;Êð.ËMéCöÖ; ¿[¡¦1±ècCýëaošòßoÍÁÿº­&Ÿó <žø“†Už3ôV Á{Yžb»ãž”ÞWiÁ°‰ŽmqA]}dB™ÈDâD&šèm¦7¶çI½n×¼Îßð”QÌ&NñÒೡ¬Î±…« kÝá!·ÓÑdŠìÛ[R‚·xXq„ŠO­†Ñ]¢s#Rçä¿Ù ¥ ¾Å¸Hì*@¾ˆ¼2qd¡ÙqZoVòš(5ŠÔ³ô«×Ûð·l0JI«ŸEeቴËÙ¡#·š'ô¾ç9[‰5aåuÓ Al²diê¥ÔÄÔÜx:AmŠAz']X¥¢JU–r/ ãcZIIÏÉTÕNf鬵 À¬BÜ…¤QË.g©º–Á3Zvû!×ÓÊû0¬VMbcî.À¹@ ©‹i‘’ åTŽ‰ì÷}°¬¬xP“(ê’bð4§{xÍ;G:£“’?–Ÿ GF¥‡é‚vÑðÎäúŸÅI§#E{Ñéñ±PÔãžeo:Ö„½…VZŒõ#—1ƒC àÃu Ê1@«²Ï—•[ Úïɶ‹ýÌ4¢ζÚ/­eÜrÄ\à&ïµ|MJDofÈÎ4Ù2¡ëÜ)¯"S¾œÛÁTÍæÑÁ_ÒUv,Ž‹îÙ]âàq%ÑÙ &${¶ÕXLØ:Ÿœvë¯úƒƒ:Î=H“ºfÔc® ¶—•¯•Ãuºû>?yÓª ¯–ú\HÝ72+úݦ¨  äàßl»’cA—aǤõtÿió©U"P *™áM:ŸÜ‚Sûaìgù°³ÎÃÛNñÅiÖa÷B:2h'ûÓaŸRiàÝíñ ’Š,„j¢ËÙ¡”ñǘ7;,Ö…ŸuQ5Y—äü¬Ë¹›it㬦~i A–é.¶·³qD|X/ éî¸ÞµÅ#ûÄù_œ™ß­}x,SyNåÈäóW†§gAk{ñÛ*,ÇzîìÅQ j£Í™ŽËÑr6º¾…Š÷u¶*‘Ñ(¸9XœÙ±Õx¦ˆ9i†€þN*›Ý$Úꂻ爢Õé½1f ÞŠ.Æó7 4d–¡ÍC¨ºÄd\ª$¡º6$‰ÿuíÔ•¨yWÅ^t·åWq8íp´²)•Ó‹1þ‚A†€«6ÒX_7à”rb´y½øéG!µËÙ©+¬ÎGp1aŒÔ%K÷Þ:.mt°1¯fg&ÅCJ嬑¾ }Ÿ`”°ŒP:âѪö@ Þ»MŠçÝRi±1â]­‚Ë7,ó•ÜŒÆW°('hÚü‚5xQ"‚Š2 ÛcBÉ”æc„àPpùLª?2Ð+9bü‘>Wœ ã߸CÝ$\8ß¼šBöß0ª^[žSrâ˜LáaiPîÖ5jÍÛÉx@-ϵÔ– Á¡PΫx¥‚)‹rÆE§¼¡£Â(†c¹à\&é‰J¿ÑhÊðzWáʫΊt€xkup§ÅLw<ÂM£u/ÚaË–òC…¯†Z¡Ž˜×~À}è”m©pì¸2ÓAzcKãÐýÞ7Ýeâ*ù¶í·dfSÅیɄÊÝÑÏ`!Û­ *g˜RRÊ–—B3ú]!ìÝ<;ùÛÓ\1éµnnzã+-Õ›ÑëüóÕí­Mdø{¶Ð9v¬Ëá¬Å°»ÂøI8»È;áÜ×ñßÉÖ‚Y ”äáEó;ø”/2º¸X§Ù—O­Ê…¥s_¼`*FGµÍ’âÊ eêËÕ¢˜Úë/Ê™=kíi’Gg@éH¦§c‰W£ýJ£áɤòBÑy´.#OqÉà{HH’6dùØ}b2fÏ(`÷UÉjó°Üs@œtZoíåMæ–.†Ô™C±Ú)ßË¿ ¤È»0¿+,* ‰¡HÀY¸µåÌÄB˜eMš{ ,rç ô-Xÿ¦º\C‹örbSt‹BÑ=µú¯ÜŽéغH,éŽãph-\<¢=¼6±dñ­íY‰1ºÏÈö TÅï™.Ã×|…®”þ£ó† Z¾—üÈã‰ÎK†ýkRRÅå¸ÒYòóØÍSºãËMNÏl1N ›mfz–4‹i¤óÚxƒE”ÚÄ'*6#‘Pýé®?쪵p×ÜDŠwÜüÕ )»ú½!ÓÉÎÀQ;_¸&¦´pÄ×x\þ%ù|ÔÒ(ŒÕáZškˆÖIRƒÞµäp^TSÑ{€O>#_f¬1ËIòŽÁä4Ùr‰K@éRMO;Ï"ÁÚŒ mЄ¬Q$ŸX`¨‰½§ð6 eÒ3ÕàzÉ/Ùœôõ"zMØ™DÌ”0¾“ ¯§ì’X…Ç]Ü Ùx‰»m6¹îMG3cQÀY\$&CËê.ú7ܯ»ÐÄÖVe•/OF›ñµû"-שI6X•ÞŒngélt“öÞŽ¤–9ÁO6÷%ìãüÅ)ý¨¬…Íß:Îx-“ÓÉgêóš·FYÖ_žr´±yÕ¾Ke¡â`w¯tá0¹מtÁœ*­9½#Œ™\Âx1d¼R®•Ÿãæo_y–³'Úß/J‰IX¬;Ø`“Ïö!2™å}NÃÎÓs=á,@ NÑ¡7coÖ¸«Qó~ÈÔÊ!Ž¨›ÈÞîÄ=iê «æçü°û®PV& ©ƒó†2œKñË… z¯% ™0I–Œªe›¾`DÓçõáx Ð’˜¢V³•„OÚ-}ÃVb&lhB"¼ˆ 8¹i€aðѨ îâH.8ƒ·¦¦óù¦ßô*†;¯ž–6}¦(朿\.@N’ŒŽ,PA©°Ö”RuG<Þáû£€õLï¤>E’¥·(”vÛÅ6…™nKs^>·›­>×9椈›h8”2k­Á©v ©W„#M5Á¼77HÁ–v!qv±@‘^q–_ ¥á æe××ÖžÅfQÞÇ,ßìbtH.ÛÉÈQßÙ% Æ™g¦øw]ä’Èìr±4“ÂT$6RACUì‡åJ ågÄ=vjA¤»®G£h#°Ñm·”ŽG#ª ÍlÈ % _`ãBêf·ÈÔ—ûMFhC9) íºB5]›àê:WYÐ~·ftÍSÚšžjÝäÌXZ׆ªº*tËaÃJo7Ë—üÛ»wéõpœ V…n6ëG‚zŠäU{RgÎÿšÅµ£ÌÊ| ¨–Z…+_D#ÎøMþ¸^Âýæ`¾"úm“-vÉiO¿Î¾Â')?ØìÁµž~ú ïÍÿrÊ°:a=|Ü•Ê›i: CµœÐ–KŽì—ê–õx4ħºÈŽ‘äÛHBp”ß9ªÔ;–dh̪6Z½ð"‹B@[?ˆÿJ¹ÇqÝÀ‘ÿûþ¥êã7p.]ÇDsHî‰LaP¡œ:¥É”ê~£ä„%tüð môDƒ˜¸D‚ˆpT ·«àäõýE(ŽÓGùAª<¹x½î—’ºu¬ž»›qEMKÿ/Г]¬u¼n±){¬4ë*ùè*< H´1áóõ–NX={<¡…Ñ¡”"Xyð훼 «Š-Ñ‚¹° SPÇ×´ëºb žÝàÚ Ú ÐƒãlLìXqŠ^ ôÉ µñlä ª¨€ŒC »N6­ã†ZºÕp”nÍêêªð»ˆ òT~°˜¡Ò-ï= 4ÒŽ¾ÍVØi…¨ð¨Á$Q±`k@3‚3^‡³t{#FS‘@ÿ†ÀõO“$¹à q4i8´òéã;‡tù´Ô~ÚºH%È€´)|”#ZwWøüf8å4”v“=ÀÖ÷´†ÿ…û6ùßodYAt-ã˜<´E â«ÚX9 U¯‹¥»¨àg€ Á ^“ßm*f¬ ‚B’˜Òy)‡! |ƒÙi7™%_ÿøSŠYØrÕ¹ö°ÐG!úzŒVZl‰¢[ÉLÅòú¥ÿûߣÇ“Åv…$YŸ¿ÿ‡Ëׯ/øþõ?\ÂÇø£¯?ýرoæþô¨ÚdçOˆÂîé„ôDH”€å´j½˜|M. q˜ôAø«`~fð…íÜh2žuBÍÊ¥g éÌ‘µ‰Š'ÜÊp®*!{…Bž üáS†Ae¹œùÁòºEš­bÈXàÆÖp“ãÚûùhkÎÝj7Ÿš?<ø/7ìƒÛ„„œ1ûšÜç«gÇ}§uõ;nàÂO‡ƒÑ#7L™] #ž!äí¹–b)øé„si²\ H‡cvwÃ@ñ}éœ=îOª’ˆÆµiµ‘`ÌèBÁU…úÊÿ8Ç>ž`ú ñtfyÚðk¸Ï`Óhâ y¨ºÞ+›b  Y>‡~L‡®Ëåî@$*c¥UVò§ä=X¢hE=S@ëÃhÜZʽo¤€n+Oí¨!¤@|è›{¢i<,v'"ZÅt*îÑßApZTу ObÒ/„£K"1–0F#¿ÓMEƒ2a9Z_Sb¬,£Ù.vÏŽ:+ntZ±Jïš`—Ôö#ÓzÃúÌBØøæ« G!*åä ¼+j=`2ì™ÃõmÍÇ¢$î²]}yZ/ HpcªïX¥ÂË`ÃMÞPÄ“L"y›õ2Û!©Õi ï9êkßN‡)øcÓ?0ëÍd6ç?E˜®MÞÂßÿ}‡ÖA,àÂÕ ¦Ô–˜}C:^†";.ð¿+E΋‹ŒŽ¢ t/¸zÈ,¶^’÷ó›kÉP@F 8\‰©üÑcd^ Ý…í!LÜÈMqèÂÖà‚â²2¤ÁùŠgp•a¹¿©ê¡ŒüI4¹®hC$3ß×t5°IÉH`rjÞh(—³»8ã%p}ÿUwøåþ€Kf)|¹yq¤¿DMO"Zàë)Êz&Œ×†FŽ¯Ýi*æøHɳs^C~Üö0F‹Ó1ÇÇ^‘gÁ®î>þá?±‰›ehšÑæŒxyyIóš<0kw«Èd¾Áü2YÃGÑ0‰_çÔJï„Ìy*PYY.çC©qS±¯Â²½1ê9xiÚâßb îm á #L´G ¯ô'wã9žÚ,¾Ç3£xêšÙáákS ó¤C±›"'a×(ô*¤Ñœ'†[+¼u!0[Ì…#ädà^ ×oôw­]Åâ‚Î ó´:PÈÚ{.ÓÊV¬x©tÄ‚×D=(š½ŽãGÕJAB' Pò¦‚eY×XíY‡h¡Â¼»ú?éïôD¼,õB‘púqNËÑ­HÒ½F¦|Øð?1Ñ¡9êÚ¯;|m—«­p"€}ûÈJ¤&;Çø~"tX˜«@€,ù9¾oº×jýð@‚“Xˆƒ beçÄŒ¨»¬´a+ko9“fR;|¦¸ –ža%˜.ÀPg .ùa’$9æ9@qOè“ ª‚¦d E‡Ï#‚äƒuµf md‚Exotnõ@ Ë yÜU§+Ù5¡EÀ1[LÝDŸÖŠ#„+Œ¬.¤Ë¸S=¬¿Y)½îVTpñvÃYQó" h‡òZO cRöWE(A…m‡r_ª½]hœSl ó“…[³¡Z¾H1fC ë=V§ ;'5d9@ûohÖrçM<—…¬EZZ×Á¿h@„í•£=°ö[›õ½ ì´ð)N˜jR7Ï ’ÌopÁ–8wBMØKÛÕŸ|XžK‹G~JB>8•.Ù0$77$føLs$|â)W6 î´ 3\".¬øéÇ®cÆw²NŅíø]Õw ­çG«Ç‹³ø“¡SФK´ƒldÅˈȡªÔ´Œ WVÈTºâ„I…eµD& :ú ŽÏ6zˆÆºT±Œ³8™)¸¶ãù´7žs•’.vzhiGüíQ‹NËu¯?¼–Àù¸· œšzÄ *'/ï_ÿF®?0ÔÜ,¤Àn†ùeüâ)±›¾ë‹„ªö³²ì®Ù]j.¼Œ—#Ä&óîžõ¶ŠF£VÕü­^e3ƒâÌíhÙ;†›€ºQ®‡~¤•šèO¯ÂÁ>%æeœ4²+„!ëôAx£g!Å~¾H%í|¯MÿŤ$2E´ðàÿ§0™(òƒ_hÐ#/«Â]WB¤„‹ÛÑȾaíCMø*¢WìqjÖå#ü É?ø5 úÅ‹… ®#²¸ÖÉ2‘Y¢ï‡.n(›Uz* ê:+“QQO5›“-Ž*F”†›•$Öc9ò®‡àwQXø¢½åe÷×¥ §t'›sÒEäàØ܃¿q«Ë¾Â‰ÇØ,ªÄËJÔ¬LMåÔGõ1Ò†!¥-üx¾Ç%¦+Y…x߉°á­]ȧ¨yÇ bg±µ¾£íëQL}ï‡Qý¥-&¥t !ÉV.¦:Ž“B’XòyE"ޭЀ¼€IBá9<çÀg0m³F3cAˆ÷2v‘ÎyŒXpž¶ì»mdyn‰‘ÊÒp^}XPõ?! Wr@œWp¶Tè ÌÈÍElZ•Ø&HfºüoØŸ›LdÙÁaÏàˆTç‰uðNLÇ,ÂN …Nü3H.kA@c—ÊÃê7oH §ªÉôýmºè÷CŒZù¤b«ÍúÛ[ÓûÛWbZ•‹‹]sÎ7¼ ï¤8r’*žVË…NµØ†­žä¿ªT¼¸ÉP±ôñDd²dﳋvY_¿\úm wƒ b,>®üý@†ýÜ!Ø5b=Œ~7&Æ#v‚5|ÉGô"oûÓ¦¸y ^R Ž³€‹1OFŽ-SúØêyN‘âW=˜%…C=㨼áù[<ðnOOERÊNó ×¥qå£Õ?»nŠ X?„ÈÚÈøÌAq\¸*ác™ÃõǧlÍ%]>®ÈàÞ @1gN¾1Û?üFsî²Ç²ô7À`46èéª# à™“´Šæ¬Hõ•âÎÆVÊph¯=ÅÛé„Ù7‘%ÁMÉÁó¯3ÎÊb³Zü ]–ï/¾-.‹‡,»sÐÁŒqðÁ~‹^!µÊL-PŒ +ñ¡mÏr¸lEܽ…òm:Z‡ç.¨¨: |88Ëv\½Çæ„¥i’wIÝ3{šb:™ÌQ3#ÁZ·ïç)ÆÐFÙcžÒ¼;GS”J4éõã"éÊ^Ù1÷ð–³[] •·ýTs¤.LLÚê@ufF·˜h®Lµ<²q¶Ê–ë¢DhÚFйT9¡‹õÒBRœ°TNÌ||n‡‹JpZ’ílï;IïÝ|8U‹F¦èx½,M5|uãyúñ§u2½éý*µ8€w‡Å}Hã+2XŸ±€÷wýĈLÇ„†Ýb÷¨‚XHÎÉFÞŠe Aé’æm%l"¥º$íE¯ò«‘JæUzEsåX%0bË!w©f,ˬ¬Z"i‰9õ‘òU²sÀ\ôéuÝÄñŒi{˜‚ŠÆäk¤¹x9áˆXÿµ‡œGNŠkÆ¢ÿà‘u0ŒMŒ3ÀPü£¦)ÑêÜgO‹ÏëÜ·üHŸ-(~ҟ阀Ê#‡ t•Áè´;áü0Ë –ômó ×Ñ—ˆm¬ÎQç#Dàs ¯Î`/Gû}8›M¦³t2¾wXÙò ψ&\cÑÚ+¤Ž»pÊé=p0ßæå*ßG.Á;q+?®ø–Ä.n›ô¡†u; yÏÖÚHíÇÓQÒS:¡0)6륳ÑÕhün7ÉoçS0''Ó¡$w‘¾‰Ñ´N†ù²)n.±iL°cG{ótöÓëׯ}›Çh`…µf?É°ˆ’œ§C*‡™œ®;ùûò<𷜋†ðÞþXäåÇRÕLUUpÀˆ‰Á´!`WªÂ LX¨UÀ”óEÃlAšÀÀ×X»FA-e8„$CTüîÀõPp$afŸšB‚êI´ån“ÿ^øèÈ>8Ù-^&ŒDª>CËP!5¦ôË]—z?·×Pí$`v‚Ñc–ƒðw“iz=z;í¡ïxɆµ…>&Bá¾ZSðð¬ø~¯(O€œ¾°ÀN0/œ˜”JpiaÏ8³ºIx|hª²¨¦„(ñsY2Ñ>8Y‰tqßðµ^†öÖ‹Ç2£ŒMFÒ„ÔìéѪ]‘Ô\On‡ãôôwËC_Èk¬Ne–-½ú=V‡ö¢ïY¸û)%º ÏNÛ Lß>2=¤ÃMƒo38Õ•¬šN&\NîóèˆýYÕö4¼óMÑÿÙu’§5"{úµW¸ÐíŽP‰1ÓÍ¢kÄž E“·:×ïÚõù}jîïØ’éìýº)/ CëUÊmIŠs*"0l¼ CÝ·Ù³.tX"¨‘‡Þo¢=1'/6ÿMWŠíϳëo™‹ï )<~¢ÎŸ—)ìøÔáìxCÀ·šO‘±¨êxX¢ôïƒü+-À Ê $*&þ7!|M±Á¼ÀÿûAbƒu¤&=ª1â¨'µO®~Íû[»¼Z!Ã=¼}öé”L˜°7’}=Cšå˜M*4¯–B 1L\`÷ZòÙ³Œ~«¥ƒE½éÍ+²½`oçƒÂ³…$HDagfa³¦@ÒFMy>b ©S”xÆ_&G}ä“Ž æa&–jLWh¦ Û£oíÆúO+l³Ú©Œ`£ùßôBé,ˆGÈ¢“Ûê›R­´óI7‘oþånÔÿYCﶙçÃ\(Žj±ƒ·tÈwë‚ÍSkpÄʬuö=ÊÕÑKc/+RŸ³c9 ‰&ñÅ.¿°”êÄC‡¶èºèH}ʼn_ÃeíY>ZJyhÒûÓ‹åG‹HÝ…2Jº7 5cbÊåÖEꢒe5â;U„ƒ.ô¡|r§8Ý Ä{Ue]˜}GÓ+å%™ 6–r¦?Z˜¡`&Úæõ%ÏŠý/ú+‡Ï’àO /ŒÛ>‹¡Þ9nÈ·E럖«ïñ¸ÅŒAé  kÜç§ÂGß5‹¤†mi` µñ¡fç"Á÷¿„‘{ηÑ0à@—`ÌùÒŽKørqÇ;>·¡ZÂöjmÈMž:ím‘œZ¢!O¤dó‹Ò2Ö-ó'æžÀ>Ms°>su»È7y2ÏvËJ2`Ú^Ïù⸂糳…hJ­V‚ûxíË‚µ!Ôc¹Ž9ƒÕùðFP½sž‘Î0È}ŽqõN„?-?W‰‚ºÔ1ŸÖ;¦B‹l·?ýèƒ:¨xÞ&FУOî¥áVYqIý^ž1ø†Su³x´‰«RšÌR˜žÅ!ìxÚ> E@¬É(TwŒ!ŠqHƒ]¾ UšçÄh°Ê𴌹©Ê*¼ofá°SVG„• L*é;Ù .4]tn çR¾‚KÁ΋Ÿ\‡‹V6~*_‘Ým ’v\¶¦XZ^Bn½ÓIóÅABØ|ÂB»Í3g\?g Kæˆ:’‹ÇòÓ!h¸?È uíaØŽ¨ O¢0¢z»¸1²Ðßåd¥‘ VÐÏMRÚ»kÄç!œ71Â#†[<8äem`YÝô>Gå7Š-8¤È·Ë**­~+qöá:ÇÖÜæ•Ph‡{áê^ÙÀÐð†3«slj9ÝísFÄFâÌ 9F! ù3ï«<‰Ëi žð²µÔl­Hi€HBâ}ΊÄåBü‡sv&Š G z3Y*†¹¬ÙàÑÒ Øf){ò ÞK:{ªÃRJÑ$Šz ©L„ŠÍGè2¶Ìÿ±ÏÉ=üš-O˜çaWº.BÄ–8WY¼k€L#:(uåð_îz×:ùç?(øÚȈ-¹üyrëg)tÞŠµj}èS0Å‹§OW SîeE²­¼Š\•¸ÛŠR©Šº+,žMnà á¦a#Á©Ô3ºùƒßÝ §f–¦£AuWË>W$#jVn5‚ªl±* W²Âu©ÊÁ±ùO}(¤îõ„9,Ö›JÜé!ö ÆM²vGö|ˈîbW_>Ó´O$Gî/aƒ&’¾“£ Ú½TœÉVŸ->¥~‘ ²uÀf¸)EÕË»‰¬NÊꦛù)Ep<ϳнI:…ã¦oÚïÍb4ëÁ1õÆ—Ö)‡ãÀ¸™JGÿtÌ•P™ÿ]G^ÿáâûÈ+²­ÁÉøÓ壚¶‰Ó½ƒ}`žï'3bEsçg!I[¶ÙŸ…²A , "ˈ?mŽçb[Óç¡ŽÐ!fýn:p¯îm²OEö ï`»ø”‹ÃÿD:Ô®B£Qh žH3Èî׋IÚbš¥ºñÆ)Þ©P› K~0½Ã`þŠO¨rjÄéº%n´ ‘Y±K¤‰Å0!y³XNf9"‘q~ãz+æ=‡1]-ìS¶uÛím6Ðå÷Å©kHÐH?¬ïO¾N`îí÷ýÀ‡ü~a¸ÐãªÉì íÇ…Ÿö ¬ mÆÝPá˜Õô —¶ȘžÅ,ašfë¢Ñj$ŠN¢æ¦ºêì+ObÚ~¤W°›þIâ—Iɦéz§NSä ã/àkdôϾ(?hVAJå͆PÙcWÖ—j}¼Ëd退å¡zÜäk] ÇtyrsÛƒ-¦7¤³½Û@³>Ç› ÚÜؼ£i:¿F“[õ¦7>ì£À ]^íLªãúû / ÎôÉnú]aˆÚbh;glw4ƒŽ; ?Ü7å¡]– .ÿ¡ Ä r‡Ø<ó \ÓSЊF ž&¯•¦ûýv\@ÙQqÉC³ˆÝTA6k—OIŠßÑ€-쉖Ç.aâþ`³—Fþ's«EHCl¥uY%Eá ¤úG&"¾C{7۔΅¿§Ò+$ˆy 4‹Ü»DVïÌLr„pxõîÁÓ~›S’Í “Ÿ¨Jnáü%¼ó/¯$ð‰4¶vòð°^röHÙfúØùÓú^l-¼æÍ)’ÎèLfÓ~zó‡êX’V-BƒY~k)+›eÙË¢TzU} ËÊ€Ö0;XR$M¹!^lž3wÿ OWX,h‹ 6Æf5š¢3õ y•b™Þ1YÈÕfc辸~ÐâïÂÚA:3 È,D¢¦"Jô«ÅýEj´ò·Òš¤èPðãÆ!u Æ!ñ”(Q/gX$Ó˜.  ÙI­{¬‚AW)lvéá„V>ÏËnSOä€=b¬þñL:ZôBñì{$ fY6ø¥­ÌääˆÙjY³E×y’ rF¡ÚKÅ8U¡™¤ø‡€3–]÷å¯ÑP†`Áòã0:FîÌ‚]s;Á4‡ííÎJat.³B:ÔÏ–"¶‡´›ïFã!–x?ûwó!™ÞŒf³ÑdL)X¡Þ™]´äw&=å$×è ›¢±ƒÞ¼7„9d<›On£óŇèTñmÀ}¿H Åá3zY‘B^¸¥OÎTm…Ê2~ë’¼†µ+gI›~˜néõàÝuïj&™ÈXkß ¶Š7Æ#o®˜òNLsV !n|Y'»þ{ýŽ×›UL:‘ùLa™µ6iA+f”Df c4f°nª]Dö”5cò“Òun“R KËœpεŽçlt•¾®§ˆoõ|fŠúäx<2ç³½æD¾Ë%îÃ,¦Ð†«äß¡ÙÐ^¢ýhÛN‹5åQνC} ~<RXÂ`}ŒnFó®a ¦Ý±ó'Eµ¹«Ð¹lH‘C-yüäqwJÚïO‡ÿuÛÝÆ•d £ó9Ekº ¸Hˆ”dÙ.UÕ,„(X|k‚´äî©…•’dšDÑ=¾¿ýžØqNœD‚’ª{ž{ŸZÕ]6äë9ñºcoÜÏÙÃ=Ë=eÊצÀ‹é“tÞÙªRT¶8«?.o7­;9¥DOoŽ…«š ¦Îg¦%Üd|‹ž¤„ì_/ª,cp’6D ôÙôVhßš bº†‘¼Ôi>½Î X¬’´U|÷ë¾ÑÐ(§o»ƒaÿ…{êö"‡ß² §?Ô>sVð[·rX#kç[9ä·è~,© ‹Þcš]cÿû˜¾þýÍ'xõ’NÀ¹63jíia›ê=Ã7ÎÐô§dH2™B¥/­ænåî8/Éά”c¦ã”œYjšxÃŽ]¬Å·árQÿž¥çgï{ç ¡îH•gó®½<9‹ ÛÖãÖ†µÄÇWÛÁ[â?ì©„ ÿ‰¦qœG¤”mÌò²«zËËJÚ\hDßvŸÄ¾A|ªú'rìúeF—øÔ°¬Ÿ†78^t?¸ãÏoôäR{ÝœmXnøÆÁT>fJÖõKO{Tñ•'ŸüAIÔ*λ’P£ð„XJ< ¤³aÖŠ’"²ÇÝ¿¾Æµ¹¬õ/6½¾NrØðòÈ›º…uýH'§<_ØÝ=R‹kÃÇ_fNlh!ŸY-vê8Ö§·Ôw.èUö>ôÎéò½á0GÀÿ´þ-˜ÄHrüÈ’u@3û‘§ãªí÷¨Ú¾ÚÙýqgïG¥§ÌìUç{[³5üIãÕtÞj[½®¯ÃÐÔ¥½E|ì­½Û².¿;¢RÏé›þOÑi”•A²Ý:§á<®Èêd)m9U£^Äu`K’Î -(q:q)&—¹ <o4÷ò¢FdzÔ»žôNè«g.ø¿s 6DùàC.V}$,׉Ä%ºXN1¡íóLa7¶8-ß“¥T}<C­„õZôIA¥YjŠã¦8Cq+â²/  %‘ÆÌ„ÐtO`ëoÿ±¥¯ê¶\ðOâb<Õ9{”Zz1«u©Ksào“%´0nŠOújCn®Ðíèæž;K®6™þÌ•–gš ÙnG¿JÎ ÞP÷ôJ˜z)`Ò¹`lŽ+H«ü{\B:æÿX Û÷åAùA·Ä$Qõ~-@ߟTBè’FAòŒnthp(øˆŒÒ]$jG ðYC$ÔwÃ÷ÈgwFo°º¦º€½¶ìòô½ž&§Wó»Tó,\H6qF½ z럋j•M@Ù'µ}Æ8Uê~,ØÆ'¬Ñ€‹I¥uL?bî|¹Q.ãkcYÙAÃ8r`ÇšÕ'õ3…ö¿¦%¥t¾wòi’ôÔHH;¡hH:ã—Ôf½øÌ'<*  “ô&T/çæ¿ ¹_¾‘¨T€Üï Òÿft»i‰¸‡C(ö„™Šý…™ºæ:ë”{H×aù1¡Õ—M˜„Ùå£.?%¢tQ¼LÚÈŒï–'K;?…ä0€&ã„uèe“h»„EÄt™žŒ_OÆ“ ƽTÝk¬­B"³>~Z•ü2Çgš©âú˜Æt.õFSIÈÜBe<Ò/h1ë ]LÚ!¶W*Ó@ã2®¥‘i0×Æ=vÕxû5?óEŽ‡Ž•Œv¹ÇÝfdÛ¯Ô@¦«G•Wfšcb71üÏ®Fû†73ªkoÓ°þQ-y–3>ò_Ó°qGWbžÉã6wÍiÚóö.!e©l(F5_-„L_º­—W=~²(®NÏß ¡8½ì³†þèÒ¥fŠ?ó÷ÍßÑË9›ñ\-SâÒ \;ý¤Écµúî¾ø¢k²Z‹ ¯4׋{¦=\bHæ¡æ1zxÓlNA,BTaÉ>£^ò³OÏÜWªÀâ]bIɯg(p—À¤»¨Q9_hµÖÅamŸÌ¡N¬ô— j!«G:§ÉZX¾g`úêvB Ä ƒ UÈÙª ²û=ÉUÃÖži˜Hê+­&"wÜF›¢ˆ0…Ý@ tŠJ.ôdSóÊ›¤˜Ý,²P²¥î.ï\êÐÈæ ³#02—>$¸('ôNFG ’Û;¾{”• ©ò9ßêåâ¦8º”·Cevƒ¯·PÙ–{í ÐÆ(ÙרÕM.ç!}›MòǶ¾-cªØˆŸŒ A›—8V)}9:ðIF &í›X+Ä<Ÿ1&ÏíVÛdgÈâ±¹¦öP‰™©Ç‡ì1oÆkäPy`ÞÙí \ØõËÅ3¾ç,Ùls„xÁ]Ëùœ2!s'“öMåÙ)Sž'ëIZÇ«ÙiŠã¨‰‹~È^Õý,™˜%M<Œ_oF–­¤q)5§Õ¬ [BôÞù΋Î.:¸fÄ­‘¨Aǘ{Ó#²'áÊê”XèÅÌ"D\û±ÈP‚á„`S˜‘«ÞÜ‘ßöñNCO‹6Øø©Äg…e7$ûʬ$®!8«Aï`‘DZ,Å9‡èzµÄÀ¦€Mä ‰F p3pÂ"•Wu—ÿR]þa¼]£WïÈ뿲^_} !jE~3D˜-*Ã*»É‡Õ$ÏçÊj5ŽÝ!·ÚZ´o]ĺ¨# 9tQ!Bãà †®»÷lwÃYÎ9˽"6QÖƦ79¦zk­úû\=Ï\[à,Ûį_–"§Dc¡§¡k“¶Á³nÿVÊ;^„­Æ úGƒÞÑÏ:®Ev7äì8Ö²£u{#S¡BÇuú)ÆNn8¯±¾é†Æ™Š!MßSG’MHp’¼D¤ÌenJª ‘#i¿‰{‰{‹>Lã¡÷ñPäÊ)ßc ãE>Á«ˆÄÌxŒ4ŒIÂec¶ÈéG*ùãîá!K²]u/‡çÝ£‡©”ÿ=ûvFl˾:†¥áIgýœŸL$w¤çΊ€YUáðÎo~$rÓ3ˆ&B”‡r&’›lDÀVyViNÿcÎ ¦2›ËBYËÒ–Öe°Nu¾i¼qÏKUG±D\œ õr*(£Ì„`šã{[f¡×\ß®/t»¾Üyþƒl×îZ†ç†¢-:‘î/z&EÌB 8wÙä¡ŽX'Ìj¸eeŠÜ¡bɲB‚i6ï4û•bÊ•Ûûc”ZǦ©oØøŸ‡[Üý^nÑsÑ ÆTw¤\ÃÒwYÀ?Çúc^PˆóFiPkþÈü$.ÞGmIº-cŽÜõ’öð(Èd%b²Þ®¸LÁ^’|4o` K8KfÄÖÕ ^ø5’ngþŠßŠÒÙÝb‘ÍŠº!Œ~ñMz”/ßÓ&xO–QÞñÇb±\1}¡‹I¯‹eMNHG_<·6|>º—»ÌxæðÆ-šù£("‰×àŠ¾o1NÜ/óO2œ¤=Ä'Zñoͽ.º%´ù‹S…¶?¢¦îÊ8 à8=Äñ§-Ÿ,wö-wë3··áxNM/…éÆizEÅ›åj<ã¶ÔÒÈ‘ª–Š¯IñïËÕ¢²¹]¯zyá‹ò\ºWJ¹¡è ð­†â¢Hç²¼cq9UÚ^H丠ZÞ€LaßPD½è 8*ÍÝ…¸Æ)¸–¥Í€K´L]ÄZ0Õöœ¸Ù2íõCµL|‰ëÑ(Ÿªv¢Å”ÞCÆÀ“1Itûg¾Mž^öè£k‘Ëp ŠtŒ‰§ÏüÞ™ºœ¥ù«Ø\VŽ¤“h «HÇa4¤nb!]™oN‘Ÿ{wŒ$;Â1"áŸÜÑ2Â'¢0„xCf¬ÝúDå‚|vˆÁÇ绾0ÊÜyuk£òˆ 5´>- âæ¼:î1”‡#Œ„¥Ø‚2ä±i …3R;¢ŽoÅ¥3g䘛"jzíìuvùA(t’‹‹a‰•,RìYišf2éfÕ78榨 øTk׸D]Õ˜j*?8Þ†;ß øº†·h\íeï(2¶ÖZ0‡óº¨r¼¥Ä QâI¯%ÈfS qï9˜°À®ê¸Ðh¥Œ PP2&ð -ö¢ªV2LSÌv0Ñl:2XƒÆ¶R|ZPñh†ú7jÙl3DùÈBâôulÙ…U7‚Öä¬ Ž)ºbåõÕõu¹˜Ù‡,1ðŒ¼ Çˆ×ÙbAZ‘ÉÕL¥™¹w¿ád¼$¬ˆ® tðŒ07vÉyYÜñŽö\Ä“ƒª*,läÐíÒó±†Õ&Ž…_-¬8?O0Jx–W¡2nËc¹xì.—ÑVLíÖmÝ™µƒ)€¤õ6: ±Q-~cý·—;{{;»ZD"ªL=ÛN>;vY6eÕ̺­Æó€à¼Tös+Ó¥&¤š›ø”;Q®düˆ `ªúh¤DPa°ýô2ó;‹h´"’%²î楄N]:Z¬n– ç­–cšV5_óq~g-˜#Y{¶*^ŒxÕÔ¢5]¨vÈ…¢iÖ!`IQÄáÌúÉ}5^í1Z ‚¯•»é–ù¬œLTîØÜÝõ¢¼w‹Ö}õ´{<  xs£W¹Î—ÄtüXT‰é :%`ìdL˜…~b9Ng+w™«ÙÙàe ¤Ê®Kî>ÒL ;áÉ«Þ¥-ùRÒ}võa;}{ÞÞNûû'©Kà/.ùY]ôgƒgýEñé%Åü}à{C±˜ë®%å%¤OKæ‘J¾#g¸«mÁ Öã:§ ã‘+¸Õ Mk„ýt‡½çî©3¤‰G} Ð,/¥ScÉ ;ˆ³tü×~˜ušÚr¾•ïž¯fmB$ÄŽ ç’“ç«/J.@päq™%tx*&Vô£‹ëÞg%o¥¨oXAÕGg~Èsƒ¥ÄGñ}ù—…+7ªÚ†^qܲw%ZF^!”¡ ÄÝ“eµó_ñË€Z;|ÊB|ç²tÆ™°¥mÌÕÓw…N¹¢¯³¥}+.ndUj— Ïóɯt>h¶„|™7R-^s\Jo èŒ#Â߃qïåž$ãòÓ9g—ïæ {§NcúDˆ‰]~XhÅ:Ÿ:ó\!ÕGÏDÂÀ‰Àî—ËÞ@Ø Õ×3ÒÓÓ½ájæÌö™üÇŠot̪¦wz:©ðô€dP×%Ltð)­Š¯›Ô’ÑÓ•ÚËé_(r¨??>ò4{¤r©ß~ù8T„!|^b™(dšÔ+ÌfÜôa·†Jy7.{au9ßX¢ÃêS1)¨Àt]óVôªu)ÒÑTy¥Ô[¨Ú…ÌŽåqÐÄOfÂ…[TÀ©É¢. ó¨‹%ù Ç’HAê‚Õ%¸ÅÒ{5bo£ÛˆÕ$lÙÎ~À&roó”ŒÀgXrî‹4ÂÊÑ: n<ž5‘!;‡½êÌ!7F§Ž — Q.¥¢âlÿ§m®›p;‡éWUÕ”ll'€L¤óôt3—µ‰æÄ,£¼½¿;34e†>Ä9» Le´2î}W¸OÎû@¹™ï)¡)ó@¤m[a~ cSΔu/ßö.ä_PGu!Îé¥Ê{¥„u^<â%ëÄx{ ÛtýX/U›©ÁÏjáøˆ„H@²y„«QRÛ‚2&å­Æ5^(i{Ð|–(–ú8çòk$¼€àAaqÐßXƒ–MªêñÉylH•¶Moœ8ÎÑgæ'I9:úB¨~#å¿ {ü‘O?ƒ®l%ѱ[ÝHkSB” ‘ÍZˆE^%Kiº 7æ ÒwâØW¬&e ¸çÚ}÷ÆåÝ8Ù&#“2ÊŸ;eq(élI¾ÔapLÈ'Uîumr‡Í—M2„ŒîòÕ‚àç£mŒÚ±‰ÐÄ*èÛ¼9D‰ 54¶\‚3QÛ²\f“„ňiøb‡k9çD¹#âéÊÙįÎn­˜²( Ú¹.ÿüÈh3Bô“»àè•Ò×€ƒ ×µ+¢Gp¹!ö…sîŠ"$À {(Fù_Ò3vVÉú ®VTF†‚oHa@­¡%Ÿp4¦Z6©—Ü\äVKp›/™ædäŠj´ìÝp5—‘•,:°à{T¹uV^Ì5ÇªÜ rßÀ`)] .XM© Ž[ RšnË&Q¬2¼•Å%É_øÚ ÏËvJµ[’ZÔ1—Å”«t˜‚ð =‚éúÿÖÓŠ€ßºuèÚfP"Uú¹ÈE(æ÷y)–ÁTdšíj DhEçPg"àz´.Ñ…Í£[\!È%Ë ë.Œ2 {Íœ+Nø½ûz΃ø”*’ΙȻHª)»ÂA.û§¿ iØî¸?à(ÇíŸJ`Pf8”ó|£do R«Ôp]Ç -%ðôÎVs“Îà/âK›imÉ$keÓÊ–p]|´Ä‘ô&ãÛl¾,WlÖúíiyB÷j÷Ø%¢Ãó«}°µ}%X-ÁŒÁŸÚëñ!ZƒgwÏ3tk㧱ei¥ãUçÇHaÃÎgœ_ôÞô.Þ¦ ½¢1} …i,¨œ0Ä`¿-d>ΰßg·_EåãÞ9)Í­“ø¤›I|< r ãÎé‡ô瓵풶ïB¤DûƒC¥ËäF‹v?è€Ð÷;»µ&ȘìØñ"»-g7îÒDª¹ôŸJ·dÒA9›å³ëš“1º¼+§îæß‘®–¶ˆ´ Fœµ €Y;Hcû3Ïâ™Ì¥ïû™êIwÌÛUñIÙÞ)šPXvË (9^o©¶:ô¢œRb›Q@‰4ºÑ»Š×Q±­¦ÌÕQëþ”g³ýÌÙËŠ„M‹eQñÔÓ-€…’ 7¡"=rw½U|//+ý³èÅ d‘2jûÈýÒ*…û½“¯q™9£*¦­’ud¨™¤¯u2Z$FÉþú¬UéÙby×ËÇÏ—½pÿ Ë'%"Ý-àÓ¥·•ÏÆ[°A[9õ‚Öøuo¹¸/ƒhcD…Õãôºœm ÞM5BÛ„‘K.íZdQö› £©-OÀ'˜’,Æ¡Ó<Ô…‹¼Nî½ZüjË»Yº_>¸èDÇžh?^œ`øÝNeáõš§õ.ûm•¾-bCíöý…KwÌÃ|²YUÉ~íR6bW:ö|¬ðS¬Ì€ß§Ó´¥r° ‡Sg;þ5*ãH}Ñ“ÿ¾…Qî&¢…C\`2•Žu‡¹wþ&Ÿ¼x޻DŽ‡Jé|ÊK÷]·Í;ƒœDLqÕ<ÃEVܦ'£C™åÄjS™V/²ÔB°òl»8ü¸Cqí7Y[öÍ’§ÓÀý’[mS–Y ·¬þò—ô?ÜJ 32—lAŠCëÿþ³Nš11oIJÛ½ÿ|ÄoMÝnÔ³Ø?€/#¢h¢;W|êp-€áP>Ož_))j`«rwÄW*±®J!Ø!HtÒÓî£zzµ“±fîÜŸ8utŸü%à…×-Žú’:ì?6®:Z#¡ ƒa×ýQNHÈS÷%xræ©œ•ÉØ_„‘kf&/­È d匋cB¦¾Èª©æ‡a]%û‹G›½sJÆBc\Á::ø) 'âÐÎIï„róŸ‰RÀ«wñºV(©3‚É.猑®ÔÇõnáÒ•Ó”kͱ>i>R(a"R·ª‹›1–¿;ÝìÙxŒ¼VpkÄêOQ¿B;<+qGG 1åÌ7¢ Ûq‡A©DšŽÀ›ÌEÓ†§I!6fÄ?k÷utlôj‹—Ù²Z=fé¾[Û3X<í]’{«µc¶ÃMüÀ9úÆŸ[Åc™»ÔfŸ§1V;ΗFÜD+øqáÇ `¯âÆ-Ò½".e#ω-Ï—Ë/“MȾ ¸í‚úq_éwDqÙÑ©Û|F;|WóçWR wÝ¢…435>°ÁhF>ŠèÃò,£¢à‘1ŽC7/šwÆN½1pÇшòœPØ4þ«­Æk5á.‡Ô·B+=}•Âbœ#'̆<»…ÌBUbv“§®c',z$….§æÝ5Ž&`W}yöÇiT|p‡ê{@îSù'&?dœ^uíÑ¥Ÿ¨ž¦ª!P2¨Gõ ”§”ÃñDg£bz6ž<7&ÎO¯}·ó\¡ìƨ°TÎ e¥Ýx¡ÓÊH7p Îw¢i2¬ˆ©‚{|ôÛÕtú˜Ú*H>«—-Ù×Ñ’¸]PC‡^é¶hÁÍш¨Ì(çvÔâ%c³à/S¿cJ­ ü„¹¸Åëu/²Nç¼PÙ%£ÏO]kêýô­¿Á>)÷ó³:Œàç¾’ñꚢZj¬¨Ãrp~˜&âYSnfx]Ë–x•0YÖjÌ7T™ãsˆá¿hÓr˜Å‰~9Kλ;ÔüwÇd†YλŒ½n%2côàü¥± ¼@P¢ûëð:/±U¡®_†Úc›¤yuôà )Ò1ɬKjÈA¾3úžp|ÅÊW&sO°þ²n<ËØMjÆÖÇ}MÊʳ`4Q7©ÜÎâcwE2/œWƒ0»xm‚ S?ý¥KµVÓôÅsðu÷û!ŸÇ+hs§…š‡ -1÷%&]˜Àq.åJ.¨‚Œ’{RA^—’ g¨ îÖxðÌøªKçmÝtQãí¤Èæ…ËK³v¸/™5_¼Y¸e"‚TÒŒœPøĸㆠH*¤˜i'Éž)F‚¡VLÂEaJ .)ËÙ zR©îŸ¿íêIÖ\·ùâà¼{qðêå3Î#6¨6ý*=?ÇyIþ§È& ™Ù„î±P®y=’I‰|&=,TUãÈ‘òH¢Òñî’M B}@6ÃÆ”aØr¯óÍì4‰óÊŒÜ1$­Íô.è«H]ãàòð`8üÛn‹Ú8Ô½m%¨H bi²f²¬Í'ÓÙÚ˜” 0;„=¿QØ-Ó©D^éòÅ%¾ T– ï]ê꣢²L7æQõÌwÛ®œNY‡]9ê³SaQR²ëÞzBó=Ÿr3’'‘‘Æüœ¬¡ia´Žu6EíÎ÷ßæ·ì›ˆ"C>ÀTgI(à T£x››:fðÝåUØ]„i¦©]ˆ?ÁSG:¿âÊGÀdª‡*B]ÜHmô r˜7RßÒ»dEMŠ €TÉpX–-n´ºÇQ#¬+Z/<›q¹ *¦…[áMý˜FÝõ„æµS¬ÝÓ,M„ýu’-Ýõ8—€w‘# ½Ë's!Ç@†Âè$㊣jGóõŸfŧaá¬P°Ÿ´xduÃ<1=Fž4NýnòìQ¸íGJÙ™}ú„q²• UçÉ…›,Úcá"áš:W=œ¸åú&^ÈIwˆîÌÙy dÉðôìò {@’S4úvññkZ(ߧ½pmJÉ!›æl|CfúÝÎŽX†Ýo¤Ö¸ÈÜeH@ËopÔ÷§-ÃH\Ò¥¶òPÀ–²ä¬? ÿ@çº*úƒú·¨*7Vg:Vˆ‘_*8÷ùÎó=ex@aÌØ _㬯c?Ö$Ǹ¼†úûpnÔþbLSíkËj[¢FþqD%ÀóüØx‘ršsŸHçeòRK<ü ´Œé­:½„GK˜¢Áš“ãt)…<Ëñ…ˆM¾Jc<ë½-“ø ÚŒ“$ô×¹hê/&š$ò¥ÉDêN- Í|‰ów -¯ÐæºXzc^øq8sGâÂÞ¸œ-‡·#Ê5¨7+‡r;us(lÊfÚºbÜоó÷÷½þÑÛKÁŠºTÆ’Yþ´c"…› uf‹ñ&˜÷ðÒÍœóè®B²™xÜvò¢Ÿ‹-ˆ%xïØLqKš fS¡¬:(gPÓŠØÀ“.rIó˜e )™ZO¦.)ÙMb)”Ú` A¨ˆ¹ET/~ÜýÄ-‚Zwîj² Wþ>/n݃J@Šˆ­‰£†xØñu›U–ùóâ…tl÷y¨›#Ò|I²l:ŽÛÌ'ÙbäLûè.ÈÎÈW«»M]·+—lˆy7Ǧc|@D`-ÊŽ>µ›Í ˜ºÓŸ—Õì׌«ûo³YµÃwqZL*½ ƒ¶r1ýÙEoøfŸ3+·Bh óõ·lâ·ŠÄÈk*!”“‰}=“†{—á¸PÞõ]ú'Ý£ÑkÓ70ž¹4P*؀٘"×'K³ô®¸½Kœqº×¢l˜žvz·º›8—²¯m7&ûXÑüBB¸®E!lrÀ}]çwP"v—! §2½X-)Ñ9sYQ±2=ü›Õ)E<Äšù7CÐH/ã¶×볉Ì|Ë¢æct¯âŸ‰—©õs½<?$zÅ,áò=•.mJá €Ûh€5T.‡¥!£ÊòP¶5Íf+£{¾8œo‹¯i‹±Ôî<.ëÂ<[¦Ü†ÎþÀÖ8Õ)-MrŠ²ÙK'D[a˜I^äEi{±¤ -KªÌEB£",>~AÀ©—¤œDœ €iÄ|2Je0ç¥þbo`û o-1–¼/_«Ç„ µLÓŠ\^íïŸ]œF؉haaë½Í>æñ ²WB$Y\C”MPÝGÔq^š”wŠúfÔïÅW†¶!îŠEérì¼Û@{'/ž_؇þr–¦[IRuŸŒ™>$…<%wÜßÉä;<¦Ì«ŒÔÉîÄ–øs¾;7›¹lÕ:jÀÙo~çÍ2ºtíA¡€b¯]†·±â}æ¬\dÆÇ[µVÆizëNRÇ€¸ƒ.rÞ¹%u–q™BMvQ/±{@…nRÈ‚‘™©YÝ 3̱ë´ož¸ûve¨CZ܈¡]q õ‰$Â\¿Lc÷±O¨È9åq΃¹íï.ŽY€BRŽÈÅ­CW%iFĽém°G|i77¦÷ÂÆ–b0!¦­QÃà|£ÛP-4L .¶ßŠK÷ïz½sŽ™Ï//Þõsëvõ¡Ü%N”ŒaRò·_ˆ§‚Ñ]m‡.Ó4£7îNjÆR”C³‹ £•S«nÚœƒtõàŽG‹¬º ?¯:/$׳@;¡-L~´}ø :iÕ!Âh(Y9 ð?Å51Æ;3Hc2ÇTÁg›•X(æΓ¯³åó0öäâ(¢‡ÄŸtñT9Ï™€y¡«Ó“îyš6^›\ò j.ã9xxC²Kd+á¹ï#;c]G[ÎÙ»Ç.uÌ5i–%âVÏüZT:•"~bòÎ’L’ÒÕ<¶TÿVN–n¿ýì{Æú꙳ÓQ“™êØ™gÀÙŒø‚î—å&ʽXLxsOä`Ü­@<›¬.•£Z³•4ð/rÜVï¹0T©Ü= ÜÉ,ê5m¡ ΰ±¶Ñ½¼¼^º•qˆ®œ—dÏ4å–ÇAÇ@,[Ëlj„¥sŒ¯ÇÝÊ­Ázî6Ô½²º`h%O©fÜï÷¯Þ ÿ€^³b™ J5Áu_ðJw÷w;»¯dw¡ñ5F ›%Ð8DFñÂC˜wŽQ â¤È^bo1RÚ›û‰ŒE¼Óô)í(¿–fÁ‰[KŸ€‡õ KN†piªYõוHÁ’j\îb–Îá’¨2<] ï±â¨²-õ8µ-i¶T–²jEz»"fBîF›‡œ¬NüyqLL•8û4š”××è!Ζ(ÉM¹W~ë°j«ZÝÞæš¼ü”Wn§üäL'°—wþELÝ6Ts´©Œ“e<‰ŒdD8â>¤'p„ž£^y(ò²·QÓœKO@#ÅÜ'¢ŒèÁ•“#‹ÍüRo%MÎæS_N)KâŒ\¦Ó­ùˆâÚ0e%IS¡,ÛÏ;¯¤w#`Øh¡Òd™'Y™œråudü$D#ݳ2ci“¥jkŒ”8 °$M©ãu+¸ÑÃ#j§[½Þ11¦û«Ù½Ï€%â­Ïˆé9›ç3 £ÞT(R !–t1õ»Cé-¶}ß©í{±ób×€Ùþ”~¬Ò?ýÉOd¬Uõ¬5€!:_=¤0Mpîqåë¬Jvþs@„C·.8Æ·ùfyTL90#;ÔR¤•®´¤ÕQåL4%u춢s\i–à D!¾å1ÛªÕ”ˆË´`œžñyç…þ$ºb”S2c8²ÖùŽ¬ïÑö+¢*$j=G%ÍMâ·Uª¢‘`†æ™šOÓ|ê6OÑ‘4å“¥4ÆN ¢ðªÒ—¢Qñ±2œl¢ _'Ì|æ‘/3‡"O÷¢ÑHexÿ©©x:V”z²éò%e—*“§åö`º¥œ¾[R<ÊxVZŸöˆžýÜ»¸èöé߶tÉý?F-C4[þHˆH;>%Ž¤)7µ@Ä3ó R˜®Ptý¤4Æ ©&ñfx‹ðöþ“¶ä¶[b¿Óþì¿14WÌIýöœÄå2’çÞE]VY3Kº òÆ™xmìVÁêx± Jh”K5¢é5h H‰¨£ò%W„~ÑËþøÂ)›h)TRcÅøÒ8ÖZ€¿NçÃëÕ ¸ÀùðÓÉ9…b6õ‘oB¸R3?fX(‰¢ÒÝ‹î7´;eæ£Æîn7ýÃßÖ1  Ál ÷-ñ¤lf÷«kçi>®fpy’øˆ¶Ê%›ßíÊÉ&F]ª§°÷ ™˜4{gf1±ÛY‘ŒÑ EGÙ:f‡Ún…œ«HØyï ÿ¦€v4C²«¯2à²QÊÊøp& €ìª~\ð£{€e€'ÉF(¹CÄaˆrqG•§®Ðr¾¹8;qéü ç­ tqï¶NÉ•}Ü3t°“”q ð¹»UDšz³% *:Ç\ˆö}hþdèã•Î­»¨ø:Órïi±£[—ª€•aªÛ0"(¨<Ñh‰¦™!|Ζçq>æí4Nˆ¹+¤rÇåE÷€g(µÿÍäuôŒ¼cš¥g‡š|=Kл¸X¬)r¶9–ˆªKg’¼Þº7ñA+]‘[ÊE–k‘˜°%R×Çíº—ï&’ÏàÙþš}Ì>Ýðð×›ÀÈ5¨½Ý½ä¾âa#Ö¡¡a+cFÚLº’Ô˜%Í€ÙÐöðáŸÀ£M€Sz˜üÌ]ð¶ w¦jÁù ¬åeáB-ÂÏ#yÁ&æ[Íf ¡)¸Æw h©§ä§g.m¼ìþŒkЕƒž·îÎÏ>úâ/oKf)‡xûùdUÙ„…™Üqzë<¨]²Téiù1³j–jµ2®ó!õu†7Ìq²XøŽŒ§ò ïYЙ1,PsRpžØÏ+[íPIjĘÅÜ}ü˜YÃ¥JDZâQêUØN>¼ôc"úÞƒ¾¦¿ÌÊ¿lî,VîæÎf>À§/¯«ÑjÑÈO/„CÒËÎR!ȧ>{Ø £ËEÎŒÏZ¬£~éÍqµ› Ï1·|²ŸÓÞeL_Áo ¤µ7²I¢ãöÁ4X´s6pò›dÅa ”Aiéjeé’“$åvMq½š‘@•û¼0 ‰ í0S4•a¹ä†0VXèðËhžör¨Še‡?¼Åpåì†É˯9¸$šûœ§ÕÑžA"1' ¸dšÕ bEt÷ ¦1ªe7C¤ É>=Ö…t,™´ÃûYÉ?¤„™*Ÿê0χ›“f0¬âž’µ±Í(}!ŽÀBá`cK:ï"ã„IÓ0)Å-­T°E¨•N•G Œ"¾ŠYR„ëzž¦h£Ý=÷_ÉÓðÐé‘STîkyòÄM¦ÊlŽY^‚úËa÷”¤8¿U¸´W®öƒè²1³+µbð)<Ò¶Ù)$/â”r1ÛñNâò¨ ÷ê5ùŒœp•ÍHÄ‹Ï6Õ&þ²®“JcîmPtI´F·€ÖsÎXèÉ×,{ÚdÙc¯¡Æ߉{ÐyH¼@²+EV Æ8iôV.•Œ_2·^R¶ñ=ŽÓC.Œ‹.'³_¢`†’£Ÿkr7IÃE^?Æ¥åáé_#¨dô²Å¬ºËãž0„LóºWøÓÑù¹}i‡¥Û‹ï²Õ X§ifh¶@wýkrÄÊšRðTÎïº$¾6»D'|$žš@Úöõf˜ghuì\?îN Z]³×£Xf'óâ6lìÓ¸—ÝM‰)ƒ¡îQzmŒ—׸! ÆÙ ÿ!æÒ/¦Î0ãÅš +Ù Ö6Uå‡nSE½6:Ìj.6cÐHJÐ"Ra:£yHöÏí©ëkM?TkUxÐV²r1™1£Î¦3íD}EÀÑS”ùhÛ¼AXºøvž/¢luxÉ74¼œ7p_xpBÆýÒôÌŽÛ&?ß°±Ñu 86·kJšsÖ•©ø0×Á¬‚.©æ,žÃ£T&â­3½×ã]ƒ‚&ÛjYê,!•5¹1³;XDbÖvžÖbfØ|Âë«È…IŠ˜ÕâÉÈê¡Í<¤µCölR–´l´ëˆf4QcÁuäÈ‹¨#íÖíû$qñkòz!²I*Ép"yß"YvôÖEÔ.Kç*[¨Â…>G<¾½V[ÕÎ’i ;Â9¸›\ö? ûïz‘ØÓxZ¸}1gí£MâœM ÎlÝx±X‰bÀ­¾œ‰œm¯·ÏÁç(Ö0 ™U<ÂuÒ½QÆ5ø·H$XÜݶ`àÈhšŠd¢<¹o\ìà¬ßÛœ.˜ ý”¡I©f‰O` ùŠ'Û WÞ™ RÉ5äB+¬>퇇2Li¸{˜¤?tvC%R7q"«.Ôê k¬l¾²![”p+€™ðˆu1"ü±*mQ’½zYfž«£sÑÌKïè$Ô9c@öÖ¹á9é³2å®÷}ÿ”†¦bÖbCÌ› ÑâÕ|˜Ífé`JWY÷5½à=?á Ë$4lj‚2=‚(hÃ>Ea$i¾ñüŸ¹3A„´ä†C™SÊr1SV™UŒÍ$ƒ— ¨¤‹Ù˜ê¾äAøp_íÐÏK¨#öz}2%µHÚAÚNÂMBîNSÕÁá!q!UkõhÏFÃ9—e(øô1aAˆÝ ñ›–g,CÅ$[ÈrVår)6?¯$6¾‘usà==]4s9Ë’ç9™?Fýw©dŲJt„L†q0Ã~&àëçµ±>ÊC81u™Lá#b÷¤Xóñ]$Mêì* mòµZŒ„Š]õC¸×ãö8êÔ @7È[ZÄ[ ¡1ô‘I;&*’q+)¾#!<ã%v{'ç—¿HjxÑ\_¼Â ðàÖ{²GÚø õ‘ìÝC­Æÿ j3¼âM5Ð5yb§áœ]˜J3’öYÌ ôßÊ©àùÑš"/²>÷+ú‘6\ š« Û’¸TÂÈ“å%67šmMÂW%†)g¾µ«j^´uhÙ³Òû²—à̈ë’Q™5™aØ™<¹Æ¼2Z®ªw‚@Ъù*ðÚX& ¬‹%ʯFO„¸©ÀxÂ#öuçi±±þœ6ÖŸÑ À”v­…Â9+ k"§ÔŽàîMÌ'ˆ–NÏ¿ žõ(Ç`¥ ôˆ—øGË»ÒÝß‘[‰¼vùøTÏÀ»ÚäBÑ‚ŒP¹ s™ÉÛHhF ̤R¼X0ø¢6Í<®Öä^¿+L³£÷ cg\äõÆ*O½6X€D†ö¤TA¨@–+äí „ FSËðÒê\{_ß»^âBÒ„±Ìƒ1g´‹ì¶íîažÞ„/9œ Rw"¿ã§´r¥¦õ¶TšqÊI¡ ¶\däUH̘x#¹ñ£¤¯Bá¡¥ö|ÙZ§ç¾3ãoê F­Ø¶.מ€Q×H¬¦”ªÂõìhQˆDÐØÓª:’"¦uW›ù¦f7 ÏóEÕûÐá­ÏrTXŒm<æDõ«[êp¤Ñ2¸éG¢ø„Z·TB£™‘ŒyÉ_´÷\T&ÈäÙóóœlÛ}&ò¢%äE‘Èl)yƒÊúÇ"ô@›Ïû•p;8KÄ4ÞR6›apµâVŸH„{TxÛ„íáÚ‹¨þ¯zImO2Ýïwž¿Zg2ÁRLˆ¸¡ëGƒ¢ao]åI½1eÁ$L%ª˜Ûh®í (»ûü®ä©Èžµï3G„b7Ù ¬ 'IhŸú9Ú«™‹¬Ê[ò:ÝÖ0…ìY‰Î‹\.V¯^ytTº}&ÿ4Y_³¸ý Cî–þæö)±Aiü=é@˜zcM5f6TV:¢>r±ß#ï„ŠÓS£Ä´ˆ×Þ¬Zš(åá •§†&·7®xÎv?sw—«izz»zÌ›îêœdÖþÜŒ¯o‰, œg©Ð¬¨T³4ªjz‹h¸( 9È'ùÏa= G% E F.¯rÏ7›¹7’vM×w_…QçÈÄU99”ƒFg:hxœ´^ŸàMHT¢kZÌ«au[^.¯ÖµþYez¶žLÀó{P±`z-µ1# Œnº{‡¯yd² ņà§^òk$ü" ð•Ë€9õPK…T.r‰ÊàN¯óå¬×‰T‚˜,µ{%‘a¢Ai¯P©c|ÇO,ØSt¢Ã'0,ↅQ0 ´Â½½‚&?i²8̉áAñ¢+@$#Zræ,÷’EÜ•ªv‚‰–L›$ÔG†…Ù%ÝõH«S4=˨o°¸/)*î²Í­^–x‹‚¤GÒ “·ÿ’ì¤Ý°ï‹ëÛQ§*-ó"k¼Ö…¯âñ, ÎWsO:pyþÍ8šU l½’Ê|AÓoÕ¼œ±²AFQò½¶›•G=L̨۶½¼»C—ºr“æ ËÛÌ.{™HH ~xUÎq»@e'4€•qGÚïÜs:Ò²¥)µn. ˆØÞ€ÖŽlÃêäÎG‘ô˜å:ðÆÜ‹xH·ƒæ,†’¨\£Þ…¹þÙÃópâŽuètf FÑ^jý=Ý{•žìS5´*Û›qZ6®Ñû䥻o/(Ä3¸PSñÆ­ù8ß–ã»Õõ5yàÓ³Ëô—Þeú¦ÿ¡G¥ó÷ …·‰†ÆBÒŽ‚BÂs;xx@ŒÖð!„c1x˜Ô©Äp‰Úö4 àgÈ„{CufÌ CR~º„cVe맊t;|q=§Ò%ò¡Š<$¿¸¢$ATjddûúƒé/µCcq7TKhÚçð—ÓîIÿ`x|Ö=쟅~¶> œ'Í„#RŽÔ['Ü-gn·©r fÛa†ü|†,žp͆ù¥ä->d“û”¸üjbZúe^º ‚µÃC+ñÞ…t "bþYžÍ¥DO9t ÚÇf%2*QÝ•ý .Q h¶yt¢}~)ðdü»ƒ—ßýN¼¼ñj3Ñ TÞú>ÐjâZ%ˆu<¯Û¤EÄÜg&fxèÓ¸fîùï—h‡4D.V¾ùîÄE2ñ@©„pRÆYX=0Š‚•€çÙ¼Æ_Ë€2¡ãÓªMýKÌDzĞÿh'ÀE3îªË¾$ò¢§kR»a¨*à5LB+¡„Ÿ6MiyŒÓ•Ò"?—Âø}3, ¨ËÕ¼N|µ‰jM“ ÃfA¯ÄJT¼ÍàB¶Õ•ŒWºÑ)k—&¥f½C%ö;zIM\.¥òÀ´„PF…wHéHhëgHûj,0M\LAé'Ë›H½ß=µ•ÐÅŒªÞÎY„¹“`GXÒs$l^Ijû>ÊÍ'«ŠþOÛÒ,|óšùI·ßhqÞŽèdÜÇ[¬–Í]ú-íÕÆ´Õ«u2@æóÀtÕpUwE1/ž|]ÊêÀ ~Ò28URd2œ\LsOE(KÇa‘Ž!©Ü—cÏìɘ(kùÑãrg,gy"­e·ë—“ÜWé’Iw•ÅÖ—wòðßb#Ȫ‰£ÑŠÄX…¦KÛA z†Å§ ¾3vUß©«úngOûÇ€X}tÏnhÀ¡ˆ÷D¼¢¦Ê¹ ¡¾ÍÜGôxªÊã]¦7v–C…Bà ñ‘+?¤Õìš‚‘\xÙ‰½I:ËDb³³XÍP½°Jठ_ ”3M¶E ‘ \9±ªÁ¯:{ü,„7ƒslÑ‹Î nø8“åÞ° ¦ MGµ@ýejäðø8hêÌßÒß¼èÕ¢ˆ¬ÇýMYù‚¦–sÅ^KÊóªÌÍš?îg.Ógž*A¥‰X,›jÃl(€’ôì¦ÎI‰1ÔÑóÃÉä„êáb˜Ð¾ À.7ù½áérC*Via@@I"6»/‰7¸7½Î˜$«‡â!8y[ŒÅg³•ä«qÝÙÅg\ôòZƹôîÑ:ÎX. ¡¬Cj¾UDU§¤C*ŒI$Ÿ~¾Õ}$H$& òNH[Ó:—t<€áº*1Åf±ÿ©\ù`x‰ ì5ŒFÙÒÐ ^g“ŒåmÝnÀ?Ót;« B¾ÌÛPKD(kbÃœ-Ú±.ö‘^Eà;áÐ>¦¤0¤îšü5PÄæê"ÉâymÓ+¥˜|‡<½©ÃŒQü„ÄÇì¨z‡`°†‘´é$äcK¸ÉêÙ¥PF¦…s`÷”wÄ×E4Ò‹lökA î>jÈ•vrÉ2õDû[Ïû\ˆ2Ó2 N÷Œà>õÕà¶G‹ûO µ¶R9ùl–;ë6pO~BÓbBŽ‡ï/™ìG@¢¸†+Ðò2»ÎÑáÉÖŠ a8Î3,âÛ`$Ñ,É”Ao«¡ n É¡e*—6wn;Œñ.nPjD¡š „¹Ù_ÜsK Âl5—TÚÊk¹êy†•áÛxü€øŸÏN‡Ýý³‹ËÆO6»7wÌ”’P6²s:Poì¿ŸÝ°8ª¶-·µÊÍ}ØÚNœs¨ç"4DâqÅÒS÷ÀÇ)tÉ*fÕæ% Í—Ãf •–Ã&¡?$7b†¦ÜÅ9‹wÝ n ”ÒT¶®#X0)Å%Yy•’&œt?xŠ‡"o?˜ÍH>Â=ñÈÇ,¯ïw}û‹¼jÈÔͼ ð@H»=™DQhòÊ m†¿E]Š"»¡oû20#b8âr­ånW\ìï$­ ÓB³B M¾ÝbÑ r™ø5Å Â@x±r™„Q4è<ï¼ò¤)í4V"÷©¼ÞŠPâÊ×nŽ&Η³`¬ŠÀ…i+"-ò ,ï}~qv0|svANÝ‹~oàRL.¡2}Êdy¾…Oé¾P7ó‚;°uW©† (Uc(—èV%0iîÝ'PÝÅ(]¼ÿšp`™¸Ôè˜6@óûŒãVe¬ÕL)Jߤ½ÃïB绳\¹ýOû3.aRW¨tùù´Ju†W«ûYR÷˜ü¤4‡=øóŸE`¾ï GŠHso\>N%A»Èj ÌKM`^ììé¤Çf¥˜¿ÿŸwžûwùì¤> G?ÈsÕ´tÁLòÇtïûïŸï¾¬Á~ÊonD·`‚\”4¿,G÷ßTÊ{Vë ÖŠDG‹ßòÛrñ[úSvO÷›Ê‚d åœh9S&üVbÃH•Õ‚˜_±)#¶üˆ2DíI¶ð9·—¥¨\Ä—»ø{BEÏ¿@ö±¯ÎÜÙöÃJS5'Jœb¡Ä,5^„°ˆXÚGº:v 'b G‹ç29>7Ýtg‹éjZ~J~æ«·£ŸÔgýòë٢ЩØ3UXh•'Ñ'oµI„ê+°y±ípZ-jÆ óöÓÕÌt S»@÷'•shTs?ûðÁz&É%ñ#ZÝëtc›¡UƒOMë $i¤°JX¥¼ªOêF#T¨4MJÐ>´‘‡ßëõ…$¨³h°”¥JË2űC–SÄì|& UsyÕjD ŠêK«Þk½fÓ ›á› ÿȵ_‚@ÁQ–€·“»Ô‹ÞQpÙ» †‹îqÿßÜ? iÐ;~Ãz“ÛÔvÅÇ\L¯•¢Ž·†å}˜V=a×ì¸@ÎŒB‚ËjນԸݽÀNÃ:e:~“ÊG¤oÄ4t(×ú „ÜøV +OÊ u|¾çFŒØ{pÏ›!ÞT‰)•@¼g-É[ŠØËE‘œ¡œ–Ëò z—þEÿƒ‘Ü&Ï{}+´î‡ôñwu"j ,®`Ób =Ák{¾Îæò Žú‰§}€B7}±ÙÞ3»‘dhA<Ám  Ì<ƒ„3å;Ì5ôè‘6>…§”±.‹Ç _‚øÊ ¦ük¸ÒË»Lc{„g¾ˆä# [< 6Ãì»0.i–è<<žHtÏ×Cðìœñ¢¥€JÀbü@ Y5ç™è¸Å*Lù£û„Õ „kb8DŠ ŽO:ÇPÎÑÚmsä#œ²´h=‡Nâ@F‰xšJÆÌeæDRÐõÚ¼ú¿XÂh%­ël,|âšùÉ9Û«ªÉ3¢tçbº›Õ„Úÿ™2è5§©ûšRÅ›ìšõê'SS|Ž2•T–a{¼ÜX;ÞžgûðpxÐ=>î]0…ûtŽ©íjuÖ·n(ë»~/X™çªƒ|r6àdŒ4àáÕÉ9™É«ãîÅñ/tUÓ¢ÒKJ¶þXÜ+±?öö¯ŽŽú§G[M2žŒ•ÁšÇÍØèÜKücÄGÌÌ'&ÅS~äJ4Ád®§J#ÌÝä1 Mø#è¢ûo¥Gcr Ÿö>\2À"â†Ê”i¶,ñ­Õ↠üƒ*v(;…Ë3†Šàlµ$ó÷¶.QõÞ@{1+Ë2áMɉÓ,¿Í@ùÊŽ:á|vM‰ô:7Í›gòjS»–lMmëÌ4\Ûk27ÙãÆÞ]‘õòm?NCeQr­ Á4Z!‹²Ÿd:×V;`PôWQ‰8)·Üç@­2%’Q ¡YEs‘ð¶BË’@Õ–-®³[º¶Æ6UÎ9±S0¨J#\H›“ ´F¶ýï3“pñ C£9PÖ _¢Jwx ,þš½Ì%Ø•yÞÒ{´k*MÛZO Åø÷ÇY#·ýlR)z–îL*ÊŒçÉâq:xñã.ÏF‘m `Í:³¦ÄmC®+.Í=êÉDª<î}ÿçÉöÁïÑö>œ÷.^þröÖ¤é ýð n®IÌÝUïc Zó Æ‰Ðq ÙzÑæð¤R ‡€¨‹ìµºAÌiæ.è~JÁ|)|êEN=g³„D‚ÐbZdÉž¶(3ÉwÊÙ…¾[èÖÓ2Ô†^íÈ•QvJ¼²‚6ľ©Bʵªòˆ¤T ¸Ä«£ìi§ ©ˆyœWbõæÍʘ>r1\ô#–jwÉ I¡'£ép=Ó¶²WŠ½Ï ìIמSl¹'%Ê+¨=–ÓËgÎe–¶3^(ɦÝó¾C3æýè« ?~°q;o]m‹qÒîq‹e£ ˜L)HFS­Á-𷽫 —õö°^,Añ[Öb0|í1Ú¦4ÖÑQŽ •‹š „rRQï“™áí¿é¸:žŸõO]6¸Ê? oûo.ÿžtïB ¬i|dDpO*3åu¬¿ ñ÷vš/ŸÂa;3q† f2©C¢%ÞŽZ•È…0™5þ¬¦ÛÚOj¡?ay‚` an,CJ'Rå5ÁT¤˜ jp–RŠÎÁ“07%}AÌš)Æ%?Y€é`¶T`D(‚zòüVÛ—ŠJþPÞ8¯ZdJRû‘œ€Õfœ”VÈŠ ƒa úV™oøN]è^–sÎ.j~žl'=$>3(à¤7Ž«‡¡‡)õwƒ Í­[n-zFÍc›^1KÀbÈÚ&CF|åÃùÝxÅ"EDTJ8(Œþ¶–d%°'…yjR _'%kßš ]+“ñØ×}Iž¥µnî6!ŽMQmûæ'ÇSa…øã×"ÞFJö4ú9ìª=™Ùìi%Ã[…“î‡þÉÕÉðm¯{>„ÜuS_1Ýša5„Úýó(šàMhÇÛ, ¿B=ÃÈ{ugÇè;‡.k:ê ƒQ½È…èvQå3ç“>€¸Û ƒØŠxM”•Óéò¸ÛìÅ”B›:LÉú5³¶’{Õ]‘¾ËÜoïŠ)³9Ï[N>˃ÙáSÖŠ°#z²-C1.Qs¹á ×½8x‹>Mø"÷c4¹[1~à†N¡0´I„¼CÌZéPr%ÐèïfOUµi!‘ñŒÁ‰– ©±U dÆ-¡ãÃáùE ÖÒR)Êøñ®<ó0˜ð…æÆ4d<¶©?“%îÝ~*–-cy¸´A™‰<žŽ%G¾U8ÂG÷•à(ÈùsÉî‹©*ó™Krù{¾™¤kžæÙTWþÍE¯‡‡MÁ =‹pÿ(j¼²ð`„Ø‘¦~ê¤otÄVÚHˆ“M3(wËß­$Ü#ëՄЧIJ„~¢KJáÍ(ÂmX©gh™„u]<àáŸTσ9ç€E%‰úOÓ 3x´ÖLf~—u’SŸ!‘Å)ZCR+‚`8ŸI]\ŠÙ”éU ­f6Þñj*¡lmÒ*Ãê°“ÍÙY0ã%l=tËIí{R4wëÞÝ©L¥‰äè>,{•²–ÔàØ¡º½ŽôäÖ®HGô´§Úêk¡9‚pŒ[T fø³‰—E3Ê9ÜLåJ;æ-Ôú²Y)È„y\M¡­Ä*.€ap¬WѶe'QaÎ[\cª’¥^ch/E0ËÒ4­²ˆG|Rƒ ºôÀ½øÛ£Ÿè!iZ&¨1,ÕYzÆÚxȹi¬ƒ8l‰— Rý€ëÉýÎÄ­üIâ³ ²Õ«cá¢bX9 :)€ñ,íÿÏp²Y™°ò’}žjÊ Ýa‚V¯3ñ×I8çXöß‘c5‰³Ž¢•$/@ãPîÕ%ÂЂ}Á£):A‡ï Þì=ãQÜš|¨œ…š/Îv¸¯äGƘÓt¦ó“:4ëæ<ptF© …CM XY™×ª–>?î)b§Jw¹§Uôø±ñšEÆi*£Æ`ã Aƒ—EÎËëÚ¶ñ¢H[„´Æhh’ÜAb´&‘MHA-Äb.ÿÈr7P„ 7ê.òµ/Äø4)ÃÓNemµ~²‚•ÞÔ lãÙdƒ“×þK•ûÊQâ„HDH›iù‰5r0ôeZc{rýœ¦ƒö~¬Ç– êíHƤŠc®7Jð ã‡Jž31óڻ룧bàDèÏ$µ1Xƒù¶ mÞZÜ]Íd(*йH Ø«`/‚(U/°è¥I0æAÈîD¥Ç똨c^äD¿#@¾™°®)5vÒ¹Á“ü6ýf…îPÇHÉ\´¸ID˺'w…rÀÌ×_"/&å€QJ¬±’i;ÞQV x Ïƒ©2jŠ4ôªé´’r>:y4À‹l¹¦qoXZšŽˆ|H¦òÏÎ{ÝK·‚O{ï‡Ý‹‹î/Ê)†ê§;ZÃ7÷Áü&bc·¥ Ow)ûz©L½'ðÒ ûXLd†¾áßı3»³Ôå.›Ÿäî6Dù‚Bà¿‹Ï%Ž¢†dŒ?PœFû†Â‰2Åìž!"M‚ ÷ƒ ﺇAÕ±ÄoRϵ–¡•Gé2Z9|$”(ÿ«4ê·ɘCÓŒG›¨-/݇'.GÊ“Ús¤§À’ÒLéæ²s.ˆsõ}ïâü 5UòîÅÉ‹çIÑèhfÁy¢Eðp³X,Ø3©?põ‘fM8×C1…½ÙpTÎ5—’£%Çý7¾™´nØW·CY·±¤‹i7Â~œ_UÍ]xxJF%(ÉåM0ä³SãE9ß‘oxà)%…J_p¿Ì©’˜"k˜~VµwÂæ€Ä r€˜v67"!:óÜä5<$Åã>nY¹¯N…þ€£[ãKÁyF ë.!еʌŽo”É=¢‡OdF REšˆ&ð„Ö3uK‰ÓqÛ<ëítñèËÉè]1›ðp_ré.üÒ-ìœG¶ˆ¢Fì *wA°]w®F”虋Ïx²5îÇGa5±æœàJìE…+`SøU*ó™W|VµÕdr{o ,^,Ub[—€CY,|Ý@kËȦô¶ +‘ÆZò#é¸Äù8–~3e‡ÉÏ=öN1SIìj<‰ÏvÌUyÔ^I —ãÙRíXJª­öƒÜ6ny¥Ì’ŒÞú¢¬Ê›¥­KX"`8?ÕƒÕær5‹’Ÿhö‡èV£»i1^n(ÍË\tØ\4Ãâõô,:îv^š} ªIAcçúÒ0“‡†+3 1Jnò2éŽg@OÛO’¢t?ü˜/8ÑËÌ*W¹JÅd='d“õ{:fS1£sõCŠ¦ÝÛàWÃÌÇwî^“è$:}!ìðiƒËc—ü cøäoY:¸ËÜ¡Š„Mµ¥÷ôÊߤq–v‰pw1S.ªy)z7ŧ5g&­õ1ÜŽšoS£ ®FEÚ£q˜ƒÚßg·>ÇU]rÞ—Î’ÔXìšNA«H-m¢É“‚‚‰ q!eo&>2¬êdšÐ1áGϦ{Ç_…Áˆà5Šï#ù/à5C‘…÷'`îÜ ò JIø32Èá°–ÑhљŖœ ᨨ—,a÷ÓÞîî.Å6†@í9â‰;TŠ'rÿ,ÙM·ÿaÛè2°ß–­pÖy‘?òs$‘8–:0³m ®ç½ÓÃÞá3gZþ—†mtèì{¢üÜ<ˆƒYJçw.¤Ÿ;¥Žçn»>¸A].}Ì`hZ e/îGjÄçŠÿ £:RB M…V®vp/’. k õ¤¼®òÅGÏØÆkvš•;µù”*q˜YÑxƒ1pzIôÄ„Kqµ E"ϺȨ0Ý¿YÂmXÎd­Þ¦ô€a'iß—-› Ö°†_œÜ¾4Éí«ª¾Ö-œ‘ñƒ$8˜J»\²È´0†”öø‘ö=¢|Y$z#L ¨’/#Ï{.1œólZä%\‰1›=ЄaÈ’›XA¨”*ry ¼‘/0ó=.–гßòE©üÄ5»£É&OŒ6ßY–;@ö”ñx(ˆ9Óã¼X¸hÆ¥2%u»@® ô)Û) lxl<>Ï›³¨f½׸ĂlУ* nd2ÚÉíµh!‘ó¦{—çp˜~HZ‡Ú9P¸ÿX•Ká)òá¬-«ÿæe – 7Q(ï’°#ê.åâIG”x“zP¬§¶)° ÀYTK«FGúÔfâlV¤ŒËuQÕÖW¹Ìyt Þ€§ð…V­Œ)^ è5/ÔÅÞòû’r”Í š@ï ‚Hí}Ô´{|þ¶Ë9j †Ì@uÓŠ*a†BGµÇp¹a…ëàä«ÉÁð€ÕlÁžZnžKz.éEøp²‹Ôs‘§§‘WBëw…Èß­HbªáLAK »œwÊY¾ ¡ExěƫþéÏÝãþáð_/û‡µòŠ0ožîì1/›QaÕ¼jMªK3ûL&¯Ð¨)£ß:¢è9±Ê|æÎjŽz¶^Á¿îþáý¨`Œ0‘‘ÃôLW<§Øc­+’}—Ø>ѳC’½VŒ|°Uÿ±b€Æ#¡Tî\øà69¼ÊÙ,=×#o å PV˜Ì€ÞŒ ֔蕹<Vδ)ŠÈð#åIFI¸Ú6ú"fMØ>Eçô'¤ÛÑœ)êÀŽo•UI_GÔÚ7ªÉÎáÛîéáqº‡ïæ´+ÆÁ´ gÇÄm‰L5R؉K”µ>¹½±xˆ¯GlØ1åHSU 7Y­¸Çv:ï› /<êÒÑúEë•ô=ñ¸¥$~až$úסoc£Ó¯a¶o½,AA™T8 —Ê‹Š ôÞ¼×ïÌ@¢ éoÍîT“¢&>Â8JkÉj5ÀÑHzsRZ$Â=¢b¯OT%o"ûýç~ª ¾z²U À0Å“)Äpm§¤Bå·!ŽŒÈ,h Ùâ’È%nÓ¥ ,pŒúÎQŸ'rÚ ^îb @¶ìé±ÕŽv0µG¯F†åÀíâÀ–ÿ<ú©é“¸õá2…á­]BõÌfä›Ý†¨–£?ÿYI_’ùÌZê+Xaô4:L”È-Y ÔVFM€ôKV‡h$˜@‡Ëeõ»ËéLÙ@Ñ‹3®Í‰3PYáå É`LŠI8û_F_,-’†ð·GûmmùD²‡ÈÖJ—4¥¯^"x!Éç ó3¢zXÕú=ß"EŠ¦"+•äf\|gšå²!Mª2»"q%úתpa—áãÃ* cFÔÏ,ヹá;ïQjŠoˆ—ªÝ5«D”‘“5R¾‹fßo™ê$_&Ìz"Š<9ÍH¨¾THû²dvƒªÁ¿…¬.ÈÙ sOñ3±-³•HEéäÂ…â&8NÚZÚÃ`šÎ’ „œ"iÎsEˆ´üËìÞ]Ìy•-Ê[øϲûr¬¾IµÞzxD#ÊýYñ)ýá•Jæ ºçÖÙH(Ô(²à%£•[ÅÍÊìR‹ç8FI)ï²Å´CM)Ÿ,Eâ«Âf¥<À‰ïí$ÌÁ„±j+ ‰ÛeÎÁ,Ó7"hy•adþ¬ÄÁý}wU“ü1=ì¤ÇÙ…Kñò×i>.3ƒtí×ôÀýe2+îS®(i} ͸]Üý¹¼Í'¯U)}¡+³8ïþ+𠈱ôµØÚuÑ ­±ºÿ~/5V®Õ+)LÙÐZ h(®SÖ×ñ?"fqÔ$Éèý?¼’ñ:“v‚öÖÙª Š™›³ÊŸL[\¡m7LãÕ‡×!4dâÁBpô¤G5‘Sw¬û<Ÿ'ˆìX¶8(±›à„ðtPDÓ|Ðý¹‡‘çáÁÙÕ)M±€G9<ëjFØrcþG§Ý‹£ÀwSº.gáû7~ª|æØð) îœ#c Wéy°Ô²c3; NÍA#î)}®JfËy‡‹_ó,¨F:×­³yº]2÷ȹâ’g»sn„¿Bž #éæáž~2–²¿&§åôRÂœ,™[…x òr:§óˆkt•ýürà¦Ñ2ñuIÒñP¡š^Jx?rçÿžð¤<½ŽiöÕ½™ÌÇv×dÖ+êZãù€†4‘´+ M[á¼ÖF£k"d}D[4RŽÓFÓÔµù\)ÊnË,ßKb¢-èS¥N¼ƒê’Ã<ë<é9€÷Ms-CùÜi^«“„ew ú¦e!»'i<¥RÈû3¦¡‚EÄnÄ{7¤æ UÖ Ùú#bÍUØšªùïv÷]Ô?=¸èôN/»Ççftz‹®x(²X²¬=(Ħ]DØ%Ðú—4s™l:¸°Ò¤@v›«ß¶)ó‚4ÂŒ„;è ó‚tÚœ¤WöqMÙ¼–ѶJ4Ñ)\ʵh­™tÖ…Ù‹ôÊO}DM &>»Œ(bÞVÛ9ôýÄ =–~PžŠ[ {jSs>YëS#%{ŒjFIÄÔ¢i…KâÞ€:ã–-*>¾Sãs"¬/u’EÓßÑÉ’º†_ &yJÈ2<–«z¡–_ú0\FÆ…¥-Lâ\?â#xåœN–Ü‹j© (¼F¤µÈ¥&é+ ÎŽ».ÝR¢¥°Ô¢SSç.ȹðÚm‚7gá§v†þÜ+ÍwxØO! ñ±¼+‘ÓF ¤63äU¦8@Œêp“ò„å…ÿ vOÐM´[ȉ@¯£/y•¢ZËÅ=O#ô&ΈN¨©×›¸k­±w‰X-iÕ¾íõÞn èŒEÛfŒ›j,«Z ¤5â"ÈùzMÄè6.GÏ$ˆ´h&#â ´ãñÙ~÷xÈ7PcþÉüˆ/¢é‰pN¶¯_‡Èh}Ú;H{ï/ØÝM[4b·Ã$tžJóP/ òL·Ï%{c°}ê²/aHõx,BÚ@¤t•¢…±Ó˜Ÿ¹]£üá‰Ê.aP—íØÝŠ.›ÃdËIR–Vݬ¦HUW‰]†q[΃Á4Öê/³Y±b¡µöú¦A<ï<５6ã‹tW0ý Nñ¡°¦£¹ØStHȘa> öû•a+€\EJâ¤\Eä÷/‡Ðz0ªÔÜ¡J$sDpZëw󨋿µ'ª®¡¶¬Jð ߈ŸŽÉ½gúˆbe%íPRÐÁÓ°¿è—…à:›=RäkÛ—¾ìÿÏã¹Ãd¾àÈÊXŒÌ…%¹üüø›Km—E÷ì¡ÎLÕ˜TJe+3õÆjl:ÚLF üÏzÇo¢¥©§·¥‹«&Üßœé2SEŽ0ŠR[Ôæ}vV£\û“{îé»ì×l’­Œàlg“qt‚\Âmf‹&•H§‘d/ø_ã±élÕµ’Œ¾úá] VÊtWu =CØ‚µj†@o‰¦|á±LN€Î(êŠgz¾ûh´kô–öõœ¹dK^ÏZ’ŸV¿­î‹ô’f»3s˜Ÿ²ûÕµËâi ÝÛ¡Ê}ë4 ÔaF·–²•ÇÙ–NDz,ˆ W`ð•Õ¯vðíDq/ Ô’},Z}Û™Y)ȇ„"_íaßäªæµ"tv–&ºB©´bňàï[aj>`ÍÚCEyÀ»A˪6÷ÒIkÏPoK ;Xè ¾¸÷‡ç…\–+ÈOJÍ'ª›ÄÐ誌Yˆ¤_*ÌNžUÈ­o  ÀP‚õÂÉqnë$íLZTBK˲„*f;Q ¦¶>!fiÔk`Ö"ÇrŸ–SœÔÓiO 4Ÿ\x\ì®:W#S{ùPra*BaÅÉÞõzç}ž_^ à^÷†o/ZPW]ÑûC˜, Ü’xx1ðtÐ?êK™$q3Jëù¸†!Ee"NÞ¸hÆ$µRK«o¯.dÊîÐþ-ÝÊ]öÑ…1¹I,wkü¨ì™­¦ ¬fÚ·#÷—û4 ¥!br®{ô‡bö[1ÿ†ù†r’ƒ¥68b =ј÷6Ì°RïR³›Ó^ïáW€ Ú1k£[;ùCPyÝD£Œ= …-ý1?¤Z±c dˆoé:iËÖŸš3knJX"‡n1SŠz’AGyŽ]:¹n^y­P#D¡«K†J žì˜Olýƒ˜r¦ñ‡´dšŸÊd?Tú9H(ZÜäô¬é8Æoä.ÄN{cš†/ÓýláVÊ0YÀÜ͆3n;(&LE×"H­×Ã'o¬ñãÝ(ÊÐÂ1ÎxRˆéI°›\XH“R72ÊBíƒÑh4ÏE÷,DŒa„Ç=¬²œoft·XÍ'#^ nÇX$â„ñ £ŒÁœØù}ø"XK®NGN ÄŽé,ñ]x¥e¥ë¯ªoòÔæ½ÚÙS½A³nþù!kãY½2ש>æΙ}Ì#BoÁ”V©¬>’ VE¬5¥ #Z°Ží9s&'úÕLæ¿Èf™ˆ`ëBЈŠ”ÿ×ÎÝr:Ùf¦'à!Þ¹J«ú¹ºP­žî&úðsÆø¸å LÄ^K?Ftó†™8ÆÅzVÅîQ|ÌÕ‘crPÇýÁ¥¯—»å9q . ꌶÛdƃ™7¢t1‡1ùÿ&æùiÐ' ššmcïš'u;²áâ/r&˜¢ØB6ap²ÁÛ³‹K¦n…¦Šú=SREkë41ê ½vëõžìû{§ÓÙÒù gLÈ7dc÷Œ”•° ›d-77¦žêi2Á2*(ÛfD´¼ñSòKRŒ´`íÉÇàÏ}[!è+OÐoˆ1‰ŽD­¦nÉ=zRi+ [0&Ói1S ¤›3™$8,‘ |Ò…«‰Q –%陟ë4|^Šá 2ánê¡UaFÇžVùhU‰n˜L3îÃN@?°-‡Ý _§óáõêÆt >@ ÎA¨/‰¦¯Ó¨¼Ó¶b6 ò74ȉâ$ˆ°RaÌÃʪµ(§³VìM¶Ð93ø¨œ;~Ô"º)V¾|b¿?©kC4ÐQ›f‘€º³69šQ‘¡° åã䲎Ã^¥ó¦$X‰¡àÏEo‰6Ó³Ÿ—¢†P»oi3–ÔâÜ…ÿ®ói”0 Kf'FȨ/hà«™4¢ìd†ßG!M¼ð-_Ü¡O UW›%D>JÙÍ Yû?dæ.qL㘔ڤMÕ°¥ò4+? &$xBӓͬ™¼¦pØcZÅ¢thîŠE ÒÄâ‰ÑÒª” NÜ!TRÎ&h, Pau‰®P¥W䧘›*˜ªõBBZºn…1bþ7­[Ì3tŒIbCžµ¥$µÎgÚx`µ_Â^…æTˆÎõV"ŒP6Û9ÌfÎ¥oò{Deœ oNÉØ Ftpx^pœVÙG{62óüm7xiÑ¥^ã Ç|†€K¢Ô¶Eä8]l‹/„G‘Úù2o(®³h(©¨õEšË^e2‚£‘ø:Dœ~¯™áË'¹¦Àø[àUú¶~:,gnÙL™‘ *ºÚ˜M¼0â:Ç[áxL*—ŒMÇÒxOs‡ycHÐýÚðñ o*» ØÙ lK»]çþ©×h/—U²}‡1ܤ˜UIôR¢˜Ñ>üþvd~ÈÐœ’W| ýæ0±Áix‘ë<¢³Šä#G— +º\`œ^‰ïdn?¸MÅ0±µ’€„„&G,Ûåq•tú=y/\ÈTýcr•ò.MÕ“`¬·R×L—y©?;¿päàn5»ý¦’e¬Õp0µüùÏ\w3Œ‰¼›Ó „º"4éT±q¿Î=‰Ê‚ÕFQ³‘¿WÑ1q÷m&ƒòÍÓ‰­ »Çå/x‚·YŒRÐ)Zœô ý“þéÑ{w—RM¤×þvE:CéQF½Éúþ[Îqá²á—i`Òx—ý–¾+u)^'°’F±}M sõAu§øfëyw¨ <”ͼw…7_]S)c…kâ|2UFÃYüŸù(·ˆ>ï)¹ CÏö?VT©VàÝ_7ÚêÐ(`;È ­ ÍÁˆ4a ÛŠ„r$R“ƒs=—"‰öCT\‚Z³Ӟ. ²Ñp´1I!ñC¸ÌÇׯ›± ž+Ê‹r‚( i†¿mõjHÂ:×O\º.À¨Ü_Mª×":Y<'f1ËËù„iëÌ„™û×h¾—‰szùa !Œ¼pSsžé ßžÏ»5VIÛ"\XLˆ,Çóý#­hþ­¥L—Žþ&ü,˜”ß7ãìbéÃj‚ÐÔ-0Ù¦JÓáXbÓ(úßHAªxñëáaõ,ÚàTvŸQÉ@éãF±cßÏg¿ÒŠJs*Ò´ýΪsŒ“sæ´Ò!k P•$·¾#Œµ‘Ü“?c\{ãXMÒÓ¬jL2V¦Œ‰Ç™‚sÔ$cÈÀ#\QG%ˆ>äÖ% —2Ò†^3Ôð î@Þ„Œ‹Û†Äjø›dW LÛú¡q¶[YàÁ ¯fß~Ú/”2G=k—Wo—3 á¤ˆJs«¹Å'ÔüòjÿìâT ^¶ðx—µ®‡Ãè @<¬•>ÿÜÔ½‡yA­Fp6Ú‰HžønkÄè’|2Üч .Œß´Óosb(fþ¥Í€&”Œi O¶zÕ†Qá2ˆEý-ª¥VÔ¿È3š’DRæD91ˆ[Ž:“§V7¹:SåapÛqFuÀYE7Å–º&Ú¢ÍT÷szTÅX]/­ ¬à_b°ƒ2x£¢)(\ÃF Cóqù²œ¼IœÂ‹$äùìƒÏ ÷”®Ñs¤?n›ͱ(xÀ‘–½ŸWÓãEuÇxÑa`[h;Ì&ŸDUåò€Vëº2rn͵C¦·W1¼îhGGi4¡þ— KWŸ= úPšçq[Ñ– ¨Ïçò“\ŒX64ÜU”*Ÿ g° ×þ WZO_^ý£ÖÍ’:‡ÔB$ažpÙ æq¨Àô‘âˆú_AöP»û$> Ö¡"Š¸$ß”(`ñ:,]“0y~Q"Ì™–¦. â—«¤é³q“€7Ë ®˜¼”±„VSpŽ0X>¯pAÃ\GQI’Ëݡ銋¹§W‘Ò…÷rKAcS¸)§L ^ÓÜ9¬µ‰¼†H"½‚³ÏPÃóŠμí§Ãºƒô:©ROp?zËmã„ŒÝÓCRéXG›]”"<Ù\g±b¥ á³iì*$§Îxù’Ö60¾dóËCç´Ò“2éënÊ!›NÌÐÓ#&5muÄ­cöa¶cMö›ž‘¡âæ&ñì”s4۸ŒŸ{ap²ÕN BϹ/JØüj›h®ö¯2ªžfT$ï’¢':¸Z ‘·y@?O²q1uþeEÏ«û"y‚ÄE3C¡tžfÕ=¡nºû¬R«ßXtSýY9Oh¢fzKÂÆ|6’›øF‘ÏN’¦Ôÿݯ91UVoU±K׎̇WA#ê¢×ÛÖô­¬½øðëgžY¢ó40¿¤’!áðcM®X(WµÕô©BÐNf°ö$a:‹EaþT7k”OœœtÏ}Æš†l"˜ßÅôÝ–\L¼söœ>MÃÊnguòç‡óå"ý3þ©úÍù…t—ËüŒÅ­’0ÉBEØ;úó,.¤ßKcÀ Œa šï¨û>×ËS4ÑÀ‚7ƒ#¬(×. n+!‡f¢g¸d™öœ-|’l”SÚ¼©?sÇ¡ïª5Çp•©&³@ìxñk/!Ï`Ñ„!šé™®¥EhèZ<#ÜŸÆm>ßåSÜ÷¥¬‹ Åu±äXŒ†ý¢N–ÏÈTˆŠJ• pÖÝüœcê3LÜ…¨þ‚6¦p’WÁT¾û‰jèq‘Ôß“-;gVöÒR$;ºw¼·»û/žû<¸ñÆðJÄIs-¨ŸÉoKè%.&H0GC¶µ&Aq"]JØ\ãé®'ÚŠOTaý¸©ŒÌ5«q´²Î}'ë¤4» ͹þÙ…ÊÒ H-©­SuvÛ6MÑVò¡PìÉ’Õ<Šµ$±Ýn»š–}¯ýA:‚aÖ {ê²Ìó=&zï'=’·"–@å)k^xzlÊ:,{…ÇS Ø<$¥?õ‚ W“Ôy˵/h%"QiGr‘*„Ç0æ©æ§£æ¥‚Øä‚2ׄCaK¨Üz&ttJÐBßlW \‘ÃÖÜLoáú¾KºJr0@RÞ#ƒ©ê  >×T_ЈôÚy7Î×5E„Yë°?8è^ߟ]Ú„^ç#"³š¨þgt)òõ³öÔ3¹ßåÎ#FYã«qUˆ›6èçsb‡[å2}EíÊT{¤‹8søîó™&7–$6/ =ÇÈÈàÍž.ÝÀ’‘¹>¡êâB×4+‡nû#“Ùá•£¯S‹(Eä–BMÃ)½…Å´ÛV¸vVp©m>»+o¶ÍX•”Pdµ×yMR)K0²ãU]³pwâùzà²ÌK²?}m¨ñÂç‡â·º ñ³>ô¿á‘ÞLZÚ¢>ø Fù‚(M¼Mã ¾§g’‘ iB¸&d`ø` Ž¢ .^QtrÇÔdyÐqK\ƒ d­|ø¤dœ–GŒ8u~°ôä%|6N7ØVO³yÔt4¾ü˜´ãoä2+ˬ'añ*¶`6f¤ùîeIL2à³Ê¢51שÊHpˆ7_qàEXuÌBr±&ZMeb9ŽØ,‘µæù½€|ä×êOõ1ËN" ó~¸cìÖ)Âñ8å .ÕK.m3.›ÁIÀ-)ýkšöh…qÇ=ðX‹!"êšHâ06_…N‚Š^jTô‚y± T&-¼„Éjtßæ:¢€'¼ÊµT‹g­[h¦ýÚm@MZÁ]-jùÏèúža¥$ê]÷”Ñd,œ^'A ›YÖ4ì]H6©½„xÏXT­¯{ÞÛÛ }8ž¯ þK!O»uáÂòŽÊ8QÍ):9ÿööªNH4¡ nòŽÛë ³…–ËkðˆXI>cs,¯ áÖLè7ðA)«ÛfÖ1BZ—Ä´’8"Æua5U#¨”’Ô¦6²Ñr;E9JæƒÝÚÿ;M…øTn›Mù£ˆ)„[J÷¨GLèc ¿ "TU“ ’õ"ä’J™B\20'˜±YìâHÈO¸–)a|KǼ ˜²Ù‹+r( ‡BU ©Ê¦üK)”QŸ¦S¦2[àÞؘP:ê \Þ欿,ÙXˆšlTÎñÊX¦…¤·¥Ýî\¬v0 n^;¢Ú ‚ÍG÷Í µ® ß”R\†HÌ„Ø6¡F£Ð]b®7‚–¶Ý¢tϧ­×ddp¼Æ‡;G°piî£WÞŽ[X‡ïA—jFXtçÂÆd›ŠÙšJpÄHŽÔÂmœH™ƒ`å £L-zË\¨áóPRâ7ìÞy"Qq¿ ¨ ô"·{þ晨d‡5HJºbûhâ6vÿ¢ÿaøÓá;¥_Ò{‹úýÔҥ؋sTù½.é °°¾ -‚͆rN®…÷<¥´UØóËôýÚ:‹x˜‘EÈ* "BªÒk®MNÉþÕÓÈrÝ&û¨§(çm®§Ð,,P mÔص0 )×€X˜j U‡e'Ø2}[@jÛ¹*S­ ÎÁ[ŒL!L¸zèuà2ã/ƒ×´©®¨L8síÇÖÆäÃ÷½¥¼èfn}­ykÒ1.¾W]W0‡‡Îí¢*ÂaLDÅ_ÌÐ`8¯óô—ÂP†,k[s.C/ù¶Û?­»òçÿˆ°Øhœ9‡6Üÿå’%…˜•:ÁÁ‚Pz‘︗µS=d`ùôM…Ä·(ð¼œð$Š¶Væk‹T+»Ž• ƒ€„~+dXbl%¢Q:0­jÒu»8—JÄâxÞ]Œ3eÊ‚Ü ·Qè^ª2€p3€©Q´øÈY‘ÜÇ“Í5¬ûRH¡ÚkÃk#Ñì·ßþ’SÖbªÄ¤:ÈÇœd>-çQñ6IMד¨²ÎŪ~<ÏÈ(•Q¬õŵ‹‰•l;7ÅPƒè45•m~º4â1”\ñIr|øðAM¬™eu/Î~€Éû€›åöÙ *—F³, ö•‚2ˆ7(9z1)–¦._™rŒ½>y °zB†\$”TîVŠYÛ|>mÒT¦S­î®ç+¶½ ·]$ÉäSÃb‘E¾tAdz>ÉÜÅþ–/Ö¦-öâmýöüÙyE„œj„¦v«ÌsŒöÌΡ BË5[0*Ï'͆#tç'I qäÔ®8=v@Ä,vÚŢČ(1Ì~q;¡8«‰!/‚“[r§ÖÎaû‘[oWží7¡ß&/Pf ÃìÚ@ÞuÎñØ]²¹éßZV^í?Ò]ÎÆŽåÌ5ëóÅÎCŽ®}‹:S •U˜;ÐŒqaŽ®r>‚|RÛèÜ)æ;Åycu¥ÙKN\PˆŽ?þËòþ±Ä8kè2T„b[n¼»l‹ú&¤U{üîîCÅl‚P,6 4¤‡`~ð”{íA‘¸`H¶%"z“’ãd¡ ä^äâsñëA¡Z¬X`C]’|·^_UÃEõ6”§rimˆ©*G £8]Q"Cj|“õÝ©Ź _­¨V§Pótµ‰¦·’Ùª ½Vȶmq#¦M]V•3½_|lJbr"B¤«ÅúòRAVse_®|n¬òÁq¯{1<<»Ú'ñ¨,š º\“–0ÕÕ‚± Ôܽ26¢f—%¯’‰Ø hÇú×Z2É'•ÝMš·õ鱸‡‹ÿ%svÏÒ¾m¶'¾ìÃùà#×…JÖóì+ÔĤû•?d†cØ´4êtd‡ÃåÀyŽ¬‚vý+•9©Ê‰.iýA¨Q—fv=aÐ…˜GÉÛÑlÌäÑcÃ$è MÓ¬âåKëSÐbÂÝILØúØêäÇ°˜M:"Ãè’Ó&aÖQzÑ2¼ísÀi.`#A ‘kô²èB®ïL›?™Ž°P®B{ž!üRîpÿäò~Y‰FˆÆsÇrMQáž„Oà¨.ÆÞ!”cYèÉópÃlУ­}©¤¬Á|$1$ Õ}Ö s?¨Þ›òË]!=SïñûÒ\Qeß ODï oUà.yb†é<°ðº²0DŠË/7L~áéÞÙÆ'Òµæ@Ôâ½sÍG!ÛéÎÞöK—œù|¹à.’{àþß5ù®ã{9‘Î9×—YkUæ•´v'•â«‡§gï‡ç½7½Ëƒ·ñ¨rö0Kßg·3 øñO…œøy\?DêᢒK6ÁH99“犄*c}- ":ªìÛR¡Ž ºŒêq¶Ì>ù‚¡hŠ”+’“¤ÇÞM½€;ÒññbIZÆvÓ‡¡+1ONä–;[pn÷£<¼[Ã}½$h‹XÊßgôÿ´wë«ï¨Ñ+÷«Ð;×jöÛ‚/I®kÚ' ØGñÞ`r¡¼zÈçK;Æ°šaúcf>h[Cì{aL"®_Ó;òKžÂiæƒÒªìw]Óɼ8°°“£þr;êTeó!¶!–§}¾ì}*–î…¬•å”\€ (L92‰¶ûsk*¸FŠ]’5bç¿££æw®Ó,Œ1DóèÙ¨¼NO³EÖïÔ'óÄ2(WÑ…Œ„à’ aqǪ†R뇇Ž=ÍB{‡È ÙWÀZèî5cP Vd¢H'þzXïs»ÌÁØRU«©v‡hK÷aqoçtd ^¶ë²Õ`2íŒ žX×–RŠE)\/îÀ±¼Ï”^AV6Ùlß'™"©ÆnÂ!ÌÓÉÕ)!Œ=Ö'7R{}ð©f»ï“VÉŠyšXo/³_ÚÇÊñËÏTð1,|ÊD&Â<÷5§¡¶¡¨¤~M²áÝxADóÄ2¦Tâ`R4 ÛëÙ}È”°Î£_‚{uƒ”H¡Ó³âÊPu¨ój¾‘ÃÍ9_>³Ydu{Öíi•1mßDñ@Ö縼ȫ +áÁùqÚHÝ( j‘´Z&Þxè²ö¨›'À8€åÁJÑœ sçz¨@`V¼§2ŠÕ’¨šÖ8ÉâÔ°(oåƒ[Ôü¬W3n0$A÷#¼¿ÝÔúydÍHÒÌ]]졯Ӥ⪵8bˆØ( Ù™Œ'Œ‡¸ãØ“:pLŠº5¢j'ñ#F2¼ïŸ:KÚè "UM/±©¼·-?†áô£ž–R·ÃhÉl´¯psrÁÎOc&·‹eÀe¥ hRiUùàb-”Íø™{ëþƒv‡¹}í¹™PùÇ_=½|FÚ¼åÑà´.cž¾v3_uø‰×¸…I;p47:§¢ÏkYè!¼=GÔ8ÃB¯9ä Mo$k˜öCã[¯--OJÿ^rÚÈÜ)F‡¬BJ>«¥*¥ð+÷± ý¨XÒè¿ä5ªf(ÃÔ‡äâ"hGƒI1¿e¥f'Ô¼±„M4KÖ=ˆGï,–øŸ´ÒoZbhcâb Õ­Dœ2I¬"2.ÎxvWï“Ò3ŸåÜîø£zéXG —W=‹ŒyãÒ˜^‚,xpªS§oúG©q÷öšg^X]/áÿ%Ófr'K¦Ð ói¬Áßu¡ìFgÅÎ;½ô‚Ôa*âÒPs‹&Ç\jžøÝL´Ý ??@ÇûÕË“}¢Ý¨ÊZJ^ Œ,#‹Æ,f1ƒ| ÓµÐl¦_H9/L†çõ¥fë½.6ñçÞ°É­Üï>–éE9^¸œÿ¶sAŽ:PË aÁX+ëeª#¨—5Œ‰nÓª'´’´2¡v¡ê‘%•XÐÒ™L\tHpÎaƒ³J=)Ž®™*?3*T¡a5”Ë”~Ân$ëÉœ}~D‹JÁ)½Ÿg9£¿„ÔJ!§i";]×ÂÌspåP)H5Qñ'ÇÈ…Æf«$¦±lDìÜ‚©ƒhqFžsÈ–Ry)–‰”üa D_Ì‚£¨‰i„!¹tšœÔné]q]p­n‰±uålÇ؃˜)á¶å„™‹mˆ0üYT\åAÉùg +ÓdLü5h8£ãlžF9×dªARnÁ~ Éûi÷ N¯Ž©ŽÁ4~ž;õ‡­¡ž¼î†Ä¼ÉQžAÊÐØYD*£UYzöÍiNE MNÙ”çWƒ·d—.{§—ÒkŠ¹}Ü,ne)ø>¢„ZdѶºU9øHW“Q™ÒN‚âF©“‚NíůQ™ÍÊ!KàØíƒ"Œª‚?~³Èa"rKø§ìcVç̯s»c±lÄ•.À8@˜ÂýQÆ7èÊ¥±Ær~XŽÇõê(iûTwxæÜÿN3hl Í‹§Õ¶ÈíU×'|i´xîòI `v÷£Têô>œ­¨‘M)>fÃlQ›(¤ò/#¬d­!µž/fK­­O{=ÄÅp Ÿwa暪+ ë,r[œ-/Äá°áäà w…D½FŒß̃½38hB­«dzè9>)i]šá™¾U÷ (‰â¨â½4RA~T1<}à”¨ƒ4ñô>5«þ«^ùºÝvc5o;²ÒPöì¾z™øe!êÚÒˆ%ðŽ4£$ ìñµà?-6íe¡ø»š¥‘\® ÃŒ1ZTÛ6A„Æe ò㜃— ¢UyÅîµ^8áÓsÇ¡ÔΧa¢È-y7­¨ãP¬ (:íþFãûGîÖ°9Po œÎ‰ž”Zf¥G¥ð[Í<9ÏXéðuÎÕ¢¤z¶ýTä°P)Uâ2êq3==t¯Vˆ#cÈ$fÎh£éb91\iI2´¼NÅVmûDhmmsÕ—¤éÞóÄ!W‹!<þ˜9“xë¤Ý@Ès¡ÓI0›Fg›æÔ/(0~wîk þȼ!:̪ºú<¨oúi»®qIÎk‘…~à•NÀ+MówdEžyµb1EæŒV b‘‘°3mâ‰p lâ±AŒxc¨|UÔVàIã ïÒº’¸»gùà®õI)Þ'ü4׶]|1 ¥,  ß©FÂù$3È‚h~¿7"€­Çòž\SDš~3Oô,²“˜W#ØÊåË“*ü„ÛVGÂl•OÒAN£seÂFb2çV¿>jaÄs~@*x<}äwˆ¥˜d2@)ÿ¬“ µ°üå?Ò½üqgowçÅn Ê©’×úZc¸3RX$ܽHB÷‚ŒÁEIÊÒoÝ…Þ×Á¥\î‚øóQ88»º8èé$HkbLGS:T{©ÀOóx%Gºîh±*‹}nOÕ›hñý g2h r!‘Ïßö®.úƒËþÁ^Mh¢“”yuM¥ÒÅ: Ç—‡YÿœÓÕ†ê­Êa¯>¼Hf<`Í1·8o&Ù½©‘aÒ Ãä ʺ3·Ÿgé‘Kli¼ò¼•ˆ›¿>•Ë¥û‘³…}}°¤p¼{qòLæõÌÏ Dß½-*zêl­à¢MY¼Éâ ¶ÊE`2Yæ\§ñVN]z<;‘:I넲=Ð9ð´`ØŸùRÙƼ‘`ò‡9Oyðx$so`xÌTU9Br–؃<0œ+…#>@]²2>–×+ŠJÁÜþR@|!-©ÄÌó˜XÅ9)€ÒÄš[C½ ¯¦û™¯2*üúg1ÿÐ) ¢KÃœ§A‘ó._- ñÆÃA˜¥ÊùG4wæÒ@’]ªcTc(¬PWI 51W¦û\m­DÏë1z›M¦Eê=„Ï åŒLÚsZkwÌ“ZK0û¶±áJ™] ™ìS»n<_ˆñÜýQnZ˜w"rDþ½ìì}Çß4¤³XÿÄFìßðs² ò›_AöåŠÆ <¾“(] øÌ‚ÏØ‚òç,HkßîÎ!‹[õºï(ÿ©ûs—䮺Çýë^öÏN·å'ë ÏN‡‡½“îé¡ÈعAÍÇœ Ñý˜}yM9¬¢C2¯†Í”Šî}*P‰¨W–„õ* gY¥J!/³€õÒò™3ƒJ” é®×_#-«õ–1óâ­m¥£ŸU¼JóDÉ|®Ëyý}>×÷ùýÎóQëClÒÚ€s¢S˜þIFñ¸©ó–´mÚ ïÀÞ¥)«uœ§'˜D¿nwâ\ë¡ûƒËñÝìéݼR×¾iuîau^äLô݇EÝõœyÍNú¡WtݸÀ "+™ÑM@ÒF •CI|ÆÔ^@é„"®ÉÔSN%d™úÞ)ðU‡Zx^ôÍHªVKíéËp>9ó€)—h3‰WF u|‰0u•K`ø"lLQ<'2aFCfù¸\‡ui…¾~5Ôô;}ˆåH©_ɉY“ËŽ©%Gä© 1«TUì R( „…Ur™jõ2“ÙïßTôˆ6ÚI6:¤[¤OÎcþÕV¤iÑÖxPü˜fì3„(jô˜/\Ôì×pÙ ?„9SÍX-wÊ›µArFw€×®¬×,8ÄÕÒ®<0­Ø¶žÞ¤ö”hj²k°°¨ µ2»QÝ˳KÂày´zù¼ó½ÕæÑ"¨e¶dzûÑÏÀZfV‰÷³ÀaÌÀ-K·ë~eOýŠKE¾¯ñ–_ [qš3Ì@…˜î»“‘åu« 6ƒèž X*Ô„(Æšv\ªæž>=îdŠ ô )BÏÿ°@Š˜-™Aö]˜zª:¸¤îwÝ»ó¾>肦dz˜¢;!/"•‡4ÊYto|iÄðµ×ùï×s°_]0:µnýGxûq0Ö$70¸úmÉÞ÷èÕ¨6{“›÷DYÌÌدŸ€´SºuKë­6@ÝØRÐeõh’SL)Œ•h›É ÇÓå@Äa[œœô-§ó!·“xnNs6n›Œ¹Ký£¬X¤ ’F6¸E[Ÿ¦Ï¶4뤾RÎõÁÁËÎî¶;:·bbøö œËáël®x°²,Ôb™Xîôj]Óú²˜:7ø˜žvÒÓü¡ºË¦m† ð Ú‰âÊ@¨¸Àçœæ¸eOÖ–GÜ«çTïYÅd'”avu€xÆâ–¤¸a;ñiÈ)u´v>‰Ñž“ZxÈ}Ò°a”œš<éE>§1uÈ‹q)s(ãùBûÂ|’Ôfh˜‰åœüànu}Í9x‘ÝÎÊ*âf¸ŠÆQÓQ±­¦ÊlÕv€ |Å Ë=çrE1£ÙÉø¡9c¼Š “ÝżËg¿’¸ýe¶âI©D4xueêêQT:3e2 Dì0"`÷0¥$Çý.m¤þãŒ#wt·ì§I´F×zdk°$º~Ž'¥û#JXQˆ`Û Ü‚ÐžáA`’ÌÛØqeNg“溪˜>î|ñ†yÈ ")-oY”PˆÜ3ãj|¾¢õÄxJé.Ök¬œHò!õyX1—‡á ;,wŸÂy}Ëò³w.ý–ŸŽ´0¬!GÖ{&ÌÕÝú™ëYꖦŀ°X/ìÖ" ¤ný¸KÍ—fj–¯:·¬1©^øv2gΈęèçÛÅûiÆ ãþ¨WÉg彂êéW²Ãøä3aF‹ËÄ,má‘"D¥ ¹ ëS›Ë¡•ÿ-¯‰S ÕãtîVuñ.srÞt¥‘Ÿ³í©5åé¿®r’MayœÃ¢™i…zƒö’‰Í—*ÿËõ ÿÄ#}Ï]p«­ ¥žÔ™©ÁÙq÷¢?ðž§óv“u¼p8JLRÀÄÑQË÷:Yaßlbö roJð%ðÊ_¨Œ®PåêÔGMÂÞüyg¯óá3QHìØ`ÙV?RX¯z*ÝE°CPû©C²“´œ z¼—{½ø‡œDzÛÚKk$h´_‹ ¹Ÿ +ª„!!òÄsb­fFæÌ _ Ý9”<ˆíS†÷ŒÓØwúGíü•«Û»¿kò7Í݃õú«FêƒÀûÌÇðmz64`ñ*T”MßÓãXLÜ»ÀþÙ·-ööÂÜ+Æ•âú·SË™B‹^½Ü¡àŸvmôU=!DDÒe‰˜[ ™¬ò“ŸByŠ«~pJïë·eÀ”ü“Õ’sñ\‘õ”B9·Â êªJ÷c6̸,¾Vu’˜zµN÷îa¬¢ç¢ÛÆ@O"t}+`[G³¨ïE°î&™g0JG^÷ »éµ­zfË'$@¹øãBÞÑ°Z¹ð楱©æjÝucBI¼š ^F³žM XÏA@æ€0Ne0É“ÔÇßf ّ½ˆãê–‹XoéÍbËFp¼5.01lÂÃ÷AGV±FÄ‚÷ªX1˜³Xr¨WÚ€ÂßPÂJ—ÞÌLœ ÌÑÅ[Bß8F3°j©H´ºýíÙ ¹¥4Ûe¬ûê¦ –n%Fƽ!µ¼‚Q'j¶ëU¶YBÐTÄè„'Ëå )Õ†$m(SHŽyî¥Ê‡ òÙˆ I¿oª '0ÆøI‘³èê ¸NU1žõµW^ÞÜ ­z d´–+”yÆa`œ•¼¶>.þœÓF`Qy¸º^ÜúA®ø¨5La‰e=ÏÁj ô#jã¸ß‰{/-ÜYz«¸„§ˆHHñg(ïÜÆä+†<.úúª_oçsئ¿ÙºÔ7žq­ÍìŠ úìÚó¯u¾Z.kŒ42>˜déáñ±XŸ×†££èøsGëŽf[ŠÐt»~xe~â~q^¬¦Ùb™i§ãY@ìZ2áâ$dQ餪”œ•“?½3CŽî‘'û öW‹¥!±ý9™¥Fqƒ&¿¯¹þµ`y\Š“ÎfFÍ…?8c jE9Xñ°»Ð‚À ã1³Sê'ó ŠÓòzLÀ›l1ý¦2ìðž­F’æþ%r[è±tì­±€›ÊúØ–k¹Pû d[¸ÑÓZ¾}ÑnÀÝpQ¸Y‡,YSå0'H]{ ³\ ÏÿF‰È¹¸ì›õ(D7³ôœãÔÜÆË– Æ1æ<À´Ô°\8gJ-é¡ÈÀ”öSQzGð^Œµ£›0¼Æ/džª4ŒÒ¶ô½‚NŠ¡õ…Ŭ¶b|ñÉùÅÙ%0ý|¸ß€XP¦[1‡ä1Ü«¬\Ha[Ý'É8 š¥W“å"㢠@ ½€ïÚÉXæ¡Å—x^› YBžˆŠG‹B˜é€ ”»tµÎÔåö>Í!L™9mœ¸ú‚uËÒÿy;w[hù@ 1Ëp~ŽÏ%n@¡Z\¯µÄÜtP,U8bkœoñ@hxKÒDž6°>.˜ \!™EÝËh p´ŽÃÌ'£c§´FU¢û›5(²æJ˜%TR¬ªΠ%<•„õ +„yô¹¶4ÆE5ZUUP­3ØͧËçb?­:ü_pPö…ÏTTÏ墡ˆ ê*Ø ™Îõ¸^aœõ±£¤)BÝç²éÙ€*{Ì#B9“å„!=âö0½MÛÕ ÁŠÆàz—‘„£du‡:¸?TŸʽµ»+°´q‘Ç&™ã]Qò»¡¼2ÓFŸ"4¦ð$6Ï9sbÎe„ìëÝbH¥I1˜¨“ødΛ„d]šÏ RÖEaé6xF Æ»r’'B[A)‘0;=ö>ô®.{ÃóÞÅI0èŸZ9¨&þ.‹JʵÁ[ó`?#[q÷û;Šlùïú1%Ú:¡GÐ fãCrY«²–yº ‹Öe4zÑ”ª³Þ„ÛHظ|J>¢­×:HÛŒù°uá™ËŠ.Ýþ_zœum4Âe$ "ñŽ{ûrD?ƹ×ã&°¥‰á]ÈÑâ^ú_Úæ﹋YÜ.¸xt1‚ tPB äàµ(ꃾcrÔ‘¦É7Ñ¢7£„]Kw:Îî&É‹ïwwœû$:{ÞÞO(ÛaÞ:!jšžIÈù`‘¸¢#³™5æ+¥L2uç$K›éõ ‹WÄáV죻úåo$Òà.!˜(øDoÕ{v$&±&sš@ãüc>)çup~c•Œ§Ä"ÑiŒ~§Z>ÂïÌ‚ª½÷1QSC͸Ub—áix¬ªFzð&V§À·æûìù2}ÎÞ{qÇ™žÕ.7l…Z^Ú)1%k‘OÒ‹NzDñën‘ÔÐåj!BŽÑP0ÖËô…*­ÛØt÷²$„ ›ÐeíˆÝÀ“†…òŸ¾q Îô縉–<½’ÚÑL¹8R½Ú˜Æ¦&ŒyŸ›ÚÛ¼­ÄYuÇDÌéb­Éõ§§{ÎÓ5%·ðÕ@x®µQ§Ê\Å;Z÷A‘u( n€qKæˉ7 —¾SI‰5kË‚kˆgy¤Ž‚VLY‡–Ëuî^ÓL„»“âC‘•÷«™óù«HssóçݽðT\h#[rpylzŒ¾5xHÚOÇZ,×IN¨gµÃ—Él*Tz Ùéj©Øó|ÈÜÁ®µ ¼0S$Q‚yhVMò,÷Aá³zz&Ouáj-¢v±@»pÖÊFQ¯¯nºj羋ЋÅ IÄÎ+iÑ­©(‡”ö-˜I¢¦HVz1,¦›Ü׸J³&‡,zwùBóè½=Ò_©>ÜÔÎkÎßEŽÑ4¿š'yIÆ Ý1¼5Êpeдê„_¹Mâ‘j´õ¬¨¾Éó?èp¢gS8øÑ\ës¯³½ðï`!}á.¸ùlü¨âÞ“q†b«G¸£ƒ„æ/‰ù_'©¬„X_úË^ Ï™4A¹ˆQÜn.—“\M"Š JMáÇ88Å5ƒ¦K³²I$WS‹›ñ¤ŸrLJ¤c<éPÅ=ö„¹¹Ý6º]‘AhA¿ŠÃÓ󃋶ª)|Ygw õ¦¥éF¥1ãròLƒ–Fb»ÁyÒºpâ»í(¶^oᢆq!š"ËCAÖ·šGJ4Â9æŸÒDT]`“«* Òs?×pƒúë ÷#šœõ-‰F(2^\ÈéâHÁ(Ìв®9"—*ßëôs•p_^½&%Éõ¼à³NÉ˼݂¸C”)"«‰€µ+«“ž˜˜ÓÓÏX¾m8úóŸ½ô —1¡3ˆI¨Ä„¡­‘Ý–Álü€øYžç»5¨e–nq¸·Ü☙µR ùÄÓw›FÖ&P• ôXu¹2 ߇KØ‹§6k* :áàmïàÝàê$¢{£"ñ€zƒ\1@ˆFe7ý<‘Õ¢”ðqÆÜοIá¼nÈ6z`&ó•ÁcžU(g;TtØÑþf@b~ÎRnÄMÔÚ*¬…G›M¦¬‚÷¯6òHvÛ•BàË)Á¿ o`÷Lj‹mÝÛNòbQÜÒ}±šüVh Šx‘#h)í,G}%! »Ý/L„ `Šu™øoþö·oª#Ã5‰:ŠD¥néŽð&('K0(Y¡2­æ,Ws­`™¨µ››J¡©°®"ÃddýDºÒÀ¸vZ Éèn5»¯T´eÿxxÜ?é_¦qÎÆ¿®¸ûìBÇ}/Okoh‘WsjÊ€ÚÈ1\KªVÙjB5÷¢ ¬ ý|¹ –à}õL¦@|éÛä.²WMuÈæÇü_6] S7!¹ã–û¯ÓyPgæcáCÆF…)eÕæAk¢U¤UŠs;ôÊ„ŸôËùø Ô‰d²±0µ69<<ãĵnøOh !}ëâ´ÂB¶ŒQâ¡ÚBÅŸÒœ­ùDjúL>ÍÉL¤[ά|úôi+ w@îl åÙÆUNÙ|Š*<K©õšÓ®›U^Ù5jWKo Ü=É ïsŽÉh³ºï´èCgŸ…ˤû5FgÙ‰œ¾G"zééÙÅI÷X&«ƒ´}÷ðÊÖÃîå°wz˜¨rFËÜé÷NOz§—0à$!í2ô3ÖÃní왚\Ç#–'[ç±¢ù ϯŸy)K LžŸ€UD€ÍŽ‰ó©lÉi ¨˜é-r›4Ä[áçÍ8AöÒ4òMŸEc–ɇÌvë‚\¦]`aFömä‹ ¯Ä9WR©* ±Ý=~¬–óû$uȼ„ñ:„…B¦A£÷,3Kˆu³/iè^Z8ZÙj†@îÍ]10åâ6›‰÷÷ï‹›I9Ÿ?n…¨ø;‰Év_íìÅÊx(åsÏ ¸[šåDS…­SF.Ñý“KÞÑZÇçjg€’CãºÇço»ÏÎožímìeØʥ˕± öI%%“*?²MÚ¶qÝ´¾i‹;âÔD§:ÛêýÅjV:›C&>ö„•E¥M]›Td±SÎÌ¢ÈÞ9K’D=' êÌ^»á/2Èókµbõ¼_›0¬œõ†úö¬©ba±U­f–<(–“‚Š«ôc—U "5±U[#PiÒ‰ˆ„®#%”åÃÌäû/Õ·<—îàdȺÚg‡¬ªmå½4FáöurÞõ/¿®Læó4Ì&…çç¢Éçf¬ºLEŽ'ón%j¶¹}¿¤Fá¢-¢cq Òp„Å×ñð9ƒÉÜ‘ÛOžJKÝ-JÉ3z/sx½#­š)^É“p9—;‘¨ñ36ˆŠrÄØ Lo«ðê$NLn¯|QÀýø$ßG/‰F/Ì©D㥾Éág@p—‚ßHL„@ E¥$gìi=(ªÂhgÒ²2{&P°Z8ZÈ\eB²Ì=˜RĬ4$ͼ úÏÅ‚ºHÿº¢ÀÑQ—M¬D Lé@ ŒsÄÎý¸4€aTÆç}¥kåã¬H·Ö£*Úð½Ê—`¤¤sXש«©O‹©–’W{%ÿ$áÌÔÿ%¹¶’AJA˜ía–Q±ç5¸s8_i¯¸ÜIêxHER&2¨–¹¯ÒØ×£ge"Ó™@gs\)à˜$-•;a¦Tm°$”~jAD­{VÛԄ4ØÿjÝÒºXäÿa¢ EèÔG/°{É´{ €“Y߈멼å» ›(|,JÐý[®¡PÅÕܺw•57…[h:”0Ò9ÔfÄâ-8>WÈŒqAÙ»¤ž©PÝ0|'ÅTÿ”ªêÒг†?9q{;£9;çE £C+/I‹j”äY€çF¿’ÙrçŽF"|³ä Õ#ë ±8ïGÅ=-´ÖkÁÖ>“²ƒhx$þQ/ÝÅ…‘“Rïe§9»\æ'‘xa*¬M‰€r Ù)}î‰VÜ;PVAƒá²q·mèZœŒé²Ú‚—)fÒ/j¶鈒•™ý$\GµšVqÃ-i­Z=ˆs2ƒÑKC—¿EéZ©˜"Â÷Ý‹S± #tT7F'³“ðwƒ<¶0Ç–vÕÝ ÑpѬ„"¨á±Sý–ЈÈÿlgz›«#‚hw'&>uwXçS-³‹ ×\æÕ=øL‹[Êþïªæ:¾c9¢wx$õìDúŞ£EùÈSÎÎE²²ôXêÊ`2%M¯ðzʽ0¦DœýÖnèÛSQÿÊ:áî,PÇzá]…"1ÝG³ÊêzñŹEt±XRh§Õ¢ìÆ‹óŒ .&Q“ú Z—»«S»Uào- Öˆ/ È_ àô:T"LŽåËŽ)c§ÀSý¡|)>ˆœHb‰O3‘PÏLŠ6•ÄˆA6ÎÏS~‰ó‰_D„ª‡QðÑY)í‰r)WÉœü̔݀ÄE}~“]#Ó ›–%ÃæF€+ÿ&Øí&"i`#Ó?¤.'9(Iô໽DÇgÌZ=-¯W«û"}[Ü»e[P™jPÞ,(ò»pî'[8“Ù­ªòÕ¶Û´£Î¶ bæ‘*ùÛó!‰­½(+Ž‘–74rãQU‹}Ü®¦J¥Us4Í'éì%è@ƒf7–£šg¨&å¿(,q–Fº¶írç²hSu!YÛSS½€Åƒå0E}vÄßÎùåÅ°{x¸­ÿ<¸<»èm§ùÒ¹uŠ€9q„p9Ìý³Êðu Ÿ¸_ Ë 6+Úüq‚ I(®ê«ZÄÒgñŒœ?âê‘¿Þ*h)pI“F÷w¨ZUöú–L( <´¶Zs=’èë¨bk…Nº¯}d£¡Gl7aŽÒ½º&_p Aˆšv’ƒ “ÊúXH½@_—!}j‘Yjc!>ÂeãƒË ÊçÅG`ª<žþ#vîEP…ÜN"]w©Aæy]< ÑÜŒ9.´€HŸµ³·`êËOiúÝÔQ˜úÿ‹ü$~þ€^¼BÑô…ÖÃ"îlNÓý¬XŒwS÷L,²W¦ÙúÇé¡ ‰*ÔÑýû³Ó`¾ôüuãDØ[˜O‰yÎÉ8Q,N\I<¶%fÆ”‚’e&Bûqàkc~¬ñcÜÒæ¹:=|')iÁ“beiJù™ÔùE ŠË‡n)N2RÚÊó "3`¶ü|%ÏWyS_YÆÝôyçƒ(ËH£/‘R¬ ß0KH³)q z;‘Š(×$'A"êGíAQ+ )ÄF}»’‰ÌI'CÊB:m{Ël1s—kD•Ê òa© 1øö…¸;¢Fð äî\²;5¥93ɘ¸$ BNýî4#8u¦kѲȭ‘åµ³ƒK¦OBŠ<«æňPbîö.‘f}ÂÓB EþmÊSO=yt¢eÄ‹6Iç.K°Ö-Â’²G}ˆÜ~A5—¤†”K f†Ûa¢oþDÓ5ÝÙ²$“1a{ÜAÊÕb3¡ sÕºÃ?G0‚Nq´¥mz‚AÛæ†ë…™?<"®…zºï2Øn'=É+ªò-Œeˆ¢y^‹š|8בóŒF ²LeظU9‚ÌaT=Ó.m8*áD'ÀÈWN2,âÛFeÕ—‚x"ªÔÜA²¡‹ÀJ!³†ÈÉÁYcNéUw1+'cɯÂÈÜ"×Ö*¼¬Òüø¸òt±È¢uI‹LÅ»ÞQ@oe1î1Ã<¦-ºØ.dƒpb:zT«A P°8¬(×8ªšJAc‚Œƒ»7ÝËÄÔvíÁÝ-è§oÈÝN³˜ Ê4×mgC]€W¨Ñ¼‹‹}áÁ&YUgú 5‘çR!vs­‰œ¨õAï3ðªC¬A<ñF«¿ŒG B/IÀó@åˆz ›ÓÙ^JëPª§éßjåvÕll“xJIhÜŒh™ ü…;Ü¡×ãËå%˜„ö±üÐL¾‚˜/‰ç_ÝB|Ô£\*Qb• 6ÄÍbš¨O$æ)qû…ºçÜzd¬ª´8%¨Uˆ™×³88¿J;$Wá>&CÔ«‚"«mnm(¿¯™ƒNÂŒLPÏ ½),1`s]o#Ð6ªÒ°¯VÅ5Î’4W¹fówûç?³©&*ùF­)èŅõ¢Á òê%^{<ßH®Äüt-G{7!ÚІAòbÆU™$ÆÏ@ ÙÔ6òßÔѤlÈ36µin¯…Uñðc¯K!9miï®U÷|»Öž~FÓé:νHߺÔt¥BX¦ô|èÖΗVŸ‘z¢:TÄLéü&ÌŸ¶G×»÷êB’Q¾ÖhñÊ5Ü=[TËäÕËw¨½‹§gZÜjq;È|•5Iϵ3Ö4É“Í2…¨¦Þž ° ØþWç;Þvbu>*Q²9wÍI? ¦æô»õI“x…Æ‚„K³u¹Ô}•»1“=-r3Ѐ˜/ŒêEÔuÝÖ|ý¥28ÅIG¦³]hIùº['9éþ’î_NïɱŸ¥ÇýÞéå€Í° YWSŠS '=ü%‡¬×Pº&a  5sçþ$ŒwkÍqzDªÌ¬çµñ7´<#˜êxð+ñ£´ËbÈk)$oHѹ½ÍìóM=‰ÕìšÜ_­&uOˆŠz#ÄåÚ¥jÚ]YŸsÛ‹ÁY Àª=çìÌõFÆ¥ããg‚°¹±èÌ‚¡X+Z¼t¯3ß©˜;Ý««~ÄqzQ^§o³L4HÅ+“… ¥ä#E —†å”†(2^gcë\™µ p çáš ¾y¦jO;bHwÌÓÄCÀ„BIŠÔ©¯ AÌ@;Ì«ÖÓEÎ"Ô–Zj¼1yš×‚zÚn mdö$@£ê§!âœïÜi®óe¸oyÚÜÄÐæ¡pQ-•L 7«v¾½a8×)·‹éûH‚51laÂ<Ä"\0œžåbÚÌC}¢+_ßÒSV¹Âì£L#aŽÉ8(6Yh;“ºaÎ*ç¼¥áNa=g£éœíö§Ê•Ib4Ï Õ7>0õ M °ºaA-˜>wÒžÙ!êåxy¬£¬ÒƒA¾tÌÏ{Ý„8@¦äz[›ËõþZG9çI·\ h°ç»êªÝ¿æmQ£žåÈ¢Ö¥ðF%º¦åèm'œ…µÙëoíXÛ W&‰gQAÏ2°œ—`~d‚Å£|ã½?ºô óXq\<áˆõb¹÷Ž†|†%th-Vã[©¸ ;[ÁhŸéjɘYæ ¨Fù ºm­}$&Û•J¼d3àB“— ‰0óD%EµYÌÒ 6)‰°æüÀOE@ÜÓ]"©¤„q,H[0—DCP"äîþQþ©¨–:Dÿþj¸"Ò0va~lG2í¿ÐY-µÃÈAÚ´ÁÉ´@YpN÷qAà»8HcOà)R8n¢Ú²Ã„D¹œ'åFVrYLÓ}w±4ÚìžÄaï *ˆZ½IpxS>¼›‹³pÿšO°˜¬f…°AJm˜¸ÂÜoÅ5ti-&¡UhFƒa5i|ä‰~úLö–D ;Rá£0ËgaTU‚ñŒm›8C"H®‡b·tr[qªé¡h?f"¨HÌH­«à¡`|°. Å1ëdJ ‡lB1Ö÷ys³ÈÓ·ÕÊK!½²Š—Poÿ. Ö†t¡AaÁÇÑØŒëTlP#AX«Œ:ëŽàOâUæßå¢õ¦öJ/l/Ì Þ¬GÃÆÕJž|S¢-%²dªœ¸ö¡Æ’’Ú¬ª=טàa!˜YF‚Q’Þ‡3¶ÄCÎ}HZ“nñ}dˈ›ù˜:-ðÆÎ3š6ƙְ x¤¡É¹þàcÁ—„ç„É{ý¬4š &YÒ‚º¸êyNŠ^ÞïPÖæ‡Nôˆò¥éŸpŸÜ=>zìtl\ €~úè`Ýûª^C4Fo•ãE ÒP©Îáú„”èox.Šz^xœ„Ò¤ú†3U’~-Œ‚é:z%– £| º`)1âIE¨"ý7Þî¿ôÿ­—þáo±@¸Õ«c ij Œl[)¬•TÛ Éá/§Ý“þÁðø¬{Ø?=¢¸Ó„k_ð» èØÕƒÐd„=wf°Ïè^€¼góeÅ+—;±ª¬×i¶E‘U[îáêLæÞHÕf|?%; ñ3OEÍ-¬ítV}~ƒ¬·AbF:‡ÃP¼épƒ•³ÕHÒ“Ë5*)½ù™ý´ ¬À:NH›²˜%.icŸ…qjqÿöÃ;þ„»Dr,Kà—¬Q‡Î|ºLP0R‰}MxŒ ß…¶cbÍïÐáÚSF©—S&]ªœˆØ{[lÇ·üΗΠïÿÏÅçø»fµ.øKèe<ÕÀˆìÞIéÞ…ËÁÓh"RÁ°®xðüÁö[ïç3«ø‚& cƹ†Q^P¦{@ºÒ2¡<ïAüõM¼Ë?¼R]Å1×:ÿlÛê]’v?EÐ ÈÁ^`>CoE;`Is˜Ú’Š5æ7!-OH5óDïƒÝ]eµ£.‰Ç9Ô'óOsç(]ªã›Û'ÒËÑj¡àU]Œ² ÑÊÙ˜‚Ý7ÝÁåÕéñÙÁ»H›sX-W××åbÆ;à¹vɳ„!à!Õ|Q9r'NÈÊ·¸ÞÅC_×ë—uÀàÓêqz]Nì¼È“‹„̇°vÝÖ ™hU‚óé9ù¸ñÛt —#üD‡!_Íxöjlã¶!ì7£ ˆ ~"^•ÏóQlK/öG§ù‡Kó›Ë;Té›ÕìžÂûˆ-Ž)øsî­‡c¹(HÓ:ÌþÐ-Él1qqhÉTD¨¬ëâ¥ñç\\/:¢½PšÒ9Au7[ Б8"½ð“ìÙ5ù8s¸Cô%IÃR¸9ˆ@÷Q‹h‘ŠãbÊÅž™òÕò&d!‚'%ûÉpóêãÅ ²ñ¥¾jâ;Õ£ÔÿŒˆ>ª=5:ݵÐÛx-` í²`#'¨Äßa HÖðÈ°/^†Í‚[ckž3ÒZ½ÏvíêÎW‘ÚáÖqž[öp"{øÎa¾œä7U}ÓÀürË3^^ã¦\DÝãè-ÉM¤‘Šq&’½F~¸Ú>í7Çp­Xä±”vW U§×ØÚæå¤@Áê˜êŸ2¼CCn¦³Îðo̼ýS¢c®”™òQÂÎ }.#îI!\0~a›AL´¹‡¥$ôZ;©ÒóÒS5S•¸æ媑 ÷x¿&<µ¯wP#¿[ËQ¬à¦ÑÕôÓÿ)[c¹éµ$h3œ´é\×%q«Lˆ[‰Uñ°Š³ô/w|¥ìa8Ò›þéáð¸×}¶ù.osvßlP,ølCR€¢7ïøpÏ%Q~AÍç߉ÎÍó´úÑЦòlºù§bÙÚ ¨Ÿ‘¡!Ÿ‡b•f ù˶Àâ4åþ~´ì¥œ#Õ4ªû8qžã‡P=•]VR({ŠR˜›+?v>ÁÖŸT2 —F¢>ÙÖe$„ñ89«fŒàÌ™C„,‹òlÍn«&–)c§LT9»—è‘À  Oü¥¾¤=œöE!ÈØcÏ:gò± 0@™%÷³òz›P—מq¿gBˆÿm#Ȇ^¦Ÿ>¢ é/ ‰Ø4ËÚƒž6&}ÑÞFâ1Ý{þ!÷)öäÎ&H:׉ÌÊ€>2¦&éìŒ"æ ö¥/%í‘Þë$ŸÝzæ<6Ò”Ê17®j#Þ4ém{…ñ5otM²‰°0‰ïkÅKGOËÈ$›|eÑrô•3Ȥ½å×ÌÐèR€ äžh|Ñ·^ºwߊ ¹{oû *LçMܨR:À´x`k€©>RŸGy{ê‡í$ídAïôE%œK/;{½«=®n)q²ø Š»©WÜCB¦«ed;ûì?Í’~ñ¨\¸º¡9À˜ä¥¾FŸ#-–ø¹K阑sì ¨+»íƒÁÀKì[Š ÅóA×#w[~´¼ò:碚H¥­¦|³¢ƒ±=2x`MSLëÎNHÍFȤCšW#Œ«;1¥„³´±²(1_JD3"ofMWŽ‹¼XUÁ ¦—zµ;€<Ü š±0¥ì÷bm|»ÉØ/))]ÂÑYL¤ë‘DÓ€:´—•*á=Y¨:&±y¥ îÏTJ zpv:µØˆ^TŠùjh— ŒeoëWöìH…ï¸5÷H=e¾g4Å€ š›šØG”;¶2Ôó¹.\ófG®šO¶!ÿ»1I–úœi’8ØSô!É Q‘ô&nó oîh4¹ „¨‰¼ðüS¾‚ÊŠÍ7á+ æ¬à*l½Ú±*½Í®Í@ÞBiQªk['8FijýQ… r´¬@¨%j„Dº[ùÝðʤR&s5%%ê½Ïw_þ7Ðÿóˆ: o½"ʘ,inÄzÌ5EPjo•<3÷ƒˆY(k7”Óqµ(?xvq™èx£ŠÆ´bæ9 y\¢’0ü̪ÀÛI|† Ò D!“BÊ¿ÝÖA-Ž…U„sIqÛ;}Sûò¢Q]wÉÑwéûþåÛ³«KÜÂΙ\íÓ÷4·íþg Væ7F§[(]UÀ™ù4Ë‹¯«ê:ô@è€×m+D–¡IácDc kLÀEm"º5õ>/PK¤Cô¨û—ótÜ4û”FjµlímÛ†§ßå³Ù#ÿ6Ö{Ð ÷÷Oø…Ò»DTᢼ1ëÔüœ/\fSWÄÆy¬¨5kä‘Å%Aw4Æ ²·çi|ì#*"·e9Žt”ƒØ:«Ä?ÿÞÝ¢\Þ{°ª¤WôžÜa:ɹËãniš,ŸÄ€.ÃCpTkÌú¯¡\Ë ÔBÑ¥w’ÿaþs;Úù¾óª³Ë£CI8:£ÿñßøŸ]÷ŸW¯^Òÿî}ÿÝ û¿»»/v_}·»û?öžÿûë‹Ýï^ýݽ½ïÝŸÒÿñÿ¦ÿìòüÿþ¿ä?ϾMRjØÍ™ñ¿5jD»àƒË¥?Xº|Û¤']ª¿tS÷Ïçg?÷{‡iwàþuf9íîÎŽ¯.{Ç¿¤§gDÎwÑ=½ü%í}8¿è ½C:ÒÙEÚ?9?î÷éfNI¯=:`÷2ýåìê"={J`ïôÌçä Ye™æµœmtwt d7Ü †ÑLP»À1Å‘ô[†•¹kåÞaåÌ_¶à±®‰ìÀN]äpàpŽZCŽ¯ƒÆæÉbkCCì!ùsE¬ç©oª‡•kÞ¦ƒ}áel«Åg"Ï>‡åÏCÐ#í{b;>öȯ >Ýг$ù£Ât¶$à}æñ:[ôér%¶\Žþiåjãc·(oRþûq¯{:ìžOÜ?$”6}˜î%$ÐãMòGùÒéÙ wñsÿ .è¯<Ö¹û;ÎD'âSϺÇCðñ¹ó¬Ý[pšÚÊ&ª¹%gLŸ}Ûp<ŠgßZä2Àš¦ H—ÿã¾KÏåú`Ü➇c¾sOdõýÓÓÞEzpÑ¿ìÓ‰½ƒËþÙ)ÔÚ$äN'¯époîï]·A.èKƒ„NäqHjô¯tQûrBáÐ߈N’Oû:Ñk£»ãÒ]ÁE4…vËÊÁ=Òí¤ò6HÎÈ^¼Hw§n5.k×î.AïûÄíøîGî^Y´õ‹îËÅ„ÜÀìÅS÷®ÿ“üq……wÚj¾cý[ïS±Œÿ2¤Iª’Ÿü_Ý¡üßtùNx¯ÂÊú«‹0f¥[ˆô|êuû§X5ô§ƒÇ[·X 9‡¤´|*~À|N}žL·½öç_Ëb¶öG—¸h-ÁóœÉ5a¨<ùAÿè¤;xç>Nk?tÏvšU÷þÙ¹g?¸ìºÅ˜¢2€ªÿ.œ¶äï.tl¿®}›•Òé«Ô´Ϩ|¿mŸ–”6®.‚·û¨~ß½|svÁW뿯œ$—êV¢Ýb ¾?èµ£³0äŠÞ ½â”_ôvôŠù5l|£ø÷mûbƒ½øƒYéŸþ”þA.G­Æádrâlõ'ÍR:8ª¨yäg±÷ǽ<qÓ1Ü!ÄXÓ/w`·Ì6ÝÖ7Z©&ÆAÏ#cZÆR·Óÿó¬ñ³Æ'íô{‹A÷c¾å÷Ü`xØœýÜ»ø¥}Ißņc¬×výçÞƒã-ô异çS†®¡·Áâ#üYìdÝO—ƒv¹©EÑë3Á!Pxæ8ör”?žL|¤Ÿ6ÿGÑoþšb9iɃtMþ¦ÇX›þäÐiŒB†4 …÷ÒGÀ ðRê¬_Åiúçõµ¥j»+,ixz ñžèͿǵa ÚK¹N%\Y¿ ôkC&ôʪøH:›¸­ý㜠Y2b&Ïl†EE°‚ÚFz{oó@ýAÞL¨§¤Óå!1µï;;x&]ãÃKgC=ã¡xÒMŸ„¹ j&×)˯Ñè )ÄmS¥§a°á«\—õXF%Þ…`ªU2èB²Yp‡«q 2žŒ.»}oñ©·X–“æßü-}Ó=ô^›§´þ%@µß"½DKµEOʼMÞfð?VÑEMq;-:n ÊhYòSòÀ³R{†ž ÿ½pÞSõ'Ý’ÁÖÚ!¸ŒÄ =_?÷{­Û)‰c¼E­ã³|Únà R;£ÎÛYÅ ýzUL–Åv]mz{[9³Ä82$°$±Ì°¾°Z„œD=ر@Ʀƒ¦ õ2Ã!ôe6™-íÛ)×LW³–/X6‰§(7öB^\4èX·„ýÞNr)÷b¨5îÞøJ¬.< œi;oCfμúÑ( ø³û\¯5»Ñ^º–ªˆ’‘[÷.Ûê¿Ù!%‰&†&äù/fI2ÄCê[ÝóþÚ!îÊ’ºE[ÚÙ•ò2Ñ¡T^‚È÷Ð QTÖ1.•î§˜e e—DƒûQs¬ÿ ½µ0»œ &Ô}+K}y)«›îT!³úðž#l9·÷e¹êó­¢­œŠ$B¼À¹ÿ닸îÖgÅ(ßäÔë¾U¯Å>5ºá+’œOmÜFÌ é`¼¼¢xP;ŽL–ŒR‚Œ2bŽˆƒ ¸ªþvZ³|(÷—‘¿ýKŽß7½%çi4Ù§d}óãoµ“ÿ´‘t£e¤cw÷Ï..[[.6ý|ž¼šI>oµ_ÛÈ”ö!ÜÊÙ†Nâ8_mjý¡iq´}Ø,ÑÆغ¨j’Ö^‘ý1 1ZÌF²-P.R†$7Žð•–Õ¼S÷C©ñD›Ó’tSPN¡ük†·Š|•î}¨O¢Õ•´ßýföÕE2‘rDwÀ]ÚÂ☺‡‡"HÝjÍ—‹á²ÝÂ$×Î^›6%^t®» /òyúŸ Õ£è9ügíæ6®”4X¸îÙÂz1¡¸Yÿϳ0§!²pÄ5$òñmk‚w0OÜlÅßWB}rÕùÒC\U~RI„fš·I¼F_Þ·.ø´|òɿͪ;ÉÔ1§oà+Ûcž>Ä O¼ŒØˆ(K°ÝŸ=„0ÛÝGˆÑ§êùˆÂ_vðð<Õ6I¯E@DÝ~þE‡Xc*"»‡C±Ÿ=™b¾Æ*4¹] U–;m=ÄïérúÚ'DnßÏ\èà³A(ƯC©DŠ~jñº#š“Áá)úëÜñ‡‹–¬ê/OÕÖp¨ôpÅ63 Ð3{fº1¦âZåÍ02ºzÍR?Ý*#ŸͶú(_°£ç%Þ»sŒ¢NVÕ*éåT[ñYÓH¼˜/˜ÕriøENcÎúï|aáPîìüÑ1Z¶ÚíÎ×:g“„H}õm÷ôð¸×Z¶Óÿ£d÷—¿cë:ùs¹…×O‹~Í_´mX|6J¿½&TÆ©Ñ/WíÐϬVâ3ý;,' Àhv¾h¯ü.Êý«;(ÿ”/˜ŽYflèR],øc —èåþTLWÓ´uW. |Øö8ǧÏN“èÌ»µ°~± ±F*wÙÌ’¶N¿ûê%ŽÇER@4ÈIp¢œ¯7~èþözý5H>xÍùðš¿ö—vn S]ÀõµÞÐÜåé•‹ÿx+MólæñÕLNÜùâCõo”ˆƒØäèÀÛQ"öW•x¦JîM“HœÒÂà—Jp»4\UÌiCŠz—Äø[éØ—Š–¯1¸77—‘/n‚ÙäÐz[ÐaeyÒÒÐní¯¿äüçt+¾ˆ¾%¬<Ӵŵ±/}*w.â+\Æ5‹Ù,_€7ûkÞUÄ£z;f˜˜qöQÃ_q(ÿ(OX`‘ÖPÓºFÈ)-åêÐjeV÷‰¾¶ß!é+ó•ÆÓ¿è‘#ÖÂ&‚ŸsX?Š»Ï/½¹’M‘²éM™CÉÓ}ñsÂv¦¹ˆ¿$U_þÈeä¨%¹Öˆý†Â™Ýv§ù‘ãq ›¾{Ž)]|¿ñ);*#µ.̹Ípjo‡d–_ÛÅþ…6θ¹7ýÓþàmï0Ý‹ïñR}{…IÔ|Üù¬÷=ì]vèPÏU0Œ¬rÆQ÷Þ›Ks¨w§gïO‡zmð¾-úÿ;ç›n§òWÞ!¥@ÿO…¬VîÄSqdE bòÊî®Äˆ¯f.¯B8ò—ЭÞrƒ‚†'/r×ô:Ò¨“YDhjæÑ°‚³V“›Êd£.ÖÔŠÓ†ŒÄ#^ûoútqóO>êol9jCê“A¦â¡lПb eÜm©íP€Ë¦åZËCZ…ñÑ FkX:5íïš«ö( ¹S+›ƒGxŸcJe“µÐ7í¤©Å·á(üŽù>}ã½úílI«šqÞ~bŽªXìq*¿èÈs(^Ù4”{G•{ÅoæS®˜¨p´vW®½ Ek½¾á†0ù"€«ÏÆbàÓ´ò]NÊH)‚“‡<€ë ߟã1êú™cÌ}nÕ_j„œZ²)%–Ú³ŽPeÃáÑéÕÁpØæÕtÁž 2+h,Þ‡P4`#G­(pídÕ=Ë=é’ä.rNŸ >«õëqcSÅïÊkˆõ0”w.•ÂôkŠ@ei* ´å ü:Ž{²o»?÷†(ݺ€™Ø«‡l>†mãèè î뛾ÙúÓúSÙÆÓÞN¾0Öê9×ÈÀ~Ýî„Ö´o%DÇèŸö>´œ‡ Ø—ëWô/ÿ{ú¼þKý|mÓ~Çåÿ©ú÷Ú—ÿÁý?jÔ‰E"ÙM¬‚ŒéÁȇ…Ê­Éßõ qa&sžQ–ÃmAOq.L‰(K ’O¿•C©'’Ñ´µEÅö-Ô ·8†ß’Ú?¬w$ÚM»MÚ¡{ wáCæZãÔ~8ÄJº¦]jº{<@i3éD¯‡Çø)|Ë&ôé#ãi:Ö Pçi|¤ªcÏ;_Q¥¤{H –58–ù%Ì;ž4ûO7…KWÕ´Šfùƒü[KËßÔàL™–æî#uØWîkŽŠ|7“Èa^'‰íDö‡oÏŽy6 ÕÆÈ3ÿ¡÷á¼wpÙZ{wxï,|3Kÿ¿Qú¬é5ª3þ…Ä´EC«×ñ©ZÍ U{Í^"¼ì]œºÌï©_‹ÜkyÓx„övzzvá¾Ú°rÊ륣ê(f™ž‘^3÷m‰Z»mìÏ]Î\н»|8=aØè­óA÷—Óm:÷cAî>þ#z›ø‹ûŠ¾ÔM‹ðpà Âó…‡,·ù«k]ú= ܨÜ5Ýýå÷&†ïÛòdí¯¦ù¹b$´Uߣäãðžû§= j¡¥Jª¿·B¶í2å/ ›A#bÌ—©æ[]ótvf'®ó§Õ5ýÉ¥ãÜX/µóoÖJíþ§ÎÜûŸê«¡õ¶~.yÉ°OÄ8~üÜÓ´ ýÉôQ^Å¿,uíS.] ‚ÀÂD£‘ªçÎ#Ïdú‰DÊ›ÀXκ?cuATB HÛ*TÓ#§é¶š­éÓÁs—CW{¹"ƳÛ£…è¨ÿÙhg›(; Ô¨,˜U›N"¦òùR16^"­&·¥’i<Õ½ÁƯ¿£!JÛ­§—á×d€©vO}Žq´7^ûñË¢@å4ì·SÎA«á»¬¨m@'FqpO:PX,(.qá+)?éè`±¬C0 rà±'ÞIßî~Ò›NÎ/Î.Oþ|¸ßNL.oXk)üÑû÷ômóˆiX„hP† Ú„¥ÕnL)Ó´P1ny ÚAf9ä>æ‚^>÷ü\B®(Ô´r”£v‰í@BMiY±~!†Wƒˆ|½ ‚γ5µ¹ÛËÓ9ÃÓJáÂVâÆîž;”Wôóª{(Àzlã¨îO'ÅhQVå ƒKð=e“õCEëLQÇYÜ„¬]!`M·€Báú¡êÿ¬º¯¶€MøÒP0`PrIVï—œ&ÍÊ™/Ö”ç:Õ_¢Þõ‘{D¾l`¥Ú̘A<†Ì *3FY%šåÝOdD‡eEÝû½YMTJS/9:ó󽉠ä@HòAD®Ë}w9押ªÝ ‡+ž½_¼¹;Žßqߢ ž r €ØàÈ¡ŒŒÍ? 6lŒBF¨Y¼ÛçÿÿáœM6/Â(»lk€Hm ÅÇoÛZ«:ÿè¸QÛé^›´ âÃþ³­Ž=û–‡äùÑØSåPpç"¬Få}cÉÛ©á¡=V»eª±(ÆQû×:ðãX§—¢`çü»~DÃüÛë‡j¸í†¼§Õ»~Üð"šuέ¡µ[’ðÀZë‡z ^:“ þ³Ëƒjý'½¿PÎ)6ƽñt6ßß1« xÆ+ÔÜ×e(¿þÚÌ¡È=ÚRÜŽ[F¶ˆË¡â¥²·ŠÙòõÓß“†±±Ì…É©@Ê Î#ð5®8W–U«/T ·U9Y1E‹o l%ì²þÜólF5’À:ýefºÖóiºQ‰Žip±$óEf–5:ãC1™&8€ù-*ßÔ!ß–;·»|âÍúCqÓʽƿ7]ŽÝúf[x2îV‹àðí?5ý´þ‚%˜X»ã¿Gë§flÜr§•[òK¥ÈqÞÔ5ÓKûxÊHùŸdصâÆœbgÏÌŽÐB‰Ú\e­-ñúÍM)[+­þYc£ßµŸ¬1ae©(ñí3`Ë°˜:Y÷÷z½b½x’nÌxQú #Ÿ½ã©$Î^V3á÷’²žÜ:î ®ÿ„Ðýé³™üZrG¤ûIdÞd…íùš£R؇AEC¸%ÕMµ@3¢r %¬ù-‹è…›r w±~Ð?ŸÜ؈8´b„g3ÙÒú U¾—Š‰Ì$Р]ƒð¡ÒUGx†ƒŸóP ¡(×ϸ9ñj:ÀÆ/ @Ò’ßó…?ñ‹]„¼‡yECºÝ‘Ìro‡ßuæ|H±ä¢Ï6ìðêü¸нì Ý“Þ°{pÐ ¢Þ–Ê°{q´×Úª=*ðÅæã­ÆÃoý…h (8tëîÓ¿|ØÚ&ÁFÏ´Ý#"°cØ`ýÆùÝìE~1FÒ-”i”ZØz¡‡&r«kîKÀ%̼C!öÐ"S›z&ïÊÂãj©è,BþÓÁ妫Â?3ä”&b‹ü¡¿ÊtÄS7‚ßC¸€ysê´k¨¾¯¹*~àؾ%Ð ä Ñ ‡ÅÒ´È­Š¦Ý¢…½ówüs»ioÿ“]þ†‰D‹÷ɦ1*Ù¯“ͽícDB{©å+@ï?¯p—ƒ·½ƒwî¼gï®Î‡'¿ÈF!?e¸¯àÐßÚaÒ¹q#®O¡µ5ºo mÌ—œÙ¾ïÒe˜…Ž$(òß%m-E{—FÚîîHKQŸiwBcЦ™î„£™æÌK.j²}J½/%¬hh758Ó°,4-ÿ²)ËbóS{ð{çïõss™]ëÙ_¦XÓp4ÄGBÊæg3üª0¦Ññ6þB2eäç sY…‹,ÃÍ»ŒU½­xÊ0[ÎQ¾Ê¬ÒªŠ,Šêž…„Æ9ð>ë—ÔÞ6ž§ô1 ÉäüpÉÍÖV§êÑÕFàé›Ça¹h¼ItKZK‘~aþÖ ÐL~µmœ ù§V[¿"£¯»ó6­P £ïªý—Ш@ÚG¹Ê›\§ywp_̹¡(êvd5nX¹õCDô{ _]ÊVXŠ¼y:®îðÏŽï_¶Ò¿¦­½«ô¯WÛ‡ÎÁ[5ÿ^Z;¿o6­hÉ´ãgíœâžâ¤j~K¿¯‘åš± rPO§øC.Ì~ôªµ­vÇ£ñ=¨ò®¼QÁ~N÷ï À¯j`(Oõ) ì‰óe_û:ª~Õ–HSVÛmµ­ËMã鮈ò |þÉ×.¢°Í=²ðí¿®Ù½Ašù?ÕAäÑK n þêŠg ó‰Þh5 ³ôÆf¬=è)5<Ž×ÿ7ž{=°j|Øîø›lß“M/“M–¨Ôµü0™3×ô£ËË‹áÕéÕ wøHJ(4”QVòYÿô±„gV®ï¿~Mz¤¦Ëâ—KÛñìðì/i_1Ô´P8N8¡ŽoÅR¸x£ãœ‹ TÏW¨ÓÜ"êÈ þ|¸ßÀ2õUí§±±Òí/Ð M„a™\#Ïë'´Z€(Pµ­ãYÛñ@±ôRì¢FÏ_S¾ŒMÀ†li® ŸJoÏs^RîÇí Õì|2}ÈȇÌW§úwq²KÒ¡7æúÎ$Pe(#"¿â÷ˆØvI›(‚Þ:ï뿲”Á_‡gû?‘í§…å.ÀÙBûͤP‡²6Üo½Ý?~w~yᾺîùùxÙæìÖS„¦û _õe _þå$ìAòG»ÓÿÜ=nÍmÖäÿy}˜ÙÜ=ƒocXÿ><ï^tOºïÚͼÐ2÷Ì%8ZîÝÌ e\TÒIý‘î] œ=žt:»h×èù¾ð¦ÖÆ\¿ô§ù9d(D@D4j›ì#ehYß¾ø é‚~´” »Èu÷@ÚUN‚7ǤbJYÇ!|æÌ|ìÌ0ž§*ñ ÊÙ;ݘTÈ”B’ËwP‰ªsw5Ü¿+u¶†Š™Çt®fj¨¥ÿ0Õ+O±¾*‰èÌuíòˆ¸ÛÓåub*"v‡'XøO³>“y\+–†rfTËd°¬T>¿fä¡Æ¿.¨Û‘ƳóÔx½Œê{¶§{0)+í¿.•äå¿¿YdVQm¾Næü%]”>ª”kå)ÇåÈä5£Vž‰òôÑ“"q'ãó=½èª„‰öz‘ÍHÇÖ\‘¨ÖRÓú–8e °Ótƒ©¢=ò SBø, Ø-íÔÜ, bÞlKk û“çŒ].çCøy—§)®‘’ë|î—kp{ ƒþOÚþ ƒ´nqpý|5QGo()3•JfE(¨9P‹Ø 4ä¼0À¾b/wû%Ã=_\¶ÜôU‘ Þ×Õ5ã L7×gÑ\âüÝoWþ>hþ3„"ñ€KÃïíðœ4›i>åï#ªŸg€]ºyˆŒë< ÉcãÙºÔ)GØž·%fîE6¯‚†,a×Û©u;áŸs@O:š/òðÓ]z|“'`óuo…‹‹‡›b–»¶õÄÅ·;_ãHÇÝ>gá­¯ÙœŸbëø%HT_©YÂﻧ­­ Š†éyÌ\ ñItf7ð/[øêðü¢?vaYºõ¿g[ôQ»q>å!—m³FíÏþÿ×øvE _»ù ׂâ(`Ev°âÿq»!§lJµ’õAÃ7½^kÞ®™ õ 8ÖPå0…-ý™¢–À$¬žWE”–žå'”„B)NÞê×”Êоj¿Ž‚¯F®d~¡_©ÔBIØñq&3)³Ì\t¬¨Âï›Jtë]­/™(¬ã¾¼×P´ƒß¡€C£±ÁKq5Åöe£ücÁm>ƒ ýV[§ÅÞçëD9cíùÄbw.)»#ÞÑA'Äv¡Bøå•E‹kõ.M°ÔpÐCvÕõvC£Aq<-ûþæùµl¤G)¡nYº•f‘êBDÀç,ºKø²k墚ç†÷j¿ à¥Ü¹¯åkî7Þ[w¸Áð¡a€ûɇnhzU-û4 {›ø¬sýÝüéoéÿG÷š¥I $Ñäé„Ѿ ´`þ žD4@ãë “ñÜø£Ä#Ýœzlz!¾ûÚÄ·ƒ £"‚›:“íÕ¡Û«©‡Uµã?vÖ[¬'¹âK©kJëØ™ðëÄRºmc"ÓUÌJAíÐ?J R«ugô¾1ÚFMg‚¹p9žBad¤õGXGþhÛ¶µªLœsØœ:(9Í@ö¥(·Ýu÷( „5ðä`@øŽ<™a6œËå$—»÷ÙãD#õ½ýK9{Ò¼$“<Ÿa=€G0Sxsd¿ù»†}_õãdý2³p¨2k^nx»í{iöª«Yƒ_ ñÒšÔQ…ÃÞþÕÑ°FŒ0)o¥ÑÚºšY—'.x÷Ó¿L>!°o‘ d{CKÑÐà~Žì ðÔR8`¹·üfÑòɱ={Qk5§¦Öœ:'õ+áÈXe ÕÿŠŽ'dŸ@°^>Ìþüýn¨Ð·ë1=b¡ØG}i\´ÖºÜlâì#û/]÷×tG?‡Ã¨á¨kœ—í²Oæ‹—X”ºÔÌC]gxŸ?¶ioþ)êaûUáÂØò1v‘ê¿~UÍQBCh ^»]KñÖ2ïó7»ÒgÚ°ªë/å÷¯Ú«\)ñ-D­’JGÍw#äX`0–¿‘#¶{­ö“ÚËx*L3°ubpDð~AvdÁÍÍÕlÄã•ðš”áÐ|ËÊa4]u÷‡†Œš¦ùìvÉD_Å4ÿç»ÂÒ—C‡—ýÁûÄøøY|Õ&,ßúQ™œØ¦·U`V ã-vIÑüA@Sým:6ìCµÏÚ8ø×%luóÖHÉÎ1°ûg6)Uö‘ÊÙ·¹[†DD> Ià?“[=m“‚ñà ùIÐÑßðíù[}½6 Öp†T´^Ò?1›3=¬ÙòSÇm0?!5È 0Î/›Hnln*«)Åb¯D"ÀÅà(v£ér˜Äš_½»üífÖnÕ?Ä/ä·¦ÿÄ_ 9¼©±Ó ­Êjºy–…Kû]÷T3±9õ~éL% ßü‚™ÓÌVñÐ9Ùêj)2‡>Öd¥l%9£‰`XRÆä!¢µîND¹‰•¡GŽbŽ¬„ùGá¨FèêYi™ñÝw%mö,ó·Ùâšôú$8%ºÂ<›w6JJ}k#̦ÇG°er;øÍì+)wÔܘUam̶}žK’ýÖ¤ôÿ­þê4èê©Ý% qÿ^ÿ5ÿs÷÷×ÍÇä®­Eîýïµ8¢Õ:½:é]ôÄOû‡Ñ/þþ÷ô;¢®Ÿ¹Q%º·ð¸A˜«¡p¦ÓéDaлÚÃP&n.b›Ÿut\k}ö!­=zb-<ƒ—=úÌUÄïŸ8q dOÏ+Gê{Ãe'Š>tœj—a‚˜Z~ ‰“"ÀMDö›]`h»7ÈÿUÊì5·-‚Ó½Üi1c认Œ»UžÎ"ŒE»d)hφƒu>{#èâ‚Ó³Ë(—fá¯'Ɔåæ[fIÿwJ7øI;6üƒÃþ_5;üß3=ŒùaYí½½ê·ša·0m¶fîݯœ*~J&K•&Ûá|qýPµqâ¦â0Rüß2TüåEDÞ¸BǾP2ogz˜k;”ÆX™Ð2:)”{¡yPH¢p‘5È|å¶`††·+Ê“‘CÍÆÕ® Úw_¯Uá=´§q>(.³ËVXƒ"ñ•ýãµ3˜ °ÐL(ÚŽnËF+{sGñR6ëã¶tû†xØŠe ×sÇh'‚UýµNáÿ:ýóŸï>Úó7ßÂ^ü?qùÍ7náw­R”«|ù/Ú|²'æ¡iH¦ B˜Ê螊òæðÍÙÅ;?ù­eVŸ€T"tTû­Þr…Œ„sÚé}ŽA\ïßÝåÝPEG Ô|.ëƒx6ÐÃÕº×RAÏ‚yºëNs/ö“FË| ÃÛ\ç°¶¡VˆñH·í³uZ3.R†j6nDd꾜ÿÿÞ:^_¿aq_º¼MÈU×ó‰Ò,›…ÿàñÏã¿ÍcÄ^DŒ5Ó/‡{ø6Ô¼ RïB™[hnƒÍký²è'ŸëñÄ?ø=º™d¢×¡ñBëaÂF€b݃þnQ81ž2ò‘Ið\çn»oMó-.âÖõ8šZÓÓ¸°ðþçj›˜’h² a­]÷“¤ÿ@­âu²FuúÞæ’}ÆY2µ»ÚM”ié&|ëÿ“„ƒJ,˜~ÛFÿ–ïàÿ·¬‚ë´=¬Ê£§ŸoÉ[péÕ 7<¸\ž 罃þ›þA”#¿qöðàñöô tŽ Ò{;.+ngñl»á¡Xgû†vú7.æ_òpš’i²ë¹—…¾ |ˆ³QI˜‘f¨"mž «q3å|³‘Ù6-}Fß­¿™ø÷òb˜°å®˜ŒÛõwd¬‚¨ùÀ#»ë¿Î9tí\„;jpïüÑØë\¿1…÷¶ã€Gu,r¤·.ñ)ø‡ÐþW/C¹!u¸m}Í£‚5[RÿÕ‹’¨§/ª”¯³£Å˜f·÷‰{Ÿ ,JU¨$Ð͹2×J‰s‘щÆw~i®ü{ó:ß ûÇÚð©¦U®–ÎŽV !òm†‡v+8·XĽSò@¼}¶îÊ°€4>,­e0Bœf™°Ëâ˜5Vjݦæó§ÃîúgÎf¶å—ž +éŸ8—Ù]k¤!µ´ Ƀž”¶šq ·¼rë*&Ú€Óýï¯5*hLöãgÒ"6‰jÛNžyÍè"¨†èÔU@÷Öºü =¥CÔ­Hšë£Ô3>bE›éb”r«üsL¤ ïªÐЛ)v{(îÁ-2uÆ‘z/]ä¢øHQdx>À¨Š 1Àoö_"ø"Öó«Á[Š“†ƒ_NB,P:ï/aùm>ŠI[Ü©–ThÝÜ«>%ª€Dq~y4ï¨kC¯Üç+@´¸ïÝ®\ ã,"ç.µ\‚EŽòœ±Yž¾äk)=#˜ðæ’Ôç\×.LÖ©ß?#ÙE;T4«€Ì˜25-%v÷ ˜1ånòu¦¨ìà§Á“Ñ„‘ ½¨BÊ!],E‹è‰NⵯÊY3RH@ØŠaqŽ"ëëÖàbt¸Ÿg*H~Ý,ù/CˆrA+†p¥(÷“ËÁpлŒoÔù=Ök0s‘A!¼moJòþ¿ìýycÛF–/ ÷¿>¢Ü$¤MR‹—¤-ÛýÐms¢íj‰“éÉå@$(¡M ZROçùìo­êT¤¤$™¾oÔÛ"B¡–Sgùß!˜Í$]L‘„Â(ÖS£+S»š×ð›ã#„`‚nS*w³m+ÑPþÉ&' ˜»2}ȘaÇn Ø×~ëjO×7̬/3µgÁòæQ¡·¡ÝLwÕQïIúèÊjfgg¯×=^6ƒaQGsUn“yPjØã6ø.í}×;5589;9êìöv[qeÄïÁùg%ÂÀÔŒØQPjÅÞGeëFY9ŸËkwÂÆ2CD¢‡ˆE=¾^Û#×æP<„ÂWTAr«T’ÏýS?„^Ë\¬“½Ü×°ŸÂuJÎus£¹ „BEZ‘%J©¼evûÄÎPH¥ê ç¥Fó2_CäOŒågÌ ³ ‡ùbZJíWÉdšTdUª/8K€q^V@ø{:Ï;ƒaý Tº_z¸ŸT£–«ìUA@¥sA–P¬&¦â­d~ÿ;æ(HyÂÜg_ª5ê”Û» q€ÔŽÇè~PÛ'×çÇ^jÆ9xjÜ …2›M²Ôå~âÜ §ËÈ¿Gokf¿@†AÿT›Žj¹àšBT)•ÉM¢r¿…ò$ÌËÿ­K„hLü"U ìêïº"h¬¨‘^?’Š®¨—Mr³ìð L‘†HVÊ°(bµÎˆ%8¼¥B°h4 êÚ¯ÀQ±Ù1$·p"~6J“ ‘ ][ –ÜniXvªZÜê"(š)vX—†¨æ/eÊß1Ëò¢\2£eˆ½A„‡«ð›!GkYË»8Å@ô–…ÞïemË›rù-Z~QÍxU·Þ¸áÕAðìÇmb}ÜØÆ¡,W '~›A SË惇vÅxZÄ4 ƒ|¨a¥Ä‡íÔIÙP¶kis¿8ºË­®™AB}Ælç@¡ù|é›ÞWÑQ*¥]l÷ÈÊ_*3T/ã~2@m‹øÕݘ¬í(\Æ¢—b…ßqåR_^Gš?N´ø ÓE)únedøeSºó*À¾ã]†ÀÙÁjS ²á4Òÿ8yU7Ñ¿ÁTÿªÉ¾ït/ñX¹¯ïZ÷Y¿ášX.Ž{uÝ h+?]\vþ»lì©ÿ{hIЯA+Ðäu¾¬k½¨Ro€Æ²©óP šª+\= #zi¥Á…Ô«y† ‚ô† $dï?›½qÀfðúç8Œ?QߤNæ5á`1X&ù@læCdš ò scnKæržz^M—® À5•šc46¦±ñXÜ:™_`Ýs®| Ê{ÝTÞâÚ\jq›šãÞ#ÉXCJ¿»,Xä÷=Ï.l3ê|³³2™‚—ajg2Y˜Þ¹*Ž¢.óÁâ¡9=N’ÅŠ&/Ž¿Œÿ?údãæ­ùiV¹ŸõúÓýåÓrð,%UI×¢fIîrÞ‰®Ç$L’‹b´këÊâ6Æ£Uý!õçLf§¬o¬|™ŒFsBñnlË×û½ýÃãoº'}Ð-Þïwá­é RÝŽ¸7çvi­ò"n ‚)¶e¼V¬a2®­5ÆU&ü踂¥¬“v¸E(áw'’ÜŒR41Nb¢Ò±ÍqÞ",t¬… È%‹˜jnB8xäƇ=äp «—* ‹‘sìɯD¿œçe™_ÝK‡*à°ÑS%g–^$ #€¾´³Ó’Âö‘ÆÁ”Âê`9…¨cñ+7Õ7F¾vé–íêƒù†6°·ÿ‚¸Û‰ð‹}½î¾/y³;ºïz8!>÷O{Þi&Äò{ÞuÍi«j˜p¯›aQÁù"•ìääv›Å[`R»óR„¢ŸÍ3¨DvÈ‚á• ÷>t ñÖ—¨ŠƒóÔ¥mzkèÄ’‘‚&›©ûLÎ o)L5àm)3Ò:ÐÊ.2c®R½ËŠY+¶Û7Ûê|øG5i’÷ÌÃçÞ,ËJEÍÓ^VC›•¦ª™•ù£q\0ÒšÈ(Ì÷ ä µ‘ÆxÉŠ›aÒ·çf?š HË„GQ®<¬q¾Ý!ˆœc‹ipû.S¶%wˆ#£ÑT°ÝÃÓÞ÷§ÂŸÁùâôK‡ox‹€éWr-"ßõŽÿ!¿ÃßLJ{ÛªÞEøÈ@A%ËÐì~R3í„÷+MÜf«›E %MsÎ1X ”,B’0;ÄÛ9¸_+ÑBGÊ(-QQ+,1²`†EQ‰Ú¤RÚ_åW@‰Oæ}ç³*©ÕP¢³UòKÏNÞo6L¿švæÓ”u'™%ø:¼i«1ßlÍ·šqƒ›Ø4£ÍÿÜjV.J—·æOZó§|“4Ñ’ñ»fHœÔòÍs™=jª7ÊZ½Âüw~Óênl½¡ù=¹±é;ºæ{‘÷êQê>ÑÕó¾ÿæùàùSÿ‰ÇÉMëØ´~<2ÿß4·ù‰ÇçF°Ù89Ïßú¹âÏæ¿Í øc“/5_lnÁOà§ðdz•=®íl÷xŸÂnê­ãÍÖñVëøI³Å=m?k?om?ú¦ezÂ>©6¡g+»rRד“÷7+ú×t$¾«'[8FfˆìŒš‘Z=H›Ïjº¶ß?:ñûÖŸ–ݲeþünÿÜ„?»¶Oð}¶…>?O7‚©…ÏðªS¼ê”®zª[9}†Ÿ=Ç?¿†?OjZ9ÁVN°•låÄkå[9ÁVN°•Óojúògøæ[|£o©ÅoVŽ\Q7•GG;þp½›ÍÍâ5>Á?ŸâŸÏ ú¢ýþ9~ö5þù þùç ‡æ#3Çðç&þ¹…º÷„ßžágÏñϯñÏojZù3|³…mma[[[º•­'øÙSü[Üz^me ÛßúÿÄŸlØu¿m®;èGÝ~Ü;zß­¬5Ze§ô'¯o•ðÊi©S3¿¼~ZjÅx«„WNË®˜·³j+]¼ß_ÝÞºÇû»Ô‹oðÏ?×­{~z›Mj¨¼ÿrãüؘJ–ÇkÉ|x™¶l¬¥â„@s,ì¼YË) Ž^œ^(HÏÀ•bBRžÉP¬‡e.Þœå×TSWguT5Q&KFŸ’i ÖûÀÉDúViË·ƒcÊ(–àmJ&…öóà˜IãTΡZŠj¹€íîöúûýSŸüÚO9bobDk–ªå•¾›ªΉ\ñ_¢•ê/”úë¼¹Ê3iÆð[(¼: ÿbz•°•"P¼oævð¶¾Gà÷{Ū«˜ô^?'®nöµåTëÔœ(-³„É7 »ªeüq h,Ö»¸âÝ`wÊXŠ”x¨WÃu½Ü½ÒúqI/^…ÉäÚš”ƒõ:xû×òuØ’[пbd—M¦—ã¨ÀŒ¤|t×ÍtT)j.·µEë_¯Y»J‹Ym )÷T-Áµ[®“ÛÂVo|¤Ø‹$€ücc£j/£±ÐÓV3$Á(ÿeEæîK秹Lf­ðˆñ8íæ¾ÆjE)"ƒcx2¶FäÓUÞÍ>> ˜8–Ï´’ê¦ÕÒhÙHøljXà %Þ©Ëùbúñ/qÜ/(´ •¾þ¢ßížO¯_?ÿsÄXÖ+©;»Â1÷NÆû½FeÚªóVÿ8CÛßC ,¿{é†aw¿wj:Ð㊷ñÄÑònûjE•?½Â .КõnÔ°›/nþnžôÅ „ù?€¯€X½žÀGZú´PA«{ç]|U­$8®œ7qÃ5¦_¸Uõj¿=YûcªJã‹\©¶¥6šDÚJÎ] ˆ¹üÀøÁÔXLË|Ø, qj’—ûo>AS‰ù×’›^l÷)¸ì® þ{ ¶¨"ÁÕù˜R7/R„6«2´éß:ÕŠºxßÌÂø”y¹91la.,7È0ºEšËp=3Kæþ,ážÎ¿l·_ã–×­_}˲x3Ý‹Æm¡ë_£%ûTƒÈEÝ©™ÜÊžh¬ìSÈ,^½ÂôÄè&výÅsÈ–B¼+1ÿUPþó‹_ëv¥å‘úf€4!]ÀH2ªx¼sxð¶ÿ_Ýbù§âýÆ°ªƒNa8£ÌËdBÀXþú·‡ >”Tì Ë_±RØK3fñ4Õã Öü•Q–ŸÇe˜·Õ]!}‰íǯjBIek”§tòI!Õ’ÐuUŽãTSö0TPõëQ+ ˜ÿ×N ­¼‡é‹ÙoOzƒ½ÃwP…ñàô- p³Ç¿yÞžâ‹‹¸È+¯bð®­¨ù—;Ck1¥ çSÉ#¶ŠÁœX׌a³¶VIúÌÄ_kkûxÙ*;œõlN<‚ŒŽ=ÝcTxæðíIš¹¹ÜVà+íªr+»ßãG½ã RÇ›Ïuá¾B\ ƒböW}C;Þüq[@^Cð¥޳Öp .ùáØ>3?tjðHmn]'Ïëzy×›ù¦LÍý÷èú^RñÆ4.óœ4M둹ǀPö_à ‡ó Â3çh“Ëyï= AÏW$ü ÿi*j‰ v~\Êd…"F(›+eeUÑx£ø}J&ñ_²ÔŠ'ÙÕåÑC£G˜ZvºƒMr„Ë=ºÌˆ­q u ,4ÐïEA2«€˜K¸…n5M\3I&VÛõ\Î~—ÙÅ¥xšñè ®(Q 1ÀAÁJ¤'Æxè|ÌÝ• èbó.rŸy=®µ+ç}.¦[înmK:æý·Q9×TþNý¤ ôhVq ³˜¤âð¢ûÜ».¾ç–uŒͨÆx ±ïý‚/÷îõĵ!æE¿”m¨G•âÑÙ t¾`ØX2‹‡¼=ã«‚ØI£3Ý›ß>tŒ˜]Ç#˜Æ€DΗŒ«\D‹l¸™×´[ü&¹H.`H‘*¯PÇ€ëÙ5Qŵg}-ÄÅãœ$Ö\U/ßô=nL—,[¼ž;q¶Äél6™iÊH"[*þÑzsåTÖrû­»“ÈßÀÅi¿Bçý ”^7¡’«˜–‹©{øäÕMß—eÕ»éþE&”ÛÄ~•^IzrsX3š1xæ’¹«*ÍŸ¯dà 'ÕcÍÖЬ~œ:—ý¸RµºUX_3…èE“^„fÆo3‘Š^²VEË~¬N.™Íe÷oßgBâð0rÃË¥v§ŽÌúg?hË4WúÉ‚^ô:F†ùL˜äþ©]!áï•Ñ®NM8tŸUj~UZîŠDS7WE õü« ÞFŠë¹G<×yÝ«ã9‡vZ*#ÍTUè9ù˜Í$‹@’O°¢…‡ÅOJ:;]¶¨zv1á\ôû¢Á6ê©¢tc6ÐÔ¹TìÁ6ðÉ4JÉôö:¹mÞ—t®~9‹ ²¡S =‹}³¢¿çÈ`tNÄ+…ŒS%Ç&/0 ¬ÍË )襭`õ“ªª_&²ìÊ4‡7ê?›J •vv°nIvüQ¬„vÂ%Æý«^ÜâQ5 æàqȒ˦.qbõc+ï¦'²rfÕ¿“ |æã—WE AæÕ˜¦Ÿwx*jk°zÜ&ê‹4÷6õ@2“¾y¬u4eÂÖ ”ùüc2Çœ˜Ž$#* 6…)·Ô~ÒÙ8…ϵ0æù9ò½üm‰ò~6}÷!~²µþüió¡|p–vÁ½ù`°ß?x÷Á(áƒ&¼.)ª2&5ì Õ4À%#ÉéÌ7luŠÁðSÅ/"rVØ$=Hg,hH®’)äÚI^iÆnJ5Ìá»ÓÔ1Má$^¦“Y:¿—dÓocëþðËôG¿äeµŽúŒ Ò‘…ÊQßâ{½Œ¸"û»°×Õ«Åh1Å悪©÷iŠåƒôHNÜ/˺xgSÈõ“Äãôu™,-šÕ«ÔµD–™ó¥ÐP­à˱å”_¯v%‡E*áO!ìôy5&}¥Y]æs ú ZÚ;úîÐ̇´ÄáO¾ÑœFª„&fyGXÕ#q‰Á(´uÍåP"‚Qöˆ\ëôïöfS‚tDA‡käc*s, h ÂœB/MýX“²òy’¯¼¦Á½ËJÓµ©ï!QbãyÏYB€»…Ÿ(³Ñ®å‚÷t E;êgÐGèq9ì©£b¦Ki–`26`Úí–%õ2F‡ËÆ·÷äKT9òZ g…oƒeæÖ‚Š*fË­‘¶]_æQY·O…‘¥·Óáå<Ÿ‚¦@x? ¿Ñ‘Ç­8í\t€ã)0 j°JW~U¥G¿¬bjÊ[æî‰Û‘On¼<ˆ_ 㟈’¨Å¤8¶ãé5™/&‹¥¡ûXq¿MòéES ÿRqx ¯Ù†wµ.»¢¢ÉŠêCÅW ü쪮 „½c®¯¶¡¯;;¸ãÊåb¶øë(ú§(ü‘Ÿj!¬½ËJºX¯i]qÕ¯äS’Mà¼ÓtÜž›¡JM¸Tá«ø%w¨sù: ó‹VðÚUjézPµÖÄ'ƒ‰·ð+©˜ttzü]w¯!´ç$lFh¤ù„œ?Í~bݸ*¡êEÓ}NÀôf˜ÎJ¥?*/7çgãL\VNºCxôt ¤®å´]uµl µ“Ìp ï-—ÐßèæªÁõÅy²°ÀNR¢O þªÖÞ™¦×ÜjP…ãàõ6*ÑÝœôßíwO1½™q`ßDw Pþæï EèeêvN+9¾"—kǹ¾=çC N¡× Øé!ãÐA*óÞ‘ÙÄØ­¡EdýüÕ JGV¾çìt~öÊŸ$äKüþild]W.¨0¨Ô·e&c”m¬Á”ZmÙ"˜;æÏÓÞ`·w uÌvU™‘ºÇúméÄÑ.⊒]¨‘a¬@ ’\GT `Øp„&£y> NSäéeÑÅmà©´Ó¹OùÓÀ8›ÔLÆ—”ùp×Õ°Ù@CVúdðf 3 ƒ7°Þ[ñ—¸Y¾¤Ý ¾ Hù‚b÷¨Ä:dóbn­E`E:Ÿ£jðÅ6 X‘‘Âñb:ðÛ°LD(—Ô¹Ž’Æ[\¥…W«¾8Ü©^ÌcZºNT]¯Ðë^'*Î÷¥Nì:/nÍÆ!ÃÆ—N(š©ÂsgpÐWZ1Û)|fͺYÞ×K4à O4ÎÓ†7²ˆÈ‡€•sæ[äš5ëݳB‘ {yq¼pþ³_´¹¥œ³P¡êýÝY²ëê6‹ÑÓ i»QZì»çv™s7dË¬Ü áÔ†{ãç:Qï¡+çÈ-®ºbçð`×CdÐÆH–ÖÆyrqixæJ‘¬æ ­lÐÖìÒ#j\>)”ĶÀÍm_¬U¡kª2ÛòÆum/-ØLUÿšÒ¹Dq¯>h_j‰’¼£¹Ò£ÿ¸s{¿ºO§·—=zåðÖÜdic6šN;dõ×Í©•–kÅåœezè+úÅ<ÏÖ.=;í}oÌþ©ÙÂýïo׶1̧ Z æ“jWkµæq%«½ÆÏ“ÑÐØ?z)Üoöí­«eG½¢€¯q-¡~Êùøþ6wæ_r¨´tPVÍ:¿ûo6å¢#ú‘:Ÿ³R‹8¼­ÔZ9íÂnfßWç믉7HÚš‹  C4j½ÀnZ\tKË=Y‹ÄÀ`Ë—€¨ê’ˆPæõÌø°eÀ™ÒWM b¤íÉ¢ÌÛfWÜo~sžþ¼´!±8jz÷ð¶T þ7p.k%-,ÕÌý¤â=΄®T€¯)äeú²0O üdØ€5X«mü³Í¿¨"Lß.7ÒñcLõ&¸<ŽÅcqö†.`A<®žÁßyHhðapU Œ{]EoÙz–pY5z&TY΋•¬Ã,l„É û¸*’òlmÞÇ'è~H Òû)؃îú‡&ĉ´\öP‹W @lüEC}Oç¤7˜Ð} cT<8O/2NуrÈ耡iGÙ©e2wɬHî5¬KD7Ì)Á÷j¥â,%Lˆ8Kïn ¯G×ô2XrýËå9•òîõä ¿Ìkyׯò¢”²Æäq:/2–`ŽÖÀ>¡ð!ã3×:!>è¡ŽÝ%1Œ7o ׉.Ë$àKŠîø AÃ;“¼àŠó< Þxüìpê½Ã.¼`¥ÊÒ+ `SVÞ¢õW¬ÁV¸ªîl'pÑ·xU!1ë+ê3~«ü#v‹«¡°f{ó·\iÿôåAåÌÀ ­¬ÄókfCæc¾¼¥Íšµ¬—ŠYY2þå?×f7X‹©mÈæá‡'¸Zê$@†QwòÅ|˜M˜J?â CÕÎë8 LB÷e»í†I¿wXzwüXg1ü~ÎZ™é$ê­tçÅ:¨5e1n/¿]iÇuæÂ=ÂLôw ;ÔÁà~çHë%½øï ðŒ@á—?Gé†òpšoŠüqá¥×}Œ:à=/ŒXmÇä•LG­å¢iIS›ænfà†]oT’{Xbq^´ÐT;h‹›@©—Þd…¶ãîhª;4¦ ²}pR³½›á%äòZ:p±X?çõå¼Ú>|è„–\'#ýÛEîR¨_×J4ÕÓ—5«¬eæ+iàDmÝú2|ݸ&BððA˜W‡AìÖ1œÜ2ˆž™ÊÔ®³žÍ ÛzÆ”\„.mµ|x#ÞûµïcÓ´ÕÐàË]&Å@Ö±*__ù`®x›ÏOŒÍ9IÑÅݨ:Qú@–rÚCëèC·:xÛíïõvk‹:Õ4Yƒ†ùù¾±Š’ºj"ý5~W¬þwñÛý61 ûoÔUepæl`¬lOË#„]œ¤%Ù÷•C†„ \Víb¹ëÎøRZçÏ__‚ê@uzµ²Õøèð¤ÿ}X€}³ë»³i,/HÈË>¥œýbl_È9 NR0' ºDÅüÑî²5cËÒ¦-5j.+ê+ÈîÚ uíû8"Q.Œ,5’08—Ok ¨€=䮃SÅ2+šÊÝ.õCù1&f’DÜ!vø ?¦E夾tIñþaÞtªùÏ´»Œaú¾"¶cÁ˜õ¯¿ëÄ5ìdÁëÀÈŠ¥îk«‚C«„®öSßGÜ>@Øþ÷Ç­Vjw/ˆÂgOî7Ÿ«×Ï~L¶š” Ü0fÜ͘7AÍKŒî9mW³«wÉÒ ÛÐeàÇË ÞŸÖÏzæ]; #ßôÍÚí0ÊûÉ% 7rimZéjà.Þ¾È0ªÝ‰KÏ›»·àê ¸lûÝ[ÑyÀ¾[%´~M”ï÷YÄ´`:CL™âN²,5q¦½ŽÇÙ0K§CÌx_¦M„ËIÿ®øE½Òk£˜¿Jù\aŽW/WPrQÎr_&ŸR0=-K]N…+‡cÌÇE¡žöz]Úæ+0ײ®(+^«ó‹WG%ésÇ Á›îηŽÓB„tõÆé£â¼õ:±\ᑦ#M›Àɽ˜§¶ûË_‚  õ6ñ£&´…<«u¯¿ôz—WH«W·’rZœ7·mb2Hu‚D%Sàî2³zô ïv:Žæí!ü¹¼6n¾˜ÜØÐ`§ÓAO_ª–œ¬U»œ¢ x/ÊÜ™@†³rçëˆBNeLo2 iO©£Ó)q²B·DÇ51oßb”i`15Ê2Ô ³-9‚…©fAYV\Í•+Ž˜ÆÁ·b”n?³É¤ZeÝ'; Þœí <ƒyÅ€ø¿ ¬Ïùß ¸fCsÛ#ªÀ8›ñ½ì!h¤Ö,¥: öC—E¨!+IÂq3Ìó…Y5érZåû-#—¿!›ðg%$¬n%$«ÛÛÎRQ‘ŠCÛ¤@W ÃÉF´iÅ´’ÏŽy0+N®^Ds©Ú;:éíœ÷OtOOûoÎN{'ñdF÷uËržÓkÍ©y”y¨é"„›§ñèkœd_á»Y"Â&3ôò3qߪÛqX'³#X˜i ƒBÓÀÁO³½°”àª&èyÕþÈÍrH,^Òâô„¤=(8ðÕûþ¨·sÚ|¸Ø´0àßT Üð¥Mk4k³÷0á¾€˜é»±CÕs¯/,K’'-! ±éH9ñZEdñ`qÝŹù-¶áÝüؼ½¼å_³ž½uzï…ûk.\mz5ÕVYÁÕÃê(”t6âpHcˆ“7¸8«ZjÍúå‘'ÀýŽÇD:ÖªMÞ÷¡QmGPÆ+ЂTø¥öå˜d{P‰«Ñ;>><žz‡gïÞ¨^´ê5’“Õ)ÁI¼˜É: ㊇Gƒ8ùPsñga;¸Jô5a6ȽÝNûg{§}Z°½]ퟘ¦éhP愵Þè*0^ö~ ¹s%ùû.Þí>ËHÓ!A§Ð±¥›¢é³°²ëçà°ØííìA¾š™ÝãÞéÙñé˜îðè݇ßXä*|´ž@+&ï8ÍUêîmG_àÒë…,Å˹ßùá,M«Æqç Žs y0Šè¾Š¶à,ZLÇ%;Vž_îÇÞÖpÜ,¤6٪̢Tµ¢¨ÿ§W± Œué‘ô¢â±rCè/”åÇ܃º¥£îÁ¬ ¿æ´»Çy„jî>ôì¾ö[ÞjUÇÞò¼‡ˆ¢µh—`l—ÕÒÊQÿ3ι'ÅãOvâQ>Ä×m3HCZÄ ê”Ðs¬\êPðsiMSbfîußuûFdç—>½í”™Vzýƒïº{ Ï+dÍX"JÚ ŸÌFªGl$üø%gñ4Í”æ`²†MÁ l{Æ]2ïR ¾[…’Laj¢šÖ®ñ?GQЃ•:@U hÔMoÕnWnõ€×«U î­Ü¥„1q¥"Üg×-ÝfÚ#ÄžÍûj¤K¬Ø¥÷W"–¨A<“OdñÞÊIlFÉŽ„}5ÓžYÉ͇xâØkŠ[Ø®sc²þ€êƒ¨ dÂXÔ•ùl߬ÝÁqo·lŽ°È¹n¨Ž;pìéx1ÂXáøä¨OdH_sµuÓÞîÞžvlÕ0¿Aoä³³ƒÝÞñèàÁ‘tɬ÷“Ócc‘~0 ûÛªëø2EË$.(!ý0çåÅ°sÙ‘ãm;À¼øiùž]¾Öœd\ã9Ó8™Í&ÙP»^‰Óˆ$§!r[÷ý³MÍû¶bõO¿Ë°*Kò½ÕzlíñejVùtÈIê‹£yúÉÿ2–Élçj´gÞhÛÖÜ™šé»6Ÿ’´ˆAèèåLχ£/\îÆ ›‹ɩר~ØÛ5î5’peûµtóÀúÍï8¬é;Ò„ŒC3t]9ÿöu5¤ÓŸŽA˜¤Â-ÈXÕŠËsÖ…—|°«Š3mTf2£õ‰RÁn¨Í”ªO”r”Ìn WÖo¬F~ɺ[2úËbË[„nàh±{y04&‘Y1’ª,^QÿUy°ê¬ßEýxy4‰Ìíå¾­J&’…K¸ÌU2αÂ<6”WÎpâÿt:;_¯ÌÐ?y峯’-D€¯l©²ËÔÐjÅÒF<0|T9b? s+0±(püŽr‚à™‘m¬Þ‰÷ 'É–”~ü’€®bÍjt7-Å¢ç ‹ö¥Í0Ú¥m¯Wpiwe½‹Œ»®ÝñÂ~j oêcËwÓIZ¦;F?3gÜä„Ê"œL ‹ÁÕd™ûë*º­+LÉCE„J¨[ò-UÍÂÚ bq¾­É ì8È—â|@‘"¯Ð”Îù ÓýØœ”.ˆ‰¬süBòþ/]áø‹˜Í7üÆ!PÐس“´ºäbðl«iÛw­#žƒXô&ÀºŸÏbæÄ]¾²íªŽ_)BcûæŽnÃd_B,Ú[¶ê~°=Ä„šg3k-3{)4~’•×£€³¼Ï$‚üÉšFNQt»;ƃîvÏtÒf\ã'Ay[@¥v•“¥’*x¥SÃ{9ì®ÅÎèúépÌ]ËÍÎÄ·öút‘LŒ‡›WõjØ°nT¯‡7«æ‹¸kÌóá¯æ$¨ûMÚÚ­Õ¶”äDõt8[„M h¨Ÿ'ÓùÛFóžZ‰(%_JÇà—Ü×°B†á‹Ã¤AH4 ®†7yüØ ›÷Ó°Ãõå+7tm`éñЖz=W Ž•¿,y¬S¼öÍù//«$þÉLË™ðÈ·›ZÔ±‰2½*,%téô$Îxk7Øû/ƒ‡â‹E!t̾Gõâíõ”–˘ûJ b š˜Ec^˜JÅÀa-4Ø—Pk±6ÜLtŠžWÇw ¶ÕKלU1’ÞêôÇÿºÃ½y¬+(<´à.‘êúl»XÒó¦s]™iõe˜óXÙXk¤¡ûÙ­­Ô6\?ãq¥FªWÝôUÏh}íƒ:‡0LŒzeZ(\ÄÕ7_"s"‘_Gªà¨̦°”EÁgGx´î »ä×õý—Aü²®;ž”•ýþÝû%BÆ_Š‰6¢wõUÐ%s¡}Ë%TwY,Í“n¬4Po‡s*ç3‰9°e¬H Ü‘=Mçè=5_Yøm(Êì*Da|Úßï Îꢷ»]©Ã·ŠëtÞ Öu'yþq1sE0¡êgMÑ–«Þw¾ÞhÔ­À¢kê JJdDÎv”Ú8÷ «Œ#0φ6¶#/äm‹Xœçù„îSrÞn+ðh- I¹¿˳iÃ1·Ï¬G¦Å-?r±WŽ]Lf™¯ÊúîÎÞÀ&ãõ–Çù³ÚXìö/Â.~1k`´s£àUˆÿ†¿[C®¸Ð ´j­h25k뢰燩ÐwcÈS,â‹wæ+TbÐümêÊ¡€½8.SŠmB-åaú1¶qž¦€»Þ=È«kƒ‹DöK.Tw÷”Ð.²rÒtX†°‹÷OWe–\ºØM™’n¯4ËËs1S[fž0€ÉœkaÐO@¼Ów»ð:å6–#t&œ×Ÿß>Φ¾yÒ±^ê½aæœõ¤p­Âð2iã!y¦uÖ‡šQZ¡­q•.16~¹ÆaŽ Qîê…ÑZä תY5ŸîÙ.N£±ÙÈæɇÃż–O%»³Bés-)7`´¤É$PÏ)²Oʼ{žšën1F¬%ÚaÆ°¬ã®+ç·hNåº)ÍNÃ_Hƃ¨¬Ò5’Ê;Ù)Hamh4GzñËʺ¦´ÞJ™µ2,z´(bBÄn$1£¨7áz=¼N¹JÔ”+Éá+Õ¼z«ïr0—'V.þ|ÿDV\:«ñäÄsAêóô*ÿ”dH5úX>Gší Þ-Á,„cé¤w¥æíÁ¡]‘ºâŸè©âõiŽ¿”ÜìÙ‹¹ZG“'9$p£}K8oUw`×û¤T||™_·€žª(]AÐGP²íZ°»!‡jˆaš>H±ð‘ø8*8 ·lWCŸÕŽ™Š!T߇ŽXåCaÁõOw¤‡â Þ}h£áJ©1ªøU¼[œÅ²è„ä|rõxèñr•„Ð^)« ²Nïv|{é»RKÙÛU¢Ãû¸AWºBèñÏK…Ÿ§“ 4»e<ìöOv¿ëÿÐTÚn‚ç&)æÂGs-[e’ÌV]¶HÓ+.Cèãæ­®f¨€ ] æ|1µ<‹©vfY_@µ}ÅHC°]­=Êã«ÅðRšÎÌ¡”¥iÝbÅ>Q"buM™ï§ ¤sÅ¥Ä)HÍ-é^%J¡}WSÔâÑÙ LdðÍREÁÞ@ÖƒfIf2.E£ÁY¦¡ò1ï‡J’æ×XºDüÞ(ï4uÞ ËãþÁI·i1ò„Þ Ê[rãÑáœ=3lS"áS“÷Y6Üþ[Aßî©t¾@ÁùÁR¶OOgg'½ÝV|†¾DC¿Bs¾ðÎÁé7ã` ržE¸«p¼2šv6ÒS©-²·(R[kd”ɧÔR!…½Ÿž»VŽ©N݉ö‘´!ÿ.7Ûˬt®-Êü »'.T¿)’nÁ6êy)œ‰’XyB©P™YU´h>}ÝÙH&³ËäkÍdK?¾Gh•'{bÓ"Ç( ºžuSj Œ6ÑzÚ4m¤Ì±285‡š›NkÝåµh@›ÕøÏÅê„2O°y¸ ZJJâ¢È0»@2̺1²ÿE€óùuµl­ $²¯ÀÀ¼2Ü•zen7ýE) ;²îm-µXçnŽü%X w¾{KœÔÿøGý»f?V7¡•¤ö mš!€ŒÕªcv°ŽÞkG;„ÜyÇ€/=‘ë½õ}Iæ4^7šfM°øÏ"ÁAºle8ØJ2DeæÞÉ8g¨!-5PÒ¥9µ…ÐQ„j±Kšr{5õAÝñR\jÅö\÷®£—_ü®_ } =uýF&ï\w@Eüñ(¨ƒ¸ÓTªCKIpÂéÅÆÛk™!Ò[Ø 8™Ý|™ÏRÎXL§ÌàKK|Z¦7h¯`á;pIIâÑ»cwÞ‡ˆàaÖ­·]6²½ÃQ¸_¸B—ÿ™õ«äF!¿a™OÜZ@×™¸RÙè7R©iÄ=ë“żþ— ×µÆÿšýØ)¯:F*˜S¿Ù pÏ«tö/kšZ ^®É~zHÔÒù© ÙàÏ*ê³%Ê?&j+*“€o#–eðª:‡Úf¶'‹-acåjo7ƬoÅtW¾íÎþw5оÈuàךּu,•rF!ŽÊ÷äÓ‘Šs°¢/ðãJ>˜“—¤°Ïï㡹;¤¤3`—œT.û+^¢Ø ¦Ô ZV Yñyñ“"GÆ°K©d[GÓuŠî•þ£msÛž‹gi„õîm¿,þªÄ§=G—³Ž¾‡êºÎþû8ͯáÙ>¨δøD”šïókÈ™m‰nÎe³ay]“-®6å1’yY9ÅßšôT|Ì´ úæð[|²y"† ÄeË#WÜÔÏÊâòaàäŠv‚Áqç—¦7j/Δo6ë› î–Ñ,€†.ÁͪZÌ2:ÿqãýŹöDÒpIØB$„#V˜×¶¢† 5ãK86Qè^§_a(2ФAS¿³†iJHÿëÂÌ »$e«Ò”ÑoRdš¥ó,¿£$de@Hôze)þË‹žéjî5Ç£>ê*ËBøGV®|4 OlÓ~R£"€Ô8þnçñcØ[E<0Çúp>tñhvb˜‰•Óðdsƒi~³rŽû¦ébø7µi[A-oµÞlUï‚Àµ Pë2qSwÐF',þÍ÷W²<ôzŸš³Ý“îÁà_šš% +Ê|1DW¹}P0^„þŠPõòHJ î5À.+Eé–îž±ÖVÂäpÚ}³×œü{ 7âÕ3’|,ùGÞ˜ÍÆfœmÇðÕ ¼¾Fsœš…RÖöíÁᇃø‚³f}YǪ‰îS'è)ÓbÁÄ ª3vi¥/ÓI>£Ï\,­Ê‘¯ø ½ƒÄ36›Èb Â%·ÃiZgÕ°!lÚ³“ÓÃýÐ!ößömÔ+h«á ó¯øQ]¬Ê&¢ábf‡…ÛÒ°‚ÚtD&óÔƒysú‰iàõ€½4tíq[7k’2aë}aì]lS5d›ª I ¥~ÅBª®ä‡¯æ_»¢W¬ê¨âð'¼vAi3ægå»ÏZP:§ VR¨%ªï‰].uñM‡xQºj9:wÂTÏ“â‡WQ¾R(NdQ§EIšiº¨»ÏÓQ6'°ä4°Þƒw¼ú:GøéSˆâ5Ä@å¥é›ýo*Œžº Å æµ >xÈj¡áƒmó8”…ú§ñŸ‹aûëÎóÎÆziÔ¿býŸòŒ óóõ×ÏàïͯŸ=ÑËÏŸ6·¾~¶±µ±ñ|Ë\·¹±õüÙŸâgÿJ)/"ÿkÎ2ƒi67Ûç¦3üí†æùó§KçÿÉ×[4ÿ›_?ÙxöÜÌÿ“ͧŠÿôÇüÿÓ>gZ¿,ÊQ–w._Gê3 |EDa’MÆ’Ì/†-fBA<Ý'â*²*ƒ¯çn’fw™=~ìtÑ*ÍübÔÁÿ¯QÄ!Ü̈ÝïzÇ'æôìwÿíð¸å}Ò?¨|²s|ˆ½OΪ‘ ÌZýÓ?ÕýÇ? ‹Nqù»Éÿ­­§ÁþßzöäÉûÿwÙÿŸ­ŸgÓõâÜÏh¾ÚŒRBiÈ'Ñÿzo½þr3þGœ\Œ¿ú/ܸñÚÆÍ“ôÕð?ÖÖþ×ÆšùóçíõÿóåçŸí|þù«õø¿@;þ_[‚>¢{þ×ÖÚ_²µŸþ ÚÇÿ  Õµbýÿü?ÿÏëõ×ëkìÌÿ¾ýOÊñ$;/~«ÃÿîóÿÙ“çO*ûóóÿwùYÅâ|v;Ç,ýÆ°oþùÏO!"ý}:ÏoÌws# $¨Ðˆ/\YX$T§¶…çÐÂI6Ɇù4~7Of—Ù°xHß@oÓùÅ¢€ Ë(è1%6Ú[Æ’€Vާד´,ÛGÉðc2Å»é§t’ÏP}'¿š%Ó[lbIÓðÕéûþI¼ß=í÷»{±ù÷ÑñáwýÝÞnÜ=1¿»ñéû¸ûæäpïì´·÷C|p kÇ݃ÓâÞ÷GÇ=cÂïBK‡Çqÿh¯ßÛ…—9ø¼ÄÐ`÷4þáðì8>üp÷O¾•'¥ó«¬(¸8øþÍ]Ì“iI#¨¶kt­¡y}‚Db™µä î%Ïùm<[Ì¡„X t®üS6J9ßç<Çb}e6dw‘Ñ"€ž¢»Ê´š¥E'è‡yêU>‚Jˆäì‘Ù|<èÖ@¡+2TŽÕûÜ‚ÆîÙ J¾Jø;ñzñ#¯“š²Ï!ö{Ð[GÓCmíÚ –à…ÈEŠîš9ž·ŽÆOö©s¹¦¿vº±S…]<6\à5ÚÛ|8î9_(»í“V»}m6D ÿ™u˜Nãµ0 ^$½/ùÁþ÷n‹ÐËÚbùý›ÃÚx˺ <Ä“ÿ˜ú µ[AG ÉL8EæéNKž«â/â^ÖÏQê•=p%œ~Åz÷ùtìe¸äé(=ˆyyF ¼‰¼J*E±¸&‹ñ8»‰)xÅÈlYˆ Ž»ör†˜F‹=W:þng«0£{]l žly‹Ï_¨u7ú—ß¹TïX;zé¬Qjêîá›>7ÈLˆUà–š7­.|˜¶?>Œ ÛóÇ-q|Îe|ƒÑARn³qÓ6ô´é˜4$¿·}ˆ >©„0©çÞa†¬X /9ŸÃ¬˜ÅE˜d.”$¶r«øÏ—‡cf¦ÿl÷üy ' åµñôfŠ ù¬Ì®¸ºY£?fb!rÖñý— –U«ëDÓ1õæD Ý_$㔸۩x 6DÎeA2 ì«ÌŒ Qüñ¥À„ÌPÛ hiÒd^0iÓ8aŽŠY:§ÃÒ«é°ÒH¥µ|æ<‰«#ü¤ÃžlAßõNºïzP9¶µ70o-‡z[3sâÇ·ùüüVXod<0åœ^S4âyÊÊ´aÚœ~Z¤\‡a•¬´+ýsÎ[èìì vO@…Üw\ù|¿²Sù°w||x|¢†!/¶¬¯_BÛñÂ~ôFQSò»yñ¿éüöä¶èOÇyãŸ|7€ñÁÒº­Øÿ5º«Ä=¡%uBñ±¤°çžê\Ag¸8Àä—ØøÑèŸO7þü¼ú‹Ùi {a•2"'óJµ?Ùòbµ¶|»úÌÅ1•}qMGùu£Npèê°KŽÕÉ'§½ýAÿàíaÌ9g0-O°âŽú—üïq% Lë'¦u{Eª”:&É ÙŽlùÊdpnÞ;6áÒxd–!”J3oiØì`(ê3fÃ… -ªój:7óû…Ñ£&\ûóÇQ}«‹i‘]À:+¨œ¦Û‰tŸ'ñ¹<%(<ÃRv˜×žëf-'T›fÁMà@› Kq±ÈÀ–eãJrÝ*®ú«˜/»0„h…\ÖËÝÔh!aãnЛƼ3ªãO€ÞF?ìbž_Ùq=uÕ 4 WGïË£oÌÆ|_, q¬ýæðôôpÔ—’¸è´0ÿD.Ø¢ðFÃÎ2¸šazlf«ÿYÑÞ\BNºúe³ÚNï’d£RÞïŽ?œ ÎŽà¿¥ðsP£Ì~•Ud| †CÝéiýÓÁQïxpøæßÂgR¹ÒŽ M–ÝÍ/¶öúb’vêQk`_T³´ƒ&N5qŽ"úµË›®£”V‚ê«K›«äÆ‘Å€ÊÜèm|ÁÍñõÿ+ã¸ê~ãÀÿ}ü¿›O¾þúÉóÀÿ»ñäü¿ÿÿï柿ù¦þ9~ŸL‹ö¿uâ7yzye‚I2ͯ»æœ˽ÆÏuêÐ7¿6uèÏí­§÷IûiÅ{£?|×ÿ·ú®9Íç`sQqÕKþ0ÈDwn6ºS2áp³º}0ØÙt÷ £î.¿-ÖäVÐ|¬³÷†6åI ¤‹eª™ôˆÒÇœË4ƒ0÷æŽq kt­¤þ:´@$ßûÝïÞƒ N2º¹aâ…½ÌÜÑÈZ›¦Ù9€'#Û—yÜj´ˆQüÑ–x76<3ΨêZõ0‘Ó6Pîßâꔾw `é`Ðq™,)ÀˆôtD‹N6¦zkìt ¬+Ý·™ÁªrÍ'¤ÞÊ{ žï¸7‘kœøÙ #À¨ëÐóFÔ`MzƒÉ9„Èè,^ð®ŒãÉÁ5ƒ«dö×ÉùÛôUÎF¦A¥¿N.ä[]."'ÏÎ#ÔÍè¶ÞAϨmFg]°19oQrl~kòíÎ0y$Xªà9b?ÿÛXØùÌÞÇ=Üæÿh@3Èäá%oOÙ6„ (†íp¹Mä`cÂ`@‡p’ÄSIÏÌ‚]„Üúàt„ô›M ¦r^dÀ^)kfjW³^MÒK½¥9w›§es^à*°¡(YÂ<±ÀÖ üw².Ï'õ¼Ç“dnL¸áåøêÀk@‘­PØï`KPù*Œ£‘Ù Ð09Úpã-&ef^š»ß¿ÙûöäßÁw߃<:Wö Ä Ô)-Š|˜áç—°lç(¥–ÄV«Ü÷Ó"~4#n×(ݨ'’•‚mcç'f©É¢3$Y2uRtšôrè¨ù˜b\ÉLƒ-yJbò4‰¢%SÜ#scfa¦‹Dÿµ¨õU­U/_±úµzÍþÙC4ûúvž·¨ß×7ƒ þŸëRû%Ek¿F͇ûª=îq]ä‹ùu[-°×âŸi|Ç9ˆWÉpžÓ ™rªŠš‘{œ¨Ø¹Ta «Ÿßr,ÐÛK.°úoç0ÌÏ=AÁk×=†€".=ë94—H嫸Ñ!àñË—ñæófüåÑâ#·|cŠË6ãJeºPXŠDpTR‚•Kû·¼Q=Àz„Ž3€J€üâúÉÀãVhágÔáÁéÀ¬¢îÁ®;9Fù´¤73Ø’¶44{Ak/ „>/Ž{½ÁÉQw§gŽÃïú'‡ÇþÁQù:~‚%Þ97ôu¼¡E´ˆ/ä»-fÉ0Œ2#†Ìò}UßÜv…®®= t”šFúM‡•‰'¤z£Óþ~o°×ßïŸzoâ>ŽŸmÑ1†'823KÀt.³+3/%3E¦é»2‚ØÜr/c\e£·"ÑYv¢yntd95O`á,/×i¥¹˜µÑ® (þŠ‘c.Å2/±©Õ¬Üšë.fn”¦sJÔ™»OsijAú(òJù¢tsØñÇ€_ç~ 5çÁ¼µÏ×ûì— „$By–UŽï«³ OÀu‘FÝ‚k”*a;Nõ0P-S¾ªY¦÷ód8«aäñ™‡# +,³„ŠWäU‘ªn4¼ŽÚÑV ë9èŠ-‡`|ºÇïŒÈ>À/ w?Æm·þ’ð^Ü1àÿlû£–¹u›»þm¶kßÅõ.˜”JOýÞ9€Œû>à꯷©ÒØ| ÀIäÑÇë¢DZž¹rnèx´Ë€ Þ]¹>Ú1àÕ7z‹¾™kLÉûì_ÔŽ-. ¼µ ØÉüj¨¼$·‚×SõýVתFœBb6Ч e—Ö•¯£¸w\Bšõs¸žƒ¥ Hœø‘«ÇXïÏ.u:ZeÙðåèRaö€ ³Ñ}‰ÙSÙP>ZŸV^äqe3ùE¨Ý£Öëm«m]ÕJ¹+›ªì7¶µnAF5å—Ñ–û‹üò"ÞDu(ðKiǬy5òªmÔC9­Ý«$3M.бP²* Xny¹P•K³¶ŠR÷Ì õϨðl²ÇQ+NF°Æ9L&ýu“qÐyÛVœ–ÃŽTrævE*£b”3Ôé¯1["7†fvqa®©9îTp&|Ã`zÌk,?ñh— ¼ƒ/ü^} “ô*n¨ïšÁôß)÷Ú+o§ÕÃj£-J*’=]'…^9°ìÍDTJ¯ÍïN—€)ó˜¤ìü¹ 3ƒì]£TpS ÊMõSBR* cpÊÕaPR*ÌVͦ‚mASŠŸ$·paž/&馟›²r!]=ñQ aê¯ÍQ­î˜6º'à®v„õÝæËoj{‹ÌÉ.+…V½—>ôì@×xǘ…Žò¤œ/.b¬ÚkVM¹˜Âñ^ /ÓÑbcËÖ©ö«ÈëùÏ "ɦq \¦ÓŸé‚—&ßÃEµA#†2Ä”ˆV)ºw™€V›N)+ˆ8ñëQ¡¬·º5’8óúú}ìý'üGZ ×|ŠÉù¶"!õšÇc!¹uM™³ð<›då-ç*¿c™:B–°’/cƒÁQ‰œº¦Ô¿ô§¸Ì_üúµ1õ¦KuÀ©Çp¤p l®#ÁN…,¨œ½âu2-ƒ·¨&‰_óÏ܈k&-_È+(†ËÌ×—ÙyVÖñ0OÌ"”uLqr93ÎAG+:wïg]gË6QvQ@èÊ%BiÞüT°ä"Á²ôn-°)¶kÇ´6éÂÞB³cÍOsøc6%ÄÜ’ÄãôÚ¼cR3qå%¼óE2?‡×¤cœ˜ ˆ…ò¬ %‰§ 0ÀSÒÌÂlnŒÌ)h–äpM†æÔDÍ‘ã) hï r~rÀ›Ì#N©à% ˜‹~»Â‚bÿ 9¯ýtIÅp,š(n1ì %,bXÍQŽEæÈkÌ5ê8ó»ƒ(èè£í d‚JÏ6¢ëqSókuVœê¶ø48Hfü4þ£0º…wözÝãÁ‚±Yñ•Lê›øùÓÍë'YQûÕ·üH+âÍ¿÷Ž)=#~Ô¤ëZ~Û$e÷uS¢ï!zŠ ¬v1cœ8ÑÆ=Øýøη€ÉŸÁ.W“…ž^AfÚÏ'fÀ)œ¿BoâN€NAWÖë9ï¤Þ-x×Ú‘NI–+‡…~£¿xµzU0˜ôy¬¯¥)(½ƒÐ‹±]bÜiê>œ` œPUß»¯·õ—ásÍu‡J¯ªN m‚7®¶U­üCwvÈW35vañ,>Zwa@sA-á”&ñ?Àçw*åjÎI)Ÿ1aj5öÕÕEÆ)è23%æ6U*:,_ºº),nz™b,š•  ²H'ã ô@5– Ýx*+²êr÷ËíÖòxÖà ¢µ“åǼnê=²´ËÛ÷êðxj½^º×a‡•… -ÿ̑ʽþAÏŽ+àGÇ·‚0ñ:Éöx84!· ºØƒ‹š } WQ-YQÅ´Ô\Æ^k,%¸,@´6V¸åN/µ-x:ªáŒ¬Or2kÑ8F×ál×äú2‡rë[ŒŒ•/Š ‚=ÅÌ:N 7á{¡sm ÚÇH•²ÀÓÃdƒ"Ý–¼öVåHa­zï<ã!ž#¬ëà Ÿ9<ˆ9¡ÒÛ5«ÚERƒ€¨*Rëo _&xÂWeGgQB.b>®Á@ ˜ê,3xíáèŸPÿRóÂYés¬éËÚzPØÚ†þºßõPì¼ïö¢šö!_ic0BQ¥E«ÏYU¡×­ÍÉZ©`ìí™P’‰Öj=9äb’4 ‰K×h—^ÚßUÕ}("ùT½Å­x«ÃÕ|Ç'ï ´æ¦Æªç8íÔ¼üx*¹qã*M¦È_DOFY–¥ó¦ „ÝC­…;TÚUc¢õÚºW ”Û¯ý0 ·¦¡»µ\0¬<8{¢Gyün£1M„²Ôkv#RG%çP/0Ó7KªšÈ‹C7ð1»-‹‚¦`/ÜÚè£$`›¨³¼—iIKÀSÊ¿r²¢áðàmÿï¾ @wt€¦ŒîbííºNæS<ìž\Šáñ5«ÕÒÕ*-Ë[D…’¾Ôxäáyd („<ßS³†D‡«ÿnê}×;8…Õy|Ú\ž„<9gàÃíÙt Þj­Pߥ­­-™× #¨m”©õ‰k^3cÿNVºGßL š~«oìçÙõe6I÷z'ÙÃ)%;¸Lw_€ÅÙ•v\»oº»‡U©Î.œÄæ2‰.Jœ8VÌ[–“”÷¦>“”w§V/\½=Dó‡Ø>œ’eáa°Ds©à¸jpluÂL¢7åR³n܈æÓlø»gµÚl†z?ùfN rßSH„2¨Gƒ/·Èã✿s£V _Nê£ÐC‘ÚŒ5RCϳòžá>ת£_™N],L˜%aB‹Ô²ñ±_ÝL ˆÇd~Û©kŠ“%³éh`ºõ1B.ðc[EÂ%yšpÖùM,#[Þ<ÞÍ%“r$pBeXp¥­ñc!|È2ûq¥õx‡íè+a¸ãH ã÷7RЉýÏꀼþã ¯7°¨ì•-’œÍ;¿{Žã°µÉ ZW^2cQQfè^4& °<•p[?T ,vgÓOæT êݸ3Ó³ ½dZ®»±ó^5ü>¿Sw¾ÎìíÑ%Ö¡(žÁà+ô÷r½ mÛÉÅÖF9שÁ]`Çëä–b„¤^Ä”6Zþ£ÓZHÓ"¥ØC0Èó,Lg³þ‡àºž é’ðŸXb¿ ¢šZ1¿úšÅt¥ág„Q€=r 2̬v¥ bœ’NÄêÚ…á…ôAÿíX°¨I™Üvüv÷ß5[À.ÿZ+ì79ÈjÀÌ5GÙŽ¬+/ò•tpâp·å€huŠ.=½F×;Øõ¹ÊÙƒô³¸‡Ò¹‘ÆWñÔ ckÜļaºxeœ¹4Þ2_ /¡­9×&8ÏÇÆ̉‘ÓÜF¹«9ê‘L •¯Á(›ÊZS<¹:6»ü…Ž…qœdsÓ2%|3~ ½Dùbn·µZ®Bü,Oœà0ì|^XQ$ØÈw;–×Ú!:]Ì€üLáZÉ¿­ò˜à•½¤ƒÍ `Ë¥ûÝïA+><tOO{ûG§'î®êwñ¦æÇ·ªÏMÞ6‹ç*ÝƹÎ, ¾NŽujÚØŒÉ'0Ejµ ˆÛcb»Ö¦9ó¹…X˜üš2Ì)a¦~— ๒Š•Eì~•¬ëa¤9§·ópéd)Áè3rk¬ÅÀT¡Í"Á¸.7ŒR€†T¿ÕpaÌ#£±Â³è*­88ÊG®… Ô+õ ±)XÚ´‰ûoÙœÄ+¨ò.ÛͨÆplzÉ?à&ôí¿Þè‹qÒ™Íåߎ³ø¥ì…GSóëãÇu–•ôFcVÎes£¹ÄwvàéÔ>$Aé©s>ÔaX­|{ßøÊ=ã,÷Ž·,s`êØ‹ËÒ{Y'êžKó~·G»Ò“U~rõZKüà5ÍÕ¿Ús©ÿx™z©KU~Îêô±î«Ÿ+ŸÕú„¿Vüˆ;¿ê°¿§ÎYu Çpu²þíïò˜¯к°H2–ݯ! ¯~o¿RreÙM/ƒ›l|«2S:8íi Ç½“ÓÃãeBóçP¦#<IXþÒ¤¦×\I**&l]%Åe:ònoµJ4¬;4|ôôÐâ¡ë¹Î~‡kÉ!˜ˆ{ÅiPç«Æ]Ê-L¥ç‹‹ £ÐÆ7ïׄïìvhG•=¨þÀ±`Óòá4R^'#×æ9J'`.‚ßqP½Š“c˜ò7Šij³5Ö˜aND‘¡:«ÛFct$0À¬o€(Ƕ© ùˆIgk€y:3GÕe‘@WÖâÜ´9žä×ÍΪíæ‡z%מ¬óû\ïòý1AN)©§‡§Ý=1_ˆjÀ…k‹Ë„ËD€­}ž]I wq£Èã5#ƒ1;qMzè™â»»‹ZÔˆ‰²«Y2D¶¦5ž9¯ÒYÑjpMMÓkÐè¦iÑüe9¬<(]¼:F¡ßب°ºq'RàžìwœJoT6÷qã¦߸ïv÷÷»ƒÊT¾ºJL‡Zp9f.oL ø¢þßÙ´»Ö£¤ëbñô‚kÈTˆàµiÀ•„«ˆžL¬‹`#&j4q§xÑ"4ú ö5°%Æ`68ÞiŽJÅ’Ò‘‡+z xŠE¤ÝÙöÿ˜€‘pÁãÞnÿ¸·sÊLrÈR¨©–?ôè }„%£Ñ@žp…ö-žB†áØ=è]ÿä´w<Øë¿9î÷{'ƒ^÷xï¯a0ÿB¿=ÝNH’›dçóàÕAÖé½¼3ÂSédðv¯û®yG¤aÅX}Í[‘þ¿›…qxà“:‚Þzøî1}Ž{oOˆ7¡×Û5úk¤1:à‹7RñâÂhÿé¸h¬¤|2=WøhîöÒýÂhGƒ‡Ç{»7«ûÊwâþ:rxrº¬'÷!½®áÍb¶›:\ËᢄbJç“dú1ž€Ô"ÐÖÔt*KÁ_£¡swcÀÖþcÚn¿Ž÷ÙÝqå¶/=W1`n¸ö»ßöo(Ó¼{ô¾ÎI‰ ØË8­ÞƒóEfÆ¿¿>­F­·ÐŪ‚¹ȳr•Ü½N;]¢Åžg h þ7 IÄÈ̸UÄ@ê{é UhdMEê-Ÿ=ol´ìÿtWЉAÀ×g½ÛÛoÄÝQÞšU(Ä騞wbí®Ì˵ø‹…ÑS"]£"3Yõ…“m[¢ŒÙ;¯@E¯ÙðL”Ž´‹ïÞ»Úá°„û®b”/m?ô)ÜoÙ=DZšµç © cºAu1¬„ÿžN“d}@¯—FOpó=,–è›ë›O aÖ|`¢ÿlQØ(ÅS”&oÞéðn‡Ä,¦‘Bù®-"d„o¾ÍÞ,Ù¾®º7Ë ³†¥Ø\k‚_mY"°°öaºcHÍ\ÒÆéáÀ¤k>ÓÚH3R •½û%{(vžþÆ£™”@h"²ÒÌ1äãŠÊŒlìÕ(féx:°×ÐâPe³‘ îªg ¯¤ÓMº‡ƒ÷èžäÉh ZdótÐ/Oó}iö+¼É«¸A¿5Í_•ëò¥{T-iTÙ²â|&Æ+¾4e;§ÃD8È,K©*ß(=|§Ûþ'v9º²ªØñ—´4¡€¬ƒ7Øòhé'õf¶óÒ4îv(ÓÆ36Þþ§›§éM©v„Êì!ülcìæî›C£Àußm5ÖÎdKeßÜúÁ5³Ì~Y{!¼E_ÌÀE‚w|1[kÙJË3÷Ï`N~ö”©€°ŠËy‚ÙLs½hO°ju1Â6L4%©’-!s5`5¦ót - Ã!Àv Œ–mŽ÷:TÏ9ð¡cš*™Œè—PŽq„”H&u‹½¤ŠñÕ¦8[ªºx¯@|WH)ÎXp[c¨®Wä„&xðÈŠÖãÛ,EdÑ”Üv-(”ÁtT¤}þ±MÕ8ØÛ…¬|ÎíÈOƒ:ãu/£à€—Éüj"y ‰õãÄܱ×g„ç‹°›ïnÎjN ù•7ÞL}b~¥=äi1ŽØÒ!"€ Áà4#ÓÀ‘biÙT²‚ÝjWkÅH³­zœUÙ/|sÄ—ó u'Ê{ÚMUÈJ¹€ð!ä°ã9\7i}̯V¾œÆõ»)\•sœi5€Esr g!Q æè „ ø'è`SÁhX›âÞû*–yšg9LýJ½íþ ÷pŒÎfó$[œ2²‹Êˆ `Ìý,t6ÁËnÀìIGeú™F”U€H5/gï9*¡ßíÙû4³Œ àg/ª¡vIû.Ò1õµ²Ö?•ÕWËI!”ªjF>¥r4ó—¸JöU»â4g³ßÓ÷‚*ýâ_,CäPa3ÉR;‹Â˜·sî ý´Xä9B5ðÕ=©V·å.ª¢ówºq•VQÂã“^¿²÷þ%Þˆ_Ч/EyoÅ:À7j\èçi4ð†Gp \Ê5Áéßã×ëf ñS°5G›õ–ð¨H½æe· ´Â0XÍfa´,èB2i|ÑBÕÀÓž|ÝêÑ÷¢Íºƒ+æ¿!oVÈ+e/Ô5R[Š“xÀ~úÈAZWl,1°ûæÝÀìùø®é¹)­xMJ„ý+õç椿žÆ£¤L:K™YëéŽF”ü€Ûø.ÍÎOr;ÿøŠuZ̽1¿M˜à¸·³×íï»Ð±ê0” 7xßë ÎNºïz §á¿€><ªGƦ}òUd­@zÚc!ˆó[¨ÉiÓí[ÞxµæŒ4<ûÞ[kƒAoïí`à¯!=M?ß;í|á2vÜwww¡ì”Ñ ŽÖšÊ©Xá#©p¬ôÈ(‚—ÀõîÙþ‘ë·™”®q (Ðj‘N*¸%_k’‘ Û‹·‚ ) öðÃLjè]s¼«ä=¡ö…SÁÝbõ[¨c*ê³Õ PÑÄB§(»ð_/ ÿ.è#€÷ða¹¹M}ùŠ+¯rÙøú·Yˆo$”"Èqò)É&€t~/׬§R̪˜2×Þ úMiøŸ:ûÏ. &²3†­Ó‚d¥;òôKs²<Ðx_€?{IÝQ Á Ê·»5rcžRz! ª™f'Äw}·Xœ›±6K>£)É°  qŽ&V]²½c_Z×–^^Õµí,á8½\Õ@¯mÞë’Wè¢æBêÏkKX(îXfdlùdÔhê2x¿eK¸ß„žÂú?”7ù.ÅÛfõ[} UL†H”ÞÞ+pa“àŠºª¡¶—úêòr➀?ã­Ô™˜ME,¨l>ë,læñÃé4<%^Ëîu·Ý–o ÔÂnÈÁç1è½2+Œèœjsx]q!äÜìÔxå–³ÜQÕÉ’4¦VôI‚0Ûw˜ÒÂÇØØééñàìÎÅbˆWêÔQç€û×lÞ>P±¬€J¨ŒÕXÉL°4£ê½ïz;§|²*g"ÓÝ6Ì:?0ýØßÇ·MïøD¾Óùª«Iœýªrýh¬kƆ`8`J èyù‡.@î÷åe(AùòËÚg'¬…gˆ×™M*‰K â<1K:º­>h·³‘l½ãÁ»M»vw†‡!K²4¼œâeÓ:S,±Ñ}µ*=½÷}ÿT½Ö’#B]͈7q4Í/eî²”V§‹×§Gsjs@Hþð%~×2ÿyY>5O¼1SGæ6Ð_€gÁÑå•PuçSþ1eÖwd|7²¯Âú.£š¤u’ïÈÐ|X½cWõóÓ—ˆÓ ù›f„ Yn/êŠ}˜ÚÀÂ` V‚N µ*…/-ëOÊWýȃ䕓Võ%0$ÔPñ*Äss”»ôfnʲ8,yï ÷¾jqA²5¸˜òy,+ú sƒÊ+¢ƒ†‡Š·ÅjÊà Ë00åëÃa#Õ³– RÈî³eà ëatΙOéd ~x´8#F«:щP¯¶Ó²ÉÚK‡ú%áƒ_×olMQnÛ®ÿU=ÿÇÎeAg•ƒ­¾˜PQ¯bß<”K(Óì瀪àŒQ¥ÃKPA\µ_|0ºYÍHâ†͵C©<›ÃÅ­iP6T×K2•Ú§À¢HÕzg öÊÅDH°lŠ1ýÞmUæ˜fÁ[ñLÐ[´—ÌkÏ|ÕÛâÕÙÖ0Ö`ÆI¤ÖNñ{¨H>…úé&½N+SÌ|®Gع“@,éÒ ÝÄ À)‚ì(xSýoeh>~¬€ƒ4Üm×¼ßÁ]Àxz'P'aÀl%°™±*Õº‚»ñû—ö‚°h!wðzžPÁ ÕÇ_Ø-Û©ÊÔáá‹ÐÄ) Xó;2úïLÖ´óÍ•A¥@PØ¥W)²ûN²)@whÌÇY)…ô0bPJH&W9Ó9x„Ñ•‡ :6nXÆy©¹Ç²#Ÿ·ªMº5-³9ôJ—º?tµ:»N-Ä!}mçÙ˜D4ó•©wË훿ûÈ“ZŒ,œÝ÷¾eÌ]&é²3›Cx“ºC}5ž$¾—Z :ì’ÐîÉǶÉb¸%ŠH¤²ƒ¿† ,÷mf2ìê µ±gá#hqaK.‹62ó9¤ê¾D1-gíð#0mK T ™CPýÒ«ÌýÒ pÓÐ¢Ü ±O,)8¸œ‘9؉ͬ®àãWáv_ráËØ÷ðʆ7í[ ú~Uýü%ZÀ %O³I²@ëšVÈ@»Â©€ÞÒëÐÇÄV\lS( ¡¤ Àc¶Ÿ|$¿YDÿW´l`Ér”‹%RÄËê~KaPc•îL €q™•Nt|bŠ®ÄtD™EUòNa }UÆj1U‘a³–ÆB©‡ñäùMý\™a–+pöÚ™¾€Ú§iý¼ó·êR5…tðÇAjñ‡ƒÝÞ›³wïúï4” 8'wØÄR³EÚ¹;%òk­Ñõœ±¿0 óÐPÊ=Â'Ëã!ŠÌC˜Fµä øFIÇAï‹ö̲KXK›¤Ó%W+aó·Ã¸÷ô|¢bÜóK¬ ®olRxi]z•Ä õú1ô¦¹_ú¡m˜tìàf¡\¶œŠÖ„8ŠËŸ#ßÁoÖÀ o¥/HC’±y¾@Ú†u ÎIñÖ´> µhlù/êì•ÕL·*l: sãºëºSœ%@ûä¾ñð w²­î¹c²'ƒqÏbÕ^%7TM÷¦EŸÝŠîÎ.µ£‘Üþ%¾‰_˜¯‚”¶‘lzW#/ƒFŒé†>Žî(Ô$Wc(¸A¼ #Ç-\mÏVÎÔÏ3}Ã*Ê/Žê$Ô…Fô5AédØ”¶´0oJB"ZÆ"|X<„xz8Ô9ÎSö:Ž,”ÇjZ­C9õŽm nó‹FE‘µÑ±š[Û®aŽ¦[IÅ4Vj7YÌš –QAŽ3D%ÙdñÀƒdIM£@·iøS‚¿)Ñâɇ¸˜%ÃT[ˆÐVQ¹I>Û®õ­ÐeFÌÖró!ËWƶÕš 8 ®›ÃXÊ6U9®E Mk¸€¶¥‘>ËÿQ÷Eq>><;Ø=;ußõ`‚ÌœÜòt9o©bX€E(‡s¸°éwT‚€Ü6JF;€Èä9®Öf¯–%ÀY€SÜIÀÔ¨ºwX#ÃûZže¯ÆÍÚÞ‡îñAcí­Ywä~â±Ç©0“ùÅ^8ŒÑÑéq¼æˆÌ¼ÜU_¡ðöÐãð™ç×v¾§ãxÓØ"¾£ÁÚz*±Ë–Ýu¯Úšh«³a:ÊUÆÑ©GUnàxÕÅÆá] ˆÔ±-­È-Ï[#Yœàa2£ ³-ƒBeJËš¯…þ ó9XHÓ{§j.Ñ;ým][ÊÛŒäÓGâ¼yäû¤vå4yöBÔY›¥u÷e|ÒwðF¡ÜXõnØpa}gìø׊ނOh†nô¹Õzå³€ d檔˜ÔÚ½þ8”žZäî~íu)„ׯÖª¥ZRÁ*Á½¬€•1{jÁö´ZÐ+„¡L0p#È;¹ïеï9d/WÙ ÅkéxíçnûøƒUÿËK¡éê©x•%k…w¸gb-»COîݪT‡4 ½Ûp'T™øüsÈü õGf dû;^ÇÐký‘ž %]ƒvÚñÖ2!ñ«]$÷t’ø+•~ØÔädÁWúÌk¯ŽøæXRH]KbP²H‘Ì º¸ö§ŒI÷‹\pÒÃÉ⪠`È%V ÖqBAwšëFFÔX :­:«”¾š¸Uûuþÿ{ñ¶ÿ"¼Œ_94 ruÑQö WÉ¿ó>µövVÀ\«ŸŒ]2Ø´ÆWWµÔˆ1ÎU/&†-q€v”¡FËú~2<<é ýJ*V]€fŒ®4ÜôêÈã{£ä`XÃÈÃF‘ßí¬Ûí# ñ—•U`,"óqOƒª¾‚Ç=bZv|y”6ÁëW/`d#ÕFΓˆ³ÑG´z^û©-&Œñsª½3Ê(âçh ¬ÅƒÐp.£h³K žÍ÷bO­Þl‚íÉÕóÔ7éìíFµeW X·ÂÛžSØŹÞÅÑìª Ãƒ¬unÉÜÈv¬ë†o"R‰œËƇ'…øCì0]ùœ·[b¨ã èåî ¶“fÍZ¨l> üÕCoÇa 1yÈbYV8•±ˆ=…ãè"-ï[(è~Å€>«VúLÕ¥ýòKû~ [vˆ"™fÐ×KÖ-S-~£¢…ûáqülc#PƒÞY»-þ¡pÂò!§Szß®j Gj6½œÈS¢—åR…JñH/Pç+ù|¥@ ^Ð^N¤ €äÉh\Øj’1N ëÞ=Å,vÜɺ)'›2àÎ+`‡šO¯¬¬§e¼hÕr &gå³` #-é<ƒµˆ©ñŠ*4°2× ]¡Ÿè[üdš•§aR JJóBe?cä~q©ßô+µ7œ„ê{ÿìä4~Ó3o´ø]o7~{|¸Ÿ¾ï™ôzñ^¾ý?@ïØÃ^ðÛS!è;ÀRÐZLKóhñÀëµÐmiÌb30Ch<ž@pùËÆùÎÐÈ.pælʸêC9H ´FŠûÊÊKyŠbðÚš |„ÝòâaŠ K1äÒ).Á´€'çÏ£ ß«f‚Ëdb¼·ošêî5ïQПq‚ h|tÀ걩öcRq5¼;,~l.4MN€4ä–ÐÐÔ¼8gó^ÛUÓЊ;ë†M*õ[UÏW5u<ÑVžZ55Pî`¦¸ö–’3[—œÐúà­盜ÆÐb+¹ÊoWú@Üm4—•ä‹pYWº­|B˜÷/Ë Ê•…±UVÇ68àÒR|K…ö…n,-a9 TüÓ?Ãö×çõQ>\ÿÓ?çgÃü|ýõ3ø{óëgOôßòó§Í­¯Ÿmlml<ß‚ë¾~þõÖŸâgúú‘‘¿ÿE~¼ù/`Õl¥þî\–W“ßjhž?ºdþ7¿Þ|Êó¿ùõ“gÏÿ´±ùäÙæó?Åúcþÿé?/?Û=ÜA&=˜íøèìÍ^'^k¯¯x²³¾¾{º¿?Ýß‹Ÿv66Š ®%V®¯÷ÖâµË²œ½X_¿¾¾î\?éäó‹õÓãuhêéú$Ï‹´3*Gk¯£—Øú$™^¼ZKü>{ßëîš¿®Ò2‰¡6ØÖŸ^­íäˆßlŸÞÎÒ5ÔæÍo¯ÖÊô¦Ä¦·‡æÈ7òÕÙI»{²Óï¯Å¦™Óþé^ïõ™e²~—ÌÏ¡˜ëŽ½ˆ»1­ð˜WøËõ23ç’¹yõæï7‡»?@Ï6ÚÐåæëÔ>"›†[™ºU…¢LgíóÛ6üÙÞ€ÖÁl*Ä Ba§£haŸk™°ÂæWÆØO(&žÄ{F¿¸Y¿!o¿D:i¸7oáÅ$mCúicL²!­_¾=<8w÷_]ínúºŒÿŠJ¤„ ®lA£”d˜œ7’°ØÇà+†é4™gyщúè?'32·â”)ë‘Ê—•fè•éáËõ±yÐëŽè­×oäí½w6#ºõ:êãÛ|%_1Qa ÜÆEÞŠÓY‚$‹ê&ÌÄzèyŸ½ 2U1â.°t°?€à*zytÜ{•É<¾ù4þ{|1ürRn#z>ýò¢Ü:ŒÍZùά—Ù–ÍÑëèÓ?xu3tãìÂœ×-šOJ â| ›è œÍ³O¦c‘íW+.’Ûxý2¿J×onÿn¦·E\\e°®®®LÓÅ ~…κ}tÜn›~³›Wºó)ûy]x®ð"x£r_ååÞ§lE­½<=}í.6›¦|½&Ý@ÆщŠ¨^f—Äòb®H4‡Ëc¾ ÈkR`-e‹€‰Ñ©M ³E± ¤ó0°~ÌÀê ÖõpQ¦°bž¼®.ãCqòú2k艙¤ÊÕÑáÔ˜zÓöÙ4»iá¿p?¹û[á|¶k0·Çæ3ð7àBS©+ègÕ¢ñ“fÛ¸!ÆæõVt¸rc8ué·ÎÍÍMÄî@3]F)6ƒi†µéÌNÓèÚ>7¿&T^©¹å³F×àÑk§­Mñß°IuÝ”Ô\˜s„AUÖ[q@Æ’‚0ƒs1¬é«ä6ºNˆYú ø3Ë¿†])äÖŒßjaÁ I¿e‚‘ FÌüÑÔàÖ©™Þð@•¸¡DÏ*ð¢…Î.X¡·E"]ÙÅpžÍÊV0%Iž pˆ$ìËåvi9 ¼´ ®ò17{3.˜o¾Ä ûõß-EðÏ~ÊF˜RCó›Y5æÐm‹ž’1" lÞÔìŒQ)ݲl°—@Peº+Ý«Ýg¢3HÅŠ`EÙh9AÀÉ‹I¡Àš üíqR\fXt1͸ž0Àü§¹Q¦ŒÂ3§¦ÌÂ^kEi9ì4qÄÐÙ/û1GÜv î°;&lçñã»&ëy.MWn·:̹ßM‹oPÊÅ”h¾ŒÒ²&ÌúJ®r>àiuÂ]è„tÛB–£òG=3È’N¯ ؘ#\DâcÎ)f¬˜<—:!Ó‹…ÑÓÌ60ò%:T‰ŠÅØÈ\"¨€LGo܆À7ÿá˜ÙBv%²DЃ¹õúÃ<+Ea13x1O®H]ñ,áús¶µ‹açrM– £óô"#9fÞ9öb'ó$ \HŠ¬YùâU‚è‚õR­'oøn‡k‚Ó‹]ƒô‚B븖`ÛG Tˆ‚Îwx­>-jÈ=žª `Ä wÀÐݶM"’ü¨vÉ(ø?Ò"bÏ ÝÓA!ÊáãK´À;OmÊܪ¥ŽæIF Í#°…Ä:4JE°+nÌpX¨hX®A÷ôp¿Ï£&¼LØÑn áeÔˆùpáò……úê@øHè¹Ät¢·f—ãôbâœ8[|^Ð2 bzR*†ðÈq6Žè­hP •¬¤·p˜ÒIMsÀÿ–ŸK÷¹×FÝpë¾Òy ë¡À™¥ýmU¸Ie}€:çV&¤Û9nwž¢6:ÄyÕ0¹F>Ï. ©:çPrEê­oJÉè@O ˆÞÚaOÀ}ø *c±)öbÉ®³¿ƒ.Ì,ó²s‰Ê¼÷MQŽ²œ¿ˆÀoGcƒçð+åÅ¡ã½J>?¿ ÊüÙŽ?Î0*Ä^HhâÑ£cëÌ?ÑMK¯Ái˜ø…ÍÃÄß~²7¨ëy©ªÛìMô~G3/Þ¦ž‹ÍðJhüÔÂnM;Ž¿à÷¡Æ"[͇RÂlL hHêA¶´T)EÜàϮø'å ­= ú°ŽZÖ *nÍŽ¼ŠEZÝ¡l”žævlPhbPŠX'x`äD$®l‘“,¼FyK©59íz£m-&ò@¤Šù×Ë/¤ÊâH™ÝË;œö+-¤£XHT¯ °ú3¢$¶Ù¾ekJ›‚E‹äò^¡è¦-ÜŠlâ?`WvÀ4ñÞ‘Þâ2A0.q n§ ’cÁÔ‰ð˜bú1œm—‹9‹CT|Zµ¾Ès#œp=i3ä×i³o±–:ò}8—‹¼) šAsˆ0¢/æö…Ó$ÎöÌ{ýú–ÑÂB™˜(ÉÁ• Àñ—ýצŒÞD ×hJ¸d`bÌ+d¯#Ï¢ð5óÐæ-ÀÕ¼*š¦2¥¨ràS·l.¾œœ¶/´Z&£ I 3ÆôÁ¼ä‘ÚËóÌÅVæù¤X§>™‰,ÌÂdµå²nàA«=¢:cˆ¥L@c¬¾¹-Z˜ `7³ûZuº¦ÚŽîCÜjnàÏÑ÷lqâPrKƒñ‘ ÌTv-\qy¡-;“Ö`šJTöM$-È¡ÀFoË[•¶bd…‘B«~´²½Ñqz£W­勲 „&8&¡ž,a%@{G ¼ó|t‹U#8_Gúãç_ÿÁ³¾ûîìû'ß<ÿM¡Ëñ[_?}à?6Ÿmmüÿø=~Mâ†Ä⌕Ý&nóìæ›çñî»õ³ïããt‚ÌÇO;[ûg_Gœ5ñVÑ#²äEõ¿Ïú;ßvøš\ ŒØö“ÎFçI õ¡Ø|ÓÓ$DK³"”ÔYÿrÙeB×­.7f¯ÅÖò4Ö$¼¢ª Í­ /KDa,ƒ¹iÌé5¼Œ×Ú|˜¬ §ƒœnÀžÜR#pöû«"†ã-5òNÕ´&€Õð)¹pðÒ!÷ëL °•t"4u¬Šr²ÄS`Ì÷K Þ–ñÐê|%8`ŽÂ’×âCjc`t!âÜ?ã‹!h ÜÌJY‡“ŽÃ5úrÍ3¢Á@@-"Д¨;Š’míT/0€øŽ¬~Gú)5Ñe«×¬Ó *,x'æäÉ;â{ÿWWp z.ßj×!àRŠ*ï8©¹gv>¨ýØR´ÇWà7»*YÚ=0)xñfɈoQ1Q×b |ŒG‹9‹Ü{ñ0l5㣤(âµ·{Ýw'¯Ú»hlŠSg zOñgé]Šv\A´HŸÆ;GgEÜ0%ðDðwMòÝ“ª/ñ’0£ÕH>&KF²‰‹|ôoúïŒÎ0æð³ ä£ÙÁGEb š,™N“ùÌh|yEXi­ñþMó…ìurk\hõ 9ÖKò&:Vj Á>/¤ð¢ pt ’Œù¼³™Lf—ÉŠ’I2 êÁN=^ñ”ìÁ‘a‘7¤ ôx©Ñ±¯«·4оFÕK6*ÞWÆâÍïÊôú¯§¨dÇTn¹¤)' ¯ïh§¸ÄøÉ<…^ŽÄÙš$sÍm™S´½ñM{këÇèçÿ¼xþ›ž`wœÿˆ Îÿ§OŸüqþÿ?R2!Í’CýFK$…Â7!¿ùuB™ÎfGͯÄyŒl®€çJ;i©"¿H¨Sq¸áÇó¼,ó+ ¦¥Ž ç6>!+àbF ÏÂIfÚ!N°] I¼ ý DžPbÝþ÷ñÓÎ&¸ÀCbi6K ¸`Z]ø¤ó½yÀûÞÙqÿä´¿³E(ƒà"lɘ8ðËM>¡+çà‹‚h§¸6!5ÉüÛ߀éŠf:ôŒ}’¦9S‡Q=%3të ]h£æ>$=}}šQEû} á}Ù›±¢D}h x±P+&0,‹%>À¢pÿÛsê7ƒ~ßcÿ?ùzcóI°ÿ·ž>ýÿýþûà¿mà¢Æª9æÀØŸÆ«àßk‡Ðߨ ÎÍ(jô–™í†¥Y#§ffKƒ+Fð eŽ0Ò7yzyÕÞ5öɼhH³ Nº€IñƒP ”‘ElÄë%‰éà9Pw’QÀÇŒÜÊÆ)y\¯Šä[”Ê\¸Ê Ä„dÇBËE·ø®ˆ‡YãyŠEì‘I A¡lZ{G‹ãÉPôŽ»‰n¿ùm ÿ…idÎ&(sg!˜.…è‘Ë‹¸‡Uj°ÿ'é…uÙÇßeù„â5äðãž£Ñ $q>DüÆ®1ÈïV,!@§è"Hµ"!ˆ°pròѦ#|ˆ».¸ÃoM™°8 ÁåZPË‹T(r`¬àÊ Hx¶ÀqûX`ò+DŒÉ³ ±a ]]Ó8«Ìi³®¾‚3Æì<ÆJø¦LÎnÛ` rEà›³íþ»“޻ǹÎ(×MsÈS7!”„qå“;:oExŸkWÝç.ÄjúDß4m`Ê,=s$~¤x»‡‘¿ƒÏ§AÔ \0˜×H<x£€õ:ø ¡!P÷ Ÿ:ÌÐ×<‹H„žÑ$ÏpÊH²©[èjOÁ¢‚L‹%ëÊtHj°u¢JÙù6Db¦âìÀhäa(:Ñ®×ú²¦Iá1ÆÑ“-X°F ÂåÎ`6 ð;»}¢ãTR)vši†À.$žÑžLÌ£qÓºœV„Ù!&]”â/@‡|]ðÐìýÃãÁáÁë–º"º/ œ¨@ð”Ó¢ ™*,1¡?é0Ö¥à¢y€ÔË5:ÛäF6ôGó‘þ|Ú¤âv!ú%®á×Òh€—¤h£h3]‚Èã%`Yr¼Lgè溳—âf:e K}D„ÒeóìKAëC/¤ŠšAd”C’›:Á…Ïâñ÷Z!´§!þ@7Ž@ÀFåuÎ#E{‹º&Ïý10[HiAG*ºbtHÆLyq§€Aj‘ÿçE@óÂ,‡£Ç"Ͼß9:cCBðUÀ?F¼/Ž.fKÐAî pç£F7ÿ†ŒrÜÓZwÛRLÁá|G<¾0j:°ÞI RDì\¾Ê§7Fï—ˆ”™ ºû8QŠ”À™g Xuvn@Ý‹»!+yfõs÷4`<âæ(¡D˜oAèšÈ¦#pÀ‹Ê@0¦†NÉ"õ?µ¸E™í`¶?¤—4Ì©a8:ÓÄ5‡@lXüôƒÐbF‰4&R”qÀÒ”¦ŒaA“!·Æ\ ž³äpLÀi9[ÌAÂ[´¿:Ÿ«`òPÕ¼–õjŸ„@ý$ \”§ZL³´Å•Wøq#Îáô“Ìž wžô QÝ%›æ8 vƒ·d@¬gEXDDCD/µÖW;Jn+˜ÂÁ×Dù' ŠIZ¾R82º¢ZXátBm£åêGw~Pž‹vû¶bÅDÄÓTàCmYJÒh~®Ð­—Â9fÞà8¥¢ÇŽYs´F„ I­öÞñEyÄ¡V£ %FH̃«¤d|ÍÅ.ïÊæy UµE†#?€cÃ&0\¦“Î@¸–llÖ)”pÅnw"M‚[T‘›À!F.Ð)#õýì°Ã‹/+\òЈNÕ†UoãO¨fOÒ¦Û‚FYç„ù;ò&EX:‰ìKN‡}Ä{ù€X†¥·(nb„=RjQŽŽ3ÊÑ»b×+xjÏÝ­cØLºq`è])MÁÍVu4å9Ȧl>Ù@ˆ1”ßf¼ž¬o59l“” q™g%«0‘ò"™ç¿Y ƒh¡˜¯EOå’qË yÜ\¬â<»pg™GÙÕòâÑ%: ¥j´ î9i 327*<³‘¦|Æ[âþŠ0á–Ä™^©æÙö¡Š%2¸]:`[˜Õý­ß[¶© ãl•XãéÕpvË—´f-ûh¯z–ê@HA+Xš1‹m)¢FRÂV‘OŠE£t¢GÔ€×ÞÚøöM3D Bè)lW+qÚ"…h\/"Rkëb˜ä”?µvž_, {N®-»cVW° ¥ƒ¾PÎȲ*œ%¦FäÂ! ¸¬_-8?ñˆ¶âÜfÇ%­Ä n8(o¡8Þ¥§ÐFñRD  4ofg\%3ÖDé¬ g/Š è"T<'€ðNˆ™aú$Ôrµ: [eDl©ª‡"*U., <W‡Ü?¿uéúË`“»„¾y³×ÝùvOŒÂâÊÎ4¡¤$´~)òW™ÄE¥€ÿ³¹Õ¨:²ÉÝy†—4ò'»ñ¸{Ã%%‡³uKÀ}ê‚!rœsµ„=šWÆ È¯|Ey¨aCµa"3d310æNFÃc|}#öõ);€(ŸŒS_W¿"#Ýj<ù°=ƒs<ÆDló<^—PËƈ t#·ÐÈôÀC¦Tüç?Áë‰s›®8Ï…·žLz˜2¤œZ5³<¿ lpx¼NÌö°÷×*Ò+oYÎm@˼èG‘Ó9ª‘1U¶îÐDŸM© N:2s´‡ò žxÝ·^éi^§#¢±F»wìë/œ"ï»Èf àvòËÙ‹=*[üBQ&Þ<‹ë ËxY£.6ÄÍà«gÇ 8ÖhÀQ,ªECëX‘a=Jç–FÑŒÄ`ÔHÞ^¢U*b‰K(ËÑÙRr®ó9ì= Ý¡6å*3æSÌiÆU•MXKzSà÷tzQɲ‘-Û¹ B­mnƒP³Y@ 2^¤É>iTñø[ä>#‘F’V„Z¾ÙÓ”²»{hÔˆîîîàͧ½A÷tÐ; äŠ¦Ë’U¯†ªãx¯QèL £”̬b:MYÔT!Us|®/s&˜u°=ýb×O¶@Q³Ø³VüÍ·‘ùøùSïãf,‚(d22C±(âpÖ0:@ (~EìÑÖ·ñãx=°æŸö†S<ÇP~½4 {Æ SœÓ§rˆÃ‘˜ÆÍ^g‘SÔ͉B¢ÞiQÎÌâ‚󊂥͓#bó’Ù gÞpÒ°²Rò¸Y±#¤ºi ZªÍE…OD®¶óy–ŽÍ™D&¼ÇáÙ8A°^#‘S-MoJÓl>ÐûÑt˜¿”ˆ òðF(ëÇ°`llW¿>Ž› Ðj{'U„‚£FÕ%Ùú㪎¹7wªÍßözGƒ7 4s""K çQ #Ä9†”Hl,O0‹îÖ!â»uˆf+²R€×©”,öWéêªk…Q,ø]tÞŽ¡ ¦ŸN1·³ÈIYÅs@O1#^±X}  ›³}t8ãô”S©š¬†C\ʃ¹¹,¿œ›ƒ³½”]øtVÎ;—‘±%Òë˜m0 ÿ¹¾¼¥“†SÓFvXxQaŸ!!ŽöªU]x‹Š 3w›“&^N³Ÿ©¿MQŽhÍÇÒ¡{XIðsTØq/SËæï˜oŒ‘f3nM^¡÷†aêŒRsçÑ…º ÜJ¦{!òþ,˵‹Vñ›qž"FX™÷¹Ç`ŃŽ”Ÿ°îˆü^T»Nú+¶0yú‹}” ÁuúÞ©0ï¸PŠì*3*Ûˇÿ—zG‚Æ°»S‚(´DQa1¡ÂÂ6>mx Qv]¨L»‘.´^}V¤q÷•×º"óeo 45ÍÕtŠ*¢ò€¡ ä `N}Ã,²[¯Ø£`휑–­hV¤‹QÞ¦µÅƹŠÀ`ÙÙ@cØU3OœçXwH; [`I›±ˆGó°¤Ø;(„TÎ.…pÊg¸ej=<òpŠºÉ ¸kZ¬z”Œ\ê7t‡„¯øˆXÑ€0j âÏ_rûh_J>ðð{ì°ªÇKd¥?žwqTuG9ý¹!ÙOÁ¹€i™^–‚WibD À›ßZD‚ ^kˆ…ʖ϶$® nZ؃c·î{Ýãw= WÛgÁ ±©\U3ê¯#cr‘*#'RTÁú°4OŒY˜c„gJu½0Ñì"A½ ø"ŽØ6Ê`ÄÊ Ë”¸†èè±fÃ!q9¹(ן?…&jö¢'«r(•= Ãà'{Ô[Þhæ=È$ulr‡4ÿ.‹BÈšŽ‚4G®™Bcˆ0ƒƒ”EöG‚9¿"‚­Ö&žýžñØr™…-Ô$®,ÌQúBZÑS‡©žŠ·¹n: XC]šÕçÙô¬mc–åíp‚#oÝì€ þ2³8„ Zx$¹ |IçK™|ŸŽ%º<§èkÈâ#K'œþæ*Ô”ç#âLfæ, N6 &±¸6v /’0nÎŒ&‘R¼Iüß%ÉÄ[]Ó†ÀWA™î¦gaV h¡Ú—¯ŠA3ŸünˆÊÉØoÁ3!N ܃†eÚ5-í…• CøGÐùá èˆúÆö9¦éÔ ˆ°›âq²˜HÊFj û€ÔÑõj{ bzÉÞG‹lë N Éú’2AáÏR Ã-J…#:‚s (X·Y’0±Õ­ý¼SÛ¿ŸšÎ·‚F°WpáO¼°'ÂD =l)\…¥W” oé„f¹,Ï€MÍÝÄ}Ë:c¼Ë­ƒ"ã DÁ*Š îâž&FbÚãÓù­ëÃQ}8#œm•¤Ë‚i5!’6c“Íü–^Ù² Uº®}/x¼óðÔœ3{¢}–ôR^Ñ6–Ð%¶Òl#G ¯.|UÈ5¾µE¡P(N†ßþõG6 1wÈÃ3·ik²:;€“”12Šrï-î7…Êsƒ×lÆË[°@Я2InaëëXÞ˜Ù¯ 7 >°+A¬m¢‘„•@ "¬‡]ñ¡È.šú«‹ȳÍÎæ|ŒóqDše9^ªE8'&2ôŽ^T/ºcž#mßÔ°]:—–¨Ü£ 9ì:Ô‰¸F½xm¶>H*Œ*STÆ=tÖg òøéE)€ ‘ÀTñ„Ŭ/TUPÃBÇ(j^KÒŽ«G:â§yÖjM*åÛ½[O(VŠ‚ia‰–KûTøH¯Œ"[íð I ÖOÇ%£úâ¾~dS -Už=ÁÊJ§Gäav„0œi¹géMñj8Ÿ³ yíÉRÐsX.›Ú©!»uô.M–ô"E]‡Þã%:8†ÍZ]ŠDoR;†v<ÞípŠ'Eq:¤Ù,£éý+Qáðv…±p2„Ä-rÎ-Bö_ßÜÜ ñl-\ú¡¾e^^qX¸TébЈŦ„ÙLàjB47n ‹ß—øTmüÔñ¿\gÓçOcj„Uüo[[Ï+ü/Ï6ÿàø=~8ÎöÁ(:4§Bw÷ùÓu`ߟĽýçOOQWÁ (TDM’ZÜÐ× ÌtïƒMÉg f€wSLÌû™‘pE>.ãï2 ·A9™­g‘¸ÍÉyqݾ~þÔhÃN´öqZ´DShë¶E§ƒïŸ?Eæ˾å4ìw¿í½íïõœo‚9aÉ4T[дòÙ­âR2ŠÜî×ÜJ¥Ì*ºúE¤6Ú„¸µ`h}H@q+0Š%ÓÒ'¨cÌHÓQ´ÙDAOI¥í#‰(—Þú[~Ž®W|cAÛY ŸŽƒˆýš¸ˆb8±_ºŒ;©c‹%-ýÓ!Š¶°;%¾#¸¼GR¼IùàŸ@yC¢¦°sW)ô Ô®kr~›Ï/×´Ýâ•S= áŸ]®~Áu¼ðL1=}‚=µ,˜… Î!#>¨ˆdaI‰‚Õ$SaZ{Š­É.+9Æ1…_kLYJIŠYÒP P³lg. §ç‰ŽOÌùáꤠÂÜL>™3á?9ÐÄ!(\‘” À1cŠ¤ÍÁ/ˆ\ÀÌÕçéWŠùI²t! Ç4Iäåb<¶³m/Ô|õ¸ÅÌ’?›>ºi#ÂË%öܦe°¦t‚òäfNû(iªh­Æ4 ÛTq¥úô ¶æ†™1®dYÐ{GpêÇqcÇ1˜®'\£…ÚÇ0çu:Àp§IÓåñÆ‹ÊÅýàU‰ªÆq-#¯°]…k8¸DcÛŠ‚Âeíz7§¢#±ÿqž}dR+BYà‹`XKHy¡$Ñ­-è¸2ô^Þ­°ð5Wœ7¶U®´š©Wa5ÐkY’Ùm[뽓jÔL]Ä.MÇ‹a‹ŠÙ'BÈ1Šú±lËÛªœÐ¶l´QßÞö¿åG„n2^f*inhsÆV µ…€éÆ(^úó×õE1_GÚøD¨® íÙçÖ>±æy½»ˆI5Ïà‡úb‘÷0Ž‡—9"[¥ðª°…ë[|ŠhK„ @^øDŠº¸\ZÀ¸J™wÝp:ÇšjC²¦È¡1­›+ÞPp»=­`39ÚÀ " w‚ŒUD£ÉŒK`¢BÞœ`¦K\%Üýy1TEQ›-¯n8~Ý95dX!0ÿlú4vË`ý<›2²3"ƒÞ%CK‰gÌñÔY“pª @œç Ýö½tÉ%…€…ãí<ª‘eÓ ñ3Mbk©³l¹Þ‚±&ŇK\‡+û—Óÿ/†¤ùmÙ_ïÒÿ¿~öt#äÞÚ|ò‡þÿûð¿»«åb±ÂDª˜]a™GvÙ\ässÒFvh÷OYz¿\§«éÎîÙéûÃã×ñûdZ´ÿ­C„¦­øýQ¼—œqÃéXƒœpòU9y×o¾\7Úîe>‡˜“Ã:FVÀÛÜ`$,Ô"–/¢_ǃñ<%t"‘³b÷|#¼þèuäÀNAN&Æèä^‚…q v/ÆF)‰î p}’àãü”NH±‡d.»IÈdÏÜDµ'‹ÅüSŠ`bó>®O-Ī] WÔlŒ|½æÏΰè,Jó}Ñ1Zéúlq¾Î3r€ÚíÌŠµ×ñ‘±/â™QN¦_Qz34Z¨“Y:‡âgÒ›)"ªq«å¤&a+‚®­¨cº3¶ê&A?äÒ¡6Š¥63#¯3°¨Èû '–Ctøúyļ.ˆÔ%ßóïò‘3fêUÇTºH6¦HJ¤ƒšãßÌ3 ª`¤ÝÓlv§Z#`¶?ºY¶8Ã.[¿buˆð»¨÷öÚ•%vßûX›ÁXH c° ùδáB¼‡·%ˆÜ W m0‹–Īخ϶j6Œ´ß®ê04bR¼± &£V4ͧm ‡ž 7;#øÒ“2yµÔÉ-"™Í€§ÈÂê̸eÓ°©Ú>¥vXÆPP…Aôø䉣ÍCd]l c§6·”LÛǤ¡¸ÏÌ8Toc#RF&ð0J U¢]\Cî•] ^˜BÖ %:2~Æ"¹ÖlÒ 0ËqFBöR ã#56JÎ0C#õÝsH¸ÙÁúí ÜÉgëND´ä©b½Ã r¹Kpé,¦þÙqÝÙ‡Æð]±7ðk¡›a¸ÐXpñ§,Ô@>vüLèÆrEÒâø‰ýmD =Ö©ô·ˆ{ —c*ê´ Õ«ìfŒ½geRº­±ÍXö•AnÂ_B(·‚˜MÜิËHåçv§·È«0C:Ê©%'¤­S ,û)u‘+AfÁ4¹¨¡a ûÜô˜d‚K²S„‘A®ÌeÂJ4ŠaNÞÚ‚¬lŽzbÆSŒ €¤Ì,ù¸,Õ"à ~Ë®¢Ügn “iáPOD1K…ˆõ >(}ç×ò‰–0Í,hÄ)JÛB$¥G‰x‹"uϤ)ƒ9—ÕŠÝÛfp œÆ¡€´É†¶T`¤¸P”€ƒŒŒ¥u¼J–ou”C8‘ɳw5+o#ÛëqPµ+;v6ÃÒ&pÃ4æà2KˆÜe%Ùk>t¯‚Ù1 ÅÑÌaƱD&-´³õVKg7igN@8‚”~—ÈY…<2´Ò†=1+%þ´Hl´yßš• ;$¬¶lY½ø85¹t Á}[ø?¡Úùê~–\ñh=Ñ°+’ë”-lkÅvà”52€LúóÛÈtwÂýP^¹Ä•Af T¡kšUˆö™Åªk{ë°šÓ€ÀÃÒOÞ;æLÆ«ˆRósôQ LsÆ#ÆÃÅVž¡ò<åPðØäôñJª$"&Ïç]Š¸—(IZšÿZìjîÛi/çŠy€ÑUȉà)•a®¥«¢\Q´T)Øôe`qYTy‚aNvµUH0çøäV‘Þé3QhZõr‘‚“Œ™½ ¬ÎC]3Þ(QTÖSÆëàk>Å*ûßQÇÐøH³ „Ö@e-ÿŠ‚䱸'áúÜö±hy”èýZP|ÉŒ z³„1{¹Þ:Ú-Lé|+"!©ÝJŠsBsÐRÿ0õèo 1n tx*#œu¥a‘)Iq¯|<ç-œ$©Zsêpià*9'0 äaнëѼ«\Y⊅õ¡©*.“ÉXòµ²0¢bék lµ"çÙe')¾yû ^AÕ° ã{ª/Ž‰m΄z˜îQ¥Ï›’ý²“´¶?®åÆÛ1þàg—ç“’œc¨4&&H Ü  :«[‘•”…Iø†´Ìˆu'²ç¹µ@j;aˆ‹)z0P2pÜ[R© XO¬-¤ ‹ZE6eÇaÕÍgýíZ¯½z!ga V.ÈÂâ+š9Þuˆ‹Ìs¢éá~–»_X§Är2ŠråJYv#58)¥3­L$µ PäÇ æËÇi+ÀÄÎŒKkÐy&ÐQ|Z˜je!î– `s"½1/ ˆf,Jmå’ó®X°&$®ðÿC³6ÿüÖ:˵;í".ñ¹ÑnÐ>¦p]XEQFÅ<•`ÅlJALtaÍKgŸWŠàûLn#‚]Hc´&UÏEzA…\ÿÍ^î)Hh4» êbçøìSVpKJœ0̶¿84 ½6[!AOYŽè&©¹.‹™Ê÷ûB³ Tí˜g./ê±bÁ3Äîä ©"¿è=ÞäÈÙê,ô3[‹ÍX ‰"Ä ×K$J;ÔK#–¡iÄ%1Ê îKÅE˜ÝÄ–qRØ•HuŽËKô¾Åˆ¿´ŽÊÖöùŒ¹óèKšëë´ç¨vPéàa\5¬ý9¾±\)‰˜UË.ZÅûÁ}d®–]J¡!J°ç’eŽ-ø`ËèohBÄlhùÔŒíBI‚M&²ggTQyÁ`1OÒÑÖ‡® }ŒÁ¶a†e¤ÈkióÐÌÂ"Dxò‡ƒœShWaM(´£¸°­0é‹•àøØ:Rs¤Ì¡WÉr4»GëzY*¹Ñ¡“8–VÚ£ Ðu:eff€uðe‘ÏE{N™Î!2'¾$@KbÑÃûàe4ÄXn)ENM„8…#çp/U½‰Pc3ç5À.—â+0Œ 0"%0O>V=‘ rYpW9êèÁ°àËè-6ïønGÀ¸LÔ¢ŒIVoF•2ZÂЕì |h3ºäØðLí|…TÝ^tìEôòLˆPŽ8ËBØSè ·ÙÖ¢hU¨,A0B__DõãÏŠ óm 7“Œ@­0ÒIxøŒÂ16ø¬sSœ’”Gõ?"¯áï”ÉÙ¦éo)>dµjâmñ'ƒ¸,HD£ÆšŒb(ŽsYò5K6Åe>ý:B×­K½%×KFçc71ÝÑíÆ“bdO„$Å.Æ -âxQo9™RjN©ÎrN¸+7S”ã Áô)™Û°¶(\nÇø¹c| ëו1Z`/Áa\¦·ÌÉ‚tÔS"P¸¦‹ÔRßÑÈ®iLõ¤XqŽpÊt®~,2ª›?Q­Eõ–3Lw#!Óƒå!}´¹ÇHf Ûf¥ÜWt5…%Lb™i²4’Cè”t #ô>«ÞŠ3!ìq5²èÀ|$^GÎõÙåmö ´ QõR¼—9Í(Âb–Åy‰ nœïMÚìÇ[Íç:·)DˆRÛÈ™sÈž7=³žM KÚ6–hå>&P‰ùçü‰9Q*ýÅ‚Ûb-ŒnI¡[ZA8†kB» Á±mr„«±Wpâ2 ›ô:¼‚“K?c5h‹ê;­T\}…Z^1M±ðGYƒ~bÏ_« q4×tkW„†ø¸4†•Ë’2Ï *DÄG‰1ë¯ÎQºƒ$7ˆ·;¡øGZþíŠÔD‚[L î^8úK|£)@:¶Ëøk£hÒ±HYò⛤‰¯§øŒò°(/»‚^ÇtÛ;àø„¶à¦#»pfˆH¤[MÛȃàFÑeÀÆD%Á8¤åv*=k é$ÖÏlATbK,KJ1à—­gãFz]P‰ «jÚ˜x-5Ç‚1»×Z¬+wÙ0™•ߎ‹©19/!„lZŽµ x\à'^9o¥&ó µl¨]Ö™(Y®0C»ÝÓîÉi÷øÔÀÇR‡cŠâ,7+¦~bßç×`¦´,A´ôBˆá&˜êÈñ’À³ég¸f’V J‘¦•bøØÚ…ŒK—¤it0É“QÇRAâ9yÊÓœ*-š™|ªó šéä=/¶5‡0Z±ÓDa0¥kÅ@j ÆÝñ™.&TýÎôd²mâ/*Jk رHö¶—I’¨›wp Ö`^0ÛÂ^$Éïj9€j÷W3Ć¥ÑßÚºGŽ'éO KJÎ;–{Æè/ݲ¾Lç•=[xàz§ZÔH¨ùÍ›0[—ÉÎÇÙ­ðí +‡œi Ž3ÜÃ" ¯›°[žëÎ ­h€&­Iäê;¢!tMFž¨(Äæ.‹t2¹ÎNݽ½Aÿà´wÜ?Ö…AÐY ðháQZ› S54<ºžpɱâ Ìְ'k×¼Me£ý”¥œœMµPB óæìnan2Ë\hí>|-ѧIt€ÆID?ƈr5£läg”„؈’/ë{“4[+ Æþ‰YÙßu÷ú»RŒÄ‡]Ë«—NÄZl›*Ž¦W´ 4;0û“¹ô„˜˜É4E~ûèœkr·¤²”{3:ù?%¸‡¶Huÿèìäýàì`çpo¯·sÚ}³×«X‹±9šÈ-k>òÀ.,„»Wqr`G0ÖA%~[‚¹¤`$ÿ`V:Â7×iìBã âù,÷‘6oIjRGäóšgsF·C‚;áø#©°Ï^½ù}9ªÇ2Zʽ„(÷Rr ‡Äç©ù æèøðð”fªÇë Ì“¹›ë r;N?´®ù ©øÔ[O˜8HP,áv¼N)õ›ÃÅä¾öôKa<´$»Š€„$:5I ØàÅ–,·•ýl A)øs)tëML²°ûRî`n „„*G‚ÌÁ9ËDj0¢+UT`p€C,ZÌüò0ô„X=u¸ÚY¤±°ºA‚q%Ø#¿e[˜óL…ðY䃶E\@e°.&›üXF©®VnU¶„ÕHkÁþxHñÖvñœrGw!¦¿80Á)É⻽Jþ0ŒÛ%Ð,ôZ’¹À§$:®¥³öpãZºÁ ç|ä¸Máµ"Æ÷eâ“D‹RÖŒŒ¬»P¦!Ï"Íø¡@&ïŽï‚MðQ42¬á`ìËO°uÝZ5IГüœOu»uöÔÔÖÑ•úo.9ȨÄÉÃqÿdS¨U8¾ ¾zñB` ÃÉ#¤ñW]d¯iÕ"€n/E g_':_æJŸyž¹ƒ™f*×+b]ºÖZ‹mt>{*Ç^ Ž»€)œ1V•=¯ôËÚ=uÛŸ/,íªè–d§óäëøö%\.zLëvNsª´š„ÄÅ3†úCÈmÔU¼èBmC«T÷x¨Á1d+{sI½@„ÀþÜHlÚã…¥f°A…´ TËæÅSe£n=™Áë!Þ¿”wÒÑO‡¡ög†„Ž“ê«Ìz† 1žsBØP£l„)*äßä0±ÆK?lÔÕ'¥±’¼gìWÐÖ ôjG³Ã7Êá§m Þ!ØÀ´óÓ"1ëÆÈþÆ7޵ŖšÌÔ‰5š@š¹÷‹\Ý(zE)P›TG- c1Œ­ò(QÑ&å@BŸ¢µ ¤îƒT28ðJÕ=)è;l´¢$4?Š “¿D}ÀTA/J{B[è–hŒØ9öImt…ø1‡ ØñðÐx †]§âÿ!ð¿ ŽçFÑ …CVè ¢ë. H/4IÇ:w ¬©@,”}ý¾mIv!m¯5š’*D°]`yò„Êb œŠVRêkâ7NœÀ䫺Åè2^aÑ 1´Û‰]dp¹Fu<¹`曆œšµLÐ<ÁÉÅh['’þê²Ã0UñE+°øV3DÃo’7Ô$Þµƒ XÂYdr'q9Oå æ#‰€- ¤8½8b£UgòàR º´D;âÊX-ûŽ\”°ŒSbšu­G•Öåeu ´¥\qÂS(­ÑðGç̘aWrJ{ÌÄ©†“mݹ„FDÏL´d€ñ“¸œ/R/´ÀP‘ŒS›|1êHõJ¿l0Z(¨œQͲžé¾Z¯œàTíZY榬¸Â42¨ã–™êˆïþ„5ë=´Q4#½e¼ ÂœpÅ(§°Û‹DNP܃ôšy‘*G©Gd›Ôòñ>o_Ô!öÓ–©`=Уmšz; 2Àkƒ4ÀDSŒ½>HÏ [JɦáÁC‡¦­"G²"Â]™=a·¶ÂØ)gÊ¢†¤’ã¸vTÍx‹2À1çç‹Ò/GX}“¸3$7–Ó`Øbðçs¯¼æ{LŽ÷­.*„](6<ñˆÍ ç¬&›ù¨¯‚³uÝ_;C‹½ˆ¿$?È´5\“¬mÈ'’×q#¥§ È’MÃœ`¹•Èæö3¿,. BÍã|-¦Ns§Ä Ã3f¯ù„–SX ˜ý)Œ {#4e-u²&-iZ篜«L­;¬, ’!y$ñ¬ô8 PçBssaÓ˜ÄSàQ\Æ[Š¶|5kÞQb8àêtB‡=Ý,ÎG³òdIäÀm rCc.åDÕ`#á#pî´@àdŒñr Mô¦²42£)˜;õT¥!F<_¥äþ‹K_dv§X“Né:Áö@Á²º§æÙ åómXÙhØøs f&“÷,â) /eJ N!‰U¾iÁ.»1°Iqá€ð;ÃìÄÈT & èPq0ÖP-Á£-ò¬bÑ#…ßC©ƒ Ž³Èsk¨èÒŽŠ5÷>ħ™*vG¬¹'4áXl±.çó¿ eNê *‚¹Ch µòE+ÒÈéWb uþõNÔEÞiC%jºhKÊ9K`B[}þÑão bØ™X¾2Ôˆ¿qÚ°ÂxSô”ø/ LBñªSÅ»šÄvA1ž’©ÈŸ¹Å0u|.öÔ±… $P¢’tÎÚR‰ª`÷[T1¯9SâüŸ`&¡©e5Ì7ÐE¹L •]ÅUìŒ41ÄÉÂN†#b¶o¦bœ„æˆSðR1һȹܚ%e¥˜žé­cøSK›]ˆ˜þº°Xoñ`YfÑîu­úU(>»ò’À~õÕA&ü#!Ã,V•ã®Á‡äæ܆"ç‹i¡VµÃ´VÑÒw'8lþ!iÓb*®PLBâ$ ØEÁqP ÓQ­Û $È­‚Íy#hç":QÃè"Qò£\LÉæFêrME'ìz§ŽnG´—Õ«H½¸Í0åé±5\ió_2BCªÙN˹ÑU€È5åhaÄ…,kœ\ï ‡K[ŠR&õ (}À]áHäƒ| W»ÜnÔ‘-Ϙ‘óxŒ­¥@Á…†6—‡iÒãèß’O 3Ë/¦€A®o·ÐY³Í…j'Ì£Ín$¯®mŽ>O³Ì²Âîg(ŒâS4àÝŸ²9Ƈ²©Y|„áCørSÄqÇá ;»æ®ÛøM8ž?`IMëIÞhŠ¬'À=º=Mû©ÂŒ:¨Ï¤%×××Ës`dí€ãmýb¸Ž žÅúÌX¯Þì̊ο¯½^Û'¨ð‘àÞqŒÀõ| $E+2¼îš±˜³épr™N?:gH5bĉ6 ¹®rs¸2Ælj@¾NHKjŽågO¥Èí4wlk5tKt9q¿[ Ôó3æAù ©6¶biá±}^ç嵘™Ð/IÂeéãTŠ "ÇzH"ë!©·p-5'ÁáÒ/#è‚Ì(Ÿ.\F½r.GlÚÃñWUP°òh1òÿZhq+ž§Tv\‰TLe{ט¸`ÐaÐ8Ì+Qõ¶xÕHKŠ,r÷¨\…„·#ôÐ `”¢9d(‰>:ôhÁf x¸‘V ¤çdz¯Z[T…ŸP(AÀP½G0ª% g‡´6Û¼uì¦.L+ ý£…P;øÌ •N¦Ê'#Ô“2ÐÛH^½°Ìj}WÅ0Q$ÍBíRØ\§¼V„)‰äìT´xèæ£ò¾¾?º#%9¢ ~?•ì'—ð(Ú¦4µ˜L =.¸lL<<@TuiyË—÷ºhv€0Ñ·8úY8àSt)Í3ˆÁ0uñŽB7GãÙF|U¤ÃBUËj¢ãÆLO6GlbŸu²²¢ r9f&’5kKØØÈ 1{°»Ré|r5Oì:…ÆKܦâÉàýCIy$>‰Üèvá‹ÚO«›–¯=èa£ó Ðü9ЋÙXˆc³]€#ŽÊ÷¹Y.“6¥êæFg)³SJð¬—WæÄþ H\É&\²Æ2ä’×€óÌ,aŽB^³1ƒpS‚JáÞ­X>ÜyNš%T L·Mó—­X뙬.sÈ‚¡Ci„5¢Z5Lz"°MËËbÕ Ò6B’4‹k—'sì†k€–ÄÉÀ’­tE¿ÜpQ.ÎÏóùTÒˆËcIAàÚëT&{ÿèøð´·s:øn÷ °½¹E’õ´mDZÉy×ÖïÏ^}£µO¸8Æý¡Ô/)Ë!€‡ölšqaâ}¤,$€É¦O¶,bQB>ƒÔ´Ó‡€~ ó;þ ðê€îP_‹âŠ\ÝÒhénˆÑÛ}²Öò“|JœhŒ”»ˆïÇnV‰Oè ]zà‚Ÿ7¨t‘‡+š–ªäÑ1…^ÆcôA†Ð«í‡o6¹esª„–ѽ¥§h¶:MXQ´F &õ}:ÏobÓ¾ÉÝÞÛîÙ^°0¹Epk¼ z¢R·µý’_À/ÿäªSãåDG'ØDv£kY®á8>šCš#,JKüÈÕ>Qe2}€g‚ØŽ@|µ]¹(ÒUÇ"¹A£‘X’ QeÔ Àªœû×£×XDŽÖ™¢%Jw2¼B¦ÀÙâ¼Xfl3àr5ªTSD |}óÙ³?o¬Ï6ÿüuõôõ5ðס†ýŸÿy‚êAϪ ^1§›õU+>ÚÛíÇ_ýù ªé¤¼Úü4×C­ü?aåßçÞß Óæ½-dqQR…öÓŒ# Ï‘ª· çO )ÅhœÍ]¦£ž0ƒHœQ»˜¼&3[´ž!¾Œ ¸9<¡¤mø¸x&³Omq|™©ìáìø>Iûw–ßlÙÚŒãÃÅ<¾ÈÁ%^ƒ_€ ‹ÃÄB¿mMõq…C~•ŠpÃ#ê‡ÛÁröâZ'+“­Ês¬0)vGG©y?䢕ãÖ‰.#½Å¤»êº¯Yõ0cŸ3AÎÒW…ãa&‡¨Á…B˜äAfh¸æ(…/EUŠˆY)ÇÓù-{*&#Ó¬%"¤ÃÜÈ5À6C5ÓpaѸÞEw]ðœÍÂ…‰Óé%ZÄ*þšÏÛ5˜ yÅ-#‰pÌ” ]yŽdâ`0┤l¨øf\›¢è̈›Ì³t  gp5(,Â#8&\ý¸°Æ“G†JŒˆö`ØdG}•èì—7ô‹QðG•0â推v„GJ­¨®mÄbI?"-viã{)iXÊ&•öjAtÜ•t渳yö†mÊ'<:Ðx뢚-‡p  Pò£Ž!®~Tw*´ÂŠ"€6‘Æ abÉmÜ«J²Ôi­T¸^‡©sñ䵋áßÖTÍ$ïá‡X®r5nü 'sHe yIVíRcôÞ*ÎCô­«†,ð-Ù.vttÛqû˜\ÍŒ3‡BíŽ=²Ó(ýX|ë^`;|J& t1‰9Ï3%]ÃïkG‡Å¬Þl¡]K©Ê‘*Òâ£ñ²B˜É ¡eN*;9Æ£!Å[‚I)´eÅá2¿|SpC+]1‹ä4fe¤²K\Ðfr[;"èÆ,¼|eY"6Ò¥¹Ôý.‡3¹]¿8ΙJd‹µuH#ØïÚÃLË|~Kpt.r¦Æ AðŽg¶Å'/Š"ÏÆzyqó6® `áuÈkã¢B5p¶»'„é3‚–œ‹†-¦³|¦Ì¶‚‰Ÿy5ŠZ^$¼%•¼’ÒVà!¶uE2eƒ¦yñjY êQò o€,j†kÔXJçÇŽ…øc–/è•8É•x0ZŒÀÃÎøŽdèê%«Í‡9µºÆr[[l.k0rQ5[EœVžÞQ§—•m##ÀÖ'¼;i$ÕZ:ý­¯aêœ@•2£«ýìùâ‰\Ù7ìÕu=Û°¥·Ô¾M¦sÿvvêÿ"‡ÀæD‡JÉ÷úƒ,PënBc¢Ð­ˆ°ZuÇŽEvY*p”J€‹¢Ì‰£#)ÒíÍ ?°›+Î{,xÛÍ9× ÂC¡ÌoI•ø°«\}°£œéà´0¶ŠÜ„\*uËDrH(•­f¿[PFåähEïvœnÊHÚ¯…Ë`‹ä1¬¹Ÿh49€ÑñÃ\߇ՙb•JÈ7ES ±‰ïoÅf½Ò´^aÛ:=Õ öˆÂ'ðÄyŠ:6x}KƧa;³‰ù¯c¬‹u¸‘n)Ö·666ŒA¼×†´7Ÿ?ãÇEko!N²ï•,÷‰œ¯«Îf`ß®G÷à[¾|LÿØÁRè²ÛgP‰š"ø×'XlìnÈè˜ óŽ¼|Pæ/ÎG×Ãÿ—–cºØí$™BHdíõK3K¿¦Ê+Л†Y ÐZ;æÂ&*PÉÿËÑ–5,Õâ}äš{¹~žnáo°×ÑŸþÿ÷Ç«ÿ~Üëîî÷Ì:›Šß­þûÆÓg_oõß7ŸomþQÿý÷øÙÉg·s`ÖÃf¼ùç??i›?ž‚ø¤˜òN>7ÒFð à‹Áˉ£gþ tÑèô}ÿ$Þïóbw/6ÿ>:>ü®¿ÛÛ»'æ×Vü¡ú>î¾99Ü;;ííýƺÇÇ݃ÓâÞ÷Gǽ““Þntx÷÷öú½]xÒÁñÙIZëžÆ?žLJâãþÉ·æ‰G€ó!<3 þ|5kˆAhˆ¥'åì֔韮!§ma^ â7&%…›JàŽ2 ™ „Œhrbtà|É­ª.MPS̳óE™:Œ FÒÛVtÏ°‹ÎCxÙçµ9²O@X?Y® C ítS30”J‚Ÿ/.ø@BÏ{sè·ÿ­C0O˜ga÷Xê+FpV©1g”Nb²…Š9§ë ]:—t󊟳Š&Ž¬ÂÎ 0ú Í-i/¢5öižO¨½bMWÃÒYŠù¢½åðŠû‰—HRUFŽ:רLm˜jôpõoÌNìMfYŠHE£ä=䱤ÛLÀÀOˆ"‹/ b!+—Äþ»¥1 0MÀx®›£²x%jº„` Ã¼Ô N‘è$—ȈÂà Z–½›Yjô:P@·žµâÍ-ÀïSô.˜­o>šÍ:ñæ“ÍgíÍ'O6Lß»0'£ÄfÁˆ©°f¬ét-| ¡¨6“wý¯ Ή0A ©‹o+„8•„«0k2AŒ(×d§hPïΊÍÍà$Êt‰Bh b©-¥ž:-+®®Â¤ ß*)#¥™ÕÆÖ‹r²#/‚X c6¦?ñlº×‘•ŽãW¬9üÎN:‚DúÖÌ:À_ŠõQÚRW)‚²¸:KðRB‘±£Í½ ÂdØ3’ תϻŠ~dA®¡U°a‹ÃO4^EQŒ½q;Ù™w“T oÜ|>A²mè¥W•Š BÈþbn¯|ÊÙ÷m€¦ (a†êIŒÎÜ5LÅ0û|}¼Sˆ…œ(h H¼´»Ó4¶¸²Ý“äÿÿŸ\dæGF,J…o½@³!J&h=šÙI6¥À°M¿w Hà²K“˜R/óëh1ƒ72ǃ 5Ý[ë¯a”![Pù8^#Xðš-°Žær§æì:Áœä•~]à ®Qº&FõÅ=kTšá”°(–1÷êŠRк'}¨š*™ž”ünN¡á^^ÀBN3®ÖŠ T“çU|ûå±mÀ<Ê éÎáñî`fÄN9Ž3 +ƒ€,kGIt!Eëš\šXE×N×EoË jƒµ˜¨÷|]6ì"§¨ Ï¢s#à1Jv™õx#¹ºŽ€¯éh‡ÞÖÕõ`"¶a^QµŒ9œ¤UCñËBL¦c6Ÿ–£=aA#G²Î~‡8ôbÿƒõÿâöêÜLãï¥ÿonn> ôÿ­Í'_ÿ¡ÿÿ?}§ÞPç„&ÿE´ÙT${D¼€-`„Í×Íh˨„°U^àÇÏ;WW³èI'Þ†X’ôæ×ÍÎAN”k.ùƒ7Dd¾†vR›ÐÂabïg2Ã+(mDH3Ld¥‡Ë<{;;Ú"U­\3`7O(¿ZÜ=ê Ç¡%€»®ú¢Ù‰‚ÉU¸ZÄ\LmÅ·ù–,ÅAAÀÓ Ù½/w.\Ñ˨â/äZãbxÍ€ª¼Cª¬9lÔZ³ƒÞ=„͵èyfB˜«EB-›`S„Cg¡÷pô¡w'É`îî &½CÐë&íüÿ³åÿÿlãßPîßOþon={¾Èÿ¯7Ÿý!ÿŸÎé{¨>¿ßÝÛ;܉7÷âµ­øÐh(` nml Ý(eèòñx@äFáój¯(Òr™÷ðyÇÿÑ®äÍ!Ó´ÂIÉØ!|¿“Nú'ÑçWøóòçóáš\X¹•"vÍmw Aƒ®Ÿ•sýå#50îŠV\m«SÌ¢á0ît:F9ï$Qgïû¸Û;Ù9îö¢NßuJ`òÈ>…“ÅEÓÙ­!íX­– e=MU•"Ó–›j*B«ŠàKc’dÀݧÎXŽ‡.ÌÜ$%ÁÚ&KV¢1ÁTzÁyŒlU)Œ… ÊHJ5ä|½Ðgþù­â vl¸Br•@®SZ¸ÚX-[­…í2R(j¹f%ô+» :Ÿ‡ýU]y@ ͧ̅@‘ÈFŽ«tÌØÍdj™fZ= ÊNÒiíMæ·¢ÕÕÁ%ãY©å:Fl¡Åd"DâÃy^81€»éíq¯g¬ór؉½¼èö¹±6÷âacúÄW3JÏ@!…X3MuŽ5Š2+ Œ@Ü?m·÷æì‡#Ú¤¨—˜]Jï+¤‚ÁÔ¸.ë8BÏ‚¹i0œÍ:—”M?8Ä¥W ŠÌk +&ßú=¸YëÞÅx¥MÝ%wœJàŸ²˜CO–Øi¸ :Ú¤6·Î¤:­«p(ÿs§6;âtGUmW WäjåSi×­H$9hü§{.nZ49wXx,k /Ûv}&lDªR¹’ˆ}…ù—bàôb_fðlŠˆRÎÑ 1UC´À=÷W?Ò˜œGq­`+×Ìç˜k¡oàs$·Žg@D—PÔSWÝ:à·÷‹|òÖ$ä æa[×ôV• ÀLò; M‚mÉ®åR~õ#C=Géðëºò«ŽÀ ™9' Œm)òеÌ04#>Ÿ"!´³ÓÀ_(”2zQf*<,B{Š”µÒdxÐKÅ "oòÖyŠlF… ã$¶°÷èsˆëô²–úaΰÕJžoX£^î³ECsš í:]ÙfÐKÕo »¹#A˜»—o#tAäèdbàÂâ½x˜‡cVÜ%<ãK@NߺÓ*ZrUQô f%² {Åê•_Õ±ªø…í‘W[aj‘ÔqéX¯±þÝ¥£qÌeûI—¦äšˆHŸ`i"=@%&K­àØ6O8â‰ôls šÃO㸒¦Û\>ä=ƬàÕ=i‡ý#¬X%Œék3-¨.t8 õŒÕFÊ,‰mm¥iX_‡Œÿ¡zÌö0À;p4§é3`scãÛ7ÈÞ j[¡(ØÁN“”WYHùCz™1àÓX¨‚X'žb{V0k×v øбhžë¬u¤•4òìdöðAH‚¥Séù¸Ú•áÌ]1©*HS‘Xökùœó '2­1ýcBHËçóì"£ê!îöLÈyÁã>r’H³Á‘“È+j;cj)î€ÀñI/§*°ê*“H§»4ú$,ÇÁÍ6”˜.‡°$ð,KiïzÖ“ô†+SÈ$‘Ÿ ‹ÌƒÞZ~ÍNzý·X¹ÉæPáÎæµCÆÏíôO#¥š»µ$Öì34"¦Bxún‡8ÐóUS“Øk.é¾QƒÆhYL.”f¹c“hÞq:Ø»,Æß2n¢PIÁ+R.FAC±+°—m$ ,¶(ƒ¦¼œR.¦—eèÊûIƒýNü!Í ðò­U§Hši»©åÊ1½é9z˜µV´VŲ|©,k-³OÌ±Í –o¾!Ë7_·¿ÙÚp§1;ðž4Aör ¾ÌM÷ìôýáqäažâ†‡ mv"ª+;öW¸›J3¨BÉ]PYzîNÌÓˆ$ïZ”¤.þ»(‹ßÑÿ€ç!þóÉæÖþÿß㧠»>1*ÅÎܘ˜D4ÉXÓ1‚ùêäoØ3gjlAùñVg³ó„TÈö÷‰¤e“?"ÿºñ?ßÙù»ìÿ'[›•øßÖ×Ïÿˆÿý.?/?Û=Ü9ýᨣwûèìÍ^'^k¯¯x²³¾¾{º¿?Ýß‹Ÿv66ãSÈb}}½w°ë,•ë'HsuzŒYO×'yn ªQ9Z{½ÄÖÍ1xñj-…,+øì½9nÌ_WF©A¢ hÚO¯ÖvUØ>½x)c _­ì›Þ^&sc¯¾:;iwOvúýµØ4sÚ?Ýë½´ £óôeI¿\§K¢—ëüä7‡»?@?6_ïèË.71cêJƒ¹ ,Šð˜VÝŒce%"Á‘ƒ•É82W Dv¢‚js@{÷¸·Û?B? ̼ra—önÿÝÁáqã4ÄÙÓ´V»Ñ•¸nÖyŠe«nÅW,xðl>j@÷–{l´÷ˆ€Œh®¡º5zœ¯Ôê®Ù”J%à8ˆŒnEæNB5’âÖRªŒ’Y CÔ¦ZD†žCf#pÔ|J'ùŒóÊÌ‡Ú þ)Zq¶ ×ìpúÒ(EÆô”Qž¢Ô…Ûßí(±¸Ðõâf?é,òË©–`²™…RÌFfzHˆé!'’TLýWÒ*òŸ…žNÒòmØÒ‚Ý}OüνâHŽwÑ8V6ƒ(°NÚÆÕ>Rhh"®ê44’þ/vF-²ÞnÌ#cÒ“ QhÎ A‘(`:DwºYðe\b’^'+*Ö€{åo¦"›®qÆW§³Îfè:Æé™M#±ClÙ5j­)Zèp¶îQ1k½»-ÃŽ®hàÙpÝFþCËÕ&b£À%,\B >bK¤KlÔ3,öÄYŒ”ÆÖý½ùR3øxpút÷¦Üg‘'¥ø¼³•Lf—ÉS—ÂØh·}·ì5¯@¹î) —Tw9fÙ^ò¾ÀxE欤†H¤Ðì¶ÜÑkƒlÈÀà+¤òAõ›ÈEØÅE…Ê&‹Šíš嶦'@B;ãÂò ]ÉïÁݪ çs ;,U樠š áÊÓÔA"¬@%­’›|å·ËÚ ºëî‰ÐGMÐ<`üÉÈqï#tùÅOYzMþÄR}ÈK˜Q>µ|üÈK†¬”XÚ‚IãìÆzkÐUf$ØÐAc0¿é.àîž¾Ž_¾yíÀ.t.Xj¾bô–lóåú9ܲ‹ä>ŠWøÞÅT‘‡c¸Ç’„ÝH®ŒqþÛ&QþÂ>OÐ •ãu$oêC¶ç!rÅÅT9긘º¨tAiØ„ow“¬Gö»IøAÅÿ°ª!5!¦8þxcÒPÎv÷öÌ™Û}³×cBàKBít¢7R„Î?—î£L  ä Þ€ Ü* ÒÉ’0·y=²G}B2Ǧé@ȶˆkÒ®]Ž­È/¢'×-žè@¢k—tâÐ%Ö0¥ 2xDšÐXjÌUäýLçó|^´¼àkgéBtO÷ûXÏÿ£ñ©‹¸šg^e…*/ð`h5Çqtq R]¾N¤… „'G¨‡QjÊ'4“1žä–'ð ‘µ ÊøU2+ØŠ¾PÌB/|8…>%Nìâù.®xµ€´ûÒÖ";ª¥®P:ÉýÕ\5"eDþ *É dÙ2ó6ù]«­¯£?Õ­ÙŠ¸*âò©5Q/žH-hu­m#Ssõe²×¢EäÇŽŸµP˜"aùÅ“K ~aNQGD\¿“àE6 +ÀdðÙ¬änù+ÚÒˆ“ÏR¬‡7¹µœ!æH´|_7íTÅn®Œž„‡}bfÇ0T]MXz͵Ì”ÅU ·×2)lžßW’G]øæ žLå|Š¬\Ø| ò,… ë"ÌPŒƒ˜Î•Ÿ“1O¿db} beû÷ÞõON{ǃ·ýƒî^ÿß{ÇN§ã5³›'ŽOY²-€ò~(t? Ã9Ý’áÇÅÌØ9F®?ag9¯2³)±äÔÏP•+†“œJP‚OµË+Ûž-Ø+[Ý L1ajF;›;¤œÆá‹sׂàhÚA¬€NŠKËîók§­šf—·v=¦ºòR¶ðmÄ-RP3B¢B7§¤‹`õ/É}Q§ŽPSsn3j‰bCÎcì2n1!cœ¥HÏ:±Õ/Ç{õ„é@^ŸÃ­¨%Lle!)*ÔŽ¯þ22«ýÕó§›O6;ð׳'nˆ0<ò ‚Á-!Üj?yò,ñÈßoë£ÉkáÝ…x*ˆaF`>¯è•ÏI¨iÁ1=Ʊ‡·"hBðÂì*%DP½â°A×~¨®tTOæVÎG–Žh0ÕõGà;µeB¥¦ð4È«zÔ=6‡zoÏœíÇß²S–ƒPí6)mi£ m™»WúÅ #ŠŽ‡¿ÅÀ9Éz·"¯šiKÚÈ*¥ rJ ¨–”¯AŸòä:âãl¥C -Ö ˜¯ÞººT„Ó||1ü›DóÁðÚF‘  %ÌöùÅ@@³º 9Q2". :Îß*ar XÉÖ^Ó߸¸ ðøq €7Á"À:r© ä%D;lFj’ܦs¡ûÚÑBÍ«‡"¥ Ý-^U¦PO{A$_"– sOMIâ–* ‚”]\TÜæAÍ•VÁ,Ü/^ ?… dÁœ*¹}Rê>qÖò´ëB-è½ÛP–bÊ"UMFÖdy~ð¥é}œ“9¶lzf+"Nw”¿·A¢fS*©SaÚBˆa…=ØÑ4a圱ÞcS*³W´<`*²-U°/ò|ä7qlO–€·ñê&¦C ¿5p\aŽcg hÀbûª øL,39“—³’o¨q­í³¢n±«zÔœ¼Cõ'$A˜Ü=q•ƒÑŠªïšLÜ+y>ñåãÒb_¢¨ž¸J"·JäsñäÉg~jiØ~$1G¬Ž^Íåb—‹ò¥® ñ{5+‹™¤ñLw1 d*áL?•CM) ‘-ÕîúêˆÌ‘À½¡¨yWõaGüuú“ ­º ’ñèTᇷïS oÏycÃÈ^p¹š3ŠGKé¢.˜Nèc1ù2^ Cábùûd¡BSó6TÏ!zyÆEQã#Nä±±lúø]¥À¿0}}6u_@€š¦î_s®/Œ®±vZùÆñn³×'Óá÷ÊXµ"¡ý‘ Ü0NQëŸ=ç–¨kÞšº;jë•äŒ®–‚© íÓº£`MJöSˆAñ›sÚµ”'ôB6m1φ}²™Ó]ÅEç\‰s`YK0#Ë€'XÝ‘Íw&¥#Q§¤ü,Ûmô øê ë×ÍŠl™Ö­\´PV$0ÙÒ!Ûô®™/ɦ2˜èe¾ÔÃZ7ß!eo ÚÒsUaÃvdbÂÞBT‚!)Kï®j½T¹œ·Ka“X÷›‰oã¥S€ Ï1=’«ˆç´Î„ )Q×^Ÿ¼ëSí1pv›¥#(‘»Î3bƒ‹–ÎÅÙ…y¸¬¢&:ªÄ; NMÖp=ˆ´Ê H„­uÛtkWÁ×tý.öšæÉ£E ´€”Èl™ Óíƒ`½)×·ýŒ€Ãò ê®þ¯¼1¸é© iAEW»—-¥HbìfqO8¨Ÿ1õ]ß^ÊwlUN¯O4ÚvÓËé‹é×\†‘‹61A×`b±~-K¾7N ¯ÈVÅN@ ´Àó2üXï¾ðsÐd˜éÍN§¼)½ºÆ"Ëv€GÙL½ù*+ÑA”Õ~I³´˜ÊZ×þ±G›‚V(-GZÃÔä9½ÂÔ4Ü@à U¦ü^êà†}P+.“Od‹[!·ñ pØßéb؉#øÞn9ê=BXð_®ô^6¥4lN#ˆÙ\ƒ® ζq+C¸Õ<3ú [— ÅÔô䧕Óö•¥¿ŒíÚåŒð¬´iþx¨/Q×ñ“ #GVBÚå &^ákVó"è›à!¿(áX“ *átúàâ!Ÿ;H=9É ÃðÅÂÛšôÒÕˆ»š¬Hº¦Âعâ-ïBB>$ƒÑ) ƬŒˆxh’aŽó ÒQäòS%؃z0ûPaË’ }³€Úmk ÆÞÚ„ RúùÛáŒóâ7âHF ü!eTå¸Ô•wU%2#ë° 2ãä¤õÊñ(?±]mÐí¯ ]iOÁˆ]”ÀYx$*Œ¢j¾7 « Fâ!¤È”õÐ@+‘‡Þy¤§ÝüH[‘ É®,bÎìPƒƒ“UcFd¹¯:êj”±Cøb+ÿbõ_.g¿'ÿçÆæ³ÍJþïæù¿¿ÏÏ®`[r*Ø-1þÀÖµÀ˜BåP¡ÔhOF“‘™s…(È´^U”®Í>Ùýá  H´½Ãînÿà8´Í1€EÂX‘BûÞù¡ÀªÓ””µ)y,Ï“¾eiÒNsÅDãÙô8äÖ÷ªãJhJÑå³}ˆ<b šaÜîBP{þ‘DcÔÉ0LŠx­'‡gÇ;=ÖÊûh‹¥‘uæ˜~õë¹6d* ß3R½J£«‰o•ß`š_ãY€-ÅÅ  €CÂ>ô›A0!¨ÔLÅ„ß­Ÿ}onV[Ú¥—3g¾gYv,\Dªïy ¯/`ß­Ö Õ“ólš0/‹î¬äYAöNd¦‚ÙÅج…|OÇ‘˜-Œ~ð‰iP$œkGÔ'÷ ƒ…æ 9¤.!¶e~›úmþ+æ½×Éÿýdø;Êÿ'O·¾åÿÖÆó?äÿïñC2ª¸ØZÁ˜ß‡4ew6ÅòÝT`EiÛ,ÓïÒùõV„pq9ók*ÆÅkj”̯³©Ù®í‡üDÑQRÎÁì“&s(sVñKÂÔ‰|ÚÙÜ"™É¾csšKŽæy¼õâa¼«G§—¶ 5o:J_¥ÿ3ÃYéR'2±mj>«|ÏV²ùÕ˜)€¥ì' sgŒë¥s1 ÊÄÉ33€2r_FN^þtÓÁ0Š—E/ôu/ŒE:›ÿÞªJbÈ/õëv*­@å"ݧfÂÇhûAÕ±>תk1ÀòŸÌB©!$/½0Æõ<Á§¢+ï®Ç¨ ¦õ=ˆS¿MæWPyjqqœ„Ø÷©[6ÞSãERÃqdþÝŒÛhZC!£ø«ýäcúÖ¼ÂW|$kˆÓlaÅôw{_‘±Ü<؇â²e^\’Ÿ £Ý£!x‘µ6¯¹â0ÿ<ãÊL@Ò!oérÁpP„9káPÅDÌ zËiïûÓ˜€¥˜'–<ºƒlÙ0 ÑWÀ© ïó›Ï¡¤¼(6?®ì ø5†=ŸláW°ƒ®iáw;ÌàlâW#£ÛÑõô³ùMüo‹ÿ{Þض•¥‰Ãó7>Zy»M&$µxIâØî¡%Zf¢mD*vºº†‘…˜$XiYÕÕóÙßóœåÞ ”ššÌò+÷‘..îrîYŸ‡ÄÓþ÷ß+ÊÃŒE 'DúYÉb”“ܙؓa9—ÁÔîòãè5†KöÁ4ܯµÞ|Ccôõ¨Ê@kššÛ«CiS‘ûLùäV&éG.¢‰Š)GK·ÛeëË‹²jÉŽvõ<¸NÞ¬˜êÌõq™ç$©,ÿBò·8c ”´" d´ZA‡ÜùôžñI›«h)Ò©<^ó4¦»Ðÿ‰Õ•¯„³(LÒ@tä²yZœÃÌ~ ÆÀ#½Zk‡ð§£Ñ¢iÈò·ß GÎ-‘ϲ€÷™ôìÅlµZ?4ëqÒ¦a Jdd¥¡sáFœ¤è0sMÑKÓÈr·^Iì5`E¥„«ê“€±Â5ËÞù"å¥þŽ½z|Û¿FϾûiWi©þU±¨Ë¿ ›KWãÅB×  Ü#~6T3Ñ”‹K(µ0rµÕ,ûó*•Å|ZJÕ°t¹äô`~\jØœ3#—írG/wíò QFS¾3r!Lo?1>&æS¤”+å+Ò W‡!kU'W 6M[ÄÅ€\Í뫆w ¢nÈâDw±µ£jPñ"¤ÌãW¦nF†-9%ñgrLW]Íù19¢MÛ¡NÓ]‡÷§0377hÙnsfìäv˜ý§d¸Òj|ô|I>M#»± '˜•©Hœ§Á˜²Àp£~}eÑNIH‡‰Äû5j+·‘Š»Ç¿}~ sÉ#ÐÙÇ+ëÂÒ2ŸëpïZkA¢f¢—/ã}“'¶dã—/É$–)ã4-Ç|ÿ RÁd‹¸¦„#¼SZÈ9§ð!³ÞŠÏ´$ ÅÔP‰óhᣚ£õTêúÇ#1pP¤iõ@´Ó~ ¡EÁyg$ I\•n÷*«“ßë]ŇX~E=[#Åm¢hŒf*/÷9Õ(ÊéàãÈéê·tyL*"cú™Î\åÖ`ù÷ž$»ëÿq¨]ýÏç§éréFÓÔ3"rÿ<Š×þ…w²(î‰À|þ–C½Åoº‡>¹Ûò˜ŽuЋ&³ñŠT9y­l6aŸÕsMHã/GÔ«ç§Ï!ùkÉýÝå-ò:?ëÚGGƒ×¿ô;ƒvÐ9;âGŽ²BƒœTœ'¸¼n ¬*l£‡ŒÁáùÙ›î±W<© ãár™9œÊ’.´dؿñè(å£5¢|W­®ƒ¬ iH2gÔ >¯‘iMÿW0ÈÔÜ¥C븺ú3yFktª‚ púWßzMeŒŸF£W½ž–äWÿÅ–µOí.cuj /¤²ˆÙùn·w.L¸ê×8ßú‡©`T>¢ùœ¥“à5tUOZÁžÌMjÜ°IVé¤c¦ÖÑ?Ü»ÄÊ`ݼmÓx Nº¯¹•×WÝ“#mD7\–Çt‰™k†]J[6:²Ã ªñ×ݳ¬dý‚s±•3?¹ãò6™ùèÒ¼ ’†Fù+Ö(•kQ7©^-_òS¢kÑ-à³”Z+ƒG³W­(îñ›;<Ò6íÀbéä4¯³%®ªÙ;²·;jÿ~cÚ⪋-ôzL{C<Ô"ü‘‚œH¹Xð,`ßüJÊñ§?02J~S£ê¯^>‰ÿ5ÞŸÇ{ñˆÿó‘ƒÁ¦ ïþ(Bº¶¤åý¹.ÇH^PIÃ:DåVª*M£Ð´Q/¼„µ"züÃð¡â äK‰Ïá6K»dFfzcº¶ö¯uù<¦úŸmçfÊ^ÄÇ熨ƒÓê‚äŽðÐû|$…_‹DÂðözòåK{YCíN’ᇠÜ;üQ€üVÓB?®ÇƒéÄ.6Z9ý(Þv)Öå`”Îõ£¸‡ª¼hZ~¡¦’ô¦ /òá“û´øü9X,Ý“²ÂnA6zðfùõ¯$­ y!ýy¸ óåb0¼ZZ¾¤Ÿ C?.ïç£`<ÆÃo¾i íÕõxÁ)Í:ü5Ø‘>b¤¬Š“„o^äw@„xþü: ø é4•*¾õ;ÝÓÔáÆáp$ØÕvÐúr»á`p1Aʱ6‰¢ýø2¿yÈY>ù„s[ñ©$Ϊž¢`³ôDuÁ-™·lÜÒù¥*Ý?K'ï;ôÉ¿ùÄ)v¡_|ÉäYé?Íø7ö“j‹jžØú"áXÒýÞp€ÛŽÏb^Ño^Ú—ß‘0š^¢.Y¨œüï€ýhÕ å !]Ò,ù± X°‰óö"žhYv‘ ¨œÁ"ïüPÿ.ç§rt©ò²Ïµ/,YPŽÁ£ƒèW:Ov\ÐáWÜd+õoßaœÿ[z.Ÿˆ#dIßH?\0M#çMÔ×,mw¥c¾¨Dž]ÚñmFo¾ÞÞ»—6'’…v8£Q“»›ì8Q®C©BuÐÖ≢¶¢|'ˆ.ÁÑÈŠpç~ •”“ël íñ¡Ô$EÁòO–þÏ:Ó°œ“fôÝž~NŸÝQÊxïſ䫨üNÜ„ ú£F„YžpGƒì"槾f6;$¬ V´i¹@C\ÏV†¯‘àçeû´¥RN"&ôr0Ý>¤é§Gê cüäe)R–Ⱦ…¸$&+¾#hlj/,  äµ#Áå7‘Oï¶é0î]œJx'(H´(Jÿ»ÎJ–9™áqÎu—QW.—ðF¥ô(áFîé tߊE¥ey3úƒ9žYÃúÀù”¢·;”Õ‹b,.'†s|Ïe™Øwü )w“ÅÔíÊ%Òõe>ÇY¾¶ƒ»#½ô:_’Á¯]ˆ ë¤*ãFïϲË)€Œ,ø? `*[ZN é À6ƒòñÁÀ½Â`Јåã€z9¯]2zx­B§]üs‡ŠQ£ù”ì‘:/‚Ÿµ­ÿˆ=Ë‚2›Ý›•t|(p€ðurÙ§FÍŠìçH¡÷NØ­ÁDÙ¬VH|¡—±ë¾¬£ˆš¯ûxSÿùdïÙ^µþçÙ?ê?ŸB™Õy×ÃŒW5‹ýVÜfFûô;ý'ÿ㲫wŸ=¹6MPQH%]?þ™„ÒDÏ:‡¤¹.ôbõ…<ï=¯ÞïrS—ß·¾Ž›ñåþcúoMRŽ/Ÿ´$~^\=§Ï4¬ úÏþÏ>F9®v/ztÐ1fY}ôtî§þÁFfÚa€g#m’=²»*»Éu6»×Ùl—¬¸(ærwËë}® jàÙk‚k_®ÿ–Pç·âÎÉÇã>MØ´úúë¯ãCvµÌžÇý l”‡÷š'õ`ü”n*½¬k÷ÖÈ385[no £TÒ¢ù¬=©k]í¨öø°ÞªëŒý‹d¤9¾ÖMÌÂ’ôÂßÉßGí~»×o_ö«· ™æ Õ\y%éçÖ§˜•9x¸z¥ í6ƒ?ßr&µkŠ_Ñ7 òáp‘³M£p•Æ›ö¿–Q»Ò?¯”½AÐ@<4z¸ë­º÷G ¡Çù"[ÞJB»ïü"Ù4›$ ¸`°W¸ hõÿ|œ.‘ïØÃ\Ôꌬ§a#ÛZ¾IZdµšLGüM¼÷éñ ý«Çÿÿ÷÷7±]ð/t'Íhí7§:II÷óêl ùŒçÜöwØq"íõ|UõöætÖåuMñ””OÒNH36,×éòn¹ò„Êý ‹Y­]t W‘?abð‡êÅåv¹Å/âÒBaKÁ_ã´Zÿ„†Â&4Ñôšápµ(œ¦i/–ù¼Ù+u*+ÂZtµ†8Ïq2·EnßTú$©ëê",î§×ù„¶³+­'½´{vlÐhÅìÂÐĶ}eY"Œ‘QR•ƒ/ƒ@x nø]^þíRdH‘ÁÍuQüv¢v¡sv„³è-¬ÚÃq¯ýSûô¼¡’ÁÅæ{hÇÞ?pÖÂŽÚj6[ˆÝíýfSsŠššÊ!éd™îœJQ m‹_£Oâ"/Ñ’d iÆÈ‹¬¦Ã÷1P.º=RH[2´_ûö5ã'óÛ…€Ð#…‹ b³64Õÿ@LùXÿ×ú§¿'÷ûÔÿûxÿi•ÿý`ïúÿïÃÿvwÇÅi¨Dê‡`†YF#Nj+z<? ýú ŸúÜmXê¥ÒoagPJÜÔU#Ðáh°ÙX¤†ÓR‰2‰³‹TEa>z›ŠÓÞtcºPòTæDŒÇŒà4À€MÐ3¸H­¨7ÊÒÔÁŸ…¬M‡Ü 0k£Ø¤ KÒ{5 É6Ëâ©AˆË$òÌ›ªñ4¡ <{¹nÈp~©C J°g†^ˆG¸~.èò-SMhzN.ž=±ð¿·‘à!zX~®Yd'¤øäpº7Æ5“Dê„gÏžÔ­¢QáåHœ%i±TœxIÌÊu uSY·–È“O“T3ìü¬Y E¿Ã›±â¦9€ö’ž{´€Ã_2yXéégࣸžŒ­Dù.G>â~Q‰]è´x°ŽÐœ¼tœhÍ@ÎJ¥9ÉÔ¦T ¦ÚvËBÖ¤ºÀESC®tÎð‹¬PÑf±Ó=gl(Ò-#¾››Ÿ0eDqÚR¸tÄ…¶R؉kC—Þ€Á ŠÕW þÀ®ÉG&7&¬ì†,.~©Âñ‹FÒ'N#(ò›å:½ÅÙ4öÝOTJ24;ˆö0S½1©º3šÅ?TV™JFè€Ï²aôÌG+™¯Z¿s‘¶¢·Â¯Üàx<Òø1ÓdFKUÈ4î@Þ†ØpÎø±×é$KÙ_ 2OÐwÍÆQå¥(î3vdÈeWSÞ ÎÑЫ8?&eŒ®ÊâœÉòêB­ÅþAŠ,2®!s$•ä;ÁïÓºjs‚g³¨4 X7u’á¯Ú’á~á)²r…ª-­KäÌd2ÓTó2TBç ÷…*›žË0Ʀ-´šy•26·Æïï­ÛjŠ±ÎüVßÐI±e¬0 ¤ÀØÎx½87߶}+ëÊÊŽ›Æ¡nå/àI¾`y¤e0¨ ç×ÀÞĽ鶟=q¬oüÅãïž  »Ü=®W+™nWïK÷žöÞuÏŒÉ[1›¢ kØ>Ÿݦ5óúÞÁ¯EæRW×HÀDçm ca¥¼ú‘΃b<Ë´1ët6¼W´1ÚßwRfîKšR¬ÌÉGåQ\ζ´M|u¢S˜:v|‹ey§õˆl¡.Í­*œ+xQÐA ˆÃ„¹b‚I×–Þc®M™î Tvvr&ÊŒŽSÉD/Í8錳é°xA¡š/™½+ –N†wµ¢®Žù] ¤Ý…MäáÍYZ¸Àð€/ÞeËHj1Ã5ü`Áü›c¡´mãûïž t¡úuÅÃÀ+Ë‹)™Qÿ â\'ó=À:BŠÂŠ5^ÅêZ!Ò'å]ƒ–Û¯»á2ÐÚÚý|`^v{‡n*”€ÞíøìJ±š]x/ŒâæèŽÓåý@d$ãµ¹”‘985‹'oI½åð7ÃC¬ïãգʅ·Þ¡“âšöÁNT"€†NÂx0…T_HÜ—!€æFÊåPÁh±Š¶H!#žôeþ†ÜtÅ)ÒÕ†.‹DXJÜÇA×o 3A0U=¬46Ü™*Ih “ßpþ¤œþ¡Ü¦Þ¥N+Ñwd‘pVð¢²séï ¯ýÖå”Vdé xJå9)Ë'+õAaS\s&ÝÃX‘ Ûnzå@G¹¡ »¬gË-R99Î{þŽÈÝÁˆ2qØ˪¦³q^i!NpRX`D±æ¦£7IooQÖ¡ €9`‚Dæñ/“`…j3ü4:pSÍ_ ȘðÈh&EŽzGs²,ñW[u™¯$¾€üò|os“Ìh¨Ù ¿ÔãÈ$Ü+B˜¯èÅèñõ ²‡p˜ÞNz–óÊ2œH†BnÔ˜ìÚèFNîôQˆeT»¹Áå;EYÇÆø mŒ¦”‹±tdk–ÆsÏ•Á‡tûðí ÿËEG±ú&~¤Í3Y¯2œÉ´¤48Cðé¶ñR>$â• Ø’m/©ã·´­ÊˆØcáòüó*g& ëñyïoíïšö‚.ý-®6ôùN^\ Þ_õþ-è7æø8TH0Ä]×Èæ³—yç“ÙÒçØßHE¯Ot±K6PÖ¢Wpر k M`Ä) ûSÂB%Ó›3™‚x’êÄd(ÓÝTÊz”w]ýxgzÀ¼ÇòR…ƒ¢!/>ût šÜ1¹w[³V ¥Ú`|^9ùGÎÅ:ŒÊöI÷øì´sÖß¼T¤3È M'î8S6£BDísœLÆOÈ0tFënM0Ôk‘A ‚2tta…ÚuØÀÙRoÜ×-MÏdq˜GðÞ…ø a€³©ê¦¤•’äH{¢S\,cm¸ø;nZºËi„˘t%Zô>7p`>7S:[œÂe Ìnx„øp1ÊZ¾NÇ™¸£Ôdg²ò0®±æîÉÍ´O(ä0Fµo×æT@ ‚¨Ñ‚Úœ}]V'½e=d“…"Ãm6u×`!sÆ»‡cç­ì;=Õë—ر2(Q)a#> ´)±@—·–8!\:ÏÌRöhãBsCéØ`ˣؠ¾¤ýÑ`_8$áéœq6Ù,ŠÌk³!f«ƒ§^"!kÒ²ê­ÇŽÄôi©2ÑQÌŒÊ}=ªsgEœ”_ŒF[໽ºèâËÚYÃ4` $øÈ£V«Û¸ ÊUII&8ám‰ö:íK:ØÞœ_°RÕåÚ½q{Ɩ†ÅÆ«³ºZF>¹±–Pû„d̤$j†ïìl8›kpÐa-Ðþò‹û.™0i(˜a4"p‹ð)†þUÏww¤vPH-A²ë"/²OMl t¦îR=^%.ðbP¯ëÕ8RÞ` üF/Áo±š›‹Í,H^7D=ˆÂ€sÌ"ÜT|p,9ü¨D ž(Ê‚Å6µÌSO*¦Y“—òßmråÈôRõþØ ÂK˜.òÑJ9Ð&O£xÒvÌ2‡g9µ´^Ã×çýþùéƒJÍ kÁ>àî7¼Ø1—ǯXúƒeæoQÀÖ„‡&=õN$#£L…j‘¥ºX@Ò:D¸•<ª¢šÑ¢Vühm#—ÞÂYqB[BkÊν´rà $…Ǧ*¯¤V(ÞцÓs9é{ç¡xYuo„‡\H£Îo8¾Èжӊ,ug"ÊÅ®d›9(í68zEs¸ÓíݳnßÎ5^$÷ú^ú»ü² A4·nØç:ؼzNµÐÄ™ãÎ]ºiÅñ¹—f7̦ù’UáEZ SÜyÓâ. ¸áF­ã@Ù.,ßõ·+ÚªýîáþÿDŸCùÓ>S/™ˆup²­Sðò® ï€PBͯÉËÀÞýPBç•Ì‚Mª›Eˆ_&R¢%jªÔ(ת‘@'¨öŠResá+ú—)ŸKÌ€T’¡ù,"+L™¸´¡l2ì¿Ö]Þ*øê€I(*8ö>íKn€—,‘:d“0™¢ËÍãÁÿÄ<þ=æ 2þ aKœJ` Cïãp`nï$õk^Ä5Ò äRã²Úp¨Õu2%¶åÕnJi¹"ï‰í±çÓëçw·.d·(–¤ÚjÒÇ ±–¿‹ø5ü’¥Ç‰˜ã×?4d!)™j®^šaÖ]IŸý´j¢j@CJ’¥JÌȯ@[)sÛ|îÇ-¤ Î›{Ú•'¯æ\ݦy]´x=.[Û#l0ኒá;xzqyÞüÒÏG¯1}8Ä_¬9+©[•4OÚÎÇlèsx——÷p·ìDëÜ­û„OTVîr- (Õ±1£Äpº=Ì®éŪ®Òÿ {±ú6º Å¿Ìs‰Q`.™‡òn‘ F:§@êêÃÁ[V½E–'”FK@NK–ÂÔ”<&5e0ôdäG$PÇ/.;o:ý÷ $üÚ¶©Þ]vûŠõ” âia|eíE÷Õ'D™êJÏÅ#“DÛ'Ø<úÚ.j9>S§Õ'tv7óyàT;!+opt~e„ÕζÛøkÉxÅm¼¬ö©nù§â.aÈIA2"ëˆvœ«Wƒó®@º«áiš 6éôÉE1ÙŠÄß\%Ö±÷”ÛKÉðˆl_¬®~0æ_ïÍãª1àzr›)ïÇtšÌ%°BWük룺U/¹‘×(_!_”_×á¦F¹£ œzJ>G,¶ ’dàgsw)p¤>2¸ ãø1õ‡¹L!Œ¥§)4ìw®Á‹|q?IêÙ8]hj‹âÀ|Ë[‰™! æè^ÖæØ U2”ÄD•&”-Çû XÇ|ƒë1V2vrGÿÛ¶w"x”A¶š—¨"»ÔŸ@£‹pÙ\:(èéÅ`¾*nSu3 æƒ?<ìTJ IÊ°¬£ÞÙ”<Ãnsøð"I‰â¨ú<ó6¥}¢)ùâ³\2Óî…è>¯zïbΕº÷xþdN¯9D3JÙç}ÄxzºÞgõjÊ(±ßÜ3÷ÒÔ§‚÷w{>ÎÑH—üþŸ–ª£«†ìR|Ì—_ußNº?u¼s’ÃlSÒGTËn$¦„|§‰ ʾ¡õ2gÁiNš¸b€VäðÿC„H¦%Æ<àJÅl6XÍÈì±Æ¤ï™VaTâ]cÀßÉÞcÃ*Y:yÎÉ8»g!'ÅT×¥:yï M’É™Óå¯Ó¹>Û鹸PXÔdB"©.Ýr˼¶cñæ+ý‡©MÖ¹FnƒXWãõ {&uÍãXÖéâ^ã26šˆ™±á:ç«z³}èJçúq# q:,/|]ãìªSØ „’ŠtÍ&™ÑÚ|Öú´Ñ¨*SþEïÌÍ!øxœI 䇑±¥­#$¼Ì`ö–“†B@…c$ã,v]»xsÓ–)V†Û¨KÈ Žû⥆jav¯ý’Ã@„hÏGš”v»BòX–>׺€bá® -8ÌcmÌs„º¨ŠÔ:Ñ.T+Ù¹Á ‡ šO>ÌX¿&Eæ´‘×àÞ9wÓ˜ûd¯R2fxöT K3 Ãha×ÅB&W²çÜÑ¡kÛçY»tJbNŽ¥Ü¥9¹œàùzO*ÏÇ|ëU½Ê&Þâ2îçe>ÐVžŒ‚Ó…¤DQÈ,TÆ#Èx+ǧٷbM™¨…¥Jq8Åb­â˜P ÷`vãêìæÞHÔÓÁð¶­òsß³þàË”)yžŠÒ8lC(n¡¢t÷Ū¸Õ%ìÙìü[¨ ‹Ý£L”E¬©3§Ž8ìœg¯âLÍMÜRO`Ul„æˆÁEyMI·WeÐ8C6ã¬*BL¼ÁŒlÂe,BYZ2úF0."ËLñ‘ƒèäüð§ò¹:óßÙÚ°üÆÃø¯ ;:m{Ñ8e–Ó,. Ea<¶¹zÂ#K=Žú‹j#Xms“•b|–;Í: NXž?MòÔˆH™ÙÕ$…—R€Ì—GfÎ{˜9|(+ë¨)ó¤G˜çEN`Æ~(¾›Žp}oƒ" Å@³¿n¢Çž]*¢”¶¤¨ç:;Æ\v­Ü«™)d÷…½k8?2Ø|*¢´ŒWWê›F… ×¢ŠM;Wz8§ƒ…fK=¢C¦É½WÁX®™á ë.0·…NÄ©…$MñBQv&‹¿'#.”e>1i: fÇ ÞÉï×zû£P5NB¼´¯F—1ò *N¿ô¤t#öeñ½ ‰,%[Éê=ùPÿ**N°m‹ó`C"ä,äf)D"C*¹Ô|²`VãV] Ö¨ßd‘™IÁÐ[Ô·õÍ›ë;RÖÁ©¹éÜQçÓ¸\ˆnëYÁE³Û› âÎÞ|ËRÀ3Þ®HílDÈ™8ÊÐŒs Ø•jÜ_@+øtŠ (Úrþç«%ïÒØ›ÇrIIMØW¨½ÃPÄš¼u–ÏšóEÊ…!^Úb¯âÄØ4Þ¬|¢h,©'Ø“ûHîob™NÂ媹­8¹&,æÑ3§+…Í=|xË«†æÕuŠüÜøE%úÛQŃWVäÄÒÆÐ~i"GXäî’ÛĦؘ3¢Að´0É’‚Ê9ôÅØ_šŠ.éòž>;p˜ÌÏãÇA)Ï$ì¿ã#—!Q*ŸÞ\&­RÉ¢gr.G›ÕN-ºùˆ”]x‰8î…Ø¿˜"b0ȳ\/°•CwK ƒ«²ácÖÂ#¢¯šcìJ²m¾áµTD=j€—>Çœ>£WäD»#«˜:¦$kY!úf÷Î>[lgâè«ø«mZív#ŽóNêÁ‰0 ÕeÀ¾éšÝ¢z‰†ØÐÈ©¤qÈ‘Þˆû—WUû¨m¶š HŽÕDÔ™nÉÆU£•~|ŒÀÌK½”ÀËFb4š³´XðÐdÜ‚³™´®úY,†K‡W x9?JiC¤mzX‰ÆŠqÍ[“¬ˆcu‘6Îîm1*ÙQ$Ñ)Ó`êŽâîlX8W ëœÐÄœì|æÕ¶„†¤xH‚rªN6Ž?Žt¦&½©¥X 3/18ˆ2T2xÝä&åš(YÎ,õ}¦œÔ å‰6‡y¶ ‹>,䉆8™i<’¸åf“GÊj3©IlÁqÀ[ý©zaúI´ps: iÉ8(r­¹Nï´|JÒ éÇáJõeœÉœG”ÒÈdF¥ ¬HïnY* ï7|‡ÿÁÀÂІiðër¢ãš? b1¡6K¨ oˆÄT|;ª[ˆ¥|8cCÔdœ-©IáªfMDI)ÄZj¤ˆ¯1Fœ*[–6{fX}¥†F*žMS™‹@µ©d2:ØÛ{¼á×ïðÃÓ­?EúÙ“ ?Ÿ¿Ûúƒ»ï]²¤QßáM£(ö*$Ltz½*´ ó8aYÜÄ5þO+_Œëø1]©U„Zé½³ru‹ÌH,¾h÷ßþ3®g„%nˆMUÁ[•â×Lƒ O(ß*û#›Ç z…0yCñ£^isÍãxgÓh1“¡¡žŽ‡­b2Ù–{¥ ‡ÿ<¢¯†+ŽÂrǽҿ»»9_-‘‘W¾¢ÔÙîb’†®—¸Å½Æ,:šW¯Üð¦Óô8yŠûQõ îd«õÀˆDQ÷ìâªoÒ¤oF6c\Ûp ˆX('päµ–Ÿ 93«Î@êt¢Ût2oÄãÜZÁJiýãÄÿ_qþ£>‘¿Óùÿí³½ý5ü§'ÿÀú]þ•-àƒ?´Z#EjÄYÁprt`ó‚«]n䪹ÅTó—ÀG†gUŠ©ÀœFÆŒRõ|I–ÌB-uf¨™9g›ÃØEµkq‡yaÚ¬eóAêx?ZÝ*¦šÈ>f՘УSÜ"¯’t©HΘSùZ:&GEpdpÝ+™Ó„¤Q‰‡W*gùÝŒÊ$[ºâf¡UÌqQsã{U_®k©˜*¼FF¶¸f_¸« å¬ ÁžA¢ ô<€ƒOøçÞ[ h© I¦ÀºŸêûD’ŽÆ^'ï‘Áƒ˜›W úŸ¬¤S¬Æ¨4-¬‘uà9Ðg÷Az+§ï ×­zdtRðí‰g Uµõ-ñFkBæ¦yT!‚}Éü#–z½–â\ uigêÁ1%¬heC€íàœ°O¢ Ñ="®e8§FgæèpçwêŽÈˆSÙx|o\ÆR‰kldôƒ‚ÎÊÖ>r '¼Úd"<þó³Š÷ [çü¤}ÙíÅ ~­IDk`³Á¼(”®ÅfS¾oª0~9GU⎈FµîLÂöŒvìÁ«â»ÓÛªь‹ƒé®‹÷†™ 6ø ¯ߺfí4²«ï‚\‹H¾Ñ·´_êa[²+h_/ï5SÒ0ò1ŒuY °i7q|>“|÷véHD‚Ñg ©AÚ{KÈåÛ]åíãø¢´Š¬ˆÞU¡²ö~Ìô1Mò;‚Z›@æQ)äo€¡éXJ)õ6»»¶d,"ÙD_l–a.‹§œå¯Oâu̯žƒ9œ´›ˆÀù´šYMÌŽ¨5ä\¤‘¬SWÈM;Ú2yÑÕàT=>»²´å4 $ Õ¨ÑÒ–â%-¦tñâæãâõáö ¤®Ç7„1m)ûT­3Ï•¢3åcoñð–Æ;šW!^W7N“ÑC–Ñ«}²Òê2ÎÑ M4@4sK$›+dp÷ÑTUC‹8ì;M9Þ$¬Ø+2>0!oI³nþØŠ_çéí4b<=a"ruÛÔêIÁA¼œÎ·0©è¥šçË…5>öd4à”K¬ñ¿P½äÿaGâßüû³þŸƒ'ß®ñÿ<¡Ÿÿáÿù߉ÿƒà¹y6º¸"þž%Wpù ò§/êé„T¼ÕÜás+í«þÛóËWqi5â^F‡9À-/¥ÆÖç2~{Q±›¬–·ùb#¢øoï ðÅ-ùõÑ»c!ÿv¨äë' 9I|Ðœðs°¢r^ «¶™èÑx¤a]Y•©Õü‰ |k²9ÀJ…vM+ÊpQ<íÏHM[†Ù[•†MU êèMnVI‹CÍ…eî­b¦ª¬†r}_ªÀVsÜÝóH‚AŠ‡?b˜¶wv“2)ézòzäKªaÂÕUY×`^²5aí‚GÕψÏÕÕ ÐvP¬ç9R’ò«µH!²¯8;^t_¸ydˆ>L³Ñh’òGÉs辚äwŒÕʵºâ™J?Æs>T]¤‘<†´êÕœg†Aæx’ MRqØdv9óÒÞkòyúZtQrF¹{Š[·ðhyÌ ¼š3Ú ÃÜZ‚d®ÙòŠý¶ï¸yb¥žŒï ‘5ß2Ѽieí¤&9ž˜Îøözòáv´ˆ¿.aûoê‘Aù¹ó7¹Ï¹Ë¥¡ho¯%\P[2šNÕœ»ÑÐiâ3ÒzËØ’ZÇd¤\q‡N/Ž¨ö8Þ0E: ƒ®Þ2õn&¼×ÂS.Õ¬”àöšL³¹¡f“õSÝ­z6ÊöÇ(ýä±i#éf¨¼¹íXiÏ/L·$ ¶<Öy¹ÍáÖ_ äöe{¨›X$¸õý]Gj])â`!z!Eùxc¨QÁè‘%§Ëš½MZ ;'7—tÁ ¨”Rš—ò &ÉQ¶ómÂré¥_Àp‡|*©(Aq¼NeI™€€»v¹M’ØHVW}Yþ”…N¢‰[4ÞÈJòù€‘ÅRc·þ½%”1XѪ\UwÈ` Ô+Sσ+K•ïÀŸ°íòëZ &8\i|V‹™“k°Š'Lõ``dÊ±àš¬¬Úò–6/\_˜4$­»åëåK¤ÒêV CQ†{Å®]nÖY¼X’{‡DÄauË\ò–šoàØHÀ*X‘ù¹Lù íû•8Úæ1ÎSI°‹—.Ú8ÛX ¶uaú•“oÝô[»R¢jØѳ¹ÏAÆo©?Ál–•¯ç¶Jð@ JR<ì[.>ñ2Ug¢ìÆ’ØÎ]jÙÒlÿEÕ0|¹uï7ˆ½Í=ŽÄ@"V(ú’ž#¹aª žgzP#¶2žÍ;»3“œ TýÈÉÅÉÒ\¡6\ÆŸ™•BJÛg¹;4ضîîöë'+HQ©Î åE¤åN5“É`–M +»Áè'éçºgûñ@g²ÙήNNâ6.~zýÀ»¬ìb‚Œdƒ»Y<ÈžA‘7?ÇK™¤@%ÆìCpÇI;~Šlúš¶7Š¡áój€RÄê6i/ˆÎ%µ[‰>3X:ÃÉ FÚ?)£Õn8g|•³†®rLZ«ò!½_¥ ƒgèz²Êë#8xÖÞ³%ë³'lP9Æ°]+EÏWõB-ÑŸgÎNãÜ@儱iŒÖ˜ À;9ƒñ–z7(͵§ t?®-e.ä×ÁRµÖàœ—Ü.AÖ'U•Tdt‡N< ÎæÍ˧u"~4öŒ¡>Z(k|Dä¨K€Ô)œN¼<é¾µ5¨¥VŸYv^±Øá§[IÐNÉüÑY0wàK6ÿAuØÃn}û|íÆò¿ƒýf{¾h~ÿ$Â?|óìñúU'çǃþùÅ ÷oØßÿ£|¨9þjïzÍÛ×'?õºÿÖùÃþã?¢±oškÿ¾ù웿Šâùó¿®÷ _õOoÛ½·µÛ¬._l¸=;êö.Njó:¾ú»÷Žþý{só?<û¢IOÞðãîú­·ÙÖëÖÿýû€ÿÅý·kßøï6}õð²øù˾ûùáVþúeßý5l%døãok…FIþ®ÌÐ7¿­/ÿ}óÏým­üõïÑ í¹ÍoôBÞêËZ¡=ÊM¼ÐŸe\qõ×_:ojˆnêÝ4º×^à~›xx\þºa\XÉ -ëÏŽî¦VØMÁÕE¬>gèÀÜÚÊÇm­à-,T ÞMã’•VÝÆqùÜèÖ€ãÖ vÀÇøKÿùV4 X—V®³—ñ_Á|òºKòæ?šþÿÏ&ô¯—/o³/ÛK_Ö[ÁoµPI éûïˆÉ]qÀáÖG£/kES¼cL­ì⸧Ki¶Vÿ¼dø¦ùê·ÏÑJ†ß»9}7·r›¼Ä x{t9h]ò‰·± º­7È—Mÿ‚ñú&8úþ*ŸY¾|FroÙË¿tÿÐAâ>ÊçñÇàî‡G“Mdþ·KÏùFÏðoìb¬Ÿo vЋöE¼÷×ø¯úó_ÝÿÐë’ûìká=bÕþû掹M`ý2£ðáÞÔÖiûýùë{ÿ4øecNW½ÒWûµô¢ßìGÕcd̃ëù¯[:W~Ñ/ë×—µõ×8vBðá~mžÌ¿~É*û½vŒö#ÍÞàüÍ›^§ßÄtüMíè± Т½eÙðW¬g$ºÈ@¥ QîÉÅ sÖGzÚöä߃ ¨W¾4MaWœÂVj·£E=®•ãuÚº|^ è‰{¹rïà ¼~m$ÝÕ#¿^¿ù¬óûnwÿ™¸P{TTzòà0Ô*­ ëAñ9°‹úš|ˆÖåâgž••÷¢ñ×ô$1ÿû>Y£®Ÿà~ø;¿Çð6YN)!$÷õ« ¦ÒÃÏ(5ºââ 4 ¹ÿÙ_ÖÓ¨r*^&I±,R©O=h3„­ü÷‡Ohjå´}ùi\ýž]¢ƒ\¨ªMš6éȈ–e‘¦ YP|ËšÚ.–•–ÙÌ$‡ÈðvEâ,Ü#õÈ+mÛ[C €wÚ=ëž^~í”v $%Yo|ÁèÄqj=ä>sTϤ§­(2T£j–€x­“…¢@ Ê8­\ªbäÇüÎàrô±ü&â§éТ«¼CR8&ÜñpPÒ75EËE#LÈèžö~ñ/¡–rb„ËxÐ#eµÔüIEjU½4¥Ùù¼„†Âöú—~§÷%šZîê²|÷+WZ¡%À„°•<`"€ëîjkPN«¿~vI9†„òUÒÜÿ²&6}™û 9ý™&L^ojâ\èÞçzaþÖ^dñ_;³}6ñMÜÜô?ßèØëþÕYw:Ç_Ö‹ÿ¾¹Sÿý7¼È¯~ð6ÅL½åáÜ. -ÈåIEbׇ¾[ÄÛzRYøåžh#®/]•ŽyÕêK&hË?îœßzŸájO&ƒîY¿sÙ=¿\ô/{¿y’˜’öWÉTF<ç³ÛF'éÌ7QÊ‹ÈonÐd«4ÏŸ=RÚÀÔ%á”üa¦«¼µiHY E/vÙ n/ÿ¨Üþ_ÿ[ “Éÿ‚àÏäÿ>~rð´šÿûlïÉ?òÿü_Íý=^KÅÊH®3`J»4ß IºŸ¹¹]†:v$´¥LHÉqãLáæQ:MEó]š¡ÀcC‰T$+†'ê…}Ma¦dɆ?*³„§MOg³EÎDLe° ŸÿêA1—kuè÷l9Àá÷r¸Y‚Ø¢›I2¶˜æm&ø Ö›ÞÜ@z†9;ü*®ìr=Y)%Ë|. ¬!b64GÙ’‹b ©Š­Xhæ #¯·6=®ô˜d¨ó±–Rq•NUŠÙ ~ê:CXg¨ò”Ü)˜s¹Zp&j÷2óúV›‹tÂyk¦aô„©¹ÚÔÛ=œéà:€ÄE‰Ùs^ƒ‹/Ï7FER¤ Šhœ(žcX+‹§ 3ƒæcÏÏ*Þ4G䜾ϋ ípêk‹výøÚ[0jœsóL+ÐÿÓœú.µ 0mÒQMïp"®w ˆ’™·–ͨߛ–ö=böJ(º‹=9‘rLIÎIÂ9â‘òG.çÚ[$¢;œl@‹f,2ÀH†‹ZHX?&3¾†Ãò«ã±Kᇣ©ý&g5óã¦+ ­LL~†R*bwiψPQY~ŒîP›.>ç×ä•$¤dàÎG’¡FC¥䧙E’øÁ@R’°ã5pØ…ò­f–åEÛ7ºË?07—<ˆ=ú &þ Šð…Å›^gšÆ)I†…2’…«kŽDšÔ&üy•®Rá¢ƹÊé§ádÅ9¡DL42^UGa`; ]O&÷­Ïï“摨Sƒ“óÃöÉ€aADú`…çy‰ªv.©Vœû× v~T¤‡¿ê/ÆCÒwÓÁÔxåñ±œ`äæùÌÜõ;°T,Ó0å*aö} ù²ô¬"Ù´5]R°´eäã%£b ©Ege7AÎ2žÑ°9)Cb[ÓPaØýlÀ½pÅsý¾dÝ1H]R~[·z0U‘9 re»’°ìy6`‰SÐÆØŒÄÔà†¿¬¯³ùa…–oÜd ø”¢ühËJ×}ÅÇ*{H=f”½íLÑ&´¶Kà…¡5‘ÀÒ­ƒõ[Dr9*cñš´^Þ–š)ÈpèB‡¨¤,Œö¢º¸bÄ Ý ÅRô¸ £Ñêc¹Å8@ߌ"µ%·(RšÜçJY²æÓ©!·®ÏEkS9rØìZãÀVNU¶·'c:·SQJÞIí:Ã}éH^͘”)^´c’o^îÜ.—óç»»www­ûI++ZEkÕ\æîóV2lý:ßww^ñ!Ç6Ÿ ˜Sg6Êq?¡w×ü…D×_’»äÅnòÊŠ®fcnÉQØçV£·ùÒ6Ò>%Å´"w™ŽA÷àRê7h•0ˆ< LhY™p,÷™ÞxœÍJˆj‚ê؈<)tR$ói (¶PÅ3Œe­rY°ˆS¨9 ¼ÕÀ Dôƒ—\Aºõ’­(>Þm+ÓÑ(lzt\9—/€j²´JLÄnØnN†·>XA<ï+Yé1®™Ëzëä¼[ZÑÞ(Œ´b©Œcc—©nÙ ˜ù.”úM+rúŽ§?›"ðdRÉÕ}èÖ„"4·jÆ©T'ÉþºÎµ7˜'Çz&½JôèÆ¿¤à²5f6 !DfÛ}`~8¦_){P¹À½º¸øœ ŠûÙðv‘ÏTi0•,Ó\þBxŒoŒçŒ‹„šeñAŠCt<\­.?µêeŠ>Ãý­œ¹µ6·~ÎvF±4²O,,°‘ Ë)'ÈoØI´6Úº æcf•`n0ôÓ ¤åâgÒ¥ÙŽ%M[D")ZÄ£ÜrûG¦5Š&iiÝH¾·œ³€v3¬¨2îÊÇçL v[Hb9ȾýPB ‘%]ŠZxŠ­ÂC˵‘(Hè¤ 'Sà†ðÙ< ¨9GŽ6Vü)UJ šÒB9Êßo·b´Æ{dýF ²4ìa«âõ½ƒÞÑÃX ®^¤1WFCOi ÖèfÅÙFhJCÔ+½iÄÛ߃:T°§HçZ¬À "”³#7Uj™ç‘ƒo‘Q:þÚÔ1ž¿ÑÑݸüˆiöÉ{Iײ¶q·l¤Úü^Æü‡zО7‹ & åeÈñmúìW?±KQhxRaˆEíjn›ÍÝ%:l™ÒÐÛ;5¥ptìê/Ð>¢•øC£Àåêwêℬsz¿Pæ ªF4߀Æfpjò†”‡Þe©OÒtrßP*Ù$`I³îxRÞû57h6¥³)DŸ{-_*uÕÊ^¯Š{öÉa—1B•1Ýù*¤¤â5ØP59ËÌvÒrèÏd–æ«r„D˜ ú˜}º4DR®8˜FsUÒó"®ýƒÌJ©y \ΔózØß‹ r£ünV_ÑE¨vªãsÅö-Ÿ1$O&:„–0)2)O&1uô¦¤™Ý^ÃËßBYô±ñppM»%Å ð€ÃGL4´/9/Q;TÕ)›»úGœÄ™6˜n‰ÏüÙV*»jE\Œ\º\d»ž÷œº8&æú(»M´'®óL±•¥˜»ÌpŠ ñlB£šhÓÜÛŒêдt¥CxS`!ó›=fì5:“I°/p¶¬¦q·ÛÝ}º·gdÞQèI;h´ödë\ê¹hhb¬f< „¸V¥Ú-¸:<þ>¿ÌÌw&ðtq„Q߸B‡ØI÷ìêý L‹(Ú,(ÃÌ"\*‰žû{­Çê)ø8?xÜzÓ‘;ÇúƒŠà»\g˜O†s/©SèDÀž¾›á‹®Ô‡oN׳HÛñ$»Vï`êÐÓ}äý¨e¦ø€ Ï” ™,h‚õFt°×ú~d¨ó‘º‹ ž´ž>u/´`0]Q+ZRÚìfä&ùÈ-Ñš»ÍŽGv¿‡Ô0lp y­¼M0ÆÖlyüÀUÀe„ÖdµG^72Õ#x#Í#’Ù¥µWœ¥C‚. ¥’oˆ”bÁåS8 ;+ïòÊ!(:€jˆQpYY°c?DsI ÖON÷0(¦þ{™1Ù#ý[¥Ä™—*Œ‡qOÁ=½LÇ÷Ž3ÜPWê«b 3£‹ªgœá.oð ,ÉpÂ…ùz~DNì’°*Ô±gø%›^£Dt¾(!»Ž•î©I*G& iˆ^̓‚:_!µâtµL?1#¦l6A“Ô¼— h£0Iº \¡lâŽËl2i€y\ q³?…yHGG´ËsµéïhøI2ÞÙË4l÷a̪°â•ß….å÷©Õ¬1 Tcp8CΛÎ!®ÚŒB˜?øN‡³+¸/ÐÒ×G«V÷PªôÚ«…šûª¯ „Óf…zg,Ç«Ó›t‰#dšm棌ñÎâ!àv€ò‘Ao˜ê°XYÛ)ºš)쥞`V†ß~}Ò‰_Ÿ_u.ãöI÷øìåÎaÙT;øõòÕ‹þÛWgn¤t6iíÜò/ûC´F-Zuþ=ÂU9¼‚þßžrDm‰ oGø¢Ú:ž<Ýöã·­ïä7×ÜS[Ûû¾õýÖöè<¬íí²ôFÕ²‘9—$¸w#ŠÖíbÜÆõ¼mÓGz°{W¬s€qLÕ·éãæÆ°Bø1) v6r÷”u[?ì5ШGÉ0pæHkëËù#ßÌ0/œC¡!t…Ä÷[Oô„[–Íô OHʃÇ8 Qù=«Çùe>¸¼ËÔ˜7dµô^ìþW× Ù°“\ñ•#¯¸˜[— +‡/`ËH¦ÓY¡$íª1©ÒWÅ!³’E%S³røŒ½c¬ó+Á:ïmzØ-k-p Í=c £‰çHi¢F¿L8ªHzE¦ æÃK6÷²ñ!„1GŠN:"k´–µÒVà›ZŸ Û†Ì5 ‚ÐÛݦ¯[BVsÆC!1“~Ä,åv䢲d€œÇÔ’;ÀTæ&)›"‚ÈÁü»Ä!{ЙDV9䊘ólévåºú• ΀&‡_Šú:R¼·žoMÆãE:F”Å.¡Ÿï²½…s´˜v à$<¡O¨(·E<[ÁébÇ· f3@µxÝØÞ÷A&Ì͹ |»ñD?Ï{‘àMx=`ÿZ7.gzf›s±ÈítpÚ›»ˆdøŒôPöSßЂb݈±v ¼¶@zøÿ.à&þŸ@bý.ø¯ÏžUò?ù?ÿÈÿüøÖ“ ¾Å5ô[2&=_¶‡;fñD£¹®  2&˜‡ñŒÖ½KjôÛNûb€Üÿ—/8kþUÜ„›L8B¹Þ‡K|PôƒŸI,œ"­ B¼šGŸ«¦1ß9û3›+äIö“Àó‰‡÷³­£Zf€FŽø6£A©=úð¨?:};ñÑñ£úç[Óù'†ÓöûîéÕéÆa8M>eS’lsŒ³ Oès+u5|ðÉùùÅàülÐ&í¹O;Ü”ø™\#ÁBÉf$¿Kl%íÒ ™·6õÀ‘#1I é8tšd_bâÙ†˜:=%ªæ íqÀªœƒé3¶$ˆ›ƒf‡šCT™–ŸÜÃ|±qn™þ¨ã¾Lhûî,ð±ÌßQ¨±¡òlj¨”ÛiüêYîuö^)R’F I&Úñ‘ ö¤ ݯ€ °$©Ö‰úd65bapa E¦ÃÛYöçjÒœ_\vÏúƒ^¿ÝïÑŒ÷i ó!=‰oŸ†Ë0¨©Èx‡çgoºÇ¶xŽoºdz5Ù‰0K¦N磦x,`^ÒÑ»(“©”Û¯¼Æ–§Ÿü2ð!÷Tê;¬ôG)¡V&¨¶—#Ž93{:÷@êÚ–í“ï7¹ (ÙK´I8>«é BÕmE&p£#á”/U™žŸ;—¯Ï{µibm“£¶ÎÖv°þÀ£«Ó‹Áeçøê¤}yò =ëØCúÓ@ú…4ZMçx3ü—)³,>´ñiC“à{*Ù»aëg|C__“C¯¥zc;Ê ÅîPbŽ5ñŒÕìkgnG#ñ#X››¨´dZñ ÉžŸœ€pªí8§^Ì |Ï©‹‹lTÊðÑàV¸P’¿›Z›ß¶¤´1öñyùÆÖ$†_íuûð§þeû°ÓÓwrÓ;ƒË~D¶g‘+Ux RVØÞ9íš¿ºP_lì×÷")ÓLçãÝm¾·[ø©Ó¹àNrÝ›åzݱ$wä‚bŽÐèC§’C[½Rü6šœ"¹e®¤XV÷æõfÔ]%ç×b•Hæ‘üêM‘™J îD<9Â3:Ü\mÇôhM28à¦f‚p¿Òtµ T)‘yéôzP±5]–4;š°}™7q©¶»À%k¶4t8ÆÀ“Pضˆ;œQêm.?a +òiq/ Bö4gûmoáþ˜›×ãO£A!©Žúa6¿MÂÊ‘|ØÖ˜ˆ=ã$Ы ^Fán×Üw:Ï&ÄÅ“Û¬Úµ:g?ŽñkK"'H”‚}fÍaªµæ8éÎÅ,£ž­ahçÌJvÿ,>® 7͘ñŒ\¯$t¹Ϲ,ÞÇ·t çq¡àF´®@˜‹B RÊùjÜ‹õø·¢õ#uÁTÄR1bÊîåOK›œsM*³Ç•‚x}B’ñ¤ÛëÞµ/ϺgÇ4dàPÔ½* Ü&›4û„Baaµ žå´Ï/Öõù#¸YvÊÖf§}yÜ‘wOJ˜nŸX„ê‰Û.Ó%p±€³K$ÇŒ&_ûª]õ}[ë“@(ïÒðÐôÎË9“”,"vÌñé]lZB’é©3®ÓY6ž5äa øõnaØe}ÆaѸÁömi§ôóåƒP[ï7¢¦ÅÒ9Ò²0% k9A…½jXsò[Ÿ6ÑYh?5µK&ZÞ¡PÝCÒÒ4…f£ú¤/¥vûñÙùegp|ø#Mæ›sšÄîx–+™÷ò~ž–’¡²©—´+”f= 4•“ï¡DÞ,²tVÚÒ+w²xítskAî¥ÏZ3æuŠjzÛýö“* èco¯W§Ya¼>p:ÏÛl²e%æ¼ÛëíÌ;ÞŠR\†àö–°æºØÛbeÂRµJNks3]ïÓ/XwáÎp\ ›º QÃÎ!îáØ»ßÒ÷þ&M )[ƒDù4½Ã zW}2Ñd eÄ{`äËÚ&">mÿÔ‘Ey|Ù¾x»mÛKæ–`ÝÁá¦F>µó3‚‘ìñ(\Éx‹æÿ0Ü®VÙî žb§_œ_œÄ{{û›Û¨…ùnó ý_‹ž]¸fToÝÅÍ»o/Nšø£yðtŸÑê²/;ýË_=»í“×-‘nPú>¥Ì$MŠ9—а·Ø*B„pwU€¦ÈXÍãÚE¨(×Å÷µM\›MŒ'ÁIÓ{³o¹: ö̸‚KÕŠœý0ÏWÒìDÊ&>™^§Øtð†o TxÚK¼ÚŽa«Ôçg˜ Ò_¬ž=¡|>r²óÇLr1©ùÙ––Ô'§ª¹¥¶K ’xÄåX l²-†ì ­ÿÒÂå•š$ö̲…›£9%³gÛxcp›2¸*íA9{Üé¿»ìö;ïÚý÷ýü”TÜ>Ü ?½æí|üîüMÛŸ#xºé¶l€wÙìñ[Q¡íÅ~”{¸|¦mS¬üÁl?`ÐøŒ>HeÚ“aá.dâ6AHºÞË=90ŽÓå»E¶Lß L¦…%ÂŒâÚæ¨_KÅA´-¸°TX郰H†ŒÅW…öÔ½Þ–ðˆ «5¿ -ªFjN©³R¾eÅÙ0ÖtšêjŠÁÕí“%Øý×í!fì´Îiç¬Oê»Sçl}qþX±,‚5¦ ‘½¿¹W4µVTÍ,Tßf¸˜¾ev§Û™s:.çC°¾[U¸êÁåjYID2Û\˜{±a-b®Ê´žRŽ”¤Ya™¼–ONær§0ÎNQ½Ÿó`vÎ6Œ¥ùn7'VAW?jè8hl“·s£î˜¹Àƒ¬¸Í”rJ½Åÿroy'ñÖUi-g‘!ùÊÖ {QÒ°Õ3ZkFÅÚ-»(Ð^ ÞÞ|Éa.Í”YVq[:d|·³B˜“¹0 }à° 'Ì‘§ ¨FÙ¢°ÓnQþš+Ëž¡VÇ[²³ß=¥ÿKz²ù+Èþ࢛õ¸êœ;"ÙF³xÊe(Z¼Èo…‚K½Å´•·¬¨l«Ê-ë`ž­Øë}Z–M·ŸÙ’Ó(e+)톞ÁVMSÎeÝ|&áN Õp€0+˜¬Ϋ6²¾¢íqÚD-ýxç{þ·ãLp-ál/P«O³Ò;lq®Q痆º¹¥ ¸›Ë×ʦZ*fìnUqÂU$&¼Û·”v5¶Ec® àzrùIcÛ²’³u‹’<›ø‚sÞ#nð‚‘– óæêädðæ²óß®:g‡¿lØ-ÞœR/ — Kz‹ŸÜ]̉K6Ö¬î:¾ŸFç66ôe;z“ΠwÑ>ìÐYús·w~©¯,e’f¶³Ìê+¤l5Žd™nÙûhGê-ÙwÉž›…º°àWcN,9ë༆-­¹º2351|x¯Jà𜡿÷ÞžŸm˜KèÕÕÌ\øмi}êUÛ{ Ä}å:6”XŒ6f2x:9qÿárßÕÿÄcÀ0õí¢¢"(övÂ}ª¾°à%uºÏ/i¦e¤ÎÏÇ~³s~‡/Gžá”“‚‚[Ný½—Æ~'Z]qø2®åu,ÖÃŽõµ á†Éöþ¶¦(DËt W±ÖV¶.ttÂý•v\ñÇeŽæ¼ÏfuM¨Ø´ 6-jn_¶{v48é´ò‘ý™Ã#‡ËÄð'©5ïÍŸ[YÍ2%’äÁTË/% q£z6Ümt:(W Š*0‡ükà-G“ö/,Â#P²hÓTÉüÊñÊm.ô¯‰Á`³k¥‡Æ:ƒ—·µbQ¡]¬Qҩ°¾uB‚Ä \K-Oƒ­AOñ÷ƃ¾˜&Åm:*UÝÀÕ“tõH¨çüg¯²"ÀmêRvÉúÖQePô@XÿÞˆ&­¿{ÙáT.•Ÿ&;éÄ°½ X£Éc€d¦õÒtûÑo®žãÒdÒâѤMþMÍzŽü¿DlF)½7y@áXfq|iŠàº?n­Sýsjñs?\°~äq\ÑÌj=.ñ#Jˆƒ dcèv)QBB¡Ì"hüÄÿÏŠ"3x:%/©£õÇ– .3ƒÇ囦°êþ¹foºjœ.%¹ÁÿÐF8Aâ:L!bO6Ö§Ñîi",ÄcàˆýoÊÿÅô1Kïþΰçÿ>Ý{¶_Íÿ=xüìé?òü×::?ìÿrщ–3à_ ¨ãÕ‹%ié«öC²ä…ïá7߼ؕ _ìòmÑ Í¦—âÑë1Ý–/^î|u³GÿsCúV:™ÌaèÍÆ/wö÷þyçí˜K¾ë «ð‰oeãã!ïÅTj£{;¯ºö™sµ°dQ%.eO•›·×œï=Y®è]HlÍG7;¯úú)îM †ý -Þ$Ö¾iÿ·­÷‹8 }ÿê ùô7<ìœ8³»óê(¿ãj¹¿¡:ÝÔZ~Zî¼:‘¥f¤ämW§ÉÕ–ÝîÉòï {šd¾7_¹$ÚWö'×û¿ØÅu¥k+ð‘;¯z i„‚—2‚yï·5¤‘!j@ª™ü‰Èßo»ífµ€.Hs+ ~‰%¼íz:úÐK…-Œùã¶k]'hè¹6í„aŒþû}[ðUÙ³o-¼vßHcÛMg ©dÔSý‹gí4á,@º·X·2`×\Lå™ó‘´årO8ÅcÆsZ0.Iƒå«J lN·ÀÆÞ}›ÌŠÇè°¥ô?Rö=ñËýºz‘Ù«bœq;×z'o%-ÅŸâjöÊ7ÜýÿÖÉšÈUüø.™-AÊ®¸ÀøA‹?øbW$6ábcdR!„è\f¾ÑC‚÷pJ@ô†KoÙŠ©ŽJf‘£åÖ;8 z@¡XÃö„®˜)tWc {¸™ šÓ=‚³=¤íÀo¡\v„î^ìצTO Tü}<ΨËæØ™7Fí¢Öæb~Wø–Qo™„¯€Þ úMº‰=2^[ã¿ì¼ÂÞðƒ“ˆ´)9ʦeZufC&±UQßÀ¿dWBo$•ƒ;Ë®ÄßÂ=.+ÚCÆ¿QwŠÊïázt’,C€Ž(‰å†+4+†ºé"tŠkÒˆeÌFa\«å²T)„fô’`%úBüT…­òõeÉ#}Ç»>Òø‹j8Ö  ­::ãá°5ž­ZùbLƒq|veþ=Y²#Ò˜³<ÀáŠhN4•dé«öƒú|þõ8€ŒÃúÀƒ‡ã¬yÍv‡‹»ôºEñ³ðM†íÜ,ì’Åx%)L7†¤5†a¿Œ:Ët85U²H ÝLîñÂÃUÁ謳/ÙZº,[>ø ˆž±dD‚ÿeø,“ûfR|HGMŽ¶ócÄ\àHý&£cóØl8Àfð– ¬,ÉÌü¬¶5­ùc+vZKƒ¤$ídúJÔŽÆÆ6¼Ê´óê=þŽ'”ÞUšÙt›iw¤§Ói2„p‘ÌI’r"\»<×ÛÞ¦w“t¹l^& ˜›CZÏŒú›ˆ¦QÞKŸ[™'4ˆyr/€ YqÆIQ™¢„;G!ú¢ßjM¼=æý·j¯Ðl_¿êöãn/¾¸<ÿ¹{Ô9ŠÛ=ú؈ÞuûoãöëÞùÉU¿sòK|v¿k_^¶Ïú¿Ä÷¨¡‹Ï/ãîéÅI·s„˜ûÙ/ñU¯ƒÖÚýø—ó«ËøüÝY|Ùíýôb÷:XZÏ`Ш)šº(vBõàÐÚýy'0"÷PID]déPQŒþrÐÍÊ­BSîF¾f‘n¹³ôƒÜªÙ‰Óü#ƒô!à<%dà: ' ¾ðPyXðøÝÀCíäËm6°@î­©ryÑ€cV“Œut¥õfÒ¿ðŒįSšÍG…iF Ž_>‚ùtMìÜÒ¨ÂPGð@lÚá5„ìÐä~èÊ@Sª]Á²\®fü6 V ‰2òçRØW@Ò÷ÑTÑF$Ë3s #)‹ Z~ß0 ¨«ÊjM+F6§O*N€tM¾–]–%Ξ|.S®ób¹@4H#™aâg¥Î†þï,]Òj/Whmr+ÌÒåu1b…N‚ù‡q±îjη}dèq¯ÙhgÛA¾IìŒÒë,™©ÂvÄd©ó1áw>ÉHœ€cZ…[ßoƒ\ú›üm"´~Jg¿f‹Ü°Ôûyq›å±à«c«´?dd d`]‚JLÙå6Y—µ¤>€è¾9Ìš«@ì’aF§Y [&HvœBÆûT®Í‹¬x)&Ø+UùF?zá·‰î4¯q”»*^ÙzR²`ñþuƒrèÀ$±qŽ0´¢ªk`^5UÕ]K«çôKÍömiâËþQ_á{äý£›Î&õ%_r@Êñõ .<éâfMÒøÓ¹@í¼?«i€¶â´ˆ0‡)Æ‚,ªFÄÇÚ!¢¹ÆÚ/V~¸ÓÇlÁLKÒ$²›&¸RÏp¢n­ÞjvÞûÓ§¤ƒì²û¾÷Þìî7ìldj]92ÇÉŽçÚ×Py¬n//M0k­:{Ù«ð[æœÃpAĈD^'‚ðì˜òqK¯œ±ðïÖ|yÉs WˆåØ,»ß\¼=U^&ZÕ‘¨!"‹-ÙÖe‡A«f÷VpóšêÌj=[â­[Ñײc£6½AžËa™6"CÎTòjI]Hàb÷Ño4¤Jq«"‰DIÕèÕ—;Ëô‰þ ¥;úÈVkWo¡ ±µny†ñ§Íl=VÁ­¹‹ºØ}t#˜3ÌÎÌ㇫ky´ÇÜáü ø!µSEàw¤3‰vm“o½ƒZ¤œcé([šEÀÏ1/'2ð¤DìýEc¿+Œ¾NšAڈ̋2Ã×kæ³ÍI–PÌbªé<]2„˜ ÌŠE°ËÚ{ÅkIûö5 *õN†XÇÖuÉé‚ÎÓrKÿM<Ôf°p¶ô2ÕeçŸqFIÇIzCýˆTœÿ–/fŠµÃ{HšݲøDGÙ²5/Vì‰ÇZE~¤1¼åÙËý½Ö>ýÏã=úßoÿ ÍÅKú¿ýáE5'­„Cm_v˜’UtŸ޻q¡ïÁ+»ÎÛĽZà!÷Ì”ÚÆõ³Žî£œ¢&´ 9þß|¶I©Bu©O’9Œh ÇÓ…UVlž•¸a,iÕ#T‘˜ð¥´Ø-xÃ./Üø,˜9/Báç²Kažcå+­²°Ïséº~§Ç{X{€4ïdv/ˆñWà2´Å™ÇÖ³fù¤gyFÒ1àkã%I—ÃV”Ýc¾Hm•òx 0îßͤ*ß¾?ù×Bœ—â|®g>‚¸×¯öeÅìËŠ+¾,‹dFAhe‘Æ“{Kýs×_Tb‡{x:Ñÿn #¥yÑ:m4÷Ü˦d5¡C›¦‘vn¼A¹’îIÂ<)xÓrPZßyµá1t½èð–$–¨64)¿¥Qbµø˜Þ·°ÙQ¾ÉŸÖ§KÒ g׋<ÿ°qPE§¡•Hmb·¨Õ`|e§îšr¥+?ã(¡A¥±A¢áY:Óp<Ä”ï6ýÜQÏ5%Â7yIê|?’N^<*·Yøèt—ÔüÕ‡Ýyš“Œß-–ÉÍÍî"ý5ÕVê31öôÙ=Ú_}¸ñkNý=‡ñüésÅ<[[ˆ ‚Û“º®–w9·PÜæÈ* XwðæFáxÆH(b³%KÐ ð¹O`=¶°t]jJê¤èwv•)GÆÒÇi—Ñç4ŸziuI¬ˆ vÄåÍ´ïú9¢ÉÆ»–…vxdºRó¬çÆS•°ØŠHsùUÑTÚ‡§¾?ÈZÄû¶ÕˆwŽîIbeÃxýøã*ŵŰӈI¹‚x%j,-Ûû"Ñ÷P·ñãÐw$‰ïÿýÓF<Ÿ·âƒï¿m>Þ{ÀäÔœeln'¡Íç·‚O²ė³šÝPO'Y¢¤†kì±=åH†- z9›8¡ ‹”Ÿ*/œk¹Â-H]v]òD¡á¥A;ñ¸Ma…G "pùÌHW•^mü’ ¶Óê:û3 €[RN¬ðjvüG—Øi+ö¹Ϻ‹y:¼¡HbílØè‚w5æªô~LãŽ× vôA´7K†›½X€Ešfç_HMý…©é"K•^¯÷Ò9YŒ‘ïÿÝw²¾Ûû¶ùÝÁÞÆi»N¯÷Èû€ðæœp"+È8eßï“œoý½&v m'lj·aIËk]ÀUŽì(ÆüaÿôºÇ'í³øÑ÷û(d7ºGˆÅ ä¢!ê> æÔ-ÛI7r²Æ>Æì®:Z'#\÷ç²îïãR Ž°q|w{ψÙì“R~dÖsw¼«jg=6"LeZaL‡5üÔ‘¥1ÚÔ“쥋E2Ë1ÿŠNí\áðçÐ –ÂúÑF=è €º™r² 6¬‡7Ù 5áz//ŽÒÊÞør·`ÈRÆ´Ðјϖx³­ÇY2Jôt|ò´yðôÙú2mYBX@O÷ž=ùû¯œg¶r:É‚!oý ºÜ´‚ºæ¯áe NTŸVm(•ϱ€†Õ5…~õüM‹TQò7mùhç 8§eOú—k3û8í?{jõö‚äÜu±>PoÖ„/–œÆøH̺ßôX Ý®^©U„%óÉ6 |> nµYn‚hù"4–-;Þã ÜMúoû°_@8ÂÛÏ(#›‚Bvà ©YhR6À÷›û{{ƒ}º÷øàÛƒþóÝÁßi3l’ùœºÞiYÞI(+eÕ³£ŒëÙM„~®ç˜¢m¼2ò¥VyR#«™A qݨ@™‹ðsV“ôÄ%$jv†d#•|ç¢ JpV´,IÌ‘ú ø>¡èýLPÙ†z'Þ—d“ÞÎâ“ô#°¯ñôOúŽiˆQ˜WMO”ŽÖJðAصlÙÆ€“ï{AJ^“À&{ø£µD¸¿]‹z- iz;=ñùêÞiº½Óìñ`}©ÚôìJmÚjQµÄ»ð[^¾Þ&îÛè mêD°G6¿h|ȉ@Ù$ tE?æ«ÅL–íaì_¤8 ¹6~¢'b\;J‘Û,Â÷¦áØîAŽÿOô G¾  $ݱQ‘Páy¦›b!5Åö+SkÖF$Ô_ŸsºûQþ1OQí°XÂÒ]÷ÙïðAdŽÒ¡ËÜç^þy÷ÝåÉ.Î)øèš&KéËfÿ¬¹ÀN·©XbæsýLrüdõ–ÝC,M:“I&µâK“éÞìdÜPjâv-8@·x-{›hƒYt%žëÆð}z›ÎhÖ_“üZlX`È÷hͳy îÃ?Û¹½ÆÕûjŸû9Ô,>ß´ÔOñó‘2(ó¿á!6öô~y[ðûU• Ãø¿ñÛÐÙúaƒûzSÅMàºþ‰a‡á¯œpψ_೘©_ª”˦a­ç®¨Ã‹CoùPJë¯tÀÿù£Hš¥#Ç¿º£ítÇÓ–¤ÛÒãÆ)2LP²ñX²0AÊ~Zjìî.½–dÛ°Á^Ö ýdÌ£|¸„ÇùBj^ u“”=ÌÝÊù_²É$Qoò©|²w^Ñ@p¶ø/it–7õ~,=4<ËK­2»Ï<dt¯X߯uÖéÇœg“Ï¥…$J*ÌZŸë„MŸ>± ¡º¤ï¸Æn‰™»ÐÄ;<$Ò«t6f.Íu»’m9 7õ![*¦ãÚÅßq÷òÐñÌ=”´$esFz-ÜÛtB} 䞇Ö¶^ëWq_¯‹ƒÎ?œp4KÆ4ð•Ó_X »gô¿8[I1—œµßqyÿ÷{@hSL†ÙäAéä.ÏGaB0ɉ½æu&ùtÊ™†Å\w[ÃU¨.µÔãù ÖU³Èç$ghŸ·n»ÓŒäz²{3ß}'yN£#¨‰ÍÚñš§a‰1Ù8«k–‰E2Ío—»ÃdJ7’àáÿƧ'îe¥êÎŽ°kvÀ¬è¸RëŸ_Á%.š^Äâéu:«„ Ê B%Î+¬j||pïÞïÒé—o'“]V*­Å~Z!þEÝ JÓö[Ö«vë.)€·¤ËÑ3;Zý6¦dKàjù«Éôìj–±„½ýk)>Ä•=ò³«u¿• i•vÀÿ( vu'ôøÛÊë~~;T÷×ÿ¸M´^³d×ýA³”~Ò×+=ò­^•j}ó=0ÀtNý%×ywƒZ¬H©\$»Ëü:ÁËÑX\þˆÓågIkB*î­Rùþ–}ÓßÝh@F÷—mx,_ÅGønËÖÞÔ\x0æ3褯\ãqÎáZÍCÓ#1뾦NëÉûù™¡Ñ¸m­²Õ‡‰^ $Ķf9¬0§$mè°§´P‘ª¶¨Ð0|Lí’ÏãG`£ÑãtÆGÍß ûb£¤o¿êÇ YV8.'ù˜…ÒÇlþŒšçï±¼€®ñìá1£nMçK²Ü[ÅêmûŠŒ€~ú¾Éúò‰µdœ²b4Öj g¦«Ï¢ª•µÍ§ð„ªU€ù¡ ‹´ýÓ ÛàÁÂG—ÆDZÇŠ=¿zøßæwœÔ³Ê&\Ú­ª›:áX¬•+ ­ ê «­smƒ±eæ>ƒF`J4‚~´Çº½ÓS8žžÄvY“r|øù=±5­¢È|\ÛžÁQçŽ-OêßʨÛX¯ÛFœ.Vª†Ü2J›FZfí•„×RÁ”Ì[y®>߬ØÒx9àÝþ\¢ ¹ƒ¿t†—0N½Ä%KPÅ,VC†ÌæL&—¿g 3 Û[Í·u8ÌàíéÀk9êìž+%mÿæUX“àHw¾¸ÁuÖgU®‹[‚Íâðî÷_ü–í¿½Ãׂfì&S±²–«J³â֠؃™½Ê+õ*¦Ô½Ø &~CZó©‹±éµ*œaýI–ÂiéÖÎoÞÕáëh'èPpbµü>óÊ ”ª>H1gÖFåË»Uªˆê ¶ùÄà·]Ï›úH 1„A:¶?q0î®9Y¾ •ãcÖÝ'J{=Ó<ñ µ¢Ž”C2é"¥±®HŒDò/˜ gšºÕAggÃ[ø‚ÿò… f¥÷³|&Õj»z:0†±¹íá3+çպ룭 û >Ï瓽Ǩ¿@ÎØÆg¿Èp\²œÃ"ŠßH¦ºÏ‰¨¾|ö*ª~þãúÃýùl8åÙÞ“ýÇû-üçéãdñ‰*ÈšÄuæ ë? ÇÚo ²Xå ùøñÓõ K9ÔÈYÜ­ß(€™**ëï»b“íòŠß´U³úo^PÞÙxìà[ƒ \ÏSššÿí7¾{ë*O9?¿è´ãï¿ÛôF¸á7?GC;¯.U°È[Î¥/D½±cèÕ»Tj”¤†Oy¥Vsf˜ŸêM.Ñ5Ðxf3:xED¼²H:¥G¬¡"¡½eþüzt76­…ÿŠÖÉv¸b;¯> ¯qK¡¾©v‰Åi>®&1昔pF-RkCÙHª.¬fÉä.¹/ v5QÒ&Ò?æ“Õ4åimÀ _ð÷ú¢× ƳÁ ºW=x3’üQ¥µº–Œ‘… 8Ìstî|Ö\æs²ïæó¸ü¬.-ÁÆsv÷µ ¸Ì—Zíi29×Ó°3™ÝÃÌÀÆj%ubÚ ñ“úyì¡D!£ÅàLlIv]¶\ωÝ0$»Núüï†òª€Ëç7ßdî¯ÿ™ü–‹s|ÁTÀ¹ÒŠ<¸çO;B+—¥þe]D,cgW^4€”ˆ¿ø}+mTß놆†çÀïÁ‹ÅV3—$ËõšlÑÓ0¥ü<ù JY+ìi©èlÑl–‰zws%4ùÀI]Ïx)‘𼞙m@¼lÒ ‡G,B‘× … 9©nš6MKÅ÷3p\$8ÉIÅ°äëx2 ¨f(6/"É9§×æÿþWËE/¿<üÉÂst0/+J3‚œ×ÖĆö¿ªB"*üÈç¼/Á£Ò¡à ÀÑÂá»ì*œÃ.F¿?þc ÿS‹‹qöw‡ÆÜŽÿ¹÷øɳ½ þçþÁ?ð?Ÿjñ6âiõÀ˜$ôŸtv‹{¤°3j:ï;‡WýÎà¢syÚíõºçgJú²–' N†çÒ2yjóñA#n™»³ùìIÜ~Ý-œx*¹Ø´)ZX’Rz ‡¬Ië§$®vEªùvH‚Q#;LõΨéêPW˜¥á¥j]vŽº—à7Rþg2¢e¤q ´Ý¢¸9ú Hü‰Æ×ʇòŽTŸÕ`¬˜¦j1—Èè<Øòœ¡Ñ¢ÖÉnEõÔìgŽP×{pì”ð%pê0&d$2¿Š¡*B.ýq$œ€Fœëˆ¿´¡°œ×ê!@ôó(گǿРªã¿rxðÐ5@yÙ}oÄ`îqeƨÒ«ØÀ—C☃úˆ‹€‹%^ë»·+!²}H•ö$ƒBÁPŽ0EÉ–œ½¦¬\Ìæx‚Ù#—hz™ñ>26Ô³ÀA@Zo䘊$é—LJáõ4ÂÏø*ŽN¼Rkê8ϸl›ÕK¥ä7‹ç 1ùµg<_" Á¹FÌSGëq‡ÕoÙŒSÍ#¾¸­]ÝE¥ÙQmÙ!ÆÄ(­¢'ÓàÁà[4—Ó >µmTwrMnÁŒC®\Æâä*î+«¤TEòIÝÚ ±np—dKÉž ¿…¦­¿y0¼ÐÐhë„]¯w4p²Æq­K—Ñôëbs#.ˆ@póÜ ºµ/å‹ÉìžfÓBÌЈ ¾ëñÉâ>wK×-•†¨µ¥”œ“‡ŒÉµó¹ã5¦ ~ZוlV@´«›dí^ôq›|âU “-$Ô:^h¤ —Ç{/ì™|Ké1_-äÉ^µ²¦X±!SöCQ¡0tlý+pÉÌ1,+«í’Bj¯%æ€=]”À™Ðé’ßñHâmMóBšñáÖ-w! 9Ã:G×Y•«Ê-ƒŠéˆvNÞhĹe¦ŸÒáJd´?U›t‚šlò8—÷NóݤѤs¾¸Ÿ6G¿œµO»‡/÷vÖtx1ïy^ ÎÕp«¬5XÄ×)rÅ"PÞ„ð¥ì|Ó« á÷xt­Úr8"ýÝ¥ºÇï/®T2w ["¥ç;>Âòi²ÌépóÊšrØ©g° ¶¾ãL+E]rùsÄW.„4Ê^?¶›Ðw¬oúÂ">»èŸÄ5‰5ÉBWø:½1(ÏÀÉÇ•c1P[óµ -W0¬ ZøH4¥h2Ž„«×Žvƒõs|á¦ÝUÁ kÔ?&h®˜ÝVÉÿ¾¦F¾–Vx¨…Ónß´u¯ä3Êç,‡“îÙ•WNkÂCÃZ8ÿ¬?ÔÅV<\v:g}àZ>heT¿F¨}­Ph'¾ß$(©ãrþ´(ûà‹l»XÞhóoßlÛÅî7ÿ̯úe-#ÐÅaÓ×½?W”òÉy‡¾ÀFL¹#ªZÝóëá>cñ]zh –AMpÊ-aGBñ4t@lë¶Fƒ¬ X!åÕŒÔ@g y4RÎÇ)Ä@—Ç$C3ôÌ70ü`MÓÁ”-aS %‡¯—¥°å¤í‘¾x«Ç\ÞKÊ»‚õ… ¨hxÆaãª#¤Z:;PN„鵑Ùå7kBªW,¤†g½#*óä‰ÏçšÏñ` ßí©ó$Ñê–§ãT‡¼)äÅ€sÔRƒŽå› /‘¥ºÀ¡nçÍ5B\éÝ.y¼ÈáÓJ—zÆýds’O.×U!F.,>Á†‹)gVCÇ<Ö[ÃשR¤Þ»!`XK«ÛÕâ6UÖ_ éÚ÷qwgìÓûn7ö?^»%ïKê¢.Ó…Õ¬–JËÇŽOð åwàãG|ŒÜæwŠbå,LJhÆ\ˆn€Æ)öq@WýW7ê4ß©Õbò/éì³`?ï^2¶†CŽtX쫶¼êžGµ7xiôù·l4Ɇîë{NÃG§P! lžc¸HŠÛ8• 1&®9}ö݇øC Æ¡¨}öÝÞ“½FT0[€›µ?ëW:"<ج«vWQEÓdF§)\êDdxÆ<1ï+ÍÂk˜ŸG#O;{ÁQ°Ù§Ò ºO·NóH§iÙ¿uø+º– ç)”Žv’ºËÞ>t@ߘcn´Jµ?-L6õ*V¨YÅ Ž‡ B9WK1Ï\œ¹¢Õ¼4¬&3‡B\[¤Ì¼þO{u›*û· ADxGaõir´ûuíj}ýòd™ÅS©£ÇEH¬zÒ »Qô•iE/¨­Ý)-µÖí«ð[vz•¿[Ͳb9ª\·eùÚW¤*ã»(ÂÒ‹¿F¨€:ðCÄõL¨ÛÎþ’¾|²÷ý³à«Ûìfùrÿ@¾ù4à@ç˽"þLÝÑy¯éÇzôØ 6P5}FÚo\\ž÷»å¿Þ]vûú¸Çßÿ!úÏ1A: ¸5ÆcœüÀÇ« @Œš^çøç†ï€´1yYÃÕu¹yíìêädÃॽ¸ìþÜîwâ¿ÆøÔ>;?k4÷{Ü mãÚäåËæ~]ÿÿ0`ÎK½¶ƒÖwÅɵ#ÏeÄk24köù?#f†ÅË¿¬a¼¿®O䧯¹‹_×ml¾A÷òéxÆúñ“§Ï¾ýî{ëÊÃ×Çÿô2v·ÄÒcëð ©ÝÔhê©çf°GR©Q1þÓ¿Ïü @ß©íëÇÿÔ‡ÿ“ÎÊà §/B’ƒá·]máã”wËù»‹ïÀ|ügô´ÿ/™fãäwóÿ=ÞÛ§¿+þ¿§Ïþáÿû]þ…–ÀO¿¦ËløªSTDîcÆèí´ŽãÚÁwÍý}Æ¡Ó_Jè™'Jm¯ÝÛ=Î`_yÕ¨XÂ9`æ¤"3³‹¡Eæ å@ðu66Pw;Ãq.ñq—ŽÔåÃÍFB3!’Ö ÃK´çn<Êq+ðqáÄâ¶8”&ÍFF]÷È|DM¾ÍƒìœpyÎà?ˆÞ½m÷{ñYç\<¬·2f9BNËå=÷=½¹á *”0Rnf‘9> ñP›æ/Ôò9’‘¨ e÷6›7§|äª÷G°üBF=»0øÎ{­! š«™óUÁÊ’ufL³Á6üBɸ]¨»áÿÅ3ÍJß8U•í´P½ºrIð{±\]Ó2 ¿£³._¤ƒüæf0WUZÊ»+V®kÅžÅÚñ»Xl;LûHÀžŠ„týÓÁ¹y¬ùѦû¬aã<ÕnZé'îÄ× 'ŒuVb¢}ªMè¡®¡!ª2Wò„zï4}šÑjË?ˆÍ‚]áË{¨ØS¾%YÛÞ=Õ>í·oÚ½¾ÃxáTC,p , ã'. –ÛBråTß”Ý[µ mýnŽ‰ÓÅP¸4ú¤èß×e3)U5Ó‹ ǯ¦ ûòò}ÚŒ|&ˆt\`¤ÛÒҽˆ² ©ÁcØïËÄXÒÅ'&#w“öów§¯á-»•½ižR‘²ó9 @Iî}iðˆ³œGwáaXôœ›¥ˆç[ ýË€‹1 áv‹•7SR ŽþÒ­ÁìÂ^Y²·ÅŒˆÛd¤©)dÈТeÍ/fAu-L5Á3 Kƒæ$/ Y’É’\ùdÅì!âZEú‰5Ì"ku!QÃ5*o¤~lÀgþóÊDë×%ÒÔ6e°ÏH±ôiºèFàõ‰o&ÉŽp‘•7ã×÷ñÙy_± ¸æ…ÅãÝÙ›Œ¼ íAc+·»y¡YU0 ºa˜úÙņTéyÞk˜÷ÁÆp’È"åñʇÈ`¤-ÅiÒ[›Ó§úX<‚—)-FY¤­òxŸü‚1£á:e/5Ë öò&ùåo»ìô/q{rÓ?÷@q €E]¾(Òj'Ž1[´ÒÆC}d³ !›à²± «Ç¿75€#òk϶Ü9"#ƒCe·DGŠ;ÖÛa9Uå¦zH–ˉ_Ï×X±ðŒLì‚õ¶ìuìøÃWZ ÊB‘ѹ ËÒZõzsðµà¡#‘ï^ÐÕy«°iJv?´EÓÄO¥²¨d‰ÚºâUÇX•¥5$“°×Ø,ܲ„4õ¡A±V x¯°¹)ÛýîœÔæ$‰!u)â=ºµ±!õ?aN“Oç*5ȱ\Z–ßcþ`ûî>%½º…øØƶØ_ÆG›êx"ú¥´éœ_¤Ãd­^/úÅe÷¬O"˜TØf|,˜“âˆ1‹ óÅ3T°ùâ¹:n«x³ÕnØfR¥«‰ÐˆN¹£WOĦžˆÛ[Ät[–tl&Þ¥eš’l0oµnmNµ4 V¸øÿ¦wV‘¿&^å!r˜:ú:™h= ÆÛŽ¥Š¬H›¼lÕˆ¥éº2v¬wGF%´?•«|Ö7ëóœÞ™*<R Xø òP:ݦV2¾røbîVó€RVuëê|—A¿GN I+ÜÌx(/Š¥Wíøiû§îÙñI÷5GÄ?梺pŠ$¡É*–S£Uc×5‹0©¬Ñ³|©r6PóY›)éÄN™¡úÙ´É›”Ú¾©@n–¤I ÆóŽ¼N1^²À¨#<‘âúkäÞƒr&ÊU7°©É8T¨­@?0[ŠÞí^ÜiO™{m™)Óy¶èF×÷ Ùm»Ð53Æ1·X™ý§wËžçÇÊC:˜í¦¦˜ûá&1˜&ÊéÌ*h*Õ‘Õ[híuñ°¥ ¤ÝMjÜÏ«o0žÔ¨}íÛ°gô™õDa½!±fUç80ŽDËáÎ9 BN3èÈj%5pKšOè$äþˆÃy û(Ý“¸;?\0©2¿š5ƒSÊ5å´2o½a9ÌxÉÒA#’ÞÌÑ­'Áh¦‡Œ$‰üö½´6Éþ'÷Bìœä!߸PdÀÌHK +æ.£ÊsýßÒBrˆ¢¸ˆ…¼Ì3R²¬Gï¸0oaÙɼHáÏeú¢…'uËŽîãæÒs²&·§Q3m<ä4δ¹IoÆýð—ø—üÚ”HØ·ì?1Ç«ÕWÈñÓ¯B*ÌežCl±‰ìIb Å1ËJ×`ƒeNPãïk_ãò:¨×%8ð_=uÙ­7–”Æ£‹X¢{* I«âpR®Zƒî[H¤ÂÝæ©<휾añƒ«ùCûìRI¢½}V(UuèGk”(:hÅm¦ñÎ óíùÑ°ž‡Nõ^61BGb=nÅW꣓ÜlCÒbýkª^»FÌ&€(éâôº É9ܱ³š9¼ØøQïðü¢ß=?ë=RŠ1m-,61X—™eÍ€ðªéžNÚÓêæƲ¸vCÏì>ÿ›÷%øJŠ#Ùƶ øê¸y÷ì¶V1ý@z1˜­HžO²kÓk˜C Ÿ—P2b§eÔëwONb.É9;¦…è\C8Úõ|åX¡¯1†\UÞˆ]… 'äêéåÎ蟬P|>›‰›ØaÒÈdÀÍp»v™GƒAv[Ü-r:U™ S±ÃøIu¤4Ò"¤ï?5‡Ætò1-‹¼çëλöe矢¨ÙÏ9^*&LCL@1.‡Xcü‘vÔÓ»dïõÀM~ª[±ÏeÒä<à §jÞ¶hu$Kíµy²˜¾\¤,ÃøoÌ Ù4¨„I:–ü¨eW"×µFë0ëæR~™êfH€ÈÑÇ+ZÄ-;ð•ñ5ÜÆçñe2ÊVt †tÚËÕ¨EïÔZeyk–ïþÅÇdBS»»à‹wKM!Ž/M>ûnïÙ^m××áÇjˆÝjpQƒð_m¿Ùž/šßO:ß;^´>êÊ5ÀñÙUóЃ=ÿ|Ðú¶uÐÚoÅ/<:êŠÖGÒÊ–Œ‹Ê’twœ¦ÆÉéú ’ v‹Y2'aM_~ÿíþþÁSù)æ_E§à¤–DÎ?YàOÑááËá0þÿÕÚ¯»ƒ7'íãz´Ìñå¸òmÔï¾=ë¶OàÉêôhÝÅ‚?„d:¯´›µúŸü5­‡ X!$ ‘àsª(ý¬„· "0Ö~~1zgÛ§…g]ªÈý±÷S÷bÐëûÔC:#›=yNI•.hÛÏ$¹åÎâèâòüõIç´G¾3Sí$ú˜!¢ûSC¨‡Í \³1@T@­zr$ùHHG!MÅ"ŒÀ}~Ç5?ŸÒéjҲꌟŸ|ÛzÜpŒ•ÇŽ œ´IÚ·&” US¥ækŠÞò\¦ïOØoÊnp Kâ5Ê?Õ?3ˆà²\Àûë6O2ï3àƒváó„cp!¸¼œ†fÖ@ô°K•ÑuJŠ'èÎöõp±Üû!i+ÃûÓ€»ø'>ÆèÃuQü‰GÑrÚ5‚æRâJÅ€|åzþxmt?º5¬¯Ý@Kº×ïÅLß;Ó‡@¢?Ïé}HQÅç×)Éêø >üS\Ëójä…ARçãY2l¹|ÔئÍ“Ö(u€Ôâ«ÊãÞ¶/äq,pNàêM¸ÿÿbÒºóø¨KM¾m÷%™<'½ˆóQe´xdï_ô#ÊõñE ‘ ã¢Kg[Øx=rÜõìT~HvÁÞL,‰Èâܬ£Q¤˜àúG!Uhárf7p°ê¢=k}"…*ÑTÅ.ËH2K™À)¨y 3ªwpjí8öP¶þLÑÖȽp„¬É±®ÏµBÃ2B6Æ ók•}ÚpP$÷ϱèÊtÈ–‘ö›\£?ËUNjÛFŠkU^±ç˜ã$F\åÒs¶·.MY[ÌÝ׊/€ºà§•D±CuÖ€6^}påi¬Àw<ãž@DdŸX½{Ÿ#L.L¬ê†„°î®à3nœœÛúÀBŸ-N“Cle…=’ªD_& ù«ö[=Å+® ¥œ 7Y9%;T’b²ü7÷‚ÉZ¤áfr9YiYå4>¡MK¢04˜ô|¹|˜D¡Á¦RD˜Žê<0cÚ [/C€DÌd-æÅ`”Î!‚Ä“Ç«"L‰óBžTd6n3ÇlSu'&©jœ¹ÓÕéÓFÝ1á6­¹ÙxDÖgÂzjpR~!a„fHéèŸÇý·iZ4>gbÝÝÞÓ¥|˜‹5µG[Ø0I‰œ ,{kÙ_¤k_×=w¦¦köQ[š²É]e4È#Ìi¹#8‚¾Ñx¿µ§X›"¤¸wži²÷³©Â@Li3|ÔÞ@V¬”Úña=6ЕoSÚ^ST2Fx7œ^ú_íçÅË&ŸÎ[x“–Àks¶70>çÔÆI÷´Ûo³›EëGåøå©+¼s¤THQ*S‰K¡."Ë"‡â:Éì*Q—\eá3+óG« dâž"âÏÝùxmãȧˆ$‘#y S;@|°älà Š[éæMUâ`†û­Øl¯Õ•‚RÒQ´dK1%õ${í¤Û²Ò±}¥¸»ÏêLqÈ)m°4-سÍ©œâLÞ]Ì ª PÙ5Þ}iºgä ½ ¶lLãHÖ—­#ƒÆãÑE…™dÔD;ìÍÚ R^vzfwï´”•‡ydzèMwz‡úiç…§š ³S é7úÁ 2á{·§`0Ü%ì»–:Ù§üˆ|§ ¦Ý Y"\Ê;)Â`Žqº¬½$cmÞf“”¯ÌÎHæ‚jx‰Y]¬Ý»#NAê̈lçv ^nÍHÑ|¹·¤Õf¤öÃ…9NÕŒ(4Z„¸ßêšÔ° ¼‰5>zåJÔy#^ç2¿{® áR§[ ºÀm¹º_4#Å>®ï0øÏi¦€®ê0šö¨}Öëî^œ÷ºïcÕ=ïÓdÑ”ol·èL¦ÿ×£ƒüƒ@\Œ²<ºaåàŽNÚ@ÀñõˆkfWhÓ@Á.Ë ÚGAäfçðm÷b‡¡.®^Ÿtw, N²I7âW·¢î#Ä’8hƒÝxÅtœ}”ê5ÏtÌ☠¦T¹œ&¿2I`'¤1"•X–LCœp» ̳ 38†Å‹œÓ¦9mÍ%²FRIrèÄîÆ9mNš}¯eî±\*«Ÿ)‹˜C1‰Ÿ ÿú4%2Y¨E°ÄÊ> Ó|²*ôvõ î’â/®óå2ŸjQ·:CÂK-£$à gÊ!~dà͈Š $:h#÷Óë|"mh‡÷“Ђ¨·´®mà»-2Òg% Ò±;¤Î{$8ð„ŸÛÄnº‘…‡“é¸=ìXðnºŸ–9uPœ¼d&X-Ùsx~zÑ=é\ƃˆkNÔÕ£ˆë¤h2Å­DqPìÃ"óðâjG5±¹Y&¤[.òù.l}`^QÌ’2÷ž°kR‡H+g˜-hÄsÂÜä;=¼F˜£Ê“fÌôÙRv'B€žüuûì—¯ÃUDÏk³‰2ÃÊqg2_¹(ÍGäq chð´H5q™^ä#<þ ß ™°æ9×a–åʳœfX¦‚¹*õV¾Ø?W_l(€ÇççGÈèîÉ2µW¡³ÓÌ9„kåþ pUÓb9å§#ÑGáÚ°MgyÇû'ÁSÅ«ˆ/Žª%~|ÁyGl–zCãàÙ㽸Æ>²ø¿ÆOOoÿR°±„ä#M¾Çc ÛÞ^|8‡„ôÑ Öˆ‘)SKâÇO#¹>––»\5øæFóïóïÿ9èœÿgñÎ{¿'þãÞÓ§O«õ?ûûÿ¨ÿù]þõÍKc™ÂÇÀÓ*éW³–§£LؑᄈDÍ…!$áC.YŒÊ5°t­þæ,8ZoH)뼡1ò–aw_ŸÆ‡q/]îºDÂ5Ÿ‰+Ì‚\"ãìR—{¬Ý¥®nHJcGœ‘x›³~2ÊMÎ Ék¼-kÅC†!r‘“†a„¦Â»0ò§ nAk;5päaxŠÿ#ÁÃJûŸþ¯•Lÿ—löÿÁ·Õú¿½o÷÷ÿ±ÿ_E_Åý·Ý^|Úîw.»í“˜þ¾¸<ÿ¹{Ô9Èj·×]ûuïüäªß9ù%>;ßµ/òKÜyqÙéõ:GÔÐùeÜ=½8évŽ¶qöK|Õë ½v?þåüŠtÝwgñe·÷S+Âc/—(Ô¤aÁ¢!mÌ Î5‰Ñôç÷.ŽÁ^˯Èþž Þ<*Ø!–Z) ×UÀl@ö °QÈ,vÏ3ìÈR/`jùœ‘Š§sÑ»4vÑ@sÊhÔÖv„jè­öÞr’¥_ù§pÜC‘¡œæ)Mc`$ëK"ñ÷ÕWñ…º –«MôºÙbLV›OÛC#q²ÕW]Õ›RÌ{òG/ócö(µûíøe#Ó¾ê¿=¿ìߨ"1ß ÆÑñÕûÇß=Ûüãi2Üü›ऎ-?-¦-*[~¦QAÉæ_‡<`›Ê ºñ§Q² [oóoÁ!¶å‚»âÉw¤¬oüñv¾ù{FÏØü“ÂImümQ<ÛÛö¨bœmù!Ÿ€hËLÀ$Ï’-/¿Zné ×ロ?={Rù©ÌVùñFxg¤hhÃïã!ÉlíKO ¶öS™®ò³£?«|oœb›~S⦟<ÕWõ‡uþ»ÊŽw,úÛÏÿµÁû=Îÿƒƒ§Ï*çÿヽà¿ÿ.ÿ^üÓÑùaÿ—‹Nü¶zò*zñ–6ý§ßíŸt^½ „9[fs±+wF/vµ¥×çG¿ ÝýRk¬sŠC|ÊaÞ%ˆQ ÛŽ|-I‚³[ž:J#.Nvu!êáŽ=…·1Wo ×hsúÎp’dH,»W¦MÔùh€Ýͳf…aûSÉJɇ ¡ìNåHÝŠ:ŸÈ¼ÈÅÑY2Oîf!î·t#±±½a+’ŠF„j `<³9“ ð“­õªò‘`äm“ôSê,®½è¾J[㸷D3)Á%øçtv_´Ù_ùrŒâ»$߉ß^vÞ¼ÜiµvUÙådãÛWlÞiš‘q]]¼ŠÎWá’ÐÉ,4·I°ÐTL/Y–p˜ÓÂë¿ cX7Æ#öbw¹|E£}YQì:Ö­°‹²®DR3%µšýÀxÚx8’Ÿ­æü Ä—>b0œÏå1ò—Òи|€P¤V`Hy!ZàX(7§søÍ7ÑÈs©µ¡£¦¥¿»X£ÄØGOFA ä2½“ zIð’=ŽkÇUæÌ°Íd ¾æ¤*µJÌ¥]ØøFAf¡f=$³Ø!ç´ê<Ý™ÁÛV’ÆÆ+ZÁÆô güs:z½¸‚<:龊ÚZ×"€S²áUHϧó%þëвŽGBÇ°ën°•§À-\"n(ù”ödúÆ«„=Žêftm[ÝŸïÖ´ñâ´:w·®ìÒ Ã©F#68MÑ÷ÕÌ7¨ï-«Œ›EV¯ypeIm<Üœ'ž£Þ°ˆXèb©qž>|‹®¢j[··Žb!å#c7L0˜\ŠÓŒÃéÁ9nûÎfÕI»@S #‘ÞHíô;¹HEä\¹%Û˜.õÅr­Ó D]’9žZ7a(6ÁE›J-²Òç.„`åÐÊ·Ìáéj)ûG¥eøÃûá„ B¤Ep­ôŒåœ;¾i(é—KÔÝT¶x÷EïnïÃ5óš¥&ÿ5’m×uu ‚ªC¯Ì§7r…3Ë~—îå™ä,””µMÁËn:$ÝÍìßÌ‘É2 Í–N1L-9M“¡/'E˜Aö‘«_´&ÜóX6•†žÃÖ6Á)M\§€„)ÿ¹&¾õ²Ôµg\K¹@ü‘Æ´‰ÄᤡåòEdÊd¾(O 3°¸”}ß òààêšaŽ¢j#°À«‡ Ä 3«Ðb ¢,ç<¡³5äq𶗳JB&ºøšþšjb»®r{åRçù^7¢òHZcL&è VƒžõQå}úZЯXã¨ã^¤Kd>•ŸôZǦ$³ - {<Ÿ€‰-²I|¨¯`jˆº¢@ q¨ZìïspêƺÇêuI& É”ÿ>’ºÜÒaQÔ-e¼rÄ6¢ò!Œ³5¤‚qª°¾JÀsP<”®$°“†ÙœÄð8O¸Ôgƒ-z'°ºS}„žÌÞzX§·Ñ=™Îo“ð©QËòÔ ÈÌ/ÌŒdàvFÄUrÒ¸r(ý M´Wd¯IÊl}¹€”®K*Ö¢^¯Ô}:_-E(^¯#©¨))ûìœÐª‹ÈØ’‘áä’Ü7ÉÝ’Õ:…[$™qá'$³$s®f\»J¥X–0„†¨túTÕÆNGÇ9:…Tú pdË:ù‚38íóš.PÄÈ¥`~-E:ø8¤J§*²d8iøÅÓÂêýBØÉx†H¹O ÞÀ³tçå5Ý3Î 5KöN‰HÈêiW‹ü¦žN%“3ÅOãÂeA§Ix³ZÀ8äcy5ÛxîâL`N ŠšÀ&åy¨‰×al<‘¤vàÏ~žG¢¬˜óÜ&›Ö< QÂÒ-Õ÷ÊN÷†öºÆÃåíµÌœB.¥»¼‚¸»«m¿]+’…5&€–ÚY—Éo£p7ÍòÅšµÀGèjFÃLÇ “Qp,-NÕ=ð‚ÿZø¤æMûGØa`ÜC.ÝšÖá½-ÁL…T;@Ä ¶úc˜'ŒTgxtHCk[‘ð ÝÁRû$ ÀìJÈrøûM·ä|÷y6³=^H )6LÄëÑŸvZ4% ^g•3›O˜ŠXòTdO#ÑåâÌŒåÔÉZÏ?M¥×ñ1™a4 ³Â½ÖÆÑ=ÙDãFôz±áv’Eع¾¼Mú…P¸k¹ªÙå™t"à…‘|Þaº@Ò‰ùcüA’LÆšÛ©éoH¡L„Ò$Ù JU[f]¸µ¡6ÅÖ«g`5Â2_x–øZYW%£¤ÿYÑlÕ ÌÉ7Ò4ö qÜ/¼ô‡(™m°‡|‡ËÀÞèÃ{TÞ$bG}ÊÕNãë­8£ƒ³Ö_SâQ`±v,ª»ÊÙTz1Ç‚È¢ðS§£dQ 2ŠXäò·’•Eš†÷ŸÇÔy³Å–ô7,8uÝヰ†¨ë‚ †MÄžäb¾@rg dŒº¼KÓÙ¦~Ñ®éá˜(0{ta¶žÕZ±×›”áYöç•Š¯`ÁjEüe*wÀkÊå Ì)~Eh´¥ üåhâ&©%‚Žw‘7§k\ßR…¤þܧZp{!–‹ ¸h³%ékQ˜#8ô×Zx,Pˆâ$Io.TîªÊxÎê}µÛ•÷ z¿ç6j1®¸D«XD,&¶I& ‡/œ¦F+¶ÉÖ¿çB³OÃɪ£ß{s4vU Ï~0­KY„7dŠÒÑäj§kÎCÄÄJð%WÖ‡»$8zƒ=ZUĈrCVDa`Cƒ|[Ôñ&Ë8S>^î#óo4TØ•ª’àX눛j›pkK‚ßy&çŒo1 aÃ~ ·u4Ng+:Òm™ñQà A,¸¹4‘˜ö¡kƒ!ðÕ”'q}kÊbN<‰¹'âÙêc5Ä´#¦/ Û„©¼Cào:μ@&ŠüªŠÈç}+eÎGõçó ¢ ‚Àpƒw!+q›Å„ çiV@•Á’SfÜš‰›u¸¦°3M‡°ÒV‘W!½„k¶Ö›± á,Ñ -ν·²20RâÉÛ?·oºgí“î¿qI¹ytÙ–-Ö5’j”'²ŠïÅÖ¥’”™íÖÆXì«éÜà Š¼˜^ì^ç£{$= ¶Ñÿ¥õ?.›ñ÷Ìÿ?غ¿VÿóäàÛäÿý¾ùœS*ÕÐñNsw÷ÝãÃÝÝ£þ'ÆOZ{ûqA‹’ðíîvÎvâaðîq+_Œwû—¼ žìNrÒZ£åh‡6·ˆ—;鬹*v|ªá4%“í4ar}|¹Cö<Äm³?OwXÓ'MÆB;?€{¬H—/¯zÍvï°Û݉]Æâ•°§ÃÀ|‰O >qM(BƒK:’SÞ¶i2*å*þ¶vô,Þ`2y0˜‘äΰm=Ò;9ü­YEjn§læÇ­Ÿu™êÖŒ1`BO’nXpúEÍkêa€S(A%¨ÙˆT'¸ÉÁ*‡÷¼¹ìtô6ò¡0Ìr61ãl!hîÎÃä“17]ÚˆÔç1 ‘œã@ŸÔ2õ ©„ ¬f:›¦?ˆÏC%ᜈ½Y¨¥fNP½¦;v0 éh'eŸ³ºF@e™)š°Dr–rŒ0•àw3X4"MË»”ì) QÛkhA1«QÙqÝŽ+)§È[dGé©Æ=»&úKÎaˆfÄ·Ò’’`àŠ¦ƒ$ì¯ü3t£1p¿ \M¸Æ\41ìºsá;ÛÁÔ´2w¦ÉŒÞwg|WbÙ†ðc]ÙSó öŒêÚÛ/ËÕ4¥7â°g0|” S8-8F½\dã1ôöØÄÉSË6ò<;íÍà³fÕŒVAÈ[¿Ùj3Ì»,$û€¦÷gEÃ{Úz ¼‡¢œÜÊóèŹæ>Š¤ñm!Èt'ÁTÐq°“Z‚î]ä¦ Ð'Ë¡uœ@¡¾UxØq3)[Gƒ“Nû'IU•ÕÔ.‹mv›Ò­ ¶iFWN×LVi”øøƒ±’ú· öFhJ©'WwØcÕÇ2¾€£ÏϺ>]#xyv‰˜P5i¼äãÅnNœbŸÑ}Ö%‰‹÷”æÝŽá´ÄbUû,UfFÖ ü{…•â±2@ĪT÷qÝ¢Êa½~n4tÑTjIUZ<¯7ð»»Ém•§·¥ hwèMwBf@$±ŠN¡whl$>»Ï°®+€û Ëà¿çl_/TïÞˆ´ÂÏh/ò\²‰t9ã¬f<0€¿ð±^ÆÌ`£Œg¿Õ0§’¶™IV!;È Ä§ñ\+𠣶eS3ß¿RÊ®à*¸fÁöçÇÀ뺖úž-†Að}-G‰Œ€S܆Õ2Cï—–^^^9ÃJIG`è¥FÄ™ï6íM4ø‹að?Y98tˆئ/Á&‚ÀfDAE……ɺPt¨S­È‚x ôHrežéáwá$r‡×ÇÔâ § £WþîðàÔ”åBaBÂá½¢[Ú0&iÊš’U´3í³H ]šìqtÒ”AêI5’ñÆroìè-5ÃÀ_0ØŽ·íÞs…TîÙÖÇЮÀÑÀa,³z>IÌ"ä/@ZkTš]Z#G×WÇ:¿N€Ê«ØURmïtа:q]U @.(4¿Nü"rñ–þÏPÍ€çrˆDã<ª‰‚€÷*Š88’ë\ðZQË!Xš~£$€ç”üÒMºLÎiÀòŽÅ¨'¬åÐJº‰òTÚâ(Wm4ñ-ð \@ÕÖ1 êÑtyX,Ÿ}TiÖ#ºL·Ì+.[ðœ+Ýœfèq­Ä2 ϯóñªµÂ-«M[AöT<"q(øña¡R%{O‹NQ(Õpê.V©bX8¯¸¸z–„—á³Ö^2™ß&O‘Q©‡ Îq{•l\ª*­kGÎáÞE©ÊœÔzL͇XèI¹énï¢}yØàdgÖF¬>¡^ûçÎàVéàðm»{Öˆ˜y|÷ýwÏê ‹8â%# WH²Ãª²‚CÞ,âk€-R«”r‹³‡Í]ñÉÁý©À¡z9 …È$­tÐ/Ç*czÁ© ¡ªŽÇWéúrgC’±ö†}”ÂrvÃÛƒWíYÜ‘Q²HdŽ½r7Õâ &là Ñ[·Ç]¹¹" îè;qˆm[4ĵ&Íãâ²ó*úÊóE± òŒí;\–å.s¨6«Çn–èƒûYN¥Ú´Qº 6­MWùËp,Õæ| ¬TúÓý¤ÇXm®M\v´y½Qjãðmçð'V…zµzHkXÃ!N‚ý•˜–Ìn:gTz¬ÃmúTh–Þ¥‹5kµ¤Û™¦n°²ZÃçßÑÙõ——OÜƪÏ$o5óômkQRqŽ‘hž¯eT‘ÌäÜrhJûrîKz w6l==‚g” ˆ\º·žH±•â+J¦øä`õI#Î(*•|V–éM>Í–ƒº.5Æ-MÆ !ÁY‡ƒ@Œ/îý½½'{7é¶ñ¶Õs(DÉ2PÆž¯¡5õÕÅáW_½”f÷ž|¿¿gµ8À:ËŠæŒìŸ/èlzóì`ÿføÝtV’>×ád1.žÇOâÚÞ§'tøìí={ú Ÿï½9Ú«?ô‚OÚG‡[ÚÛG ûÔ^óàÙwO?ÛÛ?À77ôïèèÉgš}öÄ­+{h‰ð1* ¥XR´4¯êU‰1ÃzûEÈàÂÓ„güMB_ŠÀóö N±FpB°†®¥©Zr„\DGï¢ +¡éÕ´Ðp‡N¯µ˜4^ÕnèÏ5>&¤?´‡£ÍÀE5ÃÚ¹¦ &P¹Ù¯…©Æê½E»Uµ±ÃàtÝÕM1ê6žøãÙêã.)8ëöæm®\ṠËsÜ45v†Kj¹[¦ ZK{ȆUЂ0°Ò?ÕÈ€r2ºÞqmË8bÀ€;Z좇ð“­BÔ»H´Ö¤ˆ¯:Eì»Sî.§¤Â¶CÕ%+.æÌzÖÚoTòÆqëì™r\ßä5l£ðv|c¥ RJÕqV탠ŒGÌ•™×ù.­?×3EIƒÌ¶E¹ÇÆWª¸jþ—ÛZ‚¥÷0¨O^óŒ\ W±Çfü€¨â¿ÍC–è¤{#x0PàaÕ½äÏCe­$;‹§o*íJÁŸÇcì†ýE¾-®‹”ùYªkãÚ·jÍ}ûM}]ãrç¦ÔÛYí­5ñŒš†i"Ô hÕ¼[ê;ÕËGç¶ bÃR¹]Ü‹{ïrÊUD»¶¬.]º»*»×*, ow9Ëß1÷\ôœݵ®¡NÈÑáBÓG“‰wJò<¨÷LÊÕÉØ—mYÞÉ}çY¤¸È5§ùÏ+ÁÀPK ´¤QG#VŸÁü&À’—[T+Up‡¾R2ÊE‡Ôˆ\âC"¹…¾´[ÛÝË̸"óÂÝ´š[ØŒ´|oò\jMÂõ}åÖ7|‘ÊûžÆÍ&@²O/ƒûšM)ªiŽ‡M`÷Í"•'5嘊šM8m®Ý®(Dº¡^eÃWÖ{ý‰KUßIÖ]¸küÛqäž#ýZª8A•T½È–ô殹2‡4Ìã]÷ÇDæ ]Á*Ä­ƒªt®øÿ€ôùLa%€¦YrôY§x`JNŽ¤Ïœ·^òÃü|ð¦›d×ø?²í‹¼2 °ÉË1$þÉð­…ûO+ ;Ò{˜¶{À¼Ý¦m€áŠÆbâåÞnuã3 Â.-ÚÒÉùùÅàülÐ~}~Ù—‘B[ ºƒcÉÁ‰•Ò#ÁëÆ©ÄÓÉàˆ\LÝ1ó˜Jìò¿,0¦½>¤Žs£^+œˆVÓós"†ä/Uù³ÀÕz˜e¹y&A}9"{Œñµî_1îíÅhŽ‚Ǥ§IÇ0^'‹E´•¾´ÃôˆÃ¦–]\òÿiñPP. } bRp™úê[q2p •{[_ö¨PþÀ˜15š“ŒóÄ-®Â¥¼~±³µGá%hnâÊ §k 7(ß4G=:Ç,}×[Ê”ç3ÏʪºpÛ’ !ømÚ׃øÏ‚`ø{åí?yúd¿šÿõí·ÿÀý]þñ\ïž&ÃóÞû¸§Ü“ÍøˆN9Ûì?cSúq½|©þ³/½|E¯-@-Š‘p’)Þ(#k&ÆÓÞ2 $“÷V&]ôj–qýíÄ¡ï CŒ5!D¶¬g«qÈOŠïFjËÞ‹Ä„´AîfwÏÎ÷C¸öžG‘üñr§‰Kâù|Ë_ðIåÏOß=<{²·vCÕÄpߦõ#â±êºªù+°µ£†±Y¶¬ÕãÓ«^?àðÖÂ|’×1d›ãà Œ*Õ„lGZBàébâÁEz‹e]–h9ƒ»¼S¹kq¼¤büÞ7hM„°“qâHê € àMQÖÝKÓHËãqBv*a¸JNþbêäY¤U©þÁ~ ¼}2÷Ÿ쳕Ékx.¦µnÆo1* Ë×J˜GÀÊJ¸<ê¢ÔCU*ér5.ö¶z‡ j‹©º ‡åªëšƒç<÷ïnÅ$åcZ㶦X[ µÔÊ-TûŒ5!k­Az·ÄÚÙc ßõÚ} _ý˜*Ï}Â2 §Ók©º²¢ ²iæ«âæ w.cq—.ÎI/¾e®Óá3œ¶k’H31ü"e^°PÒ»pgƒ-;Ü=S-KA‹— ÖK¥b¹[& o¥Ll ð‡Ò:ÆÛN‚¹Tl‚…ÉeÈ¥³ÚRroÓdn™ -ƒ]’(ž3Ï?¤†7 ‚ÝûŽ84"ÁNü Ê†fi“æ‚,X^ˆùu1\-ÖnuòÔLr‡¯¾áµ›Œ¶7Q¤¹"¹×T™{ÅŸâÅè[”•)b^’·T÷ïÐO•Øb(ðsYƒnHŸòæŽììÁ\sgò»æ$Ñ1»ºÚ]Ï;ÇY“J€­WÏ6[ÅŽCþšÃì@ÀA}}_í°·~\AÄïÃïºG¶UUÔ‹Gb}W?¢óYj8 Ÿ5©ñ°•8¦:µ•$!]]Ge;†s3´ß-Ö&2Q›7³¼)Øy&Ä‹j«ÈñJÉ»¿gˆW,*䞦‚šñPóúÂH¨.Š2÷3ªØ[q­ Ÿó£¥30'÷!0æÝí½ÄyÂ>—¼XÔšr2ÿ|³ÎBgu‰²ý&½ŽœƒÜ¹›O\gª'ñz÷+Û°×Ð ØÛl0aœçgy™†æ[ôɵͦë^$Gëu2§OGœä-ò1Ú‹i¤ÁV®‰H•Ÿ÷Á™h€™<À¦ÝÓÄGh¶#¾ÔïÝ[ê5)÷ÓÝñöA 4:sYŒíÎìò—§N‡“Î qß(->À q(gozñTáê•~ú‚”òø>Ht²Å‰Ö‚ý'ÈEÁÓœmÏm}‡Ëò†éhua’”<ïõ_Ž‡C°§žqV³Usáøl:œ´ˆ. ÷ rTwÝzn¢…Ã÷ï?w ¨z­m‡Áæy¥´@ߧ4œˆÞë\LÅóàÏý|r¤¿î 3‚k* Öꋌڗ½E²ˆ.Ûg'Ý×]´Hf´x£³Ó‡.šM£d8~&};øÂk¡¿Št9/æDÛ_Þ§Eôi Qù¢ÜˆkÀ1¾½ßߧ«I¹írˆ\úkþ—Æþ^ù_ßî?yVåÿ$½üàúßïñ¯Œ—ÊŽé$aq ÑPÄcár‘;IÕûyüO+ (#fL–¾ OñøÏœ€ g"’§ØrO#Ür®¥Ö,cn¹î;óYâwž’@ˆ õ𢙵¶”LW°…»š‹¡C¶€$Õ\§•s*Cëâ„„€¤O$Ô0n“É WaÉ '(úPR`r>¢ýzüUvÃg$ý—lxÕ‹X•bÀ$KàÊ0fK­ìbzå۰܈CÉ `œBÿu‡L·bŽÀ„!~r©ÐW;.”½“ÝìHáÒÅMpMƒ·½×%p¢^n2¶65¬ÊMºãöN™@Xq³øVK‘¥£!ÍOá(]c«_V@ëu|vF  ÅBnš \(àÂb]hÞïñ.]®Åº÷°ßœ’#¾6GHuQÍÁ¢–Œ‹ =«¦“ÌÇlŇЕWC™9¨sBO˜¯"aåDæ7]`ñ‰wžËb„›;pçÐ!/ÚÆm€49Î2õ)¸uÜô”’‹Ôš‘V}†7 UıKG¸ÃhììËKæì…”Jk[EŠ0ìÑÏ$5)ÚôŒCÔ ‰9úJPBÃÞÁÞ ßÌÐ8œ=,˜3jº*TØi3sÅ(šÙmʘˆ#}:»”³}'à¾6Ì‘¢CÙ©>_diwýèÇòq~L™¨ F?Y°Óù2âàªø UUvãðœ‰H8ˆG£üŽQîã×’]ÎTíñ”ò& ÛQ¨3¥z¥•\§÷o^ž…¦÷'í3B=6ø-Ôa#Ãa°û2x×÷ð ßbƒf¬É°3M6çu8—ùZ‰kúiÎû17—~®ÅN!¨?U¬ü¨Å]9kŸvzíÃNµ+½kYoä ç*68žÅµÑHíh lGê ç îëÞ}pÙ¡Ñ:ìœvÎú›Æ@ê`&v *B מhë)á›ÂúØ]E%9µº¾ü¹:t†ìÔÛ0 öƒ#5J‰° h­+œÐäüqº¶Ðozb/%ËW2ª­xº h;Äj%nUµÄyvH–Þé¨sxÒÛ²ÆN{ñ;.©0öÄ‚=I6ßb½?vµ>wý%ÅsÏmXZ­íô@™ùó³þ {vxruԼ랿ë Þþ¦ÞºPµwîIrt¡™¸·•6ães¥ÿk-ù÷aLyŒ‘.—«³£Îeïðü²3èõT°©ó?WâÁìqxkWlî †F1¬Ú`P,GØÅu·Óøx4x×$’2¤ó¾Î~~ @¬µÅuÄ|×i6;~'é?Ÿ¾{V÷Fj¹)f¿Z®ÇØ«í`ÆNNxÃiš MK˜‡‚v]‡]á¤ç¬‰Aç¬ýú¤3h_^¶9ë¼[/Í—MûÈAeãlÉ1ºEQB6gÝkíþ0£á rð¡Ç…sr¿~+mÃIž(¦úUa¾ =êüOn¼IHä`è¹Ks~¤Ò‡~þ9c— £š³Ë¥‡ëâjc<4ã\¡z![J˜igÊ”%ÒØ4Qgç}þæƒtµÃÁ@—/w‹§Ý:Ê,°ÖÂ`€•Ž=RM&²Jëæ4z‘ÖÈË–Pνj;;=¿Jû³V#ÈÑ#êµJ‡pÀƒ:;Faó]§8æ9§d}’Ù‚bWhÏPœt—¢=~`澚xV8ØZm +ú®Ž÷˜¤Ápó’+8{—±O™s­!W*o §jÑ…©PªS<…ÜqZlxÊ¡)2šˆÎ²r_Ž”1‡â=Oç¦SœÐë{—Èi9.oG%›+“Üpà; ô¦œ_ÅÅ£Œ™œwýج,-/Ó0'°ÕõžÀÁ.¢¨!/Wñú`ìv‡^C‚œºN½Îû ¡‹{ƒ¸”^­5sP"2›,c¦ôAËÙ'"N§:G›T<˜ÖÈc*•ySàv­ ÈÍÌâ16™šÐá`ª;}×pÛ±Ðz9><Œ?>ùF%•C>±+g¬ÏTî^R·Tv[€¤³iÚMßKŠ+7]—³*‚ýdiÈE,R‘C9¿Y¯˜"ézµÜ"ºdÔ× âàü:—ÿvEzçàÝaïèêBxÃ\€’þ/«2çnXŒVH˜âÀÀÕ,c‰ª“ë² Ò éžúž0ÄF”"ä&2;0 ÀÂhIL¯°³#Éf7“UºrX2úžG‘+0wˆA¦Ê{T1‘:š­ Ætiæ–‚Ê–,Š„Ô•\'7 8Ÿ*Å.½<Š·°½44¿[j¼WØ<%‚QuÒhÈÁ„húÒJÊ-‰\ÇPëì1 ¤…Ÿ´a(–´Lf¦Ä<ééAç[ç¬I3-­w/»ïËMoiA¿\ÓX†i¬á°bœIcXè_ÔØÛ‹Ý«÷ñþ~©¯m©DPŒï(¬†o¸Fãêò°órÿûïŸî=;i…ݸK/NºgëÝØÔ‹÷ÉG°¿žÐî¸T(î‘v(bcå좻wžÅqL… —®…L©—÷ÞìÑ°ô«gO‚1‰±õuïèóÓÿ†ä+]XRÎñS³ÕL’r¬Ä«\ÝRæ©Z]§¿öÔ=K—å§ò_tξ¨Óçót¶~ûQû’6Î<ü4Æ’;\º¿®é‹ùõiLÅå§_½üݳÏwúè5V/Š< w°@´1@l9F@CbÙêR™3~ääŬ]2ø¥I25±¸ÒiS=†X27½è ¤vx?F rðЋÏ·róŽŸ^¶“žT¨=“6ÝUa²´™/u¯TÎQÇ8àcƳ˜:³‰­™AEr æ¨ê2J‹ë§ò¢ÿŽ^ØH]ƒ×4-}¯PMœÂ§àºÅ!Rž¡xmäd4íÓà¢}Ù>m_þ<[ÛÖ3 ¾0:À'Ì·V1Ñ£8xªXŸ,N¹ó´#µ+±&tÈ;XW€oížõ;—ÝóK¤üg-G^Bs¯f$ó'0†Z°¹ùiÉæã“´‚»7EŠÒ1"øzÅü(„á!-@_>¦#öŽÑ3öŒA•òÇbÀY©ÛW¥wʨ´œ)Ç~ƒS\®fUƒˆõ*†%â¼jÀó9mˆò°p„yÞ芵n ñ\da¯˜¿Èˆ#9çª`¼Q„ÞUŠï<ä}ÂnDœq ÁiþQ¡M¡}bÊÁßÐtJ0,É–³NnnT-DŒ3ƒ?q\cÉèl‘%³r6£s+\@GUØu{ì îž^ŗ}"ã§-7c„\=Qtv^¾;Ø_•œµ¥… œF—m¿|aÒA$%¶D2\Z8Ø#å;Ç“NÌ6˜ƒ--ŠÊ/œF+¿3D³$›p…?(¾'Â9*ʧùãCl"RÂŽ;áz[ÍôeËël5³U%I"Xq|8œ9t\Æ_—Bóbå<‰³×œ³öìIó:[Ö-w‘º)ùT*¢jêéÞ‰´×â%ä]Ü-uz²Y±Sƒ†H !‰¸´íx¨<|éT_Ù R¥ #É:|h-5Â=à AΖ|`Ùc%s«}t4xýK¿3h÷³#ÌÎiš 1.Æ2ú¾YòXlI/ã}@5y66ìÄV®¹¸éúǵËl£s#´A~ƒ#Ðq”B(líäTÆ\ +]ž„Hy,å_ÚárÔWÀó[I¥Ò„lä©)¢`.Ó´¸æƒªpN²äõY":ï;‡WtáEçò´ÛëuÏÏbqoKŸL¡”ÒêAËRX„=Ž=CÇÊI \rÉ(ŒG¼4Š@A<–¬ÞÀÒc”úü´]I¼È$f'ì )@ØyWg¤º Ç™:èÁñI„þfMYu¯w#, 90 £w³Eƒ2„r?Þ.ò™Ñ;o>%é Ì‘4ðhµ6ÿŠç£‰ùŸ•ƒ&¥ü²Ý§u{Öy'!@Ûá ª÷½—C}–ÄŒ7 bIœC/²L>i·Eþv¬xšq`t/s$P(œɽS˜]´Hf©ÚÅ–3ïUnˆÔ‰ÑŒ zçˆptT↕A¢yo—’&‚‹ bU¶©ï_…ª¥b—21¨b’).Á{t÷JʢˉêAnŽÞÙ0vÇalÙÜUÉ^ÐK÷›L@Œ±ëô*ü€'J{,Y—‹?Ìþ8ZÍù‘>u)D`‘tpÃT§Q{ïƒ*A™b¯i^GœtlÈƲ¬é0$L11¦øï¢+¬¥ŽD±ˆòÑj:Ž,ØÇc‡68 %J`üì k.Ä?ÀÀMÀYRÊv‰UbØÁ v—ÞKá6ŒŸH ×ÛdêúbË¡ ‡縱Ç.’Vè8³½zÍ1 :’‘LÐ*¨¸HM§Ö„ðò) ¾b †%ì'=ô?e…Ó0—ŽhHØçØy:¯Ú† s’y9Ç‚Mœõ\ÕçÖÀÐmƒüZ8×…3C˜·1„Þ&–‡à­!ve³]ËA‘:¤€“çÝ؃¶„Ýñ³ĸ-Ò‡™0º¥.¿`skf“ín.±ý¸T'O¸ËÞ·t~i"H®#Ï–Z‹x­]×Á yP ÞÙc %ó+o`¸Ûúze…lR&CÁS°Ð1æŸz¡ r25)¹ä\Oà“  Ÿ,tÆÒhóPm)Ñ[ÊMºWùuÏé#‘›ØÌ#—b'âo¦ôšÍ|Î Ò“=ôçò€ŠÃ9pÇÝ3Öí/Õ>ÃóWÓ¹‹8y»Áå$YÕ¾(æÂà ŒÌ¸˜ —ª‡êy¬°ßXÚJ®²|¯6ÙÕé-’ã+²5Nìp>¶Ù\¤ãø\|'Ð78<$Ï»oÄŒ›š´sS„ã®±rÈEúsx~r‚qjûónfs¬!ÑJ%W&hÀHñ½q¯‹ôkYzFÐ%£Ã•Ù,ü­ÒlŒ«ˆ%Å)gƒú8)+A`ʇä¤":×ä•Ï‘?²Ü~lÿÜFð¯}Òý7NÕ78eoY¤ÀÜÏ"úДyÁY`§0¼g¤&(Œ*/¼_–•_¢ÆË›•³JõâZÁ±?k¿5„Cì\ÂðI¬ã±6k …ÁTÆf¹‹žµ {kZÒª—M€SŠ ½µàp¶PáKòVñ)W’IJLÕ@Tà#Ep®)y[°”¯’±Õ´7Š ñ§SpD Çuý´µ×ð©3…§ 1x,aÁµ ù¯ÉÇdPGË”hq43ÙAàò¨sÚƒÏKÚ…Y`ð{KÞpÀÃÉÂ&Há˜Gèw­î7v„Ä{¢ØœdšZÞm-Xr¢âˆ˜0k#x] iïªojÏä3u4l#§®¯¯ØÎ'Iâ,Œíäšsr™ Ž=¦ÞžþùññI‡dË›çkœu:G£¸Ü,;cf ¸)/ÜéýóÓ.r-U Àq—„y€8¿Ûɘf 0ÔÓ-åáÆTH†'£¥ÇXë¢òV–P‘/–¡+B\[ÅèÁå:xÝíÃ_¶Ï®N:"Ôÿ¼âZIW­ \Nvc³ó¸.º­G[pø !Cï"™­&;–ÓH)OŒÀˆ í¡½®´¬F#c!A³WK–Ö£†p÷@UbŸ£ÂËÇj-Þäù’…yèŠ`Š †Neà’tiÌÃŒÚì«&@C,ùÕ¥èHkcgLeÜÎ_ÿh‚~ë¸m%L’Úû|…õ‘S €ÇŽy¯ [7Íuìíë“Ÿz´á_¾F¯JÙ¼d Þ£p=a.È횂ߌFR-0Æ<åÀUý<Ý?à=»ÿìñwO ˆG6ÅÃù1WµÅ8dä €oŒãÙlä}äÂ"µÍ{Êô£aŒF*Œ–J(‰ÎueSV‡á<…E1ÊFЄd‹CÞÞC Ešt¥œ¤1öóËÃÎ@Þ…´Šc=çü;ìp#Ž¨:`¦† ôˆÈ\e°Rq”©´ã\Þß âÙƒGÊD“]u•Ä-„¨Dó/ÄdÙ ì6,'zå!{Sñm;„J™FæõI$˜Ý^ß?X^B 4¸IV,5»Û>mõÏZ ¦Ê° !œÕ!,Š#pSÀ¼„Èóœd´–ìHåxVbÞò†X2(ÄÈæËÕòï¸}ÇçÅ^Ó2\ƒ&óD7JÒ¦DôæªñPÄ#eZ˜P•EX­"Zw éd„­ùùiŒêt.¯1Â}„]Û£‘æ¤ÈUT¸œI#”Ä…ó]îœ;u=åoÑ9–Ö½ #²Ë¸ÕUq©d³ú7çy:-‰ûŒ.N±eº9C7²eŠJ6ü|Š*Øwf¥t?gÞèë¸>ï’nt“q h¾Z@›*tÇŒ‡ŒÎ|¹@…€ÃÍð.!l´Õe,ËŽ`U_{½Î%´èžKk miÍŒY^éBrÄnS&©ƒ ˆ?Qè3;68V¤òP—’Å®QEª[V`¿ä½jly~ÿ}ë{ú÷ϘmF#ÉÕbÀù:‹ä³$t Hà/U¸OòÒ¯·Ìæ.'£eÛ´;8µ#@÷×\Â@…dXŽñËbÞ°ö±ï*‰Û•dåǨ2¥Ôòõ{Ö×HÜL½g€U´Æ÷Ž­"u»1šK²K?î Tݪa•:ˆZˆµ¯„Puh„á¢p¨Ô¼wàËØq¦zCr4Ò£¾IH(É­ß4æB[V¦xç<õ S)Ú¼%Ü]èŠbÙM ¶Üõ½/âä0ˆyXŠ@IãtÁ€Û3­eœNF®L}!–‹§|e} Ðyèy¯fâ¯íÐ`œ±4X(ŽPSM‰7G’?ÑF‹¤Pà KÒ³)Ÿ_õ;ÍÔ$¯õ°·Œy ÅeAí%¹?ÂáöÝvÂóÄ=fE%ÇÚ'W(%g@°È>Ô)ÇeŠÐhä$É™c|äÈ$áÃt¹sB.çF ŽKŒ¥† Ë¿ÄZ©sø»o‘’œ€JSò‚ä1Q¼"s\Ÿ–°9TÄI¹`c0ã©;»Ä+"JàÙyßt“ÇÝ) á´µ/{L›ÛeŠ^f9üÈz?‡ý~Š[›zßÏr¨ÌtªÝ¥ïP„R¿rô²Ê*l1Áyïê´ç¬y¥„˜qÂ,ÍWÅD»涠3€l{õ®fhpÛóÑŵ HfX®®¯ó…;ÝYþ«kØ^¬¨‡F&b^ȉ)òpíÜh/kê &‰V© ÞÓðysDDH)‹óøðÇAïêéì±wR…YŒãá¯qו9a>EÓ`Xº%¾dÚ©¡âXÞÏÙža¢`q9‡Þ!'lØ(tô_ŽÏÀS€¨)@"gWC¯ûì»g`“|Óé¾]O],™d$¹Óøjçjw»]š›{V°, ,C.‡ÕÕÒÌg¹} ï…2­çx8lâ’°Oà¦SÊ׎a&i7–{n ˜w[0ª%¾‰T‘}R7X2w¨¹…zªýD@ ]Æî7$ÿÆÌ×Ènt_j†=ÊUHÓ‹þ/:b´¨z$#zþ°5Y©6z¬‰‡ +œ±@:«'ýXS…ëÇÖŠkêàñMg‚…Šîr[Í}U7ŽOÎ_;e®2“8_YOj«ª,‘0xZÓ ©éeaaÁ©#¨¨²Þ-[‹òžõwAN#–Ïf!ëÝårj)® ³á‘œñSG<éǤ¼¿­TC^k(—¼ítßö7®ÙJ•jxI9ý¾ó‰”¢L2ôñµù©wÅùR,À©p_… ®h(iu?KÕ“,Þwï²”:ʵŠÙØ/˜vèŽQ“ ".åq*¹Ò5Ký„šív]\2§‚W›FËùyäèö&apq¨JWgɇ¡zý«×¯Ï/ÏÌÊð¥—6<´w@Ä:‡†wÿï‰UÅfÿl.¨. äw‰ Ó‡Y˜é@e!avSÁÔAhãž ºeŒ)xÛ\ bã?Å5$3p/*ÉÐ$ç3|Œ"ç†ö\ŸŠØ™Ðûe‚~Á ­§µú#†^aÎØŠš(V³ú™” V?ðšž’íL·À䌳Ø:'êÕB­f¡êôú¤×õßz¿†sjöMÅLÑbÆP°û^òº$Ð@‹¸]Ç4wù>×Õ2C- Þª)úŽÒóA'b]É^I\ÍÔxP6žÁJHx# gƒÛ|äS,2©.½Íï8#\AjH§Ûï7V]úzè¸d ZQ…A‚¡!Eq4–½Ÿ^¾ØûÔjµÂ,zŸ¡–ÓœÑj{F´Ç`Påõ^|0$8¾–à‰–·Ë!„þ±ØTV#cÜΖ.V*ÉG>ôåzÅTMŽCŠG_¡À$³NWo:r¾]f•LzÕƒ]ƒöHß}Nh°˜³qé!«mpM, Gš¨g$ÓæAu–z²} Ó- Ǧ¤.;gv2f9ÿþ¢sÙ•Þ`özo»oúAº÷6GÑ$½¡ÇÝf7Ë 3+õTâÝt·‘ÅŸ ${!¹ÿùB"*¨Þm3¡âHŒÞð~]µÊÝaε ¢n‘ý>r“Oo¥ö`ÿRAu Û@£˜üýK$•”NÂv @5ù5¿f¯~ éTï-“tn@;wf6 ÁæP¬|GŠyÁµ—d¬÷hJ'I¼Áµª4®RˆÇýðjýVˆj¯…:^W0cvñ„”U¡¤0à„ž6Ýæ+Óx€5©2A }“%L¹3ápÉœÜ"1Ÿ#©’îÂJ±U+•YÚùÕìN`¶*º=T®žÿܹü%®é@¸š¡o€Cç&Kl>šL`‹cJ½†áQÈÑJ2¦iØâ~­9Jïú&`ßr‚t÷¬×=ê0 ÞºW@U´R'œw׃Ñ¡ÁöÉG å3b§‚qêB+e·Øp ú´1\Èg†æPœjåýl’H©h,ÇÖe›}n˜¸…òk–GzýÃ7¶@³,S–%-…‹2Âúœd@cDÂÂ`xCÄ+KƼEÛ$÷¤õ§ êÿL!ȵˆQ\öu‹n\žs^ D.Û—ÝN¯´Å•T…KT³p†æ8éI¬‰{dÂ%…Õå FÚÓ°Ž½ÂŽÎñlé°Ç`ê!¾©Pìëph,&»Ër‚'ÜåÔGŸ˜#s‡3:gG‡ºFá'È(¸Ü{Üï øCPª58E@nXJdC¾éceH4ãrÖó t‰8«†Õ;+úòF!tŸ¯ ]dBÆ„áä)aï œ¬Î3búÒ²£_ÎÚ¨u@ü€‹ÁŽXDi4¤ú«Á²xÉ/ç]€Ü†tV6«¢(¡RÌjê*ô3‰…c\æšä•Rç/QÀÜ’AÑœÆLSi\@KQrëÎ×ä2AóY´v›Fé,lÌ GpDÐÿ]>>Ørê›ä€ö½/éヘÏp†ò xkAó©ø«_çŸpL±‡ò‡Rá£-':®|óXñ¤“Lè#R÷óÑkZ¸·yŽŽðËi2“¢©0X5ÞƒŒiñ‚ùL ˜5:¥ =Ⱥ­q2Y'³¥uRÎûǵz¬G„ Ômú>tÃ…ûáøÝ;¾Ž–vüiÆþGÖ»Dh#å§{öF©?ŽÔÁMß69Ó@Rv´懴œ‹4¿k=ô@‘nõú\Ôq8¬7y HŽ\c¤eà‚‰-í—wJåiçg'¿ÐÉr<蟋Ú/"KdêøåÇ¿@8ÐNssz8;G!s\­€¨¡Unr£KPŠ\A€ÅeO2Yg5œ)ÆH«áMgîÎÞŽ¾ò—ç]DÕãØ·qÙÎ8_-ç •öí®¹ýüÄPãv½NÀQAözÊxX&©æZ$À ©Ÿ Yz°Ü}&Žy~ÛÙ (»Íå[Ù—‘AÆÑÂ*ÏD•4OœœebÑlꪵ +×ÒÂ+.SY/Ý¥†]ùÁuêC@z°•ð\/r`¯æñhµqÌÙhPgï‡úš3K 4Ê'h‚EꃴkQ6»Y¦[––Š‹oÒ;VO}!óŒ¤ÍïQõs·w~´‹f…è)õ)ŽŠAoù ³ýîi‡ŒˆÓnÿå‹)M_V¤`‹+\g7¶Š53@nóÒ•Fל?âV$ª5~uÆÍwŽdyÀ)5So öeÛàê„?üŒÏ+¾>ã±óneñ$[µÔÕÉ ë¿U‡}ýM¼’Âe"¥V ÑB¸^ÝRYWͧ‹ƒs‹Ã›CŽª¶Ï;'ƒ^ûM'®]äEö©Bhç¬Îàœr­’Œ]ûÞ×r®Wr“ªª9^´45ä‡Ò'µK£Ø@#kŽ¨/S½”“fHªÞ%÷ ×Ih^Øé«yàÁÕ;esùô\«<¡—êÀ&q¾ö‰rüQ6E´‘j÷~9;|{y~v~Å@’RòÅoéáÖ­½Óò5(}‹ñ*US” è®å}ðàðÖ:ÙÔgÝÃó£õÄ+õ{;ô|œ7t:Õ½{T7…@îj ‚€üÙÝvï°Ûep³Ú£ö£úƇèâ¤Ý'cþÔ'Ö<Òf~ÜkÑÙÑOaBuïlÐ`pÑ{Àû‡·öòÙ}|ÑÛ}lAIºš½y¯Û=Ž¨ JRIHÁH¨KŽÓzˆûÂRõqJyíV‡þm€RË¥jëÙ=káM ¨BiÔ%óÙìÁΦà¾p¨ æ7„ZXó5ú¢÷41ÔCÖ~ÄåZ‘Ç‚öãùæß&þWŽÐþ—ß‹ÿõàñÓýƒ ÿëþ“'OÿÁÿúûó¿"D–,/@T;Æsv•$Rnyß?ÿ˜f°§ÏúšÓû‹Fxl‰®§"<ùÍ2îý¤ÔU€Py‚ÿ‡&žÉÿöþµ½‰#[†çkúºæ<_*‚ $ù$±cö²M|º-;!ŒÒ–ZvI­Ý-a+ ïoסªºª»Z’ !Ìî{O¬®sÕªUë¼<Ò`ž ¶@C%)ÉO¢xˆ5ÔV¥`×£‘hªDyÚÓS±’}i¯„,y©BV0rFí’Ní!ÉQv6ðÇÒ­ùXæ"¥Ô“ÔÐc2†sÁ] QvH‘ ØP)©z¡“N¶ÄÙÏjüFÙÏÎÚ¦X²ê!)«Mg¥Áñ\g¦Ã…QdŸÉÌLj m7ÃԪƓ¢Ñ°%¥Ôzô<`“¥»V-dfÛXÚ¬\b û‹¡Ÿ$^o'åD„SGñ-þ—2¯Êœò¬Ûdwv Õ-¤‚ÇAªÏTÖÂÒŒ“2B¿ Û2 §ì©êàåAÓÒ2;®Jš”íüÑt"«˜ÅÜ`0 òjd°¥m«{?¤Ø’@‡ôU`]¥ù#é~/5õ™¦V²2 ÚZOæ½Ç¼Lö¹[ñÓ¥ˆR Ê Pö)NŒt@zªâ`˜•¤g¸“Š`íDDN$°ì20oçWdBâ±õ‰êY¶! ¹€ÎO*4s|<rÚ$Ut{Ê–r$0f\ âé1å#ÿè0%ALùÉ!(¸öQ¼â‘É0TF#&X+c*•íj”ï'ðû¾‡ÙéÐ|GçZ4RWÊ0‹x cÂصamŠAœ$à ¦!YF¤  æ2m ¾íÅÉ \}7e­$bU6{Gb`MlRœU)‚­*fÐÓ6c™‘dØB#²6)QŇ‘êž¡µ@·4úÃTô;õ“)§Ç\ÃOh^G"MâY‡Â$]ËÍN£;/ÃvÜM¤—×¥o…ó=GÜ~ôñŠ<ªoøÃÉ¥ÿ@Éj®Pnt•ÚV²˜A±³Òƒ‚ƒ“EÓ™ª¿:•¼a7‡+/AoF{<&-v ¯rÞ™úkÏKi‡S$¼šýÙ´Nø¼a4‘#‰d`su†.Ú°‘¬ÐO<õwÌ­­(‘÷øÌm6—:ˆx2¯¦Â ûêÔ0BY<éø¿” SÙVê=ÓÃ]"yå–iDåýDHˆÏ”Ã'@9ȱW2¿¹”ùâ{„­úaë€B°µ4Ú–=÷á‚>ÁÔØd€älâI’^EwéëH¹0ÕQ¢B¿Pl[Dþy )|9 Î. ˆ!òBŽã>!§R®‘< Ïøh(æ jÌ«Š’`//ËpÐë£Ý N„C…3=>³Ó6JäG°–t‹”`€4[GxlZJw½Ãe¬k#Ñ¥Òu™y¼ªò5ð ä´‘Ê?¦UUZÙG`š¾j¡Î«»—j¥3)ÔIàÜM©eÞÉÔ°˜^Â@f’Íky¥úšr£vXÂGpYR Kê4ÎÑÌž&FK­Z&mî>zPa>FÅÿoC_ rMjÌ5):­~Q·ÆµÚe”LwÃG_?ªMz5Jb»µiMÅÃGÓõ4ÒžRîL|oE©Vc±lMjNk5)í­ñÆ—è¸õЬq¦Û®¤õrX)¸’O¨J2R33? E•”û¬,‹qÝ阡A4öÛÏÑ’Kçžì£Êl¯õ´q¶*Î:§Þ“–@[±“öÞ^ë_uxG€”àx8ã‚æ¥Ô‹@¾à(˜ÎF°¸™ Ø|­ãˆMFþÏ‘]ÞJˆ,½ Þƒ¯!—ŽúH ¤"q¦ã 3%éfu ¨œ<ÄÊ„´UÉÔƒCÀ”!‡€6§~©3"È€jÒPû*w”l\äM•­³aE Øï‚óHMlwrmãô™Î¥%õ¡³‰‘Õ¹Ôuôr’Žøc*²; K7MØM)lujbZU6a¤P&XÊEG[Ðcõ¥å‚U\íÔBÓ£ÜCÊ:DRÚ­ÃÖIa;%@YjR^D‚À6tÌk@F#ä‹!çêÕöGÝ£ý½nçôÊ8tÚ:šþ»Ö97NZÝÖËæóÆá³–ÔUðûj %DÞ“ 6J£J¹VÑ|(x ò=&…Œ½½›H?mS({À7g;ˆiŽßŽ£„ibc½Î‰66ЯBñÿü«_åÿH½)qé(éG’9€?\\y🹄¡ É.uð/¢Î¸áQgmSǶ¦Dã»Ú2¦ÃY:x670ß~¦Íˆm~cìW5kúšRh¨ôÃĵ±òæÉ =13àiólŒn%cåƒÈ= Ú¶êœQðíF,Ž%ú0˜m••}v`acšõ¸íB=¡e¢ 5I¾¤íGåÇ'J‘¯æˆ·Ê¤ŽPœ$^o %A39êyJSTM“Ç¡õIY™9±lv¸R%ƒSéЀŽ£@ g¬„G2÷jƒžËp—͘Îë 9œDóW’âߦ„ÔWôä×Ö<]µŒ†Lã„• új¼JÇ<˜ÅM(§ñÇB")¤A _z &Rk(‘%ÓìÌ* ÅPYMȉ“&%Ó•LÆ!`ÕK‰µÒ¨%ŽŠ-ÅjUEâHË4ýüóWð¾ÝM<6Ðò‘$OýpµClºMDJɨ1˜¤»ÃF©ø)й-%–@°d[¦±)³ÀHåÙ©¤)KûI«$hzEÔ%;®¯*!8æÞ£!^2†Ò&Ãlc¥<<8$„—º«–)`'õÂô…KK2S耤¢Áà!§¶s29LѬE Ý*Pr0ÔƒóóXÙawöÚ/]R¦Ì@Ы7A£¿Â<‘6II%$âL“Û§9åoî"a€fDQì!Gêå€aö)†ÍP%§¸…¾4a5ïr:l¯­AË_àý:²öWtXõ(¾X»êBa½wþOØß}D?rtâÿÊÙßÂ8Í4ŒpÍýj²ìUZYa©ÜòŸ -`3\=2ðK´…åAÑ£R§Ü ?P$B¾+ó°õ4ÝŸ´ \ÈéÀ“–™éØøìp3²™OX¬dg“"§Àš#¿;‘ld¶‡Ýq:RÏF$j‹\_ôÞ í›‰½RÕá´€ÐÀ•²•³E¾6tD9¿3³ Ð)/#ì¼qÓÐA ÜÃq!µ‡’®yç2+Ù–RZŽRK®rg””­¤Œ(ûõ7uåÖÊ=L5–s¿!×öÒ`QFX§Í¸8á0ÓÚÒ]…Y‘(²n‹gr<‘àR)ƒìîÚ‚WŒoä‰[{*Jõy=%Ñ|úlW EM>0P’O>–ÌÎÙ@å-ÜøGوŠ–çÂpÄÒ0¢¦Dª©î³ž¹S©FoZÁíÕæ{(ˆô´G:CJÒóĈŸIä9O°ñ¨¾Eú–ͪUM&X£Ì–ûeFöÈÂ<¶tHõ $-"K'™0:GÊ3WHc Ú©VúŠÒ5Ѭ•ºžÊ!Oûì•‹‡b¤¬Â Je'´Â̪gË¥ìLnÊî„ÌSúXfžóTZ –¾æ®õÉ=“=˜-׊L•+U)C¦,Ÿ^(«þËD€ç¼„ÒÿšM_ °ÌÇïD_Õ”­[P•»C,ÀSY$(«¨R0gîѧ´ÓZ#«x=¢¢m1¶‚)õ6WQÙ˜³dš*¤Ä$ŠSç"5'ã±£Ä1òÍî2ÿ‰t‰fé^O™éSz:=¡TmåoMV)3m)f äñÖØl$UZæ ó³Ë´:ÒîÚ„~H4†£¬ F¢R§%Škðôâh|ªíþ[ stÑ•¦’õÄÎN)ļÞxº®´(…§óŒ8ãiЀ,:Fƒƒñ\eâKõô´sQû^/ö“K)ÏšÆc¤# ‰gµªá॑Héñh DùRÇ¢–A%›¯ñê(í^P©¾Ð é39‘Œ!¾J8Y—î"|ãÌl9^>ƒ<ŽI…<2Q·žÕ]Œs*uzk{ǧ/ ‰ÊöÛOôÞ(7ÙXK’þÃí?o¿|ô ‡´ÿxûÏõ¯¾ÚÜÊØn>Xßølÿù1þÝJEþÆ…¤lQ’S’"å|KK÷Ѧæ+ј]0Ocø#ß°a:Þ,Ùön}ñÅ5h> J•ðV@+t`÷¿+‘?¬šL5©ì"’ôÂ1š•VF†è¸ˆU8,"‚MB?:”꜅ÜY‡/h¯Í’¤d:‘yLÝ=â°!7þ5Üot÷­‘êD¤ýÀ» %‚÷ˆÄ«oÕ󼃺Íã³ÝÆÁÞ£þu»ÌŸ*ޗʨäÛñ”1nØcÏ»•Í­Qïõ”Èøm\)«‘8îðZkæNø‡sÈÞ-fµµ ·!m_pÔü>FÌåÐð$’O •Ó8aÿjÀ¡õÎÙӧ헭ζñ§¨Gç?ÃÜ&øœuƒóïE“Ä _jôì^+µ„´™ÀÐ5 ùÒ÷#ÃƉèy–…§y1Ø_©G8…ÃIRWÓÙxâ#@ª~ÚwG©Èq*©è#ž¦©;“k"“ÑXpº×8êvN0ÆÉ.¼2¾^õZ÷°°}ØÜ?ÃÀPáv9­ ñÑ“vvÙ²ŽvO¦Ã¤¿ákïò|ø†~Œ€{æ?€§ïöƒ ýˆý'ª£º˜(¨Q\ù£smJ§4Ž è4 øc\uõ¨ýó‹îhÈÆÃ_ôQ:e†ŸÌÇ] ö@?¦óI_·˜Lãnï²ÇýJ«©´§kú›A èKp ´Ì£äm¯ sá^Ù7…äÃ]= σ?·¡ãGêÀQHöÍlɸöG6¹%Þ“††žW§¦Û޷˽^EÀÿj ¿( 7ýõÖ“Ñ´"jmu?km:Fã\¡t¥A¤Ulteœ N*ç§?µSÛë6O€k5ÏNZ]r·?>i51Jéí{õpãü—»vÕðÕúÀ¥ò(.©|ÚçA*4 ú%£Í0Ýó»1Á*<¹Õu£›Fh*9FçtÕTÝ"Çé )_ö‰ä*RgB¹4ˆß¾ÅíÑç$¨šzÜ›Ì ])"ž—€5)½0†‰7”§u Ÿàa>ÓÇáy·Ëxg+IÉd8meø#F%…]û@ÿ¤„Q¹’Ë>\δ„8À|5mYàèqÝEºñfïÝü”ƦÉw¡oÛ%o¶¶5i$ÖŽÎN·3äÚó<>¿fÖªh]V,6nþì“Æ<¹†Ùo½¼Q—™eɶ£iÜ[½?Øø˜Ð_L¸¶:Æ„@ÙÅ:GA¢«É&œo6f‚yz8Jêžñ,Ê9ãÿœ'½$Ý9ü|ó{Y¼»"{L,ƒ+Ò—mS*\2óõþX³4`廉U¶MÊÆâ&×Uáÿ¶‰ÓëOüÔ<ý Òjž§ j”^%Õ˜Ûæ¾ ³;¡$3QJ}–µ§Â0)-6¤clK‡¹Î+L1Ì1ô¿Ìçdç±#þ„Sé¦O¤÷©6ªv™ ‹’ž±Æ1&1¶®OgáFÿNˆ2‡µG-„¤Ù›'H[}2õcqývð‹°hù:|®_ü²A½~0÷òýªçÂ{?ùÏqó¤¦D€hdügóÁúƒ¬ÿïÆÖ£ÏòŸ"ÿAÊ]Ùó²×-Ï“dÄ6õÈóI\WÊ™5d\ÙÞx$’0Ìæ8ÍP•œ°«æñ1‘%bàZÓx“X¿ÝUÅ „¾¨í"¡|Ò:l´„þýü¨s Äs·urâÝjRƒ/v¹ØèŠ;ò–•wŽ[Ívc¿©¦õÅ-’pžIJ@Cªß]ÿ½FGÍ¿`ºÂÊ+@.¢s€]«‰É9zû{'é¶ÉRõŠ¥ªOäIëYûP7šß5žµj´ä§í&|89ÅS%c豈­©ˆƒ¢3“^\$Sñ`%(i˜¤µ ¦–/¤ÒC¶ % Z”`R1‚"¤"œ@7”Cœ`ˆé*±!'He †„AË éË“Ùç“pD¯TV` QC*]€­L½«· —nA· '·©—ŠXzjWzé®ôô®ðG¬$w¥—Ù•^º+½tWzé®ô¬]饻ÒÓ»ÒKw¥'tE½+=cWz¹]饻ÒKw¥§w¥‡éi[ûû»bí<¯%—9Œ‚ÿ»M°ûäŸCöDÎÞIÅôðÈRcW+/ý{ÛØfì­Ù„–=hd]ûŠYëoáiüð³8'(þ¸ïÿÖW[YýÏÆ~ÿ?®þG[¥®vžT‡mzSü]L tuuUïs +(ÅJ/ROþœýçIŒî÷ðÿíµžÞÙ­írÆöÚês÷Ž^X2¶"!«~¥øíï’ØMEz·Ër@ W×¢vñwoŸë¬|)†ÒZ6w“NHJrÿna…Bnßã*’‹sWª5|Y‘dò_üÕL ¼üÍÒfüaŠÐñ·ñ<ñCxŽ?Mù9¢r*7¤ðø;å;ñ—!ÑÇŸ¦€›S3dêü3~cþ­Ôô[êðoSô¿ …ýLÌMy>þ64øÓÔ àoS€¿s¢~Üy™eˆâKŽIIÇ°—iYÕ ÂÄ‹8~Þ!ÙªYÛ‡GK·lõES  ¶³=½ËHp8îОä1×S%{-àÛǧí£CQ2nè3yCµûpI<Î4m½lþp܇§_ä‹0“p'×®¼÷2ôn—ÒÎt1 rQE€°~—ƒYpJw›¿K&öïÌÅê®ð‡ÜMF†še[—-LÏB×ÌI8ÕŽg ,Yhϼ¶µ ±õ „­ˆ~¸®F=æˆ0ëìZþî™8aÛ "©„¯à¶¢$ÿî™HbÛ aƒMt±m’q÷ ̱R‚ðÝ@ÛµøwÏDÛ­ %ÚÙ6ˆÉ¿[‚­T$õwÏ@5Û)±ûwÏÄ9&õ†%éÒGzíÚNINü¿Qã7ê‹BJÛ© %=mKý¤¶ Rúïž®¶Sš¾'é¬=ÿwÏÄ_ÛqüwÏÀdÛ)¿ðwÏDiÛ pk ·mƒæþ»—CsÛ%'Ô¹ý‡°XëÇáÛ þ#H£¯>, ÿ66Ö¬3ý‡ëDÿmn}¦ÿ>ý÷¥æÑn D £H…,NfèF# 8eXÝóøií±»¹¾±U[ÿª¶±UßÜÜ·ÄÙi“õ“9Qx¢ 8jmÔàP@zÑ‘F.â)Fâúí1IŽni•t£á 6Qv1;wÃSøh@‚ eà#²OBCp*]19†K•^|ᙌ}t<;Âr÷Ã^0æˆKü’\’ªÔkMzGùš*òM ßÄçâDºà¡Èx.à ɪ+Js4E“ Š%³-qË*ô€5˜ìëèìT4/''ÃÓvtÐRòÌÕÙOжÙc<£¥,ð­ôR>m€0ô\ åÄÒCÂí¤1Ò@6ÝBvGÓ*¹f~+Ýá'¹ÏÈnÈ}$këdSD†NÒÇ‘#IOíÅs 8!pÆÐ……4bªŽ|öÏóõ˼ aÆ%ÞÉŒ„À7+ÍM†ÜRc6°VUûì*ÒBÁ·„Qr4CªH˜§A±í,I }ÉZ‚6Ú×¾u­÷Q‘ÐôçÊÀØ /º7°ô ;R° "Áà™Ò} Ô|YíåŽ?&ç`t•™Èh‰¤.þVÕ«ÉϺ~][¨ÍÐJL;RPxtåü„+gÙÔCÍavŽzÁ4Øb£ÏL8•-1²óIT‹ƒ!o3Ì¿î¡»smæy3Œ¹Ó¥žD¹âýŠÁÇ‘ä-Ý^.áÐÙw69Î,ºTY~!/€Mïç™e²‹lô·ß¶÷¼3üŒ~ËÚ­Ñ/ WµËäÚ0º¨áIì7NŸc…8I{¶á«Z5o5gh÷×yü6ŽÞ½Æ2ŠúF#$i£ 6”¦(»´þÄî&Û3 Ö˜=¯ŒµÆɳ3ŒÜÑyM:wÕÝ­âOµ¶»dFp7]Ü]åNžh$ç³wîÔoÒ.áS“ÈÔ' ‰äÇ=wi—TxAVxèʮ̄¤FQâöG–LaQËà0JVc¶%'iÞù®Úù1šÎÃ~wy¿á§ôÄ}íÊ}…mõØ ‘ú¹} x©Xßýˆ€®×mŒD?j5㊠p; k·ÿgg‡*È7¥"Õ¬ÛÖs]ʶÔçÂH¼µ·á!§ìw²’:­ŠÐ»›­¢ÎºQÛ˜­baE˜;”­hCrEdö7W=µáØñl³Šü%Îr~ÃïU„yûKá˜8\ “Ûâîí»%ª* jÚ0H|ÌiDz9ÂódBæ.4MvÙ}îºt[ïqIìŠkq现ê•n›?Íã)é.Ô”Äj]¨ÃK{P'´jêlKÆÆ’˜uJâK舜âÇÞØÂlÞJy¡íkÎ}mÛêéñ‚ÿ‡Ä5ˆÊ~­L 2m `ƒÃÕÓ½Üßq"CÛ•ÌÇ=¦*î¢HЭ]÷GÛ·Ëþ¨ÛNç]¡Y¹[§ÜaýÝ»ÿß«õ­Ñ]èí…¸ˆÇòó&}~ôã †T°¡ ö‰B¾PÅçÙ,~@ÅO†œeyt¡ú{Hß`íð2×)Í>ã¿[è’M´4L9Eš NCPÔ’ö©u)ìÞGCCC˜Ð²#ÊŒ6Œ} þ¼ (ÓŸˆR2ÝÝØüfGÜ–•Ä†Q²µn–l%6¬6[fÑ–UôH“YSvÆÙX ’®{¥Ûÿ r:íÍÇw6¼ýufpíÿÇ„Æ¿é¬oßÃÿÔΗÚPÝV&ÛŒ#jòÕWÔ†š P“ÎwícW5Ì7ߤmn¨MëäXƒâ©Ý3–3”m^>m´÷ŒsÏXŽÚjR8a]/ç U2¼ñ= _¨<3å¡J† à$IC ¯?p“ЂCw&£À¢{›O\d£æHš£ˆÃKðØwÑ é.tÄAÍœäZ€¬:öN(”ÂX;ÒÇ°ØIÄ1)îÖáÖ©n€•”d2©·66¾ÞxP«Íô(Úí¥OŠ¼£Ì4,WP0¬/‡±_j›Ø .‰Ð ]vü+œÂ»Û¿Bÿð¿€'Þm㔸™8%…(– {[²³Fxy‹QÈé¤ú'“©7€žá˜cŠmT-ŽôRsUvÔ–PBUdøCW5„ŸZ8®ÉÎa_ AU¦>,rŸl#¾W Æ6{?Û‚¬‹kŒ‹È¥zì+Æm@r·€ëö‡Ûp|ý~íàDÜ%[YzGéC"îby4'MPBþªQ ÍmÀ„–¤¥dWbo#¨õíyíë›#üŸ~þçy¦&ýù :T>;mfJ3ƒïRrƒe-Œªô·Ïÿþúv£ûÃD£…úÿ‡7Ö³úÿõ>Ë?’þ_{wîqàlÀØé¬FRä…’‘Ct©OéA{JG|/EêëJ`¤cÙa虓#1ãœü…F(û¤”"hÖÛàDœÕÔ.w”I‚öóÁÐ;#ôj8"Ø8yFj͇)_ý¨ÂyÕÙ½$Ö¯” ëîɤû˜´sŸý¸e£MÏû²ý^Àróé3x9wwE©äaôwðï˃V§ÓxÖbºÛæ©l…u¡,-e wWuïËÖá^ûifÀY•.z¹ )H²ÕÙC«e¬ñ£—­ã Àâè˪WØÅ\Ú›U‹ûJ·­-9l{ïtûtÓ&?Hù?—ÍIll6¦42®“`¯OXÚ‡Mâ4¥iH>\Å3]5¥© ¼·­{1 €†[P ¾4òÍ¢-H«p @©„è3 óTsmÀ-»†uBHY§Yýw_òäß¿'7¼ôgÞáÝ,žTQ'nXý=¼Ï<àŽëÔÀ€ô.È7“#ç0ÂQG¢$éPÜ=<-y‡gûû»Ps¿Óâ¿Ç³¡jxëÿCcŒ¬‚qí0Þ<ü>>9:§dhÓÝ÷EèÀÝD¹¼ûØx-6‚u¯§zÆÔr(çíø¸Ë”)ÐÂòE}#´•דÂ2ò¡u•fH‹+ÎÊ4XZRcA‹/ÃhÉm0Œ WXÐCüfQóøÍâ¶Ê°jIâ>¤ Ö‚Ò¶¦±Ö’…}f]‹+÷,†Y^ØÞ4[R£°èlq…ÂLó³%5 û0 Õ–Ô(ì#gÒ¶JµbèRÁ8æÐ@ËTÌõ˜­€/%Ò`ôøå‘ÇÃÇÀÁp”"-^»]FZ ªÞôñÕN’kÜnoHá€ÞÛc"¾êˆk§bíÅ–X{öR¬mŠµ= ùÐÊ´D²¥*ÿ­ŒUá×P¹'»´{Û³{kk’loÆ FÇðËiûÊEiä øýôDÍfÐâ埻¹i´ž'½Õ& çûOÄá ŽŸž”Ð±Ï §>1~c ‡Þ%Õk××rax0‚‡ÝšL¶þÈÖè[çɉõÍ«÷~òWÖ®¼ã0%#;ÀÇ ÿ‡¶þþ–C™Ü°Áõõ Èê8U¨waÅ ­Ú@Ohµ§û»£7€;`ã³÷ÊRÈ6¡†0„¬¹¤g`3_ç¤ÓÜ{ÙÑá«XŠõë¯×¿k}ÝJÖ),~ÒinmîÁ„"ˆl§T¨æ« ¬oôKFIÑsŽ |£¨1®H ÷£÷E™ž+’$‡ýÝ¢«í"›Z¶ËL*8Sb·v‘E³fŠLRÔ.2èH»À¤åì‹DËl„ISeKâ7Ÿ5”)RŽýÙ¢[ì"“É”$+±è»È¤ ìë¹·‹¬W<³Ç;j×p¼Ü^ž@vÕx]o—SH®ÐK+¿TÄÿ~û­§¦±oÌúPƒ" Á•Ó‘†ŒûÆE⃅úÁ† C ©`Bí­¯ÉÅü篃WðûÃ?Á;ýV½Ül-vø'$(”…–íPP¸j ʪ…ì.¶W1¡¬BâiåV…Q€Ú‘Øu¡öüwK¨R„Úóe¦¤µç‹,EjÏ"7jÏ—Xü¹µ\;Kâ7Ÿ5 ì@íùÏÓêF펒¤`%óèFíù‹×+@íŽõ8x©E¨x-Ï!tÌ¢ö½ÖÓ.¡çf¬žçO)¢7‘D® ¢z~/++Ùóû •7 …ʲßÅ"eG¥÷(o¸ÊöËfP L¦J©(™¦‚dúmŠ‘õ‡b!2W)!gÊs,¸.wIÌÌ‚–Å¢ãLyAûbãl…‚ EÆvqQëBqq¦¼ }±¨8S^Ô¾PLœ)/h_$¶J ÛæÅË ºKr¢a]’ ëLÏê.Á·ÛQR(J¶‹ VV,FΔ¶_t!F oD¡øØ..l¿)n¿YÔÎ-6ΔµwŠŒ²‚vÅââLyAûBQ±]\Ô:YtÊEBb.-gÊ ÚŠ‡íâ‚ÖÅ¢áLyAûb±p¦¼ ýÛÞƒõzè¾{TVp/—ˆ’]•Š n™Ù]íS"÷¥ÜwIJß…bí¨ŸôÞXš\Э-Íí~<±²1–-/œ‘*ßpN²̪Ñé´N0Ç%tÎ —¡û „Т–Z~ù,€þ èî*èî èî{  »‹ÐÝ?[í ò3–ÌÕA™›.Ásž–¶¾ç…Îê×*È œs«ù9/lvrvsÑy1s†´Ê~̈˜3‘ùÑ!^ÎÓ0Ö÷Ä9s‡`9OQ˜ßBe `Í¿P \ø~{Y®á³0y‰à’SÖü×È”³aø¢Ýkü É›'Û6e\®sS°·@úfâh‡´'è³_‚h—ìÅ…èsßó"h‡ĉè³9ásžïw"ú|sÑy¡s†¿v"ú\-nv°¼.DŸûž8gî3ç9K'¢Ï8ÌÅ¢êíSÖ·} ;«X»9Á'·*×Lಈo»à3!þYÕöññ/–bWoÁÃðYi²@úþ_£/YUU"IeÆcM¾!£AÑÄÑb-JáŽåT%’gXros‚ï?›©pFRùð¢oJ¨»¢à»¸®IÃc­ ôv¶âœòÓÑ …Y?e(¬¯+Šº9»qÓ`vhå>.-®¦"/¨Ö–VPé’—WÂ8îÁªÿÉRñR½ôû%â7‘€Ó€T¾MyÑÝT¶EU›€ðY¤ýY¤ rD]:0áÇÀUNðüYþŸ+WÈ 1›#eaHÆ"ê^} µ˜L((×ô£¼—hŠ ¸¯÷ri»\˧@ÿQrvÚœ•¤ìE59¼QH/“¯;*-#…3’uãÛ rõå$°´2[L§•¿zÄ%Å9‘¹U¼€2¶ªäèb£Š[ž­Pà<£¶ÌYßü—JÎS¼ûÇà „åZüwÊÌÝT÷êQŒʼS@úL›–rß”6ï~¦Í?K£WX‰%Fýï¢ÓçAâ:KÒàÆ›‘¥Ö³ÔE©[4Œã»‹JÏ‘%Ù¶!¸þxô9ÇÌþÃb_3áŠÔý!fÝq†¯v”Ý0þõÊ1Mþðõv¢YÜ ( „çuŽÎNš-Òs« ß+/i¯uÜÅWñ¤ÕÜoHÈ•´Ï“8| ÜtËñÐë—%»TöSÚ¦{Ù“Eåø§£KZ}þ®æþÙ^«ò®ô#\â1oD§þ ½Ã#×Ô§—?7Oº§—ºcý¥w‚žãótH3VbÚ×îÆí2ïp…n†1hE¤okÉÕêwoÐÁêöùØÌcË9ÝìÐrŽ¤7;2yÕ1G“u/?òå×Yìÿ³îþŸwÉM¯©÷»å¦ƒíï5ÿ³îóûŸOÞýùÃÜè}¥¥àÍoôQ8»O^:§S—UaÉšÿ@¤½¯GèËÁAŒn oøñmŸ>~¿—dž'fÑT‹Q„᳃nŽ!>Ÿøï<ñœçíÍÎ;¡áf§ý‰Ðä¾|stsÐî4»ŸøódÍ1`ˆ¤ÐîߧO“(F:LÈ šßUüåO+㪳³Êt¹ÙI}*×\…/x«Þ8ùî“cŽêb›ŠÎ‡]p¹Íà@7èâ=.ø_ëŒ!9nvBŽàM7;ŸOæZË'ïs­›Ï?}IçøÁ®µ$¦ðÌaØE×Ú(vƒ.ÞçZÿ¥ÎÈÆçf'äøv³óùD®µŠptó[ý¼Õø”˜B'Ęsü@·Ú Upâ4jñ¥6£Þ ‡›ßé¿Ø åCvÝì|ò±ov:ŸÈæd7¿Ïýý£æ'-æ?Ð}N¶œ6Y|›ÓÈž7hó»ü;lÁ›M6ÐìÍNæÓ¹ÇWñ½®róù§,zŽî*§‘(‹Ï¼ù|ámN£ß ‹÷ºÐ¥3rÄ ½Ù 9¢Jßì|>‘k­ÃfÞüZwNÏž<ùÄAÆœãºÖV Ñ‚3§a‹¯µ”ú]ÜüZÿÅÎÈ öf'ä~³óùD®µŠ¶ûêô'ÿì|âcÎñÝj3úfç“Ï3p³ÓùDn´¬}ó+}ØzÑýÔi;sŽèJ[¡È Îœ†-¾ÓVÚŠtqóKý;#G°ø›#­ÈÍÎçRO¿¯júc `h®kè¢ïý0a«Ä®Lm~x÷R]js±º{©*µùatÝŸýƒ©ÐßçÈ3‘nxàŸ ÒyO¡üÊ(?yµl:dž–I~iÐEb™ð×ÕÁû`ˆ¿Ôùä’ÜÜìtrÉÐnv6ŸÔe¾~ÏÛüò?Z^þ·ùzÀ¼\v¯—ÁÌËrŸÿB'”ÏNu³óɧ1¼Ùé|"7Zç »ù•~Ú>lìÿ)DsáOXiÛ ‰†-FVŠÏtqsLñùà?úùÇîÈëz³CÿDÊpxsü³÷äÙ'/›6çøP…™²àÄiÔbLaf¾A7G±ʧì¼Ùùäs;ßìt>’Beý|¥W}ýÍܬïw§­<ÞŸ/õ‡¾Ô¿ã„yÖÿ#¯µÎ^|ókýd¿ÑüîsŽèZ[ùž Îœ†-¾Öº‹`ãêâæ×ú/vFŽŒÜ7;¡L7?ŸOäZë”Õ7¿ÖpF{Ýÿ*>Ðn [ôo æŽ| $b¥/€0¶‰è.©«‹›#‘ÏñB„#ÅüÍà!ÓÁÍ¡áAY“iÜí]öÞÇ–áøô䯩Õ6þ0“>†HÃc&ÝÅXtuqsÌôùà?úÇžéàæ‡þ©È,çãî0òûï#áøá°»ÿOÊšÿOÊYª_ÄãÔH=U‹8pGï!!ù|Æï!6}ÿÎtpóóýDÐ E®ïN/ãÀï¿OXÊ¡ð‰³ðæ?n°·møÐØÅÂîg¹ú¹9–ø‹_Òß{V®^n~RŸÈ}0:ý£ä-~çxáÓ¿e"xXW®ÖP8Ï}¹¶ÿYøÃQ®Wô'#˜ìξ?ŠÉöôßd>Á#•V[¿û@ÝýüÇb¢ÞeÐ{“ÌFïCu4Ÿ·>yÅ9Ç„Ò-[=4n1:HûX9®>nŽþb§$3ÀüŽ3Êöpó*¼ÛôEfVùˆ™[0—ú¢ì-Vù¢ .îŽ aÒÝïÉå8Ž~zSpŒûÁ¸7§•üµ _»jÝ7[¥3!¹Ì†vÐøcÿY{Öž Êx_ùoJؽYçî9ÒA¾÷r'Bàéؾ­˜„…'ô¿ð(iÅD«sÚý4ò²¼‡.ȘüïÁo7€V Sm íèR‡&»ê³ãRcl©yzÿ‘uµHå^ħ…™­tº9¼ìL¶ûå✼˰Š»ÏO#¬ðãâcçÎý°1eÁc”,³à¥Hy¯ìM)SfÊK3…žnÜõ“‚"ì7‹j±FwqSJíUbú€· Kw‘¶‘JA.TÕØ»8y… ?ì„>ÞÓ„ªš›ÁŸVùa?\-9BõcÕ1›O ¢töÏ¢šG'{/”úôVWŸZ¬Ü¥El'ýñ@æœÒ§7”SÖ†›'«ÀÍ" yòljN»àDž|\ ùƒ¦ô)>Wœ¸÷è JnîWn{N:ÍŠX%ÿxȃs&òC™ýƒÒ"Ôd»Îɮƭ™tò‡‡‰¿}þ÷Ÿûï¢Wûªþ¨¾¾†¶öÇŒ±ÿ¾úê!þw㫇[æÕ¿¿ml~õp}s}ýÑ&ÔÛX_øàoâáÒFª…¨ÿþGž?áîµ?ÿü767}>ÿ?ëüñO"~¸­yôèAÁùo©oðùo|µµþðœÿÖÆÖÖßÄß>Ÿÿþoíž'î‰f4™ÇáÅåT”{±ñÍ7[5øŸâ|.^qt âIûÓ0×…h ‡‚ª'(• ~ôëÐ ötú¼ÝÓÖI»±/ào W¿oïµöD£?«âEûô¹h<éퟶö‡GâEãä¤qxúƒh½<>iu:­=ìéèD´Ž÷Û­=ñðqÖia‡SñP@âèÅ¡8iw¾S#ñ(L˜¡qÄÌþ"öÇÓ /¦‘˜%ˆbABÓK¨2‰#(aÛø㹘Ì`™IPXø6ìcËË@øçÑÛ@Œ£iØ áÇ,{ê‡c(†Ñ|Ø ·'õÌ<`ÔQÔsê¥õ¡«1M¦&Ó8<ŸM®BWTó’s®bg+N£Jýú² *ûÓtÈ+?Á®ô80„d´úâ*œ^}÷4pO¸ 5¤/e@kd¬X»'žÂ®=kvÛ‡íÓrvb8ÇÚFeÉŸ¾Åe/ê—íý0ʆçøF:Åó‚ÿï‹·A<ÇJÑh2 `÷H» äjJŸø½7þE0ÓžŠ7ãè*ÁµÍ¦ç]ùb\AÓ ûÃDµ•ÍD9¨_ÔÅÕe0MÁ“Õ[=‹a«+¸x9|8þaŒá6$—ÑlØßÅÏ°tY2ÿx?ûÁÎ îÁÑÉi™‡©ˆ‘?¿ŠÁ~Oð½ÄqU”ž6Úû­½mñäÇq©*§UÙÁ…ÅÓ2üñÎó lÀl<Ýá¿qcºƒq¹wéÐWÅÛ(ìðL»}êW¼_iÀp·>ý,¾Üe®]ÙتÈ9–Îý¾l,°V©²“6ÆaÅ·âу{ë›îoT÷¬*Èw”;µn–ëNpÜ»çwíaòj$ü÷NC¸ÆE­ý%­õ_4Ÿû÷Ó">Ýòº¬'£·xŒ¢ž7TÏœIØï’LÎ(  ºSÞð”ÖõLÒ¾¶EÁAÉyÄ5ÊË\Û¨*TRå)uŸV-‘½ÓæIQ‡bà‡Ã@ŸÌ» ê€YËáÄ}±YYØÞ5{ª˜S­ò¤*ÌéË!¯.¡ƒ²‚¿î[öË“Š9k†~8uÝA0í]B]kÍÆÀãàz Å7ZÚq”„HLÁmMðI†Eq•]è\|2;øþ¶ªâ¡ äs{˸nz5Ïö÷]Šùï¿s¸ç o…ž”u1Üë{P_zëóÏýµDyEñr}‚ =ïÝp‰=ûCÜ Ê×môô_|k­åQ¨2%?ªbÖªÐcXŒ¢aèpuÔÜS#šøxǠΘ8 õNc8…Hs ï³qëÙ!û¬- ŽorBÚ”~[ãO&Àd0ÔÒón RÊÒWä‘’ÒW· sÉ<=l´6˜Wš&Óút4)!wŇ:F³Ÿò×÷a8 0áSÿ<†SÉkÙýlê~6©ŸB‰2ØUÀj=èáâ2üùÍp4Ž&ÿ'ÓÙÛ«ëù/ë›[>úêëoJ;6EXúõùiVWUñ y ¬Š¸7°~løUüßsüßMyG®L’Fÿ1¯Î+ðÿ¹õ/F•qy«:Çÿ—Å,ÇWÕ_2¬› äý8Làd®â(½9’l}}M&æ‚øe)Öcrñ—Üå¢ê}y/ g˜éFOä‰éƳa.Êc³{£»MgW抬Žà +âÛ‚¾¶V˜VijOçÙEyÛ7ˆ&ð0ð€æWØz×l噫ǟÌpеh=µÏ í½a”å|.È´¸ÍÏ1>·2ÔÑœýóa€âšvIÞm…æl¬‰8;Ê+ýó—Ñc+…tŠa%¨ÝJpf>[p©®ßÛzt³*¶Uþ¹ÛìKJÝ˧¾dç+ì๞çæ¸/Œ#ßÎîá/¹=ìý_æeìc¥xÊ1ÆÇu"úá`Äù­¸¤åÃcv÷›»ÔÇÖWärËYŠ¢æðâ“L›]Ø<KcÙÞ„ˆš€½»ûŽ{Û°;‹ÓÞT_ˆºæ˜îÁ͘O×mÝtÞÖÌñá\nQðˆnwïŸÏŽ»]9* Û/ZÛ‚¾‹«(~ãÇ@põëB¼¸œ‹~$,©½ †“ÿÁ÷.Æ ÃYr‰7Ùtúœ?Ã)çqÇõŠ;6ó–üÍ%˜csæØ\q\ßq\(ÄÏ)¢Ž÷E‘JO#Cø´`¨c‘Lêž(r–!ÚÍžÍÝþrv3º].cFd©`rLì-ÜŒ¸‰j韻Úz˜™ÍtZâÖëØ:¥ú–ö³¹R?×¥øN»OÎ÷*NžËè{kAß=õ¤‰ À+‡Ñ4ØDvÕ —ñÒ÷‡RkB÷XNÿ—Y¤9S±Ãð<öãy] éeW§G{GÛh;ƒz!Ò² ‰o#õSW•ïÑüÅÛhèOñïUîè‹KÌ¢j¿8ª=kv/zÑpôPÀ¯>…ã·Ñ› «"›ÇIÙà‚äŒÈ=ǨÅ"äIhtMÅÅÌ'ÍR@ „5s;ô:ð$â`½ ä“­PBú\à(c‘DÀš$s`-FIUÞ䨳)Gùs:ìn°º›–;$üVOQ9õõðíÌÃã4{¨O“8ÕOD8#ÒH ŸUgÑ q¥Ü|aö•Sœ¼hœ¯¼-xA9²B”~ç¹~sõ›ùÕßt”M{à oÁ(̶õËúY¬ˆß~3¾"—ß<í6;m(óh£’1ÛI:Fà±|?Ëo7ëëuà‘/DõjÓŒq:Íî÷­“Š|’Ór¿î¾@“2}$]s¨~0‰  PP9F#¸fK1Ÿšýà쟴OŸŠñ5ÍÞå1uÑàG˜gTÐDg<Ø·Ò6ŽFYÿc0ÝòœrJ –fš þ°ùjs}ý5òC¸—µ þÀ:/eú³¢ ˜)–LmŠÅäØw¸k’|Ußücˆú»­úƃ‡ß<­Š;C¯¯ ð¤<‚b2Þ=`Çê…qutEƒlGCž€XPßñä—Wƒõ%ÿ¸ÿ£÷¤Te¹ü÷ †»×wáÃüžÚÆúJ«Ý\¼Zÿœ WÕëÂ[¯L²|ÁL*Ú”v)­nöyÁ^Öÿ£¶±¹^ÿêëøKRø*É郕vn˦»K“Qu%rc{£.2¨ßk: MÇ…ÿò´Р;éý·ÇW+×cç†ZØ¡¦êÕõÍLY¦×°ùw\¿»”tõePôPJõPŒ6òñ%Íã½>}Þ>ü®ÛÔë” ,)‹ªm~ìék ž¤©5?I¢ùIvoŠ2Ç)š!0uΚÍVk¯µ—¾A†²ûÝgëÝÏö¿Yû?t5ûЦqÅö¶¶6¾ÊØÿm|µ±ñÙþï³ýßgû¿OÂþ¤A¶nÀ1'!ßÕFá˜f“úáö­¢1é"y;N/É„Ø8bD©÷m, ‡âå~Ü€þµÇô:ƒÿÒïm`׃Çð¦ Oñ•[W¸f Ì£™`FG…É°MßÚÛÑl^Wt_š9ðß ØöSÖÁ-BVô*§$˜;B¸çiÌàSO;êôbàÔæ¢8ü%Oq“\k'‘Nºö6ÆÅ°tBÀ`x£ü$Byà\”fKÁõŠK°¸8™VÒ½8¥ðè“`Š“>8k>ð‚MÅä‹vÕÎ(™ /÷‡0ÓéåH?„æ=” ¸€à!¡5¡©¦ÝÉ ¦‰·]ä>±êÀAt%~b-Y †vM¦!ÌD™‘: >óöžÈ~âÁu8-Wì†l~jüV¦ÈR›Ø-É14š@Þuž+ö0°‡AJpÄŽ—SÎ(ÀýÆá^3Ç’7x¼2|®ˆ;wÄ—ª€Ã—)Q{ÀØþÿÞQ1ìÏÆ£ª¸ î¢`e"€j®üy]„ʦtó|”júI2ÑînmÖÝ䶭¦yh6Ø”1ÈB]½z>´„nS‹]íŽ"£½ÉÃ]õ¢q iª+Á(͆ò¹Ð¢=ÓpNÀÊ•l̆ÏGã¡ëkлŒFzþ€Þ‚r³{xÔj>?BY¤sMzçp½ÞØMšONZï ›ÄÁ¹Ëüð~¿ß»Ä÷r2›"f«Ç2ÆNqÀ”NAy£p$ª [`Ö^/¬M2*¸¡Aµ ¡ÅE4®çeø!‹ø¯¢½ÆÓ(ˆ†8\oˆT â8ŠËIÅaœTvÄEÀ;@¦È™ÖûíÃVGl>Ì~oíwÄ×ëZVeP4¿Ä C"Á„1Ä­Ì•›mòT3H¡”ÆJð49:;í=í´ŽN~@üø«´ÔvýË fdŸ> FQ<'lAkÂy[ ª¼ckÌ>Ëb?dów:ìñltŽ88e^8ò'|ƒª(¹ëI xÐf×¥û)K$±=àÂÞ‹üƒN(Þ _ jf½)Ìjø““`"ŦÈ2ã¥,Ía’òw®>ÁÛ0šAwð Ûva-;Ö¢é¡QšÜ*¼ô˜Àú‘A9³´¨ÌOï9´‡ÃH§G2<Ò&.›¢%¿51£¾91’ʉáFï¤íö˜¬˜Ø0ŸmÀ"džUGW%œ®ê’û…EÉ¿£]±ÉÍîZíØòýÝ]ªV{lϸ®ÎBî®lŒŠÀÕ´Éß„¡ ¬›Ç¨W£ãß8ŸttÕ\T—ÐVÇ p Ÿ»Dá©nP=Ãp 'hŽÿÃô ±~Ñ?Öô9)ÐÃ=èÍŸñd5ñ%ÓuÜÂ$žñÔÀºvÞ8h¼ì4Ž»ö¿Zb x>NµAŠØÒWš†ü½K›G笾 Ö¦†oÈþ¾¨m¤¿[¢&6©Í8úÝ”¢£Í¥›1–Ô?VHðpΠʵ<ìbÎÑ-™–ñDëÀÞц"oX¥®foÏ\ÏZ:$š÷‡Ý„wÁï!…®wnÏ$bTsäÔ…d6ÔõÃä<ð*áD<!V$9¨kⱕÉÂMÉúÙ®Ð1¸3Ôßc´4¬ -hÏ4°ï{¦:v­f¨v`ö'AÖc%ÛXCºá¸âÄn+™ø=¦¦/gR#—âdtw&‘ðƒ 7EÚ7‰5ÂÅHZí†hK bb-{Å;]£°uª ÕØP‘ÞëÑå¼Æ¥„2ΓØtjš+“[È V¦ï¸ø\±É‹F|šÚ@¤hñ¥wâÃfŅûÌÒÇé¾À_‰wp£ »¹¤’ïËÀl@}§@¤8Ÿ§$Ê žT¦ìUéõƒ!o‘ù>ËÊÜ¡}ÑÒ5¸˜'¦ÕóZ¸hùY¿mŠ:LzqŒÓ„/úó±? {$ †ÿ‰Ø4Äc D#c—‰F_tô÷d7)é(»MI²V#—Ær,B¯@´öЃE!x’i³€ lè£Nºœ\ ´hOÑš,7°®&€¥Ï&È&öü$0[@÷J\ƒ²rDÊÒí%¤†×7ðõ!Jgáá#`÷‘LE †ÒÛ1Î+Ðo1o½ óÛ—ÉòîèåÝl¥µÏ—IžL½0ù[*ªSó yph(e*í±yž&J±™*ïd Ѥ† €í9j–Ív÷”MÖªdP¡B ÜÀ‰Þ­²D\ÄQ’†ÈR/”úûHØ;Ÿ]l›\%û íÊÖ6jò&•gã$¼À¸(ïÊbÛ$csšÉ¹ÄÛ–çz32ðÒ_…¯Q¾•{\HLPT«!ñÛQß׆ÕpóôèD ‡V’¬Ó KÜë×_ vrùaÒƒK9,÷*Ù~X²¢£;JŽ ÏÑúõœf*µ»uzÿã?%‰ÍTw¼]z¯ÒGÙ6%ƒÔ"_óÖUa' Â…?V´ =¥Qg¤0I®ià`‚Pü0—ƒ,ƒOì@Õ"ù%ÆÓ01Ú`*,áÛ`ì$K…v¡3`ßÊ93Þ09‘ªPÐ){³Ìäzp ̄瀔ÚJ2ü>­8³÷ÙŠÈ VŽ&ž¸6ŠâÁ6vÄÒ›b9½€d )M¤&ÃN)M²žA'PËC‰Ó—€‘ׯF¤ ù˜òÕGÙ¤·CÝg¤U1d|ÇÈŠ$ðãÞ¥‰æ˜ïÓŒˆÑã Råü)˜[Åqr¡2l¨ÕÄ0Áœ”•U*)jO¯áž”†áy&!jn“ §ØFI<¤ÐìS+‰‹Ë:Oz«îeÁ>jgœuvÆá'1ëĺ-âÛ%‰ <¹ù‚0‹b °øärè»àøH}¶“ËB–âÇ·x¹°*Ôi‰~¤d).—nf~³3²€ {Û–G«¯Sû‘* \µÁÎ 3fC?§sVDœM=ªíÔëcs üÛˆV ha å¬2ëÂ)¬/öaw‹=!Q dª4–(¦ÇQ<"® ¤q9Ñ°¯d{j˜«E»r=>2{@e3*Bpã!R?ô⊣ÕæŽ)fÐÀ¨øgý¡¶›ßöLCœæcA PõsI+*]¶¾´Æ—Å=ИzoÔû—þ.h›¤·ýKcp¥ÕŽ©»µåÈD`z—ª™ú^äµÉ]†Ðòuužê“¯Y‡<Ϫ’ {þå±9¯^W,|-sj]IĪ yO€õ’W…‰Uý}l*8åõ‘7Qr°òqÐ ’DùóÜŒé„×jö6Wž½U†)w挾dôQ1^YÙÜ×iHÁ· m­«Ñó1“,uÎì )ÏÆäÚ˜•Oí› ìbb(Ä+èÍsEŠàhÂ~ …§ZÒ‰N€h®¦t2ì± $Z (:%ÖÀ£¡MAÅÏÙˆ!–f0V8•ïþ¸¾þÕ]B“AçÍí…¶9Áø’vlÉôâe|@‘j}»Ç'­§í—¬ Öߟ4NZº„uÂ@öþ´«Bçè–;¶æ^™ N±„פodÕ.Éñº(ú2uþYVNvC±e¦Wˆm7Å¿÷3ò>Ù— pay7æ»R² iÄI”.»~|Á¾þ eGÛúi9aóÒ_}¯ß8a´ Þ²Z§§goH§fHGÅ^wš'­Ö!ìV÷Ã1ô°ºlOá;î†&B,[Õ6CSˆWn¯M…It(¿ëë§èû<%&à1ÜIeûqŽI{a† ?I¢^Hb]²Öbу]h*[!l±¨=»€JÅæÃG©hDŒri"š¨þÙVG^5eyÌ"\­ÂÓ‚ª !]^Ñè4Ûmc:¬Ñ›%,Ø BªäÛ³ÊÖ†÷-ˆ§d4-ï ‡›âlh¬Ú]õ)ÇKg,xK¦°Yõ›G?êÊý`à0ŸÄ0¥Æ‰²'oFÕðد%ŠçÐ×)†Ç G^OcÃëɸܖxV鯺i)ªP¢yÔlœ¶ò"¼,¶p»@¦&cG—žÉÙG1šZ¥UÁq-M \”^M¯'\-²:¤u‘§›=»œ~Ž‡þra±˜²Ï®âþnÑLíúÌï¸d®EDSöë žE%=VsqJRÂ¥H›â5µ¦Z–ÉÎÁ˜±Q»\êË‚Ä:IÊê2 ´^õVÅôEÀcKïñ“*.07/€©%†ËwÒ:n5N+–ŒÏzã *`Çîˆ÷€{úV¬_-†„F˜ôËpŠRy[ÚdwlõlÃRf˜ïîúÝü=Ng`5ùÒ Lö¼±.îÙßî/-çÂo/Ç2;ÌŽ·ÂàÞñ™œ#ÃNî½8¬,8‰ÔÜâ€wÞJ[ŸéòkCV%ß„ýfe‹fÛœˆ1‡Í×Í3 ¥(ãüm¯ßod€;‹¨›Ó£ãL’‹"$`Ù ®ÐÛY¦3zÕ¤(eÝ…î²<…sÓ½ÛX„¯ÜSÁsϯ,‹ùãîy¿õô4¿L)r®Ê`‘z7³ ^e9'ígÏ£²;1©ùrïf…i d<oÌ 6CWÎnLÁùîٓЦ•åæ{m÷“Ž{³w 6;‹Ä {w¼{‹N ЋpzG³‹ËmÛb™a®µŸŸ«)ÁȘ4<ÑÈ-ùhÏ›Káóc?D//|_é6el¥o¿ºoÚ ªPÇ›ë,Ãâ,Ú~ˉâ0x _tIèÕ® ®Þ¬©¾UK‚•SØ*%Cþ·„_œ´³¨:¿wÄ“S$ÑlÌÍLXw‹Ó®¬H•ê<¥¬IKñОF…BÓá¢q25ÆåáDéê\Æ”C³çèðöênz“Qì©£²ýêl§ý‚J/à V1zÒ˜+Á®—wÇ)€VzŽ9`Ëds-o‚¦ûÁÀŸ §+ó0L»$Û]Ì;î>ÈIwa'©øÑjä¯^†SÓMY¸UÀ.aÅÅ·,½L™]„¿RŽ*ùľjp–¼Ÿï‡ó`¶ôåÊÕ&æ®d…Qy^¬P)ÕG䜵{JN¡!êW´Û‹I.‚q‡½.–[ª)q˜d¦! \i!7ŽQ#Kûν`ì@EAt¥lhÆŒ0@W4¥ ž §ñ+ëÑ?å—JC±¹À53¼gºŸ’åÌSU¦ÊëUÅzëûªMÍW·æmd jãÜï½Aó¨Á,F Ý6PR!›I)àU“‰¸·øÙPÆÊC–ÆæÁ?àÀ{UŽðuïüxkJؤ©$‡‰?Ÿ v¼l`4‡• tuî¢_;üYŸ†S2_.ý8Ù›ÎE‹Â ” Ëñä2ºJ5s+ÂÌp#•üïÍnA` ÏÔ€`saDº³Ä¿0_!Š¤„#¼ZmL"×ªÉ Ö7Á<Ùÿ~B¸¹"þý´LØþ:.Ï&ðŸÃr?ºWl°ÊÏaÜ ›3,ä7w‰oq>‘`€¢ Ûÿ¿Y8Ýþ÷žbZhxòjüzÉè§Ñ*žRá>ñ®¢Ì’]|¼Æý ”îsìŠïÛ}‘î†e·o¡88ÚÌ +€‡-ØÙvµÛ8=:h7Ë_o|c† U†ªPÛi¥šÓ·P¦7ÁßUÑm=}ò´*̾”Ｚzì¿#}äw´‹;—[سbÙ1àã—znjùgíÓJ.í‘¢¬2…!¿îY»EÚ~i › õ ãS§ù. â¿e@S“†ò¼ù¬Î0i€=>tú ñŸ¤üG‰ÿ„QŸ¶2ñŸ6¿Ú\ÿÿéOŒÿô9ôÓçÐO2ôÓW{­nó`¯Ó}nx¨»¾ÓÛ°ñHË›þ}lyÍ£ð+ úªØçŸCúYažû ôÃQ0¦(bðÞZ•^I õØ>¸Æ´á$?”¾ÌÆtán)ËÔy@aaúáT‡]’• ÌZÒq˜rÓ«÷ »Bc6© ó‘ì‹ã?c-6b4úÍ ¤¡à¡M££¢„\o'=„0w~d–9:.ô-}¨OzÀ 0wám“Î V€•¡ÀÈËaˆñ™`ð,ëKÍ8 Ì|¯ÙÌw¾xÞ`ªCãè F;£¸(uÅ5È°ª»‚¤óõt<Ûntñ ­ë ‡”†?V!zeÓº{E ºj\ÌF¤§úC §¶µÐ5õ®Ô•”ù#îP=%õ¥ûœW-\úrõ’„O <h2˜zé覱µ„p::þ‹'s|9OdÄ òeR,h×è—¼òÕ¥›§Ü¤Â)Æ%|t Ÿ.ؼ]•µs2.`UxÏù¯´Ù˜n¡Z8_Óº=†V×3®L÷­©‰z G‚ÏbÞ÷áÿãÞÇáÿ·­•“ÿ>xô™ÿÿùÿÿ¾øÿ)÷áÇç€ „̯†1Z3B€ðßy1€°\sÉ%w”á[ŽÐÛžG|â“£—bvñèœHUlnTÅÆ£­ªxð•×9ýa¿%ö:݃£½ÆþS k[â7ñ¢Ó=>BÖþl6ŽOÛG‡ü£óC`O},5ÎÑ.k/¡%–Œ”{ŠÚP©Âöž´žµ½/s7±Á^«T”°žþÿÆÿô¼½¿ÇÃ|ßî´ŸìýÅþiëå)´+‚»{ð€ûÛà~ÝýÑg'GgǺßï9î¯xPß0zÂ@ëÖWìéø¬óüÉ°.°¼£ï —öÞÑwr*›_Áÿa‡öt œ×:܃cÛk‘˜AíFé²%ï ùõ ¬Ò>m@IÇü8ý÷ ;•EX•Zw®Ã)TÚ3*¡àÁû‚գ஦£àË—öqŒà~g/ºCG'ÿ>”]iy»þÙ„j›µqߌÉÝð†ZgFdìíe²ªí‹z½.þ½oÔf~Þª¿w‡'jNÓ5˳;8Asz8;»Î~pg€»÷ĸól½;'ˆÏ âS£"ñãÙš{l9{ç‰ß{såÇý§O:F›'‚OïD1×ÎÛ\Yk?7™ÓWvjÔB Ëøó`8qƒUS²B²½)H²+€#1*êQCÙÑ%ÊÃN¶ÖÙ$1úv4šÍÖ~ë¤qztÒ‘·„,Hÿ}bî:‰dAøsæÐù£¬¸ wøü9Ôü=·ïß×…Sj¶¬S«ŠïÛ'§ßµ~  (®0¡ -åÕ#™Úb\Š¤ÖÝÇ?•B]@ÿõþöQè¿Í‡6¿Êë6?ÓŸõ?Ÿõ?ŸFê'LýsÐÑrÛdô Ãž»ÐT¾#ÞŽý±É›ž¥6º­?™ ÃSƒÓ`|û4 X@Žb,:ì×G~èC‹P²§d¿ ß’!gûC•ùAƒ~…Ùsâp ÏB0nË8¸ž0Måƒ.Ï~Ä«ëE)‡V'絸8 Jñ‘dÜS•ýå—Ædrˆö…Hà–‘à®xɽå?ï H¤i+ ÆXò$ºn”YhžT³¤¸¢Â +OºøXµŸÀ¥fN>}'e1©@ç“Tó0håX§'g­4Wf㸠”ÇÉ(½åçíÃÎiã°Ù—í1F{ìÁ½3>ÇÁ[]P0¿ýãÎ鉒Ê8Yä.ßõ;—ѕ܃γ4H|rAS‡-mî7:¤UY÷†~ÂŽÅχ{ûRùtÙèõiIž1Ä¥,ðÖ$ÉBX™Mª.ëÉt®£ÌÁ¿]ÑìtŸŸ´öN/`/áÇ÷üc'Ûp8Œ•æƒÊ¹Š½óæ0iabP9º£ 46«ìíc+ ¥ÊN¹úúDÔ¤õGÕ^46×·ù}úV6ÎUÃu%ß´8¶:ßÊ Jí½fÞˆ£ŽÖç1ÒàªMpƒigõÞÿŒùâ9¥Ý''ÀåU[œürŒgtá°qzéœu›øWÞM—¤^$NdÐ=ª*ÊwTûŠÃŸníùlðê!fœ6 TN\2ÿ-Y]nKù&böm±~ý—ÎË›Fœ…ýØ÷“i‹ð„í'£Ñš#ïxÙp åÔŸLzßÑQŸ0š„1 ²«VÄ’éêTó š5Ètx O;Z¦W7ëÞ*-”á-Åå{fÝJźõ†wŒlu/×3…Øy¿ÎnÐê½&®Õ©`É÷r_M¨H]ÔHHûåÇRëÿ7 ã _ÊÇË„¾+rÙNô6ˆ1°ojÇ&Žm*§±a©›Ê¤R±Àmb:&e-ä󉛽¥”“™…Ó׫b‚±è­íßIß/à%b"C”õ-ÖËûîzx ½èt¾oì7Ž[{ŒF-i[Uhõ¶`ô¿@Ó|ÑÂv¯õ´q¶J+¥3äëÇI•Þ·ñUØŸ^V&‚nA/Œde*%!£\¯V_®’Pœ-jg¼ämµ£î _Þ«AÚèÑ<ô•°ã ¸±3Úx‘AÉ qLþh⃧Ì4„|×èoLJÅIY¸H!›É[ S”t<&@»(êj}*,Š#”Å—§À;$HM•¥ÉOƒà%¢"Ô=6^$ÝÚÒ|PɆ±ÒÜä3‘:i@aM/vt^$* –C¡5bB|wÆ•ì·þøMÂFÒ| Ã1á—DÁäÎS5ÂÙ+¢Xs¦w—¯FsN#èe£ç†Ž$Ü—ŠgL'ãÂAù×ìØfxôrÍâ"*¯Â×Ù¸é<"‡.¿+îê“q¹’šu±?ø+­oeí z0GêõÇõ»VÈ:¹È•­š<ÄZÁ!´è<%ëê>ýžÕC¡åÒ ¦° ÛÿE¡Až°  ¿2`X@ô~@A†øÂÓƒ³“þæ—gG[npV¯nŒtyš+$wåsuÒjžÒÁô¦“4þ6ü@çÒi4Q.Î÷ì1¬jçÑtÄ.©=Æf÷Ô'k#»üÌ’ÝtvéráœvUxq”H~®1§`N# ¦žUˆEiÙtå'Ý šq}ê 5D»ô 22ªØGÈÅ8ª<uËDbF!o­@µ°ßíÃÓî10ÆÚ‚ŽDüO¢k´rA7ܲ`Sº½áÅê¦t mé„<+žÃPâü4Ä@XoG¯8 ÆšµœVxƒN0}õfðRÂ3smOƒQYÎÕtøŠY6!Ò91Ó{óèà˜z«k5­+5ûA¨oÛµ;­q/ô‡Ñ…š >„ÛV%ïiÿn…éïuìè« )±–pæ»ü´±ßá°æÏØ’ác$†=-d±å Ï÷š¢ÏŽãŒÙÙ6˜°`†0Co¢×9\4?ýˆâÜ4Ú}êÏF#²…4þAëô¤ÝSÉl8n±ÏÅ !ÊrÁN€mž´²Ñ±R™É®(‹òþ1×á5TÔ.ÔçD)LqöXv±×$*Ò>ËN€& R¢ÑïU³BŽÎÓ*…_¶0uËái&TGûWöêáÎtd×9 Çrü*LÈ.O1<>6£útÔx`^ÏŒ³U%Û!ë>ç_÷ùW‹lDýá~àcÍì\›tƆ@ñŽqêö¬¤µlT¨3Ú®™ R'/ö5ó•2¥ˆR,kõ"ß»xHd/æ;"ÿ¹¼¬óŒCž7N,0BJ@"¥Ý¼/¶ˆq_’àŠºWˆ‚Yƒý 6( 5b˜‘’é•2Œ.BQÅ+é´NŸ5ÏìhZ̜ѻh ‡Ó“¨šà’{`¢Ò¦p̼Àv)ûY\õ,¾kïïç—ð<ìE³Ø  9ç\¼x‚ë+NbŸQ2‘îr§IÄkŽ µôâèd¯¬ Û‰yŠÖ¬DÛ8@usîây;ßÄ"ù$¥ZVú&Ó䙦±fðÖÆ /úÌ ]àà”LJ]áÅûé6¹ÀœHð¾¸c;¶8.Ÿ®høÃTÌ›$Ý#v\¶ÔK©_)\¥–é-¾Å’”žòs•¤Kj0ä"anŒM\Ó,YÛ“¸†F¡“2@ZÍ)¸Ò*¡xêYZ×udþe”W"«½ZaÕ‹­¬m\ëÖ¦¢U½G–®rAX0ì ü­ƒ«¸#«ö—†U¹aP•U6ñÝ年%Rf¡Ÿª›6^Ïu¶‡äÚÑVwÇQ2ÅÒ"¯ òyÖDïÖfwÜ .R^q4¢q·sTà ‹tŒ¼Ÿ"&Iå¿„Fú½”ìj™³4AfIª"·H_Ú™V2ˆ¾¹ 1mõb+ÌVt:õ¸GçU) Ç®Mþ•Ê¶äörr³Œî¼œª3wCöåÔÂ,nu¬8ðç$[C­}0:úh8‚X2)ô-1¥³˜%ÜÒ²@Ž·dQ¯sò2 öuWÜ]=Lw±Öiã3ËÔ|ÅSRâÉÝŒ qÉ‚L !ïÇo¿ õAöT)ZDª <š‘Í(EñüK ´yËU_ºHgOÊ›VÑoÌsõß ¦OÞDý€îáÑqãÿ‘½†»&²Íh3Q—vžðoؾ£“.kÁðÍ®¸@Ê}àõ)=E‹Æ±`¹ J_4BOæoÀ3ËŸF¬rÇÂ#Z0 p¬ª­’8®@ÓÞ`’ èr†å¥°hÚéIã°sÜ8*cÅ“È(Sáó€ä˜ràᦴœòZä§ZL´Æý…o¦SìºQðPgÄe{Á€© –ŒñJ¦Å]Ú©X ‰‡>†·EXýKjÞݾ„Ù¼0²9"œô‹Jc( ,V³’g~ß ‹åX'ÄÃc5®ïÆà÷{ŽU·ÀO0TÃ’¤Î°F ›ªüAUr‘þMWBN.ƒO¼?¾ —kŠ:Am±, ‚Q¢=€~|ûÕÂdTþÏèúÌ)pH‚7‰#ØÊÑ*¹\dW9Z¯ò=sï/®ÓlîÓ$›¥ü“ì¿ñ&ñxúál¿—Ûo=ØÚ\ÏÚ¯¯?ølÿý'ÚoÕ>6—Fàèü?V¦7"M?3%m¸q¬Ù¸¬¦mOÈ»-5È›·ùÜ?Εêí±‚Õ1ÀE<õYIÚžbÚ1J(éáÀ;¤ïÇõK.•Áƒ +UŸæÐÆ„å2Ó.Ío}@ÍÉþ‡8NÂ;\`ßÀâk÷´AC"ÃV}Ìp7'sõ9¥,÷y¼Pèò¼å*í®z*e=g%.å%4Ÿ™^”Lë‹ß–5JSè“H.Tíµ”ÝâBäŸ2ñš\rLA˜ß„xº«K_†HÐÒYK¹¸k0Ùj™Ih†ažÓËú‚YâÊB…ƒ®±ŠºjPÖ T›Ç³éÏ1ö3êùxc¯~p€}84€ŽFuUŸW—Á˜²ÿÁŶ/9éŸ7¾ou›G‡OÛϺÏ1Énê0„díÏöTŒDbOŸœµ÷÷Œ˜TÆ7™ùv‘+A@Îé‡oÕxl £Ü§axžýFùá[ΛA;Àú¾ïvŽ[Íî~ëP<\·xÿëp4C-Âø@–GItÖ¸F°SÒIC»Œ¨'D˜q¸h¬¶æážÅx¾Bt ÷,Ý)#ÉtÁÊO™5³WwÀŒŠnfvýHü*~,@'W‰0vüXA—ïß*ѹ¸‡\ØkKV@Ø­çÇÓE¼S¦ˆ(Gê{¤âƒI¢hžAO\§Æ:$ÚÕ¢ªëWë¯ëPá3êéç³Ád»k|¨h;³cySѦ ° zᶇt„@=Ï6½•&I=lq~Tùáûè¤]ã¡üæ…ÉÊ.N,‚‰ŒÇÍôÙ¡¦‰‰-а´%1Mý&r'îªÍâ^ ÓÐcRü¢qÀ¹“qCÖ“‹ÔuÕ&ÔIR ê„£ivɘ඾lVß”°ŸûP5÷Òï÷BÏj ;@ ªáïUÓÃÁHB ¿`õe{LÅ=Z ¿7‡~ø”Aœ Cÿ‚É  HÇÓú’®¢ñ…zϹ;øÀ}”ïïâŒïîß­RvP¨mvU£¦w/ï.x0˜W =uzÈ…ßvFË*‚•Ð- £.ìîž2§xòO–Øpµé56Œd´™äúN¾Pe‚€kzŸÜ•ÿª ¤OõTXØI[»IÔø®*´!r*RœpO™« jÐaú_™Ý¿Oæÿ¸kÅ×›Ý%&½Ì[^É…Ä7çóx×~E•È¢\3s@ªD±»ËÈtrˆ´¦{žzyÕ¯üîÈâw÷Þ][ýhms&íVî Õ%]%ÕÝõ»ùÜd_¦Ã¹T#p{þœ%FšÒ½Û€Pzãx‘]Yj(ŽòWa,MŸvwÚ"Ût|Ûr|{àøöÐñí‘ãÛWŽo_;¾}óþ‡use.¬q_ÃÌŸ¹Ê¡Ö3Ò×83£H…Ç­ï£=³¼<Ú… œBßBܳdYCÇæïg–š>Ë/Êj£^.¡öa†Ž…Ýw|»•™Ê{WË­ˆ-©?ÌbúŽ‰‡Žo‘ãÛÌñíÚñí¥ãÛÀñ-p|k9¾]8¾=s|ë9¾5ßÇ·ŽãÛÄñmìøgNì"BATd' s¦šs=hée¤m „‹ý–½óòMq´m-ïw£ U¸&‹Lˆ†Y€GœvRªQJ ¬Œ—Þ¹³å{|ç$2Vò   |«\ÛÈb€²»s 0A2#ø¡dY€5´»¿bÁ¸KéDÉÑKº¤1uŠm®£ˆÐW¶œà¾ØPNyrlùª¦í5د“­Ë”/P­føÎ µE pÂß–O` e§2$ MU% / Dö;yÚÅ117Ywƒi­65sO1¼ç¸/wUgZ¬¬˜0•kˆøG`ÝqV ô‹ÀEå³®‘>Tëé"¡Ôñkã•‚Ä yN‡óIªŸ«šwÜQJ6ânVm¤Žº7Åþ`¢ô¢2o"rÀìH7臑¬Õ±Ç‚Ë@Äa+LóK&[0ÚvðÈ-ÂÕ,]|St„)áÄì²Ìð…ã:àx‹šòúRÿ÷;¶Îҳάý[½v*^¼ø¬}bÎo˜ú¨A¿÷7 ,á†Ü3%¤ûß(AUVÖch)ôÈ ·“›¼Ò•mâtÁÓ ßÊeXÔ8iL@KÇ,—·hˆ•0\¦oµúÅ ¿&Þ-Îã®É/R^hlñx+á³Þ|f!%¨ ·àïeG¡ñB!Lˆ¬º1ëö ÐÔ" uI³%û³øXBÀEüòÞXyù“ü»)õw>๘ ZïÁ÷ïW–ÍïwœÊ»?åÌœ‚†Ú¾s‰’ÏàüÉüÄ*@À¼¥Å…©sE¿yd pà^‰¶1‘#l$žúº‹Ž›¡Rµàðv\fÞ‚ºÀ™vÑZ§`ûtyÙšU•…îž ; ¬¬ØÝî³Ã³f·[¡hQé×½>;>ÆÏÅúæL‹ÖÁK¬¿vO*¥™P8f¹>Ýêd wó%ÊEvhvÄiž“ÂŽØô£°ä£9?½™£ˆ*&\æ}€R‘ôû±îÀꪘdÓ•îïf @Š‡Öï*Óš§-BŽÙ¹ÓÑÅÆ¢yYæîÓ3Úîƒ&/jB¢jË8¢–ýVYˆ¦¿5¶ÿוÞîÁp–\bÇ¿‡ƒãÝuL¿`kœ_W)\5Â¥5¢¥5fKk\/­ñriEÔ`N4óí ¢‡Eܤ{Oɉ{8ìáwQ ‡Õ>—jdµ¹¯DÏ­4¿ÁÒùKk´–Ö¸XZãÙ{ìB?š¡GÉïÚMâÝZ à)I _ô…Dÿûí7Qþ$Éb⤲¤!Ì)m‹n($=–Q«ˆš‹oà`|þ­‰©,]¬2ÅŇ;‚›lý ¶¼x«¥`IÊ~ˆÖ.B¾2š\¥ŒÎÞhÇH-©_f¹öe P5ÙEÄ,OIzÁe£ò:Ñ4NäÛÅúý@ ;LJýKç˾x¼UÙ\‹Å…ŽW`q߃½}÷~šcÕ‚N¨ERh­6Vö i¿‹LZœ“ZYhÆï#•o|þf}’¤ó¹?DWeÆK®Ö©¬«R±tÖÔiFe½Tc]¯×•¢ÚT^sÇ©q¡¨B¹ä ÄèYH+D[WNCªÑ$&0„ñe‘ê]YQc tzßUh…¨±É­ƒãÓvè”쎌Ñ[ʾ&pbqåÇcTZ¨p;ï±wV߉@°¢òXO9›Ê-]a×Þ.Ù6—¹Âj»å½×ÿŠLpþ€‡ÿçg2rnºÊ™º¶àÓ:È%kùœÑó÷úÿÖýÑà» ÿçÆæWÿß͇Ÿó?}”Þ0<ïîŸî·Ÿœ4NÚ­JãàÂÐ÷<ùwwèw¡Ncoîñíò4š]ûý0®¬A‹Ö6+ïal4 T“’÷Z8Dbc{k{]ÔÆQ ]øˆä7›5U»ÛåÆþ]±fÒ9:;iRL¢”­Ðð{žô’zÏUží®4Eª÷<cvÒàGL†v»ÜzÙÂÐ&^ï2è½éŸ=;iXu<õ‡1/#›š*…þuÅý½Å;é*ÐGBy[º{íÎ)Î"³•Á-¿NÛss~öE¥‹ÛÆ°“7Òã°û¼ÕØktì©ÊBÆ7—h6å,D'ÉψþÂÿ|>þÿjýÑæVÿõhã3þÿÿásü‡O" àî/²ÙöDÞG^¸œÝ…Ã)^¸<à9†E&6@4»£þ9…èÒËQ¬i‡±<M—s ¯;÷°‡$þ‚êÇôU÷å…Žý`öÅ]Âq8ò1õÐ Á“EÁ^ÈèަƃΤ‹÷9f=K¬®² E8 df#Ýùs#"‡E4ŠeWáømô†Á[eKïûSqŒ’’)kç«ù’KþBv¥ó-bÒÂA0N`a‚1úê)P˜ÔÉÃÒÙ±{ºÀdä'—t@¿ã4zB#|RèŠò=¡œíUéo:ç¬ÅY…ÓãÿW§WÚòfîý€÷žœfB¢Sÿ»t\sñÀè¹€ÿH~Č͔ª'uø—n'BÌ(áÞ1 x˜å‡Ë4ëMá%cà×1ÃU&aÓx6îØŸ.¿o:ÔÐÇ~0™^î(AyÏêr Ä$ÊÁ¨Ž•ËÎBV‰…ÒXÙõ¾Aîi½K ¨ñ„Br˜OfƒAØ 9]ÇBka>´Þë©×éb_ú[¶& ê ñ²‹ù§É‰fóáÃ4b k-$PÁ9ïè °M¿ŒüX¬«¬&„½w2MdÜ`ÙF6ygïûŽyÈ ¿}˜óõ‡Wþ<ÉOØ>Æ…UÝ„×k`|“‘hd¬WDXÒ7Kã'k•ÏdjÚߵȂÕÌüJ`xYñ+õ ]ªÞ!¡Õ? &&†·Ù8í>ß;Æ秇ôéAú¥sö¤szB_™Aî:dvwj ôS>ÀÀ‡uÄpAÔq¥ºÉFW˜ØØ^&®Ò›qtEÅŸÀ?`—©ò]ñ!Ì Ê뫦!Ñ1S¦®ß²'Á3ÏvÉz!¼Ã×i½úÊï\Ù £+Ü(|%1‚&+¦g¬IO‚Ùh wmÛŒjÓîtùèZ‡”?·œT„(—ËòˆÅ½JR©=–ðPgCÍbzÞÏììéÙaÓìgqGw$€T8¬ŒÕ ö³ÂtR¨2:æhŽ™“T”pKUßkŸ>_Ò€®SÚäYë°«F¡ÃÅyŸž´Ÿá§ÿQšRø{[ÎÆš#YäfÊø?2Ó^MÚÿYÁ& Ûny‹íÜT>pÒ?®²X7‹šÞ ùQ¢óÕ;ã2çbnVç9ÝýöAû”UâÑ@4óªaAÂo!€Poc¦Þ§4%*#£MºT{³Ñ„)Ñ1§}ÉÐƈw®ñb±T¿ÊüˆÔ”Ù$7ÞmÕj )Æõ÷¡ýè SêÃäeô±¾ãºšRã\,”Lö·l4reKKï$Ùlš”KB”2Ê‹wZÛqsº“ÛûD¾ÙíR€ ´][:ôÌw̓vÆM§©Pn8ö ©¸ |`bøjQE§;¸îåKÕ‹\L½^Ï.Åìðîã»ù樽Æôx\Ô)“–bwéE¹cá¥kº'z7çËvÉj[üc‚Ž2øfPB\†br†œO굊ùL³ã[^É~ctXÉ<̦1’û-«+#ߧ•åNcºõ´Ý[+Þ^Mrý÷ÜY5TÆg;}˜ðŒÕ6—5õR%Ç1¨)Y'PÙÆÛ¦÷™æ*÷Ùè"{‡7)2þe4pÞ³å{ºo`æ*üWý6¨¤Já=ÉŒõ>WEÆL»!¦-@‡ZÑ 0º&·}Æd>\ÖS„YP[å¡•‰ÚgÑÃLËÊ›bnfæœa[¤u¶ ®A$enã×T/­=ç†Æ§!Ñ°,½6J"ZœEj»ume VóǸÝX ˆæ6àµl,»¬KJq Ӵ˼/¢¡_çõ.°i£Þd® ®)ÛÁueA%^!TœWùhw<‡iU:?·¢<Ú÷ŠÈ¨;¥èÔí4Ñ;ô>,sA!±à^ÑŒƒ«nQsÂXܵà H€A¢ìÚ< ‡6¬mzkIÇ«˜­’X•ÐtÉ;ǹQr¦xˆ3ˆ/1ç؈ÜÛÄI,uKTžÑHg ã-›“§ã<½‘ê*Õh©¾3$Yo®0šf VuÕ>WŒÓaŽ QHìÈ€öÎqd«´‰] Ùž†R×1­Œ|ð_ÚÓBœSàTƒÃ=,Ã=jÑ­ªÂüO×íñœmÓÑՋ𒵺¥è ÿÁkáºÿÆŸk×·œòš`jàn ¶k"‡Dò0º²ßáóž‚"ë.¦W‘˜„AOÊ&Š!jé+·Í.„oUŸe×vãFF°‹;x·âcËõTÏRàC²)Û‘ï–Ñ’kY[·Œå°lZ-û7¸1‡­eW»Š‹"X|E¸Ní±’Ôr£|%µ‡™¥|p®ñê›ÂéŠÙÔkdiÄd —°’ÒavýqÁ 0{„*Ž¶ ËdH%^Çcž-DžFJc+ g&#l»æBp[Fz¤d·Mñj:—þ{s’Ö \‹IÝ‘´ó‚: Ûy†»N÷Ҧ陾“Ï4º¡h¢˜b¶/ûܸìÅTœÞ¹¹Ñ°˜ÜZ ¯hh›#¸17.¬k47ææ! TɯŸqÈg’Å!Á äÝ—T[U‡JËdœµ96ŸtÍdÊ5 È;7_YÌÓ„­F=4º¾ª¬å.AYñK‘°…¢”ÜCeyšÇ‘Ä*ŽØz©è’âVÀûÞ¥·ÝË8-“”SôÌ#qÞ5›ÂUìôM¯Y†‹&ß<›t•l±“à\LHjÛKpŒ!»[½¦…@_w2kÈLoŽµ÷ʲ/ Œó[PºJF†Ì’Þ†P¡l¢VM©4q›ËñàfÙj}ÌÑ8K´Nm%ÓID^gá4AS…7u©Ç\KÚ ŒîhÚ „rC=w %%²ª|n©9Ú%½~6´8ACCfu ñ^'U;nÓ˜Ÿ´g¹®,UýAWéÃ*ϸ7Œ’YhB=…%ù׸šš•¬LpûrHÓ¨P1œ£,œË1Ž‹1hâkXBP5äMV9Á T]ndŠš€·¦Ìw¥’ñ0Î{Y9¹„¬ûâ˜f«´)“¸ÓÔìhóÃzÀôØ–ûYÖ€Eª¢7`4‹bqÚ´$yÛÎ`5ÄÛ «Xúê¬õˆÖ_›MÐÐ`–’ \l7 ÕMgº²u.UôrîÑ ‡„.e›!S³d]”M„/HÝ4DY|¿}ërÀq¢UWµà’8/Ú™ý—À|ãrq$σñÍc[DJg®! £ª;—y¯V ±WÕ…üNLylé@î‡é-ÊÐo‹µE|ÀÕvjdwo¤å΋9þkE‡æöR“ÑÈúpJ…œ’U¦wu‘Ë‚U*NØ xeg)Êk’Ñœ‡Æ¼ òPJs¼OÜÖÒY¦2“t(5V˜£ÌéãžWN¡spjÂa€¹¦0é”~›9VàîJÂ~SïäUd]Ôí,¨Ä² – gXM‹Q$Õ´é EáªuG\e…í…Rk³ùJ{nM|¡î†ç}_Ø€JÂj7¼÷$³ ‡î¡8¸…Õà °¾^]ÙÀÌС¨ ²ÒVdŒeݲj̶R„1m«•>Ly‹g’¢‘NÊ&=±-iëy"`Ë™Tì0‹)êÍÅÑ,·gtr<åAÖZŵeÁ+Î ´ÍÿÜp\,ÐMÚ(œUU®«%î³R¹‘âª@šöaÁ#ÀÀnIà\ÔÒ„ãÙ,ªÔ+(DiûÏ Ê†áYDpH"ßÏįˆŸ‘P GðG^à— ýÊúdË?Ëc.:„€ s9üîãwGý¹7¹ß–-©ï‹‰Õd®C‚ÆJªÚv^2žûrV¡Ì2×k#ƒÀc|±‰¶ÄÍÈ쬓;ãH%÷E¯1úâéãŒÃîÈÔɸýß,œ:E°`>`2ÇGñ þ²¾LÖ`¿ëÒ˜OÊ-™tYBÃ]§„‹y:;&Ö/éÞ‡¦þ„2sÈÞœ"öÇL§éX.èü÷Ðq6ºÄ p­ÔLaŽý´Åæ"Ñ›)u¨!²“)ú1 QÇ•1’ÂÏêŽK¹Mt€å„žéòáW$ÎËRF‚=ØDƒªwxÔ}zXÀµ–ï 6+åIµÐ˜Ó…õed³{ú!›¤{ƒ ”gºUƒº,g¥¬@F­Ú¬¥—åãò„{×éà$õÆ0{ûør,dîàj °¯@Š@G†Bðr–6ö$4'!Î@‡@Ý Ù–.t½`•¨ëC»dúç²¢(Ê ;£A\ HoÝR’bñ¶l}ÑIgõA$윥žñx86¶ŒHL,½PÝ‘=îk}Ä)ŠËµ÷+ÆvVx,>:ê‡÷4\Q™\ÞÙq©ŽïMê‰ žÞ×ûaToE,NqÓqÔk·WM­¶³}Ò’B[T(v)–,ÞDl¸’(Ð„í¥¸þwßûì]”2 C˜µát5£’‚¾ÃÅþ¹˜Ý‰±U×j.ªV#þìÆ[ÆÇF—‹ÙÓPÇ9Çé³7F!0A1y,×æ4Tê¼ðZñX…‚ak'¬†¼´éLc¸÷ómúÑ#O4…äÄd€¥œªâML°])&8@‰c'>©“#`29” ›XõÅ4Òçדh k ýáp¼O0f‚²n‹¦õâ2@^o\¡D ›ÂßAŸ´ÍèºÝïsÜr,§±ª¨É3 ¤¡wìIiaH­«Æn©Ï—ëO&q4‰Cl‹ bíµ>†*IO±'Žþ"×XcÓ”›p«Ð±5¿õ¡«ñ4¡=Ý`¥»íO.cÓÈ]*Ã4Œm TtôìDÈ{­\3hBÑ„â ÿ7ƒ±å¬èãy€©í§)nÖ)ºŸ„\»œ‚‹Uw«.‹Ðšê• zÐ8#Ä„2z &"‘JêZ¦d$FªPKôÚ›â„S?†óÚïÄSµÅœýšÎÀžõT?£pLHöUjà'^§µ(W¡¬µœ‡'½Ü˜GƒŸ#5qk8ù+Ûû‚À!zê”n(Ùð¼Þߨ8d] xHÁs˜È›eË ]Øð„Iv†ðó^«yÒjt€*[ÒE8îcä©¥Âé7¸+w›£ëd%B¸ïaɳw%‡Ñ,©¦)‹©¶ìõÕúkN3C•R¿U¼ÅØügsÇöÝÞdÃC}9óÃ4+õp_ãÎ6ü-U£”FÑÛ ÆÅÖîÅ0 ”Sd[D33;¸ê%ÙÍäb¬ïRM ¿jε̆(˜ß "{T eâïiü©nQt–NùâMNïGÏΉE Ò=z¬Ç•¡¹tIÆ#yBD;F3*¥6S}ŒŽ6 üÂ&>çp²ÃÇ4ðÉ2*c„γl¾AÍ|ÌÆè_“øñ|ÕˆÒÐiO"]%¸Ôk¶²²CÂzæMOvÄ% À•ŽÀf,Ì^hJ®ìˆP¢›ð“… `Šûv½“vuŠýP]Ê crVÃÇñ>!6eð˜%}ÔêÏbxŠ—V†ó,®@l¶#™2¡§]jÉ«±.¡T ë8ª†5Jpžµt1ÁÔå-hLU™Fõ*–ehP5•û»öû°“Õ˜¸¯†!MR¢AþD¦Q#Çk¼!.àÖ(¨+´%ºR‘Úb ÂÎÖzHøéRù~A×dW™½ŸU¡¨^c'ôúaè6Þˆ+¢ñÞV™ÔÂŽ<¯RRDˆÓH$AÀ7 ;4ÇC3†X;Äqf¹p,í³Ô.×à­a‡ £ˆþ7ÓÞ…`4™Îß7ìJÂZ;)¢ûOáDI>ì”Úm¼¢ð_O'ýŽä0‚]–ˆ ¨^€1}T¬0L’%[? ‚8a"ÄP£TëTÑͯC¨ä*vS˜}ö³tÀåÝÉÆ3 <ºâã¼KÐDÙ]‰¸kݶê.ÂTªÁèO†™Âl+÷Éq›Þ~lã˜<&C¯™e’ì’OÔC(¹;æWù‚ß>½^ "³cºFSÍ6³“]“|òöô;.éá­9±ÿúÍnqú¼É+Ðå7µœʪ 2NèÈÆ®X(7Í>¯ ¯Mÿ’ÅRÃ,ÁçŽ(—³®qË]ÊÅ#üö›L¨­ðuñúÏJÞ@ä:C['cÈ ùÜvVj,å!¶1c¦‡D.}rû¶tnµÃÎ8¦šI~R÷ÉÃr…þ¦YwÓ•û?Ó/Mö£â`e]uX©«fŽ9QëNí:Þ•Ìv[öfR7;eL…Hâ8JHçnDÖvÚÇqø¹‡8‚PJŽú Sù³3­·uK[ ÜŒÄ °yƒðZ¡#1ñ§ìÇ?‹)þ½h]x÷1`)ÅT̆Cƒî§êøò&ÁTÌ&Ìâ`¢…b3èê„-ó×ñ¸&È9â|phâAbxá7DT¿ª¯Ž»ͽ‹“,[ô:.ML4æU %0“‹?L0'v÷JÿEAÔ´™‚i4Iùdì.å$0\¨r@ÓÚÔ·<€‚Š˜+级,?Kš2”+?0ø¢—‡šU"RüWkšâE ³‚9CÄ`EüÎØi6:¦a äUÔ>«è}Œý¶l"H¿ï”:›µN˜» bŠ­k·Ø5 "?‡L? j»®nËÅÕfíˆ(²Ê¤ æçž^ú§uy—gBMdèN8&9¼tD4Ê &mÇ»’_}K©cZÇŽ£”–ê\¦®‚HÎ<2¹öt-¹ÓÈ4]Ï.»eÇ{×!~|Ô鶿oì·÷2Nؼ;0Iò4Já®ýçÜþ4žE¯­–'X¿MÔ*•»´ÓLz#Í!v“U¦„‚é–jj½Z2oÅ6I}šR©bû–YšC™–¿Í"ÆC6†—lÑÖg‘›Ï~KÒx+?x+œLVÿNGTðèeážÒ,Àu¼ îblè©z÷©7 <ÖJv…õ>ºã}ÑÙýjšYj° ŽóLþ×ÆDxK_lG{"c¨uÚÓ}—I’TP…oU3ûýQ8±ç÷.9!n±›M>ìB™T8MOæ§î&šïvþµÀ?‡ÃM(+«Á¸ j^³­šäý¿­ø 4µÇîýo¿œ½¬²Hc¯U 9|và ¡¡WJ—"@6¼^@æÈÈPÙÀÅFèöLs¯MU¼d¹¹TçLJ×í°qg‡èk—;#ß<Ž&Jºß{#fãi8D¥ù D]÷UäŠyžò;vW‰? xϬ9F+‰hÑ(;ĆèZL 8ž`='*MÏRŠÀìÇó±Xwˆ0Ò;N•MŠçK¼ªmØŹH¯æ`¦‘–MW¹Í·ˆ°Ÿz‡,n91°êÙ:'›gÅ&¹÷ u«½oÄÆ̳vB? ™X}òº?³cµêÜ€woªITPûV:&½ŸuC„NËûa/ ÁQ(¸êMICoÖ—äC‘øÖí~œ[÷>÷À´ÈÕÔ¥õÉ?»Ü—\»iÄÞk®$¿rßßúðoÒù+‘ùd3Ô|›¡3á(¬ßßZo†#bõ½Ê’ÌÖ`¯—·É2,+ÈMŠsˆ¤^²ºüÜ)AmȪZñ™AÃOÜ“!ü·d28:ªRr»û8³CEóS€X0?šÃ¤(‘ `e‚¶ÏïTF‰e@â’%ð¦H=™,Ù rWèE©ª²Ø<û%¡£ÇœI@˜³37c–|À‡$³ú4´\¶Ôä)Öw<×àæç”u #¤?9ÿ'çÂýxù?l=z˜Íÿ¹¹¾±þ9ÿççüŸŸó~ù?µ¹LŠ™šÃ"ÉP\štD$QB3lÚq+-fH¦ß¶C.§Úœ ‚!ØÈ$R&"¸ö±®Ê0IKsòH3÷»ç~ö’ž¡tI¢ÑÒ”ú1§$]˜ä´P"ÔtRíîs¸Fð’µO1Ÿ¶´õŠ7¸ÌPkhmÓ“‰’¢Þ›ºËªš¾à¨Vtþ‡þ/sàa†U~–SuÛ#kñy_aÝš!]2 (EÓ‹æÔìbz‰ƒ$vÖU“óÏ¥„¥´«0M4ýºÒþÏ4 J9´2w‰àv…2ÑÝ4…½ª6”¬u¨B9å,TÒÁmL´i£8P'Œ(ÃLÙÞR¦Yåî•ÉɈîËy€¡ØÅ SÂA4âh<úú;¾d–®UÎX^œ&Þ›­ÍÚy?‡M`ft¡ðÀ¹>4r¡B£ñÝ)ÙºŽuéžÔ¿€•Ä3ÉÇ¢&1²³UÒ«ü¡x ûâ¤}Ú*_Wç±wEy^ÉU:i5ö°´|õü:oÝqTv'¸S'0ämaÏû)Þu9qÞômyÖ|;­ÖwÝNë”rgª˜pò0œ·„¼»VýÖá^®>|›º~ºŒ'gO;ÿ›ë¾Öq䀺D d^^^@_ç3¶N»B«ÃÅfñÈœûøÂÇ ²aÝa¿,ëlaNÙ™RöË( (Ut»ÏÏšÝ.0E[hTÖ€`ßBÖI~8h`½]ñ ’A½ÓÓ“îÙ!¼÷{PÝŸÊ—²Û-Cw³1Æ™ìvün!µ -œ ÙjŒIPÈ')Jó‘OiNä%#¦0Š7ÄY†i6Œ‘r φå ]ªYA?6 CU«04$g ]7âë¢VD…ÁÛ¹I˜iGî¦1fÍc Tõz=·%F@K‡Õõ[¿; É_è"Ù)v€jÄA•yœ±03ë;@e9Ѿ=dï¡ô •eŸšh'åX” ”‚­¬|Ð LÙ˜S60Ê»Ç&Ó|ÊøMÖóFÒ×{~çÔ¾„áÒhF›>âïqÝÞJ!oíî 2Í|]çÖ˜/{g£Ž™v»)Ó˜|å}6à0­ ßîß7–L÷… Ë.3VOÍ"á’åI¯7J…(16ÌL5–üéçª7ò¯Eº;Nœ»¬êh-ÓU^àˆ‰i)\.£ŽKŸÐ½)Þ/óq‘¨†iIcL2+šµÙXßÒÈï¼EÍf+aR‘âõ„âž0aa9¢IÝ ³ƒ3•‰ |ë‡C_‚^ë¶ÑÛ.CZÆ@Æ3´!.#5)SÁÈ&ãh\û˜âJu…\àf@#¤8^,¦go¥áKp ùƒ~=¾0Ìhp/j·×-+ ;\„ õ ¯PµàjUÅAV"ØÓ‰³ÉO´<ïZ+=õ§¹þ”½tXU1§ÿ/na>-bäï;K³¤Ô6¥@q¤O3¬ZÛã‚‘R6ÍO•óšÄF¦D«tN¥s#b.nEjK‘JZ±ÓJa„ƒ´ÞÜUϸ^µ†È[_1žÍ—«LdaÐrü§W4ö†—!é¢vXíó2–çåù¢†ó´áℊש£fFsÍòôâ¦ó¦ó|S‚LÕ@W5NZÖÒ2»‹T…â˜ZZ˜¼(,^lø ó’&ò$å#:ý§ È%”PËäsy,ïrE¨sRwÛ".KœÂ‡9‹™|õûý˜W¼,lY¾íE•gPbïKÓÌ=ÏêÞï¿%Óz¾ñ®~sUçΪ®c©J¼xͳB²úû\}Ï{O¾v‘-èPëÄÌnì'çºέ:ˆ Ó§JÒœæ3züŒ?ztÒß6Îä[rW8Ê JžÙ-«>×D>>óÇAÂ2KåBÆ‹ú/@ÊEMÞå×$5÷¸?T¬g^ß öi.XpAò)™WÕ[5,¬ (ô˜­l.„ƒÄË¡2xÀ~o(‡@ÓæZµH*ÝOjtíÎ\å—d2¥f²²‰Ú7GôdkeòÀÄÜuŽª?¶Er&W°Êþ®º½™h» í¦ŽßëØ‹e×pƒ ¡Çá|W*­ä}gíjåÚágíu%›z‰t‘F†²X@ „•¬‘xîå–À†ýdáò?%Çt3ïôÒKíRfÓKËž¶÷[Ò¶¼Ì'²‚þ{îoPÁãh=ÍpÁŠUNçqs!ÔMæ3€’r’›µ#úøTϹä.fÄHk«îeáxÉ¿Hv·aÊî‰NÉ¢[¾²MùÒ+»HåG–9òu¥ž¢òeº£šéLìÑ0Œ¢7û,Še©Þeœ¸â·›BêG Óߎ“Ój’‚ñ”s#YÀJF‘Š±ß4 Ý'7aeâV0aKé¼MÄÿA§ï§F½¿Ð/Ž¹(cÁT-C «%"©e<<‹ãtº›c÷5‘ì,¼¦éÎ6/2ÄMí¥o¥Ü%ì×-S³~—™Êêó÷_‰ÕáTÝgVwú.@#®bzxtÚ}ztv¸W´Þø]pÜtŒB™Ú c˜ë 7›*A—O™Ì§A'›Swe£¯%Òüì Q\kĪ=6ž%JÔäé½1zÀ|î”b€8vEËRŒSSUòµÇÆÈ5 ÁSÝPiø›ŸŸ½q.)“•NîK{òBzFzËÈ*éVUíGUqƃ– X~WñM ú¥œäg€/A99L笥JDÑWDE¡ãÛÝô¸jƼÌy¨90ý㘃52#8só3EÒɈrÖÄ1Ƙ¾ˆö Ö×Ár}³6•°“<ã×ÕtäT„•=ŠÄ¤é¾Ú‹PÔÝÔ7ÑŽžýë,ˇÀjr|+éÉ7«œ~[¤+sblŒ,xŒHYw[VxÂJ%°Îª7$užñ©b:ÊáM=¶Àx¿ý†%H|iÃD˜@×$øA‘¿w.ÅXš¤‚~]mŸ‰d‰€¬$…ýºy»ó=l½P"tNÓnµ(ѳ¶ï°˜øŒ¸ >#ÍÜEìÝ%ìÝEÄ]Æúƒqß›Š…µ«âò)ŽØí¼¹9€ ¤¦RdX¹+¡4:ÿÙ±9¹…i™ ù¬² ²ÐOÅÀÝyÝœòb>ݺAÈ'ö½>Ýúpñžn}ÀpO·>X´§[ïìÉë‡âX:¶p` ¤.X4›Fˆ#p90Ïþ¬Gú ‰3ðiÑÆ-_ôª„aªçý«‹Þÿbhˆ¤¡ªe>ôÇõ(¾`ÞåÖ-4Õ¢!±…£uŒ÷j½öÍëû¯ê¯3à2ÚS礹×>Á~½z¯b”4š'G],~5zðšK‡G‡ífc¿{Ú8yÖ:Åo‡'­ÿWÞ¬?‚'ÈšNë´û}ë¤Ó>:ô´˜nã ظÆw­ò+ ^Œéhkç¿„“MØF»{hn 8 ð’×æ\ž3 }–_ÉSYS‘©°ÖLµ}x ÿÄðZ-[vΞtNËÇæwg­Jú¦(§/6´…[÷¬Û„‘ºG¼üùò¥.jtôçöaç´±¿ïíŸÒ²àðP ¹I÷êœã`ÅS¢h¿ýäôèh_”áâ@'­ÃÆ“} 'Ÿ7NPáÅЃê[V­ èQÀSÙýð|E˜ ºá¹išˆÙ%/ƒÞD(ÐSèb´l>Ýo<먫L‘xÎgá¹ï¢×í †þE²[¢(Yð*uG#°Ô ˆX/̓¤„Wvã!0Q<¸IT-œyœæKÈü‡Fqçñ›:óKW–@Q€ºãºgŒ.çóB§ÏÄÌ<µAp6–¤ââŠmg”Ìù¢Ç¬$…Ó¡X˜µP$Ñ(€»ˆ4Vø&€Ú?«ÈS20#À ŠM¯Ãí춇:L³]ºý¬Ù,mÁ´=G…ÜeR¤+glâí_õwÖtKEÙa&Céö%€y f§išËÉÄ¿W»W»œÌ®ï‰ŠÉañpÛHýmÓ‰XsPÿ²s‘S¹ßêôÏ/üdTJóņúÏ[bûôhïh[ø½©O®ô¾DÉ-Ö@Œ¶”çä256$æNÂ<&€¤ ¨ë;LŠ‰ßó`žÜŽ_q?ÞÉ ¹W†c؉ÒÄÓö˃Ö6д#•|ÌjaL)«÷“›’ê  BbîÊ1ØDOΈfC0ËÏ]˜u2ñ{ÌE×jÁ£^Ô¸°¦ ËtUQGø¿¥Š^M¦›wÛö„äê ¡ç()yzöG[›qížøMl÷7ÖßÊ¿¶ð¯›t3Ž¶©¥ÞY@Xx)êÙÀ«O;NZ¤öúŒ©÷ºóðFá$©M¯·¾©Ýû ÿ¦?gã7ãèj¬f»pÆÏÄzÉ£•ž#¾-ŒÚvÍæbçò áx $Â-Ë oh÷ Jž·ö•Eé«ô¬¹ÒîéÇ­×UñªwE‰Räâm!â^W^cGÈÜ4ö`.Üü­?¤îŸtàyÞj~G Ñ$µÁ@^CF›@sÁí~ÍëT}ýt»Ùµ·bóñ 85¬W‹»ÉÚ¿O¶ÅÚÚäîOž‰+j¿À©ÈnJšP}#ÏÀª]Ú] é¯íæEÈ ×våêž)B…ç¬ÿ3‰|ÌÃ`½8J’C“ò(:ÇÏ^ÔÖjªÀSnmßw”„‡ÁX…Ük „ÏöO˯ÔZ^WÄë LüÞÏ`Xùñ²‘,«îëÔ ò•*ÀèwXF±tà `ÒiŠÞEÖ娌(!@‰7QoµÞGÀg¿adœO:ùg. O««FïâÐpûàeG¹7AnJëää(·cÙ†¦«2'"õ×"òáuÅõ\\¼ör;Û› g þoTñ¶êŠx½$A#š÷ï«ö«ÂÄôÓÀ~#ø“+†Ì¾C–üéœã˜ Ï€WQëS¶! ߽˺×xÞ=mo\ìE㨷Ö>‹'ßáö˜ ·…g(&æn!šDòÒì‚°»„40i¾¶ímó}ʹ¡hwhŠxñIª?7ÒHÍ£ƒãö>´§ûâQˆ]hD]“{)R´#‡¦4ã0¡¤®vY"ÞVb |¼§™]´ªîUÕ=5¤"kJÀGg%µs¦1æön´_æw Ü~r  ê¢žö'/Ú‡vgŽžöüJLôôô¤ÕzÒÙ³ºrôôPT[ØճóU–Õvóüø,·MŽnž¯½ ûjŸ´Wé«‡× ûÙoæ&å oI@W_‡­Ó솻ú: ¦Ë6üè¸u¸ÂÙù³´«ÎÓ6ê4ž=z°°£ÎÑ~ã¤ÝY6§N4„ œ,ì |ksù¦¿À÷U,íçXw”»Ç N²F¯7eE Ç‹&{¿:Æ ýÆS ÿkfG„»:s`;G-ó:å÷‚Þ·%öh˜ÈÀ÷úì¤IÔÚ“ÒWÝ–_n¢æ_µÇý蘔˜Wƒp™°¢çHû¬‘¡h·¡ :åaÛ8:0íÙ!Š9šG'hF³̾I~´®'ð¢âQæ¿ ®q“‚þZ8â?œ”ÌGç0 ¡îvïæ_˜Ãvóh¯ev :‡$+¿¨ð‹ÁFÑ 2رä÷ñc£Ól·E¹QÁtázÕϚœÏP-9¿â={‰)ÌBôçcí$‡áy ÓQ)Èë-; ÐËzMbcÙ@…·Y™K "‚¬%Þs4¨“¨©Û>D}Ÿçñ‘ÃÌÚO:»²š]6×þ.éW½KA«½[·P>#ç%9RtõÜ#f €R\Ó¯rÊLYdaE˜’ñã@³wD¯CE‚vU*Ut2ñ#(d*ËÊUÕª ïÿ *¬5—jCYZªV+ÅRŒë¯ÕïóýG¬ß3åÌß2ÚòoØK×nè'—¾ùa]ñ¤wÏüŒvl|IIWXî^ë)œd9û¹êûÐ:Ö.Ƴ?jéKNÿw>D—ÈZYÙ„{kaC‹î‰Áö®úÜühÇÁtÁ!T<§ä7ëëiØ¢;`³¡7Ÿ¹f%*7D¯æ²f‹¶6ÃL~ŠÍ-ØôÔÒ@»m)‘1úój#\\ôhê—þø"1ºãSLñ×éÓBFŽÝ(é²±dÏ¥XrÔØ2Jjºø§¢ÓØ_›%ñÌgmx5Y»ï¸0_HídiÓUÎ:Œ‹‰(SNã¾½ùpàEí-QÁ§ &MZ½a˜ù†'}´Ù"h6&‰´’¼çcE rßÝø>ò¬"œÖ N:Ý}’]t•L|ÏçÖfŽÍßõ[⌙Œ M8­FÈ—kÖ ºõOð„Š8Æ›îfŸd®EÛi n?$m{K›z´ @Ré*k¸Ål¶ÄáOpûyÛ–oo” VC†ùhŽUWö!÷Ê)ÅTªŒ^àzñ}C‰FRÅT`u»Yà'³˜<¤Æ:Š‚>ÄGã î<¶÷¡—>ú"O°j¯t¬Hxœ^*Ù:g;ºgMNa†"c©—q°5Z£êÖójKžìH¡íd(à´&\²3 RÝjF-á"RñVy¾Þçf.Ùåàª|\ã'—ÀUöß©ÍA«l ò-@·D{425?¶˜‡hkÈâÓú‡Ü𜀚#íþpˆqœwݦC;˜_¦ü{^QÐâ{Çòã½áðz­ûhÚ@–W~ï’“2(+ëx©{5fZ𘤓yE‘ĺÏZ§­Ãï¥MIí7r ŒW/P´pLƒñ[Â"xƒdX ®ƒ’ 2O…÷м¿r2“ý‹ÙõÖ×la«üè0K¸mÞwe†ƒ¢vuïáþH}µ·˜]|?ļÆSCŠ%€óû0²qJ³ÏÎ^Â^ŠªääÕè¦^{ï Ê÷ ÕaÝ©#2ÆÂ>Ð(ª÷[BB4‹4º{'§§ëRÈò4MÖÙƒú.ÒW"µØòÃë")¾ C«÷…òÕbG$ÛÍAÚ±­±«¬9te‚!hÓ„< üg„÷þ7%›(È—\Üo¢ßC½ÇÛë«(~“X€ÇožÜ8i‰%”êD?ÐúL‡¾çèF· )¨´UvïËDN[™Ù·Oðèp¯}Ú>:lìËÂN•ïéµÐû5jnr Ž‹ZìRL†L ›Öílj›#ŠÌµ¶ÞMÝØ­i[O•t“Ù¸×C2™ U3yB^tù³ùìóKï¢+V¡*ni¶¿37›FN6k¶ÊÚ“b©«w$n›7Π?Ò9Ád{cFç^ÀŠ‚óÙÍ A ñ-i¹ñNàƒ„~`¯o¤@©7À#Z¥2¿äå^ÙLclØètÛO˯äfd*ÈÁq_´^NÔ (ÙßJÖ$j/pãnsqºT4lvíàõ]*²»à •I»Û½6»]ø ‚8ÆDÝ2ç*Ù *†~Ô.Yßh‹2;aV¨hh°>óÚE͇}±¯)n ÞT`ø¸ÓýÖ±? jWþì•Cö? 0þ’8£7À)Áà cyö“Ìèkïèð´ ôH‡Â…4¿{ÍÚŸN€á˜zkxkZuiKÄý½%^î7£‰{Ó¦ŒcÔ2E°°Ô0c<ÐÇç˜ð:)ŽE4AÏ£N8 }hí ÑÔÈ£žÅ˜¯ƒ.zbu›ÇÇݳÃÎÙññ¼„{’ª|U¼»‘ñ™p’¹ÊÒ;º&DdøÃÐ'"Ô4TÔ?y­£ Õu}_]]´Ox‡µ~m0ŽjèSÕ›ÖTßÞ|9 ´Ë¥]UÊvøWdoܳú8)“u¤rƒw¬ 2™¢°£ í¤·,ßž¹Œ•†e)žWò&Ä mº&E§+à%ûl4‘nza·„Ôe×^/À|nRܾcƒKŠ)F…®Êë.}t#9çÂ$º3žŸW+Í^O‚^'ÖuŒW1}=4¹pK¼  †(½(\ù0<ïõe<. ªÑÚèI;©Šƒ‘+^ «>ÂcXɼçmN^Juå’\„$Bt¯‚ð@ÎE+óŽÓÀ{ŒÛ꜎¢­0’6—’´NNÄl‚a¶Ñê–èχ}Éõøãù•?'÷"à 7"k;D› `,X¢[÷lY§ts0Äô–ãƒe°ÓVEˆºç¬•ŽÅZŠÚ°?,ÙT«ƒ^ÓG\“âQt{“IVŒ0gNÃ.G;6Il#ÊÆ÷Gí=B’0›*cE«†À "òÔ: h–HC¾„ ±héÚå/¸záx‘³_ös»®ªÓ½d² Ýtôýµ)²ƒv§²ÛzÙj¶ŸuŸK!xu X~=¢œ—~˜ÂÙßOÑùDš§ûqÊò2$“3PRàê”!”©Ëî°Oî,¸O½ÝÚ‹aµÆæ_ÝQÔŸ 73âh[1œ‰H鞶:§]fW<é¦`»KµëC?­žJ#º6Eþ—Ë‘ÌRÐŒ‘õeUÇM$QÎHVÀèX[¯‰8šM1zaÍúÙ­‹„’ÒÝ 9·ó€â=¢‘º|Α@Ãè¾ñðÔ»CIø¥HÓ$Œ#žW¯{ì¡Úm5ঙ®¼ð-Çð¢IÕ{…®^È°×ð·E’Ky@<ÃØ=ko…ª=ÄmŠ„•ÐGÂï÷£óŸ“]ü¶þh¾|É…Úð/m®ÞÍqT±ù‘¼(òÖ—ôRN~á˜gÊ*à…=>V„lûö¯ÆÞ­IÏZ–JÈjŠKR‹[Ça°Ù¤>ŒJYæ#ƒšÇûgü¿jVt¥A”ØjU”—~åº0^l·<Û@¸ÒΡÊsÓQx†³Iïþ}}Õ $ ›»¥ŸnÃ+E3riµ1<»ºeÝ›×úÁÛµñl8ü)oSÔ±¯“æü'â3£R‘Ç|“i+XÃêJµ!÷k¯óݤ¸@H’óa ƒžÖZ¼•ù&«bµ“ +°?§¯Â2²=µönåX-uHÚl8ۆƲܯo£²:͘yYÒ|åGgÊ– è·©#«¥\ñ,%dñ½´të+²^ùj (R¯¡î-P1,»+ZÓQ4غÖýý¬.Åq•î4A~âm˜„ñj÷2ì÷ƒ±Bá¡amí-¹[%íS_±BÜ? ÿìœS¦ÉbZDk Œî;B’Ž/Wê¢cb¨Ô,3L(8\Ym…*±/"œðÈ€^JM7ë¯^}ýÍk­™8>90Ø{‚äXàÇÄ~ $™öÍú×Ä3mÖ¿!ê é.ú¼±~_¨j]UêY Š´'Û|ØUwŸœ=ë!‡‡F¥*8 2-—|S‹F,Ú=åŽÄ]:,ÀRçg§­îqë„vŒÖ¡*ª(0c Š7÷Ÿ«Ò²B&S‡I$Ø#9=\꣠çè¡¢»’¹¼0=E݈ɳM{dz.¼xÔZ2§²µZëô :g‡G‡[òµ$žn¡ÍzŸbì( ýÃúœË…('(Ù›»è SïULH;bN÷k•>'Ùø¹›øoƒnkŽ»$»´šfœ V‚?ƒ3ñŸ·âå)eUVJÉYT±¾ ‰ÇÌ›Fz’ŠÕJ”ÈŒnwøT ^DxQ¥¦IÍ×-®G†³à8;&ûcì”öÚ' œwUÈ ¤R8Ê;øk)* ¥õ¸ìýØ4ýºûü¨sºZ·(ú™M#Êv†bZ,Òw/[ÀñÖ…x2£œwýÍÑÿà€Ç”~å7Sô¦3JîçSðÎ!2µçAÏWŒmž’¢NPœÜg;CèC‰Ÿ0ÃD?BÑÐõd£u"œÃíõŒY>/ ù_&j³þp¹Î$]ZôèS¶dì“DãèõÓGˆÔ1¸ÙDÊ¿e¾À}> âó`z…6L?áÀw©³Ÿá]|ûÂ)õBiðqP¹Ÿ¶ïB³at…Hq›¥):zÀîïwÛ‡xïè¤{|DvXîìÂüxß‘®ø‹c"k© ‡¹|6!"”LÑNξòIÆJ8¾?2u çî (¹ zFpâ¹y8)–¨3úUóp®vᘫÌ&õÌYÀç¨ .\-ƪlÇSŠÖý¬©\H:íg'§íCiV([P„\ßFŒÙcÓ"°+›“¤äÚFßöžŸuZ4rþ÷°±ï60ã¹Jó 9_5Až.¾Nr÷ߨ-§=ßC+“ ¤V¬ äåã4¾o[ÖÞ?mvŸ4šßž4š­‚1náiŒw4¤X‘üÒ¡L^;@f£`ðFêºûì¤qL“B]½Õ°ƒsÃ8ÝæÑÙáivR¨1K“À¡: £9 }ÌyŸãª°9Š0„ µwº¯ö ƒà$Î_´÷XÞžE5ª ¤h!ì©:Jǯ.#ÑwæTÙ{Ô–’öhÚ«Sè§W‹Œ‡²JªŒ‰e‡¥Ò es-`¼Y홼^Þ|‡8A@¢$ ~×jóÁŸž,3‚LèéDóÑGï­RÒIô&&]¬ÞLc·MîÞ“gÝç{'.E²X88áç…ÉTØXã•¡þ-{ȳ«ÆqÅ*­˜æÇZuŒm8F2/½S¦!CÂbŒùqäY RÔ]*e4'êB¾@6„óa^7{38,ˆ&Ûˆ~Lé6;r‚Ë]#s]U2w­*¾¶j¥åÙÃvWSD×Ùé¥Qˆ\LÒ¸jµ!w]äÊÑ$8eyÙ]KO@d™´£¼üÜ‹é¯ðÚÖ‹9bO,Œ5‘2qÓ=Î-‚¢í"y†÷±6ˆFáTZFÉËãv$->$½²ðÕÖƒ‡^ÓüÑ®üÞ æjÇjCz:gêBæ9&ES×l²”í$‡Xt6Z(){Ò×ÍH‰qÊ‘>(©‘\ºÃïø—–—'(V@sOfñžßë†IÁKn¢iuQNæÉZÿ¢ ÿé²!¼fF œµBg·n‰ígG§ÍçmºÐ¥à0²À‚³e³¹>SÛÄ´ëÏŒ»C‰b«¢r§/j{äF Î·¶‡.¢6Gµapì`3c£ewe+…š/_V“E%o‰=pþI7´S09Å…fõQéàÙjÖЩ³†ÔšJ5ªýQ6©(ͬAúüì¿õkF:ÚøRŽ(×b_„ „Ù ˆKŠ]³âB^éÕ?ß7T¢”Æ)3ÒK-FíÕ³Z . s×8¥m„Ìç²=©=­6fZ¡‚‘nrV3Þ”Œ•¹Í‡Èt_g‡Í£ýýVó×j“Zy3‘å3tìŸÊ?Tã¼CËø·LusÓNd‘02 âlì(µ‘¶â yu¶ê\æ@r€äÛ¨‹ºÔOêÕIk¯}[)ó°ÃnÂ>S[9^Wf`E…’Ó ¿=:„{œY-‰Q0I€ºM@;; t‚ïi@/²ý§‚±PÌy ºjõ)JnÑ–1J:væ(ªiÞ«6ÉšÃã‰áxº/€Â¹9ª€Ûßúáh)zP](A…¶©*“$:  E²D …fE¨A ³GJ!Ð^»ÓÜo´–¡cv…“Á­É~ÙQ #øâùæÃ1Sþík|–a³®¹ÑG,¨érBïòc±±¾.žTÕ›`P—8B÷è`Z„J¨a—{w †t÷ÑZN&¤ÈÒdQ~*8~bN Ö.ûÁ"¡á›eaT5÷¡1£‰tsG×uác Éó¡)HöSÎiý¦\A®ÞN—Þa%Ò«íO¢‹=-Ü®ç ` [ݧG'ß-füU$hœÕq–<pë¶h;.ŸTÁ9<ê.™Öq]†ç&ÀH¸‘†ùÌÏΓ*Ë„4ùå2¿Dͳ/P”•„$3Kb6qE½…BŽ>šÒ`Ë€mtHé@”Dƒ%­4å‡[ÎÕĘŠ£õ¢˜°/ ÒXÑ;åh”"}T•±]m]°…njhF‰¿’a+ͻ˖ÌéÞÚêŽ&`èïrüŠâ‘yÑ£¬‡eS³K<¿¦íÉsÉxß²#K”=ÎêMðÒ1@áŽ>©Å$¼EkÙë#Ü3¸“ÎéH´¯ÙØ*gÁÇr6š‘?ABÎÀDL¸§b”²¼èÕPñ“v’°*›hBoNPü˜4*²¢–jYE;¥.¼öD’v:­|/ í”õ ¤ S÷íÆ‘£ÙxäO–­œkíš‹–^ýt–ú«ˆrÉ Æœ³C‰Ú0³_œ4ŽÓvF¢×ñØl$V* ÖUâ›%‚P¼+”iǵ‹©thûHá¯D™E<-µv6}¯^þ’†:¸|vPÙ¦a¿c´‡hq˜ ,ͤ||rtÚ=<:lU( `â"qu|XÒªnGW{•Â´œ]4zDæÿá¬* 6ÄO${tÀKÎB‚k[ñÃQ‡5|Þì”àp†3ÉÙ;·!‹œ´/ð€ÿïìè´µW~•mR+ÇpæM9Ôjà¿zóÞý—®ü=40o— 5Oäã!¹žSb{z–%o¬ÏȾS°´¯Çï½ ÊPݦeqD@¸ÀaT4*™ç®”CÇWdh ;ª1‘6ÑÒYb›Ôµ4§›àV”²ÉL#c}G»ÍÜ6JòêÉÜ ›±‡&ßdýȼ²*åÉrö9Âl’DIÅD‹4µ®Fn‹éWÊÞ'K)Öñ×{äÔŽÚ&ÔBQw¢éü)Ò èìºÓè܆·zòO-—.Ývw¢¡’ÅÓ ŒM0 aª¿öÈ IÅ“¢Ø…ctÞâw –’†9úaØ4PU$(äËHi÷Ú–y¯tû´WjÇF'»ãd8gÕ}…ÛðÛ8ú^ð×vêÛÝ/œnYÎu›é€Š~É.ž.„Õb—ËHô ÷ƒPšl“+r¿LÈAŠ±1Ðí’‰joªôÊ öoŽºðB™û6ˆ•\™¨ÊºÎ¿WJæã©Íôbø±™'zJÎèRLvtÜ)É}+K§Ãô†w³i„á1ysQ=ÙýDÚÅáÃÙg+E¿GnkX‰T˜—=ã˜ñ¦ÁÿµD6V=Í3s>©ãï¤3ží·:åWéRÈkA·$OÝ?èÉ=+TÍΘdMí¶³ºRæ=Î+±âŠdrom&_Q£†¬à §s:Žƒg›Òr7:À„S[MŽÊTšUdÇ°&^ÞÁ ˜¨!½ŽƒkŒ$¹Â¢éÑ‘ëKQCê,‰{ý¢‚µ^[YÃä&d.O’Tâ‡hFöhr-ŠyG?f±v×D¾(˜¢Ç*yOc Š¨Ù£#2‹(áàœ‡ƒƒÎPG¯£˜b?¤»E1G€Þn8Rè+¨Ë„\·ÄS4 çU ¾CV˜“”0d³eÄ!ç3äªûØ¡>£ÆQ^!øŠmžíb¼œ…ä.Y&‘˜çí¬ àE$è ©^ß»µöíò4štÉ› 6¬bŸûƒPu05îf{7㕦oznøÔFL¥y%‹îN²¨šãE²ˆ¬áiâSÜçØ×è¯Ä*ü‘c¬ÃVk¯k, Ñ9¸É ·M…³ÌÌKiwÜž"™á6HôŒt³¬vëÀò?ï__]Ÿô$Å$«5€^=܃šòý|]epáÅ<‡ü×;>2²u—îà¬u”ǯü>˜?kkçáx-¹”›ØY³);’5•øŸ’Êuwtvz|vêýíó¿ðOçÏx¦t>Zþ÷õ­Gë2ÿûÆW[ëým}csckãsþ÷ñïË/:Ç“¦òÙª¯ó[ˆäÑ3Á‡×Ó4¥ kY\œx_~(*šM)K±öÙÑ~då‹$ÀØŽS`ƒ8›8´SÂe’êbzäÙ„žÌÎl|Ô«Dñu¨ßHÐÚUfå ¥à±¯xyiº¦f¢X·0ih\û#TÜÕ=ï‹z\ˆ/JSxKð 2 ¿@ƒáœc•çüºíÝ µ&°ÜíÂ]¹|ô Û­`,Ôô3]¢·ßT¼/°‹/þ‘LªµÍ¯«ð‡÷Å`8K.¯¼/â`ê}!€ÌH¦8¬´¹þà«ûT1Z÷n¡B¬Ý[›øt@âÞš÷ÅÔÿbýz Ðæ—¢sÚ}ºÖyŽ’ª½£ï‹Qô–Ä.pŒ¡÷Å8šx„ËÕ]ݹÒ.ÔßÆ C%³Fµ¸aͽ¥Þ—ØSoüŒ¬ŽÉ(û1É–„ª*MäIÂúD€!…0° Ï÷ÁŒÛ! ƒ€Ï(q8š"ã*ÉèŠm†sèÈMGk®ÉD²øNé5{00PÉèb%aŽ‡‡¾/£)\ èê쳤eñ×À‚M)ÎÕœc¹u{®7†08oÁç½ùÅÈ ˜ùý¾†©BÔ”N€–H&÷ÏC?©}-ëDÕUÚøf!ªDÔ Þjf‹ìâI/¾ÀA’ˆ·k£J0™¢OºAÕu éÉš#e“%fWòDI†Ñd2W~YÃ(šì%Ókñ‹õê+˜ûklr¯Œ¸GÜ«à2º{£ L Ö¶á}q~1«N¦â×½ô `'ËñXÁÖE„€E+À[°U5¶¨¶ ÇXîCŽ›Vä=ÂêpaiÃ#Þ*¨"ïo2©WEÚH^_çýM¯hîÈWØÇ…'ÕÆ_üãb«¿‚-¹ØxÍ[@Mðׯ­/9½eg·ìäV?7˜“>7}l¹³ûÂ<»/èÈÙtX_¬xX|P_¬tP„‹Pcî†2fdèIñc®Zµ°q͉ >úO‰øû iTLÿ}µHˆé¿M 7„ÚXßÚøê3ý÷1þÝâ”Yµ½`ïaíE&@ã=óãsT46•¦ÕóѦžM‚¶ ÀTáAü–Mp.¸©gk°›ôZ6ïßb ?ìa’ˆôôÚÂïz¿._N§“íµµ«««úå9N´Ž·k½µ JÌj Ô»{v^ïE£µðíÈ׀߽èU`PLqy¿ ƒ«t1(þËd—¼KyèMf1¦á¬ªåhÍ*…³‰b\¡43Œb0Ï^D1L`”PàŠ¦ø´‡ç”§sÛóÄ=Þîªx^gâ .xÏ«¢”Ùu–a!Ír6îEètL;Œ¨•FØ-UÞL¯p´còlëâŽh]Cý0£KD'˜LÒ‰m|óõ×U1™ÔÅ×ë@l®×³sjÔƒO¯ƒñ=‚ñšß°û@8éLìùù–HâqG= þ1 ¯z‡Íô;ÞoŠ»ßlPè89ÔËÂ*ÙTCX‰}|1Ã^÷ô/Ãþp"˜A€Ã^GwvႱù¨*‰ò?Ñ€bã›o6*¼Ì‡@ÞkÖ€Jʦ¡#hÄ«ùÏhÆBòÔÐqûãDF=¨ŠMQÞ$$/Ê7›ˆ6ð2;Ü ñÄÒÍñ–ƒ>)¼o$IÉÇÞXÓ0O^Æ€ r¨*óϺ…Ç@LJà•C¢ͦˆÖÑaøX¥#b·°i†‰§4na§ÁHR·¤Í±Q8PÆó€ýBù‚é©éaŒ‚µj2,RR¯qÄk¡FâJ* …TUô(…\ðØ¡7ÖAŠ2nÀÔ£8:™¢¿¶ßëÃä¹ÓÃF¦…<Ò$aEx2A©p¦ÙwnÅ\{Øü„Cñ çjûÒã"=Î$ÞbÐPŒ4W%¸ž á-ì{çsöKÆ DàŸ£ªèrÙ{<×(ž#kD8þ·†dê£çßË Ž®³ž :a@ÿë‰õ\£VQÛÔf!iJ髯<Õ=íJYî êð ̆â$z;¦§6¶Ñï;ðÅD0<‘ñ'Oç“ ñ¦c¤3…'ìb8¯á·>²ó€ñpH‹×pQz³EPúf”„¹¼fg_|ý öU6j/š]ˆƒ^{GsqGÈŽ‹„nk,s†Z”JzÈy¨–æšX'Eä|-ÎÛ/Ey:ªpX&#  ©è‘rþú~p '´‹3 ãáÌú!Ý2¹‰¤/·L·žÁ‹€½WÀ¼£œÒ·EÔV¬_NGà ‘Ò%¬_õüDÅþ ñÄ“h—~JÉÞñléBª¬¥°w%éòàŸSKé7¼³‹sl—б>¯×þYWhú¤.Ó7á8ÁwL7ÇC?Iª^é`3Ù €Ã^¶±CsJœd ö‘2bóaUllz–~¨Þ퇵­­u"Æ4©:G (éÒŠ¥„Ñ[Jj ðz045ƒ¾“b1_KaÔγ¶èœî«J÷ïcˆ3˜?@"€Šç=Åœ’+ÅËQo¦‘·BW¤ú]Æ•„ë3I•îŽ§¨I) ë/ Q…¦Qù”s$¯Ç”*ö2Î.j°RÃIw [MýÀl:dJ—yyTn^©ÜµâlœcÔÝ‹ ¼Ì€hUUÏÏYzÓüH<ö{ˆp‰¢Pë Õ1Yâ“îøyt…ñ¯«x~¨ j—åqÓùD"â.’õ‰pªºÂbã/OÙÅ¡l›fb&C)ËTAýÀð/B>Æ#Lñ—`FSVÓõ^Ò„ãù#8qB-³±^ˆ¶ÆÓsä;O¼s„’[·ð°×ÑYâÂüJìç]¢{2ä¦â_0플EÈ}«+ô¦ÐË!’ ‚AJq¼¾^ì¡.ÃêYÜ‘£ó¹¼Íô^˜»¬-F=‡&w\¢™ôvrð2"9SÝ‘ñ|žóë|1¢Ë¾Dî9]@}ý¢^o6! Ê—†ðÀE¾¢šBAObŒ<› sWG‰'í“IœCß…3ꇃ¹ìˆƒ`È°A´;š«‡ýDg Wè¤åO¢W A<Åød:´Ú;—,{þÀ—-:¶3‚HÀ©{?i‡±.ì µn4tÑ\N¢ñBžÐ(ì÷ñJ¦$ˆš“¨Uï-"`øžE¸h#È – bîlå<ša2<3j›L ÄÂàD$•7ÏÍZ‘:ÚûÈ,é×?E›q,  €±÷·Íí&„’Å»*¥ö…þ‰ðÁ%¾… ’þ²Væ)—²¥Y¢ÏÌ@¹¤>¥+ɨ֓È_æ®›`¨¼)<­È‰z>h£È/$v›À9C,ë€ðËOTF¢•â©òy<À<~BòÏghpFÏÕ¸F ÛÑž"ㄯ û˜n‰I(d‰˜46XÝ;6‚¸4áÄ$ÌÑᑨÊÇ¢j"þ4õT•¦!݇¸Õ%DÚ-/yõtY¾Õ?a~8&xãaÄ$)õfIWbfä^§§ÆÄMx¤DÃDzÊ ¦ è+xäÀo℈%¨VŒx>q¹~:(ª<£^HÀH­?û#+ wJ3CCäU|^(µ¬§‚tyž—^.'vKa[Ð9W±¼‚~2ßCžºFè—2Š KìÔ£ „|˜ŒˆßÒ9Éõ„3ÌÔb—dç9ÌDÔûØq!=Ç„‰?ÂhBÊŒTp%zU´4y}”ËÅ©t-$UQê¨>ÏÆ4‘x6a”ˆ -ZLß35bÝÛGnD£¥Æa§ (“±ÓuÊšŸù¤Ù˜¤˜o£7'}ûË$¨%à7¢Tð}¹å:Š”zBŒ©ê‚ I®63TÓ½ÓKƒ3]K7O‹ÜCùÚ°9{߀Ç"W‰cPäV~JÌx6X$ŠÙ ŠPúŒ˜ ‚$,öðLp¯"y½=N‚4!$cs¦q›Ž®;#ætBÏÂjH[¿~ô\¤‘—Âyb”2©Ô/êê\ß^ŒX'…³Rn»˜gôj&Dzj!ÖEŠóŒ£ÙÅ%ÄH×p.Éw„Íh8S±óù[,ùxž>0¤H—æü"ø±÷d=‰³¸î]eÜ£òöÈùð;ÄÔ$p€ÀùjéF xNq‘‡ Àæ8<:P:¼Î™D¨ƒðžS<”´M÷gêc ¦ÎÔ,°¼I*ÂA(±QKÈo4ƒS 9Òî=2Ör¢„ëèN&AaîÇã}6g‚šÈØã o1gà)¸’)äoß·Nžq>A,sfÓ”/¶GQ‰1ä"Ô³p{HÜM4,þ„DmgËÄÍ0g­)¸&™üEˆ R ‘9Á5;K‰yЛ C)ÌàqzId5G¦f¶ŽØë~_Yóù4Û€xX–HEB…ci{ÀÈ]¤²±a„š)i~_$çBœqjq`²Œ ’<ÄÚ1Š`õÓYB›ëz¯Ä¬GÔ ¥3“¢€#)ì9‡×5ãzL=ƒR˜°`È÷žžé¸×2v''o‡!†·5žõåé|´P}M㶒»þ$Œ «QÕ‚[‡G1*¼ñ#mÈ=Gì`8à^½Ÿ(Þlm ”©w~Bâ1>ñÄlqº6é ÎDIHî{©÷0u.Â+¤`\tMú !žF›ô*3$¶BÜLS—âk—<Þ%ø³G’X À•*‘º9Å2ïu¾žgÔç—¯ûU0V 3ŒC9Œ¢7äξÍA¿.Pý3Dâþ*´ ¨_„œÊ±×ôaµ¶¶óˆê7Yñ@ÔÞ†ýO°W¨&]–¨È™àMú»‘yÞáq˜öÞ,O,JxäMÌÂRÝ{*1rv$,KÒ¢JrJ>Ô>œþd:®ÒçŸ#iÎŒ1! ž×iÏÆâ§$˜þ<št¹O æ~Ñ£u硫YF½#¦"¶ÄŒú꟣ ÌŒ¼o ˜¾åžô„šÄáˆ#ÞKÉ)s|¥~¤‹rW1^œÔ3 ++Ä3š öç“ÜåŠÌHg˜‡#$#T*Æ0›©!L&ÆSà3fœó üP‹iÑ¢mG0Ø!Ò†lOýþà°{S×M†ž8e­ž 7%Å”ÂØÐ=è>£ØÉŒŸ)¢ÁæúúWâmHjP|AÞLxIjÄîž´Ìå>·Öž¤òf¥àµƒ²h}y=G˜?àу>0²”Ic]Z±Á h –ˆ S|yç°~Ø¢Äú—½0^õ0aj4I§Á *`(k< …€ðu ÔAuŸï.àÂÓp'ÄÈjY%ËAH˜«¯Ì Ñ~©I^2ßõÐ|7AHnÞL†v&tÚƒGås`™a¥„³©¢>Ò@íçÚ1’dñH² L“SYXÑe ƒð?!¬']·úe‰ª@µNñÔ&§t°+!«y…í.]2\$Ÿ‰›ð”i/\×ÅH6±µI˜z–8%£ 8%hQÎx0oôGþÏ(Ü'£‰$S ‰8÷—_?å—âñ®Øªˆãf"éd‚R, Å@?ÀTá}k†¾¢Hÿ›h±îC¹~ãmÆ;!M´û¸9mEº#á—ˆrc^øUqÔYÛ¬²XªŠÑO:Ó£F=àÒôÿ7 ßúCÊTÅV5pÐøN6)‰tÖH ˜d pà¦íeŃ‚ŧ:+º~™¡6Ävk2ýHÕ#ù©8¦òaTYÁÈõY¿„ŠT!lŽÌ·à¹Z©zRº÷4‚'½ª8 ¦ô_ʺüðÎ#-dÉ]»¦?qŸ`|¢aÑ^«)/µi*»‰Ó¿D[xÞz6¸¡ãEI514ȼFTl¥)Ÿê†\P÷wŪL&Qb•~D÷¨TK‹‹¤çF fr²;µO´}I@L‰Ãúf5Û¬Œ€ S*šè!Í5A m#Ž‘e9kîTeðK9¡ýB¤"avècO„§Â•×‚x}2 Ú3$ ˜>¶Å}/¦npÌFIø èñuÌ>ŽE3QAÌõX X§aõ‰QÒÚ6lÌâyô&Òº˜TÍSîLã)°2ð5 uX¡¿‡,-uÀ÷YÝO|¬èv^‘D°6´Z6¹þŒä$¡o‚Ê1eVçO½`,3ÝgUBih•D‹„%v3Πjª’‡ÅH+Ñm&®›P2‹Õ,ðŽÛ(+zˆº@ø¾ÜmÉfC&¾´Ø %A¨Žå]õÑ‹Ðü3´(\°(X-LPÚÏtF^Ä+ A M¶_&‘­;P1Þ–šr͇âf°“†G8^8>¯™2?ñ­#™ÌVéÀð2ÃtöŽ:1×ãGäÜEuˆÒWÚ$üG¬å”³â$ƒùsA#ÖÀÆl„ÃÄ ?(,ÍxöùP!ë‘‚QZúœR 4÷Œ¤øJXÊï¨Æ$©.›­À,{ ~ÄÑêMúKÎ%Äæá+yáòTö“•-J*¿Ù{…µ8dÀl+vdy)óÕ™ÄsV—>çàAe›Œ˜ÛI4<‚D«-S´ ‰¦ÈüÁdz^Kb*yš)]G¬éá£S§ojN<‰}I¼¢»*.š0 ¼ ?1<£nÅ£D^×áÈ”jJ„œ´¦ÿ‚ñ%æiL8}À$•G"‰óüX7Œy$ÊâJ''=ÅZj2FãŒÎ-àüá 9)‘ÍW h½’q%ÅËôS¥ªdMèÍ9Á¶©üŒ¥ SãN*?ö¬)¨5ŒlH¥ƒŽS\Ó4Ÿb;‘Ì\5TáÈèRßó€Ÿ\AÖ5T ~‰Ì–‰H·Q ƒ¢x’dØ·n$ÉËP©¤ÙÙê²7=†4­¡Èjë‰u* Zü£¤d¦ dD–¦ö4Zkš°T¯¯6–²P΄LYÿoÆFä_–Lö\sv#Å}ÔîúZЯ©2ÖÜN¥ðEý-fH–U Ñ4‚ ‚£ì )ó¨‡PL¤À6heÔaFjS0³[ÏL#°"^v-DMªz0_ûûJVÇ}%î9.:²)ýèj¬’âõBòX©ÿÓA £\wÚÿj±1]JËžRRXˆsªÁX٧Å1$3›ìÚ6½;1"¸l¯+ I§Ýc€º¡ã®’K5hOß»T?{î#qIúΉ´‰'P}À Šaè%œjèlI3eËèËÀ25Øw:Nš¿J샒҂|ÿ¥BŒäJF*ý:é@´¸IfvjŠÓÒ¬“¯à¹Ôï•ÔYcde¤rØ’d¤ÐåoweÐ…U\â!ï ‡Íì^NÊŒkl ƒ/Y_UY“glxÉ"/Ljk3ÁÛã𢇷„± .jqQÿžJÉÕt<)gÙJ/‚wÑM_xâ<½ƒ˜^ò©µ×¾îPiBeVO‚›GÖÓ”± ÌnX_;\³š•…þé¥g¢F… 0e’…ìôS€8ŒÔ$$9 1¨8˜!âbóá#‰ äó*Á• KBƒ„›ù6=+5”Éës#²¶ÊÛµÿLÉ­Ô‡HŒ–tÅ#jLçI6“ç’1˜IiYOp r )©ŒAê!O1Êy`aLŒóÿ-^õE:Y\£yC™ÖTšþÔ1‚Bc+L%áÀãþŠX–.Ê–»H•ñÒCnÚ·Xg¸°ìf3V]Btp$UE?¬|H7À¶³>A YÂ1ÀO”ñ–üÖ¤'©øZÞbŽEm¸–›L…‰¨ÒgϨnš7”˜¡ÆO§4PS–™ Æ–+K>]ZàØ.,Œ§sSç¨é¦¥è¥bŠ¸oÑ„‰d¸$¤ILS‘^(›÷§=%¼&C­„e™¬ÙÀ Aq(/;Lœ°ÚÈЫ¢/[¤cÔZ)3I9þd§ÚÿÁ¬i˜-ê-ò9Œ!éÐñ„¾©ˆšÞ¡õ·>H¸¿¢fûÛÔ´ÇÊÉÁ¹…)Ù^B>",§ÎWJ ÇsSÙ3õ3Æi‘yÁèQçG&YpM#^ÊOå{ƒ ¾ŽUq]ù‰ÛÃ/ÕÒr3ª’q¹zý´…¿œTs7è©*ÖáÿWvÙÂù;ËÍ:“îó¸ÖÒ¢¸ÈhEÉ,!ðQ¡Fê–î`à Œà)m}ôSß%–«Û߆Iÿ¤ ;IøÇ^©t[áQQ6~Äÿã!l)iïP+Eh‚õ(}½b—’·+²›ñ˜=•ÄkžÉJžõ$sC©g‰Q•)eÌw‰¬F˜é#‚Ȱç8ɤ|Cª)wÍ{amÂ8cü~B•?Æyë¯WÕ¦(Ë+Âiœ†g»a™éûçD'…lR^˜XÌ3ìyÉo®‡i¨È¡Ó¶ðNÓG]FÂ~•LÙ£=À,FvÆåèÁ†ÒgÄ·Úy‡˜&’£$ìÂ4$¡ºél,ã]¥ZÕË˜È ârr_ÏTf°.S = ï]’¿Œ,q–H>ÜaËE°%jTâB%ªCFT±ªôøë¨jU**÷ f…E²Lø‘J—èƒï['?˜¶¯4ׄ]zû³h›ñ°~©~,Û3Zp ûÔìW=áXâY´g16E2¯Wµ­*²*“æÏcŸñJ˜‰±”]ý©îªò1=#µ$u:„(XïÒ: |\‘äR@à BÀD¬´ ÌæI\`‘XsdøDXÞQôà%:t­±Q4]íúHökÖ¨ˆ"|ò1J !/Þc;zËåUj °Ÿ>AŸ–yß¿¿TêÝäöÊ°z˜­n™Áh'`÷2Ò`ÓeWk[ÞSXÈöNÊ°®wÿþO2ógŽQ?-´›Ó+Õ¥u¯CؽۛL"µí«Ž¬ãèlUŠÔT¼©R×¥fæ]xG`£‡Á ¡MÉ3$ÞDÅÉP~‚šÄe$‰ ð=òWÑ`Ê‚Pmkƒç¦Tí fPÑ‘o.•!W '%¼YhÍ+à‘ûtF §¤”ìò8;W ì‹£¶6\H1·4ÃTR@=~‚Sœ`ÎÁ0ˆ]ÍûHi-¥K 4Ÿˆ}tÉß“.ùY3wH…Æ~:É÷—ý•ìÜò(Š2‘+Ê¿8M|r˱îãÿÏÞ¿>¦me ãðóµü 58€/¹tjêL& SÛøܤ“dTd[ ‚ ŽÛäüíïºí›$0I;sÎù=ÍL$í½ö}íu_tþåΑ²E3­Ç}€¾ØŠža”Ÿ&e&‚†1Úz –ýåiûäÐ?j5~$[SmøTÐö(žÖ¬:ê[rþ G›÷qh¿«h±JúŽ®¤6 EÎä‹a¨®‚˜0r ù¹’èè: †0í8/CÅ{¨E%¿VZ:F‡Æ]œî8[t°D€HI‘$=ß/ì·4‰G›9Ž:Kl,$…«à=y "!©ëœ\#hûÈ|_¡óšàvÃ(ˆá:î½­­{{ªª] g1EòȬ2™PáR0‰”·*97žùìUÄV 0½[d?ÅÑbàŠ(o„#i.Ùã[‡vtaMg¡-s£šò­bû}j4Ybó&gØ]l “_棆v•”Ç Ë轶ˆ×HVÝ­¤G§œ ³`}6Ó@1 N„åëA²­È;I..O˜ß›§±ÀŸµ{ýV׊yÛÿluÑΪÚ,OÏŽ2$4zw-`”5î Ï4fÒ«4 Ñ–5áÁ³€‚][ Qpù +2Mc=çIù—¬“-TOhg' •GìÉ””‡‚æ1u@ àÛÚ3¬™³Írûo é!ì!°¥,[›Ëú¢Vžbç¡´Šý~íù+KöD©Àò–϶NT4±O¤àà¶ÜkPȺ{íH$g‡öÁË~W)'±®½‰uì#Qw!R[QEíNHáhRÖ›DŽHà‰BQ/«kvFãs¨‚:¢k F_T9Y¡ ìâ+28µNm £µÆlû™­N3ÑÓ"-l×q G^™ãÝ]ÈU”#GáM¯Ø0Rs´(M±|ìɨNE•}øÔqRhôn‘èZÄB«m¥-Ï8ÈëàÈ‹ÇtÑÖ#…Š”%id dÅË,a+KÈ¢ó8C•k£MökÈ *‘QSÑT<7ž-ž0ëÄñ— «•‚x‹©‰Vp o2©`Ô­çÙ䀽l™,í6V°ïZ¢•Ð‹L¢ b÷,ŠÍc_E‹NËêm¡(vF/‹ÇÄQܦhA›÷UA¨ S–M»lÙݤ,Šéô‰~Žb^AY$P›°Õ 5ˆ$žÕ…¶âÓ¹ð™v˜ÏXr@ÊæP‰GÐTf³Š\c¡ÄGÅÂ!Gƒ”º^9šã££Î(+m"Ì¿­÷cMz[Ôv®Ô$IÏ(»ÌKÈJšAWöãò¾rÙóË´¶ÊòÀUÖíÄݼ°ýʼnNûdXX¤³™naÂN…%ª.aåÍ¥ì¶b^®8Bâ9&idc‰Kø`]ƒÁ²%ºHi§ZAEà ^ Ò†‘ñk¥ÄZè§Ç窠|y\S‹!ÇÕfÇÿ+#êGïqK½üKÇÉBnÔMäí˜kkâûš Ä*àƒ H[Ç2ÓVê’s$;MìáÖ`„ÐÚ Ï6å¬^ãäà,ƒ·ô€Ñ?z””Ò€ü·•UGS™ª8µ£8±èF¸Û£ärQË»R†£hl†âúƒ F$wp­…¹"uI7X:Á"µÚ«K¬M˜ir‡³N»‰ëÏèD¨Û"Ef/ˆŒ3¾a®ÍŒu±(gixȤ ítqÍ"á3ŸW[ûÍ„(8ƒ C)¤eŽ&n‚Ž÷Ï–Ë*Ù ²+ˆT ù “ƒZ6'^†Q¶=k Á*Ç"V¦ñCnæzàäxAÊ•loWD!Š@P±úEÅÅý¬aF™t_È]¸A3¶Y mva{å-ª«›y•¢VBª,ª7!„”e"`'ž„1ü6šÇûç1îù¤£ÏÌÍ(˜ÔâÙe™´ŠhkÁîää¦FÄ,£!Å´Õɵ10Áàr»€¦ûÞÓpv Wýó2—Ï„ÕmºŒµü›C”Ô"’è éÖà€ÒX»°èÏá@;Z[ÒŽ²lå¶d,”Õâä¬j…hQ!¤Côc¨‚‚NdðÍ,rvÚÂ&¼ £sŒ½˜1Ñž€Ð; ÃVàìJ5 ƒ&å~oŽ²š¼’–5âÉ,Óå,!˸&·ImT8ÂbÛ}§”ªPyIä(¢î ÝJ³¬(Ëê­j8¹æ‰N(<;=ÂÅ|ÞîyÇ ŒóÜ8òà÷i·óSû°uè5zðXñ^´ûϽƓ^çè¬ß:úÙ;éx/Ýnã¤ÿ³×zyÚmõz­ÃB§ëµOÚ­CÜ6'?{g½Bkô½Ÿ;g]¯óâÄë¶{?"òB¿Î$NÊ9š›*’2Q\3ZOebG¼QQ¥óE‹N$S‹™Ä#¿d o3¥h VÐúÈ„'™™èYL$BCïDä"½MiZ–w€7\ ßlïÌ!9vt iÙ®XopC¼ÅÊç`Þ ,‡³ÂI¤N‹n@2dµÍCæ0èh•F-@1"d‹âÍ4€ì#Ï~è ‘²°µ6U˜OQ´š¨Žï &Ý¢RöšvLÞ’{M Bò—b9¬0|è÷PñÚ 0¶\AæYæ]‡Î«].ðÞÄ1GN –\©¨8Ö1VD±¸xŠL‹ÖLq9Ô}sâ0v”¤)œ.ÎÑîæHN.Ç 2áu©R…‚Ê#uª,v\Î^…Ç’xKzgr€˜\+‡· ¡õ$òÌd<‚JÓ›ŠƒÀÐÁ—SIÍ¡©¿²°ÿÈÿiÜügóî>ØÝÉäßÝÙÝù+ÿçâÏöÖrrõþ&W¿ûé™æJ¡ ´IE"5_AkhH}Š=àýT¸CÑŒó<ÔjêDœˆZJuœ¢¯³B}4 QÕ ·KJ›ÉžÂê-Dç¨fÒ’åó6Úò 9 €„Ã# \ƒi‰b5ôRY3(”V*ý .Ç»-š¥C·à©eËCØ͈˜âdl&j¬]PŽUÎ0Í1³)ö]…¬îÕÔ7¿…GQ Þ¾Q8W=täk{;Ð逗 ŠTÕ*HåœQ, gcdÔ ?eqxS.|b·+¥†J+)Q´ü,ð{e(“'T¬H³fm µCÆÞ³Š; ‚ÏJ`J±öÜB’½J`¯9 ž¶_·ö)d¢€R;÷Bùàfjfþ(Œ©ßnâ|_‰Ï±`8x™FUy¼o§Î8¨¤ŽÓáÏ'ãvÓ?ê4Û'ÏÊÞÇú÷eß!vâÓk}iþüŒ‹»çõ´Ù-§ðÞa£ %Ýb½fÇo=M½d¼tx”‡,í—néÃgg©7]óûêù)ÊBÓ½wÞêȼ4S€Ÿôt6ŽNŸ7¨¸zÓé=Ý-ç–E˾'½C§´“àûn]ã¨}‚½·&ý¤Ñ<*ßAoõ—·èLÓY÷0žU¢”†ál”‡û±\ü\­>B„Dw&û’=œÑã褩àž*5"Ú ‰`c5Úû©{Ÿ½AÄX‘ln(Žµ¶/a®.É;棘îÏèñ™Þr€Ò<÷ª GTÐ~?] &™·(”°ïdûr”%È‚'oç5å vÉÇßhÔ!eÂ`À ¯Ñm>÷å!·?jAÓ„…Õ(W”ÂÂ{;;v¿·ÛzÞø©hÜo«ìŽúü° ß¹1ƒï¥%MeŽ¾µ{ø,[/ì ¯³[ÏÞÙs¢ÏÚë‚·êOúh9/äð¬BÍmÙÝù è©ý:ïhôyÔè?ítýÆÉa·Ó>dŸsœMYWL{”¤™uw!“%JÙòªz€@‘zÖ˜ gH4*¹ÉÖf„ :2/äXÄœ·Æô€µ=õI‘-àñÙJEµ/RJ¦ëÙ΃ÝkThœ\ô.Bòp•Z Ò1ØCI‡íº«z赟 -’ºëjKnV uøI»såa‡6ú ¦eü'gÏd@{j;˜‘Ïg Rè ]öæ%ÂÜSï\&ö~ ®¦Qs­;N €S«°)¸§±I‹<#Š–ÐЇpàó:#ÅæЯ*HÆŒ­ wKj½ dW²²ÿµ`Qèꪙ9°T|”þ2ÂÀÖø­ŽÍg¦ Õ(Ü—Ò½Tû#wrd*›î?ìœô}&'}8â?úÇÀðõä«=å7NÛ¾Oxj·lf¡¦œ2‘ËÎâ,£ Ëyõ:9üÑ›íîÜ­åMî9-í6Ï嶞R‰8Jötñ¨ØRlÛœ»N’÷†iôyg««€u´bfçÜ«åíU \Òõ ×j\Ït>óá#F·ÕõŒLóâ£u}=·ühhÞ§Z Šá‡ùÊ¡JøTw»ª–ÀôÆ¿ZY{†ÿ˜ïÄé–¶fþùìm¹„Oåz\$…s‡:ƒ¡bX[«³öæ GI¸lÚwñ/'áu8sžœmSøwu]ŠPc0‹IÀBrþ‚éøLJzRÄÁ)Ò£bõxRqapFøX.^ð9³nVuëÉÄO|_¾èt)  wpàÝÛSß õÐ(SÂüݹC!$¤œž‘åuÞO×ÑGªg顼kÓê¶"gþ{ºkªÛ '²yÔèõ¨óú ûôû?ßWõ3‡Ò³¸)›Â@iÊi·Óôáj´ú¤ …Z=æÙpg¦íÓÁàîÞLGB I 晎ÞÚ,PÑEÉË.¬›W¶®¾ ¶TS½›1Š=DvµSñºý#X‚Æ?.Û˳Jz·l•‡£äf\²@V¼¢Z“¢èß#9ò·ÖñÑG¶ Ø¥”;D{„0¥z?p"ÿgaPûdÏ;7—v¤Ÿ j"Ýs’žD¸½ypiwLþ§¥d¢rI¥\®{%¨ƒ“=­>úð»ì}Ç ^mã.÷‚Êx‡}v¿Ë”É£m¶Fã¥üv/E`@¹?‹ImèÃ}_.W¥è»K£1uº’B%£qõ‘=L­‹èÆí)WÎgaðÖmãSÁýÅKÔu»¹záSÁbœ5âF…†”ºˆé"ú`dýYÑîíb~ÁU·‹oÍ­$ÍhÑ°&‡˜¯Í^;,àÍÉ㪾ĒE–ˆojiî̾ƒQº˜V¤†éH»Ô;½(TÂÉ/Ð mÐ$ZÅ Ë‘[ù—&Því““V—IR;£ Ù×r-ëÌÙâuDH–`C,×ÔÕ†¥ö.µÏÙÖÕpgÖ³H`z*ï­±˜H¤Jø_\À2¸œƒ'Ö¡³½¨^ÐÏ¡Æ¡ÒpY:ç²!N‘Ž”K¥7Q.…å²w× «Bzý([È–»EÕþ–K¦»<á°ˆ.zøç´-œ—ôd1†—wïV¼,ªJ`' ®J`‘)Å{Ë )´,öNû$WØO!‚ßs±Ì×%‚v1 .ï[ï(ò2€ÍÁB¾Ìx j^¨ö{!LPz…Ô;¥‰M&ᬔƒ; |eÙO­ÿø-¯T¿{Öʼ.§;ó©p+z”PTû·•Ì¢QÄ–žÑ+©Ã©Ð¥õÍ Òÿ'¥Š¦_‚¾¹øŒúß =Šß5áäH_>ƒiÜeÎodŠ½~m© ÎЛk¾À Fœ!C–eRÞFu(fÚß%Ø9Ê_6%=#…¨â”Ð91»€™AëH6>¹"Ýÿ @ZAYQ9Ó¨ŸSat1°Ûb†¢UôŽÓþ#n¯t~ÓJ6¡ˆyê"ãA .Ö Å¿©pò`Œü‚亀Š$ÑÃgÐã¹s¥R¸á‡íùè¥âã}ž(rL-¨·uNÁRÐýÅŸ‹¯Š_ø!+°Å2BGÃü¡7AÜg½(g«Õ³•xäPu7ûQ]T0©¤ÊþàM nÏ~ƒÓíºõGôJŠUwßÔ®Hë ›æ‡œæsÙ‚u÷®|Vx9=‚ì–ƒ±7z½V·_º¥ VwA7Ó¤š«ª ÓS¡8u‡p›-k%ºkuÀ¾*Ó[a>ÆË_€//ô'—þ¯à3Ô¯[t\¤ÅwŸ;I?¬7I©E¢kGä´©lrÈ8?œP¸S¹´áÞÜüÈëÖóùâ–å/, ä‘P½àÐgHtƒ_×yo—'œç_ï’Üié!]Õ®€¸Ðs–àe÷0ÀnßjúéÙI³`'žIWõ™ƒÁ³J_Ê<©Õ]M¢ª ¥ èO©a+c²Ó|qÂÈÐööÊéˆn$½5tYdWSõêi&Þ.lALñîf·µýç2tš?–šF‹PP½ÏÞqèbçOäA*¨%dâß”}µcv&—´–8SØ‚kïøÒáî­5)nŒ¬%q&õº=ýf÷BÕi0KB}nJò±â}+[ù[˜9ø@¥°Ö=ó­ìs Zo …¼’nù€˜ñ²â¨wÝbØÖ+DÞæõfš†ß6f›vsǃˆÉ°Ùà@îË\ᔥ~T|«JßÃYxÔµëà”K@ŽôI¥µÏ‘©¡òñäv ØM¥ú;çó8+CÑØIGù•òä3H¾Q¼U™«ºrLÌïž$|›m¦¥#wœa v½iR Áì!Ê<ã?Iª<)—ÏKM' k+¯›ˆÜ´ R"C»‘ܱç’À°– Šr3c JÖf»—8˜S€lwåv]Ò«ëps*W]²ú•H¾tF~)ìÌ®lØ–p:Ã,É*…; ‘rQìnqœ¥@%Î\Òœ«W¢,,TÍ_ûPÂèJæ–¦Ô¬q¶CbwrÚ?òôžž¶ýìΧéo+Ɔ[ßL»t˜eé×áPl~€–€ÊîyöÖÝ>©ìÖïš"Væ¸ub#ì$hEçâgêÉêÝ© ‘)»“ñÃX{5s°öm¾¥W m‚ÎQ¯LˆAm¸ Æ[hŸŽD§ñ³C)Ÿ”\ê=1B‰•5Ž#ù¿$ùÈ€¬ž.kË@‘W¼Iü¢#ýJ1¢Ó@K`Ôe °œ²Ø'cOÄ0Æ©_g÷µLˆóAµOšGg‡d±pöR7¶zÍ®Ê?%‘pûÁi˜‡KA%!Ùˆ%ÏÚ|[¨¡•¹ž#[³›»¶;ñà²38³a ñ…#cƒX+ùÝ­½âìh‹s öÀÑ£œŒkÌüf„Ú`ÅÖ‡f<‰U(”P,ž¡FDZ¶æýŠ¥¾]½VÈÄØ×±¾Y-²-{­òföæ íºÇi±íuRX-39R?%8­‰Cù]F\·ìŠN£”áÐ’Ûkã2ãØU‹$窌òÔ­Âlò츲ÍlÞJ-¦)ÙÈP¯eÍêe8pÉGõì| ebã,©ž·7–vßì˜ œø~É$¬~}½ñ~Ê_˜Ôàó» ©È`èÌ[`dÊçÏV†â½­ åÜvo=6…5ÑíÒv—œµÿy+¾lFq _0s+NŽ.t— _¦LãÞ½Lƒa®Ã9¾JJdž.O:pÀ‹OuÎKº%~ ñ&wr¡êÿ °ér¹æ Æ ʤVNÝ-¥ÌÂèOûˆõáÇyR2¤h¢ü7†3H™©§£^‹ÕÅŽ5¶Ž3{ÜhŸø,¥b[ÌÂm8zW  Ì};gºJ9¥¼3ÈLHxÊë`ô6ÇhŸÌ8q—ðràíÕöj÷ïRôEK>OI8éCô6°‘½$ƒP2{¢"ŒDþ#x»8÷þžŒá[ñ›Ñɯ9l–faîÑÛ3^íB½=º‘Í›ƒx(G½9nŸÀlPI[Ós{õ^+ú~³sò´ý¬œã,“1ë¦Ût&ô|âu~$·Ý Z’þ]¦â…˜êXF¥lwC–‚2Ñ’ID,µ‡#?³sTrg55«í¹ÅÓ µ¬£‘YqYhËK¼§9F š›8šŠÓk @M\.*òºÆ¬l¢R»•B½s‹7Ájre'Ëó¢Ü@hº&1Ǻ°Ì!tSb$(PMMꉽÒÖ༬”P?ø”aK)3*Œ§¶ÊË/ .€g¹\·¬ã§³àr,Ó•jÜqÙÈõò}ŒÔOlõüxDr°QO¾ÉªUÈ ÔYHŠO«T ï€ËA?nã1HÓ˜êXå ô÷:d³}ðÎáhp°ÇÎ+,_Syu;'Ïr}Wò• f³ôýg'g€ ºÚõ¸›r1’EÔ&š{CÈræXDO×!ç&£n[ Gáð0ìWLGƒ„IžLöé£ ”jO¢´¢;ã€RÞOœBZ%¿sŠëž‘QÊr%%\¦£ïúý©ˆå׊{MÈUE,S~L(¸+z9kÝàl1QaKgñBBX*8¡šÁ„‚¸Âæ±üO§¢{ÅŒýÂQÌ"'›·«ÂëÖnÁ¶íÑqã%-šßk=ëÑS·ÓéÃS¿WȳQJ%W°¢!-ÝJÝy¥õ,´û»1ºrl©ø¢¡¾Ëa:(„/ùØžZ«[†÷ J=<Ž†ÃÑçóíVO÷2]•7Ÿô “WÎ켩;3‚ØŒã£PYÇ@VQ!ú« {$@Ý6¢pö&.ŒhÁtŠLƒ;ÄGqÓ9 sÐ'Å_]›¶½1þ£ð-ÎSEh1Ǩ)O‰fÌ•`@Š Î¥‡Èv¥÷ÊŽ# G—"†›p7Z&DÏØ+ •Ù'ÆYhxšFlr¤¨Ï»4¬€%ª¬e›ØUjM‚lOE:™´}S ±rR¼©F´i1‚ ¯µÔÅX-,ó-é2¶*;Ï܉íZ3rbmìÄš>céäݵGm[‘¡ æ ÇZÉîîë×¢ÊþZoK *:ÃTÔN1€,>Áô÷Ž¥§pnš;†‹jžž’¯EïŸ8܇÷ ®ˆ§sØÙ'uÙ"¹ÂT”¥tç`täק3t æKRh‚"j+T8ehcüñ)GAnµŸ·Nú˜©©Â´r §‚‘[O‚Û²‰B0§B΀¡DDx?f¹B Q*$V(ؼ Óê”m±.Ô¡bÙóÆsÀô`]R˜§bjó8Lì·Þ•øœñ[4t(—ëz¹\©!`4‰¤•ƒU]Q±œY¬™–W¼htOJÅ~ŒY;3„Sõb RðßèŠD©Õj¯1 ÅNJªí Ì 2Þù†t¹<¼A˜YžôãÎèÌícMÛ›šZ‘”µèÒò|–­ø6Ø{iYârÀ™¢wïfnB[éò¯7AwÌV";}Uªiÿ´„JU&±9øý‹1|>Ž×m¦| HVOZ{¼øÐa" FÇx2äàú:Ok2ÉT uÂœ]Å)U4õ@“7+ⶎÃ;ÃH÷:&`Ô¹ªÒ3çTˆ_ úà†ï£x‘Œòµ2*œH*MŒÁŽç¯hHV`a/C8YKÍkyþ(0¿ZêÍ/¸¸n¿ºdÑEû,k«zÕê¯d”U÷²ˆ(WÝ`Nůrp kI]z9"Xl0 {®Ù¬¸–àqÌ/&äðj³9L:c i„‰Ÿ»¥‘[öɳ÷rõ3éqÔ³*—.ßvšZ?P®·KîÌR}K4¢™ô»ú-uò0d¦œÆw€®w…Å4/Øâ€_qÉéWñVι·Œl”Bw¤8TšœÜ ¸OÌ/ªn;¼ÏâIî­…þ³(Rä|Œ:y#† L¢WMÊqù%Ï’FÙ_½£\Å™N"ç|XËòOWH}ǘ|m‘`h«ÌFO»um „ ¦‡cƒkŒÖ&ñ‰°ó;Jv|èàœm5˜GV¿‘$ ›f ”ÿþåbdu-¸˜à )щ¡o ø88kÿP­©SAXÁ(»`ÉX@&;Ëë¢$YàkÙåZ>Cìʾï˜{Z>”Ò&VƒÜ¶TW•lRBª4tÈ*Z²B]‹W¼ðüÉb0Ñ\ˆú@ÞN©&¯jc!¯)³Bu†ŸAÉ? (#À ˜u­!êm˜³|É]>R&n9ò»kè©ú¬Î SÄ —µ‰e‹ÌÊ%DŠD;·^ž¶šý’Ó‚Uö-²DÀ¥”N|óê&ו*¤ëi†ÜÜl¶#Qzl²:O8«¥¦&½À+Ä&ï[DY­¸ûÖûݲÜͬhÚ?+MJ:ÄÅÝ»‘ã ªi sE|k=òr>ä(¶sˆçl•Š—†¿DW¸ºS{+zµ÷ÝÚËökoiÇ>YfÁB…• –­uú5Ýë¶\a™ö—Û`–öÙa¯g‰m¯¥m`­4ÅùVÙiçêå–ÙNTk6['‡™¹üÝ• ¸óŠy¿ô0î1=‘ÚžF‡ QóhCË¡3 ÜeÄœ”OÍ›p Okªëvîdd!Øurr>°låY“yõÈzãX nÝotŸí•Š/f(Ò‹µ“6 ¢Y1Y÷½o¦^­¹¨›ª¨ž—mß‚ôLæÁ1éºÄ4MÃúJ’m >$‰pŒ…”†>QÊ­·å ^Œ¼kÌŠIŒ솪wÌgì°'³hxÉ6!%`RF*§p„ùÔ°«‘({¥¡—„æ!‡YûsÝ·E rƒ@êèk ¢Ü£Hêã)`I¤Nޭݯ}0áä(j€ t!;N)¼Uø ÏÛÛM‡EãŠÂ;»õC –U{ê¿HÕ72{© WNX…LÔÁ;ËÃû™¨댕Q³ìPÀKO‹8,ûHÏ6}?e-¡¢(뀥‘„^¡ô)úŒ(DÙ DGò"Ä“òŸ î’¹mr‚ÁRtœÃ6E×;æèÚK£°xìnå:Y}=¡¬“õ{HÄؙјåÈì²õ{VtH”˜v%ÞP|gÿr€~Ò‘d{Í•¹á`¯T\ìœÐH ¹²Ä¯kv£å^ÐTIºAš6Ѻ‘€†ß—ky†ãbFËÁ)PL½lôÄ6›`v½lZ*¨Õ‚Ùeb6öC;@ë Å"–ý’ú-gàAÆcÌæÚ}T馓i R i78¼0X»-I#$‹-›bzkYeVw‘½E¿×Æ5Èþɘòibf>å/ÇN̨‘F¾ƒ'ÏÄÛÓ‰xï2Þ_ê3a^ <¨ºkE¦8_\¼º·óÆ!z§3ôª˜ÅI¢›&n‰_ ŸüÆX…H; ½‘gÃÄòDöOÁ“KÒ¶[¤Ü¬n+m%ÿ2Yß¡ €ªŸÐrg½†XFä’ ´áD҈Ƒó‚c8¶yÞjœú–XÓ*Âb5SÚ ¬á&°ŒZá>þ¹çíÎ,³J]&’Æ òr&“é FyA*J‹¿Ë¯H[~û›Ñ°XA=\—á| Kæ À•¶*¡œ #­l¾ÞÙ¬RΉœ&Kò0c.¤9æÄ 0A¼òʇ`RÞ>Ý5ÇhcÚãÅmg*5D4Æd_)ù6«`¹¹p¶)Æ' ¼ãw;'G&ÈgÞŒi§ÆÌð‚tÜ&¦ç'‡µ‚ 1ÌG©â¶;Íægô¶,ç6 Ò/nEUó’jo™ð“†õ ´F’~Ãâ]¨)ÎÏ+éž pÐœ=»KΉ4å·¼=¸ëv뫤­Ó`’PàéhA¦hl½#'Ù^Z -”4² xƒ†¹÷ɾt«ŠŽEœV¯·Ô¶¨åT8Óp–Ø’oOL.•¡ü‚“v¾‡ÚÅÌܺKO+¯šZ¾î÷ìu_{ÙaqQ4ÇK¯×ˆU›$Í@[êgõSÆT·Iþ‰—Æ{äŽÃBeh$¢Ë½JÕ»%¸Œå§x+Œ”ߢë¾Xþj/ÐùÕd nštûŸWÚ^åŒRÔ\7‘mNçñÅÕÄ¢^p ¿¬ Ew^Q°%@ïœðî#bz¸6šò‘þ’Y£ïO[ýæóÎ)?œtúÍFóyë°\#«ËQ&ÑßE°¢y =ÀP^td¹œî,m@ß#JÑdžh¥7Æ´Æ•T›ÃàLØ»? ½ö,úgÉl9ûu$Éw0Q©Ð>#ÆÑfÊóÉ1'Ê•±+–ÃI¤˜ŠÈ<´` (‡ T±´CLö%Wh¥ôõ×y" ¶æ-¥lþ`òrÌŒÖàª}þdͦ­œS»™w %H,ŽL1“S¾móäê#•2ÔÚ(Cód}…3­éDhY¦©1!ÊÏP †@w"¶ŸÂd˜¢S`œ®7Žþ˜¦@€fÄ ©bÿ»0m€ÆYJ)¨‘êz¾m©ÎdÅä:íó‡µë©'¬(ÂÎ0óâ R|-‹xa9’ùl2OÛ:zzÜxVñî—suͨ‡’AÍQŽiNGTƒý¸SéÄuJŒEWž„ÔœqJe¯/ u4Ù‰ÕIâ¢Y˯1 ñ!ŸuéÒ"H[Æç¿ÖH&¶¨ßîvýÞ?½ÝBJ.`ÔùH.Àæ{eŠ¿©¯ëx„cü‘Œ¡ÍöE€ž8–§Çáx[A•lÄ ÔaA¤»ÝÚö/meì˜Ã=õ+ï@ðÓ½£ìM£Fþ+…?h=-Ô€Õ ^œrŽ©*, š­;4jÑŽ>†Ú)¡ ö k<ʵ†â¬` ¨ŒHv™(©*–(×sGŒ|@ ®ù1ª8¿õvvwwËKŒ’m‡\©¬ý´J¥®&•jݽûf™ o¾”èÖ«5¯Ú§B^¼4#"„aoÅåâ-B¸)‰–éȾgFd¥Šò r†ã”aôT4dz íÈ %?Eu5›M0¤›ƒ¢é-v–®˜!*ÀjF <uk¸ §—·èjPý¾¶ì:$÷.ÚC¡Ä…Îo*9 §ø5ÙI´¼Ã"­ƒHüHxøAVq¼2?f^fLKUÊy~ZûÇðÃöoÍùLJ^¥®•b'^«ûS»Ù²óËÁ8Œ¯I0geEç’YÅCšÏ¼Y1&Q…\‘§„T„â1}Áy–8 Ædn ¾¼7ŒîéEji¢™míêFô³Jt…¾¶f÷Š`—Ëìžö0R¶í#ÔäÙsƒJd$}"ñe]#<Òèq8;/ÿveT’àHe ÕÝP™t,1 ‰XÒýÒ'ó[§/îóUä =C«9u,ïîXFÞ¼´¢ÅvS¯\R.«XýOõ;#3·— 5§.–3½3U~pFTX¯G.®K…w5z èÄ<žlÝ£Ò&hŽšYüÁO0oó·K¯†ÿ¢8‰7 êÂkÃë‡þêóÙ,˜`Ž4ÿÃu÷‘eñJ´ò#C~§;î†jvæeÁ<Ñ­)o;p"°½—Î2gt{öi¹õÛÒù×ÆVÊÂ#•œ‘1Ë*£vå†À\ºŠ¶šÉñHýþ ƒUÖDþãö4GgßÊG”¢Ä>à|ÀxÃÑ(IÏﺦkF”šB}ïÑ*¡Rßÿ©ÝíŸ5ŽþïY«ûsÁÓ{¸“¦Œ,@Ž[ÇîÏþ“F¯“jQh¬sBq®yveψĺøöJC® Ô>|3žÌ'Œ1ø}ÚѨèuIÏÒC%€*}3Z”ÉÏZôª<«´àLJ¸­éŠvÎ+ÁmÖ@^Ï œS´‰ÌÍ€z˜…Ðk uôÚ{R=„þ`ænIDMAPéøPÊôby¶|¾²Qú¥ÈA3Âèc&æ0øê#) š70¿::ý©Ó>T6r“²Î&+DÁ]û¢Ñ³F!ã Ž´ÌÁ©æ*¾ãXg£dWS3˽?šG“h¼7¦ètFGUÐO½‰x9u®i"øµ¾‹¦Ÿ¢úcÿßE8»)M™yvÔ€å´ÉŠœâM83¶ƒ9b£SÜ–pû^Ì°§ð=Åfµ£O¨>*è1ºÖÑd¥¤$zA,Z+CT•J%Zú2Lð]ïvÂ*'Dá·kQdÕݲC¨~r³qºV9(óшr<¢eþ¾>pæ>G– Œê‹0š Õ“5-–W‰eò¦çeæ‚r!Lõ…ƒ¥NíÓd?ÊUu@H¶Ù9>n÷sÃÆkÞiãYËo½l5Ïú-Ò*>!—N†k#]QW(綃}êKìRû*9ò@ÏÙÛKpÝ2UËÇìHt‡°ýtó®œÛÇÔ2/¸ïŒŽE¡ ßc,nearM©ƒÈÁvtÜ$Þ § ôhe=÷d)ô –@‘[@!·?5òó˜D´:;š®5 {X÷i.( À‰_[ô½|Q¾–ëç³— Zþäî.l%JX‰¨Šv›K–uz«åÒÅ9¶f‰,¢Í;kõ›Ø?}Æ¿ÖLâïË‚Ù¦Ä''VΗPÊm6½Mi«k¬u™YlVÖ0Õ¼«A`¨‡QÂ[ÛQ™ðm_Nµù©°Þ€K:¹óqÉ ˆ?ùš1ž£ŒõŽ¥|§÷t×±Š#ï”É×Ä  î?œÍ0B :!È7ëãà‘gÎKRÞ׿Ôø—ÀÖ^…1Î|±JCíÇÍ4ªˆgãx¸éë ò,G?"”Šv}4¡ð;‡gGâälÆ]ljÀƒC»™× serš÷åœòLi±¾¯ ad.­@SØ<¿ñ•q]=ýAúÅO™~™×n¿ÌûrNùl¿:ç”õ ²Ð„¢QÐd«®ÒŒ#}ˆ3v£–¢TV£ Lzଆ…$-ãmä ÏÄ“‘H¬y2”Su•êi‘H»$`ã2%ê…j…ïÉÆsÆaÎúšü=-b7û"³1Ê9áGL<ª•U>6é.‘þ6žÂ=Í× ¥ØSÍ)6-uS°â6 $Ù°vOª¬OÚXœ×²ji:«² xÒ°VïùCÕ†[Ê”Ç+}“”‹ù,&\K °½×Gx÷lDBŸßxû^ÑM?Ý+ÒgÜÕ³qŽØæl•hò.µSÔ˜=³V¬F÷àëÊ楌¬UHÝÍB»½³ŒôÌxÑ®B¾Æ–|Me/‘N6ˆìTìÃ\”ÿžuÓ6½¯Æ‘6@Ç-B³ò²L Êàm45í›Óéz¢ù?µºO:½–-ÁÅ—Z†T­V©.üx=±W9UKyíÃ×x³ûp4$)Qjð —CibH,IG• iÂE–Ãâã¨ÜÔ7îÖ‡<`Tv9(0 æWš‘†øºøMòº˜Û3(’rç5D#[¹Ng˜]cmR¯K)Ò±Ëï–Ì„*V¿[§P·™{ sO"WÉžD~‡Ê\WëÅ9q¯= ÷TÞ~2sN§ 2s:¶F~uCê kä_ÖÛ.'ÙÊמu3×F³/Ò¹œÈåòŠôbi½ôÜåŸ=‘ïz™Ó—S\ŠrRR÷ÖY“P.Ú¦wI[¯Ó<‹ â7;»ùlåLÓjh"pPJ_Õ÷i´´UY*’h9ÐÖŸˆq0½½%™rܵ)´—‚–³¯—¬^zIÁrÐKÅ蘇¢â‘Ó@ð/ƒÙyp©óþâ{ÊèìöY4ò§hù¤®®çÝÍ›¥åÐDm—ãš”“ýôì¥Ãå8÷ G_Æ'ý)\9L†áŽÚ†„ülaȶ)`Æ¹Ü ŠŽ”IÌàîÀÞñª)ë­«‘o®l©g‚Ûsapøç$ÄXúµ+¡„í›É kpãqÀƒµØ TMîC̤ºŸGòaW/Ãy‰æ3sJײŠ)ôHøI‚ÖŸ¢'¦ þC eÍf˜Ác@öúÃ[Èí;qn?'é#ú‰l¾ÇÐ}®hc LžZ;ä1…Ð{"šFñ»”¤…K(ç"eÎõUH6Æ NÂePbŒ%Šñý«»"÷¯åË©DFqg‰Ì\>ÙoãÀkµO~jd\½…UBDŒñ7¦c\¦7µ„4ÓÕê#tB’+wr—ÄÄ´¹Yî[¸—?‹ùBÆÉêÊÁ>}íÀÛ(é×s4 ã‹À¹Ôɨ>RV¡óôzŽ0¾á;‰Þ¬ªrL†£PêìüíÊ3åÈkõ¬jF™ùr\3»1 ÌÜMz½ ,Ð2 n„Õ eï°²'Ã[{¢Á,ïÉð–žÌ‹Å¦ú£Eª:|öéóR¾B_øîyÝLÜHSëÒ+¨€ÌÔ¬¤ûójÙÁ§,wØwïÖS·:Ž ѱ…¥Ñ~i°°jÏ11¼I¶HbÔEü¥±²‡#˜öâ #Ç„šŠÑ;§°Š0”ÜPÄvA  èÕC#+iðêo»ßïÙ“&—±WâÏxS¿#¥ë‘ÿ¬ÕGv…«W4”rÆK,{QÀÍØ:é·ŽWÙ+¶Kµ™qZ\)¸_:È­o/O˜DuPüžž½rzÖU„“a”Ò„gjUÁ_(¡uƒ”¬8·ò·6Tlt_´OÈÞGDø#z0¹íûÞ:JÍ”O5å_…Õ{µûÞå``;h9n÷8Æì,§ þaãˆ1¿Õx{x32öX,…+*ù¥UÅB:ýÓ|Ê%¾c{ëŽ ½EsÁ¡j$<Ù %™ÐZTvq¦Pó:E`îÃ`vM´Ÿ—/sY4>üJ¸œPÜZÜ—¨ÿDúA†¯Z~…. ãw´M"C½ üjöé§÷©¢ ~Î$ñÓÞSÓd_& {tãuzÞK•íkÇ£„âÜ_3K nÃ/ú¶5dQµ’é“^oé7´èœX”ŽyUŠ]Åó¡b.™™&Ñ-§dË5I:v÷âË3˜ ®âÙ­ÑßòÇø´¾|„ªÀy’ñV¬Óæh ‡Ä!##ÁR½ß_CÉMcM³{xà^I8£IhåÓ-B±a\ ú|_“Ń ÐXš( Rb‘Óåy8r¸tsΓ„ôj-Ý‹§‹2?cJßFAª)²ÅÞKûçáüù-Ý!„dýÆõS꽇¥˜.ÎG‚—áÒ´çb8`†jRŸ d'19î‚Ì&¡á¡í *s!Éìxs$Ÿ·5ÒÇVùЃ:x!Tÿb<7GöloD¨ÃÃtá>ÿgžuµ›š*ìEÅc,ÅY5ðf¾öSYìòƒ{ÿÚ}`-»ÉC§ÂŽ‘gËgFBTühÏÇô6§í£–¯ó,žÿÝÛ} e@9©fw «êcØ(AB‰ãFó¹ÿ~ ·0¼‘D$qƒ7Eo ˆã“Øh ´4Sç¥r~†”{nÛô+Û/3dôÍ`èì¬XŠÈ…’zçšÀ{é 8Ö’òÎ2&~)† ÅÏ<×éÎ1™‰¤_¿ŠGœÓ …,ñàmÍݯÚäÚLìÓ['÷6’èf „2Š†!/…»n5ý Öç׺NÁ–êÞdù ÇÈâ=‚óU/ü¡$c@¨W»ߤ[€c‹¯›GþQ§ù#½·ˆ”7¦žC×ÆÓ&”$b'™ÛA_¹Ùm}E"k+vóŽý}ye áxŸ¤‚§Y»YìÒdBy{ɇW;oÊNèøÀýå Zú·°ùJ–øÀøçáj2:¿Î@ñì$òÃ&9ZØÀcõ‘äɳ“q©såæ×É£p7bT~¬mè¸És4h1 †µVhAüÅ 7;{ˆœ»egM;ê-ˆk£Ð©ã8_ñ©&×5›”uÊvôÍÜ••L¤ð°Ÿ©”o(3á7Óê7S½<ÉrOa| +xß$y¤e — ?¡Ü °Z¥G[ñrÔ°Ëẽ©æø‰Ääôâa9;1kúIdç=EAhê‚B$ Ýd2í2:1Î_ö¶Õwá´ßj(b!—:øõÞp°b˜ì¥Ò‹‹`¨UcBã!é¬æ>åŸ:ôK®ÞTH’Tô'ƆÚò›Ëì{Ŭ\Ùx útËç…Z…B õ,l×µ¥ˆ€ŒÌsò+º±.– €Hà3Oœ:bñ¤Ê›'÷°— Ãâ—œBÏžûÏ8zÎ d9‚iŸŒ¸4•¦.3…ÊáɹKVbë7ÁÃÉ)ÿ0ÍóŸ#{Ö Sþ¿~ëÛ‡ýϹëï¬:ä+.Õ"e{ûÓ.Õ?z£.?ÌK)ÆrÚ‰„éx&Ö9àꕤwxUeP_bE1úß ]ƒÿM× >ÿÆ‹P]yË.¶e'fù))¬FUËÎNæv\ÿüü9ä—Ækµ¥Gœ*zS<³q:ŠAIHª—c;ÅË]\&Ñœæ¤Ä› K㣶3˜St²h®sHþ:u›‡"òØÒIóöµN8Cá(^à(džÄ\Ú”-PŒ§‰E°Ö¯}à¡(’ ó˜,ÉTº2¡Œ’·lñ=r(„õD9ñŠ‰ÊuèŸõú2f3OZO;Ý~&[0m$›P1½“z˜®Y”ÚÂd4ðp¼h÷ŸwÎú ¡X4 Wሳ6d—Ú,…½Ýɸ‡E"`~£dP*oŸÄ£4ߌìbånL›½©¬Ò´Bzª8¥´µMùž@Ôp3ñãÁ4F hý%³7ñ‚€ÈþЗžÎ"zÂœø×X;MÞ†34[LÐéšà°­‘H†CÓA¯„Ë”e‹® ²{$‚Ÿ00òA‹ìèÂbP3«Íh^ãèÍ$x ª$LÇd7 L¯àPs !Må7I¨+De•^P~›žÌ‹½÷bŠ)ÑHÏce–ÍnR«&ªYÚ±/Úp“@ϦáÌŽ0Œp³êì‹Pƒú© Î\TFô äUñH°…Ú­ËYÊÈ! A.«'(6¯*Ò÷%Z}±wã^&ß ÀLûh1•PÇÙ%mKo§+ë+²¹bÛv—6庚¨œ>¶q8R)é1ÌýçÛU”Üb. ­\6Ø¡…Yˆñä‚Éà†“¡&ÀÄEœ—JŸõ“ŽøóÑ¡ÿ¤}rè?Êâgquƒ0¼ÀóèH ÃXÛÀ££æߕ׿–`æ‹Gµƒ‰°©l\xrgÚ¾]‡[PŠ›pÛø4ž ðÄaš1£í&%³îŽ4qeö¡E¬êS®2­ÉQ E_LÈ7qÃp:ƒK~îd?"Ç€µá” ÞgÿqIM]=¦Û½\N_»#)SO6)xg½8=_–뙯p¹†”ðj/.¯R—¿“¢Zè Çq–wˆdœYvߧÍ.Ç·Ëb4Ú†w~û¨vU´ßϯè}ÿª‰y!œOã1}:>Æ÷ÈVL°xeÚ!–à<d3ì$€bª@<õ&ãÎûGôõ)Ò¨[ä†,ïŸ…ó£ ™›ÏJÙàÔ멤ñÞ»ºÆ‡=DŸ ¼`Æo(S];oòñ>i‘o:ÿš¶ÏÕä›L\V¼ðº§Vªž)lVˆŠ¾³>’º÷NWÄ/ïèK™Òé—ÕG‡7l¯§øÆïÏ‚A8lÑûÑuˆ:8XV6žÜš Y‡¿SÍ“gÎ-ÕüJÞ]=@’ ¬È œgÃc ƒŽM†ï”/¿rÚ×¹kVcRÇ?·\øó¹}iì9Ë€@ewlsWN%Ûìj~Àt?8ó+ |—ö7±é·šJ'Ó8mkôÛl¯aw?£²×šÑµoÜ[ÿJä‘SÐÒ¯ã5õþúóÿðŸËAõ»ÚÃÚÎöIßùð¾: âM'äÇÊŽÿP;ðçáÃûøïîwîÙÿÒ§»{ÿgwï»ðöÞ΃‡ÿgg÷Þýû÷þ÷¿j"e0úßÿ%îxÇÁÛ(¼mUÔ£“> ²ðÒËï8Ìâ$¾˜kyB èϳhÏ ¦e:‰âìì"aQ$@1Ð@cb¼uN?Š8³â](ëŠUÂa4báøg¿yzvÐ8>|x¿€¿6Jüª\øZ&Oæ`®í>BÂ{ï%‹™„ª Ê‘í}^£t ]H(qÍ6«ŒØbö§æÝ»{;;Èèa+DáÌ6Ø~Aq¥Pz:bU!•fL…-ânpS+ÔzgOckõö­Ÿ^ ö×Ó)ü…½nÌc¤Ãã)òÒ€›G#fÁ‡0m0Àc’ƒ#•™ü$^Ì¡)P„9Æ*iÔuÈþâ|÷^…:k†´ž"ñ ÍÐU=…Ë *8íÍ1Mæ•£nŒ@ïèódˆI*fá]’pQcÚ‡˜“P¿×…»µÝ=€¥ô¨·“Ù?¶OšGg‡-*°Q2¥'ê<ùGOü-hö`Ø£ Óox;¸:½¥‡q”p ßKq¢R¤Éгø fD}àÂç¿¢›/ý>ÁTŒ’9=\ ‡+ìbzÀJºÕáù¥?qÓÑoúalºŒáSÎãÙ„+ÜL|d4èa~3ê¨D\ îåÀ‡mbAú@¿9ª"ËÒ¹ó@ï΂×ãä=@ç— •>ûHÚ|ÝB~îˉ«…Бj6|= é7¾¤á¡P¨QýÂW¥Á ìÁßt°éÀ_ïƒY2j»ÚVDzڦճ–¾Ý¯€Ðjwºþi‡~ö8šæI§ïYDrÙÀÿB‹ÃÆ‘Õ;Mxé7»}4 8ë¶|ÚµN»­&FlÛت ¼í§1ü‹Ãß¾Þÿnã½F IsŠ˜ PÒ[²À¢‡²ìÍæŒö®Çaª£1«5 Ì`FÖö Š?­ªª³²ÀèóÅ„I\8,\DÜŠ)ú;šX8ôN .È Ž!%™Þ0VºVÌâ$⨣0xJ roÅ® k¸F¼?þ7­ >½N…ÂF w™ö^òš¶%ŽGI4^‹aük8 ø³v•÷åj§Ø|¹äÜ|]æC@MS’ÿiJ¨Á†îgß`rBIYúX^ Ð3À}ûžŒºðiíÍåmÃNÙçbºTÁœ×ýÔDy\¥…}‰Ÿ5\ (—`ñÙY»h uE"S,Þ šÊ3þF”¾!:u$¶ºdÑGQÚÆvâËb 7Ê–q[ôV»\D²ÙªØX\…O¬®R1è,”’^û` ØÚ —Ýy&…¯ïçð¯™#MxÛ³þ~ @¦>·À2êvÞPAgÃágkñџƸ7²Óïc@ÈW©a…É~NÕÙ`}x0å3:Û3:È0É3¯z§›Û RMx¿=d•…æ+ăå°÷G­`]Ògüë<$fæð/¼n²s¹|v½ô2Éú߶—(†þþîÃ{»Ï˾­þ´¶,BuïÛ'ß¹¨G…ÿöÕ%>î|5ˆ§7æ…gŠ úî¥Jæä¨Ê\7óÞ³ëáZ0)Eñ,qËyåL†)‰÷`¥œ ?LQÎG„ªáÕÄY4ЊÁŠd¤’„–“š‘L=@[¨ùo<É §ô¢„Pt5J±éŽ}3"\—•ýÅÛÈnÐm/gÝ‘mvñ†„[VÉ\æÁÌûðþâ7Ï¡Tkðºvù[½ð¿œÿÏ!"k¼œÿß{¸÷]†ÿßÙ»ÿÿÿŸø³½Uð¶à¶˜Þ̢˫¹W‚KØâ*òÆhýô<¼…óyõÎ2|MTðOjmmK•$QÃÙ{$O=‚×ÞîyÇ $*Gü>ív~j¶½F+dÿã5žô:GgýÖÑÏÞIÇ{Ñèv'ýŸ½ÖK {½Ö!Bêt½öñéQ»uˆ-žüŒ¦`£ïýÜ9ëz'^·ÝûQµ|΀!L([;À.gÁD2’ÕÓÌcÌ*Ôš§`]Jf;¹ñ¦‹Üþa…Â~c”if¦9u3°[3¤ÌQSɾHéTLלꦪŒ‡Ñ'ÌmOÂñ˜VÌ9@¡.FÊ?örŸUˆJm6Ρ©=„ñÔ\ŒjÞúƒ»F:.v:Ø?Ÿ{ç«N‘öÆÛºU¸ÔÖ´¬ôüæ]Þ¾£ÄÃÚäK¥,;ø Rônt'œs@+Ý>%5€Y+A3A=R»¶U3ž –yû}[½‰=v¾ÅLŠ>’!%»b*E)0©óeL-öüÉѽö?è¿YxïÊnøéøv÷õiKªb×­·©y3Ôn8Àhá‚&sR‹™œÞ!ÁlÜà>Ñö~ÖNÁ-ÁûãEH¾'âUOÚd8ËÚeíý‘³=TWÙKvE¤“ý íÞwÙû£ß>ùÙÚmµŽÚ½~¯îݽe”ü8£WÑwaýî’-KÕ*8w£u,&%YXD&OŒMØí¬(¤º Èm¥j9ùÃ-Ðmðø¶ÑÄ‘l¼ÏTrçŠÍsrÅRgLd5äTÖJ¤æwè¢ÈÀjgH"±ÏI¼]]$m0 öQ:@ݳæ?üÞÙéi§Û·,‘ 3;”YµÕívºþÓ£e cÜåÚY¾\ËkGk·l íB9+åÎ鶚í§í¦òò¨&‹5Ïû^–CåM8âGà÷UºvìÉg¼X‹dbI¤˜$> yG,¿ @Á„.&F~£î§yDãhÛNôÖÀ Qtdn(JŸ“ƒ2toìyY !&·$ß2²'SÝcKÏó?Y Ä˜wNÉÊÍä¼/1 qô×ê;5xÚBd*Ÿ ”Š…Qr†xC¥é’8b.–†ìíhjÆÒBÛèì9]$iIrMß—ý+1hÖÅÆÁ0ÔîdSŵ@Ž]»M·ÐHF@¡:¯¢›k¡í?ïÁôc©l9”} ¤t«Ù/¥©1#±ŽÆ'í[w[|ãøóµë†#ßA³!_ØÒ¿ômj-Ò“žÉí#†OÉÜ·"Bj‡P<,}Ýs1oz°Úò׳û»bïLf:Ǩ7‰@°Ää9)–3ÖO–CXö¦úÕn4íÖ(hJWðlŸf/8¶Áª>òÌe ˆŸY{r«–y)wí)¼“Ž,šEÜìËÁ¯ø|ØÙ,PÎ-C>\;tÅP¨Næg8&ãS K pL6e•«8FÉ°áÄ(ÉhúÊ8áÒDÍ­^LïF zâkth©dsÀY…ÉmFzX„ÁUÄ”©r’¡`ÂLL-“nåæLÞ„ú"´/@&ÝV’[yè„ðu|³FykL,QÙ­Ý>H“,š\ƒÇ”;Ï< Gžº \£nØ´oeÙ…#ð@UóÚ ëA袘 :ÊßñèÛxÜxÙyòz´Ù¼åÓòvåiy›&)LE DÑxß‹6ôå%Qgñ£—+NM‘•!cÓ'ñíòOEbŸÚµø­.`™9ß²ò[r6VEI2ņOЪճÏîèÆxîÛ“ž˜ô‰ëæ†Pw.ÇŽª ‰â‰$mé‰vù“B©J Aݲý¨’&ªôµÖöò-ÙJ5«®ZØ@æWñ9²4kjL>ó\%Ó[+ë'kͤ§_Û"ˆ4%K›_g…ú»áŽYò 1ƒléCf”ć¾ÍŽàªˆG1^ž-&š¾ASP G¤‹L=:ÉáwÁègp Äs@n’S† ©}Dè4@{æ Ëôù“*"þdÈ£¿´¨‚·Ùì×¹åœIsÎVÞ:9B¢%k”$å­tåÏÞVaIäT&u¯S"s¾ñdKYuü`Òº³“ÃÖ¡vê?ë6€×hõ¸?, ÄäèS™žd†¬h8+Œ©Kê–+cûiÌ;î=lw1Ú¢j~°·è>}ë®ê Y&V@›ò~1‚÷wâ±>×½fß3ò!ž2^ueå–ÍØû¨óŒe¦½ÜhÅòüf´¨xßh_XÀñßL‘R ÿų¦wG¢;Öˆ¥b¦¤"‰8תF÷çðp÷ ìa…˜ʾmgccV»*"*Aš Ññ•å¢ÌfQ8+•UnfíyÃ?P¨ ×$É‹‘ÙüZMæ7nRVåaM$EòÃ|ŽI3‹ooD×ê†~¼XL†9ØM‘µªœ¼…@`1%³4rÎ4ô®RÃ*P蜢å2¸!ØŽ)3 Z‹ïI¿[Ô,ˆB·èÝ–°ÉŸÕùÑNQ!s㉖ r}’$ “7 ¶”ºÁ }Ÿ_-æ’¡å),!Û`Zq/ŠSé™Ò½ÍÄš+dÒ#MJw29.þ„=Þ%$§Õ+êH˜(c£Ð*yèÍñ. ªÍ3‚ŽŸ¤Ÿ pÕiAMpò _QIŽ Ú§á3§Ë›œä1CM\z¼$ƒäf2¸šÅ“x‘`tË€|o¼)ì( ly?ÚØEë¦wzÃÞx%QÝ“Ïì„7jàñÞP€ÊJÞ C‹.à6› %†qÀ‚lín=¡4ÁÄrR‘l>k®D®üÞØ`Ú(ì òÚ¥nX&µÐò ÉZôÒ{{€2¿hY l0çú5Q–¼0H"œ°s|~¯Â!™}kõŠÏŠ¶““_"SHdž=âi@r~GÁ';"G¬ µ“í„Ù²F­/*gÀì`º!äG‰…mσI´WPC[?¾¸HB+¢+;Ìbd‚ºÊb÷QåÉS/bbŠ°0`³ŠÌÄz§=žSùÞ§èO3iïÔgÍš1“Y$2ŒP‘spìJV±E„Ÿ8ý×ÂñjBµœKƒ:›h^žòÆ+6Òèφ0 ÎkceaèM]µ!"P¼þè&-›[qœ×å4›â Óe4Öº½IÛcŸE‰¶ƒ+á@I·cè:¢–õܧ©;CÙ `öíþÉý{Kk$µ5c)i Íe˜Ì›-@²7>éž ¶’J.¯M¥Û"ÔLE>¹º]éÉ>‡H”–‘œZ]*½>‹ ¼emWû=—ª¯h}KKTbû[š¯²à)™8 †¥éEÑò5|[‡@M v±¶Ì9¶/\ŸÂ7–ÌR(½Ç”Éâ|> %®Çãvä€Òaú#”ïb°xýŠ.f ‡#ºÞ“Üæ¶#÷¾´ß/£¿h¬³­Œ»˜E£q•]SßIµt¯è²—‰;ctpØêd½@†ÿ&Äb:Dá¹£Ý5(;™ÇìÜ¡ÚËÓ;vY_G€*h¦ ¿A5ÄdH´¥œ-¦Æ¡8 Êú—i†LÒ]6h• /²—•@}_Œ'ËÜ¢Âó@µ)z’VwÉýD-‡Jþ ]l3 Õp¾F@ñÖþàÙW¶°ÄÓ˜ÖUD³Šl¤¾QD¦E²Ü«¼äxD¤?ìRv…ºC@,“’ì<¦Å´¦,5WŽh<Å-°C”Í i˜ ¨q2—²xC®™ýh¶ßÜå¦,P<LüE‰æ:l*PsIì &p”4\@hüt‘5\ ÃxŒ¾$0[†i)êüÉ8 ù.ô_h># Rì¯RZk_f— V¾Ë}ËÄ€E´@ÆÞ ›±ëŽÉ%­5'¥±æ˨c ieŸ(šË‹(ä¸cñ0U)â8š¼x«épü¸Lìëòv‚.W¨0e–‰q$éq]s“!EUƒã7#tL‘Ò†ÑûhˆŸdˆzyµš¶fx®J„üÀË° Œ ϲzŽkú®ž§vý, Þêït̃´þ®žcÃòÎ{”kUÄÊM$<)½K ûnQ.Xé¯ÐÂNŽÒØêhZXO¥ô[ÝÕU5ݵ•ˆŸ\Ã=GgQ.8y‡ê&›;[åMŽZ âÁþF–÷«‰£ö%Z‡Í’Ù7Db9™´¬-ãl›Ýµ¿Hõ«;ª§óÛiõQz/-Ë x»ú7~z äd}M'Cu™Y@ ”£¾å؃B¿|÷ÿTûÿa8Åíÿï2ÿîÁƒ%öÿîì>dû´9ßAûÿû{ÿ²ÿÿøÿímŸG“í䊌£hxUåèäØÇ+ÿ"Š|’p2 Èˆ ð^\3Q $q¡?ØÛÙ½WÝyP½·SÛù®îÝñÎúMöOÓͲ·ûý÷ßW¡è}ï)Ò= )®!?EƒÈ€¥ªíÉ ¦½T¯"–ƒ{‰Ô¨K@M$›,ëúˆB lFeK|”ûÏ)$óe@õµ)쳓3ïg/óN9/ÓQ4f©rÎÔD™dÏoÄqrYŸëJ²)“áíUPY^‚ëˆbaÆ'ªŒþW@Ⴙ)š;R3 våËbjäóÀ®\,F€€4¹ µŠÎÊÇ¢®Uhå'1@ÒC_"gQoyÜê6ŸCÆ“öQ»ÿ3vÿi»Òêõ¼§.pb§ @Ùͳ£F×;=ëžvz- ÀzÌF@ýsyA«é³Ð}a”ІÕA#…ÇEET„9~vÙ¸u‰p2)ôœø4˜DÚóYDÎ&ýÃÕ|>ÝßÞ¾¾¾®]Nµxv¹=bÉö#êLƒBG à š ? BŽë%íò>TâÆeö  -†»#N“‘Z_ZDm[‹BÙb!‘!ùXi7?JÐXÌc,E±UI@¬´YjwËM0­Žî ‚v<5Šu² Úßœ&>ªÉÃùèÀ;R䃑êÇNŒÂp¸`!;£è}àýã?‡ƒAm1‰ÁxZ;Ÿá„’Údcú·ÿæ&ÓLáà*öŠ;ûÞI¬‚I |ûͯZ½ GÓM³Y0ãlÌÒ˜¢·ûèÛ=óF,¶luü§zå}ÄÚ[Ü ð­Þ?¼nužÎ’à2Ü׸î7ñÈá{ƒîJϺcïU£û¬÷¦Pè.&ê]ÏÃwŠÛgyAZ’%²Â0­œÐ“ F†zctÖÁ?‡ *2€@ìE1f%ýéñoÚYÄÁšl:ÝÄ*6;Þ1™Ï”Ûf~¥ÃÖéa»Ë•täɪ‡¼þœÏ¯lASƒ wP‰Ä‚óñT—í‡càUQ°§Êá–¤äu\!3¯aSÌ §LÈV½#e'œ“Ò èI\†yï†ÄŸ/.Iôü¨p†0ˆÍcA°Sq—èMµñwkS½§Mõ~ËÞ»j#m8_1B˜äœýLŒÊÍ”"„xš°Å—"æi0¿bõ[‚Ø}³ŠW†Þ>p\Ü&œ“x®õ&tkdÁ›¯‡PÝPì&„a¡' ‘°gàmnoRž`À%†‘Nx¨V@¶ ÚðÉ°Ä´sÔ‘ß*c?~‘ã¾[ô0ŠÿЫ†ÞfòqûÕ¿¶ßlm|Üþ¸ùK]q%R…žiâ>ÙSÇ}ªˆÑ(èù9´HÉÃn™¿ÜɃ¹Ãú›<üéŒ_,ëú¿j[Û?nòÓöëÚ«Õ`$ÛÛ›¿péÊ1ûV¶7FßÁìFìP!&„çÊAPb6›8¸x•“È/xºmtà ãñ:u™,SíÜW°B=)c=mµÓQ\„;æ*„ß<>õÕ•©àI¸CߊÀÌ7¤@‘‡û4`-`Ë#F'[èd^ëOi3´.3‚¾ä]åêG¶®‹Ñ(B´]2ƒ>6qÐ粿V¢¼aîK{é!К8­W.¸ȸ[‚jPà|gí*ºڰ<î«0+¦oÅ:©ÎiSßaÏŠ•×+¸Ð¼Í‹8®ÅûVkµ+BÁXë(Žë˜¢v£Ž*æx„¿.8 Éó®B”’ÆRÁó6ß»å+ž‘ Ùw#(VW¶ëìË[€ìf›" Ql2¬JØvT,ÂqMòÃÊi)&8-pD6Fñu8{³µ_Q½¬½ÜYÓC–T}µ1ν7[¨Jg¯²QÙ¯læ‚ùänT’­Ž3ëT°,ü²s¹D¼Ç4½ˆ];àíÁæW›Tb^Ó*[Ÿ'£ƒÍ~mªwÉb7Ÿ‡jÞÈ–©ŽæÀŠòPB-$!˽"É#äK­°48;h{ÞþÇGÇ'ÓÿÛíõÏ~zñòçhæ‚óÔ½¼Š~};Oâé»Y2_¼¿þpó[aÔÝ<9ØÙÝ»wÿÁÃïþö}!M¯‚ƒß ö§ß ÌÞê¿ñ¼"YRÄÄ,æ-S(©—¼ÚæD8è¾÷“¾Ë¸vE-¸ai¤Ükà¬kú©¿,Fm²¹S¤“Åùöy0«Åžý€bvrÄw5€ŸÐ—Ó¸VE‡¡Ë¯ªBÿ2ïc7'\¯þõú5]_›¿3ÁT%hŸ6·¿ýXO>¾®½.ѵðº¼ñ±vúz_ž  øn¼O³ ¡Eó U[Tnºh ÌíZÿõî6Â)ämkÜtPI¹!a€-‹~+z­p9 RÞ0H®Æôô—ãô'äBÁ¨‡L:Øœƒ>± É6`±©ô7.9Œ@Aëßqˆé3~ É5ŸkðµFR|ÒP3ÂßžG—LLœ‡°ùð$ÍÅ[EuÖÆ÷Éü‡M¢H;çP@pkn ‚ p}[Ô³€ i^ò Þ Eäù ¬!Jê:¦…ønù ?ŒÖpÛOŽ½æ6F#jÊqH°Äö‡Q“sŸ°ã«¼i ±esúöIy‡ÇÊá1©TŸæ:¯V¯€ O÷Ê…;wŽw¤]!GJæðÙ„;(ATø®jxÀ¬~Ä;…qÿ9¸ùšQÍ>_3ˆ#1R>&1t·vŸÀŒ! gæøþ#,BÔ „q#/.ÐKm $Ô8³C VHÜø¤wè þö=9{Oç™^0¶•÷ ÌVZׄéÔY_È€°Ž^Á 9† þUxƒõ9¢bd†¼W#ašÍfvô<Œ¯QGKv C°TÅ«’L+ÄxZ„È)ŠÅû³àöüųù¨‰!Êš0è3.t,Òd/á•b0«ƒ2¹c^LЖ³¸ñˆÂã¾u]«éÆéu®Gx8EOØN`:Ó€Üĉez]Ìa‡SIç͆êë©F„!nÍ$ P§f_yUX‹EÈ'L•$«0% 4êûÌH¬Ð]Üó´åÓÙÌ?bNŸ'1Œ‰Ð°z¯öÁ{Ölê;,¡}xN-Ñ §*^œº€Xº?ÑÇ[åh‚«°i¾ƒéüB„bHD,jk'¿!Ç#Ò”©Z_[w#/0ˆí á24a¶Ž± ¢peM˜…› ß«2H1Œ¦_Q00ü9y“ Ö>­ß…ó„ç] ¤p)¢á:Ü´|T¥§ ˆ‡–Û¸¨Ìa„B”çÛ(Ç€-HdqNñÈ–bq9º©q½Úqg ~ÃX›'“Šk¦ÃÌz•yh §ªurØ:i¶[=¿sÖ?=ëç'¿S;D€ó4¾‚Óu|\!Û* bJ@œMÊ"„È@°7e •Ä”¼b¬ÂÁl1騑s¤z, æBŒ}6¡› ±×x0g$;€N°HK.Ï“‰²÷ÑT×üc •H¿4k"Ý€c0áy‡e‡oGE¶Í´í°¢Îc˜ÓŠ®‘:°þqW%mvÕfI¼}ïõëbšÓåÐ|b—]%·h̨ƒœ+;è&Þa§'.D㎡Ñp½ F#,àÑ×ö¿^ýk8qoÛÛÞô^ î>mnó¸ùfÿõ¶].ÅŸ{œß‰lª¦QÈ×Ú8¸D×zdbX*Tyƒ§ÒÄ(-u`\¡ž— §«³êÈž³B^í”>ÑM(ÁFÅ=â7l˜0'B¼`«fB̾ƒž%__å#; ÏÑÈÐ]æ@ãJžíbŽgʬ@´€ÏåkÉ_Á Êgã¨À!a…æáÎ$"@âž/}|h¦zb=«c´c] äè%Ó`*“Q:”û(_îLÄ<¤0äw,"€*ð¡Drˆrk²5ÿp¨ŠþLÅ‹d´ŽÐ)ôjªù|6¤eñ¨jÅ\A°/¢"%üé´ÑN=‰-!œm@6 qx#H×Úˆ¼™àÛë쥷»SÛÛ¡/iuDðǾ¨ZL‹@Ж'×óž Ç8"&jnÎB¼„”·ïu0rÊA¦Z¢ÿ ^dæmÂÿŠ“QF.&í£}_¿F3=mÿkc{¸É"³µ-Á ?²”l{Ÿ>gall{ûâQ }ä£'¤-®Èæ鎊{’ j!c*"ó(~õÜâÑ1mÞœ…*Þõì-nsF/qÌosÑƘëdL¬UQºj‰ôÜ:+:`–ɲ}"Ûº’y’rcB¢fÄD<€ä2*[蹸!4;ò07abáh¦ÛÃÀFÕ•e‚C!=¥Xfæ“ÿî†[ÅÑ8_7äï S BäC7&¾ž‰:·µ«.ÚESôo² þazˆ×òJ6#Öc kÎöüç¡Œhq‘&‚;"¤AI ðVJ$Hbõèínû%½¹&@|§ äu¤Î˜1ó{ˆ6†V$[-¢M¼Òýï*žâXÛÃ*Þßv¿ßC¬!o(¤ØˆSa—…㤖ëÇLu®B|&¥„dÞ¼³üѦB]!gTIOïØ—‚e™ú"…#Pzï+4‘lß©m9HÃnZ>ÃÆVe–™ö£œÕ·ˆ TVXA‰•šŠ]s¯¯ãÈ’Û·(•tÿoþ¯B‡Àôü/LJAô¡¬ Æ&»MæmæI1ùÒL2|Õg*j¡H’6 ’ÑÐJªR±-a8ŒÎèL%ò%ÊÕÁ·¼6‰ýÒt>udS)’6eÎxæbe*­[]éÅ4uDÚT£"O îx?‰éÖCžWk=>l?¼R?šÜÀ‰S'­Ì–[”aÇÛdÁÕSÕÜ|¤•9áNíûÚÞC$IbÉË_}f½ 9;Œâ)ÝNÒ³ŒÅÞÕ&€nxÃËÊ«ddFZùWY¨Íg ¹üHøI>5öaºmP:›K„ÅNñ#Vò]R‡qÌþÖ×Ê’íø8JË¢Äày›Ñ1äæëM¢"Jª~Gš%]:Ò(ªøbà>^ñ£Ó'f{làl)‘Fû‰GÆ‹D!Ðý¥ jµšAÉpê=<­"¬8¡ábYPm„@t4‡ht0¦ uWlóF";žo@“CQöñ¼Ðà0"ô,‡Œ+Ç–UÈ°a/æ˜ÅGæûÔÿÈ*ÛÞ ,³&Q‘QÕó8˜èÊÈi›67æ+“cÈ3ŽŸ¶ä–ì ½QßJJ^vÆJìý&aÙ¸oh¯qF¶wÍ£ô¶áåAsp:Çä-O ŠÉ¥áXh‰ tZqÊœ ïÝ[’pÁv±xÉM4‡¾¡ÒÕ@õ‚¢+c‹)ì`CÅÔ{6€PC@oZößx;z»Þž·{ÏÛ}OÀåÏ1ÏùÁîÎÞ‰êMAEiçK2òª—s¼!‡Ê„nŒÀY:Gò\ÊVaÏWÉÐP\¹`Qõ§èí=Úrk{²¬W3‡Jx $çÞ¼­I9uÁ+8}¥3.“X™j…2«±D¬ ÕT õÆ7x†ˆU{B›÷.²«Ã:9Áq„Ž´:>03§ÄŸ 7UoFDð‘ÞÑQ"‰o‘vœ;#໘#ø',·æM~¼P1Ûx©Xü8æ‡÷‰¯“š–“Â0Cåü»åGÃ\‘Ž-'ºr"žäÛeEò" ¤÷Y2¡u„B\ð‹>_ÀZÆð+ñ±±Ã!±¤÷1á]3mÀÄmîU6~OGxüámmog_{¯_£ä<ûåæé·S÷ŧÍ[¸Ö/“®g„Ägx jêó¹J ªÙ0ˆõ—å€\ò»åÂÙŠšä*±ˆìÌt3.g >þ %Ù^¶ÆÛÝpˆÿÃÚn…ó¦½óš€"zXÛ«>ع/1"ÑÛD8®T I©øŠŠóe2‚ý5QBÇÌ Ü_†AŒtn0t`‡Ã/Ã/ë!˜;Þ‘<…jͯ˜ëô0ÚÁtOòÀG¡àùD)»ðv´˜a›Õvæ%©`’ðÊ(R@bE7©É#Ù½ðTb¼!b#Êt Ù¨sò¦åŒÌ\|–Ñ*!œ §e^Êë·e6bN*OrNœ‹ qD¨ëD.ƒqlT˜ºö –ŸÄ‘Š3C¢åªÔGn- w`‚È2fkP[Ö±¯úÏËÄõÁ­‰TÅmò6ÄxNµ[uCÕNιI«/ÿŒ;)_1,¤82¾Hþ¿¯Ád‚ì|ÚqOežÒAô”žPy&ߢù ãñ5í.àL]·ÙO19 •¶ßØkî–L•2{öºU— Ï/Eoßͱ}7»Kâ`Ù}o3S÷‚™ Í¢¥9¨yÍ°ÇÉ@®1Ëȉtö`Í­í?€ë*îB‹‹€Üoëe‘ï°¬‰PÔŒ–ÕV0,Æè:‡­F:\!a[LÉNÎ(„À×,ÒÖÎãXlì—(BVù^8lI¼'#V£³N]h›;3:bs¶ä;>”Õ¦Ži¾ª —ra{ɶPòümŠÇ”lo¿Þ¥”VÛ¯_o£+Å6"åiˆ¥Þ†v¶@. Mx« ůa€Û¡ŽU :CÝ,¢Ócqóõ.ìí)|¨‰þáï‘ö¼°!M׶tqJÅ¡ÎÐeS”}¡òOäêB/¸$mRÓ…“¡ò(Ò[f%'©aþ—ÛHÜ™ÄH62ÅhEì~˜1VP&ÁˆD}Š¢²î1AB‰DÉXœôâ&ÁØ–W÷ ­8ÈŒ³_…>.Ê:œfeÌFS†RÞB Ê òY³AÌ3Ë—57Ž3"!¸YÔò^34&!I5ÖjÉuȃË*É.Š5O#Ê=*”bm½;À_¢ïý×ÞæËj•Ü}d ›–°|0 Ž8P½â{T÷iÈ|Á©D¿·ŸöŠ$“^ÃÝ$.gÚ󔇈]QbKËó4±ë9þ% ¤¸¥Ð  ží«œûè’·\ýŽe2X’©µÒDî‹81þMBŠjŽˆu¹¢]ßñ&ë¬ e*‚×ÆœnÖ 9îõp7FlUAè» @D+˜`¨oø*Ím6ÙFQÑ“|Åë’‡®~ü—òõ¯}þ…’5–®©OµÐñc1‡:ȹ™)ªÌ¿I¨è ÿ4ÁâŸb[ü'ÚÛî¬éÛ®¹"ò<ùV w÷V‚‚žv‹Â|$ãXNæ1¾œPz@ÙÅ€ð‚ñù(‹ôÅÝ0ÄœRY4ga â¥ø`Ävÿ»óÒ3].˜¯’µã]ÎÄËQUènÛ«X¬;HMÁ…aeœä4UŒF÷é‘{¦'Æt£ G‡#Žœä€§pïáÖÇj{5 •ªîÀÄ01´@bk@´Ÿ™&Š…²l£ý‡ÍÅëjñÑB‚ÃBV î±Á°Q0K8äÉ™Œ~—¹Þ*¢Ò²5ÖÄU5*Ε‘¯}Pà'Ÿ£åd‚¨p$ŠÜ®aÔ@1âáôaÝøý¸ñc‹}ɪfÈŸà2$€ÒPÈiÞãâ2 TjèÅm|:L”[MN†ëêAÐNb NÂ>6—áqŒV7r…b¸%èµ3çË ñfm1Üxc¤gŒ #û¼.)®kkÿuùãëÝŶ˲—i·²7Ü\‚éëà?‰þݧÚ9ÉݦÓÿ&ºö/*öËb·–»Ï&²ïx¯vªß¿¡¿¶¼"†C)b8”"p¾^²¿ï—¼?5ÿžñP„ê¤÷þ<‚.7à¼ßØßß\L\C€“KI¦Êä‰#øT¢NØÛÞ®“gƒ~|6!fE´øëüÝvþn;f)’å´bõÙ¸ø±¸MWŸEôÿ®þ³¿áoKÝ=Œæµ6ý”>Ï«OôZ°\ DcË0JÇOBY×-§‘Îâë]<‡KÄfÖ)\"ð£»íï›×¯½o.Õe(&Ô9G0‡ýÌ•²q¡µŽõ:¾Þ}½Ÿ×Öj1Üÿ¤pØUezÔ.Ç÷´y¦Ï&˜cb¢‰M(7b˜•“Þì`°«#Êð“‰Ëz‡PÜ>›DWyX´®F¤~'úkßÛƒwáû`´ï•‚á°zSãmæ«R4/|‘x›hWc<ÅÈÏæ©JîJû@z:´‹n!¶³†RßìßT¿ÙÙã_Ãüõœ…0Lì7g‘Z= RÃÈÛqá±.]6“oº˜Mc àŽßGC±Îf½ÁÑ@›Õ`pÀ<åò“™rHj§«ò Hh kÁMV\x*‰S;v]ú\A`kvƒÒùfrÈë APº²X%½ëP›Q ìÞ Iæ³±è<ÉÓYô>˜‡ÛÃóK<H¢dZû+ö'R‘ÕïH=ôWˆ—Wl+Š7è|A]FNvÜŸÚCf‹”Š²NÍ%U´ä"ÔdÔ ¤a#­õ”ôtR}Ö¬Îâs`>Ê0˜&-³zŽIÖ‡ † ´•g¸VGÞe0;.C+›¯Ú] ÆŸEœ1ÎJÝ<œÅSÚØïj8¼TÑ5'0§Ó"˜+˜\Œ5 /g¡øŠ)³„`›d¶Jq1%!B  ¬’¿¡=@áæCS Àþ (Ê7º~`Ѷ *¤\8º ée.L°uÌñYFað¶"ù~äç‡Ã`¡ iU>ƒÁ°2ñ59‰èÊ5µe(Š ý'æ˜Kóô9¼ç¤Mðá¥ß>ñ¼Ý6í8øc3Cì‰GêyôIéùÃbs4¬]=RÍz_«¼P‡OžùÏ»=LTFƲÔ8j?;9nô‘ lžžú/:ÝÃÞ?·ÿVÆ@ ]÷ì¤ýÒ?jÿØ¢Táw8ž¶˜%Û™´!´âŠÓ#æLFÔé*ñ¢gÄ-£Ót›!*/:ìi~åÃi›ÎgœuM%ûe' 6d…¸@ã5,ŠÛg¢Ý tÊÇwÀ8==j<ó©VìôÝêòyщ¦YËïóÆ^#±CkQFΘû‰J%½`ë³ Hö{ãÄ„294šY…ëP$½:ŽÍ‹ k k @9³…Z&Ôƒ(pãÅ̤‚4SŸ8I¯CŠ4EŸÓ} gD•ÓP%ó¦ýSGC¯0…ùÍ4ăÄ#±Æ&yXÉ⃒XOø}wò‰pBï*–± àãDyu¢Ê…·q*¢“­Q!ÑÚgÆóôæÂP¢èÂÍÑ%MV0l·ÕoØŦÕ `ÌÏÛo†®¦ä€Å«RÏ&‚Ìé5ß|7 [Jy¯?§·W!Þ„þåÀŸÄõ¼yãÇe8=#bÌ ÓäJ0ƒ ±…ŠæË;g/ +’)æöáD5èÊ`½×›…ø§>K@ Í4òaÉ¥—ŸéÓEj »ÍhnnmÖ\ OBeõUøx’2`6fñ1ô‡6&ëY OMÆ3Ë@ 1É YÃXYåñ‚q…¬ü¹P70P°7+zÅ ôQÿŒÍ;ŧcÇãÏÝ"G1FxŸ{Ó÷jF„Ðbbv4_®¤Ì"²“¿ä÷U‘¨ÜwÏa8%f¶ûCÅb-Ó×ÂsÔž·ÚÏž÷ý³“O|.•¬a”KÕ½r9§tûħÌ0˜ô)]c—2xsºLÂ3¯øV§üKÖ"žÜù:5׎ƒœ4 ª«+„¥U*1|(!Ä8KéDÅÕ k·åáu2ß&1“‹Ab%ªÅ4¨µUÛä“5ö:Ýÿ Ρ‹7 ìM¾þñ³“¿´w¥l^èROâ)ì 4—üÊ’bUÄl×xksº ÎH€–¸_pçàÂÑÒ:|Öò{ýîY³ßâ ÿÐD5Ø÷ê–þí3凉* ½~£ßnRþKÀ‚ß*DL¸ØmÝ‚áõ­$_ ‹aÑ!­Äm7€ʦ°«µ%3‘3Èà}|ëͺݷ6²Ù01&,•4Ê8„ÏïþÒ›zNÿq—YݧŒîœ“²îx^jU.Ñìò–lÀåg­¾Ü:.-A·svrxvêŸ6žµ0ß«ß~ê7NK¹­ðô áßÂøÂêW¹,IMqt'gGGy”¦O:Ý~©Øžá ¢ÔÚœRœœCÔÑLŠ64°fþ<öãÅÌ碥á¾rªÊòáäŽ~+g$œñY-0+齘Y)\oÎíeKórö³Ô¨>ò Vvß™MŸ“’š;¸ä°?:X‚VªÞ®ê¾¬Ã‰J+{cä:y×¹+±¼1ù ­ù-æ¶PÔó'}Nïç»Ë:}÷.TýDØúPVLŒ‘DPª‘$ñ ¢œE%µB¡ˆ æàÛçÑ^;•}Ú~GØ7åDÂÌCñn /²@eOÊÙ/iÅìË6EΞ˜ªè3Ù}¡I4N¦Œ¹’™ÀÄäAå7¿ªÚ´ˆËÂd ÞRøX¬#àH8b¸ýx¾U¸ »PËð– ÙÍ0¨êaX¼Å”Q–v©å²©:p:R9#ï¤Õ:ì¡ ²Ûù©…ƒÚ·hû¤Ýo7Ž¢i×¾B™V é> ÑGƺ@¥âî¬)9e&¾UŠ 8oºH®ì"Œ±T®s<¼.8³éfÕQÅÂÙ.A“&uN—^9sUð¾ð¾ —o¿XÝ õ¼þ«‹OÖLßy™A¦[WÐV]™–*«ú¼f“ŸÈ)J¯†ÚlHdÚ«/[²­oO}Ì­iÏÉ­ý§NZnwþŒ‰““;ZÀ¶HK˜¡>ivN.eûá­Õ=÷¸-íNΤ¯\Æ2£{EÓ†OWįŸ¬û;§5<Ö.©”’kî{Ñ´€¿õp¨ò¾sAÃý|!Þ‚Y Ëþ/êLû¯œYº{÷¾•·Á.9ç4ŸË‘›Â¢u1Ô)E„½ÈûÁ]…ºw÷n´ËQ¢78%Ó²¢'€Ìh¥HŒ§£^‹úkŸµOZ‚‚ãi^')é}¿ß~ü¬×:ä>W«nÏ t ½^ –à–i’.RÔ…„ǯóÜòÌ?íwKÐÿ×™Ó"[šé¶~jB>í´Oú­n©TŠ¯àˆC­2Z ]ÖÐ{.ôÊ»²·´Ì=4ñ¼}ØÒ ¼DMÂâáu Œu€¾é ˆB â½Ã­6ÕæúÍ"3”/ö9‰™Ñ©ŠR˜ô]ä° `GH8¼«Ý&ŠítýV£ù®¨Öaé]Å›V¼„gq{¿ËtòŠ¾Ã!¦æ».%pW}]*‘Üä÷­ñÂ,ý®K½CO»è.I2ëcu ±éL"2ôq” SˆÃG&T -`|NݺM|ƳèÒ?ý ïg5û_fõ\ \_2ePD@Y ­w$M›ÇóìK‘l#(ÛJ˺U9:à\OyE ó‰—÷?h@xâ¹@~ñg{!Ôb( ¢®J—¡á†V¿ˆôαûbûä<½3`X˜ÆÕÞÔ­åÿ¤Wÿý¤y9H*"°ó®È!Wbq1LƒÏkiŽ…C+ [ä"V~€;…Ù9Üé/Ñ#ô¶wʧN@!»o䳸%¹á̧ªÒ¬©–gØ­º”ëLÒRœ½”.µ[w>ð¢ìà]d·R×ש*(jƒ”Àµž)"Š8`®ò¡\ÒJd•µBîžOĺüN 9¸F={º¢¥N™¾†$+IÚ¸2‹'Iš>EiÖ;åy¡´ô?ÁpSÃZ½#ÎL+7Ý°J]¡âE5 G쨰¼ªåŠåhO"aˆRÛ±¢0¯ðÎëìÌwjÙr“sè â*#!¼ñoé‚^£Y0Æc_’À>¹W·çÏ:}ÿè¬ùãÏþÉÙñ“VïÄ»wJe8;¾»(;„.©’IyÊTª‘{£ü`$”5 ÍŒDÙ‘ˆ.æ¨YõBbQ¥SIšbô+Ôù,D³Â‰TBŒ–‰ŽËÈr“œFé8h4 jp…ñ£-MîµÎjMšXÉ÷ ²ËËQBéK”MG3:¨IŠKÜÔn~§ÎÕW)KØH+ÁEüÎ~õΖ/~ÔL£ç¶žœ=ƒ«ái¾“AöôlPÑö–¶b™…¼†y·µÑ1Xs•ש9H©êuM\Ï°ý}4ÿz¹ÂƒiX•Ý‚QÓØI£²‘“T0uÊ©;åU>Û> ®I¡iTIŸò{ºb —QL©ð¿\l1)ÎE„щ|‘à‡È¾<jW5iR°]œ9Ò]bp’&SÓˆ ó¯à5Z¡–¬›¶‚Ï—i$Œ]æö½{—Q*ñQ:íÛà?i?óOHØÛ³¨f8sÓqu‚£û©Õ}Òéµ(¸{¯ HÎ6Tg3pQ*R0•+6ɅĦ#ÖÒÊýד¢5ºWa0õ¡’µ½?ÑPØ è“±è +­´5 g>7â_,&ƒ²¹Ü´ˆïüfŽû€î$ †a2˜•Ó‚>S‚‡³’¨[¯ÎG@ò_Iõ‹ ß•Wäá?@§vKWÔ]i2ù SãG¤UÎýä·º²2¡Æݯô ¤†â]¨(5¾‹ ³üsµ?„—â# D=¥+~Ãa¿ëEe˜ß*ž;ﯻȬÏËÜ?MóqƒÏ8¼'?÷[=¿ßak¯Òó'G?¢(²\Îc×Q5ŽnP…l¨t¾”O¤]йŽQ]“Rf9õuQ¶åÔ"ZTÌÍ1[¶Rƒ•r/w¯äŠPËúVü¢Ý'¡`®(=¢¼Â4 F©rÔ–^okrêÔÞÂÂ<Í|zUìˆÍ@|+öGe,QÖ„ÖqÏÖ;æ´+¦ÂÆ BaÀ¯(ñÇÁìm8Äi«›B°O´ª‹ý¡ñfç䬖ö…h(µ¦6®¹ÊpÒ]aT86$eûØkÄ4 Ç!”œ©«Ú 3Ü$H–Q«ç”ÉORM£ÓÏš–UæÊÈåÂÌÚj‹K±bË _¹l]tyW7o>¤ÛúôùkóBlNÄ®Œr²°µVÏšl(…“£Mí–Yíwàýo@sWX{gŸ,ªKQ”ßXÔd#0˜ØìÃÈz ÉÍ¥-bhé¦ý¤XÀ4³eMóš·RA›#n‰Žpê —JRAÄÉ,ñŽ¯dŽQt­¶èEô“Ý¢9÷(œ\bÒ=¢€®ÃµDèãûptS³ç6‚›C£»oqYã7žõʸ§øñ¨uò¬ÿÜì*]þ@ÆL‡s“è‘ü HœÆ¡Ç¬ Ò Uòª3HÌ1Ú~‰Š0‘~ÊW ªªš­‡nS\¸¢EB&/`i`ßêM¥*þ`U¼$›ðüºÖÁâe•¨:†Õ!SX0·“ö1å*Î5ìyE}Öõ>¹ Ö¼k%BÍu0¬©ÌE£h~c$¾FÖp¨l°Ã%zÀS ä™õ59b'ú#êâF9H @%p»"¨‡| ¨YË‚f™àmLÐe%æ Ä´ "N3¦ä"²Ùc—Ÿí>üd>hF›gH¨¯ˆØ›²ˆ›¬)µiaX߀BÆ©æýÁ?FHC@ûoøÜš+;¤"Æ‚„¿ÝB,¸×¿,û%âLE CB;[î¸RæHÌPJ‡TÖ°vÈ–úðiÏX¡ˆÔêZ±°¥Ö°ãÒìú„j¶q¾æh׳hS ð˜,flW±Ïa_Ãœ;'«ÿ/;F>ÙõÒSzW Vy…=Ðrúl9m†«àˆNîÎÍ–f¥¥JXZv„Nå:ß3mž&cS„b\_}‹¤:rpcKbí‚5‘©!x;wåÁû"ÊÍ[ð±PžâɺeðPû¶å±P憂yWfE’q&øV]©#fѾ¡Ù99ô:Ân?-Ÿ’Åñy|¹0Ƙ$ü†$ÂßL&¡Š-ÿ!Œç"'¯¨­ú‹.îš„· M¥Ò£èÅdŽ{|`×'•ÊÈ0‹\¨¥@Ysf„û)@ºTæp¼+§…dv…GÊ ®l¶…ýý.7û)o˜c´–Š@múz!sáÆK\Ú+Pr|0c2†ºŒ}áû0 §H+ÀJylîÀËMöàŒâ%pе„ļöRÚ[LLbi¾jÒwºuÎfœü#&—놢ØIèTG.hêr›*%o¬}oT@îÇCÂk~€!f•‡ƒé­‚"‚Cu;³ÞH&ËóÔTSrˆ¼¹»Æˆµ8WäÔ¤…ÛTjE Š •LãÉЈ¦j·^ËDÍpNj«{Š˜aAC5±h}•€N-kˆÕij»:]­\Fp°#\ûï\‡šFë~µ~r¥ÖNM£;Ž’©›ôo8–PX—¬,kÍ™U„LË­{ìm3lWhòñÀse&™«tš™ÝϾRíÞšcÁ§tÎ%›íBæšuÖ;%ˆÉ¹¿Ówx–[ÏŒ.eXÓ –s±™ÛBÓé;"O±ú^VzTcã±óõ.¥ÊÔiWþˆ¹Ü¢¹d»æ´„¤8Q6(0x5V¨˜Á°rÇ’RÚ(ßq=ÀÜüY69À«Úûf´@5,üƒ$¬sÏ™­¼xY;uVÒ_Ü Q7×5ײK¨¶NÞÚ:•µí‡¥¡r­+]uUV(€C”“”Ô‘E t¥ 51‘dV¨`iº²Z®ô* ˜ÇHˆÇ©v´¸Â¥ùfhâ&ˆ™B’Y Ï:B9.åU9¥[Qe3ÚL’†Ž¸¦®¸-ÿ?ÿS Þêêßç»–Äÿ¹wÿÁÞ=Žÿ³·³ó`‡âÿì<¸ÿWüŸÿÄŸ;_oŸG“íäªpÇ“-àUõ¯@É©H47Ö ó€Ò}ÜPe{;»÷ª»{Õ½µ½{Z Ý9+Ç,ºŒ&”ùƒd/ww»¼Ò8šo/à&ØfP‰Ú‡µäª¬róa›;˜ h•`q‚xè•> ¶9 ²èð6PÝ Häù®Q4 '¬îîØqšeo÷ûïï{/áå F‹1•Yg¨ÂzT@kCe…$ç»A½x‚òºsÔQÀ<ê€ÓÑòâ‹ù5ÌQ$c9Œ ´D¥”¢+ö¤F±ŒÍîvL1·ê#MALj?¼ÆŽ¡>"X HÓ|I|'œT¡ÞV$šüÒঋóQ”\U¬pFLä,sJŒív<ÃXy¡’¤Dܪ‡ ×aÀSE-__Iôg=šwÂÅb6f9Ð0†©£V%6·d¼2« 8$ïÓòõ—;â~Pd(³Äò)¹ Xý©#'E“Â+ôž 膟G° Æ­FÀû¬ÿ¼åõ:Oû/Ý–$«HQ²Š&«sÖ7±±:O)Öí“Ê ”åuºL¢dU¼öIóèì°}òÌ{5O:}ï¨}ÜîØ~‡š`íVÁ·ºÍçðØxÒ>j÷®¨§íþ ÂËkx§. gG®wzÖ=E[šÆÉ!>þ ®ôgÊ+®}‚a¼Z?aTÞóÆѶVÀHô@ô:åìØ{Ò‚î4žµ:Œ¥yÔhW¼ÃÆ1z†aÀ¯ÔëR1î’÷ây‹^µO\ãÄk4ûíÎ ö ÷»ðXÁuûºò‹v¯UñÝvçái· àƒFž¯ óàü`ó«ÍÂdt°YØ,p8a ‹qØñÊDQâa§ÝG…ŽºˆqM‹:à™_µPÆÑü`ãwU¾ú‰Þø^ãïý*> …ë.˜8Oâ v­|`@úÞÄ ŒÚ«dNd=¥oPØŽJH´É‹)ƒNÞG³xB’÷÷fÌ* ®.g¨Û¼„f›ÏŸuO©;ôö|„ÛC<îÊGx‹ãë‰þØyq"á-|k ÇrŒõ[y ï(»¼>þñ°Ý¥/ô>¾W_~â×ï?fcy×=¦w³ñ§Þe v¯ßm3xz S8“ø5Jkz&” Í’7m o]+Pi¤e~ãáOþÚÐÓÂs@_Çïé÷ºˆOÅ î*æWàRÑB2†ÉþŠf>ôÄ? xÅùñÄçszp`Ƽ(ñY7ï¾JzsÃB›Ba‘P¶øºp†?ö½ïUç±å›Z­æ½ªößx½nóiPùa¯ÿ"³Ï2E¥TÃZ´š€ª^R¶:7EìŠËŠuñ6—+´çìr@À1Ó,º§pt¤³5UroBYC½{³¡ÆC¬Ú¦ªGºÎý9 !B/¡ÓB¡3*ƒ£ÌWÑè–¢d: $è$½¥Ä{¢yM• Ú”U/¢ÉElGÿÀ#¥`µ/¥¦©6]¿WÆId³'7 ®¤íT‚všÔä“É"BFcŠ”QÚ@eàv’YIMkí|•’iT/½gÝÎÙ)×ßÐ"uLè ¡‚Tiì~hyº’‘¼JXêÄxewMA(yu° ÕIìÁmèsŸ®Ceíý©g—’qX»Êõm˜³"¢ÖŸ¢ÂBÈ.ä0{úüÁÚ¶\„ÊѧéœEÃPb,\¨SÄ„s˜°7›F´žÆªžF¡ž`Lq¤§q¢Ç8ê3âó4¢+ÀdÌ߸£²YR€{Î"±«CÛÊ{›~Ë”B8óÙ"ÔŸ‡eO¡(çý%z. b,Z;dc/s^× ³UVQÕ _ë*g€.5.N>ØØ3fRÔ{N5±$L[›Þæ–÷ÑÛâíòîbúµ¹Å7ÿ.ÿ¾ÚLù½KOv0KÂû` %bøç˜ãVqŠ>^7’a0);ÖgG.†¢µ­—ÏNRöôý`ö´þ<7]Ï¿ 8gƒ±…•ÛÄšF "f@|æB8|Ø«”¨˜ÄáÎÙ$¼Åä(2æÀ„©üäf)¸»UœåW¯K¯Ë_¿)ëÔ¶Uñõf®_^2@Š"e6“àZ½ŸvØrœ­U-§òPö\ýy«œ³#8óì‰]wCèÍ Y 0=:n‹Ó¢ÜAÓ.´‚½&Œ@Tÿ…O]㬚Ǘä5SA[‰1gª‘†§|”œŠcbæ½°ÎwS$i_…Êec;"tŸœi:¼PÐYî1 ±i“âÞýÊ V´’q˜™›C½0dÀˆMGM47Š+Íê8þQSsè„c‚µPóg%Cä¾f{“ŠÍU‡*´p…HY8VâšÙåB‚ÏÜû#ÕÑ­X³àÌ FÛÉe_"3Ræ^”ŽcÖpUh´b.fÕ.Çv ée¨M!þbãq-/#Ém B¹Ê«¨Èáx:¿Ù'Ý33³‰I‰y@j˲þ(ÈK3ÿHN7õAeÿÑøE½ø£Øe fY«Ø¹KÒ[*|g¥uÖóú[Þ1°7:ð•Ñó³e–=SòŒúÛù‘vîÄM‹E®75¯öGÍNé§S؇t†4/¬%aÁÈÞÁ:¿ÆŽ3ÜüQÙ“q =FwGɾ“‹k1ß'ÖÄ( _ã[²%Íä©ïû^›wh>&°æPf1…ò4Œ}¬w°Yb?C“eOÿÞ¤”™ÁÔ+ÂÃÁîÞ÷uèW)R[ÖÇ{;öÇ=÷ãý]§æ½Ô×{Îל÷…‹q¼E{§€¯Ñ j<•Zó8®^†“p†a‰Ç œ<Lú¯€M"6UÚöÄ;G_mÄBtŒØ=4p>º˜A× yô )¸jÆH‰PŒ7 eääm=¼È•©O½†¹§r ûk}ØÛÓ×Ý«êwoÊÆvÃ,•¢aÜ}áy :Z$þìú@­»Jï~Ýülªè‘J3©:ñKøa Ȥ´é}÷Ýw^U†ù Eëò6˛ކ†õK:EÒŸÚÑÊâîìzi7©[¦+†,À½è0™ „éÿÞä¥`š´wñ%ÊWÂ?¦ ™Û>‹Q2•ÔJMðDÓ3×_ŠV)Rõ/’ʱJ3'ûïEÍU&bGÆqÇΦ¡¤ÙcÂæãiQqNkLâ²)M_êhkÊAõµJÙ †&ìy @ÁDPK%Ö"ÀA”6Ëæ"F¢–Æ€˜ª ê5¥"Xß-ÈØÎÐx< ·÷rDXÈlØ[.ÜV6Á’w]e‘­¬´€VkÕ¾ÈÐ>yW<º¥ØÿÃܸyë0Ù(„Ä\Sf~‡ñE¯”ož`P–€¸«6•;F“*néeż{—ÜEÖPò(úô‰No~3cðzûtº!/ý/N-uv )<"@¿¤2ZUÎ?_¹'ÌÜ™”26‰Ñ{¥œ>²";´I ÚíXóÆèÄ’•Bls³lq’M¾ÍȪ|#‘/%Ç‘2Üxÿé &rÄ AÖ,X*¬Â(çé, Q8¯H§M¬Òî÷ßWÝÝ©îýÍT•þù%Å¢*ô^Ûà»ØaUW^‡"[xµwïáwoøï²'Sʸþ©Û¦rµ­W;{oð?@¿µôo·¾¹GUSömÊìò|åÉ8îz{{™8EUõ•îAøûþÔïövV×À Ny§ð/ÎH·òæ¢rW¯Óì½µÂ/Ü©µ–ÔjáµÅCjÅ ìÚYU#/ÚHö^±¸­YÈQL7¬þÔlÃÈ•7œ=Í$oªŽéÎ6c°¯}§¤~«Ð4ûÚý:w?æì­W»{÷à&ÃõÏÙ@tzí—ܶW"÷'ìîõò‘ÃtÉÁlˆ ñ„ðJð­—ùƒRj°ìI#Æ£Ä=ýÖ»‡Á?Ôh©Ýà|Ãä…ˆ,»Õmxñ M;6º“ÃÎqucÃ-´ô&ÒÒ¯{³1“S nõҦó1õŸ#>¿Pý·w…íri°}8BLo˜Æ™®V펔=+æÞ£owÝQ¸{*{qËîC®ë÷<¹;1i#^q³ZBëñ’UǵüúÏO«˜«z·¶w(Åv€<¬=P[g¬wÏ%pÓªÏò‰YE΂, a›‘¯a@*ë¸JZ Ú÷ù’~©=ö°¶›íŠR½)DyŒX=Ú(ñGC_¶Ø/£Ä«Ž†f‡ü’W…ž]Ñ=¶úßáOõï3”j¥ Ÿ÷ïvvêõ•µªyµlnoZëõª*œ·U æ”@MúbÞÛSŒv%ð—<ãã¶%¾­^dd¹ÒÅœdÔXæî…iÁ«¦¸#arP°¢qª„ï:¯¶œü—°ð¼¿Ä­&1ôC‹âAmð¿Ã,%††¿f 1Ó“%‡uk»×³·nII^V\üŸ½óÉ ‰4;)’Š£´á>¥^Ǭõ˜è‹ÉDÄ·:澋62“¢3¨ÛäEw ‹FU²·ÙÖëMØaïd1~X7@i«‹É6ìÚ×ògssû²øKæ*² HõTG…ç,¡jfbsC€lÚÙB|ÖO·µm½ 'z“94½j#½—þèÒÜF?b®h¯øÚÚI¯í­¤»…1 y«-;+gµóxÔ¹»2 ‹ã¿ÉùÝ¢B•:š¦Þ{ú–º|RCuk²šß­Éï–ÖÄ”í™Ñè-˜L ™Ù²fs+·a~'‚_Ó¼=¶àMÉn{1åœ(&wìçÄèqOÑÓ¥AY¨å=>î¤ÚƆÏqÆη٘¾H»}¼ÎQî? ƒ ÆÆáü}ºuRÐs¢4+Ä"F%ÿD32úØ(Ëý°<[P«q)“jj_p3jw+A5´‘¢H_E¸©;€hPµEÉOÃ9QN¢ÀF+VF|pcO[+AÑE4ä . ÁH YÖÂÌॄ—Á9ßP4Ы Z0f§Äø£×RòE Af:bEj­p@}49õ(IJ(c¸šÀ°+›¤ºEµáVÈ£í}ÞYC(_|ÜVTÖZ «²z·FËë7 „YËj³"6¨ç¬§ dpS²bàÂ(Šñ±Þ¬Z¼á!Y87 ~9jb2؃¦‡ÌÊpt$'Ÿ Xö/V½Ix½¬-â²zLd¥^¼ô60ìÎþÆÞþÆýýû³Q´±ýïÚM(œ92Ku‹Öç 1¦U£6ƒÈLX÷a ‘¤ÑÈ1¶P¸CІ¸uÌ {M]Ó(ŠzfÍ)¢t‡9˜q[LÜWÐ_ã*˜&Àt±*gü^ç¥Æ¦³ïö/åC&Æ"¹åhŽ"N@Ÿï¡á¨¼¿Õ 5¸ß-"⸆³ˆÈ¾«˜DCfq'°ÑüÜÑ”P;k¶Hö s:3R¤EP«.‘aqxÀ‹ Å÷ça¡L‡nÁHn€g'âêâZ¦P?X#vzç‹„¡Ñ´@`ä\Š_Á P6+ÐE÷Ã"ò -âEVkbsN×ý {J±¤_2ó‡[Õïi2èk½sŠ.‘$»‹L§­2©=eÊÿž¿­ûÒ®šb~Ïi.[«îí×QŧtŒž “2”ój"[É™û”6'dÓ…]e·°[È$koËÏ:²©C›>±N„‚‹È¢£ ŽT‚‰NeÍv„)Œ½ë>&ÚÂxßÃ8jÕ«8~ëm’}B»H/€@óä*l•ñ´Ln)ê ÿžÍ÷3q<‹n!J׌¥¾Ù¿©~³³7Æ¿†5øëyª$ýü º …ÏúÍÔ×p2„÷âéˆßZð¢ð¿Óÿw~3úãÑ 6ø·¸Æ>|x‰ÿïÃ{{°ÿïîw÷v°ÿïýïþòÿýOüÙÞ*x[¶ßë€ü^w«äüz~ã½ gñ(0ƒ+NÙ6Ð6’ýC…8G6Ì÷Õ=´¦0ÏÃk`áæÕÓ`ð:b\)¸—CxýçížwÜè·ºíÆ‘ã'In’ì%é5žô:GgýÖÑÏè…¨&ÅG²uˆÐ÷Ý$±Å“ŸÉ½6úÞϳ®‡Ù»íÞªåUN¾âë‘©ìT.dñ“ƺd€‰>¿ ˜3¼ñãûh(ùê™)`¿@#H_¼¯Gi-Õh•Ýo%Ô0TŽ³ÆûÖ¨Èé{”hÇd¶f7Ø!7P®¯*ЃD_l¥Ûa… »ÄjÕk¾­Ì-f¤–*^q:‹ÞópûràO1nHíªh}…·^!¼Æ¨ 8³ƒûoQÀŽàxS”b/s†îÌ&¦Õ)zŠû~—A ÄN>6³±ºétÀ];½¤ÉÙKáȬØclÚ³E!%0B@hÛRRY ÈšWƒ¡à7*׆‰XGA¤(q¬Õ .fˆíH\.ñMr)ù0‡&¡ `$’§õº–žÚÙrí†G5gû&,œ¸c¦Üҡij2ùq1s;D@vÆêŽqMÅjî” / o¡eV&ÉæltxbSÅ[õèiŠ§¸Ûf¾í¬Õœ£ðƒo͇°ˆš¥ãÆ?W£ç9ù¨Ó ÐD_°çŸZäÓþ¤Õ:ñú­úµúFosÂWJ&t+R’„ñxHzO’õ01d¼ ÂèRÏ%€2mª‹€±•ƒªQÞDQ:;\ÿçÓC¿õ²ßmø”bÀ+Ilk:à^Õ³¾• ©ôèjF“­Ì,ŽIoym©,ñen ]7®Èco*iu˜B!地™V–·ßtÿ„NËnñÖë´}jpÁuG(ÞbŒšÛiÊ+˜Á8:Œ”…Kiª«5^aÐ>GŒS“HŒ ýˆ[>YܺÈR§D¡E!íi4½‡—BTrÎÙ~-ðž´ûÇSþéQüE’lŽƒt4f¡Ò…H:TÌ:W¤PÅ£ä<}f9%3¡¿ìD«4šEiâ†užpŠgbvþï&×5çý„»G¥þ Üa„à3SZ¥¼©Öq/_„„ÉÅA¶“).à™€IÈÑ ×á* ’Ÿ)Á±g(¢ÆŸ‡’6I(F9ˆõåålŠŽ¯Mx*²RÒ4É=16¹¯kùáÕ‚-&Hr4y›œø»$£å< ƒ û›IàÀÛE_Î|fV6ZM—œ1Ç3‰ÈŽZ§ß’ H¨O¨€¿êö ãàŸ¨»ÙFaÍ€ÔÛx Žæ‘¨EGíg'$ç\›Ö'ÒFR'œæ ÍxäK-½Sùò‚ÊfÍêœ3M¦ˆƒ¨Wä$U¼õ€¤“":¬-ádøM×í¥“•¥}ŸY^½6AþÚ Ÿò3-Î^zz{zŒ)Æ’Ý´…奸ÉÄƒÝ ÜîöÂw <Ë»šäwµ×ú¿g­“f‹z{oÂ:õõÊ&!b¨^'ðëS)Q7·.tc4¬ñ¦×·“ÆFÞß®sß¾3TTãucú¦8Uáªå쑉™Ü(kGjÏÜ^µÜDt2ÙØÿ¡Iù.A°…F¡×™Ø,¦Œk9©k[‡¾J±ŽÉŽÐ¢7§à=àKc§nú|‚}Øî>¶B gÉ‚Ô• ¬Û.÷‰¡ß eÀÑŸÆ7LåÛ°ò(Œe ôA]2•w€bþšç`Xjt|$ýQ §$ÿÙb¨ÐÜÓN67‡Ojù~ç¸Ýô;§½2EÐú/˜ÇãhàÇÓ„˜TNæ%ýÆr”§,¯5Ú&ðãÍhýƒÜ»øŠyAS 46 ;Â`RD¨ôÒjªtŒLŒïÏs¯oµ„¦Í“yzÖ{Ž,¿÷óq){>tž Ì0Bçl„K)>CöPéÍ'Ù-$<7 a‘I uûÌÐÚ ‚á%^u¹Ô!07ø 0ÒPh™Š]¡²Å`V«Ú ú¤`¬O_b¥'Î,”0)Í\RÞxçcIˆ3AEµJKªlãDEÃè=e"ûg‰Šyw=~¬ª\¯v«&.¼›Ò\Ýý”fÜ)}œHÊ rØ<ò:Í}VKÜð…Jé'ùnRá®êó£ )Ùqom´; ¯ëéË ©‘![½°–3Ú_ë"™˜ÄÙ\¸ßælÎo<‡#0õ4”ÜãýZ~²\(g'ö@%’^Dz%ec´gÀn©IÕåË©(Ø–,¯ÝôØR ¿Ç¬üöæü:gcàŸ'ÍÎéÏ98®‚c]Î>{õ8³fÇÎÝóªH†(qŽÌ'ºwiO1~¸b7]‰;®ƒh®ÌÆ!†‡šJu“»¸ÃJ¥ÝÁ¢?ȯîÂÓݻ鼘n_ à»^ô¦¦YO Ž>~½©FMÍnBå~÷¬eÇÜÖ(ͬsE3Œú x8Ç“ŒÝ =œYF\[‚Z½*£äzª…~8È KóõÑ£ì×Ϙ•nþ¼Y‘ ?gsÞU£ã¯.ÆS'iHÔµÞç€Îê>·w!E…—Ëó'£BÉWEÊQKÝŠšCBfì“ÈíOôöÞ›º“ñÊ–'²Ð,¯Q:<Ñé¾öÔzQ¤ÕŠºË1 3–bI¸–™‹0%ͯ­$ Ø~„&à¼Ä×ñ÷¥ð@±P'sð¨IKZ³Ýuˆ‹%"/Y;_Çjxf™ÑÒvó—‡Ýfù¹¤?Š^¡éW %ç´ÖÍM¨w°,¡žg¯õ³9R)XùR6¥ËrÆ?ñ?˜p99=ù/»+9GA6¿×Ά“#ŸÞ*Ð]÷6.”Ùc—´ËV ÎvuR”¼jÌä–ùh<¡Äw™“¡µ$$Õ2-©X;Æ=ù2F‹d÷‹–¶‘EQLæ—äÅJ)ØWÖÕû¶}!&#ê@5;ǧG­—VWîTlqÒs\"a¡)‹»·¥KÕþÐ)Êô`Ò•k´iŠF?$%rƒعõ,é `A@„ÂÝs±&†™—:A9Ô²@Jœ$ÌÏÛ³d =T_·ô¬êc¼„=Ó8żÖœá%½8éøÇ­céÅZ ®••IQD'¨LÏnCžf:]·)ÂÚ"xw%tq§–b × bm3Væé9Qz×…èNÑÖ9ž BáúÅLe”"~—“EáëM§ÊÈùðöôÜ£XhW¿áÅö¼ý†'Þó–NÉJw±ÀÄB\šùÒ˜C%ö†*kI®r¯ ýRÏÝzÀò0¢µkÁȘoÑÃ{뎑XvNû~ÿy·Õ{Þ9:ôìعä0Õ¬¨jX|AêIA„Ð¥s`“G(jþ Pö榥³Ka³)*+Ðò1˜¡G˜m> ‡ QcTãf3ÜA#ɵÈN’ u‚2JñX»=åÓ^ÚX;¶FÓÓ¿½Wñö¶ÖÆci ØÂf…/ 4Rd,òZ4Âô¬kˆp—ÍÚfßâ.Ë ¿ÒüÝÒ=´ _Æ“Pé‹œ©'[â%•Ê…œyuED²Þ¹œdêH€°\©µKxrÈä£ìz¬§%\Ëö<¼ŒØ#ñ ³\ë/ì,m&fEÉêÊ-ëÈÉÙTéÛV2¯ô’µÌ+ºt5ó ;ë©ÑqÆ¿UŸf•¹k /y+ŽÈå6˺W•/`mÔìÄS¨ÙbMÚ“¸íÈÏß‘Äù™7Ÿ³9­ª9¦kìW À2räÿ‰½+üÖþ¿mäŸÃÅü ƒü”¥dˆò—EÙîtðdÞ&³éúL©•7œôÏÈÿ4¡[á÷[ì`¶²¤hiEéÔP 3ek+ìDj¶.cñÊ„býȨý 4`7¬¤Ø²bþS46´ù>E‰¸ÉN™LX/ÉîtŸhæy$se™ˆ!­U2²OƒB{ø?”ÛâFeliE¼†M•(ÔjÛÕó ²!ã—2-rÊð‚ã.·mŠìý™mm‰“m‰âó_ўͩMzt)7NB.•2€)‰E@0Î*RŠ>;YooG™Z”§M$öáä}9§)ã™ÿp7”Y Ú®¤ Z,ƒ´“,ª‘°P‰a(ÍþÊ;~…v_R±/¦ÊžÌI¤.qm.m !µ<&»à’)} “½¢n?ùø †9 gFŸcÕ-UðIJ¯œnš#o‹š²{±z‘JÄ"[JüiIsÝÞGÅ­·º~çÉ?ZÍþ-Ü*êb+ôw9k,çhª;Õ—ö±PÎTnz{Z—™ˆÉÉ;œ£láÛ7HÙ»m/³)Ëm;UØ^_Çú=»¸ËvÈêI‡Z”re*¥e­À_ †4Ʃųup;o¼G•X·Â5‘EÀ.[(MnÆ"À…!¼’µÛ~øA¶"ªÛ£²Ù~nsv†ëÿVô)¸ˆ ÝÆbŒ”ÒÐC9K©o^m)CpUýØOë£|â7Œ>.Éß ¶ÄUÀ-éÓQ° ŸN«l@qEʾ kñÓÒ*‡­æQ£ÛòŸvýf£ù\Ùz¡’ýR/{GÎá{á<ìVÌÈÜå'FjÌ’©”ðBŒSSÖu]üñ´ýòìÔ?í´Oú­nI •³L t„7–>† “?¨Ö¤æ™‘Õ#æŠlô-Ò|–Hå3÷Sv¹ðüi…<Þw— ¥Ó+v›6±G…6ɋ䊜ÿÈ1C»\bzW…y-ÂÓ^{ñDûS*¥Vèc´òëc_côy/(äùì-:4Æ@zBAã–…ÁvFI,Q(Ž½PjŒã`ˆY,<÷Ž¬"„Ë«ˆµ/"=S««t÷®krÆ›Ç-cv\z¥Ó;+UŽ%R3ÁÈ·>©i(¹ÅsðR˜Üå“!­¦?Êa¦mE-8ùµiÔ®sD/Ë®Üû¹‚˜ZUÛÚ¡¦3Cûd›þ2]¬Õ M2ÞAÿʼn®¯x•Xc\&r²f¢mtCñZXY7E¯çˆ’¯’½4´\“¬l:³ç켊§!…Qa^p3ƒ9ô§–cd£L‚ &’';—¿0,( €‡¸FÀ阥mÈí§\CfÀk§¾åY¯IQ·i“|hÁ°fû™¤÷ÈVÎȬzŽ¿IÙmØfå2m/š kŠÃË0×w½••„Ç×}$y¦åÆ“N·ïw[ýRñI0Ôn‡f}Šå´FQ¹5~’ýLX7m2gíhôijéø5Z`h6¡ÆÆŽjWÌŽ¸^ÛXS¡‘p˜· 5ù´dg ÅTTîÖ\_ Fm“iEý©m= /#:¶L°b@0—Eé¢luæÊšÜÉoyo¿ø¹GÉÕ¡ D×È¥ZæHÙ®‚m‰mDey粞RtÁ41 ÓFD ̆[†9Ñ´,Ú5OO~sH‹3V¼Æ£.C´óêMí[P¿L_6åš[R_,žeTœ%ïè\*»¨9÷á2ü•»„¹›Ú^ÍŒµzAS¨1³(9èˆÐà\Ëë çËA6Ä+}û|¶œßQ®’„za«GvÊÿ¦ÕÍ¿$~_cªÓׅ݇/˜Å¸ÏšÐܹ\c—Îáê?_„|+ïO¼]s¥ÿ9éå­õ””€œúý®vrÖkª;ïjˆzƒ+üçÀÆš¨ó²ã„E[˜JÀ"]ûj±Óî`i£’ßLjÓ7U¾ ›zñJyt¼@<ñ,ºô3¼‹ûÂ.‚¬ôׂc1–1O!ûºÅrƒ“˜x$̺"ÕÏ!W#[H¨w_N_þƒ\JÉ%Ÿâ¢ WIQgØMf1rœ2—MÉ1ˆQJçÇè«çTJ›= §#4Én£½/ÎþE\Š€ëu@Mbi,}CŒ6ÌnjŸÍÃf'5fàò…—B–‰üÃ0èi×/åš–Qvû ßuûÂkZº°Ñ ­“ЗW6@‡‰Å$š§E h}‰)Q6Ø$uøaL’Õæ».(•Z“rPÄ  FWjºh®6O’ElìnŠ•É#P'ⳤrÔ³9cŸõ¶;ÕÒ”‡ îÚ&19µò…†²_]Í€?:¦¨õB®[–ïRM­YÈ6h¹kB‰V%W=[ˆ·Ö leTîð,±I.f…Ë/šÓ¶ã½ÓÄGJ[žq:†–ß±Š®NŒß±q#&_´$œ£ › D&8Lí_Æ-º¾Æ¦rT·Í«Ÿ·Ÿ=G‘¾–ý§Eÿ»år¾×ñÆÊù q‡=Ç!?×cß²üºõò´Õìc9»ÈrµZé}<ø½ðáŽüvµ¯}®’…t*eê¿òØ7äªr¿»£:ù¥ã“ÞÒ?iÇÉè`ÏÌêê{,öh<×ó3Wƒ[N¹x® X`£!E>º®Šb£"®çÎ}tÀÙ»q..ù] ÷¸]¨¬¦Í~Y­šÇøƒMŽËM-^Ž `Y¾È`×SóôÔmØßœ5O3xv[O­ª=TÙüNÊÔçSjæD„=rfÀE— L™NK€öä*c²x§Ntê:KT¸œ|©FUiÕ²ÝüÝÝ4®Ë!¹ƈÞSKcÙ£§Æô\ e%ÂœrM«Ýzi³—]ÆáÕ+‘˜N2ßaŒ`Ô²8#çi…ç̪èUwú_e½é#Þ Õjš½€¤[«çyµ§÷…Tø˜×…Oé~~ÌÓéfnS›ÝwN< ìDÎ"ÝuîDÚŽ æÀCÕ¯œ¬/Û-+cçt$ׇãxv³/4¿e"õaž ~ÿ!«|·òvššž6zÈÑ–èÛչꉵ<†k¾#Ö3[î½Of¯&z"7­¼Fç_F¨ç;z9úð­xêp«£Kc¨#:·ÜSb?xŽrŽt¤DþO•ù¥éZ‚!eìh,.Bî8´Á­O+löP.§1—‰÷4" 3œc´ÊÞßYg#äðjtþÆÛ7lø³n*Ãö•2¥xªô ñô•újöÑ%ÆzÜEkˆ¡m é᮹Ø×Î9½à>gñã‹ \†ÖÈY@Ãç,àÒP0â¢â*9“ )qøä™ßìÁ2Â|Èl`9ƒ hÁR ´<†ˆÚE¶½Ô«Ñå[ÉÆÙIíšµ¢¯P Â*уú´W‡¸ìC!¨ÿ²|[œs•iÁ&´·ÎKò-® øš-;Ak²^ø¢Qè9 ¿”*ã…²G‹òWÅ`õU1ùò›b%®YzY8w‹rŸ1 £<ñ¥óN°ÉDn4šúŠÐ™h¨þeØÌÀ·¼2ˆ|¹O4q³ÌÔ·öÈ>gŠ¿u €,_@¥ÛÔý²7%éOØoe?O¿`û‘Yj÷e”Äd Gb¢œ–uü¿uàMêé—wµ$d‰ÙîÝ%—Æ.h¹ÇŠ¬Ý§ۈcìù?‡ÑÂwÙ°ì–dmc"›²“`ã–ÝËÓìëCËJ–zÛO]ƒ¢µÝ¸ÅÞõr±bæÔT½RŽ£ír‡/bN,ÓÑtµß–þnyjetìºPÚ1+_ݯ‹gü°jùNX%#˜Z÷ÚÌ3uïÀ;¼-&ö  †§í“ÆQûŸ~»sRH!q”Væ6b¦ˆ\(æ´™ƒ™Y¢Râ¥w[¢bØ“ý ~æð'”)S³Íl^ =OæˆÃ9i?\+h‰eRâ­'á,ùÊ`ÀF ÇØÇË€ˆœÏ¾µ•>ojž¬r¯ìXy1v§û³AwÒ8—jC!•íN›; i'1‘æA1Æ0E§‹É¼–ÃÅZ*Œk̲55~AÑ­=Ùüí’f°5é &"Êù‘Pò½AøùnB.¨ôåDw‘uû¤i#á§þÏ_þôüOxŒ)b4ù溷{o÷þwœÿiogçÁåÚÝÛý+ÿÓ⧵•…÷UÎ%|ØbS¾ÓÝÚîÎâ¢Ë㠯ǘ}=ºÜ4õt1Œú+ T“’@ݯîíìÞ÷ž¢þ¿_̯ÑkˆŒH WñÚ“A k‚²»%l5H-JH¼@` †ióÆŽbê¤O¢lMÁd¸™&gš‚ÜaË͘-8c@†œáˆC'Ô1shÄ„M‘%9e~ÒY«Ô$Å)Ôí •§Zëd’„9òÔÅb„ALŒy­:g}ÊT¥ZUTz> A>ç±Íe­FÁu]u2è…Üõ˜¦é ÙÉœB˜·ºÍç±ñ¤}ÔîÿŒƒ~Úz=ïi§ë5 >æ_i7ÏŽ]ïô¬{Úéµ`p{­> AÓËlåúÚÅÎt¡ÁçÁœ6?¿×œª?'»×ÏHî…Í~qj¯;^f¯;bb¯;Z^¯;_˜Öë¯Õük5ÿZÍ¿Vó¯Õü·¯f¡ðÓiÖêÀ{œÌÃhö¸Œ}?JüËÉ‚Ä–ðéwïu˜`•}s£„÷öQë§ÖQy³Îá;_³(æ‘«ÓC8ÒU&ªŠÿ¼Ó맪Ìg‹U5~ju{íÎIy­7¬Í³îa»»ì†LŸ."ü÷ ’„²³Å“ñqª|ŒZ Ëz@EIR¸±ñûC;Îå[õR]¯…Ÿü{Ù«×õÓVY2.¯¾ÏáÐT/œÍâ>¿FÑ°¨á¨?EnÙ“^mfû²ÉYqÝ)‹s݆Á¹’¥a ø×U`ýƒIÌÏI0 ©·£à29ØØÀIzÔxÖ««eß(¥öDÙ™ó,«ºµ 2¡¾=“[¯_¿zí½þê L¢Ãyrðúµ=¨TS¿Lg0›Þæ7ÉëɦW´€»ÓùÑÃ@¬Åd{cã<Áÿ^á_þMno_Ñ i¦Š7 ´ú6šú˜½ÌLî©O™Á`.½wúwµßF—9]ƒ·E»#»µ­ímh™ª}’61róˆbýnl¸Ã­£+­ls<ð]u ¶ì à 8 ¿§z«Ü~몽Ҋ^ƒ­Õ*L¿®aO|u«]Nz³ gÏ´°ª@…¿oåVqÁv²e:+ÁvòÀvÒ`GÙ2£•`Gy`G6Øê«aëpü¦¼È«ô—~6»jéll8Çú£Î*5C¦å_²+¤ï ƒé†³ÀG(uš9˜Ôå€/CYå²ò6 §—1=KÃy»œéÛKà­¸g þFI~—·Ÿ6š?6ž'%Ôõ%…ÌcªÜ(:Weøgö{ø!XeäÑ.‡ qaó/Â8¨¿ÿ³÷\Ý:wkŸ6JøÁïµ€‰mô;Ýr‘â Ñ$™ià'Wþa£ßΪwe¯:ðªcïáýûvI ”žuÇ9…íR½f·}ÚÏ+Ô>éõQéó¼Õ8lu©„z…(`÷NL@Lß„òõ[ŒÃrá¤Ó=nùRŠî€*sŸá¦v^H³“t­Ô¬ç¾Â8éC×(Ä}ù˜^<.\ÅÉÜ~Ï ²­¬÷üæqò¼ª)ì¡ka<â®ß(µ^¶Z/ûeïrà>àиo^¾GÃ!€v^'ã ¹r_]-.ÃL]ÊÝüTm $>˜ÅñÜdô›?©v÷®×VYÓ»ªð¸yztÖÃÿ2åo¨½Î/ƒé´6 VýŠÊ½‡©ì±ÂÕªò»;Vu0Tµeww—®þ|xtÔ~Òƒ“÷c«uÊs}ÚïæTÂíNéÉ£{½{v½Â}Ç› ›¹õ¾â‚oÃÿ–‚ÉâœË(¼ÏmÅÑ¢‡½_£È–Lwédà¹Ý\¯wÞ²>¬Ü¸é)z¬½ÕÙ5¾³j,9#vñ¿Q²Ád0 ¢1÷S?‡“ÁÕ ¾ÿ2Kg|o'gÔ2áW+4šG&šïݧrˆYXÖQÞ˜@dTß'BPýñ}N“Lññ}Öà—›¿Ô](8aÌÿN ÷k¶ p½èÆÔHL>þkcÃjxûãGKfCµ ¸-í¢f™£gL àbË µb?ÿUÛhª£j²Ç:´Üß¡—“ø< O„¦¦AkMÅö«7µWÐÿׯ·>¾Ù~ ¾Ý†™É€ (š²m«Iîcf¤N¿LMfflÈr”wuv åúímzN»4n^/Õ²÷±^Üô¶½ÚÖëíí¯üÿm×½¤òº„oËÛ¯þµýfkc£òz·²)À¼ø±ìm>i=kŸx¿{ˆ&’WÅZ­ÅŠEï“~·±±÷†öê‡"üoccWm´Ôº{w"4&ÐkZ6òÅß=’ÑAõ½Š²î©êè|å´K}ù$ b¿Ð ÷L•- Tx§ ÂÏ7Þ§MZ{IÔDnnl|}R_ýW²ýz²íÁ®±`seAj­úyìÔ­.ä8ündFÕßH@‰%”ÜôãG(@¿œƒŸ¡VQ‹àáåEÞË™zY×óDx+y%o@݆$Ο. µíËEG„-—Á°l7EuT-Öüd^ÁœpwF-Ý·F UÆ‘•þÈ84§¢%•Ê­h/õ(é6ºm¼ÔßzW.À äîýQà\¯9Èäp¸tð‚ñTo 8‡(uÆó²úˆ%-ø³Wɶ͗*þ{ž à"B1óWyŸ§³É?ç}C®¾rÛ¢îe¿” cÿ'dÔ{xðãÛÇ|íÒ‹ìçÃÖÓÆÙQß-†„`µšÀÆ~_¿E6ÇîÕQûäG ÐïtŽðÆ—nÀýZ—Í&¿“¤QÒÁ}U­Žãax€FŸH$51ÕlJxi׶»q¨‹èŸU¸X&io½¤ÅǺ½ÎY·Ùb‚CÅŽFƒ«óÑÛÚ€SâÁ¿çhÌ9JPh@R³d1Nà7tbx~É̬7¼™Ó8ü¼ÀàÑo!ü„†£(kúý«”…ŠW°¹Ð×wà¸AÊŒ~Jƒüãýš½•üÙ\Z‰¿0Nô=‚ƈ6ÌüH±Ö\=pW¬€Â(_·7 ‰e€_¢×É|q~Ï&\W˜&¦eU½ùÍt(cJIm¸¹[.y2·¢õÞ?XB[rõY'IbK™Èuë~åÎèרnìeT„8¾öWéÉÆŽþéâ-Õû{¹ò­œ&ÿ—jó~¾„ ý<—ø@vÂúµ¿2{›ý<™˜jö¡4»~í¯ôöÇV—À×èÍܳ$Û§ì±ü¡)œ‡7”Fzð PÞŠºŽbƒ á·Á†+*+4 E’„ŸK®¨9ÖƒRø“~ÎÞª ƒ®€x¾kÄ ¿fÅŸÉm=pq.ÔwE%b‹G±AÆ+jk,=Š½½¢¦FÞP† ËK+¹µJB#‚ukÞO×|°n͇†Âé9[^ßk‘ü 1¯âZ#Ì«ˆ—ͶW¶r³bD‰ÃÛd{yñªû^–=ØjGÜRzå€×;œ,ëNï˜u§:…ËÚ_~n—öx÷˜©—3u¼$kÌûgMû³þŸô\¤˜3³Ù‰eL:¯Ë´œÊÀc‰r4ÃÊ)ëÿ%ÊÎý¡²WÉW8.U*´Ðé_ní¯\-¡i À*Ó˜´t‹7¹úZÛ(áw¬“S6tú½UrMÁœÑÊ9ߌÛÙI_šÜg·ÌRó…`œ†æœÒ%3™Û„™œ¥iŠò¿.[óTéÔ$.ïâÒ;Çw¶Í-“G«¾ÎÜ¥öÂÚS—ÚVËà¹çn°uµÝÎ\Ü[É»ç;ÿú¿e¹ò¶üg®Ög¿G‹Ëm™[*5Ë™RÏ}›‡tïç6»Ôe —é ~H/zNaœ~o•\—Àò—áæô¾7DVN <éÉX Ø=©hi f6ÖÌ[඲éE\Z>g£Þz4—œ³þê6ά?~H¯Na&ŽRﭒ뮿±ÝÌô„?YÝÈ-K³_œÒëvÆ6ÍtÇþhujIj#ï[ªÆº]Óö¬Y¿¤{•Wœ`g>Øe×îŒk›Ë ¥ÊTSÏv_—BãçÎÖ[§÷Ø¿|Ê ›%ÜR5éÆþ#¤}ºÑ<:¡çpJPߨÚòÈå|ºB—ô¹hbÍ…v;RÍ€¶vÀjˆ¼ V”IcÑܲ6õS?“êëÙ®œG P=3=9e©Wé÷0 Ÿ:íC#0ÃSÂÉTëºZÎŒ¬Sÿ+ËÄwí:Ké§/­½›-S†kV¤pq¶ ¹`ÖíÿÚ•Õr8Þ%;É)“w"SPn?‹)ÖV[‰7\î×ôéK•Z-¯EÒ›)Ó„ÆŠ)ó -³tÒrH›Õ“æçHKaYÓ–%–ò¦í³¨Ïš6%´Y2cøYÏÕ!áÎV^ñ¯2p­éÊÃ3•þ°ÄìÞ”[‹d¡‹ùÔ2±9Màœú™Yó›S²¾!Wkýf—¼¿þ³Ö‰žRmà›œÙvð ¶ôXLÊ<„LîÒpŸ×­BdöCm¶yQ6/ ó¢`™yQÀæEÍ#5  ¶OšGg‡4Ë…a8Åèvµ÷¼uDämñ,XœNÙ4oÜœ‡”_°Óå{L¨ôÞ«^‰6z¹²}Ô"ÐÍfƒ¨è‚ú×éJ™|Õo- ==5t’õ?@óM?Žú™¶óèºÏÒ¦àø1PazTcõHV CrÉH¨¯4kÉé9µ)ø]n¡ìÖàoΦä6ÜMÉÅh׸˸þ"¦†ÎZ§Ô"¦©`\¾[VîËÔöþé ˜/]Ó^’fzÑš~ösÎr5SkÕô2ÊðB»¡V©ðß©Â]ÂÈ0#s#]U#8:Ì̼Ê+’7Gð)5K>3KPŠçéåKgO¿|ùçb&K³ªãÆv›ýµ½Öæ¶Çò'íîÜáð*BG­zù2½†ð&§@Î Âwrf¡Z?µÑa¸ôøß®B_cËë^ëád7=½Ë-”;i™}Omd¦Moüfþ¥¼ú:mþÛoS·}žÛô=Øt¯Áföl¦.Áæò;°™¹›t¦†º…ÌVæðÊ(Z^k ç‚Ãpg?fmpÜz9f*¹Š`£bÏÔ_¢1¶ ie¡[7_á'nmYe–Ô…†UZëÜ‚·) hœ)ŽPªZb`«°#ƒu+q¨U>-‰KUY!_#Ê8%)’jùÌ?UÈåqUµ4''.‰·o¸¥ö·î¼UfP·›rüyûìår^© Ï‹àÓ;ª-Ù|kk©Ôø2Ë–¿ ©pþFÌÝ…¹"álWoöZesE˜ö÷åâ©L©\‰Œ]*WQ.t[ͳn¯ýæµî>k)£èê,,f f«"Kgû9ÄSJÊb½D¸²ëÕð}d=]ÍÇ6Ðhr»ÕŵªŠîRNAyí@³ÊcÌœò©ö¬ ©¦Õëéð"¿ü4É)y“ž%ý¤¬n;pÔÞ¸s¨ÝëÌ;ö«&Iù£áܨrp‡ž6úhû´kÝ5ΰ““øãI§,që,×’=Gp÷‹/xÙ{´= ßoO£‘·÷è[;è[A‡&Êñ ¶\Ü$zÐ2¿é¥á%2¯kW…ÞÕ9q-¬ð@ë¢ Ðé0‘ ]ÌG†é|–).C€·ŠBx™:—ƒ_ݒѱÝwd‘Ÿ®©<9fèå‡fÐny4¹ñ/F™j”$Å-ª|úÍË_ƒ÷Á‡‹Ô„lubhgF®á½db´Þ’Å‘SŸî¼©33!®—,Ù%YúÔZ âÊ.²°Ø¡Ü ­qœÌG7˜Âab£+÷ù+ iH—%ž gÕÔ'ÚoúÉç`Q‰œ·Rƒ–3œžªÏ•6u6Ðy˜™keÊï›Î”½>Æ>lÒ߈– ]3GG ú'½tñ_ú«Š1HiZð;‹¬ƒËËpÈ~½Ô´µ\ÖU‰í°??«V{§˜&¢ × 8}z|Þ#¸é«I8 8^;:tO.ÓŽ!DñàõŽQǧ ŠpŽ1IÙ×9 WÊ)7GE‡=.0;€Ä¡m¬êÁ.Ä´µtkÏ·ìˆçâ³ün]Üp xû‡ãº(ñI< ÇÓù {i’ø‹Ñ<£·özkïÖíR»ªûmSþpùZV~Ü"a‚¡¼¸#r0ÆŠ›…;©Ô$jò’x1È­FŠ‡®c Ûnçk÷ÎCJóÖ.kžÔ`J}ò÷Æžõ^^Q¢“`ŒAâ5ñú>˜EÁ9 ‡9¤í0º¸g½½‘‘õ Ja¬Z/c’`šÓôŽÁÉÀ1l b}Æ°ªøtð 6¥Âh{ö!'ð¨(¡A%ÒÌEåGå>¨ðšV€;á.~ù—B‹ÊâÕ[hÊÓ€Ÿ€‹>Eš‹ù Ü£x–øÃÅx|#_Nàx ¼ËüáãùhÍ.`s¸3}ªM—LâTí9/“–j®\w‚å_2+Þ9êt} äV.„—šÓ ¡šm5w `tÜ$+QôÈ ´~«{\Äu/¡ãç;”Wr·eÏPëÁW ªZÙØHå”0\’Íÿß«ú½Ýñ¦"up‰øåžy‰K/w—¸„üò¾y9¾TÕX%a±¤yƒ‹oÔ ;4°àa†1@þõÊûêÍÖ¾¼Û§'*u9ŠÏƒÿœ‰Õ©ÀŸ«dßß­º‹ö¸‚1Š/ºø¨¼ªÀ€ÏR÷Ž× œÅgú “"`ŽŠ ‡Îàp… h10îc‚ѬaòJ ºCœ„™³ö“ãMc<êyŒ¨iV¶‹)€+Rh™œbM\‚hFxÕÊ+,ΧGÝt„˜ñ…äì.ÍZnMŒGýà•¥{ÅÚ|–Ëå2nÚÇãw0Q:ÔþÁ|s¿ë|Ñ6ð=& «ú_ñîT½ÜqSH0VëÕ'ý›ð% Ç6þËÛÖDl©ò«ÉÉ›WøÍöò~þ›¾ùùÍ«°õæUÒ[ÕøÒ6>éó]¨ ˆŠ¤"½Œb苽j9ïi¾éÌmþÛ¶5sù´—ù(y‹I5@aa¡ Mt÷ñù€9ŸÖ†>_,&œýØ©Qiœ\âTð<òdéË>®o1^îÆã}¯èA9¸êŠ@a¼n‰v"‘ºq&lÈ3ÊtM¿KìVœn‚ß2Q8¡ìp˜]7¡}(Å8åÿ á/`Å(ͽ„p‰H¯ÔóëÉëIQuŽ[Ï"/sŽ³H#±tÏNŠÿÞs. QÄdœ™3^jŒ0“Ú‰ {Vr1zyÅQIç¥âªºÅŠW„ÿ°™r=[•úÆÆòR¹Ó‰å> äÞ6Œ‡âŽ‹ r×V#! d f—ÊÞÂ9#)îóÒXc^g{0¢v·‡»0K¶È:{Dc%U‡š;åŸÌOsLŠ©Iú$Ø 9åiÿ>vŸGóQÈ '“‰•Èb`Ëó¾Å4zõ«:çIJ®üPGha[—­¼S½zEcw¼Ãð"ÀHñõi,¼-8*å,BÁŒ\p9ÅŸßù\ž9‹j•(Ü*Ó9Å Ñ[”Rá9·*ðuÃ*¥~Ð…ù‹_|þ¢ë|˜Âé©â~E®S•§·¾¼-bB"Ì¢ °Ñ”À+œJŠ¾T%»¦ê`þ›tÃ%rs² +Nï âoáèG(‡”0³_‘Í&e”SU˜7 ˆ¨‘‹ ›'sÝ ¿A˜ ¶>„ƒ…ÕØ&kcVõ˜mòBðr÷C|ß:ù©Ý휷Núp¯]`^Þq²^¦ vŸSØJðM=Êë†ÕAiÛ0½Øb¢ûíqþÑÄ+q9´"¢EŽ:˜zž4¹]á@˜_IÆQ`k˲yˆ›ÎBÚ2¢ˆÐµ\ÿ ÿ¨©x‹J¿¤_—­²†ûÔ@˜Å>м6ìõMGBÖ©ŒâÆã",ÊWRsi¡°AÂÖ¶±˜ê¨â÷QÀÄúWZ4­«Õàt D Ãø•‚ÏŒçÞÂ1Es;ð>kEŒÇŒçPípþLÐ?¢dàøÇÃv×?-»ßá‘N¯c ¶(º½q¡„Ô¯mº•c†$N¡ºtoQ|6Á·‹$°¡$ó HÕ븗67oò¸­nPššÃv\àž7º‡~«Ûít{*g Ïz> €éÍWf•–”'ÆšË '«+ðRþ|Úh‰èÀS OËΙW`,’‚V[¿ãA¦r³d‘çºÐËVs‹ÃèêÖ&1Ý%)Gæø’ 3󒸆ä*¤ôLÂ;ĦÌQ|lâ2²ê(S^$L¥’à†ˆ;Ìý2 Çñ{Ø泌Ö*Þ[ï *7º©äÃÆM°Ô“P@èmâÕ¾™Z&é rÌDÁ-œïM2GŽ’ó¬Í ™l*¡âU<Á«PÔèZd³¢‰ÊCÅK’mR` x~9±Ô,¼žEˆâß&‹‹‹èCx¬„WóiõÂÐ FIìm’¤öô¾W ßU¥z-¹Ú¤aq ¦ª0+Ñß˽ÎeÛÐtÉÝL¿Q¾©G¡›üÅ–kÒ÷”D”V¤U µ^ã Iµù‹DÊÓÓ/¨yÞjþH­q`jÝ6¥rð{gí~ _ˆyy5Yà6o½ì·N0ùVÌ^îQÅØßxßvÛ?Iàß\ëb‚É„JÁºŸØÒȺ¯”¼2VVúAÏê¹­¹DE‚›¢*Ÿ#ùA`Œ¹Y&œÿM÷øç%ü$§í¢˜óE‰½Ò:&ª ú¹äƒò3ØeUEîà²Lh6õ_¯kÛ1ýÜdÊÛ‘º¸œbª¾G¦ í§ø’Böf³  NÖí¯d¼@M~¢I:Ì ½Ád¢Î.ÔùÄûi÷ŽÇÏšò› Š€`3Ï«¶—¤uÐ_RW¢Î¤`CT¾3Ûd»Õ}Òéažvêiö=ô‡GCHâé—N9L¿’*…¯ ÌY¿ƒ©&è£üæ·:“ÅcóÄ_0®­zÏ™â/~¤/~|\ o ÇÍæ゘²?Æùé°uzÜ9l©—òÈßôHôÃcåàßš¦ž©$c†%£ÇÓSúm¾ËïÇöåx ÿÐoU~Ñ»)ýD_ 4ùý˜}2ž¨—<§ÍŸŸQ¾ŽôV=FøÎ:SðSH*ù OðEp}“¦ð±üÔïTVÇÇö³ùj29>N½2etÇÇî«Džó`9ÈÏåñÑ!þÒã•Ÿð®ý¤óäüŽÒ;õ‚ŸÔŠËO|wÚá§x:ñ¹<üû˜Sh˜}ˆÜŸéHwÝŸ}•<:çõãÂq£}Bƒ§øüc ib~Å¿ñíIû).°êŸó¾³ì¾ðÏÇ…šª“cüÕ:l÷ù =.@?q§â+ùIïd¯ñ/x£Zëp+ôÏÃûúÍÃû Bžã;/T~øOÎpÿtº}ë«yiÊ4Žmôl¾â"Ÿ<³¿óSn’4yeÊœuìïðh¾Y‡ õ ËØyM¹ˆýJüøLòÑWýdÁEô’yé”S{%õêq¡Û8âø‰=.ôZ´ÝáüÝ÷Õ= ~Ã[ä¦éþ€g<.ôŒ?ìl`øÚ~~\8;yÑ>9TßÌÓã‚5_zžœ«¿8/‚óDßÓøÙ~æ¯|W«o:Ó:ü¶ïxõÝ~gJ¹0Ì(1ðsŸomõ[½å;RýÖoùfÒê½…íð}8DÏúÂ?é]|þ«z‡?ÛäôÞ<ò7+C‰ún½â2ïþÿí½{_·ò8|þ_…êp N±!—¦§¦ä@€$|K€“6msŽ³Ø‹½íuvm¹ü^û33ºkµëœ¶'ÅŸ–غŒF£Ñh$f¦ñDÕ¦Ââ5‘©ðuC‹©ôc£r*§ÿ¶ÁÐgy@Ú`©Jå?e^g<Õ9ðC¦ÇF…X•> GÝ8Ñ9ü·È•¸¨Õ!7ÄWž†ïVŒtñòb9òü¤œE2…¾mTpãÞæê.=ÂÓ?1­˜]ºµä•x™L2É«CñR€^E&ýKä"Éï"5Ö…cYRÈø y“á@tD|ݨXáŸ7ô/Ì!­'Ó× #h2O–¿6**<ôÿF): ô†þ9è~^6©~ˆt|TdåÉ„ Þ9ð þ RÞÀ?í1%ñ¯•:fuÊJبŒ»§"ƒƒ5r ýœy _ÔH%Д`¦zZ¤r^p+c³ƒvÊFEK)mxdEcñÒ.R<[“%Õ/ÌÙ â,Â;+®2¹+o rÏé_*'6ÁÅ–æ=+a£¢ä¬1qÜ4£”è-mÉlJåÊmösÈ:Ó$¡‹#ºr¡mîŠ tÈ%Ë3=^'³s¼’5é…šcÈ÷"ÚÎœ.*ø­Œ2Ât´8PD\ÊeQ4š`ˆy6";˜•  ´x<ð ž4 ‡)^¬¡ À¡J ]µa…0âÖ"êJ‹®¢(.€è#@4ŒÒoÎSºñOB›Ì$ð'Eƒ>Š+Á_M¸¤¡ŸÓKi‡€ðlþ€-Üâ“:ß §+m Ø^¢£ &ÁŒ9­èª*¬èæs©ÔwÙðŽûî(šDBD[ìøszòK8Ö؉ä’+@j?Ù}ù|§ÉvOÙOQ:‚`Äa 5Ì9$¸Hs™LiXÚ§@›^Œ£Dæ]¿’Q¦dG¾Ê2h7›{Ñ{²æ!?ÀA9Rn‹29|¼\&äD|<ÔìôÉ(¯…Ü¥kÔ%Tæ9äGÎÆIX«ÜF@°”M•)‘‡&lhX’›# E·ñéCóéÁñÖ³Í&b RÍBC€°ÝXà È¢¤Õ"Âᔞâ ÑÉ…†'Íú0(m¡m}l¯#£Š¶5Û`ßiü/v·~d·¶HEÅ‹¼@Ø?Ö?Z÷ôí£ºl¸ ƒ$mZXkçùK]RaÅÙœµ 4£^À~vš ¦“¸ÒM´ÛÉãÝ-•ÈÁíåù%D¶¯æ¢°á5Í­ÔèÚÆMI“®€fØîI]DÄ墌^×)ŒÈE?£S|·×7ÃP¶IN˜ÕÒpòûpÜž¨‚â}-h¤°Œ(È#>:-^—'l"¹(‰ÿN/†'Q0Z¦‰0²4žª¼“/‚‚ùJà è¶.6QB¯©´UTÖ'y¶’>\=»¿r2è6@£af÷'>AøëœTeˆ2_õÄW‘HÒ–·gjšŽ“è &ÑÊ0=ë´»'=þnWVi’à(©@’tRd0ÃÍzWŒ“•Ôî »øàÐN<0D[6­Ÿ­É ¼Îöh¹0ƒ®WœXŠ2ƺŽ{!£¯×˜á†×ÃçI\¨U\™éNúÕšïµ+®8R`IñÂÃ#ƒxß×nž¾þÙO_ˬhÏ›Xã³hlFK&2«KŽ°gʨtá0÷aÁ´+»¥t9$÷Ì 0èw“ÔS ý[Ä7in½±` _|Í«WR츹žˆyÅåDøÀl;*8™·¾'Y¿Â/„2&ÇE²Ï²ö’lÆ“•~Hè GeTì÷øV˜no 1×ÉÌ` yËÌ ¡Þ¡yKDõW,N4?tžf4c4¯n©Ø£9ñòf$Í{—¨4'ÖÝŒè¥Å¡çÄ£\4‹ß3ƒÝ‰rœzß–¬÷Щ÷?ò‡muPTæö 0î˜Û2Õ¾uª=,Wí»Ú%"Ïé>–Š<ת\:^^¹¾7å{#뀜6ã°áGâu{0¯ÚqˆUM^iï=š¾ãìÉÔ*Å仵”,pÑÕ[ØmšñïCsæY1IHàHè“øš}“MI˜ã×V?»‘îHÌz:kL:Oá¾Tî6ï7WY}ק#ñö â÷÷„+»"´ÚýÒ* ¶;ñqtÚJžµäKcJ…““´«señt:ŠÓFz¥0ŸÆ#?¼ž OÞˆÛWX^Qn6‰Ð']¡W ~ÎuìÎŽŸwŸ‘/ðû­‡xO3ˆKÌÆœƒÃcaøZÿy¼\?dõwøÜ"ž ¤Ž‡u@ÚÅS^÷òÁt§<$߆‰+ÊÖX“]B+1µ™Û³µ§^ÇÖl¹vmT­7»J¼§]Ÿ’âbnh@9êÔí¬Î„©iÑ eGÐŽ¹.˜07ž}62z)4ªF¶ÎJÖß›²³áO…ëIÚáqÀ39øÞ›CaïA²º.ÙrButÁ½íb’°‚0b¸¦i¤Œ¢èàð” Ï…y=·QîÂ@7äØY¨Kº3F$¦ŽÌ5z ÚqÔ»w¬’Ô*®«4OðŽ.äÅ¡’õ(çÎé˜eü@2^æ|Qe:F1?×qž'˜TGòÃð9ÂóÇÞéØeszæ÷“ç );é ¶‚St›·€wîeƒÁx¹¤hÅr>{«ÊL¿‰y1/;…!*ûÈ73zdÑUÐOó#b¿®ŒâsÔÒŠ:Zz‚ÍôEy ZÝ»4±Ü°§^&šútŽ4ÎyF\…ŒXœB×õÏÈÂh™æfðpêçÉiKý.ŽSâG!7ìŠSû*yê,‘É å*èÌòqªP*€/XIÌòÂøø–kµG¸Tô#‰ˆÍÈEJ˜¡^2Ô„¬b åƒ-¢Òíq¹ÐŸ6 ?ÑgD¯”Ç«%#Ÿæ"ZàÕâÖ„u±*O¯M¿Ÿ–î+Oéq›94…'¾åéÛO_¼¼ÿ¯‡þÌçAÇŸqкçÏà7˜þ¬dØÀPš“=ĸaòçvÈ-•? tè˜üPÝŸŽÎ¢$!is œ§þµºêÏìýét–âÏâÛ@^’>\Ík*íE9ÜíGÎHˆûIæt’ƒëþ½Ü¬‡œ¬nx2íõ¢ì·'Ó)Ž’¹9‚'Ÿ.wG™DØvy} ëÉÆåÑ—ŽOªÏ¢ðÜ—‡ÛêìS´ófÐëêvø.À}%&IÈÓ+˜ÃMÛÁs¥Òh½xòd÷åN«i|eƒ)Hvt]ÅÝW0mÄ'¿³FÊŸ ó¿:´6z¡©Ã:?M´ßT¦•[ÍŠ÷ hS˜oÃÿ;Gm| À“ïÁ¨õ”³ðgΛQçù§÷1©ôh„G%Ó$Ä#³´ø“?ÌpL¹ÿ-^×ÝRÏ’}•ÄKeòôvgaÒî(ÏoŒ¿_d®F5.,ÉÇ(}ý¬D½½ôõDS´”ͪ‡µn¡ktc±j.ÁD ÷‘_å¯[&rÆc ü†”%Ìšö9ÎqtªSƒÅ0*òK3÷Õ°½óïnaMš¦0TbLþ­àŽUDƒè§z=Ý°aiºç•$Ì€T¤ShrâùÁ°… 1°v¼®šÆ`N9Â4â•?j2q/¸ÍJ¥pàšÎÛu5›Pgãöü¸‹…Ï܈ÖÛrh€‚ˆ;4®ä€.>^)P8ùÉz–{ÏÔfÀ:ü uø`vhM•–µŠÐÛ}ήϧBÃq½f‹tVóñ#=ª>]la‰Ï^: %Ë-þî0S±â¦¸Ãì{r?k‚ç!yÉ9â6]™‰Ùåø…Un-ˆBÎ5Üâ£cŸ×«I<íô1(‘~GZïw“fåVÝ®’¹jP0Ô5³˜¶9.MYD–#JóÏ°o@¬9+½Ç—ûû‡ZUs¡/F_:•Îfri Ó@¸^;.¥…'•±ò¼¢Dù®WºŸj|\c¦7*üÿ®¤1ÝÐE$½úÕÐ V}JO¥oé. 6U/¶ˆƒèßÂÌý$d¼'ñSE¾@¨ÃNÙ$#¿ŒrI³°´pôdƒxæg’Ë-Ž^¢”Ói+B˜R NÊ̯11 gÃÙÑU¼„¿ÅS±r•W¹‡ùU©p(ï ¶Úa’-¢göݪ¦³.ô~µÓ:†_5…ÿ¢lÂrê•-§½{Ý]sàÛѲJcDqÚ8ÝõWñÒ+Ô˜¤Å Ôÿ¼T‘L§8lgòØ‹ý9qY.w Wv“$B§%Iíú#¥:&f›o еÛõÃm¥šÓJU±¿—r›ÂÒ¥­%*=Ò `L¾41I:ªŒ=•ÐºWã̪ÄÁ}({Ä|¥%þ†½V˜.lƒÍÀÐwÅuu%<ˆ›^””µòå`ÒeòœaÒ5ô5`VôårÓŽ&-)ìTKÅgFp4ø’G)­Y0ÐdMÞÀ¨ÙW~á$&9L(nBVÌTF°ƒ·¼‚RŽÏœÒä¯T._”«àaô|ÓdšyàìçÙý$7Æ¢<Õ ‰^ ÿË’üª/AðËᛑ>Æ¡†ðC{"ûHBæ؛үõ¾sU´W¹N[U:ø+yÄ,OÔZo¦•¸{qáBùÊ}•oÆmÿ³ ˜öZ¿Ša‰XBm6eY~Mè%´r¿h+­â³¨\Xâ>}jÍdw…³KÂUÄnšñv ¦Tiþ9““­G3í¸“G.d…m“=€+mÓƒ@W:6L‹8Ž‰‚¦“ã'Ta!E®œöóˆV§bº 6úex˶EñaZÀeEe²´+Åo%ññn~ôâ6ᄱ‘Ç°X“Æ›©hâÀÏ#Fn›ÞîkƒÞ¹Ð@Ú[TP†ÂN*ÍO‰œlE‹L;yÔ(lÛKŸ1Ü\h“gAgÑ*×ÌÎÀ?·ŒŸ–%‹w`3ðÌ£õµp÷Ž…6ËHëR‹âÊäÔÔÞdZŽréÏVÌ´“G±Â¶½OæBýšÀ"ˆñÈÀ@ËHõ%·€"‹§½<ÂÌÄÁKëUÁ\HdB´ˆd½X0P´Òý„*(¢Håm7X¥pñÌx2r©w%­ôk9è§R^¾"Q¶­<úÌhßOûEHÝ}^bë§T›jΛw'+‡‚…¥4spp©™y##©[O?¥]{øùp¢ÇˆÞ&¯ÏÊÞÄÝ—ŸCèÙE5µ‹ðÊeà«àš«í’ û\ˆ,¡Y„UVó‚*ÍOÀœlE´L;™ãT2ÀçÄ*lßOûaÈ|HcÁ´ d?41Ñ´srˆUTH“Ìß~‡•Æ©€€í9kkö‹  }Ú““SDÂYZ\NûÅ$,“Ÿ„ú9Ö|ˆ'oÙtSOºLôTbµrò5¡2måÒ¨¸}‡2•aœNâ|”ÈÑjw4¡T—d b;…“ÑWßeå°²Wd¾Š¾R|\d6Ìõ<™øÞ±²±ùFJ¼i2Ý›î‰÷(ÿ;‡ƒØô`|@qçÚPÐaX/ ÆýëC’^„® Hûº.¤¬¬kC¾® GzNº. å_éÚ€Fƒ÷séšx¸70Â[Ôõ!ý>—ŽIT×…£<¹\Ð\D€ô¥u}8É›¹!]ׄ޾® Dù ». éQìÚpÒ¹pŽíÍìÚДËt9:?hs“Ú®ë¿ëÃNÞ® Ètw}XÜÁÜuá8Nª®Nxµ»6 éﺀ<>’® RúÝ». z/+öLW“Ž!§Ï^uþ`Éduþ`ÉjõÊ`Ý}›2 8¼<@×ܲwµ¡.²ï3ì?hey•&\‚:†‡s„xÕqrê+×9óÝVά>Ê™°ÒÆ}óàqC6¼­ë¤9À3n[æmþ¤›ué1¬ÝÓþ9Àœnêp|°Ü#ѹÁTçÔó€¨Omh•F«7+”t¤ÏyR¹“á‡{‡‡›­dayS~CG4•Oxt{_\K?¾jÄø®gñõÚ«ü¶ ^cõçǹþ|þ?„ÿŸ0r~€ 7ŽÇ1«wX_ø}ýu\LžÕœêú×aœ¥¤ Gy6(ÀÃã¬/.ü°(ÂȬStxºf}3lµö6[Ï6J5©¶®È‡Öu`P²oâ!Ákø%§2£JlÔ2×åÌpòûçc‡“ß?C¼†ª2Ê(¾ïüañõ ‡Ì•C<–édå‡Ã.[óšOæ$3æÃ.Q·æÌ …Œp6Èàëp€_ÿ3ë”å?;–ðH ÞÿíD‹ Ä%D Õ(-¨gè8™g ]‰Á¸„hQ—;ò¿žh‘,-‚>7¢åO-óâÏŽIŒˆ7Ñ"q ÑB5ŠE‹ê:NæYCWb0.!ZÆå®ý®'Zd‹D‹ Ïhù“D˼øóJž-rBXüպȡþÌX® º<Ù,ùtõËG-¶®€‚æÿæ0ÍÆÛ’m×ëíµ.j¯$ óˆ#âå)#'ÿØúט %_éù$ªŒ²1K¤Î¾þ8T~±7³C…²nVmWÂÍn­`Ô8Ë[ ª ¶2]»¼9Ã|d˜¤„-Äf÷åÈÿœ*o–•)'¿qRåä÷?V®@{¯ 7Ϲ(œ?ÛWLù…É´såÄðU;^ß&ktnDÓµDÓ_½+NÖ ãåKG@½|9G“ :|ŸÓ¥¬ô:×òÆá,èú\/æu ¾¹ðòåå'ƒgg:˜d¶ 4|óþ<k3@);Ž¸,GäXlxL6æÄ!ƒÙbïøÏ‘ƒy³Äå!þ žpHmɉ×½Ún¶jÜ 0¿8J•R¼\g>ð4ß³ãƒwofrÊEœü¼êD:ƒå9ôÕÉæ/fx>ÿîÈ>Xá…³éNE¾úòÂü;/`¼×ÏôO$0æf0QqYÌø—þRø\´cbΊ͒­`ÇÍYžØJuÑ.fÍ(,3¢¦pgFNqq0¢§ˆ8.e¢Äϳ„aw]èIÝõªVŽª*. SÎj»*xŒpYËÅÊ…66Uã!&Îûx܆†÷Œbži dH"2 JåÊÅ_q6…¤Ï^åCVÉðÍÌÐ*Wgµd¬\ ê!EùhÜY¡¥€Ð’õ\*­‰ñP½kós§I<¤À-j¶@->…äTQ ¥æ‰S:Óžù9¦‰†\f¢8x|ÉSÅK˜r“ÅG¥¼éb3Î̹reFùLSÅ RùÉ"^ñq-îq”RÚ"iÖtq‹Ûd¹sŸ-Ü™sÅÅá{¦ˆX~þ¹â'K^ÕÙTÊ›)×Ìœ*We’Ï1SL]jQÉNXv¶xjdäÆçš36è2KÌßhæä§ÔäÉ£UÁJsÙ)t=ÎùLKÎåæRå6;îG)ƒ°OŽ“‹Åý_ÊŸP5HBÆ7€%lPCø3ü mªØΈDÌ:ý`Ô ; Sh9>•P΂$ Nu e›Nµ :‰aÓ t -Ý­§^‹Aci8A"/Úž— †› Pð³ŒÜéC° ¦)ÇM5Æ Ç'Èç½p&Á†èçÒE ¶†8Ý«±*'çQ.³q¦«¦@è®êïˆREŸ;ñpˆÄD# H¾½= ’^8I)Æi ”4'*¢ý& ÇD÷š)’°4À^_¤j¡wM"À.ÀeË¢)\ºñ¤†áh}ó$„†{Ò”®è@ó++œW):wua£ª¢së}÷¨7 €‡àÿ0©‹Ä“m{·uÜn½x LSŒÑ·e 7SÅ6ÇéÅÚ'¹@‚!E6ZXà½áy%)t¤ì¬ª ¶ÎªªúTQ神Œ‡Jc¡ª²‘z0´Â¢–%•D6ã „x`^xfŠ³¨àŠxš(ñPzò·ƒ²=–Ý¢>b«ÓyMZõ,TF Hl¾Z©ìn7óN‚^/ìrY¥‚cwaÖBeoíklø&ñxº» }ÁüiX +ð¯æÄÊ1`Æ+TPÃ&19ãWÓƒŠwÔ˜Éáúëñy÷µ$ Èα0 ¶Ãðû,„æãQ=Zé†g+£)È“{¾¾k’Q®#ñƒg®;@$£`@u@çÝzÙ²™êy͹œ™;<àoþlñN‚†èFsÍbd*øÄ ¯ }Œ°¢ Düuº°°€D^±*;Ó@±êL2i?:ØW¥QkoÁÐ-,Ü‘üSõuÊÐóD)ì ÿ ø*";"caá6«÷(B“)+È/¦-¬` ¨iÇé&1ñH’kÂw KÝ2ªtøÔê8s«²Åg¥óB—œ^eFѸ-sàäxHÁ&²kò‹ehl%ly:¯¤Hå)uJNx7¨»¥‡@‚Øþ]æ÷>¬AöS*çúj¥“vâqÔ¤DÑ{˜S©•nvºµupˆ'ú'¬þVô–’tw͟оHfsldÐ3ŽŠvÊk¢dþl ¢¦¾6d“yŒTÎ4þâ*“µhêr£ÕŒß^½Zùjÿnò¯5–¢âl–54 Ê#í<\³,äS,¢ÙÛ¬ÈQÄ^Jç™Ù+·\ˆYÆ}ìÑ#—W¬Á1.6hΪ!$A «%±{zÄÿiýòþâí_"G%^|Fæ¯qlþMßfGa'†•á^]Œ Òe‹I’.Ò¶poRØ º,¥Óì`u«¼åÓ8n â,ð ÍÒ/¨]»Nú5%¥A‹§MGXçþŠÀ hÛ¼Ô_¤ìEQ±ÁØc(÷†tmàÁ˜†qrãÒ—öÃÁ  Ýg1(ã$†=Ä0¥­ «.õQµQAر©Ââý*0 ²-ì¤Ël^PÛ\ †õúé(Nº‹¸?ÁÝAˆ*J„¤Üâ>GèúÀa0IG1R(|7ÆNay\v€x†”ìcØ¢±°ÑkpŒ arŽÌŽa£ØZ_\lTTã( !µ½wÀ„úÑÄî­cÿjrBËwB܃ °‡Iu‘„{‘f¥"€´^ìï (ª¯¡m5x'mˆN„„§vÚñ¶Tc̉t·Š‚“'$sÞaõoO”F.J9Ülµª¹ è4hˆ'›»{ù Ò7Ñx&ˆÖ»‡ù Þq4ŠA¼ähäàĘ‚#0eœÌ±sttp” BŠ›×°R'⌅}_=úF­¼æœlJ¡tÚé„Ð…I"¶_†ÈY§$™Bç$Y_\Ï~€‡!41ÿ7fÄt4ÁÅ’>È9*‘Ç×ÝuøR¯ƒ‹P±p9:-c”ÇgWô>´Ž¿´äµ âr Ä9#‡¤)¥!oà‰ðY0EmÑìÒ"›¦A/…„ÄéT/èú\€–õ0í¹î2‚ßî­¹4YX°1„þà"!Þ§¨gÇÏÕáþÎö}ñ;u×Q¦uszjÖ2ªøz#¥ê£Î§ÛdM—v$n* |âëµFhªt «+¬…è÷Üæ‹oTÕãƒãͽ&Îdühâ$éU×òÊãÔkâ5ÐM,ßKFùåQbðò(`8üÁ4¿<‰‡¤ ÝËõ àSq‚OÅ…zPŸ:PUsyVyTžf<–J|8á?ÜóºmépsëÇͧ;íÖñÑîþSMìJÅ–—[êà‡Ô˜tÒžD“AX[3@ç°žkkÄ 4‡›„£IÚl²f7OúMv¯ZT³pñä §*ËÔÅ¢À¶7ˆO‚êY¢/H7ö(CƒÆd864QrxÆü%3©k¼BÄ,IÐò l0¬K~5:ˆÖê°(G|a¦+AøÓÎÑãƒÖ‰CDºL¼qoÀ6§ø'.Ñ?€ìÀ‰ì-r,Çá0H.h02Ü¥ ”l#Ÿ“ŒubÍA94VÕ|™¥¸T”3“‚£Ô âɠûrË>‘™Óêñ‹§G;‡Gǵªfýt8ñhIôo‹|$’}SÚG€Ì+Rh^®Th]']µiÜ@íl=ÛÙú‘o¬a±×ã~…ŒHý›8:”ó1vý‹ke€'²Y‘¤J»yPÿ¿ 5q@…ì rvõyûe@¾T5Gg×­‰2²5H‘'^‹ ˆœ¢Ûo¦ŽAP:ÈøR ¬*ò8…ázº°D?Ú{Ç{»6Ä:O<<:xz´ùœU>çH®è3:•4J¤ ÇNÊs#.2j¯½ÛǺhÐ.50Ú™£®õÌI—Y¼ÄVT Èç>‹œX|cîiÆJæ;гh\wqbŽ“üÚÙÞ Dèu4‰øw‡@N¢"Oÿ²‰#CSròx"^"2ÉŠD2çË&’>ÎÉäfŽ„òd(Ré¼/›X*º6§•/V7’*›®(¥²¾lBa0M'ùË!S&YQIæ|ÙD²±¡Ì‡XÞ,E03÷ Ÿ‚ÎSp>sƒ½ÓtÌÉÕ“Ò.ðePÅ%æ¤óE9F¢eÓ¹TÖN(+¾µ V^ðl"™?SÓÍÊÿ;Oõ1ˆç Þ®‰—Étˆ'ó¿p'£I'FBÐyr\iWTD‹czZÊÚ= ‡ñYØejÒp¨‹‡ø2‘Nï‡oðM†™Š÷d™œN4»Q†ÅÒ¦Y:ýYùí?ßþ»°ðêÕÿ¬¼‚Ï×+=ñ~p½0 “õRpÌwZ¼ƒ‹kúWÛxéHCé}ìÈm‚Å{GnìÂ=VÓЪçÊÇkÃòO•±»³òѵŽÆjÆc´…²¿³r§f¾¿}­¿ª²UŽà­[Œã¸¸òjeå«îàðQ´–.¯‡KËË‹f%º(¾ö™”k齶åœbÈ’g$ Å«Þ†zÖ«˜ÂxÓ« a½îŠUWÃD‰d ‘_5Ÿ¢š{1“±yXÖw bN£‘·«O.Æ€:¾v‡xuõÝê*4û.ì°NwÙô›äüûð‰½Zó˜ÝSošÉ´©À_guk1Ðy|”` ŒÃ”T3–°Ÿµo /5n%0ʼÍ"«ê,rÒã#53ÎiÄSÜg Lo¬õE³ýŒsž¯Í²·–¹©Ÿ#%T³¤ýò~FagÈ!ÿîº,¹†?ï­{¬Ùh'á ˜DgÑû°¦rFá¹\ÖÑŒd@ ‹Ba§–‡’mu²íˆçúKn©W¦&,4|•9y*ýÕ«ªÛ¤¼†µ×Çõ&%¢X{Žz“>×;ÌtôÀN/›,K‹œg³úÑ[NÏŒÛÞY4Šæö–oçd†¯ƒVžÑÉl{µ|µ¦eÝ°‰É@®šPß•b>ñõí·„^F„-÷âo!ÈÐÅáðUÀƒX}Þ¤ì®%ƒo’µéY®6I•Ðû÷ö¹/¼¡Á¡p:pØõ#ʳô0üVï½ÆŠãèY<F¦ÆD= „,ô“ñô×ÝCÈÇÚ;û?ÕBÀæéJ (Ûè½—Êâ8&+ [c¤ÖO î½K5ÿÚ½3þ}©×¿ÿĈƒ“÷÷ Qà8 .Kè0 ±‡T88<&<ÜæïK´þîý¥Ú~ù+6‡ýçßêõð{÷Þ×ûweš‡‚¿lûyóhwÿi“U[Ó1ႇ…’èdŠ¯œYtú°[Á·[CØ<¥¨\á£-.$äÖAØ :ø­—CôVÁ Óñnß;è~¢AÆÎÙÖw'܇9«@ìaŽ &q/Ä7g¸ònN'1½»×X0f“P"á£Ù¯%H–öƒ¤$É°hÝ¢´š}ÝŪŸ‡(„‡A’’³«ÍšÆœ&öªK“- ò+·¨…ä­“nüœÝµQ™×,2‘"uíxóèéÎ1üθ¾¸Ñ\,nQ¸˜Î5¦#ø"ÜŸ *¤ZÒ[Fîm†ýDOP¹G–iàx7€GègfÂzÓ F“=°ôƒ‰‚¤˜ƒ¼½ Nëh¥ŒEºìäB¾¨ Fä‡ßw w>C¯d¹½]—lis(ÕÕÍ£­g»?áŽVlï©|G¬³9,Ðí°Œ WöpD|Q¬àŒ•…΀2 £Aƒ"Þ©ê(³•ßUþUÖŽL±àJ…b~\Š ¢Cÿ 4-,(ªq±§Í*†nfµ¢×Ï­Ù#5;•ŸÀêtù‚ž™G ŸÌ˵ní*èu‚èb &øñ½«¹ ü•­p”­CÅÝĨ÷¹âí8ï¿ñ] Æïáé„§Ø (ˆÍ*³AØÆÌ!·y®ÅßmH9ÀR¾Ë1Ž¨øY¯ÝŽ—0FǬÂjnӞŞ[M=×€·$ú:BÍ"ž°²¬cAg¢¢óÇx4¸ þ"7/Ry§U_‹cÄô}9d6¼YCU8R0-¹Ú¤YŠÁSm8ƒWÔºYÎ&'†….ŠÐeh0,Ú>•{¶S¨4ð_1vzí™}Ô'¼+y‹ï:ý%ßVÔ dþîð-\{kogs¿Í-¬<ù@‘šæY`Z”f‚7KiçgvÄy©f$0lÃq¦XA¦_°Tag6(YΟ›—3¢¯Ž¿dÙîú{ZÉ8ÖìÃr«t¤(]$Gh¿1AÇÔ]RÓuuòÒ<…í¦ªË9÷F— ý‡¨1áÛ)h,‡(0ŒüCõ“t‹F•ó·tthú/¤ëÂ"Jac16“åâϬž‘UŠ B”­)™×­Þî”5bú  ,ØNPì%6és8ßËÄ.'ñ”Ë 5©½²BÓ–=,ãjg„ w….û]CëS„³}!á΢&žÞ˜£ˆ?Qå©ô'CXÂñ¯™M¿)?ƸâžÆöê¿E¾µTú‚ý‡ù£7!_–ë­Þh{füð) ª§Ž’¡+Ú\¨ rÒ˜¿|ðMRÉr’é_¾zYÂü6~»§üðÁÀd Ä85ê¤Þ*©UCiùYAÔÌú)¿òl³ììV¼oz0 Úÿ‹ÌÉLg‘ẺÊò$µ8®iÉ-clqf“ÓÝ£áüðÄ¥«Tˆ?¾Pü€|`¿w­¬#ùÁºX^¸DHç9<'š‘]Ç3¡¨Ð6Yžç&Ù”i䙥îˆÃgû¿ÀØâ¾_é/ýÁ£L‹¼qÖ^§I˜öÅ1¶±/ÕÐ(èì«Ÿp¬ªÊ.±UMïÁÜ5“¨™ußÉ´¹„\4Ètƒ)¦.§™ºÙgÂÄ€ÉKZµàIÔ|ø|€ÿÞýîÛûæ¿”µz÷á?îÞûî[H½¿úíìÞ]}xÿÞ?Øÿ!EgÔ¿ÿ#Ÿ•;v‡mÅã‹$êõ'ìî÷ÿú×2þýž= Fiýÿìqö‡Ëlsëü܇ UìZKÔùþ.ÖüþZ…½ “ø”H@°HK³M/TïŠÓ09C!áƒó}ý°‚yž@®ÕƒÎ›å¬±Á袑 Á?Ûm±ç›Ç;G»›{ ¾ƒfüÓîöÎ6ÛlÁÏeöóîñ3¶ù¸u°÷âxgﶀæ‹G›ûÇ¿0XG;­ÖÎ6B:8b»Ï÷vw¶ûý_Ø‹ÖÜ‘tM%aq«Üðøæ  = ¹PB¹& †Áfr˜=‚ÙƒtÙˆ˜®@_ Ð'ŸFÐ¥î´CçO8û—_„A .øÝ ¢žL{=¢áh¨uAGP%è Ì ;æäÁ¿j¶©ÉrÐeý“Áv§Ï[¼¼¿Ó‡¿ü'ª&†oÛ–ùõOF=—¥ï]ôW°€ìl㌊RC÷ùHûˆšÜÈS%lfγí£%®6MÏt¶Ð˜ÑÎh›ô«ª„;m7õ­=G¿þÚhæm-³7ÇO/nA³¦’?¹›÷±µs‡¡Û=eÑdßwK )XŽ»Û§S>ëàc™Ñ5g41<”¨¨Î /uh€B"í¶ÚOŽ`ißÞÝÚÞÜÞ>jµ÷w÷ˆ®5³ë} ÝáñtÕ'’fg¨ú5 ôñ2­‰Eñm*½Ô_¦ Èùmê1á—¡° &­õÙ7¼Ný0tyÓäÁ-xŠÈ¿òê?ŠŸo‹7ŒR?H]ŸÒ÷€½eDò1óìIµ†SQ÷ZlV’…Ê}Ã4ò©`v%Ó ï™†uV»f'ŽåYⶽÛ:Ü#ìD!q º.‹ýÓÁÐàů4g¾Å³·,åEùJ,$-®²Ë¸ü I™B}ÞR”:hBO„»lðÕQÑ£®ÉÆA/äê^à÷)T< a%á!¯±^#oºC:†Ih6gH•úÍÏ5´Ç/|…Ø §¸ÆÀ*áÝÃEÔ> ÈƸþqÅ /9 »<¥\di!ÖÙ·XÖ`Á ñŒŒW…Þ®ŽÄŸ`5YÄ¥ƒÛ‘ÆÕdŸ:û¦06VÀúŸ*ÎÌŬ&%.å©ŠKr —åh¾­­¹p>•R›#ybd]•:Ÿ\Õ3šó]Òœ½õm5ZèÍ8æTõã"åxJ5R­+¢^¢G-9Li­®âæƒOEâÉhbL\S±’lQw]ÑH‚Qêö eóňêá¢[Þyec¨ÍÁyp‘ †¥s’šø¥Tàýx"6œ îH÷Ç{Î7xx‰ ,z…¡­`8Ï`_‹ÍéDªÄx©Aqí¤g0e…¯ì¤ÂŸ¹’ÀUuè’ 1SõŽ¾ËÃŽòIZæظ͡S8ú4Ø?P7uÖu[™².ˆ ¶ÿ\eêÓUôF¯°ÌÓhrT‚b}€„¹«‘k W‰éÓ¢¨U~õ¹·¹•ŒN§×[íñô%{·vb¶¼”ËÅu‰(`wí;])Xx¥ÜåàéV])³&d0¨iŒ¥ gIÈÔ^£;ð^‚?;ÚÙÜnqÛ ”Ocno™NX$‚n2ý[,ÿ‚^ƽq$~¸®‰^öUÌbÆ ²¼ ÌžiÁR-ë ç9b9éăù:@³\ùS„x¡VC••6= mËX—1zü&ÌgÖòÇeÊ°$ÏȪ?.h{1 ãiŠG7üdʵè(MV[:‡NÖ+O}„gl¤id±šŽÐõ':÷SvMÜ(™f L®@ÉS+œ5‚’¤5ÅÓ^_.üƒø|™«n—qs(:Ñ¢$zJÁO¨HalÿZ«­i’y€€úÝ¥a‡è8&{Tç1Vðä;NÝEi–Áǯ@q¨¸S¦ÅæÞîÓýç;ûÇ ëïf÷’—Ön+"%”g¥µ5K{À(œ¯(«€p·»^òLÊÞˆ«çs~V+önœÒ\L™ÆCJÔ»1 EÇ4YðžOhQ`Š#¦æ;¿´?nÚ ¤9Œ¼µšx9*ùH"€!â!áÚ.¯ô9Œq:=h÷,=¸h*ž»m·C‹w;KÛ¿ìo>ßÝjïl¢NTCµAæ=oý¼»ÿº‚r™Ø-µµcÕÜú婨j$n¹7 –õÚÅ(À÷Žƒè$ ЩäRÍ=É¥M?ƒVfÇ ¹y{OÝF#Ýœ Bmäõ13¿L³bMÀn))6 FSKÀé$-þဈ}rŽÌ³&~𕩻׊Y”ü™a/l}×èP8¹hZRæþ¯Gs»Õ>&Ï2#Dî:y‘½ý§ÇÏšŸ´4å\Ý8× €Ú)<6£³'oÖŠš¼{ü|óð²Í¯³ŸŽ¶ Ó.¡µj•y„{vrÝ¡dwÔVIœªYôÿŒiTóŠW`¹¢õ©¶n•'Þ¡æÖJã¨TÊê¾uÙ9}–\ªV.¡I×¹ù,¹‹â`ÂmeòHãM%&'f×úTRg Uijöì 7À¹zà8 A¢ 5¯64{ £ÖÏÛ¨åHÝPÔ*˜0s Í‚zÊ×ue*2%†²ö7ü²Y3šÊœõp;ÈüS1ŽQ-{Ê´DKa•_H$t"ù7£’A‹¡4 %;KeÿQÏBT÷póÁµçFúÙßÿ­Þÿî;Çþïþw÷îßØÿýÉèIøN_87€Ó{#v÷¡Né â“`ÀgžË$ºÝ ùËxSõrÝ8‰»ê×é`šöñ•¡ø¬i?ŒÏXò¯utÛžŽ+ZGhÀ7Ÿ›ÏÍçæsó¹ùÜ|n>7Ÿ›ÏÍçæsó¹ùÜ|n>7Ÿ›ÏÍçæsóùb>ÿ?HÎîHD./asymptote-2.41/runbacktrace.symbols.h0000644000175000017500000000102213064427142020034 0ustar norbertnorbert/***** * This file is automatically generated by findsym.pl * Changes will be overwritten. *****/ // If the ADDSYMBOL macro is not already defined, define it with the default // purpose of referring to an external pre-translated symbol, such that // SYM(name) also refers to that symbol. #ifndef ADDSYMBOL #define ADDSYMBOL(name) extern sym::symbol PRETRANSLATED_SYMBOL_##name #define SYM(name) PRETRANSLATED_SYMBOL_##name #endif ADDSYMBOL(generate_random_backtrace); ADDSYMBOL(n); ADDSYMBOL(print_random_addresses); ./asymptote-2.41/install-sh0000755000175000017500000003253713064427076015561 0ustar norbertnorbert#!/bin/sh # install - install a program, script, or datafile scriptversion=2009-04-28.21; # UTC # 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. nl=' ' IFS=" "" $nl" # set DOITPROG to echo to test this script # Don't use :- since 4.3BSD and earlier shells don't like it. doit=${DOITPROG-} if test -z "$doit"; then doit_exec=exec else doit_exec=$doit fi # Put in absolute file names if you don't have them in your path; # or use environment vars. chgrpprog=${CHGRPPROG-chgrp} chmodprog=${CHMODPROG-chmod} chownprog=${CHOWNPROG-chown} cmpprog=${CMPPROG-cmp} cpprog=${CPPROG-cp} mkdirprog=${MKDIRPROG-mkdir} mvprog=${MVPROG-mv} rmprog=${RMPROG-rm} stripprog=${STRIPPROG-strip} posix_glob='?' initialize_posix_glob=' test "$posix_glob" != "?" || { if (set -f) 2>/dev/null; then posix_glob= else posix_glob=: fi } ' posix_mkdir= # Desired mode of installed file. mode=0755 chgrpcmd= chmodcmd=$chmodprog chowncmd= mvcmd=$mvprog rmcmd="$rmprog -f" stripcmd= src= dst= dir_arg= dst_arg= copy_on_change=false 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: --help display this help and exit. --version display version info and exit. -c (ignored) -C install only if different (preserve the last data modification time) -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. Environment variables override the default commands: CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG RMPROG STRIPPROG " while test $# -ne 0; do case $1 in -c) ;; -C) copy_on_change=true;; -d) dir_arg=true;; -g) chgrpcmd="$chgrpprog $2" shift;; --help) echo "$usage"; exit $?;; -m) mode=$2 case $mode in *' '* | *' '* | *' '* | *'*'* | *'?'* | *'['*) echo "$0: invalid mode: $mode" >&2 exit 1;; esac shift;; -o) chowncmd="$chownprog $2" shift;; -s) stripcmd=$stripprog;; -t) dst_arg=$2 shift;; -T) no_target_directory=true;; --version) echo "$0 $scriptversion"; exit $?;; --) shift break;; -*) echo "$0: invalid option: $1" >&2 exit 1;; *) break;; esac shift done if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then # When -d is used, all remaining arguments are directories to create. # When -t is used, the destination is already specified. # Otherwise, the last argument is the destination. Remove it from $@. for arg do if test -n "$dst_arg"; then # $@ is not empty: it contains at least $arg. set fnord "$@" "$dst_arg" shift # fnord fi shift # arg dst_arg=$arg done fi if test $# -eq 0; 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 if test -z "$dir_arg"; then trap '(exit $?); exit' 1 2 13 15 # Set umask so as not to create temps with too-generous modes. # However, 'strip' requires both read and write access to temps. case $mode in # Optimize common cases. *644) cp_umask=133;; *755) cp_umask=22;; *[0-7]) if test -z "$stripcmd"; then u_plus_rw= else u_plus_rw='% 200' fi cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;; *) if test -z "$stripcmd"; then u_plus_rw= else u_plus_rw=,u+rw fi cp_umask=$mode$u_plus_rw;; esac fi for src do # Protect names starting with `-'. case $src in -*) src=./$src;; esac if test -n "$dir_arg"; then dst=$src dstdir=$dst test -d "$dstdir" dstdir_status=$? 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 "$dst_arg"; then echo "$0: no destination specified." >&2 exit 1 fi dst=$dst_arg # 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: $dst_arg: Is a directory" >&2 exit 1 fi dstdir=$dst dst=$dstdir/`basename "$src"` dstdir_status=0 else # Prefer dirname, but fall back on a substitute if dirname fails. dstdir=` (dirname "$dst") 2>/dev/null || expr X"$dst" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ X"$dst" : 'X\(//\)[^/]' \| \ X"$dst" : 'X\(//\)$' \| \ X"$dst" : 'X\(/\)' \| . 2>/dev/null || echo X"$dst" | sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ s//\1/ q } /^X\(\/\/\)[^/].*/{ s//\1/ q } /^X\(\/\/\)$/{ s//\1/ q } /^X\(\/\).*/{ s//\1/ q } s/.*/./; q' ` test -d "$dstdir" dstdir_status=$? fi fi obsolete_mkdir_used=false if test $dstdir_status != 0; then case $posix_mkdir in '') # Create intermediate dirs using mode 755 as modified by the umask. # This is like FreeBSD 'install' as of 1997-10-28. umask=`umask` case $stripcmd.$umask in # Optimize common cases. *[2367][2367]) mkdir_umask=$umask;; .*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;; *[0-7]) mkdir_umask=`expr $umask + 22 \ - $umask % 100 % 40 + $umask % 20 \ - $umask % 10 % 4 + $umask % 2 `;; *) mkdir_umask=$umask,go-w;; esac # With -d, create the new directory with the user-specified mode. # Otherwise, rely on $mkdir_umask. if test -n "$dir_arg"; then mkdir_mode=-m$mode else mkdir_mode= fi posix_mkdir=false case $umask in *[123567][0-7][0-7]) # POSIX mkdir -p sets u+wx bits regardless of umask, which # is incompatible with FreeBSD 'install' when (umask & 300) != 0. ;; *) tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$ trap 'ret=$?; rmdir "$tmpdir/d" "$tmpdir" 2>/dev/null; exit $ret' 0 if (umask $mkdir_umask && exec $mkdirprog $mkdir_mode -p -- "$tmpdir/d") >/dev/null 2>&1 then if test -z "$dir_arg" || { # Check for POSIX incompatibilities with -m. # HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or # other-writeable bit of parent directory when it shouldn't. # FreeBSD 6.1 mkdir -m -p sets mode of existing directory. ls_ld_tmpdir=`ls -ld "$tmpdir"` case $ls_ld_tmpdir in d????-?r-*) different_mode=700;; d????-?--*) different_mode=755;; *) false;; esac && $mkdirprog -m$different_mode -p -- "$tmpdir" && { ls_ld_tmpdir_1=`ls -ld "$tmpdir"` test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1" } } then posix_mkdir=: fi rmdir "$tmpdir/d" "$tmpdir" else # Remove any dirs left behind by ancient mkdir implementations. rmdir ./$mkdir_mode ./-p ./-- 2>/dev/null fi trap '' 0;; esac;; esac if $posix_mkdir && ( umask $mkdir_umask && $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir" ) then : else # The umask is ridiculous, or mkdir does not conform to POSIX, # or it failed possibly due to a race condition. Create the # directory the slow way, step by step, checking for races as we go. case $dstdir in /*) prefix='/';; -*) prefix='./';; *) prefix='';; esac eval "$initialize_posix_glob" oIFS=$IFS IFS=/ $posix_glob set -f set fnord $dstdir shift $posix_glob set +f IFS=$oIFS prefixes= for d do test -z "$d" && continue prefix=$prefix$d if test -d "$prefix"; then prefixes= else if $posix_mkdir; then (umask=$mkdir_umask && $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break # Don't fail if two instances are running concurrently. test -d "$prefix" || exit 1 else case $prefix in *\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;; *) qprefix=$prefix;; esac prefixes="$prefixes '$qprefix'" fi fi prefix=$prefix/ done if test -n "$prefixes"; then # Don't fail if two instances are running concurrently. (umask $mkdir_umask && eval "\$doit_exec \$mkdirprog $prefixes") || test -d "$dstdir" || exit 1 obsolete_mkdir_used=true fi fi fi if test -n "$dir_arg"; then { test -z "$chowncmd" || $doit $chowncmd "$dst"; } && { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } && { test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false || test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1 else # 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 # Copy the file name to the temp name. (umask $cp_umask && $doit_exec $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 $mode "$dsttmp"; } && # If -C, don't bother to copy if it wouldn't change the file. if $copy_on_change && old=`LC_ALL=C ls -dlL "$dst" 2>/dev/null` && new=`LC_ALL=C ls -dlL "$dsttmp" 2>/dev/null` && eval "$initialize_posix_glob" && $posix_glob set -f && set X $old && old=:$2:$4:$5:$6 && set X $new && new=:$2:$4:$5:$6 && $posix_glob set +f && test "$old" = "$new" && $cmpprog "$dst" "$dsttmp" >/dev/null 2>&1 then rm -f "$dsttmp" else # Rename the file to the real destination. $doit $mvcmd -f "$dsttmp" "$dst" 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. { test ! -f "$dst" || $doit $rmcmd -f "$dst" 2>/dev/null || { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null && { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; } } || { echo "$0: cannot unlink or rename $dst" >&2 (exit 1); exit 1 } } && # Now rename the file to the real destination. $doit $mvcmd "$dsttmp" "$dst" } fi || exit 1 trap '' 0 fi done # Local variables: # eval: (add-hook 'write-file-hooks 'time-stamp) # time-stamp-start: "scriptversion=" # time-stamp-format: "%:y-%02m-%02d.%02H" # time-stamp-time-zone: "UTC" # time-stamp-end: "; # UTC" # End: ./asymptote-2.41/pen.h0000644000175000017500000006677113064427076014517 0ustar norbertnorbert/***** * pen.h * John Bowman 2003/03/23 * *****/ #ifndef PEN_H #define PEN_H #include #include "transform.h" #include "settings.h" #include "bbox.h" #include "common.h" #include "path.h" #include "array.h" namespace camp { extern const double tex2ps; extern const double ps2tex; class LineType { public: vm::array pattern; // Array of PostScript style line pattern entries. double offset; // The offset in the pattern at which to start drawing. bool scale; // Scale the line type values by the pen width? bool adjust; // Adjust the line type values to fit the arclength? bool isdefault; LineType() : offset(0.0), scale(true), adjust(true), isdefault(true) {} LineType(vm::array pattern, double offset, bool scale, bool adjust) : pattern(pattern), offset(offset), scale(scale), adjust(adjust), isdefault(false) {} void Scale(double factor) { size_t n=pattern.size(); for(size_t i=0; i < n; i++) pattern[i]=vm::read(pattern,i)*factor; offset *= factor; } }; extern const char* DEFPAT; extern const char* DEFLATEXFONT; extern const char* DEFCONTEXTFONT; extern const char* DEFTEXFONT; extern const double DEFWIDTH; extern const Int DEFCAP; extern const Int DEFJOIN; extern const double DEFMITER; extern const transform nullTransform; static const struct invisiblepen_t {} invisiblepen={}; static const struct setlinewidth_t {} setlinewidth={}; static const struct setfont_t {} setfont={}; static const struct setfontsize_t {} setfontsize={}; static const struct setpattern_t {} setpattern={}; static const struct setlinecap_t {} setlinecap={}; static const struct setlinejoin_t {} setlinejoin={}; static const struct setmiterlimit_t {} setmiterlimit={}; static const struct setoverwrite_t {} setoverwrite={}; static const struct initialpen_t {} initialpen={}; static const struct resolvepen_t {} resolvepen={}; extern const char* PSCap[]; extern const char* Cap[]; extern const Int nCap; extern const char* Join[]; extern const Int nJoin; enum overwrite_t {DEFWRITE=-1,ALLOW,SUPPRESS,SUPPRESSQUIET,MOVE,MOVEQUIET}; extern const char* OverwriteTag[]; extern const Int nOverwrite; enum FillRule {DEFFILL=-1,ZEROWINDING,EVENODD}; extern const char* FillRuleTag[]; extern const Int nFill; enum BaseLine {DEFBASE=-1,NOBASEALIGN,BASEALIGN}; extern const char* BaseLineTag[]; extern const Int nBaseLine; enum ColorSpace {DEFCOLOR=0,INVISIBLE,GRAYSCALE,RGB,CMYK,PATTERN}; extern const size_t ColorComponents[]; extern const char* ColorDeviceSuffix[]; extern const unsigned nColorSpace; inline bool operator == (const vm::array& a, const vm::array& b) { size_t asize=a.size(); size_t bsize=b.size(); if(asize != bsize) return false; for(size_t i=0; i < asize; ++i) if(vm::read(a,i) != vm::read(b,i)) return false; return true; } inline bool operator == (const LineType& a, const LineType& b) { return a.pattern == b.pattern && a.offset == b.offset && a.scale == b.scale && a.adjust == b.adjust; } inline ostream& operator << (ostream& out, const vm::array& a) { out << "["; size_t n=a.size(); if(n > 0) { out << vm::read(a,0); for(size_t i=1; i < n; ++i) out << " " << vm::read(a,i); } out << "]"; return out; } class Transparency { public: string blend; double opacity; bool isdefault; Transparency() : blend("Compatible"), opacity(1.0), isdefault(true) {} Transparency(const string& blend, double opacity) : blend(blend), opacity(opacity), isdefault(false) {} }; inline bool operator == (const Transparency& a, const Transparency& b) { return a.blend == b.blend && a.opacity == b.opacity; } extern const char* BlendMode[]; extern const Int nBlendMode; // Map [0,1] to [0,255] inline unsigned int byte(double r) { if(r < 0.0) r=0.0; else if(r > 1.0) r=1.0; int a=(int)(256.0*r); if(a == 256) a=255; return a; } class pen; pen& defaultpen(); class pen : public gc { LineType line; // Width of line, in PS units. double linewidth; path P; // A polygonal path defining a custom pen nib; // nullpath means the default (typically circular) nib. string font; double fontsize; double lineskip; ColorSpace color; double r,g,b; // RGB or CMY value double grey; // grayscale or K value string pattern; // The name of the user-defined fill/draw pattern FillRule fillrule; // Zero winding-number (default) or even-odd rule BaseLine baseline; // Align to TeX baseline? Transparency transparency; Int linecap; Int linejoin; double miterlimit; overwrite_t overwrite; // The transformation applied to the pen nib for calligraphic effects. // nullTransform means the default (typically identity) transformation. transform t; public: static double pos0(double x) {return x >= 0 ? x : 0;} void greyrange() {if(grey > 1.0) grey=1.0;} void rgbrange() { double sat=rgbsaturation(); if(sat > 1.0) { double scale=1.0/sat; r *= scale; g *= scale; b *= scale; } } void cmykrange() { double sat=cmyksaturation(); if(sat > 1.0) { double scale=1.0/sat; r *= scale; g *= scale; b *= scale; grey *= scale; } } void colorless() { r=g=b=grey=0.0; color=DEFCOLOR; } pen() : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(const LineType& line, double linewidth, const path& P, const string& font, double fontsize, double lineskip, ColorSpace color, double r, double g, double b, double grey, const string& pattern, FillRule fillrule, BaseLine baseline, const Transparency& transparency, Int linecap, Int linejoin, double miterlimit, overwrite_t overwrite, const transform& t) : line(line), linewidth(linewidth), P(P), font(font), fontsize(fontsize), lineskip(lineskip), color(color), r(r), g(g), b(b), grey(grey), pattern(pattern), fillrule(fillrule), baseline(baseline), transparency(transparency), linecap(linecap), linejoin(linejoin), miterlimit(miterlimit), overwrite(overwrite), t(t) {} pen(invisiblepen_t) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(INVISIBLE), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(setlinewidth_t, double linewidth) : line(), linewidth(linewidth), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(path P) : line(), linewidth(DEFWIDTH), P(P), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(const LineType& line) : line(line), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(setfont_t, string font) : line(), linewidth(DEFWIDTH), P(nullpath), font(font), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(setfontsize_t, double fontsize, double lineskip) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(fontsize), lineskip(lineskip), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(setpattern_t, const string& pattern) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(PATTERN), r(0), g(0), b(0), grey(0), pattern(pattern), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(FillRule fillrule) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(fillrule), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(BaseLine baseline) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(baseline), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(const Transparency& transparency) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(transparency), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(setlinecap_t, Int linecap) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(linecap), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(setlinejoin_t, Int linejoin) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(linejoin), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {} pen(setmiterlimit_t, double miterlimit) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(miterlimit), overwrite(DEFWRITE), t(nullTransform) {} pen(setoverwrite_t, overwrite_t overwrite) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(DEFCOLOR), r(0), g(0), b(0), grey(0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(overwrite), t(nullTransform) {} explicit pen(double grey) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(GRAYSCALE), r(0.0), g(0.0), b(0.0), grey(pos0(grey)), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {greyrange();} pen(double r, double g, double b) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(RGB), r(pos0(r)), g(pos0(g)), b(pos0(b)), grey(0.0), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {rgbrange();} pen(double c, double m, double y, double k) : line(), linewidth(DEFWIDTH), P(nullpath), font(""), fontsize(0.0), lineskip(0.0), color(CMYK), r(pos0(c)), g(pos0(m)), b(pos0(y)), grey(pos0(k)), pattern(DEFPAT), fillrule(DEFFILL), baseline(DEFBASE), transparency(), linecap(DEFCAP), linejoin(DEFJOIN), miterlimit(DEFMITER), overwrite(DEFWRITE), t(nullTransform) {cmykrange();} // Construct one pen from another, resolving defaults pen(resolvepen_t, const pen& p) : line(LineType(p.line.pattern,p.line.offset,p.line.scale,p.line.adjust)), linewidth(p.width()), P(p.Path()), font(p.Font()), fontsize(p.size()), lineskip(p.Lineskip()), color(p.colorspace()), r(p.red()), g(p.green()), b(p.blue()), grey(p.gray()), pattern(""), fillrule(p.Fillrule()), baseline(p.Baseline()), transparency(Transparency(p.blend(), p.opacity())), linecap(p.cap()), linejoin(p.join()), miterlimit(p.miter()), overwrite(p.Overwrite()), t(p.getTransform()) {} static pen initialpen() { return pen(LineType(vm::array(0),0.0,true,true),0.5,nullpath,"", 12.0*tex2ps,12.0*1.2*tex2ps,GRAYSCALE, 0.0,0.0,0.0,0.0,"",ZEROWINDING,NOBASEALIGN, Transparency(),1,1,10.0,ALLOW,identity); } pen(initialpen_t) : line(), linewidth(-2.0), P(nullpath), font(""), fontsize(-1.0), lineskip(-1.0), color(INVISIBLE), r(0.0), g(0.0), b(0.0), grey(0.0), pattern(DEFPAT), fillrule(DEFFILL), baseline(NOBASEALIGN), transparency(),linecap(-2), linejoin(-2), miterlimit(-1.0), overwrite(DEFWRITE), t(nullTransform) {} double width() const { return linewidth == DEFWIDTH ? defaultpen().linewidth : linewidth; } path Path() const { return P.empty() ? defaultpen().P : P; } double size() const { return fontsize == 0.0 ? defaultpen().fontsize : fontsize; } string Font() const { if(font.empty()) { if(defaultpen().font.empty()) { string texengine=settings::getSetting("tex"); if(settings::latex(texengine)) return DEFLATEXFONT; else if(texengine == "none") return settings::getSetting("textinitialfont"); else { ostringstream buf; // Work around misalignment in ConTeXt switchtobodyfont if font is not found. if(texengine == "context") buf << "\\switchtobodyfont[" << DEFCONTEXTFONT << "," << size()*ps2tex << "pt]\\removeunwantedspaces%" << newl; else buf << "\\font\\ASYfont=" << DEFTEXFONT << " at " << size()*ps2tex << "pt\\ASYfont"; return buf.str(); } } else return defaultpen().font; } return font; } double Lineskip() const { return lineskip == 0.0 ? defaultpen().lineskip : lineskip; } const LineType *linetype() const { return line.isdefault ? &defaultpen().line : &line; } void adjust(double factor) { if(line.isdefault) line=defaultpen().line; line.Scale(factor); } void setstroke(const vm::array& s) {line.pattern=s;} void setoffset(const double& offset) {line.offset=offset;} string fillpattern() const { return pattern == DEFPAT ? (string)"" : pattern; } FillRule Fillrule() const { return fillrule == DEFFILL ? defaultpen().fillrule : fillrule; } bool evenodd() const { return Fillrule() == EVENODD; } bool inside(Int count) const { return evenodd() ? count % 2 : count != 0; } BaseLine Baseline() const { return baseline == DEFBASE ? defaultpen().baseline : baseline; } Transparency transp() const { return transparency.isdefault ? defaultpen().transparency : transparency; } string blend() const { return transparency.isdefault ? defaultpen().transparency.blend : transparency.blend; } double opacity() const { return transparency.isdefault ? defaultpen().transparency.opacity : transparency.opacity; } Int cap() const { return linecap == DEFCAP ? defaultpen().linecap : linecap; } Int join() const { return linejoin == DEFJOIN ? defaultpen().linejoin : linejoin; } double miter() const { return miterlimit == DEFMITER ? defaultpen().miterlimit : miterlimit; } overwrite_t Overwrite() const { return overwrite == DEFWRITE ? defaultpen().overwrite : overwrite; } ColorSpace colorspace() const { return color == DEFCOLOR ? defaultpen().color : color; } string hex() const { int n=ColorComponents[colorspace()]; ostringstream buf; buf.setf(std::ios::hex,std::ios::basefield); buf.fill('0'); switch(n) { case 0: break; case 1: buf << std::setw(2) << byte(gray()); break; case 3: buf << std::setw(2) << byte(red()) << std::setw(2) << byte(green()) << std::setw(2) << byte(blue()); break; case 4: buf << std::setw(2) << byte(cyan()) << std::setw(2) << byte(magenta()) << std::setw(2) << byte(yellow()) << std::setw(2) << byte(black()); break; default: break; } return buf.str(); } bool invisible() const {return colorspace() == INVISIBLE;} bool grayscale() const {return colorspace() == GRAYSCALE;} bool rgb() const {return colorspace() == RGB;} bool cmyk() const {return colorspace() == CMYK;} double gray() const {return color == DEFCOLOR ? defaultpen().grey : grey;} double red() const {return color == DEFCOLOR ? defaultpen().r : r;} double green() const {return color == DEFCOLOR ? defaultpen().g : g;} double blue() const {return color == DEFCOLOR ? defaultpen().b : b;} double cyan() const {return red();} double magenta() const {return green();} double yellow() const {return blue();} double black() const {return gray();} double rgbsaturation() const {return max(max(r,g),b);} double cmyksaturation() const {return max(rgbsaturation(),black());} void greytorgb() { r=g=b=grey; grey=0.0; color=RGB; } void rgbtogrey() { grey=0.299*r+0.587*g+0.114*b; // Standard YUV luminosity coefficients r=g=b=0.0; color=GRAYSCALE; } void greytocmyk() { grey=1.0-grey; r=g=b=0.0; color=CMYK; } void rgbtocmyk() { double sat=rgbsaturation(); grey=1.0-sat; if(sat) { double scale=1.0/sat; r=1.0-r*scale; g=1.0-g*scale; b=1.0-b*scale; } color=CMYK; } void cmyktorgb() { double sat=1.0-grey; r=(1.0-r)*sat; g=(1.0-g)*sat; b=(1.0-b)*sat; grey=0.0; color=RGB; } void cmyktogrey() { cmyktorgb(); rgbtogrey(); } void togrey() { if(rgb()) rgbtogrey(); else if(cmyk()) cmyktogrey(); } void torgb() { if(cmyk()) cmyktorgb(); else if(grayscale()) greytorgb(); } void tocmyk() { if(rgb()) rgbtocmyk(); else if(grayscale()) greytocmyk(); } void settransparency(const pen& p) { transparency=p.transparency; } void setfont(const pen& p) { font=p.font; } void setfillrule(const pen& p) { fillrule=p.fillrule; } void convert() { if(settings::gray || settings::bw) { if(rgb()) rgbtogrey(); else if(cmyk()) cmyktogrey(); if(settings::bw) {grey=(grey == 1.0) ? 1.0 : 0.0;} } else if(settings::rgb && cmyk()) cmyktorgb(); else if(settings::cmyk && rgb()) rgbtocmyk(); } // Try to upgrade to the specified colorspace. bool promote(ColorSpace c) { if(color == c) return true; switch(color) { case PATTERN: case INVISIBLE: break; case DEFCOLOR: { return true; break; } break; case GRAYSCALE: { if(c == RGB) {greytorgb(); return true;} else if(c == CMYK) {greytocmyk(); return true;} break; } case RGB: { if(c == CMYK) {rgbtocmyk(); return true;} break; } case CMYK: { break; } } return false; } friend pen operator * (double x, const pen& q) { pen p=q; if(x < 0.0) x = 0.0; switch(p.color) { case PATTERN: case INVISIBLE: case DEFCOLOR: break; case GRAYSCALE: { p.grey *= x; p.greyrange(); break; } case RGB: { p.r *= x; p.g *= x; p.b *= x; p.rgbrange(); break; } case CMYK: { p.r *= x; p.g *= x; p.b *= x; p.grey *= x; p.cmykrange(); break; } } return p; } friend pen operator + (const pen& p, const pen& q) { pen P=p; pen Q=q; if(P.color == PATTERN && P.pattern.empty()) P.color=DEFCOLOR; ColorSpace colorspace=(ColorSpace) max((Int) P.color,(Int) Q.color); if(!(p.transparency.isdefault && q.transparency.isdefault)) P.transparency.opacity=max(p.opacity(),q.opacity()); switch(colorspace) { case PATTERN: case INVISIBLE: case DEFCOLOR: break; case GRAYSCALE: { P.grey += Q.grey; P.greyrange(); break; } case RGB: { if(P.color == GRAYSCALE) P.greytorgb(); else if(Q.color == GRAYSCALE) Q.greytorgb(); P.r += Q.r; P.g += Q.g; P.b += Q.b; P.rgbrange(); break; } case CMYK: { if(P.color == GRAYSCALE) P.greytocmyk(); else if(Q.color == GRAYSCALE) Q.greytocmyk(); if(P.color == RGB) P.rgbtocmyk(); else if(Q.color == RGB) Q.rgbtocmyk(); P.r += Q.r; P.g += Q.g; P.b += Q.b; P.grey += Q.grey; P.cmykrange(); break; } } return pen(q.line.isdefault ? p.line : q.line, q.linewidth == DEFWIDTH ? p.linewidth : q.linewidth, q.P.empty() ? p.P : q.P, q.font.empty() ? p.font : q.font, q.fontsize == 0.0 ? p.fontsize : q.fontsize, q.lineskip == 0.0 ? p.lineskip : q.lineskip, colorspace,P.r,P.g,P.b,P.grey, q.pattern == DEFPAT ? p.pattern : q.pattern, q.fillrule == DEFFILL ? p.fillrule : q.fillrule, q.baseline == DEFBASE ? p.baseline : q.baseline, q.transparency.isdefault ? p.transparency : q.transparency, q.linecap == DEFCAP ? p.linecap : q.linecap, q.linejoin == DEFJOIN ? p.linejoin : q.linejoin, q.miterlimit == DEFMITER ? p.miterlimit : q.miterlimit, q.overwrite == DEFWRITE ? p.overwrite : q.overwrite, q.t.isNull() ? p.t : q.t); } friend pen interpolate(const pen& p, const pen& q, double t) { pen P=p; pen Q=q; if(P.color == PATTERN && P.pattern.empty()) P.color=DEFCOLOR; ColorSpace colorspace=(ColorSpace) max((Int) P.color,(Int) Q.color); switch(colorspace) { case PATTERN: case INVISIBLE: case DEFCOLOR: case GRAYSCALE: break; case RGB: { if(P.color == GRAYSCALE) P.greytorgb(); else if(Q.color == GRAYSCALE) Q.greytorgb(); break; } case CMYK: { if(P.color == GRAYSCALE) P.greytocmyk(); else if(Q.color == GRAYSCALE) Q.greytocmyk(); if(P.color == RGB) P.rgbtocmyk(); else if(Q.color == RGB) Q.rgbtocmyk(); break; } } return (1-t)*P+t*Q; } friend bool operator == (const pen& p, const pen& q) { return *(p.linetype()) == *(q.linetype()) && p.width() == q.width() && p.Path() == q.Path() && p.Font() == q.Font() && p.Lineskip() == q.Lineskip() && p.size() == q.size() && p.colorspace() == q.colorspace() && (!(p.grayscale() || p.cmyk()) || p.gray() == q.gray()) && (!(p.rgb() || p.cmyk()) || (p.red() == q.red() && p.green() == q.green() && p.blue() == q.blue())) && p.pattern == q.pattern && p.Fillrule() == q.Fillrule() && p.Baseline() == q.Baseline() && p.transp() == q.transp() && p.cap() == q.cap() && p.join() == q.join() && p.miter() == q.miter() && p.Overwrite() == q.Overwrite() && p.t == q.t; } friend bool operator != (const pen& p, const pen& q) { return !(p == q); } friend ostream& operator << (ostream& out, const pen& p) { out << "("; if(p.line.isdefault) out << "default"; else out << p.line.pattern; if(p.line.offset) out << p.line.offset; if(!p.line.scale) out << " bp"; if(!p.line.adjust) out << " fixed"; if(p.linewidth != DEFWIDTH) out << ", linewidth=" << p.linewidth; if(!p.P.empty()) out << ", path=" << p.P; if(p.linecap != DEFCAP) out << ", linecap=" << Cap[p.linecap]; if(p.linejoin != DEFJOIN) out << ", linejoin=" << Join[p.linejoin]; if(p.miterlimit != DEFMITER) out << ", miterlimit=" << p.miterlimit; if(!p.font.empty()) out << ", font=\"" << p.font << "\""; if(p.fontsize) out << ", fontsize=" << p.fontsize; if(p.lineskip) out << ", lineskip=" << p.lineskip; if(p.color == INVISIBLE) out << ", invisible"; else if(p.color == GRAYSCALE) out << ", gray=" << p.grey; else if(p.color == RGB) out << ", red=" << p.red() << ", green=" << p.green() << ", blue=" << p.blue(); else if(p.color == CMYK) out << ", cyan=" << p.cyan() << ", magenta=" << p.magenta() << ", yellow=" << p.yellow() << ", black=" << p.black(); if(p.pattern != DEFPAT) out << ", pattern=" << "\"" << p.pattern << "\""; if(p.fillrule != DEFFILL) out << ", fillrule=" << FillRuleTag[p.fillrule]; if(p.baseline != DEFBASE) out << ", baseline=" << BaseLineTag[p.baseline]; if(!p.transparency.isdefault) { out << ", opacity=" << p.transparency.opacity; out << ", blend=" << p.transparency.blend; } if(p.overwrite != DEFWRITE) out << ", overwrite=" << OverwriteTag[p.overwrite]; if(!p.t.isNull()) out << ", transform=" << p.t; out << ")"; return out; } const transform getTransform() const { return t.isNull() ? defaultpen().t : t; } // The bounds of the circle or ellipse the pen describes. bbox bounds() const { double maxx, maxy; pair shift; if(!P.empty()) return P.bounds(); transform t=getTransform(); if(t.isIdentity()) { maxx = 1; maxy = 1; shift = pair(0,0); } else { double xx = t.getxx(), xy = t.getxy(), yx = t.getyx(), yy = t.getyy(); // These are the maximum x and y values that a linear transform can map // a point in the unit circle. This can be proven by the Lagrange // Multiplier theorem or by properties of the dot product. maxx = length(pair(xx,xy)); maxy = length(pair(yx,yy)); shift = t*pair(0,0); } bbox b; pair z=0.5*width()*pair(maxx,maxy); b += z + shift; b += -z + shift; return b; } friend pen transformed(const transform& t, const pen& p) { pen ret = p; if(!p.P.empty()) ret.P = p.P.transformed(t); ret.t = p.t.isNull() ? t : t*p.t; return ret; } }; pen transformed(const transform& t, const pen &p); } #endif ./asymptote-2.41/ChangeLog0000644000175000017500000435366613064427076015344 0ustar norbertnorbertcommit 40f27e1424f6c63aa362f16f3c65b9f3d1d6e723 Author: John Bowman Date: Wed Mar 22 01:56:17 2017 -0600 Always use epsdriver. commit ee57aa9c533e4a71fc20151928e5cf418d4effc5 Author: John Bowman Date: Wed Mar 22 00:29:27 2017 -0600 Update bug reporting URL in README. commit 207695a78f697be391991f5c943543ebeccf4e87 Author: John Bowman Date: Tue Mar 21 23:34:36 2017 -0600 Remove temporary ConTeXt log file. commit a981ce85db27372750fd19aec9d4456d3bc0b21a Author: John Bowman Date: Tue Mar 21 23:19:22 2017 -0600 Support eps output with all TeX engines. Work around Imagemagick black background bug in jpg output. commit 3e42b17ffde9941bf0ad6e24a05f73c788d755b5 Author: John Bowman Date: Mon Mar 20 23:05:31 2017 -0600 Remove temporary pbsdat file. commit dacbf47554b36d0571394b3c4d747405e53f2708 Merge: f34a52d c2e4bd5 Author: John Bowman Date: Fri Mar 17 01:48:29 2017 -0600 Merge pull request #38 from ivankokan/master Add improvements for perpendicular marks. commit f34a52dfbebee7100a0d853edda78c99f1e5f2c0 Author: John Bowman Date: Fri Mar 17 01:20:43 2017 -0600 Use different rendering constants for Bezier patches and triangles. Improve flatness test for Bezier triangles. commit 0b59b3b2b2432b3c715eb80f0305c454bd7a9e00 Author: John Bowman Date: Sun Mar 5 14:17:40 2017 -0700 Fix previous commit. commit 9a2b4810156bf34c4257f08dc12595aed9867147 Author: John Bowman Date: Sat Mar 4 18:32:36 2017 -0700 Make perl look in FAQ directory. commit b3322131bebd3a506add235d25ae7ca53ab2efcd Author: John Bowman Date: Thu Mar 2 15:41:45 2017 -0700 Reduce rendering constant back to 0.5. commit 00716297f257c464e97bb0bd6b747c4034bcb97e Author: John Bowman Date: Thu Mar 2 15:10:37 2017 -0700 Remove unused variable. commit 05b6d931d5546359b061e3959817ff8d4936672a Author: John Bowman Date: Thu Mar 2 09:57:58 2017 -0700 Remove out-of-date opengl32.dll and glu32.dll libraries on install. commit 585c158ee53e4d202f1ceda5c12782a06aec57e9 Author: John Bowman Date: Thu Mar 2 00:18:05 2017 -0700 Increment version to 2.41. commit 5a6d3626f3589f7fdc7193dea97ae335ad70b242 Author: John Bowman Date: Wed Mar 1 23:43:49 2017 -0700 Increase adaptive rendering constant to 1.0. commit 35a65e91254f9326e70fcca3c334cc40cb5cb867 Author: John Bowman Date: Wed Mar 1 22:18:51 2017 -0700 Update to more recent system versions of glu32.dll and opengl32.dll libraries, so that UNIX subdivision crack fix also works under MSDOS. commit f846f1d090b8ef8910a891a62b7ddfb945ec8280 Author: John Bowman Date: Wed Mar 1 22:09:50 2017 -0700 Fix multisample detection; remove MSDOS workarounds (tested with freeglut-2.8.1). commit c2e4bd5990b9f3e6963ea80da2eb20d3a48c7a82 Author: ivankokan Date: Wed Mar 1 17:37:51 2017 +0100 markrightangle: margin manipulation removed (it resulted with blank area between the perpendicular mark and a line thinner than currentpen), perpendicular mark now always starts from the "middle" of lines commit 7636977c5c744ba28df9ae21c3dd7530d1beaa5f Author: ivankokan Date: Wed Mar 1 17:37:51 2017 +0100 perpendicularmark: miterjoin added (aesthetic improvement and alignment with existing squarecap) commit 8de2b9cae38a5bdfc29bbe6ee8bec9def0515c5c Author: John Bowman Date: Sat Feb 25 01:45:58 2017 -0700 Use Straightness also for Bezier triangles. commit d4330f044f54bce7122052a8b2e860a39944f58d Author: John Bowman Date: Sat Feb 25 01:31:01 2017 -0700 Optimize Straightness function. commit 8e6fb2dc64f2a7cf43a13f97752f2c5d902f381a Author: John Bowman Date: Fri Feb 24 10:54:48 2017 -0700 Fix straightness test. commit f72338e8be394ab6716a7b488f016bbf7d3123d3 Author: John Bowman Date: Mon Feb 20 11:50:43 2017 -0700 Fix CFLAGS. commit 12af4538ad099cd597c9f6b3c816823fdc0ca7d4 Author: John Bowman Date: Sun Feb 19 11:44:53 2017 -0700 Localize declarations. commit 23a14592eb04fd15a7d062ccc693b225e927a0fe Author: John Bowman Date: Sun Feb 19 11:37:30 2017 -0700 Force draw on color change. commit 6d5ef929f22eb9d7b4f82fe2d828eb6a6b39395f Author: John Bowman Date: Sat Feb 18 20:03:01 2017 -0700 Move compare function to bezierpatch.cc. commit 5da211a76c91fc77111e4ffff2849c14846f95fc Author: John Bowman Date: Wed Feb 15 18:25:34 2017 -0700 Update credits and example. commit 322fba942949338ce0b2a15e6f8a38c5c7f95ff1 Author: John Bowman Date: Wed Feb 15 15:19:55 2017 -0700 Simplify code. commit 9a0372b48f142f6429015f80a18071ee77b796da Author: John Bowman Date: Wed Feb 15 07:52:52 2017 -0700 Revert "Detect material change also for specified vertex colors." This reverts commit c7878da529adde75a929a755dae7a42b2e9a3486. commit c7878da529adde75a929a755dae7a42b2e9a3486 Author: John Bowman Date: Wed Feb 15 07:45:14 2017 -0700 Detect material change also for specified vertex colors. commit af2b9b1592e3849c5e5c986fd92c745076eedb22 Author: John Bowman Date: Tue Feb 14 23:30:51 2017 -0700 Derive drawBezierPatch and drawBezierTriangle from drawSurface. commit 6036e20c654c10dc4514cc95162378578f5f15d5 Author: John Bowman Date: Tue Feb 14 23:29:17 2017 -0700 Don't override command-line CFLAGS. commit 53cd8fef6985ff057380289b58ba721c0bcbe4b0 Author: John Bowman Date: Tue Feb 14 16:52:42 2017 -0700 Work around broken CYGWIN headers. commit 5d2776ee98f73db470c4c02eb8dbb2cf02e01618 Author: John Bowman Date: Tue Feb 14 16:48:15 2017 -0700 Improve subdivision crack filling for Bezier triangles. commit f181de0b91d7fe3d0f009b096e12741fa10ebde2 Author: John Bowman Date: Tue Feb 14 09:27:51 2017 -0700 Update comments. commit 97881b9e66a053fcbec8298f3cd4c47549f1fbc1 Author: John Bowman Date: Mon Feb 13 14:12:20 2017 -0700 Fix warning message. commit 846025fa2fb7293558825b23eff3c87ad9f22e84 Author: John Bowman Date: Mon Feb 13 13:49:42 2017 -0700 Implement transparency workaround also for Bezier triangles. commit 064ad7478a319f0c98aaae524c72b5d068c1b359 Author: John Bowman Date: Mon Feb 13 11:33:35 2017 -0700 Implement transparency workaround also for Bezier triangles. commit 1c8b95b6e6f9bd0773861d233f880ff553f72ed1 Author: John Bowman Date: Mon Feb 13 03:56:02 2017 -0700 Remove unused code. commit f2de95a07077aaf2e4c812f0cd2706be14e4f3b1 Author: John Bowman Date: Mon Feb 13 03:54:10 2017 -0700 Test empty flag in BezierPatch::draw(). commit 64134306851cc52f0fc134a7c6933f79f60149da Author: John Bowman Date: Mon Feb 13 03:45:36 2017 -0700 Simplify code; update example. commit 42ef8903cabfc20ceef8971025d71e5a91458700 Author: John Bowman Date: Mon Feb 13 03:39:20 2017 -0700 Remove unused variable. commit f2964231df4f5220c07db04faccd99d05ac73580 Author: John Bowman Date: Mon Feb 13 03:36:51 2017 -0700 Simplify code. commit e209592e78c8fd8da53ee343768931a6ed23c89b Author: John Bowman Date: Sun Feb 12 23:01:31 2017 -0700 Fix example. commit 0e09443aec3a961b46dc86b1c0a388d203a1f6bb Author: John Bowman Date: Sun Feb 12 22:59:39 2017 -0700 Fix example. commit e9face7d68b591bcd39a0c2a8eddc458bb6910b3 Author: John Bowman Date: Sun Feb 12 22:46:06 2017 -0700 Update examples. commit 31c6630d550fab51331756a4d78bc6f199b226ea Author: John Bowman Date: Sun Feb 12 14:59:39 2017 -0700 Partially work around OpenGL transparency bug by sorting transparent triangles by their centroid depth. commit ca09f95435e91eefcffd15050657e53debc1f829 Author: John Bowman Date: Sun Feb 12 14:52:21 2017 -0700 Fix segmentation fault. commit 8388a6050b59764a1669bd7f56aa8864c4261dfc Author: John Bowman Date: Sat Feb 11 19:49:58 2017 -0700 Update to gc-7.6.0. commit 0eb3950fd75f3ce45617a83ad1f8e30778e14d3b Author: John Bowman Date: Wed Feb 8 12:21:48 2017 -0700 Fix stride. commit 7161eef9c86df2124549a42c0723610ca9e1acee Author: John Bowman Date: Mon Feb 6 16:35:21 2017 -0700 Support compilation without OpenGL. commit 723495103fb4d189f6d1ec1349ecdd01275b89b0 Author: John Bowman Date: Fri Jan 27 14:23:35 2017 -0700 Fix post-release version number. commit 0c0164bdaba74be22c294aebdb880c6798ab6bbc Author: John Bowman Date: Wed Jan 25 00:17:22 2017 -0700 Increment version to 2.40. commit 6895ed3fb866609fae46b01bd6e44b2f2bcf281f Author: John Bowman Date: Tue Jan 24 22:43:43 2017 -0700 Update asymptote.py. commit 51cb6d02c8ce6599ce9975e315308ec99af60d7e Author: John Bowman Date: Tue Jan 24 20:20:11 2017 -0700 Remove unwanted extension from shipout prefix. commit 80b4d2b25e304a4b11c60a28082130d1a17d44dd Author: John Bowman Date: Tue Jan 24 14:24:59 2017 -0700 Use pdf 3D label processor also for luatex and lualatex tex engines. commit e793d86adc45d3738b9b69ad20212f5c9c18c364 Author: John Bowman Date: Tue Jan 24 13:50:47 2017 -0700 Reduce tubegranularity. commit 9366137351acf3cf45cf7c7de563f13d5a39bb95 Author: John Bowman Date: Tue Jan 24 13:37:02 2017 -0700 Make invalid string casts return an uninitialized variable. Add bool initialized(T) function for basic types T. commit 4c744193cc8fdd51d277e9566a114a589772ae4d Author: John Bowman Date: Tue Jan 24 09:28:10 2017 -0700 Move lualatex test into TeX code. commit 9a8586b5f6c9581eb7cb93fe9775e1756de3c5c8 Author: John Bowman Date: Tue Jan 24 09:01:40 2017 -0700 Revert "Remove requirement to call nosetpagesize() when changing to lualatex engine." This reverts commit 70fccdee30727275b3b1cab79da18287837601e2. commit 70fccdee30727275b3b1cab79da18287837601e2 Author: John Bowman Date: Tue Jan 24 08:44:36 2017 -0700 Remove requirement to call nosetpagesize() when changing to lualatex engine. commit 7d9b49adf9e555e13dcea584e74bcd12f9636a49 Author: John Bowman Date: Sat Jan 21 16:59:00 2017 -0700 Reinstate patch outline mode. commit a96ffbbfba55fc69b27b1c6052545bbf99ee23f8 Merge: 0be6f55 16ae9ee Author: John Bowman Date: Sat Jan 21 15:45:27 2017 -0700 Merge branch 'master' of github.com:vectorgraphics/asymptote commit 0be6f55679c4b6cb0f7fe14c22b1f4b676e54d5f Author: John Bowman Date: Sat Jan 21 15:45:17 2017 -0700 Add missing file. commit 1d32440f4abd08287e4b9672c98e41139540607c Author: John Bowman Date: Sat Jan 21 15:43:00 2017 -0700 Split BezierCurver render and draw operations. commit 16ae9ee4892076ca4f1ba20581cfd8001459f4fd Author: John Bowman Date: Sat Jan 21 15:43:00 2017 -0700 Split BezierCurver render and draw operations. commit ee78ea2311ce61048b7e559b6a3f510eb98387c3 Author: John Bowman Date: Sat Jan 21 11:24:49 2017 -0700 Implement Bezier curver renderer. commit fee686ab993af55e63a877c438d2fa233059f079 Author: John Bowman Date: Fri Jan 20 23:25:26 2017 -0700 Fix offscreen array sizes. commit 56326208e7a3f341556bd3d964fffeb8e9cba0a8 Author: John Bowman Date: Fri Jan 20 19:28:07 2017 -0700 Optimize billboard mode. commit eb0da243e2cd1d6738efbad9e549dad8c2bfafc2 Author: John Bowman Date: Wed Jan 18 00:41:22 2017 -0700 Cull offscreen Bezier triangles. commit b57705207c7b62a68ef90dacdfd5919248197135 Author: John Bowman Date: Wed Jan 18 00:20:12 2017 -0700 Cull offscreen subpatches. commit 189c89074852706cc3d8f6648dd30517465e9445 Author: John Bowman Date: Sun Jan 8 14:27:49 2017 -0700 Fix flatness test. commit a524000c1352b11fe4e3aa7d1335cc393841d29e Author: John Bowman Date: Sat Jan 7 21:04:34 2017 -0700 Fix flatness test. commit 168b1f284139482deb8044c4328a10e57fbfec47 Author: John Bowman Date: Sat Jan 7 21:03:13 2017 -0700 Simplify code. commit 12363c3ba5048faca607ab2656e19d26b402b5cd Author: John Bowman Date: Sat Jan 7 19:28:32 2017 -0700 Improve flatness test; simply code. commit 01f66ecfb744df300c04c760d81475b4d1e5450c Author: John Bowman Date: Sat Jan 7 19:18:01 2017 -0700 Fix typo. commit adc9c3a165b8e74ed2728ec0203ce68234629ff3 Author: John Bowman Date: Sat Jan 7 19:16:44 2017 -0700 Add deepyellow synonym for olive color. commit 1cc7f83d73cbe2ece3e7e4f0e7640b2ec5cbe684 Author: John Bowman Date: Sat Nov 26 10:56:46 2016 -0700 Remove requirement to call nosetpagesize() after changing TeX engine. commit 33ed6c683a960b0a29951d3c7f8efbb15f64aaaf Author: John Bowman Date: Fri Nov 25 16:50:06 2016 -0700 Implement robust workaround for graphicx.sty bug. commit 967f09a6fd79b84b8803fca8d9871c7f11f4942a Author: John Bowman Date: Mon Nov 14 11:53:44 2016 -0700 Update asymptote.sty to force nosetpagesize also with xelatex TeX engine. commit 988530d0daf78c580ed305d07d0d23e140b2b52d Author: John Bowman Date: Tue Nov 8 10:00:05 2016 -0700 Workaround setpagesize graphicx side effect when using asymptote.sty. commit 866ef9c47bedec14d1584b443bbcf02ba5be5b60 Author: John Bowman Date: Tue Nov 8 01:15:57 2016 -0700 Portably fix graphicx setpagesize bug. commit 27948832401841f1fd4c1ec6fa3f71e5a246dcc0 Author: John Bowman Date: Mon Nov 7 21:49:54 2016 -0700 Fix principalBranch. commit 529bc76b4f31e59332383c3068ef4b5e41c49865 Author: John Bowman Date: Tue Nov 1 00:19:20 2016 -0600 Minor optimization. commit 4aa1ffb19dfac6705a728f6b3ddeda353dee1868 Author: John Bowman Date: Sun Oct 30 02:46:17 2016 -0600 Minor optimization. commit 4e1d019889f5609205ecc2856afacb867ed8b66d Author: John Bowman Date: Wed Oct 26 22:57:10 2016 -0600 Add paletteticks NoTicks option. commit 0a0f231cd247d3341f188fad28f00d29813cdee6 Author: John Bowman Date: Mon Oct 24 23:33:49 2016 -0600 Avoid empty axis labels. commit bd70d164fb84e06f0ff8aa5cb03b08d8adbf688b Author: John Bowman Date: Sun Sep 4 22:06:31 2016 -0600 Implement improved workaround to recent graphicx incompatibilities, which also works with inline TeX mode. commit 2f209f9ed847db0068c0ac85fa6c98571eeb9462 Author: John Bowman Date: Sun Aug 28 23:36:02 2016 -0600 Implement general workarounds for recently introduced graphicx and lualatex backwards incompatibilities. commit afb95149c62f8c27605fc01ae75b9ce1bf678431 Author: John Bowman Date: Fri Aug 26 00:31:58 2016 -0600 Add patched version of plain.asy for TL2016 only. commit 758d08612b2895663947a31f68341caaceaf8a20 Author: John Bowman Date: Tue Aug 23 03:26:28 2016 -0600 Revert "Revert "Revert "Workaround pdflatex pdfpagewidth and pageheight bug in TeXLive 2016.""" This reverts commit 896202ca85c76a5e09c1c68193b3459600586127. commit fe2510c2d5696fa8f259e535b022cae86938c735 Author: John Bowman Date: Mon Aug 15 14:12:30 2016 -0600 Revert "Add gl-matrix javascript library." This reverts commit 9878b4dc4358da80777666dc9cf80e351a80f937. commit 9878b4dc4358da80777666dc9cf80e351a80f937 Author: John Bowman Date: Mon Aug 15 10:20:27 2016 -0600 Add gl-matrix javascript library. commit 896202ca85c76a5e09c1c68193b3459600586127 Author: John Bowman Date: Thu Aug 4 00:07:00 2016 -0400 Revert "Revert "Workaround pdflatex pdfpagewidth and pageheight bug in TeXLive 2016."" This reverts commit b8ef9a8ae04ac345188cb31eab591945cd2a2abf. commit 421b733a96996452bd474b80988741fdb2ece342 Author: John Bowman Date: Thu Aug 4 00:06:29 2016 -0400 Revert "Implement alternative workaround for graphicx pagesize bug." This reverts commit 545f2b55cca742e6df16df2362fba18702171d50. commit 545f2b55cca742e6df16df2362fba18702171d50 Author: John Bowman Date: Wed Aug 3 23:10:17 2016 -0400 Implement alternative workaround for graphicx pagesize bug. commit b8ef9a8ae04ac345188cb31eab591945cd2a2abf Author: John Bowman Date: Wed Aug 3 23:09:25 2016 -0400 Revert "Workaround pdflatex pdfpagewidth and pageheight bug in TeXLive 2016." This reverts commit 61cfa1e299de53c12a6ce08305383aac18ad9216. commit 61cfa1e299de53c12a6ce08305383aac18ad9216 Author: John Bowman Date: Tue Aug 2 23:23:01 2016 -0400 Workaround pdflatex pdfpagewidth and pageheight bug in TeXLive 2016. commit d76f6754b1552eb02dca5ab53ea4836c287c3e53 Author: John Bowman Date: Wed Jul 27 05:35:57 2016 -0600 Generalize palette(real[][], pen[]) to handle nonsquare arrays. commit ff41f2060c00278a13512dd66ca7424d697342c5 Author: John Bowman Date: Sat Jun 4 20:45:28 2016 -0600 Increase overlapedges scaling. commit 689fb9ebecdc859d438808178beb7151a0229698 Author: John Bowman Date: Sat Jun 4 20:03:11 2016 -0600 Revert "Remove obsolete overlapedges flag." This reverts commit 154c47b6962a23404857ada45d3d7b0752f4817e. commit d0c97bff49e5bc2c89ad0b48552b971d163414a5 Author: John Bowman Date: Sat Jun 4 20:00:48 2016 -0600 Fix typo. commit 7ecaf8f43931d728eaf4154092cefaa4d0d0c201 Merge: 692051a 154c47b Author: John Bowman Date: Thu Jun 2 23:11:58 2016 -0600 Merge branch 'patch'. commit 154c47b6962a23404857ada45d3d7b0752f4817e Author: John Bowman Date: Thu Jun 2 22:59:14 2016 -0600 Remove obsolete overlapedges flag. commit 928af116df130df1e75d308c8722682e36b391b5 Author: John Bowman Date: Thu Jun 2 22:57:44 2016 -0600 Standardize flatness tests. commit 3f409fa5c904b82266ca576aa6372493b654dedf Author: John Bowman Date: Thu Jun 2 15:13:17 2016 -0600 Relax flatness test. commit 5dece5cdcd7bad955f1e0836664fe3f572fd75f7 Author: John Bowman Date: Thu Jun 2 13:57:03 2016 -0600 Fix flatness test. commit 12238c7d03bd61aaffcfa5ab47b51d56acadb286 Author: John Bowman Date: Thu Jun 2 12:42:44 2016 -0600 Fix remaining normals. commit 826469f06a43a86fdc56999a88b7fe657797ee1d Author: John Bowman Date: Thu Jun 2 03:16:42 2016 -0600 Fix color order. commit def2d72ac3e8472c5997fada88004765bb581a41 Author: John Bowman Date: Thu Jun 2 03:04:18 2016 -0600 Fix straight case. commit 2323c592d5a2e8fd800ce1e0b9288027dd89c88a Author: John Bowman Date: Thu Jun 2 02:29:19 2016 -0600 Remove unused code. commit 0bdfab4a98dd496fb0f3187edb92bc47e551a423 Author: John Bowman Date: Thu Jun 2 02:02:47 2016 -0600 Simplify code. commit f03dc5c7e6e3007cf9cc8c628daf93f6ff2fe33f Author: John Bowman Date: Wed Jun 1 13:47:31 2016 -0600 Fix subdivion cracks and zero normals. commit fdb20f62a69b5e8244f71025f349baf411e49332 Author: John Bowman Date: Wed May 18 15:08:42 2016 -0600 Add vertex shading. commit 31ba48ca76e1a118fde5812137366ecabca1d3e7 Author: Andrew Bernakevitch Date: Wed May 18 14:35:47 2016 -0600 Add ASCII diagrams of the Bezier patch, including a diagram of the patch and one of the key points on the patch. commit 692051a2849fa4ae074ab565319b2af22a5fc828 Author: John Bowman Date: Tue May 17 10:16:53 2016 -0600 Fix formatting. commit f67594a5df27ec9862c7953c13522f16e8a59387 Author: John Bowman Date: Thu May 12 03:23:35 2016 -0600 Increment version to 2.39. commit 3f044f05ca7f3d30d3f61edcf1d991bd6ccc69dd Author: John Bowman Date: Thu May 12 02:16:25 2016 -0600 Move bug tracking to github. commit b9ca1650f3086a265eb9d39649261680fe032ba5 Author: John Bowman Date: Thu May 12 02:05:12 2016 -0600 Require ncurses library only with --enable-readline. Implement --disable-sigsegv configuration option. commit 4c1ac9da70652934fadfef75181aab7191845327 Author: John Bowman Date: Thu May 12 01:14:03 2016 -0600 Begin implementation of bezier patch renderer. commit da2c3f8c7af68645c6cff8c04f555676413e47ba Author: John Bowman Date: Thu May 12 01:08:40 2016 -0600 Minor optimization. commit 8a956632265c5b540b21249d8411216788812e30 Author: John Bowman Date: Wed May 11 08:55:31 2016 -0600 Use # operator for integer division. commit 11f06b200a9ca5382e2c15d251140e44902f0f04 Author: John Bowman Date: Mon May 9 13:55:55 2016 -0600 Update CXXFLAGS and LDFLAGS documentation. commit 563d53bf8eba994e903e460361f30d93f6a5da14 Author: John Bowman Date: Sun May 8 22:19:25 2016 -0600 Port Makefile.in to Bourne shell. commit 04b86da8e09ed0772d46520e43e4875878aff4f8 Author: John Bowman Date: Sat May 7 20:34:12 2016 -0600 Fix longitudinal splitting in revolution. commit 0d7435b299f721fbe4d788edc3f5334f8bddabb9 Author: John Bowman Date: Fri May 6 20:49:46 2016 -0600 Pass CC and CXX to gc configure. commit a40b6c087091bdc15ffe44d00c51ca15cb1d4877 Merge: 656cf97 0f1f6d1 Author: John Bowman Date: Fri May 6 09:45:34 2016 -0600 Merge pull request #21 from mojca/posix-test Makefile.in: replace 'test ! -e' => 'test ! -s' commit 0f1f6d1c73ebc6b494fc23d76a1f00966de9f5fb Author: Mojca Miklavec Date: Fri May 6 16:49:41 2016 +0200 Makefile.in: replace 'test ! -e' => 'test ! -s' for compatibility with older shell (on systems like Solaris) commit 656cf9764dc937aa12bd50fe8dc2e0354c7c5e64 Author: John Bowman Date: Fri Mar 18 16:42:22 2016 -0600 Minor optimization. commit ee9839887c7006a4e5138afe8b039669082c904a Author: Orest Shardt Date: Tue Mar 15 15:14:38 2016 -0400 correct parsing of control points commit 1032cd60aedd0dec0f376410e5fdf525eda65f39 Author: John Bowman Date: Mon Mar 14 17:11:21 2016 -0600 Update copyright and FSF address. commit 24628251a11faf6d4e4ed0034c716cc6b4289cb6 Author: John Bowman Date: Mon Mar 14 01:09:15 2016 -0600 Increment version to 2.38. commit 0240be5ed61de2394cc5cc614a9c4b480f2f51d1 Author: John Bowman Date: Sun Mar 13 23:31:54 2016 -0600 Add missing variable. commit a33a69444b667675706f42653c3620da583e0130 Author: John Bowman Date: Sun Mar 13 21:05:19 2016 -0600 Update diagnostic. commit 3a8360af8637891ad54a6d756026780286c44ea8 Author: John Bowman Date: Sun Mar 13 20:57:00 2016 -0600 Merge port of xasy to Python3, courtesy of Mojca and Orest. commit 48e84c5bc8d62b7f06528682e8fd7275828345e6 Author: John Bowman Date: Sun Mar 13 20:45:07 2016 -0600 Add -P arguments to pngalpha ghostscript driver calls. commit d789c4df72983f70934f702a9ee3ee80fd82b81f Author: John Bowman Date: Sat Mar 12 21:59:02 2016 -0700 Make quiet suppress output unless verbosity > 1. commit 740c8c1df8127012ff983fe9979a096d0f71e81e Author: John Bowman Date: Sat Mar 12 21:26:01 2016 -0700 Make settings.quiet suppress noninteractive standard output when verbose=0. Add progress function. commit bcbf941fdd0fa9db5c3b77d7a3477fa358a291ac Merge: 97f3b6c ae0af70 Author: John Bowman Date: Sun Mar 6 22:33:57 2016 -0700 Merge branch 'trianglewithnormals' commit 97f3b6c3958028f16e130af9a76d404b91289a0c Author: John Bowman Date: Sun Mar 6 21:16:03 2016 -0700 Don't require kpsewhich in make check for TeXLive version. commit 121bef8befae717eb00bc550a4e94e05b73a9202 Author: John Bowman Date: Sun Mar 6 21:12:26 2016 -0700 Look for kpsewhich first in the same directory as the asy executable. commit ae0af708d12981318936697c7c289fe71723dabe Merge: 815b738 6fc23e0 Author: Charles Staats III Date: Sun Mar 6 20:07:38 2016 -0800 Merge branch 'master' into trianglewithnormals commit 815b7381ec98e7bd8fff428145c4ff37f4c6ef42 Author: Charles Staats III Date: Sun Mar 6 20:04:10 2016 -0800 Revise comments on smoothcontour3 for bezier triangles. commit 6fc23e01ac254e6e016fa2ce37f190a9b3c027c7 Author: John Bowman Date: Sun Mar 6 20:07:15 2016 -0700 Improve script portability. commit ab000e7a922e6f21dc6aabad21e6dfed864acf2b Author: John Bowman Date: Sun Mar 6 18:34:57 2016 -0700 Move compile-time check for epsdriver into environment variable ASYMPTOTE_EPSDRIVER. commit 3cf0adc19ab1ca13ca70dc6e700c6386ccf73e37 Author: John Bowman Date: Sun Mar 6 14:20:31 2016 -0700 Add EPSWRITE compiler flag to support ghostscript versions older than 9.14. commit cbb7e37c1a8ed7168bdfb61b5c48ef775b9dd668 Merge: 9004183 6c1ad05 Author: John Bowman Date: Sun Mar 6 10:04:21 2016 -0700 Merge branch 'trianglewithnormals' commit 900418390224e6f56ed33a5df55c0b47e418e1f0 Merge: ce19f61 9a36fe8 Author: John Bowman Date: Sun Mar 6 09:45:19 2016 -0700 Merge branch 'improverootfinder' commit ce19f613e620c3fd953417301a7d9fd1e4db3a70 Author: John Bowman Date: Sun Mar 6 09:40:49 2016 -0700 Port xasy integer division to Python 3. commit dc788693ea22f5a6bd990a21b357af605f179e27 Author: John Bowman Date: Sun Mar 6 09:36:23 2016 -0700 Port xasy color handling to Python 3. commit c16b1d2a6e320e197d41a8df8698e49810737473 Author: John Bowman Date: Fri Mar 4 23:15:13 2016 -0700 Change CFLAGS to CXXFLAGS in documentation. commit 9a36fe85944c15cbb67c5f1cf777b0bf7e5bd581 Author: John Bowman Date: Sun Feb 28 23:53:11 2016 -0700 Remove default values of fa and fb from _findroot; force margin to (b-a)*1e-3. commit 6c1ad05b445578368eec7d54842f5ae46cac1213 Author: Charles Staats III Date: Sun Feb 28 22:17:37 2016 -0800 Correct spacing in smoothcontour3.asy. Replace tabs by spaces for consistent spacing across editors. commit 4502339c241f74eaf2f02c9315c378f90b44e6a3 Author: Charles Staats III Date: Sun Feb 28 22:03:59 2016 -0800 Document usetriangles option for smoothcontour3. commit 29832acfab74cadeb749926b2db3d3ac5f965515 Author: Charles Staats III Date: Sun Feb 28 21:55:51 2016 -0800 Add smoothcontour3 option to use bezier triangles (default) or not. commit 50b1420e4d9e46982ab124f7319b30bc7e57b358 Author: Charles Staats III Date: Sun Feb 28 20:09:07 2016 -0800 Simplify reversing cyclic array. commit becf736defe152799976999c6ede67e40e5975fd Author: Charles Staats III Date: Sun Feb 28 19:27:19 2016 -0800 Change adaptive rendering constant for bezier triangles. commit fc81a2ed70019cca10eed52b2caa3bff713d0d7f Merge: cd9f875 e78de7f Author: Charles Staats III Date: Sun Feb 28 19:23:17 2016 -0800 Merge remote-tracking branch 'origin' into trianglewithnormals commit 184bea914c95dd92c32380bce6001916607d2482 Author: John Bowman Date: Wed Feb 24 20:56:21 2016 -0700 Move rootfinder interface to math.asy. commit e92e7571479c2024522a882b3ee95a99120c09a5 Author: John Bowman Date: Wed Feb 24 20:40:10 2016 -0700 Reorder tolerance parameter as in original asy code and allow user control of default value. commit e435513b1a4faa461e3ce4387461653374eecf7a Author: John Bowman Date: Tue Feb 23 23:20:56 2016 -0700 Port findroot to C++ code, but reorder tolerance parameter to end of signature, to agree with argument order in calls from smoothcontour3. commit e78de7f99a7b94876805b6eea9b15c7a0c164c96 Author: John Bowman Date: Tue Feb 23 20:40:48 2016 -0700 Implement minor rendering optimization. commit 87c6ee109e9a615a51ebc76d4ea92b959ea4c20d Author: John Bowman Date: Tue Feb 23 19:00:20 2016 -0700 Fix bug #219 Asymptote forks in an uncontrolled way. commit cd9f8755715b8ce7e5b239ecd77fdff4d336411a Merge: e6454cb 344698e Author: John Bowman Date: Tue Feb 16 17:41:59 2016 -0700 Merge branch 'master' into trianglewithnormals commit 344698e2cf2f16379139e8473c4a0970433689e5 Author: John Bowman Date: Tue Feb 16 17:41:21 2016 -0700 Fix epsilon. commit e6454cb2370e412699d467f451519ab89efd3f40 Merge: e5394af 75ce996 Author: John Bowman Date: Tue Feb 16 17:29:10 2016 -0700 Merge branch 'master' into trianglewithnormals commit c3099c59cc61721fa9d08e1cd7ab22ddb0026bb5 Author: John Bowman Date: Tue Feb 16 09:32:10 2016 -0700 Fix epsilon. commit e5394afc350161459e7b78c28fd025f390a2f60e Author: Charles Staats III Date: Sun Feb 14 22:16:08 2016 -0800 Fix overlapedges for triangular patches. commit aa8a94e605e42c9742b880c50a62cf6432309d32 Author: Charles Staats III Date: Sun Feb 14 22:10:49 2016 -0800 Subdivide triangles with bad normals. commit f4f03e779e9e0d7143c98ca7a4f82e41ec3c2d6e Author: Charles Staats III Date: Sun Feb 14 21:57:12 2016 -0800 Make array reversal consistent with path reversal commit 58852de50bba1ee05eef4c7cd1042131006e711d Author: Charles Staats III Date: Sun Feb 14 21:09:17 2016 -0800 Make the orientation of the patches consistent. commit 652f8bbc027dd78d1d2be0f5cb8af24496fea2e5 Author: Charles Staats III Date: Sun Feb 14 17:09:01 2016 -0800 Use quadratic interpolation for rootfinder commit 75ce99693e881bc87a25ee1a57a90e2c8a88c95c Author: John Bowman Date: Fri Feb 12 16:13:26 2016 -0700 Fix bug #217 Reversion of one point guides. commit 213d56942fe5b9ef605e0ccf545527833319348d Author: John Bowman Date: Fri Feb 12 14:43:37 2016 -0700 Fix bug #218 Core dump in subpath routine. commit b7bcfe1c90e491e8fc284ea8e746af85495fb087 Author: John Bowman Date: Wed Feb 10 01:29:02 2016 -0700 Fix str().c_str() bugs. commit 2aed7cc04bb0ab928aa6a7086b977dc90c078a5e Author: John Bowman Date: Tue Feb 9 22:27:30 2016 -0700 Move \ASYdimen to asymptote.sty (version 1.30 now required). Remove support for obsolete media 9 package from 2013. commit 8d0eef70c60ce380f8919f8aa8d45467f2d9c3bd Author: John Bowman Date: Tue Feb 9 18:12:40 2016 -0700 Increase maxrefinements in bezulate. commit 25617a38c05e1cf7e5c0322c3cdb0b53c5f3a909 Author: John Bowman Date: Tue Feb 9 16:50:13 2016 -0700 Fix bug #215 Line adjustment won't work with scaled pens. commit 9ee82946a46323ca939a6ae10d666231486127df Author: John Bowman Date: Sun Feb 7 23:19:06 2016 -0700 Document in the manual that example file names link to the PDF output whereas their .asy extensions link to the corresponding Asymptote code. commit 760fddca0f402acc49894b8cc81056b4b97759be Author: Charles Staats III Date: Sun Feb 7 17:06:50 2016 -0800 Non compiling: start maketriangle function. commit 57d9d51c1bc79c2efe55087e291c35f51790b842 Author: John Bowman Date: Sun Feb 7 17:00:05 2016 -0700 Update copyright date. commit 691e8ef9241001b18dd3e3ad6f667f73da76c41e Author: John Bowman Date: Sun Feb 7 16:57:54 2016 -0700 Fix links in documentation. commit 2ad4f66eda6e71aaf24b15e67c5a1eb5c15332ae Author: John Bowman Date: Sun Feb 7 16:46:58 2016 -0700 Fix links in documentation. commit 7c33a39dbf1b41e29f251a81778019f722a38497 Author: John Bowman Date: Sun Feb 7 16:21:01 2016 -0700 Add links to documentation examples. commit d422d99bd9d22bfa57013fdf8de5d33aa637a71e Author: John Bowman Date: Sun Feb 7 11:12:47 2016 -0700 Fix bug #214 Minor bug in 'format'. commit 4c3480c2e5ae04e644382ceb9fa871206bcfee51 Author: John Bowman Date: Sat Feb 6 23:19:05 2016 -0700 Support --disable-gl again. commit afbd271363fde72afe17f54d5c5a408d24931437 Author: John Bowman Date: Sat Feb 6 17:06:42 2016 -0700 Improve comments in beziertriangle.cc. commit 5569c8d4fd3d84f121362aa18966eb8114cbe88d Author: John Bowman Date: Fri Feb 5 17:47:36 2016 -0700 Simplify code. commit b2d975013dfec4c2163b66286eacb8e6b9a71b56 Merge: a2dc301 ce719eb Author: Charles Staats III Date: Fri Feb 5 08:34:14 2016 -0800 Merge branch 'trianglewithnormals' of github.com:vectorgraphics/asymptote into trianglewithnormals commit ce719ebe712ae40a4fd31dc5e59b6c1f382cdfca Merge: 30d63a3 9b9e8f5 Author: John Bowman Date: Thu Feb 4 23:18:11 2016 -0700 Merge branch 'master' into trianglewithnormals commit 9b9e8f579e58ce016754626275d9c03b1dc1cf11 Author: John Bowman Date: Thu Feb 4 23:05:28 2016 -0700 Simplify code. commit ab2042f994b6dd71c204ddaa59124b7f3644ee58 Merge: 5d97e7d a873617 Author: John Bowman Date: Thu Feb 4 23:03:06 2016 -0700 Merge branch 'master' of github.com:vectorgraphics/asymptote commit 5d97e7d70965fefa3814f09911be2e1a74cf1979 Author: John Bowman Date: Thu Feb 4 22:31:31 2016 -0700 Handle degeneracy in Bezier triangle normal calculation for render=0. commit a2dc30108b3979adb818333771fed8e278bd697c Author: Charles Staats III Date: Thu Feb 4 21:31:58 2016 -0800 Amend one comment. commit 8ec9865cc3fd4bc2cbded6e754ad4670e1920730 Merge: 6ca1083 a873617 Author: Charles Staats III Date: Thu Feb 4 21:20:20 2016 -0800 Merge branch 'master' into trianglewithnormals to incorporate bug fix for meshpen with bezier triangles. commit 6ca10836bade3c2540ebfbe4dc0c27ff782ad2f8 Author: Charles Staats III Date: Thu Feb 4 21:15:39 2016 -0800 Add comments documenting the trianglewithnormals function. commit b2efab65fb612318202964ae6fb80b50c925d315 Author: Charles Staats III Date: Thu Feb 4 21:11:31 2016 -0800 Simpler names for normals in trianglewithnormals parameters. commit a873617b4e481ea90c2ebce361932212b4c70df1 Author: Orest Shardt Date: Thu Feb 4 16:35:35 2016 -0500 Fix hex representation of colours commit 26629e8a350204d9fbd9095e5c59ca4bda35f6d9 Author: John Bowman Date: Thu Feb 4 13:24:27 2016 -0700 Fix planar Bezier triangles under render=0. commit 64e1d1ad3777e898febba132ac0aae152882c52d Merge: 03a2310 29806bc Author: John Bowman Date: Thu Feb 4 01:37:46 2016 -0700 Merge branch 'master' of github.com:vectorgraphics/asymptote commit 03a2310b72610252698115ba3d1ec44b0aba16a5 Author: John Bowman Date: Thu Feb 4 01:34:24 2016 -0700 Use git suffix for development tags and no suffix for release tags. commit 29806bc76d22752c59df49fb776f0a2f935d4331 Author: John Bowman Date: Thu Feb 4 01:34:24 2016 -0700 Use git suffix for development tags and no suffix for release tags. commit 30d63a35b8903e0a7fe45828c62bb4c1a0e0524a Author: Charles Staats III Date: Thu Feb 4 00:04:31 2016 -0800 Modify smoothcontour3 to use bezier triangles when convenient. commit 48b96a7f01add22951ac01806d22de912f9524bc Author: John Bowman Date: Wed Feb 3 16:53:47 2016 -0700 Add "git" suffix to version number for out-of-git builds to avoid confusion with official releases. Simplify Makefile. commit 12d4161bd25c0eda0d95a37437ba774b04a1eacb Author: John Bowman Date: Wed Feb 3 02:44:53 2016 -0700 Increment version to 2.37. commit e469422d232659d27a70527ddffc7f106be89698 Author: John Bowman Date: Wed Feb 3 01:12:14 2016 -0700 Tune subdivision crack correction under MSDOS. commit aa11277764072052888151cd3b0f61e4bf8cfbe1 Author: John Bowman Date: Wed Feb 3 00:36:18 2016 -0700 Fix segmentation faults in tab completion. Disable interrupts during input. commit d4f43f97de2f5f27d6de73c031f89404ecc0c4cd Author: John Bowman Date: Tue Feb 2 23:31:57 2016 -0700 Fix typo. commit 68a30fa19dbb2bd921cb33acc7e8c596372101af Author: John Bowman Date: Tue Feb 2 22:42:03 2016 -0700 Fix typo. commit 69d2e8de9cfb1757de8e731dfb7d9cce00047982 Author: John Bowman Date: Tue Feb 2 22:38:24 2016 -0700 Fix syntax. commit 076c074783d62f9a3215d7fec197c93f1c9b0ba2 Author: John Bowman Date: Tue Feb 2 22:31:31 2016 -0700 Force linking with static termcap library under MSDOS. commit 4584a9d97228811e6799752ff5a2a7b17246f4af Author: John Bowman Date: Tue Feb 2 10:14:02 2016 -0700 Simplify Makefile. commit 51ad22b3d66a3a75cc3034f49faf367320ec2a16 Author: John Bowman Date: Tue Feb 2 10:06:28 2016 -0700 Fix bug #213 glmovie.asy won't autoplay. commit 93d5b9af857e0ad80e606c7d63dbce32447cc892 Author: John Bowman Date: Tue Feb 2 01:59:10 2016 -0700 Simplify exit handler. commit d5e86339507734fd79f4748e9b3545bda20331b4 Author: John Bowman Date: Tue Feb 2 00:19:13 2016 -0700 Support out-of-git builds. commit cd2e963a3df5edbc4637c93cc4af4d643a490ce3 Author: John Bowman Date: Mon Feb 1 17:04:37 2016 -0700 Avoid glutLeaveMainLoop for portability. commit af5a253b6fdebd3c5994ccfee2c9ed9381c40a43 Author: John Bowman Date: Mon Feb 1 01:41:57 2016 -0700 Fix asy version generation. commit 927b4826c4d3590fe0c98eb9e704a834923a41aa Author: John Bowman Date: Sun Jan 31 23:42:31 2016 -0700 Move the genustwo image out of the documentation in case rendering isn't available. commit a637f3da094105154df8d36edb8aa46183d5fb5f Author: John Bowman Date: Sun Jan 31 23:39:22 2016 -0700 Use glutLeaveMainLoop to cleanly exit the renderer. commit 92985cc19f11946fc71648695fdc14efa7af8321 Author: John Bowman Date: Sun Jan 31 22:21:51 2016 -0700 Add OpenGL exit handler. Reinitialize autoplay on re-entry. commit f2b9fb741b4da18224d7ae276348902da6b71595 Author: John Bowman Date: Sun Jan 31 19:17:01 2016 -0700 Allow out-of-git builds. commit c0c7399cbdba43b8a77c2309e62b625371f8efcf Author: John Bowman Date: Sun Jan 31 19:01:34 2016 -0700 Fix revision generation. commit 100a73c67789448b909f4fcb36030d9a945849fa Author: John Bowman Date: Sun Jan 31 18:10:34 2016 -0700 Fix revision generation. commit 0a653376ee359d6854c1a470d40387859cf1eff9 Author: John Bowman Date: Sun Jan 31 17:37:18 2016 -0700 Fix segmentation fault due to zero normals. commit d9038241476195cb30aea8d3d6929c9d9b0e1b15 Author: John Bowman Date: Sun Jan 31 15:50:38 2016 -0700 Move PRC api functions into a new namespace prc. commit 6692b64b6eb470c948dade9e6a58e51b13096021 Author: John Bowman Date: Sun Jan 31 13:19:48 2016 -0700 Add convenience function graphicscale for using graphic with the conTeXt tex engine. commit b1d7e6d6d931b25e226df93cf5a123cd501a06f8 Author: John Bowman Date: Sun Jan 31 12:56:32 2016 -0700 Fix typo in 89fee36fec8a6d04d9c650e35f0170fba3f9ba4d. commit c3805bc4e3efaadec13911839200526734bcb809 Author: John Bowman Date: Sun Jan 31 11:10:04 2016 -0700 Do not override -render command-line option. commit 5909c90c67d3c5ba60de0397aac979ed8bbd6c83 Author: John Bowman Date: Sun Jan 31 11:05:33 2016 -0700 Display GLUT display after batch export. commit 699cf57921476f59b5ba2318c55f639da74717ce Author: John Bowman Date: Sun Jan 31 10:58:00 2016 -0700 Don't use threads in batch mode, except under MacOS X. commit e1eb284ff09fefc23d0eea83d79792bd6d2842e2 Author: John Bowman Date: Sun Jan 31 02:07:16 2016 -0700 Fix build issues. commit 2369d49a178d124d4d46ff0f8194b12ececac9e3 Author: John Bowman Date: Sun Jan 31 01:12:41 2016 -0700 Retain revision.cc. commit 89fee36fec8a6d04d9c650e35f0170fba3f9ba4d Author: John Bowman Date: Sun Jan 31 00:17:34 2016 -0700 Fix bounds calculation for straight nonplanar Bezier patches. Implement a degenerate patch representation, tensor(patch), to support render=0 for Bezier triangles. Optimize straight Bezier triangle bounds computation. Implement remaining Bezier triangle support functions for normals and colors. Keep local work arrays on stack. commit 7c172e08b045497718dd883120c160790c313435 Author: John Bowman Date: Sun Jan 31 00:14:47 2016 -0700 Update dependency documentation. commit c7771bb49a8037ac23d8cc6f6b6cc7fb4fb0fdda Author: John Bowman Date: Sat Jan 30 23:18:35 2016 -0700 Suppress getline compiler warning. commit 504d3e865985f30bbbb3b82cc3da7d1c50a758c8 Author: John Bowman Date: Sat Jan 30 17:32:07 2016 -0700 Fix missing double backslash in asy-mode.el. commit f87cbf83b1ac2c815d9d88e7c79b7e3a33992fb3 Author: John Bowman Date: Sat Jan 30 16:51:13 2016 -0700 Partially revert unintentional global changes in fc3ef0ec22b36083ace789436004ef88452a1feb regarding structure initialization. commit 9259e447295ead5927e4970a0b894e8eb70702c5 Author: John Bowman Date: Sat Jan 30 16:30:09 2016 -0700 Fix bug #208 Quotations are broken. commit 04d236c8d4ff9669ab98f829d278bcba4784584b Author: John Bowman Date: Sat Jan 30 15:44:45 2016 -0700 Fix #207 Infinite loop while reading files with trailing comments. commit 352441c0e661a3d1c9a4f7ff1f17f4c817481530 Author: John Bowman Date: Sat Jan 30 15:32:08 2016 -0700 Respect relevant explicit file dimensions only. commit 37ad3354d905a5fdde964e43a6306642d764b6c7 Author: John Bowman Date: Sat Jan 30 15:25:32 2016 -0700 Respect explicit file dimensions. commit 76a143bf9386df4f26095872f729fe8f23043edc Author: John Bowman Date: Sat Jan 30 11:50:40 2016 -0700 Optimize straight planar Bezier triangles. commit 21ec47af64f6fc0d895f6468a8148e59d3239a06 Author: John Bowman Date: Sat Jan 30 11:09:29 2016 -0700 Fix glrender quit function. commit 92615dd93332698574e6ab583907a3e495ddc554 Author: John Bowman Date: Sat Jan 30 10:27:41 2016 -0700 Fix #206 Bug while reading twodimensional data from file. commit d5a1cdf144ce152ccc520515ace87ca7c22c216e Author: John Bowman Date: Fri Jan 29 22:32:13 2016 -0700 Fix intermittent segmentation fault after export under threads. commit 4650f6153e2722630d177f9a6293e9f49c8ec0aa Author: John Bowman Date: Fri Jan 29 19:26:04 2016 -0700 Fix floating point exception in glrender. Don't iconify window in interactive mode. commit 1625eaca2240a7d04f12f07a456c1c1adea9c641 Author: John Bowman Date: Fri Jan 29 01:24:36 2016 -0700 Fix bug in rest argument signature equivalence. commit e59d44b1f641743f7eea53b18286f8ae71f7ad42 Merge: 3fcb882 d70ce12 Author: John Bowman Date: Fri Jan 29 00:58:56 2016 -0700 Merge branch 'master' of github.com:vectorgraphics/asymptote commit 3fcb88277e987140fda7d01b8dc886c2ba55ea2d Author: John Bowman Date: Fri Jan 29 00:57:41 2016 -0700 Implement Bezier triangle vertex shading; simplify notation. commit d70ce12140bcee8f60cf4b14d86345ea1a597d24 Merge: 9a85929 4cca8cb Author: John Bowman Date: Thu Jan 28 19:45:53 2016 -0700 Merge pull request #9 from syohex/fix-package Fix package format commit 9a85929623975d23856c6462efaf66c1b645337e Merge: fec79bd daa7b97 Author: John Bowman Date: Thu Jan 28 19:45:10 2016 -0700 Merge pull request #10 from purcell/patch-1 [asy-mode.el] Use "Major mode" rather than "Emacs mode" commit daa7b97df59ff24aaef230389c630dfdfa6a34dd Author: Steve Purcell Date: Fri Jan 29 14:21:18 2016 +1300 [asy-mode.el] Use "Major mode" rather than "Emacs mode" Using the work "Emacs" is redundant here. Better to describe this as what it is: a major mode. commit fec79bd94f87e1532ab8f90c46ebeffa8ef68a34 Merge: af459e8 799d62d Author: John Bowman Date: Thu Jan 28 18:06:22 2016 -0700 Merge branch 'master' of github.com:vectorgraphics/asymptote commit af459e8a8919f67e38894c6430d35bc325c7ba10 Author: John Bowman Date: Thu Jan 28 18:04:36 2016 -0700 Implement billboard interaction for Bezier triangles. Update documentation. commit 799d62d722ba943216dafb4db1f5a89ee9d1ffdc Author: John Bowman Date: Thu Jan 28 18:04:36 2016 -0700 Implement billboard interaction for Bezier triangles. Update documentation. commit 4cca8cbac3aae1b6fc70e3826b1cfafd55353270 Author: Syohei YOSHIDA Date: Thu Jan 28 08:01:22 2016 +0900 Fix package format - Fix footer format - Add missing colon at 'Version' header commit 3bae7f04bc68992f96f1c56f291940946f71d3f5 Author: John Bowman Date: Wed Jan 27 08:22:51 2016 -0700 Rename NaN to more standard nan, consistent with inf. commit 40222e2f183510bbc3e7642ab58abaae107837d7 Merge: 6d148e9 e6a9c8c Author: John Bowman Date: Wed Jan 27 01:44:30 2016 -0700 Merge pull request #8 from PythonNut/master Fix asy-mode.el headers for use with package.el commit 6d148e9d4cb76e7a62b38cd7917f13f7e6b14241 Merge: 120804c b4f5fd7 Author: John Bowman Date: Wed Jan 27 01:32:44 2016 -0700 Merge branch 'tpatch' commit 120804c135338ad70ed74c37f6391cf2bd31143b Merge: eeb634e dda2736 Author: John Bowman Date: Wed Jan 27 01:32:37 2016 -0700 Merge branch 'master' of github.com:vectorgraphics/asymptote commit b4f5fd7f3d7dc8c296e01e21b229f1e80e5e4a9e Author: John Bowman Date: Wed Jan 27 01:32:11 2016 -0700 Remove obsolete comment. commit dda2736d7adc54b42fb063ad04d9818c4dac1cad Merge: e86faf9 37a3036 Author: John Bowman Date: Wed Jan 27 01:28:31 2016 -0700 Merge branch 'master' of github.com:vectorgraphics/asymptote commit e86faf9a90abe8546db543ba1decb3db4709a7af Merge: 4243c5a bb9a29b Author: John Bowman Date: Wed Jan 27 01:28:01 2016 -0700 Merge branch 'NaNconstant' commit 4abd683e6bcf1c03254a05d0f80dac2da49b796e Merge: 62f540f eeb634e Author: John Bowman Date: Wed Jan 27 00:53:10 2016 -0700 Merge branch 'master' into tpatch. commit eeb634e5a0b9eabcc17e04166be66ba536e8f165 Author: John Bowman Date: Wed Jan 27 00:41:18 2016 -0700 Remove unused normal code. commit 37a30365560aa79a4aac37850774fee8c55a526a Author: John Bowman Date: Wed Jan 27 00:20:15 2016 -0700 Move AtA routine to C++ code and matrix leastsquares routine to math.asy. Remove unused code. commit ca322df57721accecf9ae154b68a52700549b15d Author: John Bowman Date: Wed Jan 27 00:18:08 2016 -0700 Fix clang warning regarding std::abs. commit 81a216c7d9d5b7e42782baa7d663f0296ee1aa3b Author: John Bowman Date: Wed Jan 27 00:17:23 2016 -0700 Fix undefined variable. commit 1d3691a096c830a8d9729797bded0432346a80d6 Author: John Bowman Date: Wed Jan 27 00:12:31 2016 -0700 Fix memory deallocation in copyTriples. commit 4243c5afadb408d3f4b2c3dc39ae3648724de812 Author: John Bowman Date: Tue Jan 26 23:58:04 2016 -0700 Use fabs instead of abs in page alignment code. Optimize copyTransform3. commit 46e8944d7118204a3fdfd93df6ab13574ed4817b Author: John Bowman Date: Tue Jan 26 23:28:51 2016 -0700 Work around floating point division bug in clang 3.7.0. commit bb418555390c49b393e5377f695468651f93d6df Author: John Bowman Date: Tue Jan 26 19:48:19 2016 -0700 Fix segmentation fault due to accessing "this" at top level. commit bbd447f3c277a1ebc55163c187bfd223eee93bad Author: John Bowman Date: Mon Jan 25 22:27:01 2016 -0700 Remove fixed outformat and render settings from example. commit 62f540f32b879fac92863909de8eec7fcd911b27 Author: John Bowman Date: Sun Jan 24 23:21:13 2016 -0700 Don't subdivide straight segments. commit bb9a29b0449ec8b7a3a993e45981ea2930a8e07d Author: Charles Staats III Date: Sun Jan 24 19:06:22 2016 -0800 Add constant NaN for quiet real satisfying isnan(NaN) commit 76ee4365d32fd976117768a6b3db5f33d3284225 Author: John Bowman Date: Sun Jan 24 12:26:06 2016 -0700 Fix index entry in documentation. commit cd447e1479be3a9f30f6c476ce5fcb13a03b9cfa Author: John Bowman Date: Sun Jan 24 04:40:39 2016 -0700 Fix segmentation fault on glrender quit after export. commit b585ccab275b35b363382670d2d6a837fc699707 Author: John Bowman Date: Sat Jan 23 21:10:09 2016 -0700 Revert "Allow a user-specified normal function for rendering a bezier triangle." This reverts commit 83d8788e40b091142617e08e9840f2cb95e2147f. commit 8b25b245c67870f5414fe0f2c07295c5b95c8704 Author: John Bowman Date: Sat Jan 23 20:54:44 2016 -0700 Express Bezier triangle as a degenerate Bezier patch. commit e6a9c8c33caf317806ad73d057d9806aef505c48 Author: PythonNut Date: Sat Jan 2 17:20:29 2016 +0000 Fix asy-mode.el headers for use with package.el commit 2d94de48d0567f29f07646b523e1be30cf5e248b Author: John Bowman Date: Mon Dec 7 00:42:20 2015 -0700 Define PERL. commit 2292b4e20cec169b8e49ffd90c266fe0c481280c Merge: 83d8788 2f0e11d Author: John Bowman Date: Sat Dec 5 11:59:38 2015 -0700 Merge branch 'master' into tpatch commit 2f0e11d1dba5117c9b912713c0ea728e546ca2db Author: John Bowman Date: Sat Dec 5 11:56:51 2015 -0700 Replace perl by $(PERL). commit 098bb7af2fa3b8856942e61d911f29607597ffd8 Author: John Bowman Date: Sat Dec 5 11:49:06 2015 -0700 Fix animations by running LaTeX twice. commit 83d8788e40b091142617e08e9840f2cb95e2147f Author: John Bowman Date: Wed Nov 18 04:02:03 2015 -0700 Allow a user-specified normal function for rendering a bezier triangle. commit 0819e0f712c330016b99b5e41ef44c315da82ea6 Author: John Bowman Date: Tue Nov 17 13:27:01 2015 -0700 Remove remaining instances of Triple type (except one instance in glrender). commit bf3be19f7f1daf5730dabbf5c89e8a4f0f451a7d Author: John Bowman Date: Tue Nov 17 10:56:50 2015 -0700 Remove Triple type from Bezier patches. commit 454d3ff4526b775f4a70de6056d94134c535e070 Author: John Bowman Date: Tue Nov 17 00:50:01 2015 -0700 Begin removal of Triples type. commit 88cb6ae530ae29bd527ccb74d57734ad0f0b45e3 Author: John Bowman Date: Mon Nov 16 00:00:44 2015 -0700 Fix Bezier triangle bounds calculation. commit 78c5a4dc967871262371bc09a752c4f7c3a0982e Merge: 3bdb0da 71ff9e7 Author: John Bowman Date: Sun Nov 15 11:47:01 2015 -0700 Merge branch 'master' into tpatch commit 71ff9e769ba5d9995b367201f0d41b7a8dedab9d Author: John Bowman Date: Sat Nov 14 01:25:56 2015 -0700 Support GSL 2.0. commit 3bdb0da5d7762bdc3509cbbd3aadfea392065729 Merge: 342bd39 d7d0920 Author: John Bowman Date: Fri Nov 13 15:22:31 2015 -0700 Merge branch 'master' into tpatch commit d7d0920cfd14460443e9b7324a2f4565803eb882 Author: John Bowman Date: Sun Nov 8 14:01:03 2015 -0700 Update FFTW++ files. commit d98ea127a2e5406695f565b32f0ca108f5d7d652 Author: John Bowman Date: Tue Oct 20 16:49:54 2015 -0600 Sort patches by projected distance. commit 27ff6755e9aa215897582437ffdec4fab802439e Author: John Bowman Date: Sun Oct 18 09:21:25 2015 -0600 Only create initdir if localhistory=false. commit e46e8fde24b98a5ef21e4987c9658eda173c7bcf Author: John Bowman Date: Mon Oct 12 10:32:37 2015 -0600 Fix numerical precision bug in smoothcontour3. commit 342bd39a699140df5a3f14778e8650a674968980 Author: John Bowman Date: Thu Sep 3 02:02:23 2015 -0600 Implement bezier triangles in surfaces. commit ca9e11656fbf984095574d831b7e04a01881c3be Author: John Bowman Date: Wed Sep 2 13:42:10 2015 -0600 Implement patch member functions for Bezier triangles. commit 45fff990d00b3dee968203b10e2cb8515f7a3662 Author: John Bowman Date: Fri Aug 28 18:18:42 2015 -0600 Implement preliminary Bezier triangle constructor. commit 583fa290fc5eedb0a2913d132ad3dc6ea1284672 Author: John Bowman Date: Fri Aug 28 17:51:09 2015 -0600 Use unnormalized normal in degeneracy test. commit 16375adac6c947afa34d6626e40a7872a636bea6 Author: John Bowman Date: Fri Aug 28 17:00:01 2015 -0600 Optimize degenerate normal computations. commit c27701a82588751d407f6558664caa89f520cf44 Author: Jesse Frohlich Date: Fri Aug 28 15:22:57 2015 -0600 Optimizations for degenerate normal computations of Bézier triangles. commit e8232ba4732836b3b12b552d6e2517730d479079 Author: Jesse Frohlich Date: Thu Aug 27 14:49:08 2015 -0600 Add higher-order normal computations for degenerate Bézier triangles. - Depending on the magnitude of the computed normal, higher order derivatives are used as needed. - Normals are now computed relative to the central sub-triangle, which aligns better with the symmetry and (seems to) avoid degeneracies. commit 9607b89ce3b1dd6f41905b3ca7225304a78a4236 Merge: b186e65 e660681 Author: Jesse Frohlich Date: Tue Aug 18 10:56:13 2015 -0600 Merge branch 'master' into tpatch commit e660681ebbbd374ce253ac4acfeeb35c915e9681 Author: Jesse Frohlich Date: Tue Aug 18 10:13:02 2015 -0600 Update ignore file to include .dSYM files. commit df296910c6f09b5c32ed6ed21f6a95f6abf31a82 Author: Charles Staats III Date: Sun Aug 16 18:58:58 2015 -0700 Give read-only git command in documentation. commit 6a4cc1c35b18138e29bc1f4adb877479840bea1a Author: Charles Staats III Date: Sun Aug 16 18:21:46 2015 -0700 Remove extraneous import in doc/genustwo.asy. commit acfd5cf8d54dec2bd76eedce85aa1c95c397b25e Author: Charles Staats III Date: Sun Aug 16 18:16:23 2015 -0700 Rename example lemniscate.asy to genusthree.asy and add explanatory comments. commit b186e65abfe84163c2f25a785186998d539b3980 Author: Jesse Frohlich Date: Thu Aug 13 17:34:20 2015 -0600 Simplify test for flatness of a Bezier triangle. Also minor formatting changes and performance optimizations. commit 619e46ba9a321182b6766661b7c17c72036eb55a Author: John Bowman Date: Thu Aug 13 13:45:48 2015 -0600 Fix size3 computation. Use alternative shift for removing subdivision cracks. commit 0f412644c1e3a0a802a3b69b1e23ebbe352dcd55 Author: Jesse Frohlich Date: Wed Aug 12 16:44:28 2015 -0600 Subdivision cracks are only filled when necessary; clean up comments. Only when an edge of a sub-patch transitions from non-flat to flat is the middle vertex shifted to cover the potential crack. commit 6f39592e491ba315065a66d329fa5c9936763e16 Author: John Bowman Date: Tue Aug 11 13:37:18 2015 -0600 Simplify and optimize straightness and flatness tests. commit a5148efe0fcc8ccedc46537c697c2131bb9de356 Author: Jesse Frohlich Date: Tue Aug 11 11:06:29 2015 -0600 Added non-adaptive renderer for Bezier triangles (testing). commit f2dad19906c350e45ea746b363f5b38cacdba51f Author: Charles Staats III Date: Sat Aug 8 10:38:56 2015 -0700 Add documentation for the smoothcontour3 module. commit 75d296d045d374f74a5a55daba15fe0caeed5966 Author: John Bowman Date: Fri Aug 7 14:49:02 2015 -0600 Use vector container for bezier triangle vertices and normals. commit bf4fd0d0e0719295e97ea8befaa4def2cd197dfe Author: John Bowman Date: Thu Aug 6 18:03:19 2015 -0600 Condense code. commit afc9bb50d32bc30a60e8ec14130f459ee3d07324 Merge: 8311561 6d64099 Author: John Bowman Date: Thu Aug 6 16:59:34 2015 -0600 Merge branch 'master' of github.com:vectorgraphics/asymptote. commit 8791d101a628f7e3d16398f2302f21853d522d2a Author: Jesse Frohlich Date: Thu Aug 6 16:01:54 2015 -0600 Remove old, unused comments. - The function renderBisec() is now gone, as it is severely outdated (and its output mesh does not look as good as render()'s). - Other old commented out tests are removed. commit 83115611436bd41a611ee316e03eeaaae31e0f0a Author: John Bowman Date: Thu Aug 6 00:26:15 2015 -0600 Fix readline and gc configuration. commit 611ecadfcfad2df353278388b99a96521227f8d8 Author: John Bowman Date: Thu Aug 6 15:40:24 2015 -0600 Simplify code. commit 9a719d5a367ea6bb04ccc7d43d1b9d9ef8461ccf Merge: 10b58e6 6d64099 Author: John Bowman Date: Thu Aug 6 15:03:39 2015 -0600 Merge branch 'master' into tpatch. Conflicts: configure.ac commit 10b58e6fb9c66b725c78afa5b18c356deeaa5d70 Author: Jesse Frohlich Date: Thu Aug 6 13:23:20 2015 -0600 Move the computation of normals to reduce redundant computation. Before, normals were computed as triangles were pushed to the indices array. However, this caused the same normals to be needlessly recomputed (up to six times, half of which we cannot avoid without a major overhaul). By moving the normal calculation to occur at the same time as the vertices are added to the buffer, most of the redundant normal computations have been removed. commit 6d6409960d4e1c558fe29e008849354cced4dee4 Author: John Bowman Date: Thu Aug 6 00:26:15 2015 -0600 Fix readline and gc configuration. commit f98f52f1a9f5e235d7d7803d167cdfe02618a8e4 Author: John Bowman Date: Wed Aug 5 23:43:41 2015 -0600 Fix configure. commit b742f1cea57be805f7480bcba9702d33d85c29d5 Author: John Bowman Date: Wed Aug 5 14:08:40 2015 -0600 Fix configure --enable-gc. commit e13974901f1b3fca83f1424056c42a150e03aaf3 Author: John Bowman Date: Wed Aug 5 14:08:40 2015 -0600 Fix configure --enable-gc. commit 36e902acfbee47560473e4a66c4ae921f969bc6e Author: John Bowman Date: Wed Aug 5 12:39:15 2015 -0600 Update to latest beziertriangle.cc. commit f27143b2c09b588397d2a357b6663f9872ab1526 Merge: ce5d022 8f3274d Author: Jesse Frohlich Date: Wed Aug 5 12:35:30 2015 -0600 Merge branch tpatch of github.com:vectorgraphics/asymptote into tpatch. commit ce5d022f62ed7f836a20832bd502726b6c38f816 Author: Jesse Frohlich Date: Wed Aug 5 12:27:33 2015 -0600 Add missing file beziertriangle.cc; improve bounds checking. The implementation for Bezier triangles now compiles. commit 8f3274d4b9fea2c5afbce309019779c71874f387 Merge: 6510a21 b1041ff Author: John Bowman Date: Wed Aug 5 12:20:34 2015 -0600 Merge branch 'master' into tpatch. commit b1041ff1ac39490a5729e3851f760d3a8afc8e54 Author: John Bowman Date: Wed Aug 5 12:19:11 2015 -0600 Update ignored files. commit 18942d691550eeb37826c1fc06e46b7ad361a3c1 Author: John Bowman Date: Wed Aug 5 12:18:11 2015 -0600 Add example. commit 0c9443bed41f84d8c38deac9df0be0c62474ebf4 Merge: 6510a21 421cd19 Author: Jesse Frohlich Date: Wed Aug 5 10:28:02 2015 -0600 Merge changes in master branch to tpatch. commit 421cd19d01577dab0f3b92d89eaf1e1edf6487c2 Merge: ecae5ee 94fb5fb Author: John Bowman Date: Tue Aug 4 18:01:02 2015 -0600 Merge branch 'master' of github.com:vectorgraphics/asymptote commit ecae5ee663aab1a18f4e7ba22c3943df68729f54 Author: John Bowman Date: Tue Aug 4 17:54:37 2015 -0600 Update INSTALL. commit 6510a213c1796ca03fce1c190300be98f2ddc208 Author: John Bowman Date: Tue Aug 4 17:54:37 2015 -0600 Update INSTALL. commit 94fb5fb6792662366f0d0d9587bb2504a71c77bd Merge: 2cb41a4 86920eb Author: johncbowman Date: Tue Aug 4 17:14:19 2015 -0600 Merge pull request #1 from phro/ignore Update list of ignore files to include the FAQ. commit 86920ebf9df177045cceaaf77245eefb6d037790 Author: Jesse Frohlich Date: Tue Aug 4 11:52:45 2015 -0600 Update list of ignore files to include the FAQ. commit 5f133444335014674347e56e5bc55f817c3b3cab Author: John Bowman Date: Tue Aug 4 14:19:49 2015 -0600 Implement preliminary Bezier triangle rendering. commit 2cb41a4e63d839fe2588ec08a8f46038cdc7253a Author: John Bowman Date: Mon Aug 3 10:16:26 2015 -0600 Remove unused code; update list of ignored files. commit 535e8daeb3e6c555dca9fc85281dc42f4ac5f74a Author: John Bowman Date: Sat Aug 1 20:46:22 2015 -0600 Convert remaining subversion references to git. commit 651884410a8a408f5d6e3e09c191b51f318d182e Author: John Bowman Date: Sat Aug 1 20:35:58 2015 -0600 Update documentation for git. # doc/png/LaTeX-usage.html commit ce373e1267e1980aca6aefd86822c7daf92cc6d8 Author: Jesse Frohlich Date: Mon Jul 27 14:49:26 2015 -0600 Modified version checking for the conversion of repository to git. - Added a .gitignore for untracked files - Version checking now uses `git describe` instead of `svn info` - Removed references to SVN (except in the documentation). commit 19935165f3617e48f129c5d4f29bca8b4891a885 Author: John Bowman Date: Thu May 21 20:12:50 2015 -0600 Fix bug #192. commit 9dc3510333a92b71d735ed8ed47f33ac7becb368 Author: John Bowman Date: Wed May 20 17:18:25 2015 -0600 Revert 2.35-2. commit ee5e0e6b05d98db0896c5507870d8d5b74fdc294 Author: John Bowman Date: Wed May 20 17:17:48 2015 -0600 Close input file before deleting it. commit 4b00bd5297ad91a56af7c74e59a1854865749e8a Author: John Bowman Date: Tue May 19 18:25:19 2015 -0600 Increment version to 2.36svn. commit 4d0f494686133e553744bf7224e8de9e71a9fe66 Author: John Bowman Date: Tue May 19 16:19:23 2015 -0600 Update documentation. commit 84499463e395a2953059b659afe614a9f207c083 Author: John Bowman Date: Tue May 19 15:43:15 2015 -0600 Work around eps2write bug that forces all postscript to first page, breaking multiple 3D xelatex and context labels. commit 9c773c0f665eaeee061ce44e2bf76b43419b9c24 Author: John Bowman Date: Tue May 19 14:31:06 2015 -0600 Replace duplicate files with symbolic links. commit eb674d6156054584fcc2a462ff4291fb45b65813 Author: John Bowman Date: Mon May 18 13:51:02 2015 -0600 Support rendered 3D context images. commit f77d4b0755136d8cbe09cd4ef6eb4bc34bf1ab79 Author: John Bowman Date: Sun May 17 11:04:51 2015 -0600 Increment version to 2.35svn. commit 58a66182ae47112741ec73b2d6e0f61c9e4f51a3 Author: John Bowman Date: Sat May 16 12:41:33 2015 -0600 Update ghostscript URL. commit ffc1bc4ddbd6b9480e050db5f617f57dfe46f806 Author: John Bowman Date: Thu May 14 00:45:17 2015 -0600 Improve readability of named pen colors documentation. commit a4fd4d552fde1ee9ecdd973d2936439ff4c3585d Author: John Bowman Date: Thu May 14 00:39:39 2015 -0600 Add surface cone(path3 base, triple vertex) to construct an approximate cone over an arbitrary base, courtesy of Charles Staats. commit c09d358301e167f872bcf75c12745a40706c21bd Author: John Bowman Date: Thu May 14 00:07:11 2015 -0600 Update documentation; remove obsolete cygwin patch. commit 4c769e62cd6d96c3f9f67e1c66796325a3513614 Author: John Bowman Date: Wed May 13 09:00:23 2015 -0600 Add test for Ghostscript 9.14 or later. commit ceca1ed11db34ac423d58dbc41a2dddc55872700 Author: John Bowman Date: Sun May 10 23:45:09 2015 -0600 Increment version to 2.34svn. commit a8811fb8386f782a5774a3b102892efc13347a88 Author: John Bowman Date: Sun May 10 22:35:32 2015 -0600 Enable progress reporting if verbose > 1. commit 22bd2d4f493b5afc4d8dc3667995d71194cec4db Author: John Bowman Date: Sun May 10 22:09:46 2015 -0600 Update to gc-7.4.2. commit 48de4019eb5d5539d8bccd9626b93b4e84414656 Author: John Bowman Date: Sun May 10 21:30:56 2015 -0600 Implement aligndir option for aligning picture to arbitrary point of page boundary. commit 6c0219cdba0907038cd935b764cc28159071f685 Author: John Bowman Date: Sun May 10 17:50:49 2015 -0600 Fix default. commit 1ab06dabc6aa79b4a9c7dd0068dbe73076965598 Author: John Bowman Date: Sun May 10 17:47:40 2015 -0600 Add \def\asylatexdir{DIR} option to support pdflatex -output-directory=DIR. commit fd33ea8828db5e2f5bc4b374fed9810b3d5f16f7 Author: John Bowman Date: Fri May 8 12:43:31 2015 -0600 Added Charles Staats' smoothcontour3 module, with example. commit b5c417139db78281c926a91713c418b681b915f0 Author: John Bowman Date: Fri May 8 11:42:00 2015 -0600 Fix definition of SimpleHead. commit 2a34461017a2d05d95e2d1a8768fb248a97487f6 Author: John Bowman Date: Fri May 8 09:01:42 2015 -0600 Remove outdated comments. commit d6b39082b10ff1ca98ff3a32e75734a00f26a467 Author: John Bowman Date: Fri May 8 08:52:49 2015 -0600 Fix image dimensions. commit 87d6aa316273693cc4550c59bc6f31118f6b67d4 Author: John Bowman Date: Fri May 8 08:42:04 2015 -0600 Change default meshlight to nolight so that mesh lines with positive width appear consistent with default single pixel width mesh lines. commit 387f777b59014fbe2dbddcb53767f3413fb30121 Author: John Bowman Date: Thu May 7 19:00:00 2015 -0600 Fix cond handling in parametric surfaces. commit e5a05d458b74767054aa510eeb721ff652243d33 Author: John Bowman Date: Thu May 7 12:25:16 2015 -0600 Fix sign. commit e310c0f312936d878cea4633726a649bbbba5f7f Author: John Bowman Date: Thu May 7 12:22:07 2015 -0600 Fix path arc(pair B, pair A, pair C, real r). commit faa0033acfb6724a7cc1aaa56a0658fbc86a01be Author: John Bowman Date: Sun Apr 26 20:03:36 2015 -0600 Work around backwards incompatible dvisvgm pt to bp unit change on 2014-04-09. commit 9040319f6f982a400450d10f4aff01016a745940 Author: John Bowman Date: Wed Apr 8 16:55:28 2015 -0600 Force deconstruct to use the C locale. commit bc6e637938ef8f55f8e6f4947cc0d3d8c09f6400 Author: John Bowman Date: Mon Apr 6 23:07:04 2015 -0600 Fix mismatched array delete operator. commit 8815ffb186bf0b4237449b4b7a1277abf5751d6d Author: John Bowman Date: Mon Apr 6 18:18:26 2015 -0600 Work around missing epswrite driver in ghostscript-9.15. commit c54a574d1651409338755f5b8053bc5df65f487d Author: John Bowman Date: Thu Mar 26 15:01:22 2015 -0600 Remove obsolete workaround for an Adobe Reader transparency artifact. commit 71be140eb57bd5fdc78184f70085cfc59fd224d4 Author: John Bowman Date: Wed Dec 10 10:29:51 2014 -0600 Fix inline option when importing asymptote.sty with xelatex. commit f96c6012571c7730d8e2f27c25bebe76200a8108 Author: John Bowman Date: Wed Dec 10 10:09:16 2014 -0600 Fix documentation and example. commit d1b3c93701690dadbb6860d4a4ae6aa9cec4bef4 Author: John Bowman Date: Wed Dec 10 10:08:50 2014 -0600 Rename function argument of integrate in ode.asy to correspond to documentation. commit 837732414bad047f36c6bb5f90865f2e369cdb02 Author: John Bowman Date: Wed Dec 10 10:01:12 2014 -0600 Simplify code. commit 5951acaf37553526e3791312b88dfd30d9444bf1 Author: John Bowman Date: Wed Sep 24 15:20:00 2014 -0600 Remove ambiguity from min(guide) and max(guide). commit 3008a5d5e97a17d17f62d14bf415312e9b9bece1 Author: John Bowman Date: Wed Sep 24 14:43:54 2014 -0600 Indexed figures should always be stepped. commit dcaac67c5c1321b8f4d5d60b6333b74908ffe2d2 Author: John Bowman Date: Fri Aug 29 16:44:23 2014 -0600 Fix overlap fuzz parameter. commit 26bd9c01a123125af867a0a9f05d395cd82ed383 Author: John Bowman Date: Fri Jun 20 14:51:28 2014 -0600 Implement and document intersect(path, surface). commit 5264dc6549a4b970494268a9b9e1fc7aad9599db Author: John Bowman Date: Fri Jun 6 16:59:31 2014 -0600 Fix zoom/menu button. Fix play option. commit 5acad030c52fed21506a03dba862e3e703ae2db7 Author: John Bowman Date: Mon May 26 10:57:02 2014 -0600 Implement 2D scalar cross product. Improve documentation of orient and insphere functions. commit 3bb879f344ba646c59666804f665ca2ad1c37f76 Author: John Bowman Date: Fri May 23 00:39:03 2014 -0600 Increment version to 2.33svn. commit aab6ce9a7b4cbb5acd388341e7ed18c93eec447b Author: John Bowman Date: Thu May 22 09:40:58 2014 -0600 Allow overriding CXXFLAGS with CFLAGS so that make CFLAGS="-g" disables optimization (for debugging). commit 673f282372345e1b16afa56621f05c80c90f60cd Author: John Bowman Date: Thu May 22 01:12:56 2014 -0600 Rename side(pair,pair,pair) to orient(pair,pair,pair). Also provide interfaces to orient(triple,triple,triple,triple) and insphere(triple,triple,triple,triple,triple). Fix and update documentation of orient, incircle, and insphere. commit e5cfca855b2103b44863ad14680eba3ffa8e4c50 Author: John Bowman Date: Mon May 19 13:16:29 2014 -0600 Use gs instead of convert to generate latexusage.png. commit 43d4956ed3e03a9eb692f218cddcf590597c0194 Author: John Bowman Date: Mon May 19 08:27:39 2014 -0600 Guard agains random() returning a 16-bit result. commit 887886fda5397d80f841bdc18055a3eba3c9147f Author: John Bowman Date: Mon May 19 00:53:09 2014 -0600 Use random() instead of rand() everywhere. commit e5884384ba49856467921fccee133505007e3024 Author: John Bowman Date: Mon May 19 00:44:20 2014 -0600 Use RANDOM_MAX rather than nonportable RAND_MAX. commit 43e146ccb44494e6ff41a273264d457982a2d4b1 Author: John Bowman Date: Mon May 19 00:43:14 2014 -0600 Fix version mismatches when releases are imported via svn. commit 815c23058dedee81fff90b9703d5470da568999f Author: John Bowman Date: Sun May 18 15:19:31 2014 -0600 Test that unitrand is in [0,1]. commit 35bc98ccc26a9631bfe0c0e803421dac32aff46a Author: John Bowman Date: Sun May 18 12:14:26 2014 -0600 Remove obsolete test for texi2dvi4a2ps. commit 6ce8f7be7c4188702832936aad1963fa43f86bd8 Author: John Bowman Date: Sun May 18 11:16:55 2014 -0600 Suppress compiler warnings. commit c74a6fa979efc2faa65d3a825d8d8dbbdb8e2bce Author: John Bowman Date: Sat May 17 13:24:35 2014 -0600 Document context tex engine. commit cf658a84fa4f9559881f25dbeb52615c63dbaf48 Author: John Bowman Date: Sat May 17 09:54:46 2014 -0600 Enable libc++ workaround also for FreeBSD. commit 1fda160c4ec958643b1db59e5a5ac267fe1fd8cc Author: John Bowman Date: Sat May 17 02:43:23 2014 -0600 Fix segment(bool[] b). commit 906ed8354d900fce7a773918f63cfcc2716eb791 Author: John Bowman Date: Sat May 17 02:02:09 2014 -0600 Increment version to 2.32svn. commit a35298302fafdd633be3684e2206823f584214ad Author: John Bowman Date: Fri May 16 23:32:06 2014 -0600 Fix hangs in 3D font generation and the "none" tex engine. Disable the MacOS 10.9 libc++ workaround on other platforms. commit 8bb07a22fecfb7a45c7263cb3ddc59e696378b1b Author: John Bowman Date: Fri May 16 18:59:29 2014 -0600 Increment version to 2.31svn. commit f3b4f36a04b7811d2da33915a911d8b2d91d4101 Author: John Bowman Date: Fri May 16 16:45:44 2014 -0600 Fix zoom/menu button. commit 1ff6bfaffecd392400c967ced8b099c41e1786e8 Author: John Bowman Date: Fri May 16 15:15:33 2014 -0600 Workaround broken stringstream in MacOS 10.9 libc++. commit 116aed3e51ebc40e616ab8be671b6b546ad6c9ed Author: John Bowman Date: Fri May 16 10:00:52 2014 -0600 Remove optional space. commit d7cf1c526194a0ad4e6302dcd0502bb6f97b1f21 Author: John Bowman Date: Fri May 16 09:45:21 2014 -0600 Add CXXFLAGS. commit 40191b8489e7d0a7353ae095a42def96783a0a6c Author: John Bowman Date: Fri May 16 00:11:20 2014 -0600 Use blocking reads by default. commit ef53cfa578c42f47dba80865b0e55ad490b78f34 Author: John Bowman Date: Thu May 15 22:15:21 2014 -0600 Simplify code. commit 153786ecdf9663ffb8bd81d7740c5b6c54f270ef Author: John Bowman Date: Thu May 15 22:13:58 2014 -0600 Revert temporary division by 0 in transform of a triple workaround. commit 4506f002e141a10036b643bd8fc5148d0a165c09 Author: John Bowman Date: Thu May 15 14:16:42 2014 -0600 Support 3D for all texengines (but prc only for latex texengines). commit f91f293cf477235d1de48237263ebb2e0f4a9354 Author: John Bowman Date: Thu May 15 10:56:24 2014 -0600 Improve TeX pipe interaction. commit 72d872d6e72a8511595179a59b0f01804c5e29ec Author: John Bowman Date: Thu May 15 09:28:22 2014 -0600 Suppress warning messages. commit 2215a2cfd706dbd24fb2094aa3380cb035724fd6 Author: John Bowman Date: Thu May 15 09:09:25 2014 -0600 Fix typo. commit ff2712d3618f318bf6db02e4c648bcc3cb184eb7 Author: John Bowman Date: Thu May 15 08:34:10 2014 -0600 Use standard STL include. commit 8fd6bbe57cf7e66f2c83fc10e074fea292336683 Author: John Bowman Date: Thu May 15 03:22:27 2014 -0600 Increment version to 2.30svn. commit 2e960e254b94517748900132fbc2000eef0bb5f5 Author: John Bowman Date: Thu May 15 01:52:40 2014 -0600 Enable page breaks and 3D OpenGL with ConTeXt TeX engine. commit 5d075b9a5b11339805274fce6f8e2c19281ea4df Author: John Bowman Date: Wed May 14 23:28:38 2014 -0600 Fix inlineimage. commit e5eaf4cff2216fbff79fd8fd0ce3851baaf50e86 Author: John Bowman Date: Wed May 14 22:54:25 2014 -0600 Fix inlinetex. commit 3be75974318793c71bf8ded449200db2c4da40ae Author: John Bowman Date: Wed May 14 19:02:41 2014 -0600 Try to recover from division by 0 in transform of a triple. commit 05dda17c86f49194e00e4a69d1feb43928cda860 Author: John Bowman Date: Wed May 14 18:16:01 2014 -0600 Use list unconditionally. commit d9c4961a64b6dd3de6afe133077121a46aefc7f3 Author: John Bowman Date: Wed May 14 18:03:50 2014 -0600 Fix typos. commit 4158adf56fe355f719357a6bdd96911092265180 Author: John Bowman Date: Wed May 14 17:34:17 2014 -0600 More portability tweaks. commit e4276c4bf1b6c901e92b3c9178639c7446225128 Author: John Bowman Date: Wed May 14 16:44:10 2014 -0600 More portability tweaks. commit f39be071dfe433f17f2320dc696a54de76f1a08c Author: John Bowman Date: Wed May 14 15:49:17 2014 -0600 Simplify code. commit 39595952a0fa67fd389321f31abedf77d09f59a3 Author: John Bowman Date: Wed May 14 15:43:56 2014 -0600 Update reference card. commit 1a0b7b7f7f6ce640645d7425c5a852d2628b76c9 Author: John Bowman Date: Wed May 14 00:06:11 2014 -0600 Remove duplicate variable. commit 6f907f069ad9afe6e196ff3409ad4b77629ddb3d Author: John Bowman Date: Tue May 13 22:51:12 2014 -0600 Reinstate tailequals to support MSDOS in bidirectional tex pipe. commit aa55151ab18c1ae55a6db2cf02438fd3f72fe695 Author: John Bowman Date: Tue May 13 21:04:05 2014 -0600 Improve bidirectional pipe; re-enable context tex engine. commit 1b358479976b72db51759ea295d7195c5fdc641a Author: John Bowman Date: Tue May 13 00:23:51 2014 -0600 Remove support for the ConTeXT tex engine since piping is broken in the latest (mkiv) version. Add support for luatex and lualatex. commit a25e92d4aad28aa4c2e0c9cf3379e8c93b061077 Author: John Bowman Date: Mon May 12 19:38:09 2014 -0600 Update ConTeX support. commit c67f96b85e7ffd05caeb3c2cbc593d553fbfca25 Author: John Bowman Date: Mon May 12 18:59:22 2014 -0600 Portability tweak. commit 539e4b1a6ab1c7adfee52e5d08630ee57df7428a Author: John Bowman Date: Mon May 12 14:12:43 2014 -0600 Remove dependency on \put (contributed by Mojca Miklavec). commit 1b8c235a646a33c38915424adefe7d671e2a07aa Author: John Bowman Date: Sun May 11 17:27:29 2014 -0600 Increment version to 2.29svn. commit a21ae576230fe42f202576d4702337b1e6cb4813 Author: John Bowman Date: Sun May 11 14:56:56 2014 -0600 Reduce number of allowed bezulate refinements to maxrefinements (default 7). commit 4d62b40e408a110bc6aee8b0c536c8244681c2b6 Author: John Bowman Date: Sun May 11 14:55:52 2014 -0600 Avoid numerical overflow in quadraticroots and cubicroots. commit 359e481bae444a08d7b5e3a2899c427b15e477ec Author: John Bowman Date: Sun May 11 10:22:34 2014 -0600 Update splitpatch example. commit 14c8b1ff484d05b023e933de08d0c21db97e4dd0 Author: John Bowman Date: Sat May 10 20:09:33 2014 -0600 Install refs.bib with slidedemo.asy. commit 245f3baeac8ffc6f0988936787f96deab71da748 Author: John Bowman Date: Sat May 10 17:32:43 2014 -0600 Fix locale bug. commit 7acc6ad91a663cfdf7aa8b94541495e7a60ab60e Author: John Bowman Date: Fri May 9 08:52:54 2014 -0600 Remove minimum window constraints (use viewportsize instead). commit 904beb18cea5434833b4e2793102eb83291c726a Author: John Bowman Date: Thu May 8 11:25:35 2014 -0600 Fix discussion of new T. commit a03fd01057e07e258733190f89045e6bacabac70 Author: John Bowman Date: Thu May 8 00:24:42 2014 -0600 Update links. commit aee5114c91da4eda46ecf6ff679b604ffb834ae8 Author: John Bowman Date: Thu May 8 00:15:03 2014 -0600 Work around PRC viewport issue. Simplify OpenGL minsize code. commit 636f9b9ae471dda6dfb2d24192948f0702adc1d8 Author: John Bowman Date: Thu May 8 00:14:01 2014 -0600 Update link. commit 641f0087ca7e984264b1604e77826cc5013ab5f1 Author: John Bowman Date: Wed May 7 11:02:33 2014 -0600 Fix calculation of minimum width and height for OpenGL window. commit 884dbe2975df61c02b1702a8eb1d136f5eb76230 Author: John Bowman Date: Tue May 6 19:26:10 2014 -0600 Fix transform(u,v,O). commit f843adbcf329e75a71f0c3b9feb05ec6bddd0c70 Author: John Bowman Date: Mon May 5 09:58:15 2014 -0600 Add optional parameters to hsplit and vsplit. commit 3e3cf1484ea8838ab1577d9541346e9ca8cb00d0 Author: John Bowman Date: Mon Apr 28 12:10:05 2014 -0600 Increment version to 2.28svn. commit 47b4f65c1723103f158a7d6c93b996007e05975c Author: John Bowman Date: Mon Apr 28 09:46:10 2014 -0600 Move Adobe transparency workaround to C++ code to allow use of texpreamble again with the pdflatex tex engine. commit f6e34a476966f6ef173078f97e9de6b22ec38339 Author: John Bowman Date: Sat Apr 26 13:40:55 2014 -0600 Increment version to 2.27svn. commit ebd0f3956cce6452f03be38f3d8895493b638fef Author: John Bowman Date: Sat Apr 26 10:59:00 2014 -0600 Update flex patch. commit dcdd417934a8cb30186e75cdc4a0bc28c6c0e7e5 Author: John Bowman Date: Sat Apr 26 10:24:56 2014 -0600 Don't test for an svn release if special file svnrevision is missing, so that release code imported via svn still uses the official release version. commit 1b3a42c12d3f0f1b3e5c2338a84e78ccccb27230 Author: John Bowman Date: Fri Apr 25 20:58:03 2014 -0600 Test for POSIX 2008. commit 07156b7672da2a75cca1f2ffe51a794d0651e15b Author: John Bowman Date: Fri Apr 25 20:57:06 2014 -0600 Address portability issue. commit edb7d9e4dead125cfafc12eb9aedfbf4112dd99a Author: John Bowman Date: Fri Apr 25 20:52:07 2014 -0600 Support c++11. commit a0795aee061ca38f664e44ee0812792ee8e7e20e Author: John Bowman Date: Fri Apr 25 09:58:48 2014 -0600 Use unordered_map if __GNUC_PREREQ is not set. commit eae6b2f4e3a0a1924d0f5a9ce4e4812fe14da6e1 Author: John Bowman Date: Tue Apr 22 10:36:57 2014 -0600 Update documentation. commit 68d1882e82485dc25e9ed4d70ee18a1a5393d6e9 Author: John Bowman Date: Tue Apr 22 08:57:14 2014 -0600 Fix degenerate HookHead and SimpleHead arrows. commit 9d3365092484d3b47b770361a33d1e333675f7ee Author: John Bowman Date: Mon Apr 21 22:56:24 2014 -0600 Remove unused files; update references. commit 841020fba6f2052b53e2c7b0781ef23ba4a1f19b Author: John Bowman Date: Mon Apr 21 14:24:14 2014 -0600 Make xasy terminate asy process upon exit. Use winpad as the default code editor under MSWindows. commit b31b715597cf052fec0cdd0fd13eaa2a33a517b6 Author: John Bowman Date: Mon Apr 21 11:08:02 2014 -0600 Fix xasy code editor under MSWindows. commit a498cbda30967e2858db55a499aa7351b9d688f5 Author: John Bowman Date: Sun Apr 20 13:06:53 2014 -0600 Miscellaneous CTAN updates. commit b26e75cd2c6f8e167d182c5ff2ced81988cb594b Author: John Bowman Date: Sun Apr 20 02:57:11 2014 -0600 Increment version to 2.26svn. commit 78a0104496fa647a67847923ee8a05d3fb6d7dd5 Author: John Bowman Date: Sun Apr 20 00:12:08 2014 -0600 Update SVG documentation. commit c1a7c777bea03d4aa17a6759c0a70aa48bc98a56 Author: John Bowman Date: Sat Apr 19 14:21:13 2014 -0600 Fix Boehm gc compatibility issue with compact option. commit 7251dffa726b6747616f18fd1a8f25f4be3ded6d Author: John Bowman Date: Sat Apr 19 14:19:12 2014 -0600 Add brace routine contributed by Charles Staats. commit 9dce9523d3b9f21c95a94c21ec3c55fa74661cfe Author: John Bowman Date: Sat Apr 19 14:12:19 2014 -0600 Allow code editor command line options. commit d183f721ec1db229bd5ee8bc0d77f73b1c5fdef8 Author: John Bowman Date: Sat Apr 19 11:13:02 2014 -0600 Apply noplaybutton workaround only to new versions of media9. Add link to the excellent tutorial written by Charles Staats. commit 61814f95a498757e6fcbb212a1a39a865c5d2ad8 Author: John Bowman Date: Sat Apr 19 09:50:38 2014 -0600 Fix numerical precision issue in makepen. commit 5b6990c4a62afd01161b5cc79489dd8c5f55b93e Author: John Bowman Date: Sat Apr 19 09:26:31 2014 -0600 Re-enable mesh lines. commit b5b752b55ffe4954262faf1efe3e11508efb8217 Author: John Bowman Date: Sat Apr 19 01:32:45 2014 -0600 Update cygwin GLU patch. commit 8eb656d49d49e6a83227e22245864727c023df34 Author: John Bowman Date: Sat Apr 19 00:14:11 2014 -0600 Acknowledge Michail Vidiassov's extensive contributions to the PRC code. commit 925f182004ae3373cfc1165c1f3312beea4dc522 Author: John Bowman Date: Fri Apr 18 13:25:55 2014 -0600 Sort vector patches to work around opacity artifacts in many rendering engines. commit 12b305cc49fc1d5f5ff61649040df4e819d2078e Author: John Bowman Date: Fri Apr 18 11:43:49 2014 -0600 Support raw PRC output with outformat="prc". commit e42598ff80e479e2be07b77091ca7e3639772880 Author: John Bowman Date: Fri Apr 18 10:46:40 2014 -0600 Improve diagnostic when texi2dvi is missing. commit 6e2a9d80b6b3e920a5c2cec24fc1f6d619828b2f Author: John Bowman Date: Fri Apr 18 10:45:43 2014 -0600 Fix inlineimage under pdflatex. commit 3bb80f0dd96f888188435508ca7efba9c25a401c Author: John Bowman Date: Fri Apr 18 09:15:18 2014 -0600 Implement workarounds for Adobe Reader transparency artifact. commit 8554c29a6bd705bd6a974d14ff3bae2051b16394 Author: John Bowman Date: Fri Apr 18 02:04:26 2014 -0600 Update FFT support file. commit fc3ef0ec22b36083ace789436004ef88452a1feb Author: John Bowman Date: Fri Apr 18 01:00:19 2014 -0600 Update documentation. commit 9723f73b960f8be41e47650770cc9efa37275aa9 Author: John Bowman Date: Fri Apr 18 00:30:23 2014 -0600 Update FAQ about changing default arrow size. commit 44d4866109ca922d2a702c634c9e5c5cf6719422 Author: John Bowman Date: Fri Apr 18 00:01:09 2014 -0600 Avoid unwanted play button starting with media9 version 0.35. commit c732e82d4205bb9e14218fc9e309aa0e539a4166 Author: John Bowman Date: Thu Apr 17 23:29:00 2014 -0600 Update fftw++ header file. commit e8d013cfd3e98da6c7f1d5ce14b37b45488f1a8d Author: John Bowman Date: Thu Apr 17 13:32:16 2014 -0600 Revert to version 1.91-39 of contour.asy until paraboloid version is fixed. commit d5ef55a3925c20f18b130599906597270af13d86 Author: John Bowman Date: Wed Apr 16 16:34:54 2014 -0600 Update to Boehm garbage collector gc 7.4.0. commit ae24b1e9aa87ede80a8292730a6a128344b01ca3 Author: John Bowman Date: Wed Apr 16 14:42:22 2014 -0600 Under MSWindows, look for ghostscript library in both 32 bit and 64 bit registries. commit d07dd349ea7dbb3d358ff322e782134fd4ea3ba1 Author: John Bowman Date: Wed Apr 16 14:40:45 2014 -0600 Update examples and documentation. commit b95d4e0d2e968245cf549eb669efe2f2e85c7111 Author: John Bowman Date: Wed Apr 16 14:31:36 2014 -0600 Test that printout is nonnull. commit f9e2147930ae52b83459afeedd55ce3e9d811272 Author: Andy Hammerlindl Date: Sun Dec 29 17:25:58 2013 -0600 Fix an exact match bug. commit 97c2ede0976dd5a81882555097822b2b0e6176cf Author: Andy Hammerlindl Date: Sat Dec 28 17:13:18 2013 -0600 Change multiguide to avoid deep trees in normal use. commit 1f6fcb0caf77259d58c5f513337bb5add23da425 Author: John Bowman Date: Fri Jul 12 12:55:49 2013 -0600 Increment version to 2.25svn. commit 5cc1c36be3f86c9bce5fdf416656561d5b6e7a42 Author: John Bowman Date: Fri Jul 12 10:07:05 2013 -0600 Fix typos in documentation. commit b32749046a796117e1de5eff7756f908aec9225c Author: John Bowman Date: Fri Jul 12 10:06:47 2013 -0600 Fix segmentation fault in drawSphere. commit a9d404fa81617e78363b8c2c44f912be277d061b Author: John Bowman Date: Fri May 31 02:07:49 2013 -0600 Add examples. commit 8100327bca4cb899ef203b47c195232678f91680 Author: John Bowman Date: Thu May 30 15:53:24 2013 -0600 Update link to forum. commit 6f23cbbab14c2463efbb52e6dbc63120798be12d Author: John Bowman Date: Thu May 30 14:32:04 2013 -0600 Add latexmkrc example file that stores figures in a subdirectory. commit 96dbe43981d399c7ad5a72d191ae536308e17884 Author: John Bowman Date: Thu May 30 14:30:38 2013 -0600 Document new SVN repository URL. commit cae60d3655e4b1861793a427528cbf2eded0f498 Author: John Bowman Date: Thu May 30 13:51:33 2013 -0600 Remove explicit libglapi dependency. commit 773ee63dd79b67fac004d6840a7448a52adcd869 Author: John Bowman Date: Mon May 27 19:57:17 2013 -0600 Simplify readpipeline (requires POSIX 2008) again. commit 623fa5662c4faa9bdb78d6e8f8deca4ad464c692 Author: John Bowman Date: Mon May 27 19:52:26 2013 -0600 Restore function pointer to allow recursive calls to simpson. commit 2bedd4ed018f1a144baa299752537a4f05a2238f Author: John Bowman Date: Mon May 27 19:51:11 2013 -0600 Support make -n. commit a5d7e94f6cf4ec32c27b2715f2ef303bf21c317b Author: John Bowman Date: Mon May 20 10:20:59 2013 -0600 Increment version to 2.24svn. commit 8888e9c4e49c59b1aecf89c602ef3294ccd60682 Author: John Bowman Date: Sat May 18 22:38:07 2013 -0600 Allow compilation without fftw again. Revert to previous wisdom file name (.wisdom). Update copyright. commit f01acbf6c75a0ae093790e3303ece0c9c9eaae36 Author: John Bowman Date: Wed May 15 03:10:39 2013 -0600 Increment version to 2.23svn. commit 3e655c3534f42b0782f875636715a6f35eecc1b9 Author: John Bowman Date: Wed May 15 02:33:47 2013 -0600 Fix dependencies. commit d5a39be02b8c2b3008f8fec9c00eef770988dcc7 Author: John Bowman Date: Tue May 14 21:38:27 2013 -0600 Update FFTW header. commit 54876ada4deb700608de1f129ec6d75ba7d99436 Author: John Bowman Date: Tue May 14 21:37:25 2013 -0600 Update documentation. commit c5f20303c569847859b0c4815b2aa46ab199694a Author: John Bowman Date: Tue May 14 21:06:24 2013 -0600 Expose Postscript extend qualifiers for axial and radial shading (setting extend=false can work around certain PDF reader bugs). commit 44d071b5cba3afea9a6285eb3852bca2a18fdcd6 Author: John Bowman Date: Tue May 14 14:39:28 2013 -0600 Fix transformation of normal vectors. Revert back to usual row-major matrix format. commit 0da7a9d5db0f71d4281d5992170afe68797b9501 Author: John Bowman Date: Mon May 13 11:04:57 2013 -0600 Make use of --pipe to enter context interactive mode. commit e21b39b5cb5bc003536d91a8e46eeea92be30a66 Author: John Bowman Date: Mon May 13 09:07:53 2013 -0600 Support Fedora migration from python-imaging to python-pillow. commit 670a1e5a5c918a5bbb2ad92f511728de16a4287b Author: John Bowman Date: Mon May 13 08:16:32 2013 -0600 Fix documentation of irregular contour routine. commit 2e012ef1cb24337a9a80721bcb75ede09ab0da8c Author: John Bowman Date: Mon Apr 8 13:57:50 2013 -0600 Support vertex-colored triangles in Adobe XI. Remove reference to out-of-date trembling examples. commit ebdd5e9f0795cc53a4f44e0f852cdc7a35c4e368 Author: John Bowman Date: Mon Apr 8 13:46:04 2013 -0600 Use TEXMFMAN to find TeXLive sysdir. commit 9a7ea3d064131b8a0bbc7f5eab82a3af52c13181 Author: John Bowman Date: Thu Apr 4 16:16:19 2013 -0600 Temporarily revert 5440 for TeXLive 2013 build systems without Posix 2008. commit 6352888896501bbbe696e737e31f78baaa6a869b Author: Andy Hammerlindl Date: Thu Apr 4 03:10:22 2013 -0600 Add clarification on 2.. versus 2 .. commit fbfa6bd92b6c4901236970f91aa34a42db0c9a1f Author: John Bowman Date: Wed Apr 3 11:29:11 2013 -0600 Make portability tweak. commit 6109a10f5bdf3a19b7683fe9f293e587e4dcba83 Author: John Bowman Date: Mon Apr 1 11:12:12 2013 -0600 Qualify isnan (for solaris). commit 0870b3458fc99f919315a3e4efc77a10a4e9e18b Author: John Bowman Date: Sat Feb 23 06:29:51 2013 -0600 Avoid unnecessary buffering. commit 164de7fbfa01109df9bc4124d739acbb2c734976 Author: John Bowman Date: Sat Feb 23 06:26:04 2013 -0600 Update FFTW++ file. commit ae248b7f0740554792bc9b847352042affdbffe1 Author: John Bowman Date: Sat Feb 23 06:19:12 2013 -0600 Express segment(bool[]) in terms of more efficient segmentlimits(bool[]) function. commit de3d95ba8225bd1b954cb215524e7944de6b83d2 Author: John Bowman Date: Sat Feb 23 06:17:20 2013 -0600 Update FFTW++ headers. commit 41623ead53639d5007bd14ab89d585e29e351169 Author: John Bowman Date: Tue Jan 8 15:18:10 2013 -0600 Recommend freeglut 2.6.0 due to broken menu feature in the 2.8.0 release (and modifier bugs in various patches for this problem). commit 571f18674c41d73b019f03a0acbaa37bd07d069d Author: John Bowman Date: Sun Jan 6 10:42:17 2013 -0600 Remove unused code. Update documentation. commit 3e215b79190c59f73456472454c30677300c891c Author: John Bowman Date: Sat Jan 5 09:09:16 2013 -0600 Allow self-defined unary operators. commit caa6b862447d6fcc71c2714e8c462e33bdba2600 Author: John Bowman Date: Mon Dec 31 09:27:13 2012 -0600 Compare formatted strings instead of real values in OmitFormat. commit c7c4367b58304fc8504c72e5bedb88247917bd05 Author: John Bowman Date: Wed Oct 24 12:33:07 2012 -0600 Update example. commit 54fe52b1e641ef72dac702f8af80182490bcdb8a Author: John Bowman Date: Sat Oct 20 16:32:57 2012 -0600 Use C locale for svn info. commit b52dfbf684b9ee80f4cfa8a505080d49e40d3d83 Author: John Bowman Date: Wed Oct 17 20:11:03 2012 -0600 Temporarily revert to using tan(radians(a)) in numerically unstable arclength calculation in geometry module (note 2.17-29). commit a87a1304c86c659e806749d0e41fba808dc49b43 Author: John Bowman Date: Wed Oct 10 12:20:47 2012 -0600 Increment version to 2.22svn. commit c2d660762e8124689df3cccd179770a3bb785491 Author: John Bowman Date: Sun Oct 7 06:33:22 2012 -0600 Fix typo. commit 6e9e7aef19a11c397a6158b64aaa522ea70620c5 Author: John Bowman Date: Sat Oct 6 00:38:24 2012 -0600 Fix history recall bug. commit 169b5123d6930b64641b898d88feec61e5664bee Author: John Bowman Date: Thu Oct 4 11:53:09 2012 -0600 Add extend parameter to axes (default true) and axes3 (default false) routines. commit 98f645d4563ae9bdd787edc8b27270cdfcf8ce72 Author: John Bowman Date: Sun Sep 30 21:14:47 2012 -0600 Fix alignment point of OpenGL billboard labels. commit 78b66a7f2759a9df1302c25518e34c4424c390b3 Author: John Bowman Date: Thu Sep 27 23:37:22 2012 -0600 Reinstate billboard rotation for explicitly transformed labels. Don't request bbox only in label(frame,Label,triple). commit bd02c41760684d21d1f5664acc7f5fc317fad89e Author: John Bowman Date: Thu Sep 27 17:03:39 2012 -0600 Increment version to 2.21svn. commit c5aa009966d6e1e9d8c30c548260197ae5b3d678 Author: John Bowman Date: Thu Sep 27 15:45:43 2012 -0600 Work around dvipdfmx bug. commit cf498cba13b9c46cefb4394d7651c24a5fcaf6a2 Author: John Bowman Date: Thu Sep 27 12:19:08 2012 -0600 Disable billboard rotation for explicitly transformed labels. commit 3d9cbef946b70536d13c51cf20915ae72deb3f43 Author: John Bowman Date: Tue Sep 25 09:18:30 2012 -0600 Increment version to 2.20svn. commit 194c5091a3e22c107a8c001c34385da562c99e2d Author: John Bowman Date: Tue Sep 25 08:31:54 2012 -0600 Update example. commit e72c486b7f9247b2678905c2b47080e3113d97b9 Author: John Bowman Date: Tue Sep 25 04:49:46 2012 -0600 Fix warning messages. commit a1c622b6b4cc50c4b08d6002fd9e7aac65bd7a77 Author: John Bowman Date: Tue Sep 25 04:30:00 2012 -0600 Pass inverse of modelview matrix directly to media9 to work around numerical resolution issues. Fix PRC viewportshift. commit a9aa1323336d287c24680e5e65895cfb328542dd Author: John Bowman Date: Thu Sep 20 01:58:07 2012 -0600 Fix lighting of NURBS surfaces. commit 61503c988fae7ead6743e2c15ad3ae8c059b5b31 Author: John Bowman Date: Thu Sep 20 00:13:48 2012 -0600 Increment version to 2.19svn. commit 82e909f710a60909610f9b5071e7761ff987c035 Author: John Bowman Date: Wed Sep 19 19:18:37 2012 -0600 Set secondary picture size (so that, for example, markthin works properly). commit 462b7ecee606e5b73cf46ebc6372ea28952866a6 Author: John Bowman Date: Wed Sep 19 19:13:46 2012 -0600 Move include. commit 7cf9c7a91df2d57128d38c23c3eb0248e43c27e0 Author: John Bowman Date: Wed Sep 19 01:47:10 2012 -0600 Update example to mp4. commit 5f7a2a4f564b0b5dd1d644ca7a6b97584dce36d7 Author: John Bowman Date: Tue Sep 18 20:31:13 2012 -0600 Increment version to 2.18svn. commit 07fbb54d9eba448911e475baa05c05fb32dca5c4 Author: John Bowman Date: Tue Sep 18 19:10:38 2012 -0600 Handle 3D degenerate arrows. commit 72b318bc2eec2dab05bd790434924d630b83128b Author: John Bowman Date: Tue Sep 18 13:37:36 2012 -0600 Fix warning message. commit 4a97fee29abc0138e152a87c462d713963de656a Author: John Bowman Date: Tue Sep 18 13:27:25 2012 -0600 Fix warning message. commit afc04ee36aaf1993cdf4c4e1963983aa7768f24e Author: John Bowman Date: Tue Sep 18 13:25:39 2012 -0600 Remove obsolete file reference. commit a6a1ec9e28e58089665ef014c58011e9f3914790 Author: John Bowman Date: Tue Sep 18 13:07:43 2012 -0600 Make tessellation normals optional. Add example and documentation for tessellations. commit 485f28de3f4031d0bed70b122df335c4f6e95676 Author: John Bowman Date: Tue Sep 18 12:56:16 2012 -0600 Add missing -P options to dvipdf (required for media9 support). commit 02a83be7738afbaec3b88291b07c3508917f5d87 Author: John Bowman Date: Tue Sep 18 08:38:11 2012 -0600 Implement improved workaround for media9 preview bug, as suggested by Alexander Grahn. commit 46e0c431344e0aebd48d4714ea83222758b2235d Author: John Bowman Date: Tue Sep 18 02:44:29 2012 -0600 Implement efficient 3D routine for drawing many triangles, with specified vertices and normals and optional vertex colors. commit fb63ec153a6ce50bdf7d13961c44cec1bfec11dd Author: John Bowman Date: Tue Sep 18 02:39:06 2012 -0600 Workaround media9 blank poster image bug under latex+dvips. commit 8e607d1c6b06eb6157d3e44183880474c2809141 Author: John Bowman Date: Mon Sep 17 07:39:11 2012 -0600 Fix warning message. commit 3ca8304aec7b78b01c57d185fa838cd899113acf Author: Andy Hammerlindl Date: Mon Sep 17 00:49:14 2012 -0600 Include stddef for ptrdiff_t. commit 74ff857dd8e876c27f4c704f5f8fcf351a6866ed Author: Andy Hammerlindl Date: Mon Sep 17 00:30:52 2012 -0600 Fix asymptote.so dependencies. commit 3b284903224957834326f7b1323ad62a57ddded5 Author: John Bowman Date: Thu Sep 13 23:49:20 2012 -0600 Add simple vim ftdetect file that set asy filetype for *.asy files. commit f3f87d6a628cde8f2f1164591d929ed9ecb5adea Author: John Bowman Date: Thu Sep 13 23:42:03 2012 -0600 Add condensed binarytree mode (contributed by Gerasimos Dimitriadis). commit 2bfd526b3e68bcf0855f9cd96a8387f38074c205 Author: John Bowman Date: Thu Sep 13 23:23:27 2012 -0600 Add global macros to find the number of a PDF OCG object. commit 4c0a89dc61a79aedbf568acf3f2cd0dd3fdb6a28 Author: John Bowman Date: Thu Sep 13 12:21:09 2012 -0600 Omit redundant billboard group name. commit 35113393aeea57bb6b3640f04771552b24da7184 Author: John Bowman Date: Thu Sep 13 11:04:58 2012 -0600 Fix degenerate arrows (partially revert 1.38-27). commit 961efd0bbfa636ace7093b34367cf94aec58ff94 Author: John Bowman Date: Thu Sep 13 07:40:24 2012 -0600 Mention that media9 v0.13 is required (to support the default 3Dmenu option and billboard labels). commit 6db4bd675805fe732d07027a066d94d6bbde7571 Author: John Bowman Date: Tue Sep 11 13:11:46 2012 -0600 Fix PRC linecap for draw(unitsquare3). commit 759c324ed9426ff3b422d27bcd93144e506a8c13 Author: John Bowman Date: Tue Sep 11 11:09:24 2012 -0600 Fix lighting; consolidate duplicate code. commit 81117f85753d1e69bc32b9a8886d4564f7e9337d Author: John Bowman Date: Tue Sep 11 10:32:35 2012 -0600 Make PRC and OpenGL lighting consistent. Remove asylabels.js (now included in media9 verion 0.12). commit 5d66bf4894766881c08f06b6e05d1aee94d60b93 Author: John Bowman Date: Mon Sep 10 08:58:07 2012 -0600 Simplify media9 inclusion (now that version 0.12 is required). commit f8fa10e6e09c5c441b49cc4d4a27338016e673f5 Author: John Bowman Date: Mon Sep 10 08:49:18 2012 -0600 Make use of 3Dortho and asylabels.js facilities included in version 0.12 of media9. commit 2e877821d1858577c6e780b935d2679eb740c968 Author: John Bowman Date: Mon Sep 10 07:26:03 2012 -0600 Upgrade to media9 version 0.12. commit cee7440cfc1abedad4c91287e4683fe16f2256d3 Author: John Bowman Date: Sun Sep 9 09:17:35 2012 -0600 Add missing file. commit 38eb29960cfd20c550d3e08f44be1bc26a16806e Author: John Bowman Date: Sun Sep 9 04:12:41 2012 -0600 Restore lighting effects for vertex shading. commit f25cd165ecaefdc96b963420a5886c58b6186e46 Author: John Bowman Date: Sun Sep 9 03:43:27 2012 -0600 Fix vertex shading lighting. commit 950367a4dd7aba862951cc87f098b2c53c354e7c Author: John Bowman Date: Sat Sep 8 14:46:13 2012 -0600 Add updated asylabels.js file and future hook. commit c1f70301a20c33fb142c537d6e12b3a1a52184d9 Author: John Bowman Date: Sat Sep 8 14:32:33 2012 -0600 Simplify code. commit f765ea5970eff9960eedbaeb7ae0a65c391bac98 Author: John Bowman Date: Sat Sep 8 10:58:09 2012 -0600 Update FFTW++. commit 5edc7a9350fe1ef6375e5096a911c609a03b5bc7 Author: John Bowman Date: Sat Sep 8 10:15:52 2012 -0600 Consolidate and standardize min(path[]) and max(path[]) functions. commit 3b392b22d785ea9cb4b8d57e074af39cb5619afa Author: John Bowman Date: Fri Sep 7 12:47:56 2012 -0600 Improved media9 patch, thanks to Alexander Grahn. commit 1903b6b5d7496baaaf40fa1fe695bd228c5d56cf Author: John Bowman Date: Wed Aug 29 10:47:45 2012 -0600 Fix Makefile dependencies. commit a070dd5293b14b74f05f0ed6a9f900db017fff62 Author: John Bowman Date: Wed Aug 29 10:46:54 2012 -0600 Add settings.axes3 to control visibility of PRC axis. commit 3a4ff80115e364bc26662e53018bd49e9f4900ab Author: John Bowman Date: Tue Aug 28 09:09:17 2012 -0600 Provide interim media9 bigfile patch. Don't require media9 bigfile support for pdf tex engines. commit 893bda7dd8b5b1a9f4eaeac46020d20ccf939d7d Author: John Bowman Date: Sun Aug 26 13:28:14 2012 -0600 Support prune=false again. commit 6cca962e4b2d6c4e21596f3075754c26ec5f97cf Author: John Bowman Date: Sun Aug 26 13:16:21 2012 -0600 Fix split(" "). commit e295ef3899bd3ff3d05c9ca8854cd965082cc5dc Author: John Bowman Date: Sun Aug 26 03:16:16 2012 -0600 Initialize ASYprefix with output directory. commit 2841f55449b6127d64dd69deea8b046ccc0741a9 Author: John Bowman Date: Sun Aug 26 03:15:15 2012 -0600 Tolerate missing inline option on 3D content embedded within latex files. Cleanup intermediate media9 files. commit 640aead8666318650a79a81549692ba50972377d Author: John Bowman Date: Sun Aug 26 03:10:13 2012 -0600 Cleanly handle missing files. commit 4f23d0888f40ec6d3b0497a95671716cc8d8f5f9 Author: John Bowman Date: Sun Aug 26 03:09:14 2012 -0600 Remove newlines from texpath labels for xasy. commit 1e3776595b93cddd393f635003f1497fa43eb43b Author: John Bowman Date: Fri Aug 24 00:31:17 2012 -0600 Improve formatting. commit 2b16074a5c7352a8557fa039230d60d69b24a0e4 Author: John Bowman Date: Fri Aug 24 00:30:52 2012 -0600 Use prefix for media9 label to avoid duplicate label warnings. Run ghostscript for texpath in the output directory. commit a553e970a3252eff5af1b5f8dd41c14ea1297eeb Author: John Bowman Date: Fri Aug 24 00:27:29 2012 -0600 Add -DSAFER -P default options to improved dvipdf script. commit 25493e086f2277fac51de26ac0c8fbf539ee1761 Author: John Bowman Date: Mon Aug 20 08:45:07 2012 -0600 Fix orthoshift. commit 81189f4950eca8130ed6ce943a9f56f26a38483c Author: John Bowman Date: Sun Aug 19 14:53:13 2012 -0600 Further lighting fixes. commit d7f2a26a8182c3eef3dac187a9a7aa265f156d1a Author: John Bowman Date: Sun Aug 19 14:40:51 2012 -0600 Fix lighting. commit 9d0c4bab62c2c63c80c610199fb088cc3839795c Author: John Bowman Date: Sat Aug 18 07:40:50 2012 -0600 Look for history_list (which seems to be missing from editline) when checking for GNU readline. commit 96d2dce72cb9dae5c357a1ee01f2778e6d317158 Author: John Bowman Date: Fri Aug 17 12:41:23 2012 -0600 Choose a wider connection when searching near the connecting line (patch contributed by Orest). commit fa17cf1e5e0bd2645d937d10abd8a1e0a32d29d0 Author: John Bowman Date: Fri Aug 17 08:07:21 2012 -0600 Update to gc-7.2d. commit ed07190869efe328fa890fef5a9e3dfe06a7ef68 Author: John Bowman Date: Fri Aug 17 08:06:43 2012 -0600 Rename displacement routines. commit 85667a7b7d5459f5202da2975442cc5b60d4be7a Author: John Bowman Date: Wed Aug 15 09:04:24 2012 -0600 Change defaultrender.defaultnames to true. commit dd9d644810f4d40e21762e4b4121a5edd66619d6 Author: John Bowman Date: Wed Aug 15 07:53:45 2012 -0600 Tweak special trigonometric cases to improve PRC compression. commit b58a0817fb572cbd1a373eca07b68e705f9ffa03 Author: John Bowman Date: Wed Aug 15 07:52:54 2012 -0600 Don't autogenerate RPC part names by default. commit d325d11882ce6ba4e511c9b5e52b7025e8b61ea9 Author: John Bowman Date: Wed Aug 15 05:14:26 2012 -0600 Use limits rather than separate xlimits and ylimits commands in examples. commit cd2bc23e0f03be679698d1eec0f6741abe1a8d52 Author: John Bowman Date: Tue Aug 14 19:55:56 2012 -0600 Add missing render argument. commit 07e58c133ace0af75dda15b5a12b1f42b42ece88 Author: John Bowman Date: Tue Aug 14 19:00:45 2012 -0600 Add missing factor to arrowheads. commit aa508f2198ed94dece058fcbc93237334f4cceff Author: John Bowman Date: Tue Aug 14 17:51:38 2012 -0600 Support large PRC files (requires media9 version dated 10 August 2012). commit 5cab138712fe69f06af75a9bb69df29cc440585d Author: John Bowman Date: Fri Aug 10 05:56:58 2012 -0600 Address clang compiler warning. commit 764f6c88d6d75bf927cb79cd5ac49a7fa49c3ee7 Author: John Bowman Date: Fri Aug 10 05:40:09 2012 -0600 Restore label grouping. commit b2faafa9d236db8d96fc669d675e310b6a5422fd Author: John Bowman Date: Thu Aug 9 19:38:52 2012 -0600 Update copyright of reference card. commit 6abad841b8e40df73b0e5c083d26b0146974f8f0 Author: John Bowman Date: Thu Aug 9 10:05:37 2012 -0600 Fix garbage collection issues. commit 0dd753b567c72d1e1c19fb08b29b38b49a8f0684 Author: John Bowman Date: Thu Aug 9 03:41:55 2012 -0600 Work around LaTeX limitation. commit f976570a2b4af01853995f1deb14db7eb4c873d2 Author: John Bowman Date: Thu Aug 9 02:36:28 2012 -0600 Update U3D example. commit f041106d7df65604625260ee98be6142bbcc016e Author: John Bowman Date: Wed Aug 8 22:34:01 2012 -0600 Add simplified version of Michail's local coordinate patch. commit c54405e2889a4f19c6595963eaff5a0c3e3fd1cd Author: John Bowman Date: Wed Aug 8 10:55:30 2012 -0600 Improve support for none TeX engines. commit bbc092255015ac822f298b22ae2c676b4b39e384 Author: John Bowman Date: Tue Jul 31 09:55:09 2012 -0600 Remove unnecessary xelatex detection. commit 2cf8ac929cf7dcecd2fc918d7fda40297c1d977d Author: John Bowman Date: Mon Jul 30 09:58:52 2012 -0600 Remove spurious code. commit f164efc2e27284c87ec8a16c698f24d7fa94ff3e Author: John Bowman Date: Sun Jul 29 23:46:15 2012 -0600 Remove obsolete movie15 patches. commit 92725277aa6c2a7a798bf318dfbee947d37efa4b Author: John Bowman Date: Sun Jul 29 23:44:19 2012 -0600 Remove duplicate code. commit 0fc6f5179d5d60dbb9cae839faed27b169f2443d Author: John Bowman Date: Sun Jul 29 14:46:18 2012 -0600 Upgrade from movie15 to media9 LaTeX style file. commit e3f867dddcd728104d2327d7750a8a3fab392c75 Author: John Bowman Date: Sat Jul 28 00:53:19 2012 -0600 Compile with offscreen rendering if and only if both libOSMesa and libglapi are available. Make settings.offscreen default to false. commit 2d8d5251b15c75efc2d7cca14aafaa7776122900 Author: John Bowman Date: Fri Jul 27 23:45:26 2012 -0600 Support OSMesa version 8 (which allows offscreen and non-offscreen rendering in a single binary). commit d23dfa4f311e79d4f993bfdcd386cb904a20c3fc Author: John Bowman Date: Fri Jul 27 22:59:28 2012 -0600 Fix string length type. commit 8a16ecec4049f1c4fb289a6230173daaf2315e67 Author: John Bowman Date: Fri Jul 27 16:26:37 2012 -0600 Fix typo. commit 1dfbe359691c2d3115702ae22f3cf8a82778debf Author: John Bowman Date: Tue Jun 19 23:47:52 2012 -0600 Fix autoscale3. commit 0cbad923919b8d51a8ec25ac8236315f10eaca66 Author: John Bowman Date: Tue Jun 19 22:42:00 2012 -0600 Partially revert 2.10-2 (which broke autoscaled logarithmic axes). commit 925da6af8b86c303366c47562eb553c3af69f271 Author: John Bowman Date: Mon Jun 4 05:44:19 2012 -0600 Propogate -m64 flag to the linker to fix solaris 64 bit builds (will cause a clang warning message, though). commit 529536b10bcd237cfbc314c8c10b36e3ccf55033 Author: John Bowman Date: Fri Jun 1 10:33:18 2012 -0600 Simplify code. commit 675129797d1260953312d62fb6435172c1414cb8 Author: John Bowman Date: Thu May 31 21:34:02 2012 -0600 Declare strlen. commit 4665de488b0f7dfa0f3fc0f6084564429f633c45 Author: John Bowman Date: Thu May 31 11:24:27 2012 -0600 Fix bug with non-square pen function images. commit c6275331534575aebaa2e5012585548c44e9dfe0 Author: John Bowman Date: Thu May 31 09:46:34 2012 -0600 Increment version to 2.17svn. commit 6cd9addeacb0a9e4ecaf0b780547b059896c8e58 Author: John Bowman Date: Thu May 31 09:41:14 2012 -0600 Revert last commit. commit 54f73bf431250f99e32352dddc905cf18ae8d7e3 Author: John Bowman Date: Thu May 31 07:38:33 2012 -0600 Fix bug with non-square pen function images. commit 0ce955f05eb5e62a79c375534dcc452e260d97a6 Author: John Bowman Date: Wed May 30 13:45:48 2012 -0600 Work around Windows Python bug. commit 7b4a7e8558c528ce20a65c34c193d001bdd57384 Author: John Bowman Date: Wed May 30 11:53:45 2012 -0600 Replace xinput by input(mode="xdr") and xoutput by input(mode="xdr"). Replace binput by input(mode="binary") and xoutput by input(mode="binary"). commit 4b2b3eadba1e359d65d50947a712015cac6096ca Author: John Bowman Date: Wed May 30 10:35:57 2012 -0600 Update setting. commit e59ad4dfb8a5d513ddf2d3b059d208ea5d8afb74 Author: John Bowman Date: Wed May 30 10:24:17 2012 -0600 Workaround limited pipe support in cygwin. commit 895885884808ec83658588d690920bbd8f1c07f7 Author: John Bowman Date: Tue May 29 23:06:58 2012 -0600 Fix type in conditional. commit ec1650e5a37e69af75d8b85dc553d5e9d6893225 Author: John Bowman Date: Tue May 29 10:02:48 2012 -0600 Update diagnostics and documentation. commit c6db7d004b42d3ebb37ab49bb6195dd1960bd371 Author: John Bowman Date: Tue May 29 07:20:20 2012 -0600 Support compilation of native CYGWIN binaries. commit ac67889ea1721b08044cc3c902225cbbb540b0c1 Author: John Bowman Date: Tue May 29 06:12:56 2012 -0600 Fix pair and triple pipe output. commit 5d562c7e4c3db6476f72c191ef55363d06283667 Author: John Bowman Date: Tue May 29 06:09:25 2012 -0600 Simplify opipe formatting. commit 58740141a125132dc1e7927686866f897189fc1a Author: John Bowman Date: Tue May 29 04:30:35 2012 -0600 Work around compiler bug. commit 82e58e812176532fbda581426f0fcf7d443e2e11 Author: John Bowman Date: Tue May 29 03:34:25 2012 -0600 Fix makefile. commit c8f2f7c3b8716787f7cf27854e160fa9d7b0ac01 Author: John Bowman Date: Tue May 29 02:24:29 2012 -0600 Improve msdos build. commit c11f6ae188aeb29182894e0b33484c87ffef4993 Author: John Bowman Date: Tue May 29 02:19:52 2012 -0600 Fix MSDOS makefile dependencies. commit 632ea52a6b16063f1147d1e40a5ef941138db575 Author: John Bowman Date: Tue May 29 00:03:06 2012 -0600 Fix CYGWIN build. commit a4440a1f3a313bd1fdd67df46c57150d3c12a482 Author: John Bowman Date: Mon May 28 23:58:08 2012 -0600 Reinstate -fno-var-tracking option for older compilers. commit f17b8b5b943feda8851978374c1261d07dda9a49 Author: John Bowman Date: Mon May 28 22:42:37 2012 -0600 Support arbitrarily long input lines in xasy. commit 197f07d29b0340ddce9683758876a356de01a1a3 Author: John Bowman Date: Mon May 28 17:29:40 2012 -0600 Remove broken asy path validation code. commit f72e142f5bb7a5c24f166e46d779f9f32b4ccce1 Author: John Bowman Date: Mon May 28 16:30:26 2012 -0600 Fix warning messages. commit 7e073061e95aafa31ada2661524f61fb0a708df7 Author: John Bowman Date: Mon May 28 14:52:16 2012 -0600 Fix portability issues. commit 9a2ee2bc11d2b6d229de97cc2b1b0f3cebbdc330 Author: John Bowman Date: Mon May 28 09:47:51 2012 -0600 Use pipes for xasy communication. commit f7572e5fc91332f6254877b4ba191e7b12a5c3e7 Author: John Bowman Date: Fri May 25 09:04:06 2012 -0600 Improve example. commit 5280aaf5b9f41ab5010cef240e852fe4a7e5d2f8 Author: John Bowman Date: Fri May 25 09:02:15 2012 -0600 Fix division by zero. commit 4760b91ab9e467f1dac0ce4248ecd5d7babc92ff Author: John Bowman Date: Fri May 25 09:00:56 2012 -0600 Don't autoscale ticks when N is specified and autoscale is false. commit a2c299f175bd766d48c0963aab7d6c311ab281b9 Author: John Bowman Date: Fri May 25 08:57:08 2012 -0600 Add new new routine for computing camera positions. commit 65cabae5d0fe4cd36b112879a4dbb0b9ae59d708 Author: John Bowman Date: Thu May 24 22:38:45 2012 -0600 Update to gc-7.2b. commit d281011095af600eaffd39b7b6bec994bc36917d Author: John Bowman Date: Thu May 24 15:49:39 2012 -0600 Respect straight flag in external(). Add partialu and partialv derivatives for patches. Add a general split function. Move split structure into splitpatch example. commit d0269b9d990cbf5677e67d43e9b85a969ef03bb8 Author: John Bowman Date: Sat May 19 22:51:47 2012 -0600 Fix palette range (bug 3487991). commit aebbf37c073de90619b6abf77a129228d18fa3a2 Author: John Bowman Date: Sat May 19 14:38:43 2012 -0600 Remove obsolete --no-var-tracking compilation option. commit 5278d4408c07fdce76a163745279d2e4167fe267 Author: John Bowman Date: Sat May 19 13:44:58 2012 -0600 Remove unused value. commit 7f56277a8a94e0840d4e1f8d4dadd47278c1a4f7 Author: John Bowman Date: Sat May 19 13:21:30 2012 -0600 Block SIGCHLD. commit 6db9f3d39623474f0b21c0bec9945493fb241aff Author: John Bowman Date: Sat May 19 13:20:12 2012 -0600 Force assert to be active. commit 098f9995970cedcb056cbd438c3ad3d100c44107 Author: John Bowman Date: Sat May 19 10:55:16 2012 -0600 Fix manual tick scaling. commit 146ea188fd77609436b3fd8bf56f7c13c6a893a7 Author: John Bowman Date: Sat May 19 09:40:33 2012 -0600 Use currentpen rather than nullpen so that current value of currentpen is respected. commit 6aa2ab11ba05e81c7d9718d0714275ff2ad91bf1 Author: John Bowman Date: Tue May 15 05:54:54 2012 -0600 Add missing file. commit 3ac2531850eb5ab0cc4a7f1fb83a98f9466add34 Author: John Bowman Date: Tue May 15 05:50:40 2012 -0600 Add missing file. commit 0b08ac0f02b38e8e460709b772155841d6b68d1e Author: John Bowman Date: Tue May 15 05:36:47 2012 -0600 Add missing file. commit 898a29e16b50bb77a485cc2dad980ba29172f6c5 Author: John Bowman Date: Tue May 15 05:28:40 2012 -0600 Update POSIX thread support. commit bbe3a92496ff77625e376ef97d748c8fc373ef2f Author: John Bowman Date: Tue May 15 03:49:45 2012 -0600 Fix warning message. commit 92a3e49b5d51348876ec8dbadd0455de4f31187c Author: John Bowman Date: Tue May 15 03:08:30 2012 -0600 Update to gc-7.2. Simplify makefile; fix shared library version. commit 95c12bcf39c54fcf1467d5e3291c07046091e0fa Author: John Bowman Date: Thu May 10 18:06:16 2012 -0600 Fix the erase command so it behaves as documented (no reset). commit 63edda802e6b7102fb239b10bb75a5d84a5ab0d2 Author: John Bowman Date: Thu May 10 15:54:47 2012 -0600 Don't force a default viewportwidth. commit 336fca44455b9a23f0300de0360f05ff872e98a1 Author: John Bowman Date: Thu May 10 15:47:54 2012 -0600 Improve wheel.asy example to allow pdf animations. commit af090550e3e9fdd53e0645631b44e459c6535690 Author: John Bowman Date: Thu May 10 15:27:32 2012 -0600 Fix split structure. commit 55e19362d20a7e6d34abc034579421f477833dc6 Author: John Bowman Date: Wed May 9 13:24:12 2012 -0600 Add NSIS support files. commit f79b31b1cdcc96bbf99863c2f3930eae80ed3650 Author: John Bowman Date: Wed May 9 12:51:37 2012 -0600 Fix icon directory on 64-bit MSWindows systems. commit ac138f0766bf2580e63e147ef682057e548e0b26 Author: John Bowman Date: Wed May 9 12:42:42 2012 -0600 Remove obsolete constructor; update examples. commit d2ff5a4b54ecbb598c6701640dc69e475b2c25d3 Author: John Bowman Date: Wed May 9 12:40:29 2012 -0600 Update documentation. commit 36b874c9bf949602c86d2373399559bf204d86a3 Author: John Bowman Date: Thu May 3 19:39:30 2012 -0600 Make split compute subpatches for each input patch. commit afa172f0b94dfa159afb88049cd70639ebf927ca Author: Andy Hammerlindl Date: Wed Mar 28 20:36:39 2012 -0600 Add picture bounds test. commit 59226ae03dc03ecb85ffe412169946b675ecc2b6 Author: Andy Hammerlindl Date: Wed Mar 28 20:35:51 2012 -0600 Changed name of class to avoid confusion. commit d7b28f36a0ab6c506f62480d125991a802afc32a Author: Andy Hammerlindl Date: Wed Mar 28 18:48:45 2012 -0600 Fix translated bound error. commit bc5c461aee6e3e9e7d8e2cb44ff824b67af70eeb Author: John Bowman Date: Thu Jan 26 10:09:57 2012 -0600 Fix numerical underflow. commit 96720fd56603cc08aba9a2d32614413e3c2d6226 Author: Andy Hammerlindl Date: Wed Dec 28 15:08:25 2011 -0600 Allow named arguments after rest arguments. commit f064b2c18eb998eabb7f6734e3d622f076f2d054 Author: Andy Hammerlindl Date: Wed Dec 28 15:08:00 2011 -0600 Nicer debug output with COMPACT flag. commit 1ba8c8e27540d30d2c07bf94d6ad05255f79e9ea Author: Andy Hammerlindl Date: Wed Dec 28 15:07:37 2011 -0600 Refactor vm::frame allocation. commit 36cfb1471d9dfc76038d7cb8e600178cacd72d1e Author: Will Robertson Date: Sun Dec 18 01:07:26 2011 -0600 fix \CatchFileDef fallback command commit 5584bf2e9c7667776c17261506c4c95ebdc525ed Author: John Bowman Date: Fri Dec 16 02:05:37 2011 -0600 Fix trailing zero removal. commit 36df17bffa1ce7df583b5498e49c25b8e660ed84 Author: John Bowman Date: Sun Dec 11 22:46:58 2011 -0600 Make format more consistent with fprintf; add a defaultseparator argument for typesetting scientific notation. commit 607d1c6a8aa64349ee8222e0d4fb7e51ea1108e3 Author: John Bowman Date: Sat Nov 19 17:08:57 2011 -0600 Work around quote translation problem. commit bd420f563ee8f73ec0d83dc625b7eedf31c4e10f Author: John Bowman Date: Wed Nov 16 19:37:09 2011 -0600 Increment version to 2.16svn. commit 0373fcedf737e0eb031c3b7c0d6249a0365fb8e2 Author: John Bowman Date: Wed Nov 16 15:35:43 2011 -0600 Add missing isnan declaration for MacOS X. commit f45773ebfae0421654c44ff749b4abb5473bb9b9 Author: John Bowman Date: Wed Nov 16 02:55:41 2011 -0600 Increment version to 2.15svn. commit d5f96fa6c1887a0b5ef172b020c33008ab89bc5c Author: John Bowman Date: Wed Nov 16 01:58:35 2011 -0600 Add missing CYGWIN declarations. commit f3a7eab7acf2330bd0db9954965cee63157fe608 Author: John Bowman Date: Wed Nov 16 00:20:57 2011 -0600 Update examples. commit d1910745143903e81841776b1839aae3d3679d8d Author: John Bowman Date: Tue Nov 15 15:23:53 2011 -0600 Fix typo. commit 1bcac6740b1440cc8bf32efd9a8e7e4e2386b721 Author: John Bowman Date: Tue Nov 15 15:18:41 2011 -0600 Move obsolete rotate(explicit pair dir) routine to geometry module. Add quick reference card. commit 519ed6392af531d644338021ad1da7dcca1458fc Author: John Bowman Date: Tue Nov 15 15:17:39 2011 -0600 Fix render=0 bugs. commit 7b3e45ff00039a5d64629a52f69d8c9826062b4c Author: John Bowman Date: Tue Nov 15 14:04:28 2011 -0600 Implement Jacobi elliptic function sndncn(real u, real m), which returns real[] {sn,dn,cn}. commit e65f6c73db51d22c4af1a3ebd647102c7afe811f Author: John Bowman Date: Tue Nov 15 13:36:33 2011 -0600 Implement int ascii(string s). commit f980e86fa2ddb6bc958cc6e6dede75800ba77c2e Author: John Bowman Date: Tue Nov 15 13:27:56 2011 -0600 Added manpage target to build man page only. commit ca0950021320f587a98111af6770910e2fd6392c Author: John Bowman Date: Tue Nov 15 12:45:15 2011 -0600 Add bool isnan(real). commit 61d15d09a399b12373ff3dd8ad472dbd96e0a9bb Author: John Bowman Date: Tue Nov 15 02:45:48 2011 -0600 Fix preview surfaces with render=0. commit fd39ba1b61df82917abef4fd1a5c882895e9f6a9 Author: John Bowman Date: Tue Nov 15 00:55:06 2011 -0600 Fix string reads from binary files. commit e384bc1d78d8d7bb055d47eac5357094e653982b Author: John Bowman Date: Tue Nov 15 00:53:24 2011 -0600 Blank lines are not allowed after \begin{asy}. commit 815254b51b059a8e5cd648731970c6f6b76431ce Author: John Bowman Date: Tue Nov 15 00:00:27 2011 -0600 Generate missing preview images for fitted pictures. commit 2a699d60716d5359aff5c682402778325a8dafa5 Author: John Bowman Date: Mon Nov 14 17:52:20 2011 -0600 Fix draw(revolution). commit 23cba8ca5597ff5ae97e131d6e182edab7b0674d Author: John Bowman Date: Thu Nov 10 18:07:05 2011 -0600 Fix axis bug introduced in 2.14-32. commit b181ebf5775ba5d599b226c89b4445123801b000 Author: John Bowman Date: Fri Sep 30 08:23:17 2011 -0600 Portability fixes. commit b60fabf38153ed38f982c6e0fb7b31ae63444c72 Author: John Bowman Date: Thu Sep 29 22:14:23 2011 -0600 Move lastpen to the end of pen.cc so that it is initialized last. commit 3f33984706db09eccb1911d29f17a09a86b4fa4c Author: Andy Hammerlindl Date: Thu Sep 29 13:32:22 2011 -0600 Change Int to int_typ in policy.h commit 9c18bdd86d9097815f8c25fb48f7dc7cead40cc9 Author: John Bowman Date: Thu Sep 29 08:38:53 2011 -0600 Avoid compiler warnings about virtual function overloading. commit adb2f5a6093f309f71476b390502786fc92f6b24 Author: John Bowman Date: Thu Sep 29 07:54:09 2011 -0600 Avoid further static initialization issues (courtesy of Michail Vidiassov). commit 93e9862311b092b464ab596ea12f37ed1f604e87 Author: John Bowman Date: Thu Sep 29 07:50:13 2011 -0600 Remove extraneous comparison. commit 905b605e3a2ca6ca3d15af85e0b41c058548ab16 Author: John Bowman Date: Thu Sep 29 07:42:10 2011 -0600 Avoid unused function warning message. commit abc896516d0fab7e2cd3324bd5c21633c97852a5 Author: John Bowman Date: Thu Sep 29 07:04:03 2011 -0600 Fix warning messages. commit 454f9b2a5e94451fa2954263a1e0e672d985c195 Author: John Bowman Date: Thu Sep 29 06:25:04 2011 -0600 Fix extended axes. commit c405b32f3f48f7cb881c4438f46aac04c562bf45 Author: John Bowman Date: Wed Sep 28 11:51:42 2011 -0600 Work around static initialization fiasco. commit 835df463a4ff6e50a1bb963a749c6e99a949b437 Author: John Bowman Date: Wed Sep 28 11:17:50 2011 -0600 Fix typo. commit e93d341f5eaf37535e1d1a98cb49ab981a6360ee Author: John Bowman Date: Wed Sep 28 10:49:33 2011 -0600 Update documentation. commit 5200611daa0aa3ee5184200fefa65c68977a0618 Author: John Bowman Date: Wed Sep 28 10:44:41 2011 -0600 Remove unused member. commit 4b7b3d2ab698953f8d8b78d06d12dd43b2606d65 Author: John Bowman Date: Wed Sep 28 10:24:10 2011 -0600 Fix comparison. commit 933d551e410216bb3c8b380a029f6ffea120fb56 Author: John Bowman Date: Wed Sep 28 10:16:20 2011 -0600 Remove extraneous comparisons. commit 863887edfc40854ff581b2cd8788a963516d0fc9 Author: John Bowman Date: Wed Sep 28 10:12:33 2011 -0600 Fix comparison. commit 5e1847bd221ec8b6df63ee9cc20a6f06eaf7f080 Author: Andy Hammerlindl Date: Mon Sep 19 21:18:30 2011 -0600 TRANSJUMP no longer an option. commit 6955d093e68636e943db4e866a26fa037f2e8f8a Author: Andy Hammerlindl Date: Thu Sep 15 16:15:35 2011 -0600 Add 'operator tuple' via EXTRASYMBOL command. commit e2599a170b41495ca9239a3430e0bc9884944a70 Author: John Bowman Date: Thu Sep 15 09:23:55 2011 -0600 Fix build. commit 4e072133999da0c7c4d2323c67a503d6c7a2e227 Author: Andy Hammerlindl Date: Wed Sep 7 20:39:57 2011 -0600 Add operator overloading to aspy. commit 88be1715a04f52c0c98d8836f926e6ea2cd97c92 Author: Andy Hammerlindl Date: Wed Sep 7 18:29:08 2011 -0600 Add 'operator tuple'. commit 2f65f96732ab7045006bea36f95dd030fbf2e6bf Author: Andy Hammerlindl Date: Mon Sep 5 18:01:39 2011 -0600 Can compile Asymptote as a shared library. commit 314c32df054e8e94fdb7e4a3ab36d63b3dfcf630 Author: John Bowman Date: Tue Aug 30 16:10:39 2011 -0600 Generalize copy, map, and sequence functions to arbitrary depths. Add locale string to format(string,int). commit f60d7128a92318a68ea52d72e98f2f020a50851b Author: John Bowman Date: Mon Aug 22 10:46:31 2011 -0600 Improve nullpath handling. commit 7f4aa4dc2cd0bfb309318136062a4368257275a2 Author: John Bowman Date: Mon Aug 22 09:22:55 2011 -0600 Allow draw(nullpath) again. commit 035e97166c51d992fb7821bba57500ebf96c9b5b Author: John Bowman Date: Sun Aug 21 18:31:43 2011 -0600 Update version number. commit 1d46e62d7302e1944634462f1293cb5da3e297d9 Author: John Bowman Date: Sun Aug 21 16:09:54 2011 -0600 Remove portability tweak for MIPS. commit 19376a278ff54761ec08cf7fce188a7412a1a9b2 Author: John Bowman Date: Sun Aug 21 15:09:03 2011 -0600 Specify arbitrary size if MAXPATHLEN is undefined. commit 169a01aa7008f1904ba90620e9dbf3a30b814cef Author: Will Robertson Date: Wed Aug 17 02:51:20 2011 -0600 some missing comment chars in \asyinclude also bumped the version number of the .sty by a minor increment (hope this is okay) commit 99cccab66045a397288043008c16e2661760b321 Author: John Bowman Date: Sat Aug 13 02:50:17 2011 -0600 Build Mark and MarkFill from MarkPath. commit 66e4b3128fef46f9947ba9a377becd0dff2e94ca Author: John Bowman Date: Fri Aug 12 23:50:06 2011 -0600 Implement markthin(path) marker with opacity thinning. commit dc796a6644aa43520df731e9dc5a0c7d8efad14d Author: John Bowman Date: Thu Aug 4 21:48:05 2011 -0600 Update link to cygwin1.dll source code. commit b49f13fdc4e89c6d68a9b2661bb003beb62ef87b Author: John Bowman Date: Tue Jul 12 08:35:36 2011 -0600 Disable billboard interaction for offscreen rendering. commit e91377a416df875948307c281eabe3253e6c8540 Author: Philippe Ivaldi Date: Wed Jun 29 10:09:51 2011 -0600 Fix double drawing of path when showing triangle in geometry.asy commit 0810f9341fefd6a9640d885548e43f4eff317ff8 Author: Philippe Ivaldi Date: Mon Jun 27 16:35:42 2011 -0600 remove trailing char commit c81825912d945d231483dd5514253d78c8c2f797 Author: Philippe Ivaldi Date: Mon Jun 27 11:04:13 2011 -0600 Fix arc orientation in arcfromcenter Enable again arcfromcenter for line (with explicit constraint) Cleaning and improving code commit 56823e66001d1737e46789a0a092f4021c50d603 Author: Philippe Ivaldi Date: Thu Jun 23 08:58:15 2011 -0600 Remove previous modification in geometry.asy commit 96bb297e1528c0587cbdf784d42746820104b4c4 Author: John Bowman Date: Wed Jun 22 20:55:18 2011 -0600 Prebuilt target should not rebuild asy-keywords.el. commit 9793f56e065ba4d9746351f24be21be20ebd75a0 Author: Philippe Ivaldi Date: Mon Jun 20 14:56:04 2011 -0600 Fix inverse(real, point, point) in geometry.asy commit a24beb6a7ff925034b170c9678ce83cc5653af20 Author: John Bowman Date: Sun Jun 19 17:29:55 2011 -0600 Print version number with -vv. commit dc8bf8804a4abee244e0c60cc05025d85092d797 Author: John Bowman Date: Sun Jun 19 13:34:43 2011 -0600 Increment version to 2.14svn. commit f8e0a8e91ce17902d1a63e1648867a42ab40c422 Author: John Bowman Date: Sun Jun 19 07:40:51 2011 -0600 Autodetect memrchr. commit f901f8836f3066777f1724cfe7c9286f4238c06b Author: John Bowman Date: Sun Jun 19 07:31:50 2011 -0600 Make install-prebuilt also install asy-keywords.el. commit d69d4b0f9e9983964a1530aeb8f90e568d283138 Author: John Bowman Date: Sat Jun 18 20:03:42 2011 -0600 Increment version to 2.13svn. commit f9789265ae0f8ed6d09f7c2403121233bbaa8184 Author: John Bowman Date: Sat Jun 18 17:29:56 2011 -0600 Support --disable-gl again. commit bd8211eabbbbbfa98721af242184314d41fa15d9 Author: John Bowman Date: Sat Jun 18 10:55:00 2011 -0600 Include cstring instead of string.h. commit be2e4fdd53804a8efe5a1bb6882da0c855fc1348 Author: John Bowman Date: Sat Jun 18 10:50:11 2011 -0600 Add missing include. commit cd4215443c2e68eebe65e41dd38f06c1d3be33bc Author: John Bowman Date: Sat Jun 18 01:55:15 2011 -0600 Increment version to 2.12svn. commit ecae684548f36119f4216029716ebef377378a3d Author: John Bowman Date: Sat Jun 18 00:40:24 2011 -0600 Update README. commit 1274ea3bdefa8a0feeb5cb9e715b1af4e7958e8a Author: John Bowman Date: Sat Jun 18 00:39:21 2011 -0600 Update copyright. commit 5683c1169105e8d2d4fc6bfa3f9ef8f8c61c9dc3 Author: John Bowman Date: Sat Jun 18 00:35:24 2011 -0600 Add missing install-prebuilt dependency. commit 4c1e1c3ef2654ae238dfa1560b1cfc724d6d5f43 Author: John Bowman Date: Fri Jun 17 17:27:04 2011 -0600 Remove unwanted preprocessor conditionals. commit 0e5e96dd67755957dbb878a7ac16b7c96695d6f7 Author: John Bowman Date: Fri Jun 17 11:50:18 2011 -0600 Fix diagnostic. commit ea082454a2dba0cee29b9a3a442be584b1bdecb9 Author: John Bowman Date: Fri Jun 17 01:56:37 2011 -0600 Fix preprocessor conditional. commit d6d2c9539b55493e5af6f6bb5dd0d9db74c14bc4 Author: John Bowman Date: Fri Jun 17 01:44:31 2011 -0600 Support compilation without GLUT library. commit 48c7204e3b32767ca26e247efb362cc0079d3dde Author: John Bowman Date: Fri Jun 17 01:04:36 2011 -0600 Disable offscreen rendering support by default. commit 5b49d89be10da47f31081cb11c3126f429f4ef9f Author: John Bowman Date: Thu Jun 16 14:25:20 2011 -0600 Don't require LIBGLUT for thread support. commit a1692fce8acc26d53113cd10b987232802856188 Author: John Bowman Date: Thu Jun 16 14:19:21 2011 -0600 Remove unused include. commit 27baaf4d761a1e6ee9c19328a63acc25e5fda05e Author: John Bowman Date: Thu Jun 16 13:13:15 2011 -0600 Add preprocessor conditional for CYGWIN. commit 31be7f0e4cd4bb52846d67e1f1dd8ecf20a54eeb Author: John Bowman Date: Thu Jun 16 00:13:01 2011 -0600 Allow offscreen rendering to be toggled at runtime. commit 372affdfe0543bc92e87ea3413e059b80a058d40 Author: John Bowman Date: Wed Jun 15 15:39:19 2011 -0600 Fix pen shift bounds. commit 99d807b7007f4a902cedd9e1a015f32394247e67 Author: John Bowman Date: Tue Jun 14 16:45:08 2011 -0600 Update README. commit 1fa461a73b642cea346f32ffb9beee5a3677a336 Author: John Bowman Date: Tue Jun 14 16:44:35 2011 -0600 Enable offscreen rendering; address autoconf warning messages. commit 1f34e235228e80d1c7ee1356c902bcfcbfdb50f4 Author: John Bowman Date: Tue Jun 14 13:01:48 2011 -0600 Use tirpc library under CYGWIN. commit 695dbafa436bc1e825ea38afe6d67b9017dd8582 Author: John Bowman Date: Mon Jun 13 15:42:24 2011 -0600 Fix handling of whitespace in word mode. commit 0c3dbafa9226f58f7cd1730ec8ea37dabde36495 Author: John Bowman Date: Mon Jun 13 11:01:30 2011 -0600 Fix implementation of data transpose. commit f6dae43413a31c8dca3136db9092463ec88e12b6 Author: John Bowman Date: Fri Jun 10 04:19:55 2011 -0600 Implement transpose option more efficiently. commit 4ea4c394a4db464247e5118c9c5380b46cac8893 Author: John Bowman Date: Fri Jun 10 03:51:30 2011 -0600 Implement transpose argument for pen function images. commit a1ad1a73b65cdafab966b5f3c05f0400b7e7bebd Author: Philippe Ivaldi Date: Thu Jun 9 16:10:37 2011 -0600 Fix coding style commit aa0c48c1d950aa8752af0734208fe562890a6f32 Author: Philippe Ivaldi Date: Thu Jun 9 11:36:27 2011 -0600 Fix limit calculation of parabola and hyperbola commit 5d76dfbe4f3d772306c18d4ed8d36002461f66e5 Author: John Bowman Date: Mon May 30 09:51:41 2011 -0600 Remove extraneous declaration. commit 892558151c915760ed98d071685c8d7bb35fb025 Author: John Bowman Date: Fri May 27 17:14:44 2011 -0600 Add Orest Shardt's offscreen rendering patch (currently implemented and tested only for UNIX). commit 09f908316f03378cf5ef395359b45d5acebacf64 Author: John Bowman Date: Fri May 27 01:56:19 2011 -0600 Increment version to 2.11svn. commit d9e3abb8c9d6ff909d11180945111a531b9964b7 Author: John Bowman Date: Thu May 26 23:29:46 2011 -0600 Speed up example. commit 0631cca53d0723120b1c88b477ab18f5aa3c27e0 Author: John Bowman Date: Thu May 26 23:25:08 2011 -0600 Use complete userMax/userMin functions. commit 753eb653bfe539e392f1c36f07f1df789a438138 Author: John Bowman Date: Thu May 26 19:43:31 2011 -0600 Fix rendered preview images. commit f1c974625225af462e334d1bd43484508021a6e3 Author: John Bowman Date: Thu May 26 18:21:42 2011 -0600 Increment version to 2.10svn. commit fbb587cbf5578a2695664467a38362dfb524e71b Author: John Bowman Date: Thu May 26 14:06:11 2011 -0600 Add missing index entries. commit dbfd411c9ba5003351c93c86d9fc2f17b78f9391 Author: John Bowman Date: Thu May 26 12:37:41 2011 -0600 Implement void pixel(picture pic=currentpicture, triple v, pen p=currentpen, real width=1); commit 1541a42227d14700cdbdf19a8dfa4946a9aaaf9b Author: John Bowman Date: Thu May 26 02:58:37 2011 -0600 Map [0,1] uniformly to [0,255]. commit 4a2ccb7b31b79862d77cf80b62ea22373b4ab4bd Author: John Bowman Date: Thu May 26 02:50:51 2011 -0600 Don't apply picture transform when computing limits of hyperbola. commit 6ee64567251b6fd3f9cce2eccfc9cf2440a5f1cf Author: John Bowman Date: Thu May 26 01:28:15 2011 -0600 Check that arrays passed to the image routines are rectangular. Implement general pen image routine, along with an example: void image(picture pic=currentpicture, pen f(int,int), int width, int height, pair initial, pair final, bool antialias=false); commit c2c919b3866afd8495640f47989527452d16ad8f Author: John Bowman Date: Thu May 26 01:22:42 2011 -0600 Fix validity test in simplex.asy. commit 8311285017e676b718db670ece10dd55f292aa99 Author: John Bowman Date: Wed May 25 14:46:20 2011 -0600 Simplify code. commit 4595377da618c41abfd1225b2e7c36b0b5441615 Author: John Bowman Date: Wed May 25 14:19:16 2011 -0600 Fix bug in optimized sizing routines. commit 6dce8552f95e7e5bef49becbe3b581ca0e5252cd Author: John Bowman Date: Wed May 25 08:07:29 2011 -0600 Add Michail's recent PRC enhancements. Implement PRC vertex-shading for straight patches. commit 34379b9e3c1913b57db5c87734830f630a833d1f Author: John Bowman Date: Mon May 16 00:06:31 2011 -0600 Eliminate gcc warning about unused yyunput routine. commit e5d3ab2639f3f3b5832ca34893c562dc539befac Author: John Bowman Date: Sun May 15 10:29:31 2011 -0600 Implement keepAspect keyval option in asymptote.sty. commit e5865544385122605c2b031f1a7ca5ef28924fdb Author: John Bowman Date: Sun May 15 08:54:13 2011 -0600 Test for null Label in arrow(). commit c653749f805ad1e5f2fa5f639d45f184941a544c Author: John Bowman Date: Sat May 14 00:52:04 2011 -0600 Check translation table size. commit 48ab45c2229b0eefc131ab54d566c4e9d4cf282f Author: John Bowman Date: Fri May 13 02:51:05 2011 -0600 Don't strip directory for .js and .prc file names. commit 3846842566cd886a8462bd1453d544b6a4865a41 Author: John Bowman Date: Fri May 13 01:45:05 2011 -0600 Support PDF TeX engines in xasy. commit cf93f465fcf39048334c40ca96051c8d97402abd Author: Andy Hammerlindl Date: Wed Apr 13 21:49:11 2011 -0600 Removed old rules. commit 26af240cbcaac8ee9b8225e1496205ec6907d21b Author: John Bowman Date: Wed Apr 6 20:49:10 2011 -0600 Remove unused code. commit cbc4996ce1aef5f513ffeedf838c14608b2fe07a Author: John Bowman Date: Wed Mar 30 09:24:10 2011 -0600 Increment asymptote.sty version. commit 86a45fa5d0aa5196a257b988902ac9bfa2a30033 Author: John Bowman Date: Wed Mar 30 09:21:48 2011 -0600 Allow leading spaces before \end{asy}. commit 619a38cae78e5fb60291972baa5d175f7888f4cd Author: John Bowman Date: Wed Mar 30 09:07:07 2011 -0600 Add step option to indexedfigure. commit 09fbbf7c7b754cad11c5b2b35c7e196d13bded12 Author: John Bowman Date: Wed Mar 30 09:00:57 2011 -0600 Simplify item casts. commit 2b3821e83fab71b9719a636c62cdb10e61970397 Author: John Bowman Date: Fri Mar 11 01:19:33 2011 -0600 Update TeXShopAndAsymptote instructions. commit 55dcb2872bd2b364bc0fde9122e428a1b8705116 Author: Andy Hammerlindl Date: Sun Mar 6 09:18:26 2011 -0600 Add documentation for keyword-only arguments. commit de48fd80cef132745608b6081e19e6b9812b770c Author: Andy Hammerlindl Date: Sun Mar 6 08:58:46 2011 -0600 Add keyword only formals. commit e28db8033261fd944648944918a57497aa080de8 Author: John Bowman Date: Fri Feb 25 00:04:21 2011 -0600 Update example. commit 2a5c7a0b3d54cb3643ab77ca718a1ab9202489b6 Author: Andy Hammerlindl Date: Thu Feb 24 17:17:48 2011 -0600 Fixed assert on array assignment. commit fe1724e28088f72b4f6845240259b8a511d461f6 Author: John Bowman Date: Tue Feb 22 17:45:01 2011 -0600 Avoid overloading built-in circle and ellipse functions. Remove unused code. Fix transform bug in drawline. commit 5a035149cc6b82bc53e867fa7dbb5670113c3bc1 Author: John Bowman Date: Tue Feb 22 17:34:59 2011 -0600 Fix transform bug in drawline. commit 0f6d6d16a04877e8133f8692e766270f2d45bb00 Author: John Bowman Date: Tue Feb 22 17:34:03 2011 -0600 Improve interface to trembling routine. commit 46ff6379757c102758e7c527eb038466d34549ae Author: John Bowman Date: Sat Feb 12 09:28:39 2011 -0600 Remove unused member of drawBegin3. commit 6042454ca398acea0efbfc47d09c300ddb895bc7 Author: John Bowman Date: Sun Feb 6 17:42:39 2011 -0600 Move unit constant into constructor. commit 7c2613352fe970f3ed1e780114db08c5ee389a6e Author: John Bowman Date: Thu Jan 27 13:38:09 2011 -0600 Speed up long long integer multiplication. commit 345eb851c2e49b2017620f34c6e1306abba09df9 Author: John Bowman Date: Tue Jan 25 09:19:29 2011 -0600 Change Int to int. commit d486f3fee70be67c7660d68eb93a730bf78404bc Author: John Bowman Date: Thu Jan 20 08:54:32 2011 -0600 Always output preamble definitions. commit a0d8db72b45ccb2514d0eeb4cd4a10bb57caee49 Author: John Bowman Date: Sat Jan 8 18:08:39 2011 -0600 Update examples. commit 9d8586ba41a6fb37b2515bf4009788aea0a7e8a9 Author: John Bowman Date: Sat Jan 8 16:36:57 2011 -0600 Enable Andy's new sizing routines. commit a07d4ee6172b69d69bbe5348dfa8530212ccd233 Author: John Bowman Date: Thu Dec 30 23:58:29 2010 -0600 Update refactored files. commit 448c94a01985e6152dc7f62c3417efc733cad0d2 Author: John Bowman Date: Mon Dec 27 19:50:38 2010 -0600 Use a temporary expression for self operators to avoid side effects, as suggested by Orest. commit 306f0d9603d3eb97bb0c373597b7b427103a2060 Author: John Bowman Date: Wed Dec 22 06:40:48 2010 -0600 It is no longer necessary to append to an existing preamble. commit d43df1261b0fe3f53dcdee5f0c401fff837ce20c Author: Andy Hammerlindl Date: Tue Nov 30 07:34:19 2010 -0600 Add commented out code in bsp for new sizing routines. commit 5c45929cbd618acca4f76d1f048df99e72c9504b Author: Andy Hammerlindl Date: Tue Nov 30 06:55:53 2010 -0600 No error on userMin of empty data. commit f47e22e7ad395eef6030bed302b035baa21849fe Author: Andy Hammerlindl Date: Mon Nov 29 16:02:26 2010 -0600 Fix merge typo. commit c571692aeb21dfbc7ccdae540645705659604b86 Author: John Bowman Date: Sun Nov 28 11:41:26 2010 -0600 Move limits commands to after draw commands to work with recoded picture sizing routines. commit 2d72b2c0b3c059df0d26ee371c5f185eefd5cd5b Author: John Bowman Date: Sun Nov 28 11:37:44 2010 -0600 Begin to port graph, graph3, and three to use recoded picture sizing routines. commit d9965fbc15ae03569d9639a2731d12cebf1b34a3 Author: John Bowman Date: Sun Nov 28 11:07:58 2010 -0600 Fix unused value warnings. commit c75147a6a0f4bdd9bdca113dd3a91d2e9cca9e4d Author: Andy Hammerlindl Date: Mon Nov 22 19:33:07 2010 -0600 Fix userMin calculation. commit 81579ddd9d1c29b379be8fbd12198f5b8f0e206b Author: Andy Hammerlindl Date: Mon Nov 22 06:41:12 2010 -0600 Add fill paths to userMin calculation. commit 6265d4a32aa110f6eb2d82d3a88bfade0f26e442 Author: John Bowman Date: Sun Nov 21 10:29:59 2010 -0600 Fix definition of heavygrey. commit 8fd4d7688b9c8315d4275996108c051f4550443a Author: Andy Hammerlindl Date: Mon Nov 15 21:17:37 2010 -0600 Emulate old userMin/Max behaviour after transform. commit 815fe39946921fdc7ab677bf02155dd8f6193429 Author: Andy Hammerlindl Date: Mon Nov 15 20:38:23 2010 -0600 Changes to userMin/userMax interface for graph. commit d55f36264e0ed8c14c024dee791fbf91020354dc Author: Andy Hammerlindl Date: Mon Nov 15 20:36:57 2010 -0600 Re-implement userMin/userMax in repicture. commit d4be1ba2e67c506a3bf6af0f94a9a558e648d1b3 Author: John Bowman Date: Mon Nov 15 19:10:19 2010 -0600 Fix horizontal and vertical lines in Drawline. commit 91d758fe53e4b896028553eade4e20c4471bf4b9 Author: John Bowman Date: Sun Nov 14 11:43:27 2010 -0600 Update FAQ. Add integer version of partialsum routines. commit 87ea96ebf5e48282434745bfc9e615ebbcd4de8f Author: Andy Hammerlindl Date: Sat Nov 6 07:19:07 2010 -0600 Fix SIMPLE_FRAME flags. commit d6b0775041f54e4afbe9c060e7cffb553c005977 Author: John Bowman Date: Wed Nov 3 21:22:25 2010 -0600 Increment version to 2.09svn. commit b3951daf804b0e7285f91cdfab2f802d27ef5aa9 Author: John Bowman Date: Tue Nov 2 22:50:12 2010 -0600 Fix incorrect marker optimization in 2.05-45. commit 2de1d3071edf164d188ca6abf1962bde777149ea Author: John Bowman Date: Sat Oct 30 21:40:15 2010 -0600 Increment version to 2.08svn. commit a2c1fe84f6ca6c7184ed790df9093433a2bb63e2 Author: John Bowman Date: Sat Oct 30 19:20:47 2010 -0600 Work around missing CYGWIN prototype. commit 1e4dcd556029147596dd58892fb289353cb13dc3 Author: Andy Hammerlindl Date: Sat Oct 30 12:53:00 2010 -0600 Test while and do loops. commit 9d91b1617ac13f994865701b85d18f8ac401d535 Author: Andy Hammerlindl Date: Sat Oct 30 12:43:15 2010 -0600 Fix loop ordering. commit 396cbf6e8b3e6e83d2731f8af8cc949540ed58dc Author: John Bowman Date: Sat Oct 30 08:56:41 2010 -0600 Implement string mktemp(string). commit 2ea6d9965a38c28021e221832473283c5c19bee0 Author: John Bowman Date: Sat Oct 30 08:53:08 2010 -0600 Improve asyinclude so that asy source file is not required by publisher; make .asy extension optional. commit bdd8423abe94b67360faafce2c51b2c442071f00 Author: Andy Hammerlindl Date: Sat Oct 30 08:00:30 2010 -0600 Experimental closure implementation. commit bf515db31600ef29579f5b4ddff865a86a5ddd11 Author: Andy Hammerlindl Date: Sat Oct 30 06:01:39 2010 -0600 Refactoring of variable access. commit aaf081410074fdddb3ff3e94c62dba6a37f75a9d Author: Andy Hammerlindl Date: Wed Oct 27 18:44:51 2010 -0600 Removes inst::alloc. commit e72cce136c1791711d91098995f3a07dbd3dab7d Author: John Bowman Date: Wed Oct 27 16:51:40 2010 -0600 Add -P option required by gs 9.00. commit 2ba1eecfc8f34a3e784c34d68832fa290a1f6466 Author: Andy Hammerlindl Date: Wed Oct 27 16:30:35 2010 -0600 Allocates closures only when needed. commit 1ece08094f88644a790bd049a46dff9d6304dbf2 Author: Andy Hammerlindl Date: Tue Oct 26 17:35:37 2010 -0600 Don't push a frame on every loop iteration. commit 12e387dd2efd2c88870aad3a4960d0adc6b9e0d2 Author: John Bowman Date: Tue Oct 26 10:36:51 2010 -0600 Make limits work with reversed axes. commit 3ced6d47c7b36dbf6da4a5f5a957d9dce564e648 Author: Andy Hammerlindl Date: Tue Oct 26 08:23:51 2010 -0600 Defines opcodes in a header. commit ba35f6b8ecfabdeefbc5608951c971a6dcff300a Author: Andy Hammerlindl Date: Tue Oct 26 07:40:00 2010 -0600 Additional for loop testing. commit b7f599201df55456545371f0973b1b36aef1fd1c Author: Andy Hammerlindl Date: Mon Oct 25 20:31:29 2010 -0600 Refactoring of texpipe queries. commit 4f8f61d5d5eb32945700a6dad40fffc71a7370f9 Author: Andy Hammerlindl Date: Mon Oct 25 19:53:13 2010 -0600 Removes dead code. commit 4dba0c6d5143633c1071941b6ae6d62a7576ab27 Author: John Bowman Date: Sat Oct 23 19:11:32 2010 -0600 Increment version to 2.07svn. commit a9ff63643fc70a1c0af2c02b582e846241474cf2 Author: John Bowman Date: Sat Oct 23 16:14:41 2010 -0600 Force generation of asymptote.sty when building documentation. commit 6a0189334e67f49427f0bc7e074ef30fe74e5994 Author: John Bowman Date: Tue Oct 19 08:07:30 2010 -0600 Add missing CONST qualifier. commit 0242f30701e0b32525f63a838dbf851ab4076c4e Author: John Bowman Date: Mon Oct 18 19:08:41 2010 -0600 Add missing sty targets. commit 79c6efb8ddb219deeb3c7596cd101f23b98831ac Author: John Bowman Date: Mon Oct 18 02:17:25 2010 -0600 Increment version to 2.06svn. commit 7cabf7209638d0462b3d13f6753cf8d50054c932 Author: John Bowman Date: Sun Oct 17 23:58:30 2010 -0600 Replace asymptote.sty with auto-generated version 1.21 contributed by Will Robertson, with a new latexmk-compatible asyinclude feature. commit 9f0071ef25bc9ee8650f0a9cb947e8b32930f366 Author: John Bowman Date: Sun Oct 17 21:44:20 2010 -0600 In inlinetex mode, avoid interference from pre-existing aux file. commit 4bccec139811be55a82e004cebf40094143f0c1b Author: Andy Hammerlindl Date: Sun Oct 10 08:31:10 2010 -0600 Faster texprocess string matching. commit 78df14ffdfcf926e9e97f658a5fbb27652947489 Author: John Bowman Date: Mon Sep 27 20:59:34 2010 -0600 Remove quotes from textattachfile. commit fd7d89a12f2bc4a79940b60404c5111a4366045d Author: John Bowman Date: Mon Sep 27 01:50:25 2010 -0600 Allow spaces in file names. Support attaching of eps files when using dvips driver. commit 9b2a87833be4c40e39e936e904305686b677d8b3 Author: Andy Hammerlindl Date: Sat Sep 25 22:43:34 2010 -0600 Re-implement label system in coder. commit a6ebf8d91f6f3a4b7088a1c93019d16b6ef2b770 Author: Andy Hammerlindl Date: Fri Sep 24 16:43:08 2010 -0600 Faster fields test. commit 455357f859ad27e19dc8d2726fc490ca9bfda599 Author: Andy Hammerlindl Date: Fri Sep 24 16:42:13 2010 -0600 Optimizations in plain_repicture. commit c75cd8e741ccb1c477ca9116e53dcae4c2b89977 Author: Andy Hammerlindl Date: Fri Sep 24 10:12:24 2010 -0600 Handles default draw calls more efficiently. commit ae1b0856e1390fe5a9e55439b1e0e45ec812b8dc Author: Andy Hammerlindl Date: Fri Sep 24 09:06:05 2010 -0600 Avoid calling xasy commands during shipout. commit 4a3fc4de1f43b6e57852da5400099d6b244ef487 Author: Andy Hammerlindl Date: Fri Sep 24 08:59:21 2010 -0600 Crazy optimizations for plain_bounds. commit ac181cb08d1177dcbb4ba2de39493cc9f76f4800 Author: Andy Hammerlindl Date: Fri Sep 24 08:49:59 2010 -0600 Adds printBytecode function. commit 2f36994507b83ab59c7af94cc4b8fc8cc60dcc5a Author: Andy Hammerlindl Date: Fri Sep 24 08:33:57 2010 -0600 Opcodes for default arguments. commit 6627bacb1282178d1db6844de3fa95d968b4a866 Author: Andy Hammerlindl Date: Fri Sep 24 08:32:42 2010 -0600 Terse position info output by profiler. commit 9f12219807c2f415463e70b0487e42bf6acf7cf3 Author: Andy Hammerlindl Date: Fri Sep 24 08:29:48 2010 -0600 Profiler improvements. Adds timing of builtin function. Now gives output directly readable by kcachegrind. commit ef13d4a9ac4dfcb7ddd020c67f4464d5e0e6e13b Author: Andy Hammerlindl Date: Mon Sep 20 09:26:06 2010 -0600 Use old, deprecated timer for profiling for compatibility. commit ceff1a2df9ddfca7c9ae36028bd190964497d451 Author: Andy Hammerlindl Date: Mon Sep 20 08:36:00 2010 -0600 Change NullLabel to just null. commit 74e42795dbc169747ae792f951d9db5d679e1028 Author: Andy Hammerlindl Date: Mon Sep 20 08:12:23 2010 -0600 Test for clock_gettime support. commit d941ae286429e3e39337cce5ee21ea1f07cb71b5 Author: John Bowman Date: Sun Sep 19 20:20:43 2010 -0600 Handle above argument. commit 26c4c6b2535edd0f2498e8807a78248480cad281 Author: Andy Hammerlindl Date: Sun Sep 19 18:45:23 2010 -0600 Re-implement userMin/userMax. commit d35bbef720993d5dd209415dc16080b4f9e781d0 Author: Andy Hammerlindl Date: Sun Sep 19 17:56:37 2010 -0600 Renamed smartBounds to just bounds. commit 362d4475c79a97d1af12dbe5ba209519045c1855 Author: Andy Hammerlindl Date: Sun Sep 19 17:47:48 2010 -0600 Sizing of transformed path arrays handled in C++. commit 2cdae67be942ea7aa38bcee182fc730c2479476b Author: Andy Hammerlindl Date: Sun Sep 19 17:34:34 2010 -0600 Use NullLabel to avoid Label instantiation. commit 9d8c1c4818957a3460175a80ec95bb4807863d56 Author: Andy Hammerlindl Date: Sun Sep 19 17:04:56 2010 -0600 Add nanosecond counter to profiler. commit 8ea5d15b5f191c0359eb25aa93ac11531fc31ee4 Author: Andy Hammerlindl Date: Sun Sep 19 16:12:17 2010 -0600 Calculate bounds of path arrays in C++. commit a1468cc0d6f8fd946111f13931bfe4076e3a1ab2 Author: Andy Hammerlindl Date: Sat Sep 18 17:51:11 2010 -0600 More efficient calculation of extremes. commit 22c2481b1d549c1730083db70ba4ff6eeaffceca Author: Andy Hammerlindl Date: Sat Sep 18 17:08:14 2010 -0600 Avoid creating arrays of celltype error. commit 7140cd8a66595e42dc68f7b884b3149c37791f95 Author: Andy Hammerlindl Date: Sat Sep 18 16:29:25 2010 -0600 Adds calculation of extremal bounds. commit 6f3e85c39e7785cb0f65d30b531a33e00d3532ce Author: Andy Hammerlindl Date: Fri Sep 17 19:03:15 2010 -0600 Stores paths for sizing data. commit 146a0d496cba471523aea8abdfc30897e78cbb96 Author: Andy Hammerlindl Date: Fri Sep 17 18:21:16 2010 -0600 Reimplementation of transforms of pictures. commit 57a349e72797cbe8b317356040667046f078e44e Author: Andy Hammerlindl Date: Fri Sep 17 18:20:27 2010 -0600 Dump profile to a file. commit cd2c1384e779b5b244ead0b82979a5462d71ee4a Author: Andy Hammerlindl Date: Wed Sep 15 17:41:34 2010 -0600 Adds transformedBounds. commit 5a783605c08bac2a2d1766362c757ca15caf419a Author: Andy Hammerlindl Date: Wed Sep 15 15:52:30 2010 -0600 Adds freezableBounds. commit e95b926afc34136e4a19dcbbac259002b17aa730 Author: Andy Hammerlindl Date: Tue Sep 14 08:34:57 2010 -0600 More sizing refactoring. commit c9d6db1074e8c8b14d31c109ebc79329e0a26d41 Author: Andy Hammerlindl Date: Tue Sep 14 07:43:00 2010 -0600 Minor refactoring. commit d3d14e5aff62f15ae524a93077020a0dea9c40c1 Author: Andy Hammerlindl Date: Tue Sep 14 07:21:37 2010 -0600 Start of refactoring of plain_picture. commit 1495983b9fdb95982df14c7b058d225279d4a46e Author: Andy Hammerlindl Date: Sat Sep 11 16:21:45 2010 -0600 PRESYM is no longer an option. commit 74e0946ad0bcc12e7794d9d4e21958e0b8d9ef28 Author: Andy Hammerlindl Date: Sat Sep 11 16:07:45 2010 -0600 NO_FUNC_OPS is no longer an option. commit e9bedf1ce945afa3ef54a748ffeea0b508d03e84 Author: Andy Hammerlindl Date: Sat Sep 11 16:01:33 2010 -0600 TEST_ADDED_OPS no longer an option. commit 9e31c2c70428c5b9cb466754c5fb537f3408950f Author: Andy Hammerlindl Date: Sat Sep 11 15:54:55 2010 -0600 EXACT_MATCH is no longer an option. commit f062fd5dc49099c581a3cb377e212c603d4f941b Author: Andy Hammerlindl Date: Sat Sep 11 15:49:22 2010 -0600 CALLEE_SEARCH is no longer an option. commit ae118ffa5e19de397071dd191f974feedce172c4 Author: Andy Hammerlindl Date: Sat Sep 11 15:31:32 2010 -0600 FASTCAST no longer an option. commit a4968efea19ceb48b2c1575f30b6f6b94bd5f24a Author: Andy Hammerlindl Date: Sat Sep 11 14:50:43 2010 -0600 Avoid false positives in output testing. commit 632c5f8348d9da9934c49b57d107e2afc6c05035 Author: Andy Hammerlindl Date: Sat Sep 11 14:48:52 2010 -0600 Remove inappropriate comment. commit 9406ca4b9bfebbdab8a230f16c37cd7eef041611 Author: John Bowman Date: Sat Aug 28 09:42:09 2010 -0600 Update documentation. commit 6d62b2bdb1727d7b56b1cdb3401e0454be88c2a4 Author: Andy Hammerlindl Date: Fri Aug 27 21:39:49 2010 -0600 A nascant profiler. commit 6662e7316a3db521d3e0f6e20f4f6c762d19b3c8 Author: Andy Hammerlindl Date: Fri Aug 27 21:36:43 2010 -0600 Also needed for arbitrary depth array constructors. commit 2ba49e0e5a7da7287b7b46c34a29271987cc08fb Author: Andy Hammerlindl Date: Fri Aug 27 21:35:28 2010 -0600 Re-implement arbitrary depth array constructors. commit 4a72a1c8a4584804ed46edc7239d31131f1d288a Author: Andy Hammerlindl Date: Fri Aug 27 21:34:39 2010 -0600 Implement callableAccess. commit a8138ee42767e9b1649a13c47fe6fe1d757352a5 Author: Andy Hammerlindl Date: Fri Aug 27 21:34:08 2010 -0600 Re-implement item printing. commit 9bb04c479be057af191a5686f92c20a881521f44 Author: Andy Hammerlindl Date: Fri Aug 27 16:28:35 2010 -0600 Remove TODO items we have no plans to implement. commit e3962c6fc1f73b44ba66eb846779b4401f3aff98 Author: Andy Hammerlindl Date: Fri Aug 27 16:11:52 2010 -0600 Add TODO item. commit cbf8d06f86ec17a7718d50c226757cdfeea08db2 Author: Andy Hammerlindl Date: Fri Aug 27 11:46:45 2010 -0600 Add TODO item. commit 1cac46da6a8b2f3df3e547a7540bb9c64d777843 Author: John Bowman Date: Fri Aug 20 16:48:08 2010 -0600 Increment version to 2.05svn. commit 0f659e41a2e644c23bed47aa30a88520313275b6 Author: John Bowman Date: Fri Aug 20 00:26:35 2010 -0600 Fix jobname extraction. commit 2c5d9a2a024712f726cf77e390052076ac465289 Author: John Bowman Date: Fri Aug 20 00:25:24 2010 -0600 Avoid hyperref/fp conflicts. commit fd15dba79900ba4d2f5f427575447ebb87c64ad5 Author: John Bowman Date: Thu Aug 19 14:17:55 2010 -0600 Work around MikTeX jobname bug. commit 202e76f8e57b572cf6d7af199af8a1a721a67ac2 Author: John Bowman Date: Thu Aug 19 09:42:38 2010 -0600 Use \jobname in generated TeX files in inlinetex mode (to allow renaming of files). commit bd3ab978ce8f7d88c8005cb3be2fe434286756d7 Author: John Bowman Date: Tue Aug 17 07:14:43 2010 -0600 Make asyprefix work with obsolete versions of graphicx package. commit 41f82fa65bc9929fc3d0c5624e23814199912027 Author: John Bowman Date: Tue Aug 17 06:12:53 2010 -0600 Suppress messages from FP package. commit 461253a561ba8c6dc43c680488c77767632f1f3a Author: John Bowman Date: Fri Aug 13 06:05:44 2010 -0600 Fix documentation of render.merge=default. commit 69335bb2a494fd3ab0d40e8091712681521a6134 Author: John Bowman Date: Fri Aug 13 06:04:46 2010 -0600 Do not fill subdivision cracks in transparent labels. commit d4dba39de0514e82f86b456316fabe6756e1b848 Author: John Bowman Date: Tue Aug 10 13:37:07 2010 -0600 Revert last commit. commit 49a0247274e67d43fc3b6d940154dd1d84d25882 Author: John Bowman Date: Tue Aug 10 13:27:42 2010 -0600 Work around quoting problems with obsolete versions of graphicx.sty. commit f32271c511a95dbfd4ca451fde08d7ca44d642a6 Author: John Bowman Date: Thu Aug 5 13:57:53 2010 -0600 Fix man page. commit 652bdd01d7bf512bd3a3ab96071d54f550327297 Author: John Bowman Date: Thu Aug 5 03:23:38 2010 -0600 Add DOSendl and DOSnewl line xterminators. commit 36c0268bece291c00797a65221e55cb51a5369b2 Author: John Bowman Date: Wed Aug 4 14:56:21 2010 -0600 Handle MSDOS line terminators. commit 86aff539c9d093d0c51b7460e9ca889e4a2b7f68 Author: John Bowman Date: Tue Aug 3 13:10:10 2010 -0600 Increment version to 2.04svn. commit 7c7f66fb477566418d9f45f55c9863068b4e5385 Author: John Bowman Date: Tue Aug 3 06:14:46 2010 -0600 Fix blank 3D labels. commit eb7e475b6b5686bd3d85bcbac24e4bfa56e11a36 Author: John Bowman Date: Tue Aug 3 06:07:51 2010 -0600 Add world map example, courtesy of Jens Schwaiger. commit e5b8f62d73bcd6259fb2dc3efefb00f3a8fb1bda Author: John Bowman Date: Tue Aug 3 02:54:52 2010 -0600 Add latexusage \asydir support for putting asy files in a subdirectory (within which one then runs asy latexusage-*.asy). commit c8ef9049c17281ae495f3de25a65c3f0a2ef5cf1 Author: John Bowman Date: Mon Aug 2 21:28:08 2010 -0600 Fix inlineimage option. commit 102c273d071842d51a2b3036a07aa0af7a9377cc Author: John Bowman Date: Sun Aug 1 01:42:17 2010 -0600 Use $(MAKE) everywhere. commit f304126618eea4c501ec9c014ed9a4e3a82e00c3 Author: John Bowman Date: Sun Aug 1 01:08:42 2010 -0600 Clean up auto-generated files. commit 320f0c323efc4514a746aff1878d708e1e66cdae Author: John Bowman Date: Thu Jul 29 06:26:17 2010 -0600 Add missing pen and margin parameters to blockconnector function calls. commit fd56cadd4fc9075bf2ea95b13b679e321443f1a9 Author: John Bowman Date: Mon Jul 26 11:45:32 2010 -0600 Improve definition of Dotted. commit cf4732530cf046b7a4f0e63109eed5e7f64cb659 Author: Philippe Ivaldi Date: Sun Jul 25 06:48:26 2010 -0600 Implement fix of Olivier commit fb45aa2a5664199f278a62911e1205aa21370dce Author: Philippe Ivaldi Date: Sun Jul 25 06:33:27 2010 -0600 Remove trailing code commit 40d3075aeec88fc1402a0b2948200b01cc810c05 Author: Philippe Ivaldi Date: Sun Jul 25 05:41:48 2010 -0600 Fix casting degenerated ellipse to path commit 365f1a297d9b7275ab282742ee9c25a847d19dba Author: John Bowman Date: Sat Jul 24 00:09:39 2010 -0600 Add missing arguments. commit d0117f4f6844837362ea62b7bb40e7e7e37db16a Author: John Bowman Date: Thu Jul 22 23:30:17 2010 -0600 Fix typo in asymptote.sty. commit d068ce357b537c9322d5072cdab771a8b2b4e5ce Author: John Bowman Date: Thu Jul 22 11:32:23 2010 -0600 Remove unwanted blank lines from asymptote.sty; support XeLaTeX again. commit 5fac5e86473523db335119bffc3a5a4e0ce96783 Author: John Bowman Date: Sat Jul 17 21:24:51 2010 -0600 Support nonrendered preview images via render=0. commit c3f3b373cc80f9886d2ba4fa415b81da22bd0cb9 Author: Andy Hammerlindl Date: Sat Jul 17 13:36:06 2010 -0600 Optimize virtual methods. commit c73e9affc027e1c864c280bb3542ed7de9ccd3ce Author: John Bowman Date: Thu Jul 15 14:36:44 2010 -0600 Fix man page. commit 35039790021f0abe456342d830e55914075ba93f Author: John Bowman Date: Thu Jul 15 14:27:57 2010 -0600 Improve documentation. commit b293b2a70405ead60e25e812419b85f429235c75 Author: John Bowman Date: Tue Jul 13 13:40:55 2010 -0600 Update documentation. commit 49b6a721d1b8a57b74534ba4c51c4fc6cada4142 Author: John Bowman Date: Tue Jul 13 11:29:26 2010 -0600 Update MSWindows documentation on setting environment variables. commit 18e31bb1e82ff8046a79106d3324f5af7d6c846c Author: John Bowman Date: Tue Jul 13 11:24:33 2010 -0600 Automatically add Asymptote installation directory to MSWindows path. commit ab5d13c370add6eb69fab571919836c1a49348cf Author: Philippe Ivaldi Date: Mon Jul 12 16:23:41 2010 -0600 Fix directions with arcs in geometry.asy module commit 9287c8c7bd6bc4265a0b5567acac28788d1e1ae8 Author: John Bowman Date: Mon Jul 12 01:52:22 2010 -0600 Add output test to make check-all. commit 6a71afc7f41faa3cad79a0600c6e66cea3e4abe8 Author: John Bowman Date: Mon Jul 12 01:11:22 2010 -0600 Fix latexusage Makefile dependencies. commit feeb4ded2faedf174c97be5d540f4395803784c3 Author: John Bowman Date: Sun Jul 11 23:33:06 2010 -0600 Fix makefile dependency. commit 35c37874431d99b5b11f8bedad70fbe19469d37c Author: John Bowman Date: Sun Jul 11 22:54:35 2010 -0600 Remove perl dependence from source tarball. commit 4a06ca3d336219fca95c010061b0730b4c09c756 Author: John Bowman Date: Sun Jul 11 09:52:09 2010 -0600 Increment version to 2.03svn. commit 3dd9ad77a525aa8608eeeb44cc18aa3f118d3271 Author: John Bowman Date: Sun Jul 11 01:42:54 2010 -0600 Quote file argument. commit a047e05141ace0ac49176a466a13b6f292ed6bb2 Author: John Bowman Date: Sun Jul 11 00:38:31 2010 -0600 Fix typo. commit ad2403665c0e9decb1a5370c1738e86d9f08a216 Author: Andy Hammerlindl Date: Sat Jul 10 16:33:22 2010 -0600 Changed extended for statement errors. commit e9018da9ba4fa25596fb42396a525a94172a39f5 Author: Andy Hammerlindl Date: Sat Jul 10 15:06:05 2010 -0600 Better error reporting for extended for statement. commit 0f7ef36f919ccad768f447c58dce846860817e93 Author: John Bowman Date: Sat Jul 10 12:03:58 2010 -0600 Add latexmk custom dependency for EPS files. commit 5e4adcf20d3fdae99de2c2565667ed1ea455b9c9 Author: John Bowman Date: Sat Jul 10 10:52:15 2010 -0600 Fix makefile dependency; clean up files. commit b2486208672d373faf72463bda65bd9aa84fc165 Author: John Bowman Date: Sat Jul 10 02:19:57 2010 -0600 Fix asy() command. Delete duplicate example. commit d1f1afa0eb8f348d2ff9e85d8bf2fd3eb8ed8deb Author: John Bowman Date: Sat Jul 10 01:17:53 2010 -0600 Rename *_.pre preamble files to *.pre. In inlinetex mode, rename *_.tex files to *.tex. Allow the inline option to be specified for every figure. Implement a global attach default option. Do not generate a global latexusage.asy file along with the individual latexusage-*.asy files (this is a backwards incompatible change). Add latexmk support for compiling individually only those figures that have changed. commit 06191baaae190da09f18894b01fe70c574534d98 Author: John Bowman Date: Fri Jul 9 08:41:10 2010 -0600 Fix example. commit e0bc424b13aba48adbfaafaa91f3e2b684bdf05e Author: John Bowman Date: Thu Jul 8 12:01:55 2010 -0600 Minor simplification. commit 82bf92094ef0dc187075253682eb76c6468b0859 Author: John Bowman Date: Thu Jul 8 11:56:43 2010 -0600 Simplify texpath. commit d6b02f1be32ff3de9eafbe52e41c8b0e7db87fcf Author: John Bowman Date: Thu Jul 8 10:54:27 2010 -0600 Fix multiple fraction bar bug. commit 5ae9a888f9e3e2955c87684412d3deb1edabc8bc Author: John Bowman Date: Thu Jul 8 10:46:59 2010 -0600 Fix texpath("\relax"). commit 451ed2fa9b8443d3021984c0a698d854c0a3a9b5 Author: John Bowman Date: Wed Jul 7 09:54:38 2010 -0600 More portability fixes. commit 5a8986dd5c9a27cf45c80315ad0e2dec0315a321 Author: John Bowman Date: Wed Jul 7 09:05:00 2010 -0600 Define __GNUC_PREREQ if undefined. commit 6c9ec4ee269de9e2a8299a22580090154e51bd08 Author: John Bowman Date: Wed Jul 7 08:58:43 2010 -0600 More portability fixes. commit 6c47fd14b11a9f429be5196b7b1ac7319541d27e Author: Andy Hammerlindl Date: Wed Jul 7 07:22:38 2010 -0600 Re-implemented sanity checks in venv. commit 55557c59c13a6c289e17e3ebe6a9e809ae89fb58 Author: John Bowman Date: Tue Jul 6 23:45:57 2010 -0600 Fix warning messages/portability issues. commit 8cc169b9e14b775e235eee5c95f0a3bf5dec3fd9 Author: John Bowman Date: Tue Jul 6 15:22:58 2010 -0600 Remove obsolete infinite coordinates. commit 5b9962cd664a61a753b92ce7d771d3495c3be6f4 Author: John Bowman Date: Tue Jul 6 14:57:47 2010 -0600 Revert 1.97-23 for frames. commit d5ae51b2ef75de6ce0d408bf94ce5cf85832602a Author: John Bowman Date: Tue Jul 6 11:57:08 2010 -0600 Fix conflict between asymptote.sty and changebar package. commit a0361fb3ebe1f78e44d8d07f7c24f161f2c6b829 Author: Andy Hammerlindl Date: Mon Jul 5 14:30:12 2010 -0600 Minimized the impact of the NOHASH directive. commit bc7a7f8e7c803f6ea6a42d71892014b5cd42bec8 Author: Andy Hammerlindl Date: Mon Jul 5 13:56:17 2010 -0600 Common sub-expression elimination. commit c979f0b1d691e9035c978cc7a188a91dfda1bc22 Author: Andy Hammerlindl Date: Mon Jul 5 13:53:15 2010 -0600 Removed 'key' class from venv. commit 0f509e143738a758eb31cba0f6c3e1b4979da49d Author: Andy Hammerlindl Date: Mon Jul 5 13:35:19 2010 -0600 Removed dead code. commit 27400cbb97c9454f150a8f05237adcb15daf265e Author: Andy Hammerlindl Date: Mon Jul 5 11:46:23 2010 -0600 Custom hash table in venv. commit 33148865baed677644ec9206e24b751364ab9be1 Author: John Bowman Date: Mon Jul 5 02:44:07 2010 -0600 Support xelatex animations. commit 7205ed148d4663e1a0de4e2f994afd338d3b6a7c Author: John Bowman Date: Mon Jul 5 02:27:26 2010 -0600 Increment version to 2.02svn. commit de30983cb5f4be395ef392096cec503de7433d54 Author: John Bowman Date: Mon Jul 5 01:23:04 2010 -0600 Remove invalid option. commit 26ae5e989036159e6bbb5569be53b30318aed567 Author: John Bowman Date: Mon Jul 5 01:12:29 2010 -0600 Support individual processing of each figure within a LaTeX document. commit c4c98d4a896e3207fd43a815252dbce55bcb7799 Author: John Bowman Date: Mon Jul 5 01:03:52 2010 -0600 Update talk. commit 66c05e3a5bbf6563b3a0c51119853311227987dd Author: John Bowman Date: Mon Jul 5 00:22:55 2010 -0600 Revert to type1cm.sty since fix-cm.sty does not work as advertised. commit a79a7f5d52cbff70be05bf432cb50af1dbda4c64 Author: Andy Hammerlindl Date: Sat Jul 3 16:56:38 2010 -0600 For loop and var documentation. commit 63c28745e65efa3e49a1e91df04baca5d4d7d562 Author: Andy Hammerlindl Date: Sat Jul 3 16:52:23 2010 -0600 Allow var in extended for statement. commit 4b097c00549c6e67fc3e52fa88c58885b454825a Author: John Bowman Date: Sat Jul 3 01:37:08 2010 -0600 Delete old aux file. commit 8282862ccef850c116aced9748f299effd73f573 Author: John Bowman Date: Sat Jul 3 01:32:58 2010 -0600 Use settings.outname(). commit 0ebd3ceefce3fedee8e6405af46ab2ff284d2ce8 Author: Andy Hammerlindl Date: Thu Jul 1 17:05:34 2010 -0600 Enabled transConditionalJump. commit 282c8a98337af10de3ce40133dbe0a1b334638f2 Author: Andy Hammerlindl Date: Thu Jul 1 17:04:30 2010 -0600 Slightly more optimized bytecode. commit c9202c71ecdc432901d86f7608f8e2be7faa607e Author: John Bowman Date: Wed Jun 30 09:24:59 2010 -0600 Update example. commit ad2e01d9abc82576b4b6690c2ae84489400dadea Author: John Bowman Date: Wed Jun 30 03:51:04 2010 -0600 Update lecture. commit 594c0929596014b567855bfcb27120fedd3c64dc Author: John Bowman Date: Wed Jun 30 02:50:12 2010 -0600 Fix normal vector for perspective projections. commit 2fcb49b537e443ec0a1e9cd0ca70d05687e2aa3f Author: John Bowman Date: Wed Jun 30 02:43:26 2010 -0600 Revert 2.01-7. commit e3a210c6c8f490d66fe951998d583dabe1108cba Author: John Bowman Date: Wed Jun 30 02:20:14 2010 -0600 Add new examples. commit 0482f1e30ad4f3cf5a95f1341f974632c84b0f7a Author: John Bowman Date: Tue Jun 29 23:55:45 2010 -0600 Revert docdir changes since they break rpmbuild. commit b8828810887628ff47be1c8b82113458dc315f2a Author: John Bowman Date: Tue Jun 29 23:39:30 2010 -0600 Fix docdir. commit 4f9236b06747902a8ed07cf8d862905294570f18 Author: John Bowman Date: Tue Jun 29 22:53:02 2010 -0600 Use PenMargin in drawing a binarytree. commit 154b2cc14f0d405afd1c88645a6de8e890819072 Author: John Bowman Date: Tue Jun 29 22:49:17 2010 -0600 Check for \r as well as \n terminator. commit ac465c8dbcd10bc76db0b9bd107dd50d98c4b2d1 Author: John Bowman Date: Mon Jun 28 18:45:05 2010 -0600 Support docdir. commit 31785de3fb7ecc03427a8d1280d9348facb32d7c Author: John Bowman Date: Mon Jun 28 08:44:34 2010 -0600 Improve example. commit ce3da01f8c4ae0368a381a38eb1fecbbc02ca4b0 Author: John Bowman Date: Mon Jun 28 08:29:15 2010 -0600 Improve example. commit 9e2af753ee8bb420bd1e8590f72001804c049822 Author: John Bowman Date: Sun Jun 27 17:57:33 2010 -0600 Use values for BoolTruthValue and BoolFalseValue less likely confused with another type. commit faf789e220b79d61046567ecdfa54cadee29d400 Author: John Bowman Date: Sun Jun 27 16:46:03 2010 -0600 Add quasi-type checking for bools. Clear uninitialized item bits. commit ccb5ec5ec57e599454e1c12a5a0be113f185f2f0 Author: John Bowman Date: Fri Jun 25 21:44:33 2010 -0600 Update example. commit 1f8c956bee25307951b95384b40f0f2e00ee645f Author: John Bowman Date: Fri Jun 25 16:29:44 2010 -0600 Increment version to 2.01svn. commit 8c7aad3f741b646e0d779f2df57853123a07c1c2 Author: John Bowman Date: Fri Jun 25 13:27:05 2010 -0600 Fix warning message. commit 5696f65ccdf5c48c09806b172b7d9fde4aa47826 Author: John Bowman Date: Fri Jun 25 12:57:35 2010 -0600 Port to CYGWIN. commit 04da58c5cc915a34d75b5efb73df340345b73348 Author: John Bowman Date: Fri Jun 25 12:09:33 2010 -0600 Add 3D bar graph example. commit 54cca96e42935334c966a78f35994291f2fe546c Author: John Bowman Date: Fri Jun 25 11:49:46 2010 -0600 Update examples. commit f887acf5613925b857b2bc232cdf41c0b9ccecdb Author: John Bowman Date: Fri Jun 25 11:44:08 2010 -0600 Fix viewportmargin. commit d590f18c1ee65fa58abb24490611c9cb0de4d6b1 Author: John Bowman Date: Fri Jun 25 11:14:09 2010 -0600 Fix orthographic sizing. commit 121b68177e60e59716f78d28b8a808f7aad77433 Author: John Bowman Date: Fri Jun 25 02:32:04 2010 -0600 Rename GSL test. commit 10bc45c70c46fb13558e3996e0c5f60972fd1f95 Author: John Bowman Date: Fri Jun 25 02:25:11 2010 -0600 Fix displayed PRC units. commit 92e69381d148da6e6c1daae18d9d278994065264 Author: John Bowman Date: Fri Jun 25 01:08:24 2010 -0600 Remove unused array. commit 6e10720e4a06c53822a01240ea5108df19dbfbfb Author: John Bowman Date: Thu Jun 24 17:01:12 2010 -0600 Fix drawing of 3D thick lines of length 0. commit 13f4f6d20babb1c373b1c479dea510d1886f2f5b Author: John Bowman Date: Thu Jun 24 00:57:58 2010 -0600 Make lexorder in math.asy a strict partial order. Implement int search(T[] a, T key, bool less(T i, T j)). Batch 3D TeX labels. commit b8a4afd8ebfe8af6cb10025fb6d8a6d070dc62da Author: John Bowman Date: Wed Jun 23 00:09:35 2010 -0600 Remove unused code. commit 0ae9d0b1bc726142f2e5be4524756327371f91f2 Author: John Bowman Date: Mon Jun 21 08:54:34 2010 -0600 Suppress plain TeX page numbers. commit a50979917974199334c1173a4e02650ae38e2882 Author: John Bowman Date: Sun Jun 20 12:32:46 2010 -0600 Disable nonportable GSL tests. commit 511739b7fd0f39b51a959bd2da94d85683829bc5 Author: John Bowman Date: Sun Jun 20 12:20:46 2010 -0600 Make gsl optional by moving it to make check-all. commit ccdcbcdbf1bda211a1b2266c77ea2b0e13db9473 Author: John Bowman Date: Sun Jun 20 11:54:27 2010 -0600 More GSL portability fixes. commit 54763841fd01c553679f2894ad57f44c3a629e7c Author: John Bowman Date: Sun Jun 20 09:15:43 2010 -0600 Fix GSL typos; add tests. Restrict make check to a single processor. commit d92c2b5d6f7f2241ea7c296f85e54087d3f40018 Author: John Bowman Date: Sat Jun 19 22:25:10 2010 -0600 Fix preprocessor conditional. commit a1c4f8af41d44d2062e90742d49e21bfc606e603 Author: John Bowman Date: Sat Jun 19 22:16:51 2010 -0600 Fix typo. commit d4feaa7568704870cd449c402de0099c4f544418 Author: John Bowman Date: Sat Jun 19 22:16:08 2010 -0600 Move GSL functions to gsl.cc; implement Elmar's contributed GSL functions. Invoke the C preprocessor in pretranslating symbols. commit 690cfcf0aa780f5981e46360319bd2cfb27219da Author: John Bowman Date: Sat Jun 19 21:51:07 2010 -0600 Add unsigned int constructors. commit 088f6dfe2609b4311b5b04fba4fc600779029f7b Author: John Bowman Date: Sat Jun 19 09:08:34 2010 -0600 Update example. commit a29f0ae6edc9bef2348c6b8a2ef29a0cc7283f15 Author: John Bowman Date: Fri Jun 18 02:44:57 2010 -0600 Increment version to 2.00svn. commit 38c4c0eabbd3036a4e521f9499a51b5d01eef3f0 Author: John Bowman Date: Fri Jun 18 02:07:40 2010 -0600 Fix warning message. commit 06886a79e81b86dabe7154810d4b777e41909222 Author: John Bowman Date: Fri Jun 18 01:01:53 2010 -0600 Update test. commit 4f9950396d0db4476343d9ebe52618a54317fbda Author: John Bowman Date: Fri Jun 18 00:56:06 2010 -0600 Reduce example output. commit 2f4c7ccdd761c3cf94f72e33d0eb43d9300a423d Author: John Bowman Date: Fri Jun 18 00:43:38 2010 -0600 Fix bug in bezulate containmentTree. commit b1e65fac4ecc7602f23553bf41393c2cf036b803 Author: John Bowman Date: Thu Jun 17 14:04:11 2010 -0600 Optimize parametric surface generation. commit 9c0d3c750499848367823e9959e8f5e83d2fad51 Author: John Bowman Date: Thu Jun 17 13:39:00 2010 -0600 Remove --no-var-tracking for major g++ versions < 4. commit 5db587a903d7c2b08079fda22c7d514b07e0e04e Author: John Bowman Date: Wed Jun 16 18:11:49 2010 -0600 Fix perspective animations; update example. commit 9521ce051a606c89cf7333bd476a70cea055e8df Author: Andy Hammerlindl Date: Wed Jun 16 17:08:10 2010 -0600 Removed TODOs in venv that don't need doing. commit 5400903a52273381c371f443d4f24071d95104fd Author: Andy Hammerlindl Date: Wed Jun 16 17:03:56 2010 -0600 Removed value allocation in venv. commit d59254fdc8a40d9483ee81fbf2378ba9e9367230 Author: Andy Hammerlindl Date: Wed Jun 16 16:39:03 2010 -0600 Removed stack of hash tables from venv. commit 7ed665aac3d52908d22eadae8e81a7854282e93f Author: Andy Hammerlindl Date: Wed Jun 16 16:25:59 2010 -0600 Added test based on previous bug. commit 375d5cbeb14fdc63180a2aff83730d5510cf58d6 Author: Andy Hammerlindl Date: Wed Jun 16 16:23:05 2010 -0600 Eliminated string copying in knot.cc. commit 5a994f89782b6b9b1d07b8949c773ddb5f35b362 Author: Andy Hammerlindl Date: Wed Jun 16 16:21:11 2010 -0600 Fixed bug in equalityExp. commit d34affd98f7c402b3a6700390ac6df7eb37d7aa3 Author: John Bowman Date: Wed Jun 16 01:48:07 2010 -0600 Add settings.framedelay for working around OpenGL rendering buffer overflows. commit cae878ae959de8dadcf88e591ceeadb91be24a4e Author: Andy Hammerlindl Date: Tue Jun 15 11:37:52 2010 -0600 Added a (crucial) semi-colon. commit 2a0a9b985da818f5fc4703d42210e623371a2295 Author: John Bowman Date: Tue Jun 15 08:59:21 2010 -0600 Simplify code. commit 2a0b163cc572b5e51f86c8b5772d2e5f331e718c Author: John Bowman Date: Tue Jun 15 08:56:55 2010 -0600 Add example. commit a785cd197d6659dfb8b753d740c75655d25b98f8 Author: John Bowman Date: Mon Jun 14 18:16:05 2010 -0600 Fix segmentation fault. commit 20c67a102647d98789e225d701009d22457d2795 Author: Andy Hammerlindl Date: Mon Jun 14 17:10:17 2010 -0600 Avoid allocating in venv::key. commit 40c16a659eeae1ea6ce8e5dd43275813b6f43396 Author: Andy Hammerlindl Date: Mon Jun 14 17:00:42 2010 -0600 More optimizations. commit 63fd9dd9abe669707d6f3b4df33bd30631d60ed9 Author: John Bowman Date: Mon Jun 14 03:43:38 2010 -0600 Increment version to 1.99svn. commit 4a92fc6fb380f5d1d45d2f00d588dd716dafc8b0 Author: John Bowman Date: Mon Jun 14 02:39:57 2010 -0600 On C99-compliant machines with 64 bit integers, use compact items for the virtual machine, relying on Asymptote's internal type checking (compile with -DCOMPACT=0 to re-enable the type_info data field). This change required restricting T[] array(int n, T value, int depth=intMax) to 0, 1, or 2 dimensional arrays. commit 2d0f355e605d2fb39b0d335c6839a8bc44b1d3e1 Author: John Bowman Date: Mon Jun 14 00:43:24 2010 -0600 Fix definition of undefined. commit dfabcf0c75c88425b46aa49f9288aab2e56dc964 Author: John Bowman Date: Sun Jun 13 16:47:27 2010 -0600 Rename tube to pipe. commit fe9e1ce6dcc9d8b8b867ff4f26dfcccdc8f011e5 Author: John Bowman Date: Sun Jun 13 16:11:19 2010 -0600 Work around bug in gs 8.71: discard noncyclic stokepaths. commit f4ab39b112ff2a8556cb4902b7ec850ed6e09c1c Author: Andy Hammerlindl Date: Sun Jun 13 10:56:15 2010 -0600 Half-exact function matching. commit 1903265f72dbc64945a3521546294a3f8a39d2f6 Author: Andy Hammerlindl Date: Sun Jun 13 10:55:44 2010 -0600 Handle function equality specially. commit a5687d5012cebcbd136e380b4925b5073e69e763 Author: John Bowman Date: Sun Jun 13 10:03:39 2010 -0600 Improve example. commit 6dc39e598c7d266e2d71299f9dd178c35a5e6649 Author: John Bowman Date: Sun Jun 13 09:24:04 2010 -0600 Make heap_chunk_in_mb a multiple of 256MB. commit b0cc9e91e09476eb9cf4674afbabfe1ab6884122 Author: John Bowman Date: Sat Jun 12 12:14:19 2010 -0600 Revert 1.97-6 to 1.97-8. commit d7a18fb86278bd7e41893d4e674d97fdc4a497ba Author: Andy Hammerlindl Date: Sat Jun 12 12:06:29 2010 -0600 Overloading resolution optimizations. commit 5495d822f34c74f1cee29d2c602ba2b66a293203 Author: John Bowman Date: Sat Jun 12 01:24:50 2010 -0600 Improve example. commit 0c380fabf2ab302d854901b1e35a1008c79af990 Author: John Bowman Date: Sat Jun 12 01:15:54 2010 -0600 Align labels with rotational instead of shiftless part of transform. commit 270a7d8f272447c2b129f5d6300acaeac321abb4 Author: John Bowman Date: Sat Jun 12 01:14:29 2010 -0600 Update example. commit d15029ac56688e735505745e832b5383f587aed7 Author: John Bowman Date: Fri Jun 11 23:47:28 2010 -0600 Fix example. commit 42e8e417479615febe47aab2ad38085448fee146 Author: John Bowman Date: Fri Jun 11 23:46:51 2010 -0600 Increment version to 1.98svn. commit 8c440807b7dd480e211a9da99f24a36ed46a8707 Author: John Bowman Date: Fri Jun 11 22:19:24 2010 -0600 Replace M_PI by pi for portability. commit e5a8bbd84e1e16565db23cfedaffe4ed17fe71db Author: John Bowman Date: Fri Jun 11 21:47:41 2010 -0600 Fix warning message. commit 86a090c9e17b835a62e2b420360e4eb5dd9cbe0b Author: John Bowman Date: Fri Jun 11 21:27:14 2010 -0600 Fix typo. commit 4ef4f7fa338d00c22670cfb64ac19c652f432061 Author: John Bowman Date: Fri Jun 11 17:26:38 2010 -0600 Remove tr1 includes. Improve local gc detection. commit 24edeea48989b6754e960c1d5603cee5036135d4 Author: John Bowman Date: Fri Jun 11 14:59:59 2010 -0600 Rename log2 to Log2. commit 47239d2d7bf2ff0a06b40eebbde17bd5e875cb96 Author: John Bowman Date: Fri Jun 11 14:54:47 2010 -0600 Update examples to use merge=true for surfaces. commit 2a13ae2d20c397ebabee66007bd6078dda726116 Author: John Bowman Date: Fri Jun 11 14:53:22 2010 -0600 Remove unused preprocessor conditionals. commit e7d1f1b41b6836782737ddac6243ff85da692135 Author: John Bowman Date: Fri Jun 11 11:51:54 2010 -0600 Fix more memory leaks. commit 1688b329403a4b0feafb6d2668eefabe51437527 Author: John Bowman Date: Fri Jun 11 02:15:51 2010 -0600 Fix more memory leaks. commit b2c5a64ec4a70e12f164b4506f352ac1d561dfa2 Author: John Bowman Date: Fri Jun 11 01:48:05 2010 -0600 Fix PRC memory leak. commit 92959476779f23223923e1f40bee2b094049a288 Author: John Bowman Date: Thu Jun 10 17:09:05 2010 -0600 Remove tr1 (gcc-4.3) dependence, courtesy of Michail. commit 4d9baf01e9f28dcd183bc5b65e4c8faf318d69e3 Author: John Bowman Date: Thu Jun 10 10:24:59 2010 -0600 Add option (default true) to fill subdivision cracks in unlighted labels. Update examples. commit 5841cbfcbd7a8322b6f3fe7f135341613911d562 Author: John Bowman Date: Thu Jun 10 09:28:59 2010 -0600 Add patch to fix MSWindows memory limit. commit 28a24879a57cdb9dc45c05e8cb71a7eb26412d5c Author: John Bowman Date: Thu Jun 10 09:24:16 2010 -0600 Add missing include. commit f63c3894ad06e7ac3b2b3a9f43683c43258980ef Author: John Bowman Date: Wed Jun 9 23:08:24 2010 -0600 Fix typename of symbol. commit 5e4b712e6f785868bc262e723dabd7c2cfdbc300 Author: John Bowman Date: Wed Jun 9 22:00:22 2010 -0600 Add billboard support for Bezier curves. Fix OpenGL zoom flicker. commit c7c24cfe02221ff9794c510128cfab6e314bef9c Author: John Bowman Date: Wed Jun 9 21:01:46 2010 -0600 Update location of heap_chunk_in_mb in Windows registry. commit 833dbe2779e4f348e04bb3b7f0af00216fcdb618 Author: John Bowman Date: Wed Jun 9 16:25:20 2010 -0600 Use a portable integer log2 function. commit b024be7f16ebe43bf7d167c3b89180534801b6be Author: John Bowman Date: Wed Jun 9 16:22:08 2010 -0600 Work around missing readline include. commit 9342ef26ffac0aa70ee49a9f894a36fd95b01c81 Author: Andy Hammerlindl Date: Wed Jun 9 11:39:07 2010 -0600 Don't print non-printable characters. commit 79408482ecc8ca3186596ff40901b10c77699518 Author: John Bowman Date: Wed Jun 9 11:02:20 2010 -0600 Fix offscreen detection (broken in 1.86-1). commit 231eefe4d099f831716ca28c0c44246279fc8310 Author: John Bowman Date: Wed Jun 9 08:57:03 2010 -0600 Fix __GNU_PREREQ. commit 44a0ca929e6b4a198a9e56df226245bc94eb9e64 Author: John Bowman Date: Tue Jun 8 21:38:12 2010 -0600 Require tr1/unordered_map on systems without __GNUC_PREREQ. commit 80b5cc128a5b6396d494eec5e80750040f537c8a Author: John Bowman Date: Tue Jun 8 21:26:55 2010 -0600 Support older g++ compilers. commit 417b376f2a42fa04fd92e26e488f0925f1b17539 Author: John Bowman Date: Tue Jun 8 14:50:38 2010 -0600 Avoid g++ informational message and speed up compilation. commit d5521a7fe9f3c0493a3e5466fc43debe89dbe878 Author: Andy Hammerlindl Date: Tue Jun 8 11:39:49 2010 -0600 Replaced symbol table with custom hash table. commit 6ecbd76f3655d8bf238a97ada0f8d33806e51ffe Author: John Bowman Date: Mon Jun 7 11:29:30 2010 -0600 Emphasize that version 9.0 of Adobe Reader is now required. commit ed089dab2f0fc162aa2dc260d5146e435e5d746f Author: John Bowman Date: Mon Jun 7 10:05:16 2010 -0600 Update grouping. commit 64689d70232b0de6b06b3b454b4bc0e27782864d Author: John Bowman Date: Mon Jun 7 07:55:14 2010 -0600 Acknowledge contributions of Michail Vidiassov (coauthor with Orest Shardt of current PRC driver). commit b1d3c5ddb34cafadf4ed591c67708659262cb640 Author: John Bowman Date: Sun Jun 6 09:58:38 2010 -0600 Increment version to 1.97svn. commit 6f7690585672ce25a358d0e6fc73b254a0a5adf4 Author: John Bowman Date: Sun Jun 6 08:19:42 2010 -0600 Remove M_PI. commit 5f8a121a42bc7e96b339766432f606d6d57c4e74 Author: John Bowman Date: Sun Jun 6 07:40:50 2010 -0600 Update viewpoint, views, and examples. commit c04d65fe48b193db87d533f070b0a886a82e751b Author: John Bowman Date: Sat Jun 5 19:23:09 2010 -0600 Increment version to 1.96svn. commit 1cf0d1c166c74d02dc7b8245903e61cfd6ecb602 Author: John Bowman Date: Sat Jun 5 17:20:23 2010 -0600 Define M_PI. commit ca5899b50fa2590deb9310b29a57f7d76e0ac826 Author: John Bowman Date: Sat Jun 5 11:20:07 2010 -0600 Reformat. commit b5bc276002512428f88dc9e4c553fa74d1400086 Author: John Bowman Date: Sat Jun 5 10:25:26 2010 -0600 Improve interace to render options. commit e339b59145fec3386fa438d069de8a182d409268 Author: John Bowman Date: Sat Jun 5 02:12:43 2010 -0600 Remove tubesectors; simplify tube construction. commit 3e7be8212399aa9ec34f477b581a41aa41317d51 Author: John Bowman Date: Sat Jun 5 01:46:06 2010 -0600 Implement render structure containing PRC rendering parameters. Use begingroup3/endgroup3 consistently for both 3D pictures and frames, respective default rendering parameters. Add render(merge=true) to pipeintersection.asy to improve rendering speed. Improve PRC line capping. Use spheres for curved joints and roundcap. Use a higher resolution disk for squarecap/extendcap. commit fe3832771be157f636227aa7cca3dd9698e2c731 Author: John Bowman Date: Fri Jun 4 21:41:47 2010 -0600 Fix zoom. commit af08815dc768f9f6113ce74a2f9244ab39653dad Author: John Bowman Date: Fri Jun 4 16:46:49 2010 -0600 Expose granularity. commit 9b780a4258761a42ac41f30ca9c0a8f845451fac Author: John Bowman Date: Fri Jun 4 14:53:45 2010 -0600 Remove linesectors. commit 174c0c580925b67bd45d96de7ee1ec7281e342b7 Author: John Bowman Date: Fri Jun 4 14:52:15 2010 -0600 Implement Circular spline type corresponding to Bezier unitcircle approximation. Rename linesectors to tubesectors and change default value to 4. commit fa351463be16edea7e3916acd150f46fc51a59fc Author: John Bowman Date: Fri Jun 4 12:58:16 2010 -0600 Optimize tube spline routines. commit 3b874749207089960c0cc0652cf8278179512b89 Author: John Bowman Date: Fri Jun 4 01:35:59 2010 -0600 Improve group naming. commit f89f165458ba21b2dbc2e1f8b4f4c0ad144527b8 Author: Andy Hammerlindl Date: Wed Jun 2 19:51:22 2010 -0600 Added pre-translation of runtime symbols. commit f5f9bf24b41d0697f8eb8ab12129c3d7413d3069 Author: Andy Hammerlindl Date: Wed Jun 2 15:53:23 2010 -0600 Use pre-translated operator symbols in runtime files. commit aed4b49a60475e53c500e3821e4914c2fdc32d34 Author: Andy Hammerlindl Date: Wed Jun 2 15:38:52 2010 -0600 Use pre-translated operator symbols in builtin.cc. commit e0d130c1b655d159d93d20a4091916138e9eff38 Author: Andy Hammerlindl Date: Wed Jun 2 15:35:23 2010 -0600 Added var documentation. commit f9807d1b253f4070e5324a59d6d4346cf3dcc163 Author: Andy Hammerlindl Date: Wed Jun 2 15:25:28 2010 -0600 Pre-translate operator symbols. commit ba1d886ba1e9d6f1b1a238206daa8c9002d46670 Author: Andy Hammerlindl Date: Wed Jun 2 15:23:49 2010 -0600 Update errors for ambiguous cast to error. commit bd19d89d0d5cee238c40fc015c131d1c20132d6b Author: Andy Hammerlindl Date: Wed Jun 2 15:09:17 2010 -0600 Added a (disabled) experimental function resolution optimization. commit 83ed08e46e7e8332118817cea888160800048d27 Author: John Bowman Date: Wed Jun 2 13:48:16 2010 -0600 Improve 3D line capping. Improve tube center calculation. Remove PRCtube setting. commit 3a9f74da824e24b89d520ef3aa47862042918e50 Author: John Bowman Date: Wed Jun 2 09:59:36 2010 -0600 Use half sphere for PRC tube connectors. Revert to NURBSsphere again now that the rendering problems have been fixed (by using a nonzero granularity). commit ea0c762eb51e9578a61a080acb70e1d31051f35e Author: John Bowman Date: Wed Jun 2 02:51:24 2010 -0600 Complete last revision. commit c60bda8157d04f934526cdd1a37e1bda190f8f4c Author: John Bowman Date: Wed Jun 2 02:45:37 2010 -0600 Expose PRCoptions via begingroup. commit 56d84a0d913c6fffeb4b612cae31329f366556d5 Author: John Bowman Date: Wed Jun 2 01:39:39 2010 -0600 Reduce PDF loading time without sacrificing quality by setting granularity=1.0. commit acf90f95b1e682b25590267be59e45930e088c9c Author: John Bowman Date: Wed Jun 2 01:38:18 2010 -0600 Make PRCsphere the default until numerical transform issues with NURBSsphere are resolved. Add half=false option to PRCsphere. Implement PRCcylinder, PRCdisk, and PRCtube primitives. Use PRC primitives for drawing thick lines. PRC tubes (which may contain cracks) are drawn for curved lines only if PRCtube=true (the default). commit beed6b05dde975d183d865246304c0174086d800 Author: John Bowman Date: Tue Jun 1 14:12:34 2010 -0600 Update errors. commit 6ce405bc4fe399588749de0a04dd5a0058edf8b8 Author: John Bowman Date: Tue Jun 1 14:04:40 2010 -0600 Simplify code. commit a0807779f50bf6494a571bf3a70247dd9dfdff11 Author: Andy Hammerlindl Date: Tue Jun 1 11:39:32 2010 -0600 Added more overloading resolution tests. commit 5398bf7d0f767160dbea5b4143407b87779d1930 Author: Andy Hammerlindl Date: Tue Jun 1 11:30:59 2010 -0600 Added experimental inferred variable types. commit da50aa0fac52e0ece080daf0eb02375c98c6f9aa Author: John Bowman Date: Tue Jun 1 01:59:35 2010 -0600 Fix grouping. Make part names and compression group properties. commit 010aa8a113585cd5ae15d09c6c1c1e4e04fa957a Author: John Bowman Date: Mon May 31 14:28:30 2010 -0600 Remove context list. commit 4b98073813a448c0d45fbdd109e2ee1bf40232e1 Author: John Bowman Date: Sun May 30 21:07:52 2010 -0600 Disable 384MB Cygwin memory limit. commit fc372ba261454e2d54764c1b1d2ff043e1f25c78 Author: John Bowman Date: Sun May 30 02:17:21 2010 -0600 Implement optimized PRCsphere and NURBsphere. commit e11d0d6f70a0240c9a5e547f977a4a76097ae4dc Author: John Bowman Date: Sat May 29 21:39:38 2010 -0600 Replace SIGQUIT by SIGTERM. commit 0af63e2ebc43d50e1ce6cef40639760ecc0b6dc0 Author: John Bowman Date: Sat May 22 22:24:32 2010 -0600 Fix invalid memory access. commit 6ed0fc18676adf59d62d4563abd46889780a4efc Author: John Bowman Date: Wed May 19 23:48:25 2010 -0600 Fix example. commit 395fdda98745710d3e1c89ebeefd1a61af3fe7b5 Author: John Bowman Date: Wed May 19 22:00:44 2010 -0600 Remove granularity setting. commit b7cfa372079fef97b2ed446a67ea2f763d403f5a Author: John Bowman Date: Wed May 19 13:23:56 2010 -0600 Prune duplicate 3D dots. Implement new functions unique and lexorder in math.asy. commit 261b190f196623d8387fe1e660c66c6164bd7ed4 Author: John Bowman Date: Tue May 18 12:35:45 2010 -0600 Add embedder for PRC test. commit cd66b4f1998cc32d3712d984573d50733f31b4a5 Author: John Bowman Date: Tue May 18 12:30:07 2010 -0600 Fix prc dependency. commit 5eb109a6f8b2dd8b7c0c4c2a71e8f13c1f8471f1 Author: John Bowman Date: Tue May 18 10:48:08 2010 -0600 Remove debugging comments. commit c2a82f5e315ac93deb7365978f99207f24efd9fb Author: John Bowman Date: Mon May 17 22:53:48 2010 -0600 Fix compression limit. commit 151e2af3eef2d3843d9b4f4899594651649859bd Author: John Bowman Date: Mon May 17 10:47:00 2010 -0600 Update URLs. commit defd88d9592315ec2e74e914eb6ab8607229e391 Author: John Bowman Date: Mon May 17 08:55:40 2010 -0600 Use Adobe compression factor. commit bf629a87ab69dbec909a922da3b3dd5f6b3f4031 Author: John Bowman Date: Mon May 17 00:46:27 2010 -0600 Distinguish again between the 3D begingroup3/endgroup3 and the 2D begingroup/endgroup pairs. commit ac17585ecdf1084b4e5b2c7035974ee4f10220a3 Author: John Bowman Date: Sun May 16 23:52:15 2010 -0600 Update hyperref comment. commit 99db989fb8c21a62fdbbb3b24554e52917c48171 Author: John Bowman Date: Sun May 16 21:33:37 2010 -0600 Add example of using rendermargin to avoid rendering residue in included 3D images. commit 20cf63692fc6346c3e8d19e0edf111de5313d0d9 Author: John Bowman Date: Sun May 16 19:11:42 2010 -0600 Adjust default tubegranularity; remove spurious line. commit a00cefae26ec2a759bc6cb5d0ff962af596f0f19 Author: John Bowman Date: Sun May 16 17:52:09 2010 -0600 Use a reduced tubegranularity for constructing tubes. commit 749d3510510b36436c90a80e2f82ccf059d87e11 Author: John Bowman Date: Sun May 16 17:24:07 2010 -0600 Fix floating point exception in PRC compression routines. commit 543074437b2d40a122daf6164203058d2d9edfe7 Author: John Bowman Date: Sun May 16 02:50:12 2010 -0600 Add some of Michail's PRC enhancements, including lossy compression of surfaces. commit 2bcd6522db306dd86fafb52b1181c1d33cf742fe Author: John Bowman Date: Thu May 13 21:03:06 2010 -0600 Fix portability issue. commit f0e1ebfba330a539c89ea21cb7931186a7a2dc7f Author: John Bowman Date: Thu May 13 12:46:21 2010 -0600 Remove space. commit 223f3af025bd3bc45521f2b3d47eb795a08e5e43 Author: John Bowman Date: Wed May 12 23:17:46 2010 -0600 Only quote filenames where necessary (e.g. to support obsolete versions of asymptote.sty). commit d25b6c80eb6ac903729b1c5ffd3dbb0966a7b6c2 Author: John Bowman Date: Wed May 12 11:31:23 2010 -0600 Always use 256 bytes for random state array. commit 3bf7af6acb0a932b2efc94265955d1703a9966d3 Author: John Bowman Date: Sat May 8 23:17:36 2010 -0600 Remove unused file. commit 4e69ea886625688e8f31496ea50feed6e4520d92 Author: John Bowman Date: Fri May 7 14:32:28 2010 -0600 Use fftwpp namespace. commit 027f83fd2f98c77ba2a7a3e4aff1625b179a20cc Author: John Bowman Date: Fri May 7 00:43:32 2010 -0600 Update fftw++.h to v1.06. commit 5824e9ad1be409898af11ae9d79668863a89ee33 Author: John Bowman Date: Tue May 4 16:53:28 2010 -0600 Increment version to 1.95svn. commit 86c3c8b10e750576f6faf8bd1e395a73c9656242 Author: John Bowman Date: Tue May 4 14:47:23 2010 -0600 Predefine a default docdir for MSWindows. commit 67f05e202eed106e489f487b2e13dc6f3ce920d9 Author: John Bowman Date: Tue May 4 12:54:30 2010 -0600 Update CYGWIN xdr patch. commit 1b61f7e2d4c5a9938a805eaa9c0de028b284d885 Author: John Bowman Date: Tue May 4 11:18:57 2010 -0600 Document fit3() and remove restriction on projection.center. commit 4b8ddfdb2a838c2f86dbbc1602e29bd100c1af5a Author: John Bowman Date: Tue May 4 01:33:17 2010 -0600 Add missing CYGWIN declarations. commit af4e3100d2fe307cfea6eb656c0245b1f2bd17dd Author: John Bowman Date: Mon May 3 22:52:36 2010 -0600 Document pair dir(path, path). commit 0821c51418077505a97e764e0785a08f10465ba6 Author: John Bowman Date: Mon May 3 22:43:55 2010 -0600 Update documentation of math module. commit 0557500331a5d6077290eb8f6f431a6fdd15aa2b Author: John Bowman Date: Mon May 3 22:08:46 2010 -0600 Use outprefix(). commit 3509d303e536735d2ff415f821786dc7f2ca1960 Author: John Bowman Date: Mon May 3 21:40:17 2010 -0600 Implement matrix negation for arithmetic types. commit acf80ae7b563a67c1de8215b024a62439c32114f Author: John Bowman Date: Mon May 3 14:45:00 2010 -0600 Move pair[][] operator * (pair[][] a, pair[][] b) to C++. commit caaf88c123017e63a52fe4be8c4ddcb0df9d3639 Author: John Bowman Date: Mon May 3 01:56:45 2010 -0600 Add make cleaner target that runs make clean in the doc directory and make distclean everywhere else. Change make clean in doc directory so that it no longer removes asymptote.pdf and CAD.pdf. commit 71d827d19419e8cee54d084dec6da95e54671503 Author: John Bowman Date: Mon May 3 01:52:36 2010 -0600 Add picture.fit3(projection P=currentprojection) and add(picture dest=currentpicture, frame src, triple position) routines. commit a96c644ba6a820bc19018883848db5ce6f97fe90 Author: John Bowman Date: Sun May 2 23:05:10 2010 -0600 Avoid redundant mismatched version warnings. commit cc6fd22c81285fc7af9570658e384f2e204b0a2a Author: John Bowman Date: Sun May 2 22:52:40 2010 -0600 Fix guide bug intoduced in 1.55-2. commit de1591fe4ee05499e0d6b09b74ed5469525cf282 Author: John Bowman Date: Sun May 2 17:22:14 2010 -0600 Use a larger table for generating random numbers. commit 0e1811c2d95aac1bad23bd77d54ced726dff6c48 Author: John Bowman Date: Sun May 2 01:03:23 2010 -0600 Use accurate roots of unity in FFT shift. commit 6896be2016d9367d0321b9fdf3ef4eb7ef3ada6d Author: John Bowman Date: Sat May 1 10:14:10 2010 -0600 Fix fftNormalize. commit d7931ac1f3385ee4cd6fc713b6745cafb8d47a5c Author: John Bowman Date: Sat May 1 08:21:08 2010 -0600 Update documentation of addViews. commit 58dd0e82177b811876ab6266c55407fc54d7d883 Author: John Bowman Date: Thu Apr 29 02:30:10 2010 -0600 Improve fftw interface. commit d846b15bc5d8467814fb258ae93b139759baceb0 Author: John Bowman Date: Tue Apr 27 22:19:50 2010 -0600 Make local variables private. commit 7a1d259bd798091d09ff96e0f9aa1097482c3ad4 Author: John Bowman Date: Mon Apr 26 11:31:24 2010 -0600 Make pair dir(path,path) return a unit vector. commit dbff2e25683dcfdf2edf0c69d5f48870a147c6de Author: John Bowman Date: Mon Apr 26 11:28:15 2010 -0600 Fix return type of dot(pair,pair). commit 9556b5b0c17683511d021f766f82ac5e2f848608 Author: John Bowman Date: Sun Apr 25 22:05:00 2010 -0600 Implement pair dot(pair[] a, pair[] b). commit 1482e3940a184157b05308a4f6f8b160e1544c5c Author: John Bowman Date: Tue Apr 20 10:02:39 2010 -0600 Work around MSWindows registry problems. commit fcf1b66c5d7a33de4fd8f7648f4572b21208acd0 Author: John Bowman Date: Tue Apr 20 09:21:34 2010 -0600 Work around empty docdir. commit 5b874eeb8be118f5264bff3e36bdd040212ddba6 Author: John Bowman Date: Sun Apr 18 10:21:14 2010 -0600 Move shift variable to Execute. commit 6013f494ee9bd39606dc91e2a573e7548787b160 Author: John Bowman Date: Sun Apr 18 08:43:11 2010 -0600 Fix SimpleHead. commit 0d0240ee0398f3e1b267ce2610cc1820c5078bf0 Author: John Bowman Date: Sat Apr 17 23:20:54 2010 -0600 Move basic matrix operators from math.asy to C++ code and implement int and pair versions. Add vector and matrix conjugate operations. commit 6f5c4f6eb7f95524478c4698f77f7d293d357f3d Author: John Bowman Date: Sat Apr 17 17:39:05 2010 -0600 Add casts from int[][] to real[][], int[][] to pair[][], and real[][] to pair[][]. Implement int[][] diagonal(int[]) and pair[][] diagonal(pair[]). commit dec5637db7b47695cc7861a6fa4e44c0facfe3d7 Author: John Bowman Date: Sat Apr 17 16:37:44 2010 -0600 Implement a RadialShadeDraw filltype. commit eb9a39511d09cb90459a73edc3e9eec4538b5d39 Author: John Bowman Date: Sat Apr 17 09:33:56 2010 -0600 Increment version to 1.94svn. commit 1bab031382a4efe3d4ca689b66ac99fb81ce5ff0 Author: John Bowman Date: Fri Apr 16 20:13:15 2010 -0600 Expose outname() to asy. Revert revision 1.93-16 for strings containing spaces. Fix tex(picture). Add deactivatequote and activatequote functions for Babel users. commit 1a5d2311e66293c4050005c31c398bc739d561b0 Author: John Bowman Date: Fri Apr 16 20:00:30 2010 -0600 Redraw screen after export (for MSWindows). commit e63686d696ac00453dc79e14bf8979466d631b3b Author: John Bowman Date: Fri Apr 16 14:00:51 2010 -0600 Move backslash conversion into asy. commit f03e3a5a7150ba3fcdff5a6b4c18e5c49ff7d24a Author: John Bowman Date: Fri Apr 16 13:54:22 2010 -0600 Fix GUI export under MSWindows. commit 9ba6ab15f1b7722d6ab19c533b98a97485605601 Author: John Bowman Date: Fri Apr 16 11:58:48 2010 -0600 Improve camera position. commit 1018a5d12afdc254a364c052fb772d0fce772fa1 Author: John Bowman Date: Fri Apr 16 11:47:15 2010 -0600 Set size. commit 1694cc39454b2f92a3fa72ac24384cec6f9787d1 Author: John Bowman Date: Fri Apr 16 11:06:15 2010 -0600 Fix poster size. commit c178c191b01142455027304b0c3590a1b233acf3 Author: John Bowman Date: Fri Apr 16 10:46:48 2010 -0600 Revert unintended removal of inline option. commit b6952633aefb155e0fc3b1853b3d0c16c627f9c2 Author: John Bowman Date: Fri Apr 16 09:42:26 2010 -0600 Require user to double quote graphics file names containing spaces. commit bc3ae56dab8e42c56641860d38be78a44217ad91 Author: John Bowman Date: Fri Apr 16 09:31:29 2010 -0600 Ensure double quote character is inactive. commit 916180f64f9767fff8ebb6face6d45352952cfe1 Author: John Bowman Date: Fri Apr 16 08:49:27 2010 -0600 Clean up files even after errors. commit 979c9a3c2ce462c9ad2f3cf069b711fca556b99a Author: John Bowman Date: Fri Apr 16 01:00:40 2010 -0600 Fix latticeshading with -svgemulation. commit e7187eccf529ff914af7ead76e4fb6d8b3d85b23 Author: John Bowman Date: Fri Apr 16 00:37:58 2010 -0600 Fix SVG emulation. commit 0f5a9dd4bf43c704d585359260d11668507e0e99 Author: John Bowman Date: Fri Apr 16 00:17:49 2010 -0600 Fix initial SVG pen. commit a58312d7d39b9ff692f76a6273ae56dcaae7426c Author: John Bowman Date: Thu Apr 15 23:44:32 2010 -0600 Fix GUI export; add SVG export. commit d5749daff98e436018e252807041934aceded359 Author: John Bowman Date: Thu Apr 15 23:32:29 2010 -0600 Revert outname construction. commit 0c068d371412591c5beefc6db8ff830cd491a509 Author: John Bowman Date: Thu Apr 15 15:42:29 2010 -0600 Allow spaces in output directory name. All output files are written to the directory part of settings.outname; if this is empty, the current directory is used. Allow cd to other directories, preserving the output directory. commit 2af5f453b921965d21f4574bfd6594f910fafa53 Author: John Bowman Date: Thu Apr 15 00:58:42 2010 -0600 Remove obsolete bug workaround. commit c9f8e9b47015b9ab998125e0c51a57789b82d18a Author: John Bowman Date: Wed Apr 14 16:45:50 2010 -0600 Remove misleading deep qualifier. commit 4a9779a086e1611995265cf8de911ae15b32db95 Author: John Bowman Date: Wed Apr 14 14:28:06 2010 -0600 Add parallelogram block to flowchart module. commit 5737d8b20f5c45b06171b9da96ef443340416ca5 Author: John Bowman Date: Wed Apr 14 12:12:07 2010 -0600 Check for LIBGL on MacOSX. commit c8f5322cc6aecef2401add3effa45d97a22fdff4 Author: John Bowman Date: Tue Apr 13 10:20:24 2010 -0600 Fix preprocessor conditional. commit 418f6ac0683264c1a09d12998973c1f30fcb2a5d Author: John Bowman Date: Tue Apr 13 01:16:51 2010 -0600 Fix latticeshade stroke bounds. commit 42c40bca696b23287533ba39bc68ad7d43335188 Author: John Bowman Date: Mon Apr 12 22:22:29 2010 -0600 Support old versions of gcc again. commit d27450e2e7863586c7735ec233cc226804e457b0 Author: John Bowman Date: Mon Apr 12 01:55:34 2010 -0600 Increment version to 1.93svn. commit f8f609b8bdfcbde84de936d800cad37c063b8fb3 Author: John Bowman Date: Sun Apr 11 09:41:33 2010 -0600 Call init_readline only once. Remove obsolete CYGWIN readline initialization code. commit d035c7bb2e1060d11544e0d2e13143f5eed7793e Author: John Bowman Date: Sun Apr 11 09:34:01 2010 -0600 Fix typo. commit df7fb6ee773ecdd7a8b4a6b42d36944175638225 Author: John Bowman Date: Sun Apr 11 02:26:26 2010 -0600 Fix -lGL detection. commit bd5ac5a5358ddb735d147900bde91359a70db63a Author: John Bowman Date: Sun Apr 11 00:51:59 2010 -0600 More CYGWIN portability changes. commit 89f0c054f4b48540e7871e8be71ff26002ed3169 Author: John Bowman Date: Sat Apr 10 12:43:11 2010 -0600 Fix CYGWIN portability issues. commit 232d920b517418d211825e4b44ace7ed1be7e8da Author: John Bowman Date: Sat Apr 10 11:12:46 2010 -0600 Improve tr1 test. commit c5c85163ff1780a04acfca69983c939b2568656a Author: John Bowman Date: Wed Apr 7 21:19:31 2010 -0600 Add autorotate argument to yaxis. Document assert(bool, string). commit 9810c0fe06212adb96e6596f36bb3acc95432fc3 Author: John Bowman Date: Wed Apr 7 21:15:42 2010 -0600 Fix aspect ratio. commit bd9b2b7bcd7d9ad3664ced34e4914af2bbe7a828 Author: John Bowman Date: Wed Apr 7 16:18:14 2010 -0600 Add projection.normal to represent the normal to the projection plane, which differs from projection.vector() for oblique projections. commit 386bea2ad1f1297bf779f57021a69ca555a80588 Author: John Bowman Date: Wed Apr 7 13:32:07 2010 -0600 Make oblique projections work with billboard labels. commit 73dbd37642d26d5df9d7aaa6bc3a9367f3a0116e Author: John Bowman Date: Wed Apr 7 11:22:14 2010 -0600 Fix latticeshading. commit 503487818fecab50384aae143ac8a5170ddb9465 Author: John Bowman Date: Mon Apr 5 17:56:20 2010 -0600 Fix normal and true Circle calculations. commit 62d120909d49c8fd2f2fdd5eecfeaf9b0f372235 Author: John Bowman Date: Sat Apr 3 17:31:30 2010 -0600 Remove unwanted template. commit cf589ff765402ba5c2b320ffd159b01755e5716d Author: John Bowman Date: Tue Mar 23 21:05:38 2010 -0600 Fix typo. commit 4e6bbf0db6b0bacb3da05bf50a8d4e6a698fdc45 Author: John Bowman Date: Tue Mar 23 20:44:50 2010 -0600 Ignore null 3D paths. commit 25bd144b7fd648fba7275de6679fbfbb19931d24 Author: John Bowman Date: Mon Mar 22 23:03:58 2010 -0600 Fix revision 1.92-28. commit d853172f1a23d32abc709789d253854cf1356e65 Author: John Bowman Date: Sun Mar 21 22:35:06 2010 -0600 Add more predefined tick modifiers. commit 2c3c2a79a16220ac18d64cc3241b6538ccd6cd5d Author: John Bowman Date: Sun Mar 21 19:46:07 2010 -0600 Fix last change. commit fe4953f2f5c077f5b2b8e49e41d5ed94d8541b36 Author: John Bowman Date: Sun Mar 21 19:43:27 2010 -0600 Fix incorrect pt scaling. commit 01721697c8da4d855c560101bdc31e58be40e9b9 Author: John Bowman Date: Sat Mar 20 23:19:37 2010 -0600 Make integrate routines return structure including sampled time values. Enable dynamic timestepping for solveBVP. commit 7227e4f9134b4c3343da4f3a8635abc0671c6e19 Author: John Bowman Date: Fri Mar 19 09:36:21 2010 -0600 Configure Boehm gc with --enable-large-config by default. commit e55618a3367b32ae278c43818caa7f9c83814503 Author: John Bowman Date: Tue Mar 16 17:40:26 2010 -0600 Fix url. commit 282c78e96f3583800368c4b9b793407794084b81 Author: John Bowman Date: Sun Mar 7 10:48:36 2010 -0600 Rename FFTWdelete to deleteAlign. commit 02c9a6b01ef6f2c66f12c70a3740e09a37fc4d46 Author: John Bowman Date: Sun Mar 7 10:45:27 2010 -0600 Rename FFTWComplex to ComplexAlign. commit f498746961e4b72dd85b3296b71d626689f74449 Author: John Bowman Date: Thu Mar 4 13:59:27 2010 -0600 Fix array index. commit 3f4262148bfb4be6514dcc80ff1f4c8e3127439e Author: John Bowman Date: Mon Mar 1 10:07:51 2010 -0600 Make CLZ and CTZ portable. commit 1fad80aed5c6c19cf3ee3aa073992de8bae92729 Author: John Bowman Date: Sun Feb 28 22:54:54 2010 -0600 Implement CLZ and CTZ bit functions. commit a1ee8663ea8a51dad88d7d5dc4710bd34718226c Author: John Bowman Date: Thu Feb 25 16:52:27 2010 -0600 Ignore negative dxmax. commit 155b66150ff2b70f0ab8a54a33f1bfe4c3d0a8dc Author: John Bowman Date: Thu Feb 25 16:50:04 2010 -0600 Fix simpson for a > b and f decreasing. commit 455a749a478ea4ab86832a08de2e7465027a2e1e Author: John Bowman Date: Tue Feb 23 23:14:27 2010 -0600 Fix compilation on systems without OpenGL. commit 22c00b08408f19342212cf17e8bc1dd57468010d Author: John Bowman Date: Tue Feb 23 19:21:35 2010 -0600 Use portable definition of M_PI. commit c8144319f0d38661f859f0da5d5409863fd8f526 Author: John Bowman Date: Sat Feb 20 17:20:15 2010 -0600 Add missing arguments. commit 045941d441e7f37478a1756b836573a0f1116904 Author: John Bowman Date: Fri Feb 19 15:57:19 2010 -0600 Avoid implicit linking of libGL. commit 1bba3a3b88b0c73f4c80e92847e9f804e3520075 Author: John Bowman Date: Thu Feb 18 15:01:16 2010 -0600 Fix odd sized shifts in fftw++.h. commit ef008d597001d57eb0b0c1dc75084123754d9cab Author: John Bowman Date: Mon Feb 15 01:02:06 2010 -0600 Expose Shift functions. commit dad1fab51e6585e6e805c1784dc0bacdd7451db8 Author: John Bowman Date: Sat Feb 13 17:09:35 2010 -0600 Remove ambiguous constructor. commit df3d6aa4983f560ff92408be0f9fd139af831276 Author: Andy Hammerlindl Date: Wed Feb 10 08:14:26 2010 -0600 Minor change to comment. commit 417c566fd0ff23522987844de06c7013173c46b1 Author: Andy Hammerlindl Date: Wed Feb 10 08:13:54 2010 -0600 Changed alignment of slashes in macro. commit ff66cb16cd0fec709507fe54110e34444c8ffede Author: John Bowman Date: Sun Feb 7 16:21:17 2010 -0600 Fix compilation errors. commit baf491e809673492c975a2ad56c06e9501b4eb8d Author: John Bowman Date: Sun Feb 7 16:13:15 2010 -0600 Fix part names. commit 19bfed1a417bc86969786f91a814b4a941625935 Author: John Bowman Date: Sun Feb 7 12:34:19 2010 -0600 Update test code. commit 21911866dd8da04d3bf8b0b79763c38b9a1dec7c Author: John Bowman Date: Fri Feb 5 09:39:23 2010 -0600 Open oPRCFile in binary mode. commit 4bfb8ab6df3a871600411d79aebabd0c7f7b1f89 Author: John Bowman Date: Wed Feb 3 22:03:27 2010 -0600 Fix formatting. commit 03bc073aaff1d1c58247156dc5212617cd535aa6 Author: John Bowman Date: Sat Jan 30 22:04:48 2010 -0600 Fix typo in documentation of singlereal. commit ea2f9a3fe502d818d6d6efb17fa6d8923b3429bc Author: John Bowman Date: Mon Jan 25 21:33:52 2010 -0600 Make FFTW wisdom file name and effort flag public. commit c514c3c99dad4eb2e6c07f6888c8dd7de10344cb Author: John Bowman Date: Mon Jan 25 10:58:39 2010 -0600 Update documentation of fftw++ header file. commit 5a0a7c84a20086416aa66766faf394efd32c7b0b Author: John Bowman Date: Sat Jan 23 12:09:50 2010 -0600 Fix non-pdf output from PDF tex engines. commit fc548df7dbe7df930ca1520d57c3e8dd586cb682 Author: John Bowman Date: Tue Jan 19 22:12:07 2010 -0600 Improve diagnostic. commit 7254feea0ccde20412db7b4d640c941bc866ef46 Author: John Bowman Date: Tue Jan 19 03:50:50 2010 -0600 Remove implicit cast in favour of block constructor. commit 1c0664c196454994b1afa811f84efe1ab1320e9f Author: John Bowman Date: Tue Jan 12 15:31:13 2010 -0600 Improve example. commit 882c2548c71795338e7e14257c6a3e4c7ebd1d32 Author: John Bowman Date: Mon Jan 11 11:41:52 2010 -0600 Fix transformed Label alignment. commit a6deb333bb7da7ab635c1b9bd3b4795d364adf33 Author: John Bowman Date: Sat Jan 9 23:08:23 2010 -0600 Fix typo. commit f6615df2d1e4bfb913f36ab1501495700af940c2 Author: John Bowman Date: Sat Jan 9 23:06:11 2010 -0600 Fix conflicts. commit 784b52a16b58d1c154578229b41772206a5634a0 Author: John Bowman Date: Sat Jan 9 15:40:13 2010 -0600 Avoid uninitialized variable warning. commit 65adeb47bfb8b1779e73028a01d483a35a6aa8e6 Author: John Bowman Date: Sat Jan 9 15:38:02 2010 -0600 Upgrade to latest version of fftw++.h. commit efa08460ee77d46eb51c6f00f61a5820109292e7 Author: John Bowman Date: Sat Jan 9 15:34:31 2010 -0600 Simplify code. commit 295b27aa2a890594af18831f1fa4eb0b5aa27181 Author: John Bowman Date: Thu Dec 31 07:28:23 2009 -0600 Increment version to 1.92svn. commit 6bc9a2023414f230f92959f48c9d4baae6012050 Author: John Bowman Date: Wed Dec 30 23:05:07 2009 -0600 Remove obsolete freeglut patch. commit 19a0ff86a453d6676f1e945394a8ed2b0387dce4 Author: John Bowman Date: Wed Dec 30 14:27:38 2009 -0600 Set default font after \begin{document}. commit 6209c0b018c4ae8d1c3553c8bce67df8cbb1c3cd Author: John Bowman Date: Wed Dec 30 13:46:09 2009 -0600 Support transformations in lattice shading. commit d2e2ea24fc879cb10f4f9f6e5f9b950391086e77 Author: John Bowman Date: Wed Dec 30 13:31:21 2009 -0600 Update links. commit ad664e609896c95d5cd28f1831ce5e301e356247 Author: John Bowman Date: Sat Dec 19 09:18:46 2009 -0600 Untabify. commit be464a2252117e5c40bc95c395c2aec1557703f5 Author: John Bowman Date: Sat Dec 19 09:18:03 2009 -0600 Increase epsilon. commit 7e1e1a3dc2642c96f9ed814e36a961e6e4411ba3 Author: John Bowman Date: Sat Dec 12 12:33:40 2009 -0600 Replace "nonselfintersecting" by more standard term "simple". commit 44fbd7151a135685d2c894e01107397cd27e92b0 Author: John Bowman Date: Fri Dec 11 18:34:20 2009 -0600 Use a more robust contour algorithm based on approximating the function as a paraboloid, courtesy of Chris Savage. commit 6f69480a190ae9f049b94f644ec6a4825082aef0 Author: John Bowman Date: Fri Dec 11 17:21:04 2009 -0600 Avoid casting to path[] in write(guide[]). commit 733f624a1287b8c74c506b3bd59c77368e8219c1 Author: John Bowman Date: Sun Dec 6 00:13:51 2009 -0600 More example updates. commit 3bab1b8e5f417e4c10f363415997f520b0281bdf Author: John Bowman Date: Sat Dec 5 23:55:34 2009 -0600 Minor example updates. commit e74e417ed8f85648dc9ae54edb4b3c1399f49809 Author: John Bowman Date: Sat Dec 5 23:35:57 2009 -0600 Implement operator --(block, block) to simplify flowchart syntax. commit 2b0109e94a472b70f698b91ffa812ecb9766d285 Author: John Bowman Date: Sat Dec 5 13:40:40 2009 -0600 Add change missed in previous revision. commit 583bd0f3d3df48a3ae8cb15cb7a9976508548011 Author: John Bowman Date: Sat Dec 5 13:39:48 2009 -0600 Improve precision of minratio and maxratio routines. commit ce7b617314c9166c582adaf4efed415774e42b73 Author: John Bowman Date: Wed Dec 2 22:50:16 2009 -0600 Fix transformed 3D labels under -render=0. commit f6eb7355fb4a362ab97dcd0e5a370f93440408db Author: John Bowman Date: Wed Dec 2 12:14:49 2009 -0600 Revert last revision. commit b38ca30bf706db72a78d0fe00c4295885cb115d0 Author: John Bowman Date: Wed Dec 2 12:10:16 2009 -0600 Retune HookHead2. commit de56960ac36ea7e5ce2b39e38a569ae007d4b91a Author: John Bowman Date: Wed Dec 2 12:00:26 2009 -0600 Fix 3D planar arrowhead gap. commit d266b2c68c4b14631bb54ac1b9f24195fb9d32a1 Author: Philippe Ivaldi Date: Tue Dec 1 11:13:58 2009 -0600 Fix ellispe arc defined by abscesses when angle of ellispe is not zero. commit e17f928c56c2a92f4da55cbc961b245fc96ebe47 Author: John Bowman Date: Tue Dec 1 01:50:44 2009 -0600 Remove duplicate arrow angle scale factor. commit 21ab8e75dae93f012bec82b02b382aced39ad538 Author: John Bowman Date: Tue Dec 1 01:49:20 2009 -0600 Fix offset in transformed 3D labels with render=0. commit f26e5a96e68d1b598c6b06753f6733c30f22b19a Author: John Bowman Date: Sun Nov 29 22:21:35 2009 -0600 Revert 1.91-23. commit f1b58b43b3c051303d426f4e66f52361df3bcb3b Author: John Bowman Date: Sun Nov 29 13:17:32 2009 -0600 Fix pen size contributions to box and ellipse. commit ad867668187d1da48dee070b4445a057e7fdbedc Author: John Bowman Date: Sun Nov 29 12:59:29 2009 -0600 Update inlinetex support for xelatex. Load hyperref before patches/movie15_dvipdfmx.sty (renamed to movie.sty) under xelatex. commit bba661d24028af3e17488c3bc003dd3e854cd06e Author: John Bowman Date: Sat Nov 28 13:10:12 2009 -0600 commit 08a2b148c05d41f903ac401f83f6689b38c9525e Author: John Bowman Date: Fri Nov 27 17:50:55 2009 -0600 Move convert options before geometry. commit b771b0d77e280d8a16cdb0e2c590cc30cae718c3 Author: John Bowman Date: Fri Nov 27 12:10:41 2009 -0600 Remove -alpha Off default convert option in favour of convertOptions="-alpha Off". commit a751e0f8ba88956ca209ec9ca2f7bf540c17b020 Author: John Bowman Date: Fri Nov 27 11:45:11 2009 -0600 Use pngalpha driver only if antialias=2. Fix size of pngalpha images. commit e6a98e36c1a747f04ae2e442c53c70f14c7c31be Author: John Bowman Date: Thu Nov 26 18:32:36 2009 -0600 Add 3D examples. commit cb81e0a6d5ca377fa5e0f176a6efbcf12a7a1180 Author: John Bowman Date: Thu Nov 26 10:09:58 2009 -0600 Use hypersetup to avoid hyperref option clashes. commit 4958bc1628d5ab089b38a6fa804e396795bc37c0 Author: John Bowman Date: Thu Nov 26 09:31:15 2009 -0600 Reduce memory usage of example. commit a6105bc960e8ff69fb312cfc8ec2dd042c0faf0b Author: John Bowman Date: Thu Nov 26 09:27:20 2009 -0600 Fix braces. commit 3d67fe1cf5ca34f521cbc2b7a65992455fe35522 Author: John Bowman Date: Thu Nov 26 01:55:46 2009 -0600 Improve 3D logo. commit 2eaa852c0148cc9d1234930855a1e76b4a383b71 Author: John Bowman Date: Wed Nov 25 14:21:37 2009 -0600 Change colorslinks to pdfborder={0 0 0} in hyperrefOptions. commit ce77532c7d40b9e354bee36d115d407a19de900b Author: John Bowman Date: Wed Nov 25 10:17:37 2009 -0600 Reduce conflicts by renaming the Bessel functions J and Y to Jn and Yn. commit adbbdbdf423482b977aabe318b471464fdb149ac Author: John Bowman Date: Wed Nov 25 09:56:22 2009 -0600 Add colorlinks to settings.hyperrefOptions. commit 261348d1ccc2094841cca8e1873f9d09173c9f66 Author: Andy Hammerlindl Date: Wed Nov 18 22:38:56 2009 -0600 Added % for the last answer on the interactive prompt. commit 2484f7016690e242356dfa81b1178873825981dc Author: Philippe Ivaldi Date: Wed Nov 18 05:31:57 2009 -0600 Fix horizontal & vertical lines commit 9f3a29d8323c8cc50ed8bed536d610154b8ef5a5 Author: John Bowman Date: Tue Nov 17 12:46:36 2009 -0600 Rename example. commit 9f2225f1aa08a3a153077907d7eddad0d4b31a0e Author: John Bowman Date: Tue Nov 17 12:45:18 2009 -0600 Add example of a polar graph produced from discrete data. commit 5c2fe7c11396ec23328a9bb43f9ad5d360db97f3 Author: John Bowman Date: Tue Nov 17 12:38:24 2009 -0600 Implement operator ..(tensionSpecifier t) and join3(tensionSpecifier t). commit 9b5fa939349b94a7cde0e7eb84f1a274fdcf4360 Author: John Bowman Date: Tue Nov 17 12:12:18 2009 -0600 Implement polargraph(picture pic=currentpicture, real[] r, real[] theta, interpolate join=operator--). commit c8a62c7395f1a48f5c5b6b68c53c47b60beeeaa8 Author: John Bowman Date: Tue Nov 17 11:08:04 2009 -0600 Add Sierpinksi examples, courtesy of the cvgmt group. commit d4c786480b4d9f93b5fec598d164ca2aabc51e34 Author: John Bowman Date: Sat Nov 14 00:59:23 2009 -0600 Improve example. commit dd619b1378bfbb217d50007794a6591c811f6ebf Author: John Bowman Date: Sat Nov 14 00:53:02 2009 -0600 Add example. commit f39aa1796dd3acd99d7ffb873d80d4b310c2d8ad Author: John Bowman Date: Sat Nov 14 00:19:52 2009 -0600 Add check that parametric array for spline interpolation is increasing. commit c7ee92332c676d56eb5b1a5197c218fd5bbc42b6 Author: Andy Hammerlindl Date: Thu Nov 12 22:54:00 2009 -0600 Removed unused lookInTopScope methods. commit 3d58516911511dfab639a321afd7e5e26bb85dd9 Author: John Bowman Date: Mon Nov 9 14:12:20 2009 -0600 Increment version to 1.91svn. commit 77e42713c6bbe652511319b8b373bacafacfa6d2 Author: John Bowman Date: Mon Nov 9 11:02:46 2009 -0600 Document SVG output. commit a00bc7781bee6c2f39e4d9096a571ea3bc8f0b44 Author: John Bowman Date: Mon Nov 9 09:16:15 2009 -0600 Remove preprocessor symbol in preparation for upcoming dvisvgm-0.8.7 release. commit fdfd0d00a8e791f7b4d9cd765cb58cb8769f54fc Author: John Bowman Date: Mon Nov 9 08:57:29 2009 -0600 Fix SVG axial, radial, and emulated tensor-patch shading. commit 8e628ad269ae1d0f921e1ebd11cefde0d61aef8d Author: John Bowman Date: Mon Nov 9 02:36:31 2009 -0600 Increment version to 1.90svn. commit 87d2f40f639d69a126e5ea9385ae582ef143f02e Author: John Bowman Date: Mon Nov 9 01:26:17 2009 -0600 Fix timer argument. commit bd1af45298cbacb90ecc22a4d9c2358212164ed6 Author: John Bowman Date: Mon Nov 9 01:13:46 2009 -0600 Check for uninitialized shading pens. commit 0134dfdf3b3f8c0338f3120c1559b07388cbd188 Author: John Bowman Date: Sun Nov 8 23:14:03 2009 -0600 Implement emulation of Gouraud shading in SVG. commit 396f32a9acea190fe1ac4edbf8a98d894adf2ae2 Author: John Bowman Date: Sun Nov 8 23:12:33 2009 -0600 Add routine that returns the intersection time of the point on the line through p and q that is closest to z. commit 9bc23dcee01574f5e18548de44f795834f049eb9 Author: John Bowman Date: Fri Nov 6 12:55:09 2009 -0600 Improve missing fft diagnostic. commit f3d623e7dea46f3e93ea6f0a8007c21e0b80c64d Author: John Bowman Date: Thu Nov 5 18:08:27 2009 -0600 Reduce PRC NURBS memory usage. commit 61e0a584d00a4b8cf0310e819309d9d669f9cce1 Author: John Bowman Date: Thu Nov 5 17:50:29 2009 -0600 Fix rational NURBS curves; add example. commit 7835fffdbd04dadb20132b830fce0fe60c6072ca Author: John Bowman Date: Wed Nov 4 05:54:57 2009 -0600 Reduce maxangleiterations. commit 6d6b217bc8c6a942def28f2172df23bf978cb5cb Author: John Bowman Date: Wed Nov 4 05:49:55 2009 -0600 Revert to previous value of fuzz in ratio. commit f46da67ff8116f94f667cc746d161b2f17ad75db Author: John Bowman Date: Tue Nov 3 14:29:46 2009 -0600 Port recent changes to CYGWIN commit c5e55a514d847442cf3964f9d5b054ad26b277ee Author: John Bowman Date: Mon Nov 2 22:39:31 2009 -0600 Always generate at least NColors. commit c0a54c9bde7af034c1d9fad7ceb08a048dfc2e8a Author: John Bowman Date: Thu Oct 29 20:17:04 2009 -0600 Implement path3 unstraighten(path3). Increase fuzz in ratio. commit 99338b8ddf43f3d1378c1c550d6f4390d78fd0d9 Author: John Bowman Date: Thu Oct 29 10:16:17 2009 -0600 Add support for NURBS curves. commit 67157c7e7a9daa746fba5f2918e7ce844497554e Author: John Bowman Date: Wed Oct 28 23:44:27 2009 -0600 For SVG output, explicitly draw a circle instead of a length 0 path. commit 0848be7129602a33b549b7580cd4b2f4f31db984 Author: John Bowman Date: Wed Oct 28 02:36:35 2009 -0600 Avoid unnecessary copying of linetype structure. commit 34c8a0e8c0513b2337bec7974b26499b4028ec79 Author: John Bowman Date: Tue Oct 27 10:04:54 2009 -0600 Avoid negative dash patterns. commit beaddd303da81161cfb48fc171e6ef563981bcfc Author: John Bowman Date: Tue Oct 27 02:32:34 2009 -0600 Change linetype pattern from a string to an array of reals: a string is still accepted (for backwards compatibility), but the return type of linetype(pen) is now real[] instead of string (backwards incompatible). Implement native SVG path output (still requires dvisvgm-0.8.6). Implement SVG emulation of tensor patch shading (for a single patch). Change split so that an empty delimiter splits on spaces, discarding duplicate spaces. Add fillrule argument to draw(pic, path[], pen[]). Implement missing add routines. Implement 2D FFT. commit 00e952a57e9f9bbda96353de3373f0d6e5526dde Author: John Bowman Date: Tue Oct 27 01:46:53 2009 -0600 Minor optimization. commit 96fd0fe7e05563cc256fba6c895e064826efd558 Author: John Bowman Date: Mon Oct 26 10:54:05 2009 -0600 Generalize example. commit 05a17fddf40670c0435bea7cce5d82db2b8f1923 Author: John Bowman Date: Mon Oct 26 10:46:27 2009 -0600 Improve example. commit 0dfac9e96a027b8677f8aa708155aa2faea6af25 Author: John Bowman Date: Mon Oct 26 10:44:23 2009 -0600 Simplify example. commit 0380e389da6be2a056ece5e8586985aadf481286 Author: John Bowman Date: Mon Oct 26 10:32:44 2009 -0600 Improve inset graph. commit 37da15cebb919bc42c1ad7c3bc6f14b0470c43d3 Author: John Bowman Date: Fri Oct 23 00:10:48 2009 -0600 Fix rational NURBS sizing; add example. commit 57ebc8ffefa5ac6c3735ec8115fd98ded085dd75 Author: John Bowman Date: Thu Oct 22 23:41:37 2009 -0600 Fix control point normalization of rational NURBS surfaces. commit 0211934ae5bf87c192a68ecac2339d511529812b Author: John Bowman Date: Thu Oct 22 00:29:30 2009 -0600 Enable workaround for dvisvgm bounding box bug (requires dvisvgm-0.8.6). commit 6c63d91654cbe7b929a0750f92749ae71b4c6331 Author: John Bowman Date: Mon Oct 19 14:14:52 2009 -0600 Fix typo. commit 1852ebbdf6968606424c611eba5609abd5dc9107 Author: John Bowman Date: Mon Oct 19 14:13:51 2009 -0600 Fix inlinemovie3. commit 54551fedfb8047a3ca3ca50f0bbfda07a119b85a Author: John Bowman Date: Mon Oct 12 14:44:03 2009 -0600 Resolve ambiguity in arc. commit 1b2b1d9d1de46d07d2cb16ab92ba0dad431985fd Author: John Bowman Date: Mon Oct 12 10:12:13 2009 -0600 Don't garbage collect PRC entities. commit aca4826183e96d9f193883a1373447e59318ab28 Author: John Bowman Date: Sun Oct 11 08:39:19 2009 -0600 Improve colours. commit 2f57f3013c38bce184d9f822fff740155a059292 Author: Orest Shardt Date: Sat Oct 10 15:04:06 2009 -0600 Do not compute vector at (0,0); use a instead. commit 11d22f73ce385277021a7f5aa1dd0acc1d9af68b Author: John Bowman Date: Fri Oct 9 02:13:23 2009 -0600 Convert labelpath to png for svg output. commit 36f156597d65d8381c26fe5c975f0503d88eba68 Author: John Bowman Date: Thu Oct 8 16:28:27 2009 -0600 Add support for passing bbox to dvisvgm (currently disabled; this requires dvisvgm-0.8.6 from http://dvisvgm.hg.sourceforge.net/hgweb/dvisvgm). Fix erase when outputting SVG graphics. commit f480bb7082de70848628ff6bcb6b113a2a24a958 Author: John Bowman Date: Thu Oct 8 14:17:12 2009 -0600 Fix formatting of error messages. commit 4a7cbd42478c92051c16f084f33a949480614f11 Author: John Bowman Date: Wed Oct 7 21:12:37 2009 -0600 Use ghostscript pngalpha driver to produce transparent png files. Produce transparent png files for unsupported SVG elements. commit 9fe5af671b62c0be5dee2c3fc5c65c803b0282be Author: John Bowman Date: Tue Oct 6 21:59:53 2009 -0600 Fix surface and path3 garbage collection. commit 6e1823d47ca88b8f2f7dbc0047134a2f6d108f73 Author: John Bowman Date: Tue Oct 6 21:06:44 2009 -0600 Improve garbage collection. commit 8eb8dd4dd23a2f01cfb83dc13c104ed1f4d63482 Author: John Bowman Date: Mon Oct 5 23:21:23 2009 -0600 Force pdfformat when using a pdflatex texengine with an alternative output format. Force settings.align="B" for non-EPS output formats. commit 039d69203c0c6fa63d33482853450003f5d41dfd Author: John Bowman Date: Sat Oct 3 15:45:21 2009 -0600 Workaround broken curses.h header file on i386-solaris. commit aaf46eaa973bb4574fecfab4b6920435a4cdc556 Author: John Bowman Date: Fri Oct 2 15:54:31 2009 -0600 Fix center table compression under optimization. commit de78b4ca31253167f2f7bf427566342126880513 Author: John Bowman Date: Fri Oct 2 09:03:23 2009 -0600 Document Billboard and Embedded labels (see the example billboard.asy). commit e59a608e691ab1b829843808ba4355428428e334 Author: John Bowman Date: Fri Oct 2 02:51:30 2009 -0600 Add code for removed file. commit c0fc62ca6d83523cdf0e82e41925c1fe54d1b5d2 Author: John Bowman Date: Fri Oct 2 02:50:40 2009 -0600 Increment version to 1.89svn. commit 3d506c981417015fad8b50c58f1c7ae8c5515166 Author: John Bowman Date: Fri Oct 2 01:25:43 2009 -0600 Remove obsolete part name code. commit f771a8671cdfa4caf9effb46f86e44f76465b422 Author: John Bowman Date: Thu Oct 1 21:52:36 2009 -0600 Add Arrow to tutorial example. commit 1a7944b9c943c2488edd366c322b8866a1ee7248 Author: John Bowman Date: Thu Oct 1 21:45:34 2009 -0600 Store center values in a lookup table. commit f016bed702c2b32a3e1351eec8f322c30e7923b2 Author: John Bowman Date: Thu Oct 1 17:37:30 2009 -0600 Implement PRC billboard labels. Rename settings.billboard to settings.autobillboard. Make settings.autobillboard=true by default. commit 3cd6f39dcd3340cdc936c6a2cbe70c642dd402d3 Author: John Bowman Date: Tue Sep 29 17:09:51 2009 -0600 Improve tutorial. commit 83d1250ec4df70d30b3b113e0fb656bb2f7b6682 Author: John Bowman Date: Tue Sep 29 14:59:26 2009 -0600 Improve tutorial. commit 28ec8495d0062c18dea0b6902cffdaa3661f794c Author: John Bowman Date: Tue Sep 29 10:07:11 2009 -0600 Add examples. commit 476b4de0787becd2e1f4ce567b8ea01e637abd61 Author: John Bowman Date: Mon Sep 28 19:42:07 2009 -0600 Fix compilation under -disable-gl. Fix billboard size computation. commit 40e003e12fba455444cf863bafc4f916036e20a9 Author: John Bowman Date: Mon Sep 28 14:27:52 2009 -0600 Add example of arbitrary 3D background plane. commit 956766e1ab552e8ad330f41703728a2539693b29 Author: John Bowman Date: Mon Sep 28 14:21:07 2009 -0600 Cache meshpen, knot, weight, and color arrays. Change bottom=false argument to bottom=true. commit c72533006097421745e15983fd5bd3ad090d2363 Author: John Bowman Date: Mon Sep 28 13:39:58 2009 -0600 Clean up auxiliary dvi file when producing SVG. commit a2aa7a0b9be009c587b5fd6bae57962f53184b03 Author: John Bowman Date: Mon Sep 28 10:16:08 2009 -0600 Add operator * (transform3, obj). commit b3d646dfef5d4326a3aa5bff4745ae713ca5223a Author: John Bowman Date: Mon Sep 28 03:39:58 2009 -0600 Increment version to 1.88svn. commit f13df983c7f9a4db3b2498dcbe56f2a61e1df596 Author: John Bowman Date: Mon Sep 28 01:57:28 2009 -0600 Simplify code. commit 5700ba631f979a809a7b685cbc495f9035725ca8 Author: John Bowman Date: Mon Sep 28 01:30:36 2009 -0600 Implement settings.hyperrefOptions. commit a251ed7aee647f84007449515bf186d241d2ed4e Author: John Bowman Date: Mon Sep 28 01:13:24 2009 -0600 Implement billboard labels in OpenGL renderer (not yet implemented for PRC). commit bff9ef341c1595388e2049760f58a0ab5385b197 Author: John Bowman Date: Sun Sep 27 14:54:59 2009 -0600 Implement framerate option for OpenGL movies. commit f5b6d19deaed77f141de84d40912cd68ec752550 Author: John Bowman Date: Sun Sep 27 14:31:34 2009 -0600 Fix OpenGL animations. commit d571f0bb2a62f666fb46d3c6d82df51c98ab02e3 Author: John Bowman Date: Sat Sep 26 22:50:38 2009 -0600 Implement a projection() function that returns the interactive camera parameters as a projection. commit 0ed8cb015056d1ce22944ca82abf4655420440ca Author: John Bowman Date: Sat Sep 26 22:21:39 2009 -0600 Fix premature memory deallocation bug. commit 28c90d0ce6ece4ef15c31b9b8cb077c3b4d2c7fd Author: John Bowman Date: Sat Sep 26 10:05:26 2009 -0600 Simplify transform3. Add additional functions for inverting paths to 3D. commit 68a46d3ff504f6235e5a2b04f7bb8b4117a13de5 Author: John Bowman Date: Fri Sep 25 14:47:37 2009 -0600 Improve tutorial. commit 005b5d7da149db0da8cb3de5a000e87596a31919 Author: John Bowman Date: Fri Sep 25 11:17:02 2009 -0600 Fix erase. commit 47fdd56f0895eca33d282b2db950df4040051635 Author: John Bowman Date: Fri Sep 25 00:51:29 2009 -0600 Minor documentation improvements. commit 158761286236e4c3ed3493930d0fed5679c8a87a Author: John Bowman Date: Fri Sep 25 00:29:33 2009 -0600 Resize 3D example. commit 93b4686d2ff546fc2dcf705b9c4af5c40a54e8ff Author: John Bowman Date: Fri Sep 25 00:27:33 2009 -0600 Don't modify settings. commit 6b54c2fde17460fd58d1cd08194a92fa174cec18 Author: John Bowman Date: Fri Sep 25 00:08:10 2009 -0600 Fix viewportsize bug. commit 0831668a76a53c0a62e8b49fa69977e4c10b7387 Author: John Bowman Date: Thu Sep 24 23:04:19 2009 -0600 Improve tutorial. commit 413d037c5d3de6e905e0ce13eb711c2eaaaa8f2f Author: John Bowman Date: Thu Sep 24 22:59:37 2009 -0600 Make erase() clear the PostScript canvas again. Implement an interactive erase commmand that does not require parenthesis. commit e99368945ae28cc10e0065912bbf0345e9d060da Author: Philippe Ivaldi Date: Thu Sep 24 17:29:07 2009 -0600 Add support for master tex file to asy-mode.el commit ec61cada1c64452fe97ac0ffd6d0785fabe115c4 Author: John Bowman Date: Thu Sep 24 16:33:47 2009 -0600 Set ucyclic and vcyclic only for surfaces described by a full matrix. commit 6345c5afffd670d231aee5e05ced5662bcea905d Author: John Bowman Date: Wed Sep 23 10:55:31 2009 -0600 Move miniltx path parsing patch into C++ code. commit 970f70cf4fab1dee495bbf9f95c0bfcd077b85d4 Author: John Bowman Date: Tue Sep 22 15:29:30 2009 -0600 Simplify interaction of -outname and prefix argument of shipout. commit 83689ba1321c3019c0af56e8b15304b602ba6ee5 Author: John Bowman Date: Mon Sep 21 21:17:44 2009 -0600 Add patched graphicx.tex file. commit 95dde9cbab250b9e20adb69f1d92f32a2370d5ac Author: John Bowman Date: Mon Sep 21 13:19:12 2009 -0600 Improve indexedfigure API. commit 7fe28533c9d2775911ee9da568fb69d29e9e9d9e Author: John Bowman Date: Sun Sep 20 08:59:36 2009 -0600 Generalize OmitTick to omit both major and minor ticks. commit 4e2c341347215e7aed1d002b169ec176ca1da8b7 Author: John Bowman Date: Sat Sep 19 23:28:23 2009 -0600 Simplify ENDIAN test: avoid redundant flags and support ACTION-IF-UNIVERSAL. commit c7bc6f7711db47756997888d70846b65724787d0 Author: John Bowman Date: Sat Sep 19 23:18:31 2009 -0600 Remove spurious spaces from example. commit 15471a4ff31ff7ae8b8e17c36f92fd44d41b4500 Author: Philippe Ivaldi Date: Sat Sep 19 04:18:26 2009 -0600 Add links to licence commit 99a99b9a5750d3a72ee8ec4641f13c6d0d3df863 Author: John Bowman Date: Fri Sep 18 23:07:43 2009 -0600 Update example. commit 28d308a229977054f066af360635027f500a0f1a Author: John Bowman Date: Fri Sep 18 23:01:27 2009 -0600 Generalize addViews to handle any layout; change the default from ThreeViewsFR to SixViewsUS. commit d20c0989d6f7914f839d67760fa7fa7157dfb012 Author: John Bowman Date: Fri Sep 18 15:48:06 2009 -0600 Increase dvisvgm verbosity level. commit 57254a17d7bfd6f7daa4a948215435ebe7116eef Author: John Bowman Date: Thu Sep 17 23:29:55 2009 -0600 Allow PRC node names for labels and dots. commit 84e20dc1912c59b45231828be24d9b5ef2fdd373 Author: John Bowman Date: Thu Sep 17 22:13:04 2009 -0600 Add stereoscopic example. commit 0e6d64647683c0e8ec650c6ede27f2bfe2fc4a9a Author: John Bowman Date: Thu Sep 17 11:48:06 2009 -0600 Implement addStereoViews. commit 06988fdcfc225a82fa57b85e5763c433e14cad32 Author: John Bowman Date: Thu Sep 17 09:51:24 2009 -0600 Remove obsolete patch. commit 79e893678011406031dcdadc7f903710e17aba16 Author: John Bowman Date: Wed Sep 16 21:38:30 2009 -0600 Add reverse and step actions for OpenGL movies. commit 620b86903c7e0416295ddd4cb0c4210187360d87 Author: John Bowman Date: Wed Sep 16 20:43:51 2009 -0600 Make stop pause animation. commit ccdc35f8f4e3504943d62f3fca7dba701ae0c910 Author: John Bowman Date: Wed Sep 16 13:52:14 2009 -0600 Add support for svg output; this requires a DVI-based TeX engine and (preferably patched version of) dvisvgm-0.8.3 from http://dvisvgm.sourceforge.net/ commit b0ba757a3acd232a4b7d604e4d3a6a7976e4bf97 Author: John Bowman Date: Tue Sep 15 21:12:04 2009 -0600 Update links. commit d52ed585466957d4a26c67d06690861b99f9f0da Author: John Bowman Date: Tue Sep 15 13:42:16 2009 -0600 Handle a degenerate axis range. commit c66d26028097560e9e56c88ec96c2c7704df1a6a Author: John Bowman Date: Tue Sep 15 13:18:06 2009 -0600 Handle degenerate palette ranges. commit f9242094efa6d9f49c3b36fd8f4106202d47613f Author: John Bowman Date: Tue Sep 15 04:04:45 2009 -0600 Remove obsolete pstoedit patch, now that pstoedit-3.50 has been released. commit bf8510a58161029ac28abfc8ef02964ae06511d6 Author: John Bowman Date: Sun Sep 6 13:08:25 2009 -0600 Increment version to 1.87svn. commit 1294be62b09d75a8af7c5583d7d31ff7ec1a1d3c Author: John Bowman Date: Sat Sep 5 13:34:57 2009 -0600 Fix uninitialized variable. Add missing name arguments. commit 44dea257993a1d0b8b85dbf8ebee7b92594a2208 Author: John Bowman Date: Sat Sep 5 01:17:23 2009 -0600 Fix string ambiguity. commit e76df5392dfc3f00dc25a901d6251b91d9220161 Author: John Bowman Date: Fri Sep 4 15:36:17 2009 -0600 Remove spurious argument. commit 436701369ae2f53c4573fdaad99d55ec1527ab3b Author: John Bowman Date: Fri Sep 4 15:35:24 2009 -0600 Move begingroup and endgroup to oPRCFile class. commit 2539dc4db71731e27766310f0fdc9dad7e9a52c9 Author: John Bowman Date: Fri Sep 4 15:28:31 2009 -0600 Remove spurious brace. commit 132a6294bc632deb35417c7b5cc6246316d1b886 Author: John Bowman Date: Fri Sep 4 15:27:09 2009 -0600 Add PRC model name support to begingroup3 and endgroup3. commit 4ef5eb3cdce70a1eb8c383444b9efd3c01b5d45d Author: John Bowman Date: Fri Sep 4 10:28:47 2009 -0600 Support naming of PRC parts. commit 8fabefee19a41ea9735b4ec98de1e9385553e9f8 Author: John Bowman Date: Fri Sep 4 05:28:59 2009 -0600 Check for correct version of readline library. commit fbb620ff0ee3a9c5d0a33b4983dd0d51ee732c30 Author: John Bowman Date: Fri Sep 4 05:13:50 2009 -0600 Add -lreadline to $LIBS. commit b89417fbb590c3a3d1645f8fc0d09cb99b0c7623 Author: John Bowman Date: Fri Sep 4 05:06:33 2009 -0600 Fix readline test. commit 9a6132abdb8d529587ee7edb28b5d185c8beead3 Author: John Bowman Date: Fri Sep 4 04:39:43 2009 -0600 Improve GNU readline test. commit 7c7246361d8378fbe01997a1d978a3ea2de20e3d Author: John Bowman Date: Thu Sep 3 12:35:35 2009 -0600 Fix typo. commit 2e2f756209acc727ea0bb95e70c2935da3b74cdf Author: John Bowman Date: Thu Sep 3 12:34:12 2009 -0600 Fix radius of curvature at nodes. commit 262d7c7f6f95b1986fe6a97366fcd3a30611ae84 Author: John Bowman Date: Wed Sep 2 16:39:30 2009 -0600 Reduce NURBS memory usage in polynomial case. commit 240415803877c72d83513e5d70a83559153809a7 Author: John Bowman Date: Wed Sep 2 16:36:06 2009 -0600 Fix NURBS sizing. commit 4f525cec551be4f68f1c2b50cb734ec86d9795de Author: John Bowman Date: Mon Aug 31 02:00:43 2009 -0600 Optimize PRC polygons. Reduce surface memory usage. commit c90bfe48427c48edf00eb6f5d7baddfd7340ae5d Author: John Bowman Date: Fri Aug 21 17:45:52 2009 -0600 Increment version to 1.86svn. commit 6a73c6c84f03bf801c2a3e3e21fd14d96d6086ef Author: John Bowman Date: Fri Aug 21 15:22:51 2009 -0600 Fix typo. commit 6d98b59a38857d7f9e0f5c52cd2514f03eb3ead0 Author: John Bowman Date: Fri Aug 21 15:22:10 2009 -0600 Move remaining picture operations. commit f47a7155eaa39e2218d25563a989246a96e23f92 Author: John Bowman Date: Fri Aug 21 15:21:36 2009 -0600 Rename labelsurface to surface; extend also to surfaces containing a single patch. commit be47838d06af021d2074aa8d09580e2bf19fb965 Author: John Bowman Date: Thu Aug 20 23:08:28 2009 -0600 Add missing pen dimensions to sizing routine. commit e86466c814c27abddcdde8ba534c6b8dd0144fe0 Author: John Bowman Date: Thu Aug 20 22:15:10 2009 -0600 Fix compilation on platforms that lack OpenGL. commit 9bc8505e57fbbb496b4231ad75218e369c91f249 Author: John Bowman Date: Thu Aug 20 08:39:20 2009 -0600 Increment version to 1.85svn. commit 0f99c085bd848e8ea759e8027938d7234b83c62d Author: John Bowman Date: Thu Aug 20 00:47:14 2009 -0600 Fix readline conditionals. commit 78dfab9cb0667c2c7e0907d1393c8223acacfded Author: John Bowman Date: Thu Aug 20 00:26:46 2009 -0600 Split runtime further. commit d2af5f1ac81c368f813006f8dda2f7cff88ff046 Author: John Bowman Date: Wed Aug 19 22:18:19 2009 -0600 Split runtime further. commit fb91344ff828361d467468ab012ad8ce5be3c779 Author: John Bowman Date: Wed Aug 19 22:06:02 2009 -0600 Split runtime.in further. commit 6543e81a99fa39d9b2737f805eb918c36a37681a Author: John Bowman Date: Wed Aug 19 17:23:45 2009 -0600 Start splitting runtime.in. commit 224a0cabc2a2571be7c4e9e82a22c0e14b8cce63 Author: John Bowman Date: Wed Aug 19 07:52:08 2009 -0600 Rename example. commit 79e9aea7b99386a7f939bb820a2d7cdba4ff4ed6 Author: John Bowman Date: Wed Aug 19 01:12:04 2009 -0600 Move new example to examples directory. commit 0ec04f08aa90a6b60d51108d4048299a62b7ebb3 Author: John Bowman Date: Wed Aug 19 01:08:56 2009 -0600 Extend NURBS interface. commit 17363b9b3fbcbaaf91137cc3aa2a3308f8159d35 Author: Andrei Catuneanu Date: Tue Aug 18 22:08:55 2009 -0600 Added structure pertaining to recursive subdivision of patches. Added example of use in surfacesplit.asy. commit d358b2232f83cc0708aa5670098d938e1d21ea57 Author: John Bowman Date: Tue Aug 18 10:30:30 2009 -0600 Remove obsolete function. commit 1b39ef88f10a730c9233ec8d9abeaf53b90d3d12 Author: John Bowman Date: Mon Aug 17 00:16:29 2009 -0600 Move approximate NURBS bounds to C++ code. commit 7f5652be5d1c3df6ab5deabebc66ab60daf4519b Author: John Bowman Date: Sun Aug 16 15:50:08 2009 -0600 Remove inline qualifier. commit c23f68334ca0a21c236498c806a958bb1731b851 Author: John Bowman Date: Sun Aug 16 15:44:05 2009 -0600 Fix perspective PRC viewportmargin. commit 785cbe47263c17d355184a247e64c8de0224aa9b Author: John Bowman Date: Sun Aug 16 14:57:48 2009 -0600 Enable rational NURBS. commit a7bf3625b440fad36f9fb89eee5ce651bdee580d Author: John Bowman Date: Sun Aug 16 14:46:04 2009 -0600 For clarity, use single quotes instead of double quotes. commit 690c54d98e06da6ee8931fb47ad20ad06028a017 Author: John Bowman Date: Sun Aug 16 11:08:20 2009 -0600 Compare to control point bounding box rather than patch bounding box. commit ff6c5bcc60187796e21ef5dc89f7bfde0b7c2e52 Author: John Bowman Date: Sun Aug 16 10:06:11 2009 -0600 Fix comment. commit 9ef12ec3ca7f52064ef0471748ba24c80329e595 Author: John Bowman Date: Sun Aug 16 01:19:43 2009 -0600 Add preliminary NURBS support (so far only implemented for PRC). commit 099ec542b77e480fdbb604222051b7396242ac57 Author: John Bowman Date: Sat Aug 15 20:53:15 2009 -0600 Clarify asymptote.sty license. commit de6005b749685dc44b8ceda243cb22f7be27068f Author: John Bowman Date: Sat Aug 15 09:38:41 2009 -0600 Remove unwanted spaces in asymptote.sty. commit 972dda4fa1cb6f8c816797f06da6c3c5911c8dd9 Author: John Bowman Date: Sat Aug 15 03:01:42 2009 -0600 Increment version to 1.84svn. commit 6634bb81d4d89ee1f824064af635a69215f226d1 Author: John Bowman Date: Sat Aug 15 01:16:08 2009 -0600 Fix dependency. commit 9c1a615f4b4ac132f0bb5c2e68bff26269c46d6e Author: John Bowman Date: Sat Aug 15 00:28:59 2009 -0600 Embed parametric equations on Klein bottle. Add new example. commit 19f934368489b7223888adb889015611188a4f9c Author: John Bowman Date: Sat Aug 15 00:17:32 2009 -0600 Improve diagnostics for missing libz library or texi2dvi program. commit e4b876f284c2df9de310df65112847402748d73b Author: John Bowman Date: Fri Aug 14 23:25:57 2009 -0600 Add light argument to fit() and shipout(). commit 01c20bad45364434a4b532c03f255f5dfde46e33 Author: John Bowman Date: Fri Aug 14 22:36:55 2009 -0600 Remove redundant angle arguments. commit 801972e733d768a3f7bccd0f8a3835b28a7b485b Author: John Bowman Date: Fri Aug 14 21:57:06 2009 -0600 Remove unwanted quotes from LaTeX jobname. commit 76e4f53bb7104026a12e8e2aef525a3ed2d2b27f Author: John Bowman Date: Fri Aug 14 17:05:07 2009 -0600 Fix display of generated file names with spaces. commit 204d3a3d6ad00203b843161aeda0d8f871145ce1 Author: John Bowman Date: Fri Aug 14 09:05:32 2009 -0600 Check only primitive types for virtual file mode members. commit 63535fdc7dc4245437aaef5b88a07ea74ad1dd79 Author: Philippe Ivaldi Date: Fri Aug 14 08:50:49 2009 -0600 Removing duplicated text of license commit f945cbfd799439d8af6b5cd26a4246e15598b108 Author: John Bowman Date: Fri Aug 14 04:19:54 2009 -0600 Restrict file modes to ty_file. commit d8203d9c0b8a4084b36a0b7c9cdc304a731f622a Author: John Bowman Date: Fri Aug 14 04:02:48 2009 -0600 Update tests. commit 31794c39134751f2697bf84eaa42c2019dc13e05 Author: John Bowman Date: Fri Aug 14 03:41:41 2009 -0600 Make file mode functions virtual members; this backwards incompatibility requires that line(file f) be changed to f.line(), etc. commit 4e479144f8f21f35b97ab322c32dd31a82e98d62 Author: John Bowman Date: Thu Aug 13 22:36:05 2009 -0600 Remove obsolete cyclicflag and void cyclic(bool) functions now that the cyclic member of an array is writeable. commit 3b4595b6f31ca06107f589f58b558727135bce96 Author: John Bowman Date: Thu Aug 13 22:06:27 2009 -0600 Don't overwrite viewportmargin. commit 7b97ed0aebb30591dddb10057d198a429e6712bb Author: John Bowman Date: Wed Aug 12 17:33:31 2009 -0600 Check ASYMPTOTE_HOME instead of ~/.asy in search path. commit 761284a25d0f2b2de505d9bfb9decedfe4a278ed Author: John Bowman Date: Wed Aug 12 16:12:31 2009 -0600 Fix texpath initialization. commit 4e5ed7ce97044102c22c48bfd0cce001ae976dca Author: John Bowman Date: Tue Aug 11 01:32:50 2009 -0600 Increase linegranularity. commit 6ddc1c963bea6ab9ffd5a367f61b3c3d183c3983 Author: John Bowman Date: Mon Aug 10 23:38:34 2009 -0600 Fix splitting indices. commit 1606e9a7dc40147924b4378ca982d79e1ec2defe Author: John Bowman Date: Mon Aug 10 22:28:47 2009 -0600 Fix definition of normal in regularize. commit 6d9797048c32dfdfed6f73c225f014f1eee4989f Author: John Bowman Date: Mon Aug 10 21:27:22 2009 -0600 Improve example. commit feb14e5db7ef6a3a4188c4581e06de0e091b9778 Author: John Bowman Date: Mon Aug 10 21:21:17 2009 -0600 Use splined parametric surfaces to implement smooth thick lines. commit 076761589b35f8dc9e9117b97cbd746d36704a4a Author: John Bowman Date: Mon Aug 10 11:28:37 2009 -0600 Don't nest picture environments used for TeX clipping (not used for ConTeXt since the \beginpicture...\endpicture environment is still broken; this only affects the clipping of labels outside the bounding box.). commit 47a5dfc993cdc6f2905315787ad520d091f3b73d Author: John Bowman Date: Sun Aug 9 15:47:06 2009 -0600 Remove private qualifier from rmf. commit 145f90a3130752c459dbc9f66773e3bed3221a02 Author: John Bowman Date: Sun Aug 9 01:34:45 2009 -0600 Copy transformation T in projection.copy(). commit 0b2ab9915bfa3f189a049cd1572859769a49f6fc Author: John Bowman Date: Sun Aug 9 00:49:51 2009 -0600 Construct patches with the usual orientation for a counterclockwise external path; update tensor product shading to be consistent with this more sensible convention (rather than the reversed format described in the Postscript Language Reference Manual). Make the default currentlight=Headlamp for consistency with Adobe Reader; the previous currentlight is now called Viewport. Fix uequals, vequals, and surface indices; implement ucyclic() and vcyclic(). Add rendermargin parameter. Add triple dir(explicit triple) function for consistency. commit a969e6d7692d5007580b988c396d3fcdc7dced5e Author: John Bowman Date: Sat Aug 8 13:00:47 2009 -0600 Tune Headlamp. commit 6c8eb4afb4c8061d820e7a5be87ae7713d24768c Author: John Bowman Date: Thu Aug 6 20:38:26 2009 -0600 Add labelsurface function. Add min(frame, projection) and max(frame, projection). commit cf6cba7dc2ab278123e56c7277f6539340618da5 Author: Andy Hammerlindl Date: Tue Aug 4 11:17:53 2009 -0600 Added more error-checking to runtime.pl. commit 0b5837ac2166cf8175fc3e36da0b2fc81dc8cbf0 Author: John Bowman Date: Tue Aug 4 00:35:17 2009 -0600 Fix projected bounding box calculation and angle calculation. Remove viewportfactor and anglefactor; increase angleprecision. Cache modelview matrix. commit b75fcd0159de28b45e51f0bd96a27ec5388bb110 Author: Andy Hammerlindl Date: Mon Aug 3 13:48:16 2009 -0600 Refactored pushing and popping processData. commit 7ad2c2ef9501444d77fa59c83edbe1d61ef0dfd0 Author: John Bowman Date: Sat Aug 1 14:03:12 2009 -0600 Simplify example. commit 864166dbc8de454da1707813df8b1e61851a1b42 Author: Andy Hammerlindl Date: Fri Jul 31 10:39:57 2009 -0600 Removed TODO items I no longer feel like doing. commit 71d08ceee7cb423100f202635aacaa934b27aa8a Author: Andy Hammerlindl Date: Thu Jul 30 14:22:52 2009 -0600 Removed menv. commit e1c2a656deb5ad0eb2641f3e7cc0b26e47bc880f Author: Andy Hammerlindl Date: Thu Jul 30 13:19:42 2009 -0600 Added support for splitting runtime.in into several files. commit 20d37a73fddd374ac4c7da3387023b3650ba46a8 Author: John Bowman Date: Thu Jul 30 08:44:44 2009 -0600 Rename splinetype.asy to graph_splinetype.asy. commit 4bd1bb0a4e0146ce62e4e295da5178b3a8db29d7 Author: John Bowman Date: Wed Jul 29 00:36:18 2009 -0600 Add uequals and vequals functions for indexed surfaces. commit 694920eee2c4bf681573f2d6fd8636b9650eaa90 Author: John Bowman Date: Wed Jul 29 00:35:28 2009 -0600 Enable getstring with --interactive even if not a tty. commit b077254e708b9c5e15fa7bcdabaa06d2b69ae280 Author: John Bowman Date: Tue Jul 28 01:17:37 2009 -0600 Add surface indices. Add nonuniform parametric surface routine. commit 206cc9c77018c8b1375415b9d9267aecd3bee926 Author: John Bowman Date: Mon Jul 27 14:53:25 2009 -0600 Fix formatting. commit 3408c1abb864c973e888ef8dc0e05a6e0c283fad Author: John Bowman Date: Mon Jul 27 14:25:07 2009 -0600 Separate code to split a path into nondegenerate Coons patches out of surface constructor. commit 8b3cb0c0f8611dda5d4f30496ea5bbbc59a59b3f Author: John Bowman Date: Mon Jul 27 10:17:48 2009 -0600 Generalize extrude. commit fa43efac07167bb002a08313f04e88c7eb287941 Author: Andy Hammerlindl Date: Mon Jul 27 00:24:19 2009 -0600 Removed finished TODO item. commit ca891da0ff3b8208b18a49faedd373fd01087fa8 Author: Andy Hammerlindl Date: Mon Jul 27 00:23:45 2009 -0600 Made more compact bytecode for pushing defualt arguments onto the stack. commit 3767fd75669d72611ea43fff12052c67a9b94470 Author: Andy Hammerlindl Date: Sun Jul 26 23:55:06 2009 -0600 Added detailed output for debugging bytecode. commit 9c2f666980851fa0ef43ded88eaee9b69a5783b2 Author: Andy Hammerlindl Date: Sun Jul 26 14:26:02 2009 -0600 Changed debugging output for DEBUG_STACK. commit 7a6043078e6d0e3a694d396c06a40f4c76bd0a10 Author: John Bowman Date: Sat Jul 25 23:35:36 2009 -0600 Fix typo. commit c76e1b0bb19ce13de0ef2ec895fd7cc1838cd461 Author: John Bowman Date: Sat Jul 25 16:39:31 2009 -0600 Implement empirical translation between OpenGL and PRC shininess. commit 569235a9a37a12341c1753f620ee5bf3d5181672 Author: Andy Hammerlindl Date: Sat Jul 25 10:31:06 2009 -0600 Added preprocessor option to print names of bltin functions. commit db669441b7bbaa6c00365b0731eaba597eeb53a2 Author: Andy Hammerlindl Date: Sat Jul 25 10:12:38 2009 -0600 Changed formatting of interactive write for overloaded variables. commit e89331ee4b555dffa54b40b7afbcb536439ce00a Author: Andy Hammerlindl Date: Sat Jul 25 10:11:39 2009 -0600 Automated definition of IntArray, etc. commit 16d362253bf942ea57a2e03afb19cc8414163df6 Author: John Bowman Date: Sat Jul 25 09:58:38 2009 -0600 Fix viewportshift flicker. commit bce50c71cb98440f42fc015253ea917cde3de926 Author: John Bowman Date: Sat Jul 25 02:05:50 2009 -0600 Embed 2D frame. Improve OpenGL movie generation. commit 884e85d4e6e1a7bb3beca73e40631f8c0fb345bf Author: John Bowman Date: Sat Jul 25 00:41:07 2009 -0600 Remove diagnostic. commit ce79a2da755a5a841ea55d69506fa888f46fdb4f Author: John Bowman Date: Sat Jul 25 00:01:06 2009 -0600 Update documentation on suppressing warnings. commit 0adc924c1215e27b947a5a46d7e047fb77ec490d Author: John Bowman Date: Fri Jul 24 23:57:15 2009 -0600 Allow asy warnings to be disabled. commit a9719315fbce2bf647e957a8f411fc1280d44478 Author: John Bowman Date: Fri Jul 24 23:54:43 2009 -0600 Delete intermediate files. commit 365a52b459701fd79b56ef8be55bb15d5c3795ba Author: John Bowman Date: Fri Jul 24 19:55:40 2009 -0600 Add missing typedef. commit 376acc56e739bc1a0515cbdf582566e71548333b Author: Andy Hammerlindl Date: Fri Jul 24 02:07:57 2009 -0600 Write type info for variables on the interactive prompt. commit c6e1933634f8c31fe56ae22304c5b9df1dd078e4 Author: Andy Hammerlindl Date: Fri Jul 24 01:45:10 2009 -0600 Made overloaded warning for interactive write less scary. commit db2f127e4687928cb72eee8466e5820382a8099f Author: Andy Hammerlindl Date: Fri Jul 24 01:42:07 2009 -0600 Minor changes to virtual fields. commit 603782425a4038c412769400e5a57bcf84c32e4c Author: Andy Hammerlindl Date: Thu Jul 23 19:24:46 2009 -0600 Add automated testing of array virtual fields. commit 6f0cc2df4ffe672177464e483b84bb28fd168a45 Author: Andy Hammerlindl Date: Thu Jul 23 19:20:22 2009 -0600 Implemented writing to virtual fields. commit a5720dbc46b31e1c5449cd9c4b5174609e238ee9 Author: John Bowman Date: Thu Jul 23 11:04:54 2009 -0600 Resolve ambiguity. commit 8bce737332a755c3a5faf42a3c9c5a3472c5dbcb Author: John Bowman Date: Thu Jul 23 01:20:35 2009 -0600 Add support for OpenGL animations (illustrated in glmovie.asy), including new autoplay and loop settings. Implement a portable Signal function based on sigaction. Add example of inset graph to xsin1x.asy. Improve animation fitting to guarantee a single transformation for all pictures. commit 493cef04561098dd7e4c2b59af5ba706cd2e84f3 Author: John Bowman Date: Tue Jul 21 10:59:05 2009 -0600 Extend embed(frame). commit 7e9a0f1ed063d4960784f2680a3ae52e356f7063 Author: John Bowman Date: Tue Jul 21 01:10:31 2009 -0600 Factor 3D fitting routine. commit 818cfaa9fdd0c2ab99ee13f68ac081a7e5d8c049 Author: John Bowman Date: Tue Jul 21 00:14:50 2009 -0600 Remove extra comma. commit 715a347291775ebb0798740c045ee3fd6f57a09d Author: John Bowman Date: Mon Jul 20 21:44:59 2009 -0600 Add missing picture sizing. commit ee449186aadfed17713f23da356f2e08fc87ae6a Author: Andy Hammerlindl Date: Mon Jul 20 15:12:11 2009 -0600 Added routines for stepping through external animations in slides. commit 454f559a21b8f13cab72bbb3a08db18fd0e5fffc Author: John Bowman Date: Mon Jul 20 00:35:29 2009 -0600 Increment version to 1.83svn. commit 4b0abd49ecae0d4b588b0f833c96b0fb18fbe05c Author: John Bowman Date: Sun Jul 19 22:57:37 2009 -0600 Use a consistent approximation for drawing tube centers. commit 01e4df92d03651d9d1ddca4a0418e097a7d2245d Author: John Bowman Date: Sun Jul 19 21:35:45 2009 -0600 Fix threaded exports. commit d65cc05bce215c8f2c526c1258a61964f7de06e2 Author: John Bowman Date: Sat Jul 18 15:26:12 2009 -0600 Respect -gray and -bw in PRC output. commit cdc39ade33395032d0450092fc54b9e6dfd46edc Author: John Bowman Date: Fri Jul 17 23:35:20 2009 -0600 Add default argument to transform3(projection). commit 26b7e01c3c7b1a2cdccc87d21c3feee46c164dcf Author: John Bowman Date: Fri Jul 17 22:19:35 2009 -0600 Fix texpath fontsize with PDF tex engines. commit e02c92524691931d63e66ce02d06e0f65cdb5dd6 Author: John Bowman Date: Fri Jul 17 19:55:57 2009 -0600 Add missing pt units. commit c5e192a6c46139a14e32209bd5167f486f82300f Author: John Bowman Date: Tue Jul 14 00:22:41 2009 -0600 Increment version to 1.82svn. commit d12953b58156403fdaf97b7e0051fb572f937ed9 Author: John Bowman Date: Mon Jul 13 22:36:37 2009 -0600 Fix initial angle calculation. commit 51ced8f17f84f0b445cdf828ea5b8d108239d5ca Author: John Bowman Date: Mon Jul 13 21:18:26 2009 -0600 Improve motion detection. commit e5f571b23a3439d0c7384004ca08bb7d16c6ee92 Author: John Bowman Date: Mon Jul 13 21:02:58 2009 -0600 Reinstate doubleclick motion detection. commit 5b086e6f82a2fa3b410131fe0ce297ee0c88b43d Author: John Bowman Date: Mon Jul 13 20:05:06 2009 -0600 Approximate off-axis projections (viewportshift) in PRC. commit 617b958952c3bab45d4b9d4ea36f3718b03c86ff Author: John Bowman Date: Mon Jul 13 18:55:52 2009 -0600 Remove unused include. commit eec81e59e37eee6ddc766df5d130d4b4ea4a84d0 Author: John Bowman Date: Mon Jul 13 18:51:32 2009 -0600 Fix lineskip units. commit 6f9cd42f8184241f0bbfe7d63f9e64efb25f7a28 Author: John Bowman Date: Mon Jul 13 18:41:39 2009 -0600 Rename minbound(triple[][], triple) to minbezier, etc. commit 10640da89ad9f2909257973207bae3e9643d0adf Author: John Bowman Date: Mon Jul 13 18:02:14 2009 -0600 Remove unused format argument from xasy. commit 75d7edb107496906a76167f8a8139050faef72e3 Author: John Bowman Date: Mon Jul 13 17:50:26 2009 -0600 Remove obsolete GIF deconstruction format and xformat setting. commit ee8e73b0935e740d6eda00b1652bf1730b5475c6 Author: John Bowman Date: Mon Jul 13 17:37:20 2009 -0600 Allow single quotation marks in filenames. commit 97e09e03f3b642361649a8a1a5a6149ff190e321 Author: John Bowman Date: Sun Jul 12 22:47:17 2009 -0600 Simplify code. commit d98d421602cd75c211e8a29a877806fb57ce89eb Author: John Bowman Date: Sun Jul 12 22:31:56 2009 -0600 Simplify code; remove cstdarg dependency. commit ac0c23a7f68737023039908e62a3ebe0c4bf122b Author: John Bowman Date: Sun Jul 12 16:31:02 2009 -0600 Add other missing path3 functions. commit 9c5c9495118edbc521c5c2c2297ea5c729dbf0cc Author: John Bowman Date: Sun Jul 12 14:48:40 2009 -0600 Set executable flag on PostScript files under MSDOS, to allow psviewer="cmd". commit dcf7e30049b9dc61ec6e8d50e01284814d585f88 Author: Andy Hammerlindl Date: Sun Jul 12 12:30:14 2009 -0600 Added beginpoint and endpoint for path3. commit 469e960021b292c2dbd647efc9b4a26c6b13db3d Author: John Bowman Date: Sat Jul 11 00:00:43 2009 -0600 Use "cmd" to request the default MSDOS file association. Change default file association for pdfviewer, display, and animate to cmd. commit d63e6e7da81ab3586cf6b31547f0e2bdd7b7458a Author: John Bowman Date: Fri Jul 10 15:24:29 2009 -0600 Improve illustration of ConTeXT font bug workaround. commit 4974258e557e4c720a4e8d8cabb622cd5b03da63 Author: John Bowman Date: Fri Jul 10 15:22:23 2009 -0600 Fix font units. Add example of ConTeXT bug workaround for fonts smaller than 12pt. commit ed90d4412e83ffee109d532ae2a641a57f57e9a4 Author: John Bowman Date: Thu Jul 9 12:28:50 2009 -0600 Fix doubleclick type. commit dd9dbab9779fc495d312a0cd5b382c2ad023ee73 Author: John Bowman Date: Thu Jul 9 12:25:46 2009 -0600 Change doubleclick setting to an int. commit a613f67ff82583b7363631353ed8559f11ccd478 Author: John Bowman Date: Thu Jul 9 12:20:40 2009 -0600 Use a portable doubleclick timeout. commit df1d4756de58eca4bc639664001f8b17413474aa Author: John Bowman Date: Wed Jul 8 09:33:37 2009 -0600 Add example of lmfit. commit 3b41314ac270ea39a7eac4aaade91407e2bad2e3 Author: John Bowman Date: Tue Jul 7 17:43:32 2009 -0600 Adjust camera again as part of 2D resizing. Respect keepAspect flag. Respect projection.autoadjust. commit 5988fd3e14da597c14892b37f6a2b0acba9c2f86 Author: John Bowman Date: Tue Jul 7 09:26:05 2009 -0600 Fix targetsize. commit 454dceb00c1e0257e8176f52b32a36a0c1f7bf9b Author: John Bowman Date: Tue Jul 7 09:24:59 2009 -0600 Fix 3D labels. commit a8134f0235c78bcfd5e0ee33c29ea83435f03ff7 Author: John Bowman Date: Tue Jul 7 08:17:31 2009 -0600 Add bool targetsize=true to 3D label routines; this forces labels to be drawn with the size they would have on the target plane. commit 300c6a5cae091d3d2a19bff1281e427d7a63ea1e Author: John Bowman Date: Mon Jul 6 21:35:38 2009 -0600 Increment version to 1.81svn. commit 298d4a4c0f6977f75156b1fa1cc193f98acfcd8b Author: John Bowman Date: Mon Jul 6 18:06:06 2009 -0600 Reinstate missing prototypes under CYGWIN commit a6c3aa3f6efc2a7763af915820c4d685d86a9f0c Author: John Bowman Date: Mon Jul 6 17:56:40 2009 -0600 Work around missing RPC definition under CYGWIN. commit 7a144376d3b59c86200bde80aece8ef030628c5b Author: John Bowman Date: Mon Jul 6 17:23:08 2009 -0600 Simplify code. commit f1e5195414fa122338f7f5b6a0a46802e381e9d3 Author: John Bowman Date: Mon Jul 6 15:29:09 2009 -0600 Update asymptote.info in install-prebuilt because of version.texi dependency. commit 209f0b28ac03cac92aeafe3cc364ed1f4c2a7d4a Author: John Bowman Date: Mon Jul 6 14:49:09 2009 -0600 Optionally inform user how to ignore a warning. commit 364b416c18b21fd577e120049b7fab653789614d Author: John Bowman Date: Mon Jul 6 13:43:30 2009 -0600 Make array.default(j=n) delete only entry j. Add warn(string) and nowarn(string) functions, along with settings.warnings Change "PATH" to "LOCATION" in error message. commit bf38d58f02109603cde2ec398855503336524ec7 Author: John Bowman Date: Sun Jul 5 23:02:24 2009 -0600 Mention psview as a better (and free) alternative to gsview for MSDOS users. Update documentation. commit 61ee4dd906defef1def9c318c63029f73b0949c2 Author: John Bowman Date: Sun Jul 5 22:05:56 2009 -0600 Remove obsolete CYGWIN code. commit 166d080355b2116e9166f35082e38afc0ad2bb2e Author: John Bowman Date: Sun Jul 5 19:49:35 2009 -0600 Work around u_quad_t conversion conflict. commit 97282a7e1a0124bba438ebfd1c4a1b81000bde50 Author: John Bowman Date: Sun Jul 5 10:29:05 2009 -0600 Add virtual fields name, mode, line, csv, word, singlereal, singleint, signed to files. Simplify single precision and signed interface routines. commit 9344391260559032440ba5fa38921766990b4365 Author: John Bowman Date: Sun Jul 5 10:10:35 2009 -0600 Add comments. commit 0446ed011f40775e2e9010cff77dfa3935faf765 Author: John Bowman Date: Sat Jul 4 20:39:50 2009 -0600 Fix animations with global=false. commit 1673555daff75b238c2c976afa2666eb08dceb2e Author: John Bowman Date: Sat Jul 4 15:39:12 2009 -0600 Use pthread_join instead of pthread_kill. commit 4d6b4a43ac76fb1c65c073aa3243ad7c15cda627 Author: John Bowman Date: Sat Jul 4 14:29:24 2009 -0600 Minor simplifications. commit 24120285fa1793f743b133edd415adb838a21634 Author: John Bowman Date: Sat Jul 4 13:05:54 2009 -0600 Update to version 1.04. commit 5263c5d789b346f0ba21b70635fd36858f107cd9 Author: John Bowman Date: Sat Jul 4 12:20:09 2009 -0600 Initialize lighting only in home(). commit 577619db29e83abffb14066047d4e1c07666d75d Author: John Bowman Date: Sat Jul 4 12:08:30 2009 -0600 Don't use POSIX timers by default due to portability issues. Call home() before quit to return to idle state and reset parameters. commit 04ca8cf39cd39719e2e2c2763de50d31547e486c Author: John Bowman Date: Sat Jul 4 12:05:07 2009 -0600 Exit GUI gracefully. commit 900998e8de5169fe4b34171d0c35e25e24188d40 Author: John Bowman Date: Sat Jul 4 01:53:43 2009 -0600 Force zoom/menu to be unmodified. Update documentation. commit 5cbbe2af3a21be9c53bfba6e53d9965635571fd6 Author: John Bowman Date: Sat Jul 4 01:32:54 2009 -0600 Fix left-button zoom/menu binding bug. Add new settings zoomfactor, zoomstep, spinstep, arcballradius, resizestep, and doubleclick. Improve doubleclick emulation by adding a timeout (default 200ms). Re-instate default zoom/menu right-button assignment. commit b4a6fb7ee8a9762a4943bf36b271945ce9f4ea93 Author: John Bowman Date: Fri Jul 3 16:43:19 2009 -0600 Enable all warnings when debugging. commit b27871b40d04c6f0432d463605f068322797cd07 Author: John Bowman Date: Fri Jul 3 16:28:54 2009 -0600 Add setting warn that allows one to enable or disable warnings like writeoverloaded. commit d86192bf3218ef996b1332c5f677d9b33d9f7561 Author: John Bowman Date: Fri Jul 3 01:39:13 2009 -0600 Improve interace to routines for setting single precision mode: remove the unused x argument, distinguishing the integer case with a new bool signedint argument before the file. commit 54ec4309d401e90f8e745fc4507c965e46a438e9 Author: John Bowman Date: Thu Jul 2 11:39:13 2009 -0600 Fix TeXLive docdir. commit 7ff6aeba07712c52a90a1f0a1d43f52226cc3b34 Author: John Bowman Date: Thu Jul 2 01:54:52 2009 -0600 Increment version to 1.80svn. commit 42a9cf3fef6c93a45d7d29d9ec9a47afeee9b05c Author: John Bowman Date: Thu Jul 2 00:26:57 2009 -0600 Change default right mouse button assignment from zoom/menu to zoom. commit d8f72fba757ac4c79e0477456758eff09255f5cf Author: John Bowman Date: Wed Jul 1 22:00:57 2009 -0600 Fix docdir under TeXLive. commit 294dfcc007f8c2ac7aabd6291fe7f470e59dae27 Author: John Bowman Date: Wed Jul 1 18:23:47 2009 -0600 Remove unused code. commit 02a790536fcc5096f092e727b3b06588e8520bc1 Author: John Bowman Date: Wed Jul 1 16:32:52 2009 -0600 Add viewportshift support for orthographic projections. commit 819d97e9d7c772bdb813738091a62e80e4c96786 Author: John Bowman Date: Wed Jul 1 02:49:09 2009 -0600 Improve lighting. commit 2209e0017ac6de0a2c360cf1aa4968b15c9be702 Author: John Bowman Date: Wed Jul 1 02:31:58 2009 -0600 Revert orthographic projection and lastzoom changes. commit 8f194513a8e34ebd05a69e46bc3e51e1a16b1560 Author: John Bowman Date: Wed Jul 1 01:06:52 2009 -0600 Don't exit on keystroke-initiated export. Invert internal zoom variable. Add pan (in addition to viewportshift) action to native OpenGL renderer. Output all camera settings as a projection, including mouse actions (pan, rotate, zoom, viewportshift). For convenience, add a zoom argument to perspective and orthographic projections. Add < (shrink) and > (expand) keystrokes. Remove unused code. Remove viewportpadding in favour of viewportmargin. commit 3f698d4ed49b08345dcbacece53fd49c01d97c97 Author: John Bowman Date: Wed Jul 1 00:41:37 2009 -0600 Add operator != for 2D arithmetic arrays. commit 92538e0221579d5c0de78c6042821228116231ab Author: John Bowman Date: Wed Jul 1 00:32:48 2009 -0600 Change integrate routines to output all computed values. commit 6ec413ee850ab4265101513015c1e273df83cff1 Author: John Bowman Date: Sat Jun 27 01:01:04 2009 -0600 Fix perp vector calculation. commit e0cb104ae79f0a46cf76d9d5ec7809d306639629 Author: John Bowman Date: Fri Jun 26 19:21:52 2009 -0600 Reset mouse motion function. commit 82c867354368193d5c3608ae445a8b5c5789d2d5 Author: John Bowman Date: Fri Jun 26 15:52:42 2009 -0600 Fix segmentation fault in operator == (real[][], real[][]). Add operator == (T[][], T[][]) for all builtin arithmetic types. commit d6342c43770749cf0bce45d9d3b5cb281eb99f84 Author: John Bowman Date: Fri Jun 26 00:19:00 2009 -0600 Use $TEXMFCONFIG/asymptote for configuration directory under TeXLive. commit 1745a978c038676dbc229c8c77d3e4b62be7ce5d Author: John Bowman Date: Thu Jun 25 23:42:49 2009 -0600 Remove unused code. commit b6aeddce1a4a386d0409c82b740676ac69deff69 Author: John Bowman Date: Thu Jun 25 02:51:31 2009 -0600 Remove etc/fstab kludge for cygwin 1.7 since it is no longer needed. commit baa70f8bb1dc3c4eab341e7146ade449107fc261 Author: John Bowman Date: Thu Jun 25 01:27:33 2009 -0600 Add E_RK2, E_PC, E_RK3BS exponential integrators. Fix dynamic timestepping; simplify logic. commit 0ebf258b96ffcbbafbdff7523e76fc87831fb3eb Author: John Bowman Date: Wed Jun 24 16:03:23 2009 -0600 Increment version to 1.79svn. commit 5f8b5d48f01b08a8a9d4b5023fdf3aa42f41a1b9 Author: John Bowman Date: Wed Jun 24 13:16:28 2009 -0600 Fix title message (assuming zoom/menu button is unmodified). commit e603921a16b1811549054a010a13f69290411539 Author: John Bowman Date: Wed Jun 24 12:26:15 2009 -0600 Fix align. commit 654514e6bdaf56f21c36339256a6d07dcd504b54 Author: John Bowman Date: Wed Jun 24 12:11:02 2009 -0600 Update documentation. commit 22de6a78ac81daa6ef71fb3f2ed9a4642d7f291c Author: John Bowman Date: Wed Jun 24 11:24:54 2009 -0600 Add support for generating syntax highlighting for the KDE editor Kate. commit 6a083b4d39be153629958a5ff55a3c767f5733af Author: John Bowman Date: Wed Jun 24 11:17:55 2009 -0600 Remove redundant redundancy. commit 36067c1c8840510dc685b4e2582b20e6b645a9e2 Author: John Bowman Date: Wed Jun 24 11:04:49 2009 -0600 Change exit to exit /b (end currently executing batch file). commit ed4b675bce60a1342259cc7c76c67c2c4863f5c7 Author: John Bowman Date: Wed Jun 24 01:54:43 2009 -0600 Implement customizable mouse bindings. commit 1bf2cc08b2c6fca676d231f19e12047c330af170 Author: John Bowman Date: Tue Jun 23 10:15:33 2009 -0600 Use --no-warn option for portability. commit 5441bf90562e8bd0893187540b7d9c838d9485d9 Author: John Bowman Date: Tue Jun 23 03:12:03 2009 -0600 Fix interactive exports. commit b2096edd14a4c809c5092c3256a9c21a53ad158c Author: John Bowman Date: Mon Jun 22 21:23:59 2009 -0600 Increase textwidth and textheight. commit 0151aeea0ad3e944cb2a85a98f10410136f6b7e9 Author: John Bowman Date: Mon Jun 22 13:31:48 2009 -0600 Fix configure --disable-gc. commit 94d5833448064e77a56eadaa5e9a7d70db93682d Author: John Bowman Date: Mon Jun 22 11:48:21 2009 -0600 Fix thread locking. commit 32b9f044fe320f369fab6298993d58f7a01b123a Author: John Bowman Date: Mon Jun 22 07:59:23 2009 -0600 Make the install-prebuilt target omit texhash. commit 018a27c40169212efd9a5edaaa0f2ab571dc355e Author: John Bowman Date: Mon Jun 22 01:27:24 2009 -0600 Clean up patch. commit d4080b995a74b931500406776d4f4d4432973156 Author: John Bowman Date: Mon Jun 22 01:21:28 2009 -0600 Add patch to allow version 2.6.0-rc1 of freeglut.dll to be built under CYGWIN. commit 50b871d00e47490ecbf785c4db1ab712f063bbce Author: John Bowman Date: Mon Jun 22 00:08:19 2009 -0600 Update xasy for Python 2.6.2 and Imaging-1.1.7b1 (which requires no alpha support patches). Remove obsolete patches. Delete obsolete _imagingtk.pyd file. commit 047ceae3c82d49179c08c1ee323d055952c33af5 Author: John Bowman Date: Sun Jun 21 21:24:26 2009 -0600 Prebuilt png files are not included in the CTAN distribution. commit 922d180aa5b5a3ed56cb850007918f2efc1fe3a3 Author: John Bowman Date: Sun Jun 21 12:26:28 2009 -0600 Add missing miterlimit defaults. commit 4aa9693a0386de7f1580d454d460704a98fd9238 Author: John Bowman Date: Fri Jun 19 17:00:10 2009 -0600 Fix mesh mode. commit e34f3e923ba80aa782451d911fbf7ae4f84c307e Author: John Bowman Date: Fri Jun 19 14:39:49 2009 -0600 Add constructors to derived class example. commit 41766c990e17098a8cddfef307378b78614b66e8 Author: John Bowman Date: Fri Jun 19 14:38:37 2009 -0600 Turn off fsal when dynamic=false. Implement E_Euler. commit 990cd520d39bc752ddcac2113d73896385d888a0 Author: John Bowman Date: Fri Jun 19 09:42:23 2009 -0600 Respect linegranularity. commit 14b88602c73f89f0e6a1a2a812836e52e1e0c04c Author: John Bowman Date: Fri Jun 19 09:41:23 2009 -0600 Swap patch and wireframe modes. commit d7c0e9cf1059d90b2c299b27a3d5e3dd2bacc9d5 Author: John Bowman Date: Fri Jun 19 02:37:44 2009 -0600 Increment version to 1.78svn. commit 0c7c91aff000df37072d06044eae2a4fbfdeb56a Author: John Bowman Date: Fri Jun 19 00:53:54 2009 -0600 Document the ode module. commit d1487e6a488f103fd1ff8c86374e58ef1fd4a253 Author: John Bowman Date: Fri Jun 19 00:47:08 2009 -0600 Set viewportmargin=(1,1) in asymptote.sty. Reinstate ceil. commit ba9b67360690d9740adec086c7403ebbf553c095 Author: John Bowman Date: Fri Jun 19 00:45:07 2009 -0600 Update examples. commit d09775d77bf8817ff575d5a26846fbe2110dd50e Author: John Bowman Date: Thu Jun 18 23:30:24 2009 -0600 Implement splined parametric surfaces, based on contribution of Olivier Guibe. commit ce0ad38b305467f0be86836f251d05b0e725a813 Author: John Bowman Date: Thu Jun 18 22:14:48 2009 -0600 Move SIGQUIT earlier. commit ba2a10e95110ee21b2ec273f6e818cc3c0d3a9a7 Author: John Bowman Date: Thu Jun 18 13:48:59 2009 -0600 Remove periodicity check. commit 21b8d67ce07068b361b5abde7107e68304c8e90d Author: John Bowman Date: Thu Jun 18 13:47:22 2009 -0600 Allow different splinetypes in x and y directions. commit 3d3cda1c67371d74998e7df82eb20c4a531be575 Author: John Bowman Date: Thu Jun 18 13:41:12 2009 -0600 Implement FSAL. commit b04da8ad640e088b45cda90625ddf627d644dfdd Author: John Bowman Date: Thu Jun 18 11:28:41 2009 -0600 Implement dynamic time stepping in ode solver. commit 37a0bd8edd843af4e5f8a0fd21ee7ccd37aa6393 Author: John Bowman Date: Wed Jun 17 21:01:13 2009 -0600 Rename --enable-tetex-build to --enable-texlive-build. commit 33fc6ac3ac7e4ad765857c90a3249317a5a26727 Author: John Bowman Date: Wed Jun 17 11:48:42 2009 -0600 Fix autoformat. commit 9612543cc986922931b5a9c8e7bce1c9f048e85f Author: John Bowman Date: Mon Jun 15 05:06:13 2009 -0600 Simplify sysdir code. commit 60a13352e45a5fc394fecea4ba3084b6046e98b5 Author: John Bowman Date: Sat Jun 13 20:54:06 2009 -0600 Strip both LF and CR from kpsewhich commit 6bb98b13f6c2ae4fbadcae8fd2e33754e5351d15 Author: John Bowman Date: Thu Jun 11 20:04:26 2009 -0600 Reinstate viewportfactor. commit 5673458038d38cca8a78acd20b7d7925a44a33b0 Author: John Bowman Date: Thu Jun 11 19:57:21 2009 -0600 Autogenerate default steps. commit 311820988be14d9768e51e62481b06a21d1a605f Author: John Bowman Date: Wed Jun 10 23:41:31 2009 -0600 Set default viewportmargin back to (0,0). commit 2ed3a262adfb64aa2e0a8ef76b78df1e8ffeb186 Author: John Bowman Date: Wed Jun 10 22:45:06 2009 -0600 Rename textoutputtype to textoutformat for consistency. commit bfef6452bad58edfcb2ec41d2bf6d115d5f338e7 Author: John Bowman Date: Wed Jun 10 22:43:53 2009 -0600 Fix reference sizing. commit d05eaaa0ada2d34baeb6a95971206d8dff7fbae6 Author: John Bowman Date: Wed Jun 10 09:42:13 2009 -0600 Fix path3 label alignment. commit 4ee8e0a4d442b6a3ff44fb26776700c5896ec9e8 Author: John Bowman Date: Wed Jun 10 08:04:35 2009 -0600 Fix path3 label alignment. commit ad3568f30b3c97a178095abbf1bff15d1733ce21 Author: John Bowman Date: Tue Jun 9 22:16:39 2009 -0600 Package asy-faq.info.gz. commit 505e12fc8c3bc083f7b52e4c1fc63da6738a5c61 Author: John Bowman Date: Tue Jun 9 21:59:58 2009 -0600 Fix typo. commit e525233fe9a8ee7f0b85b67b50a431cd7a0e7d50 Author: John Bowman Date: Tue Jun 9 21:37:17 2009 -0600 Fix Jacobian. commit 2774d683cc021bad58908387673e54e74ac5570c Author: John Bowman Date: Tue Jun 9 21:18:19 2009 -0600 Move real[]*real[][] to C++ code. Simplify ode module. commit 8a7825f0c4aaae85c01afde00b44a45bd027dde7 Author: John Bowman Date: Tue Jun 9 15:12:29 2009 -0600 Update ode module; extract example. commit 915c133a834355d84847c12360d23bfd01a260bd Author: John Bowman Date: Tue Jun 9 15:10:59 2009 -0600 Fix bug found by Olivier in surface(real[][] f, real[] x, real[] y). commit 22661b59d1018e9b0e6e3d0e730300028377448d Author: John Bowman Date: Sun Jun 7 21:53:40 2009 -0600 Uninstall asy-keywords.el. Update slidedemo. commit 25e8d964eb1cf998cc4c98ff83dcb4ece29707ff Author: John Bowman Date: Sun Jun 7 21:32:37 2009 -0600 Fix build error. commit 159bd8ffceef0180106cef6990bca3276933571e Author: John Bowman Date: Sun Jun 7 20:53:31 2009 -0600 Fix spec file. commit d094315883306c562b7f750dc25010156cad487e Author: John Bowman Date: Sun Jun 7 20:36:06 2009 -0600 Update info location. commit ecb90813a16f7b4a58a7bed4d601848832595e2f Author: John Bowman Date: Sun Jun 7 20:11:06 2009 -0600 Clean up info installation: make install installs info files without png images, make install-all installs info files with png files. commit 06062a8fc1853f82e73e013ac1e18f57f6a48bd5 Author: John Bowman Date: Sun Jun 7 16:51:01 2009 -0600 Install png files with asymptote.info in directory info/asymptote. commit ad20ea83e4eab6b5b25bb80bb8e47031522d90be Author: John Bowman Date: Sun Jun 7 14:36:36 2009 -0600 Install asymptote.info before asy-faq.info so that info asy accesses asymptote.info. commit 40087a5149d47d3e8c2be6e1c47bfc6c88cf8ef4 Author: John Bowman Date: Sun Jun 7 07:52:49 2009 -0600 Resolve ambiguity. commit cd1b5851efd15b8dd7d3cd356bf1d718e0dfa430 Author: John Bowman Date: Sun Jun 7 07:31:41 2009 -0600 Fix mintimes and maxtimes for arbitrary length paths. commit 03075fc3e8a82616ec1bb37798886f38e5cba18e Author: John Bowman Date: Sun Jun 7 07:11:07 2009 -0600 Make format return TeX compatible output only in math mode. commit 57ec1bdc6a61f1f22cafe24b083e410d8eaa3a32 Author: John Bowman Date: Sun Jun 7 06:18:43 2009 -0600 Add Levenberg-Marquardt nonlinear fitting routine, contributed by Philipp Stephani. commit 54db4707a1384f7c0213ca8cce72c0ecca8c19b3 Author: John Bowman Date: Sun Jun 7 06:10:56 2009 -0600 Fix maxtimes for paths where maximum occurs at the endpoint. commit 529869410ebcf3f2f739905d29fc8609055350b4 Author: John Bowman Date: Sat Jun 6 19:09:43 2009 -0600 Improve viewport padding. commit ce41184dee54dc485233ca5c1d4419312bdc5b6d Author: John Bowman Date: Sat Jun 6 09:26:30 2009 -0600 Add links to manual in error message. commit 2e9b064755c3100618bc250ec3b9c370d4a5f917 Author: John Bowman Date: Sat Jun 6 07:52:40 2009 -0600 Add preliminary ode module (untested). commit 1efc68359d7b866f90fba010d2d0fa128de447f6 Author: John Bowman Date: Fri Jun 5 23:47:42 2009 -0600 Increment version to 1.77svn. commit 30fbcf86352e77111c8945011c6bd4bac6ea5a9a Author: John Bowman Date: Fri Jun 5 21:23:37 2009 -0600 Remove texunits (not required). commit af97e49cf8ba73773b2b046529a087179d0d1651 Author: John Bowman Date: Fri Jun 5 21:06:43 2009 -0600 Don't split info files. commit c1a37b437ed1d69d54a1a220be9ea6abb8ac77fc Author: John Bowman Date: Fri Jun 5 20:45:25 2009 -0600 Fix bezulate bug: determine the number of intersections of a path with a line segment directly from the intersections routine. commit c55988dc43897d11d1dc946d23f2c1feb28406b9 Author: John Bowman Date: Fri Jun 5 07:36:55 2009 -0600 Fix typo. commit de2e5ed576d69cfc05ce24b0b8409d2deb21fa8f Author: John Bowman Date: Fri Jun 5 07:06:37 2009 -0600 Restore example. commit dca1b761f0da78fa587725c9f7b9fd2b1782714d Author: John Bowman Date: Thu Jun 4 10:42:35 2009 -0600 Rename inside(int,pen) to interior(int,pen). commit 951e4508787b46b77a53977092ac68203d43eb04 Author: John Bowman Date: Thu Jun 4 10:41:19 2009 -0600 Suppress "cannot find an interior point" warning for degenerate paths. commit bb3f9003a5dd35c528661cb9af8d0aabea64ae47 Author: John Bowman Date: Wed Jun 3 23:19:05 2009 -0600 Implement addAllViews function to exhibit all six standard 3D views. commit 67330fd087eeff0f55154ff4a76e7dc42b19f3c1 Author: John Bowman Date: Wed Jun 3 21:36:49 2009 -0600 Rename adobe light to White; update parameters to agree with PDF32000-1:2008. Add ambient light to Headlamp (other parameters in PDF32000-1:2008 appear to be incorrect). commit a0f189d40ebb7ca2b5e6d8a6e234f3cacf2583ba Author: John Bowman Date: Wed Jun 3 12:55:50 2009 -0600 Turn off light in certain examples to avoid confusion. commit 1b2cfce2ef63671c968f410cf09595e765fd4f49 Author: John Bowman Date: Wed Jun 3 12:48:50 2009 -0600 Fix filename for attach=true mode. Add hiresbb option to includegraphics. commit 688c7c03a9b2a3fa1a4df1091c876cbb6abf3b7b Author: John Bowman Date: Wed Jun 3 12:21:11 2009 -0600 Improve texpath resolution by preshifting. commit d63b55ee4d35163c186d82a686c129c6bac564c5 Author: John Bowman Date: Wed Jun 3 12:02:54 2009 -0600 Make fontsize package conditional on latex(). commit 590f94b98bd139a090dc44116f7aaa783ede1fbf Author: John Bowman Date: Wed Jun 3 12:02:29 2009 -0600 Improve texpath caching. commit 151f07527b00cf79ebb87088d2322dccf1940a69 Author: John Bowman Date: Wed Jun 3 12:01:42 2009 -0600 Fix degenerate transform3. commit 30479826115232ebca80f5fb15fed4186889e443 Author: John Bowman Date: Wed Jun 3 01:50:28 2009 -0600 Add real[] texsize(string, pen=currentpen) command returning raw TeX dimensions {width,height,depth}. commit f75bbab5748fa346edc8c667d02a150ed1b6e0eb Author: John Bowman Date: Wed Jun 3 01:46:42 2009 -0600 Add missing ps2tex scaling. commit 69ab0d6f5d9f0ec4dada3b38ca109e498ee97b0c Author: John Bowman Date: Wed Jun 3 01:45:14 2009 -0600 Make texpath aware of baseline for PDF tex engines. commit 2de4ef194157962c1deedd5617f95dd25b926e69 Author: John Bowman Date: Wed Jun 3 01:42:23 2009 -0600 Simplify alignment. commit e546aac7b42fcac76b3ab656a227642c57517831 Author: John Bowman Date: Tue Jun 2 12:02:03 2009 -0600 Remove unwanted assignments. commit fd784f824ab52137ccc868762c3c23d6f271d4ec Author: John Bowman Date: Tue Jun 2 11:33:59 2009 -0600 Tune headlamp parameters. commit 01e9e6105d2e0c05890a0d3580ce7169657e781e Author: John Bowman Date: Tue Jun 2 11:33:38 2009 -0600 Tune alignment between rendered and PRC images for perspective projections. Fix angle for absolute projection rendering. commit f88101c29df7754a09d0ecc8ee38306032f9fc90 Author: John Bowman Date: Tue Jun 2 10:26:20 2009 -0600 Add headlamp light that approximates 3Dlights=Headlamp. commit 5dd7890aea6db356e0dec4ef687a34dde0d19087 Author: John Bowman Date: Tue Jun 2 01:28:17 2009 -0600 Add hiresbb option to graphic. Remove 2 pixel offset. commit 4dcddca90a911b349f0b8fa3c543cd1adc2282fc Author: John Bowman Date: Tue Jun 2 00:37:23 2009 -0600 Improve rendered and PRC alignment. commit 50388eca0e09c1824b0c134e074a669a9a3d9fa0 Author: John Bowman Date: Mon Jun 1 21:57:28 2009 -0600 Handle holes in surface constructor for superpaths when planar=true. commit 8181e3eebc72966d7e53aa0eb954d53800c25329 Author: John Bowman Date: Mon Jun 1 17:18:19 2009 -0600 Add support for OCG layers. commit eedc3f6fd635d411e871a006356e23e6f90b3866 Author: John Bowman Date: Mon Jun 1 02:43:51 2009 -0600 Increment version to 1.76svn. commit 3566c16a88c716b8f890720759369535a285568c Author: John Bowman Date: Mon Jun 1 00:04:03 2009 -0600 Fix target. commit 32bc3480d0dafe6d475bc5fcb903e07f2e7929ee Author: John Bowman Date: Sun May 31 23:35:47 2009 -0600 Update example. commit c1779f47cb6199df3ea6ba88ef12f3d5c8f4ed53 Author: John Bowman Date: Sun May 31 23:06:06 2009 -0600 Add install-prebuilt target for CTAN distribution. commit f824133509041975553fbe67bf2576b850eb6e5f Author: John Bowman Date: Sun May 31 13:15:28 2009 -0600 Increase fuzz. commit 7122c68b5919d0df45897d20ef6c438a9dc5352e Author: John Bowman Date: Sun May 31 12:01:15 2009 -0600 Revert inadvertent commit. commit d8db8f2edc64c08980988ff6b6edfb783a0a3011 Author: John Bowman Date: Sun May 31 11:59:17 2009 -0600 Fix missing documentclass when texpath is used in inlinetex mode. commit e6cdcb7915197c4cbf1b58855fe76b2d7bcf4f02 Author: John Bowman Date: Sun May 31 11:11:40 2009 -0600 Workaround missing -output-directory option in ConTeXt (current directory must be writeable). commit 6de2ae1ddd58a49734914c967c1d5977ea717cfd Author: John Bowman Date: Sun May 31 10:20:19 2009 -0600 Implement alternative workaround, suggested by Hans Hagen, for ConTeXt switchtobodyfont alignment bug in TeXLive 2008. commit 93e3d78fe71baf37b0fe4d0ae2c716151420af19 Author: John Bowman Date: Sun May 31 10:09:14 2009 -0600 Add --disable-readline and --disable-fftw. commit 285d415e65b9c7c7d79c157d663bb694e286fb75 Author: John Bowman Date: Sun May 31 09:59:40 2009 -0600 Remove font encodings by default. commit 75d01e891bd976179c94a5185d1d8662c1ed5215 Author: John Bowman Date: Sun May 31 01:25:55 2009 -0600 Remove troublesome --purgeall context option (ignored in TeXLive 2008; leads to bad argument #1 to 'match' error with ConTeXT Minimals). commit 9f679ed5eaf47ddb46a546ee4714cbf1634472db Author: John Bowman Date: Sun May 31 01:14:21 2009 -0600 Clean up epilogue. commit bd97f792724d80ed2c53bef9258ce8b31c2c2208 Author: John Bowman Date: Sun May 31 01:13:23 2009 -0600 Fix aspect ratio calculation; tighten anglefactor. Improve viewportmargin handling. commit 0fa9327d407c403447e55b032116c65d25671ce3 Author: John Bowman Date: Sun May 31 00:46:12 2009 -0600 Remove GCLIB_CHECK. commit f06c75435421cee3d1faa1e188fbcb7dc2fc5ad0 Author: John Bowman Date: Sun May 31 00:33:09 2009 -0600 Handle cusps. commit 298d8aa536f119456adb7d9aacab28c81383048d Author: John Bowman Date: Sat May 30 21:54:39 2009 -0600 Remove unused file. commit 8237ff1025cbcd4ac4c60248d8419dfdf01c97a2 Author: John Bowman Date: Sat May 30 10:47:00 2009 -0600 Return a sorted array from intersections(path3, surface). Add intersectionpoints(path3, patch) routine. commit 17c2e0d5cd9f62e569f86292d54c19c932df9014 Author: John Bowman Date: Sat May 30 10:37:10 2009 -0600 Fix intrapatch duplicate point removal in intersections(path,surface). commit 0e14bb76c839af345f01f53d03b69815cab68dd1 Author: John Bowman Date: Fri May 29 09:20:50 2009 -0600 Remove unused interface. commit 957ccc0b6b052f2f86e1957565b7b58cbcf6b96a Author: John Bowman Date: Fri May 29 09:14:39 2009 -0600 Add usetypescript[modern] to texpath. Adjust anglefactor. commit d5509c68aa53526375b640b9a24f271e0f966111 Author: John Bowman Date: Thu May 28 22:36:28 2009 -0600 Add missing brace for context miniprologue used by texpath. commit ad7435c09d8c7e2df18578e5f9f90d33b8827d7c Author: John Bowman Date: Thu May 28 03:26:53 2009 -0600 Increment version to 1.75svn. commit b9d350961270dc36ce7ab75592d4bfe490c071cd Author: John Bowman Date: Thu May 28 01:57:37 2009 -0600 Fix help command under MSWindows commit 43c90a558d3a412fae71a0415d301561907409c2 Author: John Bowman Date: Thu May 28 00:56:30 2009 -0600 Improve appearance of cube example. commit 64adc5adecdcbae9502cb8d38001b2c2ae2db935 Author: John Bowman Date: Thu May 28 00:33:43 2009 -0600 Increase anglefactor. commit be0e2eba11df9da38e068ed6e204677b201b148c Author: John Bowman Date: Thu May 28 00:14:35 2009 -0600 Fix assert; increase fuzz. commit e7fffb6e11f4b61fd3f773cc50db58aa200a8ed3 Author: John Bowman Date: Thu May 28 00:00:27 2009 -0600 Disable PRC output when using ConTeXt engine (due to lack of movie15 equivalent). commit 60223b2f21e367183929a06cea8d11070e302420 Author: John Bowman Date: Wed May 27 23:37:13 2009 -0600 Fix incorrect auxiliary control point in surface bounding box routines. Add path/surface intersections and intersectionpoints routines. commit b8a100ec8889686eaaf69f40ea233d3553903754 Author: John Bowman Date: Wed May 27 10:16:32 2009 -0600 Fix packaging. commit ea25f68f0f294a2568a906ca87832e258c9c1e82 Author: John Bowman Date: Wed May 27 09:47:32 2009 -0600 Package conTeXt files. commit d359199885c11fcea6782cba8fa0d36fb42e47b1 Author: John Bowman Date: Wed May 27 09:30:15 2009 -0600 Revert 1.74-15; ensure consistency of circle and arc. commit 8c8046a93712185098c044acddac237195dcc4d4 Author: John Bowman Date: Wed May 27 08:44:56 2009 -0600 Fix RPM build. commit b4e1016d05067f31015761b7adb00906ef3adeef Author: John Bowman Date: Tue May 26 23:21:51 2009 -0600 Fix diagnostics. commit fa41eae215f40b4938920a1e95b779a2297c6894 Author: John Bowman Date: Tue May 26 22:56:39 2009 -0600 Remove ambiguity in font commands. commit 5b38029712b4a67a372b523f3d9a67fc18fc806d Author: John Bowman Date: Tue May 26 22:55:34 2009 -0600 Increase duplicate fuzz to work around font errors. commit 812e5a12484ed78bb6044716e6aea84c033b3f97 Author: John Bowman Date: Tue May 26 17:57:11 2009 -0600 Add portability fix. commit 51d2a997b312453016f6884b19b2d7bea980c2cd Author: John Bowman Date: Tue May 26 17:46:56 2009 -0600 Remove unused enums. commit dc714bd68848faec6f421b88b7da89bd5020f447 Author: John Bowman Date: Tue May 26 08:23:49 2009 -0600 Fix enum. commit c22bce6986019495a36f2e49be622fd38a1e5161 Author: John Bowman Date: Tue May 26 08:21:02 2009 -0600 Fix preprocessor command. commit 2cf616475d6267d764e0d7debc9fd836139b9f10 Author: John Bowman Date: Tue May 26 02:52:25 2009 -0600 Enable non-PRC 3D context support. commit 71ba0d87410db1ecf377b60f231783759e8cee40 Author: John Bowman Date: Tue May 26 02:25:39 2009 -0600 Support context engine in _texpath; clean up files. commit 1d10efc8ee0c9818eb00d4a46bb46fb023329483 Author: John Bowman Date: Tue May 26 01:30:46 2009 -0600 Cleanup temporary context files. commit c5f46b343da8ea10be2bee947c89a30e962cf793 Author: John Bowman Date: Tue May 26 01:12:05 2009 -0600 Normalize direction. commit 353cf76c084a812c558ef67460009cc5e818e1a7 Author: John Bowman Date: Tue May 26 00:16:53 2009 -0600 Workaround possibly broken header file on i386-solaris with g++ 3.4.3. commit f9494ca94993529747ced00a109516b16dfd159d Author: John Bowman Date: Mon May 25 23:58:24 2009 -0600 Force child to exit when pipe is closed. commit cdadd335d339ff8f9e0140ff5bb20a6aa9a918c9 Author: John Bowman Date: Mon May 25 11:01:50 2009 -0600 Prevent double waiting in pipeclose(). Support PDF tex engines in texpath. commit de43da1d463274e3d8cac3e32b25ed159fabf72b Author: John Bowman Date: Mon May 25 07:18:45 2009 -0600 Don't issue \usemodule[pictex] in inlinetex mode. commit 090c0c4ae9cb651aac3897930554703d610d6504 Author: John Bowman Date: Sun May 24 22:25:12 2009 -0600 Handle zombies in pipestream without using a wrapper, so that one can detect whether the child process has terminated. Simplify, _texpath, textpath, and _strokepath. commit 6015d4b9944ca08604ec775dbbf92f2b4e0fd0b5 Author: John Bowman Date: Sat May 23 22:47:30 2009 -0600 Fix initial context pen. Add usetypescript convenience function. Protect context switchtobodyfont with gsave/grestore to prevent misalignment if font is not found. Improve description of -v option. commit 95a573ec7fe5269f21b844bcd06d710f05172e09 Author: John Bowman Date: Sat May 23 22:44:43 2009 -0600 Fix ylabel rotation. commit cf29666c9accb9fc112877b066d251e7b4e20d0b Author: John Bowman Date: Sat May 23 21:07:40 2009 -0600 Implement a better workaround for lack of a context interactive mode that does not rely on the existence of a null.tex file. Use context-style command-line options. commit 8e1ea31d005c1ab1075befa5f631a7f7dda171c4 Author: John Bowman Date: Sat May 23 11:18:01 2009 -0600 Fix man page generator. commit 0c4c6ee7d904d48e7d22d421c37e2ca920793c1d Author: John Bowman Date: Sat May 23 08:11:52 2009 -0600 Add colo-asy.tex file (contributed by Mojca Miklavec). Remove base/asy-keywords.el in favour of asy-keywords.el. commit f45daa6be9a492d5eed7429d007eff5cde05d4fa Author: John Bowman Date: Fri May 22 18:24:14 2009 -0600 Add unitoctant example. commit b2d3c2f5205169dbbb4200bcb343f0cef4ca3472 Author: John Bowman Date: Fri May 22 14:20:05 2009 -0600 Allow draw(nullpath3,linewidth(0)). commit f45dc9b07cb323314e7ceed18fff87b2a2b185b0 Author: John Bowman Date: Fri May 22 14:09:15 2009 -0600 Use only 2 nodes for arcs of no more than 90 degress. commit 33b2d5403b74c7574e68eaf04ad5b23c1ff2cd3c Author: John Bowman Date: Fri May 22 09:05:16 2009 -0600 Remove unneeded \bye in context support. commit 16ca066028ac8beb816f71d79ce36224f697c285 Author: John Bowman Date: Thu May 21 13:40:02 2009 -0600 Add LeftView, RightView, FrontView, BackView, BottomView, TopView, along with addViews function. commit f3bfaf748a3c0c78faef4cc4728a2b58fa8cd084 Author: John Bowman Date: Thu May 21 01:01:24 2009 -0600 Add example of baseline alignment. commit 90447658740c8e3e3f2dee522cc8b40f6ea0eb64 Author: John Bowman Date: Thu May 21 00:32:14 2009 -0600 Add support for ConTeXt tex engine. commit 558d0dc299421448f3c766ef6bba6b232fad900e Author: John Bowman Date: Wed May 20 19:24:38 2009 -0600 Updates to facilitate TeXLive builds. commit d31c84a64a6fe3dfbb382146a3bc3da22a40e57f Author: John Bowman Date: Wed May 20 00:48:02 2009 -0600 Update example. commit 24544283d531ef68ec5e60f00f106a787f6f7c06 Author: John Bowman Date: Wed May 20 00:03:34 2009 -0600 Add example showing how to render multiple views of the same picture. commit 86b24f2d4bfc4fbda1ce380030333643257bf2f9 Author: John Bowman Date: Tue May 19 23:53:39 2009 -0600 Simplify code. commit 59e65e542e7ec1f41cb53901e70e775f497327c3 Author: John Bowman Date: Tue May 19 23:49:09 2009 -0600 Remove dependence on currentprojection in label(Label, path3). commit 0b05f066e9754a6f541eaa504d09ef74f0d8d29a Author: John Bowman Date: Tue May 19 23:36:08 2009 -0600 Fix another BUILD problem. commit 2602e4b69e66d6f6965c0b9bd9b615bb5ba7713c Author: John Bowman Date: Tue May 19 22:50:14 2009 -0600 Fix build problem. commit 116046ccd5021691f08ae7ccddb76fc8532d8a3a Author: John Bowman Date: Tue May 19 21:29:58 2009 -0600 Remove symbolic links from source distribution. commit 9dd0993b5ad92887deb26496feaef22a6f67d590 Author: John Bowman Date: Mon May 18 23:08:58 2009 -0600 Add enable-gsl[=yes] and enable-gl[=yes] options. Use AS_HELP_STRING. commit afa93385a431d6e72638f2f57f04d2b6c2ee3506 Author: John Bowman Date: Mon May 18 22:47:55 2009 -0600 Fix distclean. commit 8adcdf72dec255e5e274695e507ba8b31a84336c Author: John Bowman Date: Mon May 18 11:08:59 2009 -0600 Increment version to 1.74svn. commit 4da7a1c804c037540abd25ef486a64dee62a1f25 Author: John Bowman Date: Mon May 18 11:08:23 2009 -0600 Revert last change. commit b9d6c02e6b78638ff4fe7fedb7a2fa065188bfe8 Author: John Bowman Date: Mon May 18 11:06:44 2009 -0600 Fix version number. commit bbe2c51e864af5644239ad84154105f578bca363 Author: John Bowman Date: Mon May 18 02:02:35 2009 -0600 Allow sysdir to be overridden on the command line. commit 4ace450116e7a640bb3af9a63cde979a336c380b Author: John Bowman Date: Mon May 18 00:52:28 2009 -0600 Fix texlive build under MSWindows commit 9b6a907ccafb7302f1359292216d397b1d070118 Author: John Bowman Date: Sun May 17 23:10:36 2009 -0600 Support user-specified background color in OpenGL renderer via light constructor. commit 8dab38cc5bfe6e3e9432dc703cd029fc1f362710 Author: John Bowman Date: Sun May 17 21:18:17 2009 -0600 Add textinitialfont environment variable. commit fe2963bd48d61b8e25678fff009ee1e6e345e963 Author: John Bowman Date: Sun May 17 11:41:49 2009 -0600 Call reportFatal in psfile.close(). commit 36a3a976a948d7bd0fa1b80892c43c27ed3370d9 Author: John Bowman Date: Sun May 17 11:22:56 2009 -0600 Don't return after reportError. commit 3a3c79a4ff96d642d776958a562722e3770e73be Author: John Bowman Date: Sun May 17 11:08:10 2009 -0600 Add warn=true arguments to polar, azimuth, colatitude, and latitude. commit dd275da9bd3518b49dd7ac6ecfadb711c5cdf333 Author: John Bowman Date: Sun May 17 01:18:07 2009 -0600 Set default font to groff 12pt Times Roman when settings.tex="none". commit 7a468b6214aa524c6d6039b04f020c750b29ee11 Author: John Bowman Date: Sun May 17 00:52:19 2009 -0600 Add pen support to textpath and example. commit 89c81090b6adbfd7042b48c9890a305a4f4fcc29 Author: John Bowman Date: Sun May 17 00:49:39 2009 -0600 Fix segmentation fault after mode error. commit 5d7c2961040fb175ac01a159a6d86a9f0ef005de Author: John Bowman Date: Sat May 16 23:10:29 2009 -0600 Add textpath command, contributed by Michail Vidiassov. commit f7cbb093bdcd366d04f80896c158971b75a4ecd7 Author: John Bowman Date: Sat May 16 15:21:49 2009 -0600 Update links. commit de1e093f4893ba663f0b309c8684cfdea1cf86c6 Author: John Bowman Date: Sat May 16 10:16:47 2009 -0600 Restore example. commit 3ffc18a55c28366bbbe0e955a24d0858eb1da9d8 Author: Philippe Ivaldi Date: Sat May 16 08:04:32 2009 -0600 trembling.asy: change licence GPL to LGPL. commit 50267997b1e79f1e73026d6e22d735702518e589 Author: Philippe Ivaldi Date: Sat May 16 05:07:49 2009 -0600 geometry.asy: put the compatibility routines commit 37f8df82bea245b18f31a1d742183658313d93ec Author: Philippe Ivaldi Date: Sat May 16 04:52:59 2009 -0600 Fix minor bugs in geometry.asy. Change licence GPL to LGPL. commit 9250b2cb1117934330629dde9bd798898ead99de Author: John Bowman Date: Sat May 16 01:23:23 2009 -0600 Use center=false by default again for orthographic projections. Improve vectorfield routines. Update documentation and FAQ. commit bfa1eaa3e77972c199c5edfd75d410e94d35545d Author: John Bowman Date: Fri May 15 14:32:28 2009 -0600 Respect autoadjust=false. Remove autoadjust parameter from orthographic projections. Center target by default, unless autoadjust=false. commit 3f85494877f2c44aa49fe86f97de42f90bd4b31e Author: John Bowman Date: Fri May 15 08:55:36 2009 -0600 Update documentation of shipout. commit 9ac317ffb071d94af2c82b37225dd18497cdda86 Author: John Bowman Date: Fri May 15 08:31:21 2009 -0600 Increment version to 1.73svn. commit 1f773a2f0aaf702a423adf7eccf893d62a04eac9 Author: John Bowman Date: Thu May 14 17:26:51 2009 -0600 Increment version to 1.73svn. commit 9ce9d03912c53e9f69d99585f95d268924070724 Author: John Bowman Date: Thu May 14 16:03:48 2009 -0600 Increment version to 1.72svn. commit 2fee527c6fff0b94db64e4bbea30c97cd229b355 Author: John Bowman Date: Thu May 14 15:59:18 2009 -0600 Re-introduce portable zombie-free fork. commit af459ca9ae85b53b88b2ba5c902fe265ae64d95e Author: John Bowman Date: Thu May 14 15:05:21 2009 -0600 Detect degenerate paths. commit e09844d2c619aa73bcb76897ae878063bb80448a Author: John Bowman Date: Thu May 14 15:04:56 2009 -0600 Fix ambiguity in extrude. commit 909baef375e0e6c773ec1743f4348833af304a98 Author: John Bowman Date: Thu May 14 12:52:03 2009 -0600 Force HAVE_LIBGLUT on darwin. commit 70d0c0ffd3a03c1bf8d7ac38ebe0248f2d5dac89 Author: John Bowman Date: Thu May 14 11:57:53 2009 -0600 Add patch to workaround problem that shows up in the 2009/03/23 version of movie15.sty. commit e626f36eda7f3693920cc67eeae01d54da45fed7 Author: John Bowman Date: Thu May 14 10:17:15 2009 -0600 Fix spurious zooms due to menu interaction. commit 6fde3ae29fc3a667e2de795b6b4f3dade51a36dd Author: John Bowman Date: Thu May 14 09:33:06 2009 -0600 Detect libGLU. commit d891aabf4a749b753caee840258e57d5451048cc Author: John Bowman Date: Thu May 14 01:47:25 2009 -0600 Change label3 to a routine extrude that returns a surface. commit 142dff3335feed312d6544a9be844c84ad66f2ae Author: John Bowman Date: Thu May 14 01:19:29 2009 -0600 Work around old LGPLv2 license covering tr.h and tr.cc. commit 1b958edc2bebdac4a991d08e6fc7cf4793f586b1 Author: John Bowman Date: Thu May 14 01:00:37 2009 -0600 Report up and target camera parameters. commit 789466cd680580ec92a3bf6fe9fcacc909cb20fe Author: John Bowman Date: Wed May 13 23:21:33 2009 -0600 Generalize extrude. Implement label3 for drawing 3D solid labels (illustrated in label3solid.asy). Remove extra call to bezulate. commit d5f7fe9131eea9cbf0191f77397b711e7855c1f0 Author: John Bowman Date: Wed May 13 23:18:57 2009 -0600 Define mantissaBits. commit 24708486fecbb134a0d42005ad59af4374c01089 Author: John Bowman Date: Wed May 13 23:17:50 2009 -0600 Limit recursion. commit a4f0012e806f96086581871d1d8aa2759d7191e1 Author: John Bowman Date: Wed May 13 11:40:56 2009 -0600 Add menu item (c) Camera to output camera position. commit 6133b9b3dfedab877b8d06458dd316711b514b13 Author: John Bowman Date: Tue May 12 14:24:34 2009 -0600 Make asy.bat respect all command-line arguments. commit 34c82634698f14f0aed162575c652163518fcc06 Author: John Bowman Date: Tue May 12 14:07:54 2009 -0600 Fix axis label alignment. commit 0a71bbd7ac01725fe76ecf1384fe010228d4e4e8 Author: John Bowman Date: Tue May 12 11:21:38 2009 -0600 Update call to ticks. commit 8ea2631aa1767ebfbaab0e4c19859a6a792268d2 Author: John Bowman Date: Tue May 12 11:15:49 2009 -0600 Support optional margins for axes arrows. commit 6cf99cebcdbbad787b7682eb40ca51f1be3b811f Author: John Bowman Date: Tue May 12 10:49:58 2009 -0600 Add trembling module, courtesy of Philippe Ivaldi. commit 99332ce8cad09a9f1862421df940339ddf9a9782 Author: John Bowman Date: Tue May 12 10:44:28 2009 -0600 Fix rotated path label alignments. commit 357799e128c9f3c9c5d7c9607632206cf8681239 Author: John Bowman Date: Tue May 12 02:17:46 2009 -0600 Update comments. commit 7b2ac914dcdf7132ab44b6e45d09a5a9411979ef Author: John Bowman Date: Tue May 12 02:01:22 2009 -0600 Merge in Philippe Ivaldi's geometry module. commit 726157a28e859aa65bdd3e83ca13bf171058eb1e Author: John Bowman Date: Mon May 11 22:28:04 2009 -0600 Update license. commit 1ac2d7244c04ac002cfeb9bccf3173ec923444d6 Author: John Bowman Date: Mon May 11 15:37:12 2009 -0600 Respect store argument of saveline. commit e767385e299dcd779839eccbbb2cef377bee0f57 Author: John Bowman Date: Mon May 11 12:59:15 2009 -0600 Update Ticks3. commit fbcf28b59f70f4125edfd81195fbfb7e22bfa05f Author: John Bowman Date: Mon May 11 12:55:54 2009 -0600 Implement signedtrailingzero. Fix left-justified trailingzero alignment. commit 9430fd06095e2feffb090f4fe7436be1e1259d80 Author: John Bowman Date: Mon May 11 11:39:52 2009 -0600 Resolve ambiguity. commit dbccc13c1b525540ab6c85f6cb91eff11140f1cf Author: John Bowman Date: Mon May 11 10:39:04 2009 -0600 Implement PostScript calculcator function shading and example. Add default fillrule arguments to frame shading routines. commit 182d0b51797762c5a56358f210ad48fe28584439 Author: John Bowman Date: Fri May 8 03:12:28 2009 -0600 Continue splitting when radius of curvature is zero. commit 1f8185d17208adcc64f531f0721c4b8b4848ebc5 Author: John Bowman Date: Fri May 8 02:59:30 2009 -0600 Add Philipp Stephani's GSL updates. commit c705bfc40bdce539c7eddbcf85b2b648ad9b3b1e Author: John Bowman Date: Fri May 8 02:11:46 2009 -0600 Fix link; add missing index entries. commit 3f47835f5813a1270a4de872216d54c1fff68903 Author: John Bowman Date: Fri May 8 01:22:22 2009 -0600 Fix endpoint detection. commit a80b2a2822feb137a416ed65e96a63fd8070302e Author: John Bowman Date: Tue May 5 15:44:20 2009 -0600 Fix write(pen). commit 07d8045cc034bd193a25e1ad0f16729cc2428379 Author: John Bowman Date: Fri May 1 14:42:31 2009 -0600 Improve documentation of shipout. commit 313d85edc3a132e9453fa221f9e55e353a0af08b Author: John Bowman Date: Thu Apr 30 11:52:51 2009 -0600 Fix bounds. commit 2f5229f927702f7486ddaa1081d484540ef47aba Author: John Bowman Date: Thu Apr 30 11:46:33 2009 -0600 Fix comment. commit 61b65cfc1056f40028333c8d358eefcb2fd9889e Author: John Bowman Date: Thu Apr 30 11:45:51 2009 -0600 Improve example. commit ad4bef7f9cc5a2b81bf51f43481251b82581d4dc Author: John Bowman Date: Thu Apr 30 11:44:10 2009 -0600 Add strokepath example. commit c8d5ef4c808d829628757f12f9183badba8eee82 Author: John Bowman Date: Thu Apr 30 09:32:36 2009 -0600 Add twisted tubes example. commit 6e5c3b36b25df3a8d34b4b4ab9cd353cb9deb333 Author: John Bowman Date: Wed Apr 29 16:44:55 2009 -0600 Implement functionshade primitive. commit 647887338fa1d03c1c1a66651f7e0d5b589dc232 Author: John Bowman Date: Mon Apr 27 22:14:04 2009 -0600 Fix numerical resolution problem in label alignment. commit c632ee4a0d60debeb8dcbf6e2d8501b93278d5eb Author: John Bowman Date: Mon Apr 27 19:13:42 2009 -0600 Add sysdir setting. Support automatic determination of sysdir from kpsewhich, if sysdir="". Add configure option --enable-tetex-build to force sysdir="". commit cca905863568c79558f4ba515c4ff330347ea79e Author: John Bowman Date: Mon Apr 27 11:42:19 2009 -0600 Fix effective camera positions for oblique projections. commit 1c4272247ecacabe1c0a75e99c5962ad466b0e41 Author: John Bowman Date: Fri Apr 24 11:41:49 2009 -0600 Abort on write to pipe failed error. commit 3ce25f46d059ba3d4a8cf459da93ce83a901dc3c Author: John Bowman Date: Fri Apr 24 10:55:49 2009 -0600 Generate wheel.mpg earlier. commit 90945287b2d6e9927e916791f93687b97db3ff98 Author: John Bowman Date: Fri Apr 24 10:25:53 2009 -0600 Explicitly check for libGLU. commit 706a6325d723c4c1be10617066fcef573579d1ab Author: John Bowman Date: Fri Apr 24 01:59:54 2009 -0600 Minor optimizations. commit 823b5039b87fa7e6f2e81d482be64d3d97033a45 Author: John Bowman Date: Fri Apr 24 01:52:12 2009 -0600 Simplify dealiasing code. commit 97650dfc4f7abc5ad59211c950af12814ac5b5bc Author: John Bowman Date: Fri Apr 24 00:35:32 2009 -0600 Optimize dealiasing of 3D rendered non-RGB images. commit f165ec0afefae7ecea4e37c9af29fa0a37c9c1be Author: John Bowman Date: Wed Apr 22 11:42:32 2009 -0600 Rename test member function. commit 6a4117c34454fcea9ae36deb1deb8e414671cc6b Author: John Bowman Date: Wed Apr 22 11:33:48 2009 -0600 Add example of defining a builtin asy struct. commit 2619bcb22197f775969cf74592fa7cb8e4ff6be6 Author: John Bowman Date: Wed Apr 22 10:52:30 2009 -0600 Implement value-based addVariable routine. commit 9c8f589aa2d86b1aff40c6728c83e9aaf43f5958 Author: John Bowman Date: Sun Apr 19 13:56:00 2009 -0600 Check recursion depth. commit eb431fe8e6ed67671cc1e3eacfae2de03c2486a6 Author: John Bowman Date: Sun Apr 19 10:34:12 2009 -0600 Continue subdivision tests if zero radius of curvature is encountered. commit 9d592def12e244517181d829faca2adc5cd0b44b Author: John Bowman Date: Sat Apr 18 23:52:51 2009 -0600 Change basealign so that "ace" and "acg" are always typeset at the same location. commit 3744427dbe7812dee4a61d0d0252f699934b12c9 Author: John Bowman Date: Sat Apr 18 16:57:05 2009 -0600 Handle more degenerate cases. commit 8306a21151548caaa0b1ba61af3a989005d2b941 Author: John Bowman Date: Sat Apr 18 15:42:21 2009 -0600 Handle degenerate paths. commit b4bc71fa46ceacf2e234512a90e0bb7eecada7b4 Author: John Bowman Date: Sat Apr 18 15:28:41 2009 -0600 Improve adaptive algorithm used for rendering thick lines and tubes. commit c379f3146746b44906b954321758b806ec6d30af Author: John Bowman Date: Sat Apr 18 06:56:28 2009 -0600 Fix circle ambiguity. commit 8b80557caaa9dd6b97db1374d6a064d0b0b1aa70 Author: John Bowman Date: Fri Apr 17 22:15:06 2009 -0600 Change perspective. commit b413e18e35ca518d0a017110ba285ef55923755b Author: John Bowman Date: Fri Apr 17 22:07:43 2009 -0600 Fix URL. commit b72747f967b0d802b64c8a0c2c51589c7bb59c51 Author: John Bowman Date: Fri Apr 17 22:05:46 2009 -0600 Use parametric mesh. commit 7a10ae1569c2546669841317edcac32ec81ff215 Author: John Bowman Date: Fri Apr 17 21:28:45 2009 -0600 Rename example; use smooth coloring. commit 5254c9cebe241339b2a58944a66974c8680348b8 Author: John Bowman Date: Wed Apr 15 23:35:07 2009 -0600 Add example. commit 6d1a060fb1d619965b0ccc6897232bb24eb282a5 Author: John Bowman Date: Wed Apr 15 23:28:57 2009 -0600 Make boolean condition suppress function evaluation for linearly interpolated surfaces. commit 527ec35a4f884dc8f4f3db61a24a87c24c0e4f85 Author: John Bowman Date: Mon Apr 13 08:48:38 2009 -0600 Add operator +(pen, pen[]) and operator +(pen[], pen) and example. commit 056aa9ccdb8a865d2b90b33eaba2007d0fe65dfe Author: John Bowman Date: Sun Apr 12 23:04:57 2009 -0600 Generate mpg file. commit 757885c24fcc69bb74ae3e1b4f0e2192675b05d2 Author: John Bowman Date: Sun Apr 12 21:32:34 2009 -0600 Produce an animated gif rather than an inline PDF movie (about 1/4 as big). commit 4fe5f1b0e6ec434224996a426351e52049e34cb6 Author: John Bowman Date: Sun Apr 12 17:11:56 2009 -0600 Avoid nullpath3 has no points error when label is given nullpath3. commit 0f936bf8f955acd4aebdd2a952c86a18320d44a4 Author: John Bowman Date: Sat Apr 11 01:32:31 2009 -0600 Set dotgranularity=0 in cube example to force dots to be rendered as spheres. commit 9cf2b91fa3c126cb9fb884e3d57a6ce726c45993 Author: John Bowman Date: Fri Apr 10 22:03:19 2009 -0600 Improve example to use a better (smooth) approximation to a torus. commit 522ed7412ad11b90fcff13eafc39d02c8a351125 Author: John Bowman Date: Fri Apr 10 15:10:27 2009 -0600 Increment version to 1.71svn. commit 3b34b09b00bc857702b2daf751f81905ca6d4858 Author: John Bowman Date: Fri Apr 10 12:57:02 2009 -0600 Add node. commit c7dc01717e31922693fda55e61791cf673068458 Author: John Bowman Date: Fri Apr 10 11:35:11 2009 -0600 Optimize and improve valid range of choose(int n, int k). commit 8309c1f5916ec1e97a77f0a4c4f95e62857e79f6 Author: John Bowman Date: Fri Apr 10 10:48:31 2009 -0600 Update example. commit 58b97e553f6289842ec696ad9651939b50fd5e05 Author: John Bowman Date: Fri Apr 10 09:52:28 2009 -0600 Handle spaces in incoming prefix. Add prefix arguments to fit function. commit bf4d3adb2d37c7ba52677f65cfcc8fd60c398e88 Author: John Bowman Date: Fri Apr 10 09:40:07 2009 -0600 Handle spaces in filenames when using pdflatex. commit a2f84e9d58da5b279e8040134757b447cc280726 Author: John Bowman Date: Fri Apr 10 00:27:03 2009 -0600 Work around animation problems with spaces in filenames. commit 785dea67b0655ccc4f8742e9cbb68efc5119d4c2 Author: John Bowman Date: Thu Apr 9 23:57:44 2009 -0600 Add PenMargin2, etc., for planar arrowhead types like DefaultHead2. commit ddd85786d17a6b9a2cae12774a682982a38db7a2 Author: John Bowman Date: Thu Apr 9 17:57:52 2009 -0600 Add labelpath3 module for typesetting curved labels in 3D and example, courtesy of Jens Schwaiger. commit 11e92513bfe3522596bb6679b6cf2239e40f82f1 Author: John Bowman Date: Thu Apr 9 16:32:17 2009 -0600 Center target of teapot. commit e42cfe2edbcfcd564419d8d86af10f9122746667 Author: John Bowman Date: Thu Apr 9 16:30:01 2009 -0600 Add bool center=false parameter to projections to allow one to automatically center the target within the bounding volume. commit 4606c09664ef8f7144529d3c78831c92160de3eb Author: John Bowman Date: Tue Apr 7 21:05:53 2009 -0600 Fix clipping example. commit 2ccddae8a2610c9e84dc098708a9cc7794190355 Author: John Bowman Date: Tue Apr 7 16:02:10 2009 -0600 Minor update. commit f1fa0d1eeef5508d9e4fa54b281e3d7d4dfe4368 Author: John Bowman Date: Tue Apr 7 16:00:46 2009 -0600 Use locale. commit fd783acf33724de96f7aa6ee71d719341d1779ef Author: John Bowman Date: Tue Apr 7 15:46:44 2009 -0600 More updates. commit 5f329206530828a782bd4b0d078232b9387dc250 Author: John Bowman Date: Tue Apr 7 15:41:08 2009 -0600 Fix typos. commit 4fd4bd5bfa094a0ea7e2caa78d0b58c9f59a2cbc Author: John Bowman Date: Mon Apr 6 15:55:08 2009 -0600 Reserve surface(triple[][] P) for graphing a surface described by a matrix; use surface(patch(P)) instead. commit 58b990d3824d09a231c8a747ac651713146ca122 Author: John Bowman Date: Mon Apr 6 03:39:14 2009 -0600 Work around old compiler bug. commit 5b2a0b5fea94b7852d546799ab2b119e2abe0379 Author: John Bowman Date: Mon Apr 6 03:37:42 2009 -0600 Increment version to 1.70svn. commit 3df96eddb725d40fa18157197e6645109209db8b Author: John Bowman Date: Mon Apr 6 02:02:44 2009 -0600 Add torus animation. commit 751007ecbd03b344dca139eaf9d89767a1e090ee Author: John Bowman Date: Mon Apr 6 01:53:38 2009 -0600 Reduce memory usage. commit d20badd0879006dca0107bd44d1eefc8def4caa5 Author: John Bowman Date: Mon Apr 6 01:07:52 2009 -0600 Force outformat="pdf" when producing PDF animations. commit 91fba1067f0cb496ac6ab02c66247f1bb88bc5b6 Author: John Bowman Date: Mon Apr 6 00:30:10 2009 -0600 Change - delimiter to + for animation frames and preview images. commit 9f143ecebab158f28117bbd9e2496541cda147f1 Author: John Bowman Date: Sun Apr 5 23:36:07 2009 -0600 Move extension routine and infinity constant to C++ code. commit dce7d4684b60fbd49411678e41acd91fe2aae518 Author: John Bowman Date: Sun Apr 5 22:50:15 2009 -0600 Work around hyperref option clash. commit b5c792a1ef897cb3541fbbbfb89a5c72d1f6ae1a Author: John Bowman Date: Sun Apr 5 21:26:41 2009 -0600 Catch handled_errors (e.g. from ~psfile()) during throw handled_error(). commit 4e9be4d6c89ad820c73fc42a231eb10fa4ef2910 Author: John Bowman Date: Sun Apr 5 17:08:33 2009 -0600 Fix more animation prefix issues. commit 9e4c35e7de336022485ae806b38740cd926068ed Author: John Bowman Date: Sun Apr 5 14:19:38 2009 -0600 Keep keep flag. commit 22ae02a38ed6e3ffe30dc921ba51b21612cadeda Author: John Bowman Date: Sun Apr 5 13:21:13 2009 -0600 Move 3D code out of animation.asy. commit a52a6633d81fc3d7d04d14b485d593cd20cf0a35 Author: John Bowman Date: Sun Apr 5 12:02:17 2009 -0600 Fix inline pdf animations with multipage=false. Fix global scaling of 3D animations. Add heatequation and earthmoon examples. commit 443cc79149c736d66ce4d47db1a4a84ab594b101 Author: John Bowman Date: Sat Apr 4 14:26:55 2009 -0600 Minor optimization. commit 152f712891e81f1fecbaa91cc499364d0487cd85 Author: John Bowman Date: Sat Apr 4 14:24:31 2009 -0600 Use a lookup table to compute factorial(int n). commit 2f93f82b0b032cd2c8996c1d28737173a2ab175d Author: John Bowman Date: Sat Apr 4 12:50:14 2009 -0600 Implement miterlimit. commit a41cc4546b6313f99be1b65573182e44318f1093 Author: John Bowman Date: Sat Apr 4 11:26:43 2009 -0600 Fix use of baseline. commit 4eaf887ab95fe68fa9ccf39b94bc1d10c0db0478 Author: John Bowman Date: Sat Apr 4 10:44:00 2009 -0600 Disable old lights for multiple exports. commit fd244ea8555fc0fdb92c87f3388e5c3946f781a9 Author: John Bowman Date: Sat Apr 4 08:44:15 2009 -0600 Fix warning message. commit 7046900634a2fc8d5f5f609175f16b8edc195a1c Author: John Bowman Date: Sat Apr 4 08:41:58 2009 -0600 Add missing conditional. commit 612728718a6fa71065a7dbc3757d772847410e44 Author: John Bowman Date: Sat Apr 4 00:31:39 2009 -0600 Improve example. commit f930ee18a50667ee5b3655a8eda1be651d5006df Author: John Bowman Date: Sat Apr 4 00:24:39 2009 -0600 Remove unnecessary parameter. commit d248a41b7792d2d70167d4b6d3d0495c0989b861 Author: John Bowman Date: Sat Apr 4 00:22:37 2009 -0600 Fix type conflict by replacing settings.divisor with purge(divisor=0); divisor=0 means to use the previously set divisor (which defaults to 2, or the value specified on the command line with the -divisor option). commit 5e50b840f02bf29da1730c72df3d65954afa90e3 Author: John Bowman Date: Fri Apr 3 22:06:22 2009 -0600 Increase orthographic viewportfactor. commit e0963eaad05890f3fda42a3bbbaaa1f65b53db08 Author: John Bowman Date: Thu Apr 2 00:05:50 2009 -0600 Add missing 3D add function. Increase nsamples to 32. Remove nonselfintersecting restriction. commit fccd5702d3caef79ceda7e05806e1a68139a6920 Author: John Bowman Date: Wed Apr 1 02:38:09 2009 -0600 Fix splitting. commit 8cee60600708d3947f899b578400c8a626e0c2e4 Author: John Bowman Date: Tue Mar 31 20:31:48 2009 -0600 Increase fuzz; use static dxmin. commit bb8cbc4f3a32442b4453f8b32a5dafa585a0fde6 Author: John Bowman Date: Tue Mar 31 17:32:16 2009 -0600 Reorder tests. commit 9970a0a8a174f9172cba01cbcb1cc81a94e287e0 Author: John Bowman Date: Tue Mar 31 17:27:53 2009 -0600 Check for triangles first. commit be4fc623d49613c243c098cc38bf8854e83794d1 Author: John Bowman Date: Tue Mar 31 16:54:09 2009 -0600 Split randomly to avoid returning a degenerate patch. commit f53b1dd96ad99531902c70c0a8753b07953c6057 Author: John Bowman Date: Tue Mar 31 16:21:13 2009 -0600 Fix interactive rendering. commit 72ce918958da2a16be791ee2e1d70fd9d83c15f1 Author: John Bowman Date: Tue Mar 31 02:32:14 2009 -0600 Once an internal degeneracy is found, don't check any more boundary cases. commit 069759abc268c4fa3f0c871b141582afd76788ec Author: John Bowman Date: Tue Mar 31 01:45:23 2009 -0600 Increase nsamples. commit 1afb44a8645d304ce33144e2271fc75ba02633c9 Author: John Bowman Date: Tue Mar 31 00:39:32 2009 -0600 Split at the worst boundary degeneracy. commit 82e73caf64ea5ccd2a9b718a67a4323fe5168966 Author: John Bowman Date: Mon Mar 30 12:29:10 2009 -0600 Add unicode option to make new versions of hyperref happy. commit e683a4d1cfd75925b27ff38361e7c7806e84f072 Author: John Bowman Date: Mon Mar 30 08:44:30 2009 -0600 Pass animate the correct file name. commit 1ba731b25bbbe2b5a161e75be0dda0395e795166 Author: John Bowman Date: Sun Mar 29 23:39:56 2009 -0600 Fix floating point exception caused by attempt to split paths of length 0. commit 1a124b08ec44272e3d8591081bfd196bab64c338 Author: John Bowman Date: Sun Mar 29 23:07:13 2009 -0600 Move inside(path, pen fillrule=currentpen) to plain_paths.asy. commit e13cec520205c06c787dfa1a390c07a85e7245de Author: John Bowman Date: Sun Mar 29 20:57:00 2009 -0600 Fix defaultpen(evenodd). commit 180fb560a67a14747113ad4ab033fb348d544390 Author: John Bowman Date: Sun Mar 29 17:00:07 2009 -0600 Fix spurious "undefined" (on curve) return values from windingnumber; optimize handling of straight segments. commit a575a6fc1b88edb18a01616bcf473695c429999c Author: John Bowman Date: Sun Mar 29 14:45:08 2009 -0600 Always define glthread. commit d8f464fc32c76929510f34d41de82117564a8723 Author: John Bowman Date: Sun Mar 29 10:06:33 2009 -0600 Release version 1.06 of asymptote.sty to fix undefined \ASYbox bug. commit 5b996b037bcf7d0f23a1e7e0fe8e161849f85f06 Author: John Bowman Date: Sun Mar 29 00:30:53 2009 -0600 Automatically apply bezulate to path arrays. Surfaces should now be constructed directly from paths (and paths arrays), without first calling bezulate. An array of independent surfaces can still be constructed from a path array using a loop. commit b80b2d3074dcaf68f82fd51571c4475e73548f43 Author: John Bowman Date: Sun Mar 29 00:05:54 2009 -0600 Fix inside(path,pen). commit 6f4f738fb32e1a44cf43c80905308b77aa040c50 Author: John Bowman Date: Sat Mar 28 23:35:26 2009 -0600 Add Orest's connect patch to fix nesting. commit a646731fad5a118d1464a6b62e366b8dffdd956a Author: John Bowman Date: Sat Mar 28 23:11:34 2009 -0600 Specify zerowindingnumber rule. commit 622937c19c1bd66f9c97771f105be7b73e6b33b8 Author: John Bowman Date: Sat Mar 28 23:09:13 2009 -0600 Improve inside(pair); add fillrule argument. commit 9fa25db9be336cf6019063dfea7e959d21a772e4 Author: John Bowman Date: Sat Mar 28 14:21:05 2009 -0600 Remove internal patch degeneracies by splitting. Compute subpatches directly from control points. commit 195cbd6b9daab589520bf8f4319c04f42982a01c Author: John Bowman Date: Sat Mar 28 12:24:17 2009 -0600 Implement factorial and choose functions. commit 6447f273d215e1d4f488650b468de3c250bc7732 Author: John Bowman Date: Sat Mar 28 12:18:16 2009 -0600 Rename example; use orthographic projection. commit 78b068ae1390a2c89329281dfd668595ae9b03f5 Author: John Bowman Date: Sat Mar 28 12:15:09 2009 -0600 Make path(path3, pair(triple)) preserve straight flag. commit 2cb79dbf9585a541058e23047f79c09dd8af150d Author: John Bowman Date: Sat Mar 28 12:08:55 2009 -0600 Fix quit deadlock. commit d8125e4fa7af606cf6fcd7398b3a07b9aa41bad9 Author: John Bowman Date: Sat Mar 28 00:11:09 2009 -0600 Increase fuzz to accomodate italic "k". commit 3a1f5a20fec2b085364dd4da3295f84ab3d52475 Author: Orest Shardt Date: Fri Mar 27 21:56:17 2009 -0600 Fix connect() to ensure that removed regions do not contain an inner curve. Add fuzz to intersections(). commit d4f6dddb855703ed9c11070c985c7bd735bd04be Author: John Bowman Date: Tue Mar 24 21:47:57 2009 -0600 Add surface constructor for multiple surfaces. commit 850b0ed10f2eed93e617b918269739136fc6281f Author: John Bowman Date: Tue Mar 24 21:32:54 2009 -0600 Add intersecting pipes example. Update FAQ. commit ef5e8e4054b63c12b29352c930445d1bbfa59dbf Author: John Bowman Date: Mon Mar 23 03:23:19 2009 -0600 Increment version to 1.69svn. commit e9bd6706f9bedf66c3d997b07707dd54a9eefde7 Author: John Bowman Date: Mon Mar 23 02:07:01 2009 -0600 Update example. commit d73f25a4baa11d6d85364a2fd419f423f09cd032 Author: John Bowman Date: Mon Mar 23 01:45:58 2009 -0600 Illustrate automated camera and target computation. commit d777a813382fac58535de2c8223c80c84dd98bb0 Author: John Bowman Date: Mon Mar 23 01:37:23 2009 -0600 Remove unnecessary index. commit f84b490d11d0cb509d778299a8f180a1ab579264 Author: John Bowman Date: Mon Mar 23 01:34:42 2009 -0600 Add support for and example of generating a 3D inline pdf movie. Remove hyphen from animation file prefix for compatibility with animategraphics. Force multipage=true in inlinetex mode. Update definition of ASYanimategraphics. commit e10b91934bf65fa81f5e8edc34aaf0c720b3152b Author: John Bowman Date: Mon Mar 23 00:31:06 2009 -0600 Fix export deadlock. commit 587aa4f5bb4fb8f2afe4246e7e4d7bce78aa9904 Author: John Bowman Date: Sun Mar 22 21:42:52 2009 -0600 Don't automatically move camera with target. commit ace730baa7577af882835379f5bd4fbe937f9c17 Author: John Bowman Date: Sun Mar 22 12:12:52 2009 -0600 Update example. commit d6667c3934ef2cd795037dd81c2301340520abef Author: John Bowman Date: Sun Mar 22 12:11:41 2009 -0600 Fix camera adjustment. commit d9d5da76552aac77955fbc5066296f8a998eaa72 Author: John Bowman Date: Sat Mar 21 23:54:54 2009 -0600 Allow \par in a label. commit 1e4f2fe939058c6b832bc22903bca649638c665b Author: John Bowman Date: Sat Mar 21 23:49:23 2009 -0600 Update documentation. commit 9cd5a0fe84a5e068af1488f50c39d2b2720fc06d Author: John Bowman Date: Sat Mar 21 23:07:42 2009 -0600 Improve and generalize baseline. commit 74f9e6f899b075ad53f1ebcb6edd01bc57f2f107 Author: John Bowman Date: Fri Mar 20 23:26:20 2009 -0600 Look for exact intersections also when fuzz=0. commit 0638cdbfeabb2a803b09b82dd1471c1ea0876d49 Author: John Bowman Date: Fri Mar 20 22:42:10 2009 -0600 Suppress spurious space. commit 04ae9df43413d6956ed3fbc97cc1e6c8751f48cc Author: John Bowman Date: Fri Mar 20 22:28:18 2009 -0600 Standardize sqrtEpsilon. commit f16441c237fbfa983d69a569fad449d782a8770e Author: John Bowman Date: Fri Mar 20 22:15:40 2009 -0600 Remove unused line. commit 7c3732148f30c6d9f9fa888e6b7f780aa490dc08 Author: John Bowman Date: Fri Mar 20 22:14:19 2009 -0600 Improve handling of intersection fuzz. commit 789ab1c54c66973fcd061dbccdb6b4c397b5bb69 Author: John Bowman Date: Fri Mar 20 14:57:34 2009 -0600 Handle invisible material. commit 5e3b8fdec620ed0e7ed38e01e193269dd97d6fe2 Author: John Bowman Date: Fri Mar 20 14:28:23 2009 -0600 Respect user-specified step value. commit 05b16339d6790f96f0657b38dc194efe1d01f662 Author: John Bowman Date: Thu Mar 19 02:59:14 2009 -0600 Increment version to 1.68svn. commit b8c188a2ff0c6d8acd87da23c27bad9ebb0b42bd Author: John Bowman Date: Thu Mar 19 01:33:53 2009 -0600 Fix 3D animations with render > 0. commit 823eb84ed3fe32c0188596227f1c56c573b46f72 Author: John Bowman Date: Thu Mar 19 00:40:40 2009 -0600 Don't force C:\Documents and Settings\bowman in asy.bat commit 87a2b41240328f478ca8bf3b256e6789930a3abe Author: John Bowman Date: Wed Mar 18 14:18:11 2009 -0600 Remove normal fuzz. commit ce6df332a9c0f9010ccf9d1c9f6e7083b7f539b6 Author: John Bowman Date: Wed Mar 18 02:51:53 2009 -0600 Fix overlap detection internal control points for short paths. commit a8cc7c427cac46ace2db0070645385718a09028f Author: John Bowman Date: Wed Mar 18 01:23:56 2009 -0600 Add file missed from last revision. commit e6766a83c38ada605086a98cf3f06b71eb2b29cc Author: John Bowman Date: Wed Mar 18 01:01:08 2009 -0600 Make intersection routines respect fuzz. commit 9b3a5104ccc45a972fbd776a589f13d8e42f5bde Author: John Bowman Date: Sun Mar 15 17:20:04 2009 -0600 Simplify normal calculation slightly. commit 460b9eed16912fcaa5753bf84679620335c8ca5b Author: John Bowman Date: Sun Mar 15 15:32:07 2009 -0600 Reduce Fuzz. commit 30566f000cf574ac193f65f1a9846d4ebc5f5f39 Author: John Bowman Date: Sun Mar 15 15:01:04 2009 -0600 Allow prc output if render > 0. commit 4cb2f03752fb95986e981e558be71f8d0db7d5a5 Author: John Bowman Date: Sun Mar 15 00:09:54 2009 -0600 Implement settings.auto3D (default true) so that one can disable the poster option of movie15.sty. commit c026e07e6a9067e1b1047f4027849305ae6dbc02 Author: John Bowman Date: Sun Mar 15 00:05:14 2009 -0600 Increase fuzz. commit 594a12ce972e648dc8b66c295fad2d330f6c1444 Author: John Bowman Date: Sat Mar 14 23:23:00 2009 -0600 Detect and fix remaining cases of patch overlap due to normal reversal, using Rolle's theorem and a quartic root solve. commit 3b2700c4a800e6de2eb6ab08e0a7de93e1d38069 Author: John Bowman Date: Sat Mar 14 23:09:29 2009 -0600 Detect numerical roots at infinity; increase Fuzz. commit 8279587db2c825391fc51c85b22db684b3ef1fb7 Author: John Bowman Date: Sat Mar 14 23:00:31 2009 -0600 Make subpath preserve straight flag; optimize splitCubic for straight segments. Fix handling of straight flag in operator &(path,cycleToken); do nothing if path is already cyclic. Implement pair versions of Bezier functions. commit 8361c768a73d9dc693e71b9372db2de0b5c20f7a Author: John Bowman Date: Sat Mar 14 15:25:45 2009 -0600 Fix segmentation faults with operations on guide g=cycle. commit db843913d4afd6861ee0649456ff8008928f506f Author: Orest Shardt Date: Sat Mar 14 11:49:45 2009 -0600 Speed up curve sorting. commit 26c1aa3481dd6878716e8d46f3924b5137f61fce Author: John Bowman Date: Fri Mar 13 15:02:45 2009 -0600 Fix buildcycle endpoints. commit cfe2ab7253439844c47bb0f45a2bfff4b4831df6 Author: Orest Shardt Date: Wed Mar 11 21:44:52 2009 -0600 Use bounding box size to determine whether points are duplicates. commit 110ab7d63f8346830c11276b1c0d4133f5bc825b Author: John Bowman Date: Wed Mar 11 01:47:57 2009 -0600 Force planar flag for arrow construction. commit 2511368422abcb3be6500d2fcc8bea79e031ed12 Author: John Bowman Date: Wed Mar 11 01:33:51 2009 -0600 Remove another degenerate segment. commit e1cf02273301e2a7342006b9aeb6cbf41544d842 Author: John Bowman Date: Wed Mar 11 01:25:36 2009 -0600 Work around bezulate bug by removing degeneracy. commit 42fa995edf293de9162db70a15c3bd3368a79ea9 Author: John Bowman Date: Wed Mar 11 00:18:34 2009 -0600 Fix planar surfaces. commit ad59550839cb6c72c56a6716a94943119db54928 Author: John Bowman Date: Tue Mar 10 23:45:25 2009 -0600 Simplify surface constructors; update documentation. commit f75e88bde5cf608232940a708263d3272b4b3d37 Author: John Bowman Date: Tue Mar 10 22:23:19 2009 -0600 Update examples. commit 374fe5ba6ec9c625e879adcbd4ac575c62001860 Author: John Bowman Date: Tue Mar 10 22:06:09 2009 -0600 Enable poster mode only when there is no rendered preview image. commit e54a57e797193f26b69165636a686337259c7f9b Author: John Bowman Date: Tue Mar 10 21:34:37 2009 -0600 Add termination tests. commit 619a3195f7b333f91189349f8b19a7fabe08a7d6 Author: John Bowman Date: Tue Mar 10 21:34:12 2009 -0600 Increase bezulate fuzz; add termination tests. commit db838100431fe50516bf3ba17b7ccf9d7b7409c8 Author: John Bowman Date: Tue Mar 10 14:04:32 2009 -0600 Add Align constant. commit e12fcc1ca69c59d1d49446c6fa2b91d458634512 Author: John Bowman Date: Tue Mar 10 02:54:16 2009 -0600 Fix most instances of selfoverlapping patches. commit 9cb3e7a170ea796feda2023fc9a9aaa69daf27d0 Author: John Bowman Date: Mon Mar 9 21:38:52 2009 -0600 Make axial and radial shading respect -gray, etc. commit 9e40719812e31103ec3f4a5e39b06148270cc2df Author: John Bowman Date: Mon Mar 9 00:07:48 2009 -0600 Fix texpath control points for cyclic segments; respect straight flag. commit db6f45dc098f8b24df43b0586e4438f241afedeb Author: John Bowman Date: Sun Mar 8 16:11:51 2009 -0600 Slightly simplify normal calculation. commit 71e1c95735a2ba23c19e092415baff80edf4d514 Author: John Bowman Date: Sun Mar 8 12:03:26 2009 -0600 Make default viewportwidth \the\linewidth in inline mode and 0 in attached mode. Document asy environment options in asymptote.sty version 1.04. commit a06740433ebde75644e27f3e9466468c5e1d90a1 Author: John Bowman Date: Sun Mar 8 09:23:09 2009 -0600 Simplify tick calculation. commit 83d2fa180a2bdca1ef8c7ac05a345caa71753215 Author: John Bowman Date: Sun Mar 8 02:18:52 2009 -0600 Improve tick selection. commit f1e40619a13f3ab6a19a0acb8e2f8b1cc75a1577 Author: John Bowman Date: Sun Mar 8 01:02:42 2009 -0600 Colorize example. commit c2c2eb092db44f4e3cbbc5b59c62298d639d0d1d Author: John Bowman Date: Sat Mar 7 21:17:56 2009 -0600 Reinstate original views. commit 81fce38d02dc3158eb728636c8007cd7d8ff9dca Author: John Bowman Date: Sat Mar 7 21:10:03 2009 -0600 Fix camera adjustment. commit 02eb5bcfcca0d0378e385f4137226e8946b2b8ad Author: John Bowman Date: Sat Mar 7 16:23:58 2009 -0600 Support keyval options width, height, viewportwidth, viewportheight, and attach in asy environment asymptote.sty. Remove obsolete asyattach environment. Move viewportsize to plain_picture.asy to support asymptote.sty. commit 24e9b23a742650c682357ecdd303bd10fd57d390 Author: John Bowman Date: Sat Mar 7 12:14:05 2009 -0600 Better fix for unextended axes limits. commit 78581b7e40528f7eb1a42a0517690368931d999f Author: John Bowman Date: Sat Mar 7 10:10:37 2009 -0600 Update documentation of crop. commit c01d0084a1d3156957c997c89100d4d5b57ec8f8 Author: John Bowman Date: Sat Mar 7 02:46:18 2009 -0600 Add example of a surface drawn using irregular data read from a file. commit 9c01ec16add18b92fd50bb4674cbadde10329bb6 Author: John Bowman Date: Sat Mar 7 02:23:39 2009 -0600 Revert last change. commit 47aa02a0fd237e6267d018ddab025fcdb408d3b4 Author: John Bowman Date: Sat Mar 7 01:07:03 2009 -0600 Fix unextended axes limits and tick generation. commit ea3cf29d5dc68f65db8f3c0835c7a7275b035969 Author: John Bowman Date: Sat Mar 7 00:45:35 2009 -0600 Avoid redundant camera adjustment messages. Increase camerafactor to 2 again. commit 38dc72be7a5d0b19888e15e5b64a54efae1d957a Author: John Bowman Date: Sat Mar 7 00:19:49 2009 -0600 Check crop argument. commit 82a5510bd196c1bd13e176ceac37f5a3d52e7d0f Author: John Bowman Date: Fri Mar 6 23:52:12 2009 -0600 Improve automatic camera adjustment: relocate target to the center of the bounding box, if it lies outside, and reposition camera when aspect ratio is not preserved. commit 2311c16d538c5e25467da6aa029a05dbfffe4854 Author: John Bowman Date: Fri Mar 6 01:14:45 2009 -0600 Allow the user to specify a minimum viewportsize. commit 688371c4a8696f5dcc83215f9de890adf14de341 Author: John Bowman Date: Fri Mar 6 01:06:16 2009 -0600 Use a single call to clip in limits. commit 0026ea88a43ca42d078daaf271a611a6fca599be Author: John Bowman Date: Fri Mar 6 00:56:25 2009 -0600 Fix behaviour of xlimits(Crop) and ylimits(Crop) under picture transformation. commit 70429fc62beac0c19e61982cd9bf676db905753d Author: John Bowman Date: Wed Mar 4 03:44:31 2009 -0600 Increase camerafactor. commit ce2861d0882f816900ec6893aedea46a5541899c Author: John Bowman Date: Wed Mar 4 03:18:49 2009 -0600 Improve automatic camera adjustment. commit 729c7308c0db8806392b48506da22d6e9989a459 Author: John Bowman Date: Wed Mar 4 02:09:19 2009 -0600 Work around intermittent hang on exit. commit 0902c55dc095a0147b7a9feb32b20cdfb74f347d Author: John Bowman Date: Tue Mar 3 02:19:52 2009 -0600 Make attached images printable. commit 8c4f30913cf60f1b963fa6b4c34b045d23783a39 Author: John Bowman Date: Mon Mar 2 19:03:03 2009 -0600 Turn poster off when we have our own preview image. Fix viewportmargin. Remove unwanted camera rescaling. commit 990b6ee4eba7a1b9033d87489f15e284de5b823d Author: John Bowman Date: Mon Mar 2 18:49:36 2009 -0600 Fix spurious annotation question marks and print preview problems by removing workaround for BBox bug in obsolete 2008/01/16 version of movie15.sty. The now widely available 2008/10/08 version of movie15.sty is now compulsory. commit 5ad2d615fa2da167e76a7bd784fcd57e8af41bef Author: John Bowman Date: Mon Mar 2 15:45:00 2009 -0600 Fix slanted ticks. commit 9316b6e0aba874d635db72cf538d1cf718741b5e Author: John Bowman Date: Sun Mar 1 23:58:58 2009 -0600 Fix animation prefix. commit ae5315ac620c3aa15e47e16db87cc7b234aec103 Author: John Bowman Date: Sun Mar 1 17:32:54 2009 -0600 Fix planar arrows for 2D projections. commit 30f6e7f858cf09de210fe6d56dae2752c3698c5f Author: John Bowman Date: Sun Mar 1 17:01:58 2009 -0600 Allow one to disable poster option. commit 09782ec523dd2e89001cfc9b2a3ff24b8db314bb Author: John Bowman Date: Fri Feb 27 17:32:54 2009 -0600 Resize example. commit 6556c592c360ab5ab045004a37cc4cf40ebe6bca Author: John Bowman Date: Fri Feb 27 15:43:51 2009 -0600 Don't hide convert errors. commit 2ca31a4e8eaeadcfa8c513fb2b03bc8271a97892 Author: John Bowman Date: Thu Feb 26 23:09:51 2009 -0600 Add example (contributed by Orest Shardt). commit 88ca0f83d5a114a730aa65578e3e19d067771d74 Author: John Bowman Date: Thu Feb 26 17:23:44 2009 -0600 Increment version to 1.67svn. commit dae4c85870f84c1ed6dd1c139d3408d2cac88b34 Author: John Bowman Date: Thu Feb 26 16:00:38 2009 -0600 Fix outprefix. commit 6a5de0c624a8638930b1216b5695886bce86a18f Author: John Bowman Date: Thu Feb 26 10:01:58 2009 -0600 Remove animation optimization by default. Under MSWindows, suppress call to animate since it requires XWindows. commit 99ea30e4d2f14fcbdef3246301c2010e6e1872cd Author: John Bowman Date: Thu Feb 26 08:50:25 2009 -0600 Add optional direction argument to three-dimensional bars. commit a9d59eb9158368824e68c96f5988f279f7dda53e Author: John Bowman Date: Thu Feb 26 08:45:58 2009 -0600 Avoid division by zero when NColors=1. commit 69192fae67050b8588203e1c60b3ab06f86fe26e Author: John Bowman Date: Thu Feb 26 06:45:26 2009 -0600 Fix alignment bug under pdflatex due to missing %. commit 6bb6ecb0218cdf77f474df10bf763c3a89ec111e Author: John Bowman Date: Wed Feb 25 23:04:31 2009 -0600 Change guides into paths; update to LGPL. commit c48ca48643148db89071d9446c8d0a1bc0ef0ef2 Author: John Bowman Date: Wed Feb 25 17:21:27 2009 -0600 Use integer division. commit ee3c6b650e1a91aff74ecba6996da5987af09db7 Author: John Bowman Date: Wed Feb 25 17:07:20 2009 -0600 Remove "named argument may be mistaken for assignment" debugging warning as it discourages the use of named arguments and detracts from the usefulness of the -d option. commit 389c5fb20a8aa07ef5eead1a95832fb657070105 Author: John Bowman Date: Wed Feb 25 16:06:21 2009 -0600 Revert to interpolating function at midpoints. commit 6cc5fc9f62876be9fc734340932fa4fa229808b1 Author: John Bowman Date: Tue Feb 24 10:51:11 2009 -0600 Add optional normal argument to DefaultHead2, HookHead2, and TeXHead2. commit bdbd01b5c6fe36d7e03aa516da5e9880a85ce4b9 Author: John Bowman Date: Tue Feb 24 01:47:00 2009 -0600 Fix Arrow3(TeXHead2). commit 1321c2fd18a8868b4c968ba89dff10858a8879ab Author: John Bowman Date: Tue Feb 24 01:35:08 2009 -0600 Fix alignment of DefaultHead2, HookHead2, and TeXHead2 arrowheads. commit d42d0e22364585fb5f034b151adf3a7b17085c14 Author: John Bowman Date: Mon Feb 23 01:36:02 2009 -0600 Improve thin 3D arrow handling. commit ac890dbbd19be365d45a4b46038ee04fb50dc54c Author: John Bowman Date: Mon Feb 23 00:01:42 2009 -0600 Make filltype a structure to allow extraction of type and pen parameters. Improve the appearance of DefaultHead2, HookHead2, and TeXHead2 (particularly with curved paths); standardize their usage with their 2D counterparts. Fix MidArcArrow(TeXHead) sizing. commit 04c4806b61f68cf9f3df17ce8a6232a33909bca6 Author: John Bowman Date: Sun Feb 22 21:32:38 2009 -0600 Untabify. commit 43e22d83c2f82739550b7b943770a3f30934b1d6 Author: John Bowman Date: Sat Feb 21 21:30:41 2009 -0600 Upgrade license to LPGL, as per email from Philippe. commit 31e799c42b85817afd1eb468269fc7b86dc0fb22 Author: John Bowman Date: Sat Feb 21 17:39:27 2009 -0600 Retune 3D arrow parameters. commit b0667031a8755d08adea8132ddb143d538c7b2bb Author: John Bowman Date: Sat Feb 21 17:03:22 2009 -0600 Upgrade global license from GPL to LPGL (except as noted within individual files). commit 5523eb20c73989293429387cae06319c96e5c5b0 Author: John Bowman Date: Sat Feb 21 16:37:09 2009 -0600 Remove obsolete featpost3D.asy module. commit 64757f0b6dd69ed1e837c0d08ece5877f87af700 Author: John Bowman Date: Sat Feb 21 15:56:33 2009 -0600 Add bool autoadjust=true argument to perspective projection constructors. commit e6f290616e09b9aa44a0b55b9b74299f99eefe4f Author: John Bowman Date: Sat Feb 21 13:26:15 2009 -0600 Fix TeXHead alignment for curved arrows along with endpoint appearance. commit b57f0e9ad0898cfdec851911fbac70ed1c4f5324 Author: John Bowman Date: Sat Feb 21 11:46:29 2009 -0600 Add autoadjust flag to projections to disable automatic camera adjustment (for experts only). commit 431e0a5ec4fddc168199226dd41564e3fdf41a62 Author: John Bowman Date: Sat Feb 21 11:28:25 2009 -0600 Fix transverse vs. longitudinal typo. Add slight hysteresis to camera adjustment. Always notify user if camera is moved, as transverse and longitudinal slices will have to be (manually) recomputed using the new camera position. commit a4e964c92b8dd447c1146e7382b5b3ec72557dd5 Author: John Bowman Date: Sat Feb 21 04:05:32 2009 -0600 Add 3D arrows example. commit fd67a7961ae8a339ca75d8cdbea2ceebef5552ec Author: John Bowman Date: Sat Feb 21 03:21:58 2009 -0600 Fix appearance of TeXHead3 on curved paths. Fix alignment of DefaultHead2, HookHead2, and TeXHead2 arrows. Pass arrowheadpen to 2D arrow routines when settings.render=0. commit 00bc1d73f58646e2f23f5f4cf0149d157c52defd Author: John Bowman Date: Fri Feb 20 18:30:32 2009 -0600 Use abs(camera-target) rather than just the z component for camera adjustment. Add showtarget parameter to projections. commit 014a1d03c801fa803bb5e297279483b097925ca3 Author: Orest Shardt Date: Thu Feb 19 21:14:42 2009 -0600 Improve selecton of perpendicular vector. commit 5b846e76f5ac0313a81dea335d7600710743f482 Author: John Bowman Date: Thu Feb 19 17:46:20 2009 -0600 Fix typo. commit 902f2734304e84a1597f5215a929c20733ba2888 Author: John Bowman Date: Thu Feb 19 12:00:11 2009 -0600 Increment version to 1.66svn. commit 709ad6bb870e69511fa3b402a3477b1f2178e73b Author: John Bowman Date: Thu Feb 19 10:33:22 2009 -0600 Fix pdflatex output. Implement xelatex engine. Fix xelatex alignment. commit 9e19c35fde997a1a4d1a5705469fcbdc415b6fed Author: John Bowman Date: Thu Feb 19 02:19:28 2009 -0600 Increment version to 1.65svn commit 5e85772d82e096c8bc6df52d6f7fff900e60d665 Author: John Bowman Date: Thu Feb 19 01:24:03 2009 -0600 Force shipped=true also for pictures. Install *.view files. commit 844b91404ec12d951246fdf05c3a8998669dbf44 Author: John Bowman Date: Thu Feb 19 00:13:31 2009 -0600 Change default value of ysize parameter of asyinclude. commit 9625ea38a5e8c89861a31cae6ef63ef0b4dc2cdf Author: John Bowman Date: Thu Feb 19 00:08:44 2009 -0600 Add Protein Data Bank example that illustrates how to set predefined views. commit 5cc82637149d0952582edf6849451575fba35f3f Author: John Bowman Date: Wed Feb 18 23:13:48 2009 -0600 Change dots to underscores in movie15.sty file names. commit 9dbbac7fdab37f6967232dda8e299b96b0adc3fd Author: John Bowman Date: Wed Feb 18 22:03:22 2009 -0600 Add text of LGPL license for PRC code; LICENSE is in parent directory. commit a09d1c1a35352d51ab4906aa904a153bce91a10c Author: John Bowman Date: Wed Feb 18 22:01:08 2009 -0600 Upgrade license of PRC code from GPL to LGPL (agreed to by Orest). commit 6f376fee744b97dd4e75672304ed265f145edd79 Author: John Bowman Date: Wed Feb 18 21:27:47 2009 -0600 Update FAQ. commit 1d9c28b6f19f5d762b6aad2e81e4792ce5c311a4 Author: John Bowman Date: Wed Feb 18 20:38:33 2009 -0600 Fix file path. commit 8944f939542c801fd26b986de5593c4c846491d1 Author: John Bowman Date: Wed Feb 18 20:32:41 2009 -0600 Add interactive 3D examples to intro.asy. Make GaussianSurface smooth. commit 9bd9020de556be40f447c0dccc592be0e8965f3a Author: John Bowman Date: Wed Feb 18 16:06:16 2009 -0600 Strip directory from animation prefix. Don't delete generated animation.pdf file. commit e3151ea29894774140164fd929258085db87e513 Author: John Bowman Date: Wed Feb 18 08:58:32 2009 -0600 Add support for xelatex pdf specials, using the "literal" keyword. commit 17dc9dbf0c34cadde1425947ce0417a5ff03b4f7 Author: John Bowman Date: Wed Feb 18 08:38:48 2009 -0600 Generate PythagoreanTree if needed. commit f4fd594c8f0ef695d457ba6cf262d55edcea8b91 Author: John Bowman Date: Tue Feb 17 22:34:10 2009 -0600 Don't force target to be part of control volume for absolute projections. commit 66fd72aecc79a00cf89a6e1f7b990e3b3f667a60 Author: John Bowman Date: Tue Feb 17 22:25:41 2009 -0600 Increment version to 1.64svn. commit 4300efa1d0b99432dfcdc47cc5345bd491478706 Author: John Bowman Date: Tue Feb 17 20:51:20 2009 -0600 Force the target position to be inside the bounding volume. Remove duplicate definition of rectify(triple). commit e3cc6bf9d4d8fa34e2755d0ddaf2636cafc6192a Author: John Bowman Date: Tue Feb 17 17:37:06 2009 -0600 Fix handling of invisible surfaces. commit 26e310e850ea3c9bd5ece5faf3df72217e89b75c Author: John Bowman Date: Tue Feb 17 10:07:42 2009 -0600 Fix synchronization of interactive rendering. commit b797cbbe7c0f43e7bf054acd484110259737abc0 Author: John Bowman Date: Tue Feb 17 02:05:33 2009 -0600 Avoid spurious xelatex warning messages due to null (placeholder) graphics files. Add patched version of movie15.sty for xelatex users' convenience. Simplify embed.asy. commit 6dfbfac2d7e8f1c5234e4bc3d5fda906fb8efe2b Author: John Bowman Date: Tue Feb 17 01:30:54 2009 -0600 Improve guide collection for non-midpoint case. commit 333afac78848c4bddfe2aa42cb2656fa521eec9b Author: John Bowman Date: Sun Feb 15 13:20:10 2009 -0600 Generalize definition of middle to arbitrary quadrilaterals. Avoid need for interpolating function at cell midpoint; use 2 triangles instead. Use nmesh instead of (poorly named) ncell parameter for 3D contours. commit 743db1d76b55182cb33edc23fece8466b85212f5 Author: John Bowman Date: Sun Feb 15 13:13:24 2009 -0600 Handle degenerate and nondegenerate rendering consistently. commit c5fd7b5465551828e93a812e8d07fcba1e5b3396 Author: John Bowman Date: Sat Feb 14 12:22:48 2009 -0600 Implement complex gamma function in C++ code. Add interactive 3D surface of revolution example to slidedemo. commit 85ed3b5790ddf7d44af6bde3000df7d142c7256b Author: John Bowman Date: Sat Feb 14 10:58:01 2009 -0600 Disable graphic generation when view=true. commit 52149357e57a56ecbaee9e594d574bda4749a60e Author: John Bowman Date: Fri Feb 13 01:10:23 2009 -0600 Add 3D (and other multimedia) support for xelatex. commit 1f7c14ac96ae1faa0ea06106b5af567c1593fed0 Author: John Bowman Date: Fri Feb 13 00:54:37 2009 -0600 Improve pdf format detection. commit f394d80486877735f35a21cf17aad38fbbfe1f6d Author: John Bowman Date: Fri Feb 13 00:49:37 2009 -0600 Fix preview generation. commit 2b1016f627b45298cb776e1480eb9adfe60fb7b9 Author: John Bowman Date: Thu Feb 12 23:42:05 2009 -0600 Automatically include rendered images when fitting nonprc pictures. commit 41b476d67efadc14a2ab16e17e0d1ce8b773b326 Author: John Bowman Date: Thu Feb 12 00:24:54 2009 -0600 Patch compilation errors in pstoedit-3.45. commit 78ec096135b4c6a2680c01ac70b890b53654642a Author: John Bowman Date: Thu Feb 12 00:16:52 2009 -0600 Replace old-style constructors with operator init. commit 6136dc64cf325d025f1c26559b1dd327b4d12b83 Author: John Bowman Date: Wed Feb 11 23:01:19 2009 -0600 Add electromagnetic spectrum. Make minor ticks work properly with custom logarithmic axes. commit 137677e8aa6e9763002d2bbdb0bca9d883b99339 Author: John Bowman Date: Wed Feb 11 17:17:38 2009 -0600 Don't report error on eof after reading 0 values from file. commit a6e6b4ed261bfc1146fc9245d3cc77085e26b2c3 Author: John Bowman Date: Wed Feb 11 16:55:26 2009 -0600 Handle one-column legends correctly (patch contributed by Martin Wiebusch). commit bc9f784dff27f6bffd20941b64594f4f5cfc58e8 Author: John Bowman Date: Wed Feb 11 16:33:45 2009 -0600 Fix pstoedit support: remove duplicate beginclip/endclip functions. commit 6b5a85386c4bb8987f7ce9ead2aa542e84383e76 Author: John Bowman Date: Wed Feb 11 01:29:52 2009 -0600 Update unicode documentation. commit e48449c3a41cdbc148fa817dd408f90f9dbb8b68 Author: John Bowman Date: Wed Feb 11 00:22:23 2009 -0600 Support xelatex again. Note that this experimental tex engine does not yet support pdf specials (required for label clipping and label transforms) or the movie15 package (required for 3D PDF files). commit 57fb0bf9cb05e70bafe2b8f1a61f226fa66813b2 Author: John Bowman Date: Mon Feb 9 01:16:59 2009 -0600 Increment version to 1.63svn. commit 05b8f1cdfce4ddd6f7fb064e353720388a8ad314 Author: John Bowman Date: Mon Feb 9 00:00:12 2009 -0600 Implement a pen rgb(string s) routine that returns a pen corresponding to a given 6-character RGB hexidecimal string. commit a68637e6c82f5ce5171931a5c1a5359bb329e86d Author: John Bowman Date: Sun Feb 8 23:14:02 2009 -0600 Reformat C++ files. commit 46c4f8d767fda269a6965fd4594ae938254b9d76 Author: John Bowman Date: Sun Feb 8 22:22:15 2009 -0600 Reformat and untabify base files. commit 5f3974b82a5e114737827bc4fdd9f0cbe405b968 Author: John Bowman Date: Sun Feb 8 11:19:04 2009 -0600 Add Label arguments to more of the dot routines. commit 301c79a5b6c68ca6bc7de0e7ae88177ddbce9f71 Author: John Bowman Date: Sat Feb 7 14:08:26 2009 -0600 Add parametric version of markuniform. commit b08d2bd76c59e4f21bf7f0e9c80ee5b1cd8b8c2f Author: John Bowman Date: Sat Feb 7 00:41:46 2009 -0600 Implement int hex(string s) function that casts a hexidecimal string to an integer. commit 77595bbb56fc7489ccfa2123c3d33b19a43de9a3 Author: John Bowman Date: Fri Feb 6 20:04:56 2009 -0600 Add default picture argument. commit a5f6409777ceb4b76df34caa9d35aedef99ac5f0 Author: John Bowman Date: Thu Feb 5 03:38:31 2009 -0600 Fix asy -f pdf -o temp/venn. commit 1b3d770eb47e9a4fcce6b51aeb9d2ecc08bf8664 Author: John Bowman Date: Thu Feb 5 03:36:16 2009 -0600 Increment version to 1.62svn. commit bdfa3acd0bacbbbb11066c92504369f92e1f5c33 Author: John Bowman Date: Thu Feb 5 02:35:32 2009 -0600 Prevent multiple shipouts in venn example. commit 8a08bc6ad839d86769c40d52fad154afd7f2db9a Author: John Bowman Date: Wed Feb 4 23:43:29 2009 -0600 Change nopapersize.ps to use letterSize/a4size to work with the current MiKTeX version of dvips, which does not support the DVIPSRC environment variable. commit 8e7aebbb838904760d4d728b11818c3c5fa0e761 Author: John Bowman Date: Wed Feb 4 23:14:53 2009 -0600 Indent. commit 530aa12cdb6f173f18653d7ffd99b27bff870efd Author: John Bowman Date: Wed Feb 4 23:13:24 2009 -0600 Fix aspect ratio on re-entry. commit dfd1d4874c066e411710829a0eee9eaa6ffa3c74 Author: John Bowman Date: Wed Feb 4 20:04:07 2009 -0600 Add Pentype function to return a pen of increasing colour and linetype. commit 9bae8efdc88b2842d4dbf27bbc516ed42a306f27 Author: John Bowman Date: Wed Feb 4 18:50:25 2009 -0600 Fix typo in URL. commit b5118109e681c6a3fc30f53a1445ec938bc86dbe Author: John Bowman Date: Wed Feb 4 09:57:55 2009 -0600 Re-enable freeglut extensions to support user-specified multisampling again. commit cf2107e5fc31f77c688d0f3e2b54786ddc2c3559 Author: John Bowman Date: Wed Feb 4 09:47:24 2009 -0600 Destroy any existing export window before entering View mode. commit 871271ee9d21c2f90442a2d6bacb632079832488 Author: John Bowman Date: Wed Feb 4 00:46:20 2009 -0600 Remove spurious \phantom{+}. commit ae4540d47733b206d1de70982125423cc4dde4eb Author: John Bowman Date: Wed Feb 4 00:33:34 2009 -0600 Fix asydir(); under CYGWIN. Add missing CYGWIN prototype. commit 3a9e92a066756fb8ad252fd1935d955054943d37 Author: John Bowman Date: Tue Feb 3 23:53:23 2009 -0600 Remove -P pdf as this breaks file attachments. commit 810f6f845a864d4cddc2dc0d9e7502f6012e678a Author: John Bowman Date: Tue Feb 3 23:32:40 2009 -0600 Fix segmentation fault due to spurious window creation in export loop. commit ee48135b6016801872fd526b8ce26bb843807aa8 Author: John Bowman Date: Tue Feb 3 23:27:54 2009 -0600 Add string[] to int[] ecast. commit 0e66e1673cac08a8bd71ebf49392a7f739a3f010 Author: John Bowman Date: Sat Jan 31 12:49:19 2009 -0600 Fix dvipsOptions. Don't allow dvipsOptions to override -tnopapersize. commit 0cb84fd14cddaf20e930acc24cae3a2f7ee56b28 Author: John Bowman Date: Sat Jan 31 11:18:22 2009 -0600 Update dvipdf to correspond to the latest ghostscript svn source. commit 6e67b82c4e07bfcd7c2ba9ceb26b3a797a2d5e4f Author: John Bowman Date: Sat Jan 31 09:29:42 2009 -0600 Warn that silhouette routine is intended only for 2d projections. commit 764f7f92b8711a5c7da62797d5f3b3c75413a7c8 Author: John Bowman Date: Sat Jan 31 00:22:51 2009 -0600 Enforce the same zerowinding fillrule used by dvips. commit 54342b62220f756c79ec1716bf31c275a4cbeef2 Author: John Bowman Date: Sat Jan 31 00:07:10 2009 -0600 Rename nosize to nopapersize for clarity. commit d0d1e6094c87254a93efd85363a38d95200f4f6a Author: John Bowman Date: Fri Jan 30 23:58:28 2009 -0600 Workaround dvips misconfiguration in TeXlive 2008 (and possibly other new TeX distributions) that introduces unwanted %%BeginPaperSize commands into the EPS output. commit 0200020ab140143bedc07cf27baf8d2c47e3dba7 Author: John Bowman Date: Fri Jan 30 17:26:56 2009 -0600 Reinstate -q (-quiet) option. Update asymptote.py to use -interactive option. commit 93bcf2e4d0bec3afc58066273aeb9f5c2f90fda0 Author: John Bowman Date: Tue Jan 27 15:38:53 2009 -0600 Work around dvips configuration errors on some systems by enforcing no paper type comments. commit 80e59335e7ed42f326c06612f456a904d4acf327 Author: John Bowman Date: Tue Jan 27 09:40:48 2009 -0600 Rename file. commit aae56cc06b6d59a4c1b5dada20b29b739ac93b05 Author: John Bowman Date: Mon Jan 26 23:17:28 2009 -0600 Increment version to 1.61svn. commit f13663d2bf1b956068f6d290284b3c38372a291a Author: John Bowman Date: Mon Jan 26 22:01:00 2009 -0600 Fix surface condition type. commit ac29281656284dd3687db1f6a93b82bae89ec239 Author: John Bowman Date: Mon Jan 26 18:58:00 2009 -0600 Simplify notation. commit 3b01508d946b86c3692173d844b7a9941f47880a Author: John Bowman Date: Mon Jan 26 18:12:17 2009 -0600 Remove diagnostics. commit 4520d29d9414c0dcaf479193c28f48e31184c943 Author: John Bowman Date: Mon Jan 26 18:11:23 2009 -0600 Improved marker alignment. commit faaefc8bccd2ecd01b0e9f0b3e8d4a63f5f512a0 Author: John Bowman Date: Mon Jan 26 17:48:24 2009 -0600 Force a new guide after omitting points in conditional graphs; avoid spurious empty guides. commit caa1af28ceab79157c53a0c758accdd595ee30f4 Author: John Bowman Date: Mon Jan 26 17:00:49 2009 -0600 Improve axis label. commit 101ee3595eeefb53f2ecd6a117019d03ae9db5a9 Author: John Bowman Date: Mon Jan 26 16:59:40 2009 -0600 Simplify example. commit 4c8f0feb77e877116952cba3e86c2afb3a654584 Author: John Bowman Date: Mon Jan 26 16:56:55 2009 -0600 Add floor example. commit 758a700ec3a46e5382e4d95560ec6fdccedd1280 Author: John Bowman Date: Mon Jan 26 13:54:20 2009 -0600 Fix read from pipe failed error under MSDOS. commit 7a24e4671880b20b56e03feb491fb3ce779cd1ad Author: John Bowman Date: Mon Jan 26 00:18:19 2009 -0600 Allow xasy to be run from a write-protected directory under UNIX again by implementing broken (8.3) format tempdir workaround only for MSWindows. commit 5ff176eebba9c7cf103a0aa37f70bf45d8af81ad Author: John Bowman Date: Sun Jan 25 09:58:27 2009 -0600 Catch out of memory errors. commit ecbd15211297bf751e7b42745d6f5b6de475c661 Author: John Bowman Date: Sat Jan 24 22:05:45 2009 -0600 Remove LocalWords from FAQ. commit 2eae4b4154364c1ae70a80a43fedd36f5efa40e5 Author: John Bowman Date: Sat Jan 24 18:46:47 2009 -0600 Recommend svn version of freeglut only for UNIX systems with graphics cards that support multisampling. commit 8b2834aa4ba6d98806f5a723e801d17b0fcc4865 Author: John Bowman Date: Sat Jan 24 18:29:36 2009 -0600 Catch unhandled exception when exporting to write-protected directory. commit 9e307c6e5c7b27a8e2c7545e9034ab377cc7f990 Author: John Bowman Date: Sat Jan 24 16:21:27 2009 -0600 Modify yum instructions for obtaining most recent version of Asymptote. commit 52669b851dcf713cc2f117f1ecdfd674b0c062f0 Author: John Bowman Date: Sat Jan 24 15:57:49 2009 -0600 Use default for bool3 initializer. Change condition array for graphs to bool3[]. Add more bool3 support functions. Reformat base files. commit 50b00f2ce388f9a963744b8110b20fd71debd1e0 Author: John Bowman Date: Sat Jan 24 13:34:04 2009 -0600 Work around inability of movie15.sty package to handle spaces in filenames. commit 23298930e7cdbeee504ef3adb2f06dabd0a52e53 Author: John Bowman Date: Sat Jan 24 12:07:14 2009 -0600 Add gettriple routine. commit 1ee716c8a7303a7e2d2c06ce171948121511b96c Author: John Bowman Date: Sat Jan 24 12:04:57 2009 -0600 Don't regenerate asy-keywords.el with make install-asy. commit 8e884245f07062d284c0248b436fa362567d640a Author: John Bowman Date: Sat Jan 24 11:30:30 2009 -0600 Emphasize that settings.outformat="pdf" must be set before three.asy (or graph3.asy) is imported. commit d8fdc5bc766f7f73cd5c8353be662caaea1504c6 Author: John Bowman Date: Sat Jan 24 11:05:21 2009 -0600 Document and standardize usage of bool3 type. commit df0dc74326a7f04826e91d13a2faa75e76a1e7d7 Author: John Bowman Date: Fri Jan 23 23:38:32 2009 -0600 Simplify and document graph interface routines. Make cond argument of graph a bool3(real) function, to allow one to distinguish between points that should not be plotted and points belonging to a new branch of the graph. commit 2c817b9ca4fe5f5d83cd881bc176e148b2617e5f Author: John Bowman Date: Thu Jan 22 11:13:15 2009 -0600 Simplify example. commit 18db9ab6ace1d69723eae0b738f3da438bb6dc7c Author: John Bowman Date: Thu Jan 22 11:06:32 2009 -0600 Improve branch test. commit 468ba41e50b90e332cd0ee5ac9d854e582996456 Author: John Bowman Date: Thu Jan 22 00:00:55 2009 -0600 Make graph routines return a guide[]. Add casts from guide and path arrays of length 1 to guides and paths, respectively. Add 1/x disconnected graph example. commit 1614388547aaeaba32fb73f2a48ba37314f47a31 Author: John Bowman Date: Wed Jan 21 22:31:18 2009 -0600 Avoid warning message. commit 0c249ad98ae12767a82245b312ae20d80cdc0f51 Author: John Bowman Date: Wed Jan 21 22:24:26 2009 -0600 Use cmyk function. commit 67c42e5be801b4b9c41f39a6aae1942afe2887ac Author: John Bowman Date: Wed Jan 21 22:22:08 2009 -0600 Fix default condition arguments. commit 8ed9d79ad3fc64010518c71afcf44c099e7479fe Author: John Bowman Date: Wed Jan 21 20:26:12 2009 -0600 Remove obsolete +cmyk construct. commit 1456301b60008d69b16d81d27e3bbb12cd1fcd76 Author: John Bowman Date: Wed Jan 21 18:33:26 2009 -0600 Improve stack overflow diagnostics. commit 3aea38afad9ce32a7c69fcc7b7071f3717abdd0e Author: John Bowman Date: Wed Jan 21 13:42:46 2009 -0600 In interp, first promote pens to the same colorspace. commit 5f7181d05ce0428db888ab025b1428e7e6b625a0 Author: John Bowman Date: Tue Jan 20 01:06:34 2009 -0600 Add optional bool cond(real)=null to 2D and 3D graph routines for functions. commit 92218def6d5a2441e8dea3616ac38c8ec1d57ef4 Author: John Bowman Date: Mon Jan 19 01:08:52 2009 -0600 Increment version to 1.60svn. commit f236aa4d54edf39380f4728a05a48da895a22a76 Author: John Bowman Date: Sun Jan 18 23:40:04 2009 -0600 Clean up aux files. Fix aux conflicts in slide.asy. commit 9c29f49996676b34d6e03f172d507d87fb5db1de Author: John Bowman Date: Sun Jan 18 23:05:29 2009 -0600 Unlink texput files from proper directory. Remove any old texput.aux file before creating TeX pipe. commit bb5215873b3c7bd55202b36a00734ee916ee311c Author: John Bowman Date: Sun Jan 18 22:20:57 2009 -0600 Fix defaultfilename in asy(string). commit 1c0a03c7affcd5c71ec3b8f972852af0366ecfc8 Author: John Bowman Date: Sun Jan 18 16:59:34 2009 -0600 Handle nonintersecting paths. commit 001a95cb112128ee6dc26fc6d26a18318a03f85f Author: John Bowman Date: Sun Jan 18 15:54:15 2009 -0600 Add missing final long_opt entry. commit ca6b80ba33c0921714cdc7c8f78b9660f0dfbaea Author: John Bowman Date: Sun Jan 18 13:59:10 2009 -0600 Fix mixed export/View rendering. Wait for pid to finish with -nothreads. commit f03e2bda783aec28a216674f59c5fb08924105c9 Author: John Bowman Date: Sat Jan 17 13:33:51 2009 -0600 Simplify example. commit aaf6df33fa78329e2a12156923c7f59e89a3cde1 Author: John Bowman Date: Sat Jan 17 12:39:15 2009 -0600 Fix plain tex font scaling. commit 86fe7241b7e8f15fa23cc3e0fc0a3027569fa246 Author: John Bowman Date: Tue Jan 13 09:25:51 2009 -0600 Fix typo in manual. commit b71578ce10460a1795aafbc2de6f22f8c9811dd8 Author: John Bowman Date: Tue Jan 13 09:23:56 2009 -0600 Transform margin paths. commit 0b4d1a83478d15f4e7c4c63573d67c3e4751b181 Author: John Bowman Date: Tue Jan 13 09:14:11 2009 -0600 Add missing filltype option for projected 2D arrowheads. commit 059133273986ee197b1a0e05200931e238e7ae6b Author: John Bowman Date: Mon Jan 12 01:49:48 2009 -0600 Clean up html files. commit c56d94c948042b03849953a5ca5b6105e018c87a Author: John Bowman Date: Mon Jan 12 01:48:36 2009 -0600 Generate html files into doc/png. commit 99ce03a0fe5ee871ce058451fe4ec6382bde51d3 Author: John Bowman Date: Mon Jan 12 01:09:38 2009 -0600 Set "Start in" directory for xasy to %USERPROFILE%. commit d32ba1c815176d6686059f51080721fce2bc2671 Author: John Bowman Date: Mon Jan 12 01:02:03 2009 -0600 Increment version to 1.59svn. commit cc304c7d54383cfe52410c0bbdd998086b90eab2 Author: John Bowman Date: Sun Jan 11 23:38:42 2009 -0600 Draw 2D arrowheads when projecting to 2D. commit 516aae17ec5c5ee067e2131bc092431c5042cba9 Author: John Bowman Date: Sun Jan 11 19:06:17 2009 -0600 Cache asy.list. commit c383fdf7bae0d30006a8e825fc1ef7430360e16f Author: John Bowman Date: Sun Jan 11 18:55:54 2009 -0600 Fix include order. commit 5ce54e657c3ff5da1fc6b49cf1722eb009c7f041 Author: John Bowman Date: Sun Jan 11 18:30:14 2009 -0600 Work around incompatibility of latex with DOS directory names. commit 048dccd54fc396f3714ad0f64909dde004d3e56e Author: John Bowman Date: Sun Jan 11 14:00:17 2009 -0600 Port to latest version of CYGWIN glut.h header file. commit 1802826d41afa5ef171a198d120dc36f34119a17 Author: John Bowman Date: Sun Jan 11 11:14:54 2009 -0600 Disable PRC for silhouette examples. commit 747bf389a75a1b072c2a586205da071974137f51 Author: John Bowman Date: Sun Jan 11 11:03:18 2009 -0600 Remove temporary asyinclude file. commit ffff57d132fa5ad68244c301c6a254a01eab29cf Author: John Bowman Date: Sun Jan 11 09:42:47 2009 -0600 Draw a central transverse slice when m=1. Simplify spheresilhouette example. commit 5c7374c594922feab7918007c64934683c727288 Author: John Bowman Date: Sun Jan 11 00:11:57 2009 -0600 Increase example size. commit 6861fffd47dfec4a14b861584a4f5cef5cde1cf3 Author: John Bowman Date: Sun Jan 11 00:09:42 2009 -0600 Add silhouette examples. commit 0047253a56043d6719589ce072cf3096974fdb36 Author: John Bowman Date: Sat Jan 10 19:06:20 2009 -0600 Fix silhouette routine. commit 002ae3d953e36891bec8823e9808ebf120b061aa Author: John Bowman Date: Sat Jan 10 17:08:00 2009 -0600 Fix magnitude of pair axes label alignments. commit 563e3aac0e32cc00f8dc174d74f89078df2d3587 Author: John Bowman Date: Sat Jan 10 12:32:02 2009 -0600 Remove broken axis label alignment adjustment code. commit f0ea749693a65015ada26d0ea5e0b63a29dd65d1 Author: John Bowman Date: Fri Jan 9 23:43:57 2009 -0600 Address nullpath issues. commit 8748b682068b7f19ef11fbcb4fd59777a7e0e4bd Author: John Bowman Date: Thu Jan 8 23:31:58 2009 -0600 Indicate real values with red. commit 17082621236c24715f37e1388468a1c79226bb16 Author: John Bowman Date: Thu Jan 8 23:00:07 2009 -0600 Add Wheel palette and example of complex Gamma function. commit ac4ecce121491bde69d145c85905e7b027f1ec63 Author: John Bowman Date: Thu Jan 8 01:14:48 2009 -0600 Fix conflict with breqn package. commit 6f3303e24634254458f68f64e19b5defe29c5537 Author: John Bowman Date: Tue Jan 6 23:02:00 2009 -0600 Implement ArcArrow3, etc. commit 1ee69c6f1852ff257e5355fdf99bf5d1f12ae4ca Author: John Bowman Date: Mon Jan 5 23:09:35 2009 -0600 Fix interp(pen,pen,real) by reverting to standard pen addition. Fix cmyk(rgb(black)). commit ed6391bbf8700ec50b151f140f52b6c8a0176a59 Author: Andy Hammerlindl Date: Sun Jan 4 14:47:12 2009 -0600 Report errors of arguments in illegal function call. commit c8b92ebe85b4982c8651fe90ba103e08041ab3b0 Author: John Bowman Date: Thu Jan 1 12:34:19 2009 -0600 Add missing file. commit 033502b10640b65185b78cc1e66d54a8562f230e Author: Andy Hammerlindl Date: Wed Dec 31 22:44:59 2008 -0600 Added support for open function signatures. commit 5e34a64ae2238eea776cafb0ec404ea91cb2f67c Author: John Bowman Date: Wed Dec 31 17:29:27 2008 -0600 Exit interactive mode on EOF, unless exitonEOF=false. commit a010f63aeeec0dc8fccf7ae6e885304ba4ae25bf Author: John Bowman Date: Wed Dec 31 16:10:39 2008 -0600 Add copy constructor TODO entry. commit e24c735878e98185646dd22b5404dd142befa5db Author: John Bowman Date: Wed Dec 31 11:01:44 2008 -0600 Add example of factoring out an axis scaling. commit 9e4ba2ebf3374ddaa133355da4ab660a5ca52ee1 Author: John Bowman Date: Wed Dec 31 10:32:10 2008 -0600 Change VERSION from a function to a constant. commit d31f008822443a6438ed7db1913a271629c54b3f Author: John Bowman Date: Wed Dec 31 09:19:16 2008 -0600 Allow compilation without HAVE_LIBGLUT. commit 8d8b497afe39a27026af173f1147fa6704def4d1 Author: John Bowman Date: Tue Dec 30 23:19:29 2008 -0600 Clean up texput files. commit 112eb1d8a921e53d67839aa574eb7d0c27282f98 Author: John Bowman Date: Tue Dec 30 23:10:19 2008 -0600 Revert previous pen changes; make operator + on grayscale pens a maximum operator. commit 93bd6e0aaa83534744a3e5a60f3997afcf67278d Author: John Bowman Date: Tue Dec 30 17:46:26 2008 -0600 Add missing file. commit df1440968b940455e6e8266ae0a6fc963f0e5089 Author: John Bowman Date: Tue Dec 30 17:43:13 2008 -0600 Add dependency. commit 25f258f4c94edebbf063c871a78494b5dea5bf83 Author: John Bowman Date: Tue Dec 30 17:31:36 2008 -0600 Fix pen addition involving colorless pens. commit e811594daaf4cd72706fb3b4989ccbcc9f06bac0 Author: John Bowman Date: Tue Dec 30 17:13:45 2008 -0600 Build png images for manual in a separate directory so that they don't take precedence over pdf files. Center images in manual. Update modified dvipdf. commit c33928376291116ee0b3d27971432a27ffae8a2e Author: John Bowman Date: Tue Dec 30 09:37:34 2008 -0600 Make pen arithmetic consistent across colorspaces. commit 2b16cde3092731214c2734c132375b3400c69b4c Author: John Bowman Date: Fri Dec 26 15:29:53 2008 -0600 Fix error message. commit a7e96860e96b83d42b7f0abe9f1a61c59761a640 Author: John Bowman Date: Sun Dec 14 22:07:10 2008 -0600 Improve tick adjustment. commit f48785900c46a4f7f73f0e5bd38bf18b3c9e4294 Author: John Bowman Date: Sun Dec 14 01:17:54 2008 -0600 Increment version to 1.58svn. commit 69b9c3a90fc92df531cd5b0f0efc821d95e2b376 Author: John Bowman Date: Sun Dec 14 00:53:35 2008 -0600 Use asy.bat instead of asy.exe in MSWindows start menu link. commit a15d3d019d82e1e734ee6961a6adb4a8079f0524 Author: John Bowman Date: Sun Dec 14 00:01:18 2008 -0600 Resolve ambiguity. commit 414f39ea34aa3d2b59bbc69118085f7720c0b03e Author: John Bowman Date: Sat Dec 13 23:50:31 2008 -0600 Fix picture sizing with beginclip/endclip. commit 7acff952eac90aae634e9e341c88e17b53140d78 Author: John Bowman Date: Sat Dec 13 23:12:21 2008 -0600 Add beginclip(picture) and endclip(picture) functions. commit 51c65ed4fc2dfc8890e5e3230975c5da31581f9c Author: John Bowman Date: Sat Dec 13 22:55:58 2008 -0600 Allow clipping across page boundaries. commit 51fa23a6c1f5a1ce9a14ab0fe7021c95a0af45c7 Author: John Bowman Date: Sat Dec 13 13:04:41 2008 -0600 Simplify example. commit 5d68758dec150b173b861bed935b9b007cfda2d3 Author: John Bowman Date: Sat Dec 13 13:02:09 2008 -0600 Add example of aligned objects and envelopes. commit 181fb85c90758a5ba14b73fefbf4fd349e317213 Author: John Bowman Date: Sat Dec 13 13:00:20 2008 -0600 Add object(Label, envelope, ...) constructor. Support object transformation and alignment. commit 89516fc6a26ca4b4ae205810e780d10a66336180 Author: John Bowman Date: Fri Dec 12 22:31:00 2008 -0600 Fix plain tex font size. commit f42c1047ba0cc6b48252e071f52acc33eb6774d7 Author: John Bowman Date: Thu Dec 11 23:19:17 2008 -0600 Improve axis coverage calculation. commit 2a95e16eedfe2f3efff147d5619df51607573b4c Author: John Bowman Date: Wed Dec 10 11:02:14 2008 -0600 Simplify font(string name, real size). commit 354e080d458273533b809bc143d22783f6d9ec3c Author: Andy Hammerlindl Date: Wed Dec 10 10:43:09 2008 -0600 Handle empty history in get/setLastHistoryLine. commit 40d2017d22e98ceee80e5cfbbaa81974fcd8e565 Author: John Bowman Date: Tue Dec 9 03:06:46 2008 -0600 Use defaultfilename in asy(string). commit 45f64bb4bac96f96bae81a74362ab81604911d27 Author: John Bowman Date: Tue Dec 9 02:19:06 2008 -0600 All temporary files are now generated in the directory specified by the -outname command-line option. Make outname a read-only setting. Check if the output directory is writeable. commit f99d9edfe6982095376094b01117fe0a6761bb2a Author: John Bowman Date: Mon Dec 8 21:44:52 2008 -0600 Add diagnostic. commit ecf8129b3978ab5589eb1568bbc471df0c4d6554 Author: John Bowman Date: Mon Dec 8 21:44:17 2008 -0600 Make default MSDOS "start-in" directory %USERPROFILE%. commit 0dffc47a3e72fb3d33d1e4da8ae69135f0143bce Author: John Bowman Date: Mon Dec 8 21:43:28 2008 -0600 Fix diagnostic. commit 8b84cbd701e587bcb0cfda2323cb323b04df5140 Author: John Bowman Date: Mon Dec 8 20:47:47 2008 -0600 Add optional basesize parameter to font. commit bac13dc46d28516dd12bfa067566322a6ae4e65e Author: John Bowman Date: Mon Dec 8 18:15:06 2008 -0600 Fix pdflatex texengine; abandon xelatex support since xelatex does not support pdf specials anyway. commit 9d79a394539ff8bf6044e14878851a2792cda419 Author: Orest Shardt Date: Mon Dec 8 16:44:46 2008 -0600 Handle failure to lauch external editor cleanly. commit c3d171565ecb5af926d0db6922394821928d78ea Author: John Bowman Date: Sun Dec 7 14:57:02 2008 -0600 Update link. commit 28ceef2c78e55bb3a89b3b19dd6c5224583468d0 Author: John Bowman Date: Sat Dec 6 23:28:51 2008 -0600 Update documentation of xasy installation. commit 34260991dd4b8712ccb7393c17762440d15ed9a1 Author: John Bowman Date: Fri Dec 5 22:46:08 2008 -0600 Increment version to 1.57svn. commit 9f29de60f80817e9471bdf3c80889b324d5e339b Author: John Bowman Date: Fri Dec 5 19:33:56 2008 -0600 Fix documentation of grid3. commit af5bb7c379246be9b734d152addfaeca6623b729 Author: John Bowman Date: Fri Dec 5 19:24:27 2008 -0600 Add examples of using grid3 with scale(true). commit 805c95c531aeabdd1749e53c00b943b448bffc8e Author: John Bowman Date: Fri Dec 5 19:24:04 2008 -0600 Fix bounding box bug by clearing \ASYbox dimensions for latex as well as for pdflatex. commit aae84baab6437781971ab08cf395156f2d749f9b Author: John Bowman Date: Fri Dec 5 19:21:06 2008 -0600 Round font scaling to the nearest integer. commit 60a22d13ecea048aa51b9abcba6d80a859db3d4f Author: John Bowman Date: Fri Dec 5 11:27:49 2008 -0600 Add asyinclude function for including 3D PRC graphs in slides. Update grid3 documentation. commit 5b0bc1727b53df6b08e724866a8e9a24f5bbc3fb Author: Philippe Ivaldi Date: Fri Dec 5 03:45:16 2008 -0600 Fix version commit 369a2bc503053e27eafa9d368a80c7f2b17d00e1 Author: Philippe Ivaldi Date: Fri Dec 5 03:36:20 2008 -0600 Fix handling the environment asydef within lasy-mode. commit 3a808696c835bfa983096a26d35fd927b146a3ad Author: John Bowman Date: Thu Dec 4 10:26:58 2008 -0600 Fix shipout(wait=true). commit 89505a37e705405424566f8d6015ee77db0ae55e Author: John Bowman Date: Tue Dec 2 04:24:02 2008 -0600 Increment version to 1.56svn. commit 9354191a7fa1fa719121f331264c931afae0a544 Author: John Bowman Date: Tue Dec 2 01:15:16 2008 -0600 Remove obsolete field of view factor. commit ba00ab847d6f56929a55ca0d87b7c770e8511973 Author: John Bowman Date: Tue Dec 2 01:03:58 2008 -0600 Add user=true argument to 3D point(picture) and size3(picture) routines; add truepoint routine. Add triple invert(pair z, projection P=currentprojection) routine that inverts a pair z onto the projection plane. commit d40482868635407bc38cd7ef6c1c5d49ed2ce38a Author: John Bowman Date: Tue Dec 2 00:41:41 2008 -0600 Fix more guide to path problems. Update guide tests. commit 4aab933ee9204bd7b3436f8db5c402f4e5ba42fa Author: John Bowman Date: Mon Dec 1 12:47:38 2008 -0600 Fix drawing of paths of length 0. commit 97cfcb1a33c55b34161cc2a4896c63fa7edd757d Author: John Bowman Date: Sun Nov 30 21:00:12 2008 -0600 Increment version to 1.55svn. commit f6246129093e76b83e1d69827d44e89aa5f0e56b Author: John Bowman Date: Sun Nov 30 18:19:15 2008 -0600 Document need to remove latexusage_.pre along with latexusage-* and latexusage.aux when switching between latex and pdflatex usage. commit f3be75761c0c5c38bd057278606e433d9292abaa Author: John Bowman Date: Sun Nov 30 17:42:36 2008 -0600 Fix final specifiers in guide examination routines and reverse(guide). Fix reverse(guide3). Control points should trump direction specifiers. commit e1b7c0f1647b7a0036e3d7ea7f58c67ef627599f Author: John Bowman Date: Sun Nov 30 15:07:10 2008 -0600 Add threads setting (default is true except under MSDOS). commit 37c74f79c4c1459f670c509126c10d66b076f8af Author: John Bowman Date: Sun Nov 30 01:17:47 2008 -0600 Fix curved cyclic paths of size 1. commit 7aae1e50d141c77004a71d09b2f8789951c7b558 Author: John Bowman Date: Sun Nov 30 00:46:09 2008 -0600 Add time argument to curlSpecifier to allow access to all curl specifiers. Fix reverse(guide). Add reverse(guide3). commit fd2cd01f27ec1fc5d395524afc805556681de6d5 Author: John Bowman Date: Sat Nov 29 12:51:20 2008 -0600 Fix multiple file batch mode under MSWindows: only query the MSWindows registry once. commit fa4ce6f5ed2cda23b745505ba8da83cbf19a3b03 Author: John Bowman Date: Sat Nov 29 12:50:09 2008 -0600 Fix compilation without HAVE_LIBPTHREAD. Call HideWindow under MSWindows when View=false. commit 0683943b11b4c0aa9b64c9db5f84b16b730c1f5e Author: John Bowman Date: Fri Nov 28 00:51:31 2008 -0600 Respect 3D Label filltype when render=0. commit 61780ff0823f211a56f75df624376eea1aad1b49 Author: John Bowman Date: Thu Nov 27 16:08:09 2008 -0600 Clarify that the native glut library is used instead of freeglut under MacOSX. commit 4b0b143f3f74af43c1dc119e565932382a8e7ba7 Author: John Bowman Date: Thu Nov 27 13:49:29 2008 -0600 Increment version to 1.54svn. commit a19f7125b6a2f9545b2c8d7684efb7c15abd8f9a Author: John Bowman Date: Thu Nov 27 12:39:54 2008 -0600 Set environment variable CYGWIN=nodosfilewarning if it is undefined or empty. Note: this doesn't get uninstalled since it is the "right" default anyway. Rename asy-console.bat to asy.bat. commit b592f16ae13af694ce16a8cbebfde4a8a23e79eb Author: John Bowman Date: Thu Nov 27 01:14:49 2008 -0600 Force CFLAGS="-g -O3" default again. commit fd2a0d22e825647c7405941bd9263473eef2b692 Author: John Bowman Date: Thu Nov 27 01:01:41 2008 -0600 Output diagnostics only if verbose > 1. commit eee37b6bcc222486d7be5e51f23035d48594588f Author: John Bowman Date: Thu Nov 27 00:58:03 2008 -0600 Add minblockwidth, minblockheight, and mincirclediameter parameters. Change Horizontal and Vertical to a nonboolean type flowdir. commit 3e9a71cdaa387f5d0ecdf0f36c41772b6865bc3a Author: John Bowman Date: Wed Nov 26 23:31:46 2008 -0600 Fix PRC projection sizing when up != Z. commit 950302f8a2a4d01d5043a0e9bed644e006b0ca0d Author: John Bowman Date: Wed Nov 26 22:15:36 2008 -0600 Add missing wait. Fix aspect ratio in interactive mode. commit 6b36a704765f6c88d80e3c6232330a8755e9f1d0 Author: John Bowman Date: Wed Nov 26 20:33:53 2008 -0600 Fix rendering logic. commit 3c8a346ab315a8aa57af642ad36788832a441ce5 Author: John Bowman Date: Wed Nov 26 15:46:04 2008 -0600 Minor optimizations. commit 86cea1a75de520b35f6eaf1bc8c8ce0f7c1eb668 Author: John Bowman Date: Wed Nov 26 00:26:30 2008 -0600 Change cyclic flag in the routine where the array is actually constructed. Make minor edits to tube documentation. commit b6f0403bc6809f96add2af2fdfda140a13ebe8a9 Author: John Bowman Date: Tue Nov 25 23:27:21 2008 -0600 Enable the toolbar by default within the asyattach environment. commit 70c5bdd9e6711620c1fb16d4c8553db42c1ffc55 Author: John Bowman Date: Tue Nov 25 22:13:39 2008 -0600 Set CYGWIN=nodosfilewarning in asy rather than in a batch file. commit 4210144b34da47dbe8faa22136d14aef5e5d574d Author: John Bowman Date: Tue Nov 25 22:12:13 2008 -0600 Don't hang on exit from "Cannot execute latex" error. commit 01972838df01c726b045fcc30d4419c102cf928e Author: Philippe Ivaldi Date: Tue Nov 25 17:02:34 2008 -0600 Replace step to relstep in tube.asy, add example of tube, document the package tube.asy commit cda1746f22599bfc912392c9bda0ed9a7f6a5b54 Author: John Bowman Date: Tue Nov 25 15:20:36 2008 -0600 Distinguish between defaulttransform and defaulttransform3, so that label(scale(10)*"text",O) is projected onto the initial viewing plane. commit d19c0bec2c319d5c6f435419788f8ea94980c1da Author: John Bowman Date: Tue Nov 25 14:44:44 2008 -0600 Simplify freeglut svn-761 installation instructions. commit 07819114b9060175fde5b0414222d525a340577b Author: John Bowman Date: Tue Nov 25 13:16:48 2008 -0600 Catch out-of-memory errors in OpenGL renderer. commit e3c10fc46b23f259921c3d4a169e953e3521f6be Author: John Bowman Date: Tue Nov 25 10:09:56 2008 -0600 Disable DOS path syntax warning in version 20080327 of cygwin.dll (which supports pthreads). commit 6f7d32223b5ec3dcbcb75ae20fc358f9e265af5f Author: John Bowman Date: Tue Nov 25 05:06:31 2008 -0600 Increment version to 1.53svn commit 2826efca8dc76e59d4ba70192dce69c84668ed9a Author: John Bowman Date: Tue Nov 25 01:02:46 2008 -0600 Use _exit instead of exit after fork as recommended by man page. Remove remaining piece of old fork wrapper code. commit 35877ed7f1df1410f78ae2fc19dc79fc76449905 Author: John Bowman Date: Tue Nov 25 00:09:26 2008 -0600 Make antialias an integer parameter (default 2). Values bigger than 2 are currently respected only when converting from EPS or PDF formats. commit b6cda52e4df8063b5c0bb12ff3bab9c0850a2626 Author: John Bowman Date: Mon Nov 24 23:30:57 2008 -0600 Don't call fitscreen() during interactive updates. Simplify forking in pipestream.h. commit 4019ae275efaea77130d93ae82568def5a5111c3 Author: John Bowman Date: Mon Nov 24 03:16:55 2008 -0600 Fix multiple file aspect ratio issues. commit 3ccc70e985a7b42a992e89a27e0ef2f71f6e53a2 Author: John Bowman Date: Mon Nov 24 02:57:28 2008 -0600 Fix exporting with -noV. Support machines without working POSIX threads. commit fcad51ead250de2f47b067407fb8829d2932475f Author: John Bowman Date: Sun Nov 23 18:19:34 2008 -0600 Define standard symbol WORDS_BIG_ENDIAN or WORDS_LITTLE_ENDIAN, as appropriate. Add Orest's patch to support PRC output on bigendian machines. commit 2aec609cefdfe288e01d02a76f2fc1ff77fa9151 Author: John Bowman Date: Sun Nov 23 16:47:28 2008 -0600 Use gl::wait routine for thread synchronization. commit 61dbf2a011d73ef468358542909fe2fbde7aa3a1 Author: John Bowman Date: Sun Nov 23 03:00:14 2008 -0600 Support compilation again on systems without glut. commit 4a8226975e5845b0c75b1339f935ec7bec604971 Author: John Bowman Date: Sun Nov 23 01:53:41 2008 -0600 Conditionally include config.h. commit 1665f78ca7e201cc4172435aa6ca2e2c9da9cd05 Author: John Bowman Date: Sun Nov 23 01:53:05 2008 -0600 Rename BIG_ENDIAN to IS_BIG_ENDIAN. commit 4f1141861f7f15050d94baf847f43915c0c7ac0c Author: John Bowman Date: Sun Nov 23 01:43:57 2008 -0600 Add preliminary support for bigendian machines (PRC output is not yet working though). commit 1a589effdc9db55543060fe489c4ef38f1f20fcd Author: John Bowman Date: Sun Nov 23 01:12:57 2008 -0600 Use the main thread for OpenGL rendering to make MacOS happy; run asy in a secondary thread. commit 95f09626b1c294ff4c0d0f480c66e49cc6192965 Author: John Bowman Date: Sat Nov 22 13:29:20 2008 -0600 Add assert. commit 62607706159b5e583cdb034e58229ae7719bce0b Author: John Bowman Date: Sat Nov 22 12:03:14 2008 -0600 Update SVN instructions to not require SSL support. commit d0dc7b89f83820cb783d6aa454904af338da5dc0 Author: John Bowman Date: Sat Nov 22 12:00:27 2008 -0600 Fix bus error. commit 0ae0ab31d39f9c989f9b1cf160f3b5cef1790c44 Author: Philippe Ivaldi Date: Fri Nov 21 17:13:24 2008 -0600 Fix calculation of angle. commit aed1181edf6d26e924fc394baa139ed0f6766244 Author: Philippe Ivaldi Date: Fri Nov 21 08:29:02 2008 -0600 asy-mode.el: define asy keywords properly. commit eaf21ba2f2de354718ea9e460cf79fb0f80bbe0a Author: John Bowman Date: Fri Nov 21 01:55:51 2008 -0600 Add Philippe's tube module. commit f8dda08ef26195f1c9fda68460c0610313b5eaa6 Author: John Bowman Date: Fri Nov 21 01:20:14 2008 -0600 Improve thread synchronization and diagonistics. Remove freeglut-2.4.0-svn759.patch in favour of fixed svn 761. commit a1619e9d4754fd750dc18d26c3d7c05cb6cdc2f3 Author: John Bowman Date: Thu Nov 20 02:40:24 2008 -0600 Implement robust thread locking. Update installation instructions to use the system GC by default, now that we require a multithreaded version. commit cb8a4dfda6950bd6580bf7d8d679dcbf4af767d3 Author: John Bowman Date: Wed Nov 19 19:59:56 2008 -0600 Revert most of 1.52-22 due to a reported segmentation fault and since glutGetModeValues isn't implemented for MSWindows anyway. commit 3903344a1ccb4e74db0f0e30d2b434738dbbe105 Author: John Bowman Date: Wed Nov 19 17:35:07 2008 -0600 Revert 1.52-21. commit 9770f5a89b126bbe256245d3282d186547e35433 Author: John Bowman Date: Wed Nov 19 10:12:32 2008 -0600 Add television test pattern example. commit 41e39c1c8bb087a7bafc400a8175e1eca5a2de8c Author: John Bowman Date: Wed Nov 19 01:19:29 2008 -0600 Simplify multisample negotiation by using glutGetModeValues. Backport code to freeglut-2.4.0. commit 4cbda4d70a31d92544b0a294c881e39a77753f4b Author: John Bowman Date: Wed Nov 19 00:20:29 2008 -0600 Hide window again when View=false, even if iconify=false; commit a97fee3070084e12ca4c38b4c196a7d378cc5485 Author: John Bowman Date: Wed Nov 19 00:08:27 2008 -0600 Add bool3 type that takes on one of the values true, false, or default. Add planar argument to surface. commit b691580fe5c1039f503c64abf410e07958b9ef5e Author: John Bowman Date: Tue Nov 18 23:15:37 2008 -0600 Fix vertex shading order in planar case. commit 94e67f10f05c4c03f0bf8749e57b14993f1938dc Author: John Bowman Date: Tue Nov 18 22:43:51 2008 -0600 Avoid POSIX thread deadlock. Fix rpm latex install directory. commit eb5a9628772285778a7ec869455378c0b65db0a2 Author: John Bowman Date: Tue Nov 18 14:46:51 2008 -0600 Work around nonstandardized signature of gluNurbsCallback on various MacOS platforms. commit 62302ae390ff875904680efef03ea8c264933b66 Author: John Bowman Date: Tue Nov 18 11:46:00 2008 -0600 Use POSIX threads instead of fork in OpenGL renderer. Make multisample an integer; if freeglut is used this parameter controls the multisampling width for screen images. commit a1a69888cbf8616b5d50b8c17286c929b08b59a4 Author: John Bowman Date: Tue Nov 18 08:58:27 2008 -0600 Remove obsolete patch. commit 1bbf033f0430294fcbef2c4f9072251a810c2a8e Author: John Bowman Date: Mon Nov 17 13:12:46 2008 -0600 Install asymptote.sty and asycolors.sty in $TEXMFLOCAL/tex/latex. commit b68290520bd99f33046fe48de39bd63797a2e339 Author: John Bowman Date: Sun Nov 16 18:08:46 2008 -0600 Fix indentation after struct. commit f4598c25e85557a11adda85150e3165fe10b6464 Author: John Bowman Date: Sun Nov 16 17:36:38 2008 -0600 Remove dependency on cc-mode.el source. Allow asy-mode.el to load even without asy-keywords.el. commit debfed2b43a8846d5cfa45c6807cc24585485e24 Author: Philippe Ivaldi Date: Sat Nov 15 13:01:48 2008 -0600 fix markangle orientation. commit 178f9004c67cd5c5e0ff09bb95e36bb8396ea10c Author: John Bowman Date: Sat Nov 15 10:28:48 2008 -0600 Add missing sentence. commit 95882c60c7e43c4f50912eb2e7a90e6431d1e97e Author: John Bowman Date: Sat Nov 15 10:14:20 2008 -0600 Add optional user=false argument to min(picture), max(picture), and size(picture). commit 5c776e96d56817d3d9804af5592f17daac509d60 Author: John Bowman Date: Thu Nov 13 02:28:01 2008 -0600 Fix degenerate thick line caps. commit bffba97a1bcc64dc2100fa0ab36c9359a44e7b5d Author: John Bowman Date: Wed Nov 12 17:51:01 2008 -0600 Don't discard 2D size constraints in draw. commit b34d0cad11f9710f33905394b9e74a0dca4c7edd Author: John Bowman Date: Wed Nov 12 14:59:16 2008 -0600 Reinstate freeglut-2.4.0-svn759.patch which to fix multisampling bugs. commit c22422f84f5b69980179324fb09e209f81a10afd Author: John Bowman Date: Tue Nov 11 20:24:50 2008 -0600 Hide window only if iconify is true. commit 21c68e1ee445763474ceb9e79e2d0ced9ece5475 Author: John Bowman Date: Tue Nov 11 17:09:29 2008 -0600 Fix logic in 1.52-3. commit 9141009fd026462c8fd2a8e3dc863efc6877687e Author: John Bowman Date: Tue Nov 11 17:05:01 2008 -0600 Combine both _GLUfuncptr MacOSX workarounds. commit 4654e4193e6662ca07ad7b9e30eba7a75fe9266a Author: John Bowman Date: Tue Nov 11 13:45:14 2008 -0600 Fix _GLUfuncptr detection. commit 1dcf8cd27103dcf0196718b59d5614b6a0de21b9 Author: John Bowman Date: Tue Nov 11 11:42:51 2008 -0600 Support compilation under MacOSX 10.5. commit 991a86171d82c1a6fc61f9eb30dd5bcfd6591dd1 Author: John Bowman Date: Tue Nov 11 04:31:25 2008 -0600 Increment version to 1.52svn. commit e91483639c4758e9710eac68b397da75e907fefb Author: John Bowman Date: Tue Nov 11 03:34:18 2008 -0600 Wait for completion of rendering. commit 11e8fb881b48ae97f6fa5148dbf6f54c7f44b96e Author: John Bowman Date: Tue Nov 11 02:26:45 2008 -0600 Remove obsolete patches. commit a8b3e58351a07e3303ebc11ee3293e2839ab36d8 Author: John Bowman Date: Tue Nov 11 02:25:59 2008 -0600 Use a more robust patch to enable multisampling in freeglut-2.4.0. commit 144be10c4af5e9927aadce7dc83b6223546595ab Author: John Bowman Date: Tue Nov 11 02:03:48 2008 -0600 Fix warning message. commit 05729b9d81a782ecfbc89603b12e56b725cde318 Author: John Bowman Date: Tue Nov 11 02:00:49 2008 -0600 Change references to freeglut to glut. commit eacbd60287f66505a86f1c1fe949c8c47c055606 Author: John Bowman Date: Tue Nov 11 01:57:27 2008 -0600 Improve memory performance and reduce rendering conflicts by always forking; remove last dependence on freeglut. Don't solicit bug reports for segmentation faults caused by graphics driver bugs (e.g. on memory exhaustion). commit 7892f714e5eac1a29733c0788482dff4b1798b1a Author: John Bowman Date: Tue Nov 11 00:53:34 2008 -0600 Prevent multiple glInit calls. Use a separate multisample setting to control screen antialiasing. commit 7429c3c359094d7af8bf556e8b45427870b6d656 Author: John Bowman Date: Mon Nov 10 21:31:57 2008 -0600 Turn multisampling on only when View is true. commit 2152eadef3a913a0ca76545887f7b9c0425526c5 Author: John Bowman Date: Mon Nov 10 21:15:07 2008 -0600 Increment version to 1.51svn. commit d06765ccc2605e7c49b262790d7118ddd3ef586f Author: John Bowman Date: Mon Nov 10 20:06:43 2008 -0600 Add multisampling patch for freeglut-2.4.0 under CYGWIN. commit 0568dc2f66e5318978d08368708267f6d027f324 Author: John Bowman Date: Mon Nov 10 18:39:40 2008 -0600 Update CYGWIN port. commit c002f91cb9345bafae361ec1f317addff487d894 Author: John Bowman Date: Mon Nov 10 00:46:21 2008 -0600 Control multisampling with antialias flag. Add patch to bring freeglut-2.4.0 up to date, with multisampling support. commit ebfd53b97f08f5033991e3f3ef3638f6e31a1c0f Author: John Bowman Date: Sun Nov 9 16:22:45 2008 -0600 Support multisampling; this requires the latest svn version of freeglut. Support -iconic and mouse wheel with the latest svn version of freeglut. commit e884aecf09f6b77ff59327736d59b43901aa3f30 Author: John Bowman Date: Sun Nov 9 11:05:55 2008 -0600 Don't allow tile size to exceed current window size. commit 6996717e07631160568564c746bb4ef5e9cfe14c Author: John Bowman Date: Sun Nov 9 02:02:17 2008 -0600 Set default value of settings.render in asymptote.sty to 4. commit aa7257237a93f790a8609e053590fb0dda01e595 Author: John Bowman Date: Sun Nov 9 02:00:15 2008 -0600 Illustrate the use of viewportmargin in latexusage.tex. Set the default value of settings.render in asymptote.sty to 4. Update documentation. commit 0d091afa43a93ee525d4af643aa4186e27affd1e Author: John Bowman Date: Sun Nov 9 01:21:06 2008 -0600 Add viewportmargin parameter. commit 429feedf2ba8a6580cb749ca0dc0c2abb8117799 Author: John Bowman Date: Sat Nov 8 18:41:51 2008 -0600 Change Makefile.in to remove latexusage-* instead of latexusage_*. Change put=Above to above=true and put=Below to above=false. Remove constants Above and Below. commit 2e1a65d0a6273ce47712b55b68e8d18c75a71350 Author: John Bowman Date: Sat Nov 8 17:37:34 2008 -0600 Add embed option (default true) to allow one to suppress the embedding of a rendered preview image. Support file attachments in asymptote.sty; this is provides a better method for embedding 3D PRC files in a LaTeX document. Add iconify option. commit 7eff5652e202e7c937a000aa5beb0c1b8c2ad580 Author: John Bowman Date: Fri Nov 7 17:49:58 2008 -0600 Set default maxtile to (0,0). commit 1a18bbcbe2b0b7adff2698498ed3871e5e4eff74 Author: John Bowman Date: Fri Nov 7 16:42:12 2008 -0600 Fix camera roll. Fix divide by zero error. commit 9df48c1fd385adcf6cbe3c4d287be3e7c3404282 Author: John Bowman Date: Fri Nov 7 15:06:46 2008 -0600 Fix rendering with -nofitscreen. commit 7ea8229d843fc2026ad6fb259e15479fab09bfa8 Author: John Bowman Date: Fri Nov 7 10:10:11 2008 -0600 Fix PRC up vector. commit 95a5d718046b7a72949cbc64b4759614331910b3 Author: John Bowman Date: Fri Nov 7 07:26:34 2008 -0600 Fix glut.h path under MacOS. commit af473745f283e163f72c9251767f8f06cd731b8c Author: John Bowman Date: Fri Nov 7 07:17:41 2008 -0600 Fix detection of MacOS. commit 1ee53f746794377380a867022367a08568422a21 Author: John Bowman Date: Fri Nov 7 06:59:21 2008 -0600 Improve documentation of add(picture). commit 2849d018b4c33f66f2fd28541c55d1b3f08c12b9 Author: John Bowman Date: Fri Nov 7 00:51:09 2008 -0600 Add glut compilation support for MacOSX. commit 38c16362fd77cdaa325f9ac9f316e1ad46600fd6 Author: John Bowman Date: Thu Nov 6 16:18:18 2008 -0600 Initialize window to the maximum tile dimensions again. commit ffab9fcaa21a0758ce42242e63ad6d6d5ce26bc6 Author: John Bowman Date: Thu Nov 6 16:07:51 2008 -0600 Change default value of maxtile to (800,800). commit 48c91000d1284b74366c1c02db3ab2ccea70961e Author: John Bowman Date: Thu Nov 6 11:59:16 2008 -0600 Recommend glOptions += " -iconic" for UNIX systems that support this. commit a1d87f3d2af798cc89359c24e9f18260b396e4fe Author: John Bowman Date: Thu Nov 6 11:36:15 2008 -0600 Add interface to runtime view() function. Document use of glOptions=-iconic for UNIX systems. commit 1bea8e8b1790afb55c7899bd3a505dd3dcfca22c Author: John Bowman Date: Thu Nov 6 11:05:59 2008 -0600 Support -glOptions=-iconic for drivers that allow this. commit e766302cdd096972819105b96407d73d06b20e5d Author: John Bowman Date: Thu Nov 6 10:27:46 2008 -0600 Avoid rendering problems caused by iconic option. commit 44f693bf85e7a8c25557d2b1e1510617a2c2c72c Author: John Bowman Date: Thu Nov 6 09:17:16 2008 -0600 Change default value of maxtile to (0,0), which now means to use the screen dimensions. commit 02585cec9a5da7f348c2d9f764396d12edb3b4c4 Author: John Bowman Date: Thu Nov 6 08:52:25 2008 -0600 Use opaque value in glClearColor. commit 2016f42fba27487193258ca2f10392d61220f4cf Author: John Bowman Date: Wed Nov 5 23:00:49 2008 -0600 Add PenMargin3 to example. commit 5c1d8867bffeea5d1600ca80c8f4d0d1755e80fe Author: John Bowman Date: Wed Nov 5 18:21:12 2008 -0600 With -noV, initialize the window to maxtile. commit efeee19d9ffd6e65d3dd86d96d49770c76c3adc1 Author: John Bowman Date: Wed Nov 5 01:43:18 2008 -0600 Avoid glDisable(GL_LIGHTING) due to race condition. Improve Margin3. commit ff627450e4c48ea211403be0bcfb3f80f71c3d77 Author: John Bowman Date: Wed Nov 5 00:07:04 2008 -0600 Add support for three-dimensional dimension bars. commit 9516507db876721489f9f91736db9a4e2f38f79d Author: John Bowman Date: Tue Nov 4 23:58:18 2008 -0600 Simplify window initialization code. commit 8f650920cb66b2f5e56b3bb7801a72f2fe5a436d Author: John Bowman Date: Tue Nov 4 16:43:44 2008 -0600 Fix PenMargin3 and DotMargin3. Make dotsize consistent for pictures and frames. Reinstate wedge example. commit 7eb648da6642d894776564de2c9a8bfd9da2c304 Author: John Bowman Date: Tue Nov 4 14:34:48 2008 -0600 Update hyperref documentation. commit e830469751fcfd89cb4395cb891dfb5258f2956b Author: John Bowman Date: Tue Nov 4 12:40:54 2008 -0600 Standardize triple perp(triple); fix numerical precision issue. commit ca8a5b45a2db729d65c2532a2691b490e166a59d Author: John Bowman Date: Tue Nov 4 00:50:49 2008 -0600 Fix more normal problems. commit a8b7919a2d2f9cae4be11aeb4702d4d3893b5709 Author: John Bowman Date: Tue Nov 4 00:17:51 2008 -0600 Use right-handed transformation. commit c3283a0676baa2893490028da3697d674097bf58 Author: John Bowman Date: Mon Nov 3 03:25:16 2008 -0600 Decrement version to 1.50svn. commit 43f9a40080aa0f92d7c0a3f2edf6774e00550a4e Author: John Bowman Date: Mon Nov 3 03:15:44 2008 -0600 Increment version to 1.51svn. commit 7c35f506cafce37ef53d3c9d74873bee14bc0fd5 Author: John Bowman Date: Mon Nov 3 02:12:27 2008 -0600 Make example look better with render=0. commit 71f88287c1f0c9593d7a9cdacd67d0c79ef16915 Author: John Bowman Date: Mon Nov 3 02:10:44 2008 -0600 Fix example; texpath currently only handles standard font sizes. Fix handling of keep flag in texpath and strokepath. commit 98d0bac42932a98ef39ba65e9347e6a7399b9bd6 Author: John Bowman Date: Mon Nov 3 01:43:59 2008 -0600 Improve example. commit a2d5e32a404f9614564f8382edb6e8ea30176aa5 Author: John Bowman Date: Mon Nov 3 01:38:07 2008 -0600 Fix surface normal calculation. Add patch reverse(patch) function. Improve normal(path3); add normal(triple[]) for polygons. commit cd6f6f555e6ebfef4b5c525c47449670db984eaf Author: John Bowman Date: Sun Nov 2 19:52:42 2008 -0600 Add missing transform of normal vector. commit 6da5b5ed0730a5f4f0a06b093672068d0438686c Author: John Bowman Date: Sun Nov 2 14:50:09 2008 -0600 Document glOptions=-indirect. commit a0ec9291b25648bcf541cca112664054ae9bbadf Author: John Bowman Date: Sun Nov 2 11:17:56 2008 -0600 Change mean(pen[]) to take a more useful opacity function. Add opacity argument to mean(pen[][]). commit 4ac8b16285c8d8c0206d12d6113605ed5c2884cb Author: John Bowman Date: Sun Nov 2 10:33:08 2008 -0600 Reinstate cornermean. Make mean(pen[]) return by default an interpolated pen with the minimum opacity of all given pens. commit 1f468a931dac3a0cc2b2e1a377e54ca7db61993c Author: John Bowman Date: Sun Nov 2 01:45:39 2008 -0600 Use vertex shading. commit 0c429c99b1073a8ce6b694c14024318095a52cbb Author: John Bowman Date: Sun Nov 2 01:33:49 2008 -0600 Update examples. commit 6e170c72fad9f673b8bfb63d420768e4ad7f37c2 Author: John Bowman Date: Sun Nov 2 01:20:19 2008 -0600 Fix example. commit 4a56fe6a909bce1e60ee46dc445e9a7791c17b71 Author: John Bowman Date: Sun Nov 2 01:15:59 2008 -0600 Increment version to 1.49svn. commit a219ddb14baff290277499dd68ad88e11a2ab124 Author: John Bowman Date: Sat Nov 1 23:49:11 2008 -0600 Document how to draw surfaces with patch-dependent or vertex-dependent colors. commit a59df140afed1a63cb1218c7ff492b8d38f20821 Author: John Bowman Date: Sat Nov 1 22:44:33 2008 -0600 Remove old fitscreen code. commit 98d281fb1bf0928779ba66773a671d7a45630f24 Author: John Bowman Date: Sat Nov 1 22:24:42 2008 -0600 Document surface tube(path3 g, real width). commit 0bc94259935834b3f758ae12ced619451664a9c9 Author: John Bowman Date: Sat Nov 1 22:15:11 2008 -0600 Fix incorrect precontrol output in write(path) introduced in 1.91-23. commit 01d8cbea25650200b3372a05fed040cc20de158f Author: John Bowman Date: Sat Nov 1 21:54:00 2008 -0600 Account for perspective scaling in planar test. commit 9f18a4df21d708ecc1b853d815f8a0b8b6419c16 Author: Orest Shardt Date: Sat Nov 1 14:52:41 2008 -0600 Use unstraighten() to obtain control points of straight segments. commit a963ce1eebd5c8a7480fe21ae5e62e8a7cdfa376 Author: John Bowman Date: Sat Nov 1 14:13:16 2008 -0600 Implement path unstraighten(path), which returns a copy of the path with the straight flag turned off. commit 39211adfeab65d1efa31067ac2f4b9c7b9baac11 Author: John Bowman Date: Sat Nov 1 13:36:29 2008 -0600 Specify an angle precision for centering perspective drawings. commit df226e66b5169a42195ada8750aa2a565d6c1839 Author: John Bowman Date: Sat Nov 1 11:52:48 2008 -0600 Increase angleiterations to 4. commit d7e1465437bcd26f21aa19eeb26f224c952806fe Author: John Bowman Date: Sat Nov 1 11:35:33 2008 -0600 Allow odd sized tiles again. commit 48f6d409b7ff5ff23f3667b8e28db1639cabb107 Author: John Bowman Date: Sat Nov 1 10:47:26 2008 -0600 Set surface normals whenever light is on. commit 55ec3b5227b1a32d807217dca0787988352af385 Author: John Bowman Date: Sat Nov 1 10:02:28 2008 -0600 Transpose surface.corners() and surface.map(). Use mean corner pen for patch shading. commit 2378aa429188a396191e49b411907f98e366b06c Author: John Bowman Date: Sat Nov 1 08:58:09 2008 -0600 Increase angleiterations. commit d5865412c18a4cb1835ef7235f583d50dce439c0 Author: Philippe Ivaldi Date: Sat Nov 1 03:43:57 2008 -0600 update examples/projectelevation.asy commit c7ff9b62861a294d57b200b05184414acdab857f Author: John Bowman Date: Sat Nov 1 02:29:24 2008 -0600 Rename cornermap to map and cornermean to mapmean. Add triple[][] corner() and triple[] cornermean(). commit 40905d1a35e5d96c4fd48aad8f04ba161da740d2 Author: John Bowman Date: Sat Nov 1 01:39:32 2008 -0600 Support lighting with vertex shading. Fix surface lighting with render=0. Fix normal(path3). Move rgba pen packing and unpacking functions to plain_pens.asy. Implement pen mean(pen[]). commit b2f7f73429c6bb9bcd70124e3c949e737225eb6f Author: John Bowman Date: Fri Oct 31 21:48:25 2008 -0600 Force tile size to be even. commit 096a399768b73f223951d18a554bc99a589e4872 Author: John Bowman Date: Fri Oct 31 17:48:33 2008 -0600 Make maxviewport and maxtile pairs. commit 4c870db4d37abb95ee7501107dcddea637cc21b7 Author: Philippe Ivaldi Date: Fri Oct 31 17:29:36 2008 -0600 asy-mode: warn cc-mode.el dependency. commit 401638c5ae34cc9f46ea916a2601cedf390c2c8d Author: John Bowman Date: Fri Oct 31 17:18:14 2008 -0600 Support compilation under standard glut for systems without freeglut. commit 00366cc59b2e2ed5a0fa03fc3a80581233e41283 Author: John Bowman Date: Fri Oct 31 15:39:00 2008 -0600 Fix fitscreen toggling. commit 424de2df6076c686c8a8d0ee06c18d5572f151f3 Author: John Bowman Date: Fri Oct 31 15:34:07 2008 -0600 Add tilesize parameter to limit the maximum rendering tile size. commit 4deb82228a5bdfc655cb4b79be27298ffd22a6be Author: John Bowman Date: Fri Oct 31 08:48:04 2008 -0600 Revert last change, which breaks tabbing after struct{}. commit cf324b77f8d2a431235e46c1799c2e27fbe1ba2b Author: Philippe Ivaldi Date: Fri Oct 31 07:36:39 2008 -0600 asy-mode: fix cc-mode code source dependency. commit cb1eeb3561d1cfd47c6724bc2d9962319a12ba80 Author: John Bowman Date: Fri Oct 31 01:12:53 2008 -0600 Simplify construction of elevation-colored surfaces. Add facility for vertex-shaded elevation surfaces. commit 913151d6867b93bb76ea24bcdb717a18a1e39483 Author: John Bowman Date: Thu Oct 30 23:42:55 2008 -0600 Fix initialization and translation issues. Remove unneeded CYGWIN restrictions. commit 277cad8a6b3ee0dc3cefc21c5e72b9a3b407e0c3 Author: John Bowman Date: Thu Oct 30 22:04:53 2008 -0600 Fix orthographic exports. commit 06c7940dbfaa3ca0dcbb8220e5bb4db3a38f19ba Author: John Bowman Date: Thu Oct 30 21:48:52 2008 -0600 Use Brian Paul's tr-1.3 package to support high-resolution OpenGL tiled rendering. Add antialias setting (default true). Change convert to use default antialias setting. commit f75488ec21d55232acfcbc86f165b56078a0600b Author: John Bowman Date: Thu Oct 30 21:16:31 2008 -0600 Add roundbox envelope routine. commit 3b430cd073da9000dff6e358dfa15483cac61ab9 Author: John Bowman Date: Wed Oct 29 22:22:06 2008 -0600 Turn on straight flag only for piecewise straight planar paths. Force straight flag for all obj faces to avoid subdivision cracks. Make normal(path3) return immediately for nonplanar paths. commit ea2035f4d10d6ad2d4958f3264060bb6c19f1101 Author: John Bowman Date: Wed Oct 29 19:39:28 2008 -0600 Change signature of point to pair point(picture, pair, bool user=true) to allow a return value in PostScript coordinates. Remove framepoint in favour of truepoint(picture, pair, user=false). commit a9d36f14667ee3f01ded31a1682b056e99b45080 Author: John Bowman Date: Wed Oct 29 17:10:25 2008 -0600 Add maxheight, hstretch, and vstretch parameters to legend. commit 08d8d9d54b14b50cc18e40c6fe0b39175f14c742 Author: John Bowman Date: Wed Oct 29 11:48:12 2008 -0600 Add defaultbackpen. commit 5e73c1c8753fbaa886e8d14740d1fb54c67d0cb3 Author: Philippe Ivaldi Date: Wed Oct 29 03:42:28 2008 -0600 Add TeX versioning commit b295681be3eadad9b41da9cad9f335c555884dac Author: John Bowman Date: Wed Oct 29 01:28:12 2008 -0600 Support transparency in vertex shading. commit addf84f034546239f5a536ea13aa30f473888ece Author: John Bowman Date: Wed Oct 29 00:50:50 2008 -0600 Support vertex shading in OpenGL renderer. commit 30614123cb946a0fe0bd3eb2906dffcd725d11ad Author: John Bowman Date: Tue Oct 28 17:40:42 2008 -0600 Use centroid rather than the first vertex for splitting surfaces. Rename unpack to real[] rgba(pen) and add inverse function pen rgb(real[]). commit 7701a82ac9563b95bfbbdd5b6752cb3e855c7913 Author: John Bowman Date: Tue Oct 28 01:42:51 2008 -0600 Add a more versatile and more efficient surface constructor for convex and "piecewise-convex" three-dimensional paths; the planar(path3) constructor should now only be used for nonconvex paths. Update examples. commit 90aa53c7cc7b38519cdc75657347e4829f39f565 Author: John Bowman Date: Tue Oct 28 00:53:18 2008 -0600 Implement DefaultHead2(filltype filltype=Fill). Add optional filltype argument to HookHead2. Reduce adaptive thick line constant. commit 5aece89072f9c13499c4e5c209d001a91b56a50b Author: Philippe Ivaldi Date: Mon Oct 27 07:32:59 2008 -0600 add size to parametricelevation.asy commit 36da4de5e2b52e0846ed10d3535f46fa1f1f169b Author: Philippe Ivaldi Date: Sun Oct 26 17:53:47 2008 -0600 revert wrong commit of glrender.cc commit 5888260287059b73d61c68c9d2d19c6a1e028321 Author: Philippe Ivaldi Date: Sun Oct 26 17:46:53 2008 -0600 add size to sphericalharmonic.asy. commit 0598c725bca4e3613bd5d96bfe9f92b99636e6a7 Author: John Bowman Date: Sun Oct 26 17:37:14 2008 -0600 Further adaptive thick line improvements. commit b9c7577bf0d9f2b1f464046f91e9bb30f0ca303c Author: John Bowman Date: Sun Oct 26 15:52:26 2008 -0600 Improve thick line adaptive step routine. commit 0d4fa1edfcaf22f6d0682712488343624e19bf72 Author: John Bowman Date: Sun Oct 26 14:35:58 2008 -0600 Increase 3D margins. commit 9461bf3f0b905d2d2580e2993ec3f6ffaacf4f04 Author: John Bowman Date: Sat Oct 25 22:46:42 2008 -0600 Work around Adobe Reader rendering bugs. commit d26a98ae53cfc26724584790f75d48fc5d54ce9b Author: John Bowman Date: Sat Oct 25 21:57:23 2008 -0600 Support 2D alignment of 3D axis labels. Use more efficient size(pic) routine in legend(). commit 99ded514151ae96c2f969eabc726e91cd5d358e2 Author: John Bowman Date: Sat Oct 25 13:01:28 2008 -0600 Resolve ambiguity in draw(surface). Add Gradient palette that varies linearly over a specified range of pens. Add spherical harmonic example. commit aa912c8197993f03628145caa23915a618718145 Author: John Bowman Date: Sat Oct 25 11:16:48 2008 -0600 Standardize argument names of dir and expi. Add parametric surface with elevation-dependent colouring and no light effects. commit 3ef96452b28a2e2ced13a7e3ad7be52754279268 Author: John Bowman Date: Fri Oct 24 08:31:50 2008 -0600 Fix a numerical precision issue. commit aa83d5256ee460261387c3560d00816d86778675 Author: John Bowman Date: Thu Oct 23 02:18:43 2008 -0600 Increment version to 1.48svn. commit 75578118cf5bc705113c1ae240ff3c19e75bcf04 Author: John Bowman Date: Thu Oct 23 00:48:28 2008 -0600 Add another draw routine for surfaces. commit fdc1eed6b5c60f0dafe7722dc5b1846d85a858db Author: John Bowman Date: Thu Oct 23 00:39:14 2008 -0600 Implement a more robust version of normal(path), returning O if the path is nonplanar. Handle nonplanar obj faces. Add triceratops example. commit 65903677e85e923709ecf9a1b57df596d062f73e Author: John Bowman Date: Wed Oct 22 17:40:56 2008 -0600 Re-enable high-resolution rendering. commit 73ab9efcba8340a762e97c1e1c82e9e847931eaf Author: John Bowman Date: Wed Oct 22 16:59:21 2008 -0600 Remove diagnostic. commit aa8cc010d4a318c68e892c49567ce069abc18a30 Author: John Bowman Date: Wed Oct 22 14:52:20 2008 -0600 Fix strokepath(nullpath). commit f40ae1db9ac65ad4b358ca15ddf829a8277a629c Author: John Bowman Date: Wed Oct 22 14:49:43 2008 -0600 Fix strokepath. commit 17a1189c97f29a63fc1dfba82e2fe6305948e04e Author: John Bowman Date: Wed Oct 22 01:55:06 2008 -0600 Bypass bezulate for paths of length 4. commit c0caed7e85641f07acd04c36ef8aeb2989432045 Author: John Bowman Date: Tue Oct 21 21:05:17 2008 -0600 Use unit normal in planar. commit 4b1f6636bef4a86b158e6d6571761b25c7b672e2 Author: John Bowman Date: Tue Oct 21 20:50:31 2008 -0600 Fix cyclic path bugs in write(path) and write(path3) introduced in 1.45-34. commit caa4444ddc2e242d903c6eef2c33b811d0e1438f Author: John Bowman Date: Tue Oct 21 17:49:30 2008 -0600 Implement HookHead2 and TeXHead2 arrowheads. These are 2D arrowheads lifted to 3D space and aligned according to the initial viewpoint. Add missing angle parameter in HooHead3. Simplify planar. Move arrowheadlight parameter out of Arrow3 and into arrow commands, so that the correct value of currentlight is used. Use tighter values for the margin parameters viewportfactor and anglefactor. Reduce angleiterations to 2. commit c03df01eb051081f035ecc4fdbfa9d88e76dae39 Author: John Bowman Date: Tue Oct 21 13:36:45 2008 -0600 Fit to screen by default. commit 72ee07959783cd6238303cbf614c02287b53fc1d Author: John Bowman Date: Tue Oct 21 11:52:54 2008 -0600 Don't generate spurious "camera too close" errors for projections from infinity. Always use currentlight by default for drawing arrowheads. commit 628f27c4054948ae3b0e83f43334860380a72378 Author: John Bowman Date: Tue Oct 21 09:02:46 2008 -0600 Change text on sample CD label to something more Asymptote related. commit 43251826a66e5d59b537245f03402ee220ef643d Author: John Bowman Date: Tue Oct 21 01:52:33 2008 -0600 Add missing file. commit db6b14e4304b767e2d9f701946e75421a5e5dcbf Author: John Bowman Date: Tue Oct 21 01:22:40 2008 -0600 Add module for reading obj files and example. commit c5c589ecc6513d890c48fb9810d9900b0b543681 Author: John Bowman Date: Mon Oct 20 23:05:56 2008 -0600 Allow an array of meshpens when drawing surfaces. Update documentation. commit ad2f7da5d4b350d624c4de6f79eaf48d4f363443 Author: John Bowman Date: Mon Oct 20 21:48:12 2008 -0600 Move path length tests to surface constructor. Add bool warn=true to planar and normal(path3). Check incoming width and height parameters. commit f0cd7a28153ae2a5c1af3b4000c5e76fc4a2b023 Author: John Bowman Date: Mon Oct 20 16:31:26 2008 -0600 Fix prefix again. commit 7d37902efc2d7bdf386eba8bdc5829ff090fdc65 Author: John Bowman Date: Mon Oct 20 16:19:41 2008 -0600 Implement 3D margins. commit 0bd329a544d339e46112e6a8604f2c9fbc4c21db Author: Andy Hammerlindl Date: Mon Oct 20 12:25:25 2008 -0600 Fixed watch() and unwatch() to use atupdate(). commit 56311b858724cb98c83957efd304795106431fdd Author: John Bowman Date: Mon Oct 20 01:36:47 2008 -0600 Add surface constructors for triangles. commit d0de328928b73dc533bf58c905bfd9996275f05c Author: John Bowman Date: Sun Oct 19 20:54:46 2008 -0600 Add missing transform for projected 3D mesh lines. commit baf1e366451674409dbbf282217dc8c18008878d Author: John Bowman Date: Sun Oct 19 19:47:40 2008 -0600 Use cornermean instead of center. commit 111691e9df8d41241f77121f0ce3ebf8ad1cb692 Author: John Bowman Date: Sun Oct 19 19:26:02 2008 -0600 Add missing put argument. commit f5779a58acced80e808dff0cf15ac79c8b0c7c7a Author: John Bowman Date: Sun Oct 19 17:43:03 2008 -0600 Fix range check in both places; consolidate PostScript code. commit e137c77e2a32a206713a3f7443d688b1e4cd82f7 Author: John Bowman Date: Sun Oct 19 17:27:37 2008 -0600 Fix range check in strokepath (and potentially texpath). commit 7fbd94c2ecd14edd2a913d6688cf89eb1cb2e29a Author: John Bowman Date: Sun Oct 19 16:32:44 2008 -0600 Implement functions that construct a pen array from a given function and palette. Add elevation example. commit a5184d084df93f6298baccf0ce70f69bae24afc1 Author: John Bowman Date: Sun Oct 19 15:22:09 2008 -0600 Add support for using a different surfacepen for each patch. commit 6009d4388f7454fb311d7decc947436c9566f733 Author: John Bowman Date: Sun Oct 19 13:17:34 2008 -0600 Document default pen argument of strokepath. commit 1360af6abbce73279628714c4c3ff048976d79a8 Author: John Bowman Date: Sun Oct 19 10:31:51 2008 -0600 Implement path[] strokepath(path g, pen p), which returns the path array that PostScript would fill in drawing path g with pen p. commit 2740298fede8465a7642bc2a18dea281021d9df6 Author: John Bowman Date: Sat Oct 18 13:53:43 2008 -0600 Increment version to 1.47svn. commit 9bb668cc88ca35249be96f355cbc7b75c45b6d68 Author: John Bowman Date: Sat Oct 18 12:36:00 2008 -0600 Allow one to disable embedding of inline PRC files within LaTeX. commit 84cf6bbf3325e893e010a53c21274357985ead03 Author: John Bowman Date: Sat Oct 18 11:48:45 2008 -0600 Try to produce a preview image of latexusage for the manual. commit 568f4e34ba370328955aee1bc4e8eafb48c861f8 Author: John Bowman Date: Sat Oct 18 11:01:22 2008 -0600 Signal an error if the user tries to render an image without freeglut. Support embedding of 3D PRC files when -render=0. commit 5118c4d0066843a6ba900ae7f956bd822fdbb2bd Author: John Bowman Date: Sat Oct 18 02:48:43 2008 -0600 Update examples. commit 4c7b3ff91a370dac01708dfe0a8c0922d1d6d457 Author: John Bowman Date: Sat Oct 18 02:35:15 2008 -0600 Update example. commit e722dc5cd0da79515c7463cfeb0773a49419939a Author: John Bowman Date: Sat Oct 18 02:30:53 2008 -0600 Increment version to 1.46svn. commit a08904f2e1b719095530bb6586ce57b9bb51f4d6 Author: John Bowman Date: Sat Oct 18 00:46:29 2008 -0600 Add planeproject routines, courtesy of Philippe Ivaldi. commit d01ca3e35f5b66b5adff25cd45aaf760bf4b993e Author: John Bowman Date: Fri Oct 17 23:44:47 2008 -0600 Documentation updates. commit eb9fb24438bc8553b4a5b0adb3c1cc014e4bb0f5 Author: John Bowman Date: Fri Oct 17 21:12:11 2008 -0600 Fix fitting issues. commit 5ae120c2b28d950c09df3b4b4fe3540168bb1d78 Author: John Bowman Date: Fri Oct 17 16:55:36 2008 -0600 Fix handling of minimumsize. commit 450be86ce3a140bbc7e013518e48e29d68ad8631 Author: John Bowman Date: Fri Oct 17 16:07:48 2008 -0600 Increase tolerance of normal(path3). commit 3bb03bf62429777e16aabbb40357ffada91a2aec Author: John Bowman Date: Fri Oct 17 14:11:32 2008 -0600 Standardize embed options; fix labels. commit 918322f8395ac985874b5d0417766e31feed1ba9 Author: John Bowman Date: Fri Oct 17 13:25:17 2008 -0600 Add link to PRC specification. commit 2a794557026dd10ea67fd140a79d8ef9155612c6 Author: John Bowman Date: Fri Oct 17 11:52:14 2008 -0600 Fix dir normalizations. Ignore spurious warnings from degrees. commit 434b5d12403d6b61afba453fe17dbe1366853821 Author: John Bowman Date: Fri Oct 17 11:20:47 2008 -0600 Illustrate use of global TeX macro. commit 7f25fea2532f514f4e2cd0eabc7a7e4cac68f0e9 Author: John Bowman Date: Fri Oct 17 01:26:45 2008 -0600 Document direction invert routine. commit 7d845ac8dfd8a4ce5d23c1363509f5e194abee03 Author: John Bowman Date: Fri Oct 17 01:19:46 2008 -0600 Fix DefaultHead3 size. Update documentation. commit b787b05159710e06c3487a7ce6047dc8a1272006 Author: John Bowman Date: Thu Oct 16 22:32:10 2008 -0600 Add 2D versions of accel and radius of curvature functions. commit bacaedc1bd39ca476fb99b10ab078778851a1bae Author: John Bowman Date: Thu Oct 16 21:48:08 2008 -0600 Fix radius and non-normalized dir functions. commit 23731a6187fa578d96593694e7e8e2b15044533f Author: John Bowman Date: Thu Oct 16 11:37:26 2008 -0600 Fix numerical resolution issue. commit ae5229645dc61337e71c72a53204d0c8c5251147 Author: John Bowman Date: Thu Oct 16 01:08:49 2008 -0600 Add a routine to compute the radius of curvature of a path3 at a point. Improve adaptive thick line algorithm. Add option to suppress normalization of dir functions. Remove secondary camera adjustment call. commit 53437664816df95947bd6b22e7047ca433046498 Author: John Bowman Date: Wed Oct 15 18:12:14 2008 -0600 Minor optimization. commit 1e5ad6e703157c922b9b020c30d2e58c288c9a03 Author: John Bowman Date: Wed Oct 15 18:03:05 2008 -0600 Fix arrow3 sizing. commit 932d58b7843a368a112847c2e166c244c92d3373 Author: John Bowman Date: Wed Oct 15 00:14:19 2008 -0600 Implement triple invert(pair dir, triple v, projection P=currentprojection). Add a 3D arrow routine that accepts a pair direction. commit d39eaeeda70a4bc3973d328897e1b0796d295efb Author: John Bowman Date: Tue Oct 14 23:42:35 2008 -0600 Add HookHead3 and TeXHead3 arrowhead styles. commit 14aaabac9f0337624ee86c74f36b5b2ad7e5442b Author: John Bowman Date: Tue Oct 14 17:16:17 2008 -0600 Optimize 2D arclength calculation for straight segments. commit fe419cd7baea414ffd6f92a17d24afccfb426fdf Author: John Bowman Date: Tue Oct 14 17:15:31 2008 -0600 Fix degenerate perp vector workaround. commit 72c86d263469f4451fc0d3abe803c0d9f15a141c Author: John Bowman Date: Tue Oct 14 17:14:27 2008 -0600 Optimize arclength calculation for straight segments. commit 738a2255ebe0c5a8a2014fdb4fff9e6ec1ab9c43 Author: John Bowman Date: Tue Oct 14 15:24:08 2008 -0600 Fix degenerate perp vectors. commit 3388c706edcf4159ae87503bee618befe94090f3 Author: John Bowman Date: Tue Oct 14 14:21:57 2008 -0600 Fix nullpath and nullpath3 issues. Use user coordinates in camera diagnostics. commit e2d10ddde7df0b81d5ad81c67f9f351865ceafc3 Author: John Bowman Date: Tue Oct 14 11:01:52 2008 -0600 Move surface constructor for surfaces of rotation from solids to three_surfaces. Add surface constructor planar(path3). Add path(path3, pair P(triple)=xypart) constructor. commit fec16d215047435adfa9111632f46c893fcb7d1d Author: John Bowman Date: Mon Oct 13 22:40:10 2008 -0600 Fix degenerate perp vectors. commit b469972c200c0c7c56e89450be844725ee140af0 Author: John Bowman Date: Mon Oct 13 21:49:53 2008 -0600 Improve automatic camera adjustment. commit 47ef47556935f1b4d3aa9165cd8e86103cd7c689 Author: John Bowman Date: Mon Oct 13 20:36:06 2008 -0600 Fix transition between rendering algorithms. Fix handling of currentlight=nolight. Change default light for mesh lines to surface light. commit b7033d26e5e86717787c3d7759d58a696d30246e Author: John Bowman Date: Mon Oct 13 13:28:07 2008 -0600 Fix window sizing problems. Tweak constant. commit 3a01cf4c74883209b8f9b9831715c3491a813bb4 Author: John Bowman Date: Mon Oct 13 10:00:22 2008 -0600 Install externalprc.tex. commit baae1e504001f309073a01c13aeab4856af2fbe3 Author: John Bowman Date: Mon Oct 13 01:26:29 2008 -0600 Avoid cracks in thick lines. Add connector sphere for cyclic paths. commit f94d0b4e62f3360e2a00a9a56384d9972ef9270d Author: John Bowman Date: Mon Oct 13 00:44:45 2008 -0600 Enable linetype offset. commit e7a0ad4062b13b04c2436c45c797ca18dc779a89 Author: John Bowman Date: Sun Oct 12 23:39:48 2008 -0600 Transform computed surface normals. Reduce planar normal constant for accurate rendering. commit c6379e473d1ef3581558b211757da30fd24c71dd Author: John Bowman Date: Sun Oct 12 21:13:04 2008 -0600 Add Orest's patch to make short connections before longer ones. commit 1ebe7b45b06798b414e70cb105f2cf87a502dfb1 Author: John Bowman Date: Sun Oct 12 13:35:26 2008 -0600 Fix rendering of planar surfaces. commit c90bf5333a69acb9349fdd1536c9942189e98151 Author: John Bowman Date: Sun Oct 12 11:33:24 2008 -0600 Fix settings.render=0. commit ff63393e73591bf3b466f8b9bc40da50423d376c Author: John Bowman Date: Sun Oct 12 00:29:13 2008 -0600 Fix freeglut dependency. commit d345f631455b8af7748a32595f61f209b4343c72 Author: John Bowman Date: Sat Oct 11 23:59:50 2008 -0600 Remove texhash dependency from RPM spec file. commit b88d4ff8e42f94497f711834bd636cd051ed7591 Author: John Bowman Date: Sat Oct 11 23:10:17 2008 -0600 Speed up rendering of straight surfaces. commit 81db85450d667bcbfa0cee08f8b7b7a0f4c4da87 Author: John Bowman Date: Sat Oct 11 22:02:50 2008 -0600 Treat duplicate nodes as straight segments. Make write(path) indicate straight segments, consistent with write(path3). commit 2503ca4d1ad2ce82ab46b741f4f5826f577aa56f Author: John Bowman Date: Sat Oct 11 14:48:32 2008 -0600 Size 2D and 3D objects consistently when render=0. commit 62ad2e45a245997657b1a48797fe7aa5dd559191 Author: John Bowman Date: Sat Oct 11 11:09:55 2008 -0600 Respect prefix and format arguments. commit 5caa2cc71777b1bb4da0fddc03e0571a6eb5c360 Author: John Bowman Date: Sat Oct 11 00:14:43 2008 -0600 Fix normal for degenerate paths. commit e0197dd54d4529cfa67ccd52e344f913bdec06b4 Author: John Bowman Date: Fri Oct 10 23:38:12 2008 -0600 Resolve ambiguity. Optimize normal. commit b852780739cd4bb22af63989e38acc517730843d Author: John Bowman Date: Fri Oct 10 23:09:04 2008 -0600 Fix straightness test. Draw a sphere if path3 has length 0 with roundcap but not squarecap or extendcap, consistent with the behaviour of PostScript in 2D. commit e62b0e605a8180dc79da3924b7689cc917eba92a Author: John Bowman Date: Fri Oct 10 21:40:24 2008 -0600 Remove -unsafe option in favour of -nosafe setting. Remove unused code. commit 0497d1c36a9804d5d4cd7ef9dcfb5dd14599d2a8 Author: Andy Hammerlindl Date: Fri Oct 10 19:47:52 2008 -0600 Added testing of permissions. commit 78f09201a89f87fa42e569870f1a204046eb92de Author: Andy Hammerlindl Date: Fri Oct 10 18:47:43 2008 -0600 Added secure options as read-only settings. commit 7b8f87e5a582f369b7ced78f5f1385982e06e8c3 Author: Andy Hammerlindl Date: Fri Oct 10 17:42:54 2008 -0600 Added optional tests to audit the type and application caching. commit 8ccab01d6fe468e730d2a79d32f75df4a1b94f18 Author: John Bowman Date: Fri Oct 10 17:35:57 2008 -0600 Document texpath. Standardize write(path3) formatting. commit 34290dca518ad649093ec17e0bc2cf699b2e9279 Author: John Bowman Date: Fri Oct 10 09:27:34 2008 -0600 Fix example. commit 05daf2ea53e09caaceaf8234cc0258a9fa1fa16e Author: John Bowman Date: Fri Oct 10 09:24:00 2008 -0600 Fix compilation error. commit a0e55c7d1ceb54cde843700161902b663b943abb Author: John Bowman Date: Fri Oct 10 09:22:09 2008 -0600 Add missing return value. commit 60d1a1051c405c20214b8eeb74d37b5ea5cc68a6 Author: John Bowman Date: Fri Oct 10 09:10:00 2008 -0600 Document convert, animate, and system; add args option to animate. Fix segmentation fault in system. commit 575edaeefd1daa8877ff91d3b3c38ffb7823e8dc Author: John Bowman Date: Fri Oct 10 08:18:48 2008 -0600 Add files missing from last revision. commit 4b34812c6222d7639176cb150c4ce0cb61a62197 Author: John Bowman Date: Fri Oct 10 02:45:32 2008 -0600 Make default surface color black now that lighting is on by default (otherwise planar surfaces might not be visible). Add unithemisphere. Draw hemispheres rather than spheres at joints. Simplify linecap code. Use linecap(0) by default for meshlines. Don't draw thin line if opacity of pen is less than 1. commit 63785292a8872eea4482057643ca8d4e313484f5 Author: John Bowman Date: Fri Oct 10 00:58:16 2008 -0600 Add min and max arguments to axes and axes3. commit 19aa769f07f3552b8fcaa172abe2fc3315945bb0 Author: John Bowman Date: Fri Oct 10 00:52:48 2008 -0600 Simplify paths. commit 86afa75132b7408133e32953a1182b2877381534 Author: John Bowman Date: Thu Oct 9 22:12:26 2008 -0600 Allow the specification of fuzz=0 in intersection routines (the new default, fuzz=-1, specifies a fixed multiple of the machine precision). commit 770063a8564a3caeeda2b5daa9d1c5c53c70f08d Author: John Bowman Date: Thu Oct 9 21:34:15 2008 -0600 Fix division by zero error. commit 19c3e714f4aa541026e7f8ce54cf49511d2a3336 Author: Orest Shardt Date: Thu Oct 9 19:23:43 2008 -0600 Improve splitting of triangular patches. commit bb431ae8b39aa8c66bae401438839f4e9e1d259b Author: John Bowman Date: Thu Oct 9 01:23:49 2008 -0600 Fix longitudinal lines in solids.asy. Split longitudinal curves into front and back pieces; add longintudinalpen=frontpen and longintudinalbackpen=backpen. Use longitudinalpen=nullpen instead of longitudinal=false. Make dash lengths in solids.asy consistent between different rendering modes. Fix OpenGL opacity calculation (only for settings.render=0). Set P.ninterpolate to 1 for projections from infinity. Fix 3D dashed lines for degenerate cyclic paths. Increase fuzz in 3D arc and Arc routines. Update cone radix in solids.asy. commit a879e30890cc04c2e386415857144c1260ace1dd Author: John Bowman Date: Wed Oct 8 21:57:16 2008 -0600 Fix arctime for cyclic paths of zero arclength. commit 246b189492f41e694ce067bcc139af0cc2d77332 Author: John Bowman Date: Tue Oct 7 15:50:10 2008 -0600 Reduce number of patches in unitcone. Rename solidcone to unitsolidcone. Improve appearance of straight arrows. Increase fuzz in arrow end tests. commit 7d47f3d7e53f6999ec8ba5e463cd5533c999adf0 Author: John Bowman Date: Tue Oct 7 14:27:36 2008 -0600 Add arrow to NoTicks. commit 2350e092e97f564193df1afa0241b13ab1b8fad1 Author: John Bowman Date: Tue Oct 7 13:57:30 2008 -0600 Fix transverse slices. commit 236f3d2e2acbc367c991d4614deefa37a2063bbc Author: John Bowman Date: Tue Oct 7 12:00:47 2008 -0600 Give user control over slice Arc accuracy. commit 6d460c3889480d4fd88a6e3f3567b0fc27a13566 Author: John Bowman Date: Tue Oct 7 11:32:08 2008 -0600 Increase longitudinal epsilon. commit 0626509ce02f1c0473fcfd481f089c2e6824fd2b Author: John Bowman Date: Mon Oct 6 16:49:30 2008 -0600 Document need for version 2008/01/16 or later of the movie15 package. commit adfd8d95fb575a4e7511cde1170150fc5cccea0e Author: John Bowman Date: Mon Oct 6 16:19:50 2008 -0600 Fix incorrect cast. Resolve ambiguities. commit 691fdeba886be97a0b7fc5c44ebfa0cd73dd48d3 Author: John Bowman Date: Mon Oct 6 12:26:16 2008 -0600 Update documentation. commit bbd1c8040d2e7d645227a729cc923133d9cdf96f Author: John Bowman Date: Mon Oct 6 12:05:43 2008 -0600 Add utility for forcing Adobe Reader to update all currently loaded documents. commit e47173ba27d35777b1edd1d30e95f839901f42e1 Author: John Bowman Date: Mon Oct 6 11:24:49 2008 -0600 Use NUL instead of /dev/null under MSWindows. commit b6e12abbc219dfaf582b24788bd6d11f65183dcd Author: John Bowman Date: Mon Oct 6 05:36:07 2008 -0600 Increment version to 1.45svn. commit 9c86cdd6a32142cca7fe4a443bc36192cba2e098 Author: John Bowman Date: Mon Oct 6 03:48:54 2008 -0600 Update documentation. commit 01ed46270df994548349be0f2e6b112b2f5b9644 Author: John Bowman Date: Mon Oct 6 01:09:53 2008 -0600 Remove settings.tex="pdflatex" from embed.asy and move contents of embedding.asy into this file. Generalize movie15 patch to pdflatex; restore @ catcode to its previous value. Reduce size of manual. commit 987faf990fb1adec72aaf3f72b9176e9ca034cff Author: John Bowman Date: Sun Oct 5 21:20:57 2008 -0600 Fix missing BBox bug in movie15 version 2008/01/16. commit a245d161df6b5603452b42d10a198ffa31666167 Author: John Bowman Date: Sun Oct 5 03:33:08 2008 -0600 Handle degenerate scaling. Fix manual build problems. Update examples and documentation. commit 9c9c3fadd3a230f6d2ecefdd85a6f935ca9e9934 Author: John Bowman Date: Sat Oct 4 23:13:48 2008 -0600 Fix absolute viewpoints. commit d38da2db56425068f34003393540912efc22ab16 Author: John Bowman Date: Sat Oct 4 19:18:49 2008 -0600 Fix example. commit 5662f10ca793475007c144f8e15edb4d7cb9cd8f Author: John Bowman Date: Sat Oct 4 18:18:00 2008 -0600 Fix examples. commit 1e3bbb896eca8318e3c450502f46ca0035713496 Author: John Bowman Date: Sat Oct 4 17:12:05 2008 -0600 Add file missing from last revision. commit 75d1a9ebd17d7a737756dceafdc7def97cb17ed0 Author: John Bowman Date: Sat Oct 4 17:11:37 2008 -0600 Improve definition of unitcone. Make xasy work again with 3D pictures. commit f600479daf9a0ebddfaf68714df208444d76cf4a Author: John Bowman Date: Sat Oct 4 14:53:47 2008 -0600 Remove interp(int,int,real). commit 4aa519732f652230ecaedc8e54cd52fb609a6eda Author: John Bowman Date: Sat Oct 4 11:45:14 2008 -0600 Handle degenerate point in cone. Tweak parameter in thick lines. commit 355a989ef64871ef160394f74f36abb71d79508a Author: John Bowman Date: Sat Oct 4 01:15:46 2008 -0600 Fix cracks in thick lines. Fix projection and clipping. Fix 3D animations. commit 2e9ccd5d05b774d3e21a4b799536510c2b440a95 Author: John Bowman Date: Fri Oct 3 17:21:00 2008 -0600 Force -noprc during documentation builds. commit 8365dfbfa96fd6d787cc7a9a4f2a710a2b3dbc5c Author: Andy Hammerlindl Date: Fri Oct 3 17:07:00 2008 -0600 Fixed matching of defaults for functions with rest arguments. commit dfed4bfb80e49c5fe703a93dded72ccfaa0df450 Author: John Bowman Date: Fri Oct 3 16:32:10 2008 -0600 Make latexusage produce a rendered image by default. commit d53e950205d309c69c2f4558351cf133addf8b12 Author: John Bowman Date: Fri Oct 3 15:49:34 2008 -0600 Respect -noprc. commit f6022f259b33bfe692f0291b7cd4a32f17e609a6 Author: John Bowman Date: Fri Oct 3 04:09:58 2008 -0600 Remove references to obsolete modules. commit 2ce92f4ebdf01e44843b7ad281430135c319a4e1 Author: John Bowman Date: Fri Oct 3 03:43:53 2008 -0600 Restore symmetric clipping planes. Fix embed ambiguity. Update examples. Make preliminary documentation updates. commit bd1cd3509b9156cc0addfe043a5a3e9a33185384 Author: John Bowman Date: Fri Oct 3 01:01:09 2008 -0600 Use a better default for tick and axis label selection. commit 8ce64fdbab5ce351116d5526b5c8e2836a41510c Author: John Bowman Date: Fri Oct 3 00:02:26 2008 -0600 Return a zero scaling when unbounded (revert 1.44-252); see generalaxis3. Rename LeftTicks3 to InTicks, RightTicks3 to OutTicks, and Ticks3 to InOutTicks. commit 2506b0faf7f20bf480fdf5796d5aa37de880d3b0 Author: John Bowman Date: Thu Oct 2 16:47:12 2008 -0600 Remove unused code. commit fbf60a9cd7a93e4ec4f71634f81a009b2eba1e67 Author: John Bowman Date: Thu Oct 2 16:43:22 2008 -0600 Support PRC images even when inlinetex=false. commit 9812fa6d9e85f2c117c9e764e237fc08b9a931a8 Author: John Bowman Date: Thu Oct 2 02:40:10 2008 -0600 Support PRC, with optional rendered preview, in inlinetex mode. commit 3780d2fdfd74873a0a41e92c763992d72b911df3 Author: John Bowman Date: Wed Oct 1 23:50:15 2008 -0600 Work around degenerate up vectors. commit 59235a64322e4d9af3aacf87d82605821486979e Author: John Bowman Date: Wed Oct 1 22:45:06 2008 -0600 Fix perspective projections and clipping. commit 6c4d4326ea56ef3164a4757b533ad7a49eca5724 Author: John Bowman Date: Wed Oct 1 21:34:38 2008 -0600 Fix reference vector indices. commit e18c8f9739b31ce0d8716dd4d34a4affdadc71a8 Author: John Bowman Date: Wed Oct 1 20:56:14 2008 -0600 Support prc with pdflatex. Fix light transforms. Use sequence for array loops. commit d90fb9cab118ea3761dd2c2eca5fc5a9df7864db Author: John Bowman Date: Wed Oct 1 14:07:53 2008 -0600 Support texpath in inlinetex mode. commit 4840f25bc8cc76d5b008baff72b31301c35d97cd Author: John Bowman Date: Wed Oct 1 03:45:46 2008 -0600 Fix sizing of perspective projections by usingd an accurate subdivison algorithm to calculate the optimal field of view angle. Use an accurate projected path3 bound for picture sizing. Optimize projection routines. commit 9b9bf22e4c751ecc7b2405c4028fcafb1b52a7d4 Author: John Bowman Date: Tue Sep 30 11:58:22 2008 -0600 Don't cache projected bounds. commit 889b91cee23aee5799618c789bc8b4daf5fd83bf Author: John Bowman Date: Tue Sep 30 10:59:03 2008 -0600 Fix rendering from an absolute viewpoint. commit 7b811cdad3343f270edbb96afc40c57291aca5f2 Author: John Bowman Date: Tue Sep 30 03:53:15 2008 -0600 Fix picture sizing and clipping plane. commit d0a1de8b34ba2ed05cd1fc0b8a1c0538d17665ea Author: John Bowman Date: Tue Sep 30 02:14:12 2008 -0600 Use a separate frame for preview rendering. commit 4977cb85f158f2e643f2958a7ca1a0e907e31b0b Author: John Bowman Date: Mon Sep 29 19:01:39 2008 -0600 Minor optimizations. commit 12c7b6a47985ae0aa110ca39c575ec87a9a5a6df Author: John Bowman Date: Mon Sep 29 03:39:09 2008 -0600 Limit window to physical screen size under MSWindows due to OS limitations. commit ae0ab2d344985ca2027a223fb009fd67085f66b9 Author: John Bowman Date: Mon Sep 29 02:08:52 2008 -0600 Fix window size checks. commit 51819e119ff82a0e29daaceb67f75a1bba0c5a58 Author: John Bowman Date: Mon Sep 29 01:41:25 2008 -0600 Use gluEndCurve not gluEndSurface. commit 9075f472590c9760a94c247cf5d7d12b162b7e81 Author: John Bowman Date: Mon Sep 29 01:09:16 2008 -0600 Allocate image rather than putting it on the stack. commit 10b0cbf91b825294005d095f37084cf93c30e896 Author: John Bowman Date: Mon Sep 29 00:47:41 2008 -0600 Optimize solids.asy. commit 04e54c5eaaf34b67f3f7054689503c8e4e2e1131 Author: John Bowman Date: Sun Sep 28 23:01:01 2008 -0600 Fix shrink (- or _) and expand (+ or =) keys. commit d168f5736ad199d1b0b7decee1e5a88314639289 Author: John Bowman Date: Sun Sep 28 22:25:20 2008 -0600 Remove unneeded bzero. commit 85d1559a9d219a17ab1ea1676f3771fff60b8675 Author: John Bowman Date: Sun Sep 28 22:22:19 2008 -0600 Port to cygwin. commit c39a492a8574f1d5ab3ab7518466820e110976c8 Author: John Bowman Date: Sun Sep 28 21:46:48 2008 -0600 Fix cygwin configuration. commit 27ef19ce3571c07f47ae25a8547faf10f40f590c Author: John Bowman Date: Sun Sep 28 12:58:51 2008 -0600 Support CYGWIN freeglut configuration. commit 966268d31497e4778bdb659aa180399390fceb88 Author: John Bowman Date: Sun Sep 28 11:56:33 2008 -0600 Avoid redundant transformation for infinite projections. commit 953ad71d6dfd10a0ddafa7ee8540ea6dc7df3fb4 Author: John Bowman Date: Sun Sep 28 11:47:50 2008 -0600 Preserve aspect ratio on export. Work around viewport size driver bugs. commit 5fbdf27645360c0a1effc27dd325d384301e3009 Author: John Bowman Date: Sun Sep 28 03:27:07 2008 -0600 Port to cygwin. Wait until menu disappears before exporting. Right button without motion, in addition to middle button, now brings up menu. Fix export segmentation fault. Fix mesh mode. commit 7edb1c93d655cddc5562dc38ebff6cbdb8736e62 Author: John Bowman Date: Sat Sep 27 10:37:38 2008 -0600 Add missing 2D Arc routiones. Remove unusual handling of negative radii. Update arc and Arc documentation. commit 6abd91a066dbe564210c7c1c4185cc26e782aba9 Author: John Bowman Date: Sat Sep 27 03:17:06 2008 -0600 Render at requested size in interactive mode. Fix transverse slices of solids of revolution. Simplify arc and Arc routines. Check for invalid normal vectors in 3D arc and Arc. commit 36999977922c983da159e435d3f302efd001401b Author: John Bowman Date: Sat Sep 27 00:29:16 2008 -0600 Preliminary changes to support CYGWIN. commit 9314d7e7887d1eb9be676e6a0582e671323bee31 Author: John Bowman Date: Sat Sep 27 00:18:48 2008 -0600 Remove psimage code. commit b449661b1b3f3043852f3a6ce690105425c3aabc Author: John Bowman Date: Fri Sep 26 23:38:00 2008 -0600 Remove obsolete psimage feature (use -render=n instead). commit 8e814f5d9ff6876292ad53206bf47e2e05cb35c4 Author: John Bowman Date: Fri Sep 26 23:33:09 2008 -0600 Fix path3 rendering. Add meshlight option to surface routines. Improve glrender mesh mode. Simplify light constructors. Clean up code. Remove OpenGL license from glrender.cc as the original code has been completely replaced by our own code. Update examples. Remove unused lights.js file. commit b5f168b67aa737a7f11c0a7da3e9546672450255 Author: John Bowman Date: Fri Sep 26 12:53:55 2008 -0600 Make object argument optional in flowchart routines. commit a1cb3ff0719f028623e9a28fe3b21e0ef35ef512 Author: John Bowman Date: Thu Sep 25 00:31:50 2008 -0600 Standardize lightmodel with openGL; support multiple lights. Add viewport option to light to force lights to be fixed in the viewport frame. Communicate non-viewport lights to embedded PRC files. Add +/- expand/shrink keyboard shortcuts. commit 3183cd3346d88442a0f34e86b7092d614faed252 Author: John Bowman Date: Wed Sep 24 03:34:35 2008 -0600 Replace the light model with the one used by openGL. Use nurb routine whenever the surface is not straight and the light is on. Add -nothin option to force pen thin to be set to the initial defaultpen. Support custom embedded javascript files via a script option to shipout; add lights.js example. commit d310ac530844a01f943e63a42fe488fdf3e81d1a Author: John Bowman Date: Wed Sep 24 03:25:34 2008 -0600 Set the opacity of the sum of two pens to be the larger of the two opacities, adopting the blending mode of the second pen. commit 900a2509e7e48eeeecfb9244742664462c32d40c Author: John Bowman Date: Tue Sep 23 02:18:57 2008 -0600 Fix more material vs. pen problems. Improve degenerate normal test. commit 19f717837954a62b9b6f5bc133dabddd929c2da8 Author: John Bowman Date: Mon Sep 22 23:16:10 2008 -0600 If the render value is negative, use 4 times its absolute value for rendering eps and pdf formats and 2 times its absolute value for rendering other formats. Turn light off for drawing meshes. Specify light coordinates in viewport frame. Fix line colors. Provide an optimized patch constructor for quadrilaterals. commit 46b54b99f4060c19d23fc9cb5814dc1391324628 Author: John Bowman Date: Mon Sep 22 17:24:11 2008 -0600 Remove preview option in favour of render=n > 0. Fix line material defaults. Viewer is no longer updated by erase() since we don't know whether the original picture was 2D or 3D and reloading acroread is slow. Spurious shipouts arising from cameralink are now suppressed. commit c9f40fcc55c2c9354330749bf8208ceb3640b595 Author: John Bowman Date: Mon Sep 22 14:51:56 2008 -0600 Add option -preview to render 3D preview image. commit fac8c870a1e483c08963f7d794936f4f99ed6b3d Author: John Bowman Date: Mon Sep 22 11:52:56 2008 -0600 Remove obsolete outward flag. commit 790ac4aecde366b2f22c77aab5f9540c2ce6a236 Author: John Bowman Date: Mon Sep 22 09:05:17 2008 -0600 Revert last change. commit d9f599e28adbf465adb9fd685e467da4a53e8be0 Author: John Bowman Date: Mon Sep 22 09:03:50 2008 -0600 Suppress another unnecessary warning. commit 8106ef18917d33c053c69d885417e76c1b30c7ff Author: John Bowman Date: Mon Sep 22 08:45:44 2008 -0600 Suppress unnecessary warnings from automatic picture sizing. commit f03f00939aba56d9e4fe4f58d61ac3d74f6a3bbd Author: John Bowman Date: Mon Sep 22 03:05:03 2008 -0600 Support orthographic projections in PRC. Fix definition of emissive. Transform currentlight correctly in shipout3. commit 6b10a32eacf8291eca8e3bbfb60a7abfac24a847 Author: John Bowman Date: Sun Sep 21 14:43:48 2008 -0600 Fix orthographic and oblique clipping. commit cd2ead2066972765f47086fd2d169954230f0ae9 Author: Orest Shardt Date: Sun Sep 21 14:10:34 2008 -0600 Fix z rotation. commit b8662acce03a7f8f6f663705b6ee264e31ec490d Author: John Bowman Date: Sun Sep 21 13:34:37 2008 -0600 Support compilation without freeglut. commit 34ee9b3a14f79efb2524e63929d3585450bb6854 Author: John Bowman Date: Sun Sep 21 11:33:45 2008 -0600 Fix normal0. commit f79f8e84dec627eb3f1adcad2b0cb520d87d8924 Author: John Bowman Date: Sun Sep 21 11:32:55 2008 -0600 Add optimized vertex normal routines. Add fuzz to arrow position test. commit 6c368a1e776dd57fcc89b986d4dccf9d219ade4b Author: John Bowman Date: Sun Sep 21 00:57:00 2008 -0600 Fix includes. commit 356eaf53fb4cb3f795185b8b5bb431f0a5af903d Author: John Bowman Date: Sun Sep 21 00:52:01 2008 -0600 Fix glOrtho parameters. commit 1a022b26985d53b7be158756fdfe1dc610fe4a7e Author: John Bowman Date: Sat Sep 20 23:59:37 2008 -0600 Improve surface culling. Use GLUnurb for rendering a path3 (unless it is piecewise straight). commit af0b8965ea4d0a46eaf0efdb032e8090607de630 Author: Orest Shardt Date: Sat Sep 20 14:20:06 2008 -0600 Undo renaming of slidemovies.asy. commit f4acd62482a50ef7ec3a614a3e4262d11b0034a0 Author: John Bowman Date: Fri Sep 19 22:55:58 2008 -0600 Adjust rendering constants. commit e51d2f144c16a99b6e65eb08aa52654877b98109 Author: John Bowman Date: Fri Sep 19 22:36:16 2008 -0600 Update convert options; add convertOptions setting. commit de8c612435501b4bfd160adc6213b83602eb9703 Author: John Bowman Date: Fri Sep 19 14:58:20 2008 -0600 Allow compilation without freeglut library. Fix width and height sizing. commit 512c14d4c3aad03906ef62376ed7bea0106c92fa Author: John Bowman Date: Fri Sep 19 13:36:35 2008 -0600 Use render setting for convert. commit c2c5ad1d9043daae40db4df06295ae4405eca4c2 Author: John Bowman Date: Fri Sep 19 13:08:14 2008 -0600 Add antialias=false option to image routines. commit 5c675ac18ab4fbddc1233f8395ed3da286d12bba Author: John Bowman Date: Fri Sep 19 12:44:53 2008 -0600 Improve configuration diagnostics. commit e5a0f320946b4efdaa1e5f19ab961e3892fec445 Author: John Bowman Date: Fri Sep 19 01:59:23 2008 -0600 Don't dealias last column of pixels. commit e072aff3638f8f23a30feb3ef7b2dd9b5430bb2a Author: John Bowman Date: Fri Sep 19 01:55:18 2008 -0600 Fix segmentation fault: don't dealias the top row of pixels. commit 8c29b6213d34ac0113a7804b84dafe9923eb6c99 Author: John Bowman Date: Fri Sep 19 01:20:05 2008 -0600 Support antialiasing of all images. commit 9186b72c973070bc2479f036a4a29e1e359975ec Author: John Bowman Date: Fri Sep 19 01:10:51 2008 -0600 Support inline antialiasing. commit 18d37540940bee3fb91146a53fdce9be60893840 Author: John Bowman Date: Thu Sep 18 23:18:41 2008 -0600 Improve rendering options. commit b438f03c022db3d669be8f6b4a04f45e04183808 Author: John Bowman Date: Thu Sep 18 12:25:57 2008 -0600 Antialias export images. commit 429d37d34f8e8b6cb1356afabeb85df36316fe6a Author: John Bowman Date: Thu Sep 18 12:11:57 2008 -0600 Fix export. commit 6e62cb14a4c1001e0412ac439d8a5e0be46d2828 Author: John Bowman Date: Thu Sep 18 03:47:05 2008 -0600 Simplify and optimize surface rendering. commit d86c200e1a646282a44582c6a392918aecf53b21 Author: John Bowman Date: Thu Sep 18 02:23:07 2008 -0600 Always use nurb rendering algorithm (with callback) for degenerate patches when the light is on. commit b0edb45297df294e72a11e8a9a046d072a069520 Author: John Bowman Date: Thu Sep 18 00:17:53 2008 -0600 Fix rendering artifacts at degenerate control points. Improve unitcone. commit 474f0747c777b9f1ebc921df4261adbe1a26d57e Author: John Bowman Date: Wed Sep 17 08:55:44 2008 -0600 Add a maxviewport setting for working around direct rendering driver bugs. commit d848274e3bbfab5cb07c6f81eac43c4076c5b27c Author: John Bowman Date: Tue Sep 16 23:47:20 2008 -0600 Retune rendering parameters. commit a4b88696b58eb0bbc59bd8e84626368e94a92b5c Author: John Bowman Date: Tue Sep 16 22:28:11 2008 -0600 Add mesh mode menu. commit c46b8b39cbb403c4134c8ce3174f479eb7803bbc Author: John Bowman Date: Tue Sep 16 19:34:29 2008 -0600 Force a minimum rendering window size. commit d939ff4ee61b9d3d3ac69c355a52626ef3b87e16 Author: John Bowman Date: Tue Sep 16 19:06:42 2008 -0600 Allow explicit surface normals to be specified (currently only respected when render=0). commit a4c7d2fcd4cb0886b00743677bf390077490cea2 Author: John Bowman Date: Tue Sep 16 17:42:33 2008 -0600 Work around direct rendering segmentation faults. Improve full screen mode. commit d8252c49470d6ad0ada0562d47aac8838ac8781e Author: John Bowman Date: Tue Sep 16 13:29:55 2008 -0600 Use fullscreen rendering by default. commit 8af536b3f4f210ced538d0ffdc0cb10afb811f17 Author: John Bowman Date: Tue Sep 16 09:21:24 2008 -0600 Remove broken bounding box test optimization. commit 579686b62eba7c13f3b9f9cea06f99dd70507b93 Author: John Bowman Date: Tue Sep 16 02:08:38 2008 -0600 Use hybrid EvalMesh2/NurbSurface rendering algorithm for better speed & accuracy. Remove localsub option. Rename int path3quality back to bool thick. commit 7db8eefb7fef904c05bc958868e25daf62933840 Author: John Bowman Date: Mon Sep 15 23:13:09 2008 -0600 Add toggle fullscreen menu option. Add further keycodes. commit 3cb3b04554dbed6087519ed330b0aca4e422f853 Author: John Bowman Date: Mon Sep 15 17:31:58 2008 -0600 Initialize timer before spinning. commit 6ca3a4020e8d5ca9c8bc45e0e2e6f36a28b49542 Author: John Bowman Date: Mon Sep 15 17:21:28 2008 -0600 Improve spin/arcball interaction. Make the Home menu item reset the zoom. commit 10939a78da05590a21afa5fbcf6a5e9378098f01 Author: John Bowman Date: Mon Sep 15 08:49:52 2008 -0600 Use -render=0 instead of -norender. commit 082dd13f4d48af08c451532f1c128dc75599ecb2 Author: John Bowman Date: Sun Sep 14 22:03:32 2008 -0600 Use a better reference value in path and path3 dir functions. Fix zoom/rotate synchronization. commit 64b7a1dca9805837643a1d50557bd170ffcdb487 Author: John Bowman Date: Sun Sep 14 20:53:45 2008 -0600 Simplify dir(path, real) and dir(path3, real) computations. Fix accel(path3, real). commit 7a28d7c623e781bc4c094b1578d60fd3dd0d0114 Author: John Bowman Date: Sun Sep 14 09:56:50 2008 -0600 Add position parameter to specify initial rendering screen position (negative components indicate relative to screen width or height). commit 54059bba3420f566dbde12d28ba47fd45828d8e3 Author: John Bowman Date: Sun Sep 14 09:23:08 2008 -0600 Add Export and Quit menu items. commit 08c2c32d2ccf4529ce90034d5d87d902c1ea7519 Author: John Bowman Date: Sun Sep 14 03:05:29 2008 -0600 Remove remaining scale3D factor; retune adaptive constants. commit 27254d610032645a3876f7ea35e04540f59378d0 Author: John Bowman Date: Sun Sep 14 02:44:01 2008 -0600 Move PRC cm scaling to a more sensible place. commit 83febd4929fd9d8a49b1d7fa5e254989537b4742 Author: John Bowman Date: Sun Sep 14 01:10:13 2008 -0600 Fix oblique transformations. Rename linequality to path3quality. commit 194182305179b22ee098a99f94cbb0b1ba7f6f7e Author: John Bowman Date: Sat Sep 13 22:18:15 2008 -0600 Add menu (middle mouse button) with Home and Spin options. commit 7bf3f93c0c2e1c297a9738724ca8e8229ddcc22b Author: John Bowman Date: Sat Sep 13 17:57:35 2008 -0600 Support interactive rendering. Remove obsolete Wait and NoWait keywords. commit ec3bccb1adea541766b4ee11ac3839ba53035120 Author: John Bowman Date: Sat Sep 13 13:14:55 2008 -0600 Add linequality and twosided settings. commit 58df06a1991ea331a0fb6eb42f5144ec52eebd0b Author: John Bowman Date: Sat Sep 13 09:43:03 2008 -0600 Compute surface bounds for transformed frames correctly. Speed up rendering by drawing only the surfaces and paths within the field of view. commit a87f2cd1a8d4366040d840542c7834de386ed3ff Author: John Bowman Date: Fri Sep 12 21:48:33 2008 -0600 Fix mouse button zoom. Improve mouse bindings. commit f34bc01af1562c829bef378a1ea983a470777e58 Author: John Bowman Date: Fri Sep 12 17:04:16 2008 -0600 More zoom improvements. commit 1d70efd24bc6b655b7dde06ebe7e8149b413a7c4 Author: John Bowman Date: Fri Sep 12 16:23:47 2008 -0600 Zoom on center of window; improve resizing. commit e0d7d872299e724140c941cc6209b8c30ed0d63d Author: John Bowman Date: Fri Sep 12 00:42:43 2008 -0600 Account for field of view factor of 0.6 (from javascript). commit 1306945bedc1d5c7af28498b69be3f1e069ff1d1 Author: John Bowman Date: Wed Sep 10 01:45:00 2008 -0600 Compress all images and encode them with ASCII85. commit bd2d8423cdef245203d3b22a6c135f026f4aef8d Author: John Bowman Date: Tue Sep 9 10:56:31 2008 -0600 Force use of new c-lang-defconst for proper indentation after struct. commit 134e9e374555b88b0f9f70318d87dcab43d12d43 Author: John Bowman Date: Tue Sep 9 02:57:38 2008 -0600 Fix add. commit 53105d5aa0782312daee014be542fd9f6c8d0f43 Author: John Bowman Date: Tue Sep 9 02:38:47 2008 -0600 Compress rendered images with zlib. commit 027634cd45f7170a67372e488bb386e89cfdd352 Author: John Bowman Date: Tue Sep 9 00:42:32 2008 -0600 Support rendering into other colorspaces. commit e9c85db11e45ee1bf7d14426790031c82c370013 Author: John Bowman Date: Mon Sep 8 23:51:16 2008 -0600 Fix zoom-dependence of arcball radius. Fix rendering problems with mixed 2D+3D drawings (ignore 2D drawing). commit a5412018d8c485ead475553bdcb10730fa7df778 Author: John Bowman Date: Mon Sep 8 23:19:00 2008 -0600 Fix segmentation fault if renderer ends abnormally. Use color instead of material for path3 rendering, just as for prc. Add thicklocalsub parameter. Use two-sided lighting model. Fix handling of transparency. commit d6014b1524b34260afcca32d05ad03998b33484e Author: John Bowman Date: Mon Sep 8 02:54:29 2008 -0600 Disable rendering during builds. commit 7c59158cdfb005b0f6a41b3d63cd5893b8cdfa4e Author: John Bowman Date: Mon Sep 8 02:14:24 2008 -0600 Implement openGL-based adaptive-mesh renderer. commit f155070f4befcf23d0ac69ee23a8aa92c497a17c Author: John Bowman Date: Thu Sep 4 22:57:07 2008 -0600 Fix surface orientations. Optimizations array references. commit febc21e3943d082cf131ae39237b6da734a47de5 Author: John Bowman Date: Fri Aug 29 21:53:57 2008 -0600 Allow 2D drawings under 3D drawings. commit a2670bc60d6510d22c015d0726e44be46232d29a Author: John Bowman Date: Fri Aug 29 20:17:36 2008 -0600 Use consistent notation for control points. commit a5ce25ee5cf3e515e1128ec256ad6eb92151d385 Author: John Bowman Date: Fri Aug 29 20:16:18 2008 -0600 Turn off default graph autoscaling. Set extend=false by default for 3D axes. commit f75a43432db7d9737aa380335e4673435c894dcf Author: John Bowman Date: Fri Aug 29 20:14:29 2008 -0600 Rename Bezier/BezierP to bezier/bezierP. commit 3191bd7cfe5f54c04e30b85d086d18cf788abcbb Author: John Bowman Date: Fri Aug 29 12:36:21 2008 -0600 Don't allow curve to reach surface of tube. commit 5f981eaa8ff78e640e37b7e366e56e21faa2053c Author: John Bowman Date: Fri Aug 29 12:35:00 2008 -0600 Fix overflow problem. commit 1e2357150b3fd6ef4242d4b2cd1d7c35014f2880 Author: John Bowman Date: Fri Aug 29 10:12:37 2008 -0600 Re-enable adjustdash for paths. commit f3088a65374528b445033c75f22b6e54782dbf8e Author: John Bowman Date: Fri Aug 29 01:50:34 2008 -0600 Implement add(picture,picture,triple) for adding fixed sized 3D pictures about a point. Simplify arrow definition. Move supplementary 3D routines from plain_picture.asy to three.asy. commit 30d00119bdab6aae028a93248dad91fff9bd7e3c Author: John Bowman Date: Fri Aug 29 01:02:27 2008 -0600 Add pen bounds to arrow routine. commit 4af79abbf8ef1653a58445cdc47d6cbec5c992b3 Author: John Bowman Date: Fri Aug 29 00:54:30 2008 -0600 Uninstall pixel.pdf. commit 0a43bfd1418565080f517542b84989a12ae5e2d4 Author: John Bowman Date: Thu Aug 28 09:00:49 2008 -0600 Fix typo commit edce2abbabdfe99dadb63f1fa681d2e0eae8c4e4 Author: John Bowman Date: Thu Aug 28 09:00:30 2008 -0600 Fix file location. commit f57ae914e78fde268ebe3b1d38720704139dd82d Author: John Bowman Date: Thu Aug 28 01:13:22 2008 -0600 Add missing 3D arrow and dot functions. Workaround singular matrices in align routines. Fix conditional drawing of surfaces. Update examples. Delete gc-7.1FreeBSD.patch as it isn't required any more under 7.0-RELEASE-p2. commit ea94efef01cf69c849c44ed1d9b5c5ebf9a6124e Author: John Bowman Date: Wed Aug 27 23:11:31 2008 -0600 Fix segmentation fault. commit d2cdbdda93b4b675eb31e4fc08d0f516dd05798b Author: John Bowman Date: Wed Aug 27 21:58:08 2008 -0600 Rename dir parameter of axes to align. Check that the sum of all dash lengths is positive. Install pixel.pdf in examples directory. Install silentPrint.js and reload.js in base directory. commit 0f790770ffaeaa8508c85f322745e8c2405abb87 Author: John Bowman Date: Wed Aug 27 21:28:11 2008 -0600 Add surface bicubic spline code (based on code contributed by Oliver Guibe and the method use in Scilab). commit a3aa4c22df9c0bfbd1626379f4a603d70849ea17 Author: John Bowman Date: Wed Aug 27 16:35:04 2008 -0600 Improve the appearance of arrows on cyclic paths. commit 601472905ec1e702f89871b49cf25d3f401c3808 Author: John Bowman Date: Wed Aug 27 16:28:11 2008 -0600 Implement more accurate and efficient version of accel(path3, double). Add missing begingroup3/endgroup3. Fix texengine vs. texcommand confusion. commit 53c8910437384382e8de02f0bd5ba9200a82627f Author: John Bowman Date: Wed Aug 27 15:39:43 2008 -0600 Check for division by 0. commit 4a23a12d76899c342d29e1d0452c7be1b76a90cb Author: John Bowman Date: Wed Aug 27 15:11:48 2008 -0600 Return a unit scaling again when unbounded. commit e37fb5caca7c78b9e88f530caec04e9a41ece07c Author: Orest Shardt Date: Wed Aug 27 14:38:39 2008 -0600 Add header for uint32_t. commit 0444796dae93a99cb289672a23dd2a743ab549a7 Author: John Bowman Date: Wed Aug 27 02:44:35 2008 -0600 Optimize projection routines. Update cube animation. commit efab54ed6c6673db8df6c9af565f70d733f3dbdc Author: John Bowman Date: Wed Aug 27 01:43:40 2008 -0600 Rename keyword. commit 71b99a925bf23a452730458dacd533807ae3591c Author: John Bowman Date: Wed Aug 27 01:32:48 2008 -0600 Update examples. commit b74b79798a55dc0cf45c4cc78c1af1de46f2d763 Author: John Bowman Date: Wed Aug 27 00:59:16 2008 -0600 Try to draw labelled axes on the front boundary. Fix tick directions. Set axis types explicitly since axis members are volatile. commit 63d1e620824e48be38c1cddb7327ea0693be211d Author: John Bowman Date: Tue Aug 26 19:36:34 2008 -0600 Fix path labels. Remove filltype argument from 3D functions. commit 8f8205af5b56fd18077cbbb1bb8e4a5bd659508b Author: John Bowman Date: Tue Aug 26 18:48:43 2008 -0600 Implement 3D dash length adjustment. commit a2d8888a8c56da0288ded34098ee0df6783bf10f Author: John Bowman Date: Tue Aug 26 17:20:16 2008 -0600 Fix granularity; add arrowheadlight(). commit d97cb5a320b7306428c51d410eecd81016df68c9 Author: John Bowman Date: Tue Aug 26 17:18:35 2008 -0600 Make arrowheadlight=nolight by default for non-PRC drawings. commit 761a85828165acffaab4470a86b9b865fc11c283 Author: John Bowman Date: Tue Aug 26 13:41:28 2008 -0600 Move operator * (transform3, triple) to C++ code. Remove align in favour of transpose(transform3); rename transform3 to align. Make arrowhead pen a material. Add arrowheadlight. Add light to PRC draw functions. Check all array pointers. Add operators == and != for pen arrays. commit e4729be39b09068788bb91ce4f02f4dd08cc03f1 Author: John Bowman Date: Tue Aug 26 09:08:01 2008 -0600 Turn off prc flag for documentation builds. commit dac52652851c2e82fc783d4f4a7c0c809976991e Author: John Bowman Date: Tue Aug 26 08:52:08 2008 -0600 Set settings.prc=true by default. Update examples. Check for nullsurface in three_arrows. commit 1a20041faad2f518344cbce7f1a83a43118cdf69 Author: John Bowman Date: Tue Aug 26 08:15:38 2008 -0600 Update example. commit 92d4174af52853cafe91dd47ac44e6b02c1afec1 Author: John Bowman Date: Tue Aug 26 08:00:19 2008 -0600 Add missing file. commit 74c9bb56087292ba86bfd06289c7df288b1f2a26 Author: John Bowman Date: Tue Aug 26 02:07:26 2008 -0600 Speed up 3D graphics by moving path3 to C++ code. Fix 3D bounding box bugs. Remove remaining references to obsolete bbox3 structure. commit 311eecdc5c30b6eb727c8a36c39067d7d1ad1291 Author: John Bowman Date: Tue Aug 26 01:38:13 2008 -0600 Check all three coordinates in path3.bounds(). commit 24e1ad77890db772dbcb88f6beaef7ac24d57a7c Author: Orest Shardt Date: Mon Aug 25 20:45:07 2008 -0600 Add cyclohexane example. commit 86c756d14b4153ab9f706e0b808ba5238a8f2723 Author: John Bowman Date: Mon Aug 25 13:52:20 2008 -0600 Initialize cycle flag. commit e883b0a5b5b3b53a4dc2e63441a05bef682f4a48 Author: John Bowman Date: Mon Aug 25 10:58:46 2008 -0600 Remove duplicate file. commit ade7318c47381953d61941422dc8c3a65a8b01e3 Author: John Bowman Date: Mon Aug 25 10:04:46 2008 -0600 Add settings.thick option for rendering thick PRC lines (default is true). Don't force a mesh to be drawn when nolight is specified. Add Orest's 3D implementation of the Asymptote logo. commit 1eddbf05c1b440abe403a922df18e0302a573854 Author: John Bowman Date: Mon Aug 25 10:01:38 2008 -0600 Use truepoint to attach legend in lineargraph.asy. commit 1b0cfa7dd067ac5a64c8bbd969b60bf38adc2b4e Author: John Bowman Date: Mon Aug 25 03:01:16 2008 -0600 Set both axis types; use symbolic values. commit b1859212d229e190dbca01f94a3427bb53e80f6c Author: John Bowman Date: Mon Aug 25 01:59:44 2008 -0600 Update grid3 to handle Arrow3. Use limits in grid3xyz. commit 738cc4b59239d0f8ab8bc773c777bc127a59f8b0 Author: John Bowman Date: Mon Aug 25 01:11:07 2008 -0600 Use all control points to compute normal vector of surfaces. commit 055eb28cec633c0cdd2f3076a109af7b0fbceb54 Author: John Bowman Date: Sun Aug 24 20:28:36 2008 -0600 Remove unused code. commit 4456085abb8e068d31266ae50ac0cae4485f816e Author: John Bowman Date: Sun Aug 24 14:44:13 2008 -0600 Improve arrow bounding box calculation. Fix 3D arrow positioning. Retune anglefactor for RPC angle calculation. Pass the correct size information to scale and scale3 when resizing. commit 98d4cfccd4abc5a1516e4c0d5f11e0c3f1760831 Author: John Bowman Date: Sat Aug 23 13:58:27 2008 -0600 Implement unitdisk and linecap(0) and linecap(2). commit f8cbc466a67238c45d1917efb200156b896adf35 Author: John Bowman Date: Sat Aug 23 12:21:52 2008 -0600 Support linecap(1) in 3D. Fix PRC mode. commit ef8a94774f4620dde9cfa7605768cbc4491d2c27 Author: John Bowman Date: Sat Aug 23 03:46:16 2008 -0600 Add support for 3D arrows. Set uptodate=false in picture.add. Implement better workaround for missing movie15.sty. commit 01229d149a8e23e88a4ef0ca47f49943f6c06afd Author: John Bowman Date: Sat Aug 23 00:51:45 2008 -0600 Update example. commit f675c8d5343a34eae81c87f68c0c6a35d5fbd145 Author: John Bowman Date: Sat Aug 23 00:46:57 2008 -0600 Implement better workaround to allow nonPRC 3D output in the absence of the movie15.sty package. Rename unitcube to unitbox. Define surfaces unitplane and unitcube. commit a11ac7d619bf15c9ade7661519814172df3119c1 Author: John Bowman Date: Fri Aug 22 23:59:35 2008 -0600 Define pen thin=linewidth(0). Use thin pen by default for mesh lines and skeletons. Generalize revolution constructor based on a graph. Use operator .. in hyperboloid example. commit 207f2d6bf5be358f2949bbdc5fca55db4f535266 Author: Orest Shardt Date: Fri Aug 22 17:47:12 2008 -0600 Fix logo3. commit f7573e67c6c3d1b65551f3b291216481afb8bcfa Author: Orest Shardt Date: Fri Aug 22 17:44:20 2008 -0600 Fix logo3. commit c870f00968b792a0c61a688d2972d8a48d74d9b7 Author: Orest Shardt Date: Fri Aug 22 15:44:28 2008 -0600 Add 3D logo. commit 92df46fa4db0237c2511f627ee2cfa69ce1eba53 Author: Orest Shardt Date: Fri Aug 22 14:21:48 2008 -0600 Improve debugging output. commit 6ebe46c87e42ef22c1e88aa2d04ccbdf9910e18c Author: John Bowman Date: Fri Aug 22 12:35:50 2008 -0600 Use curved slices in solids; reduce the default value of nslice to 12. Standardize solids interface. Fix determinant of align and transform3. Use larger sphere fuzz in tube. commit 83f125398f6f857054569db99512ba0d3f9d7fd2 Author: Philippe Ivaldi Date: Fri Aug 22 08:28:54 2008 -0600 grid3.asy: set default value axis in routine (x/y/z)axis3. commit 7fca21059f9d2d9a2d89778f6eacea74b1de88f3 Author: Philippe Ivaldi Date: Fri Aug 22 08:18:27 2008 -0600 grid3.asy: Renames (Left/Right)Ticks (Left/Right)Ticks3 for consistency. Remove an unnecessary parameter. commit c8146e82c886e7e5691b6842466f436a5b1a8e83 Author: John Bowman Date: Fri Aug 22 01:40:52 2008 -0600 Fix yaxis3 placement. Fix 3D Arc and Circle. commit 7db52703cde3155efa2ce2eed0f8a524f2b4ad90 Author: John Bowman Date: Thu Aug 21 21:09:26 2008 -0600 Add PRCVersion. Work around compiler bug in gcc-3.3.5. commit d62fb8642129bb4d34844728cd1dbc8f21bc9b77 Author: Orest Shardt Date: Thu Aug 21 18:54:51 2008 -0600 Add test for straightness. commit 21ba9cf29583e4baa406cb01e94a2f7ad5603d7b Author: John Bowman Date: Thu Aug 21 09:54:29 2008 -0600 Use unit normals in circle and Circle. commit 661565780cc9b816aa5785e1f7da8408e0c5cc25 Author: John Bowman Date: Thu Aug 21 09:44:34 2008 -0600 Suppress page numbers for TeX engine; also suppress hoffset and voffset in inlinetex mode. commit c86a28332ca26f76ac47abc85a1f2a041952803f Author: John Bowman Date: Thu Aug 21 09:43:15 2008 -0600 Set straight only if no internal patch points are given. commit 902ec3ab6901d6b365edf4b4d2659aa6a1523194 Author: John Bowman Date: Thu Aug 21 03:48:06 2008 -0600 Increase Fuzz to sqrtFuzz in min(surface) and max(surface) C++ routine. Expose granularity parameter to PRC surface drawing routines. Put PRC surface pens and parameters in a material structure. Add straight flag to surface. Speed up thick line drawing by optimizing straight case. Optimize align(triple) and implement its inverse, called transform3(triple). commit bf1a4f5d240e06f134f746d324e47e6cf548c4e7 Author: Orest Shardt Date: Wed Aug 20 22:12:16 2008 -0600 Add check for -X direction. commit e3d6c0b0a8e7862826b6fc85185eb266ee71cf9f Author: John Bowman Date: Wed Aug 20 20:31:24 2008 -0600 Add hook for thick line PRC support. commit c41b0dd60bc8ff3baf506028769117f33f7b47f0 Author: John Bowman Date: Wed Aug 20 17:30:04 2008 -0600 Make linewidth(0) draw the thinnest line supported by the output device. Redefine nullpen to linewidth(0)+invisible. Remove duplicate code. commit 883cb57bca8fbc8f1b7b42543c495c5494cf2f67 Author: John Bowman Date: Wed Aug 20 15:45:25 2008 -0600 Remove extra node from Circle. Add additional surface constructors. Fix transverse skeleton when angle2-angle1 < 360. Make contour3 return a surface. commit 2d191394180b19a0065f7bb3e9dc5f5575bf2bbe Author: John Bowman Date: Wed Aug 20 10:06:35 2008 -0600 Fix Circle and Arc so that they are consistent with circle and arc. commit f558c14315daf2e7fe4181f1751ea8a0362dc4f1 Author: Orest Shardt Date: Wed Aug 20 09:50:53 2008 -0600 Add 3d support for thick lines and arrows. commit 1205eab243d14b10b0ec06e934d836e499e24066 Author: John Bowman Date: Wed Aug 20 03:52:42 2008 -0600 Remove implicit casts from 3D to 2D objects (call project explicitly instead). Overhaul graph3 and grid3 to draw directly in 3D, keeping track of the picture bounds with an interface analogous to the graph2 routines (backwards incompatible). Update contour3 and solids to use new PRC-compatible surface drawing routines. Fix and optimize 3D fitting routines. Fix label bounds. Add functions XY(), etc., to force labels to be upright. Fix invert routine by adding missing shift terms. Make uptodate apply only to currentpicture. Add warn=true argument to solve routines. Simplify flowchartdemo deferred drawing. Move binary space partition code out of three.asy and into bsp.asy. Add operators == and != for real[][] and path3. commit 3ee40d06b68b7082d3f0bd190339eacbc0d398d0 Author: John Bowman Date: Mon Aug 18 01:39:15 2008 -0600 Fix align.is3D flag. commit e0dc3ef17525bfaf071a43826d8d8d52b80c4bee Author: John Bowman Date: Mon Aug 18 01:03:08 2008 -0600 Fix Label diagnostic. commit 4afeb46e9c984b712cbefb568c5b1020bbff0c02 Author: John Bowman Date: Sat Aug 16 12:43:32 2008 -0600 Use settings::outname instead of "out". commit 69507f82fb36dc8a4590e203297b344c53266a47 Author: John Bowman Date: Fri Aug 15 15:08:27 2008 -0600 Fix 3D label sizing. commit 0b5fc01e8e8f65f6a39f42301fc0e0e28045e81d Author: John Bowman Date: Fri Aug 15 14:57:09 2008 -0600 Add operators == and != for path3. commit a76c0951b5de7b43451814fc4f5b9faad55a5dec Author: John Bowman Date: Fri Aug 15 01:13:17 2008 -0600 Use currentprojection by default in min3(picture) and max3(picture). commit ee9b80648f19ae5a9f6b5b206a17b7876857ddfa Author: John Bowman Date: Fri Aug 15 01:02:58 2008 -0600 Remove width and height parameters from embed(picture). In embed(picture), avoid unused 2D bounding box calculation in final call to pic.fit3(). Add embed options to shipout. commit ea9694079a050e7d830d741945d5ab77e6cb2359 Author: John Bowman Date: Thu Aug 14 12:12:57 2008 -0600 Add drawer3 routine that works with pictures instead of frames. Make randompath(n) return a path of length n. Fix and optimize camera transforms. commit 655af38609bfaf91e61e71874138e5037e5b905d Author: John Bowman Date: Thu Aug 14 01:42:05 2008 -0600 Remove remaining "camera too close" messages (no longer needed). commit 2deae6857ebd44ab0b9a43c9849b1d41b49e6b71 Author: John Bowman Date: Thu Aug 14 01:28:15 2008 -0600 Reinstate add(drawer d) function. commit 5a6a1a5c9115b8b8b6785290d9084af15d78996a Author: John Bowman Date: Thu Aug 14 01:12:24 2008 -0600 Add path3 copy constructor. Automatically adjust camera so that entire picture is in front of camera. Add projection argument to shipout. Add min3(pic) and max3(pic) functions. commit 8f2da013574b71990d98eb06778fcfdda372f532 Author: John Bowman Date: Wed Aug 13 08:32:00 2008 -0600 Move projection and picture argument (for double deferred drawing) to drawer3. Fix duplicate calls to tensorshade. Re-enable surface transparency. commit 6cdca45ed0dd7312015b6e60eaa0fe8b15975458 Author: Orest Shardt Date: Tue Aug 12 12:47:25 2008 -0600 Optimize 3d reflection routine. commit be63e490786a206c62cdb4af30e09bf41da300e1 Author: John Bowman Date: Tue Aug 12 09:50:14 2008 -0600 Add realmult(triple,triple). Remove "camera too close" checks. Fix randompath; add randompath3. Add draw(frame,surface) routine. Allow align parameter of Label to be a triple. Make size(picture) return max(pic)-min(pic), as with frames. commit 222a3cab12ff9114fa52a227ed3faaa0409424d7 Author: John Bowman Date: Sun Aug 10 10:48:32 2008 -0600 Add general T[] sort(T[] a, bool compare(T i, T j)) function. commit 573e37cb623310e272858a2f65128b325e71de11 Author: John Bowman Date: Sat Aug 9 08:40:53 2008 -0600 Don't call surface mesh if meshpen == invisible. commit 0f23f79e9d07cbcde959199a6aeff9c88c2d1142 Author: John Bowman Date: Sat Aug 9 00:04:52 2008 -0600 Increase fuzz in min(surface,projection) routine. commit 767e21e544b3fe7352d398e39fb7f387a1ea2416 Author: John Bowman Date: Fri Aug 8 20:01:30 2008 -0600 Fix picture min/max functions. commit 3f8c1151ef1273b72d6ea8d27fd54c151fffcd62 Author: John Bowman Date: Fri Aug 8 19:53:22 2008 -0600 Fix PRC angle computation. Rename reload to pdfreload (now disabled by default); add pdfreloadOptions. Fix empty picture check in max/min. Move default 3d embedding settings to defaultembed3options variable. commit b0ec65b473aa24a1ffabbb82902bcefb99ea7292 Author: John Bowman Date: Fri Aug 8 02:24:25 2008 -0600 Fix empty tests in picture min and max routines. Fix projection in draw(surface). commit 93bcfd14f694222d414d8a4d26b8321284067479 Author: John Bowman Date: Fri Aug 8 01:57:04 2008 -0600 Compute PRC lens angle based on projected picture size. Support lens angle in viewpoint. Simplify embedprc options. commit 3759de7b679583a31118894d55075a46981581ec Author: John Bowman Date: Fri Aug 8 01:40:15 2008 -0600 Fix handling of null deliminted entries in split. commit 84a6f609c8e0e67fb037cace6fe194132e0cd9d6 Author: John Bowman Date: Thu Aug 7 23:28:33 2008 -0600 Fix scale and scale3. commit f42c1b7739e338f8ccb21d5df852ca180b23e7e5 Author: Orest Shardt Date: Thu Aug 7 11:54:41 2008 -0600 Optimize routine for rotation of axes. commit 2c9ed33e906d3cf5e0aa57445790e466e387b5b9 Author: John Bowman Date: Wed Aug 6 14:55:45 2008 -0600 Support meshpen in PRC mode. Avoid duplicate drawing due to inexact bounds. commit 01c5a0080e83e611a0cb5debf81c0907d6d42ab4 Author: John Bowman Date: Wed Aug 6 12:46:50 2008 -0600 Fix supplementary scaling routines. commit 4e64395903561ef7486ec179682b75f29ffb0914 Author: John Bowman Date: Wed Aug 6 12:45:43 2008 -0600 Fix projection transformations. commit 0b72327d31993adc1efe88955facfc1463f5805f Author: Orest Shardt Date: Wed Aug 6 09:53:23 2008 -0600 Fix uint32_t cast. commit daedf0162e1c4ea3829a1b8e616fd718e67b00cc Author: John Bowman Date: Wed Aug 6 08:51:30 2008 -0600 Cache return values of texpath. commit 0f4ea94250d087680f10a7a4d0b86e2aaf8a5341 Author: John Bowman Date: Wed Aug 6 08:16:37 2008 -0600 Apply submitted drawtree patches (Bug IDs 2031338,2031368, and 2031511). commit 714ae4d089cb954f0bc6bd0980a9c48a8f0a8ea0 Author: John Bowman Date: Wed Aug 6 00:57:49 2008 -0600 Remove obsolete call to aspect. commit 5b47296cd82f9f65497b67217ec2e57ec201286a Author: John Bowman Date: Wed Aug 6 00:47:52 2008 -0600 Temporarily revert change to allow svn builds. commit ecb402bacf5601c42ebd518501164228b6f7027b Author: John Bowman Date: Wed Aug 6 00:36:59 2008 -0600 Remove obsolete aspect ratio support from projection routines (use size3 instead). Move diagonal(... real[] a) to runtime code. Add support for alternative PRC materials in surface routines. By default draw 3D labels without lighting effects. Add extra options string to PRC embed functions. Add min3(pen) and max3(pen) functions (only a spherical pen nib is currenty allowed). Remove unused cap functions from plain_picture. Fully implement drawerBound3 routines. Fix transform3 initialization in Label. commit 9de76b20a8db18d9ea9f60ee74891c64bf3d0feb Author: Orest Shardt Date: Tue Aug 5 19:09:40 2008 -0600 Add support for materials in prc. commit 488767e5f7b07a89e6be170a0b5b8ad64c689c0f Author: John Bowman Date: Tue Aug 5 11:12:08 2008 -0600 Make reload load the document if not already active. Improve documentation. commit 901d4f700ef6f5e185cf331b09ad88ee5379f01e Author: John Bowman Date: Tue Aug 5 10:48:27 2008 -0600 Avoid arbitrary default values; set line width to zero since that appears to be the only value implemented by Adobe Reader 8.1.2 and 9.0. commit 309998ffdd956d628adc06785202738d63fd60b3 Author: John Bowman Date: Sun Aug 3 19:50:06 2008 -0600 Support ASYbase in texpath. commit 0ffc48041c612ce5d2e56557ecb69b66f38308c3 Author: John Bowman Date: Sun Aug 3 01:26:56 2008 -0600 Remove quotes from viewerOptions. Optimize piecewisestraight. commit e007b5a8754e64932088592e9f64d576c792d329 Author: John Bowman Date: Sat Aug 2 22:49:09 2008 -0600 Fix straight flag in drawprc. commit e07d8cc9d55e09a26e121fbb918eccd2d3348274 Author: John Bowman Date: Sat Aug 2 22:37:56 2008 -0600 Set straight flag on transformation. commit 1187a1667ce9cf1608e622b8883160d08cce0389 Author: John Bowman Date: Sat Aug 2 20:34:36 2008 -0600 Automatically embed option defaults into descriptions. commit 6e8b02403e60c611139434cfa5b149bb15757f73 Author: John Bowman Date: Sat Aug 2 18:01:40 2008 -0600 Only attempt reload if acroread process is already running; add reloaddelay parameter. commit 8d276fe6595dc91f0d0a0e62c2df506f9df7d25b Author: John Bowman Date: Sat Aug 2 16:18:12 2008 -0600 Add unitcylinder. commit 414782b6cd41885dd4cc39c2dacc4ff581b92f21 Author: John Bowman Date: Sat Aug 2 14:19:23 2008 -0600 Add code to automatically reload pdf files in viewer if settings.reload=true (requires manual installation of reload.js in ~/.adobe/Acrobat/x.x/JavaScripts/). Add psviewerOptions and pdfviewerOptions. commit 160a605a243191fca83ee05c870f7b8a643f0fd0 Author: John Bowman Date: Sat Aug 2 14:11:23 2008 -0600 Simplify solid line pattern. commit 4ed6ac0aac1d82ecb84678a769694ec38367c0cc Author: John Bowman Date: Fri Aug 1 16:59:59 2008 -0600 Fix -psimage -tex pdflatex. commit 21a5a0672220c4743065507eb33e95cb165b7d77 Author: John Bowman Date: Fri Aug 1 15:10:30 2008 -0600 Remove interfering comments; change psimage timeout to 60 seconds. commit c5141442715a3aadfd754fc5448d531d7867ed35 Author: John Bowman Date: Fri Aug 1 10:36:55 2008 -0600 Rename print.js to silentPrint.js; move all other Javascript commands to asy code. Check whether silentPrint is defined. Fix texengine(true). commit 046a88b4bd37306e0d0ecebbe429dd213a3ca51c Author: John Bowman Date: Fri Aug 1 01:58:03 2008 -0600 Add print.js; this should be put in ~/.adobe/Acrobat/8.0/JavaScripts/. Make -psimage give up on waiting for Adobe Reader to finish after 30 seconds. commit b78d73947601327af0a11e92bdd382f8396a6b18 Author: John Bowman Date: Fri Aug 1 01:43:50 2008 -0600 Add -psimage option to dump rasterized postscript image of PRC scene. Force texpath to use latex/tex engine even with -tex pdflatex and -tex pdftex; add texdvicommand to specify an alternative latex/tex to dvi program. Use correct output prefix for intermediate PRC files. commit 7fc7a09c48a5144cc52481165eaf5ebe73f6de30 Author: John Bowman Date: Thu Jul 31 22:23:29 2008 -0600 Remove bulge from unitcube. Implement nolight with boolean variable. Fix sizing of transformed 3D pictures. commit 8fd6b0873e9fbcc1576b9a6bf1241c5cdcd9f5af Author: John Bowman Date: Wed Jul 30 13:14:02 2008 -0600 Use portable constructor for BooleanVar. commit 25ef61001ed9899ec67d813f2d9fb3ceb478e3db Author: John Bowman Date: Wed Jul 30 12:59:23 2008 -0600 Move xasy.conf into ~/.asy directory. commit 22e5cc8c9eaffdd4d7d75e87c9d75fc101597353 Author: John Bowman Date: Wed Jul 30 11:02:46 2008 -0600 Allow separate 2D and 3D picture sizes. Use double deferred drawing for 3D projection to allow control of the 3D aspect ratio and also the width and height of the final projected picture. Remove obsolete cycle3 variable. commit 3bb43749d5c5ca8a475b98f51cff2fbe93d89410 Author: John Bowman Date: Tue Jul 29 16:56:42 2008 -0600 Typeset 3D labels onto projection plane by default. Fix roll computation. Add transform3(triple u, triple v) that maps (X,Y) to (u,v). Add solidcone. commit 323f2d45bd37156a4b4abdf240f001026925947f Author: Orest Shardt Date: Tue Jul 29 14:47:55 2008 -0600 Use cleaner icons. commit 41dc906cbf1b9cdaabcae254a1c44c03539849e1 Author: Orest Shardt Date: Tue Jul 29 12:40:49 2008 -0600 Fix typo. commit 5973e480d9fa04eaff3c8d0b6427672a04f60ea3 Author: Orest Shardt Date: Tue Jul 29 12:38:40 2008 -0600 Describe scene display parameters. commit e6cf737d99947537e211a0ded7ff33ee85feec10 Author: Orest Shardt Date: Tue Jul 29 10:30:42 2008 -0600 Do not freeze while waiting for external editor to close. commit 58725ca2426ded56c568739c3c19df9e6c44655f Author: John Bowman Date: Mon Jul 28 23:53:30 2008 -0600 Fix hang in surface bbox routines. commit e33a8771b9b2d14c1297c68d58f749bea56e8dca Author: John Bowman Date: Mon Jul 28 23:04:58 2008 -0600 Add unit cone. commit 1d18572e5681a912ccad4d8a26b05c0595b4f4a6 Author: John Bowman Date: Mon Jul 28 07:47:31 2008 -0600 Add support for path3 Labels. commit 8ea1129b09d97c7dc2256bc73a91cb1f0822f3ff Author: John Bowman Date: Sun Jul 27 23:09:39 2008 -0600 Fix generation of asy-keywords.el. commit 33386b3f64bb669c90a01e6e617c070c60b97e4e Author: John Bowman Date: Sun Jul 27 22:57:25 2008 -0600 Defer projection of 3D (non-prc) pictures until drawing time. Express currentprojection in terms of user (picture) coordinates. Add missing tensorshade functions. Add casts from object to label and object to frame. commit 02caeaea31659c23bd37b7ad7d43b3d949eba863 Author: John Bowman Date: Sun Jul 27 21:30:54 2008 -0600 Add locale() function to query/set current locale. Add locale string to format(string s, real x). Add string(int) function. Fix locale issues. commit d5d14abe253106269ddfc14c47364ca593572533 Author: John Bowman Date: Sun Jul 27 16:02:26 2008 -0600 Make string(real, int digits=realDigits) use fixed notation. commit ee69ce258d507924f18dd0e7563b7ebfd3f6122c Author: John Bowman Date: Sun Jul 27 00:12:38 2008 -0600 Add three-dimensional Label support. Support adding a three-dimensional frame to a picture (positioned at the origin). Remove three-dimensional add functions in favour of embed. commit d283edb251ce48f1ae6e725315125b72f0976794 Author: John Bowman Date: Sat Jul 26 18:22:39 2008 -0600 Rename surface.asy to three_surface.asy and light.asy to three_light.asy. commit 6876aae1ec52058ff36530fc225880132314cdba Author: John Bowman Date: Sat Jul 26 18:15:03 2008 -0600 Move surface max and min functions to C++ code. Fix three-dimensional label functions. Implement unitsphere as an 8-patch Bezier approximation. Add three-dimensional dot functions. Include surface.asy and light.asy in three.asy. Remove casts from triple to pair and triple[][] to patch. Fix surface normals. commit f76993c733c494f63052fee8650f2a0325a8388d Author: Orest Shardt Date: Sat Jul 26 08:14:27 2008 -0600 Preserve original path's direction for each new region created. commit 2df9113fb0760d067135027d79d0da53aefa30db Author: John Bowman Date: Fri Jul 25 16:53:29 2008 -0600 Fix removeDuplicates. Simplify uncycle. commit 7fc100ae6a07e36590bdc40fc58b896a3899c5cb Author: John Bowman Date: Fri Jul 25 15:38:43 2008 -0600 Use DBL_MANT_DIG for recursion depth limit. commit e7394489eec585a15358f2a1942233ec42a3d6af Author: John Bowman Date: Wed Jul 23 02:16:40 2008 -0600 Generalize picture to handle 3D objects. Rename surface to patch; implement a surface structure to hold an array of patches. Implement simpler, faster surface bounding box routines. Add -prc setting (temporarily set to false) to enable prc output. commit ad0b2823a741e2bdc1ff2ad0cecb92ba16c8f979 Author: John Bowman Date: Wed Jul 23 02:09:52 2008 -0600 Add randompath function. commit 80f81d13ed3bb8984183e431020ada1c7c2229eb Author: John Bowman Date: Wed Jul 23 02:02:59 2008 -0600 Fix height and width units. commit 20076a17a54128ea455d608a52a83cda9acb823c Author: John Bowman Date: Mon Jul 7 00:43:29 2008 -0600 Use bounding box rather than less efficient convex hull test in inside. commit cb11a56fdc8982ab5e88dfa24bdd13e3e74b4fb5 Author: John Bowman Date: Sun Jul 6 22:52:29 2008 -0600 Remove obsolete file. commit 8df94eb01841188da1e38f77073168c8dbe42683 Author: John Bowman Date: Sun Jul 6 17:23:42 2008 -0600 Support compilation of gc-7.1 with gcc-4.3.1 on FreeBSD 4.10-RELEASE-p2. commit 78ad79d4c0038a286eab64e138fd38ba65207ee7 Author: Philippe Ivaldi Date: Sun Jul 6 14:40:28 2008 -0600 Fix the documentation of quarticroots. commit 35a635d26382f0ccb9b552fc7bb824cb343c5233 Author: John Bowman Date: Sat Jul 5 22:21:50 2008 -0600 Minor optimization. commit 367e8ebd63efd180493a68a44eb56ec53c8c071c Author: John Bowman Date: Sat Jul 5 22:11:36 2008 -0600 Remove HAVE_TRIANGLE configuration. commit d5547e4ec09ec39499bcdc8300c226ed9307d524 Author: John Bowman Date: Sat Jul 5 22:05:42 2008 -0600 Port prc code to cygwin. commit 404a75f09df81099bdb9e973dd306111a636f0c7 Author: John Bowman Date: Sat Jul 5 14:11:53 2008 -0600 Port version changes to msdos. commit 31e3f4fafe9fae62ed71b74f3994eb8be7643bac Author: John Bowman Date: Sat Jul 5 13:47:51 2008 -0600 More version fixes. commit 14369b9cfc2fbc21951d3bcc41e14411cccc6e18 Author: John Bowman Date: Sat Jul 5 13:32:18 2008 -0600 Fix version.texi; cleanup temporary files. commit e04d51ef715883a69e1eae296e899f2da8c0a1d5 Author: John Bowman Date: Sat Jul 5 12:54:47 2008 -0600 Add prc dependency. commit bfdc8376f8e2b22b6cb58fa43b3cc71af5f1b084 Author: John Bowman Date: Sat Jul 5 12:52:54 2008 -0600 Create empty svnrevision.cc by default to force update. commit 2f80208862aa04acc1b869ba6be16466d3e4c0cc Author: John Bowman Date: Sat Jul 5 12:42:22 2008 -0600 Remove support for external triangle.shar.gz package now that Delaunay.cc is fixed. commit 1578efdf744d9881bc40a676bac6b848885e156d Author: John Bowman Date: Sat Jul 5 12:26:50 2008 -0600 Include svn revision in version strings. commit cd52c344b783552066e47d77855f1ba0e225cd8f Author: John Bowman Date: Sat Jul 5 11:08:28 2008 -0600 Fix supertriangle computation. commit 3a600d47091011a1a396cbbe73865685a03674ab Author: John Bowman Date: Sat Jul 5 01:32:21 2008 -0600 Add bezier triangulation routines (developed by Orest Shardt). Add support for filled fonts. commit 8422b776c2a1bb3b6e99ffd09eed39a57fad68b3 Author: John Bowman Date: Sat Jul 5 00:37:42 2008 -0600 Fix surface constructor to handle all four intersection cases. commit c2839ecad3c5bb6dea5450bc6765a99fc19eda04 Author: John Bowman Date: Fri Jul 4 15:35:03 2008 -0600 Generalize planar surface constructor to handle a single interior intersection. commit c5e611c89317048f58c01c6fca08420f5cd9c189 Author: John Bowman Date: Fri Jul 4 11:29:01 2008 -0600 Fix check in windingnumber for points on path. commit a4a9a9696f4460a31a0fc817873e72e6098cbc2d Author: Orest Shardt Date: Fri Jul 4 09:56:19 2008 -0600 Fix parameterization interval of PRCline. commit 3866af07751efe3def9fd837c80439b45e0778a0 Author: John Bowman Date: Fri Jul 4 01:09:09 2008 -0600 Add constructor for a (possibly) nonconvex cyclic path that returns an array of surfaces. commit ccb28f918c69c71aa3ea116690974a917add785f Author: John Bowman Date: Thu Jul 3 23:55:01 2008 -0600 Suppress output by size when picture is empty. commit 2a5ea45ee0b656e87e4d71b8ca5185a4fb2fbaf0 Author: John Bowman Date: Thu Jul 3 23:25:31 2008 -0600 Check for coincident subpaths in path.cc to avoid infinite loops. Define restricted int undefined to the the largest odd integer (returned by windingnumber for points on the path). Update documentation. commit 982ba5c059237d9cea33e4b10a699c85384498ce Author: John Bowman Date: Thu Jul 3 15:46:32 2008 -0600 Make windingnumber(g,z) return the largest odd integer when z lies on path g. Make inside return true for points on the boundary. commit 5b165379ca3eaba5cbcbc1be79de33d162d88440 Author: John Bowman Date: Wed Jul 2 15:03:55 2008 -0600 Revert to original version of cubicroots to handle the case where one of the first two roots is near zero. commit 9db5f20ac51580e1246da314b548940486db8c32 Author: John Bowman Date: Wed Jul 2 12:57:21 2008 -0600 Update example. commit ef2aed565e623ce114dc3b95b0e27f5012eabbfa Author: John Bowman Date: Tue Jul 1 22:29:10 2008 -0600 Minor simplification. commit 7f6e70feef498ff8850c3170ca092ce67948ff76 Author: John Bowman Date: Tue Jul 1 20:27:06 2008 -0600 Fix AsyPDF flag. commit a7ae860cfccad51f5ea1b68f41797c37b43ebc4c Author: John Bowman Date: Tue Jul 1 20:11:33 2008 -0600 Support clipping with tex and pdftex TeX engines again (broken since 1.34-26). commit fc997e3d2e29aff462512e06fe045ed3372e1c66 Author: John Bowman Date: Tue Jul 1 20:08:52 2008 -0600 Support xelatex. commit 019c0793143aa77f80ebaa7238b521bf7a614909 Author: John Bowman Date: Tue Jul 1 00:19:54 2008 -0600 Leave cubic root refinement to the user, to avoid potential root interchange problems. commit 9183d9faeb41cb12332b0e63c8d47a83060f60e8 Author: John Bowman Date: Mon Jun 30 22:27:13 2008 -0600 Implement robust inside algorithm based on conditional subdivision and robust orient2d predicate. commit 0ee41c80a2f20c06ac36ceec99df87f8c1b59439 Author: John Bowman Date: Mon Jun 30 17:51:39 2008 -0600 Add option to force PDF output. commit 24dbc91d612d00bea406763efba85f802ea3ee33 Author: John Bowman Date: Mon Jun 30 08:51:03 2008 -0600 Add side and incircle functions. commit ad7a5ca602f3ff77da61d8ecc6dd9b7af30b16b7 Author: John Bowman Date: Sun Jun 29 17:57:25 2008 -0600 Minor optimizations. commit d57cce192cc1c5a390d58c68bf7e3a07901844b2 Author: John Bowman Date: Sun Jun 29 16:33:57 2008 -0600 Correct typo. commit 8aeb44ff5525fdf55e4143b9b77205112b036e59 Author: John Bowman Date: Sun Jun 29 16:30:53 2008 -0600 Fix segmentation fault in default Delaunay triangulation routine. Use Shewcuk's exact predicates in Delaunay triangulation. commit b8d7d2e8f2ea5e5dfefade3caab02bb53d78b7fe Author: John Bowman Date: Sat Jun 28 23:16:00 2008 -0600 Fix incorrect array size documentation of Delaunay.cc that can lead to a segmentation fault. commit c9952eb8c85cc44da35821610563601c6289f6c0 Author: John Bowman Date: Thu Jun 26 00:01:50 2008 -0600 Minor optimization. commit 0ee04f17646c1de38a0ff508303f2c4d1b2a87e5 Author: John Bowman Date: Wed Jun 25 23:19:25 2008 -0600 Try to refine calculated cubic roots with Newton-Raphson iteration. commit 2ad1cec486027bc80ae21d1ba0b5b3f13b8f70dc Author: John Bowman Date: Wed Jun 25 22:40:12 2008 -0600 Simplify cubicroots. commit 4a7b065aa93db97935627739c00326760e7d4a58 Author: John Bowman Date: Wed Jun 25 17:00:22 2008 -0600 Replace ytimes by real[] mintimes(path) and real[] maxtimes(path). commit 9642646492c918276ac2f318c44e07e4c359288a Author: John Bowman Date: Wed Jun 25 16:24:22 2008 -0600 Generalize last fix to an arbitrary axis. commit e2610105e22d30b816c9bb381e411ca323405f93 Author: John Bowman Date: Wed Jun 25 15:04:03 2008 -0600 Handle degenerate cases. commit f06bc755f427058119162f162f1043e6363b67d1 Author: John Bowman Date: Wed Jun 25 00:38:12 2008 -0600 Increase fuzz. commit 473e70480321251eac19268682b7125cf06556b2 Author: John Bowman Date: Wed Jun 25 00:27:11 2008 -0600 Fix numerical resolution problem in windingnumber. commit dfe3717ab63b45d9417603fa1ed12c41ba57e745 Author: John Bowman Date: Tue Jun 24 23:45:50 2008 -0600 Fix relative vs. absolute fuzz. commit cc289caf34ad10914fed9c4d8e6fa4fed9e1fc41 Author: John Bowman Date: Tue Jun 24 23:03:37 2008 -0600 Adjust fuzz to fix remaining resolutions problems in windingnumber. commit bb8f1d22492b52bc0d67781556563402bbcc1053 Author: John Bowman Date: Tue Jun 24 22:36:22 2008 -0600 Reinstate deleted function. commit c13dd963a9146bfb4c185c3aea5ebe3f5314daec Author: John Bowman Date: Tue Jun 24 22:31:12 2008 -0600 Remove dir(path,real,int) since it is only needed internally. commit fdcf601224198de809d246db57de6c07d144ec76 Author: John Bowman Date: Tue Jun 24 22:20:09 2008 -0600 Reinstate old inside function. commit a207300ee6c5fe5ba269c3b32cca7b97df7d25e3 Author: John Bowman Date: Tue Jun 24 17:53:38 2008 -0600 Use lineintersections routine to implement inside. commit bf30f081e382e7c8be0a21aa7740efb40255ef41 Author: John Bowman Date: Tue Jun 24 10:35:12 2008 -0600 Fix windingnumber by using robust predir and postdir functions. Expose dir(path,real,int). commit d063ba0e8ec6ee997f97f6d7fd3d16e726437cd4 Author: John Bowman Date: Mon Jun 23 23:42:18 2008 -0600 Add real[] ytimes(path g) function to return times at which path g reaches its minimum and maximum y extents. commit 68dba699cbba078b15ac7eb7a019da3adb65715f Author: John Bowman Date: Mon Jun 23 22:40:14 2008 -0600 Consolidate bounding box code. commit ecf2d58e5f9978e892ce839ef76ba9b16cd4e696 Author: Orest Shardt Date: Mon Jun 23 18:04:57 2008 -0600 Correct handling of uncompressed files. Add enums to PRC.h commit 42788226294536aeacb5ad384b3dbf0c6eed2eab Author: John Bowman Date: Mon Jun 23 17:48:23 2008 -0600 Increase minimal fuzz in intersections. commit cca5841adf415573f09131f10bfca3cd59e5dd54 Author: John Bowman Date: Mon Jun 23 15:03:49 2008 -0600 Increase fuzz to improve detection of roots at numerical infinity. commit d372e260f74e03df30e5d06f5f5f33330598471c Author: John Bowman Date: Mon Jun 23 11:18:40 2008 -0600 User -dSAFER also for deconstruction into png format. commit 407a627a5d18b773739a9535b486b8a177dd7c49 Author: John Bowman Date: Mon Jun 23 11:00:40 2008 -0600 By default run gs with -dSAFER. commit 450e6baca04165268c9a3d6201fb9b7b67e162ed Author: John Bowman Date: Mon Jun 23 00:41:43 2008 -0600 Fix typo. commit c6b4740c7cae67a452bc2587106948668d648525 Author: John Bowman Date: Mon Jun 23 00:31:13 2008 -0600 Update link. commit 176d2bf970fcdb8b84c74c730b68176a8d433ff6 Author: John Bowman Date: Sun Jun 22 23:26:30 2008 -0600 Merge C++ intersect and intersection routines. Optimize intersection routines for paths containing straight segments. Add function real[] intersections(path p, pair a, pair b, real fuzz=0) to return all intersection times of path p with the (infinite) line through points a and b. commit 3cebe7e04213749fd8aff24514b71a98e2c38ce1 Author: John Bowman Date: Sat Jun 21 19:24:45 2008 -0600 Fix -listvariables. commit 54f25c1c47cf57223211c9a6cde1067ef3275275 Author: John Bowman Date: Sat Jun 21 14:46:23 2008 -0600 Use new intersection routines; handle degenerate cases. commit ba91a4a0fbca4fe8b013ff96b2796737a1133bdb Author: John Bowman Date: Sat Jun 21 14:36:53 2008 -0600 Use a process-specific currentpen. commit fb9a1be407eb4530c7a0522cf8e376bec91b858d Author: John Bowman Date: Sat Jun 21 12:24:39 2008 -0600 Update example. commit 7e3bc9afe99559d02e62060cc32b2eff8e520c90 Author: John Bowman Date: Fri Jun 20 22:49:58 2008 -0600 Fix roll parameter. commit a3a9791aaa03745c4d330db56aa68b8f618da00a Author: John Bowman Date: Fri Jun 20 19:34:56 2008 -0600 Rename intersectionsline to lineintersections. commit 7405937a0cbcb22ab0126eafa9fdd01851e96334 Author: John Bowman Date: Fri Jun 20 16:56:05 2008 -0600 Fix and standardize new intersection routines. commit 39b5991682267b647a5be9167f0da08b64f1269b Author: John Bowman Date: Fri Jun 20 16:12:09 2008 -0600 Improve intersection routines. commit 8e67614b18abf8d494d9c0059a03462d264e3744 Author: John Bowman Date: Fri Jun 20 12:04:45 2008 -0600 Fix front/back detection when rotating about a point. commit 0ce01dce66c71ef19576aa32a300d2564e764b6e Author: John Bowman Date: Fri Jun 20 10:41:31 2008 -0600 Move unitrand to C++ code to avoid dependency on stats.asy. commit 756229ed2e7a006a86858fa05bf4d14b9d507a22 Author: John Bowman Date: Fri Jun 20 10:23:21 2008 -0600 Implement improved version of intersections(point, pair p, pair q) that returns all intersection times with the (infinite) line through p and q. commit d0e1e48d8e3e4af0851d12df372b1a93cdede51c Author: John Bowman Date: Fri Jun 20 01:44:26 2008 -0600 Add routine to compute the intersection times of a path and a line segment. commit 2232265c4efb975d48af1abf1d4e49fb4326c863 Author: John Bowman Date: Fri Jun 20 00:38:55 2008 -0600 Distinguish between updatefunction (used for interactive mode) and exitfunction (used to clean up intermediate files). Don't force settings.outformat="pdf" in three.asy. commit 9abfe35d19f00a082d74c4203f4df401ecdbca32 Author: John Bowman Date: Fri Jun 20 00:07:38 2008 -0600 Simplify nodes(int). commit e08fa80e0385404c4aa369bb64721f86974e217c Author: John Bowman Date: Thu Jun 19 23:42:32 2008 -0600 Change path3 lift(path) to a constructor. Add constructors to surface.asy. Add example of 3D extruded label contributed by Philippe Ivaldi. commit ee1b7f936d02a0b940d7b8a3c9264f416a0efb3e Author: John Bowman Date: Thu Jun 19 22:38:42 2008 -0600 Remove granularity for improved rendering. commit e40f114bb061d80671e602500523e4f6063a08e3 Author: John Bowman Date: Thu Jun 19 15:43:45 2008 -0600 Replace axis call by explicit draw commands. commit 9bf478014f7a15d042c7c6c7e1132bd52047cce8 Author: Orest Shardt Date: Thu Jun 19 15:04:04 2008 -0600 Fix PRCbitStream::getSize(). commit 92647e99c1ded29b5b6e18d559bd344776ad4096 Author: Orest Shardt Date: Thu Jun 19 14:33:11 2008 -0600 Fix decompress(). commit a32f6380b98eb6fedc9e3025b5b6e9a4a75709c2 Author: John Bowman Date: Thu Jun 19 00:24:51 2008 -0600 Fix prc file count issue. Add preliminary support for 3d fonts. commit dee96c003870d0042deb3a35260fed64575971fc Author: John Bowman Date: Wed Jun 18 22:31:55 2008 -0600 Fix projection units. commit 33decaa2420313cb96d2138c11eab92cd6b3f0e6 Author: John Bowman Date: Wed Jun 18 22:12:40 2008 -0600 Add texpath support for alignment and transforms. commit c60cc1ee9480c8c4ddd38fcfb05a705796a09450 Author: John Bowman Date: Wed Jun 18 22:10:43 2008 -0600 Simplify reset. commit 8988b282978699b49e88a25d75b5eb6b81c096f2 Author: Orest Shardt Date: Wed Jun 18 21:00:40 2008 -0600 Fix teapot example commit b9f123de9a79311321d49a08e5a97101e97104ea Author: John Bowman Date: Wed Jun 18 15:17:02 2008 -0600 Avoid opening up an X11 window in texpath; use epswrite device instead. commit 3e4f4446091d06df048b77fc6928a8f4bb029efb Author: John Bowman Date: Wed Jun 18 14:56:22 2008 -0600 Add erase(frame) function. commit ce7f60c6873d3284b1b506d69f06ee604328db47 Author: John Bowman Date: Wed Jun 18 13:02:13 2008 -0600 Make texpath work also with sqrt, fractions, and arrows. Add pen argument to texpath. commit bdae929ff7456f6f140dde137b230a5fcd1520f8 Author: Orest Shardt Date: Wed Jun 18 12:51:32 2008 -0600 Use cm as units of camera properties. commit 32f251b38f548db605b824523050b902c880f367 Author: Orest Shardt Date: Wed Jun 18 11:05:14 2008 -0600 In PRC, always write at least 1 bit of user data. commit cae80ffcdeaec5cbe768a9621e2832c8573d795a Author: John Bowman Date: Wed Jun 18 10:20:19 2008 -0600 Fix formatting. commit c29cb9fd2b4053f46c77cfffe2385a798cd9fc91 Author: John Bowman Date: Wed Jun 18 10:18:11 2008 -0600 Add example of custom mark routine. commit 019788a364d8b80a1c84e284d7f9c37095319d82 Author: John Bowman Date: Wed Jun 18 09:45:35 2008 -0600 Move default currentpen argument to C++ code. commit 37fe2e5767e953bf39d434c7c09d271ee28e5c05 Author: John Bowman Date: Tue Jun 17 22:45:59 2008 -0600 Add boolean stroke parameter to shading (and clipping) routines to shading of (and clipping to) stroked paths. commit a73b07b29768d8e8922cb9d54d52d75efc311c55 Author: John Bowman Date: Tue Jun 17 22:08:40 2008 -0600 Add routine projection perspective(string s) routine to extract current camera parameters from cameralink (Viewpoint). commit a0e14768dac1463db30549ef4faaf39ebbe33985 Author: Orest Shardt Date: Tue Jun 17 13:02:33 2008 -0600 Resize and give the teapot a bottom. commit d0a4e60f6c1e15371d8880b367d377ae178a4fd7 Author: Orest Shardt Date: Tue Jun 17 12:09:30 2008 -0600 Use external editor to edit code. commit f2bf37a0f66d216009c542b2b308b289342ce69e Author: Orest Shardt Date: Mon Jun 16 17:21:07 2008 -0600 Remove unnecessary casts. commit 74e73921e42bfc6a2e71d49e5195be8855cdedf8 Author: Orest Shardt Date: Mon Jun 16 17:19:44 2008 -0600 Remove unnecessary casts. commit 3aebb8fdcb5fbd809b96168d45d6df20cb4fa077 Author: John Bowman Date: Mon Jun 16 13:29:25 2008 -0600 Fix and simplify texpath. commit 7e81e79113a8a0519b96b43ade388f9f8fc7015e Author: John Bowman Date: Mon Jun 16 11:11:55 2008 -0600 Use C locale for formatting embed arguments. commit 1fe8dbbf9792d601a4c10ef53032dc99a6f1ea59 Author: John Bowman Date: Mon Jun 16 11:08:31 2008 -0600 Add path[][] texpath(string s) routine to convert string into the paths that TeX would fill. commit c111c6a7272ce192e277b82a588912d8ab576ef3 Author: John Bowman Date: Mon Jun 16 11:06:41 2008 -0600 Add camera view link. commit 1972a971927ebe07efcebc12fe7b599c78bf3dab Author: John Bowman Date: Mon Jun 16 01:12:34 2008 -0600 Implement better fix for basealign bounding box bug. commit 0a1ef51442178feb8601dd5883c5de6632b4e53f Author: John Bowman Date: Sun Jun 15 17:08:11 2008 -0600 Fix bounding box with basealign pen. commit 4614dd3a78731786032ce032edfa6a70ddc56834 Author: John Bowman Date: Sun Jun 15 10:32:44 2008 -0600 Use static constant. commit 41c8952597ce8e1bd4a03710548564d7937990be Author: John Bowman Date: Sun Jun 15 10:30:17 2008 -0600 For orthographic/oblique projections, move camera further from origin. commit 8ba6d29ded55164d280c533d56f8554e21aff6ce Author: John Bowman Date: Sat Jun 14 10:12:59 2008 -0600 Minor diagnostic improvements. commit 917a8159772c3655f9a30b78d0abe35f8d386233 Author: John Bowman Date: Sat Jun 14 10:04:27 2008 -0600 Avoid dereferencing null function. commit 0d589b66ab74255064c2944dd8a679724acfb719 Author: John Bowman Date: Sat Jun 14 09:34:00 2008 -0600 Fix bug in face routines for orthographic and oblique projections. commit f3de3580086911764db9398e9b515573bc1b3bb8 Author: Orest Shardt Date: Fri Jun 13 17:54:42 2008 -0600 Fix IDs in PRC files. commit 0d1c41d959478fba4160627e30e1082d413c7f8b Author: John Bowman Date: Fri Jun 13 16:12:17 2008 -0600 Get PRC initial camera settings from projection. commit 9776ccfc40c6182d02447c1b934614593bf6e0e3 Author: John Bowman Date: Fri Jun 13 08:15:38 2008 -0600 Clean up temporary files. commit 8eff0d15bca50fe0c914c4cf7b1af4341ae5ccd0 Author: Andy Hammerlindl Date: Fri Jun 13 00:16:39 2008 -0600 Added semicolons. commit a9bb0091a5be8d6da421e80c0316c6dfaced0a0d Author: Andy Hammerlindl Date: Thu Jun 12 22:56:47 2008 -0600 Test access of shadowed variables by higher-order functions. commit 768a9ce6987778508cc84e4e9205b01ff2c6b05f Author: John Bowman Date: Thu Jun 12 22:53:27 2008 -0600 Add support for basic PRC operations (drawpath3 and drawsurface). commit 7a563a4026f3977cbba6d1b829a7211751afa952 Author: John Bowman Date: Thu Jun 12 22:50:22 2008 -0600 Wait for pdfviewer to exit before restarting it. commit 1878b4a8c01e7f846a0218c2bbd10a0596f8e5ec Author: Orest Shardt Date: Thu Jun 12 21:01:36 2008 -0600 Import code that implements support for saving 3D content to PRC files. commit c65204f2e7fe258b244b769f6911065fe1986e0b Author: John Bowman Date: Thu Jun 12 18:10:31 2008 -0600 Since Adobe Acrobat doesn't yet have a file-watching capability, kill a running pdfviewer so that a file can be redrawn in interactive mode. commit f7b8cd27b9cb8765d71b8fcf1d6057875269b0f8 Author: John Bowman Date: Thu Jun 12 10:00:47 2008 -0600 Make asymptote.sty work with the hebrew babel package. commit 2d7fea22b1f0985fe436087b9086e6c9c86cd5fb Author: John Bowman Date: Thu Jun 12 09:16:07 2008 -0600 Add example of downward-pointing logarithmic axis. commit 5f7145480ea60fd683c6c8bf3799042572d5a16e Author: John Bowman Date: Thu Jun 12 03:23:19 2008 -0600 Increment version to 1.44svn. commit fb06937f6dba11a658a56771153fd8986d62ab1a Author: John Bowman Date: Thu Jun 12 01:26:49 2008 -0600 Use international inch also in C++ code. commit a2159fe25921e7dec91b57c630d313698954bdb9 Author: John Bowman Date: Thu Jun 12 00:54:14 2008 -0600 Fix potential segmentation fault in store_history. Move uptodate=true back to the beginning of shipout to avoid a race condition. commit d719abe5c028f2aff2d2b4735bb470228cc1e171 Author: John Bowman Date: Thu Jun 12 00:14:14 2008 -0600 Add modules to redefine LaTeX named fontsizes to correspond to \documentclass[10pt]{article} and \documentclass[11pt]{article}, respectively. commit bf00af247e9d89e4425d66594eb4685231472348 Author: John Bowman Date: Wed Jun 11 15:45:16 2008 -0600 Use international inch conversion factor. commit ea890c4d3874b09bc617088a00ee228a6a9b5c60 Author: John Bowman Date: Tue Jun 10 08:14:59 2008 -0600 Add missing path3[] operator * (transform3 t, path3[] p). commit dc67938febe8c4317574b568fd02f6ac3c7419ac Author: John Bowman Date: Mon Jun 9 00:59:31 2008 -0600 Add optional support for Jonathan Shewchuk's more robust triangulation routines. commit 9474ea5ae10eb7a13cbce94be37de60c6ca07316 Author: John Bowman Date: Sun Jun 8 22:56:41 2008 -0600 Add interface for drawing contours on arbitrary nonoverlapping meshes. commit be71e97dd3937cbff0f077fffe1c0f287bf3ace2 Author: John Bowman Date: Sat Jun 7 22:36:27 2008 -0600 Remove transform return value from add functions in favour of user-supplied add routine. commit 957acf66cd561bcd3bb36f53583a8358b2153ec5 Author: John Bowman Date: Sat Jun 7 10:49:54 2008 -0600 Move draw(path[], pen[]) to plain_picture.asy. commit 29e7f51ffab71cb8cd31f3df70c35ec415b3cb27 Author: Philippe Ivaldi Date: Sat Jun 7 10:02:20 2008 -0600 asy-mode.el: add asy to regexp matching environments with indentation at col 0 for begin/end. commit d195ed234f5abd683c8801f819d48b6827012c41 Author: John Bowman Date: Fri Jun 6 12:18:07 2008 -0600 Remove "paths in concatenation do not meet" also from three.asy. commit c440bcb17349caf9383c7e3240ddb90eb7928b19 Author: John Bowman Date: Fri Jun 6 10:59:22 2008 -0600 Return the transform that maps source coordinates to destination coordinates in add and attach. commit 23ec1d32da754c400c706e8ea6d2c7770ee27992 Author: John Bowman Date: Fri Jun 6 10:56:10 2008 -0600 Move uptodate=true to runtime. Improve diagnostics about incompatible array lengths. commit 6f84918ef12c6f710d71c6bdf7af794b3692b780 Author: John Bowman Date: Fri Jun 6 09:52:43 2008 -0600 Make interrupts set uptodate=true to avoid spurious shipouts. commit 339e753c2f3d351c1ef372c5661a9c7411351641 Author: John Bowman Date: Fri Jun 6 09:51:37 2008 -0600 Fix secondary axis tick selection when automin=false. commit 1027a630c04d8242f270fbffe681dc8bb0c7d43e Author: Andy Hammerlindl Date: Thu Jun 5 15:45:47 2008 -0600 A preliminary proposal for how to defined Asymptote modules in C++. commit 0d4a0eeb383510e60b3b9ac9232113e2eee45702 Author: John Bowman Date: Thu Jun 5 08:58:18 2008 -0600 Allow precision setting to be queried. Write paths to the specified precision setting for a file. commit 3b5a173a2f18ffd46d224702d7041cfa9fb41fad Author: John Bowman Date: Thu Jun 5 08:35:35 2008 -0600 Add expm1 function. commit d7b09d6ccc177c046eb40729cea64852d93d0aa0 Author: John Bowman Date: Thu Jun 5 08:34:21 2008 -0600 Add labels to example. commit 9f514e148d9ad4e771e95fc8474689f7296902e3 Author: John Bowman Date: Wed Jun 4 22:28:22 2008 -0600 Always draw 2D axes below picture by default. commit 23687784eb8136c680bc575e5faaa031c43b2e7e Author: John Bowman Date: Wed Jun 4 21:00:36 2008 -0600 Simplify font variable definitions. commit b1ecdea289fe45a884bf9d62174e33169dd04a69 Author: John Bowman Date: Wed Jun 4 20:34:59 2008 -0600 Restore to correct initial font. commit d154fe783f4b8a0e68246d1c981983108fea48eb Author: John Bowman Date: Wed Jun 4 14:50:26 2008 -0600 Add missing # sign. commit 352b95fbcbde83c2100873428333c42833b96400 Author: Andy Hammerlindl Date: Tue Jun 3 21:54:04 2008 -0600 Removed matchCache entirely. commit 7049c58edd05e29d05a420e5863c0f813930afc1 Author: John Bowman Date: Tue Jun 3 20:14:07 2008 -0600 Handle undefined __GNU_C_PREREQ macros. commit d05f4d6b8db474012a020cadef63c05048c115b5 Author: Andy Hammerlindl Date: Sat May 31 05:55:05 2008 -0600 Disabled matchCaching dur to improperly handled cases. commit 9fa7f2b46ab2a4d2182b284fa2478392be786099 Author: Andy Hammerlindl Date: Sat May 31 05:54:24 2008 -0600 Ideas about unicode. commit 8e5a96428b9aad50a2a5f26bb7c7aad7fc128751 Author: John Bowman Date: Tue May 27 00:36:08 2008 -0600 Work around broken gcc-4.1.2 tr1 headers. commit f11c1186fa36c01c5bbe8f17ac7d53fa47022cca Author: John Bowman Date: Mon May 26 23:41:28 2008 -0600 Port to gcc-4.3.0. commit 1134015c605aeaa9c716e300bdaaa00781297872 Author: John Bowman Date: Mon May 26 15:09:53 2008 -0600 Add beginnings of an ode package. commit 54612197435b4c944be06179afd96f855d650705 Author: John Bowman Date: Thu May 22 01:02:23 2008 -0600 Make partialsum return an array of the same length as its argument (this is a backwards incompatible change). commit 4151c0858ef89f677f105a5cd62024ecc241aeb2 Author: John Bowman Date: Wed May 7 22:52:35 2008 -0600 Update to gc-7.1. commit 3d0927284d1feba4d7ebf1a1c6ec4d6b7d21cdbc Author: John Bowman Date: Wed May 7 22:50:36 2008 -0600 Return immediately for negative sleep arguments. commit 28729a6593b608c87ff01bc4abebe997716fdaa1 Author: John Bowman Date: Wed May 7 22:49:52 2008 -0600 Fix spelling of cardioid. commit 47ba791ced24f6f4b0a53d261f7565577f33082c Author: John Bowman Date: Wed May 7 22:49:21 2008 -0600 Update URL. commit 33a78d50b57103d1799c2b95ab2b8ff5d24b7dac Author: Orest Shardt Date: Mon Apr 28 17:39:58 2008 -0600 Update links to TeX resources. commit cdca5636da68747c65fdbf4a1ad5b13497ebb9b6 Author: John Bowman Date: Sat Mar 29 17:18:30 2008 -0600 Temporary fix for tick directions. commit aeb5c5a9c889d60ddd2dc3ac0fef63b534d5bc46 Author: John Bowman Date: Sat Mar 29 17:17:47 2008 -0600 Add missing index entry for array. commit 253ddb3249b9f7e85bc7035cca787874e513be0a Author: John Bowman Date: Sat Mar 29 17:10:46 2008 -0600 Simplfify examples. commit 1dbb7d413f5c5059d01ddc874b158753ce8cdcb2 Author: John Bowman Date: Sat Mar 29 17:08:57 2008 -0600 Improve bad string cast diagnostics. commit 973ea83a562502f902836cc07293aea9e902141a Author: John Bowman Date: Sat Mar 29 17:08:34 2008 -0600 Add drawing routines for guide[] g. commit f5b8a5fde57dbb1916a68b104de7c4f586ff0d6b Author: John Bowman Date: Sat Mar 29 17:06:54 2008 -0600 Add path[] operator cast(guide[] g) cast. commit a23bee0a918c2e49facf005c2c94f1c482d6e10c Author: John Bowman Date: Sat Mar 29 17:06:20 2008 -0600 Add draw(frame f, guide[] g, pen p=currentpen) routine. commit bcef90c405e0bd4eadef1cae4e41b3fe0cceac7b Author: John Bowman Date: Sat Mar 29 17:04:45 2008 -0600 Simplify definition of endl. commit 5e1ced1a1a427f102db12b1af9ef66cca091281f Author: John Bowman Date: Sat Mar 29 17:03:50 2008 -0600 Move title down slightly. commit 57f08e7a99c24f095155c4a0bf74e97ffd9cc40c Author: John Bowman Date: Sat Mar 29 17:02:59 2008 -0600 Add void beep() function; document flush output suffix. commit 210a2779be4611f9854b6b48f07c0d32bf47b96e Author: John Bowman Date: Sat Mar 29 16:59:31 2008 -0600 Add real[] operator ecast(string[] a). commit bdf817fc6daa43cab0399f03438983b95d77367b Author: John Bowman Date: Wed Mar 26 21:35:28 2008 -0600 Make tickmin a multiple of Step when automin=false. Don't override put=Above default for extended axes. commit 3df525c36624064a784a2dae7b32e4a3a533a115 Author: Andy Hammerlindl Date: Fri Mar 21 21:45:32 2008 -0600 Added array(n, value) function for making arrays of duplicates. commit efdeedfa21d989c7ec6e249105739af76b1407d4 Author: John Bowman Date: Fri Mar 21 09:56:10 2008 -0600 Force the default -D 600 dvips setting for proper label alignment (should have no other effect since we are not using bitmapped fonts). commit 3ba23cae223de6eda4bc3be6975e52c64bb5d578 Author: Orest Shardt Date: Tue Mar 11 21:58:22 2008 -0600 Fix handling of undo/redo while in bezier editing mode. commit e5c96b0445050e3894d40bc13102a8b91075357a Author: John Bowman Date: Tue Mar 11 08:45:01 2008 -0600 Force setdash when offset changes. commit d39b6bf8ffeaed671183ed633253c9292b6ebc37 Author: John Bowman Date: Sun Mar 2 17:19:55 2008 -0600 Make C-c C-c automatically kill a previous running Asymptote process without second-guessing user's intentions. Remove erroneous "Compilation errors,..." message generated by killed processes. commit 96134a7138bb45deb16ebeea24130a93c044375d Author: Philippe Ivaldi Date: Sun Mar 2 05:29:55 2008 -0600 Remove useless code in penimage.asy commit 4e3af91ce1ddcc1853c022f3e7cbfaaaab564b7b Author: John Bowman Date: Sun Mar 2 00:55:37 2008 -0600 Fix gradient. commit 1487f75fbb79143a2ae24c0db4a51fe63d971982 Author: John Bowman Date: Sun Mar 2 00:53:08 2008 -0600 Remove unused import. commit 1301e8134a26abe9727308e39ecc415d2be20171 Author: John Bowman Date: Sun Mar 2 00:49:23 2008 -0600 Improve one-dimensional vector field interface (this change is backwards incompatible). Support two-dimensional and three-dimensional vector fields. commit b4ba032503c86cb8292b34f41c81b0bc8ae7f30e Author: John Bowman Date: Sat Mar 1 18:14:38 2008 -0600 Add example of conditional surface and transparent splitting plane. commit f3d9bf2e97ac2271cca37f21a2bdda47842d964f Author: John Bowman Date: Sat Mar 1 16:38:14 2008 -0600 Implement conditional drawing of surfaces meshes over box(a,b). commit 66eebddd231e21da865cf0e9df34ed5169fa5f82 Author: Philippe Ivaldi Date: Thu Feb 28 05:42:32 2008 -0600 Update asy-mode-version value. commit 342b84ef3a0807ab5ce3fe18df0faf3483f55231 Author: Philippe Ivaldi Date: Thu Feb 28 05:40:49 2008 -0600 Fix critical bug in asy-mode.el: a new Asymptote compilation when a process was running erased the contents of some buffers. commit 027b52858861556cc5e12037c1ff2c9443cc5b85 Author: John Bowman Date: Wed Feb 27 01:25:25 2008 -0600 Increment version to 1.43svn. commit 1447cc01adb0a414ebf6c2182ffc67261e41844b Author: John Bowman Date: Tue Feb 26 23:57:08 2008 -0600 Project labels onto cube faces. commit 8d56775de2013b8977c6e91d157d9ea7e080d179 Author: John Bowman Date: Sun Feb 24 10:32:50 2008 -0600 Don't set sticky bit when creating ~/.asy directory. commit 9fbabd22a74377a0368373ff1830eea8430df812 Author: John Bowman Date: Sun Feb 24 02:18:00 2008 -0600 Add optional arrows to slopefield routines. commit 71660d1deb2a0b127d19057d6e171a2a601de2aa Author: John Bowman Date: Fri Feb 22 15:47:40 2008 -0600 Add routines pairs(real[] x, real[] y) and triples(real[] x, real[] y, real[] z) as a replacement for the obsolete routine dot(picture pic=currentpicture, pair[] x, pair[] y, pen p=currentpen, filltype filltype=Fill); commit fae5c47b53c181310f48923c84a7432a93dda1e1 Author: John Bowman Date: Fri Feb 22 15:11:07 2008 -0600 Remove ambiguity in scale. commit 7eaba4a7e73881f4ad8c6fb6b2efa8758b6f4441 Author: John Bowman Date: Fri Feb 22 13:12:12 2008 -0600 Use the exact derivative of the projection map to project a Label onto a given plane. Remove routine dot(picture pic=currentpicture, pair[] x, pair[] y, pen p=currentpen, filltype filltype=Fill); Add dot(real[] a, real[] b) routine returning the dot product of two vectors. Update documentation. commit 8b4b5f556068b8dc1c358e2380023cdf36fe71ec Author: John Bowman Date: Wed Feb 20 14:35:14 2008 -0600 More guide to path changes. commit 1b0837cc9fd6c26c2c073ea7942f7e9c0ad2290a Author: John Bowman Date: Wed Feb 20 14:30:54 2008 -0600 Minor optimization. commit 66f028e3ddb30f53da918a34665e97f652132e6f Author: John Bowman Date: Wed Feb 20 11:05:24 2008 -0600 Minor optimization. commit 2c30348bc4c5c690bb8100aeb6d35181d9023e4a Author: John Bowman Date: Wed Feb 20 10:53:48 2008 -0600 Simplify code. commit 0596ae2e0e671c999ba530f78ee3b0b27a8cd18c Author: John Bowman Date: Mon Feb 18 14:19:42 2008 -0600 Add fit argument also for nonglobal animations. commit 43c452a4cf07327afc3fd0e9f8c26ea334deedcb Author: John Bowman Date: Mon Feb 18 12:07:11 2008 -0600 Add fit argument to animation routines for adding an optionally filled bounding box to each movie frame. Add newpage(frame) function. commit b93fe4a70c9017ff184f1a53ebc205d436e1a468 Author: John Bowman Date: Mon Feb 18 10:54:28 2008 -0600 Remove unused shipout predeclaration. commit 7d96e60c78920b01057ed98fec08de69e1244f7a Author: John Bowman Date: Sun Feb 17 23:29:37 2008 -0600 Add missing explicit qualifier. commit 69f2ced5ccf41357f53c02e60b71e81ff9a27bde Author: John Bowman Date: Sun Feb 17 23:22:15 2008 -0600 Move definition of currentpen to C++ code. Add int inside(path p, path q, pen fillrule=currentpen) routine. commit cb2994e001b117a4a4e59592041ddb68ec7d7341 Author: John Bowman Date: Sat Feb 16 23:17:40 2008 -0600 Add routine for projecting a Label onto a given plane. commit 1a9da2027d2a553c9da08e29c369791400269024 Author: John Bowman Date: Fri Feb 15 10:43:04 2008 -0600 Fix missing ASYbase declaration. commit 8fd647e96c77710d904dbcd5ea6132c42a05114c Author: Orest Shardt Date: Wed Feb 13 20:21:00 2008 -0600 Fix bug in cancellation of text addition. commit 853850265626e15fd01330a794bc82ec8d58073d Author: John Bowman Date: Wed Feb 13 16:24:27 2008 -0600 Output TeX headers only when needed. commit 84d386a4ce6844c74fdc632b0ad0b21da419106e Author: John Bowman Date: Wed Feb 13 16:21:32 2008 -0600 Mention that transforms can also be applied to Labels. commit d6d464b64985bdb24a0efe48c4bc508ed3eff762 Author: John Bowman Date: Mon Feb 11 15:19:08 2008 -0600 Update two arrow example. commit 9b3ac4667a40ddb9278ff1c1e288327cec8481cf Author: John Bowman Date: Mon Feb 11 14:49:15 2008 -0600 Update documentation of arrowhead styles. Change guides to paths. commit a1df8af391ff6d0e4026fa6c3a3add30726f397a Author: John Bowman Date: Mon Feb 11 14:15:19 2008 -0600 Move documentation of colorless(pen) to a better place. commit f36f2b8361c7223233adf56f4cee046d1f3bb472 Author: John Bowman Date: Mon Feb 11 04:14:56 2008 -0600 Simply and generalize contour value selection code. commit f391e1cb59dc5038024a0c9f5e1eeae96e488458 Author: John Bowman Date: Fri Feb 8 22:58:31 2008 -0600 Make OmitTick do nothing when there are no major ticks. commit accc7ed704192adf8d5a529c40f4a85d9cf410fb Author: Andy Hammerlindl Date: Tue Feb 5 19:25:23 2008 -0600 Fixed typo in slice documentation. commit 89dba98f9ec82d098a5879730fadea5d74a80e3b Author: John Bowman Date: Tue Feb 5 10:01:26 2008 -0600 Avoid division by zero in uniform. commit 3321d9455ef90ee97f768938562ff22c15a875bf Author: John Bowman Date: Sun Feb 3 17:19:39 2008 -0600 Update documentation regarding ImageMagick convert. commit 849d9b02838570b95aa701399bd2f2ce636c93e3 Author: John Bowman Date: Sun Feb 3 17:13:17 2008 -0600 Make movie generate multipage pdf animations when format="pdf" and global=true. Insist on pdflatex in animation.pdf(). commit ad06a8362db44fa8157339841e327bc4b4177b55 Author: John Bowman Date: Sun Feb 3 17:08:56 2008 -0600 Catch bad casts. commit 1009155106bfb79fbf920c5a9a1b1913d6ec0c48 Author: John Bowman Date: Sat Feb 2 11:23:44 2008 -0600 Add casts between hsv structure and pens; reduce angle to [0,360). commit f5ecdd38a3a4cf7f6cde0082b9a68d99645ebab2 Author: John Bowman Date: Sat Feb 2 03:07:55 2008 -0600 Increment version to 1.42svn. commit 270d45cc07ed6be202740548e3460cf16a5a905d Author: John Bowman Date: Sat Feb 2 02:12:22 2008 -0600 Fix type conflict. commit b0d85d8859acb4dd6f7514f96269b1d33c3d5d23 Author: John Bowman Date: Sat Feb 2 01:05:46 2008 -0600 Add support for HSV colorspace. commit 621f260edc533f9ced6fc4984cd908a385fcfd28 Author: John Bowman Date: Thu Jan 31 21:21:25 2008 -0600 Minor edits. commit 075c48e7483fbaab787b4bff3be8d8ab1c45b959 Author: Andy Hammerlindl Date: Wed Jan 30 19:42:11 2008 -0600 Documented slices. commit f003b14f41ee970266a527ddf8255eee6b79c2ae Author: Andy Hammerlindl Date: Wed Jan 30 14:28:01 2008 -0600 Disallow A[5:2] and, for non-cyclic A, A[-1:] to play it safe. commit 609d55caaefb95be16383fdca5bc7e4a46f1530d Author: John Bowman Date: Wed Jan 30 13:24:17 2008 -0600 Change write to output nothing for uninitialized values instead of producing an error. commit 1fd3159d68d7afb253c6b44cc4c8ee50cd9c5f75 Author: John Bowman Date: Wed Jan 30 12:19:58 2008 -0600 Add uniform(real a, real b, int n), which returns a uniform partition of [a,b] into n subintervals. Fix comment. commit 75fbbe945ba00a7207c3816e8d7fd73dac11f73a Author: John Bowman Date: Tue Jan 29 18:53:40 2008 -0600 Store history line immediately after input (as well at exit, after stifling). commit 7fb3c67120d0191ff5b6071fa045491317f24133 Author: John Bowman Date: Tue Jan 29 09:23:30 2008 -0600 Add interface to simpson. commit 0665d10b2d3fe34f7243f2a3db1c087b30609c2f Author: John Bowman Date: Mon Jan 28 13:12:37 2008 -0600 Format. commit 0901dca35916a1a85d935b0f888eaa70396d32f8 Author: John Bowman Date: Mon Jan 28 13:11:43 2008 -0600 Move numerical routines to Mathematical functions section. commit 424dd7052001b15f6f57b0da35ee1268bf22435d Author: John Bowman Date: Mon Jan 28 12:38:09 2008 -0600 Make buildcycle return nullpath if less than two paths are specified. commit dcf34ff2cc982064b00dc5e673a9a2126f99660d Author: John Bowman Date: Mon Jan 28 11:56:44 2008 -0600 Fix typo in documentation of complement. commit f7d9ddabc9ef80d009e5f880d8a4de2f33dcc0af Author: John Bowman Date: Mon Jan 28 11:35:52 2008 -0600 Fix formatting. commit 18586c705f74c214f4d60b44d9f564212c80632d Author: Andy Hammerlindl Date: Sun Jan 27 12:05:40 2008 -0600 Implemented assignment to slices. commit 392074ca90dc8bc379b86e39840620c5ca31e7fe Author: John Bowman Date: Sat Jan 26 17:11:28 2008 -0600 Shred TeX transcripts after each call to drawLabel::wait. commit 3c04ace2e3285c356ee91fc03faecc4379532de0 Author: John Bowman Date: Sat Jan 26 16:57:21 2008 -0600 Output complete TeX diagnostics. commit 3434e16d2ea4b2fc32ede6c4710cfca7b5efea83 Author: John Bowman Date: Sat Jan 26 16:30:24 2008 -0600 Add blank lines between tests. commit 5f1be847debfa4a549ec961bb00996c00ee5264f Author: Andy Hammerlindl Date: Sat Jan 26 16:02:48 2008 -0600 Added null check for array slices. commit 5bcb67c87c7960dda4e3bc8ae3e446719b052d11 Author: John Bowman Date: Sat Jan 26 15:57:19 2008 -0600 Add array. commit cd1f0d3f6fa288b44391233d4b43932ca7967764 Author: John Bowman Date: Sat Jan 26 15:52:05 2008 -0600 Define complex exp, log, sin, and cos functions. commit 2d2c077d551cca549d04295eea745a5b0f7f657c Author: Andy Hammerlindl Date: Sat Jan 26 15:13:57 2008 -0600 Added array slices. commit 45d39c3a8d9332915ece4513d6a03b98872c8f08 Author: John Bowman Date: Sat Jan 26 11:19:22 2008 -0600 Fix file paths. commit fa4d57f8b5f26cb8fb7cfbd9df00efc2e155bbff Author: John Bowman Date: Sat Jan 26 11:14:03 2008 -0600 Remove dependence of non-PDF animations on animate.sty package by renaming animate.sty to animation.sty (PDF animations still need to import animate.sty). commit 2917d9cd47a4caa2ec96ab77a90287709310729c Author: Andy Hammerlindl Date: Sat Jan 26 10:18:56 2008 -0600 Report on error for rest args with default arguments. commit 3b3d6627a6cfba38e11e39830153d1f96978b14d Author: Andy Hammerlindl Date: Sat Jan 26 10:07:52 2008 -0600 Added virtual field A.keys for arrays. concat now take a rest arg. commit 5f88126092e73363d852ff8573d03cac61761d51 Author: John Bowman Date: Fri Jan 25 23:47:18 2008 -0600 Make xasy respect transparency with png xformat. commit 11cfe8261e6a9cd45e922a2a694b28f70ae3eb52 Author: John Bowman Date: Fri Jan 25 20:51:26 2008 -0600 Add drawpen argument to FillDraw. Handle nullpen when drawing arrows. commit f419e0fc124a1487b98e4c36c79831ada12ce073 Author: John Bowman Date: Sun Jan 20 12:58:45 2008 -0600 Store and make use of the bounding path in the object structure to allow connections to noncardinal boundary points. Add constructors to the object structure. Remove obsolete function for drawing boxes on pictures in favour of draw(Label,box). Add dir(explicit pair z) function so that dir(E) is a synonym for E. Update documentation. commit fb19c361b7e1185d22c63079502b9f1863ca452e Author: John Bowman Date: Sat Jan 19 22:28:43 2008 -0600 Add gamma function example. commit 864e65e94d727444a0c3123478b099a132b9a42a Author: John Bowman Date: Sat Jan 19 19:03:13 2008 -0600 Fix typo. commit 91199463ea13f80fa065d66f2194fbda6f28a8e5 Author: John Bowman Date: Sat Jan 19 19:02:16 2008 -0600 Improve buildcycle algorithm. Avoid numerical resolution issues by removing the "paths in concatenation do not meet" error. commit 04e020e6605b64d606d91b26446b8319325a7a27 Author: John Bowman Date: Thu Jan 17 17:29:08 2008 -0600 Add intersection count to node and value routines. commit a19be6b36b0293565e5be8316fdf516ab0470e43 Author: John Bowman Date: Thu Jan 17 17:24:27 2008 -0600 Update example to show how to specify all pen colours. commit ae1481f9b930d27f05564a2dedf4ffdf6012014a Author: Philippe Ivaldi Date: Sat Jan 12 11:53:17 2008 -0600 Fix typo commit 98e2c3eb93ca70fd24329774cfb664dd521f9092 Author: John Bowman Date: Fri Jan 11 22:59:03 2008 -0600 Determine whether unsplit slices are should be drawn as front or back slices. commit b770b4ff836330c71d1dac7038caed808fd588e9 Author: John Bowman Date: Sat Jan 5 12:59:42 2008 -0600 Increment version to 1.41svn. commit fca863691dd2a7cba64c4aaf2cd4e456b70b07d5 Author: John Bowman Date: Sat Jan 5 12:02:27 2008 -0600 Fix nurb-related bug in solid shading. commit 842a3f1261d30bdad98e0bcf8c4a3198beaf2042 Author: John Bowman Date: Sat Jan 5 11:40:31 2008 -0600 Fix PDF hatch width by disabling dynamics line width adjustment when producing pdf format. commit 969bea071468a36ef3a707c81c2d14bdeb0009bd Author: John Bowman Date: Sat Jan 5 10:50:59 2008 -0600 Omit control panel for second movie. commit 204640fad71c60e20420c0c7868e3f15960dc1fc Author: John Bowman Date: Fri Jan 4 22:08:35 2008 -0600 Increment version to 1.40svn. commit 325350659a2678ed008d5a4ebb72b37f5b75e47b Author: John Bowman Date: Fri Jan 4 20:48:57 2008 -0600 Fix inline embedded PDF animations. commit 356ab0f2172a5ae8130443f1c2647295cabb220e Author: John Bowman Date: Fri Jan 4 20:28:04 2008 -0600 Delete intermediate animation file unless keep=true. commit f48f0cc7f09236e5775871c39030bee58560940c Author: John Bowman Date: Fri Jan 4 18:53:32 2008 -0600 Use constructor to initialize animation. commit d02f55428e29bb44d1b06d79c6ad8afb02916165 Author: John Bowman Date: Fri Jan 4 18:23:54 2008 -0600 Increment version to 1.39svn. commit 96b57a131d19deebc84f85a1a6dcd2049823450a Author: John Bowman Date: Fri Jan 4 14:09:26 2008 -0600 Patch to support gcc-4.3. commit 7475cb84d621c8a61982db333e125823fb0bbb33 Author: John Bowman Date: Fri Jan 4 13:53:56 2008 -0600 Move inlinemove.tex to animations directory. commit 1a9d7aff510255ddf0f26c5f310912cd71fe8647 Author: John Bowman Date: Fri Jan 4 13:52:04 2008 -0600 Add argument global to animate constructor. Fix and illustrate inline animations. commit 26cf61ebcfbd55c922c2dde34e694f72846e7f25 Author: John Bowman Date: Thu Jan 3 22:13:31 2008 -0600 Fix ambiguous call to dot(triple[]). commit d43650f6d16d9fb3e4d0ddc50744869fa78ce1ba Author: John Bowman Date: Thu Jan 3 21:15:16 2008 -0600 Support and illustrate embedding of inline pdf files even in absence of [inline] asymptote.sty option. Use multipage mode by default in animate.pdf(). commit c7893eeb3a59a57448864986646b44bfa30437bc Author: John Bowman Date: Thu Jan 3 18:06:40 2008 -0600 Add constructor for animate. Update inline pdf movie documentation. commit 766fd6bf08b41aa47f0573ab64dbd25b103ebfbf Author: John Bowman Date: Thu Jan 3 17:44:30 2008 -0600 Support multipage and inline pdf movies. commit 1454b4566b4aea12277185e3bf95d373bd563b1e Author: Philippe Ivaldi Date: Thu Jan 3 07:59:26 2008 -0600 Fix TeXHead path. commit 1bf4a24c69724b7c2036187e9bf10c67cd2b746f Author: John Bowman Date: Thu Jan 3 00:17:36 2008 -0600 Document arrowhead styles. Rename arrowheadT to arrowhead. Add defaultfilltype to arrowhead. Fix direction bug in TeXhead. commit 1067c1e94097c7b80391998a0428994cfa78f731 Author: Philippe Ivaldi Date: Wed Jan 2 20:12:25 2008 -0600 Provide Computer Modern arrow head. commit 7662c29a905b31ff907910fb114f0d200c4715ea Author: John Bowman Date: Tue Jan 1 16:17:29 2008 -0600 Fix degenerate arrows. commit 6ef4751c7a67f389651557bbd4e2b59397676527 Author: John Bowman Date: Mon Dec 31 00:57:24 2007 -0600 Add arrowhookfactor. commit 3995f096e44ed51ef5fc3a398167bdf6aafcd232 Author: John Bowman Date: Mon Dec 31 00:50:21 2007 -0600 Support alternative arrowhead styles. Add SimpleHead and HookHead arrow styles (courtesy of Philippe Ivaldi). commit 94e73b59ec29229fdfcbab31f6fbf28ac65c4ed3 Author: John Bowman Date: Mon Dec 31 00:46:56 2007 -0600 Automatically reduce FillDraw to Draw for noncyclic paths. commit e48152f9ab707d255a31e094f6cae8d132eba8ec Author: John Bowman Date: Sat Dec 29 11:37:13 2007 -0600 Approximate nonuniform rational B-splines (nurbs) by adding additonal control points to Bezier curves (not yet optimal). Add operator &(path p, cycleToken tok). Update constructors in three.asy. commit e6cf05117c5c832bf234ac9f4acfe5c0155552ea Author: John Bowman Date: Fri Dec 28 12:20:30 2007 -0600 In autoformat, try to add an extra digit of precision. commit ad790766a21e1f85d924c7cd27ddb6256d1f1c17 Author: John Bowman Date: Mon Dec 24 10:42:05 2007 -0600 Handle output from xasy scripts. commit 85d94404c8867f790204a64445a115fbdd4fb07b Author: John Bowman Date: Mon Dec 24 10:06:39 2007 -0600 Have Makefile create symbolic link xasy. commit c0d837d3b193e411db8195007e481dd49433fadb Author: Orest Shardt Date: Sat Dec 22 21:34:02 2007 -0600 Remove need for access to GUI widgets from threads other than main thread. commit 319c53aa393f6f187d5994fd4f47eaa300ab69e8 Author: John Bowman Date: Tue Dec 11 20:01:47 2007 -0600 Add missing figures; remove duplicate line. commit 5db58c2ab9b5db1059eff00dd6e39b8bb6c3552a Author: Andy Hammerlindl Date: Mon Dec 10 12:29:34 2007 -0600 Clear the matchCatch after translating a module, for a modest speed-up. commit 8504b2b12ce9028d8146491f6375e87185b524fc Author: John Bowman Date: Sun Dec 9 23:37:42 2007 -0600 Add optional xlabel and ylabel arguments to axes. Make default xlabel, ylabel, and zlabel arguments of 3D axes routines empty strings. Document axes. Untabify graph3.asy and graph.asy. commit 021b820e636812a8f10cc986a689b4ee196dcb2f Author: John Bowman Date: Sun Dec 9 21:25:55 2007 -0600 Remove unused import. commit 7d109fd4de56e9eb9e5be7e0fe84e07e76e56203 Author: John Bowman Date: Sun Dec 9 17:47:07 2007 -0600 Improve graph and interpolation array length diagnostics. commit 51aeda2f2b10a981416760373819ea77723276f5 Author: Andy Hammerlindl Date: Sun Dec 9 15:10:02 2007 -0600 Resolve ambiguous expressions during interactiveWrite (with a warning). commit 8706cd7cb1cbc7bf5d5214a8004312924a296d04 Author: John Bowman Date: Sun Dec 9 13:15:32 2007 -0600 Implement -c (command) option and exit() command. commit f9d4dd9fd35dba1bc3a8af6fbc38ee92580e61b8 Author: John Bowman Date: Sun Dec 9 11:49:08 2007 -0600 Make read1, read2, and read3 effective only for the current array read. commit fc7724984928fcb5438c804c93f4d1f4547e26e5 Author: John Bowman Date: Sat Dec 8 20:22:01 2007 -0600 Output deconstruction errors to Asymptote Console window. commit 3743326dfa4517531e6830c780c3ad1218b652f5 Author: John Bowman Date: Sat Dec 8 19:16:19 2007 -0600 Handle unclosed begingroups in deconstruct. commit e7ec47ddc06f49296bfd7cdb3ce0266eb05baf43 Author: John Bowman Date: Sat Dec 8 17:37:22 2007 -0600 Add patch to fix several problems with Asymptote backend for pstoedit-3.45. commit 9a8a21225594ea559e60a5ffcdc189dce0f72fe3 Author: John Bowman Date: Sat Dec 8 15:17:13 2007 -0600 Ignore unclosed begingroups (to work around pstoedit problems). commit 3fa9cfc8cfc9398c532a66696177e99f804a66aa Author: John Bowman Date: Sat Dec 8 15:13:07 2007 -0600 Fix empty clipping bbox. commit 01c074e794942e9e7f6d99939cb9be8fedf273a7 Author: John Bowman Date: Sat Dec 8 11:43:45 2007 -0600 Show how to put a header on every page. commit a945de6cdff5da619b67a0da1361f84e520ea201 Author: John Bowman Date: Sun Dec 2 17:29:34 2007 -0600 Improve system gc detection. commit 7982bb03903011ef9d815663b9be57b0a4c7c43d Author: John Bowman Date: Sun Dec 2 11:58:15 2007 -0600 Document \\ -> \\ mapping of double-quoted strings. commit f3c872398182865ab86f8d539407116e6bf97f85 Author: John Bowman Date: Sat Dec 1 16:30:13 2007 -0600 Add default value of (0,0) to center. commit 751ef26e6441331a20c733c2ede1e93ca9e48129 Author: John Bowman Date: Sat Dec 1 16:24:03 2007 -0600 Add pen arguments to flowchart block routines. commit 53353a7061cb3a14bbe29748e2f0b0a84bff52cd Author: John Bowman Date: Wed Nov 28 02:28:22 2007 -0600 Increment version to 1.38svn. commit dbfb3b087153beead06ba3bb7aaaa96202279698 Author: John Bowman Date: Wed Nov 28 01:37:17 2007 -0600 Final Windows tweaks. commit f887aa3b30820f117a5eedb2c03ab6af54a86d39 Author: John Bowman Date: Wed Nov 28 00:05:09 2007 -0600 Remove min since intersections returns a sorted array. commit d22fe9b61925276c50f1d02e795d9eaa387a5063 Author: John Bowman Date: Tue Nov 27 23:41:59 2007 -0600 Document the -x option of xasy. commit 9447249d3b473e643fdd4c1940bc8dba0cb1fa70 Author: John Bowman Date: Tue Nov 27 23:30:09 2007 -0600 Remove debugging test modification. commit 10ed8b40ffe426fa310f8b95dc5116feafe0f2b0 Author: John Bowman Date: Tue Nov 27 23:28:13 2007 -0600 Update GUI installation documentation. commit 3694a2d73a5acd069a1cc2d760e4903600db4ac5 Author: John Bowman Date: Tue Nov 27 23:17:19 2007 -0600 Require Python 2.5 for MSWindows. commit 8a304ea770d0353e64e55807df90977cb459f285 Author: John Bowman Date: Tue Nov 27 23:10:43 2007 -0600 Add version of PIL-1.1.6 patch used for MSDOS. commit bf8152019b302c20f8004f2737f31dad216b66c8 Author: John Bowman Date: Tue Nov 27 22:51:27 2007 -0600 Output diagnostics from Asymptote in separate Tk window. commit d93ac8e965bb7043f8b0ded28dba9e170068d382 Author: John Bowman Date: Tue Nov 27 22:50:28 2007 -0600 Fix active Color button foreground. commit e550c42efb019bb8dc01a3a1469ffce47355541f Author: Orest Shardt Date: Tue Nov 27 18:16:40 2007 -0600 Correct acquisition of lock for colour change. commit 0a49d1c30af474856658ea7b10e94eb75f66354b Author: John Bowman Date: Tue Nov 27 17:23:59 2007 -0600 Add 's' scrolling option. commit aa640e61e64e607504d8059a3e6d7b5bbce8a4de Author: John Bowman Date: Tue Nov 27 02:01:27 2007 -0600 Configure xasy version. commit facbc7d3edab62e709daff555032af4e915aaad5 Author: John Bowman Date: Tue Nov 27 02:00:47 2007 -0600 Turn off scrolling when not a tty. commit 561fe4db56c52dd4777ddf72818d02eef7380f6a Author: John Bowman Date: Mon Nov 26 23:22:08 2007 -0600 Add function to calculate "optimal" number of histogram bins. commit e14fabf18e6241a76fd6b4545abc5093a063f8bc Author: John Bowman Date: Mon Nov 26 18:54:59 2007 -0600 Force outformat="pdf". commit 24e7460045ec96dbff4b3fe4c464ecde0d663009 Author: John Bowman Date: Mon Nov 26 18:54:03 2007 -0600 When determining base points of arrows, always choose the closest intersection points (in terms of arclength) to the apex. commit a3029de1fd8eddec158958869cfdb8281f4a08ce Author: John Bowman Date: Sun Nov 25 22:47:55 2007 -0600 Use a separate flag in indexedTransform to indicate GUI deletion, instead of zeroing out the transform. This produces clearer .asy output and allows deletion of objects to be undone, preserving the image transform, even after a deconstruct() (or by manual editing of the output code). Show asy diagnostics in console window. commit ae4301c408fa50d866a5c58a13254f63fa001e93 Author: John Bowman Date: Sun Nov 25 00:23:19 2007 -0600 Fix scrolling. commit d5a1e13305ec2ef5476f22ad68642ba95f779771 Author: John Bowman Date: Sun Nov 25 00:03:07 2007 -0600 Improve 3d tick default directions. commit 9e5878b08af4d44af61190cb5aa1b510721f3283 Author: John Bowman Date: Sat Nov 24 07:42:14 2007 -0600 Return empty secondary axis picture without warning. commit 8b6d1977cf10a5fb8f895d32ef1673aaffcb4ebb Author: John Bowman Date: Thu Nov 22 09:57:42 2007 -0600 Use unsigned long constant. commit 18fe2570cdb6e6d6faa7398e2d06665dfe5804c0 Author: John Bowman Date: Wed Nov 21 23:03:02 2007 -0600 Move existing releaseLock code, catching exceptions. commit c48aaeec7d7ef98ce4d9cffd750cb817bf9a59db Author: John Bowman Date: Wed Nov 21 18:56:01 2007 -0600 Add transform scale(real x, real y). Add marker dot(pen p=currentpen, filltype filltype=Fill). Add comma terminator. Fix dot(frame f, pair z, pen p=currentpen, filltype filltype=Fill). Update documentation. commit 80b0016f88662ea88a22e152c51a174ed7c68923 Author: John Bowman Date: Wed Nov 21 00:09:32 2007 -0600 Work around ghostscript limitations. commit c9114aaa6633625cd23259716b9c36258b338a9a Author: John Bowman Date: Tue Nov 20 23:42:11 2007 -0600 Ensure originalImage is always defined. commit b5ba12a2bb8b78cb5e0f70caea30d1487fada0f9 Author: John Bowman Date: Tue Nov 20 23:41:00 2007 -0600 Release lock before quitting to allow saving. commit f0f301ee37674d8df4d508139765b63387feec42 Author: Orest Shardt Date: Tue Nov 20 18:52:46 2007 -0600 Switch to selection mode after adding script item. commit a396ba6638109d04ab42594429185eff1705c9a9 Author: John Bowman Date: Tue Nov 20 11:26:25 2007 -0600 Re-enable local directory output check. commit 45066fe4d8bd4f398483a7e401fbade2fb88db92 Author: John Bowman Date: Tue Nov 20 00:00:56 2007 -0600 Fix output(s,update=true) and boutput(s,update=true). Fix segmentation faults for attempted operations on closed files. commit b31f66caad49ff668f0c22d523496e269d8e54c8 Author: Orest Shardt Date: Mon Nov 19 22:00:18 2007 -0600 Change zoom selection method to an OptionMenu commit c01836f9ec61bd0217d9d42649f6c916d9224242 Author: John Bowman Date: Mon Nov 19 21:34:47 2007 -0600 Escape ^. commit fbafcbe0c9cd0622107a25d10329fd3e354307c3 Author: Orest Shardt Date: Mon Nov 19 21:19:13 2007 -0600 Account for magnification during undo/redo of translations commit 192ab586ab9caa2a2d24f99ad98995213e0ef06e Author: John Bowman Date: Mon Nov 19 11:59:03 2007 -0600 Fix typo. commit 33aed5e78b70ef12e3d6a2d0a5c25fc41ab59c9f Author: John Bowman Date: Mon Nov 19 01:22:35 2007 -0600 Move xasy temporary directory deletion code into GUI. Avoid creating a second asy process if one already exists. Ignore ctrl-c interrupts from console. Move image file removal up one function level to avoid busy error under MSWindows. commit 2d1e6478e973e9e0bf2868cbcf8f25def7c16ed7 Author: John Bowman Date: Mon Nov 19 00:25:22 2007 -0600 Add Orest's latest fixes. commit 41fc3423e0284e049f3da096b7e71e87246114b1 Author: John Bowman Date: Sun Nov 18 20:29:19 2007 -0600 Add informational message about use of system gc version. commit 6ea171f7207998d6d24cfb82324cb40bad0aa0ce Author: John Bowman Date: Sun Nov 18 18:41:19 2007 -0600 Make configure use a system version of Boehm GC if recommended local version of gc isn't present. commit 5d98ffd60c7b8a57f7749cc51f7484a25f1d14f5 Author: John Bowman Date: Sun Nov 18 18:28:22 2007 -0600 Append generic configure instructions to INSTALL. commit 666d5a2a12a4c5f8097536a1f958d6e068e4bd40 Author: John Bowman Date: Sun Nov 18 11:02:49 2007 -0600 Put deconstructed files in a temporary directory (removed on exit). commit 47aaf8cba0f64678b56f08a408310dc66234b9eb Author: John Bowman Date: Sun Nov 18 09:54:43 2007 -0600 Move workaround for broken curses.h file to proper place. commit 748c5401c34ff4485c8f3f2133b03e79a9ae4808 Author: John Bowman Date: Sat Nov 17 23:59:59 2007 -0600 Fix secondary axis bugs. commit 0424ec5a5dceb6fc66d7b4ed0e110d32cfc4b51b Author: John Bowman Date: Sat Nov 17 18:03:34 2007 -0600 Fix ctrl-c. commit d19e7442ef512674980b4aa336ca07dfdf24624f Author: Orest Shardt Date: Sat Nov 17 12:47:31 2007 -0600 Provide a way to quickly close xasy from the command line. commit 66f3fc046aa9cdb7b7fd3e25bdbaed726ee30f8e Author: Orest Shardt Date: Sat Nov 17 12:24:42 2007 -0600 Fix bezier editor. Optimize undeletion of items from a script. commit e5a11867c05c469519bd1413ae7a95099ecaf2a0 Author: John Bowman Date: Sat Nov 17 00:12:28 2007 -0600 xasy scripts should put temporary files in current directory, just like asy. commit 994971d0a1ce209668104f8641bc3d88427c51b1 Author: John Bowman Date: Sat Nov 17 00:11:56 2007 -0600 Remove temporary image files. commit fd7bde8d9175b34d41eb26361b2148d5c6c00dc9 Author: John Bowman Date: Fri Nov 16 23:20:39 2007 -0600 Limit maximum number of command-line arguments to ghostscript; render in blocks. commit 24d7c2712f50789d7d76517eeaf056dee159d5ed Author: Orest Shardt Date: Wed Nov 14 22:10:57 2007 -0600 Improve handling of zoom slider. commit af154d06aa4d103cc2219480afcf9123c41e7468 Author: John Bowman Date: Wed Nov 14 21:25:31 2007 -0600 Move declarations. commit 4dd797153e256e8f9557fbfed0385d841f24d1cf Author: John Bowman Date: Wed Nov 14 18:52:35 2007 -0600 Remove unnecessary Tk_PhotoBlank call. commit 8b4fa52a9b8ba5b7ef079eaf12f866bb740d4440 Author: John Bowman Date: Wed Nov 14 00:53:42 2007 -0600 Add PIL_BACKGROUND and PIL_MAX_ALPHA_AREA environment variables for efficient alpha channel rendering. commit 49283a682e943ac7ede746d9afe8f51d58f6b4fa Author: John Bowman Date: Tue Nov 13 21:03:45 2007 -0600 Enable full alpha channel support only for objects of area < 10000 pixels, due to slow Tk alpha channel rendering. commit 07f0b56ae3b969af39abf5fee1c43d5abded1e58 Author: Orest Shardt Date: Tue Nov 13 12:48:04 2007 -0600 Prevent redraw of canvas when zoom handler is invoked but magnification is not changed. commit 23e83f68d846bc4548cd253a9e994c19196c8539 Author: John Bowman Date: Tue Nov 13 02:20:36 2007 -0600 A much better fix for PIL antialiasing and transparency that renders quickly. commit ca627126bd89f96989de930a3049cf89fed87fc0 Author: Orest Shardt Date: Mon Nov 12 18:57:08 2007 -0600 Fix rotation to take into consideration the current magnification commit c36784996337c369338e441633c4205345fa9b7e Author: Orest Shardt Date: Mon Nov 12 16:22:05 2007 -0600 Fix error in handling of magnification in scripts commit fb07c1c3e38daaff5997700abbbee199c160b2f1 Author: John Bowman Date: Mon Nov 12 15:50:58 2007 -0600 Use full precision constants. commit c444b66488de9511b74edbc4649173c984237e39 Author: Orest Shardt Date: Mon Nov 12 15:35:20 2007 -0600 Implement magnification option and zoom feature commit e7cf5e4432837cb3e16daf991a9f4a121f2f43de Author: John Bowman Date: Mon Nov 12 01:28:55 2007 -0600 Replace locale-dependent call to atof() with locale-independent lexical::cast(). commit edb09b23d5688abb9653ca1cf47fa866fd8d34f1 Author: John Bowman Date: Sun Nov 11 23:37:20 2007 -0600 Speed up GUI deconstruction. Make "png" the default value of xformat. commit f691c77aad9bd09ef9835c8f6871b600d29c6864 Author: Orest Shardt Date: Sun Nov 11 21:54:28 2007 -0600 Removed debugging information commit b8ee25d1d087cc339f194f3c685a3c524e770421 Author: John Bowman Date: Wed Nov 7 23:01:26 2007 -0600 Update intersectionspoints. commit 7ba2d08022f92e24275b4a19425bc44f923269d9 Author: John Bowman Date: Wed Nov 7 23:00:15 2007 -0600 Update documentation. commit 9583ff94f4abdbe20a9e57964875baad58b9fe41 Author: John Bowman Date: Wed Nov 7 22:35:19 2007 -0600 Fix bug in intersections. Add optional fuzz parameter to intersections and intersectionpoints. commit dc0ab50b96d1e8853fd81bcd150cf712c59d2352 Author: John Bowman Date: Wed Nov 7 22:03:14 2007 -0600 Add string[] split(string s, string delimiter). commit 4cfbb87b4627726d2c9cb82f0343e266015f7704 Author: John Bowman Date: Sun Nov 4 22:25:35 2007 -0600 Disable readline history when reading from a pipe. commit aabfeb99010b1b561e7c73cfa846b60d0b92d25d Author: John Bowman Date: Sun Nov 4 21:23:02 2007 -0600 Update discussion of MSWindows configuration variables. commit 1c56cdb459bdb211056748e4e3473b0a650ac4a9 Author: John Bowman Date: Sun Nov 4 21:13:34 2007 -0600 More windows installation fixes. commit 905cad8c932a8788a7611181d31ae042a0679a10 Author: John Bowman Date: Sun Nov 4 16:52:41 2007 -0600 Make interactive mode exit with a zero return code. commit c88c34591ffa6bc397987914885b8e5e20e7490f Author: John Bowman Date: Sun Nov 4 16:27:28 2007 -0600 Fix Windows uninstall. Remove hard-wired path. commit 97abc8fe2152ef82a5d807722d702e91891522cd Author: John Bowman Date: Sun Nov 4 10:48:27 2007 -0600 Add missing function. commit e92745417a027f1cdb46d165fb70fd2bad94788d Author: John Bowman Date: Sat Nov 3 16:50:29 2007 -0600 Add real[] abs(pair[]) and real[] abs(triple[]) functions. commit c4d2af3505ee392b9d0ad6871904dd93921a0102 Author: Orest Shardt Date: Sat Nov 3 12:24:00 2007 -0600 Revert change to example. commit 94876755d955c4dd32f37559c678f17e366c75bc Author: Orest Shardt Date: Sat Nov 3 12:05:23 2007 -0600 Prompt user before opening a file if current document was modified. commit 0e6b2b3e7f6f014a1f78bd176f815b87f4bd5c59 Author: John Bowman Date: Fri Nov 2 23:09:45 2007 -0600 Add windows installation fixes. commit 0d2e36675751c0a8db71e65f9e369cf55c8e3fd4 Author: John Bowman Date: Fri Nov 2 16:13:23 2007 -0600 Windows installation tweaks. commit 74e0d0cd5df704c7fd8ab03f349e562014246108 Author: John Bowman Date: Fri Nov 2 10:48:05 2007 -0600 Handle degenerate reference vectors. commit 0075ad14c3ab42375654663c4d657a233d39cf94 Author: John Bowman Date: Sun Oct 28 13:31:35 2007 -0600 Project all reference contributions in direction of maximum contribution, for numerical robustness. commit 72017f7c16e38929719fe4dcfaf87660b3925947 Author: John Bowman Date: Sun Oct 28 12:16:24 2007 -0600 Improve reference vector calculation. commit fb19b1223ae572d421e694d4241c6c65c985943a Author: John Bowman Date: Fri Oct 26 11:29:19 2007 -0600 Respect comments and double quotation marks in whitespace mode (just like cvs mode). commit e8cc7a2e8360cf3a51a579911760b836ea92fe6a Author: Andy Hammerlindl Date: Thu Oct 25 22:19:32 2007 -0600 Test for invalid defvals in rest parameters. commit e4162e78e3184911849a9d8187c430eedaa9670e Author: Andy Hammerlindl Date: Thu Oct 25 22:01:21 2007 -0600 Removed unused code. commit 9157206842acd8ede6c6290a098ed64561fcb0f1 Author: John Bowman Date: Mon Oct 22 10:38:21 2007 -0600 Re-enable automatic logarithmic axis coverage routine. commit 3a92d0fac132773d86f66f1213925b4aedef6d7e Author: John Bowman Date: Fri Oct 19 22:55:13 2007 -0600 Exit more gracefully under MSDOS when execvp fails. commit b5e41991c0a31687e8b750d0fdfff149e48044c2 Author: John Bowman Date: Fri Oct 19 21:34:04 2007 -0600 Implement firstcut and lastcut reliably in terms of a general cut(path p, path knife, int n) routine based on intersections. Increase the duplicate point detection fuzz. Automatically sort the array returned by intersections. commit f831060dd4cfef9b767dee05c3d5689937a2c116 Author: John Bowman Date: Thu Oct 18 15:03:38 2007 -0600 Add patch to avoid segmentation fault with gc-7.0 on out-of-memory error. commit f14d0b6e7448e8567e1c066f0eff7ef37835045e Author: John Bowman Date: Thu Oct 18 14:15:53 2007 -0600 Make history() return the entire stored interactive history. commit 6faa52d45246ff681560085b9d3f0bb42a1e2495 Author: Andy Hammerlindl Date: Wed Oct 17 20:04:02 2007 -0600 Fix adding of automatic semicolons to the history. commit 3ce0333e8749d984db50549f1cd2f54ee4a72d9a Author: Andy Hammerlindl Date: Wed Oct 17 19:59:11 2007 -0600 Fix default args for rest args. commit 8d273ded65db953c1f0830061e5fdea6f798959a Author: John Bowman Date: Tue Oct 16 22:05:12 2007 -0600 Add a routine history(int n=1) that returns the interactive history. Store auto-terminated lines in the interactive history. commit 3e82c2c50fa292781a2befc3c46afa35987409b9 Author: John Bowman Date: Mon Oct 15 09:42:00 2007 -0600 Try to use a smaller Step adjustment. commit a3451647eec45a5d2b4823663f8283cf1dbbaae2 Author: John Bowman Date: Mon Oct 15 00:12:30 2007 -0600 Fix Asymptote path for MSWindows. Make uninstall remove Xasy start menu shortcut. commit a186cc7f9dd113c2fabe9edd3c98cb16b3328a2b Author: John Bowman Date: Sun Oct 14 22:43:33 2007 -0600 Add Nullsoft installation script for MSWindows. commit 32db9170f83b5cf74589febea822cbc3310910e2 Author: John Bowman Date: Sun Oct 14 22:35:13 2007 -0600 Under MSWindows, look for asy files in installation path instead of in uninstall path. commit 6da69898626799d3bfad1e472665db3766418cb8 Author: John Bowman Date: Sun Oct 14 22:24:27 2007 -0600 Try to use at least two major ticks. commit c94d19a62f184771312678070421a6a0a13a9190 Author: John Bowman Date: Sun Oct 14 21:15:41 2007 -0600 Fix title(""). commit f1e3b46122846bb495c02d26c3d391b8c5c13681 Author: John Bowman Date: Thu Oct 11 12:22:12 2007 -0600 Increment version to 1.37svn. commit b87392a79cac3176f047387893845cb5c02179c7 Author: John Bowman Date: Thu Oct 11 11:31:34 2007 -0600 Fix bugs in tex(), postscript(), gsave(), and grestore() commands. commit 4a1e9077f30dd1017819d1d5e2ecd3488a3f7c7a Author: John Bowman Date: Thu Oct 11 03:15:48 2007 -0600 Increment version to 1.36svn. commit 2cc3a721455f91fdca5ae6042490c1e6aa0d941f Author: John Bowman Date: Thu Oct 11 02:21:31 2007 -0600 Fix numeric formatting of setdash arguments. commit 48cfbe4d7f99da1836d6fea1911ad3c8bf65d507 Author: John Bowman Date: Thu Oct 11 01:21:58 2007 -0600 Work around hang in intersect for nearly identical paths by adding some fuzz. commit 788117602481a0a89e5c159704bfef4e16e4a0ee Author: John Bowman Date: Thu Oct 11 00:44:58 2007 -0600 Increment version to 1.35svn. commit 03ef1f2dd0e9b79fc36772d4c2e860972f25e12d Author: John Bowman Date: Wed Oct 10 22:44:16 2007 -0600 Add Cygwin fixes. commit 31eefd4d3857b0fc9eeb34ee36dd362d6b0e5a6b Author: John Bowman Date: Wed Oct 10 15:17:31 2007 -0600 Update GUI documentation. commit 6275cee1287a0dfd35311d6276a519bc582a4495 Author: John Bowman Date: Wed Oct 10 10:59:03 2007 -0600 Make xasy a relative symbolic link. commit 7cd198607408c819e09bfa652ea2909f671dfe83 Author: John Bowman Date: Wed Oct 10 09:00:51 2007 -0600 Update xasy file name. commit f763966f44b977c17f78cc6a8b16a5187bd33d87 Author: John Bowman Date: Wed Oct 10 08:42:59 2007 -0600 Fix typo. commit fc3662f7c79eab71825c995fb96e15bdedb3b7de Author: John Bowman Date: Wed Oct 10 08:36:32 2007 -0600 Install xasy and associated files. commit ababea1854fe43a1d165a003b0a4251ea187357e Author: John Bowman Date: Tue Oct 9 22:12:51 2007 -0600 Update xasy location. commit 4f4ded526e6099b8b2408190591d4fd287d003cd Author: John Bowman Date: Tue Oct 9 22:00:32 2007 -0600 Remove obsolete reference to settings.deconstruct. commit 955c47c6d859c7a857147ce76d482fa53653281e Author: John Bowman Date: Tue Oct 9 21:43:53 2007 -0600 Replace opendot with filltype argument of UnFill to dot routines. commit 4884a568746d707dd424b3dfcf0b9c1e1344df25 Author: John Bowman Date: Tue Oct 9 15:51:51 2007 -0600 Remove intermediate eps files in inline pdf mode. commit 376a4be0b81b3fcea6a7a0d9c8ee07ec41c17eeb Author: John Bowman Date: Tue Oct 9 15:05:23 2007 -0600 Implement an improved, robust version of intersect. Implement intersectionpoints in terms of a new more efficient and robust intersections routine. commit 345de32960a08aef94f76e11bfc0239a172f421f Author: John Bowman Date: Tue Oct 9 15:01:41 2007 -0600 Add trailingzero tick format. commit 80d8ba197e620411729aec8e6ae6e2988508799d Author: John Bowman Date: Sun Oct 7 11:00:47 2007 -0600 Make 1.34-26 changes work with deconstruct. commit 5a47d0a9714054d19b8e774f0407e0f2eb220cc4 Author: John Bowman Date: Fri Oct 5 21:03:57 2007 -0600 Adjust defaultformat for axes to make tick labels unique. Add general trailingzero format string; update examples. commit 5db97dd5e0806f0550a03f36c6dca5403b92365c Author: John Bowman Date: Wed Oct 3 14:22:52 2007 -0600 Improve autoscaling of graphs for close minimum and maximum values. commit 0149f463202c63f414bd5f0144d0f1a7daebeb2c Author: John Bowman Date: Fri Sep 28 12:31:44 2007 -0600 Add example of opendot. commit 30bd682dde07cd1b3eb5b871c530e90ef53e214e Author: John Bowman Date: Fri Sep 28 12:19:18 2007 -0600 Add opendot routines. commit c899e161bc16fe731e9515aa4ba1929acaf14177 Author: Andy Hammerlindl Date: Mon Sep 24 21:11:00 2007 -0600 Changed global.back()-> to processData(). commit 4eaa1727e9a7e4e72fbffb36bf3618555da00c06 Author: Philippe Ivaldi Date: Mon Sep 24 11:20:27 2007 -0600 Defer hard coded commands and options to variables. commit b306d9c7ae185bf62931d835282e814c7c1204ef Author: John Bowman Date: Sun Sep 23 10:45:41 2007 -0600 Fix shipout bug. commit 9c0ad5c96e8c5cf06233b0e7d2432e214d10c2c8 Author: John Bowman Date: Fri Sep 21 10:17:43 2007 -0600 Remove obsolete -q option. commit ea214d26275c2038153b723368c82de1c5ca277a Author: John Bowman Date: Thu Sep 20 22:27:59 2007 -0600 Change default LaTeX font to package-dependent setting. commit 49a976c00b8eba6912cd07d08bbfa85f9932802e Author: John Bowman Date: Wed Sep 19 21:46:56 2007 -0600 Add modification of ncurses patch from mvid. commit 9a633a15cd6a196735c2dd70c42326e49158b145 Author: John Bowman Date: Tue Sep 18 00:10:58 2007 -0600 Avoid nesting capacity overflows in arctime. commit 98fbe3b5a82db6ac64b90b4c9011fe1628ebb1e2 Author: John Bowman Date: Sun Sep 16 20:57:35 2007 -0600 Add new magnification argument to shipout. commit c8254ef8e6546640a8bf2dbd8696572168bcc9d4 Author: John Bowman Date: Sun Sep 16 20:48:23 2007 -0600 Make reportWarning generate a warning message only. commit 4bf55cacf7cea227d314cc0addacb3b59a8ace9c Author: John Bowman Date: Sun Sep 16 20:42:53 2007 -0600 Ignore spurious final blank line when reading strings. commit 2b6f1ed2e728e3019b7d7fe51a2cc46f70a7a958 Author: John Bowman Date: Sun Sep 16 11:44:00 2007 -0600 Fix string csv reads. commit 1babff1085b49a6d234498d80024f13376a95f0b Author: John Bowman Date: Sat Sep 15 22:12:21 2007 -0600 Another comment fix for reading strings. commit 8c4b46cbe8576444eb9239b89322531169970281 Author: John Bowman Date: Sat Sep 15 02:42:12 2007 -0600 Fix example. commit 5f24bb57d0d77aa469d3dc322ec68a0f358df338 Author: John Bowman Date: Sat Sep 15 02:40:06 2007 -0600 Fix typo. commit 192b449209ca8a72ec1890ef029a448085354450 Author: John Bowman Date: Sat Sep 15 02:38:23 2007 -0600 Fix errors in documentation and FAQ. commit e51365a16cc03474c179cfe191008087cccd2b83 Author: John Bowman Date: Fri Sep 14 16:09:19 2007 -0600 Support comments when reading strings in cvs mode. Remove unused file. commit ab9eb1daf63ee6670390a3c937222870dfa32382 Author: John Bowman Date: Wed Sep 12 19:42:40 2007 -0600 Improve description of interativeWrite. commit 94a55d20dfde26954484b9da157f838c38ded005 Author: Andy Hammerlindl Date: Sat Sep 8 11:48:06 2007 -0600 Fixed syntax to allow expressions such as (x); Based on a patch by Orest Shardt. commit 2d320faddc0f743c7bc8bf26f309de70869a686f Author: Andy Hammerlindl Date: Wed Sep 5 16:53:51 2007 -0600 Added interactiveWrite option. commit 3b37adefe45a0fe16882cc5e21bc35f3997803e8 Author: John Bowman Date: Tue Sep 4 21:15:41 2007 -0600 Remove --enable-cplusplus option. Remove unused quiet option. commit 74cd6de443c34c6a37cce5d25f599890f04982e8 Author: Orest Shardt Date: Mon Sep 3 12:01:42 2007 -0600 Implement pen validation commit 3baf769670c61f611e2f6bdfd56755eaaf58bc5d Author: John Bowman Date: Sun Sep 2 23:36:10 2007 -0600 Make deconstruct close bboxout file. commit 3a91e4b10a34161daff8aa042e79c4d682f8d416 Author: John Bowman Date: Sun Sep 2 23:21:29 2007 -0600 Use indexedTransform constructor. commit 5fe7064890f65e40a5b19c25e43329d501fb994b Author: Orest Shardt Date: Sun Sep 2 21:01:09 2007 -0600 Make various bug fixes and improvements. commit 377a44d7fca914f6116cb0c6655f223876ce547b Author: Orest Shardt Date: Sun Sep 2 18:07:55 2007 -0600 Fix documentation request. commit 5911d1ee65db0187c4aa5ddb369175429e8a789d Author: Orest Shardt Date: Sun Sep 2 17:59:21 2007 -0600 Temporarily remove zoom control until feature is implemented. commit 75064e5ff4b5d22382b6ca82d71f48ba037ca8ab Author: Orest Shardt Date: Sun Sep 2 17:46:34 2007 -0600 Improved text in dialogs. Made the loading and saving of files specified on the command line consistent. commit 7e6381b9a659a56db2d9dabe1e2bc516ce0005bf Author: John Bowman Date: Sat Sep 1 22:34:02 2007 -0600 Standardize fillrule argument name. Add support for magnification. Remove unused code. commit f5a10edefe53c276e7fa1546f9e05c6f32c48d11 Author: Andy Hammerlindl Date: Fri Aug 31 20:16:17 2007 -0600 Fixed bug regarding permission lists of types. commit 9e8c5d63e7aba58dc7439fd272b3656d8b08e0e1 Author: Andy Hammerlindl Date: Fri Aug 31 20:15:41 2007 -0600 Corrected documentation. commit 343d697bc89fc2df9d5cce3bfe316918e52e0376 Author: Andy Hammerlindl Date: Fri Aug 31 20:15:16 2007 -0600 Made parameter name more descriptive. commit 0abbb7453f977e5e689a4363fca2d6bf2fb508d9 Author: John Bowman Date: Fri Aug 31 08:35:08 2007 -0600 Use unique keys. commit 08e24d5b904996f5a4d44906129423d024dab66e Author: John Bowman Date: Thu Aug 30 20:15:48 2007 -0600 Check for libcurses only if libncurses is not found. commit c2e2738b9148bbeb5ed91b041a149d06e33b75a2 Author: John Bowman Date: Wed Aug 29 13:56:57 2007 -0600 Use constructor for indexedTransform. commit 8a5bf5734476d80f7092185a5c49c06785fb1343 Author: John Bowman Date: Wed Aug 29 11:22:33 2007 -0600 Fix shipout when inXasyMode is true. commit 351668ee2daa92336da7ed7715a190a612576c2f Author: Orest Shardt Date: Wed Aug 29 09:15:31 2007 -0600 Fix logic for recognizing modified files. Correct the logic for querying user about exporting modified files. commit a264e87e1a9787f4d5b87a8b57bed3878852fd1a Author: John Bowman Date: Wed Aug 29 08:54:00 2007 -0600 Revert to gsave/grestore instead of clipsave/cliprestore due to pen caching assumptions. commit a626ac307bbfcb755732809dcec0cd38a5cf9c90 Author: John Bowman Date: Tue Aug 28 09:30:26 2007 -0600 Enclose tex clip within picture environment to avoid unwanted page breaks. commit 0aa8af84e3f16d0ee7c2cd0769c9a8f015083a75 Author: Orest Shardt Date: Mon Aug 27 15:48:38 2007 -0600 Prevent switching editing mode during incomplete drawing operation. Search for file with .asy extension if no .asy extension provided. commit 3a4df7dabf437b5d076402180c0f7db8ad78a2d8 Author: Philippe Ivaldi Date: Mon Aug 27 15:33:06 2007 -0600 markers.asy: compute golden mean in a static variable. commit 0387fb5da5f095d833108ddd14d0685ab18b9451 Author: Orest Shardt Date: Mon Aug 27 15:23:17 2007 -0600 Remove unneeded whitespace. commit 489f494bcea9bcfa324c9f2e32c852f1a307e5e9 Author: John Bowman Date: Mon Aug 27 11:56:33 2007 -0600 Rename patterns to currentpatterns. Remove preamble option from shipout for consistency with xasy. Make explicit shipouts with options work with xasy. commit cf6c8f2248e6ae21ea6a8ae826f9d0474d495387 Author: John Bowman Date: Mon Aug 27 10:33:40 2007 -0600 Rename xasy.py to xasy. commit b21e623118dd4113638aafe1e3f746a1f7436bbc Author: John Bowman Date: Mon Aug 27 10:24:23 2007 -0600 Update example. commit 5508f52a286ec4d49da60fd84d5c15490c3c26a3 Author: Philippe Ivaldi Date: Sun Aug 26 19:13:14 2007 -0600 marker.asy: uniformize marker sizes and notation. commit 516ff363207c9dd8d2cd5c478c27880b388379f3 Author: John Bowman Date: Sun Aug 26 15:40:25 2007 -0600 Explain how map is a special case of sequence. commit b08fb71bde104e3c1274a4b008f6fbda1713a6a5 Author: John Bowman Date: Sun Aug 26 13:28:09 2007 -0600 Fix documentation of map. commit 3e7ea0f51ddd4619c4cad9d6b5efb34dd68acac3 Author: John Bowman Date: Fri Aug 24 11:00:05 2007 -0600 Simplify logic. commit e704d1a6d00a5486093d2cca45c47d983246557f Author: John Bowman Date: Fri Aug 24 10:59:42 2007 -0600 Make asy -o /dir/ file.asy output to /dir/file.eps. commit f25c6597ee533083af25b199ad54f6c1b1493f86 Author: John Bowman Date: Thu Aug 16 08:23:05 2007 -0600 Add discussion of 3D generalization of Hobby's algorithm. commit 19b53099bb5583c7192e61a8d88e4913ea68b640 Author: John Bowman Date: Tue Aug 14 04:39:42 2007 -0600 Avoid evaluating function outside of [a,b] (due to finite numerical precision). commit c0abe1380e8aa2e9fa17037a88c00f39eb3c1a9a Author: John Bowman Date: Tue Aug 14 02:15:00 2007 -0600 Fix accent. commit dff77b74cee87bf917f14232b130accdc0a3d62c Author: John Bowman Date: Sat Aug 11 04:01:15 2007 -0600 Use \PackageWarning instead of \message. Update list of contributors. commit dc32ed7b66b6f1c588df49457e7e714164e1779f Author: Orest Shardt Date: Thu Aug 9 12:13:42 2007 -0600 Use askopenfilename() instead of askopenfile() Use asksaveasfilename() instead of asksaveasfile() commit ff037a273b0a8da0e30a31d6e3f6c0c5ef21b4f0 Author: Orest Shardt Date: Thu Aug 9 11:00:42 2007 -0600 Disabled tear-offs for improved crossplatform look and feel User is now asked about saving changes when closing a modified file commit c429589301537c5e49c95cf9c811cfff831bf766 Author: John Bowman Date: Thu Aug 9 02:59:28 2007 -0600 Remove old GUI transform support. commit 865d848b082faac6d4f00cdc0913d92615441c9c Author: John Bowman Date: Thu Aug 9 02:34:50 2007 -0600 Add -level option to specify PostScript level (default 3). Use more efficient clipsave/cliprestore commands with -level 3. Optimize printer stack use by pruning unneeded clipsave/cliprestore commands. Avoid nesting of clipsave/cliprestore commands when using UnFill. commit 8d07a22aa46ddf814cdaa633c448d2433d56436d Author: Orest Shardt Date: Tue Aug 7 11:26:04 2007 -0600 Changing the current pen's properties affects selected items commit 40048c0fe0b6bd391463ab84f3570638c9f4c107 Author: John Bowman Date: Tue Aug 7 03:24:10 2007 -0600 Compute pair^int by repeated multiplication, just like real^int. commit 06b5949d2cc85d70e3cfd0811cf705d8afcf8eba Author: Orest Shardt Date: Wed Aug 1 09:39:08 2007 -0600 Removed signals for xasy Switched from GUIop to xformStack in shipout() commit 5c7478245556a81d678b66e2ee49a180353112bf Author: Orest Shardt Date: Tue Jul 31 15:05:37 2007 -0600 Fixed bugs in undo/redo Allowed nested begin/end actionGroups in UndoRedoStack Added forceAddition option to drawOnCanvas Added exitXasyMode() to end of files Implemented undo/redo for single item in a script Implemented undo/redo for clearing of an item's transforms Implemented undo/redo for drawing and deletion of a drawn item Implemented undo/redo for modification of a drawn item commit 8f0fdd8dbb4443da7c31ae8e8c06af8b83774da3 Author: Orest Shardt Date: Mon Jul 30 15:09:11 2007 -0600 Added undo/redo for creation and editing of script items Added undo/redo for raising and lowering of items commit e663da444b6bc1a3f94c7db8277671921a7c8ccd Author: Orest Shardt Date: Mon Jul 30 12:12:29 2007 -0600 Updated headers Modified method for storing undo/redo information for translations Implemented undo/redo for addition and modification of labels commit 93322a02dd16526537f5eaecef606225f0de45df Author: John Bowman Date: Sun Jul 29 17:22:45 2007 -0600 Increment version to 1.34svn. commit 4d5a18c811ee847867902d4553290c4925c3ce5d Author: John Bowman Date: Sun Jul 29 10:25:12 2007 -0600 Fix interactive viewing. commit 2c5bf17ed0f4a2d805b84a946dcae789f78899af Author: John Bowman Date: Sun Jul 29 03:29:03 2007 -0600 Remove extraneous preprocessor definitions. commit a671404751ce001ef2ca619d7ae01d18dac048a1 Author: John Bowman Date: Sun Jul 29 02:36:43 2007 -0600 Add large file support. commit 9099bc38057450a5e1183e942d24ada30431d970 Author: John Bowman Date: Sat Jul 28 13:41:50 2007 -0600 Update list of contributors. commit f39eb8d3113030a3777abab069b17971651db7a8 Author: John Bowman Date: Sat Jul 28 09:53:06 2007 -0600 Open input files in input-only mode. commit e6c2ef521c795f58273d873dfad405ed7f78133e Author: John Bowman Date: Sat Jul 28 09:19:07 2007 -0600 Allow multiple invocations of labelpath. commit ca808b0649e3cff006e73fdae534097766f5848b Author: Orest Shardt Date: Fri Jul 27 14:57:14 2007 -0600 Handle case of script that produces no images. Remove keyboard bindings for main window when using script editor. commit 7c5db3faa9b555a50cd81755816bfe58ff96519d Author: Orest Shardt Date: Fri Jul 27 14:38:23 2007 -0600 Raising and lowering of script items preserves drawing order of all items in script commit ff64471302290d06a56d9e579e93d94a5c69be2e Author: Orest Shardt Date: Fri Jul 27 14:23:57 2007 -0600 Fixed handling of deleted items. commit 342434d25d682a7a8cad1bf139d2088e35ef3f76 Author: John Bowman Date: Fri Jul 27 14:05:08 2007 -0600 Work around old broken compilers. commit 44596544b2f62896a2d60a046e4eef1b96877ba5 Author: John Bowman Date: Fri Jul 27 13:13:41 2007 -0600 Fix conditional. commit 8a48b748d74dc52d5860f403414a0313251b1c9e Author: Orest Shardt Date: Fri Jul 27 11:45:34 2007 -0600 Improved handling of missing asymptote executable on windows commit fa8771204c3378f71da1fa2513cad7e15debfcdd Author: Orest Shardt Date: Fri Jul 27 10:37:56 2007 -0600 Error fixed commit 3f084166c5dea652fb4dccb97315d9134a7d2161 Author: Orest Shardt Date: Fri Jul 27 10:23:52 2007 -0600 Check registry to find asy installation on windows. Add browse button for asy path selection commit ccfe23837d0759e2e726103fffd05b26f147df68 Author: John Bowman Date: Fri Jul 27 10:02:28 2007 -0600 Restrict projection bounding box recursion to a depth of 16. Add teapot example. commit 2ae916421017adc0b6654c1a6b98e9ae42596b6d Author: Orest Shardt Date: Fri Jul 27 09:46:58 2007 -0600 Syntax fix commit 585d78bfbd3b3db5ce1bd630bc9e2e75ff3f4748 Author: John Bowman Date: Fri Jul 27 05:24:13 2007 -0600 Upgrade licence to GPL-3.0. commit 1086bf459bc045c664f277d7c8d52432f1c724af Author: John Bowman Date: Fri Jul 27 03:50:46 2007 -0600 Add complex version of quadraticroots. Add quartic solver. Improve accuracy of cubicroots in degenerate cases. commit f22f92962a269614ea7e166caba5fefb082aab8b Author: John Bowman Date: Fri Jul 27 01:26:24 2007 -0600 Make min and max return (0,0) for an empty picture. commit 049160b1567c4a50a7dfec4535a793bed456d349 Author: John Bowman Date: Fri Jul 27 01:07:31 2007 -0600 Add cast; standardize formatting. commit 1a2c4145835825f5133f9b08e1e1224b9ee57122 Author: John Bowman Date: Fri Jul 27 01:06:24 2007 -0600 Add pair sqrt(pair) function (principal branch). commit ed0d195c14e24f155b1bcf8bcfc8cf072ec7b91e Author: John Bowman Date: Fri Jul 27 01:05:35 2007 -0600 Fix picture scaling. commit 4b00fbe6270ba161ee1481b38e7ff1b63f19dcb8 Author: Andy Hammerlindl Date: Thu Jul 26 09:17:38 2007 -0600 Edited comments. commit ef2ce85c3258b5ef011574f6afa9044c30489fe7 Author: Orest Shardt Date: Wed Jul 25 14:41:31 2007 -0600 Removed unneeded message commit ef44082e820bea38a8f346342a07ad8fdd082d2b Author: Orest Shardt Date: Wed Jul 25 12:50:30 2007 -0600 Fixed rotation of multiple objects commit 8bdee6a20399fef2cb5adf638a096143faf9364f Author: Orest Shardt Date: Wed Jul 25 12:43:59 2007 -0600 Corrected divide-by-zero handling commit c56d3c762babdee25f974634f9d3a2a2094a6636 Author: Orest Shardt Date: Wed Jul 25 12:27:37 2007 -0600 Fixed button width commit 59352469e407a869f3b3525d41370d505704a8d1 Author: Orest Shardt Date: Wed Jul 25 11:11:13 2007 -0600 Fixes for Windows support commit a5de675808ae3b699fe0c1d2d5825942cabd0e8b Author: John Bowman Date: Wed Jul 25 03:28:31 2007 -0600 Remove deconstruct() and gui() in favour of settings.deconstruct. Rename deconstructpic to deconstruct; standardize arguments. commit b268da28048455fa93a62489ce17d496c5ec7161 Author: John Bowman Date: Wed Jul 25 03:07:20 2007 -0600 Revert 1.33-91; update documentation. commit 73af8f210b428dfab4763067ef5f5964894e9965 Author: Orest Shardt Date: Tue Jul 24 15:24:08 2007 -0600 catch unnecessary exception commit 93fde433d8f8716cdd5e3043ea0df51a4eb26309 Author: Orest Shardt Date: Tue Jul 24 14:53:55 2007 -0600 Implemented undo and redo for shifts and rotations commit cd3e162381ba234aad44fd60c093ec68314d303e Author: Orest Shardt Date: Tue Jul 24 11:59:29 2007 -0600 Added skeleton for undo/redo operations commit b22ac1ebe39f1eb4c171e389ed68efaf765186ac Author: Orest Shardt Date: Tue Jul 24 11:58:58 2007 -0600 Added accelerators for menu items commit fa6cd244ae11b082dadb513698dc97b981d350f8 Author: Orest Shardt Date: Tue Jul 24 09:37:47 2007 -0600 Removed unneeded code; fixed export command commit 6dc7ffd7b5f6e59fc67ac892663e743a37a16a4e Author: John Bowman Date: Tue Jul 24 08:40:27 2007 -0600 Turn off readline editing when reading from a pipe. commit bb3f9064985651c2244413744ef56cb2fc4615ee Author: John Bowman Date: Tue Jul 24 03:51:06 2007 -0600 List multiple cubic roots individually in all cases. commit 8e30d4bd07cccbab8615291d904bb43b390c1180 Author: Orest Shardt Date: Mon Jul 23 14:08:12 2007 -0600 Additional parts for implementation of new deconstruction method commit be4bd6e4e13e79793a7c0f1576855b919d013bcc Author: Orest Shardt Date: Mon Jul 23 14:07:03 2007 -0600 Implemented rotation of drawn and scripted items commit 394a24db69248fdd56bc1db737b8dd45b5bfaf23 Author: Orest Shardt Date: Mon Jul 23 14:06:28 2007 -0600 Better parsing for script items commit eed3dc18f4761f37e8a967db84ab0385f81865b5 Author: Orest Shardt Date: Mon Jul 23 14:05:38 2007 -0600 Implemented new, cross-platform image deconstruction method commit acfeb6d23f030cc4b9e6ec416bfaf9528a4d1eec Author: Orest Shardt Date: Mon Jul 23 14:03:34 2007 -0600 Added deconstructpic() for image deconstruction by GUI commit 23d4ce1589592d9b19d1638d471b83c835085b4e Author: Orest Shardt Date: Mon Jul 23 10:31:28 2007 -0600 Various improvements commit 196e50571ea05191713c52a9318ece8bb51b9c45 Author: Andy Hammerlindl Date: Mon Jul 23 10:23:31 2007 -0600 Removed commented out code. commit 4a96f66c911483b536677803ac7a1d24dd2b7a4a Author: John Bowman Date: Mon Jul 23 04:06:01 2007 -0600 Change order of tests. commit bc8702d081b5d08b5533edc18a6e411358ddc603 Author: John Bowman Date: Mon Jul 23 04:04:25 2007 -0600 Detect roots near zero in cubicroots. commit b28193efbfc40b05c5f07a9c82dc75144ae5ce24 Author: John Bowman Date: Sat Jul 21 06:19:10 2007 -0600 Add Radoslav's bbox and bbox3 code for surfaces. commit 99700051cef605c1a6620e6c397cc0492aed1eec Author: John Bowman Date: Thu Jul 19 16:30:26 2007 -0600 Avoid potential uninitialized warnings with -finline-limit=400. commit 9edb7ce84ff4ca2ec7552f617db32ada59fbe30e Author: Andy Hammerlindl Date: Thu Jul 19 15:13:18 2007 -0600 Removed erroneous GC_DECLARE_PTRFREE specifiers. commit d0d35f2c8d4d2f22a2086d988022a63175b2e6c6 Author: John Bowman Date: Thu Jul 19 03:09:39 2007 -0600 Fix cxx errors. commit 9aa0935babeafd92da4e63764be00aa365a9a99d Author: John Bowman Date: Thu Jul 19 02:51:23 2007 -0600 Workaround broken texi2dvi installations. commit 484ba07ac520d8b1add27cf6c96305ac7cca0e1c Author: John Bowman Date: Thu Jul 19 02:17:03 2007 -0600 Trap quotient(intMin,-1). commit 40d6c962a759685d21f8cd70f1001bd90c84cb9c Author: Andy Hammerlindl Date: Wed Jul 18 22:28:58 2007 -0600 Made the NOHASH venv interface compatible with the optimized hashtable venv. commit 37425660c088766be9625f55b69e4c67f8b1cffb Author: Andy Hammerlindl Date: Wed Jul 18 21:37:52 2007 -0600 Added match caching and hashtable presizing optimizations. commit 04b9e380275f804d9dfa8bc65e3c7d06ac4adf41 Author: Andy Hammerlindl Date: Wed Jul 18 21:35:20 2007 -0600 Removed old code. commit 7495bd931d9d30fe73d8dfaffda6b1f64cd3092b Author: John Bowman Date: Wed Jul 18 17:13:02 2007 -0600 Fix page numbering of slide presentations with -u stepping=true. commit c2a76d97a4cca4325b00ff7a2ebf62260d688828 Author: John Bowman Date: Wed Jul 18 17:01:58 2007 -0600 Minor optimization. commit 4035590d60193fc98b0bfec1db8ebfc9d22dd8e9 Author: John Bowman Date: Wed Jul 18 16:39:08 2007 -0600 Remove further duplicate config.h imports. commit b6d3558daf474eb865fb7240bc87fb1267c0cb41 Author: John Bowman Date: Wed Jul 18 16:21:52 2007 -0600 Eliminate multiple config.h includes. commit 67462e2c08283dea13ff469a440f97c5db90e0a4 Author: John Bowman Date: Wed Jul 18 15:52:01 2007 -0600 More cxx fixes. commit df5f4bfbfa7b2d55ba1b0028b8668cd1d198aa5f Author: John Bowman Date: Wed Jul 18 15:42:41 2007 -0600 Fix cxx warnings. commit 6bfe300676c319119e106e3db0b703eb42b2836b Author: John Bowman Date: Wed Jul 18 15:18:25 2007 -0600 Work around missing definitions of LONG_LONG_MAX, etc. commit 53f618d8d624d926fa81cfa99052940ec32e860e Author: John Bowman Date: Wed Jul 18 14:41:30 2007 -0600 Move climits to proper place. commit c6aa8fba639f14657b79508906eee0f5bc346f20 Author: Andy Hammerlindl Date: Wed Jul 18 14:04:29 2007 -0600 Removed unused OP token. commit f09110dbb915f38232bfa0ba49f4d1d7167c4fed Author: Andy Hammerlindl Date: Wed Jul 18 13:29:57 2007 -0600 Changed arrowsize typos in documentation. commit 02536038d7f6513ac143b7d5a78be273a22190e5 Author: John Bowman Date: Wed Jul 18 07:37:15 2007 -0600 Avoid conflict with definitions in types.h. commit 684c472b6dd0913327d0b3ca39841c83415d8d21 Author: John Bowman Date: Wed Jul 18 07:25:15 2007 -0600 Work around quad_t vs. long long conflict on 64 bit machines. commit 3221c225a505b699ec36c3c168007bb1b98d5150 Author: John Bowman Date: Wed Jul 18 06:50:47 2007 -0600 Use LONG_LONG_MAX instead of LLONG_MAX. Add instructions for working around problems with old broken compilers. commit c01737efeb4ef95ca23c2adf54f50198ecfc6350 Author: John Bowman Date: Wed Jul 18 06:21:48 2007 -0600 Further portability fixes. commit c9b909e1e3be56888d7dec5a89538c3f360b78fc Author: John Bowman Date: Wed Jul 18 06:14:24 2007 -0600 Portability fixes. commit b2ca155dcc5e6e279c666f47832e67db2c0b063b Author: John Bowman Date: Wed Jul 18 05:50:11 2007 -0600 Change integer type to Int, which is set default in common.h to long long (typically a 64 bit integer). Add support for reading and writing 64 bit integers in binary and XDR modes. commit fe42bb6368110b595cf3de0f3ff3dc8005d21061 Author: John Bowman Date: Wed Jul 18 05:09:44 2007 -0600 Don't call locateFile with an empty file name. commit cc9594c8d01aded6aed8bb2fa408ce51ed1d9595 Author: John Bowman Date: Wed Jul 18 04:47:45 2007 -0600 Fix code for Bezier example. commit 4ab42cfa3da32e91ea28c6565445eabc9528618c Author: Philippe Ivaldi Date: Tue Jul 17 15:18:50 2007 -0600 grid3.asy: bug fix with perspective projection. commit f52e82d497ee1fde912586a887d48f9a810e03b2 Author: Orest Shardt Date: Mon Jul 16 09:35:44 2007 -0600 Fixed itemEdit index computation commit cd9388368834c6fccb78fb518df21932b4385410 Author: John Bowman Date: Fri Jul 13 17:50:11 2007 -0600 Change search path order: directories specified by the dir configuration variable are now examined before the directory .asy in the user's home directory. Ignore user configuration files during installation. commit 9f5593d688f356e2d7b53b1b4558b340ef39ff3d Author: Philippe Ivaldi Date: Fri Jul 13 09:03:59 2007 -0600 Bug fix in lasy-tags routine. commit ab212166f4effcd1a052b9e3f1efd1742a229b40 Author: Philippe Ivaldi Date: Wed Jul 11 12:30:03 2007 -0600 Defer the copy of LaTeX-mode-map to lasy-mode-map after all personal configurations was loaded. commit d81fee990b21f1f1ebe96bfb532ea00f66afe67e Author: Orest Shardt Date: Wed Jul 11 12:07:48 2007 -0600 Fixed verification of asy pipe creationy commit 20fa659d51a9290e117c7887a0d7a99125f4a59f Author: Philippe Ivaldi Date: Wed Jul 11 08:25:31 2007 -0600 Provide real syntax highlighting support with two-mode-mode for lasy-mode commit e12aeddf054965eaa9e2756cdbcc5c1a773dd2d8 Author: Orest Shardt Date: Mon Jul 9 15:42:28 2007 -0600 Implemented pen parsing for label commands commit 315431b2180215d1910c6a88d53f1a62bcc2efcb Author: Orest Shardt Date: Mon Jul 9 11:55:18 2007 -0600 Implemented raising and lowering of items commit d119a013aeb71c19731a508c5e236d946023956e Author: Orest Shardt Date: Mon Jul 9 09:54:01 2007 -0600 Remove unneeded module commit a215f07bc66eb0456b7d25b9cb9297ea1cfacb61 Author: Orest Shardt Date: Mon Jul 9 09:31:46 2007 -0600 Fix interrupted system call error commit be592ced5c326c5c99f7189c7ffc0d53a23b5b3d Author: John Bowman Date: Mon Jul 9 01:29:17 2007 -0600 Fix texstream destructor so that texput files are removed. commit 49d64b85ad9aded9a7f28ca48a2c57759884ac8b Author: John Bowman Date: Mon Jul 9 00:51:17 2007 -0600 Fix memory allocation incompatibility in workaround for old, broken readline libraries. commit e58ad2c2fd23da91fac3b74f5164808a198e11ab Author: Orest Shardt Date: Sun Jul 8 16:31:16 2007 -0600 Fixed horizontal and vertical motion. commit 08b2d63738cafda319c8a84811c3adf28cba9e5c Author: John Bowman Date: Sun Jul 8 16:02:53 2007 -0600 Add rainbow example. commit b97aad94f3a1ed3e8999c1446d0d2b857eef6ae9 Author: John Bowman Date: Sun Jul 8 13:30:11 2007 -0600 Standardize argument names. commit 6388bfe15c7fe4f40a7a4db3c5aa3ab26a6bad0a Author: John Bowman Date: Sun Jul 8 13:28:58 2007 -0600 Make framepoint (and truepoint) work even when an exact picture size estimate is unavailable. Add boolean argument to deferred drawing routines to allow optimization in cases where an exact picture size estimate is available. commit 1b843fa5045e0b9f58587e4a909444d8635e8875 Author: John Bowman Date: Sun Jul 8 10:22:17 2007 -0600 Allow writing to file specified with -o /dir/file.eps again. commit 98718bd22185b3e9775d9ddca9e63e41dbc6039d Author: John Bowman Date: Sat Jul 7 11:09:58 2007 -0600 Don't reset options after reading configuration file. commit a363cb5945ab03c6ec1abbb5612adf3d32e84939 Author: Orest Shardt Date: Fri Jul 6 21:38:51 2007 -0600 Improved selection mechanism commit b22eabeb71ea04c83cf2fae16015fc1e64d4dbd8 Author: Orest Shardt Date: Fri Jul 6 20:40:09 2007 -0600 Shipouts inside a script no longer interfere with the rest of the document commit 24b4733a6668551fce6c5fc5ea1876bee99b4a2b Author: Orest Shardt Date: Fri Jul 6 18:23:04 2007 -0600 Rename menu entries. commit 2ba6de8350fe44a3440d743c7cf9d752701fd42a Author: Orest Shardt Date: Fri Jul 6 11:10:24 2007 -0600 All labels now deconstructed. Dialogs improved. Fixed duplicate image reception. commit 4e356218f9024fa295da285f3284cf6618f840c3 Author: Orest Shardt Date: Thu Jul 5 15:59:40 2007 -0600 Various improvements commit 4c16dfe7042d9213c66d5fd76bb5a39567c38b68 Author: Orest Shardt Date: Thu Jul 5 15:58:43 2007 -0600 Implemented validation for asy path commit d252319b12998c08f414dc87290ff7b86243db93 Author: Philippe Ivaldi Date: Thu Jul 5 08:36:39 2007 -0600 Minor edit. commit 31f2ac1f97ad807bb7b7bcdea8104bc51feaf757 Author: Philippe Ivaldi Date: Thu Jul 5 07:51:32 2007 -0600 asydef environment content routine uses region instead regexp matcher. Cleaning code. commit cc49a3d40add05bfeca684a75594218fb319f205 Author: John Bowman Date: Wed Jul 4 21:47:39 2007 -0600 Add configuration file loading diagostic. commit 4c9f54802278b6c6e346f69ad384973ed527c979 Author: Orest Shardt Date: Wed Jul 4 18:59:22 2007 -0600 Improved handling of default pen commit ddc78730447e8f34399fc33b0d69282656bd396f Author: Orest Shardt Date: Wed Jul 4 15:49:27 2007 -0600 Fixed docstring commit b8509259097fd3d187a74b0ad41afa5ccd291d1f Author: Orest Shardt Date: Wed Jul 4 15:48:42 2007 -0600 Implemented storage and retrieval of user preferences commit b625d6c5eb5553c9d422c0cc65a280e447249afd Author: Philippe Ivaldi Date: Wed Jul 4 15:36:24 2007 -0600 Write temporary file with region instead of regexp matcher to avoid Stack overflow when compiling a long file within lasy-mode. commit 88ee7632e70b6417a6da160f12266bc6344fa62b Author: John Bowman Date: Wed Jul 4 06:44:17 2007 -0600 Remove completed item. commit db4efd57c4a00f3d4a75cd34ccec83fe44e50115 Author: Orest Shardt Date: Tue Jul 3 16:02:32 2007 -0600 Selecting an item clears the highlight box commit b69d4d409b31f9a84f769c976799764d88bae816 Author: Orest Shardt Date: Tue Jul 3 16:00:01 2007 -0600 Improved handling of already-transformed shapes commit e0da8a2bfdbcaa619973c77df9e3cde2b40f592e Author: Orest Shardt Date: Tue Jul 3 15:25:22 2007 -0600 Fixed incorrect entry in xasyColorPicker commit 30e27ea65ca173679f1e05684bde707134e53f2a Author: Orest Shardt Date: Tue Jul 3 15:21:36 2007 -0600 Improved bezier editing and integration with xasyMainWin commit da060b79e4da279c7daa9d9e8847c344677ccc4e Author: Orest Shardt Date: Tue Jul 3 14:39:42 2007 -0600 Added ability to graphically edit the nodes and control points of a bezier curve commit d6b2e473af81f366e95aa6009f782468c61e18be Author: Orest Shardt Date: Tue Jul 3 14:38:15 2007 -0600 Faster computation of an upper bound for the bezier width commit 2cc213ba2b5e92343acf2a221c029ecae8c53032 Author: John Bowman Date: Tue Jul 3 10:25:49 2007 -0600 Fix --enable-gc-full-debug. commit 795688843fc5d97c3437703614729730823b072f Author: John Bowman Date: Tue Jul 3 10:13:53 2007 -0600 Update to gc-7.0. commit 4efb99a8788ce81891fbba42c073fd4a4099ab82 Author: John Bowman Date: Tue Jul 3 10:06:04 2007 -0600 Add reference to Java-style array iteration. commit d47bfa5fa7c4d1fa08fc196c2be964a5598c6359 Author: John Bowman Date: Tue Jul 3 09:56:07 2007 -0600 Minor edits. commit 85ba69f4073c0cefdee314140060c00737c2c1e2 Author: John Bowman Date: Tue Jul 3 02:24:02 2007 -0600 Minor simplification. commit 65efdbd70eea2c161314e1aa02c3defd83b52b44 Author: Andy Hammerlindl Date: Mon Jul 2 18:32:57 2007 -0600 Added brief comment on extended for loops. commit b0c6f948c5fd6e86731ff30ed93d44bbc1544964 Author: John Bowman Date: Mon Jul 2 17:27:53 2007 -0600 Minor solve optimizations. commit 969a375d079222a94c255fb671d06b73da5cd4f7 Author: John Bowman Date: Mon Jul 2 12:14:51 2007 -0600 Fix memory leak in matrix multiply. commit b985420945a305dd23b762001212a2d8b6510dec Author: Andy Hammerlindl Date: Mon Jul 2 07:11:48 2007 -0600 Simplify extended for loop syntax. commit 47b56663f6d6c385be48df9315af508ba2ef7061 Author: John Bowman Date: Sun Jul 1 23:57:51 2007 -0600 Update to gv-3.6.3. commit 74c83940069561695b0d37f57e963fc689af5297 Author: John Bowman Date: Sat Jun 30 01:11:04 2007 -0600 More garbage collection improvements. commit 77c7be3d5cf9946f4980895261264a8581c55201 Author: Orest Shardt Date: Fri Jun 29 15:37:09 2007 -0600 Fixed syntax commit 32447a8674d2ee71f2bbb8425abbf71f2a31a59a Author: Orest Shardt Date: Fri Jun 29 15:30:29 2007 -0600 Checkin the code for the new GUI that is under development. commit 949ac77506fd75762ff8140f13a84be0e4cbec2c Author: Orest Shardt Date: Fri Jun 29 15:29:21 2007 -0600 Improved the xformStack implementation commit 5a0555f8b830f8cb1ca6286f00e333fc958beccb Author: John Bowman Date: Fri Jun 29 12:45:00 2007 -0600 Fix segmentation fault in complement. commit 6e680f0fbdb18f0982f69a37d8bd8c4329268801 Author: John Bowman Date: Fri Jun 29 02:00:20 2007 -0600 Increment version to 1.33svn. commit a6c037374d3727f1edc772235c47edafe892d3ac Author: John Bowman Date: Fri Jun 29 00:42:03 2007 -0600 More garbage collection tweaks. commit 637178c4f88c3bb2c7768043978af52bb5e5bad3 Author: John Bowman Date: Fri Jun 29 00:23:03 2007 -0600 Fix dependency. commit 6e795c1214befc7d2dfe4135ad9455a81e77c392 Author: John Bowman Date: Fri Jun 29 00:04:58 2007 -0600 Fix make install-all. commit df0fbfe97c5f78c301958e0c1bf6baf3731bafc5 Author: John Bowman Date: Thu Jun 28 23:15:34 2007 -0600 Declare drawverbatim to be atomic. commit 793d631c85af140f16fe907ae87c141d8cf0e351 Author: John Bowman Date: Thu Jun 28 17:20:22 2007 -0600 Fix bug in subpath. commit 0a3a730ae4c6bc87066fa453442c4a1c22eec1e0 Author: John Bowman Date: Thu Jun 28 12:13:02 2007 -0600 Allow cd() and cd("") even if globalwrite is false. Don't write cd path twice in interactive mode. Update diagnostics and documentation. commit 7184ae69bfa3e5848ef1c038105647ce538445cc Author: John Bowman Date: Wed Jun 27 12:09:17 2007 -0600 Fix GC debugging. commit 2c73d879f45bab5cdb1b9fdea0a86b04c5820461 Author: John Bowman Date: Wed Jun 27 11:22:17 2007 -0600 More garbage collection tweaks/leak fixes. commit c5ef7778a8995e21ea5465b4c21bae3d9fffd44e Author: John Bowman Date: Wed Jun 27 02:19:14 2007 -0600 Increment version to 1.32svn. commit 45724947378bcc555730acd7feea73739ef10174 Author: John Bowman Date: Wed Jun 27 00:47:19 2007 -0600 Fix segmentation fault in options processing. commit 5ab07e3d6e08376814a8d8379bca4f4629185c47 Author: John Bowman Date: Wed Jun 27 00:31:52 2007 -0600 Reinstate gc check. commit a9e498e514d7e5e215066a46856e27e8ea7340fd Author: John Bowman Date: Wed Jun 27 00:28:06 2007 -0600 Avoid makefile loops. commit 919890ae6a354669dcb69cc10d38db4965af6ec3 Author: John Bowman Date: Tue Jun 26 23:57:15 2007 -0600 Fix g++ warning. commit efd1d7983cfe16c00edac28321c2187406382f21 Author: John Bowman Date: Tue Jun 26 15:35:03 2007 -0600 Fix cxx warnings. commit 7f2ba53927bfce875c1ed0978eb53ef11de3037f Author: John Bowman Date: Tue Jun 26 15:20:11 2007 -0600 Fix nullpath3 min/max bugs. commit f4bac25045a05b4e8550aa65c8e772128fc1ddfa Author: John Bowman Date: Tue Jun 26 15:17:14 2007 -0600 Fix nullpath max/min bugs. commit b65d874d3d71b488af98e919cd5e5b5e3e79b6c7 Author: John Bowman Date: Tue Jun 26 14:49:05 2007 -0600 Minor path optimizations. commit 9c7a14e42f9187cdd8dc6a221503bf4fdf8e0002 Author: John Bowman Date: Tue Jun 26 14:18:05 2007 -0600 Further garbage collection improvements: move pointers out of pen class. Add bool ==(path,path) operator. Move defaultpen into global; changes to defaultpen in config.asy will no longer be remembered (use the autoimport mechanism instead). Make the identity transform a constant. commit 587d7b6d67c5df5f9a5e2571d36fd55e97bde981 Author: John Bowman Date: Mon Jun 25 17:20:00 2007 -0600 Avoid using a pointer in path class so that it can be allocated atomically by the garbage collector; this dramatically reduces memory usage. commit 70618a0a6877c1408315d47e22d0ee78295c047a Author: John Bowman Date: Mon Jun 25 16:57:22 2007 -0600 Fixed typo. commit 604854663ab4e8277281b836a8935712d7edc95d Author: John Bowman Date: Mon Jun 25 16:41:37 2007 -0600 Fix runaway asy process that occurs when tex pipe cannnot start tex engine. commit 42aeb1f1f09ed1caf2e10e581c84e7bd3d399c94 Author: John Bowman Date: Mon Jun 25 13:41:06 2007 -0600 Fix time without HAVE_STRFTIME. commit f802e0ec54590b9857d87a4d50fb9b34cfe1c446 Author: John Bowman Date: Mon Jun 25 13:39:30 2007 -0600 Fix default time and opacity arguments. commit b10fad39a2e46ff83dc8a3373d71dd907f208a9a Author: John Bowman Date: Mon Jun 25 11:21:36 2007 -0600 Fix minor typos. commit f9330564f1f442e87fe94ee4910847a4a40aceab Author: Andy Hammerlindl Date: Mon Jun 25 09:49:15 2007 -0600 Added Java-style abbreviation for iterating over arrays. Arrays of functions still not fully supported. commit 6f0502df0e18f330fb9945ba3df1aa0261b4b2e3 Author: John Bowman Date: Mon Jun 25 01:46:20 2007 -0600 Further garbage collection tweaks. commit 6fa70cec93fbbf3a86cef64120cbad8646e8f491 Author: John Bowman Date: Mon Jun 25 01:37:20 2007 -0600 Remove virtual destructor introduced in 1.31-44 due to performance penalty. commit 141515a3a661b9abc373344dc90e6f49745440a5 Author: John Bowman Date: Mon Jun 25 01:28:48 2007 -0600 Simplify arrayDeleteHelper, removing unused variable. commit a4a8a7d09534ce8a1cf0fc829047efb74dd5776c Author: John Bowman Date: Mon Jun 25 01:16:49 2007 -0600 Fix --disable-gc. commit 0794504fcf6bfbf5fe96465b9f199b1ad3c82960 Author: John Bowman Date: Mon Jun 25 01:05:39 2007 -0600 Fix warning messages. commit 9ccfc2613c2a1ede2102c83456d13a0214c3e2fe Author: John Bowman Date: Mon Jun 25 00:18:53 2007 -0600 Add header for isatty. commit 7d1c381346c387f9bf9adffecb2411cf9746a653 Author: John Bowman Date: Sun Jun 24 22:19:44 2007 -0600 Revert last commit. commit 22cee29708a566d13fb2baac91f3e3926aa14483 Author: John Bowman Date: Sun Jun 24 22:16:40 2007 -0600 Improve tex diagnostics. commit 816b1fbfe98cbd4210802f063209681a462e10b8 Author: John Bowman Date: Sun Jun 24 21:24:46 2007 -0600 Leave deletion of string last to the garbage collector. Omit spurious call to background(); commit 4f56d5aa58c769e422f48bdcdb651d5a36c99281 Author: John Bowman Date: Sun Jun 24 13:43:20 2007 -0600 Avoid warning messages with -d. commit fcf281b7e249166b8401d8a90ab87be4eea5826a Author: John Bowman Date: Sun Jun 24 13:36:33 2007 -0600 Fix GC preprocessor directives. commit 843c7bba85a7c2a6ad77607547a7e49a3295faaf Author: John Bowman Date: Sun Jun 24 01:55:10 2007 -0600 Further garbage collection tweaks; reinstate no_GCwarn. commit e4de07e434fd3b02c37b464e9851d00bdeda5098 Author: John Bowman Date: Sun Jun 24 01:03:20 2007 -0600 Fix dependencies. commit 29cddf4623d842eb65639d81b06d778cf78444c4 Author: John Bowman Date: Sun Jun 24 00:43:45 2007 -0600 Don't link with libgccpp.a to increase speed, now that garbage collection has been carefully addressed. commit d207452495d83bd9bb36df2c43d28a2b745b6c51 Author: John Bowman Date: Sun Jun 24 00:26:18 2007 -0600 Support ./configure --disable-gc again. commit 24332ff82a2e628a3bfee9d440e5ec3b926393da Author: John Bowman Date: Sun Jun 24 00:08:47 2007 -0600 Re-enable GC_gcollect under MacOS. Update to gc-7.0alpha9 since this yields faster execution times. Change configure --enable-gc=VERSION so that VERSION now must include the "gc" prefix. Remove genv from gc. commit 185554bd03f47f93586410d0a7904f9b12a6358e Author: John Bowman Date: Sat Jun 23 23:03:28 2007 -0600 Move ShipoutNumber into globalData. commit 473ba88ae7fea8b0736e29b506db442937a0cc5e Author: John Bowman Date: Sat Jun 23 16:45:58 2007 -0600 Use separate global variables for each process. commit 513822dceef7052ca9efe81e587821896925914e Author: John Bowman Date: Sat Jun 23 12:42:05 2007 -0600 Deconstruct files on termination. Improve support for garbage collection debugging. commit d8b0ff7f98543fbb573a44a1442931e2964fe782 Author: John Bowman Date: Sat Jun 23 00:58:28 2007 -0600 Close any open files automatically at the end of each asy process (without relying on a finalizer). commit e0c2e7f923b320a04a036527ce675bd885aceb78 Author: John Bowman Date: Fri Jun 22 16:58:19 2007 -0600 Fix segmentation fault introduced in 1.31-23. commit e28133f38f295fc0fde922bb331b2392b7731e83 Author: John Bowman Date: Fri Jun 22 01:23:46 2007 -0600 Improve garbage collection by using GC_DECLARE_PTRFREE statements; use vectors instead of deques everywhere. Change nullPos() to nullPos. commit 9dd6708f1844ca303278016ff1936a1875ac97e7 Author: John Bowman Date: Thu Jun 21 23:41:19 2007 -0600 Document how arbitrary files can be imported in the configuration file. commit 52b24d47a94c2a1e7ad751ae95d7961c9a891fc7 Author: John Bowman Date: Thu Jun 21 23:08:18 2007 -0600 Improve LaTeX diagnostics. commit dcbed2c557ecc629d6e9f84a61358f4c36ee0f35 Author: John Bowman Date: Wed Jun 20 23:14:46 2007 -0600 Remove unused variable. commit 0e26979cc46959684fe2f39527a5ef9883a217a0 Author: John Bowman Date: Wed Jun 20 17:52:58 2007 -0600 Use GC_malloc_ignore_off_page to fix major memory leak in garbage collection of STL containers. Fix minor memory leaks. Make em an errorstream rather than a pointer to one. commit 417f2582667c1d8851e8bcb86aa19ea6b51c62c7 Author: Orest Shardt Date: Wed Jun 20 17:25:31 2007 -0600 Added a new option to enable interactive mode on non-tty input streams. Made the signal option only affect the sending of signals without the side-effect of controlling interactive mode. commit 18b1cd9a00b7080ecea53589b3336ae9d4201b8a Author: Orest Shardt Date: Tue Jun 19 09:55:10 2007 -0600 Modified signal mechanism to send signals for each shipout and at end of each operation. Modified handling of items deleted by GUI: bbox scaled by 0, file deleted, and signal sent. commit c7163f9d5ed3bcf1eeb017f7e5112c38450bcb78 Author: John Bowman Date: Tue Jun 19 09:43:25 2007 -0600 Resolve purge ambiguity. commit dc2b4a56ad79e263e097e5cdeed3e7e07f53b490 Author: Philippe Ivaldi Date: Tue Jun 19 03:44:43 2007 -0600 Fix the filling path according to the margin in the routine markangle. commit a0408c585ec05a353ca2e15066781663033d7ec5 Author: John Bowman Date: Mon Jun 18 22:27:00 2007 -0600 Make the delete virtual member of arrays with no arguments delete all elements of the array (not called clear to avoid the need for adding yet another type-dependent virtual function). commit 4f0e48f95d301a5630af28c16ec925e0c3cc1c06 Author: Philippe Ivaldi Date: Mon Jun 18 16:44:27 2007 -0600 fix typo. commit 5cb4b64e129d881818262c767afff7d45e01947d Author: Philippe Ivaldi Date: Mon Jun 18 16:41:03 2007 -0600 Add option filltype to markangle. commit 89f331e05e66b120fd670442900884efd354073f Author: John Bowman Date: Mon Jun 18 16:01:22 2007 -0600 Handle exceptions in doUnrestirctedList. commit 7f37372c405f4fd80361bad001ef02f37e3b842c Author: John Bowman Date: Mon Jun 18 15:45:57 2007 -0600 Declare shipout before importing plain_xasy. commit 5690b60c62de62d98f6e3c1e0482334e1d12bcfd Author: John Bowman Date: Mon Jun 18 12:18:22 2007 -0600 Change the return type of the array virtual member delete to void. Allow A.delete(0,A.length-1) on empty arrays. commit 65c979a50262609e5fca031dc4cdd6c14b3cf285 Author: John Bowman Date: Mon Jun 18 11:59:33 2007 -0600 Make A.initialized(int n) return false when n is out of bounds, without any warning message. Use A.delete(0,A.length-1) to clear arrays in base files, to help the garbage collector. Add options -compact and -divisor to give the user more control over garbage collection. Implement a purge() function that forces a garbage collection. commit 25c637e4cb5d99d7dcbd8ab3288a51ad98c9aaf4 Author: Orest Shardt Date: Mon Jun 18 11:10:53 2007 -0600 Updated to use Python's subprocess module. commit 146fc1cd81244154daecda352cc895a2011ae3ac Author: John Bowman Date: Sun Jun 17 22:37:33 2007 -0600 Implement better workaround for uninitialized 'this.130' gcc-4.1.2 warning message (cf. 1.22-56). commit 79b2f5a07fd457182ad22f21b40e25e2224f8aa8 Author: John Bowman Date: Thu Jun 14 17:47:22 2007 -0600 Fix typo. commit 3512f0d737398b3ce742ec72d71208f986a54448 Author: John Bowman Date: Thu Jun 14 17:39:46 2007 -0600 Add pen[][] interpolate(real[][] f, pen[] palette) routine for use with latticeshade. Rename palette argument range to bounds to avoid confusion. Use an implicit bounds constructor. commit 2f7b23fa999ea2fb39cc1ca60f0aca67fdc77a7d Author: Orest Shardt Date: Thu Jun 14 15:05:19 2007 -0600 Changed transform push(transform); to void push(transform); to remove output when called in interactive mode. commit 8dcaa58177fff6dd258a74c25408e739388f7aa0 Author: John Bowman Date: Thu Jun 14 14:19:13 2007 -0600 Resolve ambiguity. commit ef75012b02a751b346e56d8a28e46a6160e77b2e Author: John Bowman Date: Thu Jun 14 13:16:25 2007 -0600 Don't call GC_collect under MacOS X, as this can cause bus errors and it doesn't seem to be necessary anyway on this platform. commit 27f248929ad55ecb5d2889d2ab67164605c1bd0b Author: John Bowman Date: Thu Jun 14 11:32:20 2007 -0600 Remove unused line. Add reference. commit c9fca9768ad6b8e2b59870cb0a58e3c49c9af15c Author: Andy Hammerlindl Date: Wed Jun 13 19:47:16 2007 -0600 Minor changes to comments. commit 4e70e1300642aa779d3fe45da0d55e14f13231aa Author: Andy Hammerlindl Date: Wed Jun 13 15:57:37 2007 -0600 Fixed addOps to add fields when possible. commit f54e2aebafa9d46e05e02051c1a3e1885caf7b10 Author: Philippe Ivaldi Date: Wed Jun 13 03:10:21 2007 -0600 Suppress useless code. commit 66c61efa8f470b0663ccba532266ecddaf5c7d84 Author: John Bowman Date: Wed Jun 13 01:42:21 2007 -0600 Increment version to 1.31svn. commit afa57fd86437f39163b3f6e4013ee1e342faafaf Author: John Bowman Date: Tue Jun 12 23:30:11 2007 -0600 Add copy argument to allow one to disable data buffering. commit 6857471c33699c8bac355f7dac013adbdb161692 Author: John Bowman Date: Tue Jun 12 22:42:44 2007 -0600 Add segment routine. Optimize conditional graphs. Add modified sphere animation, courtesy of Olivier Guibe and Philippe Ivaldi. commit bef55d64cd1ac2cd8e853db70915438d6ce7ad93 Author: John Bowman Date: Tue Jun 12 16:56:48 2007 -0600 Remove unused filename. commit 6f932d116ca4c4b8d03866e24e5accf6bfeda7e3 Author: John Bowman Date: Tue Jun 12 16:50:45 2007 -0600 Fix dependency. commit 69b77ebd49abaef1873eee4a7e37db180e0fdb07 Author: John Bowman Date: Tue Jun 12 16:25:57 2007 -0600 Make the implicit initializer for file variables null. commit 9d0fc6bf18efe32d2c6831b964e8af52e61a6127 Author: John Bowman Date: Tue Jun 12 15:57:18 2007 -0600 Use a single box file. commit a946e3cc8a9aa8158670bdb83e2b340e7a130e62 Author: John Bowman Date: Tue Jun 12 15:51:18 2007 -0600 Remove unused box file entry. commit 335e4ee9be80d0a97939d486341131931184f9de Author: John Bowman Date: Tue Jun 12 15:07:24 2007 -0600 Communicate to xasy via a single signal (SIGINT) and status file. commit f7c65d49a1f59f752311ac0e3b3640e19837886d Author: Andy Hammerlindl Date: Tue Jun 12 13:52:42 2007 -0600 Fixed bug introduced by previous bug fix. commit 32c2800ea35bfe896c7f48a7718e59792ca78e2a Author: Philippe Ivaldi Date: Tue Jun 12 13:42:19 2007 -0600 Update documentation. commit e241156d089b9d735b13f9bf6cb3bb6c279d9379 Author: John Bowman Date: Tue Jun 12 11:14:03 2007 -0600 Move definition of interpolate to graph_settings. commit 1bdbf421d7c6bfe13099526295781e6341280878 Author: John Bowman Date: Tue Jun 12 02:23:08 2007 -0600 Add cast of triple[] to guide3[]. commit 33a23676f0ca1d1afba511962752dcf08b9235de Author: John Bowman Date: Tue Jun 12 01:42:32 2007 -0600 Fix shipout format. Remove old PDFanim_temp_Guide references. Fix cxx errors. Document reverse(guide). commit 79c54067909f345fe01096e620384023c518c1cd Author: John Bowman Date: Tue Jun 12 00:08:25 2007 -0600 Simplify shipout signature (to support xasy development). Support internal cycles in guide examination routines. Add reverse(guide). Fix guide tests. commit 6b1c2ed1c24d9cb03a27b0ceba6b40b3e658f1ef Author: John Bowman Date: Mon Jun 11 23:49:48 2007 -0600 Fix typos. commit fd356f45ac4615c71510ec6a150943339de3a435 Author: John Bowman Date: Mon Jun 11 13:18:47 2007 -0600 Exit interactive mode on eof when stdin is not a tty. If -signal is not set and stdin is not a tty, don't use interactive mode. commit 1458d017b58902acfd78b701295ad859b19da36a Author: Philippe Ivaldi Date: Mon Jun 11 08:01:51 2007 -0600 Expand lasy-mode errors management (with Emacs 22 only). Defer all shell redirection to Emacs for supporting most shell. Compatibility running Windows. commit 7aa37aa0845c03e4b37e7a6c811c159491a352d5 Author: John Bowman Date: Sun Jun 10 18:09:37 2007 -0600 Update triangle example to use new simplified constructors. commit f5cbf4d90e602cfb7d3f1cfd9313a5b6e14316e8 Author: John Bowman Date: Sun Jun 10 17:26:31 2007 -0600 Minor edits. commit 89bfca7eabfea4f560ff28a7d7888ed81ff24cab Author: Andy Hammerlindl Date: Sun Jun 10 12:56:11 2007 -0600 Added implicit constructors. Fixed bug with permissions in static methods. commit 0df0e0bf25d565bf41c5a1199a9520c6808b5c3f Author: John Bowman Date: Sun Jun 10 08:01:22 2007 -0600 Add test for newton root solver; fix diagnostics. commit 5a36b41ea5052e2bbc342672ab80206e5e810864 Author: John Bowman Date: Sun Jun 10 07:20:12 2007 -0600 Optimize join. commit 256c7154f067526bf3f934bf44adbbe35b073902 Author: John Bowman Date: Sun Jun 10 00:12:13 2007 -0600 Give preference to GPL over AFPL Ghostscript. commit 99e825675e3b909070d74569af6cafbfce511eff Author: John Bowman Date: Sat Jun 9 23:25:19 2007 -0600 Add Philippe's lasy-mode fixes, including support for tcsh. commit 5b36cb1f2db85f87a749ee601cd9e1edc3c00202 Author: John Bowman Date: Sat Jun 9 12:29:29 2007 -0600 Add bool copy=true argument to picture routines that buffer data. commit 5b2b0bc4b7dfad18d539d1f3a193c23d507e23c7 Author: John Bowman Date: Sat Jun 9 04:10:23 2007 -0600 Improve garbage handling of multiple-file runs. commit 05baac943e890facf204004e80431ef0654bc30b Author: John Bowman Date: Sat Jun 9 02:57:12 2007 -0600 Remove default initializer for files. commit 0c996d014c98728580e98f7725067e55fca3d070 Author: Orest Shardt Date: Fri Jun 8 15:05:15 2007 -0600 switched xformStack from LIFO to FIFO commit e114be63575847d34e2a7d3faf8b4bc4b5389fb4 Author: John Bowman Date: Wed Jun 6 13:09:28 2007 -0600 Revert spurious asy-mode.el commit. commit 37f51484712b4abb246e557115525f4b7137295f Author: John Bowman Date: Wed Jun 6 13:01:46 2007 -0600 Split readline functionality into readline and saveline. commit 881ffa21f9b210d495d78b8d4038d4f4507243ba Author: John Bowman Date: Wed Jun 6 00:38:24 2007 -0600 Allow xformat to be any format supported by convert. commit d2efef6547f3ef83b632940a3c8b076b786ff26e Author: John Bowman Date: Mon Jun 4 22:42:05 2007 -0600 Fix parallel bison and lex processing. commit 763168a3f63580424432841fe379fba929d8b1f8 Author: John Bowman Date: Mon Jun 4 14:53:35 2007 -0600 Rename xasy.asy to plain_xasy.asy and revert other 1.30-48 changes. commit aa19a01eb70f11a9722e43238df6c9372909c61b Author: John Bowman Date: Sun Jun 3 22:15:09 2007 -0600 Improve documentation. commit ba6b456058e0c054b2cf7684b794dc196b1232a8 Author: John Bowman Date: Sun Jun 3 22:10:34 2007 -0600 Add Newton-Raphson iteration and Newton-Raphosn bisection routines. commit d7eec6237db5226eb68b4aae1d81dab759ac98cf Author: John Bowman Date: Sun Jun 3 17:07:52 2007 -0600 Add support for new GUI xformStack (under development). commit bbc47a2c3b1046f405984710b5cc53a837080eaa Author: John Bowman Date: Sun Jun 3 10:33:17 2007 -0600 Require version 2007/05/24 or later of animate.sty package; remove file name padding workaround. commit 3a780fa6f67832a65a0f082a345c2f585fd65217 Author: John Bowman Date: Sat Jun 2 23:20:55 2007 -0600 Generalize history to return an array of the n most recent history values. commit a7bee1f37cbd70a0c8b0c950681ed04d45187fc9 Author: John Bowman Date: Sat Jun 2 22:39:49 2007 -0600 Add gsOptions configuration variable. Force embedding of all fonts in eps files. commit 0c9baa4c098bea8f3d6ad8fddaa7fe972ef2d1db Author: John Bowman Date: Sat Jun 2 17:11:22 2007 -0600 Force all fonts to be embedded in pdf files. commit e91898e61889ad55a7798653056983cefe186d7e Author: John Bowman Date: Sat Jun 2 12:00:40 2007 -0600 Force fixed format for compatibility with pdflatex. commit a183626cf3e2f804378ee2990e4d891c871e037a Author: John Bowman Date: Sat Jun 2 01:30:15 2007 -0600 Fix indentation when byte-compiled cc-mode.elc is used. commit 2baf201ecce79107e5f587f47f3b100b75d4c364 Author: John Bowman Date: Fri Jun 1 18:08:13 2007 -0600 Allow array insert to insert an array of the same type at a given index; insert now returns void. Allow delete to accept an index range and return the last item deleted. Add initialized(int n) array virtual member to detect whether element n is initialized. commit dd65fda0826f2f552d15e8e4ee907090844f046a Author: John Bowman Date: Fri Jun 1 11:04:43 2007 -0600 Split readline functionality into two routines: readline (with argument order now consistent with getstring) and history(string). commit ab4774286f87ec5ca78a2f056566b772afd40e64 Author: Orest Shardt Date: Fri Jun 1 11:01:58 2007 -0600 Fixed typo commit 8096bb5fdf640778ed9715a64a16d89f40788ba5 Author: John Bowman Date: Fri Jun 1 10:01:28 2007 -0600 Implement NoZero and NoZeroFormat with more general OmitTick and OmitFormat routines. commit bf65e98df0c439c14d92cd68260981d935bd0380 Author: John Bowman Date: Thu May 31 14:17:57 2007 -0600 Avoid need to defer linewidth by moving setpen to the proper place. commit 3eaa60ba9b30082526d2d54d755ecf023e599c35 Author: John Bowman Date: Thu May 31 13:53:57 2007 -0600 Omit identity concat commands. Put dynamic linewidth code in /Setlinewidth. commit 7fe4be91e8b7cb1de9424dea14ef4221421aa903 Author: John Bowman Date: Thu May 31 02:21:50 2007 -0600 Fix linewidth. Fix division by zero. commit 74a45e155bfd00a4515f527c27856f9c0b14e527 Author: John Bowman Date: Thu May 31 01:51:14 2007 -0600 Simplify linewidth deferral. commit 193bf8325dbcad9b36fb4cee380d51f66f0aa556 Author: John Bowman Date: Wed May 30 23:25:59 2007 -0600 Defer dynamic linewidth until stroke time in case currentmatrix changes. Improve accuracy of dynamic linewidth calculation. commit f66e8527ba4dc2fcab6b99e2f9bc6f22eb69bc62 Author: John Bowman Date: Wed May 30 23:18:10 2007 -0600 Rename zerotick to zerotickfuzz for clarity. commit a6791aefc4759ebadf7f17503dda4d5138692586 Author: John Bowman Date: Wed May 30 17:53:52 2007 -0600 Make zero detection robust. commit c28626c2078f8c17fed4c5053b0c03fc5caf95e4 Author: Philippe Ivaldi Date: Wed May 30 13:48:10 2007 -0600 Fix numerical precision in the routine NoZero commit e00a7b8073d6dc8bcd86eb764ebee05218bd5a26 Author: John Bowman Date: Wed May 30 13:04:08 2007 -0600 Fix orientation code. commit 88e1d52a06ad38bbf37511a14f2e48a63957b60c Author: John Bowman Date: Wed May 30 12:37:44 2007 -0600 Simplify and optimize normal calculation. commit 9f8598a130268cf74d7ce1ce2ad25be62a0104aa Author: Radoslav Marinov Date: Wed May 30 11:37:58 2007 -0600 Changed the shading approach in base/contour3.asy . commit fe95f910e8de681b23e83f95165302efb4751e72 Author: John Bowman Date: Wed May 30 01:32:47 2007 -0600 Implement simplified (and slightly more efficient) gouraudshade interface. Reduce memory and CPU usage by avoiding duplicate buffering of picture data. commit f76232575f29b9a8d2ca0f010868581751a6d7b8 Author: John Bowman Date: Tue May 29 22:04:36 2007 -0600 Add tickmodifier NoZero and ticklabel format NoZeroFormat. commit 46f6ea1bc3b46c75b82edf3d32a3765ce8e86e40 Author: John Bowman Date: Tue May 29 16:27:53 2007 -0600 New test routines. commit 77d1dd8f3ee01f0e22a61ae5089b7cd4a3edee4c Author: John Bowman Date: Tue May 29 16:08:06 2007 -0600 Move real[][] identity(int n) from math.asy to C++ code; add documentation. Avoid use of loops with join operator. commit b592bc60b2bcbc3c402d58a20090888786ffe65f Author: John Bowman Date: Tue May 29 16:04:44 2007 -0600 Minor optimization. commit 1adc55ad64b08356aa4b98895649d95d7e6c8e90 Author: John Bowman Date: Tue May 29 15:54:23 2007 -0600 Cleaner optimization. commit befaf187a250eaf67d6b435244bd0a7462e265bb Author: John Bowman Date: Mon May 28 18:14:29 2007 -0600 Remove extra loop variable. commit 63980fd23d2cba1835e8bdd76b3f41331ae30bcd Author: John Bowman Date: Mon May 28 18:11:05 2007 -0600 Further optimizations. commit 2e40007fb1e89ac0c5ba843043ae9d54dc810556 Author: John Bowman Date: Mon May 28 16:44:44 2007 -0600 Optimize number of calls to project; change return type of contour. commit 485f5ec8238cb2ad76ff5dc709e5a60f6aebe4fa Author: John Bowman Date: Mon May 28 14:41:27 2007 -0600 Catch unhandled quit exception. Reset scroll lines to zero. Don't exit on interrupt during module load in interactive mode. commit 81dc9114a4f185d3188069048426c11f1d186df5 Author: John Bowman Date: Mon May 28 14:14:22 2007 -0600 Renamed particle to object. Minor optimization. commit 3c46482e8cdd28a52d9c27d620b8c1f605b40b93 Author: John Bowman Date: Mon May 28 11:14:18 2007 -0600 Implement optimized real multdiagonal(real[][] a, real[]b). Speed up project slightly by changing aspect from real[][] to real[]. Make cputime().change return parent+child times. Add write(cputime). commit bfaf0370fc33d5dc9c23305a4fdfa26652aafb9c Author: John Bowman Date: Sun May 27 22:29:01 2007 -0600 Added change.user and change.system fields to cputime(). commit 948490a418a6dfda24c8ffb1e5ca7147e644bdfe Author: John Bowman Date: Sun May 27 22:25:31 2007 -0600 Optimize real[][] * real[]. commit d4803b09765b84dbc7e5cb75d6eb5bd0e30005b5 Author: John Bowman Date: Sun May 27 09:53:28 2007 -0600 Speed up 3D projection by moving matrix-matrix multipy to C++ code. commit cffe5e23420dbd5c84666fbe9f476c814c5f090a Author: John Bowman Date: Sun May 27 01:08:58 2007 -0600 Minor clarification. commit 26d3b69c93b217e6a6381bfef4b9e7a61c01e117 Author: John Bowman Date: Sun May 27 01:03:03 2007 -0600 Simplify, document, and port guide examination routines to three.asy. commit ab9070048364e614a86625a51838ee0d5a44a306 Author: John Bowman Date: Sat May 26 10:13:48 2007 -0600 Fix potential uninitialized variable. commit 270b67554e47b3894a8ae94f4c16e3825dc40a30 Author: John Bowman Date: Thu May 24 02:07:53 2007 -0600 Add bool cyclic(guide) routine. commit a1fd6cd823ff17ed834191d21d98c27bdeddbe2a Author: John Bowman Date: Thu May 24 01:53:03 2007 -0600 Add routines to allow access to guide components. Add upcase and downcase routines. commit 01e48f273dbbd9058a803a8ac6267eb0e4477291 Author: John Bowman Date: Wed May 23 22:48:23 2007 -0600 Document bibtex usage. commit e6a7d6a3938e63411e98be86dec5d048e11ddb49 Author: John Bowman Date: Wed May 23 22:47:47 2007 -0600 Install intro.asy. commit ab8b21e65692d7a75ee9cc8919edd84525ee44e7 Author: John Bowman Date: Wed May 23 22:47:32 2007 -0600 Remove pdf() restriction. commit 10a79c6c34636a7be292c25359cba859e274041d Author: Orest Shardt Date: Wed May 23 15:43:59 2007 -0600 Fixed docs about base64 commit 0958687accac67e691a83e0954d482cf7e8d04d1 Author: John Bowman Date: Mon May 21 21:16:42 2007 -0600 Use projection P; reduce number of calls to project. commit e9c0b6c842d44ada09d14f4307264a3148c60d03 Author: John Bowman Date: Sat May 19 14:16:43 2007 -0600 Reduce resolution. commit 8b490c2e53c7ac1a6e7526c41567151857b4a0f5 Author: John Bowman Date: Sat May 19 14:05:36 2007 -0600 Increment version to 1.30svn. commit ceea165b52e0a38618fbbf9041e04dc1b2f1af69 Author: John Bowman Date: Sat May 19 11:25:04 2007 -0600 Update LocalWords. commit 9b797abba10a36e61a019b6ace4525dbdf4d88cb Author: John Bowman Date: Sat May 19 11:16:54 2007 -0600 Improve description of contour3. commit 9651f6c97ac631429cee38fd736756c73ff25b00 Author: John Bowman Date: Sat May 19 11:08:13 2007 -0600 Speed up tick handler. commit 4f3842489f2a4f21c08385b3e708374633c63752 Author: John Bowman Date: Sat May 19 10:44:24 2007 -0600 Reinstate abbreviation q for quit, unless there exists a top-level variable of this name. commit 8fc806cbe73f7c4b609085e010916b93bc4d0e98 Author: John Bowman Date: Sat May 19 02:02:28 2007 -0600 Use easier-to-use animate.sty package instead of interim pdfanim_temp.sty package for generating pdf animations. commit 2aab5e1bf0488aeefa98a35dbb041dbb7c343665 Author: John Bowman Date: Sat May 19 00:48:09 2007 -0600 Add support for drawing zero-level sets of functions from R^3 to R. commit cb1882390a636614705b1e2d36f6da944d3b429f Author: John Bowman Date: Sat May 19 00:37:10 2007 -0600 Fill in potential gaps between histogram bars when bars=false. commit 99e519ccc5459da7fecff7de3acb1b131d951e78 Author: John Bowman Date: Sat May 19 00:11:06 2007 -0600 Simplify histogram interface. commit 5954c902a8b87765ae93d615bf79bbe011bbdc03 Author: John Bowman Date: Sat May 19 00:09:42 2007 -0600 Fix FillDraw pens. commit d04ada5f9ce0252c0805ff6fe7dd7c462be417ea Author: Andy Hammerlindl Date: Fri May 18 13:35:20 2007 -0600 Minor refactoring. commit b15d658f724fc64c216437821dd086e1b75b99d0 Author: Andy Hammerlindl Date: Fri May 18 13:34:40 2007 -0600 Got rid of annoying "no default init for " message. Fix a boolean flag mixup. commit b5d5b2480a1df2751c8abe7ba4cb8106afd8aadf Author: Orest Shardt Date: Fri May 18 11:08:24 2007 -0600 Acknowledged source of Imaging-1.1.6 patch commit 586bd648c5669f31bf60adb2664d720f7ca0c10d Author: Orest Shardt Date: Fri May 18 11:07:33 2007 -0600 Documented the enabling of PNG format in xasy commit 26b715066b394320c125c417b0d14026e0f47c54 Author: John Bowman Date: Thu May 17 21:51:53 2007 -0600 Remove unused directory. commit 62f5876939694c9ada532324caecacc47a10ad91 Author: John Bowman Date: Thu May 17 21:48:50 2007 -0600 Add default argument. commit 4c752c5186524d5c7bbe4b837f672d193f204d82 Author: Orest Shardt Date: Thu May 17 14:47:36 2007 -0600 Documented use of base64 commit 4eca9e53e681b998fc5a725ccf5e4ba33fdcab04 Author: Orest Shardt Date: Thu May 17 13:45:12 2007 -0600 Provided ability to draw a selection box to select all items in the box. Added item scroll up/down feature. Embedded the toolbar icon images into the source code. commit 05b3142d75defeef2015d7ff241ddfeb7e66ff00 Author: Orest Shardt Date: Thu May 17 13:42:01 2007 -0600 Arrows in icons are now the same style as Asymptote arrows. Transparency of text.gif fixed. commit ef70123f8dec5984ab5e27abaa461663d5c4cbbd Author: John Bowman Date: Thu May 17 09:19:11 2007 -0600 Added support for fillpen, drawpen, and legend entries to histogram. commit 5543f622b8f8087a6ad25ef71ef482ac50c045a7 Author: John Bowman Date: Thu May 17 09:12:11 2007 -0600 Adjust legendline length to account for marker size. commit 594ecf17fc8c156d9135c94463d4e4407d9591f7 Author: John Bowman Date: Thu May 17 09:10:53 2007 -0600 Minor optimization. commit 7e5078686cf17cdfb27f8182a7cf3db6dcb57ebb Author: Orest Shardt Date: Wed May 16 17:28:12 2007 -0600 Improved handling of highlighting when mouse enters and leaves an item. commit ecaabcbbe2937b3f4b4777a1706973ae1820d063 Author: Orest Shardt Date: Wed May 16 15:09:06 2007 -0600 Various improvements to xasy3 made including ability to select and move multiple objects, and fixed the ability to open additional files. commit d1c63b6cd9c1399de497b9cda1d2be0587baade9 Author: Orest Shardt Date: Wed May 16 15:04:29 2007 -0600 Added new icon for xasy3 toolbar. commit 8dcf6de5f2db342913bdeea12f3483495c03d54a Author: Orest Shardt Date: Wed May 16 15:02:55 2007 -0600 Updated Imaging-1.1.6 patch to adhere to conventions of other patches. commit 960b9890f5ce8e944fffa328e950dfc4db529cac Author: John Bowman Date: Wed May 16 07:29:59 2007 -0600 Speed up tickHandler; use default asy xformat. commit 2ca9d106ae96f6a79f7b9f75f204174aeed2146b Author: John Bowman Date: Tue May 15 23:14:35 2007 -0600 Optionally support transparent png deconstruction. Work around half-pixel bounding box bug in Ghostscript pngalpha driver. commit a72b2a6966040de1948eafac30c0b2bed4701ddf Author: Orest Shardt Date: Tue May 15 15:04:55 2007 -0600 Provided a patch to allow better alpha support in the PIL's ImageTk for the new GUI commit 5ce11724695458712b0a013b43d24c3119296b54 Author: John Bowman Date: Tue May 15 15:00:09 2007 -0600 Fix typo. commit fe83e56c0dc3062414a50681305da9bf2fbdcec9 Author: John Bowman Date: Tue May 15 10:37:32 2007 -0600 Fix typo. commit 0ed2fee6c78497a81fa73c24c4414d688db39950 Author: John Bowman Date: Tue May 15 10:36:47 2007 -0600 Fixed comment. commit 763d005d05d17ed653f6a0f61fc29a3b1fb92c0c Author: John Bowman Date: Tue May 15 09:13:34 2007 -0600 Fix increasing(real[],true). commit d38d613d9fddd77ae1787d63518ab0326dd6dc77 Author: John Bowman Date: Tue May 15 08:53:40 2007 -0600 Check that array x is strictly increasing. commit 90a313b01c7db33b5b9d0ea942df6b562d9b34d8 Author: John Bowman Date: Mon May 14 13:20:48 2007 -0600 Implement bidirectional signal handling to new GUI (under development). commit ee9a0615abb8b2da27829ee677a78a0370c2d5da Author: John Bowman Date: Sun May 13 10:07:35 2007 -0600 Generate begin and end figure comments. Documentation updates. commit f252fe5dcd7a4a20aded818080dcd9fdffb72f24 Author: John Bowman Date: Sat May 12 23:02:04 2007 -0600 Explicitly close EPS output file to avoid race condition with gv. commit ce8740b700536e06400f99cd381572621dfe57f1 Author: John Bowman Date: Sat May 12 17:12:57 2007 -0600 Increase arctime precision. commit e9f6461ad86397b18b593f3c815fa4d7680252c2 Author: John Bowman Date: Sat May 12 11:59:20 2007 -0600 Fix remaining numerical resolution problems with dir. Avoid arctime error when goal == L. commit 1bb0f379df706ae156c7023e2f66a6fd16bf60a8 Author: Orest Shardt Date: Sat May 12 09:34:16 2007 -0600 Fixed images for xasy3 commit e1a7b970ce10b948aff74c333edf4bc90caacb50 Author: Orest Shardt Date: Sat May 12 09:31:20 2007 -0600 Images for xasy3 commit 8edbb37bd7e49d1cb2b976f314535d89a4bcd772 Author: Orest Shardt Date: Sat May 12 09:25:40 2007 -0600 Added xasy3 - a new GUI commit 551c851330c0456cf299939923164241f57df5a6 Author: John Bowman Date: Fri May 11 17:23:02 2007 -0600 Documentation updates. commit 4b3131bef0f47d97fcee17473e02ea11a3f97cd1 Author: John Bowman Date: Fri May 11 07:05:05 2007 -0600 Suppress extra newline on standard EOF reads in absence of readline library. commit 60af1069ee62875c165dad1e53e1c6b00d0ff9f4 Author: John Bowman Date: Thu May 10 22:37:15 2007 -0600 Fix standard input of strings. commit e1c445ed7b053f5c9693bf60cff47610ab44b799 Author: John Bowman Date: Thu May 10 14:45:56 2007 -0600 Change SIGUSR to SIGINT and output a final box file to indicate end-of-sequence. commit 79197fc7fae5145c4e9662a47072143279af9789 Author: John Bowman Date: Thu May 10 14:44:57 2007 -0600 Remove "q" as abbreviation for interactive "quit" command now that "write(q)" at the prompt can be written simply as "q". commit 4ce98eea4007a0fe7cf5802622ef719f5afbf528 Author: John Bowman Date: Thu May 10 07:18:45 2007 -0600 Document dot(picture,real[],real[],pen); commit e0993a89087f39b647d2328cc6f18127565fc7f1 Author: John Bowman Date: Thu May 10 07:10:00 2007 -0600 Add piecewise monotonic spline type and example. commit a46a851de05f1b753534b143b19934d2f42c1932 Author: John Bowman Date: Wed May 9 23:05:15 2007 -0600 Use subpath to implement robust dir(path, real) function. commit 3a2e0d8ad1ae707b7d6dfb1d0de8dc4a1db143d8 Author: John Bowman Date: Wed May 9 20:02:21 2007 -0600 Fix endpoint dir(path, real) calculation. commit ef66c2b368d5067eac92ed0da0dddb3b5176df53 Author: John Bowman Date: Wed May 9 18:16:54 2007 -0600 Use datarootdir. commit 1cb07a0c9253787ad9dcf381411767d8bf40bed1 Author: John Bowman Date: Wed May 9 18:15:43 2007 -0600 Support --enable-gc=PREFIX. commit 2a7208768685774e29e9bb0ab8e3b103a49bae28 Author: John Bowman Date: Wed May 9 12:41:48 2007 -0600 When settings.signal=true, write a separate .box file for each object. commit d44ed6462ca2754968dc0fdadb2869f80a95162e Author: John Bowman Date: Wed May 9 11:58:15 2007 -0600 Port 2D dir changes to 3D. Standardize argument names for point, precontrol, postcontrol, dir, and subpath. Avoid numerical overflows in three.asy solver. commit dfacf1bfc1124c5776c12d2ba683ab1222204bdb Author: John Bowman Date: Tue May 8 22:06:12 2007 -0600 Fix definition of dir. Add optional final argument to dir specify incoming and outgoing directions. commit c1244c0331a8731e0c9397c38f9800a488c57854 Author: John Bowman Date: Tue May 8 13:10:09 2007 -0600 Swap xasy signals. commit a0f8582e216ff3816b07b0c077b0be2e3b3d69b8 Author: John Bowman Date: Tue May 8 13:06:40 2007 -0600 Fix URL formatting. commit 7227dc2d4c4956d9d10de01d0f4cbc26d2b97667 Author: John Bowman Date: Tue May 8 04:08:38 2007 -0600 Increment version to 1.29svn commit 8089f96bfc42626f1e7619ff0d7d5e6e4100b173 Author: John Bowman Date: Tue May 8 03:16:55 2007 -0600 Force uptodate to be true just before call to C++ shipout routine. commit c62958d6773ef46f2694ab5efbed4ce8509cb8cb Author: John Bowman Date: Tue May 8 03:09:49 2007 -0600 Swap gc library load order. commit 01c9abc9c59f02bc295960881b71ee91e396181e Author: John Bowman Date: Mon May 7 23:38:33 2007 -0600 Purge standard input after reading in interactive mode. commit 198580292c624fd5cbbecc672a8ca1646cf011bd Author: John Bowman Date: Mon May 7 18:03:27 2007 -0600 Fix segmentation fault in readline() and runaway process on reading EOF from standard input in absence of readline library. commit 044ccbd7b71d7337e043e41b53a8de9c1db3a3f3 Author: John Bowman Date: Mon May 7 17:32:17 2007 -0600 Add GCPPLIB target. commit 928c90747003c115ebef7553151b1e512bc842fb Author: John Bowman Date: Mon May 7 15:21:27 2007 -0600 Support parallel builds. commit 25ca9066d7e2ff60f849f823799967e8105ab5d4 Author: John Bowman Date: Mon May 7 14:36:53 2007 -0600 Use SIGUSR1 and SIGUSR2 to communicate with new version of xasy. commit 62aff1b7496cf0f280670af7e032800bc85ae256 Author: John Bowman Date: Mon May 7 11:51:01 2007 -0600 Simplify and optimize xstream header. commit 9eeb41f829539b54e43b9eaaf23c1d2d22482058 Author: John Bowman Date: Mon May 7 02:04:59 2007 -0600 Add dvipsOptions configuration variable. commit a030a61bb2abf39ec2ef3a6f9aa2d175ebdac7b2 Author: John Bowman Date: Mon May 7 01:32:37 2007 -0600 Fix bug in xinput. commit 3f66b4b2165b32bca62e86a965895812c19294ff Author: John Bowman Date: Sun May 6 22:49:39 2007 -0600 Further parallel documentation build improvements. commit 824ad21409ec9d7015a57d921d9cab8ca1a69ac8 Author: John Bowman Date: Sun May 6 22:39:54 2007 -0600 Improve support for parallel documentation builds. commit e9704d91c1c8f7046fc6d76115edd0e48284078b Author: John Bowman Date: Sun May 6 22:03:35 2007 -0600 Support nonglobal animations, where each frame is scaled and written to a file separately. commit 9aa7a3056a6d64fa7736bdd9e4b05fa9b879a10d Author: John Bowman Date: Sun May 6 21:38:48 2007 -0600 Support gcc version 4.3. commit 449ec2841903aa398eb87f801fbac43c174a1cb9 Author: John Bowman Date: Sun May 6 14:10:08 2007 -0600 Documentation updates. commit adb06d900490737193efc05e339b0291be3aa2b2 Author: John Bowman Date: Sun May 6 13:53:36 2007 -0600 Support parallel documentation builds. commit 6c6fae56f8facec0a0ca8a2e2ee238588b6c56a9 Author: John Bowman Date: Sun May 6 12:03:58 2007 -0600 Remove intro target to avoid problems under Fedora Core 5. commit 0fb4d6f9254d8932a266af94c48a63a041098558 Author: John Bowman Date: Sun May 6 11:31:08 2007 -0600 Improve TeX error handling. commit af3cdf75576976aa5c39d97d329448b0b7937628 Author: John Bowman Date: Sat May 5 21:53:16 2007 -0600 Minor makefile edits. commit bdf7fe2fa5bbfbc4d77cde52d3db7ab7517accfd Author: John Bowman Date: Sat May 5 10:54:13 2007 -0600 Update URL. commit bfed005bb05306b76abd3f61951e467eaf12ebff Author: John Bowman Date: Sat May 5 03:01:44 2007 -0600 Clean up generated files. commit 5e281cf59111b1b3aa7f165bc606164bae4de682 Author: John Bowman Date: Sat May 5 03:00:52 2007 -0600 Increment version to 1.28svn. commit 4445d7145c63c04e73f1cd8d19bc17954ec7548e Author: John Bowman Date: Sat May 5 01:49:44 2007 -0600 Fix warning messages. commit b7d4b1dab520178724f8addb903be4eb910a6e5f Author: John Bowman Date: Sat May 5 01:35:45 2007 -0600 Fix warning messages. commit 198b794abc6a48114e126a23bbac209e5a0b14f8 Author: John Bowman Date: Sat May 5 00:47:58 2007 -0600 Add example showing Hermite spline interpolation and filled cyclic crosses. Fix formatting. commit 2917092e1a17e71124a9abb37b9fefbc2a1934ce Author: John Bowman Date: Sat May 5 00:07:03 2007 -0600 Optimize palette loops. commit febdf53e4e8f7e338d1aca53d9bced32b4ca0eec Author: John Bowman Date: Fri May 4 23:43:14 2007 -0600 Fix data cropping/scaling. commit b1c9f2af191f12847edca78f8247ad6520309e94 Author: John Bowman Date: Fri May 4 23:37:08 2007 -0600 Add modified version of Stefan Knorr's unit n-point cyclic cross, with optional end rounding. commit 91b02a7743013213ec5708a102fbc8a675cbbc59 Author: John Bowman Date: Fri May 4 19:36:04 2007 -0600 Add remaining fix for MSWindows version of TeXLive 2007. commit d7c903686fa3b56ed717f3d22a9a80566365c68f Author: John Bowman Date: Fri May 4 17:35:06 2007 -0600 Work around jobname bug in MiKTeX 2.5 and 2.6: turn stars in file names (resulting from spaces, etc.) into underscores. commit f96e2c68e92fea5054048daa55197975d1d07cc5 Author: John Bowman Date: Fri May 4 10:39:03 2007 -0600 Simplify tex pipe handshaking and improve error detection. Support TeXLive 2007 under MSWindows. commit f69a3cd29fd1a62bd5896075f68d3758fe555307 Author: John Bowman Date: Thu May 3 23:01:43 2007 -0600 Don't allow rotation about the zero vector. Ensure align always returns a right-handed transform (a rotation). Fix longitudinal skeleton detection when axis=-Z. commit 0adaa7180dfd822a832085978313ccdff8f0f8d8 Author: John Bowman Date: Thu May 3 21:47:55 2007 -0600 Add routine to return a diagonal matrix. commit a6e4c818bc820067f4ac3d23f94f03ba31dda98e Author: Andy Hammerlindl Date: Thu May 3 10:22:29 2007 -0600 Removed finished item. commit 3a920b81235d9e48db94758a173640f0e57788ba Author: Andy Hammerlindl Date: Thu May 3 10:15:03 2007 -0600 Fixed typo. commit 97c6d8898719ed96b4297197eb0886a7dfd3dca7 Author: Andy Hammerlindl Date: Thu May 3 10:11:22 2007 -0600 Assign expression are no longer written at the prompt. commit 4166ef82a9eabfbc16d27c9023d55a5dca9d768b Author: John Bowman Date: Wed May 2 18:02:32 2007 -0600 Add -signal option for signalling completion of shipout to xasy. commit 8dbd3e086f6a23de3b50b0b80442e0e405bb661a Author: John Bowman Date: Wed May 2 09:57:30 2007 -0600 Simplify use of join operator. commit feb0b3261b735876333a812f7a69acb39557270a Author: John Bowman Date: Wed May 2 09:56:36 2007 -0600 Change return type of contour routines back to guide[][] both for backwards compatibility and in case user wants to connect smoothly to external noncyclic contours. commit 9069d1c14e2ce94f3819f6c93d7ee075b3850ad1 Author: John Bowman Date: Wed May 2 01:45:46 2007 -0600 Add Hermite spline graph interpolate type for smoothly joining sampled functions. Change return type of contour routines to path[][]. Move splinetype routines to new file splinetype.asy. Add bool increasing(real[] x) routine to math.asy. Optimize image scaling. commit 2afa9d4becfb09f442b9d483c2962bdbb17c5126 Author: John Bowman Date: Wed May 2 01:38:41 2007 -0600 Make guide precision consistent with path precision in diagnostics. commit 96e6c7831a825f65d68e4c451e50976a8213195e Author: Andy Hammerlindl Date: Tue May 1 18:52:48 2007 -0600 Added curlSpecifier. Removed curl3. commit 2767fe88faa931e1a874d7c5c345a63b49c5b126 Author: Andy Hammerlindl Date: Tue May 1 11:37:51 2007 -0600 Added the tensionSpecifier type. Removed tension3. commit 150a86b8b7e7c0517decd116ef158c4dcf409597 Author: John Bowman Date: Mon Apr 30 21:18:41 2007 -0600 Updated documentation regarding change from cycle3 to cycle. commit 5d3c433407d975022fb01b00c61e5e15ed62a934 Author: Andy Hammerlindl Date: Mon Apr 30 00:22:30 2007 -0600 Test for the cycle keyword. commit 13f9a9bb60b14e3b85253e98eb3bcbf86a6720c8 Author: Andy Hammerlindl Date: Sun Apr 29 22:47:46 2007 -0600 Added the cycleToken type. Changed cycle3 to cycle. commit 1999876bb4ec9930ee59ef6d0c1817edbd55e468 Author: Andy Hammerlindl Date: Sun Apr 29 15:05:21 2007 -0600 Use an C Preprocessor X-Macro to create new primitive types. commit 3077361d259b777bcd6292481e2f00bf97868363 Author: Andy Hammerlindl Date: Sat Apr 28 15:56:59 2007 -0600 Remove old, unused source file. commit 9c10a8626a0f6a318bbcc6004d733799f1adcefb Author: John Bowman Date: Sat Apr 28 11:39:37 2007 -0600 Make Bezier curve solid and control lines dashed. commit 2443ceab7a8b6b9c6c6af2cc554f260bddb06ccd Author: John Bowman Date: Sat Apr 28 01:15:13 2007 -0600 Minor optimizations. commit c5f7661b9ce35af5bc2474c6debac680c4b25936 Author: John Bowman Date: Sat Apr 28 00:37:32 2007 -0600 Remove unused array. commit 81e44094a62541c243b2cc9901ce35af6179e692 Author: John Bowman Date: Sat Apr 28 00:34:47 2007 -0600 Use a simpler argument list for clamped splines. commit 5e2e7caad209a5c38576331d8015b3ae98c6ae44 Author: John Bowman Date: Fri Apr 27 20:59:35 2007 -0600 Don't try to build intro.pdf with default install (due to eforms dependency). commit bc2debbdad6e48b58275f98c1142c46ccb9f9348 Author: Andy Hammerlindl Date: Fri Apr 27 08:26:54 2007 -0600 This file hasn't been used in ages commit 53b44dad2fc449bf2326b7c1bb5dd15b260adc10 Author: Andy Hammerlindl Date: Thu Apr 26 07:03:57 2007 -0600 Removed primArray. arrays are not primitive, and the type could only be only erroneously. commit b84e53ba1d2caefd8ce83719ef073eff207d8f1e Author: John Bowman Date: Mon Apr 23 11:09:51 2007 -0600 Rename "append=false" argument of output, boutput, and xoutput to "update=false" and make it allow both reads and writes to the data file. Negative arguments to seek are relative to end of file. Add seekeof(file) to position file pointer to end-of-file. commit 6a31b86036ec819885ad7157669867d0cf4a2ca2 Author: John Bowman Date: Sat Apr 21 21:38:16 2007 -0600 Fix dependencies. commit cc68406e9143ff04ab91d9b48ccdaf3824120e3d Author: John Bowman Date: Sat Apr 21 19:41:32 2007 -0600 Distribute pixel.pdf rather than pixel.ps. commit 857de182af365683ec14ac86b23bbda5c4d8a323 Author: John Bowman Date: Sat Apr 21 18:00:10 2007 -0600 Add ability to load pdf animations from an external file (one frame/page). commit 0f052e45fb2b3da45a7b07472a244b4686183d6f Author: John Bowman Date: Sat Apr 21 14:20:48 2007 -0600 Make filloutside work with paths that extend beyond the current boundary. commit 1d86d57b95501aaee0bb025623ca0dace214dc1d Author: John Bowman Date: Sat Apr 21 10:55:14 2007 -0600 Fix formatting. commit 1a55cbee13565c5b01899832c780dd008afd0fa1 Author: John Bowman Date: Sat Apr 21 10:44:18 2007 -0600 Fix top level indentation of braces. commit ea8ca0f021d2c2986b8be72a4a884b3684714d79 Author: John Bowman Date: Fri Apr 20 23:01:52 2007 -0600 Simplify control panel. commit 05f4d02e471c2f44eb88442085c091eb941e3e36 Author: John Bowman Date: Fri Apr 20 22:51:17 2007 -0600 Added PDF rolling wheel animation. commit debce269ae9cd43e8cc214d1539466982320ddc1 Author: John Bowman Date: Fri Apr 20 22:50:13 2007 -0600 Delete temporary .aux file. commit 858cf4e2c0f46142a8b9a6c7ba6015db3d1b7d58 Author: John Bowman Date: Thu Apr 19 22:53:07 2007 -0600 Increment version to 1.27svn. commit e9bc191d312bde63e038828dbaa89173d1fa063b Author: John Bowman Date: Thu Apr 19 21:36:54 2007 -0600 Rename source and UNIX binary files for compatibility with releaseforge. commit 9a5852c7644742505ed12c8d94a0fcd8d54ca57c Author: John Bowman Date: Thu Apr 19 18:22:10 2007 -0600 Use a better camera-independent reference value for resolving path3 orientation. Check for negative curl values. commit 0d3e6b78a14b0d1f02ca7fe35ce55de72047305d Author: John Bowman Date: Wed Apr 18 18:58:56 2007 -0600 Added patch to gv-3.6.2 to make redisplay work properly (and fix gv security hole). Removed --nowatch option from call to gv. commit d9292e4fbd36a22e00dd09095316c6ce197d6fef Author: John Bowman Date: Sun Apr 15 18:25:39 2007 -0600 Remove unused (and unmatched) %%EndProlog line. commit 7f8db6a7f07ac51a007315a71380e2c53d6480f7 Author: John Bowman Date: Sat Apr 14 10:56:19 2007 -0600 Remove unneeded access settings. commit 8e3086531898dc2fe69f1cbe25163b6d9ad91b7e Author: John Bowman Date: Fri Apr 13 16:48:52 2007 -0600 Support pdflatex texengine. commit 6fb84927ebdc6c0e042ca0b812612abec957f3b6 Author: John Bowman Date: Fri Apr 13 07:46:54 2007 -0600 Improve example. commit 7223247bf194f2d1b077bad907cb773034aa6071 Author: John Bowman Date: Fri Apr 13 07:46:38 2007 -0600 Fix front/back transverse skeleton detection. commit 15be2bfe0c909747b52e12d015227f50b8a53418 Author: John Bowman Date: Thu Apr 12 06:16:58 2007 -0600 New item. commit 9446698168d19e677cd5a2b80c20c36dc7bd8c5a Author: John Bowman Date: Wed Apr 11 21:21:57 2007 -0600 New item. commit 31496173b22bded7a5dfa2443d23046581d891cf Author: John Bowman Date: Tue Apr 10 17:30:34 2007 -0600 Speed up detection code for old versions of gv. commit 84bfb07a6af8defec0ed240c66b3ed0e144b2d69 Author: John Bowman Date: Tue Apr 10 13:44:56 2007 -0600 Add link to online example. commit afe2f1fb251940fbbb3c645c7fb033aaff55007a Author: John Bowman Date: Tue Apr 10 13:29:11 2007 -0600 Add acsc, asec, and acot functions. commit f9a981f384e777b70f9f687a337f98526d20731d Author: John Bowman Date: Tue Apr 10 13:27:09 2007 -0600 Fixed typo. commit a1aaecbeadf18bedc200705f1d5333fa5bf8e9b6 Author: John Bowman Date: Tue Apr 10 13:14:17 2007 -0600 Implement Break tickmodifier to allow broken axes to work with automatic tick generation. Support broken logarithmic axes. commit 0ae96277f78f70fb940c43ab7d4e9bcf5e301843 Author: John Bowman Date: Tue Apr 10 09:29:12 2007 -0600 Autogenerate tick values. commit 34119036d472900f516599c0057b0f5d40836eff Author: John Bowman Date: Mon Apr 9 23:11:29 2007 -0600 Update FAQ. commit 5f65ee1cd809620c5c2b6f28b7c3aca7cd490052 Author: John Bowman Date: Mon Apr 9 23:02:39 2007 -0600 Add aligned axes example. commit ac3cca963cfe3d4b8da8c4482703741471066763 Author: John Bowman Date: Mon Apr 9 19:26:46 2007 -0600 Increment version to 1.26svn. commit 800b9ecf2f7db512f1403b7ee5ba9b3f135a2836 Author: John Bowman Date: Mon Apr 9 16:43:17 2007 -0600 Untabified and standardized indentation of base files. commit 6f5c1bc025be78de3a8b7697720d4f65117dd4f9 Author: John Bowman Date: Mon Apr 9 14:34:45 2007 -0600 Update documentation. commit 978a35b1855f746833c92c6f42cb68cbfd4678c4 Author: John Bowman Date: Mon Apr 9 14:27:36 2007 -0600 Added spline interpolation routines. commit f45ad4098c648fef4889d649ebe701d47a8a0c56 Author: John Bowman Date: Mon Apr 9 11:41:35 2007 -0600 Add Olivier Guibe's interpolation module and example. Remove long examples from the documentation. commit 986a448e0cb005a22c5eadc5570abb757a217432 Author: John Bowman Date: Mon Apr 9 09:45:10 2007 -0600 Document syzygy module. commit e80ec64fb44ba22c33a46961e8334ddb07dc4c21 Author: John Bowman Date: Mon Apr 9 09:35:49 2007 -0600 Remove default initializers. commit 1eeeb6a07e44f8331e54665ad7b92b6df3b2581d Author: John Bowman Date: Mon Apr 9 09:30:08 2007 -0600 Fix surface lighting. commit e613138e71f008bea5167a34aa5e9e014de676ee Author: John Bowman Date: Mon Apr 9 00:27:58 2007 -0600 Update documentation. commit 10a32373996329021cbf79ceef6e0b8b53805822 Author: John Bowman Date: Mon Apr 9 00:26:01 2007 -0600 For parameterized surfaces, rename bool oriented=true to bool outward=false. commit 0544dc63934c2a48bf7647e3ae033f8e881c471a Author: John Bowman Date: Sun Apr 8 23:54:01 2007 -0600 Improve discussion of surface orientation. commit b4ddf284949a3b45c9284de6a70b8a9f350658f9 Author: John Bowman Date: Sun Apr 8 23:27:13 2007 -0600 Document oriented option for drawing surfaces. commit e38a112f2f848020fb656fe0ba122b624e3bf943 Author: John Bowman Date: Sun Apr 8 22:52:43 2007 -0600 Choose locally outward surface normal only for nonorientable surfaces. commit 1eb940f8367a1dfaa27f8b0ce6a54ef9be61622d Author: John Bowman Date: Sun Apr 8 21:41:35 2007 -0600 Make ^^ return a path3[] instead of a guide3[] for consistency with the 2D routines. Remove spurious specifier when writing a guide3. commit 2102439b301dad154e7a0bfb3b1acf67e76e03b3 Author: John Bowman Date: Sun Apr 8 17:43:53 2007 -0600 Document string array reads under line mode. commit eb31e3b3bfd1289bdbb23b307abfb82cf0e40dbf Author: John Bowman Date: Sun Apr 8 17:31:00 2007 -0600 Add white-space string delimiter mode word(file, bool b=true). commit 134e8461c07f07602882ba0a8f0345ddd9f50997 Author: John Bowman Date: Sun Apr 8 12:25:39 2007 -0600 Explicitly write EPSF in output header rather than relying on dvips -E option (which doesn't work for even the first page of multipage documents). commit a146939bda5fbfacffbc62ea05e2fe538e318c8f Author: John Bowman Date: Sat Apr 7 23:21:51 2007 -0600 More guide3 to path3 changes. commit 3fef11043aa5c73e2005076490e32aab76f8a9f2 Author: John Bowman Date: Sat Apr 7 19:40:01 2007 -0600 Revert csv comment changes. commit d190952a8ee8b4009ce39fd1317452d1e196262e Author: John Bowman Date: Sat Apr 7 19:37:09 2007 -0600 Remove spurious diagnostic. commit ddcfae950a3b57e7e732adffe9073f9a08104d13 Author: John Bowman Date: Sat Apr 7 18:43:10 2007 -0600 Standardize path vs. guide. commit 0a2ff0aecd3a54ddc3d83670684860d8962bea4b Author: John Bowman Date: Sat Apr 7 18:42:27 2007 -0600 Update fixed graph size documentation. commit c002cc241415f7f20c12eae447ae7b6108465c65 Author: John Bowman Date: Sat Apr 7 18:41:29 2007 -0600 Added header comment line. commit 034f0ba8b413d7e75cd5929c9116a67cf2f9782b Author: John Bowman Date: Sat Apr 7 18:40:09 2007 -0600 Standardized indentation. commit 3d286f1ad28dfeb14995285e612f6dc1b0b2d330 Author: John Bowman Date: Sat Apr 7 18:38:28 2007 -0600 Allow escaping of comment character in strings. Disable comment character when reading raw characters with getc(file). commit 8bb86ef5431af89f942bfb99596cc39f225e02ea Author: John Bowman Date: Sat Apr 7 02:10:49 2007 -0600 Added -E option to dvips to force it to denote the file as EPSF (we nevertheless discard the computed dvips bounding box information). commit c24dd3e68d82f70181d174d5fa7577c5698731e9 Author: John Bowman Date: Fri Apr 6 16:25:57 2007 -0600 Document reltime, relpoint, and midpoint routines. Add 3D midpoint routine. Standardize path arguments names. commit 389a7ed6ce7db8b3aadd86617076a9d107cefb03 Author: John Bowman Date: Fri Apr 6 00:31:29 2007 -0600 Clean up _slide*_.aux files. commit d8963113b0f5387409812cc06c85ad6d911cc73c Author: John Bowman Date: Fri Apr 6 00:19:31 2007 -0600 Updated intro.asy to Andy's talk at the University of Alberta. Addded syzygy module and knots.asy example. commit a68182f723175d7d1d6e11f64b449358934db02a Author: John Bowman Date: Wed Apr 4 09:16:45 2007 -0600 Choose correct surface normal when calculating lighting. Added Klein bottle example. commit 44c51f23f44b0a2f9853b917cad53d1ae54e06c0 Author: John Bowman Date: Tue Apr 3 23:14:18 2007 -0600 Removed unused sign. commit fcfc8dff3345a7c64404f699c5faf1e99babedaa Author: John Bowman Date: Tue Apr 3 09:22:21 2007 -0600 Remove unused dependency on LaTeX "rotating" package. commit 1144f27dbba5d4734ad8746ebd2e6b227b752973 Author: John Bowman Date: Mon Apr 2 11:29:48 2007 -0600 Clarify nonroot install instructions. commit 112c4a2ae2e4da7d2e88a0cf59b7d14831cfb025 Author: John Bowman Date: Sun Apr 1 13:48:00 2007 -0600 Allow one to control the minimum width and height of flowchart blocks separately. commit 6976bf5a630648ce63974c1d4bcae61e81580d33 Author: John Bowman Date: Sun Apr 1 03:16:23 2007 -0600 Incremented version to 1.25svn. commit eb0466e26e50f623a19e92d6d684e7c2771f533f Author: John Bowman Date: Sun Apr 1 02:37:10 2007 -0600 Fix formatting. commit d90199bc8d3066e009bc306a9983fd1ce6c2791d Author: John Bowman Date: Sun Apr 1 02:33:59 2007 -0600 Simplify makefile. commit 0794098153d3c097dd9be059912e8658b4e28aa6 Author: John Bowman Date: Sun Apr 1 02:24:24 2007 -0600 Fix backslash. commit 3a142a13eb12dee1253557ff936b960e018b9fe8 Author: John Bowman Date: Sun Apr 1 01:57:57 2007 -0600 Fixed typo. commit 38ef4f4978789996ca500ba495f2b4c1be857f76 Author: John Bowman Date: Sun Apr 1 01:51:53 2007 -0600 Fix __CYGWIN__ preprocessor test. commit 77d574f2d4fdc16254540a407a5d1629ec98a6dc Author: John Bowman Date: Sun Apr 1 01:36:06 2007 -0600 Fix binary space partition camera positioning. commit a34cfc8fb00166570506ded46b3d024c95ca7223 Author: John Bowman Date: Sat Mar 31 22:19:34 2007 -0600 Added 3D version of intersectionpoints routine. commit b0c9a79c7c500a149f7c780827aa75fc072c9083 Author: John Bowman Date: Sat Mar 31 20:00:15 2007 -0600 Add optional fixed block size specifiers. commit 40802aaae2756ff7e6668921e6698fa61be9c13c Author: John Bowman Date: Sat Mar 31 13:49:01 2007 -0600 Remove workarounds for real[1][] bug fixed in 1.24-37. commit 57e77ec4271d174065bb0bfdf82b2c6bcc821421 Author: John Bowman Date: Sat Mar 31 13:43:59 2007 -0600 Reimplement display. commit 9799ea22f5867510164c10a54ca80cc63715e9c5 Author: John Bowman Date: Sat Mar 31 10:40:17 2007 -0600 Change && to &. commit 94fd36e90228618768848c0162bab480d14e9c2b Author: John Bowman Date: Sat Mar 31 10:39:02 2007 -0600 Change && to &. commit 33de1657b03bc42320c5eb86c98b1e9e11c45881 Author: John Bowman Date: Sat Mar 31 10:35:47 2007 -0600 Change && to &. commit b71d943ae2d9dcd130b67933eafa2428c078bbac Author: John Bowman Date: Sat Mar 31 10:33:03 2007 -0600 Update fontsize to use fix-cm.sty instead of type1cm.sty. commit 6d18e0cef3231caebc862301faf802311ecb1c40 Author: John Bowman Date: Thu Mar 29 11:37:29 2007 -0600 Clear errors encountered via debugging _eval. commit b882d4513c2afe98f2e0ca3f2b93af3d38969cdc Author: John Bowman Date: Wed Mar 28 12:57:14 2007 -0600 Fix default y tick values. commit 2454bf7bca0d52ee0c11ab9476d50227e176eb70 Author: John Bowman Date: Wed Mar 28 08:52:23 2007 -0600 Update MacOS X binary URL. commit 2b12ce9878dbd75656f6fc8553d82f0b7769b8d7 Author: John Bowman Date: Wed Mar 28 08:07:49 2007 -0600 Make angle(rotate(x)) always return x (mod 360). commit 8ee58e155eec492326e076bff8d8f027eb59c96f Author: John Bowman Date: Tue Mar 27 12:17:00 2007 -0600 Remove spurious line break after syntax errors. commit 6d1584acca30bccab6be9e94670bae9a0daf5d50 Author: John Bowman Date: Tue Mar 27 09:41:53 2007 -0600 Update URL. commit 8506d3604012b3ad4f3e6dea7ae975885427fea6 Author: John Bowman Date: Tue Mar 27 09:34:58 2007 -0600 Fix segmentation fault in Dumoulin's C++ port of Burke's Triangulation routine. commit f14aae102619fb51eadfb85a752f0d397e5dd257 Author: John Bowman Date: Tue Mar 27 08:05:53 2007 -0600 Fixed new real[1][] bug. commit e5c50a3081ca75bfb3a53abbe035c088d35cb565 Author: John Bowman Date: Tue Mar 27 07:36:38 2007 -0600 Added bitwise NOT function. commit c87a4702b5a22089740bca982354de10372f7ea9 Author: John Bowman Date: Tue Mar 27 06:54:12 2007 -0600 Rename intersect arguments to correspond to documentation. commit 24999ddf3c831ed9826e84de4b03d52caea257d6 Author: John Bowman Date: Tue Mar 27 06:53:31 2007 -0600 Fix segmentation fault given real[n][0] data array. commit aaacb7bb0e0b6bc0cdd1f7f07fc1790b58799b2e Author: John Bowman Date: Mon Mar 26 13:28:28 2007 -0600 Added missing tensorshade picture arguments. Fixed ambiguity with "asy plain_picture.asy" test. commit 35554fb9280a9c780d69737f512aabfedcb10a44 Author: John Bowman Date: Mon Mar 26 13:21:56 2007 -0600 Change array op && to &. commit 94c5fb19f5f155d33b121d136a8d7474e4c94420 Author: John Bowman Date: Mon Mar 26 07:41:10 2007 -0600 Use hard-wired postscript-to-tex scaling for clipping, rather than calculating it from defaultmatrix, to support explicit post-scaling of eps figures (e.g. with \includegraphics). commit c08a992e5e0347f07b5683e6bd4984704abaf8c0 Author: John Bowman Date: Mon Mar 26 05:52:05 2007 -0600 Document multidimensional array initialization. commit 075bdcdcee1b2265977c57a9cde43760e1b3b273 Author: Andy Hammerlindl Date: Sun Mar 25 22:56:55 2007 -0600 commit 8ec594d671d9ee9ab1413338acdde4267f09fc30 Author: Andy Hammerlindl Date: Sun Mar 25 22:10:05 2007 -0600 Removed array checking from && and ||. commit 075f7a044afe33940236a9c4c214cfeaad3f17c8 Author: John Bowman Date: Sun Mar 25 01:24:51 2007 -0600 Revert 1.24-20. commit ee2164a96b22a92cf9ed7d619f91715269150189 Author: John Bowman Date: Sun Mar 25 01:05:02 2007 -0600 Document null instances of structures. commit 3b60ad1a87c5abc1ef0787af4aa5451e5a0fd169 Author: John Bowman Date: Sun Mar 25 00:53:13 2007 -0600 Use null initializer for binarytreeNode. commit 34f6924ccfa298c0d26b33db8dba9da749c3a8d6 Author: John Bowman Date: Sun Mar 25 00:23:46 2007 -0600 Added & and | boolean operators which work like && and || except that they always evaluate both arguments. Renamed array boolean operators && and || to & and |. Added AND, OR, and XOR bitwise functions of two integers. commit 9e706d5ee15c8dbf9819b5312822fc7520a01937 Author: John Bowman Date: Sat Mar 24 12:19:48 2007 -0600 Fix intro.pdf target. commit c873f8f32bd379219745c525ece0ca1958d51563 Author: John Bowman Date: Sat Mar 24 11:28:46 2007 -0600 Simplify and improve implementation of figure(). commit 72bbad4b5a7824d4289c68048e7bcd989509c6e1 Author: John Bowman Date: Sat Mar 24 11:28:08 2007 -0600 Use invisible figuremattpen for Asymptote logo. commit 9612c0baa049b7cee97da93edcc6ea2ecbeb3400 Author: John Bowman Date: Sat Mar 24 11:27:25 2007 -0600 Enclose PostScript clipping code with gsave and grestore. commit 343e5997cffbdbfca15be8f76860383c8215f6b4 Author: John Bowman Date: Sat Mar 24 11:25:52 2007 -0600 Move camera for infinite projections. commit 0e54a478c8a5493836cb768177361c27c81b13e0 Author: John Bowman Date: Thu Mar 22 21:41:41 2007 -0600 Allow | as binary operator. Remove || and && from list as they always expand to a ? true : b and a ? b : false. commit 9747370ce3fd2fa51fdf797a8d77e3d63d8a0d44 Author: John Bowman Date: Thu Mar 22 01:34:13 2007 -0600 For infinite projections, move camera to outside of bounding box. commit 93dec9da6affa79af424914424ebcec1653398fa Author: John Bowman Date: Wed Mar 21 06:42:18 2007 -0600 Fix binary space partitioning for projections from infinity (oblique and orthographic). Generalize perspective projection to allow any target point. commit d7a1ebcc32a4f23eb799c49edea0cd80c58948c2 Author: John Bowman Date: Mon Mar 19 01:23:53 2007 -0600 Use local projection consistently in binary space partition splitting. commit edd4e9b3041869b5dc0009e5cb362d6e33a066af Author: John Bowman Date: Sun Mar 18 06:33:03 2007 -0600 Check for tension < 0.75. commit dfd1fe22894aaa0f0b187355e5b2ae3522abc585 Author: John Bowman Date: Wed Mar 14 22:18:10 2007 -0600 Update documentation of the implicit initializer for structures. Remove operator init() initializers that are no longer needed. Initialize Tension in three.asy with sensible defaults. commit 0ecb68b4f3b77fd1209fd7216de26a8ea18a43b6 Author: John Bowman Date: Wed Mar 14 00:47:33 2007 -0600 Support multiple pdf animations in inlinetex mode. commit 3a448743613ea1c0d3b76d3b198277862933777e Author: John Bowman Date: Wed Mar 14 00:46:44 2007 -0600 Minor reorganization. commit a79dad027e794ce6c1ce6bf45e48d667c6292694 Author: John Bowman Date: Wed Mar 14 00:44:28 2007 -0600 Format. commit f37633940d041d83ba87555b72b14448d93c8594 Author: Andy Hammerlindl Date: Tue Mar 13 21:48:12 2007 -0600 Add automatic record initializers after the records are defined. commit 945347dfb0a151559683d2de6d9bb43f32d6a1f0 Author: Andy Hammerlindl Date: Tue Mar 13 21:37:27 2007 -0600 Added note about loop translation. commit 65d305d1d6c8bf8f4c3901abb9a62301d406a55c Author: John Bowman Date: Tue Mar 13 01:23:43 2007 -0600 Input LaTeX preamble only in inline mode. commit bc2eb60aef3d9eb856754d0fb5f78ea39a698c3c Author: John Bowman Date: Tue Mar 13 01:14:55 2007 -0600 Work around pdflatex bug. commit a00caf67c40dc0a3aac245cb48e0570ebb7ef23e Author: John Bowman Date: Tue Mar 13 00:34:06 2007 -0600 In inlinetex mode, communicate the asy texpreamble to TeX via \jobname_.pre. Remove asypreamble environment; corresponding Asymptote commands should now be put in the asydef environment. commit b81e30903180f8e7484a71d3a5bd1b4747f2e4ca Author: John Bowman Date: Sun Mar 11 17:49:13 2007 -0600 Minor updates. commit 5bad764fa7566f1ffd55e21b8d3b21375789a6ac Author: John Bowman Date: Sun Mar 11 12:23:17 2007 -0600 Make Ghostscript dependency explict for MSWindows. Check for GPL Ghostscript as well as AFPL Ghostscript. commit 7f0756bea504dd1757cd36786b24cbf9c77f39c9 Author: John Bowman Date: Sun Mar 11 11:15:00 2007 -0600 Minor clarifications. commit 50f44e45dad41a856c3761a46b32c806bc6a9d56 Author: John Bowman Date: Sun Mar 11 10:30:10 2007 -0600 Simplify MSWindows registry lookup. commit 0f83019e080aa3e30ef15265510874c35566a9ed Author: John Bowman Date: Sat Mar 10 01:52:49 2007 -0600 Incremented version to 1.24svn. commit 41136ee276c09cbebf2adbe85f17b5a2a59c958d Author: John Bowman Date: Sat Mar 10 01:13:56 2007 -0600 Fix cxx warning. commit 48deb18c78765d5d568fe118af97dd32d94296aa Author: John Bowman Date: Sat Mar 10 00:56:52 2007 -0600 Autoconfigure under MSWindows by querying the registry, so that Asymptote and the applications it depends on may now be installed in any location. commit e72fbc666cfe970f1e6f9071282cffd9c0e21839 Author: John Bowman Date: Sat Mar 10 00:52:43 2007 -0600 Check if hint is set before accessing it. commit ef4585636df941aebbcc644da75bf0efe864c0b2 Author: John Bowman Date: Sat Mar 10 00:18:41 2007 -0600 Fix import gsl under MSWindows. commit 96516a2f3962a449794e32c55df6ab829cc39607 Author: John Bowman Date: Thu Mar 8 23:35:13 2007 -0600 Simplify implementation of texpreamble environment. commit 8409e9082abae2880c6b34d6aadc3dbc94b066e6 Author: John Bowman Date: Thu Mar 8 23:03:33 2007 -0600 Fix typo. commit 45214f111b7624a440ce0c06c433473c6d8aadd3 Author: John Bowman Date: Thu Mar 8 22:59:11 2007 -0600 Add empty postenvironment definitions. commit 1ae539fa6b5086c888ffe7ec867f9ae8dc747239 Author: John Bowman Date: Thu Mar 8 22:35:25 2007 -0600 Add texpreamble environment to contain the LaTeX preamble for both LaTeX and Asymptote. commit 7c35840227fb6ed47caaca66151a7c7580aa0558 Author: John Bowman Date: Thu Mar 8 12:44:25 2007 -0600 Remove unused line. commit 3fb97fb770706084c7f861439c4022ed33edc879 Author: John Bowman Date: Thu Mar 8 00:43:48 2007 -0600 Add autoimport option. commit 9067d6a86f046363dcf0866c6c8cf4995da6296f Author: John Bowman Date: Tue Mar 6 12:17:22 2007 -0600 Allow shipout to write to other directories if and only if -global is true. commit d51027228f2c19d7ed6105965ba9ceef86e47feb Author: John Bowman Date: Tue Mar 6 01:25:30 2007 -0600 Ensure colon is catcode other (12) so that TeX includes like \usepackage[frenchb]{babel} don't break inlinetex mode. commit 719b2629105273aee7e305c14c525f490916a69c Author: John Bowman Date: Mon Mar 5 16:05:53 2007 -0600 Fix background picture sizing. commit 5e7740180fd2443186313e1d3ca75f24756fe9a4 Author: John Bowman Date: Mon Mar 5 15:58:47 2007 -0600 Set background size. commit 4e53202a7842f7b70c98b7e9d261b6876b0795a3 Author: John Bowman Date: Mon Mar 5 03:51:51 2007 -0600 Incremented version to 1.23svn. commit e51ba11fadb17a7143209a488946b0afd8022734 Author: John Bowman Date: Mon Mar 5 03:01:16 2007 -0600 Added missing header. commit 43f28e4087ee950538d510d9a0ed3202afaad9d2 Author: John Bowman Date: Mon Mar 5 02:33:43 2007 -0600 Support legends in both forms of 3D contour drawing routines. commit 569ae970d8db7d95d58fdfce5712cf4c23316f41 Author: John Bowman Date: Mon Mar 5 02:31:49 2007 -0600 Support legends in 3D contour drawing routines. commit 2afb1187ff55ec41489dbbb1ea5ae2bbf52b2b0f Author: John Bowman Date: Mon Mar 5 01:58:37 2007 -0600 Add discussion of icomma package. commit e7dff4a2871bac88f3eca8092d03fd0d824e4ee4 Author: John Bowman Date: Mon Mar 5 01:44:32 2007 -0600 Fix format(-0.5) under locales with nonperiod decimal separator. commit 1f32d4f244925636cdc8e3a4ee7bc81e33247757 Author: John Bowman Date: Mon Mar 5 01:17:12 2007 -0600 Mention link page, including user-written Asymptote tutorial. commit 1efe402b1f06f8324bb28baef1afdb5f7ae5fe87 Author: John Bowman Date: Sun Mar 4 13:17:33 2007 -0600 Add predefined markers. commit 8cf34dbca37b1a0591cfd1ab8b25e86d3f6da30f Author: John Bowman Date: Sun Mar 4 12:18:45 2007 -0600 Minor edits. commit 00c3be6095cb906455e9add45fd09a62c2db8bc2 Author: John Bowman Date: Sun Mar 4 12:10:23 2007 -0600 Renamed markuniform(int n, frame center, bool rotated=false) to markinterval(int n=1, frame f, bool rotated=false), which now centers n copies of frame f within uniformly space intervals in arclength along the path, optionally rotated by the angle of the local tangent. commit 6d64c0e317ac554dc59ab485f397a0c35c5f3dc5 Author: John Bowman Date: Sun Mar 4 11:16:14 2007 -0600 Explicitly list intro.asy dependencies. commit 295ef5c7c5d9446ef413ab8c8fdc7c7ccc2670f8 Author: John Bowman Date: Sun Mar 4 01:59:30 2007 -0600 Updated marker documentation. commit 110dcddb82504ce175127fa710e8374fb2812c04 Author: John Bowman Date: Sun Mar 4 01:53:21 2007 -0600 Simplified/standardized markers interface. commit 80159d48f46ea3901eec293db16cae9bc4420fcc Author: John Bowman Date: Sun Mar 4 01:47:51 2007 -0600 Formatting. commit 962832601f3e9e90b6eb8c095387eb870a4a727a Author: John Bowman Date: Sun Mar 4 01:47:38 2007 -0600 Remove bibliography page numbers. Add Asymptote logo to intro.asy. Change clearpage to eject to avoid extra page. commit f8bc8a7b1fb503c436af8186535600ff17be0ec0 Author: John Bowman Date: Sun Mar 4 01:45:34 2007 -0600 Draw minor ticks below palette box. commit a6a66a28cf1e8c392535cfbd6ff6c04da4b72f03 Author: John Bowman Date: Sat Mar 3 22:08:48 2007 -0600 Add short description of slide presentation package. commit 5c84f25b91ffe0e4314f1b964874ad5c05d59d09 Author: John Bowman Date: Sat Mar 3 20:33:03 2007 -0600 Remove directory qualifier. commit 53f814b6cb83a889bdd308363c2d1f9f40872c95 Author: John Bowman Date: Sat Mar 3 20:32:42 2007 -0600 Import pdfanim. commit 737c32260dac29c8bde3515febbed216a644afb3 Author: John Bowman Date: Sat Mar 3 20:31:52 2007 -0600 Check incoming array bounds. commit 6de5f36de58ea78b64c0b8a0d37ea43eb330055a Author: John Bowman Date: Sat Mar 3 18:48:39 2007 -0600 Show page numbers on subsequent bibliography pages. commit ed62ed3343292791f5477d367afdd82e57a0b6f5 Author: John Bowman Date: Sat Mar 3 15:46:09 2007 -0600 Number last page before bibliography. commit e716a018114ce9598ff41ccbd9c0f822d8f8d802 Author: John Bowman Date: Sat Mar 3 15:45:49 2007 -0600 Revert temporary patch. commit 24b6ad1e65d8f31c070120c9d4fd58bdc6b4ca8e Author: John Bowman Date: Sat Mar 3 14:37:29 2007 -0600 Add implicit pen initializer defaultpen. commit 79440c76a089e66c9414a69e53ffa4114c6ac846 Author: John Bowman Date: Sat Mar 3 14:02:54 2007 -0600 Fix concatentation of nullpaths. commit b36b0ff2a8500b758c7eb6e74b0420fb6619d71a Author: John Bowman Date: Sat Mar 3 13:32:32 2007 -0600 Make seconds return -1 instead of 0 on failure, for consistency with UNIX mktime routine. Document workarounds for unimplemented "%Z" time zone specifier to seconds. Improve diagnostic. commit 9d009d9cd6f24e8718bb070443cfb5a5548c99aa Author: Philippe Ivaldi Date: Fri Mar 2 16:06:35 2007 -0600 Minor changes/updates. commit cef22845c934ef9ce1d3b3283a716da51cc1d105 Author: Philippe Ivaldi Date: Fri Mar 2 13:43:16 2007 -0600 Replacing the parameter 'frame markerframe=newframe' by 'marker marker=nomarker' in the routine 'markangle' of 'markers.asy'. commit 14770fb363a0e22d8567bbf2cd12e07317459579 Author: John Bowman Date: Fri Mar 2 01:16:21 2007 -0600 Don't output texpreamble in inline mode. commit 6bf22cd5c542932bcc16a4bd2eb13dc0c4924164 Author: Philippe Ivaldi Date: Thu Mar 1 16:28:33 2007 -0600 Correct typo. commit bbb56abd6df169c548416d28fbacabb496b122a8 Author: Philippe Ivaldi Date: Thu Mar 1 16:15:58 2007 -0600 Documentation of the package markers.asy. commit c51dfc0ef6f4f9a6bb4b0763a8468dbaeee081a8 Author: John Bowman Date: Thu Mar 1 10:01:41 2007 -0600 Added routines to facilitate drawing 3d contours. commit aeb93083ebf797ae7ea89fd8603fe1bc86ce8e04 Author: Philippe Ivaldi Date: Thu Mar 1 09:37:30 2007 -0600 Examples about the modules markers.asy commit 7e9811263c6e476a8319b267e2628d00c4e55aaf Author: Philippe Ivaldi Date: Thu Mar 1 09:12:30 2007 -0600 Others mark routines and markers. commit 5f357b465b01ad8453669cdd0e68cda959a2fe50 Author: John Bowman Date: Wed Feb 28 23:55:57 2007 -0600 Implemented binput and boutput functions for reading and writing in the native (nonportable) machine binary format. commit 619e0eb074bd696e477f554ad39e05a1e2abba59 Author: John Bowman Date: Wed Feb 28 18:54:28 2007 -0600 Document local installation. commit 5abac133b9a2e39f7de51b3e78d7ec2264844c79 Author: John Bowman Date: Wed Feb 28 18:29:42 2007 -0600 Fix uninitialized 'this.130' warning message from gcc 4.1.1 and 4.1.2. commit 589714ecf3020dbd8343d30e2f2b563b4cfcb2a1 Author: John Bowman Date: Wed Feb 28 14:56:44 2007 -0600 Fix bool latex() and pdf(). Remove lscape dependency and need for autorotation in slide.asy. commit a2b08e65ba2025acfd9a783b11228a7e9b9ad033 Author: John Bowman Date: Wed Feb 28 13:40:49 2007 -0600 Reactive begingroup. commit 8346e1f95f11c3bc8eddca970b98d97fc82314d5 Author: John Bowman Date: Wed Feb 28 01:35:32 2007 -0600 Fix cxx errors. commit 5a91b91d46484cabb85106964da62a8474e56124 Author: John Bowman Date: Wed Feb 28 01:28:39 2007 -0600 Remove unused configuration variable AC_HEADER_STDBOOL. commit d90520bc7ce05c294cb459fc7de59aeb7f6ff72e Author: John Bowman Date: Wed Feb 28 01:17:09 2007 -0600 Fix cxx errors. commit 00286c95eb86c6ca13b928d6e896284f4b40e090 Author: John Bowman Date: Wed Feb 28 00:58:30 2007 -0600 Move mem::list out of common.h due to ambiguities under old cxx compiler. commit 4605357c6055cf45d3dcef9ffc22abdaa3ad227f Author: John Bowman Date: Wed Feb 28 00:09:49 2007 -0600 Impose -finline-limit=400 on old (< 4.0.0) compilers to greatly speed up compilation. commit 94461d882cc2220b0a3f1cf90be4266e776efa6d Author: John Bowman Date: Tue Feb 27 21:00:26 2007 -0600 Put global name space qualifications in new common.h file. commit 09c9b3fa75c27d24b1b5c878ac4b168cefbda878 Author: John Bowman Date: Tue Feb 27 11:08:33 2007 -0600 Make tex pipe aware of a previously generated aux file. commit cb136567a0559ceb1e03cbbda415fc09730b92b8 Author: John Bowman Date: Tue Feb 27 09:58:53 2007 -0600 Fix makefile dependencies. commit cd0a6ca21f10584d53ce99755d1b1d613b8e6750 Author: Andy Hammerlindl Date: Tue Feb 27 08:42:56 2007 -0600 Fixed inTranslation to handle frames for loops. commit 3be97ec517574378d66b17fdd56fffa648f4c4b0 Author: John Bowman Date: Tue Feb 27 01:10:31 2007 -0600 Temporarily fix svn builds. commit 1b0ecce40c2506006f6cc50a02c4e627eae7f375 Author: John Bowman Date: Tue Feb 27 00:50:54 2007 -0600 Temporarily disable aux file input. commit 19cbe577536297a610ab82d0594cf319790f8f10 Author: John Bowman Date: Tue Feb 27 00:40:30 2007 -0600 Fix further memory leaks. commit e9d3303233bca786e89f4e93e350ae47bf7d745c Author: John Bowman Date: Mon Feb 26 23:10:23 2007 -0600 Fixed segmentation fault. commit 958c6cef19c04de0233b8c74f225b92622a96832 Author: John Bowman Date: Mon Feb 26 22:53:35 2007 -0600 Possible workaround for Makefile problem on Debian. commit 8d5616d89c2ee990f99f41cd77f09ae0c3033340 Author: John Bowman Date: Mon Feb 26 22:37:06 2007 -0600 Fix memory leaks by using mem::string, mem::istringstream, mem::ostringstream, and mem::stringbuf everywhere. commit c1c5d708a113372efded3d150becdaaf448939e6 Author: Andy Hammerlindl Date: Mon Feb 26 20:03:46 2007 -0600 Explained lifetime of loop variables. commit 0f5fdcb427cb50132a5fd75fcc3ea66afd6c339e Author: John Bowman Date: Mon Feb 26 18:22:21 2007 -0600 Update discussion of local variable allocation in loops. commit 8fa2bbc07e668d81994fe7c5a175785e2c846625 Author: Andy Hammerlindl Date: Mon Feb 26 10:07:53 2007 -0600 Added documentation on static qualifiers in loops. commit 24ebb6ed94fc72834fc65c5810bfb32fc86cb70d Author: Andy Hammerlindl Date: Mon Feb 26 09:41:28 2007 -0600 Removed completed TODO item. commit 1e853994a00f8f03ff38224f72c45938fc5341a6 Author: Andy Hammerlindl Date: Mon Feb 26 09:40:41 2007 -0600 Allocate variables in a loop iteration in their own frame. commit b02f3e9e89a9a238776865964130c6f59acc81b0 Author: John Bowman Date: Mon Feb 26 01:36:35 2007 -0600 Force outputformat to "pdf". commit 9774670154436e67834ffa5aa1bbc318e08e19be Author: John Bowman Date: Mon Feb 26 01:35:40 2007 -0600 Set outformat to pdf. commit aa62a61b2cfd4bbd17921f16efd87361bed9f7d4 Author: John Bowman Date: Mon Feb 26 01:34:34 2007 -0600 Remove unwanted texput.pdf file. commit 1f79220f7fabf8fa77bc793ff6496fd13f3b8ad0 Author: John Bowman Date: Sun Feb 25 12:22:00 2007 -0600 Load color package even for TeX pipe. commit 4704954e697f43814036a265aa24167a44094110 Author: John Bowman Date: Sun Feb 25 12:12:13 2007 -0600 Formatted. commit a22b8a5f2ed5c58ecb71011b002aea4bb18f6cf4 Author: John Bowman Date: Sun Feb 25 12:01:12 2007 -0600 Avoid duplicate .aux file inclusion (and duplicate labels). commit 8457c22a764d521431306d6e5f2ee35f696bfeb1 Author: John Bowman Date: Sun Feb 25 10:54:30 2007 -0600 Removed extra blank lines in tex pipe diagnostics. commit bcd456adaa56865795a56fd79e30c06035eb3906 Author: Philippe Ivaldi Date: Sun Feb 25 09:08:43 2007 -0600 Improve the function 'perpendicular' of geometry.asy. Add operator +(margin,margin) in plain_magin.asy. commit 7e615740d62fb8a03a860096dbe171a24629ad26 Author: John Bowman Date: Sun Feb 25 09:02:11 2007 -0600 Simplified bullet command. commit 39ebe210dbaf2d88b8718f2c133e67b30a3b2976 Author: John Bowman Date: Sat Feb 24 20:47:11 2007 -0600 Load correct base files. commit dd1c4f3889bcf345d3ecc51c073a943cf2e18fb3 Author: John Bowman Date: Sat Feb 24 18:23:36 2007 -0600 Simplify skeleton routine interface. commit a3bef6031cc2d11cacaa9591384e5944e34a5f22 Author: John Bowman Date: Sat Feb 24 18:15:39 2007 -0600 Split skeleton routines to provide finer control. commit 6c5626ec4b4ddfd42d290201f7380d6fced6697a Author: John Bowman Date: Sat Feb 24 10:52:09 2007 -0600 Turn off setlocale warnings when not debugging. commit eb64a46e3c5258f2ab2961806137d68432cff2f8 Author: John Bowman Date: Sat Feb 24 10:51:43 2007 -0600 Use namespace setitings. commit 0e186293fc0ef7e9f1f225a3eeb9352befef0a47 Author: Philippe Ivaldi Date: Sat Feb 24 04:52:50 2007 -0600 Correction of ps/pdf-view-command documentation. commit f04de4b85808c9ea00408d5980193a6c4131e399 Author: John Bowman Date: Thu Feb 22 14:21:01 2007 -0600 Fix hyphens and formatting in man page. commit 87be657999a27707a9f350d12af9c5bc397ffbdd Author: John Bowman Date: Thu Feb 22 14:06:48 2007 -0600 Change autorotation to true. commit 7b0e270e5d124a8461eef2e0bf16358ce23e5704 Author: John Bowman Date: Thu Feb 22 13:49:10 2007 -0600 Updated Debian binary site. commit 7250ad829c9c7ff62af5f6b7becf6e9b87f0831f Author: John Bowman Date: Thu Feb 22 01:36:59 2007 -0600 Generate more missing files. commit 2838d55fb10875f0b1e3a5507a5d56ed5a3fda01 Author: John Bowman Date: Thu Feb 22 01:34:49 2007 -0600 Autogenerate missing files. commit 89d1e10b78ece25ee7d849842c3d1b67d0d21a24 Author: John Bowman Date: Thu Feb 22 01:17:06 2007 -0600 Make eof set fail bit. commit dd617e23ff042a645799765c026d957a26174abb Author: John Bowman Date: Thu Feb 22 01:14:51 2007 -0600 Make eof set fail(). commit c8ef33f8c97613f20661d59e66e8adb203dd3298 Author: John Bowman Date: Thu Feb 22 00:45:12 2007 -0600 Removed duplicate sentence. commit 2d3e33840a04de9dfe992aa7e6918bc2123c0233 Author: John Bowman Date: Thu Feb 22 00:43:07 2007 -0600 Added introductory Asymptote slide presentation (intro.pdf). Added keepaux option to keep intermediate LaTeX aux files. Added example filegraph.asy of graphing columns of data from a file. commit 6d3d08232d56387bf8bf380dd2276e00f5dbca82 Author: John Bowman Date: Wed Feb 21 22:40:34 2007 -0600 Fix logarithmic tick labels near the machine epsilon. commit 7cb527aa0f797fac93c55361a73b681520d79b1a Author: Philippe Ivaldi Date: Wed Feb 21 11:29:15 2007 -0600 typo correction. commit a99f04bf33f835cd01e18992f017c054ecd23a65 Author: John Bowman Date: Wed Feb 21 10:56:54 2007 -0600 Remove alien to deb conversion documentation. commit 38901d8c23decbfa17f315764c8df364bed9b0d6 Author: John Bowman Date: Wed Feb 21 10:47:55 2007 -0600 Support slide bibliography under pdflatex. Add string file(string) which reads file as a string, and verbatim typesetting command. commit d55d529c634b42bbdfb154599846e194077931e4 Author: John Bowman Date: Tue Feb 20 22:52:11 2007 -0600 Added missing space. commit 0db3c87ea569656db60ae7b6c9c14c34d26a9278 Author: John Bowman Date: Tue Feb 20 00:01:03 2007 -0600 Fix typo. commit 67315f9b3532b56be11642bb4658c40bcc8d0660 Author: John Bowman Date: Mon Feb 19 23:52:40 2007 -0600 Added backgroundcolor and foregroundcolor. commit aab77966ac5949fe473ff6ba8283c013f405adbf Author: John Bowman Date: Mon Feb 19 23:51:23 2007 -0600 Implement colorspace command for extracting colorspace of pens. commit e3d25c1625df9a46f7931ca4ee11785cbfa40fef Author: John Bowman Date: Mon Feb 19 23:50:50 2007 -0600 Implement verbatim command. commit 29f7efe9c211530c3644174e85a615802390af83 Author: John Bowman Date: Mon Feb 19 10:58:21 2007 -0600 Incremented version to 1.22svn. commit 530cee38deab33c6bb6f258343780dd50f115064 Author: John Bowman Date: Mon Feb 19 10:08:21 2007 -0600 Fixed cxx warning. commit 71299d099650766e53d29a402955fe21dd802e91 Author: John Bowman Date: Mon Feb 19 09:56:20 2007 -0600 Fixed typo. commit 3d95261cbf08da1f78eeae90649f139955bf0d1f Author: John Bowman Date: Mon Feb 19 09:18:14 2007 -0600 Allow DEFCOLOR when promoting colorspaces. commit 1648096a4682a22040b6b5d25ffcfcc3ae8e9b8c Author: John Bowman Date: Mon Feb 19 01:54:23 2007 -0600 Automatically promote colors to highest colorspace in shading and image routines. Fix grayscale and cmyk latticeshading. Significantly increase speed of image processing by caching bw, gray, rgb, and cmyk settings in a global variable. commit 060ec7b110baba9ce843160f0496e3374d74bbfb Author: John Bowman Date: Mon Feb 19 01:51:41 2007 -0600 Update documentation of Linear scaling type. commit 739e7799707acc2b40df1bdde077f161e3c36212 Author: John Bowman Date: Mon Feb 19 01:50:14 2007 -0600 Check array bounds. commit 68a728cd54aa6f5a2938385a7cadaa978eb55e63 Author: John Bowman Date: Mon Feb 19 01:49:34 2007 -0600 Collect double-vertex contours. Increase epsilon. Fix contour fill routine. Separate contour fill routine from palette computation. commit 8e88b7bece6699bf201b38c3b9014c17b64a9d6a Author: John Bowman Date: Mon Feb 19 01:42:43 2007 -0600 Added Philippe's improved show-function-at-point fix. commit 3296b1030ef1efdcdf4aef9f98a9c8a146356b25 Author: John Bowman Date: Sun Feb 18 13:58:55 2007 -0600 Delete any existing *asy-help* buffer in asy-show-function-at-point. commit b077b3cc360fdd8db29b7000f313cfb06ce657be Author: John Bowman Date: Sat Feb 17 10:37:26 2007 -0600 Improve tick calculation when Step > 0. commit bc65ba3bfa7df77f6595c01157b7c17f8cba7b0c Author: John Bowman Date: Sat Feb 17 09:47:45 2007 -0600 Fix tick calculation. Improve zero detection. commit 7ad2d1586877b6f20100d015ef5eb635774a5c44 Author: John Bowman Date: Sat Feb 17 04:48:15 2007 -0600 Fix tick label scaling. commit c4c4905a39c572319effb6827fcbf9aefba011d6 Author: John Bowman Date: Fri Feb 16 22:19:34 2007 -0600 Remove vv from settings module. commit 8329e569bc7165fa1e527de6b6f7ad1373a27aa7 Author: John Bowman Date: Fri Feb 16 10:23:29 2007 -0600 Resolve -vv ambiguity. commit 09b37eb90a3ac72ce0bcb9961a15f7896d5684d8 Author: Philippe Ivaldi Date: Thu Feb 15 05:00:02 2007 -0600 Fix typo. commit 998c2fa3deac0139446767d0f9f65d274935419a Author: John Bowman Date: Thu Feb 15 00:37:14 2007 -0600 Fix spurious vertical shifting of bullets. Reimplemented figuremattpen. Make bibliography visible in reverse video. commit 9e6233395b63bbc959ffaacd6f319164db6703cf Author: John Bowman Date: Wed Feb 14 15:02:00 2007 -0600 Added --version option. commit c030c15fbca03914b0210fab3470799af5af718c Author: Philippe Ivaldi Date: Wed Feb 14 05:51:45 2007 -0600 bug fix in asy-show-function-at-point commit 9aa9f39611d0e229b6ac79942e73896168ea51e6 Author: John Bowman Date: Wed Feb 14 00:56:41 2007 -0600 Resolve ambiguity in intersectionpoints. commit bec36677558ed0cafb33667d4f0f1a6bafdd4f21 Author: John Bowman Date: Tue Feb 13 23:41:42 2007 -0600 Add rotated option to mark_uniform to rotate marker frames by angle of local tangent. commit 0c4f5d2faeaedf7d632b90520a7bb18df8434632 Author: John Bowman Date: Tue Feb 13 23:40:33 2007 -0600 Ignore empty picture bounds when adding pictures; simplify userBox and userClip. commit d0f942ed145abf11fde2fa9d8477bee8e23d06f9 Author: John Bowman Date: Tue Feb 13 16:08:01 2007 -0600 Update to latest autoconf install-sh and patch it to ignore -p option. commit 98607cc485eaeee9eb2d4c0302472ed7a1c9644e Author: John Bowman Date: Mon Feb 12 22:44:06 2007 -0600 Add an ASYMPTOTE_SITEDIR environment variable listing additional directories to use for generating asy-mode.el keywords. commit aa2f07afb124f788a8907694b27eca8d4e6b3d8d Author: John Bowman Date: Mon Feb 12 22:19:14 2007 -0600 Document new interactive calculator feature: expressions entered at the interactive prompt are automatically evaluated and written to stdout (provided a corresponding write method is defined). commit 4567f5d9838154710e983302f326abe95b76a8d7 Author: John Bowman Date: Mon Feb 12 21:47:36 2007 -0600 Add patch to fix an incorrect Boehm garbage collector prototype in the file gc6.8/include/gc.h (version 6.8). commit 22d41dda2545b641c1a2832345a92b0d391ace23 Author: John Bowman Date: Mon Feb 12 15:53:52 2007 -0600 Added texcommand to allow one to override the tex engine command name. commit 1c62d3d8c1bb514fb97eacf3b07333b80d304ce1 Author: John Bowman Date: Mon Feb 12 13:54:38 2007 -0600 Apply gc6.8 GC_INIT patch for AIX systems. Document gcc3.3.2curses.patch. commit c90f96075d63fbc599687077100c6418a7395710 Author: Philippe Ivaldi Date: Mon Feb 12 09:11:48 2007 -0600 Minor edit. commit c388257e763a4f2ae366b5d744f7779f5fa70429 Author: Philippe Ivaldi Date: Mon Feb 12 08:51:18 2007 -0600 Add brief documentation of lasy-mode, typing correction. commit 37491da9333a05505bbc8e0bbb0f78ba7fa08ddc Author: John Bowman Date: Mon Feb 12 00:04:47 2007 -0600 Fixed cxx warning message. commit fe1ac1c604b6a40966bf995547555fd2e9ec6245 Author: John Bowman Date: Sun Feb 11 23:51:14 2007 -0600 Fix compilation under -DNOHASH. commit e8fe41e5a84de4de2cc1bf3c5246afacf3cddb48 Author: John Bowman Date: Sun Feb 11 23:36:38 2007 -0600 Portability tweaks. commit 1a97f4303dd1bd63c322cb10d755d7dba573cc36 Author: John Bowman Date: Sun Feb 11 22:58:27 2007 -0600 Use more portable context patch. commit 6d0b90232ea1539b61a780bdb8e3235ea63719fe Author: John Bowman Date: Sun Feb 11 22:47:20 2007 -0600 Make patch more portable. commit 0bbc03244b2fa3a5c4793db2f3f7601617fe41e3 Author: Philippe Ivaldi Date: Sun Feb 11 20:07:13 2007 -0600 add (require 'wid-edit) commit 9c7416d268c126574b1e00969e3c49decb5a5f00 Author: Philippe Ivaldi Date: Sun Feb 11 19:55:37 2007 -0600 Links pointing to the files are added when one shows for the command at the cursor by the key binding C-c ? within asy-mode. commit 6da0c5ac38364b2038385d0dc288ea99c24caf38 Author: John Bowman Date: Sun Feb 11 15:32:47 2007 -0600 Add Andy's patch to store positions of definitions in entry class. Add a --where option to make --listvariables show where global functions and variables are declared. commit f7b7688158acd70cdfc1c3f3c32563716fa9c63c Author: Andy Hammerlindl Date: Sun Feb 11 11:32:21 2007 -0600 Fixed typo. commit 4c19d68b2e0e5fff7cf4b5b0f010aa058de60fd8 Author: Philippe Ivaldi Date: Sun Feb 11 08:42:07 2007 -0600 Allow to type when viewing compilation result within lasy-mode. commit 6d12264abfcc6c1dfa3326b9aec75c74bf113e8f Author: John Bowman Date: Sat Feb 10 22:57:26 2007 -0600 Fixed typo. commit b1e2adb3b5dc60d570cf8297cd7add44362efb7a Author: Philippe Ivaldi Date: Sat Feb 10 10:28:02 2007 -0600 Support of the options of the environment asy and better management of the errors within lasy-mode. commit bdb5876f7d51333e90292bab9acb70970a5927ea Author: John Bowman Date: Sat Feb 10 00:36:57 2007 -0600 Revert to gc6.8.tar.gz due to rpmbuild segmentation fault. commit fd4329a37e509b7f47342d4eba7e1f91c1d9d032 Author: John Bowman Date: Fri Feb 9 23:42:54 2007 -0600 Added surface operator * (transform3 t, surface s). commit abd9551f6272a590b9109fddb6c662fa7ec8cb32 Author: John Bowman Date: Fri Feb 9 23:24:08 2007 -0600 Check for out of bounds mesh size and array indices. Use size(frame) function for max(frame)-min(frame). commit 3312cca7b3d00b4902f45347fdd55dd2b0285d7b Author: John Bowman Date: Fri Feb 9 23:18:43 2007 -0600 Check for attempts to create negative-length arrays. commit 769c4d4bd69f1ff1d0d9cf18dc53161e1f40347f Author: John Bowman Date: Fri Feb 9 22:08:29 2007 -0600 Removed unused line. commit c9afe9d8c76477e6bbbb197167584b759e63ab36 Author: John Bowman Date: Fri Feb 9 20:53:22 2007 -0600 Implement an interface for drawing an arbitrary binary tree. commit fba9e659a0cf5f0d916c038ab496888da351f84e Author: John Bowman Date: Fri Feb 9 16:55:23 2007 -0600 Document GNU make requirement. commit 5f58b7ce5a7f53a42a1ae3f32f5728f8debb7a95 Author: John Bowman Date: Fri Feb 9 16:54:18 2007 -0600 Changed capitalization. commit 1ecec67510e605f657c87377ad9cfdd7dee79b2f Author: John Bowman Date: Fri Feb 9 16:46:39 2007 -0600 Ensure curses routines are declared with "C" linkage. commit dc38dd518284ac9e386a2f88cba8e179945c8dab Author: John Bowman Date: Fri Feb 9 15:57:52 2007 -0600 Work around broken curses.h files. commit b1606ac1b54a3bfeae1a50f2e857e9bf0678b236 Author: John Bowman Date: Fri Feb 9 13:37:34 2007 -0600 Renamed patch since this apparently affects both AIX and SGI systems. commit 8c0137405e6e96d01f315f3ac5b15c6764e42cb6 Author: John Bowman Date: Fri Feb 9 01:27:54 2007 -0600 Fixed bounding box computations of paths drawn with transformed pen nibs. Implemented optional labelpath interface to PSTricks pstextpath macro for drawing curved labels along paths. Updated to gc-7.0alpha7. commit bcf82b8e9feaebcb73dbc0d7068fe6ec276d8368 Author: John Bowman Date: Thu Feb 8 18:26:46 2007 -0600 Revert premature changes. commit 35040851ca57497a1dadd0536e6e7cb4e4426e30 Author: John Bowman Date: Thu Feb 8 10:48:07 2007 -0600 Added wait option that waits for all child processes to terminate (to work around emacs child-killing bug). commit 6743274ad35977ff9363d146c5558f8aa707b19a Author: John Bowman Date: Tue Feb 6 14:57:37 2007 -0600 Minor edits. commit 320742785a08abb9fb6b78db95835a2b1abbd9c6 Author: Philippe Ivaldi Date: Tue Feb 6 11:16:33 2007 -0600 Cleaning code, resolution conflict math-mode/lasy-mode, add options for compilation and management of errors. commit 2290dec816dc2a6232f21f30c9317121c7e1ef0b Author: John Bowman Date: Mon Feb 5 08:08:03 2007 -0600 Added patch for old broken gcc3.3.2 curses.h file under AIX. commit 4042666bd1a4988a825ec1849c5677cc230e363b Author: John Bowman Date: Sun Feb 4 19:26:12 2007 -0600 Optimize intersectionpoints. commit 5502059281016c7de55403e44f99d89fe231b2d4 Author: John Bowman Date: Sun Feb 4 19:08:11 2007 -0600 Added routine intersectionpoints(path p, path q) that returns an array of all intersection points of paths p and q. commit 460e2d1f6182b2d97242490eb2adda04a425eb9d Author: John Bowman Date: Sun Feb 4 18:50:53 2007 -0600 Fill squares. commit bb2c743ee8d20e0e30b52670c48b7d18f1dffe10 Author: John Bowman Date: Sun Feb 4 11:21:53 2007 -0600 New items. commit a8f23e8c889e9f1893512712626af44609567d61 Author: John Bowman Date: Sat Feb 3 22:48:07 2007 -0600 Make the user-specified tick functions work consistently with the auto-generated tick routines; the actual tick value is now passed to the ticklabel formatting routine, even in the case of logarithmic axes. Separate the tick generation and drawing routines and add a tickmodifier routine to give users complete control over which of the auto-generated ticks actually get drawn. commit 5622457a7f048fad5382ff935ee48c1226537a5d Author: John Bowman Date: Sat Feb 3 16:38:42 2007 -0600 Add bibliography example to slidedemo. commit 0b89cd153c13bde0ce630345f1e701104bf7570f Author: John Bowman Date: Sat Feb 3 12:48:57 2007 -0600 Add fuzz to textwidth and textheight to avoid overfull vbox. commit ddc5436324f83a005af69b9cd3da9168d293accc Author: John Bowman Date: Sat Feb 3 03:33:38 2007 -0600 Implement slide presentation BibTeX citations and reference list. commit ed82d85f4cc623545ffa56b84960140f180b9eca Author: John Bowman Date: Thu Feb 1 00:41:43 2007 -0600 Set autorotate in PDF landscape mode, rather than forcing pdflatex. commit e0a2cfc3e4f1f843e0b091251262dacc535a80db Author: John Bowman Date: Tue Jan 30 11:35:17 2007 -0600 Leave the pair to angle conversion to dirSpec. commit d0bf991ec29c0f64e674144ad712c71035f377c2 Author: John Bowman Date: Tue Jan 30 03:12:58 2007 -0600 Document skeleton structure. commit a5dbc91b7d38d4a00fd3ac8058d3791295a2f68f Author: John Bowman Date: Tue Jan 30 02:59:34 2007 -0600 Mention Imagemagick dependency in Windows installation notes. commit 9cfcdfd2373f4cecdfc0e14c3094ec2676eca8ac Author: John Bowman Date: Sun Jan 28 20:00:41 2007 -0600 Added Tobias' binary tree module. commit af67f65d329659d8f09f72ddc6e4a0c86bfabbc5 Author: John Bowman Date: Sun Jan 28 15:51:04 2007 -0600 Added Philippe's grid3 contribution for drawing 3D grids. commit 2183fd2b95de35f28ae290475098b348c7393f8c Author: John Bowman Date: Sun Jan 28 12:59:14 2007 -0600 CYGWIN updates. commit bff9813318d27712c88d95b3644c6cbbb3422e91 Author: John Bowman Date: Sun Jan 28 11:29:02 2007 -0600 Make definition of pair I=(0,1) explicit. commit 0676c7ca4c969ea1e5c2a00715bc927e404be527 Author: John Bowman Date: Sat Jan 20 15:15:16 2007 -0600 In inline latex usage, do not scale picture by default. Use \begin{asy}[\the\linewidth] to recover previous default of scaling to line width. commit e1c6822967164b7f84ef8138731f643beea685af Author: John Bowman Date: Thu Jan 18 23:28:21 2007 -0600 Implement transparency for shading and image objects. Allow one to disable Gouraud shading when nsub=1. Allow draw(nullpath3..cycle3). commit 8e6c49af4cc0152189c19102b6af9450b2e38f8f Author: John Bowman Date: Thu Jan 18 04:44:16 2007 -0600 Minor improvements. commit 21d936a6f39423cd9dad1306b64ae505f81b691d Author: Andy Hammerlindl Date: Tue Jan 16 22:00:37 2007 -0600 Automatically write expression statements at the prompt. commit a3ed3d9f8f860be6b58e55aed37301b20834e28f Author: John Bowman Date: Wed Jan 10 18:39:03 2007 -0600 Added missing tickmin and tickmax bounds. commit fe6f7fa300b309fc6a9efac47edb7b58fc227b3a Author: John Bowman Date: Fri Jan 5 15:27:17 2007 -0600 Removed unused code. commit 942c58e014617c5aa10f371666aff13cd62ea820 Author: John Bowman Date: Thu Dec 28 23:56:30 2006 -0600 Incremented version to 1.21svn. commit e93e77fbf5760e54dac1e34a272eaf8e68995cfc Author: John Bowman Date: Thu Dec 28 23:16:22 2006 -0600 Fixed cxx warnings. commit b149b00628a00c8997c83ba17028123f6706ea9f Author: John Bowman Date: Thu Dec 28 22:42:55 2006 -0600 Cleaned up cd diagnostics. commit 0484808a98b46807b50a356938d768156571144f Author: John Bowman Date: Thu Dec 28 22:22:32 2006 -0600 Simplified example. commit f948d9fd2a2e58af5ea2777d795a846efe28e5fc Author: John Bowman Date: Thu Dec 28 22:19:01 2006 -0600 Fixed incorrect offset in palette. Added routine to fill cyclic contours and example. commit fd3d40f61129392f0a95b2ef983b2ec0d30bb6fc Author: John Bowman Date: Thu Dec 28 11:01:47 2006 -0600 Added command-line option to set current directory. commit 57e3dc524f51a3e99872048372017ec97d5c2c15 Author: John Bowman Date: Thu Dec 28 09:55:13 2006 -0600 Generalized example. commit d93a8963d04f5dee344fab4a80d77cb53fbdf75e Author: John Bowman Date: Mon Dec 25 07:15:20 2006 -0600 Updated FAQ. commit e9d78222d9e0718942fb4a68728c73302063e395 Author: John Bowman Date: Mon Dec 25 06:31:43 2006 -0600 Clean up Getenv code. commit fc08f980d32c8ac4ce0ade1571a0542b81a5f417 Author: John Bowman Date: Sat Dec 23 16:51:41 2006 -0600 Fixed texpath and diagnostics under MSWINDOWS. commit 3c0eecc0ed831ffe777369bb4bb091cb94220fe1 Author: John Bowman Date: Sun Dec 17 10:45:04 2006 -0600 Remove texmathp stuff since this duplicates features in >= AUCTeX 11.82. commit feb9da7b8257ef209e3278b2f87b41c59ec2cd52 Author: John Bowman Date: Sat Dec 16 15:44:50 2006 -0600 Make asy-mode respect TeX-electric-sub-and-superscript. commit 0082575ea324c018b1ab5f74db63c9e02b38c9cb Author: John Bowman Date: Thu Dec 14 11:42:16 2006 -0600 Improve loading/including diagnostics. commit 50ac54c6ef5594ab8f8773f6d12a153c7dadc0cd Author: John Bowman Date: Thu Dec 14 10:54:15 2006 -0600 Fixed defaulttransform (e.g. to allow forcing of yaxis label angle). commit a56b9a2c982ddee6627d3b8d547acd4583504096 Author: John Bowman Date: Thu Dec 14 02:32:35 2006 -0600 Optimize real argument point, postcontrol, and precontrol functions. commit d975c6f1f6fd2bcd4c5ae71a892eddb4725763c2 Author: John Bowman Date: Wed Dec 13 16:16:24 2006 -0600 Simplify example. commit 5fe5f889e7f3b60d28f743938f0078a60e51ea2e Author: John Bowman Date: Wed Dec 13 13:06:37 2006 -0600 Improve discussion of Bezier curve subdivision. commit 77e618b22206cc463b4b992cf06214c04b53553b Author: John Bowman Date: Wed Dec 13 02:36:09 2006 -0600 Slow down wheel animation. commit aac2e48a515a1eaacdb8002f8c7653dfd3eb1f24 Author: John Bowman Date: Wed Dec 13 01:18:33 2006 -0600 Incremented version to 1.20svn. commit d7890f4c911721a8888a48dfd2defa9ca322f726 Author: John Bowman Date: Tue Dec 12 19:11:44 2006 -0600 Emphasize that multiline mode is a setting that can be turned on and off within interactive mode. commit 2ae5f0146df9bdb5253ccb392bf56bf20e8e72f5 Author: John Bowman Date: Tue Dec 12 17:17:30 2006 -0600 Minor documentation updates. commit ba0d38fb3bc7f70abafe5f7567177d8d0dc71c20 Author: John Bowman Date: Tue Dec 12 13:01:14 2006 -0600 Make cd() reset path to program startup value. commit 799f9abedc6066e2ffa5d2ef160309808e6ed55e Author: John Bowman Date: Tue Dec 12 12:47:29 2006 -0600 Updated documentation; fixed cd argument renaming. commit 592297a5493a9988cdf9333e37694e731d1e119f Author: John Bowman Date: Tue Dec 12 12:17:43 2006 -0600 Interactive reset should not reset current path. commit 6a918d048a7eb6fb6cc5dc0951c4541de2f04ad0 Author: John Bowman Date: Tue Dec 12 04:05:00 2006 -0600 Shift cylinder so that axis is c--c+h*unit(axis) for consistency with cone and generalized cylinder routine. This change is backwards incompatible. commit 4d3f02e34615f1b18b2e14d065ea5fd392e4cb51 Author: John Bowman Date: Tue Dec 12 03:29:45 2006 -0600 Updated svn instructions. commit 4b2793891d4bde829ede86a2cb802f6fab97b823 Author: John Bowman Date: Tue Dec 12 03:25:22 2006 -0600 Implemented preliminary Bezier surface package. commit 3cbdc8e412cfecab2c25378692dd8bb743c7a461 Author: John Bowman Date: Tue Dec 12 03:09:10 2006 -0600 Require Common Lisp extensions. commit 0be9332591649e2d31655440295b9a4f9d2b3d53 Author: Andy Hammerlindl Date: Fri Dec 8 19:59:58 2006 -0600 Added support for meaningless slashes at ends of lines. commit 75f727b5e8009f1735d22e30d67e25de44e2abd1 Author: John Bowman Date: Fri Dec 8 12:06:02 2006 -0600 Fixed cxx errors. commit 3a3c973590cdc283b9999a06b1a861371ef75550 Author: John Bowman Date: Fri Dec 8 11:12:41 2006 -0600 Andy's port to nonbash shells. commit d04d9e3e929fd00402740e1c2ce40b746da9581b Author: John Bowman Date: Fri Dec 8 03:02:12 2006 -0600 Fix epstopdf conversion of empty or tiny files. commit 087e28c569c90006b21984f3beb45766c1a9778a Author: John Bowman Date: Fri Dec 8 02:46:52 2006 -0600 Improve tex error handling. commit 77bb38ecd311f9df362cde2a070d64bdbb914399 Author: John Bowman Date: Fri Dec 8 02:05:47 2006 -0600 Fix clipping in inline tex mode. commit 082f53960ca57b5dd2624d0362db130cb4742f0f Author: John Bowman Date: Fri Dec 8 01:49:43 2006 -0600 Fixed clipping. commit 1147cc2d94edfd43f5c3a74989558c4bf7be4b24 Author: John Bowman Date: Thu Dec 7 22:41:18 2006 -0600 Fixed inlinetex mode. commit 2482b4e78091adfe4bb41c0346e37dbbd41f2067 Author: John Bowman Date: Wed Dec 6 23:45:16 2006 -0600 Repair tex pipe on missing math mode error. commit 359e08078ca660615441f4bbda493f07ed54aa71 Author: John Bowman Date: Tue Dec 5 15:13:45 2006 -0600 Use path instead of a guide. commit 3f35adc02e203e38bcaf0c1eb809e7da2467c8d8 Author: John Bowman Date: Tue Dec 5 15:13:19 2006 -0600 Remove explicit internal control points. commit 62992e7115c828486cacdd129b501c5280c4edfd Author: John Bowman Date: Tue Dec 5 15:12:37 2006 -0600 Remove bashism. commit 31d267c642b285b910c10ac7c7d36270642bbc6b Author: John Bowman Date: Mon Dec 4 12:38:44 2006 -0600 Standardize flowchart argument names. commit edf855ad0f9cc5b443dd2a2537ade28fad528a88 Author: John Bowman Date: Mon Dec 4 01:37:40 2006 -0600 Simplify flowchart block size calculation. commit eca530722546fb201f7e2c36087668e55ff06f45 Author: John Bowman Date: Mon Dec 4 01:18:33 2006 -0600 Make flowchart routines work with pictures as well as frames. commit e280d4eb846978b79faf2c13072bd8fa42d997e0 Author: Andy Hammerlindl Date: Sun Dec 3 22:57:16 2006 -0600 Added note on backslashes. commit 358cf9043de1378c8c18230b8e4da0d09a1670e7 Author: John Bowman Date: Sun Dec 3 11:46:53 2006 -0600 Renamed object constructor to draw. commit 3521ace7c8d3588a26cc4180731e53a6e14d116e Author: John Bowman Date: Sun Dec 3 11:33:49 2006 -0600 Implement add(picture pic=currentpicture, drawer d); commit 335405299efca708634efa1a8914e849e84f3ade Author: John Bowman Date: Sun Dec 3 10:56:26 2006 -0600 Replace labelframe by existing object structure. commit be667c03682ade8d1a1f4ac5a29d6694c89c1870 Author: John Bowman Date: Sun Dec 3 00:00:26 2006 -0600 Renamed envelope to labelframe and container to envelope. commit 971e339c2404266220d1aa2b3a47937c044b3787 Author: John Bowman Date: Sat Dec 2 23:19:41 2006 -0600 Introduce an envelope structure for supporting picture scaling when drawing boxes around labels. commit 9c6ec1a60ea1fc573b5350b58f2dc771db941c88 Author: John Bowman Date: Sat Dec 2 23:17:56 2006 -0600 Updated to use new intersect routine. commit 1e1903f2ace7734b5f68aab18749129b45caf318 Author: John Bowman Date: Sat Dec 2 23:13:45 2006 -0600 Added fractral tree example. commit d4f5146c773422f65b7a7a652f1723eeb6301f69 Author: John Bowman Date: Sat Dec 2 17:25:09 2006 -0600 Make intersect return an array of reals rather than a pair. In addition to being more logical, this helps avoid confusion between intersect and pair intersectionpoint(). Autogenerate usage info in manual and man page. commit 8f2688c4e68120ff8ed18a41bd28858d1ae9f1b8 Author: Andy Hammerlindl Date: Fri Dec 1 23:10:09 2006 -0600 Backslash now continues a line on the interactive prompt. commit 0a4d35d81ba0ee6578c3d585c823762edc107297 Author: John Bowman Date: Fri Dec 1 21:52:09 2006 -0600 Minor diagnostic improvements. commit 80e67f1986502df4ff6f2bab7374dc220e7d4ccf Author: John Bowman Date: Fri Dec 1 18:33:22 2006 -0600 Fixed compilation failure without GC_DEBUG. commit fc53ce97a16a28720671a41425923a5473a6ff30 Author: Andy Hammerlindl Date: Fri Dec 1 10:08:14 2006 -0600 Added gc debug option. commit f3afd793ab03d434687d893ae74f234cfb177a3a Author: John Bowman Date: Fri Dec 1 09:44:32 2006 -0600 Remove shift from transform in Rotate(pair). commit c6c6cfee767553835b1806317af54d3f63e9be22 Author: Andy Hammerlindl Date: Thu Nov 30 22:52:19 2006 -0600 Added multiline option for prompt. commit a9e4ee9ae1e6867146b34bc45e632947cf85d892 Author: John Bowman Date: Thu Nov 30 09:54:39 2006 -0600 Renamed pdfanim.sty to pdfanim_temp.sty pending 0.53 release of official pdfanim version. Delete temporary image and multipage PDF files used for animations. commit 12f49ce5083e96e35689cc79586b760be46003b2 Author: John Bowman Date: Wed Nov 29 14:36:09 2006 -0600 Added Rotate(pair), fixed alignment positioning transformation. commit 97ce9f2b9fa5bc72ec0ba3e68adb036f88d355de Author: John Bowman Date: Wed Nov 29 14:04:47 2006 -0600 Changed pdfanim version to 0.52A. commit 3c187c1c591152b6416a8646513c1251e61cf454 Author: John Bowman Date: Wed Nov 29 13:00:23 2006 -0600 Split slidedemo.asy into slidedemo.asy and slidemovie.asy. Minor diagnostic and documentation tweaks. commit bb418bf9a852bbf921008ecc37e365a430d97206 Author: John Bowman Date: Wed Nov 29 12:22:35 2006 -0600 Move settings.tex="pdflatex" earlier. commit 298720bfde77c8498325f0f26063be936e039838 Author: John Bowman Date: Wed Nov 29 00:15:49 2006 -0600 Added embedded U3D example. commit d86d918fda1ce14fdbddcca9af50940b3ba2525e Author: John Bowman Date: Tue Nov 28 19:08:46 2006 -0600 Support portable high-quality embedded PDF movies via pdfanim module and portable external movies of other formats via external module. Included enhanced version 0.53 of pdfanim.sty package, with updated documentation. Abort pfdlatex runs with fatal errors and display error. Add optional bounds arguments to verbatim postscript and tex commands. Document how to produce Debian binaries from RPM binaries. Fixed rescaling bug. Allow writing to local directory only; added -global option to override. commit 9c4660b474c5449f69b76cd33ddfec1987469986 Author: Andy Hammerlindl Date: Sun Nov 26 22:50:21 2006 -0600 Free some of the cached data in the abstract syntax tree. commit 0f42d93dbc82bf23f6dec8adc37f7c9e8cad9184 Author: Andy Hammerlindl Date: Sat Nov 25 16:32:18 2006 -0600 Added collapseScope, so empty scopes won't pile up in runnable-at-a-time mode. commit 58ce427f069a2da3eda7d104e7197c02c632b14c Author: John Bowman Date: Fri Nov 17 17:12:36 2006 -0600 Turn off scrolling during debugging. Fixed typo in debugging help. commit 03c6c6068fb90f61624a088a642e484dc0b627b5 Author: John Bowman Date: Fri Nov 17 01:22:16 2006 -0600 Added routine to return an arbitrary point inside a cyclic path g. commit 43c9f351fe406736b2dc2a275ba0283515dc1879 Author: John Bowman Date: Fri Nov 17 01:20:18 2006 -0600 Guard against duplicate nodes in inside(). Speed up inside() by testing for points outside of bounding box. commit 9a327866d951c4b3f6248280a8119c1d222a8034 Author: John Bowman Date: Thu Nov 16 23:24:45 2006 -0600 Fix numerical precision problem in windingnumber routine. commit 577f48d25e9fea4dfb08ba83090d27c753e9af5b Author: Andy Hammerlindl Date: Thu Nov 16 22:14:42 2006 -0600 Reformatted long lines in the code. commit 9a861bce4f1182b5edb00f6b02ae8423cb691b77 Author: Andy Hammerlindl Date: Thu Nov 16 22:03:17 2006 -0600 More string constant formatting. commit fcd109e8c508fb3712e9aa1c3db1e367751466de Author: Andy Hammerlindl Date: Thu Nov 16 21:56:40 2006 -0600 Split string constant to fit on line. (minor) commit 05beb5f4b1648263f022cbdeed9ccf0d5ea690c7 Author: John Bowman Date: Wed Nov 15 18:57:34 2006 -0600 Added string(real x) function. Removed unneeded public qualifiers from documentation. commit 25b8efc835806e797cf729f6717660d0eceef63c Author: John Bowman Date: Wed Nov 15 18:49:19 2006 -0600 Changed == to standard bash = syntax. commit 99174e500e9367159d46911880e6da68aea1f4ca Author: John Bowman Date: Tue Nov 14 23:27:47 2006 -0600 Make winding number of a cyclic path relative to a point visible to users. commit 191093341f48d051baa6b887efa08857594c2049 Author: John Bowman Date: Tue Nov 14 15:40:00 2006 -0600 Added example of cropping to axis limits. commit e778954d5ea29b8874d5b9ac044fd45cf960bfc6 Author: John Bowman Date: Tue Nov 14 15:37:16 2006 -0600 Minor updates. commit 0a71ee69bef119a3aadfe109cc6c8a1d2eb926cc Author: John Bowman Date: Mon Nov 13 23:13:33 2006 -0600 Fixed recently introduced bugs with -o option. commit c87a8031cce6434635653de174e7f959935dec30 Author: John Bowman Date: Mon Nov 13 20:52:15 2006 -0600 Updated examples. commit ee574752f72c6fb17f744fbb2ac2edc47c8af7cd Author: John Bowman Date: Mon Nov 13 20:43:46 2006 -0600 Replace unitsize, xunitsize, and yunitsize arguments of shipout with a independent call to void unitsize(picture pic=currentpicture, real x, real y=x); commit 340f011002f0a7f4e0e047cfecb490702b64db4a Author: John Bowman Date: Mon Nov 13 09:55:17 2006 -0600 Remove unused line. commit bfd594bbf7d80571c8424ad7c2e1267bc339b460 Author: John Bowman Date: Mon Nov 13 09:50:58 2006 -0600 Minor adjustment. commit 728ecea8357736c47a6be76c1c650a9c8dd71c81 Author: John Bowman Date: Mon Nov 13 09:46:54 2006 -0600 Make clipping set truesize coordinate to 0; updated CDlabel to illustrate this fix. commit d851b730623e8c9609470b9e1b93cc4a21ba315c Author: John Bowman Date: Mon Nov 13 09:26:24 2006 -0600 Added umlauts again. commit 151849131a0265f5bcfcb3b1020815fda5ef5589 Author: John Bowman Date: Sun Nov 12 10:45:34 2006 -0600 Minor updates. commit b23fd6682b0e0cf7552d28f9a5ac963b82d988c9 Author: John Bowman Date: Sat Nov 11 23:03:27 2006 -0600 Automatically set the movie bounding box to the largest bounding box of all pictures. Support unitsize, xunitsize, and yunitsize in animations. commit 86e70cd693dca95e361478a3af2e24f77f19a1d3 Author: John Bowman Date: Thu Nov 9 16:00:00 2006 -0600 Update documentation. commit 8c31c2fe98deb2a907d4e00578325db7ea99ca95 Author: John Bowman Date: Thu Nov 9 15:59:31 2006 -0600 Fixed segmentation fault. Add default argument to tensorshade signature. commit 637ed2e58e15704b3d18c5061836405b7c0f2b7a Author: John Bowman Date: Wed Nov 8 23:10:20 2006 -0600 Make seconds() portable (e.g. under CYGWIN). commit 40de37c31ba1bcdce09a59c24a699277cbf1eb1b Author: John Bowman Date: Tue Nov 7 16:51:09 2006 -0600 Minor updates. commit 63259c12dda630e7f03f52e7a4799686245e5765 Author: John Bowman Date: Tue Nov 7 16:27:16 2006 -0600 Overload postRun in iprompt. commit d2e5f03234fae526e4f972b968b200ab536eefac Author: Andy Hammerlindl Date: Tue Nov 7 11:48:58 2006 -0600 Changed a code example to use a variable inside the loop. commit fd27e593c4e00143e9ce10b986e9c339ff727998 Author: John Bowman Date: Tue Nov 7 00:13:11 2006 -0600 Implemented tensor and Coons shading. commit 9b5229cfe22e5deada90a0f3529a4e260e456229 Author: John Bowman Date: Sun Nov 5 03:26:36 2006 -0600 Incremented version to 1.19svn. commit d2680ea19de263f890f1ae59c742f80b48183197 Author: John Bowman Date: Sun Nov 5 01:24:17 2006 -0600 Added example showing interaction of fixed-sized and scaled coordinates. commit 78b54400036a821a936a6554585c98785f9d06f8 Author: John Bowman Date: Sun Nov 5 00:39:41 2006 -0600 Updated FAQ to include discussion of static variable allocation. commit 3838b48d09666a9cd61f3d51c517d3231d65fa2d Author: John Bowman Date: Sat Nov 4 23:38:10 2006 -0600 Make labelx, labely, xtick, and ytick respect graph (e.g. logarithmic) scaling. commit 520a1993a10d6d737022a452ec7f4c566b92fe10 Author: John Bowman Date: Sat Nov 4 18:46:14 2006 -0600 Updated FAQ and documentation. commit 5565a9fca26af7fc9b6c1106e43181a64bcdb454 Author: John Bowman Date: Sat Nov 4 12:49:12 2006 -0600 Treat single reads just like array reads: in line mode, move position past any final eol. commit 26bfa9df7c61d8d2d9540322ed01d6fd65fd30a1 Author: John Bowman Date: Sat Nov 4 02:09:14 2006 -0600 Make bool pdf() and bool latex() visible at asy level. Add string nativeformat(). Update asycolors to remove pstricks dependency. Make slide package work with both latex and pdflatex; remove colordvi dependency. Check for latex mode in usepackage and minilatex. commit d5017510aea05674eb765398f28fb8383bacf077 Author: John Bowman Date: Fri Nov 3 23:25:12 2006 -0600 Fixed clipping (UnFill) problem by avoiding LaTeX \put. commit fef3da8755ee1763e41fb4fe766bcfbbacfb0a6e Author: John Bowman Date: Fri Nov 3 22:55:27 2006 -0600 Fixed pen caching problem. commit 4c522975795e85f99af44f46dc33f651ce3b426c Author: Chris Savage Date: Fri Nov 3 17:14:45 2006 -0600 Updated palette documentation. commit 1dc32fd58eb9f250e9dc463f74e680425685fbb8 Author: John Bowman Date: Fri Nov 3 09:51:19 2006 -0600 Cache a separate copy of pen for tex mode. commit 93b89ea4b2ac84828116cc56a4b2326a82bff2be Author: John Bowman Date: Fri Nov 3 01:59:03 2006 -0600 Fix max(empty array) error message. Implement minbound and maxbound also for arrays of pairs and triples. commit 7210c8cbc06185017b72936fa3ad5bddf0674114 Author: John Bowman Date: Fri Nov 3 01:54:56 2006 -0600 Check for an existing viewer associated with the given outname. commit ae0d6a38b6235e3d12fe8bd22e2a34676851badf Author: John Bowman Date: Fri Nov 3 01:14:25 2006 -0600 Call cleanup, not exitFunction in interactive postRun. Don't tamper with interactive flag: if exitFunction fails, interactive will not get reset and cleanup will not get called at all. commit b40b33ad1de071e35559f1581383bb09878566fa Author: John Bowman Date: Thu Nov 2 20:32:30 2006 -0600 Use bin centers for point array. commit 0f4f5380e1990b0af1dce9b43d63786e80a4177d Author: John Bowman Date: Thu Nov 2 11:43:32 2006 -0600 Added image histogram and contour example. commit da264a977c66ffa098e8dd654cf52724ac8b49ea Author: John Bowman Date: Thu Nov 2 11:08:39 2006 -0600 Fixed drawing of mesh only. commit 7e68cc36102092161c1466d988c3991025d4c7d9 Author: John Bowman Date: Thu Nov 2 11:03:21 2006 -0600 Check for division by zero in scale. commit 8732a8a108ecab5246bbefc18164ba9d77e39dd2 Author: John Bowman Date: Tue Oct 31 02:31:16 2006 -0600 Incremented version to 1.18svn. commit 546eb10956ca560a2342071cf9e02e86e65cb32a Author: John Bowman Date: Tue Oct 31 01:18:54 2006 -0600 Work around garbage collection bus error on MacOS X. Call GC_Init during static initialization. commit 0e39bad178b3d4241d00d5ea2d71ca76f53b3d72 Author: John Bowman Date: Mon Oct 30 13:22:37 2006 -0600 Added a uniform histogram routine. commit c8ec46631eb319c5f3968c94672f85ff39ab42c2 Author: John Bowman Date: Mon Oct 30 12:41:38 2006 -0600 Reverse order of arguments of nonuniform frequency routines for consistency with other uniform frequency routines and image and graph routines. This change is backwards incompatible. commit 1f9e001b45b26919731bba7e3669b7360dbf5de6 Author: John Bowman Date: Sat Oct 28 19:37:26 2006 -0600 Reduce number of mem::string/std::string conversions. commit 4dedf096d6c403fd4b8e64bef059a4fa8c6907ae Author: Chris Savage Date: Fri Oct 27 14:38:42 2006 -0600 Added 1d/2d frequency routines optimized for regular bin sizes. commit 4d258b71d8cc27a5a144a1d7cd587757f157a9c4 Author: John Bowman Date: Fri Oct 27 14:13:39 2006 -0600 Updated FAQ. commit d261c7748eb5a5d30fca3427f71ba6868ad8d82b Author: John Bowman Date: Thu Oct 26 22:27:54 2006 -0600 Improve optimization of 2d frequency routine. commit a315decc03c56ab1d40d2cbb7673980a91c3a918 Author: John Bowman Date: Thu Oct 26 22:13:46 2006 -0600 Declare fixed-sized arrays. commit c5ee060643af0e74301b06ba71f13554f8c68696 Author: John Bowman Date: Thu Oct 26 22:07:18 2006 -0600 Optimized 2d frequency routine. commit 01b0e16a50c45d973102d0a11dfc50ac024ec2d0 Author: John Bowman Date: Wed Oct 25 01:41:55 2006 -0600 Incremented version to 1.17svn. commit f956a35f74398fa0cd234bae657ac7adc92e75f5 Author: John Bowman Date: Wed Oct 25 00:26:11 2006 -0600 Removed page break. commit 358ec2ccaa552bfc4b81bfaefbd015fcad889139 Author: John Bowman Date: Tue Oct 24 23:50:16 2006 -0600 Use pic.scaling in graph.asy. commit 8cd5d1299e29c188a71c373056ddd1d458c7f837 Author: John Bowman Date: Tue Oct 24 23:43:12 2006 -0600 Move using std::string out of header file; pass references to strings. commit 382463c6c5de19741ac199085d96663020cc92b1 Author: John Bowman Date: Tue Oct 24 23:34:58 2006 -0600 Fixed memory leak. commit 3cd61be2f81b5c71ae39ef9e4f2df6fe8975ce29 Author: John Bowman Date: Tue Oct 24 21:50:49 2006 -0600 Updated credits. commit 202b9564ec5af67e301c2ac847e0cd656d511b3c Author: John Bowman Date: Tue Oct 24 21:50:33 2006 -0600 Added 2d version of frequency binning routine. commit d18d193d55d3141e606378bce7a1e6308f9efb58 Author: John Bowman Date: Tue Oct 24 11:28:01 2006 -0600 Added modified version of Mark Henning's multi-line legend routine. Added legend example. Renamed truepoint to framepoint; added truepoint function which works like point but accounts for fixed-sized objects. picture.calculateTransform now returns the actual transform used for fitting in the case where only an approximate picture size was available. commit dd29994627aaa793bc99f5af386829077a581d07 Author: John Bowman Date: Mon Oct 23 12:31:55 2006 -0600 Changed ARCH to i386 since that is the only case that currently applies. commit 267e1456b08c492a1a3b95281e43a93461fe5a90 Author: John Bowman Date: Mon Oct 23 12:30:33 2006 -0600 Fixed \usepackage[inline]{asymptote}. commit ba458755cab79370ecee05ae4b88c57ec0d13f66 Author: John Bowman Date: Sun Oct 22 00:58:10 2006 -0600 Run latex 3 times on CAD. commit 23a246d3f41f6f8d90b4ad09c7c5ec1edc1de08a Author: John Bowman Date: Sun Oct 22 00:50:57 2006 -0600 Remove temporary CAD files. commit 0195e474c857a61ffbe9e31c247bacf085f77abd Author: John Bowman Date: Sun Oct 22 00:41:51 2006 -0600 Incremented version to 1.16svn. commit eb2267f0bde79c1643a9a497dcbc56399255c3c3 Author: John Bowman Date: Sat Oct 21 22:46:25 2006 -0600 Added Mark Henning's 2D CAD package (DIN 15). commit 86a9f3375abfc36e8c22d5a04afd1423254f2529 Author: John Bowman Date: Sat Oct 21 22:23:26 2006 -0600 Document restriction of annotations to tex and latex tex engines. commit e98c80f3bf13c68bc6961276ee095d36eed13c1f Author: John Bowman Date: Sat Oct 21 22:20:13 2006 -0600 Make graphics labels work with tex and pdftex engines. commit e65635f731928541bf1644d4b14ca73abc9e1767 Author: John Bowman Date: Sat Oct 21 21:00:37 2006 -0600 Added CDlabel example to illustrate clipping of graphics. Changed overfull slide error to warning. commit 0f1af03ee09bb4456504740171ef4c5a87af8cf7 Author: John Bowman Date: Sat Oct 21 18:00:29 2006 -0600 Remove temporary pdf files. commit 385df746ac2083154dfcb7fd12690b7d7a0831b3 Author: John Bowman Date: Sat Oct 21 14:24:39 2006 -0600 Fixed cube animation. commit 41a628f6da76a87c739f60ddb86414d0c1bbb62e Author: John Bowman Date: Sat Oct 21 00:17:26 2006 -0600 Force unitlength=1pt in inline tex mode. commit a68585163e3c8e53b0b2134b5029180a094a5eb4 Author: John Bowman Date: Sat Oct 21 00:00:53 2006 -0600 Added further determinant of singular matrix tests. commit 3c8ee5ecb928474319193fa3b55fdbb1a9d3a034 Author: John Bowman Date: Fri Oct 20 23:54:40 2006 -0600 Determinant of a singular matrix should return 0, not an error. commit 041322e8e38d3505b9b103b5659577b8a4256ca1 Author: John Bowman Date: Thu Oct 19 23:56:09 2006 -0600 Use LaTeX color package for latex and pdflatex to keep latex informed of current color. commit e78af7bae702d25262fc2b9156bed250e750d88e Author: John Bowman Date: Thu Oct 19 23:54:14 2006 -0600 Fixed label fuzz. commit d840b87cb8545bf129228c7281157cc84a14ca38 Author: John Bowman Date: Mon Oct 16 17:01:07 2006 -0600 Fixed incorrect path bounds in lattice shade. commit 2c376089985ff5965311e5e5faa7e826d94ba081 Author: John Bowman Date: Mon Oct 16 13:07:45 2006 -0600 Fixed typo. commit 2ffe53fe675079562255b7a0c36b9383c49771c4 Author: John Bowman Date: Mon Oct 16 07:52:33 2006 -0600 Another attempt at fixing compilation problem under MacOS X 10.3.9 (cf. 1.00-1). commit bd66d25af0ec692695d71970e6f59e01b05ee9f2 Author: John Bowman Date: Sun Oct 15 19:40:33 2006 -0600 Fixed compilation problem under MacOS X 10.3.9. Rename configuation variable latex to texpath in documentation. commit 84f6f43b5f6e106c5c8feed712828f2acd74ab50 Author: John Bowman Date: Sun Oct 15 17:00:58 2006 -0600 In cases like 2D graphs where only an approximate picture size estimate is available, adjust the transform so that the fitted frame meets the size specification. The pic.scale() routine (which scales the resulting frame, including fonts and true size objects) can enforce even better compliance in such cases, but should not normally be required. commit 3b07181bd01679b319489beb9f0881ab62ab4e5d Author: John Bowman Date: Sat Oct 14 23:16:14 2006 -0600 Minor clarification. commit 6aafdea6991f4210b613af985ea3e71ceb239dca Author: John Bowman Date: Sat Oct 14 22:42:12 2006 -0600 Remove gv patches since these are all in the long-awaited gv-3.6.2 release. commit 78885a7129643cfa720be9c0e54fe84767164cbc Author: John Bowman Date: Sat Oct 14 22:21:17 2006 -0600 Incremented version to 1.15svn. commit 23589c9ace9c2563f12d5f17d2e5dd57a22649ef Author: John Bowman Date: Sat Oct 14 19:50:30 2006 -0600 Adjusted example. commit d7c69078664b14734ea03564f5b7246918525754 Author: John Bowman Date: Sat Oct 14 19:23:21 2006 -0600 Updated FAQ. commit a5cc66d15032057a4201c26f2bebc957ff77ddce Author: John Bowman Date: Sat Oct 14 19:11:41 2006 -0600 Documented filloutside. commit d3465aa847b9e5fd750c39159ecd272e71130815 Author: John Bowman Date: Sat Oct 14 18:50:37 2006 -0600 Fixed cxx warnings. commit 638a43729ff7bb383be7806103ae1d92b94ca6d2 Author: John Bowman Date: Sat Oct 14 16:45:23 2006 -0600 Added missing space. commit e2d6e51171031947eea40fab2bdbdacecaa01abb Author: John Bowman Date: Sat Oct 14 16:40:18 2006 -0600 Support color fonts for pdftex and pdflatex. commit f544e103151c1d5ed9d06f46768b51fb1930a60b Author: John Bowman Date: Sat Oct 14 16:21:59 2006 -0600 Implement ability to draw images directly from a two-dimensional pen array. commit 9be13bc0a5f9e252a5359c4c3533f0f505a6c353 Author: John Bowman Date: Sat Oct 14 15:26:59 2006 -0600 Fixed label alignment transformation; implemented general scaleless routine. commit 216de7b26d13b939c878a66ddb5d0aabb788fd62 Author: John Bowman Date: Sat Oct 14 02:03:40 2006 -0600 Fix readline test. commit fec76d69c87f40e1661c33824fbc0a67def44ea7 Author: John Bowman Date: Fri Oct 13 23:03:41 2006 -0600 Fix test for readline 4.2. commit 7ac24a54e969bdf31643f6fa4a6776e0afa5cb8a Author: John Bowman Date: Fri Oct 13 22:32:56 2006 -0600 Disable support for readline versions < 4.2. commit 80af472754be7d427e51b62973788afd8de69bf5 Author: John Bowman Date: Fri Oct 13 16:50:51 2006 -0600 Scale label fuzz to height+depth not width. commit 1db6b1f47b1bbcc07b40eb08a51b51774753ecff Author: John Bowman Date: Thu Oct 12 18:01:22 2006 -0600 Define pdfoutput if necessary for older versions of latex. commit b037d295c1f679af879ce10f6be9d67cfa46e8e5 Author: John Bowman Date: Thu Oct 12 17:30:14 2006 -0600 Implement tex and pdftex TeX engines. commit 6fa776eb64ca27b159017315844647f3ad9da44c Author: John Bowman Date: Thu Oct 12 00:05:50 2006 -0600 Implemented more robust label fuzz calculation. commit 4f25e3051841654925b6a34ff1be0b848388bded Author: John Bowman Date: Wed Oct 11 21:48:25 2006 -0600 Crop generated pdf files. Fixed pdf label transforms. commit e2206d1c9d63a5645d7fa6f0326f7f4c8b890c21 Author: John Bowman Date: Wed Oct 11 16:41:37 2006 -0600 Handle files with and without labels consistently under -tex=pdflatex. commit f7c4e4469d334240cd096492f0656ae4a6818972 Author: John Bowman Date: Wed Oct 11 08:43:27 2006 -0600 Added support for Emacs 21 (quickly tested with 21.4.1 only). commit 3201b9e05aa425408230fb4dad2ca670e5523b29 Author: John Bowman Date: Wed Oct 11 01:25:14 2006 -0600 Added support for alternate texengines (currently "latex", "pdflatex", "none"). Support \usepackage[inline]{asymptote} under both latex and pdflatex. Clean up singleton path eps writes. commit 667c624a70cd45de64b3f9aad94f2278464e783f Author: John Bowman Date: Sun Oct 8 15:16:08 2006 -0600 Revert revisions 1.14-54 to 1.14-56 commit 99d7cc9fd7754fd52b81796555b7e23ce5bf5d7f Author: John Bowman Date: Sat Oct 7 14:00:36 2006 -0600 Implemented general label clipping; removed evenoddoverlap and zerowindingoverlap fill rules as this functionality can be achieved at a higher level, using inside(path, pair, pen). Changed bool scale argument of Label structure to Shift, Rotate, Slant, or Scale, which indicates how the Label transforms with the embedding picture. commit 83fd3c1466b160e77dc917f9c4279293714ac2aa Author: John Bowman Date: Fri Oct 6 04:39:26 2006 -0600 Reset x and y boundRoutines after processing. commit 2ea881bdd70f223918b196a2eea0229109914818 Author: John Bowman Date: Wed Oct 4 09:45:16 2006 -0600 Remove obsolete item. commit 591a6809b451364ae03a993f027037e038b2c77a Author: John Bowman Date: Tue Oct 3 22:15:25 2006 -0600 Remove further unneeded instantiations (as of last revision). commit 0c4e6e5cedb64d50e77fe622291688a72f2ce367 Author: Andy Hammerlindl Date: Tue Oct 3 18:53:50 2006 -0600 addOps now add operators as fields (so they can be imported). commit 555d40cc7189645f7c813285feef0a499ae100ab Author: John Bowman Date: Tue Oct 3 17:47:39 2006 -0600 Allow use of UnFill in tick labels. commit 2fe33bde49a3094109de6b371c094445c1be49a5 Author: John Bowman Date: Tue Oct 3 17:30:14 2006 -0600 Simplify general axis routine. commit 510a57c843886458e69b79ab92fe2b23a1976ff4 Author: John Bowman Date: Tue Oct 3 17:22:31 2006 -0600 Simplify call to ticks. commit c9ff5103304cffbd38307aad0e3f2aa9916e3e6b Author: John Bowman Date: Mon Oct 2 22:03:40 2006 -0600 Move Label shift member into transform member. commit 603fae58ba2d8f2a497c32e246d609492c41a077 Author: John Bowman Date: Sun Oct 1 18:12:11 2006 -0600 Implement general label transforms, including slant. Added option to Label to allow labels to scale and slant with pictures and frames. commit 91640a6cc5e16990bcef8b86ad2f3c06f050ef09 Author: John Bowman Date: Sat Sep 30 14:26:05 2006 -0600 Fixed "Cannot write to venn_.tex" error under Windows XP. commit fe6f54c378560c8d56721722195c3664e7ede25c Author: John Bowman Date: Sat Sep 30 10:56:10 2006 -0600 Fixed cxx errors and warnings. commit 025f86561c9729aae69bc805aef03e5c58dbabd9 Author: John Bowman Date: Wed Sep 27 15:58:38 2006 -0600 Fixed transformation of label alignments. commit 67c45c5d79fa438a231d5f48d7c5cfa50a169d2e Author: John Bowman Date: Wed Sep 27 00:22:53 2006 -0600 Make scale set automin and automax settings in autoscaleT. commit a03c2af28e987a3ebbcb07ca7ab7ec92d671c0a8 Author: John Bowman Date: Tue Sep 26 23:41:09 2006 -0600 Added boundRoutine[] bound to autoscaleT. commit 870716863c07e9fc93a7ea4ae38d1050c7103710 Author: John Bowman Date: Tue Sep 26 23:39:37 2006 -0600 Improved graph routines: added xaxis and yaxis bounds communication, allow axes with ticks and unextended axes to be called on an empty picture. commit 55486b03449dc43e3f2e2f671372d7bcbe5b4c47 Author: John Bowman Date: Tue Sep 26 22:18:06 2006 -0600 Simplified example. commit 3f84eb0e5329df55eedcd7816d246269b1acf9e4 Author: John Bowman Date: Mon Sep 25 06:03:16 2006 -0600 Allow for separate xunitsize and yunitsize scalings. commit d25faa5325ac7dd2edd8698a23cb0ac612882a0b Author: John Bowman Date: Sun Sep 24 11:26:11 2006 -0600 Improved documentation of tick extend option. commit 0d8745187ea6224e507d01132176fc30c9e71adc Author: John Bowman Date: Sun Sep 24 09:40:22 2006 -0600 Removed axislabelmargin. commit 351e794c6bc6824c199bc368aff48edf7ac23205 Author: John Bowman Date: Sun Sep 24 00:59:08 2006 -0600 The axislabelmargin setting should only affect alignment perpendicular to the axis. commit 8672a218c4874b5aaba6381dcc7e123b23ee67ec Author: John Bowman Date: Sun Sep 24 00:38:54 2006 -0600 Adjust axis labels only in direction perpendicular to axis. commit 6858464ed091391a79112e8385177d0d24a6834d Author: John Bowman Date: Sat Sep 23 22:32:04 2006 -0600 Draw path label after drawing path. commit d48c0122032cc8591b9c3128f6e6cb117cd6920a Author: John Bowman Date: Thu Sep 21 12:28:57 2006 -0600 Allow Label(Label,pair). commit 55e07408be0540b1fd41119ed03fb92d2b840646 Author: John Bowman Date: Thu Sep 21 12:27:30 2006 -0600 Add partial support for xemacs. commit 833db88dba8d3477533ee8d1a510da2fd58a417a Author: John Bowman Date: Thu Sep 21 01:21:34 2006 -0600 Leave vertical mode before put. commit f1de4247df589333842495b8c675841a1e05c252 Author: John Bowman Date: Thu Sep 21 00:12:10 2006 -0600 Fixed grammatical error. commit 5c39ba9bcd34ab46ba9e62d113e9c7efbb1a11c7 Author: John Bowman Date: Thu Sep 21 00:08:42 2006 -0600 Added Mexican Hat (wavelet) example that nicely illustrates the distinction between guides and paths. commit 627742e5a1accd9977fbef43253dd5f4aef3a0f1 Author: John Bowman Date: Wed Sep 20 08:50:13 2006 -0600 Removed dependency on rotate.tex. commit 59862d5927db13955c04ff0202acbc5174eaddb6 Author: John Bowman Date: Tue Sep 19 23:08:34 2006 -0600 Removed dependence on pstricks. commit 4eca0a5c56aaac730963e3e49adb8dbe09c14434 Author: John Bowman Date: Tue Sep 19 22:12:31 2006 -0600 Added filloutside routines. commit f3d3e51caf55dcc5cd95699b486351eaf660793a Author: John Bowman Date: Mon Sep 18 16:00:15 2006 -0600 Ignore setlocale errors; improved discussion of setlocale in FAQ. commit 19f4c2d00b8b172fe6821cd9764eb7dea5e9c2d2 Author: John Bowman Date: Sun Sep 17 22:32:31 2006 -0600 Fix -aZ -f pdf. commit 76c3b469886016170897af7b9ca21f3e7bcc1918 Author: John Bowman Date: Sun Sep 17 22:18:06 2006 -0600 Standardized filltype definitions and added a Draw filltype (e.g. for drawing a bounding box around a label). commit 3756452ae55dd4c74dec0832efb762b04501bebc Author: John Bowman Date: Sat Sep 16 22:18:03 2006 -0600 Fixed typos in comments. commit 979e5245c77168ad68b2105c07203099c1985fdf Author: John Bowman Date: Sat Sep 16 21:50:16 2006 -0600 Make -p option only effective in noninteractive mode. commit 6353224e8bc253e83b284cc9bdfc776997217d68 Author: John Bowman Date: Sat Sep 16 15:39:41 2006 -0600 Accept ? as alternative to h (help). commit 2d3be54182cabece33b4fd21f18f6d67b688e19d Author: John Bowman Date: Sat Sep 16 15:38:37 2006 -0600 Quit (q) should turn off off debugging mode. commit e67a8fad923d927a19b8a5f725bc7234f04227ee Author: John Bowman Date: Sat Sep 16 15:11:09 2006 -0600 Minor simplifications. commit c819d159f46d10b3446299d1bbdcc328bab67e83 Author: John Bowman Date: Sat Sep 16 15:05:59 2006 -0600 Added irregular mesh image contour routines. Fixed documentation regarding explicits image bounds. commit 2dc1f5f285691a0fb77438f3d0acefa96528fe27 Author: John Bowman Date: Sat Sep 16 15:02:46 2006 -0600 Fixed numerical precision issues; minor optimizations. commit a717ad3169a34b96fed0e04b9ed103ff236ac0a0 Author: John Bowman Date: Sat Sep 16 12:18:45 2006 -0600 Minor optimization. commit a291fe8cbab32f8fb81f5af0a9ec833245b4d734 Author: John Bowman Date: Sat Sep 16 01:32:59 2006 -0600 Fixed docref. commit 31d0253ac49f2a57def70ff23c6a6b6037acc22e Author: John Bowman Date: Sat Sep 16 00:44:13 2006 -0600 Updated FAQ. Improved Makefile. commit 940671ec82f0375f5d77828da85298699b756138 Author: John Bowman Date: Fri Sep 15 21:55:17 2006 -0600 Added contour wrapper for explicit x and y arrays. Standardized contour argument names. commit 255e2305868febb31a1a9123008e451a88749db1 Author: John Bowman Date: Wed Sep 13 20:56:26 2006 -0600 Fixed unhandled exception on startup. commit 348aff80582497d1629b73e8be47d7f2b6a7bcbc Author: Andy Hammerlindl Date: Wed Sep 13 19:40:19 2006 -0600 Ignore keyboard interrupts during readline. commit 609e7ce533c3c383d43870a451a470e5222ee8e5 Author: John Bowman Date: Wed Sep 13 00:25:47 2006 -0600 Modified example. commit 95d6e55978fc10e863c93cce89292fb43ee84803 Author: John Bowman Date: Wed Sep 13 00:24:37 2006 -0600 Generalized axis alignment example. commit c076e75873eeeb081a32c068c4044db9dc9f3185 Author: John Bowman Date: Tue Sep 12 23:45:10 2006 -0600 Fixed axisMin. commit 711cbebdf9ffde7a3ab55fcc4631f0a684d21566 Author: John Bowman Date: Tue Sep 12 23:36:12 2006 -0600 Calculate, don't cache, axis userMin and userMax values. commit 48ac703bc5891cbea3f7645646cf6532a6441b62 Author: John Bowman Date: Tue Sep 12 01:02:42 2006 -0600 Add PDF autorotate option; landscape slides now automatically turn this on. commit 4ba23a29c1915434076022e312479f5b2edf0f22 Author: John Bowman Date: Mon Sep 11 22:24:22 2006 -0600 Added example of buildcycle. commit 27e2b021dc0609a58a6bfe4f15498977d665e258 Author: John Bowman Date: Mon Sep 11 22:20:23 2006 -0600 Port and document MetaPost buildcycle. Document new behaviour of asy -l file... commit f6627a1a9f7d66f92eebdd8990ce2ed03d98b6d6 Author: John Bowman Date: Mon Sep 11 21:45:35 2006 -0600 Allow draw(nullpath) again. commit 19fbdfb19a5222e947593a5af55727b14bd8d1cc Author: John Bowman Date: Sun Sep 10 13:33:24 2006 -0600 Fixed asy path and base directory. commit b8b3928f0b73660c2d7adcf7afcc4ddae3b7fa85 Author: John Bowman Date: Sat Sep 9 21:55:55 2006 -0600 Added type highlighting list to asy-keywords.el and asy-mode.el. Simplified building of asy-keywords.el. commit 034bcce15f75b967c32f10ff5227607818d5c039 Author: Andy Hammerlindl Date: Sat Sep 9 12:26:29 2006 -0600 Refactored interactive prompt. Moved asy code processing from main.cc to process.cc. commit 7f69344edb1918434afc53d5906348bc5f15ae2d Author: John Bowman Date: Fri Sep 8 12:40:18 2006 -0600 Fixed infinite loop on stdin EOF during scrolling. commit af30d135fb36c4f5c4a59808b63d76abd1a44f30 Author: John Bowman Date: Thu Sep 7 21:59:28 2006 -0600 Make last workaround CYGWIN specific. commit 455b64c796b9972676e3e13fc03d2fcb2964e3f8 Author: John Bowman Date: Thu Sep 7 07:56:04 2006 -0600 Work around missing ncurses/term.h symbolic link under CYGWIN. commit 900e00356b7814d4deddfa05ce2c9ab828cfb1c6 Author: John Bowman Date: Wed Sep 6 02:52:45 2006 -0600 Incremented version to 1.14svn. commit 22aa04ae69177659ab25e16dd859775909ebc643 Author: John Bowman Date: Tue Sep 5 22:47:22 2006 -0600 Added path qualifier. commit eff0b45d96d765f9bc81196953aa106b2f7445f0 Author: John Bowman Date: Tue Sep 5 21:17:34 2006 -0600 Standardized indentation of and untabify base files. commit 87a45971cbed4ae9debe673c81d282bb4e606a5c Author: John Bowman Date: Tue Sep 5 10:24:50 2006 -0600 Updated documentation and FAQ. commit de7e13243c0599e4d2bf68faf2896e1f30ed6128 Author: John Bowman Date: Tue Sep 5 10:24:30 2006 -0600 Added html target for building html documentation from main directory. commit 65d163362a2fac264575e6b5159fef0419ae2482 Author: John Bowman Date: Tue Sep 5 00:24:39 2006 -0600 FAQ updates commit 17505d564a43e316c7db22b98d8de5466d25e2d9 Author: John Bowman Date: Mon Sep 4 23:13:53 2006 -0600 Explicitly load asy-mode.el in case an old compiled version exists. commit 9b4cc01e29cbaf9a4d83ceb9a2f8ccaceea31c02 Author: John Bowman Date: Mon Sep 4 23:04:52 2006 -0600 Color name updates. commit 52c3d60b3d4e1f03d90ca5596c2f953134de28ec Author: John Bowman Date: Mon Sep 4 22:29:45 2006 -0600 Project triple to align in call to label and Label. Cast triple to position. commit a264f9641e882d8ee2ccfad8b671cd3fd30168b6 Author: John Bowman Date: Mon Sep 4 22:18:35 2006 -0600 Remove cast from triple to align. commit 7449971fee8995d1d79ce4d27af234385dffd53f Author: John Bowman Date: Mon Sep 4 22:12:03 2006 -0600 Make grep case-sensitive. commit 6f5bf62ecaba03d7fe486758c2362b5f45bbe38a Author: John Bowman Date: Mon Sep 4 01:40:35 2006 -0600 More FAQ updates. commit c9d4473fed4c535c26a7180eb2e62c17a4cbe1eb Author: John Bowman Date: Mon Sep 4 01:36:16 2006 -0600 Updated FAQ. commit f68a35d2db180e3075316488aa782d88def7738c Author: John Bowman Date: Mon Sep 4 01:30:35 2006 -0600 Allow arrowhead to be called with a position type. commit c98c79d93af423d11026df9f646cf2162286b635 Author: John Bowman Date: Mon Sep 4 01:29:06 2006 -0600 Use pTick as default for ptick. commit ad45fdc38f515e56a61419cf508240e8926fdec9 Author: John Bowman Date: Sun Sep 3 12:05:53 2006 -0600 Revert last change. commit adfe519f86f0c3663a65d066b93e54868ef97c19 Author: John Bowman Date: Sun Sep 3 11:49:35 2006 -0600 Close fout immediately to avoid race condition with gv in interactive mode. commit fbb3d9ce12d3860ce18a50ac41c0a7a20c4daf16 Author: John Bowman Date: Sun Sep 3 09:05:31 2006 -0600 Install asy-faq.info with make install-all. commit 297fb1620c281160d3c85a59dfbf3599ae822a46 Author: John Bowman Date: Sun Sep 3 00:01:55 2006 -0600 Fixed cxx warning message. commit 0bfa85f15495c3fe8dedd656e168863f22180f3b Author: John Bowman Date: Sat Sep 2 23:45:44 2006 -0600 Removed ASYMPTOTE_DIR. commit 3f78d4518f580e535f06fd22d57b61494087fc5f Author: John Bowman Date: Sat Sep 2 23:42:37 2006 -0600 Simplified Makefile. commit baeb51d7b703d1f754b75c2257f7039425fad588 Author: John Bowman Date: Sat Sep 2 23:35:46 2006 -0600 Distribute keywords.cc. commit 67fbb198d48c333c138909ff53211389d2ac3a42 Author: John Bowman Date: Sat Sep 2 23:29:35 2006 -0600 Make keywords.pl executable. commit 794538cc5900417ed36eddb1cd6a98a8552b8f5c Author: John Bowman Date: Sat Sep 2 23:20:58 2006 -0600 Added Frequently Asked Questions (FAQ). commit 26f56cf05c6cea469da431248728ba726f347892 Author: John Bowman Date: Sat Sep 2 11:28:41 2006 -0600 Respect scroll setting only in interactive mode. commit c2b071c9fd91e2e54db1960fced5e9d7ae2029c2 Author: John Bowman Date: Sat Sep 2 11:21:14 2006 -0600 Add Philippe's changes to asy-mode.el, including menu and asy-insinuate-latex. Handle shells other than bash in asy-mode.el. Autogenerate asy-keywords.el. commit 1f96b552a2af9bc8f17700d1fca4e7fb7a7223a1 Author: John Bowman Date: Wed Aug 30 21:53:25 2006 -0600 Make annotations with frame transformation; cleaned up @defspecial code. Check for successful PostScript writes. Standardize "Can't" vs. "Cannot". commit e3ff8da6ad620ed763f68efd31c6cb550100649e Author: John Bowman Date: Wed Aug 30 21:48:31 2006 -0600 Simplified calculateTransform logic. commit ab8f9f3e55b9ac3218ae8bdbd0cdae87eae9283c Author: John Bowman Date: Wed Aug 30 21:46:56 2006 -0600 Improved example. commit a8a5186f6b75b1c9ba2baac9a1440744573463d8 Author: John Bowman Date: Wed Aug 30 21:44:46 2006 -0600 Disable magic () parenthesis. commit b82912094da7642a9ba64a51ee59d4d1b74eb150 Author: John Bowman Date: Wed Aug 30 16:35:02 2006 -0600 Prevent exponential notation in %%BoudingBox. commit 8873a0444096d60eec93aed956ff0eae1b94a7a0 Author: Andy Hammerlindl Date: Wed Aug 30 13:11:11 2006 -0600 Test using a local version of asy. commit 587b1fe3d99f40525c5759823c2cc1dd5ed85121 Author: Andy Hammerlindl Date: Wed Aug 30 13:10:08 2006 -0600 Don't run "../asy output/*.asy" as this doesn't test the files properly. commit 0f9e63abbd46730ae29aafeb4ded2b205d222a24 Author: John Bowman Date: Tue Aug 29 21:04:38 2006 -0600 Updated to use gc6.8. commit 993d2ec493e607efed0de08be6ed3823f362d80a Author: John Bowman Date: Tue Aug 29 15:47:24 2006 -0600 Reduce size of generated files. commit 2fb33cd414d9db9b472303954547aefe7c23bc8d Author: John Bowman Date: Tue Aug 29 11:30:15 2006 -0600 More three-dimensional examples. commit 2e296a0cd8bee8936fdd995078fef50b2e5489d5 Author: John Bowman Date: Tue Aug 29 11:29:33 2006 -0600 Fixed definition and documentation of cone. Added longitudinal pen to draw. commit c1b1f17f483abf63e58c9efaf3202062185d22cd Author: John Bowman Date: Tue Aug 29 11:28:51 2006 -0600 Added cast from triple to align. commit 32a32c6b551379c64d93d1362f76c03519600e43 Author: John Bowman Date: Mon Aug 28 22:35:39 2006 -0600 Added up argument to projection routines to specify camera orientation. commit 40b2e7eecec7ffb6cdd384f25dceaf15a7887350 Author: John Bowman Date: Sun Aug 27 20:58:32 2006 -0600 Minor optimization and documentation updates. commit 5caeb44bbe159e5b0474691923a4c1680cedeb37 Author: John Bowman Date: Sun Aug 27 18:53:20 2006 -0600 Cleaned up surface functions. commit c85824f701ac8682dbdee0fe0d24285625882a17 Author: John Bowman Date: Sun Aug 27 18:42:43 2006 -0600 Avoid warning message under -d. commit 312f05fb764fa64334f90a1160aae5fdfbe4a8ae Author: John Bowman Date: Sun Aug 27 14:08:51 2006 -0600 Moved documentation to beginning of file again. commit 5768a90fbe38fa2d72c0343ee49474d2ce712bc3 Author: John Bowman Date: Sun Aug 27 13:44:12 2006 -0600 Disabled magic [] since this makes typing real[] awkward. commit 794ca7d4658dfc8d479b64abe73625edd9fcec7a Author: John Bowman Date: Sat Aug 26 18:29:31 2006 -0600 Removed obsolete comment. commit aebc30038fe13e7e19186f8719dbff5af2eccb1f Author: John Bowman Date: Sat Aug 26 15:44:33 2006 -0600 Don't indent after struct definition without optional ; commit 8f044468d9ddb1a07c41dc8f1742fa6b4c756260 Author: John Bowman Date: Sat Aug 26 12:06:44 2006 -0600 Disable magic {} as this makes grouping existing blocks of code (without going to the trouble of selecting a region) inconvenient. commit 670b6dbe300a6899cb1d71abe669805b627156f9 Author: John Bowman Date: Sat Aug 26 12:01:32 2006 -0600 Fixed indentation of public/private permission modifiers. commit 0b90018f10f19db2a61c316146b05f187618b29f Author: John Bowman Date: Sat Aug 26 11:59:21 2006 -0600 Fixed indentation. commit 71b5a6d5c8f70a04c49bcfbec1ecaea740cd906a Author: John Bowman Date: Sat Aug 26 01:07:35 2006 -0600 Mention two-mode-mode recommended package also in online documentation. commit 00738d2135db51a0e4b2066473620d633d5db0b4 Author: John Bowman Date: Fri Aug 25 22:41:48 2006 -0600 Remove the strict requirement of the two-mode-mode package for minimal functionality of asy-mode.el. commit af2ba24ede5a963d7cec28a301f71ee2560810c9 Author: John Bowman Date: Fri Aug 25 22:14:11 2006 -0600 Replaced asy-mode.el with slight improvement of Philippe Ivaldi's version. commit f662e32020195506b96d1a84ce2248323ff91dd9 Author: John Bowman Date: Thu Aug 24 21:18:05 2006 -0600 Check path[] index. commit e0be7331a932a345d0330c0e331eb75f06fa7116 Author: John Bowman Date: Thu Aug 24 21:13:14 2006 -0600 Allow legends and markers when drawing superpaths. commit 6b81deefb1e8e0e1a888da8549a817ea9aa1fc50 Author: John Bowman Date: Thu Aug 24 11:28:50 2006 -0600 Moved graph settings to separate module graph_settings. Renamed nmesh to ngraph. commit e0c665a6c80a638cf987d01613b355eb7357df0e Author: John Bowman Date: Wed Aug 23 22:47:44 2006 -0600 Removed resolution arguments (nx and ny) from matrix contour routines; instead calculate these from the matrix itself. commit 25db195ca85cdf10b81b0e658f11e28fe087329b Author: John Bowman Date: Tue Aug 22 09:00:55 2006 -0600 Simplify calculation of cyclic path bounding boxes. commit 2a727b5da017e16f669041fe33bce1cfa9b05995 Author: John Bowman Date: Mon Aug 21 22:30:45 2006 -0600 Check that root is in range in bounds(). Implemented general solution for pen padding/capping of paths. commit 1e3e71ddba40dd38a67f0d5a063f593928e29322 Author: John Bowman Date: Sun Aug 20 22:22:33 2006 -0600 Added link to externally contributed examples: http://home.tele2.fr/phivaldi/asymptote commit 1975cd1e4db32ab15af2e7cced813c9425d73aad Author: John Bowman Date: Sun Aug 20 21:56:22 2006 -0600 Account for pen cap contribution to bounding box. commit 0a78726e84976df4d77fd2669e3ed8c477503d28 Author: Andy Hammerlindl Date: Sun Aug 20 00:20:41 2006 -0600 Exclude module accesses (and imports) from listing. commit 2d33137292407d66f099001aeb6fe0a9c7bb7c0c Author: John Bowman Date: Sat Aug 19 22:25:26 2006 -0600 Fixed image transposition. commit 620b0750d6a20baa7aa231ba7e3896cbaec37f5e Author: John Bowman Date: Sat Aug 19 18:13:36 2006 -0600 Discard extra characters after scroll commands (q). If scroll is negative, use one less than number of display lines. commit 331d19e858a08034c8b1f7182c8d8c0edb86dca7 Author: John Bowman Date: Sat Aug 19 09:44:40 2006 -0600 Changed header. commit deeafec561e27c8f9c1cecf9651229670931bbad Author: John Bowman Date: Fri Aug 18 16:07:59 2006 -0600 Standardized image and contour conventions for matrices. commit 3ec15bc65ee01c347de9764251f7ed148c2d5c80 Author: John Bowman Date: Fri Aug 18 15:56:31 2006 -0600 Improved documentation of command-line arguments. commit 98ce04117d410dacd86caa0c155def36cbe0138d Author: John Bowman Date: Fri Aug 18 15:55:57 2006 -0600 Removed unneeded settings qualifiers. commit d637ff179718b8e833ecdfc56394e5c9ed8d1989 Author: John Bowman Date: Fri Aug 18 15:54:35 2006 -0600 Minor optimization. commit b7a92a3b4478fb944e11d1f59bc91585657df406 Author: John Bowman Date: Fri Aug 18 15:52:27 2006 -0600 Changed write without data arguments to work consistently with the forms with data arguments: write(suffix suffix=endl); write(file fout, suffix suffix=none); commit 7bbab69b0cfed3ea636366a3ff30d406480dd6b7 Author: John Bowman Date: Fri Aug 18 14:46:47 2006 -0600 Remove spurious grestore; if no labels move grestore before showpage. commit 5f7cb91504b33716ac5e1c0cb64f3aecde55c2dc Author: John Bowman Date: Thu Aug 17 14:29:46 2006 -0600 Move GCLIBS dependency before others. commit 946e289a36611ab5833be45f544ef9cf097c535a Author: John Bowman Date: Thu Aug 17 12:24:16 2006 -0600 Added missing brace. commit 385b0fcf92fef84a5b216b523885d9b66b81ba47 Author: John Bowman Date: Thu Aug 17 11:41:33 2006 -0600 Added whereDefined() to entry class. Implemented void list(string *s, bool imports=false); to list all global functions and variables in a module named by string s. Removed unneeded init_readline in readline() routine. commit ddcc3110a61f7878e884895b66710f1bd0bb226b Author: John Bowman Date: Wed Aug 16 16:16:45 2006 -0600 Fixed xtick default argument issue. Added 3d tick routines. commit df02809984fd6f70cccb0de55f3139bdfabfb546 Author: John Bowman Date: Wed Aug 16 10:05:37 2006 -0600 Minor edits. commit 880c0f19ddd67a25df6519f5e2d3fd02a1cba7cd Author: John Bowman Date: Wed Aug 16 09:54:54 2006 -0600 Truncate out-of-bounds position parameters in labelaxis. commit 6629405d8a24e54b0214194fefb3d41e191eb186 Author: Andy Hammerlindl Date: Thu Aug 10 00:39:19 2006 -0600 Partially undid last change. commit 5c19f2abc3c0b0965ee16af5cd4e9db0ac440a66 Author: Andy Hammerlindl Date: Thu Aug 10 00:32:54 2006 -0600 Added tabcompletion to documentation. commit ec6f7c14bbb6ee7a675d34e8728930436c28fda5 Author: John Bowman Date: Wed Aug 9 08:21:11 2006 -0600 Simplified texprocess and postprocess signatures. Removed diagnostic. commit c3fab02a80fcfd8e2ff78882050a411f176d6356 Author: John Bowman Date: Wed Aug 9 08:12:20 2006 -0600 Removed bounding box fuzz. commit d191737368a18127796b33fef94399e79ba9e8b0 Author: Andy Hammerlindl Date: Tue Aug 8 15:41:53 2006 -0600 Added intelligent readline auto-completion based on the environment. commit af3d2395c4b72d7342ed0e68872846499fa7159c Author: John Bowman Date: Tue Aug 8 10:27:34 2006 -0600 Documented interp. commit 1be5c206bbf11397d38fb3f8a5dfb6bd396e7f7a Author: John Bowman Date: Tue Aug 8 04:02:56 2006 -0600 Fixed page alignment. commit c70cf49e3504ee60eff3cdccdc4f9314975a55ed Author: John Bowman Date: Mon Aug 7 20:20:15 2006 -0600 Added newl after gsave. commit e0bbdb825112966ffc84648379a4326e09122658 Author: John Bowman Date: Mon Aug 7 14:07:53 2006 -0600 Removed unused code. commit 7553c45742a1653bedcac99f67c8ad29f67aca0f Author: John Bowman Date: Mon Aug 7 09:46:36 2006 -0600 Turn off tab completion after readline. commit 4e5b8682d2ed3405ac13e5a269516abcf0916aaa Author: John Bowman Date: Mon Aug 7 09:36:42 2006 -0600 Simplified interactive mode. commit 337bc7366624b9ece92a35b75e404286c6c52216 Author: John Bowman Date: Mon Aug 7 08:20:46 2006 -0600 Simplified page alignment: -a Z nolonger implies -notex, annotation now works even with negative bounding box coordinates. commit 33092b49f26e37dba2d4f4e29ff3244a9f8eceb4 Author: Andy Hammerlindl Date: Sat Aug 5 00:03:41 2006 -0600 Removed accidentally added debugging output. commit 3c5d840478b8e7df5a7da4164df7921119ecb5c7 Author: Andy Hammerlindl Date: Fri Aug 4 23:56:57 2006 -0600 Fixed horizontal drawline bug. commit 8ff1804d6af0ab6c487d75d144c8be2363fd839a Author: John Bowman Date: Thu Aug 3 06:47:03 2006 -0600 Updated implicit scaling documentation. commit 1c00e823b1efef1b1a213697c8f804f8686e2c96 Author: John Bowman Date: Wed Aug 2 13:02:50 2006 -0600 Check for interrupts on for(;;). commit 15550ffe796c57d5d29ea5ec94590b424dd52954 Author: John Bowman Date: Wed Aug 2 12:46:17 2006 -0600 Removed unneeded %s. commit 6d32da25931610ecbd2a037dabc06daf590b9eb2 Author: John Bowman Date: Wed Aug 2 12:38:03 2006 -0600 Added support for Adobe Reader annotations. commit d29fe7bd1b866038c712a4a361b0bdec3d66f113 Author: Andy Hammerlindl Date: Tue Aug 1 13:17:50 2006 -0600 Improved highlighting of strings and scaling expressions. commit 0acd2b77382036350910ff18bae3df35e509d9db Author: Andy Hammerlindl Date: Tue Aug 1 13:16:51 2006 -0600 Allow empty test expression in for loop. commit 8eeecfa50431a4ead2b53af641e55b841bc0f15c Author: Andy Hammerlindl Date: Tue Aug 1 13:16:21 2006 -0600 Clarified comments. commit 355c37958b6b948bd3590b032373f59872a939f2 Author: John Bowman Date: Tue Aug 1 08:40:11 2006 -0600 Incremented version to 1.13svn. commit 011ccae6de7ae9699aa841dd6bd985526766ca25 Author: John Bowman Date: Tue Aug 1 06:46:11 2006 -0600 Fix cxx warning messages. commit 4c397bc7f375c2b585c69abb7cb51a9ece995994 Author: John Bowman Date: Tue Aug 1 06:32:23 2006 -0600 Use command-line version of ghostscript (gswin32c.exe) under MSDOS to avoid spurious ghostscript window when producing pdf files. commit 83c37ae5865e042bb52b50f7ee8ab366891894e9 Author: John Bowman Date: Mon Jul 31 14:42:09 2006 -0600 Updated. commit 3155feb37eb0b7b66680faa49af3f3030c9d26a2 Author: John Bowman Date: Mon Jul 31 14:23:50 2006 -0600 Simplify pen constructors. commit e292493e7798b572a31cfdc7f9f60be9a5c03d55 Author: John Bowman Date: Mon Jul 31 14:12:33 2006 -0600 Implement transparency. Handle DEFLINE correctly. Change string to mem::string throughout pen class. commit e6704b4d1c7bb2ad26618f2587b1a46183d3a19a Author: John Bowman Date: Mon Jul 31 14:09:15 2006 -0600 Use heavygreen instead of green. commit b58d65ce754bddf6d826d99af97c9a8e7ae67c4e Author: John Bowman Date: Mon Jul 31 14:07:33 2006 -0600 Added equations item. commit 09880dbab3c09f0ff6b6d06469049e1e03834f1f Author: Andy Hammerlindl Date: Sun Jul 30 00:22:40 2006 -0600 Delay call of getName, so that it is only called when the name is used. commit daf07650a774d77f1bc1b319ff2129f93343abab Author: John Bowman Date: Sat Jul 22 13:43:23 2006 -0600 Fixed label fuzz. commit c75cd4332190a6c80206864871c7f098260c815d Author: John Bowman Date: Sat Jul 22 01:10:50 2006 -0600 Minor additions to Help section. commit f95b2c761e1bb5ce5cc1d4194d0c08b0758db1b9 Author: John Bowman Date: Sat Jul 22 01:08:18 2006 -0600 Account for scale in label bounding box calculation. commit 662666896ceec7a86a8acc05bbf714ff017acdf1 Author: John Bowman Date: Sat Jul 22 01:07:15 2006 -0600 Renamed interact() to interactive(). commit 0a7ee04366c0250477d87cd72007e0fcc1cbeb6a Author: John Bowman Date: Sat Jul 22 01:06:34 2006 -0600 Fix Step calculation (special case). commit eae2726d0ce3648e4c77d5d8286c8959e2fef919 Author: John Bowman Date: Sat Jul 22 00:59:44 2006 -0600 Interactive reset should call cleanup, not exitFunction, and set uptodate=true. commit 6083f7f734c0846261a701d3dd2d9aaac3541ece Author: John Bowman Date: Tue Jul 11 15:52:29 2006 -0600 Updated. commit fb46edec56c5921e5ca6cfcb0ef107eb7d135df9 Author: John Bowman Date: Tue Jul 11 15:41:51 2006 -0600 Added default pen argument to Dotted(). commit c4bd8d894fa312bb63b8e4367156266977092b15 Author: John Bowman Date: Sun Jul 9 21:16:08 2006 -0600 Add q option to scroll facility to allow one to terminate scrolled output without causing an execution interrupt. Make scroll a setting instead of a function call. commit 7c5bedb12ad977701955cbf1726782e88ae2f379 Author: John Bowman Date: Sat Jul 8 22:10:25 2006 -0600 Added prefix plain_ to internal plain includes. commit 7da6733491c9eca3c94cd043f288bf09dbe16ed9 Author: John Bowman Date: Fri Jul 7 23:05:42 2006 -0600 Add missing clear() function to remove all breakpoints. commit 9dd7f96ec2a61fdb419445bcffa2a0884006b870 Author: John Bowman Date: Fri Jul 7 23:03:10 2006 -0600 Simplified partialsum. commit 36759e0b95e1af56c6c0d76d1bc11597db2fc5b6 Author: John Bowman Date: Fri Jul 7 11:10:28 2006 -0600 Removed page break. commit d6047df8c3e18d8e1e34788eddbecb97597dced3 Author: John Bowman Date: Fri Jul 7 11:06:25 2006 -0600 Documented ellipse. commit 42c87dac055830e8c87eba709885e75d4d893edd Author: John Bowman Date: Fri Jul 7 10:41:38 2006 -0600 Moved "Drawing Commands" section to immediately follow tutorial. commit ac38dcb2af96edeb8acb95b81c3021499d574b5b Author: John Bowman Date: Thu Jul 6 16:30:18 2006 -0600 Minor documentation improvements. commit c3f6db0826aec5be9bebbe809665c549e1fbe779 Author: John Bowman Date: Thu Jul 6 16:17:13 2006 -0600 Fixed documentation of periodic tridiagonal solver. Minor edits to Bezier curve documentation. commit f64d12cbbd2d0d824653688be0930ecdcf181119 Author: Radoslav Marinov Date: Thu Jul 6 14:05:53 2006 -0600 Added a bezier curves example - /doc/bezier2.asy . commit 7b0e702e928cb8f2f04332fed7e9f10df50eb2df Author: John Bowman Date: Thu Jul 6 10:55:47 2006 -0600 Replace double quotes with single quotes for compatibility with \usepackage{german}. commit 133164c761c28dc86ccdc63b7a12e546a939c7e1 Author: Radoslav Marinov Date: Thu Jul 6 10:55:47 2006 -0600 Added some more information on Bezier curves. commit 4bc34df3158d155b2fe5beefa9ef9e0970755bf0 Author: John Bowman Date: Thu Jul 6 01:05:00 2006 -0600 Incremented version to 1.12svn. commit f8478772f370fba4d278a7b2c3a165c7641819ae Author: John Bowman Date: Thu Jul 6 00:10:14 2006 -0600 Support g++ 3.3.4. commit e9b952ce4ae5900c33584f1ef822d66d775b87c7 Author: John Bowman Date: Wed Jul 5 23:53:55 2006 -0600 Fixed cxx warning messages. commit e12b26bc7e3ff3ae0f7383f9ea69f3df080aef8a Author: John Bowman Date: Wed Jul 5 22:39:14 2006 -0600 Added reference to graph3. commit 60cb8a05d80a51765b53f4d2219e177c4165ee98 Author: John Bowman Date: Wed Jul 5 12:28:58 2006 -0600 Renamed locate to locatefile. commit b289c382769951d33a7d1e86b25a9c0aa1aab70a Author: John Bowman Date: Wed Jul 5 01:15:18 2006 -0600 Debugger enhancements and minor fixes, including conditional breakpoints; renamed remove(string, int) to clear(string, int). Define min(... int[] a) and max(... int[] a). Moved realmult to runtime. commit eb3848d18bc8b2666b7756d0beb6bf53636a9418 Author: John Bowman Date: Sat Jul 1 03:05:34 2006 -0600 Removed spurious write. commit 406eb56dbd70bc4a193fa6418ab86e0ded006bc5 Author: John Bowman Date: Sat Jul 1 03:03:41 2006 -0600 Simplified debugger: removed step, renamed line to step, and make trace toggle. Prune duplicate trace messages. commit 27f83cfb49ff4d0bff6ddaf0ee33875c501a0fd5 Author: John Bowman Date: Sat Jul 1 01:20:21 2006 -0600 Make access settings global. Added twice setting to resolve LaTeX references. Improve embedded movie example. commit 5491a9ba3950418ec02f30c385b92374e8674eee Author: John Bowman Date: Fri Jun 30 11:09:49 2006 -0600 Generate wheel.mpg. Suppress vbv_delay overflow messages during mpeg merge. commit 176ad41299376337a145e9b084fd1d12ed2303c5 Author: John Bowman Date: Fri Jun 30 10:34:52 2006 -0600 Use defaultformat again instead of empty format string. commit 846dfbf82f1d4a1757c0c20048b67710620605cd Author: John Bowman Date: Fri Jun 30 10:27:19 2006 -0600 Improve discussion of stack overflow detection. commit 4fcdfd5f23e825c917fb3a7b5c958ec6d94d5ae9 Author: John Bowman Date: Fri Jun 30 08:35:14 2006 -0600 Added missing file. commit 685c1ede9c52233c3cb2135ee12e986391e6d374 Author: John Bowman Date: Thu Jun 29 22:54:03 2006 -0600 Added 3D array transpose and copy. commit 2c20940ae36d496d660f04d4d360c4bdbe0ff558 Author: John Bowman Date: Thu Jun 29 22:37:03 2006 -0600 Prevent runtime errors and interrupts from resetting interactive environment. commit 6f8a184d15535e00803cb8ac6ffff182459a40ed Author: John Bowman Date: Thu Jun 29 22:35:10 2006 -0600 Removed extra blank line at end of 3D array write. commit 1923d5f328df74f65f9c7cf7850a0d672c18ccb3 Author: John Bowman Date: Thu Jun 29 17:10:05 2006 -0600 Moved introductory material into Tutorial section. commit 860b5da27d21101dc89322659afb376f7d28f1e2 Author: John Bowman Date: Thu Jun 29 11:37:38 2006 -0600 Added prompt and quiet settings. commit 5698e9e1a1cbf3073cc280dfd71eaac62be58313 Author: John Bowman Date: Thu Jun 29 06:20:33 2006 -0600 Don't exit if stack overflow or segmentation fault handlers fail (to workaround broken libsigsegv-2.3; upgrading to libsigsegv-2.4 is recommended). commit 83b1ede25ffc9552e993a5d95613b76760b1130a Author: John Bowman Date: Wed Jun 28 21:59:26 2006 -0600 Renamed Examples section to Tutorial. commit 849359439f21d7b98bcb33eb0cb341a53180fcf5 Author: John Bowman Date: Wed Jun 28 12:40:09 2006 -0600 Removed unused line. commit 194753aa5ef632bbdeda4bc54091b0327559e630 Author: John Bowman Date: Wed Jun 28 12:38:09 2006 -0600 Moved debugger into separate base file debugger.asy. Added void stop(string file, string text); to stop at the first line in file containing the string text. Renamed q (quit) debugger command to x (exit); added q (quit) command that quits debugger and ends execution. Better fix for memory leak. commit 7f95d2aa8d456d4f4ac55fdf66bc1d380359df1c Author: John Bowman Date: Wed Jun 28 10:59:27 2006 -0600 Minor documentation updates. commit 6744bcf2123427cc4c488b9faa08a74c5c28286f Author: Andy Hammerlindl Date: Wed Jun 28 01:24:15 2006 -0600 Ensured that the basis in lookAt() is orthonormal. commit 1e1d21359af6ac9ed84e8a655f85caa8dd15339b Author: John Bowman Date: Wed Jun 28 00:35:12 2006 -0600 Incremented version to 1.11svn. commit 9dedce2a8e0e8aad57168c928a43c4e21c848aaf Author: John Bowman Date: Wed Jun 28 00:03:25 2006 -0600 Add support for spaces in Asymptote and output filenames. commit f4c9eb6456a12db6b0e0ced5d6c7d2baaa574274 Author: John Bowman Date: Tue Jun 27 22:51:10 2006 -0600 Added more quotes. commit 21cc31375595807ed07c4c16f0756c0c0914380a Author: John Bowman Date: Tue Jun 27 22:44:55 2006 -0600 Add more quotes for MSDOS users who like to use spaces in filenames. Remove quotes in diagnostic messages. commit 9481a3783c06307af05591e38a5fdfde0808c5eb Author: John Bowman Date: Tue Jun 27 13:30:09 2006 -0600 Cache source code in debugger. Move debugger help message to immediately before prompt. commit 56a9d58ba74a24b05cea462018490512c164dfab Author: John Bowman Date: Tue Jun 27 12:42:03 2006 -0600 Extended and documented debugger. Fixed string reads of lines containing only whitespace. commit b0c68db03af88951576f316333056c5d9b565acc Author: John Bowman Date: Tue Jun 27 01:47:31 2006 -0600 Fix drawpen. commit b4fa5baaf24bc1217c729461060e9aa5cde234f6 Author: John Bowman Date: Tue Jun 27 01:45:40 2006 -0600 Make default drawpen currentpen again. commit b042abc34e332e4b96fca5595320beb43392ab6a Author: John Bowman Date: Tue Jun 27 01:31:48 2006 -0600 Work around atbreakpoint memory leak. commit ddafc5a4ed46a3f11e6944cf3d9c6d10d3c7708d Author: John Bowman Date: Mon Jun 26 23:25:54 2006 -0600 Make Fill and FillDraw work with markers and superpaths. Minor formatting updates. commit 5e5eb1543ef6f855dd4fe7021ad2629af65efd09 Author: John Bowman Date: Mon Jun 26 22:23:17 2006 -0600 Suppress all errors when quiet=2. Catch handled_error in configuration files. commit 7960b9d402a8e258d465c777ec0183b1d5457062 Author: John Bowman Date: Mon Jun 26 21:14:44 2006 -0600 Added parametric surface example. Distinguish between distances in front of and behind camera. commit 6517027ce7911dfb196eac47ff129ed6e96e8e60 Author: Chris Savage Date: Mon Jun 26 18:02:59 2006 -0600 Implemented parametric surfaces. Surface fill/mesh is no longer drawn for nullpen arguments. commit 5ffd26cdb1c4cccd7de84fe4b6297d5a599dc058 Author: John Bowman Date: Mon Jun 26 16:04:47 2006 -0600 Fixed segmentation fault if atbreakpoint isn't defined. Moved debugger.asy into plain.asy. commit 5c7f6e9573b220bd314fdabd7125837cb1472236 Author: John Bowman Date: Mon Jun 26 02:02:39 2006 -0600 Support compilation under g++-3.3.4. commit e8bd9c1cefa26e967527ea67557848c45c9e0e46 Author: John Bowman Date: Mon Jun 26 01:18:44 2006 -0600 Debugger support. commit 9a1d8ebaeced74c8a153a8cfc4676852623544f0 Author: John Bowman Date: Sun Jun 25 22:13:21 2006 -0600 Implement rudimentary debugger. Fix interrupts. commit e43db21f79abdef7e08101de0878690dbff29288 Author: John Bowman Date: Sun Jun 25 22:10:58 2006 -0600 Suppress stderr for gv workaround. commit 8ce72f2e5b1b30cb24fd00f98b9fb864a87a7dfe Author: John Bowman Date: Sun Jun 25 22:10:14 2006 -0600 Suppress stderr only for gv workaround. commit e63b5160040dbd16a42d1ed523e3e0577530c911 Author: John Bowman Date: Sun Jun 25 19:20:24 2006 -0600 Work around file descriptor problem with MikTeX 2.5. commit dbd425d4bd359edf6c23148c7616ce0631090b4b Author: John Bowman Date: Fri Jun 23 21:03:52 2006 -0600 Added Crop argument. commit fe386dfc9115d32344b5740960089de1fd6a58e3 Author: John Bowman Date: Fri Jun 23 21:02:52 2006 -0600 Added autoconf > 2.59 patch submitted by Chris. commit 146deafd826c99a659888fe7442932a769ed16c9 Author: Chris Savage Date: Fri Jun 23 18:06:33 2006 -0600 Added crop argument to limits to match xlimits. commit 4ba4b2c506db233267faab753776de776d4a43ab Author: Chris Savage Date: Fri Jun 23 18:04:34 2006 -0600 Corrected default crop argument of xlimits. commit 547c1670099a308a0cc8a7775663a4538cd2514f Author: Chris Savage Date: Fri Jun 23 17:08:52 2006 -0600 Added picture argument and use of picture scaling to graph(...) functions that did not previously do this. commit 8584e109743d459f49cb464afda3d3fe96e1636c Author: John Bowman Date: Fri Jun 23 06:12:58 2006 -0600 Changed Docdir to docdir; hopefully this won't conflict with next release of autoconf. Replaced GPL LICENSE with newer version (FSF forgot to bump the version number!). commit 8d111c60d5c8fee35160dfc0a8e53fd62b2e40e4 Author: John Bowman Date: Thu Jun 22 16:35:05 2006 -0600 Incremented version to 1.10svn. commit eb0de75fc9217b6a6b982157fad091a0e3f60bb8 Author: John Bowman Date: Thu Jun 22 13:52:31 2006 -0600 Make gv-3.6.1 bug workaround work with older versions like gv-3.5.8. commit 8ff9ab7deabaa2f6b7b117056fca0a0b8c50a8d2 Author: John Bowman Date: Thu Jun 22 00:19:45 2006 -0600 Updated to MSDOS gs8.54. commit a4d69da3b751629da5f08828082c7c466c079914 Author: John Bowman Date: Thu Jun 22 00:18:51 2006 -0600 Incremented version to 1.09svn. commit 0f24e94fcb206bece1df0307eb9c353c8e900a9a Author: John Bowman Date: Wed Jun 21 22:36:17 2006 -0600 Documented int[][] triangulate(pair[] z); for creating a triangular mesh. commit 349ef2c3f789eb2c5da5cc8e8e34a2ecfeb83fe7 Author: John Bowman Date: Wed Jun 21 21:46:43 2006 -0600 Fixed make distclean. commit 053152254fd41c1c83d83bfc1dd77623abf10d59 Author: John Bowman Date: Wed Jun 21 21:15:32 2006 -0600 Clean up unneeded files. commit f6a46cd80c1f5d8a8c438368f67bdb1a7ff45d0c Author: John Bowman Date: Wed Jun 21 18:13:50 2006 -0600 Fixed warning messages. commit 4eba8344080fd285665a7673788a5fba3559fa4c Author: John Bowman Date: Wed Jun 21 16:41:19 2006 -0600 Removed unneeded public modifiers. commit b8a19d515820713230513415a8eba377a9f3fce2 Author: John Bowman Date: Wed Jun 21 16:35:07 2006 -0600 Added pen colorless(pen) function that strips pen color attributes (useful for avoiding color mixing). Fixed stepping bugs in slide on overfull slide; added institution field to titlepage. commit c026098e41f0ae6c8568bb41f6146592a730c298 Author: John Bowman Date: Tue Jun 20 21:40:06 2006 -0600 Removed AC_FUNC_MALLOC and AC_FUNC_REALLOC as they seem to cause more problems than they solve. Fix help command by reverting broken Docdir change. commit d940254ae30f0b9a5492adb74cf04417784d1eac Author: John Bowman Date: Tue Jun 20 13:12:52 2006 -0600 Increased epsilon to fix corner cases. Suppress null labels. commit 5eb1c97104c77b32837f6e96d1ea96a9859bca3f Author: John Bowman Date: Sun Jun 18 22:32:31 2006 -0600 Incremented version to 1.08svn. commit 1e60c4d32988a7983d208fa0289e71df8bb56bfb Author: John Bowman Date: Sun Jun 18 21:34:40 2006 -0600 Fixed gv workaround. commit b3983451193bb29fa2fe492d385f408d4e159182 Author: John Bowman Date: Sun Jun 18 20:51:25 2006 -0600 Fix cygwin build problems. commit d56acb49f9f969cb5a940a1c7c48a5de241110f6 Author: John Bowman Date: Sun Jun 18 10:39:54 2006 -0600 Add and document contour labels. commit 640ad149422053ee618a7be7bf5aa9636076b88a Author: John Bowman Date: Sun Jun 18 01:37:48 2006 -0600 Updated documentation regarding type-dependent array functions. Fixed example. commit 84088bd182aa527acc3e8d0f0bfa6a56a97c2510 Author: John Bowman Date: Sun Jun 18 01:24:06 2006 -0600 Add imagecontour example. commit ff6887f2c5ab91209aba3956c4d25805f0ad6901 Author: John Bowman Date: Sun Jun 18 01:03:23 2006 -0600 Add improved and simplified version of Chris' palette modifications. commit fcbd8a3c0dcd0d6baa8e5ceaec1c65f823b8f65f Author: John Bowman Date: Sat Jun 17 16:53:00 2006 -0600 Fixed arcarrowsize. commit 7ef1b87ae9df597ccff3c44fd5d65ada8d2d86a0 Author: John Bowman Date: Sat Jun 17 16:49:51 2006 -0600 Fixed and simplified LU decomposition, solve, and determinant. commit 8f9a1b963c39eff23baa5f87d53d1317a780d145 Author: John Bowman Date: Sat Jun 17 04:56:37 2006 -0600 Simplified test. commit ceeda628c34eae8b29464876115aebc0aba7fc58 Author: John Bowman Date: Fri Jun 16 20:09:40 2006 -0600 Optimized solve and inverse. commit f1129650fdf1e1b9a3b9a0d43b3d6979b7fbf501 Author: Radoslav Marinov Date: Fri Jun 16 14:01:41 2006 -0600 Added LU decomposition instead of Gauss-Seidel method in solve. Gauss-Seidel method is still used for finding inverses. Added a test for both. commit 973bab339bb76e8373ad05c952946b826453f035 Author: John Bowman Date: Thu Jun 15 16:33:32 2006 -0600 Renamed Fill filltype to FillDraw and added Fill filltype that only does a fill. Fixed arrowsize capping code and added arrowsizelimit. commit 3b257884e63a16d5f3c488d5ed774acb7f31d5a1 Author: John Bowman Date: Thu Jun 15 14:41:13 2006 -0600 Renamed readable to restricted. commit 651ae218ff630152e4d03bf44b6d5be20e6f47a7 Author: John Bowman Date: Wed Jun 14 15:55:06 2006 -0600 Fine-tune logo. commit 7f1cf6db7f42d205226c05742a347c09701ff4bc Author: John Bowman Date: Wed Jun 14 00:15:22 2006 -0600 Change defaultformat argument of PaletteTicks to "". Fix formatting issues. commit 3e2f27f3847471318a6568e6cda79c5e1b3e4188 Author: Andy Hammerlindl Date: Tue Jun 13 17:23:58 2006 -0600 Added readable keyword, made public the default permission. commit 5dd1e7f9b4440e235a3d77d591c683b8a4c99b55 Author: Radoslav Marinov Date: Tue Jun 13 14:49:16 2006 -0600 Updated documentation for contours. commit 5ef02318e225d6f75bbddb01866f7efe278b92cf Author: John Bowman Date: Tue Jun 13 13:14:18 2006 -0600 Optimized postsorting of triangulate routine. Simplified contour interface. Added nonuniform contour mesh example. commit 9643e0dc524184c8285d73c2351976e5a98f5a11 Author: John Bowman Date: Tue Jun 13 12:34:14 2006 -0600 Make arrowhead and arrowheadbbox public to allow them to be overloaded. commit 9ad6ed85d523118ea068a22769f72d587dda8d2a Author: Radoslav Marinov Date: Tue Jun 13 11:10:27 2006 -0600 Added non-regularly spaced contouring. commit f227e558df95e61472134119242ad9feadb93875 Author: John Bowman Date: Tue Jun 13 01:00:48 2006 -0600 Use random pair for overwrite moves when align=(0,0). commit b257abdab1f08e55f01aa5570a05e785dde0e40b Author: John Bowman Date: Tue Jun 13 00:59:12 2006 -0600 Formatting. commit 8684d471b3697c1630abc8b06bfb74506b49c9ff Author: John Bowman Date: Tue Jun 13 00:54:17 2006 -0600 Fixed secondary logarithmic axes. commit 0346bdb77d0dc2da9d7cf7b8f660f5e487472951 Author: John Bowman Date: Tue Jun 13 00:34:56 2006 -0600 Fixed count computation (for endlabel=false). commit fc50cfec9594716a63f4d6708e3e6dadb75dabfa Author: John Bowman Date: Tue Jun 13 00:25:17 2006 -0600 Fixed alignment of rotated tick labels. commit 2823b5e4594cc35dbf382941754006bea86aa9c4 Author: John Bowman Date: Mon Jun 12 22:37:10 2006 -0600 Implemented more efficient guide collection algorithm. commit d3e000399ca900690fbe10cc7f99820c835f7bb2 Author: John Bowman Date: Mon Jun 12 20:33:17 2006 -0600 Added string option to assert. commit 1fd671831ef34a2e1114bf08a061ff9985c373e0 Author: John Bowman Date: Mon Jun 12 20:30:55 2006 -0600 Standardize "could not load module" error message. commit 51889939c120a4ca97af149784c217ceb7b06115 Author: John Bowman Date: Mon Jun 12 20:29:02 2006 -0600 Use most up-to-date verbose setting for traceback. commit f7f07a661d8b1f8401949d437dac738a7de61050 Author: Radoslav Marinov Date: Mon Jun 12 10:23:59 2006 -0600 Removed copying of unused variable in triangulation routine. commit c80e76f924a4611e1ce9c9b6e11e3bcd7f92d58f Author: John Bowman Date: Sun Jun 11 14:05:28 2006 -0600 Removed executable flag. commit 59f5f5a6ae7a00dea7b006404c1e2881df118c93 Author: John Bowman Date: Sat Jun 10 15:45:17 2006 -0600 Make currentprojection public. commit 29d5586ceb7a1aef6e782a4d124bf3bd672b5575 Author: John Bowman Date: Sat Jun 10 15:42:22 2006 -0600 Import three as public so that currentprojection can be overridden. commit 6ed73746146901f100fd6ecb07a3fe0c8ee549ee Author: Andy Hammerlindl Date: Sat Jun 10 13:55:29 2006 -0600 Added addSaveFunction to extend save and restore. Moved projection code to three.asy. Handle degenerate cases in lookAt(). commit 82ecef1191a366ad0f0b0508663cc5ca013fe4b9 Author: Andy Hammerlindl Date: Sat Jun 10 13:51:57 2006 -0600 Noted built-in modules. commit 25751222b9f06612b95690c9607aff0be31b8ce2 Author: John Bowman Date: Fri Jun 9 22:16:41 2006 -0600 Removed unused subtraction. commit 9981e0a4273b280d7edf66ad2d121c3b7ec7d620 Author: John Bowman Date: Fri Jun 9 22:05:53 2006 -0600 Fix overhead/underhead views. commit d627684544274d7cf3670616a96cd687a80b05d0 Author: John Bowman Date: Fri Jun 9 16:49:33 2006 -0600 Added up argument to lookAt; remove lookAtOrigin in favour of lookAt(O,...). commit 4c9fc4ebfac5c393e8cbfa0c22a2ae32fab47d6b Author: John Bowman Date: Fri Jun 9 12:21:26 2006 -0600 Simply support for custom projections. Reverse arguments of lookAt for clarity. commit f0648e6bf0a78e245f949a6aae289aef6b99b0bd Author: Radoslav Marinov Date: Thu Jun 8 13:49:56 2006 -0600 Fixed a problem with triangulation. commit fb2650817ca533532783708b22602a8b5b85c8d0 Author: John Bowman Date: Wed Jun 7 21:41:09 2006 -0600 Fixed typo in configuration instructions. commit 869f515dc87594e6b50fa2609847ffe4e4facff4 Author: John Bowman Date: Wed Jun 7 17:00:16 2006 -0600 Add Delaunay. commit f200d75273e0bfb0f7ae0bdab84714c45a462ee2 Author: John Bowman Date: Wed Jun 7 16:58:54 2006 -0600 Added Paul Bourke's Delaunay triangulation routine. Removed unneeded copyArray from inside. commit 772fbb1edbde73c41403365263a2adf06b08a443 Author: John Bowman Date: Wed Jun 7 14:22:18 2006 -0600 Fixed typo regarding cone vertex. commit 88e0cf1bdfadaea42f1f660ea8a79fe43ce0695a Author: John Bowman Date: Wed Jun 7 14:02:03 2006 -0600 Fix configuration problems. commit 27e61ce6967c6650650287430cf37e5f6efbb5fc Author: John Bowman Date: Wed Jun 7 03:25:06 2006 -0600 Remove docdir. commit b655d72e4a0551596632fbd31b5128322450b454 Author: John Bowman Date: Wed Jun 7 03:10:45 2006 -0600 Remove unused docdir operations. commit 9610dd75d92ba49c9e448425ea9aa66eef84f0a2 Author: John Bowman Date: Wed Jun 7 03:05:30 2006 -0600 Implement work around for backwards-incompatible command-line options of gv-3.6.1. commit 1c99f965ca672e7a581ad72cb440454e2328b0fc Author: John Bowman Date: Wed Jun 7 02:47:32 2006 -0600 Make docdir if it doesn't exist. commit ea5049ca5be8b6fe15ad71804eaa69363b374320 Author: John Bowman Date: Wed Jun 7 02:27:37 2006 -0600 Fix default configure documentation directory setting. Document inclusion of Asymptote in Fedora Core Extras project. commit db803d3c1d07e1494e24a197a02a6968e3bc5df1 Author: John Bowman Date: Wed Jun 7 01:40:43 2006 -0600 Added --with-docdir=PATH configure option. commit 8cf4582ac520c17579da3f75c57b2e4001759b7b Author: John Bowman Date: Tue Jun 6 23:12:16 2006 -0600 Add object structure for handling frames and Labels on an equal footing. Add a pack routine for building compound frames from a list of objects. Simplify flowchart interface and example; fix frame/Label packing. commit cea422aaa3c107040e20983f2918ead70fb61293 Author: Radoslav Marinov Date: Tue Jun 6 14:46:11 2006 -0600 Added slopefields module. commit 5e6f5135cc6c798defa0ef962b90bc44f120259a Author: John Bowman Date: Tue Jun 6 04:10:20 2006 -0600 Fixed alignment problems, standardized usage. commit 9b09a4901061fe9d5092a8ccb369d1f8b25450e7 Author: Steve Melenchuk Date: Mon Jun 5 12:13:22 2006 -0600 Repair inconsistency in box height being used for vertically centering the header text in flowrectangle. commit 009f43ccc83a73ac803878ac83351593a2acc157 Author: Steve Melenchuk Date: Mon Jun 5 11:52:27 2006 -0600 Tweak vertical margins on flowrectangle with header. commit eac4e8394435700da38568335cb6c3a9dfb7d8c9 Author: Steve Melenchuk Date: Mon Jun 5 09:31:06 2006 -0600 Adjust margins on flowrectangle (both with header and without). commit 63a2536150751be2feafc4457d8e6402fbe29b58 Author: John Bowman Date: Sun Jun 4 21:49:17 2006 -0600 Make makepen fill nodes; fix infinite loops. commit 844fd281ea372e25b043a6e899e8ee32ffa869ba Author: John Bowman Date: Sun Jun 4 14:49:17 2006 -0600 Added missing pen arguments in calls to hatch. commit bd06d2617aa5c40b9a7b7e13eaa3cd6f2c35d24c Author: John Bowman Date: Sat Jun 3 08:04:31 2006 -0600 Fixed documentation of PaletteTicks. Renamed ngraph argument to n for consistency. Renamed straight(path) to piecewisestraight(path) and moved to runtime.in. commit 3aba60d261891a8a6aea2f45d1ba81411fea0470 Author: John Bowman Date: Fri Jun 2 16:20:34 2006 -0600 Draw on frame f. commit 45ce2b17d76b55a1612548fbaec345dc1b21b161 Author: Andy Hammerlindl Date: Wed May 31 13:51:33 2006 -0600 Clarified the non-behaviour of top level static modifiers. commit a74dcf0f7b3e963af33e33071fc38c6afb2b30b3 Author: Andy Hammerlindl Date: Wed May 31 13:42:21 2006 -0600 Added warning for top-level static modifiers. commit 54baf1109570f092424b389f6059c87a1bb74310 Author: John Bowman Date: Wed May 31 12:45:50 2006 -0600 Added flowblock initializer; removed unneeded new picture initializers. Added authors, improved indentation. commit d9198ced6bdf4ff2fab4bc8a58905656a93aa3f2 Author: John Bowman Date: Wed May 31 11:54:36 2006 -0600 Make cputime return a structure. commit 78e73f71620d81fc555f4c27158b75290cb409c2 Author: John Bowman Date: Wed May 31 11:53:38 2006 -0600 Removed unneeded CFLAGS. commit 07b2003ee31ecc0df02a550d0f9705524cc5466a Author: John Bowman Date: Wed May 31 10:34:10 2006 -0600 Fix texinfo dependency. commit d5597dbdbc87dd6f48a7e628eecde5cfb95c6463 Author: John Bowman Date: Wed May 31 10:21:34 2006 -0600 More info updates. commit 649b4aec2d15a36e686e98b30ef91fb7f774363a Author: John Bowman Date: Wed May 31 07:03:42 2006 -0600 Add cputime() function. commit f545c026d79b3cf8059a96200521bd73be1d1dd4 Author: John Bowman Date: Wed May 31 06:24:26 2006 -0600 Use -O3 when building rpms. commit dbd641c869d86b02b6ba3153c41cbd625a13221a Author: John Bowman Date: Wed May 31 06:13:43 2006 -0600 Fix picture scaling computation in dimension example. commit a083bff3445bf9134c9cc5e4020c38f213a6b715 Author: John Bowman Date: Wed May 31 05:18:53 2006 -0600 Improve diagnostics. commit 7b20750384ac20389e1849e32a22c6c4c929f08d Author: John Bowman Date: Tue May 30 01:18:50 2006 -0600 Removed info dir entry in %files section; makedepend should respect cflags. commit 010f667be0917e8ea63c38bc0b894fc8ee8d82b8 Author: John Bowman Date: Tue May 30 00:53:41 2006 -0600 Use make install-all in rpm spec file to install info pages as well. commit 000cb4d5d8afababec8806b7b439143a0389a5ad Author: John Bowman Date: Tue May 30 00:53:15 2006 -0600 Fix make uninstall. commit 60cacc6f428142cb91f9c3e54ae1c4cc5b73d2d7 Author: John Bowman Date: Tue May 30 00:28:36 2006 -0600 Fix installation changes. commit 98f69f91a7c55ce3a90cdbe800365124e6137292 Author: John Bowman Date: Mon May 29 23:58:30 2006 -0600 Update example to use new mesh resolution names. commit aac6c630f447abcd6880c0ae38add2bb8c32e63f Author: John Bowman Date: Mon May 29 23:57:15 2006 -0600 Fix another relative path installation problem. commit 24e32f701448ae0abd7e332aab053bf60d5c062e Author: John Bowman Date: Mon May 29 23:47:36 2006 -0600 Fix installation of system asy files. commit 08b522ff4cabbdaaf70de0c14eddc61e12755b98 Author: John Bowman Date: Mon May 29 23:40:00 2006 -0600 Fix cxx warning message. commit f620740a5af8135c70fbd4e81bd6361cfb64bdc0 Author: John Bowman Date: Mon May 29 23:38:33 2006 -0600 Renamed contour examples. commit fcbd51eb488444cc34e8a967ee73d22b0f3554a4 Author: John Bowman Date: Mon May 29 23:33:18 2006 -0600 Simplified contour interfaces by implicitly casting pen to pen(real). commit 32a0c4c021e8faa02e52de3403d52b0fc4857ad6 Author: John Bowman Date: Mon May 29 22:06:37 2006 -0600 Change package group; request texi2dvi; install asy-init.el. commit 12fbe90c8826f0a4bdd37d53051d1fcd7377e524 Author: John Bowman Date: Mon May 29 22:02:14 2006 -0600 Add emacs/xemacs init file for rpm installation. commit ca219dfe286fe14588199316b44a516aed97ebf2 Author: John Bowman Date: Mon May 29 22:01:05 2006 -0600 Move include shipout earlier. commit 1f2e802856fabc690a106486a3ba4139963e7b57 Author: Radoslav Marinov Date: Mon May 29 15:46:10 2006 -0600 Added new interfaces to contour.asy commit 04c13ec23cf6ab805a13097218c21860a571be28 Author: Radoslav Marinov Date: Mon May 29 15:31:48 2006 -0600 Added basic documentation for contours. commit a03b794e15756e3e0459f4601851d2eef218bc0d Author: John Bowman Date: Sun May 28 22:40:13 2006 -0600 Minor optimizations; standardized mesh arguments (n -> nx, m -> ny). commit af0349baa883f68bdc064f5c20b921880ce4431f Author: John Bowman Date: Sun May 28 18:07:12 2006 -0600 Further optimizations obtained by sorting contour array. commit d5e04e1cee076e6fa542899344643ab02e63ae36 Author: John Bowman Date: Sun May 28 13:12:14 2006 -0600 Optimize. commit 5956312549528c37d03ed6a6aa638f41d64cd72c Author: John Bowman Date: Fri May 26 22:19:37 2006 -0600 Add Jose's patch: list directories in %files section. commit 5bf4a571d99182f39cbf8c7089e13497c8a6e31d Author: Radoslav Marinov Date: Fri May 26 15:32:06 2006 -0600 Fixed a minor bug and added an additional interface option. commit 2dc5e703eafd44944c9056defebcb7f0d62cc4a7 Author: John Bowman Date: Fri May 26 15:12:37 2006 -0600 Make pen argument a function. commit 4aafdb65a959e771b184dc6ffd9ffdf58af6ac1d Author: John Bowman Date: Fri May 26 15:02:09 2006 -0600 Standardized signatures; support contours of matrix data as well as functions. commit a05043c0414b96b2e277655e781c4468a7c012fd Author: John Bowman Date: Fri May 26 11:36:37 2006 -0600 Make images and shading respect -gray, -rgb, -cmyk, and -bw. Make palette.asy use grayscale with -gray. Replace bool mono by settings.gray || settings.bw. commit 492d0924cd96e9fb43f5b7c42f7b42e6f7db8164 Author: John Bowman Date: Fri May 26 08:24:01 2006 -0600 Add date arithmetic routines: time(int seconds, string format=""); seconds(string t="", string format=""); Make time() return the current time in the default UNIX format. commit 0d6b7c6cf6f5f120e7a06024eaf8186aa821c3ac Author: Radoslav Marinov Date: Thu May 25 15:35:50 2006 -0600 Inserted a space between operator and .. . commit 5f1fdbef839ebb2692ca7e7aa3b6cacfa1a2bc7e Author: John Bowman Date: Thu May 25 14:50:32 2006 -0600 Changed 1.07cvs to 1.07svn. commit fb08ae2efca0b373fae51e0d835f9b45e8a8d2ca Author: Radoslav Marinov Date: Thu May 25 13:17:55 2006 -0600 Fixed a formatting issue and a minor bug. commit 18489c1c24083cb89668b9d64893301fb2dc6a2d Author: Radoslav Marinov Date: Thu May 25 11:29:03 2006 -0600 Contour.asy now can choose interpolation operator; default is --. commit eacb2efc49b51b090ce2164ff13c4801e75de347 Author: John Bowman Date: Thu May 25 10:43:46 2006 -0600 Added example of log2 graph. commit c7cccaf9c785a2d500880d5fc98a5f048602697d Author: John Bowman Date: Thu May 25 10:32:56 2006 -0600 Fixed bug in YZero. Handle log graphs bases other than 10. commit 6d948eaee01351978780cd68c59885096bc01a02 Author: John Bowman Date: Thu May 25 05:00:23 2006 -0600 Rename array virtual pull function to delete; handle case with negative argument. Add virtual insert function for arrays. commit e8c13b250ffb7d76bad5771584f374c077d66aca Author: John Bowman Date: Thu May 25 04:20:44 2006 -0600 Added virtual pull function for arrays. commit 329a88e82d4993a278c8672b516fe9b035b7ffba Author: John Bowman Date: Thu May 25 03:44:18 2006 -0600 Fix currentpicture.empty() test. commit 0d0dac1cd60be60a0076b0be059bf10096ee2423 Author: John Bowman Date: Thu May 25 03:07:52 2006 -0600 Standardized argument names. commit 5a8131d6c2bc8bea7859c6cf58d6ba52966aa882 Author: John Bowman Date: Thu May 25 02:55:26 2006 -0600 Formatted. commit e4997b1c1f87258e77414236b182b99b3637f8d5 Author: John Bowman Date: Thu May 25 02:30:13 2006 -0600 Fixed longitudinal skeleton when c != O. commit fcd1d170401623022db843402ad7cb29a4bbd590 Author: John Bowman Date: Thu May 25 02:28:57 2006 -0600 Minor optimizations. commit d214a8ab29f6f395ae29b142f04f0bfaadbec9f1 Author: John Bowman Date: Thu May 25 02:27:52 2006 -0600 Check colorspace argument for all forms of shading. commit cf6077824d89ed8864496d545b6ce584ed8c0abe Author: John Bowman Date: Thu May 25 02:26:56 2006 -0600 Added 3d axes routine. commit 289d41c8ae0a0bcc24fd160a0f1663d2dc7ec5e1 Author: Radoslav Marinov Date: Wed May 24 15:45:34 2006 -0600 Now uses arrays. commit 6c7e8af3ae2984f1cb20bece75a584bbffda3d5a Author: John Bowman Date: Wed May 24 15:08:08 2006 -0600 Handle subpath arguments beyond boundaries. commit 3d113075dbb9f217a024bf099a538b168b78accc Author: John Bowman Date: Wed May 24 11:25:27 2006 -0600 Added outline(). commit 500936a35c334a1d9e7f196819a57462e2a7ae5d Author: John Bowman Date: Wed May 24 01:16:30 2006 -0600 Added reverse(triple[]). commit 072a649884bca1338c9cc74b147e7bee261f937e Author: John Bowman Date: Wed May 24 00:28:55 2006 -0600 Minor optimizations. commit 9ff513320c61a5d555c6844a206f7b7f095a5d11 Author: John Bowman Date: Wed May 24 00:27:59 2006 -0600 Simplified code. commit f1429ac3504544b7d4786f6e6edd80ea656b7f74 Author: John Bowman Date: Tue May 23 22:32:50 2006 -0600 Updated to mention Subversion instead of CVS. commit e4ee3b0940c364a5c241bc96dbfe4c6b7aaa51cc Author: John Bowman Date: Tue May 23 22:27:31 2006 -0600 Updated documentation for Subversion. Fixed list of autogenerated files in slidedemo.asy. Added missing file. commit f1b30214cf29bcd231024f5f574991ddb7e0d5d6 Author: John Bowman Date: Tue May 23 16:36:20 2006 -0600 Clarified comment about duplicate guides. commit b79cd62cf321feb649d66c333e1a4b534b795625 Author: Radoslav Marinov Date: Tue May 23 14:44:18 2006 -0600 basic .. routine commit e7706f3e6130165c7e777a4d52af33154143aff9 Author: John Bowman Date: Tue May 23 11:33:30 2006 -0600 Improved formatting. commit eed452cd06ba19e12fd9a39b933578e654ac49ff Author: Radoslav Marinov Date: Tue May 23 11:26:18 2006 -0600 minor updates to contour.asy commit 5a36430d4a78004a93b423ae9aa40621226d926d Author: John Bowman Date: Tue May 23 10:46:50 2006 -0600 Fixed typo. commit 854961693a69d0cb1b415d03ea2606be4daa890b Author: John Bowman Date: Mon May 22 16:23:43 2006 -0600 Incremented version to 1.07cvs. commit 996168032abd9a766ce2d783be17354747617e5c Author: John Bowman Date: Mon May 22 08:36:57 2006 -0600 Added figuremattpen optional argument. commit eea7a0e9ded8118d99fff985a24dc35445ed9e6d Author: John Bowman Date: Mon May 22 08:36:14 2006 -0600 Fixed syntax. commit a8b82e25d7902945f2081705fb4b3081b1cb7f79 Author: John Bowman Date: Mon May 22 00:17:35 2006 -0600 Renamed old flowchart.asy example to advection.asy. Formatted flowchart.asy base file and example; standardized spellings, etc. commit 8dd6575b7756cc5f90a55f1b1dfadbd58d51cc0f Author: John Bowman Date: Sun May 21 23:38:42 2006 -0600 Updated. commit 631c41e5ff3247612218189a5ccd2972e85ba48f Author: John Bowman Date: Sun May 21 23:38:05 2006 -0600 Restore TeXpipepreamble and TeXpreamble after eval(embedded=false). Restore settings between multiple file runs. commit 7be85d3918e2a665b3723486f43b59e7274c4e1d Author: John Bowman Date: Sun May 21 23:35:52 2006 -0600 More endl to newl changes. commit 4bc38d1758d0601ea5747592ec6b465ab388d492 Author: John Bowman Date: Sun May 21 23:34:29 2006 -0600 Allow alignment checking to be disabled with -DNO_CHECK_ALIGN. commit bea2825f47aa9136c29aa1cdf88ef0f75ccd4455 Author: Steve Melenchuk Date: Sun May 21 14:00:13 2006 -0600 First version of the heavily-cleaned-up (originally externally contributed) flowchart module. A (very simple) demo has been added into examples and the documentation has a section on the module (could the docs be improved for it?). commit f84251f8cf64885ef16c1d3c10ec2ae74d5823cd Author: John Bowman Date: Sun May 21 02:39:14 2006 -0600 Changed quiet=false option to view=true in shipout (backwards incompatible, but rarely used). Removed unused execute(string s, bool embedded=false) function. Added void asy(bool overwrite=false ... string[] s) to conditionally process each file name in array s in a new environment. Moved margin argument of figure in slide.asy to just after options. Make slidedemo.asy generate required files in case they don't exist. commit 5a2f592641f2a82b86b6b73a103ff2113bc39374 Author: John Bowman Date: Sun May 21 02:02:42 2006 -0600 Fixed segmentation fault with a future eval after an eval throws an exception. commit 9a8e1d66275b73f67d167b8f60105b2550df4461 Author: John Bowman Date: Sun May 21 00:38:22 2006 -0600 Make titlepage and title by default call newslide, unless the currentpicture is empty. Added reverse video option to slidedemo.asy. Add an argument to newslide to allow stepping to be turned off for that slide. Updated slidedemo example. commit a47eb26bec02902d3efcd94997b96e5a01fe701b Author: John Bowman Date: Sun May 21 00:34:16 2006 -0600 Add optional x and y margin arguments to Fill. commit 181ab2a6b5811ce4f76eb642be9337cd3fdd66fc Author: John Bowman Date: Sun May 21 00:29:44 2006 -0600 Allow -u to be specified multiple times on command line. Make "open" the default pdf viewer for MacOS. commit 38c9138c931e1f2c6808c54a078e1308be30da8c Author: John Bowman Date: Sun May 21 00:28:15 2006 -0600 Added asycolors.sty package to make LaTeX aware of CMYK versions of predefined Asymptote colours. commit f0ddb7b579a89d99e8dd649548e4de4c064247ed Author: John Bowman Date: Sun May 21 00:24:42 2006 -0600 Fixed -outformat pdf for papersizes like a4 with nonintegral bp dimensions. Improve performance by avoiding unnecessary flushing of output stream. commit c8dd84f63624e80aa56b358c21706ada90cc48a8 Author: John Bowman Date: Fri May 19 17:24:21 2006 -0600 Make fft(real[]) a nop when not configured with fftw. Handle fft(new real[]) gracefully (returns an empty array). commit f9b882aa5d5545bed95c271067ed6422339a4543 Author: Radoslav Marinov Date: Fri May 19 10:31:11 2006 -0600 contour.asy now with guides, supports dashed lines commit e9f6e6bbed1e61cc3a30f8b9164b8880e3a4a541 Author: John Bowman Date: Fri May 19 01:09:38 2006 -0600 Incremented version to 1.06cvs. commit c6deca9111977391e90151813a05cc2fef788649 Author: John Bowman Date: Thu May 18 22:42:16 2006 -0600 Reduced default authorpen fontsize. commit daf49b72e56d986b53fcc3ee11ffec4c6114b43c Author: John Bowman Date: Thu May 18 22:21:02 2006 -0600 Added normal argument to Arc. Standardized arguments to revolution. Updated documentation and examples. commit 79d6d9730dedab0fca16651ce2c0b1f61bc97405 Author: John Bowman Date: Thu May 18 13:43:12 2006 -0600 Added determinant test. commit 4aa6fc20712ea101dc4d5a34d359d2a0be19b83f Author: John Bowman Date: Thu May 18 13:04:15 2006 -0600 Removed unnormalized epsilon from determinant. commit 5eda890c8fc4f08d4fade2e20b773bf47cc9aa31 Author: John Bowman Date: Thu May 18 12:48:10 2006 -0600 Updated documentation: real a[] now constructs internal functions of real[]. commit 56f80f8eaa6efa7e5b313771197a6b8dd43a1da6 Author: Andy Hammerlindl Date: Thu May 18 12:17:29 2006 -0600 addOps for int x[] now implemented. commit 81e637b56a0bf064ade66eb783946ac464233fcd Author: Andy Hammerlindl Date: Thu May 18 11:55:07 2006 -0600 Now add operations for all variable declarations of new arrays and functions. Removed old code. commit 1170b2cd6b0f1e2b5f4bbf6ab352a764a3aa32c8 Author: John Bowman Date: Thu May 18 04:14:06 2006 -0600 Explicitly document -u stepping=true. commit 2fda9b050cd48bed37c4e253c8ad4a1a6a7cb6d0 Author: John Bowman Date: Thu May 18 03:53:10 2006 -0600 Fixed cxx warning. commit 8dd3e7faa0ffc2beb933f5eb8bc2b9aa0b34ab0b Author: John Bowman Date: Thu May 18 03:29:48 2006 -0600 Implemented revolution struct in solid.asy for constructing, drawing, and filling surfaces of revolution. Added surfaces of revolution examples. Ported precontrol and postcontrol resolution fixes to three.asy. Added 3D version of relpoint functions. Fixed normal(path3). Updated documentation. commit 08ebff5c9945585178e6a5a23648a297f9f8bb20 Author: John Bowman Date: Thu May 18 01:03:04 2006 -0600 Added example showing how to scale only selective dimensions. commit d9a8fc9d1ce7884a95320fe1fbcd8bf4f83dcddd Author: John Bowman Date: Wed May 17 23:44:26 2006 -0600 Documented how to call Asymptote from Python. commit 17e102d2ca2835dd8bfb691d4e483a4630288271 Author: John Bowman Date: Wed May 17 23:07:49 2006 -0600 Make location of slidedemo explicit. commit fbe3ea488a0e1f27effe2111057103dccd0d6052 Author: John Bowman Date: Wed May 17 22:46:32 2006 -0600 Reduce infinity to avoid floating point exceptions with --- operator. commit 93dcd881e5b4476ffe07fbf4e7a0ee9199dcf625 Author: John Bowman Date: Wed May 17 22:44:19 2006 -0600 Allow stepping to be enabled from the command line: -u stepping=true. commit 5967b8c34f40538a7aa760c7549eef2e2ae74aa1 Author: John Bowman Date: Wed May 17 22:39:49 2006 -0600 Added y and z autoscale arguments to scale(). commit 383ad013af16211ec6fabeb8c8538d0dd2516f9d Author: John Bowman Date: Wed May 17 22:15:27 2006 -0600 Added example showing how to label an axis with an arbitrary string. commit 14eb8a4d6ecf031dd09ae712eab638dca6aa75fa Author: John Bowman Date: Tue May 16 01:40:57 2006 -0600 Improved test diagnostics by using internal assert(bool) function. commit 1a68bcd0d76c42dc0e9aae4b9b94be57f1612e53 Author: John Bowman Date: Tue May 16 01:37:55 2006 -0600 Added assert(bool) function. commit 6db26721184b3d768d88c67d81cda0483f69ea35 Author: John Bowman Date: Tue May 16 01:36:19 2006 -0600 Fixed cubicroots when R=0. commit 1e633ec2b48093ddebc77de17300b12fcce7d01d Author: John Bowman Date: Tue May 16 01:34:48 2006 -0600 Flush output stream on errors. commit a0feb5badead646e4e5ced4b9ac5397fa1986f8d Author: John Bowman Date: Mon May 15 00:45:38 2006 -0600 Added offset argument to linetype. commit 417c387ca3207020f2e6118773b2492f8ce62d62 Author: John Bowman Date: Sun May 14 14:54:35 2006 -0600 Remove unused argument. commit 6eae114c9ac74bd8e154dc097c73e11ba5571b76 Author: John Bowman Date: Sun May 14 14:48:42 2006 -0600 Move GSL functions into a separate module named gsl. commit f3c570f260ea6bdd68366d262203160d58d15394 Author: John Bowman Date: Sun May 14 14:37:04 2006 -0600 Formatting. commit 3d57dc5a3d4e2aacce91088294f13115b2e54d1f Author: John Bowman Date: Sun May 14 11:29:08 2006 -0600 Removed aclocal and autoconf since Asymptote is distributed with configure. commit c4a7ec511adaed6a1bc966de48503a10c943ba7e Author: Andy Hammerlindl Date: Sat May 13 12:33:45 2006 -0600 Moved addOps for types to builtin.cc. Added support for builtin structures. commit 953b39d4f44cf9a23f623c0f01c26451b557aa95 Author: Andy Hammerlindl Date: Sat May 13 09:52:19 2006 -0600 Fixed typo. commit b232db20cc3cc1a9aafcb1030f14ee86f1750de4 Author: John Bowman Date: Sat May 13 00:53:22 2006 -0600 Removed quiet(bool) in favour of explicit setting. commit 44aa19ad3651fde5c45309d96f216d1a35020e13 Author: John Bowman Date: Sat May 13 00:20:07 2006 -0600 Updated man page. commit 839c7735f217563d6e0a5e2d0c7a7ed493c30f64 Author: John Bowman Date: Fri May 12 23:59:05 2006 -0600 Added RPM spec file, courtesy of Jose Pedro Oliveira. commit 45f04ae52790e8b3adc9a9e6f07a6d55c239f8e7 Author: John Bowman Date: Fri May 12 23:25:56 2006 -0600 Moved asy.vim and asy-mode.el back to /usr/local/share/asymptote, where they really belong. Also put asymptote.py here. Revert default asymptote documentation directory to /usr/local/share/doc/asymptote (removed recently introduced version dependency, which made no sense since the system directory doesn't depend on a version number either: version checking is done in plain.asy). Updated documentation (including new sourceforge cvs instructions). commit dfed1750cf52db95f0d38ed3e031565c37213bbb Author: John Bowman Date: Fri May 12 22:55:57 2006 -0600 Make Arc use degrees rather than radians. commit 411fe8ba53952d16e4d27d6de5d4325fd7d53872 Author: John Bowman Date: Fri May 12 22:54:38 2006 -0600 Fixed obliqueX and obliqueY camera positions. Make obliqueZ a synonym for oblique. Ignore spurious errors from longitude. Added missing (optional) normal argument to arc call. commit e01588feebf9585c9da7fbfe791f0d395b8da16c Author: John Bowman Date: Fri May 12 22:47:41 2006 -0600 Added clipping margin to unfill. commit c273826c1a2281a543103d2f463b1fd72065552b Author: John Bowman Date: Fri May 12 22:46:54 2006 -0600 Added Andy's getApplication bug fix. commit a4d1dd6e26a7384fe0fb8b1d987cd6bf930f164b Author: Radoslav Marinov Date: Fri May 12 15:50:17 2006 -0600 lines of length <80. handles multiple contour lines at once for efficiency. commit 186767d6435ce06ef92b6fc0c119615d2ab6842e Author: John Bowman Date: Fri May 12 15:03:59 2006 -0600 Renamed pen argument. commit baa95c93a27afef3f53b527e2e5a62d5af3fa4cb Author: Radoslav Marinov Date: Fri May 12 13:05:34 2006 -0600 added basic contouring routine commit cd72b2da3607d98aed4546caa20d6d21d717cd31 Author: Radoslav Marinov Date: Fri May 12 12:58:51 2006 -0600 added general determinant commit b1a94105507b3e256c7d9b0aef4bc41dc53bd6dc Author: Steve Melenchuk Date: Fri May 12 10:40:23 2006 -0600 More tests; these ones relate to transforms. commit 6d23e63e5dd82740f7865253f6262023ca7181a7 Author: Steve Melenchuk Date: Fri May 12 10:19:44 2006 -0600 Beginning to expand the arithmetic test. Now classifying as related to what type of data the tests are working with; each file contains several tests related to that type of data. commit c5273d2efcbd68b4a733fc70856cf62bd2b55e92 Author: John Bowman Date: Mon May 8 02:33:45 2006 -0600 Fixed quiet(bool); improve settings diagnostic. commit 0a26a23c326f69e2edcec6c0afbb1b0e09187baf Author: John Bowman Date: Mon May 8 01:50:15 2006 -0600 Removed Degrees and Longitude in favour of degrees(warn=false) and Longitude(warn=false). Moved Sin, Cos, Tan, aSin, aCos, and aTan to runtime.in. Renamed double to real in runtime.in for compatibility with asy code. Moved examples to subdirectory of documentation directory. Don't automatically strip binary when installing. Generalized DESTDIR support. Documented optional packages in INSTALL. commit b0dbd1691f873f66d2219275b176928bebf5ec13 Author: John Bowman Date: Mon May 8 01:36:48 2006 -0600 In dash adjustment, always respect scaling to penwidth (when requested) and draw terminator if close to arclength. commit 759d070b0ebf96f1464095f835c531c946527e9d Author: John Bowman Date: Sat May 6 21:39:22 2006 -0600 Improve ambiguous function signature diagnostics. commit 1241c3dc9554391c43910996334988d9e73816a0 Author: John Bowman Date: Sat May 6 21:35:50 2006 -0600 Turn of listvariables while reading config files. commit 41c68567f03d276a2dbacdc1c6cd389e9d3dc44b Author: John Bowman Date: Sat May 6 04:30:43 2006 -0600 Added Sierpinski gasket example. commit 8a12ce233a5ec25e336b04538ac1b60488e667b7 Author: John Bowman Date: Fri May 5 03:06:16 2006 -0600 Added obligueY projection. commit 5d68d40841e9d2f12fc0e1ea1287e5349b92a94c Author: John Bowman Date: Tue May 2 09:59:46 2006 -0600 Removed oneFileView setting in favour of a new setting multipleView, under control of batchView. Renamed pagewidth/pageheight to paperwidth/paperheight to agree with documentation. Handle cases where paperwidth or paperheight are smaller than corresponding picture dimensions. Handle nonstandard paper sizes when producing pdf files. commit 04789d6abd0fc17be052e915edb297d2341ec45b Author: John Bowman Date: Tue May 2 06:27:12 2006 -0600 Added realDigits (DBL_DIG). commit 86c2dd9a05adf698ab7a7095ac332511b5a8b3c9 Author: John Bowman Date: Mon May 1 21:50:09 2006 -0600 Added string string(real x, int digits) routine to cast a real to a string using precision digits in the C locale. Use string(real x, int digits) instead of the locale-dependent format function for postscript patterns. commit c2508a8c0413f0ddaae21617f48867ae70c4f54c Author: John Bowman Date: Sat Apr 29 07:37:10 2006 -0600 Fixed rotate(real angle, triple u, triple v) when u != 0. commit 3b962333a9e1eb767ffdb611926a5078d381cd67 Author: John Bowman Date: Fri Apr 28 08:08:24 2006 -0600 Added obliqueX projection. commit 44d07a1770b97dffacbb7a7cf854e1e71c631500 Author: John Bowman Date: Fri Apr 28 07:51:59 2006 -0600 Moved fftw header check back to original location. commit 8e8d7c47f290721fde640401472f93ee17022a0f Author: John Bowman Date: Fri Apr 28 06:51:52 2006 -0600 Added missing space after -lgc; moved fftw header checks to header section. commit b567c83e58107d42686526be3f9c7365535f1b52 Author: John Bowman Date: Tue Apr 25 19:29:36 2006 -0600 Apply dvips bounding box fuzz even when producing pdf format. commit 975d6a331bdb381b683cc2ce50a6130d69b2fc63 Author: John Bowman Date: Tue Apr 25 19:24:53 2006 -0600 Fixed argument reversal in signature of one of the add routines. commit 8c636e3bb19e6e72178e35c44aa0e4f1f58f10ff Author: John Bowman Date: Mon Apr 24 02:01:16 2006 -0600 Incremented version to 1.05cvs. commit f395220719b1e90ba1005e92f11c97ae43aa3bab Author: John Bowman Date: Mon Apr 24 00:42:48 2006 -0600 Fixed cxx warnings. commit 26f537049d2cc02c8e0db39d532c19806741b189 Author: John Bowman Date: Mon Apr 24 00:37:11 2006 -0600 Removed unused variable. commit d1b4f19de875de4a717f35670cf1c6ad95b61c06 Author: John Bowman Date: Mon Apr 24 00:03:05 2006 -0600 Move missing file flowchart.asy to correct directory. commit b511ab40d7775365e2771c8222d568378dcda35d Author: John Bowman Date: Sun Apr 23 23:53:36 2006 -0600 Make wce work even if configured with GSL library. Abort make if check fails. commit 7e1867eda3a4326131df1c34cb57ede404a4296a Author: John Bowman Date: Sun Apr 23 23:39:25 2006 -0600 Untabified. commit e22225fe83c49469134b3e57082d798d47060cce Author: John Bowman Date: Sun Apr 23 23:33:26 2006 -0600 Check also if first and second points are uncontrolled duplicates. commit 472aad1e896f59ec2e75b710412d2c08593b04e8 Author: John Bowman Date: Sun Apr 23 23:26:20 2006 -0600 Added parametric functions that accept an arbitrary sampling function. commit 959163958f72b505a48fc7c2a9b1f187384d4b01 Author: John Bowman Date: Sun Apr 23 11:56:09 2006 -0600 Updated poster example to use slide.asy. commit 95f24100042c4828f5dcb882d1f751f603cd91fc Author: John Bowman Date: Sun Apr 23 10:27:25 2006 -0600 Change user variable to a string. Document how arbitrary Asymptote code can be specified on the command line. commit 9dbf4485550c201dd3e81c96c74e90d329ca06ca Author: John Bowman Date: Sun Apr 23 01:24:45 2006 -0600 Added optional background and multiple figures to slide package. Updated documentation. commit 31b409d56aae03e957281fa004fbec0820f20796 Author: John Bowman Date: Sat Apr 22 23:35:38 2006 -0600 Replace infinities in userMax and userMin with boolean flags. commit 6314d3256681fd9e23db836413a4faa80d21b09c Author: John Bowman Date: Sat Apr 22 21:33:29 2006 -0600 Increased bounding box fuzz. commit 31b43d80995b29816e58a277e461b266e2c5d9fe Author: John Bowman Date: Sat Apr 22 21:26:28 2006 -0600 Updated call to add in slide.asy. Implemented fixedscaling(picture, pair min, pair max, pen) routine for using a fixed scaling to map user coordinates in box(min,max) to the desired picture size. Added UpsideDown orientation. Moved min and max of a real argument list to constants.asy. Always pass explicit pageWidth and pageHeight arguments to dvips rather than using the papertype. commit 6d070db2dbe5e1dd3b510d1542b391b68e205278 Author: John Bowman Date: Sat Apr 22 05:03:27 2006 -0600 Fixed dvips bounding box. Added texreset function to reset tex environment. commit a8d0b5c21e918a3fecbc3ab3957685f64640cd88 Author: John Bowman Date: Fri Apr 21 10:47:35 2006 -0600 Added general purpose real user command-line option. Legend skip is now based on the actual legend entry height, rather than on the fontsize. commit 7861589644a7a8180700b47f4e5f8630c99f6c99 Author: John Bowman Date: Fri Apr 21 09:52:06 2006 -0600 Added and documented texcolors and x11colors. commit 6963a617979e355beb5096ac7aacb709fa77da15 Author: John Bowman Date: Thu Apr 20 23:59:59 2006 -0600 Improved linetype adjustment to arclength for short segments. Added optional boolean adjust argument to linetype to allow one to disable linetype adjustment. commit 2821a5e49788fb4bf125b21f7994fdb066149144 Author: John Bowman Date: Thu Apr 20 20:48:40 2006 -0600 Documented pair Scale(picture pic=currentpicture, pair z) function for plotting in unscaled (graph) coordinates. Improved documentation of add for pictures and frames. commit a1a64c99b841d520289ff3ba05602ef4c9346c3a Author: John Bowman Date: Wed Apr 19 23:19:03 2006 -0600 Changed add and attach to take arguments in the same order as label, renaming "origin" to "position" and "dir" to "align". Removed the align argument of legend, which really belongs in the add/attach command. commit 6b07436f331c27ccf302e70b40d0cc6b3ae1644d Author: John Bowman Date: Wed Apr 19 22:54:16 2006 -0600 Fixed arrow alignment. commit ae71d0ff534aaa598eeecc4b2328f998e1bb3d12 Author: John Bowman Date: Wed Apr 19 18:42:40 2006 -0600 Fixed alignment of postscript and tex layers by working around failure of includegraphics command (from LaTeX graphicx package) to respect HiResBoundingBox. commit 7e4cec0e907ae3018a629f29f68dacf583b92e75 Author: John Bowman Date: Wed Apr 19 02:17:56 2006 -0600 Added Python module to allow access to Asymptote commands. commit d4133c9184e4d76ddb0a6ea683c00c83f61178a2 Author: John Bowman Date: Mon Apr 17 02:00:50 2006 -0600 Fixed clipping of remote labels near frame boundary by unfill. commit 67902a31a40b1959277d5087d6f67844d105d745 Author: John Bowman Date: Mon Apr 17 01:38:57 2006 -0600 Improved alignment of tex and postscript layers. commit 77a8a3526ebcaf4a06cace29826155cdaf383531 Author: Andy Hammerlindl Date: Sun Apr 16 16:10:47 2006 -0600 Added permission checking for types. commit a9d41b7349380bc7028e77a684f4d8515e45d782 Author: John Bowman Date: Fri Apr 14 15:19:52 2006 -0600 Make format="%" suppress tick labels for logarithmic axis. commit 9de768b204c984e75d21a5470f37fdcfef0e791d Author: John Bowman Date: Fri Apr 14 02:20:31 2006 -0600 Change standard name for salmon colour to lightred. commit 9ed799f848b51cb572112768198ce8282ed65ef6 Author: John Bowman Date: Fri Apr 14 02:13:08 2006 -0600 Fixed tension atleast (broken in autogenerated code since 0.96). commit e414d6dd897dd359b2517e7868424f0c9a89cf17 Author: John Bowman Date: Thu Apr 13 08:15:24 2006 -0600 Renamed "strong" colors to "heavy". commit 9537c34858bb44219b90550cf78e9b8a7c2a8c4b Author: John Bowman Date: Thu Apr 13 01:12:55 2006 -0600 Display named colours. commit 3a46a1a959f6dca2eb3d3ba701a0f080655741d7 Author: John Bowman Date: Thu Apr 13 00:53:19 2006 -0600 Documented and systematized named colours. commit a61d435ad972ab673ce8338765a3a4d7ac434d13 Author: John Bowman Date: Wed Apr 12 21:08:55 2006 -0600 Respect orientation. commit fe6173ecc4dc6b212b32e7443e1e59a67ed8ef7c Author: John Bowman Date: Wed Apr 12 01:36:26 2006 -0600 Improved implementation of slide.asy. Accept label(frame, Label). commit 2101d2a6059ac6c6333689662bbf2ebcdebd645f Author: John Bowman Date: Mon Apr 10 21:01:47 2006 -0600 Added subitem and automatic slide advance on overflow. commit c6ff6449ce3c1907f130d106a86fee9ec88ba74a Author: John Bowman Date: Mon Apr 10 16:15:55 2006 -0600 Slide presentation package. commit 1a2be9b262fa689fe39ed2fafbde8d8dd1f34c11 Author: John Bowman Date: Mon Apr 10 15:42:51 2006 -0600 Added default orientation variable (initially set to Portrait). Added custom pagewidth and pageheight settings. Moved transforms to runtime.in and Label.asy. Added tex usepackage(string) convenience routine. commit d7c889c669eb4bded0cec30ee293b336f500ef94 Author: John Bowman Date: Mon Apr 10 15:38:02 2006 -0600 Indicated default option values in man page summary. commit 1a6d1d682d620f1d29bc53a0ee69f8ba6ef81b80 Author: John Bowman Date: Sun Apr 9 15:00:12 2006 -0600 Added DESTDIR support: make DESTDIR=DIR will prepend DIR to the installation directories (intended as a temporary location to facilitate the build process only). Added -p option to install (and -m 755 to install asy and install xasy). commit 376cc0d3b0dc34f90d810be20a749dbb345ad88c Author: John Bowman Date: Sun Apr 9 14:51:32 2006 -0600 Fixed name of gsl header in message. commit 56c59eeb1698fdb88c28416048f0b6b47a924e0a Author: John Bowman Date: Sun Apr 9 10:13:40 2006 -0600 In tick bounds estimate, don't warn about unbounded picture scaling. commit 019fffe374c0564d5a640c7d0bd84f097486a2ae Author: John Bowman Date: Sun Apr 9 01:10:31 2006 -0600 Added selected special functions from GNU scientific library, when available (additional special functions can easily be added, on request). commit fed4cd36ff02754c21e628c4911ec5e0dc56cb6d Author: John Bowman Date: Sun Apr 9 00:42:37 2006 -0600 Added Ticks specifier that draws ticks on both sides of path. Fixed miscellaneous errors in the documentation. commit 763c0584aed043adc4439cbb479b37fe110b928c Author: John Bowman Date: Sun Apr 9 00:39:32 2006 -0600 Renamed zeta to unityroot for clarity (and to avoid confusion with Riemann zeta function). commit fe98b1be9e75b114007f196618347a12159df32a Author: John Bowman Date: Sun Apr 9 00:37:42 2006 -0600 Moved newpage() routine to shipout(). commit bc27d517da082381cd412dfffd7a0d0f2876bf1b Author: John Bowman Date: Sun Apr 9 00:36:59 2006 -0600 Added real lineskip() routine (returns lineskip of currentpen). commit e8233efdc79fcc794af3ef00caf0d452b60f79a1 Author: John Bowman Date: Sun Apr 9 00:35:33 2006 -0600 Fix name of fontsize lineskip argument. commit 477a3f338e05e13d53302eeb2dcf7204e49dc85c Author: John Bowman Date: Sun Apr 9 00:34:30 2006 -0600 Remove reliance of replacement readline routine on strdup. commit ce6dcb4d7b09e071875afd1fc1862ad616debc26 Author: John Bowman Date: Thu Apr 6 08:05:17 2006 -0600 Use turn-on-font-lock for Xemacs. commit a4256b4b6849a2656787c5ae4a37717347f0405b Author: John Bowman Date: Wed Apr 5 21:29:56 2006 -0600 Make asy-mode.el ignore global-font-lock-mode for Xemacs. commit 1f6a7d9232e47d07585eef364e48588638f60511 Author: John Bowman Date: Wed Apr 5 21:24:09 2006 -0600 Added locale support and ', I, and F format specifiers. Moved miscellaneous settings code from main.cc to settings.cc. Added default settings to option summary; identity command-line only options. Updated documentation. commit effc2ac2e06f4bce1a32771a206cea8a25b0fe60 Author: John Bowman Date: Wed Apr 5 21:20:58 2006 -0600 Improved picture sizing diagnostics. Added max(picture pic=currentpicture) and min(picture pic=currentpicture) functions. Added pair truepoint(picture pic=currentpicture, pair dir) function that works like point but uses the actual picture size instead of userMin and userMax members. commit 1ca3b76cc03eeb6f6ce650efdcc05304b7acf096 Author: John Bowman Date: Wed Apr 5 21:18:34 2006 -0600 Replace identity() with better approximation pic.calculateTransform() in axis picture bounds calculation. commit 2828a2fc752611197c8da2a888f7f9e163e423a2 Author: John Bowman Date: Wed Apr 5 21:17:03 2006 -0600 Make colorPen[] and monoPen[] public. commit 3d952fa6b146e227f8d603d75409ef5d86df95d4 Author: John Bowman Date: Wed Apr 5 21:16:10 2006 -0600 Fixed typos in comments. commit 0f448702572cd3980c3f235c1cca17a3e2124a68 Author: John Bowman Date: Wed Apr 5 20:22:16 2006 -0600 Incremented version to 1.04cvs. commit 9c25ca1878971b9309e70501e5c6821f1cee9573 Author: John Bowman Date: Thu Mar 30 00:08:56 2006 -0600 Added Degrees function; like degrees(pair) but returns 0 for (0,0) argument. Added minbound and maxbound functions for triples. Moved minbound, maxbound, and Longitude functions to runtime code. Added min(guide3[]) and max(guide3[]) functions. For convenience added xaxis(triple,real) functions, etc. Added solid geometry package with cylinder routines. Updated documentation. commit e2d01d7b8bcaaea02991c16da1ef73008d31c862 Author: John Bowman Date: Wed Mar 29 23:27:11 2006 -0600 Added limit maxIntersectCount=100000 on maximum number of calls to intersectcubics per cubic segment. commit ed639fd2d9e3514f3b9bec4640ddad84a74ef9e0 Author: John Bowman Date: Tue Mar 28 13:33:39 2006 -0600 Removed TODO item regarding extending runnable-at-a-time mode to inner code levels as this is no longer needed. commit 0a94ea6be653be7815838c8027fb1be41aa8a818 Author: John Bowman Date: Mon Mar 27 02:13:26 2006 -0600 Fixed memory leak in interactive mode by using an implementation of reset that is closer to the environment reset used between multiple file runs. commit 8d01320484ef94f77b7b93d8741742d6732558a9 Author: John Bowman Date: Sat Mar 25 23:15:50 2006 -0600 Fixed indentation. commit 141078fde83363b07a92b23f652f044aa2854779 Author: John Bowman Date: Sat Mar 25 23:14:21 2006 -0600 Fixed typos. commit 9e7ebe0d9210cae262a1f2baeb845f8b7e7e6d5c Author: John Bowman Date: Sat Mar 25 11:25:37 2006 -0600 Updated CJK documentation. commit 74c06d44469b037505371944dd4c3059b16859b4 Author: John Bowman Date: Fri Mar 24 22:38:01 2006 -0600 Added real fontsize() routine. Documented real fontsize(pen p=currentpen). Documented use of CJK fonts. commit 5eac404efdabd96157073d429bdf888a0a73ccd9 Author: John Bowman Date: Mon Mar 20 22:48:46 2006 -0600 Implemented interactive mode (without command-line editing and history) even in absence of readline library. Made minor change to System diagnostic messages. Changed invert: triple invert(pair z, triple normal, triple point) projects onto the plane perpendicular to normal and passing through point. Updated Debian URL. commit 80baab724a0b03a9582d20dfc4e081c1fea701b6 Author: John Bowman Date: Sun Mar 19 09:17:07 2006 -0600 Added function triple invert(pair v, real z, projection P=currentprojection) to map v onto (x,y,z) by inverting the projection P onto a constant z plane. Minor documentation updates. commit adf5582b62c1ce0dbda58ded884ff8e8ddc6bd03 Author: John Bowman Date: Fri Mar 17 00:10:58 2006 -0600 Support compilation under gcc-4.1.0. commit ecc6ca00d162c18c264ce94307d6263fc0424d99 Author: John Bowman Date: Tue Mar 14 22:36:32 2006 -0600 Fixed return type of three-dimensional intersectionpoint routines. commit 5ad4c367c698ffd46b95cfdd279472d27a50d32e Author: John Bowman Date: Sun Mar 12 14:21:27 2006 -0600 Incremented version to 1.03cvs. commit d2aa165bc9ed6ca59b0d3251ce36ab769abb59cd Author: John Bowman Date: Sun Mar 12 12:27:03 2006 -0600 Fixed surface lighting colours; respect projection argument. Removed test diagnostic. commit dce74caad4372be9f26b9c8460f1d38d705651e6 Author: Andy Hammerlindl Date: Sun Mar 12 12:17:32 2006 -0600 Added a .ls file to check the presence of large output files before they are deleted. commit e3067cdb667a0c26476544c2454c3a602eb5f336 Author: John Bowman Date: Sun Mar 12 10:05:51 2006 -0600 Avoid need for single quotes around path settings in MSWINDOWS. Fix configuration diagnostics. commit 9e4c90c4a873082d063e7d8ec4e9c762c36c8be9 Author: John Bowman Date: Sat Mar 11 23:03:49 2006 -0600 Documented how to install in alternate locations under MSDOS. Fixed typo in configuration instructions. commit 4b900d75f545a276a637568172024c292120e494 Author: John Bowman Date: Sat Mar 11 17:33:51 2006 -0600 Simplified example. commit 5479aac708d4e8b7ba7839da2bad6e2162b39de8 Author: John Bowman Date: Sat Mar 11 17:16:25 2006 -0600 Implemented surface lighting and example of sinc function. Changed signature of subsampled surface routine (argument nsub now preceeds pairs a and b). Changed light.init constructor into light(triple source, shadefcn shade=defaultshade). Added cast from triple to light. Made currentlight public; added nolight variable. Renamed projectXY to xypart. Added XY() and XYZ() members to bbox3. commit 347ba3f77a171c46a4a47f86e9e355e6a51d86f1 Author: John Bowman Date: Sat Mar 11 16:39:34 2006 -0600 Fixed axis label alignment when sign=-1. commit 430f5c79d6160b8129e3dbc8110107b5d7abd5be Author: John Bowman Date: Fri Mar 10 22:18:54 2006 -0600 Removed pstoedit patches (included in pstoedit-3.44); updated documentation. commit 68bbdf1c1e0a8c77f16277ea5b1641fbaead5d4d Author: John Bowman Date: Fri Mar 10 13:19:57 2006 -0600 Allow make to inherit LDFLAGS from configure. Allow and document installation without root privileges. Document configuring to search for includes and libraries in nonstandard locations. commit 7eeecf79bea1d6c776ec748a77f5b18175cd005f Author: John Bowman Date: Fri Mar 10 00:19:06 2006 -0600 Updated configuration file documentation. commit 4dd2aa63b26b60506a2be4e2979ede3b4d840361 Author: John Bowman Date: Thu Mar 9 21:54:33 2006 -0600 Catch errors thrown by parser while reading configuration file. Recompute search path after reading configuration files and command-line options in case dir was changed. Move MSWindows .asy initialization directory to %USERPROFILE%. commit 3ae7effa9e304cb6fdc44d53e77d9b9b0929c507 Author: John Bowman Date: Tue Mar 7 13:37:44 2006 -0600 Fixed type of randMax. commit c0c45887b143899563cac08bf41ccd125e097b50 Author: John Bowman Date: Tue Mar 7 04:01:26 2006 -0600 Updated pstoedit patch. commit 24f8371b56dace63c14bb05de5f845041e70d657 Author: John Bowman Date: Mon Mar 6 20:29:18 2006 -0600 Incremented version to 1.02cvs. commit fff59e55f51bf1b131c0158612f0c14a9ccad237 Author: John Bowman Date: Mon Mar 6 18:23:18 2006 -0600 Fixed bug in surface plot of a matrix. commit 26a3c93d4252ffed2f35d77596236078638ef05c Author: John Bowman Date: Mon Mar 6 14:58:35 2006 -0600 Incremented version to 1.01cvs. commit 547ee643099012bca1840706696a6aafb34de4da Author: John Bowman Date: Mon Mar 6 10:33:54 2006 -0600 Workaround broken GNU readline/history library on MacOS. commit 11f8e47b6ca52d30122d5314030876436d493627 Author: John Bowman Date: Mon Mar 6 01:10:54 2006 -0600 Fixed cxx warning messages. commit 5405aad4557d43e550de77b5715c5fbd6b9a1d65 Author: John Bowman Date: Mon Mar 6 00:19:09 2006 -0600 Moved detailed discussion of growing list of base modules closer to the end of the documentation. commit 0958bf9aa26afda543a765aaea2ff7c519ea2b54 Author: John Bowman Date: Sun Mar 5 23:52:10 2006 -0600 Updated to use gc6.7 by default. Added RadialShade filltype. commit 5b4e1a2b86ad323af68a5419cebb6bf3a6f3b6b6 Author: John Bowman Date: Sun Mar 5 23:03:49 2006 -0600 Remove blank legend entries. commit 413031e4512016eba1ee554df33381d0d7a9ffa2 Author: John Bowman Date: Sun Mar 5 22:46:24 2006 -0600 Fixed pen bounds (too large by a factor of 2). commit 77f0938b38433a0283f80604ec9aaa99efa076c2 Author: John Bowman Date: Sun Mar 5 21:37:48 2006 -0600 Fixed transformation of palette bar. commit f294a74a102e058defddf05bd3206fdb8de086fc Author: John Bowman Date: Sun Mar 5 19:45:09 2006 -0600 Removed empty picture check in xlimits and ylimits. commit fc66e7bb009b8995b0d64a7393cbe0373e6466c5 Author: John Bowman Date: Sun Mar 5 19:02:27 2006 -0600 Moved linear solve and matrix inversion to C++ code; simplified memory allocation in tridiagonal. Added seek and tell functions for positioning input files. Make images transform properly. Make legend argument to draw a Label type (currently only the string and pen members are used). Added length and skip arguments to frame legend(...). Removed side effects from eol(file). commit b130fda35b1a52f235a195dd3de0dd7c4732aad9 Author: John Bowman Date: Sat Mar 4 22:25:50 2006 -0600 Generate correct #line comments. commit 557106356ca05abe85095d699ee581925a5ed58e Author: Andy Hammerlindl Date: Sat Mar 4 17:17:55 2006 -0600 Log the stdout and stderr of the asy process. Changed the -inlinetex option to -keep so that the calls to external programs (eg. latex and convert) can be diffed. commit 4d1efb04f2b068faf4bcad86e224ff3d762b547c Author: Andy Hammerlindl Date: Sat Mar 4 16:47:12 2006 -0600 Now delete texput.log when the pipe to the tex process is closed (to ensure its deletion with the --inlinetex option). Also delete texput.aux. commit c16e8f35093571eadb9fc2ad97c8e122dcdf6051 Author: John Bowman Date: Fri Mar 3 09:56:54 2006 -0600 Fixed bug in pivot vectorization in solve. commit 2696a99ffefcb7e02e7f074ed271433d66053d8d Author: Andy Hammerlindl Date: Thu Mar 2 13:46:57 2006 -0600 Initial check-in of output testing. commit 1737069935134cd721162e02bd7ddf0026ca9677 Author: John Bowman Date: Wed Mar 1 13:02:39 2006 -0600 Added INCL for enable-gc=system. commit 4ef432c6b3a4a87c62d1830216944a29cffb107b Author: John Bowman Date: Mon Feb 27 01:54:06 2006 -0600 Renamed includegraphics to graphic. Added embed module to interface with LaTeX movie15 package for embedding movies, sounds and 3D objects into a PDF file. Don't attempt to resize unbounded pictures. Output LaTeX pipe diagnostics even when verbose <= 1. Added \begin{document} to LaTeX pipe. commit fe1a3c9b71a9977eb5036bb6caa1e022d412bf0c Author: John Bowman Date: Sun Feb 26 22:59:42 2006 -0600 Added poster example. commit f1031a708321e2a4ee4cb9a977bd7eafd44ce656 Author: John Bowman Date: Sun Feb 19 20:59:50 2006 -0600 Add configuration dir to search path; search for configuration file in standard search paths (in usual order). Remember defaultpen set in configuration file. commit c65d1910f982db63917865e620b63ffedb60f817 Author: John Bowman Date: Sun Feb 19 11:03:00 2006 -0600 Always draw arrows with solid linetype. commit 22e1d9e8edfaf13b75397d582984e57d28673154 Author: John Bowman Date: Sat Feb 18 13:31:50 2006 -0600 Updated MSDOS default of gs8.51 to gs8.53. Changed default for xlimits and ylimits to NoCrop. Work around unused variable warning messages when XDR support is disabled. Cleaned up error calls. Updated documentation. commit 9121a897689e7a165f4d07d74791cf9065bae82f Author: John Bowman Date: Fri Feb 17 22:17:15 2006 -0600 Added missing $(GCLIBS) dependency. commit d1dd9491dfd9e1de33175474104cd258c855a4b2 Author: John Bowman Date: Fri Feb 17 20:57:33 2006 -0600 Added camp.tab.h entry again. commit 44592176ab6ea490b6263f0db7df1537739467ee Author: John Bowman Date: Wed Feb 8 12:45:48 2006 -0600 Removed +solid from Fill and NoFill. commit 46e59ad7cc4837635c0139884318425958e7f31b Author: John Bowman Date: Wed Feb 8 10:06:36 2006 -0600 Added missing xpart, ypart, zpart functions for triples. commit 5160bfc61c05011c6faf32e68dc0c3d43c8abb01 Author: John Bowman Date: Tue Feb 7 23:13:08 2006 -0600 Fixed reversed image dimensions for colour density plots. commit e2d69c4df983d930fba6dedcef4cfcda33902415 Author: John Bowman Date: Tue Feb 7 23:06:39 2006 -0600 Added missing xpart and ypart functions. commit b267a7282f95034c91aafe770836c5bf5c1250b9 Author: John Bowman Date: Mon Feb 6 01:58:25 2006 -0600 Signal an error if write to final output file fails. Removed "camp: " from camp error messages for brevity. commit cee2eadadeb9b24b390f6891d44b9b80b57b0654 Author: John Bowman Date: Sat Jan 28 22:32:32 2006 -0600 Added link to Dario Teixeira's Asymptote and LaTeX Integration Guide. commit d8f583f04cab7bf9f726240b4883765437c9aa64 Author: John Bowman Date: Sat Jan 28 20:43:37 2006 -0600 Added file prefix option to animate and merge. commit 7d50f266a6f64308baf51883375b8a7d3f9e64eb Author: John Bowman Date: Sat Jan 28 04:25:25 2006 -0600 Added index entries. commit 4a735cd696ce941e666a11ae057a32906a0a89d0 Author: John Bowman Date: Sat Jan 28 00:28:16 2006 -0600 Allow format("%",1). commit c24db86c95be49eb723e48bb6c941448a12452f3 Author: John Bowman Date: Sat Jan 28 00:04:49 2006 -0600 Set tickMin to a and tickMax to b if Step is 0. commit 04de94e2035c9de5222e4d4069922d2abc36da91 Author: John Bowman Date: Tue Jan 17 14:17:27 2006 -0600 Added check for empty picture in xlimits and ylimits. commit 712b5eb0a930b2e8adc56a57319b324ee0d14199 Author: John Bowman Date: Tue Jan 17 14:12:17 2006 -0600 Better dependency tracking. Removed MSDOS compiler flag in favour of __CYGWIN__. This will make cygwin defaults identical with those under MSDOS (outside of cygwin). commit f3922a443674409b7f13bf7e29e0754750893b30 Author: John Bowman Date: Tue Jan 17 01:36:01 2006 -0600 Fixed cxx warning. commit 4fc12570232e81d3ec0b574836a8b1f5dc664ebf Author: John Bowman Date: Tue Jan 17 00:45:28 2006 -0600 Added Tom's alternative way of making runtime.pl not update runtime.h. commit 70cb9010affefb9de6368c62e8c0d3c1a83237a9 Author: John Bowman Date: Sat Jan 14 17:20:05 2006 -0600 Documented inlinetex mode. commit 04614dd4dfd09e73f5a43bdbb226de03793b96d1 Author: John Bowman Date: Sat Jan 14 17:10:11 2006 -0600 Updates to feyman.asy: improved photon line, use align structures. commit a4578b4562e08e4dbdeaf7cf1972170f3c3756c8 Author: John Bowman Date: Wed Jan 11 00:40:36 2006 -0600 Added #line directives in runtime.cc. commit c7e91dd947133af7dba43b3d9a5b71fe9c75c39f Author: John Bowman Date: Tue Jan 10 15:18:01 2006 -0600 Fixed segmentation fault when bad format string is given to format. Fixed cast: (pair) "1". commit e231da91a761157ec0b86125bca4cbf99e5d5606 Author: Andy Hammerlindl Date: Fri Jan 6 22:57:38 2006 -0600 Added transform3 multiplication (aliased from math). commit b5f5b26af6060cadd9d7a5f32eed69193300508c Author: John Bowman Date: Tue Jan 3 23:45:46 2006 -0600 Don't exit interactive mode on EOF (ctrl-d). Added tab completion option and default prompt="" to readline. commit ae727f28ea4b40e5610c4dffa2b7d74b3e80c1be Author: John Bowman Date: Tue Jan 3 02:58:20 2006 -0600 Fixed cxx error. commit 2967f17cbcffb744634e099c161849a048d5de45 Author: John Bowman Date: Tue Jan 3 00:16:01 2006 -0600 Changed complement to int[] complement(int[] a, int n); this returns the complement of the integer array a in {1,2,...,n}, so that b[complement(a,b.length)] yields the complement of b[a]. commit 169148ba22e45e28894dfb1b645b3b1f323cdc90 Author: John Bowman Date: Tue Jan 3 00:13:52 2006 -0600 Removed unused line. commit 62e1a9441630b5330418480c365585328c08b243 Author: John Bowman Date: Mon Jan 2 19:52:58 2006 -0600 Added interface to GNU readline library to allow editing with history when reading data from stdin. Updated getstring, getreal, etc. in strings.asy to use this new readline function. Added complement(int[] a, T[] b) function to return the complement of the integer array a in {1,2,...,b.length}, so that b[complement(a,b)] yields the complement of b[a]. Generated dataSettings from a templated struct; added intSetting. Added historylines option (default is still 1000). Added array check to arrayConditional. Updated documentation. commit 11474f0b9840788544f626125735c948364e2341 Author: John Bowman Date: Mon Jan 2 19:25:08 2006 -0600 Formatted. commit 066db4c7a6e4a16d9b0f3158e56542d1fe479f43 Author: John Bowman Date: Sun Jan 1 04:41:06 2006 -0600 Move more initialization code before setOptions. Check em in signal handlers. commit c389e767206e0ab763316088c0703686c896b441 Author: John Bowman Date: Sat Dec 31 12:22:58 2005 -0600 Address compilation problem under MacOS X 10.3.9. commit 705a8a26aa03b2e8399ed01d357650dbd5b61e8d Author: John Bowman Date: Sat Dec 31 00:19:29 2005 -0600 Incremented version to 1.00cvs. commit 84c319d06b4622c6e5a48b413e9b88ec944ce0c7 Author: John Bowman Date: Fri Dec 30 23:35:36 2005 -0600 Minor documentation updates. commit af29f78f7e05d7c62cbf8200a7e9870a0d76e028 Author: John Bowman Date: Fri Dec 30 23:05:36 2005 -0600 Added missing (mem::string). commit ac1ce219f9312b47c56838aff22f05c09776737c Author: John Bowman Date: Fri Dec 30 18:54:53 2005 -0600 Defer initialization of settingsModule to solve race condition. commit 12735254c64c16298956a5738284ea5577763068 Author: John Bowman Date: Fri Dec 30 13:21:12 2005 -0600 Fixed MacOS bus error by initializing GC before calling setOptions. commit 2c2226a75a8dcf2bd47d0ba0c88b91f8f59af4d8 Author: John Bowman Date: Fri Dec 30 13:11:10 2005 -0600 Don't stop running after first error in a runnable if -debug is set. Updated wce. Documented contributed MacOS X binary. commit ef8e3257d908ee6e362c52a8daf8345420b194d6 Author: John Bowman Date: Fri Dec 30 02:56:51 2005 -0600 Incremented version to 0.99cvs. commit 5c0a33a6bf4a3a7fc02e993593fb4711c01529cb Author: John Bowman Date: Fri Dec 30 02:06:29 2005 -0600 Minor documentation updates. commit d2f60e6987dd3f8903161c2a4b5ffacf80ad0110 Author: John Bowman Date: Fri Dec 30 01:54:53 2005 -0600 Fixed compilation problem under g++-3.3.4. Change addConstant to use item. Search in usual paths for config.asy if ~/.asy/config.asy is not found. Convert configuration variable names to lower case. Update diagnostics and documentation: emphasize use of configuration variables instead of system environment variables. commit 936918070c759c2acf207461088e58a98f2d8299 Author: John Bowman Date: Thu Dec 29 21:38:05 2005 -0600 Removed mention of obsolete -t option from documentation, which is no longer required for inline tex mode. commit 5d8128865deb937def2ac52929df17694269380c Author: John Bowman Date: Thu Dec 29 19:52:38 2005 -0600 Fixed cxx errors. commit f90cbe0e5f312817be89fea6abb1a243e5e62e9d Author: John Bowman Date: Thu Dec 29 17:40:42 2005 -0600 Suppress warning messages when shipping out an empty picture. commit a23f08d9f83d6c2119c1b0433678ab1a0b2586a7 Author: John Bowman Date: Thu Dec 29 13:01:06 2005 -0600 Implemented machine constants as variables rather than functions. Added ASYMPTOTE_CONFIG environment variable. Moved ASYMPTOTE_DIR environment variable to settings. Do an initial read of command line in case CONFIG or DIR were specified. commit fd6fe905598d7c3edb14292f2dd69f8d7c0e9f25 Author: John Bowman Date: Thu Dec 29 02:32:35 2005 -0600 Moved ASYMPTOTE_PAPERTYPE to settings. commit 4a498dd004bc95f45bc018a8c2350b357f48fb34 Author: Andy Hammerlindl Date: Thu Dec 29 01:49:29 2005 -0600 Moved argument parsing to avoid writing to memory between a fork and an exec. commit f864cde03b868ef11de14bc9231f0c926d82f737 Author: John Bowman Date: Thu Dec 29 01:24:38 2005 -0600 Moved environment variables into settings. Call doConfig before reading command line options. commit bb0ef295a64fb0c2b0aa6f2ce7ba2ca7a0682f80 Author: John Bowman Date: Wed Dec 28 23:43:14 2005 -0600 Implemented addConstant and pi example. commit 36becc21b83833cebd9aa9a9d32635eee0847610 Author: John Bowman Date: Wed Dec 28 11:16:22 2005 -0600 Removed ~/.asy/options in favour of ~/.asy/config.asy. Add "Including filename" diagostic. Fixed localhistory. Speed up initialization by turning off autoplain when reading configure file. Rename position to align. Updated documentation. commit 5834e1b2207381871eda5557aec935540da9aaf1 Author: John Bowman Date: Wed Dec 28 01:15:07 2005 -0600 Fixed verbose flag. commit c421a124706aee98701afd47f71befae44f1720f Author: John Bowman Date: Wed Dec 28 01:10:28 2005 -0600 Removed -t option, which is no longer needed to produce inline tex code. Removed unused settings code. Added -nov option. Improved formatting of option messages. Hide oneFileView and inlinetex (formerly texmode) from help menu. commit bea64164b4c955599c2ec9c84568e7c73bc1d73c Author: John Bowman Date: Mon Dec 26 15:38:04 2005 -0600 Fixed tick computation in xaxis and yaxis when explicit limits are given. commit d5bd4bb1e99c842d5902fbce82e08df997ce8b43 Author: Andy Hammerlindl Date: Sat Dec 24 19:15:55 2005 -0600 Removed the -n, -no option in favour of -blah/-noblah style negations. commit fd6c9fcdfe15cd2ff5b0d41f9e62fe07918a009c Author: Andy Hammerlindl Date: Sat Dec 24 01:42:42 2005 -0600 Improved error reporting when parsing command line options Autogenerate -help output. commit 89e1d51d872b6d47a8e004872d5f2ff47c5f95d8 Author: Andy Hammerlindl Date: Fri Dec 23 23:39:56 2005 -0600 Added a settings module. Re-implemented command line options to modify variables of the settings module. Added refaccess to access C++ variables as Asymptote variables. commit 999686551a309da198af397405ba458aa344991e Author: John Bowman Date: Wed Dec 21 23:22:04 2005 -0600 Fixed string reads. commit a04661d02bcbc382904e7bf15548fe898ca45aee Author: John Bowman Date: Sat Dec 17 19:12:21 2005 -0600 Check for cvsmode in ignoreComment. commit 2bf654dc2f80c34112b47eab1ff3d44b7e793c7e Author: John Bowman Date: Sat Dec 17 17:29:17 2005 -0600 Allow comments within 3d data blocks. commit aa7c73b6b20b5b37993021ea440ff1ac3a597707 Author: John Bowman Date: Sat Dec 17 15:26:22 2005 -0600 Removed writeP in favour of write. Stop running after first error in a runnable. Standardized write argument names. commit 8025f7ffdd8c5ef01a9db0112190026060c4bc66 Author: John Bowman Date: Sat Dec 17 02:17:37 2005 -0600 Added fonts. commit 2b74c299f57b3960563c99ad06bd40ba1b15f45d Author: John Bowman Date: Sat Dec 17 02:11:45 2005 -0600 Fixed cxx errors and warning messages. commit f548d38f981609aacb0a6d48328e2c7c7a40bce1 Author: John Bowman Date: Sat Dec 17 01:54:31 2005 -0600 Added type-dependent function and record operators to parent record. Cleaned up builtin.cc. Moved two- and three-dimensional array min and max functions to C++ code. Split plain.asy into many subfiles (using include rather than import for speed). commit 301f9346339ea8900fa2a3f2cf25fdc00a786c54 Author: John Bowman Date: Thu Dec 15 14:29:49 2005 -0600 Allow explicit keywords in autogenerated code. Moved default arguments from plain.asy to runtime.in. Respect currentpen nib. commit 96de56b84b0cd1d4d738a23765d299545dadd2ae Author: John Bowman Date: Thu Dec 15 03:58:25 2005 -0600 Incremented version to 0.98cvs. commit 6f306d923970994666cc1a70396929acf74a17d6 Author: John Bowman Date: Thu Dec 15 03:07:14 2005 -0600 Fixed pen transform bug. commit 71c43cf70416c59c7912d75006044a5b82d2629b Author: John Bowman Date: Thu Dec 15 01:36:26 2005 -0600 Make recent readline startup changes compatible with readline-4.0 under UNIX. commit 72217f76828b49b4e0b98b1fbb142535fc1775d4 Author: John Bowman Date: Thu Dec 15 01:13:45 2005 -0600 Added missing names and fixed incorrect names for builtin function arguments. Removed duplicate functions. commit f35731c6d4adab7814eaaed2b450362abbc01c37 Author: John Bowman Date: Wed Dec 14 23:29:34 2005 -0600 Workaround readline incompatibility under MacOS X 10.4.3. commit 499a84432fa5890f57c80b3bc2d564d3aa2b283e Author: John Bowman Date: Wed Dec 14 18:47:01 2005 -0600 Incremented version to 0.97cvs. commit d3aa6c3e78e7d22d0c94383670bcb040f2ecfe21 Author: John Bowman Date: Wed Dec 14 18:08:33 2005 -0600 Make MSDOS binary work under both MSWINDOWS and CYGWIN. commit b87facc189c97cc1439b6c12cdf54a7691fd4d0b Author: John Bowman Date: Wed Dec 14 02:22:10 2005 -0600 Fixed spelling. commit f4542712ae2f33fb6516d07366cc8542e0c08b34 Author: John Bowman Date: Wed Dec 14 02:20:27 2005 -0600 Document that the -V option under MSDOS is the default only when a single file is given. commit 3aaf0cf9cca1f7188b2d5d66d1255a19685e5bf6 Author: John Bowman Date: Wed Dec 14 01:58:29 2005 -0600 Fixed cxx warning messages. commit 5a0d6af86d2fa6b35907d93c3e91b1d50090f01d Author: John Bowman Date: Wed Dec 14 01:52:52 2005 -0600 Allow explicit keyword in builtin function definitions. Added write(file fout=stdout, string s="", explicit T[] x ... T[][]); function for writing a list of vectors as columns. Updated documentation of write routines. commit 1fffa6aaa334b966e563cf409015fbbbc9f65a93 Author: John Bowman Date: Tue Dec 13 23:39:31 2005 -0600 Fix segmentation fault by checking for null arrays in dotsGuide, dashesGuide, and 3d intersect. commit cfd2248d0406efd23f295eeb7b601cb904ca8343 Author: John Bowman Date: Tue Dec 13 16:50:41 2005 -0600 Fixed order of autogenerated newAppendedArray arguments. commit b32c4d54bfda1e3333f010b7ec668691d0765a32 Author: John Bowman Date: Tue Dec 13 16:07:35 2005 -0600 Fixed cxx error and warning messages. Make time(string) simply return format string on systems without strftime. Removed generated files. commit f24b953708c91b82442fb2ed5c9e6c1549909de6 Author: John Bowman Date: Tue Dec 13 14:21:58 2005 -0600 Autogenerate remaining runtime functions, producing runtime.cc and runtime.h. commit e277d1b83a43712c8d408e0b13e222d86514900d Author: John Bowman Date: Mon Dec 12 03:36:28 2005 -0600 Make default transform constructor the identity. Allow operator keyword in autogenerated functions (optional, except for operator *). Autogenerate more runtime functions. commit 2465bb6cd34773be15915a88e5262ef4630dcf98 Author: John Bowman Date: Mon Dec 12 00:06:44 2005 -0600 Fixed comment handling of runtime.pl; added prototype comments. Autogenerate remaining array functions. commit 48634f3dc5ae77e2fde057a969bc32d5722ff28a Author: John Bowman Date: Sun Dec 11 11:58:39 2005 -0600 Autogenerate runtime array operations. commit f65461ccca71521c637487e45edd5e508c0f6184 Author: John Bowman Date: Fri Dec 9 00:12:37 2005 -0600 Autogenerate more runtime functions. commit bacaf2c7b57f5157e763c2f74eea541d29c503fa Author: John Bowman Date: Wed Dec 7 00:48:40 2005 -0600 Updated runtime.pl to generate named arguments and optional default values. Auto-generate many more runtime routines. Use transform and pen instead of transform* and pen* for consistency with other types. commit 61d409c56dc3b07a2bc8de506a9e1126b5f87f9a Author: John Bowman Date: Wed Dec 7 00:37:08 2005 -0600 Fixed recently-introduced memory leak. commit 6c28518f804853391b708d645a6c1d89b5107a25 Author: Andy Hammerlindl Date: Tue Dec 6 15:50:41 2005 -0600 Made brackets part of the syntax for 'quote'. commit e03aeac59aa29d06488bcc37a9dcd6a4dd61d307 Author: John Bowman Date: Tue Dec 6 10:09:49 2005 -0600 Formatting. commit 796aedc5c991f3c50763d596f91c230576e10580 Author: John Bowman Date: Tue Dec 6 01:38:54 2005 -0600 Implement named arguments for builtin functions. commit 94626fe6a780fc144aaddd52cb7a77f99f1377c3 Author: John Bowman Date: Tue Dec 6 01:00:26 2005 -0600 Make translate (-s option) work with eval (requires running codelets). commit 100ffff9ee654c8b180a3cb79cc2891d346427bd Author: Andy Hammerlindl Date: Mon Dec 5 20:05:04 2005 -0600 Fixed sequenced evaluation of packed arguments. commit e28f4672575300ed653846be8ad54d5138fe7f53 Author: John Bowman Date: Mon Dec 5 01:21:12 2005 -0600 Optimized isDefault test. Implemented default function arguments for builtin functions. Made write routines builtin functions. commit 9fef72899d1bfc8509d44f686a5890186da8f0f0 Author: John Bowman Date: Sat Dec 3 23:49:58 2005 -0600 Remove obsolete remark about default function arguments. commit ae200ee9cea5e8ec1d269f70ce7d46584d3db302 Author: John Bowman Date: Sat Dec 3 00:10:00 2005 -0600 Documented makepen, nib, Sin, Cos, Tan, aSin, aCos, aTan, and fontcommand. commit 9ca4e3f824349c79527e89ea95d55b631753a492 Author: John Bowman Date: Fri Dec 2 23:27:03 2005 -0600 Documented BeginPoint, MidPoint, EndPoint. commit 29ef02fceb6eb09421099a3cf49dced64dd66a10 Author: John Bowman Date: Fri Dec 2 10:44:21 2005 -0600 Removed unneeded assignment. commit 9619df2a7117dbb20b93ce4bced704a8080e7c33 Author: John Bowman Date: Fri Dec 2 10:14:28 2005 -0600 Replaced midarrow routine with generalized arrow routine. commit 461f6b1f8b70788fa80f687c62ebef51dfba00b3 Author: John Bowman Date: Fri Dec 2 05:00:36 2005 -0600 Do MidArrow and MidArcArrow size adjustment in PostScript rather than user coordinates. commit 99008e82192e94f15c8dd24b762ca577b6d6765a Author: John Bowman Date: Fri Dec 2 00:19:21 2005 -0600 Added contributed examples and a routine to round the sharp corners of a path. Reordered the list of available modules. commit 8e0a2acb4fb53f752333324c1ab2e1474b429bcb Author: John Bowman Date: Thu Dec 1 21:46:26 2005 -0600 Handle angle(0,0) condition robustly. commit da6dee972819f677202846dc0c7c44890ea00487 Author: John Bowman Date: Thu Dec 1 17:10:59 2005 -0600 Ignore angle(0,0) errors in dirtime. Preserve output precision when outputting paths of any length. Fixed makepen draw routine (makedraw). commit e9932b5bef6de9c5f33357892c2005716c54408b Author: John Bowman Date: Thu Dec 1 00:48:00 2005 -0600 Minor optimization of makepen draw. commit f213452650c95e23eb1d4c4e240eb9ed8d042971 Author: John Bowman Date: Wed Nov 30 23:12:08 2005 -0600 Revert broken optimization of makepen draw. commit eddf45b679520b3705812b7f9c50b6235590f684 Author: John Bowman Date: Wed Nov 30 10:21:12 2005 -0600 Simplified makepen draw; extend to cyclic paths. commit 184116a5754b4c447648cef2987b94db8555fb39 Author: John Bowman Date: Wed Nov 30 02:41:52 2005 -0600 Added MetaPost-like makepen that works for any polygonal (possibly nonconvex) cyclic path. commit 53453a6383207878891947e9e8fbd0193d6a8b08 Author: John Bowman Date: Tue Nov 29 23:03:47 2005 -0600 Call purge after each interactive line to close any files that have gone out of scope. Suppress interactive update on exit. commit 8adaed3f92453ab3328a014020b0d25b1bec5df8 Author: John Bowman Date: Mon Nov 28 19:37:48 2005 -0600 Make estack and sstack static local variables. commit cb82b57275ad49ed6714360f2ba332263536d752 Author: John Bowman Date: Mon Nov 28 19:03:56 2005 -0600 Added filltype to labeltick. commit 5278a780e8c778661eb978be0a27cddbcffadc36 Author: John Bowman Date: Sun Nov 27 23:45:17 2005 -0600 Fix -o - with labels. commit e1062daaaf34b82440f5d1c1eee76f2b5a249d1b Author: John Bowman Date: Sun Nov 27 23:21:02 2005 -0600 Added example of 3d lighting effects for a sphere, using Gouraud shading. When running MSDOS binary under CYGWIN, use UNIX line terminator. commit f41b5c3cbcab52de658277ea8df09ec05df50994 Author: John Bowman Date: Sat Nov 26 17:01:52 2005 -0600 Check for null binary space partition. Move normal==O test to face. commit 461ea503545d77d9279c8066ab6d76c7ca3bdb06 Author: John Bowman Date: Sat Nov 26 14:53:12 2005 -0600 Make -o - work without labels. Document how to pass options to convert. commit e5f090df96cb7378f7f21d0e933d04f29d98b60d Author: John Bowman Date: Fri Nov 25 17:50:23 2005 -0600 Minor improvements. commit 3801d8d59c5e0bf670e1bc2f81ccb817d48a2cb3 Author: John Bowman Date: Fri Nov 25 02:51:13 2005 -0600 Added unitsize argument to shipout command (makes user coordinates represent multiples of unitsize). Suppress final call to exitfunction when exiting interactive mode. commit 8eb2bcf4f65fc9897d5fed34ae591f88e358046a Author: John Bowman Date: Thu Nov 24 00:36:47 2005 -0600 Under MSDOS, turn off the default -V option if more than one file is specified on the command line. Under MSDOS, by default bind Delete and Insert keys to delete-char and overwrite-mode, respectively. commit 23954c9562a97570b63650f5e3ee398741aac9ce Author: John Bowman Date: Wed Nov 23 18:36:54 2005 -0600 Install *.dat and piicon.eps files. commit 61ca520831b2545ba2252dd920b56c8159d04eb1 Author: John Bowman Date: Wed Nov 23 17:37:39 2005 -0600 Always destroy tex pipe at cleanup (e.g., in case a label contains a \gdef command). commit 9e5c05fd948b94ed8ab9bd3d271b7c238b894c47 Author: John Bowman Date: Wed Nov 23 17:35:02 2005 -0600 Unwrap wrapper. commit 2f5737d0b240632ac0081a4e10093f6c51bf1f92 Author: John Bowman Date: Wed Nov 23 14:06:56 2005 -0600 Fixed segmentation fault with unravel and from access in parse diagnostic. commit f41cff6dc7aebfcd7e696115948df31ca41d3229 Author: John Bowman Date: Wed Nov 23 09:53:43 2005 -0600 Documented ImageMagick convert dependency of GUI xasy. commit 7c8c9e83089654262c088b5656b288bc32466bba Author: John Bowman Date: Tue Nov 22 23:04:34 2005 -0600 Renamed -n option to -nV. Used -n (or -no) to negate next option. commit 2d9f17871e1419f6eaa0b8e4934ffc17e51b6974 Author: John Bowman Date: Tue Nov 22 16:25:52 2005 -0600 Use kpsewhich to help find default latex path. commit ee0107095feb9106e2f0155b73467715640f1de4 Author: John Bowman Date: Tue Nov 22 15:29:47 2005 -0600 Improved diagnostics. commit 1880d2bc13025a7a64e8262d5bb8172ac763ed80 Author: John Bowman Date: Tue Nov 22 15:24:25 2005 -0600 Check for module recursion after call to parseFile. commit a46953c709f31a895cb2a3dcd970a2f48ffcccb9 Author: John Bowman Date: Tue Nov 22 14:31:44 2005 -0600 Removed incorrect (and unnecessary) addPoint call from xaxis and yaxis. Made axisT readable outside of graph module. Made standard axis types public. Document custom axis types. commit 777fbf6726d2027abaa18c9631a7b388d46b95d7 Author: John Bowman Date: Tue Nov 22 02:19:48 2005 -0600 Incremented version to 0.96cvs. commit 6fbf74f332f447fb6c31172ffa76ef0462472729 Author: John Bowman Date: Tue Nov 22 01:04:17 2005 -0600 Fixed indentation. commit 364126842df5a60686d9ea3b0b94f8d2c11e7f4f Author: John Bowman Date: Tue Nov 22 00:54:03 2005 -0600 Reimplemented reset keyword in interactive mode to restore the environment except for the setting of scroll(). Interactive input now does an automatic reset. Added link to the GNU readline library documentation for customizing interactive key bindings. Fixed hang in scroll mode on EOF. commit 91eb7c8e328f43b81bedbe0bf9d984789a492e8a Author: John Bowman Date: Tue Nov 22 00:33:20 2005 -0600 Move legend.append to appropriate place. commit dcc0fbe629e3f2372150a4ecdd0693911417b614 Author: John Bowman Date: Mon Nov 21 15:15:15 2005 -0600 Use scalebox only where necessary, to reduce LaTeX memory usage. commit 71c6655d3469e0ade3a93388c52999dc25cb1d2e Author: John Bowman Date: Sun Nov 20 15:50:51 2005 -0600 Plugged remaining memory leak. commit fd9adc8c3a9d73d90c569025161cad7bcdf1d3cf Author: John Bowman Date: Sun Nov 20 12:08:29 2005 -0600 Plug another memory leak. commit 2d466f2c5a379cb4efd0fa0100a6d5f58c0bf5b2 Author: John Bowman Date: Sun Nov 20 11:41:04 2005 -0600 Fixed memory leak. commit 0ae5de9fa205f811259ea403e14b91547358d703 Author: John Bowman Date: Sat Nov 19 12:00:13 2005 -0600 Put GC warnings under control of -d option. commit 26b1022143890e3c35a24e3a74f2af2ae19b4f36 Author: John Bowman Date: Fri Nov 18 23:52:49 2005 -0600 Suppress GC warning messages (in particular: "Repeated allocation of very large block"). commit c3f015919bba9f40bb5bf9f0eacabf2a8f8562c1 Author: John Bowman Date: Fri Nov 18 23:46:59 2005 -0600 Make interactive input command reset the environment. commit 6ca8e3cbdcf189f4539c63b84e9700e7359c15b2 Author: Andy Hammerlindl Date: Thu Nov 17 23:21:02 2005 -0600 Added testing for unravel. commit 3f4f57ca4f67f06bc3961b6c0bcde86eee3ffa77 Author: John Bowman Date: Thu Nov 17 10:31:08 2005 -0600 Removed old documentation. commit d0a40a1fed53391f30dff0134b05b8f852668727 Author: John Bowman Date: Thu Nov 17 01:23:28 2005 -0600 Incremented version to 0.95cvs. commit 2d8ea5ffd849e487f0cefb89f559d387795328dc Author: John Bowman Date: Thu Nov 17 00:14:51 2005 -0600 Changed import graph; to abbrevation for access graph; unravel graph. Also: import graph as graph2d; means access graph as graph2d; unravel graph2d. Updated documentation; removed descriptions of old import scheme. commit 22f1659bb206557ad37971f19040ea5b58b5ae62 Author: John Bowman Date: Wed Nov 16 18:25:21 2005 -0600 Force quiet mode with running embedded latex files. commit ea0b9c27146e6726caf57e10423f8a481db6bd13 Author: John Bowman Date: Wed Nov 16 17:51:06 2005 -0600 Reduce memory usage. commit ef4fae7cd964ab244cfb84fa5e514175e0d3b31d Author: John Bowman Date: Wed Nov 16 17:07:28 2005 -0600 Use a vector instead of a list for estack and sstack. commit 8381834a584566f533598bd2f6fa104fe2f688ab Author: John Bowman Date: Wed Nov 16 15:31:07 2005 -0600 Reverse order of pstricks and graphicx also in asymptote.sty. Fixed formatting. commit d30095a1a85ffa2765fad62d8d4fc9e6ef39df8c Author: Andy Hammerlindl Date: Wed Nov 16 15:05:25 2005 -0600 Slight refactoring. commit 9fc036102ca31b6a710e1d8d8eb2bc7fcb8c4149 Author: John Bowman Date: Wed Nov 16 14:32:30 2005 -0600 Workaround scalebox problem with old versions of pstricks. commit 900a230f59eb035da1e73243c7166e50672f829a Author: Andy Hammerlindl Date: Wed Nov 16 13:03:55 2005 -0600 Fixed frame loading issues with imported types. commit 491ba39a65ee7cedc1ae705130b79aaf930a28de Author: John Bowman Date: Wed Nov 16 03:31:20 2005 -0600 Incremented version to 0.94cvs. commit d2521d022132b4b565b1a23b2fba8ee33c640ab3 Author: John Bowman Date: Wed Nov 16 03:06:51 2005 -0600 Fixed cygwin problem. commit 73dfcc6c2b8d89eae215103dcc2c0eed219ae44e Author: John Bowman Date: Wed Nov 16 02:36:10 2005 -0600 Added mkdir. commit 0f7098206d138babb0ee9b1aad6a420ca8ff88b8 Author: John Bowman Date: Wed Nov 16 02:27:04 2005 -0600 Revert to pstricks colors instead of color.sty due to problems under FreeBSD. commit 1fc8a6ebb4512fc41f3092c118aafbf2747999f5 Author: John Bowman Date: Wed Nov 16 02:14:50 2005 -0600 Workaround missing C99 gamma function under FreeBSD. commit b0988cec31ea4f7c7e5f1948c695e6498cfa33a7 Author: John Bowman Date: Wed Nov 16 01:31:40 2005 -0600 Documentation updates. commit df488ea835383a7ae9bce7d8275d199da678b24b Author: John Bowman Date: Wed Nov 16 01:24:03 2005 -0600 Added new keyword. commit 2f111570bc73f175c124d70c774186b707f8d67d Author: John Bowman Date: Wed Nov 16 01:12:02 2005 -0600 Fixed more cxx warnings. commit a532094aeeecc237a20ccbf3a2c7c0a9271889b6 Author: John Bowman Date: Wed Nov 16 01:09:16 2005 -0600 Fixed cxx errors and warnings. commit 863e8e9a52a68acd3ceb8ef6aa46d29c51b9849a Author: John Bowman Date: Wed Nov 16 01:01:34 2005 -0600 Version template. commit 896307cb58b63bae3d93b6cb1b993528c08acaae Author: John Bowman Date: Wed Nov 16 00:49:51 2005 -0600 Added version check to plain.asy. commit e5d83a5366f243d60e5aecb5c54b13629f1bfc49 Author: John Bowman Date: Wed Nov 16 00:19:59 2005 -0600 Put history in ~/.asy/history by default unless -localhistory is specified. Renamed ~/.asyrc to ~/.asy/options Updated documentation. commit aca9bcc789be34e190316066e9b572030bb92ea3 Author: John Bowman Date: Tue Nov 15 22:03:28 2005 -0600 Read command line style-parameters from $HOME/.asyrc commit f02c09ffb1bc5950237dc3df611a67a809d2bbc5 Author: John Bowman Date: Tue Nov 15 18:50:15 2005 -0600 Removed superfluous static modifiers. commit 978f33ffba7708b7d91c42ed3b271a511d9cb5e1 Author: John Bowman Date: Tue Nov 15 16:07:01 2005 -0600 Added surface graph of matrices. commit cc9ab56c7966061cbc71c97eb5ef2cc9f1c2e385 Author: John Bowman Date: Tue Nov 15 14:51:50 2005 -0600 Importing graph3 should publically import graph and three. commit 1a89f394735cec123b056ae429f290e57f5a078f Author: John Bowman Date: Tue Nov 15 13:06:59 2005 -0600 Implemented horizontal and vertical label scaling. Cleaned up Label code in plain.asy. commit c260f4e541ad2b6ab880668c721565a8e3430ca4 Author: John Bowman Date: Mon Nov 14 14:09:17 2005 -0600 Optimized integer overflow checks. commit 6ae2b69162667e165f20233aa048e5f97e23e142 Author: John Bowman Date: Mon Nov 14 02:16:15 2005 -0600 Added checks for integer overflow. commit f1a0872ddf61bf7dc88c0988382324b92cbe3123 Author: John Bowman Date: Mon Nov 14 01:57:47 2005 -0600 Handle parse errors. commit 236e42291a45e1c178982191ebd88b4b2c03b050 Author: Andy Hammerlindl Date: Sun Nov 13 22:47:56 2005 -0600 Minor edits. commit 44dba419cb16d17fd46c22ad4581bfc8d798d1f0 Author: John Bowman Date: Sun Nov 13 19:47:17 2005 -0600 Documented "from m unravel c as C;" syntax. commit 14bf01cac77e4d4e6a689a732f482976f62e3b6c Author: John Bowman Date: Sun Nov 13 19:34:03 2005 -0600 Minor update. commit 365ac4a73290985835a8672031aafd69f55696fe Author: John Bowman Date: Sun Nov 13 19:30:54 2005 -0600 Documented unravel and include. Updated documentation of execute and eval. commit 0989b855c9c314798258d3bcb1695236c8f57a58 Author: Andy Hammerlindl Date: Sun Nov 13 16:29:51 2005 -0600 Describes new importing system. commit 956cf076a99ba742e11cd2157eb98f9c0739ed1c Author: John Bowman Date: Sun Nov 13 03:11:08 2005 -0600 Fixed memory leak. commit 2bc72e42522e99043b8051ad93d55c0c3da882dd Author: John Bowman Date: Sat Nov 12 23:39:26 2005 -0600 Removed constructor added in error. commit 28e0bae4df0e9568617341e38c7b923d5f357f60 Author: John Bowman Date: Sat Nov 12 23:36:26 2005 -0600 Fixed cxx errors and warnings. commit 5f1ba64a2d4098953380c0d70186f75d27b8f6b0 Author: Andy Hammerlindl Date: Sat Nov 12 16:47:06 2005 -0600 Added venv::add to NOHASH. commit d75a0bd6fd0b1cb4eff4b229875191fbd32b5152 Author: John Bowman Date: Sat Nov 12 16:18:24 2005 -0600 Another workaround for gcc 3.3.4 problems. commit e2e8ccb6f2f541217ec1f0a8d2a165e0471a9531 Author: John Bowman Date: Sat Nov 12 15:57:02 2005 -0600 Workaround problem with gcc-3.3.4. commit aeb6c990724852831ffff52b19b6e86b174093c0 Author: John Bowman Date: Sat Nov 12 15:22:28 2005 -0600 Added erf,erc, and gamma functions. commit 37df4f422e65e3913781aec833e38343605e4f63 Author: John Bowman Date: Sat Nov 12 13:43:42 2005 -0600 Make quotient(int,int) consistent with %. commit b8d59fe592f7024714ec5a77136ff7a9d0023406 Author: John Bowman Date: Sat Nov 12 01:56:01 2005 -0600 Fix **. commit 7d071596999b5d45c79dc76375506edf3d9fb6b3 Author: Andy Hammerlindl Date: Fri Nov 11 18:38:32 2005 -0600 Replaced std::string with mem::string for genv. Moved error reporting associated with 'as'. commit 1b01a81f25eb73d213de73c94373cb3ed3cbe499 Author: John Bowman Date: Fri Nov 11 18:22:40 2005 -0600 Added missing delete. commit 3e9f0d27ede272fb0b4fd9d6180e9edcf4ca5579 Author: John Bowman Date: Fri Nov 11 01:14:34 2005 -0600 Make bounding box computation work with -o -. commit b312e379dcdb1dc5ebe0c9310086d4cb2ec44b91 Author: John Bowman Date: Fri Nov 11 00:37:34 2005 -0600 Allow outputting to standard output with "-o -" command line option. commit 1c14fd2ec513bd332987dec787ad2e48fda7d048 Author: John Bowman Date: Thu Nov 10 23:59:13 2005 -0600 Set default pdf viewer to acroread under UNIX, just like under MSDOS. Removed pdf fuzz (a workaround for a pdf-viewing problem only of gv, not other pdf viewers). commit dc252e27f2dc18f99a09c598434b6ca0a28c6378 Author: Andy Hammerlindl Date: Thu Nov 10 10:02:55 2005 -0600 Refactored argument matching functions. commit acb62c269bc533b57f8db269b0bc843976d2f4b4 Author: John Bowman Date: Thu Nov 10 02:56:24 2005 -0600 Removed old interactive buffer flushing code. commit 49db56fcf5ae55a857fa9ebca24996f0492b513c Author: John Bowman Date: Thu Nov 10 01:58:13 2005 -0600 Choose more descriptive names latticeshade, axialshade, radialshade, and gouraudshade for shading routines. commit 6c2f1163134a5ade41a8db9e221536221f2875c7 Author: John Bowman Date: Thu Nov 10 01:17:56 2005 -0600 Respect final null entry when reading data in cvs mode (fixed). commit 3a89127a1f73df1eae54cdc0cd70df341ab5be51 Author: John Bowman Date: Wed Nov 9 23:53:32 2005 -0600 Flush input buffer every time we enter parser. commit 9e85d17616a91a523f65a239c16aaf229bbf105a Author: John Bowman Date: Wed Nov 9 20:49:29 2005 -0600 Added new keywords; fixed treetest. commit b78fd384f56f2a7e9e9fd0cfb26f1f06698ad8df Author: John Bowman Date: Wed Nov 9 20:35:22 2005 -0600 Documentation updates. commit cf629c85681f9975f907279087136664b9e540f2 Author: Andy Hammerlindl Date: Wed Nov 9 00:36:03 2005 -0600 Extended access and unravel syntax. commit 12a1791ded53de40f11fad39422b712c851e277e Author: John Bowman Date: Tue Nov 8 23:23:54 2005 -0600 Make embedded evals work within exitfunction. commit fb4c073d8a100376af5078d8e83a607545279936 Author: John Bowman Date: Tue Nov 8 23:05:11 2005 -0600 Reimplemented GUI support. commit a1b02245d9d163612c65ce76e25e41951fb9e54b Author: Andy Hammerlindl Date: Tue Nov 8 17:55:03 2005 -0600 Check for infinite recursion when loading modules. Add position info (markTrans) for codelets. commit 8f85cfa41726a8039358d7699edbc2f7f27c5dd7 Author: John Bowman Date: Tue Nov 8 14:30:10 2005 -0600 Renamed defaultpen() to resetdefaultpen and getdefaultpen() to defaultpen(). commit 9e9a8ceb1a95c2ec077c960dcad190c0c25f13bf Author: John Bowman Date: Tue Nov 8 14:11:06 2005 -0600 Updated diagostics. commit 0d092a3d344734b958f5d3b231388c520478a3d8 Author: John Bowman Date: Tue Nov 8 12:58:07 2005 -0600 Re-implemented -p (parse) and -s (translate) options. commit a1ca000656cf8892d798b4fc8132e3835dff02da Author: John Bowman Date: Tue Nov 8 10:39:14 2005 -0600 Corrections from import merge. commit fd5fb6c0df0bbbec952ee8efdff3db1cdb304011 Author: John Bowman Date: Tue Nov 8 03:36:32 2005 -0600 Reimplemented import "file" syntax. Interactive mode updates; reimplemented interactive "input" command. Documented true interactive mode. commit a679f9db485a048f7a093f22d977d455094ff0eb Author: John Bowman Date: Tue Nov 8 01:22:41 2005 -0600 Facilitate optional installation of documentation and examples to different directories. commit 00ecbbcfc69ec7a3c48c5def887fc98a05f389a3 Author: John Bowman Date: Tue Nov 8 01:19:24 2005 -0600 Added missing picture arguments to graph. commit 18696c78fa467a579e6d6c0d9acece649522669a Author: John Bowman Date: Mon Nov 7 23:26:21 2005 -0600 Remaining import updates. commit 14735e983987b664738f9bbab29953a6cdeafd7d Merge: 0b62f70 9710028 Author: Andy Hammerlindl Date: Mon Nov 7 10:57:39 2005 -0600 Merged in changes from the import branch. commit 9710028ac2a4550f2494a79fcdb6e441ea28c274 Author: John Bowman Date: Mon Nov 7 00:44:35 2005 -0600 Renamed autonomous argument of eval to embedded. Updated asymptote.sty. commit bd5b3c0031560966eaa9655e4d259b1c1f892544 Author: John Bowman Date: Sun Nov 6 23:01:22 2005 -0600 Optionally allow eval to run within current environment, rather than in an autonomous (distinct) environment. commit 09816a50c49d05c02c7d4d2e0643a1a65963f9a8 Author: John Bowman Date: Sun Nov 6 17:57:25 2005 -0600 Fixed eval so that environment is properly reset. Removed outnameStack. Added animate.asy module to make animations easier. Reimplemented -l (listvariables) option. commit 0b62f70388e8cbc7a7212fe76415f70ac1ffd723 Author: John Bowman Date: Sun Nov 6 17:36:58 2005 -0600 Fixed lexer error. commit fe3ac7ae1dd16b09b629339bda26cfea3be3c502 Author: Andy Hammerlindl Date: Sun Nov 6 10:57:54 2005 -0600 Checks permission of both the qualifier and the field for an unravelled field. Inaccessible (eg. private) fields are not unravelled. Added quote keyword and code type. Refactored doIBatch. commit 36c564c5e4880445b452f486d95c0ff485013781 Author: John Bowman Date: Sat Nov 5 21:45:10 2005 -0600 Removed # and ## as admissible operators. commit 2720837802489b099d25586a32ce0451c9c6f1d4 Author: John Bowman Date: Thu Nov 3 11:44:07 2005 -0600 Temporarily deactive last change. commit cc10f38f1ce5bbe06a3c0cf7314646ffa0d17eb2 Author: John Bowman Date: Thu Nov 3 11:32:41 2005 -0600 Respect final null entry when reading data in cvs mode. commit c9ddd25d7e1c1249f95070d0c1190e40d0707ba6 Author: John Bowman Date: Thu Nov 3 01:34:01 2005 -0600 Fixed memory handling and outname for line at a time mode. Switch over to using line-at-a-time mode. commit af35dac4500855ebb9efbdec808595b3701a8a07 Author: John Bowman Date: Wed Nov 2 23:46:58 2005 -0600 Added infix operators << >> @ @@ $ $$ # ##. New module fontsize.asy supports nonstandard fonts. commit 9fa2770e323fe9a2242a4733b8af3f46991069c7 Author: John Bowman Date: Wed Nov 2 13:00:16 2005 -0600 Reimplemented -laat mode. commit b4529048ec3618cec5a136f6672a8e5105ba0d01 Author: John Bowman Date: Wed Nov 2 01:39:54 2005 -0600 Merged eval with IBatch; removed laat mode. commit 58326a3eca7dfd5f809312c189338af8f2315a3d Author: John Bowman Date: Tue Nov 1 23:41:04 2005 -0600 Reimplemented eval() and execute(). Added shipped flag to save() and restore(). commit 45dd4837a78e3843b65e99b893b5f4f69ca9d173 Author: John Bowman Date: Tue Nov 1 13:28:51 2005 -0600 Fixed picture.empty(). commit d40cf552d16cdca9693b025c1fb1deff1da7d92c Author: John Bowman Date: Tue Nov 1 11:40:11 2005 -0600 Set A=unravel, Q=access, U=import to allow testing until "import into" is implemented. commit 7ea5da6eda5c4b2ae9d6e1d9a8e9444fb6cceaae Author: John Bowman Date: Tue Nov 1 02:06:27 2005 -0600 Gracefully handle errors in loading plain, etc. commit e2b4b9d50b69993f9cf9ccb340088f2b0a37d958 Author: John Bowman Date: Tue Nov 1 02:00:18 2005 -0600 Fixed interactive error handling. commit abeda671cf2e6ca69e45cc2d80df77a9bf1d759c Author: Andy Hammerlindl Date: Mon Oct 31 00:32:21 2005 -0600 Changed ignore permission modifiers to a warning for use with include. commit a43fe979f8a5ee720196d9cd2d7508ae78ebedf9 Author: John Bowman Date: Sun Oct 30 14:27:53 2005 -0600 Minor code cleanup. commit ee6c32d83cc851eba02e78e65c48cdac864817cf Author: John Bowman Date: Sun Oct 30 11:33:52 2005 -0600 In interactive mode, flush input on errors. commit edeb32b334dcbfe4b462f70fc4f93d0bd4ef297c Author: John Bowman Date: Sun Oct 30 04:41:06 2005 -0600 Allow expressions of the form (0,0,0){x,y,z}. commit 90fd95b0d77f94f426566cfe3dc7a1aa434fa74a Author: John Bowman Date: Sun Oct 30 04:34:35 2005 -0600 Removed operator symbols consisting of letters enclosed by colons. commit 7c9208f06dbbc91d397635c1b37f73c7a4a33dd5 Author: Andy Hammerlindl Date: Sat Oct 29 23:14:11 2005 -0600 Added semicolon to include. commit b380e5feb4b448bdd20e5da0f908934df33c9f1c Author: John Bowman Date: Sat Oct 29 21:49:03 2005 -0600 Allow include file as well as include "file". commit 9fa4217964d07baf22ab715898e8f99bc666d8e3 Author: Andy Hammerlindl Date: Sat Oct 29 19:16:58 2005 -0600 Added include, which translates the parse tree of the given file in place. commit c1e9731d8bf713b00e41fe776b3aeed845f4701d Author: Andy Hammerlindl Date: Sat Oct 29 14:03:21 2005 -0600 Added some form of autoloading. Bad importing does not affect the genv dictionary in interactive mode. commit 90060607dfc7092dc72546df88b773d3e1d5f0bb Author: John Bowman Date: Fri Oct 28 23:31:17 2005 -0600 Additional operator symbols can now be formed by enclosing any combination of letters (including the underscore character) in colons. commit a67283022104a1b5accc43d556674afad9f700e3 Author: John Bowman Date: Fri Oct 28 21:56:53 2005 -0600 Re-added tension3 and curl3 operators. commit 9a78050799658c969ab432695f35c3f473132b78 Author: Andy Hammerlindl Date: Fri Oct 28 17:50:38 2005 -0600 Autoplain for interactive mode. commit 56aec06506f45c100cf743c96935ec8f2b0af3cd Author: Andy Hammerlindl Date: Fri Oct 28 17:40:01 2005 -0600 Add environment rollback, for erroneous code in interactive mode. commit c8735012ac180cbdfba25d373bd370739c8a496e Author: John Bowman Date: Fri Oct 28 00:33:34 2005 -0600 Support interactive erase: outputting an empty picture produces an empty file. commit 3d8605ddb94514e5b53e0ac1b06116455d38ffb0 Author: John Bowman Date: Thu Oct 27 22:08:47 2005 -0600 Documentation now refers to Datadir variable rather than /usr/local/share. commit a7b07c58cbc9150960d106cb2b39b1c9b3ce3546 Author: John Bowman Date: Wed Oct 26 22:43:12 2005 -0600 Uptodate flag now does a shipout() as needed. commit b2d73e276904b14b731eafee152f30b44715a34a Author: John Bowman Date: Wed Oct 26 12:28:04 2005 -0600 Fixed typo. commit bb131c1588b70376eece7d7cde471a2c75644430 Author: John Bowman Date: Wed Oct 26 00:38:51 2005 -0600 Removed unused includes. commit b94a3ec4ad8d2dd068cfb88e6fb3ea73f32b780b Author: John Bowman Date: Wed Oct 26 00:34:04 2005 -0600 Remove unused code. commit 19ba7e49064b8f68186cf1895bb08cb54f4b2b54 Author: John Bowman Date: Wed Oct 26 00:09:59 2005 -0600 Fixed interactive mode error handling. Merged in return code fixes from the main branch. commit f334721ec9ac22dac7ac0d32e703eb4ccbce6ec4 Author: John Bowman Date: Tue Oct 25 23:23:02 2005 -0600 [Import] Replaced virtual interactive mode with true interactive mode. commit 2399cd7f0f57dac01ac5532fa6b85313aa517b25 Author: John Bowman Date: Tue Oct 25 11:27:30 2005 -0600 Fixed STL errors and virtual destructor warning. commit 2df11de94ed66efd5466dcba89823f431a6affe6 Author: John Bowman Date: Mon Oct 24 22:54:56 2005 -0600 Return a definite return code (rather than an error count that overflows after 256 errors). Also check for parse and translation errors. A return code of 0 means successful; 1 means a user error occurred; -1 signals a misconfiguration error (pipe, fork, or exec failed). commit d640705f9565091a774e248db1ab8b166418cdad Author: John Bowman Date: Mon Oct 24 22:02:19 2005 -0600 Set default put argument of box and ellipse functions to Above. Use convert instead of dvipng in doc/Makefile. Updated Debian URL. commit 16e5842f629b59e3917f21e6a3825a1206432a2d Author: Andy Hammerlindl Date: Sun Oct 23 21:25:28 2005 -0600 Added more changes in from the main trunk. commit cb193ddaa1db2bdfac90cc8a9522867cd8d5ac9f Author: John Bowman Date: Sun Oct 23 02:15:00 2005 -0600 Incremented version to 0.93cvs. commit f8949272355544fe98b28ef870d503b9f5579e8f Author: John Bowman Date: Sun Oct 23 01:48:50 2005 -0600 Fixed cd diagnostic. commit e91d10d96853361746e44bf87af763a90c99e94a Author: John Bowman Date: Sun Oct 23 00:50:35 2005 -0600 Fixed label bbox bug. commit ba22e55cc25e9fbbf1af7f0f70e64cd52e5e55b3 Author: John Bowman Date: Sat Oct 22 23:15:14 2005 -0600 Fixed intersect fuzz calculation. Implemented means of adjusting 3d aspect ratio. commit 0307afc0e763fae832d552a70a5990d93867640a Author: John Bowman Date: Sat Oct 22 10:49:28 2005 -0600 Updated xasy to generate GUI(int) frames instead of gui(int). commit a2892cbacb27a4b2b353efe0025fce0c65a1b2cb Author: John Bowman Date: Sat Oct 22 04:25:01 2005 -0600 Workaround missing round function under FreeBSD. commit fc2a9f4342f45a7a60f0fcdb1e4d8350e7b28565 Author: John Bowman Date: Sat Oct 22 03:41:04 2005 -0600 Fixed cxx errors. commit 288b512004959a3394b521c5acfd2fb07fe8f655 Author: Andy Hammerlindl Date: Sat Oct 22 02:54:15 2005 -0600 file brokenaxis.asy was added on branch import on 2005-10-24 03:25:28 +0000 commit 06839af15a6bafcd7bbbfeb098fc7961ffd8bcf0 Author: John Bowman Date: Sat Oct 22 02:54:14 2005 -0600 Fixed example. commit 8ddb128c9b7b2f448d4d377cc094b0859ff0b7f2 Author: no-author Date: Sat Oct 22 08:54:14 2005 +0000 This commit was manufactured by cvs2svn to create branch 'import'. commit ecbd779730fbdf6e262c93db163e27bb5ce3153a Author: John Bowman Date: Sat Oct 22 02:51:32 2005 -0600 Added missing example. commit e4be44933a2678abd007ebfd57bddf284492248b Author: John Bowman Date: Sat Oct 22 02:48:56 2005 -0600 Added scaleT Broken and example of broken x axis. commit f19cf665b8285f6e2df069d4cacffce341069dac Author: John Bowman Date: Sat Oct 22 01:45:58 2005 -0600 Moved dir argument of picture.fit() to add(frame,pair) and attach(frame,pair). Added frame align(frame f, pair dir) for aligning frames. commit 51d89c20b4806ab6a1cce8cb480e261da1e9abb2 Author: John Bowman Date: Sat Oct 22 00:03:18 2005 -0600 Implemented a new struct marker to hold marker data, including a general markroutine. Included both the default marknodes routine and a markuniform(int n) routine which draws n markers at evenly spaced intervals along the arclength of the path. commit 564aed3f7bc21cd4939b911f3371d058403e4f8c Author: John Bowman Date: Fri Oct 21 02:12:29 2005 -0600 Don't strip directory from explicit output filenames. commit 6629c2f55134e6b92dc62c4c4eb5d4fccb30538f Author: John Bowman Date: Fri Oct 21 01:23:16 2005 -0600 Documentation updates. commit f47b325d3f0dbc419a08452a2027ccb2047c01c7 Author: John Bowman Date: Thu Oct 20 01:36:43 2005 -0600 Added CPPFLAGS option to configure.ac (equivalent to CFLAGS). Fixed spurious overwrite messages. Added fuzz to label clipping to retain labels exactly on boundary. Moved intersectionpoint to plain.asy and added documentation. Renamed intersection in math.asy to intersect to intersect. Added UnFill filltype for clipping underneath frames, pictures, and labels, with examples. Make save/restore respect currentprojection. Added 3d intersectionpoint routines to three.asy. Added instructions for setting environment variables under MSWindows XP. Removed ymargin=infinity in favour of ymargin=xmargin. Documented use of Cyrillic fonts. Documented that \end{asy} environment must appear on a line by itself. commit 32ad169f5b3542da1ec48e903da457639d8e6f97 Author: Andy Hammerlindl Date: Wed Oct 19 13:37:59 2005 -0600 use is now use=import+explode. commit 0628aa7bb95026a88ff36b26060260f8ed47c439 Author: Andy Hammerlindl Date: Tue Oct 18 17:53:23 2005 -0600 Got line-at-a-time working. commit c78464d5ff2a4a37b335bd09c5a70b57c3a2c389 Author: Andy Hammerlindl Date: Mon Oct 17 19:31:59 2005 -0600 Import can infer the filename. Filenames given as positions are actual files. commit 4e991f81346b0711e3c3c18f65f090f19156fc88 Author: Andy Hammerlindl Date: Mon Oct 17 18:01:27 2005 -0600 Added use declaration. commit 6559104a9581c0e532e291c4166755c451f4a2bf Author: John Bowman Date: Sat Oct 15 03:14:38 2005 -0600 Fix precision errors at +/-1e-4; default format changes to scientific notation here. commit 716e22941007220a14c57ab41e1c6700e01e724d Author: John Bowman Date: Fri Oct 14 22:07:16 2005 -0600 Fixed inside(path,pair). commit db0c6be308eadd2ae2d4b3f81a652c3920574e68 Author: Andy Hammerlindl Date: Fri Oct 14 10:08:45 2005 -0600 Integrated changes from the main branch (tagged changes_for_import_oct_14). commit 7dbede8650a3b614f58004bae0f40332ba936980 Author: John Bowman Date: Fri Oct 14 01:16:49 2005 -0600 Implemented robust real cubic root solver. Removed inside, quadratic solver, and intersect routines from math.asy in place of internal C++ routines. Changed DOUBLE to TWO, etc., to avoid confusion with double roots. Implemented function bool inside(path g, pair z, pen p=currentpen); to test whether a point is inside a cyclic path. Implemented clipping of labels. Added two new fill rules to allow labels centered within the clipped region to overlap the clipping boundary. Clipping now clips all layers of a picture, not just the most recent one. Fixed bug in precontrol and postcontrol. Fixed floating point exception in complex powers when base is zero. Added Floor, Ceil, and Round functions that don't produce floating point exceptions. Made the default axis for logarithmic scaling YEquals(1) and XEquals(1). Made currentpicture the default picture in Scale(pair). Added begingroup/endgroup pairs to filldraw. Changed plane interface to return a representation of the plane through point O with normal cross(u,v). Draw over existing TeX layers when doing 3d hidden surface removal. Added face labels to cube animation. Updated installation instructions. commit 0db8a820cbd178de0f23e83b82f160eebb36ceca Author: Andy Hammerlindl Date: Thu Oct 13 15:39:16 2005 -0600 Grouped common code between record and env into protoenv. commit 166c1812dc1b3f810d98995b463e9bfcc6ac9196 Author: Andy Hammerlindl Date: Thu Oct 13 13:04:36 2005 -0600 Fixed prettyprinting of joinExp. commit adb637f8f99ac50c6fc046819813c33d77ca159b Author: Andy Hammerlindl Date: Thu Oct 13 12:43:16 2005 -0600 More specific error message for casting. commit 72379c9945ccde7a915a2d6d43b8c74de882d651 Author: Andy Hammerlindl Date: Thu Oct 13 12:42:41 2005 -0600 Fixed indenting for parse output. commit 02fa43b7a893bcd08b0459dc4969e3727dd17113 Author: John Bowman Date: Thu Oct 13 09:01:13 2005 -0600 Fixed control point bug introduced by recent straight flag fix. commit 0f9db37a420570090e30b1e2f50c1ec841d505f7 Author: John Bowman Date: Wed Oct 12 16:29:21 2005 -0600 Make default value of picture.keepAspect true. commit a246176ea243b9fb0bff994cdfcdcfd8524f68dd Author: John Bowman Date: Wed Oct 12 14:02:37 2005 -0600 Use picture defaults as default parameters in fit and size functions (locally resolved default function arguments now allow this). commit 822d263fb2742e1347e028dd93a20c0c55ad080d Author: Andy Hammerlindl Date: Wed Oct 12 11:44:23 2005 -0600 Replace ty with tyEntry for type declarations. Allows types to be imported. commit 5e141104cc6d0addcc0f1698d153becd009faf5a Author: Andy Hammerlindl Date: Tue Oct 11 21:24:14 2005 -0600 Edited comment. commit 88ef0077d414e3d97ff769ab5a701e2086e47c0b Author: Andy Hammerlindl Date: Tue Oct 11 19:29:11 2005 -0600 Straight flags are preserved when using a path as part of a guide. commit 35c9020bb49d1076276e30d2ab29db9d9cb379d7 Author: Andy Hammerlindl Date: Fri Oct 7 21:57:39 2005 -0600 Default arguments are evaluated "out-of-order" like variable initializers. commit 0cec99e8ac52736ba80006e83c4885f519e1317b Author: John Bowman Date: Fri Oct 7 14:58:33 2005 -0600 Moved animations to animations subdirectory of examples directory. plane(triple u, triple v, triple O=three.O) now returns the plane through point O with normal cross(u,v) commit 4c88f42245a5c2719976c11f50c7c4ca2828921e Author: John Bowman Date: Fri Oct 7 02:22:25 2005 -0600 Simplified plane(triple, triple, triple). Simplified Pen(int). merge no longer waits for animation to complete. Added rotating cube animation. commit bcba1612f92ef07994d8e5321ce01b138920b551 Author: John Bowman Date: Thu Oct 6 11:46:16 2005 -0600 Fixed formatting. commit 71e36c9d67813b9751474b9833c49c6059e19e9e Author: John Bowman Date: Thu Oct 6 11:17:13 2005 -0600 Added linewidth(). commit 00b525d39bdfc8843306213c8c1b66fafc12e3c0 Author: John Bowman Date: Thu Oct 6 11:11:05 2005 -0600 Removed implicit cast from real to pen; added pen operator +(pen p, real w) and defaultpen(real) instead. To avoid confusion, a dot product now requires explicit pair arguments. commit b5898745ca2f7ac639850dfe8809f3e8fadc8094 Author: John Bowman Date: Thu Oct 6 10:05:56 2005 -0600 Added new 3d surface example. commit 8fae5a35ebe087e3ce13a40eef09a1c1651dd85c Author: John Bowman Date: Wed Oct 5 23:55:15 2005 -0600 Added example of reading column data from a file and a least squares fit. Changed xsize and ysize arguments of size to simply x and y. commit 1b9472f0c0714569f7593412c17fcdd397837fa2 Author: John Bowman Date: Wed Oct 5 19:51:32 2005 -0600 Added keepAspect=Aspect option to size(pic,real). commit ec325dcd7d9c40e9d6b7fa010bfff61103e8701c Author: John Bowman Date: Wed Oct 5 19:44:19 2005 -0600 Added colinearity checks to leastsquares. commit 43e1aa502818297f37cf4b3d0c6ccdcabcda7356 Author: John Bowman Date: Wed Oct 5 01:49:20 2005 -0600 Use local copy of ticklabel and Label context variables. commit 2291108072ebe06f75430eac98a867358ce9ea11 Author: John Bowman Date: Wed Oct 5 00:12:20 2005 -0600 Reduce default axis coverage limit to 80%. commit 40026fc8e6c783b389cd59687f8e7ce7d9498689 Author: John Bowman Date: Tue Oct 4 21:48:00 2005 -0600 Minor documentation updates. commit ef0e9459d9b3b6ea84059cff63b508a71d0abcaf Author: John Bowman Date: Tue Oct 4 16:13:55 2005 -0600 Fixed default location of python under MSDOS. Improved ASYMPTOTE_PYTHON/ASYMPTOTE_XASY diagnostics. commit 14dff5e06fab759643bc6a3dcd3faf613ca687b6 Author: John Bowman Date: Tue Oct 4 15:43:14 2005 -0600 Added Windows support for xasy, including an environment variable for finding Python. Allow GUI mode in interactive mode. Added gui(real x=1) function to turn on GUI mode. commit 9754518eb38a59a3a254758587a18a2346c8be4a Author: John Bowman Date: Tue Oct 4 11:27:41 2005 -0600 Remove intermediate gif files before viewing animation. commit 6d9748b7a805505a51dea16e7238fb96a4a6c60d Author: John Bowman Date: Tue Oct 4 11:20:56 2005 -0600 Added quiet option to override -V command line option, say for producing animated gifs. If the -V option is given, gifmerge now calls animate. commit 6139176d9f0add3e1b59bfb0730a841abb92d851 Author: John Bowman Date: Tue Oct 4 00:30:27 2005 -0600 Incremented version to 0.92cvs. commit fc1dd1de6063a49253a225fdb4e59b793b80e369 Author: John Bowman Date: Mon Oct 3 23:39:06 2005 -0600 Fixed GUI transforms: grouping should not depend on deconstruct flag. commit 2173497579d327808a02fa2b6540324af8967755 Author: John Bowman Date: Mon Oct 3 23:06:24 2005 -0600 Incremented version to 0.91cvs. commit b594c603c24e875e358f0795ec6d2012b5af25fb Author: John Bowman Date: Mon Oct 3 21:24:51 2005 -0600 Flush stdout immediately before calls to fork() to avoid duplicate output. commit 844cd96140044c3f36b98f0095545edc9b2a206d Author: John Bowman Date: Mon Oct 3 02:36:26 2005 -0600 Added Andy's changes to evaluate default function arguments in the defining scope of the function, not in the scope of the caller. commit 459abeea181fd57e4a5f15e6b1951c9120197e53 Author: John Bowman Date: Mon Oct 3 02:20:02 2005 -0600 Generalized write to handle an arbitrary number of data values; improved documentation. Generate standard casts via templates. Added == and != for files. Allow casting of null to file. commit 925ea8080438e0a43970bb23d2fd07f2288d25f0 Author: John Bowman Date: Mon Oct 3 01:08:44 2005 -0600 Readded depth limit to intersect routines to prevent stack overflow. commit c024d3bfcc295da26dbeddc15893550d50817a69 Author: John Bowman Date: Sun Oct 2 15:42:30 2005 -0600 Enforce a minimum value of fuzz in intersect routines to prevent infinite loops. commit f4910c0dd9c43a6ad10fc21f8e12d73a2eafbc05 Author: John Bowman Date: Sun Oct 2 01:20:15 2005 -0600 Fixed depth handling of deferred TeX labels. Fixed error in man page (-t option). Fixed interaction of overwrite(Move) with "%" tick formats. Improved 3d axis label positioning. Added rotate(explicit pair dir) and rotate(explicit triple dir) for rotating text along a line in the direction dir. Updated helix example to illustrate rotated tick and axis labels. commit a4e788568370ce3dab091fc5040e263a7ad8965c Author: John Bowman Date: Fri Sep 30 23:40:32 2005 -0600 Incremented version to 0.90cvs. commit d066ac3daa6ffda6f0ed38c3440c47812f585155 Author: John Bowman Date: Fri Sep 30 22:42:16 2005 -0600 Documented min(frame) and max(frame). commit 3697afe04bc3125fe16db8a066e8c7e73df3f9f4 Author: John Bowman Date: Fri Sep 30 14:55:59 2005 -0600 Don't upscale logarithmic range when automax=false. commit 5f190e85df39833571eb810f5b849c626d3ab3ec Author: John Bowman Date: Fri Sep 30 12:42:28 2005 -0600 Renamed temporary included PostScript file suffix from "ps" to "eps". Removed all references to mailing list, as it is no longer in use. commit 31a4608e9b64f85824aa08b7c1e382c078848123 Author: John Bowman Date: Fri Sep 30 07:50:18 2005 -0600 Fixed .gui processing. Added new example. commit 00afce892ce6bc08cf1da0b16c8d64792a385a3e Author: John Bowman Date: Thu Sep 29 19:53:03 2005 -0600 Allow overriding of ticklabel routine for logarithmic axis; added example. commit e8192130beb7536093032069631ba8c09c5247ae Author: John Bowman Date: Thu Sep 29 18:04:46 2005 -0600 Standardized arguments to LeftTicks, etc. Fixed user-specified logarithmic ticks. commit e0f43b3c6567023fb59e5f7d9ff8848b47c7b972 Author: John Bowman Date: Thu Sep 29 01:50:22 2005 -0600 Incremented version to 0.89cvs. commit 76ffd72cb6b21bb0022f0cb55c88edc59786291a Author: John Bowman Date: Wed Sep 28 23:53:39 2005 -0600 Only build required images. commit da1daa09d06cbeaa628cbf37ddef0e8286cfb473 Author: John Bowman Date: Wed Sep 28 23:37:23 2005 -0600 Minor documentation updates. commit 917f2f1f7027027039643ceba79cedd4b8ac489f Author: John Bowman Date: Wed Sep 28 18:01:47 2005 -0600 Fixed missing label on thinned logarithmic graphs. Documented getstring and getreal. Documented vectorfield and flow example. Fixed cxx warning messages. commit 25e99790fe76f4e401885207dee8ac65637349da Author: John Bowman Date: Wed Sep 28 14:51:47 2005 -0600 Simplified, improved, and documented 3d axes routines. Renamed tickspec to ticklocate. Documented ticklocate. Removed unused symbols from camp.l. Removed spurious nullpaths from :: and ---. Documented deconstruction of guides. commit 0e7db2cd763308121b81cdd43ae3305b277df65d Author: John Bowman Date: Tue Sep 27 01:42:24 2005 -0600 Added a second optional string to Label to provide an estimate for the label size when an undefined label is encountered with the -t option. Fixed box(Label). commit f30bda16e795e11351bffc560b5898f268985bcb Author: John Bowman Date: Mon Sep 26 23:28:56 2005 -0600 Updated pstoedit patch to put brackets around rotated strings. commit 32ca492bf4247f2d27b132ecd11e0efc4067599d Author: John Bowman Date: Mon Sep 26 23:09:02 2005 -0600 Implemented data file comment character (# by default). commit abbfa2473bdc0f43d04ccf88c577b7d10f7cf59d Author: John Bowman Date: Mon Sep 26 09:05:45 2005 -0600 Used scaled epsilon to adjust right-hand axis limit. commit b8517154afba8da5c9722fe4a157459cc22f791b Author: John Bowman Date: Sun Sep 25 23:45:48 2005 -0600 Added fuzz parameter to intersect routines for finding intersections with circular approximations, etc. Also fixed these routines for paths consisting of a single point. Moved 3d intersect routine to C++ for speed. Cache 2d path bounding box. Added 3d version of expi. Increased accuracy of true Arc and Circle to approximately machine precision. Added 3d true Arc and Circle. Added 3d polargraph function. Renamed triple.cc to path3.cc. Added missing triple to path3 cast. Added patch to pstoedit-3.42 to support PNG to EPS conversion. Updated documentation. commit 43e16164cb7ec0d751c3fda881d5c9203edd4f80 Author: John Bowman Date: Sun Sep 25 21:56:47 2005 -0600 Fixed base alignment in new deferred TeX alignment scheme. commit fe5d5004425730bcc21219c5b11d67a2f535378b Author: John Bowman Date: Fri Sep 23 22:04:54 2005 -0600 Fixed shift(c) in 3d circle. commit 3265026ee25f6cd1305e8979e45e80e302ebac29 Author: John Bowman Date: Fri Sep 23 09:42:46 2005 -0600 Fixed "\\". commit 38a5b0c147988711a1c81c4add5c16014e63a0a0 Author: John Bowman Date: Fri Sep 23 01:15:56 2005 -0600 Added missing header. commit d1308e6a739f0adaf981ba90b2d318744afd6659 Author: John Bowman Date: Fri Sep 23 01:07:53 2005 -0600 Make merge use environment variable ASYMPTOTE_CONVERT. commit aedfd3263f31f033055e93799a651d7e11027069 Author: John Bowman Date: Fri Sep 23 01:02:48 2005 -0600 Added an environment variable for the location of every external command. commit 7e7027029f51071c7d3886ef32d34ff17f1445e2 Author: John Bowman Date: Thu Sep 22 23:54:43 2005 -0600 Added vectorfield routine and example. commit 3aa540f69ffce103a15046a8171dedaff62be26c Author: John Bowman Date: Thu Sep 22 23:23:39 2005 -0600 Added [inline] option to asymptote.sty to use inline LaTeX code instead of eps files, making LaTeX symbols visible to the \begin{asy}...\end{asy} environment. In this mode, Asymptote correctly aligns LaTeX symbols defined outside of the \begin{asy}...\end{asy} environment, but treats their size as zero. Added -t option to asy to request inline LaTeX code to be generated. Added modified dvipdf that accepts the dvips -z hyperdvi option. commit 5f8f76b720b722ddb20db9a99cf88c9ec7c18946 Author: John Bowman Date: Wed Sep 21 19:06:07 2005 -0600 Updated axis call. commit 10e4cb072c803e902938ed28f8e83a53cf85d411 Author: John Bowman Date: Wed Sep 21 17:58:34 2005 -0600 Replace system calls to rm/del by unlink(). commit cc1a8fec276e41d87ec44bea9fd1a62a3b40d751 Author: John Bowman Date: Wed Sep 21 02:32:44 2005 -0600 Fixed segmentation fault in straight. Fixed bug in setting straight flag in reverse. Fixed axis label placement for slanted (but straight) axes. Improved tick label positioning with slanted ticks. Simplified 3d axis routines; added autolimits function to implement 3d autoscaling. Don't cache Ticksize and ticksize. Standardized xaxis, yaxis, xequals, yequals calls (Label now appears immediately after picture argument). Check for empty pictures when drawing axes with ticks. Updated documentation and examples. commit 50fb9a5e9d19d59b826469d2092f3bcb86f5273a Author: John Bowman Date: Tue Sep 20 02:39:57 2005 -0600 Overhaul and major clean up of 2d graph module; to support 3d axes, partitioning is now done in tick value space rather than with respect to arclength. Added 3d graph axes (xaxis, yaxis, zaxis, and general axis) and generalaxis3 example. Format "" is now treated as defaultformat (use "%" to suppress labels). Updated gc to 6.6. Under MSDOS, change "rm" to "del" in merge utility. Don't print hints when there is no environment variable. commit da841cbe3ed981768a5b3a538c5034fe6b89b640 Author: Andy Hammerlindl Date: Mon Sep 19 22:53:49 2005 -0600 Added primitive import declaration. commit d1be7e398dbb104d9805583cfe4d3ab2a2e021f4 Author: Andy Hammerlindl Date: Sun Sep 18 13:11:25 2005 -0600 Removed menv from env. Simplified genv. Added load() to stack. commit c66d43934cafb628e4a901adba8feac35779b023 Author: Andy Hammerlindl Date: Fri Sep 16 09:36:50 2005 -0600 Fixed error reporting bug. commit af401fc11fe28f5eb6e9c1fbf8a8d97a94107c2a Author: John Bowman Date: Wed Sep 14 07:46:33 2005 -0600 Changed make to $(MAKE) for portability. commit 37527fbd0b818ae1e318a406256c9f53cc1cb4de Author: John Bowman Date: Wed Sep 14 01:25:28 2005 -0600 Changed nullpath to nullpath3 to avoid ambiguities. Set initial precontrol point and final postcontrol point of noncyclic paths to the corresponding node. Fixed the length of a cyclic path3. commit cc49900491763841bd0c518198e0994425bdc0cc Author: John Bowman Date: Wed Sep 14 01:17:44 2005 -0600 Added snprintf workaround for non-C99 compliant systems. commit c764e77e9f56e069c6025237580959db74c38bea Author: John Bowman Date: Tue Sep 13 09:49:18 2005 -0600 Added missing headers for Solaris/Sparc. commit cb492775d1aa6d57db89518d1b0195674d4c7577 Author: John Bowman Date: Mon Sep 12 19:47:44 2005 -0600 Fixed pair.z and triple.xx bugs. commit 765739db13af97ff1466278103aacaa6d753e1ee Author: John Bowman Date: Mon Sep 12 17:11:54 2005 -0600 Added some comments to graph.asy. commit 16d1381fc2b3e4d6447c6a59690a4c73b583dc9d Author: John Bowman Date: Mon Sep 12 13:40:40 2005 -0600 Optimized matrix times vector. commit 8398b1ea07e57578df9ddfd46c4bf9bd5627fa4c Author: John Bowman Date: Mon Sep 12 11:35:34 2005 -0600 Standardized perpendicular. commit 0b3affcd778551a39888d7258413c01d39fa5ec2 Author: John Bowman Date: Sun Sep 11 23:48:47 2005 -0600 Added 2d & 3d Metapost & operator (like --, but omits the duplicate point). commit 28f4d757bada480db359ee4d003ffe6cfe8b70fe Author: John Bowman Date: Sun Sep 11 00:34:52 2005 -0600 Fixed resolution problems of png figures in html manual. commit 52f67bd463a575127be62eb01e1784e9118c2fba Author: John Bowman Date: Sun Sep 11 00:04:12 2005 -0600 Reorganized installation instructions. commit d70a5b9c9f49e30555ad329e8440eda2ee212db0 Author: John Bowman Date: Sat Sep 10 23:33:39 2005 -0600 Handle errors due nonarray rest formals gracefully. Improved formatting. commit e48861de344a6305262c59e498a2536d91b87c6d Author: John Bowman Date: Sat Sep 10 16:10:36 2005 -0600 Updated list of errors. Changed make test to make check. "make all"/"make install" now build/install asy, asymptote.pdf, and man pages but not asymptote.dvi, asymptote.info, or asymptote.html (use make install-all if you want these too). Documented workaround for broken pdftex installations. commit c4ae0090e4795ba225b32ec40a6182eb3dd04ff6 Author: John Bowman Date: Sat Sep 10 00:38:55 2005 -0600 Removed scale(pair) in favour of scale(abs(z))*rotate(degrees(z)) to avoid confusion with xscale(z.x)*yscale(z.y). commit 5bf75dd48ece31999e8ccdf8f43cfa8f9923c822 Author: John Bowman Date: Fri Sep 9 23:58:11 2005 -0600 Don't cache MidArrow and Bar sizes. commit 63d12a1b39b9e0a85f5bf1582b8f140023ab0560 Author: John Bowman Date: Thu Sep 8 22:24:26 2005 -0600 More intuitive interface: perpendicular(pair z, pair align) now uses an alignment argument. Documented virtual structure functions. Updated documentation to emphasize that face is derived from picture. commit 07af5223c26d25a298cbc74b0f331e9fb0bfc00b Author: John Bowman Date: Thu Sep 8 10:38:27 2005 -0600 Updated Help section. commit 588d950082edb16d84e25be3cbe05e508a7b7752 Author: John Bowman Date: Wed Sep 7 12:13:36 2005 -0600 Updated documentation. commit 566985801e6c0016f03ade1e7db72b5dee3ae8e9 Author: John Bowman Date: Wed Sep 7 08:45:08 2005 -0600 Document structure inheritance. commit e4850df18d08b20a1a0031dc799a1da03d5791d4 Author: John Bowman Date: Wed Sep 7 02:22:17 2005 -0600 Fixed floating point exception problems in axes routines. Check for negative linetype arguments. Minor example updates. commit ee4a1841c89110ed62e8f397ac854e002a530da3 Author: Andy Hammerlindl Date: Tue Sep 6 21:40:47 2005 -0600 Changed indenting. commit 02117670c8e92b45396d72f7d75a66302fd5ff36 Author: John Bowman Date: Tue Sep 6 01:42:51 2005 -0600 Incremented version to 0.88cvs. commit 7381eb69cad5fee52307ccee7f9f5bb09e76d0d8 Author: John Bowman Date: Tue Sep 6 01:01:17 2005 -0600 Minor documentation updates. commit 8426dac2922f320c9369e3c3c879d3c546e7fa66 Author: John Bowman Date: Tue Sep 6 00:26:06 2005 -0600 Fixed cxx warning messages. commit bfa77f49f22c3c1a9905fc66f09218427754b879 Author: John Bowman Date: Mon Sep 5 23:59:01 2005 -0600 Added pen option to filltype to specify an interior pen distinct from the boundary pen. Removed Filltype in patterns in favour of a deferred filltype. Removed explicit size arguments from bbox (as done with shipout some time ago). Updated filltype and 3d documentation. commit 029d2e662b47c387ebebc13fc90260674c9043d0 Author: John Bowman Date: Mon Sep 5 22:01:25 2005 -0600 Implemented general hidden surface removal using a binary space partition. Fixed perspective and orthographic when camera is below the XY plane. Also added perspective(real,real,real) and orthographic(real,real,real) functions. Fixed draw((0,0,0)..(1,0,0)) and draw((0,0,0)). Added convenient 3d circle and arc functions. Added abs(triple) (equivalent to length(triple)). Added Longitude(triple), which ignores errors along +/- Z axis. Ported near_earth and conicurv examples from featpost3D.asy to three.asy. Added == and != for structures (equivalent to alias and !alias, respectively). For convenience, array push members now return the pushed element. Added missing shift in Label.out(frame). Updated documentation. commit 62289d14547a9a96b915e53bb87178dec28a8af5 Author: Andy Hammerlindl Date: Sat Sep 3 20:33:09 2005 -0600 Added permissions back in. commit 89b48c38495c92ae2108c6fa93735932b5177815 Author: Andy Hammerlindl Date: Sat Sep 3 14:05:22 2005 -0600 Added more testing. commit cc9711396b3d99f223d3ce58bb5bc2e3ea129dde Author: Andy Hammerlindl Date: Sat Sep 3 14:04:15 2005 -0600 Refactoring! - most #include "camp.tab.h" lines removed in favor of modifier.h - access now uses actions (READ, WRITE, CALL) to control encoding - fundef and newFunctionExp merged - name refactor, and it also uses actions - permission information moved to varEntry (but not in use yet) commit 8c465e2c865829415c1c60ddd084ec17e27dc73d Author: John Bowman Date: Thu Sep 1 15:26:50 2005 -0600 Moved surface to graph3. Added 3d analogues of 2d graph functions. commit c336fc6032e8eb6146f635de4dc5c5abf32f1150 Author: John Bowman Date: Thu Sep 1 12:52:52 2005 -0600 Added numerically robust quadratic equation solver. Added min(path3) and max(path3) functions. Simplified and documented 3d arc (analogous to 2d arc). Implemented path3 to guide3 cast. commit 72ab08a82b828d1868e45e295d12469115cf9529 Author: John Bowman Date: Thu Sep 1 02:12:51 2005 -0600 Added 3d intersect and dir functions. Added 3d arc function that is consistent with the usual circle approximation. commit 26441f264c21d9376c26c103b4a00d7d1b3d8ccc Author: John Bowman Date: Wed Aug 31 18:26:04 2005 -0600 Removed diagnostic. commit 5599da98c47e89d4ba0058ff96f2ebf53477d13d Author: John Bowman Date: Wed Aug 31 18:23:57 2005 -0600 Documented constructors; changed triangle.asy to use a constructor. commit 360bcfc43026cf5dddbc1692ef35b17b9d6cb28e Author: John Bowman Date: Wed Aug 31 16:58:55 2005 -0600 Fixed permissions for static functions in structs. commit 5279f696adb7332aabb12a394e0b5fcac02eb0c4 Author: John Bowman Date: Wed Aug 31 11:24:46 2005 -0600 Simplified path3 constructor. Added subpicture example. Fixed datagraph example. Minor documentation updates. commit 4f47e8440a219498412fce8e4721ea4f949c40a8 Author: John Bowman Date: Wed Aug 31 01:41:29 2005 -0600 Use same internal structure for path3 as for path, to facilitate port of various path.cc functions to 3d. Added subpath & associated functions. commit fcda858c92f5ca9c20a7ba421e94309fbf56691e Author: John Bowman Date: Tue Aug 30 00:07:16 2005 -0600 Expose Relative(pair) alignment function. Use arclength rather than length for determining default label position on paths. commit 43eb997c76185828eac94dfd1ad2498e2fc30fa9 Author: John Bowman Date: Mon Aug 29 23:24:20 2005 -0600 Added path3 type. Separated project into path3 conversion and projection. Added 3d arclength and arctime functions. commit cc0b4f16dd93c017221d7e082cf10bf012d1cb6c Author: John Bowman Date: Sun Aug 28 23:19:54 2005 -0600 For surface plots on a regular mesh, handle hidden surfaces from any camera location. commit b47a093a96a40b4d58c5fdf86b26b24dda3c2ac6 Author: John Bowman Date: Sun Aug 28 03:16:04 2005 -0600 Added Relative(real) and Relative(pair) functions for labelling paths relative to the total arclength and local path direction. Feynman updates (including new function texshipout); moved MidArrow and added MidArcArrow to plain.asy. Fixed optional position argument of BeginArrow, etc. Update documentation; simplified Makefile. commit 7e30a5847d91c0e08bfed33bd1d0f763f3929302 Author: John Bowman Date: Thu Aug 25 14:44:40 2005 -0600 Incremented version to 0.87cvs. commit b33c29486e4f7697ac6ff8444ac5641f7b8caaa7 Author: John Bowman Date: Thu Aug 25 11:43:04 2005 -0600 Fixed make clean. commit 5ce73d12c6f676e99e9dc392a00a9448c4a8ba77 Author: John Bowman Date: Thu Aug 25 11:35:32 2005 -0600 Fixed problems with make man. commit b8e26eb32eafc8a674fe7e6806ff9656da1839c3 Author: John Bowman Date: Thu Aug 25 11:14:51 2005 -0600 Incremented version to 0.86cvs. commit 0c5f16e4dbde2c1209a417db0a404596396b8705 Author: John Bowman Date: Thu Aug 25 04:10:49 2005 -0600 Makefile tweaks. commit 658c1b7f623d01f6ff7e454f621a819b51442af2 Author: John Bowman Date: Thu Aug 25 03:45:18 2005 -0600 Add hyperlinks to pdf manual; fixed margins. Use imdisplay for ImageMagick display under MSDOS. commit bac5cf8a82384218a78e1743b14c645c2698498a Author: John Bowman Date: Thu Aug 25 01:55:51 2005 -0600 ASYMPTOTE_DIR can now be a list of directories (separated by : under UNIX and ; under MSDOS). Fixed size_t errors. commit 2157ec961f63928fd95ef2b04fa11f851cc1ca66 Author: John Bowman Date: Thu Aug 25 00:38:31 2005 -0600 Added curl3 operator. Implemented 3d generalization of Hobby's Metafont angle calculation that is invariant to rotation and reduces to his 2d splines in the planar case. Removed 3d direction specifiers (no longer required) from circle example in surface.asy. Merged and simplified tridiagonal solvers. When writing paths, output direction angles in degrees. Handle null cyclic arrays. Added min() and max() members of picture to calculate the picture size to date. Updated documentation. commit e685b2a806c0c2bb1c8beda7ead479ae675807f9 Author: John Bowman Date: Tue Aug 23 10:40:35 2005 -0600 Diable automatic rotation of pdf files "based on the predominant orientation of the text on each page". commit 55914553c8440b7b4ac8e2423a5c080a22030948 Author: John Bowman Date: Thu Aug 18 20:24:56 2005 -0600 Include boundary conditions in solution of Dirichlet tridiagonal solver. commit 70a06b0b923c7911fa5fbf8427297b342b8ffa1e Author: John Bowman Date: Thu Aug 18 03:01:56 2005 -0600 Fixed special case of periodic tridiagonal solver. commit 040f50da4445fad17611025aa46b4f5f52bf782b Author: John Bowman Date: Thu Aug 18 02:27:01 2005 -0600 Allow cyclic indices only on arrays with virtual cyclic flag set to true. Added Dirichlet and periodic tridiagonal solvers. commit 94d5472306d9d06618fe428bb8f4c4af8d9566d1 Author: John Bowman Date: Wed Aug 17 01:33:03 2005 -0600 Reduce infinity for tension at least infinity on alpha platform. commit ed54c57b4095c29f9bce4658f313f8f1b23c08c7 Author: John Bowman Date: Wed Aug 17 01:10:37 2005 -0600 Make interactive help work in MSDOS. commit e7d2370d6993de8e00e153dc787cf0a3ab6f14be Author: John Bowman Date: Tue Aug 16 21:58:04 2005 -0600 Added online help option; exit is now a synonym for quit in interactive mode. commit e621bd70a3c91d65c111824db2f36ffe547a314b Author: John Bowman Date: Tue Aug 16 11:21:25 2005 -0600 Improved icon. commit e285c4e78b5b64f4f5a0f80de0eaa1fcd4ef95f7 Author: John Bowman Date: Tue Aug 16 01:37:41 2005 -0600 Fixed MSDOS build; improved icon. commit c3b7054be1c1f937277ac5dcc6c501e776013221 Author: John Bowman Date: Tue Aug 16 00:46:23 2005 -0600 Windows resource template. commit f251f15b694eff9573d0d2da2e3d8214feed9266 Author: John Bowman Date: Tue Aug 16 00:45:31 2005 -0600 Improved configuration; added icon for Microsoft Windows. Updated documentation. commit ef1855a10432ecd48f01762799ecb2044ced1085 Author: Andy Hammerlindl Date: Mon Aug 15 21:56:13 2005 -0600 Generalized bug fix in simplex. commit f2b4d285f723813d8a455af0ccd8145e1f56ece0 Author: John Bowman Date: Sat Aug 13 20:05:49 2005 -0600 Incremented version to 0.85cvs. commit 7b11142da66ef38ec197aa6902196c423fe2270d Author: John Bowman Date: Sat Aug 13 16:04:24 2005 -0600 Added compilation option msdos for producing Microsoft binaries. commit b222335e2e00d5d009e397b0293aa613880df4c1 Author: John Bowman Date: Sat Aug 13 15:23:33 2005 -0600 Removed obsolete file. commit 8a1308cfa9c96aa34e3b0549c9e9aa84f552ddfd Author: John Bowman Date: Sat Aug 13 14:29:43 2005 -0600 Workaround truesize=0 bug in simplex.asy. commit 8c3fb84711ff038d3cfdd98b660dc5fd0605261d Author: John Bowman Date: Sat Aug 13 02:14:40 2005 -0600 Added lattice gradient shading; check pen size in Gouraud shading to avoid segmentation fault. Copy data and palette arrays in palette.asy. commit 92d4165ebc6399b7e19ba73b0106714b55dc1a4f Author: John Bowman Date: Fri Aug 12 22:06:54 2005 -0600 Added 3d reflections. Swapped triple arguments of rotate(real,triple,triple) for consistency with the 2d reflect(pair,pair) syntax. commit 458ddeb5d1b31bd2b4521db28f3e73fd35a6d040 Author: John Bowman Date: Fri Aug 12 18:58:04 2005 -0600 Removed (size_t) array.size() casts as they are no longer needed. commit 8fd359bbc24b543bb02812ce022f16e9098f6bcb Author: John Bowman Date: Fri Aug 12 17:43:09 2005 -0600 Added support for Gouraud shading. Moved nullpath into plain.asy. commit d1124e20942c9936b8496aa81f556523578bd1ee Author: John Bowman Date: Fri Aug 12 14:01:12 2005 -0600 Cleaned up autosize code; more pair to align changes. commit 5b6bcc41a9a5592baceac64eeaa70a9b94432dce Author: John Bowman Date: Fri Aug 12 01:22:26 2005 -0600 Updated example; removed extra instance of defaultformat. commit 2278332d804f2eaf243134bd1ec2fd70667ca657 Author: John Bowman Date: Fri Aug 12 01:04:45 2005 -0600 Put label parameters in a structure called Label, to which a string can be cast, and which can be rotated and shifted (in Postscript coordinates). Updated examples and documentation. Fixed automatic sizing under picture transformation (particularly under rotation) and handling of an unspecified size in one direction (denoted by infinity). Added size(real Size) function that ensures each dimension is no more than Size. Added scale(bool) function for enabling or disabling autoscaling in both directions. Simplified 2d graph and palette code. Added begingroup/endgroup checks. Added array append method. Removed unused duplicate variable check code. Added virtual transform components and transform 6-tuple notation. Added pen and filltype to Legend. Removed labeldot(z) in favour of dot(Label,z). Removed labelbox and labelellipse in favour of box and ellipse. Removed labelxtick and labelytick in favour of xtick and ytick. Updated pstoedit support. commit 0712f98328d85a4b05e28ab7f8ec06fb826089c7 Author: John Bowman Date: Sat Aug 6 22:49:23 2005 -0600 Used cast from path to path[] (superpath) to simply fill and clip code. commit 6b60cb1c02e933391fe6fe71f250fbf4f06b4c76 Author: John Bowman Date: Sat Aug 6 09:18:40 2005 -0600 Remove .asy_input on exit. Disable display (which requires Xwindows) under MSDOS. Minor documentation updates. commit 471947f4346c6a081168c180d3860d0922f8ce35 Author: John Bowman Date: Sat Aug 6 02:26:52 2005 -0600 Added simpler helix example. Moved pticklabel to LeftTicks, etc., as the argument plabel. Added pTick and ptick pen types for drawing big and small ticks with different sizes, bool beginlabel and endlabel for suppressing first and last labels, and extend for drawing ticks across the graph (useful for superimposing a grid on the graph). Improved optional first and last tick/label suppression. commit 2979a61075d1158ef648fe7eddb18661dfaef4a5 Author: John Bowman Date: Fri Aug 5 00:11:15 2005 -0600 MSDOS environment variable tweaks. commit 20ffd949b7ba98ff8d14140b05d69bf9abecd6c2 Author: John Bowman Date: Wed Aug 3 21:19:47 2005 -0600 Fixed MSDOS interactive mode: the postscript viewer child process should exit, not return. Searching for an available postscript viewer is not possible in general (but the desired viewer can be specified with the appropriate environment variable). Added environment variable ASYMPTOTE_GS and drag and drop support. Make -V the default under MSDOS. Added -n (-noView) option. Updated documentation. commit fb19d535f3e2a4b7f6584e0b87433b251e9fee82 Author: Andy Hammerlindl Date: Wed Aug 3 00:40:41 2005 -0600 '' commit 37e9bb19a8f7caa9e0ef71df2d60ab936617256f Author: John Bowman Date: Tue Aug 2 16:56:01 2005 -0600 Port to MSDOS (via CYGWIN). commit 1818887efb3cdb3e028b0f916e85f17b5bbe6e52 Author: John Bowman Date: Sat Jul 30 18:06:58 2005 -0600 Removed unused file. commit 6bd7333155bf70bb3bbdb693c94232edb82c2268 Author: John Bowman Date: Sat Jul 30 18:05:56 2005 -0600 Changed operator :: and operator --- to loops. Simplified fill commands. commit b5520d7fa95220615fb9ef0b78d49ccbbf59b637 Author: John Bowman Date: Thu Jul 28 16:11:45 2005 -0600 Remove %%DocumentPaperSizes: comment inserted by dvips 5.95a. commit cea91fe4920c0a80d363ab8b9922f8a1bb6a8b08 Author: John Bowman Date: Sat Jul 23 20:44:32 2005 -0600 Simplified graph routines. Fixed nullguide3 problems. Began graph3d construction. Updated documentation and examples. commit 3b2bec7369e882e5503024872a5979ad911e63de Author: John Bowman Date: Tue Jul 19 01:21:19 2005 -0600 Updated menus. commit 914bb61f8d933fc7be05d8b3575332d8348abcde Author: John Bowman Date: Tue Jul 19 01:20:58 2005 -0600 Incremented version to 0.84cvs. commit e13ab6c7f082b61bb601f56fa8886aead6ec4e73 Author: John Bowman Date: Tue Jul 19 01:09:04 2005 -0600 Updated error test. commit 63130f923bc2c7e60dc603ab1b96213485b626c6 Author: John Bowman Date: Tue Jul 19 00:20:13 2005 -0600 Changed default angle for oblique projection to 45 degrees. Updated documentation. commit 2749b658316f1d55cabf53a1e04765f1a9f8cbc6 Author: John Bowman Date: Tue Jul 19 00:09:44 2005 -0600 Used existing internal function relativedistance for control point computations. Renamed path3 to flatguide3. Added tension3 specifier. Standardized 3d angles, rotations, and scalings. Added guide3 operator :: and ---. Added write(path[]) and write(guide3[]). Added helix example and updated documentation. commit 937788e4da1af9aea5db0b84b289d06b6513f2c6 Author: John Bowman Date: Mon Jul 18 12:17:33 2005 -0600 Determined correct signs in direction-to-control point calculation; propagate directions across nodes. commit 870b952575d525561fef879d8275535164f45e79 Author: John Bowman Date: Mon Jul 18 00:38:55 2005 -0600 Implement preliminary 3d direction to control point conversion. commit 1ded168026a740e8824a8bd26086cc5c9dbcb089 Author: John Bowman Date: Sun Jul 17 22:52:16 2005 -0600 Move math mode ($ delimiters) to within defaultformat string, to allow use of non-math mode fonts in tick labels (by providing a nondefault format string). commit 2c3bb514f504827b901d46d3a94ef5ebad7f4df7 Author: John Bowman Date: Sun Jul 17 19:20:33 2005 -0600 Fixed bug in string font(pen). Changed Angle(pair) to degrees(pair). Added Degrees(pair). commit 6f9dca898b83e9ff030ba468eddfcb1ac6965bae Author: John Bowman Date: Sun Jul 17 15:36:54 2005 -0600 Allow reading three-dimensional arrays in line mode by recognizing blank lines as block delimiters. commit 7127bd4200705f9633e0ed6347ebb1021abbe74f Author: John Bowman Date: Sun Jul 17 00:56:24 2005 -0600 Added pticklabel option for drawing tick labels with a different pen. commit cc966acccd13aa156df004d167a1d06d14f08fe4 Author: John Bowman Date: Sun Jul 17 00:02:10 2005 -0600 Added labelxtick and labelytick. Fixed tick size and shift in xtick. Updated documentation; added examples. commit 70508236ecc0b0c0ae77808bf78c4d3b855154bf Author: John Bowman Date: Sat Jul 16 19:25:01 2005 -0600 Fixed problems with autoscaling and unextended axes. commit 91bdd8bb360ed9e9e5a09865b3643cec1297582c Author: John Bowman Date: Sat Jul 16 16:11:52 2005 -0600 Renamed internal xequals and yequals routines to yaxisAt and xaxisAt. For clarity, renamed xline and yline routines to xequals and yequals. Added initializers. commit a6ee9fb43c363f80172e53212bc401986648ab90 Author: John Bowman Date: Sat Jul 16 15:27:57 2005 -0600 Disabled -laat while line-at-a-time mode is under construction (due to known segmentation fault). commit 5a6c23c6534033e74d0355aa973bdc6cca9383c3 Author: John Bowman Date: Sat Jul 16 15:25:11 2005 -0600 Added and documented remaining triple functions. Renamed Dot to dot and Cross to cross. commit 48bdb985c239e446172110af446483c9c7c54070 Author: John Bowman Date: Fri Jul 15 23:24:33 2005 -0600 Simplified three.asy; added oblique projection and ^^ operator. Added Metapost --- operator; allow :: to accept a direction specifier. Allow user-defined ++ binary operator (for consistency with -- binary operator). Minor knot velocity optimizations. Added surface example to documentation; updated cube example. Updated documentation; fixed cxx warning messages. commit f55c3d8ce0124a606e60f5a9afc7c80c85129228 Author: Andy Hammerlindl Date: Fri Jul 15 18:08:15 2005 -0600 Fixed crash caused by fixing previous crash. commit c9ee358dfb9c1d7d4649297684d3597b3a3cae38 Author: Andy Hammerlindl Date: Thu Jul 14 23:55:20 2005 -0600 Handle tensions in straight sections of paths as MetaPost does. commit f400a194bc43e83e554339a6fd37da12c6d34155 Author: Andy Hammerlindl Date: Thu Jul 14 23:36:10 2005 -0600 Fixed controls versus direction specifiers crash. commit c4dcf1344fd4a9456d9046f003bf523f1a604abd Author: John Bowman Date: Wed Jul 13 23:49:56 2005 -0600 Added array pop function. Give DIRTAG the same precedence as CONTROLS and TENSION. Added replacement :: for Metapost ... joiner (which selects an inflection-free path where possible). Added 3d direction specifiers, pending 3d conversion to control points... Added triple write and interp functions to plain.asy. commit 2199e1848a4967b147886dacc9ad31fa334092c4 Author: John Bowman Date: Wed Jul 13 12:43:04 2005 -0600 Formatting. commit 4c431fc643f1b1a7decc1cc4f4382f444bc37211 Author: John Bowman Date: Wed Jul 13 10:22:40 2005 -0600 Cleaned up controls. commit 3612779360607dc5917e9f4d02327d015c5e25ea Author: John Bowman Date: Wed Jul 13 02:25:08 2005 -0600 Renamed cycle3 to cycle. commit ac6d8ef05a0d6d73d6fec93449040fe18d80023d Author: John Bowman Date: Wed Jul 13 02:18:10 2005 -0600 Renamed controls3 to controls. commit 75d7070454393e590e98bd198bda1c9e210adb53 Author: John Bowman Date: Wed Jul 13 01:45:11 2005 -0600 Added controls3. commit 121f84f3c3e799a416d30c37275901945812d90d Author: John Bowman Date: Tue Jul 12 22:42:28 2005 -0600 Compute knot solving constants. commit 2b804bf9bd2b3d42cb81f2d97b5494fb99b55b83 Author: John Bowman Date: Tue Jul 12 22:41:55 2005 -0600 Fixed write(guide). commit 487442b4497cc979d325312e3968ee3b0dbb3dbf Author: John Bowman Date: Tue Jul 12 17:54:48 2005 -0600 Allow operator ::. commit becfe77e7d0810f52d278c8f359b6f81e43d8c2c Author: John Bowman Date: Tue Jul 12 14:51:53 2005 -0600 Added explicit check for readline remove_history. commit d65281af33667616aa7fa507e0fb586b2f02de24 Author: John Bowman Date: Tue Jul 12 14:29:30 2005 -0600 Readded installation hint about ancient readline versions. commit cea008852e9f7696fbf067f88ca61d4a212f98d2 Author: John Bowman Date: Tue Jul 12 01:33:20 2005 -0600 Fixed lookAtOrigin. commit 8873f0e6c0a6b6e000834b05aa2e40624fd4f34b Author: John Bowman Date: Mon Jul 11 23:40:32 2005 -0600 Updates to triple and three.asy. Removed unused code. commit c4bb1e07b019f9d20ca4b45f5c3b30a594bf6ead Author: John Bowman Date: Mon Jul 11 17:51:26 2005 -0600 Replaced vector by triple. commit ec576c536aa71d8f61ab36bbd4f70d9609dd71ab Author: John Bowman Date: Mon Jul 11 13:40:51 2005 -0600 Fixed casting error message. commit 2fcfc38e0b95f9389006e17a4db7c5669109b23a Author: John Bowman Date: Mon Jul 11 09:03:05 2005 -0600 Added triple type. commit 8d3006e7e73ca5749593afda62137897b1813df9 Author: Andy Hammerlindl Date: Fri Jul 8 18:07:10 2005 -0600 Graphing tests. commit df0b3e8906aea47212a01d8de43913cac4508eb4 Author: Andy Hammerlindl Date: Fri Jul 8 16:19:37 2005 -0600 Moved laat diagnostic. commit 8482bd7fc31e98344535b1b255cdc4bb7d54a28d Author: Andy Hammerlindl Date: Fri Jul 8 12:23:29 2005 -0600 Proof-of-concept code for true line-at-a-time mode. commit 5070a16600ca4489ebd6010252314d197bd52137 Author: John Bowman Date: Thu Jul 7 16:32:43 2005 -0600 Removed path to pair[] ecast. commit 85c5b9fbf6e1873dcbda8abee85821ef2bc7f1c1 Author: John Bowman Date: Thu Jul 7 14:51:54 2005 -0600 Updated example. commit 702b88ea4ed4a7c2774478ef6e2742de37d25891 Author: John Bowman Date: Thu Jul 7 14:51:10 2005 -0600 Removed explicit pair[] to guide casts in favour of operator --(...) and operator ..(...). commit f12122d7d697977227a55006a6ec0fe7c9c67aaa Author: John Bowman Date: Thu Jul 7 10:40:14 2005 -0600 Fixed default CFLAGS. commit ec04162a4cc57c28005b546366116fbd6b5fff66 Author: John Bowman Date: Thu Jul 7 09:42:18 2005 -0600 Fixed CFLAGS. commit 897655354414af0004023922f087b59e87359078 Author: John Bowman Date: Thu Jul 7 01:42:09 2005 -0600 Updated documentation. commit 96e8dcbefd26513ad7756819b82c620226afbe01 Author: John Bowman Date: Thu Jul 7 01:37:36 2005 -0600 Fixed error in CFLAGS. commit dc004fc8fc0e3827128b836efd9770149697f75e Author: John Bowman Date: Wed Jul 6 20:21:56 2005 -0600 Added implicit pair[] to guide and guide[] casts and explicit path to pair[] casts. Removed unnecessary guide=nullpath argument from graph calls. Renamed LinearInterp to Straight, to correspond to straight(path). Updated nullpath documentation to correspond to new solver. commit 435bc11e0ccd480cdd8e8d7777900a0188de1f2e Author: John Bowman Date: Wed Jul 6 14:50:50 2005 -0600 Removed -version command-line option to avoid ambiguity with -verbose (so that -vv, -vvv etc. will still work). commit 0e1511db2c1e2eb2c28ef6effc3843096c7c014c Author: Andy Hammerlindl Date: Wed Jul 6 09:11:39 2005 -0600 Change NOHASH to use #ifdef. commit d308e9c9ff7ff074165aea3052dbb7aedd353675 Author: Andy Hammerlindl Date: Tue Jul 5 21:26:42 2005 -0600 Three dimensional drawing routines (in development). commit 961c33b0a6cc451667a38b325a511817dc5f5524 Author: Andy Hammerlindl Date: Tue Jul 5 14:25:56 2005 -0600 Join operators now use rest arguments. Fixed a bug in solving empty guides. commit c8462c291d2bab76c1326b5eb6dbc3aaeb0f3d7f Author: Andy Hammerlindl Date: Tue Jul 5 14:24:33 2005 -0600 Combined duplicate code for function defitions. commit 5fbc0b1206bda3f047061e003363da1258804277 Author: John Bowman Date: Mon Jul 4 16:36:50 2005 -0600 Minor documentation updates. commit 9b3476a73d77e000535e974dcdd12012ac1aff8c Author: Andy Hammerlindl Date: Mon Jul 4 11:46:43 2005 -0600 Added back venv::list(). commit b5cde48655d6783eb11682d4a4c93a5021004fcc Author: John Bowman Date: Sun Jul 3 10:16:43 2005 -0600 Added -version command line option. commit d683279f3e5644e1b32f308afc423577e6cfc0e4 Author: John Bowman Date: Sun Jul 3 00:12:58 2005 -0600 Incremented version to 0.83cvs. commit 36064f240706d61dce609de902b06784eb5078ef Author: John Bowman Date: Sat Jul 2 23:02:03 2005 -0600 Updated man page. commit 747b96aed8fa04a140c571d59ef5af95aaca7cad Author: John Bowman Date: Sat Jul 2 22:51:28 2005 -0600 Fixed cxx warning messages. commit c67298c4406af9fa1911e77e25e125b86bb99125 Author: John Bowman Date: Sat Jul 2 22:16:17 2005 -0600 Added -d command-line option to produce extra debugging messages (currently only "named argument may be mistaken for assignment" warning). commit 3d07163a7e068e678aa0cdc012cc69688fb1e0a5 Author: John Bowman Date: Sat Jul 2 21:39:27 2005 -0600 Added arrow option to axes routines. Renamed xlabel and ylabel back to labelx and labely, respectively. commit 8615b39fd4b63a3f6e0e083feb68e2f061d2250c Author: John Bowman Date: Sat Jul 2 16:07:35 2005 -0600 Revert last changes. commit 5a0a45dbd3f057b31fd856b0022f3285ac0a004e Author: John Bowman Date: Sat Jul 2 15:46:09 2005 -0600 Fixed more cxx warning messages. commit 5a14e04b0be64ba665efaf985917eb0b889714f0 Author: John Bowman Date: Sat Jul 2 14:23:42 2005 -0600 Added configure option to detect ext/hash_map and set -DNOHASH accordingly. Fixed cxx warning messages. commit 68032946b747b4dfd1b5e3913a77e33acce913a7 Author: John Bowman Date: Sat Jul 2 12:11:44 2005 -0600 Standardized xtick and ytick routines. Renamed labelx to xlabel and labely to ylabel. commit f3eaf91cbf09737e1c02a6f63c442b03c6bbed0b Author: Andy Hammerlindl Date: Sat Jul 2 11:45:31 2005 -0600 Added NOHASH option to compile on non-gcc compilers. commit 712ee95f04440fc4cea116da8859d056a7e7b6e1 Author: Andy Hammerlindl Date: Sat Jul 2 09:55:32 2005 -0600 Excised from exp.h so that dec.h includes less. commit d41caf49827f36ba3bd2757b6b66a98102e5751b Author: Andy Hammerlindl Date: Sat Jul 2 09:49:23 2005 -0600 Allow dimensions for types in cast expression. commit 98392f1425dc4b258e1c6330d04ce408b0f44a72 Author: John Bowman Date: Sat Jul 2 03:24:05 2005 -0600 Added ability to specify custom tick locations. commit 99ec8fe50925985c7af8f279ed5cfc0ac5b60ae9 Author: John Bowman Date: Fri Jul 1 22:58:28 2005 -0600 Fix warning messages when XDR is disabled. commit 6cc9aff28f9f93fe8f0b7a186f0b0c151908be3f Author: John Bowman Date: Fri Jul 1 22:57:53 2005 -0600 Added more default initializers. commit 263a62cab3e21ffcadb3321b88e1e670ffdee4fb Author: John Bowman Date: Fri Jul 1 18:30:30 2005 -0600 Allow explicit casts to any name. Documented general implicit and explicit casts. commit 93c022eba77fe64edf81f3e1bf1ca6dff9a57edb Author: John Bowman Date: Thu Jun 30 22:57:13 2005 -0600 Documented named function arguments and rest parameters. commit 86ce95c91b1969c3dc687ca24c9c9ceeb17bc3a3 Author: John Bowman Date: Thu Jun 30 20:34:33 2005 -0600 Fixed warning messages; updated bison patch to bison-2.0a. commit d6c19397b1f035d6bc16efa94a8bf41065104b5f Author: John Bowman Date: Thu Jun 30 16:45:32 2005 -0600 Fixed more warning messages. commit 69027f1cd60cee0999ce6bdc9ca17657ff383a85 Author: John Bowman Date: Thu Jun 30 16:42:23 2005 -0600 Fixed cxx errors and warnings. commit a45db697f1d4628d213fc4a9966be95f1319b3e3 Author: John Bowman Date: Thu Jun 30 16:38:14 2005 -0600 Replaced strdup by strcpy. commit 324616f76ed6760212d89eb575aee654b58e4a99 Author: John Bowman Date: Thu Jun 30 12:41:57 2005 -0600 Renamed nullframe to newframe. commit 973f076227f1f9feb36b6cfc10e5d3a66c8d4d76 Author: John Bowman Date: Wed Jun 29 21:04:53 2005 -0600 Fixed memory leak and segmentation fault in fileio garbage collection. commit 65ba1202445428f21aa01072764d1331d581e231 Author: John Bowman Date: Wed Jun 29 20:58:11 2005 -0600 Renamed write function keywords. commit 7687aaf40c4c43f14f9b6a38fc347d9347759250 Author: John Bowman Date: Wed Jun 29 10:15:51 2005 -0600 Extend use of operator init(). commit 7bbc7ffd8f0926263ebe3dcdf3bb533c4211b661 Author: John Bowman Date: Wed Jun 29 09:59:15 2005 -0600 Added default initializer to picture; removed "=new picture" from examples. Documented operator init(). commit 40f98c94b8eebb8d980e1e5a1cb91826b8f074f3 Author: John Bowman Date: Wed Jun 29 09:11:58 2005 -0600 Removed ticksT tag. commit 7f8a16c28ede11e3d766c0076388a9e83f083a9a Author: John Bowman Date: Wed Jun 29 00:38:20 2005 -0600 Fixed memory leak in locateFile. commit 999724c552b1bc6decc328ef2bf7d5e6149e65ff Author: John Bowman Date: Tue Jun 28 16:16:00 2005 -0600 Removed unnecessary semicolons. commit 6a7bafe452621d0d92af547a3d180c5eaf840734 Author: John Bowman Date: Tue Jun 28 15:56:58 2005 -0600 Added virtual destructor. commit 42c406e577ba81982d7cc1e73c1543b55e8d192f Author: John Bowman Date: Tue Jun 28 15:53:29 2005 -0600 Added virtual destructors. commit 06a72c88aae59f5fca97df49c883053519a0eec9 Author: John Bowman Date: Tue Jun 28 14:49:30 2005 -0600 Remove xsize, ysize, and keepAspect from shipout, in favour of size(). commit 6221960d98b1eaacaa0b62a11fa58671218afa15 Author: John Bowman Date: Tue Jun 28 13:58:03 2005 -0600 Added -lgccpp also with --enable-gc=system. commit 0c8071fb5b46edc79cb7eac9b95137efe9c2b9cc Author: Andy Hammerlindl Date: Tue Jun 28 10:12:57 2005 -0600 Put reverse functions back in. commit ef73fd797e874069cb3bae12142687f5664b25bd Author: Andy Hammerlindl Date: Tue Jun 28 10:01:21 2005 -0600 Results of type overhaul: - venv now uses a hashtable to quickly look up variable of a specific type - initializers and casts are now functions in the environment - matching arguments to signatures handled by application class - (side-effects of) expressions are evaulated left-to-right - exp::trans(e, target) split into transToType (which implicitly casts) and transToType (which doesn't) - added keyword and rest arguments - added formal class to types commit 30360c059eb668792eede35aa7e70cc9795fc024 Author: John Bowman Date: Sun Jun 26 16:51:59 2005 -0600 Work around spurious uninitialized warning message under gcc 3.3.3. commit 1fab77145419b3a8c293886316cf0615aa479a31 Author: John Bowman Date: Sun Jun 26 10:51:17 2005 -0600 Code cleanup. commit 7c1f4b8c287ed51690f8f58a72c21475c73e66e7 Author: John Bowman Date: Sun Jun 26 08:43:12 2005 -0600 Allow use of single quotes to prevent system command word splitting on spaces. commit e7d84297b6fa78065f7aec133561e091d4fb0dc9 Author: John Bowman Date: Sat Jun 25 15:49:08 2005 -0600 Fixed bug in fill, due to a numerical precision issue, which shows up with g++-4.00 under optimization. Removed unused routine and declarations. commit b8c2076390a55d40feadb3582c36f6b58d0401b9 Author: John Bowman Date: Sat Jun 25 14:11:19 2005 -0600 Removed unused virtual destructor. commit e5e0222dc27968c1bc861bcf8eddb1824f058464 Author: John Bowman Date: Sat Jun 25 12:33:59 2005 -0600 Simplified tag handling. commit eb5c02ce2b1c8bedee35969a01ead70a9f1aad63 Author: John Bowman Date: Sat Jun 25 00:14:38 2005 -0600 Replace OverwriteT with integer variables. commit 53be12a2dc5107723d622b2dbb5d0adeba1a02fe Author: John Bowman Date: Fri Jun 24 18:58:34 2005 -0600 Simplified coding of endl and tab qualifiers. commit 786d08c54af70163a90e5b3c749ee9f66fafb2e0 Author: John Bowman Date: Thu Jun 23 16:34:34 2005 -0600 Incremented version to 0.82cvs. commit fc3936487524cb3f3b9c3db37dae58da1088be18 Author: John Bowman Date: Thu Jun 23 16:08:48 2005 -0600 Fixed indentation. commit bf638882197f630bc059f313818257b5e55e3ba0 Author: John Bowman Date: Thu Jun 23 15:55:47 2005 -0600 Fixed g++-4.0.0 warning messages. commit ce9963563164d53e3e56606107fc7ec2d8f8242b Author: John Bowman Date: Thu Jun 23 15:54:46 2005 -0600 Fixed cxx compilation error. commit 228fb9f82473fc672420fc8ad15818fc6002ca60 Author: Tom Prince Date: Thu Jun 23 00:45:25 2005 -0600 Cleanup headers. commit b0ce04a0381fd68e46b89e9640008521ed78d268 Author: Tom Prince Date: Wed Jun 22 23:53:11 2005 -0600 Maybe fix GC on darwin. commit 1aca5cb33094f702c4cbba83c8025b88a8db37c3 Author: John Bowman Date: Wed Jun 22 10:54:03 2005 -0600 Replaced writeP in favour of write; added writen entry points for pen, guide, and transform. commit 4aad24ec76db0bcdf85c20c8853dd32d7faf21b8 Author: Andy Hammerlindl Date: Wed Jun 22 10:16:11 2005 -0600 Fixed solving bug. commit 9047174da0fda3e36f2e661e17bf2fb30e821440 Author: John Bowman Date: Tue Jun 21 22:27:52 2005 -0600 Allow graphs with just one data point. commit a4a3810378e465f5512a6b89ac1d248391203947 Author: John Bowman Date: Mon Jun 20 17:03:14 2005 -0600 Feynman updates. commit 0ff48d1cb5a153e4809622ca1c5ddd5d5c834550 Author: Tom Prince Date: Sun Jun 19 23:18:55 2005 -0600 Split up inst.h. commit b3a216a59ca9b04ae5e0f6dbcf4071a9b52fe034 Author: Tom Prince Date: Sun Jun 19 17:53:14 2005 -0600 gcc4 is more const. commit a5ef2fede293c3b425acae8925c611a25c5db257 Author: John Bowman Date: Sun Jun 19 14:16:22 2005 -0600 Incremented version to 0.81cvs. commit 7640c06a07aa590c86937edda50221b828d92fde Author: John Bowman Date: Sun Jun 19 12:08:27 2005 -0600 Upgrade to use Boehm gc6.5 garbage collector. commit 8b0c625a0bf30a0a6d3420408728b3efd9e028b5 Author: John Bowman Date: Sun Jun 19 11:43:34 2005 -0600 Tom's patch to pool segmentation fault. commit 0b4f978f5be4ce481bc36324ce3f9d576c387a9b Author: Tom Prince Date: Sat Jun 18 10:44:58 2005 -0600 Remove obsolete maxStackSize. commit 5ef2d397015ca2b23082eb3b21e20f3862cc7ff1 Author: John Bowman Date: Sat Jun 18 10:27:49 2005 -0600 Deep copy all members of picture. commit 7ca2c12fb5c00511a1d6be5b068c7f74c94a5c06 Author: John Bowman Date: Sat Jun 18 09:59:39 2005 -0600 Quick installation instructions. commit c8bab82babbbe7ca95ca0ebbbfafb8359bdcd87d Author: Tom Prince Date: Sat Jun 18 00:28:36 2005 -0600 Tests. commit 5a3eb6b5360d49f43b8d3a9840117fb6a0457d3d Author: John Bowman Date: Fri Jun 17 23:35:20 2005 -0600 Incremented version to 0.80cvs. commit 659f7d3d6a4e5876c2d7d60a229aa2ec240a2c49 Author: John Bowman Date: Fri Jun 17 22:49:15 2005 -0600 Removed unused features. commit 3e206225f18b9cea342971f9d80cd49b87dad499 Author: John Bowman Date: Fri Jun 17 22:32:31 2005 -0600 Fixed cxx warning messages. commit ae029118e4eeb265e8e7ed33745b973a718c6a90 Author: John Bowman Date: Fri Jun 17 22:06:19 2005 -0600 Check for empty picture in secondary axes routines; added another example of a secondary axis. commit e991c4e70ea5cd8b054c959aab9d7f8fb80b5a40 Author: Tom Prince Date: Fri Jun 17 21:27:16 2005 -0600 Automate testing. commit 7170cdbcd547faac66e18d7338f5bc2ef3ecd5c6 Author: Tom Prince Date: Fri Jun 17 21:21:51 2005 -0600 Change vm::program to holds insts directly. commit 8d97404395b2f98c5e2c68c15b089d761b8b0d01 Author: Tom Prince Date: Fri Jun 17 21:20:48 2005 -0600 Compile genrun.cc seprately. commit 133bca6f546e881329dcedc281fbbe54e07657e5 Author: Tom Prince Date: Fri Jun 17 21:19:51 2005 -0600 Move vm interface to vm.h. commit 908662091c942dfdee84c686e122b3240fa4b13e Author: Tom Prince Date: Fri Jun 17 18:48:32 2005 -0600 Properly collect fileio. commit 7391769e36b96247ffa6ba708e7a4c76605032e0 Author: Tom Prince Date: Thu Jun 16 00:20:47 2005 -0600 item handles GC allocation. commit d03ea3fd7b84cb06f37cab421ea4c54c6e01ea94 Author: John Bowman Date: Thu Jun 16 00:12:16 2005 -0600 Readded 2005-05-26 fix for substr bug. commit a5dd9570b514d7c944f2c29264a9c4b430a24561 Author: Tom Prince Date: Wed Jun 15 23:47:13 2005 -0600 Make evrything use GC (except fileio). commit 879010025056803e415fb28e6bcbe2cfb9180e20 Author: John Bowman Date: Tue Jun 14 22:33:17 2005 -0600 Don't allow a picture to be added to itself. commit 814f0cd08ae74f5621277a9e6a1683693fc3dc51 Author: John Bowman Date: Tue Jun 14 20:30:06 2005 -0600 Backported recent castop.h change to g++ 3.3.4. commit 929a119630125233503a1aa11e335ea3013f8d9a Author: Andy Hammerlindl Date: Tue Jun 14 15:23:42 2005 -0600 Added getType caching. commit 5663c6136190c2ad9c1dd9037b6509fd1977d2dc Author: John Bowman Date: Mon Jun 13 10:28:09 2005 -0600 Reverted gc/gc.h change back to gc.h. commit df6c338131f8dbc1aabbb47f3ba3e34ca55a9201 Author: Tom Prince Date: Sat Jun 11 14:04:12 2005 -0600 Test collecting pens. commit 666663e0b88bbfaffef0e1f37bfb4274a6d89b18 Author: John Bowman Date: Sat Jun 4 13:51:44 2005 -0600 Document type1cm. commit b2a9d4f54135f117e09ddb79cbdc97180a0b6762 Author: John Bowman Date: Tue May 31 23:33:39 2005 -0600 Fixed autoscaling of scaled axes, e.g. Linear(x) with x != 1. commit c12f36fff471f47ccd94d6778f57c673426eeb42 Author: John Bowman Date: Sun May 29 10:06:31 2005 -0600 Added asymmetric Pythagorean tree example. commit 6c9ce87dee6a8700af83fda8b70dc1e78671f170 Author: John Bowman Date: Sun May 29 10:05:48 2005 -0600 Added aSin, aCos, aTan functions. commit 4fd7e3e1ab590d46384fb3e7e13d7bba5008165c Author: John Bowman Date: Fri May 27 16:33:21 2005 -0600 Changes for Debian port. commit 3688cbe0fcfe962cbdbb893b2161fcb293b04f88 Author: John Bowman Date: Fri May 27 15:41:56 2005 -0600 Fixed memory leaks. commit 4804e27a5a9ad3bca0830b384de9b59ed4337818 Author: John Bowman Date: Fri May 27 02:16:14 2005 -0600 Fixed memory leak. commit 4c22b96cea1ca707525c68d06399209dab20f701 Author: John Bowman Date: Fri May 27 00:44:19 2005 -0600 Added Tom's remaining garbage collection changes. commit 8b4e56cc1919f5bb9cc200880bf342710b7340c6 Author: John Bowman Date: Fri May 27 00:09:58 2005 -0600 Garbage collect files on explicit closure and at exit. commit 1043dd6738f0854a18eb06ae2f23049170dafeb2 Author: John Bowman Date: Thu May 26 09:55:30 2005 -0600 Fixed substr bug. commit 1d2aba32ccbe2ffe8d98e63f141aa9135fe3c84f Author: Andy Hammerlindl Date: Fri May 20 10:48:54 2005 -0600 Changed wording in comments. Indenting. commit f78764d8575f157d65c3fb29a57402fdb0f84b3a Author: Tom Prince Date: Thu May 19 23:45:26 2005 -0600 Use mem::string during runtime. Make encode(inst) private. item.h calls new(UseGC). commit 44d7d2eb8118d63d6677640b93df55a686e15876 Author: John Bowman Date: Thu May 19 10:16:48 2005 -0600 Incremented version to 0.79cvs. commit 06ba32ea3cc72df31457fd4cf7251b84afdbb1bd Author: John Bowman Date: Thu May 19 09:15:54 2005 -0600 Disable GC_STRING for now. commit 93e05817f8eacffccf61024f8184a1e174e61b70 Author: John Bowman Date: Wed May 18 23:27:15 2005 -0600 Port to cygwin. commit 05ef90f1dc3f03dcbf91ed112b637ff8ef3b2ff5 Author: John Bowman Date: Wed May 18 14:34:42 2005 -0600 Move file back under control of memory::managed to ensure deconstructor is called. commit 732b7af7652ff7aadd0ff33d677c7991966a4c43 Author: Tom Prince Date: Wed May 18 12:41:26 2005 -0600 Use item for everthing in inst. commit 2b9de84a90affbcca034cd53151e420ee22b68d2 Author: Tom Prince Date: Wed May 18 12:37:44 2005 -0600 Define mem::string. commit 47eb80b05a3c6f3f2d8279dcca3bd44268412840 Author: Tom Prince Date: Wed May 18 12:36:17 2005 -0600 Use coder::encode everywhere. commit 7ca4fa121bcc6842b5242c6fd021a9e26e1a5b0f Author: Tom Prince Date: Wed May 18 10:50:31 2005 -0600 Cleanup memory.h. commit 2fb95aa9a09de3f07dca638d5075e2c9a875f15b Author: John Bowman Date: Wed May 18 09:17:32 2005 -0600 Changed index to strchr for cygwin port. commit ee106d42346f159b5c4a04f9479182ff967f4fc0 Author: John Bowman Date: Wed May 18 09:17:09 2005 -0600 Fixed LIB. commit d0caf2dc14550c4cd0586c7ba95fea9a00cd5ff8 Author: John Bowman Date: Sat May 14 22:29:43 2005 -0600 Check headers earlier. commit baf991ce70cf496154b3806d230714407d80480d Author: John Bowman Date: Sat May 14 22:26:46 2005 -0600 Make --enable-gc=system also check for gc.h. commit 89e15737ee45fd6b2a82a3b6903eb5398a2d11e6 Author: John Bowman Date: Thu May 12 15:56:27 2005 -0600 Workaround "GC Warning: Repeated allocation of very large block" messages. commit dd8ec509559e108b1195377e0cfba98618aff5e3 Author: John Bowman Date: Thu May 12 15:54:42 2005 -0600 Fix NaN handling. commit a6b8695d6aa652eb4185556bee518f8b145f4077 Author: John Bowman Date: Thu May 12 08:56:42 2005 -0600 Better checkaxis test. commit 3e04076b94e311a46ae4b3a0d1e22c2bc66bb273 Author: John Bowman Date: Wed May 11 22:07:40 2005 -0600 Added --enable-gc=system configuration option to use system libgc and libgccp. commit 52a42f6f9e35ea0f38222059e4ccfdbf66b0fe85 Author: John Bowman Date: Wed May 11 03:52:11 2005 -0600 Define traceable_allocator when garbage collection is disabled. commit edd6882d84f7f5b11ddc95614016c7d2f4619ea4 Author: John Bowman Date: Tue May 10 21:52:35 2005 -0600 Added binary search routine. commit ab8884bd75e11e48bf10ce36008affb9202c5cce Author: John Bowman Date: Tue May 10 16:34:50 2005 -0600 Incremented version to 0.78cvs. commit 880ffa76cda64193d3999d076cfe05be83921d00 Author: John Bowman Date: Tue May 10 14:56:30 2005 -0600 Recommitted changes: 2005-05-10 rtprince commit 81b45f905368cd0f8cc87f42d14e132a4154a7de Author: John Bowman Date: Tue May 10 13:56:23 2005 -0600 Revert broken changes: 2005-05-10 rtprince. commit aa6798bedb31788d8a41e5aef90a45e0fd45283f Author: Tom Prince Date: Tue May 10 12:36:42 2005 -0600 Make CVS -lgccpp clean. commit 99948123780c9eddf2e553e818d116a3a5b20cd8 Author: Tom Prince Date: Tue May 10 12:31:32 2005 -0600 Make item use new(UseGC). commit f283b6b03b888608633d18b169ad15ef749507e4 Author: Tom Prince Date: Tue May 10 11:43:15 2005 -0600 Add some tests. commit f338d6ca188330b5a06160a0d393777fb63ae742 Author: John Bowman Date: Tue May 10 11:16:21 2005 -0600 Renamed example. commit 15e66f6f42b64b39deb1df4bffdeb8c4c1bd66ce Author: John Bowman Date: Tue May 10 04:37:53 2005 -0600 Distribute Boehm GC as a separate package. commit 5c9d00f9e02c175e3db240726725e35ae5facf06 Author: John Bowman Date: Mon May 9 23:08:51 2005 -0600 Fixed error in map & multimap. commit d84ef94ce525b66d05d864e5bbe76c014962f520 Author: John Bowman Date: Mon May 9 22:49:00 2005 -0600 Fixed parser leak again. commit e4f9e737d32b0e29b61e29ee7144a0c305be8766 Author: John Bowman Date: Mon May 9 21:57:44 2005 -0600 Fixed broken draw call. commit cde542ef8dc261e00c389e94c4fe0703b89686d9 Author: John Bowman Date: Mon May 9 16:41:16 2005 -0600 More gc string updates. commit 915f14d3423c86ceb4f974b2254f23eddba0129b Author: John Bowman Date: Mon May 9 16:22:25 2005 -0600 Unused file. commit 2b6d60c72af8208812baa28d45c3fed5d03bb057 Author: John Bowman Date: Mon May 9 14:01:57 2005 -0600 Handle out of memory errors gracefully. commit 6cd09e17608cc0276c7106d4fb84f83642b1ca03 Author: Tom Prince Date: Mon May 9 13:22:55 2005 -0600 list is from mem::. commit a2ead4f31103e6e2bdabd1217e5a650bee12ecbf Author: Tom Prince Date: Mon May 9 13:17:32 2005 -0600 Make theStack be mem::deque. commit 5131270c76da87b1f7691b10716c3fde47172d2c Author: John Bowman Date: Mon May 9 10:25:33 2005 -0600 Fixed segmentation fault. commit e66a390c9622e6e64fb1e2a8e1f759afffec290a Author: Tom Prince Date: Mon May 9 05:24:22 2005 -0600 Dont gc non-heap string. commit 0827cba25c7b3504b0cd28b750fc22872757f14c Author: Tom Prince Date: Mon May 9 04:58:00 2005 -0600 Fix makefile. :-( commit e7ad2436de51081564fc88f024b777d693d0c325 Author: Tom Prince Date: Mon May 9 04:56:30 2005 -0600 More gc fixes. commit 5638fbc8b10ad075f66c6bc4037167cf27a28253 Author: Tom Prince Date: Mon May 9 04:34:48 2005 -0600 GC fixes. We dont need mempool. commit a6f50a5ffba0293743b22f668e29c3d52ff3214a Author: John Bowman Date: Mon May 9 03:10:23 2005 -0600 Fixed cxx errors. commit 90060506b1d924116630f43c068f353c43da0c44 Author: John Bowman Date: Mon May 9 02:58:55 2005 -0600 Fixed memory leak in parser and translator. Cleaned up interface to the Boehm garbage collector. commit eff11626bd6dbdc7f4defa3c8597b0bca050592b Author: John Bowman Date: Sun May 8 23:06:28 2005 -0600 Revert 2005-05-09 and 2005-05-08 rtprince changes. commit df3f6816117919c0c9c6c80390956f79df6aad9b Author: Tom Prince Date: Sun May 8 22:16:41 2005 -0600 Fix picture. commit 5770ab65dbc40a56339d22a45cfa6e6174241d78 Author: Tom Prince Date: Sun May 8 21:24:28 2005 -0600 Fix item gc handling. commit 399af8081afc712686314e2ca99584d3fa158023 Author: Tom Prince Date: Sun May 8 21:12:42 2005 -0600 Collect path. commit 6fcf5fda6460ff8048649146d1e92ba4f6306c04 Author: Tom Prince Date: Sun May 8 20:35:08 2005 -0600 Collect transform. commit 8c2eff54bf17ac051dca66442c8b6cd61641e76b Author: Tom Prince Date: Sun May 8 19:56:00 2005 -0600 Create gc_atomic, and make picture use it. commit bc9d351f1e202c481fca3135307ca5895a22e2d7 Author: Tom Prince Date: Sun May 8 19:37:29 2005 -0600 Make pen garbage collected. commit a76ec0dcb389fc456cf186a06885898e1ec40002 Author: Tom Prince Date: Sun May 8 19:34:56 2005 -0600 Make picture and drawElement garabage collected. commit f5980293fd7720f87bfd6184fa0b14e5c4665887 Author: Tom Prince Date: Sun May 8 17:11:34 2005 -0600 Add gc for vm only. (untested) commit f222adf318f319d54cba8c227c5ae840411a021f Author: Tom Prince Date: Sun May 8 17:01:19 2005 -0600 We don't want libgccpp. commit 2fceb9286c372d9123e41fc088664e444a5ea25a Author: Tom Prince Date: Sun May 8 16:57:11 2005 -0600 Re-add pool.h. commit f4ac27b3d7b9622db9e79a468fe24f97ef4df510 Author: Tom Prince Date: Sun May 8 16:55:24 2005 -0600 Revert GC changes. (not tested) commit eb11d81ca9350019c9c895d9e69fe18c82523b5b Author: John Bowman Date: Sun May 8 08:57:01 2005 -0600 Figure for Geometry.asy. commit fc9cbf860d9a0ca997ddba7275cef0d50a963154 Author: John Bowman Date: Sun May 8 00:29:32 2005 -0600 Minor fixes. commit 78245d3817e355c52638694eddf8eef22cdfead3 Author: John Bowman Date: Sun May 8 00:17:30 2005 -0600 Workaround Makefile problem in gc6.3. commit 098e8a231fa9d33aaf9cf6f5483cf97e993b0b2c Author: John Bowman Date: Sun May 8 00:16:45 2005 -0600 Move trace/interrupt check to beginning of virtual machine loop. commit afc1adbc265bb2a53ad8f722f4b07d72fa248c47 Author: John Bowman Date: Sun May 8 00:05:59 2005 -0600 Revert to distributing Boehm GC as tar.gz file. commit 1f663f24a9c43942ce06938a1c573058f1a74454 Author: John Bowman Date: Sat May 7 23:52:27 2005 -0600 Distribute Boehm GC as a tar file rather than tar.gz file. commit 9d56f25d6bdebf45f6b5130ebbfe66b6aa405f91 Author: John Bowman Date: Sat May 7 23:40:14 2005 -0600 Added beginnings of a geometry module, including a triangle structure and functions to draw interior arcs of triangles and perpendicular symbols. commit b40d10e76adcebb53560471b218dc68f869e39f6 Author: John Bowman Date: Sat May 7 21:31:23 2005 -0600 Distribute generated source files. commit 360ce3d468d93ff0a5fa1bdcceecb29359487a77 Author: John Bowman Date: Sat May 7 21:30:48 2005 -0600 Fixed type of argument of dividebyzero. commit dc3a948a255cbabb1899e86bd4bc058f2a776bac Author: John Bowman Date: Sat May 7 21:05:28 2005 -0600 cxx updates. commit dc8d225183a1f02a9cebb3078bd770f645501a4c Author: John Bowman Date: Sat May 7 20:35:51 2005 -0600 DEBUG_STACK updates. commit d08008cdab9cb06362df1f2ebf13cacd1fbdbc4b Author: John Bowman Date: Sat May 7 20:07:39 2005 -0600 Minor garbage collection updates. commit 4d94ce88599400aa221991991f83c5ede8ce1709 Author: John Bowman Date: Sat May 7 11:56:54 2005 -0600 Autoconf backwards compatibility workaround. commit f56e28b3c3b9b297b80e10d42174b5244112dc25 Author: John Bowman Date: Sat May 7 11:50:19 2005 -0600 Renamed COLLECT to USEGC. commit f31faf416554c7e209f36059355b16f01eb47007 Author: John Bowman Date: Sat May 7 11:49:25 2005 -0600 Added configuration to optionally disable garbage collection. commit 45c88ca08a3da13844ddfe0fb5b4a93f19e6f2b1 Author: John Bowman Date: Sat May 7 09:48:46 2005 -0600 Fixed Makefile dependencies. commit 30a705d20fefeece1687429e0cb8470d62919bd2 Author: John Bowman Date: Sat May 7 01:38:08 2005 -0600 Implemented Boehm garbage collection. commit 9d7769ce6f88bc53a74d1372b9587e27f7f7fe84 Author: Andy Hammerlindl Date: Thu May 5 22:32:22 2005 -0600 Fixed solveSection bug. commit 06f40e2f91f484b534961af38a5185a5d9d6b466 Author: John Bowman Date: Thu May 5 13:34:40 2005 -0600 Added missing comma. commit 82fa8089d032fbacb29c7973ef6bbf2cd97d467d Author: John Bowman Date: Thu May 5 13:32:53 2005 -0600 Addressed pen plabel vs p issues. commit d40592205063e8adf7f147a81d091c800b1c24cf Author: John Bowman Date: Thu May 5 01:36:58 2005 -0600 Renamed eval(f(T), T[] A) to map(f(T), T[] A). Documented eval(string) and make eval autoload plain. Implemented T[] concat(T[] A, T[] B) to concatenate two arrays into a new one. commit 4db5971d0cd68808f77feec77f06ec1451a8a2ae Author: John Bowman Date: Thu May 5 00:46:04 2005 -0600 Added pair exp(pair) and pair log(pair). commit 28baf58075cb9ca944dd0ce8458196d7944b1db8 Author: John Bowman Date: Wed May 4 23:35:48 2005 -0600 Make int quotient(int,int) portable. Updated base files to use quotient for integer division. commit db1823ffb4c94ea156aade89dbaa912ff8303d4e Author: John Bowman Date: Wed May 4 23:19:03 2005 -0600 Make int/int return a real, as is normally desired; the new function int quotient(int,int) returns an integer quotient. commit 0a78859e787da1b7e76cb10aa793aec5d3d32d26 Author: John Bowman Date: Wed May 4 21:55:59 2005 -0600 Updated TODO items. commit bbe4c843c51d04977a1bc6b9be897acb31feb5ee Author: John Bowman Date: Wed May 4 21:55:18 2005 -0600 List iterator simplification. commit 3432a63496468bad1eadf3cdd6038e555b236f97 Author: John Bowman Date: Wed May 4 21:44:31 2005 -0600 Added reltime(path, real). commit 42610c12a7bcda076d4d18700f832eabaa629ae8 Author: John Bowman Date: Wed May 4 21:40:58 2005 -0600 Make -l option list available global variables as well as functions. commit 10d1ef281f1d9d5d6eca395da7bb7060ca1de36d Author: John Bowman Date: Tue May 3 22:24:17 2005 -0600 Minor updates. commit dce883a43c8f916ff404af6662355727471522e2 Author: John Bowman Date: Tue May 3 22:23:34 2005 -0600 For portability, explicitly check that input file isn't a directory on systems with stat. commit d5c499a61651cf1621431c65c1524b650024b759 Author: John Bowman Date: Mon May 2 21:14:15 2005 -0600 Added example of a transformable triangle structure. commit 5aaecb40c9d5d75b170995775f3939c6bfd092f9 Author: John Bowman Date: Mon May 2 16:20:02 2005 -0600 Incremented version to 0.77cvs. commit 01495eba409e943a272c0e5458e926bf97d91bad Author: John Bowman Date: Mon May 2 15:27:57 2005 -0600 Added PenMargin. commit 98466a96d92665282ce339397a4aa0cc9c0f1c93 Author: John Bowman Date: Mon May 2 15:20:05 2005 -0600 Added -l option to list available global functions. Documentation default structure constructors. commit 80a5b55488005bfb44bfadf5b1b543638bbe7d61 Author: John Bowman Date: Mon May 2 00:42:53 2005 -0600 Added missing plabel. commit 23072e44c1dab9402078ecabfc5ee1d88bbfb2f7 Author: John Bowman Date: Mon May 2 00:11:49 2005 -0600 Improved error handling in pipestream; wrap fork to avoid zombies. TeX errors should force TeX pipe to be closed. commit 1f2d5b4722b7ac5bb030f149eeb166a99cc0f56b Author: John Bowman Date: Mon May 2 00:09:25 2005 -0600 Updated examples. commit 8f133f4fd77a30c58eca35355e3025e390950841 Author: John Bowman Date: Mon May 2 00:09:10 2005 -0600 Updated documentation. commit 46b5a8b9a9c3f89d7617e6cea768fa1b0d310011 Author: John Bowman Date: Mon May 2 00:08:38 2005 -0600 Don't push a final null entry when reading an array in line mode. commit 5119ce4ff2ddb922ed9c913a18a500e54ba72837 Author: John Bowman Date: Mon May 2 00:07:12 2005 -0600 Fixed grouping in add(pair,frame,frame,group). Added put argument to pic.add, attach, etc. Added plabel argument to draw to allow labels and legends to use a different pen than the curve itself. Rearranged plabel and p arguments in axis routines for consistency. Added getstring and getreal functions. Added Mark, MarkFill frame arrays and Mark(int) function. commit 9ce6ebd16ea51561bf969560568a00f3b5b59d28 Author: John Bowman Date: Mon May 2 00:04:54 2005 -0600 Added node, value, and slope functions for paths. commit 2a5211c33c00af59ea8ec8b03a47b8ab056a6b9c Author: Tom Prince Date: Sat Apr 30 22:38:32 2005 -0600 Make camperror throw instead of queuing. commit 1077eff9ad28f73d8c6fd3717d1de6c0eff7b31b Author: Andy Hammerlindl Date: Sat Apr 30 20:31:09 2005 -0600 '' commit 445aabeee69dbdbb14d19231ff94845d5ed0c8da Author: Andy Hammerlindl Date: Sat Apr 30 16:29:58 2005 -0600 Allowed more implicit scaling. commit a02314294b9d45c57be7bfcd98d834491f54c5e8 Author: Andy Hammerlindl Date: Sat Apr 30 14:49:34 2005 -0600 Changed precedence for implicit scaling. commit ebadfa41910e30b009338d9254352d407b09c1ce Author: John Bowman Date: Mon Apr 25 23:43:36 2005 -0600 Flush exited child processes (zombies) in batch mode. commit f2ddac66cf7bd60c6f789bd100e3bbdd027aaf5a Author: John Bowman Date: Mon Apr 25 23:41:46 2005 -0600 Workaround interactive mode bug introduced by recent changes to main.cc. On multiple file runs, texpreamble should appear before any other commands. commit 9dd78b8a3bef3ead1114749f8e46d99b5269cf7a Author: John Bowman Date: Mon Apr 25 22:21:57 2005 -0600 Added example of 3d featpost3d arc. commit 8bf045189f7f7a0a75871455d90dfaebba9ec547 Author: Tom Prince Date: Sun Apr 24 21:04:01 2005 -0600 Make parseStdin() turn of lex debuging. commit b6c8be9df5782db786b484113d1daf803c5fae16 Author: John Bowman Date: Sun Apr 24 10:44:05 2005 -0600 Added Dotted(pen) function which returns a dotted pen at double the linewidth. commit 1a97fed8e248625d9b902b514afd1eb4d70c9275 Author: John Bowman Date: Sat Apr 23 17:16:57 2005 -0600 Clear existing errors on reading from standard input. commit fc009e52440aad59836f5bda105555a61bca4f7c Author: Tom Prince Date: Sat Apr 23 15:15:33 2005 -0600 Fix interrupt handling. commit 5cd7876fc7e960858f491fb2fa6b1d24803c2f1b Author: Tom Prince Date: Fri Apr 22 11:56:07 2005 -0600 Cleanup. commit 4bdb5c64660e95962e9419a81bacb33fb4a2be4a Author: John Bowman Date: Fri Apr 22 08:43:55 2005 -0600 Fixed compilation error. commit 528a9eb7c36d3a33431b775aa9328c0d3bdcdb09 Author: Tom Prince Date: Fri Apr 22 07:49:16 2005 -0600 Fix segfault. commit 95ad036c40755eea043b9421cf777b4ea7993fe2 Author: John Bowman Date: Fri Apr 22 03:21:09 2005 -0600 Replaced boost::lexical_cast with lexical.h to remove last remaining dependency on boost header files. commit a87c9886fd9fee971c0e9a8a68b599bcf047108a Author: Tom Prince Date: Thu Apr 21 22:51:44 2005 -0600 Cleanup. commit 582654800d5965700998478f02504c1ae6b5a5e6 Author: Tom Prince Date: Thu Apr 21 22:47:56 2005 -0600 Refactoring main.cc. commit 95d2376fcf7bec7c8448a72b5355fc0de65d49c8 Author: Tom Prince Date: Thu Apr 21 21:27:46 2005 -0600 More refactoring in main.cc commit fe8229b7f21ceb84165253cf9fac29a9f3086319 Author: Tom Prince Date: Thu Apr 21 21:03:35 2005 -0600 findextension is used only to strip suffix. So strip it. commit 3125ff977fe4f233f964fd0c24031b68e2180971 Author: Tom Prince Date: Thu Apr 21 13:38:38 2005 -0600 FIx interactive. commit 5a607d6d598487d1ce5b2b506e9c9ee5c6df5c5f Author: Tom Prince Date: Thu Apr 21 00:59:52 2005 -0600 More main.cc cleanup. commit c75d9f85e2ae2cac80eb10729a8e49bd0bb63b0a Author: Tom Prince Date: Thu Apr 21 00:55:02 2005 -0600 Simplify error handling. commit d8509dc2a49f364a4d645689dfb4c29450b3820e Author: Tom Prince Date: Thu Apr 21 00:33:24 2005 -0600 Start pulling appart main(), so it easier to change and understand. Doesn't do much, but gives a a place to start. commit 41c53e7bd2fb7e6b6038cc334aed8510fd12d880 Author: Tom Prince Date: Thu Apr 21 00:07:46 2005 -0600 Update ./wce. commit bc6a93c7d9a48b957f287b8d9772804a47b6a7b1 Author: Tom Prince Date: Wed Apr 20 23:40:57 2005 -0600 Remove warning about side-effects. commit cb5ae20890b4b381c3cf00ee755bb2aad0874eae Author: John Bowman Date: Wed Apr 20 23:17:54 2005 -0600 Incremented version to 0.76cvs. commit 307769f553ac965062a636ae87e7c2f61ea8f881 Author: John Bowman Date: Wed Apr 20 22:41:08 2005 -0600 Documented xline and yline. commit 1e2cdc58e3512a20d051d86f5db98b17165f4a4c Author: John Bowman Date: Wed Apr 20 18:59:59 2005 -0600 More updates. commit 31f55d67bba1b306e55f51fb061548c390465b82 Author: John Bowman Date: Wed Apr 20 18:58:48 2005 -0600 Updated axis call. commit a67f7b32d7c394487f795e397b1c90d80724ff74 Author: John Bowman Date: Wed Apr 20 16:03:54 2005 -0600 Updated binary installation instructions. commit 2807bb7d7d88aab29de67876839750836d4f76d2 Author: John Bowman Date: Wed Apr 20 14:03:36 2005 -0600 Update yaxis call. commit ee9e621e33a17428090bce4abda5eadcd372f461 Author: John Bowman Date: Wed Apr 20 11:53:41 2005 -0600 Consolidated autoload code. Suppressed "could not load" error message in interactive mode. Fixed gcc 3.2 warnings and error message. commit 26f006304e452f273eec22f9760ab372a61b90c1 Author: John Bowman Date: Wed Apr 20 11:51:58 2005 -0600 Added linear interpolation and binary search routines. commit 4fbb8d341cb219fbcbb06426fe4701cada86e41a Author: John Bowman Date: Wed Apr 20 11:49:16 2005 -0600 Moved put argument to axis routines to end of argument list, for consistency with draw. Added xline and yline interfaces to axis routines. commit 4b26843ed13d92b95faf3636add7ac8e61058ed1 Author: Tom Prince Date: Wed Apr 20 11:38:23 2005 -0600 Change stack::run(lambda*) to a free function vm::run. commit c0c1159e73655fbb275c88042d696f7bc5ed95ee Author: Tom Prince Date: Wed Apr 20 11:18:23 2005 -0600 Fix handling of bad parse. commit a2bdb64165581bf56b8a3f296d3fa4c5e1c156cb Author: John Bowman Date: Wed Apr 20 09:51:49 2005 -0600 '' commit f1a1b76217a093a1aef6256cca541fd64e507279 Author: Tom Prince Date: Wed Apr 20 08:31:22 2005 -0600 Refactor doParse(). commit ef94bc661d593da433e7ffefe62576e82ece224d Author: John Bowman Date: Tue Apr 19 22:56:48 2005 -0600 Fixed definition of correlation coefficient; added fit function to linefit struct. commit 38c1a8600dd92883783c42b0903fa4a0e0673ba8 Author: John Bowman Date: Tue Apr 19 19:59:25 2005 -0600 Implemented portable way of testing for directories (but not null files). commit c7bd80f606e4514e6e771255206becc9fb639a62 Author: John Bowman Date: Tue Apr 19 14:55:14 2005 -0600 Fixed stdin handling of parser.cc. commit 461b1d0cf62e21d560a99181cac401f24d3f958e Author: Tom Prince Date: Tue Apr 19 10:08:39 2005 -0600 *** empty log message *** commit 67231f89093d457e34144523f5df91ee9179d80a Author: John Bowman Date: Tue Apr 19 08:05:31 2005 -0600 Fixed more bugs associated with new parser. commit d89c1d9bd4147a4092c649c66385e7dffbc421df Author: John Bowman Date: Tue Apr 19 01:31:02 2005 -0600 filebuf should not be static; fixed error message. commit 1e1ab85794f8d88e80f177589caae6acac902cae Author: John Bowman Date: Tue Apr 19 01:25:18 2005 -0600 Interactive input command now checks for a directory or null file. Print an error if input file can't be loaded. commit cda4516bea221edaa2339a64026e1a6553a26110 Author: John Bowman Date: Mon Apr 18 23:35:01 2005 -0600 Make execute() autoload plain (and any gui file) again. commit e195f1e0c091671f0febfee7de49600f40cb3313 Author: John Bowman Date: Mon Apr 18 23:28:58 2005 -0600 Re-added new parser, with fixes for standard input bugs (including a segmentation fault with -p option). Attempting to read a directory or a null file now returns "error: could not load module" instead of generating an exception. commit 09533e92fde1b398234d49c3cf3ce417e2a0cc90 Author: John Bowman Date: Mon Apr 18 23:24:33 2005 -0600 Changed default value of axislabelmargin to 1. commit 0e2f1993a3e95a94ac377fe22a3a5b070bc3a656 Author: Tom Prince Date: Mon Apr 18 21:59:13 2005 -0600 Don't segfault on -p if we can't parse the file, but don't report an error. commit 3af70e113dcf07a2aa1c6d2fa7d9fa77b2104016 Author: John Bowman Date: Mon Apr 18 21:37:18 2005 -0600 Fixed cxx errors and and warnings; removed unused parser files. commit c8905be27a797dee9279c92d1c5caff98e362b62 Author: John Bowman Date: Mon Apr 18 21:10:28 2005 -0600 Revert to old parser until bugs in new parser are fixed. commit 4aa0fdc1d4eae3d12d6a6272b0d238f7e41fa447 Author: John Bowman Date: Mon Apr 18 00:50:08 2005 -0600 Fixed bug in csv mode when line mode is not set. commit fe1917dfb06755fdc2b20abc72ea1b50946636b0 Author: Tom Prince Date: Fri Apr 15 21:56:04 2005 -0600 runtime.pl updates. Actually use the generated code. commit 71b09f3e6517685436507d8aa2e383286dda1d7d Author: Tom Prince Date: Fri Apr 15 19:52:18 2005 -0600 Typos. commit b5dfef4fc8493cf776971b3a2b93c1739b576cfe Author: Tom Prince Date: Fri Apr 15 19:45:07 2005 -0600 inst.h cleanups. commit 4bad5844e10b0e5cb468b19f58fbdeaad3fb6c1e Author: Tom Prince Date: Fri Apr 15 18:42:28 2005 -0600 Implement type query for vm::item. commit 37eba3e42671869e76f88b9335f073cc9637aa1c Author: Tom Prince Date: Fri Apr 15 18:24:59 2005 -0600 We use item to store string* in inst. commit 82d1da4d0d5420e0252417c1384d7408c269b2a5 Author: Tom Prince Date: Fri Apr 15 17:21:55 2005 -0600 Fixes for runtime.pl script. commit 443ad0a35821d4d6ce45bca04df4272fe34c3499 Author: Tom Prince Date: Fri Apr 15 16:00:18 2005 -0600 Fixes for runtime.pl script. commit 87fe09e70703c07c66eb0b811c2f0245d63bfd3b Author: Tom Prince Date: Fri Apr 15 15:36:25 2005 -0600 Initial runtime.pl script. commit 38f76e10894a6d8450762115e066c09385dc317e Author: Tom Prince Date: Thu Apr 14 11:16:21 2005 -0600 Add eval. commit 18cb497cb2e9f488eaf8910d9c5dadf0d35f62ed Author: Tom Prince Date: Thu Apr 14 11:06:44 2005 -0600 Move interactive logic out of genv to main. commit 5bac10bbd4d407eb506985b7af796dcab599d462 Author: John Bowman Date: Thu Apr 14 07:40:55 2005 -0600 Interactive mode update. commit 60d2b0b790ac486e1952c53d6095e382c4a8194d Author: John Bowman Date: Wed Apr 13 21:43:07 2005 -0600 Incremented version to 0.75cvs. commit 316edfa9afeef1c80437dd321ab1d10cae708e5a Author: John Bowman Date: Wed Apr 13 21:10:38 2005 -0600 Removed figures with shading since from manual since many printers don't understand PostScript 3. commit f90afa0a8d7e062798a95fed2f7b5126c5559263 Author: John Bowman Date: Wed Apr 13 20:42:00 2005 -0600 Reduced default number of colors in images to work around postscript/pdf limitations (this prevented recent manuals from being printed). commit 5e4394905b9e0e82b2e6c605078a5b2e537c060e Author: John Bowman Date: Wed Apr 13 20:09:21 2005 -0600 Fixed segmentation fault in version 0.73. commit 7fe32aa7421f75d291fef1ad9c198648f3eedebe Author: Tom Prince Date: Wed Apr 13 18:48:48 2005 -0600 overloaded::simplify() handles allocation. commit 48c82ff272e05b3261f9400cedf5e1b6800107c2 Author: Tom Prince Date: Wed Apr 13 17:57:38 2005 -0600 Make vm::frames extendable, and make function excplicitly allocate their local variables. This might be a first step towards true interactive support or caching modules from one run to another. commit 104205234175695f554c13863db24a3c70194eb9 Author: John Bowman Date: Wed Apr 13 11:07:58 2005 -0600 Incremented version to 0.74cvs. commit 8b10e5c0d5048747ab3d671896ad4169463631ba Author: John Bowman Date: Wed Apr 13 11:00:39 2005 -0600 Make nullpath static. commit 000be41e1427bbcd86f1dcad074b91f2829bb91b Author: John Bowman Date: Wed Apr 13 09:58:55 2005 -0600 Minor updates. commit 3c6b9228e36e265a21d65a54ea86153b863a5848 Author: John Bowman Date: Wed Apr 13 09:44:54 2005 -0600 Push constructed objects as pointers. commit 3ac7a1842c014483bd0ce489a1176fa6b7106f7a Author: John Bowman Date: Wed Apr 13 09:04:07 2005 -0600 Fixed sign of virtual assembly code line numbers. commit ab5db84bedf07c340eefd9c0f72bf1782d836b5b Author: John Bowman Date: Wed Apr 13 06:21:17 2005 -0600 Fixed more warning messages. commit f41dbb672fbe2f05bab43eb36f4f408e234dcf04 Author: John Bowman Date: Wed Apr 13 05:36:59 2005 -0600 Accept cast of empty string to 0. Use string.empty() everywhere. Minor formatting changes. commit 0ae078e729359512169c0aa16b13a36aacfa1f3d Author: Tom Prince Date: Wed Apr 13 00:36:07 2005 -0600 Don't use boost iterator facade. commit 81641e23ec0ac8e8a022291f49b436e1f454e30e Author: Tom Prince Date: Wed Apr 13 00:16:15 2005 -0600 vm::item doesn't need to be memory::managed, since vm::frame is memory::managed_array. commit 3e39b59448d7c2b0d348ede3311879597100ce30 Author: Tom Prince Date: Wed Apr 13 00:04:31 2005 -0600 Fix absolute filename handling. commit e2d07ca8b0f71aeb4f904295096fea23b8394c27 Author: John Bowman Date: Tue Apr 12 23:41:53 2005 -0600 Fixed more cxx warnings. commit 5e9180ebefbfcf3d44264334874c4864c37db611 Author: John Bowman Date: Tue Apr 12 23:21:02 2005 -0600 Fixed cxx warning messages. commit c34996b55b48be33456a09b8e8bffef6eab6fbf5 Author: John Bowman Date: Tue Apr 12 22:42:21 2005 -0600 Further minor optimizations. commit 33fea10d535c3369052e3078bef76ae00b218280 Author: John Bowman Date: Tue Apr 12 15:36:18 2005 -0600 Removed unused friend declaration. commit 9816dcbe2015e60696c5fe09405fe8bcbbb328ea Author: John Bowman Date: Tue Apr 12 14:26:17 2005 -0600 Replaced boost::any with a much faster type-safe union. commit b4d16cc3936034e92f13d30a447d7502fcbeb36f Author: Tom Prince Date: Tue Apr 12 14:17:09 2005 -0600 mathop's don't need vm::stack. commit d7e8f162b4a84765be14b3e606ee8fff5495fbcc Author: Tom Prince Date: Tue Apr 12 14:08:33 2005 -0600 Move curPos out of vm::stack. commit e2ece8085ce8d724a3083d2f1b6b0653e98928ba Author: Tom Prince Date: Mon Apr 11 19:21:59 2005 -0600 Push empty item instead of (void*)0. commit 363e45400250312be8c1d279f3023d4ca92bbb45 Author: Tom Prince Date: Mon Apr 11 14:42:08 2005 -0600 Seperate parser code from camp.l and genv.cc into parser.{h,cc}. commit 2a34bbe4e752a24048c78ce70065f717097b0e7b Author: Tom Prince Date: Mon Apr 11 14:40:13 2005 -0600 Change ./ to . in searchPath to avoid .//file.asy in messages. commit bac1145753ebaec03fb6b3f5b2241c5654e94eb0 Author: Tom Prince Date: Mon Apr 11 14:28:03 2005 -0600 Reimplement locateFile using std::string. commit 96eb620a356c8ab272184a1c469ec2fd664479d4 Author: John Bowman Date: Sat Apr 9 21:20:51 2005 -0600 Fixed texpreamble for multiple files and latex asy environment. commit 38d3c03b695d85569badcfe9fb9aeb4610c56508 Author: John Bowman Date: Sat Apr 9 16:26:50 2005 -0600 Removed nonscalable fonts. commit a1eb8324978e3f0b33de9661a4f9dfb6a110fd94 Author: John Bowman Date: Fri Apr 8 23:52:01 2005 -0600 box(frame), ellipse(frame), labelbox(frame), labelellipse(frame) now return the boundary as a guide. box(frame) and ellipse(frame) prepend to frame for filling with a background colour, as illustrated in hierarchy.asy. commit 3d0f99fbb29df1712b89770aea609b48125722fa Author: John Bowman Date: Fri Apr 8 14:54:13 2005 -0600 Example of labelellipse. commit 38150cacf871ccce9229949a2d554aef1961d2dc Author: John Bowman Date: Fri Apr 8 14:52:47 2005 -0600 Added ellipse(frame) and labelellipse(frame,string,position). Renamed bbox(frame) to box(frame) for consistency. commit bfe1bee3fb0c1517a66b579cdbea6f1e733585fb Author: John Bowman Date: Fri Apr 8 14:34:04 2005 -0600 Workaround for bug in build 1671 of gcc (version 3.3 20030304) under Darwin (MacOS). commit 1b488993fb4b2441b516b1f2751fa0fac0440df4 Author: Tom Prince Date: Wed Apr 6 20:39:19 2005 -0600 Cache *ip as reference rather than pointer. commit e0db3be7f2b80020578b4635757f7c8f5d944dfd Author: John Bowman Date: Wed Apr 6 15:46:08 2005 -0600 Added check to interrupt handler. commit 4354256eafa91c99d25dba3c69eca65e512547a8 Author: John Bowman Date: Wed Apr 6 14:01:41 2005 -0600 Fixed cxx warning messages. commit 296d16b5e2ef1aa8ec4a4a49e7b318bc894b8707 Author: John Bowman Date: Wed Apr 6 13:47:25 2005 -0600 Optimized main loop. commit c39ce074bb8014113bb9ec840940e614e42413e2 Author: Tom Prince Date: Wed Apr 6 00:20:40 2005 -0600 Use error from stack.cc instead of calling em->runtime directly. commit b6f76a0cdf5a809f9b1ea8d924fe28ed9938c148 Author: John Bowman Date: Tue Apr 5 22:53:43 2005 -0600 minor optimizations commit da6b2f87a556f0284e5f9809660702ad308f2797 Author: John Bowman Date: Tue Apr 5 19:31:54 2005 -0600 Reformatted. commit 59fe028e67d4a3b84275fd9816158ba2516c31c1 Author: Tom Prince Date: Tue Apr 5 11:46:44 2005 -0600 Operator precedence fix. commit e1d84cb8c07ca8562701bd2d6ff61286fb14f95e Author: Tom Prince Date: Tue Apr 5 08:42:47 2005 -0600 We don't use stack:ip any more. commit 66fcbb23572787b34cc11179118b76d458ea0f70 Author: Tom Prince Date: Tue Apr 5 08:39:25 2005 -0600 Reapply curPos patch. commit 59bedfb4736163ad1120e4eb920a3e10cf3383c2 Author: Tom Prince Date: Tue Apr 5 08:38:12 2005 -0600 Fix interactive error reporting. commit 8bd8b52a44235a69ee721600aad0b333c862f364 Author: Tom Prince Date: Tue Apr 5 01:15:37 2005 -0600 Track line numbers in position instead of fileinfo. commit 83faf517c935524837f4a50a1ad67b64b5babfce Author: Tom Prince Date: Tue Apr 5 01:13:43 2005 -0600 Don't access program.encode directly. commit a9d21f618d29a440b461d9da1b97084990329c6d Author: John Bowman Date: Mon Apr 4 14:22:06 2005 -0600 prepend should insert after beginning of layer commit caa47b3c4d394f7354307b1500d6086a05542b89 Author: John Bowman Date: Mon Apr 4 14:07:22 2005 -0600 Make empty() use nodes.empty() rather than nodes.size(). STL list portability fixes. commit 37bd8bfcf6ace390213d77ca1c584710c581b5f1 Author: John Bowman Date: Mon Apr 4 10:29:54 2005 -0600 Ignore crop() on an empty picture. commit 2ba6652285a4da64838decebe8a391b145a17b14 Author: John Bowman Date: Mon Apr 4 00:21:02 2005 -0600 Incremented version to 0.73cvs. commit e148d97f5d334b8c9101cc5e712bfdf43378b791 Author: John Bowman Date: Sun Apr 3 23:32:55 2005 -0600 Removed spurious blank tracing lines. commit 36d887d4c3996d03601515d384a66b4a8e5851ab Author: John Bowman Date: Sun Apr 3 23:06:37 2005 -0600 Revert fileposition changes again, due to segmentation fault with -vvvvv. Moved line-number tracing code into main loop. Avoid the need for the lastpos variable by moving stack s out of main loop in main.cc. commit d6dc468977be2cb8d78ad3cc934ea6848297edde Author: John Bowman Date: Sun Apr 3 21:33:06 2005 -0600 Reinstated new file position code w/segmentation fault bug fixed. commit 5016c706f314fd3edae339e179a0aae3fa4e56ac Author: John Bowman Date: Sun Apr 3 20:18:15 2005 -0600 Backout 2005-03-17 runtime file position changes to avoid a segmentation fault. commit a662c972a14f054fb8020b901dda548395fb08b1 Author: John Bowman Date: Sat Apr 2 22:38:47 2005 -0600 Check for space format specifier as well as plus in format(string,real). commit fa2c52036aec09d39c41660d615bc8478ea7adee Author: John Bowman Date: Sat Apr 2 22:21:30 2005 -0600 Removed deconstruct flag from picture in favour of group option to picture and frame add routines. Updated documentation. commit e5e5b81d881e8330e0800c9ed4f7062ac4f06215 Author: John Bowman Date: Sat Apr 2 17:29:41 2005 -0600 Added missing file. commit 519fb5f6221bea0b6a25b307b53cfc61b87aedd0 Author: John Bowman Date: Sat Apr 2 17:17:16 2005 -0600 Reimplemented deconstruction at a lower level to allow both pictures and frames to be deconstructed (or grouped with begingroup/endgroup). Deconstruction now works properly with clipping and erasing. commit 2eba6f6c6a39ff2db84ae9ca2a8700250a90c47b Author: John Bowman Date: Fri Apr 1 22:22:03 2005 -0600 Check that drawLabel::bounds is called before drawLabel::write. Remove unused setup code. commit 7c08dfff446cecac5832f32f94676ec2c565a33e Author: John Bowman Date: Fri Apr 1 12:37:28 2005 -0600 Added attach(pair,picture,frame) to automatically increase the picture size to accomodate adding a frame about a user coordinate. Added warning about erasing deconstructed pictures. Updated lineargraph and documentation to use attach. commit ec22ed8430fe48a777e50d0eabdd6068d2b97923 Author: John Bowman Date: Thu Mar 31 23:14:38 2005 -0600 Reset bounding box when prepending. commit 70a385b41d057ae2b2d4654d4443cd792c88cdb1 Author: John Bowman Date: Thu Mar 31 22:47:16 2005 -0600 Fixed label alignment vs. positioning transformation problem. Removed frame labelBox() in favour of void labelbox(frame); updated example. Make logarithmic checks in autoscale conditional. xlimits and ylimits now adjust deferred drawing bounds. Simplified bboxstack handling. Updated "errors" list. commit 218a1aec30e912b2163aa99d01b72e06f2884c71 Author: John Bowman Date: Thu Mar 31 15:37:05 2005 -0600 Revert configuration to only require boost headers. commit 52ca63f613a70900b70ceceb7487a23ba2e1bf75 Author: John Bowman Date: Thu Mar 31 13:15:17 2005 -0600 Backout boost fixes. commit 8f6948bbed2dec4684a2cc9250f4082703bf8340 Author: Tom Prince Date: Thu Mar 31 13:08:04 2005 -0600 Revert boost::filesystem changes. commit eb6083d2e0151c7eb1744d2e331e37ecdf3b61d4 Author: John Bowman Date: Thu Mar 31 01:22:29 2005 -0600 Added explicit linear equation solver; used to handle general matrix inversion. Fixed return type of real[][] * real[]. Hard coded 2x2 and 3x3 determinants. Update documentation. commit aaed4d5294abe74371a37b7a553a2db7be5e55c1 Author: John Bowman Date: Wed Mar 30 19:06:36 2005 -0600 Fixed cxx warning message. commit bf7b8df5f764ae59371c2aa91b77c07fa323a001 Author: John Bowman Date: Wed Mar 30 18:54:42 2005 -0600 Minor updates. commit 102a82598df9eebad1f7e92a59e5d2f2c0973704 Author: John Bowman Date: Wed Mar 30 18:15:06 2005 -0600 Added portable version of boost::filesystem for systems without boost library, in particular for linux-alpha cxx compiler. commit 203e724f777b81f73cf16f49d4833c54573281bb Author: John Bowman Date: Mon Mar 28 21:22:47 2005 -0600 Updated documentation. commit 26bfdbd489bd80c70c00d24d2b3eab19b5ad4e64 Author: John Bowman Date: Mon Mar 28 21:06:24 2005 -0600 Allow compatibility with older versions of autoconf. commit e93fb2dd08b2ea3c6ef7510369f5837e7c0dc489 Author: John Bowman Date: Mon Mar 28 17:11:35 2005 -0600 Updated configuration and documentation regarding boost-1.32.0 library. Improved format(string,real). Generalized histogram and changed order of arguments of frequency and histogram (bin boundaries are now given before the data). Fixed problems with Log(false,false). commit ea08512c386ea0e3068a3fcbc69ebe610d05371a Author: John Bowman Date: Fri Mar 25 11:56:40 2005 -0600 Cache drawelement bbox contributions where possible. Make bboxstack local to picture frame. commit 38b3478ce4eb79d069db1f492b937898c3b5b5dc Author: Tom Prince Date: Thu Mar 24 23:46:41 2005 -0600 We generate .png's. commit 36945d15e89b3f8799ebbc7e75d22bdf947de965 Author: Tom Prince Date: Thu Mar 24 20:51:59 2005 -0600 Don't have symbolToFile anymore. commit 9142a4fb926e4fbf87925d46dd9d568487af9335 Author: Tom Prince Date: Thu Mar 24 19:00:39 2005 -0600 Use boost::filesystem for find files to parse. Move file locating logic to locate.{cc,h}. commit 93557aea87b06de332ab234a23b7aceeb32be86a Author: John Bowman Date: Thu Mar 24 18:34:14 2005 -0600 Simplified legend examples. commit 8bae1619df7f3e202d595eebce4b549bcc0691a5 Author: John Bowman Date: Thu Mar 24 08:35:06 2005 -0600 Workaround makeinfo indentation bug. commit a20cafa013be9b196bd9d0d16e3fb99ae455a1e0 Author: John Bowman Date: Thu Mar 24 08:02:51 2005 -0600 Fixed typos. commit c3ba5df64f4fe77a8bc60a4e151da7a597832404 Author: John Bowman Date: Wed Mar 23 20:49:30 2005 -0600 Simplified example. commit 3638add962f94d5a7ab9b67836651af7cd9a8362 Author: Tom Prince Date: Wed Mar 23 20:13:13 2005 -0600 Have main load plain.asy and ${outname}.gui explicitly, rather than doing it implicitly in genv::genv(). commit be8225df1cfcc4b92d44e9fce54cd6562538f921 Author: John Bowman Date: Wed Mar 23 14:25:54 2005 -0600 optimized crop() commit d2e19f53b74698fc8711cfc20ca1940602998322 Author: Tom Prince Date: Wed Mar 23 11:14:24 2005 -0600 *** empty log message *** commit 3d72ae80c6a6ea6c1a2c58b5e5c086b8c920dd24 Author: John Bowman Date: Tue Mar 22 23:27:53 2005 -0600 Incremented version to 0.72cvs. commit 9713361a9c50528eff627030657649e2e7693d7d Author: John Bowman Date: Tue Mar 22 23:03:18 2005 -0600 Document leastsquare routine. commit 82c080b20250de2b5065be142f890c7a7fa1409a Author: John Bowman Date: Tue Mar 22 22:50:22 2005 -0600 Removed obsolete files. commit dd5dbfceb01f48c9a1119b93469cad6c05b7e0ed Author: John Bowman Date: Tue Mar 22 22:32:58 2005 -0600 Documented save() and restore(). Renamed linetest.asy to lines.asy. commit decbe43f004ee675a248521b2ffb487498541e74 Author: John Bowman Date: Tue Mar 22 21:51:41 2005 -0600 Added and documented Andy's drawline routine. commit 50858377e0e544f796e4ca2a5a8e87f090a03aa3 Author: Andy Hammerlindl Date: Tue Mar 22 21:43:51 2005 -0600 Added saving and restoring of the graphics state. commit c4a6cf35979b776be9c87ea2a94316662d90e5ec Author: John Bowman Date: Tue Mar 22 21:14:57 2005 -0600 Cache picture bounds. commit 6c8f487edf8437f5b644b60ee966c6ccceb53fd7 Author: John Bowman Date: Tue Mar 22 17:30:09 2005 -0600 Reinstated crop; use current value of userMin/userMax in xlimits and ylimits. commit e287b942d25b5c25a33ddaca210d5d6cc1660a2c Author: John Bowman Date: Tue Mar 22 15:05:30 2005 -0600 Added further legend example. commit 2608c42e32a1e9d5231cec42cd0a1316ce6e17e3 Author: Tom Prince Date: Tue Mar 22 10:25:12 2005 -0600 cxx doesn't like const objects in containers. commit de8cfe019ed7d54db013879124b035faa48a975c Author: John Bowman Date: Tue Mar 22 09:21:43 2005 -0600 Document alternative for legend fitting. commit 17d2b4039eff53dc9a683c3b31ba3e62a1ac4153 Author: John Bowman Date: Tue Mar 22 00:10:38 2005 -0600 More cxx warnings fixed. commit 37dee37bf464d8f25ea1de2733a1bc78629b6b23 Author: John Bowman Date: Mon Mar 21 23:56:46 2005 -0600 Fixed g++ warning messages. commit 534a66210790997c8a37bca0f481dcdc62cbd651 Author: John Bowman Date: Mon Mar 21 23:54:01 2005 -0600 Fixed warnings/errors under cxx. commit 65e4f31b4647b63d4cdf6f4874c6aa9fb73b248e Author: Tom Prince Date: Mon Mar 21 23:37:08 2005 -0600 Move vm::item to its own file. commit d3363bdad6baecad5c1960e35f26b9fa7a72a57e Author: Tom Prince Date: Mon Mar 21 23:32:30 2005 -0600 Header file cleanup. commit 5efd8d91def53af4ac8c74fd53944d87ca2a9e77 Author: John Bowman Date: Mon Mar 21 23:17:08 2005 -0600 Make legend a separate picture that can be positioned and aligned like any other picture (see lineargraph.asy example). The legend must now be explicitly added to the picture, for example, with add(point(E),legend(20E)); Palette also now returns a new picture. commit abde5ee31a1ee9014bf78832a4ebb6ad68db1f9c Author: John Bowman Date: Mon Mar 21 22:02:56 2005 -0600 Updated move limits to be compatible with SW alignment. commit a89a01614b66946253fc2324154744bc5eb93a61 Author: Tom Prince Date: Mon Mar 21 17:28:54 2005 -0600 Use free function vm::pop instead of vm::stack::pop. commit 7337e906dec5de1d9dd59e13df99914e0492b690 Author: Tom Prince Date: Mon Mar 21 17:27:31 2005 -0600 std::equal is much faster than explicit iteration. commit 1100fa20b52c550cf8802943ec4e552c2e298fa7 Author: Andy Hammerlindl Date: Mon Mar 21 13:31:47 2005 -0600 Replaced the implementation of solving guides into paths. Refactored the abstract syntax of operators. commit f9ff6a61a29c8df50659f730f98be728830c3e22 Author: John Bowman Date: Mon Mar 21 12:04:22 2005 -0600 Changed marker filltype default to NoFill. Introduced Above/Below and Crop/NoCrop variables. commit 9e96f3aa2e744d9561c4d13d8cc3a9ef983a7200 Author: John Bowman Date: Mon Mar 21 12:03:57 2005 -0600 Code cleanup. commit 9e6f2a3f6c0099ec6642567d96932f63683cd836 Author: Tom Prince Date: Mon Mar 21 11:06:20 2005 -0600 memory::insert(poolitem) was eating most of the runtime. Use std::deque instead of std::set. commit 4ad3c0531e5651b82d52ba87a77e9bd24c469b58 Author: John Bowman Date: Mon Mar 21 03:23:10 2005 -0600 Prepend only nonextended axes in current layer. Fixed xlimits and ylimits; removed obsolete crop() routine. Updated documentation. commit 8d5dfdfef662e70079daca1ab2d7eacde8aa157a Author: John Bowman Date: Sun Mar 20 19:48:04 2005 -0600 Draw axis on top of cardiod. commit 9c65b619f46aafa4f1740a246d5822f2759fa478 Author: John Bowman Date: Sun Mar 20 18:33:14 2005 -0600 By default, draw axes before other objects in current layer. Fixed frame alignment scaling. commit 50427ac154c38238346d706ca405a9c27fa94c3c Author: Tom Prince Date: Sun Mar 20 18:32:39 2005 -0600 Add include guards. commit 2559e39aa5e57726af10cbce4aa18fe4b072f3f9 Author: John Bowman Date: Sun Mar 20 18:12:50 2005 -0600 Added least-squares fit. commit d5790371c28c11ad3fb59e9639fa793d8774f897 Author: Tom Prince Date: Sun Mar 20 18:03:45 2005 -0600 Use free function vm::pop instead of vm::stack::pop. commit 2f9c6d87b5cbcafbd133f2778c902b6946630047 Author: John Bowman Date: Sat Mar 19 02:26:51 2005 -0600 Added append boolean option to output and xoutput. Omit "runtime" from error(). Added frame marker(path g, pen p=currentpen). commit 2930373bc264af10e3d75bd2e235f13c1a110cf8 Author: Tom Prince Date: Fri Mar 18 16:41:29 2005 -0600 Rename namespace mempool to memory. commit 6cc71345e7d4f8cee34a4dc04a64cc34c31a5b50 Author: Tom Prince Date: Fri Mar 18 16:23:24 2005 -0600 Add file headers to castop.h, mathop.h. commit 80e51aa8fea171856bab468c3e2da0ede814bbb1 Author: Tom Prince Date: Fri Mar 18 16:17:06 2005 -0600 Move all template runtime code into dedicated files castop.h and mathop.h. Cleanup all refrences to stack.h, so it isn't needlessly included. commit b6bfe0819d57b214d867d97667cc136795c66c0f Author: Tom Prince Date: Fri Mar 18 15:33:24 2005 -0600 Header include cleanup. commit 80effa0d6bb808717f83af951713fefa158962cf Author: John Bowman Date: Fri Mar 18 00:08:01 2005 -0600 Allow one to turn on autoscaling again with xlimits(infinity,infinity), etc. Accept an overall scaling of frame alignment shifts. commit 51d64fc33109cb620b83f7ea178af6c087bff5c0 Author: John Bowman Date: Thu Mar 17 23:32:30 2005 -0600 Fixed interaction of new automin/automax scale flags with xlimits/ylimits. Use a small tick by default for unlabelled intermediate decade ticks. commit 52e53208a208b0e56ff90abbbf3b9be38a2c02a7 Author: Tom Prince Date: Thu Mar 17 17:41:41 2005 -0600 Remove UNALIAS, since it is no longer needed. commit 397d1bf1f4f50b93574cb180a183c960774997f9 Author: Tom Prince Date: Thu Mar 17 17:33:16 2005 -0600 Simplify runtime file position reporting. commit 2e6f6c8542028bc6a00e040fbc2b86eb566d6cc9 Author: Tom Prince Date: Thu Mar 17 16:26:35 2005 -0600 Start refactoring stack::run. commit e84e3416c48b1dcc8a721d9e2878232748196081 Author: Tom Prince Date: Thu Mar 17 16:24:34 2005 -0600 Replace inst::alloc with inst::makefunc + inst::popcall. commit d7eba25b48d76a51b2b1b782304f6ef524dacf16 Author: Tom Prince Date: Thu Mar 17 16:16:44 2005 -0600 stack::globals is obsolete. Get rid of it. commit 20a985d093f7b8df432a47b88ee3cf7ef9e0b970 Author: Tom Prince Date: Wed Mar 16 23:38:04 2005 -0600 Fix return breakage. commit 0b5a5e6156eb4c79c6db84d48e2cf8c058a06586 Author: John Bowman Date: Wed Mar 16 23:09:05 2005 -0600 Don't draw logarithmic subticks by default when number of big ticks > 2. commit d5c5be3576859a1bbe7ed82d52cb1d8763c8c571 Author: John Bowman Date: Wed Mar 16 23:01:16 2005 -0600 Show 10 subticks by default for thinned logarithmic graphs. commit e10e7227dfc2f8207a0d50e08e6a30d7c874de78 Author: John Bowman Date: Wed Mar 16 22:17:20 2005 -0600 Fixed interactive line number reporting for files that are input. commit be0831999916b554453bb60f96d94adb69156270 Author: John Bowman Date: Wed Mar 16 16:32:31 2005 -0600 Fixed more cxx warning messages. commit 0b1916bf9c61187d2d9d2c5cbed0c4a49712443b Author: John Bowman Date: Wed Mar 16 15:52:12 2005 -0600 Fixed cxx unused variable warning messages. commit d4c280afadf164fe1539250a0dcdb1ca4e49ae63 Author: John Bowman Date: Wed Mar 16 15:35:40 2005 -0600 Added frame alignment (analogous to label alignment) for positioning frames on picture. Generalized and simplified palette bar interface by using frame alignment. Renamed addabout to add, drawabout to draw, fillabout to fill, and filldrawabout to filldraw. Updated documentation; added examples of frame alignment and histograms. commit 1289a2376a96ec8ec157bb6a794dce806be47808 Author: Tom Prince Date: Wed Mar 16 13:12:31 2005 -0600 A record (and module) is just a function that allows you to access its variables after it is done. Implement them this way. commit 062f45417029bba8694775bd9ca8450ec5c3b640 Author: Tom Prince Date: Wed Mar 16 11:44:40 2005 -0600 We don't use opcodes for functions any more, so remove instAccess. commit 5fb48426cf966b45cbd368c7f7cc5a0b40d23ff1 Author: John Bowman Date: Tue Mar 15 23:39:30 2005 -0600 Documented bool empty(frame). commit bfe787b7e336948ca51c21277dfd5c472b772779 Author: John Bowman Date: Tue Mar 15 23:26:58 2005 -0600 Changed arithmetic opcodes to functions. commit ee5d5b58d89b0a31b66ffab6bb610beac948cdcf Author: Tom Prince Date: Tue Mar 15 22:05:15 2005 -0600 We don't treat files specially, so get rid of class. commit 9db8586587d8c24499e0650400e4b90263c2c774 Author: John Bowman Date: Tue Mar 15 14:54:29 2005 -0600 Moved interrupt check into main loop. commit 6330fd67d2b69f53825b092e60afaaff12453044 Author: Tom Prince Date: Tue Mar 15 12:26:47 2005 -0600 The only symbols should be coming from symbol::trans(). commit eadcc002fb7d0cd06ead3e3744077c461ce12912 Author: Tom Prince Date: Tue Mar 15 12:25:12 2005 -0600 Use get<>() instead of any_cast<>(). commit afe9283bc03ed01aa5ed7987d3a5396ce045c72f Author: Tom Prince Date: Tue Mar 15 12:10:03 2005 -0600 Use $(OPTS) instead of $(OPT), which doesn't exsist. commit 4b10272ee1cecf6d708877603c95c8f107ff688d Author: John Bowman Date: Mon Mar 14 22:49:40 2005 -0600 Incremented version to 0.71cvs. commit 4dcca5a6ee04e4f29421bd24499152aa96fe4a40 Author: John Bowman Date: Mon Mar 14 22:33:12 2005 -0600 Added missing #endif. commit 383b26609aa5102f7d342736bfef372d4c21c6ce Author: John Bowman Date: Mon Mar 14 22:32:02 2005 -0600 Fixed preprocessor conditionals. commit 0e07ff07bb3f2137aa47507892c4ab24c168b0e3 Author: John Bowman Date: Mon Mar 14 22:18:31 2005 -0600 Fixed dummy fpu exception support for machines lacking C99 fenv routines. commit 2e0ab93f26d039a7cba2e13cd6464c747e9b3ea7 Author: John Bowman Date: Mon Mar 14 21:48:27 2005 -0600 Removed reference to deleted xdr files. Added gv sigint.patch to prevent interactive interrupts from closing the gv window. commit 80ce8944a5b5832e3f1e1d4ffbf7fea40b54f33d Author: John Bowman Date: Mon Mar 14 21:46:14 2005 -0600 Added missing prototypes for cxx compiler. commit 63779cce323b91fa6281ba6bd068650097a3a762 Author: John Bowman Date: Mon Mar 14 21:31:12 2005 -0600 Improved error and interrupt (ctrl-c) handling in interactive mode. Mask floating point errors by default in interactive mode. By first issuing an explicit reset command, code can now be entered prior to executing an interactive input commands. Added scroll(int n) and string cd(string) commands. Added Jn and Yn Bessel functions. commit ec1b3228b405a1a100345c0efe421798b096da6e Author: John Bowman Date: Sun Mar 13 22:38:38 2005 -0600 Fixed bug in extension with a robust (and faster) parametric solver. commit a7c355ff72ea19fd57cc3e1989875beb792ca9c3 Author: John Bowman Date: Sat Mar 12 05:25:01 2005 -0600 Added -bw option to convert all colors to black and white. Removed double(file) in favour of single(file,false); also added csv(file,false) and linemode(file,false). commit d0f6dd2c556dd61fa48a2eb28a531d9016a40cf5 Author: John Bowman Date: Sat Mar 12 04:19:52 2005 -0600 Minor change to palette interface. Replaced image.asy with more compact example to reduce distributed file sizes. commit efb59b62abef788b02fb99676f9d3fb79ef69d03 Author: John Bowman Date: Sat Mar 12 02:22:59 2005 -0600 Removed textpen argument from image labels. commit c041cbd3576922d0756468e12bc919a6c346d724 Author: John Bowman Date: Sat Mar 12 01:57:32 2005 -0600 Fixed image support for pstoedit asy backend. commit 035fe65aa42f296fe516a61c46fbf25938bbb7ca Author: John Bowman Date: Thu Mar 10 19:01:45 2005 -0600 Thin crowded logarithmic axis. commit 4d60967bba5f19dc2b2538cb02a42f4cfa8ad394 Author: John Bowman Date: Thu Mar 10 17:20:02 2005 -0600 Updated examples to use XEquals rather than xequals. commit 4d127046c1aeaf8bebc840ed2ed09893e006b96f Author: John Bowman Date: Thu Mar 10 17:12:52 2005 -0600 Generalized secondary axes to handle any scaling (e.g. logarithmic) and removed the two bool options (no longer needed). Improved tick divisor calculation when automin=false and automax=false. Added and documented file double(file) to complement file single(file) for setting the precision of real XDR reads and writes. Cleaned up automin and automax in scaleT and autoscaleT. commit 6e65c7e185989b36577c5c93892e246c4795f246 Author: John Bowman Date: Thu Mar 10 08:21:59 2005 -0600 Removed unneeded -I- compilation flag. commit 595553923d62ae661cfb3d0aa2b40dccd6a1fe55 Author: John Bowman Date: Wed Mar 9 23:53:24 2005 -0600 Incremented version to 0.70cvs. commit 477df127590bb09da07214bcb04c7c1f84a9ca94 Author: John Bowman Date: Wed Mar 9 23:34:58 2005 -0600 Install xdr image in examples directory. commit a235c2ad03054ff8c75e5386ac8c5e9f0b6fd5ed Author: John Bowman Date: Wed Mar 9 23:21:56 2005 -0600 Fixed warning message. commit b049cd6f95bad9bb455aaae5e88778b2d83b39c5 Author: John Bowman Date: Wed Mar 9 22:53:55 2005 -0600 Fixed font. commit 004fbe06c5160327d3e0d57e285bceca1d4309db Author: John Bowman Date: Wed Mar 9 22:44:32 2005 -0600 Recommended use of XEquals and YEquals axes over internal xequals and yequals routines. commit aed4ec201a50e40d2eb0215defb879fccab7dfde Author: John Bowman Date: Wed Mar 9 22:20:38 2005 -0600 Suppressed misleading warning message. commit 57fa041fe8d124e9e1dad7125ae5220686fa8a45 Author: John Bowman Date: Wed Mar 9 21:47:55 2005 -0600 New example. commit 143a26dcb567685d0ce5929e89dcb4b8b23f413d Author: John Bowman Date: Wed Mar 9 21:42:55 2005 -0600 Fixed numerical precision bug in extension (in math.asy, reported by Gao). commit 3c3f932905cf0868c195752793d10c6df1a03daa Author: John Bowman Date: Wed Mar 9 21:07:45 2005 -0600 Fixed secondary axis tick selection; Improved tick selection for crowded axis when automin or automax=false. Added n-point unit cross routine. Added Grayscale and Rainbow palettes. Documented color density images, palettes, and mark option to draw routine, with examples. commit 8b0eaeda7aaca5029fa1f0924520cd06fe30d303 Author: John Bowman Date: Tue Mar 8 23:34:28 2005 -0600 Slightly reduce default number of colors to workaround gs pdf limitations. commit 6d2e05fe3e90fdb73704ea448f7dbfd339f5bcfe Author: John Bowman Date: Mon Mar 7 23:56:26 2005 -0600 Added missing file. commit 74f2191aa08dc4fdfb950d6d6f10e99cb1b1f72e Author: John Bowman Date: Mon Mar 7 23:31:44 2005 -0600 Added support for generating image density plots and palettes. Added support for data markers, including cross, plus, and polygon markers. Added min and max functions for 2d and 3d arrays. Fixed tick divisors in secondary axes. Deep copy path arrays to avoid suprises. Fixed limits() in graph.asy. Respect "#" in format strings (allows trailing zeros). commit e9c130603cd14c2f9261748346df2ee80a32b3a6 Author: John Bowman Date: Sat Mar 5 13:16:18 2005 -0600 More general example of secondary axis. commit eef695ff4e84a60a0fa0d58cc0a818b9d2c33f7e Author: John Bowman Date: Sat Mar 5 13:14:54 2005 -0600 Fixed secondary axes bug; xlimits, ylimits, and limits now use properly scaled user values. commit 1469b143e3743035b7ffe4304bfbba9c061de31e Author: John Bowman Date: Sun Feb 27 21:51:58 2005 -0600 Minor optimizations. commit 16be11de9bfed8e2983390a7d1707c7c8a5b2b8e Author: John Bowman Date: Sun Feb 27 12:40:32 2005 -0600 Adjusted margins so that arrows all have same length. commit 8940ceb61e0415275a2b7265b27a3fe34fcb7c6a Author: John Bowman Date: Sun Feb 27 12:23:50 2005 -0600 Updates to support Microsoft Windows. commit dc010b20c1564f1a064b8cff721693a095136ece Author: John Bowman Date: Sun Feb 27 10:49:10 2005 -0600 Fixed finite(pair). commit e2452b93245390c6864dd50a65a0fdbd2d24e361 Author: John Bowman Date: Sun Feb 27 06:29:47 2005 -0600 Incremented version to 0.69cvs. commit 284f5e02bf7f045ab6821cc1c26ba10ab7f0c0e8 Author: John Bowman Date: Sun Feb 27 05:59:56 2005 -0600 Added Andy's constraint removal code for even better simplex optimization. commit 9e276662765e27ac0b8f8bc53e9ea0885598edb7 Author: John Bowman Date: Sat Feb 26 23:14:35 2005 -0600 Updated to use Margin rather than subpath. commit 9f1d95c1a9fa14497433f86fa5e523cae1d28b3d Author: John Bowman Date: Sat Feb 26 23:00:33 2005 -0600 Incremented version to 0.68cvs. commit e1193e95f3a895b2436d75d50f8f73d69607de77 Author: John Bowman Date: Sat Feb 26 20:48:49 2005 -0600 Initialize font explicitly to ensure compatibility between tex pipe and final latex processing and to ensure tex pipe font is properly reinitialized. If picture cannot be fit to requested size, scale size by sqrt(2) and retry. Added gv-3.6.1 patches; updated documentation. Modified pstoedit patch to remove unneeded shipout(). commit f1526a9885d8746dfbccefc4a3f3d48816535145 Author: John Bowman Date: Sat Feb 26 15:55:50 2005 -0600 arrowsize updates commit ba482f250756a7ee89fc7df79392230497bab022 Author: John Bowman Date: Sat Feb 26 02:23:43 2005 -0600 Removed superflous constraints before solving linear programming problem. commit aacb768217a0a0ddf10d7b2a55e9d8da8462bf75 Author: John Bowman Date: Fri Feb 25 23:51:35 2005 -0600 Check that r.c >= 0 in selectVar (this guarantees that r.t[col] < 0). commit 68f312a4eaca8c4925e21ba8d3436c3126d3a79b Author: John Bowman Date: Fri Feb 25 21:31:21 2005 -0600 Optimized simplex pivoting. Made global constants static. Fixed recently introduced error in relative(picture, pair). commit 0abdc841e8ec1ad324258ab524cab6c7d80469e4 Author: John Bowman Date: Fri Feb 25 12:11:52 2005 -0600 Minor errorbar updates. commit 1913234e5ee42aa76300e99a70b0792902a8d2ee Author: John Bowman Date: Fri Feb 25 12:11:20 2005 -0600 arrowsize updates commit df425036e10f798c76c6365bb24829756bbebf5f Author: John Bowman Date: Tue Feb 22 00:41:54 2005 -0600 Incremented version to 0.67cvs. commit 28f501a320b2177f7f89546088c3099dba9414eb Author: John Bowman Date: Mon Feb 21 23:41:21 2005 -0600 Improved selection highlighting in GUI. commit 5c106d79c1aef1fd3bd9d9d91d93a1e0013d428d Author: John Bowman Date: Mon Feb 21 00:12:23 2005 -0600 Put quotes around outputted font command string. Set camp::TeXcontaminated to false upon decontaminating. commit a861c5bd3d1d6333fcde9290442726b3b06bc538 Author: John Bowman Date: Sun Feb 20 22:57:04 2005 -0600 Moved interactive rejectline code back into main.cc. commit 16e08c8092a9c7e639629cd36870c407dcde1f1e Author: John Bowman Date: Sun Feb 20 22:16:09 2005 -0600 Moved cleanup functions into exitFunction. commit 4c195053d81f69264b9421d77302fae11dbdb7bc Author: John Bowman Date: Sun Feb 20 21:41:20 2005 -0600 Added atexit function. A shipout() command is added implicitly at file exit if no previous shipout commands have been executed. The examples were updated to remove any unnecessary shipout() calls. Used atexit to clean up asymptote.sty and interactive mode. Files with no drawing commands now work with -f pdf. commit 503dbcab8b4dc6b733411ef0e9ac21074ecffa48 Author: John Bowman Date: Sun Feb 20 03:07:38 2005 -0600 Fixed (logarithmic and other) scalings of XEquals and YEquals axes and errorbars. commit 7547285f427c4996be8f1dadc0dd5af8c1d7536c Author: John Bowman Date: Sun Feb 20 02:28:25 2005 -0600 Fixed typo. commit 604d36b68a3f98a069991f0983d6b31807cdbb9b Author: John Bowman Date: Sun Feb 20 02:25:04 2005 -0600 Incremented version to 0.66cvs. commit ad29e30984369623437ef0fa56d92524a1288668 Author: John Bowman Date: Sun Feb 20 01:47:46 2005 -0600 Fixed location of latexusage.tex. commit 0558d6d8a9e537a64e6d9b7c831d7e0bd112faa5 Author: John Bowman Date: Sun Feb 20 01:39:25 2005 -0600 Incremented version to 0.65cvs. commit cfcc1092d054a6061a4f73f9fd5143210e7b1941 Author: John Bowman Date: Sun Feb 20 00:28:21 2005 -0600 Fixed typos in example. commit e516236e2a4ffc85d6d0c090a80fd81ad672dec1 Author: John Bowman Date: Sun Feb 20 00:19:39 2005 -0600 Updated examples. commit a59e528a1131c3a2907deed7ee227e0ef74d6f0b Author: John Bowman Date: Sun Feb 20 00:00:14 2005 -0600 Linewidth change. commit ff81aec247f38be5090c29d298cfefeae69e157c Author: John Bowman Date: Sat Feb 19 23:57:01 2005 -0600 Added DotMargin margin qualifier. Updated examples to use margins. commit 66f4587e49213cfd0cd2cbcbbef58655199716f2 Author: John Bowman Date: Sat Feb 19 22:40:42 2005 -0600 Added errorbar routines to graph.asy. Changed arrowhead and dimension bar default size specifiers: arrowsize to arrowsize(pen p=currentpen), arcarrowsize to arcarrowsize(pen p=currentpen), barsize to barsize(pen p=currentpen). commit 9fadc21370ae167e70248a450697484588319944 Author: John Bowman Date: Sat Feb 19 19:29:46 2005 -0600 Fixed bug in eval(f(T), T[] A). commit 8b4466afa40e9e7cc5e9db290adf4935989ca988 Author: John Bowman Date: Sat Feb 19 12:35:38 2005 -0600 Documented real[] A vs. real A[] issue. commit 67e6e3ceaabcbf04544194124c85ecd5c0a074e4 Author: John Bowman Date: Sat Feb 19 11:50:51 2005 -0600 Documented and improved margin routines. Included correct latexusage file in documentation. commit 9498e0af1d4f38f833b52f3620ab24d089dee94c Author: John Bowman Date: Sat Feb 19 00:32:16 2005 -0600 Added Margin, PenMargin, and TrueMargin drawing qualifiers. Fixed name conflicts between asymptote.sty and comment.sty. Install latexusage.tex with examples. commit 38bb78c422e9bd2d3675046a467f6252ebd14678 Author: John Bowman Date: Fri Feb 18 16:07:55 2005 -0600 Fix diagnostic. commit 29aff167ca03ef67f70ac1b62d1b98c9dac71606 Author: John Bowman Date: Fri Feb 18 15:13:16 2005 -0600 Fixed segmentation fault in anonymous function diagnostic. commit 9047b90269425c9cfc3b9b5cde15fa9d77caec73 Author: John Bowman Date: Fri Feb 18 03:32:37 2005 -0600 Incremented version to 0.64cvs. commit fcd9f40af610b0609d9c9f4cf6f41fa24e430a64 Author: John Bowman Date: Fri Feb 18 02:54:40 2005 -0600 Reset lastpen on every call to texinit. commit e03473a1d037f7527a28bda91860a854fd41bfe0 Author: John Bowman Date: Fri Feb 18 02:32:44 2005 -0600 Fixed harmless typo. commit debec9e2457a43185d6fd8eabd325bd73f609e21 Author: John Bowman Date: Fri Feb 18 02:28:13 2005 -0600 Incremented version to 0.63cvs. commit 8db8d6d2443535dc5767219c703b6df6ca66ec18 Author: John Bowman Date: Fri Feb 18 01:27:57 2005 -0600 Fixed shading colorspace & fillrule/baseline output strings; removed unwanted space from gsave/grestore. commit 9bf7f08f84a6cade9d9fd51998411615b4afd1b9 Author: John Bowman Date: Fri Feb 18 00:38:20 2005 -0600 Added basealign pen type to align labels using the TeX baseline, if applicable, rather than using the full bounding box. (The default continues to be nobasealign). Documentation improved in several areas. commit 28a03b437f7c1e00608b6c2f907c60fe2f2ee616 Author: John Bowman Date: Thu Feb 17 08:57:51 2005 -0600 Added missing include. commit 6eef3163b0df65b4befb9c1d7e4e86c81ebf62cb Author: John Bowman Date: Thu Feb 17 01:02:35 2005 -0600 Simple example of label positioning. commit 8ffd567418105a39206bf034ea3ec903c5735278 Author: John Bowman Date: Thu Feb 17 00:56:21 2005 -0600 Corrected index entry. commit 5d3675110563d25e16b6f9c8079661425c1edfaf Author: John Bowman Date: Thu Feb 17 00:54:19 2005 -0600 Workaround broken cxx linux-alpha headers. commit 7f051aef9efdc4169d33bf295471e63d492d94a3 Author: John Bowman Date: Thu Feb 17 00:38:29 2005 -0600 EPS files (and other formats supported by \includegraphics) can now be included and positioned just like any other LaTeX label (the include function has been changed to return a string containing an includegraphics command that can be used with label). Added image support to pstoedit backend. Fixed compilation problems under Solaris. Updated documentation. commit fa4a2ff2a63cae4e99ba06d3aad15ab8b8033640 Author: Tom Prince Date: Wed Feb 16 11:43:22 2005 -0600 CFLAGS is already subst'd by AC_PROG_CC. CXX defaults to g++ if it is available (AC_PROG_CXX). Define CC in Makefile if we get it from AC_PROG_CC. commit 733007c5d36fa7bf65d9aef914e28b1a82152b2a Author: John Bowman Date: Wed Feb 16 11:42:33 2005 -0600 Changed namespace absyn to absyntax to avoid conflicts with class of same name under some compilers. commit b05b2ab708733bd5da94b3868e36d174deb55394 Author: John Bowman Date: Wed Feb 16 11:24:02 2005 -0600 Namespace as -> absyn. commit fe7b0ca63585732565f21c040bc2a6b266276c94 Author: John Bowman Date: Wed Feb 16 11:18:44 2005 -0600 Namespace as -> absyn. commit 3778ce248900af52939f5baa8db7e9dd18593603 Author: John Bowman Date: Wed Feb 16 11:14:02 2005 -0600 Renamed namespace "as" to "absyn" to work around Solaris namespace pollution. Added CXX=g++ to configure.ac and removed -DNDEBUG flag. commit 797f13b0fc7dd233f0248a7aaf4f9a6218f38abb Author: John Bowman Date: Tue Feb 15 22:23:14 2005 -0600 Clip should insert beginclip at beginning of current layer. commit 462f2955efdba755a3df16924dd41d216bbf2e62 Author: John Bowman Date: Tue Feb 15 17:46:32 2005 -0600 Reinstated underlying frame clipping for picture clipping (with transform bug fix), allowing picture unfill to be properly implemented (using frame unfill). Moved beginclip, endclip, gsave, and grestore to pstoedit.asy. Fixed remaining gsave/grestore bugs in Asymptote backend to pstoedit. commit 303435f4e3c52d1b38f5d31a32685dff9ea71a6e Author: John Bowman Date: Tue Feb 15 02:01:03 2005 -0600 Code clean up; added pair min(path[]) and max(path[]) functions. commit 6260496285c2a9c87e6d7891e8021c4134ab55b8 Author: John Bowman Date: Mon Feb 14 23:25:28 2005 -0600 Incremented version to 0.62cvs. commit ed62a98eee707e36126ee3acc513bb11763c0b5e Author: John Bowman Date: Mon Feb 14 21:39:00 2005 -0600 New examples. commit b7b089209392247a58749f86a76e5e5c356589c9 Author: John Bowman Date: Mon Feb 14 20:57:01 2005 -0600 Added PostScript grestore/gsave objects. commit 3a83a424a915fdf048da7ab98b60bd081a65696b Author: John Bowman Date: Mon Feb 14 20:54:11 2005 -0600 Fixed spelling and grammar. commit 8ac3bec8f6df31f5f83f22eb07b5eb55842b343f Author: John Bowman Date: Mon Feb 14 19:01:27 2005 -0600 Added Asymptote backend and support for pstoedit, including native clipping and subpaths. Added Postscript font and scaled TeX font support. commit 7009ba7329eeca33c7dc4d176639ddc104e276f6 Author: John Bowman Date: Sun Feb 13 15:57:10 2005 -0600 Added warning message and documentation about clipping deconstructed objects. commit 6aa5b38b9a6e94362fc66fd753e6bf7a0a974138 Author: John Bowman Date: Sun Feb 13 15:36:46 2005 -0600 Added -gray option. commit df0db34958b4ec086fa2a317ecb7dd79306bf6fd Author: John Bowman Date: Sun Feb 13 12:21:41 2005 -0600 Install documentation examples and data files in examples directory. commit ccc354b08dc5706fe0383ee6ea2b072f827bf975 Author: John Bowman Date: Sun Feb 13 12:08:12 2005 -0600 Reimplemented picture clipping to fix transformation and layering of clipped pictures. Use correct font and fontsize for computing label bounding boxes. Use -O0 for producing dependency data. commit e9464de788fc1d24dd60aae8937f41b855c322f0 Author: John Bowman Date: Sat Feb 12 03:26:46 2005 -0600 Added background variable. commit 22252bdf84499d5ecdf09809d857700722257cb1 Author: John Bowman Date: Sat Feb 12 03:21:42 2005 -0600 Added drawing, filling, and clipping of compound paths built up with a pen lift (moveto) operator ^^ instead of --. Added functions to unfill a region to transparent background. Added zerowinding and evenodd pen types for filling and clipping. Introduced pen types squarecap, roundcap, extendcap, miterjoin, roundjoin, beveljoin to replace linecap(Square) calls, etc. Added checker pattern. Added LaTeX NFSS and TeX fonts and ability to override default baselineskip. Fixed bug in LaTeX rotation angle output format. Added contributed tree drawing script and example. Updated documentation. commit d367e8c404772a6dd98e54466742fe8b12fa8a12 Author: John Bowman Date: Wed Feb 9 09:08:27 2005 -0600 Editing mode updates. commit 51dd70f15ee70c193ca5d9c6e9869fb2fcb553fd Author: John Bowman Date: Wed Feb 9 08:40:20 2005 -0600 Renamed labelframe to labelBox; added labelbox(frame). commit 9716d767e81de011dd47e9ecfeb2273cd2777337 Author: John Bowman Date: Tue Feb 8 23:46:20 2005 -0600 added labelframe and point(frame,dir) routines. commit 83cd63b559666d92876804f3999e996a54ca0c2a Author: Andy Hammerlindl Date: Tue Feb 8 15:45:32 2005 -0600 Changed string highlighting to recognize double \ escapes. commit 9bfdac4ea0f8b8d539402178c609761977b5a374 Author: John Bowman Date: Sat Feb 5 15:43:28 2005 -0600 Updated documentation and pattern examples. commit 673598b4cbfb40510d58a38fe50bdb9a222b9459 Author: John Bowman Date: Fri Feb 4 22:49:13 2005 -0600 Added brick pattern. commit 19ff72f4ba6f49669117bf4bad71b7427c25c9d4 Author: John Bowman Date: Fri Feb 4 16:15:16 2005 -0600 Added bool option to linetype to disable automatic scaling of linetype parameters with pen size. Fixed segmentation fault and float point exception in adjust_dash in drawpath.cc. Added bbox(Background) option for producing a nontransparent background. Moved simplified pattern routines and builtin patterns hatch, crosshatch, and tile to patterns.asy. Updated examples and documentation. commit 0a798b5693fd153883bd81789e8f7152a312cd71 Author: John Bowman Date: Thu Feb 3 21:05:37 2005 -0600 Fixed recently broken interact mode. commit d0302683ce91faa71fe83e1b9ce0021042916f2e Author: John Bowman Date: Thu Feb 3 13:18:20 2005 -0600 Moved default CFLAGS into configure.ac commit 7d40090cb009bca42e096cf60ca2b0d974fab4d1 Author: John Bowman Date: Wed Feb 2 13:16:31 2005 -0600 Fixed optimization flags (revert last change). commit 13fb05dc4824fb5677f386db5ba37068ee6e41dc Author: Tom Prince Date: Wed Feb 2 08:40:53 2005 -0600 Stanardize CFLAGS handling. commit fe1ee205fbe6928e6c9116fb5a6e7df5f253c823 Author: John Bowman Date: Wed Feb 2 06:16:25 2005 -0600 Fixed header problems under FreeBSD. commit 21def4fc8e07c0d718e73e1bb6cbf593a9823c34 Author: John Bowman Date: Wed Feb 2 00:54:33 2005 -0600 Incremented version to 0.61cvs. commit 3b6044c76830ccc27e5599c7f4184d5a050bc12f Author: John Bowman Date: Wed Feb 2 00:10:58 2005 -0600 Interactive mode automatically restarts ASYMPTOTE_PSVIEWER in case it exited. commit 597bcc238bdf57c1c5ee7b0be185a34d49c08304 Author: John Bowman Date: Wed Feb 2 00:07:24 2005 -0600 Added picture grid(int Nx, int Ny, pen p=currentpen) function for generating square lattices. commit cc7582773ec89abf83d53951301b9a849f6c958e Author: John Bowman Date: Wed Feb 2 00:04:57 2005 -0600 Simplified binary installation instructions; updated hatch.asy listing. commit c51f05c9af30d87e7f49f9a6ce27416e150a9327 Author: Tom Prince Date: Tue Feb 1 10:03:21 2005 -0600 Fix path solving. Strange place for a bug. commit 4046420fa38047ab48a6f9114d79f1b133844993 Author: John Bowman Date: Tue Feb 1 02:52:50 2005 -0600 Removed extra newline from diagnostic. commit d6c7d56a81c74dca0467f15941229101ceafaa28 Author: John Bowman Date: Tue Feb 1 01:43:33 2005 -0600 Fixed namespace/function conflicts. commit c9e796e9e170a82bc486199ba7716c64db6b99f2 Author: John Bowman Date: Tue Feb 1 01:33:26 2005 -0600 Fixed interactive mode to suppress standard I/O also from static imports. commit 2566e42a9a29888574606c717e01b459515eb122 Author: John Bowman Date: Mon Jan 31 21:41:57 2005 -0600 Fix rfind(string s, string t) and update documentation of string functions. commit 81522814d5593ac2f99a96b1f6827684f56a740b Author: John Bowman Date: Mon Jan 31 18:42:04 2005 -0600 Add facility for checking to see if a file exists, using bool error(file). commit 2d7bc86ef31d922d01e19e7bd7323d8a0e36c48c Author: John Bowman Date: Mon Jan 31 16:15:48 2005 -0600 Fixed multiple interactive shipouts in graphs with legends. commit d5510487a847ffbe3270d74042c68de4c2c88dca Author: John Bowman Date: Mon Jan 31 00:21:33 2005 -0600 Interactive mode now supports inputting files with multiple shipouts. Interactive mode disables deconstruction (xasy). commit c56e2e4c3b36897baa56333df2e5d8f481b20744 Author: John Bowman Date: Sun Jan 30 23:17:47 2005 -0600 Fixed endl and tab in plain.asy to produce C strings. Fixed recently broken include command. Renamed internal symbol ASYalign to more meaningful ASYbase in baseline. commit 872c389229301cfc209e2c0349503cf8d240d9b4 Author: John Bowman Date: Sun Jan 30 22:46:28 2005 -0600 Put file back into mempool by making typein and typeout variables rather than pointers. commit 18b1fef96c161127ea53f9f4780b131d4e2b4942 Author: John Bowman Date: Sun Jan 30 18:44:14 2005 -0600 Updated examples to use math.arc routine. commit d41eb28ef472b8ba83c21468b0b48d808feaa39c Author: John Bowman Date: Sun Jan 30 16:55:47 2005 -0600 Allow optional Asymptote commands to be specified on the same line as interactive input command. commit 5f5586572db63c8bc186ca36f5edc9b9dea978e9 Author: John Bowman Date: Sun Jan 30 12:15:01 2005 -0600 Buffer stdin in interactive mode. Changed Import to input, which includes code directly into Asymptote, so that the user has access to the same environment that the code sees. Cleaned up fileio and removed it from mempool due to conflict with iostream routines. commit b1d64a589218c621786a1af426d581c009a9e207 Author: John Bowman Date: Fri Jan 28 21:04:41 2005 -0600 Add baseline TeX code back into texfile.h from plain.asy. commit c9a85dae7aa090f26d84e035128594d78c1385e5 Author: John Bowman Date: Fri Jan 28 03:54:10 2005 -0600 Incremented version to 0.60cvs. commit 82e18a2effb5642baa92e296f1be7fe4b9cf60ee Author: John Bowman Date: Fri Jan 28 02:21:34 2005 -0600 Makedepend updates. commit e134133f3b4d137d42c842e3871e928c17e104a2 Author: John Bowman Date: Fri Jan 28 02:09:05 2005 -0600 More makefile tweaks. commit 71b7187f832f9726abd1f4ce7f7fa2402352e333 Author: John Bowman Date: Fri Jan 28 01:40:32 2005 -0600 Final makefile updates. commit 5ee54ce48e3536f51119f7ed27986f988558e4dd Author: John Bowman Date: Fri Jan 28 01:15:07 2005 -0600 Automatically check for broken rpc/xdr headers. commit 5dd8676e496112918d515d521ac1e5d76e0a7e58 Author: John Bowman Date: Fri Jan 28 00:01:20 2005 -0600 Fixed bounds to be consistent with behaviour of new quadratic solver. commit a6fae99ab1ab2214c4c0fb328d4248dd0ccd333b Author: John Bowman Date: Thu Jan 27 23:41:06 2005 -0600 Implemented robust, accurate quadratic equation solver (used in dirtime). commit 7deacc022138293f1b7ea337c6f3dadf15bd23d3 Author: John Bowman Date: Thu Jan 27 17:20:26 2005 -0600 Added getopt for systems without full GNU getopt support (e.g. cygwin, FreeBSD). Use "make all/make install" to produce/install both asy and man pages. commit d907ef68414f53dccfaf4726944fa072c265ad61 Author: Tom Prince Date: Thu Jan 27 01:30:12 2005 -0600 Better? quadratic routine. commit 34e5884ceacd46acd76abcc6debf987fc12a9d83 Author: Tom Prince Date: Wed Jan 26 12:06:22 2005 -0600 Use solveQuadratic for path::bounds as well. commit 697e218e413621cb7b0a78378df21562a92020bd Author: Tom Prince Date: Wed Jan 26 11:44:00 2005 -0600 Fix fuzz case in cubic dir. commit f8b8d7dab36c025d9d81714098c5d4fc6e992812 Author: Tom Prince Date: Wed Jan 26 11:37:55 2005 -0600 Duplicate code. commit e15a948eb7498d2ffa9c1c25fb65cdb617652e10 Author: John Bowman Date: Wed Jan 26 10:47:50 2005 -0600 Added fuzz to fix dirtime(unitcircle,dir(-45)) bug under make OPT=-g. commit 12eae75206190bbeb7ea03e695888e13d1e29d9f Author: John Bowman Date: Wed Jan 26 02:14:32 2005 -0600 Implemented all ANSI C character string escape sequences for C strings. Removed all escape sequences from TeX strings except for \", which maps to ". Added support for LaTeX babel package. Improved arc so that it coincides exactly with circle approximation for all angles. Added triangle arc routine to math.asy. Renamed gray to lightgray in the example files. commit ef94f1c7970998ed0489cb0ef1f071a37cf40df2 Author: John Bowman Date: Tue Jan 25 10:02:15 2005 -0600 Fixed explicit keyword (broken in dec.cc 1.8 on 2005-01-19). commit f1463209178ca79e93fbb7cc03f98ad04da070b7 Author: John Bowman Date: Sat Jan 22 02:55:26 2005 -0600 Renamed gray to lightgray; gray now means gray(0.5). Added colorPens and monoPens lists and boolean variable mono. commit a38f9e67b9ed8397b7404aad29d8213482dc185c Author: John Bowman Date: Sat Jan 22 01:14:42 2005 -0600 TRANSPARENT pen now has higher precedence that DEFCOLOR; also output "invisible" for this pen color. commit c0e19513dd8c5bc30401fb4b46e32285fdba45fb Author: John Bowman Date: Sat Jan 22 00:48:56 2005 -0600 Added checks on string position arguments. commit 6eb71920bb2d13c58629cd0c3edb21a3f4d4bc4e Author: Tom Prince Date: Fri Jan 21 07:44:46 2005 -0600 Handle invalid numbers gracefully. commit 004abb085554db987aaa582ce22bd2576470aab6 Author: John Bowman Date: Thu Jan 20 22:35:54 2005 -0600 Fixed cstring so that '\\' produces a backslash. commit aaaa207f4efee701f9e6455ef5faa481ad54888b Author: Tom Prince Date: Thu Jan 20 16:35:38 2005 -0600 Add C-style strings delimited by '. (e.g. '\n' instead of "\\n"). commit 53d04784fd7da27cb52c6b8e415a45ab1d893e2a Author: John Bowman Date: Thu Jan 20 04:14:02 2005 -0600 More arc improvements. commit 25ecd5c73477c683e502ff7c975c22b18a61f943 Author: John Bowman Date: Thu Jan 20 02:19:33 2005 -0600 Pdf updates. Added new arc routine and point/path utility functions. Added new examples and updates to feynman.asy. commit 8d06235ab386b7d48d2fadae59784a0e0ec0be33 Author: Tom Prince Date: Tue Jan 18 23:48:12 2005 -0600 *** empty log message *** commit f005d31b9780cbc30358ddbffc36c40e58f97348 Author: Tom Prince Date: Tue Jan 18 23:44:26 2005 -0600 Get rid of as::defaultExp, and store varinit* in signature instead. commit ac31ba07570ebdd6ecad5b8afd3b2dabf590ec33 Author: John Bowman Date: Tue Jan 18 23:38:39 2005 -0600 Minor bbox fuzz and alignment adjustments; fixed xasy alignment. commit e039fece159045e5d1bda711994fb98e06ddb0ec Author: John Bowman Date: Tue Jan 18 21:49:33 2005 -0600 Implementation of explicit keyword. commit ddeaaa28a0f5c2e26a3c805be6c6b49b9e86ca6f Author: Tom Prince Date: Tue Jan 18 21:16:10 2005 -0600 Oops. commit 8330481475bd533d754e87dd1b8650edbb379322 Author: Tom Prince Date: Tue Jan 18 21:14:34 2005 -0600 Fix makefile breakage. commit 9d18f68c3678138173cba1f115ec632a8e33a1be Author: Tom Prince Date: Tue Jan 18 21:07:13 2005 -0600 Don't rebuild asy if we don't need to. commit 61bb4a0506a9d7fa46840068bfd5b048b81d167b Author: Tom Prince Date: Tue Jan 18 19:33:16 2005 -0600 version.texi is autogenerated. commit 0b3dabb95ab57f0e71bf09251eddd761366f4a61 Author: Tom Prince Date: Tue Jan 18 12:25:05 2005 -0600 Make explicit a keyword to detect breakage. commit d2bcab30bdcb21e576b010b96450d86a1988869f Author: John Bowman Date: Tue Jan 18 01:24:50 2005 -0600 Inhibit output of null labels. commit 807c48f5f8381756758ae06feeabb17a4f9a8464 Author: John Bowman Date: Mon Jan 17 18:30:20 2005 -0600 Fixed antialiasing and gv -watch problems. commit 843c617b2423d9135ecd84c9f3b2762b96529363 Author: John Bowman Date: Mon Jan 17 16:11:34 2005 -0600 Incremented version to 0.59cvs. commit 6324cafe2759553d86759a9a61e03c30eb4757da Author: John Bowman Date: Sun Jan 16 22:43:30 2005 -0600 Updated new examples. commit fc09c78aadca65c061ecdab83c86f9f1a9433f10 Author: John Bowman Date: Sun Jan 16 22:35:30 2005 -0600 Fixed formatting. commit 696c6a83b7b0bd82b62220923f4f9c8b468da1a3 Author: John Bowman Date: Sun Jan 16 22:16:23 2005 -0600 Fixed warning message about unused variable. commit f7f31e8da553d0c4812d8cf548a1fa940597e61f Author: John Bowman Date: Sun Jan 16 21:54:49 2005 -0600 Added new entry. commit 5f23c77fa668e791364343dbb46ca120927c0beb Author: John Bowman Date: Sun Jan 16 21:45:57 2005 -0600 The default linetype, linewidth, fontsize, color, linecap, linejoin, and overwrite mode can now all be changed with the routine defaultpen(pen). Removed unused pen defaultpen() in favour of void defaultpen(), which resets all pen default attributes to their startup values. commit e2ecafd9b096d7e4a75010fecd60c45d2a600806 Author: John Bowman Date: Sun Jan 16 01:26:46 2005 -0600 Added missing == and != operators for struct tree. commit 412e97c76d466ae84a4e56ec076ca29c00999ae0 Author: John Bowman Date: Sun Jan 16 01:15:54 2005 -0600 Replaced defaultlinewidth and defaultfontsize commands with defaultpen(pen). Moved reset() into plain.asy. commit 179dcd0adea6b670da41fe33f84bf11cd6e3e205 Author: John Bowman Date: Sun Jan 16 00:11:03 2005 -0600 Added configure option to detect xdr/rpc header files. commit f9a3b185bc891daa6fd7d66f6d3233b730f5a152 Author: John Bowman Date: Sat Jan 15 18:45:32 2005 -0600 Fixed 2d graph bugs 1102574 and 1102396 and related bugs. Added XEquals and YEquals axis types. Allow all axis types to optionally extend to dimensions of picture; updated documentation. Simplified routine for drawing perpendicular symbols in math.asy. commit 76ac05ba021c34a68832d247b270e01ce4220a24 Author: Tom Prince Date: Fri Jan 14 15:30:51 2005 -0600 Store operands with opcode, rather than in the following inst. commit aef57d9197897694e6911f627c80a61d19080087 Author: Tom Prince Date: Wed Jan 12 12:45:37 2005 -0600 markTrans and markTransAsField are utility functions that don't need to be redefined. commit e1087baecb7ef73eff4d934cd25f027d6c4aed70 Author: Tom Prince Date: Wed Jan 12 12:36:53 2005 -0600 Clean up header file dependencies. commit c724002d32be1004787b82212cacbe4582f19ef9 Author: John Bowman Date: Wed Jan 12 11:17:35 2005 -0600 Made currentpen static. commit 1352343c1a7709c47e4fce15e68c521b1c22265f Author: John Bowman Date: Tue Jan 11 22:42:27 2005 -0600 Use $(MAKE) rather than make everywhere within Makefile. commit 5e84364254a41a0fe7d0a6cd12309885ee580beb Author: John Bowman Date: Tue Jan 11 22:14:09 2005 -0600 Increment version to 0.58cvs. commit 54eaa3dc057e3196c84465af73df75931ab6eee7 Author: John Bowman Date: Tue Jan 11 21:52:01 2005 -0600 Removed direction(path, real) and direction(path, int) in favour of dir(path, real t=1) and dir(path, int t=1). Added examples. commit c1a18de5cc1f5e30109c2ebe9712947c6420abc3 Author: John Bowman Date: Tue Jan 11 17:29:22 2005 -0600 Made overwrite mode a pen attribute; updated documentation. commit a5ccb6bc1b3a58cb9b44ae349b42ac4888ebceb9 Author: Tom Prince Date: Tue Jan 11 13:31:37 2005 -0600 symbol::trans accepts a std::string not a char*. commit 4d2e3f5c77081c4d761bae7df317606808b372f1 Author: Tom Prince Date: Tue Jan 11 13:30:26 2005 -0600 Fix typo in comment. commit 08c6e5a90e6d18b3dd4a9566ef9d61069bfa6e42 Author: John Bowman Date: Tue Jan 11 02:55:28 2005 -0600 Fixed infinite loop bug in overwrite mode. Added synonym dir(path,int) for direction(path,int), etc. commit 0255eb36c53d59fb955edd23c57cd8003202de08 Author: John Bowman Date: Mon Jan 10 22:04:30 2005 -0600 Fixed rgb to cmyk routine and added cmyk to rgb routine. Added -cmyk and -rgb command options. Made labelx and labely routines position labels consistently with axis routines by default. Generalized baseline routine and moved from texfile.cc into plain.asy. Adjusted logo for new labeling system. commit 9db1f8cf0de5a928a03399df79b7e8316ba340f6 Author: John Bowman Date: Sun Jan 9 18:10:02 2005 -0600 Increment version to 0.57cvs. commit c8cda1546a2579b1dbfd24b6d15abd49506e3bb9 Author: John Bowman Date: Sun Jan 9 17:16:50 2005 -0600 Make PSViewer and PDFViewer search conform to documented behaviour. commit 94572dc2968e18d4572302af3f830a66c7af8620 Author: John Bowman Date: Sun Jan 9 15:43:21 2005 -0600 Implemented radial gradient shading; updated documentation. commit 0f7766c8f6779ad7c5468be9945f2887a8be5ab1 Author: John Bowman Date: Sun Jan 9 12:35:09 2005 -0600 Make patterns work with xasy. An explicit picture is now required in order to specify preamble to shipout. Added scientific diagram and graphs to documentation to illustrate the minipage function, secondary axes, and the drawabout function. The new real[[] colors(pen) function returns the color components of a pen. commit cd537b6768ade3f2cdb7ba912ade0af6279021cd Author: John Bowman Date: Sun Jan 9 03:02:17 2005 -0600 Added tiling patterns and gradient shading. Added linecap and linejoin pen specifiers. Updated documentation with examples of new features. commit aaf64a2145422d16d037ee04b07ce2554ea79cfa Author: John Bowman Date: Thu Jan 6 21:47:04 2005 -0600 Minor interp and secondary axis updates. commit a373e2dcb2a74ee31114e131de29bfcb014e2541 Author: John Bowman Date: Thu Jan 6 16:28:55 2005 -0600 New postscript-coordinate shift option for label routines; pictures added to pictures now transform properly; updated documentation. commit 82c0764670b6a7f37ace3f5dda4875ee7ad05cf6 Author: John Bowman Date: Thu Jan 6 04:20:46 2005 -0600 Added secondary axis facility; fixed scaling bug. commit cf18a044a97393249e58865a01dbe5ed28308d56 Author: John Bowman Date: Thu Jan 6 04:19:12 2005 -0600 minor formatting. commit 0496fd3486693a313fe88a9a359839cfe21659db Author: John Bowman Date: Thu Jan 6 04:17:36 2005 -0600 Removed unused currentframe variable; updated documentation. commit 0c452d1f963e32f6e926bca7ec00fc396db2cb19 Author: John Bowman Date: Wed Jan 5 17:19:22 2005 -0600 Further csv and linemode updates. commit f14fd7bedf633f95bf0239e826dfbe5e5e380a58 Author: John Bowman Date: Wed Jan 5 10:21:16 2005 -0600 Fixed cvs+line mode bugs. commit 5ab4963be063b0f7d2dd775568187bde9ac900af Author: John Bowman Date: Wed Jan 5 10:20:56 2005 -0600 label positioning update commit 19e601b4bea4a9f290fb14f843e643da29f8c863 Author: John Bowman Date: Wed Jan 5 10:20:26 2005 -0600 minor formatting. commit 62e16369244e6571bcd88a369506fc3f1d4ade76 Author: John Bowman Date: Wed Jan 5 01:01:23 2005 -0600 Updated documentation. commit f63d68663956b533252bc0a78249e42d3696f20d Author: John Bowman Date: Wed Jan 5 00:38:08 2005 -0600 Fixed "label with arrow" routine. Removed outarrow in favour of drawabout. Updated documentation regarding new optional position argument of path labels (draw and drawabout). commit 40922670c83aac9b39075818d3bb7526cfd9f5d2 Author: John Bowman Date: Tue Jan 4 22:00:13 2005 -0600 Align labels before adding label bounding box fuzz. commit 1caf33aa48700401e8dab5c1935e8371e9075974 Author: John Bowman Date: Tue Jan 4 21:58:24 2005 -0600 Use math italic axis labels. commit 6dde5903fd8d69da16ac521a882378962fb28355 Author: John Bowman Date: Tue Jan 4 13:07:41 2005 -0600 Updated. commit e6b8f714ddbcedc1ccec4f01ddc619d9c38ccc25 Author: John Bowman Date: Tue Jan 4 13:05:08 2005 -0600 Added function name to "cannot call...with" error messages. commit 4a3368cbfb9236718c1b1a7b230cf1edb71aa4f1 Author: John Bowman Date: Tue Jan 4 01:34:48 2005 -0600 Improved and tightened label bounding box calculation. commit c8261d01c8415dea7b1fea9889fbf944819d9481 Author: John Bowman Date: Tue Jan 4 01:32:19 2005 -0600 Made "cannot call type...with" diagnostic easier to read. commit b82e62c0d0854c00c26077d2385598fb04594b75 Author: John Bowman Date: Tue Dec 28 09:21:41 2004 -0600 label and arrow adjustments commit 00d5f86a020491c3073e6dda1d230dcb0dd475fd Author: John Bowman Date: Mon Dec 27 02:01:56 2004 -0600 Added minipage and outarrow routines. commit 9419fe6b15870e2957e644a3a9ee2d1f0299401b Author: John Bowman Date: Sun Dec 26 19:55:48 2004 -0600 Fixed TeX pipestream embedded newline & diagnostic problems. commit 561d061bf19dc2362472501129e1ebc015fabd26 Author: John Bowman Date: Sun Dec 26 14:20:02 2004 -0600 implement scaling of pic.userMin and pic.userMax. commit 64d80cf6a37510d81393daf0f942476fcd1dbadd Author: John Bowman Date: Wed Dec 22 23:01:33 2004 -0600 Added newpage() command. commit f9cdb946b50ac96b37efbc3b4dfaa68ae2fc590b Author: John Bowman Date: Wed Dec 22 19:16:14 2004 -0600 Improved and simplified label code. commit 892d597f69da58ba3ba5b67429e1235acb6d1afc Author: John Bowman Date: Wed Dec 22 15:06:19 2004 -0600 More label updates. commit 4659686d9b2805523740b67f193e5b3c37c7d0fa Author: John Bowman Date: Wed Dec 22 04:01:04 2004 -0600 Label updates. commit 2d7b642ffe65007488bfc592c1507b63e085aa6a Author: John Bowman Date: Tue Dec 21 02:07:25 2004 -0600 Improved label bounding boxes. commit 2ec3be9a1f88fb33e8eb9262ce8952023a3253a4 Author: John Bowman Date: Sun Dec 19 22:00:22 2004 -0600 Account for depth in label alignment code. commit 5bdeee5c93e43828cd8aa635cb3b3569bc56e39d Author: John Bowman Date: Fri Dec 17 12:35:21 2004 -0600 Fine tuning of label offset (dependent on pdf/-B). commit 68795714227237c2a8b801c94655b17fd68aa3a0 Author: John Bowman Date: Thu Dec 16 22:17:16 2004 -0600 Increment version to 0.56cvs. commit c1848c51139c559fa78b22188ffeeca159159393 Author: John Bowman Date: Thu Dec 16 17:52:04 2004 -0600 Force use of bison (not yacc). commit 733caf46643c96adcf045194ace7a8e07d796740 Author: John Bowman Date: Thu Dec 16 17:32:16 2004 -0600 Fixed warning messages. commit 46d94ddec5bf8cae60d4fbefe41d22599cc75b8d Author: John Bowman Date: Thu Dec 16 17:26:09 2004 -0600 ispell updates commit 16a8cb94f1d988c8c9c692d650969a41e4203f30 Author: John Bowman Date: Thu Dec 16 17:21:08 2004 -0600 Documentation updates. commit 8d0c569a4a72ae24dfe71dea21bcb1d5ee008aa3 Author: John Bowman Date: Thu Dec 16 17:05:14 2004 -0600 Improved latex diagnostics. commit 01c3773cac71bca3bb99dfb3f7d0b25d44d6bf7c Author: John Bowman Date: Thu Dec 16 13:14:58 2004 -0600 Updated documentation. commit 14362d4f7e3ca6d9d0e40fab297a8ee5716ea04e Author: John Bowman Date: Thu Dec 16 12:45:54 2004 -0600 Contributed examples. commit 43708329adf0949d989844f64cc450b7fa7ac3e3 Author: John Bowman Date: Thu Dec 16 10:11:08 2004 -0600 Added cuttings global variable. commit 609ddb221c006700de7c30e4889adb8e7c0ed65e Author: John Bowman Date: Wed Dec 15 23:42:14 2004 -0600 Moved metapost compatibility routines to separate file. commit 9a92f1894780cec1d9534486c95e6efeb0372e3a Author: John Bowman Date: Wed Dec 15 22:52:04 2004 -0600 Perhaps a more sensible alternative to Metapost cutbefore/cutafter/cuttings. commit b88706095832297bcd9e463186774609d0708e59 Author: John Bowman Date: Wed Dec 15 10:31:40 2004 -0600 updated coordinate commit ea0e02d149d6aece9779f489aad5786c6b259364 Author: John Bowman Date: Wed Dec 15 10:30:10 2004 -0600 Added translator name. commit 4bfe6a48fb575f02c0c98d856312f62620096158 Author: John Bowman Date: Wed Dec 15 10:26:31 2004 -0600 Added before(path,path) and after(path,path); documented cutbefore and cutafter and changed them to work always according to these specificiations. commit 247f2c248f437b9379881e211a964ecafc232749 Author: John Bowman Date: Tue Dec 14 18:39:21 2004 -0600 Fixed bug [ 1084667 ] asydef environment. commit d4ef44de4281cca95cdb72f4dcb9922d2c4acd7f Author: John Bowman Date: Tue Dec 14 18:24:27 2004 -0600 Fixed bug [ 1084641 ] problem with defaultfontsize. commit a4e65629f8a48ea09e5e0cbbc7d062385eb1e66c Author: John Bowman Date: Tue Dec 14 13:02:12 2004 -0600 In texPreamble: replaced newlines with spaces as they can break bidirectional TeX pipe. commit d6c73c7eaefcd11cb92cd75d52a30ee2d9e7651f Author: John Bowman Date: Mon Dec 13 13:01:12 2004 -0600 Simplified axis capping. commit fb95bf6850216bc1d903af28a9a8005853863128 Author: John Bowman Date: Mon Dec 13 11:30:01 2004 -0600 Fix override of axis label positioning. commit f1a5727ccfb4e9f723bf1acd11347d3fdaf79ad2 Author: John Bowman Date: Mon Dec 13 00:55:30 2004 -0600 Fixed bug 1084016: error in bounding box computation. commit 23b64ac7a6602335900098e1640768dc0ed941f5 Author: John Bowman Date: Sun Dec 12 18:05:09 2004 -0600 Partial port of featpost 3D package for MetaPost. commit 320e428228b01938b5e69ccd6b82d205ea6f52ca Author: John Bowman Date: Sun Dec 12 18:04:06 2004 -0600 Added operator == and != for vector class. Added interp routine for pairs, vectors, and pens. Added pen background=white, unfill, cutbefore, and cutafter. Documentation updates. commit 608a705714b209ca86cbf3621ac2194659ca4c99 Author: John Bowman Date: Sun Dec 12 17:59:33 2004 -0600 Changed default structure operator == to alias (as with arrays) to allow user-defined == operators on structures. Also removed != in favour of !alias. commit 79a7f7cc6d694897096ad895e0ddf8efa86cb61c Author: John Bowman Date: Sat Dec 11 14:59:39 2004 -0600 Handle invalid operators cleanly. commit fdd1a3d7fa0609fdbea0b4909b6538c95e43f207 Author: John Bowman Date: Fri Dec 10 18:32:52 2004 -0600 Updated bug report address. commit 7a57e3d9ab684bcda09d72c5991246bb8bccbeae Author: John Bowman Date: Fri Dec 10 17:10:39 2004 -0600 Fixed nullpath bugs. commit 6e27209f37882761c0f6a74ae1a209a8a462baad Author: John Bowman Date: Fri Dec 10 17:10:21 2004 -0600 Installation updates commit cbdb816fe0b86d3e4a7f071b15486be6429e402f Author: John Bowman Date: Fri Dec 10 12:17:20 2004 -0600 Make info and man directories if missing. commit f21a0af80d2556dda3c38ee9a0364330a42e2c15 Author: John Bowman Date: Fri Dec 10 11:57:18 2004 -0600 Added missing include. commit c0e2fe27a9127d79235dcb0032dbefe077c20215 Author: John Bowman Date: Fri Dec 10 11:55:11 2004 -0600 Simplified configuration. commit 9496f9fa0cb6577c20b2ea25098cb0bb4fabfd0d Author: John Bowman Date: Thu Dec 9 23:32:49 2004 -0600 Documentation updates. commit 844078449f34d728658e81a22ac49dfb22239aa8 Author: Andy Hammerlindl Date: Thu Dec 9 12:41:11 2004 -0600 Fixed tension atleast bug. commit 21a37d0bb0de1e76cebfed3b9fe787091cff8a9e Author: John Bowman Date: Sun Dec 5 12:32:56 2004 -0600 Improved axis label sizing. commit 57a8d747c34cd815620c43fb83f87c40c21cad04 Author: John Bowman Date: Sun Dec 5 12:31:11 2004 -0600 Remove signal(SIGCHLD, SIG_IGN): there are no remaining problems with zombies, and it causes other problems with gv. commit 0082483b02988e1ef08d8a75006c59504bbd54fd Author: John Bowman Date: Sun Dec 5 11:38:47 2004 -0600 Fixed typo. commit d1d3ee0f2fcedbb0e03d2ce4e29c54c02f2dc247 Author: John Bowman Date: Sun Dec 5 04:26:52 2004 -0600 Increment version to 0.55cvs. commit e6ed67fbf2e30e2e96ddb7a3b974203f52d8858b Author: John Bowman Date: Sun Dec 5 03:19:43 2004 -0600 Fixed graph sizing routines; added legendsize routine (useful for compensating for space taken up by external legend); the default width in asymptote.sty is now the full line width. commit 19ff04b4ed6b980c753b803ce43a70c7d8d2a529 Author: John Bowman Date: Sun Dec 5 03:10:08 2004 -0600 Added missing mkdir. commit 65acc41943ca624b0459c6e7863b7f4ac002e2ca Author: John Bowman Date: Sat Dec 4 17:07:57 2004 -0600 Center EPS figures on page by default. Added support for a4 paper as well as letter. Default postscript offset is now 0,0. Option -B (-T) aligns to bottom (top) of page. commit d3b7d14ad20d9b156f56738034eef6fb5687e2ea Author: John Bowman Date: Sat Dec 4 15:15:09 2004 -0600 Applied Hubert Chan's installation patch for Debian. Moved examples, asy.vim, and asy-mode.el to /usr/local/share/doc/asymptote/ asymptote/asymptote.sty is now installed in /usr/share/texmf/tex/latex/ (./configure --with-latex=PATH to override). Fixed typos; updated documentation and changed documentation license from GFDL to GPL in view of Debian position statement: http://people.debian.org/~srivasta/Position_Statement.xhtml Added man pages asy.1 and xasy.1x kindly provided by Hubert. commit 7d2f6d6fa49034e0598f05cac3e11ca86c509cfe Author: John Bowman Date: Sat Dec 4 14:42:17 2004 -0600 Fixed -with-latex=PATH. commit c943ad90d0ac2f8fed5350309228bc5cc83390fb Author: John Bowman Date: Sat Dec 4 14:03:09 2004 -0600 Added --with-latex=PATH configuration option. commit a30de76dc85ad5bf91bcb1a48798f4da3a2c81be Author: John Bowman Date: Sat Dec 4 00:15:57 2004 -0600 Implemented better estimate for graph axis space requirements for more accurate graph sizing. Added Portrait, Landscape, and Seascape shipout orientations. commit 2aec4bf868dc89eb7e06cc312fbf025c359ef275 Author: John Bowman Date: Fri Dec 3 12:15:14 2004 -0600 Bounding box & diagnostic tweaks. commit 285d1fe69feae78bb63d1f0381c808b51ac7db17 Author: John Bowman Date: Fri Dec 3 08:52:52 2004 -0600 Added missing header to make cxx compiler happy. commit cb5ef6cb8974e01b38d54df21cb67363faded74a Author: John Bowman Date: Fri Dec 3 08:31:00 2004 -0600 Reworked dvips and gs pdfwrite interface: do a post-bbox correction rather than using dvips -E (which ignores postscript label rotation). Align figures to top-left corner (unless the new -b option is given, in which case the bottom-left corner is used), to allow for direct printing of the generated EPS files. User can override default offset of 18bp. Updated documentation. commit 81af3cccfbc4df4288150cc2610649fcd7cde843 Author: John Bowman Date: Fri Dec 3 08:23:35 2004 -0600 Adjusted label alignment. commit 4aaa2cdefca7c4e99f635baef5e613792a560889 Author: John Bowman Date: Thu Dec 2 12:54:48 2004 -0600 Reinstate label bounding box determination; xequals and yequals routines will still work as expected if crop is called. commit 6edc66fadf3d00871d2ec0be1451af8c1fe35116 Author: John Bowman Date: Thu Dec 2 03:00:42 2004 -0600 Use dvips -E (encapsulation; this works now that bbox coordinates are non-negative) instead of -T (pagesize) to fix compatibility problems in the final postscript output. Made corresponding adjustments to printer offset code. Added support and documentation for using Postscript viewers other than gv. Fixed filename extension detection so that filenames containing ./ and ../ work correctly. commit 3a0267f4b9f5facd271d9106fe145fbfbe80bc4e Author: John Bowman Date: Thu Dec 2 02:54:00 2004 -0600 Fixed typo. commit c09cb8a65f3eeb409285cae3c722938cf8debff0 Author: John Bowman Date: Wed Dec 1 10:56:39 2004 -0600 Patches for bison, flex, and gv-3.5.8 now in patches directory. commit 92e5b28cd0bb6148653040bfc80d9acda90b8601 Author: John Bowman Date: Wed Dec 1 10:52:27 2004 -0600 Arrow and bars should always be drawn with solid linetype. commit db3c6e1299be872a321662d775e166ad9b751dd2 Author: John Bowman Date: Tue Nov 30 18:50:49 2004 -0600 Changed dots(pair[]) to dot(pair[]); added graph(pair(real),real,real). commit e31faae2c7a1315c9a5de99a8599173cce784bfa Author: John Bowman Date: Tue Nov 30 15:03:29 2004 -0600 Fixed typo. commit 4bab7c466503339267efdc8e069e4f8a56a14d9e Author: John Bowman Date: Tue Nov 30 14:53:16 2004 -0600 Simplified dot drawing function, distinguished it from Dot product, and updated documentation and examples. commit f9308bfd3717313c829d72d6656274cbcc2ddf00 Author: John Bowman Date: Tue Nov 30 09:00:14 2004 -0600 Added array diagnostics. commit 98217e95781cfbd4e93190af5679f7ea8c783f73 Author: John Bowman Date: Mon Nov 29 02:29:29 2004 -0600 Added qualifier. commit 08f4525440924eaf85789f1dd36c47ea938bbfde Author: John Bowman Date: Mon Nov 29 02:20:52 2004 -0600 Resolved infinite import recursion bug [24Nov04] by using libsigsegv to distinguish between stack overflows and real segmentation violations (due to C++ programming errors). commit 569040e16f23def486223a2f8a5f084ae76d8ea5 Author: John Bowman Date: Sun Nov 28 17:22:15 2004 -0600 Deferred drawing should respect clipping bounds. commit 72ef182760c1e9578353dd694a726b762475853a Author: John Bowman Date: Sun Nov 28 16:01:11 2004 -0600 Removed obsolete label bbox code from xequals and yequals to make them work correctly. commit c6b45485728c0e652cc1764479fa0c235c220fbb Author: John Bowman Date: Sat Nov 27 22:55:25 2004 -0600 Updated documentation. commit 02e65f5c0716c70809c8a95243a4cc2b2998a53b Author: John Bowman Date: Sat Nov 27 22:08:47 2004 -0600 Improved dot(): if dotsize not specified, use linewidth(pen)*dotfactor. commit d2cc042489e63ebb765ce7e6b3299e68a8ba1789 Author: John Bowman Date: Sat Nov 27 22:02:04 2004 -0600 Implement implicit cast from real to pen linewidth. commit fab6a02bf7945e31a431bc9d3a4d4cf51df44307 Author: John Bowman Date: Sat Nov 27 22:01:28 2004 -0600 Cleaned up pen code. commit 4205a65a204c8627acdd2b574c9930df98a409dd Author: John Bowman Date: Sat Nov 27 10:13:32 2004 -0600 tex() not layer() should force label processing. commit ea4fda59c7b4ff4c281379600f2b75c905fa1a30 Author: John Bowman Date: Fri Nov 26 19:23:49 2004 -0600 Increment version to 0.54. commit 21010d8460c5f1d5cc9e106592b087d92c9a7273 Author: John Bowman Date: Fri Nov 26 18:19:53 2004 -0600 Added preliminary 3d graphics routines & documentation. commit 497764f5fdbbf2012aaffc6606a0708c87309988 Author: John Bowman Date: Fri Nov 26 17:37:42 2004 -0600 Added Bug 24Nov04. commit 0b9c4a1496e99f3c592697c7d7b7b6ef6c6af41a Author: John Bowman Date: Fri Nov 26 17:01:19 2004 -0600 Fixed transform bug (yx->xy) reported by Jacques. commit c8b620eaa7f84e6ded045e55ae623dcc91db5b1e Author: John Bowman Date: Fri Nov 26 13:44:02 2004 -0600 Makefile for doc directory. commit 3b421e3fab2572473a6636e6ec4fedfb1ddf09aa Author: John Bowman Date: Fri Nov 26 12:58:25 2004 -0600 Math and documentation updates. commit af96406cc03aa4fe42509ded49e0c82a24861b12 Author: John Bowman Date: Thu Nov 25 22:22:39 2004 -0600 Fixed intersect(vector,vector,vector,vector); commit 8dab8f056f0a2ceaa6f21956a98e451559ee8a53 Author: John Bowman Date: Thu Nov 25 13:00:37 2004 -0600 Handle out of bounds indices properly in straight(path,int). commit b19ec7c936c3fd765992e1157e491f643bf08de4 Author: John Bowman Date: Thu Nov 25 10:31:25 2004 -0600 Fixed intersect(vector,vector,vector,vector). commit 131d60d368782480e5f767c0b8060b4373b0a70c Author: John Bowman Date: Wed Nov 24 23:21:41 2004 -0600 Avoid duplicate import messages when verbose > 1. commit 610c16529cea2a4ff77262c49e4404b0b4fef395 Author: John Bowman Date: Tue Nov 23 13:27:50 2004 -0600 Make layer() work also when there are no labels. commit 6fec2af78eeee9ccb6ceb6e2572ef371028bb5d6 Author: John Bowman Date: Tue Nov 23 12:41:35 2004 -0600 Fixed bbox function; added dot product for pairs and vectors. commit d058ed95ec698e5d29d7201f57018b166bad99f4 Author: John Bowman Date: Tue Nov 23 10:33:58 2004 -0600 Added missing xor boolean binary operator. commit 723d63cc3c14965550a0d4a1f8c24c0b57b9bb91 Author: John Bowman Date: Tue Nov 23 10:31:20 2004 -0600 add(picture, picture) now adjusts userMin and userMax. commit c5910e2d5349db115723dc52c67161d0a68d7621 Author: John Bowman Date: Sun Nov 21 17:31:02 2004 -0600 Ignore attempts to close stdin and stdout. commit 0a5e346e5552a7bc180051e67f3264c62ad9cc97 Author: John Bowman Date: Sun Nov 21 17:05:42 2004 -0600 Fixed nullFile. commit 8e66bee71948d945acb35aa2d573a9168a83adab Author: John Bowman Date: Sun Nov 21 12:19:31 2004 -0600 Simplified configuration; documented GNU_GETOPT_H. commit db7cd2366884368bf28a72e05047df64ea84fc0a Author: John Bowman Date: Sun Nov 21 11:41:27 2004 -0600 renamed camp::stdout to camp::Stdout to make FreeBSD happy. commit 6a4f52a0f03b9b9bf5e73358b0c39875046466d9 Author: John Bowman Date: Sun Nov 21 11:10:22 2004 -0600 Added reference to mailing list. commit 0f135b435e70580b46aa8992faa19072c312be03 Author: John Bowman Date: Sun Nov 21 11:05:10 2004 -0600 Removed email addresses. commit b9c2b04d177b4a8cf872be63603fc2505139f6c8 Author: John Bowman Date: Sun Nov 21 10:52:23 2004 -0600 Fixed formatting. commit 801eb67d0d9f69b0642f4a8955204aff00eb0b16 Author: John Bowman Date: Sun Nov 21 10:36:15 2004 -0600 updated distclean commit bc7d4f892bea91e37cd8771a74be6154324d6f68 Author: John Bowman Date: Sun Nov 21 02:39:36 2004 -0600 Fixed memory leaks. commit 84f8442033be2736dae165d29a711d783a13a41f Author: John Bowman Date: Sun Nov 21 02:03:42 2004 -0600 Fixed memory leak. commit 91ce66042763624421e9842d28ef71bc6af0e8e5 Author: John Bowman Date: Sun Nov 21 00:29:49 2004 -0600 Readline library should be reasonably up-to-date (Version 4.3 and 5.0 have both been tested; asy won't even compile with very old versions). commit a9cf50c561bb4025ea970151a5b25e45e45e3425 Author: John Bowman Date: Sun Nov 21 00:20:56 2004 -0600 Template used to extract texinfo version from configure.ac. commit f2f566f48fcf2c153a6563726677f9a50f65469c Author: John Bowman Date: Sun Nov 21 00:19:58 2004 -0600 More FreeBSD tweaks. commit 1b62f5150641e6b7aca7359610d948d875aacb86 Author: John Bowman Date: Sun Nov 21 00:19:17 2004 -0600 Revert stdout optimization. commit 7ce475cda9d27c16ff719db8a41f3cd1d23ef0b5 Author: John Bowman Date: Sat Nov 20 21:22:59 2004 -0600 Fixed typo. commit cd879a5a3bfed30699894b2060ffd82f642e0c47 Author: John Bowman Date: Sat Nov 20 21:21:09 2004 -0600 make install-all now depends on all commit 5dc6a42dc07ee535bbb095baa92e704f36209337 Author: John Bowman Date: Sat Nov 20 19:46:41 2004 -0600 Port to FreeBSD 4.10-RELEASE-p2 with gcc34. commit a4107efb6bd1b449e1b8fcc0c63112f1da1cdea0 Author: John Bowman Date: Sat Nov 20 15:51:57 2004 -0600 Patches for clean compilation under CXX and other compilers. commit 88d63e93cf27e0af8acd8f4c026ab709479660e8 Author: John Bowman Date: Sat Nov 20 12:51:31 2004 -0600 include tweaks commit fa8719f36c73bbca73ce75f857531e8d2db35348 Author: John Bowman Date: Sat Nov 20 12:00:20 2004 -0600 Menu updates. commit adc7d6279f193edad3d72a798a938214999a26c3 Author: John Bowman Date: Sat Nov 20 11:36:52 2004 -0600 Fixed up discussion of static vs. dynamic commit f33671066cc96d5d95a098a5abe0656d9d8c5813 Author: John Bowman Date: Fri Nov 19 22:53:36 2004 -0600 Check if file is closed before doing any reads or writes. commit f6b7f7bc42965730d51de5c9aadf66b8d94e8075 Author: John Bowman Date: Fri Nov 19 22:53:29 2004 -0600 Added sentence about linetype-adjustment based on arclength of path. commit 12c0a82afdafc91e5c5170ffc4a53edf8c62f88a Author: John Bowman Date: Fri Nov 19 16:29:52 2004 -0600 Default width of figures included with asymptote.sty is now 0.9\linewidth. commit 878455b6e5d0c597921832e49d7136535ac13f3f Author: Andy Hammerlindl Date: Fri Nov 19 16:24:25 2004 -0600 *** empty log message *** commit 6eea86bfcd0adea30d3f86f77a9ede20aa1df0dc Author: John Bowman Date: Fri Nov 19 16:13:03 2004 -0600 Bug 2004-17-11 fixed. commit 36838d7981d3987c4e746559e0cce70a9225f95f Author: Andy Hammerlindl Date: Fri Nov 19 14:50:59 2004 -0600 New classes from the env -> env and coder split. commit fcb3de9fddd82fcb22fcdc53d5ba2e7bff56f08f Author: Andy Hammerlindl Date: Fri Nov 19 14:49:45 2004 -0600 Split the env class into env and coder, and added coenv. Added "self-importing". commit 9d6ebe01c90e679a41471af70c9d7ed79c559655 Author: John Bowman Date: Fri Nov 19 13:29:35 2004 -0600 Figures included via asymptote.sty are now fully independent; updated documentation. commit 52cd2cc10e20913f21d2fa3584b96f5ba19a1f33 Author: John Bowman Date: Fri Nov 19 09:18:14 2004 -0600 Remove dependency of graph.asy on math.asy; added builtin real abs(pair) and int sgn(real) functions. commit 40eb013f88e09d3faee9450e4251e64815b98013 Author: John Bowman Date: Thu Nov 18 23:26:45 2004 -0600 Renamed includegraphics to include. commit f5364450443b6e5665eab99d3daa1702e2f74858 Author: John Bowman Date: Thu Nov 18 16:50:06 2004 -0600 Added BUGS file. commit 97160f4c77f2be1d111061ee47bd3e9800a245e8 Author: John Bowman Date: Thu Nov 18 14:09:11 2004 -0600 Added layer function. commit 576f5152045b83fe681e81e129b6bdcdc2405255 Author: John Bowman Date: Thu Nov 18 14:05:11 2004 -0600 Added layer and includegraphics functions. commit d0aac5aa876b29ac907e4979c830e9d9829f1405 Author: John Bowman Date: Thu Nov 18 14:04:01 2004 -0600 Added install-all target. commit 1362c4f2073bbd5f1dcc8dfadad51a44b30261ac Author: John Bowman Date: Wed Nov 17 22:16:20 2004 -0600 Fixed typo. commit 985b1d486350fc6e2be207b6c718163ef11c5528 Author: John Bowman Date: Wed Nov 17 11:54:37 2004 -0600 Minor optimizations. commit 608bd681d814f599738c3d132afca3ceb2123012 Author: John Bowman Date: Tue Nov 16 23:32:01 2004 -0600 Removed unused dynamic keyword. commit 51ba77aac1c609ed242c6d68c36d3fd096f0edfe Author: John Bowman Date: Tue Nov 16 16:25:06 2004 -0600 Fixed bug: (path) (nullpath--(0,0)--(100,0)--cycle) was missing final node. commit 418ee6a6c51185817ead6fcbc45fb02cf724ccae Author: John Bowman Date: Mon Nov 15 12:10:37 2004 -0600 Switched from jpg to png images. commit 5bac11e119d1fbffd620ee85e54819912543bded Author: John Bowman Date: Mon Nov 15 00:23:59 2004 -0600 Make variables in file-level modules dynamic by default, like everywhere else. commit b71ff38c28b119ba7f758db7b5b0c1a775258062 Author: John Bowman Date: Sun Nov 14 23:52:36 2004 -0600 Support old versions of install-info. commit 31df852a681c3a7512a1f400ff160cad83201fa0 Author: Andy Hammerlindl Date: Sun Nov 14 20:17:32 2004 -0600 Changed error message for static vs. dynamic errors. commit b812243f2e2ec390c6d91bdba80ae5bd29055174 Author: John Bowman Date: Sun Nov 14 18:48:09 2004 -0600 Moved Legend[] legend inside picture structure; shipout(frame) now adds gui() entries and legend; shipout always deconstructs its picture argument. commit 2f3ce72638f7345515478e7fd1239986cb7ef7bd Author: John Bowman Date: Sun Nov 14 18:45:13 2004 -0600 Fixed compiler warning message if HAVE_LIBFFTW3 is undefined. commit d6329e24d8d9ef6fb4bced54ad2c0e0fa25f1504 Author: John Bowman Date: Sun Nov 14 18:43:30 2004 -0600 removed unnecessary vm:: qualifier commit ec3cc188f1f87ee29ff8fb8a03074c0afffa3680 Author: Andy Hammerlindl Date: Sun Nov 14 18:23:21 2004 -0600 Refactored the equivalent type function. commit 95180b35c3df1f18ee05fd66e02d1ae43d99c343 Author: John Bowman Date: Sun Nov 14 18:12:55 2004 -0600 Added unistd.h include. commit 47d1a0c525b4c8799b0e4443aa61949e9af32254 Author: John Bowman Date: Fri Nov 12 19:55:36 2004 -0600 Increment version. commit b0ed6c9b5514a5e02abfd3be9bf7ab26091169ca Author: John Bowman Date: Fri Nov 12 16:19:44 2004 -0600 release: Version 0.52 commit 616c4d1abc667a430d0768709949bebc24956790 Author: John Bowman Date: Fri Nov 12 15:59:54 2004 -0600 Made import graph local to each figure in latexusage. commit ba5d7f3060b087454a02bd2f7f79487ee2c4edf1 Author: John Bowman Date: Fri Nov 12 15:03:05 2004 -0600 added call to crop commit 6a34a72588eb300f57f899f4ced21aa9b6f5d57b Author: John Bowman Date: Fri Nov 12 14:51:33 2004 -0600 Documentation updates commit 5470c04f907ab9f832734e96914662aed35b0c4b Author: John Bowman Date: Fri Nov 12 12:54:34 2004 -0600 Allow qualification of variables in imported modules with (quoted) nonalphanumeric names; added ISO 8859-1 support (latin1). commit 5d19c564436dd1f96d86293ec8fc9f439aa5fb94 Author: John Bowman Date: Fri Nov 12 01:19:36 2004 -0600 Improved xlimits, ylimits, limits routines. Added crop routine. commit 365495bb65ef64683118cede97ca47adcd56b3b2 Author: John Bowman Date: Fri Nov 12 00:18:59 2004 -0600 Fixed various graph scaling problems. commit 39820dcee67bcb5d1817c60bda996d00bc348152 Author: John Bowman Date: Wed Nov 10 11:49:27 2004 -0600 minor formatting changes commit 97ec1247f54a8a0b5357118b6734352eca9a34a0 Author: John Bowman Date: Wed Nov 10 11:32:05 2004 -0600 Encapsulated global graph scaling variables within picture; updated documentation. commit 83b65356fb2a5b1f9d8c92c0762a3bc2f744fedc Author: John Bowman Date: Tue Nov 9 12:45:09 2004 -0600 fixed missing word on first page commit cd6c145e4a962015b614c18d939140d40f2b5dce Author: John Bowman Date: Tue Nov 9 12:44:22 2004 -0600 Added dots(pair); fixed division by zero in arrowhead for degenerate paths. commit e699111cfa5bfbf41c9fb574bde171a093536809 Author: John Bowman Date: Tue Nov 9 01:55:45 2004 -0600 Increment version. commit 31c13bbe9d051c54aac6051cfda68612df499d33 Author: John Bowman Date: Tue Nov 9 00:08:08 2004 -0600 Missing description commit c62bec9c482884523ccadd379edd34f67c5e4d2b Author: John Bowman Date: Mon Nov 8 23:54:35 2004 -0600 fixed missing @code commit d8ea0103c797070c787f5f890c4b2401690a2945 Author: John Bowman Date: Mon Nov 8 23:34:47 2004 -0600 moved to doc/ commit 3ddefd4eff344e676e2a8a9f5e19cd32ed9aa0eb Author: John Bowman Date: Mon Nov 8 23:28:34 2004 -0600 Fixed problems with installation of base files from cvs. commit da8c687ac5ec2be2c818d84c9e97e723f485a26a Author: John Bowman Date: Mon Nov 8 23:10:40 2004 -0600 updated cvsignore entries commit dba6643b3b853fce3f2de5e41e47ed8b71cf099b Author: John Bowman Date: Mon Nov 8 22:50:37 2004 -0600 Added optimization flags. commit 0436f92dcb74953fc3bb748230e5a29d0730fd1d Author: John Bowman Date: Mon Nov 8 22:50:04 2004 -0600 Added optimization flags. commit db450befc0d01549b9c53af8fc5646c6d110d574 Author: John Bowman Date: Mon Nov 8 22:37:03 2004 -0600 Added instructions for asy-mode.el and asy.vim. commit a0e9333119818dc1592791a5078676cae36eca2c Author: John Bowman Date: Mon Nov 8 18:48:55 2004 -0600 unicode updates commit d0f20f5cfc0e9d958ab4a0793e1e0cccbec31d65 Author: John Bowman Date: Mon Nov 8 13:18:05 2004 -0600 Corrected local value of ASYMPTOTE_DIR commit b3857ef4fae8c20e1fbc4852c302fc44a1988cc2 Author: John Bowman Date: Mon Nov 8 12:22:32 2004 -0600 Fixed warning messages. commit 2adbb10378f06aecb049da9b6da02ed9b23bd0fb Author: John Bowman Date: Mon Nov 8 12:11:03 2004 -0600 Update cvs version commit a83b4974fc41dde098be1a222b4240ce0ea8feaa Author: John Bowman Date: Mon Nov 8 12:06:53 2004 -0600 Asymptote logo commit b345871de175eed69610a6ac96996f67b1c07a8f Author: John Bowman Date: Mon Nov 8 12:03:15 2004 -0600 Updated README and URL. commit 5c97b1a8b45f7ba5370f381ee53e948353a7daba Author: John Bowman Date: Mon Nov 8 11:52:02 2004 -0600 Example of latex usage. commit d71e3c7017fa75e11f4c0228caf1123553006cda Author: John Bowman Date: Mon Nov 8 11:39:13 2004 -0600 displayed equation example commit 7021ba702776cc5e337025f1625803e4067d376d Author: John Bowman Date: Mon Nov 8 11:35:58 2004 -0600 updates to localwords commit d4199ebd8601704b3e1e0b6f54d1fcdf3430b478 Author: John Bowman Date: Mon Nov 8 11:31:39 2004 -0600 typo fixed commit 377185edb2c7dca51b3b3f00504e72d065495b97 Author: John Bowman Date: Mon Nov 8 11:28:23 2004 -0600 Final documentation updates. commit 50806de05e5b6c19b0df9345e278c8259ebafeb0 Author: John Bowman Date: Mon Nov 8 11:23:09 2004 -0600 make install-man no longer does a make man commit c751286c5070b8f4e40909cbf54bdc7266a49982 Author: John Bowman Date: Mon Nov 8 11:21:30 2004 -0600 Final tweaks before release. commit d113158cdd9b36e3c45a4db4d39dbc2b91144aa1 Author: John Bowman Date: Mon Nov 8 00:24:38 2004 -0600 Updates to facilitate building info pages and figures. commit c3d8c3b7da2f6ceb84900a4e26618e8533092b08 Author: John Bowman Date: Mon Nov 8 00:23:30 2004 -0600 Updated documentation. commit eef5bb1c1657e77885799591cf982d1dbd6ab608 Author: John Bowman Date: Sun Nov 7 23:22:17 2004 -0600 Updated documentation commit d09249b9dfed161600e6c1aa332721b9e8b0c6c4 Author: John Bowman Date: Sun Nov 7 23:05:05 2004 -0600 Fixed interactive mode. commit 93a889f31435adc3851b081cd0709f55e2031688 Author: John Bowman Date: Sun Nov 7 17:02:25 2004 -0600 Example of multiple data graphs with secondary axis. commit 87cef6cf1df4f16b971dc52eb4f5c52d39d49e9b Author: John Bowman Date: Sun Nov 7 16:32:44 2004 -0600 Fixed menus. commit 5a97218e8c5371f76d23d0304e8336dc62f07f79 Author: John Bowman Date: Sun Nov 7 16:31:19 2004 -0600 Added a reset() function to restore settings to startup defaults. commit 2c124d11951789640019cdb62fb9062f22700db2 Author: John Bowman Date: Sun Nov 7 16:28:30 2004 -0600 Formatting of comments. commit 048da481e7e14b7d937a8db3e2349212c5864163 Author: John Bowman Date: Sun Nov 7 16:27:32 2004 -0600 Documentation updates. commit 0b26fa75ab89038ac2950312e78b95e68641205e Author: John Bowman Date: Sun Nov 7 01:08:29 2004 -0600 Added missing functions; removed pt from plain.asy; updated documentation commit 7803748c35eb80c46c1175517f31fb20cfc7ece7 Author: John Bowman Date: Fri Nov 5 11:16:40 2004 -0600 Added GNU public LICENSE. commit 2b333b9b4907b6c2a9200e8ddc89b9a09d7d0e66 Author: John Bowman Date: Fri Nov 5 11:13:47 2004 -0600 Documentation updates. commit 45357092d3ebf51f9b0c7d82e1a05610abf5f565 Author: John Bowman Date: Fri Nov 5 00:37:35 2004 -0600 Updated documentation. commit 82153ab432256c8e32d48ffc98e12b2bf41a7576 Author: John Bowman Date: Thu Nov 4 00:45:40 2004 -0600 Documentation updates. commit c9dd522eca27b074b3f04f5f2799e02c2adb7933 Author: John Bowman Date: Tue Nov 2 23:20:51 2004 -0600 Allow negative array indices in arrayIntArray as in arrayRead and arrayWrite. commit fec561b75b55c779d89eca9c9ea6dce758df8eb1 Author: John Bowman Date: Tue Nov 2 23:13:26 2004 -0600 Allow assignment to array indices [-len,-1]; handle negative array indices in sequence routines. commit 962962b19d4ce3af442a461f5051f3eb856bd299 Author: John Bowman Date: Tue Nov 2 13:10:24 2004 -0600 Added missing pen transformation code. commit d3e2ac4b4a0af6bdeaee28bb5742844928f24026 Author: John Bowman Date: Mon Nov 1 11:23:54 2004 -0600 minor updates commit a1457afb992cf18a85a8cce07ff9306cae5a282f Author: John Bowman Date: Sun Oct 31 23:27:35 2004 -0600 Check for boost header files; updated documentation. commit fab31bbeb056e157742e94531443b8b82218d465 Author: John Bowman Date: Thu Oct 28 23:04:37 2004 -0600 Updated documentation. commit 7b66b69511f9b742bcc674e47101a71e9b670326 Author: John Bowman Date: Thu Oct 28 23:04:20 2004 -0600 Make -O work when dvips isn't used. commit 873b67e55dfad98287e13941e79984c0e64d688a Author: John Bowman Date: Thu Oct 28 15:26:57 2004 -0600 Sean Healy's logo implemented in Asymptote. commit 83660c66186bfc76ccdc858aafda6ab89d05cd08 Author: John Bowman Date: Tue Oct 26 09:05:04 2004 -0600 Initial version. commit 23e61146aa827a5faa4b94fa47506277a365005b Author: John Bowman Date: Tue Oct 26 07:38:06 2004 -0600 Removed unwanted cvs files. commit 35fdf59891ddb8786fe964d9f945f995088680cd Author: John Bowman Date: Tue Oct 26 07:31:01 2004 -0600 Set version = 0.50. commit b0bf033492246c01f5262a7ec4a44255675127d7 Author: John Bowman Date: Tue Oct 26 07:29:34 2004 -0600 Fixed warning message if HAVE_STRTIME == 0 commit c4702ee14e622bba47870ced5e25270f550d7c0f Author: John Bowman Date: Tue Oct 26 07:27:12 2004 -0600 Initial revision. [[This repository was converted from Subversion to git on 2015-07-27 by Jesse Frohlich . Junk commits generated by cvs2svn have been removed and commit references have been mapped into a uniform VCS-independent syntax.]] ./asymptote-2.41/absyn.h0000644000175000017500000000200613064427076015026 0ustar norbertnorbert/**** * absyn.h * Andy Hammerlindl 2002/07/14 * * Defines the basic types of abstract syntax objects using forward * class declarations. *****/ #ifndef ABSYN_H #define ABSYN_H #include "common.h" #include "errormsg.h" // For position // Forward declaration for markPos. namespace trans { class coenv; } namespace absyntax { class absyn : public gc { protected: const position pos; void markPos(trans::coenv& c); public: absyn(position pos) : pos(pos) {} virtual ~absyn(); position getPos() const { return pos; } virtual void prettyprint(ostream &out, Int indent) = 0; private: // Non-copyable void operator=(const absyn&); absyn(const absyn&); }; void prettyindent(ostream &out, Int indent); void prettyname(ostream &out, string name, Int indent); class name; class ty; class varinit; class exp; class runnable; class stm; class dec; class block; typedef block file; // This is the abstract syntax tree of a file, assigned to when running // yyparse. extern file *root; } #endif ./asymptote-2.41/keywords.cc0000644000175000017500000000114113064427112015705 0ustar norbertnorbert/***** * This file is automatically generated by keywords.pl. * Changes will be overwritten. *****/ ADD(and); ADD(controls); ADD(tension); ADD(atleast); ADD(curl); ADD(if); ADD(else); ADD(while); ADD(for); ADD(do); ADD(return); ADD(break); ADD(continue); ADD(struct); ADD(typedef); ADD(new); ADD(access); ADD(import); ADD(unravel); ADD(from); ADD(include); ADD(quote); ADD(static); ADD(public); ADD(private); ADD(restricted); ADD(this); ADD(explicit); ADD(true); ADD(false); ADD(null); ADD(cycle); ADD(newframe); ADD(operator); ADD(quit); ADD(q); ADD(exit); ADD(reset); ADD(erase); ADD(help); ADD(input); ./asymptote-2.41/genv.cc0000644000175000017500000000613113064427076015012 0ustar norbertnorbert/***** * genv.cc * Andy Hammerlindl 2002/08/29 * * This is the global environment for the translation of programs. In * actuality, it is basically a module manager. When a module is * requested, it looks for the corresponding filename, and if found, * parses and translates the file, returning the resultant module. * * genv sets up the basic type bindings and function bindings for * builtin functions, casts and operators, and imports plain (if set), * but all other initialization is done by the local environment defined * in env.h. *****/ #include #include #include #include "genv.h" #include "env.h" #include "dec.h" #include "stm.h" #include "types.h" #include "settings.h" #include "runtime.h" #include "parser.h" #include "locate.h" #include "interact.h" #include "builtin.h" using namespace types; using settings::getSetting; using settings::Setting; // Dynamic loading of external libraries. types::record *transExternalModule(trans::genv& ge, string filename, symbol id); namespace trans { genv::genv() : imap() { // Add settings as a module. This is so that the init file ~/.asy/config.asy // can set settings. imap["settings"]=settings::getSettingsModule(); // Translate plain in advance, if we're using autoplain. if(getSetting("autoplain")) { Setting("autoplain")=false; // Translate plain without autoplain. getModule(symbol::trans("plain"), "plain"); Setting("autoplain")=true; } #ifdef HAVE_LIBGSL imap["gsl"]=trans::getGSLModule(); #endif } bool endswith(string suffix, string str) { return std::equal(suffix.rbegin(), suffix.rend(), str.rbegin()); } record *genv::loadModule(symbol id, string filename) { // Hackish way to load an external library. #if 0 if (endswith(".so", filename)) { return transExternalModule(*this, filename, id); } #endif // Get the abstract syntax tree. absyntax::file *ast = parser::parseFile(filename,"Loading"); inTranslation.push_front(filename); em.sync(); record *r=ast->transAsFile(*this, id); inTranslation.remove(filename); return r; } void genv::checkRecursion(string filename) { if (find(inTranslation.begin(), inTranslation.end(), filename) != inTranslation.end()) { em.sync(); em << "error: recursive loading of module '" << filename << "'\n"; em.sync(); throw handled_error(); } } record *genv::getModule(symbol id, string filename) { checkRecursion(filename); record *r=imap[filename]; if (r) return r; else { record *r=loadModule(id, filename); // Don't add an erroneous module to the dictionary in interactive mode, as // the user may try to load it again. if (!interact::interactive || !em.errors()) imap[filename]=r; return r; } } typedef vm::stack::importInitMap importInitMap; importInitMap *genv::getInitMap() { struct initMap : public importInitMap, public gc { genv ≥ initMap(genv &ge) : ge(ge) {} lambda *operator[](string s) { record *r=ge.imap[s]; return r ? r->getInit() : 0; } }; return new initMap(*this); } } // namespace trans ./asymptote-2.41/symbol.h0000644000175000017500000000514613064427076015227 0ustar norbertnorbert/***** * symbol.h * Andy Hammerlindl 2002/06/18 * * Creates symbols from strings so that multiple calls for a symbol of * the same string will return an identical object. *****/ #ifndef SYMBOL_H #define SYMBOL_H #include #include #include "common.h" using std::ostream; namespace sym { void initTable(); struct GCInit { #ifdef _AIX typedef char * GC_PTR; #endif GCInit() { #ifdef USEGC GC_set_free_space_divisor(2); mem::compact(0); GC_INIT(); #endif // Put the symbol table into a state where symbols can be translated. initTable(); } }; typedef unsigned int uint; /* The symbol class, just a wrapper around the augmented hash value. This * wrapper is so that * cout << s << endl; * prints the symbol name instead of a meaningless integer. * * This is a lightweight class and should have no virtual functions for speed * reasons. */ struct symbol { // Is there any particular reason why this is in symbol? static GCInit initialize; uint hashplus; #if 0 symbol() {} symbol(uint h) : hashplus(h) {} #endif static symbol nullsym; static symbol initsym; static symbol castsym; static symbol ecastsym; bool special() const { return *this == initsym || *this == castsym || *this == ecastsym; } bool notSpecial() const { return !special(); } // Translate a string into a unique symbol, such that two strings are equal // if and only if their resulting symbols are equal. // len should be equal to strlen(s)+1 static symbol rawTrans(const char *s, size_t len); static symbol literalTrans(string s) { return rawTrans(s.c_str(), s.size() + 1); } static symbol opTrans(string s) { return literalTrans("operator "+s); } static symbol trans(string s) { // Figure out whether it's an operator or an identifier by looking at the // first character. char c=s[0]; return isalpha(c) || c == '_' ? literalTrans(s) : opTrans(s); } // Make a symbol that is guaranteed to be unique. It will not match any other // symbol in the namespace. static symbol gensym(string s); size_t hash() const { return (size_t)this->hashplus; } friend bool operator== (symbol s1, symbol s2) { return s1.hashplus == s2.hashplus; } friend bool operator!= (symbol s1, symbol s2) { return s1.hashplus != s2.hashplus; } friend bool operator< (symbol s1, symbol s2) { return s1.hashplus < s2.hashplus; } operator bool () const { return this->hashplus != 0; } operator string () const; friend ostream& operator<< (ostream& out, const symbol sym); }; } // end namespace #endif // SYMBOL_H ./asymptote-2.41/drawsurface.h0000644000175000017500000004617613064427076016240 0ustar norbertnorbert/***** * drawsurface.h * * Stores a surface that has been added to a picture. *****/ #ifndef DRAWSURFACE_H #define DRAWSURFACE_H #include "drawelement.h" #include "arrayop.h" #include "path3.h" #include "beziercurve.h" #include "bezierpatch.h" namespace camp { #ifdef HAVE_GL void storecolor(GLfloat *colors, int i, const vm::array &pens, int j); #endif class drawSurface : public drawElement { protected: triple *controls; size_t ncontrols; triple center; bool straight; // True iff Bezier patch is planar and has straight edges. prc::RGBAColour diffuse; prc::RGBAColour ambient; prc::RGBAColour emissive; prc::RGBAColour specular; prc::RGBAColour *colors; double opacity; double shininess; double PRCshininess; bool invisible; Interaction interaction; triple Min,Max; bool prc; public: #ifdef HAVE_GL static BezierCurve C; #endif string wrongsize() { return (ncontrols == 16 ? "4x4" : "triangular")+ string(" array of triples and array of 4 pens required"); } drawSurface(const vm::array& g, size_t ncontrols, triple center, bool straight, const vm::array&p, double opacity, double shininess, double PRCshininess, const vm::array &pens, Interaction interaction, bool prc) : ncontrols(ncontrols), center(center), straight(straight), opacity(opacity), shininess(shininess), PRCshininess(PRCshininess), interaction(interaction), prc(prc) { if(checkArray(&g) != 4 || checkArray(&p) != 4) reportError(wrongsize()); size_t k=0; controls=new(UseGC) triple[ncontrols]; for(unsigned int i=0; i < 4; ++i) { vm::array *gi=vm::read(g,i); size_t n=(ncontrols == 16 ? 4 : i+1); if(checkArray(gi) != n) reportError(wrongsize()); for(unsigned int j=0; j < n; ++j) controls[k++]=vm::read(gi,j); } pen surfacepen=vm::read(p,0); invisible=surfacepen.invisible(); diffuse=rgba(surfacepen); ambient=rgba(vm::read(p,1)); emissive=rgba(vm::read(p,2)); specular=rgba(vm::read(p,3)); size_t nodes=(ncontrols == 16 ? 4 : 3); size_t size=checkArray(&pens); if(size > 0) { if(size != nodes) reportError("4 vertex pens required"); colors=new(UseGC) prc::RGBAColour[nodes]; for(size_t i=0; i < nodes; ++i) colors[i]=rgba(vm::read(pens,i)); } else colors=NULL; } drawSurface(const double* t, const drawSurface *s) : ncontrols(s->ncontrols), straight(s->straight), diffuse(s->diffuse), ambient(s->ambient), emissive(s->emissive), specular(s->specular), colors(s->colors), opacity(s->opacity), shininess(s->shininess), PRCshininess(s->PRCshininess), invisible(s->invisible), interaction(s->interaction), prc(s->prc) { if(s->controls) { controls=new(UseGC) triple[ncontrols]; for(unsigned int i=0; i < ncontrols; ++i) controls[i]=t*s->controls[i]; } else controls=NULL; #ifdef HAVE_GL center=t*s->center; #endif } virtual ~drawSurface() {} bool is3D() {return true;} }; class drawBezierPatch : public drawSurface { public: #ifdef HAVE_GL static BezierPatch S; #endif drawBezierPatch(const vm::array& g, triple center, bool straight, const vm::array&p, double opacity, double shininess, double PRCshininess, const vm::array &pens, Interaction interaction, bool prc) : drawSurface(g,16,center,straight,p,opacity,shininess,PRCshininess,pens, interaction,prc) {} drawBezierPatch(const double* t, const drawBezierPatch *s) : drawSurface(t,s) { } void bounds(const double* t, bbox3& b); void ratio(const double* t, pair &b, double (*m)(double, double), double fuzz, bool &first); bool write(prcfile *out, unsigned int *, double, groupsmap&); void render(GLUnurbs *nurb, double, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent); drawElement *transformed(const double* t); }; class drawBezierTriangle : public drawSurface { public: #ifdef HAVE_GL static BezierTriangle S; #endif drawBezierTriangle(const vm::array& g, triple center, bool straight, const vm::array&p, double opacity, double shininess, double PRCshininess, const vm::array &pens, Interaction interaction, bool prc) : drawSurface(g,10,center,straight,p,opacity,shininess,PRCshininess, pens,interaction,prc) {} drawBezierTriangle(const double* t, const drawBezierTriangle *s) : drawSurface(t,s) { } void bounds(const double* t, bbox3& b); void ratio(const double* t, pair &b, double (*m)(double, double), double fuzz, bool &first); bool write(prcfile *out, unsigned int *, double, groupsmap&); void render(GLUnurbs *nurb, double, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent); drawElement *transformed(const double* t); }; class drawNurbs : public drawElement { protected: size_t udegree,vdegree; size_t nu,nv; triple *controls; double *weights; double *uknots, *vknots; prc::RGBAColour diffuse; prc::RGBAColour ambient; prc::RGBAColour emissive; prc::RGBAColour specular; double opacity; double shininess; double PRCshininess; triple normal; bool invisible; triple Min,Max; #ifdef HAVE_GL GLfloat *colors; GLfloat *Controls; GLfloat *uKnots; GLfloat *vKnots; #endif public: drawNurbs(const vm::array& g, const vm::array* uknot, const vm::array* vknot, const vm::array* weight, const vm::array&p, double opacity, double shininess, double PRCshininess, const vm::array &pens) : opacity(opacity), shininess(shininess), PRCshininess(PRCshininess) { size_t weightsize=checkArray(weight); const string wrongsize="Inconsistent NURBS data"; nu=checkArray(&g); if(nu == 0 || (weightsize != 0 && weightsize != nu) || checkArray(&p) != 4) reportError(wrongsize); vm::array *g0=vm::read(g,0); nv=checkArray(g0); size_t n=nu*nv; controls=new(UseGC) triple[n]; size_t k=0; for(size_t i=0; i < nu; ++i) { vm::array *gi=vm::read(g,i); if(checkArray(gi) != nv) reportError(wrongsize); for(size_t j=0; j < nv; ++j) controls[k++]=vm::read(gi,j); } if(weightsize > 0) { size_t k=0; weights=new(UseGC) double[n]; for(size_t i=0; i < nu; ++i) { vm::array *weighti=vm::read(weight,i); if(checkArray(weighti) != nv) reportError(wrongsize); for(size_t j=0; j < nv; ++j) weights[k++]=vm::read(weighti,j); } } else weights=NULL; size_t nuknots=checkArray(uknot); size_t nvknots=checkArray(vknot); if(nuknots <= nu+1 || nuknots > 2*nu || nvknots <= nv+1 || nvknots > 2*nv) reportError(wrongsize); udegree=nuknots-nu-1; vdegree=nvknots-nv-1; run::copyArrayC(uknots,uknot,0,UseGC); run::copyArrayC(vknots,vknot,0,UseGC); pen surfacepen=vm::read(p,0); invisible=surfacepen.invisible(); diffuse=rgba(surfacepen); ambient=rgba(vm::read(p,1)); emissive=rgba(vm::read(p,2)); specular=rgba(vm::read(p,3)); #ifdef HAVE_GL Controls=NULL; int size=checkArray(&pens); if(size > 0) { colors=new(UseGC) GLfloat[16]; if(size != 4) reportError(wrongsize); storecolor(colors,0,pens,0); storecolor(colors,8,pens,1); storecolor(colors,12,pens,2); storecolor(colors,4,pens,3); } else colors=NULL; #endif } drawNurbs(const double* t, const drawNurbs *s) : udegree(s->udegree), vdegree(s->vdegree), nu(s->nu), nv(s->nv), weights(s->weights), uknots(s->uknots), vknots(s->vknots), diffuse(s->diffuse), ambient(s->ambient), emissive(s->emissive), specular(s->specular), opacity(s->opacity), shininess(s->shininess), PRCshininess(s->PRCshininess), invisible(s->invisible) { const size_t n=nu*nv; controls=new(UseGC) triple[n]; for(unsigned int i=0; i < n; ++i) controls[i]=t*s->controls[i]; #ifdef HAVE_GL Controls=NULL; colors=s->colors; #endif } bool is3D() {return true;} void bounds(const double* t, bbox3& b); virtual ~drawNurbs() {} bool write(prcfile *out, unsigned int *, double, groupsmap&); void displacement(); void ratio(const double* t, pair &b, double (*m)(double, double), double, bool &first); void render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent); drawElement *transformed(const double* t); }; // Draw a transformed PRC object. class drawPRC : public drawElementLC { protected: prc::RGBAColour diffuse; prc::RGBAColour ambient; prc::RGBAColour emissive; prc::RGBAColour specular; double opacity; double shininess; bool invisible; public: drawPRC(const vm::array& t, const vm::array&p, double opacity, double shininess) : drawElementLC(t), opacity(opacity), shininess(shininess) { string needfourpens="array of 4 pens required"; if(checkArray(&p) != 4) reportError(needfourpens); pen surfacepen=vm::read(p,0); invisible=surfacepen.invisible(); diffuse=rgba(surfacepen); ambient=rgba(vm::read(p,1)); emissive=rgba(vm::read(p,2)); specular=rgba(vm::read(p,3)); } drawPRC(const double* t, const drawPRC *s) : drawElementLC(t,s), diffuse(s->diffuse), ambient(s->ambient), emissive(s->emissive), specular(s->specular), opacity(s->opacity), shininess(s->shininess), invisible(s->invisible) { } bool write(prcfile *out, unsigned int *, double, groupsmap&) { return true; } virtual void transformedbounds(const double*, bbox3&) {} virtual void transformedratio(const double*, pair&, double (*)(double, double), double, bool&) {} }; // Draw a PRC unit sphere. class drawSphere : public drawPRC { bool half; int type; public: drawSphere(const vm::array& t, bool half, const vm::array&p, double opacity, double shininess, int type) : drawPRC(t,p,opacity,shininess), half(half), type(type) {} drawSphere(const double* t, const drawSphere *s) : drawPRC(t,s), half(s->half), type(s->type) {} void P(triple& t, double x, double y, double z); bool write(prcfile *out, unsigned int *, double, groupsmap&); drawElement *transformed(const double* t) { return new drawSphere(t,this); } }; // Draw a PRC unit cylinder. class drawCylinder : public drawPRC { public: drawCylinder(const vm::array& t, const vm::array&p, double opacity, double shininess) : drawPRC(t,p,opacity,shininess) {} drawCylinder(const double* t, const drawCylinder *s) : drawPRC(t,s) {} bool write(prcfile *out, unsigned int *, double, groupsmap&); drawElement *transformed(const double* t) { return new drawCylinder(t,this); } }; // Draw a PRC unit disk. class drawDisk : public drawPRC { public: drawDisk(const vm::array& t, const vm::array&p, double opacity, double shininess) : drawPRC(t,p,opacity,shininess) {} drawDisk(const double* t, const drawDisk *s) : drawPRC(t,s) {} bool write(prcfile *out, unsigned int *, double, groupsmap&); drawElement *transformed(const double* t) { return new drawDisk(t,this); } }; // Draw a PRC tube. class drawTube : public drawElement { protected: path3 center; path3 g; prc::RGBAColour diffuse; prc::RGBAColour ambient; prc::RGBAColour emissive; prc::RGBAColour specular; double opacity; double shininess; bool invisible; public: drawTube(path3 center, path3 g, const vm::array&p, double opacity, double shininess) : center(center), g(g), opacity(opacity), shininess(shininess) { string needfourpens="array of 4 pens required"; if(checkArray(&p) != 4) reportError(needfourpens); pen surfacepen=vm::read(p,0); invisible=surfacepen.invisible(); diffuse=rgba(surfacepen); ambient=rgba(vm::read(p,1)); emissive=rgba(vm::read(p,2)); specular=rgba(vm::read(p,3)); } drawTube(const double* t, const drawTube *s) : center(camp::transformed(t,s->center)), g(camp::transformed(t,s->g)), diffuse(s->diffuse), ambient(s->ambient), emissive(s->emissive), specular(s->specular), opacity(s->opacity), shininess(s->shininess), invisible(s->invisible) { } bool write(prcfile *out, unsigned int *, double, groupsmap&); drawElement *transformed(const double* t) { return new drawTube(t,this); } }; // Draw a PRC pixel. class drawPixel : public drawElement { triple v; prc::RGBAColour c; double width; bool invisible; public: drawPixel(const triple& v0, const pen& p, double width) : c(rgba(p)), width(width) { v=v0; invisible=p.invisible(); } drawPixel(const double* t, const drawPixel *s) : c(s->c), width(s->width), invisible(s->invisible) { v=t*s->v; } void bounds(const double* t, bbox3& b) { const triple R=0.5*width*triple(1.0,1.0,1.0); if (t != NULL) { triple tv; tv=t*v; b.add(tv-R); b.add(tv+R); } else { b.add(v-R); b.add(v+R); } } void render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent); bool write(prcfile *out, unsigned int *, double, groupsmap&); drawElement *transformed(const double* t) { return new drawPixel(t,this); } }; class drawBaseTriangles : public drawElement { protected: size_t nP; triple* P; size_t nN; triple* N; size_t nI; uint32_t (*PI)[3]; uint32_t (*NI)[3]; triple Min,Max; static const string wrongsize; static const string outofrange; public: drawBaseTriangles(const vm::array& v, const vm::array& vi, const vm::array& n, const vm::array& ni) { nP=checkArray(&v); P=new(UseGC) triple[nP]; for(size_t i=0; i < nP; ++i) P[i]=vm::read(v,i); nI=checkArray(&vi); PI=new(UseGC) uint32_t[nI][3]; for(size_t i=0; i < nI; ++i) { vm::array *vii=vm::read(vi,i); if(checkArray(vii) != 3) reportError(wrongsize); uint32_t *PIi=PI[i]; for(size_t j=0; j < 3; ++j) { size_t index=unsignedcast(vm::read(vii,j)); if(index >= nP) reportError(outofrange); PIi[j]=index; } } nN=checkArray(&n); if(nN) { N=new(UseGC) triple[nN]; for(size_t i=0; i < nN; ++i) N[i]=vm::read(n,i); if(checkArray(&ni) != nI) reportError("Index arrays have different lengths"); NI=new(UseGC) uint32_t[nI][3]; for(size_t i=0; i < nI; ++i) { vm::array *nii=vm::read(ni,i); if(checkArray(nii) != 3) reportError(wrongsize); uint32_t *NIi=NI[i]; for(size_t j=0; j < 3; ++j) { size_t index=unsignedcast(vm::read(nii,j)); if(index >= nN) reportError(outofrange); NIi[j]=index; } } } } drawBaseTriangles(const double* t, const drawBaseTriangles *s) : nP(s->nP), nN(s->nN), nI(s->nI) { P=new(UseGC) triple[nP]; for(size_t i=0; i < nP; i++) P[i]=t*s->P[i]; PI=new(UseGC) uint32_t[nI][3]; for(size_t i=0; i < nI; ++i) { uint32_t *PIi=PI[i]; uint32_t *sPIi=s->PI[i]; for(size_t j=0; j < 3; ++j) PIi[j]=sPIi[j]; } if(nN) { N=new(UseGC) triple[nN]; for(size_t i=0; i < nN; i++) N[i]=transformNormal(t,s->N[i]); NI=new(UseGC) uint32_t[nI][3]; for(size_t i=0; i < nI; ++i) { uint32_t *NIi=NI[i]; uint32_t *sNIi=s->NI[i]; for(size_t j=0; j < 3; ++j) NIi[j]=sNIi[j]; } } } bool is3D() {return true;} void bounds(const double* t, bbox3& b); void ratio(const double* t, pair &b, double (*m)(double, double), double fuzz, bool &first); virtual ~drawBaseTriangles() {} drawElement *transformed(const double* t) { return new drawBaseTriangles(t,this); } }; class drawTriangles : public drawBaseTriangles { size_t nC; prc::RGBAColour*C; uint32_t (*CI)[3]; // Asymptote material data prc::RGBAColour diffuse; prc::RGBAColour ambient; prc::RGBAColour emissive; prc::RGBAColour specular; double opacity; double shininess; double PRCshininess; bool invisible; public: drawTriangles(const vm::array& v, const vm::array& vi, const vm::array& n, const vm::array& ni, const vm::array&p, double opacity, double shininess, double PRCshininess, const vm::array& c, const vm::array& ci) : drawBaseTriangles(v,vi,n,ni), opacity(opacity), shininess(shininess), PRCshininess(PRCshininess) { const string needfourpens="array of 4 pens required"; if(checkArray(&p) != 4) reportError(needfourpens); const pen surfacepen=vm::read(p,0); invisible=surfacepen.invisible(); diffuse=rgba(surfacepen); nC=checkArray(&c); if(nC) { C=new(UseGC) prc::RGBAColour[nC]; for(size_t i=0; i < nC; ++i) C[i]=rgba(vm::read(c,i)); size_t nI=checkArray(&vi); if(checkArray(&ci) != nI) reportError("Index arrays have different lengths"); CI=new(UseGC) uint32_t[nI][3]; for(size_t i=0; i < nI; ++i) { vm::array *cii=vm::read(ci,i); if(checkArray(cii) != 3) reportError(wrongsize); uint32_t *CIi=CI[i]; for(size_t j=0; j < 3; ++j) { size_t index=unsignedcast(vm::read(cii,j)); if(index >= nC) reportError(outofrange); CIi[j]=index; } } } else { ambient=rgba(vm::read(p,1)); emissive=rgba(vm::read(p,2)); } specular=rgba(vm::read(p,3)); } drawTriangles(const double* t, const drawTriangles *s) : drawBaseTriangles(t,s), nC(s->nC), diffuse(s->diffuse), ambient(s->ambient), emissive(s->emissive), specular(s->specular), opacity(s->opacity), shininess(s->shininess), PRCshininess(s->PRCshininess), invisible(s->invisible) { if(nC) { C=new(UseGC) prc::RGBAColour[nC]; for(size_t i=0; i < nC; ++i) C[i]=s->C[i]; CI=new(UseGC) uint32_t[nI][3]; for(size_t i=0; i < nI; ++i) { uint32_t *CIi=CI[i]; uint32_t *sCIi=s->CI[i]; for(size_t j=0; j < 3; ++j) CIi[j]=sCIi[j]; } } } virtual ~drawTriangles() {} void render(GLUnurbs *nurb, double size2, const triple& Min, const triple& Max, double perspective, bool lighton, bool transparent); bool write(prcfile *out, unsigned int *, double, groupsmap&); drawElement *transformed(const double* t) { return new drawTriangles(t,this); } }; } #endif ./asymptote-2.41/runmath.h0000644000175000017500000000041513064427126015366 0ustar norbertnorbert/***** Autogenerated from runmath.in; changes will be overwritten *****/ #ifndef runmath_H #define runmath_H namespace run { void boolMemEq(vm::stack *); void boolMemNeq(vm::stack *); void boolFuncEq(vm::stack *); void boolFuncNeq(vm::stack *); } #endif // runmath_H ./asymptote-2.41/tr.h0000644000175000017500000000676713064427076014361 0ustar norbertnorbert/* This file is released under version 2 of the GNU Library General Public * License (see the files LICENSE.LIBRARY and LICENSE). */ /* $Id: tr.h,v 1.5 1997/07/21 17:34:07 brianp Exp $ */ /* * $Log: tr.h,v $ * Revision 1.5 1997/07/21 17:34:07 brianp * added tile borders, incremented version to 1.1 * * Revision 1.4 1997/07/21 15:47:35 brianp * renamed all "near" and "far" variables * * Revision 1.3 1997/04/26 21:23:25 brianp * added trRasterPos3f function * * Revision 1.2 1997/04/19 23:26:10 brianp * many API changes * * Revision 1.1 1997/04/18 21:53:05 brianp * Initial revision * */ /* * Tiled Rendering library * Version 1.1 * Copyright (C) Brian Paul * * * This library allows one to render arbitrarily large images with OpenGL. * The basic idea is to break the image into tiles which are rendered one * at a time. The tiles are assembled together to form the final, large * image. Tiles and images can be of any size. * * Basic usage: * * 1. Allocate a tile rendering context: * TRcontext t = trNew(); * * 2. Specify the final image buffer and tile size: * GLubyte image[W][H][4] * trImageSize(t, W, H); * trImageBuffer(t, GL_RGBA, GL_UNSIGNED_BYTE, (GLubyte *) image); * * 3. Setup your projection: * trFrustum(t, left, right, bottom top, near, far); * or * trOrtho(t, left, right, bottom top, near, far); * or * trPerspective(t, fovy, aspect, near, far); * * 4. Render the tiles: * do { * trBeginTile(t); * DrawMyScene(); * } while (trEndTile(t)); * * You provide the DrawMyScene() function which calls glClear() and * draws all your stuff. * * 5. The image array is now complete. Display it, write it to a file, etc. * * 6. Delete the tile rendering context when finished: * trDelete(t); * */ #ifndef TR_H #define TR_H #ifdef __APPLE__ #include #else #include #endif #ifdef __cplusplus extern "C" { #endif #define TR_VERSION "1.1" #define TR_MAJOR_VERSION 1 #define TR_MINOR_VERSION 1 typedef struct _TRctx TRcontext; typedef enum { TR_TILE_WIDTH = 100, TR_TILE_HEIGHT, TR_TILE_BORDER, TR_IMAGE_WIDTH, TR_IMAGE_HEIGHT, TR_ROWS, TR_COLUMNS, TR_CURRENT_ROW, TR_CURRENT_COLUMN, TR_CURRENT_TILE_WIDTH, TR_CURRENT_TILE_HEIGHT, TR_ROW_ORDER, TR_TOP_TO_BOTTOM, TR_BOTTOM_TO_TOP } TRenum; extern TRcontext *trNew(void); extern void trDelete(TRcontext *tr); extern void trTileSize(TRcontext *tr, GLint width, GLint height, GLint border); extern void trTileBuffer(TRcontext *tr, GLenum format, GLenum type, GLvoid *image); extern void trImageSize(TRcontext *tr, GLint width, GLint height); extern void trImageBuffer(TRcontext *tr, GLenum format, GLenum type, GLvoid *image); extern void trRowOrder(TRcontext *tr, TRenum order); extern GLint trGet(TRcontext *tr, TRenum param); extern void trOrtho(TRcontext *tr, GLdouble left, GLdouble right, GLdouble bottom, GLdouble top, GLdouble zNear, GLdouble zFar); extern void trFrustum(TRcontext *tr, GLdouble left, GLdouble right, GLdouble bottom, GLdouble top, GLdouble zNear, GLdouble zFar); extern void trPerspective(TRcontext *tr, GLdouble fovy, GLdouble aspect, GLdouble zNear, GLdouble zFar ); extern void trBeginTile(TRcontext *tr); extern int trEndTile(TRcontext *tr); extern void trRasterPos3f(TRcontext *tr, GLfloat x, GLfloat y, GLfloat z); #ifdef __cplusplus } #endif #endif ./asymptote-2.41/asy.rc0000644000175000017500000000140213064427076014662 0ustar norbertnorbertasy ICON PRELOAD "asy.ico" 1 VERSIONINFO FILEOS 0x40004 FILETYPE 0x1 FILESUBTYPE 0x0 BEGIN BLOCK "StringFileInfo" BEGIN BLOCK "040904b0" BEGIN VALUE "FileDescription", "Vector Graphics Language\0" VALUE "OriginalFilename", "asy.exe\0" VALUE "LegalCopyright", "Copyright \251 2005 Andy Hammerlindl, John Bowman, Tom Prince\0" VALUE "CompanyName", "Andy Hammerlindl, John Bowman, Tom Prince\0" VALUE "ProductName", "Asymptote\0" VALUE "ProductVersion", "ASYMPTOTE_VERSION\0" VALUE "GPL Copyleft", "Released under the GNU General Public License version 2\0" END END BLOCK "VarFileInfo" BEGIN VALUE "Translation", 0x409, 0x04b0 END END ./asymptote-2.41/lexical.h0000644000175000017500000000053113064427076015334 0ustar norbertnorbert#ifndef __lexical_h__ #define __lexical_h__ 1 #include #include "common.h" namespace lexical { class bad_cast {}; template T cast(const string& s, bool tolerant=false) { istringstream is(s); T value; if(is && is >> value && ((is >> std::ws).eof() || tolerant)) return value; throw bad_cast(); } } #endif ./asymptote-2.41/patches/0000755000175000017500000000000013064427076015172 5ustar norbertnorbert./asymptote-2.41/patches/gcc3.3.2curses.patch0000644000175000017500000000047613064427076020567 0ustar norbertnorbert*** curses.h.orig Sun Feb 11 21:43:36 2007 --- curses.h Sun Feb 11 21:43:21 2007 *************** *** 1302 **** ! #if defined(__USE_FIXED_PROTOTYPES__) || defined(__cplusplus) || defined (__STRICT_ANSI__) --- 1302 ---- ! #if 0 && (defined(__USE_FIXED_PROTOTYPES__) || defined(__cplusplus) || defined (__STRICT_ANSI__)) ./asymptote-2.41/patches/flex.patch0000644000175000017500000000276413064427076017162 0ustar norbertnorbertdiff -u flex-2.5.39/gen.c flex-2.5.39J/gen.c --- flex-2.5.39/gen.c 2014-03-26 06:46:44.000000000 -0600 +++ flex-2.5.39J/gen.c 2014-04-26 10:52:30.962073096 -0600 @@ -55,6 +55,14 @@ * 0 elements of its arrays, too.) */ +static const char *get_yy_char_decl (void) +{ + return (gentables) + ? "static yyconst YY_CHAR %s[%d] =\n { 0,\n" + : "static yyconst YY_CHAR * %s = 0;\n"; +} + + static const char *get_int16_decl (void) { return (gentables) @@ -465,7 +473,7 @@ register int i, j; int numrows; - out_str_dec (get_int32_decl (), "yy_ec", csize); + out_str_dec (get_yy_char_decl (), "yy_ec", csize); for (i = 1; i < csize; ++i) { ecgroup[i] = ABS (ecgroup[i]); @@ -1271,7 +1279,7 @@ fputs (_("\n\nMeta-Equivalence Classes:\n"), stderr); - out_str_dec (get_int32_decl (), "yy_meta", numecs + 1); + out_str_dec (get_yy_char_decl (), "yy_meta", numecs + 1); buf_prints (&yydmap_buf, "\t{YYTD_ID_META, (void**)&yy_meta, sizeof(%s)},\n", "flex_int32_t"); @@ -1516,11 +1524,11 @@ if (yymore_used && !yytext_is_array) { indent_puts ("YY_G(yytext_ptr) -= YY_G(yy_more_len); \\"); indent_puts - ("yyleng = (size_t) (yy_cp - YY_G(yytext_ptr)); \\"); + ("yyleng = (int) (yy_cp - YY_G(yytext_ptr)); \\"); } else - indent_puts ("yyleng = (size_t) (yy_cp - yy_bp); \\"); + indent_puts ("yyleng = (int) (yy_cp - yy_bp); \\"); /* Now also deal with copying yytext_ptr to yytext if needed. */ skelout (); /* %% [3.0] - break point in skel */ ./asymptote-2.41/patches/cygwin_glu.patch0000644000175000017500000000602713064427076020367 0ustar norbertnorbert--- w32api.orig/GL/glu.h 2014-04-18 22:30:50.186158900 -0600 +++ w32api/GL/glu.h 2014-04-18 22:42:59.095926900 -0600 @@ -108,8 +108,12 @@ typedef void (CALLBACK *GLUtessCombineDataProc)(GLdouble[3],void*[4],GLfloat[4],void**,void*); typedef void (CALLBACK *GLUnurbsErrorProc)(GLenum); +#define GLU_EXT_object_space_tess 1 +#define GLU_EXT_nurbs_tessellator 1 + #define GLU_VERSION_1_1 1 #define GLU_VERSION_1_2 1 +#define GLU_VERSION_1_3 1 #define GLU_INVALID_ENUM 100900 #define GLU_INVALID_VALUE 100901 @@ -183,7 +187,17 @@ #define GLU_SAMPLING_METHOD 100205 #define GLU_U_STEP 100206 #define GLU_V_STEP 100207 - +#define GLU_NURBS_MODE 100160 +#define GLU_NURBS_MODE_EXT 100160 +#define GLU_NURBS_TESSELLATOR 100161 +#define GLU_NURBS_TESSELLATOR_EXT 100161 +#define GLU_NURBS_RENDERER 100162 +#define GLU_NURBS_RENDERER_EXT 100162 + +#define GLU_OBJECT_PARAMETRIC_ERROR 100208 +#define GLU_OBJECT_PARAMETRIC_ERROR_EXT 100208 +#define GLU_OBJECT_PATH_LENGTH 100209 +#define GLU_OBJECT_PATH_LENGTH_EXT 100209 #define GLU_PATH_LENGTH 100215 #define GLU_PARAMETRIC_ERROR 100216 #define GLU_DOMAIN_DISTANCE 100217 @@ -194,6 +208,33 @@ #define GLU_OUTLINE_POLYGON 100240 #define GLU_OUTLINE_PATCH 100241 +#define GLU_NURBS_ERROR 100103 +#define GLU_ERROR 100103 +#define GLU_NURBS_BEGIN 100164 +#define GLU_NURBS_BEGIN_EXT 100164 +#define GLU_NURBS_VERTEX 100165 +#define GLU_NURBS_VERTEX_EXT 100165 +#define GLU_NURBS_NORMAL 100166 +#define GLU_NURBS_NORMAL_EXT 100166 +#define GLU_NURBS_COLOR 100167 +#define GLU_NURBS_COLOR_EXT 100167 +#define GLU_NURBS_TEXTURE_COORD 100168 +#define GLU_NURBS_TEX_COORD_EXT 100168 +#define GLU_NURBS_END 100169 +#define GLU_NURBS_END_EXT 100169 +#define GLU_NURBS_BEGIN_DATA 100170 +#define GLU_NURBS_BEGIN_DATA_EXT 100170 +#define GLU_NURBS_VERTEX_DATA 100171 +#define GLU_NURBS_VERTEX_DATA_EXT 100171 +#define GLU_NURBS_NORMAL_DATA 100172 +#define GLU_NURBS_NORMAL_DATA_EXT 100172 +#define GLU_NURBS_COLOR_DATA 100173 +#define GLU_NURBS_COLOR_DATA_EXT 100173 +#define GLU_NURBS_TEXTURE_COORD_DATA 100174 +#define GLU_NURBS_TEX_COORD_DATA_EXT 100174 +#define GLU_NURBS_END_DATA 100175 +#define GLU_NURBS_END_DATA_EXT 100175 + #define GLU_NURBS_ERROR1 100251 #define GLU_NURBS_ERROR2 100252 #define GLU_NURBS_ERROR3 100253 @@ -248,6 +289,13 @@ #define GLU_ERROR GLU_TESS_ERROR #define GLU_EDGE_FLAG GLU_TESS_EDGE_FLAG +/* Internal convenience typedefs */ +#ifdef __cplusplus +typedef void (APIENTRY *_GLUfuncptr)(); +#else +typedef void (APIENTRY *_GLUfuncptr)(GLvoid); +#endif + #ifdef __cplusplus } #endif ./asymptote-2.41/patches/bison.patch0000644000175000017500000001221613064427076017327 0ustar norbertnorbertdiff -ru bison-2.0a/data/yacc.c bison-2.0aJ/data/yacc.c --- bison-2.0a/data/yacc.c 2005-05-21 11:12:32.000000000 -0600 +++ bison-2.0aJ/data/yacc.c 2005-06-30 18:14:16.509158136 -0600 @@ -237,7 +237,7 @@ # ifdef YYSTACK_ALLOC /* Pacify GCC's `empty if-body' warning. */ -# define YYSTACK_FREE(Ptr) do { /* empty */; } while (0) +# define YYSTACK_FREE(Ptr) { /* empty */; } # ifndef YYSTACK_ALLOC_MAXIMUM /* The OS might guarantee only one guard page at the bottom of the stack, and a page size can be as small as 4096 bytes. So we cannot safely @@ -291,19 +291,20 @@ /* Copy COUNT objects from FROM to TO. The source and destination do not overlap. */ # ifndef YYCOPY -# if defined (__GNUC__) && 1 < __GNUC__ +# if defined (__GNUC__) +# if 1 < __GNUC__ # define YYCOPY(To, From, Count) \ __builtin_memcpy (To, From, (Count) * sizeof (*(From))) -# else +# endif +# endif +# endif +# ifndef YYCOPY # define YYCOPY(To, From, Count) \ - do \ { \ YYSIZE_T yyi; \ for (yyi = 0; yyi < (Count); yyi++) \ (To)[yyi] = (From)[yyi]; \ - } \ - while (0) -# endif + } # endif /* Relocate STACK from its old location to the new one. The @@ -312,15 +313,13 @@ stack. Advance YYPTR to a properly aligned location for the next stack. */ # define YYSTACK_RELOCATE(Stack) \ - do \ { \ YYSIZE_T yynewbytes; \ YYCOPY (&yyptr->Stack, Stack, yysize); \ Stack = &yyptr->Stack; \ yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \ yyptr += yynewbytes / sizeof (*yyptr); \ - } \ - while (0) + } #endif @@ -487,6 +486,7 @@ #define YYACCEPT goto yyacceptlab #define YYABORT goto yyabortlab #define YYERROR goto yyerrorlab +int yy_false=false; /* Used to suppress compiler warning about unused label */ /* Like YYERROR except do call yyerror. This remains here temporarily @@ -498,7 +498,7 @@ #define YYRECOVERING() (!!yyerrstatus) #define YYBACKUP(Token, Value) \ -do \ +{ \ if (yychar == YYEMPTY && yylen == 1) \ { \ yychar = (Token); \ @@ -512,7 +512,7 @@ yyerror (]b4_yyerror_args[_("syntax error: cannot back up")); \ YYERROR; \ } \ -while (0) +} #define YYTERROR 1 @@ -526,7 +526,7 @@ #define YYRHSLOC(Rhs, K) ((Rhs)[K]) #ifndef YYLLOC_DEFAULT # define YYLLOC_DEFAULT(Current, Rhs, N) \ - do \ + { \ if (N) \ { \ (Current).first_line = YYRHSLOC (Rhs, 1).first_line; \ @@ -541,7 +541,7 @@ (Current).first_column = (Current).last_column = \ YYRHSLOC (Rhs, 0).last_column; \ } \ - while (0) + } #endif @@ -550,7 +550,7 @@ we won't break user code: when these are the locations we know. */ #ifndef YY_LOCATION_PRINT -# if YYLTYPE_IS_TRIVIAL +# ifdef YYLTYPE_IS_TRIVIAL # define YY_LOCATION_PRINT(File, Loc) \ fprintf (File, "%d.%d-%d.%d", \ (Loc).first_line, (Loc).first_column, \ @@ -578,13 +578,13 @@ # endif # define YYDPRINTF(Args) \ -do { \ +{ \ if (yydebug) \ YYFPRINTF Args; \ -} while (0) +} # define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ -do { \ +{ \ if (yydebug) \ { \ YYFPRINTF (stderr, "%s ", Title); \ @@ -592,7 +592,7 @@ Type, Value]b4_location_if([, Location])[); \ YYFPRINTF (stderr, "\n"); \ } \ -} while (0) +} /*------------------------------------------------------------------. | yy_stack_print -- Print the state stack from its BOTTOM up to its | @@ -610,10 +610,10 @@ } # define YY_STACK_PRINT(Bottom, Top) \ -do { \ +{ \ if (yydebug) \ yy_stack_print ((Bottom), (Top)); \ -} while (0) +} /*------------------------------------------------. @@ -634,10 +634,10 @@ } # define YY_REDUCE_PRINT(Rule) \ -do { \ +{ \ if (yydebug) \ yy_reduce_print (Rule); \ -} while (0) +} /* Nonzero means print parse trace. It is left uninitialized so that multiple parsers can coexist. */ @@ -826,7 +826,7 @@ /* When reducing, the number of symbols on the RHS of the reduced rule. */ - int yylen; + int yylen=0; YYDPRINTF ((stderr, "Starting parse\n")); @@ -874,7 +874,7 @@ yyssp++; yysetstate: - *yyssp = yystate; + *yyssp = (short int) yystate; if (yyss + yystacksize - 1 <= yyssp) { @@ -1222,12 +1222,6 @@ `---------------------------------------------------*/ yyerrorlab: - /* Pacify compilers like GCC when the user code never invokes - YYERROR and the label yyerrorlab therefore never appears in user - code. */ - if (0) - goto yyerrorlab; - ]b4_location_if([[ yyerror_range[0] = yylsp[1-yylen]; yylsp -= yylen; ]])[yyvsp -= yylen; @@ -1297,6 +1291,13 @@ `-----------------------------------*/ yyabortlab: yyresult = 1; + + /* Pacify compilers like GCC when the user code never invokes + YYERROR and the label yyerrorlab therefore never appears in user + code. */ + if (yy_false) + goto yyerrorlab; + goto yyreturn; #ifndef yyoverflow ./asymptote-2.41/patches/gc6.8_AIX.patch0000644000175000017500000000041713064427076017543 0ustar norbertnorbert*** gc.h.orig Fri Jul 7 18:10:16 2006 --- gc.h Mon Feb 12 12:30:48 2007 *************** *** 981 **** ! # define GC_INIT() { GC_add_roots(GC_DATASTART, GC_DATAEND); } --- 981 ---- ! # define GC_INIT() { GC_add_roots((char *) GC_DATASTART, (char *) GC_DATAEND); } ./asymptote-2.41/patches/gc-7.0nomem.patch0000644000175000017500000000075113064427076020145 0ustar norbertnorbert*** gc_hdrs.h.orig Tue Jun 5 14:01:25 2007 --- gc_hdrs.h Thu Oct 18 14:32:03 2007 *************** *** 112,119 **** hhdr = hce -> hce_hdr; \ } else { \ hhdr = HEADER_CACHE_MISS(p, hce, source); \ - if (0 == hhdr) goto exit_label; \ } \ } typedef struct bi { --- 112,119 ---- hhdr = hce -> hce_hdr; \ } else { \ hhdr = HEADER_CACHE_MISS(p, hce, source); \ } \ + if (0 == hhdr) goto exit_label; \ } typedef struct bi { ./asymptote-2.41/patches/README0000644000175000017500000000165313064427076016057 0ustar norbertnorbertThe optional patches to flex-2.5.31 and bison-2.0a in this directory fix a number of problems with warning and/or error messages generated by strict compilers. A modified version of dvipdf that accepts common dvips options is included. The file gcc3.3.2curses.patch can be used to patch the broken curses.h header files (or a local copy thereof in the current directory) on some AIX and IRIX systems. The file gc6.8_AIX.patch fixes an incorrect Boehm garbage collector prototype in the file gc6.8/include/gc.h (version 6.8). The file gc-7.0nomem.patch avoids segmentation faults with gc-7.0 on out-of-memory errors. The file cygwin_glu.patch adds missing GLU 1.3 declarations to w32api/GL/glu.h. The file fixmem.reg patches the Microsoft Windows registry so that the cygwin1.dll library can allocate more than 384MB. It is applied automatically by the Asymptote setup.exe file but may also be applied manually: regedit /s fixmem.reg ./asymptote-2.41/patches/fixmem.reg0000644000175000017500000000016113064427076017154 0ustar norbertnorbertWindows Registry Editor Version 5.00 [HKEY_LOCAL_MACHINE\Software\Cygwin] "heap_chunk_in_mb"=dword:ffffff00 ./asymptote-2.41/patches/dvipdf0000755000175000017500000000243713064427076016402 0ustar norbertnorbert#!/bin/sh # $Id$ # Convert DVI to PDF. # # Please contact Andrew Ford with any questions # about this file. # # Based on ps2pdf # This definition is changed on install to match the # executable name set in the makefile GS_EXECUTABLE=gs OPTIONS="-DSAFER -P" DVIPSOPTIONS="" while true do case "$1" in -R*) DVIPSOPTIONS="$DVIPSOPTIONS $1";; -z) DVIPSOPTIONS="$DVIPSOPTIONS -z" ;; -pp) shift; DVIPSOPTIONS="$DVIPSOPTIONS -pp $1" ;; -p) shift; DVIPSOPTIONS="$DVIPSOPTIONS -p $1" ;; -t) shift; DVIPSOPTIONS="$DVIPSOPTIONS -t $1" ;; -T) shift; DVIPSOPTIONS="$DVIPSOPTIONS -T $1" ;; -l) shift; DVIPSOPTIONS="$DVIPSOPTIONS -l $1" ;; -?*) OPTIONS="$OPTIONS $1" ;; *) break ;; esac shift done if [ $# -lt 1 -o $# -gt 2 ]; then echo "Usage: `basename $0` [options...] input.dvi [output.pdf]" 1>&2 exit 1 fi infile=$1; if [ $# -eq 1 ] then case "${infile}" in *.dvi) base=`basename "${infile}" .dvi` ;; *) base=`basename "${infile}"` ;; esac outfile="${base}".pdf else outfile=$2 fi # We have to include the options twice because -I only takes effect if it # appears before other options. exec dvips $DVIPSOPTIONS -q -f "$infile" | $GS_EXECUTABLE $OPTIONS -q -dNOPAUSE -dBATCH -sDEVICE=pdfwrite -sstdout=%stderr -sOutputFile="$outfile" $OPTIONS -c .setpdfwrite - ./asymptote-2.41/algebra3.h0000644000175000017500000004610313064427076015400 0ustar norbertnorbert/* algebra3.cc, algebra3.h - C++ Vector and Matrix Algebra routines GLUI User Interface Toolkit (LGPL) Copyright (c) 1998 Paul Rademacher WWW: http://sourceforge.net/projects/glui/ Forums: http://sourceforge.net/forum/?group_id=92496 This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ /************************************************************************** There are three vector classes and two matrix classes: vec2, vec3, vec4, mat3, and mat4. All the standard arithmetic operations are defined, with '*' for dot product of two vectors and multiplication of two matrices, and '^' for cross product of two vectors. Additional functions include length(), normalize(), homogenize for vectors, and print(), set(), apply() for all classes. There is a function transpose() for matrices, but note that it does not actually change the matrix, When multiplied with a matrix, a vector is treated as a row vector if it precedes the matrix (v*M), and as a column vector if it follows the matrix (M*v). Matrices are stored in row-major form. A vector of one dimension (2d, 3d, or 4d) can be cast to a vector of a higher or lower dimension. If casting to a higher dimension, the new component is set by default to 1.0, unless a value is specified: vec3 a(1.0, 2.0, 3.0 ); vec4 b( a, 4.0 ); // now b == {1.0, 2.0, 3.0, 4.0}; When casting to a lower dimension, the vector is homogenized in the lower dimension. E.g., if a 4d {X,Y,Z,W} is cast to 3d, the resulting vector is {X/W, Y/W, Z/W}. It is up to the user to insure the fourth component is not zero before casting. There are also the following function for building matrices: identity2D(), translation2D(), rotation2D(), scaling2D(), identity3D(), translation3D(), rotation3D(), rotation3Drad(), scaling3D(), perspective3D() NOTE: When compiling for Windows, include this file first, to avoid certain name conflicts --------------------------------------------------------------------- Author: Jean-Francois DOUEg Revised: Paul Rademacher Version 3.2 - Feb 1998 Revised: Nigel Stewart (GLUI Code Cleaning) **************************************************************************/ #ifndef GLUI_ALGEBRA3_H #define GLUI_ALGEBRA3_H #include #include #include #ifndef MAX #define MAX(a,b) ((a)>(b) ? (a) : (b)) #define MIN(a,b) ((a)<(b) ? (a) : (b)) #endif #define FUDGE .00001 // this line defines a new type: pointer to a function which returns a // float and takes as argument a float typedef float (*V_FCT_PTR)(float); class vec2; class vec3; class vec4; class mat3; class mat4; enum axes {VX, VY, VZ, VW}; /* enum planes {PA, PB, PC, PD}; enum colors {RED, GREEN, BLUE, ALPHA}; enum phong {KA, KD, KS, ES}; */ /**************************************************************** * * * 2D Vector * * * ****************************************************************/ class vec2 { friend class vec3; protected: float n[2]; public: // Constructors vec2(); vec2(float x, float y); vec2(const vec2 &v); // copy constructor vec2(const vec3 &v); // cast v3 to v2 vec2(const vec3 &v, int dropAxis); // cast v3 to v2 // Assignment operators vec2 &operator = (const vec2 &v); // assignment of a vec2 vec2 &operator += (const vec2 &v); // incrementation by a vec2 vec2 &operator -= (const vec2 &v); // decrementation by a vec2 vec2 &operator *= (float d); // multiplication by a constant vec2 &operator /= (float d); // division by a constant // special functions float length() const; // length of a vec2 float length2() const; // squared length of a vec2 vec2 &normalize(); // normalize a vec2 vec2 &apply(V_FCT_PTR fct); // apply a func. to each component void set(float x, float y); // set vector float &operator [] (int i); // indexing const float &operator [] (int i) const; // indexing // friends friend vec2 operator - (const vec2 &v); // -v1 friend vec2 operator + (const vec2 &a, const vec2 &b); // v1 + v2 friend vec2 operator - (const vec2 &a, const vec2 &b); // v1 - v2 friend vec2 operator * (const vec2 &a, float d); // v1 * 3.0 friend vec2 operator * (float d, const vec2 &a); // 3.0 * v1 friend vec2 operator * (const mat3 &a, const vec2 &v); // M . v friend vec2 operator * (const vec2 &v, const mat3 &a); // v . M friend float operator * (const vec2 &a, const vec2 &b); // dot product friend vec2 operator / (const vec2 &a, float d); // v1 / 3.0 friend vec3 operator ^ (const vec2 &a, const vec2 &b); // cross product friend int operator == (const vec2 &a, const vec2 &b); // v1 == v2 ? friend int operator != (const vec2 &a, const vec2 &b); // v1 != v2 ? //friend ostream& operator << (ostream& s, vec2& v); // output to stream //friend istream& operator >> (istream& s, vec2& v); // input from strm. friend void swap(vec2 &a, vec2 &b); // swap v1 & v2 friend vec2 min_vec(const vec2 &a, const vec2 &b); // min(v1, v2) friend vec2 max_vec(const vec2 &a, const vec2 &b); // max(v1, v2) friend vec2 prod (const vec2 &a, const vec2 &b); // term by term * }; /**************************************************************** * * * 3D Vector * * * ****************************************************************/ class vec3 { friend class vec2; friend class vec4; friend class mat3; protected: float n[3]; public: // Constructors vec3(); vec3(float x, float y, float z); vec3(const vec3 &v); // copy constructor vec3(const vec2 &v); // cast v2 to v3 vec3(const vec2 &v, float d); // cast v2 to v3 vec3(const vec4 &v); // cast v4 to v3 vec3(const vec4 &v, int dropAxis); // cast v4 to v3 // Assignment operators vec3 &operator = (const vec3 &v); // assignment of a vec3 vec3 &operator += (const vec3 &v); // incrementation by a vec3 vec3 &operator -= (const vec3 &v); // decrementation by a vec3 vec3 &operator *= (float d); // multiplication by a constant vec3 &operator /= (float d); // division by a constant // special functions float length() const; // length of a vec3 float length2() const; // squared length of a vec3 vec3& normalize(); // normalize a vec3 vec3& homogenize(); // homogenize (div by Z) vec3& apply(V_FCT_PTR fct); // apply a func. to each component void set(float x, float y, float z); // set vector void print(FILE *file, const char *name) const; // print vector to a file float &operator [] (int i); // indexing const float &operator [] (int i) const; // indexing // friends friend vec3 operator - (const vec3 &v); // -v1 friend vec3 operator + (const vec3 &a, const vec3 &b); // v1 + v2 friend vec3 operator - (const vec3 &a, const vec3 &b); // v1 - v2 friend vec3 operator * (const vec3 &a, float d); // v1 * 3.0 friend vec3 operator * (float d, const vec3 &a); // 3.0 * v1 friend vec3 operator * (const mat4 &a, const vec3 &v); // M . v friend vec3 operator * (const vec3 &v, const mat4 &a); // v . M friend float operator * (const vec3 &a, const vec3 &b); // dot product friend vec3 operator / (const vec3 &a, float d); // v1 / 3.0 friend vec3 operator ^ (const vec3 &a, const vec3 &b); // cross product friend int operator == (const vec3 &a, const vec3 &b); // v1 == v2 ? friend int operator != (const vec3 &a, const vec3 &b); // v1 != v2 ? //friend ostream& operator << (ostream& s, vec3& v); // output to stream //friend istream& operator >> (istream& s, vec3& v); // input from strm. friend void swap(vec3 &a, vec3 &b); // swap v1 & v2 friend vec3 min_vec(const vec3 &a, const vec3 &b); // min(v1, v2) friend vec3 max_vec(const vec3 &a, const vec3 &b); // max(v1, v2) friend vec3 prod(const vec3 &a, const vec3 &b); // term by term * // necessary friend declarations friend vec2 operator * (const mat3 &a, const vec2 &v); // linear transform friend vec3 operator * (const mat3 &a, const vec3 &v); // linear transform friend mat3 operator * (const mat3 &a, const mat3 &b); // matrix 3 product }; /**************************************************************** * * * 4D Vector * * * ****************************************************************/ class vec4 { friend class vec3; friend class mat4; protected: float n[4]; public: // Constructors vec4(); vec4(float x, float y, float z, float w); vec4(const vec4 &v); // copy constructor vec4(const vec3 &v); // cast vec3 to vec4 vec4(const vec3 &v, float d); // cast vec3 to vec4 // Assignment operators vec4 &operator = (const vec4 &v); // assignment of a vec4 vec4 &operator += (const vec4 &v); // incrementation by a vec4 vec4 &operator -= (const vec4 &v); // decrementation by a vec4 vec4 &operator *= (float d); // multiplication by a constant vec4 &operator /= (float d); // division by a constant // special functions float length() const; // length of a vec4 float length2() const; // squared length of a vec4 vec4 &normalize(); // normalize a vec4 vec4 &apply(V_FCT_PTR fct); // apply a func. to each component vec4 &homogenize(); void print(FILE *file, const char *name) const; // print vector to a file void set(float x, float y, float z, float a); float &operator [] (int i); // indexing const float &operator [] (int i) const; // indexing // friends friend vec4 operator - (const vec4 &v); // -v1 friend vec4 operator + (const vec4 &a, const vec4 &b); // v1 + v2 friend vec4 operator - (const vec4 &a, const vec4 &b); // v1 - v2 friend vec4 operator * (const vec4 &a, float d); // v1 * 3.0 friend vec4 operator * (float d, const vec4 &a); // 3.0 * v1 friend vec4 operator * (const mat4 &a, const vec4 &v); // M . v friend vec4 operator * (const vec4 &v, const mat4 &a); // v . M friend float operator * (const vec4 &a, const vec4 &b); // dot product friend vec4 operator / (const vec4 &a, float d); // v1 / 3.0 friend int operator == (const vec4 &a, const vec4 &b); // v1 == v2 ? friend int operator != (const vec4 &a, const vec4 &b); // v1 != v2 ? //friend ostream& operator << (ostream& s, vec4& v); // output to stream //friend istream& operator >> (istream& s, vec4& v); // input from strm. friend void swap(vec4 &a, vec4 &b); // swap v1 & v2 friend vec4 min_vec(const vec4 &a, const vec4 &b); // min(v1, v2) friend vec4 max_vec(const vec4 &a, const vec4 &b); // max(v1, v2) friend vec4 prod (const vec4 &a, const vec4 &b); // term by term * // necessary friend declarations friend vec3 operator * (const mat4 &a, const vec3 &v); // linear transform friend mat4 operator * (const mat4 &a, const mat4 &b); // matrix 4 product }; /**************************************************************** * * * 3x3 Matrix * * * ****************************************************************/ class mat3 { protected: vec3 v[3]; public: // Constructors mat3(); mat3(const vec3 &v0, const vec3 &v1, const vec3 &v2); mat3(const mat3 &m); // Assignment operators mat3 &operator = (const mat3 &m); // assignment of a mat3 mat3 &operator += (const mat3 &m); // incrementation by a mat3 mat3 &operator -= (const mat3 &m); // decrementation by a mat3 mat3 &operator *= (float d); // multiplication by a constant mat3 &operator /= (float d); // division by a constant // special functions mat3 transpose() const; // transpose mat3 inverse() const; // inverse mat3 &apply(V_FCT_PTR fct); // apply a func. to each element void print(FILE *file, const char *name ) const; // print matrix to a file void set(const vec3 &v0, const vec3 &v1, const vec3 &v2); vec3 &operator [] (int i); // indexing const vec3 &operator [] (int i) const; // indexing // friends friend mat3 operator - (const mat3 &a); // -m1 friend mat3 operator + (const mat3 &a, const mat3 &b); // m1 + m2 friend mat3 operator - (const mat3 &a, const mat3 &b); // m1 - m2 friend mat3 operator * (const mat3 &a, const mat3 &b); // m1 * m2 friend mat3 operator * (const mat3 &a, float d); // m1 * 3.0 friend mat3 operator * (float d, const mat3 &a); // 3.0 * m1 friend mat3 operator / (const mat3 &a, float d); // m1 / 3.0 friend int operator == (const mat3 &a, const mat3 &b); // m1 == m2 ? friend int operator != (const mat3 &a, const mat3 &b); // m1 != m2 ? //friend ostream& operator << (ostream& s, mat3& m); // output to stream //friend istream& operator >> (istream& s, mat3& m); // input from strm. friend void swap(mat3 &a, mat3 &b); // swap m1 & m2 // necessary friend declarations friend vec3 operator * (const mat3 &a, const vec3 &v); // linear transform friend vec2 operator * (const mat3 &a, const vec2 &v); // linear transform }; /**************************************************************** * * * 4x4 Matrix * * * ****************************************************************/ class mat4 { protected: vec4 v[4]; public: // Constructors mat4(); mat4(const vec4 &v0, const vec4 &v1, const vec4 &v2, const vec4 &v3); mat4(const mat4 &m); mat4(float a00, float a01, float a02, float a03, float a10, float a11, float a12, float a13, float a20, float a21, float a22, float a23, float a30, float a31, float a32, float a33 ); // Assignment operators mat4 &operator = (const mat4 &m); // assignment of a mat4 mat4 &operator += (const mat4 &m); // incrementation by a mat4 mat4 &operator -= (const mat4 &m); // decrementation by a mat4 mat4 &operator *= (float d); // multiplication by a constant mat4 &operator /= (float d); // division by a constant // special functions mat4 transpose() const; // transpose mat4 inverse() const; // inverse mat4 &apply(V_FCT_PTR fct); // apply a func. to each element void print(FILE *file, const char *name) const; // print matrix to a file vec4 &operator [] (int i); // indexing const vec4 &operator [] (int i) const; // indexing void swap_rows(int i, int j); // swap rows i and j void swap_cols(int i, int j); // swap cols i and j // friends friend mat4 operator - (const mat4 &a); // -m1 friend mat4 operator + (const mat4 &a, const mat4 &b); // m1 + m2 friend mat4 operator - (const mat4 &a, const mat4 &b); // m1 - m2 friend mat4 operator * (const mat4 &a, const mat4 &b); // m1 * m2 friend mat4 operator * (const mat4 &a, float d); // m1 * 4.0 friend mat4 operator * (float d, const mat4 &a); // 4.0 * m1 friend mat4 operator / (const mat4 &a, float d); // m1 / 3.0 friend int operator == (const mat4 &a, const mat4 &b); // m1 == m2 ? friend int operator != (const mat4 &a, const mat4 &b); // m1 != m2 ? //friend ostream& operator << (ostream& s, mat4& m); // output to stream //friend istream& operator >> (istream& s, mat4& m); // input from strm. friend void swap(mat4 &a, mat4 &b); // swap m1 & m2 // necessary friend declarations friend vec4 operator * (const mat4 &a, const vec4 &v); // linear transform //friend vec4 operator * (const vec4& v, const mat4& a); // linear transform friend vec3 operator * (const mat4 &a, const vec3 &v); // linear transform friend vec3 operator * (const vec3 &v, const mat4 &a); // linear transform }; /**************************************************************** * * * 2D functions and 3D functions * * * ****************************************************************/ mat3 identity2D (); // identity 2D mat3 translation2D(const vec2 &v); // translation 2D mat3 rotation2D (const vec2 &Center, float angleDeg); // rotation 2D mat3 scaling2D (const vec2 &scaleVector); // scaling 2D mat4 identity3D (); // identity 3D mat4 translation3D(const vec3 &v); // translation 3D mat4 rotation3D (const vec3 &Axis, float angleDeg); // rotation 3D mat4 rotation3Drad(const vec3 &Axis, float angleRad); // rotation 3D mat4 scaling3D (const vec3 &scaleVector); // scaling 3D mat4 perspective3D(float d); // perspective 3D vec3 operator * (const vec3 &v, const mat3 &a); vec2 operator * (const vec2 &v, const mat3 &a); vec3 operator * (const vec3 &v, const mat4 &a); vec4 operator * (const vec4 &v, const mat4 &a); #endif ./asymptote-2.41/asymptote.spec0000644000175000017500000000553513064427076016454 0ustar norbertnorbert%{!?_texmf: %global _texmf %(eval "echo `kpsewhich -expand-var '$TEXMFLOCAL'`")} Name: asymptote Version: 2.41 Release: 1%{?dist} Summary: Descriptive vector graphics language Group: Applications/Publishing License: GPL URL: http://asymptote.sourceforge.net/ Source: http://downloads.sourceforge.net/sourceforge/asymptote/asymptote-%{version}.src.tgz BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n) BuildRequires: ncurses-devel BuildRequires: readline-devel BuildRequires: fftw-devel >= 3.0 BuildRequires: gc-devel >= 6.7 BuildRequires: gsl-devel BuildRequires: tetex-latex BuildRequires: ghostscript >= 9.14 BuildRequires: texinfo >= 4.7 BuildRequires: ImageMagick Requires: tetex-latex Requires: tkinter Requires: freeglut-devel >= 2.4.0 Requires(post): /usr/bin/texhash /sbin/install-info Requires(postun): /usr/bin/texhash /sbin/install-info %description Asymptote is a powerful descriptive vector graphics language for technical drawings, inspired by MetaPost but with an improved C++-like syntax. Asymptote provides for figures the same high-quality level of typesetting that LaTeX does for scientific text. %prep %setup -q %{__sed} -i 's|^#!/usr/bin/env python$|#!%{__python}|' GUI/xasy.py %build CFLAGS="`echo $RPM_OPT_FLAGS | sed s/-O2/-O3/`" \ %configure --with-latex=%{_texmf}/tex/latex --with-context=%{_texmf}/tex/context/third make %{?_smp_mflags} %install rm -rf $RPM_BUILD_ROOT make install DESTDIR=$RPM_BUILD_ROOT %{__install} -p -m 644 BUGS ChangeLog LICENSE README ReleaseNotes TODO \ $RPM_BUILD_ROOT%{_defaultdocdir}/%{name}/ %clean rm -rf $RPM_BUILD_ROOT %post texhash >/dev/null 2>&1 || : /sbin/install-info %{_infodir}/%{name}/%{name}.info.gz %{_infodir}/dir 2>/dev/null || : %postun texhash >/dev/null 2>&1 || : if [ $1 = 0 ]; then /sbin/install-info --remove %{_infodir}/%{name}/%{name}.info.gz %{_infodir}/dir 2>/dev/null || : fi %files %defattr(-,root,root,-) %doc %{_defaultdocdir}/%{name}/ %{_bindir}/* %{_datadir}/%{name}/ %{_texmf}/tex/latex/%{name} %{_texmf}/tex/context/third/%{name} %{_mandir}/man1/*.1* %{_infodir}/%{name}/ %{_infodir}/%{name}/*.info* %{_infodir}/*.info* %changelog * Thu Apr 19 2007 John Bowman <> - 1.26-1 - Update source tar ball name. * Tue May 30 2006 John Bowman <> - 1.07-1 - Use make install-all to also install info pages. * Fri May 26 2006 Jose Pedro Oliveira - 1.07-1 - Update to 1.07. * Sun May 21 2006 John Bowman <> - 1.06-1 - Update to 1.06. * Mon May 8 2006 John Bowman <> - 1.05-1 - Update to 1.05. * Sun May 7 2006 Jose Pedro Oliveira - 1.04-1 - Update to 1.04. * Fri Mar 31 2006 Jose Pedro Oliveira - 1.03-1 - Update to 1.03. * Thu Mar 23 2006 Jose Pedro Oliveira - 1.02-1 - First build. ./asymptote-2.41/bezierpatch.h0000644000175000017500000001636113064427076016223 0ustar norbertnorbert/***** * bezierpatch.h * Authors: John C. Bowman and Jesse Frohlich * * Render Bezier patches and triangles. *****/ #ifndef BEZIERPATCH_H #define BEZIERPATCH_H #include "drawelement.h" namespace camp { #ifdef HAVE_GL extern int sign; extern const double Fuzz; extern const double Fuzz2; struct BezierPatch { static std::vector buffer; static std::vector Buffer; static std::vector indices; static std::vector Indices; static std::vector tbuffer; static std::vector tindices; static std::vector tBuffer; static std::vector tIndices; static GLuint nvertices; static GLuint ntvertices; static GLuint Nvertices; static GLuint Ntvertices; std::vector *pindices; triple u,v,w; double epsilon; double Epsilon; double res2; double Res2; // Reduced resolution for Bezier triangles flatness test. triple Min,Max; typedef GLuint vertexFunction(const triple &v, const triple& n); typedef GLuint VertexFunction(const triple &v, const triple& n, GLfloat *c); vertexFunction *pvertex; VertexFunction *pVertex; bool empty; BezierPatch() : empty(true) {} void init(double res, const triple& Min, const triple& Max, bool transparent, GLfloat *colors=NULL); // Store the vertex v and its normal vector n in the buffer. static GLuint vertex(const triple &v, const triple& n) { buffer.push_back(v.getx()); buffer.push_back(v.gety()); buffer.push_back(v.getz()); buffer.push_back(n.getx()); buffer.push_back(n.gety()); buffer.push_back(n.getz()); return nvertices++; } static GLuint tvertex(const triple &v, const triple& n) { tbuffer.push_back(v.getx()); tbuffer.push_back(v.gety()); tbuffer.push_back(v.getz()); tbuffer.push_back(n.getx()); tbuffer.push_back(n.gety()); tbuffer.push_back(n.getz()); return ntvertices++; } // Store the vertex v and its normal vector n and colour c in the buffer. static GLuint Vertex(const triple& v, const triple& n, GLfloat *c) { Buffer.push_back(v.getx()); Buffer.push_back(v.gety()); Buffer.push_back(v.getz()); Buffer.push_back(n.getx()); Buffer.push_back(n.gety()); Buffer.push_back(n.getz()); Buffer.push_back(c[0]); Buffer.push_back(c[1]); Buffer.push_back(c[2]); Buffer.push_back(c[3]); return Nvertices++; } static GLuint tVertex(const triple& v, const triple& n, GLfloat *c) { tBuffer.push_back(v.getx()); tBuffer.push_back(v.gety()); tBuffer.push_back(v.getz()); tBuffer.push_back(n.getx()); tBuffer.push_back(n.gety()); tBuffer.push_back(n.getz()); tBuffer.push_back(c[0]); tBuffer.push_back(c[1]); tBuffer.push_back(c[2]); tBuffer.push_back(c[3]); return Ntvertices++; } triple normal(triple left3, triple left2, triple left1, triple middle, triple right1, triple right2, triple right3) { triple rp=right1-middle; triple lp=left1-middle; triple n=triple(rp.gety()*lp.getz()-rp.getz()*lp.gety(), rp.getz()*lp.getx()-rp.getx()*lp.getz(), rp.getx()*lp.gety()-rp.gety()*lp.getx()); if(abs2(n) > epsilon) return unit(n); triple lpp=bezierPP(middle,left1,left2); triple rpp=bezierPP(middle,right1,right2); n=cross(rpp,lp)+cross(rp,lpp); if(abs2(n) > epsilon) return unit(n); triple lppp=bezierPPP(middle,left1,left2,left3); triple rppp=bezierPPP(middle,right1,right2,right3); return unit(9.0*cross(rpp,lpp)+ 3.0*(cross(rp,lppp)+cross(rppp,lp)+ cross(rppp,lpp)+cross(rpp,lppp))+ cross(rppp,lppp)); } triple derivative(triple p0, triple p1, triple p2, triple p3) { triple lp=p1-p0; if(abs2(lp) > epsilon) return lp; triple lpp=bezierPP(p0,p1,p2); if(abs2(lpp) > epsilon) return lpp; return bezierPPP(p0,p1,p2,p3); } virtual double Distance(const triple *p) { triple p0=p[0]; triple p3=p[3]; triple p12=p[12]; triple p15=p[15]; // Check the flatness of the quad. double d=Distance2(p15,p0,normal(p3,p[2],p[1],p0,p[4],p[8],p12)); // Determine how straight the edges are. d=max(d,Straightness(p0,p[1],p[2],p3)); d=max(d,Straightness(p0,p[4],p[8],p12)); d=max(d,Straightness(p3,p[7],p[11],p15)); d=max(d,Straightness(p12,p[13],p[14],p15)); // Determine how straight the interior control curves are. d=max(d,Straightness(p[4],p[5],p[6],p[7])); d=max(d,Straightness(p[8],p[9],p[10],p[11])); d=max(d,Straightness(p[1],p[5],p[9],p[13])); return max(d,Straightness(p[2],p[6],p[10],p[14])); } struct Split3 { triple m0,m2,m3,m4,m5; Split3() {} Split3(triple z0, triple c0, triple c1, triple z1) { m0=0.5*(z0+c0); triple m1=0.5*(c0+c1); m2=0.5*(c1+z1); m3=0.5*(m0+m1); m4=0.5*(m1+m2); m5=0.5*(m3+m4); } }; // Approximate bounds by bounding box of control polyhedron. bool offscreen(size_t n, const triple *v) { double x,y,z; double X,Y,Z; boundstriples(x,y,z,X,Y,Z,n,v); return X < Min.getx() || x > Max.getx() || Y < Min.gety() || y > Max.gety() || Z < Min.getz() || z > Max.getz(); } void clear() { empty=true; nvertices=ntvertices=Nvertices=Ntvertices=0; buffer.clear(); indices.clear(); Buffer.clear(); Indices.clear(); tbuffer.clear(); tindices.clear(); tBuffer.clear(); tIndices.clear(); } ~BezierPatch() {} void render(const triple *p, GLuint I0, GLuint I1, GLuint I2, GLuint I3, triple P0, triple P1, triple P2, triple P3, bool flat0, bool flat1, bool flat2, bool flat3, GLfloat *C0=NULL, GLfloat *C1=NULL, GLfloat *C2=NULL, GLfloat *C3=NULL); virtual void render(const triple *p, bool straight, GLfloat *c0=NULL); void queue(const triple *g, bool straight, double ratio, const triple& Min, const triple& Max, bool transparent, GLfloat *colors=NULL) { init(pixel*ratio,Min,Max,transparent,colors); render(g,straight,colors); } void draw(); void draw(const triple *g, bool straight, double ratio, const triple& Min, const triple& Max, bool transparent, GLfloat *colors=NULL) { queue(g,straight,ratio,Min,Max,transparent,colors); draw(); } }; struct BezierTriangle : public BezierPatch { public: BezierTriangle() : BezierPatch() {} double Distance(const triple *p) { triple p0=p[0]; triple p6=p[6]; triple p9=p[9]; // Check how far the internal point is from the centroid of the vertices. double d=abs2((p0+p6+p9)*third-p[4]); // Determine how straight the edges are. d=max(d,Straightness(p0,p[1],p[3],p6)); d=max(d,Straightness(p0,p[2],p[5],p9)); return max(d,Straightness(p6,p[7],p[8],p9)); } void render(const triple *p, GLuint I0, GLuint I1, GLuint I2, triple P0, triple P1, triple P2, bool flat0, bool flat1, bool flat2, GLfloat *C0=NULL, GLfloat *C1=NULL, GLfloat *C2=NULL); void render(const triple *p, bool straight, GLfloat *c0=NULL); }; #endif } //namespace camp #endif ./asymptote-2.41/arcball.h0000644000175000017500000000642513064427076015323 0ustar norbertnorbert/********************************************************************** arcball.h GLUI User Interface Toolkit (LGPL) Copyright (c) 1998 Paul Rademacher Feb 1998, Paul Rademacher (rademach@cs.unc.edu) Oct 2003, Nigel Stewart - GLUI Code Cleaning WWW: http://sourceforge.net/projects/glui/ Forums: http://sourceforge.net/forum/?group_id=92496 This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA --------------------------------------------------------------------- A C++ class that implements the Arcball, as described by Ken Shoemake in Graphics Gems IV. This class takes as input mouse events (mouse down, mouse drag, mouse up), and creates the appropriate quaternions and 4x4 matrices to represent the rotation given by the mouse. This class is used as follows: - initialize [either in the constructor or with set_params()], the center position (x,y) of the arcball on the screen, and the radius - on mouse down, call mouse_down(x,y) with the mouse position - as the mouse is dragged, repeatedly call mouse_motion() with the current x and y positions. One can optionally pass in the current state of the SHIFT, ALT, and CONTROL keys (passing zero if keys are not pressed, non-zero otherwise), which constrains the rotation to certain axes (X for CONTROL, Y for ALT). - when the mouse button is released, call mouse_up() Axis constraints can also be explicitly set with the set_constraints() function. The current rotation is stored in the 4x4 float matrix 'rot'. It is also stored in the quaternion 'q_now'. **********************************************************************/ #ifndef GLUI_ARCBALL_H #define GLUI_ARCBALL_H #include "algebra3.h" #include "quaternion.h" class Arcball { public: Arcball(); Arcball(mat4 *mtx); Arcball(const vec2 ¢er, float radius); void set_damping(float d); void idle(); void mouse_down(int x, int y); void mouse_up(); void mouse_motion(int x, int y, int shift, int ctrl, int alt); void mouse_motion(int x, int y); void set_constraints(bool constrain_x, bool constrain_y); void set_params(const vec2 ¢er, float radius); void init(); vec3 constrain_vector(const vec3 &vector, const vec3 &axis); vec3 mouse_to_sphere(const vec2 &p); //public: int is_mouse_down; /* true for down, false for up */ int is_spinning; quat q_now, q_down, q_drag, q_increment; vec2 down_pt; mat4 rot, rot_increment; mat4 *rot_ptr; bool constraint_x, constraint_y; vec2 center; float radius, damp_factor; int zero_increment; }; #endif ./asymptote-2.41/runlabel.cc0000644000175000017500000004107313064427126015657 0ustar norbertnorbert/***** Autogenerated from runlabel.in; changes will be overwritten *****/ #line 1 "runtimebase.in" /***** * runtimebase.in * Andy Hammerlindl 2009/07/28 * * Common declarations needed for all code-generating .in files. * *****/ #line 1 "runlabel.in" /***** * runlabel.in * * Runtime functions for label operations. * *****/ #line 1 "runtimebase.in" #include "stack.h" #include "types.h" #include "builtin.h" #include "entry.h" #include "errormsg.h" #include "array.h" #include "triple.h" #include "callable.h" #include "opsymbols.h" using vm::stack; using vm::error; using vm::array; using vm::read; using vm::callable; using types::formal; using types::function; using camp::triple; #define PRIMITIVE(name,Name,asyName) using types::prim##Name; #include #undef PRIMITIVE typedef double real; void unused(void *); namespace run { array *copyArray(array *a); array *copyArray2(array *a); array *copyArray3(array *a); double *copyTripleArray2Components(array *a, size_t &N, GCPlacement placement=NoGC); triple *copyTripleArray2C(array *a, size_t &N, GCPlacement placement=NoGC); } function *realRealFunction(); #define CURRENTPEN processData().currentpen #line 19 "runlabel.in" #include "picture.h" #include "drawlabel.h" #include "locate.h" using namespace camp; using namespace vm; using namespace settings; typedef array realarray; typedef array stringarray; typedef array penarray; typedef array patharray; typedef array patharray2; using types::realArray; using types::stringArray; using types::penArray; using types::pathArray; using types::pathArray2; void cannotread(const string& s) { ostringstream buf; buf << "Cannot read from " << s; error(buf); } void cannotwrite(const string& s) { ostringstream buf; buf << "Cannot write to " << s; error(buf); } pair readpair(stringstream& s, double hscale=1.0, double vscale=1.0) { double x,y; s >> y; s >> x; return pair(hscale*x,vscale*y); } string ASYx="/ASYx {( ) print ASYX sub 12 string cvs print} bind def"; string ASYy="/ASYy {( ) print ASYY sub 12 string cvs print} bind def"; string pathforall="{(M) print ASYy ASYx} {(L) print ASYy ASYx} {(C) print ASYy ASYx ASYy ASYx ASYy ASYx} {(c) print} pathforall"; string currentpoint="print currentpoint ASYy ASYx "; string ASYinit="/ASYX currentpoint pop def /ASYY currentpoint exch pop def "; string ASY1="ASY1 {"+ASYinit+"/ASY1 false def} if "; void endpath(std::ostream& ps) { ps << ASY1 << pathforall << " (M) " << currentpoint << "currentpoint newpath moveto} bind def" << endl; } void fillpath(std::ostream& ps) { ps << "/fill {closepath "; endpath(ps); } void showpath(std::ostream& ps) { ps << ASYx << newl << ASYy << newl << "/ASY1 true def" << newl << "/stroke {strokepath "; endpath(ps); fillpath(ps); } array *readpath(const string& psname, bool keep, bool pdf=false, double hscale=1.0, double vsign=1.0) { double vscale=vsign*hscale; array *PP=new array(0); char *oldPath=NULL; string dir=stripFile(outname()); if(!dir.empty()) { oldPath=getPath(); setPath(dir.c_str()); } mem::vector cmd; cmd.push_back(getSetting("gs")); cmd.push_back("-q"); cmd.push_back("-dBATCH"); cmd.push_back("-P"); if(safe) cmd.push_back("-dSAFER"); #ifdef __MSDOS__ const string null="NUL"; #else const string null="/dev/null"; #endif string epsdriver=getSetting("epsdriver"); cmd.push_back("-sDEVICE="+epsdriver); cmd.push_back("-sOutputFile="+null); cmd.push_back(stripDir(psname)); iopipestream gs(cmd,"gs","Ghostscript"); while(gs.running()) { stringstream buf; string s=gs.readline(); if(s.empty()) break; if(!pdf) gs << newl; // Workaround broken stringstream container in MacOS 10.9 libc++. #if defined(__APPLE__) || defined(__FreeBSD__) || defined(__FreeBSD_kernel__ ) for(string::iterator i=s.begin(); i != s.end(); ++i) { if(isalpha(*i) && *i != 'e') {buf << " ";} buf << *i; } #else buf << s; #endif if(verbose > 2) cout << endl; mem::vector nodes; solvedKnot node; bool cyclic=false; bool active=false; array *P=new array(0); PP->push(P); while(!buf.eof()) { char c; buf >> c; if(c == '>') break; switch(c) { case 'M': { if(active) { if(cyclic) { if(node.point == nodes[0].point) nodes[0].pre=node.pre; else { pair delta=(nodes[0].point-node.point)*third; node.post=node.point+delta; nodes[0].pre=nodes[0].point-delta; node.straight=true; nodes.push_back(node); } } else { node.post=node.point; node.straight=false; nodes.push_back(node); } if(cyclic) // Discard noncyclic paths. P->push(path(nodes,nodes.size(),cyclic)); nodes.clear(); } active=false; cyclic=false; node.pre=node.point=readpair(buf,hscale,vscale); node.straight=false; break; } case 'L': { pair point=readpair(buf,hscale,vscale); pair delta=(point-node.point)*third; node.post=node.point+delta; node.straight=true; nodes.push_back(node); active=true; node.pre=point-delta; node.point=point; break; } case 'C': { pair point=readpair(buf,hscale,vscale); pair pre=readpair(buf,hscale,vscale); node.post=readpair(buf,hscale,vscale); node.straight=false; nodes.push_back(node); active=true; node.pre=pre; node.point=point; break; } case 'c': { cyclic=true; break; } } } } if(oldPath != NULL) setPath(oldPath); if(!keep) unlink(psname.c_str()); return PP; } // Autogenerated routines: #ifndef NOSYM #include "runlabel.symbols.h" #endif namespace run { #line 223 "runlabel.in" // void label(picture *f, string *s, string *size, transform t, pair position, pair align, pen p); void gen_runlabel0(stack *Stack) { pen p=vm::pop(Stack); pair align=vm::pop(Stack); pair position=vm::pop(Stack); transform t=vm::pop(Stack); string * size=vm::pop(Stack); string * s=vm::pop(Stack); picture * f=vm::pop(Stack); #line 225 "runlabel.in" f->append(new drawLabel(*s,*size,t,position,align,p)); } #line 229 "runlabel.in" // bool labels(picture *f); void gen_runlabel1(stack *Stack) { picture * f=vm::pop(Stack); #line 230 "runlabel.in" {Stack->push(f->havelabels()); return;} } #line 234 "runlabel.in" // realarray* texsize(string *s, pen p=CURRENTPEN); void gen_runlabel2(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); string * s=vm::pop(Stack); #line 235 "runlabel.in" texinit(); processDataStruct &pd=processData(); string texengine=getSetting("tex"); setpen(pd.tex,texengine,p); double width,height,depth; texbounds(width,height,depth,pd.tex,*s); array *t=new array(3); (*t)[0]=width; (*t)[1]=height; (*t)[2]=depth; {Stack->push(t); return;} } #line 252 "runlabel.in" // patharray2* _texpath(stringarray *s, penarray *p); void gen_runlabel3(stack *Stack) { penarray * p=vm::pop(Stack); stringarray * s=vm::pop(Stack); #line 253 "runlabel.in" size_t n=checkArrays(s,p); if(n == 0) {Stack->push(new array(0)); return;} string prefix=cleanpath(outname()); string psname=auxname(prefix,"ps"); string texname=auxname(prefix,"tex"); string dviname=auxname(prefix,"dvi"); bbox b; string texengine=getSetting("tex"); bool xe=settings::xe(texengine) || settings::lua(texengine) || settings::context(texengine); texfile tex(texname,b,true); tex.miniprologue(); for(size_t i=0; i < n; ++i) { tex.setfont(read(p,i)); if(i != 0) { if(texengine == "context") tex.verbatimline("}\\page\\hbox{%"); else if(texengine == "luatex" || texengine == "tex" || texengine == "pdftex") tex.verbatimline("\\eject"); else tex.verbatimline("\\newpage"); } if(!xe) { tex.verbatimline("\\special{ps:"); tex.verbatimline(ASYx); tex.verbatimline(ASYy); tex.verbatimline("/ASY1 true def"); tex.verbatimline("/show {"+ASY1+ "currentpoint newpath moveto false charpath "+pathforall+ "} bind def"); tex.verbatimline("/V {"+ASY1+"Ry neg Rx 4 copy 4 2 roll 2 copy 6 2 roll 2 copy (M) print ASYy ASYx (L) print ASYy add ASYx (L) print add ASYy add ASYx (L) print add ASYy ASYx (c) print} bind def}"); } tex.verbatimline(read(s,i)+"\\ %"); } tex.epilogue(true); tex.close(); int status=opentex(texname,prefix,!xe); string pdfname,pdfname2,psname2; bool keep=getSetting("keep"); bool legacygs=false; if(!status) { if(xe) { // Use legacy ghostscript driver for gs-9.13 and earlier. string epsdriver=getSetting("epsdriver"); legacygs=epsdriver == "epswrite"; pdfname=auxname(prefix,"pdf"); pdfname2=auxname(prefix+"_","pdf"); psname2=auxname(prefix+"_","ps"); if(!fs::exists(pdfname)) {Stack->push(new array(n)); return;} std::ofstream ps(psname.c_str(),std::ios::binary); if(!ps) cannotwrite(psname); showpath(ps); mem::vector pcmd; pcmd.push_back(getSetting("gs")); pcmd.push_back("-q"); pcmd.push_back("-dNOCACHE"); pcmd.push_back("-dNOPAUSE"); pcmd.push_back("-dBATCH"); if(safe) pcmd.push_back("-dSAFER"); pcmd.push_back("-sDEVICE=pdfwrite"); pcmd.push_back("-sOutputFile="+pdfname2); pcmd.push_back(pdfname); status=System(pcmd,0,true,"gs"); if(status == 0) { mem::vector cmd; cmd.push_back(getSetting("gs")); cmd.push_back("-q"); cmd.push_back("-dNOCACHE"); cmd.push_back("-dNOPAUSE"); cmd.push_back("-dBATCH"); if(safe) cmd.push_back("-dSAFER"); cmd.push_back("-sDEVICE="+epsdriver); // Work around eps2write bug that forces all postscript to first page. cmd.push_back("-sOutputFile="+psname2+(legacygs ? "" : "%d")); cmd.push_back(pdfname2); status=System(cmd,0,true,"gs"); if(legacygs) { std::ifstream in(psname2.c_str()); ps << in.rdbuf(); } else { for(unsigned int i=1; i <= n ; ++i) { ostringstream buf; buf << psname2 << i; const string& s=buf.str(); const char *name=s.c_str(); std::ifstream in(name,std::ios::binary); ps << in.rdbuf(); ps << "(>\n) print flush\n"; in.close(); if(!keep) unlink(name); } } ps.close(); } } else { if(!fs::exists(dviname)) {Stack->push(new array(n)); return;} mem::vector dcmd; dcmd.push_back(getSetting("dvips")); dcmd.push_back("-R"); dcmd.push_back("-Pdownload35"); dcmd.push_back("-D600"); push_split(dcmd,getSetting("dvipsOptions")); if(verbose <= 2) dcmd.push_back("-q"); dcmd.push_back("-o"+psname); dcmd.push_back(dviname); status=System(dcmd,0,true,"dvips"); } } else error("texpath failed"); if(!keep) { // Delete temporary files. unlink(texname.c_str()); if(!getSetting("keepaux")) unlink(auxname(prefix,"aux").c_str()); unlink(auxname(prefix,"log").c_str()); if(xe) { unlink(pdfname.c_str()); unlink(pdfname2.c_str()); } else unlink(dviname.c_str()); if(settings::context(texengine)) { unlink(auxname(prefix,"top").c_str()); unlink(auxname(prefix,"tua").c_str()); unlink(auxname(prefix,"tuc").c_str()); unlink(auxname(prefix,"tui").c_str()); } } {Stack->push(xe ? readpath(psname,keep,!legacygs,0.1) : readpath(psname,keep,false,0.12,-1.0)); return;} } #line 396 "runlabel.in" // patharray2* textpath(stringarray *s, penarray *p); void gen_runlabel4(stack *Stack) { penarray * p=vm::pop(Stack); stringarray * s=vm::pop(Stack); #line 397 "runlabel.in" size_t n=checkArrays(s,p); if(n == 0) {Stack->push(new array(0)); return;} string prefix=cleanpath(outname()); string outputname=auxname(prefix,getSetting("textoutformat")); string textname=auxname(prefix,getSetting("textextension")); std::ofstream text(textname.c_str()); if(!text) cannotwrite(textname); for(size_t i=0; i < n; ++i) { text << getSetting("textprologue") << newl << read(p,i).Font() << newl << read(s,i) << newl << getSetting("textepilogue") << endl; } text.close(); string psname=auxname(prefix,"ps"); std::ofstream ps(psname.c_str()); if(!ps) cannotwrite(psname); showpath(ps); mem::vector cmd; cmd.push_back(getSetting("textcommand")); push_split(cmd,getSetting("textcommandOptions")); cmd.push_back(textname); iopipestream typesetter(cmd); typesetter.block(true,false); mem::vector cmd2; cmd2.push_back(getSetting("gs")); cmd2.push_back("-q"); cmd2.push_back("-dNOCACHE"); cmd2.push_back("-dNOPAUSE"); cmd2.push_back("-dBATCH"); cmd2.push_back("-P"); if(safe) cmd2.push_back("-dSAFER"); cmd2.push_back("-sDEVICE="+getSetting("epsdriver")); cmd2.push_back("-sOutputFile=-"); cmd2.push_back("-"); iopipestream gs(cmd2,"gs","Ghostscript"); gs.block(false,false); // TODO: Simplify by connecting the pipes directly. while(true) { string out; if(typesetter.isopen()) { typesetter >> out; if(!out.empty()) gs << out; else if(!typesetter.running()) { typesetter.pipeclose(); gs.eof(); } } string out2; gs >> out2; if(out2.empty() && !gs.running()) break; ps << out2; } ps.close(); if(verbose > 2) cout << endl; bool keep=getSetting("keep"); if(!keep) // Delete temporary files. unlink(textname.c_str()); {Stack->push(readpath(psname,keep,false,0.1)); return;} } #line 470 "runlabel.in" // patharray* _strokepath(path g, pen p=CURRENTPEN); void gen_runlabel5(stack *Stack) { pen p=vm::pop(Stack,CURRENTPEN); path g=vm::pop(Stack); #line 471 "runlabel.in" array *P=new array(0); if(g.size() == 0) {Stack->push(P); return;} string prefix=cleanpath(outname()); string psname=auxname(prefix,"ps"); bbox b; psfile ps(psname,false); ps.prologue(b); ps.verbatimline(ASYx); ps.verbatimline(ASYy); ps.verbatimline("/stroke {"+ASYinit+pathforall+"} bind def"); ps.resetpen(); ps.setpen(p); ps.write(g); ps.strokepath(); ps.stroke(p); ps.verbatimline("(M) "+currentpoint); ps.epilogue(); ps.close(); array *a=readpath(psname,getSetting("keep")); {Stack->push(a->size() > 0 ? read(a,0) : a); return;} } } // namespace run namespace trans { void gen_runlabel_venv(venv &ve) { #line 223 "runlabel.in" addFunc(ve, run::gen_runlabel0, primVoid(), SYM(label), formal(primPicture(), SYM(f), false, false), formal(primString(), SYM(s), false, false), formal(primString(), SYM(size), false, false), formal(primTransform(), SYM(t), false, false), formal(primPair(), SYM(position), false, false), formal(primPair(), SYM(align), false, false), formal(primPen(), SYM(p), false, false)); #line 229 "runlabel.in" addFunc(ve, run::gen_runlabel1, primBoolean(), SYM(labels), formal(primPicture(), SYM(f), false, false)); #line 234 "runlabel.in" addFunc(ve, run::gen_runlabel2, realArray(), SYM(texsize), formal(primString(), SYM(s), false, false), formal(primPen(), SYM(p), true, false)); #line 252 "runlabel.in" addFunc(ve, run::gen_runlabel3, pathArray2() , SYM(_texpath), formal(stringArray() , SYM(s), false, false), formal(penArray() , SYM(p), false, false)); #line 396 "runlabel.in" addFunc(ve, run::gen_runlabel4, pathArray2() , SYM(textpath), formal(stringArray() , SYM(s), false, false), formal(penArray() , SYM(p), false, false)); #line 470 "runlabel.in" addFunc(ve, run::gen_runlabel5, pathArray() , SYM(_strokepath), formal(primPath(), SYM(g), false, false), formal(primPen(), SYM(p), true, false)); } } // namespace trans ./asymptote-2.41/runbacktrace.h0000644000175000017500000000025113064427126016352 0ustar norbertnorbert/***** Autogenerated from runbacktrace.in; changes will be overwritten *****/ #ifndef runbacktrace_H #define runbacktrace_H namespace run { } #endif // runbacktrace_H ./asymptote-2.41/absyn.cc0000644000175000017500000000073013064427076015166 0ustar norbertnorbert/**** * absyn.cc * Tom Prince 2004/05/12 * * Utility functions for syntax trees. *****/ #include "absyn.h" #include "coenv.h" namespace absyntax { void absyn::markPos(trans::coenv& e) { e.c.markPos(getPos()); } absyn::~absyn() {} void prettyindent(ostream &out, Int indent) { for (Int i = 0; i < indent; i++) out << " "; } void prettyname(ostream &out, string name, Int indent) { prettyindent(out,indent); out << name << "\n"; } } // namespace absyntax ./asymptote-2.41/callable.h0000644000175000017500000000315213064427076015454 0ustar norbertnorbert/***** * callable.h * Tom Prince 2005/06/19 * * Runtime representation of functions. *****/ #ifndef CALLABLE_H #define CALLABLE_H #include "common.h" #include "item.h" #include "inst.h" namespace vm { class stack; typedef void (*bltin)(stack *s); struct callable : public gc { virtual void call(stack *) = 0; virtual ~callable(); virtual bool compare(callable*) { return false; } // For debugging: virtual void print(ostream& out) = 0; }; class nullfunc : public callable { private: nullfunc() {} static nullfunc func; public: virtual void call (stack*); virtual bool compare(callable*); static callable* instance() { return &func; } void print(ostream& out); }; // How a function reference to a non-builtin function is stored. struct func : public callable { lambda *body; frame *closure; func () : body(), closure() {} virtual void call (stack*); virtual bool compare(callable*); void print(ostream& out); }; class bfunc : public callable { public: bfunc(bltin b) : func(b) {} virtual void call (stack *s) { func(s); } virtual bool compare(callable*); void print(ostream& out); private: bltin func; }; class thunk : public callable { public: thunk(callable *f, item i) : func(f), arg(i) {} virtual void call (stack*); void print(ostream& out); private: callable *func; item arg; }; inline ostream& operator<< (ostream& out, callable &c) { c.print(out); return out; } } // namespace vm GC_DECLARE_PTRFREE(vm::nullfunc); // I believe this is safe, as pointers to C++ functions do not point to // the heap. GC_DECLARE_PTRFREE(vm::bfunc); #endif // CALLABLE_H ./asymptote-2.41/drawpath3.cc0000644000175000017500000001431413064427076015752 0ustar norbertnorbert/***** * drawpath3.cc * * Stores a path3 that has been added to a picture. *****/ #include "drawpath3.h" #include "drawsurface.h" namespace camp { using vm::array; using namespace prc; bool drawPath3::write(prcfile *out, unsigned int *, double, groupsmap&) { Int n=g.length(); if(n == 0 || invisible) return true; if(straight) { triple *controls=new(UseGC) triple[n+1]; for(Int i=0; i <= n; ++i) controls[i]=g.point(i); out->addLine(n+1,controls,color); } else { int m=3*n+1; triple *controls=new(UseGC) triple[m]; controls[0]=g.point((Int) 0); controls[1]=g.postcontrol((Int) 0); size_t k=1; for(Int i=1; i < n; ++i) { controls[++k]=g.precontrol(i); controls[++k]=g.point(i); controls[++k]=g.postcontrol(i); } controls[++k]=g.precontrol(n); controls[++k]=g.point(n); out->addBezierCurve(m,controls,color); } return true; } void drawPath3::render(GLUnurbs *nurb, double size2, const triple& b, const triple& B, double perspective, bool lighton, bool transparent) { #ifdef HAVE_GL Int n=g.length(); if(n == 0 || invisible || ((color.A < 1.0) ^ transparent)) return; const bool billboard=interaction == BILLBOARD && !settings::getSetting("offscreen"); triple m,M; double f,F,s; if(perspective) { f=Min.getz()*perspective; F=Max.getz()*perspective; m=triple(min(f*b.getx(),F*b.getx()),min(f*b.gety(),F*b.gety()),b.getz()); M=triple(max(f*B.getx(),F*B.getx()),max(f*B.gety(),F*B.gety()),B.getz()); s=max(f,F); } else { m=b; M=B; s=1.0; } const pair size3(s*(B.getx()-b.getx()),s*(B.gety()-b.gety())); double t[16]; // current transform glGetDoublev(GL_MODELVIEW_MATRIX,t); // Like Fortran, OpenGL uses transposed (column-major) format! run::transpose(t,4); run::inverse(t,4); bbox3 box(m,M); box.transform(t); m=box.Min(); M=box.Max(); if(!billboard && (Max.getx() < m.getx() || Min.getx() > M.getx() || Max.gety() < m.gety() || Min.gety() > M.gety() || Max.getz() < m.getz() || Min.getz() > M.getz())) return; drawBezierPatch::S.draw(); GLfloat Diffuse[]={0.0,0.0,0.0,(GLfloat) color.A}; glMaterialfv(GL_FRONT,GL_DIFFUSE,Diffuse); static GLfloat Black[]={0.0,0.0,0.0,1.0}; glMaterialfv(GL_FRONT,GL_AMBIENT,Black); GLfloat Emissive[]={(GLfloat) color.R,(GLfloat) color.G,(GLfloat) color.B, (GLfloat) color.A}; glMaterialfv(GL_FRONT,GL_EMISSION,Emissive); glMaterialfv(GL_FRONT,GL_SPECULAR,Black); glMaterialf(GL_FRONT,GL_SHININESS,128.0); if(billboard) { for(Int i=0; i < n; ++i) { triple controls[]={BB.transform(g.point(i)),BB.transform(g.postcontrol(i)), BB.transform(g.precontrol(i+1)), BB.transform(g.point(i+1))}; R.queue(controls,straight,size3.length()/size2,m,M); } } else { BB.init(center); for(Int i=0; i < n; ++i) { triple controls[]={g.point(i),g.postcontrol(i),g.precontrol(i+1), g.point(i+1)}; R.queue(controls,straight,size3.length()/size2,m,M); } } R.draw(); #endif } drawElement *drawPath3::transformed(const double* t) { return new drawPath3(t,this); } bool drawNurbsPath3::write(prcfile *out, unsigned int *, double, groupsmap&) { if(invisible) return true; out->addCurve(degree,n,controls,knots,color,weights); return true; } // Approximate bounds by bounding box of control polyhedron. void drawNurbsPath3::bounds(const double* t, bbox3& b) { double x,y,z; double X,Y,Z; triple* Controls; if(t == NULL) Controls=controls; else { Controls=new triple[n]; for(size_t i=0; i < n; i++) Controls[i]=t*controls[i]; } boundstriples(x,y,z,X,Y,Z,n,Controls); b.add(x,y,z); b.add(X,Y,Z); if(t == NULL) { Min=triple(x,y,z); Max=triple(X,Y,Z); } else delete[] Controls; } drawElement *drawNurbsPath3::transformed(const double* t) { return new drawNurbsPath3(t,this); } void drawNurbsPath3::ratio(const double* t, pair &b, double (*m)(double, double), double, bool &first) { triple* Controls; if(t == NULL) Controls=controls; else { Controls=new triple[n]; for(size_t i=0; i < n; i++) Controls[i]=t*controls[i]; } if(first) { first=false; triple v=Controls[0]; b=pair(xratio(v),yratio(v)); } double x=b.getx(); double y=b.gety(); for(size_t i=0; i < n; ++i) { triple v=Controls[i]; x=m(x,xratio(v)); y=m(y,yratio(v)); } b=pair(x,y); if(t != NULL) delete[] Controls; } void drawNurbsPath3::displacement() { #ifdef HAVE_GL size_t nknots=degree+n+1; if(Controls == NULL) { Controls=new(UseGC) GLfloat[(weights ? 4 : 3)*n]; Knots=new(UseGC) GLfloat[nknots]; } if(weights) for(size_t i=0; i < n; ++i) store(Controls+4*i,controls[i],weights[i]); else for(size_t i=0; i < n; ++i) store(Controls+3*i,controls[i]); for(size_t i=0; i < nknots; ++i) Knots[i]=knots[i]; #endif } void drawNurbsPath3::render(GLUnurbs *nurb, double, const triple&, const triple&, double, bool lighton, bool transparent) { #ifdef HAVE_GL if(invisible || ((color.A < 1.0) ^ transparent)) return; GLfloat Diffuse[]={0.0,0.0,0.0,(GLfloat) color.A}; glMaterialfv(GL_FRONT,GL_DIFFUSE,Diffuse); static GLfloat Black[]={0.0,0.0,0.0,1.0}; glMaterialfv(GL_FRONT,GL_AMBIENT,Black); GLfloat Emissive[]={(GLfloat) color.R,(GLfloat) color.G,(GLfloat) color.B, (GLfloat) color.A}; glMaterialfv(GL_FRONT,GL_EMISSION,Emissive); glMaterialfv(GL_FRONT,GL_SPECULAR,Black); glMaterialf(GL_FRONT,GL_SHININESS,128.0); if(weights) gluNurbsCallback(nurb,GLU_NURBS_VERTEX,(_GLUfuncptr) glVertex4fv); else gluNurbsCallback(nurb,GLU_NURBS_VERTEX,(_GLUfuncptr) glVertex3fv); gluBeginCurve(nurb); int order=degree+1; gluNurbsCurve(nurb,order+n,Knots,weights ? 4 : 3,Controls,order, weights ? GL_MAP1_VERTEX_4 : GL_MAP1_VERTEX_3); gluEndCurve(nurb); if(weights) gluNurbsCallback(nurb,GLU_NURBS_VERTEX,(_GLUfuncptr) glVertex3fv); #endif } } //namespace camp ./asymptote-2.41/runpicture.h0000644000175000017500000000027713064427126016116 0ustar norbertnorbert/***** Autogenerated from runpicture.in; changes will be overwritten *****/ #ifndef runpicture_H #define runpicture_H namespace run { void newPicture(vm::stack *); } #endif // runpicture_H ./asymptote-2.41/errormsg.h0000644000175000017500000001160613064427076015560 0ustar norbertnorbert/***** * errormsg.h * Andy Hammerlindl 2002/06/17 * * Used in all phases of the compiler to give error messages. *****/ #ifndef ERRORMSG_H #define ERRORMSG_H #include #include "common.h" #include "settings.h" using std::ostream; struct handled_error {}; // Exception to process next file. struct interrupted {}; // Exception to interrupt execution. struct quit {}; // Exception to quit current operation. struct eof {}; // Exception to exit interactive mode. class fileinfo : public gc { string filename; size_t lineNum; public: fileinfo(string filename, size_t lineNum=1) : filename(filename), lineNum(lineNum) {} size_t line() const { return lineNum; } string name() const { return filename; } // The filename without the directory and without the '.asy' suffix. // Note that this assumes name are separated by a forward slash. string moduleName() const { size_t start = filename.rfind('/'); if (start == filename.npos) start = 0; else // Step over slash. ++start; size_t end = filename.rfind(".asy"); if (end != filename.size() - 4) end = filename.size(); return filename.substr(start, end-start); } // Specifies a newline symbol at the character position given. void newline() { ++lineNum; } }; inline bool operator == (const fileinfo& a, const fileinfo& b) { return a.line() == b.line() && a.name() == b.name(); } class position : public gc { fileinfo *file; size_t line; size_t column; public: void init(fileinfo *f, Int p) { file = f; if (file) { line = file->line(); column = p; } else { line = column = 0; } } string filename() const { return file ? file->name() : ""; } size_t Line() const { return line; } size_t Column() const { return column; } bool match(const string& s) { return file && file->name() == s; } bool match(size_t l) { return line == l; } bool matchColumn(size_t c) { return column == c; } bool operator! () const { return (file == 0); } friend ostream& operator << (ostream& out, const position& pos); // Write out just the module name and line number. void printTerse(ostream& out) const { if (file) { out << file->moduleName() << ":" << line; } } }; extern position nullPos; struct nullPosInitializer { nullPosInitializer() {nullPos.init(NULL,0);} }; inline bool operator == (const position& a, const position& b) { return a.Line() == b.Line() && a.Column() == b.Column() && a.filename() == b.filename(); } string warning(string s); class errorstream { ostream& out; bool anyErrors; bool anyWarnings; bool floating; // Was a message output without a terminating newline? // Is there an error that warrants the asy process to return 1 instead of 0? bool anyStatusErrors; public: static bool interrupt; // Is there a pending interrupt? errorstream(ostream& out = cerr) : out(out), anyErrors(false), anyWarnings(false), floating(false), anyStatusErrors(false) {} void clear(); void message(position pos, const string& s); void Interrupt(bool b) { interrupt=b; } // An error is encountered, not in the user's code, but in the way the // compiler works! This may be augmented in the future with a message // to contact the compiler writers. void compiler(); void compiler(position pos); // An error encountered when running compiled code. This method does // not stop the executable, but the executable should be stopped // shortly after calling this method. void runtime(position pos); // Errors encountered when compiling making it impossible to run the code. void error(position pos); // Indicate potential problems in the code, but the code is still usable. void warning(position pos); void warning(position pos, string s); // Single a fatal error and execute the main process. void fatal(position pos); // Print out position in code to aid debugging. void trace(position pos); // Sends stuff to out to print. // NOTE: May later make it do automatic line breaking for long messages. template errorstream& operator << (const T& x) { flush(out); out << x; return *this; } // Reporting errors to the stream may be incomplete. This draws the // appropriate newlines or file excerpts that may be needed at the end. void sync(); void cont(); bool errors() const { return anyErrors; } bool warnings() const { return anyWarnings || errors(); } void statusError() { anyStatusErrors=true; } // Returns true if no errors have occured that should be reported by the // return value of the process. bool processStatus() const { return !anyStatusErrors; } }; extern errorstream em; void outOfMemory(); GC_DECLARE_PTRFREE(nullPosInitializer); #endif ./asymptote-2.41/envcompleter.cc0000644000175000017500000000216613064427076016562 0ustar norbertnorbert/***** * envcompleter.cc * Andy Hammerlindl 2006/07/31 * * Implements a text completion function for readline based on symbols in the * environment. *****/ #include #include "table.h" #include "envcompleter.h" namespace trans { bool basicListLoaded=false; envCompleter::symbol_list basicList; static void loadBasicList() { assert(basicListLoaded==false); #define ADD(word) basicList.push_back(symbol::literalTrans(#word)) #include "keywords.cc" #undef ADD basicListLoaded=true; } void envCompleter::basicCompletions(symbol_list &l, string start) { if (!basicListLoaded) loadBasicList(); for (symbol_list::iterator p = basicList.begin(); p != basicList.end(); ++p) if (prefix(start, *p)) l.push_back(*p); } void envCompleter::makeList(const char *text) { l.clear(); basicCompletions(l, text); e.completions(l, text); index=l.begin(); } char *envCompleter::operator () (const char *text, int state) { if (state==0) makeList(text); if (index==l.end()) return 0; else { symbol name=*index; ++index; return StrdupMalloc((string)name); } } } // namespace trans ./asymptote-2.41/util.h0000644000175000017500000001060013064427076014666 0ustar norbertnorbert/***** * util.h * Andy Hammerlindl 2004/05/10 * * A place for useful utility functions. *****/ #ifndef UTIL_H #define UTIL_H #include #include #include #ifdef __CYGWIN__ extern "C" int sigaddset(sigset_t *set, int signum); extern "C" int sigemptyset(sigset_t *set); extern "C" int sigaction(int signum, const struct sigaction *act, struct sigaction *oldact); #endif #include #include "common.h" #include // Demangle a typeid name (if the proper library is installed. string demangle(const char *s); // Duplicate a string. char *Strdup(string s); char *StrdupNoGC(string s); char *StrdupMalloc(string s); // Strip the directory from a filename. string stripDir(string name); // Strip the file from a filename, returning the directory. string stripFile(string name); // Strip the extension from a filename. string stripExt(string name, const string& suffix=""); void writeDisabled(); // Replace spaces in file part of name with underscores. string cleanpath(string name); // Construct the full output path. string outpath(string name); // Construct a filename from the original, adding aux at the end, and // changing the suffix. string buildname(string filename, string suffix="", string aux=""); // Construct an alternate filename for a temporary file in the current // directory. string auxname(string filename, string suffix=""); // Cast argument to a string. template string String(T x) { ostringstream buf; buf << x; return buf.str(); } typedef void (*sighandler_t)(int); // Portable signal (sigaction wrapper). sighandler_t Signal(int signum, sighandler_t handler); // Split string S and push the pieces onto vector a. void push_split(mem::vector& a, const string& S); // Wrapper to append /c start "" to MSDOS cmd. void push_command(mem::vector& a, const string& s); // Return an argv array corresponding to the fields in command delimited // by spaces not within matching single quotes. char **args(const mem::vector &args, bool quiet=false); // Similar to the standard system call except allows interrupts and does // not invoke a shell. int System(const mem::vector &command, int quiet=0, bool wait=true, const char *hint=NULL, const char *application="", int *pid=NULL); #if defined(__DECCXX_LIBCXX_RH70) extern "C" int kill(pid_t pid, Int sig) throw(); extern "C" char *strsignal(Int sig); extern "C" double asinh(double x); extern "C" double acosh(double x); extern "C" double atanh(double x); extern "C" double cbrt(double x); extern "C" double erf(double x); extern "C" double erfc(double x); extern "C" double tgamma(double x); extern "C" double remainder(double x, double y); extern "C" double hypot(double x, double y) throw(); extern "C" double jn(Int n, double x); extern "C" double yn(Int n, double x); #endif #if defined(__DECCXX_LIBCXX_RH70) || defined(__CYGWIN__) extern "C" int snprintf(char *str, size_t size, const char *format,...); extern "C" int isnan(double); #include extern "C" FILE *fdopen(int fd, const char *mode); extern "C" int fileno(FILE *); extern "C" char *strptime(const char *s, const char *format, struct tm *tm); extern "C" int setenv(const char *name, const char *value, int overwrite); extern "C" int unsetenv(const char *name); #endif extern bool False; // Strip blank lines (which would break the bidirectional TeX pipe) string stripblanklines(const string& s); const char *startPath(); const char* setPath(const char *s, bool quiet=false); const char *changeDirectory(const char *s); extern char *startpath; void backslashToSlash(string& s); void spaceToUnderscore(string& s); string Getenv(const char *name, bool msdos); char *getPath(char *p=NULL); void execError(const char *command, const char *hint, const char *application); // This invokes a viewer to display the manual. Subsequent calls will only // pop-up a new viewer if the old one has been closed. void popupHelp(); #ifdef __CYGWIN__ inline long long llabs(long long x) {return x >= 0 ? x : -x;} extern "C" char *initstate (unsigned seed, char *state, size_t size); extern "C" long random (void); #endif inline Int Abs(Int x) { #ifdef HAVE_LONG_LONG return llabs(x); #else #ifdef HAVE_LONG return labs(x); #else return abs(x); #endif #endif } unsigned unsignedcast(Int n); unsignedInt unsignedIntcast(Int n); int intcast(Int n); Int Intcast(unsignedInt n); #endif ./asymptote-2.41/runsystem.h0000644000175000017500000000023513064427126015761 0ustar norbertnorbert/***** Autogenerated from runsystem.in; changes will be overwritten *****/ #ifndef runsystem_H #define runsystem_H namespace run { } #endif // runsystem_H